Subversion Repositories Applications.papyrus

Rev

Rev 1818 | Rev 2038 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1818 Rev 1969
Line 30... Line 30...
30
 
30
 
31
// Le fait que vous puissiez accéder à cet en-tête signifie que vous avez 
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
32
// pris connaissance de la licence CeCILL, et que vous en avez accepté les
33
// termes.
33
// termes.
34
// ----
34
// ----
35
// CVS : $Id: pap_rendu.inc.php,v 1.43 2008-03-17 18:33:46 jp_milcent Exp $
35
// CVS : $Id: pap_rendu.inc.php,v 1.44 2008-11-14 23:47:37 ddelon Exp $
36
/**
36
/**
37
* Rendu : programme traitant l'url demandée et retournant la page compressé au navigateur.
37
* Rendu : programme traitant l'url demandée et retournant la page compressé au navigateur.
38
*
38
*
39
* Ce programme contient la partie collectant les informations sur la page demandée par le navigateur client.
39
* Ce programme contient la partie collectant les informations sur la page demandée par le navigateur client.
Line 46... Line 46...
46
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
46
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
47
//Autres auteurs :
47
//Autres auteurs :
48
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
48
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
49
*@author        Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>
49
*@author        Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>
50
*@copyright     Tela-Botanica 2000-2004
50
*@copyright     Tela-Botanica 2000-2004
51
*@version       $Revision: 1.43 $ $Date: 2008-03-17 18:33:46 $
51
*@version       $Revision: 1.44 $ $Date: 2008-11-14 23:47:37 $
52
// +------------------------------------------------------------------------------------------------------+
52
// +------------------------------------------------------------------------------------------------------+
53
*/
53
*/
Line 54... Line 54...
54
 
54
 
Line 230... Line 230...
230
// Construction des infos sur le menu pour générer les balises
230
// Construction des infos sur le menu pour générer les balises
231
$GLOBALS['_PAPYRUS_']['rendu']['INFO_MENU_ID'] = htmlentities($GLOBALS['_GEN_commun'][$type_menu]->gm_id_menu);
231
$GLOBALS['_PAPYRUS_']['rendu']['INFO_MENU_ID'] = htmlentities($GLOBALS['_GEN_commun'][$type_menu]->gm_id_menu);
232
$GLOBALS['_PAPYRUS_']['rendu']['INFO_MENU_CODE_ALPHA'] = htmlentities($GLOBALS['_GEN_commun'][$type_menu]->gm_code_alpha);
232
$GLOBALS['_PAPYRUS_']['rendu']['INFO_MENU_CODE_ALPHA'] = htmlentities($GLOBALS['_GEN_commun'][$type_menu]->gm_code_alpha);
233
$GLOBALS['_PAPYRUS_']['rendu']['INFO_MENU_CODE_NUM'] = htmlentities($GLOBALS['_GEN_commun'][$type_menu]->gm_code_num);
233
$GLOBALS['_PAPYRUS_']['rendu']['INFO_MENU_CODE_NUM'] = htmlentities($GLOBALS['_GEN_commun'][$type_menu]->gm_code_num);
Line -... Line 234...
-
 
234
 
234
 
235
 
235
//Construction des infos sur le contexte d'affichage de la page
236
// Tag special PAPYRUS_PAGE_URL  utilise dans le multilinguisme 
236
$une_url = new Net_URL();
237
$une_url =new Pap_URL(PAP_URL);
237
$une_url->addQueryString("site",$GLOBALS['_GEN_commun']['url_site']);
-
 
238
$une_url->removeQueryString("langue");
238
$une_url->setId($GLOBALS['_GEN_commun']['info_menu']->gm_code_num);
-
 
239
$GLOBALS['_PAPYRUS_']['rendu']['PAGE_URL'] = $une_url->getUrl();
-
 
240
// Suppression langue si presente 
-
 
241
$GLOBALS['_PAPYRUS_']['rendu']['PAGE_URL'] = preg_replace("/\?langue=[a-z][a-z]/","",$GLOBALS['_PAPYRUS_']['rendu']['PAGE_URL']);
-
 
242
 
Line 239... Line 243...
239
$GLOBALS['_PAPYRUS_']['rendu']['PAGE_URL'] = $une_url->getUrl();
243
 
240
 
244
 
241
 
245
 
Line 483... Line 487...
483
															$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_PIED'];
487
															$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_PIED'];
Line 484... Line 488...
484
 
488
 
485
// +------------------------------------------------------------------------------------------------------+
489
// +------------------------------------------------------------------------------------------------------+
Line 486... Line -...
486
// Continuation recherche d'info provenant de Papyrus pour la complétion du squelette
-
 
487
 
-
 
488
// +------------------------------------------------------------------------------------------------------+
-
 
489
// Remplacement des balises des applettes de Papyrus et des Clients dans le squelette avant les appli
-
 
490
$PapRendu->remplacerBaliseApplette();
-
 
491
 
-
 
492
// +------------------------------------------------------------------------------------------------------+
-
 
493
// Gestion des inclusions des fichiers d'applettes présentes dans le contenu généré par l'application
-
 
494
if (!isset($GLOBALS['_PAPYRUS_']['applette']['analyse']) || $GLOBALS['_PAPYRUS_']['applette']['analyse'] == true) {
-
 
495
	// Puisque l'application autorise l'analyse, nous l'effectuons:
-
 
496
	$PapRendu->parserBaliseApplette($GLOBALS['_PAPYRUS_']['general']['contenu_application'], true);
-
 
497
}
490
// Continuation recherche d'info provenant de Papyrus pour la complétion du squelette
498
 
491
 
499
// Une fois l'application appelé est exécuté nous affichons le contenu de l'entête qui a pu 
492
// Une fois l'application appelé est exécuté nous affichons le contenu de l'entête qui a pu 
500
// être modifié par l'application.
493
// être modifié par l'application.
501
$GLOBALS['_PAPYRUS_']['rendu']['META_HTTP_EQUIV'] = GEN_afficherMeta('http-equiv');
494
$GLOBALS['_PAPYRUS_']['rendu']['META_HTTP_EQUIV'] = GEN_afficherMeta('http-equiv');
Line 505... Line 498...
505
$GLOBALS['_PAPYRUS_']['rendu']['STYLES'] = GEN_afficherStyle();
498
$GLOBALS['_PAPYRUS_']['rendu']['STYLES'] = GEN_afficherStyle();
506
// Nous récupérons tout le Javascript pour l'afficher dans l'entête de la page.
499
// Nous récupérons tout le Javascript pour l'afficher dans l'entête de la page.
507
$GLOBALS['_PAPYRUS_']['rendu']['SCRIPTS'] = GEN_afficherScript();
500
$GLOBALS['_PAPYRUS_']['rendu']['SCRIPTS'] = GEN_afficherScript();
508
$GLOBALS['_PAPYRUS_']['rendu']['VERSION'] = PAP_VERSION;
501
$GLOBALS['_PAPYRUS_']['rendu']['VERSION'] = PAP_VERSION;
Line -... Line 502...
-
 
502
 
-
 
503
// +------------------------------------------------------------------------------------------------------+
-
 
504
// Remplacement des balises des applettes de Papyrus et des Clients dans le squelette avant les appli
-
 
505
$PapRendu->remplacerBaliseApplette();
-
 
506
 
-
 
507
// +------------------------------------------------------------------------------------------------------+
-
 
508
// Gestion des inclusions des fichiers d'applettes présentes dans le contenu généré par l'application
-
 
509
if (!isset($GLOBALS['_PAPYRUS_']['applette']['analyse']) || $GLOBALS['_PAPYRUS_']['applette']['analyse'] == true) {
-
 
510
	// Puisque l'application autorise l'analyse, nous l'effectuons:
-
 
511
	$PapRendu->parserBaliseApplette($GLOBALS['_PAPYRUS_']['general']['contenu_application'], true);
Line 509... Line 512...
509
 
512
}
510
 
513
 
511
// +------------------------------------------------------------------------------------------------------+
514
// +------------------------------------------------------------------------------------------------------+
512
// Remplacement des balises Papyrus dans le squelette, le contenu généré par l'appli est remplacé.
515
// Remplacement des balises Papyrus dans le squelette, le contenu généré par l'appli est remplacé.