Subversion Repositories eFlore/Applications.cel

Rev

Rev 3119 | Rev 3474 | 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 $projetTags = array();
        private $tagsObs = null;
        private $tagsImg = null;
        private $champsEtendusObs = null;
        private $utilisateur_id = null;
        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'];
                        $this->projet = $requeteDonnees['projet'];

                        // Si c'estune obs Pl@ntNet, la garde-t-on ou non ?
                        if (! empty($requeteDonnees['tag-obs']) && strpos(strtolower($requeteDonnees['tag-obs']), 'plantnet') !== false) {
                                // 1) l'email est-il dans notre annuaire ?
                                $inscritATela = $this->estInscritATela($requeteDonnees['utilisateur']['courriel']);
                                // 2) y a-t-il date, lieu, détermination, référentiel ? (à voir plus tard)
                                // $donneeQualifiee = $this->estUneDonneeQualifiee($requeteDonnees);
                                // @WARNING : ne pas relancer enrichirDonneesTaxonomiques() !
                                $donneeQualifiee = false; // debug
                                if (! $inscritATela && ! $donneeQualifiee) {
                                        // fake ID
                                        $retour = (object) array(
                                                'msg' => "observation Pl@ntNet non sauvegardée",
                                                'id' => "fake-" . uniqid(),
                                                'images' => array()
                                        );
                                        $this->envoyerJson($retour);
                                        exit; // envoyerJson() ne termine pas le script !
                                } // sinon traitement normal
                        }

                        // 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 (filter_var($requeteDonnees['utilisateur']['courriel'], FILTER_VALIDATE_EMAIL)) {
                                $this->debug[] = 'Utilisateur : '.print_r($requeteDonnees['utilisateur'], true);
                                $utilisateur = $requeteDonnees['utilisateur'];
                                if (array_key_exists('courriel', $utilisateur)) {
                                        // début transaction car si insertions par le même utilisateur en parallèle,
                                        // le getMaxOrdre et le INSERT sont en concurrence et risquent de foirer.
                                        // 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();

                                        $this->debug[] = 'Courriel : '.$utilisateur['courriel'];
                                        $utilisateur = $this->affecterChampsManquantsUtilisateur($utilisateur);
                                        extract($utilisateur); // @TODO pendre le paltoquet qui a écrit ça !!!
                                        // $id_utilisateur vient du extract() de $utilisateur['id_utilisateur']
                                        $this->utilisateur_id = $id_utilisateur;
                                        $ordre = $this->getMaxOrdre($id_utilisateur);
                                        if (!is_null($ordre)) {
                                                $requeteDonnees = $this->supprimerSlashesProfond($requeteDonnees);
                                                // Triage et manipulation des données
                                                $observations = array();
                                                foreach ($requeteDonnees as $cle => $obs) {
                                                        if (preg_match('/^obsId[0-9]+$/', $cle)) {
                                                                $ordreObs = $ordre++;

                                                                $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['ce_utilisateur'] = $id_utilisateur;
                                                                $obsAAjouter['courriel_utilisateur'] = $courriel;
                                                                $obsAAjouter['prenom_utilisateur'] = $prenom;
                                                                $obsAAjouter['nom_utilisateur'] = $nom;
                                                                $obsAAjouter['ordre'] = $ordreObs;

                                                                $obsAAjouter['nom_sel'] = isset($obs['nom_sel']) ? $obs['nom_sel'] : null;
                                                                $obsAAjouter['nom_sel_nn'] = isset($obs['num_nom_sel']) ? $obs['num_nom_sel'] : null;
                                                                $obsAAjouter['nom_ret'] = isset($obs['nom_ret']) ? $obs['nom_ret'] : null;
                                                                $obsAAjouter['nom_ret_nn'] = isset($obs['num_nom_ret']) ? $obs['num_nom_ret'] : null;
                                                                $obsAAjouter['nt'] = isset($obs['num_taxon']) ? $obs['num_taxon'] : null;
                                                                $obsAAjouter['famille'] = isset($obs['famille']) ? $obs['famille'] : null;
                                                                $obsAAjouter['nom_referentiel'] = isset($obs['referentiel']) ? ($obs['referentiel'] == 'bdtfxr') ? 'bdtfx' : $obs['referentiel'] : null;

                                                                $obsAAjouter['date_observation'] = $this->transormerDateFrVersMysql($obs['date']);
                                                                $obsAAjouter['commentaire'] = 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['pays'] = $obs['pays'];
                                                                $obsAAjouter['zone_geo'] = $obs['commune_nom'];
                                                                $obsAAjouter['ce_zone_geo'] = 'INSEE-C:'. (isset($obs['commune_code_insee']) ? $obs['commune_code_insee'] : '');
                                                                $obsAAjouter['lieudit'] = isset($obs['lieudit']) ? $obs['lieudit'] : null;
                                                                $obsAAjouter['station'] = isset($obs['station']) ? $obs['station'] : null;
                                                                $obsAAjouter['milieu'] = isset($obs['milieu']) ? $obs['milieu'] : null;
                                                                $obsAAjouter['altitude'] = (! empty($obs['altitude'])) ? $obs['altitude'] : null;
                                                                $obsAAjouter['latitude'] = $obs['latitude'];
                                                                $obsAAjouter['longitude'] = $obs['longitude'];
                                                                $obsAAjouter['geodatum'] = 'WGS84';

                                                                $obsAAjouter['certitude'] = isset($obs['certitude']) ? $obs['certitude'] : null;
                                                                $obsAAjouter['phenologie'] = isset($obs['phenologie']) ? $obs['phenologie'] : null;
                                                                $obsAAjouter['abondance'] = isset($obs['abondance']) ? $obs['abondance'] : null;

                                                                $obsAAjouter['transmission'] = '1';
                                                                $obsAAjouter['date_creation'] = date('Y-m-d H:i:s');
                                                                $obsAAjouter['date_modification'] = $obsAAjouter['date_creation'];
                                                                $obsAAjouter['date_transmission'] = $obsAAjouter['date_creation'];

                                                                $this->champsEtendusObs[$ordreObs] = isset($obs['obs_etendue']) ? $obs['obs_etendue'] : array();

                                                                $imgAAjouter = null;
                                                                if (!empty($obs['image_nom'])) {
                                                                        $imgAAjouter = $this->traiterImagesALierAObs($id_utilisateur, $ordreObs, $obs);
                                                                        if ($imgAAjouter != null) {
                                                                                foreach ($imgAAjouter as $uneImgAAjouter) {
                                                                                        $nomsOriginauxImagesTemp[] = $uneImgAAjouter['nom'];
                                                                                }
                                                                        }
                                                                }

                                                                if(!trim($courriel) && !trim($id_utilisateur)) {
                                                                        // XXX: debug
                                                                        file_put_contents("/tmp/debug-cel-" . time(),
                                                                                                          $_POST . "\n=\n" . $requeteDonnees . "\n=\n" . var_export($obsAAjouter, true) .
                                                                                                          "\n=\n", $_SERVER);
                                                                }

                                                                // Tentative d'enrichissement des données taxonomiques
                                                                // @TODO attention aux perfs, aux timeouts de WS etc.
                                                                $this->enrichirDonneesTaxonomiques($obsAAjouter);

                                                                $observations[$ordreObs] = array(
                                                                        'obs' => $this->protegerTableau($obsAAjouter),
                                                                        'img' => $imgAAjouter);
                                                        }
                                                }
                                                $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_ordres = array();
                                                $img_a_taguer_ids_noms = array();
                                                foreach ($observations as $infos) {
                                                        $obs = $infos['obs'];
                                                        $img = $infos['img'];

                                                        $champs = implode(', ', array_keys($obs));
                                                        $valeurs = implode(', ', $obs);
                                                        $requete = "INSERT INTO cel_obs ($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.";
                                                        } else {
                                                                $obs_a_taguer_ordres[] = trim($obs['ordre'], "'");
                                                        }

                                                        // récupérer l'id de l'obs nouvellement insérée
                                                        $idNouvelleObs = Cel::db()->obtenirDernierId();

                                                        // si le formulaire contient une image on la traite
                                                        if ($img != null) {
                                                                $this->nettoyerImagesUploades();
                                                                $img_a_taguer_ids_noms = $this->stockerImagesEtLierAObs($idNouvelleObs, $img, $utilisateur);
                                                                if ($img_a_taguer_ids_noms === false) {
                                                                        $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');

                                                $obs_a_taguer_ids = $this->obtenirIdsObsPourTableauOrdres($this->utilisateur_id, $obs_a_taguer_ordres);
                                                $this->taguerObs($obs_a_taguer_ids);
                                                if ($img_a_taguer_ids_noms !== false) {
                                                        $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, $this->champsEtendusObs);
                                        } else {
                                                $erreursDurantTraitement = true;
                                                $this->messages[] = "Un nouveau numéro d'ordre d'observation n'a pu être généré.";
                                        }
                                        // 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[] = "L'identifiant de l'utilisateur (courriel) n'a pas été transmis.";
                                }
                        } 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 true si le courriel $courriel est présent dans l'annuaire Tela,
         * false sinon
         */
        protected function estInscritATela($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;
                }
                // le service annuaire a retourné qqch de valide
                return (! empty($retour));
        }

        /**
         * Retourne true si les champs suivants sont présents dans le tableau :
         *  - obsId1[nom_sel]
         *  - 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', 'nom_sel', 'nom_referentiel', 'nom_ret_nn',
         * 'nom_ret', 'famille'), 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 nom_sel
         */
        protected function enrichirDonneesTaxonomiques(&$obs) {
                // sans référentiel, on ne peut rien faire
                if (! empty($obs['nom_referentiel'])) {
                        // copies locales pour ne pas abimer les données d'entrée
                        $nn = $obs['nom_sel_nn'];
                        $ref = $obs['nom_referentiel'];
                        $ns = $obs['nom_sel'];
                        $nr = $obs['nom_ret'];
                        $nnr = $obs['nom_ret_nn'];
                        $fam = $obs['famille'];
                        $nt = $obs['nt'];

                        // si j'ai un nn, tentative de retrouver le nnr, le nom_sel,
                        // le nom_ret 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 'nom_ret' car le service eFlore noms ne le retourne que sans auteur (pas bon)
                                && (empty($ns) || empty($nnr) || empty($nt) || 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($nt) || 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['nom_sel_nn'] = $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_complet'] != null) {
                                        $obs['nom_sel'] = $infos_nom['nom_complet'];
                                }
                                if ($infos_nom['nom_retenu.id'] != null) {
                                        $obs['nom_ret_nn'] = $infos_nom['nom_retenu.id'];
                                }
                                if ($infos_nom['num_taxonomique'] != null) {
                                        $obs['nt'] = $infos_nom['num_taxonomique'];
                                }
                                // manque le nom_ret retourné sans auteur (insatisfaisant)
                                if ($infos_nom['famille'] != null) {
                                        $obs['famille'] = $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 ChampEtendu();
                                                $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);
        }

        private function traiterImagesALierAObs($id_utilisateur, $ordreObs, $obs) {
                $imgAAjouter = null;
                if (is_array($obs['image_nom'])) {
                        $imgAAjouter = array();
                        foreach ($obs['image_nom'] as $index => $nom_image) {
                                $image = array();
                                $image['id_utilisateur'] = $id_utilisateur;
                                $image['id_obs'] = $ordreObs;
                                $image['nom'] = $nom_image;
                                $image['tags'] = isset($obs['image_tag'][$index]) ? explode(',',$obs['image_tag'][$index]) : '';
                                // 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'] = isset($obs['image_b64'][$index]) ? $obs['image_b64'][$index] : '';
                                $this->debug[] = 'Contient B64 : '.(empty($obs['image_b64']) ? 'non' : 'oui');
                                $imgAAjouter[] = $image;
                        }
                } else {
                        if (!empty($obs['image_nom'])) {
                                $imgAAjouter = array();
                                $imgAAjouter['id_utilisateur'] = $id_utilisateur;
                                $imgAAjouter['id_obs'] = $ordreObs;
                                $imgAAjouter['nom'] = $obs['image_nom'];
                                //$imgAAjouter['tags'] = isset($obs['image_tag']) ? explode(',',$obs['image_tag']) : '';
                                $imgAAjouter['b64'] = isset($obs['image_b64']) ? $obs['image_b64'] : array();
                                $this->debug[] = 'Contient B64 : '.(empty($obs['image_b64']) ? 'non' : 'oui');
                        }
                }

                return $imgAAjouter;
        }

        protected function stockerImagesEtLierAObs($id_obs, $img, $utilisateur) {
                if (isset($img['nom'])) {
                        $imgTmp[] = $img;
                        unset($img);
                        $img = $imgTmp;
                }

                $img_a_taguer_ids_noms = array();
                foreach ($img as $image) {
                        $nomFichierImg = $this->traiterNomFichierImage($image['nom']);
                        $cheminImage = $this->config['cel']['chemin_stockage_temp']."/$nomFichierImg";
                        // Si l'image est transmise en base 64
                        if (empty($image['b64']) === false) {
                                $this->transformerBase64enFichier($cheminImage, $image['b64']);
                        }

                        $this->debug[] = 'Nom fichier img debut :'.$nomFichierImg;
                        $idImg = $this->ajouterImageSurDdEtBdd($id_obs, $utilisateur, $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 = false;
                                break;
                        }
                }
                return $img_a_taguer_ids_noms;
        }

        /**
         * Regarde si les infos concernant l'utilisateur en cours sont satisfaisantes
         * (un ID et des infos complètes venant d'un jeton); si non, regarde si un
         * ID a été passé en POST (cas du Widget de Saisie); si non, regarde tout de
         * même si l'email envoyé en POST correspond à un utilisateur connu dans la
         * table cel_utilisateurs_infos (cas de la synchro Pl@ntNet > TB)
         * 
         * @TODO réviser l'intégralité du flux pour éviter cette situation
         * sous-optimale et spaghettoïde
         */
        private function affecterChampsManquantsUtilisateur($utilisateur) {
                $gestion_utilisateur = new GestionUtilisateur($this->config);
                // le nom de la méthode est trompeur : $infos_complementaires ne sera
                // chargé que si un jeton SSO est présent
                $infos_complementaires = $gestion_utilisateur->obtenirUtilisateurSiExiste($utilisateur['courriel']);
                // si on n'a pas d'ID pour l'instant
                if(!isset($utilisateur['id_utilisateur']) || trim($utilisateur['id_utilisateur']) == '') {
                        // si les infos complémentaires ont été trouvées, on charge ce
                        // qu'elles contiennent
                        if ($infos_complementaires['connecte'] && isset($infos_complementaires['id_utilisateur'])) {
                                // on essaye de ne pas écraser avec du vide (on sait jamais)
                                $utilisateur['id_utilisateur'] = $infos_complementaires['id_utilisateur'];
                                if (isset($infos_complementaires['prenom']) && trim($infos_complementaires['prenom']) != '') {
                                        $utilisateur['prenom'] = $infos_complementaires['prenom'];
                                }
                                if (isset($infos_complementaires['nom']) && trim($infos_complementaires['nom']) != '') {
                                        $utilisateur['nom'] = $infos_complementaires['nom'];
                                }
                        } else {
                                // sinon on regarde dans cel_utilisateurs_infos pour voir si on
                                // ne connait pas l'email quand-même
                                $infosCUI = $gestion_utilisateur->lireCelUtilisateursInfos($utilisateur['courriel']);
                                if ($infosCUI) {
                                        if (! empty($infosCUI['id_utilisateur'])) {
                                                $utilisateur['id_utilisateur'] = $infosCUI['id_utilisateur'];
                                        }
                                        if (! empty($infosCUI['prenom'])) {
                                                $utilisateur['prenom'] = $infosCUI['prenom'];
                                        }
                                        if (! empty($infosCUI['nom'])) {
                                                $utilisateur['nom'] = $infosCUI['nom'];
                                        }
                                }
                                // @TODO si la personne est inscrite à TB mais n'a jamais
                                // utilisé le CeL, elle n'est pas présente dans la table
                                // cel_utilisateurs_info... il faudrait appeler l'annuaire ici

                                // else: en dernier recours on garde ce qu'on a dans le POST; on
                                // obtient alors un obs "anonyme" (utilisateur non-inscrit)
                                elseif (! empty($utilisateur['courriel'])) {
                                        $utilisateur['id_utilisateur'] = $utilisateur['courriel'];
                                }
                        }
                }

                return $utilisateur;
        }

        private function supprimerSlashesProfond($valeur) {
                $valeur = is_array($valeur) ? array_map(array($this, 'supprimerSlashesProfond'), $valeur) : stripslashes($valeur);
                return $valeur;
        }

        private function getMaxOrdre($id_utilisateur) {
                $idUtilisateurP = Cel::db()->proteger($id_utilisateur);
                $requete = 'SELECT MAX(ordre) AS ordre '.
                        'FROM cel_obs '.
                        "WHERE ce_utilisateur = $idUtilisateurP ".
                        ' -- '.__FILE__.':'.__LINE__;
                $ordre_max = Cel::db()->requeterValeurUnique($requete);

                return ($ordre_max !== false) ? $ordre_max + 1 : null;
        }

        /**
         * 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) {
                $chemin_parent = '/';
                $listeIdsTags = array();
                foreach ($tags as $tag) {
                        $tag = $this->nettoyerTag($tag);
                        if ($tag != '') {
                                $id_mot_cle = $this->gestionMotsClesObs->insererParCheminSiInexistant($tag, $chemin_parent, $this->utilisateur_id);
                                if ($id_mot_cle !== false) {
                                        $listeIdsTags[] = $id_mot_cle;
                                        $chemin_parent .= $tag."/";
                                }
                        }
                }

                $liaison_ok = $this->gestionMotsClesObs->lierParTableaux($listeIdsTags, $observations_ids);
                if($liaison_ok) {
                        foreach($observations_ids as $id) {
                                GestionMotsClesChemin::regenererIndexTexteMotCle($id, 'obs');
                        }
                }
                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) {
                $chemin_parent = "/";
                $listeIdsTags = array();
                foreach ($tags as $tag) {
                        $tag = $this->nettoyerTag($tag);
                        if ($tag != '') {
                                $id_mot_cle = $this->gestionMotsClesImages->insererParCheminSiInexistant($tag, $chemin_parent, $this->utilisateur_id);
                                if ($id_mot_cle !== false) {
                                        $listeIdsTags[] = $id_mot_cle;
                                        $chemin_parent .= $tag."/";
                                }
                        }
                }
                $liaison_ok = $this->gestionMotsClesImages->lierParTableaux($listeIdsTags, $images_ids);
                if($liaison_ok) {
                        foreach($images_ids as $id) {
                                GestionMotsClesChemin::regenererIndexTexteMotCle($id, 'images');
                        }
                }
                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";
                }
        }

        private function obtenirIdsObsPourTableauOrdres($id_utilisateur, $ordres) {
                $this->debug[] = print_r($ordres,true);
                $id_utilisateur = Cel::db()->proteger($id_utilisateur);
                $ordres = array_map(array(Cel::db(),'proteger'), $ordres);

                $requete = 'SELECT id_observation '.
                        'FROM cel_obs '.
                        "WHERE ce_utilisateur = $id_utilisateur ".
                        "       AND ordre IN (".implode(',',$ordres).") ";
                $this->debug[] = $requete;
                $resultat = Cel::db()->requeter($requete);
                $ids = array();
                foreach($resultat as $id) {
                        $ids[] = $id['id_observation'];
                }
                return $ids;
        }

        /**
         * Supprime toutes les images temporaires dont :
         * - l'ancienneté est supérieure à DUREE_DE_VIE_IMG (si $nomsDeFichiers vaut false, 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=false) {
                // mode de suppression
                $suppressionParNom = (is_array($nomsDeFichiers) && count($nomsDeFichiers) > 0);

                $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 ($suppressionParNom) {
                                                        $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 $utilisateur l'utilisateur
        * @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, $utilisateur, $cheminImage, $nomFichierImage) {
                $idImage = false;
                $idUtilisateur = $utilisateur['id_utilisateur'];
                $nouvelOrdre = $this->obtenirNouvelOrdrePourUtilisateur($idUtilisateur);
                if ($nouvelOrdre !== false) {
                        if (file_exists($cheminImage)) {
                                $extracteurMetadonnees = new ExtracteurMetadonnees();
                                $metadonnees = $extracteurMetadonnees->extraireMetadonnees($cheminImage) ;
                                if ($metadonnees !== false) {
                                        $infosImage = $metadonnees;
                                        $infosImage['ce_observation'] = $id_obs;
                                        $infosImage['ordre'] = $nouvelOrdre;
                                        $infosImage['nom_original'] = $nomFichierImage;
                                        $infosImage['ce_utilisateur'] = $idUtilisateur;
                                        $infosImage['courriel_utilisateur'] = $utilisateur['courriel'];
                                        $infosImage['nom_utilisateur'] = $utilisateur['nom'];
                                        $infosImage['prenom_utilisateur'] = $utilisateur['prenom'];
                                        $infosImage['md5'] = md5_file($cheminImage);
                                        $infosImage['date_creation'] = 'NOW()';
                                        $infosImage['date_modification'] = 'NOW()';
                                        $infosImage['date_liaison'] = 'NOW()';
                                        $infosImage['date_transmission'] = 'NOW()';
                                        $infosImage['transmission'] = '1';
                                        $this->debug[] = 'Nom fichier img meta :'.$nomFichierImage;
                                        $requete = $this->construireRequeteInsertionImage($infosImage);
                                        $resultat = Cel::db()->executer($requete);
                                        if ($resultat !== false) {
                                                $idImage = $this->obtenirIdImagePourIdentifiantEtOrdre($idUtilisateur, $nouvelOrdre);
                                                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.";
                        }
                } else {
                        $this->messages[] = "Erreur lors du calcul du nouvel ordre de l'image.";
                }
                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 obtenirNouvelOrdrePourUtilisateur($id_utilisateur) {
                $id_utilisateur = Cel::db()->proteger($id_utilisateur);

                $requete = 'SELECT MAX(ordre) as max_ordre '.
                        'FROM cel_images '.
                        "WHERE ce_utilisateur = $id_utilisateur ";
                $resultat = Cel::db()->requeter($requete);

                $ordre = ($resultat) ? ++$resultat[0]['max_ordre'] : 0;
                return $ordre;
        }

        private function obtenirIdImagePourIdentifiantEtOrdre($id_utilisateur, $ordre) {
                $id_utilisateur = Cel::db()->proteger($id_utilisateur);
                $ordre = Cel::db()->proteger($ordre);

                $requete = 'SELECT id_image '.
                        'FROM cel_images '.
                        "WHERE ce_utilisateur = $id_utilisateur ".
                        "       AND ordre = $ordre ";
                $resultat = Cel::db()->requeter($requete);

                $id_image = (count($resultat) > 0) ? $resultat[0]['id_image'] : false;
                return $id_image;

        }

        private function construireRequeteInsertionImage($informations) {
                $champs = array();
                $valeurs = array();
                foreach ($informations as $champ => $valeur) {
                        $champs[] = $champ;
                        if (is_null($valeur)) {
                                $valeurs[] = 'NULL';
                        } else if ($valeur === 'NOW()') {
                                $valeurs[] = $valeur;
                        } else {
                                $valeurs[] = Cel::db()->proteger($valeur);
                        }
                }
                $champsConcat = implode(', ', $champs);
                $valeursConcat = implode(', ', $valeurs);

                $requete = "INSERT INTO cel_images ($champsConcat) VALUES ($valeursConcat) ".
                        ' -- '.__FILE__.':'.__LINE__;
                return $requete;
        }
}