2007-02-20 16:57:43 +00:00
< ? php
/* SVN FILE: $Id$ */
/**
* Framework debugging and PHP error - handling class
*
* Provides enhanced logging , stack traces , and rendering debug views
*
* PHP versions 4 and 5
*
* CakePHP ( tm ) : Rapid Development Framework < http :// www . cakephp . org />
2008-01-01 22:18:17 +00:00
* Copyright 2005 - 2008 , Cake Software Foundation , Inc .
2007-02-20 16:57:43 +00:00
* 1785 E . Sahara Avenue , Suite 490 - 204
* Las Vegas , Nevada 89104
*
* Licensed under The MIT License
* Redistributions of files must retain the above copyright notice .
*
* @ filesource
2008-01-01 22:18:17 +00:00
* @ copyright Copyright 2005 - 2008 , Cake Software Foundation , Inc .
2007-02-20 16:57:43 +00:00
* @ link http :// www . cakefoundation . org / projects / info / cakephp CakePHP ( tm ) Project
* @ package cake
* @ subpackage cake . cake . libs
* @ since CakePHP ( tm ) v 1.2 . 4560
* @ version $Revision $
* @ modifiedby $LastChangedBy $
* @ lastmodified $Date $
* @ license http :// www . opensource . org / licenses / mit - license . php The MIT License
*/
/**
* Included libraries .
*
*/
if ( ! class_exists ( 'Object' )) {
uses ( 'object' );
}
2007-12-23 21:25:30 +00:00
if ( ! class_exists ( 'CakeLog' )) {
uses ( 'cake_log' );
}
2007-02-20 16:57:43 +00:00
/**
* Provide custom logging and error handling .
*
* Debugger overrides PHP ' s default error handling to provide stack traces and enhanced logging
*
* @ package cake
* @ subpackage cake . cake . libs
*/
class Debugger extends Object {
/**
* Holds a reference to errors generated by the application
*
* @ var array
* @ access public
*/
var $errors = array ();
/**
* Contains the base URL for error code documentation
*
* @ var string
* @ access public
*/
var $helpPath = null ;
2007-12-23 21:25:30 +00:00
/**
* holds current output format
*
* @ var string
* @ access private
*/
var $__outputFormat = 'js' ;
/**
* holds current output data when outputFormat is false
*
* @ var string
* @ access private
*/
var $__data = array ();
2007-02-20 16:57:43 +00:00
/**
* Constructor
*
*/
function __construct () {
$docRef = ini_get ( 'docref_root' );
if ( empty ( $docRef )) {
ini_set ( 'docref_root' , 'http://php.net/' );
}
if ( ! defined ( 'E_RECOVERABLE_ERROR' )) {
define ( 'E_RECOVERABLE_ERROR' , 4096 );
}
}
/**
* Gets a reference to the Debugger object instance
*
* @ return object
2007-05-20 06:30:19 +00:00
* @ access public
2007-02-20 16:57:43 +00:00
*/
function & getInstance () {
static $instance = array ();
if ( ! isset ( $instance [ 0 ]) || ! $instance [ 0 ]) {
2007-08-11 15:03:28 +00:00
$instance [ 0 ] =& new Debugger ();
if ( Configure :: read () > 0 ) {
Configure :: version (); // Make sure the core config is loaded
$instance [ 0 ] -> helpPath = Configure :: read ( 'Cake.Debugger.HelpPath' );
}
2007-02-20 16:57:43 +00:00
}
return $instance [ 0 ];
}
2007-12-29 19:05:22 +00:00
/**
* formats and outputs the passed var
*/
function dump ( $var ) {
$_this = Debugger :: getInstance ();
pr ( $_this -> exportVar ( $var ));
}
2008-01-02 00:31:13 +00:00
/**
* neatly logs a given var
*/
function log ( $var , $level = 7 ) {
$_this = Debugger :: getInstance ();
$trace = $_this -> trace ( array ( 'start' => 1 , 'depth' => 2 , 'format' => 'array' ));
$source = null ;
if ( is_object ( $trace [ 0 ][ 'object' ]) && isset ( $trace [ 0 ][ 'object' ] -> _reporter -> _test_stack )) {
$stack = $trace [ 0 ][ 'object' ] -> _reporter -> _test_stack ;
$source = " [ " . $stack [ 0 ] . " , " . $stack [ 2 ] . " :: " . $stack [ 3 ] . " ()] \n " ;
}
CakeLog :: write ( $level , $source . $_this -> exportVar ( $var ));
}
2007-02-20 16:57:43 +00:00
/**
* Overrides PHP ' s default error handling
*
2007-10-22 16:11:12 +00:00
* @ param integer $code Code of error
2007-05-20 06:30:19 +00:00
* @ param string $description Error description
* @ param string $file File on which error occurred
2007-10-22 16:11:12 +00:00
* @ param integer $line Line that triggered the error
2007-05-20 06:30:19 +00:00
* @ param array $context Context
2007-10-22 16:09:35 +00:00
* @ return boolean true if error was handled
2007-05-20 06:30:19 +00:00
* @ access public
2007-02-20 16:57:43 +00:00
*/
function handleError ( $code , $description , $file = null , $line = null , $context = null ) {
2007-08-13 15:59:16 +00:00
if ( error_reporting () == 0 || $code === 2048 ) {
2007-02-20 16:57:43 +00:00
return ;
}
2007-08-13 15:59:16 +00:00
$_this = Debugger :: getInstance ();
2007-02-20 16:57:43 +00:00
if ( empty ( $file )) {
$file = '[internal]' ;
}
if ( empty ( $line )) {
$line = '??' ;
}
2007-08-11 15:03:28 +00:00
$file = $_this -> trimPath ( $file );
2007-02-20 16:57:43 +00:00
$info = compact ( 'code' , 'description' , 'file' , 'line' );
2007-08-11 15:03:28 +00:00
if ( ! in_array ( $info , $_this -> errors )) {
$_this -> errors [] = $info ;
2007-02-20 16:57:43 +00:00
} else {
return ;
}
2007-04-12 00:34:16 +00:00
$level = LOG_DEBUG ;
2007-02-20 16:57:43 +00:00
switch ( $code ) {
case E_PARSE :
case E_ERROR :
case E_CORE_ERROR :
case E_COMPILE_ERROR :
2007-12-24 23:47:46 +00:00
case E_USER_ERROR :
2007-02-20 16:57:43 +00:00
$error = 'Fatal Error' ;
2007-04-12 00:34:16 +00:00
$level = LOG_ERROR ;
2007-02-20 16:57:43 +00:00
break ;
case E_WARNING :
case E_USER_WARNING :
case E_COMPILE_WARNING :
case E_RECOVERABLE_ERROR :
$error = 'Warning' ;
2007-04-12 00:34:16 +00:00
$level = LOG_WARNING ;
2007-02-20 16:57:43 +00:00
break ;
case E_NOTICE :
2007-11-04 07:03:57 +00:00
case E_USER_NOTICE :
2007-02-20 16:57:43 +00:00
$error = 'Notice' ;
2007-04-12 00:34:16 +00:00
$level = LOG_NOTICE ;
2007-02-20 16:57:43 +00:00
break ;
default :
return false ;
break ;
}
$helpCode = null ;
2007-08-11 15:03:28 +00:00
if ( ! empty ( $_this -> helpPath ) && preg_match ( '/.*\[([0-9]+)\]$/' , $description , $codes )) {
2007-02-20 16:57:43 +00:00
if ( isset ( $codes [ 1 ])) {
$helpCode = $codes [ 1 ];
$description = trim ( preg_replace ( '/\[[0-9]+\]$/' , '' , $description ));
}
}
2007-12-24 23:47:46 +00:00
echo $_this -> __output ( $level , $error , $code , $helpCode , $description , $file , $line , $context );
2007-04-12 00:34:16 +00:00
if ( Configure :: read ( 'log' )) {
CakeLog :: write ( $level , " { $error } ( { $code } ): { $description } in [ { $file } , line { $line } ] " );
}
2007-04-24 00:26:10 +00:00
2007-02-20 16:57:43 +00:00
if ( $error == 'Fatal Error' ) {
die ();
2007-04-24 00:26:10 +00:00
}
2007-02-20 16:57:43 +00:00
return true ;
}
/**
* Outputs a stack trace with the given options
*
2007-05-20 06:30:19 +00:00
* @ param array $options Format for outputting stack trace
* @ return string Formatted stack trace
2007-12-23 21:25:30 +00:00
* @ access public
2007-02-20 16:57:43 +00:00
*/
function trace ( $options = array ()) {
2007-12-08 06:08:03 +00:00
$options = array_merge ( array (
2007-02-20 16:57:43 +00:00
'depth' => 999 ,
'format' => '' ,
'args' => false ,
'start' => 0 ,
'scope' => null ,
'exclude' => null
),
$options
);
$backtrace = debug_backtrace ();
$back = array ();
for ( $i = $options [ 'start' ]; $i < count ( $backtrace ) && $i < $options [ 'depth' ]; $i ++ ) {
2007-12-08 06:08:03 +00:00
$trace = array_merge (
2007-02-20 16:57:43 +00:00
array (
'file' => '[internal]' ,
'line' => '??'
),
$backtrace [ $i ]
);
if ( isset ( $backtrace [ $i + 1 ])) {
2007-12-08 06:08:03 +00:00
$next = array_merge (
2007-02-20 16:57:43 +00:00
array (
'line' => '??' ,
'file' => '[internal]' ,
'class' => null ,
'function' => '[main]'
),
$backtrace [ $i + 1 ]
);
$function = $next [ 'function' ];
if ( ! empty ( $next [ 'class' ])) {
$function = $next [ 'class' ] . '::' . $function . '(' ;
if ( $options [ 'args' ] && isset ( $next [ 'args' ])) {
$args = array ();
foreach ( $next [ 'args' ] as $arg ) {
$args [] = Debugger :: exportVar ( $arg );
}
$function .= join ( ', ' , $args );
}
$function .= ')' ;
}
} else {
$function = '[main]' ;
}
if ( in_array ( $function , array ( 'call_user_func_array' , 'trigger_error' ))) {
continue ;
}
if ( $options [ 'format' ] == 'points' && $trace [ 'file' ] != '[internal]' ) {
$back [] = array ( 'file' => $trace [ 'file' ], 'line' => $trace [ 'line' ]);
} elseif ( empty ( $options [ 'format' ])) {
$back [] = $function . ' - ' . Debugger :: trimPath ( $trace [ 'file' ]) . ', line ' . $trace [ 'line' ];
2008-01-02 00:31:13 +00:00
} else {
$back [] = $trace ;
2007-02-20 16:57:43 +00:00
}
}
if ( $options [ 'format' ] == 'array' || $options [ 'format' ] == 'points' ) {
return $back ;
}
return join ( " \n " , $back );
}
/**
* Shortens file paths by replacing the application base path with 'APP' , and the CakePHP core
* path with 'CORE'
*
2007-05-20 06:30:19 +00:00
* @ param string $path Path to shorten
* @ return string Normalized path
2007-12-23 21:25:30 +00:00
* @ access public
2007-02-20 16:57:43 +00:00
*/
function trimPath ( $path ) {
if ( ! defined ( 'CAKE_CORE_INCLUDE_PATH' ) || ! defined ( 'APP' )) {
return $path ;
}
2008-01-02 05:23:44 +00:00
if ( strpos ( $path , APP ) === 0 ) {
return str_replace ( APP , 'APP' . DS , $path );
} elseif ( strpos ( $path , CAKE_CORE_INCLUDE_PATH ) === 0 ) {
return str_replace ( CAKE_CORE_INCLUDE_PATH , 'CORE' , $path );
2007-02-20 16:57:43 +00:00
} elseif ( strpos ( $path , ROOT ) === 0 ) {
2008-01-02 05:23:44 +00:00
return str_replace ( ROOT , 'ROOT' , $path );
}
$corePaths = Configure :: corePaths ( 'cake' );
foreach ( $corePaths as $corePath ) {
if ( strpos ( $path , $corePath ) === 0 ) {
return str_replace ( $corePath , 'CORE' . DS . 'cake' . DS , $path );
}
2007-02-20 16:57:43 +00:00
}
return $path ;
}
/**
* Grabs an excerpt from a file and highlights a given line of code
*
* @ param string $file Absolute path to a PHP file
2007-10-22 16:11:12 +00:00
* @ param integer $line Line number to highlight
* @ param integer $context Number of lines of context to extract above and below $line
2007-05-20 06:30:19 +00:00
* @ return array Set of lines highlighted
2007-12-23 21:25:30 +00:00
* @ access public
2007-02-20 16:57:43 +00:00
*/
function excerpt ( $file , $line , $context = 2 ) {
$data = $lines = array ();
$data = @ explode ( " \n " , file_get_contents ( $file ));
if ( empty ( $data ) || ! isset ( $data [ $line ])) {
return ;
}
for ( $i = $line - ( $context + 1 ); $i < $line + $context ; $i ++ ) {
if ( ! isset ( $data [ $i ])) {
continue ;
}
2007-12-24 23:47:46 +00:00
$string = str_replace ( array ( " \r \n " , " \n " ), " " , highlight_string ( $data [ $i ], true ));
2007-02-20 16:57:43 +00:00
if ( $i == $line ) {
2007-12-24 23:47:46 +00:00
$lines [] = '<span class="code-highlight">' . $string . '</span>' ;
2007-02-20 16:57:43 +00:00
} else {
2007-12-24 23:47:46 +00:00
$lines [] = $string ;
2007-02-20 16:57:43 +00:00
}
}
return $lines ;
}
/**
* Converts a variable to a string for debug output
*
2007-05-20 06:30:19 +00:00
* @ param string $var Variable to convert
* @ return string Variable as a formatted string
2007-12-23 21:25:30 +00:00
* @ access public
2007-02-20 16:57:43 +00:00
*/
function exportVar ( $var , $recursion = 0 ) {
2007-12-23 21:25:30 +00:00
$_this = Debugger :: getInstance ();
2007-12-08 06:08:03 +00:00
switch ( strtolower ( gettype ( $var ))) {
2007-02-20 16:57:43 +00:00
case 'boolean' :
return ife ( $var , 'true' , 'false' );
break ;
case 'integer' :
case 'double' :
return $var ;
break ;
case 'string' :
2007-12-29 19:05:22 +00:00
if ( trim ( $var ) == " " ) {
2008-04-18 06:01:35 +00:00
return '""' ;
2007-12-29 19:05:22 +00:00
}
2007-12-24 23:47:46 +00:00
return '"' . h ( $var ) . '"' ;
2007-02-20 16:57:43 +00:00
break ;
2007-08-11 15:03:28 +00:00
case 'object' :
2007-12-24 23:47:46 +00:00
return get_class ( $var ) . " \n " . $_this -> __object ( $var );
2007-02-20 16:57:43 +00:00
case 'array' :
2007-12-24 23:47:46 +00:00
$out = " array( " ;
2007-12-23 21:25:30 +00:00
$vars = array ();
foreach ( $var as $key => $val ) {
2008-05-22 19:05:37 +00:00
if ( $recursion >= 0 ) {
if ( is_numeric ( $key )) {
$vars [] = " \n \t " . $_this -> exportVar ( $val , $recursion - 1 );
2008-04-26 11:10:55 +00:00
} else {
2008-05-22 19:05:37 +00:00
$vars [] = " \n \t " . $_this -> exportVar ( $key , $recursion - 1 )
2008-04-26 11:10:55 +00:00
. ' => ' . $_this -> exportVar ( $val , $recursion - 1 );
2008-05-22 19:05:37 +00:00
}
}
2007-02-20 16:57:43 +00:00
}
2007-12-24 23:47:46 +00:00
$n = null ;
if ( count ( $vars ) > 0 ) {
$n = " \n " ;
}
return $out . join ( " , " , $vars ) . " { $n } ) " ;
2007-02-20 16:57:43 +00:00
break ;
case 'resource' :
2007-12-08 06:08:03 +00:00
return strtolower ( gettype ( $var ));
2007-02-20 16:57:43 +00:00
break ;
case 'null' :
return 'null' ;
break ;
}
}
2007-12-23 21:25:30 +00:00
/**
* Handles object conversion to debug string
*
* @ param string $var Object to convert
* @ access private
*/
2007-08-11 15:03:28 +00:00
function __object ( $var ) {
2007-12-23 21:25:30 +00:00
$out = array ();
2008-04-18 06:01:35 +00:00
2007-08-11 15:03:28 +00:00
if ( is_object ( $var )) {
$className = get_class ( $var );
$objectVars = get_object_vars ( $var );
2007-12-23 21:25:30 +00:00
2007-08-11 15:03:28 +00:00
foreach ( $objectVars as $key => $value ) {
2008-04-18 06:01:35 +00:00
if ( is_object ( $value )) {
$value = get_class ( $value ) . ' object' ;
} elseif ( is_array ( $value )) {
$value = 'array' ;
} elseif ( $value === null ) {
$value = 'NULL' ;
} elseif ( in_array ( gettype ( $value ), array ( 'boolean' , 'integer' , 'double' , 'string' , 'array' , 'resource' ))) {
$value = Debugger :: exportVar ( $value );
2007-08-11 15:03:28 +00:00
}
2008-04-18 06:01:35 +00:00
$out [] = " $className :: $ $key = " . $value ;
2007-08-11 15:03:28 +00:00
}
}
2007-12-23 21:25:30 +00:00
return join ( " \n " , $out );
}
/**
* Handles object conversion to debug string
*
* @ param string $var Object to convert
* @ access protected
*/
function output ( $format = 'js' ) {
$_this = Debugger :: getInstance ();
$data = null ;
if ( $format === true && ! empty ( $_this -> __data )) {
$data = $_this -> __data ;
$_this -> __data = array ();
$format = false ;
}
$_this -> __outputFormat = $format ;
return $data ;
}
/**
* Handles object conversion to debug string
*
* @ param string $var Object to convert
* @ access private
*/
2007-12-24 23:47:46 +00:00
function __output ( $level , $error , $code , $helpCode , $description , $file , $line , $kontext ) {
2007-12-23 21:25:30 +00:00
$_this = Debugger :: getInstance ();
2007-12-24 23:47:46 +00:00
$files = $_this -> trace ( array ( 'start' => 2 , 'format' => 'points' ));
$listing = $_this -> excerpt ( $files [ 0 ][ 'file' ], $files [ 0 ][ 'line' ] - 1 , 1 );
2008-01-02 00:31:13 +00:00
$trace = $_this -> trace ( array ( 'start' => 2 , 'depth' => '20' ));
2007-12-24 23:47:46 +00:00
$context = array ();
foreach (( array ) $kontext as $var => $value ) {
$context [] = " \$ { $var } \t = \t " . $_this -> exportVar ( $value , 1 );
}
2007-12-23 21:25:30 +00:00
switch ( $_this -> __outputFormat ) {
default :
case 'js' :
$link = " document.getElementById( \" CakeStackTrace " . count ( $_this -> errors ) . " \" ).style.display = (document.getElementById( \" CakeStackTrace " . count ( $_this -> errors ) . " \" ).style.display == \" none \" ? \" \" : \" none \" ) " ;
$out = " <a href='javascript:void(0);' onclick=' { $link } '><b> { $error } </b> ( { $code } )</a>: { $description } [<b> { $file } </b>, line <b> { $line } </b>] " ;
if ( Configure :: read () > 0 ) {
debug ( $out , false , false );
e ( '<div id="CakeStackTrace' . count ( $_this -> errors ) . '" class="cake-stack-trace" style="display: none;">' );
$link = " document.getElementById( \" CakeErrorCode " . count ( $_this -> errors ) . " \" ).style.display = (document.getElementById( \" CakeErrorCode " . count ( $_this -> errors ) . " \" ).style.display == \" none \" ? \" \" : \" none \" ) " ;
e ( " <a href='javascript:void(0);' onclick=' { $link } '>Code</a> " );
2007-12-24 23:47:46 +00:00
if ( ! empty ( $context )) {
$link = " document.getElementById( \" CakeErrorContext " . count ( $_this -> errors ) . " \" ).style.display = (document.getElementById( \" CakeErrorContext " . count ( $_this -> errors ) . " \" ).style.display == \" none \" ? \" \" : \" none \" ) " ;
e ( " | <a href='javascript:void(0);' onclick=' { $link } '>Context</a> " );
2007-12-23 21:25:30 +00:00
2007-12-24 23:47:46 +00:00
if ( ! empty ( $helpCode )) {
e ( " | <a href=' { $_this -> helpPath } { $helpCode } ' target='blank'>Help</a> " );
}
2007-12-23 21:25:30 +00:00
2007-12-24 23:47:46 +00:00
e ( " <pre id= \" CakeErrorContext " . count ( $_this -> errors ) . " \" class= \" cake-context \" style= \" display: none; \" > " );
e ( implode ( " \n " , $context ));
e ( " </pre> " );
}
2007-12-23 21:25:30 +00:00
2008-01-20 22:25:20 +00:00
if ( ! empty ( $listing )) {
e ( " <div id= \" CakeErrorCode " . count ( $_this -> errors ) . " \" class= \" cake-code-dump \" style= \" display: none; \" > " );
pr ( implode ( " \n " , $listing ) . " \n " , false );
e ( '</div>' );
}
2007-12-24 23:47:46 +00:00
pr ( $trace , false );
2007-12-23 21:25:30 +00:00
e ( '</div>' );
}
break ;
case 'html' :
echo " <pre class= \" cake-debug \" ><b> { $error } </b> ( { $code } ) : { $description } [<b> { $file } </b>, line <b> { $line } ]</b></pre> " ;
2007-12-24 23:47:46 +00:00
if ( ! empty ( $context )) {
echo " Context: \n " . implode ( " \n " , $context ) . " \n " ;
}
echo " <pre class= \" cake-debug context \" ><b>Context</b> <p> " . implode ( " \n " , $context ) . " </p></pre> " ;
echo " <pre class= \" cake-debug trace \" ><b>Trace</b> <p> " . $trace . " </p></pre> " ;
2007-12-23 21:25:30 +00:00
break ;
case 'text' :
case 'txt' :
echo " { $error } : { $code } :: { $description } on line { $line } of { $file } \n " ;
2007-12-24 23:47:46 +00:00
if ( ! empty ( $context )) {
echo " Context: \n " . implode ( " \n " , $context ) . " \n " ;
}
echo " Trace: \n " . $trace ;
2007-12-23 21:25:30 +00:00
break ;
case 'log' :
2007-12-24 23:47:46 +00:00
$_this -> log ( compact ( 'error' , 'code' , 'description' , 'line' , 'file' , 'context' , 'trace' ));
2007-12-23 21:25:30 +00:00
break ;
case false :
2007-12-24 23:47:46 +00:00
$this -> __data [] = compact ( 'error' , 'code' , 'description' , 'line' , 'file' , 'context' , 'trace' );
2007-12-23 21:25:30 +00:00
break ;
}
2007-08-11 15:03:28 +00:00
}
2007-04-12 00:34:16 +00:00
/**
* Verify that the application ' s salt has been changed from the default value
*
2007-05-20 06:30:19 +00:00
* @ access public
2007-04-12 00:34:16 +00:00
*/
function checkSessionKey () {
2007-10-16 09:05:25 +00:00
if ( Configure :: read ( 'Security.salt' ) == 'DYhG93b0qyJfIxfs2guVoUubWwvniR2G0FgaC9mi' ) {
trigger_error ( __ ( 'Please change the value of \'Security.salt\' in app/config/core.php to a salt value specific to your application' , true ), E_USER_NOTICE );
2007-04-12 00:34:16 +00:00
}
}
/**
* Invokes the given debugger object as the current error handler , taking over control from the previous handler
* in a stack - like hierarchy .
*
* @ param object $debugger A reference to the Debugger object
2007-05-20 06:30:19 +00:00
* @ access public
2007-04-12 00:34:16 +00:00
*/
function invoke ( & $debugger ) {
set_error_handler ( array ( & $debugger , 'handleError' ));
}
2007-02-20 16:57:43 +00:00
}
if ( ! defined ( 'DISABLE_DEFAULT_ERROR_HANDLING' )) {
2007-04-12 00:34:16 +00:00
Debugger :: invoke ( Debugger :: getInstance ());
2007-02-20 16:57:43 +00:00
}
2007-10-28 04:18:18 +00:00
?>