New file |
0,0 → 1,250 |
<?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: plan.php,v 1.1 2004-06-16 14:34:53 jpm Exp $ |
/** |
* Application réalisant le plan d'un site web géré par Papyrus. |
* |
* Construit une liste de listes représentant le plan du site web appelant cette |
* application. Cette application est fortement dépendante de Papyrus puisqu'elle se |
* base sur le modèle de données de Papyrus. |
* |
*@package Plan |
//Auteur original : |
*@author Alexandre GRANIER <alexandrel@tela-botanica.org> |
//Autres auteurs : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.1 $ $Date: 2004-06-16 14:34:53 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
|
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/*Mettre ici les inclusions de fichiers*/ |
/** <br> Constante permettatn de configurer l'application en affichant que le plan du site courant si sa valeur vaut true.*/ |
define('PLAN_SITE_COURRANT', false); |
define('PLAN_URL_CLE_SITE', GEN_URL_CLE_SITE); |
define('PLAN_URL_CLE_MENU', GEN_URL_CLE_MENU); |
define('PLAN_URL_CLE_I18N', GEN_URL_CLE_I18N); |
define('PLAN_URL_ID_TYPE_SITE', GEN_URL_ID_TYPE_SITE); |
define('PLAN_URL_ID_TYPE_MENU', GEN_URL_ID_TYPE_MENU); |
|
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/*Mettre ici le code du programme*/ |
/** Fonction afficherContenuTete() - Fonction appelé par le gestionnaire Papyrus. |
* |
* Elle retourne l'entête de l'application.. |
* |
* @return string du code XHTML correspondant à la zone d'entête de l'application. |
*/ |
function afficherContenuTete() |
{ |
return ''; |
} |
|
/** Fonction afficherContenuCorps() - Fonction appelé par le gestionnaire Papyrus. |
* |
* Elle démarre la création de la liste contenant le plan du site. |
* |
* @return string le code HTML produit par l'application. |
*/ |
function afficherContenuCorps() |
{ |
global $_GEN_commun; |
$objet_pear_db = $_GEN_commun['pear_db']; |
$i18n_url = '';// Evite d'écrire l'i18n dans l'url demandée. |
if (!empty($_GEN_commun['url_i18n'])) { |
// L'écriture de l'i18n dans les urls des menus est demandée. |
$i18n_url = $_GEN_commun['url_i18n']; |
} |
|
// Si on veut seulement le plan du site courrant. |
if (PLAN_SITE_COURRANT) { |
$id_site_principal_courant = $_GEN_commun['info_site']->gs_id_site; |
} |
|
$retour = ''; |
|
// On effectue une requête sur le site principal puis |
// on effectue une requête sur les menus, on les affiche. |
$requete = 'SELECT *'. |
'FROM gen_site, gen_site_relation '. |
'WHERE gs_id_site = gsr_id_site_01 '. |
'AND gsr_id_valeur = 102 ';// 102 = site de type "principal" |
// Si on veut seulement le plan du site courrant. |
if (PLAN_SITE_COURRANT) { |
$requete .= 'AND gs_id_site = '.$id_site_principal_courant; |
} |
|
$resultat = $objet_pear_db->query($requete); |
(DB::isError ($resultat)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) |
: ''; |
|
// Si on veut seulement le plan du site courrant. |
if (PLAN_SITE_COURRANT) { |
$retour .= '<h1 id="titre_page">Plan du site</h1>'."\n"; |
} else { |
$retour .= '<h1 id="titre_page">Plan des sites</h1>'."\n"; |
} |
|
$retour .= '<ul id="plan_site" >'."\n"; |
while ($ligne_site = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) { |
$retour .= '<li class="nom_site" >'.$ligne_site->gs_nom."\n"; |
$retour .= PLAN_deployerPlanSite($ligne_site->gs_id_site, 0, $i18n_url); |
$retour .= '</li>'."\n"; |
} |
$resultat->free(); |
$retour.= '</ul>'; |
return $retour; |
} |
|
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/*Mettre ici la liste de fonctions.*/ |
/** Fonction PLAN_deployerPlanSite() - Déploie les menus d'un site. |
* |
* Affiche une liste de listes XHTML représentant le plan du site courant. |
* |
* @param int identifiant du site dont on veut afficher le plan. |
* @param int identifiant du menu père de celui qui va être affiché. |
* @param mixed Si pas vide contient la valeur i18n à afficher dans l'url. |
* @return string une liste de listes XHTML représentant le plan du site. |
*/ |
|
function PLAN_deployerPlanSite($id_site, $id_pere = 0, $i18n_url) |
{ |
global $_GEN_commun; |
$objet_pear_db = $_GEN_commun['pear_db']; |
|
$retour = ''; |
|
$requete = 'SELECT gen_menu.* '. |
'FROM 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 gm_ce_site = '.$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 = $objet_pear_db->query($requete); |
if (DB::isError($resultat)) { |
die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)); |
} |
|
if ($resultat->numRows() > 0) { |
$retour .= '<ul>'; |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) { |
$objet_pear_url_base = & new Net_URL('http://'.$_SERVER['HTTP_HOST'].$_SERVER['PHP_SELF']); |
|
// Recherche du code du site |
$requete_site_code = 'SELECT gen_site.* '. |
'FROM gen_menu, gen_site '. |
'WHERE gm_id_menu = '.$ligne->gm_id_menu.' '. |
'AND gm_ce_site = gs_id_site'; |
|
$resultat_site_code = $objet_pear_db->query($requete_site_code); |
if (DB::isError($resultat_site_code)) { |
die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_site_code->getMessage(), $requete_site_code)); |
} |
$ligne_site_code = $resultat_site_code->fetchRow(DB_FETCHMODE_OBJECT); |
|
if (PLAN_URL_ID_TYPE_SITE == 'int') { |
$objet_pear_url_base->addQueryString(PLAN_URL_CLE_SITE, $ligne_site_code->gs_code_num); |
} else { |
$objet_pear_url_base->addQueryString(PLAN_URL_CLE_SITE, $ligne_site_code->gs_code_alpha); |
} |
|
if (PLAN_URL_ID_TYPE_MENU == 'int') { |
$objet_pear_url_base->addQueryString(PLAN_URL_CLE_MENU, $ligne->gm_code_num); |
} else { |
$objet_pear_url_base->addQueryString(PLAN_URL_CLE_MENU, $ligne->gm_code_alpha); |
} |
$objet_pear_url = $objet_pear_url_base; |
if (!empty($i18n_url)) { |
$objet_pear_url->addQueryString(PLAN_URL_CLE_I18N, $i18n_url); |
} |
$url = $objet_pear_url->getURL(); |
$retour .= '<li class="nom_menu">'."\n"; |
$retour .= '<a href="'.$url.'">'.$ligne->gm_nom.'</a> '."\n"; |
|
// Recherche des traductions |
$requete_i18n = 'SELECT gm_id_menu, gm_ce_i18n '. |
'FROM gen_menu, gen_menu_relation '. |
'WHERE gmr_id_menu_01 = '.$ligne->gm_id_menu.' '. |
'AND gmr_id_menu_02 = gm_id_menu '. |
'AND gmr_id_valeur = 2 ';// 2 = "avoir traduction" |
|
$resultat_i18n = $objet_pear_db->query($requete_i18n); |
(DB::isError($resultat_i18n)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_i18n->getMessage(), $requete_i18n)) : ''; |
|
if ($resultat_i18n->numRows() > 0) { |
while ($ligne_i18n = $resultat_i18n->fetchRow(DB_FETCHMODE_OBJECT)) { |
$objet_pear_url = $objet_pear_url_base; |
$objet_pear_url->addQueryString(PLAN_URL_CLE_I18N, $ligne_i18n->gm_ce_i18n); |
$url = $objet_pear_url->getURL(); |
$retour .= '<a href="'.$url.'" hreflang="'.$ligne_i18n->gm_ce_i18n.'">['.$ligne_i18n->gm_ce_i18n.']</a> '."\n"; |
} |
} |
|
$retour .= PLAN_deployerPlanSite($id_site, $ligne->gm_id_menu, $i18n_url); |
$retour .= '</li>'."\n"; |
} |
$retour .= '</ul>'."\n"; |
} |
|
return $retour; |
} |
|
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/*Partie non obligatoire*/ |
|
|
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.7 2004/05/05 15:33:59 jpm |
* Gestion de l'indication des langues disponibles pour un menu d'un site donné. |
* |
* Revision 1.6 2004/05/05 14:33:00 jpm |
* Gestion de l'indication de langue dans l'url. |
* Utile que si on veut forcer la langue. |
* |
* Revision 1.5 2004/05/05 06:45:51 jpm |
* Suppression de l'appel de la fonction générant le "vous êtes ici" dans la fonction affichant l'entête de l'application. |
* |
* Revision 1.4 2004/05/04 16:27:27 jpm |
* Réduction de code pour la fonction afficherContenuTete(). |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
?> |