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)                                         |
// +------------------------------------------------------------------------------------------------------+

// |                                                                                                      |
// | 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.25 2005-11-08 17:43:46 ddelon Exp $
/**
* Bibliothèque de fonction sur le rendu.
*
* Cette bibliothèque contient des fonctions utilisé par le rendu des pages de Papyrus.
*

*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
//Autres auteurs :
*@author        Alexandre GRANIER <alexadandre@tela-botanica.org>
*@author        Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>
*@copyright     Tela-Botanica 2000-2004
*@version       $Revision: 1.25 $ $Date: 2005-11-08 17:43:46 $
// +------------------------------------------------------------------------------------------------------+
*/

 
// +------------------------------------------------------------------------------------------------------+
// |                                            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.

*/
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)) {

*/
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;

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

}
 

{
    //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;

    // 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.

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

    //----------------------------------------------------------------------------
    // 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.

    //----------------------------------------------------------------------------
    // 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

    //----------------------------------------------------------------------------
    // 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

*/
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

*/
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

    // 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

{
    // 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.'"';

        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).

        }
    }
    $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.

        }
    }
    $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.

            $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.

    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.'" '.

                '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;
}
/* +--Fin du code ---------------------------------------------------------------------------------------+
* $Log: not supported by cvs2svn $
* 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

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/bibliotheque/fonctions/pap_menu.fonct.php – Rev 443 → 597

Rev 443		Rev 597
Line 1...		Line 1...
1	`<?php`	1	`<?php`
2	`/vim: set expandtab tabstop=4 shiftwidth=4: /`	2	`/vim: set expandtab tabstop=4 shiftwidth=4: /`
3	`// +------------------------------------------------------------------------------------------------------+`	3	`// +------------------------------------------------------------------------------------------------------+`
4	`// \| PHP version 4.1 \|`	4	`// \| PHP version 4.1 \|`
5	`// +------------------------------------------------------------------------------------------------------+`	5	`// +------------------------------------------------------------------------------------------------------+`
6	`// \| Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) \|`	6	`// \| Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) \|`
7	`// +------------------------------------------------------------------------------------------------------+`	7	`// +------------------------------------------------------------------------------------------------------+`
Line 17...		Line 17...
17	`// \| \|`	17	`// \| \|`
18	`// \| You should have received a copy of the GNU Lesser General Public \|`	18	`// \| You should have received a copy of the GNU Lesser General Public \|`
19	`// \| License along with this library; if not, write to the Free Software \|`	19	`// \| License along with this library; if not, write to the Free Software \|`
20	`// \| Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA \|`	20	`// \| Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA \|`
21	`// +------------------------------------------------------------------------------------------------------+`	21	`// +------------------------------------------------------------------------------------------------------+`
22	`// CVS : $Id: pap_menu.fonct.php,v 1.24 2005-09-20 17:01:22 ddelon Exp $`	22	`// CVS : $Id: pap_menu.fonct.php,v 1.25 2005-11-08 17:43:46 ddelon Exp $`
23	`/**`	23	`/**`
24	`* Bibliothèque de fonction sur le rendu.`	24	`* Bibliothèque de fonction sur le rendu.`
25	`*`	25	`*`
26	`* Cette bibliothèque contient des fonctions utilisé par le rendu des pages de Papyrus.`	26	`* Cette bibliothèque contient des fonctions utilisé par le rendu des pages de Papyrus.`
27	`*`	27	`*`
Line 31...		Line 31...
31	`*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>`	31	`*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>`
32	`//Autres auteurs :`	32	`//Autres auteurs :`
33	`*@author Alexandre GRANIER <alexadandre@tela-botanica.org>`	33	`*@author Alexandre GRANIER <alexadandre@tela-botanica.org>`
34	`*@author Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>`	34	`*@author Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>`
35	`*@copyright Tela-Botanica 2000-2004`	35	`*@copyright Tela-Botanica 2000-2004`
36	`*@version $Revision: 1.24 $ $Date: 2005-09-20 17:01:22 $`	36	`*@version $Revision: 1.25 $ $Date: 2005-11-08 17:43:46 $`
37	`// +------------------------------------------------------------------------------------------------------+`	37	`// +------------------------------------------------------------------------------------------------------+`
38	`*/`	38	`*/`
Line 39...		Line 39...
39		39
40	`// +------------------------------------------------------------------------------------------------------+`	40	`// +------------------------------------------------------------------------------------------------------+`
41	`// \| LISTE des FONCTIONS \|`	41	`// \| LISTE des FONCTIONS \|`
Line 42...		Line 42...
42	`// +------------------------------------------------------------------------------------------------------+`	42	`// +------------------------------------------------------------------------------------------------------+`
43		43
44	`/** Fonction GEN_donnerProfondeurMax() - Renvoie le nombre de niveau de menu.`	44	`/** Fonction GEN_donnerProfondeurMax() - Renvoie le nombre de niveau de menu.`
45	`*`	45	`*`
46	`* Cette fonction calcule, pour un menu donné, le nombre de niveau de menu fils complétant`	46	`* Cette fonction calcule, pour un menu donné, le nombre de niveau de menu fils complétant`
47	`* l'arbre des menus jusqu'au feuilles.`	47	`* l'arbre des menus jusqu'au feuilles.`