Subversion Repositories eFlore/Applications.coel

Rev

Rev 1733 | Blame | Compare with Previous | Last modification | View Log | RSS feed 

<?php
/**
 * Service fournissant la liste des structures et leurs informations.
 * 
 * @author Raphaël Droz <raphael@tela-botanica.org>
 * @author Jean-Pascal MILCENT <jpm@tela-botanica.org>
 * @Copyright (c) 2009, 2013 Tela Botanica (accueil@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>
 */
class CoelStructure extends Coel {

        static $optional_bool_fields = array(
                'cs_nbre_personne',
                'csc_mark_formation', 'csc_mark_formation_interet',
                'csc_mark_collection_commune', 'csc_mark_acces_controle', 'csc_mark_restauration', 'csc_mark_traitement',
                'csc_mark_acquisition_collection', 'csc_mark_acquisition_echantillon',
                'csv_mark_action', 'csv_mark_action_future', 'csv_mark_recherche', 'csv_mark_acces_ss_motif', 'csv_mark_visite_avec_motif',
                'cs_latitude', 'cs_longitude',
        );

        // ATTENTION : tjrs garder la table principale en premier, puis mettre les tables spécialisées.
        protected $tables = array(      120 => array(
                'nom' => 'coel_structure', 
                'prefixe' => 'cs', 
                'id' => array('cs_id_structure')),
        122 => array(
                'nom' => 'coel_structure_conservation', 
                'prefixe' => 'csc',
                'id' => array('csc_id_structure')),
        123 => array(
                'nom' => 'coel_structure_valorisation', 
                'prefixe' => 'csv',
                'id' => array('csv_id_structure')));    

        /**
         * Méthode principale appelée avec une requête de type GET.
         */
        public function getElement($param = array()) {
                // Initialisation des variables
                $info = array();
                                
                // Nour recherchons le type de requête demandé
                $type = $param[0];
                                 
                if ($type == '*' || is_numeric($type)) {
                        // Pré traitement des paramêtres
                        $p = $this->traiterParametresUrl(array('id_projet', 'id_structure', 'recherche'), $param);
                        $info = $this->getElementParDefaut($p);
                } else {
                        $methode = 'getElement'.$type;
                        if (method_exists($this, $methode)) {
                                array_shift($param);
                                $info = $this->$methode($param);
                        } else {
                                $this->messages[] = "Le type d'information demandé '$type' n'est pas disponible.";
                        }
                }
                
                // Envoie sur la sortie standard
                $this->envoyer($info);
        }
        
        /**
         * Méthode par défaut pour garder la compatibilité avec Coel.
         * Appelée avec les paramêtres d'url suivant :
         * /CoelStructure/_/_/_
         * ou les _ représentent dans l'ordre : id_projet, id_structure et nom
         * Si un des paramêtres est abscent, il prendre la valeur *
         */
        public function getElementParDefaut($p) {
                // Initialisation des variables
                $info = array();

                $whereClause = array();
                if(isset($p['id_projet'])) $whereClause[] = "cs_ce_projet = {$p['id_projet']}";
                if(isset($p['id_structure'])) $whereClause[] = "cs_id_structure = {$p['id_structure']}";

                if(isset($p['recherche'])) {
                        if(@$this->searchCity && trim($this->searchCity) == 'true') {
                                $whereClause[] = "(" . implode(" OR ", array("cs_nom LIKE {$p['recherche']}", "cs_ville LIKE {$p['recherche']}")) . ")";
                        } else {
                                $whereClause[] = "cs_nom LIKE {$p['recherche']}";
                        }
                }

                // Construction de la requête
                $requete = sprintf(
                        'SELECT SQL_CALC_FOUND_ROWS %s cs.*, csc.*, csv.*, cmhl_date_modification, cmhl_notes, cmhl_source, cmhl_ce_modifier_par, cmhl_ce_etat, cmhl_ip '
                        . ' FROM coel_structure AS cs '
                        . ' LEFT JOIN coel_meta_historique_ligne ON (cs_ce_meta = cmhl_id_historique_ligne) '
                        . ' LEFT JOIN coel_structure_conservation AS csc ON (cs_id_structure = csc_id_structure) '
                        . ' LEFT JOIN coel_structure_valorisation AS csv ON (cs_id_structure = csv_id_structure) '
                        . ' WHERE %s ORDER BY %s LIMIT %d, %d -- %s:%d',

                        $this->distinct ? 'DISTINCT' : '',
                        $whereClause ? implode(" AND ", $whereClause) : TRUE,
                        is_null($this->orderby) ? 'cs.cs_nom ASC' : $this->orderby,
                        $this->start, $this->limit,
                        __FILE__, __LINE__);

                // Récupération des résultats
                try {
                        // SPÉCIAL :
                        // Lorsqu'on cherche une seule structure avec un id passé en paramêtre, nous devons renvoyer un objet
                        $donnees = ($this->formatRetour == 'objet' && isset($p['id_structure'])) ? $this->bdd->query($requete)->fetch(PDO::FETCH_OBJ) : $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
                        if ($donnees === false) {
                                $this->messages[] = "La requête a retourné aucun résultat.";
                        }

                        // l'UI java n'aime pas les NULL
                        if(!is_array($donnees)) {
                                // $donnees est un objet PHP
                                array_walk($donnees, create_function('&$val', '$val = is_null($val) ? "" : $val;'));
                        }
                        else {
                                // $donnees est un tableau d'objets PHP
                                foreach($donnees as &$structure) {
                                        array_walk($structure, create_function('&$val', '$val = is_null($val) ? "" : $val;'));
                                }
                        }

                        $elements_nbre = $this->bdd->query("SELECT FOUND_ROWS() AS c")->fetch(PDO::FETCH_ASSOC);
                        $info['nbElements'] = intval($elements_nbre['c']);
                        $info['structures'] = $donnees;                 
                } catch (PDOException $e) {
                        $this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
                }

                return $info;
        }
        
        /* Méthode pour récupérer le nombre de structure par zone géographique.
         * Appelée avec les paramêtres d'url suivant :
         * /CoelStructure/ParZoneGeo/_
         * ou les _ représentent dans l'ordre : type.
         * ou type peut valoir: FRD (= département français) 
         * Si un des paramêtres est abscent, il prendre la valeur *
         */
        public function getElementParZoneGeo($param) {
                // Pré traitement des paramêtres
                $p = $this->traiterParametresUrl(array('type', 'projets'), $param);
                if (!isset($p['type'])) {
                        $this->messages[] = "Il est obligatoire d'indiquer type de recherche pour utiliser ce service.";
                        return array();
                }

                // Construction de la requête
                $requete =      (($this->distinct) ? 'SELECT DISTINCT' : 'SELECT').' '.
                        '       IF ( SUBSTRING( cs_code_postal FROM 1 FOR 2 ) >= 96, '.
                        '               SUBSTRING( cs_code_postal FROM 1 FOR 3 ), '.
                        '               SUBSTRING( cs_code_postal FROM 1 FOR 2 ) ) AS id, '.
                        '       COUNT( cs_id_structure ) AS nbre '.
                        'FROM coel_structure '.
                        'WHERE cs_ce_truk_pays = 2654 '.
                        (isset($p['projets']) ? "       AND cs_ce_projet IN ({$p['projets']}) " : '').
                        'GROUP BY IF ( SUBSTRING( cs_code_postal FROM 1 FOR 2 ) >= 96, '.
                        '       SUBSTRING( cs_code_postal FROM 1 FOR 3 ), '.
                        '       SUBSTRING( cs_code_postal FROM 1 FOR 2 ) ) '.
                        'ORDER BY '.((!is_null($this->orderby)) ? $this->orderby  : 'id ASC').' ';

                // Récupération des résultats
                try {
                        $donnees = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
                } catch (PDOException $e) {
                        $this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
                }

                if ($donnees === false) {
                        $this->messages[] = "La requête a retourné aucun résultat.";
                        return array();
                }

                $info = array();
                foreach ($donnees as $donnee) {
                        $info[$donnee['id']] = $donnee['nbre'];
                }
                return $info;
        }


        static function NULLifNotNum(&$params, $keys_to_null) {
                foreach($keys_to_null as $v) {
                        if(! array_key_exists($v, $params)) continue;
                        if(!is_numeric($params[$v]) && ! preg_match('/^-?\d+,\d*$/', $params[$v])) {
                                $params[$v] = NULL;
                        }
                        else {
                                $params[$v] = str_replace(',', '.', $params[$v]);
                        }

                }
        }
        
        /**
         * Méthode appelée pour ajouter un élément.
         */
        public function createElement($params) {
                // Identification de l'utilisateur
                list($id_utilisateur, $id_session) = $this->getIdentification($params);

                // Contrôle du non détournement de l'utilisateur
                if (!$this->etreAutorise($id_utilisateur)) {
                        $this->envoyer();
                        return;
                }
                try {
                        $form_needs_refresh = self::callNominatim($params, $this->bdd);

                        self::NULLifNotNum($params, self::$optional_bool_fields);

                        // Vérification des tables à vraiment mettre à jour en fonction des données passées.
                        $tables_a_modifier = $this->recupererTablesAModifier($params);
                        reset($tables_a_modifier);

                        $id_structure = null;
                        while (list($table_id, $table) = each($tables_a_modifier)) {
                                if (is_null($table['champs'])) continue;
                                if ($this->avoirCleComplete($table)) {
                                        $this->mettreAJourAvecCle($id_utilisateur, $id_session, $table_id, $table);
                                        continue;
                                }

                                // Ajout des données à la table des données
                                $id_structure = $this->ajouter($table);
                                if ($id_structure === false) continue;

                                $table['champs_valeurs_id']['cs_id_structure'] = $id_structure;
                                $table['champs_valeurs_brut']['cs_id_structure'] = $id_structure;
                                $tables_a_modifier[122]['champs_valeurs_id']['csc_id_structure'] = $id_structure;
                                $tables_a_modifier[122]['champs_valeurs_brut']['csc_id_structure'] = $id_structure;
                                $tables_a_modifier[122]['champs_valeurs_protege']['csc_id_structure'] = $this->bdd->quote($id_structure);
                                $tables_a_modifier[123]['champs_valeurs_id']['csv_id_structure'] = $id_structure;
                                $tables_a_modifier[123]['champs_valeurs_brut']['csv_id_structure'] = $id_structure;
                                $tables_a_modifier[123]['champs_valeurs_protege']['csv_id_structure'] = $this->bdd->quote($id_structure);

                                // Historisation (Ajout des méta-données)
                                $etat = 1; // Ajout
                                $cle = $this->recupererCle($table);
                                $info = $this->creerXmlHisto($table['champs_valeurs_brut']);
                                $id_meta = $this->historiser($table_id, $cle, $info, $id_utilisateur, $etat, $id_session);
                                                                
                                // Liaison de la table des données à ses méta-données
                                $champ_meta = "{$table['prefixe']}_ce_meta";
                                $table['champs_valeurs_protege'] = array($champ_meta => $id_meta);
                                $this->modifier($table);
                        }

                        if(isset($params['cpr_abreviation']) && !empty($params['cpr_abreviation'])) {
                                $this->ajouterGuid($params['cpr_abreviation'], $id_structure);
                        }
                } catch (PDOException $e) {
                        $this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage(), $requete);
                }

                if($form_needs_refresh) { // coordonnées mises à jour en DB: en informer le formulaire
                        $this->envoyer($this->getElementParDefaut(array('id_structure' => $id_structure)));
                        exit;
                }
        
                $this->envoyer($id_structure);
        }

        /**
         * Méthode appelée pour mettre à jour un élément
         */
        public function updateElement($uid, $params) {
                // Vérification de la présence des id passés par l'url
                if (!isset($uid[0])) {
                        $this->messages[] = "Identifiant de structure manquant. Vous ne devriez pas avoir accès à ce service.";
                        $this->envoyer();
                        return;
                }

                // Identification de l'utilisateur
                list($id_utilisateur, $id_session) = $this->getIdentification($params);
                // Contrôle du non détournement de l'utilisateur
                if (!$this->etreAutorise($id_utilisateur)) {
                        $this->envoyer();
                        return;
                }
                try {
                        $form_needs_refresh = self::callNominatim($params, $this->bdd);

                        self::NULLifNotNum($params, self::$optional_bool_fields);

                        // Vérification des tables à vraiment mettre à jour en fonction des données passées.
                        $tables_a_modifier = $this->recupererTablesAModifier($params);
                        // Pour chaque table du module nous lançons si nécessaire l'historisation puis la mise à jour
                        foreach ($tables_a_modifier as $table_id => $table) {
                                if(@$table['nom'] == 'coel_structure' && !$this->avoirCleComplete($table)) {
                                        error_log("tentative d'UPDATE sans contrainte de WHERE, \$table = " . print_r($table, TRUE));
                                        continue; // ne pas mettre à jour sans contrainte de WHERE
                                }
                                $this->mettreAJourAvecCle($id_utilisateur, $id_session, $table_id, $table);
                        }
                } catch (PDOException $e) {
                        $this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage(), $requete);
                }

                // Envoie sur la sortie standard

                if($form_needs_refresh) { // coordonnées mises à jour en DB: en informer le formulaire (si resté ouvert)
                        $this->envoyer($this->getElementParDefaut(array('id_structure' => $uid[0])));
                        exit;
                }
                $this->envoyer(); // OK par défaut
        }
        
        /**
         * Méthode appelée pour supprimer un élément
         */
        public function deleteElement($uid) {
                // NOTES : une structure ne peut pas être supprimée si elle possède des collections liées.
                // Vérification de la présence des id passés par l'url
                if (!isset($uid[0]) || !isset($uid[1])) {
                        $this->messages[] = "Identifiant de structure ou d'utilisateur manquant. Vous ne devriez pas avoir accès à ce service.";
                        $this->envoyer();
                        return;
                }

                // Identification de l'utilisateur
                list($id_utilisateur, $id_session) = $this->getIdentification($uid[0]);
                // Contrôle du non détournement de l'utilisateur              
                if (! $this->etreAutorise($id_utilisateur)) {
                        $this->envoyer();
                        return;
                }

                // Récupération des id passés par l'url
                $identifiants = explode(',', rtrim($uid[1], ','));

                if (count($identifiants) == 0) {
                        $this->messages[] = "Aucun enregistrement n'a été supprimé.";
                        $this->envoyer();
                        return;
                }
        
                try {
                        foreach ($identifiants as $id_structure) {
                                // Vérification que la structure ne possède pas de collections liées
                                if (self::verifierPresenceCollection($this->bdd, $id_structure)) {
                                        $this->messages[] = "La structure '$id_structure' ne peut pas être supprimée car elle possède des collections liées.";
                                        continue;
                                }

                                $params = array('cs_id_structure' => $id_structure, 'csc_id_structure' => $id_structure, 'csv_id_structure' => $id_structure);
                                $tables_a_modifier = $this->recupererTablesAModifier($params);
                                                                
                                foreach ($tables_a_modifier as $table_id => $table) {
                                        if (! $this->avoirEnregistrement($table)) continue;

                                        if ($this->supprimer($table) === true) {
                                                // Historisation (Ajout des méta-données)
                                                $cle = $this->recupererCle($table);
                                                $this->historiser($table_id, $cle, 'NULL', $id_utilisateur, 3, $id_session);
                                        }
                                }
                        }
                } catch (PDOException $e) {
                        $this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage(), $requete);
                }

                // Envoie sur la sortie standard
                $this->envoyer();
        }
        
        static function verifierPresenceCollection($db, $id_structure) {
                // Vérification que la structure ne possède pas de collections liées
                return ($db->query(sprintf(
                        'SELECT COUNT(cc_id_collection) AS nbre_collection FROM coel_collection ' .
                        ' WHERE cc_ce_structure = %d GROUP BY cc_ce_structure ',
                        $id_structure))->fetchColumn() != 0);
        }

        static function callNominatim(&$params, $db = NULL) {
                // lon/lat déjà saisies ?
                if (@$params['cs_latitude'] && @$params['cs_longitude']) return FALSE;

                // ni adresse, ni CP, ni ville ? rien n'est possible
                if (!@$params['cs_adresse_01'] && !@$params['cs_code_postal'] && !@$params['cs_ville']) return FALSE;

                $lonlat = array();
                if(Coel::coordGuess(Coel::addrReStruct($params, $db), $lonlat)) {
                        $params['cs_latitude'] = $lonlat['lat'];
                        $params['cs_longitude'] = $lonlat['lon'];
                        return TRUE;
                }

                // second guess, sans code postal
                if(@$params['cs_code_postal']) {
                        $params2 = $params;
                        unset($params2['cs_code_postal']);
                        if(Coel::coordGuess(Coel::addrReStruct($params2, $db), $lonlat)) {
                                $params['cs_latitude'] = $lonlat['lat'];
                                $params['cs_longitude'] = $lonlat['lon'];
                                return TRUE;
                        }
                }
                return FALSE;
        }
        
        private function ajouterGuid($abr_projet, $id_structure) {
                if ($id_structure !== false) {
                        $table_guid = $this->tables[120];
                        $table_guid['champs_valeurs_id']['cs_id_structure'] = $id_structure;
                        $table_guid['champs_valeurs_protege']['cs_guid'] = $this->bdd->quote(sprintf($this->config['coel']['guid'], $abr_projet, 'str'.$id_structure));
                        $this->modifier($table_guid);
                }
        }
}