Rev 3828 | Rev 3927 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php// declare(encoding='UTF-8');/*** Classe de recherche d'images à partir de divers critères.** @internal Mininum PHP version : 5.2* @category CEL* @package Services* @subpackage Bibliothèques* @version 0.1* @author Mathias CHOUET <mathias@tela-botanica.org>* @author Jean-Pascal MILCENT <jpm@tela-botanica.org>* @author Aurelien PERONNET <aurelien@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>* @copyright 1999-2014 Tela Botanica <accueil@tela-botanica.org>*/class RechercheImage extends Cel {public static $tris_possibles = array(// 'ordre', // On désactive ordre qui est le tri par défaut, car ça pédale trop si l'user à trop d'obs'taxon','transmission','zone_geo','date_prise_de_vue','appareil_fabriquant','note_qualite','nom_original');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;}// redéfinis en 2020, affiche toutes les infos images et obs à partir d'un join pour n'avoir que les images liées à une obspublic function rechercherImagesJoinObservation($id_utilisateur = null, $criteres = array(), $debut = 0 , $limite = 50) {$ordre = (isset($criteres['tri']) && $criteres['tri']) ? $criteres['tri'] : '';unset($criteres['tri']);$direction = (isset($criteres['dir']) && $criteres['dir']) ? $criteres['dir'] : 'ASC';unset($criteres['dir']);$imgUrlTplBase = explode('%', $this->config['settings']['celImgUrlTpl'])[0];$debut = ($debut < 0) ? 0 : $debut;$requete_recherche_images = 'SELECT ci.`id_image` as id_photo, co.guid,`id_observation` as id_obs, `nom_sel`, `nom_sel_nn`, `zone_geo` as localisation, `latitude`, `longitude`,`date_observation` as date_obs, `commentaire`, `certitude`, `grade` as fiabilite, programme as projet,`score_identiplante` as score_ip, `url_identiplante` as url_ip, `validation_identiplante` as est_ip_valide,co.mots_cles_texte as tags_obs, `nom_ret`, `nom_ret_nn`, `famille`,`nom_referentiel`, `pays`,`ce_zone_geo` as code_insee, `dept`, `lieudit`, `station`, `milieu`, `altitude`, `localisation_precision`,`localisation_floutage`, `localisation_coherence`, `abondance`, `phenologie`, `spontaneite`,`type_donnees`, `biblio`, `source`, `herbier`, `determinateur`, `observateur`, `observateur_structure`,`ce_utilisateur` as id_utilisateur, `courriel_utilisateur` as mail_utilisateur, `pseudo_utilisateur` as nom_utilisateur,ci.`nom_original`, ci.`date_prise_de_vue` as date_photo, "Creative Commons BY-SA (2.0)" as licence,concat(`nom_sel`, " par ", `pseudo_utilisateur`, " [CC BY-SA 2.0 FR], via Tela Botanica") as attribution,concat("'.$imgUrlTplBase.'", lpad(ci.id_image, 9, "0"), "O,") as url_photo, ci.`mots_cles_texte` as tags_photo ';$requete_recherche_images .= $this->fabriquerRequeteJointureDblObs();$requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);$requete_recherche_images .= $sous_requete_recherche;if (!empty($ordre)) {$requete_recherche_images .= ' ORDER BY '.$ordre.' '.$direction;}$requete_recherche_images .= ' LIMIT '.$debut.','.$limite;$resultats_images = array();$resultats_images = Cel::db()->requeter($requete_recherche_images);return $resultats_images;}public function rechercherImages($id_utilisateur = null, $criteres = array(), $debut = 0 , $limite = 50) {$ordre = (isset($criteres['tri']) && $criteres['tri']) ? $criteres['tri'] : '';unset($criteres['tri']);$direction = (isset($criteres['dir']) && $criteres['dir']) ? $criteres['dir'] : 'ASC';unset($criteres['dir']);$debut = ($debut < 0) ? 0 : $debut;$requete_recherche_images = 'SELECT ci.*, co.pseudo_utilisateur ';$requete_recherche_images .= $this->fabriquerRequeteJointureObs();$requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.ce_utilisateur = '.Cel::db()->proteger($id_utilisateur) : '';$sous_requete_recherche = $this->fabriquerSousRequeteRecherche($id_utilisateur, $criteres);$requete_recherche_images .= $sous_requete_recherche;if (!empty($ordre)) {$requete_recherche_images .= ' ORDER BY '.$ordre.' '.$direction;}$requete_recherche_images .= ' LIMIT '.$debut.','.$limite;$resultats_images = array();$resultats_images = Cel::db()->requeter($requete_recherche_images);return $resultats_images;}public function compterImages($id_utilisateur = null, $criteres = array()) {$requete_recherche_images = 'SELECT COUNT(*) AS nb_images ';$requete_recherche_images .= $this->fabriquerRequeteJointureObs();$requete_recherche_images .= ($id_utilisateur != null) ? 'AND co.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()->requeter($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(), $tri = "") {$tris_obs = array('nom_sel','transmission','zone_geo');$criteres_obs = array('zone_geo','ce_zone_geo','taxon','transmission','recherche');return count(array_intersect(array_keys($criteres),$criteres_obs)) > 0 ||(!empty($tri) && in_array($tri, $tris_obs));}private function fabriquerRequeteJointureObs() {$requete = 'FROM cel_images_export ci '.'LEFT JOIN cel_export_total co '.'ON ci.ce_observation = co.id_observation '.'WHERE 1 ';return $requete;}private function fabriquerRequeteJointureDblObs() {$requete = 'FROM cel_images_export ci '.'JOIN cel_export_total co '.'ON ci.ce_observation = co.id_observation '.'WHERE 1 ';return $requete;}public function obtenirInformationsObservationsAssociees($id_utilisateur, $id_image) {$requete = 'SELECT ce_observation FROM cel_images_export WHERE id_image = '.$id_image;$resultats = Cel::db()->requeter($requete);$idsObsListe = array();foreach ($resultats as $liaison) {$idsObsListe[] = $liaison['ce_observation'];}$ids_obs = implode(',', $idsObsListe);$infos_obs = '';if (trim($ids_obs) != '') {$requete = 'SELECT * FROM cel_export_total WHERE id_observation IN ('.$ids_obs.') AND ce_utilisateur = "'.$id_utilisateur.'"';$resultats = Cel::db()->requeter($requete);foreach ($resultats 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 "id_image";$sous_requete .= 'ci.id_image = '.Cel::db()->proteger($valeur) ;$sous_requete .= ' AND ';break;case "mots_cles";$sous_requete .= $this->creerSousRequeteMotsCles($valeur);break;case "id_mots_cles";$liste_mc = '"'.str_replace(';','","',$valeur).'"';$tpl_sous_requete = GestionMotsClesChemin::obtenirTemplateRequeteMotsClesIds('images');$sous_requete .= 'id_image IN ('.sprintf($tpl_sous_requete, $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 "standard":$sous_requete .= 'co.donnees_standard = '.Cel::db()->proteger($valeur) ;$sous_requete .= ' AND ';break;case "referentiel":$sous_requete .= 'co.referentiel = '.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":if (is_numeric($valeur)) {$sous_requete .= 'co.ce_utilisateur = '.Cel::db()->proteger($valeur).' AND ';} elseif (strpos($valeur, '@') !== false) {$sous_requete .= 'co.courriel_utilisateur = '.Cel::db()->proteger($valeur).' AND ';} else {$sous_requete .= 'co.pseudo_utilisateur LIKE '.Cel::db()->proteger($valeur.'%').' AND ';}break;case "ce_zone_geo":if($valeur !== "NULL") {$depts = explode(",", $valeur);if (count($depts) == 1) {$sous_requete .= '(co.ce_zone_geo = '. Cel::db()->proteger($valeur).') ';} else {$sous_requete .= '(co.dept in ('.$valeur.')) ';}}break;case "zone_geo":if($valeur !== "NULL") {$sous_requete .= '(co.zone_geo = '.Cel::db()->proteger($valeur).') ';}break;case "pays":if($valeur !== "NULL") {$sous_requete .= '(co.pays like '.Cel::db()->proteger($valeur.'%').') ';}break;case "famille":$sous_requete .= 'co.famille = '.Cel::db()->proteger($valeur) ;$sous_requete .= ' AND ' ;break;case "programme":if($valeur !== "NULL") {$sous_requete .= '(co.programme = '.Cel::db()->proteger($valeur).') ';}break;case "tri":break;case "dir":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 '.'co.ce_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.'co.courriel_utilisateur LIKE '.Cel::db()->proteger($chaine_recherche.'%').' OR '.'co.pseudo_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) {//TODO: une requête plus efficace serait possible en utilisant// les vraies tables de mots clés et en faisant disparaitre ce champ maudit$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.'%').') '."(co.programme = ".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'].',';}$mots_cles_chaine = rtrim($mots_cles_chaine,',');$image['mots_cles'] = $mots_cles_chaine;}return $tableau_images;}public function obtenirCourrielUtilisateurPourIdImage($id_image) {$idImageP = Cel::db()->proteger($id_image);$requete = 'SELECT courriel_utilisateur '.'FROM cel_images_export '."WHERE id_image = $idImageP ".' -- '.__FILE__.':'.__LINE__;$utilisateur_courriel = Cel::db()->requeter($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 = 'SELECT DISTINCT photo_tag_id '.'FROM photo_tag_photo '."WHERE photo_id = $id_image ".' -- '.__FILE__.':'.__LINE__;return Cel::db()->requeter($requete);}}