Subversion Repositories eFlore/Applications.cel

Rev

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

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