Subversion Repositories eFlore/Applications.cel

Compare Revisions

Ignore whitespace Rev 1974 → Rev 1975

/tags/v1.8-debroussailleuse/jrest/services/InventoryKeyWordList.php
New file
0,0 → 1,485
<?php
// declare(encoding='UTF-8');
// ATTENTION ! Classe compatible uniquement avec nouveau format de bdd du cel //
/**
* Service de recherche et modification de l'arbre des mots clés associés à un id.
* 1: Le service recoit un mot clé à ajouter à l'arbre
* 2: Le service recherche l'arbre ou sous arbre correspondant au critères demandé
* 3: Le service renvoie l'arbre au format json
*
* Encodage en entrée : utf8
* Encodage en sortie : utf8
*
* Cas d'utilisation :
*
* @author Aurélien 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>
* @version $Id$
* @copyright © 2011, Tela-Botanica
*/
class InventoryKeyWordList extends Cel {
 
protected $suffixe = '';
protected $suffixe_table = null;
protected $suffixe_champ = null;
private function setChampsEtTablePourSuffixe($suffixe) {
$this->suffixe = $suffixe;
switch($suffixe) {
case 'obs':
$this->suffixe_table = '_obs';
$this->suffixe_champ = '_obs';
break;
case 'images':
$this->suffixe_table = '_images';
$this->suffixe_champ = '_image';
break;
}
}
 
public function getElement($uid) {
// Controle detournement utilisateur
$id_utilisateur = $uid[1] ;
$this->controleUtilisateur($uid[1]);
$this->setChampsEtTablePourSuffixe($uid[0]);
$this->envoyerJson(self::getMotsClefs($uid[1], $uid[0]));
return TRUE; // compat: pourquoi renvoyer true si vide ?
}
 
 
static function getMotsClefs($uid, $type) {
if($type == 'obs') {
return Cel::db()->requeter(sprintf(
'SELECT mot_cle, id_mot_cle_obs, ce_mot_cle_obs_parent'.
' FROM cel_mots_cles_obs'.
' WHERE id_utilisateur = %s'.
' ORDER BY niveau',
Cel::db()->proteger($uid)));
}
 
if($type == 'images') {
return Cel::db()->requeter(sprintf(
'SELECT mot_cle, id_mot_cle_image, ce_mot_cle_image_parent'.
' FROM cel_mots_cles_images'.
' WHERE id_utilisateur = %s'.
' ORDER BY niveau',
Cel::db()->proteger($uid)));
}
/* pour extraire un mot-clef en particulier (bien que getMotsClefId() soit plus adapté:
array_walk($ret,
create_function('&$val, $k, $keyword',
'if($val["mot_cle"] != $keyword) $val = NULL;' .
'else $val = $val["id_mot_cle_obs"];'),
'XXX');
$obsKeywordIdToDetach = array_filter($ret);
$obsKeywordIdToDetach = array_pop($obsKeywordIdToDetach); */
 
return array();
}
 
 
static function getMotsClefId($uid, $type, $keyword) {
if($type == 'obs') {
$ret = Cel::db()->requeter(sprintf(
'SELECT mot_cle, id_mot_cle_obs, ce_mot_cle_obs_parent'.
' FROM cel_mots_cles_obs'.
' WHERE id_utilisateur = %s'.
' AND mot_cle = %s'.
' ORDER BY niveau',
Cel::db()->proteger($uid),
Cel::db()->proteger($keyword) ));
}
 
if($type == 'images') {
$ret = Cel::db()->requeter(sprintf(
'SELECT mot_cle, id_mot_cle_image, ce_mot_cle_image_parent'.
' FROM cel_mots_cles_images'.
' WHERE id_utilisateur = %s'.
' AND mot_cle = %s'.
' ORDER BY niveau',
Cel::db()->proteger($uid),
Cel::db()->proteger($keyword) ));
}
return @$ret[0]['id_mot_cle_obs'];
}
 
public function updateElement($uid, $pairs) {
$id_utilisateur = $uid[1];
$this->controleUtilisateur($uid[1]);
$this->setChampsEtTablePourSuffixe($uid[0]);
 
$id_mot_cle = $pairs['id'];
$action = $pairs['action'];
 
if ($action == 'modification') {
$nouveau_nom = $pairs['motcle'];
$nouvel_id_general = md5(mb_strtolower($nouveau_nom));
 
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET mot_cle = '.Cel::db()->proteger($nouveau_nom).' , '.
' md5 = '.Cel::db()->proteger($nouvel_id_general).' '.
'WHERE id_mot_cle'.$this->suffixe_champ.' = '.Cel::db()->proteger($id_mot_cle).' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur) ;
$reussite = Cel::db()->executer($requete);
if ($reussite !== false) {
echo 'OK';
return true;
} else {
return false;
}
} else if ($action == 'deplacement') {
self::commencerTransaction();
$transaction_reussie_1 = true;
$id_pere = $pairs['parent'];
$bornes = $this->calculerBornesEtNiveau($id_mot_cle, $id_utilisateur);
$bg = $bornes['bg'];
$bd = $bornes['bd'];
$niveau = $bornes['niveau'];
 
// on inverse l'intervalle de l'élément déplacé et du sous arbre
$transaction_reussie_2 = $this->exclureIntervalle($bg, $bd, $id_utilisateur);
 
$bg_negative = $bg - $bd - 1;
$bd_negative = $bd - $bd - 1;
 
// on recalcule les intervalles de l'arbre privé de ce sous arbre
$transaction_reussie_3 = $this->decalerBornesMoinsIntervalle($bg, $bd, $id_utilisateur);
 
$bornes_pere = $this->calculerBornesEtNiveau($id_pere, $id_utilisateur);
$bg_pere = $bornes_pere['bg'];
$bd_pere = $bornes_pere['bd'];
 
$niveau_pere = $bornes_pere['niveau'];
 
$decalage = $bd - $bg + 1;
 
// on decale les bornes droite du pere pour préparer l'insertion
$transaction_reussie_4 = $this->decalerBornesPlusIntervalle($bd_pere, $decalage, $id_utilisateur);
$nouvelle_bd = $bd_pere + $decalage;
$modif_niveau = $niveau_pere - $niveau + 1;
 
$transaction_reussie_5 = $this->inclureIntervalle($bg_negative, $bd_negative, $nouvelle_bd, $modif_niveau, $id_utilisateur);
$transaction_reussie_6 = $this->changerPere($id_mot_cle, $id_pere, $id_utilisateur);
 
if ($transaction_reussie_1 !== false && $transaction_reussie_2 !== false &&
$transaction_reussie_3 !== false && $transaction_reussie_4 !== false &&
$transaction_reussie_5 !== false && $transaction_reussie_6 !== false) {
self::completerTransaction();
return true;
} else {
self::annulerTransaction();
return false;
}
}
return true;
}
 
public function createElement($pairs) {
// Controle detournement utilisateur
$this->controleUtilisateur($pairs['identifiant']);
 
$this->setChampsEtTablePourSuffixe($pairs['mode']);
$id_utilisateur = $pairs['identifiant'];
$mot_cle = $pairs['motcle'];
 
// TODO supprimer accents
$id_mot_cle_general = md5(mb_strtolower($mot_cle));
$id_mot_cle = $pairs['id'];
$id_parent = $pairs['parent'];
 
$this->ajouterMotCleRacine($id_utilisateur);
 
$bornes = $this->calculerBornesEtNiveau($id_parent, $id_utilisateur);
$borne_pere = $bornes['bd'];
$niveau = $bornes['niveau'] + 1;
$bg = $bornes['bd'];
$bd = $bg + 1;
 
if(!$borne_pere) return false;
 
self::commencerTransaction();
$transaction_reussie_1 = $this->decalerBornesPlusDeux($borne_pere,$id_utilisateur) ? true : false;
$requete = 'INSERT INTO cel_mots_cles'.$this->suffixe_table.' '.
'VALUES ( '.
Cel::db()->proteger($id_mot_cle).', '.
Cel::db()->proteger($id_utilisateur).', '.
Cel::db()->proteger($mot_cle).', '.
Cel::db()->proteger($id_mot_cle_general).', '.
Cel::db()->proteger($bg).', '.
Cel::db()->proteger($bd).', '.
Cel::db()->proteger($niveau).', '.
Cel::db()->proteger($id_parent).') ' ;
$transaction_reussie_2 = Cel::db()->executer($requete);
 
if ($transaction_reussie_1 && $transaction_reussie_2) {
// on sort de self::createElement ==> JRest::(get|post) ==> JRest->created() qui fait header().
// or si nous dépassons ini_get(output_buffering) nous ne pouvons plus réécrire le code de retour
// HTTP, de plus, si ini_get(output_buffering) == off, nous enverrions un warning.
// d'où ce clone de JRest::created();
header('HTTP/1.0 201 Created');
self::completerTransaction();
exit;
} else {
// cf ci-dessus: JRest::badRequest
header('HTTP/1.0 400 Bad Request');
self::annulerTransaction();
exit;
}
return true;
}
 
public function deleteElement($uid) {
$this->setChampsEtTablePourSuffixe($uid[0]);
$id_utilisateur = $uid[1];
$id_mot_cle = $uid[2];
$tableau_ids_mots_cles = array();
$tableau_ids_mots_cles[] = $id_mot_cle;
 
$this->controleUtilisateur($id_utilisateur);
self::commencerTransaction();
 
$bornes = $this->calculerBornesEtNiveau($id_mot_cle, $id_utilisateur);
if($bornes) {
$bg = $bornes['bg'];
$bd = $bornes['bd'];
$requete_mots_cles_fils = 'SELECT id_mot_cle'.$this->suffixe_champ.' as id FROM cel_mots_cles'.$this->suffixe_table.' '.
'WHERE bg >= '.Cel::db()->proteger($bg).' '.
' AND bd <= '.Cel::db()->proteger($bd).' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
 
$mots_cles_fils = Cel::db()->requeter($requete_mots_cles_fils);
foreach ($mots_cles_fils as $fils) {
$tableau_ids_mots_cles[] = $fils['id'];
}
$requete = 'DELETE FROM cel_mots_cles'.$this->suffixe_table.' '.
'WHERE bg >= '.Cel::db()->proteger($bg).' '.
' AND bd <= '.Cel::db()->proteger($bd).' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
$transaction_reussie_1 = Cel::db()->executer($requete);
$transaction_reussie_2 = $this->decalerBornesMoinsIntervalle($bg, $bd, $id_utilisateur) ? true : false;
if ($transaction_reussie_1 !== false && $transaction_reussie_2 !== false) {
self::completerTransaction();
} else {
self::annulerTransaction();
}
}
// Suppression des liaisons associées à ce mot clé
$gestion_liaisons = new LiaisonMotsCles($this->config, $this->suffixe);
$gestion_liaisons->supprimerToutesLiaisonsPourIdMotCle($id_utilisateur, $tableau_ids_mots_cles);
return true;
}
private function ajouterMotCleRacine($id) {
$requete = 'SELECT COUNT(*) as nb_mc '.
'FROM cel_mots_cles'.$this->suffixe_table.' '.
'WHERE id_utilisateur = '.Cel::db()->proteger($id).' ';
$resultat = Cel::db()->requeter($requete);
 
if (is_array($resultat) && count($resultat) > 0) {
$valeurs = $resultat[0]['nb_mc'];
 
switch ($this->suffixe) {
case 'obs' :
$nom_racine = 'Projets';
$id_racine = 'racine_obs';
break;
case 'images' :
$nom_racine = 'Mots clés';
$id_racine = 'racine';
break;
default:
$nom_racine = $this->suffixe;
$id_racine = $this->suffixe;
}
$md5_racine = Cel::db()->proteger(md5($nom_racine));
$id_racine = Cel::db()->proteger($id_racine);
$nom_racine = Cel::db()->proteger($nom_racine);
$id_utilisateur = Cel::db()->proteger($id);
 
if ($valeurs == 0) {
$requete = "INSERT INTO cel_mots_cles{$this->suffixe_table} ".
"VALUES ($id_racine, $id_utilisateur, $nom_racine, $md5_racine, ".
"1, 2, 0, '') ";
Cel::db()->executer($requete);
}
}
}
 
/**
* Désactive l'auto-commit puis débute la transaction
*/
static function commencerTransaction() {
// Désactive l'autocommit le temps de la manipulation de l'arbre
$reussite_autocommit = Cel::db()->executer("SET AUTOCOMMIT = 0");
// Débute une nouvelle transaction
$reussite_begin = Cel::db()->executer("BEGIN");
}
 
/**
* Termine la transaction puis réactive l'auto-commit
*/
static function completerTransaction() {
// Complète la transaction
$reussite_commit = Cel::db()->executer("COMMIT");
// Réactive l'autocommit le temps de la manipulation de l'arbre
$reussite_autocommit = Cel::db()->executer("SET AUTOCOMMIT = 1");
 
echo 'OK';
}
/**
* Annule la transaction et réactive l'auto-commit
*/
static function annulerTransaction() {
// Annule la transaction
$reussite_rollback = Cel::db()->executer("ROLLBACK");
// Réactive l'autocommit le temps de la manipulation de l'arbre
$reussite_autocommit = Cel::db()->executer("SET AUTOCOMMIT = 1");
 
echo 'ERROR';
}
 
/**
* Renvoie les bornes d'un noeud de l'arbre des mots clés
*/
private function calculerBornesEtNiveau($id_mot_cle,$id_utilisateur) {
$requete = 'SELECT bd, bg, niveau '.
'FROM cel_mots_cles'.$this->suffixe_table.' '.
'WHERE id_mot_cle'.$this->suffixe_champ.' = '.Cel::db()->proteger($id_mot_cle).' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
$resultat = Cel::db()->requeter($requete);
$valeurs = null;
if(is_array($resultat) && count($resultat) > 0) {
$valeurs = $resultat[0];
}
return $valeurs;
}
 
/**
* Décale les bornes de deux pour insérer un nouvel élément
*/
private function decalerBornesPlusDeux($valeur, $id_utilisateur) {
// Décalage borne droite
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET bd = bd + 2 WHERE bd >= '.$valeur.' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
$reussi_1 = Cel::db()->executer($requete);
// Décalage borne gauche
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET bg = bg + 2 '.
'WHERE bg >= '.$valeur.' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
$reussi_2 = Cel::db()->executer($requete);
return $reussi_1 !== false && $reussi_2 !== false;
}
 
/**
* Décale les bornes d'un intervalle negatif donne (pour la suppression d'un sous arbre).
*/
private function decalerBornesMoinsIntervalle($bg, $bd, $id_utilisateur) {
$decalage = $bd - $bg + 1;
 
// Décalage borne droite
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET bd = bd - '.$decalage.' '.
'WHERE bd >= '.$bg.' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
$reussi_1 = Cel::db()->executer($requete);
 
// Décalage borne gauche
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET bg = bg - '.$decalage.' '.
'WHERE bg > '.$bg.' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
$reussi_2 = Cel::db()->executer($requete);
return $reussi_1 !== false && $reussi_2 !== false;
}
 
/**
* Décale à droite des bornes donées d'un intervalle positif donne (pour l'ajout d'un sous arbre).
*/
private function decalerBornesPlusIntervalle($valeur_bornes, $largeur, $id_utilisateur) {
$decalage = $largeur;
 
// decalage borne droite
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET bd = bd + '.$decalage.' '.
'WHERE bd >= '.$valeur_bornes.' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
$reussi_1 = Cel::db()->executer($requete);
 
// decalage borne gauche
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET bg = bg + '.$decalage.' '.
'WHERE bg >= '.$valeur_bornes.' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
$reussi_2 = Cel::db()->executer($requete);
 
return $reussi_1 !== false && $reussi_2 !== false;
}
 
/**
* Inverse les bornes d'un intervalle pour l'exclure des modifications sur l'arbre sans changer la hiérarchie.
*/
private function exclureIntervalle($bg, $bd, $id_utilisateur) {
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET bd = bd - '.$bd.' - 1 , '.
' bg = bg - '.$bd.' - 1 '.
'WHERE bd <= '.$bd.' '.
' AND bg >= '.$bg.' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
 
return Cel::db()->executer($requete);
}
 
/**
* Recale les bornes dun intervalle pour l'inclure dans l'arbre à la bonne place.
* Décalage borne droite
*/
private function inclureIntervalle($bg, $bd, $decalage,$modif_niveau, $id_utilisateur) {
 
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET bg = bg + '.$decalage.' , '.
' bd = bd + '.$decalage.', '.
' niveau = niveau + '.$modif_niveau.' '.
' WHERE bg >= '.$bg.' '.
' AND bd <= '.$bd.' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
 
return Cel::db()->executer($requete);
}
 
private function changerPere($id_mot_cle, $id_pere, $id_utilisateur) {
$requete = 'UPDATE cel_mots_cles'.$this->suffixe_table.' '.
'SET ce_mot_cle'.$this->suffixe_champ.'_parent = '.Cel::db()->proteger($id_pere).' '.
'WHERE id_mot_cle'.$this->suffixe_champ.' = '.Cel::db()->proteger($id_mot_cle).' '.
' AND id_utilisateur = '.Cel::db()->proteger($id_utilisateur).' ';
 
return Cel::db()->executer($requete);
}
}
?>