function print_header_redirect($p_url, $p_die = true, $p_sanitize = false)
{
$t_use_iis = config_get('use_iis');
if (ON == config_get('stop_on_errors') && error_handled()) {
return false;
}
# validate the url as part of this site before continuing
$t_url = $p_sanitize ? string_sanitize_url($p_url) : $p_url;
# don't send more headers if they have already been sent (guideweb)
if (!headers_sent()) {
header('Content-Type: text/html; charset=' . lang_get('charset'));
if (ON == $t_use_iis) {
header("Refresh: 0;url={$t_url}");
} else {
header("Location: {$t_url}");
}
} else {
trigger_error(ERROR_PAGE_REDIRECTION, ERROR);
return false;
}
if ($p_die) {
die;
# additional output can cause problems so let's just stop output here
}
return true;
}
function print_header_redirect($p_url, $p_die = true, $p_sanitize = false, $p_absolute = false)
{
if (ON == config_get_global('stop_on_errors') && error_handled()) {
return false;
}
# validate the url as part of this site before continuing
if ($p_absolute) {
if ($p_sanitize) {
$t_url = string_sanitize_url($p_url);
} else {
$t_url = $p_url;
}
} else {
if ($p_sanitize) {
$t_url = string_sanitize_url($p_url, true);
} else {
$t_url = config_get('path') . $p_url;
}
}
$t_url = string_prepare_header($t_url);
# don't send more headers if they have already been sent (guideweb)
if (!headers_sent()) {
header('Content-Type: text/html; charset=utf-8');
header("Location: {$t_url}");
} else {
trigger_error(ERROR_PAGE_REDIRECTION, ERROR);
return false;
}
if ($p_die) {
die;
# additional output can cause problems so let's just stop output here
}
return true;
}
function html_meta_redirect($p_url, $p_time = null, $p_sanitize = false)
{
if (ON == config_get('stop_on_errors') && error_handled()) {
return false;
}
if (null === $p_time) {
$p_time = current_user_get_pref('redirect_delay');
}
if ($p_sanitize) {
$t_url = string_sanitize_url($p_url);
} else {
$t_url = $p_url;
}
echo "\t<meta http-equiv=\"Refresh\" content=\"{$p_time};URL={$t_url}\" />\n";
return true;
}
/**
* Default error handler
*
* This handler will not receive E_ERROR, E_PARSE, E_CORE_*, or E_COMPILE_*
* errors.
*
* E_USER_* are triggered by us and will contain an error constant in $p_error
* The others, being system errors, will come with a string in $p_error
*
* @access private
* @param integer $p_type Contains the level of the error raised, as an integer.
* @param string $p_error Contains the error message, as a string.
* @param string $p_file Contains the filename that the error was raised in, as a string.
* @param integer $p_line Contains the line number the error was raised at, as an integer.
* @param array $p_context To the active symbol table at the point the error occurred (optional).
* @return void
* @uses lang_api.php
* @uses config_api.php
* @uses compress_api.php
* @uses database_api.php (optional)
* @uses html_api.php (optional)
*/
function error_handler($p_type, $p_error, $p_file, $p_line, array $p_context)
{
global $g_error_parameters, $g_error_handled, $g_error_proceed_url;
global $g_error_send_page_header;
# check if errors were disabled with @ somewhere in this call chain
if (0 == error_reporting()) {
return;
}
$t_lang_pushed = false;
$t_db_connected = false;
if (function_exists('db_is_connected')) {
if (db_is_connected()) {
$t_db_connected = true;
}
}
$t_html_api = false;
if (function_exists('html_end')) {
$t_html_api = true;
}
# flush any language overrides to return to user's natural default
if ($t_db_connected) {
lang_push(lang_get_default());
$t_lang_pushed = true;
}
$t_method_array = config_get_global('display_errors');
if (isset($t_method_array[$p_type])) {
$t_method = $t_method_array[$p_type];
} else {
if (isset($t_method_array[E_ALL])) {
$t_method = $t_method_array[E_ALL];
} else {
$t_method = 'none';
}
}
# build an appropriate error string
$t_error_location = 'in \'' . $p_file . '\' line ' . $p_line;
$t_error_description = '\'' . $p_error . '\' ' . $t_error_location;
switch ($p_type) {
case E_WARNING:
$t_error_type = 'SYSTEM WARNING';
break;
case E_NOTICE:
$t_error_type = 'SYSTEM NOTICE';
break;
case E_STRICT:
$t_error_type = 'STRICT NOTICE';
break;
case E_RECOVERABLE_ERROR:
# This should generally be considered fatal (like E_ERROR)
$t_error_type = 'SYSTEM ERROR';
break;
case E_DEPRECATED:
$t_error_type = 'DEPRECATED';
break;
case E_USER_ERROR:
$t_error_type = 'APPLICATION ERROR #' . $p_error;
$t_error_description = error_string($p_error);
if ($t_method == DISPLAY_ERROR_INLINE) {
$t_error_description .= ' (' . $t_error_location . ")\n" . error_string(ERROR_DISPLAY_USER_ERROR_INLINE);
}
break;
case E_USER_WARNING:
$t_error_type = 'APPLICATION WARNING #' . $p_error;
$t_error_description = error_string($p_error) . ' (' . $t_error_location . ')';
break;
case E_USER_NOTICE:
# used for debugging
$t_error_type = 'DEBUG';
break;
case E_USER_DEPRECATED:
# Get the parent of the call that triggered the error to facilitate
# debugging with a more useful filename and line number
$t_stack = debug_backtrace();
$t_caller = $t_stack[2];
$t_error_type = 'WARNING';
$t_error_description = error_string($p_error) . ' (in ' . $t_caller['file'] . ' line ' . $t_caller['line'] . ')';
if ($t_method == DISPLAY_ERROR_INLINE && php_sapi_name() != 'cli') {
# Enqueue messages for later display with error_print_delayed()
global $g_errors_delayed;
$g_errors_delayed[] = $t_error_description;
$g_error_handled = true;
return;
}
break;
default:
# shouldn't happen, just display the error just in case
$t_error_type = 'UNHANDLED ERROR TYPE (' . '<a href="http://php.net/errorfunc.constants">' . $p_type . '</a>)';
$t_error_description = $p_error . ' (' . $t_error_location . ')';
}
$t_error_description = nl2br($t_error_description);
if (php_sapi_name() == 'cli') {
if (DISPLAY_ERROR_NONE != $t_method) {
echo $t_error_type . ': ' . $t_error_description . "\n";
if (ON == config_get_global('show_detailed_errors')) {
echo "\n";
debug_print_backtrace();
}
}
if (DISPLAY_ERROR_HALT == $t_method) {
exit(1);
}
} else {
switch ($t_method) {
case DISPLAY_ERROR_HALT:
# disable any further event callbacks
if (function_exists('event_clear_callbacks')) {
event_clear_callbacks();
}
$t_oblen = ob_get_length();
if ($t_oblen > 0) {
$t_old_contents = ob_get_contents();
if (!error_handled()) {
# Retrieve the previously output header
if (false !== preg_match_all('|^(.*)(</head>.*$)|is', $t_old_contents, $t_result) && isset($t_result[1]) && isset($t_result[1][0])) {
$t_old_headers = $t_result[1][0];
unset($t_old_contents);
}
}
}
# We need to ensure compression is off - otherwise the compression headers are output.
compress_disable();
# then clean the buffer, leaving output buffering on.
if ($t_oblen > 0) {
ob_clean();
}
# If HTML error output was disabled, set an error header and stop
if (defined('DISABLE_INLINE_ERROR_REPORTING')) {
# @TODO Have a mapping for mantis error codes to appropiate HTTP error codes
header(' ', true, 400);
exit(1);
}
# don't send the page header information if it has already been sent
if ($g_error_send_page_header) {
if ($t_html_api) {
html_page_top1();
if ($p_error != ERROR_DB_QUERY_FAILED && $t_db_connected == true) {
html_page_top2();
} else {
html_page_top2a();
}
} else {
echo '<html><head><title>', $t_error_type, '</title></head><body>';
}
} else {
# Output the previously sent headers, if defined
if (isset($t_old_headers)) {
echo $t_old_headers, "\n";
html_page_top2();
}
}
echo '<div id="error-msg">';
echo '<div class="error-type">' . $t_error_type . '</div>';
echo '<div class="error-description">', $t_error_description, '</div>';
echo '<div class="error-info">';
if (null === $g_error_proceed_url) {
echo lang_get('error_no_proceed');
} else {
echo '<a href="', $g_error_proceed_url, '">', lang_get('proceed'), '</a>';
}
echo '</div>';
if (ON == config_get_global('show_detailed_errors')) {
echo '<div class="error-details">';
error_print_details($p_file, $p_line, $p_context);
echo '</div>';
echo '<div class="error-trace">';
error_print_stack_trace();
echo '</div>';
}
echo '</div>';
if (isset($t_old_contents)) {
echo '<div class="warning">Previous non-fatal errors occurred. Page contents follow.</div>';
echo '<div id="old-contents">';
echo $t_old_contents;
echo '</div>';
}
if ($t_html_api) {
if ($p_error != ERROR_DB_QUERY_FAILED && $t_db_connected == true) {
html_page_bottom();
} else {
html_body_end();
html_end();
}
} else {
echo '</body></html>', "\n";
}
exit(1);
case DISPLAY_ERROR_INLINE:
if (!defined('DISABLE_INLINE_ERROR_REPORTING')) {
echo '<div class="error-inline">', $t_error_type, ': ', $t_error_description, '</div>';
}
$g_error_handled = true;
break;
default:
# do nothing - note we treat this as we've not handled an error, so any redirects go through.
}
}
if ($t_lang_pushed) {
lang_pop();
}
$g_error_parameters = array();
$g_error_proceed_url = null;
}
/**
* (6) Print an HTML meta tag to redirect to another page
* This function is optional and may be called by pages that need a redirect.
* $p_time is the number of seconds to wait before redirecting.
* If we have handled any errors on this page return false and don't redirect.
*
* @param string $p_url The page to redirect: has to be a relative path.
* @param integer $p_time Seconds to wait for before redirecting.
* @param boolean $p_sanitize Apply string_sanitize_url to passed URL.
* @return boolean
*/
function html_meta_redirect($p_url, $p_time = null, $p_sanitize = true)
{
if (ON == config_get_global('stop_on_errors') && error_handled()) {
return false;
}
if (null === $p_time) {
$p_time = current_user_get_pref('redirect_delay');
}
$t_url = config_get('path');
if ($p_sanitize) {
$t_url .= string_sanitize_url($p_url);
} else {
$t_url .= $p_url;
}
$t_url = htmlspecialchars($t_url);
echo "\t" . '<meta http-equiv="Refresh" content="' . $p_time . ';URL=' . $t_url . '" />' . "\n";
return true;
}
/**
* Default error handler
*
* This handler will not receive E_ERROR, E_PARSE, E_CORE_*, or E_COMPILE_*
* errors.
*
* E_USER_* are triggered by us and will contain an error constant in $p_error
* The others, being system errors, will come with a string in $p_error
*
* @access private
* @param int p_type contains the level of the error raised, as an integer.
* @param string p_error contains the error message, as a string.
* @param string p_file contains the filename that the error was raised in, as a string.
* @param int p_line contains the line number the error was raised at, as an integer.
* @param array p_context to the active symbol table at the point the error occurred (optional)
* @uses lang_api.php
* @uses config_api.php
* @uses compress_api.php
* @uses database_api.php (optional)
* @uses html_api.php (optional)
*/
function error_handler($p_type, $p_error, $p_file, $p_line, $p_context)
{
global $g_error_parameters, $g_error_handled, $g_error_proceed_url;
global $g_lang_overrides;
global $g_error_send_page_header;
# check if errors were disabled with @ somewhere in this call chain
if (0 == error_reporting()) {
return;
}
$t_lang_pushed = false;
$t_db_connected = false;
if (function_exists('db_is_connected')) {
if (db_is_connected()) {
$t_db_connected = true;
}
}
$t_html_api = false;
if (function_exists('html_end')) {
$t_html_api = true;
}
# flush any language overrides to return to user's natural default
if ($t_db_connected) {
lang_push(lang_get_default());
$t_lang_pushed = true;
}
$t_short_file = basename($p_file);
$t_method_array = config_get_global('display_errors');
if (isset($t_method_array[$p_type])) {
$t_method = $t_method_array[$p_type];
} else {
if (isset($t_method_array[E_ALL])) {
$t_method = $t_method_array[E_ALL];
} else {
$t_method = 'none';
}
}
# build an appropriate error string
switch ($p_type) {
case E_WARNING:
$t_error_type = 'SYSTEM WARNING';
$t_error_description = "'{$p_error}' in '{$p_file}' line {$p_line}";
break;
case E_NOTICE:
$t_error_type = 'SYSTEM NOTICE';
$t_error_description = "'{$p_error}' in '{$p_file}' line {$p_line}";
break;
case E_USER_ERROR:
$t_error_type = "APPLICATION ERROR #{$p_error}";
$t_error_description = error_string($p_error);
break;
case E_USER_WARNING:
$t_error_type = "APPLICATION WARNING #{$p_error}";
$t_error_description = error_string($p_error);
break;
case E_USER_NOTICE:
# used for debugging
$t_error_type = 'DEBUG';
$t_error_description = $p_error;
break;
default:
# shouldn't happen, just display the error just in case
$t_error_type = '';
$t_error_description = $p_error;
}
$t_error_description = nl2br($t_error_description);
switch ($t_method) {
case 'halt':
# disable any further event callbacks
if (function_exists('event_clear_callbacks')) {
event_clear_callbacks();
}
$t_oblen = ob_get_length();
if (error_handled() && $t_oblen > 0) {
$t_old_contents = ob_get_contents();
}
# We need to ensure compression is off - otherwise the compression headers are output.
compress_disable();
# then clean the buffer, leaving output buffering on.
if ($t_oblen > 0) {
ob_clean();
}
# don't send the page header information if it has already been sent
if ($g_error_send_page_header) {
if ($t_html_api) {
html_page_top1();
if ($p_error != ERROR_DB_QUERY_FAILED && $t_db_connected == true) {
html_page_top2();
} else {
html_page_top2a();
}
} else {
echo '<html><head><title>', $t_error_type, '</title></head><body>';
}
}
echo '<br /><div align="center"><table class="width50" cellspacing="1">';
echo '<tr><td class="form-title">', $t_error_type, '</td></tr>';
echo '<tr><td><p class="center" style="color:red">', $t_error_description, '</p></td></tr>';
echo '<tr><td><p class="center">';
if (null === $g_error_proceed_url) {
echo lang_get('error_no_proceed');
} else {
echo '<a href="', $g_error_proceed_url, '">', lang_get('proceed'), '</a>';
}
echo '</p></td></tr>';
if (ON == config_get_global('show_detailed_errors')) {
echo '<tr><td>';
error_print_details($p_file, $p_line, $p_context);
echo '</td></tr>';
echo '<tr><td>';
error_print_stack_trace();
echo '</td></tr>';
}
echo '</table></div>';
if (isset($t_old_contents)) {
echo '<p>Previous non-fatal errors occurred. Page contents follow.</p>';
echo '<div style="border: solid 1px black;padding: 4px">';
echo $t_old_contents;
echo '</div>';
}
if ($t_html_api) {
if ($p_error != ERROR_DB_QUERY_FAILED && $t_db_connected == true) {
html_page_bottom();
} else {
html_body_end();
html_end();
}
} else {
echo '</body></html>', "\n";
}
exit;
case 'inline':
echo '<p style="color:red">', $t_error_type, ': ', $t_error_description, '</p>';
$g_error_handled = true;
break;
default:
# do nothing - note we treat this as we've not handled an error, so any redirects go through.
}
if ($t_lang_pushed) {
lang_pop();
}
$g_error_parameters = array();
$g_error_proceed_url = null;
}
/**
* Default error handler
*
* This handler will not receive E_ERROR, E_PARSE, E_CORE_*, or E_COMPILE_*
* errors.
*
* E_USER_* are triggered by us and will contain an error constant in $p_error
* The others, being system errors, will come with a string in $p_error
*
* @access private
* @param int p_type contains the level of the error raised, as an integer.
* @param string p_error contains the error message, as a string.
* @param string p_file contains the filename that the error was raised in, as a string.
* @param int p_line contains the line number the error was raised at, as an integer.
* @param array p_context to the active symbol table at the point the error occurred (optional)
* @uses lang_api.php
* @uses config_api.php
* @uses compress_api.php
* @uses database_api.php (optional)
* @uses html_api.php (optional)
*/
function error_handler($p_type, $p_error, $p_file, $p_line, $p_context)
{
global $g_error_parameters, $g_error_handled, $g_error_proceed_url;
global $g_lang_overrides;
global $g_error_send_page_header;
# check if errors were disabled with @ somewhere in this call chain
if (0 == error_reporting()) {
return;
}
$t_lang_pushed = false;
$t_db_connected = false;
if (function_exists('db_is_connected')) {
if (db_is_connected()) {
$t_db_connected = true;
}
}
$t_html_api = false;
if (function_exists('html_end')) {
$t_html_api = true;
}
# flush any language overrides to return to user's natural default
if ($t_db_connected) {
lang_push(lang_get_default());
$t_lang_pushed = true;
}
$t_short_file = basename($p_file);
$t_method_array = config_get_global('display_errors');
if (isset($t_method_array[$p_type])) {
$t_method = $t_method_array[$p_type];
} else {
if (isset($t_method_array[E_ALL])) {
$t_method = $t_method_array[E_ALL];
} else {
$t_method = 'none';
}
}
# build an appropriate error string
switch ($p_type) {
case E_WARNING:
$t_error_type = 'SYSTEM WARNING';
$t_error_description = "'{$p_error}' in '{$p_file}' line {$p_line}";
break;
case E_NOTICE:
$t_error_type = 'SYSTEM NOTICE';
$t_error_description = "'{$p_error}' in '{$p_file}' line {$p_line}";
break;
case E_USER_ERROR:
$t_error_type = "APPLICATION ERROR #{$p_error}";
$t_error_description = error_string($p_error);
if ($t_method == DISPLAY_ERROR_INLINE) {
$t_error_description .= "\n" . error_string(ERROR_DISPLAY_USER_ERROR_INLINE);
}
break;
case E_USER_WARNING:
$t_error_type = "APPLICATION WARNING #{$p_error}";
$t_error_description = error_string($p_error);
break;
case E_USER_NOTICE:
# used for debugging
$t_error_type = 'DEBUG';
$t_error_description = $p_error;
break;
default:
# shouldn't happen, just display the error just in case
$t_error_type = '';
$t_error_description = $p_error;
}
$t_error_description = nl2br($t_error_description);
switch ($t_method) {
case DISPLAY_ERROR_HALT:
# disable any further event callbacks
if (function_exists('event_clear_callbacks')) {
event_clear_callbacks();
}
$t_oblen = ob_get_length();
if ($t_oblen > 0) {
$t_old_contents = ob_get_contents();
if (!error_handled()) {
# Retrieve the previously output header
if (false !== preg_match_all('|^(.*)(</head>.*$)|is', $t_old_contents, $result)) {
$t_old_headers = $result[1][0];
unset($t_old_contents);
}
}
}
# We need to ensure compression is off - otherwise the compression headers are output.
compress_disable();
# then clean the buffer, leaving output buffering on.
if ($t_oblen > 0) {
ob_clean();
}
# don't send the page header information if it has already been sent
if ($g_error_send_page_header) {
if ($t_html_api) {
html_page_top1();
if ($p_error != ERROR_DB_QUERY_FAILED && $t_db_connected == true) {
html_page_top2();
} else {
html_page_top2a();
}
} else {
echo '<html><head><title>', $t_error_type, '</title></head><body>';
}
} else {
# Output the previously sent headers, if defined
if (isset($t_old_headers)) {
echo $t_old_headers, "\n";
html_page_top2();
}
}
echo '<div id="error-msg">';
echo '<div class="error-type">' . $t_error_type . '</div>';
echo '<div class="error-description">', $t_error_description, '</div>';
echo '<div class="error-info">';
if (null === $g_error_proceed_url) {
echo lang_get('error_no_proceed');
} else {
echo '<a href="', $g_error_proceed_url, '">', lang_get('proceed'), '</a>';
}
echo '</div>';
if (ON == config_get_global('show_detailed_errors')) {
echo '<div class="error-details">';
error_print_details($p_file, $p_line, $p_context);
echo '</div>';
echo '<div class="error-trace">';
error_print_stack_trace();
echo '</div>';
}
echo '</div>';
if (isset($t_old_contents)) {
echo '<div class="warning">Previous non-fatal errors occurred. Page contents follow.</div>';
echo '<div id="old-contents">';
echo $t_old_contents;
echo '</div>';
}
if ($t_html_api) {
if ($p_error != ERROR_DB_QUERY_FAILED && $t_db_connected == true) {
html_page_bottom();
} else {
html_body_end();
html_end();
}
} else {
echo '</body></html>', "\n";
}
exit;
case DISPLAY_ERROR_INLINE:
echo '<div class="error-inline">', $t_error_type, ': ', $t_error_description, '</div>';
$g_error_handled = true;
break;
default:
# do nothing - note we treat this as we've not handled an error, so any redirects go through.
}
if ($t_lang_pushed) {
lang_pop();
}
$g_error_parameters = array();
$g_error_proceed_url = null;
}