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") { |
e654517d |
48 | if (substr($cls, -1, 3) == 'req') { |
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 | { |
59 | if (!error_reporting()) |
60 | return; |
61 | |
62 | $errortype = array ( |
63 | E_ERROR => "Error", |
64 | E_WARNING => "Warning", |
65 | E_PARSE => "Parsing Error", |
66 | E_NOTICE => "Notice", |
67 | E_CORE_ERROR => "Core Error", |
68 | E_CORE_WARNING => "Core Warning", |
69 | E_COMPILE_ERROR => "Compile Error", |
70 | E_COMPILE_WARNING => "Compile Warning", |
71 | E_USER_ERROR => "User Error", |
72 | E_USER_WARNING => "User Warning", |
73 | E_USER_NOTICE => "User Notice", |
74 | E_STRICT => "Runtime Notice" |
75 | ); |
76 | |
28023828 |
77 | global $globals; |
a7de4ef7 |
78 | if (isset($globals) && !$globals->debug) { |
28023828 |
79 | if (strpos($errortype[$errno], 'Notice') !== false) { |
80 | return; |
81 | } |
82 | } |
83 | |
493b6abe |
84 | $errstr = utf8_encode(htmlentities($errstr)); |
6995a9b9 |
85 | $GLOBALS['pl_errors'][] = |
86 | "<div class='phperror'>". |
87 | "<strong>{$errortype[$errno]}</strong> <em>$errstr</em><br />". |
88 | "<tt>$errfile : $errline</tt>". |
89 | "</div>"; |
90 | } |
91 | |
0f384dd3 |
92 | function pl_clear_errors() |
93 | { |
94 | unset($GLOBALS['pl_errors']); |
95 | } |
96 | |
aa5f19ae |
97 | function pl_dump_env() |
98 | { |
99 | echo "<div class='phperror'><pre>"; |
100 | echo "\nSESSION: "; var_export($_SESSION); |
101 | echo "\nPOST: "; var_export($_POST); |
102 | echo "\nGET: "; var_export($_GET); |
6fb4b6fe |
103 | echo "\nCOOKIE: "; var_export($_COOKIE); |
aa5f19ae |
104 | echo "</pre></div>"; |
105 | } |
106 | |
6995a9b9 |
107 | function pl_print_errors() |
108 | { |
109 | print join("\n", $GLOBALS['pl_errors']); |
110 | } |
111 | |
112 | set_error_handler('pl_error_handler', E_ALL | E_STRICT); |
113 | register_shutdown_function('pl_print_errors'); |
6fb4b6fe |
114 | // register_shutdown_function('pl_dump_env'); |
0337d704 |
115 | |
92432704 |
116 | /** Check if the string is utf8 |
117 | */ |
118 | function is_utf8($s) |
119 | { |
120 | return @iconv('utf-8', 'utf-8', $s) == $s; |
121 | } |
122 | |
76a8d80b |
123 | /** 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 "\'" |
124 | * @param $email l'adresse email a verifier |
125 | * @return BOOL */ |
126 | function isvalid_email($email) |
127 | { |
128 | // la rfc2822 authorise les caractères "a-z", "0-9", "!", "#", "$", "%", "&", "'", "*", "+", "-", "/", "=", "?", "^", `", "{", "|", "}", "~" aussi bien dans la partie locale que dans le domaine. |
129 | // Pour la partie locale, on réduit cet ensemble car il n'est pas utilisé. |
130 | // Pour le domaine, le système DNS limite à [a-z0-9.-], on y ajoute le "_" car il est parfois utilisé. |
131 | return preg_match("/^[a-z0-9_.'+-]+@[a-z0-9._-]+\.[a-z]{2,4}$/i", $email); |
132 | } |
133 | |
8b00e0e0 |
134 | function pl_url($path, $query = null, $fragment = null) |
135 | { |
136 | global $platal; |
137 | |
138 | $base = $platal->ns . $path . ($query ? '?'.$query : ''); |
139 | return $fragment ? $base.'#'.$fragment : $base; |
140 | } |
d90fe33c |
141 | |
d1ebc57a |
142 | function pl_self($n = null) { |
143 | global $platal; |
144 | return $platal->pl_self($n); |
145 | } |
146 | |
8b00e0e0 |
147 | function http_redirect($fullurl) |
d90fe33c |
148 | { |
149 | if (count($_SESSION)) { |
150 | session_write_close(); |
151 | } |
8b00e0e0 |
152 | header('Location: '.$fullurl); |
d90fe33c |
153 | exit; |
154 | } |
155 | |
8b00e0e0 |
156 | function pl_redirect($path, $query = null, $fragment = null) |
157 | { |
158 | global $globals; |
159 | http_redirect($globals->baseurl . '/' . pl_url($path, $query, $fragment)); |
160 | } |
0337d704 |
161 | |
493b6abe |
162 | function pl_entities($text, $mode = ENT_COMPAT) |
163 | { |
164 | return htmlentities($text, $mode, 'UTF-8'); |
165 | } |
166 | |
167 | function pl_entity_decode($text, $mode = ENT_COMPAT) |
168 | { |
169 | return html_entity_decode($text, $mode, 'UTF-8'); |
170 | } |
171 | |
a7de4ef7 |
172 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: |
0337d704 |
173 | ?> |