<?php
// declare(encoding='UTF-8');
/**
 * Service fournissant une carte dynamique (communes)des obsertions publiques du CEL.
 *
 * Cas d'utilisation :
 * /CelWidgetMap/Carte/Utilisateur : carte des observations publiques d'un utilisateur.
 * /CelWidgetMap/Carte/Utilisateur/Projet : carte des observations publiques d'un utilisateur pour un projet.
 * /CelWidgetMap/Carte/Utilisateur/Projet/dept : carte des observations publiques d'un utilisateur pour un projet sur un département.
 * /CelWidgetMap/Carte/Utilisateur/Projet/dept/num_taxon : carte des observations publiques d'un utilisateur pour un projet sur un département pour un taxon.
 *
 * Carte = Type de carte. Valeurs possible : defaut,
 * Utilisateur = identifiant (= courriel) de l'utilisateur ou * pour tous les utilisateurs.
 * Projet = mot-clé du projet
 *
 * @internal   Mininum PHP version : 5.2
 * @category   CEL
 * @package    Services
 * @subpackage Widget
 * @version    0.1
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
 * @author     Aurelien PERONNET <aurelien@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>
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
 */
// TODO : supprimer le TRIM quand les obs seront reliées correctements aux localisations (sur le code INSEE par exemple)
class CelWidgetMap extends Cel {

	/**
	 * Méthode appelée avec une requête de type GET.
	 */
	public function getElement($ressources) {
		$retour = null;
		extract($this->parametres);

		$action = array_shift($ressources);
		if (isset($action)) {
			$methode = $this->traiterNomMethodeGet($action);
			if (method_exists($this, $methode)) {
				$retour = $this->$methode($ressources);
			} else {
				$this->messages[] = "Ce type de ressource '$methode' n'est pas disponible.";
			}
		} else {
			$this->messages[] = "Vous devez indiquer le type de ressource.";
		}

		if (is_null($retour)) {
			$info = 'Un problème est survenu : '.print_r($this->messages, true);
			$this->envoyer($info);
		} else if (isset($retour['type']) && $retour['type'] == 'jsonVar') {

			$this->envoyerJsonVar($retour['variable_js'], $retour['donnees']);
		}  else if (isset($retour['type']) && $retour['type'] == 'jsonP') {
			$this->envoyerJsonp($retour['donnees']);
		} else {
			$this->envoyerJson($retour);
		}
	}

	/**
	 * Les stations de la carte par défaut
	 */
	public function getStations($params) {
		$json = null;
		$requete =  'SELECT utm_secteur, utm_x, utm_y, wgs84_latitude AS latitude, wgs84_longitude AS longitude '.
			'FROM cel_export AS co '.
			'	RIGHT JOIN cel_zones_geo AS zg '. // exclut les obs non localisées sur zone geo, pour obtenir un décompte cohérent
			'		ON (zg.id_zone_geo = co.ce_zone_geo) '.
			"WHERE 1 ".
			$this->construireWhereDept().
			$this->construireWhereCommune().
			$this->construireWherePhotosSeulement().
			$this->construireWhereUtilisateur().
			$this->construireWhereNumTaxon().
			$this->construireWhereNomTaxon().
			$this->construireWhereDate().
			$this->construireWhereCommentaire().
			$this->construireWhereProjet().
			$this->construireWhereTag();
		//die($requete);
		$resultats = Cel::db()->requeter($requete);

		// Traitement des résultats
		$obs_nbre = $this->traiterNbreObs($resultats);
		$stations = $this->traiterStations($resultats);

		// Création des infos du widget
		$json['donnees']['points'] = $stations;
		$json['donnees']['stats']['communes'] = count($stations);
		$json['donnees']['stats']['observations'] = $obs_nbre;

		$json['type'] = (isset($this->formatRetour)) ? $this->formatRetour : 'jsonVar';
		$json['variable_js'] = 'stations';

		return $json;
	}

	private function traiterNbreObs($resultats) {
		$obs_nbre = 0;
		if ($resultats !== false) {
			$obs_nbre = count($resultats);
		}
		return $obs_nbre;
	}

	private function traiterStations($resultats) {
		$stations = array();
		if ($resultats !== false) {
			foreach ($resultats as $enrg) {
				if ($enrg['latitude'] != null && $enrg['longitude'] != null) {
					$id = $enrg['latitude'].'-'.$enrg['longitude'];
					if (!isset($stations[$id])) {
						$enrg['id'] = 'UTM:'.$enrg['utm_x'].'-'.$enrg['utm_y'].'-'.$enrg['utm_secteur'];
						unset($enrg['utm_x']);
						unset($enrg['utm_y']);
						unset($enrg['utm_secteur']);
						$stations[$id] = $enrg;
						$stations[$id]['nbre'] = 1;
					} else {
						$stations[$id]['nbre']++;
					}
				}
			}
			$stations = array_values($stations);
		}
		return $stations;
	}

	/**
	 * Données pour l'affichage des obs d'une station
	 */
	public function getObservations($params) {
		$resultats = array();
		$total = 0;
		if (!$this->etreNull($this->parametres['station'])) {
			$requete = 	'SELECT SQL_CALC_FOUND_ROWS id_observation, ce_utilisateur, courriel_utilisateur, '.
				'	nom_sel, nom_ret, nom_sel_nn, nom_ret_nn, nt, famille, '.
				'	lieudit, zone_geo, date_observation, milieu, commentaire, '.
				'	utm_secteur, utm_x, utm_y, id_zone_geo, date_transmission, nom_referentiel '.
				'FROM cel_export AS co '.
				'	LEFT JOIN cel_zones_geo AS zg '.
				"		ON (zg.id_zone_geo = co.ce_zone_geo) ".
				"WHERE 1 ".
				$this->construireWhereCoordonnees().
				$this->construireWherePhotosSeulement().
				$this->construireWhereUtilisateur().
				$this->construireWhereNumTaxon().
				$this->construireWhereNomTaxon().
				$this->construireWhereDate().
				$this->construireWhereCommentaire().
				$this->construireWhereProjet().
				$this->construireWhereTag().
				'ORDER BY nom_sel ASC '.
				"LIMIT {$this->start},{$this->limit} ";
			//die($requete);
			$resultats = Cel::db()->requeter($requete, self::SQL_RETOUR_COMPLET, self::SQL_MODE_OBJET);

			$requete = 'SELECT FOUND_ROWS()';
			$total = (int) Cel::db()->requeter($requete, self::SQL_RETOUR_COLONNE);
		}

		// Post-traitement
		$observations = $this->traiterObservations($resultats, $total);
		$observations = $this->ajouterImagesAuxObs($observations);
		$observations = $this->ajouterAuteursAuxObs($observations);
		$observations = $this->supprimerIdDesObs($observations);
		return $observations;
	}

	private function traiterObservations($donnees, $total) {
		$observations = array('commune' => '', 'observations' => array(), 'observateurs' => array());
		$observations['total'] = (isset($total)) ? $total : 0;
		if (is_array($donnees) && count($donnees) > 0) {
			foreach ($donnees as $donnee) {
				$observation = array();
				$observation['idObs'] = $donnee->id_observation;
				$observation['nn'] = $this->etreNull($donnee->nom_sel_nn) ? null : $donnee->nom_sel_nn;
				$observation['nomSci'] = $this->nettoyerTexte($donnee->nom_sel);
				$observation['date'] = $this->formaterDate($donnee->date_observation, '%d/%m/%Y');
				$observation['datePubli'] = $this->formaterDate($donnee->date_transmission);
				$observation['lieu'] = $this->traiterLieu($donnee);
				$observation['observateur'] = $donnee->courriel_utilisateur;
				$observation['observateurId'] = $donnee->ce_utilisateur;
				$observation['referentiel'] = $this->supprimerVersionDuReferentiel($donnee->nom_referentiel);
				$observation['urlEflore'] = $this->getUrlEflore($donnee->nom_referentiel, $donnee->nom_sel_nn);

				if (isset($donnee->zone_geo)) {
					$observations['commune'] = $this->nettoyerTexte($donnee->zone_geo);
				}
				$observations['observations'][$donnee->id_observation] = $observation;
				if (! array_key_exists($donnee->courriel_utilisateur, $observations['observateurs'])) {
					$observations['observateurs'][$donnee->courriel_utilisateur] = $donnee->courriel_utilisateur;
				}
			}
		}
		return $observations;
	}

	private function traiterLieu($donnee) {
		$lieu = array();
		if (!$this->etreNull($donnee->lieudit)) {
			$lieu[] = $donnee->lieudit;
		}
		if (!$this->etreNull($donnee->milieu)) {
			$lieu[] = $donnee->milieu;
		}
		return implode(', ', $lieu);
	}

	private function chargerImages(Array $obs_ids) {
		// Récupération des données au format Json
		$service = 'CelImage/liste-ids?obsId='.implode(',', $obs_ids);
		$url = sprintf($this->config['settings']['baseURLServicesCelTpl'], $service);
		$json = $this->getRestClient()->consulter($url);
		$donnees = json_decode($json);

		// Post-traitement des données
		$images = $this->traiterImages($donnees);

		return $images;
	}

	private function traiterImages($donnees) {
		$images = array();
		if (count($donnees) > 0) {
			foreach ($donnees as $id_obs => $id_images) {
				foreach ($id_images as $id_img) {
					$urls['idImg'] = $id_img;
					$urls['guid'] = sprintf($this->config['settings']['guidImgTpl'], $id_img);
					$urls['miniature'] = $this->getUrlImage($id_img, 'CXS');
					$urls['normale'] = $this->getUrlImage($id_img, 'XL');
					$images[$id_obs][] = $urls;
				}
			}
		}
		return $images;
	}

	private function ajouterImagesAuxObs($observations) {
		$images = $this->chargerImages(array_keys($observations['observations']));
		foreach ($observations['observations'] as $id => $infos) {
			if(isset($images[$id])) {
				$infos['images'] = $images[$id];
			}
			$observations['observations'][$id] = $infos;
		}
		return $observations;
	}

	private function ajouterAuteursAuxObs($observations) {
		$observateurs = $this->recupererUtilisateursIdentite(array_keys($observations['observateurs']));
		unset($observations['observateurs']);
		foreach ($observations['observations'] as $id => $infos) {
			$courriel = strtolower($infos['observateur']);
			$infos['observateur'] = $observateurs[$courriel]['intitule'];
			$infos['observateurId'] = $observateurs[$courriel]['id'];
			$observations['observations'][$id] = $infos;
		}
		return $observations;
	}

	private function supprimerIdDesObs($observations) {
		// Le tableau de sortie ne doit pas avoir les id des obs en clé car sinon Jquery Template ne fonctionne pas
		$observationSansId = $observations;
		unset($observationSansId['observations']);
		foreach ($observations['observations'] as $id => $infos) {
			$observationSansId['observations'][] = $infos;
		}
		return $observationSansId;
	}

	/**
	 * Liste des taxons présents sur la carte
	 */
	public function getTaxons($params) {
		$json = null;

		$requete = 	'SELECT SQL_CALC_FOUND_ROWS DISTINCT nom_ret, nom_ret_nn, nt, famille '.
					'FROM cel_export AS co '.
					'	LEFT JOIN cel_zones_geo AS zg '.
					'		ON (zg.id_zone_geo = co.ce_zone_geo) '.
					"WHERE ".
					"	nom_ret != '' ".
					$this->construireWhereDept().
                    $this->construireWhereCommune().
					$this->construireWherePhotosSeulement().
                    $this->construireWhereUtilisateur().
					$this->construireWhereNumTaxon().
					$this->construireWhereNomTaxon().
					$this->construireWhereDate().
					$this->construireWhereCommentaire().
					$this->construireWhereProjet().
					$this->construireWhereTag();
					'ORDER BY nom_ret ASC '.
                    "LIMIT {$this->start},{$this->limit} ";
		//$this->debug[] = $requete;
		//die($requete);
		$resultats = Cel::db()->requeter($requete, self::SQL_RETOUR_COMPLET, self::SQL_MODE_OBJET);

		$requete = 'SELECT FOUND_ROWS()';
		$taxons['total'] = (int) Cel::db()->requeter($requete, self::SQL_RETOUR_COLONNE);

		// Post-traitement
		$taxons['taxons'] = $this->traiterTaxons($resultats);

		return $taxons;
	}

	private function traiterTaxons($donnees) {
		$taxons = array();
		if (is_array($donnees) && count($donnees) > 0) {
			foreach ($donnees as $donnee) {
				if (!isset($taxons[$donnee->nt]) && ! $this->etreNull($donnee->nom_ret)) {
					$taxon = array();
					$taxon['nn'] = $donnee->nom_ret_nn;
					$taxon['nt'] = $donnee->nt;
					$taxon['nom'] = $this->nettoyerTexte($donnee->nom_ret);
					$taxon['famille'] = $this->nettoyerTexte($donnee->famille);
					$taxons[$donnee->nt] = $taxon;
				}
			}
		}
		$taxons = array_values($taxons);
		return $taxons;
	}

	private function construireWhereCoordonnees() {
		$sql = '';
		// Récupération des coordonnées depuis l'id station
		extract($this->decomposerParametreStation());
		if (isset($type)) {
			if ($type == 'UTM') {
				$secteur = Cel::db()->proteger($secteur);
				$utm_x = Cel::db()->proteger($utm_x);
				$utm_y = Cel::db()->proteger($utm_y);

				$sql = " AND (utm_secteur = $secteur AND utm_x = $utm_x AND utm_y = $utm_y ) ";
			}  else if ($type == 'LngLat') {
				$latitude = Cel::db()->proteger($latitude);
				$longitude = Cel::db()->proteger($longitude);

				$sql = " AND (latitude = $latitude AND longitude = $longitude ) ";
			}
		}
		return $sql;
	}

	private function construireWhereCommentaire() {
		$sql = '';
		list($type, $commentaire) = $this->decomposerParametreCommentaire();
		if (!$this->etreNull($commentaire)) {
			$commentaire = Cel::db()->proteger('%'.$commentaire.'%');
			switch ($type) {
				case '*' :
					$sql = $this->obtenirConditionPourCommentaires($commentaire);
					$sql = " AND (ci.commentaire LIKE $commentaire OR ($sql)) ";
					break;
				case 'observation' :
					$sql = " AND co.commentaire LIKE $commentaire ";
					break;
				case 'photo' :
					$sql = ' AND '.$this->obtenirConditionPourCommentaires($commentaire).' ';
					break;
				case 'photo.meta' :
					$sql = ' AND '.$this->obtenirConditionPourCommentaireMeta($commentaire).' ';
					break;
				case 'photo.utilisateur' :
					$sql = ' AND '.$this->obtenirConditionPourCommentaireUtilisateur($commentaire).' ';
					break;
				default:
					$sql = " AND co.commentaire LIKE $commentaire ";
			}
		}
		return $sql;
	}


	private function construireWhereNomTaxon() {
		$sql = '';
		list($type, $nom) = $this->decomposerParametreTaxon();
		if (!$this->etreNull($nom)) {
			$nom = Cel::db()->proteger($nom.'%');
			switch ($type) {
				case '*' :
					$sql = " AND (nom_ret LIKE $nom OR nom_sel LIKE $nom OR famille LIKE $nom) ";
					break;
				case 'retenu' :
					$sql = " AND nom_ret LIKE $nom ";
					break;
				case 'selectionne' :
					$sql = " AND nom_sel LIKE $nom ";
					break;
				case 'famille' :
					$sql = " AND famille LIKE $nom ";
					break;
				default:
					$sql = " AND nom_ret LIKE $nom ";
			}
		}
		return $sql;
	}

	private function construireWhereDate() {
		$sql = '';
		// Récupération des coordonnées depuis l'id station
		list($type, $date) = $this->decomposerParametreDate();

		if (!$this->etreNull($date)) {
			$date = Cel::db()->proteger($date.'%');
			switch ($type) {
				case '*' :
					$sql = " AND (
						date_observation LIKE $date
						OR date_creation LIKE $date
						OR date_modification LIKE $date
						OR date_transmission LIKE $date) ";
					break;
				case 'observation' :
					$sql = " AND date_observation LIKE $date ";
					break;
				case 'creation' :
					$sql = " AND date_creation LIKE $date ";
					break;
				case 'modification' :
					$sql = " AND date_modification LIKE $date ";
					break;
				case 'transmission' :
					$sql = " AND date_transmission LIKE $date ";
					break;
				case 'photo' :
					$sql = $this->obtenirConditionPourDatePhoto($date);
					break;
				case 'ajout' :
					$sql = $this->obtenirConditionPourDateAjout($date);
					break;
				case 'liaison' :
					$sql = $this->obtenirConditionPourDateLiaison($date);
					break;
				default:
					$sql = " AND date_observation LIKE $date ";
			}
		}
		return $sql;
	}

	private function obtenirConditionPourDatePhoto($date) {
		$observations = $this->obtenirObsLieesImg('date.photo', $date);
		if (is_null($observations)) {
			$this->debug[] = "Aucune observation n'est liée à une photo prise à la date : $date";
		}
		$sql = $this->assemblerObsEnConditionSql($observations);
		return $sql;
	}

	private function obtenirConditionPourDateLiaison($date) {
		$observations = $this->obtenirObsLieesImg('date.liaison', $date);
		if (is_null($observations)) {
			$this->debug[] = "Aucune observation n'a été liée à une image à à la date : $date";
		}
		$sql = $this->assemblerObsEnConditionSql($observations);
		return $sql;
	}

	private function obtenirConditionPourDateAjout($date) {
		$observations = $this->obtenirObsLieesImg('date.ajout', $date);
		if (is_null($observations)) {
			$this->debug[] = "Aucune observation n'est liée à une image ajoutée à la date : $date";
		}
		$sql = $this->assemblerObsEnConditionSql($observations);
		return $sql;
	}

	private function obtenirConditionPourCommentaireMeta($commentaire) {
		$observations = $this->obtenirObsLieesImg('commentaire.meta', $commentaire);
		if (is_null($observations)) {
			$this->debug[] = "Aucune observation n'est liée à une image dont le commentaire des méta-données correspond à : $commmentaire";
		}
		$operateur = '';
		$sql = $this->assemblerObsEnConditionSql($observations, $operateur);
		return $sql;
	}

	private function obtenirConditionPourCommentaireUtilisateur($commentaire) {
		$observations = $this->obtenirObsLieesImg('commentaire.utilisateur', $commentaire);
		if (is_null($observations)) {
			$this->debug[] = "Aucune observation n'est liée à une image dont le commentaire des utilisateur correspond à : $commmentaire";
		}
		$operateur = '';
		$sql = $this->assemblerObsEnConditionSql($observations, $operateur);
		return $sql;
	}

	private function obtenirConditionPourCommentaires($commentaire) {
		$observations = $this->obtenirObsLieesImg('commentaire.*', $commentaire);
		if (is_null($observations)) {
			$this->debug[] = "Aucune observation n'est liée à une image dont un des commentaires correspond à : $commmentaire";
		}
		$operateur = '';
		$sql = $this->assemblerObsEnConditionSql($observations, $operateur);
		return $sql;
	}

	/**
	 * Récupération des identifiant d'utilisateur et des ordres des observations correspondant à une date.
	 * Retour sous forme de tableau : array[identifiant] = array(ordre, ordre...);
	 */
	private function obtenirObsLieesImg($type, $param) {
		// Construction de la requête
		$requete = 	'SELECT DISTINCT id_observation AS id_obs, co.ce_utilisateur AS utilisateur '.
			'FROM cel_images_export AS ci'.
			'	INNER JOIN cel_export AS co '.
			'		ON ci.ce_observation = co.id_observation '.
			'	LEFT JOIN cel_zones_geo AS zg '.
			'		ON (zg.id_zone_geo = co.ce_zone_geo) '.
			"WHERE '' ".
			($type == 'date.photo' ? " AND (date_prise_de_vue LIKE ".str_replace('-', ':', $param).") " : '').
			($type == 'date.ajout' ? " AND ci.date_creation LIKE $param " : '').
			($type == 'date.liaison' ? " AND ci.date_liaison LIKE $param " : '').
			// TODO: recherche sur le xml
			//($type == 'commentaire.meta' ? " AND ci.commentaire LIKE $param " : '').
			($type == 'commentaire.utilisateur' ? "	AND ci.commentaire LIKE $param " : '').
			($type == 'commentaire.*' ? " AND (ci.commentaire LIKE $param) " : '').
			$this->construireWhereCoordonnees().
			$this->construireWhereDept().
			$this->construireWhereCommune().
			$this->construireWhereUtilisateur().
			$this->construireWhereNumTaxon().
			$this->construireWhereNomTaxon().
			$this->construireWhereProjet().
			$this->construireWhereTag().
			'ORDER BY utilisateur ASC, ordre ASC';
		//$this->debug[] = $requete;
		//die($requete);
		$resultats = Cel::db()->requeter($requete);

		$observations = null;
		if ($resultats != false) {
			$observations = array();
			foreach ($resultats as $occurence) {
				$utilisateur = $occurence['utilisateur'];
				$id_obs = $occurence['id_obs'];
				if (!array_key_exists($utilisateur, $observations)) {
					$observations[$utilisateur] = array();
				}
				if (!array_key_exists($id_obs, $observations[$utilisateur])) {
					$observations[$utilisateur][$id_obs] = $id_obs;
				}
			}
		}
		return $observations;
	}

	private function assemblerObsEnConditionSql($observations, $operateur = 'AND') {
		$sql = '';
		if ($observations != null) {
			// Pré-construction du where de la requête
			$tpl_where = "(id_observation IN (%s))";
			foreach ($observations as $utilisateur => $ids_obs) {
				$morceaux_requete[] = sprintf($tpl_where, implode(',', $ids_obs));
			}
			if (count($morceaux_requete) > 0) {
				$sql = implode(" \nOR ", $morceaux_requete);
			}
		} else {
			// Nous voulons que la requête ne retourne rien
			$sql = "id_observation = ''";
		}
		$sql = " $operateur ($sql) ";
		return $sql;
	}

	private function construireWhereDept() {
		$sql = '';
		// Récupération des coordonnées depuis l'id station
		extract($this->parametres);
		if (isset($dept) && !$this->etreNull($dept)) {
			$valeurs_a_proteger = explode(',',trim($dept));
			foreach ($valeurs_a_proteger as $valeur) {
				$valeurs_protegees[] = '(ce_zone_geo LIKE '.Cel::db()->quote('INSEE-C:'.$valeur.'%').') ';
			}
			$valeurs = implode(' OR ', $valeurs_protegees);
			$sql = " AND ($valeurs) ";
		}
		return $sql;
	}

	private function construireWhereCommune() {
		$sql = '';
		// Récupération des coordonnées depuis l'id station
		extract($this->parametres);
		if (isset($commune) && !$this->etreNull($commune)) {
			$commune = Cel::db()->proteger($commune);
			$sql = " AND zone_geo LIKE $commune ";
		}
		return $sql;
	}

	private function construireWherePhotosSeulement() {
		$sql = '';
		if (isset($this->parametres['photos']) && $this->parametres['photos'] == 1) {
			$sql = 'AND co.id_observation IN (SELECT DISTINCT ce_observation FROM cel_images_export) ';
		}
		return $sql;
	}


	private function construireWhereUtilisateur() {
		$sql = '';
		// Récupération des coordonnées depuis l'id station
		extract($this->parametres);
		if (isset($utilisateur) && !$this->etreNull($utilisateur)) {
			$utilisateur = Cel::db()->proteger($utilisateur);
			$sql = " AND courriel_utilisateur = $utilisateur ";
		}
		return $sql;
	}

	private function construireWhereNumTaxon() {
		$sql = '';
		// Récupération des coordonnées depuis l'id station
		extract($this->parametres);
		if (isset($num_taxon) && !$this->etreNull($num_taxon)) {
			$num_taxon = Cel::db()->proteger($num_taxon);
			$sql = " AND nt = $num_taxon ";
		}
		return $sql;
	}

	private function construireWhereProjet() {
		$sql = '';
		// Récupération des coordonnées depuis l'id station
		extract($this->parametres);
		$projet_sql = isset($projet) ? $this->getSqlWhereProjet($projet) : null;
		if (!$this->etreNull($projet_sql)) {
			$sql = " AND ($projet_sql) ";
		}
		return $sql;
	}

	/**
	 * Traitement de $projet pour construction du filtre dans la requête
	 */
	private function getSqlWhereProjet($projet) {
		$sql = null;
		if (isset($projet) && !$this->etreNull($projet)) {
			$sql = 'co.mots_cles_texte LIKE '.Cel::db()->proteger($projet);
		}
		return $sql;
	}

	private function construireWhereTag() {
		$sql = '';
		extract($this->parametres);
		$tag_sql = isset($tag) ? $this->getSqlWhereObsAvecImagesTaguees($tag) : null;
		if (!$this->etreNull($tag_sql)) {
			$sql = " AND ($tag_sql) ";
		}
		return $sql;
	}

	/**
	 * Traitement de $tag pour construction du filtre dans la requête
	 */
	private function getSqlWhereObsAvecImagesTaguees($tag) {
		$sql = null;
		if (isset($tag) && !$this->etreNull($tag)) {
			$tag_sql = $this->getSqlWhereMotsCles($tag);
			// Construction de la requête
			$requete = 	'SELECT DISTINCT co.id_observation AS id_obs, ci.ce_utilisateur AS utilisateur '.
						'FROM cel_images_export AS ci '.
						'	INNER JOIN cel_export AS co '.
						'		ON (ci.ce_observation = co.id_observation) '.
						'	LEFT JOIN cel_zones_geo AS zg '.
						"		ON (zg.id_zone_geo = co.ce_zone_geo) ".
						"WHERE 1 ".
						$this->construireWhereCoordonnees().
						$this->construireWhereUtilisateur().
						$this->construireWhereNumTaxon().
						$this->construireWhereNomTaxon().
						$this->construireWhereProjet().
						(!$this->etreNull($tag_sql) ? "AND ($tag_sql) " : '').
						'ORDER BY utilisateur ASC, ci.ordre ASC';
			//$this->debug[] = $requete;
			//die($requete);
			$elements_tag = Cel::db()->requeter($requete);

			$requete_tag = array();
			if ($elements_tag != false && count($elements_tag) > 0) {

				$filtres = array();
				foreach ($elements_tag as $occurence) {
					$utilisateur = $occurence['utilisateur'];
					$id_obs = $occurence['id_obs'];
					if (!array_key_exists($utilisateur, $filtres)) {
						$filtres[$utilisateur] = array();
					}
					if (!array_key_exists($id_obs, $filtres[$utilisateur])) {
						$filtres[$utilisateur][$id_obs] = $id_obs;
					}
				}

				// Pré-construction du where de la requête
				$tpl_where = "(id_observation IN (%s))";
				foreach ($filtres as $utilisateur => $id_obs) {
					$requete_tag[] = sprintf($tpl_where, implode(',', $id_obs));
				}

			} else {
				$this->messages[] = "Aucune observation ne possède d'images avec ce mot-clé.";
			}
			if (count($requete_tag) > 0) {
				$sql = implode(" \nOR ", $requete_tag);
			}
		}
		return $sql;
	}

	/**
	 * Traitement de $tag pour construction du filtre dans la requête
	 */
	private function getSqlWhereMotsCles($tag) {
		$sql = null;
		$mots_cles = $this->decomposerParametreTag($tag);
		$requete_projet = $this->getSqlWhereMotsClesImages($mots_cles);
		$sql = $requete_projet;
		//$this->debug[] = $sql;
		return $sql;
	}

	/**
	 * Traitement de $tag pour construction du filtre dans la requête
	 */
	private function getSqlWhereMotsClesImages($mots_cles_encodes) {
		$where_mots_cles_images = array();
		foreach ($mots_cles_encodes['motsClesEncodesProteges'] as $mot_cle_encode) {
			$where_mots_cles_images[] = "ci.mots_cles_texte LIKE $mot_cle_encode";
		}
		$where_mots_cles_images = implode(' '.$mots_cles_encodes['type'].' ', $where_mots_cles_images);
		return $where_mots_cles_images;
	}

	private function decomposerParametreTag($tags) {
		$mots_cles = array('type' => null, 'motsCles' => null, 'motsClesEncodesProteges' => null);
		if (preg_match('/.+OU.+/', $tags)) {
			$mots_cles['type'] = 'OR';
			$mots_cles['motsCles'] = explode('OU', $tags);
		} else if (preg_match('/.+ET.+/', $tags)) {
			$mots_cles['type'] = 'AND';
			$mots_cles['motsCles'] = explode('ET', $tags);
		} else {
			$mots_cles['motsCles'][] = $tags;
		}

		foreach ($mots_cles['motsCles'] as $mot) {
			$mots_cles['motsClesEncodesProteges'][] = Cel::db()->quote('%'.$mot.'%');
		}
		$this->debug[] = $mots_cles;
		return $mots_cles;
	}

	private function decomposerParametreStation() {
		$station_infos = array();
		if (isset($this->parametres['station'])) {
			$station = $this->parametres['station'];
			$this->debug[] = $station;
			list($type, $coord) = explode(':', $station);

			if ($type == 'UTM') {
				list($utm_x, $utm_y, $secteur) = explode('-', $coord);
				$station_infos = array('utm_x' => $utm_x, 'utm_y' => $utm_y, 'secteur' => $secteur);
			} else if ($type == 'LngLat') {
				list($longitude, $latitude) = explode('-', $coord);
				$station_infos = array('longitude' => $longitude, 'latitude' => $latitude);
			}
			$station_infos['type'] = $type;
		}
		return $station_infos;
	}

	private function decomposerParametreDate() {
		$date_infos = array(null,null);
		if (isset($this->parametres['date'])) {
			$date = $this->parametres['date'];
			if (strpos($date, ':')) {
				list($type, $date) = explode(':', $date);
			} else {
				$type = 'observation';
			}

			$date = str_replace('/', '-', $date);
			if (preg_match('/(^[0-9]{2})-([0-9]{2})-([0-9]{4}$)/', $date, $matches)) {
				$date = $matches[3].'-'.$matches[2].'-'.$matches[1];
			}

			$date_infos = array($type, $date);
		}
		return $date_infos;
	}

	private function decomposerParametreTaxon() {
		$nom_infos = array(null, null);
		if (isset($this->parametres['taxon'])) {
			$taxon = $this->parametres['taxon'];
			if (strpos($taxon, ':')) {
				$nom_infos = explode(':', $taxon);
			} else {
				$nom_infos = array('retenu', $taxon);
			}
		}
		return $nom_infos;
	}

	private function decomposerParametreCommentaire() {
		$commentaire_infos = array(null, null);
		if (isset($this->parametres['commentaire'])) {
			$commentaire = $this->parametres['commentaire'];
			if (strpos($commentaire, ':')) {
				$commentaire_infos = explode(':', $commentaire);
			} else {
				$commentaire_infos = array('observation', $commentaire);
			}
		}
		return $commentaire_infos;
	}
}