$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 .= '<table border=0>';
+ $trace = debug_backtrace();
+
+ foreach($trace as $trn => $tr) {
+ if ($trn <= $skip) continue;
+ if ($html) $str .= '<tr><td>';
+ $str .= $tr['file'].':'.$tr['line'].': ';
+ if ($html) $str .= '</td><td>';
+ if (isset($tr['type'])) {
+ if($tr['type'] == '::') {
+ $str .= $tr['class'].'::';
+ } else if($tr['type'] == '->') {
+ $str .= '('.$tr['class'].' Object)'.'->';
+ }
+ }
+ $str .= $tr['function'].'(';
+
+ if(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 .= ')</td>';
+ }
+
+ if ($html) $str .= '</tr></table>';
+ return $str;
+}
//-----------------------------------------------------------------------------
// Error handler - collects all php/user messages for
// display in message box.
function error_handler($errno, $errstr, $file, $line) {
- global $messages, $go_debug;
+ 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);
- else // log all not displayed messages
- error_log(user_company() . ':' . $_SESSION["wa_current_user"]->loginname.':'
- . basename($file) .":$line: $errstr");
+ if ($errno & error_reporting()) {
+ // 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;
}
//------------------------------------------------------------------------------
// Formats system messages before insert them into message <div>
// 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 .= "<tr><td " . ($center?"align='center' ":"").
- " width='100%' bgcolor='{$c['bg']}'><font color='{$c['txt']}'>"
- .$str."</font></td></tr>";
- }
- $str = "<center><table border='1' cellpadding='3' cellspacing='0' style='border-collapse: collapse' bordercolor='{$c['bd']}' width='98%'>"
- . $content . "</table></center><br>\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 .= '<br>'.$msg[4];
+ $content .= ($cnt ? '<hr>' : '').$str;
+ }
+ $class = $msg_class[$type];
+ $content = "<div class='$class'>$content</div>";
+ } elseif ($path_to_root=='.')
+ return '';
+ return $content;
}
//-----------------------------------------------------------------------------
// Error box <div> element.
global $before_box;
echo "<div id='msgbox'>";
+
+ // 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
-// Necessary restart instead of get_contents/clean calls due to a bug in php 4.3.2
- register_shutdown_function('end_flush');
ob_start('output_html');
echo "</div>";
}
/*
Helper to avoid sparse log notices.
*/
-function end_flush () {
- if (ob_get_level()) ob_end_flush();
+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 = "<span class='errortext'><b>" . _("DATABASE ERROR :") . "</b> $msg</span><br>";
+ if($warning)
+ $str = "<b>" . _("Debug mode database warning:") . "</b><br>";
+ else
+ $str = "<b>" . _("DATABASE ERROR :") . "</b> $msg<br>";
if ($db_error != 0)
{
$str .= "error message : " . db_error_msg($db) . "<br>";
}
- if ($debug == 1)
+ if ($SysPrefs->debug == 1)
{
- $str .= "sql that failed was : " . $sql_statement . "<br>";
+ $cur_prefix = $db_connections[$_SESSION["wa_current_user"]->cur_con]['tbpref'];
+
+ $str .= "sql that failed was : ".str_replace(TB_PREF, $cur_prefix, $sql_statement)."<br>";
}
$str .= "<br><br>";
-
- 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;
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 "<br><br>";
- exit;
+ end_page(); exit;
}
}
- return $db_error;
+ return $db_error;
}
-?>
\ No newline at end of file