<?php
// ATTENTION ! Classe compatible uniquement avec nouveau format de bdd du cel //
/**
* PHP Version 5
*
* @category  PHP
* @package   jrest
* @author    Aurélien Peronnet <aurelien@tela-botania.org>
* @copyright 2010 Tela-Botanica
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
* @version   SVN: <svn_id>
* @link      /doc/jrest/
*/
 
/**
* in : utf8
* out : utf8
* 
* Librairie recherche d'images a partir de divers critères
*
*/
class RechercheImage extends Cel {

	function rechercherImagesEtObservationAssociees($id_utilisateur = null, $criteres = array(), $debut = 0, $limite = 50)
	{
		$images_trouvees = $this->rechercherImages($id_utilisateur, $criteres, $debut, $limite);
		
		$retour = array();

		foreach($images_trouvees as $image)
		{
			$image['id_observation'] = $this->obtenirInformationsObservationsAssociees($image['ce_utilisateur'],$image['id_image']);
			$retour[] = $image ;
		}

		return $retour;
	}

	public function rechercherImages($id_utilisateur = null, $criteres = array(), $debut = 0 , $limite = 50) {
		
		$ordre = (isset($criteres['tri']) && $criteres['tri']) ? $criteres['tri'] : 'ci.ordre';
		unset($criteres['tri']);
		$direction = (isset($criteres['dir']) && $criteres['dir']) ? $criteres['dir'] : 'ASC';
		unset($criteres['dir']);
		
		$debut = ($debut < 0) ? 0 : $debut;
		$requete_recherche_images = 'SELECT * ';

		if ($this->doitJoindreTableObs($criteres)) {
			$requete_recherche_images .= $this->fabriquerRequeteJointureObs();
			$requete_recherche_images .= ($id_utilisateur != null) ? 'AND ci.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
			
		} else {
			$requete_recherche_images .= 'FROM cel_images ci ';	
			$requete_recherche_images .= ($id_utilisateur != null) ? 'WHERE ci.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
		}
		
		$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);
		$requete_recherche_images .= $sous_requete_recherche;
		
		$requete_recherche_images .= ' ORDER BY '.$ordre.' '.$direction.' LIMIT '.$debut.','.$limite ;

		$resultats_images = array();
		$resultats_images = Cel::db()->executerRequete($requete_recherche_images);
		
		return $resultats_images;
	}
	
	public function compterImages($id_utilisateur = null, $criteres = array()) {
		
		$ordre = (isset($criteres['tri']) && $criteres['tri']) ? $criteres['tri'] : 'ci.ordre';
		unset($criteres['tri']);
		$direction = (isset($criteres['dir']) && $criteres['dir']) ? $criteres['dir'] : 'ASC';
		unset($criteres['dir']);

		$requete_recherche_images = 'SELECT COUNT(*) as nb_images ';
		
		if ($this->doitJoindreTableObs($criteres)) {
			$requete_recherche_images .= $this->fabriquerRequeteJointureObs();
			$requete_recherche_images .= ($id_utilisateur != null) ? 'AND ci.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
			
		} else {
			$requete_recherche_images .= 'FROM cel_images ci ';	
			$requete_recherche_images .= ($id_utilisateur != null) ? 'WHERE ci.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
		}
		
		$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);
		
		$requete_recherche_images .= $sous_requete_recherche;
		$nb_images = 0;

		$resultat_requete_nombre_images = Cel::db()->executerRequete($requete_recherche_images);
		
		if($resultat_requete_nombre_images && is_array($resultat_requete_nombre_images) && count($resultat_requete_nombre_images) > 0) {
			$nb_images = $resultat_requete_nombre_images[0]['nb_images'];
		} 
		
		return $nb_images;
	}
	
	private function doitJoindreTableObs($criteres = array()) {
		$criteres_obs = array('zone_geo','ce_zone_geo','taxon','transmission','recherche');
		return count(array_intersect(array_keys($criteres),$criteres_obs)) > 0;	
	}
	
	private function fabriquerRequeteJointureObs() {
		
		$requete_jointure_observations = 'FROM cel_obs_images coi '.
			'INNER JOIN cel_obs co '.
				'ON coi.id_observation = co.id_observation '.
			'INNER JOIN cel_images ci '.
				'ON coi.id_image = ci.id_image '.  
			'WHERE co.ce_utilisateur = ci.ce_utilisateur ';
		
		return $requete_jointure_observations;
	}
	
	public function obtenirInformationsObservationsAssociees($id_utilisateur, $id_image) {
		
		$requete_table_liaison = 'SELECT id_observation FROM cel_obs_images WHERE id_image = '.$id_image;
						
		$resultats_liaisons_images = Cel::db()->executerRequete($requete_table_liaison);

		$ids_obs = '';
		
		foreach($resultats_liaisons_images as $liaison) {				
			$ids_obs .= $liaison['id_observation'].",";	
		}
		$ids_obs = rtrim($ids_obs,',');		
		$infos_obs = '';

		if(trim($ids_obs) != '') {
			$requete_obs_liees = 'SELECT * FROM cel_obs WHERE id_observation IN  ('.$ids_obs.') AND ce_utilisateur ="'.$id_utilisateur.'"';
			$resultat_obs_liees = Cel::db()->executerRequete($requete_obs_liees);

			foreach($resultat_obs_liees as $obs_liee)
			{
				$infos_obs .= $obs_liee['ordre'].'#'.$obs_liee['nom_sel'].'#'.$obs_liee['transmission'].';;' ;
			}
		}
		
		return $infos_obs;
	}
	
	private function fabriquerSousRequeteRecherche($id_utilisateur, $criteres) {
		
		$sous_requete = ' AND ';
		
		foreach($criteres as $nom => $valeur)
		{
			if($valeur == null || trim($nom) == "" || trim($valeur) == "") {
				continue;	
			}
						
			switch($nom) {
				
				case "mots_cles";
					$sous_requete .= $this->creerSousRequeteMotsCles($valeur);  
				break;
				
				case "id_mots_cles";
					$liste_mc = '"'.str_replace(';','","',$valeur).'"';
                    $sous_requete .= '' ;   
                    $sous_requete .= 'id_image IN (SELECT id_image FROM cel_images_mots_cles WHERE id_mot_cle_image IN ('.$liste_mc.'))';
                    $sous_requete .= ' AND ' ;  
				break;
				
				case "commentaire":
					$mots_comment_liste = explode(" " , $valeur) ;
	
					foreach($mots_comment_liste as $mot_comment)
					{
						$mot_comment = trim($mot_comment) ;
						$sous_requete .= 'ci.'.$nom.' LIKE '.Cel::db()->proteger('%'.$mot_comment.'%') ;
						$sous_requete .= ' AND ' ;
					}
				break;
								
				case "annee":
				case "mois":
				case "jour":
					$sous_requete .= $this->fabriquerSousRequeteRechercheDate($nom, $valeur) ;
					$sous_requete .= ' AND ' ;
				break;
					
				case "tampon":
					$ids_tampon = rtrim($valeur, ',') ;
					$sous_requete .= 'ci.id_images IN ( '.Cel::db()->proteger($ids_tampon).')' ;
				break;
						
				case "recherche":
					$sous_requete .= $this->fabriquerSousRequeteRechercheGenerale($id_utilisateur, $valeur);
					$sous_requete .= ' AND ';
				break;
				
				case "transmission":
					$sous_requete .= 'co.transmission = '.Cel::db()->proteger($valeur) ;
					$sous_requete .= ' AND ';
				break;
					
				case "taxon":
					$valeur = str_replace('indetermine','null',$valeur);
					$sous_requete .= ' (';
					$sous_requete .= 'co.nom_ret LIKE '.Cel::db()->proteger($valeur.'%') ;
					$sous_requete .= ' OR ' ;
					$sous_requete .= 'co.nom_sel LIKE '.Cel::db()->proteger($valeur.'%') ;
					$sous_requete .= ') AND ' ; 	
				break;
				
				case "auteur":
					$sous_requete .= '(ci.ce_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').' OR '.
								'ci.courriel_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').' OR '.
								'ci.nom_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').' OR '.
								'ci.prenom_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').
								') AND ';
				break;
				
				case "ce_zone_geo":
					if($valeur == "NULL") {
						$sous_requete .= "(co.ce_zone_geo IS NULL OR co.ce_zone_geo = '')";
					} else {
						$sous_requete .= '(co.ce_zone_geo LIKE '.(is_numeric($valeur) ? Cel::db()->proteger('INSEE-C:'.$valeur.'%') : Cel::db()->proteger($valeur)).') ';
					}
				break;
				
				case "zone_geo":
					if($valeur == "NULL") {
						$sous_requete .= "(co.zone_geo IS NULL OR co.zone_geo = '')";
					} else {
						$sous_requete .= '(co.zone_geo = '.Cel::db()->proteger($valeur).') ';
					}	
				break;
				
				case "famille":
					$sous_requete .= 'co.famille = '.Cel::db()->proteger($valeur) ;
					$sous_requete .= ' AND ' ;
				break;
				
				default:
					$sous_requete .= 'ci.'.$nom.' = '.Cel::db()->proteger($valeur) ;
					$sous_requete .= ' AND ' ;
				break;
			}
		}

		$sous_requete = rtrim($sous_requete,' AND ');
		
		return $sous_requete;
	}
	
	private function fabriquerSousRequeteRechercheGenerale($id_utilisateur, $chaine_recherche) {
		
		if(trim($chaine_recherche) == '') {
			return '';
		}
		
		$chaine_recherche = strtolower($chaine_recherche);
		$chaine_recherche = str_replace(' ','_',$chaine_recherche);
		
		$requete = ' ('.
			'ci.nom_original LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
			'co.nom_ret LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '. 		
			'co.nom_sel LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '. 
			'co.zone_geo LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '. 		
			'co.ce_zone_geo LIKE '.Cel::db()->proteger('%'.$chaine_recherche.'%').' OR '. 	
			//TODO: recherche multicriteres sur mots clés texte ne fonctionne pas à cause de la jointure	
			//'ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$chaine_recherche.'%').' OR '. 
			'ci.ce_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
			'ci.courriel_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
			'ci.nom_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
			'ci.prenom_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' '.
		') ';
		
		return $requete;
	}
	
	private function fabriquerSousRequeteRechercheDate($intervalle, $valeur) {
		
		$correspondance_champ = array('annee' => 'YEAR','mois' => 'MONTH','jour' => 'DAY');
		
		$requete_recherche_date = '';

		if(is_numeric($valeur) && $valeur != "00") { 
			$requete_recherche_date = '('.$correspondance_champ[$intervalle].'(ci.date_prise_de_vue) = '.Cel::db()->proteger($valeur).') ';
		} else {
			$requete_recherche_date = '(ci.date_prise_de_vue IS NULL OR ci.date_prise_de_vue = "0000-00-00")';
		}
							
		return $requete_recherche_date;
	}
   
	private function creerSousRequeteMotsCles($mot_cle) {
	$requete = '';
		if (preg_match('/.*OU.*/', $mot_cle)) {
			$mots_cles_tab = explode('OU',$mot_cle);
			foreach($mots_cles_tab as $mot_cle_item) {
				$requete .= '(ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$mot_cle_item.'%').') OR ';
			}
			$requete = '('.rtrim($requete,'OR ').')';
		} else if (preg_match('/.*ET.*/', $mot_cle)) {
			$mots_cles_tab = explode('ET',$mot_cle);
			foreach($mots_cles_tab as $mot_cle_item) {
				$requete .= '(ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$mot_cle_item.'%').') AND ';
			}
			$requete = '('.rtrim($requete, 'AND ').') ';
		} else {
			$requete = "(ci.mots_cles_texte LIKE ".Cel::db()->proteger('%'.$mot_cle.'%').') ';
		}
		$requete .= ' AND '; 
		return $requete;
	}

    public function formaterPourEnvoiCel(&$tableau_images) {
    	foreach($tableau_images as &$image) {
    		$ids_mots_cles = $this->getIdsMotsClesImage($image['id_image']);
    		$mots_cles_chaine = '';
    		foreach($ids_mots_cles as $id_mot_cle) {
    			$mots_cles_chaine .= $id_mot_cle['id_mot_cle_image'].',';
    		}
    		$mots_cles_chaine = rtrim($mots_cles_chaine,',');
    		$image['mots_cles'] = $mots_cles_chaine;
    	}
    
    	return $tableau_images;
    }
    
    public function obtenirCourrielUtilisateurPourIdImage($id_image) {
	    $requete = 'SELECT courriel_utilisateur FROM cel_images WHERE '.
	    			         'id_image = '.Cel::db()->proteger($id_image);  
	    
	    $utilisateur_courriel = Cel::db()->executerRequete($requete);
	    
	    $retour = false;
	    if(!empty($utilisateur_courriel) && isset($utilisateur_courriel[0]['courriel_utilisateur'])) {
	    	$retour = $utilisateur_courriel[0]['courriel_utilisateur'];
	    }
	    return $retour;
    }
    
    private function getIdsMotsClesImage($id_image) {
    
    	$requete_selection_mots_cles = 'SELECT DISTINCT id_mot_cle_image '.
    									   'FROM cel_images_mots_cles '.
    									   'WHERE id_image = '.$id_image;					   
    
    	return Cel::db()->executerRequete($requete_selection_mots_cles);
    }
	
	// TODO: fonction temporaire
	private function formaterDateSqlVersDateAvecSlash($date_sql) {
		
		$date_formatee = '';
		
		$date = explode("-",$date_sql) ;
		if(count($date) > 2)
		{
			$image['date_prise_de_vue'] = $date[2].'/'.$date[1].'/'.$date[0] ;
		}
		
		return $date_formatee;	
	}
}
?>