Rev 3560 | Rev 3562 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php
// declare(encoding='UTF-8');
/**
* Service permettant d'insérer les informations fournie par le widget Saisie dans le CEL.
*
* Cas d'utilisation :
* PUT /CelWidgetSaisie : ajout de données en les passant via $_POST
*
* @internal Mininum PHP version : 5.2
* @category CEL
* @package Services
* @subpackage Widget
* @version 0.1
* @author Mathias CHOUET <mathias@tela-botanica.org>
* @author Jean-Pascal MILCENT <jpm@tela-botanica.org>
* @author Aurelien PERONNET <aurelien@tela-botanica.org>
* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
* @copyright 1999-2014 Tela Botanica <accueil@tela-botanica.org>
*/
class CelWidgetSaisie extends Cel {
private $projet = null;
private $projetId = null;
private $projetTags = array();
private $tagsObs = null;
private $tagsImg = null;
private $userId = null;
private $userEmail = null;
private $userIntitule = null;
private $isFromPlantNet = false;
const DUREE_DE_VIE_IMG = 86400;// 3600 * 24 = 86 400 (1 journée)
const ARRET_SERVICE = false;// Permet de bloquer le service en cas de problème sur le serveur
private $correspondanceIdImgTags = array();
private $gestionMotsClesObs = null;
private $gestionMotsClesImages = null;
public function createElement($requeteDonnees) {
if (self::ARRET_SERVICE) {
$this->messages[] = "Désactivation temporaire du service d'envoi des données au CEL.";
} else if (array_key_exists('projet', $requeteDonnees)) {
$this->debug[] = 'Projet : '.$requeteDonnees['projet'];
if ($requeteDonnees['projet'] != "base") {
$this->projet = $requeteDonnees['projet'];
$this->projetId = $requeteDonnees['id_projet'] ?? null;
}
// Si c'est une obs Pl@ntNet
if (! empty($requeteDonnees['tag-obs']) && strpos(strtolower($requeteDonnees['tag-obs']), 'plantnet') !== false) {
$this->isFromPlantNet = true;
}
// Traitements des tags multiples de projet
$this->traiterProjetTags();
// Traitement des tags spécifiques aux obs
$this->traiterTagObs($requeteDonnees);
// Traitement des tags spécifiques aux images
$this->traiterTagImg($requeteDonnees);
// Traitement des observations et des images
if (isset($requeteDonnees['utilisateur']['courriel']) && filter_var($requeteDonnees['utilisateur']['courriel'], FILTER_VALIDATE_EMAIL)) {
$this->debug[] = 'Utilisateur : '.print_r($requeteDonnees['utilisateur'], true);
$utilisateur = $requeteDonnees['utilisateur'];
// début transaction car si insertions par le même utilisateur en parallèle,
// De plus, ça permet de ne pas conserver les données d'obs si l'image provoque une erreur
//Cel::db()->setAttribute(PDO::ATTR_AUTOCOMMIT, false);
Cel::db()->beginTransaction();
$erreursDurantTraitement = false;
$nomsOriginauxImagesTemp = array();
// hop on récupère les infos de l'utilisateur
$infosUtilisateur = $this->infosInscritTela($utilisateur['courriel']);
if ($infosUtilisateur) {
$this->userId = $infosUtilisateur['id'];
$this->userIntitule = $infosUtilisateur['intitule'];
} else {
$this->userId = '';
$this->userIntitule = $utilisateur['prenom'] . ' ' . $utilisateur['nom'];
}
$this->userEmail = $utilisateur['courriel'];
$this->debug[] = 'Courriel : ' . $this->userEmail;
$requeteDonnees = $this->supprimerSlashesProfond($requeteDonnees);
// Triage et manipulation des données
$observations = array();
foreach ($requeteDonnees as $cle => $obs) {
if (preg_match('/^obsId[0-9]+$/', $cle)) {
$this->debug[] = 'commune_nom : '.$obs['commune_nom'];
$this->debug[] = 'commune_code_insee : '. (isset($obs['commune_code_insee']) ? $obs['commune_code_insee'] : 'n/a');
$obsAAjouter = array();
$obsAAjouter['user_id'] = $this->userId;
$obsAAjouter['user_email'] = $this->userEmail;
$obsAAjouter['user_pseudo'] = $this->userIntitule;
$obsAAjouter['user_sci_name'] = isset($obs['nom_sel']) ? $obs['nom_sel'] : null;
$obsAAjouter['user_sci_name_id'] = isset($obs['num_nom_sel']) ? $obs['num_nom_sel'] : null;
$obsAAjouter['accepted_sci_name'] = isset($obs['nom_ret']) ? $obs['nom_ret'] : null;
$obsAAjouter['accepted_sci_name_id'] = isset($obs['num_nom_ret']) ? $obs['num_nom_ret'] : null;
$obsAAjouter['family'] = isset($obs['famille']) ? $obs['famille'] : null;
$obsAAjouter['taxo_repo'] = isset($obs['referentiel']) ? ($obs['referentiel'] == 'bdtfxr') ? 'bdtfx' : $obs['referentiel'] : null;
$obsAAjouter['date_observed'] = $this->transormerDateFrVersMysql($obs['date']);
$obsAAjouter['annotation'] = isset($obs['notes']) ? $obs['notes'] : null;
// Pays est pour le moment sur un varchar(2) dans la base
// alors qu'il est envoyé complet par le script WidgetSaisie
$obsAAjouter['osm_country'] = (isset($obs['pays'])) ? $obs['pays'] : null;
$obsAAjouter['locality'] = $obs['commune_nom'];
$obsAAjouter['locality_insee_code'] = isset($obs['commune_code_insee']) ? $obs['commune_code_insee'] : '';
$obsAAjouter['sublocality'] = isset($obs['lieudit']) ? $obs['lieudit'] : null;
$obsAAjouter['station'] = isset($obs['station']) ? $obs['station'] : null;
$obsAAjouter['environment'] = isset($obs['milieu']) ? $obs['milieu'] : null;
$obsAAjouter['elevation'] = (! empty($obs['altitude'])) ? $obs['altitude'] : null;
$obsAAjouter['geometry'] = $obs['geometry'] ?? json_encode([
'type' => 'Point',
'coordinates' => [ $obs['longitude'], $obs['latitude'] ]
]); // CONCAT('{\"type\":\"Point\",\"coordinates\":[', longitude, ',', latitude,']}'),
$obsAAjouter['geodatum'] = 'WGS84';
$obsAAjouter['phenology'] = isset($obs['phenologie']) ? $obs['phenologie'] : null;
$obsAAjouter['coef'] = isset($obs['abondance']) ? $obs['abondance'] : null;
$obsAAjouter['is_public'] = '1';
$obsAAjouter['date_created'] = date('Y-m-d H:i:s');
$obsAAjouter['date_updated'] = $obsAAjouter['date_created'];
$obsAAjouter['date_published'] = $obsAAjouter['date_created'];
$obsAAjouter['image_nom'] = $obs['image_nom'] ?? null;
$obsAAjouter['image_b64'] = $obs['image_b64'] ?? null;
$obsAAjouter['certainty'] = '';
if (isset($obs['certitude'])) {
switch ($obs['certitude']) {
case 'certaine':
$obsAAjouter['certainty'] = 'certain';
break;
case 'douteuse':
$obsAAjouter['certainty'] = 'douteux';
break;
default:
$obsAAjouter['certainty'] = $obs['certitude'];
break;
}
}
$obsAAjouter['input_source'] = 'widget';
$obsAAjouter['project_id'] = $this->projetId;
$obsAAjouter['project'] = $this->projet;
if ($this->isFromPlantNet) {
$obsAAjouter['input_source'] = 'PlantNet';
$obsAAjouter['plantnet_id'] = $obs['obs_id'];
}
$obsAAjouter['obs_etendue'] = isset($obs['obs_etendue']) ? $obs['obs_etendue'] : array();
// Tentative d'enrichissement des données taxonomiques
// @TODO attention aux perfs, aux timeouts de WS etc.
$this->enrichirDonneesTaxonomiques($obsAAjouter);
$observations[] = $obsAAjouter;
}
}
$this->debug[] = 'Nbre obs ajoutée : '.count($observations);
$this->debug[] = 'projet : '.$this->projet;
$this->debug[] = 'tagsObs : '.print_r($this->tagsObs, true);
$this->debug[] = 'tagsImg : '.print_r($this->tagsImg, true);
// Insertion dans la base
$obs_a_taguer_ids = array();
$img_a_taguer_ids_noms = array();
$champsEtendusObs = array();
foreach ($observations as $obs) {
$fullObs = $obs;
unset($obs['obs_etendue']);
unset($obs['image_nom']);
unset($obs['image_b64']);
$obs = $this->protegerTableau($obs);
$champs = implode(', ', array_keys($obs));
$valeurs = implode(', ', $obs);
$requete = "INSERT INTO occurrence ($champs) VALUES ($valeurs) ";
if (Cel::db()->executer($requete) === false) {
$erreursDurantTraitement = true;
$this->messages[] = "Un problème est survenu lors de l'insertion de l'obs dans la base de données.";
}
// récupérer l'id de l'obs nouvellement insérée
$idNouvelleObs = Cel::db()->obtenirDernierId();
$obs_a_taguer_ids[] = $idNouvelleObs;
$champsEtendusObs[$idNouvelleObs] = $fullObs['obs_etendue'];
$imgAAjouter = null;
if (isset($fullObs['image_nom'])) {
$imgAAjouter = $this->traiterImagesALierAObs($idNouvelleObs, $fullObs);
if ($imgAAjouter != null) {
foreach ($imgAAjouter as $uneImgAAjouter) {
$nomsOriginauxImagesTemp[] = $uneImgAAjouter['nom'];
}
}
}
// si le formulaire contient une image on la traite
if ($imgAAjouter != null) {
$this->nettoyerImagesUploades();
$img_a_taguer_ids_noms = $this->stockerImagesEtLierAObs($idNouvelleObs, $imgAAjouter);
if (empty($img_a_taguer_ids_noms)) {
$erreursDurantTraitement = true;
$this->messages[] = "Au moins une des images n'a pas pu être enregistrée.";
} else {
$cmd = sprintf($this->config['cel']['commande_script_images'],implode(',', array_keys($img_a_taguer_ids_noms)));
pclose(popen($cmd,"r"));
}
}
}
$this->gestionMotsClesObs = new GestionMotsClesChemin($this->config,'obs');
$this->gestionMotsClesImages = new GestionMotsClesChemin($this->config,'images');
$this->taguerObs($obs_a_taguer_ids);
if (!empty($img_a_taguer_ids_noms)) {
$this->taguerImg(array_keys($img_a_taguer_ids_noms));
}
// Les champs taggés sont des champs supplémentaires stockés sous forme de clé => valeur
$this->ajouterChampsEtendusObs($obs_a_taguer_ids, $champsEtendusObs);
// Fin de la transaction - on considère que commit() et rollback() ne ratent jamais
if ($erreursDurantTraitement === false) {
// Suppression des fichiers images temporaires
$this->nettoyerImagesUploades($nomsOriginauxImagesTemp);
Cel::db()->commit();
} else {
// On annule l'écriture des images enregistrées sur le disque dur - la transaction
// se charge de les retirer de la base de données
if ($img_a_taguer_ids_noms !== false) {
foreach (array_keys($img_a_taguer_ids_noms) as $idImageASupprimer) {
$this->effacerImageDuDd($idImageASupprimer);
}
}
Cel::db()->rollBack();
}
} else {
$this->messages[] = '[' . $requeteDonnees['utilisateur']['courriel'] . "] n'est pas une adresse email valide.";
}
} else {
$this->messages[] = "Les informations concernant le projet coopératif n'ont pas été transmises.";
}
if (count($this->messages) > 0) {
$this->debug[] = print_r($this->messages, true);
}
if (count($this->messages) > 0) {
$msg = 'erreur';
$idNouvelleObs = null;
} else {
$msg = 'ok';
}
// renvoi des infos d'images (id, nom) ordonnées, en plus des infos obs.
$infosImages = array();
if (! empty($img_a_taguer_ids_noms)) {
foreach ($img_a_taguer_ids_noms as $id => $nom) {
$infosImages[] = array(
'id' => $id,
'nom' => $nom
);
}
}
$retour = (object) array(
'msg' => $msg,
'id' => $idNouvelleObs,
'images' => $infosImages
);
$this->envoyerJson($retour);
exit;
}
/**
* Retourne les infos du compte correspondant à $courriel
* si présent dans l'annuaire Tela,
* false sinon
*/
protected function infosInscritTela($courriel) {
if (empty($courriel)) {
return false;
}
// interrogation de l'annuaire
$url = sprintf($this->config['settings']['baseURLServicesAnnuaireTpl'], 'utilisateur/identite-par-courriel/' . $courriel);
$retour = file_get_contents($url);
if (! $retour) {
return false;
}
try {
$retour = json_decode($retour, true);
} catch (Exception $e) {
return false;
}
if (isset($retour['error'])) {
return false;
}
// le service annuaire a retourné qqch de valide
return array_shift($retour);
}
/**
* Retourne true si les champs suivants sont présents dans le tableau :
* - obsId1[user_sci_name]
* - obsId1[latitude]' : obs.geoloc.lat || '',
'obsId1[longitude]' : obs.geoloc.lon || '',
* mot-clé "pn:referentiel"
*/
protected function estUneDonneeQualifiee($donnees) {
// vérifier date et géoloc
// lancer enrichirDonneesTaxonomiques et vérifier si ça a retrouvé un nn
}
/**
* Si les données taxonomiques sont incomplètes dans $obs
* (clefs 'nom_sel_nn', 'user_sci_name', 'taxo_repo', 'accepted_sci_name_id',
* 'accepted_sci_name', 'family'), tente d'en récupérer un maximum à l'aide des
* services eFlore, à condition que soient mentionnés au moins :
* - un nom de référentiel
* - un nom_sel_nn OU un user_sci_name
*/
protected function enrichirDonneesTaxonomiques(&$obs) {
// sans référentiel, on ne peut rien faire
if (! empty($obs['taxo_repo'])) {
// copies locales pour ne pas abimer les données d'entrée
$nn = $obs['user_sci_name_id'];
$ref = $obs['taxo_repo'];
$ns = $obs['user_sci_name'];
$nr = $obs['accepted_sci_name'];
$nnr = $obs['accepted_sci_name_id'];
$fam = $obs['family'];
// si j'ai un nn, tentative de retrouver le nnr, le user_sci_name,
// le accepted_sci_name et la famille, s'ils ne sont pas déjà présents (on
// pourrait les écraser systématiquement mais l'appel au service
// dégrade les perfs)
if ((! empty($nn) && is_numeric($nn))
// omission du test sur 'accepted_sci_name' car le service eFlore noms ne le retourne que sans auteur (pas bon)
&& (empty($ns) || empty($nnr) || empty($fam) /*|| empty($nr)*/)) {
// go
$this->enrichirDonneesTaxonomiquesParNN($ref, $nn, $obs);
} else {
// si j'ai un nom complet, avec un peu de bol il sera dans le référentiel
if ((! empty($ns))
&& (empty($nn) || empty($nnr) || empty($fam) /*|| empty($nr)*/)) {
// go
$this->enrichirDonneesTaxonomiquesParNS($ref, $ns, $obs);
}
} // sinon fuque
}
}
/**
* Enrichit le tableau $obs destiné à être inséré dans le BDD, en
* interrogeant le service eFlore/noms par référentiel + nom scientifique
* avec auteur
*/
protected function enrichirDonneesTaxonomiquesParNS($ref, $ns, &$obs) {
$url_nom = $this->config['eflore']['url_service_nom'];
$url_nom = str_replace('{referentiel}', $ref, $url_nom);
$url_nom .= '?recherche=etendue&ns.structure=au&masque=' . urlencode($ns);
// un horrible @ car les erreurs de file_get_contents() ne sont pas try/catchables
// @TODO mettre du cURL à l'occase
$infos_nom = @file_get_contents($url_nom);
if ($infos_nom != NULL) {
try {
$infos_nom = json_decode($infos_nom, true);
if (count($infos_nom['resultat']) > 0) {
$nn_trouve = null;
$ret_trouve = false;
// on prend le nom avec auteur correspondant exactement;
// s'il y en a plusieurs on prend le premier qui est retenu
foreach($infos_nom['resultat'] as $n => $nom) {
if (! $ret_trouve) {
if ($nom['nom_sci_complet'] == $ns) {
if ($nn_trouve == null || $nom['retenu'] == 'true') {
$nn_trouve = $n;
$ret_trouve = ($nom['retenu'] == 'true');
}
}
}
}
if ($nn_trouve != null) {
// gagné !
$obs['user_sci_name_id'] = $nn_trouve;
// et maintenant on recolle ce qu'on peut à partir du nn
$this->enrichirDonneesTaxonomiquesParNN($ref, $nn_trouve, $obs);
}
}
} catch(Exception $e) {
// échec silencieux
}
}
}
/**
* Enrichit le tableau $obs destiné à être inséré dans le BDD, en
* interrogeant le service eFlore/noms par référentiel + nn
*/
protected function enrichirDonneesTaxonomiquesParNN($ref, $nn, &$obs) {
$url_nom = $this->config['eflore']['url_service_nom'];
$url_nom = str_replace('{referentiel}', $ref, $url_nom);
$url_nom .= '/' . $nn;
// un horrible @ car les erreurs de file_get_contents() ne sont pas try/catchables
// @TODO mettre du cURL à l'occase
$infos_nom = @file_get_contents($url_nom);
if ($infos_nom != NULL) {
try {
$infos_nom = json_decode($infos_nom, true);
// une fois qu'on a les infos, on écrase tout
if ($infos_nom['nom_sci_complet'] != null) {
$obs['user_sci_name'] = $infos_nom['nom_sci_complet'];
}
if ($infos_nom['nom_retenu_complet'] != null) {
$obs['accepted_sci_name'] = $infos_nom['nom_retenu_complet'];
}
if ($infos_nom['nom_retenu.id'] != null) {
$obs['accepted_sci_name_id'] = $infos_nom['nom_retenu.id'];
}
// manque le accepted_sci_name retourné sans auteur (insatisfaisant)
if ($infos_nom['famille'] != null) {
$obs['family'] = $infos_nom['famille'];
}
} catch(Exception $e) {
// échec silencieux
}
}
}
private function traiterProjetTags() {
if (strpos($this->projet, ',') === false) {
$this->projetTags = array('Projets coopératifs>'.$this->projet);
} else {
$projetTagsTxt = explode(',', $this->projet);
foreach ($projetTagsTxt as $tag) {
$this->projetTags[] = 'Projets coopératifs>'.$tag;
}
}
}
private function traiterTagObs($requeteDonnees) {
if (array_key_exists('tag-obs', $requeteDonnees) && $requeteDonnees['tag-obs'] != '') {
$this->tagsObs = explode(',', $requeteDonnees['tag-obs']);
}
foreach ($this->projetTags as $tag) {
$this->tagsObs[] = $tag;
}
}
private function traiterTagImg($requeteDonnees) {
if (array_key_exists('tag-img', $requeteDonnees) && $requeteDonnees['tag-img'] != '') {
$this->tagsImg = explode(',', $requeteDonnees['tag-img']);
}
foreach ($this->projetTags as $tag) {
$this->tagsImg[] = $tag;
}
}
private function ajouterChampsEtendusObs($obs_ids, $obs_a_champs_etendus) {
$champs_etendus_obs = array();
$gestionChampsEtendus = new GestionChampsEtendus($this->config, 'obs');
foreach ($obs_ids as $id_obs) {
$champs = array_shift($obs_a_champs_etendus);
if ($champs != null && is_array($champs)) {
foreach ($champs as $infosChamp) {
$cle = isset($infosChamp['cle']) ? $infosChamp['cle'] : '';
$valeur = isset($infosChamp['valeur']) ? $infosChamp['valeur'] : '';
if (!empty($cle) && $valeur !== '') {
$champEtendu = new ObsEtendue();
$champEtendu->id = $id_obs;
$champEtendu->cle = $cle;
$champEtendu->valeur = $valeur;
$champs_etendus_obs[] = $champEtendu;
}
}
}
}
if(! $champs_etendus_obs) return TRUE;
return $gestionChampsEtendus->ajouterParLots($champs_etendus_obs, $this->projet);
}
private function traiterImagesALierAObs($idObs, $obs) {
$imgAAjouter = null;
if (is_array($obs['image_nom'])) {
$imgAAjouter = array();
foreach ($obs['image_nom'] as $index => $nom_image) {
$image = array();
$image['id_utilisateur'] = $this->userId;
$image['id_obs'] = $idObs;
$image['nom'] = $nom_image;
// on suppose que les b64 des images sont envoyés dans le même ordre que leurs noms
// TODO: indexer le tableau avec le nom des images
$image['b64'] = (is_array($obs['image_b64']) && isset($obs['image_b64'][$index])) ? $obs['image_b64'][$index] : null;
$this->debug[] = 'Contient B64 : '.(isset($obs['image_b64']) ? 'oui' : 'non');
$imgAAjouter[] = $image;
}
} else {
$imgAAjouter = array();
$imgAAjouter['id_utilisateur'] = $this->userId;
$imgAAjouter['id_obs'] = $idObs;
$imgAAjouter['nom'] = $obs['image_nom'];
$imgAAjouter['b64'] = $obs['image_b64'] ?? null;
$this->debug[] = 'Contient B64 : '.(isset($obs['image_b64']) ? 'oui' : 'non');
}
return $imgAAjouter;
}
protected function stockerImagesEtLierAObs($id_obs, $img) {
if (isset($img['nom'])) {
$imgTmp[] = $img;
unset($img);
$img = $imgTmp;
}
$img_a_taguer_ids_noms = array();
foreach ($img as $image) {
$image['nom'] = trim(rtrim($image['nom'], "'"), "'");
$nomFichierImg = $this->traiterNomFichierImage($image['nom']);
$cheminImage = $this->config['cel']['chemin_stockage_temp']."/$nomFichierImg";
// Si l'image est transmise en base 64
if (isset($image['b64'])) {
$this->transformerBase64enFichier($cheminImage, $image['b64']);
}
$this->debug[] = 'Nom fichier img debut :'.$nomFichierImg;
$idImg = $this->ajouterImageSurDdEtBdd($id_obs, $cheminImage, $nomFichierImg);
if ($idImg !== false) {
$img_a_taguer_ids_noms[$idImg] = $nomFichierImg;
if (isset($image['tags'])) {
$this->correspondanceIdImgTags[$idImg] = $image['tags'];
}
} else {
// L'image n'a pas pu être écrite.
// On annule l'écriture des précédentes et on s'arrête là - la transaction
// se chargera de les retirer de la base de données
foreach (array_keys($img_a_taguer_ids_noms) as $idImageASupprimer) {
$this->effacerImageDuDd($idImageASupprimer);
}
$img_a_taguer_ids_noms = array();
break;
}
}
return $img_a_taguer_ids_noms;
}
private function supprimerSlashesProfond($valeur) {
$valeur = is_array($valeur) ? array_map(array($this, 'supprimerSlashesProfond'), $valeur) : stripslashes($valeur);
return $valeur;
}
/**
* Transforme une date au format français (jj/mm/aaaa) dans un format Mysql (aaaa-mm-jj).
* @param string $dateFr date au format français (jj/mm/aaaa)
* @return string date au format Mysql (aaaa-mm-jj)
*/
private function transormerDateFrVersMysql($dateFr) {
$dateMysql = '0000-00-00';
$morceauxDate = explode('/', $dateFr);
if (count($morceauxDate) == 3) {
$dateMysql = implode('-', array_reverse($morceauxDate));
}
return $dateMysql;
}
private function taguerObs($obs_a_taguer_ids) {
if (count($obs_a_taguer_ids) > 0) {
foreach ($this->tagsObs as $hierarchieTag) {
$tagsALier = explode('>', $hierarchieTag);
$liaisonOk = $this->lierObsAMotsCles($obs_a_taguer_ids, $tagsALier);
if ($liaisonOk === false) {
$e = "Toutes les observations n'ont pas pu être liées aux mots-clés : $hierarchieTag";
$this->messages[] = $e;
}
}
}
}
private function lierObsAMotsCles($observations_ids, $tags) {
// pas de mots clés pour les non-inscrits
if (!$this->userId) {
return true;
}
$chemin_parent = '/';
$listeIdsTags = array();
foreach ($tags as $tag) {
$tag = $this->nettoyerTag($tag);
if ($tag != '') {
$id_mot_cle = $this->gestionMotsClesObs->insererParCheminSiInexistant($tag, $chemin_parent, $this->userId);
if ($id_mot_cle !== false) {
$listeIdsTags[] = $id_mot_cle;
$chemin_parent .= $tag."/";
}
}
}
$liaison_ok = $this->gestionMotsClesObs->lierParTableaux($listeIdsTags, $observations_ids);
return $liaison_ok;
}
private function taguerImg($img_a_taguer_ids) {
if (count($img_a_taguer_ids) > 0) {
$this->debug[] = "Tags img : ".print_r($this->tagsImg, true);
foreach ($this->tagsImg as $hierarchieTag) {
$tagsALier = explode('>', $hierarchieTag);
$liaisonOk = $this->lierImgAMotsCles($img_a_taguer_ids, $tagsALier);
if ($liaisonOk === false) {
$e = "Toutes les images n'ont pas pu être liées aux mots-clés : $hierarchieTag";
$this->messages[] = $e;
}
}
}
// Liaison des tags spécifiques à chaque image s'il y en a
if (count($this->correspondanceIdImgTags) > 0) {
foreach ($this->correspondanceIdImgTags as $id_img => $tags) {
if ($tags != null && !empty($tags)) {
$this->lierImgAMotsCles(array($id_img), $tags);
}
}
}
}
private function lierImgAMotsCles($images_ids, $tags) {
// pas de mots clés pour les non-inscrits
if (!$this->userId) {
return true;
}
$chemin_parent = "/";
$listeIdsTags = array();
foreach ($tags as $tag) {
$tag = $this->nettoyerTag($tag);
if ($tag != '') {
$id_mot_cle = $this->gestionMotsClesImages->insererParCheminSiInexistant($tag, $chemin_parent, $this->userId);
if ($id_mot_cle !== false) {
$listeIdsTags[] = $id_mot_cle;
$chemin_parent .= $tag."/";
}
}
}
$liaison_ok = $this->gestionMotsClesImages->lierParTableaux($listeIdsTags, $images_ids);
return $liaison_ok;
}
private function nettoyerTag($tag) {
$tag = trim($tag);
$tag = preg_replace('/(?:\s+|[,]+)/', ' ', $tag);
return $tag;
}
private function traiterNomFichierImage($fichierNom) {
$fichierNom = preg_replace('/[.](jpeg|jpg)$/i', '.jpg', strtolower(trim($fichierNom)));
return $fichierNom;
}
/**
* Décode l'image en base64,enregistre celle-ci sous forme de fichier du type de l'image
* dans un dossier temporaire.
*/
private function transformerBase64enFichier($cheminImage, $imageInfosB64) {
// Enleve la partie data:image qui permet la previsalisation pour firefox de l'image en base64
$imageBase64 = explode(';', $imageInfosB64);
$dataBase64 = explode(',',$imageBase64[1]);
$dataImg = base64_decode($dataBase64[1]);
$imageRessource = fopen($cheminImage, 'wb');
fwrite($imageRessource, $dataImg);
fclose($imageRessource);
if (file_exists($cheminImage) == false) {
$this->messages[] = "Erreur lors de la création du fichier";
}
}
/**
* Supprime toutes les images temporaires dont :
* - l'ancienneté est supérieure à DUREE_DE_VIE_IMG (si $nomsDeFichiers est vide, par défaut)
* - le nom correspond à un des éléments du tableau $nomsDeFichiers (s'il est spécifié et non vide)
*/
protected function nettoyerImagesUploades($nomsDeFichiers = array()) {
$dossierStockage = $this->config['cel']['chemin_stockage_temp'].'/';
if (is_dir($dossierStockage)) {
$objets = scandir($dossierStockage);
if (is_array($objets)) {
foreach ($objets as $objet) {
$chemin = $dossierStockage . $objet;
if (is_file($chemin)) {
// critère de suppression
if (count($nomsDeFichiers) > 0) {
$suppression = in_array($objet, $nomsDeFichiers);
} else {
$filemtime = @filemtime($chemin);
if ($filemtime !== false) {
$suppression = (time() - $filemtime >= self::DUREE_DE_VIE_IMG) ? true : false;
}
}
// suppression
if ($suppression === true) {
unlink($chemin);
}
}
}
}
}
}
/**
* Ajoute une image dans la base de données et stocke le fichier en fabriquant les miniatures,
* renvoie le nouvel id d'image en cas de succès
*
* @param string $id_obs l'id de l'obs
* @param string $cheminImage le chemin vers le fichier original de l'image
* @param string $nomFichierImage le nom du fichier original de l'image
*/
public function ajouterImageSurDdEtBdd($id_obs, $cheminImage, $nomFichierImage) {
$idImage = false;
if (file_exists($cheminImage)) {
$extracteurMetadonnees = new ExtracteurMetadonnees();
$metadonnees = $extracteurMetadonnees->extraireMetadonnees($cheminImage);
if ($metadonnees !== false) {
$infosImage = array();
$infosImage['date_shot'] = $metadonnees['date_shot'];
$infosImage['size'] = $metadonnees['size'];
$infosImage['occurrence_id'] = $id_obs;
$infosImage['original_name'] = $nomFichierImage;
$infosImage['user_id'] = $this->userId;
$infosImage['user_email'] = $this->userEmail;
$infosImage['user_pseudo'] = $this->userIntitule;
$infosImage['content_url'] = $cheminImage;
$infosImage['mime_type'] = mime_content_type($cheminImage);
$infosImage['url'] = '';
// $infosImage['md5'] = md5_file($cheminImage);
$infosImage['date_created'] = 'NOW()';
$infosImage['date_updated'] = 'NOW()';
$infosImage['date_linked_to_occurrence'] = 'NOW()';
$this->debug[] = 'Nom fichier img meta :'.$nomFichierImage;
$requete = $this->construireRequeteInsertionImage($infosImage);
$resultat = Cel::db()->executer($requete);
if ($resultat !== false) {
$idImage = $this->traiterEtRecupererIdImage($nomFichierImage);
if ($idImage !== false) {
$manipulateurImage = new ImageRecreation($this->config);
// Stocke le fichier en conservant les fichiers temporaires, ce qui permet de réessayer
// de les traiter en cas d'échec de la totalité du processus de traitement de l'obs
$stockageOk = $manipulateurImage->stockerFichierOriginal($cheminImage, $idImage, true);
if ($stockageOk) {
$miniatureChemin = str_replace('.jpg', '_min.jpg', $cheminImage);
if (file_exists($miniatureChemin)) {
if (@unlink($miniatureChemin) === false) {
$this->messages[] = "La miniature de l'image n'a pu être supprimée.";
}
}
} else {
$this->messages[] = "Une erreur s'est produite lors du stockage du fichier.";
// Remise à zéro d'idImage pour que l'erreur ne soit pas ignorée par l'appelant
$idImage = false;
}
} else {
$this->messages[] = "Impossible d'obtenir le nouvel identifiant de l'image";
}
} else {
$this->messages[] = "Echec de l'insertion dans la base de donnees des informations de l'image.";
}
} else {
$this->messages[] = "Erreur lors de l'extraction des metadonnées.";
}
} else {
$this->messages[] = "L'image originale est introuvable sur le serveur.";
}
return $idImage;
}
/**
* Supprime une image du disque dur. Ne touche pas à la base de données, on considère
* que c'est le rôle de la transaction d'annuler les écritures en cas de problème
*
* @param Integer $idImageASupprimer
* @return boolean $ok true si la suppression s'est bien passée, false s'il reste au moins un fichier
*/
protected function effacerImageDuDd($idImageASupprimer) {
$manipulateurImage = new ImageRecreation($this->config);
$ok = $manipulateurImage->detruireImageSurDisque($idImageASupprimer);
return $ok;
}
private function traiterEtRecupererIdImage($original_name) {
$id_utilisateur = Cel::db()->proteger($this->userId);
$email_utilisateur = Cel::db()->proteger($this->userEmail);
$original_name = Cel::db()->proteger($original_name);
$requete = 'SELECT id '.
'FROM photo '.
"WHERE (user_id = $id_utilisateur OR user_email = $email_utilisateur)".
" AND original_name = $original_name ";
$resultat = Cel::db()->requeter($requete);
$id_image = $resultat[0]['id'] ?? false;
if ($id_image) {
$full_id_image = str_pad($id_image, 9, '0', STR_PAD_LEFT) . 'O';
$image_url = sprintf(config::get('celImgUrlTpl'), $full_id_image);
$requete = 'UPDATE photo'.
' SET url = ' . Cel::db()->proteger($image_url)
' WHERE id = ' Cel::db()->proteger($id_image);
$resultat = Cel::db()->requeter($requete);
}
return $id_image;
}
private function construireRequeteInsertionImage($informations) {
$champs = array();
$valeurs = array();
$url = $informations['url'];
foreach ($informations as $champ => $valeur) {
$champs[] = $champ;
if (is_null($valeur)) {
$valeurs[$champ] = 'NULL';
} else if ($valeur === 'NOW()') {
$valeurs[$champ] = $valeur;
} else {
$valeurs[$champ] = Cel::db()->proteger($valeur);
}
}
$champsConcat = implode(', ', $champs);
$valeurs['url'] = $url;
$valeursConcat = implode(', ', $valeurs);
$requete = "INSERT INTO photo ($champsConcat) VALUES ($valeursConcat) ".
' -- '.__FILE__.':'.__LINE__;
return $requete;
}
}