Subversion Repositories eFlore/Applications.cel

Rev

Rev 3546 | Rev 3548 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
719 jpm 1
<?php
2
// declare(encoding='UTF-8');
3
/**
4
 * Service permettant d'insérer les informations fournie par le widget Saisie dans le CEL.
5
 *
6
 * Cas d'utilisation :
7
 * PUT /CelWidgetSaisie : ajout de données en les passant via $_POST
8
 *
2461 jpm 9
 * @internal   Mininum PHP version : 5.2
10
 * @category   CEL
11
 * @package    Services
2462 jpm 12
 * @subpackage Widget
2461 jpm 13
 * @version    0.1
14
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
15
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
16
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
17
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
18
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
19
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
719 jpm 20
 */
2056 aurelien 21
class CelWidgetSaisie extends Cel {
1068 jpm 22
 
830 jpm 23
	private $projet = null;
3539 delphine 24
	private $projetId = null;
1896 jpm 25
	private $projetTags = array();
1350 aurelien 26
	private $tagsObs = null;
27
	private $tagsImg = null;
3520 killian 28
	private $userId = null;
29
	private $userEmail = null;
30
	private $userIntitule = null;
31
	private $isFromPlantNet = false;
2370 mathias 32
	const DUREE_DE_VIE_IMG = 86400;// 3600 * 24 = 86 400 (1 journée)
1350 aurelien 33
	const ARRET_SERVICE = false;// Permet de bloquer le service en cas de problème sur le serveur
1565 jpm 34
 
1498 aurelien 35
	private $correspondanceIdImgTags = array();
2056 aurelien 36
	private $gestionMotsClesObs = null;
37
	private $gestionMotsClesImages = null;
1068 jpm 38
 
830 jpm 39
	public function createElement($requeteDonnees) {
1350 aurelien 40
		if (self::ARRET_SERVICE) {
41
			$this->messages[] = "Désactivation temporaire du service d'envoi des données au CEL.";
42
		} else if (array_key_exists('projet', $requeteDonnees)) {
1896 jpm 43
			$this->debug[] = 'Projet : '.$requeteDonnees['projet'];
3543 delphine 44
			if ($requeteDonnees['projet'] != "base") {
45
    			$this->projet = $requeteDonnees['projet'];
46
    			$this->projetId = $requeteDonnees['id_projet'];
47
			}
1896 jpm 48
 
3520 killian 49
			// Si c'est une obs Pl@ntNet
3111 mathias 50
			if (! empty($requeteDonnees['tag-obs']) && strpos(strtolower($requeteDonnees['tag-obs']), 'plantnet') !== false) {
3520 killian 51
				$this->isFromPlantNet = true;
3111 mathias 52
			}
53
 
1896 jpm 54
			// Traitements des tags multiples de projet
55
			$this->traiterProjetTags();
56
 
2370 mathias 57
			// Traitement des tags spécifiques aux obs
1896 jpm 58
			$this->traiterTagObs($requeteDonnees);
59
 
2370 mathias 60
			// Traitement des tags spécifiques aux images
1896 jpm 61
			$this->traiterTagImg($requeteDonnees);
62
 
63
			// Traitement des observations et des images
3520 killian 64
			if (isset($requeteDonnees['utilisateur']['courriel']) && filter_var($requeteDonnees['utilisateur']['courriel'], FILTER_VALIDATE_EMAIL)) {
1896 jpm 65
				$this->debug[] = 'Utilisateur : '.print_r($requeteDonnees['utilisateur'], true);
830 jpm 66
				$utilisateur = $requeteDonnees['utilisateur'];
3520 killian 67
				// début transaction car si insertions par le même utilisateur en parallèle,
68
				// De plus, ça permet de ne pas conserver les données d'obs si l'image provoque une erreur
69
				//Cel::db()->setAttribute(PDO::ATTR_AUTOCOMMIT, false);
70
				Cel::db()->beginTransaction();
71
				$erreursDurantTraitement = false;
72
				$nomsOriginauxImagesTemp = array();
2342 mathias 73
 
3520 killian 74
				// hop on récupère les infos de l'utilisateur
75
				$infosUtilisateur = $this->infosInscritTela($utilisateur['courriel']);
76
				if ($infosUtilisateur) {
77
					$this->userId = $infosUtilisateur['id'];
78
					$this->userIntitule = $infosUtilisateur['intitule'];
79
				} else {
80
					$this->userId = '';
81
					$this->userIntitule = $utilisateur['prenom'] . ' ' . $utilisateur['nom'];
82
				}
83
				$this->userEmail = $utilisateur['courriel'];
1068 jpm 84
 
3520 killian 85
				$this->debug[] = 'Courriel : ' . $this->userEmail;
86
				$requeteDonnees = $this->supprimerSlashesProfond($requeteDonnees);
87
				// Triage et manipulation des données
88
				$observations = array();
89
				foreach ($requeteDonnees as $cle => $obs) {
90
					if (preg_match('/^obsId[0-9]+$/', $cle)) {
91
						$this->debug[] = 'commune_nom : '.$obs['commune_nom'];
3526 killian 92
						$this->debug[] = 'commune_code_insee : '. (isset($obs['commune_code_insee']) ? $obs['commune_code_insee'] : 'n/a');
1350 aurelien 93
 
3520 killian 94
						$obsAAjouter = array();
95
						$obsAAjouter['user_id'] = $this->userId;
96
						$obsAAjouter['user_email'] = $this->userEmail;
97
						$obsAAjouter['user_pseudo'] = $this->userIntitule;
1350 aurelien 98
 
3520 killian 99
						$obsAAjouter['user_sci_name'] = isset($obs['nom_sel']) ? $obs['nom_sel'] : null;
100
						$obsAAjouter['user_sci_name_id'] = isset($obs['num_nom_sel']) ? $obs['num_nom_sel'] : null;
3547 killian 101
						$obsAAjouter['accepted_sci_name'] = isset($obs['nom_ret']) ? $obs['nom_ret'] : null;
3520 killian 102
						$obsAAjouter['accepted_sci_name_id'] = isset($obs['num_nom_ret']) ? $obs['num_nom_ret'] : null;
3534 delphine 103
						$obsAAjouter['family'] = isset($obs['famille']) ? $obs['famille'] : null;
3520 killian 104
						$obsAAjouter['taxo_repo'] = isset($obs['referentiel']) ? ($obs['referentiel'] == 'bdtfxr') ? 'bdtfx' : $obs['referentiel'] : null;
1350 aurelien 105
 
3520 killian 106
						$obsAAjouter['date_observed'] = $this->transormerDateFrVersMysql($obs['date']);
107
						$obsAAjouter['annotation'] = isset($obs['notes']) ? $obs['notes'] : null;
1350 aurelien 108
 
3520 killian 109
						// Pays est pour le moment sur un varchar(2) dans la base
110
						// alors qu'il est envoyé complet par le script WidgetSaisie
111
						$obsAAjouter['osm_country'] = (isset($obs['pays'])) ? $obs['pays'] : null;
112
						$obsAAjouter['locality'] = $obs['commune_nom'];
3522 killian 113
						$obsAAjouter['locality_insee_code'] = isset($obs['commune_code_insee']) ? $obs['commune_code_insee'] : '';
3520 killian 114
						$obsAAjouter['sublocality'] = isset($obs['lieudit']) ? $obs['lieudit'] : null;
115
						$obsAAjouter['station'] = isset($obs['station']) ? $obs['station'] : null;
116
						$obsAAjouter['environment'] = isset($obs['milieu']) ? $obs['milieu'] : null;
117
						$obsAAjouter['elevation'] = (! empty($obs['altitude'])) ? $obs['altitude'] : null;
118
						$obsAAjouter['geometry'] = $obs['geometry'] ?? json_encode([
119
							'type' => 'Point',
120
							'coordinates' => [ $obs['longitude'], $obs['latitude'] ]
121
						]); // CONCAT('{\"type\":\"Point\",\"coordinates\":[', longitude, ',', latitude,']}'),
122
						$obsAAjouter['geodatum'] = 'WGS84';
1896 jpm 123
 
3520 killian 124
						$obsAAjouter['phenology'] = isset($obs['phenologie']) ? $obs['phenologie'] : null;
125
						$obsAAjouter['coef'] = isset($obs['abondance']) ? $obs['abondance'] : null;
1350 aurelien 126
 
3520 killian 127
						$obsAAjouter['is_public'] = '1';
128
						$obsAAjouter['date_created'] = date('Y-m-d H:i:s');
129
						$obsAAjouter['date_updated'] = $obsAAjouter['date_created'];
130
						$obsAAjouter['date_published'] = $obsAAjouter['date_created'];
1565 jpm 131
 
3530 killian 132
						$obsAAjouter['image_nom'] = $obs['image_nom'] ?? null;
133
						$obsAAjouter['image_b64'] = $obs['image_b64'] ?? null;
134
 
3528 killian 135
						$obsAAjouter['certainty'] = '';
136
						if (isset($obs['certitude'])) {
137
							switch ($obs['certitude']) {
138
								case 'certaine':
139
									$obsAAjouter['certainty'] = 'certain';
140
									break;
141
								case 'douteuse':
142
									$obsAAjouter['certainty'] = 'douteux';
143
									break;
144
								default:
145
									$obsAAjouter['certainty'] = $obs['certitude'];
146
									break;
147
							}
148
						}
3534 delphine 149
						$obsAAjouter['input_source'] = 'widget';
3540 delphine 150
						$obsAAjouter['project_id'] = $this->projetId;
3539 delphine 151
						$obsAAjouter['project'] = $this->projet;
3520 killian 152
						if ($this->isFromPlantNet) {
153
							$obsAAjouter['input_source'] = 'PlantNet';
154
							$obsAAjouter['plantnet_id'] = $obs['obs_id'];
155
						}
1068 jpm 156
 
3520 killian 157
						$obsAAjouter['obs_etendue'] = isset($obs['obs_etendue']) ? $obs['obs_etendue'] : array();
1068 jpm 158
 
3520 killian 159
						// Tentative d'enrichissement des données taxonomiques
160
						// @TODO attention aux perfs, aux timeouts de WS etc.
161
						$this->enrichirDonneesTaxonomiques($obsAAjouter);
1806 raphael 162
 
3520 killian 163
						$observations[] = $this->protegerTableau($obsAAjouter);
164
					}
165
				}
166
				$this->debug[] = 'Nbre obs ajoutée : '.count($observations);
167
				$this->debug[] = 'projet : '.$this->projet;
168
				$this->debug[] = 'tagsObs : '.print_r($this->tagsObs, true);
169
				$this->debug[] = 'tagsImg : '.print_r($this->tagsImg, true);
3072 mathias 170
 
3520 killian 171
				// Insertion dans la base
172
				$obs_a_taguer_ids = array();
173
				$img_a_taguer_ids_noms = array();
174
				$champsEtendusObs = array();
175
				foreach ($observations as $obs) {
176
					$obs_etendue = $obs['obs_etendue'];
3546 delphine 177
					if (isset($obs['image_nom'])) { $obs_images['image_nom'] = $obs['image_nom'];}
178
					if (isset($obs['image_b64'])) {$obs_images['image_b64'] = $obs['image_b64'];}
3520 killian 179
					unset($obs['obs_etendue']);
3530 killian 180
					unset($obs['image_nom']);
181
					unset($obs['image_b64']);
182
 
3520 killian 183
					$champs = implode(', ', array_keys($obs));
184
					$valeurs = implode(', ', $obs);
185
					$requete = "INSERT INTO occurrence ($champs) VALUES ($valeurs) ";
1068 jpm 186
 
3520 killian 187
					if (Cel::db()->executer($requete) === false) {
188
						$erreursDurantTraitement = true;
189
						$this->messages[] = "Un problème est survenu lors de l'insertion de l'obs dans la base de données.";
190
					}
1068 jpm 191
 
3520 killian 192
					// récupérer l'id de l'obs nouvellement insérée
193
					$idNouvelleObs = Cel::db()->obtenirDernierId();
194
					$obs_a_taguer_ids[] = $idNouvelleObs;
195
					$champsEtendusObs[$idNouvelleObs] = $obs_etendue;
1350 aurelien 196
 
3520 killian 197
					$imgAAjouter = null;
3536 delphine 198
					if (!empty($obs_images)) {
3530 killian 199
						$imgAAjouter = $this->traiterImagesALierAObs($idNouvelleObs, $obs_images);
3520 killian 200
						if ($imgAAjouter != null) {
201
							foreach ($imgAAjouter as $uneImgAAjouter) {
202
								$nomsOriginauxImagesTemp[] = $uneImgAAjouter['nom'];
1350 aurelien 203
							}
3520 killian 204
						}
205
					}
1565 jpm 206
 
3520 killian 207
					// si le formulaire contient une image on la traite
208
					if ($imgAAjouter != null) {
209
						$this->nettoyerImagesUploades();
210
						$img_a_taguer_ids_noms = $this->stockerImagesEtLierAObs($idNouvelleObs, $imgAAjouter);
211
						if ($img_a_taguer_ids_noms === false) {
212
							$erreursDurantTraitement = true;
213
							$this->messages[] = "Au moins une des images n'a pas pu être enregistrée.";
214
						} else {
215
							$cmd = sprintf($this->config['cel']['commande_script_images'],implode(',', array_keys($img_a_taguer_ids_noms)));
216
							pclose(popen($cmd,"r"));
719 jpm 217
						}
3520 killian 218
					}
219
				}
2143 jpm 220
 
3520 killian 221
				$this->gestionMotsClesObs = new GestionMotsClesChemin($this->config,'obs');
222
				$this->gestionMotsClesImages = new GestionMotsClesChemin($this->config,'images');
1565 jpm 223
 
3520 killian 224
				$this->taguerObs($obs_a_taguer_ids);
225
				if ($img_a_taguer_ids_noms !== false) {
226
					$this->taguerImg(array_keys($img_a_taguer_ids_noms));
227
				}
1565 jpm 228
 
3520 killian 229
				// Les champs taggés sont des champs supplémentaires stockés sous forme de clé => valeur
230
				$this->ajouterChampsEtendusObs($obs_a_taguer_ids, $champsEtendusObs);
231
				// Fin de la transaction - on considère que commit() et rollback() ne ratent jamais
232
				if ($erreursDurantTraitement === false) {
233
					// Suppression des fichiers images temporaires
234
					$this->nettoyerImagesUploades($nomsOriginauxImagesTemp);
235
					Cel::db()->commit();
236
				} else {
237
					// On annule l'écriture des images enregistrées sur le disque dur - la transaction
238
					// se charge de les retirer de la base de données
239
					if ($img_a_taguer_ids_noms !== false) {
240
						foreach (array_keys($img_a_taguer_ids_noms) as $idImageASupprimer) {
241
							$this->effacerImageDuDd($idImageASupprimer);
2370 mathias 242
						}
243
					}
3520 killian 244
					Cel::db()->rollBack();
719 jpm 245
				}
246
			} else {
2826 mathias 247
				$this->messages[] = '[' . $requeteDonnees['utilisateur']['courriel'] . "] n'est pas une adresse email valide.";
719 jpm 248
			}
249
		} else {
830 jpm 250
			$this->messages[] = "Les informations concernant le projet coopératif n'ont pas été transmises.";
824 jpm 251
		}
1896 jpm 252
		if (count($this->messages) > 0) {
253
			$this->debug[] = print_r($this->messages, true);
254
		}
2370 mathias 255
		if (count($this->messages) > 0) {
256
			$msg = 'erreur';
257
			$idNouvelleObs = null;
258
		} else {
259
			$msg = 'ok';
260
		}
2828 mathias 261
		// renvoi des infos d'images (id, nom) ordonnées, en plus des infos obs.
262
		$infosImages = array();
2843 mathias 263
		if (! empty($img_a_taguer_ids_noms)) {
264
			foreach ($img_a_taguer_ids_noms as $id => $nom) {
265
				$infosImages[] = array(
266
					'id' => $id,
267
					'nom' => $nom
268
				);
269
			}
2828 mathias 270
		}
271
		$retour = (object) array(
272
			'msg' => $msg,
273
			'id' => $idNouvelleObs,
274
			'images' => $infosImages
275
		);
1068 jpm 276
		$this->envoyerJson($retour);
1719 aurelien 277
		exit;
719 jpm 278
	}
1565 jpm 279
 
3072 mathias 280
	/**
3520 killian 281
	 * Retourne les infos du compte correspondant à $courriel
282
	 * si présent dans l'annuaire Tela,
3111 mathias 283
	 * false sinon
284
	 */
3520 killian 285
	protected function infosInscritTela($courriel) {
3112 mathias 286
		if (empty($courriel)) {
287
			return false;
288
		}
3111 mathias 289
		// interrogation de l'annuaire
290
		$url = sprintf($this->config['settings']['baseURLServicesAnnuaireTpl'], 'utilisateur/identite-par-courriel/' . $courriel);
291
		$retour = file_get_contents($url);
3112 mathias 292
		if (! $retour) {
293
			return false;
294
		}
3111 mathias 295
		try {
296
			$retour = json_decode($retour, true);
297
		} catch (Exception $e) {
298
			return false;
299
		}
3520 killian 300
		if (isset($retour['error'])) {
301
			return false;
302
		}
3111 mathias 303
		// le service annuaire a retourné qqch de valide
3520 killian 304
		return array_shift($retour);
3111 mathias 305
	}
306
 
307
	/**
308
	 * Retourne true si les champs suivants sont présents dans le tableau :
3527 killian 309
	 *  - obsId1[user_sci_name]
3111 mathias 310
	 *  - obsId1[latitude]' : obs.geoloc.lat || '',
311
           'obsId1[longitude]' : obs.geoloc.lon || '',
312
	 *  mot-clé "pn:referentiel"
313
	 */
314
	protected function estUneDonneeQualifiee($donnees) {
315
		// vérifier date et géoloc
316
		// lancer enrichirDonneesTaxonomiques et vérifier si ça a retrouvé un nn
317
	}
318
 
319
	/**
3072 mathias 320
	 * Si les données taxonomiques sont incomplètes dans $obs
3527 killian 321
	 * (clefs 'nom_sel_nn', 'user_sci_name', 'taxo_repo', 'accepted_sci_name_id',
322
	 * 'accepted_sci_name', 'family'), tente d'en récupérer un maximum à l'aide des
3072 mathias 323
	 * services eFlore, à condition que soient mentionnés au moins :
324
	 *  - un nom de référentiel
3527 killian 325
	 *  - un nom_sel_nn OU un user_sci_name
3072 mathias 326
	 */
327
	protected function enrichirDonneesTaxonomiques(&$obs) {
328
		// sans référentiel, on ne peut rien faire
3527 killian 329
		if (! empty($obs['taxo_repo'])) {
3111 mathias 330
			// copies locales pour ne pas abimer les données d'entrée
3534 delphine 331
			$nn = $obs['user_sci_name_id'];
3527 killian 332
			$ref = $obs['taxo_repo'];
333
			$ns = $obs['user_sci_name'];
334
			$nr = $obs['accepted_sci_name'];
335
			$nnr = $obs['accepted_sci_name_id'];
336
			$fam = $obs['family'];
3072 mathias 337
 
3527 killian 338
			// si j'ai un nn, tentative de retrouver le nnr, le user_sci_name,
339
			// le accepted_sci_name et la famille, s'ils ne sont pas déjà présents (on
3072 mathias 340
			// pourrait les écraser systématiquement mais l'appel au service
341
			// dégrade les perfs)
342
			if ((! empty($nn) && is_numeric($nn))
3527 killian 343
				// omission du test sur 'accepted_sci_name' car le service eFlore noms ne le retourne que sans auteur (pas bon)
344
				&& (empty($ns) || empty($nnr) || empty($fam) /*|| empty($nr)*/)) {
3072 mathias 345
				// go
346
				$this->enrichirDonneesTaxonomiquesParNN($ref, $nn, $obs);
347
			} else {
348
				// si j'ai un nom complet, avec un peu de bol il sera dans le référentiel
349
				if ((! empty($ns))
3527 killian 350
					&& (empty($nn) || empty($nnr) || empty($fam) /*|| empty($nr)*/)) {
3072 mathias 351
					// go
352
					$this->enrichirDonneesTaxonomiquesParNS($ref, $ns, $obs);
353
				}
354
			} // sinon fuque
355
 
356
		}
357
	}
358
 
359
	/**
360
	 * Enrichit le tableau $obs destiné à être inséré dans le BDD, en
361
	 * interrogeant le service eFlore/noms par référentiel + nom scientifique
362
	 * avec auteur
363
	 */
364
	protected function enrichirDonneesTaxonomiquesParNS($ref, $ns, &$obs) {
365
		$url_nom = $this->config['eflore']['url_service_nom'];
366
		$url_nom = str_replace('{referentiel}', $ref, $url_nom);
3073 mathias 367
		$url_nom .= '?recherche=etendue&ns.structure=au&masque=' . urlencode($ns);
3072 mathias 368
		// un horrible @ car les erreurs de file_get_contents() ne sont pas try/catchables
369
		// @TODO mettre du cURL à l'occase
370
		$infos_nom = @file_get_contents($url_nom);
371
		if ($infos_nom != NULL) {
372
			try {
373
				$infos_nom = json_decode($infos_nom, true);
374
				if (count($infos_nom['resultat']) > 0) {
375
					$nn_trouve = null;
376
					$ret_trouve = false;
3073 mathias 377
					// on prend le nom avec auteur correspondant exactement;
378
					// s'il y en a plusieurs on prend le premier qui est retenu
3072 mathias 379
					foreach($infos_nom['resultat'] as $n => $nom) {
3073 mathias 380
						if (! $ret_trouve) {
381
							if ($nom['nom_sci_complet'] == $ns) {
382
								if ($nn_trouve == null || $nom['retenu'] == 'true') {
383
									$nn_trouve = $n;
384
									$ret_trouve = ($nom['retenu'] == 'true');
385
								}
386
							}
3072 mathias 387
						}
388
					}
389
					if ($nn_trouve != null) {
390
						// gagné !
3527 killian 391
						$obs['user_sci_name_id'] = $nn_trouve;
3072 mathias 392
						// et maintenant on recolle ce qu'on peut à partir du nn
393
						$this->enrichirDonneesTaxonomiquesParNN($ref, $nn_trouve, $obs);
394
					}
395
				}
396
			} catch(Exception $e) {
397
				// échec silencieux
398
			}
399
		}
400
	}
401
 
402
	/**
403
	 * Enrichit le tableau $obs destiné à être inséré dans le BDD, en
404
	 * interrogeant le service eFlore/noms par référentiel + nn
405
	 */
406
	protected function enrichirDonneesTaxonomiquesParNN($ref, $nn, &$obs) {
407
		$url_nom = $this->config['eflore']['url_service_nom'];
408
		$url_nom = str_replace('{referentiel}', $ref, $url_nom);
409
		$url_nom .= '/' . $nn;
410
		// un horrible @ car les erreurs de file_get_contents() ne sont pas try/catchables
411
		// @TODO mettre du cURL à l'occase
412
		$infos_nom = @file_get_contents($url_nom);
413
		if ($infos_nom != NULL) {
414
			try {
415
				$infos_nom = json_decode($infos_nom, true);
416
				// une fois qu'on a les infos, on écrase tout
3529 killian 417
				if ($infos_nom['nom_sci_complet'] != null) {
418
					$obs['user_sci_name'] = $infos_nom['nom_sci_complet'];
3072 mathias 419
				}
3529 killian 420
				if ($infos_nom['nom_retenu_complet'] != null) {
421
					$obs['accepted_sci_name'] = $infos_nom['nom_retenu_complet'];
422
				}
3072 mathias 423
				if ($infos_nom['nom_retenu.id'] != null) {
3527 killian 424
					$obs['accepted_sci_name_id'] = $infos_nom['nom_retenu.id'];
3072 mathias 425
				}
3527 killian 426
				// manque le accepted_sci_name retourné sans auteur (insatisfaisant)
3072 mathias 427
				if ($infos_nom['famille'] != null) {
3527 killian 428
					$obs['family'] = $infos_nom['family'];
3072 mathias 429
				}
430
			} catch(Exception $e) {
431
				// échec silencieux
432
			}
433
		}
434
	}
435
 
1896 jpm 436
	private function traiterProjetTags() {
437
		if (strpos($this->projet, ',') === false) {
438
			$this->projetTags = array('Projets coopératifs>'.$this->projet);
439
		} else {
440
			$projetTagsTxt = explode(',', $this->projet);
441
			foreach ($projetTagsTxt as $tag) {
442
				$this->projetTags[] = 'Projets coopératifs>'.$tag;
443
			}
444
		}
445
	}
446
 
447
	private function traiterTagObs($requeteDonnees) {
448
		if (array_key_exists('tag-obs', $requeteDonnees) && $requeteDonnees['tag-obs'] != '') {
449
			$this->tagsObs = explode(',', $requeteDonnees['tag-obs']);
450
		}
451
		foreach ($this->projetTags as $tag) {
452
			$this->tagsObs[] = $tag;
453
		}
454
	}
455
 
456
	private function traiterTagImg($requeteDonnees) {
457
		if (array_key_exists('tag-img', $requeteDonnees) && $requeteDonnees['tag-img'] != '') {
458
			$this->tagsImg = explode(',', $requeteDonnees['tag-img']);
459
		}
460
		foreach ($this->projetTags as $tag) {
461
			$this->tagsImg[] = $tag;
462
		}
463
	}
464
 
1512 aurelien 465
	private function ajouterChampsEtendusObs($obs_ids, $obs_a_champs_etendus) {
466
		$champs_etendus_obs = array();
1565 jpm 467
		$gestionChampsEtendus = new GestionChampsEtendus($this->config, 'obs');
468
 
469
		foreach ($obs_ids as $id_obs) {
1512 aurelien 470
			$champs = array_shift($obs_a_champs_etendus);
1565 jpm 471
			if ($champs != null && is_array($champs)) {
472
				foreach ($champs as $infosChamp) {
473
					$cle = isset($infosChamp['cle']) ? $infosChamp['cle'] : '';
474
					$valeur = isset($infosChamp['valeur']) ? $infosChamp['valeur'] : '';
475
 
3391 idir 476
					if (!empty($cle) && $valeur !== '') {
3474 killian 477
						$champEtendu = new ObsEtendue();
1565 jpm 478
						$champEtendu->id = $id_obs;
479
						$champEtendu->cle = $cle;
480
						$champEtendu->valeur = $valeur;
481
 
482
						$champs_etendus_obs[] = $champEtendu;
483
					}
1512 aurelien 484
				}
485
			}
486
		}
1903 raphael 487
 
488
        if(! $champs_etendus_obs) return TRUE;
489
 
3538 delphine 490
		return $gestionChampsEtendus->ajouterParLots($champs_etendus_obs, $this->projet);
1512 aurelien 491
	}
1565 jpm 492
 
3530 killian 493
	private function traiterImagesALierAObs($idObs, $obsImages) {
1498 aurelien 494
		$imgAAjouter = null;
3530 killian 495
		if (is_array($obsImages['image_nom'])) {
1498 aurelien 496
			$imgAAjouter = array();
3530 killian 497
			foreach ($obsImages['image_nom'] as $index => $nom_image) {
1498 aurelien 498
				$image = array();
3520 killian 499
				$image['id_utilisateur'] = $this->userId;
500
				$image['id_obs'] = $idObs;
1498 aurelien 501
				$image['nom'] = $nom_image;
1565 jpm 502
				// on suppose que les b64 des images sont envoyés dans le même ordre que leurs noms
1498 aurelien 503
				// TODO: indexer le tableau avec le nom des images
3530 killian 504
				$image['b64'] = isset($obsImages['image_b64'][$index]) ? $obsImages['image_b64'][$index] : '';
505
				$this->debug[] = 'Contient B64 : '.(empty($obsImages['image_b64']) ? 'non' : 'oui');
1498 aurelien 506
				$imgAAjouter[] = $image;
507
			}
508
		} else {
3530 killian 509
			if (!empty($obsImages['image_nom'])) {
1498 aurelien 510
				$imgAAjouter = array();
3520 killian 511
				$imgAAjouter['id_utilisateur'] = $this->userId;
512
				$imgAAjouter['id_obs'] = $idObs;
3530 killian 513
				$imgAAjouter['nom'] = $obsImages['image_nom'];
514
				$imgAAjouter['b64'] = isset($obsImages['image_b64']) ? $obsImages['image_b64'] : array();
515
				$this->debug[] = 'Contient B64 : '.(empty($obsImages['image_b64']) ? 'non' : 'oui');
1498 aurelien 516
			}
517
		}
1565 jpm 518
 
1498 aurelien 519
		return $imgAAjouter;
520
	}
1565 jpm 521
 
3520 killian 522
	protected function stockerImagesEtLierAObs($id_obs, $img) {
2446 jpm 523
		if (isset($img['nom'])) {
524
			$imgTmp[] = $img;
525
			unset($img);
526
			$img = $imgTmp;
527
		}
528
 
2828 mathias 529
		$img_a_taguer_ids_noms = array();
2446 jpm 530
		foreach ($img as $image) {
3547 killian 531
			$image['nom'] = trim(rtrim($image['nom'], "'"), "'");
2446 jpm 532
			$nomFichierImg = $this->traiterNomFichierImage($image['nom']);
1498 aurelien 533
			$cheminImage = $this->config['cel']['chemin_stockage_temp']."/$nomFichierImg";
534
			// Si l'image est transmise en base 64
2446 jpm 535
			if (empty($image['b64']) === false) {
536
				$this->transformerBase64enFichier($cheminImage, $image['b64']);
1498 aurelien 537
			}
1565 jpm 538
 
1498 aurelien 539
			$this->debug[] = 'Nom fichier img debut :'.$nomFichierImg;
3520 killian 540
			$idImg = $this->ajouterImageSurDdEtBdd($id_obs, $cheminImage, $nomFichierImg);
1498 aurelien 541
			if ($idImg !== false) {
2828 mathias 542
				$img_a_taguer_ids_noms[$idImg] = $nomFichierImg;
2446 jpm 543
				if (isset($image['tags'])) {
544
					$this->correspondanceIdImgTags[$idImg] = $image['tags'];
1498 aurelien 545
				}
2370 mathias 546
			} else {
2446 jpm 547
				// L'image n'a pas pu être écrite.
548
				// On annule l'écriture des précédentes et on s'arrête là - la transaction
549
				// se chargera de les retirer de la base de données
2828 mathias 550
				foreach (array_keys($img_a_taguer_ids_noms) as $idImageASupprimer) {
2446 jpm 551
					$this->effacerImageDuDd($idImageASupprimer);
552
				}
2828 mathias 553
				$img_a_taguer_ids_noms = false;
2446 jpm 554
				break;
1498 aurelien 555
			}
556
		}
2828 mathias 557
		return $img_a_taguer_ids_noms;
1498 aurelien 558
	}
1565 jpm 559
 
1350 aurelien 560
	private function supprimerSlashesProfond($valeur) {
561
		$valeur = is_array($valeur) ? array_map(array($this, 'supprimerSlashesProfond'), $valeur) : stripslashes($valeur);
562
		return $valeur;
563
	}
564
 
719 jpm 565
	/**
566
	 * Transforme une date au format français (jj/mm/aaaa) dans un format Mysql (aaaa-mm-jj).
567
	 * @param string $dateFr date au format français (jj/mm/aaaa)
568
	 * @return string date au format Mysql (aaaa-mm-jj)
569
	 */
570
	private function transormerDateFrVersMysql($dateFr) {
571
		$dateMysql = '0000-00-00';
572
		$morceauxDate = explode('/', $dateFr);
573
		if (count($morceauxDate) == 3) {
1068 jpm 574
			$dateMysql = implode('-', array_reverse($morceauxDate));
719 jpm 575
		}
576
		return $dateMysql;
577
	}
1068 jpm 578
 
1354 aurelien 579
	private function taguerObs($obs_a_taguer_ids) {
580
		if (count($obs_a_taguer_ids) > 0) {
1350 aurelien 581
			foreach ($this->tagsObs as $hierarchieTag) {
582
				$tagsALier = explode('>', $hierarchieTag);
1354 aurelien 583
				$liaisonOk = $this->lierObsAMotsCles($obs_a_taguer_ids, $tagsALier);
1350 aurelien 584
				if ($liaisonOk === false) {
585
					$e = "Toutes les observations n'ont pas pu être liées aux mots-clés : $hierarchieTag";
586
					$this->messages[] = $e;
587
				}
588
			}
830 jpm 589
		}
1350 aurelien 590
	}
591
 
1354 aurelien 592
	private function lierObsAMotsCles($observations_ids, $tags) {
3520 killian 593
		// pas de mots clés pour les non-inscrits
594
		if (!$this->userId) {
595
			return true;
596
		}
597
 
2461 jpm 598
		$chemin_parent = '/';
1350 aurelien 599
		$listeIdsTags = array();
600
		foreach ($tags as $tag) {
601
			$tag = $this->nettoyerTag($tag);
1354 aurelien 602
			if ($tag != '') {
3520 killian 603
				$id_mot_cle = $this->gestionMotsClesObs->insererParCheminSiInexistant($tag, $chemin_parent, $this->userId);
1354 aurelien 604
				if ($id_mot_cle !== false) {
1350 aurelien 605
					$listeIdsTags[] = $id_mot_cle;
2056 aurelien 606
					$chemin_parent .= $tag."/";
1354 aurelien 607
				}
608
			}
1350 aurelien 609
		}
1400 aurelien 610
 
2241 mathias 611
		$liaison_ok = $this->gestionMotsClesObs->lierParTableaux($listeIdsTags, $observations_ids);
830 jpm 612
		return $liaison_ok;
613
	}
1068 jpm 614
 
1350 aurelien 615
	private function taguerImg($img_a_taguer_ids) {
616
		if (count($img_a_taguer_ids) > 0) {
617
			$this->debug[] = "Tags img : ".print_r($this->tagsImg, true);
618
			foreach ($this->tagsImg as $hierarchieTag) {
619
				$tagsALier = explode('>', $hierarchieTag);
620
				$liaisonOk = $this->lierImgAMotsCles($img_a_taguer_ids, $tagsALier);
621
				if ($liaisonOk === false) {
622
					$e = "Toutes les images n'ont pas pu être liées aux mots-clés : $hierarchieTag";
623
					$this->messages[] = $e;
624
				}
625
			}
626
		}
1498 aurelien 627
		// Liaison des tags spécifiques à chaque image s'il y en a
1896 jpm 628
		if (count($this->correspondanceIdImgTags) > 0) {
1498 aurelien 629
			foreach ($this->correspondanceIdImgTags as $id_img => $tags) {
1896 jpm 630
				if ($tags != null && !empty($tags)) {
1498 aurelien 631
					$this->lierImgAMotsCles(array($id_img), $tags);
632
				}
633
			}
634
		}
1350 aurelien 635
	}
636
 
637
	private function lierImgAMotsCles($images_ids, $tags) {
3520 killian 638
		// pas de mots clés pour les non-inscrits
639
		if (!$this->userId) {
640
			return true;
641
		}
642
 
2056 aurelien 643
		$chemin_parent = "/";
1350 aurelien 644
		$listeIdsTags = array();
645
		foreach ($tags as $tag) {
646
			$tag = $this->nettoyerTag($tag);
2143 jpm 647
			if ($tag != '') {
3520 killian 648
				$id_mot_cle = $this->gestionMotsClesImages->insererParCheminSiInexistant($tag, $chemin_parent, $this->userId);
1354 aurelien 649
				if ($id_mot_cle !== false) {
1350 aurelien 650
					$listeIdsTags[] = $id_mot_cle;
2056 aurelien 651
					$chemin_parent .= $tag."/";
1354 aurelien 652
				}
653
			}
1350 aurelien 654
		}
2241 mathias 655
		$liaison_ok = $this->gestionMotsClesImages->lierParTableaux($listeIdsTags, $images_ids);
1350 aurelien 656
		return $liaison_ok;
657
	}
658
 
659
	private function nettoyerTag($tag) {
660
		$tag = trim($tag);
661
		$tag = preg_replace('/(?:\s+|[,]+)/', ' ', $tag);
662
		return $tag;
663
	}
664
 
1068 jpm 665
	private function traiterNomFichierImage($fichierNom) {
666
		$fichierNom = preg_replace('/[.](jpeg|jpg)$/i', '.jpg', strtolower(trim($fichierNom)));
667
		return $fichierNom;
668
	}
669
 
670
	/**
671
	* Décode l'image en base64,enregistre celle-ci sous forme de fichier du type de l'image
672
	*  dans un dossier temporaire.
673
	*/
1350 aurelien 674
	private function transformerBase64enFichier($cheminImage, $imageInfosB64) {
1068 jpm 675
		// Enleve la partie data:image qui permet la previsalisation pour firefox de l'image en base64
676
		$imageBase64 = explode(';', $imageInfosB64);
677
		$dataBase64 = explode(',',$imageBase64[1]);
678
		$dataImg = base64_decode($dataBase64[1]);
679
 
680
		$imageRessource = fopen($cheminImage, 'wb');
681
		fwrite($imageRessource, $dataImg);
682
		fclose($imageRessource);
683
 
684
		if (file_exists($cheminImage) == false) {
685
			 $this->messages[] = "Erreur lors de la création du fichier";
686
		}
687
	}
688
 
2370 mathias 689
	/**
690
	 * Supprime toutes les images temporaires dont :
3520 killian 691
	 * - l'ancienneté est supérieure à DUREE_DE_VIE_IMG (si $nomsDeFichiers est vide, par défaut)
2370 mathias 692
	 * - le nom correspond à un des éléments du tableau $nomsDeFichiers (s'il est spécifié et non vide)
693
	 */
3520 killian 694
	protected function nettoyerImagesUploades($nomsDeFichiers = array()) {
1350 aurelien 695
		$dossierStockage = $this->config['cel']['chemin_stockage_temp'].'/';
696
		if (is_dir($dossierStockage)) {
697
			$objets = scandir($dossierStockage);
2370 mathias 698
			if (is_array($objets)) {
1350 aurelien 699
				foreach ($objets as $objet) {
2370 mathias 700
					$chemin = $dossierStockage . $objet;
1350 aurelien 701
					if (is_file($chemin)) {
2370 mathias 702
						// critère de suppression
3520 killian 703
						if (count($nomsDeFichiers) > 0) {
2370 mathias 704
							$suppression = in_array($objet, $nomsDeFichiers);
705
						} else {
706
							$filemtime = @filemtime($chemin);
707
							if ($filemtime !== false) {
708
								$suppression = (time() - $filemtime >= self::DUREE_DE_VIE_IMG) ? true : false;
1350 aurelien 709
							}
710
						}
2370 mathias 711
						// suppression
712
						if ($suppression === true) {
713
							unlink($chemin);
714
						}
1350 aurelien 715
					}
716
				}
717
			}
718
		}
719
	}
720
 
1068 jpm 721
	/**
722
	* Ajoute une image dans la base de données et stocke le fichier en fabriquant les miniatures,
723
	* renvoie le nouvel id d'image en cas de succès
724
	*
3520 killian 725
	* @param string $id_obs l'id de l'obs
1350 aurelien 726
	* @param string $cheminImage le chemin vers le fichier original de l'image
727
	* @param string $nomFichierImage le nom du fichier original de l'image
1068 jpm 728
	*/
3520 killian 729
	public function ajouterImageSurDdEtBdd($id_obs, $cheminImage, $nomFichierImage) {
1068 jpm 730
		$idImage = false;
3520 killian 731
		if (file_exists($cheminImage)) {
732
			$extracteurMetadonnees = new ExtracteurMetadonnees();
3547 killian 733
			$metadonnees = $extracteurMetadonnees->extraireMetadonnees($cheminImage);
3520 killian 734
			if ($metadonnees !== false) {
735
				$infosImage = $metadonnees;
736
				$infosImage['occurrence_id'] = $id_obs;
737
				$infosImage['original_name'] = $nomFichierImage;
738
				$infosImage['user_id'] = $this->userId;
739
				$infosImage['user_email'] = $this->userEmail;
740
				$infosImage['user_pseudo'] = $this->userIntitule;
3534 delphine 741
				$infosImage['content_url'] = $cheminImage;
742
				$infosImage['mime_type'] = mime_content_type($cheminImage);
743
				$infosImage['url'] = "concat('https://api.tela-botanica.org/img:',
744
				        lpad(`id`, 9, '0'), 'O')";
3520 killian 745
				// $infosImage['md5'] = md5_file($cheminImage);
746
				$infosImage['date_created'] = 'NOW()';
747
				$infosImage['date_updated'] = 'NOW()';
748
				$infosImage['date_linked_to_occurrence'] = 'NOW()';
749
				$this->debug[] = 'Nom fichier img meta :'.$nomFichierImage;
750
				$requete = $this->construireRequeteInsertionImage($infosImage);
751
				$resultat = Cel::db()->executer($requete);
752
				if ($resultat !== false) {
753
					$idImage = $this->obtenirIdImagePourIdentifiantEtNomOriginal($nomFichierImage);
754
					if ($idImage !== false) {
755
						$manipulateurImage = new ImageRecreation($this->config);
756
						// Stocke le fichier en conservant les fichiers temporaires, ce qui permet de réessayer
757
						// de les traiter en cas d'échec de la totalité du processus de traitement de l'obs
758
						$stockageOk = $manipulateurImage->stockerFichierOriginal($cheminImage, $idImage, true);
759
						if ($stockageOk) {
760
							$miniatureChemin = str_replace('.jpg', '_min.jpg', $cheminImage);
761
							if (file_exists($miniatureChemin)) {
762
								if (@unlink($miniatureChemin) === false) {
763
									$this->messages[] = "La miniature de l'image n'a pu être supprimée.";
1350 aurelien 764
								}
3520 killian 765
							}
1350 aurelien 766
 
1068 jpm 767
						} else {
3520 killian 768
							$this->messages[] = "Une erreur s'est produite lors du stockage du fichier.";
769
							// Remise à zéro d'idImage pour que l'erreur ne soit pas ignorée par l'appelant
770
							$idImage = false;
1068 jpm 771
						}
772
					} else {
3520 killian 773
						$this->messages[] =  "Impossible d'obtenir le nouvel identifiant de l'image";
1068 jpm 774
					}
775
				} else {
3520 killian 776
					$this->messages[] = "Echec de l'insertion dans la base de donnees des informations de l'image.";
1068 jpm 777
				}
778
			} else {
3520 killian 779
				$this->messages[] = "Erreur lors de l'extraction des metadonnées.";
1068 jpm 780
			}
781
		} else {
3520 killian 782
			$this->messages[] = "L'image originale est introuvable sur le serveur.";
1068 jpm 783
		}
784
		return $idImage;
785
	}
786
 
2370 mathias 787
	/**
788
	 * Supprime une image du disque dur. Ne touche pas à la base de données, on considère
789
	 * que c'est le rôle de la transaction d'annuler les écritures en cas de problème
2409 jpm 790
	 *
2370 mathias 791
	 * @param Integer $idImageASupprimer
792
	 * @return boolean $ok true si la suppression s'est bien passée, false s'il reste au moins un fichier
793
	 */
794
	protected function effacerImageDuDd($idImageASupprimer) {
795
		$manipulateurImage = new ImageRecreation($this->config);
796
		$ok = $manipulateurImage->detruireImageSurDisque($idImageASupprimer);
797
 
798
		return $ok;
799
	}
800
 
3520 killian 801
	private function obtenirIdImagePourIdentifiantEtNomOriginal($original_name) {
802
		$id_utilisateur = Cel::db()->proteger($this->userId);
803
		$email_utilisateur = Cel::db()->proteger($this->userEmail);
804
		$original_name = Cel::db()->proteger($original_name);
1068 jpm 805
 
3520 killian 806
		$requete = 'SELECT id '.
807
			'FROM photo '.
808
			"WHERE (user_id = $id_utilisateur OR user_email = $email_utilisateur)".
809
			"	AND original_name = $original_name ";
2143 jpm 810
		$resultat = Cel::db()->requeter($requete);
1068 jpm 811
 
1350 aurelien 812
		$id_image = (count($resultat) > 0) ? $resultat[0]['id_image'] : false;
1068 jpm 813
		return $id_image;
814
 
815
	}
816
 
817
	private function construireRequeteInsertionImage($informations) {
2446 jpm 818
		$champs = array();
819
		$valeurs = array();
1068 jpm 820
		foreach ($informations as $champ => $valeur) {
821
			$champs[] = $champ;
2446 jpm 822
			if (is_null($valeur)) {
823
				$valeurs[] = 'NULL';
824
			} else if ($valeur === 'NOW()') {
825
				$valeurs[] = $valeur;
826
			} else {
1765 raphael 827
				$valeurs[] = Cel::db()->proteger($valeur);
1068 jpm 828
			}
829
		}
2446 jpm 830
		$champsConcat = implode(', ', $champs);
831
		$valeursConcat = implode(', ', $valeurs);
1068 jpm 832
 
3520 killian 833
		$requete = "INSERT INTO photo ($champsConcat) VALUES ($valeursConcat) ".
2446 jpm 834
			' -- '.__FILE__.':'.__LINE__;
1068 jpm 835
		return $requete;
836
	}
3019 killian 837
}