WebSVN – eFlore/Applications.cel – Diff – /trunk/jrest/bibliotheque/GestionChampsEtendus.php


<?php
// declare(encoding='UTF-8');
/**
 * Classe de gestion de l'ajout, modification et suppression des champs supplémentaires des obs et images.
 *
 * @internal   Mininum PHP version : 5.2
 * @category   CEL
 * @package    Services
 * @subpackage Bibliothèques
 * @version    0.1
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
 * @author     Raphaël Droz <raphael@tela-botania.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 GestionChampsEtendus extends Cel {
 
	private $mode = null;
	private $table_champs_etendus = null;
	private $champ_id = null;
 
	public function GestionChampsEtendus($config, $mode) {
		parent::__construct($config);
		$this->mode = $mode;
 
		if ($this->mode == 'obs') {
			$this->mode = 'obs';
			$this->table_champs_etendus = 'cel_obs_etendues';
			$this->champ_id = 'id_observation';
		} else if ($this->mode == 'image') {
			$this->mode = 'image';
			$this->table_champs_etendus = 'cel_images_etendues';
			$this->champ_id = 'id_image';
		} else {
			throw new Exception('Mode inconnu, les modes autorisés sont "obs" et "image"');
		}
	}
 
	/**
	* Renvoie true ou false suivant que l'element indiqué possède une valeur
	* pour la clé indiquée
	*
	* @param int $id_element_lie
	* @param string $cle
	* @param string $valeur
	* @return bool
	*/
	public function existe($id_element_lie, $cle) {
		$id = Cel::db()->proteger($id_element_lie);
		$cle = Cel::db()->proteger($cle);
		$requete = 'SELECT COUNT(*) >= 1 AS existe '.
			"FROM {$this->table_champs_etendus} ".
			"WHERE {$this->champ_id} = $id ".
			"	AND cle = $cle ".
			' -- '.__FILE__.':'.__LINE__;;
 
		$resultat = Cel::db()->requeter($requete);
		return ($resultat[0]['existe'] == '1');
	}
 
	/**
	* Renvoie tous les champs étendus associé à l'élément passé en paramètre
	*
	* @param int $id_element_lie
	* @return array tableau associatif des champs de la table etendu
	*/
	public function consulter($id_element_lie) {
		$id = Cel::db()->proteger($id_element_lie);
		$requete = 'SELECT * '.
			"FROM {$this->table_champs_etendus} ".
			"WHERE {$this->champ_id} = $id ".
			' -- '.__FILE__.':'.__LINE__;
		$resultat = Cel::db()->requeter($requete);
		return $resultat;
	}
 
	/**
	* Renvoie tous les champs étendus associés aux éléments passés en paramètre.
	* Retour sous forme de tableau associatif de tableau d'objets ChampEtendu.
	* Les objets ChampEtendu sont regroupés par id d'élement.
	*
	* @param array $ids_element_lies tableau d'id des éléments liés (obs ou image).
	* @return array tableau associatif de tableau d'objets ChampEtendu.
	*/
	public function consulterParLots(Array $ids_element_lies) {
		$champs_etendus_par_element = array();
		if (!empty($ids_element_lies)) {
			$ids_element_lies = array_map(array(Cel::db(), 'proteger'),$ids_element_lies);
			$ids = implode(',', $ids_element_lies);
 
			$requete = "SELECT * FROM {$this->table_champs_etendus} WHERE {$this->champ_id} IN ($ids) ";
			$resultats = Cel::db()->requeter($requete);
 
			foreach ($resultats as &$ligne) {
				$id_element = $ligne[$this->champ_id];
				if (!isset($champs_etendus_par_element[$id_element])) {
					$champs_etendus_par_element[$id_element] = array();
				}
				$champ_etendu = new ChampEtendu();
				$champ_etendu->id = $id_element;
				$champ_etendu->cle = $ligne['cle'];
				$champ_etendu->valeur = $ligne['valeur'];
 
				$champs_etendus_par_element[$id_element][] = $champ_etendu;
			}
		}
		return $champs_etendus_par_element;
	}
 
	/**
	 * Ajoute un champ étendu.
	 * Si la clé existe déjà, seule valeur du champ est mise à jour
	 *
	 * @param ChampEtendu $champ_etendu
	 * @return bool true si l'ajout a eu lieu
	 */
	public function ajouter(ChampEtendu $champ_etendu) {
		$id = Cel::db()->proteger($champ_etendu->id);
		$cle = Cel::db()->proteger($champ_etendu->cle);
		$valeur = Cel::db()->proteger($champ_etendu->valeur);
 
		$requete = "INSERT INTO {$this->table_champs_etendus} ".
			"( {$this->champ_id}, cle, valeur) ".
			"VALUES ($id, $cle, $valeur) ".
			"ON DUPLICATE KEY UPDATE valeur = VALUES(valeur) ".
			' -- '.__FILE__.':'.__LINE__;
 
		// la partie on duplicate key est spécifique mysql mais il sera facile de s'en passer le jour
		// où l'on change de sgbd
		$ajout = Cel::db()->executer($requete);
		return ($ajout !== false);
	}
 
	/**
	 * Ajoute plusieurs champs étendus à la fois.
	 * Si la clé existe déjà, seule la valeur du champ est mise à jour
	 *
	 * @param array $champs_etendus tableau d'objets ChampEtendu
	 * @return bool true si l'ajout a eu lieu
	 */
	public function ajouterParLots(Array $champs_etendus) {
		if (! $champs_etendus) return TRUE; // le tableau ... vide à été inséré
 
		$lignes = array();
		foreach ($champs_etendus as $champ_etendu) {
			$id = Cel::db()->proteger($champ_etendu->id);
			$cle = Cel::db()->proteger($champ_etendu->cle);
			$valeur = Cel::db()->proteger($champ_etendu->valeur);
 
			$lignes[] = "($id, $cle, $valeur)";
		}
 
		// la partie on duplicate key est spécifique mysql mais il sera facile de s'en passer le jour
		// où l'on change de sgbd
		$ajout = Cel::db()->executer(sprintf(
			"INSERT INTO %s (%s, cle, valeur) VALUES %s ON DUPLICATE KEY UPDATE valeur = VALUES(valeur) -- %s:%d",
			$this->table_champs_etendus,
			$this->champ_id,
			implode(',', $lignes),
			__FILE__, __LINE__));
		return ($ajout !== false);
	}
 
	/**
	 * Modifie un champ étendu associé à l'élément passé en paramètre
	 *
	 * @param ChampEtendu $champ_etendu
	 * @return bool true si la modification a eu lieu
	 */
	public function modifier(ChampEtendu $champ_etendu) {
		$id = Cel::db()->proteger($champ_etendu->id);
		$cle = Cel::db()->proteger($champ_etendu->cle);
		$valeur = Cel::db()->proteger($champ_etendu->valeur);
 
		$requete = "UPDATE {$this->table_champs_etendus} ".
			"SET valeur = $valeur ".
			"WHERE cle = $cle".
			"	AND {$this->champ_id} = $id ".
			' -- '.__FILE__.':'.__LINE__;
		$modif = Cel::db()->executer($requete);
		return ($modif !== false);
	}
 
	/**
	* Supprime le champ champ étendu associé à l'élément et au nom de clé passés en paramètre
	*
	* @param int $id_element_lie
	* @param string $cle
	* @return bool
	*/
	public function supprimer($id_element_lie, $cle) {
		$id = Cel::db()->proteger($id_element_lie);
		$cle = Cel::db()->proteger($cle);
		$requete = "DELETE FROM {$this->table_champs_etendus} ".
			"WHERE cle = $cle ".
			"AND {$this->champ_id} = $id ".
			' -- '.__FILE__.':'.__LINE__;
		$suppr = Cel::db()->executer($requete);
		return ($suppr !== false);
	}
 
	/**
	* Supprime tous les champs champ étendu associés à l'élément passés en paramètre
	*
	* @param int $id_element_lie
	* @return bool
	*/
	public function vider($id_element_lie) {
		$id = Cel::db()->proteger($id_element_lie);
		$requete = "DELETE FROM {$this->table_champs_etendus} ".
			"WHERE {$this->champ_id} = $id ".
			' -- '.__FILE__.':'.__LINE__;
		$suppr = Cel::db()->executer($requete);
		return ($suppr !== false);
	}
 
	/**
	* Supprime tous les champs champ étendu associés aux éléments passés en paramètre
	*
	* @param array $ids_elements_lies
	* @return bool
	*/
	public function viderParLots($ids_elements_lies) {
		$ids = $this->protegerTableau($ids_elements_lies);
		$requete = "DELETE FROM {$this->table_champs_etendus} ".
			"WHERE {$this->champ_id} IN (".implode(',',$ids).") ".
			' -- '.__FILE__.':'.__LINE__;
		$suppr = Cel::db()->executer($requete);
		return ($suppr !== false);
	}
 
	/**
	* Revnoie tous les intitules aux éléments passés en paramètre
	*
	* @param array $ids_elements_lies
	* @return bool
	*/
	public function consulterClesParLots($ids_elements_lies) {
		$cles_fmt = array();
		if(!empty($ids_elements_lies)) {
			$ids = $this->protegerTableau($ids_elements_lies);
			$requete = 'SELECT cle '.
				"FROM {$this->table_champs_etendus} ".
				"WHERE {$this->champ_id} IN (".implode(',',$ids).") ".
				' -- '.__FILE__.':'.__LINE__;
			$cles = Cel::db()->requeter($requete);
			$i = 0;
			foreach($cles as &$cle) {
				$cles_fmt[$cle['cle']] = $i++;
			}
		}
		return array_values(array_flip($cles_fmt));
	}
 
	/**
	 * Renvoie la liste des groupes de champs étendus
	 */
	public function consulterGroupesChampsEtendusPredefinis($groupe = "", $langue = 'fr') {
		$groupes = array();
		$requete =  "SELECT cc.cle as cle_groupe, cc.label as nom_groupe, ccc.cle as cle_champ, ccc.label as label_champ, ccc.type as type_champ, ccc.valeur as valeur_champ, ccc.invisible, ccc.prive ".
			"FROM `cel_catalogue_champs_etendus` cc ".
			"INNER JOIN cel_catalogue_champs_etendus_liaison cl ON cc.cle = cl.groupe ".
			"INNER JOIN cel_catalogue_champs_etendus ccc ON ccc.cle = cl.champ ".
			"WHERE cc.langue = '".$langue."' ";
		if ($groupe !== "") $requete .= " AND cl.groupe = '".$groupe."'";
		$requete .= ' -- '.__FILE__.':'.__LINE__;
		$groupes_champs = Cel::db()->executerRequete($requete);
 
		$cle_groupe = '';
		$infos_groupe = null;
 
		foreach ($groupes_champs as $groupe_champ) {
			// les champs sont ordonnés par groupe, ce qui permet de les assembler
			// séquentiellement en créeant un nouveau groupe lorsque la clé
			// de groupe du champ actuel est différénte de la précédente
			if ($cle_groupe != $groupe_champ['cle_groupe']) {
				if($infos_groupe != null) {
					$groupes[] = $infos_groupe;
				}
				$infos_groupe = array();
				$cle_groupe = $groupe_champ['cle_groupe'];
			}
 
			if (empty($infos_groupe)) {
				$infos_groupe = array(
					'cle' => $groupe_champ['cle_groupe'],
					'nom' => $groupe_champ['nom_groupe'],
					'champs' => array()
				);
			}
 
			$infos_groupe['champs'][] = array(
				'cle'	=> $groupe_champ['cle_champ'],
				'label' => $groupe_champ['label_champ'],
				'type' => $groupe_champ['type_champ'],
				'valeur' => $groupe_champ['valeur_champ'],
				'options' => array(
					'invisible' => $groupe_champ['invisible'],
					'prive'	=> $groupe_champ['prive'])
			);
		}
 
		// Ajout du dernier groupe, qui serait ignoré sinon, étant donné que l'ajout
		// au tableau se fait au début de la boucle
		//TODO: voir si on ne peut pas simplifier ça
		if (!empty($infos_groupe)) {
			$groupes[] = $infos_groupe;
		}
 
		return $groupes;
	}
 
	/**
	 * Renvoie le catalogue des champs étendus
	 */
	public function consulterCatalogueChampsEtendusPredefinis($ordonner_par_cle = false, $groupe = "") {
		$requete =  'SELECT cle, label, invisible, prive '.
			'FROM cel_catalogue_champs_etendus AS cc ';
		if ($groupe !== "") $requete .= " WHERE groupe = ".$groupe;
		$requete .= ' -- '.__FILE__.':'.__LINE__;
		$catalogue = Cel::db()->executerRequete($requete);
 
		$infos_champs = array();
		if ($catalogue != false) {
			foreach ($catalogue as $champ) {
				$champ_fmt = array(
					'cle'	=> $champ['cle'],
					'label' => $champ['label'],
					'options' => array(
						'invisible' => $champ['invisible'],
						'prive'	=> $champ['prive'])
				);
				if ($ordonner_par_cle) {
					$infos_champs[$champ_fmt['cle']] = $champ_fmt;
				} else {
					$infos_champs[] = $champ_fmt;
				}
			}
		}
		return $infos_champs;
	}
 
	/**
	 * Transforme un label en clé.
	 * Supprime tous les accents et caractères spéciaux.
	 * Accole les mots pour créer un chatmot.
	 *
	 * @param string le label.
	 * @return string la clé correspondante
	 */
	public function transformerLabelEnCle($label) {
		//TODO: cette fonction est elle encore pertinente
		// maintenant que la notion de label est supprimée ?
		$cle = strtolower(trim($label));
 
		// Suppression des mots inutiles
		$mots_a_remplacer = array(' le ', ' la ', ' les ', ' des ', ' de ', " l'", " d'", ' à ', ' au ');
		$cle = str_replace($mots_a_remplacer, ' ', $cle);
 
		// Remplacement parenthèses et crochets et leurs contenus
		$cle = preg_replace('/\([^)]+\)/', '', $cle);
		$cle = preg_replace('/\[[^\]]+\]/', '', $cle);
 
		// Remplacement des accents (voir : http://www.weirdog.com/blog/php/supprimer-les-accents-des-caracteres-accentues.html )
		$cle = htmlentities($cle, ENT_NOQUOTES, 'utf-8');
		$cle = preg_replace('/&([A-za-z])(?:acute|cedil|circ|grave|orn|ring|slash|th|tilde|uml);/', '\1', $cle);
		$cle = preg_replace('/&([A-za-z]{2})(?:lig);/', '\1', $cle); // pour les ligatures e.g. '&oelig;'
		$cle = preg_replace('/&[^;]+;/', '', $cle); // supprime les autres caractères
 
		// Suppression définitive de tout ce qui n'est pas ASCII
		$cle = preg_replace('/[^a-zA-Z0-9 ]/', ' ', $cle);
		$cle = preg_replace('/\s+/', ' ', $cle);
 
		// Accollement des mots
		$cle = ucwords($cle);
		$cle = str_replace(' ', '', $cle);
		$cle{0} = strtolower($cle{0});
 
		return $cle;
	}
 
}


Subversion Repositories eFlore/Applications.cel

(root)/trunk/jrest/bibliotheque/GestionChampsEtendus.php – Rev 3124 → 3166

Rev 3124		Rev 3166
1	`<?php`	1	`<?php`
2	`// declare(encoding='UTF-8');`	2	`// declare(encoding='UTF-8');`
3	`/**`	3	`/**`
4	`* Classe de gestion de l'ajout, modification et suppression des champs supplémentaires des obs et images.`	4	`* Classe de gestion de l'ajout, modification et suppression des champs supplémentaires des obs et images.`
5	`*`	5	`*`
6	`* @internal Mininum PHP version : 5.2`	6	`* @internal Mininum PHP version : 5.2`
7	`* @category CEL`	7	`* @category CEL`
8	`* @package Services`	8	`* @package Services`
9	`* @subpackage Bibliothèques`	9	`* @subpackage Bibliothèques`
10	`* @version 0.1`	10	`* @version 0.1`
11	`* @author Mathias CHOUET <mathias@tela-botanica.org>`	11	`* @author Mathias CHOUET <mathias@tela-botanica.org>`
12	`* @author Raphaël Droz <raphael@tela-botania.org>`	12	`* @author Raphaël Droz <raphael@tela-botania.org>`
13	`* @author Jean-Pascal MILCENT <jpm@tela-botanica.org>`	13	`* @author Jean-Pascal MILCENT <jpm@tela-botanica.org>`
14	`* @author Aurelien PERONNET <aurelien@tela-botanica.org>`	14	`* @author Aurelien PERONNET <aurelien@tela-botanica.org>`
15	`* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>`	15	`* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>`
16	`* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>`	16	`* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>`
17	`* @copyright 1999-2014 Tela Botanica <accueil@tela-botanica.org>`	17	`* @copyright 1999-2014 Tela Botanica <accueil@tela-botanica.org>`
18	`*/`	18	`*/`
19	`class GestionChampsEtendus extends Cel {`	19	`class GestionChampsEtendus extends Cel {`
20		20
21	`private $mode = null;`	21	`private $mode = null;`
22	`private $table_champs_etendus = null;`	22	`private $table_champs_etendus = null;`
23	`private $champ_id = null;`	23	`private $champ_id = null;`
24		24
25	`public function GestionChampsEtendus($config, $mode) {`	25	`public function GestionChampsEtendus($config, $mode) {`
26	`parent::__construct($config);`	26	`parent::__construct($config);`
27	`$this->mode = $mode;`	27	`$this->mode = $mode;`
28		28
29	`if ($this->mode == 'obs') {`	29	`if ($this->mode == 'obs') {`
30	`$this->mode = 'obs';`	30	`$this->mode = 'obs';`
31	`$this->table_champs_etendus = 'cel_obs_etendues';`	31	`$this->table_champs_etendus = 'cel_obs_etendues';`
32	`$this->champ_id = 'id_observation';`	32	`$this->champ_id = 'id_observation';`
33	`} else if ($this->mode == 'image') {`	33	`} else if ($this->mode == 'image') {`
34	`$this->mode = 'image';`	34	`$this->mode = 'image';`
35	`$this->table_champs_etendus = 'cel_images_etendues';`	35	`$this->table_champs_etendus = 'cel_images_etendues';`
36	`$this->champ_id = 'id_image';`	36	`$this->champ_id = 'id_image';`
37	`} else {`	37	`} else {`
38	`throw new Exception('Mode inconnu, les modes autorisés sont "obs" et "image"');`	38	`throw new Exception('Mode inconnu, les modes autorisés sont "obs" et "image"');`
39	`}`	39	`}`
40	`}`	40	`}`