<?php
/**
 * Service fournissant des informations concernant les votes sur les images de DEL en fonction d'un protocole
 * au format RSS1, RSS2 ou ATOM.
 * Encodage en entrée : utf8
 * Encodage en sortie : utf8
 *
 * @author Grégoire DUCHE <gregoire@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 2010
 */
class SyndicationVotesParProtocole {
	/**
	 * Paramètres du service
	 * */
	private $ressources = null;
	private $parametres = null;
	private $format = null;
	private $service = null;
	private $squelette = null;
	private $squelette_dossier = null;
	private $masque = array();
	private $mappingFiltre = array();
	private $conteneur = null;
	private $gestionBdd = null;
	private $navigation = null;
	private $type_rss = null;

	/**
	 * Constructeur
	 * Initialiser les configurations
	 * */
	public function __construct(Conteneur $conteneur = null) {
		$this->conteneur = $conteneur == null ? new Conteneur() : $conteneur;
		$this->conteneur->chargerConfiguration('config_syndication_votesparprotocole.ini');
		$this->mappingFiltre = $this->conteneur->getParametre('mapping_masque');
		$this->masque = $conteneur->getMasque();
		$this->gestionBdd = $conteneur->getGestionBdd();
		$this->navigation = $conteneur->getNavigation();
	}

	/**
	 * Consulter
	 * Méthode par défaut pour récupérer l'ensemble des votes.
	 * Vérifie la configuration et retourne les derniers votes formatés
	 * */
	public function consulter($params = array()) {
		$this->verifierConfiguration();
		$this->type_rss = $params[1];
		if ($this->fluxAdminDemande()) {
			$this->demanderAutorisationAdmin();
		}

		$donnees_brutes = $this->getDerniersVotesImage();
		$commentaires_formates = $this->formaterPourRss($donnees_brutes) ;
		return $commentaires_formates;
	}

	/**
	* Vérifier que le service est bien configuré
	* */
	public function verifierConfiguration() {
		$erreurs = array();

		if (empty($this->mappingFiltre)) {
			$erreurs[] = '- le fichier de configuration ne contient pas le tableau [mapping_masque] ou celui-ci est vide ;';
		} else {
			$champsMappingFiltre = array('image', 'protocole');
			foreach ($champsMappingFiltre as $champ) {
				if (!isset($this->mappingFiltre[$champ])) {
					$erreurs[] = '- le mapping du champ "'.$champ.'" pour le commentaire est manquant ;';
				}
			}
		}

		if (!empty($erreurs)) {
			$e = 'Erreur lors de la configuration : '."\n";
			$e .= implode("\n", $erreurs);
			throw new Exception($e, RestServeur::HTTP_CODE_ERREUR);
		}
	}

	/**
	 * Verifier si le flux admin est demandé
	 */
	private function fluxAdminDemande() {
		return $this->conteneur->getParametre('admin') != null && $this->conteneur->getParametre('admin') == 1;
	}

	/**
	 * Si le flux est un flux admin, demander un mot de passe
	 * */
	private function demanderAutorisationAdmin() {
		$verification = $this->conteneur->getControleAcces();
		$verification->demanderAuthentificationAdmin();
	}

	/**
	 * Formater les données pour mettre en page le RSS
	 * */
	private function formaterPourRss($elements) {
		$donnees = $this->construireDonneesCommunesAuFlux($elements);
		foreach ($elements as $element) {
			$identifiants[$element['id_vote']] = $element['id_vote'];
		}
		foreach ($elements as $element) {
			$donnees['items'][] = $this->construireDonneesCommunesAuxItems($element);
		}
		return $donnees;
	}

	/**
	 * Générer les métadonnées du flux (titre, dates, editeur etc.)
	 * */
	private function construireDonneesCommunesAuFlux($infos) {
		$donnees = array();
		$donnees['guid'] = htmlspecialchars($this->creerUrlService());
		$donnees['titre'] = 'pictoFlora : votes';
		$donnees['description'] = 'Ce flux regroupe les derniers votes sur les images de pictoFlora';
		$donnees['lien_service'] = htmlspecialchars($this->creerUrlService());
		$donnees['lien_del'] = $this->conteneur->getParametre('pictoAppliLien');
		$donnees['editeur'] = $this->conteneur->getParametre('editeur');
		$derniere_info_en_date = reset($infos);
		$date_modification_timestamp = strtotime($derniere_info_en_date['date_vote']);
		$donnees['date_maj_RSS'] = date(DATE_RSS, $date_modification_timestamp);
		$donnees['date_maj_ATOM'] = date(DATE_ATOM, $date_modification_timestamp);
		$donnees['date_maj_W3C'] = date(DATE_W3C, $date_modification_timestamp);
		$donnees['annee_courante'] = date('Y');
		$donnees['generateur'] = 'DEL - SyndicationCommentaire';
		$donnees['generateur_version'] = (preg_match('/([0-9]+)/', '$Revision$', $match)) ?  $match[1] : '0';
		return $donnees;
	}

	/**
	 * Générer le lien du flux RSS
	 * */
	private function creerUrlService() {
		$url_service = 'http://'.$_SERVER['SERVER_NAME'].$_SERVER['REQUEST_URI'];
		return $url_service;
	}

	/**
	 * Générer les données communes & spécifiques à chaque item
	 * */
	private function construireDonneesCommunesAuxItems($info) {
		$item = array();
		$date_modification_timestamp = strtotime($info['date_vote']);
		$item['date_maj_simple'] = strftime('%A %d %B %Y à %H:%M', $date_modification_timestamp);
		$item['date_maj_RSS'] = date(DATE_RSS, $date_modification_timestamp);
		$item['date_maj_ATOM'] = date(DATE_ATOM, $date_modification_timestamp);
		$item['date_maj_W3C'] = date(DATE_W3C, $date_modification_timestamp);
		$item['titre'] = $this->creerTitre($info);
		$item['guid'] = $this->creerGuidItem($info);
		$item['lien'] = $this->creerLienItem($info);
		$item['categorie'] = $this->creerCategorie($item);
		$item['description'] = $this->creerDescription($info, $item);
		$item['description_encodee'] = htmlspecialchars($this->creerDescription($info, $item));
		$item['modifier_par'] = $this->creerVotant($info);
		return $item;
	}

	private function creerCategorie($element) {
		$categorie = 'Vote protocole';
		$categorie = htmlentities($categorie);
		return $categorie;
	}

	private function creerGuidItem($element) {
		$guid = sprintf($this->conteneur->getParametre('voteGuidTpl'), $element['id_vote']);
		return $guid;
	}

	private function creerLienItem($element) {
		$lien = sprintf($this->conteneur->getParametre('imgFicheTpl'), $element['ce_image']);
		return $lien;
	}

	private function creerTitre($element) {
		$noteVote = $element['valeur'];
		$nomSci = htmlspecialchars($element['nom_sel']);
		$votant = htmlspecialchars($this->creerVotant($element));
		$observateur = htmlspecialchars($this->creerObservateur($element));

		$titre = "Vote $noteVote par $votant pour $nomSci de $observateur";
		return $titre;
	}

	private function creerDescription($donnees, $item) {
		$idVote = htmlspecialchars($donnees['id_vote']);
		$idObs = htmlspecialchars($donnees['id_observation']);
		$idImg = htmlspecialchars($donnees['ce_image']);
		$urlImg = $this->getUrlImage($donnees['ce_image']);
		$miniatureUrl = $this->getUrlImage($donnees['ce_image'], 'CRS');
		$nomSelActuel = htmlspecialchars($donnees['nom_sel']);
		$dateObs = htmlspecialchars(str_replace(' 00:00:00', '', $donnees['date_observation']));
		$lieuObs = htmlspecialchars($donnees['zone_geo']);
		$protocole = htmlspecialchars($donnees['intitule']);
		$votant = htmlspecialchars($this->creerVotant($donnees));
		$dateVote = htmlspecialchars(strftime('%A %d %B %Y à %H:%M', strtotime($donnees['date_vote'])));
		$observateur = htmlspecialchars($this->creerObservateur($donnees));

		$description = '<style>.champ{color:grey} .gauche{float:left;padding:0 20px 0 0;} ul{list-style-type:none;padding:0;}</style>'.
			'<h2>'."Vote pictoFlora #$idVote pour l'image #$idImg de l'observation #$idObs".'</h2>'.
			'<div class="gauche">'.
			'	<a href="'.$urlImg.'">'.
			'		<img src="'.$miniatureUrl.'" alt="Img #'.$idImg.'"/>'.
			'	</a>'.
			'</div>'.
			'<div class="gauche">'.
			"	<h3>Image #$idImg de l'observation #$idObs</h3>".
			'	<ul>'.
			'		<li><span class="champ">'."Auteur de l'image :</span> $observateur</li>".
			'		<li><span class="champ">'."Nom saisi actuel :</span> <em>$nomSelActuel</em></li>".
			'		<li><span class="champ">'."Lieu :</span> $lieuObs</li>".
			'		<li><span class="champ">'."Date :</span> $dateObs</li>".
			'	</ul>'.
			'</div>'.
			'<div class="gauche">'.
			"	<h3>Vote #$idVote</h3>".
			'	<ul>'.
			'		<li><span class="champ">'."Protocole :</span> <strong>$protocole</strong></li>".
			'		<li><span class="champ">'."Valeur :</span> <strong>{$donnees['valeur']}</strong>/5</li>".
			'		<li><span class="champ">'."Votant :</span> $votant</li>".
			'		<li><span class="champ">'."À voté le :</span> $dateVote</li>".
			'	</ul>'.
			'</div>';
		return $description;
	}

	private function getUrlImage($id, $format = 'L') {
		$url_tpl = $this->conteneur->getParametre('celImgUrlTpl');
		$id = sprintf('%09s', $id).$format;
		$url = sprintf($url_tpl, $id);
		return $url;
	}

	private function creerVotant($info) {
		$votant = 'Anonyme';
		if (isset($info['votant_prenom']) && isset($info['votant_nom'])) {
			$votant = $info['votant_prenom'].' '.$info['votant_nom'];
		}
		return $votant;
	}

	private function creerObservateur($info) {
		$observateur = 'Anonyme';
		if ($info['observateur_prenom'] != '' && $info['observateur_nom'] != '') {
			$observateur = $info['observateur_prenom'].' '.$info['observateur_nom'];
		}
		return $observateur;
	}

	/**
	 * Retrouver les derniers votes image
	 * */
	private function getDerniersVotesImage() {
		$requete =  'SELECT DISTINCT id_vote, ce_image, valeur, divo.date AS date_vote, '.
				'	duo.prenom AS observateur_prenom, duo.nom AS observateur_nom, '.
				'	duv.prenom AS votant_prenom, duv.nom AS votant_nom, '.
				'	do.id_observation, do.nom_sel, do.zone_geo, do.date_observation, dip.intitule '.
				'FROM del_image_vote AS divo '.
				'	INNER JOIN del_obs_image AS doi '.
				'		ON divo.ce_image = doi.id_image '.
				'	INNER JOIN del_observation AS do '.
				'		ON do.id_observation = doi.id_observation '.
				'	INNER JOIN del_image_protocole AS dip '.
				'		ON ce_protocole = id_protocole '.
				'	LEFT JOIN del_utilisateur AS duo '.
				'		ON do.ce_utilisateur = duo.id_utilisateur '.
				'	LEFT JOIN del_utilisateur AS duv '.
				'		ON if((CHAR_LENGTH(divo.ce_utilisateur) <> 32),CAST(divo.ce_utilisateur AS unsigned),0) '.
				'			= duv.id_utilisateur '.
				$this->chargerClauseWhere().' '.
				'ORDER BY divo.date DESC '.
				'LIMIT '.$this->navigation->getDepart().','.$this->navigation->getLimite();

		$elements = $this->gestionBdd->getBdd()->recupererTous($requete);
		return $elements;
	}

	/**
	* Charger la clause WHERE en fonction des paramètres de masque
	* */
	private function chargerClauseWhere() {
		$where = array();
		$tableauMasque = $this->masque->getMasque();
		if (!empty($tableauMasque)) {
			foreach($tableauMasque as $idMasque => $valeurMasque) {
				$idMasque = str_replace('masque.', '', $idMasque);
				switch ($idMasque) {
					case 'image':
						$where[] = ' '.$this->mappingFiltre[$idMasque].' = '.$this->gestionBdd->getBdd()->proteger($valeurMasque);
					break;
					case 'protocole':
						$where[] = ' '.$this->mappingFiltre[$idMasque].' = '.$this->gestionBdd->getBdd()->proteger($valeurMasque).' ';
					break;
					default:
						$where[] = ' '.$this->mappingFiltre[$idMasque].' = '.$this->gestionBdd->getBdd()->proteger($valeurMasque);
					break;
				}
			}
		}
		if (!empty($where)) {
			return ' WHERE '.implode('AND', $where);
		} else {
			return;
		}
	}

	private function creerFiltreAuteur($valeurMasque) {
		$masque = '';
		$auteurId = $valeurMasque;
		if (is_numeric($auteurId)) {
			$masque = ' dc.ce_utilisateur = '.$auteurId;
		} else {
			if (strpos($auteurId, '@') === false) {
				$tableauNomPrenom = explode(' ',$auteurId, 2);
				if(count($tableauNomPrenom) == 2) {
					// on teste potentiellement un nom prenom ou bien un prénom nom
					$masque = '('.
						'(dc.utilisateur_nom LIKE '.$this->gestionBdd->getBdd()->proteger($tableauNomPrenom[0].'%').' AND '.
							'dc.utilisateur_prenom LIKE '.$this->gestionBdd->getBdd()->proteger($tableauNomPrenom[1].'%').') OR '.
							'(dc.utilisateur_nom LIKE '.$this->gestionBdd->getBdd()->proteger($tableauNomPrenom[1].'%').' AND '.
							'dc.utilisateur_prenom LIKE '.$this->gestionBdd->getBdd()->proteger($tableauNomPrenom[0].'%').')'.
					')';
				} else {
					$masque = '(
						(dc.utilisateur_nom LIKE '.$this->gestionBdd->getBdd()->proteger($auteurId.'%').' OR '.
						'dc.utilisateur_prenom LIKE '.$this->gestionBdd->getBdd()->proteger($auteurId.'%').')'.
					')';
				}
			} else {
				$masque = " do.utilisateur_courriel LIKE ".$this->gestionBdd->getBdd()->proteger($valeurMasque.'%')." ";
			}
		}
		return $masque;
	}
}
?>