Subversion Repositories eFlore/Applications.cel

Rev

Details | 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
 
2143 jpm 57
		$ids_enfants = Cel::db()->requeter($requete);
2101 jpm 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
 
2143 jpm 73
		$infosMotCle = Cel::db()->requeter($requete);
2101 jpm 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);
2143 jpm 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);
2143 jpm 145
 
2101 jpm 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);
2143 jpm 190
 
2101 jpm 191
		$requete = "DELETE FROM {$this->table_liaison} ".
192
			"WHERE $clauseWhere ".
193
			' -- '.__FILE__.':'.__LINE__;
2143 jpm 194
 
2101 jpm 195
		$suppression = Cel::db()->executer($requete);
2042 aurelien 196
		return $suppression;
197
	}
2101 jpm 198
 
2058 aurelien 199
	public function supprimerToutesLiaisonsPourIdsElementsLies($ids_elements_lies) {
2143 jpm 200
		$idsElementsLiesP = Cel::db()->proteger($ids_elements_lies);
2101 jpm 201
		$listeIds = implode(',', $idsElementsLiesP);
2143 jpm 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)) {
2143 jpm 215
			$idsMotsClesP = Cel::db()->proteger($ids_mots_cles);
2101 jpm 216
			$listeIds = implode(',', $idsMotsClesP);
2143 jpm 217
 
2101 jpm 218
			$requete = "DELETE FROM {$this->table_liaison} ".
219
				"WHERE id_mot_cle IN ($listeIds) ".
220
				' -- '.__FILE__.':'.__LINE__;
221
 
2143 jpm 222
			$suppression = Cel::db()->executer($requete);
2101 jpm 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.
2143 jpm 230
	 *
2101 jpm 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);
2143 jpm 236
 
2101 jpm 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
 
2143 jpm 245
		$suppression_liaison = Cel::db()->executer($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
 
2143 jpm 287
	/**
2101 jpm 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);
2143 jpm 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) {
2143 jpm 408
		$motsClesP = Cel::db()->proteger($mots_cles);
2101 jpm 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__;
2143 jpm 417
 
2101 jpm 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);
2143 jpm 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)) {
2143 jpm 446
			$idsMotsClesP = Cel::db()->proteger($ids_mots_cles);
2101 jpm 447
			$listeIdsMotsCles = implode(',', $idsMotsClesP);
2143 jpm 448
 
2101 jpm 449
			$requete = 'SELECT id_element_lie '.
450
				"FROM {$this->table_liaison} ".
451
				"WHERE id_mot_cle IN ($listeIdsMotsCles) ".
452
				' -- '.__FILE__.':'.__LINE__;
453
 
2143 jpm 454
 
455
			$idsElementsLies = Cel::db()->requeter($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
	/**
2143 jpm 503
	 * Renvoie un template de requete pour selectionner la concatenation de mots clé
2101 jpm 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);
2143 jpm 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 ';
2143 jpm 513
 
2101 jpm 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
2143 jpm 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);
2149 aurelien 552
		// mise en minuscule du chemin afin d'éviter des cas où l'on aurait
553
		// des même mots clés avec minuscule et majuscule
554
		$chemin = strtolower($chemin);
2101 jpm 555
		return $chemin;
2026 aurelien 556
	}
2101 jpm 557
 
2143 jpm 558
	/**
2101 jpm 559
	 * Fonction de slugification du mot clé
2143 jpm 560
	 *
2101 jpm 561
	 * Ni slashes ou antislashes ou virgules (ce qui fausserait l'arbre ou bien les mots
562
	 * clés texte dans les tables obs ou image)
563
	 */
564
	static public function simplifier($text) {
565
		$caracteresASupprimer = array('\\','/', ',');
566
		$text = str_replace($caracteresASupprimer, '', $text);
2149 aurelien 567
		$text = strtolower(trim($text));
2101 jpm 568
		return $text;
2025 aurelien 569
	}
2101 jpm 570
 
2143 jpm 571
	/**
2101 jpm 572
	 * Gardée pour compatibilité ancienne version (mais devrait être supprimée
573
	 * dans le futur
574
	 */
2060 aurelien 575
	static function nettoyerMotsClesAvantSuppression($chaine) {
576
		$valeur = str_replace('null', '', $chaine);
577
		$valeur = trim($valeur, ';;');
578
		return $valeur;
579
	}
2101 jpm 580
 
2026 aurelien 581
	static public function startsWith($haystack, $needle) {
2101 jpm 582
		return $needle === '' || strpos($haystack, $needle) === 0;
2026 aurelien 583
	}
2101 jpm 584
 
2026 aurelien 585
	static public function endsWith($haystack, $needle) {
2101 jpm 586
		return $needle === '' || substr($haystack, -strlen($needle)) === $needle;
2026 aurelien 587
	}
2101 jpm 588
 
2060 aurelien 589
	/**
590
	* Fonction utilisée pour importer les anciens mots clés saisis dans les widget dans un compte identifié
591
	* Dans ce cas là, le widget remplit la case id_utilisateur par le mail indiqué lors de la saisie
592
	* @param string $mail_utilisateur
593
	* @param string $id_utilisateur
594
	*/
595
	public static function migrerMotsClesMailVersId($mail_utilisateur, $infos_utilisateur) {
596
		return self::migrerLiaisonEtMotsCles($mail_utilisateur, $infos_utilisateur, 'obs') &&
597
				self::migrerLiaisonEtMotsCles($mail_utilisateur, $infos_utilisateur, 'images');
598
	}
2101 jpm 599
 
600
	/**
601
	 * ATTENTION : cette fonction suppose que l'utilisateur n'ai pas déjà de mots clés dans le CEL
602
	 * avec l'identifiant $id_utilisateur ce qui est normalement le cas
603
	 * ça devrait normalement marcher correctement même s'il en a déjà mais ça n'a pas été testé
604
	 */
605
	private static function migrerLiaisonEtMotsCles($email_utilisateur, $infos_utilisateur, $mode) {
2060 aurelien 606
		list($table_liaisons, $table_mots_cles) = self::getTablesMotsClesEtLiaisons($mode);
2101 jpm 607
		$idUtilisateurP = Cel::db()->proteger($infos_utilisateur['id_utilisateur']);
608
		$emailUtilisateurP = Cel::db()->proteger($email_utilisateur);
2143 jpm 609
 
2101 jpm 610
		$requete_migration_mc = "UPDATE {$table_mots_cles} ".
611
			"SET id_utilisateur = $idUtilisateurP ".
612
			"WHERE id_utilisateur = $emailUtilisateurP ";
613
 
2143 jpm 614
		$migration = Cel::db()->executer($requete_migration_mc);
2101 jpm 615
		$migration = ($migration !== false) ? true : false;
616
		return $migration;
2060 aurelien 617
	}
2025 aurelien 618
}
2101 jpm 619
?>