Subversion Repositories eFlore/Applications.cel

Rev

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