0337d704 |
1 | <?php |
2 | /*************************************************************************** |
5ddeb07c |
3 | * Copyright (C) 2003-2007 Polytechnique.org * |
0337d704 |
4 | * http://opensource.polytechnique.org/ * |
5 | * * |
6 | * This program is free software; you can redistribute it and/or modify * |
7 | * it under the terms of the GNU General Public License as published by * |
8 | * the Free Software Foundation; either version 2 of the License, or * |
9 | * (at your option) any later version. * |
10 | * * |
11 | * This program is distributed in the hope that it will be useful, * |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of * |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * |
14 | * GNU General Public License for more details. * |
15 | * * |
16 | * You should have received a copy of the GNU General Public License * |
17 | * along with this program; if not, write to the Free Software * |
18 | * Foundation, Inc., * |
19 | * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * |
20 | ***************************************************************************/ |
21 | |
d3f26be9 |
22 | $TIME_BEGIN = microtime(true); |
0337d704 |
23 | |
8b00e0e0 |
24 | define('AUTH_PUBLIC', 0); |
25 | define('AUTH_COOKIE', 1); |
26 | define('AUTH_MDP', 2); |
0337d704 |
27 | |
8b00e0e0 |
28 | define('PERMS_EXT', 'ext'); |
29 | define('PERMS_USER', 'user'); |
30 | define('PERMS_ADMIN', 'admin'); |
0337d704 |
31 | |
32 | define('SKINNED', 0); |
62a66dfc |
33 | define('SIMPLE', 1); |
34 | define('NO_SKIN', 2); |
0337d704 |
35 | |
94c63478 |
36 | define('NO_AUTH', 0); |
37 | define('DO_AUTH', 1); |
38 | |
81e9c63f |
39 | define('DEBUG_BT', 1); |
40 | define('DEBUG_VALID', 2); |
41 | define('DEBUG_SMARTY', 4); |
42 | |
42a50827 |
43 | function __autoload($cls) |
44 | { |
e654517d |
45 | $cls = strtolower($cls); |
46 | $path = dirname(dirname(__FILE__)); |
1148fc03 |
47 | if (!@include "$path/classes/$cls.php") { |
bd5e1f3d |
48 | if (substr($cls, -3, 3) == 'req') { |
e654517d |
49 | @include 'validations.inc.php'; |
50 | return; |
51 | } |
52 | @include "$cls.inc.php"; |
53 | } |
42a50827 |
54 | } |
6995a9b9 |
55 | __autoload('Env'); |
56 | |
57 | function pl_error_handler($errno, $errstr, $errfile, $errline) |
58 | { |
a18afbdc |
59 | static $errortype; |
6995a9b9 |
60 | if (!error_reporting()) |
61 | return; |
62 | |
a18afbdc |
63 | if (!isset($errortype)) { |
64 | $errortype = array ( |
65 | E_ERROR => "Error", |
66 | E_WARNING => "Warning", |
67 | E_PARSE => "Parsing Error", |
68 | E_NOTICE => "Notice", |
69 | E_CORE_ERROR => "Core Error", |
70 | E_CORE_WARNING => "Core Warning", |
71 | E_COMPILE_ERROR => "Compile Error", |
72 | E_COMPILE_WARNING => "Compile Warning", |
73 | E_USER_ERROR => "User Error", |
74 | E_USER_WARNING => "User Warning", |
75 | E_USER_NOTICE => "User Notice", |
76 | E_STRICT => "Runtime Notice" |
77 | ); |
78 | } |
6995a9b9 |
79 | |
28023828 |
80 | global $globals; |
a7de4ef7 |
81 | if (isset($globals) && !$globals->debug) { |
a18afbdc |
82 | if ($errno == E_NOTICE || $errno == E_USER_NOTICE || $errno == E_STRICT) { |
28023828 |
83 | return; |
84 | } |
85 | } |
86 | |
493b6abe |
87 | $errstr = utf8_encode(htmlentities($errstr)); |
6995a9b9 |
88 | $GLOBALS['pl_errors'][] = |
89 | "<div class='phperror'>". |
90 | "<strong>{$errortype[$errno]}</strong> <em>$errstr</em><br />". |
91 | "<tt>$errfile : $errline</tt>". |
92 | "</div>"; |
93 | } |
94 | |
0f384dd3 |
95 | function pl_clear_errors() |
96 | { |
97 | unset($GLOBALS['pl_errors']); |
98 | } |
99 | |
aa5f19ae |
100 | function pl_dump_env() |
101 | { |
102 | echo "<div class='phperror'><pre>"; |
103 | echo "\nSESSION: "; var_export($_SESSION); |
104 | echo "\nPOST: "; var_export($_POST); |
105 | echo "\nGET: "; var_export($_GET); |
6fb4b6fe |
106 | echo "\nCOOKIE: "; var_export($_COOKIE); |
aa5f19ae |
107 | echo "</pre></div>"; |
108 | } |
109 | |
6995a9b9 |
110 | function pl_print_errors() |
111 | { |
a18afbdc |
112 | if (!empty($GLOBALS['pl_errors'])) { |
113 | print join("\n", $GLOBALS['pl_errors']); |
114 | } |
6995a9b9 |
115 | } |
116 | |
117 | set_error_handler('pl_error_handler', E_ALL | E_STRICT); |
118 | register_shutdown_function('pl_print_errors'); |
6fb4b6fe |
119 | // register_shutdown_function('pl_dump_env'); |
0337d704 |
120 | |
92432704 |
121 | /** Check if the string is utf8 |
122 | */ |
123 | function is_utf8($s) |
124 | { |
125 | return @iconv('utf-8', 'utf-8', $s) == $s; |
126 | } |
127 | |
76a8d80b |
128 | /** vérifie si une adresse email est bien formatée * ATTENTION, cette fonction ne doit pas être appelée sur une chaîne ayant subit un addslashes (car elle accepte le "'" qui it alors un "\'" |
129 | * @param $email l'adresse email a verifier |
130 | * @return BOOL */ |
131 | function isvalid_email($email) |
132 | { |
133 | // la rfc2822 authorise les caractères "a-z", "0-9", "!", "#", "$", "%", "&", "'", "*", "+", "-", "/", "=", "?", "^", `", "{", "|", "}", "~" aussi bien dans la partie locale que dans le domaine. |
134 | // Pour la partie locale, on réduit cet ensemble car il n'est pas utilisé. |
135 | // Pour le domaine, le système DNS limite à [a-z0-9.-], on y ajoute le "_" car il est parfois utilisé. |
136 | return preg_match("/^[a-z0-9_.'+-]+@[a-z0-9._-]+\.[a-z]{2,4}$/i", $email); |
137 | } |
138 | |
8b00e0e0 |
139 | function pl_url($path, $query = null, $fragment = null) |
140 | { |
141 | global $platal; |
142 | |
143 | $base = $platal->ns . $path . ($query ? '?'.$query : ''); |
144 | return $fragment ? $base.'#'.$fragment : $base; |
145 | } |
d90fe33c |
146 | |
d1ebc57a |
147 | function pl_self($n = null) { |
148 | global $platal; |
149 | return $platal->pl_self($n); |
150 | } |
151 | |
8b00e0e0 |
152 | function http_redirect($fullurl) |
d90fe33c |
153 | { |
154 | if (count($_SESSION)) { |
155 | session_write_close(); |
156 | } |
8b00e0e0 |
157 | header('Location: '.$fullurl); |
d90fe33c |
158 | exit; |
159 | } |
160 | |
8b00e0e0 |
161 | function pl_redirect($path, $query = null, $fragment = null) |
162 | { |
163 | global $globals; |
164 | http_redirect($globals->baseurl . '/' . pl_url($path, $query, $fragment)); |
165 | } |
0337d704 |
166 | |
493b6abe |
167 | function pl_entities($text, $mode = ENT_COMPAT) |
168 | { |
169 | return htmlentities($text, $mode, 'UTF-8'); |
170 | } |
171 | |
172 | function pl_entity_decode($text, $mode = ENT_COMPAT) |
173 | { |
174 | return html_entity_decode($text, $mode, 'UTF-8'); |
175 | } |
176 | |
a7de4ef7 |
177 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: |
0337d704 |
178 | ?> |