Subversion Repositories eFlore/Applications.cel

<?php
// declare(encoding='UTF-8');
/**
 * Service fournissant une carte dynamique des obsertions publiques du CEL.
 * Encodage en entrée : utf8
 * Encodage en sortie : utf8
 *
 * Cas d'utilisation et documentation :
 * @link http://www.tela-botanica.org/wikini/eflore/wakka.php?wiki=AideCELWidgetCarto
 *
 * Paramètres :
 * ===> utilisateur = identifiant
 * Affiche seulement les observations d'un utilisateur donné. L'identifiant correspond au courriel de 
 * l'utilisateur avec lequel il s'est inscrit sur Tela Botanica.
 * ===> dept = code_du_département
 * Affiche seulement les observations pour le département français métropolitain indiqué. Les codes de département utilisables 
 * sont : 01 à 19, 2A, 2B et 21 à 95. 
 * ===> projet = mot-clé
 * Affiche seulement les observations pour le projet d'observations indiqué. Dans l'interface du CEL, vous pouvez taguer vos 
 * observations avec un mot-clé de projet. Si vous voulez regrouper des observations de plusieurs utilisateurs, communiquez un 
 * mot-clé de projet à vos amis et visualisez les informations ainsi regroupées.
 * ===> num_taxon = num_taxon
 * Affiche seulement les observations pour la plante indiquée. Le num_taxon correspond au numéro taxonomique de la plante. 
 * Ce numéro est disponible dans les fiches d'eFlore. Par exemple, pour "Poa bulbosa L." le numéro taxonomique vaut 7080.
 *  
 * @author              Jean-Pascal MILCENT <jpm@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>
 * @version     $Id$
 * @copyright   Copyright (c) 2010, Tela Botanica (accueil@tela-botanica.org)
 */
class Carto extends WidgetCommun {
        const DS = DIRECTORY_SEPARATOR;
        const SERVICE_CARTO_NOM = 'CelWidgetMap';
        const SERVICE_CARTO_ACTION_DEFAUT = 'carte-defaut';
        
        private $carte = null;
        private $utilisateur = null;
        private $projet = null;
        private $dept = null;
        private $num_taxon = null;
        private $station = null;
        private $format = null;// Format des obs pour les stations (tableau/liste)
        
        /**
         * Méthode appelée par défaut pour charger ce widget.
         */
        public function executer() {
                $retour = null;
                $this->extraireParametres();
                $methode = $this->traiterNomMethodeExecuter($this->carte);
                if (method_exists($this, $methode)) {
                        $retour = $this->$methode();
                } else {
                        $this->messages[] = "Ce type de service '$methode' n'est pas disponible.";
                }
                if (is_null($retour)) {
                        $info = 'Un problème est survenu : '.print_r($this->messages, true);
                        $this->envoyer($info);
                } else {
                        $squelette = dirname(__FILE__).self::DS.'squelettes'.self::DS.$retour['squelette'].'.tpl.html';
                        $html = $this->traiterSquelettePhp($squelette, $retour['donnees']);
                        $this->envoyer($html);
                }
        }
        
        public function extraireParametres() {
                extract($this->parametres);
                $this->carte = (isset($carte) ? $carte : self::SERVICE_CARTO_ACTION_DEFAUT);
                $this->utilisateur = (isset($utilisateur) ? $utilisateur : '*');
                $this->projet = (isset($projet) ? $projet : '*');
                $this->tag = (isset($tag) ? $tag : '*');
                $this->dept = (isset($dept) ? $dept : '*');
                $this->commune = (isset($commune) ? $commune : '*');
                $this->num_taxon = (isset($num_taxon) ? $num_taxon : '*');
                $this->date = (isset($date) ? $date : '*');
                $this->taxon = (isset($taxon) ? $taxon : '*');
                $this->station = (isset($station) ? $station : null);
                $this->format = (isset($format) ? $format : null);
                $this->start = (isset($start) ? $start : null);
                $this->limit = (isset($limit) ? $limit : null);
        }

        /**
         * Carte par défaut
         */
        public function executerCarteDefaut() {
                $widget = null;
                $url_stations = $this->contruireUrlServiceCarto('stations');
                $url_base = sprintf($this->config['chemins']['baseURLAbsoluDyn'], '');

                // Création des infos du widget
                $widget['donnees']['url_cel_carto'] = $this->contruireUrlServiceCarto();
                $widget['donnees']['url_stations'] = $url_stations;
                $widget['donnees']['url_base'] = $url_base;
                $widget['donnees']['utilisateur'] = $this->utilisateur;
                $widget['donnees']['projet'] = $this->projet;
                $widget['donnees']['tag'] = $this->tag;
                $widget['donnees']['dept'] = $this->dept;
                $widget['donnees']['commune'] = $this->commune;
                $widget['donnees']['num_taxon'] = $this->num_taxon;
                $widget['donnees']['date'] = $this->date;
                $widget['donnees']['taxon'] = $this->taxon;
                $widget['donnees']['url_limites_communales'] = $this->obtenirUrlsLimitesCommunales();
                
                $widget['squelette'] = 'carte_defaut';
                
                return $widget;
        }
        
        private function contruireUrlServiceCarto($action = null) {
                // Création url données json
                $url = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::SERVICE_CARTO_NOM);
                if ($action) {
                        $url .= "/$action";
                        
                        $parametres_retenus = array();
                        $parametres_a_tester = array('station', 'utilisateur', 'projet', 'tag', 'dept', 'commune', 
                                'num_taxon', 'taxon', 'date',  
                                'start', 'limit');
                        foreach ($parametres_a_tester as $param) {
                                if (isset($this->$param) && $this->$param != '*') {
                                        $parametres_retenus[$param] = $this->$param;
                                }
                        }
                        if (count($parametres_retenus) > 0) {
                                $parametres_url = array();
                                foreach ($parametres_retenus as $cle => $valeur) {
                                        $parametres_url[] = $cle.'='.$valeur;
                                }
                                $url .= '?'.implode('&', $parametres_url);
                        }
                }
                return $url; 
        }
        
        private function obtenirUrlsLimitesCommunales() {
                $urls = null;
                if (isset($this->dept)) {
                        // si on veut afficher les limites départemmentales on va compter et chercher les noms de fichiers
                        $fichiersKml = $this->chercherFichierKml();
                        if (count($fichiersKml) > 0) {
                                foreach ($fichiersKml as $kml => $dossier){
                                        $url_limites_communales = sprintf($this->config['carto']['limitesCommunaleUrlTpl'], $dossier, $kml);
                                        $urls[] = $url_limites_communales;
                                }
                        }
                }
                $urls = json_encode($urls);
                return $urls;
        }
        
        private function chercherFichierKml(){
                $fichiers = array();
                $chemins = explode(',', $this->config['carto']['communesKmzChemin']);
                $departements = explode(',', $this->dept);// plrs code de départements peuvent être demandés séparés par des virgules
                $departements_trouves = array();
                foreach ($chemins as $dossier_chemin) {
                        if ($dossier_ressource = opendir($dossier_chemin)) {
                                while ($element = readdir($dossier_ressource)) {
                                        if ($element != '.' && $element != '..') {
                                                foreach ($departements as $departement) {
                                                        $nom_dossier = basename($dossier_chemin);
                                                        if (!isset($departements_trouves[$departement]) || $departements_trouves[$departement] == $nom_dossier) {
                                                                $dept_protege = preg_quote($departement);
                                                                if (!is_dir($dossier_chemin.'/'.$element) && preg_match("/^$dept_protege(?:_[0-9]+|)\.km[lz]$/", $element)) { 
                                                                        $fichiers[$element] = $nom_dossier;
                                                                        $departements_trouves[$departement] = $nom_dossier;
                                                                }
                                                        }
                                                }
                                        }
                                }
                                closedir($dossier_ressource);
                        }
                }
                
                return $fichiers;
        }
        
        /**
         * Afficher message d'avertissement.
         */
        public function executerAvertissement() {
                $widget = null;

                // Création des infos du widget
                $widget['donnees']['url_base'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], '');
                $widget['squelette'] = 'avertissement';
                
                return $widget;
        }
}