[0004212] Work Order Entry: fixed error when voided WO refence is reused.
[fa-stable.git] / includes / errors.inc
index 8972a9eb4b2fbe0de4fe348528acfd8153ffb2b8..53587df6ed081b1489e162d77898d474e48f3ed6 100644 (file)
 $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>';
+               if (isset($tr['file']) && isset($tr['line']))
+                       $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(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 .= ')</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;
+    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 <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.
@@ -79,19 +148,42 @@ function error_box() {
     global $before_box;
     
     echo "<div id='msgbox'>";
-    $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 "</div>";
 }
+/*
+       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 = "<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) 
        {
@@ -99,24 +191,29 @@ function display_db_error($msg, $sql_statement=null, $exit=true)
                $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;
@@ -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 "<br><br>";
-                       exit;
+                       end_page(); exit;
                }
        }
-       return $db_error;               
+       return $db_error;
 }
 
-?>
\ No newline at end of file