<?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_DEFAUT = 'carte-defaut';
	
	/**
	 * Méthode appelée par défaut pour charger ce widget.
	 */
	public function executer() {
		$retour = null;
		extract($this->parametres);

		if (!isset($carte)) {
			$carte = self::SERVICE_DEFAUT;
		}
		
		$methode = $this->traiterNomMethodeExecuter($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);
		}
	}

	/**
	 * Carte par défaut
	 */
	public function executerCarteDefaut() {
		$widget = null;
		extract($this->parametres);
		$utilisateur = (isset($utilisateur) ? $utilisateur : '*');
		$projet = (isset($projet) ? $projet : '*');
		$dept = (isset($dept) ? $dept : '*');
		$num_taxon = (isset($num_taxon) ? $num_taxon : '*');
		
		// Création url données json
		$url_cel_carto = sprintf($this->config['chemins']['baseURLServicesCelTpl'], 'CelWidgetMap');
		$url_json = "$url_cel_carto/carte-defaut-json/$utilisateur/$projet/$dept/$num_taxon";
		
		$url_base = sprintf($this->config['chemins']['baseURLAbsoluDyn'], '');

		// Création des infos du widget
		$widget['donnees']['url_cel_carto'] = $url_cel_carto;
		$widget['donnees']['url_json'] = $url_json;
		$widget['donnees']['url_base'] = $url_base;
		$widget['donnees']['jquery_version'] = '1.4.4';
		$widget['donnees']['utilisateur'] = $utilisateur;
		$widget['donnees']['projet'] = $projet;
		$widget['donnees']['dept'] = $dept;
		$widget['donnees']['num_taxon'] = $num_taxon;
		$widget['donnees']['taxons'] = $this->chargerTaxons();
		if ($num_taxon != '*') {
			$taxon_courrant = current($widget['donnees']['taxons']);
			$widget['donnees']['taxon_nom'] = $taxon_courrant['nom'];
		}
		$widget['squelette'] = 'carte_defaut';
		
		if (isset($dept)) {
			// si on veut afficher les limites départemmentales on va compter et chercher les noms de fichiers
			$fichiersKml = $this->chercherFichierKml($dept);
			foreach ($fichiersKml as $kml => $dossier){
				$url_limites_communales = sprintf($this->config['carto']['limitesCommunaleUrlTpl'], $dossier, $kml);
				$widget['donnees']['url_limites_communales'][] = $url_limites_communales;
			}
		}
		
		return $widget;
	}
	
	private function chargerTaxons() {
		extract($this->parametres);
		$utilisateur = (isset($utilisateur) ? $utilisateur : '*');
		$projet = (isset($projet) ? $projet : '*');
		$dept = (isset($dept) ? $dept : '*');
		$num_taxon = (isset($num_taxon) ? $num_taxon : '*');
		
		// Récupération des données au format Json
		$service = "CelWidgetMap/taxons/$utilisateur/$projet/$dept/$num_taxon";
		$url = sprintf($this->config['chemins']['baseURLServicesCelTpl'], $service);
		$json = $this->getDao()->envoyerRequeteConsultation($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($dept){
		$chemins = explode(',', $this->config['carto']['communesKmzChemin']);
		$departements = explode(',', $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;
		extract($this->parametres);
		
		$observations = $this->chargerObservation($station);
				
		// 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'] = $station;
		
		return $widget;
	}
	
	private function chargerObservation($station) {
		extract($this->parametres);
		$utilisateur = (isset($utilisateur) ? $utilisateur : '*');
		$projet = (isset($projet) ? $projet : '*');
		$dept = (isset($dept) ? $dept : '*');
		$num_taxon = (isset($num_taxon) ? $num_taxon : '*');
		
		// Récupération des données au format Json
		$service = "CelWidgetMap/observations/$station/$utilisateur/$projet/$dept/$num_taxon";
		$url = sprintf($this->config['chemins']['baseURLServicesCelTpl'], $service);
		$json = $this->getDao()->envoyerRequeteConsultation($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) {
		extract($this->parametres);
		$sortie = 'obs_tableau';
		if (isset($format) && $format != '*') {
			$sortie = ($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);
		$json = $this->getDao()->envoyerRequeteConsultation($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;
	}
}