Subversion Repositories eFlore/Applications.cel

Rev

Rev 2538 | Rev 2565 | Go to most recent revision | 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',
26
		'nom_referentiel', 'ce_zone_geo', 'zone_geo', 'lieudit', 'station', 'milieu', 'latitude', 'longitude',
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) {
2115 jpm 166
		// nous pouvons aussi retirer 'ce_utilisateur' (== $utilisateur) qui sera dans la clause WHERE
2165 jpm 167
		$exclusions = ['nom_sel_nn', 'nom_sel', 'nom_ret_nn', 'nom_referentiel', '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);
1908 raphael 177
 
2115 jpm 178
		$champ_maj = self::traiterParametresObservationEtConstruireSousRequeteMaj($parametres);
2165 jpm 179
		$nbreUpdate = count($champ_maj);
1908 raphael 180
 
2165 jpm 181
		if ($nbreUpdate > 0) {
182
			$champ_maj[] = 'date_modification = NOW()';
183
			$clauseSet = implode(', ', $champ_maj);
184
			$ordresListe = implode(', ', $ordre);
185
			$utilisateurIdP = Cel::db()->proteger($utilisateur);
1908 raphael 186
 
2165 jpm 187
			$requete = "UPDATE cel_obs SET $clauseSet ".
188
				"WHERE ordre IN ($ordresListe) ".
189
				"AND ce_utilisateur = $utilisateurIdP "
190
				.' -- '.__FILE__.':'.__LINE__;
191
			$nbreUpdate = Cel::db()->executer($requete);
192
		}
193
		return $nbreUpdate;
2115 jpm 194
		// TODO: return json_encode(updated_rows());
195
	}
1908 raphael 196
 
2115 jpm 197
 
918 aurelien 198
	/**
1527 aurelien 199
	* Modifie une observation publique dont l'id et l'utilisateur sont passé en paramètre
200
	*
201
	* @param int $utilisateur id utilisateur du proprietaire de l'observation
2115 jpm 202
	* @param int $id identifiant de l'observation
1527 aurelien 203
	* @param array $parametres tableau indexé avec les mêmes noms de champs que la bdd
204
	*
205
	* @return true ou false suivant le succès de l'opération
206
	*/
2152 jpm 207
	public function modifierObservationPublique($id_obs, $parametres) {
208
		$parametresDefaut = array(
2115 jpm 209
			'nom_sel_nn' => NULL,
210
			'nom_sel' => NULL,
211
			'nom_ret_nn' => NULL,
212
			'nom_referentiel' => NULL);
2152 jpm 213
		$parametres = array_merge($parametresDefaut, $parametres);
1752 raphael 214
 
1786 raphael 215
		$this->traiterEspece($parametres);
2538 aurelien 216
		$this->formaterParametresObservation($parametres);
1786 raphael 217
 
2115 jpm 218
		$champ_maj = self::traiterParametresObservationEtConstruireSousRequeteMaj($parametres);
2152 jpm 219
		$champ_maj[] = 'date_modification = NOW()';
1908 raphael 220
 
2152 jpm 221
		$requete = "UPDATE cel_obs SET " .
2115 jpm 222
			implode(', ', $champ_maj) .
2152 jpm 223
			" WHERE id_observation = ".Cel::db()->proteger($id_obs).
2115 jpm 224
			" AND transmission = 1 ".
225
			' -- ' . __FILE__ . ':' . __LINE__;
2152 jpm 226
		$resultat = Cel::db()->executer($requete);
1871 raphael 227
 
2152 jpm 228
		if ($resultat === false) {
229
			$this->logger("CEL_bugs", "Erreur de mise à jour de l'observation : ".$id_obs);
1527 aurelien 230
		}
2152 jpm 231
		return $resultat;
1527 aurelien 232
	}
2115 jpm 233
 
2486 jpm 234
	/**
235
	 * Si vous utiliser cette méthode, penser à mettre à jour les champs correspondant de la table cel_images.
236
	 * Pour ce faire, utiliser GetionImage->modifierTransmissionParObs().
237
	 * @param mixed $ids_obs_ou_tableau id d'observation ou tableau d'ids d'observation.
238
	 * @param bool $publier true pour publier, false pour dépublier.
239
	 * @return type
240
	 */
241
	public function modifierTransmissionObservation($idsObs, $publier) {
242
		$ids_obs_proteges = Cel::db()->proteger($idsObs);
243
		$idsObsConcat = is_array($ids_obs_proteges) ? implode(', ', $ids_obs_proteges) : $ids_obs_proteges;
2121 aurelien 244
		$etat_transmission = $publier ? 1 : 0;
2486 jpm 245
		$dateTransmission = $publier ? 'NOW()' : 'NULL';
2143 jpm 246
 
2486 jpm 247
		$requete = 'UPDATE cel_obs '.
248
			"SET transmission = $etat_transmission , date_transmission = $dateTransmission, date_modification = NOW() ".
249
			"WHERE id_observation IN ($idsObsConcat) ".
2143 jpm 250
			' -- ' . __FILE__ . ':' . __LINE__;
251
		$resultat = Cel::db()->executer($requete);
252
		return $resultat;
2121 aurelien 253
	}
2143 jpm 254
 
1527 aurelien 255
	/**
2115 jpm 256
	* Supprime une ou plusieurs observations grâce aux paramètres fournis
257
	*
918 aurelien 258
	* @param int $utilisateur id utilisateur du proprietaire de l'observation
259
	* @param mixed $ordre ordre(s) observation(s) relatif(s) à l'utilisateur: un seul ordre ou bien "ordre1,ordre2,ordre3" etc...
2115 jpm 260
	*
918 aurelien 261
	* @return true ou false suivant le succès de l'opération
262
	*/
263
	public function supprimerObservation($utilisateur, $ordre) {
2115 jpm 264
		// TODO changer le systeme pour n'utiliser plus que les id
265
		$retour = false;
266
		$tableau_ordre = explode(',', $ordre);
267
		$tableau_ordre = array_map(array(Cel::db(),'proteger'), $tableau_ordre);
268
		$ordre = implode(',', $tableau_ordre);
269
		$idUtilisateurP = Cel::db()->proteger($utilisateur);
1318 aurelien 270
 
2115 jpm 271
		$requete = 'SELECT id_observation AS id_obs '.
272
			'FROM cel_obs '.
273
			"WHERE ce_utilisateur = $idUtilisateurP ".
274
			"AND ordre IN ($ordre) ".
2165 jpm 275
			' -- '.__FILE__.':'.__LINE__;
2460 jpm 276
		$resultats = Cel::db()->requeter($requete);
1318 aurelien 277
 
2115 jpm 278
		$ids_obs = array();
279
		$ids_obs_non_protegees = array();
2460 jpm 280
		if (is_array($resultats) && count($resultats) > 0) {
281
			foreach ($resultats as $id_observation) {
2115 jpm 282
				$ids_obs[] = Cel::db()->proteger($id_observation['id_obs']);
283
				$ids_obs_non_protegees[] = $id_observation['id_obs'];
284
			}
1318 aurelien 285
 
2115 jpm 286
			$chaine_ids_obs = implode(',', $ids_obs);
287
			$requete = 'DELETE FROM cel_obs WHERE '.
288
				"ce_utilisateur = $idUtilisateurP ".
289
				"AND id_observation IN ($chaine_ids_obs) ".
2165 jpm 290
				' -- '.__FILE__.':'.__LINE__;
2460 jpm 291
			$resultat = Cel::db()->executer($requete);
2047 aurelien 292
 
2115 jpm 293
			// TODO: Faire la suppression des mots clés
294
			// et des liaisons obs images dans une ou des fonctions à part
2460 jpm 295
			if ($resultat === false) {
296
				$msg = "Erreur de suppression d'une liste d'observations : $resultat";
2115 jpm 297
				$this->logger('CEL_bugs', $msg);
298
			} else {
2446 jpm 299
				// TODO [jpm] : pourquoi on supprime pas les images si on supprime les obs ?
2115 jpm 300
				$gestion_mots_cles = new GestionMotsClesChemin($this->config, 'obs');
301
				$resultat_suppression_mots_cles = $gestion_mots_cles->supprimerToutesLiaisonsPourIdsElementsLies($ids_obs_non_protegees);
302
 
303
				if ($resultat_suppression_mots_cles === false) {
304
					$msg = "Erreur de suppression d'une liste de mots clés d'observation(s) : $resultat_suppression_mots_cles";
305
					$this->logger('CEL_bugs', $msg);
306
				} else {
307
					$retour = true;
308
				}
309
			}
310
		} else {
311
			$retour = true;
918 aurelien 312
		}
2115 jpm 313
		return $retour;
918 aurelien 314
	}
2115 jpm 315
 
1163 aurelien 316
	/**
2115 jpm 317
	 * Fonction utilisée pour importer les observations faites avec des comptes anonymes vers un
1163 aurelien 318
	 * utilisateur identifié
319
	 * @param string $ancien_id
320
	 * @param string $id_utilisateur
321
	 */
931 aurelien 322
	public function migrerObservations($ancien_id, $id_utilisateur) {
323
		//TODO faire une fonction plus complexe qui déplace, images, observations, mots-clés etc... d'un utilisateur à l'autre
2115 jpm 324
		// qui pourrait servir pour fusionner des comptes
931 aurelien 325
		$nouvel_ordre = $this->renvoyerDernierOrdreUtilisePlusUn($id_utilisateur);
2115 jpm 326
 
931 aurelien 327
		// Recuperation relevés associés a la session
2115 jpm 328
		$idAncienP = Cel::db()->proteger($ancien_id);
329
		$requete = 'SELECT ordre '.
330
			'FROM cel_obs '.
331
			"WHERE ce_utilisateur = $idAncienP ".
332
			'ORDER BY ordre '.
333
			' -- '.__FILE__.' : '.__LINE__;
2143 jpm 334
		$resultat = Cel::db()->requeter($requete);
2115 jpm 335
 
931 aurelien 336
		$reussite = true;
2115 jpm 337
		if (is_array($resultat)) {
338
			foreach ($resultat as $releve_temporaire) {
339
				$idUtilisateurP = Cel::db()->proteger($id_utilisateur);
340
				$ancienOrdre = $releve_temporaire['ordre'];
341
				$requete = 'UPDATE cel_obs SET '.
342
					"ce_utilisateur = $idUtilisateurP, ".
343
					"ordre = $nouvel_ordre ".
344
					"WHERE ce_utilisateur = $idAncienP ".
345
					"AND ordre = $ancienOrdre ".
346
					' -- '.__FILE__.' : '.__LINE__;
2143 jpm 347
				$migration_releve = Cel::db()->executer($requete);
2115 jpm 348
 
349
				//TODO: meilleure vérification
350
				if ($migration_releve === false) {
351
					$reussite = false;
352
				}
353
				$nouvel_ordre++;
354
			}
355
		}
356
		return $reussite;
931 aurelien 357
	}
2115 jpm 358
 
918 aurelien 359
	/**
1470 aurelien 360
	* Fonction utilisée pour importer les anciennes observations saisie dans les widget dans un compte identifié
361
	* Dans ce cas là, le widget remplit la case id_utilisateur par le mail indiqué lors de la saisie
362
	* @param string $mail_utilisateur
363
	* @param string $id_utilisateur
364
	*/
2115 jpm 365
	public function migrerObservationsMailVersId($mail_utilisateur, $infos_utilisateur) {
366
		// ATTENTION : cette fonction suppose que l'utilisateur n'ai pas déjà d'observations dans le CEL
367
		// avec l'identifiant $id_utilisateur ce qui est normalement le cas
1470 aurelien 368
		$requete_migration_releve = 'UPDATE cel_obs SET '.
2115 jpm 369
			'ce_utilisateur = '.Cel::db()->proteger($infos_utilisateur['id_utilisateur']).', '.
370
			'prenom_utilisateur = '.Cel::db()->proteger($infos_utilisateur['prenom']).', '.
371
			'nom_utilisateur = '.Cel::db()->proteger($infos_utilisateur['nom']).', '.
372
			'courriel_utilisateur = '.Cel::db()->proteger($infos_utilisateur['courriel']).' '.
373
			'WHERE ce_utilisateur = '.Cel::db()->proteger($mail_utilisateur).' '.
374
			' -- '.__FILE__.' : '.__LINE__;
1470 aurelien 375
 
2143 jpm 376
		$migration_releve = Cel::db()->executer($requete_migration_releve);
2115 jpm 377
 
1470 aurelien 378
		return $migration_releve;
379
	}
2115 jpm 380
 
1786 raphael 381
	private function traiterEspece(&$parametres) {
2115 jpm 382
		if (!$parametres['nom_referentiel']) {
1745 raphael 383
			$parametres['nom_referentiel'] = Cel::$default_referentiel;
1527 aurelien 384
		}
1745 raphael 385
		$code_referentiel = substr(trim($parametres['nom_referentiel']), 0, 5);
386
 
1752 raphael 387
		// TODO/XXX: quoi ?!
2115 jpm 388
		if (!$parametres['nom_sel_nn'] && !$parametres['nom_sel'] && $parametres['nom_ret_nn']) {
389
			$parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = '';
1659 aurelien 390
		}
918 aurelien 391
 
1745 raphael 392
		/* pour un nom saisi sans autocomplétion 3 cas de figure existent:
393
		   1) référentiel bdtfx
394
		   1.1) trouvé par le webservice => ref = bdtfx
395
		   1.2) pas trouvé par le webservice => ref = autre
396
		   2) si le référentiel est inconnu (explicitement mis à "autre"), alors pas d'appel au webservice => ref = autre */
2115 jpm 397
		if (in_array($code_referentiel, Cel::$referentiels_valides)) {
1788 raphael 398
			//
399
			$deuxieme_passe = true;
1752 raphael 400
			// nom saisi sans numéro
401
			if ($parametres['nom_sel'] && !$parametres['nom_sel_nn']) {
1745 raphael 402
				$chercheur_infos_complementaires = new RechercheInfosTaxonBeta($this->config, $code_referentiel);
403
				// Utilisation d'un nom sans numéro nomenclatural, recherche d'une correspondance sur le nom
404
				$complement = $chercheur_infos_complementaires->rechercherInformationsComplementairesSurNom($parametres['nom_sel']);
405
				// Si l'on a trouvé un résultat sur la recherche, il s'agit vraisemblablement d'un copié-collé
406
				// de nom de taxon qui n'a pas été validé par la selection
2115 jpm 407
				if ($complement) {
1788 raphael 408
					$parametres['nom_sel_nn'] = $complement->id;
409
					$parametres['nom_ret'] = RechercheInfosTaxonBeta::supprimerBiblio($complement->nom_retenu_complet);
410
					$parametres['nom_ret_nn'] = $complement->{"nom_retenu.id"};
411
					$parametres['nt'] = $complement->num_taxonomique;
412
					$parametres['famille'] = $complement->famille;
2115 jpm 413
				} else {
1745 raphael 414
					// pas de résultat de recherche sur le référentiel demandé, le webservice doit peut-être être corrigé
1788 raphael 415
					// mais en tout état de cause nous n'insérerons PAS de données incertaines associées à un référentiel !
1745 raphael 416
					$code_referentiel = Cel::$fallback_referentiel;
1788 raphael 417
					$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
418
					// goto out;
419
					$deuxieme_passe = false;
1745 raphael 420
				}
918 aurelien 421
			}
1425 aurelien 422
 
1788 raphael 423
			// XXX: ne devrait plus être nécessaire maintenant que rechercherInformationsComplementairesSurNom() [plus précisément effectuerRequeteUrlRecherche()]
424
			// a été modifiée pour retourner tous les champs nécessaire.
1905 raphael 425
			if ($deuxieme_passe && (! array_key_exists('nom_ret_nn', $parametres) || ! array_key_exists('nt', $parametres))) {
1745 raphael 426
				// Utilisation d'un nom faisant parti du referentiel : recherche du nom valide correspondant
427
				$chercheur_infos_complementaires = new RechercheInfosTaxonBeta($this->config , $code_referentiel);
1786 raphael 428
				$complement = $chercheur_infos_complementaires->effectuerRequeteInfosComplementairesSurNumNom($parametres['nom_sel_nn']);
1788 raphael 429
				// 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
430
				// la détection ne fonctionne plus : nous supprimons les données précédemment générées de la base !
2115 jpm 431
				if (!$complement) {
1788 raphael 432
					$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
433
				} else {
434
					$parametres['nom_ret'] = RechercheInfosTaxonBeta::supprimerBiblio($complement->nom_retenu_complet);
435
					$parametres['nom_ret_nn'] = $complement->{"nom_retenu.id"};
436
					$parametres['nt'] = $complement->num_taxonomique;
437
					$parametres['famille'] = $complement->famille;
438
				}
1745 raphael 439
			}
2460 jpm 440
		} else { // référentiel "autre": on vide !
1789 raphael 441
			$parametres['nom_sel_nn'] = $parametres['nom_ret'] = $parametres['nom_ret_nn'] = $parametres['nt'] = $parametres['famille'] = NULL;
442
		}
443
 
1745 raphael 444
		// mise à jour du référentiel utilisé, sans n° de version
445
		$parametres['nom_referentiel'] = $code_referentiel;
1786 raphael 446
	}
447
 
2115 jpm 448
	// uniquement nécessaire lors de l'ajout
449
	private function ajoutInfoUtilisateurARequete(&$parametres) {
450
		if (isset($parametres['ce_utilisateur'])) {
451
			$infos_utilisateur = $this->getInfosComplementairesUtilisateur($parametres['ce_utilisateur']);
452
			$parametres['courriel_utilisateur'] = $infos_utilisateur['courriel'];
453
			$parametres['nom_utilisateur'] = $infos_utilisateur['nom'];
454
			$parametres['prenom_utilisateur'] = $infos_utilisateur['prenom'];
455
		}
456
	}
1908 raphael 457
 
1786 raphael 458
	/**
2115 jpm 459
	* Formate les paramètres fournis en ajoutant des infos complementaires
460
	*
1786 raphael 461
	* @param array $parametres tableau indexé avec les mêmes noms de champs que la bdd
462
	* @return $parametres le tableau modifié selon ce qu'il contenait
463
	*/
2538 aurelien 464
	public function formaterParametresObservation(&$parametres) {
918 aurelien 465
		// Pour empecher que des numéros de département de 1 à 9 soient saisis sans 0
466
		// TODO: décider quoi faire pour les zones géo plus générales
2115 jpm 467
		if (isset($parametres['ce_zone_geo'])) {
2538 aurelien 468
			if ($parametres['ce_zone_geo'] == 'null' || trim($parametres['ce_zone_geo']) == "" || !is_numeric($parametres['ce_zone_geo'])) {
2115 jpm 469
				$parametres['ce_zone_geo'] = "";
470
			} else {
471
				if (strlen($parametres['ce_zone_geo']) == 4) {
472
					$parametres['ce_zone_geo'] = '0'.$parametres['ce_zone_geo'];
473
				}
918 aurelien 474
 
2115 jpm 475
				if (strlen($parametres['ce_zone_geo']) > 0 && strlen($parametres['ce_zone_geo']) <= 2) {
476
					$parametres['ce_zone_geo'] = Cel::obtenirCodeInseeCommunePourNomEtDepartement($parametres['zone_geo'], $parametres['ce_zone_geo']);
477
				} else {
478
					$parametres['ce_zone_geo'] = 'INSEE-C:'. $parametres['ce_zone_geo'];
479
				}
2538 aurelien 480
				$parametres['pays'] = 'FR';
2115 jpm 481
			}
482
		}
483
 
2538 aurelien 484
		// TODO: Fusionner cette partie et la partie du dessus en une fonction qui complete toutes les infos
485
		// géo, quand on sera riche et qu'on aura du temps
486
		if(empty($parametres['pays']) && !empty($parametres['latitude']) && !empty($parametres['longitude'])) {
487
			$recherche_pays = new RechercheInfosZoneGeo($this->config);
488
			$infos_pays = $recherche_pays->obtenirInfosPourCoordonnees($parametres);
489
			if($infos_pays['type'] == 'france') {
490
				$parametres['pays'] = 'FR';
491
				// Ajout d'infos supplémentaires si jamais on a pas de ce zone geo ou de zone geo
492
				if(empty($parametres['ce_zone_geo'])) {
493
					$parametres['ce_zone_geo'] = 'INSEE-C:'.$infos_pays['code_insee'];
494
				}
495
 
496
				if(empty($parametres['zone_geo'])) {
497
					$parametres['zone_geo'] = $infos_pays['nom'];
498
				}
499
			} else {
500
				$parametres['pays'] = $infos_pays['code_pays'];
501
			}
502
		}
503
 
2115 jpm 504
		// TODO : voir si l'on peut utiliser un des fonctions de la classe cel
505
		if (isset($parametres['date_observation']) && $parametres['date_observation'] != 'null') {
506
			//TODO: prendre en compte des dates incomplètes ?
507
			if (count(explode('/', $parametres['date_observation'])) >= 3) {
508
				list($jour,$mois,$annee) = explode('/', $parametres['date_observation']);
509
				$parametres['date_observation'] = $annee.'-'.$mois.'-'.$jour.' 0:0:0';
510
			}
511
		}
918 aurelien 512
	}
2115 jpm 513
 
918 aurelien 514
	/**
515
	* Assemble une sous requete pour un ajout, tout en formatant les paramètres et en recherchant
516
	* les infos complémentaires
2115 jpm 517
	*
518
	* @param array $parametres un tableau avec les index correspondant aux champs de la bdd
519
	*
918 aurelien 520
	* @return string une sous requete utilisable pour l'ajout d'une observation
2115 jpm 521
	*/
918 aurelien 522
	private function traiterParametresObservationEtConstruireSousRequeteAjout($parametres) {
523
		$champs = '';
524
		$valeurs = '';
525
		// Nullifiage ...
526
		// TODO: code dupliqué, en faire une fonction à mettre à la place appropriée
2460 jpm 527
		foreach ($parametres as $cle => $valeur) {
2115 jpm 528
			$valeur = self::renvoyerValeurDenullifiee($valeur);
918 aurelien 529
			$champs .= $cle.', ';
1332 aurelien 530
			$valeurs .= $valeur.', ';
918 aurelien 531
		}
532
		$champs = '('.$champs.'mots_cles_texte, transmission, date_creation, date_modification, date_transmission)';
2486 jpm 533
		$valeurs = '('.$valeurs.'"", 0, NOW(), NOW(), NULL)';
2115 jpm 534
 
2460 jpm 535
		$sous_requete = $champs.' VALUES '.$valeurs;
918 aurelien 536
		return $sous_requete;
537
	}
2115 jpm 538
 
918 aurelien 539
	/**
540
	 * Assemble une sous requete pour une mise à jour, tout en formatant les paramètres et en recherchant
541
	 * les infos complémentaires
2115 jpm 542
	 *
543
	 * @param array $parametres un tableau avec les index correspondant aux champs de la bdd
544
	 *
918 aurelien 545
	 * @return string une sous requete utilisable pour la modification d'une observation
2115 jpm 546
	 * selon la syntaxe UPDATE table SET colonne1 = valeur1, colonne2 = valeur2 WHERE condition
547
	 */
1908 raphael 548
	static function traiterParametresObservationEtConstruireSousRequeteMaj($parametres) {
918 aurelien 549
		// Nullifiage ...
550
		// TODO: code dupliqué, en faire une fonction à mettre à la place appropriée
2460 jpm 551
		$champs = array();
2115 jpm 552
		foreach ($parametres as $cle => $valeur) {
1972 aurelien 553
			$valeur = self::renvoyerValeurDenullifiee($valeur);
2460 jpm 554
			$champs[] = $cle.' = '.$valeur;
918 aurelien 555
		}
2115 jpm 556
		return $champs;
918 aurelien 557
	}
2115 jpm 558
 
1972 aurelien 559
	private static function renvoyerValeurDenullifiee($valeur) {
2115 jpm 560
		if (trim($valeur) == '' || trim($valeur) == 'null' || trim($valeur) == '000null') {
561
			$valeur = 'NULL';
1972 aurelien 562
		} else {
563
			$valeur = Cel::db()->proteger($valeur);
564
		}
565
		return $valeur;
566
	}
2165 jpm 567
}