Subversion Repositories eFlore/Applications.cel

Rev

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

Rev Author Line No. Line
1504 aurelien 1
<?php
2462 jpm 2
// declare(encoding='UTF-8');
1504 aurelien 3
/**
2462 jpm 4
 * Classe de gestion de l'ajout, modification et suppression des champs supplémentaires des obs et images.
5
 *
6
 * @internal   Mininum PHP version : 5.2
7
 * @category   CEL
8
 * @package    Services
9
 * @subpackage Bibliothèques
10
 * @version    0.1
11
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
12
 * @author     Raphaël Droz <raphael@tela-botania.org>
13
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
14
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
15
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
16
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
17
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
18
 */
1512 aurelien 19
class GestionChampsEtendus extends Cel {
1565 jpm 20
 
1504 aurelien 21
	private $mode = null;
3488 delphine 22
	private $table_obs_etendus = null;
1504 aurelien 23
	private $champ_id = null;
1565 jpm 24
 
3477 delphine 25
	public function __construct($config, $mode = 'obs') {
1504 aurelien 26
		parent::__construct($config);
27
		$this->mode = $mode;
3488 delphine 28
		$this->table_obs_etendus = 'extended_field_occurrence';
3477 delphine 29
		$this->champ_id = 'occurrence_id';
30
 
1504 aurelien 31
	}
1565 jpm 32
 
1504 aurelien 33
	/**
34
	* Renvoie true ou false suivant que l'element indiqué possède une valeur
35
	* pour la clé indiquée
36
	*
37
	* @param int $id_element_lie
38
	* @param string $cle
39
	* @param string $valeur
40
	* @return bool
41
	*/
1565 jpm 42
	public function existe($id_element_lie, $cle) {
1765 raphael 43
		$id = Cel::db()->proteger($id_element_lie);
44
		$cle = Cel::db()->proteger($cle);
1565 jpm 45
		$requete = 'SELECT COUNT(*) >= 1 AS existe '.
3488 delphine 46
			"FROM {$this->table_obs_etendus} ".
1565 jpm 47
			"WHERE {$this->champ_id} = $id ".
3477 delphine 48
			"	AND extended_field_id = $cle ".
2462 jpm 49
			' -- '.__FILE__.':'.__LINE__;;
1504 aurelien 50
 
2143 jpm 51
		$resultat = Cel::db()->requeter($requete);
1565 jpm 52
		return ($resultat[0]['existe'] == '1');
1504 aurelien 53
	}
1565 jpm 54
 
1504 aurelien 55
	/**
1512 aurelien 56
	* Renvoie tous les champs étendus associé à l'élément passé en paramètre
1504 aurelien 57
	*
58
	* @param int $id_element_lie
1565 jpm 59
	* @return array tableau associatif des champs de la table etendu
1504 aurelien 60
	*/
1565 jpm 61
	public function consulter($id_element_lie) {
1765 raphael 62
		$id = Cel::db()->proteger($id_element_lie);
2462 jpm 63
		$requete = 'SELECT * '.
3488 delphine 64
			"FROM {$this->table_obs_etendus} ".
2462 jpm 65
			"WHERE {$this->champ_id} = $id ".
66
			' -- '.__FILE__.':'.__LINE__;
2143 jpm 67
		$resultat = Cel::db()->requeter($requete);
1504 aurelien 68
		return $resultat;
69
	}
1565 jpm 70
 
1504 aurelien 71
	/**
1565 jpm 72
	* Renvoie tous les champs étendus associés aux éléments passés en paramètre.
73
	* Retour sous forme de tableau associatif de tableau d'objets ChampEtendu.
74
	* Les objets ChampEtendu sont regroupés par id d'élement.
1504 aurelien 75
	*
1565 jpm 76
	* @param array $ids_element_lies tableau d'id des éléments liés (obs ou image).
77
	* @return array tableau associatif de tableau d'objets ChampEtendu.
1504 aurelien 78
	*/
1565 jpm 79
	public function consulterParLots(Array $ids_element_lies) {
1512 aurelien 80
		$champs_etendus_par_element = array();
1565 jpm 81
		if (!empty($ids_element_lies)) {
1765 raphael 82
			$ids_element_lies = array_map(array(Cel::db(), 'proteger'),$ids_element_lies);
1565 jpm 83
			$ids = implode(',', $ids_element_lies);
84
 
3535 delphine 85
			$requete = "SELECT occurrence_id, occurrence_id as id_observation, value as valeur, `field_id`as cle FROM {$this->table_obs_etendus} o join extended_field f
3488 delphine 86
			     on f.`id` =  extended_field_id WHERE {$this->champ_id} IN ($ids) ";
2143 jpm 87
			$resultats = Cel::db()->requeter($requete);
3488 delphine 88
 
1527 aurelien 89
			foreach ($resultats as &$ligne) {
90
				$id_element = $ligne[$this->champ_id];
1565 jpm 91
				if (!isset($champs_etendus_par_element[$id_element])) {
1527 aurelien 92
					$champs_etendus_par_element[$id_element] = array();
93
				}
3474 killian 94
				$champ_etendu = new ObsEtendue();
1565 jpm 95
				$champ_etendu->id = $id_element;
3488 delphine 96
				$champ_etendu->cle = $ligne['cle'];
3559 delphine 97
				$champ_etendu->valeur = $ligne['valeur'];
1565 jpm 98
 
99
				$champs_etendus_par_element[$id_element][] = $champ_etendu;
1504 aurelien 100
			}
101
		}
1512 aurelien 102
		return $champs_etendus_par_element;
1504 aurelien 103
	}
1565 jpm 104
 
1504 aurelien 105
	/**
1565 jpm 106
	 * Ajoute un champ étendu.
107
	 * Si la clé existe déjà, seule valeur du champ est mise à jour
1504 aurelien 108
	 *
1565 jpm 109
	 * @param ChampEtendu $champ_etendu
110
	 * @return bool true si l'ajout a eu lieu
1504 aurelien 111
	 */
1565 jpm 112
	public function ajouter(ChampEtendu $champ_etendu) {
1765 raphael 113
		$id = Cel::db()->proteger($champ_etendu->id);
114
		$cle = Cel::db()->proteger($champ_etendu->cle);
115
		$valeur = Cel::db()->proteger($champ_etendu->valeur);
1504 aurelien 116
 
3488 delphine 117
		$requete = "INSERT INTO {$this->table_obs_etendus} ".
3477 delphine 118
			"( {$this->champ_id}, extended_field_id, value) ".
2394 aurelien 119
			"VALUES ($id, $cle, $valeur) ".
3477 delphine 120
			"ON DUPLICATE KEY UPDATE value = VALUES(value) ".
2462 jpm 121
			' -- '.__FILE__.':'.__LINE__;
1565 jpm 122
 
1504 aurelien 123
		// la partie on duplicate key est spécifique mysql mais il sera facile de s'en passer le jour
124
		// où l'on change de sgbd
2143 jpm 125
		$ajout = Cel::db()->executer($requete);
1504 aurelien 126
		return ($ajout !== false);
127
	}
1565 jpm 128
 
1504 aurelien 129
	/**
2462 jpm 130
	 * Ajoute plusieurs champs étendus à la fois.
131
	 * Si la clé existe déjà, seule la valeur du champ est mise à jour
132
	 *
133
	 * @param array $champs_etendus tableau d'objets ChampEtendu
134
	 * @return bool true si l'ajout a eu lieu
135
	 */
3538 delphine 136
	public function ajouterParLots(Array $champs_etendus, $projet = null) {
2462 jpm 137
		if (! $champs_etendus) return TRUE; // le tableau ... vide à été inséré
3538 delphine 138
		$ajout = false;
3573 killian 139
		$label_champs_etendus = new GestionChampsEtendus2($this->config);
3542 delphine 140
 
3538 delphine 141
		if ($champs_etendus_id !== null) {
3542 delphine 142
			$lignes = array();
3538 delphine 143
    		foreach ($champs_etendus as $champ_etendu) {
3542 delphine 144
    		    $champ_id = $label_champs_etendus->consulter($champ_etendu->cle);
145
    		    if ($champ_id != false) {
3538 delphine 146
        			$id = Cel::db()->proteger($champ_etendu->id);
3542 delphine 147
        			$cle = Cel::db()->proteger($champ_id[0]['id']);
3538 delphine 148
        			$valeur = Cel::db()->proteger($champ_etendu->valeur);
149
 
150
        			$lignes[] = "($id, $cle, $valeur)";
151
    		    }
152
    		}
153
 
154
    		// la partie on duplicate key est spécifique mysql mais il sera facile de s'en passer le jour
155
    		// où l'on change de sgbd
3541 delphine 156
    		if ($lignes != array()) {
157
        		$ajout = Cel::db()->executer(sprintf(
158
        			"INSERT INTO %s (%s, extended_field_id, value) VALUES %s ON DUPLICATE KEY UPDATE value = VALUES(valeur) -- %s:%d",
159
        			$this->table_obs_etendus,
160
        			$this->champ_id,
161
        			implode(',', $lignes),
162
        			__FILE__, __LINE__));
163
    		}
1504 aurelien 164
		}
165
		return ($ajout !== false);
166
	}
1565 jpm 167
 
1504 aurelien 168
	/**
1512 aurelien 169
	 * Modifie un champ étendu associé à l'élément passé en paramètre
1504 aurelien 170
	 *
1565 jpm 171
	 * @param ChampEtendu $champ_etendu
172
	 * @return bool true si la modification a eu lieu
1504 aurelien 173
	 */
1565 jpm 174
	public function modifier(ChampEtendu $champ_etendu) {
1765 raphael 175
		$id = Cel::db()->proteger($champ_etendu->id);
176
		$cle = Cel::db()->proteger($champ_etendu->cle);
177
		$valeur = Cel::db()->proteger($champ_etendu->valeur);
1565 jpm 178
 
3488 delphine 179
		$requete = "UPDATE {$this->table_obs_etendus} ".
3477 delphine 180
			"SET value = $valeur ".
181
			"WHERE extended_field_id = $cle".
2462 jpm 182
			"	AND {$this->champ_id} = $id ".
183
			' -- '.__FILE__.':'.__LINE__;
2143 jpm 184
		$modif = Cel::db()->executer($requete);
1504 aurelien 185
		return ($modif !== false);
186
	}
1565 jpm 187
 
1504 aurelien 188
	/**
1565 jpm 189
	* Supprime le champ champ étendu associé à l'élément et au nom de clé passés en paramètre
1504 aurelien 190
	*
191
	* @param int $id_element_lie
192
	* @param string $cle
193
	* @return bool
194
	*/
1565 jpm 195
	public function supprimer($id_element_lie, $cle) {
1765 raphael 196
		$id = Cel::db()->proteger($id_element_lie);
197
		$cle = Cel::db()->proteger($cle);
3488 delphine 198
		$requete = "DELETE FROM {$this->table_obs_etendus} ".
3477 delphine 199
			"WHERE extended_field_id = $cle ".
2462 jpm 200
			"AND {$this->champ_id} = $id ".
201
			' -- '.__FILE__.':'.__LINE__;
2143 jpm 202
		$suppr = Cel::db()->executer($requete);
1504 aurelien 203
		return ($suppr !== false);
204
	}
1565 jpm 205
 
1504 aurelien 206
	/**
1512 aurelien 207
	* Supprime tous les champs champ étendu associés à l'élément passés en paramètre
1504 aurelien 208
	*
209
	* @param int $id_element_lie
210
	* @return bool
211
	*/
1565 jpm 212
	public function vider($id_element_lie) {
1765 raphael 213
		$id = Cel::db()->proteger($id_element_lie);
3488 delphine 214
		$requete = "DELETE FROM {$this->table_obs_etendus} ".
2462 jpm 215
			"WHERE {$this->champ_id} = $id ".
216
			' -- '.__FILE__.':'.__LINE__;
2143 jpm 217
		$suppr = Cel::db()->executer($requete);
1504 aurelien 218
		return ($suppr !== false);
219
	}
1574 jpm 220
 
1569 aurelien 221
	/**
222
	* Supprime tous les champs champ étendu associés aux éléments passés en paramètre
223
	*
224
	* @param array $ids_elements_lies
225
	* @return bool
226
	*/
227
	public function viderParLots($ids_elements_lies) {
228
		$ids = $this->protegerTableau($ids_elements_lies);
3488 delphine 229
		$requete = "DELETE FROM {$this->table_obs_etendus} ".
2462 jpm 230
			"WHERE {$this->champ_id} IN (".implode(',',$ids).") ".
231
			' -- '.__FILE__.':'.__LINE__;
2143 jpm 232
		$suppr = Cel::db()->executer($requete);
1569 aurelien 233
		return ($suppr !== false);
234
	}
2143 jpm 235
 
1659 aurelien 236
	/**
237
	* Revnoie tous les intitules aux éléments passés en paramètre
238
	*
239
	* @param array $ids_elements_lies
240
	* @return bool
241
	*/
242
	public function consulterClesParLots($ids_elements_lies) {
243
		$cles_fmt = array();
1686 aurelien 244
		if(!empty($ids_elements_lies)) {
245
			$ids = $this->protegerTableau($ids_elements_lies);
3478 delphine 246
			$requete = "SELECT `field_id`as cle  FROM `extended_field` f join extended_field_occurrence o
247
			     on f.`id` =  extended_field_id WHERE `occurrence_id` in  (".implode(',',$ids).") ".
2462 jpm 248
				' -- '.__FILE__.':'.__LINE__;
2143 jpm 249
			$cles = Cel::db()->requeter($requete);
1738 raphael 250
			$i = 0;
1686 aurelien 251
			foreach($cles as &$cle) {
1738 raphael 252
				$cles_fmt[$cle['cle']] = $i++;
1686 aurelien 253
			}
1659 aurelien 254
		}
1738 raphael 255
		return array_values(array_flip($cles_fmt));
1659 aurelien 256
	}
2143 jpm 257
 
258
 
2462 jpm 259
 
2394 aurelien 260
	/**
1565 jpm 261
	 * Transforme un label en clé.
262
	 * Supprime tous les accents et caractères spéciaux.
263
	 * Accole les mots pour créer un chatmot.
264
	 *
265
	 * @param string le label.
266
	 * @return string la clé correspondante
267
	 */
268
	public function transformerLabelEnCle($label) {
2462 jpm 269
		//TODO: cette fonction est elle encore pertinente
2403 aurelien 270
		// maintenant que la notion de label est supprimée ?
1565 jpm 271
		$cle = strtolower(trim($label));
272
 
273
		// Suppression des mots inutiles
274
		$mots_a_remplacer = array(' le ', ' la ', ' les ', ' des ', ' de ', " l'", " d'", ' à ', ' au ');
275
		$cle = str_replace($mots_a_remplacer, ' ', $cle);
276
 
277
		// Remplacement parenthèses et crochets et leurs contenus
278
		$cle = preg_replace('/\([^)]+\)/', '', $cle);
279
		$cle = preg_replace('/\[[^\]]+\]/', '', $cle);
280
 
281
		// Remplacement des accents (voir : http://www.weirdog.com/blog/php/supprimer-les-accents-des-caracteres-accentues.html )
282
		$cle = htmlentities($cle, ENT_NOQUOTES, 'utf-8');
283
		$cle = preg_replace('/&([A-za-z])(?:acute|cedil|circ|grave|orn|ring|slash|th|tilde|uml);/', '\1', $cle);
284
		$cle = preg_replace('/&([A-za-z]{2})(?:lig);/', '\1', $cle); // pour les ligatures e.g. '&oelig;'
285
		$cle = preg_replace('/&[^;]+;/', '', $cle); // supprime les autres caractères
286
 
287
		// Suppression définitive de tout ce qui n'est pas ASCII
1574 jpm 288
		$cle = preg_replace('/[^a-zA-Z0-9 ]/', ' ', $cle);
289
		$cle = preg_replace('/\s+/', ' ', $cle);
1565 jpm 290
 
291
		// Accollement des mots
292
		$cle = ucwords($cle);
293
		$cle = str_replace(' ', '', $cle);
1574 jpm 294
		$cle{0} = strtolower($cle{0});
1565 jpm 295
 
296
		return $cle;
297
	}
3166 idir 298
}