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

		$this->station = (isset($station) ? $station : null);

		$this->format = (isset($format) ? $format : 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']['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', 'num_taxon');

			foreach ($parametres_a_tester as $param) {

				if ($this->$param != null && $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);

			}

		}

		$this->debug[] = $url;

		// Prendre en compte param "station"

		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;

	}

	/**

	 * Tableau des observations d'une station

	 */

	public function executerObservations() {

		$widget = null;

		$observations = $this->chargerObservation();

		// Création des infos du widget

		if (isset($observations['commune'])) {

			$commune = $observations['commune'];

			unset($observations['commune']);

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

		}

		$obs_ids = null;

		if (isset($observations['ids'])) {

			$obs_ids = $observations['ids'];

			unset($observations['ids']);

		}

		$widget['squelette'] = $this->choisirFormatSortie(count($observations));

		if ($widget['squelette'] == 'obs_liste' && $obs_ids != null && count($obs_ids) > 0) {

			$widget['donnees']['images'] = $this->chargerImages($obs_ids);

		}

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

		$widget['donnees']['station_id'] = $this->station;

		return $widget;

	}

	private function chargerObservation() {

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

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

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

		$donnees = json_decode($json);

		// Post-traitement des données

		$observations = $this->traiterObservations($donnees);

		return $observations;

	}

	private function traiterObservations($donnees) {

		$observations = array();

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

			foreach ($donnees as $donnee) {

				$observation = array();

				$observation['id'] = $donnee->id;

				$observation['nn'] = $this->etreVide($donnee->num_nom_sel) ? null : $donnee->num_nom_sel;

				$observation['nom'] = $this->nettoyerTexte($donnee->nom_sel);

				$observation['date'] = $this->formaterDate($donnee->date_observation, '%d/%m/%Y');

				$observation['lieu'] = $this->traiterLieu($donnee);

				$observation['observateur'] = $this->tronquerCourriel($donnee->identifiant);

				$observations[] = $observation;

				$observations['commune'] = $this->nettoyerTexte($donnee->location);

				$observations['ids'][] = $donnee->id;

			}

		}

		return $observations;

	}

	private function traiterLieu($donnee) {

		$lieu = array();

		if (isset($donnee->lieudit) && ! empty($donnee->lieudit)) {

			$lieu[] = $donnee->lieudit;

		}

		if (isset($donnee->milieu) && ! empty($donnee->milieu)) {

			$lieu[] = $donnee->milieu;

		}

		return implode(', ', $lieu);

	}

	private function choisirFormatSortie($observations_nbre) {

		$sortie = 'obs_tableau';

		if (isset($this->format) && $this->format != '*') {

			$sortie = ($this->format == 'tableau' ) ? 'obs_tableau' : 'obs_liste';

		} else {

			$sortie = ($observations_nbre > 4) ? 'obs_tableau' : 'obs_liste';

		}

		return $sortie;

	}

	private function chargerImages($obs_ids) {

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

		$service = 'CelImage/liste-ids?obsId='.implode(',', $obs_ids);

		$url = sprintf($this->config['chemins']['baseURLServicesCelTpl'], $service);

		$this->debug[] = $url;

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

		$donnees = json_decode($json);

		// Post-traitement des données

		$images = $this->traiterImages($donnees);

		return $images;

	}

	private function traiterImages($donnees) {

		$images = array();

		//echo '<br/><pre>'.print_r($donnees,true).'</pre>';

		if (count($donnees) > 0) {

			foreach ($donnees as $id_obs => $id_images) {

				foreach ($id_images as $id_img) {

					$urls['id'] = $id_img;

					$urls['miniature'] = $this->getUrlImage($id_img, 'CXS');

					$urls['normale'] = $this->getUrlImage($id_img, 'XL');

					$images[$id_obs][] = $urls;

				}

			}

		}

		return $images;

	}

	/**

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

	}

}