Subversion Repositories eFlore/Applications.cel

Rev

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