Subversion Repositories eFlore/Applications.cel

Rev

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