Subversion Repositories Applications.papyrus

Rev

Rev 58 | Rev 168 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3 jpm 1
<?php
2
//vim: set expandtab tabstop=4 shiftwidth=4:
3
// +------------------------------------------------------------------------------------------------------+
4
// | PHP version 4.1                                                                                      |
5
// +------------------------------------------------------------------------------------------------------+
6
// | Copyright (C) 2001 COUDOUNEAU Laurent (lc@gsite.org)                                                 |
7
// | Copyright (C) 1999-2004 Tela Botanica (accueil@tela-botanica.org)                                    |
8
// +------------------------------------------------------------------------------------------------------+
9
// |                                                                                                      |
10
// | This library is free software; you can redistribute it and/or                                        |
11
// | modify it under the terms of the GNU Lesser General Public                                           |
12
// | License as published by the Free Software Foundation; either                                         |
13
// | version 2.1 of the License, or (at your option) any later version.                                   |
14
// |                                                                                                      |
15
// | This library is distributed in the hope that it will be useful,                                      |
16
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
17
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
18
// | Lesser General Public License for more details.                                                      |
19
// |                                                                                                      |
20
// | You should have received a copy of the GNU Lesser General Public                                     |
21
// | License along with this library; if not, write to the Free Software                                  |
22
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23
// |                                                                                                      |
24
// +------------------------------------------------------------------------------------------------------+
95 jpm 25
// CVS : $Id: papyrus.php,v 1.6 2004-10-22 17:24:53 jpm Exp $
3 jpm 26
/**
27
* Papyrus : programme principale appelant différent fichier à inclure dans un ordre précis.
28
*
29
* La page contient l'appel aux fonctions de l'application de vérification de l'installation puis
30
* l'appel du fichier réalisant l'initialisation. Enfin, l'appel du fichier réalisant le rendu et
31
* retournant la page au navigateur client.
32
*
33
*@package Papyrus
34
//Auteur original :
35
*@author            Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>
36
//Autres auteurs :
37
*@author            Alexandre GRANIER <alex@tela-botanica.org>
38
*@author            Jean-Pascal MILCENT <jpm@tela-botanica.org>
39
*@copyright         Tela-Botanica 2000-2004
95 jpm 40
*@version           $Revision: 1.6 $ $Date: 2004-10-22 17:24:53 $
3 jpm 41
// +------------------------------------------------------------------------------------------------------+
42
*/
43
 
44
// +------------------------------------------------------------------------------------------------------+
45
// |                                            ENTÊTE du PROGRAMME                                       |
46
// +------------------------------------------------------------------------------------------------------+
95 jpm 47
// Création des variables globale de Papyrus
48
$GLOBALS['_GEN_commun']  = array();
49
$GLOBALS['chrono_flash'] = array();
3 jpm 50
 
51
// Première mesure du chronométrage
52
$chrono_flash['depart'] = microtime();
12 jpm 53
 
95 jpm 54
// Vérification de la configuration de Papyrus
55
/** Inclusion du programme de vérification de Papyrus.
56
* Il vérifie différent paramètres nécessaire au bon fonctionnement de Papyrus,
57
* dont la présence des fichiers de configuration.
58
* C'est en fonction des paramètres déterminés par ce programme que l'application
59
* Installateur est appelée si besoin est.*/
60
require_once 'papyrus/pap_verification.inc.php';
61
$chrono_flash['Vérification'] = microtime();
62
 
63
/** Inclusion API débogage : Gestionnaire d'erreur
64
* Ajout de la bibliothèque de fonctions permettant d'encpasuler les erreurs PHP.*/
65
include_once GEN_CHEMIN_API.'debogage_1.0/BOG_Gestionnaire_Erreur.class.php';
3 jpm 66
 
95 jpm 67
/** Inclusion API débogage : chronométrage
68
* Ajout de la bibliothèque de fonctions permettant d'analyser le temps d'execution de Papyrus.*/
12 jpm 69
include_once GEN_CHEMIN_API.'debogage_1.0/BOG_chrono.fonct.php';
3 jpm 70
 
95 jpm 71
/** Inclusion API débogage : Gestionnaire d'erreurs sql
72
* Ajout de la bibliothèque de fonctions de débogage d'erreurs SQL.*/
12 jpm 73
require_once GEN_CHEMIN_API.'debogage_1.0/BOG_sql.fonct.php';
3 jpm 74
 
75
// +------------------------------------------------------------------------------------------------------+
76
// |                                            CORPS du PROGRAMME                                        |
95 jpm 77
// +------------------------------------------------------------------------------------------------------+
78
 
79
// +------------------------------------------------------------------------------------------------------+
80
// Création du gestionnaire d'erreur de Papyrus
81
$_GEN_commun['debogage_erreur'] = &new BOG_Gestionnaire_Erreur(GEN_DEBOGAGE_CONTEXTE, GEN_CSS_ERREUR);
3 jpm 82
 
95 jpm 83
// +------------------------------------------------------------------------------------------------------+
84
// Appel de l'application Installateur de Papyrus si nécessaire
85
if ($_GEN_commun['erreur_instal_afaire'] == true) {
86
    include_once GEN_CHEMIN_APPLICATION.'installateur/installateur.php';
87
    $_GEN_commun['sortie'] = afficherContenuCorps();
88
    include_once GEN_CHEMIN_PAP.'pap_envoi.inc.php';
89
    // Fin du programme Papyrus.
90
    exit(0);
91
}
92
 
3 jpm 93
// +------------------------------------------------------------------------------------------------------+
94
// Gestion de la connexion à la base de données
12 jpm 95
require_once GEN_CHEMIN_PAP.'pap_connecte_bdd.inc.php';
3 jpm 96
$chrono_flash['Connexion BdD'] = microtime();
97
 
98
// +------------------------------------------------------------------------------------------------------+
95 jpm 99
// Initialisation des informations provenant de la base de données de Papyrus
100
/** <br> Inclusion du programme d'initialisation de Papyrus.
3 jpm 101
* Nous récupérons alors les infos sur le site, la langue, le menu, l'application liée et les informations sur la page
95 jpm 102
* depuis la base de données de Papyrus. Ces informations correspondent au paramètres passés dans l'url demandée par
3 jpm 103
* l'utilisateur.Nous créons aussi la représentation sous forme d'objet de l'URL
104
* courante demandée par l'utilisateur.
105
*/
12 jpm 106
require_once GEN_CHEMIN_PAP.'pap_initialise_info.inc.php';
3 jpm 107
$chrono_flash['Initialisation des info'] = microtime();
95 jpm 108
 
109
// +------------------------------------------------------------------------------------------------------+
110
// Inclusion des fichiers de traduction de Papyrus
111
if (file_exists(GEN_CHEMIN_LANGUE.'pap_langue_'.$_GEN_commun['i18n'].'.inc.php')) {
112
    /** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/
113
    require_once GEN_CHEMIN_LANGUE.'pap_langue_'.$_GEN_commun['i18n'].'.inc.php';
114
} else {
115
    /** Inclusion du fichier de traduction par défaut.*/
116
    require_once GEN_CHEMIN_LANGUE.'pap_langue_'.GEN_I18N_ID_DEFAUT.'.inc.php';
117
}
118
 
119
// +------------------------------------------------------------------------------------------------------+
120
// Réglage supplémentaire du gestionnaire d'erreurs
121
$_GEN_commun['debogage_erreur']->ecrireLangue($_GEN_commun['i18n']);
122
$_GEN_commun['debogage_erreur']->ecrireTxtTete(PAP_LANG_DEBOG_TETE);
123
$_GEN_commun['debogage_erreur']->ecrireTxtPied(PAP_LANG_DEBOG_PIED);
124
$tab_traduction = array(PAP_LANG_DEBOG_NIVEAU, PAP_LANG_DEBOG_FICHIER, PAP_LANG_DEBOG_LIGNE, PAP_LANG_DEBOG_CONTEXTE);
125
$_GEN_commun['debogage_erreur']->ecrireTraduction($tab_traduction);
3 jpm 126
 
127
// +------------------------------------------------------------------------------------------------------+
128
// Initialisation de l'authentification si nécessaire
95 jpm 129
/** <br> Inclusion du programme d'initialisation de Auth et des Sessions utilisées par Papyrus.
3 jpm 130
* Suite à la récupération des infos sur le site, la langue, le menu, l'application liée et les infos sur la page,
131
* nous demandons l'identification et nous déclenchons une session si le site le demande.
132
*/
133
if ($_GEN_commun['info_site']->gs_ce_auth > 0) {
12 jpm 134
    include_once GEN_CHEMIN_PAP.'pap_initialise_auth.inc.php';
3 jpm 135
    $chrono_flash['Initialisation auth'] = microtime();
136
}
137
 
138
// +------------------------------------------------------------------------------------------------------+
139
// Mise en cache de la page si nécessaire
95 jpm 140
/** <br> Inclusion du programme de gestion du cache de Papyrus.
3 jpm 141
* Nous supprimons, si l'application le demande, les pages en cache périmées et nous recherchons
142
*  la page demandée dans le cache.Si la page est trouvé nous la renvoyons et le programme
143
* s'arrête ici. Sinon, nous continuons.
144
*/
95 jpm 145
if (isset($_GEN_commun['info_application']->cache) && $_GEN_commun['info_application']->cache) {
12 jpm 146
    include_once GEN_CHEMIN_PAP.'pap_cache.inc.php';
3 jpm 147
}
148
 
149
// +------------------------------------------------------------------------------------------------------+
150
// Réalisation du rendu de la page
151
/** <br> Inclusion du programme de rendu de Génésia.
152
* Il appelle l'application demandée et créé la page grâce au fichier squelette et aux balises incluses dedans.
153
*/
12 jpm 154
require_once GEN_CHEMIN_PAP.'pap_rendu.inc.php';
3 jpm 155
$chrono_flash['Rendu'] = microtime();
156
 
157
// +------------------------------------------------------------------------------------------------------+
158
// Gestion du stockage en cache de la page demandée et de son envoi au navigateur client si nécessaire.
159
/** <br> Inclusion du programme d'envoi de la page demandée.
160
* Il stocke la page en cache et la renvoi après compression s'il existe des données à renvoyer.
161
*/
162
if (! empty($_GEN_commun['sortie'])) {
163
    if (GEN_DEBOGAGE) {
164
        // En cas de chronométrage, nous insérons le tableau des résultats.
58 jpm 165
        $debogage = BOG_afficherChrono(12);
166
        $_GEN_commun['sortie'] = str_replace('<!-- CHRONOMETRAGE -->', $debogage, $_GEN_commun['sortie']);
95 jpm 167
        // Gestion des erreurs et du débogage
168
        $_GEN_commun['debogage_info'] .= $_GEN_commun['debogage_erreur']->retournerErreurs();
58 jpm 169
        $_GEN_commun['sortie'] = str_replace('<!-- DEBOGAGE -->', $_GEN_commun['debogage_info'], $_GEN_commun['sortie']);
3 jpm 170
    }
12 jpm 171
    include_once GEN_CHEMIN_PAP.'pap_envoi.inc.php';
3 jpm 172
}
173
 
95 jpm 174
// Fin du programme Papyrus.
175
exit(0);
3 jpm 176
 
177
 
178
/* +--Fin du code ---------------------------------------------------------------------------------------+
179
* $Log: not supported by cvs2svn $
95 jpm 180
* Revision 1.5  2004/09/28 14:57:53  jpm
181
* Création d'une balise propre au débogage.
182
*
58 jpm 183
* Revision 1.4  2004/09/10 16:39:04  jpm
184
* Ajout des infos de débogage à la sortie.
185
*
35 jpm 186
* Revision 1.3  2004/07/06 17:27:23  jpm
187
* Suppression d'inclusion du fichier de fonctions inutilisées dans Papyrus.
188
*
32 jpm 189
* Revision 1.2  2004/06/16 15:10:24  jpm
190
* Ajout de constantes de chemins.
191
*
12 jpm 192
* Revision 1.1  2004/06/15 10:15:12  jpm
193
* Changement de nom et d'arborescence de Genesia en Papyrus.
194
*
3 jpm 195
* Revision 1.16  2004/04/28 12:04:31  jpm
196
* Changement du modèle de la base de données.
197
*
198
* Revision 1.15  2004/04/22 08:31:49  jpm
199
* Transformation de $GS_GLOBAL en $_GEN_commun.
200
*
201
* Revision 1.14  2004/04/21 16:24:29  jpm
202
* Ajout d'un fichier spécifique pour la connexion à la base de données et incluant les classes DataObject de Pear.
203
*
204
* Revision 1.12  2004/04/21 08:02:14  jpm
205
* Ajout de mesure du temps d'éxecution de Génésia.
206
*
207
* Revision 1.11  2004/04/09 16:33:34  jpm
208
* Changement des noms de fichier gen_initialisation...
209
*
210
* Revision 1.10  2004/04/09 16:19:40  jpm
211
* Ajout des fichiers indépendants d'envoi et de cache.
212
*
213
* Revision 1.9  2004/04/08 14:13:47  jpm
214
* Ajout de l'inclusion du fichier de vérification.
215
*
216
* Revision 1.8  2004/04/02 16:28:12  jpm
217
* Ajout de l'inclusion du fichier gen_initialisation_pear.inc.php.
218
*
219
* Revision 1.7  2004/04/01 11:27:13  jpm
220
* Ajout et modification de commentaires pour PhpDocumentor.
221
*
222
* Revision 1.6  2004/03/31 16:49:30  jpm
223
* Modifications mineures.
224
*
225
* Revision 1.5  2004/03/27 11:01:06  jpm
226
* Ajout de l'appel des fonctions d'installation.
227
*
228
* Revision 1.4  2004/03/25 11:51:06  jpm
229
* Changement nom dossier noyau en génésia dans les chemins.
230
*
231
* Revision 1.3  2004/03/23 17:06:14  jpm
232
* Ajout de commentaire dans l'entête.
233
*
234
* Revision 1.2  2004/03/23 16:30:42  jpm
235
* Ajout de commentaires.
236
* Changement des noms des fichiers appelés.
237
*
238
* Revision 1.1  2004/03/23 10:22:34  jpm
239
* Page principale de l'application Génésia.
240
*
241
*
242
* +--Fin du code ----------------------------------------------------------------------------------------+
243
*/
244
?>