Subversion Repositories eFlore/Applications.cel

Rev

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