<?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';
	const VIGNETTE_DEFAULT = '4,3';
	const WS_IMG_LIST = 'celImage';
	const IMAGE_FORMATS = [
		'CRX2S' => '63px (Carrée, rognée)',
		'CRXS'  => '100px (Carrée, rognée)',
		'CXS'   => '100px (Carrée)',
		'CS'    => '300px (Carrée)',
		'CRS'   => '300px (Carrée, rognée)',
		'XS'    => '150px',
		'S'     => '400px',
		'M'     => '600px',
		'L'     => '800px',
		'CRL'   => '600px (Carrée, rognée)',
		'XL'    => '1024px',
		'X2L'   => '1280px',
		'X3L'   => '1600px',
		'O'     => 'Format original (Taille inconnue)'
	];
	const START_DEFAUT = 0;
	const LIMIT_DEFAUT = 100;
	private $url_widget = null;
	private $eflore_url_tpl = null;
	private $service_images_url = null;
	private $flux_rss_url = null;

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

	/**
	 * 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->url_widget = sprintf($this->config['chemins']['baseURLAbsoluDyn'], 'photo');
		$this->eflore_url_tpl = $this->config['photo']['efloreUrlTpl'];
		$this->service_images_url = $this->config['photo']['celUrlImages'];
		$this->flux_rss_url = $this->config['photo']['fluxRssUrl'];

		$cache_activation = $this->config['photo.cache']['activation'];
		$cache_stockage = $this->config['photo.cache']['stockageDossier'];
		if (!is_dir($cache_stockage)) {
			mkdir($cache_stockage, 0777, true);
		}
		$ddv = $this->config['photo.cache']['dureeDeVie'];
		$cache = new Cache($cache_stockage, $ddv, $cache_activation);
		$id_cache = 'photo-'.hash('adler32', print_r($this->parametres, true));
		$contenu = $cache->charger($id_cache);
		
		$this->user = $this->getUserFromCookie();
		
		if (!$contenu) {
			$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(['contenu' => $contenu]);

		} else {
			$this->envoyer($contenu);
		}
		
		// POur l'envoi du vote vers PF
		if ($_SERVER['REQUEST_METHOD'] === 'POST') {
			if (isset($_GET['action']) && $_GET['action'] === 'send_pf_vote') {
				$this->sendVote();
			}
		}
	}

	// maintenir la retrocompatibilité avec l'ancien mode ajax
	private function executerAjax() {
		unset($this->parametres['mode']);

		$chaineRequete = http_build_query($this->parametres);
		$chaineRequete = $chaineRequete ? '?'.$chaineRequete : '';
		$widget['donnees']['url_widget'] = $this->url_widget.$chaineRequete;

		$id = '-'.(isset($this->parametres['id']) ? $this->parametres['id'] : '1');
		$widget['donnees']['id'] = $id;

		$widget['squelette'] = 'photo_retrocompatibilite_ajax';

		return $widget;
	}

	private function executerPopup() {
		session_start();

		$protocoles = $this->getProtocoles();
		
		$galerie_id = $_GET['galerie_id'];
		$widget['donnees']['url_image'] = $_GET['url_image'];
		$widget['donnees']['infos_images'] = $_SESSION[$galerie_id]['infos_images'];
		$widget['donnees']['url_widget'] = $this->url_widget;
		$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']['max_photo'] = $_SESSION[$galerie_id]['max_photo'];
		$widget['donnees']['start'] = $_SESSION[$galerie_id]['start'];
		$widget['donnees']['url_ws_regenerer_img'] = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::WS_IMG_LIST) . '/regenerer-miniatures?ids-img=';
		$widget['donnees']['popup_url'] = isset( $_GET['popup_url'] ) ? $_GET['popup_url'] : null;
		$widget['donnees']['url_base_telechargement'] = sprintf($this->config['chemins']['baseURLServicesCelTpl'], 'CelImageFormat/');
		$widget['donnees']['formats_description'] = self::IMAGE_FORMATS;
		$widget['donnees']['protocoles'] = $protocoles;
		$widget['donnees']['del_url'] = sprintf($this->config['chemins']['baseURLServicesDelTpl'], '');
		$widget['donnees']['new_cel_url'] = sprintf($this->config['chemins']['baseURLServicesNewCelTpl'], '');
		
		if ($this->user){
			$widget['donnees']['userId'] = $this->user['id'];
			$widget['donnees']['token'] = $this->user['token'];
		}

		$widget['squelette'] = 'popup' . $this->suffixeLangue;
		
		return $widget;
	}

	private function executerContact() {
		session_start();

		$widget['donnees']['url_widget'] = $this->url_widget;
		$widget['donnees']['id_image'] = $_GET['id_image'];
		$widget['donnees']['nom_sci'] = $_GET['nom_sci'];
		$widget['donnees']['nn'] = $_GET['nn'];
		$widget['donnees']['date'] = $_GET['date'];
		$widget['donnees']['auteur'] = $_GET['auteur'];
		$widget['donnees']['popup_url'] = isset( $_GET['popup_url'] ) ? $_GET['popup_url'] : null;

		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 executerPhoto() {
		$widget = null;
		session_start();

		$this->parametres['start'] = $this->parametres['start'] ?? self::START_DEFAUT;
		$this->parametres['limit'] = $this->parametres['limit'] ?? self::LIMIT_DEFAUT;
        $limit = $this->parametres['limit'];

		$hasTriedValueInConfig = false;
		while (!isset($vignette) || !preg_match('/^[0-9]+,[0-9]+$/', $vignette)) {
			$vignette = (!$hasTriedValueInConfig) ? $this->config['photo']['vignette'] : self::VIGNETTE_DEFAULT;
			$hasTriedValueInConfig = true;
		}
		
		$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;

		$champ_recherche = $champ_recherche ?? null;
		$champ_recherche = $champ_recherche ? $this->obtenirBooleen($champ_recherche) : ($this->config['photo']['champRecherche'] ? $this->obtenirBooleen($this->config['photo']['champRecherche']) : false) ;
		$extra = $extra ?? null;

		// Affichage mode e-flore avec le paramètre mode_eflore
		if ($_GET['mode_eflore']) {
			$champ_recherche = false;
			$vignette = '5,2';

			$tags = [
				'fleur',
				'feuille',
				'fruit',
				'ecorce',
				'port',
				'rameau',
			];

			foreach ($tags as $tag) {
				$widget = $this->getImages($vignette, $extra, $limit, $id, $titre, $icone_rss, $utilise_fancybox,true, $tag, $widget, false);
				$widget['donnees']['champ_recherche'] = false;
			}
			$widget['donnees']['tagToDisplay'] = 'fleur';
		} else {
			$widget = $this->getImages($vignette, $extra, $limit, $id, $titre, $icone_rss, $utilise_fancybox, false, 'non_eflore', $widget, $champ_recherche);

			$widget['donnees']['champ_recherche'] = $champ_recherche;

		}
		
		return $widget;
	}

	private function traiterParametres() {
		$parametres_flux = '?';
		$criteres = [
			'taxon',
			'referentiel',
			'date_deb',
			'date_fin',
			'commune',
			'dept',
			'pays',
			'auteur',
			'programme',
			'tag',
			'standard',
			'recherche',
			'date',
			'motcle',
			'projet',
			'num_taxon',
			'num_nom',
			'start',
			'limit',
			'mode_eflore',
			'famille'
		];

		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;
	}

	private function obtenirBooleen($var) {
		switch ($var) {
			case 'false' :
			case 'null' :
			case 'non' :
			case 'no' :
				return false;
			default:
				return boolval($var);
		}
	}
	
	private function getProtocoles(){
		$protocoles = [];
		$this->service_del_url = $this->config['chemins']['baseURLServicesDelTpl'];
		$url = sprintf($this->service_del_url, 'protocoles');
		$json = $this->getDao()->consulter($url);
		
		if (empty($json)) {
			$this->messages[] = "L'URI suivante est invalide : $url";
		} else {
			$protocoles= json_decode($json, true);
		}
		
		return $protocoles['resultats'];
	}
	
	private function getVotes($image){
		$votes = [];
		
		$id = $image['id_photo'];
		
		$this->service_del_url = $this->config['chemins']['baseURLServicesDelTpl'];
		$url = sprintf($this->service_del_url, 'images/'.$id.'/votes');
		
		$json = $this->getDao()->consulter($url);
		
		if (empty($json)) {
			$this->messages[] = "L'URI suivante est invalide : $url";
		} else {
			foreach (json_decode($json, true)['resultats'] as $vote){
				$votes[] = $vote;
			}
		}
		
		return $votes;
	}

	public function sendVote(){
		$data = json_decode(file_get_contents('php://input'), true);
		
		$id = $data['idImage'];
		$mode = $data['mode'];
		$contenu = [
			'utilisateur' => $data['user'],
			'protocole' => $data['protocole'],
			'valeur' => $data['vote']
		];
		
		switch ($mode){
			case 'PUT':
			case 'POST':
				$this->service_del_url = $this->config['chemins']['baseURLServicesDelTpl'];
				$url = sprintf($this->service_del_url, 'images/'.$id.'/votes/');
				$this->send($url, $mode, $contenu);
				break;
			case 'DELETE':
				$this->service_del_url = $this->config['chemins']['baseURLServicesDelTpl'];
				$url = sprintf($this->service_del_url, 'images/'.$id.'/votes/'.$data['voteId']);
				$this->send($url, $mode, $contenu);
				break;
		}
	}
	
	public function send($url, $mode, Array $donnees = array()){
		$contenu = false;
		$this->user = $this->getUserFromCookie();
		$authorizationToken = $this->user['token'];

		$json = json_encode($donnees);
		$contexte = stream_context_create([
			  'http' => [
				  'method' => $mode,
				  'header' => "Content-type: application/x-www-form-urlencoded\r\n" .
					  "Authorization: $authorizationToken\r\n",
				  'content' => http_build_query($donnees, null, '&')]
										  ]);
		$flux = fopen($url, 'r', false, $contexte);
		if (!$flux) {
			$e = "L'ouverture de l'url '{$url}' par la méthode HTTP {$mode} a échoué! avec les données {$json} et le token {$authorizationToken}";
			trigger_error($e, E_USER_WARNING);
		} else {
			// Contenu actuel de $url
			$contenu = stream_get_contents($flux);
			
			fclose($flux);
		}
		return $contenu;
	}
	
	public function formaterDates($item, $image){
		$item['date_photo'] = $image['date_photo'] ?? $image['obs']['date_obs'];
		$item['date_redige'] = strftime('%A %d %B %Y', strtotime($item['date_photo']));
		$item['date'] = date_format(date_create($item['date_photo']),"d/m/Y");
		$item['lien'] = sprintf($this->eflore_url_tpl, $image['obs']['nom_referentiel'], $image['obs']['nom_sel_nn']);
		$image['url_photo'] = preg_replace('/,/', "", $image['url_photo']);
		$item['url_tpl'] = preg_replace('/(O|XS|[SML]|X(?:[23]|)L|CR(?:|X2)S|C(?:|X)S)$/', '%s.jpg',$image['url_photo']);
		return $item;
	}
	
	public function formaterTitre($item, $image, $auteur){
		$item['titre'] = $image['obs']['nom_sel'].' [nn'.$image['obs']['nom_sel_nn'].'] par '.$auteur.' le '
			.date_format(date_create($image['obs']['date_obs']),"d/m/Y").' - '.$image['obs']['localisation'];
		
		$item['id_photo_formate'] = sprintf('%09d', $image['id_photo']);
		$item['urlProfil'] = sprintf($this->config['photo']['tbProfilUrlTpl'], $image['utilisateur']['id_utilisateur'] );
		return $item;
	}
	
	private function getImages($vignette, $extra, $limit, $id, $titre, $icone_rss, $utilise_fancybox, $fromEflore,
	$tag, $widget, $champ_recherche){
		if ($fromEflore){
			$this->parametres['tag'] = $tag;
		}
		list($colonne, $ligne) = explode(',', $vignette);

		$extra = !($extra === 0)  &&  (($this->config['photo']['extraActif']  &&  (($colonne == 1 || $ligne == 1 ? false : true))));

		$max_photo = $colonne * $ligne;
		if ( $extra && 2 == $colonne ) {
			$max_photo = $max_photo - 1;
		} elseif (  $extra && 2 < $colonne ) {
			$max_photo = $max_photo - 3;
		}

		$limit = $limit < $max_photo ? $limit : $max_photo;
		$this->parametres['limit'] = $limit;

		$parametresTraites = $this->traiterParametres();
		$this->flux_rss_url .= $parametresTraites;
		$url = $this->service_images_url.(!empty($parametresTraites) ? $parametresTraites.'&' : '?');
		$json = $this->getDao()->consulter($url);

		if (empty($json) || !strpos($json, 'images')) {
			$this->messages[] = "L'URI suivante est invalide : $url.\n".
				"Veuillez vérifier les paramêtres indiqués et la présence d'images associées.";
			$this->logError("L'URI est invalide: $url");
			return $widget;
		}

		$tableau = json_decode($json, true);

		if (empty($tableau['total']) || empty($tableau['images'])) {
			$this->logError('Aucune photo ne correspond à vos critères');
			return $widget;
		}

		$parametres_photo_suivante = $parametres_photo_precedente = $this->parametres;
		$start = $this->parametres['start'] ? : 0;
		$parametres_photo_suivante['start'] = $start + $limit;
		$parametres_photo_precedente['start'] = 0 < $start - $limit ? $start - $limit : 0;

		$widget['donnees']['total'] = $tableau['total'];
		$widget['donnees']['id'] = $id;
		$widget['donnees']['titre'] = $titre;
		$widget['donnees']['flux_rss_url'] = $this->flux_rss_url;
		$widget['donnees']['url_widget'] = $this->url_widget;
		$widget['donnees']['url_widget_photos_suivantes'] = $this->url_widget.'?'.http_build_query($parametres_photo_suivante);
		$widget['donnees']['url_widget_photos_precedente'] = $this->url_widget.'?'.http_build_query($parametres_photo_precedente);
		$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']['ligne'] = $ligne;
		$widget['donnees']['extra_actif'] = $extra ?? null;
		$widget['donnees']['icone_rss'] = $icone_rss ?? null;
		$widget['donnees']['champ_recherche'] = $champ_recherche;
		$widget['donnees']['start'] = $start;
		$widget['donnees']['limit'] = $limit;
		$widget['donnees']['utilise_fancybox'] = $utilise_fancybox;
		$widget['donnees']['prod'] = ($this->config['parametres']['modeServeur'] === 'prod');
		$widget['donnees']['filtres'] = $this->parametres;

		$num = 0;
		$galerie_id = md5(http_build_query($_GET));
		$widget['donnees']['galerie_id'] = $galerie_id;

		$_SESSION[$galerie_id]['max_photo'] = $max_photo;
		$_SESSION[$galerie_id]['start'] = $start;

//		*************************************** C'est cette boucle qui prend grave du temps ****************************************
		// Cache pour les tailles d'images
//		$imageSizeCache = [];
		foreach ($tableau['images'] as $key => $image) {
			if ($key == $max_photo) {
				break;
			}

			// Utilisation du cache pour l'utilisateur -> fait gagner un peu de temps de chargement si plusieures photos du même utilisateur
			$courriel = $image['utilisateur']['mail_utilisateur'];
			if (!isset($this->userCache[$courriel])) {
				$this->userCache[$courriel] = $this->recupererUtilisateursIdentite([$courriel])[$courriel];
			}
			$auteurId = $this->userCache[$courriel]['id'];

			$isTelaUser = $auteurId ? true : false;
			$auteurTruncatedEmail = $this->tronquerCourriel($courriel);

			$auteur = trim($image['utilisateur']['nom_utilisateur']) ? $image['utilisateur']['nom_utilisateur'] : $auteurTruncatedEmail;

			$item = $image;
			$item = $this->formaterDates($item, $image);
			$item = $this->formaterTitre($item, $image, $auteur);

			$item['tag_eflore'] = $tag;
			$item['is_auteur_tela'] = $isTelaUser;

			if ($key == 0) {
				$widget['donnees']['extra'] = $item;
			}

			$widget['donnees']['items'][$tag][$num++] = $item;
//
			$url_galerie_popup = sprintf($item['url_tpl'], 'O');
//			if (!isset($imageSizeCache[$url_galerie_popup])) {
//				$imageSizeCache[$url_galerie_popup] = getimagesize($url_galerie_popup);
//			}
//			$image_size = $imageSizeCache[$url_galerie_popup];
//			error_log(print_r($imageSizeCache, true));
//			$item['width'] = $image_size[0];
//			$item['height'] = $image_size[1];

			// Récupération des votes et tags
			$item['votes'] = $this->getVotes($item);
			$item['tags_pf'] = $this->getPfTags($item);

			$_SESSION[$galerie_id]['infos_images'][$url_galerie_popup] = $item;
		}

		if ($fromEflore) {
			unset($this->parametres['tag']);
		}
		$widget['squelette'] = 'photo';
		
		return $widget;
	}
	
	private function getPfTags($image){
		$tags = [];
		
		$id = $image['id_photo'];
		
		$this->service_del_url = $this->config['chemins']['baseURLServicesDelTpl'];
		$url = sprintf($this->service_del_url, 'mots-cles?image='.$id);
		
		$json = $this->getDao()->consulter($url);
		
		if (empty($json)) {
			$this->messages[] = "L'URI suivante est invalide : $url";
		} else {
			foreach (json_decode($json, true)['resultats'] as $tag){
				$tags[] = [
					'id_mot_cle' => $tag['id_mot_cle'],
					'mot_cle' => $tag['mot_cle']
				];
			}
		}
		
		return $tags;
	}
}
?>