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->dept = (isset($dept) ? $dept : '*');

		$this->commune = (isset($commune) ? $commune : '*');

		$this->num_taxon = (isset($num_taxon) ? $num_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_json = $this->contruireUrlServiceCarto('carte-defaut-json');

		$url_base = sprintf($this->config['chemins']['baseURLAbsoluDyn'], '');

		// Création des infos du widget

		$widget['donnees']['url_cel_carto'] = $this->contruireUrlServiceCarto();

		$widget['donnees']['url_json'] = $url_json;

		$widget['donnees']['url_base'] = $url_base;

		$widget['donnees']['utilisateur'] = $this->utilisateur;

		$widget['donnees']['projet'] = $this->projet;

		$widget['donnees']['dept'] = $this->dept;

		$widget['donnees']['commune'] = $this->commune;

		$widget['donnees']['num_taxon'] = $this->num_taxon;

		$widget['donnees']['taxons'] = $this->chargerTaxons();

		if ($this->num_taxon != '*') {

			$taxon_courrant = current($widget['donnees']['taxons']);

			$widget['donnees']['taxon_nom'] = $taxon_courrant['nom'];

		}

		$widget['squelette'] = 'carte_defaut';

		if (isset($this->dept)) {

			// si on veut afficher les limites départemmentales on va compter et chercher les noms de fichiers

			$fichiersKml = $this->chercherFichierKml();

			$urls = null;

			foreach ($fichiersKml as $kml => $dossier){

				$url_limites_communales = sprintf($this->config['carto']['limitesCommunaleUrlTpl'], $dossier, $kml);

				$urls[] = $url_limites_communales;

			}

			$widget['donnees']['url_limites_communales'] = json_encode($urls);

		}

		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', 'dept', 'commune', 'num_taxon', '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 chargerTaxons() {

		// Récupération des données au format Json

		$url = $this->contruireUrlServiceCarto('taxons');

		$json = $this->getDao()->consulter($url);

		$donnees = json_decode($json);

		// Post-traitement des données

		$taxons = $this->traiterTaxons($donnees);

		return $taxons;

	}

	private function traiterTaxons($donnees) {

		$taxons = array();

		if (is_array($donnees) && count($donnees) > 0) {

			foreach ($donnees as $donnee) {

				if (!isset($taxons[$donnee->num_taxon]) && ! $this->etreVide($donnee->nom_ret)) {

					$taxon = array();

					$taxon['nn'] = $donnee->num_nom_ret;

					$taxon['nt'] = $donnee->num_taxon;

					$taxon['nom'] = $this->nettoyerTexte($donnee->nom_ret);

					$taxon['famille'] = $this->nettoyerTexte($donnee->famille);

					$taxons[$donnee->num_taxon] = $taxon;

				}

			}

		}

		return $taxons;

	}

	private function chercherFichierKml(){

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

		$fichiers = 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;

	}

}