Subversion Repositories eFlore/Applications.cel

Rev

Rev 2121 | 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
	*/
241
	public function modifierObservationPublique($utilisateur, $id, $parametres) {
2115 jpm 242
		$base_param = array(
243
			'nom_sel_nn' => NULL,
244
			'nom_sel' => NULL,
245
			'nom_ret_nn' => NULL,
246
			'nom_referentiel' => NULL);
1752 raphael 247
		$parametres = array_merge($base_param, $parametres);
248
 
1786 raphael 249
		$this->traiterEspece($parametres);
2115 jpm 250
		self::formaterParametresObservation($parametres);
1786 raphael 251
 
1527 aurelien 252
		$retour = true;
1908 raphael 253
 
2115 jpm 254
		$champ_maj = self::traiterParametresObservationEtConstruireSousRequeteMaj($parametres);
255
		$champ_maj[] = "date_modification = now()";
1908 raphael 256
 
1786 raphael 257
		$requete_modification = "UPDATE cel_obs SET " .
2115 jpm 258
			implode(', ', $champ_maj) .
1786 raphael 259
			" WHERE id_observation = ".Cel::db()->proteger($id).
260
			" AND ce_utilisateur = ".Cel::db()->proteger($utilisateur)." ".
2115 jpm 261
			" AND transmission = 1 ".
262
			' -- ' . __FILE__ . ':' . __LINE__;
1527 aurelien 263
		// important ! ne pas utiliser la fonction executerRequete qui renvoie une erreur si la requete contient des | (pipes)
264
		// ce qui peut arriver dans les commentaires
265
		// TODO: corriger la fonction ou bien continuer à utiliser executerRequeteSimple
2143 jpm 266
		$resultat_modification = Cel::db()->executer($requete_modification . ' -- ' . __FILE__ . ':' . __LINE__);
1871 raphael 267
 
1527 aurelien 268
		if ($resultat_modification === false) {
269
			$this->logger("CEL_bugs","Erreur de mise à jour de l\'observation : ".$id);
270
		}
2115 jpm 271
 
1871 raphael 272
		return $resultat_modification;
1527 aurelien 273
	}
2115 jpm 274
 
2121 aurelien 275
	public function modifierTransmissionObservation($ids_obs_ou_tableau, $publier) {
2143 jpm 276
		if (is_array($ids_obs_ou_tableau)) {
2121 aurelien 277
			$ids_obs_ou_tableau = array_map(array(Cel::db(),'proteger'),$ids_obs_ou_tableau);
278
			$chaine_ids_obs = implode(',',$ids_obs_ou_tableau);
279
		} else {
280
			$chaine_ids_obs = Cel::db()->proteger($ids_obs_ou_tableau);
281
		}
282
		$etat_transmission = $publier ? 1 : 0;
2143 jpm 283
 
2121 aurelien 284
		$requete = "UPDATE cel_obs ".
2143 jpm 285
			"SET transmission = $etat_transmission , date_modification = NOW() ".
286
			"WHERE id_observation IN ($chaine_ids_obs) ".
287
			' -- ' . __FILE__ . ':' . __LINE__;
288
 
289
		$resultat = Cel::db()->executer($requete);
290
		return $resultat;
2121 aurelien 291
	}
2143 jpm 292
 
1527 aurelien 293
	/**
2115 jpm 294
	* Supprime une ou plusieurs observations grâce aux paramètres fournis
295
	*
918 aurelien 296
	* @param int $utilisateur id utilisateur du proprietaire de l'observation
297
	* @param mixed $ordre ordre(s) observation(s) relatif(s) à l'utilisateur: un seul ordre ou bien "ordre1,ordre2,ordre3" etc...
2115 jpm 298
	*
918 aurelien 299
	* @return true ou false suivant le succès de l'opération
300
	*/
301
	public function supprimerObservation($utilisateur, $ordre) {
2115 jpm 302
		// TODO changer le systeme pour n'utiliser plus que les id
303
		$retour = false;
304
		$tableau_ordre = explode(',', $ordre);
305
		$tableau_ordre = array_map(array(Cel::db(),'proteger'), $tableau_ordre);
306
		$ordre = implode(',', $tableau_ordre);
307
		$idUtilisateurP = Cel::db()->proteger($utilisateur);
1318 aurelien 308
 
2115 jpm 309
		$requete = 'SELECT id_observation AS id_obs '.
310
			'FROM cel_obs '.
311
			"WHERE ce_utilisateur = $idUtilisateurP ".
312
			"AND ordre IN ($ordre) ".
313
			' -- ' . __FILE__ . ':' . __LINE__;
314
		$resultat_ids_observations = Cel::db()->requeter($requete);
1318 aurelien 315
 
2115 jpm 316
		$ids_obs = array();
317
		$ids_obs_non_protegees = array();
318
		if (is_array($resultat_ids_observations) && count($resultat_ids_observations) > 0) {
319
			foreach ($resultat_ids_observations as $id_observation) {
320
				$ids_obs[] = Cel::db()->proteger($id_observation['id_obs']);
321
				$ids_obs_non_protegees[] = $id_observation['id_obs'];
322
			}
1318 aurelien 323
 
2115 jpm 324
			$chaine_ids_obs = implode(',', $ids_obs);
325
			$requete = 'DELETE FROM cel_obs WHERE '.
326
				"ce_utilisateur = $idUtilisateurP ".
327
				"AND id_observation IN ($chaine_ids_obs) ".
328
				' -- ' . __FILE__ . ':' . __LINE__;
2047 aurelien 329
 
2143 jpm 330
			$resultat_suppression_observations = Cel::db()->executer($requete);
2115 jpm 331
 
332
			// TODO: Faire la suppression des mots clés
333
			// et des liaisons obs images dans une ou des fonctions à part
334
			if ($resultat_suppression_observations === false) {
335
				$msg = "Erreur de suppression d'une liste d'observations : $resultat_suppression_observations";
336
				$this->logger('CEL_bugs', $msg);
337
			} else {
338
				$requete = 'DELETE FROM cel_obs_images '.
339
					"WHERE id_observation IN ($chaine_ids_obs) ".
340
					' -- ' . __FILE__ . ':' . __LINE__;
341
 
2143 jpm 342
				$resultat_suppression_liens = Cel::db()->executer($requete);
2115 jpm 343
 
344
				if ($resultat_suppression_liens === false) {
345
					$msg = "Erreur de suppression d'une liste de liaison entre observations et images : $requete";
346
					$this->logger('CEL_bugs', $msg);
347
				} else {
348
					$retour = true;
349
				}
350
 
351
				$gestion_mots_cles = new GestionMotsClesChemin($this->config, 'obs');
352
				$resultat_suppression_mots_cles = $gestion_mots_cles->supprimerToutesLiaisonsPourIdsElementsLies($ids_obs_non_protegees);
353
 
354
				if ($resultat_suppression_mots_cles === false) {
355
					$msg = "Erreur de suppression d'une liste de mots clés d'observation(s) : $resultat_suppression_mots_cles";
356
					$this->logger('CEL_bugs', $msg);
357
				} else {
358
					$retour = true;
359
				}
360
			}
361
		} else {
362
			$retour = true;
918 aurelien 363
		}
2115 jpm 364
		return $retour;
918 aurelien 365
	}
2115 jpm 366
 
1163 aurelien 367
	/**
2115 jpm 368
	 * Fonction utilisée pour importer les observations faites avec des comptes anonymes vers un
1163 aurelien 369
	 * utilisateur identifié
370
	 * @param string $ancien_id
371
	 * @param string $id_utilisateur
372
	 */
931 aurelien 373
	public function migrerObservations($ancien_id, $id_utilisateur) {
374
		//TODO faire une fonction plus complexe qui déplace, images, observations, mots-clés etc... d'un utilisateur à l'autre
2115 jpm 375
		// qui pourrait servir pour fusionner des comptes
931 aurelien 376
		$nouvel_ordre = $this->renvoyerDernierOrdreUtilisePlusUn($id_utilisateur);
2115 jpm 377
 
931 aurelien 378
		// Recuperation relevés associés a la session
2115 jpm 379
		$idAncienP = Cel::db()->proteger($ancien_id);
380
		$requete = 'SELECT ordre '.
381
			'FROM cel_obs '.
382
			"WHERE ce_utilisateur = $idAncienP ".
383
			'ORDER BY ordre '.
384
			' -- '.__FILE__.' : '.__LINE__;
2143 jpm 385
		$resultat = Cel::db()->requeter($requete);
2115 jpm 386
 
931 aurelien 387
		$reussite = true;
2115 jpm 388
		if (is_array($resultat)) {
389
			foreach ($resultat as $releve_temporaire) {
390
				$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
391
				$ancienOrdre = $releve_temporaire['ordre'];
392
				$requete = 'UPDATE cel_obs SET '.
393
					"ce_utilisateur = $idUtilisateurP, ".
394
					"ordre = $nouvel_ordre ".
395
					"WHERE ce_utilisateur = $idAncienP ".
396
					"AND ordre = $ancienOrdre ".
397
					' -- '.__FILE__.' : '.__LINE__;
2143 jpm 398
				$migration_releve = Cel::db()->executer($requete);
2115 jpm 399
 
400
				//TODO: meilleure vérification
401
				if ($migration_releve === false) {
402
					$reussite = false;
403
				}
404
				$nouvel_ordre++;
405
			}
406
		}
407
		return $reussite;
931 aurelien 408
	}
2115 jpm 409
 
918 aurelien 410
	/**
1470 aurelien 411
	* Fonction utilisée pour importer les anciennes observations saisie dans les widget dans un compte identifié
412
	* Dans ce cas là, le widget remplit la case id_utilisateur par le mail indiqué lors de la saisie
413
	* @param string $mail_utilisateur
414
	* @param string $id_utilisateur
415
	*/
2115 jpm 416
	public function migrerObservationsMailVersId($mail_utilisateur, $infos_utilisateur) {
417
		// ATTENTION : cette fonction suppose que l'utilisateur n'ai pas déjà d'observations dans le CEL
418
		// avec l'identifiant $id_utilisateur ce qui est normalement le cas
1470 aurelien 419
		$requete_migration_releve = 'UPDATE cel_obs SET '.
2115 jpm 420
			'ce_utilisateur = '.Cel::db()->proteger($infos_utilisateur['id_utilisateur']).', '.
421
			'prenom_utilisateur = '.Cel::db()->proteger($infos_utilisateur['prenom']).', '.
422
			'nom_utilisateur = '.Cel::db()->proteger($infos_utilisateur['nom']).', '.
423
			'courriel_utilisateur = '.Cel::db()->proteger($infos_utilisateur['courriel']).' '.
424
			'WHERE ce_utilisateur = '.Cel::db()->proteger($mail_utilisateur).' '.
425
			' -- '.__FILE__.' : '.__LINE__;
1470 aurelien 426
 
2143 jpm 427
		$migration_releve = Cel::db()->executer($requete_migration_releve);
2115 jpm 428
 
1470 aurelien 429
		return $migration_releve;
430
	}
2115 jpm 431
 
1786 raphael 432
	private function traiterEspece(&$parametres) {
2115 jpm 433
		if (!$parametres['nom_referentiel']) {
1745 raphael 434
			$parametres['nom_referentiel'] = Cel::$default_referentiel;
1527 aurelien 435
		}
1745 raphael 436
		$code_referentiel = substr(trim($parametres['nom_referentiel']), 0, 5);
437
 
1752 raphael 438
		// TODO/XXX: quoi ?!
2115 jpm 439
		if (!$parametres['nom_sel_nn'] && !$parametres['nom_sel'] && $parametres['nom_ret_nn']) {
440
			$parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = '';
1659 aurelien 441
		}
918 aurelien 442
 
1745 raphael 443
		/* pour un nom saisi sans autocomplétion 3 cas de figure existent:
444
		   1) référentiel bdtfx
445
		   1.1) trouvé par le webservice => ref = bdtfx
446
		   1.2) pas trouvé par le webservice => ref = autre
447
		   2) si le référentiel est inconnu (explicitement mis à "autre"), alors pas d'appel au webservice => ref = autre */
2115 jpm 448
		if (in_array($code_referentiel, Cel::$referentiels_valides)) {
1788 raphael 449
			//
450
			$deuxieme_passe = true;
1752 raphael 451
			// nom saisi sans numéro
452
			if ($parametres['nom_sel'] && !$parametres['nom_sel_nn']) {
1745 raphael 453
				$chercheur_infos_complementaires = new RechercheInfosTaxonBeta($this->config, $code_referentiel);
454
				// Utilisation d'un nom sans numéro nomenclatural, recherche d'une correspondance sur le nom
455
				$complement = $chercheur_infos_complementaires->rechercherInformationsComplementairesSurNom($parametres['nom_sel']);
456
				// Si l'on a trouvé un résultat sur la recherche, il s'agit vraisemblablement d'un copié-collé
457
				// de nom de taxon qui n'a pas été validé par la selection
2115 jpm 458
				if ($complement) {
1788 raphael 459
					$parametres['nom_sel_nn'] = $complement->id;
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;
2115 jpm 464
				} else {
1745 raphael 465
					// pas de résultat de recherche sur le référentiel demandé, le webservice doit peut-être être corrigé
1788 raphael 466
					// mais en tout état de cause nous n'insérerons PAS de données incertaines associées à un référentiel !
1745 raphael 467
					$code_referentiel = Cel::$fallback_referentiel;
1788 raphael 468
					$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
469
					// goto out;
470
					$deuxieme_passe = false;
1745 raphael 471
				}
918 aurelien 472
			}
1425 aurelien 473
 
1788 raphael 474
			// XXX: ne devrait plus être nécessaire maintenant que rechercherInformationsComplementairesSurNom() [plus précisément effectuerRequeteUrlRecherche()]
475
			// a été modifiée pour retourner tous les champs nécessaire.
1905 raphael 476
			if ($deuxieme_passe && (! array_key_exists('nom_ret_nn', $parametres) || ! array_key_exists('nt', $parametres))) {
1745 raphael 477
				// Utilisation d'un nom faisant parti du referentiel : recherche du nom valide correspondant
478
				$chercheur_infos_complementaires = new RechercheInfosTaxonBeta($this->config , $code_referentiel);
1786 raphael 479
				$complement = $chercheur_infos_complementaires->effectuerRequeteInfosComplementairesSurNumNom($parametres['nom_sel_nn']);
1788 raphael 480
				// 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
481
				// la détection ne fonctionne plus : nous supprimons les données précédemment générées de la base !
2115 jpm 482
				if (!$complement) {
1788 raphael 483
					$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
484
				} else {
485
					$parametres['nom_ret'] = RechercheInfosTaxonBeta::supprimerBiblio($complement->nom_retenu_complet);
486
					$parametres['nom_ret_nn'] = $complement->{"nom_retenu.id"};
487
					$parametres['nt'] = $complement->num_taxonomique;
488
					$parametres['famille'] = $complement->famille;
489
				}
1745 raphael 490
			}
918 aurelien 491
		}
1745 raphael 492
 
1789 raphael 493
		// référentiel "autre": on vide !
494
		else {
495
			$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
496
		}
497
 
1745 raphael 498
		// mise à jour du référentiel utilisé, sans n° de version
499
		$parametres['nom_referentiel'] = $code_referentiel;
1786 raphael 500
	}
501
 
2115 jpm 502
	// uniquement nécessaire lors de l'ajout
503
	private function ajoutInfoUtilisateurARequete(&$parametres) {
504
		if (isset($parametres['ce_utilisateur'])) {
505
			$infos_utilisateur = $this->getInfosComplementairesUtilisateur($parametres['ce_utilisateur']);
506
			$parametres['courriel_utilisateur'] = $infos_utilisateur['courriel'];
507
			$parametres['nom_utilisateur'] = $infos_utilisateur['nom'];
508
			$parametres['prenom_utilisateur'] = $infos_utilisateur['prenom'];
509
		}
510
	}
1908 raphael 511
 
1786 raphael 512
	/**
2115 jpm 513
	* Formate les paramètres fournis en ajoutant des infos complementaires
514
	*
1786 raphael 515
	* @param array $parametres tableau indexé avec les mêmes noms de champs que la bdd
516
	* @return $parametres le tableau modifié selon ce qu'il contenait
517
	*/
2115 jpm 518
	static function formaterParametresObservation(&$parametres) {
918 aurelien 519
		// Pour empecher que des numéros de département de 1 à 9 soient saisis sans 0
520
		// TODO: décider quoi faire pour les zones géo plus générales
2115 jpm 521
		if (isset($parametres['ce_zone_geo'])) {
522
			if ($parametres['ce_zone_geo'] == 'null' || trim($parametres['ce_zone_geo']) == "") {
523
				$parametres['ce_zone_geo'] = "";
524
			} else {
525
				if (strlen($parametres['ce_zone_geo']) == 4) {
526
					$parametres['ce_zone_geo'] = '0'.$parametres['ce_zone_geo'];
527
				}
918 aurelien 528
 
2115 jpm 529
				if (strlen($parametres['ce_zone_geo']) > 0 && strlen($parametres['ce_zone_geo']) <= 2) {
530
					$parametres['ce_zone_geo'] = Cel::obtenirCodeInseeCommunePourNomEtDepartement($parametres['zone_geo'], $parametres['ce_zone_geo']);
531
				} else {
532
					$parametres['ce_zone_geo'] = 'INSEE-C:'. $parametres['ce_zone_geo'];
533
				}
534
			}
535
		}
536
 
537
		// TODO : voir si l'on peut utiliser un des fonctions de la classe cel
538
		if (isset($parametres['date_observation']) && $parametres['date_observation'] != 'null') {
539
			//TODO: prendre en compte des dates incomplètes ?
540
			if (count(explode('/', $parametres['date_observation'])) >= 3) {
541
				list($jour,$mois,$annee) = explode('/', $parametres['date_observation']);
542
				$parametres['date_observation'] = $annee.'-'.$mois.'-'.$jour.' 0:0:0';
543
			}
544
		}
918 aurelien 545
	}
2115 jpm 546
 
918 aurelien 547
	/**
548
	* Assemble une sous requete pour un ajout, tout en formatant les paramètres et en recherchant
549
	* les infos complémentaires
2115 jpm 550
	*
551
	* @param array $parametres un tableau avec les index correspondant aux champs de la bdd
552
	*
918 aurelien 553
	* @return string une sous requete utilisable pour l'ajout d'une observation
2115 jpm 554
	*/
918 aurelien 555
	private function traiterParametresObservationEtConstruireSousRequeteAjout($parametres) {
556
		$sous_requete = '';
557
 
558
		$champs = '';
559
		$valeurs = '';
2115 jpm 560
 
918 aurelien 561
		// Nullifiage ...
562
		// TODO: code dupliqué, en faire une fonction à mettre à la place appropriée
2115 jpm 563
		foreach($parametres as $cle => $valeur) {
564
			$valeur = self::renvoyerValeurDenullifiee($valeur);
918 aurelien 565
			$champs .= $cle.', ';
1332 aurelien 566
			$valeurs .= $valeur.', ';
918 aurelien 567
		}
2115 jpm 568
 
918 aurelien 569
		$champs = '('.$champs.'mots_cles_texte, transmission, date_creation, date_modification, date_transmission)';
570
		$valeurs = '('.$valeurs.'"", 0, now(), now(), "0000-00-00 00:00:00")';
2115 jpm 571
 
918 aurelien 572
		$sous_requete .= $champs.' VALUES '.$valeurs;
2115 jpm 573
 
918 aurelien 574
		return $sous_requete;
575
	}
2115 jpm 576
 
918 aurelien 577
	/**
578
	 * Assemble une sous requete pour une mise à jour, tout en formatant les paramètres et en recherchant
579
	 * les infos complémentaires
2115 jpm 580
	 *
581
	 * @param array $parametres un tableau avec les index correspondant aux champs de la bdd
582
	 *
918 aurelien 583
	 * @return string une sous requete utilisable pour la modification d'une observation
2115 jpm 584
	 * selon la syntaxe UPDATE table SET colonne1 = valeur1, colonne2 = valeur2 WHERE condition
585
	 */
1908 raphael 586
	static function traiterParametresObservationEtConstruireSousRequeteMaj($parametres) {
587
		$champs = array();
588
 
918 aurelien 589
		// Nullifiage ...
590
		// TODO: code dupliqué, en faire une fonction à mettre à la place appropriée
2115 jpm 591
		foreach ($parametres as $cle => $valeur) {
1972 aurelien 592
			$valeur = self::renvoyerValeurDenullifiee($valeur);
2115 jpm 593
			$champs[] = $cle." = ".$valeur;
918 aurelien 594
		}
2115 jpm 595
		return $champs;
918 aurelien 596
	}
2115 jpm 597
 
1972 aurelien 598
	private static function renvoyerValeurDenullifiee($valeur) {
2115 jpm 599
		if (trim($valeur) == '' || trim($valeur) == 'null' || trim($valeur) == '000null') {
600
			$valeur = 'NULL';
1972 aurelien 601
		} else {
602
			$valeur = Cel::db()->proteger($valeur);
603
		}
604
		return $valeur;
605
	}
1908 raphael 606
}