Subversion Repositories eFlore/Applications.cel

<?php

/**

 * Service fournissant une carte dynamique des obsertions publiques du CEL.

 * Encodage en entrée : utf8

 * Encodage en sortie : utf8

 *

 * 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

 *

 * @author Jean-Pascal MILCENT <jpm@clapas.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 © 2010, Jean-Pascal MILCENT

 */

class CelWidgetMap extends Cel {

	/**

	 * Méthode appelée avec une requête de type GET.

	 */

	public function getElement($params) {

		$retour = null;

		$parametres = $this->traiterParametres(array('carte'), $params, false);

		extract($parametres);

		if (isset($carte)) {

			$methode = $this->traiterNomMethodeGet($carte);

			if (method_exists($this, $methode)) {

				array_shift($params);

				$retour = $this->$methode($params);

			} else {

				$this->messages[] = "Ce type de carte '$methode' n'est pas disponible.";

			}

		} else {

			$this->messages[] = "Vous devez indiquer le type de carte.";

		}

		if (is_null($retour)) {

			$info = 'Un problème est survenu : '.print_r($this->messages, true);

			$this->envoyer($info);

		} else if ($retour['type'] == 'json') {

			$this->envoyerJson($retour['variable_js'], $retour['donnees']);

		} else {

			$this->envoyer($retour, null, null, true);

		}

	}

	/**

	 * Données de la carte par défaut

	 */

	public function getCarteDefautJson($params) {

		$json = null;

		$parametres = $this->traiterParametres(array('utilisateur','projet','dept','num_taxon'), $params, false);

		extract($parametres);

		// Traitement de $projet pour construction de filtre dans la requête

		if (isset($projet)) {

			$mot_cle_encode = $this->bdd->quote($this->encoderMotCle($projet));

			// Construction de la requête

			$requete = 	'SELECT * '.

				'FROM cel_mots_cles_obs '.

				"WHERE cmc_id_mot_cle_general = $mot_cle_encode ";

			$elements_projet = $this->executerRequete($requete);

			if ($elements_projet != false && count($elements_projet) > 0) {

				// Pré-construction du where de la requête

				$tpl_where = '(mots_cles LIKE "%%%s%%" AND identifiant = %s )';

				$requete_projet = array();

				foreach ($elements_projet as $occurence) {

					$requete_projet[] = sprintf($tpl_where, $occurence['cmc_id_mot_cle_utilisateur'], $this->bdd->quote($occurence['cmc_id_proprietaire']));

				}

			} else {

				$this->messages[] = "Aucune observation ne correspond à ce mot clé.";

			}

		}

		$requete =  'SELECT sector, x_utm, y_utm, coord_x, coord_y, ref_geo '.

                    'FROM cel_inventory AS i '.

                    '   LEFT JOIN locations AS l '.

                    '       ON (l.name = i.location AND l.code = i.id_location) '.

                    "WHERE transmission = '1' ".

                    (isset($utilisateur) ? " AND identifiant = '$utilisateur' " : '' ).

                    (isset($dept) ? " AND l.insee_code LIKE '$dept%' " : '').

                    (isset($num_taxon) ? " AND num_taxon = '$num_taxon' " : '' ).

                    (isset($projet) ? ' AND '.implode(" \nOR ", $requete_projet) : '' );

                    $resultats = $this->executerRequete($requete);

		// Traitement des résultats

		$mm = array('min_x' => 0,'max_x' => 0,'min_y' => 0,'max_y' => 0);

		$points = array();

		foreach ($resultats as $enrg) {

			$enrg['id'] = 'LngLat:'.$enrg['coord_y'].'-'.$enrg['coord_x'];

			if ($enrg['coord_x'] == '' && $enrg['coord_y'] == '' && $enrg['x_utm'] != '' && $enrg['y_utm'] != '') {

				$enrg['id'] = 'UTM:'.$enrg['x_utm'].'-'.$enrg['y_utm'].'-'.$enrg['sector'];

				$convertisseur = new gPoint();

				$convertisseur->setUTM($enrg['x_utm'], $enrg['y_utm'], $enrg['sector']);

				$convertisseur->convertTMtoLL();

				$enrg['coord_x'] = $convertisseur->Lat();

				$enrg['coord_y'] = $convertisseur->Long();

			}

			$id = $enrg['coord_x'].'-'.$enrg['coord_y'];

			if (!isset($points[$id])) {

				$points[$id] = $enrg;

				$points[$id]['nbre'] = 1;

			} else {

				$points[$id]['nbre']++;

			}

			// Détermination x et y min et max

			$mm['min_x'] = ($mm['min_x'] > $enrg['coord_x']) ? $enrg['coord_x'] : $mm['min_x'];

			$mm['min_y'] = ($mm['min_y'] > $enrg['coord_y']) ? $enrg['coord_y'] : $mm['min_y'];

			$mm['max_x'] = ($mm['max_x'] < $enrg['coord_x']) ? $enrg['coord_x'] : $mm['max_x'];

			$mm['max_y'] = ($mm['max_y'] < $enrg['coord_y']) ? $enrg['coord_y'] : $mm['max_y'];

		}

		// Post-traitement des résultats

		$x_moyen = str_replace(',', '.', ($mm['max_x'] - $mm['min_x']));

		$y_moyen = str_replace(',', '.', ($mm['max_y'] - $mm['min_y']));

		$points = array_values($points);

		// Création des infos du widget

		$json['type'] = 'json';

		$json['variable_js'] = 'obs';

		$json['donnees']['points'] = $points;

		$json['donnees']['nombre'] = count($points);

		$json['donnees']['centre_x'] = $x_moyen;

		$json['donnees']['centre_y'] = $y_moyen;

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

		return $json;

	}

	/**

	 * Données pour l'affichage des obs d'une station

	 */

	public function getObservations($params) {

		$json = null;

		$parametres = $this->traiterParametres(array('station', 'utilisateur'), $params, false);

		extract($parametres);

		//$this->debug[] = $station;

		list($type, $coord) = explode(':', $station);

		if ($type == 'UTM') {

			list($x_utm, $y_utm, $secteur) = explode('-', $coord);

		} else if ($type == 'LngLat') {

			list($coord_y, $coord_x) = explode('-', $coord);

		}

		$requete = 	'SELECT identifiant, nom_sel, nom_ret, num_nom_sel, num_nom_ret, num_taxon, famille, '.

					'	lieudit, location, date_observation, milieu, commentaire, '.

					'	sector, x_utm, y_utm, coord_x, coord_y, ref_geo '.

					'FROM cel_inventory AS i '.

					'	LEFT JOIN locations AS l '.

					'		ON (l.name = i.location AND l.code = i.id_location) '.

					"WHERE transmission = '1' ".

					(($type == 'UTM') ? "	AND (sector = '$secteur' AND x_utm = '$x_utm' AND y_utm = '$y_utm' ) " : '').

					(($type == 'LngLat') ? "	AND (coord_x = '$coord_x' AND coord_y = '$coord_y' ) " : '').

					(isset($utilisateur) ? " AND identifiant = '$utilisateur' " : '');

		//$this->debug[] = $requete;

		$resultats = $this->executerRequete($requete);

		// Post-traitement

		$resultats = $this->nettoyerTableau($resultats);

		return $resultats;

	}

	/**

	 * Liste des taxons présents sur la carte

	 */

	public function getTaxons($params) {

	}

}