"Error",
E_WARNING => "Warning",
E_PARSE => "Parsing Error",
E_NOTICE => "Notice",
E_CORE_ERROR => "Core Error",
E_CORE_WARNING => "Core Warning",
E_COMPILE_ERROR => "Compile Error",
E_COMPILE_WARNING => "Compile Warning",
E_USER_ERROR => "User Error",
E_USER_WARNING => "User Warning",
E_USER_NOTICE => "User Notice",
E_STRICT => "Runtime Notice"
);
global $globals;
if (!$globals->debug) {
if (strpos($errortype[$errno], 'Notice') !== false) {
return;
}
}
$errstr = htmlentities($errstr);
$GLOBALS['pl_errors'][] =
"
".
"{$errortype[$errno]} $errstr
".
"$errfile : $errline".
"
";
}
function pl_dump_env()
{
echo "";
echo "\nSESSION: "; var_export($_SESSION);
echo "\nPOST: "; var_export($_POST);
echo "\nGET: "; var_export($_GET);
echo "\nCOOKIE: "; var_export($_COOKIE);
echo "
";
}
function pl_print_errors()
{
print join("\n", $GLOBALS['pl_errors']);
}
set_error_handler('pl_error_handler', E_ALL | E_STRICT);
register_shutdown_function('pl_print_errors');
// register_shutdown_function('pl_dump_env');
function pl_url($path, $query = null, $fragment = null)
{
global $platal;
$base = $platal->ns . $path . ($query ? '?'.$query : '');
return $fragment ? $base.'#'.$fragment : $base;
}
function pl_self($n = null) {
global $platal;
return $platal->pl_self($n);
}
function http_redirect($fullurl)
{
if (count($_SESSION)) {
session_write_close();
}
header('Location: '.$fullurl);
exit;
}
function pl_redirect($path, $query = null, $fragment = null)
{
global $globals;
http_redirect($globals->baseurl . '/' . pl_url($path, $query, $fragment));
}
// vim:set et sw=4 sts=4 sws=4 foldmethod=marker:
?>