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 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);

		$this->standard = (isset($standard)) ? $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;

	}

}

?>