Subversion Repositories eFlore/Applications.cel

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
862 aurelien 1 
<?php
2462 jpm 2 
// declare(encoding='UTF-8');
862 aurelien 3 
/**
2462 jpm 4 
 * Classe de recherche d'images à partir de divers critères.
5 
 *
6 
 * @internal   Mininum PHP version : 5.2
7 
 * @category   CEL
8 
 * @package    Services
9 
 * @subpackage Bibliothèques
10 
 * @version    0.1
11 
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
12 
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
13 
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
14 
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
15 
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
16 
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
17 
 */
862 aurelien 18 
class RechercheImage extends Cel {
2725 aurelien 19 
 
3103 killian 20 
	public static $tris_possibles = array(
3113 killian 21 
			// 'ordre', // On désactive ordre qui est le tri par défaut, car ça pédale trop si l'user à trop d'obs
3103 killian 22 
			'taxon',
23 
			'transmission',
2725 aurelien 24 
			'zone_geo',
3103 killian 25 
			'date_prise_de_vue',
26 
			'appareil_fabriquant',
27 
			'note_qualite',
28 
			'nom_original'
2725 aurelien 29 
	);
862 aurelien 30 
 
2450 jpm 31 
	function rechercherImagesEtObservationAssociees($id_utilisateur = null, $criteres = array(), $debut = 0, $limite = 50) {
961 aurelien 32 
		$images_trouvees = $this->rechercherImages($id_utilisateur, $criteres, $debut, $limite);
2143 jpm 33 
 
862 aurelien 34 
		$retour = array();
2450 jpm 35 
		foreach($images_trouvees as $image) {
935 aurelien 36 
			$image['id_observation'] = $this->obtenirInformationsObservationsAssociees($image['ce_utilisateur'],$image['id_image']);
862 aurelien 37 
			$retour[] = $image ;
38 
		}
39 
		return $retour;
40 
	}
3817 delphine 41 
 
42 
 
43 
	// redéfinis en 2020, affiche toutes les infos images et obs à partir d'un join pour n'avoir que les images liées à une obs
44 
	public function rechercherImagesJoinObservation($id_utilisateur = null, $criteres = array(), $debut = 0 , $limite = 50) {
3823 idir 45 
		$ordre = (isset($criteres['tri']) && $criteres['tri']) ? $criteres['tri'] : '';
46 
		unset($criteres['tri']);
47 
		$direction = (isset($criteres['dir']) && $criteres['dir']) ? $criteres['dir'] : 'ASC';
48 
		unset($criteres['dir']);
49 
		$imgUrlTplBase = explode('%', $this->config['settings']['celImgUrlTpl'])[0];
50 
		$debut = ($debut < 0) ? 0 : $debut;
51 
		$requete_recherche_images = 'SELECT ci.`id_image` as id_photo, co.guid,
3818 delphine 52 
`id_observation` as id_obs, `nom_sel`, `nom_sel_nn`, `zone_geo` as localisation, `latitude`, `longitude`,
53 
 `date_observation` as date_obs, `commentaire`, `certitude`, `grade` as fiabilite, programme as projet,
54 
`score_identiplante` as score_ip, `url_identiplante` as url_ip, `validation_identiplante` as est_ip_valide,
55 
 co.mots_cles_texte as tags_obs, `nom_ret`, `nom_ret_nn`, `famille`,`nom_referentiel`, `pays`,
56 
`ce_zone_geo` as code_insee, `dept`, `lieudit`, `station`, `milieu`, `altitude`, `localisation_precision`,
57 
 `localisation_floutage`, `localisation_coherence`, `abondance`, `phenologie`, `spontaneite`,
58 
`type_donnees`, `biblio`, `source`, `herbier`, `determinateur`, `observateur`, `observateur_structure`,
59 
`ce_utilisateur` as id_utilisateur, `courriel_utilisateur` as mail_utilisateur, `pseudo_utilisateur` as nom_utilisateur,
60 
ci.`nom_original`, ci.`date_prise_de_vue` as date_photo, "Creative Commons BY-SA (2.0)" as licence,
61 
concat(`nom_sel`, " par ", `pseudo_utilisateur`, " [CC BY-SA 2.0 FR], via Tela Botanica") as attribution,
3823 idir 62 
 concat("'.$imgUrlTplBase.'", lpad(ci.id_image, 9, "0"), "O") as url_photo, ci.`mots_cles_texte` as tags_photo ';
63 
 
64 
		$requete_recherche_images .= $this->fabriquerRequeteJointureDblObs();
65 
		$requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
66 
 
67 
 
68 
		$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);
69 
		$requete_recherche_images .= $sous_requete_recherche;
70 
 
71 
		if (!empty($ordre)) {
72 
			$requete_recherche_images .= ' ORDER BY '.$ordre.' '.$direction;
73 
		}
74 
		$requete_recherche_images .= ' LIMIT '.$debut.','.$limite;
75 
 
76 
		$resultats_images = array();
77 
		$resultats_images = Cel::db()->requeter($requete_recherche_images);
78 
 
79 
		return $resultats_images;
3817 delphine 80 
	}
862 aurelien 81 
 
961 aurelien 82 
	public function rechercherImages($id_utilisateur = null, $criteres = array(), $debut = 0 , $limite = 50) {
3103 killian 83 
		$ordre = (isset($criteres['tri']) && $criteres['tri']) ? $criteres['tri'] : '';
1395 aurelien 84 
		unset($criteres['tri']);
85 
		$direction = (isset($criteres['dir']) && $criteres['dir']) ? $criteres['dir'] : 'ASC';
86 
		unset($criteres['dir']);
2143 jpm 87 
 
1366 aurelien 88 
		$debut = ($debut < 0) ? 0 : $debut;
3809 delphine 89 
		$requete_recherche_images = 'SELECT ci.*, co.pseudo_utilisateur ';
935 aurelien 90 
 
3809 delphine 91 
		$requete_recherche_images .= $this->fabriquerRequeteJointureObs();
92 
		$requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
93 
 
2143 jpm 94 
 
862 aurelien 95 
		$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);
96 
		$requete_recherche_images .= $sous_requete_recherche;
2143 jpm 97 
 
3103 killian 98 
		if (!empty($ordre)) {
99 
			$requete_recherche_images .= ' ORDER BY '.$ordre.' '.$direction;
100 
		}
101 
		$requete_recherche_images .= ' LIMIT '.$debut.','.$limite;
1366 aurelien 102 
 
862 aurelien 103 
		$resultats_images = array();
2143 jpm 104 
		$resultats_images = Cel::db()->requeter($requete_recherche_images);
105 
 
862 aurelien 106 
		return $resultats_images;
107 
	}
2143 jpm 108 
 
935 aurelien 109 
	public function compterImages($id_utilisateur = null, $criteres = array()) {
2449 jpm 110 
		$requete_recherche_images = 'SELECT COUNT(*) AS nb_images ';
2143 jpm 111 
 
3809 delphine 112 
		$requete_recherche_images .= $this->fabriquerRequeteJointureObs();
113 
		$requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
114 
 
862 aurelien 115 
		$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);
2143 jpm 116 
 
862 aurelien 117 
		$requete_recherche_images .= $sous_requete_recherche;
118 
		$nb_images = 0;
1327 aurelien 119 
 
2143 jpm 120 
		$resultat_requete_nombre_images = Cel::db()->requeter($requete_recherche_images);
121 
 
2450 jpm 122 
		if ($resultat_requete_nombre_images && is_array($resultat_requete_nombre_images) && count($resultat_requete_nombre_images) > 0) {
862 aurelien 123 
			$nb_images = $resultat_requete_nombre_images[0]['nb_images'];
2143 jpm 124 
		}
3821 delphine 125 
 
862 aurelien 126 
		return $nb_images;
127 
	}
2143 jpm 128 
 
2725 aurelien 129 
	private function doitJoindreTableObs($criteres = array(), $tri = "") {
130 
		$tris_obs = array('nom_sel','transmission','zone_geo');
935 aurelien 131 
		$criteres_obs = array('zone_geo','ce_zone_geo','taxon','transmission','recherche');
2725 aurelien 132 
		return count(array_intersect(array_keys($criteres),$criteres_obs)) > 0 ||
133 
				(!empty($tri) && in_array($tri, $tris_obs));
935 aurelien 134 
	}
2143 jpm 135 
 
935 aurelien 136 
	private function fabriquerRequeteJointureObs() {
3804 delphine 137 
		$requete = 'FROM cel_images_export ci '.
138 
			'LEFT JOIN cel_export_total co '.
2446 jpm 139 
				'ON ci.ce_observation = co.id_observation '.
2255 aurelien 140 
			'WHERE 1 ';
2446 jpm 141 
		return $requete;
935 aurelien 142 
	}
3817 delphine 143 
 
144 
	private function fabriquerRequeteJointureDblObs() {
3823 idir 145 
		$requete = 'FROM cel_images_export ci '.
146 
			'JOIN cel_export_total co '.
147 
			'ON ci.ce_observation = co.id_observation '.
148 
			'WHERE 1 ';
149 
		return $requete;
3817 delphine 150 
	}
2143 jpm 151 
 
862 aurelien 152 
	public function obtenirInformationsObservationsAssociees($id_utilisateur, $id_image) {
3804 delphine 153 
		$requete = 'SELECT ce_observation FROM cel_images_export WHERE id_image = '.$id_image;
2446 jpm 154 
		$resultats = Cel::db()->requeter($requete);
2143 jpm 155 
 
2446 jpm 156 
		$idsObsListe = array();
157 
		foreach ($resultats as $liaison) {
158 
			$idsObsListe[] = $liaison['ce_observation'];
159 
		}
160 
		$ids_obs = implode(',', $idsObsListe);
862 aurelien 161 
 
162 
		$infos_obs = '';
2446 jpm 163 
		if (trim($ids_obs) != '') {
3804 delphine 164 
			$requete = 'SELECT * FROM cel_export_total WHERE id_observation IN ('.$ids_obs.') AND ce_utilisateur = "'.$id_utilisateur.'"';
2446 jpm 165 
			$resultats = Cel::db()->requeter($requete);
862 aurelien 166 
 
2446 jpm 167 
			foreach ($resultats as $obs_liee) {
862 aurelien 168 
				$infos_obs .= $obs_liee['ordre'].'#'.$obs_liee['nom_sel'].'#'.$obs_liee['transmission'].';;' ;
169 
			}
170 
		}
171 
		return $infos_obs;
172 
	}
2143 jpm 173 
 
862 aurelien 174 
	private function fabriquerSousRequeteRecherche($id_utilisateur, $criteres) {
175 
		$sous_requete = ' AND ';
2462 jpm 176 
		foreach ($criteres as $nom => $valeur) {
177 
			if ($valeur == null || trim($nom) == "" || trim($valeur) == "") {
2143 jpm 178 
				continue;
862 aurelien 179 
			}
2143 jpm 180 
 
2462 jpm 181 
			switch ($nom) {
2446 jpm 182 
				case "id_image";
2209 aurelien 183 
					$sous_requete .= 'ci.id_image = '.Cel::db()->proteger($valeur) ;
2446 jpm 184 
					$sous_requete .= ' AND ';
185 
					break;
862 aurelien 186 
				case "mots_cles";
2143 jpm 187 
					$sous_requete .= $this->creerSousRequeteMotsCles($valeur);
2446 jpm 188 
					break;
961 aurelien 189 
				case "id_mots_cles";
190 
					$liste_mc = '"'.str_replace(';','","',$valeur).'"';
2060 aurelien 191 
					$tpl_sous_requete = GestionMotsClesChemin::obtenirTemplateRequeteMotsClesIds('images');
2059 aurelien 192 
					$sous_requete .= 'id_image IN ('.sprintf($tpl_sous_requete, $liste_mc).')';
193 
					$sous_requete .= ' AND ' ;
2446 jpm 194 
					break;
862 aurelien 195 
				case "commentaire":
930 aurelien 196 
					$mots_comment_liste = explode(" " , $valeur) ;
2143 jpm 197 
 
2446 jpm 198 
					foreach($mots_comment_liste as $mot_comment) {
862 aurelien 199 
						$mot_comment = trim($mot_comment) ;
1765 raphael 200 
						$sous_requete .= 'ci.'.$nom.' LIKE '.Cel::db()->proteger('%'.$mot_comment.'%') ;
862 aurelien 201 
						$sous_requete .= ' AND ' ;
202 
					}
2446 jpm 203 
					break;
862 aurelien 204 
				case "annee":
205 
				case "mois":
206 
				case "jour":
930 aurelien 207 
					$sous_requete .= $this->fabriquerSousRequeteRechercheDate($nom, $valeur) ;
862 aurelien 208 
					$sous_requete .= ' AND ' ;
2450 jpm 209 
					break;
862 aurelien 210 
				case "tampon":
930 aurelien 211 
					$ids_tampon = rtrim($valeur, ',') ;
1765 raphael 212 
					$sous_requete .= 'ci.id_images IN ( '.Cel::db()->proteger($ids_tampon).')' ;
2450 jpm 213 
					break;
935 aurelien 214 
				case "recherche":
930 aurelien 215 
					$sous_requete .= $this->fabriquerSousRequeteRechercheGenerale($id_utilisateur, $valeur);
862 aurelien 216 
					$sous_requete .= ' AND ';
2450 jpm 217 
					break;
935 aurelien 218 
				case "transmission":
1765 raphael 219 
					$sous_requete .= 'co.transmission = '.Cel::db()->proteger($valeur) ;
935 aurelien 220 
					$sous_requete .= ' AND ';
2450 jpm 221 
					break;
3817 delphine 222 
				case "standard":
3823 idir 223 
					$sous_requete .= 'co.donnees_standard = '.Cel::db()->proteger($valeur) ;
224 
					$sous_requete .= ' AND ';
225 
					break;
935 aurelien 226 
				case "taxon":
227 
					$valeur = str_replace('indetermine','null',$valeur);
228 
					$sous_requete .= ' (';
1765 raphael 229 
					$sous_requete .= 'co.nom_ret LIKE '.Cel::db()->proteger($valeur.'%') ;
935 aurelien 230 
					$sous_requete .= ' OR ' ;
1765 raphael 231 
					$sous_requete .= 'co.nom_sel LIKE '.Cel::db()->proteger($valeur.'%') ;
2143 jpm 232 
					$sous_requete .= ') AND ' ;
2450 jpm 233 
					break;
1279 aurelien 234 
				case "auteur":
3809 delphine 235 
					$sous_requete .= '(co.ce_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').' OR '.
236 
								'co.courriel_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').' OR '.
237 
								'co.pseudo_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').
1279 aurelien 238 
								') AND ';
2450 jpm 239 
					break;
1279 aurelien 240 
				case "ce_zone_geo":
1332 aurelien 241 
					if($valeur == "NULL") {
242 
						$sous_requete .= "(co.ce_zone_geo IS NULL OR co.ce_zone_geo = '')";
243 
					} else {
1765 raphael 244 
						$sous_requete .= '(co.ce_zone_geo LIKE '.(is_numeric($valeur) ? Cel::db()->proteger('INSEE-C:'.$valeur.'%') : Cel::db()->proteger($valeur)).') ';
1332 aurelien 245 
					}
2450 jpm 246 
					break;
1279 aurelien 247 
				case "zone_geo":
1332 aurelien 248 
					if($valeur == "NULL") {
249 
						$sous_requete .= "(co.zone_geo IS NULL OR co.zone_geo = '')";
250 
					} else {
1765 raphael 251 
						$sous_requete .= '(co.zone_geo = '.Cel::db()->proteger($valeur).') ';
2143 jpm 252 
					}
2450 jpm 253 
					break;
1366 aurelien 254 
				case "famille":
1765 raphael 255 
					$sous_requete .= 'co.famille = '.Cel::db()->proteger($valeur) ;
1366 aurelien 256 
					$sous_requete .= ' AND ' ;
2450 jpm 257 
					break;
3821 delphine 258 
				case "tri":
3823 idir 259 
					break;
3821 delphine 260 
				case "dir":
3823 idir 261 
					break;
862 aurelien 262 
				default:
1765 raphael 263 
					$sous_requete .= 'ci.'.$nom.' = '.Cel::db()->proteger($valeur) ;
930 aurelien 264 
					$sous_requete .= ' AND ' ;
2450 jpm 265 
					break;
862 aurelien 266 
			}
267 
		}
268 
		$sous_requete = rtrim($sous_requete,' AND ');
269 
		return $sous_requete;
270 
	}
2143 jpm 271 
 
862 aurelien 272 
	private function fabriquerSousRequeteRechercheGenerale($id_utilisateur, $chaine_recherche) {
2450 jpm 273 
		if (trim($chaine_recherche) == '') {
935 aurelien 274 
			return '';
275 
		}
276 
		$chaine_recherche = strtolower($chaine_recherche);
277 
		$chaine_recherche = str_replace(' ','_',$chaine_recherche);
1311 aurelien 278 
		$requete = ' ('.
1765 raphael 279 
			'ci.nom_original LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
2143 jpm 280 
			'co.nom_ret LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
281 
			'co.nom_sel LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
282 
			'co.zone_geo LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
283 
			'co.ce_zone_geo LIKE '.Cel::db()->proteger('%'.$chaine_recherche.'%').' OR '.
284 
			//TODO: recherche multicriteres sur mots clés texte ne fonctionne pas à cause de la jointure
285 
			//'ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$chaine_recherche.'%').' OR '.
3809 delphine 286 
			'co.ce_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
287 
			'co.courriel_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
288 
			'co.pseudo_utilisateur  LIKE '.Cel::db()->proteger($chaine_recherche.'%').' '.
1279 aurelien 289 
		') ';
935 aurelien 290 
		return $requete;
862 aurelien 291 
	}
2143 jpm 292 
 
862 aurelien 293 
	private function fabriquerSousRequeteRechercheDate($intervalle, $valeur) {
294 
		$correspondance_champ = array('annee' => 'YEAR','mois' => 'MONTH','jour' => 'DAY');
295 
		$requete_recherche_date = '';
296 
 
2450 jpm 297 
		if (is_numeric($valeur) && $valeur != "00") {
1765 raphael 298 
			$requete_recherche_date = '('.$correspondance_champ[$intervalle].'(ci.date_prise_de_vue) = '.Cel::db()->proteger($valeur).') ';
862 aurelien 299 
		} else {
935 aurelien 300 
			$requete_recherche_date = '(ci.date_prise_de_vue IS NULL OR ci.date_prise_de_vue = "0000-00-00")';
862 aurelien 301 
		}
2143 jpm 302 
 
862 aurelien 303 
		return $requete_recherche_date;
304 
	}
2143 jpm 305 
 
1386 aurelien 306 
	private function creerSousRequeteMotsCles($mot_cle) {
2462 jpm 307 
		//TODO: une requête plus efficace serait possible en utilisant
308 
		// les vraies tables de mots clés et en faisant disparaitre ce champ maudit
309 
		$requete = '';
1386 aurelien 310 
		if (preg_match('/.*OU.*/', $mot_cle)) {
311 
			$mots_cles_tab = explode('OU',$mot_cle);
2462 jpm 312 
			foreach ($mots_cles_tab as $mot_cle_item) {
1765 raphael 313 
				$requete .= '(ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$mot_cle_item.'%').') OR ';
1386 aurelien 314 
			}
315 
			$requete = '('.rtrim($requete,'OR ').')';
316 
		} else if (preg_match('/.*ET.*/', $mot_cle)) {
317 
			$mots_cles_tab = explode('ET',$mot_cle);
2462 jpm 318 
			foreach ($mots_cles_tab as $mot_cle_item) {
1765 raphael 319 
				$requete .= '(ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$mot_cle_item.'%').') AND ';
1386 aurelien 320 
			}
321 
			$requete = '('.rtrim($requete, 'AND ').') ';
322 
		} else {
1765 raphael 323 
			$requete = "(ci.mots_cles_texte LIKE ".Cel::db()->proteger('%'.$mot_cle.'%').') ';
1386 aurelien 324 
		}
2143 jpm 325 
		$requete .= ' AND ';
1386 aurelien 326 
		return $requete;
327 
	}
1016 aurelien 328 
 
2450 jpm 329 
	public function formaterPourEnvoiCel(&$tableau_images) {
330 
		foreach ($tableau_images as &$image) {
331 
			$ids_mots_cles = $this->getIdsMotsClesImage($image['id_image']);
332 
			$mots_cles_chaine = '';
333 
			foreach ($ids_mots_cles as $id_mot_cle) {
334 
				$mots_cles_chaine .= $id_mot_cle['id_mot_cle'].',';
335 
			}
336 
			$mots_cles_chaine = rtrim($mots_cles_chaine,',');
337 
			$image['mots_cles'] = $mots_cles_chaine;
338 
		}
339 
		return $tableau_images;
340 
	}
2143 jpm 341 
 
2450 jpm 342 
	public function obtenirCourrielUtilisateurPourIdImage($id_image) {
2462 jpm 343 
		$idImageP = Cel::db()->proteger($id_image);
344 
		$requete = 'SELECT courriel_utilisateur '.
3804 delphine 345 
			'FROM cel_images_export '.
2462 jpm 346 
			"WHERE id_image = $idImageP ".
347 
			' -- '.__FILE__.':'.__LINE__;
2450 jpm 348 
		$utilisateur_courriel = Cel::db()->requeter($requete);
2143 jpm 349 
 
2450 jpm 350 
		$retour = false;
351 
		if (!empty($utilisateur_courriel) && isset($utilisateur_courriel[0]['courriel_utilisateur'])) {
352 
			$retour = $utilisateur_courriel[0]['courriel_utilisateur'];
353 
		}
354 
		return $retour;
355 
	}
2143 jpm 356 
 
2450 jpm 357 
	private function getIdsMotsClesImage($id_image) {
3804 delphine 358 
		$requete = 'SELECT DISTINCT photo_tag_id '.
359 
			'FROM photo_tag_photo '.
360 
			"WHERE photo_id = $id_image ".
2462 jpm 361 
			' -- '.__FILE__.':'.__LINE__;
2450 jpm 362 
		return Cel::db()->requeter($requete);
363 
	}
3103 killian 364 
}