Subversion Repositories Applications.papyrus

Rev

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

Rev 556 Rev 557
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.22 2005-10-20 10:28:25 ddelon Exp $
35
// CVS : $Id: pap_rendu.inc.php,v 1.23 2005-10-20 13:12:18 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.22 $ $Date: 2005-10-20 10:28:25 $
51
*@version       $Revision: 1.23 $ $Date: 2005-10-20 13:12:18 $
52
// +------------------------------------------------------------------------------------------------------+
52
// +------------------------------------------------------------------------------------------------------+
53
*/
53
*/
Line 54... Line 54...
54
 
54
 
Line 320... Line 320...
320
}
320
}
Line 321... Line 321...
321
 
321
 
322
// +------------------------------------------------------------------------------------------------------+
322
// +------------------------------------------------------------------------------------------------------+
Line 323... Line 323...
323
// Gestion de l'intégration de l'application liée au menu
323
// Gestion de l'intégration de l'application liée au menu
324
 
324
 
325
// Une fois les applettes appelées est executées nous appelons l'application qui peut avoir
325
// Une fois les applettes appelées et executées nous appelons l'application qui peut avoir
326
// besoins des infos des applettes (c'est le cas, pour l'applette IDENTIFICATION).
326
// besoins des infos des applettes (c'est le cas, pour l'applette IDENTIFICATION).
327
$GLOBALS['_PAPYRUS_']['general']['application_chemin'] = '';
327
$GLOBALS['_PAPYRUS_']['general']['application_chemin'] = '';
328
if (isset($GLOBALS['_GEN_commun']['info_application']->gap_chemin)) {
328
if (isset($GLOBALS['_GEN_commun']['info_application']->gap_chemin)) {
Line -... Line 329...
-
 
329
    $GLOBALS['_PAPYRUS_']['general']['application_chemin'] = $GLOBALS['_GEN_commun']['info_application']->gap_chemin;
-
 
330
}
-
 
331
 
-
 
332
// Affichage contenu si identifié (parametre : lecture = + )
-
 
333
 
-
 
334
$lecture=0;
-
 
335
if ((isset($GLOBALS['_GEN_commun']['info_application']->lecture)) && ($GLOBALS['_GEN_commun']['info_application']->lecture=="+")) {
-
 
336
	if ($GLOBALS['_GEN_commun']['pear_auth']->getAuth()) {
-
 
337
		$lecture=1;
-
 
338
	}
-
 
339
}
-
 
340
// Emplacement pour traiter les futurs cas :
-
 
341
else {
-
 
342
	$lecture=1;
-
 
343
}
-
 
344
 
-
 
345
if (!$lecture) {
-
 
346
	function afficherContenuCorps()
-
 
347
    {
-
 
348
        return '<p class="pap_erreur">'.'Pas autorisé, veuillez vous identifier.'.'</p>';
329
    $GLOBALS['_PAPYRUS_']['general']['application_chemin'] = $GLOBALS['_GEN_commun']['info_application']->gap_chemin;
349
    }
330
}
350
}
Line 331... Line 351...
331
 
351
 
332
// $application_chemin contient le chemin de l'application
352
// $application_chemin contient le chemin de l'application
333
// Si $application_chemin est vide, on défini putFrame comme ne retournant rien.
353
// Si $application_chemin est vide, on défini putFrame comme ne retournant rien.
334
 
354
 
335
if (empty($GLOBALS['_PAPYRUS_']['general']['application_chemin']) ) {
355
if (empty($GLOBALS['_PAPYRUS_']['general']['application_chemin']) ) {
336
    function afficherContenuCorps()
356
    function afficherContenuCorps()
337
    {
357
    {
-
 
358
        return '<p class="pap_erreur">'.'Pas d\'application.'.'</p>';
338
        return '<p class="pap_erreur">'.'Pas d\'application.'.'</p>';
359
    }
-
 
360
} else {
339
    }
361
    if (file_exists($GLOBALS['_PAPYRUS_']['general']['application_chemin'])) {
340
} else {
362
    	if (!function_exists('afficherContenuCorps')) {
341
    if (file_exists($GLOBALS['_PAPYRUS_']['general']['application_chemin'])) {
363
        	include_once($GLOBALS['_PAPYRUS_']['general']['application_chemin']);
342
        include_once($GLOBALS['_PAPYRUS_']['general']['application_chemin']); 
364
    	} 
343
    } else {
365
    } else {
344
        die('ERREUR Papyrus : application impossible à charger. <br />'.
366
        die('ERREUR Papyrus : application impossible à charger. <br />'.
345
            'Chemin application : '.$GLOBALS['_PAPYRUS_']['general']['application_chemin'].' <br />'.
367
            'Chemin application : '.$GLOBALS['_PAPYRUS_']['general']['application_chemin'].' <br />'.
Line -... Line 368...
-
 
368
            'Ligne n° : '. __LINE__ .'<br />'.
-
 
369
            'Fichier : '. __FILE__ );
346
            'Ligne n° : '. __LINE__ .'<br />'.
370
    }
347
            'Fichier : '. __FILE__ );
371
}
Line 348... Line 372...
348
    }
372
 
349
}
373
 
Line 504... Line 528...
504
$GLOBALS['_GEN_commun']['sortie'] = $GLOBALS['_PAPYRUS_']['general']['contenu_squelette'];
528
$GLOBALS['_GEN_commun']['sortie'] = $GLOBALS['_PAPYRUS_']['general']['contenu_squelette'];
Line 505... Line 529...
505
 
529
 
506
/* +--Fin du code ---------------------------------------------------------------------------------------+
530
/* +--Fin du code ---------------------------------------------------------------------------------------+
507
*
531
*
-
 
532
* $Log: not supported by cvs2svn $
-
 
533
* Revision 1.22  2005/10/20 10:28:25  ddelon
-
 
534
* Wikini complet dans l'intégrateur Wikini
508
* $Log: not supported by cvs2svn $
535
*
509
* Revision 1.21  2005/10/17 13:41:34  ddelon
536
* Revision 1.21  2005/10/17 13:41:34  ddelon
510
* Projet Wikini
537
* Projet Wikini
511
*
538
*
512
* Revision 1.20  2005/10/17 10:52:00  jp_milcent
539
* Revision 1.20  2005/10/17 10:52:00  jp_milcent