WebSVN – Applications.papyrus – Diff – /trunk/papyrus/applications/plan/plan.php

 // |                                                                                                      |
 // | 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.2 2005-02-28 10:38:24 jpm Exp $
+// CVS : $Id: plan.php,v 1.3 2005-04-19 17:21:02 jpm Exp $
 /**
 * Application réalisant le plan d'un site web géré par Papyrus.
+*
 * Construit une liste de listes représentant le plans des sites web gérés par Papyrus.
 * Cette application est fortement dépendante de Papyrus puisqu'elle se base sur
 //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.2 $ $Date: 2005-02-28 10:38:24 $
+*@version       $Revision: 1.3 $ $Date: 2005-04-19 17:21:02 $
 // +------------------------------------------------------------------------------------------------------+
 */
 // +------------------------------------------------------------------------------------------------------+
 // |                                            ENTÊTE du PROGRAMME                                       |
 // +------------------------------------------------------------------------------------------------------+
 /** 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_SITE_COURRANT', false);
-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);
+define('PLAN_AFFICHER_PERMALIEN', false);
 // +------------------------------------------------------------------------------------------------------+
 // |                                            CORPS du PROGRAMME                                        |
+*
 * @return  string  le code HTML produit par l'application.
 */
 function afficherContenuCorps()
+{
-    $objet_pear_db = $GLOBALS['_GEN_commun']['pear_db'];
-    // Evite d'écrire l'i18n dans l'url demandée.
+    // Initialisation des variables
-    $i18n_url = '';
-    if (!empty($GLOBALS['_GEN_commun']['url_i18n'])) {
-        // L'écriture de l'i18n dans les urls des menus est demandée.
-        $i18n_url = $GLOBALS['_GEN_commun']['url_i18n'];
-    }
-    // Si on veut seulement le plan du site courrant.
-    if (PLAN_SITE_COURRANT) {
-        $id_site_principal_courant = $GLOBALS['_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 '.
+    $bdd =& $GLOBALS['_GEN_commun']['pear_db'];
-                '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;
+    $site_courant_id = $GLOBALS['_GEN_commun']['info_site']->gs_id_site;
-    }
-    $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) {
-    if (PLAN_SITE_COURRANT) {
+        $aso_sites = GEN_lireInfoSitePrincipal($bdd, $site_courant_id, DB_FETCHMODE_ASSOC);
-        $retour .= '<h1 id="titre_page">Plan du site</h1>'."\n";
+        $retour .= '<h1 id="titre_page">'.'Plan du site'.'</h1>'."\n";
+    } else {
-    } else {
+        $aso_sites = GEN_lireInfoSites($bdd, DB_FETCHMODE_ASSOC);
-        $retour .= '<h1 id="titre_page">Plan des sites</h1>'."\n";
+        $retour .= '<h1 id="titre_page">'.'Plan des sites'.'</h1>'."\n";
+    }
-    }
+    foreach ($aso_sites as $cle => $site) {
+        if (count($aso_sites) > 1) {
+            if (!empty($site['gs_titre'])) {
+                $titre = $site['gs_titre'];
+            } else {
+                $titre = $site['gs_nom'];
+            }
-    $retour .= '<ul id="plan_site" >'."\n";
+            $retour .= '<h2>'.$titre.'</h2>'."\n";
+        }
-    while ($ligne_site = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
+        $retour .= '<ul class="plan_site_'.$site['gs_nom'].'" >'."\n";
-        $retour .= '<li class="nom_site" >'.$ligne_site->gs_nom."\n";
+        $aso_menus = GEN_retournerTableauMenusSiteCodeAlpha($bdd, $site['gs_code_alpha']);
-        $retour .= PLAN_deployerPlanSite($ligne_site->gs_id_site, 0, $i18n_url);
+        $retour .= parserTableauMenus($aso_menus, PLAN_AFFICHER_PERMALIEN);
-        $retour .= '</li>'."\n";
-    }
+        $retour .= '</ul>'."\n";
     $resultat->free();
     $retour.= '</ul>';
     return $retour;
+}
-// +------------------------------------------------------------------------------------------------------+
-// |                                           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.
+// |                                           LISTE de FONCTIONS                                         |
-* @return  string  une liste de listes XHTML représentant le plan du site.
+// +------------------------------------------------------------------------------------------------------+
-*/
-function PLAN_deployerPlanSite($id_site, $id_pere = 0, $i18n_url)
-{
-    $objet_pear_db = $GLOBALS['_GEN_commun']['pear_db'];
+function parserTableauMenus($aso_menus, $permalien)
+    {
-    $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 '.
+        $retour = '';
-                '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));
-    }
+        // Création de l'url
-    if ($resultat->numRows() > 0) {
-        $retour .= '<ul>';
-        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
+        foreach ($aso_menus as $menu_id => $menu_valeur) {
-            $objet_pear_url_base = & new Net_URL('http://'.$_SERVER['HTTP_HOST'].$_SERVER['PHP_SELF']);
+            if ($menu_valeur['gm_date_fin_validite'] == '0000-00-00 00:00:00' || strtotime($menu_valeur['gm_date_fin_validite']) > time() ) {
-            // 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';
+                $retour .= '<li>';
-            $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));
+                // Création de l'url
-            }
+                $une_url =& new Pap_URL();
-            $ligne_site_code = $resultat_site_code->fetchRow(DB_FETCHMODE_OBJECT);
+                $une_url->setId($menu_id);
-            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 {
+                // Construction de l'attribut title
-                $objet_pear_url_base->addQueryString(PLAN_URL_CLE_MENU, $ligne->gm_code_alpha);
+                $title = '';
-            }
+                if (!empty($menu_valeur['gm_titre'])) {
-            $objet_pear_url = $objet_pear_url_base;
+                    $title = ' title="'.$menu_valeur['gm_titre'].'"';
-            if (!empty($i18n_url)) {
-                $objet_pear_url->addQueryString(PLAN_URL_CLE_I18N, $i18n_url);
-            }
-            $url = $objet_pear_url->getURL();
+                } elseif (!empty($menu_valeur['gm_titre_alternatif'])) {
-            $retour .= '<li class="nom_menu">'."\n";
+                    $title = ' title="'.$menu_valeur['gm_titre_alternatif'].'"';
-            $retour .= '<a href="'.$url.'">'.$ligne->gm_nom.'</a>&nbsp;'."\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 '.
+                // Construction du lien
-                            'AND gmr_id_valeur = 2 ';// 2 = "avoir traduction"
-            $resultat_i18n = $objet_pear_db->query($requete_i18n);
+                $retour .= '<a href="'.$une_url->getURL().'"'.$title.'>'.$menu_valeur['gm_nom'].'</a>';
-            (DB::isError($resultat_i18n)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_i18n->getMessage(), $requete_i18n)) : '';
-            if ($resultat_i18n->numRows() > 0) {
+                // Nous affichons ou pas le permalien
-                while ($ligne_i18n = $resultat_i18n->fetchRow(DB_FETCHMODE_OBJECT)) {
+                if ($permalien) {
-                    $objet_pear_url = $objet_pear_url_base;
-                    $objet_pear_url->addQueryString(PLAN_URL_CLE_I18N, $ligne_i18n->gm_ce_i18n);
+                    $une_url->setPermalien(true);
+                    $retour .= ' <span class="plan_permalien">'.'('.$une_url->getURL().')'.'</span>';
+                    $une_url->setPermalien(false);
+                }
+                // Nous ajoutons les sous-menus s'il y en a.
+                $retour_menus = parserTableauMenus($menu_valeur['sous_menus'], $permalien);
+                if ($retour_menus != '') {
+                    $retour .= "\n".'<ul>'."\n".$retour_menus."\n".'</ul>'."\n";
                     $url = $objet_pear_url->getURL();
-                    $retour .= '<a href="'.$url.'" hreflang="'.$ligne_i18n->gm_ce_i18n.'">['.$ligne_i18n->gm_ce_i18n.']</a>&nbsp;'."\n";
-                }
-            }
-            $retour .= PLAN_deployerPlanSite($id_site, $ligne->gm_id_menu, $i18n_url);
+                $retour .= '</li>'."\n";
             $retour .=  '</li>'."\n";
-        }
-        $retour .= '</ul>'."\n";
-    }
     return $retour;
         return $retour;
+    }
 // +------------------------------------------------------------------------------------------------------+
 // |                                            PIED du PROGRAMME                                         |
 // +------------------------------------------------------------------------------------------------------+
+/* +--Fin du code ----------------------------------------------------------------------------------------+
+*
 * $Log: not supported by cvs2svn $
-/* +--Fin du code ----------------------------------------------------------------------------------------+
+* Revision 1.2  2005/02/28 10:38:24  jpm
 * Modification de l'utilisation d'une variable globale.
 * $Log: not supported by cvs2svn $

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/applications/plan/plan.php – Rev 278 → 349