Subversion Repositories Applications.papyrus

Rev

Rev 1856 | Rev 2093 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1090 florian 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
2073 Jean-Pasca 3 
// +--------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1																						|
5 
// +--------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)									|
7 
// +--------------------------------------------------------------------------------------------------------+
8 
// | This library is free software; you can redistribute it and/or									|
9 
// | modify it under the terms of the GNU Lesser General Public										|
10 
// | License as published by the Free Software Foundation; either										|
11 
// | version 2.1 of the License, or (at your option) any later version.								|
12 
// |																										|
13 
// | This library is distributed in the hope that it will be useful,									|
14 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of									|
15 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU								|
16 
// | Lesser General Public License for more details.													|
17 
// |																										|
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								|
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA							|
21 
// +--------------------------------------------------------------------------------------------------------+
1856 jp_milcent 22 
// CVS : $Id: menu.php,v 1.35 2008-08-12 16:22:51 jp_milcent Exp $
1090 florian 23 
/**
24 
* Applette : menu
25 
*
26 
* Génère une liste de listes comportant tous les niveaux des menus "classiques" d'un site.
27 
* Nécessite :
28 
* - Variable de Papyrus.
29 
* - Base de données de Papyrus
30 
* - Pear DB
31 
* - Pear Net_URL
32 
* - API Débogage 1.0
33 
*
34 
*@package Applette
35 
*@subpackage Menu
36 
//Auteur original :
2073 Jean-Pasca 37 
*@author		Jean-Pascal MILCENT <jpm@tela-botanica.org>
1090 florian 38 
//Autres auteurs :
2073 Jean-Pasca 39 
*@author		Aucun
40 
*@copyright	 Tela-Botanica 2000-2004
41 
*@version	   $Revision: 1.35 $ $Date: 2008-08-12 16:22:51 $
1090 florian 42 
// +------------------------------------------------------------------------------------------------------+
43 
*/
44 
 
45 
// +------------------------------------------------------------------------------------------------------+
2073 Jean-Pasca 46 
// |											ENTÊTE du PROGRAMME										|
1090 florian 47 
// +------------------------------------------------------------------------------------------------------+
338 jpm 48 
// Inclusion de la bibliothèque defonction sur les menu : inutile car inclue par Papyrus
49 
 require_once GEN_CHEMIN_BIBLIO.'pap_menu.fonct.php';
33 alex 50 
 
1090 florian 51 
$GLOBALS['_MENU_']['nom_fonction'] = 'afficherMenuNiveauMultiple';
52 
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = $GLOBALS['_MENU_']['nom_fonction'];
53 
$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]+))) -->';
54 
 
55 
// +------------------------------------------------------------------------------------------------------+
2073 Jean-Pasca 56 
// |											CORPS du PROGRAMME										|
1090 florian 57 
// +------------------------------------------------------------------------------------------------------+
58 
 
59 
 
60 
// +------------------------------------------------------------------------------------------------------+
2073 Jean-Pasca 61 
// |										   LISTE de FONCTIONS											|
1090 florian 62 
// +------------------------------------------------------------------------------------------------------+
63 
/** Fonction GEN_afficherMenuNiveauMultiple() - Retourne la liste des listes de menus.
64 
*
65 
* Cette fonction retourne ne fait qu'encapsuler une fonction récursive
66 
* retournant les listes de menus de l'arborescence d'un site dans une
67 
* langue donnée.
68 
*
69 
* @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).
70 
* @param  array  tableau global de Papyrus.
71 
* @return string HTML la liste des listes de menus.
72 
*/
73 
function afficherMenuNiveauMultiple($tab_applette_arguments, $_GEN_commun)
74 
{
2073 Jean-Pasca 75 
	// Initialisation de variable et gestion des globales
76 
	$objet_pear_db = $_GEN_commun['pear_db'];
77 
	$id_site = $_GEN_commun['info_site']->gs_id_site;
78 
	if (isset($_GEN_commun['info_menu'])) {
79 
		$id_menu = $_GEN_commun['info_menu']->gm_id_menu;
80 
	}
81 
	$num_menu = $GLOBALS['_PAPYRUS_']['applette']['comptage'][$GLOBALS['_MENU_']['nom_fonction']];
82 
 
83 
	// Indentation du html
84 
	$indent_origine = 12;// Indentation de départ en nombre d'espace
85 
	$indent_pas = 4;// Pas d'indentation en nombre d'espace
86 
 
87 
	// Récupérations des arguments passés dans la balise.
88 
	// Pour les menus CLASSIQUE et COMMUN
89 
	$balise = $tab_applette_arguments[1];
90 
	$menu_type = $tab_applette_arguments[2];
91 
	$niveau_depart = (isset($tab_applette_arguments[3])) ? $tab_applette_arguments[3] : 1;
92 
	$profondeur = $tab_applette_arguments[4];
1848 jp_milcent 93 
	$menu_depart = 0;
2073 Jean-Pasca 94 
	// Si on indique un ID de menu de départ
95 
	if (isset($tab_applette_arguments[5]) && !empty($tab_applette_arguments[5])) {
96 
		$menu_depart = $tab_applette_arguments[6];
97 
	}
98 
	// Pour les menus UNIQUE
99 
	if (isset($tab_applette_arguments[7])) {
100 
		$menu_type = $tab_applette_arguments[7]; // Type de menu : UNIQUE
101 
	}
102 
	if (isset($tab_applette_arguments[8])) {
103 
		$menu_depart = $tab_applette_arguments[8]; // ID du menu de type UNIQUE
104 
	}
105 
	// Pour les balises menus avec NUMID en dur
106 
	// Gestion du numéro unique pour l'attribut id des li des menus
107 
	if (isset($tab_applette_arguments[9])) {
108 
		$num_menu = $tab_applette_arguments[9];
109 
	}
110 
 
111 
	// Gestion du type de menu
112 
	switch ($menu_type) {
113 
		case 'COMMUN' :
114 
			$menu_type = 'commun';
115 
		break;
116 
		case 'UNIQUE' :
117 
			$menu_type = 'unique';
118 
		break;
119 
		case 'DEROULANT' :
120 
			$menu_type = 'deroulant';
121 
		break;
122 
		case 'CLASSIQUE' :
123 
		default:
124 
			$menu_type = 'classique';
125 
	}
1854 jp_milcent 126 
	// Si le niveau de départ est supérieur à 1 et qu'aucun id de menu n'a été indiqué dans la balise
1848 jp_milcent 127 
	$niveau_actuel = 1;
1854 jp_milcent 128 
	if (1 < $niveau_depart && 0 == $menu_depart && isset($id_menu)) {
1848 jp_milcent 129 
		$menu_depart = GEN_lireIdentifiantMenuPere($id_menu);
130 
		$niveau_actuel = GEN_donnerProfondeur($id_site, $id_menu);
131 
		//trigger_error("Niveau actuel du menu si$id_site:me$id_menu pour la balise {$tab_applette_arguments[0]} : $niveau_actuel", E_USER_NOTICE);
132 
	}
133 
 
2073 Jean-Pasca 134 
	//Construction du menu
135 
	$xhtml_menu = afficherListeNiveauMultiple(   $objet_pear_db, $id_site,$niveau_depart,
136 
													$profondeur, $menu_depart, 1, $menu_type, $indent_origine,
137 
													$indent_pas, $_GEN_commun, $num_menu, $niveau_actuel);
138 
 
139 
	// Si le menu est déroulant il faut stocker un peu de javascript pour IE
140 
	if ($menu_type == 'deroulant') {
141 
		GEN_stockerCodeScript ('sfHover = function() {
254 alex 142 
	var sfEls = document.getElementById("groupe_menu_1_0").getElementsByTagName("LI");
143 
	for (var i=0; i<sfEls.length; i++) {
144 
		sfEls[i].onmouseover=function() {
145 
			this.className+=" sfhover";
146 
		}
147 
		sfEls[i].onmouseout=function() {
899 alexandre_ 148 
			this.className=this.className.replace(new RegExp(" sfhover\\\\b"), "");
254 alex 149 
		}
150 
	}
151 
}
152 
if (window.attachEvent) window.attachEvent("onload", sfHover);') ;
2073 Jean-Pasca 153 
	}
154 
	//Si nous avons un
155 
	if (! empty($xhtml_menu)) {
156 
		$retour = $xhtml_menu;
157 
	} else {
158 
		$retour = '<!-- '.$balise.' : aucun menu trouvé ! -->';
159 
	}
160 
	return $retour;
1090 florian 161 
}
162 
 
163 
/** Fonction afficherListeNiveauMultiple() - Affiche une arborescence des menu classiques d'un site.
164 
*
165 
* Créé et retourne une liste pour chaque niveau de menu classique trouvé dans l'arborescence
166 
* des menus d'un site dans une langue donnée.
167 
* C'est une fonction récursive.
168 
*
169 
* @param  mixed   objet Pear DB de connexion à la base de données.
170 
* @param  integer identifiant d'un site.
171 
* @param  integer identifiant de la langue demandée.
172 
* @param  integer niveau de départ.
173 
* @param  integer niveau d'arrivée (profondeur max demandée).
174 
* @param  integer identifiant d'un menu pére.
175 
* @return  string  les listes de menus au format XHTML.
176 
*/
767 ddelon 177 
function afficherListeNiveauMultiple( &$objet_pear_db, $id_site,  $niveau_depart, $profondeur,
2073 Jean-Pasca 178 
										$id_pere_menu_a_deployer, $position, $menu_type, $indent_origine = 12,
179 
										$indent_pas = 4, $_GEN_commun, $num_menu, $niveau_actuel = 1)
1090 florian 180 
{
2073 Jean-Pasca 181 
	// Initialisation des variables
182 
	$retour = '';
183 
	$tete = '';
184 
	$corps = '';
185 
	$pied = '';
186 
	$i18n_url = '';
187 
	$id_langue = $_GEN_commun['i18n'];//identifiant de la langue choisie
188 
 
189 
	if ($id_langue != GEN_I18N_ID_DEFAUT) {
190 
		$i18n_url = $id_langue;
191 
	}
192 
 
1090 florian 193 
	if (isset($id_langue) && ($id_langue!='')) {
2073 Jean-Pasca 194 
		$langue_test = $id_langue;
1090 florian 195 
	} else {
2073 Jean-Pasca 196 
		$langue_test = GEN_I18N_ID_DEFAUT;
1090 florian 197 
	}
2073 Jean-Pasca 198 
 
199 
	// Récupération des infos sur sur l'entrée du menu à afficher
200 
	$menu_info = GEN_lireInfoMenu($objet_pear_db, $id_pere_menu_a_deployer, DB_FETCHMODE_ASSOC);
201 
	// Gestion des menus uniques
202 
	if ($menu_type == 'unique' && ($menu_info['gm_date_fin_validite'] == '0000-00-00 00:00:00' || strtotime($menu_info['gm_date_fin_validite']) > time() )) {
203 
		$retour .= afficherEntreeListeMenu( $objet_pear_db, $id_pere_menu_a_deployer, $i18n_url,
204 
											$niveau_actuel, 1, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu);
205 
		// Dans le cas, d'un menu unique, on retourne directement le résultat ici.
206 
		return $retour;
207 
	}
208 
	// On affiche un menu que si $profondeur <= $niveau_actuel <= $depart
209 
	if ($niveau_actuel > $profondeur) {
210 
		return null;
211 
	}
212 
 
213 
	// Nous regardons si nous devons afficher un menu racine
214 
	if ($id_pere_menu_a_deployer != 0 && $niveau_actuel == 1 && ($menu_info['gm_date_fin_validite'] == '' || $menu_info['gm_date_fin_validite'] == '0000-00-00 00:00:00' || strtotime($menu_info['gm_date_fin_validite']) > time() )) {
215 
		$tete .= 	str_repeat(' ', $indent_origine + ($indent_pas * $position)).
216 
					'<ul class="groupe_menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="menu_'.$menu_type.'_'.'n'.$niveau_actuel.'">'."\n";
217 
		$id_menu_selectionne = $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu;
218 
		if (!empty($id_menu_selectionne) && (GEN_etreAncetre($id_pere_menu_a_deployer, $id_menu_selectionne) || $id_pere_menu_a_deployer == $id_menu_selectionne) ) {
219 
			$classe = 'menu_actif';
220 
		} else {
221 
			$classe = 'menu_inactif';
222 
		}
223 
 
224 
		// Pour un menu dont on spécifie l'identifiant du menu départ, on affiche ce menu.
225 
		$corps .=  str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))).
226 
					'<li id="menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="'.$classe.'">'."\n";
227 
		$corps .= afficherEntreeListeMenu( $objet_pear_db, $id_pere_menu_a_deployer, $i18n_url,
228 
											$niveau_actuel, 1, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu);
229 
	}
230 
 
231 
	if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
232 
		$tete .= 	str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))).
233 
					'<ul id="groupe_menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="menu_'.$menu_type.'_'.'n'.$niveau_actuel.'">'."\n";
234 
	}
235 
 
236 
	$requete =  'SELECT gm_id_menu, gm_date_fin_validite, gm_ce_i18n , GMR01.gmr_ordre, gm_nom '.
237 
				'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
238 
				'WHERE GMR01.gmr_id_menu_01 = gm_id_menu '.
239 
				'AND GMR01.gmr_id_valeur = 1 '.// 1 = "avoir père"
240 
				'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
241 
				'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '.
242 
				'AND (gm_ce_i18n  = "'.GEN_I18N_ID_DEFAUT.'" '.
243 
				'OR gm_ce_i18n  = "'.$langue_test.'" )' ;
244 
 
245 
	$requete .= 'AND GMR01.gmr_id_menu_02 = '.$id_pere_menu_a_deployer.' ';
246 
 
247 
	if ($menu_type == 'classique' || $menu_type == 'deroulant') {
248 
		$requete .= 'AND gm_ce_site = '.$id_site.' '.
249 
					'AND GMR02.gmr_id_valeur = 100 '.// 100 = type "menu classique"
250 
					'ORDER BY GMR01.gmr_ordre ASC';
251 
	} else if ($menu_type == 'commun') {
252 
		$requete .= 'AND gm_ce_site = 0 '.
253 
					'AND GMR02.gmr_id_valeur = 102 '.// 102 = type "menu commun"
254 
					'ORDER BY GMR01.gmr_ordre ASC';
255 
	}
256 
 
257 
	$resultat = $objet_pear_db->query($requete);
258 
	(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
259 
 
260 
	$liste_menu=array();
261 
 
262 
	// On ne retient pas les menus qui sont des traductions ...
263 
	while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
264 
		if ($langue_test == GEN_I18N_ID_DEFAUT) {
265 
 
266 
			// Le menu n'est pas une traduction : on le traite
267 
			$requete_est_traduction =   'SELECT gmr_id_menu_01 '.
268 
								'FROM  gen_menu_relation '.
269 
								'WHERE '.$ligne->gm_id_menu.' = gmr_id_menu_02 ' .
270 
								'AND gmr_id_menu_01 <> gmr_id_menu_02  '.
271 
								'AND  gmr_id_valeur  = 2 ';// 2 = "avoir traduction"
272 
			$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction);
273 
			(DB::isError($resultat_est_traduction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction)) : '';
274 
 
275 
			if ( $resultat_est_traduction->numRows() == 0 ) {
276 
				$liste_menu[]=$ligne;
277 
			}
278 
		} else { // Par defaut, on traite tous les menus trouvés
279 
				$liste_menu[]=$ligne;
280 
		}
281 
	}
282 
 
1090 florian 283 
	if (!function_exists('cmp')) {
284 
		function cmp($a, $b) {
2073 Jean-Pasca 285 
			if ($a->gmr_ordre == $b->gmr_ordre) {
286 
				return 0;
1090 florian 287 
			}
288 
			return ($a->gmr_ordre < $b->gmr_ordre) ? -1 : 1;
289 
		}
290 
	}
291 
 
292 
	usort ($liste_menu,"cmp");
293 
 
2073 Jean-Pasca 294 
	foreach ($liste_menu as $ligne) {
295 
		if ($ligne->gm_date_fin_validite == '' || $ligne->gm_date_fin_validite == '0000-00-00 00:00:00' || strtotime($ligne->gm_date_fin_validite) > time()) {
296 
			// On ne retient pas egalement les menu reserve a une seule langue
297 
 			$requete_restriction = 	'SELECT gmr_id_menu_02 '.
298 
										'FROM  gen_menu_relation '.
299 
										'WHERE '.$ligne->gm_id_menu.' = gmr_id_menu_01 ' .
300 
										'AND  gmr_id_valeur  = 106 ';// 106 restriction de menu
301 
			$resultat_restriction = $objet_pear_db->query($requete_restriction);
302 
			(DB::isError($resultat_restriction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_restriction->getMessage(), $requete_restriction)) : '';
1673 ddelon 303 
 
2073 Jean-Pasca 304 
			if ($resultat_restriction->numRows()>0 && $langue_test!=$ligne->gm_ce_i18n) {
305 
				$select_menu=0;
306 
			}
307 
			else {
308 
				$select_menu=1;
309 
			}
310 
 
311 
			if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur  && $select_menu == 1) {
312 
				$id_menu_inf = $ligne->gm_id_menu;
313 
				$id_menu_selectionne = '';
314 
				if (isset($GLOBALS['_GEN_commun']['info_menu']->gm_id_menu)) {
315 
					$id_menu_selectionne = $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu;
316 
				}
317 
				// On vérifie si le menu est le menu sélectionné
318 
				if (!empty($id_menu_selectionne) && (GEN_etreAncetre($id_menu_inf, $id_menu_selectionne) || $id_menu_inf == $id_menu_selectionne) ) {
319 
					$classe = 'menu_actif';
320 
				} else {
321 
					$classe = 'menu_inactif';
322 
				}
323 
 
324 
				$tmp= afficherEntreeListeMenu( $objet_pear_db, $id_menu_inf, $niveau_actuel,
325 
													$ligne->gmr_ordre, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu);
326 
				// Affichage du menu
327 
 
328 
				if ($tmp!='') {
329 
					$corps .=   str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2))).
330 
							'<li id="menu_'.$num_menu.'_'.$id_menu_inf.'" class="'.$classe.'">'."\n";
331 
					$corps .= $tmp;
332 
				}
333 
			}
334 
			// Pour chaque menu on regarde s'il y a des fils. Si oui, on les déploie.
335 
			$requete_fils = 'SELECT gm_id_menu '.
336 
							'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '.
337 
							'WHERE GMR01.gmr_id_menu_02 = '.$ligne->gm_id_menu.' '.
338 
							'AND GMR01.gmr_id_menu_01 = gm_id_menu '.
339 
							'AND GMR01.gmr_id_valeur = 1 '.// 1 = "avoir père"
340 
							'AND GMR02.gmr_id_menu_02 = gm_id_menu '.
341 
							'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 ' ;
342 
			if ($menu_type == 'classique') {
343 
				$requete_fils .='AND GMR02.gmr_id_valeur = 100 ' ;// 100 = type "menu classique"
344 
			}
345 
			if ($menu_type == 'commun') {
346 
				$requete_fils .='AND GMR02.gmr_id_valeur = 102 '; // 102 = type "menu commun"
347 
			}
348 
			$requete_fils .= 'ORDER BY GMR01.gmr_ordre ASC LIMIT 0,1';
349 
 
350 
			$resultat_fils = $objet_pear_db->query($requete_fils);
351 
			(DB::isError($resultat_fils)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_fils->getMessage(), $requete_fils)) : '';
352 
 
353 
			if (isset($_GEN_commun['info_menu'])) {
354 
				if ($resultat_fils->numRows() != 0 && $ligne->gm_id_menu == $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu
355 
					|| GEN_etreAncetre($ligne->gm_id_menu, $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu) || $menu_type == 'deroulant') {
356 
					$niveau_actuel++;
357 
					$corps .= afficherListeNiveauMultiple( $objet_pear_db, $id_site, $niveau_depart,
358 
																$profondeur, $ligne->gm_id_menu, ($position + 3), $menu_type,
359 
																null, null, $_GEN_commun, $num_menu, $niveau_actuel);
360 
					// On ramène $niveau_actuel un cran plus bas
361 
					$niveau_actuel--;
362 
				}
363 
			}
364 
 
365 
			if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
366 
				$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2))).'</li>'."\n";
367 
			}
368 
 
369 
			$resultat_fils->free();
370 
		}
371 
	}
372 
 
373 
	if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) {
374 
		$pied .= str_repeat(' ', $indent_origine + ($indent_pas * $position+ 1)).'</ul>'."\n";
375 
	}
376 
 
377 
	// Nous regardons si nous avons affiché le menu racine
378 
	if ($id_pere_menu_a_deployer != 0 && $niveau_actuel == 1) {
379 
		$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))).'</li>'."\n";
380 
		$pied .= str_repeat(' ', $indent_origine + ($indent_pas * $position)).'</ul>'."\n";
381 
	}
382 
 
383 
	if (empty($corps)) {
384 
		return $retour;
385 
	} else {
386 
		$retour = $tete.$corps.$pied;
387 
		return $retour;
388 
	}
1090 florian 389 
}
390 
 
391 
/** Fonction afficherEntreeListeMenu() - Contruit une entrée dans une liste du menu d'un site.
392 
*
393 
* Cette fonction retourne une entrée dans la liste du menu d'un site (<a></a>).
394 
* Le menu est un lien.
395 
* Necessite l'utilisation de Pear Net_URL par le programme appelant cette fonction.
396 
*
397 
* @param  mixed   objet Pear DB de connexion à la base de données.
398 
* @param  integer niveau du menu.
399 
* @param  integer ordre du menu dans le niveau.
400 
* @return  string  liste représentant le menu duHTML
401 
*
402 
* $menu_id : identifiant du menu (!= code menu)
403 
*/
404 
function afficherEntreeListeMenu($db, $menu_id, $niveau, $ordre, $position, $menu_type, $indent_origine = 12, $indent_pas = 4, $_GEN_commun, $num_menu)
405 
{
2073 Jean-Pasca 406 
	$id_langue = $GLOBALS['_GEN_commun']['i18n'];
1090 florian 407 
 
2073 Jean-Pasca 408 
	if (isset($id_langue) && ($id_langue != '')) {
409 
		$langue_test = $id_langue;
1090 florian 410 
	} else {
2073 Jean-Pasca 411 
		$langue_test = GEN_I18N_ID_DEFAUT;
1090 florian 412 
	}
413 
 
2073 Jean-Pasca 414 
	$requete_traduction = 'SELECT gmr_id_menu_02,  gm_ce_i18n '.
415 
							'FROM  gen_menu_relation, gen_menu '.
416 
							'WHERE '.$menu_id.' = gmr_id_menu_01 ' .
417 
							'AND  gmr_id_menu_02  = gm_id_menu   '.
418 
							'AND  gmr_id_valeur  = 2 '.// 2 = "avoir traduction"
419 
							'AND gm_ce_i18n = "'.$langue_test.'" ';
1090 florian 420 
	$resultat_traduction = $db->query($requete_traduction);
2073 Jean-Pasca 421 
	(DB::isError($resultat_traduction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction)) : '';
1090 florian 422 
 
423 
	if ($resultat_traduction->numRows() > 0) {
424 
		$ligne_resultat_traduction=$resultat_traduction->fetchRow(DB_FETCHMODE_ASSOC);
425 
		$menu_id=$ligne_resultat_traduction['gmr_id_menu_02'];
2073 Jean-Pasca 426 
	} else {
1090 florian 427 
		// Ne sont affichés que les traductions par defaut des menus
428 
		// non traduits
429 
		// Ici : pas de traduction
430 
			if ($langue_test!=GEN_I18N_ID_DEFAUT) {
2073 Jean-Pasca 431 
				$requete_defaut = 	'SELECT gmr_id_menu_02 '.
432 
									'FROM  gen_menu_relation '.
433 
									'WHERE '.$menu_id. ' = gmr_id_menu_01 ' .
434 
									'AND  gmr_id_valeur  = 105 ';// 105 Traduction par defaut
1090 florian 435 
				$resultat_defaut = $db->query($requete_defaut);
2073 Jean-Pasca 436 
				(DB::isError($resultat_defaut)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_defaut->getMessage(), $requete_defaut)) : '';
1090 florian 437 
				if ($resultat_defaut->numRows() > 0) {
2073 Jean-Pasca 438 
					$ligne_resultat_defaut=$resultat_defaut->fetchRow(DB_FETCHMODE_ASSOC);
439 
					$menu_id=$ligne_resultat_defaut['gmr_id_menu_02'];
1090 florian 440 
				}
441 
			}
442 
 
2073 Jean-Pasca 443 
	}
1090 florian 444 
 
2073 Jean-Pasca 445 
	// Récupération des infos sur sur l'entrée du menu à afficher
446 
	$menu_info = GEN_lireInfoMenu($db, $menu_id, DB_FETCHMODE_ASSOC);
447 
 
448 
	// Préparation d'une entrée dans la liste du menu
449 
	$menu_nom = htmlentities($menu_info['gm_nom']);
450 
 
1090 florian 451 
 
2073 Jean-Pasca 452 
	if (trim($menu_nom) == '') return '';
453 
 
454 
	$menu_accesskey = '';
455 
	$raccourci_txt = '';
456 
	if ($menu_info['gm_raccourci_clavier'] != '') {
457 
		$menu_accesskey = htmlentities($menu_info['gm_raccourci_clavier']);
458 
		$raccourci_txt = '[Raccourci : Alt+'.$menu_accesskey.' ] ';
459 
		$menu_accesskey = 'accesskey="'.$menu_accesskey.'" ';
460 
	}
461 
	$menu_texte_title = '';
462 
	if ($menu_info['gm_description_resume'] != '' && $menu_info['gm_description_resume'] != $menu_info['gm_nom']) {
463 
		$menu_texte_title = htmlentities($menu_info['gm_description_resume']);
464 
		$menu_texte_title = 'title="'.$raccourci_txt.$menu_texte_title.'" ';
465 
	}
466 
 
467 
	$une_url =& new Pap_URL(PAP_URL);
468 
	$une_url->setId($menu_id);
1090 florian 469 
 
2073 Jean-Pasca 470 
	if (isset($id_langue) && ($id_langue != '')) {
471 
		$une_url->addQuerystring(GEN_URL_CLE_I18N, $id_langue);
472 
	}
473 
 
474 
	//Création d'une entrée dans la liste du menu
475 
	$espaces = str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2)));
476 
	$retour  =  $espaces.'<a id="menu_lien_'.$num_menu.'_'.$menu_id.'" href="'.$une_url->getURL().'" '.$menu_texte_title.$menu_accesskey.'>'.$menu_nom.'</a>'."\n";
477 
	return $retour;
39 jpm 478 
}
4 jpm 479 
?>