Subversion Repositories eFlore/Applications.cel

Compare Revisions

Ignore whitespace Rev 2458 → Rev 2459

/trunk/jrest/bibliotheque/GestionChampsEtendus.php
New file
0,0 → 1,363
<?php
/**
* PHP Version 5
* in=utf8
* out=utf8
*
* @category PHP
* @package jrest
* @author Aurelien Peronnet <aurelien@tela-botanica.org>
* @copyright 2010 Tela-Botanica
* @license http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
* @version SVN: <svn_id>
* @link /doc/jrest/
*/
 
/**
* Classe de gestion de l'ajout, modification et suppression des champs supplémentaires des obs et images
*/
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 ";
 
$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 ";
$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)";
 
// 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 ";
 
$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 ";
$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 ";
$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).") ";
$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).") ";
$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() {
$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.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";
 
$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'],
'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) {
$requete = "SELECT cle, label, invisible, prive ".
"FROM cel_catalogue_champs_etendus cc ";
$catalogue = Cel::db()->executerRequete($requete);
$infos_champs = array();
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;
}
}
?>