Subversion Repositories Applications.papyrus

Rev

Rev 1030 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
6 jpm 1
<?php
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
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
// +------------------------------------------------------------------------------------------------------+
1030 jp_milcent 22
// CVS : $Id: plan.php,v 1.7 2006-10-11 18:05:15 jp_milcent Exp $
6 jpm 23
/**
24
* Application réalisant le plan d'un site web géré par Papyrus.
25
*
278 jpm 26
* Construit une liste de listes représentant le plans des sites web gérés par Papyrus.
27
* Cette application est fortement dépendante de Papyrus puisqu'elle se base sur
28
* le modèle de données de Papyrus.
6 jpm 29
*
30
*@package Plan
31
//Auteur original :
32
*@author        Alexandre GRANIER <alexandrel@tela-botanica.org>
33
//Autres auteurs :
34
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
35
*@copyright     Tela-Botanica 2000-2004
1030 jp_milcent 36
*@version       $Revision: 1.7 $ $Date: 2006-10-11 18:05:15 $
6 jpm 37
// +------------------------------------------------------------------------------------------------------+
38
*/
39
 
40
// +------------------------------------------------------------------------------------------------------+
41
// |                                            ENTÊTE du PROGRAMME                                       |
42
// +------------------------------------------------------------------------------------------------------+
278 jpm 43
/** Constante permettatn de configurer l'application en affichant que le plan du site courant si sa valeur vaut true.*/
6 jpm 44
define('PLAN_SITE_COURRANT', false);
349 jpm 45
define('PLAN_AFFICHER_PERMALIEN', false);
6 jpm 46
 
754 ddelon 47
/** Inclusion du fichier de configuration de cette application.*/
48
require_once GEN_CHEMIN_PAP.'applications/plan/configuration/plan_config.inc.php';
49
 
50
// Inclusion des fichiers de traduction de l'applette.
51
if (file_exists(PLAN_CHEMIN_LANGUE.'plan_langue_'.$_GEN_commun['i18n'].'.inc.php')) {
52
    require_once PLAN_CHEMIN_LANGUE.'plan_langue_'.$_GEN_commun['i18n'].'.inc.php';
53
} else {
54
    require_once PLAN_CHEMIN_LANGUE.'plan_langue_'.PLAN_I18N_DEFAUT.'.inc.php';
55
}
56
 
6 jpm 57
// +------------------------------------------------------------------------------------------------------+
58
// |                                            CORPS du PROGRAMME                                        |
59
// +------------------------------------------------------------------------------------------------------+
60
/** Fonction afficherContenuTete() - Fonction appelé par le gestionnaire Papyrus.
61
*
62
* Elle retourne l'entête de l'application..
63
*
64
* @return  string  du code XHTML correspondant à la zone d'entête de l'application.
65
*/
66
function afficherContenuTete()
67
{
68
    return '';
69
}
70
 
71
/** Fonction afficherContenuCorps() - Fonction appelé par le gestionnaire Papyrus.
72
*
73
* Elle démarre la création de la liste contenant le plan du site.
74
*
75
* @return  string  le code HTML produit par l'application.
76
*/
77
function afficherContenuCorps()
78
{
349 jpm 79
    // Initialisation des variables
6 jpm 80
    $retour = '';
349 jpm 81
    $bdd =& $GLOBALS['_GEN_commun']['pear_db'];
82
    $site_courant_id = $GLOBALS['_GEN_commun']['info_site']->gs_id_site;
6 jpm 83
 
84
    // Si on veut seulement le plan du site courrant.
85
    if (PLAN_SITE_COURRANT) {
349 jpm 86
        $aso_sites = GEN_lireInfoSitePrincipal($bdd, $site_courant_id, DB_FETCHMODE_ASSOC);
754 ddelon 87
        $retour .= '<h1 id="titre_page">'.PLAN_PLAN_DU_SITE.'</h1>'."\n";
349 jpm 88
    } else {
89
        $aso_sites = GEN_lireInfoSites($bdd, DB_FETCHMODE_ASSOC);
754 ddelon 90
        $retour .= '<h1 id="titre_page">'.PLAN_PLAN_DES_SITES.'</h1>'."\n";
6 jpm 91
    }
92
 
349 jpm 93
    foreach ($aso_sites as $cle => $site) {
540 alexandre_ 94
    	// On ignore le site admin
1014 florian 95
    	if ($site['gs_code_alpha'] == 'admin' && $GLOBALS['_GEN_commun']['info_site']->gs_code_alpha!='admin') continue;
540 alexandre_ 96
 
1014 florian 97
        if (count($aso_sites) >= 1) {
349 jpm 98
            if (!empty($site['gs_titre'])) {
99
                $titre = $site['gs_titre'];
100
            } else {
101
                $titre = $site['gs_nom'];
102
            }
1030 jp_milcent 103
            $url_site =& new Pap_URL();
104
            $url_site->setUrlType('SITE');
105
            $url_site->setId($site['gs_id_site']);
106
            $retour .= '<h2><a href="'.$url_site->getUrl().'">'.htmlentities($titre).'</a></h2>'."\n";
349 jpm 107
        }
108
        $retour .= '<ul class="plan_site_'.$site['gs_nom'].'" >'."\n";
109
        $aso_menus = GEN_retournerTableauMenusSiteCodeAlpha($bdd, $site['gs_code_alpha']);
110
        $retour .= parserTableauMenus($aso_menus, PLAN_AFFICHER_PERMALIEN);
111
        $retour .= '</ul>'."\n";
6 jpm 112
    }
113
 
114
    return $retour;
115
}
116
 
117
// +------------------------------------------------------------------------------------------------------+
118
// |                                           LISTE de FONCTIONS                                         |
119
// +------------------------------------------------------------------------------------------------------+
349 jpm 120
 
121
function parserTableauMenus($aso_menus, $permalien)
122
    {
123
        $retour = '';
124
 
125
        // Création de l'url
126
        foreach ($aso_menus as $menu_id => $menu_valeur) {
127
            if ($menu_valeur['gm_date_fin_validite'] == '0000-00-00 00:00:00' || strtotime($menu_valeur['gm_date_fin_validite']) > time() ) {
128
                $retour .= '<li>';
129
                // Création de l'url
130
                $une_url =& new Pap_URL();
131
                $une_url->setId($menu_id);
132
 
133
                // Construction de l'attribut title
134
                $title = '';
135
                if (!empty($menu_valeur['gm_titre'])) {
1030 jp_milcent 136
                    $title = ' title="'.htmlentities($menu_valeur['gm_titre']).'"';
349 jpm 137
                } elseif (!empty($menu_valeur['gm_titre_alternatif'])) {
1030 jp_milcent 138
                    $title = ' title="'.htmlentities($menu_valeur['gm_titre_alternatif']).'"';
6 jpm 139
                }
349 jpm 140
 
141
                // Construction du lien
1030 jp_milcent 142
                $retour .= '<a href="'.$une_url->getURL().'"'.$title.'>'.htmlentities($menu_valeur['gm_nom']).'</a>';
349 jpm 143
 
144
                // Nous affichons ou pas le permalien
145
                if ($permalien) {
146
                    $une_url->setPermalien(true);
147
                    $retour .= ' <span class="plan_permalien">'.'('.$une_url->getURL().')'.'</span>';
148
                    $une_url->setPermalien(false);
149
                }
150
 
151
                // Nous ajoutons les sous-menus s'il y en a.
152
                $retour_menus = parserTableauMenus($menu_valeur['sous_menus'], $permalien);
153
                if ($retour_menus != '') {
154
                    $retour .= "\n".'<ul>'."\n".$retour_menus."\n".'</ul>'."\n";
155
                }
156
 
157
                $retour .= '</li>'."\n";
6 jpm 158
            }
159
        }
349 jpm 160
        return $retour;
6 jpm 161
    }
162
// +------------------------------------------------------------------------------------------------------+
163
// |                                            PIED du PROGRAMME                                         |
164
// +------------------------------------------------------------------------------------------------------+
165
 
166
 
167
/* +--Fin du code ----------------------------------------------------------------------------------------+
168
*
2150 mathias 169
* $Log: plan.php,v $
170
* Revision 1.7  2006-10-11 18:05:15  jp_milcent
171
* Ajout d'url sur les titres des sites
172
*
1030 jp_milcent 173
* Revision 1.6  2006/10/06 10:03:14  florian
174
* amelioration: affichage du plan des menus d'administration, dans le monde administration
175
*
1014 florian 176
* Revision 1.5  2006/03/02 10:49:49  ddelon
177
* Fusion branche multilinguisme dans branche principale
178
*
754 ddelon 179
* Revision 1.4.2.1  2006/02/28 14:02:09  ddelon
180
* Finition multilinguisme
181
*
182
* Revision 1.4  2005/10/14 11:49:51  alexandre_tb
183
* Pas d'affichage du site admin
184
*
540 alexandre_ 185
* Revision 1.3  2005/04/19 17:21:02  jpm
186
* Amélioration de l'application.
187
* Gestion des dates  de fin de validité des menus.
188
*
349 jpm 189
* Revision 1.2  2005/02/28 10:38:24  jpm
190
* Modification de l'utilisation d'une variable globale.
191
*
278 jpm 192
* Revision 1.1  2004/06/16 14:34:53  jpm
193
* Changement de nom de Génésia en Papyrus.
194
* Changement de l'arborescence.
195
*
6 jpm 196
* Revision 1.7  2004/05/05 15:33:59  jpm
197
* Gestion de l'indication des langues disponibles pour un menu d'un site  donné.
198
*
199
* Revision 1.6  2004/05/05 14:33:00  jpm
200
* Gestion de l'indication de langue dans l'url.
201
* Utile que si on veut forcer la langue.
202
*
203
* Revision 1.5  2004/05/05 06:45:51  jpm
204
* Suppression de l'appel de la fonction générant le "vous êtes ici" dans la fonction affichant l'entête de l'application.
205
*
206
* Revision 1.4  2004/05/04 16:27:27  jpm
207
* Réduction de code pour la fonction afficherContenuTete().
208
*
209
*
210
* +-- Fin du code ----------------------------------------------------------------------------------------+
211
*/
212
?>