Subversion Repositories Applications.papyrus

Rev

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

Rev Author Line No. Line
5 jpm 1
<?php
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
409 ddelon 3
// Copyright (C) 1999-2004 Tela Botanica (accueil@tela-botanica.org)
4
//
5
// Ce logiciel est un programme informatique servant à gérer du contenu et des
6
// applications web.
7
 
8
// Ce logiciel est régi par la licence CeCILL soumise au droit français et
9
// respectant les principes de diffusion des logiciels libres. Vous pouvez
10
// utiliser, modifier et/ou redistribuer ce programme sous les conditions
11
// de la licence CeCILL telle que diffusée par le CEA, le CNRS et l'INRIA
12
// sur le site "http://www.cecill.info".
13
 
14
// En contrepartie de l'accessibilité au code source et des droits de copie,
15
// de modification et de redistribution accordés par cette licence, il n'est
16
// offert aux utilisateurs qu'une garantie limitée.  Pour les mêmes raisons,
17
// 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
21
// associés au chargement,  à l'utilisation,  à la modification et/ou au
22
// développement et à la reproduction du logiciel par l'utilisateur étant
23
// donné sa spécificité de logiciel libre, qui peut le rendre complexe à
24
// manipuler et qui le réserve donc à des développeurs et des professionnels
25
// avertis possédant  des  connaissances  informatiques approfondies.  Les
26
// utilisateurs sont donc invités à charger  et  tester  l'adéquation  du
27
// logiciel à leurs besoins dans des conditions permettant d'assurer la
28
// sécurité de leurs systèmes et ou de leurs données et, plus généralement,
29
// à l'utiliser et l'exploiter dans les mêmes conditions de sécurité.
30
 
31
// Le fait que vous puissiez accéder à cet en-tête signifie que vous avez
32
// pris connaissance de la licence CeCILL, et que vous en avez accepté les
33
// termes.
34
// ----
1336 neiluj 35
// CVS : $Id: pap_rendu.inc.php,v 1.38 2007-04-19 15:34:35 neiluj Exp $
5 jpm 36
/**
37
* Rendu : programme traitant l'url demandée et retournant la page compressé au navigateur.
38
*
39
* Ce programme contient la partie collectant les informations sur la page demandée par le navigateur client.
40
* Elle vérifie que la page ne soit pas déjà présente en cache et la renvoie si elle est disponible.
41
* Elle recherche ensuite l'application liée à la page demandée. Elle exécute cette application et récupère le
42
* contenu XHTML à afficher, le stocke en cache, le compresse et le renvoi au navigateur client.
43
*
44
*@package Papyrus
45
//Auteur original :
286 jpm 46
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
5 jpm 47
//Autres auteurs :
414 alexandre_ 48
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
286 jpm 49
*@author        Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>
5 jpm 50
*@copyright     Tela-Botanica 2000-2004
1336 neiluj 51
*@version       $Revision: 1.38 $ $Date: 2007-04-19 15:34:35 $
5 jpm 52
// +------------------------------------------------------------------------------------------------------+
53
*/
54
 
448 ddelon 55
// TODO : revoir les initialisation en l'absence de menu par defaut
56
 
5 jpm 57
// +------------------------------------------------------------------------------------------------------+
58
// |                                            ENTÊTE du PROGRAMME                                       |
59
// +------------------------------------------------------------------------------------------------------+
60
 
352 jpm 61
/** Inclusion de la bibliothèque de fonctions servant à l'insertion de meta informations pour une page donnée.*/
14 jpm 62
include_once GEN_CHEMIN_BIBLIO.'pap_meta.fonct.php';
5 jpm 63
 
352 jpm 64
/** Inclusion de la bibliothèque de fonctions servant à l'insertion de styles pour une page donnée.*/
14 jpm 65
include_once GEN_CHEMIN_BIBLIO.'pap_style.fonct.php';
5 jpm 66
 
352 jpm 67
/** Inclusion de la bibliothèque de fonctions servant à l'insertion de scripts pour une page donnée.*/
14 jpm 68
include_once GEN_CHEMIN_BIBLIO.'pap_script.fonct.php';
5 jpm 69
 
1092 florian 70
/** Inclusion de la classe servant au rendu de Papyrus.*/
71
include_once GEN_CHEMIN_BIBLIO_CLASSE.'pap_rendu.class.php';
72
 
5 jpm 73
// +------------------------------------------------------------------------------------------------------+
74
// |                                            CORPS du PROGRAMME                                        |
75
// +------------------------------------------------------------------------------------------------------+
76
 
77
// Recherche du squelette de la page demandée.
78
 
545 ddelon 79
 
5 jpm 80
// Ouverture du squelette
290 jpm 81
if (empty($GLOBALS['_GEN_commun']['info_menu']->gm_fichier_squelette)) {
82
    if (isset($GLOBALS['_GEN_commun']['traduction_info_site'])) {
83
        $GLOBALS['_PAPYRUS_']['general']['chemin_squelette'] = $GLOBALS['_GEN_commun']['traduction_info_site']->gs_fichier_squelette;
5 jpm 84
    } else {
290 jpm 85
        $GLOBALS['_PAPYRUS_']['general']['chemin_squelette'] = $GLOBALS['_GEN_commun']['info_site']->gs_fichier_squelette;
5 jpm 86
    }
87
} else {
290 jpm 88
    if (isset($GLOBALS['_GEN_commun']['traduction_info_menu'])) {
827 alexandre_ 89
        $GLOBALS['_PAPYRUS_']['general']['chemin_squelette'] = $GLOBALS['_GEN_commun']['traduction_info_menu']->gm_fichier_squelette;
5 jpm 90
    } else {
290 jpm 91
        $GLOBALS['_PAPYRUS_']['general']['chemin_squelette'] = $GLOBALS['_GEN_commun']['info_menu']->gm_fichier_squelette;
5 jpm 92
    }
93
}
545 ddelon 94
 
5 jpm 95
// Si l'information concernant le chemin est réellement un chemin
169 jpm 96
if (! file_exists($GLOBALS['_PAPYRUS_']['general']['chemin_squelette'])) {
5 jpm 97
    //Si ce n'est qu'un nom de fichier squelette
169 jpm 98
    $GLOBALS['_PAPYRUS_']['general']['chemin_test'] =  GEN_CHEMIN_SITES.
290 jpm 99
                    $GLOBALS['_GEN_commun']['info_site']->gs_code_alpha.'/'.
100
                    $GLOBALS['_GEN_commun']['i18n'].'/'.GEN_DOSSIER_SQUELETTE.'/'.$GLOBALS['_PAPYRUS_']['general']['chemin_squelette'];
169 jpm 101
    if (! file_exists($GLOBALS['_PAPYRUS_']['general']['chemin_test'])) {
102
        die('ERREUR Papyrus : Impossible de trouver de fichier de squelette. <br />'.
103
            'Chemin fichier squelette : '.$GLOBALS['_PAPYRUS_']['general']['chemin_squelette'].' <br />'.
5 jpm 104
            'Ligne n° : '. __LINE__ .'<br />'.
105
            'Fichier : '. __FILE__ );
106
    } else {
169 jpm 107
        $GLOBALS['_PAPYRUS_']['general']['chemin_squelette'] = $GLOBALS['_PAPYRUS_']['general']['chemin_test'];
5 jpm 108
    }
109
}
110
 
111
// +------------------------------------------------------------------------------------------------------+
112
// Récupération du contenu du fichier de squelette de la page demandée.
159 jpm 113
/*
5 jpm 114
// Lecture du fichier de squelette XHTML en PHP 4.1.2
115
$tab_fichier_squelette = file($chemin_squelette);
116
$contenu_squelette = '';
117
for ($i = 0; $i < count($tab_fichier_squelette); $i++) {
118
    $contenu_squelette .= $tab_fichier_squelette[$i];
119
}
159 jpm 120
*/
5 jpm 121
// Lecture du fichier de squelette XHTML en PHP 4.3
169 jpm 122
$GLOBALS['_PAPYRUS_']['general']['contenu_squelette'] = file_get_contents($GLOBALS['_PAPYRUS_']['general']['chemin_squelette']);
5 jpm 123
 
124
// +------------------------------------------------------------------------------------------------------+
125
// Recherche des informations pour la complétion de l'entête du squelette de la page demandée.
126
 
448 ddelon 127
if (isset($GLOBALS['_GEN_commun']['info_menu'])) {
128
	// Construction du titre.
129
	if (! empty($GLOBALS['_GEN_commun']['info_menu']->gm_titre)) {
130
	    $GLOBALS['_PAPYRUS_']['page']['titre'] = htmlentities($GLOBALS['_GEN_commun']['info_menu']->gm_titre);
131
	} else if (! empty($GLOBALS['_GEN_commun']['info_menu']->gm_titre_alternatif)) {
132
	    $GLOBALS['_PAPYRUS_']['page']['titre'] = htmlentities($GLOBALS['_GEN_commun']['info_menu']->gm_titre_alternatif);
133
	} else {
134
	    $GLOBALS['_PAPYRUS_']['page']['titre'] = htmlentities($GLOBALS['_GEN_commun']['info_menu']->gm_nom);
135
	}
136
 
5 jpm 137
}
448 ddelon 138
else {
139
	$GLOBALS['_PAPYRUS_']['page']['titre']='';
140
}
141
 
545 ddelon 142
 
169 jpm 143
$GLOBALS['_PAPYRUS_']['rendu']['TITRE_PAGE'] = $GLOBALS['_PAPYRUS_']['page']['titre'];
5 jpm 144
 
112 jpm 145
// Construction des infos sur le site
290 jpm 146
$GLOBALS['_PAPYRUS_']['page']['nom_site'] = htmlentities($GLOBALS['_GEN_commun']['info_site']->gs_nom);
169 jpm 147
$GLOBALS['_PAPYRUS_']['rendu']['SITE_NOM'] = $GLOBALS['_PAPYRUS_']['page']['nom_site'];
290 jpm 148
$GLOBALS['_PAPYRUS_']['page']['langue_site'] = htmlentities($GLOBALS['_GEN_commun']['i18n']);
169 jpm 149
$GLOBALS['_PAPYRUS_']['rendu']['SITE_LANGUE'] = $GLOBALS['_PAPYRUS_']['page']['langue_site'];
290 jpm 150
$GLOBALS['_PAPYRUS_']['page']['code_alpha_site'] = htmlentities($GLOBALS['_GEN_commun']['info_site']->gs_code_alpha);
169 jpm 151
$GLOBALS['_PAPYRUS_']['rendu']['SITE_CODE_ALPHA'] = $GLOBALS['_PAPYRUS_']['page']['code_alpha_site'];
5 jpm 152
 
754 ddelon 153
//Construction des infos sur le contexte d'affichage de la page
1092 florian 154
$une_url = new Net_URL();
757 ddelon 155
$une_url->addQueryString("site",$_GEN_commun['url_site']);
156
$une_url->removeQueryString("langue");
754 ddelon 157
$GLOBALS['_PAPYRUS_']['rendu']['PAGE_URL'] = $une_url->getUrl();
158
 
159
 
5 jpm 160
// Construction des Meta "http-equiv".
161
$_GEN_commun['meta_http_equiv'] = array();
544 jp_milcent 162
$GLOBALS['_PAPYRUS_']['page']['jeu_de_caracteres'] = htmlentities(strtoupper($_GEN_commun['info_i18n']->gi_jeu_de_caracteres));
169 jpm 163
$GLOBALS['_PAPYRUS_']['rendu']['SITE_JEU_DE_CARACTERES'] = $GLOBALS['_PAPYRUS_']['page']['jeu_de_caracteres'];
164
$GLOBALS['_PAPYRUS_']['page']['langue'] = htmlentities($_GEN_commun['info_i18n_langue']->gil_id_langue);
165
$GLOBALS['_PAPYRUS_']['rendu']['SITE_LANGUE'] = $GLOBALS['_PAPYRUS_']['page']['langue'];
166
GEN_stockerMetaHttpEquiv('Content-Type', 'text/html; charset='.$GLOBALS['_PAPYRUS_']['page']['jeu_de_caracteres']);
5 jpm 167
GEN_stockerMetaHttpEquiv('Content-style-type', 'text/css');
168
GEN_stockerMetaHttpEquiv('Content-script-type', 'text/javascript');
169 jpm 169
GEN_stockerMetaHttpEquiv('Content-language', $GLOBALS['_PAPYRUS_']['page']['langue']);
5 jpm 170
 
171
// Construction des Meta "name".
172
$_GEN_commun['meta_name'] = array();
448 ddelon 173
if (isset($GLOBALS['_GEN_commun']['info_menu'])) {
174
	$GLOBALS['_PAPYRUS_']['page']['robot'] = htmlentities($_GEN_commun['info_menu']->gm_robot);
175
	$GLOBALS['_PAPYRUS_']['page']['auteur'] = htmlentities($_GEN_commun['info_menu']->gm_auteur);
176
}
177
else {
178
	$GLOBALS['_PAPYRUS_']['page']['robot'] = '';
179
	$GLOBALS['_PAPYRUS_']['page']['auteur'] = '';
180
}
181
 
252 jpm 182
if (empty($GLOBALS['_PAPYRUS_']['page']['auteur'])) {
169 jpm 183
    $GLOBALS['_PAPYRUS_']['page']['auteur'] = htmlentities($_GEN_commun['info_site']->gs_auteur);
5 jpm 184
}
448 ddelon 185
if (isset($GLOBALS['_GEN_commun']['info_menu'])) {
186
	$GLOBALS['_PAPYRUS_']['page']['mots_cles'] = htmlentities($_GEN_commun['info_menu']->gm_mots_cles);
187
}
169 jpm 188
if (empty($GLOBALS['_PAPYRUS_']['page']['mots_cles'])) {
252 jpm 189
    $GLOBALS['_PAPYRUS_']['page']['mots_cles'] = htmlentities($_GEN_commun['info_site']->gs_mots_cles);
5 jpm 190
}
448 ddelon 191
if (isset($GLOBALS['_GEN_commun']['info_menu'])) {
192
	$GLOBALS['_PAPYRUS_']['page']['description_libre'] = htmlentities($_GEN_commun['info_menu']->gm_description_libre);
193
}
252 jpm 194
if (empty($GLOBALS['_PAPYRUS_']['page']['description_libre'])) {
169 jpm 195
    $GLOBALS['_PAPYRUS_']['page']['description_libre'] = htmlentities($_GEN_commun['info_site']->gs_description);
5 jpm 196
}
448 ddelon 197
 
198
 
5 jpm 199
GEN_stockerMetaName('revisit-after', '15 days');
169 jpm 200
GEN_stockerMetaName('robots', $GLOBALS['_PAPYRUS_']['page']['robot']);
201
GEN_stockerMetaName('author', $GLOBALS['_PAPYRUS_']['page']['auteur']);
202
GEN_stockerMetaName('keywords', $GLOBALS['_PAPYRUS_']['page']['mots_cles']);
203
GEN_stockerMetaName('description', $GLOBALS['_PAPYRUS_']['page']['description_libre']);
5 jpm 204
 
205
// Construction des Meta Meta "name" du Dublin Core.
443 ddelon 206
 
448 ddelon 207
if (isset($GLOBALS['_GEN_commun']['info_menu'])) {
208
	$GLOBALS['_PAPYRUS_']['page']['titre_alternatif'] = htmlentities($_GEN_commun['info_menu']->gm_titre_alternatif);
209
	$GLOBALS['_PAPYRUS_']['page']['auteur'] = htmlentities($_GEN_commun['info_menu']->gm_auteur);
210
	$GLOBALS['_PAPYRUS_']['page']['description_resume'] = htmlentities($_GEN_commun['info_menu']->gm_description_resume);
211
	$GLOBALS['_PAPYRUS_']['page']['description_table_matieres'] = htmlentities($_GEN_commun['info_menu']->gm_description_table_matieres);
212
	$GLOBALS['_PAPYRUS_']['page']['publieur'] = htmlentities($_GEN_commun['info_menu']->gm_editeur);
213
	$GLOBALS['_PAPYRUS_']['page']['contributeur'] = htmlentities($_GEN_commun['info_menu']->gm_contributeur);
214
	$GLOBALS['_PAPYRUS_']['page']['date_creation'] = htmlentities($_GEN_commun['info_menu']->gm_date_creation);
215
	$GLOBALS['_PAPYRUS_']['page']['date_soumission'] = htmlentities($_GEN_commun['info_menu']->gm_date_soumission);
216
	$GLOBALS['_PAPYRUS_']['page']['date_acceptation'] = htmlentities($_GEN_commun['info_menu']->gm_date_acceptation);
217
	$GLOBALS['_PAPYRUS_']['page']['periode_validite'] = htmlentities($_GEN_commun['info_menu']->gm_date_debut_validite);
218
	$GLOBALS['_PAPYRUS_']['page']['date_copyright'] = htmlentities($_GEN_commun['info_menu']->gm_date_copyright);
219
	$GLOBALS['_PAPYRUS_']['page']['source'] = htmlentities($_GEN_commun['info_menu']->gm_source);
220
}
221
else {
222
	$GLOBALS['_PAPYRUS_']['page']['titre_alternatif'] = '';
223
	$GLOBALS['_PAPYRUS_']['page']['auteur'] = '';
224
	$GLOBALS['_PAPYRUS_']['page']['description_resume'] = '';
225
	$GLOBALS['_PAPYRUS_']['page']['description_table_matieres'] = '';
226
	$GLOBALS['_PAPYRUS_']['page']['publieur'] = '';
227
	$GLOBALS['_PAPYRUS_']['page']['contributeur'] = '';
228
	$GLOBALS['_PAPYRUS_']['page']['date_creation'] = '';
229
	$GLOBALS['_PAPYRUS_']['page']['date_soumission'] = '';
230
	$GLOBALS['_PAPYRUS_']['page']['date_acceptation'] = '';
231
	$GLOBALS['_PAPYRUS_']['page']['periode_validite'] = '';
232
	$GLOBALS['_PAPYRUS_']['page']['date_copyright'] = '';
233
	$GLOBALS['_PAPYRUS_']['page']['source'] = '';
234
}
235
 
767 ddelon 236
if ((isset($_GEN_commun['info_i18n_pays'])) && ($_GEN_commun['info_i18n_pays']->gip_id_pays != '')) {
213 jpm 237
    $GLOBALS['_PAPYRUS_']['page']['langue_rfc_3066'] = $GLOBALS['_PAPYRUS_']['page']['langue'].'-'.htmlentities($_GEN_commun['info_i18n_pays']->gip_id_pays);
238
} else {
239
    $GLOBALS['_PAPYRUS_']['page']['langue_rfc_3066'] = $GLOBALS['_PAPYRUS_']['page']['langue'];
240
}
448 ddelon 241
if (isset($GLOBALS['_GEN_commun']['info_menu'])) {
242
	$GLOBALS['_PAPYRUS_']['page']['type_portee_spatiale'] = htmlentities($_GEN_commun['info_menu']->gm_ce_type_portee_spatiale);
243
	$GLOBALS['_PAPYRUS_']['page']['portee_spatiale'] = htmlentities($_GEN_commun['info_menu']->gm_portee_spatiale);
244
	$GLOBALS['_PAPYRUS_']['page']['type_portee_temporelle'] = htmlentities($_GEN_commun['info_menu']->gm_ce_type_portee_temporelle);
245
	$GLOBALS['_PAPYRUS_']['page']['portee_temporelle'] = htmlentities($_GEN_commun['info_menu']->gm_portee_temporelle);
246
	$GLOBALS['_PAPYRUS_']['page']['licence'] = htmlentities($_GEN_commun['info_menu']->gm_licence);
247
	$GLOBALS['_PAPYRUS_']['page']['public'] = htmlentities($_GEN_commun['info_menu']->gm_public);
248
	$GLOBALS['_PAPYRUS_']['page']['public_niveau'] = htmlentities($_GEN_commun['info_menu']->gm_public_niveau);
249
}
250
else {
251
	$GLOBALS['_PAPYRUS_']['page']['type_portee_spatiale'] = '';
252
	$GLOBALS['_PAPYRUS_']['page']['portee_spatiale'] = '';
253
	$GLOBALS['_PAPYRUS_']['page']['type_portee_temporelle'] = '';
254
	$GLOBALS['_PAPYRUS_']['page']['portee_temporelle'] = '';
255
	$GLOBALS['_PAPYRUS_']['page']['licence'] = '';
256
	$GLOBALS['_PAPYRUS_']['page']['public'] = '';
257
	$GLOBALS['_PAPYRUS_']['page']['public_niveau'] = '';
258
 
259
}
260
 
169 jpm 261
GEN_stockerMetaNameDC('DC.Title', $GLOBALS['_PAPYRUS_']['page']['titre'], $GLOBALS['_PAPYRUS_']['page']['langue']);
262
GEN_stockerMetaNameDC('DC.Title.alternative', $GLOBALS['_PAPYRUS_']['page']['titre_alternatif'], $GLOBALS['_PAPYRUS_']['page']['langue']);
263
GEN_stockerMetaNameDC('DC.Creator', $GLOBALS['_PAPYRUS_']['page']['auteur']);
264
GEN_stockerMetaNameDC('DC.Subject', $GLOBALS['_PAPYRUS_']['page']['mots_cles'], $GLOBALS['_PAPYRUS_']['page']['langue']);
265
GEN_stockerMetaNameDC('DC.Description', $GLOBALS['_PAPYRUS_']['page']['description_libre'], $GLOBALS['_PAPYRUS_']['page']['langue']);
266
GEN_stockerMetaNameDC('DC.Description.abstract', $GLOBALS['_PAPYRUS_']['page']['description_resume'], $GLOBALS['_PAPYRUS_']['page']['langue']);
267
GEN_stockerMetaNameDC('DC.Description.tableOfContents', $GLOBALS['_PAPYRUS_']['page']['description_table_matieres'], $GLOBALS['_PAPYRUS_']['page']['langue']);
268
GEN_stockerMetaNameDC('DC.Publisher', $GLOBALS['_PAPYRUS_']['page']['publieur']);
269
GEN_stockerMetaNameDC('DC.Contributor', $GLOBALS['_PAPYRUS_']['page']['contributeur']);
270
GEN_stockerMetaNameDC('DC.Date.created', $GLOBALS['_PAPYRUS_']['page']['date_creation'], '', 'W3CDTF');
271
GEN_stockerMetaNameDC('DC.Date.valid', $GLOBALS['_PAPYRUS_']['page']['periode_validite'], '', 'W3CDTF');
5 jpm 272
//Ajouter la gestion des dates valid et available en utilisant les dates de la table gen_page_contenu.
169 jpm 273
GEN_stockerMetaNameDC('DC.Date.dateSubmitted', $GLOBALS['_PAPYRUS_']['page']['date_soumission'], '', 'W3CDTF');
274
GEN_stockerMetaNameDC('DC.Date.dateCopyrighted', $GLOBALS['_PAPYRUS_']['page']['date_copyright'], '', 'W3CDTF');
275
GEN_stockerMetaNameDC('DC.Date.dateAccepted', $GLOBALS['_PAPYRUS_']['page']['date_acceptation'], '', 'W3CDTF');
276
GEN_stockerMetaNameDC('DC.Source', $GLOBALS['_PAPYRUS_']['page']['source'], '', 'URI');
277
GEN_stockerMetaNameDC('DC.Language', $GLOBALS['_PAPYRUS_']['page']['langue_rfc_3066'], '', 'RFC3066');
278
GEN_stockerMetaNameDC('DC.Coverage.spatial', $GLOBALS['_PAPYRUS_']['page']['portee_spatiale'], '', $GLOBALS['_PAPYRUS_']['page']['type_portee_spatiale']);
279
GEN_stockerMetaNameDC('DC.Coverage.temporal', $GLOBALS['_PAPYRUS_']['page']['portee_temporelle'], '', $GLOBALS['_PAPYRUS_']['page']['type_portee_temporelle']);
280
GEN_stockerMetaNameDC('DC.Rights', $GLOBALS['_PAPYRUS_']['page']['licence'], '', 'URI');
281
GEN_stockerMetaNameDC('DC.Audience', $GLOBALS['_PAPYRUS_']['page']['public']);
282
GEN_stockerMetaNameDC('DC.Audience.educationLevel', $GLOBALS['_PAPYRUS_']['page']['public_niveau']);
5 jpm 283
 
284
// Construction des CSS
285
// Déclaration des constantes contenant les CSS à afficher sur la page.
290 jpm 286
$GLOBALS['_GEN_commun']['style_type']  = 'text/css';
287
$GLOBALS['_GEN_commun']['style_integree']  = '';
288
$GLOBALS['_GEN_commun']['style_externe']   = array();
5 jpm 289
 
290
// Construction du Javascript
291
// Déclaration des constantes contenant le Javascript à afficher sur la page.
290 jpm 292
$GLOBALS['_GEN_commun']['script_type']    = 'text/javascript';
293
$GLOBALS['_GEN_commun']['script_code']     = '';
294
$GLOBALS['_GEN_commun']['script_fonction'] = array();
295
$GLOBALS['_GEN_commun']['script_fichier']  = array();
5 jpm 296
 
297
// +------------------------------------------------------------------------------------------------------+
1092 florian 298
// Gestion de l'espace de nom pour les balise Papyrus
299
$GLOBALS['_GEN_commun']['balise_prefixe'] = 'PAPYRUS_';
300
$GLOBALS['_GEN_commun']['balise_prefixe_client'] = 'CLIENT_';
5 jpm 301
 
1092 florian 302
// +------------------------------------------------------------------------------------------------------+
303
// Gestion des inclusions des fichiers d'applettes présentes dans le squelette
304
// TODO : Supprimer des fichiers du coeur de Papyrus, précédent ce fichier, la variable : $_GEN_commun['info_applette']
305
$GLOBALS['_PAPYRUS_']['info_applette'] = array();
1148 jp_milcent 306
$PapRendu = new Pap_Rendu();
307
$PapRendu->parserBaliseApplette($GLOBALS['_PAPYRUS_']['general']['contenu_squelette']);
5 jpm 308
 
309
// +------------------------------------------------------------------------------------------------------+
310
// Gestion de l'intégration de l'application liée au menu
311
 
1336 neiluj 312
// Une fois les applettes appelées et exécutées nous appelons l'application qui peut avoir
5 jpm 313
// besoins des infos des applettes (c'est le cas, pour l'applette IDENTIFICATION).
169 jpm 314
$GLOBALS['_PAPYRUS_']['general']['application_chemin'] = '';
290 jpm 315
if (isset($GLOBALS['_GEN_commun']['info_application']->gap_chemin)) {
316
    $GLOBALS['_PAPYRUS_']['general']['application_chemin'] = $GLOBALS['_GEN_commun']['info_application']->gap_chemin;
92 jpm 317
}
5 jpm 318
 
557 ddelon 319
// Affichage contenu si identifié (parametre : lecture = + )
320
 
1092 florian 321
$lecture = 0;
557 ddelon 322
if ((isset($GLOBALS['_GEN_commun']['info_application']->lecture)) && ($GLOBALS['_GEN_commun']['info_application']->lecture=="+")) {
323
	if ($GLOBALS['_GEN_commun']['pear_auth']->getAuth()) {
324
		$lecture=1;
325
	}
326
}
327
// Emplacement pour traiter les futurs cas :
328
else {
329
	$lecture=1;
330
}
331
 
332
if (!$lecture) {
333
	function afficherContenuCorps()
334
    {
335
        return '<p class="pap_erreur">'.'Pas autorisé, veuillez vous identifier.'.'</p>';
336
    }
337
}
338
 
5 jpm 339
// $application_chemin contient le chemin de l'application
340
// Si $application_chemin est vide, on défini putFrame comme ne retournant rien.
341
 
169 jpm 342
if (empty($GLOBALS['_PAPYRUS_']['general']['application_chemin']) ) {
5 jpm 343
    function afficherContenuCorps()
344
    {
92 jpm 345
        return '<p class="pap_erreur">'.'Pas d\'application.'.'</p>';
5 jpm 346
    }
347
} else {
169 jpm 348
    if (file_exists($GLOBALS['_PAPYRUS_']['general']['application_chemin'])) {
557 ddelon 349
    	if (!function_exists('afficherContenuCorps')) {
350
        	include_once($GLOBALS['_PAPYRUS_']['general']['application_chemin']);
351
    	}
5 jpm 352
    } else {
169 jpm 353
        die('ERREUR Papyrus : application impossible à charger. <br />'.
354
            'Chemin application : '.$GLOBALS['_PAPYRUS_']['general']['application_chemin'].' <br />'.
5 jpm 355
            'Ligne n° : '. __LINE__ .'<br />'.
356
            'Fichier : '. __FILE__ );
357
    }
358
}
359
 
557 ddelon 360
 
361
 
5 jpm 362
// +------------------------------------------------------------------------------------------------------+
363
// Recherche des informations provenant de l'application pour la complétion du squelette
364
 
118 jpm 365
// Contenu navigation
366
// Appel de la fonction afficherContenuNavigation() si elle existe.
169 jpm 367
$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_NAVIGATION'] = (function_exists('afficherContenuNavigation') ? afficherContenuNavigation() : '<!-- '.'Aucune navigation'.' -->');
118 jpm 368
 
5 jpm 369
// Contenu tête
370
// Appel de la fonction afficherContenuTete() si elle existe.
169 jpm 371
$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_TETE'] = (function_exists('afficherContenuTete') ? afficherContenuTete() : '<!-- '.'Aucun contenu tête'.' -->');
5 jpm 372
 
373
// Contenu corps
374
// Appel de la fonction afficherContenuCorps().
375
if (function_exists('afficherContenuCorps') ) {
169 jpm 376
    $GLOBALS['_PAPYRUS_']['rendu']['CONTENU_CORPS'] = afficherContenuCorps();
5 jpm 377
} else {
169 jpm 378
    $GLOBALS['_PAPYRUS_']['rendu']['CONTENU_CORPS'] =
379
        'ERREUR Papyrus : fonction afficherContenuCorps() introuvable dans l\'application demandée. <br />'.
5 jpm 380
        'Ligne n° : '. __LINE__ .'<br />'.
381
        'Fichier : '. __FILE__;
382
}
414 alexandre_ 383
 
384
// Appel de la fonction afficherContenuMenu() si elle existe.
565 ddelon 385
if (isset($GLOBALS['_PAPYRUS_']['rendu']['CONTENU_MENU'])) {
386
	$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_MENU'] .= (function_exists('afficherContenuMenu') ? afficherContenuMenu() : '<!-- '.'Aucun menu pour cette application'.' -->');
387
}
388
else {
389
	$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_MENU'] = (function_exists('afficherContenuMenu') ? afficherContenuMenu() : '<!-- '.'Aucun menu pour cette application'.' -->');
390
}
414 alexandre_ 391
 
5 jpm 392
// Contenu pied
393
// Appel de la fonction afficherContenuPied() si elle existe.
169 jpm 394
$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_PIED'] = (function_exists('afficherContenuPied') ? afficherContenuPied() : '<!-- '.'Aucun contenu pied'.' -->');
5 jpm 395
 
1092 florian 396
// Compilation du contenu de l'application
397
$GLOBALS['_PAPYRUS_']['general']['contenu_application'] = 	$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_NAVIGATION'].
398
															$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_TETE'].
399
															$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_CORPS'].
400
															$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_MENU'].
401
															$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_PIED'];
159 jpm 402
 
403
// +------------------------------------------------------------------------------------------------------+
404
// Continuation recherche d'info provenant de Papyrus pour la complétion du squelette
5 jpm 405
 
1336 neiluj 406
// Une fois l'application appelé est exécuté nous affichons le contenu de l'entête qui a pu
5 jpm 407
// être modifié par l'application.
169 jpm 408
$GLOBALS['_PAPYRUS_']['rendu']['META_HTTP_EQUIV'] = GEN_afficherMeta('http-equiv');
409
$GLOBALS['_PAPYRUS_']['rendu']['META_NAME'] = GEN_afficherMeta('name');
410
$GLOBALS['_PAPYRUS_']['rendu']['META_NAME_DC'] = GEN_afficherMeta('dc');
5 jpm 411
// Nous récupérons tout les styles CSS pour l'afficher dans l'entête de la page.
169 jpm 412
$GLOBALS['_PAPYRUS_']['rendu']['STYLES'] = GEN_afficherStyle();
5 jpm 413
// Nous récupérons tout le Javascript pour l'afficher dans l'entête de la page.
169 jpm 414
$GLOBALS['_PAPYRUS_']['rendu']['SCRIPTS'] = GEN_afficherScript();
1336 neiluj 415
$GLOBALS['_PAPYRUS_']['rendu']['VERSION'] = PAP_VERSION;
5 jpm 416
 
417
// +------------------------------------------------------------------------------------------------------+
1148 jp_milcent 418
// Remplacement des balises des applettes de Papyrus et des Clients dans le squelette avant les appli
419
$PapRendu->remplacerBaliseApplette();
420
 
421
// +------------------------------------------------------------------------------------------------------+
1092 florian 422
// Gestion des inclusions des fichiers d'applettes présentes dans le contenu généré par l'application
1097 florian 423
if (!isset($GLOBALS['_PAPYRUS_']['applette']['analyse']) || $GLOBALS['_PAPYRUS_']['applette']['analyse'] == true) {
1093 florian 424
	// Puisque l'application autorise l'analyse, nous l'effectuons:
1148 jp_milcent 425
	$PapRendu->parserBaliseApplette($GLOBALS['_PAPYRUS_']['general']['contenu_application'], true);
1093 florian 426
}
1092 florian 427
 
428
// +------------------------------------------------------------------------------------------------------+
1148 jp_milcent 429
// Remplacement des balises Papyrus dans le squelette, le contenu généré par l'appli est remplacé.
1147 jp_milcent 430
foreach ($GLOBALS['_PAPYRUS_']['rendu'] as $GLOBALS['_PAPYRUS_']['tmp']['cle'] => $GLOBALS['_PAPYRUS_']['tmp']['val']) {
431
    $GLOBALS['_PAPYRUS_']['general']['contenu_squelette'] =
432
                    str_replace(   '<!-- '.$_GEN_commun['balise_prefixe'].$GLOBALS['_PAPYRUS_']['tmp']['cle'].' -->',
433
                                    $GLOBALS['_PAPYRUS_']['tmp']['val'],
434
                                    $GLOBALS['_PAPYRUS_']['general']['contenu_squelette']);
435
}
1092 florian 436
 
437
// +------------------------------------------------------------------------------------------------------+
1148 jp_milcent 438
// Remplacement des balises des applettes de Papyrus et des Clients dans le contenu de l'application si nécessaire
439
if ($PapRendu->getBoolBaliseAppli()) {
440
	$PapRendu->remplacerBaliseApplette();
441
}
442
 
443
// +------------------------------------------------------------------------------------------------------+
1336 neiluj 444
// Stokage du squelette dans un variable globale après avoir remplacer les balises Papyrus.
352 jpm 445
$GLOBALS['_GEN_commun']['sortie'] = $GLOBALS['_PAPYRUS_']['general']['contenu_squelette'];
5 jpm 446
 
447
/* +--Fin du code ---------------------------------------------------------------------------------------+
448
*
449
* $Log: not supported by cvs2svn $
1336 neiluj 450
* Revision 1.37  2007/04/13 09:41:09  neiluj
451
* réparration cvs
452
*
1316 neiluj 453
* Revision 1.36  2006/12/13 17:17:41  jp_milcent
454
* Suppression de l'analyse par Text_Wiki.
455
*
1169 jp_milcent 456
* Revision 1.35  2006/12/12 17:15:57  jp_milcent
457
* Correction bogue : mauvais ordre pour parser les balises.
458
*
1148 jp_milcent 459
* Revision 1.34  2006/12/12 13:56:33  jp_milcent
1336 neiluj 460
* Modification de l'ordre de remplacement des balises pour permettre aux apllettes d'interagir sur le contenu de l'application.
1148 jp_milcent 461
*
1147 jp_milcent 462
* Revision 1.33  2006/12/08 15:59:17  jp_milcent
463
* Suppression de code inutile.
464
*
1120 jp_milcent 465
* Revision 1.32  2006/12/01 17:05:34  florian
466
* Correction bogue d'opérateur.
467
*
1097 florian 468
* Revision 1.31  2006/12/01 16:59:45  florian
469
* Ajout d'une variable parametrant la recherche de balise d'applette dans le contenu généré par l'appli.
470
*
1093 florian 471
* Revision 1.30  2006/12/01 16:41:04  florian
472
* Début gestion de l'appel des applettes dans le squelette comme dans le contenu généré par l'application.
473
*
1092 florian 474
* Revision 1.29  2006/04/20 09:45:30  alexandre_tb
475
* ligne 92, remplacement de gs_fichier_squelette par gm_fichier_squelette, car on appelle le squelette du menu (s'il existe) et non du site.
476
* Posait un pb lors de l'affichage de squelettes (de menu) des traductions de menu
477
*
827 alexandre_ 478
* Revision 1.28  2006/03/13 21:00:20  ddelon
479
* Suppression messages d'erreur multilinguisme
480
*
767 ddelon 481
* Revision 1.27  2006/03/02 13:45:27  ddelon
482
* Balise url page
483
*
757 ddelon 484
* Revision 1.26  2006/03/02 10:49:49  ddelon
485
* Fusion branche multilinguisme dans branche principale
486
*
754 ddelon 487
* Revision 1.25  2005/12/09 15:07:07  florian
488
* suppression de debogage.css, pour optimiser les performances (c'est intégré dans la feuille de style par défaut dorénavant)
489
*
490
* Revision 1.24.2.6  2006/03/01 22:28:15  ddelon
491
* Balise url page
492
*
493
* Revision 1.24.2.5  2006/03/01 22:09:49  ddelon
494
* Balise url page
495
*
496
* Revision 1.24.2.4  2006/02/28 15:54:07  ddelon
497
* Integration branche principale
498
*
499
* Revision 1.24.2.3  2006/02/28 14:02:09  ddelon
500
* Finition multilinguisme
501
*
502
* Revision 1.24.2.2  2006/01/19 21:26:20  ddelon
503
* Multilinguisme site + bug ftp
504
*
505
* Revision 1.24.2.1  2005/12/20 14:40:24  ddelon
506
* Fusion Head vers Livraison
507
*
508
* Revision 1.25  2005/12/09 15:07:07  florian
509
* suppression de debogage.css, pour optimiser les performances (c'est intégré dans la feuille de style par défaut dorénavant)
510
*
648 florian 511
* Revision 1.24  2005/10/21 22:22:16  ddelon
512
* projet wikini : fiche synthese
513
*
565 ddelon 514
* Revision 1.23  2005/10/20 13:12:18  ddelon
515
* Gestion protection menu
516
*
557 ddelon 517
* Revision 1.22  2005/10/20 10:28:25  ddelon
518
* Wikini complet dans l'intégrateur Wikini
519
*
556 ddelon 520
* Revision 1.21  2005/10/17 13:41:34  ddelon
521
* Projet Wikini
522
*
545 ddelon 523
* Revision 1.20  2005/10/17 10:52:00  jp_milcent
524
* Mise en majuscule du jeu de caractère, conformément à la recommandation.
525
*
544 jp_milcent 526
* Revision 1.19  2005/10/12 17:20:33  ddelon
527
* Reorganisation calendrier + applette
528
*
530 ddelon 529
* Revision 1.18  2005/09/22 14:02:49  ddelon
530
* nettoyage annuaire et php5
531
*
448 ddelon 532
* Revision 1.17  2005/09/20 17:01:22  ddelon
533
* php5 et bugs divers
534
*
443 ddelon 535
* Revision 1.16  2005/07/12 09:13:15  alexandre_tb
1336 neiluj 536
* Déplacement de l'appel de la fonction afficherContenuMenu APRES l'appel de afficherContenuCorps.
443 ddelon 537
* Le menu d'une application étant calculé après les opérations de l'application.
538
*
414 alexandre_ 539
* Revision 1.15  2005/07/08 21:13:15  ddelon
540
* Gestion indentation menu
541
*
409 ddelon 542
* Revision 1.14  2005/05/11 14:31:45  jpm
543
* Ajout de la fonction afficherContenuMenu() pour les applications.
544
*
365 jpm 545
* Revision 1.13  2005/04/21 16:46:39  jpm
546
* Gestion via Papyrus du XHTML de Text_Wiki_Papyrus.
547
*
352 jpm 548
* Revision 1.12  2005/03/02 11:04:36  jpm
549
* Modification de l'utilisation d'une variable globale.
550
*
290 jpm 551
* Revision 1.11  2005/02/28 11:20:42  jpm
552
* Modification des auteurs.
553
*
286 jpm 554
* Revision 1.10  2005/01/26 16:20:46  jpm
555
* Correction bogue meta : auteurs et mots-clés mélangés.
556
*
252 jpm 557
* Revision 1.9  2004/12/06 19:39:40  jpm
558
* Correction langue DC.
559
*
213 jpm 560
* Revision 1.8  2004/11/26 19:02:07  jpm
561
* Comptabilisation du nombre d'appel de chaque applette dans le squelette.
562
*
184 jpm 563
* Revision 1.7  2004/11/24 18:33:29  jpm
564
* Encapsulation des variables dans le tableau global _PAPYRUS_.
565
*
169 jpm 566
* Revision 1.6  2004/11/15 17:40:21  jpm
567
* Gestion d'un espace de nom pour les balises Papyrus.
568
*
159 jpm 569
* Revision 1.5  2004/10/26 18:42:54  jpm
570
* Gestion de la fonction de navigation pour les appli Papyrus.
571
*
118 jpm 572
* Revision 1.4  2004/10/25 16:28:47  jpm
573
* Ajout de nouvelles balises Papyrus, ajout vérification mise à jour de Papyrus, meilleure gestion des sessions...
574
*
112 jpm 575
* Revision 1.3  2004/10/22 17:23:35  jpm
576
* Amélioration de la gestion de l'erreur si pas d'appli.
577
*
92 jpm 578
* Revision 1.2  2004/06/17 08:04:44  jpm
579
* Changement de constante pour les chemin d'accès à la biblio de code de Papyrus.
580
*
14 jpm 581
* Revision 1.1  2004/06/16 08:13:58  jpm
1336 neiluj 582
* Changement de nom de Papyrus en Papyrus.
14 jpm 583
* Changement de l'arborescence.
584
*
5 jpm 585
* Revision 1.32  2004/05/10 12:24:55  jpm
586
* Amélioration de la recherche des fichiers de squelette.
587
*
588
* Revision 1.31  2004/05/05 10:42:35  jpm
589
* Amélioration de la gestion de l'internationalisation.
590
*
591
* Revision 1.30  2004/05/05 08:25:37  jpm
592
* Modification de la façon d'ajouter la feuille de style de débogage pour qu'elle soit prise en compte par défaut.
593
*
594
* Revision 1.29  2004/05/03 14:12:04  jpm
1336 neiluj 595
* Suppression du fichier bibliothèque de fonctions sur gen_menu.
5 jpm 596
*
597
* Revision 1.28  2004/05/03 11:21:58  jpm
598
* Fin de la gestion des applettes et suppression de l'info_menu_hierarchie de _GEN_commun.
599
*
600
* Revision 1.27  2004/05/01 17:22:55  jpm
601
* Appel de la bibliothèque de fonctions concernant les menus.
602
*
603
* Revision 1.26  2004/05/01 16:19:36  jpm
604
* Suppression du code ayant pu être transformé en applettes (menu multi-niveaux, menu unique, menu commun, identification, sélecteur de sites).
605
*
606
* Revision 1.25  2004/05/01 11:39:38  jpm
607
* Déplacement du code gérant les applettes et du code de récupération du contenu du fichier squelette.
608
*
609
* Revision 1.24  2004/04/28 12:04:31  jpm
610
* Changement du modèle de la base de données.
611
*
612
* Revision 1.23  2004/04/22 08:30:47  jpm
613
* Transformation de $GS_GLOBAL en $_GEN_commun.
614
*
615
* Revision 1.22  2004/04/21 07:55:02  jpm
1336 neiluj 616
* Ajout de la feuille de style de débogage si le débogage de Papyrus est activé.
5 jpm 617
*
618
* Revision 1.19  2004/04/09 16:20:54  jpm
619
* Extraction de la gestion du cache et de l'envoi.
620
* Gestion des tables i18n.
621
*
622
* Revision 1.18  2004/04/08 12:29:48  jpm
1336 neiluj 623
* Début amélioration de la gestion du cache et de la compression des pages de Papyrus.
5 jpm 624
*
625
* Revision 1.17  2004/04/05 16:38:04  jpm
626
* Utilisation des nouvelles fonctions gérant l'insertion du Javascript.
627
*
628
* Revision 1.16  2004/04/02 16:30:56  jpm
1336 neiluj 629
* Gestion de la balise Papyrus IDENTIFICATION permettant l'envoie d'un formulaire de login.
5 jpm 630
*
631
* Revision 1.15  2004/04/01 11:27:13  jpm
632
* Ajout et modification de commentaires pour PhpDocumentor.
633
*
634
* Revision 1.14  2004/03/31 16:50:10  jpm
1336 neiluj 635
* Prise en compte du nouveau modèle de Papyrus révision 1.9.
5 jpm 636
*
637
* Revision 1.13  2004/03/27 11:07:45  jpm
638
* Modification des commentaires vis à vis du nouveau modèle.
639
* Mise en conformité avec la convention de codage.
640
* Amélioration du code.
641
*
642
* Revision 1.12  2004/03/23 17:06:44  jpm
643
* Ajout de commentaire dans l'entête.
644
* Mise en conformité avec la convention de codage.
645
*
646
* +-- Fin du code ----------------------------------------------------------------------------------------+
647
*/
648
?>