Subversion Repositories Applications.framework

<?php
// declare(encoding='UTF-8');
/**
 * Classe fournissant des méthodes statiques de manipulation des tableaux (Array).
 *
 * @category    PHP 5.2
 * @package     Utilitaire
 * @author              Jean-Pascal MILCENT <jpm@tela-botanica.org>
 * @copyright   Copyright (c) 2009, Tela Botanica (accueil@tela-botanica.org)
 * @license     http://www.gnu.org/licenses/gpl.html Licence GNU-GPL-v3
 * @license     http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL-v2
 * @version     $Id: Tableau.php 400 2011-11-25 16:26:26Z jpm $
 * @link                /doc/framework/
 */
// TODO : réaliser une seule méthode pour trierMD et trierMDType
class Tableau {
        const TRI_NATUREL = 'nat';
        const TRI_CASSE_SENSIBLE = 'ci';
        const TRI_CASSE_INSENSIBLE = 'ci';

        private static $triMultiDimension = null;
        private static $triType = null;

        /**
         * Etend le tableau à étendre avec les données du tableau à copier. Si des clés sont identiques entre les deux tableaux
         * une erreur est déclenchée et la valeur du tableau à étendre est gardée. Si les deux tableaux ont des clés numériques
         * leurs valeurs sont gardées (à la différence de array_merge).
         * Les tableaux sont passés par références et le tableau à copier est progressivement détruit pour éviter la consomation
         * de mémoire.
         *
         * @param array $tableau_a_etendre
         * @param array $tableau_a_copier
         * @return void
         */
        public static function etendre(Array &$tableau_a_etendre, Array &$tableau_a_copier) {
                $cles_existantes = null;
                foreach($tableau_a_copier as $cle => $val) {
                        if (!isset($tableau_a_etendre[$cle])) {
                                $tableau_a_etendre[$cle] = $val;
                                unset($tableau_a_copier[$cle]);
                        } else {
                                $cles_existantes[] = $cle;
                        }
                }
                if (is_array($cles_existantes)) {
                        $e = "Le tableau a étendre contenait déjà les clés suivantes : ".implode(', ', $cles_existantes);
                        trigger_error($e, E_USER_WARNING);
                }
        }

        /**
         * @deprecated Utiliser la méthode trierMD()
         * @see  trierMD()
         */
        public static function trierTableauMd($array, $cols) {
                return self::trierMD($array, $cols);
        }

        /**
         * Permet de trier un tableau multi-dimenssionnel en gardant l'ordre des clés.
         *
         * @param Array $array le tableau à trier
         * @param Array $cols tableau indiquant en clé la colonne à trier et en valeur l'ordre avec SORT_ASC ou SORT_DESC
         * @return Array le tableau trié.
         * @author cagret at gmail dot com
         * @see  http://fr.php.net/manual/fr/function.array-multisort.php Post du 21-Jun-2009 12:38
         */
        public static function trierMD($array, $cols) {
                $colarr = array();
                foreach ($cols as $col => $order) {
                        $colarr[$col] = array();
                        foreach ($array as $k => $row) {
                                $colarr[$col]['_'.$k] = strtolower($row[$col]);
                        }
                }
                $params = array();
                foreach ($cols as $col => $order) {
                        $params[] =& $colarr[$col];
                        $orders = (array) $order;
                        foreach($orders as $orderElement) {
                                $params[] =& $orderElement;
                        }
                }
                call_user_func_array('array_multisort', $params);
                $ret = array();
                $keys = array();
                $first = true;
                foreach ($colarr as $col => $arr) {
                        foreach ($arr as $k => $v) {
                                if ($first) {
                                        $keys[$k] = substr($k, 1);
                                }
                                $k = $keys[$k];
                                if (!isset($ret[$k])) {
                                        $ret[$k] = $array[$k];
                                }
                                $ret[$k][$col] = $array[$k][$col];
                        }
                        $first = false;
                }
                return $ret;
        }

        /**
        * Méthode réalisant un tri d'un tableau multidimension. Attention les clés du tableau ne sont pas modifiées.
        * A utiliser de cette façon:
        * EfloreTriage::trieMultiple( $tableau_multidimension, array('ma_cle1' => SORT_ASC, 'ma_cle2' => SORT_DESC), $type_de_tri);
        * Utiliser les constantes php SORT_DESC ou SORT_ASC pour l'odre de tri.
        * Pour le type de tri : utiliser :
        *  - Tableau::TRI_NATUREL pour un trie naturel,
        *  - Tableau::TRI_CASSE_SENSIBLE pour un tri sensible à la casse,
        *  - Tableau::TRI_CASSE_INSENSIBLE pour un tri insensible à la casse.
        * @param array le tableau à trier
        * @param array le talbeau des colonnes à trier constituer de nom de clé en clé et d'ordres de tri en valeur.
        * @param string le type de tri à appliquer.
        * @return array le tableau trié.
        */
        public static function trierMDType(&$tableau, $cols, $type = self::TRI_CASSE_INSENSIBLE) {
                self::$triMultiDimension = $cols;
                self::$triType = $type;
                uasort($tableau, array('self', 'comparer'));
                return $tableau;
        }

        private static function comparer($a, $b) {
                $resultat = 0;
                foreach (self::$triMultiDimension as $champ => $ordre) {
                        if ($resultat == 0) {
                                $mot_01 = Chaine::supprimerAccents($b[$champ]);
                                $mot_02 = Chaine::supprimerAccents($a[$champ]);
                                switch (self::$triType) {
                                        case self::TRI_NATUREL :
                                                $resultat = ($ordre == SORT_DESC) ? strnatcmp($mot_01, $mot_02) : strnatcmp($mot_02, $mot_01);
                                                break;
                                        case self::TRI_CASSE_SENSIBLE :
                                                $resultat = ($ordre == SORT_DESC) ? strcmp($mot_01, $mot_02) : strcmp($mot_02, $mot_01);
                                                break;
                                        case self::TRI_CASSE_INSENSIBLE :
                                                $resultat = ($ordre == SORT_DESC) ? strcasecmp($mot_01, $mot_02) : strcasecmp($mot_02, $mot_01);
                                                break;
                                        default:
                                                $resultat = ($ordre == SORT_DESC) ? strcasecmp($mot_01, $mot_02) : strcasecmp($mot_02, $mot_01);
                                                break;
                                }

                        }
                }
                return $resultat;
        }
}
?>