in-portal
No OneTemporary
Actions

Subscribers

None

File Metadata

Created: Sun, Jul 20, 6:30 AM

in-portal
View Options

	Index: trunk/core/kernel/utility/http_query.php
	===================================================================
	--- trunk/core/kernel/utility/http_query.php (revision 4575)
	+++ trunk/core/kernel/utility/http_query.php (revision 4576)
	@@ -1,778 +1,778 @@
	<?php

	class kHTTPQuery extends Params {
	/**
	* $_POST vars
	*
	* @var Array
	* @access private
	*/
	var $Post;

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

	/**
	* $_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();

	var $Admin = false;

	/**
	* Description
	*
	* @var kDBConnection
	* @access public
	*/
	var $Conn;

	/**
	* Loads info from $_POST, $_GET and
	* related arrays into common place
	*
	* @param string $order
	* @return HTTPQuery
	* @access public
	*/
	function kHTTPQuery($order = 'CGPF')
	{
	parent::Params();
	$this->Conn =& $this->Application->GetADODBConnection();

	$this->Order = $order;
	$this->Admin = $this->Application->IsAdmin(); // better cache this value, not to calculate it each time in foreach
	}

	function Init($prefix, $special)
	{
	$this->AddAllVars();

	$this->specialsToRemove = $this->Get('remove_specials');
	if($this->specialsToRemove)
	{
	$this->_Params = $this->removeSpecials($this->_Params);
	}
	ini_set('magic_quotes_gpc', 0);
	}

	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;
	}

	/**
	* All all requested vars to
	* common storage place
	*
	* @access private
	*/
	function AddAllVars()
	{
	for ($i=0; $i < strlen($this->Order); $i++)
	{
	$current = $this->Order[$i];
	switch ($current) {
	case 'G':
	$this->Get = $this->AddVars($_GET);
	$this->processQueryString();
	break;

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

	case 'C':
	$this->Cookie = $this->AddVars($_COOKIE);
	break;

	case 'E';
	$this->Env = $this->AddVars($_ENV);
	break;

	case 'S';
	$this->Server = $this->AddVars($_SERVER);
	break;

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

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

	}
	else {
	$this->Application->VerifyLanguageId();
	$this->Application->VerifyThemeId();
	}
	}

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

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

	$tmp = Array();
	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 false;

	$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);
	unset($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;
	}

	/**
	* Owerwrites GET events with POST events in case if they are set and not empty
	*
	*/
	function convertPostEvents()
	{
	$events = $this->Get('events');
	if( is_array($events) )
	{
	foreach ($events as $prefix_special => $event_name)
	{
	if($event_name) $this->Set($prefix_special.'_event', $event_name);
	}
	}
	}

	function finalizeParsing($passed = Array(), $module_params = Array() )
	{
	if ($passed) {
	$event_manger =& $this->Application->recallObject('EventManager');
	foreach ($passed as $passed_prefix) {
	$event_manger->setQueryMap($passed_prefix);
	}
	}

	// get joined version (env var + mod rewrite parsed)
	$passed = $this->Application->GetVar('passed');
	$env = $this->Application->BuildEnv( $this->Get('t'), $module_params, $passed, false, false );
	$this->Set(ENV_VAR_NAME, $env);
	$_REQUEST['env'] = $_GET['env'] = $env; // for capability with old in-portal code
	}

	function processRewriteURL()
	{
	// directory_1_2_3/sc1/inlink/detail/3/l1_ka_asd.html

	$url = $this->Get('_mod_rw_url_');
	if( substr($url, -5) == '.html' ) $url = substr($url, 0, strlen($url) - 5 );

	$url_parts = $url ? explode('/', $url) : Array();

	$process_module = true;
	if($this->Get('rewrite') == 'on' \|\| !$url_parts)
	{
	// set default values
	$defaults = Array('m_cat_id' => 0, 'm_cat_page' => 1, 'm_opener' => 's');
	foreach ($defaults as $default_key => $default_value)
	{
	if ($this->Get($default_key) == null) {
	$this->Set($default_key, $default_value);
	}
	}
	}

	if(!$url_parts)
	{
	$this->Application->Phrases = new PhrasesCache();
	$this->Application->VerifyLanguageId();
	$this->Application->Phrases->Init('phrases');
	$this->Application->VerifyThemeId();

	$this->Set('t', $this->getDefaultTemplate('') );
	$this->finalizeParsing(Array('m'));
	return false;
	}
	else
	{
	$this->Set('t', '');
	}

	$url_part = array_shift($url_parts);

	// match language
	$sql = 'SELECT LanguageId FROM '.TABLE_PREFIX.'Language WHERE LOWER(PackName) = '.$this->Conn->qstr($url_part).' AND Enabled = 1';
	$language_id = $this->Conn->GetOne($sql);
	$this->Application->Phrases = new PhrasesCache();
	if($language_id)
	{
	$this->Set('m_lang', $language_id);
	$url_part = $url_parts ? array_shift($url_parts) : ''; // prepare next url part for parsing
	}

	$this->Application->VerifyLanguageId();

	// $this->Get('m_lang') );

	// match theme
	if($url_part)
	{
	$sql = 'SELECT ThemeId FROM '.TABLE_PREFIX.'Theme WHERE LOWER(Name) = '.$this->Conn->qstr($url_part).' AND Enabled = 1';
	$theme_id = $this->Conn->GetOne($sql);
	if($theme_id)
	{
	$this->Set('m_theme', $theme_id);
	$url_part = $url_parts ? array_shift($url_parts) : ''; // prepare next url part for parsing
	}
	}
	$this->Application->VerifyThemeId(); // verify anyway - will set default if not found!!!

	// match category
	$category_id = 0;
	if($url_part)
	{
	$category_stack = Array();
	$category_found = false;
	$category_path = '';
	$rets = Array(); // just in case someone has used this variable before
	do
	{
	$category_path = trim($category_path.'/'.$url_part, '/');

	if( preg_match('/(.*)_([\d]+)$/', $category_path, $rets) )
	{
	$category_path = $rets[1];
	$this->Set('m_cat_page', $rets[2]);
	}

	$sql = 'SELECT CategoryId
	FROM '.TABLE_PREFIX.'Category
	WHERE NamedParentPath = '.$this->Conn->qstr($category_path);
	array_push($category_stack, $this->Conn->GetOne($sql) );
	$category_found = end($category_stack);
	if($category_found) $url_part = array_shift($url_parts);

	}while ($category_found && $url_part);

	if (count($category_stack)) {
	$category_id = array_pop($category_stack); // remove last not found category
	if($category_id === false)
	{
	$category_id = array_pop($category_stack);
	}
	if($category_id)
	{
	$this->Set('m_cat_id', $category_id);
	}
	}
	elseif (!$category_found && getArrayValue($rets, 2)) {
	$url_part = array_shift($url_parts);
	}
	}


	if (!$url_part) {
	// no more parts left in url
	$process_module = false;
	$sql = 'SELECT CachedCategoryTemplate
	FROM '.TABLE_PREFIX.'Category
	WHERE CategoryId = '.$category_id;
	$category_template = $this->Conn->GetOne($sql);
	if ($category_template) {
	$category_template = explode('/', $category_template);
	$url_part = array_shift($category_template);
	$url_parts = $category_template;
	}
	else {
	$url_part = 'index';
	}
	}
	elseif ($url_part && count($url_parts) <= 1 && $category_id) {
	// only filename left, no other parts
	$process_module = false;
	$sql = 'SELECT ParentPath, CachedItemTemplate, CachedCategoryTemplate
	FROM '.TABLE_PREFIX.'Category
	WHERE CategoryId = '.$category_id;
	$category_data = $this->Conn->GetRow($sql);

	$root_category_id = array_shift( explode('\|', substr($category_data['ParentPath'], 1, -1)) );
	$module_info = $this->Application->findModule('RootCat', $root_category_id);
	if ($module_info) {
	$module_prefix = $module_info['Var'];
	$module_event = new kEvent($module_prefix.':ParseEnv', Array('url_parts' => array_merge(Array($url_part), $url_parts)) );
	$this->Application->HandleEvent($module_event);

	if ($module_event->status == erSUCCESS && $this->Get($module_prefix.'_id')) {
	$item_template = $category_data['CachedItemTemplate'];
	if ($item_template) {
	$url_parts = explode('/', $item_template);
	array_push($url_parts, $url_part); // save item's filename as not processed
	$url_part = array_shift($url_parts);
	}
	}
	elseif (!$module_event->getEventParam('url_parts')) {
	// parseEnv has processed that param
	$url_part = '';
	$category_template = $category_data['CachedCategoryTemplate'];
	if ($category_template) {
	$category_template = explode('/', $category_template);
	$url_part = array_shift($category_template);
	$url_parts = $category_template;
	}
	else {
	$url_part = 'index';
	}
	}
	}
	}

	// match module
	$next_template = $this->Get('next_template');
	if($url_part \|\| $next_template)
	{
	if($next_template)
	{
	$next_template_parts = explode('/', $next_template);
	$module_folder = array_shift($next_template_parts);
	}
	else
	{
	$module_folder = $url_part;
	}

	foreach ($this->Application->ModuleInfo as $module_name => $module_data)
	{
	if( trim($module_data['TemplatePath'], '/') == $module_folder )
	{
	$module_prefix = $module_data['Var'];
	break;
	}
	}
	}

	// match template
	$template_path = '';
	$template_found = false;
	if($url_part)
	{
	// search for template in real template records
	array_unshift($url_parts, $url_part);
	$template_parts = $url_parts;
	$url_parts = Array();
	do
	{
	$template_path = implode('/', $template_parts);

	$t_parts['path'] = dirname($template_path) == '.' ? '' : '/'.dirname($template_path);
	$t_parts['file'] = basename($template_path);

	$sql = 'SELECT FileId
	FROM '.TABLE_PREFIX.'ThemeFiles
	WHERE (FilePath = '.$this->Conn->qstr($t_parts['path']).') AND (FileName = '.$this->Conn->qstr($t_parts['file'].'.tpl').')';

	// $sql = 'SELECT FileId FROM '.TABLE_PREFIX.'ThemeFiles WHERE CONCAT(FilePath, "/", FileName) = '.$this->Conn->qstr('/'.$template_path.'.tpl');
	$template_found = $this->Conn->GetOne($sql);
	if(!$template_found)
	{
	array_unshift( $url_parts, array_pop($template_parts) );
	}

	}while (!$template_found && $template_parts);

	// try to find template in virtual templates in case if such ability exists
	- if ($this->Application->findModule('Name', 'In-CMS', 'Loaded') && !$template_found) {
	+ if ($this->Application->isModuleEnabled('In-CMS') && !$template_found) {

	$template_parts = $url_parts;
	$url_parts = Array();
	do
	{
	$template_path = implode('/', $template_parts);

	$sql = 'SELECT PageId FROM '.TABLE_PREFIX.'Pages WHERE Path = '.$this->Conn->qstr($template_path);
	$template_found = $this->Conn->GetOne($sql);
	if(!$template_found)
	{
	array_unshift( $url_parts, array_pop($template_parts) );
	}

	}while (!$template_found && $template_parts);
	}
	}

	// guess template if no existing template found
	if(!$template_found && isset($module_folder) && $module_folder)
	{
	// 1. try index template of module
	$sql = 'SELECT FileId FROM '.TABLE_PREFIX.'ThemeFiles WHERE CONCAT(FilePath, "/", FileName) = '.$this->Conn->qstr('/'.$module_folder.'/index.tpl');
	$template_found = $this->Conn->GetOne($sql);
	if($template_found)
	{
	$template_path = $module_folder.'/index';
	array_shift($url_parts);
	}
	else
	{
	// 2. return error template then
	$template_found = true;
	$template_path = $this->Application->ConfigValue('ErrorTemplate');
	if(!$template_path) $template_path = 'error_notfound';

	header('HTTP/1.0 404 Not Found');
	}
	}

	$this->Set('t', $this->getDefaultTemplate($template_found ? $template_path : '') );

	// pass params left to module

	$this->Application->Phrases->Init('phrases');
	$passed = Array('m');
	$module_params = Array();
	if ( isset($module_prefix) ) {
	$passed[] = $module_prefix;
	$module_event = new kEvent($module_prefix.':ParseEnv', Array('url_parts' => $url_parts) );
	if ($process_module) {
	$this->Application->HandleEvent($module_event);
	}
	$item_id = $this->Get($module_prefix.'_id');
	$module_params = Array($module_prefix.'_id' => $item_id ? $item_id : '0' );

	if ($module_event->status == erFAIL) {
	$not_found = $this->Application->ConfigValue('ErrorTemplate');
	$this->Set('t', $not_found ? $not_found : 'error_notfound' );
	}
	}

	$this->finalizeParsing($passed, $module_params);
	}

	function getDefaultTemplate($t)
	{
	$t = $this->getTemplateName( trim($t, '/') );
	if (!$t) $t = 'index';
	return trim($t, '/');
	}

	function extractSIDAndTemplate(&$parts)
	{
	if ( defined('INPORTAL_ENV') && INPORTAL_ENV ) // SID-TEMPLATE
	{
	$sub_parts = array_shift($parts);
	list($sid, $t) = explode('-', $sub_parts, 2);

	// Save Session ID
	if($sid)
	{
	$this->Set('sid', $sid);
	$this->Get['sid'] = $sid;
	}

	// Save Template Name
	$this->Set('t', $this->getDefaultTemplate($t) );
	}
	else // SID:TEMPLATE
	{
	// Save Session ID
	$sid = array_shift($parts);
	if ($sid) $this->Set('sid', $sid);

	// Save Template Name
	$t = array_shift($parts);
	$this->Set('t', $this->getDefaultTemplate($t) );
	}
	}

	/**
	* Process QueryString only, create
	* events, ids, based on config
	* set template name and sid in
	* desired application variables.
	*
	* @access private
	*/
	function processQueryString()
	{
	// env=SID:TEMPLATE:m-1-1-1-1:l0-0-0:n-0-0-0:bb-0-0-1-1-1-0

	$env_var = $this->Get(ENV_VAR_NAME);
	if($env_var)
	{
	$env_var = str_replace('\:','_&+$$+&_', $env_var); // replace escaped "=" with spec-chars :)
	$parts = explode(':', $env_var);

	if( !$this->Application->RewriteURLs() \|\| ($this->Application->RewriteURLs() && $this->Get('rewrite') != 'on') )
	{
	$this->extractSIDAndTemplate($parts);
	}

	if($parts)
	{
	$query_maps = Array();
	$event_manger =& $this->Application->recallObject('EventManager');

	$passed = Array();

	foreach($parts as $mixed_part)
	{
	//In-portal old style env conversion - adds '-' between prefix and first var
	$mixed_part = str_replace('_&+$$+&_',':',$mixed_part);
	$mixed_part = preg_replace("/^([a-zA-Z]+)([0-9]+)-(.*)/", "$1-$2-$3", $mixed_part);

	$escaped_part = str_replace('\-', '_&+$$+&_', $mixed_part);
	$escaped_part = explode('-', $escaped_part);

	$mixed_part = array();
	foreach ($escaped_part as $escaped_val) {
	$mixed_part[] = str_replace('_&+$$+&_', '-', $escaped_val);
	}

	$prefix_special = array_shift($mixed_part); // l.pick, l
	$query_map = $event_manger->setQueryMap($prefix_special);

	// if config is not defined for prefix in QueryString, then don't process it
	if ($query_map) {
	foreach($query_map as $index => $var_name)
	{
	// l_id, l_page, l_bla-bla-bla
	$val = $mixed_part[$index - 1];
	if ($val == '') $val = false;
	$this->Set($prefix_special.'_'.$var_name, $val);
	}
	}
	}
	}
	}
	else
	{
	$t=$this->getTemplateName('index');
	$this->Set('t', $t);
	}
	}

	/**
	* Decides what template name to
	* use from $_GET or from $_POST
	*
	* @param string $querystring_template
	* @return string
	* @access private
	*/
	function getTemplateName($querystring_template)
	{
	$t_from_post = $this->Get('t');
	$t = $t_from_post ? $t_from_post : $querystring_template;

	if ( is_numeric($t) )
	{
	$t = $this->Conn->GetOne(' SELECT CONCAT(FilePath, \'/\', FileName)
	FROM '.TABLE_PREFIX.'ThemeFiles
	WHERE FileId = '.$t);
	}
	$t = preg_replace('/\.tpl$/', '', $t);

	return $t;
	}

	/**
	* Saves variables from array specified
	* into common variable storage place
	*
	* @param Array $array
	* @return Array
	* @access private
	*/
	function AddVars($array)
	{
	$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)
	{
	$this->_Params = array_merge_recursive2($this->_Params, Array($key=>$value));
	}
	return $array;
	}

	function StripSlashes($array)
	{
	//if( !get_magic_quotes_gpc() ) return $array;
	foreach($array as $key=>$value)
	{
	if( is_array($value) )
	{
	$array[$key] = $this->StripSlashes($value);
	}
	else
	{
	if( get_magic_quotes_gpc() ) $value = stripslashes($value);
	if(!$this->Admin) $value = htmlspecialchars($value);
	$array[$key] = $value;
	}
	//$array[$key]=is_array($value)?$this->StripSlashes($value):stripslashes($value);
	}
	return $array;
	}

	/**
	* Returns all $_GET array excluding system parameters, that are not allowed to be passed through generated urls
	*
	* @return Array
	*/
	function getRedirectParams()
	{
	$unset_vars = Array(ENV_VAR_NAME, 'rewrite', '_mod_rw_url_', 'Action');
	$ret = $this->Get;
	foreach ($unset_vars as $var_name)
	{
	if( isset($ret[$var_name]) ) unset( $ret[$var_name] );
	}
	return $ret;
	}
	}

	?>
	\ No newline at end of file

	Property changes on: trunk/core/kernel/utility/http_query.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.45
	\ No newline at end of property
	+1.46
	\ No newline at end of property
	Index: trunk/core/kernel/application.php
	===================================================================
	--- trunk/core/kernel/application.php (revision 4575)
	+++ trunk/core/kernel/application.php (revision 4576)
	@@ -1,1837 +1,1834 @@
	<?php

	/**
	* Basic class for Kernel3-based Application
	*
	* This class is a Facade for any other class which needs to deal with Kernel3 framework.<br>
	* The class incapsulates the main run-cycle of the script, provide access to all other objects in the framework.<br>
	* <br>
	* The class is a singleton, which means that there could be only one instance of KernelApplication in the script.<br>
	* This could be guranteed by NOT calling the class constuctor directly, but rather calling KernelApplication::Instance() method,
	* which returns an instance of the application. The method gurantees that it will return exactly the same instance for any call.<br>
	* See singleton pattern by GOF.
	* @package kernel4
	*/

	class kApplication {

	/**
	* Is true, when Init method was called already, prevents double initialization
	*
	* @var bool
	*/
	var $InitDone = false;

	/**
	* Holds internal TemplateParser object
	* @access private
	* @var TemplateParser
	*/
	var $Parser;

	/**
	* Holds parser output buffer
	* @access private
	* @var string
	*/
	var $HTML;

	/**
	* Prevents request from beeing proceeded twice in case if application init is called mere then one time
	*
	* @var bool
	* @todo This is not good anyway (by Alex)
	*/
	var $RequestProcessed = false;

	/**
	* The main Factory used to create
	* almost any class of kernel and
	* modules
	*
	* @access private
	* @var kFactory
	*/
	var $Factory;

	/**
	* All ConfigurationValues table content (hash) here
	*
	* @var Array
	* @access private
	*/
	var $ConfigHash = Array();

	/**
	* Reference to debugger
	*
	* @var Debugger
	*/
	var $Debugger = null;

	/**
	* Holds all phrases used
	* in code and template
	*
	* @var PhrasesCache
	*/
	var $Phrases;

	/**
	* Modules table content, key - module name
	*
	* @var Array
	*/
	var $ModuleInfo = Array();

	/**
	* Holds DBConnection
	*
	* @var kDBConnection
	*/
	var $DB;

	/**
	* Maintains list of user-defined error handlers
	*
	* @var Array
	*/
	var $errorHandlers = Array();

	/**
	* Returns kApplication instance anywhere in the script.
	*
	* This method should be used to get single kApplication object instance anywhere in the
	* Kernel-based application. The method is guranteed to return the SAME instance of kApplication.
	* Anywhere in the script you could write:
	* <code>
	* $application =& kApplication::Instance();
	* </code>
	* or in an object:
	* <code>
	* $this->Application =& kApplication::Instance();
	* </code>
	* to get the instance of kApplication. Note that we call the Instance method as STATIC - directly from the class.
	* To use descendand of standard kApplication class in your project you would need to define APPLICATION_CLASS constant
	* BEFORE calling kApplication::Instance() for the first time. If APPLICATION_CLASS is not defined the method would
	* create and return default KernelApplication instance.
	* @static
	* @access public
	* @return kApplication
	*/
	function &Instance()
	{
	static $instance = false;

	if(!$instance)
	{
	safeDefine('APPLICATION_CLASS', 'kApplication');
	$class = APPLICATION_CLASS;
	$instance = new $class();
	}
	return $instance;
	}

	/**
	* Returns module information. Searches module by requested field
	*
	* @param string $field
	* @param mixed $value
	* @param string field value to returns, if not specified, then return all fields
	* @return Array
	*/
	function findModule($field, $value, $return_field = null)
	{
	$found = false;
	foreach ($this->ModuleInfo as $module_name => $module_info) {
	if ($module_info[$field] == $value) {
	$found = true;
	break;
	}
	}

	if ($found) {
	return isset($return_field) ? $module_info[$return_field] : $module_info;
	}

	return false;
	}

	/**
	* Initializes the Application
	*
	* @access public
	* @see kHTTPQuery
	* @see Session
	* @see TemplatesCache
	* @return bool Was Init actually made now or before
	*/
	function Init()
	{
	if($this->InitDone) return false;

	if( $this->isDebugMode() && dbg_ConstOn('DBG_PROFILE_MEMORY') )
	{
	$this->Debugger->appendMemoryUsage('Application before Init:');
	}

	if( !$this->isDebugMode() && !constOn('DBG_ZEND_PRESENT') )
	{
	error_reporting(0);
	ini_set('display_errors', 0);
	}

	if( !constOn('DBG_ZEND_PRESENT') )
	{
	$error_handler = set_error_handler( Array(&$this,'handleError') );
	if($error_handler) $this->errorHandlers[] = $error_handler;
	}

	$this->DB = new kDBConnection(SQL_TYPE, Array(&$this,'handleSQLError') );
	$this->DB->Connect(SQL_SERVER, SQL_USER, SQL_PASS, SQL_DB);
	$this->DB->debugMode = $this->isDebugMode();

	$this->refreshModuleInfo();
	$this->ConfigHash = $this->DB->GetCol('SELECT VariableValue, VariableName FROM '.TABLE_PREFIX.'ConfigurationValues', 'VariableName');

	$rewrite_on = $this->ConfigValue('UseModRewrite');
	$admin_on = getArrayValue($_REQUEST, 'admin') \|\| $this->IsAdmin();
	define('MOD_REWRITE', $rewrite_on && !$admin_on ? 1 : 0);

	$this->Factory = new kFactory();

	$this->registerDefaultClasses();
	$this->SetDefaultConstants();

	// 1. to read configs before doing any recallObject (called from "SetDefaultConstants" anyway)
	$config_reader =& $this->recallObject('kUnitConfigReader');

	// Module items are recalled during url parsing & PhrasesCache is needed already there,
	// because it's used in their build events. That's why phrases cache initialization is
	// called from kHTTPQuery in case when mod_rewrite is used
	if (!$this->RewriteURLs()) {
	$this->Phrases = new PhrasesCache();
	$this->Phrases->Init('phrases');
	}

	if( !$this->RecallVar('UserGroups') )
	{
	$session =& $this->recallObject('Session');
	$user_groups = trim($session->GetField('GroupList'), ',');
	if (!$user_groups) $user_groups = $this->ConfigValue('User_GuestGroup');
	$this->StoreVar('UserGroups', $user_groups);
	}

	if( $this->GetVar('m_cat_id') === false ) $this->SetVar('m_cat_id', 0);
	if( !$this->RecallVar('curr_iso') ) $this->StoreVar('curr_iso', $this->GetPrimaryCurrency() );

	$this->SetVar('visits_id', $this->RecallVar('visit_id') );

	$language =& $this->recallObject( 'lang.current', null, Array('live_table' => true) );

	$this->ValidateLogin(); // TODO: write that method

	if( $this->isDebugMode() )
	{
	$this->Debugger->profileFinish('kernel4_startup');
	}

	$this->InitDone = true;
	return true;
	}

	function refreshModuleInfo()
	{
	$this->ModuleInfo = $this->DB->Query('SELECT * FROM '.TABLE_PREFIX.'Modules ORDER BY LoadOrder', 'Name');
	}

	/**
	* Checks if passed language id if valid and sets it to primary otherwise
	*
	*/
	function VerifyLanguageId()
	{
	$language_id = $this->GetVar('m_lang');
	if ($language_id) {
	$table = $this->getUnitOption('lang', 'TableName');
	$id_field = $this->getUnitOption('lang', 'IDField');
	$sql = 'SELECT '.$id_field.'
	FROM '.$table.'
	WHERE Enabled = 1';
	$language_ids = $this->DB->GetCol($sql);
	}

	if (!$language_id \|\| !in_array($language_id, $language_ids)) {
	$this->SetVar('m_lang', $this->GetDefaultLanguageId() );
	}
	$this->SetVar('lang.current_id', $this->GetVar('m_lang') );
	}

	/**
	* Checks if passed theme id if valid and sets it to primary otherwise
	*
	*/
	function VerifyThemeId()
	{
	$theme_id = $this->GetVar('m_theme');
	if ($theme_id) {
	$table = $this->getUnitOption('theme', 'TableName');
	$id_field = $this->getUnitOption('theme', 'IDField');
	$sql = 'SELECT '.$id_field.'
	FROM '.$table.'
	WHERE Enabled = 1';
	$theme_ids = $this->DB->GetCol($sql);
	}

	if (!$theme_id \|\| !in_array($theme_id, $theme_ids)) {
	$this->SetVar('m_theme', $this->GetDefaultThemeId() );
	}
	$this->SetVar('theme.current_id', $this->GetVar('m_theme') );
	}

	function GetDefaultLanguageId()
	{
	static $language_id = 0;

	if ($language_id > 0) return $language_id;

	$table = $this->getUnitOption('lang','TableName');
	$id_field = $this->getUnitOption('lang','IDField');
	$sql = 'SELECT '.$id_field.'
	FROM '.$table.'
	WHERE (PrimaryLang = 1) AND (Enabled = 1)';
	$language_id = $this->DB->GetOne($sql);

	return $language_id;
	}

	function GetDefaultThemeId()
	{
	static $theme_id = 0;

	if($theme_id > 0) return $theme_id;

	if (constOn('DBG_FORCE_THEME')) {
	$theme_id = DBG_FORCE_THEME;
	}
	else {
	$table = $this->getUnitOption('theme','TableName');
	$id_field = $this->getUnitOption('theme','IDField');
	$sql = 'SELECT '.$id_field.'
	FROM '.$table.'
	WHERE (PrimaryTheme = 1) AND (Enabled = 1)';
	$theme_id = $this->DB->GetOne($sql);
	}
	return $theme_id;
	}

	function GetPrimaryCurrency()
	{
	- $has_incommerce = getArrayValue($this->ModuleInfo, 'In-Commerce');
	- if($has_incommerce && $has_incommerce['Loaded'] )
	- {
	+ if ($this->isModuleEnabled('In-Commerce')) {
	$table = $this->getUnitOption('curr', 'TableName');
	return $this->DB->GetOne('SELECT ISO FROM '.$table.' WHERE IsPrimary = 1');
	}
	- else
	- {
	+ else {
	return 'USD';
	}
	}

	/**
	* Registers default classes such as ItemController, GridController and LoginController
	*
	* Called automatically while initializing Application
	* @access private
	* @return void
	*/
	function RegisterDefaultClasses()
	{
	$this->registerClass('kArray', KERNEL_PATH.'/utility/params.php');
	$this->registerClass('Params', KERNEL_PATH.'/utility/params.php');

	$this->registerClass('kCache', KERNEL_PATH.'/utility/cache.php', 'Cache', Array('Params'));
	$this->registerClass('kHTTPQuery', KERNEL_PATH.'/utility/http_query.php', 'HTTPQuery', Array('Params') );

	$this->registerClass('Session', KERNEL_PATH.'/session/session.php');
	$this->registerClass('SessionStorage', KERNEL_PATH.'/session/session.php');

	$this->registerClass('kEventManager', KERNEL_PATH.'/event_manager.php', 'EventManager');
	$this->registerClass('kUnitConfigReader', KERNEL_PATH.'/utility/unit_config_reader.php');

	$this->registerClass('Params', KERNEL_PATH.'/utility/params.php', 'kActions');

	$this->registerClass('kFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kOptionsFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kUploadFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kPictureFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kDateFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kLEFTFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kMultiLanguage', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kPasswordFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kCCDateFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kUnitFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kFilesizeFormatter', KERNEL_PATH.'/utility/formatters.php');
	$this->registerClass('kSerializedFormatter', KERNEL_PATH.'/utility/formatters.php');

	$this->registerClass('kTempTablesHandler', KERNEL_PATH.'/utility/temp_handler.php');

	$event_manager =& $this->recallObject('EventManager');
	$event_manager->registerBuildEvent('kTempTablesHandler', 'OnTempHandlerBuild');

	$this->registerClass('TemplatesCache', KERNEL_PATH.'/parser/template.php');
	$this->registerClass('Template', KERNEL_PATH.'/parser/template.php');
	$this->registerClass('TemplateParser', KERNEL_PATH.'/parser/template_parser.php');

	$this->registerClass('kMainTagProcessor', KERNEL_PATH.'/processors/main_processor.php','m_TagProcessor');

	$this->registerClass('kMultipleFilter', KERNEL_PATH.'/utility/filters.php');
	$this->registerClass('kDBList', KERNEL_PATH.'/db/dblist.php');
	$this->registerClass('kDBItem', KERNEL_PATH.'/db/dbitem.php');
	$this->registerClass('kDBEventHandler', KERNEL_PATH.'/db/db_event_handler.php');
	$this->registerClass('kDBTagProcessor', KERNEL_PATH.'/db/db_tag_processor.php');

	$this->registerClass('kTagProcessor', KERNEL_PATH.'/processors/tag_processor.php');
	$this->registerClass('kEmailMessage', KERNEL_PATH.'/utility/email.php');
	$this->registerClass('kSmtpClient', KERNEL_PATH.'/utility/smtp_client.php');

	if (file_exists(MODULES_PATH.'/in-commerce/units/currencies/currency_rates.php')) {
	$this->registerClass('kCurrencyRates', MODULES_PATH.'/in-commerce/units/currencies/currency_rates.php');
	}

	$this->registerClass('FCKeditor', FULL_PATH.'/admin/editor/cmseditor/fckeditor.php'); // need this?
	}

	/**
	* Returns item's filename that corresponds id passed. If possible, then get it from cache
	*
	* @param string $prefix
	* @param int $id
	* @return string
	*/
	function getFilename($prefix, $id)
	{
	$filename = $this->getCache('filenames', $prefix.'_'.$id);
	if ($filename === false) {
	$table = $this->getUnitOption($prefix, 'TableName');
	$id_field = $this->getUnitOption($prefix, 'IDField');

	if ($prefix == 'c') {
	if(!$id) {
	$this->setCache('filenames', $prefix.'_'.$id, '');
	return '';
	}

	// this allows to save 2 sql queries for each category
	$sql = 'SELECT NamedParentPath, CachedCategoryTemplate, CachedItemTemplate
	FROM '.$table.'
	WHERE '.$id_field.' = '.$this->DB->qstr($id);
	$category_data = $this->DB->GetRow($sql);
	$filename = $category_data['NamedParentPath'];
	$this->setCache('category_templates', $id, $category_data['CachedCategoryTemplate']);
	$this->setCache('item_templates', $id, $category_data['CachedItemTemplate']);
	}
	else {
	$sql = 'SELECT Filename
	FROM '.$table.'
	WHERE '.$id_field.' = '.$this->DB->qstr($id);
	$filename = $this->DB->GetOne($sql);
	}
	$this->setCache('filenames', $prefix.'_'.$id, $filename);
	}
	return $filename;
	}


	/**
	* Adds new value to cache $cache_name and identified by key $key
	*
	* @param string $cache_name cache name
	* @param int $key key name to add to cache
	* @param mixed $value value of chached record
	*/
	function setCache($cache_name, $key, $value)
	{
	$cache =& $this->recallObject('Cache');
	$cache->setCache($cache_name, $key, $value);
	}

	/**
	* Returns cached $key value from cache named $cache_name
	*
	* @param string $cache_name cache name
	* @param int $key key name from cache
	* @return mixed
	*/
	function getCache($cache_name, $key)
	{
	$cache =& $this->recallObject('Cache');
	return $cache->getCache($cache_name, $key);
	}

	/**
	* Defines default constants if it's not defined before - in config.php
	*
	* @access private
	*/
	function SetDefaultConstants()
	{
	safeDefine('SERVER_NAME', $_SERVER['HTTP_HOST']);

	$admin_dir = $this->ConfigValue('AdminDirectory');
	if(!$admin_dir) $admin_dir = 'admin';
	safeDefine('ADMIN_DIR', $admin_dir);

	$this->registerModuleConstants();
	}

	/**
	* Registers each module specific constants if any found
	*
	*/
	function registerModuleConstants()
	{
	if (!$this->ModuleInfo) return false;

	foreach($this->ModuleInfo as $module_name => $module_info)
	{
	$module_path = '/'.$module_info['Path'];
	$contants_file = FULL_PATH.$module_path.'constants.php';
	if( file_exists($contants_file) ) k4_include_once($contants_file);
	}
	return true;
	}

	function ProcessRequest()
	{
	$event_manager =& $this->recallObject('EventManager');

	if( $this->isDebugMode() && dbg_ConstOn('DBG_SHOW_HTTPQUERY') )
	{
	global $debugger;
	$http_query =& $this->recallObject('HTTPQuery');
	$debugger->appendHTML('HTTPQuery:');
	$debugger->dumpVars($http_query->_Params);
	}

	$event_manager->ProcessRequest();
	$event_manager->RunRegularEvents(reBEFORE);
	$this->RequestProcessed = true;
	}

	/**
	* Actually runs the parser against current template and stores parsing result
	*
	* This method gets t variable passed to the script, loads the template given in t variable and
	* parses it. The result is store in {@link $this->HTML} property.
	* @access public
	* @return void
	*/
	function Run()
	{
	if( $this->isDebugMode() && dbg_ConstOn('DBG_PROFILE_MEMORY') )
	{
	$this->Debugger->appendMemoryUsage('Application before Run:');
	}

	if (!$this->RequestProcessed) $this->ProcessRequest();

	$this->InitParser();
	$template_cache =& $this->recallObject('TemplatesCache');
	$t = $this->GetVar('t');

	- if ($this->findModule('Name', 'In-CMS', 'Loaded')) {
	+ if ($this->isModuleEnabled('In-CMS')) {
	$cms_handler =& $this->recallObject('cms_EventHandler');
	if (!$template_cache->TemplateExists($t)) {
	$t = $cms_handler->GetDesignTemplate();
	}
	/*else {
	$cms_handler->SetCatByTemplate();
	}*/
	}

	if( $this->isDebugMode() && dbg_ConstOn('DBG_PROFILE_MEMORY') )
	{
	$this->Debugger->appendMemoryUsage('Application before Parsing:');
	}

	$this->HTML = $this->Parser->Parse( $template_cache->GetTemplateBody($t), $t );

	if( $this->isDebugMode() && dbg_ConstOn('DBG_PROFILE_MEMORY') )
	{
	$this->Debugger->appendMemoryUsage('Application after Parsing:');
	}
	}

	function InitParser()
	{
	if( !is_object($this->Parser) ) $this->Parser =& $this->recallObject('TemplateParser');
	}

	/**
	* Send the parser results to browser
	*
	* Actually send everything stored in {@link $this->HTML}, to the browser by echoing it.
	* @access public
	* @return void
	*/
	function Done()
	{
	if( $this->isDebugMode() && dbg_ConstOn('DBG_PROFILE_MEMORY') )
	{
	$this->Debugger->appendMemoryUsage('Application before Done:');
	}

	if( $this->GetVar('admin') )
	{
	$reg = '/('.preg_quote(BASE_PATH, '/').'.\.html)(#.){0,1}(")/sU';
	$this->HTML = preg_replace($reg, "$1?admin=1$2$3", $this->HTML);
	}

	//eval("?".">".$this->HTML);

	echo $this->HTML;
	$this->Phrases->UpdateCache();

	flush();

	if ($this->isDebugMode() && dbg_ConstOn('DBG_CACHE')) {
	$cache =& $this->recallObject('Cache');
	$cache->printStatistics();
	}

	$event_manager =& $this->recallObject('EventManager');
	$event_manager->RunRegularEvents(reAFTER);

	$session =& $this->recallObject('Session');
	$session->SaveData();
	//$this->SaveBlocksCache();
	}

	function SaveBlocksCache()
	{
	/*if (constOn('EXPERIMENTAL_PRE_PARSE')) {
	$data = serialize($this->PreParsedCache);

	$this->DB->Query('REPLACE '.TABLE_PREFIX.'Cache (VarName, Data, Cached) VALUES ("blocks_cache", '.$this->DB->qstr($data).', '.adodb_mktime().')');
	}*/
	}

	// Facade

	/**
	* Returns current session id (SID)
	* @access public
	* @return longint
	*/
	function GetSID()
	{
	$session =& $this->recallObject('Session');
	return $session->GetID();
	}

	function DestroySession()
	{
	$session =& $this->recallObject('Session');
	$session->Destroy();
	}

	/**
	* Returns variable passed to the script as GET/POST/COOKIE
	*
	* @access public
	* @param string $name Name of variable to retrieve
	* @param int $default default value returned in case if varible not present
	* @return mixed
	*/
	function GetVar($name, $default = false)
	{
	$http_query =& $this->recallObject('HTTPQuery');
	return $http_query->Get($name, $default);
	}

	/**
	* Returns ALL variables passed to the script as GET/POST/COOKIE
	*
	* @access public
	* @return array
	*/
	function GetVars()
	{
	$http_query =& $this->recallObject('HTTPQuery');
	return $http_query->GetParams();
	}

	/**
	* Set the variable 'as it was passed to the script through GET/POST/COOKIE'
	*
	* This could be useful to set the variable when you know that
	* other objects would relay on variable passed from GET/POST/COOKIE
	* or you could use SetVar() / GetVar() pairs to pass the values between different objects.<br>
	*
	* This method is formerly known as $this->Session->SetProperty.
	* @param string $var Variable name to set
	* @param mixed $val Variable value
	* @access public
	* @return void
	*/
	function SetVar($var,$val)
	{
	$http_query =& $this->recallObject('HTTPQuery');
	$http_query->Set($var,$val);
	}

	/**
	* Deletes Session variable
	*
	* @param string $var
	*/
	function RemoveVar($var)
	{
	$session =& $this->recallObject('Session');
	return $session->RemoveVar($var);
	}

	/**
	* Deletes kHTTPQuery variable
	*
	* @param string $var
	* @todo think about method name
	*/
	function DeleteVar($var)
	{
	$http_query =& $this->recallObject('HTTPQuery');
	return $http_query->Remove($var);
	}

	/**
	* Returns session variable value
	*
	* Return value of $var variable stored in Session. An optional default value could be passed as second parameter.
	*
	* @see SimpleSession
	* @access public
	* @param string $var Variable name
	* @param mixed $default Default value to return if no $var variable found in session
	* @return mixed
	*/
	function RecallVar($var,$default=false)
	{
	$session =& $this->recallObject('Session');
	return $session->RecallVar($var,$default);
	}

	/**
	* Stores variable $val in session under name $var
	*
	* Use this method to store variable in session. Later this variable could be recalled.
	* @see RecallVar
	* @access public
	* @param string $var Variable name
	* @param mixed $val Variable value
	*/
	function StoreVar($var, $val)
	{
	$session =& $this->recallObject('Session');
	$session->StoreVar($var, $val);
	}

	function StoreVarDefault($var, $val)
	{
	$session =& $this->recallObject('Session');
	$session->StoreVarDefault($var, $val);
	}

	/**
	* Links HTTP Query variable with session variable
	*
	* If variable $var is passed in HTTP Query it is stored in session for later use. If it's not passed it's recalled from session.
	* This method could be used for making sure that GetVar will return query or session value for given
	* variable, when query variable should overwrite session (and be stored there for later use).<br>
	* This could be used for passing item's ID into popup with multiple tab -
	* in popup script you just need to call LinkVar('id', 'current_id') before first use of GetVar('id').
	* After that you can be sure that GetVar('id') will return passed id or id passed earlier and stored in session
	* @access public
	* @param string $var HTTP Query (GPC) variable name
	* @param mixed $ses_var Session variable name
	* @param mixed $default Default variable value
	*/
	function LinkVar($var, $ses_var = null, $default = '')
	{
	if (!isset($ses_var)) $ses_var = $var;
	if ($this->GetVar($var) !== false) {
	$this->StoreVar($ses_var, $this->GetVar($var));
	}
	else {
	$this->SetVar($var, $this->RecallVar($ses_var, $default));
	}
	}

	/**
	* Returns variable from HTTP Query, or from session if not passed in HTTP Query
	*
	* The same as LinkVar, but also returns the variable value taken from HTTP Query if passed, or from session if not passed.
	* Returns the default value if variable does not exist in session and was not passed in HTTP Query
	*
	* @see LinkVar
	* @access public
	* @param string $var HTTP Query (GPC) variable name
	* @param mixed $ses_var Session variable name
	* @param mixed $default Default variable value
	* @return mixed
	*/
	function GetLinkedVar($var, $ses_var = null, $default = '')
	{
	$this->LinkVar($var, $ses_var, $default);
	return $this->GetVar($var);
	}

	function AddBlock($name, $tpl)
	{
	$this->cache[$name] = $tpl;
	}

	function SetTemplateBody($title,$body)
	{
	$templates_cache =& $this->recallObject('TemplatesCache');
	$templates_cache->SetTemplateBody($title,$body);
	}

	function ProcessTag($tag_data)
	{
	$a_tag = new Tag($tag_data,$this->Parser);
	return $a_tag->DoProcessTag();
	}

	function ProcessParsedTag($prefix, $tag, $params)
	{
	$a_tag = new Tag('',$this->Parser);
	$a_tag->Tag = $tag;
	$a_tag->Processor = $prefix;
	$a_tag->NamedParams = $params;
	return $a_tag->DoProcessTag();
	}

	/**
	* Return ADODB Connection object
	*
	* Returns ADODB Connection object already connected to the project database, configurable in config.php
	* @access public
	* @return kDBConnection
	*/
	function &GetADODBConnection()
	{
	return $this->DB;
	}

	function ParseBlock($params,$pass_params=0,$as_template=false)
	{
	if (substr($params['name'], 0, 5) == 'html:') return substr($params['name'], 6);
	return $this->Parser->ParseBlock($params, $pass_params, $as_template);
	}

	/**
	* Returns index file, that could be passed as parameter to method, as parameter to tag and as constant or not passed at all
	*
	* @param string $prefix
	* @param string $index_file
	* @param Array $params
	* @return string
	*/
	function getIndexFile($prefix, $index_file, &$params)
	{
	if (isset($params['index_file'])) {
	$index_file = $params['index_file'];
	unset($params['index_file']);
	return $index_file;
	}

	if (isset($index_file)) {
	return $index_file;
	}

	if (defined('INDEX_FILE')) {
	return INDEX_FILE;
	}

	$cut_prefix = trim(BASE_PATH, '/').'/'.trim($prefix, '/');
	return trim(preg_replace('/'.preg_quote($cut_prefix, '/').'(.*)/', '\\1', $_SERVER['PHP_SELF']), '/');
	}

	/**
	* Return href for template
	*
	* @access public
	* @param string $t Template path
	* @var string $prefix index.php prefix - could be blank, 'admin'
	*/
	function HREF($t, $prefix='', $params=null, $index_file=null)
	{
	if(!$t) $t = $this->GetVar('t'); // moved from kMainTagProcessor->T()

	if ($this->GetVar('skip_last_template')) {
	$params['opener'] = 'p';
	$this->SetVar('m_opener', 'p');
	}

	if ($t == 'incs/close_popup') {
	// because this template closes the popup and we don't need popup mark here anymore
	$params['m_opener'] = 's';
	}

	if( substr($t, -4) == '.tpl' ) $t = substr($t, 0, strlen($t) - 4 );

	if ( $this->IsAdmin() && $prefix == '') $prefix = '/admin';
	if ( $this->IsAdmin() && $prefix == '_FRONT_END_') $prefix = '';

	$index_file = $this->getIndexFile($prefix, $index_file, $params);

	$ssl = isset($params['__SSL__']) ? $params['__SSL__'] : null;
	if ($ssl !== null) {
	$session =& $this->recallObject('Session');
	$cookie_url = $session->CookieDomain.$session->CookiePath;
	if ($ssl) {
	$target_url = $this->ConfigValue('SSL_URL');
	}
	else {
	$target_url = 'http://'.DOMAIN.$this->ConfigValue('Site_Path');
	}

	if (!preg_match('#'.preg_quote($cookie_url).'#', $target_url)) {
	$session->SetMode(smGET_ONLY);
	}
	}

	if (getArrayValue($params, 'opener') == 'u') {
	$opener_stack=$this->RecallVar('opener_stack');
	if($opener_stack) {
	$opener_stack=unserialize($opener_stack);
	if (count($opener_stack) > 0) {
	list($index_file, $env) = explode('\|', $opener_stack[count($opener_stack)-1]);
	$ret = $this->BaseURL($prefix, $ssl).$index_file.'?'.ENV_VAR_NAME.'='.$env;
	if( getArrayValue($params,'escape') ) $ret = addslashes($ret);
	return $ret;
	}
	else {
	//define('DBG_REDIRECT', 1);
	$t = $this->GetVar('t');
	}
	}
	else {
	//define('DBG_REDIRECT', 1);
	$t = $this->GetVar('t');
	}
	}

	$pass = isset($params['pass']) ? $params['pass'] : '';
	$pass_events = isset($params['pass_events']) ? $params['pass_events'] : false; // pass events with url

	$map_link = '';
	if( isset($params['anchor']) )
	{
	$map_link = '#'.$params['anchor'];
	unset($params['anchor']);
	}

	if ( isset($params['no_amp']) )
	{
	$params['__URLENCODE__'] = $params['no_amp'];
	unset($params['no_amp']);
	}

	if ($this->RewriteURLs($ssl))
	{
	$session =& $this->recallObject('Session');
	if( $session->NeedQueryString() ) $params['sid'] = $this->GetSID();
	$url = $this->BuildEnv_NEW($t, $params, $pass, $pass_events);
	$ret = $this->BaseURL($prefix, $ssl).$url.$map_link;

	}
	else
	{
	$env = $this->BuildEnv($t, $params, $pass, $pass_events);
	$ret = $this->BaseURL($prefix, $ssl).$index_file.'?'.$env.$map_link;
	}

	return $ret;
	}


	/**
	* Returns sorted array of passed prefixes (to build url from)
	*
	* @param string $pass
	* @return Array
	*/
	function getPassInfo($pass = 'all')
	{
	$pass = str_replace('all', trim($this->GetVar('passed'), ','), $pass);

	if (!$pass) {
	return Array();
	}

	$pass_info = array_unique( explode(',', $pass) ); // array( prefix[.special], prefix[.special] ...
	sort($pass_info, SORT_STRING); // to be prefix1,prefix1.special1,prefix1.special2,prefix3.specialX

	// ensure that "m" prefix is at the beginning
	$main_index = array_search('m', $pass_info);
	if ($main_index !== false) {
	unset($pass_info[$main_index]);
	array_unshift($pass_info, 'm');
	}
	return $pass_info;
	}

	function BuildEnv_NEW($t, $params, $pass = 'all', $pass_events = false)
	{
	// $session =& $this->recallObject('Session');
	$force_admin = getArrayValue($params,'admin') \|\| $this->GetVar('admin');

	// if($force_admin) $sid = $this->GetSID();

	$ret = '';
	$env = '';

	$encode = false;
	if (isset($params['__URLENCODE__']))
	{
	$encode = $params['__URLENCODE__'];
	unset($params['__URLENCODE__']);
	}

	if (isset($params['__SSL__'])) {
	unset($params['__SSL__']);
	}

	$pass_info = $this->getPassInfo($pass);
	if ($pass_info) {
	if ($pass_info[0] == 'm') array_shift($pass_info);
	$params['t'] = $t;
	foreach($pass_info as $pass_index => $pass_element)
	{
	list($prefix) = explode('.', $pass_element);
	$require_rewrite = $this->findModule('Var', $prefix);
	if ($require_rewrite) {
	// if next prefix is same as current, but with special => exclude current prefix from url
	$next_prefix = getArrayValue($pass_info, $pass_index + 1);
	if ($next_prefix) {
	$next_prefix = substr($next_prefix, 0, strlen($prefix) + 1);
	if ($prefix.'.' == $next_prefix) continue;
	}

	$ret .= '/'.$this->BuildModuleEnv_NEW($pass_element, $params, $pass_events);
	}
	else
	{
	$env .= ':'.$this->BuildModuleEnv($pass_element, $params, $pass_events);
	}
	}
	$ret = $this->BuildModuleEnv_NEW('m', $params, $pass_events).$ret;

	$ret = trim($ret, '/').'.html';
	if($env) $params[ENV_VAR_NAME] = ltrim($env, ':');
	}

	unset($params['pass'], $params['opener'], $params['m_event']);
	if ($force_admin) $params['admin'] = 1;

	if( getArrayValue($params,'escape') )
	{
	$ret = addslashes($ret);
	unset($params['escape']);
	}

	$params_str = '';
	$join_string = $encode ? '&' : '&';
	foreach ($params as $param => $value)
	{
	$params_str .= $join_string.$param.'='.$value;
	}
	$ret .= preg_replace('/^'.$join_string.'(.*)/', '?\\1', $params_str);

	if ($encode) {
	$ret = str_replace('\\', '%5C', $ret);
	}
	return $ret;
	}


	function BuildModuleEnv_NEW($prefix_special, &$params, $pass_events = false)
	{
	$event_params = Array('pass_events' => $pass_events, 'url_params' => $params);
	$event = new kEvent($prefix_special.':BuildEnv', $event_params);
	$this->HandleEvent($event);
	$params = $event->getEventParam('url_params'); // save back unprocessed parameters

	$ret = '';
	if ($event->getEventParam('env_string')) {
	$ret = trim( $event->getEventParam('env_string'), '/');
	}
	return $ret;
	}

	/**
	* Builds env part that corresponds prefix passed
	*
	* @param string $prefix_special item's prefix & [special]
	* @param Array $params url params
	* @param bool $pass_events
	*/
	function BuildModuleEnv($prefix_special, &$params, $pass_events = false)
	{
	list($prefix) = explode('.', $prefix_special);
	$query_vars = $this->getUnitOption($prefix, 'QueryString');

	//if pass events is off and event is not implicity passed
	if( !$pass_events && !isset($params[$prefix_special.'_event']) ) {
	$params[$prefix_special.'_event'] = ''; // remove event from url if requested
	//otherwise it will use value from get_var
	}

	if(!$query_vars) return '';

	$tmp_string = Array(0 => $prefix_special);
	foreach($query_vars as $index => $var_name)
	{
	//if value passed in params use it, otherwise use current from application
	$var_name = $prefix_special.'_'.$var_name;
	$tmp_string[$index] = isset( $params[$var_name] ) ? $params[$var_name] : $this->GetVar($var_name);
	if ( isset($params[$var_name]) ) unset( $params[$var_name] );
	}

	$escaped = array();
	foreach ($tmp_string as $tmp_val) {
	$escaped[] = str_replace(Array('-',':'), Array('\-','\:'), $tmp_val);
	}

	$ret = implode('-', $escaped);
	if ($this->getUnitOption($prefix, 'PortalStyleEnv') == true)
	{
	$ret = preg_replace('/^([a-zA-Z]+)-([0-9]+)-(.*)/','\\1\\2-\\3', $ret);
	}
	return $ret;
	}

	function BuildEnv($t, $params, $pass='all', $pass_events = false, $env_var = true)
	{
	$session =& $this->recallObject('Session');
	$ssl = isset($params['__SSL__']) ? $params['__SSL__'] : 0;
	$sid = $session->NeedQueryString() && !$this->RewriteURLs($ssl) ? $this->GetSID() : '';
	if (getArrayValue($params,'admin') == 1) $sid = $this->GetSID();

	$ret = '';
	if ($env_var) {
	$ret = ENV_VAR_NAME.'=';
	}

	$ret .= $sid.(constOn('INPORTAL_ENV') ? '-' : ':');

	$encode = false;
	if (isset($params['__URLENCODE__'])) {
	$encode = $params['__URLENCODE__'];
	unset($params['__URLENCODE__']);
	}

	if (isset($params['__SSL__'])) {
	unset($params['__SSL__']);
	}

	$env_string = '';
	$category_id = isset($params['m_cat_id']) ? $params['m_cat_id'] : $this->GetVar('m_cat_id');

	$item_id = 0;
	$pass_info = $this->getPassInfo($pass);
	if ($pass_info) {
	if ($pass_info[0] == 'm') array_shift($pass_info);
	foreach ($pass_info as $pass_element) {
	list($prefix) = explode('.', $pass_element);
	$require_rewrite = $this->findModule('Var', $prefix);
	if ($require_rewrite) {
	$item_id = isset($params[$pass_element.'_id']) ? $params[$pass_element.'_id'] : $this->GetVar($pass_element.'_id');
	}
	$env_string .= ':'.$this->BuildModuleEnv($pass_element, $params, $pass_events);
	}
	}

	if (strtolower($t) == '__default__') {
	// to put category & item templates into cache
	$filename = $this->getFilename('c', $category_id);
	if ($item_id) {
	$t = $this->getCache('item_templates', $category_id);
	}
	elseif ($category_id) {
	$t = $this->getCache('category_templates', $category_id);
	}
	else {
	$t = 'index';
	}
	}

	$ret .= $t.':'.$this->BuildModuleEnv('m', $params, $pass_events).$env_string;

	unset($params['pass']);
	unset($params['opener']);
	unset($params['m_event']);

	if ($this->GetVar('admin') && !isset($params['admin'])) {
	$params['admin'] = 1;
	}

	if( getArrayValue($params,'escape') )
	{
	$ret = addslashes($ret);
	unset($params['escape']);
	}

	$join_string = $encode ? '&' : '&';
	$params_str = '';
	foreach ($params as $param => $value)
	{
	$params_str .= $join_string.$param.'='.$value;
	}
	$ret .= $params_str;

	if ($encode) {
	$ret = str_replace('\\', '%5C', $ret);
	}
	return $ret;
	}

	function BaseURL($prefix='', $ssl=null)
	{
	if ($ssl === null) {
	return PROTOCOL.SERVER_NAME.(defined('PORT')?':'.PORT : '').rtrim(BASE_PATH, '/').$prefix.'/';
	}
	else {
	if ($ssl) {
	return rtrim( $this->ConfigValue('SSL_URL'), '/').$prefix.'/';
	}
	else {
	return 'http://'.DOMAIN.(defined('PORT')?':'.PORT : '').rtrim( $this->ConfigValue('Site_Path'), '/').$prefix.'/';
	}
	}
	}

	function Redirect($t='', $params=null, $prefix='', $index_file=null)
	{
	if ($t == '' \|\| $t === true) $t = $this->GetVar('t');

	// pass prefixes and special from previous url
	$js_redirect = getArrayValue($params, 'js_redirect');
	if( isset($params['js_redirect']) ) unset($params['js_redirect']);

	if (!isset($params['pass'])) $params['pass'] = 'all';
	$params['__URLENCODE__'] = 1;
	$location = $this->HREF($t, $prefix, $params, $index_file);
	$a_location = $location;
	$location = "Location: $location";
	//echo " location : $location <br>";


	if( $this->isDebugMode() && dbg_ConstOn('DBG_REDIRECT') )
	{
	/*if( function_exists('apache_response_headers') )
	{
	$this->Debugger->appendHTML('Apache Responce Headers');
	$this->Debugger->dumpVars( apache_response_headers() );

	$this->Debugger->appendHTML('Apache Request Headers');
	$this->Debugger->dumpVars( apache_request_headers() );
	}*/
	$this->Debugger->appendTrace();
	echo "<b>Debug output above!!!</b> Proceed to redirect: <a href=\"$a_location\">$a_location</a><br>";
	}
	else
	{
	if($js_redirect)
	{
	$this->SetVar('t', 'redirect');
	$this->SetVar('redirect_to_js', addslashes($a_location) );
	$this->SetVar('redirect_to', $a_location);
	return true;
	}
	else
	{
	if(headers_sent() != '')
	{
	echo '<script language="javascript" type="text/javascript">window.location.href = \''.$a_location.'\';</script>';
	}
	else
	{
	header("$location");
	}
	}
	}

	$session =& $this->recallObject('Session');
	$session->SaveData();
	$this->SaveBlocksCache();
	exit;
	}

	function Phrase($label)
	{
	return $this->Phrases->GetPhrase($label);
	}

	/**
	* Replace language tags in exclamation marks found in text
	*
	* @param string $text
	* @param bool $force_escape force escaping, not escaping of resulting string
	* @return string
	* @access public
	*/
	function ReplaceLanguageTags($text, $force_escape=null)
	{
	// !!!!!!!!
	// if( !is_object($this->Phrases) ) $this->Debugger->appendTrace();
	return $this->Phrases->ReplaceLanguageTags($text,$force_escape);
	}

	/**
	* Checks if user is logged in, and creates
	* user object if so. User object can be recalled
	* later using "u" prefix. Also you may
	* get user id by getting "u_id" variable.
	*
	* @access private
	*/
	function ValidateLogin()
	{
	$session =& $this->recallObject('Session');
	$user_id = $session->GetField('PortalUserId');
	if (!$user_id && $user_id != -1) $user_id = -2;
	$this->SetVar('u_id', $user_id);
	$this->StoreVar('user_id', $user_id);

	if ($this->GetVar('expired') == 1) {
	$user =& $this->recallObject('u');
	$user->SetError('ValidateLogin', 'session_expired', 'la_text_sess_expired');
	}
	}

	/**
	* Returns configuration option value by name
	*
	* @param string $name
	* @return string
	*/
	function ConfigValue($name)
	{
	return getArrayValue($this->ConfigHash, $name);
	// return $this->DB->GetOne('SELECT VariableValue FROM '.TABLE_PREFIX.'ConfigurationValues WHERE VariableName = '.$this->DB->qstr($name) );
	}

	/**
	* Allows to process any type of event
	*
	* @param kEvent $event
	* @access public
	* @author Alex
	*/
	function HandleEvent(&$event, $params=null, $specificParams=null)
	{
	if ( isset($params) ) {
	$event = new kEvent( $params, $specificParams );
	}
	$event_manager =& $this->recallObject('EventManager');
	$event_manager->HandleEvent($event);
	}

	/**
	* Registers new class in the factory
	*
	* @param string $real_class Real name of class as in class declaration
	* @param string $file Filename in what $real_class is declared
	* @param string $pseudo_class Name under this class object will be accessed using getObject method
	* @param Array $dependecies List of classes required for this class functioning
	* @access public
	* @author Alex
	*/
	function registerClass($real_class, $file, $pseudo_class = null, $dependecies = Array() )
	{
	$this->Factory->registerClass($real_class, $file, $pseudo_class, $dependecies);
	}

	/**
	* Add $class_name to required classes list for $depended_class class.
	* All required class files are included before $depended_class file is included
	*
	* @param string $depended_class
	* @param string $class_name
	* @author Alex
	*/
	function registerDependency($depended_class, $class_name)
	{
	$this->Factory->registerDependency($depended_class, $class_name);
	}

	/**
	* Registers Hook from subprefix event to master prefix event
	*
	* @param string $hookto_prefix
	* @param string $hookto_special
	* @param string $hookto_event
	* @param string $mode
	* @param string $do_prefix
	* @param string $do_special
	* @param string $do_event
	* @param string $conditional
	* @access public
	* @todo take care of a lot parameters passed
	* @author Kostja
	*/
	function registerHook($hookto_prefix, $hookto_special, $hookto_event, $mode, $do_prefix, $do_special, $do_event, $conditional)
	{
	$event_manager =& $this->recallObject('EventManager');
	$event_manager->registerHook($hookto_prefix, $hookto_special, $hookto_event, $mode, $do_prefix, $do_special, $do_event, $conditional);
	}

	/**
	* Allows one TagProcessor tag act as other TagProcessor tag
	*
	* @param Array $tag_info
	* @author Kostja
	*/
	function registerAggregateTag($tag_info)
	{
	$aggregator =& $this->recallObject('TagsAggregator', 'kArray');
	$aggregator->SetArrayValue($tag_info['AggregateTo'], $tag_info['AggregatedTagName'], Array($tag_info['LocalPrefix'], $tag_info['LocalTagName'], getArrayValue($tag_info, 'LocalSpecial')));
	}

	/**
	* Returns object using params specified,
	* creates it if is required
	*
	* @param string $name
	* @param string $pseudo_class
	* @param Array $event_params
	* @return Object
	* @author Alex
	*/
	function &recallObject($name,$pseudo_class=null,$event_params=Array())
	{
	$func_args = func_get_args();
	$result =& ref_call_user_func_array( Array(&$this->Factory, 'getObject'), $func_args );
	return $result;
	}

	/**
	* Returns tag processor for prefix specified
	*
	* @param string $prefix
	* @return kDBTagProcessor
	*/
	function &recallTagProcessor($prefix)
	{
	$result =& $this->recallObject($prefix.'_TagProcessor');
	return $result;
	}

	/**
	* Checks if object with prefix passes was already created in factory
	*
	* @param string $name object presudo_class, prefix
	* @return bool
	* @author Kostja
	*/
	function hasObject($name)
	{
	return isset($this->Factory->Storage[$name]);
	}

	/**
	* Removes object from storage by given name
	*
	* @param string $name Object's name in the Storage
	* @author Kostja
	*/
	function removeObject($name)
	{
	$this->Factory->DestroyObject($name);
	}

	/**
	* Get's real class name for pseudo class,
	* includes class file and creates class
	* instance
	*
	* @param string $pseudo_class
	* @return Object
	* @access public
	* @author Alex
	*/
	function &makeClass($pseudo_class)
	{
	$func_args = func_get_args();
	$result =& ref_call_user_func_array( Array(&$this->Factory, 'makeClass'), $func_args);

	return $result;
	}

	/**
	* Checks if application is in debug mode
	*
	* @param bool $check_debugger check if kApplication debugger is initialized too, not only for defined DEBUG_MODE constant
	* @return bool
	* @author Alex
	* @access public
	*/
	function isDebugMode($check_debugger = true)
	{
	$debug_mode = constOn('DEBUG_MODE');
	if($check_debugger)
	{
	$debug_mode = $debug_mode && is_object($this->Debugger);
	}
	return $debug_mode;
	}

	/**
	* Checks if it is admin
	*
	* @return bool
	* @author Alex
	*/
	function IsAdmin()
	{
	return constOn('ADMIN');
	}

	/**
	* Apply url rewriting used by mod_rewrite or not
	*
	* @return bool
	*/
	function RewriteURLs($ssl = false)
	{
	$allow_rewriting =
	(PROTOCOL == 'http://') // always allow mod_rewrite for http
	\|\| // or allow rewriting for redirect TO httpS or when already in httpS
	(($ssl \|\| PROTOCOL == 'https://') && $this->ConfigValue('UseModRewriteWithSSL')); // but only if it's allowed in config!
	return constOn('MOD_REWRITE') && $allow_rewriting;
	}

	/**
	* Reads unit (specified by $prefix)
	* option specified by $option
	*
	* @param string $prefix
	* @param string $option
	* @param mixed $default
	* @return string
	* @access public
	* @author Alex
	*/
	function getUnitOption($prefix, $option, $default = false)
	{
	$unit_config_reader =& $this->recallObject('kUnitConfigReader');
	return $unit_config_reader->getUnitOption($prefix, $option, $default);
	}

	/**
	* Set's new unit option value
	*
	* @param string $prefix
	* @param string $name
	* @param string $value
	* @author Alex
	* @access public
	*/
	function setUnitOption($prefix, $option, $value)
	{
	$unit_config_reader =& $this->recallObject('kUnitConfigReader');
	return $unit_config_reader->setUnitOption($prefix,$option,$value);
	}

	/**
	* Read all unit with $prefix options
	*
	* @param string $prefix
	* @return Array
	* @access public
	* @author Alex
	*/
	function getUnitOptions($prefix)
	{
	$unit_config_reader =& $this->recallObject('kUnitConfigReader');
	return $unit_config_reader->getUnitOptions($prefix);
	}

	/**
	* Returns true if config exists and is allowed for reading
	*
	* @param string $prefix
	* @return bool
	*/
	function prefixRegistred($prefix)
	{
	$unit_config_reader =& $this->recallObject('kUnitConfigReader');
	return $unit_config_reader->prefixRegistred($prefix);
	}

	/**
	* Splits any mixing of prefix and
	* special into correct ones
	*
	* @param string $prefix_special
	* @return Array
	* @access public
	* @author Alex
	*/
	function processPrefix($prefix_special)
	{
	return $this->Factory->processPrefix($prefix_special);
	}

	/**
	* Set's new event for $prefix_special
	* passed
	*
	* @param string $prefix_special
	* @param string $event_name
	* @access public
	*/
	function setEvent($prefix_special,$event_name)
	{
	$event_manager =& $this->recallObject('EventManager');
	$event_manager->setEvent($prefix_special,$event_name);
	}


	/**
	* SQL Error Handler
	*
	* @param int $code
	* @param string $msg
	* @param string $sql
	* @return bool
	* @access private
	* @author Alex
	*/
	function handleSQLError($code, $msg, $sql)
	{
	if ( isset($this->Debugger) )
	{
	$errorLevel = constOn('DBG_SQL_FAILURE') ? E_USER_ERROR : E_USER_WARNING;
	$this->Debugger->dumpVars($_REQUEST);
	$this->Debugger->appendTrace();

	$error_msg = '<span class="debug_error">'.$msg.' ('.$code.')</span><br><a href="javascript:SetClipboard(\''.htmlspecialchars($sql).'\');"><b>SQL</b></a>: '.$this->Debugger->formatSQL($sql);
	$long_id = $this->Debugger->mapLongError($error_msg);
	trigger_error( substr($msg.' ('.$code.') ['.$sql.']',0,1000).' #'.$long_id, $errorLevel);
	return true;
	}
	else
	{
	//$errorLevel = constOn('IS_INSTALL') ? E_USER_WARNING : E_USER_ERROR;
	$errorLevel = E_USER_WARNING;
	trigger_error('<b>SQL Error</b> in sql: '.$sql.', code <b>'.$code.'</b> ('.$msg.')', $errorLevel);
	/*echo '<b>xProcessing SQL</b>: '.$sql.'<br>';
	echo '<b>Error ('.$code.'):</b> '.$msg.'<br>';*/
	return $errorLevel == E_USER_ERROR ? false : true;
	}
	}

	/**
	* Default error handler
	*
	* @param int $errno
	* @param string $errstr
	* @param string $errfile
	* @param int $errline
	* @param Array $errcontext
	*/
	function handleError($errno, $errstr, $errfile = '', $errline = '', $errcontext = '')
	{
	if( constOn('SILENT_LOG') )
	{
	$fp = fopen(FULL_PATH.'/silent_log.txt','a');
	$time = adodb_date('d/m/Y H:i:s');
	fwrite($fp, '['.$time.'] #'.$errno.': '.strip_tags($errstr).' in ['.$errfile.'] on line '.$errline."\n");
	fclose($fp);
	}

	if( !$this->errorHandlers ) return true;

	$i = 0; // while (not foreach) because it is array of references in some cases
	$eh_count = count($this->errorHandlers);
	while($i < $eh_count)
	{
	if( is_array($this->errorHandlers[$i]) )
	{
	$object =& $this->errorHandlers[$i][0];
	$method = $this->errorHandlers[$i][1];
	$object->$method($errno, $errstr, $errfile, $errline, $errcontext);
	}
	else
	{
	$function = $this->errorHandlers[$i];
	$function($errno, $errstr, $errfile, $errline, $errcontext);
	}
	$i++;
	}
	}

	/**
	* Returns & blocks next ResourceId available in system
	*
	* @return int
	* @access public
	* @author Alex
	*/
	function NextResourceId()
	{
	$table_name = TABLE_PREFIX.'IdGenerator';

	$this->DB->Query('LOCK TABLES '.$table_name.' WRITE');
	$this->DB->Query('UPDATE '.$table_name.' SET lastid = lastid + 1');
	$id = $this->DB->GetOne('SELECT lastid FROM '.$table_name);
	if($id === false)
	{
	$this->DB->Query('INSERT INTO '.$table_name.' (lastid) VALUES (2)');
	$id = 2;
	}
	$this->DB->Query('UNLOCK TABLES');
	return $id - 1;
	}

	/**
	* Returns main prefix for subtable prefix passes
	*
	* @param string $current_prefix
	* @return string
	* @access public
	* @author Kostja
	*/
	function GetTopmostPrefix($current_prefix)
	{
	while ( $parent_prefix = $this->getUnitOption($current_prefix, 'ParentPrefix') )
	{
	$current_prefix = $parent_prefix;
	}
	return $current_prefix;
	}

	function &EmailEventAdmin($email_event_name, $to_user_id = -1, $send_params = false)
	{
	return $this->EmailEvent($email_event_name, 1, $to_user_id, $send_params);
	}

	function &EmailEventUser($email_event_name, $to_user_id = -1, $send_params = false)
	{
	return $this->EmailEvent($email_event_name, 0, $to_user_id, $send_params);
	}

	function &EmailEvent($email_event_name, $email_event_type, $to_user_id = -1, $send_params = false)
	{
	$event = new kEvent('emailevents:OnEmailEvent');
	$event->setEventParam('EmailEventName', $email_event_name);
	$event->setEventParam('EmailEventToUserId', $to_user_id);
	$event->setEventParam('EmailEventType', $email_event_type);
	if ($send_params){
	$event->setEventParam('DirectSendParams', $send_params);
	}
	$this->HandleEvent($event);

	return $event;
	}


	function LoggedIn()
	{
	$user =& $this->recallObject('u');
	$user_id = $user->GetID();

	$ret = $user_id > 0;
	if ($this->IsAdmin() && ($user_id == -1)) {
	$ret = true;
	}
	return $ret;
	}

	function CheckPermission($name, $cat_id = null)
	{
	if ($this->GetVar('u_id') == -1 && ($name == 'ADMIN' \|\| $name == 'LOGIN')) {
	return 1;
	}

	if (!isset($cat_id)) {
	$cat_id = $this->GetVar('m_cat_id');
	}
	if ($cat_id == 0) {
	$cat_hierarchy = Array(0);
	}
	else {
	$sql = 'SELECT ParentPath FROM '.$this->getUnitOption('c', 'TableName').' WHERE CategoryId = '.$cat_id;
	$cat_hierarchy = $this->DB->GetOne($sql);
	$cat_hierarchy = explode('\|', $cat_hierarchy);
	array_shift($cat_hierarchy);
	array_pop($cat_hierarchy);
	$cat_hierarchy = array_reverse($cat_hierarchy);
	array_push($cat_hierarchy, 0);
	}

	$groups = $this->RecallVar('UserGroups');

	foreach ($cat_hierarchy as $category_id) {
	$sql = 'SELECT PermissionValue FROM '.TABLE_PREFIX.'Permissions
	WHERE Permission = "'.$name.'"
	AND CatId = '.$category_id.'
	AND GroupId IN ('.$groups.')';
	$res = $this->DB->GetOne($sql);
	if ($res !== false) {
	return $res;
	}
	}

	return 0;
	}

	/**
	* Set's any field of current visit
	*
	* @param string $field
	* @param mixed $value
	*/
	function setVisitField($field, $value)
	{
	$visit =& $this->recallObject('visits');
	$visit->SetDBField($field, $value);
	$visit->Update();
	}

	/**
	* Allows to check if in-portal is installed
	*
	* @return bool
	*/
	function isInstalled()
	{
	return $this->InitDone && (count($this->ModuleInfo) > 0);
	}

	/**
	- * Retuns true if module is enabled
	+ * Allows to determine if module is installed & enabled
	*
	* @param string $module_name
	* @return bool
	*/
	- /*function isModuleEnabled($module_name)
	+ function isModuleEnabled($module_name)
	{
	- return getArrayValue($this->ModuleInfo, $module_name, 'Loaded');
	+ return $this->findModule('Name', $module_name, 'Loaded');

	- }*/
	+ }

	function reportError($class, $method)
	{
	$this->Debugger->appendTrace();
	trigger_error('depricated method <b>'.$class.'->'.$method.'(...)</b>', E_USER_ERROR);
	}

	}

	?>
	\ No newline at end of file

	Property changes on: trunk/core/kernel/application.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.124
	\ No newline at end of property
	+1.125
	\ No newline at end of property

in-portalNo OneTemporaryActions

File Metadata

in-portalView Options

Event Timeline

in-portal
No OneTemporary
Actions

in-portal
View Options