. ** ** debug.class - Debug Functionality for ITools */ /** * Debug functions */ class it_debug { var $level; /** * Constructor * @param $level Debug level. All debug() calls with a level <= $level are shown. */ function it_debug($level=0) { $this->level = isset($GLOBALS['debug_level']) ? $GLOBALS['debug_level'] : $level; } /** * Output a message if the global debug level is higher or the same as $level * @param $text Message to display * @param $level Debug level */ function debug($text, $level = 0) { if ($this->level >= $level) { echo (isset($_SERVER['REMOTE_ADDR']) ? nl2br("$level $text\n") : "$level $text")."\n"; flush(); } } /** * Get source line of grandparent calling this function * @param $stacksoffs go up an extra $stacksoffs levels */ function srcline($stackoffs = 0) { $stack = debug_backtrace(); $line = $stack[1 + $stackoffs]['line']; $file = $stack[1 + $stackoffs]['file']; if (!isset($GLOBALS['it_debug::dump source'][$file])) $GLOBALS['it_debug::dump source'][$file] = file($file); return $GLOBALS['it_debug::dump source'][$file][$line-1]; } /** * Backend for functions D(), ED() and EDX() in functions.php * @param Origargs Array containing original arguments do ED() etc * @return String representation of dump */ function dump($args) { if (ereg('(csv|txt|gif|jpg)', $_SERVER['PHP_SELF']) || !$_SERVER['HTTP_USER_AGENT']) $plain = 1; else if ($_SERVER['REMOTE_ADDR']) { $blue = ""; $noblue = ""; } else if (getenv('USER') != 'cschneid') # ;) { $blue = "\033[34m"; $noblue = "\033[m"; $red = "\033[31m"; $nored = "\033[m"; } $src = it_debug::srcline(1); list($function, $paramlist) = it::match('\b(D|ED|EDC|EDX)\s*\((.*)', $src); $paramtokens = token_get_all("([^\n]+),#", 'var \$$1 = $2;', $values); $item = $head . "class $classname { $values }$tail"; } $item = preg_replace("#(=>?)\s*\n\s*(array|class)#", '$1 $2', $item); # array( and class on same line as key $item = preg_replace('#array \(\s+([^({,;]+),\s+\)#', 'array( $1 )', $item); # 1-element arrays on 1 line $item = preg_replace('#class (\S+) \{\s+([^({,;]+;)?\s+\}#', 'class $1 { $2 }', $item); # 1-element objects on 1 line #$item = preg_replace('#\{\s*var \$attr#', '{ var $attr', $item); # move $attr on same line $item = preg_replace("#\\(\s*\n\s*\\)#", "()", $item); # empty arrays on 1 line #$item = preg_replace('#\s+var \$_(.|\n)*?;\s*\n#', "", $item); $item = "$red$item$nored"; if (isset($_SERVER['REMOTE_ADDR']) && !$plain) $item = htmlspecialchars($item); if (ereg('^[\'"]', $var)) $r .= "$item "; else { $var = "$blue$var=$noblue"; $r .= $previtem && preg_match("/\n/", $item . $previtem) ? "\n$var$item " : "$var$item "; $previtem = $item; } } if ($GLOBALS['debug_indent']) $r = str_repeat(" ", count(debug_backtrace())-3) . $r; $title = htmlspecialchars(it_debug::backtrace(array('skiplevels' => 1))); if (isset($_SERVER['REMOTE_ADDR']) && !$plain) return "
$r\n"; else return "$r\n"; } /** * Return short stackdump * @param $p['levels'] number of stack levels to return (default: 0 = all) * @param $p['skiplevels'] number of stack levels to omit * @param $p['skipfiles'] regular expression of filenames to omit */ function backtrace($p = array()) { if (!is_array($p)) $p = array('skiplevels' => $p); $p += array('levels' => 0, 'skiplevels'=> 0, 'skipfiles' => "###"); if (!function_exists('memory_get_usage') || (memory_get_usage() < 50000000)) { foreach (array_slice(debug_backtrace(), $p['skiplevels'] + 1) as $call) { if (($fn = $call['file']) && !it::match($p['skipfiles'], $call['file'])) { $fn = (it::match('auto_prepend', $fn) ? basename(dirname(dirname($fn))) . "/" : "") . basename($fn); $result[] = $fn . ":" . $call['line']; if (--$p['levels'] == 0) break; } } } return join(" ", (array)$result); } } ?>