Subversion Repositories eFlore/Applications.cel

Rev

Rev 2114 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
918 aurelien 1
<?php
2
/**
1908 raphael 3
 * PHP Version 5.2
4
 *
5
 * @category  PHP
6
 * @package   jrest
2114 jpm 7
 * @author	Raphaël Droz <raphael@tela-botanica.org>
8
 * @author	Aurelien Peronnet <aurelien@tela-botanica.org>
1908 raphael 9
 * @copyright 2010, 2013 Tela-Botanica
10
 * @license	 http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
11
 * @license	 GPL v3 <http://www.gnu.org/licenses/gpl.txt>
2114 jpm 12
 * @link	  /doc/jrest/
1908 raphael 13
 *
14
 * Classe de gestion de l'ajout, modification et suppression des observations
15
 *
16
 * TODO: $sous_requete .= ' date_modification = now() '
17
 * devrait être une clause ON UPDATE ou un TRIGGER
18
 * afin de mettre à jour la date de modification uniquement lorsqu'une modification a effectivement eu lieu
19
 *
2113 jpm 20
 */
1908 raphael 21
class GestionObservation extends Cel {
918 aurelien 22
 
2114 jpm 23
	static $cel_obs = array(
24
		"id_observation", "ordre", "ce_utilisateur", "prenom_utilisateur", "nom_utilisateur",
25
		"courriel_utilisateur", "nom_sel", "nom_sel_nn", "nom_ret", "nom_ret_nn", "nt", "famille",
26
		"nom_referentiel", "ce_zone_geo", "zone_geo", "lieudit", "station", "milieu", "latitude", "longitude",
27
		"altitude", "geodatum", "date_observation", "mots_cles_texte", "commentaire", "transmission",
28
		"date_creation", "date_modification", "date_transmission", "abondance", "certitude", "phenologie",
29
		"code_insee_calcul");
1908 raphael 30
 
918 aurelien 31
	/**
2113 jpm 32
	* Ajoute une observation grâce aux paramètres fournis
33
	*
918 aurelien 34
	* @param int $utilisateur id utilisateur du proprietaire de l'observation
35
	* @param array $parametres tableau indexé avec les mêmes noms de champs que la bdd
2113 jpm 36
	*
918 aurelien 37
	* @return true ou false suivant le succès de l'opération
38
	*/
39
	public function ajouterObservation($utilisateur, $parametres) {
1851 raphael 40
		$origin_params = $parametres;
2114 jpm 41
		$base_param = array(
42
			'nom_sel_nn' => NULL,
43
			'nom_sel' => NULL,
44
			'nom_ret_nn' => NULL,
45
			'nom_referentiel' => NULL);
1851 raphael 46
		$parametres = array_merge($base_param, $parametres);
47
 
2114 jpm 48
 
918 aurelien 49
		$parametres['ordre'] = $this->renvoyerDernierOrdreUtilisePlusUn($utilisateur);
2113 jpm 50
 
1786 raphael 51
		$this->traiterEspece($parametres);
1851 raphael 52
 
53
		// si la détermination à échoué, alors:
54
		// soit le référentiel d'origine était "valide", soit non
2114 jpm 55
		if (!$parametres['nom_sel_nn']) {
1851 raphael 56
			// quoiqu'il en soit, on le met à "autre"
57
			$parametres['nom_referentiel'] = Cel::$fallback_referentiel;
58
		}
59
 
1908 raphael 60
		$this->ajoutInfoUtilisateurARequete($parametres);
2114 jpm 61
		self::formaterParametresObservation($parametres);
1786 raphael 62
 
2114 jpm 63
		$requete_insertion_observation = 'INSERT INTO cel_obs ';
64
		$sous_requete_colonnes = $this->traiterParametresObservationEtConstruireSousRequeteAjout($parametres);
2113 jpm 65
 
2114 jpm 66
		$requete_insertion_observation = $requete_insertion_observation.$sous_requete_colonnes;
2113 jpm 67
 
2114 jpm 68
		// important ! ne pas utiliser la fonction executerRequete qui renvoie une erreur si la requete
69
		// contient des | (pipes) ce qui peut arriver dans les commentaires
70
		// TODO: corriger la fonction ou bien continuer à utiliser executerRequeteSimple
71
		$resultat_ajout_observation = Cel::db()->executerRequeteSimple($requete_insertion_observation);
918 aurelien 72
 
2114 jpm 73
		$retour = true;
74
		if ($resultat_ajout_observation === false) {
75
			$retour = false;
76
			$msg = "Erreur de creation d'une observation : $resultat_ajout_observation";
77
			$this->logger('CEL_bugs', $msg);
78
		} else {
79
			$retour = $this->renvoyerIdPourOrdre($utilisateur ,$parametres['ordre']);
80
		}
81
		return $retour;
918 aurelien 82
	}
2113 jpm 83
 
918 aurelien 84
	/**
85
	* Renvoie le prochain numero d'ordre relatif à un utilisateur (i.e. dernier ordre + 1)
2113 jpm 86
	*
918 aurelien 87
	* @param int $utilisateur id utilisateur
2113 jpm 88
	*
918 aurelien 89
	* @return int le nouveau numero d'ordre relatif à l'utilisateur ou bien 0 s'il n'a jamais créé d'observations
90
	*/
91
	public function renvoyerDernierOrdreUtilisePlusUn($utilisateur) {
2114 jpm 92
		$idUtilisateurP = Cel::db()->proteger($utilisateur);
93
		$requete_selection_dernier_ordre = 'SELECT max(ordre) AS ordre '.
94
			'FROM cel_obs '.
95
			"WHERE ce_utilisateur = $idUtilisateurP ".
96
			' -- ' . __FILE__ . ':' . __LINE__;
97
		$dernier_ordre = Cel::db()->executerRequete($requete_selection_dernier_ordre);
2113 jpm 98
 
2114 jpm 99
		$nouvel_ordre = 0;
918 aurelien 100
		if (is_array($dernier_ordre) && count($dernier_ordre) > 0 && trim($dernier_ordre[0]['ordre']) != '') {
101
			$nouvel_ordre = $dernier_ordre[0]['ordre'] + 1;
2113 jpm 102
		}
2114 jpm 103
		return $nouvel_ordre;
918 aurelien 104
	}
2113 jpm 105
 
918 aurelien 106
	/**
1548 aurelien 107
	* Renvoie l'id d'observation associé à l'utilisateur et l'ordre donné
108
	*
109
	* @param int $utilisateur id utilisateur
110
	* @return int le numero d'ordre relatif à l'utilisateur
111
	*/
112
	public function renvoyerIdPourOrdre($utilisateur, $ordre) {
2114 jpm 113
		$idUtilisateurP = Cel::db()->proteger($utilisateur);
114
		$ordreP = Cel::db()->proteger($ordre);
2113 jpm 115
 
2114 jpm 116
		$requete_selection_dernier_id = 'SELECT id_observation '.
117
			'FROM cel_obs '.
118
			"WHERE ce_utilisateur = $idUtilisateurP ".
119
			"AND ordre = $ordreP ".
120
			' -- ' . __FILE__ . ':' . __LINE__;
2113 jpm 121
 
122
		$dernier_id = Cel::db()->executerRequete($requete_selection_dernier_id);
2114 jpm 123
 
124
		$retour = null;
125
		if ($dernier_id != false) {
126
			$retour = $dernier_id[0]['id_observation'];
127
		}
128
		return $retour;
1548 aurelien 129
	}
2113 jpm 130
 
1548 aurelien 131
	/**
2113 jpm 132
	* Modifie une ou plusieurs observations grâce aux paramètres fournis
133
	*
918 aurelien 134
	* @param int $utilisateur id utilisateur du proprietaire de l'observation
135
	* @param mixed $ordre ordre(s) observation(s) relatif(s) à l'utilisateur: un seul ordre ou bien "ordre1,ordre2,ordre3" etc...
136
	* @param array $parametres tableau indexé avec les mêmes noms de champs que la bdd
2113 jpm 137
	*
918 aurelien 138
	* @return true ou false suivant le succès de l'opération
139
	*/
140
	public function modifierObservation($utilisateur, $ordre, $parametres) {
2114 jpm 141
		$base_param = array(
142
			'nom_sel_nn' => NULL,
143
			'nom_sel' => NULL,
144
			'nom_ret_nn' => NULL,
145
			'nom_referentiel' => NULL);
146
 
2164 jpm 147
		$requete = "UPDATE cel_obs SET " ;
1783 raphael 148
		// si pas de nom_sel : on supprime les champs automatiques. et le référentiel.
2114 jpm 149
		if (false && (!isset($parametres['nom_sel']) || !@$parametres['nom_sel'])) {
150
			$parametres['nom_referentiel'] = NULL;
151
			// pas d'update de traiterParametresObservationEtConstruireSousRequeteMaj()
2164 jpm 152
			$requete .= "nom_referentiel = NULL, nom_sel_nn = NULL, nom_ret_nn = NULL, nom_ret = NULL, nt = NULL, famille = NULL,";
2114 jpm 153
		} elseif (false) {
1783 raphael 154
			/* TODO:
155
			 * si (à l'origine) pas de nom_sel_nn (donc pas de référentiel) POSTé
156
			 * et aucun nom déterminés, alors on supprime les données automatiques:
157
			 * alors on test une différence de réferentiel...
158
			 */
2164 jpm 159
			$referentielP = Cel::db()->proteger($parametres['nom_referentiel']);
160
			$requete .= "nom_sel_nn = IF(SUBSTR(nom_referentiel, 1, 5) != $referentielP, NULL, nom_sel_nn),".
161
				"nom_ret_nn = IF(SUBSTR(nom_referentiel, 1, 5) != $referentielP, NULL, nom_ret_nn), ".
162
				"nom_ret = IF(SUBSTR(nom_referentiel, 1, 5) != $referentielP, NULL, nom_ret), ".
163
				"nt = IF(SUBSTR(nom_referentiel, 1, 5) != $referentielP, NULL, nt), ".
164
				"famille = IF(SUBSTR(nom_referentiel, 1, 5) != $referentielP, NULL, famille), ";
2114 jpm 165
		} elseif (isset($parametres['nom_sel'])) {
1786 raphael 166
			// uniquement en cas de nom_sel présent
167
			$this->traiterEspece($parametres);
168
		}
918 aurelien 169
 
2114 jpm 170
		self::formaterParametresObservation($parametres);
918 aurelien 171
 
2114 jpm 172
		$champ_maj = self::traiterParametresObservationEtConstruireSousRequeteMaj($parametres);
173
		$champ_maj[] = "date_modification = now()";
1786 raphael 174
 
2164 jpm 175
		$requete .= implode(', ', $champ_maj).
176
			" WHERE ordre IN ($ordre) AND ce_utilisateur = ".Cel::db()->proteger($utilisateur).' '.
2114 jpm 177
			 ' -- ' . __FILE__ . ':' . __LINE__;
1908 raphael 178
 
1386 aurelien 179
		// important ! ne pas utiliser la fonction executerRequete qui renvoie une erreur si la requete contient des | (pipes)
180
		// ce qui peut arriver dans les commentaires
181
		// TODO: corriger la fonction ou bien continuer à utiliser executerRequeteSimple
2164 jpm 182
		$resultat = Cel::db()->executerRequeteSimple($requete);
2113 jpm 183
 
2114 jpm 184
		$retour = true;
2164 jpm 185
		if ($resultat === false) {
2114 jpm 186
			$retour = false;
2164 jpm 187
			$this->logger('CEL_bugs', "Erreur de mise à jour d'une liste d'observations : $requete");
2114 jpm 188
		}
1305 aurelien 189
		return $retour;
918 aurelien 190
	}
1908 raphael 191
 
2114 jpm 192
	/**
193
	 * @return nombre d'observations mises à jour, ou FALSE en cas de problème
194
	 */
1908 raphael 195
	static function modifierMultiplesObservation($utilisateur, Array $ordre, $parametres) {
2114 jpm 196
		// nous pouvons aussi retirer 'ce_utilisateur' (== $utilisateur) qui sera dans la clause WHERE
1908 raphael 197
		$exclusions = array('nom_sel_nn', 'nom_sel', 'nom_ret_nn', 'nom_referentiel', 'ce_utilisateur');
2114 jpm 198
		$parametres = array_diff_key($parametres, array_flip($exclusions));
199
		$parametres = array_intersect_key($parametres, array_flip(self::$cel_obs));
1908 raphael 200
 
2114 jpm 201
		$parametres = array_filter(
202
			$parametres,
203
			create_function('$e','return strpos($e, "(Valeurs multiples)") === false;'));
1908 raphael 204
 
2114 jpm 205
		// modifie $parametres par référence
206
		self::formaterParametresObservation($parametres);
1908 raphael 207
 
2114 jpm 208
		$champ_maj = self::traiterParametresObservationEtConstruireSousRequeteMaj($parametres);
209
		if (!$champ_maj) return 0; // rien à mettre à jour finalement
1908 raphael 210
 
2114 jpm 211
		$champ_maj[] = "date_modification = now()";
1908 raphael 212
		$nb_upd = Cel::db()->executer(sprintf(
2114 jpm 213
			"UPDATE cel_obs SET %s WHERE ordre IN (%s) AND ce_utilisateur = %s -- %s:%d",
214
			implode(', ', $champ_maj),
215
			implode(', ', $ordre),
216
			Cel::db()->proteger($utilisateur),
217
			__FILE__, __LINE__));
1908 raphael 218
 
2114 jpm 219
		if ($nb_upd === FALSE) return FALSE;
220
		return $nb_upd;
221
		// TODO: return json_encode(updated_rows());
222
	}
1908 raphael 223
 
2113 jpm 224
 
918 aurelien 225
	/**
1527 aurelien 226
	* Modifie une observation publique dont l'id et l'utilisateur sont passé en paramètre
227
	*
228
	* @param int $utilisateur id utilisateur du proprietaire de l'observation
2113 jpm 229
	* @param int $id identifiant de l'observation
1527 aurelien 230
	* @param array $parametres tableau indexé avec les mêmes noms de champs que la bdd
231
	*
232
	* @return true ou false suivant le succès de l'opération
233
	*/
234
	public function modifierObservationPublique($utilisateur, $id, $parametres) {
2114 jpm 235
		$base_param = array(
236
			'nom_sel_nn' => NULL,
237
			'nom_sel' => NULL,
238
			'nom_ret_nn' => NULL,
239
			'nom_referentiel' => NULL);
1752 raphael 240
		$parametres = array_merge($base_param, $parametres);
241
 
1786 raphael 242
		$this->traiterEspece($parametres);
2114 jpm 243
		self::formaterParametresObservation($parametres);
1786 raphael 244
 
1527 aurelien 245
		$retour = true;
1908 raphael 246
 
2114 jpm 247
		$champ_maj = self::traiterParametresObservationEtConstruireSousRequeteMaj($parametres);
2164 jpm 248
		$champ_maj[] = 'date_modification = now()';
1908 raphael 249
 
1786 raphael 250
		$requete_modification = "UPDATE cel_obs SET " .
2114 jpm 251
			implode(', ', $champ_maj) .
1786 raphael 252
			" WHERE id_observation = ".Cel::db()->proteger($id).
253
			" AND ce_utilisateur = ".Cel::db()->proteger($utilisateur)." ".
2114 jpm 254
			" AND transmission = 1 ".
255
			' -- ' . __FILE__ . ':' . __LINE__;
1527 aurelien 256
		// important ! ne pas utiliser la fonction executerRequete qui renvoie une erreur si la requete contient des | (pipes)
257
		// ce qui peut arriver dans les commentaires
258
		// TODO: corriger la fonction ou bien continuer à utiliser executerRequeteSimple
1871 raphael 259
		$resultat_modification = Cel::db()->executerRequeteSimple($requete_modification . ' -- ' . __FILE__ . ':' . __LINE__);
260
 
1527 aurelien 261
		if ($resultat_modification === false) {
2164 jpm 262
			$this->logger('CEL_bugs', "Erreur de mise à jour de l'observation : $id");
1527 aurelien 263
		}
2113 jpm 264
 
1871 raphael 265
		return $resultat_modification;
1527 aurelien 266
	}
2113 jpm 267
 
1527 aurelien 268
	/**
2113 jpm 269
	* Supprime une ou plusieurs observations grâce aux paramètres fournis
270
	*
918 aurelien 271
	* @param int $utilisateur id utilisateur du proprietaire de l'observation
272
	* @param mixed $ordre ordre(s) observation(s) relatif(s) à l'utilisateur: un seul ordre ou bien "ordre1,ordre2,ordre3" etc...
2113 jpm 273
	*
918 aurelien 274
	* @return true ou false suivant le succès de l'opération
275
	*/
276
	public function supprimerObservation($utilisateur, $ordre) {
2114 jpm 277
		// TODO changer le systeme pour n'utiliser plus que les id
278
		$retour = false;
279
		$tableau_ordre = explode(',', $ordre);
280
		$tableau_ordre = array_map(array(Cel::db(),'proteger'), $tableau_ordre);
281
		$ordre = implode(',', $tableau_ordre);
282
		$idUtilisateurP = Cel::db()->proteger($utilisateur);
1318 aurelien 283
 
2114 jpm 284
		$requete = 'SELECT id_observation AS id_obs '.
285
			'FROM cel_obs '.
286
			"WHERE ce_utilisateur = $idUtilisateurP ".
287
			"AND ordre IN ($ordre) ".
288
			' -- ' . __FILE__ . ':' . __LINE__;
289
		$resultat_ids_observations = Cel::db()->requeter($requete);
1318 aurelien 290
 
2114 jpm 291
		$ids_obs = array();
292
		$ids_obs_non_protegees = array();
293
		if (is_array($resultat_ids_observations) && count($resultat_ids_observations) > 0) {
294
			foreach ($resultat_ids_observations as $id_observation) {
295
				$ids_obs[] = Cel::db()->proteger($id_observation['id_obs']);
296
				$ids_obs_non_protegees[] = $id_observation['id_obs'];
297
			}
2113 jpm 298
 
2114 jpm 299
			$chaine_ids_obs = implode(',', $ids_obs);
300
			$requete = 'DELETE FROM cel_obs WHERE '.
301
				"ce_utilisateur = $idUtilisateurP ".
302
				"AND id_observation IN ($chaine_ids_obs) ".
303
				' -- ' . __FILE__ . ':' . __LINE__;
1318 aurelien 304
 
2114 jpm 305
			$resultat_suppression_observations = Cel::db()->executerRequeteSimple($requete);
2113 jpm 306
 
2114 jpm 307
			// TODO: Faire la suppression des mots clés
308
			// et des liaisons obs images dans une ou des fonctions à part
309
			if ($resultat_suppression_observations === false) {
310
				$msg = "Erreur de suppression d'une liste d'observations : $resultat_suppression_observations";
311
				$this->logger('CEL_bugs', $msg);
312
			} else {
313
				$requete = 'DELETE FROM cel_obs_images '.
314
					"WHERE id_observation IN ($chaine_ids_obs) ".
315
					' -- ' . __FILE__ . ':' . __LINE__;
2113 jpm 316
 
2114 jpm 317
				$resultat_suppression_liens = Cel::db()->executerRequeteSimple($requete);
2113 jpm 318
 
2114 jpm 319
				if ($resultat_suppression_liens === false) {
320
					$msg = "Erreur de suppression d'une liste de liaison entre observations et images : $requete";
321
					$this->logger('CEL_bugs', $msg);
322
				} else {
323
					$retour = true;
324
				}
2113 jpm 325
 
2114 jpm 326
				$gestion_mots_cles = new GestionMotsClesChemin($this->config, 'obs');
327
				$resultat_suppression_mots_cles = $gestion_mots_cles->supprimerToutesLiaisonsPourIdsElementsLies($ids_obs_non_protegees);
2047 aurelien 328
 
2114 jpm 329
				if ($resultat_suppression_mots_cles === false) {
330
					$msg = "Erreur de suppression d'une liste de mots clés d'observation(s) : $resultat_suppression_mots_cles";
331
					$this->logger('CEL_bugs', $msg);
332
				} else {
333
					$retour = true;
334
				}
335
			}
336
		} else {
337
			$retour = true;
918 aurelien 338
		}
2114 jpm 339
		return $retour;
918 aurelien 340
	}
2113 jpm 341
 
1163 aurelien 342
	/**
2113 jpm 343
	 * Fonction utilisée pour importer les observations faites avec des comptes anonymes vers un
1163 aurelien 344
	 * utilisateur identifié
345
	 * @param string $ancien_id
346
	 * @param string $id_utilisateur
347
	 */
931 aurelien 348
	public function migrerObservations($ancien_id, $id_utilisateur) {
349
		//TODO faire une fonction plus complexe qui déplace, images, observations, mots-clés etc... d'un utilisateur à l'autre
2113 jpm 350
		// qui pourrait servir pour fusionner des comptes
931 aurelien 351
		$nouvel_ordre = $this->renvoyerDernierOrdreUtilisePlusUn($id_utilisateur);
2113 jpm 352
 
931 aurelien 353
		// Recuperation relevés associés a la session
2114 jpm 354
		$idAncienP = Cel::db()->proteger($ancien_id);
355
		$requete = 'SELECT ordre '.
356
			'FROM cel_obs '.
357
			"WHERE ce_utilisateur = $idAncienP ".
358
			'ORDER BY ordre '.
359
			' -- '.__FILE__.' : '.__LINE__;
360
		$resultat = Cel::db()->executerRequete($requete);
2113 jpm 361
 
931 aurelien 362
		$reussite = true;
2114 jpm 363
		if (is_array($resultat)) {
364
			foreach ($resultat as $releve_temporaire) {
365
				$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
366
				$ancienOrdre = $releve_temporaire['ordre'];
367
				$requete = 'UPDATE cel_obs SET '.
368
					"ce_utilisateur = $idUtilisateurP, ".
369
					"ordre = $nouvel_ordre ".
370
					"WHERE ce_utilisateur = $idAncienP ".
371
					"AND ordre = $ancienOrdre ".
372
					' -- '.__FILE__.' : '.__LINE__;
373
				$migration_releve = Cel::db()->executerRequeteSimple($requete);
2113 jpm 374
 
2114 jpm 375
				//TODO: meilleure vérification
376
				if ($migration_releve === false) {
377
					$reussite = false;
378
				}
379
				$nouvel_ordre++;
2113 jpm 380
			}
381
		}
382
		return $reussite;
931 aurelien 383
	}
2113 jpm 384
 
918 aurelien 385
	/**
1470 aurelien 386
	* Fonction utilisée pour importer les anciennes observations saisie dans les widget dans un compte identifié
387
	* Dans ce cas là, le widget remplit la case id_utilisateur par le mail indiqué lors de la saisie
388
	* @param string $mail_utilisateur
389
	* @param string $id_utilisateur
390
	*/
2113 jpm 391
	public function migrerObservationsMailVersId($mail_utilisateur, $infos_utilisateur) {
392
		// ATTENTION : cette fonction suppose que l'utilisateur n'ai pas déjà d'observations dans le CEL
393
		// avec l'identifiant $id_utilisateur ce qui est normalement le cas
1470 aurelien 394
		$requete_migration_releve = 'UPDATE cel_obs SET '.
2114 jpm 395
			'ce_utilisateur = '.Cel::db()->proteger($infos_utilisateur['id_utilisateur']).', '.
396
			'prenom_utilisateur = '.Cel::db()->proteger($infos_utilisateur['prenom']).', '.
397
			'nom_utilisateur = '.Cel::db()->proteger($infos_utilisateur['nom']).', '.
398
			'courriel_utilisateur = '.Cel::db()->proteger($infos_utilisateur['courriel']).' '.
399
			'WHERE ce_utilisateur = '.Cel::db()->proteger($mail_utilisateur).' '.
400
			' -- '.__FILE__.' : '.__LINE__;
1470 aurelien 401
 
1765 raphael 402
		$migration_releve = Cel::db()->executerRequeteSimple($requete_migration_releve);
2113 jpm 403
 
1470 aurelien 404
		return $migration_releve;
405
	}
2113 jpm 406
 
1786 raphael 407
	private function traiterEspece(&$parametres) {
2114 jpm 408
		if (!$parametres['nom_referentiel']) {
1745 raphael 409
			$parametres['nom_referentiel'] = Cel::$default_referentiel;
1527 aurelien 410
		}
1745 raphael 411
		$code_referentiel = substr(trim($parametres['nom_referentiel']), 0, 5);
412
 
1752 raphael 413
		// TODO/XXX: quoi ?!
2114 jpm 414
		if (!$parametres['nom_sel_nn'] && !$parametres['nom_sel'] && $parametres['nom_ret_nn']) {
415
			$parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = '';
1659 aurelien 416
		}
918 aurelien 417
 
1745 raphael 418
		/* pour un nom saisi sans autocomplétion 3 cas de figure existent:
419
		   1) référentiel bdtfx
420
		   1.1) trouvé par le webservice => ref = bdtfx
421
		   1.2) pas trouvé par le webservice => ref = autre
422
		   2) si le référentiel est inconnu (explicitement mis à "autre"), alors pas d'appel au webservice => ref = autre */
2114 jpm 423
		if (in_array($code_referentiel, Cel::$referentiels_valides)) {
1788 raphael 424
			//
425
			$deuxieme_passe = true;
1752 raphael 426
			// nom saisi sans numéro
427
			if ($parametres['nom_sel'] && !$parametres['nom_sel_nn']) {
1745 raphael 428
				$chercheur_infos_complementaires = new RechercheInfosTaxonBeta($this->config, $code_referentiel);
429
				// Utilisation d'un nom sans numéro nomenclatural, recherche d'une correspondance sur le nom
430
				$complement = $chercheur_infos_complementaires->rechercherInformationsComplementairesSurNom($parametres['nom_sel']);
431
				// Si l'on a trouvé un résultat sur la recherche, il s'agit vraisemblablement d'un copié-collé
432
				// de nom de taxon qui n'a pas été validé par la selection
2114 jpm 433
				if ($complement) {
1788 raphael 434
					$parametres['nom_sel_nn'] = $complement->id;
435
					$parametres['nom_ret'] = RechercheInfosTaxonBeta::supprimerBiblio($complement->nom_retenu_complet);
436
					$parametres['nom_ret_nn'] = $complement->{"nom_retenu.id"};
437
					$parametres['nt'] = $complement->num_taxonomique;
438
					$parametres['famille'] = $complement->famille;
2114 jpm 439
				} else {
1745 raphael 440
					// pas de résultat de recherche sur le référentiel demandé, le webservice doit peut-être être corrigé
1788 raphael 441
					// mais en tout état de cause nous n'insérerons PAS de données incertaines associées à un référentiel !
1745 raphael 442
					$code_referentiel = Cel::$fallback_referentiel;
1788 raphael 443
					$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
444
					// goto out;
445
					$deuxieme_passe = false;
1745 raphael 446
				}
918 aurelien 447
			}
1425 aurelien 448
 
1788 raphael 449
			// XXX: ne devrait plus être nécessaire maintenant que rechercherInformationsComplementairesSurNom() [plus précisément effectuerRequeteUrlRecherche()]
450
			// a été modifiée pour retourner tous les champs nécessaire.
1905 raphael 451
			if ($deuxieme_passe && (! array_key_exists('nom_ret_nn', $parametres) || ! array_key_exists('nt', $parametres))) {
1745 raphael 452
				// Utilisation d'un nom faisant parti du referentiel : recherche du nom valide correspondant
453
				$chercheur_infos_complementaires = new RechercheInfosTaxonBeta($this->config , $code_referentiel);
1786 raphael 454
				$complement = $chercheur_infos_complementaires->effectuerRequeteInfosComplementairesSurNumNom($parametres['nom_sel_nn']);
1788 raphael 455
				// les paramètres passés datait peut-être d'une précédente autocomplétion, mais le référentiel ayant été changé par l'utilisateur
456
				// la détection ne fonctionne plus : nous supprimons les données précédemment générées de la base !
2114 jpm 457
				if (!$complement) {
1788 raphael 458
					$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
459
				} else {
460
					$parametres['nom_ret'] = RechercheInfosTaxonBeta::supprimerBiblio($complement->nom_retenu_complet);
461
					$parametres['nom_ret_nn'] = $complement->{"nom_retenu.id"};
462
					$parametres['nt'] = $complement->num_taxonomique;
463
					$parametres['famille'] = $complement->famille;
464
				}
1745 raphael 465
			}
918 aurelien 466
		}
1745 raphael 467
 
1789 raphael 468
		// référentiel "autre": on vide !
469
		else {
470
			$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
471
		}
472
 
1745 raphael 473
		// mise à jour du référentiel utilisé, sans n° de version
474
		$parametres['nom_referentiel'] = $code_referentiel;
1786 raphael 475
	}
476
 
2114 jpm 477
	// uniquement nécessaire lors de l'ajout
2113 jpm 478
	private function ajoutInfoUtilisateurARequete(&$parametres) {
2114 jpm 479
		if (isset($parametres['ce_utilisateur'])) {
480
			$infos_utilisateur = $this->getInfosComplementairesUtilisateur($parametres['ce_utilisateur']);
481
			$parametres['courriel_utilisateur'] = $infos_utilisateur['courriel'];
482
			$parametres['nom_utilisateur'] = $infos_utilisateur['nom'];
483
			$parametres['prenom_utilisateur'] = $infos_utilisateur['prenom'];
484
		}
485
	}
2113 jpm 486
 
1786 raphael 487
	/**
2113 jpm 488
	* Formate les paramètres fournis en ajoutant des infos complementaires
489
	*
1786 raphael 490
	* @param array $parametres tableau indexé avec les mêmes noms de champs que la bdd
491
	* @return $parametres le tableau modifié selon ce qu'il contenait
492
	*/
2113 jpm 493
	static function formaterParametresObservation(&$parametres) {
918 aurelien 494
		// Pour empecher que des numéros de département de 1 à 9 soient saisis sans 0
495
		// TODO: décider quoi faire pour les zones géo plus générales
2114 jpm 496
		if (isset($parametres['ce_zone_geo'])) {
497
			if ($parametres['ce_zone_geo'] == 'null' || trim($parametres['ce_zone_geo']) == "") {
498
				$parametres['ce_zone_geo'] = "";
499
			} else {
500
				if (strlen($parametres['ce_zone_geo']) == 4) {
501
					$parametres['ce_zone_geo'] = '0'.$parametres['ce_zone_geo'];
502
				}
2113 jpm 503
 
2114 jpm 504
				if (strlen($parametres['ce_zone_geo']) > 0 && strlen($parametres['ce_zone_geo']) <= 2) {
505
					$parametres['ce_zone_geo'] = Cel::obtenirCodeInseeCommunePourNomEtDepartement($parametres['zone_geo'], $parametres['ce_zone_geo']);
506
				} else {
507
					$parametres['ce_zone_geo'] = 'INSEE-C:'. $parametres['ce_zone_geo'];
508
				}
509
			}
510
		}
2113 jpm 511
 
2114 jpm 512
		// TODO : voir si l'on peut utiliser un des fonctions de la classe cel
513
		if (isset($parametres['date_observation']) && $parametres['date_observation'] != 'null') {
514
			//TODO: prendre en compte des dates incomplètes ?
515
			if (count(explode('/', $parametres['date_observation'])) >= 3) {
516
				list($jour,$mois,$annee) = explode('/', $parametres['date_observation']);
517
				$parametres['date_observation'] = $annee.'-'.$mois.'-'.$jour.' 0:0:0';
518
			}
519
		}
918 aurelien 520
	}
2113 jpm 521
 
918 aurelien 522
	/**
523
	* Assemble une sous requete pour un ajout, tout en formatant les paramètres et en recherchant
524
	* les infos complémentaires
2113 jpm 525
	*
526
	* @param array $parametres un tableau avec les index correspondant aux champs de la bdd
527
	*
918 aurelien 528
	* @return string une sous requete utilisable pour l'ajout d'une observation
2113 jpm 529
	*/
918 aurelien 530
	private function traiterParametresObservationEtConstruireSousRequeteAjout($parametres) {
531
		$sous_requete = '';
532
 
533
		$champs = '';
534
		$valeurs = '';
2113 jpm 535
 
918 aurelien 536
		// Nullifiage ...
537
		// TODO: code dupliqué, en faire une fonction à mettre à la place appropriée
2113 jpm 538
		foreach($parametres as $cle => $valeur) {
539
			$valeur = self::renvoyerValeurDenullifiee($valeur);
918 aurelien 540
			$champs .= $cle.', ';
1332 aurelien 541
			$valeurs .= $valeur.', ';
918 aurelien 542
		}
2113 jpm 543
 
918 aurelien 544
		$champs = '('.$champs.'mots_cles_texte, transmission, date_creation, date_modification, date_transmission)';
545
		$valeurs = '('.$valeurs.'"", 0, now(), now(), "0000-00-00 00:00:00")';
2113 jpm 546
 
918 aurelien 547
		$sous_requete .= $champs.' VALUES '.$valeurs;
2113 jpm 548
 
918 aurelien 549
		return $sous_requete;
550
	}
2113 jpm 551
 
918 aurelien 552
	/**
553
	 * Assemble une sous requete pour une mise à jour, tout en formatant les paramètres et en recherchant
554
	 * les infos complémentaires
2113 jpm 555
	 *
556
	 * @param array $parametres un tableau avec les index correspondant aux champs de la bdd
557
	 *
918 aurelien 558
	 * @return string une sous requete utilisable pour la modification d'une observation
2113 jpm 559
	 * selon la syntaxe UPDATE table SET colonne1 = valeur1, colonne2 = valeur2 WHERE condition
560
	 */
1908 raphael 561
	static function traiterParametresObservationEtConstruireSousRequeteMaj($parametres) {
562
		$champs = array();
563
 
918 aurelien 564
		// Nullifiage ...
565
		// TODO: code dupliqué, en faire une fonction à mettre à la place appropriée
2114 jpm 566
		foreach ($parametres as $cle => $valeur) {
1972 aurelien 567
			$valeur = self::renvoyerValeurDenullifiee($valeur);
2114 jpm 568
			$champs[] = $cle." = ".$valeur;
918 aurelien 569
		}
2114 jpm 570
		return $champs;
918 aurelien 571
	}
2113 jpm 572
 
1972 aurelien 573
	private static function renvoyerValeurDenullifiee($valeur) {
2114 jpm 574
		if (trim($valeur) == '' || trim($valeur) == 'null' || trim($valeur) == '000null') {
575
			$valeur = 'NULL';
1972 aurelien 576
		} else {
577
			$valeur = Cel::db()->proteger($valeur);
578
		}
579
		return $valeur;
580
	}
2114 jpm 581
}