Subversion Repositories Applications.papyrus

Rev

Rev 1987 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1037 jp_milcent 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2005 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This file is part of Papyrus.                                                                        |
9 
// |                                                                                                      |
10 
// | Foobar is free software; you can redistribute it and/or modify                                       |
11 
// | it under the terms of the GNU General Public License as published by                                 |
12 
// | the Free Software Foundation; either version 2 of the License, or                                    |
13 
// | (at your option) any later version.                                                                  |
14 
// |                                                                                                      |
15 
// | Foobar 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                                        |
18 
// | GNU General Public License for more details.                                                         |
19 
// |                                                                                                      |
20 
// | You should have received a copy of the GNU General Public License                                    |
21 
// | along with Foobar; if not, write to the Free Software                                                |
22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23 
// +------------------------------------------------------------------------------------------------------+
1339 neiluj 24 
// CVS : $Id: erreur_http.php,v 1.3 2007-04-19 16:53:20 neiluj Exp $
1037 jp_milcent 25 
/**
26 
* Gestion des erreurs HTTP
27 
*
28 
* Permet d'afficher les pages d'erreur HTTP présentes dans Papyrus
29 
*
30 
*@package Papyrus
31 
//Auteur original :
32 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
33 
//Autres auteurs :
34 
*@author        Aucun
35 
*@copyright     Tela-Botanica 2000-2005
1339 neiluj 36 
*@version       $Revision: 1.3 $ $Date: 2007-04-19 16:53:20 $
1037 jp_milcent 37 
// +------------------------------------------------------------------------------------------------------+
38 
*/
39 
 
40 
// +------------------------------------------------------------------------------------------------------+
41 
// |                                            ENTETE du PROGRAMME                                       |
42 
// +------------------------------------------------------------------------------------------------------+
1339 neiluj 43 
// Définition de constantes
1037 jp_milcent 44 
/** Chemin et nom du fichier de configuration principal de Papyrus.*/
45 
define('PAP_FICHIER_CONFIG', 'papyrus/configuration/pap_config.inc.php');
46 
/** Chemin et nom du fichier de configuration avancée de Papyrus.*/
47 
define('PAP_FICHIER_CONFIG_AVANCEE', 'papyrus/configuration/pap_config_avancee.inc.php');
48 
/** Chemin et nom du fichier Pear HTTP.*/
49 
define('PAP_FICHIER_PEAR_HTTP', 'api/pear/HTTP.php');
50 
 
51 
// +------------------------------------------------------------------------------------------------------+
52 
// |                                            CORPS du PROGRAMME                                        |
53 
// +------------------------------------------------------------------------------------------------------+
54 
// Nous vérifions que ce fichier n'est pas accédé directement
55 
if (!isset($_SERVER['REDIRECT_STATUS'])) {
56 
	header('Location: /');
57 
}
58 
// +------------------------------------------------------------------------------------------------------+
59 
// Recherche du chemin vers papyrus.
60 
preg_match('/^(\/.*?)([^\/]+?)(?:\?(.*)|)$/', $_SERVER['REQUEST_URI'], $tab_raccourci);
61 
$raccourci = $tab_raccourci[2];
62 
$chemin_papyrus = $tab_raccourci[1];
63 
$parametres = '';
64 
if (isset($tab_raccourci[2])) {
65 
    $parametres = $tab_raccourci[2];
66 
}
67 
// Inclusion des fichiers, si échec on redirige vers la racine du site
68 
if (file_exists(PAP_FICHIER_CONFIG) && file_exists(PAP_FICHIER_CONFIG_AVANCEE) && file_exists(PAP_FICHIER_PEAR_HTTP)) {
69 
    /** Inclusion du fichier de configuration de Papyrus permettant de se conecter à la base de données. */
70 
    require_once PAP_FICHIER_CONFIG;
71 
    /** Inclusion du fichier de configuration de Papyrus permettant d'avoir des infos sur la structure de l'url. */
72 
    require_once PAP_FICHIER_CONFIG_AVANCEE;
73 
    /** Inclusion de l'objet PEAR servant à négocier le language avec le navigateur client. */
74 
    require_once PAP_FICHIER_PEAR_HTTP;
75 
} else {
76 
	header('Location: /');
77 
}
78 
// Utilisation de la fonction statique de Pear HTTP pour négocier l'i18n.
79 
$aso_i18n_possible = array(GEN_I18N_ID_DEFAUT => true);
80 
$i18n = HTTP::negotiateLanguage($aso_i18n_possible, GEN_I18N_ID_DEFAUT);
81 
// Redirection vers le fichier erreur de Papyrus s'il existe
82 
$fichier_erreur = sprintf(PAP_FICHIER_ERREUR_HTTP, $i18n, $_GET['erreur']);
83 
if (file_exists($fichier_erreur)) {
1339 neiluj 84 
    header ('Location: '.dirname(PAP_URL).sprintf(PAP_URL_ERREUR_HTTP, $i18n, $_GET['erreur'], $_SERVER['REQUEST_URI']));
1037 jp_milcent 85 
} else {
86 
    echo 	'ERREUR Papyrus : Impossible de trouver le fichier de l\'erreur '.$_GET['erreur'].'<br />'.
87 
			'Chemin fichier erreur : '.$fichier_erreur.' <br />'.
88 
			'Veuillez le créer ou supprimer l\'entrée correspondante dans le fichier .htaccess.<br />'.
89 
			'Ligne n° : '. __LINE__ .'<br />'.
90 
			'Fichier : '. __FILE__ ;
91 
}
92 
exit(0);
93 
 
94 
/* +--Fin du code ----------------------------------------------------------------------------------------+
95 
*
96 
* $Log: not supported by cvs2svn $
1339 neiluj 97 
* Revision 1.2  2006/10/26 16:29:52  jp_milcent
98 
* Correction erreur redirection en boucle.
99 
*
1041 jp_milcent 100 
* Revision 1.1  2006/10/18 10:18:05  jp_milcent
101 
* Gestion des erreurs HTTP par Papyrus.
102 
*
1037 jp_milcent 103 
* Revision 1.5  2006/10/18 09:27:32  jp_milcent
104 
* Gestion des erreurs 404 uniquement.
105 
*
106 
*
107 
* +-- Fin du code ----------------------------------------------------------------------------------------+
108 
*/
109 
?>