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

 */

//TODO : cette classe devrait disparaitre pour être intégrée dans la classe

// gestionMotsClesChemin, si possible, mais elle existe pour garder une certaine

// indépendance entre le mecanisme des mots clés texte dans les tables obs et images

// et les tables de mots clés (elle sera supprimée lorsque le champ mots_cles_texte le sera aussi)

class LiaisonMotsCles extends Cel {

	const SEPARATEUR_MOT_CLE_TEXTE = ',';

	private $mode = 'obs';

	private $table_elements_lies;

	private $champ_id_element_lie;

	public function LiaisonMotsCles($config, $mode) {

		parent::__construct($config);

		$this->mode = $mode;

		list($this->table_elements_lies, $this->champ_id_element_lie) = self::getNomTables($mode);

	}

	private static function getNomTables($mode) {

		$tables = array();

		if($mode == 'obs') {

			$tables = array('cel_obs','id_observation');

		} else {

			$tables = array('cel_images','id_image');

		}

		return $tables;

	}

	public function ajouterLiaisonMotsCles($id_utilisateur, $ids_elements_lies, $ids_mots_cles) {

		$mode = $this->mode;

		$gestion_mots_cles = new GestionMotsClesChemin($this->config, $mode);

		$insertion = $gestion_mots_cles->lierParTableaux($ids_mots_cles, $ids_elements_lies, $id_utilisateur);

		if(!$insertion) {

			// 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_elements_lies));

		}

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

		$ret = TRUE;

		foreach($ids_elements_lies as $id_element_lie) {

			$bool = self::regenererIndexTexteMotCle($id_element_lie, $mode);

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

		}

		return $ret;

	}

	public function supprimerLiaisonsMotsClesEtRegenererIndexTexte($id_utilisateur, $ids_elements_lies, $chemins) {

		$gestion_mots_cles = new GestionMotsClesChemin($this->config, $this->mode);

		$retour = $gestion_mots_cles->supprimerLiaisonsMotsCles($chemins, $ids_elements_lies, $id_utilisateur);

		foreach($ids_elements_lies as $id_element_lie) {

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

		}

		return $retour;

	}

	public function supprimerToutesLiaisonsPourIdsElementsLies($id_utilisateur, $ids_elements_lie) {

		$gestion_mots_cles = new GestionMotsClesChemin($this->config, $this->mode);

		$suppression_mot_cles = $gestion_mots_cles->supprimerToutesLiaisonsPourIdsElementsLies($ids_elements_lie, $id_utilisateur);

		if ($suppression_mot_cles !== false) {

			return TRUE;

		}

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

		return FALSE;

	}

	public function supprimerToutesLiaisonsPourChemins($id_utilisateur, $chemins) {

		$gestion_mots_cles = new GestionMotsClesChemin($this->config, $this->mode);

		$ids_elements_lies = $gestion_mots_cles->obtenirIdElementsLiesPourChemins($chemins);

		foreach($ids_elements_lies as $id_element_lie) {

			self::regenererIndexTexteMotCle($id_element_lie['id_element_lie'], $this->mode);

		}

		$suppression_mot_cles = $gestion_mots_cles->supprimerToutesLiaisonsPourChemins($chemins, $id_utilisateur);

		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;

	}

	public function supprimerLiaisonsPourIdEtEnfants($id_utilisateur, $id_mot_cle) {

		$gestion_mots_cles = new GestionMotsClesChemin($this->config, $this->mode);

		// même s'il n'a pas d'enfants, le tableau contient au moins l'id du mot clé lui même

		$ids_mot_cle_et_enfants = $gestion_mots_cles->obtenirIdsMotsClesParIdParent($id_utilisateur, $id_mot_cle);

		// obtention des ids des éléments liés au mot clé ainsi qu'à ces enfants (afin de pouvoir

		// régénérer les index texte de mots clés sur les éléments liés

		$ids_a_delier = array();

		// création de deux tableaux pour éviter un bug du au passage par référence

		// TODO: corriger ça bien proprement

		foreach($ids_mot_cle_et_enfants as &$id) {

			$ids_a_delier[] = $id['id_mot_cle'];

			$id = $id['id_mot_cle'];

		}

		$ids_elements_lies = $gestion_mots_cles->obtenirIdElementsLiesPourIds($ids_a_delier);

		$suppression_liaison = $gestion_mots_cles->supprimerToutesLiaisonsIdsMotsCles($ids_mot_cle_et_enfants, $id_utilisateur);

		foreach($ids_elements_lies as $id_element_lie) {

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

		}

		return Cel::db()->executer($requete, __FILE__ , __LINE__);

	}

	static private function regenererIndexTexteMotCle($id_element_lie, $mode) {

		$sous_requete_concat = '('.sprintf(GestionMotsClesChemin::obtenirTemplateRequeteMotsClesTexte($mode),

								Cel::db()->proteger($id_element_lie)).')';

		list($table, $champ_id) = self::getNomTables($mode);

		$requete = 'UPDATE '.$table.' SET mots_cles_texte = '.$sous_requete_concat.' '.

		           'WHERE '.$champ_id.' = '.Cel::db()->proteger($id_element_lie).' ';

		return Cel::db()->executer($requete, __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;

	}

}

?>