Subversion Repositories Applications.papyrus

Compare Revisions

Ignore whitespace Rev 1063 → Rev 1649

/trunk/papyrus/applettes/menu/menu.php
1,94 → 1,94
<?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: menu.php,v 1.30 2006-11-27 13:47:23 florian Exp $
/**
* Applette : menu
*
* Génère une liste de listes comportant tous les niveaux des menus "classiques" d'un site.
* Nécessite :
* - Variable de Papyrus.
* - Base de données de Papyrus
* - Pear DB
* - Pear Net_URL
* - API Débogage 1.0
*
*@package Applette
*@subpackage Menu
//Auteur original :
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
//Autres auteurs :
*@author Aucun
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.30 $ $Date: 2006-11-27 13:47:23 $
// +------------------------------------------------------------------------------------------------------+
*/
 
// +------------------------------------------------------------------------------------------------------+
// | ENTÊTE du PROGRAMME |
<?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: menu.php,v 1.31 2006-12-01 16:33:40 florian Exp $
/**
* Applette : menu
*
* Génère une liste de listes comportant tous les niveaux des menus "classiques" d'un site.
* Nécessite :
* - Variable de Papyrus.
* - Base de données de Papyrus
* - Pear DB
* - Pear Net_URL
* - API Débogage 1.0
*
*@package Applette
*@subpackage Menu
//Auteur original :
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
//Autres auteurs :
*@author Aucun
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.31 $ $Date: 2006-12-01 16:33:40 $
// +------------------------------------------------------------------------------------------------------+
*/
 
// +------------------------------------------------------------------------------------------------------+
// | ENTÊTE du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
// Inclusion de la bibliothèque defonction sur les menu : inutile car inclue par Papyrus
require_once GEN_CHEMIN_BIBLIO.'pap_menu.fonct.php';
 
$GLOBALS['_MENU_']['nom_fonction'] = 'afficherMenuNiveauMultiple';
$_GEN_commun['info_applette_nom_fonction'] = $GLOBALS['_MENU_']['nom_fonction'];
$_GEN_commun['info_applette_balise'] = 'MENU_?(?:(|CLASSIQUE|COMMUN|DEROULANT)_([0-9]+)_([0-9]+)(|_ID_([0-9]+))|(UNIQUE)_([0-9]+))(?:|_NUMID_([0-9]+))';
 
// +------------------------------------------------------------------------------------------------------+
// | CORPS du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
 
// +------------------------------------------------------------------------------------------------------+
// | LISTE de FONCTIONS |
// +------------------------------------------------------------------------------------------------------+
/** Fonction GEN_afficherMenuNiveauMultiple() - Retourne la liste des listes de menus.
*
* Cette fonction retourne ne fait qu'encapsuler une fonction récursive
* retournant les listes de menus de l'arborescence d'un site dans une
* langue donnée.
*
* @param array contient les arguments de la fonction en 1 le niveau de départ et en 2 le niveau d'arrivée (profondeur max demandée).
* @param array tableau global de Papyrus.
* @return string HTML la liste des listes de menus.
*/
function afficherMenuNiveauMultiple($tab_applette_arguments, $_GEN_commun)
{
// Initialisation de variable.
$objet_pear_db = $_GEN_commun['pear_db'];
$id_site = $_GEN_commun['info_site']->gs_id_site;
if (isset($_GEN_commun['info_menu'])) {
$id_menu = $_GEN_commun['info_menu']->gm_id_menu;
$GLOBALS['_MENU_']['nom_fonction'] = 'afficherMenuNiveauMultiple';
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = $GLOBALS['_MENU_']['nom_fonction'];
$GLOBALS['_GEN_commun']['info_applette_balise'] = '<!-- '.$GLOBALS['_GEN_commun']['balise_prefixe'].'(MENU_?(?:(|CLASSIQUE|COMMUN|DEROULANT)_([0-9]+)_([0-9]+)(|_ID_([0-9]+))|(UNIQUE)_([0-9]+))(?:|_NUMID_([0-9]+))) -->';
 
// +------------------------------------------------------------------------------------------------------+
// | CORPS du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
 
// +------------------------------------------------------------------------------------------------------+
// | LISTE de FONCTIONS |
// +------------------------------------------------------------------------------------------------------+
/** Fonction GEN_afficherMenuNiveauMultiple() - Retourne la liste des listes de menus.
*
* Cette fonction retourne ne fait qu'encapsuler une fonction récursive
* retournant les listes de menus de l'arborescence d'un site dans une
* langue donnée.
*
* @param array contient les arguments de la fonction en 1 le niveau de départ et en 2 le niveau d'arrivée (profondeur max demandée).
* @param array tableau global de Papyrus.
* @return string HTML la liste des listes de menus.
*/
function afficherMenuNiveauMultiple($tab_applette_arguments, $_GEN_commun)
{
// Initialisation de variable.
$objet_pear_db = $_GEN_commun['pear_db'];
$id_site = $_GEN_commun['info_site']->gs_id_site;
if (isset($_GEN_commun['info_menu'])) {
$id_menu = $_GEN_commun['info_menu']->gm_id_menu;
}
$num_menu = $GLOBALS['_PAPYRUS_']['applette']['comptage'][$GLOBALS['_MENU_']['nom_fonction']];
$indent_origine = 12;// Indentation de départ en nombre d'espace
$indent_pas = 4;// Pas d'indentation en nombre d'espace
$num_menu = $GLOBALS['_PAPYRUS_']['applette']['comptage'][$GLOBALS['_MENU_']['nom_fonction']];
$indent_origine = 12;// Indentation de départ en nombre d'espace
$indent_pas = 4;// Pas d'indentation en nombre d'espace
$niveau_depart = 1;
// Récupérations des arguments passés dans la balise.
// Récupérations des arguments passés dans la balise.
// Pour les menus CLASSIQUE et COMMUN
$balise = $tab_applette_arguments[1];
$menu_type = $tab_applette_arguments[2];
$niveau_depart = $tab_applette_arguments[3];
$niveau_depart = $tab_applette_arguments[3];
$profondeur = $tab_applette_arguments[4];
if (isset($tab_applette_arguments[5]) && !empty($tab_applette_arguments[5])) {
$menu_depart = $tab_applette_arguments[6];
126,11 → 126,11
default:
$menu_type = 'classique';
}
 
//Construction du menu
 
//Construction du menu
$xhtml_menu = afficherListeNiveauMultiple( $objet_pear_db, $id_site,$niveau_depart,
$profondeur, $menu_depart, 1, $menu_type, $indent_origine,
$indent_pas, $_GEN_commun, $num_menu);
$indent_pas, $_GEN_commun, $num_menu);
// Si le menu est déroulant il faut stocker un peu de javascript pour IE
if ($menu_type == 'deroulant') {
146,67 → 146,67
}
}
if (window.attachEvent) window.attachEvent("onload", sfHover);') ;
}
//Si nous avons un
if (! empty($xhtml_menu)) {
$retour = $xhtml_menu;
} else {
$retour = '<!-- '.$balise.' : aucun menu trouvé ! -->';
}
return $retour;
}
 
/** Fonction afficherListeNiveauMultiple() - Affiche une arborescence des menu classiques d'un site.
*
* Créé et retourne une liste pour chaque niveau de menu classique trouvé dans l'arborescence
* des menus d'un site dans une langue donnée.
* C'est une fonction récursive.
*
* @param mixed objet Pear DB de connexion à la base de données.
* @param integer identifiant d'un site.
* @param integer identifiant de la langue demandée.
* @param integer niveau de départ.
* @param integer niveau d'arrivée (profondeur max demandée).
* @param integer identifiant d'un menu pére.
* @return string les listes de menus au format XHTML.
*/
}
//Si nous avons un
if (! empty($xhtml_menu)) {
$retour = $xhtml_menu;
} else {
$retour = '<!-- '.$balise.' : aucun menu trouvé ! -->';
}
return $retour;
}
 
/** Fonction afficherListeNiveauMultiple() - Affiche une arborescence des menu classiques d'un site.
*
* Créé et retourne une liste pour chaque niveau de menu classique trouvé dans l'arborescence
* des menus d'un site dans une langue donnée.
* C'est une fonction récursive.
*
* @param mixed objet Pear DB de connexion à la base de données.
* @param integer identifiant d'un site.
* @param integer identifiant de la langue demandée.
* @param integer niveau de départ.
* @param integer niveau d'arrivée (profondeur max demandée).
* @param integer identifiant d'un menu pére.
* @return string les listes de menus au format XHTML.
*/
function afficherListeNiveauMultiple( &$objet_pear_db, $id_site, $niveau_depart, $profondeur,
$id_pere_menu_a_deployer, $position, $menu_type, $indent_origine = 12,
$indent_pas = 4, $_GEN_commun, $num_menu)
{
// Initialisation des variables
static $niveau_actuel = 1;
$indent_pas = 4, $_GEN_commun, $num_menu)
{
// Initialisation des variables
static $niveau_actuel = 1;
$retour = '';
$tete = '';
$corps = '';
$pied = '';
$i18n_url = '' ;
$id_langue = $_GEN_commun['i18n'];//identifiant de la langue choisie
if ($id_langue != GEN_I18N_ID_DEFAUT) {
$i18n_url=$id_langue;
}
if (isset($id_langue) && ($id_langue!='')) {
$langue_test=$id_langue;
} else {
$langue_test=GEN_I18N_ID_DEFAUT;
}
$pied = '';
$i18n_url = '' ;
$id_langue = $_GEN_commun['i18n'];//identifiant de la langue choisie
if ($id_langue != GEN_I18N_ID_DEFAUT) {
$i18n_url=$id_langue;
}
if (isset($id_langue) && ($id_langue!='')) {
$langue_test=$id_langue;
} else {
$langue_test=GEN_I18N_ID_DEFAUT;
}
// Récupération des infos sur sur l'entrée du menu à afficher
$menu_info = GEN_lireInfoMenu($objet_pear_db, $id_pere_menu_a_deployer, DB_FETCHMODE_ASSOC);
// Gestion des menus uniques
// Gestion des menus uniques
if ($menu_type == 'unique' && ($menu_info['gm_date_fin_validite'] == '0000-00-00 00:00:00' || strtotime($menu_info['gm_date_fin_validite']) > time() )) {
$retour .= afficherEntreeListeMenu( $objet_pear_db, $id_pere_menu_a_deployer, $i18n_url,
$niveau_actuel, 1, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu);
// Dans le cas, d'un menu unique, on retourne directement le résultat ici.
return $retour;
}
// On affiche un menu que si $profondeur <= $niveau_actuel <= $depart
if ($niveau_actuel > $profondeur) {
return null;
}
// On affiche un menu que si $profondeur <= $niveau_actuel <= $depart
if ($niveau_actuel > $profondeur) {
return null;
}
// Nous regardons si nous devons afficher un menu racine
218,32 → 218,32
$classe = 'menu_actif';
} else {
$classe = 'menu_inactif';
}
}
// Pour un menu dont on spécifie l'identifiant du menu départ, on affiche ce menu.
$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))).
'<li id="menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="'.$classe.'">'."\n";
$corps .= afficherEntreeListeMenu( $objet_pear_db, $id_pere_menu_a_deployer, $i18n_url,
$niveau_actuel, 1, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu);
$niveau_actuel, 1, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu);
}
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
$tete .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))).
'<ul id="groupe_menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="menu_'.$menu_type.'_'.'n'.$niveau_actuel.'">'."\n";
'<ul id="groupe_menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="menu_'.$menu_type.'_'.'n'.$niveau_actuel.'">'."\n";
}
$requete = 'SELECT gm_id_menu, gm_date_fin_validite, GMR01.gmr_ordre, gm_nom '.
'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
'WHERE GMR01.gmr_id_menu_01 = gm_id_menu '.
'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 '.
$requete = 'SELECT gm_id_menu, gm_date_fin_validite, GMR01.gmr_ordre, gm_nom '.
'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
'WHERE GMR01.gmr_id_menu_01 = gm_id_menu '.
'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 gm_ce_i18n = "'.GEN_I18N_ID_DEFAUT.'" ';
$requete .= 'AND GMR01.gmr_id_menu_02 = '.$id_pere_menu_a_deployer.' ';
if ($menu_type == 'classique' || $menu_type == 'deroulant') {
if ($menu_type == 'classique' || $menu_type == 'deroulant') {
$requete .= 'AND gm_ce_site = '.$id_site.' '.
'AND GMR02.gmr_id_valeur = 100 '.// 100 = type "menu classique"
'ORDER BY GMR01.gmr_ordre ASC';
252,62 → 252,62
'AND GMR02.gmr_id_valeur = 102 '.// 102 = type "menu commun"
'ORDER BY GMR01.gmr_ordre ASC';
}
//$GLOBALS['_GEN_commun']['debogage_info'] .= $requete;
$resultat = $objet_pear_db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
$liste_menu=array();
// On ne retient pas les menus qui sont des traductions ...
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
if ($langue_test == GEN_I18N_ID_DEFAUT) {
// Le menu n'est pas une traduction : on le traite
$requete_est_traduction = 'SELECT gmr_id_menu_01 '.
'FROM gen_menu_relation '.
'WHERE '.$ligne->gm_id_menu.' = gmr_id_menu_02 ' .
'AND gmr_id_menu_01 <> gmr_id_menu_02 '.
'AND gmr_id_valeur = 2 ';// 2 = "avoir traduction"
$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction);
(DB::isError($resultat_est_traduction))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction))
: '';
if ( $resultat_est_traduction->numRows() == 0 ) {
$liste_menu[]=$ligne;
}
}
// Par defaut, on traite tous les menus trouvés
else {
$liste_menu[]=$ligne;
}
}
if (!function_exists('cmp')) {
function cmp($a, $b) {
if ($a->gmr_ordre == $b->gmr_ordre) {
return 0;
}
return ($a->gmr_ordre < $b->gmr_ordre) ? -1 : 1;
}
}
usort ($liste_menu,"cmp");
foreach ($liste_menu as $ligne) {
//$GLOBALS['_GEN_commun']['debogage_info'] .= $requete;
$resultat = $objet_pear_db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
$liste_menu=array();
// On ne retient pas les menus qui sont des traductions ...
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
if ($langue_test == GEN_I18N_ID_DEFAUT) {
// Le menu n'est pas une traduction : on le traite
$requete_est_traduction = 'SELECT gmr_id_menu_01 '.
'FROM gen_menu_relation '.
'WHERE '.$ligne->gm_id_menu.' = gmr_id_menu_02 ' .
'AND gmr_id_menu_01 <> gmr_id_menu_02 '.
'AND gmr_id_valeur = 2 ';// 2 = "avoir traduction"
$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction);
(DB::isError($resultat_est_traduction))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction))
: '';
if ( $resultat_est_traduction->numRows() == 0 ) {
$liste_menu[]=$ligne;
}
}
// Par defaut, on traite tous les menus trouvés
else {
$liste_menu[]=$ligne;
}
}
if (!function_exists('cmp')) {
function cmp($a, $b) {
if ($a->gmr_ordre == $b->gmr_ordre) {
return 0;
}
return ($a->gmr_ordre < $b->gmr_ordre) ? -1 : 1;
}
}
usort ($liste_menu,"cmp");
foreach ($liste_menu as $ligne) {
//while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
if ($ligne->gm_date_fin_validite == '' || $ligne->gm_date_fin_validite == '0000-00-00 00:00:00' || strtotime($ligne->gm_date_fin_validite) > time()) {
// On commence par regarder si le menu existe dans la langue demandée
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
if ($ligne->gm_date_fin_validite == '' || $ligne->gm_date_fin_validite == '0000-00-00 00:00:00' || strtotime($ligne->gm_date_fin_validite) > time()) {
// On commence par regarder si le menu existe dans la langue demandée
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
$id_menu_inf = $ligne->gm_id_menu;
$id_menu_inf = $ligne->gm_id_menu;
$id_menu_selectionne = '';
if (isset($GLOBALS['_GEN_commun']['info_menu']->gm_id_menu)) {
$id_menu_selectionne = $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu;
317,29 → 317,29
$classe = 'menu_actif';
} else {
$classe = 'menu_inactif';
}
}
$tmp= afficherEntreeListeMenu( $objet_pear_db, $id_menu_inf, $niveau_actuel,
$ligne->gmr_ordre, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu);
// Affichage du menu
$ligne->gmr_ordre, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu);
// Affichage du menu
if ($tmp!='') {
$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2))).
'<li id="menu_'.$num_menu.'_'.$id_menu_inf.'" class="'.$classe.'">'."\n";
$corps .= $tmp;
$corps .= $tmp;
}
}
// Pour chaque menu on regarde s'il y a des fils. Si oui, on les déploie.
$requete_fils = 'SELECT gm_id_menu '.
'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
'WHERE GMR01.gmr_id_menu_02 = '.$ligne->gm_id_menu.' '.
'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
'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 ' ;
}
// Pour chaque menu on regarde s'il y a des fils. Si oui, on les déploie.
$requete_fils = 'SELECT gm_id_menu '.
'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
'WHERE GMR01.gmr_id_menu_02 = '.$ligne->gm_id_menu.' '.
'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
'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 ' ;
if ($menu_type == 'classique') {
$requete_fils .='AND GMR02.gmr_id_valeur = 100 ' ;// 100 = type "menu classique"
}
346,21 → 346,21
if ($menu_type == 'commun') {
$requete_fils .='AND GMR02.gmr_id_valeur = 102 '; // 102 = type "menu commun"
}
$requete_fils .= 'ORDER BY GMR01.gmr_ordre ASC LIMIT 0,1';
$resultat_fils = $objet_pear_db->query($requete_fils);
(DB::isError($resultat_fils))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_fils->getMessage(), $requete_fils))
: '';
if (isset($_GEN_commun['info_menu'])) {
$requete_fils .= 'ORDER BY GMR01.gmr_ordre ASC LIMIT 0,1';
$resultat_fils = $objet_pear_db->query($requete_fils);
(DB::isError($resultat_fils))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_fils->getMessage(), $requete_fils))
: '';
if (isset($_GEN_commun['info_menu'])) {
if ($resultat_fils->numRows() != 0 && $ligne->gm_id_menu == $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu
|| GEN_etreAncetre($ligne->gm_id_menu, $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu) || $menu_type == 'deroulant') {
$niveau_actuel++;
|| GEN_etreAncetre($ligne->gm_id_menu, $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu) || $menu_type == 'deroulant') {
$niveau_actuel++;
$corps .= afficherListeNiveauMultiple( $objet_pear_db, $id_site, $niveau_depart,
$profondeur, $ligne->gm_id_menu, ($position + 3), $menu_type,
null, null, $_GEN_commun, $num_menu);
// On ramène $niveau_actuel un cran plus bas
null, null, $_GEN_commun, $num_menu);
// On ramène $niveau_actuel un cran plus bas
$niveau_actuel--;
}
}
368,15 → 368,15
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2))).'</li>'."\n";
}
$resultat_fils->free();
}
}
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
$pied .= str_repeat(' ', $indent_origine + ($indent_pas * $position+ 1)).'</ul>'."\n";
}
}
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
$pied .= str_repeat(' ', $indent_origine + ($indent_pas * $position+ 1)).'</ul>'."\n";
}
// Nous regardons si nous avons affiché le menu racine
if ($id_pere_menu_a_deployer != 0 && $niveau_actuel == 1) {
$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))).'</li>'."\n";
388,89 → 388,89
} else {
$retour = $tete.$corps.$pied;
return $retour;
}
}
 
/** Fonction afficherEntreeListeMenu() - Contruit une entrée dans une liste du menu d'un site.
*
* Cette fonction retourne une entrée dans la liste du menu d'un site (<a></a>).
* Le menu est un lien.
* Necessite l'utilisation de Pear Net_URL par le programme appelant cette fonction.
*
* @param mixed objet Pear DB de connexion à la base de données.
* @param integer niveau du menu.
* @param integer ordre du menu dans le niveau.
* @return string liste représentant le menu duHTML
*
* $menu_id : identifiant du menu (!= code menu)
*/
function afficherEntreeListeMenu($db, $menu_id, $niveau, $ordre, $position, $menu_type, $indent_origine = 12, $indent_pas = 4, $_GEN_commun, $num_menu)
{
 
$id_langue = $GLOBALS['_GEN_commun']['i18n'];
if (isset($id_langue) && ($id_langue!='')) {
$langue_test=$id_langue;
} else {
$langue_test=GEN_I18N_ID_DEFAUT;
}
 
$requete_traduction = 'SELECT gmr_id_menu_02, gm_ce_i18n '.
'FROM gen_menu_relation, gen_menu '.
'WHERE '.$menu_id.' = gmr_id_menu_01 ' .
'AND gmr_id_menu_02 = gm_id_menu '.
'AND gmr_id_valeur = 2 '.// 2 = "avoir traduction"
'AND gm_ce_i18n = "'.$langue_test.'" ';
$resultat_traduction = $db->query($requete_traduction);
(DB::isError($resultat_traduction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction))
: '';
 
if ($resultat_traduction->numRows() > 0) {
$ligne_resultat_traduction=$resultat_traduction->fetchRow(DB_FETCHMODE_ASSOC);
$menu_id=$ligne_resultat_traduction['gmr_id_menu_02'];
}
 
else {
// Ne sont affichés que les traductions par defaut des menus
// non traduits
// Ici : pas de traduction
 
if ($langue_test!=GEN_I18N_ID_DEFAUT) {
$requete_defaut = 'SELECT gmr_id_menu_02 '.
'FROM gen_menu_relation '.
'WHERE '.$menu_id. ' = gmr_id_menu_01 ' .
'AND gmr_id_valeur = 105 ';// 105 Traduction par defaut
$resultat_defaut = $db->query($requete_defaut);
(DB::isError($resultat_defaut)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_defaut->getMessage(), $requete_defaut))
: '';
if ($resultat_defaut->numRows() > 0) {
$ligne_resultat_defaut=$resultat_defaut->fetchRow(DB_FETCHMODE_ASSOC);
$menu_id=$ligne_resultat_defaut['gmr_id_menu_02'];
}
}
}
}
}
 
/** Fonction afficherEntreeListeMenu() - Contruit une entrée dans une liste du menu d'un site.
*
* Cette fonction retourne une entrée dans la liste du menu d'un site (<a></a>).
* Le menu est un lien.
* Necessite l'utilisation de Pear Net_URL par le programme appelant cette fonction.
*
* @param mixed objet Pear DB de connexion à la base de données.
* @param integer niveau du menu.
* @param integer ordre du menu dans le niveau.
* @return string liste représentant le menu duHTML
*
* $menu_id : identifiant du menu (!= code menu)
*/
function afficherEntreeListeMenu($db, $menu_id, $niveau, $ordre, $position, $menu_type, $indent_origine = 12, $indent_pas = 4, $_GEN_commun, $num_menu)
{
 
$id_langue = $GLOBALS['_GEN_commun']['i18n'];
if (isset($id_langue) && ($id_langue!='')) {
$langue_test=$id_langue;
} else {
$langue_test=GEN_I18N_ID_DEFAUT;
}
 
$requete_traduction = 'SELECT gmr_id_menu_02, gm_ce_i18n '.
'FROM gen_menu_relation, gen_menu '.
'WHERE '.$menu_id.' = gmr_id_menu_01 ' .
'AND gmr_id_menu_02 = gm_id_menu '.
'AND gmr_id_valeur = 2 '.// 2 = "avoir traduction"
'AND gm_ce_i18n = "'.$langue_test.'" ';
$resultat_traduction = $db->query($requete_traduction);
(DB::isError($resultat_traduction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction))
: '';
 
if ($resultat_traduction->numRows() > 0) {
$ligne_resultat_traduction=$resultat_traduction->fetchRow(DB_FETCHMODE_ASSOC);
$menu_id=$ligne_resultat_traduction['gmr_id_menu_02'];
}
 
else {
// Ne sont affichés que les traductions par defaut des menus
// non traduits
// Ici : pas de traduction
 
if ($langue_test!=GEN_I18N_ID_DEFAUT) {
$requete_defaut = 'SELECT gmr_id_menu_02 '.
'FROM gen_menu_relation '.
'WHERE '.$menu_id. ' = gmr_id_menu_01 ' .
'AND gmr_id_valeur = 105 ';// 105 Traduction par defaut
$resultat_defaut = $db->query($requete_defaut);
(DB::isError($resultat_defaut)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_defaut->getMessage(), $requete_defaut))
: '';
if ($resultat_defaut->numRows() > 0) {
$ligne_resultat_defaut=$resultat_defaut->fetchRow(DB_FETCHMODE_ASSOC);
$menu_id=$ligne_resultat_defaut['gmr_id_menu_02'];
}
}
}
// Récupération des infos sur sur l'entrée du menu à afficher
$menu_info = GEN_lireInfoMenu($db, $menu_id, DB_FETCHMODE_ASSOC);
// Préparation d'une entrée dans la liste du menu
$menu_nom = htmlentities($menu_info['gm_nom']);
 
if (trim($menu_nom)=='') return '';
// Préparation d'une entrée dans la liste du menu
$menu_nom = htmlentities($menu_info['gm_nom']);
 
if (trim($menu_nom)=='') return '';
$menu_accesskey = '';
$raccourci_txt = '';
if (($menu_accesskey = htmlentities($menu_info['gm_raccourci_clavier'])) != '') {
481,27 → 481,30
if (($menu_texte_title = htmlentities($menu_info['gm_description_resume'])) != '') {
$menu_texte_title = 'title="'.$raccourci_txt.$menu_texte_title.'" ';;
}
$une_url =& new Pap_URL(PAP_URL);
$une_url->setId($menu_id);
 
if (isset($i18n) && ($i18n!='')) {
$une_url->addQuerystring(GEN_URL_CLE_I18N,$i18n);
}
$une_url->setId($menu_id);
 
if (isset($i18n) && ($i18n!='')) {
$une_url->addQuerystring(GEN_URL_CLE_I18N,$i18n);
}
//Création d'une entrée dans la liste du menu
$espaces = str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2)));
$retour = $espaces.'<a id="menu_lien_'.$num_menu.'_'.$menu_id.'" href="'.$une_url->getURL().'" '.$menu_texte_title.$menu_accesskey.'>'.$menu_nom.'</a>'."\n";
return $retour;
}
 
// +------------------------------------------------------------------------------------------------------+
// | PIED du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
 
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
 
// +------------------------------------------------------------------------------------------------------+
// | PIED du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
 
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.30 2006/11/27 13:47:23 florian
* ajout de la touche alt pour les raccourcis
*
* Revision 1.29 2006/10/16 15:49:46 ddelon
* Refactorisation code mulitlinguisme et gestion menu invisibles
*
600,32 → 603,32
* Revision 1.10 2004/05/05 14:33:04 jpm
* Gestion de l'indication de langue dans l'url.
* Utile que si on veut forcer la langue.
*
* Revision 1.8 2004/05/05 06:44:19 jpm
* Complément des commentaires indiquant les paquetages nécessaire à l'applette.
*
* Revision 1.7 2004/05/04 14:19:37 jpm
* Mise entre guillemet simple d'un texte.
*
* Revision 1.6 2004/05/03 14:11:01 jpm
* Intégration du fichier bibliothèquie de fonctions sur gen_menu provenant de la bibliothèque de Génésia INUTILE!
*
* Revision 1.5 2004/05/03 14:09:32 jpm
* Intégration du fichier bibliothèquie de fonctions sur gen_menu provenant de la bibliothèque de Génésia.
*
* Revision 1.4 2004/05/03 11:19:00 jpm
* Intégration de la variable globale de Génésia dans les arguments de la fonction de l'applette.
*
* Revision 1.3 2004/05/03 08:52:44 jpm
* Modification pour intégrer les sous listes (ul) de menus à l'intèrieur de l'entrée (li) du menu supérieur.
*
* Revision 1.2 2004/05/01 17:22:23 jpm
* Changement de nom de l'applette dans les commentaires.
*
* Revision 1.1 2004/05/01 16:12:39 jpm
* Ajout de l'applette gérant les menus multi niveaux ou niveau unique.
*
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
*
* Revision 1.8 2004/05/05 06:44:19 jpm
* Complément des commentaires indiquant les paquetages nécessaire à l'applette.
*
* Revision 1.7 2004/05/04 14:19:37 jpm
* Mise entre guillemet simple d'un texte.
*
* Revision 1.6 2004/05/03 14:11:01 jpm
* Intégration du fichier bibliothèquie de fonctions sur gen_menu provenant de la bibliothèque de Génésia INUTILE!
*
* Revision 1.5 2004/05/03 14:09:32 jpm
* Intégration du fichier bibliothèquie de fonctions sur gen_menu provenant de la bibliothèque de Génésia.
*
* Revision 1.4 2004/05/03 11:19:00 jpm
* Intégration de la variable globale de Génésia dans les arguments de la fonction de l'applette.
*
* Revision 1.3 2004/05/03 08:52:44 jpm
* Modification pour intégrer les sous listes (ul) de menus à l'intèrieur de l'entrée (li) du menu supérieur.
*
* Revision 1.2 2004/05/01 17:22:23 jpm
* Changement de nom de l'applette dans les commentaires.
*
* Revision 1.1 2004/05/01 16:12:39 jpm
* Ajout de l'applette gérant les menus multi niveaux ou niveau unique.
*
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>