in-portal
No OneTemporary
Actions

Subscribers

None

File Metadata

Created: Sat, Feb 22, 12:05 AM

in-portal
View Options

	Index: branches/5.3.x/core/kernel/utility/http_query.php
	===================================================================
	--- branches/5.3.x/core/kernel/utility/http_query.php (revision 16729)
	+++ branches/5.3.x/core/kernel/utility/http_query.php (revision 16730)
	@@ -1,806 +1,811 @@
	<?php
	/**
	* @version $Id$
	* @package In-Portal
	* @copyright Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
	* @license GNU/GPL
	* In-Portal is Open Source software.
	* This means that this software may have been modified pursuant
	* the GNU General Public License, and as distributed it includes
	* or is derivative of works licensed under the GNU General Public License
	* or other free or open source software licenses.
	* See http://www.in-portal.org/license for copyright notices and details.
	*/

	defined('FULL_PATH') or die('restricted access!');

	class kHTTPQuery extends Params {

	/**
	* Cache of QueryString parameters
	* from config, that are represented
	* in environment variable
	*
	* @var Array
	*/
	protected $discoveredUnits = Array ();

	/**
	* $_POST vars
	*
	* @var Array
	* @access private
	*/
	var $Post;

	/**
	* $_GET vars
	*
	* @var Array
	* @access private
	*/
	var $Get;

	/**
	* $_COOKIE vars
	*
	* @var Array
	* @access private
	*/
	- var $Cookie;
	+ var $Cookie = array();

	/**
	* $_SERVER vars
	*
	* @var Array
	* @access private
	*/
	var $Server;

	/**
	* $_ENV vars
	*
	* @var Array
	* @access private
	*/
	var $Env;

	/**
	* Order in what write
	* all vars together in
	* the same array
	*
	* @var string
	*/
	var $Order;

	/**
	* Uploaded files info
	*
	* @var Array
	* @access private
	*/
	var $Files;

	var $specialsToRemove = Array();

	/**
	* SessionID is given via "sid" variable in query string
	*
	* @var bool
	*/
	var $_sidInQueryString = false;

	/**
	* Trust information, provided by proxy
	*
	* @var bool
	*/
	protected $_trustProxy = false;

	/**
	* Loads info from $_POST, $_GET and related arrays into common place.
	*
	* @param string $order Order.
	*
	* @throws RuntimeException When "Proxy" header is present in Web Request.
	*/
	public function __construct($order = 'CGPF')
	{
	parent::__construct();

	+ // Don't process cookies from CLI.
	+ if ( PHP_SAPI === 'cli' ) {
	+ $order = str_replace('C', '', $order);
	+ }
	+
	$this->Order = $order;

	if ( isset($_SERVER['HTTP_PROXY']) && PHP_SAPI !== 'cli' ) {
	throw new RuntimeException('Web Requests with "Proxy" header are forbidden.');
	}

	if ( isset($_SERVER['HTTP_X_REQUESTED_WITH']) && $_SERVER['HTTP_X_REQUESTED_WITH'] == 'XMLHttpRequest' ) {
	// When AJAX request is made from jQuery, then create ajax variable,
	// so any logic based in it (like redirects) will not break down.
	$_GET['ajax'] = 'yes';
	}

	$this->_trustProxy = kUtil::getSystemConfig()->get('TrustProxy');
	}

	/**
	* Discovers unit form request and returns it's QueryString option on success
	*
	* @param string $prefix_special
	*
	* @return Array\|bool
	* @access public
	*/
	public function discoverUnit($prefix_special)
	{
	list($prefix) = explode('.', $prefix_special);

	$query_string = $this->getQueryString($prefix);

	if ($query_string) {
	// only units with QueryString option can be discovered
	$this->discoveredUnits[$prefix_special] = $query_string;

	return $query_string;
	}

	unset( $this->discoveredUnits[$prefix] );

	return false;
	}

	/**
	* Returns units, passed in request
	*
	* @param bool $prefix_special_only
	* @return Array
	* @access protected
	*/
	public function getDiscoveredUnits($prefix_special_only = true)
	{
	return $prefix_special_only ? array_keys( $this->discoveredUnits ) : $this->discoveredUnits;
	}

	/**
	* Returns QueryMap for requested unit config.
	* In case if unit config is a clone, then get parent item's (from prefix) config to create clone
	*
	* @param string $prefix
	* @return Array
	* @access protected
	*/
	protected function getQueryString($prefix)
	{
	return $this->Application->getUnitConfig($prefix)->getQueryString(Array ());
	}

	/**
	* Removes specials from request
	*
	* @param Array $array
	* @return Array
	* @access protected
	*/
	protected function _removeSpecials($array)
	{
	$ret = Array ();
	$removed = false;

	foreach ($this->specialsToRemove as $prefix_special => $flag) {
	if ( $flag ) {
	$removed = true;
	list ($prefix, $special) = explode('.', $prefix_special, 2);

	foreach ($array as $key => $val) {
	$new_key = preg_match("/^" . $prefix . "[._]{1}" . $special . "(.*)/", $key, $regs) ? $prefix . $regs[1] : $key;
	$ret[$new_key] = is_array($val) ? $this->_removeSpecials($val) : $val;
	}
	}
	}

	return $removed ? $ret : $array;
	}

	public function process()
	{
	$this->AddAllVars();
	$this->removeSpecials();
	ini_set('magic_quotes_gpc', 0);

	$this->Application->UrlManager->LoadStructureTemplateMapping();

	$this->AfterInit();
	}

	/**
	* All all requested vars to
	* common storage place
	*
	* @return void
	* @access protected
	*/
	protected function AddAllVars()
	{
	for ($i = 0; $i < strlen($this->Order); $i++) {
	switch ($this->Order[$i]) {
	case 'G':
	$this->Get = $this->AddVars($_GET);
	if ( array_key_exists('sid', $_GET) ) {
	$this->_sidInQueryString = true;
	}

	$vars = $this->Application->processQueryString($this->Get(ENV_VAR_NAME));

	if ( array_key_exists('sid', $vars) ) {
	// used by Session::GetPassedSIDValue
	$this->Get['sid'] = $vars['sid'];
	}

	$this->AddParams($vars);
	break;

	case 'P':
	$this->Post = $this->AddVars($_POST);
	$this->convertPostEvents();
	$this->_processPostEnvVariables();
	break;

	case 'C':
	$cookie_hasher = $this->Application->makeClass('kCookieHasher');
	/* @var $cookie_hasher kCookieHasher */

	$parsed_cookies = Array ();

	foreach ($_COOKIE as $cookie_name => $encrypted_value) {
	$parsed_cookies[$cookie_name] = $cookie_hasher->decrypt($cookie_name, $encrypted_value);
	}

	$this->Cookie = $this->AddVars($parsed_cookies);
	break;

	/*case 'E';
	$this->Env = $this->AddVars($_ENV, false); //do not strip slashes!
	break;

	case 'S';
	$this->Server = $this->AddVars($_SERVER, false); //do not strip slashes!
	break;*/

	case 'F';
	$this->convertFiles();
	$this->Files = $this->MergeVars($_FILES); // , false); //do not strip slashes!
	break;
	}
	}
	}

	/**
	* Allow POST variables, that names were transformed by PHP ("." replaced with "_") to
	* override variables, that were virtually created through environment variable parsing
	*
	*/
	function _processPostEnvVariables()
	{
	$passed = $this->Get('passed');
	if ( !$passed ) {
	return;
	}

	$passed = explode(',', $passed);
	foreach ($passed as $prefix_special) {
	if ( strpos($prefix_special, '.') === false ) {
	continue;
	}

	list ($prefix, $special) = explode('.', $prefix_special);
	$query_map = $this->getQueryString($prefix);
	$post_prefix_special = $prefix . '_' . $special;

	foreach ($query_map as $var_name) {
	if ( array_key_exists($post_prefix_special . '_' . $var_name, $this->Post) ) {
	$this->Set($prefix_special . '_' . $var_name, $this->Post[$post_prefix_special . '_' . $var_name]);
	}
	}
	}
	}

	/**
	* Removes requested specials from all request variables
	*
	* @return void
	* @access protected
	*/
	protected function removeSpecials()
	{
	$this->specialsToRemove = $this->Get('remove_specials');

	if ( $this->specialsToRemove ) {
	foreach ($this->specialsToRemove as $prefix_special => $flag) {
	if ( $flag && strpos($prefix_special, '.') === false ) {
	unset($this->specialsToRemove[$prefix_special]);
	trigger_error('Incorrect usage of "<strong>remove_specials[' . $prefix_special . ']</strong>" field (no special found)', E_USER_NOTICE);
	}
	}

	$this->_Params = $this->_removeSpecials($this->_Params);
	}
	}

	/**
	* Finishes initialization of kHTTPQuery class.
	*
	* @return void
	*/
	protected function AfterInit()
	{
	$rewrite_url = $this->Get('_mod_rw_url_');

	if ( $this->Application->RewriteURLs() \|\| $rewrite_url ) {
	// maybe call onafterconfigread here

	$this->Application->UrlManager->initRewrite();

	if ( defined('DEBUG_MODE') && $this->Application->isDebugMode() ) {
	$this->Application->Debugger->profileStart('url_parsing', 'Parsing <b>MOD_REWRITE</b> url');
	$this->Application->UrlManager->rewrite->parseRewriteURL();
	$description = 'Parsing <b>MOD_REWRITE</b> url (template: <b>' . $this->Get('t') . '</b>)';
	$this->Application->Debugger->profileFinish('url_parsing', $description);
	}
	else {
	$this->Application->UrlManager->rewrite->parseRewriteURL();
	}

	if ( !$rewrite_url && $this->rewriteRedirectRequired() ) {
	// rewrite url is missing (e.g. not a script from tools folder)
	$url_params = $this->getRedirectParams();

	// no idea about how to check, that given template require category to be passed with it, so pass anyway
	$url_params['pass_category'] = 1;
	$url_params['response_code'] = 301; // Moved Permanently

	trigger_error('Non mod-rewrite url "<strong>' . $_SERVER['REQUEST_URI'] . '</strong>" used', E_USER_NOTICE);
	$this->Application->Redirect('', $url_params);
	}

	if ( $this->Application->GetVar('is_friendly_url') ) {
	$url_params = $this->getRedirectParams();

	// No idea about how to check, that given template
	// require category to be passed with it, so pass anyway.
	$url_params['pass_category'] = 1;

	$this->Application->Redirect('', $url_params);
	}
	}
	else {
	$this->Application->VerifyThemeId();
	$this->Application->VerifyLanguageId();
	}

	$virtual_template = $this->Application->getVirtualPageTemplate($this->Get('m_cat_id'));

	if ( ($virtual_template !== false) && preg_match('/external:(.*)/', $virtual_template) ) {
	trigger_error('URL of page, that has "External URL" set was accessed: "<strong>' . $_SERVER['REQUEST_URI'] . '</strong>"', E_USER_NOTICE);
	$this->Application->Redirect($virtual_template);
	}

	if ( !$this->Application->isAdmin && $this->Application->ConfigValue('ForceCanonicalUrls') ) {
	$template = $this->Application->GetVar('t');
	$seo_template = $this->Application->getSeoTemplate($template);

	if ( $seo_template && $seo_template != $template ) {
	$url_params = $this->getRedirectParams();
	$url_params['response_code'] = 301;

	trigger_error('Request url "<strong>' . $_SERVER['REQUEST_URI'] . '</strong>" points directly to physical template', E_USER_NOTICE);
	$this->Application->Redirect($seo_template, $url_params);
	}
	}
	}

	/**
	* Checks, that non-rewrite url was visited and it's automatic rewrite is required
	*
	* @return bool
	*/
	function rewriteRedirectRequired()
	{
	$redirect_conditions = Array (
	!$this->IsHTTPSRedirect(), // not https <-> http redirect
	!$this->refererIsOurSite(), // referer doesn't match ssl path or non-ssl domain (same for site domains)
	!defined('GW_NOTIFY'), // not in payment gateway notification script
	preg_match('/[\/]{0,1}index.php[\/]{0,1}/', $_SERVER['PHP_SELF']), // "index.php" was visited
	$this->Get('t') != 'index', // not on index page
	);

	$perform_redirect = true;

	foreach ($redirect_conditions as $redirect_condition) {
	$perform_redirect = $perform_redirect && $redirect_condition;

	if (!$perform_redirect) {
	return false;
	}
	}

	return true;
	}

	/**
	* This is redirect from https to http or via versa
	*
	* @return bool
	*/
	function IsHTTPSRedirect()
	{
	$http_referer = array_key_exists('HTTP_REFERER', $_SERVER) ? $_SERVER['HTTP_REFERER'] : false;

	return (
	( PROTOCOL == 'https://' && preg_match('#http:\/\/#', $http_referer) )
	\|\|
	( PROTOCOL == 'http://' && preg_match('#https:\/\/#', $http_referer) )
	);
	}

	/**
	* Checks, that referer is out site
	*
	* @return bool
	*/
	function refererIsOurSite()
	{
	if ( !array_key_exists('HTTP_REFERER', $_SERVER) ) {
	// no referer -> don't care what happens
	return false;
	}

	/** @var SiteHelper $site_helper */
	$site_helper = $this->Application->recallObject('SiteHelper');

	$parsed_url = parse_url($_SERVER['HTTP_REFERER']);

	if ( $parsed_url['scheme'] == 'https' ) {
	$found = $site_helper->compare($parsed_url['host'], 'SSLDomainName', $this->Application->ConfigValue('SSLDomain'));
	}
	else {
	$found = $site_helper->compare($parsed_url['host'], 'DomainName', DOMAIN);
	}

	return $found;
	}

	function convertFiles()
	{
	if ( !$_FILES ) {
	return ;
	}

	$tmp = Array ();
	$file_keys = Array ('error', 'name', 'size', 'tmp_name', 'type');

	foreach ($_FILES as $file_name => $file_info) {
	if ( is_array($file_info['error']) ) {
	$tmp[$file_name] = $this->getArrayLevel($file_info['error'], $file_name);
	}
	else {
	$normal_files[$file_name] = $file_info;
	}
	}

	if ( !$tmp ) {
	return ;
	}

	$files = $_FILES;
	$_FILES = Array ();

	foreach ($tmp as $prefix => $prefix_files) {
	$anchor =& $_FILES;
	foreach ($prefix_files['keys'] as $key) {
	$anchor =& $anchor[$key];
	}

	foreach ($prefix_files['value'] as $field_name) {
	unset($inner_anchor, $copy);
	$work_copy = $prefix_files['keys'];

	foreach ($file_keys as $file_key) {
	$inner_anchor =& $files[$prefix][$file_key];

	if ( isset($copy) ) {
	$work_copy = $copy;
	}
	else {
	$copy = $work_copy;
	}

	array_shift($work_copy);
	foreach ($work_copy as $prefix_file_key) {
	$inner_anchor =& $inner_anchor[$prefix_file_key];
	}

	$anchor[$field_name][$file_key] = $inner_anchor[$field_name];
	}
	}
	}
	// keys: img_temp, 0, values: LocalPath, ThumbPath
	}

	function getArrayLevel(&$level, $prefix='')
	{
	$ret['keys'] = $prefix ? Array($prefix) : Array();
	$ret['value'] = Array();

	foreach($level as $level_key => $level_value)
	{
	if( is_array($level_value) )
	{
	$ret['keys'][] = $level_key;
	$tmp = $this->getArrayLevel($level_value);

	$ret['keys'] = array_merge($ret['keys'], $tmp['keys']);
	$ret['value'] = array_merge($ret['value'], $tmp['value']);
	}
	else
	{
	$ret['value'][] = $level_key;
	}
	}

	return $ret;
	}

	/**
	* Overwrites GET events with POST events in case if they are set and not empty
	*
	* @return void
	* @access protected
	*/
	protected function convertPostEvents()
	{
	/** @var Array $events */
	$events = $this->Get('events', Array ());

	if ( is_array($events) ) {
	$events = array_filter($events);

	foreach ($events as $prefix_special => $event_name) {
	$this->Set($prefix_special . '_event', $event_name);
	}
	}
	}

	function finalizeParsing($passed = Array())
	{
	if (!$passed) {
	return;
	}

	foreach ($passed as $passed_prefix) {
	$this->discoverUnit($passed_prefix); // from mod-rewrite url parsing
	}

	$this->Set('passed', implode(',', $this->getDiscoveredUnits()));
	}

	/**
	* Saves variables from array specified
	* into common variable storage place
	*
	* @param Array $array
	* @param bool $strip_slashes
	* @return Array
	* @access private
	*/
	function AddVars($array, $strip_slashes = true)
	{
	if ( $strip_slashes ) {
	$array = $this->StripSlashes($array);
	}

	foreach ($array as $key => $value) {
	$this->Set($key, $value);
	}

	return $array;
	}

	function MergeVars($array, $strip_slashes = true)
	{
	if ( $strip_slashes ) {
	$array = $this->StripSlashes($array);
	}

	foreach ($array as $key => $value_array) {
	// $value_array is an array too
	$this->_Params = kUtil::array_merge_recursive($this->_Params, Array ($key => $value_array));
	}

	return $array;
	}

	function StripSlashes($array)
	{
	static $magic_quotes = null;

	if (!isset($magic_quotes)) {
	$magic_quotes = get_magic_quotes_gpc();
	}

	foreach ($array as $key => $value) {
	if (is_array($value)) {
	$array[$key] = $this->StripSlashes($value);
	}
	else {
	if ($magic_quotes) {
	$value = stripslashes($value);
	}

	if (!$this->Application->isAdmin) {
	// TODO: always escape output instead of input
	$value = kUtil::escape($value, kUtil::ESCAPE_HTML);
	}

	$array[$key] = $value;
	}
	}

	return $array;
	}

	/**
	* Removes forceful escaping done to the variable upon Front-End submission.
	*
	* @param string\|array $value Value.
	*
	* @return string\|array
	* @see StripSlashes
	*/
	public function unescapeRequestVariable($value)
	{
	if ( $this->Application->isAdmin ) {
	return $value;
	}

	// This allows to revert kUtil::escape() call for each field submitted on front-end.
	if ( is_array($value) ) {
	foreach ( $value as $param_name => $param_value ) {
	$value[$param_name] = $this->unescapeRequestVariable($param_value);
	}

	return $value;
	}

	return kUtil::unescape($value, kUtil::ESCAPE_HTML);
	}

	/**
	* Returns all $_GET array excluding system parameters, that are not allowed to be passed through generated urls
	*
	* @param bool $access_error Method is called during no_permission, require login, session expiration link preparation
	* @return Array
	*/
	function getRedirectParams($access_error = false)
	{
	$vars = $this->Get;
	$unset_vars = Array (ENV_VAR_NAME, 'rewrite', '_mod_rw_url_', 'Action');

	if (!$this->_sidInQueryString) {
	$unset_vars[] = 'sid';
	}

	// remove system variables
	foreach ($unset_vars as $var_name) {
	if (array_key_exists($var_name, $vars)) {
	unset($vars[$var_name]);
	}
	}

	if ($access_error) {
	// place 1 of 2 (also in UsersEventHandler::OnSessionExpire)
	$vars = $this->_removePassThroughVariables($vars);
	}

	return $vars;
	}

	/**
	* Removes all pass_though variables from redirect params
	*
	* @param Array $url_params
	* @return Array
	*/
	function _removePassThroughVariables($url_params)
	{
	$pass_through = array_key_exists('pass_through', $url_params) ? $url_params['pass_through'] : '';
	if (!$pass_through) {
	return $url_params;
	}

	$pass_through = explode(',', $pass_through . ',pass_through');
	foreach ($pass_through as $pass_through_var) {
	unset($url_params[$pass_through_var]);
	}

	$url_params['no_pass_through'] = 1; // this way kApplication::HREF won't add them again

	return $url_params;
	}

	/**
	* Checks, that url is empty
	*
	* @return bool
	* @access public
	*/
	public function isEmptyUrl()
	{
	if ( $this->Application->RewriteURLs() ) {
	return !$this->Get('_mod_rw_url_');
	}

	return !count($this->Get);
	}

	/**
	* Returns the client IP address.
	*
	* @return string The client IP address
	* @access public
	*/
	public function getClientIp()
	{
	if ( $this->_trustProxy ) {
	if ( array_key_exists('HTTP_CLIENT_IP', $_SERVER) ) {
	return $_SERVER['HTTP_CLIENT_IP'];
	}

	if ( array_key_exists('HTTP_X_FORWARDED_FOR', $_SERVER) ) {
	$client_ip = explode(',', $_SERVER['HTTP_X_FORWARDED_FOR']);

	foreach ($client_ip as $ip_address) {
	$clean_ip_address = trim($ip_address);

	if ( false !== filter_var($clean_ip_address, FILTER_VALIDATE_IP) ) {
	return $clean_ip_address;
	}
	}

	return '';
	}
	}

	return isset($_SERVER['REMOTE_ADDR']) ? $_SERVER['REMOTE_ADDR'] : '';
	}

	/**
	* Returns headers
	*
	* @return array
	* @access public
	*/
	public function getHeaders()
	{
	if ( function_exists('apache_request_headers') ) {
	// If apache_request_headers() exists...
	$headers = apache_request_headers();

	if ( $headers ) {
	return $headers; // And works... Use it
	}
	}

	$headers = array();

	foreach ( array_keys($_SERVER) as $server_key ) {
	if ( substr($server_key, 0, 5) == 'HTTP_' ) {
	$header_name = str_replace(' ', '-', ucwords(strtolower(str_replace('_', ' ', substr($server_key, 0, 5)))));
	$headers[$header_name] = $_SERVER[$server_key];
	}
	}

	return $headers;
	}

	}
	Index: branches/5.3.x/core/kernel/utility/debugger.php
	===================================================================
	--- branches/5.3.x/core/kernel/utility/debugger.php (revision 16729)
	+++ branches/5.3.x/core/kernel/utility/debugger.php (revision 16730)
	@@ -1,2144 +1,2193 @@
	<?php
	/**
	* @version $Id$
	* @package In-Portal
	* @copyright Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
	* @license GNU/GPL
	* In-Portal is Open Source software.
	* This means that this software may have been modified pursuant
	* the GNU General Public License, and as distributed it includes
	* or is derivative of works licensed under the GNU General Public License
	* or other free or open source software licenses.
	* See http://www.in-portal.org/license for copyright notices and details.
	*/

	defined('FULL_PATH') or die('restricted access!');

	if( !class_exists('Debugger') ) {

	/**
	* Contains misc functions, used by debugger (mostly copied from kUtil class)
	*/
	class DebuggerUtil {

	/**
	* Trust information, provided by proxy
	*
	* @var bool
	*/
	public static $trustProxy = false;

	/**
	* Checks if constant is defined and has positive value
	*
	* @param string $const_name
	* @return bool
	*/
	public static function constOn($const_name)
	{
	return defined($const_name) && constant($const_name);
	}

	/**
	* Define constant if it was not already defined before
	*
	* @param string $const_name
	* @param string $const_value
	* @access public
	*/
	public static function safeDefine($const_name, $const_value)
	{
	if ( !defined($const_name) ) {
	define($const_name, $const_value);
	}
	}

	/**
	* Formats file/memory size in nice way
	*
	* @param int $bytes
	* @return string
	* @access public
	*/
	public static function formatSize($bytes)
	{
	if ($bytes >= 1099511627776) {
	$return = round($bytes / 1024 / 1024 / 1024 / 1024, 2);
	$suffix = "TB";
	} elseif ($bytes >= 1073741824) {
	$return = round($bytes / 1024 / 1024 / 1024, 2);
	$suffix = "GB";
	} elseif ($bytes >= 1048576) {
	$return = round($bytes / 1024 / 1024, 2);
	$suffix = "MB";
	} elseif ($bytes >= 1024) {
	$return = round($bytes / 1024, 2);
	$suffix = "KB";
	} else {
	$return = $bytes;
	$suffix = "Byte";
	}

	$return .= ' '.$suffix;

	return $return;
	}

	/**
	* Checks, that user IP address is within allowed range
	*
	* @param string $ip_list semi-column (by default) separated ip address list
	* @param string $separator ip address separator (default ";")
	*
	* @return bool
	*/
	public static function ipMatch($ip_list, $separator = ';')
	{
	if ( php_sapi_name() == 'cli' ) {
	return false;
	}

	$ip_match = false;
	$ip_addresses = $ip_list ? explode($separator, $ip_list) : Array ();
	$client_ip = self::getClientIp();

	foreach ($ip_addresses as $ip_address) {
	if ( self::netMatch($ip_address, $client_ip) ) {
	$ip_match = true;
	break;
	}
	}

	return $ip_match;
	}

	/**
	* Returns the client IP address.
	*
	* @return string The client IP address
	* @access public
	*/
	public static function getClientIp()
	{
	if ( self::$trustProxy ) {
	if ( array_key_exists('HTTP_CLIENT_IP', $_SERVER) ) {
	return $_SERVER['HTTP_CLIENT_IP'];
	}

	if ( array_key_exists('HTTP_X_FORWARDED_FOR', $_SERVER) ) {
	$client_ip = explode(',', $_SERVER['HTTP_X_FORWARDED_FOR']);

	foreach ($client_ip as $ip_address) {
	$clean_ip_address = trim($ip_address);

	if ( false !== filter_var($clean_ip_address, FILTER_VALIDATE_IP) ) {
	return $clean_ip_address;
	}
	}

	return '';
	}
	}

	return $_SERVER['REMOTE_ADDR'];
	}

	/**
	* Checks, that given ip belongs to given subnet
	*
	* @param string $network
	* @param string $ip
	* @return bool
	* @access public
	*/
	public static function netMatch($network, $ip) {

	$network = trim($network);
	$ip = trim($ip);

	if ( preg_replace('/[\d\.\/-]/', '', $network) != '' ) {
	$network = gethostbyname($network);
	}

	if ($network == $ip) {
	// comparing two ip addresses directly
	return true;
	}

	$d = strpos($network, '-');
	if ($d !== false) {
	// ip address range specified
	$from = ip2long(trim(substr($network, 0, $d)));
	$to = ip2long(trim(substr($network, $d + 1)));

	$ip = ip2long($ip);
	return ($ip >= $from && $ip <= $to);
	}
	elseif (strpos($network, '/') !== false) {
	// single subnet specified
	$ip_arr = explode('/', $network);

	if (!preg_match("@\d\.\d\.\d\.\d@", $ip_arr[0], $matches)) {
	$ip_arr[0] .= '.0'; // Alternate form 194.1.4/24
	}

	$network_long = ip2long($ip_arr[0]);
	$x = ip2long($ip_arr[1]);

	$mask = long2ip($x) == $ip_arr[1] ? $x : (0xffffffff << (32 - $ip_arr[1]));
	$ip_long = ip2long($ip);

	return ($ip_long & $mask) == ($network_long & $mask);
	}

	return false;
	}
	}

	/**
	* Main debugger class, that can be used with any In-Portal (or not) project
	*/
	class Debugger {

	const ROW_TYPE_ERROR = 'error';

	const ROW_TYPE_WARNING = 'warning';

	const ROW_TYPE_NOTICE = 'notice';

	const ROW_TYPE_SQL = 'sql';

	const ROW_TYPE_OTHER = 'other';

	/**
	* Holds reference to global KernelApplication instance
	*
	* @var kApplication
	* @access private
	*/
	private $Application = null;

	/**
	* Stores last fatal error hash or 0, when no fatal error happened
	*
	* @var integer
	*/
	private $_fatalErrorHash = 0;

	private $_filterTypes = Array ('error', 'sql', 'other');

	/**
	* Counts warnings on the page
	*
	* @var int
	* @access public
	*/
	public $WarningCount = 0;

	/**
	* Allows to track compile errors, like "stack-overflow"
	*
	* @var bool
	* @access private
	*/
	private $_compileError = false;

	/**
	* Debugger data for building report
	*
	* @var Array
	* @access private
	*/
	private $Data = Array ();

	/**
	+ * Data index, that represents a header ending.
	+ *
	+ * @var integer
	+ */
	+ private $HeaderEndingDataIndex = 0;
	+
	+ /**
	* Holds information about each profiler record (start/end/description)
	*
	* @var Array
	* @access private
	*/
	private $ProfilerData = Array ();

	/**
	* Holds information about total execution time per profiler key (e.g. total sql time)
	*
	* @var Array
	* @access private
	*/
	private $ProfilerTotals = Array ();

	/**
	* Counts how much each of total types were called (e.g. total error count)
	*
	* @var Array
	* @access private
	*/
	private $ProfilerTotalCount = Array ();

	/**
	* Holds information about all profile points registered
	*
	* @var Array
	* @access private
	*/
	private $ProfilePoints = Array ();

	/**
	* Prevent recursion when processing debug_backtrace() function results
	*
	* @var Array
	* @access private
	*/
	private $RecursionStack = Array ();

	/**
	* Cross browser debugger report scrollbar width detection
	*
	* @var int
	* @access private
	*/
	private $scrollbarWidth = 0;

	/**
	* Remembers how much memory & time was spent on including files
	*
	* @var Array
	* @access public
	* @see kUtil::includeOnce
	*/
	public $IncludesData = Array ();

	/**
	* Remembers maximal include deep level
	*
	* @var int
	* @access public
	* @see kUtil::includeOnce
	*/
	public $IncludeLevel = 0;

	/**
	* Prevents report generation more then once
	*
	* @var bool
	* @access private
	*/
	private $_inReportPrinting = false;

	/**
	* Transparent spacer image used in case of none spacer image defined via SPACER_URL constant.
	* Used while drawing progress bars (memory usage, time usage, etc.)
	*
	* @var string
	* @access private
	*/
	private $dummyImage = '';

	/**
	* Temporary files created by debugger will be stored here
	*
	* @var string
	* @access private
	*/
	private $tempFolder = '';

	/**
	* Debug rows will be separated using this string before writing to debug file
	*
	* @var string
	* @access private
	*/
	private $rowSeparator = '@@';

	/**
	* Base URL for debugger includes
	*
	* @var string
	* @access private
	*/
	private $baseURL = '';

	/**
	* Sub-folder, where In-Portal is installed
	*
	* @var string
	* @access private
	*/
	private $basePath = '';

	/**
	* Holds last recorded timestamp (for appendTimestamp)
	*
	* @var int
	* @access private
	*/
	private $LastMoment;

	/**
	* Determines, that current request is AJAX request
	*
	* @var bool
	* @access private
	*/
	private $_isAjax = false;

	/**
	* Data, parsed from the editor url.
	*
	* @var array
	*/
	protected $editorUrlData = array('url' => '', 'params' => array());

	/**
	* Creates instance of debugger
	*/
	public function __construct()
	{
	global $start, $dbg_options;

	// check if user haven't defined DEBUG_MODE contant directly
	if ( defined('DEBUG_MODE') && DEBUG_MODE ) {
	die('error: constant DEBUG_MODE defined directly, please use <strong>$dbg_options</strong> array instead');
	}

	if ( class_exists('kUtil') ) {
	DebuggerUtil::$trustProxy = kUtil::getSystemConfig()->get('TrustProxy');
	}

	// check IP before enabling debug mode
	$ip_match = DebuggerUtil::ipMatch(isset($dbg_options['DBG_IP']) ? $dbg_options['DBG_IP'] : '');

	if ( !$ip_match \|\| (isset($_COOKIE['debug_off']) && $_COOKIE['debug_off']) ) {
	define('DEBUG_MODE', 0);
	return;
	}

	// debug is allowed for user, continue initialization
	$this->InitDebugger();
	$this->profileStart('kernel4_startup', 'Startup and Initialization of kernel4', $start);
	$this->profileStart('script_runtime', 'Script runtime', $start);
	$this->LastMoment = $start;

	error_reporting(E_ALL & ~E_STRICT);

	// show errors on screen in case if not in Zend Studio debugging
	ini_set('display_errors', DebuggerUtil::constOn('DBG_ZEND_PRESENT') ? 0 : 1);

	// vertical scrollbar width differs in Firefox and other browsers
	$this->scrollbarWidth = $this->isGecko() ? 22 : 25;

	- $this->appendRequest();
	+ // Mark place, where request information will be inserted.
	+ $this->HeaderEndingDataIndex = count($this->Data);
	}

	/**
	* Set's default values to constants debugger uses
	*
	*/
	function InitDebugger()
	{
	global $dbg_options;

	unset($dbg_options['DBG_IP']);

	// Detect fact, that this session being debugged by Zend Studio
	foreach ($_COOKIE as $cookie_name => $cookie_value) {
	if (substr($cookie_name, 0, 6) == 'debug_') {
	DebuggerUtil::safeDefine('DBG_ZEND_PRESENT', 1);
	break;
	}
	}

	DebuggerUtil::safeDefine('DBG_ZEND_PRESENT', 0); // set this constant value to 0 (zero) to debug debugger using Zend Studio

	// set default values for debugger constants
	$dbg_constMap = Array (
	'DBG_USE_HIGHLIGHT' => 1, // highlight output same as php code using "highlight_string" function
	'DBG_WINDOW_WIDTH' => 700, // set width of debugger window (in pixels) for better viewing large amount of debug data
	'DBG_USE_SHUTDOWN_FUNC' => DBG_ZEND_PRESENT ? 0 : 1, // use shutdown function to include debugger code into output
	'DBG_HANDLE_ERRORS' => DBG_ZEND_PRESENT ? 0 : 1, // handle all allowed by php (see php manual) errors instead of default handler
	'DBG_DOMVIEWER' => '/temp/domviewer.html', // path to DOMViewer on website
	'DOC_ROOT' => str_replace('\\', '/', realpath($_SERVER['DOCUMENT_ROOT']) ), // windows hack
	'DBG_LOCAL_BASE_PATH' => 'w:', // replace DOC_ROOT in filenames (in errors) using this path
	'DBG_EDITOR_URL' => 'file://%F:%L',
	'DBG_SHORTCUT' => 'F12', // Defines debugger activation shortcut (any symbols or Ctrl/Alt/Shift are allowed, e.g. Ctrl+Alt+F12)
	);

	// debugger is initialized before kHTTPQuery, so do jQuery headers check here too
	if (array_key_exists('HTTP_X_REQUESTED_WITH', $_SERVER) && $_SERVER['HTTP_X_REQUESTED_WITH'] == 'XMLHttpRequest') {
	$this->_isAjax = true;
	}
	elseif (array_key_exists('ajax', $_GET) && $_GET['ajax'] == 'yes') {
	$this->_isAjax = true;
	}

	// user defined options override debugger defaults
	$dbg_constMap = array_merge($dbg_constMap, $dbg_options);

	if ($this->_isAjax && array_key_exists('DBG_SKIP_AJAX', $dbg_constMap) && $dbg_constMap['DBG_SKIP_AJAX']) {
	$dbg_constMap['DBG_SKIP_REPORTING'] = 1;
	}

	// allows to validate unit configs via request variable
	if ( !array_key_exists('DBG_VALIDATE_CONFIGS', $dbg_constMap) ) {
	$dbg_constMap['DBG_VALIDATE_CONFIGS'] = array_key_exists('validate_configs', $_GET) ? (int)$_GET['validate_configs'] : 0;
	}

	// when validation configs, don't show sqls for better validation error displaying
	if ($dbg_constMap['DBG_VALIDATE_CONFIGS']) {
	$dbg_constMap['DBG_SQL_PROFILE'] = 0;
	}

	// when showing explain make shure, that debugger window is large enough
	if (array_key_exists('DBG_SQL_EXPLAIN', $dbg_constMap) && $dbg_constMap['DBG_SQL_EXPLAIN']) {
	$dbg_constMap['DBG_WINDOW_WIDTH'] = 1000;
	}

	foreach ($dbg_constMap as $dbg_constName => $dbg_constValue) {
	DebuggerUtil::safeDefine($dbg_constName, $dbg_constValue);
	}

	$this->parseEditorUrl();
	}

	/**
	* Parses editor url.
	*
	* @return void
	*/
	protected function parseEditorUrl()
	{
	$components = parse_url(DBG_EDITOR_URL);

	$this->editorUrlData['url'] = $components['scheme'] . '://' . $components['host'];

	if ( isset($components['path']) ) {
	$this->editorUrlData['url'] .= $components['path'];
	}

	if ( isset($components['query']) ) {
	parse_str(html_entity_decode($components['query']), $this->editorUrlData['params']);
	}
	}

	/**
	* Performs debugger initialization
	*
	* @return void
	*/
	private function InitReport()
	{
	if ( !class_exists('kApplication') ) {
	return;
	}

	$application =& kApplication::Instance();

	// string used to separate debugger records while in file (used in debugger dump filename too)
	$this->rowSeparator = '@' . (/is_object($application->Factory) &&/ $application->InitDone ? $application->GetSID() : 0) . '@';
	// $this->rowSeparator = '@' . rand(0, 100000) . '@';

	// include debugger files from this url
	$reg_exp = '/^' . preg_quote(FULL_PATH, '/') . '/';
	$kernel_path = preg_replace($reg_exp, '', KERNEL_PATH, 1);
	$this->baseURL = PROTOCOL . SERVER_NAME . (defined('PORT') ? ':' . PORT : '') . rtrim(BASE_PATH, '/') . $kernel_path . '/utility/debugger';

	// store debugger cookies at this path
	$this->basePath = rtrim(BASE_PATH, '/');

	// save debug output in this folder
	$this->tempFolder = defined('RESTRICTED') ? RESTRICTED : WRITEABLE . '/cache';
	}

	/**
	* Appends all passed variable values (without variable names) to debug output
	*
	* @return void
	* @access public
	*/
	public function dumpVars()
	{
	$dump_mode = 'var_dump';
	$dumpVars = func_get_args();

	if ( $dumpVars[count($dumpVars) - 1] === 'STRICT' ) {
	$dump_mode = 'strict_var_dump';
	array_pop($dumpVars);
	}

	foreach ($dumpVars as $varValue) {
	$this->Data[] = Array ('value' => $varValue, 'debug_type' => $dump_mode);
	}
	}

	/**
	* Transforms collected data at given index into human-readable HTML to place in debugger report
	*
	* @param int $dataIndex
	* @return string
	* @access private
	*/
	private function prepareHTML($dataIndex)
	{
	static $errors_displayed = 0;

	$Data =& $this->Data[$dataIndex];
	if ( $Data['debug_type'] == 'html' ) {
	return $Data['html'];
	}

	switch ($Data['debug_type']) {
	case 'error':
	$errors_displayed++;
	$fileLink = $this->getFileLink($Data['file'], $Data['line']);
	$ret = '<b class="debug_error">' . $this->getErrorNameByCode($Data['no']) . ' (#' . $errors_displayed . ')</b>: ' . $Data['str'];
	$ret .= ' in <b>' . $fileLink . '</b> on line <b>' . $Data['line'] . '</b>';
	return $ret;
	break;

	case 'exception':
	$fileLink = $this->getFileLink($Data['file'], $Data['line']);
	$ret = '<b class="debug_error">' . $Data['exception_class'] . '</b>: ' . $Data['str'];
	$ret .= ' in <b>' . $fileLink . '</b> on line <b>' . $Data['line'] . '</b>';
	return $ret;
	break;

	case 'var_dump':
	return $this->highlightString($this->print_r($Data['value'], true));
	break;

	case 'strict_var_dump':
	return $this->highlightString(var_export($Data['value'], true));
	break;

	case 'trace':
	ini_set('memory_limit', '500M');
	$trace =& $Data['trace'];

	$i = 0;
	$traceCount = count($trace);
	$ret = '';

	while ( $i < $traceCount ) {
	$traceRec =& $trace[$i];
	$argsID = 'trace_args_' . $dataIndex . '_' . $i;

	$has_args = isset($traceRec['args']);

	if ( isset($traceRec['file']) ) {
	$func_name = isset($traceRec['class']) ? $traceRec['class'] . $traceRec['type'] . $traceRec['function'] : $traceRec['function'];
	$args_link = $has_args ? '<a href="javascript:$Debugger.ToggleTraceArgs(\'' . $argsID . '\');" title="Show/Hide Function Arguments"><b>Function</b></a>' : '<strong>Function</strong>';

	$ret .= $args_link . ': ' . $this->getFileLink($traceRec['file'], $traceRec['line'], $func_name);
	$ret .= ' in <b>' . basename($traceRec['file']) . '</b> on line <b>' . $traceRec['line'] . '</b><br>';
	}
	else {
	$ret .= 'no file information available';
	}

	if ( $has_args ) {
	// if parameter value is longer then 200 symbols, then leave only first 50
	$args = $this->highlightString($this->print_r($traceRec['args'], true));
	$ret .= '<div id="' . $argsID . '" style="display: none;">' . $args . '</div>';
	}
	$i++;
	}
	return $ret;
	break;

	case 'profiler':
	$profileKey = $Data['profile_key'];
	$Data =& $this->ProfilerData[$profileKey];
	$runtime = ($Data['ends'] - $Data['begins']); // in seconds

	$totals_key = getArrayValue($Data, 'totalsKey');
	if ( $totals_key ) {
	$total_before = $Data['totalsBefore'];
	$total = $this->ProfilerTotals[$totals_key];

	$div_width = Array ();
	$total_width = ($this->getWindowWidth() - 10);
	$div_width['before'] = round(($total_before / $total) * $total_width);
	$div_width['current'] = round(($runtime / $total) * $total_width);
	$div_width['left'] = round((($total - $total_before - $runtime) / $total) * $total_width);

	$subtitle = array_key_exists('subtitle', $Data) ? ' (' . $Data['subtitle'] . ')' : '';
	$ret = '<b>Name' . $subtitle . '</b>: ' . $Data['description'] . '<br />';

	$additional = isset($Data['additional']) ? $Data['additional'] : Array ();
	if ( isset($Data['file']) ) {
	array_unshift($additional, Array ('name' => 'File', 'value' => $this->getFileLink($Data['file'], $Data['line'], basename($Data['file']) . ':' . $Data['line'])));
	}
	array_unshift($additional, Array ('name' => 'Runtime', 'value' => $runtime . 's'));

	$ret .= '<div>'; //FF 3.5 needs this!
	foreach ($additional as $mixed_param) {
	$ret .= '[<strong>' . $mixed_param['name'] . '</strong>: ' . $mixed_param['value'] . '] ';
	}

	/*if ( isset($Data['file']) ) {
	$ret .= '[<b>Runtime</b>: ' . $runtime . 's] [<b>File</b>: ' . $this->getFileLink($Data['file'], $Data['line'], basename($Data['file']) . ':' . $Data['line']) . ']<br />';
	}
	else {
	$ret .= '<b>Runtime</b>: ' . $runtime . 's<br />';
	}*/

	$ret .= '</div>';

	$ret .= '<div class="dbg_profiler" style="width: ' . $div_width['before'] . 'px; border-right: 0px; background-color: #298DDF;"><img src="' . $this->dummyImage . '" width="1" height="1"/></div>';
	$ret .= '<div class="dbg_profiler" style="width: ' . $div_width['current'] . 'px; border-left: 0px; border-right: 0px; background-color: #EF4A4A;"><img src="' . $this->dummyImage . '" width="1" height="1"/></div>';
	$ret .= '<div class="dbg_profiler" style="width: ' . $div_width['left'] . 'px; border-left: 0px; background-color: #DFDFDF;"><img src="' . $this->dummyImage . '" width="1" height="1"/></div>';

	return $ret;
	}
	else {
	return '<b>Name</b>: ' . $Data['description'] . '<br><b>Runtime</b>: ' . $runtime . 's';
	}
	break;

	default:
	return 'incorrect debug data';
	break;
	}
	}

	/**
	* Returns row type for debugger row.
	*
	* @param integer $data_index Index of the row.
	*
	* @return string
	*/
	protected function getRowType($data_index)
	{
	$data = $this->Data[$data_index];

	switch ($data['debug_type']) {
	case 'html':
	if ( strpos($data['html'], 'SQL Total time') !== false ) {
	return self::ROW_TYPE_SQL;
	}
	break;

	case 'error':
	$error_map = array(
	'Fatal Error' => self::ROW_TYPE_ERROR,
	'Warning' => self::ROW_TYPE_WARNING,
	'Notice' => self::ROW_TYPE_NOTICE,
	'Deprecation Notice' => self::ROW_TYPE_NOTICE,
	);

	return $error_map[$this->getErrorNameByCode($data['no'])];
	break;

	case 'exception':
	return self::ROW_TYPE_ERROR;
	break;

	case 'profiler':
	if ( preg_match('/^sql_/', $data['profile_key']) ) {
	return self::ROW_TYPE_SQL;
	}
	break;
	}

	return self::ROW_TYPE_OTHER;
	}

	/**
	* Returns debugger report window width excluding scrollbar
	*
	* @return int
	* @access private
	*/
	private function getWindowWidth()
	{
	return DBG_WINDOW_WIDTH - $this->scrollbarWidth - 8;
	}

	/**
	* Tells debugger to skip objects that are heavy in plan of memory usage while printing debug_backtrace results
	*
	* @param Object $object
	* @return bool
	* @access private
	*/
	private function IsBigObject(&$object)
	{
	$skip_classes = Array(
	defined('APPLICATION_CLASS') ? APPLICATION_CLASS : 'kApplication',
	'kFactory',
	'kUnitConfigReader',
	'NParser',
	);

	foreach ($skip_classes as $class_name) {
	if ( strtolower(get_class($object)) == strtolower($class_name) ) {
	return true;
	}
	}

	return false;
	}

	/**
	* Advanced version of print_r (for debugger only). Don't print objects recursively.
	*
	* @param mixed $p_array Value to be printed.
	* @param boolean $return_output Return output or print it out.
	* @param integer $tab_count Offset in tabs.
	*
	* @return string
	*/
	private function print_r(&$p_array, $return_output = false, $tab_count = -1)
	{
	static $first_line = true;

	// not an array at all
	if ( !is_array($p_array) ) {
	switch ( gettype($p_array) ) {
	case 'NULL':
	return 'NULL' . "\n";
	break;

	case 'object':
	return $this->processObject($p_array, $tab_count);
	break;

	case 'resource':
	return (string)$p_array . "\n";
	break;

	default:
	// number or string
	if ( strlen($p_array) > 200 ) {
	$p_array = substr($p_array, 0, 50) . ' ...';
	}

	return $p_array . "\n";
	break;
	}
	}

	$output = '';

	if ( count($p_array) > 50 ) {
	$array = array_slice($p_array, 0, 50);
	$array[] = '...';
	}
	else {
	$array = $p_array;
	}

	$tab_count++;
	$output .= "Array\n" . str_repeat(' ', $tab_count) . "(\n";

	$tab_count++;
	$tabsign = $tab_count ? str_repeat(' ', $tab_count) : '';

	$array_keys = array_keys($array);

	foreach ($array_keys as $key) {
	switch ( gettype($array[$key]) ) {
	case 'array':
	$output .= $tabsign . '[' . $key . '] = ' . $this->print_r($array[$key], true, $tab_count);
	break;

	case 'boolean':
	$output .= $tabsign . '[' . $key . '] = ' . ($array[$key] ? 'true' : 'false') . "\n";
	break;

	case 'integer':
	case 'double':
	case 'string':
	if ( strlen($array[$key]) > 200 ) {
	$array[$key] = substr($array[$key], 0, 50) . ' ...';
	}
	$output .= $tabsign . '[' . $key . '] = ' . $array[$key] . "\n";
	break;

	case 'NULL':
	$output .= $tabsign . '[' . $key . "] = NULL\n";
	break;

	case 'object':
	$output .= $tabsign . '[' . $key . "] = ";
	$output .= "Object (" . get_class($array[$key]) . ") = \n" . str_repeat(' ', $tab_count + 1) . "(\n";
	$output .= $this->processObject($array[$key], $tab_count + 2);
	$output .= str_repeat(' ', $tab_count + 1) . ")\n";
	break;

	default:
	$output .= $tabsign . '[' . $key . '] unknown = ' . gettype($array[$key]) . "\n";
	break;
	}
	}

	$tab_count--;
	$output .= str_repeat(' ', $tab_count) . ")\n";

	if ( $first_line ) {
	$first_line = false;
	$output .= "\n";
	}

	$tab_count--;

	if ( $return_output ) {
	return $output;
	}
	else {
	echo $output;
	}

	return true;
	}

	/**
	* Returns string representation of given object (more like print_r, but with recursion prevention check)
	*
	* @param Object $object
	* @param int $tab_count
	* @return string
	* @access private
	*/
	private function processObject(&$object, $tab_count)
	{
	$object_class = get_class($object);
	if ( !in_array($object_class, $this->RecursionStack) ) {
	if ( $this->IsBigObject($object) ) {
	return 'SKIPPED (class: ' . $object_class . ")\n";
	}

	$attribute_names = get_class_vars($object_class);
	if ( !$attribute_names ) {
	return "NO_ATTRIBUTES\n";
	}
	else {
	$output = '';
	array_push($this->RecursionStack, $object_class);

	$tabsign = $tab_count ? str_repeat(' ', $tab_count) : '';
	foreach ($attribute_names as $attribute_name => $attribute_value) {
	if ( is_object($object->$attribute_name) ) {
	// it is object
	$output .= $tabsign . '[' . $attribute_name . '] = ' . $this->processObject($object->$attribute_name, $tab_count + 1);
	}
	else {
	$output .= $tabsign . '[' . $attribute_name . '] = ' . $this->print_r($object->$attribute_name, true, $tab_count);
	}
	}
	array_pop($this->RecursionStack);
	return $output;
	}
	}
	else {
	// object [in recursion stack]
	return '* RECURSION * (class: ' . $object_class . ")\n";
	}
	}

	/**
	* Format SQL Query using predefined formatting
	* and highlighting techniques
	*
	* @param string $sql
	* @return string
	* @access public
	*/
	public function formatSQL($sql)
	{
	$sql = trim(preg_replace('/(\n\|\t\| )+/is', ' ', $sql));

	// whitespace in the beginning of the regex is to avoid splitting inside words, for example "FROM int_ConfigurationValues" into "FROM intConfiguration\n\tValues"
	$formatted_sql = preg_replace('/\s(CREATE TABLE\|DROP TABLE\|SELECT\|UPDATE\|SET\|REPLACE\|INSERT\|DELETE\|VALUES\|FROM\|LEFT JOIN\|INNER JOIN\|LIMIT\|WHERE\|HAVING\|GROUP BY\|ORDER BY)\s/is', "\n\t$1 ", ' ' . $sql);
	$formatted_sql = $this->highlightString($formatted_sql);

	if ( defined('DBG_SQL_EXPLAIN') && DBG_SQL_EXPLAIN ) {
	if ( substr($sql, 0, 6) == 'SELECT' ) {
	$formatted_sql .= '<br/>' . '<strong>Explain</strong>:<br /><br />';
	$explain_result = $this->Application->Conn->Query('EXPLAIN ' . $sql, null, true);

	$explain_table = '';
	foreach ($explain_result as $explain_row) {
	if ( !$explain_table ) {
	// first row -> draw header
	$explain_table .= '<tr class="explain_header"><td>' . implode('</td><td>', array_keys($explain_row)) . '</td></tr>';
	}
	$explain_table .= '<tr><td>' . implode('</td><td>', $explain_row) . '</td></tr>';
	}

	$formatted_sql .= '<table class="dbg_explain_table">' . $explain_table . '</table>';
	}
	}

	return $formatted_sql;
	}

	/**
	* Highlights given string using "highlight_string" method
	*
	* @param string $string
	* @return string
	* @access public
	*/
	public function highlightString($string)
	{
	if ( !(defined('DBG_USE_HIGHLIGHT') && DBG_USE_HIGHLIGHT) \|\| $this->_compileError ) {
	return nl2br($string);
	}

	$string = str_replace(Array ('\\', '/'), Array ('_no_match_string_', '_n_m_s_'), $string);
	$this->_compileError = true; // next line is possible cause of compile error
	$string = highlight_string('<?php ' . $string . ' ?>', true);
	$this->_compileError = false;

	$string = str_replace(Array ('_no_match_string_', '_n_m_s_'), Array ('\\', '/'), $string);

	if ( strlen($string) >= 65536 ) {
	// preg_replace will fail, when string is longer, then 65KB
	return str_replace(Array ('<?php ', '?>'), '', $string);
	}

	return preg_replace('/<\?(.)php (.)\?>/Us', '\\2', $string);
	}

	/**
	* Determine by php type of browser used to show debugger
	*
	* @return bool
	* @access private
	*/
	private function isGecko()
	{
	// we need isset because we may run scripts from shell with no user_agent at all
	return isset($_SERVER['HTTP_USER_AGENT']) && strpos(strtolower($_SERVER['HTTP_USER_AGENT']), 'firefox') !== false;
	}

	/**
	* Returns link for editing php file (from error) in external editor
	*
	* @param string $file filename with path from root folder
	* @param int $line_number line number in file where error is found
	* @param string $title text to show on file edit link
	* @return string
	* @access public
	*/
	public function getFileLink($file, $line_number = 1, $title = '')
	{
	if ( !$title ) {
	$title = str_replace('/', '\\', $this->getLocalFile($file));
	}

	$local_file = $this->getLocalFile($file);
	$url_params = $this->editorUrlData['params'];

	foreach ( $url_params as $param_name => $param_value ) {
	$url_params[$param_name] = str_replace(
	array('%F', '%L'),
	array($local_file, $line_number),
	$param_value
	);
	}

	$url = $this->editorUrlData['url'] . '?' . http_build_query($url_params);

	return '<a href="' . $url . '">' . $title . '</a>';
	}

	/**
	* Converts filepath on server to filepath in mapped DocumentRoot on developer pc
	*
	* @param string $remoteFile
	* @return string
	* @access private
	*/
	private function getLocalFile($remoteFile)
	{
	return preg_replace('/^' . preg_quote(DOC_ROOT, '/') . '/', DBG_LOCAL_BASE_PATH, $remoteFile, 1);
	}

	/**
	* Appends call trace till this method call
	*
	* @param int $levels_to_shift
	* @return void
	* @access public
	*/
	public function appendTrace($levels_to_shift = 1)
	{
	$levels_shifted = 0;
	$trace = debug_backtrace();

	while ( $levels_shifted < $levels_to_shift ) {
	array_shift($trace);
	$levels_shifted++;
	}

	$this->Data[] = Array ('trace' => $trace, 'debug_type' => 'trace');
	}

	/**
	* Appends call trace till this method call
	*
	* @param Exception $exception
	* @return void
	* @access private
	*/
	private function appendExceptionTrace(&$exception)
	{
	$trace = $exception->getTrace();
	$this->Data[] = Array('trace' => $trace, 'debug_type' => 'trace');
	}

	/**
	* Adds memory usage statistics
	*
	* @param string $msg
	* @param int $used
	* @return void
	* @access public
	*/
	public function appendMemoryUsage($msg, $used = null)
	{
	if ( !isset($used) ) {
	$used = round(memory_get_usage() / 1024);
	}

	$this->appendHTML('<b>Memory usage</b> ' . $msg . ' ' . $used . 'Kb');
	}

	/**
	* Appends HTML code without transformations
	*
	* @param string $html
	* @return void
	* @access public
	*/
	public function appendHTML($html)
	{
	$this->Data[] = Array ('html' => $html, 'debug_type' => 'html');
	}

	/**
	+ * Inserts HTML code without transformations at given position
	+ *
	+ * @param string $html HTML.
	+ * @param integer $position Position.
	+ *
	+ * @return integer
	+ */
	+ public function insertHTML($html, $position)
	+ {
	+ array_splice(
	+ $this->Data,
	+ $position,
	+ 0,
	+ array(
	+ array('html' => $html, 'debug_type' => 'html'),
	+ )
	+ );
	+
	+ return $position + 1;
	+ }
	+
	+ /**
	* Returns instance of FirePHP class
	*
	* @return FirePHP
	* @link http://www.firephp.org/HQ/Use.htm
	*/
	function firePHP()
	{
	require_once('FirePHPCore/FirePHP.class.php');

	return FirePHP::getInstance(true);
	}

	/**
	* Change debugger info that was already generated before.
	* Returns true if html was set.
	*
	* @param int $index
	* @param string $html
	* @param string $type = {'append','prepend','replace'}
	* @return bool
	* @access public
	*/
	public function setHTMLByIndex($index, $html, $type = 'append')
	{
	if ( !isset($this->Data[$index]) \|\| $this->Data[$index]['debug_type'] != 'html' ) {
	return false;
	}

	switch ( $type ) {
	case 'append':
	$this->Data[$index]['html'] .= '<br>' . $html;
	break;

	case 'prepend':
	$this->Data[$index]['html'] = $this->Data[$index]['html'] . '<br>' . $html;
	break;

	case 'replace':
	$this->Data[$index]['html'] = $html;
	break;
	}

	return true;
	}

	/**
	* Move $debugLineCount lines of input from debug output
	* end to beginning.
	*
	* @param int $debugLineCount
	* @return void
	* @access private
	*/
	private function moveToBegin($debugLineCount)
	{
	$lines = array_splice($this->Data, count($this->Data) - $debugLineCount, $debugLineCount);
	$this->Data = array_merge($lines, $this->Data);
	}

	/**
	* Moves all debugger report lines after $debugLineCount into $new_row position
	*
	* @param int $new_row
	* @param int $debugLineCount
	* @return void
	* @access private
	*/
	private function moveAfterRow($new_row, $debugLineCount)
	{
	$lines = array_splice($this->Data, count($this->Data) - $debugLineCount, $debugLineCount);
	$rows_before = array_splice($this->Data, 0, $new_row, $lines);
	$this->Data = array_merge($rows_before, $this->Data);
	}

	/**
	* Appends HTTP REQUEST information to debugger report
	*
	* @return void
	* @access private
	*/
	private function appendRequest()
	{
	if ( isset($_SERVER['SCRIPT_FILENAME']) ) {
	$script = $_SERVER['SCRIPT_FILENAME'];
	}
	else {
	$script = $_SERVER['DOCUMENT_ROOT'] . $_SERVER['PHP_SELF'];
	}

	- $this->appendHTML('ScriptName: <b>' . $this->getFileLink($script, 1, basename($script)) . '</b> (<b>' . dirname($script) . '</b>)');
	+ $insert_at_index = $this->HeaderEndingDataIndex;
	+
	+ $insert_at_index = $this->insertHTML(
	+ 'ScriptName: <b>' . $this->getFileLink($script, 1, basename($script)) . '</b> (<b>' . dirname($script) . '</b>)',
	+ $insert_at_index
	+ );
	+
	if ( $this->_isAjax ) {
	- $this->appendHTML('RequestURI: ' . $_SERVER['REQUEST_URI'] . ' (QS Length:' . strlen($_SERVER['QUERY_STRING']) . ')');
	+ $insert_at_index = $this->insertHTML(
	+ 'RequestURI: ' . $_SERVER['REQUEST_URI'] . ' (QS Length:' . strlen($_SERVER['QUERY_STRING']) . ')',
	+ $insert_at_index
	+ );
	}

	$tools_html = ' <table style="width: ' . $this->getWindowWidth() . 'px;">
	<tr>
	<td>' . $this->_getDomViewerHTML() . '</td>
	<td>' . $this->_getToolsHTML() . '</td>
	</tr>
	</table>';
	- $this->appendHTML($tools_html);
	+ $insert_at_index = $this->insertHTML($tools_html, $insert_at_index);

	ob_start();
	?>
	<table border="0" cellspacing="0" cellpadding="0" class="dbg_flat_table" style="width: <?php echo $this->getWindowWidth(); ?>px;">
	<thead style="font-weight: bold;">
	<td width="20">Src</td><td>Name</td><td>Value</td>
	</thead>
	<?php
	- $super_globals = Array ('GE' => $_GET, 'PO' => $_POST, 'CO' => $_COOKIE);
	+ if ( is_object($this->Application) ) {
	+ $super_globals = array(
	+ 'GE' => $this->Application->HttpQuery->Get,
	+ 'PO' => $this->Application->HttpQuery->Post,
	+ 'CO' => $this->Application->HttpQuery->Cookie,
	+ );
	+ }
	+ else {
	+ $super_globals = array('GE' => $_GET, 'PO' => $_POST, 'CO' => $_COOKIE);
	+ }

	foreach ($super_globals as $prefix => $data) {
	foreach ($data as $key => $value) {
	if ( !is_array($value) && trim($value) == '' ) {
	$value = '<b class="debug_error">no value</b>';
	}
	else {
	$value = htmlspecialchars($this->print_r($value, true), ENT_QUOTES, 'UTF-8');
	}

	echo '<tr><td>' . $prefix . '</td><td>' . $key . '</td><td>' . $value . '</td></tr>';
	}
	}
	?>
	</table>
	<?php
	- $this->appendHTML(ob_get_contents());
	+ $this->insertHTML(ob_get_contents(), $insert_at_index);
	ob_end_clean();
	}

	/**
	* Appends php session content to debugger output
	*
	* @return void
	* @access private
	*/
	private function appendSession()
	{
	if ( isset($_SESSION) && $_SESSION ) {
	$this->appendHTML('PHP Session: [<b>' . ini_get('session.name') . '</b>]');
	$this->dumpVars($_SESSION);
	$this->moveToBegin(2);
	}
	}

	/**
	* Starts profiling of a given $key
	*
	* @param string $key
	* @param string $description
	* @param int $timeStamp
	* @return void
	* @access public
	*/
	public function profileStart($key, $description = null, $timeStamp = null)
	{
	if ( !isset($timeStamp) ) {
	$timeStamp = microtime(true);
	}
	$this->ProfilerData[$key] = Array ('begins' => $timeStamp, 'ends' => 5000, 'debuggerRowID' => count($this->Data));
	if ( isset($description) ) {
	$this->ProfilerData[$key]['description'] = $description;
	}

	if ( substr($key, 0, 4) == 'sql_' ) {
	// append place from what was called
	$trace_results = debug_backtrace();
	$trace_count = count($trace_results);
	$i = 0;
	while ( $i < $trace_count ) {
	if ( !isset($trace_results[$i]['file']) ) {
	$i++;
	continue;
	}

	$trace_file = basename($trace_results[$i]['file']);
	if ( $trace_file != 'db_connection.php' && $trace_file != 'db_load_balancer.php' && $trace_file != 'adodb.inc.php' ) {
	break;
	}
	$i++;
	}

	$this->ProfilerData[$key]['file'] = $trace_results[$i]['file'];
	$this->ProfilerData[$key]['line'] = $trace_results[$i]['line'];

	if ( isset($trace_results[$i + 1]['object']) && isset($trace_results[$i + 1]['object']->Prefix) ) {
	/** @var kBase $object */
	$object =& $trace_results[$i + 1]['object'];

	$prefix_special = rtrim($object->Prefix . '.' . $object->Special, '.');
	$this->ProfilerData[$key]['prefix_special'] = $prefix_special;
	}

	unset($trace_results);
	}

	$this->Data[] = Array ('profile_key' => $key, 'debug_type' => 'profiler');
	}

	/**
	* Ends profiling for a given $key
	*
	* @param string $key
	* @param string $description
	* @param int $timeStamp
	* @return void
	* @access public
	*/
	public function profileFinish($key, $description = null, $timeStamp = null)
	{
	if ( !isset($timeStamp) ) {
	$timeStamp = microtime(true);
	}
	$this->ProfilerData[$key]['ends'] = $timeStamp;

	if ( isset($description) ) {
	$this->ProfilerData[$key]['description'] = $description;
	}

	if ( substr($key, 0, 4) == 'sql_' ) {
	$func_arguments = func_get_args();
	$rows_affected = $func_arguments[3];

	$additional = Array ();

	if ( $rows_affected > 0 ) {
	$additional[] = Array ('name' => 'Affected Rows', 'value' => $rows_affected);

	if ( isset($func_arguments[4]) ) {
	if ( strlen($func_arguments[4]) > 200 ) {
	$func_arguments[4] = substr($func_arguments[4], 0, 50) . ' ...';
	}

	$additional[] = Array ('name' => 'Result', 'value' => $func_arguments[4]);
	}
	}

	$additional[] = Array ('name' => 'Query Number', 'value' => $func_arguments[5]);

	if ( $func_arguments[6] ) {
	$this->profilerAddTotal('cachable_queries', $key);
	$this->ProfilerData[$key]['subtitle'] = 'cachable';
	}

	if ( (string)$func_arguments[7] !== '' ) {
	$additional[] = Array ('name' => 'Server #', 'value' => $func_arguments[7]);
	}

	if ( array_key_exists('prefix_special', $this->ProfilerData[$key]) ) {
	$additional[] = Array ('name' => 'PrefixSpecial', 'value' => $this->ProfilerData[$key]['prefix_special']);
	}

	$this->ProfilerData[$key]['additional'] =& $additional;
	}
	}

	/**
	* Collects total execution time from profiler record
	*
	* @param string $total_key
	* @param string $key
	* @param int $value
	* @return void
	* @access public
	*/
	public function profilerAddTotal($total_key, $key = null, $value = null)
	{
	if ( !isset($this->ProfilerTotals[$total_key]) ) {
	$this->ProfilerTotals[$total_key] = 0;
	$this->ProfilerTotalCount[$total_key] = 0;
	}

	if ( !isset($value) ) {
	$value = $this->ProfilerData[$key]['ends'] - $this->ProfilerData[$key]['begins'];
	}

	if ( isset($key) ) {
	$this->ProfilerData[$key]['totalsKey'] = $total_key;
	$this->ProfilerData[$key]['totalsBefore'] = $this->ProfilerTotals[$total_key];
	}

	$this->ProfilerTotals[$total_key] += $value;
	$this->ProfilerTotalCount[$total_key]++;
	}

	/**
	* Traces relative code execution speed between this method calls
	*
	* @param string $message
	* @return void
	* @access public
	*/
	public function appendTimestamp($message)
	{
	global $start;

	$time = microtime(true);
	$from_last = $time - $this->LastMoment;
	$from_start = $time - $start;
	$this->appendHTML(sprintf("<strong>%s</strong> %.5f from last %.5f from start", $message, $from_last, $from_start));
	$this->LastMoment = $time;
	}

	/**
	* Returns unique ID for each method call
	*
	* @return int
	* @access public
	*/
	public function generateID()
	{
	list($usec, $sec) = explode(' ', microtime());

	$id_part_1 = substr($usec, 4, 4);
	$id_part_2 = mt_rand(1, 9);
	$id_part_3 = substr($sec, 6, 4);
	$digit_one = substr($id_part_1, 0, 1);

	if ( $digit_one == 0 ) {
	$digit_one = mt_rand(1, 9);
	$id_part_1 = preg_replace('/^0/', '', $id_part_1);
	$id_part_1 = $digit_one . $id_part_1;
	}

	return $id_part_1 . $id_part_2 . $id_part_3;
	}

	/**
	* Returns error name based on it's code
	*
	* @param int $error_code
	* @return string
	* @access private
	*/
	private function getErrorNameByCode($error_code)
	{
	$error_map = Array (
	'Fatal Error' => Array (E_RECOVERABLE_ERROR, E_USER_ERROR, E_ERROR, E_CORE_ERROR, E_COMPILE_ERROR, E_PARSE),
	'Warning' => Array (E_WARNING, E_USER_WARNING, E_CORE_WARNING, E_COMPILE_WARNING),
	'Notice' => Array (E_NOTICE, E_USER_NOTICE, E_STRICT),
	);

	if ( defined('E_DEPRECATED') ) {
	// Since PHP 5.3.
	$error_map['Deprecation Notice'] = array(E_DEPRECATED, E_USER_DEPRECATED);
	}

	foreach ($error_map as $error_name => $error_codes) {
	if ( in_array($error_code, $error_codes) ) {
	return $error_name;
	}
	}

	return '';
	}

	/**
	* Returns profile total key (check against missing key too)
	*
	* @param string $key
	* @return int
	* @access private
	*/
	private function getProfilerTotal($key)
	{
	if ( isset($this->ProfilerTotalCount[$key]) ) {
	return (int)$this->ProfilerTotalCount[$key];
	}

	return 0;
	}

	/**
	* Counts how much calls were made to a place, where this method is called (basic version of profiler)
	*
	* @param string $title
	* @param int $level
	* @return void
	* @access public
	*/
	public function ProfilePoint($title, $level = 1)
	{
	$trace_results = debug_backtrace();
	$level = min($level, count($trace_results) - 1);

	do {
	$point = $trace_results[$level];
	$location = $point['file'] . ':' . $point['line'];
	$level++;
	$has_more = isset($trace_results[$level]);
	} while ( $has_more && $point['function'] == $trace_results[$level]['function'] );

	if ( !isset($this->ProfilePoints[$title]) ) {
	$this->ProfilePoints[$title] = Array ();
	}

	if ( !isset($this->ProfilePoints[$title][$location]) ) {
	$this->ProfilePoints[$title][$location] = 0;
	}

	$this->ProfilePoints[$title][$location]++;
	}

	/**
	* Generates report
	*
	* @param boolean $return_result Returns or output report contents.
	* @param boolean $clean_output_buffer Clean output buffers before displaying anything.
	* @param boolean $is_shutdown_func Called from shutdown function.
	*
	* @return string
	*/
	public function printReport($return_result = false, $clean_output_buffer = true, $is_shutdown_func = false)
	{
	if ( $this->_inReportPrinting ) {
	// don't print same report twice (in case if shutdown function used + compression + fatal error)
	return '';
	}

	$this->_inReportPrinting = true;
	$last_error = error_get_last();

	if ( !is_null($last_error) && $is_shutdown_func ) {
	$this->saveError(
	$last_error['type'],
	$last_error['message'],
	$last_error['file'],
	$last_error['line'],
	null,
	$is_shutdown_func
	);
	}

	$this->profileFinish('script_runtime');
	$this->_breakOutOfBuffering(!$return_result);

	$debugger_start = memory_get_usage();

	if ( defined('SPACER_URL') ) {
	$this->dummyImage = SPACER_URL;
	}

	$this->InitReport(); // set parameters required by AJAX

	// defined here, because user can define this constant while script is running, not event before debugger is started
	DebuggerUtil::safeDefine('DBG_RAISE_ON_WARNINGS', 0);
	DebuggerUtil::safeDefine('DBG_TOOLBAR_BUTTONS', 1);

	+ $this->appendRequest();
	$this->appendSession(); // show php session if any

	// ensure, that 1st line of debug output always is this one:
	$top_line = '<table cellspacing="0" cellpadding="0" style="width: ' . $this->getWindowWidth() . 'px; margin: 0px;"><tr><td align="left" width="50%">[<a href="javascript:window.location.reload();">Reload Frame</a>] [<a href="javascript:$Debugger.Toggle(27);">Hide Debugger</a>] [<a href="javascript:$Debugger.Clear();">Clear Debugger</a>]</td><td align="right" width="50%">[Current Time: <b>' . date('H:i:s') . '</b>] [File Size: <b>#DBG_FILESIZE#</b>]</td></tr><tr><td align="left" colspan="2" style="padding-top: 5px;">' . $this->getFilterDropdown() . '</td></tr></table>';

	$this->appendHTML($top_line);
	$this->moveToBegin(1);

	if ( count($this->ProfilePoints) > 0 ) {
	foreach ($this->ProfilePoints as $point => $locations) {
	arsort($this->ProfilePoints[$point]);
	}

	$this->appendHTML($this->highlightString($this->print_r($this->ProfilePoints, true)));
	}

	if ( DebuggerUtil::constOn('DBG_SQL_PROFILE') && isset($this->ProfilerTotals['sql']) ) {
	// sql query profiling was enabled -> show totals
	if ( array_key_exists('cachable_queries', $this->ProfilerTotalCount) ) {
	$append = ' <strong>Cachable queries</strong>: ' . $this->ProfilerTotalCount['cachable_queries'];
	}
	else {
	$append = '';
	}

	$this->appendHTML('<b>SQL Total time:</b> ' . $this->ProfilerTotals['sql'] . ' <b>Number of queries</b>: ' . $this->ProfilerTotalCount['sql'] . $append);
	}

	if ( DebuggerUtil::constOn('DBG_PROFILE_INCLUDES') && isset($this->ProfilerTotals['includes']) ) {
	// included file profiling was enabled -> show totals
	$this->appendHTML('<b>Included Files Total time:</b> ' . $this->ProfilerTotals['includes'] . ' Number of includes: ' . $this->ProfilerTotalCount['includes']);
	}

	if ( DebuggerUtil::constOn('DBG_PROFILE_MEMORY') ) {
	// detailed memory usage reporting by objects was enabled -> show totals
	$this->appendHTML('<b>Memory used by Objects:</b> ' . round($this->ProfilerTotals['objects'] / 1024, 2) . 'Kb');
	}

	if ( DebuggerUtil::constOn('DBG_INCLUDED_FILES') ) {
	$files = get_included_files();
	$this->appendHTML('<strong>Included files:</strong>');
	foreach ($files as $file) {
	$this->appendHTML($this->getFileLink($this->getLocalFile($file)) . ' (' . round(filesize($file) / 1024, 2) . 'Kb)');
	}
	}

	if ( DebuggerUtil::constOn('DBG_PROFILE_INCLUDES') ) {
	$totals = $totals_configs = Array ('mem' => 0, 'time' => 0);
	$this->appendHTML('<b>Included files statistics:</b>' . (DebuggerUtil::constOn('DBG_SORT_INCLUDES_MEM') ? ' (sorted by memory usage)' : ''));

	if ( is_array($this->IncludesData['mem']) ) {
	if ( DebuggerUtil::constOn('DBG_SORT_INCLUDES_MEM') ) {
	array_multisort($this->IncludesData['mem'], SORT_DESC, $this->IncludesData['file'], $this->IncludesData['time'], $this->IncludesData['level']);
	}

	foreach ($this->IncludesData['file'] as $key => $file_name) {
	$this->appendHTML(str_repeat(' -> ', ($this->IncludesData['level'][$key] >= 0 ? $this->IncludesData['level'][$key] : 0)) . $file_name . ' Mem: ' . sprintf("%.4f Kb", $this->IncludesData['mem'][$key] / 1024) . ' Time: ' . sprintf("%.4f", $this->IncludesData['time'][$key]));

	if ( $this->IncludesData['level'][$key] == 0 ) {
	$totals['mem'] += $this->IncludesData['mem'][$key];
	$totals['time'] += $this->IncludesData['time'][$key];
	}
	elseif ( $this->IncludesData['level'][$key] == -1 ) {
	$totals_configs['mem'] += $this->IncludesData['mem'][$key];
	$totals_configs['time'] += $this->IncludesData['time'][$key];
	}
	}

	$this->appendHTML('<b>Sub-Total classes:</b> ' . ' Mem: ' . sprintf("%.4f Kb", $totals['mem'] / 1024) . ' Time: ' . sprintf("%.4f", $totals['time']));
	$this->appendHTML('<b>Sub-Total configs:</b> ' . ' Mem: ' . sprintf("%.4f Kb", $totals_configs['mem'] / 1024) . ' Time: ' . sprintf("%.4f", $totals_configs['time']));
	$this->appendHTML('<span class="error"><b>Grand Total:</b></span> ' . ' Mem: ' . sprintf("%.4f Kb", ($totals['mem'] + $totals_configs['mem']) / 1024) . ' Time: ' . sprintf("%.4f", $totals['time'] + $totals_configs['time']));
	}
	}

	$skip_reporting = DebuggerUtil::constOn('DBG_SKIP_REPORTING') \|\| DebuggerUtil::constOn('DBG_ZEND_PRESENT');

	if ( ($this->_isAjax && !DebuggerUtil::constOn('DBG_SKIP_AJAX')) \|\| !$skip_reporting ) {
	$debug_file = $this->tempFolder . '/debug_' . $this->rowSeparator . '.txt';
	if ( file_exists($debug_file) ) {
	unlink($debug_file);
	}

	$i = 0;
	$fp = fopen($debug_file, 'a');
	$lineCount = count($this->Data);

	while ( $i < $lineCount ) {
	$html = $this->prepareHTML($i);
	$row_type = $this->getRowType($i);

	fwrite($fp, json_encode(Array ('html' => $html, 'row_type' => $row_type)) . $this->rowSeparator);
	$i++;
	}

	fclose($fp);
	}

	if ( $skip_reporting ) {
	// let debugger write report and then don't output anything
	return '';
	}

	$application =& kApplication::Instance();
	$dbg_path = str_replace(FULL_PATH, '', $this->tempFolder);

	$debugger_params = Array (
	'FilterTypes' => $this->_filterTypes,
	'RowSeparator' => $this->rowSeparator,
	'ErrorsCount' => (int)$this->getProfilerTotal('error_handling'),
	'IsFatalError' => $this->_fatalErrorHappened(),
	'SQLCount' => (int)$this->getProfilerTotal('sql'),
	'SQLTime' => isset($this->ProfilerTotals['sql']) ? sprintf('%.5f', $this->ProfilerTotals['sql']) : 0,
	'ScriptTime' => sprintf('%.5f', $this->ProfilerData['script_runtime']['ends'] - $this->ProfilerData['script_runtime']['begins']),
	'ScriptMemory' => DebuggerUtil::formatSize($this->getMemoryUsed($debugger_start)),
	'Shortcut' => DBG_SHORTCUT,
	);

	ob_start();
	// the <script .. /script> and hidden div helps browser to break out of script tag or attribute esacped
	// with " or ' in case fatal error (or user-error) occurs inside it in compiled template,
	// otherwise it has no effect
	?>
	<div style="display: none" x='nothing'><script></script></div><html><body></body></html>
	<link rel="stylesheet" rev="stylesheet" href="<?php echo $this->baseURL; ?>/debugger.css?v2" type="text/css" media="screen" />
	<script type="text/javascript" src="<?php echo $this->baseURL; ?>/debugger.js?v4"></script>

	<script type="text/javascript">
	var $Debugger = new Debugger(<?php echo json_encode($debugger_params); ?>);
	$Debugger.createEnvironment(<?php echo DBG_WINDOW_WIDTH; ?>, <?php echo $this->getWindowWidth(); ?>);

	$Debugger.DOMViewerURL = '<?php echo constant('DBG_DOMVIEWER'); ?>';
	$Debugger.DebugURL = '<?php echo $this->baseURL.'/debugger_responce.php?sid='.$this->rowSeparator.'&path='.urlencode($dbg_path); ?>';
	$Debugger.EventURL = '<?php echo /is_object($application->Factory) &&/ $application->InitDone ? $application->HREF('dummy', '', Array ('pass' => 'm', '__NO_REWRITE__' => 1)) : ''; ?>';
	$Debugger.BasePath = '<?php echo $this->basePath; ?>';
	<?php
	$is_install = defined('IS_INSTALL') && IS_INSTALL;

	if ( $this->_fatalErrorHappened()
	\|\| (!$is_install && DBG_RAISE_ON_WARNINGS && $this->WarningCount)
	) {
	echo '$Debugger.Toggle();';
	}
	if ( DBG_TOOLBAR_BUTTONS ) {
	echo '$Debugger.AddToolbar("$Debugger");';
	}
	?>
	window.focus();
	</script>
	<?php
	if ( $return_result ) {
	$ret = ob_get_contents();

	if ( $clean_output_buffer ) {
	ob_end_clean();
	}

	$ret .= $this->getShortReport($this->getMemoryUsed($debugger_start));

	return $ret;
	}
	else {
	if ( !DebuggerUtil::constOn('DBG_HIDE_FULL_REPORT') ) {
	$this->_breakOutOfBuffering();
	}
	elseif ( $clean_output_buffer ) {
	ob_clean();
	}

	echo $this->getShortReport($this->getMemoryUsed($debugger_start));
	}

	return '';
	}

	function getFilterDropdown()
	{
	$filter_options = '';

	foreach ( $this->_filterTypes as $filter_type ) {
	$filter_options .= '<option value="' . $filter_type . '">' . $filter_type . '</option>';
	}

	return 'Show: <select id="dbg_filter" onchange="$Debugger.Filter()"><option value="">All</option>' . $filter_options .'</select>';
	}

	function getMemoryUsed($debugger_start)
	{
	if ( !isset($this->ProfilerTotals['error_handling']) ) {
	$memory_used = $debugger_start;
	$this->ProfilerTotalCount['error_handling'] = 0;
	}
	else {
	$memory_used = $debugger_start - $this->ProfilerTotals['error_handling'];
	}

	return $memory_used;
	}

	/**
	* Format's memory usage report by debugger
	*
	* @param int $memory_used
	* @return string
	* @access private
	*/
	private function getShortReport($memory_used)
	{
	if ( DebuggerUtil::constOn('DBG_TOOLBAR_BUTTONS') ) {
	// evenrything is in toolbar - don't duplicate
	return '';
	}
	else {
	// toolbar not visible, then show sql & error count too
	$info = Array (
	'Script Runtime' => 'PROFILE:script_runtime',
	'SQL\'s Runtime' => 'PROFILE_T:sql',
	'-' => 'SEP:-',
	'Notice / Warning' => 'PROFILE_TC:error_handling',
	'SQLs Count' => 'PROFILE_TC:sql',
	);
	}

	$ret = ''; // '<tr><td>Application:</td><td><b>' . DebuggerUtil::formatSize($memory_used) . '</b> (' . $memory_used . ')</td></tr>';

	foreach ($info as $title => $value_key) {
	list ($record_type, $record_data) = explode(':', $value_key, 2);
	switch ( $record_type ) {
	case 'PROFILE': // profiler totals value
	$Data =& $this->ProfilerData[$record_data];
	$profile_time = ($Data['ends'] - $Data['begins']); // in seconds
	$ret .= '<tr><td>' . $title . ':</td><td><b>' . sprintf('%.5f', $profile_time) . ' s</b></td></tr>';
	break;

	case 'PROFILE_TC': // profile totals record count
	$record_cell = '<td>';
	if ( $record_data == 'error_handling' && $this->ProfilerTotalCount[$record_data] > 0 ) {
	$record_cell = '<td class="debug_error">';
	}
	$ret .= '<tr>' . $record_cell . $title . ':</td>' . $record_cell . '<b>' . $this->ProfilerTotalCount[$record_data] . '</b></td></tr>';
	break;

	case 'PROFILE_T': // profile total
	$record_cell = '<td>';
	$total = array_key_exists($record_data, $this->ProfilerTotals) ? $this->ProfilerTotals[$record_data] : 0;
	$ret .= '<tr>' . $record_cell . $title . ':</td>' . $record_cell . '<b>' . sprintf('%.5f', $total) . ' s</b></td></tr>';
	break;

	case 'SEP':
	$ret .= '<tr><td colspan="2" style="height: 1px; background-color: #000000; padding: 0px;"><img src="' . $this->dummyImage . '" height="1" alt=""/></td></tr>';
	break;
	}
	}

	return '<br /><table class="dbg_stats_table"><tr><td style="border-color: #FFFFFF;"><table class="dbg_stats_table" align="left">' . $ret . '</table></td></tr></table>';
	}

	/**
	* Detects if there was a fatal error at some point
	*
	* @return boolean
	*/
	private function _fatalErrorHappened()
	{
	return $this->_fatalErrorHash !== 0;
	}

	/**
	* Creates error hash
	*
	* @param string $errfile File, where error happened.
	* @param integer $errline Line in file, where error happened.
	*
	* @return integer
	*/
	private function _getErrorHash($errfile, $errline)
	{
	return crc32($errfile . ':' . $errline);
	}

	/**
	* User-defined error handler
	*
	* @param integer $errno Error code.
	* @param string $errstr Error message.
	* @param string $errfile Error file.
	* @param integer $errline Error line.
	* @param array $errcontext Error context.
	* @param boolean $is_shutdown_func Called from shutdown function.
	*
	* @return boolean
	* @throws Exception When unknown error code given.
	*/
	public function saveError(
	$errno,
	$errstr,
	$errfile = null,
	$errline = null,
	array $errcontext = null,
	$is_shutdown_func = false
	) {
	$this->ProfilerData['error_handling']['begins'] = memory_get_usage();

	$errorType = $this->getErrorNameByCode($errno);

	if (!$errorType) {
	throw new Exception('Unknown error type [' . $errno . ']');
	}
	elseif ( substr($errorType, 0, 5) == 'Fatal' ) {
	$this->_fatalErrorHash = $this->_getErrorHash($errfile, $errline);
	$this->appendTrace(4);
	}
	elseif ( !kLogger::isErrorOriginAllowed($errfile) ) {
	return;
	}

	$this->expandError($errstr, $errfile, $errline);

	$this->Data[] = Array (
	'no' => $errno, 'str' => $errstr, 'file' => $errfile, 'line' => $errline,
	'context' => $errcontext, 'debug_type' => 'error'
	);

	$this->ProfilerData['error_handling']['ends'] = memory_get_usage();
	$this->profilerAddTotal('error_handling', 'error_handling');

	if ($errorType == 'Warning') {
	$this->WarningCount++;
	}

	if ( $this->_fatalErrorHappened()
	&& $this->_getErrorHash($errfile, $errline) === $this->_fatalErrorHash
	) {
	// Append debugger report to data in buffer & clean buffer afterwards.
	echo $this->_breakOutOfBuffering(false) . $this->printReport(true);

	if ( !$is_shutdown_func ) {
	exit;
	}
	}

	return true;
	}

	/**
	* Adds exception details into debugger but don't cause fatal error
	*
	* @param Exception $exception
	* @return void
	* @access public
	*/
	public function appendException($exception)
	{
	$this->ProfilerData['error_handling']['begins'] = memory_get_usage();

	$this->appendExceptionTrace($exception);

	$errno = $exception->getCode();
	$errstr = $exception->getMessage();
	$errfile = $exception->getFile();
	$errline = $exception->getLine();

	$this->expandError($errstr, $errfile, $errline);

	$this->Data[] = Array (
	'no' => $errno, 'str' => $errstr, 'file' => $errfile, 'line' => $errline,
	'exception_class' => get_class($exception), 'debug_type' => 'exception'
	);

	$this->ProfilerData['error_handling']['ends'] = memory_get_usage();
	$this->profilerAddTotal('error_handling', 'error_handling');
	}

	/**
	* User-defined exception handler
	*
	* @param Exception $exception
	* @return void
	* @access public
	*/
	public function saveException($exception)
	{
	$this->appendException($exception);
	$this->_fatalErrorHash = $this->_getErrorHash($exception->getFile(), $exception->getLine());

	// Append debugger report to data in buffer & clean buffer afterwards.
	echo $this->_breakOutOfBuffering(false) . $this->printReport(true);
	}

	/**
	* Transforms short error messages into long ones
	*
	* @param string $errstr
	* @param string $errfile
	* @param int $errline
	* @return void
	* @access private
	*/
	private function expandError(&$errstr, &$errfile, &$errline)
	{
	$errstr = kLogger::expandMessage($errstr);
	list ($errno, $errstr, $sql) = kLogger::parseDatabaseError($errstr);

	if ( $errno != 0 ) {
	$errstr = '<span class="debug_error">' . $errstr . ' (' . $errno . ')</span><br/><strong>SQL</strong>: ' . $this->formatSQL($sql);
	}

	if ( strpos($errfile, 'eval()\'d code') !== false ) {
	$errstr = '[<b>EVAL</b>, line <b>' . $errline . '</b>]: ' . $errstr;
	$tmpStr = $errfile;
	$pos = strpos($tmpStr, '(');
	$errfile = substr($tmpStr, 0, $pos);
	$pos++;
	$errline = substr($tmpStr, $pos, strpos($tmpStr, ')', $pos) - $pos);
	}
	}

	/**
	* Break buffering in case if fatal error is happened in the middle
	*
	* @param bool $flush
	* @return string
	* @access private
	*/
	private function _breakOutOfBuffering($flush = true)
	{
	$buffer_content = Array ();
	while ( ob_get_level() ) {
	$buffer_content[] = ob_get_clean();
	}

	$ret = implode('', array_reverse($buffer_content));
	if ( $flush ) {
	echo $ret;
	flush();
	}

	return $ret;
	}

	/**
	* Saves given message to "vb_debug.txt" file in DocumentRoot
	*
	* @param string $msg
	* @return void
	* @access public
	*/
	public function saveToFile($msg)
	{
	$fp = fopen($_SERVER['DOCUMENT_ROOT'] . '/vb_debug.txt', 'a');
	fwrite($fp, $msg . "\n");
	fclose($fp);
	}

	/**
	* Prints given constant values in a table
	*
	* @param mixed $constants
	* @return void
	* @access public
	*/
	public function printConstants($constants)
	{
	if ( !is_array($constants) ) {
	$constants = explode(',', $constants);
	}

	$constant_tpl = '<tr><td>%s</td><td><b>%s</b></td></tr>';
	$ret = '<table class="dbg_flat_table" style="width: ' . $this->getWindowWidth() . 'px;">';

	foreach ($constants as $constant_name) {
	$ret .= sprintf($constant_tpl, $constant_name, constant($constant_name));
	}

	$ret .= '</table>';
	$this->appendHTML($ret);
	}

	/**
	* Attaches debugger to Application
	*
	* @return void
	* @access public
	*/
	public function AttachToApplication()
	{
	if ( !DebuggerUtil::constOn('DBG_HANDLE_ERRORS') ) {
	return;
	}

	if ( class_exists('kApplication') ) {
	$this->Application =& kApplication::Instance();
	$this->Application->Debugger = $this;
	}

	// kLogger will auto-detect these automatically
	// error/exception handlers registered before debugger will be removed!
	set_error_handler( Array ($this, 'saveError') );
	set_exception_handler( Array ($this, 'saveException') );
	}

	/**
	* Returns HTML for tools section
	*
	* @return string
	* @access private
	*/
	private function _getToolsHTML()
	{
	$html = '<table>
	<tr>
	<td>System Tools:</td>
	<td>
	<select id="reset_cache" style="border: 1px solid #000000;">
	<option value=""></option>
	<option value="events[adm][OnResetModRwCache]">Reset mod_rewrite Cache</option>
	<option value="events[adm][OnResetCMSMenuCache]">Reset SMS Menu Cache</option>
	<option value="events[adm][OnResetSections]">Reset Sections Cache</option>
	<option value="events[adm][OnResetConfigsCache]">Reset Configs Cache</option>
	<option value="events[adm][OnRebuildThemes]">Re-build Themes Files</option>
	<option value="events[lang][OnReflectMultiLingualFields]">Re-build Multilanguage Fields</option>
	<option value="events[adm][OnDeleteCompiledTemplates]">Delete Compiled Templates</option>
	</select>
	</td>
	<td>
	<input type="button" class="button" onclick="$Debugger.resetCache(\'reset_cache\');" value="Go"/>
	</td>
	</tr>
	</table>';

	return $html;
	}

	/**
	* Returns HTML for dom viewer section
	*
	* @return string
	* @access private
	*/
	private function _getDomViewerHTML()
	{
	$html = '<table>
	<tr>
	<td>
	<a href="http://www.brainjar.com/dhtml/domviewer/" target="_blank">DomViewer</a>:
	</td>
	<td>
	<input id="dbg_domviewer" type="text" value="window" style="border: 1px solid #000000;"/>
	</td>
	<td>
	<button class="button" onclick="return $Debugger.OpenDOMViewer();">Show</button>
	</td>
	</tr>
	</table>';

	return $html;
	}
	}

	if ( !function_exists('memory_get_usage') ) {
	// PHP 4.x and compiled without --enable-memory-limit option
	function memory_get_usage()
	{
	return -1;
	}
	}

	if ( !DebuggerUtil::constOn('DBG_ZEND_PRESENT') ) {
	$debugger = new Debugger();
	}

	if ( DebuggerUtil::constOn('DBG_USE_SHUTDOWN_FUNC') ) {
	register_shutdown_function(array(&$debugger, 'printReport'), false, true, true);
	}
	}
	Index: branches/5.3.x
	===================================================================
	--- branches/5.3.x (revision 16729)
	+++ branches/5.3.x (revision 16730)

	Property changes on: branches/5.3.x
	___________________________________________________________________
	Modified: svn:mergeinfo
	## -0,0 +0,1 ##
	Merged /in-portal/branches/5.2.x:r16728-16729

in-portalNo OneTemporaryActions

File Metadata

in-portalView Options

Event Timeline

in-portal
No OneTemporary
Actions

in-portal
View Options