Subversion Repositories eFlore/Applications.cel

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1504 aurelien 1
<?php
2
/**
3
* PHP Version 5
1565 jpm 4
* in=utf8
5
* out=utf8
1504 aurelien 6
*
7
* @category  PHP
8
* @package   jrest
9
* @author    Aurelien Peronnet <aurelien@tela-botanica.org>
10
* @copyright 2010 Tela-Botanica
11
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
12
* @version   SVN: <svn_id>
13
* @link      /doc/jrest/
14
*/
15
 
16
/**
17
* Classe de gestion de l'ajout, modification et suppression des champs supplémentaires des obs et images
1565 jpm 18
*/
1512 aurelien 19
class GestionChampsEtendus extends Cel {
1565 jpm 20
 
1504 aurelien 21
	private $mode = null;
1512 aurelien 22
	private $table_champs_etendus = null;
1504 aurelien 23
	private $champ_id = null;
1565 jpm 24
 
1512 aurelien 25
	public function GestionChampsEtendus($config, $mode) {
1504 aurelien 26
		parent::__construct($config);
27
		$this->mode = $mode;
1565 jpm 28
 
29
		if ($this->mode == 'obs') {
1504 aurelien 30
			$this->mode = 'obs';
1512 aurelien 31
			$this->table_champs_etendus = 'cel_obs_etendues';
1504 aurelien 32
			$this->champ_id = 'id_observation';
1565 jpm 33
		} else if ($this->mode == 'image') {
1504 aurelien 34
			$this->mode = 'image';
1512 aurelien 35
			$this->table_champs_etendus = 'cel_images_etendues';
1504 aurelien 36
			$this->champ_id = 'id_image';
37
		} else {
38
			throw new Exception('Mode inconnu, les modes autorisés sont "obs" et "image"');
1565 jpm 39
		}
1504 aurelien 40
	}
1565 jpm 41
 
1504 aurelien 42
	/**
43
	* Renvoie true ou false suivant que l'element indiqué possède une valeur
44
	* pour la clé indiquée
45
	*
46
	* @param int $id_element_lie
47
	* @param string $cle
48
	* @param string $valeur
49
	* @return bool
50
	*/
1565 jpm 51
	public function existe($id_element_lie, $cle) {
1765 raphael 52
		$id = Cel::db()->proteger($id_element_lie);
53
		$cle = Cel::db()->proteger($cle);
1565 jpm 54
		$requete = 'SELECT COUNT(*) >= 1 AS existe '.
55
			"FROM {$this->table_champs_etendus} ".
56
			"WHERE {$this->champ_id} = $id ".
57
			"	AND cle = $cle ";
1504 aurelien 58
 
2143 jpm 59
		$resultat = Cel::db()->requeter($requete);
1565 jpm 60
		return ($resultat[0]['existe'] == '1');
1504 aurelien 61
	}
1565 jpm 62
 
1504 aurelien 63
	/**
1512 aurelien 64
	* Renvoie tous les champs étendus associé à l'élément passé en paramètre
1504 aurelien 65
	*
66
	* @param int $id_element_lie
1565 jpm 67
	* @return array tableau associatif des champs de la table etendu
1504 aurelien 68
	*/
1565 jpm 69
	public function consulter($id_element_lie) {
1765 raphael 70
		$id = Cel::db()->proteger($id_element_lie);
1565 jpm 71
		$requete = "SELECT * FROM {$this->table_champs_etendus} WHERE {$this->champ_id} = $id ";
2143 jpm 72
		$resultat = Cel::db()->requeter($requete);
1504 aurelien 73
		return $resultat;
74
	}
1565 jpm 75
 
1504 aurelien 76
	/**
1565 jpm 77
	* Renvoie tous les champs étendus associés aux éléments passés en paramètre.
78
	* Retour sous forme de tableau associatif de tableau d'objets ChampEtendu.
79
	* Les objets ChampEtendu sont regroupés par id d'élement.
1504 aurelien 80
	*
1565 jpm 81
	* @param array $ids_element_lies tableau d'id des éléments liés (obs ou image).
82
	* @return array tableau associatif de tableau d'objets ChampEtendu.
1504 aurelien 83
	*/
1565 jpm 84
	public function consulterParLots(Array $ids_element_lies) {
1512 aurelien 85
		$champs_etendus_par_element = array();
1565 jpm 86
		if (!empty($ids_element_lies)) {
1765 raphael 87
			$ids_element_lies = array_map(array(Cel::db(), 'proteger'),$ids_element_lies);
1565 jpm 88
			$ids = implode(',', $ids_element_lies);
89
 
90
			$requete = "SELECT * FROM {$this->table_champs_etendus} WHERE {$this->champ_id} IN ($ids) ";
2143 jpm 91
			$resultats = Cel::db()->requeter($requete);
1565 jpm 92
 
1527 aurelien 93
			foreach ($resultats as &$ligne) {
94
				$id_element = $ligne[$this->champ_id];
1565 jpm 95
				if (!isset($champs_etendus_par_element[$id_element])) {
1527 aurelien 96
					$champs_etendus_par_element[$id_element] = array();
97
				}
1565 jpm 98
				$champ_etendu = new ChampEtendu();
99
				$champ_etendu->id = $id_element;
100
				$champ_etendu->cle = $ligne['cle'];
101
				$champ_etendu->valeur = $ligne['valeur'];
102
 
103
				$champs_etendus_par_element[$id_element][] = $champ_etendu;
1504 aurelien 104
			}
105
		}
1512 aurelien 106
		return $champs_etendus_par_element;
1504 aurelien 107
	}
1565 jpm 108
 
1504 aurelien 109
	/**
1565 jpm 110
	 * Ajoute un champ étendu.
111
	 * Si la clé existe déjà, seule valeur du champ est mise à jour
1504 aurelien 112
	 *
1565 jpm 113
	 * @param ChampEtendu $champ_etendu
114
	 * @return bool true si l'ajout a eu lieu
1504 aurelien 115
	 */
1565 jpm 116
	public function ajouter(ChampEtendu $champ_etendu) {
1765 raphael 117
		$id = Cel::db()->proteger($champ_etendu->id);
118
		$cle = Cel::db()->proteger($champ_etendu->cle);
119
		$valeur = Cel::db()->proteger($champ_etendu->valeur);
1504 aurelien 120
 
1565 jpm 121
		$requete = "INSERT INTO {$this->table_champs_etendus} ".
2394 aurelien 122
			"( {$this->champ_id}, cle, valeur) ".
123
			"VALUES ($id, $cle, $valeur) ".
1565 jpm 124
			"ON DUPLICATE KEY UPDATE valeur = VALUES(valeur)";
125
 
1504 aurelien 126
		// la partie on duplicate key est spécifique mysql mais il sera facile de s'en passer le jour
127
		// où l'on change de sgbd
2143 jpm 128
		$ajout = Cel::db()->executer($requete);
1504 aurelien 129
		return ($ajout !== false);
130
	}
1565 jpm 131
 
1504 aurelien 132
	/**
1903 raphael 133
     * Ajoute plusieurs champs étendus à la fois.
134
     * Si la clé existe déjà, seule la valeur du champ est mise à jour
135
     *
136
     * @param array $champs_etendus tableau d'objets ChampEtendu
137
     * @return bool true si l'ajout a eu lieu
138
     */
1565 jpm 139
	public function ajouterParLots(Array $champs_etendus) {
1903 raphael 140
        if(! $champs_etendus) return TRUE; // le tableau ... vide à été inséré
141
 
1504 aurelien 142
		$lignes = array();
1565 jpm 143
		foreach ($champs_etendus as $champ_etendu) {
1765 raphael 144
			$id = Cel::db()->proteger($champ_etendu->id);
145
			$cle = Cel::db()->proteger($champ_etendu->cle);
146
			$valeur = Cel::db()->proteger($champ_etendu->valeur);
1565 jpm 147
 
2394 aurelien 148
			$lignes[] = "($id, $cle, $valeur)";
1504 aurelien 149
		}
150
 
151
		// la partie on duplicate key est spécifique mysql mais il sera facile de s'en passer le jour
152
		// où l'on change de sgbd
2143 jpm 153
		$ajout = Cel::db()->executer(sprintf(
2394 aurelien 154
            "INSERT INTO %s (%s, cle, valeur) VALUES %s ON DUPLICATE KEY UPDATE valeur = VALUES(valeur) -- %s:%d",
1903 raphael 155
            $this->table_champs_etendus,
156
            $this->champ_id,
157
            implode(',', $lignes),
158
            __FILE__, __LINE__));
1504 aurelien 159
		return ($ajout !== false);
160
	}
1565 jpm 161
 
1504 aurelien 162
	/**
1512 aurelien 163
	 * Modifie un champ étendu associé à l'élément passé en paramètre
1504 aurelien 164
	 *
1565 jpm 165
	 * @param ChampEtendu $champ_etendu
166
	 * @return bool true si la modification a eu lieu
1504 aurelien 167
	 */
1565 jpm 168
	public function modifier(ChampEtendu $champ_etendu) {
1765 raphael 169
		$id = Cel::db()->proteger($champ_etendu->id);
170
		$cle = Cel::db()->proteger($champ_etendu->cle);
171
		$valeur = Cel::db()->proteger($champ_etendu->valeur);
1565 jpm 172
 
173
		$requete = "UPDATE {$this->table_champs_etendus} ".
2394 aurelien 174
			"SET valeur = $valeur ".
1565 jpm 175
			"WHERE cle = $cle".
176
			"	AND {$this->champ_id} = $id ";
177
 
2143 jpm 178
		$modif = Cel::db()->executer($requete);
1504 aurelien 179
		return ($modif !== false);
180
	}
1565 jpm 181
 
1504 aurelien 182
	/**
1565 jpm 183
	* Supprime le champ champ étendu associé à l'élément et au nom de clé passés en paramètre
1504 aurelien 184
	*
185
	* @param int $id_element_lie
186
	* @param string $cle
187
	* @return bool
188
	*/
1565 jpm 189
	public function supprimer($id_element_lie, $cle) {
1765 raphael 190
		$id = Cel::db()->proteger($id_element_lie);
191
		$cle = Cel::db()->proteger($cle);
1565 jpm 192
		$requete = "DELETE FROM {$this->table_champs_etendus} WHERE cle = $cle AND {$this->champ_id} = $id ";
2143 jpm 193
		$suppr = Cel::db()->executer($requete);
1504 aurelien 194
		return ($suppr !== false);
195
	}
1565 jpm 196
 
1504 aurelien 197
	/**
1512 aurelien 198
	* Supprime tous les champs champ étendu associés à l'élément passés en paramètre
1504 aurelien 199
	*
200
	* @param int $id_element_lie
201
	* @return bool
202
	*/
1565 jpm 203
	public function vider($id_element_lie) {
1765 raphael 204
		$id = Cel::db()->proteger($id_element_lie);
1565 jpm 205
		$requete = "DELETE FROM {$this->table_champs_etendus} WHERE {$this->champ_id} = $id ";
2143 jpm 206
		$suppr = Cel::db()->executer($requete);
1504 aurelien 207
		return ($suppr !== false);
208
	}
1574 jpm 209
 
1569 aurelien 210
	/**
211
	* Supprime tous les champs champ étendu associés aux éléments passés en paramètre
212
	*
213
	* @param array $ids_elements_lies
214
	* @return bool
215
	*/
216
	public function viderParLots($ids_elements_lies) {
217
		$ids = $this->protegerTableau($ids_elements_lies);
218
		$requete = "DELETE FROM {$this->table_champs_etendus} WHERE {$this->champ_id} IN (".implode(',',$ids).") ";
2143 jpm 219
		$suppr = Cel::db()->executer($requete);
1569 aurelien 220
		return ($suppr !== false);
221
	}
2143 jpm 222
 
1659 aurelien 223
	/**
224
	* Revnoie tous les intitules aux éléments passés en paramètre
225
	*
226
	* @param array $ids_elements_lies
227
	* @return bool
228
	*/
229
	public function consulterClesParLots($ids_elements_lies) {
230
		$cles_fmt = array();
1686 aurelien 231
		if(!empty($ids_elements_lies)) {
232
			$ids = $this->protegerTableau($ids_elements_lies);
233
			$requete = "SELECT cle FROM {$this->table_champs_etendus} WHERE {$this->champ_id} IN (".implode(',',$ids).") ";
2143 jpm 234
			$cles = Cel::db()->requeter($requete);
1738 raphael 235
			$i = 0;
1686 aurelien 236
			foreach($cles as &$cle) {
1738 raphael 237
				$cles_fmt[$cle['cle']] = $i++;
1686 aurelien 238
			}
1659 aurelien 239
		}
1738 raphael 240
		return array_values(array_flip($cles_fmt));
1659 aurelien 241
	}
2143 jpm 242
 
2038 aurelien 243
	/**
244
	 * Renvoie la liste des groupes de champs étendus
245
	 */
246
	public function consulterGroupesChampsEtendusPredefinis() {
247
		$groupes = array();
2403 aurelien 248
		$requete =  "SELECT cc.cle as cle_groupe, cc.label as nom_groupe, ccc.cle as cle_champ, ccc.label as label_champ, ccc.invisible, ccc.prive ".
2394 aurelien 249
					"FROM `cel_catalogue_champs_etendus` cc ".
250
					"INNER JOIN cel_catalogue_champs_etendus_liaison cl ON cc.cle = cl.groupe ".
251
					"INNER JOIN cel_catalogue_champs_etendus ccc ON ccc.cle = cl.champ";
2143 jpm 252
 
2394 aurelien 253
		$groupes_champs = Cel::db()->executerRequete($requete);
254
 
255
		$cle_groupe = "";
256
		$infos_groupe = null;
257
 
258
		foreach ($groupes_champs as $groupe_champ) {
259
			// les champs sont ordonnés par groupe, ce qui permet de les assembler
260
			// séquentiellement en créeant un nouveau groupe lorsque la clé
261
			// de groupe du champ actuel est différénte de la précédente
262
			if($cle_groupe != $groupe_champ['cle_groupe']) {
263
				if($infos_groupe != null) {
264
					$groupes[] = $infos_groupe;
265
				}
266
				$infos_groupe = array();
267
				$cle_groupe = $groupe_champ['cle_groupe'];
2038 aurelien 268
			}
2394 aurelien 269
 
270
			if(empty($infos_groupe)) {
271
				$infos_groupe = array(
272
									'cle' => $groupe_champ['cle_groupe'],
273
									'nom' => $groupe_champ['nom_groupe'],
274
									'champs' => array()
275
								);
276
			}
277
 
278
			$infos_groupe['champs'][] = array(
279
											'cle'	=> $groupe_champ['cle_champ'],
280
											'label' => $groupe_champ['label_champ'],
2403 aurelien 281
											'options' => array('invisible' => $groupe_champ['invisible'],
282
														 		'prive'	=> $groupe_champ['prive']
283
													)
2394 aurelien 284
										);
285
		}
286
 
287
		// Ajout du dernier groupe, qui serait ignoré sinon, étant donné que l'ajout
288
		// au tableau se fait au début de la boucle
289
		//TODO: voir si on ne peut pas simplifier ça
290
		if(!empty($infos_groupe)) {
291
			$groupes[] = $infos_groupe;
292
		}
293
 
2038 aurelien 294
		return $groupes;
295
	}
2394 aurelien 296
 
297
	/**
298
	 * Renvoie le catalogue des champs étendus
299
	 */
300
	public function consulterCatalogueChampsEtendusPredefinis($ordonner_par_cle = false) {
2403 aurelien 301
		$requete =  "SELECT cle, label, invisible, prive ".
2394 aurelien 302
					"FROM cel_catalogue_champs_etendus cc ";
303
 
304
		$catalogue = Cel::db()->executerRequete($requete);
305
		$infos_champs = array();
306
 
307
		foreach ($catalogue as $champ) {
308
			$champ_fmt = array(
309
				'cle'	=> $champ['cle'],
310
				'label' => $champ['label'],
2403 aurelien 311
				'options' => array('invisible' => $champ['invisible'],
312
									'prive'	=> $champ['prive']
313
							)
2394 aurelien 314
			);
315
			if($ordonner_par_cle) {
316
				$infos_champs[$champ_fmt['cle']] = $champ_fmt;
317
			} else {
318
				$infos_champs[] = $champ_fmt;
319
			}
320
		}
321
		return $infos_champs;
322
	}
1565 jpm 323
 
324
	/**
325
	 * Transforme un label en clé.
326
	 * Supprime tous les accents et caractères spéciaux.
327
	 * Accole les mots pour créer un chatmot.
328
	 *
329
	 * @param string le label.
330
	 * @return string la clé correspondante
331
	 */
332
	public function transformerLabelEnCle($label) {
2403 aurelien 333
		//TODO: cette fonction est elle encore pertinente
334
		// maintenant que la notion de label est supprimée ?
1565 jpm 335
		$cle = strtolower(trim($label));
336
 
337
		// Suppression des mots inutiles
338
		$mots_a_remplacer = array(' le ', ' la ', ' les ', ' des ', ' de ', " l'", " d'", ' à ', ' au ');
339
		$cle = str_replace($mots_a_remplacer, ' ', $cle);
340
 
341
		// Remplacement parenthèses et crochets et leurs contenus
342
		$cle = preg_replace('/\([^)]+\)/', '', $cle);
343
		$cle = preg_replace('/\[[^\]]+\]/', '', $cle);
344
 
345
		// Remplacement des accents (voir : http://www.weirdog.com/blog/php/supprimer-les-accents-des-caracteres-accentues.html )
346
		$cle = htmlentities($cle, ENT_NOQUOTES, 'utf-8');
347
		$cle = preg_replace('/&([A-za-z])(?:acute|cedil|circ|grave|orn|ring|slash|th|tilde|uml);/', '\1', $cle);
348
		$cle = preg_replace('/&([A-za-z]{2})(?:lig);/', '\1', $cle); // pour les ligatures e.g. '&oelig;'
349
		$cle = preg_replace('/&[^;]+;/', '', $cle); // supprime les autres caractères
350
 
351
		// Suppression définitive de tout ce qui n'est pas ASCII
1574 jpm 352
		$cle = preg_replace('/[^a-zA-Z0-9 ]/', ' ', $cle);
353
		$cle = preg_replace('/\s+/', ' ', $cle);
1565 jpm 354
 
355
		// Accollement des mots
356
		$cle = ucwords($cle);
357
		$cle = str_replace(' ', '', $cle);
1574 jpm 358
		$cle{0} = strtolower($cle{0});
1565 jpm 359
 
360
		return $cle;
361
	}
1504 aurelien 362
}
363
?>