X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=includes%2Ferrors.inc;h=53587df6ed081b1489e162d77898d474e48f3ed6;hb=da7df35c61205d0b1af47d286be591b8a3194b0c;hp=8972a9eb4b2fbe0de4fe348528acfd8153ffb2b8;hpb=a5242af68e65661edb7175412444dce536a7f311;p=fa-stable.git diff --git a/includes/errors.inc b/includes/errors.inc index 8972a9eb..53587df6 100644 --- a/includes/errors.inc +++ b/includes/errors.inc @@ -12,65 +12,134 @@ $messages = array(); // container for system messages $before_box = ''; // temporary container for output html data before error box -$msg_colors = array( - E_USER_ERROR => array('bg'=>'#ffcccc', 'txt'=>'#dd2200', 'bd'=>'#cc3300'), - E_USER_WARNING => array('bg'=>'#ffff00', 'txt'=>'#ff5500', 'bd'=>'#ff9900'), - E_USER_NOTICE => array('bg'=>'#ccffcc', 'txt'=>'#007700', 'bd'=>'#33cc00')); +function get_backtrace($html = false, $skip=0) +{ + $str = ''; + if ($html) $str .= ''; + $trace = debug_backtrace(); + + foreach($trace as $trn => $tr) { + if ($trn <= $skip) continue; + if ($html) $str .= ''; + } + + if ($html) $str .= '
'; + if (isset($tr['file']) && isset($tr['line'])) + $str .= $tr['file'].':'.$tr['line'].': '; + if ($html) $str .= ''; + if (isset($tr['type'])) { + if($tr['type'] == '::') { + $str .= $tr['class'].'::'; + } else if($tr['type'] == '->') { + $str .= '('.$tr['class'].' Object)'.'->'; + } + } + $str .= $tr['function'].'('; + + if(isset($tr['args']) && is_array($tr['args'])) { + $args = array(); + foreach($tr['args'] as $n=>$a) { + if (is_object($tr['args'][$n])) + $args[$n] = "(".get_class($tr['args'][$n])." Object)"; + elseif (is_array($tr['args'][$n])) + $args[$n] = "(Array[".count($tr['args'][$n])."])"; + else + $args[$n] = "'".$tr['args'][$n]."'"; + } + $str .= implode(',',$args); + } + $str .= ')
'; + return $str; +} //----------------------------------------------------------------------------- // Error handler - collects all php/user messages for // display in message box. function error_handler($errno, $errstr, $file, $line) { - global $messages; + global $messages, $SysPrefs; + + // skip well known warnings we don't care about. + // Please use restrainedly to not risk loss of important messages + $excluded_warnings = array( + 'html_entity_decode', // nevermind encodings, special chars are processed anyway + 'should be compatible with that', // ignore cpdf/frontreport wrapper warnings + 'mysql extension is deprecated' // ignore strict warning in 5.4 + ); + foreach($excluded_warnings as $ref) { + if (strpos($errstr, $ref) !== false) { + return true; + } + } + + $bt = isset($SysPrefs) && $SysPrefs->go_debug>1 ? get_backtrace(true, 1) : array(); // error_reporting==0 when messages are set off with @ if ($errno & error_reporting()) { - $messages[] = array($errno, $errstr, $file, $line); + // suppress duplicated errors + if (!in_array(array($errno, $errstr, $file, $line, @$bt), $messages)) + $messages[] = array($errno, $errstr, $file, $line, @$bt); } + else if ($errno&~E_NOTICE && $errstr != '') { // log all not displayed messages + $user = @$_SESSION["wa_current_user"]->loginname; + $context = isset($SysPrefs) && !$SysPrefs->db_ok ? '[before upgrade]' : ''; + error_log(user_company() . ":$user:". basename($file) .":$line:$context $errstr"); + } + return true; } + +function exception_handler($exception) +{ + error_handler(E_ERROR, sprintf(_("Unhandled exception [%s]: %s."), $exception->getCode(), $exception->getMessage()), + $exception->getFile(), $exception->getLine()); + end_page(); +} //------------------------------------------------------------------------------ // Formats system messages before insert them into message
// FIX center is unused now -function fmt_errors($center=true) { - global $messages, $msg_colors; - - $type = E_USER_NOTICE; - - if (count($messages)) { - $content = ''; - foreach($messages as $msg) { - if ($msg[0]>$type) continue; - - if ($msg[0]<$type) { - if ($msg[0] == E_USER_WARNING) { - $type = E_USER_WARNING; // user warnings - $content = ''; // clean notices when we have errors - } else { - $type = E_USER_ERROR; // php or user errors - if($type == E_USER_WARNING) - $content = ''; // clean other messages +function fmt_errors($center=false) { + global $messages, $path_to_root, $SysPrefs; + + $msg_class = array( + E_USER_ERROR => 'err_msg', + E_USER_WARNING =>'warn_msg', + E_USER_NOTICE => 'note_msg'); + + $type = E_USER_NOTICE; + $content = ''; + + if (count($messages)) { + foreach($messages as $cnt=>$msg) { + if ($SysPrefs->go_debug && $msg[0]>E_USER_NOTICE) + $msg[0] = E_ERROR; + + if ($msg[0]>$type) continue; + + if ($msg[0]<$type) { + if ($msg[0] == E_USER_WARNING) { + $type = E_USER_WARNING; // user warnings + $content = ''; // clean notices when we have errors + } else { + $type = E_USER_ERROR; // php or user errors + if($type == E_USER_WARNING) + $content = ''; // clean other messages + } } - } - $str = $msg[1]; - $c = $msg_colors[$type]; - if ($msg[0] < E_USER_ERROR && $msg[2] != null) - $str .= ' '._('in file').': '.$msg[2].' '._('at line ').$msg[3]; - - $content .= "" - .$str.""; - } - $str = "
" - . $content . "

\n"; - - } - else - $str = ''; - - return $str; + $str = $msg[1]; + if (!in_array($msg[0], array(E_USER_NOTICE, E_USER_ERROR, E_USER_WARNING)) && $msg[2] != null) + $str .= ' '._('in file').': '.$msg[2].' '._('at line ').$msg[3]; + + if ($SysPrefs->go_debug>1 && $type!=E_USER_NOTICE && $type!=E_USER_WARNING) + $str .= '
'.$msg[4]; + $content .= ($cnt ? '
' : '').$str; + } + $class = $msg_class[$type]; + $content = "
$content
"; + } elseif ($path_to_root=='.') + return ''; + return $content; } //----------------------------------------------------------------------------- // Error box
element. @@ -79,19 +148,42 @@ function error_box() { global $before_box; echo "
"; - $before_box = ob_get_clean(); // save html content before error box -// Necessary restart instead of get_contents/clean calls due to a bug in php 4.3.2 - register_shutdown_function('ob_end_flush'); + + // Necessary restart instead of get_contents/clean calls due to a bug in php 4.3.2 + $before_box = ob_get_clean(); // save html content before error box ob_start('output_html'); echo "
"; } +/* + Helper to avoid sparse log notices. +*/ +function end_flush() { + global $Ajax; + + if (isset($Ajax)) + $Ajax->run(); + + // on some (but not all) php versions zlib extension adds 1 additional level of buffering, + // so flush the last buffer outside the loop to be on safe side + while(ob_get_level() > 1) + ob_end_flush(); + @ob_end_flush(); + + // if any transaction was aborted unexpectedly rollback changes + cancel_transaction(); +} function display_db_error($msg, $sql_statement=null, $exit=true) { - global $db, $debug; + global $db, $SysPrefs, $db_connections; + + $warning = $msg==null; $db_error = db_error_no(); - $str = "" . _("DATABASE ERROR :") . " $msg
"; + if($warning) + $str = "" . _("Debug mode database warning:") . "
"; + else + $str = "" . _("DATABASE ERROR :") . " $msg
"; if ($db_error != 0) { @@ -99,24 +191,29 @@ function display_db_error($msg, $sql_statement=null, $exit=true) $str .= "error message : " . db_error_msg($db) . "
"; } - if ($debug == 1) + if ($SysPrefs->debug == 1) { - $str .= "sql that failed was : " . $sql_statement . "
"; + $cur_prefix = $db_connections[$_SESSION["wa_current_user"]->cur_con]['tbpref']; + + $str .= "sql that failed was : ".str_replace(TB_PREF, $cur_prefix, $sql_statement)."
"; } $str .= "

"; - - trigger_error($str, E_USER_ERROR); - + if (!$SysPrefs->go_debug) + error_log($str); + else { + if($msg) + trigger_error($str, E_USER_ERROR); + else // $msg can be null here only in debug mode, otherwise the error is ignored + trigger_error($str, E_USER_WARNING); + } if ($exit) exit; } function frindly_db_error($db_error) { - global $db_duplicate_error_code; - - if ($db_error == $db_duplicate_error_code) + if ($db_error == DB_DUPLICATE_ERROR) { display_error(_("The entered information is a duplicate. Please go back and enter different values.")); return true; @@ -127,27 +224,26 @@ function frindly_db_error($db_error) function check_db_error($msg, $sql_statement, $exit_if_error=true, $rollback_if_error=true) { - global $db; + global $db, $SysPrefs; $db_error = db_error_no(); if ($db_error != 0) { - if (!frindly_db_error($db_error)) + if ($SysPrefs->go_debug || !frindly_db_error($db_error)) { display_db_error($msg, $sql_statement, false); + } if ($rollback_if_error) { - $rollback_result = db_query("rollback","could not rollback"); + $rollback_result = db_query("rollback"); } if ($exit_if_error) { - echo "

"; - exit; + end_page(); exit; } } - return $db_error; + return $db_error; } -?> \ No newline at end of file