Subversion Repositories eFlore/Applications.cel

Rev

Rev 3926 | Rev 3929 | Go to most recent revision | Details | Compare with Previous | 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) {
3828 delphine 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
 
51
	    $debut = ($debut < 0) ? 0 : $debut;
52
	    $requete_recherche_images = 'SELECT ci.`id_image` as id_photo, co.guid,
3818 delphine 53
`id_observation` as id_obs, `nom_sel`, `nom_sel_nn`, `zone_geo` as localisation, `latitude`, `longitude`,
54
 `date_observation` as date_obs, `commentaire`, `certitude`, `grade` as fiabilite, programme as projet,
55
`score_identiplante` as score_ip, `url_identiplante` as url_ip, `validation_identiplante` as est_ip_valide,
56
 co.mots_cles_texte as tags_obs, `nom_ret`, `nom_ret_nn`, `famille`,`nom_referentiel`, `pays`,
57
`ce_zone_geo` as code_insee, `dept`, `lieudit`, `station`, `milieu`, `altitude`, `localisation_precision`,
58
 `localisation_floutage`, `localisation_coherence`, `abondance`, `phenologie`, `spontaneite`,
59
`type_donnees`, `biblio`, `source`, `herbier`, `determinateur`, `observateur`, `observateur_structure`,
60
`ce_utilisateur` as id_utilisateur, `courriel_utilisateur` as mail_utilisateur, `pseudo_utilisateur` as nom_utilisateur,
61
ci.`nom_original`, ci.`date_prise_de_vue` as date_photo, "Creative Commons BY-SA (2.0)" as licence,
62
concat(`nom_sel`, " par ", `pseudo_utilisateur`, " [CC BY-SA 2.0 FR], via Tela Botanica") as attribution,
3828 delphine 63
 concat("'.$imgUrlTplBase.'", lpad(ci.id_image, 9, "0"), "O,") as url_photo, ci.`mots_cles_texte` as tags_photo ';
64
 
65
	    $requete_recherche_images .= $this->fabriquerRequeteJointureDblObs();
66
	    $requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
67
 
68
 
69
	    $sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);
70
	    $requete_recherche_images .= $sous_requete_recherche;
71
 
72
	    if (!empty($ordre)) {
73
	        $requete_recherche_images .= ' ORDER BY '.$ordre.' '.$direction;
74
	    }
75
	    $requete_recherche_images .= ' LIMIT '.$debut.','.$limite;
76
 
77
	    $resultats_images = array();
78
	    $resultats_images = Cel::db()->requeter($requete_recherche_images);
79
 
80
	    return $resultats_images;
3817 delphine 81
	}
862 aurelien 82
 
961 aurelien 83
	public function rechercherImages($id_utilisateur = null, $criteres = array(), $debut = 0 , $limite = 50) {
3103 killian 84
		$ordre = (isset($criteres['tri']) && $criteres['tri']) ? $criteres['tri'] : '';
1395 aurelien 85
		unset($criteres['tri']);
86
		$direction = (isset($criteres['dir']) && $criteres['dir']) ? $criteres['dir'] : 'ASC';
87
		unset($criteres['dir']);
2143 jpm 88
 
1366 aurelien 89
		$debut = ($debut < 0) ? 0 : $debut;
3809 delphine 90
		$requete_recherche_images = 'SELECT ci.*, co.pseudo_utilisateur ';
935 aurelien 91
 
3809 delphine 92
		$requete_recherche_images .= $this->fabriquerRequeteJointureObs();
93
		$requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
94
 
2143 jpm 95
 
862 aurelien 96
		$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);
97
		$requete_recherche_images .= $sous_requete_recherche;
2143 jpm 98
 
3103 killian 99
		if (!empty($ordre)) {
100
			$requete_recherche_images .= ' ORDER BY '.$ordre.' '.$direction;
101
		}
102
		$requete_recherche_images .= ' LIMIT '.$debut.','.$limite;
1366 aurelien 103
 
862 aurelien 104
		$resultats_images = array();
2143 jpm 105
		$resultats_images = Cel::db()->requeter($requete_recherche_images);
106
 
862 aurelien 107
		return $resultats_images;
108
	}
2143 jpm 109
 
935 aurelien 110
	public function compterImages($id_utilisateur = null, $criteres = array()) {
2449 jpm 111
		$requete_recherche_images = 'SELECT COUNT(*) AS nb_images ';
2143 jpm 112
 
3809 delphine 113
		$requete_recherche_images .= $this->fabriquerRequeteJointureObs();
114
		$requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';
115
 
862 aurelien 116
		$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);
2143 jpm 117
 
862 aurelien 118
		$requete_recherche_images .= $sous_requete_recherche;
119
		$nb_images = 0;
1327 aurelien 120
 
2143 jpm 121
		$resultat_requete_nombre_images = Cel::db()->requeter($requete_recherche_images);
122
 
2450 jpm 123
		if ($resultat_requete_nombre_images && is_array($resultat_requete_nombre_images) && count($resultat_requete_nombre_images) > 0) {
862 aurelien 124
			$nb_images = $resultat_requete_nombre_images[0]['nb_images'];
2143 jpm 125
		}
3821 delphine 126
 
862 aurelien 127
		return $nb_images;
128
	}
2143 jpm 129
 
2725 aurelien 130
	private function doitJoindreTableObs($criteres = array(), $tri = "") {
131
		$tris_obs = array('nom_sel','transmission','zone_geo');
935 aurelien 132
		$criteres_obs = array('zone_geo','ce_zone_geo','taxon','transmission','recherche');
2725 aurelien 133
		return count(array_intersect(array_keys($criteres),$criteres_obs)) > 0 ||
134
				(!empty($tri) && in_array($tri, $tris_obs));
935 aurelien 135
	}
2143 jpm 136
 
935 aurelien 137
	private function fabriquerRequeteJointureObs() {
3804 delphine 138
		$requete = 'FROM cel_images_export ci '.
139
			'LEFT JOIN cel_export_total co '.
2446 jpm 140
				'ON ci.ce_observation = co.id_observation '.
2255 aurelien 141
			'WHERE 1 ';
2446 jpm 142
		return $requete;
935 aurelien 143
	}
3817 delphine 144
 
145
	private function fabriquerRequeteJointureDblObs() {
3828 delphine 146
	    $requete = 'FROM cel_images_export ci '.
147
	   	    'JOIN cel_export_total co '.
148
	   	    'ON ci.ce_observation = co.id_observation '.
149
	   	    'WHERE 1 ';
150
	    return $requete;
3817 delphine 151
	}
2143 jpm 152
 
862 aurelien 153
	public function obtenirInformationsObservationsAssociees($id_utilisateur, $id_image) {
3804 delphine 154
		$requete = 'SELECT ce_observation FROM cel_images_export WHERE id_image = '.$id_image;
2446 jpm 155
		$resultats = Cel::db()->requeter($requete);
2143 jpm 156
 
2446 jpm 157
		$idsObsListe = array();
158
		foreach ($resultats as $liaison) {
159
			$idsObsListe[] = $liaison['ce_observation'];
160
		}
161
		$ids_obs = implode(',', $idsObsListe);
862 aurelien 162
 
163
		$infos_obs = '';
2446 jpm 164
		if (trim($ids_obs) != '') {
3804 delphine 165
			$requete = 'SELECT * FROM cel_export_total WHERE id_observation IN ('.$ids_obs.') AND ce_utilisateur = "'.$id_utilisateur.'"';
2446 jpm 166
			$resultats = Cel::db()->requeter($requete);
862 aurelien 167
 
2446 jpm 168
			foreach ($resultats as $obs_liee) {
862 aurelien 169
				$infos_obs .= $obs_liee['ordre'].'#'.$obs_liee['nom_sel'].'#'.$obs_liee['transmission'].';;' ;
170
			}
171
		}
172
		return $infos_obs;
173
	}
2143 jpm 174
 
862 aurelien 175
	private function fabriquerSousRequeteRecherche($id_utilisateur, $criteres) {
176
		$sous_requete = ' AND ';
2462 jpm 177
		foreach ($criteres as $nom => $valeur) {
178
			if ($valeur == null || trim($nom) == "" || trim($valeur) == "") {
2143 jpm 179
				continue;
862 aurelien 180
			}
2143 jpm 181
 
2462 jpm 182
			switch ($nom) {
2446 jpm 183
				case "id_image";
2209 aurelien 184
					$sous_requete .= 'ci.id_image = '.Cel::db()->proteger($valeur) ;
2446 jpm 185
					$sous_requete .= ' AND ';
186
					break;
862 aurelien 187
				case "mots_cles";
2143 jpm 188
					$sous_requete .= $this->creerSousRequeteMotsCles($valeur);
2446 jpm 189
					break;
961 aurelien 190
				case "id_mots_cles";
191
					$liste_mc = '"'.str_replace(';','","',$valeur).'"';
2060 aurelien 192
					$tpl_sous_requete = GestionMotsClesChemin::obtenirTemplateRequeteMotsClesIds('images');
2059 aurelien 193
					$sous_requete .= 'id_image IN ('.sprintf($tpl_sous_requete, $liste_mc).')';
194
					$sous_requete .= ' AND ' ;
2446 jpm 195
					break;
862 aurelien 196
				case "commentaire":
930 aurelien 197
					$mots_comment_liste = explode(" " , $valeur) ;
2143 jpm 198
 
2446 jpm 199
					foreach($mots_comment_liste as $mot_comment) {
862 aurelien 200
						$mot_comment = trim($mot_comment) ;
1765 raphael 201
						$sous_requete .= 'ci.'.$nom.' LIKE '.Cel::db()->proteger('%'.$mot_comment.'%') ;
862 aurelien 202
						$sous_requete .= ' AND ' ;
203
					}
2446 jpm 204
					break;
862 aurelien 205
				case "annee":
206
				case "mois":
207
				case "jour":
930 aurelien 208
					$sous_requete .= $this->fabriquerSousRequeteRechercheDate($nom, $valeur) ;
862 aurelien 209
					$sous_requete .= ' AND ' ;
2450 jpm 210
					break;
862 aurelien 211
				case "tampon":
930 aurelien 212
					$ids_tampon = rtrim($valeur, ',') ;
1765 raphael 213
					$sous_requete .= 'ci.id_images IN ( '.Cel::db()->proteger($ids_tampon).')' ;
2450 jpm 214
					break;
935 aurelien 215
				case "recherche":
930 aurelien 216
					$sous_requete .= $this->fabriquerSousRequeteRechercheGenerale($id_utilisateur, $valeur);
862 aurelien 217
					$sous_requete .= ' AND ';
2450 jpm 218
					break;
935 aurelien 219
				case "transmission":
1765 raphael 220
					$sous_requete .= 'co.transmission = '.Cel::db()->proteger($valeur) ;
935 aurelien 221
					$sous_requete .= ' AND ';
2450 jpm 222
					break;
3817 delphine 223
				case "standard":
3828 delphine 224
				    $sous_requete .= 'co.donnees_standard = '.Cel::db()->proteger($valeur) ;
225
				    $sous_requete .= ' AND ';
226
				    break;
227
				case "referentiel":
3927 delphine 228
				    $sous_requete .= 'co.nom_referentiel = '.Cel::db()->proteger($valeur) ;
3828 delphine 229
				    $sous_requete .= ' AND ';
230
				    break;
935 aurelien 231
				case "taxon":
232
					$valeur = str_replace('indetermine','null',$valeur);
233
					$sous_requete .= ' (';
1765 raphael 234
					$sous_requete .= 'co.nom_ret LIKE '.Cel::db()->proteger($valeur.'%') ;
935 aurelien 235
					$sous_requete .= ' OR ' ;
1765 raphael 236
					$sous_requete .= 'co.nom_sel LIKE '.Cel::db()->proteger($valeur.'%') ;
2143 jpm 237
					$sous_requete .= ') AND ' ;
2450 jpm 238
					break;
1279 aurelien 239
				case "auteur":
3828 delphine 240
				    if (is_numeric($valeur)) {
241
					   $sous_requete .= 'co.ce_utilisateur = '.Cel::db()->proteger($valeur).' AND ';
242
				    } elseif (strpos($valeur, '@') !== false) {
243
				        $sous_requete .= 'co.courriel_utilisateur = '.Cel::db()->proteger($valeur).
244
								        ' AND ';
245
				    } else {
246
				        $sous_requete .= 'co.pseudo_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').
247
								        ' AND ';
248
				    }
2450 jpm 249
					break;
1279 aurelien 250
				case "ce_zone_geo":
3828 delphine 251
					if($valeur !== "NULL") {
252
					    $depts = explode(",", $valeur);
253
					    if (count($depts) == 1) {
254
						  $sous_requete .= '(co.ce_zone_geo = '. Cel::db()->proteger($valeur).') ';
255
					    } else {
256
					        $sous_requete .= '(co.dept in ('.$valeur.')) ';
257
					    }
1332 aurelien 258
					}
2450 jpm 259
					break;
1279 aurelien 260
				case "zone_geo":
3828 delphine 261
					if($valeur !== "NULL") {
1765 raphael 262
						$sous_requete .= '(co.zone_geo = '.Cel::db()->proteger($valeur).') ';
2143 jpm 263
					}
2450 jpm 264
					break;
3828 delphine 265
				case "pays":
266
				    if($valeur !== "NULL") {
267
				        $sous_requete .= '(co.pays like '.Cel::db()->proteger($valeur.'%').') ';
268
				    }
269
				    break;
1366 aurelien 270
				case "famille":
1765 raphael 271
					$sous_requete .= 'co.famille = '.Cel::db()->proteger($valeur) ;
1366 aurelien 272
					$sous_requete .= ' AND ' ;
2450 jpm 273
					break;
3828 delphine 274
				case "programme":
275
				    if($valeur !== "NULL") {
276
				        $sous_requete .= '(co.programme = '.Cel::db()->proteger($valeur).') ';
277
				    }
278
				    break;
3821 delphine 279
				case "tri":
3828 delphine 280
				    break;
3821 delphine 281
				case "dir":
3828 delphine 282
				    break;
862 aurelien 283
				default:
1765 raphael 284
					$sous_requete .= 'ci.'.$nom.' = '.Cel::db()->proteger($valeur) ;
930 aurelien 285
					$sous_requete .= ' AND ' ;
2450 jpm 286
					break;
862 aurelien 287
			}
288
		}
289
		$sous_requete = rtrim($sous_requete,' AND ');
290
		return $sous_requete;
291
	}
2143 jpm 292
 
862 aurelien 293
	private function fabriquerSousRequeteRechercheGenerale($id_utilisateur, $chaine_recherche) {
2450 jpm 294
		if (trim($chaine_recherche) == '') {
935 aurelien 295
			return '';
296
		}
297
		$chaine_recherche = strtolower($chaine_recherche);
298
		$chaine_recherche = str_replace(' ','_',$chaine_recherche);
1311 aurelien 299
		$requete = ' ('.
1765 raphael 300
			'ci.nom_original LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
2143 jpm 301
			'co.nom_ret LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
302
			'co.nom_sel LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
303
			'co.zone_geo LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
304
			'co.ce_zone_geo LIKE '.Cel::db()->proteger('%'.$chaine_recherche.'%').' OR '.
305
			//TODO: recherche multicriteres sur mots clés texte ne fonctionne pas à cause de la jointure
306
			//'ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$chaine_recherche.'%').' OR '.
3809 delphine 307
			'co.ce_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
308
			'co.courriel_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.
309
			'co.pseudo_utilisateur  LIKE '.Cel::db()->proteger($chaine_recherche.'%').' '.
1279 aurelien 310
		') ';
935 aurelien 311
		return $requete;
862 aurelien 312
	}
2143 jpm 313
 
862 aurelien 314
	private function fabriquerSousRequeteRechercheDate($intervalle, $valeur) {
315
		$correspondance_champ = array('annee' => 'YEAR','mois' => 'MONTH','jour' => 'DAY');
316
		$requete_recherche_date = '';
317
 
2450 jpm 318
		if (is_numeric($valeur) && $valeur != "00") {
1765 raphael 319
			$requete_recherche_date = '('.$correspondance_champ[$intervalle].'(ci.date_prise_de_vue) = '.Cel::db()->proteger($valeur).') ';
862 aurelien 320
		} else {
935 aurelien 321
			$requete_recherche_date = '(ci.date_prise_de_vue IS NULL OR ci.date_prise_de_vue = "0000-00-00")';
862 aurelien 322
		}
2143 jpm 323
 
862 aurelien 324
		return $requete_recherche_date;
325
	}
2143 jpm 326
 
1386 aurelien 327
	private function creerSousRequeteMotsCles($mot_cle) {
2462 jpm 328
		//TODO: une requête plus efficace serait possible en utilisant
329
		// les vraies tables de mots clés et en faisant disparaitre ce champ maudit
330
		$requete = '';
1386 aurelien 331
		if (preg_match('/.*OU.*/', $mot_cle)) {
332
			$mots_cles_tab = explode('OU',$mot_cle);
2462 jpm 333
			foreach ($mots_cles_tab as $mot_cle_item) {
1765 raphael 334
				$requete .= '(ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$mot_cle_item.'%').') OR ';
1386 aurelien 335
			}
336
			$requete = '('.rtrim($requete,'OR ').')';
337
		} else if (preg_match('/.*ET.*/', $mot_cle)) {
338
			$mots_cles_tab = explode('ET',$mot_cle);
2462 jpm 339
			foreach ($mots_cles_tab as $mot_cle_item) {
1765 raphael 340
				$requete .= '(ci.mots_cles_texte LIKE '.Cel::db()->proteger('%'.$mot_cle_item.'%').') AND ';
1386 aurelien 341
			}
342
			$requete = '('.rtrim($requete, 'AND ').') ';
343
		} else {
3926 delphine 344
			$requete = "(ci.mots_cles_texte LIKE ".Cel::db()->proteger('%'.$mot_cle.'%').') ';
1386 aurelien 345
		}
2143 jpm 346
		$requete .= ' AND ';
1386 aurelien 347
		return $requete;
348
	}
1016 aurelien 349
 
2450 jpm 350
	public function formaterPourEnvoiCel(&$tableau_images) {
351
		foreach ($tableau_images as &$image) {
352
			$ids_mots_cles = $this->getIdsMotsClesImage($image['id_image']);
353
			$mots_cles_chaine = '';
354
			foreach ($ids_mots_cles as $id_mot_cle) {
355
				$mots_cles_chaine .= $id_mot_cle['id_mot_cle'].',';
356
			}
357
			$mots_cles_chaine = rtrim($mots_cles_chaine,',');
358
			$image['mots_cles'] = $mots_cles_chaine;
359
		}
360
		return $tableau_images;
361
	}
2143 jpm 362
 
2450 jpm 363
	public function obtenirCourrielUtilisateurPourIdImage($id_image) {
2462 jpm 364
		$idImageP = Cel::db()->proteger($id_image);
365
		$requete = 'SELECT courriel_utilisateur '.
3804 delphine 366
			'FROM cel_images_export '.
2462 jpm 367
			"WHERE id_image = $idImageP ".
368
			' -- '.__FILE__.':'.__LINE__;
2450 jpm 369
		$utilisateur_courriel = Cel::db()->requeter($requete);
2143 jpm 370
 
2450 jpm 371
		$retour = false;
372
		if (!empty($utilisateur_courriel) && isset($utilisateur_courriel[0]['courriel_utilisateur'])) {
373
			$retour = $utilisateur_courriel[0]['courriel_utilisateur'];
374
		}
375
		return $retour;
376
	}
2143 jpm 377
 
2450 jpm 378
	private function getIdsMotsClesImage($id_image) {
3804 delphine 379
		$requete = 'SELECT DISTINCT photo_tag_id '.
380
			'FROM photo_tag_photo '.
381
			"WHERE photo_id = $id_image ".
2462 jpm 382
			' -- '.__FILE__.':'.__LINE__;
2450 jpm 383
		return Cel::db()->requeter($requete);
384
	}
3103 killian 385
}