Subversion Repositories eFlore/Applications.cel

Rev

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

Rev Author Line No. Line
3193 delphine 1
<?php
2
// declare(encoding='UTF-8');
3
/**
4
 * Classe de gestion de l'ajout, modification et suppression des champs supplémentaires des obs et images dans la nouvelle bd.
5
 *
6
 * @internal   Mininum PHP version : 5.2
7
 * @category   CEL
8
 * @package    Services
9
 * @subpackage Bibliothèques
10
 * @version    0.1
11
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
12
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
13
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
14
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
15
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
16
 */
17
class GestionChampsEtendus2 extends Cel {
18
 
19
	private $table_champs_etendus = "extended_field";
20
	private $table_champs_etendus_trad = "extendedfield_translation";
21
	private $champ_id = "field_id";
3541 delphine 22
	private $liste_champs = "ce.`id`, ce.`project`,ce.`project_id`, ce.field_id, ce.`data_type`, ce.`is_mandatory`, ce.`unit`, ".
3238 delphine 23
				"cet.extended_field_id, cet.`label`, cet.`description`, cet.`default_value`, cet.`error_message`, cet.`language_iso_code`, cet.`help` ";
3193 delphine 24
 
25
 
3473 killian 26
	public function __construct($config) {
3193 delphine 27
		parent::__construct($config);
28
 
29
	}
30
 
31
	/**
32
	* Renvoie true ou false suivant que l'element indiqué possède une valeur
33
	* pour la clé indiquée
34
	*
35
	* @param int $id_element_lie
36
	* @param string $cle
37
	* @param string $valeur
38
	* @return bool
39
	*/
40
	public function existe($id_element_lie, $cle) {
41
		$id = Cel::db()->proteger($id_element_lie);
42
		$cle = Cel::db()->proteger($cle);
43
		$requete = 'SELECT COUNT(*) >= 1 AS existe '.
44
			"FROM {$this->table_champs_etendus} ".
45
			"WHERE {$this->champ_id} = $id ".
3478 delphine 46
			"	AND cle = $ce.field_id ".
3193 delphine 47
			' -- '.__FILE__.':'.__LINE__;;
48
 
49
		$resultat = Cel::db()->requeter($requete);
50
		return ($resultat[0]['existe'] == '1');
51
	}
52
 
53
	/**
54
	* Renvoie tous les champs étendus associé à l'élément passé en paramètre
55
	*
56
	* @param int $id_element_lie
57
	* @return array tableau associatif des champs de la table etendu
58
	*/
59
	public function consulter($id_element_lie, $langue = "fr") {
3579 delphine 60
		$requete = "SELECT {$this->liste_champs} ".
3193 delphine 61
				"FROM {$this->table_champs_etendus} ce ".
62
				"INNER JOIN {$this->table_champs_etendus_trad} cet ON ce.field_id = cet.extended_field_id ".
63
				"WHERE cet.language_iso_code = '".$langue."' AND ";
3578 delphine 64
		($id_element_lie != "") ? $requete .= " {$this->champ_id} = ".Cel::db()->proteger($id_element_lie) : "";
3193 delphine 65
		$requete .= ' -- '.__FILE__.':'.__LINE__;
66
		$resultat = Cel::db()->requeter($requete);
67
		return $resultat;
68
	}
3476 delphine 69
 
3469 delphine 70
	/**
3478 delphine 71
	 * A créer voir ajouterParProjet
3193 delphine 72
	 *
73
	 *
74
	 */
75
	public function ajouter($parametres) {
3478 delphine 76
 
77
		return false;
3193 delphine 78
	}
79
 
80
	/**
81
	 * Ajoute plusieurs champs étendus à la fois.
82
	 * Si la clé existe déjà, seule la valeur du champ est mise à jour
83
	 *
84
	 * @param array $champs_etendus tableau d'objets ChampEtendu
85
	 * @return bool true si l'ajout a eu lieu
86
	 */
87
	public function ajouterParProjet(Array $champs_etendus) {
88
		if (! $champs_etendus) return TRUE; // le tableau ... vide à été inséré
89
		// ajout dans la table extended_field
90
		$ajout_ce = "INSERT INTO extended_field ";
91
		$ajout_ce .= " (`".implode("`, `", array_keys($champs_etendus['ce'][0]))."`)";
92
 
93
		$lignes = array();
94
		foreach ($champs_etendus['ce'] as $champ_etendu) {
95
			$lignes[] = "('".implode("', '", $champ_etendu)."')";
96
		}
97
		$ajout_ce = Cel::db()->executer($ajout_ce." VALUES ".implode(", ",$lignes));
98
 
99
		// ajout dans extendedfield_trad
100
		$ajout_cet = "INSERT INTO extendedfield_translation ";
101
		$ajout_cet .= " (`".implode("`, `", array_keys($champs_etendus['cet'][0]))."`)";
102
 
103
		$lignes = array();
104
		foreach ($champs_etendus['cet'] as $champ_etendu) {
105
			$lignes[] = "('".implode("', '", $champ_etendu)."')";
106
		}
107
		$ajout_cet = Cel::db()->executer($ajout_cet." VALUES ".implode(", ",$lignes));
108
 
109
		return ($ajout_cet !== false);
110
	}
111
 
112
	/**
113
	 * Modifie un champ étendu associé à l'élément passé en paramètre
114
	 *
115
	 * @param ChampEtendu $champ_etendu
116
	 * @return bool true si la modification a eu lieu
117
	 */
118
	public function modifier(ChampEtendu $champ_etendu) {
119
		$id = Cel::db()->proteger($champ_etendu->id);
120
		$cle = Cel::db()->proteger($champ_etendu->cle);
121
		$valeur = Cel::db()->proteger($champ_etendu->valeur);
122
 
123
		$requete = "UPDATE {$this->table_champs_etendus} ".
124
			"SET valeur = $valeur ".
125
			"WHERE cle = $cle".
126
			"	AND {$this->champ_id} = $id ".
127
			' -- '.__FILE__.':'.__LINE__;
128
		$modif = Cel::db()->executer($requete);
129
		return ($modif !== false);
130
	}
3883 delphine 131
 
132
	/**
133
	 * Modifie un champ étendu associé à l'élément passé en paramètre
134
	 *
135
	 * @param ChampEtendu $champ_etendu
136
	 * @return bool true si la modification a eu lieu
137
	 */
3884 delphine 138
	public function modifierParProjet(Array $champs_etendus) {
3883 delphine 139
	    if (! $champs_etendus) return TRUE; // le tableau ... vide à été inséré
140
	    // pour chaque champ étendu
141
	    foreach ($champs_etendus['ce'] as $num_champ => $champ_etendu) {
142
	        $modif_ce = "UPDATE {$this->table_champs_etendus} ce join {$this->table_champs_etendus_trad} cet";
143
	        $modif_ce .= "on field_id = `extended_field_id` and ce.`project` = cet.`project` and ".
144
	   	        "`language_iso_code` = ";
145
	        // pour chaque valeur de la table extended_field
146
	        foreach ($champs_etendus['ce'][0] as $num_colonne => $colonne) {
147
	            $modif_ce .= "ce.".$num_colonne." = ".Cel::db()->proteger($champ_etendu[$num_colonne]).", ";
148
	        }
149
	        // pour chaque valeur de la table extended_field_traduction
150
	        foreach ($champs_etendus['cet'][0] as $num_colonne_t => $colonne_t) {
3885 delphine 151
	            $modif_ce .= "cet.".$num_colonne_t." = ".Cel::db()->proteger($champs_etendus[$cet][$num_champ][$num_colonne_t]).", ";
3883 delphine 152
	        }
3885 delphine 153
	        $modif_ce = rtrim($modif_ce, ", ");
3883 delphine 154
	        $modif_ce .= " WHERE  ce.{$this->champ_id} = ".Cel::db()->proteger($champ_etendu['field_id']);
155
	        $modif_ce .= " AND project = ".Cel::db()->proteger($champ_etendu['project']).";";
156
	        $modif = Cel::db()->executer($modif_ce);
157
	    }
158
	    return ($modif !== false);
159
	}
160
 
3193 delphine 161
 
162
	/**
163
	* Supprime le champ champ étendu associé à l'élément et au nom de clé passés en paramètre
164
	*
165
	* @param int $id_element_lie
166
	* @param string $cle
167
	* @return bool
168
	*/
169
	public function supprimer($id_element_lie, $cle) {
170
		$id = Cel::db()->proteger($id_element_lie);
171
		$cle = Cel::db()->proteger($cle);
172
		$requete = "DELETE FROM {$this->table_champs_etendus} ".
173
			"WHERE cle = $cle ".
174
			"AND {$this->champ_id} = $id ".
175
			' -- '.__FILE__.':'.__LINE__;
176
		$suppr = Cel::db()->executer($requete);
177
		return ($suppr !== false);
178
	}
179
 
180
	/**
181
	* Supprime tous les champs champ étendu associés à l'élément passés en paramètre
182
	*
183
	* @param int $id_element_lie
184
	* @return bool
185
	*/
186
	public function vider($id_element_lie) {
187
		$id = Cel::db()->proteger($id_element_lie);
188
		$requete = "DELETE FROM {$this->table_champs_etendus} ".
189
			"WHERE {$this->champ_id} = $id ".
190
			' -- '.__FILE__.':'.__LINE__;
191
		$suppr = Cel::db()->executer($requete);
192
		$requete = "DELETE FROM {$this->table_champs_etendus_trad} ".
193
				"WHERE {$this->champ_id} = $id ".
194
				' -- '.__FILE__.':'.__LINE__;
195
		$suppr = Cel::db()->executer($requete);
196
		return ($suppr !== false);
197
	}
198
 
199
 
200
 
201
	/**
202
	 * Renvoie les champs étendus d'un projet
203
	 */
204
	public function consulterProjetChampsEtendus($projet = "", $langue = 'fr') {
3727 delphine 205
	    if ($projet !== "") {
206
	        $requeteProjetType = "SELECT type FROM `project_settings` WHERE `project` = '".$projet."';";
207
	        $resultat = Cel::db()->executerRequete($requeteProjetType);
208
	        if ($resultat == array() || $resultat[0]['type'] == "") {
209
	            $requeteProjet = " AND ce.project = '".$projet."' AND cet.project = '".$projet."' ";
210
	        } else {
211
	            $type = $resultat[0]['type'];
212
	            $requeteProjet = " AND ce.project = '".$type."' AND cet.project = '".$type."' ";
213
	        }
214
	    } else {
215
	        $requeteProjet = "";
216
	    }
3193 delphine 217
		$groupes = array();
218
		$requete =  "SELECT {$this->liste_champs} ".
219
			"FROM {$this->table_champs_etendus} ce ".
220
			"INNER JOIN {$this->table_champs_etendus_trad} cet ON ce.field_id = cet.extended_field_id AND ce.project = cet.project ".
3727 delphine 221
			"WHERE cet.language_iso_code = '".$langue."' ".$requeteProjet;
3193 delphine 222
		$requete .= ' -- '.__FILE__.':'.__LINE__; //echo $requete;exit;
223
		$groupes_champs = Cel::db()->executerRequete($requete);
224
 
225
		return $groupes_champs;
226
	}
227
 
3478 delphine 228
	/**
229
	 * Formate de la même façon que l'ancien service les données de consulterProjetChampsEtendus
230
	 */
231
	public function consulterGroupesChampsEtendusPredefinis($groupe = "", $langue = 'fr') {
232
	    $groupes = array();
233
	    $groupes_champs = $this->consulterProjetChampsEtendus($groupe, $langue);
234
 
235
	    $cle_groupe = '';
236
	    $infos_groupe = null;
237
 
238
	    foreach ($groupes_champs as $groupe_champ) {
239
	        // les champs sont ordonnés par groupe, ce qui permet de les assembler
240
	        // séquentiellement en créeant un nouveau groupe lorsque la clé
241
	        // de groupe du champ actuel est différénte de la précédente
3541 delphine 242
	        if ($cle_groupe != $groupe_champ['project']) {
3478 delphine 243
	            if($infos_groupe != null) {
244
	                $groupes[] = $infos_groupe;
245
	            }
246
	            $infos_groupe = array();
3541 delphine 247
	            $cle_groupe = $groupe_champ['project'];
3478 delphine 248
	        }
249
 
250
	        if (empty($infos_groupe)) {
251
	            $infos_groupe = array(
3541 delphine 252
	                'cle' => $groupe_champ['project_id'],
253
	                'nom' => $groupe_champ['project'],
3478 delphine 254
	                'champs' => array()
255
	            );
256
	        }
257
 
3541 delphine 258
	        $infos_groupe['champs'][$groupe_champ['field_id']] = array(
259
	            'id'	=> $groupe_champ['id'],
260
	            'cle'	=> $groupe_champ['field_id'],
261
	            'label' => $groupe_champ['label'],
3478 delphine 262
	            'type' => $groupe_champ['type_champ'],
263
	            'valeur' => $groupe_champ['valeur_champ'],
264
	            'options' => array(
265
	                'invisible' => $groupe_champ['invisible'],
266
	                'prive'	=> $groupe_champ['prive'])
267
	        );
268
	    }
269
 
270
	    // Ajout du dernier groupe, qui serait ignoré sinon, étant donné que l'ajout
271
	    // au tableau se fait au début de la boucle
272
	    //TODO: voir si on ne peut pas simplifier ça
273
	    if (!empty($infos_groupe)) {
274
	        $groupes[] = $infos_groupe;
275
	    }
276
 
277
	    return $groupes;
278
	}
279
 
280
	/**
281
	 * Renvoie le catalogue des champs étendus
282
	 */
283
	public function consulterCatalogueChampsEtendusPredefinis($ordonner_par_cle = false, $groupe = "") {
3538 delphine 284
	    $requete =  'SELECT ce.id as id, ce.field_id as cle, cet.`label` as label, "0" as invisible, "0" as prive '.
3488 delphine 285
	   	    "FROM {$this->table_champs_etendus} ce ".
286
			"INNER JOIN {$this->table_champs_etendus_trad} cet ON ce.field_id = cet.extended_field_id ";
287
	    if ($groupe !== "") $requete .= " WHERE project = ".$groupe;
3478 delphine 288
	    $requete .= ' -- '.__FILE__.':'.__LINE__;
289
	    $catalogue = Cel::db()->executerRequete($requete);
290
 
291
	    $infos_champs = array();
292
	    if ($catalogue != false) {
293
	        foreach ($catalogue as $champ) {
294
	            $champ_fmt = array(
3538 delphine 295
	                'id'	=> $champ['id'],
3478 delphine 296
	                'cle'	=> $champ['cle'],
297
	                'label' => $champ['label'],
298
	                'options' => array(
3487 delphine 299
	                    'invisible' => "0",
300
	                    'prive'	=> "0")
3478 delphine 301
	            );
302
	            if ($ordonner_par_cle) {
303
	                $infos_champs[$champ_fmt['cle']] = $champ_fmt;
304
	            } else {
305
	                $infos_champs[] = $champ_fmt;
306
	            }
307
	        }
308
	    }
309
	    return $infos_champs;
310
	}
3193 delphine 311
 
312
	/**
313
	 * Transforme un label en clé.
314
	 * Supprime tous les accents et caractères spéciaux.
315
	 * Accole les mots pour créer un chatmot.
316
	 *
317
	 * @param string le label.
318
	 * @return string la clé correspondante
319
	 */
320
	public function transformerLabelEnCle($label) {
321
		//TODO: cette fonction est elle encore pertinente
322
		// maintenant que la notion de label est supprimée ?
323
		$cle = strtolower(trim($label));
324
 
325
		// Suppression des mots inutiles
326
		$mots_a_remplacer = array(' le ', ' la ', ' les ', ' des ', ' de ', " l'", " d'", ' à ', ' au ');
327
		$cle = str_replace($mots_a_remplacer, ' ', $cle);
328
 
329
		// Remplacement parenthèses et crochets et leurs contenus
330
		$cle = preg_replace('/\([^)]+\)/', '', $cle);
331
		$cle = preg_replace('/\[[^\]]+\]/', '', $cle);
332
 
333
		// Remplacement des accents (voir : http://www.weirdog.com/blog/php/supprimer-les-accents-des-caracteres-accentues.html )
334
		$cle = htmlentities($cle, ENT_NOQUOTES, 'utf-8');
335
		$cle = preg_replace('/&([A-za-z])(?:acute|cedil|circ|grave|orn|ring|slash|th|tilde|uml);/', '\1', $cle);
336
		$cle = preg_replace('/&([A-za-z]{2})(?:lig);/', '\1', $cle); // pour les ligatures e.g. '&oelig;'
337
		$cle = preg_replace('/&[^;]+;/', '', $cle); // supprime les autres caractères
338
 
339
		// Suppression définitive de tout ce qui n'est pas ASCII
340
		$cle = preg_replace('/[^a-zA-Z0-9 ]/', ' ', $cle);
341
		$cle = preg_replace('/\s+/', ' ', $cle);
342
 
343
		// Accollement des mots
344
		$cle = ucwords($cle);
345
		$cle = str_replace(' ', '', $cle);
346
		$cle{0} = strtolower($cle{0});
347
 
348
		return $cle;
349
	}
3453 idir 350
}