Subversion Repositories Applications.papyrus

Rev

Rev 1091 | Rev 1115 | Go to most recent revision | Details | Compare with Previous | 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
// +------------------------------------------------------------------------------------------------------+
1102 florian 32
// CVS : $Id: categorie.php,v 1.2 2006-12-01 17:37:46 florian Exp $
1091 florian 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
1102 florian 45
*@version       $Revision: 1.2 $ $Date: 2006-12-01 17:37:46 $
1091 florian 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 = '';
1102 florian 86
    $tab_arguments = $tab_applette_arguments;
87
	unset($tab_arguments[0]);
88
    foreach($tab_arguments as $argument) {
1091 florian 89
	    $tab_parametres = explode('=', $argument);
90
	    $options[$tab_parametres[0]] = trim($tab_parametres[1], '"');
91
    }
92
 
93
    if (!isset($options['mots'])) {
94
        return '<p>'.' Aucune catégorie passé en paramêtre! '.'</p>';
95
    }
96
 
97
    // Récupération des infos
98
    $tab_mots = explode(',', $options['mots']);
99
    for ($i = 0; $i < count($tab_mots); $i++) {
100
        // Suppression des espaces, tabulations... en début et fin de chaine
101
        $tab_mots[$i] = trim($tab_mots[$i]);
102
    }
103
    $aso_info_menu = GEN_lireInfoMenuCategorie($_GEN_commun['pear_db'], $tab_mots);
104
 
105
    // Formatage des infos en XHTML
106
    $sortie .= '<ul class="page_liste">'."\n";
107
    foreach ($aso_info_menu as $id_menu => $un_menu) {
108
        // Création de l'url
109
        $une_url =& new Pap_URL();
110
        $une_url->setId($id_menu);
111
 
112
        $sortie .= '<li>'."\n";
113
 
114
        // Affichage de l'auteur(s)
115
        $sortie .= '<span class="page_auteur"> '.$un_menu->gm_auteur.'</span>';
116
        $sortie .= '<span class="page_separateur_auteur"> - </span>';
117
 
118
        // Affichage du titre
119
        $sortie .= '<a href="'.$une_url->getURL().'">';
120
        $sortie .= '<span class="page_titre"> '.$un_menu->gm_titre.'</span>';
121
        $sortie .= '</a>';
122
        $sortie .= '<span class="page_separateur_titre"> - </span>';
123
 
124
        // Affichage de l'horaire de la création de la page
125
        if (($heure = date('G', strtotime($un_menu->gm_date_creation)) ) != 0 ) {
126
            $sortie .= '<span class="page_creation_heure">'.$heure.'</span>';
127
            $sortie .= '<span class="page_separateur_heure">:</span>';
128
            $minute = date('i', strtotime($un_menu->gm_date_creation));
129
            $sortie .= '<span class="page_creation_minute">'.$minute.'</span>';
130
            if (($seconde = date('s', strtotime($un_menu->gm_date_creation)) ) != 0 ) {
131
                $sortie .= '<span class="page_separateur_heure">:</span>';
132
                $sortie .= '<span class="page_creation_seconde">'.$seconde.'</span>';
133
            }
134
        }
135
        $sortie .= '<span class="page_separateur_date_heure"> - </span>'."\n";
136
 
137
        // Affichage de la date de la création de la page
138
        if (($jour = date('d', strtotime($un_menu->gm_date_creation)) ) != 0 ) {
139
            $sortie .= '<span class="page_creation_jour"> '.$jour.'</span>';
140
        }
141
        if (($mois = _traduireMois(date('m', strtotime($un_menu->gm_date_creation))) ) != '' ) {
142
            $sortie .= '<span class="page_creation_mois"> '.$mois.'</span>';
143
        }
144
        if (($annee = date('Y', strtotime($un_menu->gm_date_creation)) ) != 0 ) {
145
            $sortie .= '<span class="page_creation_annee"> '.$annee.'</span>';
146
        }
147
        $sortie .= '</li>'."\n";
148
    }
149
    $sortie .= '</ul>'."\n";
150
    return $sortie;
151
}
152
 
153
// +------------------------------------------------------------------------------------------------------+
154
// |                                            LISTE DES FONCTIONS                                       |
155
// +------------------------------------------------------------------------------------------------------+
156
function _traduireMois($mois_numerique)
157
{
158
    switch ($mois_numerique) {
159
        case '01' :
160
            return 'janvier';
161
        case '02' :
162
            return 'février';
163
        case '03' :
164
            return 'mars';
165
        case '04' :
166
            return 'avril';
167
        case '05' :
168
            return 'mai';
169
        case '06' :
170
            return 'juin';
171
        case '07' :
172
            return 'juillet';
173
        case '08' :
174
            return 'août';
175
        case '09' :
176
            return 'septembre';
177
        case '10' :
178
            return 'octobre';
179
        case '11' :
180
            return 'novembre';
181
        case '12' :
182
            return 'décembre';
183
        default:
184
            return '';
185
    }
186
}
187
 
188
 
189
/* +--Fin du code ----------------------------------------------------------------------------------------+
190
*
191
* $Log: not supported by cvs2svn $
1102 florian 192
* Revision 1.1  2006/12/01 16:34:50  florian
193
* Ajout de l'apllette Categorie, provenant de l'action Categorie.
1091 florian 194
*
1102 florian 195
*
1091 florian 196
* +-- Fin du code ----------------------------------------------------------------------------------------+
197
*/
198
?>