1371 lines
		
	
	
		
			43 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
		
		
			
		
	
	
			1371 lines
		
	
	
		
			43 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
|   | <?php | ||
|  | /** | ||
|  |  * *** BEGIN LICENSE BLOCK ***** | ||
|  |  *   | ||
|  |  * This file is part of FirePHP (http://www.firephp.org/). | ||
|  |  *  | ||
|  |  * Software License Agreement (New BSD License) | ||
|  |  *  | ||
|  |  * Copyright (c) 2006-2008, Christoph Dorn | ||
|  |  * All rights reserved. | ||
|  |  *  | ||
|  |  * Redistribution and use in source and binary forms, with or without modification, | ||
|  |  * are permitted provided that the following conditions are met: | ||
|  |  *  | ||
|  |  *     * Redistributions of source code must retain the above copyright notice, | ||
|  |  *       this list of conditions and the following disclaimer. | ||
|  |  *  | ||
|  |  *     * Redistributions in binary form must reproduce the above copyright notice, | ||
|  |  *       this list of conditions and the following disclaimer in the documentation | ||
|  |  *       and/or other materials provided with the distribution. | ||
|  |  *  | ||
|  |  *     * Neither the name of Christoph Dorn nor the names of its | ||
|  |  *       contributors may be used to endorse or promote products derived from this | ||
|  |  *       software without specific prior written permission. | ||
|  |  *  | ||
|  |  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND | ||
|  |  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED | ||
|  |  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE | ||
|  |  * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR | ||
|  |  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES | ||
|  |  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | ||
|  |  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON | ||
|  |  * ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT | ||
|  |  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS | ||
|  |  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | ||
|  |  *  | ||
|  |  * ***** END LICENSE BLOCK ***** | ||
|  |  *  | ||
|  |  * @copyright   Copyright (C) 2007-2008 Christoph Dorn | ||
|  |  * @author      Christoph Dorn <christoph@christophdorn.com> | ||
|  |  * @license     http://www.opensource.org/licenses/bsd-license.php | ||
|  |  * @package     FirePHP | ||
|  |  */ | ||
|  |   | ||
|  |   | ||
|  | /** | ||
|  |  * Sends the given data to the FirePHP Firefox Extension. | ||
|  |  * The data can be displayed in the Firebug Console or in the | ||
|  |  * "Server" request tab. | ||
|  |  *  | ||
|  |  * For more information see: http://www.firephp.org/ | ||
|  |  *  | ||
|  |  * @copyright   Copyright (C) 2007-2008 Christoph Dorn | ||
|  |  * @author      Christoph Dorn <christoph@christophdorn.com> | ||
|  |  * @license     http://www.opensource.org/licenses/bsd-license.php | ||
|  |  * @package     FirePHP | ||
|  |  */ | ||
|  | class FirePHP { | ||
|  |    | ||
|  |   /** | ||
|  |    * FirePHP version | ||
|  |    * | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const VERSION = '0.2.0'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Firebug LOG level | ||
|  |    * | ||
|  |    * Logs a message to firebug console. | ||
|  |    *  | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const LOG = 'LOG'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Firebug INFO level | ||
|  |    * | ||
|  |    * Logs a message to firebug console and displays an info icon before the message. | ||
|  |    *  | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const INFO = 'INFO'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Firebug WARN level | ||
|  |    * | ||
|  |    * Logs a message to firebug console, displays an warning icon before the message and colors the line turquoise. | ||
|  |    *  | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const WARN = 'WARN'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Firebug ERROR level | ||
|  |    * | ||
|  |    * Logs a message to firebug console, displays an error icon before the message and colors the line yellow. Also increments the firebug error count. | ||
|  |    *  | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const ERROR = 'ERROR'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Dumps a variable to firebug's server panel | ||
|  |    * | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const DUMP = 'DUMP'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Displays a stack trace in firebug console | ||
|  |    * | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const TRACE = 'TRACE'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Displays an exception in firebug console | ||
|  |    *  | ||
|  |    * Increments the firebug error count. | ||
|  |    * | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const EXCEPTION = 'EXCEPTION'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Displays an table in firebug console | ||
|  |    * | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const TABLE = 'TABLE'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Starts a group in firebug console | ||
|  |    *  | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const GROUP_START = 'GROUP_START'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Ends a group in firebug console | ||
|  |    *  | ||
|  |    * @var string | ||
|  |    */ | ||
|  |   const GROUP_END = 'GROUP_END'; | ||
|  |    | ||
|  |   /** | ||
|  |    * Singleton instance of FirePHP | ||
|  |    * | ||
|  |    * @var FirePHP | ||
|  |    */ | ||
|  |   protected static $instance = null; | ||
|  |    | ||
|  |   /** | ||
|  |    * Wildfire protocol message index | ||
|  |    * | ||
|  |    * @var int | ||
|  |    */ | ||
|  |   protected $messageIndex = 1; | ||
|  |      | ||
|  |   /** | ||
|  |    * Options for the library | ||
|  |    *  | ||
|  |    * @var array | ||
|  |    */ | ||
|  |   protected $options = array(); | ||
|  |    | ||
|  |   /** | ||
|  |    * Filters used to exclude object members when encoding | ||
|  |    *  | ||
|  |    * @var array | ||
|  |    */ | ||
|  |   protected $objectFilters = array(); | ||
|  |    | ||
|  |   /** | ||
|  |    * A stack of objects used to detect recursion during object encoding | ||
|  |    *  | ||
|  |    * @var object | ||
|  |    */ | ||
|  |   protected $objectStack = array(); | ||
|  |    | ||
|  |   /** | ||
|  |    * Flag to enable/disable logging | ||
|  |    *  | ||
|  |    * @var boolean | ||
|  |    */ | ||
|  |   protected $enabled = true; | ||
|  |    | ||
|  |   /** | ||
|  |    * The object constructor | ||
|  |    */ | ||
|  |   function __construct() { | ||
|  |     $this->options['maxObjectDepth'] = 10; | ||
|  |     $this->options['maxArrayDepth'] = 20; | ||
|  |     $this->options['useNativeJsonEncode'] = true; | ||
|  |     $this->options['includeLineNumbers'] = true; | ||
|  |   } | ||
|  |      | ||
|  |   /** | ||
|  |    * When the object gets serialized only include specific object members. | ||
|  |    *  | ||
|  |    * @return array | ||
|  |    */   | ||
|  |   public function __sleep() { | ||
|  |     return array('options','objectFilters','enabled'); | ||
|  |   } | ||
|  |      | ||
|  |   /** | ||
|  |    * Gets singleton instance of FirePHP | ||
|  |    * | ||
|  |    * @param boolean $AutoCreate | ||
|  |    * @return FirePHP | ||
|  |    */ | ||
|  |   public static function getInstance($AutoCreate=false) { | ||
|  |     if($AutoCreate===true && !self::$instance) { | ||
|  |       self::init(); | ||
|  |     } | ||
|  |     return self::$instance; | ||
|  |   } | ||
|  |     | ||
|  |   /** | ||
|  |    * Creates FirePHP object and stores it for singleton access | ||
|  |    * | ||
|  |    * @return FirePHP | ||
|  |    */ | ||
|  |   public static function init() { | ||
|  |     return self::$instance = new self(); | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Enable and disable logging to Firebug | ||
|  |    *  | ||
|  |    * @param boolean $Enabled TRUE to enable, FALSE to disable | ||
|  |    * @return void | ||
|  |    */ | ||
|  |   public function setEnabled($Enabled) { | ||
|  |     $this->enabled = $Enabled; | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Check if logging is enabled | ||
|  |    *  | ||
|  |    * @return boolean TRUE if enabled | ||
|  |    */ | ||
|  |   public function getEnabled() { | ||
|  |     return $this->enabled; | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Specify a filter to be used when encoding an object | ||
|  |    *  | ||
|  |    * Filters are used to exclude object members. | ||
|  |    *  | ||
|  |    * @param string $Class The class name of the object | ||
|  |    * @param array $Filter An array or members to exclude | ||
|  |    * @return void | ||
|  |    */ | ||
|  |   public function setObjectFilter($Class, $Filter) { | ||
|  |     $this->objectFilters[$Class] = $Filter; | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Set some options for the library | ||
|  |    *  | ||
|  |    * Options: | ||
|  |    *  - maxObjectDepth: The maximum depth to traverse objects (default: 10) | ||
|  |    *  - maxArrayDepth: The maximum depth to traverse arrays (default: 20) | ||
|  |    *  - useNativeJsonEncode: If true will use json_encode() (default: true) | ||
|  |    *  - includeLineNumbers: If true will include line numbers and filenames (default: true) | ||
|  |    *  | ||
|  |    * @param array $Options The options to be set | ||
|  |    * @return void | ||
|  |    */ | ||
|  |   public function setOptions($Options) { | ||
|  |     $this->options = array_merge($this->options,$Options); | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Register FirePHP as your error handler | ||
|  |    *  | ||
|  |    * Will throw exceptions for each php error. | ||
|  |    */ | ||
|  |   public function registerErrorHandler() | ||
|  |   { | ||
|  |     //NOTE: The following errors will not be caught by this error handler:
 | ||
|  |     //      E_ERROR, E_PARSE, E_CORE_ERROR,
 | ||
|  |     //      E_CORE_WARNING, E_COMPILE_ERROR,
 | ||
|  |     //      E_COMPILE_WARNING, E_STRICT
 | ||
|  |      | ||
|  |     set_error_handler(array($this,'errorHandler'));      | ||
|  |   } | ||
|  | 
 | ||
|  |   /** | ||
|  |    * FirePHP's error handler | ||
|  |    *  | ||
|  |    * Throws exception for each php error that will occur. | ||
|  |    * | ||
|  |    * @param int $errno | ||
|  |    * @param string $errstr | ||
|  |    * @param string $errfile | ||
|  |    * @param int $errline | ||
|  |    * @param array $errcontext | ||
|  |    */ | ||
|  |   public function errorHandler($errno, $errstr, $errfile, $errline, $errcontext) | ||
|  |   { | ||
|  |     // Don't throw exception if error reporting is switched off
 | ||
|  |     if (error_reporting() == 0) { | ||
|  |       return; | ||
|  |     } | ||
|  |     // Only throw exceptions for errors we are asking for
 | ||
|  |     if (error_reporting() & $errno) { | ||
|  |       throw new ErrorException($errstr, 0, $errno, $errfile, $errline); | ||
|  |     } | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Register FirePHP as your exception handler | ||
|  |    */ | ||
|  |   public function registerExceptionHandler() | ||
|  |   { | ||
|  |     set_exception_handler(array($this,'exceptionHandler'));      | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * FirePHP's exception handler | ||
|  |    *  | ||
|  |    * Logs all exceptions to your firebug console and then stops the script. | ||
|  |    * | ||
|  |    * @param Exception $Exception | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   function exceptionHandler($Exception) { | ||
|  |     $this->fb($Exception); | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Set custom processor url for FirePHP | ||
|  |    * | ||
|  |    * @param string $URL | ||
|  |    */     | ||
|  |   public function setProcessorUrl($URL) | ||
|  |   { | ||
|  |     $this->setHeader('X-FirePHP-ProcessorURL', $URL); | ||
|  |   } | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Set custom renderer url for FirePHP | ||
|  |    * | ||
|  |    * @param string $URL | ||
|  |    */ | ||
|  |   public function setRendererUrl($URL) | ||
|  |   { | ||
|  |     $this->setHeader('X-FirePHP-RendererURL', $URL); | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Start a group for following messages | ||
|  |    * | ||
|  |    * @param string $Name | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function group($Name) { | ||
|  |     return $this->fb(null, $Name, FirePHP::GROUP_START); | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Ends a group you have started before | ||
|  |    * | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function groupEnd() { | ||
|  |     return $this->fb(null, null, FirePHP::GROUP_END); | ||
|  |   } | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Log object with label to firebug console | ||
|  |    * | ||
|  |    * @see FirePHP::LOG | ||
|  |    * @param mixes $Object | ||
|  |    * @param string $Label | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function log($Object, $Label=null) { | ||
|  |     return $this->fb($Object, $Label, FirePHP::LOG); | ||
|  |   }  | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Log object with label to firebug console | ||
|  |    * | ||
|  |    * @see FirePHP::INFO | ||
|  |    * @param mixes $Object | ||
|  |    * @param string $Label | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function info($Object, $Label=null) { | ||
|  |     return $this->fb($Object, $Label, FirePHP::INFO); | ||
|  |   }  | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Log object with label to firebug console | ||
|  |    * | ||
|  |    * @see FirePHP::WARN | ||
|  |    * @param mixes $Object | ||
|  |    * @param string $Label | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function warn($Object, $Label=null) { | ||
|  |     return $this->fb($Object, $Label, FirePHP::WARN); | ||
|  |   }  | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Log object with label to firebug console | ||
|  |    * | ||
|  |    * @see FirePHP::ERROR | ||
|  |    * @param mixes $Object | ||
|  |    * @param string $Label | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function error($Object, $Label=null) { | ||
|  |     return $this->fb($Object, $Label, FirePHP::ERROR); | ||
|  |   }  | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Dumps key and variable to firebug server panel | ||
|  |    * | ||
|  |    * @see FirePHP::DUMP | ||
|  |    * @param string $Key | ||
|  |    * @param mixed $Variable | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function dump($Key, $Variable) { | ||
|  |     return $this->fb($Variable, $Key, FirePHP::DUMP); | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Log a trace in the firebug console | ||
|  |    * | ||
|  |    * @see FirePHP::TRACE | ||
|  |    * @param string $Label | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function trace($Label) { | ||
|  |     return $this->fb($Label, FirePHP::TRACE); | ||
|  |   }  | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Log a table in the firebug console | ||
|  |    * | ||
|  |    * @see FirePHP::TABLE | ||
|  |    * @param string $Label | ||
|  |    * @param string $Table | ||
|  |    * @return true | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function table($Label, $Table) { | ||
|  |     return $this->fb($Table, $Label, FirePHP::TABLE); | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Check if FirePHP is installed on client | ||
|  |    * | ||
|  |    * @return boolean | ||
|  |    */ | ||
|  |   public function detectClientExtension() { | ||
|  |     /* Check if FirePHP is installed on client */ | ||
|  |     if(!@preg_match_all('/\sFirePHP\/([\.|\d]*)\s?/si',$this->getUserAgent(),$m) || | ||
|  |        !version_compare($m[1][0],'0.0.6','>=')) { | ||
|  |       return false; | ||
|  |     } | ||
|  |     return true;     | ||
|  |   } | ||
|  |   | ||
|  |   /** | ||
|  |    * Log varible to Firebug | ||
|  |    *  | ||
|  |    * @see http://www.firephp.org/Wiki/Reference/Fb | ||
|  |    * @param mixed $Object The variable to be logged | ||
|  |    * @return true Return TRUE if message was added to headers, FALSE otherwise | ||
|  |    * @throws Exception | ||
|  |    */ | ||
|  |   public function fb($Object) { | ||
|  |    | ||
|  |     if(!$this->enabled) { | ||
|  |       return false; | ||
|  |     } | ||
|  |    | ||
|  |     if (headers_sent($filename, $linenum)) { | ||
|  |         throw $this->newException('Headers already sent in '.$filename.' on line '.$linenum.'. Cannot send log data to FirePHP. You must have Output Buffering enabled via ob_start() or output_buffering ini directive.'); | ||
|  |     } | ||
|  |    | ||
|  |     $Type = null; | ||
|  |     $Label = null; | ||
|  |    | ||
|  |     if(func_num_args()==1) { | ||
|  |     } else | ||
|  |     if(func_num_args()==2) { | ||
|  |       switch(func_get_arg(1)) { | ||
|  |         case self::LOG: | ||
|  |         case self::INFO: | ||
|  |         case self::WARN: | ||
|  |         case self::ERROR: | ||
|  |         case self::DUMP: | ||
|  |         case self::TRACE: | ||
|  |         case self::EXCEPTION: | ||
|  |         case self::TABLE: | ||
|  |         case self::GROUP_START: | ||
|  |         case self::GROUP_END: | ||
|  |           $Type = func_get_arg(1); | ||
|  |           break; | ||
|  |         default: | ||
|  |           $Label = func_get_arg(1); | ||
|  |           break; | ||
|  |       } | ||
|  |     } else | ||
|  |     if(func_num_args()==3) { | ||
|  |       $Type = func_get_arg(2); | ||
|  |       $Label = func_get_arg(1); | ||
|  |     } else { | ||
|  |       throw $this->newException('Wrong number of arguments to fb() function!'); | ||
|  |     } | ||
|  |    | ||
|  |    | ||
|  |     if(!$this->detectClientExtension()) { | ||
|  |       return false; | ||
|  |     } | ||
|  |    | ||
|  |     $meta = array(); | ||
|  |     $skipFinalObjectEncode = false; | ||
|  |    | ||
|  |     if($Object instanceof Exception) { | ||
|  | 
 | ||
|  |       $meta['file'] = $this->_escapeTraceFile($Object->getFile()); | ||
|  |       $meta['line'] = $Object->getLine(); | ||
|  |        | ||
|  |       $trace = $Object->getTrace(); | ||
|  |       if($Object instanceof ErrorException | ||
|  |          && isset($trace[0]['function']) | ||
|  |          && $trace[0]['function']=='errorHandler' | ||
|  |          && isset($trace[0]['class']) | ||
|  |          && $trace[0]['class']=='FirePHP') { | ||
|  |             | ||
|  |         $severity = false; | ||
|  |         switch($Object->getSeverity()) { | ||
|  |           case E_WARNING: $severity = 'E_WARNING'; break; | ||
|  |           case E_NOTICE: $severity = 'E_NOTICE'; break; | ||
|  |           case E_USER_ERROR: $severity = 'E_USER_ERROR'; break; | ||
|  |           case E_USER_WARNING: $severity = 'E_USER_WARNING'; break; | ||
|  |           case E_USER_NOTICE: $severity = 'E_USER_NOTICE'; break; | ||
|  |           case E_STRICT: $severity = 'E_STRICT'; break; | ||
|  |           case E_RECOVERABLE_ERROR: $severity = 'E_RECOVERABLE_ERROR'; break; | ||
|  |           case E_DEPRECATED: $severity = 'E_DEPRECATED'; break; | ||
|  |           case E_USER_DEPRECATED: $severity = 'E_USER_DEPRECATED'; break; | ||
|  |         } | ||
|  |             | ||
|  |         $Object = array('Class'=>get_class($Object), | ||
|  |                         'Message'=>$severity.': '.$Object->getMessage(), | ||
|  |                         'File'=>$this->_escapeTraceFile($Object->getFile()), | ||
|  |                         'Line'=>$Object->getLine(), | ||
|  |                         'Type'=>'trigger', | ||
|  |                         'Trace'=>$this->_escapeTrace(array_splice($trace,2))); | ||
|  |         $skipFinalObjectEncode = true; | ||
|  |       } else { | ||
|  |         $Object = array('Class'=>get_class($Object), | ||
|  |                         'Message'=>$Object->getMessage(), | ||
|  |                         'File'=>$this->_escapeTraceFile($Object->getFile()), | ||
|  |                         'Line'=>$Object->getLine(), | ||
|  |                         'Type'=>'throw', | ||
|  |                         'Trace'=>$this->_escapeTrace($trace)); | ||
|  |         $skipFinalObjectEncode = true; | ||
|  |       } | ||
|  |       $Type = self::EXCEPTION; | ||
|  |        | ||
|  |     } else | ||
|  |     if($Type==self::TRACE) { | ||
|  |        | ||
|  |       $trace = debug_backtrace(); | ||
|  |       if(!$trace) return false; | ||
|  |       for( $i=0 ; $i<sizeof($trace) ; $i++ ) { | ||
|  | 
 | ||
|  |         if(isset($trace[$i]['class']) | ||
|  |            && isset($trace[$i]['file']) | ||
|  |            && ($trace[$i]['class']=='FirePHP' | ||
|  |                || $trace[$i]['class']=='FB') | ||
|  |            && (substr($this->_standardizePath($trace[$i]['file']),-18,18)=='FirePHPCore/fb.php' | ||
|  |                || substr($this->_standardizePath($trace[$i]['file']),-29,29)=='FirePHPCore/FirePHP.class.php')) { | ||
|  |           /* Skip - FB::trace(), FB::send(), $firephp->trace(), $firephp->fb() */ | ||
|  |         } else | ||
|  |         if(isset($trace[$i]['class']) | ||
|  |            && isset($trace[$i+1]['file']) | ||
|  |            && $trace[$i]['class']=='FirePHP' | ||
|  |            && substr($this->_standardizePath($trace[$i+1]['file']),-18,18)=='FirePHPCore/fb.php') { | ||
|  |           /* Skip fb() */ | ||
|  |         } else | ||
|  |         if($trace[$i]['function']=='fb' | ||
|  |            || $trace[$i]['function']=='trace' | ||
|  |            || $trace[$i]['function']=='send') { | ||
|  |           $Object = array('Class'=>isset($trace[$i]['class'])?$trace[$i]['class']:'', | ||
|  |                           'Type'=>isset($trace[$i]['type'])?$trace[$i]['type']:'', | ||
|  |                           'Function'=>isset($trace[$i]['function'])?$trace[$i]['function']:'', | ||
|  |                           'Message'=>$trace[$i]['args'][0], | ||
|  |                           'File'=>isset($trace[$i]['file'])?$this->_escapeTraceFile($trace[$i]['file']):'', | ||
|  |                           'Line'=>isset($trace[$i]['line'])?$trace[$i]['line']:'', | ||
|  |                           'Args'=>isset($trace[$i]['args'])?$this->encodeObject($trace[$i]['args']):'', | ||
|  |                           'Trace'=>$this->_escapeTrace(array_splice($trace,$i+1))); | ||
|  | 
 | ||
|  |           $skipFinalObjectEncode = true; | ||
|  |           $meta['file'] = isset($trace[$i]['file'])?$this->_escapeTraceFile($trace[$i]['file']):''; | ||
|  |           $meta['line'] = isset($trace[$i]['line'])?$trace[$i]['line']:''; | ||
|  |           break; | ||
|  |         } | ||
|  |       } | ||
|  | 
 | ||
|  |     } else | ||
|  |     if($Type==self::TABLE) { | ||
|  |        | ||
|  |       if(isset($Object[0]) && is_string($Object[0])) { | ||
|  |         $Object[1] = $this->encodeTable($Object[1]); | ||
|  |       } else { | ||
|  |         $Object = $this->encodeTable($Object); | ||
|  |       } | ||
|  | 
 | ||
|  |       $skipFinalObjectEncode = true; | ||
|  |        | ||
|  |     } else { | ||
|  |       if($Type===null) { | ||
|  |         $Type = self::LOG; | ||
|  |       } | ||
|  |     } | ||
|  |      | ||
|  |     if($this->options['includeLineNumbers']) { | ||
|  |       if(!isset($meta['file']) || !isset($meta['line'])) { | ||
|  | 
 | ||
|  |         $trace = debug_backtrace(); | ||
|  |         for( $i=0 ; $trace && $i<sizeof($trace) ; $i++ ) { | ||
|  |    | ||
|  |           if(isset($trace[$i]['class']) | ||
|  |              && isset($trace[$i]['file']) | ||
|  |              && ($trace[$i]['class']=='FirePHP' | ||
|  |                  || $trace[$i]['class']=='FB') | ||
|  |              && (substr($this->_standardizePath($trace[$i]['file']),-18,18)=='FirePHPCore/fb.php' | ||
|  |                  || substr($this->_standardizePath($trace[$i]['file']),-29,29)=='FirePHPCore/FirePHP.class.php')) { | ||
|  |             /* Skip - FB::trace(), FB::send(), $firephp->trace(), $firephp->fb() */ | ||
|  |           } else | ||
|  |           if(isset($trace[$i]['class']) | ||
|  |              && isset($trace[$i+1]['file']) | ||
|  |              && $trace[$i]['class']=='FirePHP' | ||
|  |              && substr($this->_standardizePath($trace[$i+1]['file']),-18,18)=='FirePHPCore/fb.php') { | ||
|  |             /* Skip fb() */ | ||
|  |           } else | ||
|  |           if(isset($trace[$i]['file']) | ||
|  |              && substr($this->_standardizePath($trace[$i]['file']),-18,18)=='FirePHPCore/fb.php') { | ||
|  |             /* Skip FB::fb() */ | ||
|  |           } else { | ||
|  |             $meta['file'] = isset($trace[$i]['file'])?$this->_escapeTraceFile($trace[$i]['file']):''; | ||
|  |             $meta['line'] = isset($trace[$i]['line'])?$trace[$i]['line']:''; | ||
|  |             break; | ||
|  |           } | ||
|  |         }       | ||
|  |        | ||
|  |       } | ||
|  |     } else { | ||
|  |       unset($meta['file']); | ||
|  |       unset($meta['line']); | ||
|  |     } | ||
|  | 
 | ||
|  |   	$this->setHeader('X-Wf-Protocol-1','http://meta.wildfirehq.org/Protocol/JsonStream/0.2'); | ||
|  |   	$this->setHeader('X-Wf-1-Plugin-1','http://meta.firephp.org/Wildfire/Plugin/FirePHP/Library-FirePHPCore/'.self::VERSION); | ||
|  |   | ||
|  |     $structure_index = 1; | ||
|  |     if($Type==self::DUMP) { | ||
|  |       $structure_index = 2; | ||
|  |     	$this->setHeader('X-Wf-1-Structure-2','http://meta.firephp.org/Wildfire/Structure/FirePHP/Dump/0.1'); | ||
|  |     } else { | ||
|  |     	$this->setHeader('X-Wf-1-Structure-1','http://meta.firephp.org/Wildfire/Structure/FirePHP/FirebugConsole/0.1'); | ||
|  |     } | ||
|  |    | ||
|  |     if($Type==self::DUMP) { | ||
|  |     	$msg = '{"'.$Label.'":'.$this->jsonEncode($Object, $skipFinalObjectEncode).'}'; | ||
|  |     } else { | ||
|  |       $msg_meta = array('Type'=>$Type); | ||
|  |       if($Label!==null) { | ||
|  |         $msg_meta['Label'] = $Label; | ||
|  |       } | ||
|  |       if(isset($meta['file'])) { | ||
|  |         $msg_meta['File'] = $meta['file']; | ||
|  |       } | ||
|  |       if(isset($meta['line'])) { | ||
|  |         $msg_meta['Line'] = $meta['line']; | ||
|  |       } | ||
|  |     	$msg = '['.$this->jsonEncode($msg_meta).','.$this->jsonEncode($Object, $skipFinalObjectEncode).']'; | ||
|  |     } | ||
|  |      | ||
|  |     $parts = explode("\n",chunk_split($msg, 5000, "\n")); | ||
|  | 
 | ||
|  |     for( $i=0 ; $i<count($parts) ; $i++) { | ||
|  |          | ||
|  |         $part = $parts[$i]; | ||
|  |         if ($part) { | ||
|  |              | ||
|  |             if(count($parts)>2) { | ||
|  |               // Message needs to be split into multiple parts
 | ||
|  |               $this->setHeader('X-Wf-1-'.$structure_index.'-'.'1-'.$this->messageIndex, | ||
|  |                                (($i==0)?strlen($msg):'') | ||
|  |                                . '|' . $part . '|' | ||
|  |                                . (($i<count($parts)-2)?'\\':'')); | ||
|  |             } else { | ||
|  |               $this->setHeader('X-Wf-1-'.$structure_index.'-'.'1-'.$this->messageIndex, | ||
|  |                                strlen($part) . '|' . $part . '|'); | ||
|  |             } | ||
|  |              | ||
|  |             $this->messageIndex++; | ||
|  |              | ||
|  |             if ($this->messageIndex > 99999) { | ||
|  |                 throw new Exception('Maximum number (99,999) of messages reached!');              | ||
|  |             } | ||
|  |         } | ||
|  |     } | ||
|  | 
 | ||
|  |   	$this->setHeader('X-Wf-1-Index',$this->messageIndex-1); | ||
|  | 
 | ||
|  |     return true; | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Standardizes path for windows systems. | ||
|  |    * | ||
|  |    * @param string $Path | ||
|  |    * @return string | ||
|  |    */ | ||
|  |   protected function _standardizePath($Path) { | ||
|  |     return preg_replace('/\\\\+/','/',$Path);     | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Escape trace path for windows systems | ||
|  |    * | ||
|  |    * @param array $Trace | ||
|  |    * @return array | ||
|  |    */ | ||
|  |   protected function _escapeTrace($Trace) { | ||
|  |     if(!$Trace) return $Trace; | ||
|  |     for( $i=0 ; $i<sizeof($Trace) ; $i++ ) { | ||
|  |       if(isset($Trace[$i]['file'])) { | ||
|  |         $Trace[$i]['file'] = $this->_escapeTraceFile($Trace[$i]['file']); | ||
|  |       } | ||
|  |       if(isset($Trace[$i]['args'])) { | ||
|  |         $Trace[$i]['args'] = $this->encodeObject($Trace[$i]['args']); | ||
|  |       } | ||
|  |     } | ||
|  |     return $Trace;     | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Escape file information of trace for windows systems | ||
|  |    * | ||
|  |    * @param string $File | ||
|  |    * @return string | ||
|  |    */ | ||
|  |   protected function _escapeTraceFile($File) { | ||
|  |     /* Check if we have a windows filepath */ | ||
|  |     if(strpos($File,'\\')) { | ||
|  |       /* First strip down to single \ */ | ||
|  |        | ||
|  |       $file = preg_replace('/\\\\+/','\\',$File); | ||
|  |        | ||
|  |       return $file; | ||
|  |     } | ||
|  |     return $File; | ||
|  |   } | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Send header | ||
|  |    * | ||
|  |    * @param string $Name | ||
|  |    * @param string_type $Value | ||
|  |    */ | ||
|  |   protected function setHeader($Name, $Value) { | ||
|  |     return header($Name.': '.$Value); | ||
|  |   } | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Get user agent | ||
|  |    * | ||
|  |    * @return string|false | ||
|  |    */ | ||
|  |   protected function getUserAgent() { | ||
|  |     if(!isset($_SERVER['HTTP_USER_AGENT'])) return false; | ||
|  |     return $_SERVER['HTTP_USER_AGENT']; | ||
|  |   } | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Returns a new exception | ||
|  |    * | ||
|  |    * @param string $Message | ||
|  |    * @return Exception | ||
|  |    */ | ||
|  |   protected function newException($Message) { | ||
|  |     return new Exception($Message); | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Encode an object into a JSON string | ||
|  |    *  | ||
|  |    * Uses PHP's jeson_encode() if available | ||
|  |    *  | ||
|  |    * @param object $Object The object to be encoded | ||
|  |    * @return string The JSON string | ||
|  |    */ | ||
|  |   protected function jsonEncode($Object, $skipObjectEncode=false) | ||
|  |   { | ||
|  |     if(!$skipObjectEncode) { | ||
|  |       $Object = $this->encodeObject($Object); | ||
|  |     } | ||
|  |      | ||
|  |     if(function_exists('json_encode') | ||
|  |        && $this->options['useNativeJsonEncode']!=false) { | ||
|  | 
 | ||
|  |       return json_encode($Object); | ||
|  |     } else { | ||
|  |       return $this->json_encode($Object); | ||
|  |     } | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Encodes a table by encoding each row and column with encodeObject() | ||
|  |    *  | ||
|  |    * @param array $Table The table to be encoded | ||
|  |    * @return array | ||
|  |    */   | ||
|  |   protected function encodeTable($Table) { | ||
|  |     if(!$Table) return $Table; | ||
|  |     for( $i=0 ; $i<count($Table) ; $i++ ) { | ||
|  |       if(is_array($Table[$i])) { | ||
|  |         for( $j=0 ; $j<count($Table[$i]) ; $j++ ) { | ||
|  |           $Table[$i][$j] = $this->encodeObject($Table[$i][$j]); | ||
|  |         } | ||
|  |       } | ||
|  |     } | ||
|  |     return $Table; | ||
|  |   } | ||
|  |    | ||
|  |   /** | ||
|  |    * Encodes an object including members with | ||
|  |    * protected and private visibility | ||
|  |    *  | ||
|  |    * @param Object $Object The object to be encoded | ||
|  |    * @param int $Depth The current traversal depth | ||
|  |    * @return array All members of the object | ||
|  |    */ | ||
|  |   protected function encodeObject($Object, $ObjectDepth = 1, $ArrayDepth = 1) | ||
|  |   { | ||
|  |     $return = array(); | ||
|  |      | ||
|  |     if (is_object($Object)) { | ||
|  | 
 | ||
|  |         if ($ObjectDepth > $this->options['maxObjectDepth']) { | ||
|  |           return '** Max Object Depth ('.$this->options['maxObjectDepth'].') **'; | ||
|  |         } | ||
|  |          | ||
|  |         foreach ($this->objectStack as $refVal) { | ||
|  |             if ($refVal === $Object) { | ||
|  |                 return '** Recursion ('.get_class($Object).') **'; | ||
|  |             } | ||
|  |         } | ||
|  |         array_push($this->objectStack, $Object); | ||
|  |                  | ||
|  |         $return['__className'] = $class = get_class($Object); | ||
|  | 
 | ||
|  |         $reflectionClass = new ReflectionClass($class);   | ||
|  |         $properties = array(); | ||
|  |         foreach( $reflectionClass->getProperties() as $property) { | ||
|  |           $properties[$property->getName()] = $property; | ||
|  |         } | ||
|  |              | ||
|  |         $members = (array)$Object; | ||
|  |              | ||
|  |         foreach( $properties as $raw_name => $property ) { | ||
|  |            | ||
|  |           $name = $raw_name; | ||
|  |           if($property->isStatic()) { | ||
|  |             $name = 'static:'.$name; | ||
|  |           } | ||
|  |           if($property->isPublic()) { | ||
|  |             $name = 'public:'.$name; | ||
|  |           } else | ||
|  |           if($property->isPrivate()) { | ||
|  |             $name = 'private:'.$name; | ||
|  |             $raw_name = "\0".$class."\0".$raw_name; | ||
|  |           } else | ||
|  |           if($property->isProtected()) { | ||
|  |             $name = 'protected:'.$name; | ||
|  |             $raw_name = "\0".'*'."\0".$raw_name; | ||
|  |           } | ||
|  |            | ||
|  |           if(!(isset($this->objectFilters[$class]) | ||
|  |                && is_array($this->objectFilters[$class]) | ||
|  |                && in_array($raw_name,$this->objectFilters[$class]))) { | ||
|  | 
 | ||
|  |             if(array_key_exists($raw_name,$members) | ||
|  |                && !$property->isStatic()) { | ||
|  |                | ||
|  |               $return[$name] = $this->encodeObject($members[$raw_name], $ObjectDepth + 1, 1);       | ||
|  |              | ||
|  |             } else { | ||
|  |               if(method_exists($property,'setAccessible')) { | ||
|  |                 $property->setAccessible(true); | ||
|  |                 $return[$name] = $this->encodeObject($property->getValue($Object), $ObjectDepth + 1, 1); | ||
|  |               } else | ||
|  |               if($property->isPublic()) { | ||
|  |                 $return[$name] = $this->encodeObject($property->getValue($Object), $ObjectDepth + 1, 1); | ||
|  |               } else { | ||
|  |                 $return[$name] = '** Need PHP 5.3 to get value **'; | ||
|  |               } | ||
|  |             } | ||
|  |           } else { | ||
|  |             $return[$name] = '** Excluded by Filter **'; | ||
|  |           } | ||
|  |         } | ||
|  |          | ||
|  |         // Include all members that are not defined in the class
 | ||
|  |         // but exist in the object
 | ||
|  |         foreach( $members as $raw_name => $value ) { | ||
|  |            | ||
|  |           $name = $raw_name; | ||
|  |            | ||
|  |           if ($name{0} == "\0") { | ||
|  |             $parts = explode("\0", $name); | ||
|  |             $name = $parts[2]; | ||
|  |           } | ||
|  |            | ||
|  |           if(!isset($properties[$name])) { | ||
|  |             $name = 'undeclared:'.$name; | ||
|  |                | ||
|  |             if(!(isset($this->objectFilters[$class]) | ||
|  |                  && is_array($this->objectFilters[$class]) | ||
|  |                  && in_array($raw_name,$this->objectFilters[$class]))) { | ||
|  |                | ||
|  |               $return[$name] = $this->encodeObject($value, $ObjectDepth + 1, 1); | ||
|  |             } else { | ||
|  |               $return[$name] = '** Excluded by Filter **'; | ||
|  |             } | ||
|  |           } | ||
|  |         } | ||
|  |          | ||
|  |         array_pop($this->objectStack); | ||
|  |          | ||
|  |     } elseif (is_array($Object)) { | ||
|  | 
 | ||
|  |         if ($ArrayDepth > $this->options['maxArrayDepth']) { | ||
|  |           return '** Max Array Depth ('.$this->options['maxArrayDepth'].') **'; | ||
|  |         } | ||
|  |        | ||
|  |         foreach ($Object as $key => $val) { | ||
|  |            | ||
|  |           // Encoding the $GLOBALS PHP array causes an infinite loop
 | ||
|  |           // if the recursion is not reset here as it contains
 | ||
|  |           // a reference to itself. This is the only way I have come up
 | ||
|  |           // with to stop infinite recursion in this case.
 | ||
|  |           if($key=='GLOBALS' | ||
|  |              && is_array($val) | ||
|  |              && array_key_exists('GLOBALS',$val)) { | ||
|  |             $val['GLOBALS'] = '** Recursion (GLOBALS) **'; | ||
|  |           } | ||
|  |            | ||
|  |           $return[$key] = $this->encodeObject($val, 1, $ArrayDepth + 1); | ||
|  |         } | ||
|  |     } else { | ||
|  |       if(self::is_utf8($Object)) { | ||
|  |         return $Object; | ||
|  |       } else { | ||
|  |         return utf8_encode($Object); | ||
|  |       } | ||
|  |     } | ||
|  |     return $return; | ||
|  |   } | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Returns true if $string is valid UTF-8 and false otherwise. | ||
|  |    * | ||
|  |    * @param mixed $str String to be tested | ||
|  |    * @return boolean | ||
|  |    */ | ||
|  |   protected static function is_utf8($str) { | ||
|  |     $c=0; $b=0; | ||
|  |     $bits=0; | ||
|  |     $len=strlen($str); | ||
|  |     for($i=0; $i<$len; $i++){ | ||
|  |         $c=ord($str[$i]); | ||
|  |         if($c > 128){ | ||
|  |             if(($c >= 254)) return false; | ||
|  |             elseif($c >= 252) $bits=6; | ||
|  |             elseif($c >= 248) $bits=5; | ||
|  |             elseif($c >= 240) $bits=4; | ||
|  |             elseif($c >= 224) $bits=3; | ||
|  |             elseif($c >= 192) $bits=2; | ||
|  |             else return false; | ||
|  |             if(($i+$bits) > $len) return false; | ||
|  |             while($bits > 1){ | ||
|  |                 $i++; | ||
|  |                 $b=ord($str[$i]); | ||
|  |                 if($b < 128 || $b > 191) return false; | ||
|  |                 $bits--; | ||
|  |             } | ||
|  |         } | ||
|  |     } | ||
|  |     return true; | ||
|  |   }  | ||
|  | 
 | ||
|  |   /** | ||
|  |    * Converts to and from JSON format. | ||
|  |    * | ||
|  |    * JSON (JavaScript Object Notation) is a lightweight data-interchange | ||
|  |    * format. It is easy for humans to read and write. It is easy for machines | ||
|  |    * to parse and generate. It is based on a subset of the JavaScript | ||
|  |    * Programming Language, Standard ECMA-262 3rd Edition - December 1999. | ||
|  |    * This feature can also be found in  Python. JSON is a text format that is | ||
|  |    * completely language independent but uses conventions that are familiar | ||
|  |    * to programmers of the C-family of languages, including C, C++, C#, Java,
 | ||
|  |    * JavaScript, Perl, TCL, and many others. These properties make JSON an | ||
|  |    * ideal data-interchange language. | ||
|  |    * | ||
|  |    * This package provides a simple encoder and decoder for JSON notation. It | ||
|  |    * is intended for use with client-side Javascript applications that make | ||
|  |    * use of HTTPRequest to perform server communication functions - data can | ||
|  |    * be encoded into JSON notation for use in a client-side javascript, or | ||
|  |    * decoded from incoming Javascript requests. JSON format is native to | ||
|  |    * Javascript, and can be directly eval()'ed with no further parsing | ||
|  |    * overhead | ||
|  |    * | ||
|  |    * All strings should be in ASCII or UTF-8 format! | ||
|  |    * | ||
|  |    * LICENSE: Redistribution and use in source and binary forms, with or | ||
|  |    * without modification, are permitted provided that the following | ||
|  |    * conditions are met: Redistributions of source code must retain the | ||
|  |    * above copyright notice, this list of conditions and the following | ||
|  |    * disclaimer. Redistributions in binary form must reproduce the above | ||
|  |    * copyright notice, this list of conditions and the following disclaimer | ||
|  |    * in the documentation and/or other materials provided with the | ||
|  |    * distribution. | ||
|  |    * | ||
|  |    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED | ||
|  |    * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF | ||
|  |    * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN | ||
|  |    * NO EVENT SHALL CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, | ||
|  |    * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, | ||
|  |    * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS | ||
|  |    * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND | ||
|  |    * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR | ||
|  |    * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE | ||
|  |    * USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH | ||
|  |    * DAMAGE. | ||
|  |    * | ||
|  |    * @category | ||
|  |    * @package     Services_JSON | ||
|  |    * @author      Michal Migurski <mike-json@teczno.com> | ||
|  |    * @author      Matt Knapp <mdknapp[at]gmail[dot]com> | ||
|  |    * @author      Brett Stimmerman <brettstimmerman[at]gmail[dot]com> | ||
|  |    * @author      Christoph Dorn <christoph@christophdorn.com> | ||
|  |    * @copyright   2005 Michal Migurski | ||
|  |    * @version     CVS: $Id: JSON.php,v 1.31 2006/06/28 05:54:17 migurski Exp $ | ||
|  |    * @license     http://www.opensource.org/licenses/bsd-license.php | ||
|  |    * @link        http://pear.php.net/pepr/pepr-proposal-show.php?id=198 | ||
|  |    */ | ||
|  |     | ||
|  |       | ||
|  |   /** | ||
|  |    * Keep a list of objects as we descend into the array so we can detect recursion. | ||
|  |    */ | ||
|  |   private $json_objectStack = array(); | ||
|  | 
 | ||
|  | 
 | ||
|  |  /** | ||
|  |   * convert a string from one UTF-8 char to one UTF-16 char | ||
|  |   * | ||
|  |   * Normally should be handled by mb_convert_encoding, but | ||
|  |   * provides a slower PHP-only method for installations | ||
|  |   * that lack the multibye string extension. | ||
|  |   * | ||
|  |   * @param    string  $utf8   UTF-8 character | ||
|  |   * @return   string  UTF-16 character | ||
|  |   * @access   private | ||
|  |   */ | ||
|  |   private function json_utf82utf16($utf8) | ||
|  |   { | ||
|  |       // oh please oh please oh please oh please oh please
 | ||
|  |       if(function_exists('mb_convert_encoding')) { | ||
|  |           return mb_convert_encoding($utf8, 'UTF-16', 'UTF-8'); | ||
|  |       } | ||
|  | 
 | ||
|  |       switch(strlen($utf8)) { | ||
|  |           case 1: | ||
|  |               // this case should never be reached, because we are in ASCII range
 | ||
|  |               // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
 | ||
|  |               return $utf8; | ||
|  | 
 | ||
|  |           case 2: | ||
|  |               // return a UTF-16 character from a 2-byte UTF-8 char
 | ||
|  |               // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
 | ||
|  |               return chr(0x07 & (ord($utf8{0}) >> 2)) | ||
|  |                    . chr((0xC0 & (ord($utf8{0}) << 6)) | ||
|  |                        | (0x3F & ord($utf8{1}))); | ||
|  | 
 | ||
|  |           case 3: | ||
|  |               // return a UTF-16 character from a 3-byte UTF-8 char
 | ||
|  |               // see: http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
 | ||
|  |               return chr((0xF0 & (ord($utf8{0}) << 4)) | ||
|  |                        | (0x0F & (ord($utf8{1}) >> 2))) | ||
|  |                    . chr((0xC0 & (ord($utf8{1}) << 6)) | ||
|  |                        | (0x7F & ord($utf8{2}))); | ||
|  |       } | ||
|  | 
 | ||
|  |       // ignoring UTF-32 for now, sorry
 | ||
|  |       return ''; | ||
|  |   } | ||
|  | 
 | ||
|  |  /** | ||
|  |   * encodes an arbitrary variable into JSON format | ||
|  |   * | ||
|  |   * @param    mixed   $var    any number, boolean, string, array, or object to be encoded. | ||
|  |   *                           see argument 1 to Services_JSON() above for array-parsing behavior. | ||
|  |   *                           if var is a strng, note that encode() always expects it | ||
|  |   *                           to be in ASCII or UTF-8 format! | ||
|  |   * | ||
|  |   * @return   mixed   JSON string representation of input var or an error if a problem occurs | ||
|  |   * @access   public | ||
|  |   */ | ||
|  |   private function json_encode($var) | ||
|  |   { | ||
|  |      | ||
|  |     if(is_object($var)) { | ||
|  |       if(in_array($var,$this->json_objectStack)) { | ||
|  |         return '"** Recursion **"'; | ||
|  |       } | ||
|  |     } | ||
|  |            | ||
|  |       switch (gettype($var)) { | ||
|  |           case 'boolean': | ||
|  |               return $var ? 'true' : 'false'; | ||
|  | 
 | ||
|  |           case 'NULL': | ||
|  |               return 'null'; | ||
|  | 
 | ||
|  |           case 'integer': | ||
|  |               return (int) $var; | ||
|  | 
 | ||
|  |           case 'double': | ||
|  |           case 'float': | ||
|  |               return (float) $var; | ||
|  | 
 | ||
|  |           case 'string': | ||
|  |               // STRINGS ARE EXPECTED TO BE IN ASCII OR UTF-8 FORMAT
 | ||
|  |               $ascii = ''; | ||
|  |               $strlen_var = strlen($var); | ||
|  | 
 | ||
|  |              /* | ||
|  |               * Iterate over every character in the string, | ||
|  |               * escaping with a slash or encoding to UTF-8 where necessary | ||
|  |               */ | ||
|  |               for ($c = 0; $c < $strlen_var; ++$c) { | ||
|  | 
 | ||
|  |                   $ord_var_c = ord($var{$c}); | ||
|  | 
 | ||
|  |                   switch (true) { | ||
|  |                       case $ord_var_c == 0x08: | ||
|  |                           $ascii .= '\b'; | ||
|  |                           break; | ||
|  |                       case $ord_var_c == 0x09: | ||
|  |                           $ascii .= '\t'; | ||
|  |                           break; | ||
|  |                       case $ord_var_c == 0x0A: | ||
|  |                           $ascii .= '\n'; | ||
|  |                           break; | ||
|  |                       case $ord_var_c == 0x0C: | ||
|  |                           $ascii .= '\f'; | ||
|  |                           break; | ||
|  |                       case $ord_var_c == 0x0D: | ||
|  |                           $ascii .= '\r'; | ||
|  |                           break; | ||
|  | 
 | ||
|  |                       case $ord_var_c == 0x22: | ||
|  |                       case $ord_var_c == 0x2F: | ||
|  |                       case $ord_var_c == 0x5C: | ||
|  |                           // double quote, slash, slosh
 | ||
|  |                           $ascii .= '\\'.$var{$c}; | ||
|  |                           break; | ||
|  | 
 | ||
|  |                       case (($ord_var_c >= 0x20) && ($ord_var_c <= 0x7F)): | ||
|  |                           // characters U-00000000 - U-0000007F (same as ASCII)
 | ||
|  |                           $ascii .= $var{$c}; | ||
|  |                           break; | ||
|  | 
 | ||
|  |                       case (($ord_var_c & 0xE0) == 0xC0): | ||
|  |                           // characters U-00000080 - U-000007FF, mask 110XXXXX
 | ||
|  |                           // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
 | ||
|  |                           $char = pack('C*', $ord_var_c, ord($var{$c + 1})); | ||
|  |                           $c += 1; | ||
|  |                           $utf16 = $this->json_utf82utf16($char); | ||
|  |                           $ascii .= sprintf('\u%04s', bin2hex($utf16)); | ||
|  |                           break; | ||
|  | 
 | ||
|  |                       case (($ord_var_c & 0xF0) == 0xE0): | ||
|  |                           // characters U-00000800 - U-0000FFFF, mask 1110XXXX
 | ||
|  |                           // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
 | ||
|  |                           $char = pack('C*', $ord_var_c, | ||
|  |                                        ord($var{$c + 1}), | ||
|  |                                        ord($var{$c + 2})); | ||
|  |                           $c += 2; | ||
|  |                           $utf16 = $this->json_utf82utf16($char); | ||
|  |                           $ascii .= sprintf('\u%04s', bin2hex($utf16)); | ||
|  |                           break; | ||
|  | 
 | ||
|  |                       case (($ord_var_c & 0xF8) == 0xF0): | ||
|  |                           // characters U-00010000 - U-001FFFFF, mask 11110XXX
 | ||
|  |                           // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
 | ||
|  |                           $char = pack('C*', $ord_var_c, | ||
|  |                                        ord($var{$c + 1}), | ||
|  |                                        ord($var{$c + 2}), | ||
|  |                                        ord($var{$c + 3})); | ||
|  |                           $c += 3; | ||
|  |                           $utf16 = $this->json_utf82utf16($char); | ||
|  |                           $ascii .= sprintf('\u%04s', bin2hex($utf16)); | ||
|  |                           break; | ||
|  | 
 | ||
|  |                       case (($ord_var_c & 0xFC) == 0xF8): | ||
|  |                           // characters U-00200000 - U-03FFFFFF, mask 111110XX
 | ||
|  |                           // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
 | ||
|  |                           $char = pack('C*', $ord_var_c, | ||
|  |                                        ord($var{$c + 1}), | ||
|  |                                        ord($var{$c + 2}), | ||
|  |                                        ord($var{$c + 3}), | ||
|  |                                        ord($var{$c + 4})); | ||
|  |                           $c += 4; | ||
|  |                           $utf16 = $this->json_utf82utf16($char); | ||
|  |                           $ascii .= sprintf('\u%04s', bin2hex($utf16)); | ||
|  |                           break; | ||
|  | 
 | ||
|  |                       case (($ord_var_c & 0xFE) == 0xFC): | ||
|  |                           // characters U-04000000 - U-7FFFFFFF, mask 1111110X
 | ||
|  |                           // see http://www.cl.cam.ac.uk/~mgk25/unicode.html#utf-8
 | ||
|  |                           $char = pack('C*', $ord_var_c, | ||
|  |                                        ord($var{$c + 1}), | ||
|  |                                        ord($var{$c + 2}), | ||
|  |                                        ord($var{$c + 3}), | ||
|  |                                        ord($var{$c + 4}), | ||
|  |                                        ord($var{$c + 5})); | ||
|  |                           $c += 5; | ||
|  |                           $utf16 = $this->json_utf82utf16($char); | ||
|  |                           $ascii .= sprintf('\u%04s', bin2hex($utf16)); | ||
|  |                           break; | ||
|  |                   } | ||
|  |               } | ||
|  | 
 | ||
|  |               return '"'.$ascii.'"'; | ||
|  | 
 | ||
|  |           case 'array': | ||
|  |              /* | ||
|  |               * As per JSON spec if any array key is not an integer | ||
|  |               * we must treat the the whole array as an object. We | ||
|  |               * also try to catch a sparsely populated associative | ||
|  |               * array with numeric keys here because some JS engines | ||
|  |               * will create an array with empty indexes up to | ||
|  |               * max_index which can cause memory issues and because | ||
|  |               * the keys, which may be relevant, will be remapped | ||
|  |               * otherwise. | ||
|  |               * | ||
|  |               * As per the ECMA and JSON specification an object may | ||
|  |               * have any string as a property. Unfortunately due to | ||
|  |               * a hole in the ECMA specification if the key is a | ||
|  |               * ECMA reserved word or starts with a digit the | ||
|  |               * parameter is only accessible using ECMAScript's | ||
|  |               * bracket notation. | ||
|  |               */ | ||
|  | 
 | ||
|  |               // treat as a JSON object
 | ||
|  |               if (is_array($var) && count($var) && (array_keys($var) !== range(0, sizeof($var) - 1))) { | ||
|  |                    | ||
|  |                   $this->json_objectStack[] = $var; | ||
|  | 
 | ||
|  |                   $properties = array_map(array($this, 'json_name_value'), | ||
|  |                                           array_keys($var), | ||
|  |                                           array_values($var)); | ||
|  | 
 | ||
|  |                   array_pop($this->json_objectStack); | ||
|  | 
 | ||
|  |                   foreach($properties as $property) { | ||
|  |                       if($property instanceof Exception) { | ||
|  |                           return $property; | ||
|  |                       } | ||
|  |                   } | ||
|  | 
 | ||
|  |                   return '{' . join(',', $properties) . '}'; | ||
|  |               } | ||
|  | 
 | ||
|  |               $this->json_objectStack[] = $var; | ||
|  | 
 | ||
|  |               // treat it like a regular array
 | ||
|  |               $elements = array_map(array($this, 'json_encode'), $var); | ||
|  | 
 | ||
|  |               array_pop($this->json_objectStack); | ||
|  | 
 | ||
|  |               foreach($elements as $element) { | ||
|  |                   if($element instanceof Exception) { | ||
|  |                       return $element; | ||
|  |                   } | ||
|  |               } | ||
|  | 
 | ||
|  |               return '[' . join(',', $elements) . ']'; | ||
|  | 
 | ||
|  |           case 'object': | ||
|  |               $vars = self::encodeObject($var); | ||
|  | 
 | ||
|  |               $this->json_objectStack[] = $var; | ||
|  | 
 | ||
|  |               $properties = array_map(array($this, 'json_name_value'), | ||
|  |                                       array_keys($vars), | ||
|  |                                       array_values($vars)); | ||
|  | 
 | ||
|  |               array_pop($this->json_objectStack); | ||
|  |                | ||
|  |               foreach($properties as $property) { | ||
|  |                   if($property instanceof Exception) { | ||
|  |                       return $property; | ||
|  |                   } | ||
|  |               } | ||
|  |                       | ||
|  |               return '{' . join(',', $properties) . '}'; | ||
|  | 
 | ||
|  |           default: | ||
|  |               return null; | ||
|  |       } | ||
|  |   } | ||
|  | 
 | ||
|  |  /** | ||
|  |   * array-walking function for use in generating JSON-formatted name-value pairs | ||
|  |   * | ||
|  |   * @param    string  $name   name of key to use | ||
|  |   * @param    mixed   $value  reference to an array element to be encoded | ||
|  |   * | ||
|  |   * @return   string  JSON-formatted name-value pair, like '"name":value' | ||
|  |   * @access   private | ||
|  |   */ | ||
|  |   private function json_name_value($name, $value) | ||
|  |   { | ||
|  |       // Encoding the $GLOBALS PHP array causes an infinite loop
 | ||
|  |       // if the recursion is not reset here as it contains
 | ||
|  |       // a reference to itself. This is the only way I have come up
 | ||
|  |       // with to stop infinite recursion in this case.
 | ||
|  |       if($name=='GLOBALS' | ||
|  |          && is_array($value) | ||
|  |          && array_key_exists('GLOBALS',$value)) { | ||
|  |         $value['GLOBALS'] = '** Recursion **'; | ||
|  |       } | ||
|  |      | ||
|  |       $encoded_value = $this->json_encode($value); | ||
|  | 
 | ||
|  |       if($encoded_value instanceof Exception) { | ||
|  |           return $encoded_value; | ||
|  |       } | ||
|  | 
 | ||
|  |       return $this->json_encode(strval($name)) . ':' . $encoded_value; | ||
|  |   } | ||
|  | } |