Subversion Repositories Applications.framework

Rev

Rev 381 | Rev 397 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 381 Rev 394
Line 6... Line 6...
6 
 * @category	PHP 5.2
 6 
 * @category	PHP 5.2
7 
 * @package	Utilitaire
 7 
 * @package	Utilitaire
8 
 * @author		Jean-Pascal MILCENT <jpm@tela-botanica.org>
 8 
 * @author		Jean-Pascal MILCENT <jpm@tela-botanica.org>
9 
 * @copyright	Copyright (c) 2009, Tela Botanica (accueil@tela-botanica.org)
 9 
 * @copyright	Copyright (c) 2009, Tela Botanica (accueil@tela-botanica.org)
10 
 * @license	http://www.gnu.org/licenses/gpl.html Licence GNU-GPL-v3
 10 
 * @license	http://www.gnu.org/licenses/gpl.html Licence GNU-GPL-v3
11 
 * @license	http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL-v2
11 
 * @license	http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL-v2
12 
 * @version	$Id: Tableau.php 381 2011-10-14 10:36:01Z jpm $
 12 
 * @version	$Id: Tableau.php 394 2011-11-14 13:48:24Z jpm $
13 
 * @link		/doc/framework/
 13 
 * @link		/doc/framework/
14 
 */
 14 
 */
15 
// TODO : réaliser une seule méthode pour trierMD et trierMDType
 15 
// TODO : réaliser une seule méthode pour trierMD et trierMDType
16 
class Tableau {
 16 
class Tableau {
- 
 
 17 
	const TRIE_NATUREL = 'nat';
- 
 
 18 
	const TRIE_CASSE_SENSIBLE = 'ci';
- 
 
 19 
	const TRIE_CASSE_INSENSIBLE = 'ci';
- 
 
 20 
 
- 
 
 21 
	private static $triMultiDimension = null;
- 
 
 22 
	private static $triType = null;
- 
 
 23 
 
17 
	/**
 24 
	/**
18 
	 * Etend le tableau à étendre avec les données du tableau à copier. Si des clés sont identiques entre les deux tableaux
 25 
	 * Etend le tableau à étendre avec les données du tableau à copier. Si des clés sont identiques entre les deux tableaux
19 
	 * 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
26 
	 * 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
20 
	 * leurs valeurs sont gardées (à la différence de array_merge).
 27 
	 * leurs valeurs sont gardées (à la différence de array_merge).
21 
	 * Les tableaux sont passés par références et le tableau à copier est progressivement détruit pour éviter la consomation
 28 
	 * Les tableaux sont passés par références et le tableau à copier est progressivement détruit pour éviter la consomation
22 
	 * de mémoire.
 29 
	 * de mémoire.
23 
	 *
30 
	 *
24 
	 * @param array $tableau_a_etendre
 31 
	 * @param array $tableau_a_etendre
25 
	 * @param array $tableau_a_copier
 32 
	 * @param array $tableau_a_copier
26 
	 * @return void
 33 
	 * @return void
27 
	 */
 34 
	 */
28 
	public static function etendre(Array &$tableau_a_etendre, Array &$tableau_a_copier) {
 35 
	public static function etendre(Array &$tableau_a_etendre, Array &$tableau_a_copier) {
Line 38... Line 45...
38 
		if (is_array($cles_existantes)) {
 45 
		if (is_array($cles_existantes)) {
39 
			$e = "Le tableau a étendre contenait déjà les clés suivantes : ".implode(', ', $cles_existantes);
 46 
			$e = "Le tableau a étendre contenait déjà les clés suivantes : ".implode(', ', $cles_existantes);
40 
			trigger_error($e, E_USER_WARNING);
 47 
			trigger_error($e, E_USER_WARNING);
41 
		}
 48 
		}
42 
	}
 49 
	}
43
50 
 
44 
	/**
 51 
	/**
45 
	 * @deprecated Utiliser la méthode trierMD()
 52 
	 * @deprecated Utiliser la méthode trierMD()
46 
	 * @see  trierMD()
 53 
	 * @see  trierMD()
47 
	 */
 54 
	 */
48 
	public static function trierTableauMd($array, $cols) {
 55 
	public static function trierTableauMd($array, $cols) {
49 
		return self::trierMD($array, $cols);
 56 
		return self::trierMD($array, $cols);
50 
	}
 57 
	}
51
58 
 
52 
	/**
 59 
	/**
53 
	 * Permet de trier un tableau multi-dimenssionnel en gardant l'ordre des clés.
 60 
	 * Permet de trier un tableau multi-dimenssionnel en gardant l'ordre des clés.
54 
	 *
61 
	 *
55 
	 * @param Array $array le tableau à trier
 62 
	 * @param Array $array le tableau à trier
56 
	 * @param Array $cols tableau indiquant en clé la colonne à trier et en valeur l'ordre avec SORT_ASC ou SORT_DESC
 63 
	 * @param Array $cols tableau indiquant en clé la colonne à trier et en valeur l'ordre avec SORT_ASC ou SORT_DESC
57 
	 * @return Array le tableau trié.
 64 
	 * @return Array le tableau trié.
58 
	 * @author cagret at gmail dot com
 65 
	 * @author cagret at gmail dot com
59 
	 * @see  http://fr.php.net/manual/fr/function.array-multisort.php Post du 21-Jun-2009 12:38
 66 
	 * @see  http://fr.php.net/manual/fr/function.array-multisort.php Post du 21-Jun-2009 12:38
Line 88... Line 95...
88 
			}
 95 
			}
89 
			$first = false;
 96 
			$first = false;
90 
		}
 97 
		}
91 
		return $ret;
 98 
		return $ret;
92 
	}
 99 
	}
93
100 
 
94 
	/**
 101 
	/**
95 
	* Méthode réalisant un tri d'un tableau multidimension.
 102 
	* Méthode réalisant un tri d'un tableau multidimension.
96 
	* A utiliser de cette façon:
 103 
	* A utiliser de cette façon:
97 
	* EfloreTriage::trieMultiple( $tableau_multidimension, array('ma_cle1', 'ma_cle1_ordre_tri', 'ma_cle2', 'ma_cle2_ordre_tri'), $type_de_tri);
 104 
	* EfloreTriage::trieMultiple( $tableau_multidimension, array('ma_cle1', 'ma_cle1_ordre_tri', 'ma_cle2', 'ma_cle2_ordre_tri'), $type_de_tri);
98 
	* Utiliser les constantes php SORT_DESC ou SORT_ASC pour l'odre de tri.
 105 
	* Utiliser les constantes php SORT_DESC ou SORT_ASC pour l'odre de tri.
99 
	* Pour le type de tri : utiliser 'nat' pour un trie naturel, 'cs' pour tri sensible à la casse ou 'ci' pour insensible.
 106 
	* Pour le type de tri : utiliser Tableau::TRIE_NATUREL pour un trie naturel, Tableau::TRIE_CASSE_SENSIBLE pour tri sensible à la casse ou Tableau::TRIE_CASSE_INSENSIBLE pour insensible.
100 
	* @param array le tableau à trier
 107 
	* @param array le tableau à trier
101 
	* @param array le talbeau des colonnes à trier constituer d'un suite de nom de clé de tableau et d'ordre de tri.
 108 
	* @param array le talbeau des colonnes à trier constituer d'un suite de nom de clé de tableau et d'ordre de tri.
102 
	* @return array le tableau trié.
 109 
	* @return array le tableau trié.
103 
	*/
 110 
	*/
104 
	public static function trierMDType(&$tableau, $cols, $type = 'ci') {
 111 
	public static function trierMDType(&$tableau, $cols, $type = self::TRIE_CASSE_INSENSIBLE) {
105 
		self::$tri_multi_dimension = $cols;
 112 
		self::$triMultiDimension = $cols;
106 
		self::$tri_type = $type;
 113 
		self::$triType = $type;
107 
		usort($tableau, array('self', 'comparer'));
 114 
		usort($tableau, array('self', 'comparer'));
108 
		return $tableau;
 115 
		return $tableau;
109 
	}
 116 
	}
110
117 
 
111 
	private static function comparer($a, $b) {
 118 
	private static function comparer($a, $b) {
112 
		$cols = self::$tri_multi_dimension;
 119 
		$cols = self::$triMultiDimension;
113 
		$i = 0;
 120 
		$i = 0;
114 
		$resultat = 0;
 121 
		$resultat = 0;
115 
		$colonne_nbre = count($cols);
 122 
		$colonne_nbre = count($cols);
116 
		while ($resultat == 0 && $i < $colonne_nbre) {
 123 
		while ($resultat == 0 && $i < $colonne_nbre) {
117 
			$mot_01 = self::enleverAccents($b[$cols[$i]]);
 124 
			$mot_01 = Chaine::supprimerAccents($b[$cols[$i]]);
118 
			$mot_02 = self::enleverAccents($a[$cols[$i]]);
 125 
			$mot_02 = Chaine::supprimerAccents($a[$cols[$i]]);
119 
			switch (self::$tri_type) {
 126 
			switch (self::$triType) {
120 
				case 'nat' :
 127 
				case self::TRIE_NATUREL :
121 
					$resultat = ($cols[$i + 1] == SORT_DESC) ? strnatcmp($mot_01, $mot_02) : strnatcmp($mot_02, $mot_01);
 128 
					$resultat = ($cols[$i + 1] == SORT_DESC) ? strnatcmp($mot_01, $mot_02) : strnatcmp($mot_02, $mot_01);
122 
					break;
 129 
					break;
123 
				case 'cs' :
 130 
				case self::TRIE_CASSE_SENSIBLE :
124 
					$resultat = ($cols[$i + 1] == SORT_DESC) ? strcmp($mot_01, $mot_02) : strcmp($mot_02, $mot_01);
 131 
					$resultat = ($cols[$i + 1] == SORT_DESC) ? strcmp($mot_01, $mot_02) : strcmp($mot_02, $mot_01);
125 
					break;
 132 
					break;
126 
				case 'ci' :
 133 
				case self::TRIE_CASSE_INSENSIBLE :
127 
					$resultat = ($cols[$i + 1] == SORT_DESC) ? strcasecmp($mot_01, $mot_02) : strcasecmp($mot_02, $mot_01);
 134 
					$resultat = ($cols[$i + 1] == SORT_DESC) ? strcasecmp($mot_01, $mot_02) : strcasecmp($mot_02, $mot_01);
128 
					break;
 135 
					break;
129 
				default:
 136 
				default:
130 
					$resultat = ($cols[$i + 1] == SORT_DESC) ? strcasecmp($mot_01, $mot_02) : strcasecmp($mot_02, $mot_01);
 137 
					$resultat = ($cols[$i + 1] == SORT_DESC) ? strcasecmp($mot_01, $mot_02) : strcasecmp($mot_02, $mot_01);
131 
					break;
 138 
					break;