Subversion Repositories eFlore/Applications.cel

Rev

Rev 3857 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

<?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 Cartopoint extends WidgetCommun {
        const DS = DIRECTORY_SEPARATOR;
        const SERVICE_CARTO_NOM = 'CelWidgetMapPoint';
        const SERVICE_CARTO_ACTION_DEFAUT = 'carte-defaut';

        private $carte = null;
        private $num_taxon = false;
        private $utilisateur = null;
        private $projet = null;
        private $dept = null;
        private $num_nom_ret = null;
        private $station = null;
        private $format = null;// Format des obs pour les stations (tableau/liste)
        private $photos = null; // Seulement les obs avec photos ou bien toutes
        private $titre = null; // Indication s'il faut le titre par défaut, personnalisé ou bien sans titre
        private $logo = null; // url du logo à ajouter si nécessaire
        private $url_site = null; // url du site auquel le logo est lié
        private $image = null; // url d'une image à ajouter dans l'interface
        private $nbjours = null; // nombre de jour à partir de la date courate pour lesquels on affiche les points
        private $annee = null; // filtre par année
        private $referentiel = null;
        private $groupe_zones_geo = null; // Groupe de zones géographiques personnalisé
        /** langue (traduction), charge un template de la forme "defaut_en.tpl.html" */
        protected $langue = null;

        /**
         * Méthode appelée par défaut pour charger ce widget.
         */
        public function executer() {
                $retour = null;
                $this->extraireParametres();
                if ($this->num_taxon == false) {
                $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 {
                        // Suffixe de template pour la langue - fr par défaut @TODO configurer ça un jour
                        $suffixeLangue = "";
                        if ($this->langue != null && $this->langue != "fr") {
                                $suffixeLangue = "_" . $this->langue;
                        }
                        $squelette = dirname(__FILE__).self::DS.'squelettes'.self::DS.$retour['squelette'].$suffixeLangue.'.tpl.html';
                        $html = $this->traiterSquelettePhp($squelette, $retour['donnees']);
                        $this->envoyer($html);
                }
                } else {
                    $this->envoyer("Cette carto utilise le paramètre num_taxon pour afficher les observations liées à un taxon particulier.
                        Ce paramètre n'est plus maintenu. Vous pouvez utiliser le paramètre num_nom_retenu pour réaliser 
                        un filtre sur le numéro nomenclatural du nom. En cas de problème, vous pouvez nous contacter via l'outil suivant : <br />
                        <iframe style=\"width:650px;height:600px;\" src=\"https://www.tela-botanica.org/widget:reseau:remarques?lang=fr&service=cel&pageSource=tela-botanica.org/widget:cel:cartoPoint\"></iframe>");
                }
        }

        public function extraireParametres() {
                extract($this->parametres);
                $this->num_taxon  = (isset($num_taxon) ? true : false);
                unset($this->parametres['num_taxon']);
                $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->tag = (isset($motcle) ? $motcle : $this->tag);
                if (isset($standard)) {         
                    $this->standard = $standard;
                } elseif (isset($projet) && in_array($projet, array("sauvages", "messicoles", 
                    "arbres-tetards", "arbres-remarquables","missions-flore", "tb_lichensgo", "tb_streets", "bellesdemarue"))) {
                    $this->standard = '0';
                } else {
                    $this->standard = '1';
                }
                $this->dept = (isset($dept) ? $dept : '*');
                $this->commune = (isset($commune) ? $commune : '*');
                $this->pays = (isset($pays) ? $pays : '*');
                $this->num_nom_ret = (isset($num_nom_ret) ? $num_nom_ret : '*');
                $this->date = (isset($date) ? $date : '*');
                $this->taxon = (isset($taxon) ? $taxon : '*');
                $this->commentaire = (isset($commentaire) ? $commentaire : null);
                $this->station = (isset($station) ? $station : null);
                $this->format = (isset($format) ? $format : null);
                $this->photos = (isset($photos) ? $photos : null);
                $this->titre = (isset($titre) ? urldecode($titre) : null);
                $this->logo = (isset($logo) ? urldecode($logo) : null);
                $this->url_site = (isset($url_site) ? urldecode($url_site) : null);
                $this->image = (isset($image) ? urldecode($image) : null);
                $this->nbjours = (isset($nbjours) ? urldecode($nbjours) : null);
                $this->annee = (isset($annee) ? urldecode($annee) : null);
                $this->referentiel = (isset($referentiel) ? urldecode($referentiel) : null);
                $this->groupe_zones_geo = (isset($groupe_zones_geo) ? urldecode($groupe_zones_geo) : null);
                $this->start = (isset($start) ? $start : null);
                $this->limit = (isset($limit) ? $limit : null);
                // définition de la langue, en mode souple
                if (isset($this->parametres['lang'])) {
                        $this->langue = $this->parametres['lang'];
                }
        }

        /**
         * 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']['standard'] = $this->standard;
                $widget['donnees']['tag'] = $this->tag;
                $widget['donnees']['dept'] = $this->dept;
                $widget['donnees']['commune'] = $this->commune;
                $widget['donnees']['pays'] = $this->pays;
                $widget['donnees']['num_nom_ret'] = $this->num_nom_ret;
                $widget['donnees']['date'] = $this->date;
                $widget['donnees']['taxon'] = $this->taxon;
                $widget['donnees']['commentaire'] = $this->commentaire;
                $widget['donnees']['photos'] = $this->photos;
                $widget['donnees']['titre'] = $this->titre;
                $widget['donnees']['logo'] = $this->logo;
                $widget['donnees']['url_site'] = $this->url_site;
                $widget['donnees']['image'] = $this->image;
                $widget['donnees']['nbjours'] = $this->nbjours;
                $widget['donnees']['annee'] = $this->annee;
                $widget['donnees']['referentiel'] = $this->referentiel;
                $widget['donnees']['groupe_zones_geo'] = $this->groupe_zones_geo;
                $widget['donnees']['url_limites_communales'] = $this->obtenirUrlsLimitesCommunales();
                $widget['donnees']['communeImageUrl'] = $this->config['carto']['communeImageUrl'];
                $widget['donnees']['pointImageUrl'] = $this->config['carto']['pointImageUrl'];
                $widget['donnees']['groupeImageUrlTpl'] = $this->config['carto']['groupeImageUrlTpl'];
                $widget['donnees']['url_widget_saisie'] = $this->config['urls']['widgetSaisie'];
                $widget['donnees']['prod'] = ($this->config['parametres']['modeServeur'] == "prod");
                $widget['donnees']['cleGoogleMaps'] = $this->config['api']['cleGoogleMapsCartoPoint'];
                $widget['donnees']['baseURLServicesAnnuaireTpl'] = $this->config['chemins']['baseURLServicesAnnuaireTpl'];
                $widget['donnees']['baseURLServicesCelTpl'] = $this->config['chemins']['baseURLServicesCelTpl'];

                $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', 'standard', 'utilisateur', 'projet', 'tag', 'dept', 'commune',
                                'num_nom_ret', 'taxon', 'date', 'commentaire', 'nbjours', 'referentiel','pays', 'groupe_zones_geo',
                                '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épartementales 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();
                if (isset($this->config['carto']['communesKmzChemin'])) {
                        $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);
                                }
                        }
                } else {
                        $this->messages[] = 'Veuillez configurer le paramètres carto.communesKmzChemin.';
                }
                return $fichiers;
        }

        /**
         * Afficher message d'avertissement.
         */
        public function executerAvertissement() {
                $widget = null;

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

                return $widget;
        }

        /**
         * Charge le contenu du wikini demandé
         */
        function chargerAideWiki() {
                $url = str_replace('{page}','AideCarto',$this->config['carto']['aideWikiniUrlCartoPoint']);
                $infos_aide = file_get_contents($url);

                $aide = '';

                if($infos_aide != null && $infos_aide != '') {
                        $infos_aide = json_decode($infos_aide);
                        $infos_aide = (is_a($infos_aide, 'StdClass') && $infos_aide->texte != null) ? $infos_aide->texte : '';
                }

                return $infos_aide;
        }
}
?>