Rev 3667 | 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 toutesprivate $titre = null; // Indication s'il faut le titre par défaut, personnalisé ou bien sans titreprivate $logo = null; // url du logo à ajouter si nécessaireprivate $url_site = null; // url du site auquel le logo est liéprivate $image = null; // url d'une image à ajouter dans l'interfaceprivate $nbjours = null; // nombre de jour à partir de la date courate pour lesquels on affiche les pointsprivate $annee = null; // filtre par annéeprivate $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éaliserun 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 soupleif (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;}}?>