Subversion Repositories eFlore/Applications.cel

Rev

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