<?php
// declare(encoding='UTF-8');
/**
 * Service affichant les dernières photo publiques du CEL ouvrable sous forme de diaporama.
 * 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=AideCELWidgetPhoto
 *
 * Paramètres :
 * ===> extra = booléen (1 ou 0)  [par défaut : 1]
 * Affiche / Cache la vignette en taille plus importante au bas du widget.
 * ===> vignette = [0-9]+,[0-9]+  [par défaut : 4,3]
 * Indique le nombre de vignette par ligne et le nombre de ligne.
 *
 * @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 Photo extends WidgetCommun {
	
	const DS = DIRECTORY_SEPARATOR;
	const SERVICE_DEFAUT = 'photo';
	private $flux_rss_url = null;
	private $eflore_url_tpl = null;

	// Suffixe de template pour la langue (vide par défaut, correspond à "fr" au français)
	private $suffixeLangue = '';

	/**
	 * Méthode appelée par défaut pour charger ce widget.
	 */
	public function executer() {
		$retour = null;
		// Pour la création de l'id du cache nous ne tenons pas compte du paramètre de l'url callback
		unset($this->parametres['callback']);
		extract($this->parametres);

		if (!isset($mode)) {
			$mode = self::SERVICE_DEFAUT;
		}
		
		$this->eflore_url_tpl = $this->config['photo']['efloreUrlTpl'];
		$this->flux_rss_url = $this->config['photo']['fluxRssUrl'];
		
		$cache_activation = $this->config['photo.cache']['activation'];
		$cache_stockage = $this->config['photo.cache']['stockageDossier'];
		$ddv = $this->config['photo.cache']['dureeDeVie'];
		$cache = new Cache($cache_stockage, $ddv, $cache_activation);
		$id_cache = 'photo-'.hash('adler32', print_r($this->parametres, true));
		if (! $contenu = $cache->charger($id_cache)) {
			$methode = $this->traiterNomMethodeExecuter($mode);
			if (method_exists($this, $methode)) {
				$retour = $this->$methode();
			} else {
				$this->messages[] = "Ce type de service '$methode' n'est pas disponible.";
			}

			// Suffixe de template pour la langue - fr par défaut @TODO configurer ça un jour
			if (isset($this->parametres['lang']) && $this->parametres['lang'] != "fr") {
				$this->suffixeLangue = "_" . $this->parametres['lang'];
			}

			$contenu = '';
			if (is_null($retour)) {
				$this->messages[] = 'Aucune image';
			} else {
				if (isset($retour['donnees'])) {
					$squelette = dirname(__FILE__).self::DS.'squelettes'.self::DS.$retour['squelette']. $this->suffixeLangue . '.tpl.html';
					$contenu = $this->traiterSquelettePhp($squelette, $retour['donnees']);
					$cache->sauver($id_cache, $contenu);
				} else {
					$this->messages[] = 'Les données à transmettre au squelette sont nulles.';
				}
			}
		}
		if (isset($_GET['callback'])) {
			$this->envoyerJsonp(array('contenu' => $contenu));
		} else {
			$this->envoyer($contenu);
		}
	}
	
	private function executerAjax() {
		$widget = $this->executerPhoto();
		$widget['squelette'] = 'photo_ajax';
		return $widget;
	}
	
	private function executerPopup() {
		session_start();
		$galerie_id = $_GET['galerie_id'];
		$widget['donnees']['url_image'] = $_GET['url_image'];
		$widget['donnees']['infos_images'] = $_SESSION[$galerie_id]['infos_images'];
		$widget['donnees']['urls'] = $_SESSION[$galerie_id]['urls'];
		$widget['donnees']['url_widget'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'photo');
		$widget['donnees']['url_css'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'modules/photo/squelettes/css/');
		$widget['donnees']['url_js'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'modules/photo/squelettes/js/');
		$widget['squelette'] = 'popup' . $this->suffixeLangue;
		return $widget;
	}
	
	private function executerContact() {
		session_start();
		$widget['donnees']['id_image'] = $_GET['id_image'];
		$widget['donnees']['nom_sci'] = $_GET['nom_sci'];
		$widget['donnees']['nn'] = $_GET['nn'];
		$widget['donnees']['date'] = $_GET['date'];
		if (isset($_GET['lang']) && 'nl' === $_GET['lang']) {
			$widget['donnees']['sujet'] = "Afbeelding #".$_GET['id_image']." op ".$_GET['nom_sci'];
			$widget['donnees']['message'] = "\n\n\n\n\n\n\n\n--\nBetreft de foto \"".$_GET['nom_sci'].'" van "'.$_GET['date'];
		} else {
			$widget['donnees']['sujet'] = "Image #".$_GET['id_image']." de ".$_GET['nom_sci'];
			$widget['donnees']['message'] = "\n\n\n\n\n\n\n\n--\nConcerne l'image de \"".$_GET['nom_sci'].'" du "'.$_GET['date'];
		}
		$widget['donnees']['url_css'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'modules/photo/squelettes/css/');
		$widget['donnees']['url_js'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'modules/photo/squelettes/js/');
		$widget['squelette'] = 'contact';
		return $widget;
	}
	
	private function decouperTitre($titre) {
		if ('nl' === $this->suffixeLangue) {
			$dic = array(' door ', ' op ');
		} else {
			$dic = array(' par ', ' le ');
		}

		$tab_titre = explode('[nn', $titre);
		if (isset($tab_titre[1])) {
			$nom_sci = $tab_titre[0];
			$tab_titre_suite = explode($dic[0], $tab_titre[1]);
		} else {
			$nom_sci = "";
			$tab_titre_suite = explode($dic[0], $tab_titre[0]);
		}
		$nn = '[nn'.$tab_titre_suite[0];
		$tab_titre_resuite = explode($dic[1], $tab_titre_suite[1]);
		$utilisateur = $tab_titre_resuite[0];
		$tab_titre_fin = explode(' - ', $tab_titre_resuite[1]);
		$date = $tab_titre_fin[0];
		$localite = (empty($tab_titre_fin[1]) ? '' : $tab_titre_fin[1]);
		
		$titre_decoupe = array('nom_sci' => $nom_sci, 'nn' => $nn, 'date' => $date, 'auteur' => $utilisateur, 'localite' => $localite);
		return $titre_decoupe;
	}
	
	private function executerPhoto() {
		session_start();
		$_SESSION['urls'] = array();
		$widget = null;
		extract($this->parametres);
		$extra = (isset($extra)	&& $extra == 0) ? false : ($this->config['photo']['extraActif'] ? true : false);
		$vignette = (isset($vignette) && preg_match('/^[0-9]+,[0-9]+$/', $vignette)) ? $vignette : '4,3';
		$id = '-'.(isset($id) ? $id : '1');
		$titre = isset($titre) ? htmlentities(rawurldecode($titre)) : '';
		$icone_rss = (isset($_GET['rss']) && $_GET['rss'] != 1) ? false : true;
		$utilise_fancybox = (isset($_GET['mode_zoom']) && $_GET['mode_zoom'] != 'fancybox') ? false : true;
		list($colonne, $ligne) = explode(',', $vignette);
		$this->flux_rss_url .= $this->traiterParametres();

		$xml = @file_get_contents($this->flux_rss_url);
		//var_dump($xml);
		if ($xml !== false) { 
			if ($xml) {
				try {
					$flux = new XmlFeedParser($xml);
					$widget['donnees']['id'] = $id;
					$widget['donnees']['titre'] = $titre;
					$widget['donnees']['flux_rss_url'] = $this->flux_rss_url;
					$widget['donnees']['url_widget'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'photo');
					$widget['donnees']['url_css'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'modules/photo/squelettes/css/');
					$widget['donnees']['url_js'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'modules/photo/squelettes/js/');
					$widget['donnees']['colonne'] = $colonne;
					$widget['donnees']['extra_actif'] = $extra;
					$widget['donnees']['icone_rss'] = $icone_rss;
					$widget['donnees']['utilise_fancybox'] = $utilise_fancybox;
					$widget['donnees']['prod'] = ($this->config['parametres']['modeServeur'] == "prod");

					$max_photo = $colonne * $ligne;
					$num = 0;
					$galerie_id = md5(http_build_query($_GET));
					$widget['donnees']['galerie_id'] = $galerie_id;
					foreach ($flux as $entree) {
						if ($num == $max_photo) {
							break;
						}
						$item = array();
						// Formatage date
						$date = $entree->updated ? $entree->updated : null;
						$date = $entree->pubDate ? $entree->pubDate : $date;
						$item['date'] = strftime('%A %d %B %Y', $date);
						$item['lien'] = $entree->link;
						$item['url_tpl'] = preg_replace('/(XS|[SML]|X(?:[23]|)L|CR(?:|X2)S|C(?:|X)S)\.jpg$/', '%s.jpg', $entree->guid);
												
						// Formatage titre
		    			$item['titre'] = str_replace('"', "", $entree->title);
		    			$item['infos'] = $this->decouperTitre($item['titre']);
		    			$item['nn'] = '';
		    			$item['eflore_url'] = '#';
		    			if (preg_match('/\[nn([0-9]+)\]/', $entree->title, $match)) {
		    				$item['nn'] = $match[1];
		    				$item['eflore_url'] = $item['lien'] ;
		    			}
		    			
						// Récupération du GUID - aaaaah c'est cracra si on change la config yatoukipett !! Satan is in this code !!!
						if (preg_match($this->config['photo']['motif_guid'], $entree->guid, $match)) {
		  					$item['guid'] = (int) $match[1];
						} else {
							$item['guid'] = $entree->guid;
						}
						
						// Ajout aux items et si première photo à extra
						if ($num == 0) {
							$widget['donnees']['extra'] =  $item;
						}
						$widget['donnees']['items'][$num++] =  $item;
						//TODO: voir si l'on ne peut pas faire mieux
						$url_galerie_popup = sprintf($item['url_tpl'],'XL');
						$_SESSION[$galerie_id]['urls'][] = $url_galerie_popup;
						$_SESSION[$galerie_id]['infos_images'][$url_galerie_popup] = array('titre' => $item['titre'],
													'date' => $item['titre'],
													'guid' => $item['guid'],
													'lien' => $item['lien']
						);
					}
					$widget['squelette'] = 'photo';
				} catch (XmlFeedParserException $e) {
				    trigger_error('Flux invalide : '.$e->getMessage(), E_USER_WARNING);
				}
			} else {
				// si on arrive ici c'est qu'il n'y a aucune image correspondant
				// à la requête, mais il n'y a rien d'invalide là-dedans
				//$this->messages[] = "Fichier xml invalide.";
			}
		} else {
			$this->messages[] = "L'URI suivante est invalide : $this->flux_rss_url.\n".
				"Veuillez vérifier les paramêtres indiqués et la présence d'images associées.";
		}
		return $widget;
	}
	
	private function traiterParametres() {
		$parametres_flux = '?';
		$criteres = array('utilisateur', 'commune', 'dept', 'taxon', 'commentaire', 'date', 'tag', 'motcle', 'projet', 'num_taxon', 'num_nom', 'referentiel', 'groupe_zones_geo');
		foreach($this->parametres as $nom_critere => $valeur_critere) {
			if (in_array($nom_critere, $criteres)) {
				$valeur_critere = str_replace(' ', '%20', $valeur_critere);
				$parametres_flux .= $nom_critere.'='.$valeur_critere.'&';
			}
		}
		
		if ($parametres_flux == '?') {
			$parametres_flux = '';
		} else {
			$parametres_flux = rtrim($parametres_flux, '&');
		}
		return $parametres_flux;
	}
}
?>