Subversion Repositories Applications.papyrus

Rev

Rev 1102 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1091 florian 1
<?php
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3
// +------------------------------------------------------------------------------------------------------+
4
// | PHP version 5.1                                                                                      |
5
// +------------------------------------------------------------------------------------------------------+
6
// | Copyright (C) 2006 Tela Botanica (accueil@tela-botanica.org)                                         |
7
// +------------------------------------------------------------------------------------------------------+
8
// | Ce logiciel est un programme informatique servant à gérer du contenu et des applications web.        |                                                                           |
9
// |                                                                                                      |
10
// | Ce logiciel est régi par la licence CeCILL soumise au droit français et respectant les principes de  |
11
// | diffusion des logiciels libres. Vous pouvez utiliser, modifier et/ou redistribuer ce programme sous  |
12
// | les conditions de la licence CeCILL telle que diffusée par le CEA, le CNRS et l'INRIA sur le site    |
13
// | "http://www.cecill.info".                                                                            |
14
// |                                                                                                      |
15
// | En contrepartie de l'accessibilité au code source et des droits de copie, de modification et de      |
16
// | redistribution accordés par cette licence, il n'est offert aux utilisateurs qu'une garantie limitée. |
17
// | Pour les mêmes raisons, seule une responsabilité restreinte pèse sur l'auteur du programme, le       |
18
// | titulaire des droits patrimoniaux et les concédants successifs.                                      |
19
// |                                                                                                      |
20
// | A cet égard l'attention de l'utilisateur est attirée sur les risques associés au chargement, à       |
21
// | l'utilisation,  à la modification et/ou au développement et à la reproduction du logiciel par        |
22
// | l'utilisateur étant donné sa spécificité de logiciel libre, qui peut le rendre complexe à manipuler  |
23
// | et qui le réserve donc à des développeurs et des professionnels avertis possédant des connaissances  |
24
// | informatiques approfondies. Les utilisateurs sont donc invités à charger  et  tester  l'adéquation   |
25
// | du logiciel à leurs besoins dans des conditions permettant d'assurer la sécurité de leurs systèmes   |
26
// | et ou de leurs données et, plus généralement, à l'utiliser et l'exploiter dans les mêmes conditions  |
27
// | de sécurité.                                                                                         |
28
// |                                                                                                      |
29
// | Le fait que vous puissiez accéder à cet en-tête signifie que vous avez pris connaissance de la       |
30
// | licence CeCILL, et que vous en avez accepté les termes.                                              |
31
// +------------------------------------------------------------------------------------------------------+
32
// CVS : $Id: categorie.php,v 1.1 2006-12-01 16:34:50 florian Exp $
33
/**
34
* Applette : Catégorie
35
*
36
* Retourne toutes les pages Papyrus appartenant à une catégorie donnée.
37
*
38
*@package Applette
39
*@subpackage Categorie
40
//Auteur original :
41
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
42
//Autres auteurs :
43
*@author        Aucun
44
*@copyright     Tela-Botanica 2000-2006
45
*@version       $Revision: 1.1 $ $Date: 2006-12-01 16:34:50 $
46
// +------------------------------------------------------------------------------------------------------+
47
*/
48
 
49
// +------------------------------------------------------------------------------------------------------+
50
// |                                            ENTÊTE du PROGRAMME                                       |
51
// +------------------------------------------------------------------------------------------------------+
52
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = 'afficherCategorie';
53
$GLOBALS['_GEN_commun']['info_applette_balise'] = '\{\{[Cc]ategorie (mots="[^"]+")\}\}';
54
 
55
// --------------------------------------------------------------------------------------------------------
56
//Utilisation de la bibliothèque Papyrus pap_meta.fonct.php inclue par Papyrus
57
//Utilisation de la bibliothèque PEAR NET_URL inclue par Papyrus
58
/** Inclusion du fichier de configuration de cette application.*/
59
require_once GEN_CHEMIN_APPLETTE.'categorie'.GEN_SEP.'configuration'.GEN_SEP.'categ_configuration.inc.php';
60
 
61
// Inclusion des fichiers de traduction de l'applette CATEG de Papyrus
62
if (file_exists(CATEG_CHEMIN_LANGUE.'categ_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php')) {
63
    /** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/
64
    require_once CATEG_CHEMIN_LANGUE.'categ_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php';
65
} else {
66
    /** Inclusion du fichier de traduction par défaut.*/
67
    require_once CATEG_CHEMIN_LANGUE.'categ_langue_'.CATEG_I18N_DEFAUT.'.inc.php';
68
}
69
 
70
 
71
// +------------------------------------------------------------------------------------------------------+
72
// |                                            CORPS du PROGRAMME                                        |
73
// +------------------------------------------------------------------------------------------------------+
74
/** Fonction afficherCategorie() - Retourne la liste des pages d'une catégorie.
75
*
76
* Cette fonction retourne la liste des pages appartenant à une catégorie donnée.
77
*
78
* @param  array contient les arguments de la fonction.
79
* @param  array  tableau global de Papyrus.
80
* @return string HTML la liste des listes de menus.
81
*/
82
function afficherCategorie($tab_applette_arguments, $_GEN_commun)
83
{
84
	// Initialisation des variables
85
    $sortie = '';
86
    foreach($tab_applette_arguments as $argument) {
87
	    $tab_parametres = explode('=', $argument);
88
	    $options[$tab_parametres[0]] = trim($tab_parametres[1], '"');
89
    }
90
 
91
    if (!isset($options['mots'])) {
92
        return '<p>'.' Aucune catégorie passé en paramêtre! '.'</p>';
93
    }
94
 
95
    // Récupération des infos
96
    $tab_mots = explode(',', $options['mots']);
97
    for ($i = 0; $i < count($tab_mots); $i++) {
98
        // Suppression des espaces, tabulations... en début et fin de chaine
99
        $tab_mots[$i] = trim($tab_mots[$i]);
100
    }
101
    $aso_info_menu = GEN_lireInfoMenuCategorie($_GEN_commun['pear_db'], $tab_mots);
102
 
103
    // Formatage des infos en XHTML
104
    $sortie .= '<ul class="page_liste">'."\n";
105
    foreach ($aso_info_menu as $id_menu => $un_menu) {
106
        // Création de l'url
107
        $une_url =& new Pap_URL();
108
        $une_url->setId($id_menu);
109
 
110
        $sortie .= '<li>'."\n";
111
 
112
        // Affichage de l'auteur(s)
113
        $sortie .= '<span class="page_auteur"> '.$un_menu->gm_auteur.'</span>';
114
        $sortie .= '<span class="page_separateur_auteur"> - </span>';
115
 
116
        // Affichage du titre
117
        $sortie .= '<a href="'.$une_url->getURL().'">';
118
        $sortie .= '<span class="page_titre"> '.$un_menu->gm_titre.'</span>';
119
        $sortie .= '</a>';
120
        $sortie .= '<span class="page_separateur_titre"> - </span>';
121
 
122
        // Affichage de l'horaire de la création de la page
123
        if (($heure = date('G', strtotime($un_menu->gm_date_creation)) ) != 0 ) {
124
            $sortie .= '<span class="page_creation_heure">'.$heure.'</span>';
125
            $sortie .= '<span class="page_separateur_heure">:</span>';
126
            $minute = date('i', strtotime($un_menu->gm_date_creation));
127
            $sortie .= '<span class="page_creation_minute">'.$minute.'</span>';
128
            if (($seconde = date('s', strtotime($un_menu->gm_date_creation)) ) != 0 ) {
129
                $sortie .= '<span class="page_separateur_heure">:</span>';
130
                $sortie .= '<span class="page_creation_seconde">'.$seconde.'</span>';
131
            }
132
        }
133
        $sortie .= '<span class="page_separateur_date_heure"> - </span>'."\n";
134
 
135
        // Affichage de la date de la création de la page
136
        if (($jour = date('d', strtotime($un_menu->gm_date_creation)) ) != 0 ) {
137
            $sortie .= '<span class="page_creation_jour"> '.$jour.'</span>';
138
        }
139
        if (($mois = _traduireMois(date('m', strtotime($un_menu->gm_date_creation))) ) != '' ) {
140
            $sortie .= '<span class="page_creation_mois"> '.$mois.'</span>';
141
        }
142
        if (($annee = date('Y', strtotime($un_menu->gm_date_creation)) ) != 0 ) {
143
            $sortie .= '<span class="page_creation_annee"> '.$annee.'</span>';
144
        }
145
        $sortie .= '</li>'."\n";
146
    }
147
    $sortie .= '</ul>'."\n";
148
    return $sortie;
149
}
150
 
151
// +------------------------------------------------------------------------------------------------------+
152
// |                                            LISTE DES FONCTIONS                                       |
153
// +------------------------------------------------------------------------------------------------------+
154
function _traduireMois($mois_numerique)
155
{
156
    switch ($mois_numerique) {
157
        case '01' :
158
            return 'janvier';
159
        case '02' :
160
            return 'février';
161
        case '03' :
162
            return 'mars';
163
        case '04' :
164
            return 'avril';
165
        case '05' :
166
            return 'mai';
167
        case '06' :
168
            return 'juin';
169
        case '07' :
170
            return 'juillet';
171
        case '08' :
172
            return 'août';
173
        case '09' :
174
            return 'septembre';
175
        case '10' :
176
            return 'octobre';
177
        case '11' :
178
            return 'novembre';
179
        case '12' :
180
            return 'décembre';
181
        default:
182
            return '';
183
    }
184
}
185
 
186
 
187
/* +--Fin du code ----------------------------------------------------------------------------------------+
188
*
189
* $Log: not supported by cvs2svn $
190
*
191
* +-- Fin du code ----------------------------------------------------------------------------------------+
192
*/
193
?>