Subversion Repositories eFlore/Applications.cel

<?php

/**

 * @package   jrest

 * @author    Aurélien Peronnet <aurelien@tela-botania.org>

 * @author    Raphaël Droz <raphael@tela-botania.org>

 * @copyright 2010, 2013 Tela-Botanica

 * @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL

 *

 * Librairie de liaison d'images et d'observation à des mots clés

 */

class LiaisonMotsCles extends Cel {

	const SEPARATEUR_MOT_CLE_TEXTE = ',';

	private $mode = 'obs';

	public function LiaisonMotsCles($config, $mode) {

		parent::__construct($config);

		$this->mode = $mode;

	}

	public function ajouterLiaisonMotsCles($id_utilisateur, $ids_images_ou_obs, $mots_cles) {

		$mode = $this->mode;

		// le mot clé ignore est spécifique mysql, mais il est utilisé ici pour des raisons

		// de performance, à remplacer par un test sur les mots clés déjà existant si ça gène

		$requete_liaison_mots_cles = sprintf('INSERT IGNORE INTO cel_%s_mots_cles '.

											 '(%s, %s) VALUES ',

											 $mode,

											 $mode == 'obs' ? 'id_observation' : 'id_image',

											 $mode == 'obs' ? 'id_mot_cle_obs' : 'id_mot_cle_image');

		$insert = array();

		foreach($ids_images_ou_obs as $id_image_ou_obs) {

			foreach($mots_cles as $mot) {

				// TODO!! ce_utilisateur

				$insert[] = '('.$id_image_ou_obs.','.Cel::db()->proteger($mot).')';

			}

		}

		if(!$insert) {

			// peut arriver, par exemple lorsqu'on décoche tous les mots-clef associés à une image

			$this->logger('CEL_bugs', 'Pas de mot-clef à ajouter à des '.$mode.' : '. implode(',', $ids_images_ou_obs));

		}

		else {

			$resultat_liaison_mots_cles = Cel::db()->executer($requete_liaison_mots_cles . implode(',',$insert));

			if(! $resultat_liaison_mots_cles) {

				$this->logger('CEL_bugs', 'Erreur d\'ajout de mots clés à des '.$mode.' : '.$requete_liaison_mots_cles);

				// ne pas retourner car si nous sommes passés par InventoryKeyWordImageLink updateElement(),

				// alors celui-ci à *purgé* les mots-clefs en amont et compte sur nous pour faire une réinitialisation

				/// correcte ...

				// return FALSE;

			}

		}

		// ... donc dans tous les cas nous devons conserver une cohérence entre les deux modes de stockage des mots-clefs

		$ret = TRUE;

		foreach($ids_images_ou_obs as $id_image_ou_obs) {

			$bool = self::regenererIndexTexteMotCle($id_image_ou_obs, $id_utilisateur, $mode);

			$ret = $ret & ($bool !== FALSE); // peut légitimement retourner 0

		}

		return $ret;

	}

	public function supprimerLiaisonMotsClesEtRegenererIndexTexte($id_utilisateur, $ids_images_ou_obs, $mots_cles) {

		$retour = $this->supprimerLiaisonMotsCles($id_utilisateur, $ids_images_ou_obs, $mots_cles);

		foreach($ids_images_ou_obs as $image_ou_obs) {

			self::regenererIndexTexteMotCle($image_ou_obs, $id_utilisateur, $this->mode);

		}

		return $retour;

	}

	public function supprimerLiaisonMotsCles($id_utilisateur, $ids_images_ou_obs, $mots_cles) {

		$champ_objet_lie = ($this->mode == 'obs') ? 'id_observation' : 'id_image';

		$champ_mot_cle = ($this->mode == 'obs') ? 'id_mot_cle_obs' : 'id_mot_cle_image';

		$requete_suppression_liaison_mot_cle = 'DELETE FROM cel_'.$this->mode.'_mots_cles WHERE '.

											   $champ_objet_lie.' IN ('.implode(',',$ids_images_ou_obs).') '.

											   'AND '.$champ_mot_cle.' IN ('.implode(',',$mots_cles).')';

		$resultat_suppression_mot_cle = Cel::db()->executer($requete_suppression_liaison_mot_cle);

		if ($requete_suppression_liaison_mot_cle !== false) return TRUE;

		$this->logger("Erreur de suppression des mots clés de plusieurs ".$this->mode." : $requete");

		return FALSE;

	}

	public function supprimerToutesLiaisonsPourIdImageOuObs($id_utilisateur, $ids_images_ou_obs) {

		$champ_objet_lie = ($this->mode == 'obs') ? 'id_observation' : 'id_image';

		$champ_mot_cle = ($this->mode == 'obs') ? 'id_mot_cle_obs' : 'id_mot_cle_image';

		$requete_suppression_liaison_mot_cle = 'DELETE FROM cel_'.$this->mode.'_mots_cles WHERE '.

											   $champ_objet_lie.' IN ('.implode(',',$ids_images_ou_obs).') ';

		$resultat_suppression_mot_cle = Cel::db()->executer($requete_suppression_liaison_mot_cle);

		if ($requete_suppression_liaison_mot_cle !== false) {

			return TRUE;

		}

		$this->logger("Erreur de suppression des mots clés de plusieurs ".$this->mode." : $requete");

		return FALSE;

	}

	public function supprimerToutesLiaisonsPourIdMotCle($id_utilisateur, $tableau_ids_mots_cles) {

		$champ_objet_lie = ($this->mode == 'obs') ? 'id_observation' : 'id_image';

		$champ_mot_cle = ($this->mode == 'obs') ? 'id_mot_cle_obs' : 'id_mot_cle_image';

		$chaine_mot_cles_ids = '('.implode(',', $tableau_ids_mots_cles).')';

		$requete_objets_lies_mot_cle = 'SELECT '.$champ_objet_lie.' as id FROM cel_'.$this->mode.'_mots_cles WHERE '.

		$champ_mot_cle.' IN '.$chaine_mot_cles_ids;

		$requete_suppression_liaison_mot_cle = 'DELETE FROM cel_'.$this->mode.'_mots_cles WHERE '.

		$champ_mot_cle.' IN '.$chaine_mot_cles_ids;

		$resultat_suppression_mot_cle = Cel::db()->executer($requete_suppression_liaison_mot_cle);

		$resultat_requete_objets_lies_mot_cle = Cel::db()->requeter($requete_objets_lies_mot_cle);

		foreach($resultat_requete_objets_lies_mot_cle as $objet_lie) {

			self::regenererIndexTexteMotCle($objet_lie['id'], $id_utilisateur, $this->mode);

		}

		if ($requete_suppression_liaison_mot_cle !== false) {

			$retour = true;

		} else {

			$message = "Erreur de suppression des mots clés de plusieurs ".$this->mode." : $requete";

			$this->logger($message);

			$retour = false;

		}

		return $retour;

	}

	static private function regenererIndexTexteMotCle($id_image_ou_obs, $identifiant_utilisateur, $mode) {

		$mots_cles = self::obtenirMotsClesTexte($id_image_ou_obs, $identifiant_utilisateur, $mode);

		$mots_cles_texte_chaine = "";

		if (count($mots_cles) > 0) {

			$mots_cles_texte_chaine = self::formaterTableauMotCleTextePourInsertion($mots_cles);

		}

		// self::executerRequeteMiseAJourMotCleTexte($mots_cles_texte_chaine, $id_image_ou_obs, $identifiant_utilisateur, $mode);

		return Cel::db()->executer(sprintf('UPDATE %s SET mots_cles_texte = %s WHERE %s = %s AND ce_utilisateur = %s -- %s:%d',

										   $mode == 'obs' ? 'cel_obs' : 'cel_images',

										   Cel::db()->proteger($mots_cles_texte_chaine),

										   $mode == 'obs' ? 'id_observation' : 'id_image',

										   Cel::db()->proteger($id_image_ou_obs),

										   Cel::db()->proteger($identifiant_utilisateur),

										   __FILE__ , __LINE__));

	}

	private static function obtenirMotsClesTexte($id_image_ou_obs, $identifiant_utilisateur, $mode) {

		return Cel::db()->requeter(sprintf('SELECT mot_cle FROM cel_mots_cles_%1$s WHERE id_mot_cle_%2$s IN '.

										   ' (SELECT id_mot_cle_%2$s FROM cel_%1$s_mots_cles WHERE %3$s = %4$s)'.

										   ' AND id_utilisateur = %5$s -- %6$s:%7$d',

										   $mode,

										   $mode == 'obs' ? 'obs' : 'image',

										   $mode == 'obs' ? 'id_observation' : 'id_image',

										   Cel::db()->proteger($id_image_ou_obs),

										   Cel::db()->proteger($identifiant_utilisateur),

										   __FILE__ , __LINE__));

	}

	private static function formaterTableauMotCleTextePourInsertion($tableau_mots_cles_texte) {

		$mot_cles_texte_chaine = '';

		if (is_array($tableau_mots_cles_texte)) {

			foreach ($tableau_mots_cles_texte as $mot_cle) {

				$mot_cles_texte_chaine .= $mot_cle['mot_cle'].self::SEPARATEUR_MOT_CLE_TEXTE;

			}

		}

		$mot_cles_texte_chaine = rtrim($mot_cles_texte_chaine, self::SEPARATEUR_MOT_CLE_TEXTE);

		return $mot_cles_texte_chaine;

	}

	static function nettoyerMotsCles($chaine) {

		$valeur = str_replace('null', '', $chaine);

		$valeur = trim($valeur, ';;');

		return $valeur;

	}

	/**

	* Fonction utilisée pour importer les anciens mots clés saisis dans les widget dans un compte identifié

	* Dans ce cas là, le widget remplit la case id_utilisateur par le mail indiqué lors de la saisie

	* @param string $mail_utilisateur

	* @param string $id_utilisateur

	*/

	public function migrerMotsClesMailVersId($mail_utilisateur, $infos_utilisateur) {

		// ATTENTION : cette fonction suppose que l'utilisateur n'ai pas déjà de mots clés dans le CEL

		// avec l'identifiant $id_utilisateur ce qui est normalement le cas

		$requete_migration_mc_images = 'UPDATE cel_mots_cles_images SET '.

		'id_utilisateur = '.Cel::db()->proteger($infos_utilisateur['id_utilisateur']).' '.

		'WHERE id_utilisateur = '.Cel::db()->proteger($mail_utilisateur).' ';

		$migration_mc_images = Cel::db()->executerRequeteSimple($requete_migration_mc_images);

		// ATTENTION : cette fonction suppose que l'utilisateur n'ai pas déjà de mots clés dans le CEL

		// avec l'identifiant $id_utilisateur ce qui est normalement le cas

		$requete_migration_mc_obs = 'UPDATE cel_mots_cles_obs SET '.

		'id_utilisateur = '.Cel::db()->proteger($infos_utilisateur['id_utilisateur']).' '.

		'WHERE id_utilisateur = '.Cel::db()->proteger($mail_utilisateur).' ';

		$migration_mc_obs = Cel::db()->executerRequeteSimple($requete_migration_mc_obs);

		// Migration des liaisons de mots clés

		$requete_migration_mc_liaisons_obs = 'UPDATE cel_obs_mots_cles SET '.

		'id_utilisateur = '.Cel::db()->proteger($infos_utilisateur['id_utilisateur']).' '.

		'WHERE id_utilisateur = '.Cel::db()->proteger($mail_utilisateur).' ';

		$migration_mc_liaisons_obs = Cel::db()->executerRequeteSimple($requete_migration_mc_liaisons_obs);

		$requete_migration_mc_liaisons_images = 'UPDATE cel_images_mots_cles SET '.

		'id_utilisateur = '.Cel::db()->proteger($infos_utilisateur['id_utilisateur']).' '.

		'WHERE id_utilisateur = '.Cel::db()->proteger($mail_utilisateur).' ';

		$migration_mc_liaisons_images = Cel::db()->executerRequeteSimple($requete_migration_mc_liaisons_images);

		return $migration_mc_images !== false &&

				$migration_mc_obs  !== false &&

				$migration_mc_liaisons_obs !== false &&

				$migration_mc_liaisons_images  !== false;

	}

}

?>