a130ac1596b1b9ae11db80f782791b623a9efbfa
[platal.git] / include / platal.inc.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2007 Polytechnique.org *
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
22 function microtime_float()
23 {
24 list($usec, $sec) = explode(' ', microtime());
25 return ((float)$usec + (float)$sec);
26 }
27 $TIME_BEGIN = microtime_float();
28
29 date_default_timezone_set('Europe/Paris');
30
31 define('AUTH_PUBLIC', 0);
32 define('AUTH_COOKIE', 1);
33 define('AUTH_MDP', 2);
34
35 define('PERMS_EXT', 'ext');
36 define('PERMS_USER', 'user');
37 define('PERMS_ADMIN', 'admin');
38
39 define('SKINNED', 0);
40 define('SIMPLE', 1);
41 define('NO_SKIN', 2);
42
43 define('NO_AUTH', 0);
44 define('DO_AUTH', 1);
45
46 function __autoload($cls)
47 {
48 @include dirname(dirname(__FILE__)).'/classes/'.strtolower($cls).'.php';
49 }
50 __autoload('Env');
51
52 function pl_error_handler($errno, $errstr, $errfile, $errline)
53 {
54 if (!error_reporting())
55 return;
56
57 $errortype = array (
58 E_ERROR => "Error",
59 E_WARNING => "Warning",
60 E_PARSE => "Parsing Error",
61 E_NOTICE => "Notice",
62 E_CORE_ERROR => "Core Error",
63 E_CORE_WARNING => "Core Warning",
64 E_COMPILE_ERROR => "Compile Error",
65 E_COMPILE_WARNING => "Compile Warning",
66 E_USER_ERROR => "User Error",
67 E_USER_WARNING => "User Warning",
68 E_USER_NOTICE => "User Notice",
69 E_STRICT => "Runtime Notice"
70 );
71
72 global $globals;
73 if (isset($globals) && !$globals->debug) {
74 if (strpos($errortype[$errno], 'Notice') !== false) {
75 return;
76 }
77 }
78
79 $errstr = htmlentities($errstr);
80 $GLOBALS['pl_errors'][] =
81 "<div class='phperror'>".
82 "<strong>{$errortype[$errno]}</strong> <em>$errstr</em><br />".
83 "<tt>$errfile : $errline</tt>".
84 "</div>";
85 }
86
87 function pl_dump_env()
88 {
89 echo "<div class='phperror'><pre>";
90 echo "\nSESSION: "; var_export($_SESSION);
91 echo "\nPOST: "; var_export($_POST);
92 echo "\nGET: "; var_export($_GET);
93 echo "\nCOOKIE: "; var_export($_COOKIE);
94 echo "</pre></div>";
95 }
96
97 function pl_print_errors()
98 {
99 print join("\n", $GLOBALS['pl_errors']);
100 }
101
102 set_error_handler('pl_error_handler', E_ALL | E_STRICT);
103 register_shutdown_function('pl_print_errors');
104 // register_shutdown_function('pl_dump_env');
105
106 function pl_url($path, $query = null, $fragment = null)
107 {
108 global $platal;
109
110 $base = $platal->ns . $path . ($query ? '?'.$query : '');
111 return $fragment ? $base.'#'.$fragment : $base;
112 }
113
114 function pl_self($n = null) {
115 global $platal;
116 return $platal->pl_self($n);
117 }
118
119 function http_redirect($fullurl)
120 {
121 if (count($_SESSION)) {
122 session_write_close();
123 }
124 header('Location: '.$fullurl);
125 exit;
126 }
127
128 function pl_redirect($path, $query = null, $fragment = null)
129 {
130 global $globals;
131 http_redirect($globals->baseurl . '/' . pl_url($path, $query, $fragment));
132 }
133
134 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
135 ?>