Subversion Repositories eFlore/Applications.cel

<?php
// declare(encoding='UTF-8');
/**
 * Service permettant de récupérer toutes les informations d'une observation publique.
 * Encodage en entrée : utf8
 * Encodage en sortie : utf8
 *
 * Cas d'utilisation :
 * GET /CelObs/[id] : oû id est l'identifiant d'une observation publique
 *
 * @author Jean-Pascal MILCENT <jpm@clapas.org>
 * @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
 * @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
 * @version $Id$
 * @copyright © 2013, Jean-Pascal MILCENT
 */
class CelObs extends Cel {
        private $rechercheObs = null;
        private $chpsEtendus = null;
        private $donnees = null;

        public function __construct($config) {
                parent::__construct($config);
                $this->rechercheObs = new RechercheObservation($config);
                $this->chpsEtendus = new GestionChampsEtendus($config, 'obs');

                $this->chargerNomsTablesReferentiels();
        }

        private function chargerNomsTablesReferentiels() {
                // Créé des attributs avec le code du référentiel : bdtfx, bdtxa, apd, isfan
                foreach ( $this->config['referentiels'] as $referentiel => $table) {
                        $this->$referentiel = $table;
                }
        }

        function getElement($ressources){
                $retour = false;
                $idObs = $ressources[0];
                if (isset($idObs) && preg_match('/^[0-9]+$/', $idObs)) {

                        $criteres = array('id_observation' => $idObs, 'transmission' => 1);
                        $obsTrouvee = $this->rechercheObs->rechercherObservations(null, $criteres, 0, 1)->get();

                        $observation = array();
                        if (is_array($obsTrouvee) && count($obsTrouvee) > 0) {
                                $observation = $obsTrouvee[0];
                        }
                        $observation = $this->preparerChamps($observation);
                        $observation = $this->selectionnerChamps($observation);
                        $observation = $this->formaterClePourJs($observation);

                        $champsEtendus = $this->chpsEtendus->consulter($idObs);
                        if (is_array($champsEtendus) && count($champsEtendus) > 0) {
                                $champsEtendus = $this->preparerChampsEtendus($champsEtendus);
                                $observation['extension'] = $champsEtendus;
                        }

                        $this->envoyerJson($observation);
                        $retour = true;
                }
                return $retour;
        }

        private function preparerChamps($champs) {
                if (isset($champs['date_observation'])) {
                        $date = explode(' ', $champs['date_observation']);
                        $champs['date_observation'] = $date[0];
                }
                return $champs;
        }

        private function selectionnerChamps($observation) {
                $champs = array('id_observation', 'nom_sel', 'nom_ret', 'nom_ret_nn', 'nt', 'famille',
                        'nom_referentiel', 'ce_zone_geo', 'zone_geo', 'lieudit', 'station', 'milieu', 'latitude', 'longitude',
                        'geodatum', 'date_observation', 'mots_cles_texte', 'commentaire', 'date_creation', 'date_modification',
                        'date_transmission', 'code_insee_calcule', 'abondance', 'certitude', 'phenologie', 'altitude');
                $selection = array();
                foreach ($champs as $chp) {
                        if (isset($observation[$chp])) {
                                $selection[$chp] = $observation[$chp];
                        }
                }
                return $selection;
        }

        private function formaterClePourJs(Array $tableau) {
                $tableauJs = array();
                foreach ($tableau as $cle => $valeur) {
                        if ($cle == 'ce_zone_geo') {
                                $cle = 'codeZoneGeo';
                        } else {
                                $cle = str_replace(' ', '', ucwords(str_replace('_', ' ', $cle)));
                                $cle{0} = strtolower($cle{0});
                        }
                        $tableauJs[$cle] = $valeur;
                }
                return $tableauJs;
        }

        private function preparerChampsEtendus($champs) {
                $retour = array();
                foreach ($champs as $chp) {
                        $retour[$chp['cle']] = array('valeur' => $chp['valeur'], 'label' => $chp['label']);
                }
                return $retour;
        }

        /**
         * Méthode appelée avec une requête de type POST et un identifiant d'observation.
         * Modifie une observation en fonction des informations envoyées en POST.
         * Utilisé par:
         * - service:del:0.1/determinations/ : ValiderDetermination.php::modifierObservationParDetermination()
         * - service:del:0.1/observations/#idObs [POST] : pour dépublier une observation
         *
         * @param $uid array    $uid[0] (int) : identifiant observation
         * @param pairs array   tableau contenant les champs à modifier sous la forme : nom_du_champ=nouvelle_valeur
         */
        public function updateElement($ressources, $donnees) {
                $this->donnees = $donnees;
                if ($this->controlerAccessibiliteWs()) {
                        if ($this->controleAppelIpAutorisee()) {
                                $idObs = isset($ressources[0]) ? $ressources[0] : '';
                                $this->verifierIdentifiantObs($idObs);

                                if (count($this->donnees) == 1) {
                                        $donneesObligatoires = array('transmission');
                                        if ($this->verifierDonneesObligatoires($donneesObligatoires)) {
                                                $this->depublierObs($idObs);
                                        }
                                } else if (count($this->donnees) == 4) {
                                        $donneesObligatoires = array('id_observation', 'nom_sel_nn', 'nom_referentiel', 'id_utilisateur');
                                        if ($this->verifierDonneesObligatoires($donneesObligatoires)) {
                                                $this->accepterPropositionDEL($idObs);
                                        }
                                } else {
                                        $msg = "La modification complète d'une observation n'est pas implémentée.";
                                        $this->envoyerMessageErreur(501, $msg);
                                }

                                $this->envoyer('ok');
                        }
                }
                return true;
        }

        private function verifierIdentifiantObs($chaine) {
                $ok = preg_match('/^[0-9]+$/', $chaine);
                if ($ok == false) {
                        $msg = "Indiquer un seul identifiant numérique d'observation.";
                        $this->envoyerMessageErreur(412, $msg);
                }
                return $ok;
        }

        private function verifierDonneesObligatoires($champsObligatoires) {
                foreach ($champsObligatoires as $param) {
                        if (! isset($this->donnees[$param])) {
                                $msg = sprintf("Paramètre %s manquant (parmi %s)", $param, implode(', ', $champsObligatoires));
                                $this->envoyerMessageErreur(412, $msg);
                        }
                }
                return true;
        }

        private function depublierObs($idObs) {
                $gestionnaireObs = new GestionObservation($this->config);
                $depublication = $gestionnaireObs->modifierTransmissionObservation($idObs, false);
                if ($depublication === false) {
                        $msg = "Un problème est survenu (voir log). Les observations n'ont pas pu être dépubliées.";
                        $this->envoyerMessageErreur(304, $msg);
                }
        }

        /**
         * Modifie une observation aveec les infos d'une proposition :
         * Nous complétons les données de la proposition acceptée ici car:
         * 1) la table tb_del.del_commentaire ne contient pas toutes les informations nécessaires
         * 2) la table tb_del.del_commentaire ne *devrait* pas contenir beaucoup plus que nom_sel et nom_sel_nn
         * 3) la génération de ces données ici, au moment de l'UPDATE, est le meilleur garant de leur fiabilité
         */
        private function accepterPropositionDEL($idObs) {
                $gestion_observation = new GestionObservation($this->config);
                $donnees = array_map('trim', $this->donnees);
                $idUtilisateur = $donnees['id_utilisateur'];
                $donneesAModifier = array(
                        'certitude' => 'Certaine',
                        'nom_referentiel' => $donnees['nom_referentiel'],
                );
                // TODO : la récupération des infos du nom est aussi effectué par la suite voir ce qu'il faut garder
                $infosNoms = $this->getNomInfos($donnees['nom_sel_nn'], $donnees['nom_referentiel']);
                if ($infosNoms) {
                        $donneesAModifier = array_merge($donneesAModifier, $infosNoms);
                }

                $modification = $gestion_observation->modifierObservationPublique($idObs, $donneesAModifier);

                if ($modification) {
                        // supression des éventuelles liaison de l'obs avec le mot clé contenu dans obsKeywordDelete
                        $gestionMotsClesObs = new GestionMotsClesChemin($this->config, 'obs');
                        $supp_liaison_mot_cle = $gestionMotsClesObs->supprimerLiaisonPourMotCleEtIdElementLie('aDeterminer', $idObs, $idUtilisateur);
                } else {
                        $msg = "Impossible de modifier l'observation associée à cet identifiant. Erreur mysql : " . mysql_error();
                        $this->envoyerMessageErreur(500, $msg);// Internal Server Error
                }
        }

        // TODO : cette méthode et celles qui en dépendent sont peut être inutiles au vue de la méthode traiterEspece() de GestionObservation
        private function getNomInfos($id_nom, $code_referentiel) {
                $retour = false;
                if ($id_nom && $code_referentiel) {
                        switch ($code_referentiel) {
                                case 'bdtfx' :
                                        $retour = $this->getInfosBdtfx($id_nom);
                                        break;
                                case 'bdtxa' :
                                        $retour = $this->getInfosBdtxa($id_nom);
                                        break;
                                case 'isfan' :
                                        $retour = $this->getInfosIsfan($id_nom);
                                        break;
                                case 'apd' :
                                        $retour = $this->getInfosApd($id_nom);
                                        break;
                        }
                }
                return $retour;
        }

        private function getInfosBdtfx($id_nom) {
                $idNomP = CEL::db()->proteger($id_nom);
                $requete = "SELECT o.num_nom_retenu AS nom_ret_nn, o.num_taxonomique AS nt, o.famille, ".
                        "       CONCAT(o.nom_sci, ' ', o.auteur) AS nom_sel, ".
                        "       CONCAT(ret.nom_sci, ' ', ret.auteur) AS nom_ret ".
                        "FROM {$this->bdtfx} AS o ".
                        "       LEFT JOIN {$this->bdtfx} AS ret ON (o.num_nom_retenu != 0 AND o.num_nom_retenu = ret.num_nom) ".
                        "WHERE o.num_nom = $idNomP ".
                        ' -- '.__FILE__.' : '.__LINE__;
                $resultat = Cel::db()->requeterLigne($requete);
                return $resultat;
        }

        private function getInfosBdtxa($id_nom) {
                $idNomP = CEL::db()->proteger($id_nom);
                // Champ "num_tax" au lieu de "num_taxonomique"
                $requete = "SELECT o.num_nom_retenu AS nom_ret_nn, o.num_tax AS nt, o.famille, ".
                        "       CONCAT(o.nom_sci, ' ', o.auteur) AS nom_sel, ".
                        "       CONCAT(ret.nom_sci, ' ', ret.auteur) AS nom_ret ".
                        "FROM {$this->bdtxa} AS o ".
                        "       LEFT JOIN {$this->bdtxa} AS ret ON (o.num_nom_retenu != 0 AND o.num_nom_retenu = ret.num_nom) ".
                        "WHERE o.num_nom = $idNomP ".
                        ' -- '.__FILE__.' : '.__LINE__;
                $resultat = Cel::db()->requeterLigne($requete);
                return $resultat;
        }

        private function getInfosIsfan($id_nom) {
                $idNomP = CEL::db()->proteger($id_nom);
                // Champ "num_tax" au lieu de "num_taxonomique"
                $requete = "SELECT o.num_nom_retenu AS nom_ret_nn, o.num_taxonomique AS nt, o.famille, ".
                        "       CONCAT(o.nom_sci, ' ', o.auteur) AS nom_sel, ".
                        "       CONCAT(ret.nom_sci, ' ', ret.auteur) AS nom_ret ".
                        "FROM {$this->isfan} AS o ".
                        "       LEFT JOIN {$this->isfan} AS ret ON (o.num_nom_retenu != 0 AND o.num_nom_retenu = ret.num_nom) ".
                        "WHERE o.num_nom = $idNomP ".
                        ' -- '.__FILE__.' : '.__LINE__;
                $resultat = Cel::db()->requeterLigne($requete);
                return $resultat;
        }

        private function getInfosApd($id_nom) {
                $idNomP = CEL::db()->proteger($id_nom);
                // Champ "num_tax" au lieu de "num_taxonomique"
                $requete = "SELECT o.num_nom_retenu AS nom_ret_nn, o.num_taxonomique AS nt, o.famille, ".
                        "       CONCAT(o.nom_sci, ' ', o.auteur) AS nom_sel, ".
                        "       CONCAT(ret.nom_sci, ' ', ret.auteur) AS nom_ret ".
                        "FROM {$this->apd} AS o ".
                        "       LEFT JOIN {$this->apd} AS ret ON (o.num_nom_retenu != 0 AND o.num_nom_retenu = ret.num_nom) ".
                        "WHERE o.num_nom = $idNomP ".
                        ' -- '.__FILE__.' : '.__LINE__;
                $resultat = Cel::db()->requeterLigne($requete);
                return $resultat;
        }
}