WebSVN – Applications.papyrus – Diff – /trunk/papyrus/bibliotheque/fonctions/pap_menu.fonct.php

 <?php
 /*vim: set expandtab tabstop=4 shiftwidth=4: */
 // +------------------------------------------------------------------------------------------------------+
 // | PHP version 4.1                                                                                      |
 // +------------------------------------------------------------------------------------------------------+
 // | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
 // +------------------------------------------------------------------------------------------------------+
 // | This library is free software; you can redistribute it and/or                                        |
 // | modify it under the terms of the GNU Lesser General Public                                           |
 // | License as published by the Free Software Foundation; either                                         |
 // | version 2.1 of the License, or (at your option) any later version.                                   |
 // |                                                                                                      |
 // | This library is distributed in the hope that it will be useful,                                      |
 // | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
 // | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
 // | Lesser General Public License for more details.                                                      |
 // |                                                                                                      |
 // | You should have received a copy of the GNU Lesser General Public                                     |
 // | License along with this library; if not, write to the Free Software                                  |
 // | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 // +------------------------------------------------------------------------------------------------------+
-// CVS : $Id: pap_menu.fonct.php,v 1.26 2006-03-02 10:49:49 ddelon Exp $
+// CVS : $Id: pap_menu.fonct.php,v 1.27 2006-10-16 15:50:10 ddelon Exp $
 /**
 * Bibliothèque de fonction sur le rendu.
+*
 * Cette bibliothèque contient des fonctions utilisé par le rendu des pages de Papyrus.
+*
 *@package Papyrus
 *@subpackage Fonctions
 //Auteur original :
 *@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 //Autres auteurs :
 *@author        Alexandre GRANIER <alexadandre@tela-botanica.org>
 *@copyright     Tela-Botanica 2000-2004
-*@version       $Revision: 1.26 $ $Date: 2006-03-02 10:49:49 $
+*@version       $Revision: 1.27 $ $Date: 2006-10-16 15:50:10 $
 // +------------------------------------------------------------------------------------------------------+
 */
 // +------------------------------------------------------------------------------------------------------+
 // |                                            LISTE des FONCTIONS                                       |
 // +------------------------------------------------------------------------------------------------------+
 /** Fonction GEN_donnerProfondeurMax() - Renvoie le nombre de niveau de menu.
+*
 * Cette fonction calcule, pour un menu donné, le nombre de niveau de menu fils complétant
 * l'arbre des menus jusqu'au feuilles.
 * Ici on l'utilise en passant l'argument égal à zéro c'est à dire
 * en partant du menu racine d'un site gmr_id_menu_02 = 0.
 * C'est une fonction récursive.
 * Noter que la variable $prof est statique.
+*
 * @param integer identifiant du site sur lequel la profondeur est calculé.
 * @param integer identifiant du menu à partir delaquelle on souhaite calculer la profondeur.
 * @return integer le nombre de niveau de menu.
 */
 function GEN_donnerProfondeurMax($id_site, $id_menu)
+{
     global $db;
     static $prof = 0;
     // Requête sur les relations de type "avoir père" entre menus
     $requete =  'SELECT gmr_id_menu_01 '.
                 'FROM gen_menu, gen_menu_relation '.
                 'WHERE gmr_id_menu_02 = '.$id_menu.' '.
                 'AND gmr_id_menu_01 = gm_id_menu '.
                 'AND gm_ce_site = '.$id_site.' '.
                 'AND gmr_id_valeur = 1 '.
                 'ORDER BY gmr_ordre ASC';
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     if ($resultat->numRows() == 0) {
         return $prof;
+    }
     $prof++;
     while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
         $prof = GEN_donnerProfondeurMax($id_site, $ligne->gmr_id_menu_01);
+    }
     return $prof;
+}
 /** Fonction GEN_donnerDernierFreres() - Renvoie l'id du dernier menu frère.
+*
 * Cette fonction regarde si un menu donné possède au moins un frère dans l'arbre
 * des menus. Elle retourne l'id du dernier menu frére en utilisant gmr_ordre.
 * Cette fonction fait appel à la fonction : GEN_lireIdentifiantMenuPere().
+*
 * @param integer identifiant du menu.
 * @return boolean renvoi l'id du dernier menu frère sinon faux.
 */
 function GEN_donnerDernierFreres($id_menu)
+{
     // Initialisation des variables.
     global $db;
     $requete =  'SELECT gmr_id_menu_01 '.
                 'FROM gen_menu_relation '.
                 'WHERE gmr_id_menu_02 = '.GEN_lireIdentifiantMenuPere($id_menu).' '.
                 'AND gmr_id_valeur = 1 '.
                 'AND gmr_id_menu_01 <> '.$id_menu.' '.
                 'ORDER BY gmr_ordre DESC';
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
     if ($resultat->numRows() > 0) {
         return $ligne->gmr_id_menu_01;
     } else {
         return false;
+    }
+}
 /** Fonction GEN_etreFreres() - Renvoie vrai si les menus ont le même père.
+*
 * Cette fonction regarde si deux menus donnés sont frères dans l'arbre
 * des menus. Nous regardons si les menus ont le même identifiant comme père.
+*
 * @param integer identifiant du premier menu.
 * @param integer identifiant du seconde menu.
 * @return boolean renvoi vrai si les deux menus sont frères sinon faux.
 */
 function GEN_etreFreres($id_menu_1, $id_menu_2)
+{
     // Initialisation des variables.
     global $db;
     $requete =  'SELECT gmr_id_menu_02 '.
                 'FROM gen_menu_relation '.
                 'WHERE gmr_id_menu_01 = '.$id_menu_1.' '.
                 'AND gmr_id_valeur = 1 ';
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
     $id_pere_1 = $ligne->gmr_id_menu_02;
     $resultat->free();
     $requete =  'SELECT gmr_id_menu_02 '.
                 'FROM gen_menu_relation '.
                 'WHERE gmr_id_menu_01 = '.$id_menu_2.' '.
                 'AND gmr_id_valeur = 1 ';
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
     $id_pere_2 = $ligne->gmr_id_menu_02;
     $resultat->free();
     return ($id_pere_1 == $id_pere_2);
+}
 /** Fonction GEN_etreAncetre() - Renvoie vrai si le premier argument (identifiant de menu) est un ancètre du second.
+*
 * Nous récupérons l'identifiant du père du menu passé en argument numéro 2. Puis,
 * nous le comparons à l'argument 1. Si c'est les même on retourne faux. Sinon on rapelle
 * la fonction avec l'identifiant du père trouvé pour l'argument 2. Ainsi de suite jusqu'a
 * renvoyé vrai où tomber sur un menu racine (idetifiant du père = 0).
 * Si les variable sont null nous retournons false.
 * C'est une fonction récursive.
+*
 * @param integer identifiant d'un menu numéro 1.
 * @param integer identifiant d'un menu numéro 2.
 * @return boolean vrai si le menu numéro 1 est ancètre du second.
 */
 function GEN_etreAncetre($id_menu_1, $id_menu_2)
+{
     //Test erreur
     if (is_null($id_menu_1) || is_null($id_menu_2)) {
         return false;
+    }
     // Initialisation des variables.
     global $db;
     $requete =  'SELECT gmr_id_menu_02 '.
                 'FROM gen_menu_relation '.
                 'WHERE gmr_id_menu_01 = '.$id_menu_2.' '.
                 'AND gmr_id_valeur = 1 ';
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die (BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
     $resultat->free();
     if (isset($ligne)) {
 	    if  ($ligne->gmr_id_menu_02 == 0) {
 	        return false;
 	    } else if ($ligne->gmr_id_menu_02 == $id_menu_1) {
 	        return true;
 	    } else {
 	        return GEN_etreAncetre($id_menu_1, $ligne->gmr_id_menu_02);
+	    }
+    }
+}
 /** Fonction GEN_lireIdentifiantMenuAncetre() - Renvoie l'identifiant du menu ancètre du menu passé en paramètre.
+*
 *   Cette fonction parcours la table gen_menu_relation et retourne l'identifiant du
 *   menu dont le père est le menu racine (identifiant = 0) pour le menu passé en paramètre.
+*
 *   @global mixed   objet Pear DB de connexion à la base de données..
 *   @param  int     identifiant du menu dont il faut rechercher le père.
 *   @return int     identifiant du menu ancètre du menu passé en paramètre.
 */
 function GEN_lireIdentifiantMenuAncetre($id_menu)
+{
     global $db;
     // On teste si on est au niveau d'un menu racine i.e GM_ID_PERE=0
     $requete =  'SELECT gmr_id_menu_02 '.
                 'FROM gen_menu_relation '.
                 'WHERE gmr_id_menu_01 = '.$id_menu.' '.
                 'AND gmr_id_valeur = 1 ';// 1 = avoir "père"
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     $ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
     $resultat->free();
     // Dans le cas où le menu en paramètre est un menu racine
     if ($ligne->gmr_id_menu_02 == 0) {
         return $id_menu;
+    }
     return GEN_lireIdentifiantMenuAncetre($ligne->gmr_id_menu_02);
+}
 /** Fonction GEN_lireIdentifiantMenuPere() - Renvoie l'identifiant du père du menu passé en paramètre.
+*
 * Cette fonction parcours la table gen_menu_relation et retourne l'identifiant du
 * menu père du menu passé en paramètre.
+*
 * @global mixed   objet Pear DB de connexion à la base de données..
 * @param  int     l'identifiant du fils
 * @param  mixed     une instance de la classse Pear DB.
 * @return mixed   l'identifiant du père,ou false en cas d'erreur.
 */
 function GEN_lireIdentifiantMenuPere($id_menu, $db = null)
+{
     if (is_null($db)) {
         $db =& $GLOBALS['_GEN_commun']['pear_db'];
+    }
     $requete =  'SELECT gmr_id_menu_02 '.
                 'FROM gen_menu_relation '.
                 'WHERE gmr_id_menu_01 = '.$id_menu.' '.
                 'AND gmr_id_valeur = 1 ';// 1 = avoir "père"
     $resultat = $db->getOne($requete) ;
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     return $resultat;
+}
 /** Fonction GEN_lireInfoMenu() - Renvoie un objet ou un tableau contenant une ligne de la table gen_menu
+*
 * Retourne la ligne de la table gen_menu concernant le menu ayant pour identifiant la valeur
 * passée en paramètre.
 * Ancien nom : getLevel()
+*
 * @param  mixed     une instance de la classse Pear DB.
 * @param  int       l'identifiant d'un menu.
 * @param  string    le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
 * @return  mixed    un objet ou tableau résultat de Pear DB contenant une ligne de la table gen_menu, ou false en cas d'erreur.
 */
 function GEN_lireInfoMenu(&$db, $id_menu, $mode = DB_FETCHMODE_OBJECT)
+{
     //----------------------------------------------------------------------------
     // Recherche des informations sur le menu
     $requete =  'SELECT * '.
                 'FROM gen_menu '.
                 'WHERE gm_id_menu = '.$id_menu;
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     if ($resultat->numRows() != 1) {
         return false;
+    }
     //----------------------------------------------------------------------------
     // Récupération des infos
     $info_menu = $resultat->fetchRow($mode);
     $resultat->free();
     return $info_menu;
+}
 /** Fonction GEN_retournerMenuCodeNum() - Renvoie le code num d'un menu en fonction du code Alphanumérique
+*
 * Retourne le code numérique d'un menu en fonction du code alphanumérique.
+*
 * @param  mixed  une instance de la classse Pear DB.
 * @param  string le code alphanumérique d'un menu.
 * @return mixed le code numérique du menu sinon false.
 */
 function GEN_retournerMenuCodeNum(&$db, $code_alphanum)
+{
     //----------------------------------------------------------------------------
     // Recherche des informations sur le menu
     $requete =  'SELECT gm_code_num '.
                 'FROM gen_menu '.
                 'WHERE gm_code_alpha = "'.$code_alphanum.'"';
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     if ($resultat->numRows() != 1) {
         return false;
+    }
     //----------------------------------------------------------------------------
     // Récupération des infos
     $info_menu = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
     $code_num = $info_menu->gm_code_num;
     $resultat->free();
     return $code_num;
+}
 /** Fonction GEN_retournerMenuCodeAlpha() - Renvoie le code alphanumérique d'un menu en fonction du code numérique
+*
 * Retourne le code alphanumérique d'un menu en fonction du code numérique.
+*
 * @param  mixed  une instance de la classse Pear DB.
 * @param  string le code numérique d'un menu.
 * @return mixed le code alphanumérique du menu sinon false.
 */
 function GEN_retournerMenuCodeAlpha(&$db, $code_num)
+{
     //----------------------------------------------------------------------------
     // Recherche des informations sur le menu
     $requete =  'SELECT gm_code_alpha '.
                 'FROM gen_menu '.
                 'WHERE gm_code_num = '.$code_num;
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     if ($resultat->numRows() != 1) {
         return false;
+    }
     //----------------------------------------------------------------------------
     // Récupération des infos
     $info_menu = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
     $code_alphanum = $info_menu->gm_code_alpha;
     $resultat->free();
     return $code_alphanum;
+}
 /** Fonction GEN_lireContenuMenu() - Renvoie un objet ou un tableau contenant une ligne de la table gen_menu_contenu
+*
 * Retourne la ligne de la table gen_menu_contenu concernant le menu ayant pour identifiant la valeur
 * passée en paramètre. Seul la dernière version du contenu du menu est retourné.
+*
 * @param  mixed     une instance de la classse Pear DB.
 * @param  int       l'identifiant d'un menu.
 * @param  string    le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
 * @return  mixed    un objet ou tableau résultat de Pear DB contenant une ligne de la table gen_menu_contenu, ou false en cas d'erreur.
 */
 function GEN_lireContenuMenu(&$db, $id_menu, $mode = DB_FETCHMODE_OBJECT)
+{
     //----------------------------------------------------------------------------
     // Gestion des erreurs
     //----------------------------------------------------------------------------
     // Recherche des informations sur le menu
     $requete =  'SELECT * '.
                 'FROM gen_menu_contenu '.
                 'WHERE gmc_ce_menu = '.$id_menu.' '.
                 'AND gmc_bool_dernier = 1';
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     if ($resultat->numRows() != 1) {
         return false;
+    }
     //----------------------------------------------------------------------------
     // Récupération des infos
     $info_menu = $resultat->fetchRow($mode);
     $resultat->free();
     return $info_menu;
+}
 /** Fonction GEN_retournerMenus() - Renvoie un tableau contenant les id de l'ensemble des menus
+*
 * Retourne un tableau contenant les id de l'ensemble des menus des différents sites de Papyrus.
+*
 * @param  mixed     une instance de la classse Pear DB.
 * @return array    tableau contenant les id de chaque menu.
 */
 function GEN_retournerMenus(&$db)
+{
     //----------------------------------------------------------------------------
     // Gestion des erreurs
     //----------------------------------------------------------------------------
     // Recherche des informations sur le menu
     $requete =  'SELECT gm_id_menu '.
                 'FROM gen_menu ';
     $resultat = $db->query($requete);
     (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
     //----------------------------------------------------------------------------
     // Récupération des infos
     $tab_retour = array();
     while ($info_menu = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
         array_push($tab_retour, $info_menu->gm_id_menu);
+    }
     $resultat->free();
     return $tab_retour;
+}
 /** Fonction GEN_lireInfoMenuRelation() - Renvoie un objet ou un tableau contenant une ligne de la table gen_menu_relation
+*
 * Par défaut recherche une relation de type père.
 * Ancien nom : getMenuRelation().
+*
 * @param  mixed   Une instance de la classse PEAR_DB
 * @param  int  l'identifiant d'un menu.
 * @param  int  l'identifiant d'une valeur de relation.
 * @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
 * @return  mixed  un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
 */
 function GEN_lireInfoMenuRelation(&$db, $menuid, $id_valeur = 1, $mode = DB_FETCHMODE_OBJECT)
+{
     //----------------------------------------------------------------------------
     // Recherche des informations sur la relation de menu
     $requete =  'SELECT * '.
                 'FROM gen_menu_relation '.
                 'WHERE gmr_id_menu_01 = '.$menuid.' '.
                 'AND gmr_id_valeur = '.$id_valeur;
     $result = $db->query($requete);
     (DB::isError($result)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $result->getMessage(), $requete)) : '';
     if ($result->numRows() != 1) {
         return false;
+    }
     //----------------------------------------------------------------------------
     // Récupération des infos
     $info_menu_relation = $result->fetchRow($mode);
     $result->free();
     return $info_menu_relation;
+}
 /** Fonction GEN_verifierPresenceCodeMenu() - Vérifie l'existence d'un code de menu
+*
 * Permet de vérifier dans la base de données si le code fournie (alphanumérique ou numérique) a déjà
 * été attribué à un menu ou pas!
+*
 * @param  mixed   Une instance de la classse PEAR_DB
 * @param  string  le type du code (int ou string).
 * @param  integer l'identifiant du menu courant.
 * @param  mixed   le code numérique ou alphanumérique.
 * @return mixed   retourne l'identifiant du menu possédant le code sinon false.
 */
 function GEN_verifierPresenceCodeMenu(&$db, $type, $id_menu, $code)
+{
     // Gestion des erreurs
     if ($code == '') {
         return true;
+    }
     // Requete pour vérifier l'abscence du code numérique et alphanumérique de la table gen_menu
     $requete =  'SELECT gm_id_menu '.
                 'FROM gen_menu '.
                 'WHERE gm_id_menu <> '.$id_menu.' ';
     // Complément de requête en fonction du type de code
     if ($type == 'int') {
         $requete .= 'AND gm_code_num = '.$code;
     } else {
         $requete .= 'AND gm_code_alpha = "'.$code.'"';
+    }
     $resultat = $db->query($requete);
     if (DB::isError($resultat)) {
             die( BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete) );
+    }
     $nombre_reponse = $resultat->numRows();
     if ($nombre_reponse >= 1) {
         return true;
     } else {
         return false;
+    }
+}
 /** Fonction GEN_lireInfoMenuMotsCles() - Renvoie un objet ou un tableau contenant des lignes de la table gen_menu
+*
 * Renvoie un objet ou un tableau contenant une ligne de la table gen_menu en fonction des mots clés présents dans
 * la table gen_menu.
+*
 * @param  mixed   Une instance de la classse PEAR_DB
 * @param  array  un tableau de mots clés.
 * @param  string  la condition séparant chaque rechercher de mots-clés (AND ou OR).
 * @param  string  l'ordre d'affichage des Menus (ASC ou DESC).
 * @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
 * @param  boolean  true pour grouper les résultats (voir Pear DB : getAssoc() ) sinon false.
 * @return  mixed   un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
 */
 function GEN_lireInfoMenuMotsCles(&$db, $tab_mots, $condition = 'OR', $ordre = 'ASC', $mode = DB_FETCHMODE_OBJECT, $groupe = false)
+{
     //----------------------------------------------------------------------------
     // Recherche des informations sur les menus en fonctions des mots clés
     $requete =  'SELECT DISTINCT * '.
                 'FROM gen_menu '.
                 'WHERE ';
     for ($i = 0; $i < count($tab_mots); $i++) {
         if ($i == 0) {
             $requete .= 'gm_mots_cles LIKE "%'.$tab_mots[$i].'%" ';
         } else {
             $requete .= $condition.' gm_mots_cles LIKE "%'.$tab_mots[$i].'%" ';
+        }
+    }
     $requete .= 'ORDER BY gm_date_creation '.$ordre;
     $aso_info =& $db->getAssoc($requete, false, array(), $mode, $groupe);
     (PEAR::isError($aso_info)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $aso_info->getMessage(), $requete)) : '';
     return $aso_info;
+}
 /** Fonction GEN_lireInfoMenuMeta() - Renvoie un objet ou un tableau contenant des lignes de la table gen_menu
+*
 * Renvoie un objet ou un tableau contenant une ligne de la table gen_menu en fonction des mots clés,
 * catégories, id_menu,
 * la table gen_menu.
+*
 * @param  mixed   Une instance de la classse PEAR_DB
 * @param  array  un tableau de mots clés.
 * @param  string  la condition séparant chaque rechercher de mots-clés (AND ou OR).
 * @param  string  l'ordre d'affichage des Menus (ASC ou DESC).
 * @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
 * @param  boolean  true pour grouper les résultats (voir Pear DB : getAssoc() ) sinon false.
 * @return  mixed   un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
 */
 function GEN_lireInfoMenuMeta(&$db, $tab_mots, $tab_cat, $condition = 'OR', $condition2="OR", $ordre = 'ASC', $mode = DB_FETCHMODE_OBJECT, $groupe = false)
+{
     //----------------------------------------------------------------------------
     // Recherche des informations sur les menus en fonctions des mots clés
     $requete =  'SELECT DISTINCT * '.
                 'FROM gen_menu '.
                 'WHERE ';
     for ($i = 0; $i < count($tab_mots); $i++) {
         if ($i == 0) {
             $requete .= 'gm_mots_cles LIKE "%'.$tab_mots[$i].'%" ';
         } else {
             $requete .= $condition.' gm_mots_cles LIKE "%'.$tab_mots[$i].'%" ';
+        }
+    }
     if (count($tab_mots) != 0) $requete .= 'AND ' ;
     for ($i = 0; $i < count($tab_cat); $i++) {
         if ($i == 0) {
             $requete .= 'gm_categorie LIKE "%'.$tab_cat[$i].'%" ';
         } else {
             $requete .= $condition2.' gm_categorie LIKE "%'.$tab_cat[$i].'%" ';
+        }
+    }
     $requete .= 'ORDER BY gm_date_creation '.$ordre;
     $aso_info =& $db->getAssoc($requete, false, array(), $mode, $groupe);
     (PEAR::isError($aso_info)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $aso_info->getMessage(), $requete)) : '';
     return $aso_info;
+}
 /** Fonction GEN_lireInfoMenuCategorie() - Renvoie un objet ou un tableau contenant des lignes de la table gen_menu
+*
 * Renvoie un objet ou un tableau contenant une ligne de la table gen_menu en fonction des catégories présentes dans
 * la table gen_menu.
+*
 * @param  mixed   Une instance de la classse PEAR_DB
 * @param  array  un tableau de catégorie(s).
 * @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
 * @param  boolean  true pour grouper les résultats (voir Pear DB : getAssoc() ) sinon false.
 * @return  mixed   un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
 */
 function GEN_lireInfoMenuCategorie(&$db, $tab_categories, $mode = DB_FETCHMODE_OBJECT, $groupe = false)
+{
     //----------------------------------------------------------------------------
     // Recherche des informations sur les menus en fonctions des mots clés
     $requete =  'SELECT DISTINCT * '.
                 'FROM gen_menu '.
                 'WHERE ';
     for ($i = 0; $i < count($tab_categories); $i++) {
         if ($i == 0) {
             $requete .= 'gm_categorie LIKE "%'.$tab_categories[$i].'%" ';
         } else {
             $requete .= 'OR gm_categorie LIKE "%'.$tab_categories[$i].'%" ';
+        }
+    }
     $aso_info =& $db->getAssoc($requete, false, array(), $mode, $groupe);
     (PEAR::isError($aso_info)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $aso_info->getMessage(), $requete)) : '';
     return $aso_info;
+}
 /** Fonction GEN_lireInfoMenuContenuDate() - Renvoie un objet ou un tableau contenant des lignes de la table gen_menu
+*
 * Renvoie un objet ou un tableau contenant une ligne de la table gen_menu en fonction des catégories présentes dans
 * la table gen_menu.
+*
 * @param  mixed   Une instance de la classse PEAR_DB
 * @param  array  le type de modification.
 * @param  array  le code alphanumérique du site ou de plusieurs sites séparés par des virgules.
 * @param  string  le mode dans Pear DB dans lequel on veut recevoir les infos du menu.
 * @param  boolean  true pour grouper les résultats (voir Pear DB : getAssoc() ) sinon false.
 * @return  mixed   un objet ou tableau résultat Pear DB, ou false en cas d'erreur.
 */
 function GEN_lireInfoMenuContenuDate(&$db, $type_modif = '', $site = '', $categorie='', $mode = DB_FETCHMODE_OBJECT, $groupe = false)
+{
     $type_modif_sql = 'AND gmc_ce_type_modification IN (%s) ';
     if (!empty($type_modif)) {
         $type_modif = sprintf($type_modif_sql, $type_modif);
     } else {
         $type_modif = sprintf($type_modif_sql, '1, 2');
+    }
     $site_sql = 'AND gs_code_alpha IN (%s) ';
     if (!empty($site)) {
         $site = sprintf($site_sql, '"'.implode('", "', array_map('trim', explode(',', $site))).'"');
     } else {
         $site = '';
+    }
     if (!empty($categorie)) {
         $categorie = 'AND gm_categorie like "%'.$categorie.'%"' ;
     } else {
         $categorie = '';
+    }
     // Recherche des informations sur les menus en fonctions des mots clés
     $requete =  'SELECT DISTINCT gen_menu.*, gs_code_alpha, gmc_date_modification, gmc_resume_modification, gmc_ce_type_modification '.
                 'FROM gen_site, gen_menu, gen_menu_contenu '.
                 'WHERE gmc_date_modification <= "'.date('Y-m-d H:i:s', time()).'" '.
                 'AND (gm_ce_site = gs_id_site OR gm_ce_site = 0) '.
                 'AND gm_id_menu = gmc_ce_menu '.
                 'AND gmc_bool_dernier = 1 '.
                 $site.
                 $type_modif.
                 $categorie.
                 'ORDER BY gmc_date_modification DESC';
     $aso_info =& $db->getAssoc($requete, false, array(), $mode, $groupe);
     (PEAR::isError($aso_info)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $aso_info->getMessage(), $requete)) : '';
     return $aso_info;
+}
 /** Fonction GEN_retournerTableauMenusSiteCodeAlpha() - Renvoie un tableau de tableau contenant des lignes de la table gen_menu
+*
 * Renvoie un tableau de tableau contenant les lignes de la table gen_menu pour un site donné. Les tableaux sont imbriquées
 * pour reproduire l'arborescence des menus.
+*
 * @param  mixed  Une instance de la classse PEAR_DB
 * @param  string le code alphanumérique du site.
 * @return  array   un tableau de tableau contenant des lignes de la table gen_menu.
 */
 function GEN_retournerTableauMenusSiteCodeAlpha(&$db, $site, $id_pere = 0, $aso_site_menus = array())
+{
     $requete =  'SELECT gen_menu.* '.
                 'FROM gen_site, gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
                 'WHERE GMR01.gmr_id_menu_02 = '.$id_pere.' '.
                 'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
                 'AND gs_code_alpha = "'.$site.'" '.
                 'AND gm_ce_site = gs_id_site '.
                 'AND GMR01.gmr_id_valeur = 1 '.// 1 = avoir "père"
                 'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
                 'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
                 'AND GMR02.gmr_id_valeur = 100 '.// 100 = type "menu classique"
                 'ORDER BY GMR01.gmr_ordre ASC';
     $resultat = $db->query($requete);
     if (DB::isError($resultat)) {
         die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete));
+    }
     if ($resultat->numRows() > 0) {
         while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
             $aso_site_menus[$ligne['gm_id_menu']] = $ligne;
             $aso_site_menus[$ligne['gm_id_menu']]['sous_menus'] = GEN_retournerTableauMenusSiteCodeAlpha($db, $site, $ligne['gm_id_menu']);
+        }
+    }
     return $aso_site_menus;
+}
+// Code menu --> Identifiant
+// Identifiant menu --> Identifiant version originale
+// Identifiant menu --> Identifiant version par défaut
+// Identifiant menu --> Contenu
+// Identifiant menu --> Contenu version originale
+// Identifiant menu --> Contenu version par défaut
+// Identifiant menu --> Identifiant version originale
+/** Fonction GEN_rechercheMenuIdentifiant() - Recherche code menu à partir de l'identifiant d'un site
+*
+*
+* @param  object objet Pear de connection à la base de données.
+*/
+function GEN_rechercheMenuIdentifiant($db, $id_menu) {
+		$requete =  'SELECT  gm_code_num   '.
+        	        'FROM gen_menu  '.
+            	    'WHERE gm_id_menu =  '.$id_menu.' ';
+		$resultat = $db->query($requete);
+		(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
+		$ligne = $resultat->fetchrow(DB_FETCHMODE_OBJECT);
+		return $ligne->gm_code_num;
+}
+/** Fonction GEN_rechercheMenuCode() - Recherche identifiant à partir du code menu d'un site et en fonction de la langue
+*
+*
+* @param  object objet Pear de connection à la base de données.
+* @param  code menu
+* @return identifiant menu
+*/
+function GEN_rechercheMenuCode($db, $code_menu) {
+// Si identifiant existe pour la langue choisie : retour identifiant
+// Si identifiant n'existe pas : retour identifiant de la langue par defaut :
+	  // Recherche de l'identifiant par defaut
+      // Recherche de l'identifiant de la langue du site
+      // Recherche de l'identifiant par defaut
+	    $id_langue = $GLOBALS['_GEN_commun']['i18n'];
+	    if (isset($id_langue) && ($id_langue!='')) {
+			$langue_test=$id_langue;
+		} else {
+			$langue_test=GEN_I18N_ID_DEFAUT;
+		}
+		$requete =  'SELECT gm_id_menu, gm_code_num   '.
+        	        'FROM gen_menu  '.
+            	    'WHERE gm_code_num =  '.$code_menu.' '.
+                	'AND gm_ce_i18n = "'.$langue_test.'" ';
+		$resultat = $db->query($requete);
+		(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
+		if ( $resultat->numRows() > 0 ) {
+			$ligne = $resultat->fetchrow(DB_FETCHMODE_OBJECT);
+			return $ligne->gm_id_menu;
+		}
+		else {
+				// Recherche defaut :
+				$requete =  'SELECT gm_id_menu, gm_code_num   '.
+	               'FROM gen_menu  '.
+	               'WHERE gm_code_num =  '.$code_menu.' ';
+	               'AND gm_ce_i18n = "'.GEN_I18N_ID_DEFAUT.'" ';
+				$resultat = $db->query($requete);
+				(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
+				if ( $resultat->numRows() > 0 ) {
+					$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
+					if ($langue_test!=GEN_I18N_ID_DEFAUT) {
+						return GEN_rechercheMenuIdentifiantVersionParDefaut($db,$ligne->gm_id_menu);
+					}
+					else {
+						return $ligne->gm_id_menu;
+					}
+				}
+		}
+}
+/* Fonction GEN_rechercheContenu
+ *
+ */
+ function GEN_rechercheContenu($db,$id_menu,$type_fetch=DB_FETCHMODE_OBJECT) {
+	$requete  =  'SELECT gmc_contenu , gmc_ce_type_contenu, gmc_ce_menu '.
+	               			'FROM gen_menu_contenu  '.
+			                'WHERE gmc_ce_menu = '.$id_menu.' '.
+	    		            'AND gmc_ce_type_contenu in (1,2) '.
+	            		    'AND gmc_bool_dernier = 1';
+	$resultat = $db->query($requete);
+	(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
+	// Rien trouvé ? : Pas encore de contenu
+	// Recherche identifiant par défaut
+	if ( $resultat->numRows() == 0 ) {
+		$id_menu_defaut=GEN_rechercheMenuIdentifiantVersionParDefaut($db,$id_menu);
+		$requete  =  'SELECT gmc_contenu , gmc_ce_type_contenu, gmc_ce_menu '.
+	               			'FROM gen_menu_contenu  '.
+			                'WHERE gmc_ce_menu = '.$id_menu_defaut.' '.
+	    		            'AND gmc_ce_type_contenu in (1,2) '.
+	            		    'AND gmc_bool_dernier = 1';
+		$resultat = $db->query($requete);
+		(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
+		if ( $resultat->numRows() == 0 ) {
+			// Toujours rien ?
+			// Tentative recherche dans la langue du site par defaut
+			$id_menu_origine=GEN_rechercheMenuIdentifiantVersionOriginale($db,$id_menu);
+			$requete  =  'SELECT gmc_contenu , gmc_ce_type_contenu, gmc_ce_menu '.
+	               			'FROM gen_menu_contenu  '.
+			                'WHERE gmc_ce_menu = '.$id_menu_origine.' '.
+	    		            'AND gmc_ce_type_contenu in (1,2) '.
+	            		    'AND gmc_bool_dernier = 1';
+			$resultat = $db->query($requete);
+			(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
+		}
+	}
+	$ligne_contenu = $resultat->fetchRow($type_fetch);
+	return $ligne_contenu;
+ }
+/** Fonction GEN_rechercheMenuIdentifiantVersionOriginale() - Recherche identifiant de la version orginale d'un menu
+*
+*
+* @param  object objet Pear de connection à la base de données.
+* @param  identifiant menu
+* @return identifiant menu
+*/
+function GEN_rechercheMenuIdentifiantVersionOriginale($db, $id_menu) {
+	$requete  = 'SELECT gmr_id_menu_01 '.
+				'FROM gen_menu_relation '.
+				'WHERE gmr_id_menu_02  = ' . $id_menu .' '.
+				'AND gmr_id_valeur = 2  '; // 2 = "avoir traduction"
+	$resultat = $db->query($requete) ;
+	if (DB::isError($resultat)) {
+	    die( BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete) );
+	}
+	if ($resultat->numRows() > 0) {
+		$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
+		return $ligne->gmr_id_menu_01;
+	}
+	else {
+		return $id_menu;
+	}
+}
+/** Fonction GEN_rechercheMenuIdentifiantVersionParDefaut() - Recherche identifiant par defaut d'un menu
+*
+*
+* @param  object objet Pear de connection à la base de données.
+* @param  identifiant menu
+* @return identifiant menu
+*/
+function GEN_rechercheMenuIdentifiantVersionParDefaut($db, $id_menu) {
+	$identifiantVersionOrginale=GEN_rechercheMenuIdentifiantVersionOriginale($db, $id_menu);
+	$requete  = 'SELECT gmr_id_menu_02 '.
+				'FROM gen_menu_relation '.
+				'WHERE gmr_id_menu_01  = ' . $identifiantVersionOrginale .' '.
+				'AND gmr_id_valeur = 105  '; // 105
+	$resultat = $db->query($requete) ;
+	if (DB::isError($resultat)) {
+	    die( BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete) );
+	}
+	if ($resultat->numRows() > 0) {
+		$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
+		return $ligne->gmr_id_menu_02;
+	}
+	else {
+		return $identifiantVersionOrginale;
+	}
+}
 /* +--Fin du code ---------------------------------------------------------------------------------------+
 * $Log: not supported by cvs2svn $
+* Revision 1.26  2006/03/02 10:49:49  ddelon
+* Fusion branche multilinguisme dans branche principale
+*
 * Revision 1.25.2.1  2005/12/20 14:40:24  ddelon
 * Fusion Head vers Livraison
+*
 * Revision 1.25  2005/11/08 17:43:46  ddelon
 * Bug Nouveaute ne s'affichant pas pour les menu communs
+*
 * Revision 1.24  2005/09/20 17:01:22  ddelon
 * php5 et bugs divers
+*
 * Revision 1.23  2005/08/29 09:05:12  ddelon
 * Suppression message debug
+*
 * Revision 1.22  2005/07/08 15:16:37  alexandre_tb
 * ajout de la fonction GEN_lireInfoMenuMeta() qui permet de sélectionner des menus en fonction de leur mot clé et leur catégorie
+*
 * Revision 1.21  2005/06/08 19:11:43  jpm
 * Ajout de ordre et condition pour la fonction de lecture des infos sur les menus.
+*
 * Revision 1.20  2005/05/26 08:00:51  jpm
 * Correction dans la fonction GEN_retournerTableauMenusSiteCodeAlpha().
+*
 * Revision 1.19  2005/05/25 13:46:58  jpm
 * Changement du sql de la fonction GEN_lireContenuMenu().
+*
 * Revision 1.18  2005/04/19 17:21:19  jpm
 * Utilisation des références d'objets.
+*
 * Revision 1.17  2005/04/18 16:41:25  jpm
 * Ajout d'une fonction pour récupérer tous les menus d'un site avec son code alphanumérique.
+*
 * Revision 1.16  2005/04/14 17:40:31  jpm
 * Modification fonction pour les actions.
+*
 * Revision 1.15  2005/04/14 13:56:53  jpm
 * Modification d'une ancienne fonction.
+*
 * Revision 1.14  2005/04/12 16:13:50  jpm
 * Ajout de fonction renvoyant des infos sur un menu en fonction des mots clés, catégories ou date de modification du contenu.
+*
 * Revision 1.13  2005/03/30 08:53:59  jpm
 * Ajout de fonctions permettant de récupérer les codes alphanumériques ou numériques en fonction de l'un ou de l'autre.
+*
 * Revision 1.12  2005/02/28 11:12:03  jpm
 * Modification des auteurs.
+*
 * Revision 1.11  2004/12/06 19:49:35  jpm
 * Ajout d'une fonction permettant de récupérer le contenu d'un menu.
+*
 * Revision 1.10  2004/12/06 17:53:55  jpm
 * Ajout fonction GEN_retournerMenus().
+*
 * Revision 1.9  2004/11/29 18:34:42  jpm
 * Correction bogue.
+*
 * Revision 1.8  2004/11/10 17:25:51  jpm
 * Modification de fonction suite à des bogues.
+*
 * Revision 1.7  2004/11/09 17:55:26  jpm
 * Suppresion de fonctions inutiles et mise en conformité.
+*
 * Revision 1.6  2004/11/08 17:39:32  jpm
 * Suppression d'une fonction inutile.
 * GEN_etreFils() n'est pas utile. On peut utiliser GEN_etreAncetre() à la place.
+*
 * Revision 1.5  2004/11/04 12:51:45  jpm
 * Suppression de message de débogage.
+*
 * Revision 1.4  2004/11/04 12:23:50  jpm
 * Nouvelles fonctions sur les menus frères.
+*
 * Revision 1.3  2004/10/25 14:16:21  jpm
 * Suppression de code commenté.
+*
 * Revision 1.2  2004/10/21 18:15:21  jpm
 * Ajout de gestion d'erreur aux fonctions.
+*
 * Revision 1.1  2004/06/15 15:11:37  jpm
 * Changement de nom et d'arborescence de Genesia en Papyrus.
+*
 * Revision 1.43  2004/05/05 06:13:27  jpm
 * Extraction de la fonction générant le "vous êtes ici", transformée en applette.
+*
 * Revision 1.42  2004/05/04 16:24:06  jpm
 * Amélioration de la fonction générant le "vous êtes ici".
+*
 * Revision 1.41  2004/05/04 16:17:31  jpm
 * Ajout de la fonction générant le "vous êtes ici".
+*
 * Revision 1.40  2004/05/03 11:18:17  jpm
 * Normalisation de deux fonctions issues du fichier fontctions.php.
+*
 * Revision 1.39  2004/05/01 16:17:11  jpm
 * Suppression des fonctions liées à la création des listes de menu. Elles ont été transformées en applette.
+*
 * Revision 1.38  2004/05/01 11:43:16  jpm
 * Suppression des fonction GEN_afficherMenuCommun() et GEN_afficherSelecteurSites() transformées en applette.
+*
 * Revision 1.37  2004/04/30 16:18:41  jpm
 * Correction d'un bogue dans les fonctions de gestion des scripts.
+*
 * Revision 1.36  2004/04/28 12:04:40  jpm
 * Changement du modèle de la base de données.
+*
 * Revision 1.35  2004/04/09 16:23:41  jpm
 * Prise en compte des tables i18n.
+*
 * Revision 1.34  2004/04/02 16:34:44  jpm
 * Extraction de variable globale des fonction, remplacé par un passage en paramètre.
+*
 * Revision 1.33  2004/04/01 11:24:51  jpm
 * Ajout et modification de commentaires pour PhpDocumentor.
+*
 * Revision 1.32  2004/03/31 16:52:30  jpm
 * Modification du code vis à vis du modèle revision 1.9 de Génésia.
+*
 * Revision 1.31  2004/03/29 17:13:05  jpm
 * Suppression de fonction, passer en code classique.
+*
 * Revision 1.30  2004/03/27 11:11:58  jpm
 * Début changement nom de variable dans fonction creerInfoPageEtApplication().
+*
 * Revision 1.29  2004/03/26 12:52:25  jpm
 * Ajout des fonctions creerInfoPageEtApplication() et donnerIdPremiereApplicationLiee().
+*
 * +-- Fin du code ----------------------------------------------------------------------------------------+
 */
 ?>

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/bibliotheque/fonctions/pap_menu.fonct.php – Rev 754 → 1033