Subversion Repositories eFlore/Applications.cel

Rev

Rev 2116 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2025 aurelien 1 
<?php
2 
/**
3 
* @package   jrest
4 
* @author    Aurélien Peronnet <aurelien@tela-botania.org>
5 
* @copyright 2010, 2013 Tela-Botanica
6 
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
7 
*
8 
* Librairie de liaison d'images et d'observation à des mots clés en utilisant la méthode
9 
* path enumeration
10 
*/
11 
 
12 
class GestionMotsClesChemin {
2101 jpm 13 
 
2025 aurelien 14 
	private $config;
15 
	private $mode;
2101 jpm 16 
 
2025 aurelien 17 
	private $table_liaison;
18 
	private $table_mots_cles;
2101 jpm 19 
 
2032 aurelien 20 
	//TODO: trigger pour les tables liaisons
2101 jpm 21 
 
2026 aurelien 22 
	public function GestionMotsClesChemin($config, $mode = 'obs') {
2025 aurelien 23 
		$this->config = $config;
24 
		//TODO: switch suivant mode
2027 aurelien 25 
		$this->mode = $mode;
2101 jpm 26 
 
2060 aurelien 27 
		list($this->table_liaison, $this->table_mots_cles) = self::getTablesMotsClesEtLiaisons($mode);
2059 aurelien 28 
	}
2101 jpm 29 
 
30 
	public function obtenirArbre($id_utilisateur, $chemin = '/') {
31 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
32 
		$cheminP = Cel::db()->proteger($chemin.'%');
33 
 
34 
		$requete = 'SELECT * '.
35 
			"FROM {$this->table_mots_cles} ".
36 
			"WHERE id_utilisateur = $idUtilisateurP ".
37 
			"AND chemin LIKE $cheminP ".
38 
			'ORDER BY chemin '.
39 
			' -- '.__FILE__.':'.__LINE__;
40 
 
41 
		$arbre = Cel::db()->requeter($requete);
2026 aurelien 42 
		usort($arbre, array('GestionMotsClesChemin', 'comparerProfNoeuds'));
2025 aurelien 43 
		return $arbre;
44 
	}
2101 jpm 45 
 
2042 aurelien 46 
	public function obtenirIdsMotsClesParIdParent($id_utilisateur, $id_mot_cle) {
2101 jpm 47 
		$idMotCleP = Cel::db()->proteger($id_mot_cle);
2111 aurelien 48 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
2042 aurelien 49 
 
2101 jpm 50 
		$sousRequete = "SELECT chemin FROM {$this->table_mots_cles} WHERE id_mot_cle = $idMotCleP ";
51 
		$requete = 'SELECT id_mot_cle '.
52 
			"FROM {$this->table_mots_cles} ".
53 
			"WHERE chemin LIKE CONCAT(($sousRequete), '%') ".
2111 aurelien 54 
			"AND id_utilisateur = ".$idUtilisateurP." ".
2101 jpm 55 
			' -- '.__FILE__.':'.__LINE__;
56 
 
57 
		$ids_enfants = Cel::db()->executerRequete($requete);
58 
 
2042 aurelien 59 
		return $ids_enfants;
60 
	}
2101 jpm 61 
 
2056 aurelien 62 
	public function insererParCheminSiInexistant($mot_cle, $chemin_parent, $id_utilisateur) {
2101 jpm 63 
		$cheminMotCle = self::getCheminHarmonise($chemin_parent, $mot_cle);
64 
		$cheminMotCleP = Cel::db()->proteger($cheminMotCle);
65 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
2056 aurelien 66 
 
2101 jpm 67 
		$requete = 'SELECT id_mot_cle '.
68 
			"FROM {$this->table_mots_cles} ".
69 
			"WHERE chemin = $cheminMotCleP ".
70 
			"AND id_utilisateur = $idUtilisateurP ".
71 
			' -- '.__FILE__.':'.__LINE__;
72 
 
73 
		$infosMotCle = Cel::db()->executerRequete($requete);
74 
 
75 
		if (!empty($infosMotCle)) {
76 
			$idMotCle = $infosMotCle[0]['id_mot_cle'];
2056 aurelien 77 
		} else {
2101 jpm 78 
			$idMotCle = $this->insererParChemin($mot_cle, $chemin_parent, $id_utilisateur);
2056 aurelien 79 
		}
2101 jpm 80 
		return $idMotCle;
2056 aurelien 81 
	}
2101 jpm 82 
 
83 
	public function insererParChemin($mot_cle, $chemin_parent, $id_utilisateur) {
84 
		$cheminMotCle = self::getCheminHarmonise($chemin_parent, $mot_cle);
85 
		$cheminMotCleP = Cel::db()->proteger($cheminMotCle);
86 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
87 
		$motCleP = Cel::db()->proteger($mot_cle);
88 
 
89 
		$requete = "INSERT INTO {$this->table_mots_cles} ".
90 
			'(chemin, id_utilisateur, mot_cle) '.
91 
			"VALUES ($cheminMotCleP, $idUtilisateurP, $motCleP ) ".
92 
			' -- '.__FILE__.':'.__LINE__;
93 
 
94 
		$insertion = Cel::db()->executer($requete);
2042 aurelien 95 
		$resultat = false;
2101 jpm 96 
		if ($insertion !== false) {
2042 aurelien 97 
			$resultat = Cel::db()->obtenirDernierId();
98 
		}
99 
		return $resultat;
2025 aurelien 100 
	}
2101 jpm 101 
 
102 
	public function insererParIdParent($mot_cle, $id_parent, $id_utilisateur) {
103 
		$motCleSimple = self::simplifier($mot_cle);
104 
		$motCleSimpleP = Cel::db()->proteger($motCleSimple);
105 
		$idParentP = Cel::db()->proteger($id_parent);
106 
		$racineP = Cel::db()->proteger('/');
107 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
108 
		$motCleP = Cel::db()->proteger($mot_cle);
109 
 
110 
		$sousRequete = $racineP;
111 
		if ($id_parent != '') {
112 
			$sousRequete = '(SELECT chemin '.
113 
				"FROM {$this->table_mots_cles} AS ctp ".
114 
				"WHERE ctp.id_mot_cle = $idParentP) ";
2042 aurelien 115 
		}
2045 aurelien 116 
 
2101 jpm 117 
		$requete = "INSERT INTO {$this->table_mots_cles} (chemin, id_utilisateur, mot_cle) ".
118 
			"VALUES (CONCAT($sousRequete, $motCleSimpleP, '/'), $idUtilisateurP, $motCleP ) ".
119 
			' -- '.__FILE__.':'.__LINE__;
120 
 
121 
		$insertion = Cel::db()->executer($requete);
122 
		if ($insertion !== false) {
2042 aurelien 123 
			$resultat = Cel::db()->obtenirDernierId();
124 
		}
125 
		return $resultat;
2025 aurelien 126 
	}
2101 jpm 127 
 
2032 aurelien 128 
	public function lierParId($id_mot_cle, $id_element_lie) {
2101 jpm 129 
		$idElementLieP = Cel::db()->proteger($id_element_lie);
130 
		$idMotCleP = Cel::db()->proteger($id_mot_cle);
2025 aurelien 131 
 
2101 jpm 132 
		$requete = "INSERT INTO {$this->table_liaison} (id_element_lie, id_mot_cle) ".
133 
			"VALUES ($idElementLieP, $idMotCleP) ".
134 
			'ON DUPLICATE KEY UPDATE id_element_lie = id_element_lie '.
135 
			' -- '.__FILE__.':'.__LINE__;
136 
 
137 
		$liaison = Cel::db()->executer($requete);
2025 aurelien 138 
		return $liaison;
139 
	}
2101 jpm 140 
 
2032 aurelien 141 
	public function lierParChemin($chemin, $id_element_lie, $id_utilisateur) {
2101 jpm 142 
		$cheminP = Cel::db()->proteger(self::harmoniserChemin($chemin));
143 
		$idElementLieP = Cel::db()->proteger($id_element_lie);
144 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
145 
 
146 
		$sousRequete = '(SELECT id_mot_cle '.
147 
			"FROM {$this->table_mots_cles} ".
148 
			"WHERE chemin = $cheminP ".
149 
			"AND id_utilisateur = $idUtilisateurP ".
150 
			')';
151 
		$requete = "INSERT INTO {$this->table_liaison} (id_element_lie, id_mot_cle) ".
152 
			"VALUES ($idElementLieP, $sousRequete) ".
153 
			'ON DUPLICATE KEY UPDATE id_element_lie = id_element_lie '.
154 
			' -- '.__FILE__.':'.__LINE__;
2032 aurelien 155 
 
2101 jpm 156 
		$liaison = Cel::db()->executer($requete);
2025 aurelien 157 
		return $liaison;
158 
	}
2101 jpm 159 
 
2042 aurelien 160 
	public function lierParTableaux($ids_mots_cles, $ids_elements_lies, $id_utilisateur) {
2101 jpm 161 
		$combinaisons = array();
162 
		foreach ($ids_mots_cles as $id_mot_cle) {
163 
			$idMotCleP = Cel::db()->proteger($id_mot_cle);
164 
			foreach ($ids_elements_lies as $id_element_lie) {
165 
				$idElementLieP = Cel::db()->proteger($id_element_lie);
166 
				$combinaisons[] = "($idElementLieP, $idMotCleP)";
2042 aurelien 167 
			}
2101 jpm 168 
		}
169 
 
170 
		$valeursGroupees = implode(', ', $combinaisons);
171 
		$requete = "INSERT INTO {$this->table_liaison} (id_element_lie, id_mot_cle) ".
172 
			"VALUES $valeursGroupees ".
173 
			"ON DUPLICATE KEY UPDATE id_element_lie = id_element_lie ".
174 
			' -- '.__FILE__.':'.__LINE__;
175 
		$liaison = Cel::db()->executer($requete);
176 
 
2042 aurelien 177 
		return $liaison;
178 
	}
2101 jpm 179 
 
2042 aurelien 180 
	public function supprimerLiaisonsMotsCles($ids_mots_cles, $ids_elements_lies, $id_utilisateur) {
181 
		$combinaisons = array();
2101 jpm 182 
		foreach ($ids_mots_cles as $id_mot_cle) {
183 
			$idMotCleP = Cel::db()->proteger($id_mot_cle);
184 
			foreach ($ids_elements_lies as $id_element_lie) {
185 
				$idElementLieP = Cel::db()->proteger($id_element_lie);
186 
				$combinaisons[] = "(id_element_lie = $idElementLieP AND id_mot_cle = $idMotCleP)";
2042 aurelien 187 
			}
2101 jpm 188 
		}
189 
		$clauseWhere = implode(' OR ', $combinaisons);
2042 aurelien 190 
 
2101 jpm 191 
		$requete = "DELETE FROM {$this->table_liaison} ".
192 
			"WHERE $clauseWhere ".
193 
			' -- '.__FILE__.':'.__LINE__;
194 
 
195 
		$suppression = Cel::db()->executer($requete);
2042 aurelien 196 
		return $suppression;
197 
	}
2101 jpm 198 
 
2058 aurelien 199 
	public function supprimerToutesLiaisonsPourIdsElementsLies($ids_elements_lies) {
2101 jpm 200 
		$idsElementsLiesP = Cel::db()->protegerTableau($ids_elements_lies);
201 
		$listeIds = implode(',', $idsElementsLiesP);
2042 aurelien 202 
 
2101 jpm 203 
		$requete = "DELETE FROM {$this->table_liaison} ".
204 
			"WHERE id_element_lie IN ($listeIds) ".
205 
			' -- '.__FILE__.':'.__LINE__;
206 
 
207 
		$suppression = Cel::db()->executer($requete);
208 
		$suppression = ($suppression !== false) ? true : false;
2042 aurelien 209 
		return $suppression;
210 
	}
2101 jpm 211 
 
2042 aurelien 212 
	public function supprimerToutesLiaisonsIdsMotsCles($ids_mots_cles, $id_utilisateur) {
2101 jpm 213 
		$suppression = true;
214 
		if (!empty($ids_mots_cles)) {
215 
			$idsMotsClesP = Cel::db()->protegerTableau($ids_mots_cles);
216 
			$listeIds = implode(',', $idsMotsClesP);
2043 aurelien 217 
 
2101 jpm 218 
			$requete = "DELETE FROM {$this->table_liaison} ".
219 
				"WHERE id_mot_cle IN ($listeIds) ".
220 
				' -- '.__FILE__.':'.__LINE__;
221 
 
222 
			$suppression = Cel::db()->executerRequeteSimple($requete);
223 
			$suppression = ($suppression !== false) ? true : false;
2042 aurelien 224 
		}
225 
		return $suppression;
226 
	}
2101 jpm 227 
 
228 
	/**
229 
	 * Supprime toutes les laisons pour un utilisateur et un mot clé (au sens textuel) donnés.
230 
	 *
231 
	 */
2046 aurelien 232 
	public function supprimerLiaisonPourMotCleEtIdElementLie($mot_cle, $id_element_lie, $id_utilisateur) {
2101 jpm 233 
		$idElementLieP = Cel::db()->proteger($id_element_lie);
234 
		$motCleP = Cel::db()->proteger($mot_cle);
235 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
236 
 
237 
		$sousRequete = "SELECT id_mot_cle FROM {$this->table_mots_cles} ".
238 
			"WHERE mot_cle = $motCleP ".
239 
			"AND id_utilisateur = $idUtilisateurP ";
240 
		$requete = "DELETE FROM {$this->table_liaison} ".
241 
			"WHERE id_element_lie = $idElementLieP ".
242 
			"AND id_mot_cle IN ($sousRequete) ".
243 
			' -- '.__FILE__.':'.__LINE__;
2046 aurelien 244 
 
2101 jpm 245 
		$suppression_liaison = Cel::db()->executerRequeteSimple($requete);
2046 aurelien 246 
		$suppression_liaison = ($suppression_liaison !== false);
247 
 
248 
		return $suppression_liaison;
249 
	}
2101 jpm 250 
 
2042 aurelien 251 
	public function renommerMotCle($id_mot_cle, $nouveau_nom) {
2101 jpm 252 
		$nouveauNomSimple = self::simplifier($nouveau_nom);
253 
		$nouveauNomSimpleP = Cel::db()->proteger($nouveauNomSimple);
254 
		$idMotCleP = Cel::db()->proteger($id_mot_cle);
255 
 
256 
		$requete = 'SELECT chemin, id_utilisateur '.
257 
			"FROM {$this->table_mots_cles} ".
258 
			"WHERE id_mot_cle = $idMotCleP ".
259 
			' -- '.__FILE__.':'.__LINE__;
260 
		$ancienCheminInfos = Cel::db()->requeter($requete);
261 
 
262 
		$ancienChemin = $ancienCheminInfos[0]['chemin'];
263 
		$id_utilisateur = $ancienCheminInfos[0]['id_utilisateur'];
264 
 
265 
		$cheminDecompo = explode('/', $ancienChemin);
2042 aurelien 266 
		// le dernier élément du tableau est vide (à cause du / terminal)
267 
		// c'est également le cas pour le premier (à cause du / qui commence le chemin)
2101 jpm 268 
		$cheminDecompo[count($cheminDecompo) - 2] = $nouveauNomSimple;
269 
		$nouveauChemin = implode('/', $cheminDecompo);
270 
 
271 
		$requete = "UPDATE {$this->table_mots_cles} ".
272 
			"SET mot_cle = $nouveauNomSimpleP ".
273 
			"WHERE id_mot_cle = $idMotCleP ".
274 
			' -- '.__FILE__.':'.__LINE__;
275 
 
276 
		$renommage = Cel::db()->executer($requete);
277 
		$this->renommerChemin($ancienChemin, $nouveauChemin, $id_utilisateur);
278 
 
279 
		$idsElementsLies = $this->obtenirIdElementsLiesPourIds(array($id_mot_cle));
280 
		foreach ($idsElementsLies as $idElementLie) {
281 
			self::regenererIndexTexteMotCle($idElementLie['id_element_lie'], $this->mode);
2045 aurelien 282 
		}
2101 jpm 283 
 
2042 aurelien 284 
		return $renommage;
285 
	}
286 
 
2101 jpm 287 
	/**
288 
	 * Si aucun id_père n'est mentionné, c'est un déplacement vers la racine de l'arbre (qui n'existe pas).
289 
	 */
290 
	public function deplacerMotCle($id_mot_cle, $id_pere, $id_utilisateur) {
291 
		$idMotCleP = Cel::db()->proteger($id_mot_cle);
292 
		$idPereP = Cel::db()->proteger($id_pere);
293 
		$cheminPere = '';
294 
 
295 
		if ($id_pere != '') {
296 
			$requete = 'SELECT chemin '.
297 
				"FROM {$this->table_mots_cles} ".
298 
				"WHERE id_mot_cle = $idPereP ".
299 
				' -- '.__FILE__.':'.__LINE__;
300 
 
301 
			$cheminPereInfos = Cel::db()->requeter($requete);
302 
			if (!empty($cheminPereInfos)) {
303 
				$cheminPere = $cheminPereInfos[0]['chemin'];
2061 aurelien 304 
			}
305 
		}
2101 jpm 306 
 
307 
		$requete = 'SELECT chemin, mot_cle '.
308 
			"FROM {$this->table_mots_cles} ".
309 
			"WHERE id_mot_cle = $idMotCleP ".
310 
			' -- '.__FILE__.':'.__LINE__;
311 
		$infosMotCle = Cel::db()->requeter($requete);
312 
		$ancienChemin = $infosMotCle[0]['chemin'];
313 
		$ancienMotCle = $infosMotCle[0]['mot_cle'];
314 
 
315 
		$nouveauChemin = $cheminPere.'/'.$ancienMotCle;
316 
 
317 
		return $this->renommerChemin($ancienChemin, $nouveauChemin, $id_utilisateur);
2042 aurelien 318 
	}
2101 jpm 319 
 
2025 aurelien 320 
	public function renommerChemin($ancien_chemin, $nouveau_chemin, $id_utilisateur) {
2101 jpm 321 
		$ancienCheminHarmonise = self::harmoniserChemin($ancien_chemin);
322 
		$nouveauCheminHarmonise = self::harmoniserChemin($nouveau_chemin);
323 
 
324 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
325 
		$ancienCheminP = Cel::db()->proteger($ancienCheminHarmonise);
326 
		$nouveauCheminP = Cel::db()->proteger($nouveauCheminHarmonise);
327 
		$conditionCheminP = Cel::db()->proteger($ancienCheminHarmonise.'%');
328 
 
329 
		$requete = "UPDATE {$this->table_mots_cles} ".
330 
			"SET chemin = REPLACE(chemin, $ancienCheminP, $nouveauCheminP) ".
331 
			"WHERE chemin LIKE $conditionCheminP ".
332 
			"AND id_utilisateur = $idUtilisateurP ".
333 
			' -- '.__FILE__.':'.__LINE__;
334 
 
335 
		return Cel::db()->executer($requete);
2025 aurelien 336 
	}
2101 jpm 337 
 
2025 aurelien 338 
	public function supprimerChemin($chemin, $id_utilisateur) {
2101 jpm 339 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
340 
		$cheminP = Cel::db()->proteger($chemin.'%');
2025 aurelien 341 
		// TODO : triggers pour les tables liées ?
2101 jpm 342 
		$requete = "DELETE FROM {$this->$table_mots_cles} ".
343 
			"WHERE chemin LIKE $cheminP ".
344 
			"AND id_utilisateur = $idUtilisateurP ".
345 
			' -- '.__FILE__.':'.__LINE__;
2025 aurelien 346 
 
2101 jpm 347 
		return Cel::db()->executer($requete);
2042 aurelien 348 
	}
2101 jpm 349 
 
350 
	/**
351 
	 * suppression des associations du mots clé aux images ou obs, mais aussi des associations de ses enfants
352 
	 * (car ceux-ci seront supprimés aussi dans le processus)
353 
	 * même s'il n'a pas d'enfants, le tableau contient au moins l'id du mot clé lui même
354 
	 */
2043 aurelien 355 
	public function supprimerMotCleParId($id_mot_cle, $id_utilisateur) {
356 
		//TODO: simplifier cette fonction
357 
		$ids_mot_cle_et_enfants = $this->obtenirIdsMotsClesParIdParent($id_utilisateur, $id_mot_cle);
2101 jpm 358 
 
2043 aurelien 359 
		// obtention des ids des éléments liés au mot clé ainsi qu'à ces enfants (afin de pouvoir
2060 aurelien 360 
		// régénérer les index texte de mots clés sur les éléments liés)
2043 aurelien 361 
		$ids_a_delier = array();
2101 jpm 362 
		foreach ($ids_mot_cle_et_enfants as $id) {
2043 aurelien 363 
			$ids_a_delier[] = $id['id_mot_cle'];
364 
		}
2101 jpm 365 
 
2043 aurelien 366 
		$ids_elements_lies = $this->obtenirIdElementsLiesPourIds($ids_a_delier);
367 
		$suppression_liaison = $this->supprimerToutesLiaisonsIdsMotsCles($ids_a_delier, $id_utilisateur);
368 
 
2101 jpm 369 
		foreach ($ids_elements_lies as $id_element_lie) {
2043 aurelien 370 
			self::regenererIndexTexteMotCle($id_element_lie['id_element_lie'], $this->mode);
371 
		}
2101 jpm 372 
 
2043 aurelien 373 
		// suppression du mot clé proprement dit ainsi que de ses enfants
374 
		$suppression = $this->supprimerMotCleEtEnfantsParId($id_mot_cle, $id_utilisateur);
2101 jpm 375 
 
2043 aurelien 376 
		return $suppression && $suppression_liaison;
377 
	}
2101 jpm 378 
 
2042 aurelien 379 
	public function supprimerMotCleEtEnfantsParId($id_mot_cle, $id_utilisateur) {
2101 jpm 380 
		$idMotCleP = Cel::db()->proteger($id_mot_cle);
2116 jpm 381 
		$requete = 'SELECT chemin '.
2101 jpm 382 
			"FROM {$this->table_mots_cles} ".
383 
			"WHERE id_mot_cle = $idMotCleP ".
384 
			' -- '.__FILE__.':'.__LINE__;
2116 jpm 385 
		$chemin = Cel::db()->requeter($requete);
2101 jpm 386 
 
2043 aurelien 387 
		$suppression = true;
2101 jpm 388 
		// vérification pour empecher la suppression accidentelle de tout l'arbre,
2060 aurelien 389 
		// cas qui ne devrait jamais arriver normalement
2101 jpm 390 
		if (!empty($chemin) && $chemin != '/') {
391 
			$chemin = $chemin[0]['chemin'];
392 
			$cheminP = Cel::db()->proteger($chemin.'%');
393 
			$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
2045 aurelien 394 
 
2101 jpm 395 
			$requete = "DELETE FROM {$this->table_mots_cles} ".
396 
				"WHERE chemin LIKE $cheminP ".
397 
				"AND id_utilisateur = $idUtilisateurP ".
398 
				' -- '.__FILE__.':'.__LINE__;;
399 
 
400 
			$suppression = Cel::db()->executer($requete);
2043 aurelien 401 
		}
2042 aurelien 402 
 
2043 aurelien 403 
		return ($suppression !== false);
2101 jpm 404 
 
2025 aurelien 405 
	}
2101 jpm 406 
 
2056 aurelien 407 
	public function obtenirIdsMotClesPourMotsCles($mots_cles, $id_utilisateur) {
2101 jpm 408 
		$motsClesP = Cel::db()->protegerTableau($mots_cles);
409 
		$listeMotsClesP = implode(',', $motsClesP);
410 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
2056 aurelien 411 
 
2101 jpm 412 
		$requete = 'SELECT id_mot_cle, mot_cle '.
413 
			"FROM {$this->table_mots_cles} ".
414 
			"WHERE mot_cle IN ($listeMotsClesP) ".
415 
			"AND id_utilisateur = $idUtilisateurP ".
416 
			' -- '.__FILE__.':'.__LINE__;
417 
 
418 
		$resultat = Cel::db()->executer($requete);
419 
		return $resultat;
2056 aurelien 420 
	}
2101 jpm 421 
 
2046 aurelien 422 
	public function obtenirIdElementsLiesPourChemins($chemins, $id_utilisateur) {
2101 jpm 423 
		foreach ($chemins as &$chemin) {
2042 aurelien 424 
			$chemin = Cel::db()->proteger(self::harmoniserChemin($chemin));
425 
		}
2101 jpm 426 
		$listeChemins = implode(',', $chemin);
427 
		$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
2042 aurelien 428 
 
2101 jpm 429 
		$requete = 'SELECT id_element_lie '.
430 
			"FROM {$this->table_liaison} AS cl INNER JOIN {$this->table_mots_cles} AS cm ".
431 
			"ON (".
432 
				"cm.id_mot_cle = cl.id_mot_cle ".
433 
				"AND chemin IN ($listeChemins) ".
434 
				"AND cm.id_utilisateur = $idUtilisateurP ".
435 
			") ".
436 
			' -- '.__FILE__.':'.__LINE__;
437 
 
438 
		$idsPourChemin = Cel::db()->executer($requete);
439 
 
440 
		return $idsPourChemin;
2042 aurelien 441 
	}
2101 jpm 442 
 
2042 aurelien 443 
	public function obtenirIdElementsLiesPourIds($ids_mots_cles) {
2101 jpm 444 
		$idsElementsLies = array();
445 
		if (!empty($ids_mots_cles)) {
446 
			$idsMotsClesP = Cel::db()->protegerTableau($ids_mots_cles);
447 
			$listeIdsMotsCles = implode(',', $idsMotsClesP);
448 
 
449 
			$requete = 'SELECT id_element_lie '.
450 
				"FROM {$this->table_liaison} ".
451 
				"WHERE id_mot_cle IN ($listeIdsMotsCles) ".
452 
				' -- '.__FILE__.':'.__LINE__;
453 
 
454 
 
455 
			$idsElementsLies = Cel::db()->executerRequete($requete);
2042 aurelien 456 
		}
2101 jpm 457 
		return $idsElementsLies;
458 
	}
2042 aurelien 459 
 
2101 jpm 460 
	/**
461 
	 *
2060 aurelien 462 
	 * Fonctions statiques utilitaires
2101 jpm 463 
	 * (Dans l'idéal toute la classe pourrait être statique car elle n'a
2060 aurelien 464 
	 * pas d'état (mais il faudrait passer $mode à toutes les fonctions)
2101 jpm 465 
	 *
2060 aurelien 466 
	 */
467 
	public static function getTablesMotsClesEtLiaisons($mode) {
2101 jpm 468 
		if ($mode == 'obs') {
2060 aurelien 469 
			$table_liaison = 'cel_mots_cles_obs_liaison';
470 
			$table_mots_cles = 'cel_arbre_mots_cles_obs';
471 
		} else {
472 
			$table_liaison = 'cel_mots_cles_images_liaison';
473 
			$table_mots_cles = 'cel_arbre_mots_cles_images';
474 
		}
475 
		return array($table_liaison, $table_mots_cles);
476 
	}
2101 jpm 477 
 
2043 aurelien 478 
	public static function regenererIndexTexteMotCle($id_element_lie, $mode) {
2101 jpm 479 
		$idElementLieP = Cel::db()->proteger($id_element_lie);
480 
		$sqlTpl = self::obtenirTemplateRequeteMotsClesTexte($mode);
481 
		$sousRequete = sprintf($sqlTpl, $idElementLieP);
2060 aurelien 482 
 
2101 jpm 483 
		list($table, $champId) = self::getNomTablesEtChampsElementsLies($mode);
484 
		$requete = "UPDATE $table ".
485 
			"SET mots_cles_texte = ($sousRequete) ".
486 
			"WHERE $champId = $idElementLieP ".
487 
			' -- '.__FILE__.':'.__LINE__;
488 
 
489 
		return Cel::db()->executer($requete);
2043 aurelien 490 
	}
2101 jpm 491 
 
2043 aurelien 492 
	private static function getNomTablesEtChampsElementsLies($mode) {
493 
		$tables = array();
2101 jpm 494 
		if ($mode == 'obs') {
495 
			$tables = array('cel_obs', 'id_observation');
2043 aurelien 496 
		} else {
2101 jpm 497 
			$tables = array('cel_images', 'id_image');
2043 aurelien 498 
		}
499 
		return $tables;
500 
	}
2101 jpm 501 
 
502 
	/**
503 
	 * Renvoie un template de requete pour selectionner la concatenation de mots clé
504 
	 * pour un element donné (utilisable avec sprintf)
505 
	 */
2060 aurelien 506 
	public static function obtenirTemplateRequeteMotsClesTexte($mode) {
507 
		list($table_liaison, $table_mots_cles) = self::getTablesMotsClesEtLiaisons($mode);
2042 aurelien 508 
 
2101 jpm 509 
		$requeteTpl = 'SELECT GROUP_CONCAT(mot_cle) '.
510 
			"FROM $table_mots_cles AS cm ".
511 
			"INNER JOIN $table_liaison AS cml ON cml.id_mot_cle = cm.id_mot_cle ".
512 
			'AND cml.id_element_lie = %s ';
513 
 
514 
		return $requeteTpl;
2042 aurelien 515 
	}
2101 jpm 516 
	/**
517 
	* Renvoie un template de recherche sur les ids de mots clés utilisables avec sprintf.
518 
	*/
2060 aurelien 519 
	public static function obtenirTemplateRequeteMotsClesIds($mode) {
520 
		list($table_liaison, $table_mots_cles) = self::getTablesMotsClesEtLiaisons($mode);
2101 jpm 521 
		$requeteTpl = "SELECT id_element_lie FROM $table_liaison WHERE id_mot_cle IN (%s) ";
522 
		return $requeteTpl;
2059 aurelien 523 
	}
2101 jpm 524 
 
525 
	// Fonctions utilitaires
2059 aurelien 526 
 
2101 jpm 527 
	/**
528 
	 * La profondeur d'un noeud est déterminée par le nombre de slashs
529 
	 * qu'il contient (étant donné que ceux ci sont interdits dans le texte du mot clé.
530 
	 */
2025 aurelien 531 
	static public function comparerProfNoeuds($a, $b) {
532 
		$nb_slashs_a = substr_count($a['chemin'], '/');
533 
		$nb_slashs_b = substr_count($a['chemin'], '/');
534 
		$cmp = 0;
2101 jpm 535 
 
536 
		if ($nb_slashs_a == $nb_slashs_b) {
2025 aurelien 537 
			$cmp = strcmp($a['chemin'], $b['chemin']);
538 
		} else {
539 
			$cmp = ($a['chemin'] > $b['chemin']) ? +1 : -1;
540 
		}
541 
		return $cmp;
542 
	}
2101 jpm 543 
 
2026 aurelien 544 
	static public function getCheminHarmonise($chemin_parent, $mot_cle) {
545 
		return self::harmoniserChemin($chemin_parent.'/'.self::simplifier($mot_cle).'/');
546 
	}
2101 jpm 547 
 
2026 aurelien 548 
	static public function harmoniserChemin($chemin) {
549 
		$chemin = self::startsWith($chemin,'/') ? $chemin : '/'.$chemin;
550 
		$chemin = self::endsWith($chemin,'/') ? $chemin : $chemin.'/';
2101 jpm 551 
		$chemin = str_replace('//', '/', $chemin);
552 
		return $chemin;
2026 aurelien 553 
	}
2101 jpm 554 
 
555 
	/**
556 
	 * Fonction de slugification du mot clé
557 
	 *
558 
	 * Ni slashes ou antislashes ou virgules (ce qui fausserait l'arbre ou bien les mots
559 
	 * clés texte dans les tables obs ou image)
560 
	 */
561 
	static public function simplifier($text) {
562 
		$caracteresASupprimer = array('\\','/', ',');
563 
		$text = str_replace($caracteresASupprimer, '', $text);
564 
		$text = trim($text);
565 
		return $text;
2025 aurelien 566 
	}
2101 jpm 567 
 
568 
	/**
569 
	 * Gardée pour compatibilité ancienne version (mais devrait être supprimée
570 
	 * dans le futur
571 
	 */
2060 aurelien 572 
	static function nettoyerMotsClesAvantSuppression($chaine) {
573 
		$valeur = str_replace('null', '', $chaine);
574 
		$valeur = trim($valeur, ';;');
575 
		return $valeur;
576 
	}
2101 jpm 577 
 
2026 aurelien 578 
	static public function startsWith($haystack, $needle) {
2101 jpm 579 
		return $needle === '' || strpos($haystack, $needle) === 0;
2026 aurelien 580 
	}
2101 jpm 581 
 
2026 aurelien 582 
	static public function endsWith($haystack, $needle) {
2101 jpm 583 
		return $needle === '' || substr($haystack, -strlen($needle)) === $needle;
2026 aurelien 584 
	}
2101 jpm 585 
 
2060 aurelien 586 
	/**
587 
	* Fonction utilisée pour importer les anciens mots clés saisis dans les widget dans un compte identifié
588 
	* Dans ce cas là, le widget remplit la case id_utilisateur par le mail indiqué lors de la saisie
589 
	* @param string $mail_utilisateur
590 
	* @param string $id_utilisateur
591 
	*/
592 
	public static function migrerMotsClesMailVersId($mail_utilisateur, $infos_utilisateur) {
593 
		return self::migrerLiaisonEtMotsCles($mail_utilisateur, $infos_utilisateur, 'obs') &&
594 
				self::migrerLiaisonEtMotsCles($mail_utilisateur, $infos_utilisateur, 'images');
595 
	}
2101 jpm 596 
 
597 
	/**
598 
	 * ATTENTION : cette fonction suppose que l'utilisateur n'ai pas déjà de mots clés dans le CEL
599 
	 * avec l'identifiant $id_utilisateur ce qui est normalement le cas
600 
	 * ça devrait normalement marcher correctement même s'il en a déjà mais ça n'a pas été testé
601 
	 */
602 
	private static function migrerLiaisonEtMotsCles($email_utilisateur, $infos_utilisateur, $mode) {
2060 aurelien 603 
		list($table_liaisons, $table_mots_cles) = self::getTablesMotsClesEtLiaisons($mode);
2101 jpm 604 
		$idUtilisateurP = Cel::db()->proteger($infos_utilisateur['id_utilisateur']);
605 
		$emailUtilisateurP = Cel::db()->proteger($email_utilisateur);
2060 aurelien 606 
 
2101 jpm 607 
		$requete_migration_mc = "UPDATE {$table_mots_cles} ".
608 
			"SET id_utilisateur = $idUtilisateurP ".
609 
			"WHERE id_utilisateur = $emailUtilisateurP ";
610 
 
611 
		$migration = Cel::db()->executerRequeteSimple($requete_migration_mc);
612 
		$migration = ($migration !== false) ? true : false;
613 
		return $migration;
2060 aurelien 614 
	}
2025 aurelien 615 
}
2101 jpm 616 
?>