in-portal
No OneTemporary
Actions

Subscribers

None

File Metadata

Created: Thu, Jun 19, 11:26 AM

in-portal
View Options

This file is larger than 256 KB, so syntax highlighting was skipped.

	Index: branches/5.2.x/core/kernel/session/inp_session.php
	===================================================================
	--- branches/5.2.x/core/kernel/session/inp_session.php (revision 14713)
	+++ branches/5.2.x/core/kernel/session/inp_session.php (revision 14714)
	@@ -1,98 +1,92 @@
	<?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 InpSession extends Session
	{
	/**
	* Enter description here...
	*
	* @var InpSessionStorage
	* @access protected
	*/
	protected $Storage;

	public function Init($prefix, $special)
	{
	$this->SessionTimeout = $this->Application->ConfigValue('SessionTimeout');

	$path = (BASE_PATH == '') ? '/' : BASE_PATH;
	$this->SetCookiePath($path);

	$cookie_name = $this->Application->ConfigValue('SessionCookieName');

	if ( !$cookie_name ) {
	$cookie_name = 'sid';
	}

	$admin_session = ($this->Application->isAdmin && $special !== 'front') \|\| ($special == 'admin');

	if ( $admin_session ) {
	$cookie_name = 'adm_' . $cookie_name;
	}

	$this->SetCookieName($cookie_name);
	$this->SetCookieDomain(SERVER_NAME);

	if ( $admin_session ) {
	$mode = self::smAUTO;
	}
	elseif ( defined('IS_INSTALL') && IS_INSTALL ) {
	$mode = self::smCOOKIES_ONLY;
	}
	else {
	$ses_mode = $this->Application->ConfigValue('CookieSessions');

	if ( $ses_mode == 2 ) {
	$mode = self::smAUTO;
	}
	elseif ( $ses_mode == 1 ) {
	$mode = self::smCOOKIES_ONLY;
	}
	elseif ( $ses_mode == 0 ) {
	$mode = self::smGET_ONLY;
	}
	else {
	$mode = self::smAUTO;
	}
	}

	$this->SetMode($mode);

	parent::Init($prefix, $special);
	-
	- if ( !$this->Application->isAdmin && $this->GetField('PortalUserId') <= 0 ) {
	- $group_list = $this->Application->ConfigValue('User_GuestGroup') . ',' . $this->Application->ConfigValue('User_LoggedInGroup');
	- $this->SetField('GroupId', $this->Application->ConfigValue('User_GuestGroup'));
	- $this->SetField('GroupList', $group_list);
	- }
	}

	function Destroy()
	{
	$this->Storage->DeleteSession();
	$this->Storage->DeleteEditTables();
	$this->Data = new Params();
	$this->SID = $this->CachedSID = '';

	if ($this->CookiesEnabled) {
	$this->SetSessionCookie(); //will remove the cookie due to value (sid) is empty
	}

	$this->SetSession(); //will create a new session
	}

	}

	Index: branches/5.2.x/core/kernel/session/inp_session_storage.php
	===================================================================
	--- branches/5.2.x/core/kernel/session/inp_session_storage.php (revision 14713)
	+++ branches/5.2.x/core/kernel/session/inp_session_storage.php (revision 14714)
	@@ -1,95 +1,100 @@
	<?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 InpSessionStorage extends SessionStorage {

	public function Init($prefix, $special)
	{
	parent::Init($prefix, $special);

	$this->TableName = TABLE_PREFIX.'UserSession';
	$this->SessionDataTable = TABLE_PREFIX.'SessionData';
	$this->IDField = 'SessionKey';
	$this->TimestampField = 'LastAccessed';
	$this->DataValueField = 'VariableValue';
	$this->DataVarField = 'VariableName';
	}

	function LocateSession($sid)
	{
	$res = parent::LocateSession($sid);
	if ($res) {
	$this->Expiration += $this->SessionTimeout;
	}
	return $res;
	}

	function UpdateSession($timeout = 0)
	{
	$time = adodb_mktime();
	// Update LastAccessed only if it's newer than 1/10 of session timeout - perfomance optimization to eliminate needless updates on every click
	// if ($time - $this->DirectVars['LastAccessed'] > $this->SessionTimeout/10) {
	$this->SetField($this->TimestampField, $time + $this->SessionTimeout);
	// }
	}

	function GetSessionDefaults()
	{
	$fields_hash = Array (
	'PortalUserId' => $this->Application->isAdmin ? 0 : USER_GUEST,
	'Language' => $this->Application->GetDefaultLanguageId(true),
	'Theme' => $this->Application->GetDefaultThemeId(),
	'GroupId' => $this->Application->ConfigValue('User_GuestGroup'),
	'GroupList' => $this->Application->ConfigValue('User_GuestGroup'),
	);

	+ if ( !$this->Application->isAdmin ) {
	+ // Guest users on Front-End belongs to Everyone group too
	+ $fields_hash['GroupList'] .= ',' . $this->Application->ConfigValue('User_LoggedInGroup');
	+ }
	+
	if( isset($_SERVER['REMOTE_ADDR']) ) {
	$fields_hash['IpAddress'] = $_SERVER['REMOTE_ADDR']; // getenv('REMOTE_ADDR') won't work on IIS, so use $_SERVER instead
	}

	return array_merge($fields_hash, parent::GetSessionDefaults());
	}

	function GetExpiredSIDs()
	{
	$query = ' SELECT '.$this->IDField.' FROM '.$this->TableName.' WHERE '.$this->TimestampField.' < '.(adodb_mktime());
	$ret = $this->Conn->GetCol($query);
	if($ret) {
	$this->DeleteEditTables();
	}
	return $ret;

	}

	function DeleteEditTables()
	{
	$tables = $this->Conn->GetCol('SHOW TABLES');
	$mask_edit_table = '/'.TABLE_PREFIX.'ses_(.)_edit_(.)/';
	$mask_search_table = '/'.TABLE_PREFIX.'ses_(.?)_(.)/';

	$sql='SELECT COUNT(*) FROM '.$this->TableName.' WHERE '.$this->IDField.' = \'%s\'';
	foreach($tables as $table)
	{
	if( preg_match($mask_edit_table,$table,$rets) \|\| preg_match($mask_search_table,$table,$rets) )
	{
	$sid = preg_replace('/(.)_(.)/', '\\1', $rets[1]); // remove popup's wid from sid
	$is_alive = $this->Conn->GetOne( sprintf($sql,$sid) );
	if(!$is_alive) $this->Conn->Query('DROP TABLE IF EXISTS '.$table);
	}
	}
	}
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/session/session.php
	===================================================================
	--- branches/5.2.x/core/kernel/session/session.php (revision 14713)
	+++ branches/5.2.x/core/kernel/session/session.php (revision 14714)
	@@ -1,1050 +1,1035 @@
	<?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!');

	/*
	The session works the following way:

	1. When a visitor loads a page from the site the script checks if cookies_on varibale has been passed to it as a cookie.
	2. If it has been passed, the script tries to get Session ID (SID) from the request:
	3. Depending on session mode the script is getting SID differently.

	The following modes are available:
	- Session::smAUTO
	Automatic mode: if cookies are on at the client side, the script relays only on cookies and
	ignore all other methods of passing SID. If cookies are off at the client side, the script relays on SID
	passed through query string and referal passed by the client. THIS METHOD IS NOT 100% SECURE, as long as
	attacker may get SID and substitude referal to gain access to user' session. One of the faults of this method
	is that the session is only created when the visitor clicks the first link on the site, so there
	is NO session at the first load of the page. (Actually there is a session, but it gets lost after
	the first click because we do not use SID in query string while we are not sure if we need it)

	- Session::smCOOKIES_ONLY
	Cookies only: in this mode the script relays solely on cookies passed from the browser and ignores
	all other methods. In this mode there is no way to use sessions for clients without cookies support
	or cookies support disabled. The cookies are stored with the full domain name and path to base-directory
	of script installation.

	- Session::smGET_ONLY
	GET only: the script will not set any cookies and will use only SID passed in query string using GET,
	it will also check referal. The script will set SID at the first load of the page

	- Session::smCOOKIES_AND_GET
	Combined mode: the script will use both cookies and GET right from the start. If client has cookies enabled,
	the script will check SID stored in cookie and passed in query string, and will use this SID only if both
	cookie and query string matches. However if cookies are disabled on the client side, the script will work
	the same way as in GET_ONLY mode.

	4. After the script has the SID it tries to load it from the Storage (default is database)

	5. If such SID is found in the database, the script checks its expiration time. If session is not expired,
	it updates its expiration, and resend the cookie (if applicable to session mode)

	6. Then the script loads all the data (session variables) pertaining to the SID.


	Usage:

	$session = new Session(Session::smAUTO); //Session::smAUTO is default, you could just leave the brackets empty, or provide another mode

	$session->SetCookieDomain('my.domain.com');
	$session->SetCookiePath('/myscript');
	$session->SetCookieName('my_sid_cookie');
	$session->SetGETName('sid');
	$session->InitSession();
	...

	//link output:

	echo "<a href='index.php?'". ( $session->NeedQueryString() ? 'sid='.$session->SID : '' ) .">My Link</a>";

	*/

	class Session extends kBase {

	const smAUTO = 1;
	const smCOOKIES_ONLY = 2;
	const smGET_ONLY = 3;
	const smCOOKIES_AND_GET = 4;

	var $Checkers;

	var $Mode;
	var $OriginalMode = null;
	var $GETName = 'sid';

	var $CookiesEnabled = true;
	var $CookieName = 'sid';
	var $CookieDomain;
	var $CookiePath;
	var $CookieSecure = 0;

	var $SessionTimeout = 3600;
	var $Expiration;

	var $SID;

	var $CachedSID;

	var $SessionSet = false;

	/**
	* Session ID is used from GET
	*
	* @var bool
	*/
	var $_fromGet = false;

	/**
	* Enter description here...
	*
	* @var SessionStorage
	* @access protected
	*/
	protected $Storage;

	var $CachedNeedQueryString = null;

	/**
	* Session Data array
	*
	* @var Params
	*/
	var $Data;

	/**
	* Names of optional session keys with their optional values (which does not need to be always stored)
	*
	* @var Array
	*/
	var $OptionalData = Array ();

	/**
	* Session expiration mark
	*
	* @var bool
	*/
	var $expired = false;

	/**
	* Creates session
	*
	* @param int $mode
	* @access public
	*/
	public function __construct($mode = self::smAUTO)
	{
	parent::__construct();

	$this->SetMode($mode);
	}

	function SetMode($mode)
	{
	$this->Mode = $mode;
	$this->CachedNeedQueryString = null;
	$this->CachedSID = null;
	}

	function SetCookiePath($path)
	{
	$this->CookiePath = str_replace(' ', '%20', $path);
	}

	/**
	* Setting cookie domain. Set false for local domains, because they don't contain dots in their names.
	*
	* @param string $domain
	*/
	function SetCookieDomain($domain)
	{
	// 1. localhost or other like it without "." in domain name
	if (!substr_count($domain, '.')) {
	// don't use cookie domain at all
	$this->CookieDomain = false;
	return ;
	}

	// 2. match using predefined cookie domains from configuration
	$cookie_domains = $this->Application->ConfigValue('SessionCookieDomains');

	if ($cookie_domains) {
	$cookie_domains = array_map('trim', explode("\n", $cookie_domains));

	foreach ($cookie_domains as $cookie_domain) {
	if (ltrim($cookie_domain, '.') == $domain) {
	$this->CookieDomain = $cookie_domain; // as defined in configuration
	return ;
	}
	}
	}

	// 3. only will execute, when none of domains were matched at previous step
	$this->CookieDomain = $this->_autoGuessDomain($domain);
	}

	/**
	* Auto-guess cookie domain based on $_SERVER['HTTP_HOST']
	*
	* @param $domain
	* @return string
	*/
	function _autoGuessDomain($domain)
	{
	static $cache = Array ();

	if (!array_key_exists($domain, $cache)) {
	switch ( substr_count($domain, '.') ) {
	case 2:
	// 3rd level domain (3 parts)
	$cache[$domain] = substr($domain, strpos($domain, '.')); // with leading "."
	break;

	case 1:
	// 2rd level domain (2 parts)
	$cache[$domain] = '.' . $domain; // with leading "."
	break;

	default:
	// more then 3rd level
	$cache[$domain] = ltrim($domain, '.'); // without leading "."
	break;
	}
	}

	return $cache[$domain];
	}

	function SetGETName($get_name)
	{
	$this->GETName = $get_name;
	}

	function SetCookieName($cookie_name)
	{
	$this->CookieName = $cookie_name;
	}

	function InitStorage($special)
	{
	$this->Storage =& $this->Application->recallObject('SessionStorage.'.$special);
	$this->Storage->setSession($this);
	}

	public function Init($prefix, $special)
	{
	parent::Init($prefix, $special);

	$this->CheckIfCookiesAreOn();
	if ($this->CookiesEnabled) $_COOKIE['cookies_on'] = 1;

	$this->Checkers = Array();
	$this->InitStorage($special);
	$this->Data = new Params();

	$tmp_sid = $this->GetPassedSIDValue();

	$check = $this->Check();

	if ($this->Application->isAdmin) {
	// 1. Front-End session may not be created (SID is present, but no data in database).
	// Check expiration LATER from kApplication::Init, because template, used in session
	// expiration redirect should be retrieved from mod-rewrite url first.

	// 2. Admin sessions are always created, so case when SID is present,
	// but session in database isn't is 100% session expired. Check expiration
	// HERE because Session::SetSession will create missing session in database
	// and when Session::ValidateExpired will be called later from kApplication::Init
	// it won't consider such session as expired !!!
	$this->ValidateExpired();
	}

	if ($check) {
	$this->SID = $this->GetPassedSIDValue();
	$this->Refresh();
	$this->LoadData();
	}
	else {
	$this->SetSession();
	}

	if (!is_null($this->OriginalMode)) $this->SetMode($this->OriginalMode);
	}

	function ValidateExpired()
	{
	if (defined('IS_INSTALL') && IS_INSTALL) {
	return ;
	}

	// $this->DeleteExpired(); // called from u:OnDeleteExpiredSessions agent now

	if ($this->expired \|\| ($this->CachedSID && !$this->_fromGet && !$this->SessionSet)) {
	$this->RemoveSessionCookie();
	// true was here to force new session creation, but I (kostja) used
	// RemoveCookie a line above, to avoid redirect loop with expired sid
	// not being removed setSession with true was used before, to set NEW
	// session cookie
	$this->SetSession();

	// case #1: I've OR other site visitor expired my session
	// case #2: I have no session in database, but SID is present
	$this->expired = false;
	$expire_event = new kEvent('u:OnSessionExpire');
	$this->Application->HandleEvent($expire_event);
	}
	}

	/**
	- * 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) )
	- );
	- }
	-
	- /**
	* Helper method for detecting cookie availability
	*
	* @return bool
	*/
	function _checkCookieReferer()
	{
	// removing /admin for compatability with in-portal (in-link/admin/add_link.php)
	$path = preg_replace('/admin[\/]{0,1}$/', '', $this->CookiePath);
	$reg = '#^'.preg_quote(PROTOCOL.ltrim($this->CookieDomain, '.').$path).'#';

	return preg_match($reg, getArrayValue($_SERVER, 'HTTP_REFERER') );
	}

	function CheckIfCookiesAreOn()
	{
	if ( $this->Mode == self::smGET_ONLY ) {
	//we don't need to bother checking if we would not use it
	$this->CookiesEnabled = false;
	return false;
	}

	$http_query =& $this->Application->recallObject('HTTPQuery');
	/* @var $http_query kHTTPQuery */

	$cookies_on = array_key_exists('cookies_on', $http_query->Cookie); // not good here

	$get_sid = getArrayValue($http_query->Get, $this->GETName);

	- if ( ($this->IsHTTPSRedirect() && $get_sid) \|\| $this->getFlashSID() ) { // Redirect from http to https on different domain OR flash uploader
	+ if ( ($this->Application->HttpQuery->IsHTTPSRedirect() && $get_sid) \|\| $this->getFlashSID() ) { // Redirect from http to https on different domain OR flash uploader
	$this->OriginalMode = $this->Mode;
	$this->SetMode(self::smGET_ONLY);
	}

	- if ( !$cookies_on \|\| $this->IsHTTPSRedirect() \|\| $this->getFlashSID() ) {
	+ if ( !$cookies_on \|\| $this->Application->HttpQuery->IsHTTPSRedirect() \|\| $this->getFlashSID() ) {
	//If referer is our server, but we don't have our cookies_on, it's definetly off
	$is_install = defined('IS_INSTALL') && IS_INSTALL;
	- if ( !$is_install && $this->_checkCookieReferer() && !$this->Application->GetVar('admin') && !$this->IsHTTPSRedirect() ) {
	+ if ( !$is_install && $this->_checkCookieReferer() && !$this->Application->GetVar('admin') && !$this->Application->HttpQuery->IsHTTPSRedirect() ) {
	$this->CookiesEnabled = false;
	}
	else {
	//Otherwise we still suppose cookies are on, because may be it's the first time user visits the site
	//So we send cookies on to get it next time (when referal will tell us if they are realy off
	$this->SetCookie('cookies_on', 1, adodb_mktime() + 31104000); //one year should be enough
	}
	}
	else {
	$this->CookiesEnabled = true;
	}

	return $this->CookiesEnabled;
	}

	/**
	* Sets cookie for current site using path and domain
	*
	* @param string $name
	* @param mixed $value
	* @param int $expires
	*/
	function SetCookie($name, $value, $expires = null)
	{
	if (isset($expires) && $expires < adodb_mktime()) {
	unset($this->Application->HttpQuery->Cookie[$name]);
	}
	else {
	$this->Application->HttpQuery->Cookie[$name] = $value;
	}

	$old_style_domains = Array (
	// domain like in pre 5.1.0 versions
	'.' . SERVER_NAME,

	// auto-guessed domain (when user specified other domain in configuration variable)
	$this->_autoGuessDomain(SERVER_NAME)
	);

	foreach ($old_style_domains as $old_style_domain) {
	if ($this->CookieDomain != $old_style_domain) {
	// new style cookie domain -> delete old style cookie to prevent infinite redirect
	setcookie($name, $value, adodb_mktime() - 3600, $this->CookiePath, $old_style_domain, $this->CookieSecure);
	}
	}

	setcookie($name, $value, $expires, $this->CookiePath, $this->CookieDomain, $this->CookieSecure);
	}

	function Check()
	{
	// don't check referer here, because it doesn't provide any security option and can be easily falsified

	$sid = $this->GetPassedSIDValue();

	if (empty($sid)) {
	return false;
	}

	//try to load session by sid, if everything is fine
	$result = $this->LoadSession($sid);

	$this->SessionSet = $result; // fake front-end session will given "false" here

	return $result;
	}

	function LoadSession($sid)
	{
	if( $this->Storage->LocateSession($sid) ) {
	// if we have session with such SID - get its expiration
	$this->Expiration = $this->Storage->GetExpiration();

	// If session has expired
	if ($this->Expiration < adodb_mktime()) {
	// when expired session is loaded, then SID is
	// not assigned, but used in Destroy method
	$this->SID = $sid;
	$this->Destroy();

	$this->expired = true;

	// when Destory methods calls SetSession inside and new session get created
	return $this->SessionSet;
	}

	// Otherwise it's ok
	return true;
	}
	else {
	// fake or deleted due to expiration SID
	if (!$this->_fromGet) {
	$this->expired = true;
	}

	return false;
	}
	}

	function getFlashSID()
	{
	$http_query =& $this->Application->recallObject('HTTPQuery');
	/* @var $http_query kHTTPQuery */

	return getArrayValue($http_query->Post, 'flashsid');
	}

	function GetPassedSIDValue($use_cache = 1)
	{
	if (!empty($this->CachedSID) && $use_cache) {
	return $this->CachedSID;
	}

	// flash sid overrides regular sid
	$get_sid = $this->getFlashSID();

	if (!$get_sid) {
	$http_query =& $this->Application->recallObject('HTTPQuery');
	/* @var $http_query kHTTPQuery */

	$get_sid = getArrayValue($http_query->Get, $this->GETName);
	}

	$sid_from_get = $get_sid ? true : false;

	if ($this->Application->GetVar('admin') == 1 && $get_sid) {
	$sid = $get_sid;
	}
	else {
	switch ($this->Mode) {
	case self::smAUTO:
	//Cookies has the priority - we ignore everything else
	$sid = $this->CookiesEnabled ? $this->GetSessionCookie() : $get_sid;

	if ($this->CookiesEnabled) {
	$sid_from_get = false;
	}
	break;

	case self::smCOOKIES_ONLY:
	$sid = $this->GetSessionCookie();
	break;

	case self::smGET_ONLY:
	$sid = $get_sid;
	break;

	case self::smCOOKIES_AND_GET:
	$cookie_sid = $this->GetSessionCookie();
	//both sids should match if cookies are enabled
	if (!$this->CookiesEnabled \|\| ($cookie_sid == $get_sid)) {
	$sid = $get_sid; //we use get here just in case cookies are disabled
	}
	else {
	$sid = '';
	$sid_from_get = false;
	}
	break;
	}
	}

	$this->CachedSID = $sid;
	$this->_fromGet = $sid_from_get;

	return $this->CachedSID;
	}

	/**
	* Returns session id
	*
	* @return int
	* @access public
	*/
	function GetID()
	{
	return $this->SID;
	}

	/**
	* Generates new session id
	*
	* @return int
	* @access private
	*/
	function GenerateSID()
	{
	list ($usec, $sec) = explode(' ', microtime());

	$sid_part_1 = substr($usec, 4, 4);
	$sid_part_2 = mt_rand(1, 9);
	$sid_part_3 = substr($sec, 6, 4);
	$digit_one = substr($sid_part_1, 0, 1);

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

	$this->setSID($sid_part_1 . $sid_part_2 . $sid_part_3);

	return $this->SID;
	}

	/**
	* Set's new session id
	*
	* @param int $new_sid
	* @access private
	*/
	function setSID($new_sid)
	{
	$this->SID /= $this->CachedSID/ = $new_sid; // don't set cached sid here
	$this->Application->SetVar($this->GETName,$new_sid);
	}

	function NeedSession()
	{
	$data = $this->Data->GetParams();

	$data_keys = array_keys($data);
	$optional_keys = array_keys($this->OptionalData);
	$real_keys = array_diff($data_keys, $optional_keys);

	return $real_keys ? true : false;
	}

	function SetSession($force = false)
	{
	- if ($this->SessionSet && !$force) {
	+ if ( $this->SessionSet && !$force ) {
	return true;
	}

	$this->Expiration = adodb_mktime() + $this->SessionTimeout;

	- if (!$force && /!$this->Application->isAdmin &&/ !$this->Application->GetVar('admin') && !$this->NeedSession()) {
	+ if ( !$force && /!$this->Application->isAdmin &&/ !$this->Application->GetVar('admin') && !$this->NeedSession() ) {
	// don't create session (in db) on Front-End, when sid is present (GPC), but data in db isn't
	- if ($this->_fromGet) {
	+ if ( $this->_fromGet ) {
	// set sid, that was given in GET
	- $this->setSID( $this->GetPassedSIDValue() );
	- } else {
	+ $this->setSID($this->GetPassedSIDValue());
	+ }
	+ else {
	// re-generate sid only, when cookies are used
	$this->GenerateSID();
	}

	$this->Storage->StoreSession(false);

	return false;
	}

	- if (!$this->SID \|\| $force) {
	+ if ( !$this->SID \|\| $force ) {
	$this->GenerateSID();
	}

	- switch ($this->Mode) {
	+ switch ( $this->Mode ) {
	case self::smAUTO:
	- if ($this->CookiesEnabled) {
	+ if ( $this->CookiesEnabled ) {
	$this->SetSessionCookie();
	}
	break;

	case self::smGET_ONLY:
	break;

	case self::smCOOKIES_ONLY:
	case self::smCOOKIES_AND_GET:
	$this->SetSessionCookie();
	break;
	}

	$this->Storage->StoreSession();

	- if ($this->Application->isAdmin \|\| $this->Special == 'admin') {
	+ if ( $this->Application->isAdmin \|\| $this->Special == 'admin' ) {
	$this->StoreVar('admin', 1);
	}

	$this->SessionSet = true; // should be called before SaveData, because SaveData will try to SetSession again
	- if ($this->Special != '') {
	+ if ( $this->Special != '' ) {
	// front-session called from admin or otherwise, then save it's data
	$this->SaveData();
	}

	$this->Application->resetCounters('UserSession');
	return true;
	}

	/**
	* Returns SID from cookie.
	*
	* Use 2 cookies to have 2 expiration:
	* - 1. for normal expiration when browser is not closed (30 minutes by default), configurable
	* - 2. for advanced expiration when browser is closed
	*
	* @return int
	*/
	function GetSessionCookie()
	{
	$keep_session_on_browser_close = $this->Application->ConfigValue('KeepSessionOnBrowserClose');
	if (isset($this->Application->HttpQuery->Cookie[$this->CookieName]) &&
	( $keep_session_on_browser_close \|\|
	(
	!$keep_session_on_browser_close &&
	isset($this->Application->HttpQuery->Cookie[$this->CookieName.'_live'])
	&&
	$this->Application->HttpQuery->Cookie[$this->CookieName] == $this->Application->HttpQuery->Cookie[$this->CookieName.'_live']
	)
	)
	) {
	return $this->Application->HttpQuery->Cookie[$this->CookieName];
	}
	return false;
	}

	/**
	* Updates SID in cookie with new value
	*
	*/
	function SetSessionCookie()
	{
	$this->SetCookie($this->CookieName, $this->SID, $this->Expiration);
	$this->SetCookie($this->CookieName.'_live', $this->SID);
	$_COOKIE[$this->CookieName] = $this->SID; // for compatibility with in-portal
	}

	function RemoveSessionCookie()
	{
	$this->SetCookie($this->CookieName, '');
	$this->SetCookie($this->CookieName.'_live', '');
	$_COOKIE[$this->CookieName] = null; // for compatibility with in-portal
	}

	/**
	* Refreshes session expiration time
	*
	* @access private
	*/
	function Refresh()
	{
	if ($this->Application->GetVar('skip_session_refresh')) {
	return ;
	}

	if ($this->CookiesEnabled) {
	// we need to refresh the cookie
	$this->SetSessionCookie();
	}
	$this->Storage->UpdateSession();
	}

	function Destroy()
	{
	$this->Storage->DeleteSession();
	$this->Data = new Params();
	$this->SID = $this->CachedSID = '';
	$this->SessionSet = false;

	if ($this->CookiesEnabled) {
	$this->SetSessionCookie(); //will remove the cookie due to value (sid) is empty
	}

	$this->SetSession(true); //will create a new session, true to force
	}

	function NeedQueryString($use_cache = 1)
	{
	if ($this->CachedNeedQueryString != null && $use_cache) {
	return $this->CachedNeedQueryString;
	}

	$result = false;
	switch ($this->Mode) {
	case self::smAUTO:
	if (!$this->CookiesEnabled) {
	$result = true;
	}
	break;

	/*case self::smCOOKIES_ONLY:
	break;*/

	case self::smGET_ONLY:
	case self::smCOOKIES_AND_GET:
	$result = true;
	break;
	}

	$this->CachedNeedQueryString = $result;

	return $result;
	}

	function LoadData()
	{
	$this->Data->AddParams( $this->Storage->LoadData() );
	}

	function PrintSession($comment = '')
	{
	if (defined('DEBUG_MODE') && $this->Application->isDebugMode() && kUtil::constOn('DBG_SHOW_SESSIONDATA')) {
	// dump session data
	$this->Application->Debugger->appendHTML('SessionStorage [' . ($this->RecallVar('admin') == 1 ? 'Admin' : 'Front-End') . '] ('.$comment.'):');
	$session_data = $this->Data->GetParams();
	ksort($session_data);
	foreach ($session_data as $session_key => $session_value) {
	if (kUtil::IsSerialized($session_value)) {
	$session_data[$session_key] = unserialize($session_value);
	}
	}
	$this->Application->Debugger->dumpVars($session_data);

	if (!$this->RecallVar('admin')) {
	// dump real keys (only for front-end)
	$data_keys = array_keys($session_data);
	$optional_keys = array_keys($this->OptionalData);
	$real_keys = array_diff($data_keys, $optional_keys);

	if ($real_keys) {
	$ret = '';
	foreach ($real_keys as $real_key) {
	$ret .= '[' . $real_key . '] = [' . $session_data[$real_key] . ']<br/>';
	}

	$this->Application->Debugger->appendHTML('Real Keys:<br/> ' . $ret);
	}
	}
	}

	if (defined('DEBUG_MODE') && $this->Application->isDebugMode() && kUtil::constOn('DBG_SHOW_PERSISTENTDATA')) {
	// dump persistent session data
	if ($this->Storage->PersistentVars) {
	$this->Application->Debugger->appendHTML('Persistant Session:');
	$session_data = $this->Storage->PersistentVars;
	ksort($session_data);
	foreach ($session_data as $session_key => $session_value) {
	if (kUtil::IsSerialized($session_value)) {
	$session_data[$session_key] = unserialize($session_value);
	}
	}
	$this->Application->Debugger->dumpVars($session_data);
	}
	}
	}

	function SaveData($params = Array ())
	{
	if (!$this->SetSession()) { // call it here - it may be not set before, because there was no need; if there is a need, it will be set here
	return;
	}

	if (!$this->Application->GetVar('skip_last_template') && $this->Application->GetVar('ajax') != 'yes') {
	$this->SaveLastTemplate( $this->Application->GetVar('t'), $params );
	}

	$this->PrintSession('after save');
	$this->Storage->SaveData();
	}

	/**
	* Save last template
	*
	* @param string $t
	* @param Array $params
	*/
	function SaveLastTemplate($t, $params = Array ())
	{
	$wid = $this->Application->GetVar('m_wid');

	- $last_env = $this->getLastTemplateENV($t, Array('m_opener' => 'u'));
	- $last_template = basename($_SERVER['PHP_SELF']).'\|'.mb_substr($last_env, mb_strlen(ENV_VAR_NAME) + 1);
	- $this->StoreVar(rtrim('last_template_'.$wid, '_'), $last_template);
	+ $last_env = $this->getLastTemplateENV($t, Array ('m_opener' => 'u'));
	+ $last_template = basename($_SERVER['PHP_SELF']) . '\|' . $last_env;
	+ $this->StoreVar(rtrim('last_template_' . $wid, '_'), $last_template);

	// prepare last_template for opener stack, module & session could be added later
	$last_env = $this->getLastTemplateENV($t, null, false);
	- $last_template = basename($_SERVER['PHP_SELF']).'\|'.mb_substr($last_env, mb_strlen(ENV_VAR_NAME) + 1);
	+ $last_template = basename($_SERVER['PHP_SELF']) . '\|' . $last_env;

	- // save last_template in persistant session
	+ // save last_template in persistent session
	if (!$wid) {
	if ($this->Application->isAdmin) {
	// only for main window, not popups, not login template, not temp mode (used in adm:MainFrameLink tag)
	$temp_mode = false;
	$passed = explode(',', $this->Application->GetVar('passed'));
	foreach ($passed as $passed_prefix) {
	if ($this->Application->GetVar($passed_prefix.'_mode')) {
	$temp_mode = true;
	break;
	}
	}

	if (!$temp_mode) {
	- if (isset($this->Application->HttpQuery->Get['section'])) {
	- // check directly in GET, bacause LinkVar (session -> request) used on these vars
	+ if ( $this->Application->GetVarDirect('section', 'Get') !== false ) {
	+ // check directly in GET, because LinkVar (session -> request) used on these vars
	$last_template .= '&section='.$this->Application->GetVar('section').'&module='.$this->Application->GetVar('module');
	}

	$this->StorePersistentVar('last_template_popup', $last_template);
	}
	}
	elseif ($this->Application->GetVar('admin')) {
	// admin checking by session data to prevent recursive session save
	static $admin_saved = null;

	if (!$this->RecallVar('admin') && !isset($admin_saved)) {
	// bug: we get recursion in this place, when cookies are disabled in browser and we are browsing
	// front-end in admin's frame (front-end session is initialized using admin's sid and they are
	// mixed together)

	$admin_saved = true;

	$admin_session =& $this->Application->recallObject('Session.admin');
	/* @var $admin_session Session */

	// save to admin last_template too, because when F5 is pressed in frameset Front-End frame should reload as well

	$admin_session->StoreVar('last_template_popup', '../' . $last_template);
	$admin_session->StorePersistentVar('last_template_popup', '../' . $last_template);
	$admin_session->SaveData( Array ('save_last_template' => false) );
	}
	else {
	// don't allow admin=1 & editing_mode=* to get in admin last_template
	$last_template = preg_replace('/&(admin\|editing_mode)=[\d]/', '', $last_template);
	}
	}
	}

	- // save other last... variables for mistical purposes (customizations may be)
	+ // save other last... variables for mystical purposes (customizations may be)
	$this->StoreVar('last_url', $_SERVER['REQUEST_URI']); // needed by ord:StoreContinueShoppingLink
	- $this->StoreVar('last_env', mb_substr($last_env, mb_strlen(ENV_VAR_NAME)+1));
	+ $this->StoreVar('last_env', $last_env);

	$save_last_template = array_key_exists('save_last_template', $params) ? $params['save_last_template'] : true;

	if ($save_last_template) {
	- // save last template here, becase section & module could be added before
	+ // save last template here, because section & module could be added before
	$this->StoreVar(rtrim('last_template_popup_'.$wid, '_'), $last_template);
	}
	}

	function getLastTemplateENV($t, $params = null, $encode = true)
	{
	if (!isset($params)) {
	$params = Array ();
	}

	$params['__URLENCODE__'] = 1; // uses "&" instead of "&" for url part concatenation + replaces "\" to "%5C" (works in HTML)


	if ($this->Application->GetVar('admin') && !array_key_exists('admin', $params) && !defined('EDITING_MODE')) {
	$params['editing_mode'] = ''; // used in kApplication::Run
	}

	$params = array_merge($this->Application->getPassThroughVariables($params), $params);
	- $ret = $this->Application->BuildEnv($t, $params, 'all');
	+ $ret = $this->Application->BuildEnv($t, $params, 'all', false, false);

	if (!$encode) {
	// cancels 2nd part of replacements, that URLENCODE does
	$ret = str_replace('%5C', '\\', $ret);
	}
	return $ret;
	}

	function StoreVar($name, $value, $optional = false)
	{
	$this->Data->Set($name, $value);

	if ($optional) {
	// make variable optional, also remember optional value
	$this->OptionalData[$name] = $value;
	}
	elseif (!$optional && array_key_exists($name, $this->OptionalData)) {
	if ($this->OptionalData[$name] == $value) {
	// same value as optional -> don't remove optional mark
	return ;
	}

	// make variable non-optional
	unset($this->OptionalData[$name]);
	}
	}

	function StorePersistentVar($name, $value, $optional = false)
	{
	$this->Storage->StorePersistentVar($name, $value, $optional);
	}

	function LoadPersistentVars()
	{
	$this->Storage->LoadPersistentVars();
	}

	function StoreVarDefault($name, $value, $optional=false)
	{
	$tmp = $this->RecallVar($name);
	if($tmp === false \|\| $tmp == '')
	{
	$this->StoreVar($name, $value, $optional);
	}
	}

	function RecallVar($name, $default = false)
	{
	$ret = $this->Data->Get($name);
	return ($ret === false) ? $default : $ret;
	}

	function RecallPersistentVar($name, $default = false)
	{
	return $this->Storage->RecallPersistentVar($name, $default);
	}


	function RemoveVar($name)
	{
	$this->Storage->RemoveFromData($name);
	$this->Data->Remove($name);
	}

	function RemovePersistentVar($name)
	{
	return $this->Storage->RemovePersistentVar($name);
	}

	/**
	* Ignores session varible value set before
	*
	* @param string $name
	*/
	function RestoreVar($name)
	{
	$value = $this->Storage->GetFromData($name, '__missing__');

	if ($value === '__missing__') {
	// there is nothing to restore (maybe session was not saved), look in optional variable values
	$value = array_key_exists($name, $this->OptionalData) ? $this->OptionalData[$name] : false;
	}

	return $this->StoreVar($name, $value);
	}

	function GetField($var_name, $default = false)
	{
	return $this->Storage->GetField($var_name, $default);
	}

	function SetField($var_name, $value)
	{
	$this->Storage->SetField($var_name, $value);
	}

	/**
	* Deletes expired sessions
	*
	* @return Array expired sids if any
	* @access private
	*/
	function DeleteExpired()
	{
	return $this->Storage->DeleteExpired();
	}

	/**
	* Deletes given sessions
	*
	* @param $session_ids
	* @param int $delete_reason
	* @return void
	*/
	function DeleteSessions($session_ids, $delete_reason = SESSION_LOG_EXPIRED)
	{
	$this->Storage->DeleteSessions($session_ids, $delete_reason);
	}

	/**
	* Allows to check if user in this session is logged in or not
	*
	* @return bool
	*/
	function LoggedIn()
	{
	$user_id = $this->RecallVar('user_id');

	$ret = $user_id > 0;
	if (($this->RecallVar('admin') == 1 \|\| defined('ADMIN')) && ($user_id == USER_ROOT)) {
	$ret = true;
	}
	return $ret;
	}

	}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/session/session_storage.php
	===================================================================
	--- branches/5.2.x/core/kernel/session/session_storage.php (revision 14713)
	+++ branches/5.2.x/core/kernel/session/session_storage.php (revision 14714)
	@@ -1,488 +1,491 @@
	<?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!');

	/**
	* Implements Session Store in the Database
	*
	*/
	class SessionStorage extends kDBBase {

	/**
	* Reference to session
	*
	* @var Session
	* @access protected
	*/
	protected $Session = null;

	var $Expiration;
	var $SessionTimeout = 0;

	var $DirectVars = Array ();
	var $ChangedDirectVars = Array ();

	var $PersistentVars = Array ();

	var $OriginalData = Array ();

	var $TimestampField;
	var $SessionDataTable;
	var $DataValueField;
	var $DataVarField;

	public function Init($prefix, $special)
	{
	parent::Init($prefix, $special);

	$this->TableName = 'sessions';
	$this->IDField = 'sid';
	$this->TimestampField = 'expire';
	$this->SessionDataTable = 'SessionData';
	$this->DataValueField = 'value';
	$this->DataVarField = 'var';
	}

	/**
	* Sets reference to session
	*
	* @param Session $session
	*/
	public function setSession(&$session)
	{
	$this->Session =& $session;
	$this->SessionTimeout = $session->SessionTimeout;
	}

	/**
	* Calculates browser signature
	*
	* @return string
	*/
	function _getBrowserSignature()
	{
	$signature_parts = Array(
	'HTTP_USER_AGENT', 'SERVER_PROTOCOL',
	'HTTP_ACCEPT_CHARSET', 'HTTP_ACCEPT_ENCODING', 'HTTP_ACCEPT_LANGUAGE'
	);

	$ret = '';

	foreach ($signature_parts as $signature_part) {
	if (array_key_exists($signature_part, $_SERVER)) {
	$ret .= '&\|&' . $_SERVER[$signature_part];
	}
	}

	return md5( substr($ret, 3) );
	}

	function GetSessionDefaults()
	{
	$fields_hash = Array (
	$this->IDField => $this->Session->SID,
	$this->TimestampField => $this->Session->Expiration,
	);

	if (!defined('IS_INSTALL') \|\| !IS_INSTALL) {
	// this column was added only in 5.0.1 version,
	// so accessing it while database is not upgraded
	// will result in admin's inability to login inside
	// installator
	$fields_hash['BrowserSignature'] = $this->_getBrowserSignature();
	}

	// default values + values set during this script run

	return array_merge($fields_hash, $this->DirectVars);
	}

	/**
	* Stores session to database
	*
	* @param bool $to_database
	*
	* @return void
	* @access public
	*/
	public function StoreSession($to_database = true)
	{
	if ( defined('IS_INSTALL') && IS_INSTALL && $to_database && !$this->Application->TableFound($this->TableName) ) {
	return;
	}

	$fields_hash = $this->GetSessionDefaults();

	if ( $to_database ) {
	$this->Conn->doInsert($fields_hash, $this->TableName);
	}

	foreach ($fields_hash as $field_name => $field_value) {
	$this->SetField($field_name, $field_value);
	}
	+
	+ // ensure user groups are stored in a way, that kPermissionsHelper::CheckUserPermission can understand
	+ $this->Session->StoreVar('UserGroups', $this->GetField('GroupList'), true); // true for optional
	}

	function DeleteSession()
	{
	$this->DeleteSessions( Array ($this->Session->SID), SESSION_LOG_LOGGED_OUT );

	$this->DirectVars = $this->ChangedDirectVars = $this->OriginalData = Array();
	}

	function UpdateSession($timeout = 0)
	{
	$this->SetField($this->TimestampField, $this->Session->Expiration);
	$query = ' UPDATE '.$this->TableName.' SET '.$this->TimestampField.' = '.$this->Session->Expiration.' WHERE '.$this->IDField.' = '.$this->Conn->qstr($this->Session->SID);
	$this->Conn->Query($query);
	}

	function LocateSession($sid)
	{
	$sql = 'SELECT *
	FROM ' . $this->TableName . '
	WHERE ' . $this->IDField . ' = ' . $this->Conn->qstr($sid);
	$result = $this->Conn->GetRow($sql);

	if ($result === false) {
	return false;
	}

	// perform security checks to ensure, that session is used by it's creator
	if ($this->Application->ConfigValue('SessionBrowserSignatureCheck') && ($result['BrowserSignature'] != $this->_getBrowserSignature()) && $this->Application->GetVar('flashsid') === false) {
	return false;
	}

	if ($this->Application->ConfigValue('SessionIPAddressCheck') && ($result['IpAddress'] != $_SERVER['REMOTE_ADDR'])) {
	// most secure, except for cases where NAT (Network Address Translation)
	// is used and two or more computers can have same IP address
	return false;
	}

	$this->DirectVars = $result;
	$this->Expiration = $result[$this->TimestampField];

	return true;
	}

	function GetExpiration()
	{
	return $this->Expiration;
	}

	function LoadData()
	{
	$query = 'SELECT '.$this->DataValueField.','.$this->DataVarField.' FROM '.$this->SessionDataTable.' WHERE '.$this->IDField.' = '.$this->Conn->qstr($this->Session->SID);

	$this->OriginalData = $this->Conn->GetCol($query, $this->DataVarField);
	return $this->OriginalData;
	}

	/**
	* Enter description here...
	*
	* @param string $var_name
	* @param mixed $default
	* @return mixed
	*/
	function GetField($var_name, $default = false)
	{
	return isset($this->DirectVars[$var_name]) ? $this->DirectVars[$var_name] : $default;
	//return $this->Conn->GetOne('SELECT '.$var_name.' FROM '.$this->TableName.' WHERE `'.$this->IDField.'` = '.$this->Conn->qstr($this->Session->GetID()) );
	}

	function SetField($var_name, $value)
	{
	$value_changed = !isset($this->DirectVars[$var_name]) \|\| ($this->DirectVars[$var_name] != $value);
	if ($value_changed) {
	$this->DirectVars[$var_name] = $value;
	$this->ChangedDirectVars[] = $var_name;
	$this->ChangedDirectVars = array_unique($this->ChangedDirectVars);
	}
	//return $this->Conn->Query('UPDATE '.$this->TableName.' SET '.$var_name.' = '.$this->Conn->qstr($value).' WHERE '.$this->IDField.' = '.$this->Conn->qstr($this->Session->GetID()) );
	}

	/**
	* Saves changes in session to database using single REPLACE query
	*
	* @return void
	* @access public
	*/
	public function SaveData()
	{
	if ( !$this->Session->SID ) {
	// can't save without sid
	return ;
	}

	$replace = '';
	$ses_data = $this->Session->Data->GetParams();

	foreach ($ses_data as $key => $value) {
	if ( isset($this->OriginalData[$key]) && $this->OriginalData[$key] == $value ) {
	continue; //skip unchanged session data
	}
	else {
	$replace .= sprintf("(%s, %s, %s),", $this->Conn->qstr($this->Session->SID), $this->Conn->qstr($key), $this->Conn->qstr($value));
	}
	}

	$replace = rtrim($replace, ',');

	if ( $replace != '' ) {
	$query = ' REPLACE INTO ' . $this->SessionDataTable . ' (' . $this->IDField . ', ' . $this->DataVarField . ', ' . $this->DataValueField . ') VALUES ' . $replace;
	$this->Conn->Query($query);
	}

	if ( $this->ChangedDirectVars ) {
	$changes = Array ();

	foreach ($this->ChangedDirectVars as $var) {
	$changes[] = $var . ' = ' . $this->Conn->qstr($this->DirectVars[$var]);
	}

	$query = ' UPDATE ' . $this->TableName . '
	SET ' . implode(',', $changes) . '
	WHERE ' . $this->IDField . ' = ' . $this->Conn->qstr($this->Session->GetID());
	$this->Conn->Query($query);
	}
	}

	function RemoveFromData($var)
	{
	if ($this->Session->SessionSet) {
	// only, when session is stored in database
	$sql = 'DELETE FROM ' . $this->SessionDataTable . '
	WHERE ' . $this->IDField . ' = ' . $this->Conn->qstr($this->Session->SID) . ' AND ' . $this->DataVarField . ' = ' . $this->Conn->qstr($var);
	$this->Conn->Query($sql);
	}

	unset($this->OriginalData[$var]);
	}

	function GetFromData($var, $default = false)
	{
	return array_key_exists($var, $this->OriginalData) ? $this->OriginalData[$var] : $default;
	}

	function GetExpiredSIDs()
	{
	$sql = 'SELECT ' . $this->IDField . '
	FROM ' . $this->TableName . '
	WHERE ' . $this->TimestampField . ' > ' . adodb_mktime();

	return $this->Conn->GetCol($sql);
	}

	function DeleteExpired()
	{
	$expired_sids = $this->GetExpiredSIDs();

	$this->DeleteSessions($expired_sids);

	return $expired_sids;
	}

	function DeleteSessions($session_ids, $delete_reason = SESSION_LOG_EXPIRED)
	{
	if (!$session_ids) {
	return ;
	}

	$log_table = $this->Application->getUnitOption('session-log', 'TableName');

	if ($log_table) {
	// mark session with proper status
	$sub_sql = 'SELECT ' . $this->TimestampField . ' - ' . $this->SessionTimeout . '
	FROM ' . $this->TableName . '
	WHERE ' . $this->IDField . ' = ' . $log_table . '.SessionId';

	$sql = 'UPDATE ' . $log_table . '
	SET Status = ' . $delete_reason . ', SessionEnd = (' . $sub_sql . ')
	WHERE Status = ' . SESSION_LOG_ACTIVE . ' AND SessionId IN (' . implode(',', $session_ids) . ')';
	$this->Conn->Query($sql);
	}

	$where_clause = ' WHERE ' . $this->IDField . ' IN (' . implode(',', $session_ids) . ')';
	$sql = 'DELETE FROM ' . $this->SessionDataTable . $where_clause;
	$this->Conn->Query($sql);

	$sql = 'DELETE FROM ' . $this->TableName . $where_clause;
	$this->Conn->Query($sql);

	// delete debugger ouputs left of deleted sessions
	foreach ($session_ids as $session_id) {
	$debug_file = (defined('RESTRICTED') ? RESTRICTED : WRITEABLE . '/cache') . '/debug_@' . $session_id . '@.txt';
	if (file_exists($debug_file)) {
	@unlink($debug_file);
	}
	}
	}

	function LoadPersistentVars()
	{
	$user_id = $this->Session->RecallVar('user_id');
	if ($user_id != USER_GUEST) {
	// root & normal users
	$sql = 'SELECT VariableValue, VariableName
	FROM '.TABLE_PREFIX.'PersistantSessionData
	WHERE PortalUserId = '.$user_id;
	$this->PersistentVars = $this->Conn->GetCol($sql, 'VariableName');
	}
	else {
	$this->PersistentVars = Array ();
	}
	}

	/**
	* Stores variable to persistent session
	*
	* @param string $var_name
	* @param mixed $var_value
	* @param bool $optional
	*/
	function StorePersistentVar($var_name, $var_value, $optional = false)
	{
	$user_id = $this->Session->RecallVar('user_id');
	if ($user_id == USER_GUEST \|\| $user_id === false) {
	// -2 (when not logged in), false (when after u:OnLogout event)
	$this->Session->StoreVar($var_name, $var_value, $optional);
	return ;
	}

	$this->PersistentVars[$var_name] = $var_value;

	$key_clause = 'PortalUserId = '.$user_id.' AND VariableName = '.$this->Conn->qstr($var_name);

	$sql = 'SELECT VariableName
	FROM '.TABLE_PREFIX.'PersistantSessionData
	WHERE '.$key_clause;
	$record_found = $this->Conn->GetOne($sql);

	$fields_hash = Array (
	'PortalUserId' => $user_id,
	'VariableName' => $var_name,
	'VariableValue' => $var_value,
	);

	if ($record_found) {
	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX.'PersistantSessionData', $key_clause);
	}
	else {
	$this->Conn->doInsert($fields_hash, TABLE_PREFIX.'PersistantSessionData');
	}
	}

	/**
	* Gets persistent variable
	*
	* @param string $var_name
	* @param mixed $default
	* @return mixed
	*/
	function RecallPersistentVar($var_name, $default = false)
	{
	if ($this->Session->RecallVar('user_id') == USER_GUEST) {
	if ($default == ALLOW_DEFAULT_SETTINGS) {
	$default = null;
	}
	return $this->Session->RecallVar($var_name, $default);
	}

	if (array_key_exists($var_name, $this->PersistentVars)) {
	return $this->PersistentVars[$var_name];
	}
	elseif ($default == ALLOW_DEFAULT_SETTINGS) {
	$default_user_id = $this->Application->ConfigValue('DefaultSettingsUserId');
	if (!$default_user_id) {
	$default_user_id = USER_ROOT;
	}
	$sql = 'SELECT VariableValue, VariableName
	FROM '.TABLE_PREFIX.'PersistantSessionData
	WHERE VariableName = '.$this->Conn->qstr($var_name).' AND PortalUserId = '.$default_user_id;
	$value = $this->Conn->GetOne($sql);
	$this->PersistentVars[$var_name] = $value;
	if ($value !== false) {
	$this->StorePersistentVar($var_name, $value); //storing it, so next time we don't load default user setting
	}
	return $value;
	}
	else {
	return $default;
	}
	}

	function RemovePersistentVar($var_name)
	{
	unset($this->PersistentVars[$var_name]);

	$user_id = $this->Session->RecallVar('user_id');

	if ($user_id == USER_GUEST \|\| $user_id === false) {
	// -2 (when not logged in), false (when after u:OnLogout event)
	$this->Session->RemoveVar($var_name);
	}
	else {
	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'PersistantSessionData
	WHERE PortalUserId = ' . $user_id . ' AND VariableName = ' . $this->Conn->qstr($var_name);
	$this->Conn->Query($sql);
	}
	}

	/**
	* Checks of object has given field
	*
	* @param string $name
	* @return bool
	* @access protected
	*/
	protected function HasField($name) { }

	/**
	* Returns field values
	*
	* @return Array
	* @access protected
	*/
	protected function GetFieldValues() { }

	/**
	* Returns unformatted field value
	*
	* @param string $field
	* @return string
	* @access protected
	*/
	protected function GetDBField($field) { }

	/**
	* Returns true, when list/item was queried/loaded
	*
	* @return bool
	* @access protected
	*/
	protected function isLoaded() { }

	/**
	* Returns specified field value from all selected rows.
	* Don't affect current record index
	*
	* @param string $field
	* @return Array
	* @access protected
	*/
	protected function GetCol($field) { }

	}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/db/db_event_handler.php
	===================================================================
	--- branches/5.2.x/core/kernel/db/db_event_handler.php (revision 14713)
	+++ branches/5.2.x/core/kernel/db/db_event_handler.php (revision 14714)
	@@ -1,3139 +1,3139 @@
	<?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!');

	define('EH_CUSTOM_PROCESSING_BEFORE',1);
	define('EH_CUSTOM_PROCESSING_AFTER',2);

	/**
	* Note:
	* 1. When adressing variables from submit containing
	* Prefix_Special as part of their name use
	* $event->getPrefixSpecial(true) instead of
	* $event->getPrefixSpecial() as usual. This is due PHP
	* is converting "." symbols in variable names during
	* submit info "_". $event->getPrefixSpecial optional
	* 1st parameter returns correct corrent Prefix_Special
	* for variables beeing submitted such way (e.g. variable
	* name that will be converted by PHP: "users.read_only_id"
	* will be submitted as "users_read_only_id".
	*
	* 2. When using $this->Application-LinkVar on variables submitted
	* from form which contain $Prefix_Special then note 1st item. Example:
	* LinkVar($event->getPrefixSpecial(true).'_varname',$event->getPrefixSpecial().'_varname')
	*
	*/


	/**
	* EventHandler that is used to process
	* any database related events
	*
	*/
	class kDBEventHandler extends kEventHandler {

	/**
	* Checks permissions of user
	*
	* @param kEvent $event
	* @return bool
	* @access public
	*/
	function CheckPermission(&$event)
	{
	$section = $event->getSection();

	if (!$this->Application->isAdmin) {
	$allow_events = Array('OnSearch', 'OnSearchReset', 'OnNew');
	if (in_array($event->Name, $allow_events)) {
	// allow search on front
	return true;
	}
	}
	elseif (($event->Name == 'OnPreSaveAndChangeLanguage') && !$this->UseTempTables($event)) {
	// allow changing language in grids, when not in editing mode
	return $this->Application->CheckPermission($section . '.view', 1);
	}

	if (!preg_match('/^CATEGORY:(.*)/', $section)) {
	// only if not category item events
	if ((substr($event->Name, 0, 9) == 'OnPreSave') \|\| ($event->Name == 'OnSave')) {
	if ($this->isNewItemCreate($event)) {
	return $this->Application->CheckPermission($section.'.add', 1);
	}
	else {
	return $this->Application->CheckPermission($section.'.add', 1) \|\| $this->Application->CheckPermission($section.'.edit', 1);
	}
	}
	}

	if ($event->Name == 'OnPreCreate') {
	// save category_id before item create (for item category selector not to destroy permission checking category)
	$this->Application->LinkVar('m_cat_id');
	}

	if ($event->Name == 'OnSaveWidths') {
	return $this->Application->isAdminUser;
	}

	return parent::CheckPermission($event);
	}

	/**
	* Allows to override standard permission mapping
	*
	*/
	function mapPermissions()
	{
	parent::mapPermissions();
	$permissions = Array(
	'OnLoad' => Array('self' => 'view', 'subitem' => 'view'),
	'OnItemBuild' => Array('self' => 'view', 'subitem' => 'view'),
	'OnSuggestValues' => Array('self' => 'view', 'subitem' => 'view'),

	'OnBuild' => Array('self' => true),

	'OnNew' => Array('self' => 'add', 'subitem' => 'add\|edit'),
	'OnCreate' => Array('self' => 'add', 'subitem' => 'add\|edit'),
	'OnUpdate' => Array('self' => 'edit', 'subitem' => 'add\|edit'),
	'OnSetPrimary' => Array('self' => 'add\|edit', 'subitem' => 'add\|edit'),
	'OnDelete' => Array('self' => 'delete', 'subitem' => 'add\|edit'),
	'OnDeleteAll' => Array('self' => 'delete', 'subitem' => 'add\|edit'),
	'OnMassDelete' => Array('self' => 'delete', 'subitem' => 'add\|edit'),
	'OnMassClone' => Array('self' => 'add', 'subitem' => 'add\|edit'),

	'OnCut' => array('self'=>'edit', 'subitem' => 'edit'),
	'OnCopy' => array('self'=>'edit', 'subitem' => 'edit'),
	'OnPaste' => array('self'=>'edit', 'subitem' => 'edit'),

	'OnSelectItems' => Array('self' => 'add\|edit', 'subitem' => 'add\|edit'),
	'OnProcessSelected' => Array('self' => 'add\|edit', 'subitem' => 'add\|edit'),
	'OnStoreSelected' => Array('self' => 'add\|edit', 'subitem' => 'add\|edit'),
	'OnSelectUser' => Array('self' => 'add\|edit', 'subitem' => 'add\|edit'),

	'OnMassApprove' => Array('self' => 'advanced:approve\|edit', 'subitem' => 'advanced:approve\|add\|edit'),
	'OnMassDecline' => Array('self' => 'advanced:decline\|edit', 'subitem' => 'advanced:decline\|add\|edit'),
	'OnMassMoveUp' => Array('self' => 'advanced:move_up\|edit', 'subitem' => 'advanced:move_up\|add\|edit'),
	'OnMassMoveDown' => Array('self' => 'advanced:move_down\|edit', 'subitem' => 'advanced:move_down\|add\|edit'),

	'OnPreCreate' => Array('self' => 'add\|add.pending', 'subitem' => 'edit\|edit.pending'),
	'OnEdit' => Array('self' => 'edit\|edit.pending', 'subitem' => 'edit\|edit.pending'),

	'OnExport' => Array('self' => 'view\|advanced:export'),
	'OnExportBegin' => Array('self' => 'view\|advanced:export'),
	'OnExportProgress' => Array('self' => 'view\|advanced:export'),


	'OnSetAutoRefreshInterval' => Array ('self' => true, 'subitem' => true),
	'OnAutoRefreshToggle' => Array ('self' => true, 'subitem' => true),

	// theese event do not harm, but just in case check them too :)
	'OnCancelEdit' => Array('self' => true, 'subitem' => true),
	'OnCancel' => Array('self' => true, 'subitem' => true),
	'OnReset' => Array('self' => true, 'subitem' => true),

	'OnSetSorting' => Array('self' => true, 'subitem' => true),
	'OnSetSortingDirect' => Array('self' => true, 'subitem' => true),
	'OnResetSorting' => Array('self' => true, 'subitem' => true),

	'OnSetFilter' => Array('self' => true, 'subitem' => true),
	'OnApplyFilters' => Array('self' => true, 'subitem' => true),
	'OnRemoveFilters' => Array('self' => true, 'subitem' => true),
	'OnSetFilterPattern' => Array('self' => true, 'subitem' => true),

	'OnSetPerPage' => Array('self' => true, 'subitem' => true),
	'OnSetPage' => Array('self' => true, 'subitem' => true),

	'OnSearch' => Array('self' => true, 'subitem' => true),
	'OnSearchReset' => Array('self' => true, 'subitem' => true),

	'OnGoBack' => Array('self' => true, 'subitem' => true),

	// it checks permission itself since flash uploader does not send cookies
	'OnUploadFile' => Array ('self' => true, 'subitem' => true),
	'OnDeleteFile' => Array ('self' => true, 'subitem' => true),

	'OnViewFile' => Array ('self' => true, 'subitem' => true),
	'OnSaveWidths' => Array ('self' => true, 'subitem' => true),

	'OnValidateMInputFields' => Array ('self' => 'view'),
	);
	$this->permMapping = array_merge($this->permMapping, $permissions);
	}

	function mapEvents()
	{
	$events_map = Array(
	'OnRemoveFilters' => 'FilterAction',
	'OnApplyFilters' => 'FilterAction',
	'OnMassApprove'=>'iterateItems',
	'OnMassDecline'=>'iterateItems',
	'OnMassMoveUp'=>'iterateItems',
	'OnMassMoveDown'=>'iterateItems',
	);

	$this->eventMethods = array_merge($this->eventMethods, $events_map);
	}

	/**
	* Returns ID of current item to be edited
	* by checking ID passed in get/post as prefix_id
	* or by looking at first from selected ids, stored.
	* Returned id is also stored in Session in case
	* it was explicitly passed as get/post
	*
	* @param kEvent $event
	* @return int
	*/
	function getPassedID(&$event)
	{
	if ($event->getEventParam('raise_warnings') === false) {
	$event->setEventParam('raise_warnings', 1);
	}

	if ( $event->Special == 'previous' \|\| $event->Special == 'next' ) {
	$object =& $this->Application->recallObject( $event->getEventParam('item') );
	/* @var $object kDBItem */

	$list_helper =& $this->Application->recallObject('ListHelper');
	/* @var $list_helper ListHelper */

	return $list_helper->getNavigationResource($object, $event->getEventParam('list'), $event->Special == 'next');
	}

	if (preg_match('/^auto-(.*)/', $event->Special, $regs) && $this->Application->prefixRegistred($regs[1])) {
	// <inp2:lang.auto-phrase_Field name="DateFormat"/> - returns field DateFormat value from language (LanguageId is extracted from current phrase object)
	$main_object =& $this->Application->recallObject($regs[1]);
	/* @var $main_object kDBItem */

	$id_field = $this->Application->getUnitOption($event->Prefix, 'IDField');
	return $main_object->GetDBField($id_field);
	}

	// 1. get id from post (used in admin)
	$ret = $this->Application->GetVar($event->getPrefixSpecial(true).'_id');
	if (($ret !== false) && ($ret != '')) {
	return $ret;
	}

	// 2. get id from env (used in front)
	$ret = $this->Application->GetVar($event->getPrefixSpecial().'_id');
	if (($ret !== false) && ($ret != '')) {
	return $ret;
	}

	// recall selected ids array and use the first one
	$ids = $this->Application->GetVar($event->getPrefixSpecial().'_selected_ids');
	if ($ids != '') {
	$ids = explode(',',$ids);
	if ($ids) {
	$ret = array_shift($ids);
	}
	}
	else { // if selected ids are not yet stored
	$this->StoreSelectedIDs($event);
	return $this->Application->GetVar($event->getPrefixSpecial().'_id'); // StoreSelectedIDs sets this variable
	}

	return $ret;
	}

	/**
	* Prepares and stores selected_ids string
	* in Session and Application Variables
	* by getting all checked ids from grid plus
	* id passed in get/post as prefix_id
	*
	* @param kEvent $event
	* @param Array $direct_ids
	*
	* @return Array ids stored
	*/
	function StoreSelectedIDs(&$event, $direct_ids = null)
	{
	$wid = $this->Application->GetTopmostWid($event->Prefix);
	$session_name = rtrim($event->getPrefixSpecial().'_selected_ids_'.$wid, '_');

	$ids = $event->getEventParam('ids');
	if (isset($direct_ids) \|\| ($ids !== false)) {
	// save ids directly if they given + reset array indexes
	$resulting_ids = $direct_ids ? array_values($direct_ids) : ($ids ? array_values($ids) : false);
	if ($resulting_ids) {
	$this->Application->SetVar($event->getPrefixSpecial() . '_selected_ids', implode(',', $resulting_ids));
	$this->Application->LinkVar($event->getPrefixSpecial() . '_selected_ids', $session_name, '', true);
	$this->Application->SetVar($event->getPrefixSpecial() . '_id', $resulting_ids[0]);

	return $resulting_ids;
	}

	return Array ();
	}

	$ret = Array();

	// May be we don't need this part: ?
	$passed = $this->Application->GetVar($event->getPrefixSpecial(true).'_id');
	if($passed !== false && $passed != '')
	{
	array_push($ret, $passed);
	}

	$ids = Array();

	// get selected ids from post & save them to session
	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	if($items_info)
	{
	$id_field = $this->Application->getUnitOption($event->Prefix,'IDField');
	foreach($items_info as $id => $field_values)
	{
	if( getArrayValue($field_values,$id_field) ) array_push($ids,$id);
	}
	//$ids=array_keys($items_info);
	}

	$ret = array_unique(array_merge($ret, $ids));

	$this->Application->SetVar($event->getPrefixSpecial().'_selected_ids', implode(',',$ret));
	$this->Application->LinkVar($event->getPrefixSpecial().'_selected_ids', $session_name, '', !$ret); // optional when IDs are missing

	// This is critical - otherwise getPassedID will return last ID stored in session! (not exactly true)
	// this smells... needs to be refactored
	$first_id = getArrayValue($ret,0);
	if (($first_id === false) && ($event->getEventParam('raise_warnings') == 1)) {
	if ( $this->Application->isDebugMode() ) {
	$this->Application->Debugger->appendTrace();
	}

	trigger_error('Requested ID for prefix <strong>' . $event->getPrefixSpecial() . '</strong> <span class="debug_error">not passed</span>', E_USER_NOTICE);
	}

	$this->Application->SetVar($event->getPrefixSpecial() . '_id', $first_id);
	return $ret;
	}

	/**
	* Returns stored selected ids as an array
	*
	* @param kEvent $event
	* @param bool $from_session return ids from session (written, when editing was started)
	* @return array
	*/
	function getSelectedIDs(&$event, $from_session = false)
	{
	if ($from_session) {
	$wid = $this->Application->GetTopmostWid($event->Prefix);
	$var_name = rtrim($event->getPrefixSpecial().'_selected_ids_'.$wid, '_');
	$ret = $this->Application->RecallVar($var_name);
	}
	else {
	$ret = $this->Application->GetVar($event->getPrefixSpecial().'_selected_ids');
	}

	return explode(',', $ret);
	}

	/**
	* Stores IDs, selected in grid in session
	*
	* @param kEvent $event
	*/
	function OnStoreSelected(&$event)
	{
	$this->StoreSelectedIDs($event);

	$id = $this->Application->GetVar($event->getPrefixSpecial() . '_id');

	if ($id !== false) {
	$event->SetRedirectParam($event->getPrefixSpecial() . '_id', $id);
	$event->SetRedirectParam('pass', 'all,' . $event->getPrefixSpecial());
	}
	}

	/**
	* Returs associative array of submitted fields for current item
	* Could be used while creating/editing single item -
	* meaning on any edit form, except grid edit
	*
	* @param kEvent $event
	*/
	function getSubmittedFields(&$event)
	{
	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	$field_values = $items_info ? array_shift($items_info) : Array();
	return $field_values;
	}

	/**
	* Removes any information about current/selected ids
	* from Application variables and Session
	*
	* @param kEvent $event
	*/
	function clearSelectedIDs(&$event)
	{
	$prefix_special = $event->getPrefixSpecial();

	$ids = implode(',', $this->getSelectedIDs($event, true));
	$event->setEventParam('ids', $ids);

	$wid = $this->Application->GetTopmostWid($event->Prefix);
	$session_name = rtrim($prefix_special.'_selected_ids_'.$wid, '_');

	$this->Application->RemoveVar($session_name);
	$this->Application->SetVar($prefix_special.'_selected_ids', '');

	$this->Application->SetVar($prefix_special.'_id', ''); // $event->getPrefixSpecial(true).'_id' too may be
	}

	/**
	* Common builder part for Item & List
	*
	* @param kDBBase\|kDBItem\|kDBList $object
	* @param kEvent $event
	* @access private
	*/
	function dbBuild(&$object, &$event)
	{
	// for permission checking inside item/list build events
	$event->setEventParam('top_prefix', $this->Application->GetTopmostPrefix($event->Prefix, true));

	if ( $event->getEventParam('form_name') !== false ) {
	$form_name = $event->getEventParam('form_name');
	}
	else {
	$request_forms = $this->Application->GetVar('forms', Array ());
	$form_name = (string)getArrayValue( $request_forms, $object->getPrefixSpecial() );
	}

	$object->Configure( $event->getEventParam('populate_ml_fields') \|\| $this->Application->getUnitOption($event->Prefix, 'PopulateMlFields'), $form_name );
	$this->PrepareObject($object, $event);

	$parent_event = $event->getEventParam('parent_event');

	if ( is_object($parent_event) ) {
	$object->setParentEvent($parent_event);
	}

	// force live table if specified or is original item
	$live_table = $event->getEventParam('live_table') \|\| $event->Special == 'original';

	if( $this->UseTempTables($event) && !$live_table )
	{
	$object->SwitchToTemp();
	}

	$this->Application->setEvent($event->getPrefixSpecial(), '');

	$save_event = $this->UseTempTables($event) && $this->Application->GetTopmostPrefix($event->Prefix) == $event->Prefix ? 'OnSave' : 'OnUpdate';
	$this->Application->SetVar($event->getPrefixSpecial().'_SaveEvent',$save_event);
	}

	/**
	* Checks, that currently loaded item is allowed for viewing (non permission-based)
	*
	* @param kEvent $event
	* @return bool
	*/
	function checkItemStatus(&$event)
	{
	$status_fields = $this->Application->getUnitOption($event->Prefix, 'StatusField');
	if ( !$status_fields ) {
	return true;
	}

	$status_field = array_shift($status_fields);

	if ( $status_field == 'Status' \|\| $status_field == 'Enabled' ) {
	$object =& $event->getObject();
	/* @var $object kDBItem */

	if ( !$object->isLoaded() ) {
	return true;
	}

	return $object->GetDBField($status_field) == STATUS_ACTIVE;
	}

	return true;
	}

	/**
	* Shows not found template content
	*
	* @param kEvent $event
	*
	*/
	function _errorNotFound(&$event)
	{
	if ($event->getEventParam('raise_warnings') === 0) {
	// when it's possible, that autoload fails do nothing
	return ;
	}

	if ( $this->Application->isDebugMode() ) {
	$this->Application->Debugger->appendTrace();
	}

	trigger_error('ItemLoad Permission Failed for prefix [' . $event->getPrefixSpecial() . '] in <strong>checkItemStatus</strong>, leading to "404 Not Found"', E_USER_NOTICE);

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

	while (ob_get_level()) {
	ob_end_clean();
	}

	// object is used inside template parsing, so break out any parsing and return error document
	$error_template = $this->Application->ConfigValue('ErrorTemplate');

	$themes_helper =& $this->Application->recallObject('ThemesHelper');
	/* @var $themes_helper kThemesHelper */

	$this->Application->SetVar('t', $error_template);
	$this->Application->SetVar('m_cat_id', $themes_helper->getPageByTemplate($error_template));

	// in case if missing item is recalled first from event (not from template)
	$this->Application->InitParser();
	$this->Application->HTML = $this->Application->ParseBlock( Array ('name' => $error_template) );
	$this->Application->Done();
	exit;
	}

	/**
	* Builds item (loads if needed)
	*
	* Pattern: Prototype Manager
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnItemBuild(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$this->dbBuild($object, $event);

	$sql = $this->ItemPrepareQuery($event);
	$sql = $this->Application->ReplaceLanguageTags($sql);
	$object->setSelectSQL($sql);

	// 2. loads if allowed
	$auto_load = $this->Application->getUnitOption($event->Prefix,'AutoLoad');
	$skip_autload = $event->getEventParam('skip_autoload');

	if ($auto_load && !$skip_autload) {
	$perm_status = true;
	- $user_id = $this->Application->RecallVar('user_id');
	+ $user_id = $this->Application->InitDone ? $this->Application->RecallVar('user_id') : USER_ROOT;
	$event->setEventParam('top_prefix', $this->Application->GetTopmostPrefix($event->Prefix, true));
	$status_checked = false;
	if ($user_id == USER_ROOT \|\| $this->CheckPermission($event)) {
	// don't autoload item, when user doesn't have view permission
	$this->LoadItem($event);

	$status_checked = true;
	$editing_mode = defined('EDITING_MODE') ? EDITING_MODE : false;

	if ($user_id != USER_ROOT && !$this->Application->isAdmin && !($editing_mode \|\| $this->checkItemStatus($event))) {
	// non-root user AND on front-end AND (not editing mode \|\| incorrect status)
	$perm_status = false;
	}
	}
	else {
	$perm_status = false;
	}

	if (!$perm_status) {
	// when no permission to view item -> redirect to no pemrission template
	if ( $this->Application->isDebugMode() ) {
	$this->Application->Debugger->appendTrace();
	}

	trigger_error('ItemLoad Permission Failed for prefix ['.$event->getPrefixSpecial().'] in <strong>'.($status_checked ? 'checkItemStatus' : 'CheckPermission').'</strong>', E_USER_NOTICE);
	$template = $this->Application->isAdmin ? 'no_permission' : $this->Application->ConfigValue('NoPermissionTemplate');

	if (MOD_REWRITE) {
	$redirect_params = Array (
	'm_cat_id' => 0,
	'next_template' => urlencode('external:' . $_SERVER['REQUEST_URI']),
	);
	}
	else {
	$redirect_params = Array (
	'next_template' => $this->Application->GetVar('t'),
	);
	}

	$this->Application->Redirect($template, $redirect_params);
	}
	}

	$actions =& $this->Application->recallObject('kActions');
	/* @var $actions Params */

	$actions->Set($event->getPrefixSpecial().'_GoTab', '');
	$actions->Set($event->getPrefixSpecial().'_GoId', '');
	$actions->Set('forms[' . $event->getPrefixSpecial() . ']', $object->getFormName());
	}

	/**
	* Build subtables array from configs
	*
	* @param kEvent $event
	*/
	function OnTempHandlerBuild(&$event)
	{
	$object =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler');
	/* @var $object kTempTablesHandler */

	$parent_event = $event->getEventParam('parent_event');

	if ( is_object($parent_event) ) {
	$object->setParentEvent($parent_event);
	}

	$object->BuildTables( $event->Prefix, $this->getSelectedIDs($event) );
	}

	/**
	* Checks, that object used in event should use temp tables
	*
	* @param kEvent $event
	* @return bool
	*/
	function UseTempTables(&$event)
	{
	$top_prefix = $this->Application->GetTopmostPrefix($event->Prefix); // passed parent, not always actual
	$special = ($top_prefix == $event->Prefix) ? $event->Special : $this->getMainSpecial($event);

	return $this->Application->IsTempMode($event->Prefix, $special);
	}

	/**
	* Returns table prefix from event (temp or live)
	*
	* @param kEvent $event
	* @return string
	* @todo Needed? Should be refactored (by Alex)
	*/
	function TablePrefix(&$event)
	{
	return $this->UseTempTables($event) ? $this->Application->GetTempTablePrefix('prefix:'.$event->Prefix).TABLE_PREFIX : TABLE_PREFIX;
	}

	/**
	* Load item if id is available
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function LoadItem(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$id = $this->getPassedID($event);

	if ( $object->isLoaded() && !is_array($id) && ($object->GetID() == $id) ) {
	// object is already loaded by same id
	return ;
	}

	if ( $object->Load($id) ) {
	$actions =& $this->Application->recallObject('kActions');
	/* @var $actions Params */

	$actions->Set($event->getPrefixSpecial() . '_id', $object->GetID());
	}
	else {
	$object->setID($id);
	}
	}

	/**
	* Builds list
	*
	* Pattern: Prototype Manager
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnListBuild(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBList */

	$this->dbBuild($object, $event);

	if ( !$object->isMainList() && $event->getEventParam('main_list') ) {
	// once list is set to main, then even "requery" parameter can't remove that
	/*$passed = $this->Application->GetVar('passed');
	$this->Application->SetVar('passed', $passed . ',' . $event->Prefix);*/

	$object->becameMain();
	}

	$object->setGridName($event->getEventParam('grid'));

	$sql = $this->ListPrepareQuery($event);
	$sql = $this->Application->ReplaceLanguageTags($sql);
	$object->setSelectSQL($sql);

	$object->reset();

	$object->linkToParent( $this->getMainSpecial($event) );

	$this->AddFilters($event);
	$this->SetCustomQuery($event); // new!, use this for dynamic queries based on specials for ex.
	$this->SetPagination($event);
	$this->SetSorting($event);

	$actions =& $this->Application->recallObject('kActions');
	/* @var $actions Params */

	$actions->Set('remove_specials[' . $event->getPrefixSpecial() . ']', '0');
	$actions->Set($event->getPrefixSpecial() . '_GoTab', '');
	}

	/**
	* Get's special of main item for linking with subitem
	*
	* @param kEvent $event
	* @return string
	*/
	function getMainSpecial(&$event)
	{
	$main_special = $event->getEventParam('main_special');

	if ($main_special === false) {
	// main item's special not passed

	if (substr($event->Special, -5) == '-item') {
	// temp handler added "-item" to given special -> process that here
	return substr($event->Special, 0, -5);
	}

	// by default subitem's special is used for main item searching
	return $event->Special;
	}

	return $main_special;
	}

	/**
	* Apply any custom changes to list's sql query
	*
	* @param kEvent $event
	* @return void
	* @access protected
	* @see kDBEventHandler::OnListBuild()
	*/
	protected function SetCustomQuery(&$event)
	{

	}

	/**
	* Set's new perpage for grid
	*
	* @param kEvent $event
	*/
	function OnSetPerPage(&$event)
	{
	$per_page = $this->Application->GetVar($event->getPrefixSpecial(true) . '_PerPage');
	$event->SetRedirectParam($event->getPrefixSpecial() . '_PerPage', $per_page);
	$event->SetRedirectParam('pass', 'all,' . $event->getPrefixSpecial());

	if (!$this->Application->isAdminUser) {
	$list_helper =& $this->Application->recallObject('ListHelper');
	/* @var $list_helper ListHelper */

	$this->_passListParams($event, 'per_page');

	/*if ($per_page != $list_helper->getDefaultPerPage($event->Prefix)) {
	$event->SetRedirectParam('per_page', $per_page);
	}*/
	}
	}

	/**
	* Occurs when page is changed (only for hooking)
	*
	* @param kEvent $event
	*/
	function OnSetPage(&$event)
	{
	$page = $this->Application->GetVar($event->getPrefixSpecial(true) . '_Page');
	$event->SetRedirectParam($event->getPrefixSpecial() . '_Page', $page);
	$event->SetRedirectParam('pass', 'all,' . $event->getPrefixSpecial());

	if (!$this->Application->isAdminUser) {
	/*if ($page > 1) {
	$event->SetRedirectParam('page', $page);
	}*/

	$this->_passListParams($event, 'page');
	}
	}

	/**
	* Passes through main list pagination and sorting
	*
	* @param kEvent $event
	* @param string $skip_var
	*/
	function _passListParams(&$event, $skip_var)
	{
	$param_names = array_diff(Array ('page', 'per_page', 'sort_by'), Array ($skip_var));

	$list_helper =& $this->Application->recallObject('ListHelper');
	/* @var $list_helper ListHelper */

	foreach ($param_names as $param_name) {
	$value = $this->Application->GetVar($param_name);

	switch ($param_name) {
	case 'page':
	if ($value > 1) {
	$event->SetRedirectParam('page', $value);
	}
	break;

	case 'per_page':
	if ($value > 0) {
	if ($value != $list_helper->getDefaultPerPage($event->Prefix)) {
	$event->SetRedirectParam('per_page', $value);
	}
	}
	break;

	case 'sort_by':
	$event->setPseudoClass('_List');
	$object =& $event->getObject( Array ('main_list' => 1) );
	/* @var $object kDBList */

	if ($list_helper->hasUserSorting($object)) {
	$event->SetRedirectParam('sort_by', $value);
	}
	break;
	}
	}
	}

	/**
	* Set's correct page for list
	* based on data provided with event
	*
	* @param kEvent $event
	* @access private
	* @see OnListBuild
	*/
	function SetPagination(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBList */

	// get PerPage (forced -> session -> config -> 10)
	$object->SetPerPage( $this->getPerPage($event) );

	// main lists on Front-End have special get parameter for page
	$page = $object->isMainList() ? $this->Application->GetVar('page') : false;

	if (!$page) {
	// page is given in "env" variable for given prefix
	$page = $this->Application->GetVar($event->getPrefixSpecial() . '_Page');
	}

	if (!$page && $event->Special) {
	// when not part of env, then variables like "prefix.special_Page" are
	// replaced (by PHP) with "prefix_special_Page", so check for that too
	$page = $this->Application->GetVar($event->getPrefixSpecial(true) . '_Page');
	}

	if (!$object->isMainList()) {
	// main lists doesn't use session for page storing
	$this->Application->StoreVarDefault($event->getPrefixSpecial() . '_Page', 1, true); // true for optional

	if ($page) {
	// page found in request -> store in session
	$this->Application->StoreVar($event->getPrefixSpecial() . '_Page', $page, true); //true for optional
	}
	else {
	// page not found in request -> get from session
	$page = $this->Application->RecallVar($event->getPrefixSpecial() . '_Page');
	}

	if ( !$event->getEventParam('skip_counting') ) {
	// when stored page is larger, then maximal list page number
	// (such case is also processed in kDBList::Query method)
	$pages = $object->GetTotalPages();

	if ($page > $pages) {
	$page = 1;
	$this->Application->StoreVar($event->getPrefixSpecial() . '_Page', 1, true);
	}
	}
	}

	$object->SetPage($page);
	}

	/**
	* Returns current per-page setting for list
	*
	* @param kEvent $event
	* @return int
	*/
	function getPerPage(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBList */

	$per_page = $event->getEventParam('per_page');

	if ($per_page) {
	// per-page is passed as tag parameter to PrintList, InitList, etc.
	$config_mapping = $this->Application->getUnitOption($event->Prefix, 'ConfigMapping');

	// 2. per-page setting is stored in configuration variable
	if ($config_mapping) {
	// such pseudo per-pages are only defined in templates directly
	switch ($per_page) {
	case 'short_list':
	$per_page = $this->Application->ConfigValue($config_mapping['ShortListPerPage']);
	break;

	case 'default':
	$per_page = $this->Application->ConfigValue($config_mapping['PerPage']);
	break;
	}
	}

	return $per_page;
	}

	if (!$per_page && $object->isMainList()) {
	// main lists on Front-End have special get parameter for per-page
	$per_page = $this->Application->GetVar('per_page');
	}

	if (!$per_page) {
	// per-page is given in "env" variable for given prefix
	$per_page = $this->Application->GetVar($event->getPrefixSpecial() . '_PerPage');
	}

	if (!$per_page && $event->Special) {
	// when not part of env, then variables like "prefix.special_PerPage" are
	// replaced (by PHP) with "prefix_special_PerPage", so check for that too
	$per_page = $this->Application->GetVar($event->getPrefixSpecial(true) . '_PerPage');
	}

	if (!$object->isMainList()) {
	// per-page given in env and not in main list
	$view_name = $this->Application->RecallVar($event->getPrefixSpecial() . '_current_view');

	if ($per_page) {
	// per-page found in request -> store in session and persistent session
	$this->setListSetting($event, 'PerPage', $per_page);
	}
	else {
	// per-page not found in request -> get from pesistent session (or session)
	$per_page = $this->getListSetting($event, 'PerPage');
	}
	}

	if (!$per_page) {
	// per page wan't found in request/session/persistent session
	$list_helper =& $this->Application->recallObject('ListHelper');
	/* @var $list_helper ListHelper */

	// allow to override default per-page value from tag
	$default_per_page = $event->getEventParam('default_per_page');

	if (!is_numeric($default_per_page)) {
	$default_per_page = 10;
	}

	$per_page = $list_helper->getDefaultPerPage($event->Prefix, $default_per_page);
	}

	return $per_page;
	}

	/**
	* Set's correct sorting for list
	* based on data provided with event
	*
	* @param kEvent $event
	* @access private
	* @see OnListBuild
	*/
	function SetSorting(&$event)
	{
	$event->setPseudoClass('_List');

	$object =& $event->getObject();
	/* @var $object kDBList */

	if ( $object->isMainList() ) {
	$sort_by = $this->Application->GetVar('sort_by');
	$cur_sort1 = $cur_sort1_dir = $cur_sort2 = $cur_sort2_dir = false;

	if ( $sort_by ) {
	list ($cur_sort1, $cur_sort1_dir) = explode(',', $sort_by);
	}
	}
	else {
	$sorting_settings = $this->getListSetting($event, 'Sortings');

	$cur_sort1 = getArrayValue($sorting_settings, 'Sort1');
	$cur_sort1_dir = getArrayValue($sorting_settings, 'Sort1_Dir');
	$cur_sort2 = getArrayValue($sorting_settings, 'Sort2');
	$cur_sort2_dir = getArrayValue($sorting_settings, 'Sort2_Dir');
	}

	$tag_sort_by = $event->getEventParam('sort_by');

	if ($tag_sort_by) {
	if ($tag_sort_by == 'random') {
	$object->AddOrderField('RAND()', '');
	}
	else {
	// multiple sortings could be specified at once
	$tag_sort_by = explode('\|', $tag_sort_by);

	foreach ($tag_sort_by as $sorting_element) {
	list ($by, $dir) = explode(',', $sorting_element);
	$object->AddOrderField($by, $dir);
	}
	}
	}

	$list_sortings = $this->Application->getUnitOption($event->Prefix, 'ListSortings', Array ());
	$sorting_prefix = array_key_exists($event->Special, $list_sortings) ? $event->Special : '';
	$sorting_configs = $this->Application->getUnitOption($event->Prefix, 'ConfigMapping');

	if ($sorting_configs && array_key_exists('DefaultSorting1Field', $sorting_configs)) {
	// sorting defined in configuration variables overrides one from unit config
	$list_sortings[$sorting_prefix]['Sorting'] = Array (
	$this->Application->ConfigValue($sorting_configs['DefaultSorting1Field']) => $this->Application->ConfigValue($sorting_configs['DefaultSorting1Dir']),
	$this->Application->ConfigValue($sorting_configs['DefaultSorting2Field']) => $this->Application->ConfigValue($sorting_configs['DefaultSorting2Dir']),
	);

	// TODO: lowercase configuration variable values in db, instead of here
	$list_sortings[$sorting_prefix]['Sorting'] = array_map('strtolower', $list_sortings[$sorting_prefix]['Sorting']);
	}

	// use default if not specified in session
	if ( !$cur_sort1 \|\| !$cur_sort1_dir ) {
	$sorting = getArrayValue($list_sortings, $sorting_prefix, 'Sorting');

	if ( $sorting ) {
	reset($sorting);
	$cur_sort1 = key($sorting);
	$cur_sort1_dir = current($sorting);

	if ( next($sorting) ) {
	$cur_sort2 = key($sorting);
	$cur_sort2_dir = current($sorting);
	}
	}
	}

	// always add forced sorting before any user sorting fields
	$forced_sorting = getArrayValue($list_sortings, $sorting_prefix, 'ForcedSorting');
	/* @var $forced_sorting Array */

	if ( $forced_sorting ) {
	foreach ($forced_sorting as $field => $dir) {
	$object->AddOrderField($field, $dir);
	}
	}

	// add user sorting fields
	if ( $cur_sort1 != '' && $cur_sort1_dir != '' ) {
	$object->AddOrderField($cur_sort1, $cur_sort1_dir);
	}

	if ( $cur_sort2 != '' && $cur_sort2_dir != '' ) {
	$object->AddOrderField($cur_sort2, $cur_sort2_dir);
	}
	}

	/**
	* Gets list setting by name (persistent or real session)
	*
	* @param kEvent $event
	* @param string $variable_name
	* @return string\|Array
	* @access protected
	*/
	protected function getListSetting(&$event, $variable_name)
	{
	$view_name = $this->Application->RecallVar($event->getPrefixSpecial() . '_current_view');
	$storage_prefix = $event->getEventParam('same_special') ? $event->Prefix : $event->getPrefixSpecial();

	// get sorting from persistent session
	$variable_value = $this->Application->RecallPersistentVar($storage_prefix . '_' . $variable_name . '.' . $view_name, ALLOW_DEFAULT_SETTINGS);

	/*if (!$variable_value) {
	// get sorting from session
	$variable_value = $this->Application->RecallVar($storage_prefix . '_' . $variable_name);
	}*/

	if ( kUtil::IsSerialized($variable_value) ) {
	$variable_value = unserialize($variable_value);
	}

	return $variable_value;
	}

	/**
	* Sets list setting by name (persistent and real session)
	*
	* @param kEvent $event
	* @param string $variable_name
	* @param string\|Array $variable_value
	* @return void
	* @access protected
	*/
	protected function setListSetting(&$event, $variable_name, $variable_value = null)
	{
	$view_name = $this->Application->RecallVar($event->getPrefixSpecial() . '_current_view');
	// $this->Application->StoreVar($event->getPrefixSpecial() . '_' . $variable_name, $variable_value, true); //true for optional

	if ( isset($variable_value) ) {
	if ( is_array($variable_value) ) {
	$variable_value = serialize($variable_value);
	}

	$this->Application->StorePersistentVar($event->getPrefixSpecial() . '_' . $variable_name . '.' . $view_name, $variable_value, true); //true for optional
	}
	else {
	$this->Application->RemovePersistentVar($event->getPrefixSpecial() . '_' . $variable_name . '.' . $view_name);
	}
	}

	/**
	* Add filters found in session
	*
	* @param kEvent $event
	*/
	function AddFilters(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBList */

	$edit_mark = rtrim($this->Application->GetSID() . '_' . $this->Application->GetTopmostWid($event->Prefix), '_');

	// add search filter
	$filter_data = $this->Application->RecallVar($event->getPrefixSpecial() . '_search_filter');

	if ( $filter_data ) {
	$filter_data = unserialize($filter_data);

	foreach ($filter_data as $filter_field => $filter_params) {
	$filter_type = ($filter_params['type'] == 'having') ? kDBList::HAVING_FILTER : kDBList::WHERE_FILTER;
	$filter_value = str_replace(EDIT_MARK, $edit_mark, $filter_params['value']);
	$object->addFilter($filter_field, $filter_value, $filter_type, kDBList::FLT_SEARCH);
	}
	}

	// add custom filter
	$view_name = $this->Application->RecallVar($event->getPrefixSpecial() . '_current_view');
	$custom_filters = $this->Application->RecallPersistentVar($event->getPrefixSpecial() . '_custom_filter.' . $view_name);

	if ( $custom_filters ) {
	$grid_name = $event->getEventParam('grid');
	$custom_filters = unserialize($custom_filters);

	if ( isset($custom_filters[$grid_name]) ) {
	foreach ($custom_filters[$grid_name] as $field_name => $field_options) {
	list ($filter_type, $field_options) = each($field_options);

	if ( isset($field_options['value']) && $field_options['value'] ) {
	$filter_type = ($field_options['sql_filter_type'] == 'having') ? kDBList::HAVING_FILTER : kDBList::WHERE_FILTER;
	$filter_value = str_replace(EDIT_MARK, $edit_mark, $field_options['value']);
	$object->addFilter($field_name, $filter_value, $filter_type, kDBList::FLT_CUSTOM);
	}
	}
	}
	}

	$view_filter = $this->Application->RecallVar($event->getPrefixSpecial() . '_view_filter');

	if ( $view_filter ) {
	$view_filter = unserialize($view_filter);

	$temp_filter =& $this->Application->makeClass('kMultipleFilter');
	/* @var $temp_filter kMultipleFilter */

	$filter_menu = $this->Application->getUnitOption($event->Prefix, 'FilterMenu');

	$group_key = 0;
	$group_count = count($filter_menu['Groups']);

	while ( $group_key < $group_count ) {
	$group_info = $filter_menu['Groups'][$group_key];

	$temp_filter->setType(constant('kDBList::FLT_TYPE_' . $group_info['mode']));
	$temp_filter->clearFilters();

	foreach ($group_info['filters'] as $flt_id) {
	$sql_key = getArrayValue($view_filter, $flt_id) ? 'on_sql' : 'off_sql';

	if ( $filter_menu['Filters'][$flt_id][$sql_key] != '' ) {
	$temp_filter->addFilter('view_filter_' . $flt_id, $filter_menu['Filters'][$flt_id][$sql_key]);
	}
	}

	$object->addFilter('view_group_' . $group_key, $temp_filter, $group_info['type'], kDBList::FLT_VIEW);
	$group_key++;
	}
	}
	}

	/**
	* Set's new sorting for list
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnSetSorting(&$event)
	{
	$sorting_settings = $this->getListSetting($event, 'Sortings');
	$cur_sort1 = getArrayValue($sorting_settings, 'Sort1');
	$cur_sort1_dir = getArrayValue($sorting_settings, 'Sort1_Dir');

	$use_double_sorting = $this->Application->ConfigValue('UseDoubleSorting');

	if ( $use_double_sorting ) {
	$cur_sort2 = getArrayValue($sorting_settings, 'Sort2');
	$cur_sort2_dir = getArrayValue($sorting_settings, 'Sort2_Dir');
	}

	$passed_sort1 = $this->Application->GetVar($event->getPrefixSpecial(true) . '_Sort1');
	if ( $cur_sort1 == $passed_sort1 ) {
	$cur_sort1_dir = $cur_sort1_dir == 'asc' ? 'desc' : 'asc';
	}
	else {
	if ( $use_double_sorting ) {
	$cur_sort2 = $cur_sort1;
	$cur_sort2_dir = $cur_sort1_dir;
	}

	$cur_sort1 = $passed_sort1;
	$cur_sort1_dir = 'asc';
	}

	$sorting_settings = Array ('Sort1' => $cur_sort1, 'Sort1_Dir' => $cur_sort1_dir);

	if ( $use_double_sorting ) {
	$sorting_settings['Sort2'] = $cur_sort2;
	$sorting_settings['Sort2_Dir'] = $cur_sort2_dir;
	}

	$this->setListSetting($event, 'Sortings', $sorting_settings);
	}

	/**
	* Set sorting directly to session (used for category item sorting (front-end), grid sorting (admin, view menu)
	*
	* @param kEvent $event
	*/
	function OnSetSortingDirect(&$event)
	{
	// used on Front-End in category item lists
	$prefix_special = $event->getPrefixSpecial();
	$combined = $this->Application->GetVar($event->getPrefixSpecial(true) . '_CombinedSorting');

	if ( $combined ) {
	list ($field, $dir) = explode('\|', $combined);

	if ( $this->Application->isAdmin \|\| !$this->Application->GetVar('main_list') ) {
	$this->setListSetting($event, 'Sortings', Array ('Sort1' => $field, 'Sort1_Dir' => $dir));
	}
	else {
	$event->setPseudoClass('_List');
	$this->Application->SetVar('sort_by', $field . ',' . $dir);

	$object =& $event->getObject(Array ('main_list' => 1));
	/* @var $object kDBList */

	$list_helper =& $this->Application->recallObject('ListHelper');
	/* @var $list_helper ListHelper */

	$this->_passListParams($event, 'sort_by');

	if ( $list_helper->hasUserSorting($object) ) {
	$event->SetRedirectParam('sort_by', $field . ',' . strtolower($dir));
	}

	$event->SetRedirectParam('pass', 'm');
	}

	return;
	}

	// used in "View Menu -> Sort" menu in administrative console
	$field_pos = $this->Application->GetVar($event->getPrefixSpecial(true) . '_SortPos');
	$this->Application->LinkVar($event->getPrefixSpecial(true) . '_Sort' . $field_pos, $prefix_special . '_Sort' . $field_pos);
	$this->Application->LinkVar($event->getPrefixSpecial(true) . '_Sort' . $field_pos . '_Dir', $prefix_special . '_Sort' . $field_pos . '_Dir');
	}

	/**
	* Reset grid sorting to default (from config)
	*
	* @param kEvent $event
	*/
	function OnResetSorting(&$event)
	{
	$this->setListSetting($event, 'Sortings');
	}

	/**
	* Sets grid refresh interval
	*
	* @param kEvent $event
	*/
	function OnSetAutoRefreshInterval(&$event)
	{
	$refresh_interval = $this->Application->GetVar('refresh_interval');

	$view_name = $this->Application->RecallVar($event->getPrefixSpecial().'_current_view');
	$this->Application->StorePersistentVar($event->getPrefixSpecial().'_refresh_interval.'.$view_name, $refresh_interval);
	}

	/**
	* Changes auto-refresh state for grid
	*
	* @param kEvent $event
	*/
	function OnAutoRefreshToggle(&$event)
	{
	$refresh_intervals = $this->Application->ConfigValue('AutoRefreshIntervals');
	if (!$refresh_intervals) {
	return ;
	}

	$view_name = $this->Application->RecallVar($event->getPrefixSpecial().'_current_view');
	$auto_refresh = $this->Application->RecallPersistentVar($event->getPrefixSpecial().'_auto_refresh.'.$view_name);

	if ($auto_refresh === false) {
	$refresh_intervals = explode(',', $refresh_intervals);
	$this->Application->StorePersistentVar($event->getPrefixSpecial().'_refresh_interval.'.$view_name, $refresh_intervals[0]);
	}

	$this->Application->StorePersistentVar($event->getPrefixSpecial().'_auto_refresh.'.$view_name, $auto_refresh ? 0 : 1);
	}

	/**
	* Creates needed sql query to load item,
	* if no query is defined in config for
	* special requested, then use default
	* query
	*
	* @param kEvent $event
	* @access protected
	*/
	function ItemPrepareQuery(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$sqls = $object->getFormOption('ItemSQLs', Array ());
	$special = isset($sqls[$event->Special]) ? $event->Special : '';

	// preferred special not found in ItemSQLs -> use analog from ListSQLs

	return isset($sqls[$special]) ? $sqls[$special] : $this->ListPrepareQuery($event);
	}

	/**
	* Creates needed sql query to load list,
	* if no query is defined in config for
	* special requested, then use default
	* query
	*
	* @param kEvent $event
	* @access protected
	*/
	function ListPrepareQuery(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$sqls = $object->getFormOption('ListSQLs', Array ());

	return $sqls[ array_key_exists($event->Special, $sqls) ? $event->Special : '' ];
	}

	/**
	* Apply custom processing to item
	*
	* @param kEvent $event
	* @param string $type
	* @return void
	* @access protected
	*/
	protected function customProcessing(&$event, $type)
	{

	}

	/* Edit Events mostly used in Admin */

	/**
	* Creates new kDBItem
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnCreate(&$event)
	{
	$object =& $event->getObject( Array('skip_autoload' => true) );
	/* @var $object kDBItem */

	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	if ($items_info) {
	list($id,$field_values) = each($items_info);
	$object->SetFieldsFromHash($field_values);
	}

	$this->customProcessing($event,'before');

	//look at kDBItem' Create for ForceCreateId description, it's rarely used and is NOT set by default
	if ( $object->Create($event->getEventParam('ForceCreateId')) ) {
	$this->customProcessing($event,'after');
	$event->status=kEvent::erSUCCESS;
	$event->setRedirectParams(Array('opener'=>'u'), true);
	}
	else {
	$event->status = kEvent::erFAIL;
	$event->redirect = false;
	$this->Application->SetVar($event->getPrefixSpecial().'_SaveEvent','OnCreate');
	$object->setID($id);
	}
	}

	/**
	* Updates kDBItem
	*
	* @param kEvent $event
	* @access protected
	*/
	protected function OnUpdate(&$event)
	{
	if ( $this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) ) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$object =& $event->getObject(Array ('skip_autoload' => true));
	/* @var $object kDBItem */

	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );

	if ( $items_info ) {
	foreach ($items_info as $id => $field_values) {
	$object->Load($id);
	$object->SetFieldsFromHash($field_values);
	$this->customProcessing($event, 'before');

	if ( $object->Update($id) ) {
	$this->customProcessing($event, 'after');
	$event->status = kEvent::erSUCCESS;
	}
	else {
	$event->status = kEvent::erFAIL;
	$event->redirect = false;
	break;
	}
	}
	}

	$event->SetRedirectParam('opener', 'u');
	}

	/**
	* Delete's kDBItem object
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnDelete(&$event)
	{
	if ($this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1)) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$temp_handler =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	$temp_handler->DeleteItems($event->Prefix, $event->Special, Array ($this->getPassedID($event)));
	}

	/**
	* Deletes all records from table
	*
	* @param kEvent $event
	*/
	function OnDeleteAll(&$event)
	{
	$sql = 'SELECT ' . $this->Application->getUnitOption($event->Prefix, 'IDField') . '
	FROM ' . $this->Application->getUnitOption($event->Prefix, 'TableName');
	$ids = $this->Conn->GetCol($sql);

	if ($ids) {
	$temp_handler =& $this->Application->recallObject($event->getPrefixSpecial() . '_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	$temp_handler->DeleteItems($event->Prefix, $event->Special, $ids);
	}
	}

	/**
	* Prepares new kDBItem object
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnNew(&$event)
	{
	$object =& $event->getObject( Array('skip_autoload' => true) );
	/* @var $object kDBItem */

	$object->Clear(0);
	$this->Application->SetVar($event->getPrefixSpecial().'_SaveEvent', 'OnCreate');

	if ($event->getEventParam('top_prefix') != $event->Prefix) {
	// this is subitem prefix, so use main item special
	$table_info = $object->getLinkedInfo( $this->getMainSpecial($event) );
	}
	else {
	$table_info = $object->getLinkedInfo();
	}

	$object->SetDBField($table_info['ForeignKey'], $table_info['ParentId']);

	$event->redirect = false;
	}

	/**
	* Cancels kDBItem Editing/Creation
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnCancel(&$event)
	{
	$object =& $event->getObject(Array ('skip_autoload' => true));
	/* @var $object kDBItem */

	$items_info = $this->Application->GetVar($event->getPrefixSpecial(true));

	if ( $items_info ) {
	$delete_ids = Array ();

	$temp_handler =& $this->Application->recallObject($event->getPrefixSpecial() . '_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	foreach ($items_info as $id => $field_values) {
	$object->Load($id);
	// record created for using with selector (e.g. Reviews->Select User), and not validated => Delete it
	if ( $object->isLoaded() && !$object->Validate() && ($id <= 0) ) {
	$delete_ids[] = $id;
	}
	}

	if ( $delete_ids ) {
	$temp_handler->DeleteItems($event->Prefix, $event->Special, $delete_ids);
	}
	}

	$event->SetRedirectParam('opener', 'u');
	}

	/**
	* Deletes all selected items.
	* Automatically recurse into sub-items using temp handler, and deletes sub-items
	* by calling its Delete method if sub-item has AutoDelete set to true in its config file
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnMassDelete(&$event)
	{
	if ( $this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) ) {
	$event->status = kEvent::erFAIL;
	return ;
	}

	$temp_handler =& $this->Application->recallObject($event->getPrefixSpecial() . '_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	$ids = $this->StoreSelectedIDs($event);

	$event->setEventParam('ids', $ids);
	$this->customProcessing($event, 'before');
	$ids = $event->getEventParam('ids');

	if ( $ids ) {
	$temp_handler->DeleteItems($event->Prefix, $event->Special, $ids);
	}

	$this->clearSelectedIDs($event);
	}

	/**
	* Sets window id (of first opened edit window) to temp mark in uls
	*
	* @param kEvent $event
	*/
	function setTempWindowID(&$event)
	{
	$prefixes = Array ($event->Prefix, $event->getPrefixSpecial(true));

	foreach ($prefixes as $prefix) {
	$mode = $this->Application->GetVar($prefix . '_mode');

	if ($mode == 't') {
	$wid = $this->Application->GetVar('m_wid');
	$this->Application->SetVar(str_replace('_', '.', $prefix) . '_mode', 't' . $wid);
	break;
	}
	}
	}

	/**
	* Prepare temp tables and populate it
	* with items selected in the grid
	*
	* @param kEvent $event
	*/
	function OnEdit(&$event)
	{
	$this->setTempWindowID($event);
	$ids = $this->StoreSelectedIDs($event);

	$this->Application->RemoveVar( $this->_getPendingActionVariableName($event) );

	$changes_var_name = $this->Prefix . '_changes_' . $this->Application->GetTopmostWid($this->Prefix);
	$this->Application->RemoveVar($changes_var_name);

	$temp_handler =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	$temp_handler->PrepareEdit();

	$event->SetRedirectParam('m_lang', $this->Application->GetDefaultLanguageId());
	$event->SetRedirectParam($event->getPrefixSpecial() . '_id', array_shift($ids));
	$event->SetRedirectParam('pass', 'all,' . $event->getPrefixSpecial());
	}

	/**
	* Saves content of temp table into live and
	* redirects to event' default redirect (normally grid template)
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnSave(&$event)
	{
	$event->CallSubEvent('OnPreSave');

	if ($event->status != kEvent::erSUCCESS) {
	return ;
	}

	$skip_master = false;
	$temp_handler =& $this->Application->recallObject($event->getPrefixSpecial() . '_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	$changes_var_name = $this->Prefix . '_changes_' . $this->Application->GetTopmostWid($this->Prefix);

	if ( !$this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) ) {
	$live_ids = $temp_handler->SaveEdit($event->getEventParam('master_ids') ? $event->getEventParam('master_ids') : Array ());

	if ( $live_ids === false ) {
	// coping from table failed, because we have another coping process to same table, that wasn't finished
	$event->status = kEvent::erFAIL;
	return ;
	}

	if ( $live_ids ) {
	// ensure, that newly created item ids are available as if they were selected from grid
	// NOTE: only works if main item has sub-items !!!
	$this->StoreSelectedIDs($event, $live_ids);
	}

	$object =& $event->getObject();
	/* @var $object kDBItem */

	$this->SaveLoggedChanges($changes_var_name, $object->ShouldLogChanges());
	}
	else {
	$event->status = kEvent::erFAIL;
	}

	$this->clearSelectedIDs($event);

	$event->setRedirectParams(Array ('opener' => 'u'), true);
	$this->Application->RemoveVar($event->getPrefixSpecial() . '_modified');

	// all temp tables are deleted here => all after hooks should think, that it's live mode now
	$this->Application->SetVar($event->Prefix . '_mode', '');
	}

	function SaveLoggedChanges($changes_var_name, $save = true)
	{
	// 1. get changes, that were made
	$changes = $this->Application->RecallVar($changes_var_name);
	$changes = $changes ? unserialize($changes) : Array ();
	$this->Application->RemoveVar($changes_var_name);

	if (!$changes) {
	// no changes, skip processing
	return ;
	}

	// TODO: 2. optimize change log records (replace multiple changes to same record with one change record)

	$to_increment = Array ();

	// 3. collect serials to reset based on foreign keys
	foreach ($changes as $index => $rec) {
	if (array_key_exists('DependentFields', $rec)) {

	foreach ($rec['DependentFields'] as $field_name => $field_value) {
	// will be "ci\|ItemResourceId:345"
	$to_increment[] = $rec['Prefix'] . '\|' . $field_name . ':' . $field_value;

	// also reset sub-item prefix general serial
	$to_increment[] = $rec['Prefix'];
	}

	unset($changes[$index]['DependentFields']);
	}

	unset($changes[$index]['ParentId'], $changes[$index]['ParentPrefix']);
	}

	// 4. collect serials to reset based on changed ids
	foreach ($changes as $change) {
	$to_increment[] = $change['MasterPrefix'] . '\|' . $change['MasterId'];

	if ($change['MasterPrefix'] != $change['Prefix']) {
	// also reset sub-item prefix general serial
	$to_increment[] = $change['Prefix'];

	// will be "ci\|ItemResourceId"
	$to_increment[] = $change['Prefix'] . '\|' . $change['ItemId'];
	}
	}

	// 5. reset serials collected before
	$to_increment = array_unique($to_increment);
	$this->Application->incrementCacheSerial($this->Prefix);

	foreach ($to_increment as $to_increment_mixed) {
	if (strpos($to_increment_mixed, '\|') !== false) {
	list ($to_increment_prefix, $to_increment_id) = explode('\|', $to_increment_mixed, 2);
	$this->Application->incrementCacheSerial($to_increment_prefix, $to_increment_id);
	}
	else {
	$this->Application->incrementCacheSerial($to_increment_mixed);
	}
	}

	// save changes to database
	$sesion_log_id = $this->Application->RecallVar('_SessionLogId_');

	if (!$save \|\| !$sesion_log_id) {
	// saving changes to database disabled OR related session log missing
	return ;
	}

	$add_fields = Array (
	'PortalUserId' => $this->Application->RecallVar('user_id'),
	'SessionLogId' => $sesion_log_id,
	);

	$change_log_table = $this->Application->getUnitOption('change-log', 'TableName');

	foreach ($changes as $rec) {
	$this->Conn->doInsert(array_merge($rec, $add_fields), $change_log_table);
	}

	$this->Application->incrementCacheSerial('change-log');

	$sql = 'UPDATE ' . $this->Application->getUnitOption('session-log', 'TableName') . '
	SET AffectedItems = AffectedItems + ' . count($changes) . '
	WHERE SessionLogId = ' . $sesion_log_id;
	$this->Conn->Query($sql);

	$this->Application->incrementCacheSerial('session-log');
	}

	/**
	* Cancels edit
	* Removes all temp tables and clears selected ids
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnCancelEdit(&$event)
	{
	$temp_handler =& $this->Application->recallObject($event->getPrefixSpecial() . '_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	$temp_handler->CancelEdit();

	$this->clearSelectedIDs($event);
	$event->setRedirectParams(Array ('opener' => 'u'), true);
	$this->Application->RemoveVar($event->getPrefixSpecial() . '_modified');

	$changes_var_name = $this->Prefix . '_changes_' . $this->Application->GetTopmostWid($this->Prefix);
	$this->Application->RemoveVar($changes_var_name);
	}

	/**
	* Allows to determine if we are creating new item or editing already created item
	*
	* @param kEvent $event
	* @return bool
	*/
	function isNewItemCreate(&$event)
	{
	$object =& $event->getObject( Array ('raise_warnings' => 0) );
	/* @var $object kDBItem */

	return !$object->isLoaded();
	}

	/**
	* Saves edited item into temp table
	* If there is no id, new item is created in temp table
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnPreSave(&$event)
	{
	// if there is no id - it means we need to create an item
	if ( is_object($event->MasterEvent) ) {
	$event->MasterEvent->setEventParam('IsNew', false);
	}

	if ( $this->isNewItemCreate($event) ) {
	$event->CallSubEvent('OnPreSaveCreated');

	if ( is_object($event->MasterEvent) ) {
	$event->MasterEvent->setEventParam('IsNew', true);
	}

	return ;
	}

	$object =& $event->getObject( Array ('skip_autoload' => true) );
	/* @var $object kDBItem */

	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	if ( $items_info ) {
	foreach ($items_info as $id => $field_values) {
	$object->Load($id);
	$object->SetFieldsFromHash($field_values);
	$this->customProcessing($event, 'before');

	if ( $object->Update($id) ) {
	$this->customProcessing($event, 'after');
	$event->status = kEvent::erSUCCESS;
	}
	else {
	$event->status = kEvent::erFAIL;
	$event->redirect = false;
	break;
	}
	}
	}
	}

	/**
	* [HOOK] Saves sub-item
	*
	* @param kEvent $event
	*/
	function OnPreSaveSubItem(&$event)
	{
	$not_created = $this->isNewItemCreate($event);

	$event->CallSubEvent($not_created ? 'OnCreate' : 'OnUpdate');
	if ($event->status == kEvent::erSUCCESS) {
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$this->Application->SetVar($event->getPrefixSpecial() . '_id', $object->GetID());
	}
	else {
	$event->MasterEvent->status = $event->status;
	}

	$event->SetRedirectParam('opener', 's');
	}

	/**
	* Saves edited item in temp table and loads
	* item with passed id in current template
	* Used in Prev/Next buttons
	*
	* @param kEvent $event
	*/
	function OnPreSaveAndGo(&$event)
	{
	$event->CallSubEvent('OnPreSave');

	if ($event->status == kEvent::erSUCCESS) {
	$id = $this->Application->GetVar($event->getPrefixSpecial(true) . '_GoId');
	$event->SetRedirectParam($event->getPrefixSpecial() . '_id', $id);
	}
	}

	/**
	* Saves edited item in temp table and goes
	* to passed tabs, by redirecting to it with OnPreSave event
	*
	* @param kEvent $event
	*/
	function OnPreSaveAndGoToTab(&$event)
	{
	$event->CallSubEvent('OnPreSave');
	if ($event->status==kEvent::erSUCCESS) {
	$event->redirect=$this->Application->GetVar($event->getPrefixSpecial(true).'_GoTab');
	}
	}

	/**
	* Saves editable list and goes to passed tab,
	* by redirecting to it with empty event
	*
	* @param kEvent $event
	*/
	function OnUpdateAndGoToTab(&$event)
	{
	$event->setPseudoClass('_List');
	$event->CallSubEvent('OnUpdate');
	if ($event->status==kEvent::erSUCCESS) {
	$event->redirect=$this->Application->GetVar($event->getPrefixSpecial(true).'_GoTab');
	}
	}

	/**
	* Prepare temp tables for creating new item
	* but does not create it. Actual create is
	* done in OnPreSaveCreated
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnPreCreate(&$event)
	{
	$this->setTempWindowID($event);
	$this->clearSelectedIDs($event);
	$this->Application->SetVar('m_lang', $this->Application->GetDefaultLanguageId());

	$object =& $event->getObject( Array ('skip_autoload' => true) );
	/* @var $object kDBItem */

	$temp_handler =& $this->Application->recallObject($event->Prefix . '_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	$temp_handler->PrepareEdit();

	$object->setID(0);
	$this->Application->SetVar($event->getPrefixSpecial() . '_id', 0);
	$this->Application->SetVar($event->getPrefixSpecial() . '_PreCreate', 1);

	$changes_var_name = $this->Prefix . '_changes_' . $this->Application->GetTopmostWid($this->Prefix);
	$this->Application->RemoveVar($changes_var_name);

	$event->redirect = false;
	}

	/**
	* Creates a new item in temp table and
	* stores item id in App vars and Session on success
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnPreSaveCreated(&$event)
	{
	$object =& $event->getObject( Array('skip_autoload' => true) );
	/* @var $object kDBItem */

	$object->SetFieldsFromHash( $this->getSubmittedFields($event) );

	$this->customProcessing($event, 'before');

	if ( $object->Create() ) {
	$this->customProcessing($event, 'after');
	$event->SetRedirectParam($event->getPrefixSpecial(true) . '_id', $object->GetID());
	}
	else {
	$event->status = kEvent::erFAIL;
	$event->redirect = false;
	$object->setID(0);
	}
	}

	/**
	* Reloads form to loose all changes made during item editing
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnReset(&$event)
	{
	//do nothing - should reset :)
	if ( $this->isNewItemCreate($event) ) {
	// just reset id to 0 in case it was create
	$object =& $event->getObject( Array ('skip_autoload' => true) );
	/* @var $object kDBItem */

	$object->setID(0);
	$this->Application->SetVar($event->getPrefixSpecial() . '_id', 0);
	}
	}

	/**
	* Apply same processing to each item being selected in grid
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function iterateItems(&$event)
	{
	if ( $this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) ) {
	$event->status = kEvent::erFAIL;
	return ;
	}

	$object =& $event->getObject(Array ('skip_autoload' => true));
	/* @var $object kDBItem */

	$ids = $this->StoreSelectedIDs($event);

	if ( $ids ) {
	$status_field = array_shift( $this->Application->getUnitOption($event->Prefix, 'StatusField') );
	$order_field = $this->Application->getUnitOption($event->Prefix, 'OrderField');

	if ( !$order_field ) {
	$order_field = 'Priority';
	}

	foreach ($ids as $id) {
	$object->Load($id);

	switch ( $event->Name ) {
	case 'OnMassApprove':
	$object->SetDBField($status_field, 1);
	break;

	case 'OnMassDecline':
	$object->SetDBField($status_field, 0);
	break;

	case 'OnMassMoveUp':
	$object->SetDBField($order_field, $object->GetDBField($order_field) + 1);
	break;

	case 'OnMassMoveDown':
	$object->SetDBField($order_field, $object->GetDBField($order_field) - 1);
	break;
	}

	if ( $object->Update() ) {
	$event->status = kEvent::erSUCCESS;
	}
	else {
	$event->status = kEvent::erFAIL;
	$event->redirect = false;
	break;
	}
	}
	}

	$this->clearSelectedIDs($event);
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnMassClone(&$event)
	{
	if ( $this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) ) {
	$event->status = kEvent::erFAIL;
	return ;
	}

	$temp_handler =& $this->Application->recallObject($event->getPrefixSpecial() . '_TempHandler', 'kTempTablesHandler', Array ('parent_event' => &$event));
	/* @var $temp_handler kTempTablesHandler */

	$ids = $this->StoreSelectedIDs($event);

	if ( $ids ) {
	$temp_handler->CloneItems($event->Prefix, $event->Special, $ids);
	}

	$this->clearSelectedIDs($event);
	}

	function check_array($records, $field, $value)
	{
	foreach ($records as $record) {
	if ($record[$field] == $value) {
	return true;
	}
	}
	return false;
	}

	/**
	* Saves data from editing form to database without checking required fields
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnPreSavePopup(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$this->RemoveRequiredFields($object);
	$event->CallSubEvent('OnPreSave');

	$event->SetRedirectParam('opener', 'u');
	}


	/* End of Edit events */

	// III. Events that allow to put some code before and after Update,Load,Create and Delete methods of item

	/**
	* Occurse before loading item, 'id' parameter
	* allows to get id of item beeing loaded
	*
	* @param kEvent $event
	* @access public
	*/
	function OnBeforeItemLoad(&$event)
	{

	}

	/**
	* Occurs after loading item, 'id' parameter
	* allows to get id of item that was loaded
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnAfterItemLoad(&$event)
	{

	}

	/**
	* Occurs before creating item
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeItemCreate(&$event)
	{

	}

	/**
	* Occurs after creating item
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnAfterItemCreate(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	if ( !$object->IsTempTable() ) {
	$this->_proccessPendingActions($event);
	}
	}

	/**
	* Occurs before updating item
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeItemUpdate(&$event)
	{

	}

	/**
	* Occurs after updating item
	*
	* @param kEvent $event
	* @access public
	*/
	function OnAfterItemUpdate(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	if ( !$object->IsTempTable() ) {
	$this->_proccessPendingActions($event);
	}
	}

	/**
	* Occurse before deleting item, id of item beeing
	* deleted is stored as 'id' event param
	*
	* @param kEvent $event
	* @access public
	*/
	function OnBeforeItemDelete(&$event)
	{

	}

	/**
	* Occurse after deleting item, id of deleted item
	* is stored as 'id' param of event
	*
	* @param kEvent $event
	* @access public
	*/
	function OnAfterItemDelete(&$event)
	{

	}

	/**
	* Occurs before validation attempt
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeItemValidate(kEvent &$event)
	{

	}

	/**
	* Occurs after successful item validation
	*
	* @param kEvent $event
	*/
	function OnAfterItemValidate(&$event)
	{

	}

	/**
	* Occures after an item has been copied to temp
	* Id of copied item is passed as event' 'id' param
	*
	* @param kEvent $event
	*/
	function OnAfterCopyToTemp(&$event)
	{

	}

	/**
	* Occurs before an item is deleted from live table when copying from temp
	* (temp handler deleted all items from live and then copy over all items from temp)
	* Id of item being deleted is passed as event' 'id' param
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeDeleteFromLive(&$event)
	{

	}

	/**
	* Occures before an item is copied to live table (after all foreign keys have been updated)
	* Id of item being copied is passed as event' 'id' param
	*
	* @param kEvent $event
	*/
	function OnBeforeCopyToLive(&$event)
	{

	}

	/**
	* Occures after an item has been copied to live table
	* Id of copied item is passed as event' 'id' param
	*
	* @param kEvent $event
	*/
	function OnAfterCopyToLive(&$event)
	{
	$this->_proccessPendingActions($event);
	}

	/**
	* Processing file pending actions (e.g. delete scheduled files)
	*
	* @param kEvent $event
	*/
	function _proccessPendingActions(&$event)
	{
	$var_name = $this->_getPendingActionVariableName($event);
	$schedule = $this->Application->RecallVar($var_name);

	if ( $schedule ) {
	$schedule = unserialize($schedule);

	foreach ($schedule as $data) {
	if ( $data['action'] == 'delete' ) {
	unlink( $data['file'] );
	}
	}

	$this->Application->RemoveVar($var_name);
	}
	}

	/**
	* Returns variable name, used to store pending file actions
	*
	* @param kEvent $event
	* @return string
	*/
	function _getPendingActionVariableName(&$event)
	{
	$window_id = $this->Application->GetTopmostWid($event->Prefix);

	return $event->Prefix . '_file_pending_actions' . $window_id;
	}

	/**
	* Occurs before an item has been cloned
	* Id of newly created item is passed as event' 'id' param
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeClone(&$event)
	{

	}

	/**
	* Occures after an item has been cloned
	* Id of newly created item is passed as event' 'id' param
	*
	* @param kEvent $event
	*/
	function OnAfterClone(&$event)
	{

	}

	/**
	* Occures after list is queried
	*
	* @param kEvent $event
	*/
	function OnAfterListQuery(&$event)
	{

	}

	/**
	* Ensures that popup will be closed automatically
	* and parent window will be refreshed with template
	* passed
	*
	* @param kEvent $event
	* @return void
	* @access protected
	* @deprecated
	*/
	protected function finalizePopup(&$event)
	{
	$event->SetRedirectParam('opener', 'u');
	}

	/**
	* Create search filters based on search query
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnSearch(&$event)
	{
	$event->setPseudoClass('_List');

	$search_helper =& $this->Application->recallObject('SearchHelper');
	/* @var $search_helper kSearchHelper */

	$search_helper->performSearch($event);
	}

	/**
	* Clear search keywords
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnSearchReset(&$event)
	{
	$search_helper =& $this->Application->recallObject('SearchHelper');
	/* @var $search_helper kSearchHelper */

	$search_helper->resetSearch($event);
	}

	/**
	* Set's new filter value (filter_id meaning from config)
	*
	* @param kEvent $event
	*/
	function OnSetFilter(&$event)
	{
	$filter_id = $this->Application->GetVar('filter_id');
	$filter_value = $this->Application->GetVar('filter_value');

	$view_filter = $this->Application->RecallVar($event->getPrefixSpecial().'_view_filter');
	$view_filter = $view_filter ? unserialize($view_filter) : Array();

	$view_filter[$filter_id] = $filter_value;

	$this->Application->StoreVar( $event->getPrefixSpecial().'_view_filter', serialize($view_filter) );
	}

	/**
	* Sets view filter based on request
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnSetFilterPattern(&$event)
	{
	$filters = $this->Application->GetVar($event->getPrefixSpecial(true) . '_filters');
	if ( !$filters ) {
	return;
	}

	$view_filter = $this->Application->RecallVar($event->getPrefixSpecial() . '_view_filter');
	$view_filter = $view_filter ? unserialize($view_filter) : Array ();

	$filters = explode(',', $filters);

	foreach ($filters as $a_filter) {
	list($id, $value) = explode('=', $a_filter);
	$view_filter[$id] = $value;
	}

	$this->Application->StoreVar($event->getPrefixSpecial() . '_view_filter', serialize($view_filter));
	$event->redirect = false;
	}

	/**
	* Add/Remove all filters applied to list from "View" menu
	*
	* @param kEvent $event
	*/
	function FilterAction(&$event)
	{
	$view_filter = Array();
	$filter_menu = $this->Application->getUnitOption($event->Prefix,'FilterMenu');
	switch ($event->Name)
	{
	case 'OnRemoveFilters':
	$filter_value = 1;
	break;

	case 'OnApplyFilters':
	$filter_value = 0;
	break;
	}

	foreach($filter_menu['Filters'] as $filter_key => $filter_params)
	{
	if(!$filter_params) continue;
	$view_filter[$filter_key] = $filter_value;
	}
	$this->Application->StoreVar( $event->getPrefixSpecial().'_view_filter', serialize($view_filter) );
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	* @access protected
	*/
	protected function OnPreSaveAndOpenTranslator(&$event)
	{
	$this->Application->SetVar('allow_translation', true);

	$object =& $event->getObject();
	/* @var $object kDBItem */

	$this->RemoveRequiredFields($object);
	$event->CallSubEvent('OnPreSave');

	if ( $event->status == kEvent::erSUCCESS ) {
	$resource_id = $this->Application->GetVar('translator_resource_id');

	if ( $resource_id ) {
	$t_prefixes = explode(',', $this->Application->GetVar('translator_prefixes'));

	$cdata =& $this->Application->recallObject($t_prefixes[1], null, Array ('skip_autoload' => true));
	/* @var $cdata kDBItem */

	$cdata->Load($resource_id, 'ResourceId');

	if ( !$cdata->isLoaded() ) {
	$cdata->SetDBField('ResourceId', $resource_id);
	$cdata->Create();
	}

	$this->Application->SetVar($cdata->getPrefixSpecial() . '_id', $cdata->GetID());
	}

	$event->redirect = $this->Application->GetVar('translator_t');

	$redirect_params = Array (
	'pass' => 'all,trans,' . $this->Application->GetVar('translator_prefixes'),
	'opener' => 's',
	$event->getPrefixSpecial(true) . '_id' => $object->GetID(),
	'trans_event' => 'OnLoad',
	'trans_prefix' => $this->Application->GetVar('translator_prefixes'),
	'trans_field' => $this->Application->GetVar('translator_field'),
	'trans_multi_line' => $this->Application->GetVar('translator_multi_line'),
	);

	$event->setRedirectParams($redirect_params, true);

	// 1. SAVE LAST TEMPLATE TO SESSION (really needed here, because of tweaky redirect)
	$last_template = $this->Application->RecallVar('last_template');
	preg_match('/index4\.php\\|' . $this->Application->GetSID() . '-(.*):/U', $last_template, $rets);
	$this->Application->StoreVar('return_template', $this->Application->GetVar('t'));
	}
	}

	/**
	* Makes all fields non-required
	*
	* @param kDBItem $object
	*/
	function RemoveRequiredFields(&$object)
	{
	// making all field non-required to achieve successful presave
	$fields = array_keys( $object->getFields() );

	foreach ($fields as $field) {
	if ( $object->isRequired($field) ) {
	$object->setRequired($field, false);
	}
	}
	}

	/**
	* Saves selected user in needed field
	*
	* @param kEvent $event
	*/
	function OnSelectUser(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$items_info = $this->Application->GetVar('u');

	if ( $items_info ) {
	$user_id = array_shift( array_keys($items_info) );

	$this->RemoveRequiredFields($object);

	$is_new = !$object->isLoaded();
	$is_main = substr($this->Application->GetVar($event->Prefix . '_mode'), 0, 1) == 't';

	if ( $is_new ) {
	$new_event = $is_main ? 'OnPreCreate' : 'OnNew';
	$event->CallSubEvent($new_event);
	$event->redirect = true;
	}

	$object->SetDBField($this->Application->RecallVar('dst_field'), $user_id);

	if ( $is_new ) {
	$object->Create();
	}
	else {
	$object->Update();
	}
	}

	$event->SetRedirectParam($event->getPrefixSpecial() . '_id', $object->GetID());
	$event->SetRedirectParam('opener', 'u');
	}


	/ EXPORT RELATED /

	/**
	* Shows export dialog
	*
	* @param kEvent $event
	*/
	function OnExport(&$event)
	{
	$selected_ids = $this->StoreSelectedIDs($event);

	if (implode(',', $selected_ids) == '') {
	// K4 fix when no ids found bad selected ids array is formed
	$selected_ids = false;
	}

	$this->Application->StoreVar($event->Prefix.'_export_ids', $selected_ids ? implode(',', $selected_ids) : '' );

	$this->Application->LinkVar('export_finish_t');
	$this->Application->LinkVar('export_progress_t');
	$this->Application->StoreVar('export_oroginal_special', $event->Special);

	$export_helper =& $this->Application->recallObject('CatItemExportHelper');

	/*list ($index_file, $env) = explode('\|', $this->Application->RecallVar('last_template'));
	$finish_url = $this->Application->BaseURL('/admin').$index_file.'?'.ENV_VAR_NAME.'='.$env;
	$this->Application->StoreVar('export_finish_url', $finish_url);*/

	$redirect_params = Array (
	$this->Prefix . '.export_event' => 'OnNew',
	'pass' => 'all,' . $this->Prefix . '.export'
	);

	$event->setRedirectParams($redirect_params);
	}

	/**
	* Apply some special processing to object being
	* recalled before using it in other events that
	* call prepareObject
	*
	* @param kDBItem\|kDBList $object
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function prepareObject(&$object, &$event)
	{
	if ( $event->Special == 'export' \|\| $event->Special == 'import' ) {
	$export_helper =& $this->Application->recallObject('CatItemExportHelper');
	/* @var $export_helper kCatDBItemExportHelper */

	$export_helper->prepareExportColumns($event);
	}
	}

	/**
	* Returns specific to each item type columns only
	*
	* @param kEvent $event
	* @return Array
	*/
	function getCustomExportColumns(&$event)
	{
	return Array();
	}

	/**
	* Export form validation & processing
	*
	* @param kEvent $event
	*/
	function OnExportBegin(&$event)
	{
	$export_helper =& $this->Application->recallObject('CatItemExportHelper');
	/* @var $export_helper kCatDBItemExportHelper */
	$export_helper->OnExportBegin($event);
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnExportCancel(&$event)
	{
	$this->OnGoBack($event);
	}

	/**
	* Allows configuring export options
	*
	* @param kEvent $event
	*/
	function OnBeforeExportBegin(&$event)
	{

	}

	/**
	* Deletes export preset
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnDeleteExportPreset(&$event)
	{
	$field_values = $this->getSubmittedFields($event);

	if ( !$field_values ) {
	return ;
	}

	$preset_key = $field_values['ExportPresets'];
	$export_settings = $this->Application->RecallPersistentVar('export_settings');

	if ( !$export_settings ) {
	return ;
	}

	$export_settings = unserialize($export_settings);

	if ( !isset($export_settings[$event->Prefix]) ) {
	return ;
	}

	$to_delete = '';

	foreach ($export_settings[$event->Prefix] as $key => $val) {
	if ( implode('\|', $val['ExportColumns']) == $preset_key ) {
	$to_delete = $key;
	break;
	}
	}

	if ( $to_delete ) {
	unset($export_settings[$event->Prefix][$to_delete]);
	$this->Application->StorePersistentVar('export_settings', serialize($export_settings));
	}
	}

	/**
	* Saves changes & changes language
	*
	* @param kEvent $event
	*/
	function OnPreSaveAndChangeLanguage(&$event)
	{
	if ($this->UseTempTables($event)) {
	$event->CallSubEvent('OnPreSave');
	}

	if ($event->status == kEvent::erSUCCESS) {
	$this->Application->SetVar('m_lang', $this->Application->GetVar('language'));

	$data = $this->Application->GetVar('st_id');

	if ($data) {
	$event->SetRedirectParam('st_id', $data);
	}
	}
	}

	/**
	* Used to save files uploaded via swfuploader
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnUploadFile(&$event)
	{
	$event->status = kEvent::erSTOP;
	// define('DBG_SKIP_REPORTING', 0);
	$default_msg = "Flash requires that we output something or it won't fire the uploadSuccess event";

	if (!$this->Application->HttpQuery->Post) {
	// Variables {field, id, flashsid} are always submitted through POST!
	// When file size is larger, then "upload_max_filesize" (in php.ini),
	// then these variables also are not submitted -> handle such case.
	header('HTTP/1.0 413 File size exceeds allowed limit');
	echo $default_msg;
	return ;
	}

	if (!$this->_checkFlashUploaderPermission($event)) {
	// 403 Forbidden
	header('HTTP/1.0 403 You don\'t have permissions to upload');
	echo $default_msg;
	return ;
	}

	$value = $this->Application->GetVar('Filedata');

	if (!$value \|\| ($value['error'] != UPLOAD_ERR_OK)) {
	// 413 Request Entity Too Large (file uploads disabled OR uploaded file was
	// to large for web server to accept, see "upload_max_filesize" in php.ini)
	header('HTTP/1.0 413 File size exceeds allowed limit');
	echo $default_msg;
	return ;
	}

	$tmp_path = WRITEABLE . '/tmp/';
	$fname = $value['name'];
	$id = $this->Application->GetVar('id');

	if ($id) {
	$fname = $id . '_' . $fname;
	}

	$field_name = $this->Application->GetVar('field');
	$fields = $this->Application->getUnitOption($event->Prefix, 'Fields');
	$virtual_fields = $this->Application->getUnitOption($event->Prefix, 'VirtualFields');
	$field_options = array_key_exists($field_name, $fields) ? $fields[$field_name] : $virtual_fields[$field_name];

	$upload_dir = $field_options['upload_dir'];
	$storage_format = array_key_exists('storage_format', $field_options) ? $field_options['storage_format'] : false;

	if (!is_writable($tmp_path)) {
	// 500 Internal Server Error
	// check both temp and live upload directory
	header('HTTP/1.0 500 Write permissions not set on the server');
	echo $default_msg;
	return ;
	}

	$file_helper =& $this->Application->recallObject('FileHelper');
	/* @var $file_helper FileHelper */

	$fname = $file_helper->ensureUniqueFilename($tmp_path, $fname);

	if ($storage_format) {
	$image_helper =& $this->Application->recallObject('ImageHelper');
	/* @var $image_helper ImageHelper */

	move_uploaded_file($value['tmp_name'], $value['tmp_name'] . '.jpg'); // add extension, so ResizeImage can work
	$url = $image_helper->ResizeImage($value['tmp_name'] . '.jpg', $storage_format);
	$tmp_name = preg_replace('/^' . preg_quote($this->Application->BaseURL(), '/') . '/', '/', $url);
	rename($tmp_name, $tmp_path.$fname);
	}
	else {
	move_uploaded_file($value['tmp_name'], $tmp_path.$fname);
	}

	echo preg_replace('/^' . preg_quote($id, '/') . '_/', '', $fname);

	$this->deleteTempFiles($tmp_path);
	}

	/**
	* Delete temporary files, that won't be used for sure
	*
	* @param string $path
	*/
	function deleteTempFiles($path)
	{
	$files = glob($path . '.');
	$max_file_date = strtotime('-1 day');

	foreach ($files as $file) {
	if (filemtime($file) < $max_file_date) {
	unlink($file);
	}
	}
	}

	/**
	* Checks, that flash uploader is allowed to perform upload
	*
	* @param kEvent $event
	* @return bool
	*/
	function _checkFlashUploaderPermission(&$event)
	{
	// Flash uploader does NOT send correct cookies, so we need to make our own check
	$cookie_name = 'adm_' . $this->Application->ConfigValue('SessionCookieName');
	$this->Application->HttpQuery->Cookie['cookies_on'] = 1;
	$this->Application->HttpQuery->Cookie[$cookie_name] = $this->Application->GetVar('flashsid');

	// this prevents session from auto-expiring when KeepSessionOnBrowserClose & FireFox is used
	$this->Application->HttpQuery->Cookie[$cookie_name . '_live'] = $this->Application->GetVar('flashsid');

	$admin_ses =& $this->Application->recallObject('Session.admin');
	/* @var $admin_ses Session */

	if ($admin_ses->RecallVar('user_id') == USER_ROOT) {
	return true;
	}

	// copy some data from given session to current session
	$backup_user_id = $this->Application->RecallVar('user_id');
	$this->Application->StoreVar('user_id', $admin_ses->RecallVar('user_id'));

	$backup_user_groups = $this->Application->RecallVar('UserGroups');
	$this->Application->StoreVar('UserGroups', $admin_ses->RecallVar('UserGroups'));

	// check permissions using event, that have "add\|edit" rule
	$check_event = new kEvent($event->getPrefixSpecial() . ':OnProcessSelected');
	$check_event->setEventParam('top_prefix', $this->Application->GetTopmostPrefix($event->Prefix, true));
	$allowed_to_upload = $this->CheckPermission($check_event);

	// restore changed data, so nothing gets saved to database
	$this->Application->StoreVar('user_id', $backup_user_id);
	$this->Application->StoreVar('UserGroups', $backup_user_groups);

	return $allowed_to_upload;
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnDeleteFile(&$event)
	{
	$event->status = kEvent::erSTOP;

	if (strpos($this->Application->GetVar('file'), '../') !== false) {
	return ;
	}

	$object =& $event->getObject( Array ('skip_autoload' => true) );
	$options = $object->GetFieldOptions( $this->Application->GetVar('field') );

	$var_name = $this->_getPendingActionVariableName($event);
	$schedule = $this->Application->RecallVar($var_name);
	$schedule = $schedule ? unserialize($schedule) : Array ();
	$schedule[] = Array ('action' => 'delete', 'file' => FULL_PATH . $options['upload_dir'] . $this->Application->GetVar('file'));
	$this->Application->StoreVar($var_name, serialize($schedule));
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnViewFile(&$event)
	{
	$event->status = kEvent::erSTOP;

	$file = $this->Application->GetVar('file');
	if ((strpos($file, '../') !== false) \|\| (trim($file) !== $file)) {
	// when relative paths or special chars are found template names from url, then it's hacking attempt
	return ;
	}

	$object =& $event->getObject( Array ('skip_autoload' => true));
	/* @var $object kDBItem */

	$field = $this->Application->GetVar('field');
	$options = $object->GetFieldOptions($field);

	// set current uploaded file
	if ($this->Application->GetVar('tmp')) {
	$options['upload_dir'] = WRITEBALE_BASE . '/tmp/';
	unset($options['include_path']);
	$object->SetFieldOptions($field, $options);

	$object->SetDBField($field, $this->Application->GetVar('id') . '_' . $file);
	}
	else {
	$object->SetDBField($field, $file);
	}

	// get url to uploaded file
	if ($this->Application->GetVar('thumb')) {
	$url = $object->GetField($field, $options['thumb_format']);
	}
	else {
	$url = $object->GetField($field, 'full_url'); // don't use "file_urls" format to prevent recursion
	}

	$file_helper =& $this->Application->recallObject('FileHelper');
	/* @var $file_helper FileHelper */

	$path = $file_helper->urlToPath($url);

	if (!file_exists($path)) {
	exit;
	}

	header('Content-Length: ' . filesize($path));
	header('Content-Type: ' . kUtil::mimeContentType($path));
	header('Content-Disposition: inline; filename="' . $file . '"');

	readfile($path);
	}

	/**
	* Validates MInput control fields
	*
	* @param kEvent $event
	*/
	function OnValidateMInputFields(&$event)
	{
	$minput_helper =& $this->Application->recallObject('MInputHelper');
	/* @var $minput_helper MInputHelper */

	$minput_helper->OnValidateMInputFields($event);
	}

	/**
	* Returns auto-complete values for ajax-dropdown
	*
	* @param kEvent $event
	*/
	function OnSuggestValues(&$event)
	{
	if (!$this->Application->isAdminUser) {
	// very careful here, because this event allows to
	// view every object field -> limit only to logged-in admins
	return ;
	}

	$event->status = kEvent::erSTOP;

	$field = $this->Application->GetVar('field');
	$cur_value = $this->Application->GetVar('cur_value');
	$fields = $this->Application->getUnitOption($event->Prefix, 'Fields');

	$object =& $event->getObject();

	if (!$field \|\| !$cur_value \|\| !$object->isField($field)) {
	return ;
	}

	$limit = $this->Application->GetVar('limit');
	if (!$limit) {
	$limit = 20;
	}

	$sql = 'SELECT DISTINCT '.$field.'
	FROM '.$this->Application->getUnitOption($event->Prefix, 'TableName').'
	WHERE '.$field.' LIKE '.$this->Conn->qstr($cur_value.'%').'
	ORDER BY '.$field.'
	LIMIT 0,' . $limit;
	$data = $this->Conn->GetCol($sql);

	$this->Application->XMLHeader();

	echo '<suggestions>';

	foreach ($data as $item) {
	echo '<item>' . htmlspecialchars($item) . '</item>';
	}

	echo '</suggestions>';
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnSaveWidths(&$event)
	{
	$event->status = kEvent::erSTOP;

	/*$lang =& $this->Application->recallObject('lang.current');
	header('Content-type: text/xml; charset=' . $lang->GetDBField('Charset'));*/

	$picker_helper =& $this->Application->RecallObject('ColumnPickerHelper');
	/* @var $picker_helper kColumnPickerHelper */

	$picker_helper->PreparePicker($event->getPrefixSpecial(), $this->Application->GetVar('grid_name'));
	$picker_helper->SaveWidths($event->getPrefixSpecial(), $this->Application->GetVar('widths'));

	echo 'OK';
	}

	/**
	* Called from CSV import script after item fields
	* are set and validated, but before actual item create/update.
	* If event status is kEvent::erSUCCESS, line will be imported,
	* else it will not be imported but added to skipped lines
	* and displayed in the end of import.
	* Event status is preset from import script.
	*
	* @param kEvent $event
	*/
	function OnBeforeCSVLineImport(&$event)
	{
	// abstract, for hooking
	}

	/**
	* [HOOK] Allows to add cloned subitem to given prefix
	*
	* @param kEvent $event
	*/
	function OnCloneSubItem(&$event)
	{
	$clones = $this->Application->getUnitOption($event->MasterEvent->Prefix, 'Clones');

	$subitem_prefix = $event->Prefix . '-' . preg_replace('/^#/', '', $event->MasterEvent->Prefix);
	$clones[$subitem_prefix] = Array ('ParentPrefix' => $event->Prefix);
	$this->Application->setUnitOption($event->MasterEvent->Prefix, 'Clones', $clones);
	}

	/**
	* Returns constrain for priority calculations
	*
	* @param kEvent $event
	* @return void
	* @see PriorityEventHandler
	* @access protected
	*/
	protected function OnGetConstrainInfo(&$event)
	{
	$event->setEventParam('constrain_info', Array ('', ''));
	}
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/application.php
	===================================================================
	--- branches/5.2.x/core/kernel/application.php (revision 14713)
	+++ branches/5.2.x/core/kernel/application.php (revision 14714)
	@@ -1,2735 +1,2766 @@
	<?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!');

	/**
	* Basic class for Kernel4-based Application
	*
	* This class is a Facade for any other class which needs to deal with Kernel4 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 kApplication in the script.<br>
	* This could be guaranteed by NOT calling the class constructor directly, but rather calling kApplication::Instance() method,
	* which returns an instance of the application. The method guarantees that it will return exactly the same instance for any call.<br>
	* See singleton pattern by GOF.
	*/
	class kApplication implements kiCacheable {

	/**
	* Location of module helper class (used in installator too)
	*/
	const MODULE_HELPER_PATH = '/../units/helpers/modules_helper.php';

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

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

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

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

	/**
	* Template names, that will be used instead of regular templates
	*
	* @var Array
	*/
	var $ReplacementTemplates = Array ();

	/**
	* Mod-Rewrite listeners used during url building and parsing
	*
	* @var Array
	*/
	var $RewriteListeners = 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 $Conn = null;

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

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

	// performance needs:
	/**
	- * Holds a refererence to httpquery
	+ * Holds a reference to httpquery
	*
	* @var kHttpQuery
	*/
	var $HttpQuery = null;

	/**
	* Holds a reference to UnitConfigReader
	*
	* @var kUnitConfigReader
	*/
	var $UnitConfigReader = null;

	/**
	* Holds a reference to Session
	*
	* @var Session
	*/
	var $Session = null;

	/**
	* Holds a ref to kEventManager
	*
	* @var kEventManager
	*/
	var $EventManager = null;

	/**
	* Holds a ref to kUrlManager
	*
	* @var kUrlManager
	- * @access protected
	+ * @access public
	*/
	- protected $UrlManager = null;
	+ public $UrlManager = null;

	/**
	- * Ref for TemplatesChache
	+ * Ref for TemplatesCache
	*
	* @var TemplatesCache
	*/
	var $TemplatesCache = null;

	var $CompilationCache = array(); //used when compiling templates
	var $CachedProcessors = array(); //used when running compiled templates

	var $LambdaElements = 1; // for autonumbering unnamed RenderElements [any better place for this prop? KT]

	/**
	* Holds current NParser tag while parsing, can be used in error messages to display template file and line
	*
	* @var _BlockTag
	*/
	var $CurrentNTag = null;

	/**
	* Object of unit caching class
	*
	* @var kCacheManager
	*/
	var $cacheManager = null;

	/**
	* Tells, that administrator has authenticated in administrative console
	* Should be used to manipulate data change OR data restrictions!
	*
	* @var bool
	*/
	var $isAdminUser = false;

	/**
	* Tells, that admin version of "index.php" was used, nothing more!
	* Should be used to manipulate data display!
	*
	* @var bool
	*/
	var $isAdmin = false;

	/**
	* Instance of site domain object
	*
	* @var kDBItem
	*/
	var $siteDomain = null;

	/**
	* Prevent kApplication class to be created directly, only via Instance method
	*
	*/
	protected function __construct()
	{

	}

	/**
	* 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 guaranteed 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 descendant 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.
	*
	* Pattern: Singleton
	*
	* @static
	* @access public
	* @return kApplication
	*/
	public static function &Instance()
	{
	static $instance = false;

	if (!$instance) {
	$class = defined('APPLICATION_CLASS') ? APPLICATION_CLASS : 'kApplication';
	$instance = new $class();
	$instance->Application =& $instance;
	}

	return $instance;
	}

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

	$this->isAdmin = kUtil::constOn('ADMIN');

	if ( !kUtil::constOn('SKIP_OUT_COMPRESSION') ) {
	ob_start(); // collect any output from method (other then tags) into buffer
	}

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

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

	if ( !kUtil::constOn('DBG_ZEND_PRESENT') ) {
	$error_handler = set_error_handler(Array (&$this, 'handleError'));
	if ( $error_handler ) {
	// wrap around previous error handler, if any was set
	$this->errorHandlers[] = $error_handler;
	}

	$exception_handler = set_exception_handler(Array (&$this, 'handleException'));
	if ( $exception_handler ) {
	// wrap around previous exception handler, if any was set
	$this->exceptionHandlers[] = $exception_handler;
	}
	}

	$this->Factory = new kFactory();
	$this->registerDefaultClasses();

	$vars = kUtil::parseConfig(true);
	$db_class = isset($vars['Databases']) ? 'kDBLoadBalancer' : 'kDBConnection';
	$this->Conn =& $this->Factory->makeClass($db_class, Array (SQL_TYPE, Array (&$this, 'handleSQLError')));
	$this->Conn->setup($vars);

	$this->cacheManager =& $this->makeClass('kCacheManager');
	$this->cacheManager->InitCache();

	if ( defined('DEBUG_MODE') && $this->isDebugMode() ) {
	$this->Debugger->appendTimestamp('Before UnitConfigReader');
	}

	+ // init config reader and all managers
	$this->UnitConfigReader =& $this->makeClass('kUnitConfigReader');
	$this->UnitConfigReader->scanModules(MODULES_PATH);

	$this->registerModuleConstants();

	if ( defined('DEBUG_MODE') && $this->isDebugMode() ) {
	$this->Debugger->appendTimestamp('After UnitConfigReader');
	}

	define('MOD_REWRITE', $this->ConfigValue('UseModRewrite') && !$this->isAdmin ? 1 : 0);

	+ // start processing request
	$this->HttpQuery =& $this->recallObject('HTTPQuery');
	+ $this->HttpQuery->AfterInit();

	if ( defined('DEBUG_MODE') && $this->isDebugMode() ) {
	$this->Debugger->appendTimestamp('Processed HTTPQuery initial');
	}

	$this->Session =& $this->recallObject('Session');

	if ( defined('DEBUG_MODE') && $this->isDebugMode() ) {
	$this->Debugger->appendTimestamp('Processed Session');
	}

	- if ( !$this->RecallVar('UserGroups') ) {
	- $user_groups = trim($this->Session->GetField('GroupList'), ',');
	- if ( !$user_groups ) {
	- $user_groups = $this->ConfigValue('User_GuestGroup');
	- }
	-
	- $this->Session->SetField('GroupList', $user_groups);
	- $this->StoreVar('UserGroups', $user_groups, true); // true for optional
	- }
	-
	$this->UrlManager->LoadStructureTemplateMapping();
	- $this->HttpQuery->AfterInit();

	$this->Session->ValidateExpired();

	if ( defined('DEBUG_MODE') && $this->isDebugMode() ) {
	$this->Debugger->appendTimestamp('Processed HTTPQuery AfterInit');
	}

	$this->cacheManager->LoadApplicationCache();

	$site_timezone = $this->ConfigValue('Config_Site_Time');

	if ( $site_timezone ) {
	putenv('TZ=' . $site_timezone);
	}

	if ( defined('DEBUG_MODE') && $this->isDebugMode() ) {
	$this->Debugger->appendTimestamp('Loaded cache and phrases');
	}

	$this->ValidateLogin(); // must be called before AfterConfigRead, because current user should be available there

	$this->UnitConfigReader->AfterConfigRead();

	if ( defined('DEBUG_MODE') && $this->isDebugMode() ) {
	$this->Debugger->appendTimestamp('Processed AfterConfigRead');
	}

	if ( $this->GetVar('m_cat_id') === false ) {
	$this->SetVar('m_cat_id', 0);
	}

	if ( !$this->RecallVar('curr_iso') ) {
	$this->StoreVar('curr_iso', $this->GetPrimaryCurrency(), true); // true for optional
	}

	$visit_id = $this->RecallVar('visit_id');

	if ( $visit_id !== false ) {
	$this->SetVar('visits_id', $visit_id);
	}

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

	if ( preg_match('/utf-8/', $language->GetDBField('Charset')) ) {
	setlocale(LC_ALL, 'en_US.UTF-8');
	mb_internal_encoding('UTF-8');
	}

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

	$this->InitDone = true;

	$this->HandleEvent(new kEvent('adm:OnStartup'));

	return true;
	}

	function InitManagers()
	{
	if ($this->InitDone) {
	throw new Exception('Duplicate call of ' . __METHOD__, E_USER_ERROR);
	return ;
	}

	$this->UrlManager =& $this->makeClass('kUrlManager');
	$this->EventManager =& $this->makeClass('EventManager');
	$this->Phrases =& $this->makeClass('kPhraseCache');

	$this->RegisterDefaultBuildEvents();
	}

	/**
	* Returns module information. Searches module by requested field
	*
	* @param string $field
	* @param mixed $value
	* @param string $return_field 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 ( strtolower($module_info[$field]) == strtolower($value) ) {
	$found = true;
	break;
	}
	}

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

	return false;
	}

	/**
	* Refreshes information about loaded modules
	*
	* @return void
	* @access public
	*/
	public function refreshModuleInfo()
	{
	if (defined('IS_INSTALL') && IS_INSTALL && !$this->TableFound('Modules')) {
	$this->registerModuleConstants();
	return ;
	}

	// use makeClass over recallObject, since used before kApplication initialization during installation
	$modules_helper =& $this->makeClass('ModulesHelper');
	/* @var $modules_helper kModulesHelper */

	$this->Conn->nextQueryCachable = true;
	$sql = 'SELECT *
	FROM ' . TABLE_PREFIX . 'Modules
	WHERE ' . $modules_helper->getWhereClause() . '
	ORDER BY LoadOrder';
	$this->ModuleInfo = $this->Conn->Query($sql, 'Name');

	$this->registerModuleConstants();
	}

	/**
	* Checks if passed language id if valid and sets it to primary otherwise
	*
	*/
	function VerifyLanguageId()
	{
	$language_id = $this->GetVar('m_lang');

	if (!$language_id) {
	$language_id = 'default';
	}

	$this->SetVar('lang.current_id', $language_id);
	$this->SetVar('m_lang', $language_id);

	$lang_mode = $this->GetVar('lang_mode');
	$this->SetVar('lang_mode', '');

	$lang =& $this->recallObject('lang.current');
	/* @var $lang kDBItem */

	if (!$lang->isLoaded() \|\| (!$this->isAdmin && !$lang->GetDBField('Enabled'))) {
	if (!defined('IS_INSTALL')) {
	$this->ApplicationDie('Unknown or disabled language');
	}
	}

	$this->SetVar('lang_mode',$lang_mode);
	}

	/**
	* Checks if passed theme id if valid and sets it to primary otherwise
	*
	*/
	function VerifyThemeId()
	{
	if ($this->isAdmin) {
	kUtil::safeDefine('THEMES_PATH', '/core/admin_templates');

	return;
	}

	$path = $this->GetFrontThemePath();

	if ($path === false) {
	$this->ApplicationDie('No Primary Theme Selected or Current Theme is Unknown or Disabled');
	}

	kUtil::safeDefine('THEMES_PATH', $path);
	}

	function GetFrontThemePath($force=0)
	{
	static $path = null;

	if ( !$force && isset($path) ) {
	return $path;
	}

	$theme_id = $this->GetVar('m_theme');
	if ( !$theme_id ) {
	// $theme_id = $this->GetDefaultThemeId(1); //1 to force front-end mode!
	$theme_id = 'default';
	}

	$this->SetVar('m_theme', $theme_id);
	$this->SetVar('theme.current_id', $theme_id); // KOSTJA: this is to fool theme' getPassedId
	$theme =& $this->recallObject('theme.current');
	/* @var $theme ThemeItem */

	if ( !$theme->isLoaded() \|\| !$theme->GetDBField('Enabled') ) {
	return false;
	}

	// assign & then return, since it's static variable
	$path = '/themes/' . $theme->GetDBField('Name');

	return $path;
	}

	function GetDefaultLanguageId($init = false)
	{
	$cache_key = 'primary_language_info[%LangSerial%]';
	$language_info = $this->getCache($cache_key);

	if ($language_info === false) {
	// cache primary language info first
	$table = $this->getUnitOption('lang', 'TableName');
	$id_field = $this->getUnitOption('lang', 'IDField');

	$this->Conn->nextQueryCachable = true;
	$sql = 'SELECT ' . $id_field . ', IF(AdminInterfaceLang, "Admin", "Front") AS LanguageKey
	FROM ' . $table . '
	WHERE (AdminInterfaceLang = 1 OR PrimaryLang = 1) AND (Enabled = 1)';
	$language_info = $this->Conn->GetCol($sql, 'LanguageKey');

	if ($language_info !== false) {
	$this->setCache($cache_key, $language_info);
	}
	}

	$language_key = ($this->isAdmin && $init) \|\| count($language_info) == 1 ? 'Admin' : 'Front';

	if (array_key_exists($language_key, $language_info) && $language_info[$language_key] > 0) {
	// get from cache
	return $language_info[$language_key];
	}

	$language_id = $language_info && array_key_exists($language_key, $language_info) ? $language_info[$language_key] : false;

	if (!$language_id && defined('IS_INSTALL') && IS_INSTALL) {
	$language_id = 1;
	}

	return $language_id;
	}

	function GetDefaultThemeId($force_front=0)
	{
	static $theme_id = 0;

	if ($theme_id > 0) {
	return $theme_id;
	}

	if (kUtil::constOn('DBG_FORCE_THEME')) {
	$theme_id = DBG_FORCE_THEME;
	}
	elseif (!$force_front && $this->isAdmin) {
	$theme_id = 999;
	}
	else {
	$cache_key = 'primary_theme[%ThemeSerial%]';
	$theme_id = $this->getCache($cache_key);

	if ($theme_id === false) {
	$this->Conn->nextQueryCachable = true;
	$sql = 'SELECT ' . $this->getUnitOption('theme', 'IDField') . '
	FROM ' . $this->getUnitOption('theme', 'TableName') . '
	WHERE (PrimaryTheme = 1) AND (Enabled = 1)';
	$theme_id = $this->Conn->GetOne($sql);

	if ($theme_id !== false) {
	$this->setCache($cache_key, $theme_id);
	}
	}
	}

	return $theme_id;
	}

	/**
	* Returns site primary currency ISO code
	*
	* @return string
	*/
	function GetPrimaryCurrency()
	{
	$cache_key = 'primary_currency[%CurrSerial%][%SiteDomainSerial%]:' . $this->siteDomainField('DomainId');
	$currency_iso = $this->getCache($cache_key);

	if ($currency_iso === false) {
	if ($this->isModuleEnabled('In-Commerce')) {
	$this->Conn->nextQueryCachable = true;
	$currency_id = $this->siteDomainField('PrimaryCurrencyId');

	$sql = 'SELECT ISO
	FROM ' . $this->getUnitOption('curr', 'TableName') . '
	WHERE ' . ($currency_id > 0 ? 'CurrencyId = ' . $currency_id : 'IsPrimary = 1');
	$currency_iso = $this->Conn->GetOne($sql);
	}
	else {
	$currency_iso = 'USD';
	}

	$this->setCache($cache_key, $currency_iso);
	}

	return $currency_iso;
	}

	/**
	* Returns site domain field. When none of site domains are found false is returned.
	*
	* @param string $field
	* @param bool $formatted
	* @param string $format
	*/
	function siteDomainField($field, $formatted = false, $format = null)
	{
	if ($this->isAdmin) {
	// don't apply any filtering in administrative console
	return false;
	}

	if (!$this->siteDomain) {
	$this->siteDomain =& $this->recallObject('site-domain.current');
	/* @var $site_domain kDBItem */
	}

	if ($this->siteDomain->isLoaded()) {
	return $formatted ? $this->siteDomain->GetField($field, $format) : $this->siteDomain->GetDBField($field);
	}

	return false;
	}

	/**
	* Registers default classes such as ItemController, GridController and LoginController
	*
	* Called automatically while initializing Application
	* @access private
	* @return void
	*/
	function RegisterDefaultClasses()
	{
	$this->registerClass('kHelper', KERNEL_PATH . '/kbase.php');
	$this->registerClass('kMultipleFilter', KERNEL_PATH . '/utility/filters.php');
	- $this->registerClass('kiCacheable', KERNEL_PATH . '/interfaces/cacheable.php', 'kiCacheable');
	+ $this->registerClass('kiCacheable', KERNEL_PATH . '/interfaces/cacheable.php');

	$this->registerClass('kEventManager', KERNEL_PATH . '/event_manager.php', 'EventManager', 'kiCacheable');
	$this->registerClass('kHookManager', KERNEL_PATH . '/managers/hook_manager.php', null, 'kiCacheable');
	$this->registerClass('kAgentManager', KERNEL_PATH . '/managers/agent_manager.php', null, 'kiCacheable');
	$this->registerClass('kRequestManager', KERNEL_PATH . '/managers/request_manager.php');
	+
	$this->registerClass('kUrlManager', KERNEL_PATH . '/managers/url_manager.php');
	+ $this->registerClass('kUrlProcessor', KERNEL_PATH . '/managers/url_processor.php');
	+ $this->registerClass('kPlainUrlProcessor', KERNEL_PATH . '/managers/plain_url_processor.php', null, 'kUrlProcessor');
	+ $this->registerClass('kRewriteUrlProcessor', KERNEL_PATH . '/managers/rewrite_url_processor.php', null, 'kUrlProcessor');
	+
	$this->registerClass('kCacheManager', KERNEL_PATH . '/managers/cache_manager.php', null, 'kiCacheable');
	$this->registerClass('PhrasesCache', KERNEL_PATH . '/languages/phrases_cache.php', 'kPhraseCache');
	$this->registerClass('kTempTablesHandler', KERNEL_PATH . '/utility/temp_handler.php');
	$this->registerClass('kValidator', KERNEL_PATH . '/utility/validator.php');
	$this->registerClass('kOpenerStack', KERNEL_PATH . '/utility/opener_stack.php');

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

	// Params class descendants
	$this->registerClass('kArray', KERNEL_PATH . '/utility/params.php');
	$this->registerClass('Params', KERNEL_PATH . '/utility/params.php');
	$this->registerClass('Params', KERNEL_PATH . '/utility/params.php', 'kActions');
	$this->registerClass('kCache', KERNEL_PATH . '/utility/cache.php', 'kCache', 'Params');
	$this->registerClass('kHTTPQuery', KERNEL_PATH . '/utility/http_query.php', 'HTTPQuery', 'Params');

	// session
	$this->registerClass('Session', KERNEL_PATH . '/session/session.php');
	$this->registerClass('SessionStorage', KERNEL_PATH . '/session/session_storage.php');
	$this->registerClass('InpSession', KERNEL_PATH . '/session/inp_session.php', 'Session');
	$this->registerClass('InpSessionStorage', KERNEL_PATH . '/session/inp_session_storage.php', 'SessionStorage');

	// template parser
	$this->registerClass('kTagProcessor', KERNEL_PATH . '/processors/tag_processor.php');
	$this->registerClass('kMainTagProcessor', KERNEL_PATH . '/processors/main_processor.php', 'm_TagProcessor', 'kTagProcessor');
	$this->registerClass('kDBTagProcessor', KERNEL_PATH . '/db/db_tag_processor.php', null, 'kTagProcessor');
	$this->registerClass('kCatDBTagProcessor', KERNEL_PATH . '/db/cat_tag_processor.php', null, 'kDBTagProcessor');
	$this->registerClass('NParser', KERNEL_PATH . '/nparser/nparser.php');
	$this->registerClass('TemplatesCache', KERNEL_PATH . '/nparser/template_cache.php', null, Array ('kHelper', 'kDBTagProcessor'));

	// database
	$this->registerClass('kDBConnection', KERNEL_PATH . '/db/db_connection.php');
	$this->registerClass('kDBLoadBalancer', KERNEL_PATH . '/db/db_load_balancer.php');
	$this->registerClass('kDBItem', KERNEL_PATH . '/db/dbitem.php');
	$this->registerClass('kCatDBItem', KERNEL_PATH . '/db/cat_dbitem.php', null, 'kDBItem');
	$this->registerClass('kDBList', KERNEL_PATH . '/db/dblist.php');
	$this->registerClass('kCatDBList', KERNEL_PATH . '/db/cat_dblist.php', null, 'kDBList');
	$this->registerClass('kDBEventHandler', KERNEL_PATH . '/db/db_event_handler.php');
	$this->registerClass('kCatDBEventHandler', KERNEL_PATH . '/db/cat_event_handler.php', null, 'kDBEventHandler');

	// email sending
	$this->registerClass('kEmailSendingHelper', KERNEL_PATH . '/utility/email_send.php', 'EmailSender', 'kHelper');
	$this->registerClass('kSocket', KERNEL_PATH . '/utility/socket.php', 'Socket');

	// do not move to config - this helper is used before configs are read
	$this->registerClass('kModulesHelper', KERNEL_PATH . self::MODULE_HELPER_PATH, 'ModulesHelper');
	}

	function RegisterDefaultBuildEvents()
	{
	$this->EventManager->registerBuildEvent('kTempTablesHandler', 'OnTempHandlerBuild');
	}

	/**
	* Returns cached category informaton by given cache name. All given category
	* information is recached, when at least one of 4 caches is missing.
	*
	* @param int $category_id
	* @param string $name cache name = {filenames, category_designs, category_tree}
	* @return string
	* @access public
	*/
	public function getCategoryCache($category_id, $name)
	{
	return $this->cacheManager->getCategoryCache($category_id, $name);
	}

	/**
	* Returns caching type (none, memory, temporary)
	*
	* @param int $caching_type
	* @return bool
	* @access public
	*/
	public function isCachingType($caching_type)
	{
	return $this->cacheManager->isCachingType($caching_type);
	}

	/**
	* Increments serial based on prefix and it's ID (optional)
	*
	* @param string $prefix
	* @param int $id ID (value of IDField) or ForeignKeyField:ID
	* @param bool $increment
	* @access public
	*/
	public function incrementCacheSerial($prefix, $id = null, $increment = true)
	{
	return $this->cacheManager->incrementCacheSerial($prefix, $id, $increment);
	}

	/**
	* Returns cached $key value from cache named $cache_name
	*
	* @param int $key key name from cache
	* @param bool $store_locally store data locally after retrieved
	* @param int $max_rebuild_seconds
	* @return mixed
	* @access public
	*/
	public function getCache($key, $store_locally = true, $max_rebuild_seconds = 0)
	{
	return $this->cacheManager->getCache($key, $store_locally, $max_rebuild_seconds);
	}

	/**
	* Adds new value to cache $cache_name and identified by key $key
	*
	* @param int $key key name to add to cache
	* @param mixed $value value of chached record
	* @param int $expiration when value expires (0 - doesn't expire)
	* @access public
	*/
	public function setCache($key, $value, $expiration = 0)
	{
	return $this->cacheManager->setCache($key, $value, $expiration);
	}

	/**
	* Sets rebuilding mode for given cache
	*
	* @param string $name
	* @param int $mode
	* @param int $max_rebuilding_time
	*/
	public function rebuildCache($name, $mode = null, $max_rebuilding_time = 0)
	{
	$this->cacheManager->rebuildCache($name, $mode, $max_rebuilding_time);
	}

	/**
	* Deletes key from cache
	*
	* @param string $key
	* @access public
	*/
	public function deleteCache($key)
	{
	$this->cacheManager->deleteCache($key);
	}

	/**
	* Reset's all memory cache at once
	*
	* @access public
	*/
	public function resetCache()
	{
	$this->cacheManager->resetCache();
	}

	/**
	* Returns value from database cache
	*
	* @param string $name key name
	* @param int $max_rebuild_seconds
	* @return mixed
	* @access public
	*/
	public function getDBCache($name, $max_rebuild_seconds = 0)
	{
	return $this->cacheManager->getDBCache($name, $max_rebuild_seconds);
	}

	/**
	* Sets value to database cache
	*
	* @param string $name
	* @param mixed $value
	* @param int\|bool $expiration
	* @access public
	*/
	public function setDBCache($name, $value, $expiration = false)
	{
	$this->cacheManager->setDBCache($name, $value, $expiration);
	}

	/**
	* Sets rebuilding mode for given cache
	*
	* @param string $name
	* @param int $mode
	* @param int $max_rebuilding_time
	*/
	public function rebuildDBCache($name, $mode = null, $max_rebuilding_time = 0)
	{
	$this->cacheManager->rebuildDBCache($name, $mode, $max_rebuilding_time);
	}

	/**
	* Deletes key from database cache
	*
	* @param string $name
	* @access public
	*/
	public function deleteDBCache($name)
	{
	$this->cacheManager->deleteDBCache($name);
	}

	/**
	* Registers each module specific constants if any found
	*
	* @return bool
	*/
	function registerModuleConstants()
	{
	if ( file_exists(KERNEL_PATH . '/constants.php') ) {
	kUtil::includeOnce(KERNEL_PATH . '/constants.php');
	}

	if ( !$this->ModuleInfo ) {
	return false;
	}

	foreach ($this->ModuleInfo as $module_info) {
	$constants_file = FULL_PATH . '/' . $module_info['Path'] . 'constants.php';

	if ( file_exists($constants_file) ) {
	kUtil::includeOnce($constants_file);
	}
	}

	return 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 ( defined('DEBUG_MODE') && $this->isDebugMode() && kUtil::constOn('DBG_PROFILE_MEMORY') ) {
	$this->Debugger->appendMemoryUsage('Application before Run:');
	}

	if ( $this->isAdminUser ) {
	// for permission checking in events & templates
	$this->LinkVar('module'); // for common configuration templates
	$this->LinkVar('module_key'); // for common search templates
	$this->LinkVar('section'); // for common configuration templates

	if ($this->GetVar('m_opener') == 'p') {
	$this->LinkVar('main_prefix'); // window prefix, that opened selector
	$this->LinkVar('dst_field'); // field to set value choosed in selector
	}

	if ($this->GetVar('ajax') == 'yes' && !$this->GetVar('debug_ajax')) {
	// hide debug output from ajax requests automatically
	kUtil::safeDefine('DBG_SKIP_REPORTING', 1); // safeDefine, because debugger also defines it
	}
	}
	elseif ( $this->GetVar('admin') ) {
	// viewing front-end through admin's frame
	$admin_session =& $this->recallObject('Session.admin');
	/* @var $admin_session Session */

	$user = (int)$admin_session->RecallVar('user_id'); // in case, when no valid admin session found

	$perm_helper =& $this->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	if ( $perm_helper->CheckUserPermission($user, 'CATEGORY.MODIFY', 0, $this->getBaseCategory()) ) {
	// user can edit cms blocks
	$editing_mode = $this->GetVar('editing_mode');
	define('EDITING_MODE', $editing_mode ? $editing_mode : EDITING_MODE_BROWSE);
	}
	}

	kUtil::safeDefine('EDITING_MODE', ''); // user can't edit anything
	$this->Phrases->setPhraseEditing();

	$this->EventManager->ProcessRequest();

	$this->InitParser();
	$t = $this->GetVar('t');

	if ( !$this->TemplatesCache->TemplateExists($t) && !$this->isAdmin ) {
	$cms_handler =& $this->recallObject('st_EventHandler');
	/* @var $cms_handler CategoriesEventHandler */

	$t = ltrim($cms_handler->GetDesignTemplate(), '/');

	if ( defined('DEBUG_MODE') && $this->isDebugMode() ) {
	$this->Debugger->appendHTML('<strong>Design Template</strong>: ' . $t . '; <strong>CategoryID</strong>: ' . $this->GetVar('m_cat_id'));
	}
	}
	/*else {
	$cms_handler->SetCatByTemplate();
	}*/

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

	$this->HTML = $this->Parser->Run($t);

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

	function InitParser($theme_name = false)
	{
	if( !is_object($this->Parser) ) {
	$this->Parser =& $this->recallObject('NParser');
	$this->TemplatesCache =& $this->recallObject('TemplatesCache');
	}

	$this->TemplatesCache->forceThemeName = $theme_name;
	}

	/**
	* 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()
	{
	$this->HandleEvent( new kEvent('adm:OnBeforeShutdown') );

	$debug_mode = defined('DEBUG_MODE') && $this->isDebugMode();

	if ($debug_mode && kUtil::constOn('DBG_PROFILE_MEMORY')) {
	$this->Debugger->appendMemoryUsage('Application before Done:');
	}

	if ($debug_mode) {
	$this->EventManager->runAgents(reAFTER);
	$this->Session->SaveData();

	if (kUtil::constOn('DBG_CACHE')) {
	$this->cacheManager->printStatistics();
	}

	$this->HTML = ob_get_clean() . $this->HTML . $this->Debugger->printReport(true);
	}
	else {
	// send "Set-Cookie" header before any output is made
	$this->Session->SetSession();

	$this->HTML = ob_get_clean() . $this->HTML;
	}

	if ($this->UseOutputCompression()) {
	$compression_level = $this->ConfigValue('OutputCompressionLevel');

	if (!$compression_level \|\| $compression_level < 0 \|\| $compression_level > 9) {
	$compression_level = 7;
	}

	header('Content-Encoding: gzip');
	echo gzencode($this->HTML, $compression_level);
	}
	else {
	echo $this->HTML;
	}

	$this->cacheManager->UpdateApplicationCache();
	flush();

	if (!$debug_mode) {
	$this->EventManager->runAgents(reAFTER);
	$this->Session->SaveData();
	}

	if (defined('DBG_CAPTURE_STATISTICS') && DBG_CAPTURE_STATISTICS && !$this->isAdmin) {
	$this->_storeStatistics();
	}
	}

	/**
	* Stores script execution statistics to database
	*
	*/
	function _storeStatistics()
	{
	global $start;

	$script_time = microtime(true) - $start;
	$query_statistics = $this->Conn->getQueryStatistics(); // time & count

	$sql = 'SELECT *
	FROM ' . TABLE_PREFIX . 'StatisticsCapture
	WHERE TemplateName = ' . $this->Conn->qstr( $this->GetVar('t') );
	$data = $this->Conn->GetRow($sql);

	if ($data) {
	$this->_updateAverageStatistics($data, 'ScriptTime', $script_time);
	$this->_updateAverageStatistics($data, 'SqlTime', $query_statistics['time']);
	$this->_updateAverageStatistics($data, 'SqlCount', $query_statistics['count']);

	$data['Hits']++;
	$data['LastHit'] = adodb_mktime();

	$this->Conn->doUpdate($data, TABLE_PREFIX . 'StatisticsCapture', 'StatisticsId = ' . $data['StatisticsId']);
	}
	else {
	$data['ScriptTimeMin'] = $data['ScriptTimeAvg'] = $data['ScriptTimeMax'] = $script_time;
	$data['SqlTimeMin'] = $data['SqlTimeAvg'] = $data['SqlTimeMax'] = $query_statistics['time'];
	$data['SqlCountMin'] = $data['SqlCountAvg'] = $data['SqlCountMax'] = $query_statistics['count'];
	$data['TemplateName'] = $this->GetVar('t');
	$data['Hits'] = 1;
	$data['LastHit'] = adodb_mktime();
	$this->Conn->doInsert($data, TABLE_PREFIX . 'StatisticsCapture');
	}
	}

	/**
	* Calculates average time for statistics
	*
	* @param Array $data
	* @param string $field_prefix
	* @param float $current_value
	*/
	function _updateAverageStatistics(&$data, $field_prefix, $current_value)
	{
	$data[$field_prefix . 'Avg'] = (($data['Hits'] * $data[$field_prefix . 'Avg']) + $current_value) / ($data['Hits'] + 1);

	if ($current_value < $data[$field_prefix . 'Min']) {
	$data[$field_prefix . 'Min'] = $current_value;
	}

	if ($current_value > $data[$field_prefix . 'Max']) {
	$data[$field_prefix . 'Max'] = $current_value;
	}
	}

	function logSlowQuery($slow_sql, $time)
	{
	$query_crc = crc32($slow_sql);

	$sql = 'SELECT *
	FROM ' . TABLE_PREFIX . 'SlowSqlCapture
	WHERE QueryCrc = ' . $query_crc;
	$data = $this->Conn->Query($sql, null, true);

	if ($data) {
	$this->_updateAverageStatistics($data, 'Time', $time);

	$template_names = explode(',', $data['TemplateNames']);
	array_push($template_names, $this->GetVar('t'));
	$data['TemplateNames'] = implode(',', array_unique($template_names));

	$data['Hits']++;
	$data['LastHit'] = adodb_mktime();

	$this->Conn->doUpdate($data, TABLE_PREFIX . 'SlowSqlCapture', 'CaptureId = ' . $data['CaptureId']);
	}
	else {
	$data['TimeMin'] = $data['TimeAvg'] = $data['TimeMax'] = $time;
	$data['SqlQuery'] = $slow_sql;
	$data['QueryCrc'] = $query_crc;
	$data['TemplateNames'] = $this->GetVar('t');
	$data['Hits'] = 1;
	$data['LastHit'] = adodb_mktime();

	$this->Conn->doInsert($data, TABLE_PREFIX . 'SlowSqlCapture');
	}
	}

	/**
	* Checks if output compression options is available
	*
	* @return string
	*/
	function UseOutputCompression()
	{
	if (kUtil::constOn('IS_INSTALL') \|\| kUtil::constOn('DBG_ZEND_PRESENT') \|\| kUtil::constOn('SKIP_OUT_COMPRESSION')) {
	return false;
	}

	return $this->ConfigValue('UseOutputCompression') && function_exists('gzencode') && strstr($_SERVER['HTTP_ACCEPT_ENCODING'], 'gzip');
	}

	// Facade

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

	return $session->GetID();
	}

	function DestroySession()
	{
	$session =& $this->recallObject('Session');
	/* @var $session Session */

	$session->Destroy();
	}

	/**
	* Returns variable passed to the script as GET/POST/COOKIE
	*
	* @param string $name Name of variable to retrieve
	* @param mixed $default default value returned in case if variable not present
	*
	* @return mixed
	* @access public
	*/
	public function GetVar($name, $default = false)
	{
	return isset($this->HttpQuery->_Params[$name]) ? $this->HttpQuery->_Params[$name] : $default;
	}

	/**
	+ * Returns variable passed to the script as $type
	+ *
	+ * @param string $name Name of variable to retrieve
	+ * @param string $type Get/Post/Cookie
	+ * @param mixed $default default value returned in case if variable not present
	+ *
	+ * @return mixed
	+ * @access public
	+ */
	+ public function GetVarDirect($name, $type, $default = false)
	+ {
	+// $type = ucfirst($type);
	+
	+ return isset($this->HttpQuery->$type[$name]) ? $this->HttpQuery->$type[$name] : $default;
	+ }
	+
	+ /**
	* Returns ALL variables passed to the script as GET/POST/COOKIE
	*
	* @access public
	* @return array
	*/
	function GetVars()
	{
	return $this->HttpQuery->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
	*/
	public function SetVar($var,$val)
	{
	$this->HttpQuery->Set($var, $val);
	}

	/**
	* Deletes kHTTPQuery variable
	*
	* @param string $var
	* @todo think about method name
	*/
	function DeleteVar($var)
	{
	return $this->HttpQuery->Remove($var);
	}

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

	function RemovePersistentVar($var)
	{
	return $this->Session->RemovePersistentVar($var);
	}

	/**
	* Restores Session variable to it's db version
	*
	* @param string $var
	*/
	function RestoreVar($var)
	{
	return $this->Session->RestoreVar($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)
	{
	return $this->Session->RecallVar($var,$default);
	}

	function RecallPersistentVar($var, $default = false)
	{
	return $this->Session->RecallPersistentVar($var, $default);
	}

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

	function StorePersistentVar($var, $val, $optional = false)
	{
	$this->Session->StorePersistentVar($var, $val, $optional);
	}

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

	/**
	* 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
	* @param bool $optional
	*/
	function LinkVar($var, $ses_var = null, $default = '', $optional = false)
	{
	if (!isset($ses_var)) $ses_var = $var;
	if ($this->GetVar($var) !== false) {
	$this->StoreVar($ses_var, $this->GetVar($var), $optional);
	}
	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 ProcessParsedTag($prefix, $tag, $params)
	{
	$processor = $this->Parser->GetProcessor($prefix);
	/* @var $processor kDBTagProcessor */

	return $processor->ProcessParsedTag($tag, $params, $prefix);
	}

	/**
	* 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->Conn;
	}

	/**
	* Allows to parse given block name or include template
	*
	* @param Array $params Parameters to pass to block. Reserved parameter "name" used to specify block name.
	* @param bool $pass_params Forces to pass current parser params to this block/template. Use with caution, because you can accidentally pass "block_no_data" parameter.
	* @param bool $as_template
	* @return string
	*/
	function ParseBlock($params, $pass_params = false, $as_template = false)
	{
	if (substr($params['name'], 0, 5) == 'html:') {
	return substr($params['name'], 5);
	}

	return $this->Parser->ParseBlock($params, $pass_params, $as_template);
	}

	/**
	* Checks, that we have given block defined
	*
	* @param string $name
	* @return bool
	*/
	function ParserBlockFound($name)
	{
	return $this->Parser->blockFound($name);
	}

	/**
	* Allows to include template with a given name and given parameters
	*
	* @param Array $params Parameters to pass to template. Reserved parameter "name" used to specify template name.
	* @return string
	*/
	function IncludeTemplate($params)
	{
	return $this->Parser->IncludeTemplate($params, isset($params['is_silent']) ? 1 : 0);
	}

	/**
	* Return href for template
	*
	* @param string $t Template path
	* @param string $prefix index.php prefix - could be blank, 'admin'
	* @param Array $params
	* @param string $index_file
	* @return string
	*/
	public function HREF($t, $prefix = '', $params = null, $index_file = null)
	{
	return $this->UrlManager->HREF($t, $prefix, $params, $index_file);
	}

	/**
	* Returns theme template filename and it's corresponding page_id based on given seo template
	*
	* @param string $seo_template
	* @return string
	* @access public
	*/
	public function getPhysicalTemplate($seo_template)
	{
	return $this->UrlManager->getPhysicalTemplate($seo_template);
	}

	/**
	* Returns template name, that corresponds with given virtual (not physical) page id
	*
	* @param int $page_id
	* @return string\|bool
	* @access public
	*/
	public function getVirtualPageTemplate($page_id)
	{
	return $this->UrlManager->getVirtualPageTemplate($page_id);
	}

	/**
	* Returns variables with values that should be passed through with this link + variable list
	*
	* @param Array $params
	* @return Array
	*/
	function getPassThroughVariables(&$params)
	{
	return $this->UrlManager->getPassThroughVariables($params);
	}

	- function BuildEnv($t, $params, $pass = 'all', $pass_events = false, $env_var = true)
	+ public function BuildEnv($t, $params, $pass = 'all', $pass_events = false, $env_var = true)
	{
	- return $this->UrlManager->BuildEnv($t, $params, $pass, $pass_events, $env_var);
	+ return $this->UrlManager->plain->build($t, $params, $pass, $pass_events, $env_var);
	+ }
	+
	+ /**
	+ * Process QueryString only, create
	+ * events, ids, based on config
	+ * set template name and sid in
	+ * desired application variables.
	+ *
	+ * @param string $env_var environment string value
	+ * @param string $pass_name
	+ * @return Array
	+ * @access public
	+ */
	+ public function processQueryString($env_var, $pass_name = 'passed')
	+ {
	+ return $this->UrlManager->plain->parse($env_var, $pass_name);
	}

	function BaseURL($prefix = '', $ssl = null, $add_port = true)
	{
	if ($ssl === null) {
	// stay on same encryption level
	return PROTOCOL . SERVER_NAME . ($add_port && defined('PORT') ? ':' . PORT : '') . BASE_PATH . $prefix . '/';
	}

	if ($ssl) {
	// going from http:// to https://
	$base_url = $this->isAdmin ? $this->ConfigValue('AdminSSL_URL') : false;

	if (!$base_url) {
	$ssl_url = $this->siteDomainField('SSLUrl');
	$base_url = $ssl_url !== false ? $ssl_url : $this->ConfigValue('SSL_URL');
	}

	return rtrim($base_url, '/') . $prefix . '/';
	}

	// going from https:// to http://
	$domain = $this->siteDomainField('DomainName');

	if ($domain === false) {
	$domain = DOMAIN;
	}

	return 'http://' . $domain . ($add_port && defined('PORT') ? ':' . PORT : '') . BASE_PATH . $prefix . '/';
	}

	function Redirect($t = '', $params = Array(), $prefix = '', $index_file = null)
	{
	$js_redirect = getArrayValue($params, 'js_redirect');

	if ($t == '' \|\| $t === true) {
	$t = $this->GetVar('t');
	}

	// pass prefixes and special from previous url
	if (array_key_exists('js_redirect', $params)) {
	unset($params['js_redirect']);
	}

	// allows to send custom responce code along with redirect header
	if (array_key_exists('response_code', $params)) {
	$response_code = (int)$params['response_code'];
	unset($params['response_code']);
	}
	else {
	$response_code = 302; // Found
	}

	if (!array_key_exists('pass', $params)) {
	$params['pass'] = 'all';
	}

	if ($this->GetVar('ajax') == 'yes' && $t == $this->GetVar('t')) {
	// redirects to the same template as current
	$params['ajax'] = 'yes';
	}

	$params['__URLENCODE__'] = 1;
	$location = $this->HREF($t, $prefix, $params, $index_file);

	if ($this->isDebugMode() && (kUtil::constOn('DBG_REDIRECT') \|\| (kUtil::constOn('DBG_RAISE_ON_WARNINGS') && $this->Debugger->WarningCount))) {
	$this->Debugger->appendTrace();
	echo '<strong>Debug output above !!!</strong><br/>' . "\n";

	if ( array_key_exists('HTTP_REFERER', $_SERVER) ) {
	echo 'Referer: <strong>' . $_SERVER['HTTP_REFERER'] . '</strong><br/>' . "\n";
	}

	echo "Proceed to redirect: <a href=\"{$location}\">{$location}</a><br/>\n";
	}
	else {
	if ($js_redirect) {
	// show "redirect" template instead of redirecting,
	// because "Set-Cookie" header won't work, when "Location"
	// header is used later
	$this->SetVar('t', 'redirect');
	$this->SetVar('redirect_to', $location);

	// make all additional parameters available on "redirect" template too
	foreach ($params as $name => $value) {
	$this->SetVar($name, $value);
	}

	return true;
	}
	else {
	if ($this->GetVar('ajax') == 'yes' && $t != $this->GetVar('t')) {
	// redirection to other then current template during ajax request
	kUtil::safeDefine('DBG_SKIP_REPORTING', 1);
	echo '#redirect#' . $location;
	}
	elseif (headers_sent() != '') {
	// some output occured -> redirect using javascript
	echo '<script type="text/javascript">window.location.href = \'' . $location . '\';</script>';
	}
	else {
	// no output before -> redirect using HTTP header

	// header('HTTP/1.1 302 Found');
	header('Location: ' . $location, true, $response_code);
	}
	}
	}

	// session expiration is called from session initialization,
	// that's why $this->Session may be not defined here
	$session =& $this->recallObject('Session');
	/* @var $session Session */

	$this->HandleEvent( new kEvent('adm:OnBeforeShutdown') );
	$session->SaveData();

	ob_end_flush();
	exit;
	}

	function Phrase($label, $allow_editing = true, $use_admin = false)
	{
	return $this->Phrases->GetPhrase($label, $allow_editing, $use_admin);
	}

	/**
	* 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)
	{
	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.current" prefix_special. Also you may
	* get user id by getting "u.current_id" variable.
	*
	* @access private
	*/
	function ValidateLogin()
	{
	$session =& $this->recallObject('Session');
	/* @var $session Session */

	$user_id = $session->GetField('PortalUserId');

	if ( !$user_id && $user_id != USER_ROOT ) {
	$user_id = USER_GUEST;
	}

	$this->SetVar('u.current_id', $user_id);

	if ( !$this->isAdmin ) {
	// needed for "profile edit", "registration" forms ON FRONT ONLY
	$this->SetVar('u_id', $user_id);
	}

	$this->StoreVar('user_id', $user_id, $user_id == USER_GUEST); // storing Guest user_id (-2) is optional

	$this->isAdminUser = $this->isAdmin && $this->LoggedIn();

	if ( $this->GetVar('expired') == 1 ) {
	// this parameter is set only from admin
	$user =& $this->recallObject('u.login-admin', null, Array ('form_name' => 'login'));
	/* @var $user UsersItem */

	$user->SetError('UserLogin', 'session_expired', 'la_text_sess_expired');
	}

	if ( ($user_id != USER_GUEST) && defined('DBG_REQUREST_LOG') && DBG_REQUREST_LOG ) {
	$this->HttpQuery->writeRequestLog(DBG_REQUREST_LOG);
	}

	if ( $user_id != USER_GUEST ) {
	// normal users + root
	$this->LoadPersistentVars();
	}
	}

	/**
	* Loads current user persistent session data
	*
	*/
	function LoadPersistentVars()
	{
	$this->Session->LoadPersistentVars();
	}

	/**
	* Returns configuration option value by name
	*
	* @param string $name
	* @return string
	*/
	function ConfigValue($name)
	{
	return $this->cacheManager->ConfigValue($name);
	}

	function SetConfigValue($name, $value)
	{
	return $this->cacheManager->SetConfigValue($name, $value);
	}

	/**
	* Allows to process any type of event
	*
	* @param kEvent $event
	* @param Array $params
	* @param Array $specific_params
	* @access public
	* @author Alex
	*/
	function HandleEvent(&$event, $params = null, $specific_params = null)
	{
	if ( isset($params) ) {
	$event = new kEvent($params, $specific_params);
	}

	$this->EventManager->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);
	}

	/**
	* Unregisters existing class from factory
	*
	* @param string $real_class Real name of class as in class declaration
	* @param string $pseudo_class Name under this class object is accessed using getObject method
	*/
	function unregisterClass($real_class, $pseudo_class = null)
	{
	$this->Factory->unregisterClass($real_class, $pseudo_class);
	}

	/**
	* 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);
	}

	/**
	* Add new agent
	*
	* @param string $short_name name to be used to store last maintenace run info
	* @param string $event_name
	* @param int $run_interval run interval in seconds
	* @param int $type before or after agent
	* @param int $status
	* @access public
	*/
	public function registerAgent($short_name, $event_name, $run_interval, $type = reBEFORE, $status = STATUS_ACTIVE)
	{
	$this->EventManager->registerAgent($short_name, $event_name, $run_interval, $type, $status);
	}

	/**
	* Registers Hook from subprefix event to master prefix event
	*
	* Pattern: Observer
	*
	* @param string $hook_event
	* @param string $do_event
	* @param int $mode
	* @param bool $conditional
	* @access public
	*/
	public function registerHook($hook_event, $do_event, $mode = hAFTER, $conditional = false)
	{
	$this->EventManager->registerHook($hook_event, $do_event, $mode, $conditional);
	}

	/**
	* Registers build event for given pseudo class
	*
	* @param string $pseudo_class
	* @param string $event_name
	* @access public
	*/
	public function registerBuildEvent($pseudo_class, $event_name)
	{
	$this->EventManager->registerBuildEvent($pseudo_class, $event_name);
	}

	/**
	* Allows one TagProcessor tag act as other TagProcessor tag
	*
	* @param Array $tag_info
	* @author Kostja
	*/
	function registerAggregateTag($tag_info)
	{
	$aggregator =& $this->recallObject('TagsAggregator', 'kArray');
	/* @var $aggregator kArray */

	$tag_data = Array(
	$tag_info['LocalPrefix'],
	$tag_info['LocalTagName'],
	getArrayValue($tag_info, 'LocalSpecial')
	);

	$aggregator->SetArrayValue($tag_info['AggregateTo'], $tag_info['AggregatedTagName'], $tag_data);
	}

	/**
	* Returns object using params specified, creates it if is required
	*
	* @param string $name
	* @param string $pseudo_class
	* @param Array $event_params
	* @param Array $arguments
	* @return kBase
	*/
	public function &recallObject($name, $pseudo_class = null, $event_params = Array(), $arguments = Array ())
	{
	/*if ( !$this->hasObject($name) && $this->isDebugMode() && ($name == '_prefix_here_') ) {
	// first time, when object with "_prefix_here_" prefix is accessed
	$this->Debugger->appendTrace();
	}*/

	$result =& $this->Factory->getObject($name, $pseudo_class, $event_params, $arguments);

	return $result;
	}

	/**
	* Returns tag processor for prefix specified
	*
	* @param string $prefix
	* @return kDBTagProcessor
	*/
	function &recallTagProcessor($prefix)
	{
	$this->InitParser(); // because kDBTagProcesor is in NParser dependencies
	$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
	*/
	public function removeObject($name)
	{
	$this->Factory->DestroyObject($name);
	}

	/**
	* Get's real class name for pseudo class, includes class file and creates class instance
	*
	* Pattern: Factory Method
	*
	* @param string $pseudo_class
	* @param Array $arguments
	* @return kBase
	* @access public
	*/
	public function &makeClass($pseudo_class, $arguments = Array ())
	{
	$result =& $this->Factory->makeClass($pseudo_class, $arguments);

	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
	*/
	public function isDebugMode($check_debugger = true)
	{
	$debug_mode = defined('DEBUG_MODE') && DEBUG_MODE;
	if ($check_debugger) {
	$debug_mode = $debug_mode && is_object($this->Debugger);
	}
	return $debug_mode;
	}

	/**
	* Apply url rewriting used by mod_rewrite or not
	*
	* @param bool\|null $ssl Force ssl link to be build
	* @return bool
	*/
	function RewriteURLs($ssl = false)
	{
	// case #1,#4:
	// we want to create https link from http mode
	// we want to create https link from https mode
	// conditions: ($ssl \|\| PROTOCOL == 'https://') && $this->ConfigValue('UseModRewriteWithSSL')

	// case #2,#3:
	// we want to create http link from https mode
	// we want to create http link from http mode
	// conditions: !$ssl && (PROTOCOL == 'https://' \|\| PROTOCOL == 'http://')

	$allow_rewriting =
	(!$ssl && (PROTOCOL == 'https://' \|\| 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 kUtil::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
	*/
	public function getUnitOption($prefix, $option, $default = false)
	{
	return $this->UnitConfigReader->getUnitOption($prefix, $option, $default);
	}

	/**
	* Set's new unit option value
	*
	* @param string $prefix
	* @param string $option
	* @param string $value
	* @access public
	*/
	public function setUnitOption($prefix, $option, $value)
	{
	$this->UnitConfigReader->setUnitOption($prefix,$option,$value);
	}

	/**
	* Read all unit with $prefix options
	*
	* @param string $prefix
	* @return Array
	* @access public
	*/
	public function getUnitOptions($prefix)
	{
	return $this->UnitConfigReader->getUnitOptions($prefix);
	}

	/**
	* Returns true if config exists and is allowed for reading
	*
	* @param string $prefix
	* @return bool
	*/
	public function prefixRegistred($prefix)
	{
	return $this->UnitConfigReader->prefixRegistred($prefix);
	}

	/**
	* Splits any mixing of prefix and
	* special into correct ones
	*
	* @param string $prefix_special
	* @return Array
	* @access public
	*/
	public 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)
	{
	$this->EventManager->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) ) {
	$long_error_msg = '<span class="debug_error">' . $msg . ' (' . $code . ')</span><br/><a href="javascript:$Debugger.SetClipboard(\'' . htmlspecialchars($sql) . '\');"><strong>SQL</strong></a>: ' . $this->Debugger->formatSQL($sql);
	$long_id = $this->Debugger->mapLongError($long_error_msg);
	$error_msg = mb_substr($msg . ' (' . $code . ') [' . $sql . ']', 0, 1000) . ' #' . $long_id;

	if ( kUtil::constOn('DBG_SQL_FAILURE') && !defined('IS_INSTALL') ) {
	throw new Exception($error_msg);
	}
	else {
	$this->Debugger->appendTrace();
	}
	}
	else {
	// when not debug mode, then fatal database query won't break anything
	$error_msg = '<strong>SQL Error</strong> in sql: ' . $sql . ', code <strong>' . $code . '</strong> (' . $msg . ')';
	}

	trigger_error($error_msg, E_USER_WARNING);

	return true;
	}

	/**
	* Default error handler
	*
	* @param int $errno
	* @param string $errstr
	* @param string $errfile
	* @param int $errline
	* @param Array $errcontext
	* @return bool
	* @access public
	*/
	public function handleError($errno, $errstr, $errfile = null, $errline = null, $errcontext = Array ())
	{
	$this->errorLogSilent($errno, $errstr, $errfile, $errline);

	$debug_mode = defined('DEBUG_MODE') && DEBUG_MODE;
	$skip_reporting = defined('DBG_SKIP_REPORTING') && DBG_SKIP_REPORTING;

	if ( !$this->errorHandlers \|\| ($debug_mode && $skip_reporting) ) {
	// when debugger absent OR it's present, but we actually can't see it's error report (e.g. during ajax request)
	if ( $errno == E_USER_ERROR ) {
	$this->errorDisplayFatal('<strong>Fatal Error: </strong>' . "{$errstr} in {$errfile} on line {$errline}");
	}

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

	$res = false;
	/* @var $handler Closure */

	foreach ($this->errorHandlers as $handler) {
	if ( is_array($handler) ) {
	$object =& $handler[0];
	$method = $handler[1];
	$res = $object->$method($errno, $errstr, $errfile, $errline, $errcontext);
	}
	else {
	$res = $handler($errno, $errstr, $errfile, $errline, $errcontext);
	}
	}

	return $res;
	}

	/**
	* Handles exception
	*
	* @param Exception $exception
	* @return bool
	* @access public
	*/
	public function handleException($exception)
	{
	// transform exception to regular error (no need to rewrite existing error handlers)
	$errno = $exception->getCode();
	$errstr = $exception->getMessage();
	$errfile = $exception->getFile();
	$errline = $exception->getLine();

	$this->errorLogSilent($errno, $errstr, $errfile, $errline);

	$debug_mode = defined('DEBUG_MODE') && DEBUG_MODE;
	$skip_reporting = defined('DBG_SKIP_REPORTING') && DBG_SKIP_REPORTING;

	if ( !$this->exceptionHandlers \|\| ($debug_mode && $skip_reporting) ) {
	// when debugger absent OR it's present, but we actually can't see it's error report (e.g. during ajax request)
	$this->errorDisplayFatal('<strong>' . get_class($exception) . ': </strong>' . "{$errstr} in {$errfile} on line {$errline}");

	if ( !$this->exceptionHandlers ) {
	return true;
	}
	}

	$res = false;
	/* @var $handler Closure */

	foreach ($this->exceptionHandlers as $handler) {
	if ( is_array($handler) ) {
	$object =& $handler[0];
	$method = $handler[1];
	$res = $object->$method($exception);
	}
	else {
	$res = $handler($exception);
	}
	}

	return $res;
	}

	/**
	* Silently saves each given error message to "silent_log.txt" file, when silent log mode is enabled
	* @param int $errno
	* @param string $errstr
	* @param string $errfile
	* @param int $errline
	* @return void
	* @access protected
	*/
	protected function errorLogSilent($errno, $errstr = '', $errfile = '', $errline = null)
	{
	if ( !defined('SILENT_LOG') \|\| !SILENT_LOG ) {
	return;
	}

	if ( !(defined('DBG_IGNORE_STRICT_ERRORS') && DBG_IGNORE_STRICT_ERRORS && defined('E_STRICT') && ($errno == E_STRICT)) ) {
	$time = adodb_date('d/m/Y H:i:s');

	$fp = fopen((defined('RESTRICTED') ? RESTRICTED : FULL_PATH) . '/silent_log.txt', 'a');
	fwrite($fp, '[' . $time . '] #' . $errno . ': ' . strip_tags($errstr) . ' in [' . $errfile . '] on line ' . $errline . "\n");
	fclose($fp);
	}
	}

	/**
	* Displays div with given error message
	*
	* @param string $msg
	* @return void
	* @access protected
	*/
	protected function errorDisplayFatal($msg)
	{
	$margin = $this->isAdmin ? '8px' : 'auto';
	echo '<div style="background-color: #FEFFBF; margin: ' . $margin . '; padding: 10px; border: 2px solid red; text-align: center">' . $msg . '</div>';
	exit;
	}

	/**
	* Prints trace, when debug mode is not available
	*
	* @param bool $return_result
	* @param int $skip_levels
	* @return string
	* @access public
	*/
	public function printTrace($return_result = false, $skip_levels = 1)
	{
	$ret = Array ();
	$trace = debug_backtrace(false);

	for ($i = 0; $i < $skip_levels; $i++) {
	array_shift($trace);
	}

	foreach ($trace as $level => $trace_info) {
	if ( isset($trace_info['class']) ) {
	$object = $trace_info['class'];
	}
	elseif ( isset($trace_info['object']) ) {
	$object = get_class($trace_info['object']);
	}
	else {
	$object = '';
	}

	$args = '';
	$type = isset($trace_info['type']) ? $trace_info['type'] : '';

	if ( isset($trace_info['args']) ) {
	foreach ($trace_info['args'] as $argument) {
	if ( is_object($argument) ) {
	$args .= get_class($argument) . ' instance, ';
	}
	else {
	$args .= is_array($argument) ? 'Array' : substr($argument, 0, 10) . ' ..., ';
	}
	}

	$args = substr($args, 0, -2);
	}

	$ret[] = '#' . $level . ' ' . $object . $type . $trace_info['function'] . '(' . $args . ') called at [' . $trace_info['file'] . ':' . $trace_info['line'] . ']';
	}

	if ( $return_result ) {
	return implode("\n", $ret);
	}

	echo implode("\n", $ret);

	return '';
	}

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

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

	/**
	* Returns genealogical main prefix for sub-table prefix passes
	* OR prefix, that has been found in REQUEST and some how is parent of passed sub-table prefix
	*
	* @param string $current_prefix
	* @param bool $real_top if set to true will return real topmost prefix, regardless of its id is passed or not
	* @return string
	* @access public
	*/
	function GetTopmostPrefix($current_prefix, $real_top = false)
	{
	// 1. get genealogical tree of $current_prefix
	$prefixes = Array ($current_prefix);
	while ( $parent_prefix = $this->getUnitOption($current_prefix, 'ParentPrefix') ) {
	if (!$this->prefixRegistred($parent_prefix)) {
	// stop searching, when parent prefix is not registered
	break;
	}

	$current_prefix = $parent_prefix;
	array_unshift($prefixes, $current_prefix);
	}

	if ($real_top) {
	return $current_prefix;
	}

	// 2. find what if parent is passed
	$passed = explode(',', $this->GetVar('all_passed'));
	foreach ($prefixes as $a_prefix) {
	if (in_array($a_prefix, $passed)) {
	return $a_prefix;
	}
	}

	return $current_prefix;
	}

	/**
	* Triggers email event of type Admin
	*
	* @param string $email_event_name
	* @param int $to_user_id
	* @param array $send_params associative array of direct send params, possible keys: to_email, to_name, from_email, from_name, message, message_text
	* @return kEvent
	*/
	function &EmailEventAdmin($email_event_name, $to_user_id = null, $send_params = Array ())
	{
	$event =& $this->EmailEvent($email_event_name, EmailEvent::EVENT_TYPE_ADMIN, $to_user_id, $send_params);

	return $event;
	}

	/**
	* Triggers email event of type User
	*
	* @param string $email_event_name
	* @param int $to_user_id
	* @param array $send_params associative array of direct send params, possible keys: to_email, to_name, from_email, from_name, message, message_text
	* @return kEvent
	*/
	function &EmailEventUser($email_event_name, $to_user_id = null, $send_params = Array ())
	{
	$event =& $this->EmailEvent($email_event_name, EmailEvent::EVENT_TYPE_FRONTEND, $to_user_id, $send_params);

	return $event;
	}

	/**
	* Triggers general email event
	*
	* @param string $email_event_name
	* @param int $email_event_type (0 for User, 1 for Admin)
	* @param int $to_user_id
	* @param array $send_params associative array of direct send params,
	* possible keys: to_email, to_name, from_email, from_name, message, message_text
	* @return kEvent
	*/
	function &EmailEvent($email_event_name, $email_event_type, $to_user_id = null, $send_params = Array ())
	{
	$params = Array (
	'EmailEventName' => $email_event_name,
	'EmailEventToUserId' => $to_user_id,
	'EmailEventType' => $email_event_type,
	'DirectSendParams' => $send_params,
	);

	if (array_key_exists('use_special', $send_params)) {
	$event_str = 'emailevents.' . $send_params['use_special'] . ':OnEmailEvent';
	}
	else {
	$event_str = 'emailevents:OnEmailEvent';
	}

	$this->HandleEvent($event, $event_str, $params);

	return $event;
	}

	/**
	* Allows to check if user in this session is logged in or not
	*
	* @return bool
	*/
	function LoggedIn()
	{
	// no session during expiration process
	return is_null($this->Session) ? false : $this->Session->LoggedIn();
	}

	/**
	* Check current user permissions based on it's group permissions in specified category
	*
	* @param string $name permission name
	* @param int $cat_id category id, current used if not specified
	* @param int $type permission type {1 - system, 0 - per category}
	* @return int
	*/
	function CheckPermission($name, $type = 1, $cat_id = null)
	{
	$perm_helper =& $this->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	return $perm_helper->CheckPermission($name, $type, $cat_id);
	}

	/**
	* Set's any field of current visit
	*
	* @param string $field
	* @param mixed $value
	*/
	function setVisitField($field, $value)
	{
	if ($this->isAdmin \|\| !$this->ConfigValue('UseVisitorTracking')) {
	// admin logins are not registred in visits list
	return ;
	}

	$visit =& $this->recallObject('visits', null, Array ('raise_warnings' => 0));
	/* @var $visit kDBItem */

	if ($visit->isLoaded()) {
	$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);
	}

	/**
	* Allows to determine if module is installed & enabled
	*
	* @param string $module_name
	* @return bool
	*/
	function isModuleEnabled($module_name)
	{
	return $this->findModule('Name', $module_name) !== false;
	}

	/**
	* Returns Window ID of passed prefix main prefix (in edit mode)
	*
	* @param string $prefix
	* @return mixed
	*/
	function GetTopmostWid($prefix)
	{
	$top_prefix = $this->GetTopmostPrefix($prefix);
	$mode = $this->GetVar($top_prefix.'_mode');
	return $mode != '' ? substr($mode, 1) : '';
	}

	/**
	* Get temp table name
	*
	* @param string $table
	* @param mixed $wid
	* @return string
	*/
	function GetTempName($table, $wid = '')
	{
	return $this->GetTempTablePrefix($wid) . $table;
	}

	function GetTempTablePrefix($wid = '')
	{
	if (preg_match('/prefix:(.*)/', $wid, $regs)) {
	$wid = $this->GetTopmostWid($regs[1]);
	}

	return TABLE_PREFIX . 'ses_' . $this->GetSID() . ($wid ? '_' . $wid : '') . '_edit_';
	}

	function IsTempTable($table)
	{
	static $cache = Array ();

	if ( !array_key_exists($table, $cache) ) {
	$cache[$table] = preg_match('/'.TABLE_PREFIX.'ses_'.$this->GetSID().'(_[\d]+){0,1}_edit_(.*)/',$table);
	}

	return (bool)$cache[$table];
	}

	/**
	* Checks, that given prefix is in temp mode
	*
	* @param string $prefix
	* @param string $special
	* @return bool
	*/
	function IsTempMode($prefix, $special = '')
	{
	$top_prefix = $this->GetTopmostPrefix($prefix);

	$var_names = Array (
	$top_prefix,
	rtrim($top_prefix . '_' . $special, '_'), // from post
	rtrim($top_prefix . '.' . $special, '.'), // assembled locally
	);

	$var_names = array_unique($var_names);

	$temp_mode = false;
	foreach ($var_names as $var_name) {
	$value = $this->GetVar($var_name . '_mode');
	if ($value && (substr($value, 0, 1) == 't')) {
	$temp_mode = true;
	break;
	}
	}

	return $temp_mode;
	}

	/**
	* Return live table name based on temp table name
	*
	* @param string $temp_table
	* @return string
	*/
	function GetLiveName($temp_table)
	{
	if( preg_match('/'.TABLE_PREFIX.'ses_'.$this->GetSID().'(_[\d]+){0,1}_edit_(.*)/',$temp_table, $rets) )
	{
	// cut wid from table end if any
	return $rets[2];
	}
	else
	{
	return $temp_table;
	}
	}

	function CheckProcessors($processors)
	{
	foreach ($processors as $a_processor)
	{
	if (!isset($this->CachedProcessors[$a_processor])) {
	$this->CachedProcessors[$a_processor] =& $this->recallObject($a_processor.'_TagProcessor');
	}
	}
	}

	function ApplicationDie($message = '')
	{
	$message = ob_get_clean().$message;
	if ($this->isDebugMode()) {
	$message .= $this->Debugger->printReport(true);
	}

	echo $this->UseOutputCompression() ? gzencode($message, DBG_COMPRESSION_LEVEL) : $message;
	exit;
	}


	/* moved from MyApplication */

	function getUserGroups($user_id)
	{
	switch ($user_id) {
	case USER_ROOT:
	$user_groups = $this->ConfigValue('User_LoggedInGroup');
	break;

	case USER_GUEST:
	$user_groups = $this->ConfigValue('User_LoggedInGroup') . ',' . $this->ConfigValue('User_GuestGroup');
	break;

	default:
	$sql = 'SELECT GroupId
	FROM ' . TABLE_PREFIX . 'UserGroup
	WHERE PortalUserId = ' . (int)$user_id;
	$res = $this->Conn->GetCol($sql);

	$user_groups = Array( $this->ConfigValue('User_LoggedInGroup') );
	if ($res) {
	$user_groups = array_merge($user_groups, $res);
	}

	$user_groups = implode(',', $user_groups);
	}

	return $user_groups;
	}


	/**
	* Allows to detect if page is browsed by spider (293 agents supported)
	*
	* @return bool
	*/
	function IsSpider()
	{
	static $is_spider = null;

	if (!isset($is_spider)) {
	$user_agent = trim($_SERVER['HTTP_USER_AGENT']);
	$robots = file(FULL_PATH.'/core/robots_list.txt');
	foreach ($robots as $robot_info) {
	$robot_info = explode("\t", $robot_info, 3);
	if ($user_agent == trim($robot_info[2])) {
	$is_spider = true;
	break;
	}
	}
	}

	return $is_spider;
	}

	/**
	* Allows to detect table's presense in database
	*
	* @param string $table_name
	* @return bool
	*/
	function TableFound($table_name)
	{
	return $this->Conn->TableFound($table_name);
	}

	/**
	* Returns counter value
	*
	* @param string $name counter name
	* @param Array $params counter parameters
	* @param string $query_name specify query name directly (don't generate from parmeters)
	* @param bool $multiple_results
	* @return mixed
	*/
	function getCounter($name, $params = Array (), $query_name = null, $multiple_results = false)
	{
	$count_helper =& $this->recallObject('CountHelper');
	/* @var $count_helper kCountHelper */

	return $count_helper->getCounter($name, $params, $query_name, $multiple_results);
	}

	/**
	* Resets counter, which are affected by one of specified tables
	*
	* @param string $tables comma separated tables list used in counting sqls
	* @return void
	* @access public
	*/
	public function resetCounters($tables)
	{
	if ( kUtil::constOn('IS_INSTALL') ) {
	return;
	}

	$count_helper =& $this->recallObject('CountHelper');
	/* @var $count_helper kCountHelper */

	$count_helper->resetCounters($tables);
	}

	/**
	* Sends XML header + optionally displays xml heading
	*
	* @param string\|bool $xml_version
	* @return string
	* @access public
	* @author Alex
	*/
	public function XMLHeader($xml_version = false)
	{
	$lang =& $this->recallObject('lang.current');
	/* @var $lang LanguagesItem */

	header('Content-type: text/xml; charset=' . $lang->GetDBField('Charset'));

	return $xml_version ? '<?xml version="' . $xml_version . '" encoding="' . $lang->GetDBField('Charset') . '"?>' : '';
	}

	/**
	* Returns category tree
	*
	* @param int $category_id
	* @return Array
	*/
	function getTreeIndex($category_id)
	{
	$tree_index = $this->getCategoryCache($category_id, 'category_tree');

	if ($tree_index) {
	$ret = Array ();
	list ($ret['TreeLeft'], $ret['TreeRight']) = explode(';', $tree_index);

	return $ret;
	}

	return false;
	}

	/**
	* Base category of all categories
	* Usually replaced category, with ID = 0 in category-related operations.
	*
	* @return int
	*/
	function getBaseCategory()
	{
	// same, what $this->findModule('Name', 'Core', 'RootCat') does
	// don't cache while IS_INSTALL, because of kInstallToolkit::createModuleCategory and upgrade

	return $this->ModuleInfo['Core']['RootCat'];
	}

	function DeleteUnitCache($include_sections = false)
	{
	$this->cacheManager->DeleteUnitCache($include_sections);
	}

	/**
	* Sets data from cache to object
	*
	* @param Array $data
	* @access public
	*/
	public function setFromCache(&$data)
	{
	$this->ReplacementTemplates = $data['Application.ReplacementTemplates'];
	$this->RewriteListeners = $data['Application.RewriteListeners'];
	$this->ModuleInfo = $data['Application.ModuleInfo'];
	}

	/**
	* Gets object data for caching
	* The following caches should be reset based on admin interaction (adjusting config, enabling modules etc)
	*
	* @access public
	* @return Array
	*/
	public function getToCache()
	{
	return Array (
	'Application.ReplacementTemplates' => $this->ReplacementTemplates,
	'Application.RewriteListeners' => $this->RewriteListeners,
	'Application.ModuleInfo' => $this->ModuleInfo,
	);
	}

	public function delayUnitProcessing($method, $params)
	{
	$this->cacheManager->delayUnitProcessing($method, $params);
	}
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/managers/url_manager.php
	===================================================================
	--- branches/5.2.x/core/kernel/managers/url_manager.php (revision 14713)
	+++ branches/5.2.x/core/kernel/managers/url_manager.php (revision 14714)
	@@ -1,666 +1,439 @@
	<?php
	/**
	* @version $Id$
	* @package In-Portal
	* @copyright Copyright (C) 1997 - 2010 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 kUrlManager extends kBase {

	/**
	+ * Processor of plain urls (initialized always)
	+ *
	+ * @var kPlainUrlProcessor
	+ * @access public
	+ */
	+ public $plain = null;
	+
	+ /**
	+ * Processor of rewritten urls (initialized on demand only)
	+ *
	+ * @var kRewriteUrlProcessor
	+ * @access public
	+ */
	+ public $rewrite = null;
	+
	+ /**
	+ * Tells, that rewrite system is ready
	+ *
	+ * @var bool
	+ * @access protected
	+ */
	+ protected $rewriteReady = false;
	+
	+ /**
	* Physical template name mapping to their template names based on structure
	*
	* @var Array
	*/
	protected $structureTemplateMapping = Array ();

	/**
	+ * Creates instead of kUrlManager class
	+ */
	+ public function __construct()
	+ {
	+ parent::__construct();
	+
	+ // don't use kApplication::recallObject, since it will call kApplication::EventManager, which isn't ready yet
	+ $this->plain =& $this->Application->makeClass('kPlainUrlProcessor', Array (&$this));
	+ }
	+
	+ /**
	+ * Delay initialization of rewrite processor, since it uses site domains & http query
	+ *
	+ * @return void
	+ * @access public
	+ */
	+ public function initRewrite()
	+ {
	+ if ( $this->rewriteReady ) {
	+ return;
	+ }
	+
	+ $this->rewrite =& $this->Application->recallObject('kRewriteUrlProcessor', null, Array (), Array (&$this));
	+ $this->rewriteReady = true;
	+ }
	+
	+ /**
	* Return href for template
	*
	* @param string $t Template path
	* @param string $prefix index.php prefix - could be blank, 'admin'
	* @param Array $params
	* @param string $index_file
	* @return string
	*/
	public function HREF($t, $prefix = '', $params = null, $index_file = null)
	{
	static $theme_id = null;

	- if (!isset($theme_id)) {
	+ if ( !isset($theme_id) ) {
	$theme_id = $this->Application->GetVar('m_theme');
	}

	- if (!$t) {
	+ if ( !$t ) {
	// when template not specified, use current
	$t = $this->Application->GetVar('t');
	}

	$t = preg_replace('/^Content\//i', '', $t);

	- if (substr($t, -4) == '.tpl') {
	+ if ( substr($t, -4) == '.tpl' ) {
	// cut template extension (deprecated link format)
	$t = substr($t, 0, strlen($t) - 4);
	}

	- if (substr($t, 0, 3) == 'id:') {
	+ if ( substr($t, 0, 3) == 'id:' ) {
	// link to structure page using it's id
	$params['m_cat_id'] = substr($t, 3);
	$t = $this->structureTemplateMapping[$t];
	}

	- if (array_key_exists('use_section', $params)) {
	+ if ( array_key_exists('use_section', $params) ) {
	$use_section = $params['use_section'];
	unset($params['use_section']);
	}

	- if (isset($use_section) && $use_section && array_key_exists($t . ':' . $theme_id, $this->structureTemplateMapping)) {
	+ if ( isset($use_section) && $use_section && array_key_exists($t . ':' . $theme_id, $this->structureTemplateMapping) ) {
	// structure template corresponding to given physical template
	$t = $this->structureTemplateMapping[$t . ':' . $theme_id];
	unset($params['use_section']);
	}

	- if (preg_match('/external:(.*)/', $t, $rets)) {
	+ if ( preg_match('/external:(.*)/', $t, $regs) ) {
	// external url
	- return $rets[1];
	+ return $regs[1];
	}

	- if ($this->Application->isAdmin && $prefix == '') $prefix = ADMIN_DIRECTORY;
	- if ($this->Application->isAdmin && $prefix == '_FRONT_END_') $prefix = '';
	+ if ( $this->Application->isAdmin && $prefix == '' ) {
	+ $prefix = ADMIN_DIRECTORY;
	+ }

	- $index_file = $this->getIndexFile($prefix, $index_file, $params);
	+ if ( $this->Application->isAdmin && $prefix == '_FRONT_END_' ) {
	+ $prefix = '';
	+ }

	- if (isset($params['_auto_prefix_'])) {
	+ if ( isset($params['_auto_prefix_']) ) {
	unset($params['_auto_prefix_']); // this is parser-related param, do not need to pass it here
	}

	$ssl = isset($params['__SSL__']) ? $params['__SSL__'] : null;
	- if ($ssl !== null) {
	+ if ( $ssl !== null ) {
	$session =& $this->Application->recallObject('Session');
	/* @var $session Session */

	$target_url = rtrim($this->Application->BaseURL('', $ssl, false), '/');
	$cookie_url = trim($session->CookieDomain . $session->CookiePath, '/.');

	// set session to GET_ONLY, to pass sid only if sid is REAL AND session is set
	- if (!preg_match('#' . preg_quote($cookie_url) . '#', $target_url) && $session->SessionSet) {
	+ if ( !preg_match('#' . preg_quote($cookie_url) . '#', $target_url) && $session->SessionSet ) {
	// when SSL<->NON-SSL redirect to different domain pass SID in url
	- $session->SetMode(Session::smGET_ONLY);
	- }
	+ $session->SetMode(Session::smGET_ONLY);
	+ }
	}

	- if (isset($params['opener']) && $params['opener'] == 'u') {
	- $wid = $this->Application->GetVar('m_wid');
	- $stack_name = rtrim('opener_stack_'.$wid, '_');
	- $opener_stack = $this->Application->RecallVar($stack_name);
	-
	- if ($opener_stack && $opener_stack != serialize(Array())) {
	- $opener_stack = unserialize($opener_stack);
	- list($index_file, $env) = explode('\|', $opener_stack[count($opener_stack) - 1]);
	- $ret = $this->Application->BaseURL($prefix, $ssl).$index_file.'?'.ENV_VAR_NAME.'='.$env;
	- if ( getArrayValue($params,'escape') ) $ret = addslashes($ret);
	-
	- if (isset($params['m_opener']) && $params['m_opener'] == 'u') {
	- array_pop($opener_stack);
	- if (!$opener_stack) {
	- $this->Application->RemoveVar($stack_name);
	- // remove popups last templates, because popup is closing now
	- $this->Application->RemoveVar('last_template_'.$wid);
	- $this->Application->RemoveVar('last_template_popup_'.$wid);
	-
	- // don't save popups last templates again :)
	- $this->Application->SetVar('skip_last_template', 1);
	- }
	- else {
	- $this->Application->StoreVar($stack_name, serialize($opener_stack));
	- }
	-
	- /*// store window relations
	- $window_relations = $this->Application->RecallVar('window_relations');
	- $window_relations = $window_relations ? unserialize($window_relations) : Array ();
	- if (array_key_exists($wid, $window_relations)) {
	- unset($window_relations[$wid]);
	- $this->Application->StoreVar('window_relations', serialize($window_relations));
	- }*/
	- }
	+ if ( isset($params['opener']) && $params['opener'] == 'u' ) {
	+ $ret = $this->processPopupClose($prefix, $params);
	+
	+ if ( $ret !== false ) {
	return $ret;
	}
	else {
	//define('DBG_REDIRECT', 1);
	$t = $this->Application->GetVar('t');
	}
	}

	$pass = isset($params['pass']) ? $params['pass'] : '';

	+
	// pass events with url
	$pass_events = false;
	- if( isset($params['pass_events']) )
	- {
	+ if ( isset($params['pass_events']) ) {
	$pass_events = $params['pass_events'];
	unset($params['pass_events']);
	}

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

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

	- $no_rewrite = false;
	- if( isset($params['__NO_REWRITE__']) )
	- {
	- $no_rewrite = true;
	+ $rewrite = true;
	+ if ( isset($params['__NO_REWRITE__']) ) {
	+ $rewrite = false;
	unset($params['__NO_REWRITE__']);
	}

	$force_rewrite = false;
	- if( isset($params['__MOD_REWRITE__']) )
	- {
	+ if ( isset($params['__MOD_REWRITE__']) ) {
	$force_rewrite = true;
	unset($params['__MOD_REWRITE__']);
	}

	$force_no_sid = false;
	- if( isset($params['__NO_SID__']) )
	- {
	+ if ( isset($params['__NO_SID__']) ) {
	$force_no_sid = true;
	unset($params['__NO_SID__']);
	}

	+
	// append pass through variables to each link to be build
	$params = array_merge($this->getPassThroughVariables($params), $params);

	- if ($force_rewrite \|\| ($this->Application->RewriteURLs($ssl) && !$no_rewrite)) {
	- static $rewrite_listeners_done = false;
	-
	- if (!$rewrite_listeners_done) {
	- $mod_rewrite_helper =& $this->Application->recallObject('ModRewriteHelper');
	- /* @var $mod_rewrite_helper kModRewriteHelper */
	-
	- $mod_rewrite_helper->initRewriteListeners();
	-
	- $rewrite_listeners_done = true;
	+ if ( $force_rewrite \|\| ($this->Application->RewriteURLs($ssl) && $rewrite) ) {
	+ if ( !$this->rewriteReady ) {
	+ $this->initRewrite();
	}

	$session =& $this->Application->recallObject('Session');

	- if ($session->NeedQueryString() && !$force_no_sid) {
	+ if ( $session->NeedQueryString() && !$force_no_sid ) {
	$params['sid'] = $this->Application->GetSID();
	}

	- $url = $this->BuildEnv_NEW($t, $params, $pass, $pass_events);
	- $ret = $this->Application->BaseURL($prefix, $ssl).$url.$map_link;
	+ $url = $this->rewrite->build($t, $params, $pass, $pass_events);
	}
	else {
	unset($params['pass_category']); // we don't need to pass it when mod_rewrite is off
	- $env = $this->BuildEnv($t, $params, $pass, $pass_events);
	- $ret = $this->Application->BaseURL($prefix, $ssl).$index_file.'?'.$env.$map_link;
	- }
	-
	- return $ret;
	- }
	-
	- /**
	- * Returns variables with values that should be passed throught with this link + variable list
	- *
	- * @param Array $params
	- * @return Array
	- */
	- function getPassThroughVariables(&$params)
	- {
	- static $cached_pass_through = null;
	-
	- if (isset($params['no_pass_through']) && $params['no_pass_through']) {
	- unset($params['no_pass_through']);
	- return Array();
	- }
	-
	- // because pass through is not changed during script run, then we can cache it
	- if (is_null($cached_pass_through)) {
	-
	- $cached_pass_through = Array();
	- $pass_through = $this->Application->GetVar('pass_through');
	-
	- if ($pass_through) {
	- // names of variables to pass to each link
	- $cached_pass_through['pass_through'] = $pass_through;
	- $pass_through = explode(',', $pass_through);
	- foreach ($pass_through as $pass_through_var) {
	- $cached_pass_through[$pass_through_var] = $this->Application->GetVar($pass_through_var);
	- }
	- }
	-
	- }
	-
	- return $cached_pass_through;
	- }
	-
	- function BuildEnv($t, $params, $pass='all', $pass_events = false, $env_var = true)
	- {
	- if ($this->Application->GetVar('admin') \|\| (array_key_exists('admin', $params) && $params['admin'])) {
	- $params['admin'] = 1;
	-
	- if (!array_key_exists('editing_mode', $params)) {
	- $params['editing_mode'] = EDITING_MODE;
	- }
	- }
	-
	- $session =& $this->Application->recallObject('Session');
	- /* @var $session Session */
	-
	- $ssl = isset($params['__SSL__']) ? $params['__SSL__'] : 0;
	- $sid = $session->NeedQueryString() && !$this->Application->RewriteURLs($ssl) ? $this->Application->GetSID() : '';
	-// if (getArrayValue($params,'admin') == 1) $sid = $this->Application->GetSID();
	-
	- $ret = '';
	- if ($env_var) {
	- $ret = ENV_VAR_NAME.'=';
	- }
	-
	- $ret .= $sid . '-'; // SID-TEMPLATE
	-
	- $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->Application->GetVar('m_cat_id');
	-
	- $item_id = false;
	- $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->Application->findModule('Var', $prefix);
	- if ($require_rewrite) {
	- $item_id = isset($params[$pass_element.'_id']) ? $params[$pass_element.'_id'] : $this->Application->GetVar($pass_element.'_id');
	- }
	- $env_string .= ':'.$this->BuildModuleEnv($pass_element, $params, $pass_events);
	- }
	- }
	-
	- if (strtolower($t) == '__default__') {
	- if (is_numeric($item_id)) {
	- $mod_rw_helper =& $this->Application->recallObject('ModRewriteHelper');
	- /* @var $mod_rw_helper kModRewriteHelper */
	-
	- $t = $mod_rw_helper->GetItemTemplate($category_id, $pass_element); // $pass_element should be the last processed element
	- // $t = $this->Application->getCategoryCache($category_id, 'item_templates');
	- }
	- elseif ($category_id) {
	- $t = strtolower(preg_replace('/^Content\//i', '', $this->Application->getCategoryCache($category_id, 'filenames') ));
	- }
	- else {
	- $t = 'index';
	- }
	- }
	-
	- $ret .= $t.':'.$this->BuildModuleEnv('m', $params, $pass_events).$env_string;
	-
	- unset($params['pass'], $params['opener'], $params['m_event']);
	-
	- if (array_key_exists('escape', $params) && $params['escape']) {
	- $ret = addslashes($ret);
	- unset($params['escape']);
	- }
	-
	- if ($params) {
	- $params_str = '';
	- $join_string = $encode ? '&' : '&';
	-
	- foreach ($params as $param => $value) {
	- $params_str .= $join_string . $param . '=' . $value;
	- }
	-
	- $ret .= $params_str;
	- }
	-
	- if ($encode) {
	- $ret = str_replace('\\', '%5C', $ret);
	- }
	-
	- return $ret;
	- }

	- function BuildEnv_NEW($t, $params, $pass='all', $pass_events = false)
	- {
	- if ($this->Application->GetVar('admin') \|\| (array_key_exists('admin', $params) && $params['admin'])) {
	- $params['admin'] = 1;
	-
	- if (!array_key_exists('editing_mode', $params)) {
	- $params['editing_mode'] = EDITING_MODE;
	- }
	- }
	-
	- $ret = '';
	- $env = '';
	-
	- $encode = false;
	-
	- if (isset($params['__URLENCODE__'])) {
	- $encode = $params['__URLENCODE__'];
	- unset($params['__URLENCODE__']);
	+ $index_file = $this->getIndexFile($prefix, $index_file, $params);
	+ $url = $index_file . '?' . $this->plain->build($t, $params, $pass, $pass_events);
	}

	- if (isset($params['__SSL__'])) {
	- unset($params['__SSL__']);
	- }
	-
	- $catalog_item_found = false;
	- $pass_info = $this->getPassInfo($pass);
	-
	- if ($pass_info) {
	- if ($pass_info[0] == 'm') {
	- array_shift($pass_info);
	- }
	-
	- $inject_parts = Array (); // url parts for beginning of url
	- $params['t'] = $t; // make template available for rewrite listeners
	- $params['pass_template'] = true; // by default we keep given template in resulting url
	-
	- if (!array_key_exists('pass_category', $params)) {
	- $params['pass_category'] = false; // by default we don't keep categories in url
	- }
	-
	- foreach ($pass_info as $pass_index => $pass_element) {
	- list ($prefix) = explode('.', $pass_element);
	- $catalog_item = $this->Application->findModule('Var', $prefix) && $this->Application->getUnitOption($prefix, 'CatalogItem');
	-
	- if (array_key_exists($prefix, $this->Application->RewriteListeners)) {
	- // if next prefix is same as current, but with special => exclude current prefix from url
	- $next_prefix = array_key_exists($pass_index + 1, $pass_info) ? $pass_info[$pass_index + 1] : false;
	- if ($next_prefix) {
	- $next_prefix = substr($next_prefix, 0, strlen($prefix) + 1);
	- if ($prefix . '.' == $next_prefix) {
	- continue;
	- }
	- }
	-
	- // rewrited url part
	- $url_part = $this->BuildModuleEnv_NEW($pass_element, $params, $pass_events);
	-
	- if (is_string($url_part) && $url_part) {
	- $ret .= $url_part . '/';
	-
	- if ($catalog_item) {
	- // pass category later only for catalog items
	- $catalog_item_found = true;
	- }
	- }
	- elseif (is_array($url_part)) {
	- // rewrite listener want to insert something at the beginning of url too
	- if ($url_part[0]) {
	- $inject_parts[] = $url_part[0];
	- }
	-
	- if ($url_part[1]) {
	- $ret .= $url_part[1] . '/';
	- }
	-
	- if ($catalog_item) {
	- // pass category later only for catalog items
	- $catalog_item_found = true;
	- }
	- } elseif ($url_part === false) {
	- // rewrite listener decided not to rewrite given $pass_element
	- $env .= ':' . $this->BuildModuleEnv($pass_element, $params, $pass_events);
	- }
	- }
	- else {
	- $env .= ':' . $this->BuildModuleEnv($pass_element, $params, $pass_events);
	- }
	- }
	-
	- if ($catalog_item_found \|\| preg_match('/c\.[-\d]*/', implode(',', $pass_info))) {
	- // "c" prefix is present -> keep category
	- $params['pass_category'] = true;
	- }
	-
	- $params['inject_parts'] = $inject_parts;
	-
	- $ret = $this->BuildModuleEnv_NEW('m', $params, $pass_events) . '/' . $ret;
	- $cat_processed = array_key_exists('category_processed', $params) && $params['category_processed'];
	-
	- // remove tempporary parameters used by listeners
	- unset($params['t'], $params['inject_parts'], $params['pass_template'], $params['pass_category'], $params['category_processed']);
	-
	- $ret = trim($ret, '/');
	-
	- if ( isset($params['url_ending']) ) {
	- if ($ret) {
	- $ret .= $params['url_ending'];
	- }
	-
	- unset($params['url_ending']);
	- }
	- elseif ($ret) {
	- $ret .= MOD_REWRITE_URL_ENDING;
	- }
	-
	- if ($env) {
	- $params[ENV_VAR_NAME] = ltrim($env, ':');
	- }
	- }
	-
	- unset($params['pass'], $params['opener'], $params['m_event']);
	-
	- if (array_key_exists('escape', $params) && $params['escape']) {
	- $ret = addslashes($ret);
	- unset($params['escape']);
	- }
	-
	- $ret = str_replace('%2F', '/', urlencode($ret));
	-
	- if ($params) {
	- $params_str = '';
	- $join_string = $encode ? '&' : '&';
	-
	- foreach ($params as $param => $value) {
	- $params_str .= $join_string . $param . '=' . $value;
	- }
	-
	- $ret .= '?' . substr($params_str, strlen($join_string));
	- }
	-
	- if ($encode) {
	- $ret = str_replace('\\', '%5C', $ret);
	- }
	-
	- return $ret;
	+ return $this->Application->BaseURL($prefix, $ssl) . $url . $map_link;
	}

	/**
	- * Builds env part that corresponds prefix passed
	+ * Returns popup's parent window url and optionally removes it from opener stack
	*
	- * @param string $prefix_special item's prefix & [special]
	- * @param Array $params url params
	- * @param bool $pass_events
	- * @return string
	+ * @param string $prefix
	+ * @param Array $params
	+ * @return bool\|string
	* @access protected
	*/
	- protected function BuildModuleEnv($prefix_special, &$params, $pass_events = false)
	+ protected function processPopupClose($prefix = '', $params = Array ())
	{
	- list($prefix) = explode('.', $prefix_special);
	- $query_vars = $this->Application->getUnitOption($prefix, 'QueryString', Array ());
	- /* @var $query_vars Array */
	-
	- //if pass events is off and event is not implicitly 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
	- }
	+ $opener_stack =& $this->Application->makeClass('kOpenerStack');
	+ /* @var $opener_stack kOpenerStack */

	- if ( !$query_vars ) {
	- return '';
	+ if ( $opener_stack->isEmpty() ) {
	+ return false;
	}

	- $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->Application->GetVar($var_name);
	-
	- if ( isset($params[$var_name]) ) {
	- unset($params[$var_name]);
	- }
	- }
	+ $ssl = isset($params['__SSL__']) ? $params['__SSL__'] : null;
	+ list($index_file, $env) = explode('\|', $opener_stack->get(kOpenerStack::LAST_ELEMENT, true));
	+ $ret = $this->Application->BaseURL($prefix, $ssl) . $index_file . '?' . ENV_VAR_NAME . '=' . $env;

	- $escaped = array ();
	- foreach ($tmp_string as $tmp_val) {
	- $escaped[] = str_replace(Array ('-', ':'), Array ('\-', '\:'), $tmp_val);
	+ if ( isset($params['escape']) && $params['escape'] ) {
	+ $ret = addslashes($ret);
	}

	- $ret = implode('-', $escaped);
	- if ( $this->Application->getUnitOption($prefix, 'PortalStyleEnv') == true ) {
	- $ret = preg_replace('/^([a-zA-Z]+)-([0-9]+)-(.*)/', '\\1\\2-\\3', $ret);
	+ if ( isset($params['m_opener']) && $params['m_opener'] == 'u' ) {
	+ $opener_stack->pop();
	+ $opener_stack->save(true);
	+
	+ if ( $opener_stack->isEmpty() ) {
	+ // remove popups last templates, because popup is closing now
	+ $this->Application->RemoveVar('last_template_' . $opener_stack->getWindowID());
	+ $this->Application->RemoveVar('last_template_popup_' . $opener_stack->getWindowID());
	+
	+ // don't save popups last templates again :)
	+ $this->Application->SetVar('skip_last_template', 1);
	+ }
	+
	+ // store window relations
	+ /*$window_relations = $this->Application->RecallVar('window_relations');
	+ $window_relations = $window_relations ? unserialize($window_relations) : Array ();
	+ if (array_key_exists($wid, $window_relations)) {
	+ unset($window_relations[$wid]);
	+ $this->Application->StoreVar('window_relations', serialize($window_relations));
	+ }*/
	}

	return $ret;
	}

	- function BuildModuleEnv_NEW($prefix_special, &$params, $keep_events = false)
	- {
	- list ($prefix) = explode('.', $prefix_special);
	-
	- $url_parts = Array ();
	- $listener = $this->Application->RewriteListeners[$prefix][0];
	-
	- $ret = $listener[0]->$listener[1](REWRITE_MODE_BUILD, $prefix_special, $params, $url_parts, $keep_events);
	-
	- return $ret;
	- }
	-
	/**
	- * Returns sorted array of passed prefixes (to build url from)
	+ * Returns variables with values that should be passed through with this link + variable list
	*
	- * @param string $pass
	+ * @param Array $params
	* @return Array
	+ * @access public
	*/
	- function getPassInfo($pass = 'all')
	+ public function getPassThroughVariables(&$params)
	{
	- if (!$pass) $pass = 'all';
	- $pass = trim(
	- preg_replace(
	- '/(?<=,\|\\A)all(?=,\|\\z)/',
	- trim($this->Application->GetVar('passed'), ','),
	- trim($pass, ',')
	- ),
	- ',');
	-
	- if (!$pass) {
	- return Array();
	- }
	-
	- $pass_info = array_unique( explode(',', $pass) ); // array( prefix[.special], prefix[.special] ...
	+ static $cached_pass_through = null;

	- // we need to keep that sorting despite the sorting below, because this sorts prefixes with same priority by name
	- sort($pass_info, SORT_STRING); // to be prefix1,prefix1.special1,prefix1.special2,prefix3.specialX
	+ if ( isset($params['no_pass_through']) && $params['no_pass_through'] ) {
	+ unset($params['no_pass_through']);

	- foreach ($pass_info as $prefix) {
	- list ($prefix_only, ) = explode('.', $prefix, 2);
	- $sorted[$prefix] = $this->Application->getUnitOption($prefix_only, 'RewritePriority', 0);
	+ return Array ();
	}

	- asort($sorted, SORT_NUMERIC);
	- $pass_info = array_keys($sorted);
	+ // because pass through is not changed during script run, then we can cache it
	+ if ( is_null($cached_pass_through) ) {
	+ $cached_pass_through = Array ();
	+ $pass_through = $this->Application->GetVar('pass_through');
	+
	+ if ( $pass_through ) {
	+ // names of variables to pass to each link
	+ $cached_pass_through['pass_through'] = $pass_through;
	+ $pass_through = explode(',', $pass_through);

	- // 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');
	+ foreach ($pass_through as $pass_through_var) {
	+ $cached_pass_through[$pass_through_var] = $this->Application->GetVar($pass_through_var);
	+ }
	+ }
	}

	- return $pass_info;
	+ return $cached_pass_through;
	}

	/**
	* 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
	+ * @access protected
	*/
	- function getIndexFile($prefix, $index_file, &$params)
	+ protected function getIndexFile($prefix, $index_file = null, &$params)
	{
	- if (isset($params['index_file'])) {
	+ static $cache = Array ();
	+
	+ if ( isset($params['index_file']) ) {
	$index_file = $params['index_file'];
	unset($params['index_file']);
	+
	return $index_file;
	}

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

	- if (defined('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']), '/');
	+ // detect index file only once for given script and $cut_prefix
	+ $php_self = $_SERVER['PHP_SELF'];
	+ $cut_prefix = BASE_PATH . '/' . trim($prefix, '/');
	+
	+ if ( isset($cache[$php_self . ':' . $cut_prefix]) ) {
	+ return $cache[$php_self . ':' . $cut_prefix];
	+ }
	+
	+ $cache[$php_self . ':' . $cut_prefix] = trim(preg_replace('/' . preg_quote($cut_prefix, '/') . '(.*)/', '\\1', $php_self), '/');
	+
	+ return $cache[$php_self . ':' . $cut_prefix];
	}

	/**
	* Returns theme template filename and it's corresponding page_id based on given seo template
	*
	* @param string $seo_template
	* @return string
	* @access public
	*/
	public function getPhysicalTemplate($seo_template)
	{
	return array_search($seo_template, $this->structureTemplateMapping);
	}

	/**
	* Returns template name, that corresponds with given virtual (not physical) page id
	*
	* @param int $page_id
	* @return string\|bool
	* @access public
	*/
	public function getVirtualPageTemplate($page_id)
	{
	return isset($this->structureTemplateMapping['id:' . $page_id]) ? $this->structureTemplateMapping['id:' . $page_id] : false;
	}

	/**
	* Loads template mapping for Front-End
	*
	+ * @return void
	+ * @access public
	*/
	- function LoadStructureTemplateMapping()
	+ public function LoadStructureTemplateMapping()
	{
	if (!$this->Application->isAdmin) {
	$category_helper =& $this->Application->recallObject('CategoryHelper');
	/* @var $category_helper CategoryHelper */

	$this->structureTemplateMapping = $category_helper->getTemplateMapping();
	}
	}
	+
	+ /**
	+ * Removes tpl part from template name + resolved template ID to name
	+ *
	+ * @param string $t
	+ * @return string
	+ * @access public
	+ */
	+ public function getTemplateName($t)
	+ {
	+ if ( $this->Application->GetVarDirect('t', 'Get') !== false ) {
	+ // template name is passed directly in url (GET method)
	+ $t = $this->Application->GetVarDirect('t', 'Get');
	+ }
	+
	+ // if t was set through env, even in mod_rewrite mode!
	+ if ( $this->Application->GetVar('env') && $this->Application->RewriteURLs() && $this->Application->GetVar('t') ) {
	+ $t = $this->Application->GetVar('t');
	+ }
	+
	+ return preg_replace('/\.tpl$/', '', $t);
	+ }
	+
	+ /**
	+ * Returns current template, replacing it with default when it's missing
	+ *
	+ * @param string $t
	+ * @return string
	+ * @access public
	+ */
	+ public function getDefaultTemplate($t)
	+ {
	+ $t = $this->getTemplateName(trim($t, '/'));
	+
	+ if ( !$t ) {
	+ $t = 'index';
	+ }
	+
	+ return trim($t, '/');
	+ }
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/managers/url_processor.php
	===================================================================
	--- branches/5.2.x/core/kernel/managers/url_processor.php (nonexistent)
	+++ branches/5.2.x/core/kernel/managers/url_processor.php (revision 14714)
	@@ -0,0 +1,127 @@
	+<?php
	+/**
	+* @version $Id$
	+* @package In-Portal
	+* @copyright Copyright (C) 1997 - 2011 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!');
	+
	+abstract class kUrlProcessor extends kBase {
	+
	+ /**
	+ * Reference to kUrlProcessor class instance
	+ *
	+ * @var kUrlManager
	+ */
	+ protected $manager = null;
	+
	+ public function __construct(&$manager)
	+ {
	+ parent::__construct();
	+
	+ $this->setManager($manager);
	+ }
	+
	+ /**
	+ * Sets reference to url manager
	+ *
	+ * @param kUrlManager $manager
	+ * @return void
	+ * @access public
	+ */
	+ public function setManager(&$manager)
	+ {
	+ $this->manager =& $manager;
	+ }
	+
	+ /**
	+ * Returns sorted array of passed prefixes (to build url from)
	+ *
	+ * @param string $pass
	+ * @return Array
	+ * @access protected
	+ */
	+ protected function getPassInfo($pass = 'all')
	+ {
	+ if ( !$pass ) {
	+ $pass = 'all';
	+ }
	+
	+ $pass = trim(
	+ preg_replace(
	+ '/(?<=,\|\\A)all(?=,\|\\z)/',
	+ trim($this->Application->GetVar('passed'), ','),
	+ trim($pass, ',')
	+ ),
	+ ',');
	+
	+ if ( !$pass ) {
	+ return Array ();
	+ }
	+
	+ $pass_info = array_unique(explode(',', $pass)); // array( prefix[.special], prefix[.special] ...
	+
	+ // we need to keep that sorting despite the sorting below, because this sorts prefixes with same priority by name
	+ sort($pass_info, SORT_STRING); // to be prefix1,prefix1.special1,prefix1.special2,prefix3.specialX
	+
	+ foreach ($pass_info as $prefix) {
	+ list ($prefix_only,) = explode('.', $prefix, 2);
	+ $sorted[$prefix] = $this->Application->getUnitOption($prefix_only, 'RewritePriority', 0);
	+ }
	+
	+ asort($sorted, SORT_NUMERIC);
	+ $pass_info = array_keys($sorted);
	+
	+ // 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;
	+ }
	+
	+ /**
	+ * Builds url
	+ *
	+ * @param string $t
	+ * @param Array $params
	+ * @param string $pass
	+ * @param bool $pass_events
	+ * @param bool $env_var
	+ * @return string
	+ * @access public
	+ */
	+ abstract public function build($t, $params, $pass='all', $pass_events = false, $env_var = true);
	+
	+ /**
	+ * Parses given string into a set of variables
	+ *
	+ * @abstract
	+ * @param string $string
	+ * @param string $pass_name
	+ * @return Array
	+ * @access public
	+ */
	+ abstract public function parse($string, $pass_name = 'passed');
	+
	+ /**
	+ * Builds env part that corresponds prefix passed
	+ *
	+ * @param string $prefix_special item's prefix & [special]
	+ * @param Array $params url params
	+ * @param bool $pass_events
	+ * @return string
	+ * @access protected
	+ */
	+ abstract protected function BuildModuleEnv($prefix_special, &$params, $pass_events = false);
	+}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/managers/rewrite_url_processor.php
	===================================================================
	--- branches/5.2.x/core/kernel/managers/rewrite_url_processor.php (nonexistent)
	+++ branches/5.2.x/core/kernel/managers/rewrite_url_processor.php (revision 14714)
	@@ -0,0 +1,980 @@
	+<?php
	+/**
	+* @version $Id$
	+* @package In-Portal
	+* @copyright Copyright (C) 1997 - 2011 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 kRewriteUrlProcessor extends kUrlProcessor {
	+
	+ /**
	+ * Holds a reference to httpquery
	+ *
	+ * @var kHttpQuery
	+ * @access protected
	+ */
	+ protected $HTTPQuery = null;
	+
	+ /**
	+ * Urls parts, that needs to be matched by rewrite listeners
	+ *
	+ * @var Array
	+ * @access protected
	+ */
	+ protected $_partsToParse = Array ();
	+
	+ /**
	+ * Category item prefix, that was found
	+ *
	+ * @var string\|bool
	+ * @access public
	+ */
	+ public $modulePrefix = false;
	+
	+ /**
	+ * Template aliases for current theme
	+ *
	+ * @var Array
	+ * @access protected
	+ */
	+ protected $_templateAliases = null;
	+
	+ /**
	+ * Domain-based primary language id
	+ *
	+ * @var int
	+ * @access public
	+ */
	+ public $primaryLanguageId = false;
	+
	+ /**
	+ * Domain-based primary theme id
	+ *
	+ * @var int
	+ * @access public
	+ */
	+ public $primaryThemeId = false;
	+
	+ /**
	+ * Possible url endings from ModRewriteUrlEnding configuration variable
	+ *
	+ * @var Array
	+ */
	+ protected $_urlEndings = Array ('.html', '/', '');
	+
	+ /**
	+ * Constructor of kRewriteUrlProcessor class
	+ *
	+ * @param $manager
	+ * @return kRewriteUrlProcessor
	+ */
	+ public function __construct(&$manager)
	+ {
	+ parent::__construct($manager);
	+
	+ $this->HTTPQuery =& $this->Application->recallObject('HTTPQuery');
	+
	+ // domain based primary language
	+ $this->primaryLanguageId = $this->Application->siteDomainField('PrimaryLanguageId');
	+
	+ if (!$this->primaryLanguageId) {
	+ // when domain-based language not found -> use site-wide language
	+ $this->primaryLanguageId = $this->Application->GetDefaultLanguageId();
	+ }
	+
	+ // domain based primary theme
	+ $this->primaryThemeId = $this->Application->siteDomainField('PrimaryThemeId');
	+
	+ if (!$this->primaryThemeId) {
	+ // when domain-based theme not found -> use site-wide theme
	+ $this->primaryThemeId = $this->Application->GetDefaultThemeId(true);
	+ }
	+
	+ $this->_initRewriteListeners();
	+ }
	+
	+ /**
	+ * Parses url
	+ *
	+ * @return void
	+ */
	+ public function parseRewriteURL()
	+ {
	+ $url = $this->Application->GetVar('_mod_rw_url_');
	+
	+ if ($url) {
	+ foreach ($this->_urlEndings as $url_ending) {
	+ if (substr($url, strlen($url) - strlen($url_ending)) == $url_ending) {
	+ $url = substr($url, 0, strlen($url) - strlen($url_ending));
	+ $default_ending = $this->Application->ConfigValue('ModRewriteUrlEnding');
	+
	+ // user manually typed url with different url ending -> redirect to same url with default url ending
	+ if (($url_ending != $default_ending) && $this->Application->ConfigValue('ForceModRewriteUrlEnding')) {
	+ $target_url = $this->Application->BaseURL() . $url . $default_ending;
	+ $this->Application->Redirect('external:' . $target_url, Array ('response_code' => 301));
	+ }
	+
	+ break;
	+ }
	+ }
	+ }
	+
	+ $cached = $this->_getCachedUrl($url);
	+
	+ if ( $cached !== false ) {
	+ $vars = $cached['vars'];
	+ $passed = $cached['passed'];
	+ }
	+ else {
	+ $vars = $this->parse($url);
	+ $passed = $vars['pass']; // also used in bottom of this method
	+ unset($vars['pass']);
	+
	+ $this->_setCachedUrl($url, Array ('vars' => $vars, 'passed' => $passed));
	+
	+ if ( $this->Application->GetVarDirect('t', 'Post') ) {
	+ // template from POST overrides template from URL.
	+ $vars['t'] = $this->Application->GetVarDirect('t', 'Post');
	+
	+ if ( isset($vars['is_virtual']) && $vars['is_virtual'] ) {
	+ $vars['m_cat_id'] = 0; // this is virtual template category (for Proj-CMS)
	+ }
	+ }
	+
	+ unset($vars['is_virtual']);
	+ }
	+
	+ foreach ($vars as $name => $value) {
	+ $this->HTTPQuery->Set($name, $value);
	+ }
	+
	+ $this->_initAll(); // also will use parsed language to load phrases from it
	+
	+ $this->HTTPQuery->finalizeParsing($passed);
	+ }
	+
	+ /**
	+ * Returns url parsing result from cache or false, when not yet parsed
	+ *
	+ * @param $url
	+ * @return Array\|bool
	+ * @access protected
	+ */
	+ protected function _getCachedUrl($url)
	+ {
	+ if (!$url) {
	+ return false;
	+ }
	+
	+ $sql = 'SELECT *
	+ FROM ' . TABLE_PREFIX . 'CachedUrls
	+ WHERE Hash = ' . crc32($url) . ' AND DomainId = ' . (int)$this->Application->siteDomainField('DomainId');
	+ $data = $this->Conn->GetRow($sql);
	+
	+ if ($data) {
	+ $lifetime = (int)$data['LifeTime']; // in seconds
	+ if (($lifetime > 0) && ($data['Cached'] + $lifetime < adodb_mktime())) {
	+ // delete expired
	+ $sql = 'DELETE FROM ' . TABLE_PREFIX . 'CachedUrls
	+ WHERE UrlId = ' . $data['UrlId'];
	+ $this->Conn->Query($sql);
	+
	+ return false;
	+ }
	+
	+ return unserialize($data['ParsedVars']);
	+ }
	+
	+ return false;
	+ }
	+
	+ /**
	+ * Caches url
	+ *
	+ * @param string $url
	+ * @param Array $data
	+ * @return void
	+ * @access protected
	+ */
	+ protected function _setCachedUrl($url, $data)
	+ {
	+ if (!$url) {
	+ return ;
	+ }
	+
	+ $vars = $data['vars'];
	+ $passed = $data['passed'];
	+ sort($passed);
	+
	+ // get expiration
	+ if ($vars['m_cat_id'] > 0) {
	+ $sql = 'SELECT PageExpiration
	+ FROM ' . TABLE_PREFIX . 'Category
	+ WHERE CategoryId = ' . $vars['m_cat_id'];
	+ $expiration = $this->Conn->GetOne($sql);
	+ }
	+
	+ // get prefixes
	+ $prefixes = Array ();
	+ $m_index = array_search('m', $passed);
	+
	+ if ($m_index !== false) {
	+ unset($passed[$m_index]);
	+
	+ if ($vars['m_cat_id'] > 0) {
	+ $prefixes[] = 'c:' . $vars['m_cat_id'];
	+ }
	+
	+ $prefixes[] = 'lang:' . $vars['m_lang'];
	+ $prefixes[] = 'theme:' . $vars['m_theme'];
	+ }
	+
	+ foreach ($passed as $prefix) {
	+ if (array_key_exists($prefix . '_id', $vars) && is_numeric($vars[$prefix . '_id'])) {
	+ $prefixes[] = $prefix . ':' . $vars[$prefix . '_id'];
	+ }
	+ else {
	+ $prefixes[] = $prefix;
	+ }
	+ }
	+
	+ $fields_hash = Array (
	+ 'Url' => $url,
	+ 'Hash' => crc32($url),
	+ 'DomainId' => (int)$this->Application->siteDomainField('DomainId'),
	+ 'Prefixes' => $prefixes ? '\|' . implode('\|', $prefixes) . '\|' : '',
	+ 'ParsedVars' => serialize($data),
	+ 'Cached' => adodb_mktime(),
	+ 'LifeTime' => isset($expiration) && is_numeric($expiration) ? $expiration : -1
	+ );
	+
	+ $this->Conn->doInsert($fields_hash, TABLE_PREFIX . 'CachedUrls');
	+ }
	+
	+ /**
	+ * Loads all registered rewrite listeners, so they could be quickly accessed later
	+ *
	+ * @access protected
	+ */
	+ protected function _initRewriteListeners()
	+ {
	+ static $init_done = false;
	+
	+ if ($init_done \|\| count($this->Application->RewriteListeners) == 0) {
	+ // not initialized OR mod-rewrite url with missing config cache
	+ return ;
	+ }
	+
	+ foreach ($this->Application->RewriteListeners as $prefix => $listener_data) {
	+ foreach ($listener_data['listener'] as $index => $rewrite_listener) {
	+ list ($listener_prefix, $listener_method) = explode(':', $rewrite_listener);
	+ $listener =& $this->Application->recallObject($listener_prefix);
	+
	+ $this->Application->RewriteListeners[$prefix][$index] = Array (&$listener, $listener_method);
	+ }
	+ }
	+
	+ define('MOD_REWRITE_URL_ENDING', $this->Application->ConfigValue('ModRewriteUrlEnding'));
	+
	+ $init_done = true;
	+ }
	+
	+ /**
	+ * Parses given string into a set of variables (url in this case)
	+ *
	+ * @param string $string
	+ * @param string $pass_name
	+ * @return Array
	+ * @access public
	+ */
	+ public function parse($string, $pass_name = 'pass')
	+ {
	+ $vars = Array ($pass_name => Array ('m'));
	+ $url_parts = $string ? explode('/', trim(mb_strtolower($string, 'UTF-8'), '/')) : Array ();
	+
	+ $this->_partsToParse = $url_parts;
	+
	+ if ( ($this->HTTPQuery->Get('rewrite') == 'on') \|\| !$url_parts ) {
	+ $this->_setDefaultValues($vars);
	+ }
	+
	+ if ( !$url_parts ) {
	+ $this->_initAll();
	+ $vars['t'] = $this->Application->UrlManager->getDefaultTemplate('');
	+
	+ return $vars;
	+ }
	+ else {
	+ $vars['t'] = '';
	+ }
	+
	+ $this->_parseLanguage($url_parts, $vars);
	+ $this->_parseTheme($url_parts, $vars);
	+
	+ // http://site-url/<language>/<theme>/<category>[_<category_page>]/<template>/<module_page>
	+ // http://site-url/<language>/<theme>/<category>[_<category_page>]/<module_page> (category-based section template)
	+ // http://site-url/<language>/<theme>/<category>[_<category_page>]/<template>/<module_item>
	+ // http://site-url/<language>/<theme>/<category>[_<category_page>]/<module_item> (category-based detail template)
	+ // http://site-url/<language>/<theme>/<rl_injections>/<category>[_<category_page>]/<rl_part> (customized url)
	+
	+ if ( $this->_processRewriteListeners($url_parts, $vars) ) {
	+ return $vars;
	+ }
	+
	+ $this->_parsePhysicalTemplate($url_parts, $vars);
	+
	+ if ( ($this->modulePrefix === false) && $vars['m_cat_id'] && !$this->_partsToParse ) {
	+ // no category item found, but category found and all url matched -> module index page
	+
	+ return $vars;
	+ }
	+
	+ if ( $this->_partsToParse ) {
	+ $not_found = $this->Application->ConfigValue('ErrorTemplate');
	+ $vars['t'] = $not_found ? $not_found : 'error_notfound';
	+
	+ $themes_helper =& $this->Application->recallObject('ThemesHelper');
	+ /* @var $themes_helper kThemesHelper */
	+
	+ $vars['m_cat_id'] = $themes_helper->getPageByTemplate($vars['t'], $vars['m_theme']);
	+
	+ header('HTTP/1.0 404 Not Found');
	+ }
	+
	+ return $vars;
	+ }
	+
	+ /**
	+ * Initializes theme & language based on parse results
	+ *
	+ * @return void
	+ * @access protected
	+ */
	+ protected function _initAll()
	+ {
	+ $this->Application->VerifyThemeId();
	+ $this->Application->VerifyLanguageId();
	+
	+ // no need, since we don't have any cached phrase IDs + nobody will use PhrasesCache::LanguageId soon
	+ // $this->Application->Phrases->Init('phrases');
	+ }
	+
	+ /**
	+ * Sets default parsed values before actual url parsing (only, for empty url)
	+ *
	+ * @param Array $vars
	+ * @access protected
	+ */
	+ protected function _setDefaultValues(&$vars)
	+ {
	+ $defaults = Array (
	+ 'm_cat_id' => 0, // no category
	+ 'm_cat_page' => 1, // first category page
	+ 'm_opener' => 's', // stay on same page
	+ 't' => 'index' // main site page
	+ );
	+
	+ if ($this->primaryLanguageId) {
	+ // domain-based primary language
	+ $defaults['m_lang'] = $this->primaryLanguageId;
	+ }
	+
	+ if ($this->primaryThemeId) {
	+ // domain-based primary theme
	+ $defaults['m_theme'] = $this->primaryThemeId;
	+ }
	+
	+ foreach ($defaults as $default_key => $default_value) {
	+ if ($this->HTTPQuery->Get($default_key) === false) {
	+ $vars[$default_key] = $default_value;
	+ }
	+ }
	+ }
	+
	+ /**
	+ * Processes url using rewrite listeners
	+ *
	+ * Pattern: Chain of Command
	+ *
	+ * @param Array $url_parts
	+ * @param Array $vars
	+ * @return bool
	+ * @access protected
	+ */
	+ protected function _processRewriteListeners(&$url_parts, &$vars)
	+ {
	+ $this->_initRewriteListeners();
	+ $page_number = $this->_parsePage($url_parts, $vars);
	+
	+ foreach ($this->Application->RewriteListeners as $prefix => $listeners) {
	+ // set default page
	+ // $vars[$prefix . '_Page'] = 1; // will override page in session in case, when none is given in url
	+
	+ if ($page_number) {
	+ // page given in url - use it
	+ $vars[$prefix . '_id'] = 0;
	+ $vars[$prefix . '_Page'] = $page_number;
	+ }
	+
	+ // $listeners[1] - listener, used for parsing
	+ $listener_result = $listeners[1][0]->$listeners[1][1](REWRITE_MODE_PARSE, $prefix, $vars, $url_parts);
	+ if ($listener_result === false) {
	+ // will not proceed to other methods
	+ return true;
	+ }
	+ }
	+
	+ // will proceed to other methods
	+ return false;
	+ }
	+
	+ /**
	+ * Set's page (when found) to all modules
	+ *
	+ * @param Array $url_parts
	+ * @param Array $vars
	+ * @return string
	+ * @access protected
	+ *
	+ * @todo Should find a way, how to determine what rewrite listerner page is it
	+ */
	+ protected function _parsePage(&$url_parts, &$vars)
	+ {
	+ if (!$url_parts) {
	+ return false;
	+ }
	+
	+ $page_number = end($url_parts);
	+ if (!is_numeric($page_number)) {
	+ return false;
	+ }
	+
	+ array_pop($url_parts);
	+ $this->partParsed($page_number, 'rtl');
	+
	+ return $page_number;
	+ }
	+
	+ /**
	+ * Gets language part from url
	+ *
	+ * @param Array $url_parts
	+ * @param Array $vars
	+ * @return bool
	+ * @access protected
	+ */
	+ protected function _parseLanguage(&$url_parts, &$vars)
	+ {
	+ if (!$url_parts) {
	+ return false;
	+ }
	+
	+ $url_part = reset($url_parts);
	+
	+ $sql = 'SELECT LanguageId, IF(LOWER(PackName) = ' . $this->Conn->qstr($url_part) . ', 2, PrimaryLang) AS SortKey
	+ FROM ' . TABLE_PREFIX . 'Language
	+ WHERE Enabled = 1
	+ ORDER BY SortKey DESC';
	+ $language_info = $this->Conn->GetRow($sql);
	+
	+ if ($language_info && $language_info['LanguageId'] && $language_info['SortKey']) {
	+ // primary language will be selected in case, when $url_part doesn't match to other's language pack name
	+ // don't use next enabled language, when primary language is disabled
	+ $vars['m_lang'] = $language_info['LanguageId'];
	+
	+ if ($language_info['SortKey'] == 2) {
	+ // language was found by pack name
	+ array_shift($url_parts);
	+ $this->partParsed($url_part);
	+ }
	+ elseif ($this->primaryLanguageId) {
	+ // use domain-based primary language instead of site-wide primary language
	+ $vars['m_lang'] = $this->primaryLanguageId;
	+ }
	+
	+ return true;
	+ }
	+
	+ return false;
	+ }
	+
	+ /**
	+ * Gets theme part from url
	+ *
	+ * @param Array $url_parts
	+ * @param Array $vars
	+ * @return bool
	+ */
	+ protected function _parseTheme(&$url_parts, &$vars)
	+ {
	+ if (!$url_parts) {
	+ return false;
	+ }
	+
	+ $url_part = reset($url_parts);
	+
	+ $sql = 'SELECT ThemeId, IF(LOWER(Name) = ' . $this->Conn->qstr($url_part) . ', 2, PrimaryTheme) AS SortKey, TemplateAliases
	+ FROM ' . TABLE_PREFIX . 'Theme
	+ WHERE Enabled = 1
	+ ORDER BY SortKey DESC';
	+ $theme_info = $this->Conn->GetRow($sql);
	+
	+ if ($theme_info && $theme_info['ThemeId'] && $theme_info['SortKey']) {
	+ // primary theme will be selected in case, when $url_part doesn't match to other's theme name
	+ // don't use next enabled theme, when primary theme is disabled
	+ $vars['m_theme'] = $theme_info['ThemeId'];
	+
	+ if ($theme_info['TemplateAliases']) {
	+ $this->_templateAliases = unserialize($theme_info['TemplateAliases']);
	+ }
	+ else {
	+ $this->_templateAliases = Array ();
	+ }
	+
	+ if ($theme_info['SortKey'] == 2) {
	+ // theme was found by name
	+ array_shift($url_parts);
	+ $this->partParsed($url_part);
	+ }
	+ elseif ($this->primaryThemeId) {
	+ // use domain-based primary theme instead of site-wide primary theme
	+ $vars['m_theme'] = $this->primaryThemeId;
	+ }
	+
	+ return true;
	+ }
	+
	+ $vars['m_theme'] = 0; // required, because used later for category/template detection
	+
	+ return false;
	+ }
	+
	+ /**
	+ * Parses real template name from url
	+ *
	+ * @param Array $url_parts
	+ * @param Array $vars
	+ * @return bool
	+ */
	+ protected function _parsePhysicalTemplate($url_parts, &$vars)
	+ {
	+ if (!$url_parts) {
	+ return false;
	+ }
	+
	+ do {
	+ $template_path = implode('/', $url_parts);
	+
	+ $physical_template = $this->Application->getPhysicalTemplate($template_path);
	+
	+ if (($physical_template !== false) && (substr($physical_template, 0, 3) != 'id:')) {
	+ // replace menu template name with it's actual template name on disk
	+ list ($template_path) = explode(':', $physical_template, 2);
	+ }
	+
	+ $t_parts['path'] = dirname($template_path) == '.' ? '' : '/' . dirname($template_path);
	+ $t_parts['file'] = basename($template_path);
	+
	+ $sql = 'SELECT FileId
	+ FROM ' . TABLE_PREFIX . 'ThemeFiles
	+ WHERE (ThemeId = ' . $vars['m_theme'] . ') AND (FilePath = ' . $this->Conn->qstr($t_parts['path']) . ') AND (FileName = ' . $this->Conn->qstr($t_parts['file'] . '.tpl') . ')';
	+ $template_found = $this->Conn->GetOne($sql);
	+
	+ if (!$template_found) {
	+ array_shift($url_parts);
	+ }
	+ } while (!$template_found && $url_parts);
	+
	+ if ($template_found) {
	+ $vars['t'] = $template_path;
	+
	+ $template_parts = explode('/', $template_path);
	+
	+ while ( $template_parts ) {
	+ $this->partParsed( array_pop($template_parts), 'rtl' );
	+ }
	+
	+ // 1. will damage actual category during category item review add process
	+ // 2. will use "use_section" parameter of "m_Link" tag to gain same effect
	+// $themes_helper =& $this->Application->recallObject('ThemesHelper');
	+// /* @var $themes_helper kThemesHelper */
	+//
	+// $vars['m_cat_id'] = $themes_helper->getPageByTemplate($template_path, $vars['m_theme']);
	+
	+ return true;
	+ }
	+
	+ return false;
	+ }
	+
	+
	+
	+ /**
	+ * Returns environment variable values for given prefix (uses directly given params, when available)
	+ *
	+ * @param string $prefix_special
	+ * @param Array $params
	+ * @param bool $keep_events
	+ * @return Array
	+ * @access public
	+ */
	+ public function getProcessedParams($prefix_special, &$params, $keep_events)
	+ {
	+ list ($prefix) = explode('.', $prefix_special);
	+
	+ $query_vars = $this->Application->getUnitOption($prefix, 'QueryString', Array ());
	+ /* @var $query_vars Array */
	+
	+ if ( !$query_vars ) {
	+ // given prefix doesn't use "env" variable to pass it's data
	+ return false;
	+ }
	+
	+ $event_key = array_search('event', $query_vars);
	+ if ( $event_key ) {
	+ // pass through event of this prefix
	+ unset($query_vars[$event_key]);
	+ }
	+
	+ if ( array_key_exists($prefix_special . '_event', $params) && !$params[$prefix_special . '_event'] ) {
	+ // if empty event, then remove it from url
	+ unset($params[$prefix_special . '_event']);
	+ }
	+
	+ // if pass events is off and event is not implicity passed
	+ if ( !$keep_events && !array_key_exists($prefix_special . '_event', $params) ) {
	+ unset($params[$prefix_special . '_event']); // remove event from url if requested
	+ //otherwise it will use value from get_var
	+ }
	+
	+ $processed_params = Array ();
	+ foreach ($query_vars as $var_name) {
	+ // if value passed in params use it, otherwise use current from application
	+ $var_name = $prefix_special . '_' . $var_name;
	+ $processed_params[$var_name] = array_key_exists($var_name, $params) ? $params[$var_name] : $this->Application->GetVar($var_name);
	+
	+ if ( array_key_exists($var_name, $params) ) {
	+ unset($params[$var_name]);
	+ }
	+ }
	+
	+ return $processed_params;
	+ }
	+
	+ /**
	+ * Returns module item details template specified in given category custom field for given module prefix
	+ *
	+ * @param int\|Array $category
	+ * @param string $module_prefix
	+ * @return string
	+ * @access public
	+ * @todo Move to kPlainUrlProcessor
	+ */
	+ public function GetItemTemplate($category, $module_prefix)
	+ {
	+ $category_id = is_array($category) ? $category['CategoryId'] : $category;
	+ $cache_key = __CLASS__ . '::' . __FUNCTION__ . '[%CIDSerial:' . $category_id . '%]:' . $module_prefix;
	+
	+ $cached_value = $this->Application->getCache($cache_key);
	+ if ($cached_value !== false) {
	+ return $cached_value;
	+ }
	+
	+ if (!is_array($category)) {
	+ if ($category == 0) {
	+ $category = $this->Application->findModule('Var', $module_prefix, 'RootCat');
	+ }
	+ $sql = 'SELECT c.ParentPath, c.CategoryId
	+ FROM ' . TABLE_PREFIX . 'Category AS c
	+ WHERE c.CategoryId = ' . $category;
	+ $category = $this->Conn->GetRow($sql);
	+ }
	+ $parent_path = implode(',',explode('\|', substr($category['ParentPath'], 1, -1)));
	+
	+ // item template is stored in module' system custom field - need to get that field Id
	+ $primary_lang = $this->Application->GetDefaultLanguageId();
	+ $item_template_field_id = $this->getItemTemplateCustomField($module_prefix);
	+
	+ // looking for item template through cats hierarchy sorted by parent path
	+ $query = ' SELECT ccd.l' . $primary_lang . '_cust_' . $item_template_field_id . ',
	+ FIND_IN_SET(c.CategoryId, ' . $this->Conn->qstr($parent_path) . ') AS Ord1,
	+ c.CategoryId, c.Name, ccd.l' . $primary_lang . '_cust_' . $item_template_field_id . '
	+ FROM ' . TABLE_PREFIX . 'Category AS c
	+ LEFT JOIN ' . TABLE_PREFIX . 'CategoryCustomData AS ccd
	+ ON ccd.ResourceId = c.ResourceId
	+ WHERE c.CategoryId IN (' . $parent_path . ') AND ccd.l' . $primary_lang . '_cust_' . $item_template_field_id . ' != \'\'
	+ ORDER BY FIND_IN_SET(c.CategoryId, ' . $this->Conn->qstr($parent_path) . ') DESC';
	+ $item_template = $this->Conn->GetOne($query);
	+
	+ if (!isset($this->_templateAliases)) {
	+ // when empty url OR mod-rewrite disabled
	+
	+ $themes_helper =& $this->Application->recallObject('ThemesHelper');
	+ /* @var $themes_helper kThemesHelper */
	+
	+ $sql = 'SELECT TemplateAliases
	+ FROM ' . TABLE_PREFIX . 'Theme
	+ WHERE ThemeId = ' . (int)$themes_helper->getCurrentThemeId();
	+ $template_aliases = $this->Conn->GetOne($sql);
	+
	+ $this->_templateAliases = $template_aliases ? unserialize($template_aliases) : Array ();
	+ }
	+
	+ if ($item_template && array_key_exists($item_template, $this->_templateAliases)) {
	+ $item_template = $this->_templateAliases[$item_template];
	+ }
	+
	+ $this->Application->setCache($cache_key, $item_template);
	+
	+ return $item_template;
	+ }
	+
	+ /**
	+ * Returns category custom field id, where given module prefix item template name is stored
	+ *
	+ * @param string $module_prefix
	+ * @return int
	+ * @access public
	+ * @todo Move to kPlainUrlProcessor; decrease visibility, since used only during upgrade
	+ */
	+ public function getItemTemplateCustomField($module_prefix)
	+ {
	+ $cache_key = __CLASS__ . '::' . __FUNCTION__ . '[%CfSerial%]:' . $module_prefix;
	+ $cached_value = $this->Application->getCache($cache_key);
	+
	+ if ($cached_value !== false) {
	+ return $cached_value;
	+ }
	+
	+ $sql = 'SELECT CustomFieldId
	+ FROM ' . TABLE_PREFIX . 'CustomField
	+ WHERE FieldName = ' . $this->Conn->qstr($module_prefix . '_ItemTemplate');
	+ $item_template_field_id = $this->Conn->GetOne($sql);
	+
	+ $this->Application->setCache($cache_key, $item_template_field_id);
	+
	+ return $item_template_field_id;
	+ }
	+
	+ /**
	+ * Marks url part as parsed
	+ *
	+ * @param string $url_part
	+ * @param string $parse_direction
	+ * @access public
	+ */
	+ public function partParsed($url_part, $parse_direction = 'ltr')
	+ {
	+ if ( !$this->_partsToParse ) {
	+ return ;
	+ }
	+
	+ if ( $parse_direction == 'ltr' ) {
	+ $expected_url_part = reset($this->_partsToParse);
	+
	+ if ( $url_part == $expected_url_part ) {
	+ array_shift($this->_partsToParse);
	+ }
	+ }
	+ else {
	+ $expected_url_part = end($this->_partsToParse);
	+
	+ if ( $url_part == $expected_url_part ) {
	+ array_pop($this->_partsToParse);
	+ }
	+ }
	+
	+ if ( $url_part != $expected_url_part ) {
	+ trigger_error('partParsed: expected URL part "<strong>' . $expected_url_part . '</strong>", received URL part "<strong>' . $url_part . '</strong>"', E_USER_NOTICE);
	+ }
	+ }
	+
	+ /**
	+ * Builds url
	+ *
	+ * @param string $t
	+ * @param Array $params
	+ * @param string $pass
	+ * @param bool $pass_events
	+ * @param bool $env_var
	+ * @return string
	+ * @access public
	+ */
	+ public function build($t, $params, $pass = 'all', $pass_events = false, $env_var = false)
	+ {
	+ if ( $this->Application->GetVar('admin') \|\| (array_key_exists('admin', $params) && $params['admin']) ) {
	+ $params['admin'] = 1;
	+
	+ if ( !array_key_exists('editing_mode', $params) ) {
	+ $params['editing_mode'] = EDITING_MODE;
	+ }
	+ }
	+
	+ $ret = '';
	+ $env = '';
	+
	+ $encode = false;
	+
	+ if ( isset($params['__URLENCODE__']) ) {
	+ $encode = $params['__URLENCODE__'];
	+ unset($params['__URLENCODE__']);
	+ }
	+
	+ if ( isset($params['__SSL__']) ) {
	+ unset($params['__SSL__']);
	+ }
	+
	+ $catalog_item_found = false;
	+ $pass_info = $this->getPassInfo($pass);
	+
	+ if ( $pass_info ) {
	+ if ( $pass_info[0] == 'm' ) {
	+ array_shift($pass_info);
	+ }
	+
	+ $inject_parts = Array (); // url parts for beginning of url
	+ $params['t'] = $t; // make template available for rewrite listeners
	+ $params['pass_template'] = true; // by default we keep given template in resulting url
	+
	+ if ( !array_key_exists('pass_category', $params) ) {
	+ $params['pass_category'] = false; // by default we don't keep categories in url
	+ }
	+
	+ foreach ($pass_info as $pass_index => $pass_element) {
	+ list ($prefix) = explode('.', $pass_element);
	+ $catalog_item = $this->Application->findModule('Var', $prefix) && $this->Application->getUnitOption($prefix, 'CatalogItem');
	+
	+ if ( array_key_exists($prefix, $this->Application->RewriteListeners) ) {
	+ // if next prefix is same as current, but with special => exclude current prefix from url
	+ $next_prefix = array_key_exists($pass_index + 1, $pass_info) ? $pass_info[$pass_index + 1] : false;
	+ if ( $next_prefix ) {
	+ $next_prefix = substr($next_prefix, 0, strlen($prefix) + 1);
	+ if ( $prefix . '.' == $next_prefix ) {
	+ continue;
	+ }
	+ }
	+
	+ // rewritten url part
	+ $url_part = $this->BuildModuleEnv($pass_element, $params, $pass_events);
	+
	+ if ( is_string($url_part) && $url_part ) {
	+ $ret .= $url_part . '/';
	+
	+ if ( $catalog_item ) {
	+ // pass category later only for catalog items
	+ $catalog_item_found = true;
	+ }
	+ }
	+ elseif ( is_array($url_part) ) {
	+ // rewrite listener want to insert something at the beginning of url too
	+ if ( $url_part[0] ) {
	+ $inject_parts[] = $url_part[0];
	+ }
	+
	+ if ( $url_part[1] ) {
	+ $ret .= $url_part[1] . '/';
	+ }
	+
	+ if ( $catalog_item ) {
	+ // pass category later only for catalog items
	+ $catalog_item_found = true;
	+ }
	+ }
	+ elseif ( $url_part === false ) {
	+ // rewrite listener decided not to rewrite given $pass_element
	+ $env .= ':' . $this->manager->plain->BuildModuleEnv($pass_element, $params, $pass_events);
	+ }
	+ }
	+ else {
	+ $env .= ':' . $this->manager->plain->BuildModuleEnv($pass_element, $params, $pass_events);
	+ }
	+ }
	+
	+ if ( $catalog_item_found \|\| preg_match('/c\.[-\d]*/', implode(',', $pass_info)) ) {
	+ // "c" prefix is present -> keep category
	+ $params['pass_category'] = true;
	+ }
	+
	+ $params['inject_parts'] = $inject_parts;
	+
	+ $ret = $this->BuildModuleEnv('m', $params, $pass_events) . '/' . $ret;
	+ $cat_processed = array_key_exists('category_processed', $params) && $params['category_processed'];
	+
	+ // remove temporary parameters used by listeners
	+ unset($params['t'], $params['inject_parts'], $params['pass_template'], $params['pass_category'], $params['category_processed']);
	+
	+ $ret = trim($ret, '/');
	+
	+ if ( isset($params['url_ending']) ) {
	+ if ( $ret ) {
	+ $ret .= $params['url_ending'];
	+ }
	+
	+ unset($params['url_ending']);
	+ }
	+ elseif ( $ret ) {
	+ $ret .= MOD_REWRITE_URL_ENDING;
	+ }
	+
	+ if ( $env ) {
	+ $params[ENV_VAR_NAME] = ltrim($env, ':');
	+ }
	+ }
	+
	+ unset($params['pass'], $params['opener'], $params['m_event']);
	+
	+ if ( array_key_exists('escape', $params) && $params['escape'] ) {
	+ $ret = addslashes($ret);
	+ unset($params['escape']);
	+ }
	+
	+ $ret = str_replace('%2F', '/', urlencode($ret));
	+
	+ if ( $params ) {
	+ $params_str = '';
	+ $join_string = $encode ? '&' : '&';
	+
	+ foreach ($params as $param => $value) {
	+ $params_str .= $join_string . $param . '=' . $value;
	+ }
	+
	+ $ret .= '?' . substr($params_str, strlen($join_string));
	+ }
	+
	+ if ( $encode ) {
	+ $ret = str_replace('\\', '%5C', $ret);
	+ }
	+
	+ 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
	+ * @return string
	+ * @access protected
	+ */
	+ protected function BuildModuleEnv($prefix_special, &$params, $pass_events = false)
	+ {
	+ list ($prefix) = explode('.', $prefix_special);
	+
	+ $url_parts = Array ();
	+ $listener = $this->Application->RewriteListeners[$prefix][0];
	+
	+ $ret = $listener[0]->$listener[1](REWRITE_MODE_BUILD, $prefix_special, $params, $url_parts, $pass_events);
	+
	+ return $ret;
	+ }
	+}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/managers/plain_url_processor.php
	===================================================================
	--- branches/5.2.x/core/kernel/managers/plain_url_processor.php (nonexistent)
	+++ branches/5.2.x/core/kernel/managers/plain_url_processor.php (revision 14714)
	@@ -0,0 +1,295 @@
	+<?php
	+/**
	+* @version $Id$
	+* @package In-Portal
	+* @copyright Copyright (C) 1997 - 2011 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 kPlainUrlProcessor extends kUrlProcessor {
	+
	+ /**
	+ * Process QueryString only, create events, ids, based on config
	+ * set template name and sid in desired application variables.
	+ *
	+ * @param string $env_var environment string value
	+ * @param string $pass_name
	+ * @return Array
	+ */
	+ public function parse($env_var, $pass_name = 'passed')
	+ {
	+ // env=SID-TEMPLATE:m-1-1-1-1:l0-0-0:n-0-0-0:bb-0-0-1-1-1-0
	+ if ( !$env_var ) {
	+ return Array ('t' => $this->manager->getTemplateName('index'));
	+ }
	+
	+ $vars = Array ();
	+ $more_vars = strpos($env_var, '&');
	+
	+ if ( $more_vars !== false ) {
	+ parse_str(substr($env_var, $more_vars + 1), $vars);
	+ $env_var = substr($env_var, 0, $more_vars);
	+ }
	+
	+ // replace escaped ":" symbol not to explode by it
	+ $env_var = str_replace('\:', '_&+$$+&_', $env_var); // replace escaped "=" with spec-chars :)
	+ $parts = explode(':', $env_var);
	+
	+ if ( !$this->Application->RewriteURLs() \|\| ($this->Application->RewriteURLs() && $this->Application->GetVar('rewrite') != 'on') ) {
	+ $vars = array_merge($vars, $this->extractSIDAndTemplate($parts));
	+ }
	+
	+ if ( $parts ) {
	+ $passed = Array ();
	+
	+ foreach ($parts as $mixed_part) {
	+ list ($passed[], $processed_vars) = $this->_parseEnvPart($mixed_part);
	+ $vars = array_merge($vars, $processed_vars);
	+ }
	+
	+ $vars[$pass_name] = implode(',', array_unique($passed));
	+ }
	+
	+ return $vars;
	+ }
	+
	+ /**
	+ * Retrieves SessionID and current template from given ENV parts
	+ *
	+ * @param Array $parts
	+ * @return array
	+ * @access protected
	+ */
	+ protected function extractSIDAndTemplate(&$parts)
	+ {
	+ $template = '';
	+ $vars = Array ();
	+
	+ if ( preg_match('/^([\d]+\|)-(.*)$/', $parts[0], $regs) ) {
	+ // first "env" component matches "sid-template" format
	+ // (will be false, when mod-rewrite url to home page is built)
	+ $sid = $regs[1];
	+ $template = $regs[2];
	+ array_shift($parts);
	+
	+ if ( $sid ) {
	+ // Save Session ID
	+ $this->Application->SetVar('sid', $sid);
	+ $vars['sid'] = $sid;
	+ }
	+ }
	+
	+ // Save Template Name
	+ $vars['t'] = $this->manager->getDefaultTemplate($template);
	+
	+ return $vars;
	+ }
	+
	+ /**
	+ * Converts environment part into variable array (based on query map for given prefix)
	+ *
	+ * @param string $mixed_part
	+ * @return Array
	+ * @access protected
	+ */
	+ protected function _parseEnvPart($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);
	+
	+ // replace escaped "-" symbol not to explode by it
	+ $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);
	+ }
	+
	+ $vars = Array ();
	+ $prefix_special = array_shift($mixed_part); // l.pick, l
	+
	+ $http_query =& $this->Application->recallObject('HTTPQuery');
	+ /* @var $http_query kHTTPQuery */
	+
	+ $query_map = $http_query->discoverUnit($prefix_special); // from $_GET['env']
	+
	+ // 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;
	+ $vars[$prefix_special.'_'.$var_name] = $val;
	+ }
	+ }
	+
	+ return Array ($prefix_special, $vars);
	+ }
	+
	+ /**
	+ * Builds url
	+ *
	+ * @param string $t
	+ * @param Array $params
	+ * @param string $pass
	+ * @param bool $pass_events
	+ * @param bool $env_var
	+ * @return string
	+ * @access public
	+ */
	+ public function build($t, $params, $pass='all', $pass_events = false, $env_var = true)
	+ {
	+ if ( $this->Application->GetVar('admin') \|\| (array_key_exists('admin', $params) && $params['admin']) ) {
	+ $params['admin'] = 1;
	+
	+ if ( !array_key_exists('editing_mode', $params) ) {
	+ $params['editing_mode'] = EDITING_MODE;
	+ }
	+ }
	+
	+ $session =& $this->Application->recallObject('Session');
	+ /* @var $session Session */
	+
	+ $ssl = isset($params['__SSL__']) ? $params['__SSL__'] : 0;
	+ $sid = $session->NeedQueryString() && !$this->Application->RewriteURLs($ssl) ? $this->Application->GetSID() : '';
	+
	+ $ret = '';
	+ if ( $env_var ) {
	+ $ret = ENV_VAR_NAME . '=';
	+ }
	+
	+ $ret .= $sid . '-'; // SID-TEMPLATE
	+
	+ $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->Application->GetVar('m_cat_id');
	+
	+ $item_id = false;
	+ $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->Application->findModule('Var', $prefix);
	+
	+ if ( $require_rewrite ) {
	+ $item_id = isset($params[$pass_element . '_id']) ? $params[$pass_element . '_id'] : $this->Application->GetVar($pass_element . '_id');
	+ }
	+
	+ $env_string .= ':' . $this->BuildModuleEnv($pass_element, $params, $pass_events);
	+ }
	+ }
	+
	+ if ( strtolower($t) == '__default__' ) {
	+ if ( is_numeric($item_id) ) {
	+ $this->manager->initRewrite();
	+ $t = $this->manager->rewrite->GetItemTemplate($category_id, $pass_element); // $pass_element should be the last processed element
	+ // $t = $this->Application->getCategoryCache($category_id, 'item_templates');
	+ }
	+ elseif ( $category_id ) {
	+ $t = strtolower(preg_replace('/^Content\//i', '', $this->Application->getCategoryCache($category_id, 'filenames')));
	+ }
	+ else {
	+ $t = 'index';
	+ }
	+ }
	+
	+ $ret .= $t . ':' . $this->BuildModuleEnv('m', $params, $pass_events) . $env_string;
	+
	+ unset($params['pass'], $params['opener'], $params['m_event']);
	+
	+ if ( array_key_exists('escape', $params) && $params['escape'] ) {
	+ $ret = addslashes($ret);
	+ unset($params['escape']);
	+ }
	+
	+ if ( $params ) {
	+ $params_str = '';
	+ $join_string = $encode ? '&' : '&';
	+
	+ foreach ($params as $param => $value) {
	+ $params_str .= $join_string . $param . '=' . $value;
	+ }
	+
	+ $ret .= $params_str;
	+ }
	+
	+ if ( $encode ) {
	+ $ret = str_replace('\\', '%5C', $ret);
	+ }
	+
	+ 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
	+ * @return string
	+ * @access public
	+ */
	+ public function BuildModuleEnv($prefix_special, &$params, $pass_events = false)
	+ {
	+ list($prefix) = explode('.', $prefix_special);
	+ $query_vars = $this->Application->getUnitOption($prefix, 'QueryString', Array ());
	+ /* @var $query_vars Array */
	+
	+ //if pass events is off and event is not implicitly 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->Application->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->Application->getUnitOption($prefix, 'PortalStyleEnv') == true ) {
	+ $ret = preg_replace('/^([a-zA-Z]+)-([0-9]+)-(.*)/', '\\1\\2-\\3', $ret);
	+ }
	+
	+ return $ret;
	+ }
	+}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/processors/main_processor.php
	===================================================================
	--- branches/5.2.x/core/kernel/processors/main_processor.php (revision 14713)
	+++ branches/5.2.x/core/kernel/processors/main_processor.php (revision 14714)
	@@ -1,1232 +1,1232 @@
	<?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 kMainTagProcessor extends kTagProcessor {

	public function __construct()
	{
	parent::__construct();

	$actions =& $this->Application->recallObject('kActions');
	/* @var $actions Params */

	$actions->Set('t', $this->Application->GetVar('t'));
	$actions->Set('sid', $this->Application->GetSID());
	$actions->Set('m_opener', $this->Application->GetVar('m_opener') );
	}

	/**
	* Base folder for all template includes
	*
	* @param Array $params
	* @return string
	*/
	function TemplatesBase($params)
	{
	static $cached = Array ();

	$cache_key = crc32( serialize($params) );

	if (!array_key_exists($cache_key, $cached)) {
	$module = array_key_exists('module', $params) ? $params['module'] : 'core';

	if ($this->Application->isAdmin) {
	if ($module == 'in-portal') {
	$module = 'kernel';
	}

	// remove leading slash + substitute module
	$module_path = $this->Application->findModule('Name', $module, 'Path');

	if ($module_path !== false) {
	$path = $module_path . 'admin_templates';
	}
	else {
	// remove leading slash + substitute module
	$path = preg_replace('/\/(.?)\/(.)/', $module . '/\\2', THEMES_PATH);
	}
	}
	else {
	$path = mb_substr(THEMES_PATH, 1);

	if (mb_strtolower($module) == 'in-portal') {
	$module_folder = 'platform';
	}
	else {
	$module_folder = $this->Application->findModule('Name', $module, 'TemplatePath');
	}

	$path .= rtrim('/' . trim($module_folder, '/'), '/') . '/';
	}

	$cached[$cache_key] = $this->Application->BaseURL() . $path;
	}

	return $cached[$cache_key];
	}

	/**
	* Creates <base href ..> HTML tag for all templates
	* affects future css, js files and href params of links
	*
	* @param Array $params
	* @return string
	* @access protected
	*/
	protected function Base_Ref($params)
	{
	return '<base href="' . $this->TemplatesBase($params) . '/" />';
	}

	/**
	* Returns base url for web-site
	*
	* @return string
	* @access public
	*/
	function BaseURL()
	{
	return $this->Application->BaseURL();
	}

	//for compatability with K3 tags
	function Base($params)
	{
	return $this->TemplatesBase($params).'/';
	}

	function ProjectBase($params)
	{
	return $this->Application->BaseURL();
	}

	/*function Base($params)
	{
	return $this->Application->BaseURL().$params['add'];
	}*/

	/**
	* Used to create link to any template.
	* use "pass" paramter if "t" tag to specify
	* prefix & special of object to be represented
	* in resulting url
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function T($params)
	{
	// by default link to current template
	$template = $this->SelectParam($params, 't,template');
	$prefix = array_key_exists('prefix', $params) ? $params['prefix'] : '';

	unset($params['t'], $params['template'], $params['prefix']);

	return $this->Application->HREF($template, $prefix, $params);
	}

	function Link($params)
	{
	// pass "m" prefix, instead of "all", that is by default on Front-End
	if (!array_key_exists('pass', $params)) {
	$params['pass'] = 'm';
	}

	return $this->T($params);
	}

	/**
	* Performs redirect to provided template/url
	*
	* @param Array $params
	* @return string
	*/
	function Redirect($params)
	{
	$this->Application->Redirect('external:' . $this->Link($params));

	return '';
	}

	- function Env($params)
	+ /*function Env($params)
	{
	$t = $params['template'];
	unset($params['template']);
	return $this->Application->BuildEnv($t, $params, 'm', false, false);
	- }
	+ }*/

	function FormAction($params)
	{
	if (!array_key_exists('pass', $params)) {
	$params['pass'] = 'all,m';
	}

	$params['pass_category'] = 1;

	return $this->Application->HREF('', '', $params);
	}

	/*// NEEDS TEST
	function Config($params)
	{
	return $this->Application->ConfigOption($params['var']);
	}

	function Object($params)
	{
	$name = $params['name'];
	$method = $params['method'];

	$tmp =& $this->Application->recallObject($name);
	if ($tmp != null) {
	if (method_exists($tmp, $method))
	return $tmp->$method($params);
	else
	echo "Method $method does not exist in object ".get_class($tmp)." named $name<br>";
	}
	else
	echo "Object $name does not exist in the appliaction<br>";
	}*/

	/**
	* Tag, that always returns true.
	* For parser testing purposes
	*
	* @param Array $params
	* @return bool
	* @access public
	*/
	function True($params)
	{
	return true;
	}

	/**
	* Tag, that always returns false.
	* For parser testing purposes
	*
	* @param Array $params
	* @return bool
	* @access public
	*/
	function False($params)
	{
	return false;
	}

	/**
	* Returns block parameter by name (used only as "check" parameter value for "m_if" tag!)
	*
	* @param Array $params
	* @return stirng
	* @access public
	*/
	function Param($params)
	{
	$name = $params['name'];

	if (array_key_exists($name, $this->Application->Parser->Captures)) {
	$capture_params = $params;
	$capture_params['name'] = '__capture_' . $name;

	$this->Application->Parser->SetParam($name, $this->Application->ParseBlock($capture_params));
	}

	$res = $this->Application->Parser->GetParam($name);

	if ($res === false) {
	$res = '';
	}

	if (array_key_exists('plus', $params)) {
	$res += $params['plus'];
	}

	return $res;
	}

	/**
	* Compares block parameter with value specified
	*
	* @param Array $params
	* @return bool
	* @access public
	*/
	function ParamEquals($params)
	{
	$name = $this->SelectParam($params, 'name,var,param');
	$value = $params['value'];

	return ($this->Application->Parser->GetParam($name) == $value);
	}

	/*function PHP_Self($params)
	{
	return $HTTP_SERVER_VARS['PHP_SELF'];
	}
	*/

	/**
	* Returns session variable value by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function Recall($params)
	{
	$var_name = $this->SelectParam($params,'name,var,param');

	if (isset($params['persistent']) && $params['persistent']) {
	$ret = $this->Application->RecallPersistentVar($var_name);
	}
	else {
	$ret = $this->Application->RecallVar($var_name);
	}

	$ret = ($ret === false && isset($params['no_null'])) ? '' : $ret;
	if (getArrayValue($params, 'special') \|\| getArrayValue($params, 'htmlchars')) {
	$ret = htmlspecialchars($ret);
	}

	if (getArrayValue($params, 'urlencode')) {
	$ret = urlencode($ret);
	}

	return $ret;
	}

	function RemoveVar($params)
	{
	$this->Application->RemoveVar( $this->SelectParam($params,'name,var,param') );
	}

	// bad style to store something from template to session !!! (by Alex)
	// Used here only to test how session works, nothing more
	function Store($params)
	{
	//echo"Store $params[name]<br>";
	$name = $params['name'];
	$value = $params['value'];
	$this->Application->StoreVar($name,$value);
	}

	/**
	* Links variable from request with variable from session
	*
	* @param Array $params
	* @return string
	* @access protected
	*/
	protected function LinkVar($params)
	{
	$var_name = $params['name'];
	$session_var_name = isset($params['session_name']) ? $params['session_name'] : $var_name;
	$default_value = isset($params['default']) ? $params['default'] : '';

	$this->Application->LinkVar($var_name, $session_var_name, $default_value);

	return '';
	}

	/**
	* Links variable from request with variable from session and returns it's value
	*
	* @param Array $params
	* @return string
	* @access protected
	*/
	protected function GetLinkedVar($params)
	{
	$this->LinkVar($params);

	return $this->Application->GetVar( $params['name'] );
	}

	/**
	* Sets application variable value(-s)
	*
	* @param Array $params
	* @access public
	*/
	function Set($params)
	{
	foreach ($params as $param => $value) {
	$this->Application->SetVar($param, $value);
	}
	}

	/**
	* Increment application variable
	* specified by number specified
	*
	* @param Array $params
	* @access public
	*/
	function Inc($params)
	{
	$this->Application->SetVar($params['param'], $this->Application->GetVar($params['param']) + $params['by']);
	}

	/**
	* Retrieves application variable
	* value by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function Get($params)
	{
	$name = $this->SelectParam($params, 'name,var,param');
	$ret = $this->Application->GetVar($name, '');

	if (array_key_exists('no_html_escape', $params) && $params['no_html_escape']) {
	return kUtil::unhtmlentities($ret);
	}

	return $ret;
	}

	/**
	* Retrieves application constant
	* value by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function GetConst($params)
	{
	$constant_name = $this->SelectParam($params, 'name,const');

	return defined($constant_name) ? constant($constant_name) : '';
	}

	/**
	* Retrieves configuration variable value by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function GetConfig($params)
	{
	$config_name = $this->SelectParam($params, 'name,var');

	return $this->Application->ConfigValue($config_name);
	}

	/**
	* Compares configuration variable to a given value
	*
	* @param Array $params
	* @return bool
	* @deprecated
	* @access protected
	*/
	protected function ConfigEquals($params)
	{
	$option = $this->SelectParam($params, 'name,option,var');

	return $this->Application->ConfigValue($option) == $params['value'];
	}

	/**
	* Creates all hidden fields
	* needed for kernel_form
	*
	* @param Array $params
	* @return string
	* @access protected
	*/
	protected function DumpSystemInfo($params)
	{
	$actions =& $this->Application->recallObject('kActions');
	/* @var $actions Params */

	$actions->Set('t', $this->Application->GetVar('t'));

	$o = '';
	$params = $actions->GetParams();

	foreach ($params AS $name => $val) {
	$o .= "<input type='hidden' name='$name' id='$name' value='$val'>\n";
	}

	return $o;
	}

	/**
	* Used for search sidebox on front-end only
	*
	* @param Array $params
	* @return string
	- * @author Alex
	+ * @access protected
	*/
	- function GetFormHiddens($params)
	+ protected function GetFormHiddens($params)
	{
	$t = $this->SelectParam($params, 'template,t');
	unset($params['template']);

	$form_fields = Array ();
	if ( $this->Application->RewriteURLs() ) {
	$session =& $this->Application->recallObject('Session');
	/* @var $session Session */

	if ( $session->NeedQueryString() ) {
	$form_fields['sid'] = $this->Application->GetSID();
	}
	}
	else {
	$form_fields['env'] = $this->Application->BuildEnv($t, $params, 'm', false, false);
	}

	if ( $this->Application->GetVar('admin') == 1 ) {
	$form_fields['admin'] = 1;
	}

	$ret = '';
	$field_tpl = '<input type="hidden" name="%1$s" id="%1$s" value="%2$s"/>' . "\n";
	foreach ($form_fields as $form_field => $field_value) {
	$ret .= sprintf($field_tpl, $form_field, $field_value);
	}

	return $ret;
	}

	function Odd_Even($params)
	{
	$odd = $params['odd'];
	$even = $params['even'];
	if (!isset($params['var'])) {
	$var = 'odd_even';
	}
	else {
	$var = $params['var'];
	}

	if ($this->Application->GetVar($var) == 'even') {
	if (!isset($params['readonly']) \|\| !$params['readonly']) {
	$this->Application->SetVar($var, 'odd');
	}
	return $even;
	}
	else {
	if (!isset($params['readonly']) \|\| !$params['readonly']) {
	$this->Application->SetVar($var, 'even');
	}
	return $odd;
	}
	}

	/**
	* Returns phrase translation by name
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function Phrase($params)
	{
	$phrase_name = $this->SelectParam($params, 'label,name,title');
	$default_translation = $this->SelectParam($params, 'default');

	$no_editing = isset($params['no_editing']) && $params['no_editing'];
	$translation = $this->Application->Phrase($phrase_name, !$no_editing);

	$phrase_key = mb_strtoupper($phrase_name);

	if ( $default_translation && strpos($translation, '!' . $phrase_key . '!') !== false ) {
	$phrase =& $this->Application->recallObject('phrases.autocreate', null, Array ('skip_autoload' => true));
	/* @var $phrase kDBItem */

	if ( !$phrase->Load($phrase_key, 'PhraseKey') ) {
	$phrase->SetDBField('Phrase', $phrase_name);
	$phrase->SetDBField('PhraseType', $this->Application->isAdmin ? 1 : 0);

	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$languages = $ml_helper->getLanguages();

	foreach ($languages AS $language_id) {
	$phrase->SetDBField('l' . $language_id . '_Translation', $default_translation);
	}

	if ( $phrase->Create() ) {
	$translation = $default_translation;
	}
	}
	}

	if ( isset($params['escape']) && $params['escape'] ) {
	$translation = htmlspecialchars($translation, ENT_QUOTES);
	$translation = addslashes($translation);
	}

	return $translation;
	}

	// for tabs
	function is_active($params)
	{
	$test_templ = $this->SelectParam($params, 'templ,template,t');
	if ( !getArrayValue($params,'allow_empty') )
	{
	$if_true=getArrayValue($params,'true') ? $params['true'] : 1;
	$if_false=getArrayValue($params,'false') ? $params['false'] : 0;
	}
	else
	{
	$if_true=$params['true'];
	$if_false=$params['false'];
	}

	if ( preg_match("/^".str_replace('/', '\/', $test_templ)."/i", $this->Application->GetVar('t'))) {
	return $if_true;
	}
	else {
	return $if_false;
	}
	}

	function IsNotActive($params)
	{
	return !$this->is_active($params);
	}

	function IsActive($params)
	{
	return $this->is_active($params);
	}

	function is_t_active($params)
	{
	return $this->is_active($params);
	}

	function CurrentTemplate($params)
	{
	return $this->is_active($params);
	}

	/**
	* Checks if session variable
	* specified by name value match
	* value passed as parameter
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function RecallEquals($params)
	{
	$name = $this->SelectParam($params, 'name,var');
	$value = $params['value'];

	if (isset($params['persistent']) && $params['persistent']) {
	return $this->Application->RecallPersistentVar($name) == $value;
	}

	return ($this->Application->RecallVar($name) == $value);
	}

	/**
	* Checks if application variable specified by name value match value passed as parameter
	*
	* @param Array $params
	* @return bool
	* @access protected
	* @deprecated
	*/
	protected function GetEquals($params)
	{
	$name = $this->SelectParam($params, 'var,name,param');

	return $this->Application->GetVar($name) == $params['value'];
	}

	function ModuleInclude($params)
	{
	$ret = '';
	$included = Array ();
	$block_params = array_merge($params, Array('is_silent' => 2)); // don't make fatal errors in case if template is missing
	$current_template = $this->Application->GetVar('t');

	$replace_main = isset($params['replace_m']) && $params['replace_m'];
	$skip_prefixes = isset($params['skip_prefixes']) ? explode(',', $params['skip_prefixes']) : Array();
	$cms_mode = $this->Application->GetVar('admin');

	foreach ($this->Application->ModuleInfo as $module_name => $module_data) {
	$module_key = mb_strtolower($module_name);

	if ($module_name == 'In-Portal') {
	if (!$cms_mode && $this->Application->isAdmin) {
	// don't process In-Portal templates in admin
	continue;
	}

	// Front-End still relies on In-Portal module
	$module_prefix = $module_data['TemplatePath'];
	}
	elseif ($this->Application->isAdmin) {
	$module_prefix = $module_key . '/'; // was $module_data['Path'];
	}
	else {
	$module_prefix = $module_data['TemplatePath']; // always have trailing "/"
	}

	if (in_array($module_prefix, $included)) {
	// template by this path was already included by other module (e.g. in-portal used core's template)
	continue;
	}

	$block_params['t'] = $module_prefix.$this->SelectParam($params, $module_key.'_template,'.$module_key.'_t,template,t');

	$check_prefix = $module_data['Var'];

	if ($check_prefix == 'adm' && $replace_main) {
	$check_prefix = 'c';
	}

	if ($block_params['t'] == $current_template \|\| in_array($check_prefix, $skip_prefixes)) {
	continue;
	}

	$no_data = $this->SelectParam($params, $module_key.'_block_no_data,block_no_data');
	if ($no_data) {
	$block_params['block_no_data'] = $module_prefix.'/'.$no_data;
	}

	$ret .= $this->Application->IncludeTemplate($block_params);
	$included[] = $module_prefix;
	}

	return $ret;
	}

	function ModuleEnabled($params)
	{
	return $this->Application->isModuleEnabled( $params['module'] );
	}

	/**
	* Checks if debug mode is on
	*
	* @param Array $params
	* @return bool
	* @access public
	*/
	function IsDebugMode($params)
	{
	return defined('DEBUG_MODE') && $this->Application->isDebugMode();
	}

	/*function MassParse($params)
	{
	$qty = $params['qty'];
	$block = $params['block'];
	$mode = $params['mode'];

	$o = '';
	if ($mode == 'func') {
	$func = create_function('$params', '
	$o = \'<tr>\';
	$o.= \'<td>a\'.$params[\'param1\'].\'</td>\';
	$o.= \'<td>a\'.$params[\'param2\'].\'</td>\';
	$o.= \'<td>a\'.$params[\'param3\'].\'</td>\';
	$o.= \'<td>a\'.$params[\'param4\'].\'</td>\';
	$o.= \'</tr>\';
	return $o;
	');
	for ($i=1; $i<$qty; $i++) {
	$block_params['param1'] = rand(1, 10000);
	$block_params['param2'] = rand(1, 10000);
	$block_params['param3'] = rand(1, 10000);
	$block_params['param4'] = rand(1, 10000);
	$o .= $func($block_params);
	}
	return $o;
	}

	$block_params['name'] = $block;

	for ($i=0; $i<$qty; $i++) {
	$block_params['param1'] = rand(1, 10000);
	$block_params['param2'] = rand(1, 10000);
	$block_params['param3'] = rand(1, 10000);
	$block_params['param4'] = rand(1, 10000);
	$block_params['passed'] = $params['passed'];
	$block_params['prefix'] = 'm';

	$o.= $this->Application->ParseBlock($block_params);
	}
	return $o;
	}*/

	function LoggedIn($params)
	{
	return $this->Application->LoggedIn();
	}

	/**
	* Allows to check if permission exists directly in template and perform additional actions if required
	*
	* @param Array $params
	* @return bool
	*/
	function CheckPermission($params)
	{
	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	return $perm_helper->TagPermissionCheck($params);
	}

	/**
	* Checks if user is logged in and if not redirects it to template passed
	*
	* @param Array $params
	*/
	function RequireLogin($params)
	{
	$t = $this->Application->GetVar('t');
	$next_t = getArrayValue($params, 'next_template');

	if ( $next_t ) {
	$t = $next_t;
	}

	// check by permissions: begin
	if ((isset($params['perm_event']) && $params['perm_event']) \|\|
	(isset($params['perm_prefix']) && $params['perm_prefix']) \|\|
	(isset($params['permissions']) && $params['permissions'])) {

	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	$perm_status = $perm_helper->TagPermissionCheck($params);
	if (!$perm_status) {
	list($redirect_template, $redirect_params) = $perm_helper->getPermissionTemplate($params);
	$this->Application->Redirect($redirect_template, $redirect_params);
	}
	else {
	return ;
	}
	}
	// check by permissions: end

	// check by configuration value: begin
	$condition = getArrayValue($params, 'condition');
	if (!$condition) {
	$condition = true;
	}
	else {
	if (substr($condition, 0, 1) == '!') {
	$condition = !$this->Application->ConfigValue(substr($condition, 1));
	}
	else {
	$condition = $this->Application->ConfigValue($condition);
	}
	}
	// check by configuration value: end

	// check by belonging to group: begin
	$group = $this->SelectParam($params, 'group');
	$group_access = true;
	if ($group) {
	$sql = 'SELECT GroupId
	FROM '.TABLE_PREFIX.'PortalGroup
	WHERE Name = '.$this->Conn->qstr($group);
	$group_id = $this->Conn->GetOne($sql);

	if ($group_id) {
	$groups = explode(',', $this->Application->RecallVar('UserGroups'));
	$group_access = in_array($group_id, $groups);
	}
	}
	// check by belonging to group: end

	if ((!$this->Application->LoggedIn() \|\| !$group_access) && $condition) {
	$redirect_params = $this->Application->HttpQuery->getRedirectParams(true);

	if (array_key_exists('pass_category', $params)) {
	$redirect_params['pass_category'] = $params['pass_category'];
	}

	if (MOD_REWRITE) {
	// TODO: $next_t variable is ignored !!! (is anyone using m_RequireLogin tag with "next_template" parameter?)
	$redirect_params = Array (
	'm_cat_id' => 0,
	'next_template' => urlencode('external:' . $_SERVER['REQUEST_URI']),
	);
	}
	else {
	$redirect_params['next_template'] = $t;
	}

	if ( $this->Application->LoggedIn() && !$group_access) {
	$this->Application->Redirect($params['no_group_perm_template'], $redirect_params);
	}

	$this->Application->Redirect($params['login_template'], $redirect_params);
	}
	}

	/**
	* Checks, that user belongs to a group with a given name
	*
	* @param Array $params
	* @return bool
	*/
	protected function IsMember($params)
	{
	$sql = 'SELECT GroupId
	FROM ' . TABLE_PREFIX . 'PortalGroup
	WHERE Name = ' . $this->Conn->qstr($params['group']);
	$group_id = $this->Conn->GetOne($sql);

	if ( $group_id ) {
	$groups = explode(',', $this->Application->RecallVar('UserGroups'));

	return in_array($group_id, $groups);
	}

	return false;
	}

	/**
	* Checks if SSL is on and redirects to SSL URL if needed
	* If SSL_URL is not defined in config - the tag does not do anything
	* If for_logged_in_only="1" exits if user is not logged in.
	* If called without params forces https right away. If called with by_config="1" checks the
	* Require SSL setting from General Config and if it is ON forces https
	*
	* @param Array $params
	*/
	protected function CheckSSL($params)
	{
	$ssl = $this->Application->isAdmin ? $this->Application->ConfigValue('AdminSSL_URL') : false;

	if ( !$ssl ) {
	// not in admin or admin ssl url is empty
	$ssl_url = $this->Application->siteDomainField('SSLUrl');
	$ssl = $ssl_url !== false ? $ssl_url : $this->Application->ConfigValue('SSL_URL');
	}

	if ( !$ssl \|\| ($this->Application->TemplatesCache->forceThemeName !== false) ) {
	// SSL URL is not set - no way to require SSL
	// internal parsing (e.g. "TemplateParser::_parseTemplate") -> don't redirect
	return;
	}

	$require = false;

	if ( isset($params['mode']) && $params['mode'] == 'required' ) {
	$require = true;
	if ( isset($params['for_logged_in_only']) && $params['for_logged_in_only'] && !$this->Application->LoggedIn() ) {
	$require = false;
	}

	if ( isset($params['condition']) ) {
	if ( !$this->Application->ConfigValue($params['condition']) ) {
	$require = false;
	}
	}
	}

	if ( EDITING_MODE ) {
	// match SSL mode on front-end to one in administrative console, when browse modes are used
	$require = $this->Application->ConfigValue('Require_AdminSSL');
	}

	$http_query =& $this->Application->recallObject('HTTPQuery');
	/* @var $http_query kHTTPQuery */

	$pass = $http_query->getRedirectParams();
	$pass['pass_events'] = 1; // to make sure all events are passed when redirect happens

	if ( $require ) {
	if ( PROTOCOL == 'https://' ) {
	$this->Application->SetVar('__KEEP_SSL__', 1);
	return;
	}

	$pass['__SSL__'] = 1;
	$this->Application->Redirect('', $pass);
	}
	else {
	if ( PROTOCOL == 'https://' && $this->Application->ConfigValue('Force_HTTP_When_SSL_Not_Required') ) {
	if ( $this->Application->GetVar('__KEEP_SSL__') ) {
	return;
	}

	// $pass_more = Array ('pass' => 'm', 'm_cat_id' => 0, '__SSL__' => 0);
	$pass['__SSL__'] = 0;
	$this->Application->Redirect('', $pass); // $pass_more
	}
	}
	}

	function ConstOn($params)
	{
	$name = $this->SelectParam($params,'name,const');
	return kUtil::constOn($name);
	}

	function SetDefaultCategory($params)
	{
	$category_id = $this->Application->findModule('Name', $params['module'], 'RootCat');
	$this->Application->SetVar('m_cat_id', $category_id);
	}

	function XMLTemplate($params)
	{
	$this->NoDebug($params);

	if ( isset($params['cache']) && $params['cache'] ) {
	$nextyear = intval(date('Y') + 1);

	$format = "D, d M Y H:i:s";
	$expiration = gmdate($format, mktime() + $params['cache']) . ' GMT';
	$last_modified = mktime();

	header('Cache-Control: public, cache, max-age=' . $params['cache']);
	header("Expires: $expiration");
	header('Pragma: public');

	// Getting headers sent by the client.
	$headers = $this->_requestHeaders();

	// Checking if the client is validating his cache and if it is current.
	if ( isset($headers['If-Modified-Since']) && (strtotime($headers['If-Modified-Since']) > $last_modified - $params['cache']) ) {
	// Client's cache IS current, so we just respond '304 Not Modified'.
	header('Last-Modified: ' . date($format, strtotime($headers['If-Modified-Since'])) . ' GMT', true, 304);
	exit;
	}
	else {
	// Image not cached or cache outdated, we respond '200 OK' and output the image.
	header('Last-Modified: ' . gmdate($format, $last_modified) . ' GMT', true, 200);
	}
	}

	// xml documents are usually long
	set_time_limit(0);
	ini_set('memory_limit', -1);

	if ( !$this->Application->GetVar('debug') ) {
	return $this->Application->XMLHeader(getArrayValue($params, 'xml_version'));
	}

	$lang =& $this->Application->recallObject('lang.current');
	/* @var $lang LanguagesItem */

	header('Content-type: text/html; charset=' . $lang->GetDBField('Charset'));

	return '';
	}

	protected function _requestHeaders()
	{
	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 $skey) {
	if (substr($skey, 0, 5) == 'HTTP_') {
	$headername = str_replace(' ', '-', ucwords(strtolower(str_replace('_', ' ', substr($skey, 0, 5)))));
	$headers[$headername] = $_SERVER[$skey];
	}
	}

	return $headers;
	}

	function Header($params)
	{
	header($params['data']);
	}

	function NoDebug($params)
	{
	if ( !$this->Application->GetVar('debug') ) {
	kUtil::safeDefine('DBG_SKIP_REPORTING', 1);
	}
	}

	/**
	* Returns Home category name
	*
	* @param Array $params
	* @return string
	* @deprecated
	*/
	function RootCategoryName($params)
	{
	$no_editing = array_key_exists('no_editing', $params) && $params['no_editing'];

	return $this->Application->Phrase('la_rootcategory_name', !$no_editing);
	}

	/**
	* Allows to attach file directly from email event template
	*
	* @param Array $params
	*/
	function AttachFile($params)
	{
	$path = FULL_PATH . '/' . $params['path'];
	$pseudo = isset($params['special']) ? 'EmailSender.' . $params['special'] : 'EmailSender';

	$esender =& $this->Application->recallObject($pseudo);
	/* @var $esender kEmailSendingHelper */

	if ( file_exists($path) ) {
	$esender->AddAttachment($path);
	}
	}

	function CaptchaImage($params)
	{
	$this->NoDebug($params);
	$this->Application->SetVar('skip_last_template', 1);

	$captcha_helper =& $this->Application->recallObject('CaptchaHelper');
	/* @var $captcha_helper kCaptchaHelper */

	// generate captcha code
	$code = $captcha_helper->prepareCode( $this->Application->GetVar('var') );

	$captcha_helper->GenerateCaptchaImage($code, $this->Application->GetVar('w'), $this->Application->GetVar('h'), true);
	}

	function SID($params)
	{
	return $this->Application->GetSID();
	}

	function ModuleInfo($params)
	{
	return $this->Application->findModule($params['key'], $params['value'], $params['return']);
	}

	function Random($params)
	{
	return rand(1, 100000000);
	}

	/**
	* Prints parser params, available at current deep level
	*
	* @param Array $params
	* @return string
	*/
	function PrintCurrentParams($params)
	{
	$current_params = $this->Application->Parser->Params;

	foreach ($current_params as $param_name => $param_value) {
	$current_params[$param_name] = $param_name . ' = "' . $param_value . '"';
	}

	return '<pre>' . implode("\n", $current_params) . '</pre>';
	}

	/**
	* Gets previously defined counter result
	*
	* @param Array $params
	* @return int
	*/
	function GetCounter($params)
	{
	return $this->Application->getCounter($params['name'], $params);
	}

	/**
	* Increments PageHit counter
	*
	* @param Array $params
	* @return int
	*/
	function RegisterPageHit($params)
	{
	if ($this->Application->ConfigValue('UsePageHitCounter')) {
	// get current counte
	$sql = 'SELECT VariableValue
	FROM '.TABLE_PREFIX.'ConfigurationValues
	WHERE VariableName = "PageHitCounter"';
	$page_counter = (int)$this->Conn->GetOne($sql);

	$sql = 'UPDATE LOW_PRIORITY '.TABLE_PREFIX.'ConfigurationValues
	SET VariableValue = '.($page_counter + 1).'
	WHERE VariableName = "PageHitCounter"';
	$this->Conn->Query($sql);
	}
	}

	function Timestamp($params)
	{
	$format = isset($params['format']) ? $params['format'] : 'd.m.Y H:i:s';
	return adodb_date($format);
	}

	function GetUrlHiddenFileds($params)
	{
	$vars = Array ('page', 'per_page', 'sort_by');
	$ret = '<input type="hidden" name="main_list" value="1"/>';

	if (array_key_exists('skip', $params)) {
	$vars = array_diff($vars, $params['skip']);
	}

	foreach ($vars as $var_name) {
	$var_value = $this->Application->GetVar($var_name);

	if ($var_value) {
	$ret .= '<input type="hidden" name="' . $var_name . '" value="' . $var_value . '"/>';
	}
	}

	return $ret;
	}

	/**
	* Returns current Page URL (without re-assembling it).
	* "skip_query" param is optional and will remove the ?QUERY part from the result.
	*
	* @param Array $params
	* @return string
	* @access protected
	*/
	protected function CurrentPageLink($params)
	{
	if ( isset($params['skip_query']) && $params['skip_query'] ) {
	return preg_replace('/\?' . preg_quote($_SERVER['QUERY_STRING'], '/') . '$/', '', $_SERVER['REQUEST_URI']);
	}

	return $_SERVER['REQUEST_URI'];
	}
	}
	Index: branches/5.2.x/core/kernel/utility/http_query.php
	===================================================================
	--- branches/5.2.x/core/kernel/utility/http_query.php (revision 14713)
	+++ branches/5.2.x/core/kernel/utility/http_query.php (revision 14714)
	@@ -1,856 +1,747 @@
	<?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;

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

	/**
	* Loads info from $_POST, $_GET and
	* related arrays into common place
	*
	* @param string $order
	* @access public
	*/
	public function __construct($order = 'CGPF')
	{
	parent::__construct();

	$this->Order = $order;

	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';
	}
	+ }
	+
	+ /**
	+ * Set's prefix and special
	+ *
	+ * @param string $prefix
	+ * @param string $special
	+ * @access public
	+ */
	+ public function Init($prefix, $special)
	+ {
	+ parent::Init($prefix, $special);

	$this->AddAllVars();
	$this->specialsToRemove = $this->Get('remove_specials');

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

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

	ini_set('magic_quotes_gpc', 0);
	}

	/**
	* Discovers unit form request and returns it's QueryString option on success
	*
	* @param string $prefix_special
	*
	* @return Array\|bool
	- * @access protected
	+ * @access public
	*/
	- protected function discoverUnit($prefix_special)
	+ 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)
	{
	$ret = $this->Application->getUnitOption($prefix, 'QueryString', Array ());

	if ( !$ret && preg_match('/(.?)-(.)/', $prefix, $regs) ) {
	// "#prefix" (new format), "prefix" (old format)
	return $this->_getQueryString('#' . $regs[2]);
	}

	return $ret;
	}

	/**
	* Returns query string (with safety check against missing prefixes)
	*
	* @param string $prefix
	* @return Array
	*/
	private function _getQueryString($prefix)
	{
	if ( $this->Application->prefixRegistred($prefix) ) {
	return $this->Application->getUnitOption($prefix, 'QueryString');
	}

	return substr($prefix, 0, 1) == '#' ? $this->_getQueryString( substr($prefix, 1) ) : Array ();
	}

	- function removeSpecials($array)
	+ /**
	+ * Removes specials from request
	+ *
	+ * @param Array $array
	+ * @return Array
	+ * @access protected
	+ */
	+ protected function removeSpecials($array)
	{
	- $ret = Array();
	+ $ret = Array ();
	$removed = false;
	+
	foreach ($this->specialsToRemove as $prefix_special => $flag) {
	- if ($flag) {
	+ if ( $flag ) {
	$removed = true;
	- list ($prefix,$special) = explode('.', $prefix_special, 2);
	+ 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;
	+ $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) {
	+ 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->processQueryString( $this->Get(ENV_VAR_NAME) );
	+ $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':
	$this->Cookie = $this->AddVars($_COOKIE);
	break;

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

	case 'S';
	- $this->Server = $this->AddVars($_SERVER);
	- break;
	+ $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;
	}
	}
	-
	-// $this->AfterInit();
	}

	/**
	* 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 ;
	+ if ( !$passed ) {
	+ return;
	}

	$passed = explode(',', $passed);
	foreach ($passed as $prefix_special) {
	- if (strpos($prefix_special, '.') === false) {
	+ 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 $index => $var_name) {
	- if (array_key_exists($post_prefix_special . '_' . $var_name, $this->Post)) {
	+ 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]);
	}
	}
	}
	}

	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->processRewriteURL();
	+ $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->processRewriteURL();
	+ $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

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

	/**
	* Checks, that non-rewrite url was visited and it's automatic rewrite is required
	*
	* @return bool
	*/
	function rewriteRedirectRequired()
	{
	$redirect_conditions = Array (
	- !$this->Application->Session->IsHTTPSRedirect(), // not https <-> http redirect
	+ !$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;
	}

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

	$found = false;
	$http_referer = $_SERVER['HTTP_REFERER'];
	preg_match('/^(.?):\/\/(.?)(\/\|$)/', $http_referer, $regs); // 1 - protocol, 2 - domain

	if ($regs[1] == 'https') {
	$found = $site_helper->getDomainByName('SSLUrl', $http_referer) > 0;

	if (!$found) {
	// check if referer starts with our ssl url
	$ssl_url = $this->Application->ConfigValue('SSL_URL');
	$found = $ssl_url && preg_match('/^' . preg_quote($ssl_url, '/') . '/', $http_referer);
	}
	}
	else {
	$found = $site_helper->getDomainByName('DomainName', $regs[2]) > 0;

	if (!$found) {
	$found = $regs[2] == 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()
	{
	$events = $this->Get('events', Array ());
	/* @var $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(), $module_params = Array() )
	+ function finalizeParsing($passed = Array())
	{
	- if ($passed) {
	- foreach ($passed as $passed_prefix) {
	- $this->discoverUnit($passed_prefix); // from mod-rewrite url parsing
	- }
	-
	- $this->Set('passed', implode(',', $this->getDiscoveredUnits()));
	- }
	-
	- // get joined version (env var + mod rewrite parsed)
	- $passed = $this->Application->GetVar('passed');
	-
	- if (!array_key_exists('editing_mode', $module_params)) {
	- $module_params['editing_mode'] = '';
	- }
	-
	- $module_params['__URLENCODE__'] = 1;
	-
	- $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()
	- {
	- $mod_rw_helper =& $this->Application->recallObject('ModRewriteHelper');
	- /* @var $mod_rw_helper kModRewriteHelper */
	-
	- $mod_rw_helper->processRewriteURL();
	- }
	-
	- function getDefaultTemplate($t)
	- {
	- $t = $this->getTemplateName(trim($t, '/'));
	-
	- if ( !$t ) {
	- $t = 'index';
	- }
	-
	- return trim($t, '/');
	- }
	-
	- function extractSIDAndTemplate(&$parts)
	- {
	- $template = '';
	- $vars = Array ();
	-
	- if ( preg_match('/^([\d]+\|)-(.*)$/', $parts[0], $regs) ) {
	- // first "env" component matches "sid-template" format
	- // (will be false, when mod-rewrite url to home page is built)
	- $sid = $regs[1];
	- $template = $regs[2];
	- array_shift($parts);
	-
	- if ( $sid ) {
	- // Save Session ID
	- $this->Set('sid', $sid);
	- $vars['sid'] = $sid;
	- }
	- }
	-
	- // Save Template Name
	- $vars['t'] = $this->getDefaultTemplate($template);
	-
	- return $vars;
	- }
	-
	- /**
	- * Process QueryString only, create
	- * events, ids, based on config
	- * set template name and sid in
	- * desired application variables.
	- *
	- * @param string $env_var environment string value
	- * @param string $pass_name
	- * @return Array
	- * @access public
	- */
	- function processQueryString($env_var, $pass_name = 'passed')
	- {
	- // env=SID-TEMPLATE:m-1-1-1-1:l0-0-0:n-0-0-0:bb-0-0-1-1-1-0
	- $vars = Array ();
	- if ($env_var) {
	- $more_vars = strpos($env_var, '&');
	- if ($more_vars !== false) {
	- parse_str(substr($env_var, $more_vars + 1), $vars);
	- $env_var = substr($env_var, 0, $more_vars);
	- }
	-
	- // replace escaped ":" symbol not to explode by it
	- $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')) {
	- $vars = array_merge($vars, $this->extractSIDAndTemplate($parts));
	- }
	-
	- if ($parts) {
	- $passed = Array ();
	- foreach ($parts as $mixed_part) {
	- list ($passed[], $processed_vars) = $this->_parseEnvPart($mixed_part);
	- $vars = array_merge($vars, $processed_vars);
	- }
	-
	- $vars[$pass_name] = implode(',', array_unique($passed));
	- }
	- }
	- else {
	- $t = $this->getTemplateName('index');
	- $vars['t'] = $t;
	- }
	-
	- return $vars;
	- }
	-
	- /**
	- * Converts environment part into variable array (based on query map for given prefix)
	- *
	- * @param string $mixed_part
	- * @return Array
	- */
	- function _parseEnvPart($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);
	-
	- // replace escaped "-" symbol not to explode by it
	- $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 = $this->discoverUnit($prefix_special); // from $_GET['env']
	-
	- $vars = Array ();
	-
	- // 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;
	- $vars[$prefix_special.'_'.$var_name] = $val;
	- }
	- }
	-
	- return Array ($prefix_special, $vars);
	- }
	-
	- /**
	- * Removes tpl part from template name + resolved template ID to name
	- *
	- * @param string $t
	- * @return string
	- * @access private
	- */
	- function getTemplateName($t)
	- {
	- if ( array_key_exists('t', $this->Get) && $this->Get['t'] ) {
	- // template name is passed directly in url (GET method)
	- $t = $this->Get['t'];
	+ if (!$passed) {
	+ return;
	}

	- // if t was set through env, even in mod_rewrite mode!
	- if ( $this->Get('env') && $this->Application->RewriteURLs() && $this->Get('t') ) {
	- $t = $this->Get('t');
	+ foreach ($passed as $passed_prefix) {
	+ $this->discoverUnit($passed_prefix); // from mod-rewrite url parsing
	}

	- return preg_replace('/\.tpl$/', '', $t);
	+ $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)
	+ function AddVars($array, $strip_slashes = true)
	{
	- $array = $this->StripSlashes($array);
	- foreach($array as $key => $value)
	- {
	- $this->Set($key,$value);
	+ 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) {
	+ if ( $strip_slashes ) {
	$array = $this->StripSlashes($array);
	}

	- foreach($array as $key => $value_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) {
	$value = htmlspecialchars($value);
	}

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

	return $array;
	}

	/**
	* 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);
	}

	// transform arrays
	return $this->_transformArrays($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;
	}

	function _transformArrays($array, $level_prefix = '')
	{
	$ret = Array ();
	foreach ($array as $var_name => $var_value) {
	$new_var_name = $level_prefix ? $level_prefix . '[' . $var_name . ']' : $var_name;

	if (is_array($var_value)) {
	$ret = array_merge($ret, $this->_transformArrays($var_value, $new_var_name));
	}
	else {
	$ret[$new_var_name] = $var_value;
	}
	}

	return $ret;
	}

	function writeRequestLog($filename)
	{
	$log_file = (defined('RESTRICTED') ? RESTRICTED : FULL_PATH) . '/' . $filename;

	if ( is_writable(dirname($log_file)) ) {
	$fp = fopen($log_file, 'a');

	if ( $fp ) {
	$session =& $this->Application->recallObject('Session');
	/* @var $session Session */

	$user_id = $session->GetField('PortalUserId');
	$admin_mark = $this->Application->isAdmin ? 'ADMIN' : 'FRONT';

	$data = '[' . date('D M d H:i:s Y') . '] ' . $admin_mark . '; ip: ' . $_SERVER['REMOTE_ADDR'] . '; user_id: ' . $user_id . '; sid: ' . $this->Application->GetSID() . '; request: ' . "\n";
	if ( $this->Get ) {
	$data .= "_GET:\n" . print_r($this->Get, true);
	}

	if ( $this->Post ) {
	$data .= "_POST:\n" . print_r($this->Post, true);
	}

	if ( $this->Cookie ) {
	$data .= "_COOKIE:\n" . print_r($this->Cookie, true);
	}
	$data .= str_repeat('=', 100) . "\n";

	fwrite($fp, $data);
	fclose($fp);
	}
	else {
	trigger_error('Request Log directory not writable', E_USER_WARNING);
	}
	}
	else {
	trigger_error('Request Log directory not writable', E_USER_WARNING);
	}
	}

	+ /**
	+ * 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);
	+ }
	+
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/kernel/utility/opener_stack.php
	===================================================================
	--- branches/5.2.x/core/kernel/utility/opener_stack.php (revision 14713)
	+++ branches/5.2.x/core/kernel/utility/opener_stack.php (revision 14714)
	@@ -1,194 +1,205 @@
	<?php
	/**
	* @version $Id$
	* @package In-Portal
	* @copyright Copyright (C) 1997 - 2011 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 kOpenerStack extends kBase {

	/**
	* Reference to last opener stack element
	*/
	const LAST_ELEMENT = -1;

	/**
	* Window ID of opener stack
	*
	* @var int
	* @access protected
	*/
	protected $windowID = null;

	/**
	* Opener stack data
	*
	* @var Array
	* @access protected
	*/
	protected $data = Array ();

	/**
	* Creates instance of opener stack manager
	*
	* @param int $window_id
	*/
	public function __construct($window_id = null)
	{
	parent::__construct();

	$this->windowID = isset($window_id) ? $window_id : $this->Application->GetVar('m_wid');
	$this->load();
	}

	/**
	* Returns window id, that was finally used by opener stack
	*
	* @return int
	* @access public
	*/
	public function getWindowID()
	{
	return $this->windowID;
	}

	/**
	* Returns session variable name, used to store opener stack
	*
	* @return string
	* @access protected
	*/
	protected function getVariableName()
	{
	return rtrim('opener_stack_' . $this->windowID, '_');
	}

	/**
	* Loads opener stack data from session
	*
	* @return void
	* @access protected
	*/
	protected function load()
	{
	$stack_name = $this->getVariableName();
	$opener_stack = $this->Application->RecallVar($stack_name);

	$this->data = $opener_stack ? unserialize($opener_stack) : Array ();
	}

	/**
	* Stores updated opener stack to session
	*
	* @param bool $remove_on_empty
	* @return void
	*/
	public function save($remove_on_empty = false)
	{
	if ( $remove_on_empty ) {
	if ( $this->data ) {
	$this->Application->StoreVar($this->getVariableName(), serialize($this->data));
	}
	else {
	$this->Application->RemoveVar($this->getVariableName());
	}
	}
	else {
	$this->Application->StoreVar($this->getVariableName(), serialize($this->data), !$this->data);
	}
	}

	/**
	* Returns opener stack element at given position
	*
	* @param int $index Position of element in opener stack. Negative number will retrieve element from the end.
	* @param bool $raw
	* @return Array\|string {$template, $params, $index_file}
	* @access public
	*/
	public function get($index, $raw = false)
	{
	if ( $index < 0 ) {
	$index += count($this->data);
	}

	if ( !$this->data \|\| !isset($this->data[$index]) ) {
	return Array ('', Array (), null);
	}

	if ( $raw ) {
	return $this->data[$index];
	}

	list ($index_file, $env) = explode('\|', $this->data[$index], 2);
	- $params = $this->Application->HttpQuery->processQueryString($env, 'pass');
	+ $params = $this->Application->processQueryString($env, 'pass');

	$template = kUtil::popParam('t', $params, '');

	return Array ($template, $params, $index_file);
	}

	/**
	* Parses last opener stack element and returns it
	*
	* @param bool $raw
	* @return Array {$template, $params, $index_file}
	* @access public
	*/
	public function pop($raw = false)
	{
	$ret = $this->get(self::LAST_ELEMENT, $raw);
	array_pop($this->data);

	return $ret;
	}

	/**
	* Adds new opener stack element
	*
	* @param string $template
	* @param Array $params
	* @param string $index_file
	* @return void
	* @access public
	*/
	public function push($template = '', $params = Array (), $index_file = null)
	{
	$pass_events = kUtil::popParam('pass_events', $params, true);

	$new_level = $this->Application->BuildEnv($template, $params, $params['pass'], $pass_events, false);
	$this->data[] = $index_file . '\|' . $new_level;
	}

	/**
	* Adds new opener stack element as raw string
	*
	* @param $data
	* @return void
	* @access public
	*/
	public function pushRaw($data)
	{
	$this->data[] = $data;
	}

	/**
	* Resets opener stack content
	*
	* @return void
	* @access public
	*/
	public function reset()
	{
	$this->data = Array ();
	}
	+
	+ /**
	+ * Checks, that opener stack has no records
	+ *
	+ * @return bool
	+ * @access public
	+ */
	+ public function isEmpty()
	+ {
	+ return count($this->data) == 0;
	+ }
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/units/categories/categories_tag_processor.php
	===================================================================
	--- branches/5.2.x/core/units/categories/categories_tag_processor.php (revision 14713)
	+++ branches/5.2.x/core/units/categories/categories_tag_processor.php (revision 14714)
	@@ -1,2021 +1,2021 @@
	<?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.
	*/

	class CategoriesTagProcessor extends kDBTagProcessor {

	function SubCatCount($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	if ( isset($params['today']) && $params['today'] ) {
	$sql = 'SELECT COUNT(*)
	FROM ' . $object->TableName . '
	WHERE (ParentPath LIKE "' . $object->GetDBField('ParentPath') . '%") AND (CreatedOn > ' . (adodb_mktime() - 86400) . ')';
	return $this->Conn->GetOne($sql) - 1;
	}

	return $object->GetDBField('CachedDescendantCatsQty');
	}

	/**
	* Returns category count in system
	*
	* @param Array $params
	* @return int
	*/
	function CategoryCount($params)
	{
	$count_helper =& $this->Application->recallObject('CountHelper');
	/* @var $count_helper kCountHelper */

	$today_only = isset($params['today']) && $params['today'];
	return $count_helper->CategoryCount($today_only);
	}

	function IsNew($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	return $object->GetDBField('IsNew') ? 1 : 0;
	}

	function IsPick($params)
	{
	return $this->IsEditorsPick($params);
	}

	/**
	* Returns item's editors pick status (using not formatted value)
	*
	* @param Array $params
	* @return bool
	*/
	function IsEditorsPick($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	return $object->GetDBField('EditorsPick') == 1;
	}

	function ItemIcon($params)
	{
	$grids = $this->Application->getUnitOption($this->Prefix, 'Grids');
	$grid = $grids[ $params['grid'] ];

	if (!array_key_exists('Icons', $grid)) {
	return '';
	}

	$icons = $grid['Icons'];
	$icon_prefix = array_key_exists('icon_prefix', $params)? $params['icon_prefix'] : 'icon16_';

	if (array_key_exists('name', $params)) {
	$icon_name = $params['name'];
	return array_key_exists($icon_name, $icons) ? $icons[$icon_name] : '';
	}

	$object =& $this->getObject($params);
	/* @var $object kDBList */

	if ($object->GetDBField('ThemeId') > 0) {
	if (!$object->GetDBField('IsMenu')) {
	return $icon_prefix . 'section_menuhidden_system.png';
	}
	return $icon_prefix . 'section_system.png';
	}

	$status = $object->GetDBField('Status');

	if ($status == STATUS_DISABLED) {
	return $icon_prefix . 'section_disabled.png';
	}

	if (!$object->GetDBField('IsMenu')) {
	return $icon_prefix . 'section_menuhidden.png';
	}

	if ($status == STATUS_PENDING) {
	return $icon_prefix . 'section_pending.png';
	}

	if ($object->GetDBField('IsNew') && ($icon_prefix == 'icon16_')) {
	return $icon_prefix . 'section_new.png'; // show gris icon only in grids
	}

	return $icon_prefix . 'section.png';
	}

	function ItemCount($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$ci_table = $this->Application->getUnitOption('ci', 'TableName');

	$sql = 'SELECT COUNT(*)
	FROM ' . $object->TableName . ' c
	LEFT JOIN ' . $ci_table . ' ci ON c.CategoryId = ci.CategoryId
	WHERE (c.TreeLeft BETWEEN ' . $object->GetDBField('TreeLeft') . ' AND ' . $object->GetDBField('TreeRight') . ') AND NOT (ci.CategoryId IS NULL)';
	return $this->Conn->GetOne($sql);
	}

	function ListCategories($params)
	{
	return $this->PrintList2($params);
	}

	function RootCategoryName($params)
	{
	return $this->Application->ProcessParsedTag('m', 'RootCategoryName', $params);
	}

	function CheckModuleRoot($params)
	{
	$module_name = getArrayValue($params, 'module') ? $params['module'] : 'In-Commerce';
	$module_root_cat = $this->Application->findModule('Name', $module_name, 'RootCat');

	$additional_cats = $this->SelectParam($params, 'add_cats');
	if ($additional_cats) {
	$additional_cats = explode(',', $additional_cats);
	}
	else {
	$additional_cats = array();
	}

	if ($this->Application->GetVar('m_cat_id') == $module_root_cat \|\| in_array($this->Application->GetVar('m_cat_id'), $additional_cats)) {
	$home_template = getArrayValue($params, 'home_template');
	if (!$home_template) return;
	$this->Application->Redirect($home_template, Array('pass'=>'all'));
	};
	}

	function CategoryPath($params)
	{
	$category_helper =& $this->Application->recallObject('CategoryHelper');
	/* @var $category_helper CategoryHelper */

	return $category_helper->NavigationBar($params);
	}

	/**
	* Shows category path to specified category
	*
	* @param Array $params
	* @return string
	*/
	function FieldCategoryPath($params)
	{
	$object =& $this->getObject();
	/* @var $object kDBItem */

	$field = $this->SelectParam($params, 'name,field');
	$category_id = $object->GetDBField($field);

	if ($category_id) {
	$params['cat_id'] = $category_id;
	return $this->CategoryPath($params);
	}

	return '';
	}

	function CurrentCategoryName($params)
	{
	$cat_object =& $this->Application->recallObject($this->getPrefixSpecial(), $this->Prefix.'_List');
	/* @var $cat_object kDBList */

	$sql = 'SELECT '.$this->getTitleField().'
	FROM '.$cat_object->TableName.'
	WHERE CategoryId = '.(int)$this->Application->GetVar('m_cat_id');
	return $this->Conn->GetOne($sql);
	}

	/**
	* Returns current category name
	*
	* @param Array $params
	* @return string
	* @todo Find where it's used
	*/
	function CurrentCategory($params)
	{
	return $this->CurrentCategoryName($params);
	}

	function getTitleField()
	{
	$ml_formatter =& $this->Application->recallObject('kMultiLanguage');
	/* @var $ml_formatter kMultiLanguage */

	return $ml_formatter->LangFieldName('Name');
	}

	/**
	* Returns symlinked category for given category
	*
	* @param int $category_id
	* @return int
	*/
	function getCategorySymLink($category_id)
	{
	if (!$category_id) {
	// don't bother to get symlink for "Home" category
	return $category_id;
	}

	$cache_key = 'category_symlinks[%CSerial%]';
	$cache = $this->Application->getCache($cache_key);

	if ($cache === false) {
	$id_field = $this->Application->getUnitOption($this->Prefix, 'IDField');
	$table_name = $this->Application->getUnitOption($this->Prefix, 'TableName');

	// get symlinked categories, that are not yet deleted
	$this->Conn->nextQueryCachable = true;
	$sql = 'SELECT c1.SymLinkCategoryId, c1.' . $id_field . '
	FROM ' . $table_name . ' c1
	JOIN ' . $table_name . ' c2 ON c1.SymLinkCategoryId = c2.' . $id_field;
	$cache = $this->Conn->GetCol($sql, $id_field);

	$this->Application->setCache($cache_key, $cache);
	}

	return array_key_exists($category_id, $cache) ? $cache[$category_id] : $category_id;
	}

	function CategoryLink($params)
	{
	$category_id = getArrayValue($params, 'cat_id');

	if ( $category_id === false ) {
	$category_id = $this->Application->GetVar($this->getPrefixSpecial() . '_id');
	}

	if ( "$category_id" == 'Root' ) {
	$category_id = $this->Application->findModule('Name', $params['module'], 'RootCat');
	}
	elseif ( "$category_id" == 'current' ) {
	$category_id = $this->Application->GetVar('m_cat_id');
	}

	if ( !array_key_exists('direct_link', $params) \|\| !$params['direct_link'] ) {
	$category_id = $this->getCategorySymLink((int)$category_id);
	}
	else {
	unset($params['direct_link']);
	}

	$virtual_template = $this->Application->getVirtualPageTemplate($category_id);

	if ( ($virtual_template !== false) && preg_match('/external:(.*)/', $virtual_template, $rets) ) {
	// external url (return here, instead of always replacing $params['t'] for kApplication::HREF to find it)
	return $rets[1];
	}

	unset($params['cat_id'], $params['module']);
	$new_params = Array ('pass' => 'm', 'm_cat_id' => $category_id, 'pass_category' => 1);
	$params = array_merge($params, $new_params);

	return $this->Application->ProcessParsedTag('m', 't', $params);
	}

	function CategoryList($params)
	{
	//$object =& $this->Application->recallObject( $this->getPrefixSpecial() , $this->Prefix.'_List', $params );
	$object =& $this->GetList($params);


	if ($object->GetRecordsCount() == 0)
	{
	if (isset($params['block_no_cats'])) {
	$params['name'] = $params['block_no_cats'];
	return $this->Application->ParseBlock($params);
	}
	else {
	return '';
	}
	}

	if (isset($params['block'])) {
	return $this->PrintList($params);
	}
	else {
	$params['block'] = $params['block_main'];
	if (isset($params['block_row_start'])) {
	$params['row_start_block'] = $params['block_row_start'];
	}

	if (isset($params['block_row_end'])) {
	$params['row_end_block'] = $params['block_row_end'];
	}
	return $this->PrintList2($params);
	}
	}

	function Meta($params)
	{
	$object =& $this->Application->recallObject($this->Prefix); // .'.-item'
	/* @var $object CategoriesItem */

	$meta_type = $params['name'];
	if ($object->isLoaded()) {
	// 1. get module prefix by current category
	$category_helper =& $this->Application->recallObject('CategoryHelper');
	/* @var $category_helper CategoryHelper */

	$category_path = explode('\|', substr($object->GetDBField('ParentPath'), 1, -1));
	$module_info = $category_helper->getCategoryModule($params, $category_path);

	// In-Edit & Proj-CMS module prefixes doesn't have custom field with item template
	if ($module_info && $module_info['Var'] != 'adm' && $module_info['Var'] != 'st') {

	// 2. get item template by current category & module prefix
	- $mod_rewrite_helper = $this->Application->recallObject('ModRewriteHelper');
	- /* @var $mod_rewrite_helper kModRewriteHelper */
	+ $rewrite_processor = $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */

	$category_params = Array (
	- 'CategoryId' => $object->GetID(),
	- 'ParentPath' => $object->GetDBField('ParentPath'),
	+ 'CategoryId' => $object->GetID(),
	+ 'ParentPath' => $object->GetDBField('ParentPath'),
	);

	- $item_template = $mod_rewrite_helper->GetItemTemplate($category_params, $module_info['Var']);
	+ $item_template = $rewrite_processor->GetItemTemplate($category_params, $module_info['Var']);

	if ($this->Application->GetVar('t') == $item_template) {
	// we are located on item's details page
	$item =& $this->Application->recallObject($module_info['Var']);
	/* @var $item kCatDBItem */

	// 3. get item's meta data
	$value = $item->GetField('Meta'.$meta_type);
	if ($value) {
	return $value;
	}
	}

	// 4. get category meta data
	$value = $object->GetField('Meta'.$meta_type);
	if ($value) {
	return $value;
	}
	}
	}

	// 5. get default meta data
	switch ($meta_type) {
	case 'Description':
	$config_name = 'Category_MetaDesc';
	break;
	case 'Keywords':
	$config_name = 'Category_MetaKey';
	break;
	}

	return $this->Application->ConfigValue($config_name);
	}

	function BuildListSpecial($params)
	{
	if (($this->Special != '') && !is_numeric($this->Special)) {
	// When recursive category list is printed (like in sitemap), then special
	// should be generated even if it's already present. Without it list on this
	// level will erase list on previous level, because it will be stored in same object.
	return $this->Special;
	}

	if ( isset($params['parent_cat_id']) ) {
	$parent_cat_id = $params['parent_cat_id'];
	}
	else {
	$parent_cat_id = $this->Application->GetVar($this->Prefix.'_id');
	if (!$parent_cat_id) {
	$parent_cat_id = $this->Application->GetVar('m_cat_id');
	}
	if (!$parent_cat_id) {
	$parent_cat_id = 0;
	}
	}

	$list_unique_key = $this->getUniqueListKey($params);
	// check for "admin" variable, because we are parsing front-end template from admin when using template editor feature
	if ($this->Application->GetVar('admin') \|\| !$this->Application->isAdmin) {
	// add parent category to special, when on Front-End,
	// because there can be many category lists on same page
	$list_unique_key .= $parent_cat_id;
	}

	if ($list_unique_key == '') {
	return parent::BuildListSpecial($params);
	}

	return crc32($list_unique_key);
	}

	function IsCurrent($params)
	{
	$object =& $this->getObject($params);
	if ($object->GetID() == $this->Application->GetVar('m_cat_id')) {
	return true;
	}
	else {
	return false;
	}
	}

	/**
	* Substitutes category in last template base on current category
	* This is required becasue when you navigate catalog using AJAX, last_template is not updated
	* but when you open item edit from catalog last_template is used to build opener_stack
	* So, if we don't substitute m_cat_id in last_template, after saving item we'll get redirected
	* to the first category we've opened, not the one we navigated to using AJAX
	*
	* @param Array $params
	*/
	function UpdateLastTemplate($params)
	{
	$category_id = $this->Application->GetVar('m_cat_id');

	$wid = $this->Application->GetVar('m_wid');
	list($index_file, $env) = explode('\|', $this->Application->RecallVar(rtrim('last_template_'.$wid, '_')), 2);

	$vars_backup = Array ();
	- $vars = $this->Application->HttpQuery->processQueryString( str_replace('%5C', '\\', $env) );
	+ $vars = $this->Application->processQueryString( str_replace('%5C', '\\', $env) );

	foreach ($vars as $var_name => $var_value) {
	$vars_backup[$var_name] = $this->Application->GetVar($var_name);
	$this->Application->SetVar($var_name, $var_value);
	}

	// update required fields
	$this->Application->SetVar('m_cat_id', $category_id);
	$this->Application->Session->SaveLastTemplate($params['template']);

	foreach ($vars_backup as $var_name => $var_value) {
	$this->Application->SetVar($var_name, $var_value);
	}
	}

	function GetParentCategory($params)
	{
	$parent_id = $this->Application->getBaseCategory();
	$category_id = $this->Application->GetVar('m_cat_id');

	if ($category_id != $parent_id) {
	$sql = 'SELECT ParentId
	FROM ' . $this->Application->getUnitOption($this->Prefix, 'TableName') . '
	WHERE ' . $this->Application->getUnitOption($this->Prefix, 'IDField') . ' = ' . $category_id;
	$parent_id = $this->Conn->GetOne($sql);
	}

	return $parent_id;
	}

	function InitCacheUpdater($params)
	{
	kUtil::safeDefine('CACHE_PERM_CHUNK_SIZE', 30);

	$continue = $this->Application->GetVar('continue');
	$total_cats = (int) $this->Conn->GetOne('SELECT COUNT(*) FROM '.TABLE_PREFIX.'Category');

	if ($continue === false && $total_cats > CACHE_PERM_CHUNK_SIZE) {
	// first step, if category count > CACHE_PERM_CHUNK_SIZE, then ask for cache update
	return true;
	}

	if ($continue === false) {
	// if we don't have to ask, then assume user selected "Yes" in permcache update dialog
	$continue = 1;
	}

	$updater =& $this->Application->makeClass('kPermCacheUpdater', Array($continue));
	/* @var $updater kPermCacheUpdater */

	if ($continue === '0') { // No in dialog
	$updater->clearData();
	$this->Application->Redirect($params['destination_template']);
	}

	$ret = false; // don't ask for update
	if ($continue == 1) { // Initial run
	$updater->setData();
	}
	if ($continue == 2) { // Continuing
	// called from AJAX request => returns percent
	$needs_more = true;
	while ($needs_more && $updater->iteration <= CACHE_PERM_CHUNK_SIZE) {
	// until proceeeded in this step category count exceeds category per step limit
	$needs_more = $updater->DoTheJob();
	}

	if ($needs_more) {
	// still some categories are left for next step
	$updater->setData();
	}
	else {
	// all done, update left tree and redirect
	$updater->SaveData();

	$this->Application->HandleEvent($event, 'c:OnResetCMSMenuCache');

	$this->Application->RemoveVar('PermCache_UpdateRequired');
	$this->Application->StoreVar('RefreshStructureTree', 1);
	$this->Application->Redirect($params['destination_template']);
	}

	$ret = $updater->getDonePercent();
	}
	return $ret;
	}

	/**
	* Parses warning block, but with style="display: none;". Used during permissions saving from AJAX
	*
	* @param Array $params
	* @return string
	* @access protected
	*/
	protected function SaveWarning($params)
	{
	if ( $this->Prefix == 'st' ) {
	// don't use this method for other prefixes then Category, that use this tag processor
	return parent::SaveWarning($params);
	}

	$main_prefix = getArrayValue($params, 'main_prefix');
	if ( $main_prefix && $main_prefix != '$main_prefix' ) {
	$top_prefix = $main_prefix;
	}
	else {
	$top_prefix = $this->Application->GetTopmostPrefix($this->Prefix);
	}

	$temp_tables = substr($this->Application->GetVar($top_prefix . '_mode'), 0, 1) == 't';
	$modified = $this->Application->RecallVar($top_prefix . '_modified');

	if ( !$temp_tables ) {
	$this->Application->RemoveVar($top_prefix . '_modified');
	return '';
	}

	$block_name = $this->SelectParam($params, 'render_as,name');
	if ( $block_name ) {
	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $block_name;
	$block_params['edit_mode'] = $temp_tables ? 1 : 0;
	$block_params['display'] = $temp_tables && $modified ? 1 : 0;
	return $this->Application->ParseBlock($block_params);
	}

	return $temp_tables && $modified ? 1 : 0;
	}

	/**
	* Allows to detect if this prefix has something in clipboard
	*
	* @param Array $params
	* @return bool
	*/
	function HasClipboard($params)
	{
	$clipboard = $this->Application->RecallVar('clipboard');
	if ($clipboard) {
	$clipboard = unserialize($clipboard);
	foreach ($clipboard as $prefix => $clipboard_data) {
	foreach ($clipboard_data as $mode => $ids) {
	if (count($ids)) return 1;
	}
	}
	}
	return 0;
	}

	/**
	* Allows to detect if root category being edited
	*
	* @param Array $params
	*/
	function IsRootCategory($params)
	{
	$object =& $this->getObject($params);
	/* @var $object CategoriesItem */

	return $object->IsRoot();
	}

	/**
	* Returns home category id
	*
	* @param Array $params
	* @return int
	*/
	function HomeCategory($params)
	{
	return $this->Application->getBaseCategory();
	}

	/**
	* Used for disabling "Home" and "Up" buttons in category list
	*
	* @param Array $params
	* @return bool
	*/
	function ModuleRootCategory($params)
	{
	return $this->Application->GetVar('m_cat_id') == $this->Application->getBaseCategory();
	}

	function CatalogItemCount($params)
	{
	$params['skip_quering'] = true;
	$object =& $this->GetList($params);

	return $object->GetRecordsCount(false) != $object->GetRecordsCount() ? $object->GetRecordsCount().' / '.$object->GetRecordsCount(false) : $object->GetRecordsCount();
	}

	function InitCatalog($params)
	{
	$tab_prefixes = $this->Application->GetVar('tp'); // {all, <prefixes_list>, none}
	if ($tab_prefixes === false) $tab_prefixes = 'all';
	$skip_prefixes = isset($params['skip_prefixes']) && $params['skip_prefixes'] ? explode(',', $params['skip_prefixes']) : Array();
	$replace_main = isset($params['replace_m']) && $params['replace_m'];

	// get all prefixes available
	$prefixes = Array();
	foreach ($this->Application->ModuleInfo as $module_name => $module_data) {
	$prefix = $module_data['Var'];

	if ($prefix == 'adm'/* \|\| $prefix == 'm'*/) continue;

	if ($prefix == 'm' && $replace_main) {
	$prefix = 'c';
	}

	$prefixes[] = $prefix;
	}

	if ($tab_prefixes == 'none') {
	$skip_prefixes = array_unique(array_merge($skip_prefixes, $prefixes));
	unset($skip_prefixes[ array_search($replace_main ? 'c' : 'm', $skip_prefixes) ]);
	}
	elseif ($tab_prefixes != 'all') {
	// prefix list here
	$tab_prefixes = explode(',', $tab_prefixes); // list of prefixes that should stay
	$skip_prefixes = array_unique(array_merge($skip_prefixes, array_diff($prefixes, $tab_prefixes)));
	}

	$params['name'] = $params['render_as'];
	$params['skip_prefixes'] = implode(',', $skip_prefixes);
	return $this->Application->ParseBlock($params);
	}

	/**
	* Determines, that printed category/menu item is currently active (will also match parent category)
	*
	* @param Array $params
	* @return bool
	*/
	function IsActive($params)
	{
	static $current_path = null;

	if ( !isset($current_path) ) {
	$sql = 'SELECT ParentPath
	FROM ' . TABLE_PREFIX . 'Category
	WHERE CategoryId = ' . (int)$this->Application->GetVar('m_cat_id');
	$current_path = $this->Conn->GetOne($sql);
	}

	if ( array_key_exists('parent_path', $params) ) {
	$test_path = $params['parent_path'];
	}
	else {
	$template = $params['template'];
	if ( $template ) {
	// when using from "c:CachedMenu" tag
	$sql = 'SELECT ParentPath
	FROM ' . TABLE_PREFIX . 'Category
	WHERE NamedParentPath = ' . $this->Conn->qstr('Content/' . $template);
	$test_path = $this->Conn->GetOne($sql);
	}
	else {
	// when using from "c:PrintList" tag
	$cat_id = array_key_exists('cat_id', $params) && $params['cat_id'] ? $params['cat_id'] : false;
	if ( $cat_id === false ) {
	// category not supplied -> get current from PrintList
	$category =& $this->getObject($params);
	}
	else {
	if ( "$cat_id" == 'Root' ) {
	$cat_id = $this->Application->findModule('Name', $params['module'], 'RootCat');
	}

	$category =& $this->Application->recallObject($this->Prefix . '.-c' . $cat_id, $this->Prefix, Array ('skip_autoload' => true));
	/* @var $category CategoriesItem */

	$category->Load($cat_id);
	}

	$test_path = $category->GetDBField('ParentPath');
	}
	}

	return strpos($current_path, $test_path) !== false;
	}

	/**
	* Checks if user have one of required permissions
	*
	* @param Array $params
	* @return bool
	*/
	function HasPermission($params)
	{
	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	$params['raise_warnings'] = 0;
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$params['cat_id'] = $object->isLoaded() ? $object->GetDBField('ParentPath') : $this->Application->GetVar('m_cat_id');
	return $perm_helper->TagPermissionCheck($params);
	}

	/**
	* Prepares name for field with event in it (used only on front-end)
	*
	* @param Array $params
	* @return string
	*/
	function SubmitName($params)
	{
	return 'events[' . $this->Prefix . '][' . $params['event'] . ']';
	}

	/**
	* Returns last modification date of items in category / system
	*
	* @param Array $params
	* @return string
	*/
	function LastUpdated($params)
	{
	$category_id = (int)$this->Application->GetVar('m_cat_id');
	$local = array_key_exists('local', $params) && ($category_id > 0) ? $params['local'] : false;

	$serial_name = $this->Application->incrementCacheSerial('c', $local ? $category_id : null, false);
	$cache_key = 'category_last_updated[%' . $serial_name . '%]';

	$row_data = $this->Application->getCache($cache_key);

	if ( $row_data === false ) {
	if ( $local && ($category_id > 0) ) {
	// scan only current category & it's children
	list ($tree_left, $tree_right) = $this->Application->getTreeIndex($category_id);

	$sql = 'SELECT MAX(Modified) AS ModDate, MAX(CreatedOn) AS NewDate
	FROM ' . TABLE_PREFIX . 'Category
	WHERE TreeLeft BETWEEN ' . $tree_left . ' AND ' . $tree_right;
	}
	else {
	// scan all categories in system
	$sql = 'SELECT MAX(Modified) AS ModDate, MAX(CreatedOn) AS NewDate
	FROM ' . TABLE_PREFIX . 'Category';
	}

	$this->Conn->nextQueryCachable = true;
	$row_data = $this->Conn->GetRow($sql);
	$this->Application->setCache($cache_key, $row_data);
	}

	if ( !$row_data ) {
	return '';
	}

	$date = $row_data[$row_data['NewDate'] > $row_data['ModDate'] ? 'NewDate' : 'ModDate'];

	// format date
	$format = isset($params['format']) ? $params['format'] : '_regional_DateTimeFormat';

	if ( preg_match("/_regional_(.*)/", $format, $regs) ) {
	$lang =& $this->Application->recallObject('lang.current');
	/* @var $lang LanguagesItem */

	if ( $regs[1] == 'DateTimeFormat' ) {
	// combined format
	$format = $lang->GetDBField('DateFormat') . ' ' . $lang->GetDBField('TimeFormat');
	}
	else {
	// simple format
	$format = $lang->GetDBField($regs[1]);
	}
	}

	return adodb_date($format, $date);
	}

	function CategoryItemCount($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBList */

	$params['cat_id'] = $object->GetID();

	$count_helper =& $this->Application->recallObject('CountHelper');
	/* @var $count_helper kCountHelper */

	return $count_helper->CategoryItemCount($params['prefix'], $params);
	}

	/**
	* Returns prefix + any word (used for shared between categories per page settings)
	*
	* @param Array $params
	* @return string
	*/
	function VarName($params)
	{
	return $this->Prefix.'_'.$params['type'];
	}

	/**
	* Checks if current category is valid symbolic link to another category
	*
	* @param Array $params
	* @return string
	*/
	function IsCategorySymLink($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBList */

	$sym_category_id = $object->GetDBField('SymLinkCategoryId');

	if (is_null($sym_category_id))
	{
	return false;
	}

	$id_field = $this->Application->getUnitOption($this->Prefix, 'IDField');
	$table_name = $this->Application->getUnitOption($this->Prefix, 'TableName');

	$sql = 'SELECT '.$id_field.'
	FROM '.$table_name.'
	WHERE '.$id_field.' = '.$sym_category_id;

	return $this->Conn->GetOne($sql)? true : false;
	}

	/**
	* Returns module prefix based on root category for given
	*
	* @param Array $params
	* @return string
	*/
	function GetModulePrefix($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$parent_path = explode('\|', substr($object->GetDBField('ParentPath'), 1, -1));

	$category_helper =& $this->Application->recallObject('CategoryHelper');
	/* @var $category_helper CategoryHelper */

	$module_info = $category_helper->getCategoryModule($params, $parent_path);
	return $module_info['Var'];
	}

	function ImageSrc($params)
	{
	list ($ret, $tag_processed) = $this->processAggregatedTag('ImageSrc', $params, $this->getPrefixSpecial());
	return $tag_processed ? $ret : false;
	}

	function PageLink($params)
	{
	$params['m_cat_page'] = $this->Application->GetVar($this->getPrefixSpecial() . '_Page');

	return parent::PageLink($params);
	}

	/**
	* Returns spelling suggestions against search keyword
	*
	* @param Array $params
	* @return string
	* @access protected
	*/
	protected function SpellingSuggestions($params)
	{
	$keywords = kUtil::unhtmlentities( trim($this->Application->GetVar('keywords')) );
	if ( !$keywords ) {
	return '';
	}

	// 1. try to get already cached suggestion
	$cache_key = 'search.suggestion[%SpellingDictionary%]:' . $keywords;
	$suggestion = $this->Application->getCache($cache_key);

	if ( $suggestion !== false ) {
	return $suggestion;
	}

	$table_name = $this->Application->getUnitOption('spelling-dictionary', 'TableName');

	// 2. search suggestion in database
	$this->Conn->nextQueryCachable = true;
	$sql = 'SELECT SuggestedCorrection
	FROM ' . $table_name . '
	WHERE MisspelledWord = ' . $this->Conn->qstr($keywords);
	$suggestion = $this->Conn->GetOne($sql);

	if ( $suggestion !== false ) {
	$this->Application->setCache($cache_key, $suggestion);

	return $suggestion;
	}

	// 3. suggestion not found in database, ask webservice
	$app_id = $this->Application->ConfigValue('YahooApplicationId');
	$url = 'http://search.yahooapis.com/WebSearchService/V1/spellingSuggestion?appid=' . $app_id . '&query=';

	$curl_helper =& $this->Application->recallObject('CurlHelper');
	/* @var $curl_helper kCurlHelper */

	$xml_data = $curl_helper->Send( $url . urlencode($keywords) );

	$xml_helper =& $this->Application->recallObject('kXMLHelper');
	/* @var $xml_helper kXMLHelper */

	$root_node =& $xml_helper->Parse($xml_data);
	/* @var $root_node kXMLNode */

	$result = $root_node->FindChild('RESULT');
	/* @var $result kXMLNode */

	if ( is_object($result) ) {
	// webservice responded -> save in local database
	$fields_hash = Array ('MisspelledWord' => $keywords, 'SuggestedCorrection' => $result->Data);

	$this->Conn->doInsert($fields_hash, $table_name);
	$this->Application->setCache($cache_key, $result->Data);

	return $result->Data;
	}

	return '';
	}

	/**
	* Shows link for searching by suggested word
	*
	* @param Array $params
	* @return string
	*/
	function SuggestionLink($params)
	{
	$params['keywords'] = $this->SpellingSuggestions($params);

	return $this->Application->ProcessParsedTag('m', 'Link', $params);
	}

	function InitCatalogTab($params)
	{
	$tab_params['mode'] = $this->Application->GetVar('tm'); // single/multi selection possible
	$tab_params['special'] = $this->Application->GetVar('ts'); // use special for this tab
	$tab_params['dependant'] = $this->Application->GetVar('td'); // is grid dependant on categories grid

	// set default params (same as in catalog)
	if ($tab_params['mode'] === false) $tab_params['mode'] = 'multi';
	if ($tab_params['special'] === false) $tab_params['special'] = '';
	if ($tab_params['dependant'] === false) $tab_params['dependant'] = 'yes';

	// pass params to block with tab content
	$params['name'] = $params['render_as'];
	$special = $tab_params['special'] ? $tab_params['special'] : $this->Special;
	$params['prefix'] = trim($this->Prefix.'.'.$special, '.');

	$prefix_append = $this->Application->GetVar('prefix_append');
	if ($prefix_append) {
	$params['prefix'] .= $prefix_append;
	}

	$default_grid = array_key_exists('default_grid', $params) ? $params['default_grid'] : 'Default';
	$radio_grid = array_key_exists('radio_grid', $params) ? $params['radio_grid'] : 'Radio';

	$params['cat_prefix'] = trim('c.'.($tab_params['special'] ? $tab_params['special'] : $this->Special), '.');
	$params['tab_mode'] = $tab_params['mode'];
	$params['grid_name'] = ($tab_params['mode'] == 'multi') ? $default_grid : $radio_grid;
	$params['tab_dependant'] = $tab_params['dependant'];
	$params['show_category'] = $tab_params['special'] == 'showall' ? 1 : 0; // this is advanced view -> show category name

	if ($special == 'showall' \|\| $special == 'user') {
	$params['grid_name'] .= 'ShowAll';
	}

	// use $pass_params to be able to pass 'tab_init' parameter from m_ModuleInclude tag
	return $this->Application->ParseBlock($params, 1);
	}

	/**
	* Show CachedNavbar of current item primary category
	*
	* @param Array $params
	* @return string
	*/
	function CategoryName($params)
	{
	// show category cachednavbar of
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$category_id = isset($params['cat_id']) ? $params['cat_id'] : $object->GetDBField('CategoryId');

	$cache_key = 'category_paths[%CIDSerial:' . $category_id . '%][%PhrasesSerial%][Adm:' . (int)$this->Application->isAdmin . ']';
	$category_path = $this->Application->getCache($cache_key);

	if ($category_path === false) {
	// not chached
	if ($category_id > 0) {
	$cached_navbar = $object->GetField('CachedNavbar');

	if ($category_id == $object->GetDBField('ParentId')) {
	// parent category cached navbar is one element smaller, then current ones
	$cached_navbar = explode('&\|&', $cached_navbar);
	array_pop($cached_navbar);
	$cached_navbar = implode('&\|&', $cached_navbar);
	}
	else {
	// no relation with current category object -> query from db
	$language_id = (int)$this->Application->GetVar('m_lang');
	if (!$language_id) {
	$language_id = 1;
	}

	$sql = 'SELECT l' . $language_id . '_CachedNavbar
	FROM ' . $object->TableName . '
	WHERE ' . $object->IDField . ' = ' . $category_id;
	$cached_navbar = $this->Conn->GetOne($sql);
	}

	$cached_navbar = preg_replace('/^(Content&\\|&\|Content)/i', '', $cached_navbar);

	$category_path = trim($this->CategoryName( Array('cat_id' => 0) ).' > '.str_replace('&\|&', ' > ', $cached_navbar), ' > ');
	}
	else {
	$category_path = $this->Application->Phrase(($this->Application->isAdmin ? 'la_' : 'lu_') . 'rootcategory_name');
	}

	$this->Application->setCache($cache_key, $category_path);
	}

	return $category_path;
	}

	// structure related

	/**
	* Returns page object based on requested params
	*
	* @param Array $params
	* @return CategoriesItem
	*/
	function &_getPage($params)
	{
	$page =& $this->Application->recallObject($this->Prefix . '.-virtual', null, $params);
	/* @var $page kDBItem */

	// 1. load by given id
	$page_id = array_key_exists('page_id', $params) ? $params['page_id'] : false;
	if ($page_id) {
	if ($page_id != $page->GetID()) {
	// load if different
	$page->Load($page_id);
	}

	return $page;
	}

	// 2. load by template
	$template = array_key_exists('page', $params) ? $params['page'] : '';
	if (!$template) {
	$template = $this->Application->GetVar('t');
	}

	// different path in structure AND design template differes from requested template
	$structure_path_match = strtolower( $page->GetDBField('NamedParentPath') ) == strtolower('Content/' . $template);
	$design_match = $page->GetDBField('CachedTemplate') == $template;

	if (!$structure_path_match && !$design_match) {
	// Same sql like in "c:getPassedID". Load, when current page object doesn't match requested page object
	$themes_helper =& $this->Application->recallObject('ThemesHelper');
	/* @var $themes_helper kThemesHelper */

	$page_id = $themes_helper->getPageByTemplate($template);

	$page->Load($page_id);
	}

	return $page;
	}

	/**
	* Returns requested content block content of current or specified page
	*
	* @param Array $params
	* @return string
	*/
	function ContentBlock($params)
	{
	$num = getArrayValue($params, 'num');
	if (!$num) {
	return 'NO CONTENT NUM SPECIFIED';
	}

	$page =& $this->_getPage($params);
	/* @var $page kDBItem */

	if (!$page->isLoaded()) {
	// page is not created yet => all blocks are empty
	return '';
	}

	$page_id = $page->GetID();

	$content =& $this->Application->recallObject('content.-block', null, Array ('skip_autoload' => true));
	/* @var $content kDBItem */

	$data = Array ('PageId' => $page_id, 'ContentNum' => $num);
	$content->Load($data);

	if (!$content->isLoaded()) {
	// bug: missing content blocks are created even if user have no SMS-management rights
	$content->SetFieldsFromHash($data);
	$content->Create();
	}

	$edit_code_before = $edit_code_after = '';

	if (EDITING_MODE == EDITING_MODE_CONTENT) {
	$bg_color = isset($params['bgcolor']) ? $params['bgcolor'] : '#ffffff';
	$url_params = Array (
	'pass' => 'm,c,content',
	'm_opener' => 'd',
	'c_id' => $page->GetID(),
	'content_id' => $content->GetID(),
	'front' => 1,
	'admin' => 1,
	'__URLENCODE__' => 1,
	'__NO_REWRITE__'=> 1,
	'escape' => 1,
	'index_file' => 'index.php',
	// 'bgcolor' => $bg_color,
	// '__FORCE_SID__' => 1
	);

	// link from Front-End to admin, don't remove "index.php"
	$edit_url = $this->Application->HREF('categories/edit_content', ADMIN_DIRECTORY, $url_params, 'index.php');
	$edit_code_before = '
	<div class="cms-edit-btn-container">
	<div class="cms-edit-btn" onclick="$form_name=\'kf_cont_'.$content->GetID().'\'; std_edit_item(\'content\', \'categories/edit_content\');">
	<div class="cms-btn-image">
	<img src="' . $this->Application->BaseURL() . 'core/admin_templates/img/top_frame/icons/content_mode.png" width="15" height="16" alt=""/>
	</div>
	<div class="cms-btn-text">' . $this->Application->Phrase('la_btn_EditContent', false, true) . ' '.(defined('DEBUG_MODE') && DEBUG_MODE ? " - #{$num}" : '').'</div>
	</div>
	<div class="cms-btn-content">';

	$edit_form = '<form method="POST" style="display: inline; margin: 0px" name="kf_cont_'.$content->GetID().'" id="kf_cont_'.$content->GetID().'" action="'.$edit_url.'">';
	$edit_form .= '<input type="hidden" name="c_id" value="'.$page->GetID().'"/>';
	$edit_form .= '<input type="hidden" name="content_id" value="'.$content->GetID().'"/>';
	$edit_form .= '<input type="hidden" name="front" value="1"/>';
	$edit_form .= '<input type="hidden" name="bgcolor" value="'.$bg_color.'"/>';
	$edit_form .= '<input type="hidden" name="m_lang" value="'.$this->Application->GetVar('m_lang').'"/>';
	$edit_form .= '</form>';

	$edit_code_after = '</div></div>';

	if (array_key_exists('forms_later', $params) && $params['forms_later']) {
	$all_forms = $this->Application->GetVar('all_forms');
	$this->Application->SetVar('all_forms', $all_forms . $edit_form);
	}
	else {
	$edit_code_after .= $edit_form;
	}
	}

	if ($this->Application->GetVar('_editor_preview_') == 1) {
	$data = $this->Application->RecallVar('_editor_preview_content_');
	} else {
	$data = $content->GetField('Content');
	}

	$data = $edit_code_before . $this->_transformContentBlockData($data, $params) . $edit_code_after;

	if ($data != '') {
	$this->Application->Parser->DataExists = true;
	}

	return $data;
	}

	/**
	* Apply all kinds of content block data transformations without rewriting ContentBlock tag
	*
	* @param string $data
	* @param Array $params
	* @return string
	*/
	function _transformContentBlockData(&$data, $params)
	{
	return $data;
	}

	/**
	* Returns current page name or page based on page/page_id parameters
	*
	* @param Array $params
	* @return string
	* @todo Used?
	*/
	function PageName($params)
	{
	$page =& $this->_getPage($params);

	return $page->GetDBField('Name');
	}

	/**
	* Returns current/given page information
	*
	* @param Array $params
	* @return string
	*/
	function PageInfo($params)
	{
	$page =& $this->_getPage($params);

	switch ($params['type']) {
	case 'title':
	$db_field = 'Title';
	break;

	case 'htmlhead_title':
	$db_field = 'Name';
	break;

	case 'meta_title':
	$db_field = 'MetaTitle';
	break;

	case 'menu_title':
	$db_field = 'MenuTitle';
	break;

	case 'meta_keywords':
	$db_field = 'MetaKeywords';
	$cat_field = 'Keywords';
	break;

	case 'meta_description':
	$db_field = 'MetaDescription';
	$cat_field = 'Description';
	break;

	case 'tracking':
	case 'index_tools':
	if (!EDITING_MODE) {
	$tracking = $page->GetDBField('IndexTools');
	return $tracking ? $tracking : $this->Application->ConfigValue('cms_DefaultTrackingCode');
	}
	// no break here on purpose

	default:
	return '';
	}

	$default = isset($params['default']) ? $params['default'] : '';
	$val = $page->GetField($db_field);
	if (!$default) {
	if ($this->Application->isModuleEnabled('In-Portal')) {
	if (!$val && ($params['type'] == 'meta_keywords' \|\| $params['type'] == 'meta_description')) {
	// take category meta if it's not set for the page
	return $this->Application->ProcessParsedTag('c', 'Meta', Array('name' => $cat_field));
	}
	}
	}

	if (isset($params['force_default']) && $params['force_default']) {
	return $default;
	}

	if (preg_match('/^_Auto:/', $val)) {
	$val = $default;

	/*if ($db_field == 'Title') {
	$page->SetDBField($db_field, $default);
	$page->Update();
	}*/
	}
	elseif ($page->GetID() == false) {
	return $default;
	}

	return $val;
	}

	/**
	* Includes admin css and js, that are required for cms usage on Front-Edn
	*
	* @param Array $params
	* @return string
	* @access protected
	*/
	protected function EditingScripts($params)
	{
	if ( $this->Application->GetVar('admin_scripts_included') \|\| !EDITING_MODE ) {
	return '';
	}

	$this->Application->SetVar('admin_scripts_included', 1);
	$js_url = $this->Application->BaseURL() . 'core/admin_templates/js';

	$minify_helper =& $this->Application->recallObject('MinifyHelper');
	/* @var $minify_helper MinifyHelper */

	$to_compress = Array (
	$js_url . '/jquery/thickbox/thickbox.css',
	$js_url . '/../incs/cms.css',
	);

	$css_compressed = $minify_helper->CompressScriptTag(Array ('files' => implode('\|', $to_compress)));

	$ret = '<link rel="stylesheet" href="' . $css_compressed . '" type="text/css" media="screen"/>' . "\n";

	if ( EDITING_MODE == EDITING_MODE_DESIGN ) {
	$ret .= ' <style type="text/css" media="all">
	div.movable-element .movable-header { cursor: move; }
	</style>';
	}

	$ret .= '<script type="text/javascript" src="' . $js_url . '/jquery/jquery.pack.js"></script>' . "\n";
	$ret .= '<script type="text/javascript" src="' . $js_url . '/jquery/jquery-ui.custom.min.js"></script>' . "\n";

	$to_compress = Array (
	$js_url . '/is.js',
	$js_url . '/application.js',
	$js_url . '/script.js',
	$js_url . '/jquery/thickbox/thickbox.js',
	$js_url . '/template_manager.js',
	);

	$js_compressed = $minify_helper->CompressScriptTag( Array ('files' => implode('\|', $to_compress)) );

	$ret .= '<script type="text/javascript" src="' . $js_compressed . '"></script>' . "\n";
	$ret .= '<script language="javascript">' . "\n";
	$ret .= "TB.pathToImage = '" . $js_url . "/jquery/thickbox/loadingAnimation.gif';" . "\n";

	$template = $this->Application->GetVar('t');
	$theme_id = $this->Application->GetVar('m_theme');

	$url_params = Array ('block' => '#BLOCK#', 'theme-file_event' => '#EVENT#', 'theme_id' => $theme_id, 'source' => $template, 'pass' => 'all,theme-file', 'front' => 1, 'm_opener' => 'd', '__NO_REWRITE__' => 1, 'no_amp' => 1);
	$edit_template_url = $this->Application->HREF('themes/template_edit', ADMIN_DIRECTORY, $url_params, 'index.php');

	$url_params = Array ('theme-file_event' => 'OnSaveLayout', 'source' => $template, 'pass' => 'all,theme-file', '__NO_REWRITE__' => 1, 'no_amp' => 1);
	$save_layout_url = $this->Application->HREF('index', '', $url_params);

	$this_url = $this->Application->HREF('', '', Array ('editing_mode' => '#EDITING_MODE#', '__NO_REWRITE__' => 1, 'no_amp' => 1));
	$ret .= "var aTemplateManager = new TemplateManager('" . $edit_template_url . "', '" . $this_url . "', '" . $save_layout_url . "', " . (int)EDITING_MODE . ");\n";
	$ret .= "var main_title = '" . addslashes( $this->Application->ConfigValue('Site_Name') ) . "';" . "\n";

	$use_popups = (int)$this->Application->ConfigValue('UsePopups');
	$ret .= "var \$use_popups = " . ($use_popups > 0 ? 'true' : 'false') . ";\n";
	$ret .= "var \$modal_windows = " . ($use_popups == 2 ? 'true' : 'false') . ";\n";

	if ( EDITING_MODE != EDITING_MODE_BROWSE ) {
	$ret .= "var base_url = '" . $this->Application->BaseURL() . "';" . "\n";
	$ret .= 'TB.closeHtml = \'<img src="' . $js_url . '/../img/close_window15.gif" width="15" height="15" style="border-width: 0px;" alt="close"/><br/>\';' . "\n";

	$url_params = Array ('m_theme' => '', 'pass' => 'm', 'm_opener' => 'r', '__NO_REWRITE__' => 1, 'no_amp' => 1);
	$browse_url = $this->Application->HREF('catalog/catalog', ADMIN_DIRECTORY, $url_params, 'index.php');
	$browse_url = preg_replace('/&(admin\|editing_mode)=[\d]/', '', $browse_url);

	$ret .= '
	var topmost = window.top;

	topmost.document.title = document.title + \' - ' . addslashes($this->Application->Phrase('la_AdministrativeConsole', false)) . '\';
	t = \'' . $this->Application->GetVar('t') . '\';

	if (window.parent.frames["menu"] != undefined) {
	if ( $.isFunction(window.parent.frames["menu"].SyncActive) ) {
	window.parent.frames["menu"].SyncActive("' . $browse_url . '");
	}
	}
	';
	}

	$ret .= '</script>' . "\n";

	if ( EDITING_MODE != EDITING_MODE_BROWSE ) {
	// add form, so admin scripts could work
	$ret .= '<form id="kernel_form" name="kernel_form" enctype="multipart/form-data" method="post" action="' . $browse_url . '">
	<input type="hidden" name="MAX_FILE_SIZE" id="MAX_FILE_SIZE" value="' . MAX_UPLOAD_SIZE . '" />
	<input type="hidden" name="sid" id="sid" value="' . $this->Application->GetSID() . '" />
	</form>';
	}

	return $ret;
	}

	/**
	* Prints "Edit Page" button on cms page
	*
	* @param Array $params
	* @return string
	*/
	function EditPage($params)
	{
	if (!EDITING_MODE) {
	return '';
	}

	$display_mode = array_key_exists('mode', $params) ? $params['mode'] : false;
	$edit_code = '';

	$page =& $this->_getPage($params);

	if (!$page->isLoaded() \|\| (($display_mode != 'end') && (EDITING_MODE == EDITING_MODE_BROWSE))) {
	// when "EditingScripts" tag is not used, make sure, that scripts are also included
	return $this->EditingScripts($params);
	}

	// show "EditPage" button only for pages, that exists in structure
	if ($display_mode != 'end') {
	$edit_btn = '';

	if (EDITING_MODE == EDITING_MODE_CONTENT) {
	$url_params = Array(
	'pass' => 'm,c',
	'm_opener' => 'd',
	'c_id' => $page->GetID(),
	'c_mode' => 't',
	'c_event' => 'OnEdit',
	'front' => 1,
	'__URLENCODE__' => 1,
	'__NO_REWRITE__'=> 1,
	'index_file' => 'index.php',
	);

	$edit_url = $this->Application->HREF('categories/categories_edit', ADMIN_DIRECTORY, $url_params);

	$edit_btn .= '
	<div class="cms-section-properties-btn"' . ($display_mode === false ? ' style="margin: 0px;"' : '') . ' onmouseover="window.status=\'' . addslashes($edit_url) . '\'; return true" onclick="$form_name=\'kf_'.$page->GetID().'\'; std_edit_item(\'c\', \'categories/categories_edit\');">
	<div class="cms-btn-image">
	<img src="' . $this->Application->BaseURL() . 'core/admin_templates/img/top_frame/icons/section_properties.png" width="15" height="16" alt=""/>
	</div>
	<div class="cms-btn-text">' . $this->Application->Phrase('la_btn_SectionProperties', false, true) . '</div>
	</div>' . "\n";
	} elseif (EDITING_MODE == EDITING_MODE_DESIGN) {
	$url_params = Array(
	'pass' => 'm,theme,theme-file',
	'm_opener' => 'd',
	'theme_id' => $this->Application->GetVar('m_theme'),
	'theme_mode' => 't',
	'theme_event' => 'OnEdit',
	'theme-file_id' => $this->_getThemeFileId(),
	'front' => 1,
	'__URLENCODE__' => 1,
	'__NO_REWRITE__'=> 1,
	'index_file' => 'index.php',
	);

	$edit_url = $this->Application->HREF('themes/file_edit', ADMIN_DIRECTORY, $url_params);

	$edit_btn .= '
	<div class="cms-layout-btn-container"' . ($display_mode === false ? ' style="margin: 0px;"' : '') . '>
	<div class="cms-save-layout-btn" onclick="aTemplateManager.saveLayout(); return false;">
	<div class="cms-btn-image">
	<img src="' . $this->Application->BaseURL() . 'core/admin_templates/img/top_frame/icons/save_button.gif" width="16" height="16" alt=""/>
	</div>
	<div class="cms-btn-text">' . $this->Application->Phrase('la_btn_SaveChanges', false, true) . '</div>
	</div>
	<div class="cms-cancel-layout-btn" onclick="aTemplateManager.cancelLayout(); return false;">
	<div class="cms-btn-image">
	<img src="' . $this->Application->BaseURL() . 'core/admin_templates/img/top_frame/icons/cancel_button.gif" width="16" height="16" alt=""/>
	</div>
	<div class="cms-btn-text">' . $this->Application->Phrase('la_btn_Cancel', false, true) . '</div>
	</div>
	</div>

	<div class="cms-section-properties-btn"' . ($display_mode === false ? ' style="margin: 0px;"' : '') . ' onmouseover="window.status=\'' . addslashes($edit_url) . '\'; return true" onclick="$form_name=\'kf_'.$page->GetID().'\'; std_edit_item(\'theme\', \'themes/file_edit\');">
	<div class="cms-btn-image">
	<img src="' . $this->Application->BaseURL() . 'core/admin_templates/img/top_frame/icons/section_properties.png" width="15" height="16" alt=""/>
	</div>
	<div class="cms-btn-text">' . $this->Application->Phrase('la_btn_SectionTemplate', false, true) . '</div>
	</div>' . "\n";
	}

	if ($display_mode == 'start') {
	// button with border around the page
	$edit_code .= '<div class="cms-section-properties-btn-container">' . $edit_btn . '<div class="cms-btn-content">';

	}
	else {
	// button without border around the page
	$edit_code .= $edit_btn;
	}
	}

	if ($display_mode == 'end') {
	// draw border around the page
	$edit_code .= '</div></div>';
	}

	if ($display_mode != 'end') {
	$edit_code .= '<form method="POST" style="display: inline; margin: 0px" name="kf_'.$page->GetID().'" id="kf_'.$page->GetID().'" action="'.$edit_url.'"></form>';

	// when "EditingScripts" tag is not used, make sure, that scripts are also included
	$edit_code .= $this->EditingScripts($params);
	}

	return $edit_code;
	}

	function _getThemeFileId()
	{
	$template = $this->Application->GetVar('t');

	if (!$this->Application->TemplatesCache->TemplateExists($template) && !$this->Application->isAdmin) {
	$cms_handler =& $this->Application->recallObject($this->Prefix . '_EventHandler');
	/* @var $cms_handler CategoriesEventHandler */

	$template = ltrim($cms_handler->GetDesignTemplate(), '/');
	}

	$file_path = dirname($template) == '.' ? '' : '/' . dirname($template);
	$file_name = basename($template);

	$sql = 'SELECT FileId
	FROM ' . TABLE_PREFIX . 'ThemeFiles
	WHERE (ThemeId = ' . (int)$this->Application->GetVar('m_theme') . ') AND (FilePath = ' . $this->Conn->qstr($file_path) . ') AND (FileName = ' . $this->Conn->qstr($file_name . '.tpl') . ')';
	return $this->Conn->GetOne($sql);
	}

	/**
	* Builds site menu
	*
	* @param Array $params
	* @return string
	*/
	function CachedMenu($params)
	{
	$menu_helper =& $this->Application->recallObject('MenuHelper');
	/* @var $menu_helper MenuHelper */

	return $menu_helper->menuTag($this->getPrefixSpecial(), $params);
	}

	/**
	* Trick to allow some kind of output formatting when using CachedMenu tag
	*
	* @param Array $params
	* @return bool
	*/
	function SplitColumn($params)
	{
	return $this->Application->GetVar($params['i']) > ceil($params['total'] / $params['columns']);
	}

	/**
	* Returns direct children count of given category
	*
	* @param Array $params
	* @return int
	*/
	function HasSubCats($params)
	{
	$sql = 'SELECT COUNT(*)
	FROM ' . TABLE_PREFIX . 'Category
	WHERE ParentId = ' . $params['cat_id'];

	return $this->Conn->GetOne($sql);
	}

	/**
	* Prints sub-pages of given/current page.
	*
	* @param Array $params
	* @return string
	* @todo This could be reached by using "parent_cat_id" parameter. Only difference here is new block parameter "path". Need to rewrite.
	*/
	function PrintSubPages($params)
	{
	$list =& $this->Application->recallObject($this->getPrefixSpecial(), $this->Prefix.'_List', $params);
	/* @var $list kDBList */

	$category_id = array_key_exists('category_id', $params) ? $params['category_id'] : $this->Application->GetVar('m_cat_id');

	$list->addFilter('current_pages', TABLE_PREFIX . 'CategoryItems.CategoryId = ' . $category_id);
	$list->Query();
	$list->GoFirst();

	$o = '';
	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $params['render_as'];

	while (!$list->EOL()) {
	$block_params['path'] = $list->GetDBField('Path');
	$o .= $this->Application->ParseBlock($block_params);

	$list->GoNext();
	}

	return $o;
	}

	/**
	* Builds link for browsing current page on Front-End
	*
	* @param Array $params
	* @return string
	*/
	function PageBrowseLink($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$themes_helper =& $this->Application->recallObject('ThemesHelper');
	/* @var $themes_helper kThemesHelper */

	$site_config_helper =& $this->Application->recallObject('SiteConfigHelper');
	/* @var $site_config_helper SiteConfigHelper */

	$settings = $site_config_helper->getSettings();

	$url_params = Array (
	'm_cat_id' => $object->GetID(),
	'm_theme' => $themes_helper->getCurrentThemeId(),
	'editing_mode' => $settings['default_editing_mode'],
	'pass' => 'm',
	'admin' => 1,
	'index_file' => 'index.php'
	);

	if ($this->Application->ConfigValue('UseModRewrite')) {
	$url_params['__MOD_REWRITE__'] = 1;
	}

	return $this->Application->HREF($object->GetDBField('NamedParentPath'), '_FRONT_END_', $url_params);
	}

	function DirectLink($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$themes_helper =& $this->Application->recallObject('ThemesHelper');
	/* @var $themes_helper kThemesHelper */

	$url_params = Array (
	'm_cat_id' => $object->GetID(),
	'm_theme' => $themes_helper->getCurrentThemeId(),
	'pass' => 'm',
	'index_file' => 'index.php',
	'authkey' => $object->GetDBField('DirectLinkAuthKey'),
	);

	if ($this->Application->ConfigValue('UseModRewrite')) {
	$url_params['__MOD_REWRITE__'] = 1;
	}

	return $this->Application->HREF($object->GetDBField('NamedParentPath'), '_FRONT_END_', $url_params);
	}

	/**
	* Builds link to cms page (used?)
	*
	* @param Array $params
	* @return string
	*/
	function ContentPageLink($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$params['t'] = $object->GetDBField('NamedParentPath');
	$params['m_cat_id'] = 0;

	return $this->Application->ProcessParsedTag('m', 'Link', $params);
	}

	/**
	* Prepares cms page description for search result page
	*
	* @param Array $params
	* @return string
	*/
	function SearchDescription($params)
	{
	$object =& $this->getObject($params);
	$desc = $object->GetField('MetaDescription');
	if (!$desc) {
	$sql = 'SELECT *
	FROM ' . TABLE_PREFIX . 'PageContent
	WHERE PageId = ' . $object->GetID() . ' AND ContentNum = 1';
	$content = $this->Conn->GetRow($sql);

	if ($content['l'.$this->Application->GetVar('m_lang').'_Content']) {
	$desc = $content['l'.$this->Application->GetVar('m_lang').'_Content'];
	}
	else {
	$desc = $content['l'.$this->Application->GetDefaultLanguageId().'_Content'];
	}
	}

	return mb_substr($desc, 0, 300).(mb_strlen($desc) > 300 ? '...' : '');
	}

	/**
	* Simplified version of "c:CategoryLink" for "c:PrintList"
	*
	* @param Array $params
	* @return string
	* @todo Used? Needs refactoring.
	*/
	function EnterCatLink($params)
	{
	$object =& $this->getObject($params);

	$url_params = Array ('pass' => 'm', 'm_cat_id' => $object->GetID());
	return $this->Application->HREF($params['template'], '', $url_params);
	}

	/**
	* Simplified version of "c:CategoryPath", that do not use blocks for rendering
	*
	* @param Array $params
	* @return string
	* @todo Used? Maybe needs to be removed.
	*/
	function PagePath($params)
	{
	$object =& $this->getObject($params);
	$path = $object->GetField('CachedNavbar');
	if ($path) {
	$items = explode('&\|&', $path);
	array_shift($items);
	return implode(' -> ', $items);
	}

	return '';
	}

	/**
	* Returns configuration variable value
	*
	* @param Array $params
	* @return string
	* @todo Needs to be replaced with "m:GetConfig" tag; Not used now (were used on structure_edit.tpl).
	*/
	function AllowManualFilenames($params)
	{
	return $this->Application->ConfigValue('ProjCMSAllowManualFilenames');
	}

	/**
	* Draws path to current page (each page can be link to it)
	*
	* @param Array $params
	* @return string
	*/
	function CurrentPath($params)
	{
	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $block_params['render_as'];

	$object =& $this->Application->recallObject($this->Prefix);
	/* @var $object kDBItem */

	$category_ids = explode('\|', substr($object->GetDBField('ParentPath'), 1, -1));

	$id_field = $this->Application->getUnitOption($this->Prefix, 'IDField');
	$table_name = $this->Application->getUnitOption($this->Prefix, 'TableName');

	$language = (int)$this->Application->GetVar('m_lang');

	if (!$language) {
	$language = 1;
	}

	$sql = 'SELECT l'.$language.'_Name AS Name, NamedParentPath
	FROM '.$table_name.'
	WHERE '.$id_field.' IN ('.implode(',', $category_ids).')';
	$categories_data = $this->Conn->Query($sql);

	$ret = '';
	foreach ($categories_data as $index => $category_data) {
	if ($category_data['Name'] == 'Content') {
	continue;
	}
	$block_params['title'] = $category_data['Name'];
	$block_params['template'] = preg_replace('/^Content\//i', '', $category_data['NamedParentPath']);
	$block_params['is_first'] = $index == 1; // because Content is 1st element
	$block_params['is_last'] = $index == count($categories_data) - 1;

	$ret .= $this->Application->ParseBlock($block_params);
	}

	return $ret;
	}

	/**
	* Synonim to PrintList2 for "onlinestore" theme
	*
	* @param Array $params
	* @return string
	*/
	function ListPages($params)
	{
	return $this->PrintList2($params);
	}

	/**
	* Returns information about parser element locations in template
	*
	* @param Array $params
	* @return mixed
	*/
	function BlockInfo($params)
	{
	if (!EDITING_MODE) {
	return '';
	}

	$template_helper =& $this->Application->recallObject('TemplateHelper');
	/* @var $template_helper TemplateHelper */

	return $template_helper->blockInfo( $params['name'] );
	}

	/**
	* Hide all editing tabs except permission tab, when editing "Home" (ID = 0) category
	*
	* @param Array $params
	*/
	function ModifyUnitConfig($params)
	{
	$root_category = $this->Application->RecallVar('IsRootCategory_' . $this->Application->GetVar('m_wid'));
	if (!$root_category) {
	return ;
	}

	$edit_tab_presets = $this->Application->getUnitOption($this->Prefix, 'EditTabPresets');
	$edit_tab_presets['Default'] = Array (
	'permissions' => $edit_tab_presets['Default']['permissions'],
	);
	$this->Application->setUnitOption($this->Prefix, 'EditTabPresets', $edit_tab_presets);
	}

	/**
	* Prints catalog export templates
	*
	* @param Array $params
	* @return string
	*/
	function PrintCatalogExportTemplates($params)
	{
	$prefixes = explode(',', $params['prefixes']);

	$ret = Array ();
	foreach ($prefixes as $prefix) {
	if ($this->Application->prefixRegistred($prefix)) {
	$module_path = $this->Application->getUnitOption($prefix, 'ModuleFolder') . '/';
	$module_name = $this->Application->findModule('Path', $module_path, 'Name');

	$ret[$prefix] = mb_strtolower($module_name) . '/export';
	}
	}

	$json_helper =& $this->Application->recallObject('JSONHelper');
	/* @var $json_helper JSONHelper */

	return $json_helper->encode($ret);
	}

	/**
	* Checks, that "view in browse mode" functionality available
	*
	* @param Array $params
	* @return bool
	*/
	function BrowseModeAvailable($params)
	{
	$valid_special = $params['Special'] != 'user';
	$not_selector = $this->Application->GetVar('type') != 'item_selector';

	return $valid_special && $not_selector;
	}

	/**
	* Returns a link for editing product
	*
	* @param Array $params
	* @return string
	*/
	function ItemEditLink($params)
	{
	$object =& $this->getObject();
	/* @var $object kDBList */

	$edit_template = $this->Application->getUnitOption($this->Prefix, 'AdminTemplatePath') . '/' . $this->Application->getUnitOption($this->Prefix, 'AdminTemplatePrefix') . 'edit';

	$url_params = Array (
	'm_opener' => 'd',
	$this->Prefix.'_mode' => 't',
	$this->Prefix.'_event' => 'OnEdit',
	$this->Prefix.'_id' => $object->GetID(),
	'm_cat_id' => $object->GetDBField('ParentId'),
	'pass' => 'all,'.$this->Prefix,
	'no_pass_through' => 1,
	);

	return $this->Application->HREF($edit_template,'', $url_params);
	}

	function RelevanceIndicator($params)
	{
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$search_results_table = TABLE_PREFIX.'ses_'.$this->Application->GetSID().'_'.TABLE_PREFIX.'Search';
	$sql = 'SELECT Relevance
	FROM '.$search_results_table.'
	WHERE ResourceId = '.$object->GetDBField('ResourceId');

	$percents_off = (int)(100 - (100 * $this->Conn->GetOne($sql)));
	$percents_off = ($percents_off < 0) ? 0 : $percents_off;
	if ($percents_off) {
	$params['percent_off'] = $percents_off;
	$params['percent_on'] = 100 - $percents_off;
	$params['name'] = $this->SelectParam($params, 'relevance_normal_render_as,block_relevance_normal');
	}
	else {
	$params['name'] = $this->SelectParam($params, 'relevance_full_render_as,block_relevance_full');
	}
	return $this->Application->ParseBlock($params);
	}

	/**
	* Returns list of categories, that have category add/edit permission
	*
	* @param Array $params
	* @return string
	*/
	function AllowedCategoriesJSON($params)
	{
	if ($this->Application->RecallVar('user_id') == USER_ROOT) {
	$categories = true;
	}
	else {
	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	$perm_prefix = $this->Application->getUnitOption($this->Prefix, 'PermItemPrefix');
	$categories = $perm_helper->getPermissionCategories($perm_prefix . '.' . ($object->IsNewItem() ? 'ADD' : 'MODIFY'));
	}

	$json_helper =& $this->Application->recallObject('JSONHelper');
	/* @var $json_helper JSONHelper */

	return $json_helper->encode($categories);
	}

	function PageEditable($params)
	{
	if ($this->Application->isDebugMode()) {
	return true;
	}

	$object =& $this->getObject($params);
	/* @var $object kDBItem */

	return !$object->GetDBField('Protected');
	}
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/units/categories/categories_event_handler.php
	===================================================================
	--- branches/5.2.x/core/units/categories/categories_event_handler.php (revision 14713)
	+++ branches/5.2.x/core/units/categories/categories_event_handler.php (revision 14714)
	@@ -1,2538 +1,2788 @@
	<?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 CategoriesEventHandler extends kDBEventHandler {

	/**
	* Allows to override standard permission mapping
	*
	*/
	function mapPermissions()
	{
	parent::mapPermissions();

	$permissions = Array (
	'OnRebuildCache' => Array ('self' => 'add\|edit'),
	'OnCopy' => Array ('self' => true),
	'OnCut' => Array ('self' => 'edit'),
	'OnPasteClipboard' => Array ('self' => true),
	'OnPaste' => Array ('self' => 'add\|edit', 'subitem' => 'edit'),

	'OnRecalculatePriorities' => Array ('self' => 'add\|edit'), // category ordering
	'OnItemBuild' => Array ('self' => true), // always allow to view individual categories (regardless of CATEGORY.VIEW right)
	'OnUpdatePreviewBlock' => Array ('self' => true), // for FCKEditor integration
	);

	$this->permMapping = array_merge($this->permMapping, $permissions);
	}

	/**
	* Categories are sorted using special sorting event
	*
	*/
	function mapEvents()
	{
	parent::mapEvents();

	$events_map = Array (
	'OnMassMoveUp' => 'OnChangePriority',
	'OnMassMoveDown' => 'OnChangePriority',
	);

	$this->eventMethods = array_merge($this->eventMethods, $events_map);
	}

	/**
	* Checks user permission to execute given $event
	*
	* @param kEvent $event
	* @return bool
	* @access public
	*/
	public function CheckPermission(&$event)
	{
	if ($event->Name == 'OnResetCMSMenuCache') {
	// events from "Tools -> System Tools" section are controlled via that section "edit" permission

	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	$perm_value = $this->Application->CheckPermission('in-portal:service.edit');

	return $perm_helper->finalizePermissionCheck($event, $perm_value);
	}

	if (!$this->Application->isAdmin) {
	if ($event->Name == 'OnSetSortingDirect') {
	// allow sorting on front event without view permission
	return true;
	}

	if ($event->Name == 'OnItemBuild') {
	$category_id = $this->getPassedID($event);
	if ($category_id == 0) {
	return true;
	}
	}
	}

	if (in_array($event->Name, $this->_getMassPermissionEvents())) {
	$items = $this->_getPermissionCheckInfo($event);

	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	if (($event->Name == 'OnSave') && array_key_exists(0, $items)) {
	// adding new item (ID = 0)
	$perm_value = $perm_helper->AddCheckPermission($items[0]['ParentId'], $event->Prefix) > 0;
	}
	else {
	// leave only items, that can be edited
	$ids = Array ();
	$check_method = in_array($event->Name, Array ('OnMassDelete', 'OnCut')) ? 'DeleteCheckPermission' : 'ModifyCheckPermission';
	foreach ($items as $item_id => $item_data) {
	if ($perm_helper->$check_method($item_data['CreatedById'], $item_data['ParentId'], $event->Prefix) > 0) {
	$ids[] = $item_id;
	}
	}

	if (!$ids) {
	// no items left for editing -> no permission
	return $perm_helper->finalizePermissionCheck($event, false);
	}

	$perm_value = true;
	$event->setEventParam('ids', $ids); // will be used later by "kDBEventHandler::StoreSelectedIDs" method
	}

	return $perm_helper->finalizePermissionCheck($event, $perm_value);
	}

	if ($event->Name == 'OnRecalculatePriorities') {
	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	$category_id = $this->Application->GetVar('m_cat_id');

	return $perm_helper->AddCheckPermission($category_id, $event->Prefix) \|\| $perm_helper->ModifyCheckPermission(0, $category_id, $event->Prefix);
	}

	if ($event->Name == 'OnPasteClipboard') {
	// forces permission check to work by current category for "Paste In Category" operation
	$category_id = $this->Application->GetVar('m_cat_id');
	$this->Application->SetVar('c_id', $category_id);
	}

	return parent::CheckPermission($event);
	}

	/**
	* Returns events, that require item-based (not just event-name based) permission check
	*
	* @return Array
	*/
	function _getMassPermissionEvents()
	{
	return Array (
	'OnEdit', 'OnSave', 'OnMassDelete', 'OnMassApprove',
	'OnMassDecline', 'OnMassMoveUp', 'OnMassMoveDown',
	'OnCut',
	);
	}

	/**
	* Returns category item IDs, that require permission checking
	*
	* @param kEvent $event
	* @return string
	*/
	function _getPermissionCheckIDs(&$event)
	{
	if ($event->Name == 'OnSave') {
	$selected_ids = implode(',', $this->getSelectedIDs($event, true));
	if (!$selected_ids) {
	$selected_ids = 0; // when saving newly created item (OnPreCreate -> OnPreSave -> OnSave)
	}
	}
	else {
	// OnEdit, OnMassDelete events, when items are checked in grid
	$selected_ids = implode(',', $this->StoreSelectedIDs($event));
	}

	return $selected_ids;
	}

	/**
	* Returns information used in permission checking
	*
	* @param kEvent $event
	* @return Array
	*/
	function _getPermissionCheckInfo(&$event)
	{
	// when saving data from temp table to live table check by data from temp table
	$id_field = $this->Application->getUnitOption($event->Prefix, 'IDField');
	$table_name = $this->Application->getUnitOption($event->Prefix, 'TableName');

	if ($event->Name == 'OnSave') {
	$table_name = $this->Application->GetTempName($table_name, 'prefix:' . $event->Prefix);
	}

	$sql = 'SELECT ' . $id_field . ', CreatedById, ParentId
	FROM ' . $table_name . '
	WHERE ' . $id_field . ' IN (' . $this->_getPermissionCheckIDs($event) . ')';
	$items = $this->Conn->Query($sql, $id_field);

	if (!$items) {
	// when creating new category, then no IDs are stored in session
	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	list ($id, $fields_hash) = each($items_info);

	if (array_key_exists('ParentId', $fields_hash)) {
	$item_category = $fields_hash['ParentId'];
	}
	else {
	$item_category = $this->Application->RecallVar('m_cat_id'); // saved in c:OnPreCreate event permission checking
	}

	$items[$id] = Array (
	'CreatedById' => $this->Application->RecallVar('user_id'),
	'ParentId' => $item_category,
	);
	}

	return $items;
	}

	/**
	* Set's mark, that root category is edited
	*
	* @param kEvent $event
	*/
	function OnEdit(&$event)
	{
	$category_id = $this->Application->GetVar($event->getPrefixSpecial() . '_id');
	$home_category = $this->Application->getBaseCategory();

	$this->Application->StoreVar('IsRootCategory_'.$this->Application->GetVar('m_wid'), ($category_id === '0') \|\| ($category_id == $home_category));

	parent::OnEdit($event);

	if ($event->status == kEvent::erSUCCESS) {
	// keep "Section Properties" link (in browse modes) clean
	$this->Application->DeleteVar('admin');
	}
	}

	/**
	* Adds selected link to listing
	*
	* @param kEvent $event
	*/
	function OnProcessSelected(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$selected_ids = $this->Application->GetVar('selected_ids');

	$this->RemoveRequiredFields($object);
	$object->SetDBField($this->Application->RecallVar('dst_field'), $selected_ids['c']);
	$object->Update();

	$event->SetRedirectParam('opener', 'u');
	}

	/**
	* Apply system filter to categories list
	*
	* @param kEvent $event
	* @return void
	* @access protected
	* @see kDBEventHandler::OnListBuild()
	*/
	protected function SetCustomQuery(&$event)
	{
	parent::SetCustomQuery($event);

	$object =& $event->getObject();
	/* @var $object kDBList */

	// don't show "Content" category in advanced view
	$object->addFilter('system_categories', '%1$s.Status <> 4');

	// show system templates from current theme only + all virtual templates
	$object->addFilter('theme_filter', '%1$s.ThemeId = ' . $this->_getCurrentThemeId() . ' OR %1$s.ThemeId = 0');

	if ($event->Special == 'showall') {
	// if using recycle bin don't show categories from there
	$recycle_bin = $this->Application->ConfigValue('RecycleBinFolder');
	if ($recycle_bin) {
	$sql = 'SELECT TreeLeft, TreeRight
	FROM '.TABLE_PREFIX.'Category
	WHERE CategoryId = '.$recycle_bin;
	$tree_indexes = $this->Conn->GetRow($sql);

	$object->addFilter('recyclebin_filter', '%1$s.TreeLeft < '.$tree_indexes['TreeLeft'].' OR %1$s.TreeLeft > '.$tree_indexes['TreeRight']);
	}
	}

	if ($event->getEventParam('parent_cat_id') !== false) {
	$parent_cat_id = $event->getEventParam('parent_cat_id');

	if ("$parent_cat_id" == 'Root') {
	$module_name = $event->getEventParam('module') ? $event->getEventParam('module') : 'In-Commerce';
	$parent_cat_id = $this->Application->findModule('Name', $module_name, 'RootCat');
	}
	}
	else {
	$parent_cat_id = $this->Application->GetVar('c_id');
	if (!$parent_cat_id) {
	$parent_cat_id = $this->Application->GetVar('m_cat_id');
	}
	if (!$parent_cat_id) {
	$parent_cat_id = 0;
	}
	}

	if ("$parent_cat_id" == '0') {
	// replace "0" category with "Content" category id (this way template
	$parent_cat_id = $this->Application->getBaseCategory();
	}

	if ("$parent_cat_id" != 'any') {
	if ($event->getEventParam('recursive')) {
	if ($parent_cat_id > 0) {
	// not "Home" category
	$tree_indexes = $this->Application->getTreeIndex($parent_cat_id);

	$object->addFilter('parent_filter', TABLE_PREFIX.'Category.TreeLeft BETWEEN '.$tree_indexes['TreeLeft'].' AND '.$tree_indexes['TreeRight']);
	}
	}
	else {
	$object->addFilter('parent_filter', '%1$s.ParentId = '.$parent_cat_id);
	}
	}

	$object->addFilter('perm_filter', TABLE_PREFIX . 'PermCache.PermId = 1'); // check for CATEGORY.VIEW permission
	if ($this->Application->RecallVar('user_id') != USER_ROOT) {
	// apply permission filters to all users except "root"
	$view_filters = Array ();
	$groups = explode(',',$this->Application->RecallVar('UserGroups'));

	foreach ($groups as $group) {
	$view_filters[] = 'FIND_IN_SET('.$group.', ' . TABLE_PREFIX . 'PermCache.ACL)';
	}

	$view_filter = implode(' OR ', $view_filters);
	$object->addFilter('perm_filter2', $view_filter);
	}

	if (!$this->Application->isAdminUser) {
	// apply status filter only on front
	$object->addFilter('status_filter', $object->TableName.'.Status = 1');
	}

	// process "types" and "except" parameters
	$type_clauses = Array();

	$types = $event->getEventParam('types');
	$types = $types ? explode(',', $types) : Array ();

	$except_types = $event->getEventParam('except');
	$except_types = $except_types ? explode(',', $except_types) : Array ();

	if (in_array('related', $types) \|\| in_array('related', $except_types)) {
	$related_to = $event->getEventParam('related_to');
	if (!$related_to) {
	$related_prefix = $event->Prefix;
	}
	else {
	$sql = 'SELECT Prefix
	FROM '.TABLE_PREFIX.'ItemTypes
	WHERE ItemName = '.$this->Conn->qstr($related_to);
	$related_prefix = $this->Conn->GetOne($sql);
	}

	$rel_table = $this->Application->getUnitOption('rel', 'TableName');
	$item_type = (int)$this->Application->getUnitOption($event->Prefix, 'ItemType');

	if ($item_type == 0) {
	trigger_error('<strong>ItemType</strong> not defined for prefix <strong>' . $event->Prefix . '</strong>', E_USER_WARNING);
	}

	// process case, then this list is called inside another list
	$prefix_special = $event->getEventParam('PrefixSpecial');
	if (!$prefix_special) {
	$prefix_special = $this->Application->Parser->GetParam('PrefixSpecial');
	}

	$id = false;
	if ($prefix_special !== false) {
	$processed_prefix = $this->Application->processPrefix($prefix_special);
	if ($processed_prefix['prefix'] == $related_prefix) {
	// printing related categories within list of items (not on details page)
	$list =& $this->Application->recallObject($prefix_special);
	/* @var $list kDBList */

	$id = $list->GetID();
	}
	}

	if ($id === false) {
	// printing related categories for single item (possibly on details page)
	if ($related_prefix == 'c') {
	$id = $this->Application->GetVar('m_cat_id');
	}
	else {
	$id = $this->Application->GetVar($related_prefix . '_id');
	}
	}

	$p_item =& $this->Application->recallObject($related_prefix . '.current', null, Array('skip_autoload' => true));
	/* @var $p_item kCatDBItem */

	$p_item->Load( (int)$id );

	$p_resource_id = $p_item->GetDBField('ResourceId');

	$sql = 'SELECT SourceId, TargetId FROM '.$rel_table.'
	WHERE
	(Enabled = 1)
	AND (
	(Type = 0 AND SourceId = '.$p_resource_id.' AND TargetType = '.$item_type.')
	OR
	(Type = 1
	AND (
	(SourceId = '.$p_resource_id.' AND TargetType = '.$item_type.')
	OR
	(TargetId = '.$p_resource_id.' AND SourceType = '.$item_type.')
	)
	)
	)';

	$related_ids_array = $this->Conn->Query($sql);
	$related_ids = Array();

	foreach ($related_ids_array as $key => $record) {
	$related_ids[] = $record[ $record['SourceId'] == $p_resource_id ? 'TargetId' : 'SourceId' ];
	}

	if (count($related_ids) > 0) {
	$type_clauses['related']['include'] = '%1$s.ResourceId IN ('.implode(',', $related_ids).')';
	$type_clauses['related']['except'] = '%1$s.ResourceId NOT IN ('.implode(',', $related_ids).')';
	}
	else {
	$type_clauses['related']['include'] = '0';
	$type_clauses['related']['except'] = '1';
	}

	$type_clauses['related']['having_filter'] = false;
	}

	if (in_array('category_related', $type_clauses)) {
	$object->removeFilter('parent_filter');
	$resource_id = $this->Conn->GetOne('
	SELECT ResourceId FROM '.$this->Application->getUnitOption($event->Prefix, 'TableName').'
	WHERE CategoryId = '.$parent_cat_id
	);

	$sql = 'SELECT DISTINCT(TargetId) FROM '.TABLE_PREFIX.'Relationship
	WHERE SourceId = '.$resource_id.' AND SourceType = 1';
	$related_cats = $this->Conn->GetCol($sql);
	$related_cats = is_array($related_cats) ? $related_cats : Array();

	$sql = 'SELECT DISTINCT(SourceId) FROM '.TABLE_PREFIX.'Relationship
	WHERE TargetId = '.$resource_id.' AND TargetType = 1 AND Type = 1';
	$related_cats2 = $this->Conn->GetCol($sql);
	$related_cats2 = is_array($related_cats2) ? $related_cats2 : Array();
	$related_cats = array_unique( array_merge( $related_cats2, $related_cats ) );

	if ($related_cats) {
	$type_clauses['category_related']['include'] = '%1$s.ResourceId IN ('.implode(',', $related_cats).')';
	$type_clauses['category_related']['except'] = '%1$s.ResourceId NOT IN ('.implode(',', $related_cats).')';
	}
	else
	{
	$type_clauses['category_related']['include'] = '0';
	$type_clauses['category_related']['except'] = '1';
	}
	$type_clauses['category_related']['having_filter'] = false;
	}

	if (in_array('product_related', $types)) {
	$object->removeFilter('parent_filter');

	$product_id = $event->getEventParam('product_id') ? $event->getEventParam('product_id') : $this->Application->GetVar('p_id');
	$resource_id = $this->Conn->GetOne('
	SELECT ResourceId FROM '.$this->Application->getUnitOption('p', 'TableName').'
	WHERE ProductId = '.$product_id
	);

	$sql = 'SELECT DISTINCT(TargetId) FROM '.TABLE_PREFIX.'Relationship
	WHERE SourceId = '.$resource_id.' AND TargetType = 1';
	$related_cats = $this->Conn->GetCol($sql);
	$related_cats = is_array($related_cats) ? $related_cats : Array();
	$sql = 'SELECT DISTINCT(SourceId) FROM '.TABLE_PREFIX.'Relationship
	WHERE TargetId = '.$resource_id.' AND SourceType = 1 AND Type = 1';
	$related_cats2 = $this->Conn->GetCol($sql);
	$related_cats2 = is_array($related_cats2) ? $related_cats2 : Array();
	$related_cats = array_unique( array_merge( $related_cats2, $related_cats ) );

	if ($related_cats) {
	$type_clauses['product_related']['include'] = '%1$s.ResourceId IN ('.implode(',', $related_cats).')';
	$type_clauses['product_related']['except'] = '%1$s.ResourceId NOT IN ('.implode(',', $related_cats).')';
	}
	else {
	$type_clauses['product_related']['include'] = '0';
	$type_clauses['product_related']['except'] = '1';
	}

	$type_clauses['product_related']['having_filter'] = false;
	}

	$type_clauses['menu']['include'] = '%1$s.IsMenu = 1';
	$type_clauses['menu']['except'] = '%1$s.IsMenu = 0';
	$type_clauses['menu']['having_filter'] = false;

	if (in_array('search', $types) \|\| in_array('search', $except_types)) {
	$event_mapping = Array (
	'simple' => 'OnSimpleSearch',
	'subsearch' => 'OnSubSearch',
	'advanced' => 'OnAdvancedSearch'
	);

	$keywords = $event->getEventParam('keyword_string');
	$type = $this->Application->GetVar('search_type', 'simple');

	if ( $keywords ) {
	// processing keyword_string param of ListProducts tag
	$this->Application->SetVar('keywords', $keywords);
	$type = 'simple';
	}

	$search_event = $event_mapping[$type];
	$this->$search_event($event);

	$object =& $event->getObject();
	/* @var $object kDBList */

	$search_sql = ' FROM ' . TABLE_PREFIX . 'ses_' . $this->Application->GetSID() . '_' . TABLE_PREFIX . 'Search
	search_result LEFT JOIN %1$s ON %1$s.ResourceId = search_result.ResourceId';
	$sql = str_replace('FROM %1$s', $search_sql, $object->GetPlainSelectSQL());

	$object->SetSelectSQL($sql);

	$object->addCalculatedField('Relevance', 'search_result.Relevance');
	$object->AddOrderField('search_result.Relevance', 'desc', true);

	$type_clauses['search']['include'] = '1';
	$type_clauses['search']['except'] = '0';
	$type_clauses['search']['having_filter'] = false;
	}

	$search_helper =& $this->Application->recallObject('SearchHelper');
	/* @var $search_helper kSearchHelper */

	$search_helper->SetComplexFilter($event, $type_clauses, implode(',', $types), implode(',', $except_types));
	}

	/**
	* Returns current theme id
	*
	* @return int
	*/
	function _getCurrentThemeId()
	{
	$themes_helper =& $this->Application->recallObject('ThemesHelper');
	/* @var $themes_helper kThemesHelper */

	return (int)$themes_helper->getCurrentThemeId();
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	* @return int
	*/
	function getPassedID(&$event)
	{
	if (($event->Special == 'page') \|\| ($event->Special == '-virtual') \|\| ($event->Prefix == 'st')) {
	return $this->_getPassedStructureID($event);
	}

	if ($this->Application->isAdmin) {
	return parent::getPassedID($event);
	}

	return $this->Application->GetVar('m_cat_id');
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	* @return int
	*/
	function _getPassedStructureID(&$event)
	{
	static $page_by_template = Array ();

	if ($event->Special == 'current') {
	return $this->Application->GetVar('m_cat_id');
	}

	$event->setEventParam('raise_warnings', 0);

	$page_id = parent::getPassedID($event);

	if ($page_id === false) {
	$template = $event->getEventParam('page');
	if (!$template) {
	$template = $this->Application->GetVar('t');
	}

	// bug: when template contains "-" symbols (or others, that stripDisallowed will replace) it's not found
	if (!array_key_exists($template, $page_by_template)) {
	$sql = 'SELECT ' . $this->Application->getUnitOption($event->Prefix, 'IDField') . '
	FROM ' . $this->Application->getUnitOption($event->Prefix, 'TableName') . '
	WHERE
	(
	(NamedParentPath = ' . $this->Conn->qstr($template) . ') OR
	(NamedParentPath = ' . $this->Conn->qstr('Content/' . $template) . ') OR
	(`Type` = ' . PAGE_TYPE_TEMPLATE . ' AND CachedTemplate = ' . $this->Conn->qstr($template) . ')
	) AND (ThemeId = ' . $this->_getCurrentThemeId() . ' OR ThemeId = 0)';

	$page_id = $this->Conn->GetOne($sql);
	}
	else {
	$page_id = $page_by_template[$template];
	}

	if ($page_id === false && EDITING_MODE) {
	// create missing pages, when in editing mode
	$object =& $this->Application->recallObject($this->Prefix . '.rebuild', null, Array('skip_autoload' => true));
	/* @var $object CategoriesItem */

	$created = $this->_prepareAutoPage($object, $template, null, SMS_MODE_AUTO); // create virtual (not system!) page
	if ($created) {
	if ($this->Application->ConfigValue('QuickCategoryPermissionRebuild') \|\| !$this->Application->isAdmin) {
	$updater =& $this->Application->makeClass('kPermCacheUpdater');
	/* @var $updater kPermCacheUpdater */

	$updater->OneStepRun();
	}

	$this->_resetMenuCache();

	$this->Application->RemoveVar('PermCache_UpdateRequired');

	$page_id = $object->GetID();
	$this->Application->SetVar('m_cat_id', $page_id);
	}
	}

	if ($page_id) {
	$page_by_template[$template] = $page_id;
	}
	}

	if (!$page_id && !$this->Application->isAdmin) {
	$page_id = $this->Application->GetVar('m_cat_id');
	}

	return $page_id;
	}

	function ParentGetPassedID(&$event)
	{
	return parent::getPassedID($event);
	}

	/**
	* Adds calculates fields for item statuses
	*
	* @param kCatDBItem $object
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function prepareObject(&$object, &$event)
	{
	if ($event->Special != '-virtual') {
	$object =& $event->getObject( Array('skip_autoload' => true) );

	$object->addCalculatedField(
	'IsNew',
	' IF(%1$s.NewItem = 2,
	IF(%1$s.CreatedOn >= (UNIX_TIMESTAMP() - '.
	$this->Application->ConfigValue('Category_DaysNew').
	'360024), 1, 0),
	%1$s.NewItem
	)');
	}
	}

	/**
	* Set correct parent path for newly created categories
	*
	* @param kEvent $event
	*/
	function OnAfterCopyToLive(&$event)
	{
	$object =& $this->Application->recallObject($event->Prefix . '.-item', null, Array ('skip_autoload' => true, 'live_table' => true));
	/* @var $object CategoriesItem */

	$parent_path = false;
	$object->Load( $event->getEventParam('id') );

	if ( $event->getEventParam('temp_id') == 0 ) {
	if ( $object->isLoaded() ) {
	// update path only for real categories (not including "Home" root category)
	$fields_hash = Array ('ParentPath' => $object->buildParentPath());
	$this->Conn->doUpdate($fields_hash, $object->TableName, 'CategoryId = ' . $object->GetID());
	$parent_path = $fields_hash['ParentPath'];
	}
	}
	else {
	$parent_path = $object->GetDBField('ParentPath');
	}

	if ( $parent_path ) {
	$cache_updater =& $this->Application->makeClass('kPermCacheUpdater', Array (null, $parent_path));
	/* @var $cache_updater kPermCacheUpdater */

	$cache_updater->OneStepRun();
	}
	}

	/**
	* Set cache modification mark if needed
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeDeleteFromLive(&$event)
	{
	parent::OnBeforeDeleteFromLive($event);

	$id = $event->getEventParam('id');

	// loading anyway, because this object is needed by "c-perm:OnBeforeDeleteFromLive" event
	$temp_object =& $event->getObject(Array ('skip_autoload' => true));
	/* @var $temp_object CategoriesItem */

	$temp_object->Load($id);

	if ( $id == 0 ) {
	if ( $temp_object->isLoaded() ) {
	// new category -> update cache (not loaded when "Home" category)
	$this->Application->StoreVar('PermCache_UpdateRequired', 1);
	}

	return ;
	}

	// existing category was edited, check if in-cache fields are modified
	$live_object =& $this->Application->recallObject($event->Prefix . '.-item', null, Array ('live_table' => true, 'skip_autoload' => true));
	/* @var $live_object CategoriesItem */

	$live_object->Load($id);
	$cached_fields = Array ('l' . $this->Application->GetDefaultLanguageId() . '_Name', 'Filename', 'Template', 'ParentId', 'Priority');

	foreach ($cached_fields as $cached_field) {
	if ( $live_object->GetDBField($cached_field) != $temp_object->GetDBField($cached_field) ) {
	// use session instead of REQUEST because of permission editing in category can contain
	// multiple submits, that changes data before OnSave event occurs
	$this->Application->StoreVar('PermCache_UpdateRequired', 1);
	break;
	}
	}

	// remember category filename change between temp and live records
	if ( $temp_object->GetDBField('Filename') != $live_object->GetDBField('Filename') ) {
	$filename_changes = $this->Application->GetVar($event->Prefix . '_filename_changes', Array ());

	$filename_changes[ $live_object->GetID() ] = Array (
	'from' => $live_object->GetDBField('Filename'),
	'to' => $temp_object->GetDBField('Filename')
	);

	$this->Application->SetVar($event->Prefix . '_filename_changes', $filename_changes);
	}
	}

	/**
	* Calls kDBEventHandler::OnSave original event
	* Used in proj-cms:StructureEventHandler->OnSave
	*
	* @param kEvent $event
	*/
	function parentOnSave(&$event)
	{
	parent::OnSave($event);
	}

	/**
	* Reset root-category flag when new category is created
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnPreCreate(&$event)
	{
	// 1. for permission editing of Home category
	$this->Application->RemoveVar('IsRootCategory_' . $this->Application->GetVar('m_wid'));

	parent::OnPreCreate($event);

	$object =& $event->getObject();
	/* @var $object kDBItem */

	// 2. preset template
	$category_id = $this->Application->GetVar('m_cat_id');
	$root_category = $this->Application->getBaseCategory();

	if ( $category_id == $root_category ) {
	$object->SetDBField('Template', $this->_getDefaultDesign());
	}

	// 3. set default owner
	$object->SetDBField('CreatedById', $this->Application->RecallVar('user_id'));
	}

	/**
	* Checks cache update mark and redirect to cache if needed
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnSave(&$event)
	{
	// get data from live table before it is overwritten by parent OnSave method call
	$ids = $this->getSelectedIDs($event, true);
	$is_editing = implode('', $ids);
	$old_statuses = $is_editing ? $this->_getCategoryStatus($ids) : Array ();

	$object =& $event->getObject();
	/* @var $object CategoriesItem */

	parent::OnSave($event);

	if ( $event->status != kEvent::erSUCCESS ) {
	return;
	}

	if ( $this->Application->RecallVar('PermCache_UpdateRequired') ) {
	$this->Application->RemoveVar('IsRootCategory_' . $this->Application->GetVar('m_wid'));
	}

	$this->Application->StoreVar('RefreshStructureTree', 1);
	$this->_resetMenuCache();

	if ( $is_editing ) {
	// send email event to category owner, when it's status is changed (from admin)
	$object->SwitchToLive();
	$new_statuses = $this->_getCategoryStatus($ids);
	$process_statuses = Array (STATUS_ACTIVE, STATUS_DISABLED);

	foreach ($new_statuses as $category_id => $new_status) {
	if ( $new_status != $old_statuses[$category_id] && in_array($new_status, $process_statuses) ) {
	$object->Load($category_id);
	$email_event = $new_status == STATUS_ACTIVE ? 'CATEGORY.APPROVE' : 'CATEGORY.DENY';
	$this->Application->EmailEventUser($email_event, $object->GetDBField('CreatedById'));
	}
	}
	}

	// change opener stack in case if edited category filename was changed
	$filename_changes = $this->Application->GetVar($event->Prefix . '_filename_changes', Array ());

	if ( $filename_changes ) {
	$opener_stack =& $this->Application->makeClass('kOpenerStack');
	/* @var $opener_stack kOpenerStack */

	list ($template, $params, $index_file) = $opener_stack->pop();

	foreach ($filename_changes as $change_info) {
	$template = str_ireplace($change_info['from'], $change_info['to'], $template);
	}

	$opener_stack->push($template, $params, $index_file);
	$opener_stack->save();
	}
	}

	/**
	* Returns statuses of given categories
	*
	* @param Array $category_ids
	* @return Array
	*/
	function _getCategoryStatus($category_ids)
	{
	$id_field = $this->Application->getUnitOption($this->Prefix, 'IDField');
	$table_name = $this->Application->getUnitOption($this->Prefix, 'TableName');

	$sql = 'SELECT Status, ' . $id_field . '
	FROM ' . $table_name . '
	WHERE ' . $id_field . ' IN (' . implode(',', $category_ids) . ')';
	return $this->Conn->GetCol($sql, $id_field);
	}

	/**
	* Creates a new item in temp table and
	* stores item id in App vars and Session on success
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnPreSaveCreated(&$event)
	{
	$object =& $event->getObject( Array ('skip_autoload' => true) );
	/* @var $object CategoriesItem */

	if ( $object->IsRoot() ) {
	// don't create root category while saving permissions
	return;
	}

	parent::OnPreSaveCreated($event);
	}

	/**
	* Deletes sym link to other category
	*
	* @param kEvent $event
	*/
	function OnAfterItemDelete(&$event)
	{
	parent::OnAfterItemDelete($event);

	$object =& $event->getObject();
	/* @var $object kDBItem */

	$sql = 'UPDATE '.$object->TableName.'
	SET SymLinkCategoryId = NULL
	WHERE SymLinkCategoryId = '.$object->GetID();

	$this->Conn->Query($sql);
	}

	/**
	* Exclude root categories from deleting
	*
	* @param kEvent $event
	* @param string $type
	* @return void
	* @access protected
	*/
	protected function customProcessing(&$event, $type)
	{
	if ( $event->Name == 'OnMassDelete' && $type == 'before' ) {
	$ids = $event->getEventParam('ids');
	if ( !$ids \|\| $this->Application->ConfigValue('AllowDeleteRootCats') ) {
	return;
	}

	$root_categories = Array ();

	// get module root categories and exclude them
	foreach ($this->Application->ModuleInfo as $module_info) {
	$root_categories[] = $module_info['RootCat'];
	}

	$root_categories = array_unique($root_categories);

	if ( $root_categories && array_intersect($ids, $root_categories) ) {
	$event->setEventParam('ids', array_diff($ids, $root_categories));
	$this->Application->StoreVar('root_delete_error', 1);
	}
	}
	}

	/**
	* Checks, that given template exists (physically) in given theme
	*
	* @param string $template
	* @param int $theme_id
	* @return bool
	*/
	function _templateFound($template, $theme_id = null)
	{
	static $init_made = false;

	if (!$init_made) {
	$this->Application->InitParser(true);
	$init_made = true;
	}

	if (!isset($theme_id)) {
	$theme_id = $this->_getCurrentThemeId();
	}

	$theme_name = $this->_getThemeName($theme_id);

	return $this->Application->TemplatesCache->TemplateExists('theme:' . $theme_name . '/' . $template);
	}

	/**
	* Removes ".tpl" in template path
	*
	* @param string $template
	* @return string
	*/
	function _stripTemplateExtension($template)
	{
	// return preg_replace('/\.[^.\\\\\\/]*$/', '', $template);

	return preg_replace('/^[\\/]{0,1}(.*)\.tpl$/', "$1", $template);
	}

	/**
	* Deletes all selected items.
	* Automatically recourse into sub-items using temp handler, and deletes sub-items
	* by calling its Delete method if sub-item has AutoDelete set to true in its config file
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnMassDelete(&$event)
	{
	if ( $this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) ) {
	$event->status = kEvent::erFAIL;
	return ;
	}

	$to_delete = Array ();
	$ids = $this->StoreSelectedIDs($event);
	$recycle_bin = $this->Application->ConfigValue('RecycleBinFolder');

	if ( $recycle_bin ) {
	$rb =& $this->Application->recallObject('c.recycle', null, Array ('skip_autoload' => true));
	/* @var $rb CategoriesItem */

	$rb->Load($recycle_bin);

	$cat =& $event->getObject(Array ('skip_autoload' => true));
	/* @var $cat CategoriesItem */

	foreach ($ids as $id) {
	$cat->Load($id);
	if ( preg_match('/^' . preg_quote($rb->GetDBField('ParentPath'), '/') . '/', $cat->GetDBField('ParentPath')) ) {
	$to_delete[] = $id;
	continue;
	}
	$cat->SetDBField('ParentId', $recycle_bin);
	$cat->Update();
	}
	$ids = $to_delete;
	$event->redirect = 'categories/cache_updater';
	}

	$event->setEventParam('ids', $ids);
	$this->customProcessing($event, 'before');
	$ids = $event->getEventParam('ids');

	if ( $ids ) {
	$recursive_helper =& $this->Application->recallObject('RecursiveHelper');
	/* @var $recursive_helper kRecursiveHelper */

	foreach ($ids as $id) {
	$recursive_helper->DeleteCategory($id, $event->Prefix);
	}
	}
	$this->clearSelectedIDs($event);

	$this->Application->StoreVar('RefreshStructureTree', 1);
	$this->_resetMenuCache();
	}

	/**
	* Add selected items to clipboard with mode = COPY (CLONE)
	*
	* @param kEvent $event
	*/
	function OnCopy(&$event)
	{
	$this->Application->RemoveVar('clipboard');

	$clipboard_helper =& $this->Application->recallObject('ClipboardHelper');
	/* @var $clipboard_helper kClipboardHelper */

	$clipboard_helper->setClipboard($event, 'copy', $this->StoreSelectedIDs($event));
	$this->clearSelectedIDs($event);
	}

	/**
	* Add selected items to clipboard with mode = CUT
	*
	* @param kEvent $event
	*/
	function OnCut(&$event)
	{
	$this->Application->RemoveVar('clipboard');

	$clipboard_helper =& $this->Application->recallObject('ClipboardHelper');
	/* @var $clipboard_helper kClipboardHelper */

	$clipboard_helper->setClipboard($event, 'cut', $this->StoreSelectedIDs($event));
	$this->clearSelectedIDs($event);
	}

	/**
	* Controls all item paste operations. Can occur only with filled clipboard.
	*
	* @param kEvent $event
	*/
	function OnPasteClipboard(&$event)
	{
	$clipboard = unserialize( $this->Application->RecallVar('clipboard') );
	foreach ($clipboard as $prefix => $clipboard_data) {
	$paste_event = new kEvent($prefix.':OnPaste', Array('clipboard_data' => $clipboard_data));
	$this->Application->HandleEvent($paste_event);

	$event->copyFrom($paste_event);
	}
	}

	/**
	* Checks permission for OnPaste event
	*
	* @param kEvent $event
	* @return bool
	*/
	function _checkPastePermission(&$event)
	{
	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	$category_id = $this->Application->GetVar('m_cat_id');
	if ($perm_helper->AddCheckPermission($category_id, $event->Prefix) == 0) {
	// no items left for editing -> no permission
	return $perm_helper->finalizePermissionCheck($event, false);
	}

	return true;
	}

	/**
	* Paste categories with sub-items from clipboard
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnPaste(&$event)
	{
	if ( $this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) \|\| !$this->_checkPastePermission($event) ) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$clipboard_data = $event->getEventParam('clipboard_data');

	if ( !$clipboard_data['cut'] && !$clipboard_data['copy'] ) {
	return;
	}

	// 1. get ParentId of moved category(-es) before it gets updated!!!)
	$source_category_id = 0;
	$id_field = $this->Application->getUnitOption($event->Prefix, 'IDField');
	$table_name = $this->Application->getUnitOption($event->Prefix, 'TableName');

	if ( $clipboard_data['cut'] ) {
	$sql = 'SELECT ParentId
	FROM ' . $table_name . '
	WHERE ' . $id_field . ' = ' . $clipboard_data['cut'][0];
	$source_category_id = $this->Conn->GetOne($sql);
	}

	$recursive_helper =& $this->Application->recallObject('RecursiveHelper');
	/* @var $recursive_helper kRecursiveHelper */

	if ( $clipboard_data['cut'] ) {
	$recursive_helper->MoveCategories($clipboard_data['cut'], $this->Application->GetVar('m_cat_id'));
	}

	if ( $clipboard_data['copy'] ) {
	// don't allow to copy/paste system OR theme-linked virtual pages

	$sql = 'SELECT ' . $id_field . '
	FROM ' . $table_name . '
	WHERE ' . $id_field . ' IN (' . implode(',', $clipboard_data['copy']) . ') AND (`Type` = ' . PAGE_TYPE_VIRTUAL . ') AND (ThemeId = 0)';
	$allowed_ids = $this->Conn->GetCol($sql);

	if ( !$allowed_ids ) {
	return;
	}

	foreach ($allowed_ids as $id) {
	$recursive_helper->PasteCategory($id, $event->Prefix);
	}
	}

	$priority_helper =& $this->Application->recallObject('PriorityHelper');
	/* @var $priority_helper kPriorityHelper */

	if ( $clipboard_data['cut'] ) {
	$ids = $priority_helper->recalculatePriorities($event, 'ParentId = ' . $source_category_id);

	if ( $ids ) {
	$priority_helper->massUpdateChanged($event->Prefix, $ids);
	}
	}

	// recalculate priorities of newly pasted categories in destination category
	$parent_id = $this->Application->GetVar('m_cat_id');
	$ids = $priority_helper->recalculatePriorities($event, 'ParentId = ' . $parent_id);

	if ( $ids ) {
	$priority_helper->massUpdateChanged($event->Prefix, $ids);
	}

	if ( $clipboard_data['cut'] \|\| $clipboard_data['copy'] ) {
	// rebuild with progress bar
	if ( $this->Application->ConfigValue('QuickCategoryPermissionRebuild') ) {
	$updater =& $this->Application->makeClass('kPermCacheUpdater');
	/* @var $updater kPermCacheUpdater */

	$updater->OneStepRun();
	}
	else {
	$event->redirect = 'categories/cache_updater';
	}

	$this->_resetMenuCache();
	$this->Application->StoreVar('RefreshStructureTree', 1);
	}
	}

	/**
	* Occurs when pasting category
	*
	* @param kEvent $event
	*/
	/*function OnCatPaste(&$event)
	{
	$inp_clipboard = $this->Application->RecallVar('ClipBoard');
	$inp_clipboard = explode('-', $inp_clipboard, 2);

	if($inp_clipboard[0] == 'COPY')
	{
	$saved_cat_id = $this->Application->GetVar('m_cat_id');
	$cat_ids = $event->getEventParam('cat_ids');

	$id_field = $this->Application->getUnitOption($event->Prefix, 'IDField');
	$table = $this->Application->getUnitOption($event->Prefix, 'TableName');
	$ids_sql = 'SELECT '.$id_field.' FROM '.$table.' WHERE ResourceId IN (%s)';
	$resource_ids_sql = 'SELECT ItemResourceId FROM '.TABLE_PREFIX.'CategoryItems WHERE CategoryId = %s AND PrimaryCat = 1';

	$object =& $this->Application->recallObject($event->Prefix.'.item', $event->Prefix, Array('skip_autoload' => true));

	foreach($cat_ids as $source_cat => $dest_cat)
	{
	$item_resource_ids = $this->Conn->GetCol( sprintf($resource_ids_sql, $source_cat) );
	if(!$item_resource_ids) continue;

	$this->Application->SetVar('m_cat_id', $dest_cat);
	$item_ids = $this->Conn->GetCol( sprintf($ids_sql, implode(',', $item_resource_ids) ) );

	$temp =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler');
	if($item_ids) $temp->CloneItems($event->Prefix, $event->Special, $item_ids);
	}

	$this->Application->SetVar('m_cat_id', $saved_cat_id);
	}
	}*/

	/**
	* Clears clipboard content
	*
	* @param kEvent $event
	*/
	function OnClearClipboard(&$event)
	{
	$this->Application->RemoveVar('clipboard');
	}

	/**
	* Sets correct status for new categories created on front-end
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeItemCreate(&$event)
	{
	parent::OnBeforeItemCreate($event);

	$this->_beforeItemChange($event);

	if ( $this->Application->isAdminUser \|\| $event->Prefix == 'st' ) {
	// don't check category permissions when auto-creating structure pages
	return ;
	}

	$perm_helper =& $this->Application->recallObject('PermissionsHelper');
	/* @var $perm_helper kPermissionsHelper */

	$new_status = false;
	$category_id = $this->Application->GetVar('m_cat_id');

	if ( $perm_helper->CheckPermission('CATEGORY.ADD', 0, $category_id) ) {
	$new_status = STATUS_ACTIVE;
	}
	else {
	if ( $perm_helper->CheckPermission('CATEGORY.ADD.PENDING', 0, $category_id) ) {
	$new_status = STATUS_PENDING;
	}
	}

	if ( $new_status ) {
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$object->SetDBField('Status', $new_status);

	// don't forget to set Priority for suggested from Front-End categories
	$min_priority = $this->_getNextPriority($object->GetDBField('ParentId'), $object->TableName);
	$object->SetDBField('Priority', $min_priority);
	}
	else {
	$event->status = kEvent::erPERM_FAIL;
	return ;
	}
	}

	/**
	* Returns next available priority for given category from given table
	*
	* @param int $category_id
	* @param string $table_name
	* @return int
	*/
	function _getNextPriority($category_id, $table_name)
	{
	$sql = 'SELECT MIN(Priority)
	FROM ' . $table_name . '
	WHERE ParentId = ' . $category_id;
	return (int)$this->Conn->GetOne($sql) - 1;
	}

	/**
	* Sets correct status for new categories created on front-end
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeItemUpdate(&$event)
	{
	parent::OnBeforeItemUpdate($event);

	$object =& $event->getObject();
	/* @var $object kDBItem */

	if ( $object->GetChangedFields() ) {
	$object->SetDBField('ModifiedById', $this->Application->RecallVar('user_id'));
	}

	$this->_beforeItemChange($event);
	}

	/**
	* Performs redirect to correct suggest confirmation template
	*
	* @param kEvent $event
	*/
	function OnCreate(&$event)
	{
	parent::OnCreate($event);

	if ($this->Application->isAdminUser \|\| $event->status != kEvent::erSUCCESS) {
	// don't sent email or rebuild cache directly after category is created by admin
	return ;
	}

	$object =& $event->getObject();
	/* @var $object kDBItem */

	$cache_updater =& $this->Application->makeClass('kPermCacheUpdater', Array (null, $object->GetDBField('ParentPath')));
	/* @var $cache_updater kPermCacheUpdater */

	$cache_updater->OneStepRun();

	$is_active = ($object->GetDBField('Status') == STATUS_ACTIVE);

	$next_template = $is_active ? 'suggest_confirm_template' : 'suggest_pending_confirm_template';
	$event->redirect = $this->Application->GetVar($next_template);
	$event->SetRedirectParam('opener', 's');

	// send email events
	$perm_prefix = $this->Application->getUnitOption($event->Prefix, 'PermItemPrefix');

	$event_suffix = $is_active ? 'ADD' : 'ADD.PENDING';
	$this->Application->EmailEventAdmin($perm_prefix.'.'.$event_suffix);
	$this->Application->EmailEventUser($perm_prefix.'.'.$event_suffix, $object->GetDBField('CreatedById'));
	}

	/**
	* Returns current per-page setting for list
	*
	* @param kEvent $event
	* @return int
	*/
	function getPerPage(&$event)
	{
	if (!$this->Application->isAdmin) {
	$event->setEventParam('same_special', true);
	}

	return parent::getPerPage($event);
	}

	/**
	* Set's correct page for list
	* based on data provided with event
	*
	* @param kEvent $event
	* @access private
	* @see OnListBuild
	*/
	function SetPagination(&$event)
	{
	parent::SetPagination($event);

	if ( !$this->Application->isAdmin ) {
	$page_var = $event->getEventParam('page_var');

	if ( $page_var !== false ) {
	$page = $this->Application->GetVar($page_var);

	if ( is_numeric($page) ) {
	$object =& $event->getObject();
	/* @var $object kDBList */

	$object->SetPage($page);
	}
	}
	}
	}

	/**
	* Apply same processing to each item being selected in grid
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function iterateItems(&$event)
	{
	if ( $event->Name != 'OnMassApprove' && $event->Name != 'OnMassDecline' ) {
	parent::iterateItems($event);
	}

	if ( $this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) ) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$object =& $event->getObject(Array ('skip_autoload' => true));
	/* @var $object CategoriesItem */

	$ids = $this->StoreSelectedIDs($event);

	if ( $ids ) {
	$propagate_category_status = $this->Application->GetVar('propagate_category_status');
	$status_field = array_shift( $this->Application->getUnitOption($event->Prefix, 'StatusField') );

	foreach ($ids as $id) {
	$object->Load($id);
	$object->SetDBField($status_field, $event->Name == 'OnMassApprove' ? 1 : 0);

	if ( $object->Update() ) {
	if ( $propagate_category_status ) {
	$sql = 'UPDATE ' . $object->TableName . '
	SET ' . $status_field . ' = ' . $object->GetDBField($status_field) . '
	WHERE TreeLeft BETWEEN ' . $object->GetDBField('TreeLeft') . ' AND ' . $object->GetDBField('TreeRight');
	$this->Conn->Query($sql);
	}

	$event->status = kEvent::erSUCCESS;

	$email_event = $event->Name == 'OnMassApprove' ? 'CATEGORY.APPROVE' : 'CATEGORY.DENY';
	$this->Application->EmailEventUser($email_event, $object->GetDBField('CreatedById'));
	}
	else {
	$event->status = kEvent::erFAIL;
	$event->redirect = false;
	break;
	}
	}
	}

	$this->clearSelectedIDs($event);
	$this->Application->StoreVar('RefreshStructureTree', 1);
	}

	/**
	* Checks, that currently loaded item is allowed for viewing (non permission-based)
	*
	* @param kEvent $event
	* @return bool
	*/
	function checkItemStatus(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	if ( !$object->isLoaded() ) {
	return true;
	}

	if ( $object->GetDBField('Status') != STATUS_ACTIVE && $object->GetDBField('Status') != 4 ) {
	if ( !$object->GetDBField('DirectLinkEnabled') \|\| !$object->GetDBField('DirectLinkAuthKey') ) {
	return false;
	}

	return $this->Application->GetVar('authkey') == $object->GetDBField('DirectLinkAuthKey');
	}

	return true;
	}

	// ============= for cms page processing =======================

	/**
	* Returns default design template
	*
	* @return string
	*/
	function _getDefaultDesign()
	{
	$default_design = trim($this->Application->ConfigValue('cms_DefaultDesign'), '/');

	if (!$default_design) {
	// theme-based alias for default design
	return '#default_design#';
	}

	if (strpos($default_design, '#') === false) {
	// real template, not alias, so prefix with "/"
	return '/' . $default_design;
	}

	// alias
	return $default_design;
	}

	/**
	* Returns default design based on given virtual template (used from kApplication::Run)
	*
	* @param string $t
	* @return string
	* @access public
	*/
	public function GetDesignTemplate($t = null)
	{
	if ( !isset($t) ) {
	$t = $this->Application->GetVar('t');
	}

	$page =& $this->Application->recallObject($this->Prefix . '.-virtual', null, Array ('page' => $t));
	/* @var $page CategoriesItem */

	if ( $page->isLoaded() ) {
	$real_t = $page->GetDBField('CachedTemplate');
	$this->Application->SetVar('m_cat_id', $page->GetDBField('CategoryId'));

	if ( $page->GetDBField('FormId') ) {
	$this->Application->SetVar('form_id', $page->GetDBField('FormId'));
	}
	}
	else {
	$not_found = $this->Application->ConfigValue('ErrorTemplate');
	$real_t = $not_found ? $not_found : 'error_notfound';

	$themes_helper =& $this->Application->recallObject('ThemesHelper');
	/* @var $themes_helper kThemesHelper */

	$theme_id = $this->Application->GetVar('m_theme');
	$category_id = $themes_helper->getPageByTemplate($real_t, $theme_id);
	$this->Application->SetVar('m_cat_id', $category_id);

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

	// replace alias in form #alias_name# to actual template used in this theme
	$theme =& $this->Application->recallObject('theme.current');
	/* @var $theme kDBItem */

	$template = $theme->GetField('TemplateAliases', $real_t);

	if ( $template ) {
	return $template;
	}

	return $real_t;
	}

	/**
	* Sets category id based on found template (used from kApplication::Run)
	*
	* @deprecated
	*/
	/*function SetCatByTemplate()
	{
	$t = $this->Application->GetVar('t');
	$page =& $this->Application->recallObject($this->Prefix . '.-virtual');

	if ($page->isLoaded()) {
	$this->Application->SetVar('m_cat_id', $page->GetDBField('CategoryId') );
	}
	}*/

	/**
	* Prepares template paths
	*
	* @param kEvent $event
	*/
	function _beforeItemChange(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$now = adodb_mktime();

	if ( !$this->Application->isDebugMode() && strpos($event->Special, 'rebuild') === false ) {
	$object->SetDBField('Type', $object->GetOriginalField('Type'));
	$object->SetDBField('Protected', $object->GetOriginalField('Protected'));

	if ( $object->GetDBField('Protected') ) {
	// some fields are read-only for protected pages, when debug mode is off
	$object->SetDBField('AutomaticFilename', $object->GetOriginalField('AutomaticFilename'));
	$object->SetDBField('Filename', $object->GetOriginalField('Filename'));
	$object->SetDBField('Status', $object->GetOriginalField('Status'));
	}
	}

	if ($object->GetChangedFields()) {
	$object->SetDBField('Modified_date', $now);
	$object->SetDBField('Modified_time', $now);
	}

	$object->setRequired('PageCacheKey', $object->GetDBField('OverridePageCacheKey'));
	$object->SetDBField('Template', $this->_stripTemplateExtension( $object->GetDBField('Template') ));

	if ($object->GetDBField('Type') == PAGE_TYPE_TEMPLATE) {
	if (!$this->_templateFound($object->GetDBField('Template'), $object->GetDBField('ThemeId'))) {
	$object->SetError('Template', 'template_file_missing', 'la_error_TemplateFileMissing');
	}
	}

	$this->_saveTitleField($object, 'Title');
	$this->_saveTitleField($object, 'MenuTitle');

	$root_category = $this->Application->getBaseCategory();

	if ( file_exists(FULL_PATH . '/themes') && ($object->GetDBField('ParentId') == $root_category) && ($object->GetDBField('Template') == CATEGORY_TEMPLATE_INHERIT) ) {
	// there are themes + creating top level category
	$object->SetError('Template', 'no_inherit');
	}

	if ( !$this->Application->isAdminUser && $object->isVirtualField('cust_RssSource') ) {
	// only administrator can set/change "cust_RssSource" field

	if ($object->GetDBField('cust_RssSource') != $object->GetOriginalField('cust_RssSource')) {
	$object->SetError('cust_RssSource', 'not_allowed', 'la_error_OperationNotAllowed');
	}
	}

	if ( !$object->GetDBField('DirectLinkAuthKey') ) {
	$key_parts = Array (
	$object->GetID(),
	$object->GetDBField('ParentId'),
	$object->GetField('Name'),
	'b38'
	);

	$object->SetDBField('DirectLinkAuthKey', substr( md5( implode(':', $key_parts) ), 0, 20 ));
	}
	}

	/**
	* Sets page name to requested field in case when:
	* 1. page was auto created (through theme file rebuild)
	* 2. requested field is empty
	*
	* @param kDBItem $object
	* @param string $field
	* @author Alex
	*/
	function _saveTitleField(&$object, $field)
	{
	$value = $object->GetField($field, 'no_default'); // current value of target field

	$ml_formatter =& $this->Application->recallObject('kMultiLanguage');
	/* @var $ml_formatter kMultiLanguage */

	$src_field = $ml_formatter->LangFieldName('Name');
	$dst_field = $ml_formatter->LangFieldName($field);

	$dst_field_not_changed = $object->GetOriginalField($dst_field) == $value;

	if ($value == '' \|\| preg_match('/^_Auto: (.*)/', $value) \|\| (($object->GetOriginalField($src_field) == $value) && $dst_field_not_changed)) {
	// target field is empty OR target field value starts with "_Auto: " OR (source field value
	// before change was equals to current target field value AND target field value wasn't changed)
	$object->SetField($dst_field, $object->GetField($src_field));
	}
	}

	/**
	* Don't allow to delete system pages, when not in debug mode
	*
	* @param kEvent $event
	*/
	function OnBeforeItemDelete(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	if ( $object->GetDBField('Protected') && !$this->Application->isDebugMode() ) {
	$event->status = kEvent::erFAIL;
	}
	}

	/**
	* Creates category based on given TPL file
	*
	* @param CategoriesItem $object
	* @param string $template
	* @param int $theme_id
	* @param int $system_mode
	* @param array $template_info
	* @return bool
	*/
	function _prepareAutoPage(&$object, $template, $theme_id = null, $system_mode = SMS_MODE_AUTO, $template_info = Array ())
	{
	$template = $this->_stripTemplateExtension($template);

	if ($system_mode == SMS_MODE_AUTO) {
	$page_type = $this->_templateFound($template, $theme_id) ? PAGE_TYPE_TEMPLATE : PAGE_TYPE_VIRTUAL;
	}
	else {
	$page_type = $system_mode == SMS_MODE_FORCE ? PAGE_TYPE_TEMPLATE : PAGE_TYPE_VIRTUAL;
	}

	if (($page_type == PAGE_TYPE_TEMPLATE) && ($template_info === false)) {
	// do not auto-create system pages, when browsing through site
	return false;
	}

	if (!isset($theme_id)) {
	$theme_id = $this->_getCurrentThemeId();
	}

	$root_category = $this->Application->getBaseCategory();
	$page_category = $this->Application->GetVar('m_cat_id');
	if (!$page_category) {
	$page_category = $root_category;
	$this->Application->SetVar('m_cat_id', $page_category);
	}

	if (($page_type == PAGE_TYPE_VIRTUAL) && (strpos($template, '/') !== false)) {
	// virtual page, but have "/" in template path -> create it's path
	$category_path = explode('/', $template);
	$template = array_pop($category_path);

	$page_category = $this->_getParentCategoryFromPath($category_path, $root_category, $theme_id);
	}

	$page_name = ($page_type == PAGE_TYPE_TEMPLATE) ? '_Auto: ' . $template : $template;
	$page_description = '';

	if ($page_type == PAGE_TYPE_TEMPLATE) {
	$design_template = strtolower($template); // leading "/" not added !
	if ($template_info) {
	if (array_key_exists('name', $template_info) && $template_info['name']) {
	$page_name = $template_info['name'];
	}

	if (array_key_exists('desc', $template_info) && $template_info['desc']) {
	$page_description = $template_info['desc'];
	}

	if (array_key_exists('section', $template_info) && $template_info['section']) {
	// this will override any global "m_cat_id"
	$page_category = $this->_getParentCategoryFromPath(explode('\|\|', $template_info['section']), $root_category, $theme_id);
	}
	}
	}
	else {
	$design_template = $this->_getDefaultDesign(); // leading "/" added !
	}

	$object->Clear();
	$object->SetDBField('ParentId', $page_category);
	$object->SetDBField('Type', $page_type);
	$object->SetDBField('Protected', 1); // $page_type == PAGE_TYPE_TEMPLATE

	$object->SetDBField('IsMenu', 0);
	$object->SetDBField('ThemeId', $theme_id);

	// put all templates to then end of list (in their category)
	$min_priority = $this->_getNextPriority($page_category, $object->TableName);
	$object->SetDBField('Priority', $min_priority);

	$object->SetDBField('Template', $design_template);
	$object->SetDBField('CachedTemplate', $design_template);

	$primary_language = $this->Application->GetDefaultLanguageId();
	$current_language = $this->Application->GetVar('m_lang');
	$object->SetDBField('l' . $primary_language . '_Name', $page_name);
	$object->SetDBField('l' . $current_language . '_Name', $page_name);
	$object->SetDBField('l' . $primary_language . '_Description', $page_description);
	$object->SetDBField('l' . $current_language . '_Description', $page_description);

	return $object->Create();
	}

	function _getParentCategoryFromPath($category_path, $base_category, $theme_id = null)
	{
	static $category_ids = Array ();

	if (!$category_path) {
	return $base_category;
	}

	if (array_key_exists(implode('\|\|', $category_path), $category_ids)) {
	return $category_ids[ implode('\|\|', $category_path) ];
	}

	$backup_category_id = $this->Application->GetVar('m_cat_id');

	$object =& $this->Application->recallObject($this->Prefix . '.rebuild-path', null, Array ('skip_autoload' => true));
	/* @var $object CategoriesItem */

	$parent_id = $base_category;

	$filenames_helper =& $this->Application->recallObject('FilenamesHelper');
	/* @var $filenames_helper kFilenamesHelper */

	$safe_category_path = array_map(Array (&$filenames_helper, 'replaceSequences'), $category_path);

	foreach ($category_path as $category_order => $category_name) {
	$this->Application->SetVar('m_cat_id', $parent_id);

	// get virtual category first, when possible
	$sql = 'SELECT ' . $object->IDField . '
	FROM ' . $object->TableName . '
	WHERE
	(
	Filename = ' . $this->Conn->qstr($safe_category_path[$category_order]) . ' OR
	Filename = ' . $this->Conn->qstr( $filenames_helper->replaceSequences('_Auto: ' . $category_name) ) . '
	) AND
	(ParentId = ' . $parent_id . ') AND
	(ThemeId = 0 OR ThemeId = ' . $theme_id . ')
	ORDER BY ThemeId ASC';
	$parent_id = $this->Conn->GetOne($sql);

	if ($parent_id === false) {
	// page not found
	$template = implode('/', array_slice($safe_category_path, 0, $category_order + 1));

	// don't process system templates in sub-categories
	$system = $this->_templateFound($template, $theme_id) && (strpos($template, '/') === false);

	if (!$this->_prepareAutoPage($object, $category_name, $theme_id, $system ? SMS_MODE_FORCE : false)) {
	// page was not created
	break;
	}

	$parent_id = $object->GetID();
	}
	}

	$this->Application->SetVar('m_cat_id', $backup_category_id);
	$category_ids[ implode('\|\|', $category_path) ] = $parent_id;

	return $parent_id;
	}

	/**
	* Returns theme name by it's id. Used in structure page creation.
	*
	* @param int $theme_id
	* @return string
	*/
	function _getThemeName($theme_id)
	{
	static $themes = null;

	if (!isset($themes)) {
	$id_field = $this->Application->getUnitOption('theme', 'IDField');
	$table_name = $this->Application->getUnitOption('theme', 'TableName');

	$sql = 'SELECT Name, ' . $id_field . '
	FROM ' . $table_name . '
	WHERE Enabled = 1';
	$themes = $this->Conn->GetCol($sql, $id_field);
	}

	return array_key_exists($theme_id, $themes) ? $themes[$theme_id] : false;
	}

	/**
	* Resets SMS-menu cache
	*
	* @param kEvent $event
	*/
	function OnResetCMSMenuCache(&$event)
	{
	if ($this->Application->GetVar('ajax') == 'yes') {
	$event->status = kEvent::erSTOP;
	}

	$this->_resetMenuCache();
	$event->SetRedirectParam('action_completed', 1);
	}

	/**
	* Performs reset of category-related caches (menu, structure dropdown, template mapping)
	*
	* @return void
	* @access protected
	*/
	protected function _resetMenuCache()
	{
	// reset cms menu cache (all variables are automatically rebuild, when missing)
	if ($this->Application->isCachingType(CACHING_TYPE_MEMORY)) {
	$this->Application->rebuildCache('master:cms_menu', kCache::REBUILD_LATER, CacheSettings::$cmsMenuRebuildTime);
	$this->Application->rebuildCache('master:StructureTree', kCache::REBUILD_LATER, CacheSettings::$structureTreeRebuildTime);
	$this->Application->rebuildCache('master:template_mapping', kCache::REBUILD_LATER, CacheSettings::$templateMappingRebuildTime);
	}
	else {
	$this->Application->rebuildDBCache('cms_menu', kCache::REBUILD_LATER, CacheSettings::$cmsMenuRebuildTime);
	$this->Application->rebuildDBCache('StructureTree', kCache::REBUILD_LATER, CacheSettings::$structureTreeRebuildTime);
	$this->Application->rebuildDBCache('template_mapping', kCache::REBUILD_LATER, CacheSettings::$templateMappingRebuildTime);
	}
	}

	/**
	* Updates structure config
	*
	* @param kEvent $event
	*/
	function OnAfterConfigRead(&$event)
	{
	parent::OnAfterConfigRead($event);

	if (defined('IS_INSTALL') && IS_INSTALL) {
	// skip any processing, because Category table doesn't exists until install is finished
	return ;
	}

	$site_config_helper =& $this->Application->recallObject('SiteConfigHelper');
	/* @var $site_config_helper SiteConfigHelper */

	$settings = $site_config_helper->getSettings();

	$root_category = $this->Application->getBaseCategory();

	// set root category
	$section_adjustments = $this->Application->getUnitOption($event->Prefix, 'SectionAdjustments');

	$section_adjustments['in-portal:browse'] = Array (
	'url' => Array ('m_cat_id' => $root_category),
	'late_load' => Array ('m_cat_id' => $root_category),
	'onclick' => 'checkCatalog(' . $root_category . ')',
	);

	$section_adjustments['in-portal:browse_site'] = Array (
	'url' => Array ('editing_mode' => $settings['default_editing_mode']),
	);

	$this->Application->setUnitOption($event->Prefix, 'SectionAdjustments', $section_adjustments);

	// prepare structure dropdown
	$category_helper =& $this->Application->recallObject('CategoryHelper');
	/* @var $category_helper CategoryHelper */

	$fields = $this->Application->getUnitOption($event->Prefix, 'Fields');

	$fields['ParentId']['default'] = (int)$this->Application->GetVar('m_cat_id');
	$fields['ParentId']['options'] = $category_helper->getStructureTreeAsOptions();

	// limit design list by theme
	$theme_id = $this->_getCurrentThemeId();
	$design_sql = $fields['Template']['options_sql'];
	$design_sql = str_replace('(tf.FilePath = "/designs")', '(' . implode(' OR ', $this->getDesignFolders()) . ')' . ' AND (t.ThemeId = ' . $theme_id . ')', $design_sql);
	$fields['Template']['options_sql'] = $design_sql;

	// adds "Inherit From Parent" option to "Template" field
	$fields['Template']['options'] = Array (CATEGORY_TEMPLATE_INHERIT => $this->Application->Phrase('la_opt_InheritFromParent'));

	$this->Application->setUnitOption($event->Prefix, 'Fields', $fields);

	if ($this->Application->isAdmin) {
	// don't sort by Front-End sorting fields
	$config_mapping = $this->Application->getUnitOption($event->Prefix, 'ConfigMapping');
	$remove_keys = Array ('DefaultSorting1Field', 'DefaultSorting2Field', 'DefaultSorting1Dir', 'DefaultSorting2Dir');
	foreach ($remove_keys as $remove_key) {
	unset($config_mapping[$remove_key]);
	}
	$this->Application->setUnitOption($event->Prefix, 'ConfigMapping', $config_mapping);
	}
	else {
	// sort by parent path on Front-End only
	$list_sortings = $this->Application->getUnitOption($event->Prefix, 'ListSortings', Array ());
	$list_sortings['']['ForcedSorting'] = Array ("CurrentSort" => 'asc');
	$this->Application->setUnitOption($event->Prefix, 'ListSortings', $list_sortings);
	}

	// add grids for advanced view (with primary category column)
	$grids = $this->Application->getUnitOption($this->Prefix, 'Grids');
	$process_grids = Array ('Default', 'Radio');
	foreach ($process_grids as $process_grid) {
	$grid_data = $grids[$process_grid];
	$grid_data['Fields']['CachedNavbar'] = Array ('title' => 'la_col_Path', 'data_block' => 'grid_parent_category_td', 'filter_block' => 'grid_like_filter');
	$grids[$process_grid . 'ShowAll'] = $grid_data;
	}
	$this->Application->setUnitOption($this->Prefix, 'Grids', $grids);
	}

	/**
	* Returns folders, that can contain design templates
	*
	* @return array
	* @access protected
	*/
	protected function getDesignFolders()
	{
	$ret = Array ('tf.FilePath = "/designs"', 'tf.FilePath = "/platform/designs"');

	foreach ($this->Application->ModuleInfo as $module_info) {
	$ret[] = 'tf.FilePath = "/' . $module_info['TemplatePath'] . 'designs"';
	}

	return array_unique($ret);
	}

	/**
	* Removes this item and it's children (recursive) from structure dropdown
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnAfterItemLoad(&$event)
	{
	parent::OnAfterItemLoad($event);

	if ( !$this->Application->isAdmin ) {
	// calculate priorities dropdown only for admin
	return;
	}

	$object =& $event->getObject();
	/* @var $object kDBItem */

	// remove this category & it's children from dropdown
	$sql = 'SELECT ' . $object->IDField . '
	FROM ' . $this->Application->getUnitOption($event->Prefix, 'TableName') . '
	WHERE ParentPath LIKE "' . $object->GetDBField('ParentPath') . '%"';
	$remove_categories = $this->Conn->GetCol($sql);

	$options = $object->GetFieldOption('ParentId', 'options');
	foreach ($remove_categories as $remove_category) {
	unset($options[$remove_category]);
	}
	$object->SetFieldOption('ParentId', 'options', $options);
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnAfterRebuildThemes(&$event)
	{
	$sql = 'SELECT t.ThemeId, CONCAT( tf.FilePath, \'/\', tf.FileName ) AS Path, tf.FileMetaInfo
	FROM '.TABLE_PREFIX.'ThemeFiles AS tf
	LEFT JOIN '.TABLE_PREFIX.'Theme AS t ON t.ThemeId = tf.ThemeId
	WHERE t.Enabled = 1 AND tf.FileType = 1
	AND (
	SELECT COUNT(CategoryId)
	FROM ' . TABLE_PREFIX . 'Category c
	WHERE CONCAT(\'/\', c.Template, \'.tpl\') = CONCAT( tf.FilePath, \'/\', tf.FileName ) AND (c.ThemeId = t.ThemeId)
	) = 0 ';
	$files = $this->Conn->Query($sql, 'Path');
	if (!$files) {
	// all possible pages are already created
	return ;
	}

	set_time_limit(0);
	ini_set('memory_limit', -1);

	$dummy =& $this->Application->recallObject($event->Prefix . '.rebuild', null, Array ('skip_autoload' => true));
	/* @var $dummy CategoriesItem */

	$error_count = 0;
	foreach ($files as $a_file => $file_info) {
	$status = $this->_prepareAutoPage($dummy, $a_file, $file_info['ThemeId'], SMS_MODE_FORCE, unserialize($file_info['FileMetaInfo'])); // create system page
	if (!$status) {
	$error_count++;
	}
	}

	if ($this->Application->ConfigValue('QuickCategoryPermissionRebuild')) {
	$updater =& $this->Application->makeClass('kPermCacheUpdater');
	/* @var $updater kPermCacheUpdater */

	$updater->OneStepRun();
	}

	$this->_resetMenuCache();

	if ($error_count) {
	// allow user to review error after structure page creation
	$event->MasterEvent->redirect = false;
	}
	}

	/**
	* Processes OnMassMoveUp, OnMassMoveDown events
	*
	* @param kEvent $event
	*/
	function OnChangePriority(&$event)
	{
	$this->Application->SetVar('priority_prefix', $event->getPrefixSpecial());
	$event->CallSubEvent('priority:' . $event->Name);

	$this->Application->StoreVar('RefreshStructureTree', 1);
	$this->_resetMenuCache();
	}

	/**
	* Completely recalculates priorities in current category
	*
	* @param kEvent $event
	*/
	function OnRecalculatePriorities(&$event)
	{
	if ($this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1)) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$this->Application->SetVar('priority_prefix', $event->getPrefixSpecial());
	$event->CallSubEvent('priority:' . $event->Name);

	$this->_resetMenuCache();
	}

	/**
	* Update Preview Block for FCKEditor
	*
	* @param kEvent $event
	*/
	function OnUpdatePreviewBlock(&$event)
	{
	$event->status = kEvent::erSTOP;
	$string = kUtil::unhtmlentities($this->Application->GetVar('preview_content'));

	$category_helper =& $this->Application->recallObject('CategoryHelper');
	/* @var $category_helper CategoryHelper */

	$string = $category_helper->replacePageIds($string);

	$this->Application->StoreVar('_editor_preview_content_', $string);
	}

	/**
	* Makes simple search for categories
	* based on keywords string
	*
	* @param kEvent $event
	*/
	function OnSimpleSearch(&$event)
	{
	$event->redirect = false;
	$search_table = TABLE_PREFIX.'ses_'.$this->Application->GetSID().'_'.TABLE_PREFIX.'Search';

	$keywords = kUtil::unhtmlentities( trim($this->Application->GetVar('keywords')) );

	$query_object =& $this->Application->recallObject('HTTPQuery');
	/* @var $query_object kHTTPQuery */

	$sql = 'SHOW TABLES LIKE "'.$search_table.'"';

	if ( !isset($query_object->Get['keywords']) && !isset($query_object->Post['keywords']) && $this->Conn->Query($sql) ) {
	// used when navigating by pages or changing sorting in search results
	return;
	}

	if(!$keywords \|\| strlen($keywords) < $this->Application->ConfigValue('Search_MinKeyword_Length'))
	{
	$this->Conn->Query('DROP TABLE IF EXISTS '.$search_table);
	$this->Application->SetVar('keywords_too_short', 1);
	return; // if no or too short keyword entered, doing nothing
	}

	$this->Application->StoreVar('keywords', $keywords);

	$this->saveToSearchLog($keywords, 0); // 0 - simple search, 1 - advanced search

	$keywords = strtr($keywords, Array('%' => '\\%', '_' => '\\_'));

	$event->setPseudoClass('_List');

	$object =& $event->getObject();
	/* @var $object kDBList */

	$this->Application->SetVar($event->getPrefixSpecial().'_Page', 1);
	$lang = $this->Application->GetVar('m_lang');
	$items_table = $this->Application->getUnitOption($event->Prefix, 'TableName');
	$module_name = 'In-Portal';

	$sql = 'SELECT *
	FROM ' . $this->Application->getUnitOption('confs', 'TableName') . '
	WHERE ModuleName = ' . $this->Conn->qstr($module_name) . ' AND SimpleSearch = 1';
	$search_config = $this->Conn->Query($sql, 'FieldName');

	$field_list = array_keys($search_config);

	$join_clauses = Array();

	// field processing
	$weight_sum = 0;

	$alias_counter = 0;

	$custom_fields = $this->Application->getUnitOption($event->Prefix, 'CustomFields');
	if ($custom_fields) {
	$custom_table = $this->Application->getUnitOption($event->Prefix.'-cdata', 'TableName');
	$join_clauses[] = ' LEFT JOIN '.$custom_table.' custom_data ON '.$items_table.'.ResourceId = custom_data.ResourceId';
	}

	// what field in search config becomes what field in sql (key - new field, value - old field (from searchconfig table))
	$search_config_map = Array();

	foreach ($field_list as $key => $field) {
	$local_table = TABLE_PREFIX.$search_config[$field]['TableName'];
	$weight_sum += $search_config[$field]['Priority']; // counting weight sum; used when making relevance clause

	// processing multilingual fields
	if ( !$search_config[$field]['CustomFieldId'] && $object->GetFieldOption($field, 'formatter') == 'kMultiLanguage' ) {
	$field_list[$key.'_primary'] = 'l'.$this->Application->GetDefaultLanguageId().'_'.$field;
	$field_list[$key] = 'l'.$lang.'_'.$field;

	if (!isset($search_config[$field]['ForeignField'])) {
	$field_list[$key.'_primary'] = $local_table.'.'.$field_list[$key.'_primary'];
	$search_config_map[ $field_list[$key.'_primary'] ] = $field;
	}
	}

	// processing fields from other tables
	$foreign_field = $search_config[$field]['ForeignField'];

	if ( $foreign_field ) {
	$exploded = explode(':', $foreign_field, 2);
	if ($exploded[0] == 'CALC') {
	// ignoring having type clauses in simple search
	unset($field_list[$key]);
	continue;
	}
	else {
	$multi_lingual = false;
	if ($exploded[0] == 'MULTI') {
	$multi_lingual = true;
	$foreign_field = $exploded[1];
	}

	$exploded = explode('.', $foreign_field); // format: table.field_name
	$foreign_table = TABLE_PREFIX.$exploded[0];

	$alias_counter++;
	$alias = 't'.$alias_counter;

	if ($multi_lingual) {
	$field_list[$key] = $alias.'.'.'l'.$lang.'_'.$exploded[1];
	$field_list[$key.'_primary'] = 'l'.$this->Application->GetDefaultLanguageId().'_'.$field;
	$search_config_map[ $field_list[$key] ] = $field;
	$search_config_map[ $field_list[$key.'_primary'] ] = $field;
	}
	else {
	$field_list[$key] = $alias.'.'.$exploded[1];
	$search_config_map[ $field_list[$key] ] = $field;
	}

	$join_clause = str_replace('{ForeignTable}', $alias, $search_config[$field]['JoinClause']);
	$join_clause = str_replace('{LocalTable}', $items_table, $join_clause);

	$join_clauses[] = ' LEFT JOIN '.$foreign_table.' '.$alias.'
	ON '.$join_clause;
	}
	}
	else {
	// processing fields from local table
	if ($search_config[$field]['CustomFieldId']) {
	$local_table = 'custom_data';

	// search by custom field value on current language
	$custom_field_id = array_search($field_list[$key], $custom_fields);
	$field_list[$key] = 'l'.$lang.'_cust_'.$custom_field_id;

	// search by custom field value on primary language
	$field_list[$key.'_primary'] = $local_table.'.l'.$this->Application->GetDefaultLanguageId().'_cust_'.$custom_field_id;
	$search_config_map[ $field_list[$key.'_primary'] ] = $field;
	}

	$field_list[$key] = $local_table.'.'.$field_list[$key];
	$search_config_map[ $field_list[$key] ] = $field;
	}
	}

	// keyword string processing
	$search_helper =& $this->Application->recallObject('SearchHelper');
	/* @var $search_helper kSearchHelper */

	$where_clause = Array ();
	foreach ($field_list as $field) {
	if (preg_match('/^' . preg_quote($items_table, '/') . '\.(.*)/', $field, $regs)) {
	// local real field
	$filter_data = $search_helper->getSearchClause($object, $regs[1], $keywords, false);
	if ($filter_data) {
	$where_clause[] = $filter_data['value'];
	}
	}
	elseif (preg_match('/^custom_data\.(.*)/', $field, $regs)) {
	$custom_field_name = 'cust_' . $search_config_map[$field];
	$filter_data = $search_helper->getSearchClause($object, $custom_field_name, $keywords, false);
	if ($filter_data) {
	$where_clause[] = str_replace('`' . $custom_field_name . '`', $field, $filter_data['value']);
	}
	}
	else {
	$where_clause[] = $search_helper->buildWhereClause($keywords, Array ($field));
	}
	}

	$where_clause = '((' . implode(') OR (', $where_clause) . '))'; // 2 braces for next clauses, see below!

	$where_clause = $where_clause . ' AND (' . $items_table . '.Status = ' . STATUS_ACTIVE . ')';

	if ($event->MasterEvent && $event->MasterEvent->Name == 'OnListBuild') {
	if ($event->MasterEvent->getEventParam('ResultIds')) {
	$where_clause .= ' AND '.$items_table.'.ResourceId IN ('.implode(',', $event->MasterEvent->getEventParam('ResultIds')).')';
	}
	}

	// exclude template based sections from search results (ie. registration)
	if ( $this->Application->ConfigValue('ExcludeTemplateSectionsFromSearch') ) {
	$where_clause .= ' AND ' . $items_table . '.ThemeId = 0';
	}

	// making relevance clause
	$positive_words = $search_helper->getPositiveKeywords($keywords);
	$this->Application->StoreVar('highlight_keywords', serialize($positive_words));
	$revelance_parts = Array();
	reset($search_config);

	foreach ($positive_words as $keyword_index => $positive_word) {
	$positive_word = $search_helper->transformWildcards($positive_word);
	$positive_words[$keyword_index] = $this->Conn->escape($positive_word);
	}

	foreach ($field_list as $field) {

	if (!array_key_exists($field, $search_config_map)) {
	$map_key = $search_config_map[$items_table . '.' . $field];
	}
	else {
	$map_key = $search_config_map[$field];
	}

	$config_elem = $search_config[ $map_key ];
	$weight = $config_elem['Priority'];

	// search by whole words only ([[:<:]] - word boundary)
	/*$revelance_parts[] = 'IF('.$field.' REGEXP "[[:<:]]('.implode(' ', $positive_words).')[[:>:]]", '.$weight.', 0)';
	foreach ($positive_words as $keyword) {
	$revelance_parts[] = 'IF('.$field.' REGEXP "[[:<:]]('.$keyword.')[[:>:]]", '.$weight.', 0)';
	}*/

	// search by partial word matches too
	$revelance_parts[] = 'IF('.$field.' LIKE "%'.implode(' ', $positive_words).'%", '.$weight_sum.', 0)';
	foreach ($positive_words as $keyword) {
	$revelance_parts[] = 'IF('.$field.' LIKE "%'.$keyword.'%", '.$weight.', 0)';
	}
	}

	$revelance_parts = array_unique($revelance_parts);

	$conf_postfix = $this->Application->getUnitOption($event->Prefix, 'SearchConfigPostfix');
	$rel_keywords = $this->Application->ConfigValue('SearchRel_Keyword_'.$conf_postfix) / 100;
	$rel_pop = $this->Application->ConfigValue('SearchRel_Pop_'.$conf_postfix) / 100;
	$rel_rating = $this->Application->ConfigValue('SearchRel_Rating_'.$conf_postfix) / 100;
	$relevance_clause = '('.implode(' + ', $revelance_parts).') / '.$weight_sum.' * '.$rel_keywords;
	if ($rel_pop && $object->isField('Hits')) {
	$relevance_clause .= ' + (Hits + 1) / (MAX(Hits) + 1) * '.$rel_pop;
	}
	if ($rel_rating && $object->isField('CachedRating')) {
	$relevance_clause .= ' + (CachedRating + 1) / (MAX(CachedRating) + 1) * '.$rel_rating;
	}

	// building final search query
	if (!$this->Application->GetVar('do_not_drop_search_table')) {
	$this->Conn->Query('DROP TABLE IF EXISTS '.$search_table); // erase old search table if clean k4 event
	$this->Application->SetVar('do_not_drop_search_table', true);
	}


	$search_table_exists = $this->Conn->Query('SHOW TABLES LIKE "'.$search_table.'"');
	if ($search_table_exists) {
	$select_intro = 'INSERT INTO '.$search_table.' (Relevance, ItemId, ResourceId, ItemType, EdPick) ';
	}
	else {
	$select_intro = 'CREATE TABLE '.$search_table.' AS ';
	}

	$edpick_clause = $this->Application->getUnitOption($event->Prefix.'.EditorsPick', 'Fields') ? $items_table.'.EditorsPick' : '0';


	$sql = $select_intro.' SELECT '.$relevance_clause.' AS Relevance,
	'.$items_table.'.'.$this->Application->getUnitOption($event->Prefix, 'IDField').' AS ItemId,
	'.$items_table.'.ResourceId,
	'.$this->Application->getUnitOption($event->Prefix, 'ItemType').' AS ItemType,
	'.$edpick_clause.' AS EdPick
	FROM '.$object->TableName.'
	'.implode(' ', $join_clauses).'
	WHERE '.$where_clause.'
	GROUP BY '.$items_table.'.'.$this->Application->getUnitOption($event->Prefix, 'IDField').' ORDER BY Relevance DESC';

	$this->Conn->Query($sql);

	if ( !$search_table_exists ) {
	$sql = 'ALTER TABLE ' . $search_table . '
	ADD INDEX (ResourceId),
	ADD INDEX (Relevance)';
	$this->Conn->Query($sql);
	}
	}

	/**
	* Make record to search log
	*
	* @param string $keywords
	* @param int $search_type 0 - simple search, 1 - advanced search
	*/
	function saveToSearchLog($keywords, $search_type = 0)
	{
	// don't save keywords for each module separately, just one time
	// static variable can't help here, because each module uses it's own class instance !
	if (!$this->Application->GetVar('search_logged')) {
	$sql = 'UPDATE '.TABLE_PREFIX.'SearchLog
	SET Indices = Indices + 1
	WHERE Keyword = '.$this->Conn->qstr($keywords).' AND SearchType = '.$search_type; // 0 - simple search, 1 - advanced search
	$this->Conn->Query($sql);
	if ($this->Conn->getAffectedRows() == 0) {
	$fields_hash = Array('Keyword' => $keywords, 'Indices' => 1, 'SearchType' => $search_type);
	$this->Conn->doInsert($fields_hash, TABLE_PREFIX.'SearchLog');
	}

	$this->Application->SetVar('search_logged', 1);
	}
	}

	/**
	* Load item if id is available
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function LoadItem(&$event)
	{
	if ( $event->Special != '-virtual' ) {
	parent::LoadItem($event);
	return;
	}

	$object =& $event->getObject();
	/* @var $object kDBItem */

	$id = $this->getPassedID($event);

	if ( $object->isLoaded() && !is_array($id) && ($object->GetID() == $id) ) {
	// object is already loaded by same id
	return;
	}

	if ( $object->Load($id, null, true) ) {
	$actions =& $this->Application->recallObject('kActions');
	/* @var $actions Params */

	$actions->Set($event->getPrefixSpecial() . '_id', $object->GetID());
	}
	else {
	$object->setID($id);
	}
	}

	/**
	* Returns constrain for priority calculations
	*
	* @param kEvent $event
	* @return void
	* @see PriorityEventHandler
	* @access protected
	*/
	protected function OnGetConstrainInfo(&$event)
	{
	$constrain = ''; // for OnSave

	$event_name = $event->getEventParam('original_event');
	$actual_event_name = $event->getEventParam('actual_event');

	if ( $actual_event_name == 'OnSavePriorityChanges' \|\| $event_name == 'OnAfterItemLoad' \|\| $event_name == 'OnAfterItemDelete' ) {
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$constrain = 'ParentId = ' . $object->GetDBField('ParentId');
	}
	elseif ( $actual_event_name == 'OnPreparePriorities' ) {
	$constrain = 'ParentId = ' . $this->Application->GetVar('m_cat_id');
	}
	elseif ( $event_name == 'OnSave' ) {
	$constrain = '';
	}
	else {
	$constrain = 'ParentId = ' . $this->Application->GetVar('m_cat_id');
	}

	$event->setEventParam('constrain_info', Array ($constrain, ''));
	}
	+
	+ /**
	+ * Parses category part of url, build main part of url
	+ *
	+ * @param int $rewrite_mode Mode in what rewrite listener was called. Possbile two modes: REWRITE_MODE_BUILD, REWRITE_MODE_PARSE.
	+ * @param string $prefix Prefix, that listener uses for system integration
	+ * @param Array $params Params, that are used for url building or created during url parsing.
	+ * @param Array $url_parts Url parts to parse (only for parsing).
	+ * @param bool $keep_events Keep event names in resulting url (only for building).
	+ * @return bool\|string\|Array Return true to continue to next listener; return false (when building) not to rewrite given prefix; return false (when parsing) to stop processing at this listener.
	+ */
	+ public function CategoryRewriteListener($rewrite_mode = REWRITE_MODE_BUILD, $prefix, &$params, &$url_parts, $keep_events = false)
	+ {
	+ if ($rewrite_mode == REWRITE_MODE_BUILD) {
	+ return $this->_buildMainUrl($prefix, $params, $keep_events);
	+ }
	+
	+ if ( $this->_parseFriendlyUrl($url_parts, $params) ) {
	+ // friendly urls work like exact match only!
	+ return false;
	+ }
	+
	+ $this->_parseCategory($url_parts, $params);
	+
	+ return true;
	+ }
	+
	+ /**
	+ * Build main part of every url
	+ *
	+ * @param string $prefix_special
	+ * @param Array $params
	+ * @param bool $keep_events
	+ * @return string
	+ */
	+ protected function _buildMainUrl($prefix_special, &$params, $keep_events)
	+ {
	+ $ret = '';
	+ list ($prefix) = explode('.', $prefix_special);
	+
	+ $rewrite_processor =& $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */
	+
	+ $processed_params = $rewrite_processor->getProcessedParams($prefix_special, $params, $keep_events);
	+ if ($processed_params === false) {
	+ return '';
	+ }
	+
	+ // add language
	+ if ($processed_params['m_lang'] && ($processed_params['m_lang'] != $rewrite_processor->primaryLanguageId)) {
	+ $language_name = $this->Application->getCache('language_names[%LangIDSerial:' . $processed_params['m_lang'] . '%]');
	+ if ($language_name === false) {
	+ $sql = 'SELECT PackName
	+ FROM ' . TABLE_PREFIX . 'Language
	+ WHERE LanguageId = ' . $processed_params['m_lang'];
	+ $language_name = $this->Conn->GetOne($sql);
	+
	+ $this->Application->setCache('language_names[%LangIDSerial:' . $processed_params['m_lang'] . '%]', $language_name);
	+ }
	+
	+ $ret .= $language_name . '/';
	+ }
	+
	+ // add theme
	+ if ($processed_params['m_theme'] && ($processed_params['m_theme'] != $rewrite_processor->primaryThemeId)) {
	+ $theme_name = $this->Application->getCache('theme_names[%ThemeIDSerial:' . $processed_params['m_theme'] . '%]');
	+ if ($theme_name === false) {
	+ $sql = 'SELECT Name
	+ FROM ' . TABLE_PREFIX . 'Theme
	+ WHERE ThemeId = ' . $processed_params['m_theme'];
	+ $theme_name = $this->Conn->GetOne($sql);
	+
	+ $this->Application->setCache('theme_names[%ThemeIDSerial:' . $processed_params['m_theme'] . '%]', $theme_name);
	+
	+ }
	+
	+ $ret .= $theme_name . '/';
	+ }
	+
	+ // inject custom url parts made by other rewrite listeners just after language/theme url parts
	+ if ($params['inject_parts']) {
	+ $ret .= implode('/', $params['inject_parts']) . '/';
	+ }
	+
	+ // add category
	+ if ($processed_params['m_cat_id'] > 0 && $params['pass_category']) {
	+ $category_filename = $this->Application->getCategoryCache($processed_params['m_cat_id'], 'filenames');
	+
	+ preg_match('/^Content\/(.*)/i', $category_filename, $regs);
	+
	+ if ($regs) {
	+ $template = array_key_exists('t', $params) ? $params['t'] : false;
	+
	+ if (strtolower($regs[1]) == strtolower($template)) {
	+ // we could have category path like "Content/<template_path>" in this case remove template
	+ $params['pass_template'] = false;
	+ }
	+
	+ $ret .= $regs[1] . '/';
	+ }
	+
	+ $params['category_processed'] = true;
	+ }
	+
	+ // reset category page
	+ $force_page_adding = false;
	+ if (array_key_exists('reset', $params) && $params['reset']) {
	+ unset($params['reset']);
	+
	+ if ($processed_params['m_cat_id']) {
	+ $processed_params['m_cat_page'] = 1;
	+ $force_page_adding = true;
	+ }
	+ }
	+
	+ if ((array_key_exists('category_processed', $params) && $params['category_processed'] && ($processed_params['m_cat_page'] > 1)) \|\| $force_page_adding) {
	+ // category name was added before AND category page number found
	+ $ret = rtrim($ret, '/') . '_' . $processed_params['m_cat_page'] . '/';
	+ }
	+
	+ $template = array_key_exists('t', $params) ? $params['t'] : false;
	+ $category_template = ($processed_params['m_cat_id'] > 0) && $params['pass_category'] ? $this->Application->getCategoryCache($processed_params['m_cat_id'], 'category_designs') : '';
	+
	+ if ((strtolower($template) == '__default__') && ($processed_params['m_cat_id'] == 0)) {
	+ // for "Home" category set template to index when not set
	+ $template = 'index';
	+ }
	+
	+ // remove template from url if it is category index cached template OR site homepage
	+ if (($template == $category_template) \|\| (mb_strtolower($template) == '__default__') \|\| ($template == 'index')) {
	+ // given template is also default template for this category OR '__default__' given OR site homepage
	+ $params['pass_template'] = false;
	+ }
	+
	+ if ($template && $params['pass_template']) {
	+ $ret .= $template . '/';
	+ }
	+
	+ return mb_strtolower( rtrim($ret, '/') );
	+ }
	+
	+ /**
	+ * Checks if whole url_parts matches a whole In-CMS page
	+ *
	+ * @param Array $url_parts
	+ * @param Array $vars
	+ * @return bool
	+ */
	+ protected function _parseFriendlyUrl($url_parts, &$vars)
	+ {
	+ if (!$url_parts) {
	+ return false;
	+ }
	+
	+ $sql = 'SELECT CategoryId, NamedParentPath
	+ FROM ' . TABLE_PREFIX . 'Category
	+ WHERE FriendlyURL = ' . $this->Conn->qstr(implode('/', $url_parts));
	+ $friendly = $this->Conn->GetRow($sql);
	+
	+ $rewrite_processor =& $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */
	+
	+ if ($friendly) {
	+ $vars['m_cat_id'] = $friendly['CategoryId'];
	+ $vars['t'] = preg_replace('/^Content\//i', '', $friendly['NamedParentPath']);
	+
	+ while ($url_parts) {
	+ $rewrite_processor->partParsed( array_shift($url_parts) );
	+ }
	+
	+ return true;
	+ }
	+
	+ return false;
	+ }
	+
	+ /**
	+ * Extracts category part from url
	+ *
	+ * @param Array $url_parts
	+ * @param Array $vars
	+ * @return bool
	+ */
	+ protected function _parseCategory($url_parts, &$vars)
	+ {
	+ if (!$url_parts) {
	+ return false;
	+ }
	+
	+ $res = false;
	+ $url_part = array_shift($url_parts);
	+
	+ $category_id = 0;
	+ $last_category_info = false;
	+ $category_path = $url_part == 'content' ? '' : 'content';
	+
	+ $rewrite_processor =& $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */
	+
	+ do {
	+ $category_path = trim($category_path . '/' . $url_part, '/');
	+ // bb_<topic_id> -> forums/bb_2
	+ if ( !preg_match('/^bb_[\d]+$/', $url_part) && preg_match('/(.*)_([\d]+)$/', $category_path, $rets) ) {
	+ $category_path = $rets[1];
	+ $vars['m_cat_page'] = $rets[2];
	+ }
	+
	+ $sql = 'SELECT CategoryId, SymLinkCategoryId, NamedParentPath
	+ FROM ' . TABLE_PREFIX . 'Category
	+ WHERE (LOWER(NamedParentPath) = ' . $this->Conn->qstr($category_path) . ') AND (ThemeId = ' . $vars['m_theme'] . ' OR ThemeId = 0)';
	+ $category_info = $this->Conn->GetRow($sql);
	+
	+ if ($category_info !== false) {
	+ $last_category_info = $category_info;
	+ $rewrite_processor->partParsed($url_part);
	+
	+ $url_part = array_shift($url_parts);
	+ $res = true;
	+ }
	+ } while ($category_info !== false && $url_part);
	+
	+ if ($last_category_info) {
	+ // this category is symlink to other category, so use it's url instead
	+ // (used in case if url prior to symlink adding was indexed by spider or was bookmarked)
	+ if ($last_category_info['SymLinkCategoryId']) {
	+ $sql = 'SELECT CategoryId, NamedParentPath
	+ FROM ' . TABLE_PREFIX . 'Category
	+ WHERE (CategoryId = ' . $last_category_info['SymLinkCategoryId'] . ')';
	+ $category_info = $this->Conn->GetRow($sql);
	+
	+ if ($category_info) {
	+ // web symlinked category was found use it
	+ // TODO: maybe 302 redirect should be made to symlinked category url (all other url parts should stay)
	+ $last_category_info = $category_info;
	+ }
	+ }
	+
	+ // 1. Set virtual page as template, this will be replaced to physical template later in kApplication::Run.
	+ // 2. Don't set CachedTemplate field as template here, because we will loose original page associated with it's cms blocks!
	+ $vars['t'] = mb_strtolower( preg_replace('/^Content\//i', '', $last_category_info['NamedParentPath']), 'UTF-8' );
	+
	+ $vars['m_cat_id'] = $last_category_info['CategoryId'];
	+ $vars['is_virtual'] = true; // for template from POST, strange code there!
	+ }
	+ else {
	+ $vars['m_cat_id'] = 0;
	+ }
	+
	+ return $res;
	+ }
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/units/themes/themes_eh.php
	===================================================================
	--- branches/5.2.x/core/units/themes/themes_eh.php (revision 14713)
	+++ branches/5.2.x/core/units/themes/themes_eh.php (revision 14714)
	@@ -1,202 +1,195 @@
	<?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 ThemesEventHandler extends kDBEventHandler {

	/**
	* Allows to override standard permission mapping
	*
	*/
	function mapPermissions()
	{
	parent::mapPermissions();
	$permissions = Array(
	'OnChangeTheme' => Array('self' => true),
	);

	$this->permMapping = array_merge($this->permMapping, $permissions);
	}

	/**
	* Checks user permission to execute given $event
	*
	* @param kEvent $event
	* @return bool
	* @access public
	*/
	public function CheckPermission(&$event)
	{
	if ($event->Name == 'OnItemBuild') {
	// check permission without using $event->getSection(),
	// so first cache rebuild won't lead to "ldefault_Name" field being used
	return true;
	}

	return parent::CheckPermission($event);
	}

	/**
	* Allows to set selected theme as primary
	*
	* @param kEvent $event
	*/
	function OnSetPrimary(&$event)
	{
	if ($this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1)) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$ids = $this->StoreSelectedIDs($event);
	if ($ids) {
	$id = array_shift($ids);
	$this->setPrimary($id);

	$rebuild_event = new kEvent('adm:OnRebuildThemes');
	$this->Application->HandleEvent($rebuild_event);
	}

	$this->clearSelectedIDs($event);
	}

	function setPrimary($id)
	{
	$id_field = $this->Application->getUnitOption($this->Prefix, 'IDField');
	$table_name = $this->Application->getUnitOption($this->Prefix, 'TableName');

	$sql = 'UPDATE '.$table_name.'
	SET PrimaryTheme = 0';
	$this->Conn->Query($sql);


	$sql = 'UPDATE '.$table_name.'
	SET PrimaryTheme = 1, Enabled = 1
	WHERE '.$id_field.' = '.$id;
	$this->Conn->Query($sql);
	}

	/**
	* Set's primary theme (when checkbox used on editing form)
	*
	* @param kEvent $event
	*/
	function OnAfterCopyToLive(&$event)
	{
	$object =& $this->Application->recallObject($event->Prefix.'.-item', null, Array('skip_autoload' => true, 'live_table' => true));
	/* @var $object kDBItem */

	$object->Load($event->getEventParam('id'));

	if ($object->GetDBField('PrimaryTheme')) {
	$this->setPrimary($event->getEventParam('id'));
	}
	}

	/**
	* Also rebuilds theme files, when enabled theme is saved
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnSave(&$event)
	{
	parent::OnSave($event);

	if ( ($event->status != kEvent::erSUCCESS) \|\| !$event->getEventParam('ids') ) {
	return ;
	}

	$ids = $event->getEventParam('ids');

	$id_field = $this->Application->getUnitOption($event->Prefix, 'IDField');
	$table_name = $this->Application->getUnitOption($event->Prefix, 'TableName');

	$sql = 'SELECT COUNT(*)
	FROM ' . $table_name . '
	WHERE ' . $id_field . ' IN (' . $ids . ') AND (Enabled = 1)';
	$enabled_themes = $this->Conn->GetOne($sql);

	if ( $enabled_themes ) {
	$rebuild_event = new kEvent('adm:OnRebuildThemes');
	$this->Application->HandleEvent($rebuild_event);
	}
	}

	/**
	* Allows to change the theme
	*
	* @param kEvent $event
	*/
	function OnChangeTheme(&$event)
	{
	if ($this->Application->isAdminUser) {
	// for structure theme dropdown
	$this->Application->StoreVar('theme_id', $this->Application->GetVar('theme'));
	$this->Application->StoreVar('RefreshStructureTree', 1);
	return ;
	}

	$this->Application->SetVar('t', 'index');
	$this->Application->SetVar('m_cat_id', 0);

	- if (MOD_REWRITE) {
	- $mod_rewrite_helper =& $this->Application->recallObject('ModRewriteHelper');
	- /* @var $mod_rewrite_helper kModRewriteHelper */
	-
	- $mod_rewrite_helper->removePages();
	- }
	-
	$this->Application->SetVar('m_theme', $this->Application->GetVar('theme'));
	}

	/**
	* Apply system filter to themes list
	*
	* @param kEvent $event
	* @return void
	* @access protected
	* @see kDBEventHandler::OnListBuild()
	*/
	protected function SetCustomQuery(&$event)
	{
	parent::SetCustomQuery($event);

	$object =& $event->getObject();
	/* @var $object kDBList */

	if (in_array($event->Special, Array ('enabled', 'selected', 'available')) \|\| !$this->Application->isAdminUser) {
	// "enabled" special or Front-End
	$object->addFilter('enabled_filter', '%1$s.Enabled = ' . STATUS_ACTIVE);
	}

	// site domain theme picker
	if ($event->Special == 'selected' \|\| $event->Special == 'available') {
	$edit_picker_helper =& $this->Application->recallObject('EditPickerHelper');
	/* @var $edit_picker_helper EditPickerHelper */

	$edit_picker_helper->applyFilter($event, 'Themes');
	}

	// apply domain-based theme filtering
	$themes = $this->Application->siteDomainField('Themes');

	if (strlen($themes)) {
	$themes = explode('\|', substr($themes, 1, -1));
	$object->addFilter('domain_filter', '%1$s.ThemeId IN (' . implode(',', $themes) . ')');
	}
	}
	}
	Index: branches/5.2.x/core/units/helpers/mod_rewrite_helper.php
	===================================================================
	--- branches/5.2.x/core/units/helpers/mod_rewrite_helper.php (revision 14713)
	+++ branches/5.2.x/core/units/helpers/mod_rewrite_helper.php (revision 14714)
	@@ -1,1235 +1,271 @@
	<?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 kModRewriteHelper extends kHelper {
	-
	- /**
	- * Holds a refererence to httpquery
	- *
	- * @var kHttpQuery
	- */
	- var $HTTPQuery = null;
	-
	- /**
	- * Urls parts, that needs to be matched by rewrite listeners
	- *
	- * @var Array
	- */
	- var $_partsToParse = Array ();
	-
	- /**
	- * Category item prefix, that was found
	- *
	- * @var string
	- */
	- var $_modulePrefix = false;
	-
	- /**
	- * Template aliases for current theme
	- *
	- * @var Array
	- */
	- var $_templateAliases = null;
	-
	- /**
	- * Domain-based primary language id
	- *
	- * @var int
	- */
	- var $primaryLanguageId = false;
	-
	- /**
	- * Domain-based primary theme id
	- *
	- * @var int
	- */
	- var $primaryThemeId = false;
	-
	- /**
	- * Possible url endings from ModRewriteUrlEnding configuration variable
	- *
	- * @var Array
	- */
	- var $_urlEndings = Array ('.html', '/', '');
	-
	- /**
	- * Constructor of kModRewriteHelper class
	- *
	- * @return kModRewriteHelper
	- */
	- public function __construct()
	- {
	- parent::__construct();
	-
	- $this->HTTPQuery =& $this->Application->recallObject('HTTPQuery');
	-
	- // domain based primary language
	- $this->primaryLanguageId = $this->Application->siteDomainField('PrimaryLanguageId');
	-
	- // domain based primary theme
	- $this->primaryThemeId = $this->Application->siteDomainField('PrimaryThemeId');
	- }
	-
	- function processRewriteURL()
	- {
	- $passed = Array ();
	- $url = $this->HTTPQuery->Get('_mod_rw_url_');
	-
	- if ($url) {
	- foreach ($this->_urlEndings as $url_ending) {
	- if (substr($url, strlen($url) - strlen($url_ending)) == $url_ending) {
	- $url = substr($url, 0, strlen($url) - strlen($url_ending));
	- $default_ending = $this->Application->ConfigValue('ModRewriteUrlEnding');
	-
	- // user manually typed url with different url ending -> redirect to same url with default url ending
	- if (($url_ending != $default_ending) && $this->Application->ConfigValue('ForceModRewriteUrlEnding')) {
	- $target_url = $this->Application->BaseURL() . $url . $default_ending;
	- $this->Application->Redirect('external:' . $target_url, Array ('response_code' => 301));
	- }
	-
	- break;
	- }
	- }
	- }
	-
	- $restored = false;
	-
	- $cached = $this->_getCachedUrl($url);
	-
	- if ($cached !== false) {
	- $vars = $cached['vars'];
	- $passed = $cached['passed'];
	- $restored = true;
	- }
	- else {
	- $vars = $this->parseRewriteURL($url);
	- $passed = $vars['pass']; // also used in bottom of this method
	- unset($vars['pass']);
	-
	- $this->_setCachedUrl($url, Array ('vars' => $vars, 'passed' => $passed));
	-
	- if (array_key_exists('t', $this->HTTPQuery->Post) && $this->HTTPQuery->Post['t']) {
	- // template from POST overrides template from URL.
	- $vars['t'] = $this->HTTPQuery->Post['t'];
	- if (isset($vars['is_virtual']) && $vars['is_virtual']) {
	- $vars['m_cat_id'] = 0; // this is virtual template category (for Proj-CMS)
	- }
	- }
	-
	- unset($vars['is_virtual']);
	- }
	-
	- foreach ($vars as $name => $value) {
	- $this->HTTPQuery->Set($name, $value);
	- }
	-
	- $this->InitAll(); // also will use parsed language to load phrases from it
	-
	- $this->HTTPQuery->finalizeParsing($passed);
	- }
	-
	- function _getCachedUrl($url)
	- {
	- if (!$url) {
	- return false;
	- }
	-
	- $sql = 'SELECT *
	- FROM ' . TABLE_PREFIX . 'CachedUrls
	- WHERE Hash = ' . crc32($url) . ' AND DomainId = ' . (int)$this->Application->siteDomainField('DomainId');
	- $data = $this->Conn->GetRow($sql);
	-
	- if ($data) {
	- $lifetime = (int)$data['LifeTime']; // in seconds
	- if (($lifetime > 0) && ($data['Cached'] + $lifetime < adodb_mktime())) {
	- // delete expired
	- $sql = 'DELETE FROM ' . TABLE_PREFIX . 'CachedUrls
	- WHERE UrlId = ' . $data['UrlId'];
	- $this->Conn->Query($sql);
	-
	- return false;
	- }
	-
	- return unserialize($data['ParsedVars']);
	- }
	-
	- return false;
	- }
	-
	- function _setCachedUrl($url, $data)
	- {
	- if (!$url) {
	- return ;
	- }
	-
	- $vars = $data['vars'];
	- $passed = $data['passed'];
	- sort($passed);
	-
	- // get expiration
	- if ($vars['m_cat_id'] > 0) {
	- $sql = 'SELECT PageExpiration
	- FROM ' . TABLE_PREFIX . 'Category
	- WHERE CategoryId = ' . $vars['m_cat_id'];
	- $expiration = $this->Conn->GetOne($sql);
	- }
	-
	- // get prefixes
	- $prefixes = Array ();
	- $m_index = array_search('m', $passed);
	-
	- if ($m_index !== false) {
	- unset($passed[$m_index]);
	-
	- if ($vars['m_cat_id'] > 0) {
	- $prefixes[] = 'c:' . $vars['m_cat_id'];
	- }
	-
	- $prefixes[] = 'lang:' . $vars['m_lang'];
	- $prefixes[] = 'theme:' . $vars['m_theme'];
	- }
	-
	- foreach ($passed as $prefix) {
	- if (array_key_exists($prefix . '_id', $vars) && is_numeric($vars[$prefix . '_id'])) {
	- $prefixes[] = $prefix . ':' . $vars[$prefix . '_id'];
	- }
	- else {
	- $prefixes[] = $prefix;
	- }
	- }
	-
	- $fields_hash = Array (
	- 'Url' => $url,
	- 'Hash' => crc32($url),
	- 'DomainId' => (int)$this->Application->siteDomainField('DomainId'),
	- 'Prefixes' => $prefixes ? '\|' . implode('\|', $prefixes) . '\|' : '',
	- 'ParsedVars' => serialize($data),
	- 'Cached' => adodb_mktime(),
	- 'LifeTime' => isset($expiration) && is_numeric($expiration) ? $expiration : -1
	- );
	-
	- $this->Conn->doInsert($fields_hash, TABLE_PREFIX . 'CachedUrls');
	- }
	-
	- function parseRewriteURL($url)
	- {
	- $vars = Array ('pass' => Array ('m'));
	- $url_parts = $url ? explode('/', trim(mb_strtolower($url, 'UTF-8'), '/')) : Array ();
	-
	- $this->_partsToParse = $url_parts;
	-
	- if ( ($this->HTTPQuery->Get('rewrite') == 'on') \|\| !$url_parts ) {
	- $this->_setDefaultValues($vars);
	- }
	-
	- if ( !$url_parts ) {
	- $this->InitAll();
	- $vars['t'] = $this->HTTPQuery->getDefaultTemplate('');
	-
	- return $vars;
	- }
	- else {
	- $vars['t'] = '';
	- }
	-
	- $this->_parseLanguage($url_parts, $vars);
	- $this->_parseTheme($url_parts, $vars);
	-
	- // http://site-url/<language>/<theme>/<category>[_<category_page>]/<template>/<module_page>
	- // http://site-url/<language>/<theme>/<category>[_<category_page>]/<module_page> (category-based section template)
	- // http://site-url/<language>/<theme>/<category>[_<category_page>]/<template>/<module_item>
	- // http://site-url/<language>/<theme>/<category>[_<category_page>]/<module_item> (category-based detail template)
	- // http://site-url/<language>/<theme>/<rl_injections>/<category>[_<category_page>]/<rl_part> (customized url)
	-
	- if ( $this->processRewriteListeners($url_parts, $vars) ) {
	- return $vars;
	- }
	-
	- $this->_parsePhisycalTemplate($url_parts, $vars);
	-
	- if ( ($this->_modulePrefix === false) && $vars['m_cat_id'] && !$this->_partsToParse ) {
	- // no category item found, but category found and all url matched -> module index page
	-
	- return $vars;
	- }
	-
	- if ( $this->_partsToParse ) {
	- $not_found = $this->Application->ConfigValue('ErrorTemplate');
	- $vars['t'] = $not_found ? $not_found : 'error_notfound';
	-
	- $themes_helper =& $this->Application->recallObject('ThemesHelper');
	- /* @var $themes_helper kThemesHelper */
	-
	- $vars['m_cat_id'] = $themes_helper->getPageByTemplate($vars['t'], $vars['m_theme']);
	-
	- header('HTTP/1.0 404 Not Found');
	- }
	-
	- return $vars;
	- }
	-
	- function InitAll()
	- {
	- $this->Application->VerifyThemeId();
	- $this->Application->VerifyLanguageId();
	-
	- // no need, since we don't have any cached phrase IDs + nobody will use PhrasesCache::LanguageId soon
	- // $this->Application->Phrases->Init('phrases');
	- }
	-
	- /**
	- * Processes url using rewrite listeners
	- *
	- * Pattern: Chain of Command
	- *
	- * @param Array $url_parts
	- * @param Array $vars
	- * @return bool
	- */
	- function processRewriteListeners(&$url_parts, &$vars)
	- {
	- $this->initRewriteListeners();
	- $page_number = $this->_parsePage($url_parts, $vars);
	-
	- foreach ($this->Application->RewriteListeners as $prefix => $listeners) {
	- // set default page
	- // $vars[$prefix . '_Page'] = 1; // will override page in session in case, when none is given in url
	-
	- if ($page_number) {
	- // page given in url - use it
	- $vars[$prefix . '_id'] = 0;
	- $vars[$prefix . '_Page'] = $page_number;
	- }
	-
	- // $listeners[1] - listener, used for parsing
	- $listener_result = $listeners[1][0]->$listeners[1][1](REWRITE_MODE_PARSE, $prefix, $vars, $url_parts);
	- if ($listener_result === false) {
	- // will not proceed to other methods
	- return true;
	- }
	- }
	-
	- // will proceed to other methods
	- return false;
	- }
	-
	- /**
	- * Parses real template name from url
	- *
	- * @param Array $url_parts
	- * @param Array $vars
	- * @return bool
	- */
	- function _parsePhisycalTemplate($url_parts, &$vars)
	- {
	- if (!$url_parts) {
	- return false;
	- }
	-
	- do {
	- $template_path = implode('/', $url_parts);
	-
	- $physical_template = $this->Application->getPhysicalTemplate($template_path);
	-
	- if (($physical_template !== false) && (substr($physical_template, 0, 3) != 'id:')) {
	- // replace menu template name with it's actual template name on disk
	- list ($template_path) = explode(':', $physical_template, 2);
	- }
	-
	- $t_parts['path'] = dirname($template_path) == '.' ? '' : '/' . dirname($template_path);
	- $t_parts['file'] = basename($template_path);
	-
	- $sql = 'SELECT FileId
	- FROM ' . TABLE_PREFIX . 'ThemeFiles
	- WHERE (ThemeId = ' . $vars['m_theme'] . ') AND (FilePath = ' . $this->Conn->qstr($t_parts['path']) . ') AND (FileName = ' . $this->Conn->qstr($t_parts['file'] . '.tpl') . ')';
	- $template_found = $this->Conn->GetOne($sql);
	-
	- if (!$template_found) {
	- array_shift($url_parts);
	- }
	- } while (!$template_found && $url_parts);
	-
	- if ($template_found) {
	- $vars['t'] = $template_path;
	-
	- $template_parts = explode('/', $template_path);
	-
	- while ( $template_parts ) {
	- $this->partParsed( array_pop($template_parts), 'rtl' );
	- }
	-
	- // 1. will damage actual category during category item review add process
	- // 2. will use "use_section" parameter of "m_Link" tag to gain same effect
	-// $themes_helper =& $this->Application->recallObject('ThemesHelper');
	-// /* @var $themes_helper kThemesHelper */
	-//
	-// $vars['m_cat_id'] = $themes_helper->getPageByTemplate($template_path, $vars['m_theme']);
	-
	- return true;
	- }
	-
	- return false;
	- }
	-
	- /**
	- * Parses category part of url, build main part of url
	- *
	- * @param int $rewrite_mode Mode in what rewrite listener was called. Possbile two modes: REWRITE_MODE_BUILD, REWRITE_MODE_PARSE.
	- * @param string $prefix Prefix, that listener uses for system integration
	- * @param Array $params Params, that are used for url building or created during url parsing.
	- * @param Array $url_parts Url parts to parse (only for parsing).
	- * @param bool $keep_events Keep event names in resulting url (only for building).
	- * @return bool\|string\|Array Return true to continue to next listener; return false (when building) not to rewrite given prefix; return false (when parsing) to stop processing at this listener.
	- */
	- function MainRewriteListener($rewrite_mode = REWRITE_MODE_BUILD, $prefix, &$params, &$url_parts, $keep_events = false)
	- {
	- if ($rewrite_mode == REWRITE_MODE_BUILD) {
	- return $this->_buildMainUrl($prefix, $params, $keep_events);
	- }
	-
	- if ( $this->_parseFriendlyUrl($url_parts, $params) ) {
	- // friendly urls work like exact match only!
	- return false;
	- }
	-
	- $this->_parseCategory($url_parts, $params);
	-
	- return true;
	- }
	-
	- /**
	- * Build main part of every url
	- *
	- * @param string $prefix_special
	- * @param Array $params
	- * @param bool $keep_events
	- * @return string
	- */
	- function _buildMainUrl($prefix_special, &$params, $keep_events)
	- {
	- $ret = '';
	- list ($prefix) = explode('.', $prefix_special);
	-
	- $processed_params = $this->getProcessedParams($prefix_special, $params, $keep_events);
	- if ($processed_params === false) {
	- return '';
	- }
	-
	- // add language
	- if (!$this->primaryLanguageId) {
	- // when domain-based language not found -> use site-wide language
	- $this->primaryLanguageId = $this->Application->GetDefaultLanguageId();
	- }
	-
	- if ($processed_params['m_lang'] && ($processed_params['m_lang'] != $this->primaryLanguageId)) {
	- $language_name = $this->Application->getCache('language_names[%LangIDSerial:' . $processed_params['m_lang'] . '%]');
	- if ($language_name === false) {
	- $sql = 'SELECT PackName
	- FROM ' . TABLE_PREFIX . 'Language
	- WHERE LanguageId = ' . $processed_params['m_lang'];
	- $language_name = $this->Conn->GetOne($sql);
	-
	- $this->Application->setCache('language_names[%LangIDSerial:' . $processed_params['m_lang'] . '%]', $language_name);
	- }
	-
	- $ret .= $language_name . '/';
	- }
	-
	- // add theme
	- if (!$this->primaryThemeId) {
	- // when domain-based theme not found -> use site-wide theme
	- $this->primaryThemeId = $this->Application->GetDefaultThemeId(true);
	- }
	-
	- if ($processed_params['m_theme'] && ($processed_params['m_theme'] != $this->primaryThemeId)) {
	- $theme_name = $this->Application->getCache('theme_names[%ThemeIDSerial:' . $processed_params['m_theme'] . '%]');
	- if ($theme_name === false) {
	- $sql = 'SELECT Name
	- FROM ' . TABLE_PREFIX . 'Theme
	- WHERE ThemeId = ' . $processed_params['m_theme'];
	- $theme_name = $this->Conn->GetOne($sql);
	-
	- $this->Application->setCache('theme_names[%ThemeIDSerial:' . $processed_params['m_theme'] . '%]', $theme_name);
	-
	- }
	-
	- $ret .= $theme_name . '/';
	- }
	-
	- // inject custom url parts made by other rewrite listeners just after language/theme url parts
	- if ($params['inject_parts']) {
	- $ret .= implode('/', $params['inject_parts']) . '/';
	- }
	-
	- // add category
	- if ($processed_params['m_cat_id'] > 0 && $params['pass_category']) {
	- $category_filename = $this->Application->getCategoryCache($processed_params['m_cat_id'], 'filenames');
	-
	- preg_match('/^Content\/(.*)/i', $category_filename, $regs);
	-
	- if ($regs) {
	- $template = array_key_exists('t', $params) ? $params['t'] : false;
	-
	- if (strtolower($regs[1]) == strtolower($template)) {
	- // we could have category path like "Content/<template_path>" in this case remove template
	- $params['pass_template'] = false;
	- }
	-
	- $ret .= $regs[1] . '/';
	- }
	-
	- $params['category_processed'] = true;
	- }
	-
	- // reset category page
	- $force_page_adding = false;
	- if (array_key_exists('reset', $params) && $params['reset']) {
	- unset($params['reset']);
	-
	- if ($processed_params['m_cat_id']) {
	- $processed_params['m_cat_page'] = 1;
	- $force_page_adding = true;
	- }
	- }
	-
	- if ((array_key_exists('category_processed', $params) && $params['category_processed'] && ($processed_params['m_cat_page'] > 1)) \|\| $force_page_adding) {
	- // category name was added before AND category page number found
	- $ret = rtrim($ret, '/') . '_' . $processed_params['m_cat_page'] . '/';
	- }
	-
	- $template = array_key_exists('t', $params) ? $params['t'] : false;
	- $category_template = ($processed_params['m_cat_id'] > 0) && $params['pass_category'] ? $this->Application->getCategoryCache($processed_params['m_cat_id'], 'category_designs') : '';
	-
	- if ((strtolower($template) == '__default__') && ($processed_params['m_cat_id'] == 0)) {
	- // for "Home" category set template to index when not set
	- $template = 'index';
	- }
	-
	- // remove template from url if it is category index cached template OR site homepage
	- if (($template == $category_template) \|\| (mb_strtolower($template) == '__default__') \|\| ($template == 'index')) {
	- // given template is also default template for this category OR '__default__' given OR site homepage
	- $params['pass_template'] = false;
	- }
	-
	- if ($template && $params['pass_template']) {
	- $ret .= $template . '/';
	- }
	-
	- return mb_strtolower( rtrim($ret, '/') );
	- }
	-
	- /**
	- * Gets language part from url
	- *
	- * @param Array $url_parts
	- * @param Array $vars
	- * @return bool
	- */
	- function _parseLanguage(&$url_parts, &$vars)
	- {
	- if (!$url_parts) {
	- return false;
	- }
	-
	- $url_part = reset($url_parts);
	-
	- $sql = 'SELECT LanguageId, IF(LOWER(PackName) = ' . $this->Conn->qstr($url_part) . ', 2, PrimaryLang) AS SortKey
	- FROM ' . TABLE_PREFIX . 'Language
	- WHERE Enabled = 1
	- ORDER BY SortKey DESC';
	- $language_info = $this->Conn->GetRow($sql);
	-
	- if ($language_info && $language_info['LanguageId'] && $language_info['SortKey']) {
	- // primary language will be selected in case, when $url_part doesn't match to other's language pack name
	- // don't use next enabled language, when primary language is disabled
	- $vars['m_lang'] = $language_info['LanguageId'];
	-
	- if ($language_info['SortKey'] == 2) {
	- // language was found by pack name
	- array_shift($url_parts);
	- $this->partParsed($url_part);
	- }
	- elseif ($this->primaryLanguageId) {
	- // use domain-based primary language instead of site-wide primary language
	- $vars['m_lang'] = $this->primaryLanguageId;
	- }
	-
	- return true;
	- }
	-
	- return false;
	- }
	-
	- /**
	- * Gets theme part from url
	- *
	- * @param Array $url_parts
	- * @param Array $vars
	- * @return bool
	- */
	- function _parseTheme(&$url_parts, &$vars)
	- {
	- if (!$url_parts) {
	- return false;
	- }
	-
	- $url_part = reset($url_parts);
	-
	- $sql = 'SELECT ThemeId, IF(LOWER(Name) = ' . $this->Conn->qstr($url_part) . ', 2, PrimaryTheme) AS SortKey, TemplateAliases
	- FROM ' . TABLE_PREFIX . 'Theme
	- WHERE Enabled = 1
	- ORDER BY SortKey DESC';
	- $theme_info = $this->Conn->GetRow($sql);
	-
	- if ($theme_info && $theme_info['ThemeId'] && $theme_info['SortKey']) {
	- // primary theme will be selected in case, when $url_part doesn't match to other's theme name
	- // don't use next enabled theme, when primary theme is disabled
	- $vars['m_theme'] = $theme_info['ThemeId'];
	-
	- if ($theme_info['TemplateAliases']) {
	- $this->_templateAliases = unserialize($theme_info['TemplateAliases']);
	- }
	- else {
	- $this->_templateAliases = Array ();
	- }
	-
	- if ($theme_info['SortKey'] == 2) {
	- // theme was found by name
	- array_shift($url_parts);
	- $this->partParsed($url_part);
	- }
	- elseif ($this->primaryThemeId) {
	- // use domain-based primary theme instead of site-wide primary theme
	- $vars['m_theme'] = $this->primaryThemeId;
	- }
	-
	- return true;
	- }
	-
	- $vars['m_theme'] = 0; // required, because used later for category/template detection
	-
	- return false;
	- }
	-
	- /**
	- * Checks if whole url_parts matches a whole In-CMS page
	- *
	- * @param Array $url_parts
	- * @param Array $vars
	- * @return bool
	- */
	- function _parseFriendlyUrl($url_parts, &$vars)
	- {
	- if (!$url_parts) {
	- return false;
	- }
	-
	- $sql = 'SELECT CategoryId, NamedParentPath
	- FROM ' . TABLE_PREFIX . 'Category
	- WHERE FriendlyURL = ' . $this->Conn->qstr(implode('/', $url_parts));
	- $friendly = $this->Conn->GetRow($sql);
	-
	- if ($friendly) {
	- $vars['m_cat_id'] = $friendly['CategoryId'];
	- $vars['t'] = preg_replace('/^Content\//i', '', $friendly['NamedParentPath']);
	-
	- while ($url_parts) {
	- $this->partParsed( array_shift($url_parts) );
	- }
	-
	- return true;
	- }
	-
	- return false;
	- }
	-
	- /**
	- * Set's page (when found) to all modules
	- *
	- * @param Array $url_parts
	- * @param Array $vars
	- * @return string
	- *
	- * @todo Should find a way, how to determine what rewrite listerner page is it
	- */
	- function _parsePage(&$url_parts, &$vars)
	- {
	- if (!$url_parts) {
	- return false;
	- }
	-
	- $page_number = end($url_parts);
	- if (!is_numeric($page_number)) {
	- return false;
	- }
	-
	- array_pop($url_parts);
	- $this->partParsed($page_number, 'rtl');
	-
	- return $page_number;
	- }
	-
	- /**
	- * Remove page numbers for all rewrite listeners
	- *
	- * @todo Should find a way, how to determine what rewrite listerner page is it
	- */
	- function removePages()
	- {
	- /*foreach ($this->Application->RewriteListeners as $prefix => $listener) {
	- $this->Application->DeleteVar($prefix . '_Page');
	- }*/
	- }
	-
	- /**
	- * Extracts category part from url
	- *
	- * @param Array $url_parts
	- * @param Array $vars
	- * @return bool
	- */
	- function _parseCategory($url_parts, &$vars)
	- {
	- if (!$url_parts) {
	- return false;
	- }
	-
	- $res = false;
	- $url_part = array_shift($url_parts);
	-
	- $category_id = 0;
	- $last_category_info = false;
	- $category_path = $url_part == 'content' ? '' : 'content';
	-
	- do {
	- $category_path = trim($category_path . '/' . $url_part, '/');
	- // bb_<topic_id> -> forums/bb_2
	- if ( !preg_match('/^bb_[\d]+$/', $url_part) && preg_match('/(.*)_([\d]+)$/', $category_path, $rets) ) {
	- $category_path = $rets[1];
	- $vars['m_cat_page'] = $rets[2];
	- }
	-
	- $sql = 'SELECT CategoryId, SymLinkCategoryId, NamedParentPath
	- FROM ' . TABLE_PREFIX . 'Category
	- WHERE (LOWER(NamedParentPath) = ' . $this->Conn->qstr($category_path) . ') AND (ThemeId = ' . $vars['m_theme'] . ' OR ThemeId = 0)';
	- $category_info = $this->Conn->GetRow($sql);
	-
	- if ($category_info !== false) {
	- $last_category_info = $category_info;
	- $this->partParsed($url_part);
	-
	- $url_part = array_shift($url_parts);
	- $res = true;
	- }
	- } while ($category_info !== false && $url_part);
	-
	- if ($last_category_info) {
	- // this category is symlink to other category, so use it's url instead
	- // (used in case if url prior to symlink adding was indexed by spider or was bookmarked)
	- if ($last_category_info['SymLinkCategoryId']) {
	- $sql = 'SELECT CategoryId, NamedParentPath
	- FROM ' . TABLE_PREFIX . 'Category
	- WHERE (CategoryId = ' . $last_category_info['SymLinkCategoryId'] . ')';
	- $category_info = $this->Conn->GetRow($sql);
	-
	- if ($category_info) {
	- // web symlinked category was found use it
	- // TODO: maybe 302 redirect should be made to symlinked category url (all other url parts should stay)
	- $last_category_info = $category_info;
	- }
	- }
	-
	- // 1. Set virtual page as template, this will be replaced to physical template later in kApplication::Run.
	- // 2. Don't set CachedTemplate field as template here, because we will loose original page associated with it's cms blocks!
	- $vars['t'] = mb_strtolower( preg_replace('/^Content\//i', '', $last_category_info['NamedParentPath']), 'UTF-8' );
	-
	- $vars['m_cat_id'] = $last_category_info['CategoryId'];
	- $vars['is_virtual'] = true; // for template from POST, strange code there!
	- }
	- else {
	- $vars['m_cat_id'] = 0;
	- }
	-
	- return $res;
	- }
	+ class CategoryItemRewrite extends kHelper {

	/**
	* Builds/parses category item part of url
	*
	* @param int $rewrite_mode Mode in what rewrite listener was called. Possbile two modes: REWRITE_MODE_BUILD, REWRITE_MODE_PARSE.
	* @param string $prefix Prefix, that listener uses for system integration
	* @param Array $params Params, that are used for url building or created during url parsing.
	* @param Array $url_parts Url parts to parse (only for parsing).
	* @param bool $keep_events Keep event names in resulting url (only for building).
	* @return bool Return true to continue to next listener; return false (when building) not to rewrite given prefix; return false (when parsing) to stop processing at this listener.
	+ * @access public
	*/
	- function CategoryItemRewriteListener($rewrite_mode = REWRITE_MODE_BUILD, $prefix, &$params, &$url_parts, $keep_events = false)
	+ public function RewriteListener($rewrite_mode = REWRITE_MODE_BUILD, $prefix, &$params, &$url_parts, $keep_events = false)
	{
	static $parsed = false;

	if ($rewrite_mode == REWRITE_MODE_BUILD) {
	return $this->_buildCategoryItemUrl($prefix, $params, $keep_events);
	}

	if (!$parsed) {
	- $this->_modulePrefix = $this->_parseCategoryItemUrl($url_parts, $params);
	+ $rewrite_processor =& $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */

	- if ($this->_modulePrefix !== false) {
	- $params['pass'][] = $this->_modulePrefix;
	+ $module_prefix = $this->_parseCategoryItemUrl($url_parts, $params);
	+
	+ if ($module_prefix !== false) {
	+ $params['pass'][] = $module_prefix;
	+ $rewrite_processor->modulePrefix = $module_prefix;
	}

	$parsed = true;
	}

	return true;
	}

	/**
	* Build category teim part of url
	*
	* @param string $prefix_special
	* @param Array $params
	* @param bool $keep_events
	* @return string
	+ * @access protected
	*/
	- function _buildCategoryItemUrl($prefix_special, &$params, $keep_events)
	+ protected function _buildCategoryItemUrl($prefix_special, &$params, $keep_events)
	{
	static $default_per_page = Array ();

	+ $rewrite_processor =& $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */
	+
	$ret = '';
	list ($prefix) = explode('.', $prefix_special);
	- $processed_params = $this->getProcessedParams($prefix_special, $params, $keep_events);
	+ $processed_params = $rewrite_processor->getProcessedParams($prefix_special, $params, $keep_events);

	if ($processed_params === false) {
	return '';
	}

	if (!array_key_exists($prefix, $default_per_page)) {
	$list_helper =& $this->Application->recallObject('ListHelper');
	/* @var $list_helper ListHelper */

	$default_per_page[$prefix] = $list_helper->getDefaultPerPage($prefix);
	}

	if ($processed_params[$prefix_special . '_id']) {
	$category_id = array_key_exists('m_cat_id', $params) ? $params['m_cat_id'] : $this->Application->GetVar('m_cat_id');

	// if template is also item template of category, then remove template
	$template = array_key_exists('t', $params) ? $params['t'] : false;
	- $item_template = $this->GetItemTemplate($category_id, $prefix);
	+ $item_template = $rewrite_processor->GetItemTemplate($category_id, $prefix);

	if ($template == $item_template \|\| strtolower($template) == '__default__') {
	// given template is also default template for this category item or '__default__' given
	$params['pass_template'] = false;
	}

	// get item's filename
	if ($prefix == 'bb') {
	$ret .= 'bb_' . $processed_params[$prefix_special . '_id'] . '/';
	}
	else {
	$filename = $this->getFilename($prefix, $processed_params[$prefix_special . '_id'], $category_id);
	if ($filename !== false) {
	$ret .= $filename . '/';
	}
	}
	} else {
	if ($processed_params[$prefix_special . '_Page'] == 1) {
	// when printing category items and we are on the 1st page -> there is no information about
	// category item prefix and $params['pass_category'] will not be added automatically
	$params['pass_category'] = true;
	}
	elseif ($processed_params[$prefix_special . '_Page'] > 1) {
	// $ret .= $processed_params[$prefix_special . '_Page'] . '/';
	$params['page'] = $processed_params[$prefix_special . '_Page'];
	}

	$per_page = $processed_params[$prefix_special . '_PerPage'];

	if ($per_page && ($per_page != $default_per_page[$prefix])) {
	$params['per_page'] = $processed_params[$prefix_special . '_PerPage'];
	}
	}

	return mb_strtolower( rtrim($ret, '/') );
	}

	/**
	* Returns item's filename that corresponds id passed. If possible, then get it from cache
	*
	* @param string $prefix
	* @param int $id
	* @param int $category_id
	* @return string
	+ * @access protected
	*/
	- function getFilename($prefix, $id, $category_id = null)
	+ protected function getFilename($prefix, $id, $category_id = null)
	{
	if ($prefix == 'c') {
	throw new Exception('Method "<strong>' . __FUNCTION__ . '</strong>" no longer work with "<strong>c</strong>" prefix. Please use "<strong>getCategoryCache</strong>" method instead');

	return false;
	}

	$category_id = isset($category_id) ? $category_id : $this->Application->GetVar('m_cat_id');

	$cache_key = 'filenames[%' . $this->Application->incrementCacheSerial($prefix, $id, false) . '%]:' . (int)$category_id;
	$filename = $this->Application->getCache($cache_key);

	if ($filename === false) {
	$this->Conn->nextQueryCachable = true;
	$sql = 'SELECT ResourceId
	FROM ' . $this->Application->getUnitOption($prefix, 'TableName') . '
	WHERE ' . $this->Application->getUnitOption($prefix, 'IDField') . ' = ' . $this->Conn->qstr($id);
	$resource_id = $this->Conn->GetOne($sql);

	$this->Conn->nextQueryCachable = true;
	$sql = 'SELECT Filename
	FROM ' . TABLE_PREFIX . 'CategoryItems
	WHERE (ItemResourceId = ' . $resource_id . ') AND (CategoryId = ' . (int)$category_id . ')';
	$filename = $this->Conn->GetOne($sql);

	if ($filename !== false) {
	$this->Application->setCache($cache_key, $filename);
	}
	}

	return $filename;
	}

	/**
	* Sets template and id, corresponding to category item given in url
	*
	* @param Array $url_parts
	* @param Array $vars
	* @return bool\|string
	+ * @access protected
	*/
	- function _parseCategoryItemUrl(&$url_parts, &$vars)
	+ protected function _parseCategoryItemUrl(&$url_parts, &$vars)
	{
	if (!$url_parts) {
	return false;
	}

	$item_filename = end($url_parts);
	if (is_numeric($item_filename)) {
	// this page, don't process here
	return false;
	}

	+ $rewrite_processor =& $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */
	+
	if (preg_match('/^bb_([\d]+)/', $item_filename, $regs)) {
	- // process topics separatly, because they don't use item filenames
	+ // process topics separately, because they don't use item filenames
	array_pop($url_parts);
	- $this->partParsed($item_filename, 'rtl');
	+ $rewrite_processor->partParsed($item_filename, 'rtl');

	return $this->_parseTopicUrl($regs[1], $vars);
	}

	// locating the item in CategoryItems by filename to detect its ItemPrefix and its category ParentPath
	$sql = 'SELECT ci.ItemResourceId, ci.ItemPrefix, c.ParentPath, ci.CategoryId
	FROM ' . TABLE_PREFIX . 'CategoryItems AS ci
	LEFT JOIN ' . TABLE_PREFIX . 'Category AS c ON c.CategoryId = ci.CategoryId
	WHERE (ci.CategoryId = ' . (int)$vars['m_cat_id'] . ') AND (ci.Filename = ' . $this->Conn->qstr($item_filename) . ')';
	$cat_item = $this->Conn->GetRow($sql);

	if ($cat_item !== false) {
	// item found
	$module_prefix = $cat_item['ItemPrefix'];
	- $item_template = $this->GetItemTemplate($cat_item, $module_prefix);
	+ $item_template = $rewrite_processor->GetItemTemplate($cat_item, $module_prefix);

	// converting ResourceId to correpsonding Item id
	$module_config = $this->Application->getUnitOptions($module_prefix);

	$sql = 'SELECT ' . $module_config['IDField'] . '
	FROM ' . $module_config['TableName'] . '
	WHERE ResourceId = ' . $cat_item['ItemResourceId'];
	$item_id = $this->Conn->GetOne($sql);

	array_pop($url_parts);

	if ($item_id) {
	- $this->partParsed($item_filename, 'rtl');
	+ $rewrite_processor->partParsed($item_filename, 'rtl');

	if ($item_template) {
	// when template is found in category -> set it
	$vars['t'] = $item_template;
	}

	// we have category item id
	$vars[$module_prefix . '_id'] = $item_id;

	return $module_prefix;
	}
	}

	return false;
	}

	/**
	* Set's template and topic id corresponding to topic given in url
	*
	* @param int $topic_id
	* @param Array $vars
	* @return string
	+ * @access protected
	*/
	- function _parseTopicUrl($topic_id, &$vars)
	+ protected function _parseTopicUrl($topic_id, &$vars)
	{
	+ $rewrite_processor =& $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */
	+
	$sql = 'SELECT c.ParentPath, c.CategoryId
	FROM ' . TABLE_PREFIX . 'Category AS c
	WHERE c.CategoryId = ' . (int)$vars['m_cat_id'];
	$cat_item = $this->Conn->GetRow($sql);

	- $item_template = $this->GetItemTemplate($cat_item, 'bb');
	+ $item_template = $rewrite_processor->GetItemTemplate($cat_item, 'bb');

	if ($item_template) {
	$vars['t'] = $item_template;
	}

	$vars['bb_id'] = $topic_id;

	return 'bb';
	}
	-
	- /**
	- * Returns enviroment variable values for given prefix (uses directly given params, when available)
	- *
	- * @param string $prefix_special
	- * @param Array $params
	- * @param bool $keep_events
	- * @return Array
	- */
	- function getProcessedParams($prefix_special, &$params, $keep_events)
	- {
	- list ($prefix) = explode('.', $prefix_special);
	-
	- $query_vars = $this->Application->getUnitOption($prefix, 'QueryString', Array ());
	- /* @var $query_vars Array */
	-
	- if ( !$query_vars ) {
	- // given prefix doesn't use "env" variable to pass it's data
	- return false;
	- }
	-
	- $event_key = array_search('event', $query_vars);
	- if ( $event_key ) {
	- // pass through event of this prefix
	- unset($query_vars[$event_key]);
	- }
	-
	- if ( array_key_exists($prefix_special . '_event', $params) && !$params[$prefix_special . '_event'] ) {
	- // if empty event, then remove it from url
	- unset($params[$prefix_special . '_event']);
	- }
	-
	- // if pass events is off and event is not implicity passed
	- if ( !$keep_events && !array_key_exists($prefix_special . '_event', $params) ) {
	- unset($params[$prefix_special . '_event']); // remove event from url if requested
	- //otherwise it will use value from get_var
	- }
	-
	- $processed_params = Array ();
	- foreach ($query_vars as $var_name) {
	- // if value passed in params use it, otherwise use current from application
	- $var_name = $prefix_special . '_' . $var_name;
	- $processed_params[$var_name] = array_key_exists($var_name, $params) ? $params[$var_name] : $this->Application->GetVar($var_name);
	-
	- if ( array_key_exists($var_name, $params) ) {
	- unset($params[$var_name]);
	- }
	- }
	-
	- return $processed_params;
	- }
	-
	- /**
	- * Returns module item details template specified in given category custom field for given module prefix
	- *
	- * @param int\|Array $category
	- * @param string $module_prefix
	- * @return string
	- */
	- function GetItemTemplate($category, $module_prefix)
	- {
	- $category_id = is_array($category) ? $category['CategoryId'] : $category;
	- $cache_key = __CLASS__ . '::' . __FUNCTION__ . '[%CIDSerial:' . $category_id . '%]:' . $module_prefix;
	-
	- $cached_value = $this->Application->getCache($cache_key);
	- if ($cached_value !== false) {
	- return $cached_value;
	- }
	-
	- if (!is_array($category)) {
	- if ($category == 0) {
	- $category = $this->Application->findModule('Var', $module_prefix, 'RootCat');
	- }
	- $sql = 'SELECT c.ParentPath, c.CategoryId
	- FROM ' . TABLE_PREFIX . 'Category AS c
	- WHERE c.CategoryId = ' . $category;
	- $category = $this->Conn->GetRow($sql);
	- }
	- $parent_path = implode(',',explode('\|', substr($category['ParentPath'], 1, -1)));
	-
	- // item template is stored in module' system custom field - need to get that field Id
	- $primary_lang = $this->Application->GetDefaultLanguageId();
	- $item_template_field_id = $this->getItemTemplateCustomField($module_prefix);
	-
	- // looking for item template through cats hierarchy sorted by parent path
	- $query = ' SELECT ccd.l' . $primary_lang . '_cust_' . $item_template_field_id . ',
	- FIND_IN_SET(c.CategoryId, ' . $this->Conn->qstr($parent_path) . ') AS Ord1,
	- c.CategoryId, c.Name, ccd.l' . $primary_lang . '_cust_' . $item_template_field_id . '
	- FROM ' . TABLE_PREFIX . 'Category AS c
	- LEFT JOIN ' . TABLE_PREFIX . 'CategoryCustomData AS ccd
	- ON ccd.ResourceId = c.ResourceId
	- WHERE c.CategoryId IN (' . $parent_path . ') AND ccd.l' . $primary_lang . '_cust_' . $item_template_field_id . ' != \'\'
	- ORDER BY FIND_IN_SET(c.CategoryId, ' . $this->Conn->qstr($parent_path) . ') DESC';
	- $item_template = $this->Conn->GetOne($query);
	-
	- if (!isset($this->_templateAliases)) {
	- // when empty url OR mod-rewrite disabled
	-
	- $themes_helper =& $this->Application->recallObject('ThemesHelper');
	- /* @var $themes_helper kThemesHelper */
	-
	- $sql = 'SELECT TemplateAliases
	- FROM ' . TABLE_PREFIX . 'Theme
	- WHERE ThemeId = ' . (int)$themes_helper->getCurrentThemeId();
	- $template_aliases = $this->Conn->GetOne($sql);
	-
	- $this->_templateAliases = $template_aliases ? unserialize($template_aliases) : Array ();
	- }
	-
	- if ($item_template && array_key_exists($item_template, $this->_templateAliases)) {
	- $item_template = $this->_templateAliases[$item_template];
	- }
	-
	- $this->Application->setCache($cache_key, $item_template);
	-
	- return $item_template;
	- }
	-
	- /**
	- * Loads all registered rewrite listeners, so they could be quickly accessed later
	- *
	- */
	- function initRewriteListeners()
	- {
	- static $init_done = false;
	-
	- if ($init_done \|\| count($this->Application->RewriteListeners) == 0) {
	- // not inited OR mod-rewrite url with missing config cache
	- return ;
	- }
	-
	- foreach ($this->Application->RewriteListeners as $prefix => $listener_data) {
	- foreach ($listener_data['listener'] as $index => $rewrite_listener) {
	- list ($listener_prefix, $listener_method) = explode(':', $rewrite_listener);
	- $listener =& $this->Application->recallObject($listener_prefix);
	-
	- $this->Application->RewriteListeners[$prefix][$index] = Array (&$listener, $listener_method);
	- }
	- }
	-
	- define('MOD_REWRITE_URL_ENDING', $this->Application->ConfigValue('ModRewriteUrlEnding'));
	-
	- $init_done = true;
	- }
	-
	- /**
	- * Returns category custom field id, where given module prefix item template name is stored
	- *
	- * @param string $module_prefix
	- * @return int
	- */
	- function getItemTemplateCustomField($module_prefix)
	- {
	- $cache_key = __CLASS__ . '::' . __FUNCTION__ . '[%CfSerial%]:' . $module_prefix;
	- $cached_value = $this->Application->getCache($cache_key);
	-
	- if ($cached_value !== false) {
	- return $cached_value;
	- }
	-
	- $sql = 'SELECT CustomFieldId
	- FROM ' . TABLE_PREFIX . 'CustomField
	- WHERE FieldName = ' . $this->Conn->qstr($module_prefix . '_ItemTemplate');
	- $item_template_field_id = $this->Conn->GetOne($sql);
	-
	- $this->Application->setCache($cache_key, $item_template_field_id);
	-
	- return $item_template_field_id;
	- }
	-
	- /**
	- * Sets default parsed values before actual url parsing (only, for empty url)
	- *
	- * @param Array $vars
	- */
	- function _setDefaultValues(&$vars)
	- {
	- $defaults = Array (
	- 'm_cat_id' => 0, // no category
	- 'm_cat_page' => 1, // first category page
	- 'm_opener' => 's', // stay on same page
	- 't' => 'index' // main site page
	- );
	-
	- if ($this->primaryLanguageId) {
	- // domain-based primary language
	- $defaults['m_lang'] = $this->primaryLanguageId;
	- }
	-
	- if ($this->primaryThemeId) {
	- // domain-based primary theme
	- $defaults['m_theme'] = $this->primaryThemeId;
	- }
	-
	- foreach ($defaults as $default_key => $default_value) {
	- if ($this->HTTPQuery->Get($default_key) === false) {
	- $vars[$default_key] = $default_value;
	- }
	- }
	- }
	-
	- /**
	- * Marks url part as parsed
	- *
	- * @param string $url_part
	- * @param string $parse_direction
	- */
	- function partParsed($url_part, $parse_direction = 'ltr')
	- {
	- if ( !$this->_partsToParse ) {
	- return ;
	- }
	-
	- if ( $parse_direction == 'ltr' ) {
	- $expected_url_part = reset($this->_partsToParse);
	-
	- if ( $url_part == $expected_url_part ) {
	- array_shift($this->_partsToParse);
	- }
	- }
	- else {
	- $expected_url_part = end($this->_partsToParse);
	-
	- if ( $url_part == $expected_url_part ) {
	- array_pop($this->_partsToParse);
	- }
	- }
	-
	- if ( $url_part != $expected_url_part ) {
	- trigger_error('partParsed: expected URL part "<strong>' . $expected_url_part . '</strong>", received URL part "<strong>' . $url_part . '</strong>"', E_USER_NOTICE);
	- }
	- }
	}
	Index: branches/5.2.x/core/units/helpers/helpers_config.php
	===================================================================
	--- branches/5.2.x/core/units/helpers/helpers_config.php (revision 14713)
	+++ branches/5.2.x/core/units/helpers/helpers_config.php (revision 14714)
	@@ -1,73 +1,73 @@
	<?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!');

	$config = Array (

	'Prefix' => 'helpers',
	'EventHandlerClass' => Array ('class' => 'kEventHandler', 'file' => '', 'build_event' => 'OnBuild'),

	'RegisterClasses' => Array (
	Array ('pseudo' => 'kMultiLanguageHelper', 'class' => 'kMultiLanguageHelper', 'file' => 'multilanguage_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'SearchHelper', 'class' => 'kSearchHelper', 'file' => 'search_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'SectionsHelper', 'class' => 'kSectionsHelper', 'file' => 'sections_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'PermissionsHelper', 'class' => 'kPermissionsHelper', 'file' => 'permissions_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'ModulesHelper', 'class' => 'kModulesHelper', 'file' => 'modules_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	- Array ('pseudo' => 'ModRewriteHelper', 'class' => 'kModRewriteHelper', 'file' => 'mod_rewrite_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	+ Array ('pseudo' => 'CategoryItemRewrite', 'class' => 'CategoryItemRewrite', 'file' => 'mod_rewrite_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'RecursiveHelper', 'class' => 'kRecursiveHelper', 'file' => 'recursive_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'FilenamesHelper', 'class' => 'kFilenamesHelper', 'file' => 'filenames_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'ClipboardHelper', 'class' => 'kClipboardHelper', 'file' => 'clipboard_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'ColumnPickerHelper', 'class' => 'kColumnPickerHelper', 'file' => 'col_picker_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'ThemesHelper', 'class' => 'kThemesHelper', 'file' => 'themes_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'CaptchaHelper', 'class' => 'kCaptchaHelper', 'file' => 'captcha_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'PriorityHelper', 'class' => 'kPriorityHelper', 'file' => 'priority_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'CurlHelper', 'class' => 'kCurlHelper', 'file' => 'curl_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'CountHelper', 'class' => 'kCountHelper', 'file' => 'count_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),

	Array ('pseudo' => 'ImageHelper', 'class' => 'ImageHelper', 'file' => 'image_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'FileHelper', 'class' => 'FileHelper', 'file' => 'file_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'CategoryHelper', 'class' => 'CategoryHelper', 'file' => 'category_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'CSVHelper', 'class' => 'kCSVHelper', 'file' => 'csv_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'ChartHelper', 'class' => 'kChartHelper', 'file' => 'chart_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'RatingHelper', 'class' => 'RatingHelper', 'file' => 'rating_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'FCKHelper', 'class' => 'fckFCKHelper', 'file' => 'fck_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'SpamHelper', 'class' => 'SpamHelper', 'file' => 'spam_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'TemplateHelper', 'class' => 'TemplateHelper', 'file' => 'template_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'MailingListHelper', 'class' => 'MailingListHelper', 'file' => 'mailing_list_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'JSONHelper', 'class' => 'JSONHelper', 'file' => 'json_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'LanguageImportHelper', 'class' => 'LanguageImportHelper', 'file' => 'language_import_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'SkinHelper', 'class' => 'SkinHelper', 'file' => 'skin_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'SiteConfigHelper', 'class' => 'SiteConfigHelper', 'file' => 'site_config_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'MenuHelper', 'class' => 'MenuHelper', 'file' => 'menu_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),

	Array ('pseudo' => 'InpCustomFieldsHelper', 'class' => 'InpCustomFieldsHelper', 'file' => 'custom_fields_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'CountryStatesHelper', 'class' => 'kCountryStatesHelper', 'file' => 'country_states_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'BracketsHelper', 'class' => 'kBracketsHelper', 'file' => 'brackets_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'kXMLHelper', 'class' => 'kXMLHelper', 'file' => 'xml_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'CatItemExportHelper', 'class' => 'kCatDBItemExportHelper', 'file' => 'cat_dbitem_export_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'EmailMessageHelper', 'class' => 'EmailMessageHelper', 'file' => 'email_message_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'ListHelper', 'class' => 'ListHelper', 'file' => 'list_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),

	Array ('pseudo' => 'FormSubmissionHelper', 'class' => 'FormSubmissionHelper', 'file' => 'form_submission_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'MailboxHelper', 'class' => 'MailboxHelper', 'file' => 'mailbox_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'POP3Helper', 'class' => 'POP3Helper', 'file' => 'pop3_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'MimeDecodeHelper', 'class' => 'MimeDecodeHelper', 'file' => 'mime_decode_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'UserHelper', 'class' => 'UserHelper', 'file' => 'user_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'SiteHelper', 'class' => 'SiteHelper', 'file' => 'site_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),

	Array ('pseudo' => 'DeploymentHelper', 'class' => 'DeploymentHelper', 'file' => 'deployment_helper.php', 'build_event' => '', 'require_classes' => 'kHelper'),
	Array ('pseudo' => 'BackupHelper', 'class' => 'BackupHelper', 'file' => 'backup_helper.php', 'build_event' => ''),
	),
	);
	\ No newline at end of file
	Index: branches/5.2.x/core/units/admin/admin_tag_processor.php
	===================================================================
	--- branches/5.2.x/core/units/admin/admin_tag_processor.php (revision 14713)
	+++ branches/5.2.x/core/units/admin/admin_tag_processor.php (revision 14714)
	@@ -1,1122 +1,1122 @@
	<?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 AdminTagProcessor extends kDBTagProcessor {

	/**
	* Allows to execute js script after the page is fully loaded
	*
	* @param Array $params
	* @return string
	*/
	function AfterScript($params)
	{
	$after_script = $this->Application->GetVar('after_script');
	if ($after_script) {
	return '<script type="text/javascript">'.$after_script.'</script>';
	}
	return '';
	}

	/**
	* Returns section title with #section# keyword replaced with current section
	*
	* @param Array $params
	* @return string
	*/
	function GetSectionTitle($params)
	{
	if (array_key_exists('default', $params)) {
	return $params['default'];
	}

	return $this->Application->Phrase( kUtil::replaceModuleSection($params['phrase']) );
	}

	/**
	* Returns section icon with #section# keyword replaced with current section
	*
	* @param Array $params
	* @return string
	*/
	function GetSectionIcon($params)
	{
	return kUtil::replaceModuleSection($params['icon']);
	}

	/**
	* Returns version of module by name
	*
	* @param Array $params
	* @return string
	*/
	function ModuleVersion($params)
	{
	return $this->Application->findModule('Name', $params['module'], 'Version');
	}

	/**
	* Used in table form section drawing
	*
	* @param Array $params
	* @return string
	*/
	function DrawTree($params)
	{
	static $deep_level = 0;

	// when processings, then sort children by priority (key of children array)
	$ret = '';
	$section_name = $params['section_name'];
	$params['name'] = $this->SelectParam($params, 'name,render_as,block');
	$sections_helper =& $this->Application->recallObject('SectionsHelper');
	/* @var $sections_helper kSectionsHelper */

	$section_data =& $sections_helper->getSectionData($section_name);

	$params['children_count'] = isset($section_data['children']) ? count($section_data['children']) : 0;
	$params['deep_level'] = $deep_level++;
	$template = $section_data['url']['t'];
	unset($section_data['url']['t']);
	$section_data['section_url'] = $this->Application->HREF($template, '', $section_data['url']);
	$ret .= $this->Application->ParseBlock( array_merge($params, $section_data) );
	if (!isset($section_data['children'])) {
	return $ret;
	}

	ksort($section_data['children'], SORT_NUMERIC);
	foreach ($section_data['children'] as $section_name) {
	if (!$sections_helper->sectionVisible($section_name)) {
	continue;
	}

	$params['section_name'] = $section_name;
	$ret .= $this->DrawTree($params);
	$deep_level--;
	}


	return $ret;
	}


	function SectionInfo($params)
	{
	$section = $params['section'];
	if ($section == '#session#') {
	$section = $this->Application->RecallVar('section');
	}

	$sections_helper =& $this->Application->recallObject('SectionsHelper');
	/* @var $sections_helper kSectionsHelper */

	$section_data =& $sections_helper->getSectionData($section);
	if (!$section_data) {
	throw new Exception('Use of undefined section "<strong>' . $section . '</strong>" in "<strong>' . __METHOD__ . '</strong>"');
	return '';
	}

	if (array_key_exists('parent', $params) && $params['parent']) {
	do {
	$section = $section_data['parent'];
	$section_data =& $sections_helper->getSectionData($section);
	} while (array_key_exists('use_parent_header', $section_data) && $section_data['use_parent_header']);
	}

	$info = $params['info'];
	switch ($info) {
	case 'module_path':
	if (isset($params['module']) && $params['module']) {
	$module = $params['module'];
	}
	elseif (isset($section_data['icon_module'])) {
	$module = $section_data['icon_module'];
	}
	else {
	$module = '#session#';
	}
	$res = $this->ModulePath(array('module' => $module));
	break;

	case 'perm_section':
	$res = $sections_helper->getPermSection($section);
	break;

	case 'label':
	if ($section && ($section != 'in-portal:root')) {
	// don't translate label for top section, because it's already translated
	$no_editing = array_key_exists('no_editing', $params) ? $params['no_editing'] : false;

	$res = $this->Application->Phrase($section_data['label'], !$no_editing);
	}
	else {
	$res = '';
	}
	break;

	default:
	$res = $section_data[$info];
	break;
	}

	if (array_key_exists('as_label', $params) && $params['as_label']) {
	$res = $this->Application->Phrase($res);
	}

	return $res;
	}


	function PrintSection($params)
	{
	$section_name = $params['section_name'];
	if ($section_name == '#session#') {
	$section_name = $this->Application->RecallVar('section');
	}

	$sections_helper =& $this->Application->recallObject('SectionsHelper');
	/* @var $sections_helper kSectionsHelper */

	if (isset($params['use_first_child']) && $params['use_first_child']) {
	$section_name = $sections_helper->getFirstChild($section_name, true);
	}

	$section_data =& $sections_helper->getSectionData($section_name);

	$params['name'] = $this->SelectParam($params, 'name,render_as,block');
	$params['section_name'] = $section_name;

	$template = $section_data['url']['t'];
	unset($section_data['url']['t']);

	$section_data['section_url'] = $this->Application->HREF($template, '', $section_data['url']);
	$ret = $this->Application->ParseBlock( array_merge($params, $section_data) );

	return $ret;
	}

	/**
	* Used in XML drawing for tree
	*
	* @param Array $params
	* @return string
	*/
	function PrintSections($params)
	{
	// when processings, then sort children by priority (key of children array)
	$ret = '';
	$section_name = $params['section_name'];
	if ($section_name == '#session#') {
	$section_name = $this->Application->RecallVar('section');
	}

	$sections_helper =& $this->Application->recallObject('SectionsHelper');
	/* @var $sections_helper kSectionsHelper */

	$section_data =& $sections_helper->getSectionData($section_name);

	$params['name'] = $this->SelectParam($params, 'name,render_as,block');
	if (!isset($section_data['children'])) {
	return '';
	}

	ksort($section_data['children'], SORT_NUMERIC);
	foreach ($section_data['children'] as $section_name) {
	$params['section_name'] = $section_name;
	$section_data =& $sections_helper->getSectionData($section_name);

	if (!$sections_helper->sectionVisible($section_name)) {
	continue;
	}
	else {
	$show_mode = isset($section_data['show_mode']) ? $section_data['show_mode'] : smNORMAL;
	$section_data['debug_only'] = ($show_mode == smDEBUG) \|\| ($show_mode == smSUPER_ADMIN) ? 1 : 0;
	}

	if (isset($section_data['tabs_only']) && $section_data['tabs_only']) {
	$perm_status = false;
	$folder_label = $section_data['label'];
	ksort($section_data['children'], SORT_NUMERIC);
	foreach ($section_data['children'] as $priority => $section_name) {
	// if only tabs in this section & none of them have permission, then skip section too

	$section_name = $sections_helper->getPermSection($section_name);
	$perm_status = $this->Application->CheckPermission($section_name.'.view', 1);
	if ($perm_status) {
	break;
	}
	}
	if (!$perm_status) {
	// no permission for all tabs -> don't display tree node either
	continue;
	}

	$params['section_name'] = $section_name;
	$section_data =& $sections_helper->getSectionData($section_name);
	$section_data['label'] = $folder_label; // use folder label in tree
	$section_data['is_tab'] = 1;
	}
	else {
	$section_name = $sections_helper->getPermSection($section_name);
	if (!$this->Application->CheckPermission($section_name.'.view', 1)) continue;
	}

	$params['children_count'] = isset($section_data['children']) ? count($section_data['children']) : 0;

	// remove template, so it doesn't appear as additional parameter in url
	$template = $section_data['url']['t'];
	unset($section_data['url']['t']);

	$section_data['section_url'] = $this->Application->HREF($template, '', $section_data['url']);

	$late_load = getArrayValue($section_data, 'late_load');
	if ($late_load) {
	$t = $late_load['t'];
	unset($late_load['t']);
	$section_data['late_load'] = $this->Application->HREF($t, '', $late_load);
	$params['children_count'] = 99;
	}
	else {
	$section_data['late_load'] = '';
	}

	// restore template
	$section_data['url']['t'] = $template;

	$ret .= $this->Application->ParseBlock( array_merge($params, $section_data) );
	$params['section_name'] = $section_name;
	}

	return preg_replace("/\r\n\|\n/", '', $ret);
	}

	function ListSectionPermissions($params)
	{
	$section_name = isset($params['section_name']) ? $params['section_name'] : $this->Application->GetVar('section_name');

	$sections_helper =& $this->Application->recallObject('SectionsHelper');
	/* @var $sections_helper kSectionsHelper */

	$section_data =& $sections_helper->getSectionData($section_name);

	$block_params = array_merge($section_data, Array('name' => $params['render_as'], 'section_name' => $section_name));

	$ret = '';
	foreach ($section_data['permissions'] as $perm_name) {
	if (preg_match('/^advanced:(.*)/', $perm_name) != $params['type']) continue;
	$block_params['perm_name'] = $perm_name;
	$ret .= $this->Application->ParseBlock($block_params);
	}
	return $ret;
	}

	function ModuleInclude($params)
	{
	foreach ($params as $param_name => $param_value) {
	$params[$param_name] = kUtil::replaceModuleSection($param_value);
	}

	return $this->Application->ProcessParsedTag('m', 'ModuleInclude', $params);
	}

	function TodayDate($params)
	{
	return date($params['format']);
	}

	function TreeEditWarrning($params)
	{
	$ret = $this->Application->Phrase($params['label']);
	$ret = str_replace(Array('<', '>', 'br/', 'br /', "\n", "\r"), Array('<', '>', 'br', 'br', '', ''), $ret);
	if (getArrayValue($params, 'escape')) {
	$ret = addslashes($ret);
	}
	$ret = str_replace('<br>', '\n', $ret);
	return $ret;
	}

	/**
	* Draws section tabs using block name passed
	*
	* @param Array $params
	*/
	function ListTabs($params)
	{
	$sections_helper =& $this->Application->recallObject('SectionsHelper');
	/* @var $sections_helper kSectionsHelper */

	$section_data =& $sections_helper->getSectionData($params['section_name']);

	$ret = '';
	$block_params = Array('name' => $params['render_as']);
	ksort($section_data['children'], SORT_NUMERIC);
	foreach ($section_data['children'] as $priority => $section_name) {
	$perm_section = $sections_helper->getPermSection($section_name);

	if ( !$this->Application->CheckPermission($perm_section.'.view') ) {
	continue;
	}

	$tab_data =& $sections_helper->getSectionData($section_name);
	$block_params['t'] = $tab_data['url']['t'];
	$block_params['title'] = $tab_data['label'];
	$block_params['main_prefix'] = $section_data['SectionPrefix'];
	$ret .= $this->Application->ParseBlock($block_params);
	}


	return $ret;
	}

	/**
	* Returns list of module item tabs that have view permission in current category
	*
	* @param Array $params
	*/
	function ListCatalogTabs($params)
	{
	$ret = '';
	$special = isset($params['special']) ? $params['special'] : '';
	$replace_main = isset($params['replace_m']) && $params['replace_m'];
	$skip_prefixes = isset($params['skip_prefixes']) ? explode(',', $params['skip_prefixes']) : Array();

	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $params['render_as'];

	foreach ($this->Application->ModuleInfo as $module_name => $module_info) {
	$prefix = $module_info['Var'];

	if ($prefix == 'm' && $replace_main) {
	$prefix = 'c';
	}

	if (in_array($prefix, $skip_prefixes) \|\| !$this->Application->prefixRegistred($prefix) \|\| !$this->Application->getUnitOption($prefix, 'CatalogItem')) {
	continue;
	}

	$icon = $this->Application->getUnitOption($prefix, 'CatalogTabIcon');
	if (strpos($icon, ':') !== false) {
	list ($icon_module, $icon) = explode(':', $icon, 2);
	}
	else {
	$icon_module = 'core';
	}

	$label = $this->Application->getUnitOption($prefix, $params['title_property']);
	$block_params['title'] = $label;
	$block_params['prefix'] = $prefix;
	$block_params['icon_module'] = $icon_module;
	$block_params['icon'] = $icon;
	$ret .= $this->Application->ParseBlock($block_params);
	}
	return $ret;
	}

	/**
	* Renders inividual catalog tab based on prefix and title_property given
	*
	* @param Array $params
	* @return string
	*/
	function CatalogTab($params)
	{
	$icon = $this->Application->getUnitOption($params['prefix'], 'CatalogTabIcon');
	if (strpos($icon, ':') !== false) {
	list ($icon_module, $icon) = explode(':', $icon, 2);
	}
	else {
	$icon_module = 'core';
	}

	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $params['render_as'];
	$block_params['icon_module'] = $icon_module;
	$block_params['icon'] = $icon;
	$block_params['title'] = $this->Application->getUnitOption($params['prefix'], $params['title_property']);

	return $this->Application->ParseBlock($block_params);
	}

	/**
	* Allows to construct link for opening any type of catalog item selector
	*
	* @param Array $params
	* @return string
	*/
	function SelectorLink($params)
	{
	$mode = 'catalog';
	if (isset($params['mode'])) { // {catalog, advanced_view}
	$mode = $params['mode'];
	unset($params['mode']);
	}

	$params['t'] = 'catalog/item_selector/item_selector_'.$mode;
	$params['m_cat_id'] = $this->Application->getBaseCategory();

	$default_params = Array('no_amp' => 1, 'pass' => 'all,'.$params['prefix']);
	unset($params['prefix']);

	$pass_through = Array();
	if (isset($params['tabs_dependant'])) { // {yes, no}
	$pass_through['td'] = $params['tabs_dependant'];
	unset($params['tabs_dependant']);
	}

	if (isset($params['selection_mode'])) { // {single, multi}
	$pass_through['tm'] = $params['selection_mode'];
	unset($params['selection_mode']);
	}

	if (isset($params['tab_prefixes'])) { // {all, none, <comma separated prefix list>}
	$pass_through['tp'] = $params['tab_prefixes'];
	unset($params['tab_prefixes']);
	}

	if ($pass_through) {
	// add pass_through to selector url if any
	$params['pass_through'] = implode(',', array_keys($pass_through));
	$params = array_merge($params, $pass_through);
	}

	// user can override default parameters (except pass_through of course)
	$params = array_merge($default_params, $params);

	return $this->Application->ProcessParsedTag('m', 'T', $params);
	}

	function TimeFrame($params)
	{
	$w = adodb_date('w');
	$m = adodb_date('m');
	$y = adodb_date('Y');

	//FirstDayOfWeek is 0 for Sunday and 1 for Monday
	$fdow = $this->Application->ConfigValue('FirstDayOfWeek');

	if ( $fdow && $w == 0 ) {
	$w = 7;
	}
	$today_start = adodb_mktime(0, 0, 0, adodb_date('m'), adodb_date('d'), $y);
	$first_day_of_this_week = $today_start - ($w - $fdow) * 86400;
	$first_day_of_this_month = adodb_mktime(0, 0, 0, $m, 1, $y);
	$this_quater = ceil($m / 3);
	$this_quater_start = adodb_mktime(0, 0, 0, $this_quater * 3 - 2, 1, $y);

	switch ( $params['type'] ) {
	case 'last_week_start':
	$timestamp = $first_day_of_this_week - 86400 * 7;
	break;

	case 'last_week_end':
	$timestamp = $first_day_of_this_week - 1;
	break;

	case 'last_month_start':
	$timestamp = $m == 1 ? adodb_mktime(0, 0, 0, 12, 1, $y - 1) : adodb_mktime(0, 0, 0, $m - 1, 1, $y);
	break;

	case 'last_month_end':
	$timestamp = $first_day_of_this_month = adodb_mktime(0, 0, 0, $m, 1, $y) - 1;
	break;

	case 'last_quater_start':
	$timestamp = $this_quater == 1 ? adodb_mktime(0, 0, 0, 10, 1, $y - 1) : adodb_mktime(0, 0, 0, ($this_quater - 1) * 3 - 2, 1, $y);
	break;

	case 'last_quater_end':
	$timestamp = $this_quater_start - 1;
	break;

	case 'last_6_months_start':
	$timestamp = $m <= 6 ? adodb_mktime(0, 0, 0, $m + 6, 1, $y - 1) : adodb_mktime(0, 0, 0, $m - 6, 1, $y);
	break;

	case 'last_year_start':
	$timestamp = adodb_mktime(0, 0, 0, 1, 1, $y - 1);
	break;

	case 'last_year_end':
	$timestamp = adodb_mktime(23, 59, 59, 12, 31, $y - 1);
	break;

	default:
	$timestamp = 0;
	break;
	}

	if ( isset($params['format']) ) {
	$format = $params['format'];

	if ( preg_match("/_regional_(.*)/", $format, $regs) ) {
	$lang =& $this->Application->recallObject('lang.current');
	/* @var $lang LanguagesItem */

	$format = $lang->GetDBField($regs[1]);
	}

	return adodb_date($format, $timestamp);
	}

	return $timestamp;
	}

	/**
	* Redirect to cache rebuild template, when required by installator
	*
	* @param Array $params
	*/
	function CheckPermCache($params)
	{
	// we have separate session between install wizard and admin console, so store in cache
	$global_mark = $this->Application->getDBCache('ForcePermCacheUpdate');
	$local_mark = $this->Application->RecallVar('PermCache_UpdateRequired');

	if ($global_mark \|\| $local_mark) {
	$this->Application->RemoveVar('PermCache_UpdateRequired');

	if ($this->Application->ConfigValue('QuickCategoryPermissionRebuild')) {
	$updater =& $this->Application->makeClass('kPermCacheUpdater');
	/* @var $updater kPermCacheUpdater */

	$updater->OneStepRun();

	$this->Application->HandleEvent($event, 'c:OnResetCMSMenuCache');
	}
	else {
	// update with progress bar
	return true;
	}
	}

	return false;
	}

	/**
	* Checks if current protocol is SSL
	*
	* @param Array $params
	* @return int
	*/
	function IsSSL($params)
	{
	return (PROTOCOL == 'https://')? 1 : 0;
	}

	function PrintColumns($params)
	{
	$picker_helper =& $this->Application->RecallObject('ColumnPickerHelper');
	$picker_helper->SetGridName($this->Application->GetLinkedVar('grid_name'));
	/* @var $picker_helper kColumnPickerHelper */

	$main_prefix = $this->Application->RecallVar('main_prefix');
	$cols = $picker_helper->LoadColumns($main_prefix);

	$this->Application->Phrases->AddCachedPhrase('__FREEZER__', '-------------');

	$o = '';
	if (isset($params['hidden']) && $params['hidden']) {
	foreach ($cols['hidden_fields'] as $col) {
	$title = $this->Application->Phrase($cols['titles'][$col]);
	$o .= "<option value='$col'>".$title;
	}
	}
	else {
	foreach ($cols['order'] as $col) {
	if (in_array($col, $cols['hidden_fields'])) continue;
	$title = $this->Application->Phrase($cols['titles'][$col]);
	$o .= "<option value='$col'>".$title;
	}
	}
	return $o;
	}

	/**
	* Allows to set popup size (key - current template name)
	*
	* @param Array $params
	*/
	function SetPopupSize($params)
	{
	$width = $params['width'];
	$height = $params['height'];

	if ($this->Application->GetVar('ajax') == 'yes') {
	// during AJAX request just output size
	die($width.'x'.$height);
	}

	if (!$this->UsePopups($params)) {
	return ;
	}

	$t = $this->Application->GetVar('t');
	$sql = 'SELECT *
	FROM '.TABLE_PREFIX.'PopupSizes
	WHERE TemplateName = '.$this->Conn->qstr($t);
	$popup_info = $this->Conn->GetRow($sql);
	if (!$popup_info) {
	// create new popup size record
	$fields_hash = Array (
	'TemplateName' => $t,
	'PopupWidth' => $width,
	'PopupHeight' => $height,
	);
	$this->Conn->doInsert($fields_hash, TABLE_PREFIX.'PopupSizes');
	}
	elseif ($popup_info['PopupWidth'] != $width \|\| $popup_info['PopupHeight'] != $height) {
	// popup found and size in tag differs from one in db -> update in db
	$fields_hash = Array (
	'PopupWidth' => $width,
	'PopupHeight' => $height,
	);
	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX.'PopupSizes', 'PopupId = '.$popup_info['PopupId']);
	}
	}

	/**
	* Returns popup size (by template), if not cached, then parse template to get value
	*
	* @param Array $params
	* @return string
	*/
	function GetPopupSize($params)
	{
	$t = $this->Application->GetVar('template_name');
	$sql = 'SELECT *
	FROM '.TABLE_PREFIX.'PopupSizes
	WHERE TemplateName = '.$this->Conn->qstr($t);
	$popup_info = $this->Conn->GetRow($sql);
	if (!$popup_info) {
	$this->Application->InitParser();
	$this->Application->ParseBlock(array('name' => $t)); // dies when SetPopupSize tag found & in ajax requrest
	return '750x400'; // tag SetPopupSize not found in template -> use default size
	}
	return $popup_info['PopupWidth'].'x'.$popup_info['PopupHeight'];
	}

	/**
	* Allows to check if popups are generally enabled OR to check for "popup" or "modal" mode is enabled
	*
	* @param Array $params
	* @return bool
	*/
	function UsePopups($params)
	{
	if ($this->Application->GetVar('_force_popup')) {
	return true;
	}

	$use_popups = (int)$this->Application->ConfigValue('UsePopups');

	if (array_key_exists('mode', $params)) {
	$mode_mapping = Array ('popup' => 1, 'modal' => 2);
	return $use_popups == $mode_mapping[ $params['mode'] ];
	}

	return $use_popups;
	}

	function UseToolbarLabels($params)
	{
	return (int)$this->Application->ConfigValue('UseToolbarLabels');
	}

	/**
	* Checks if debug mode enabled (optionally) and specified constant is on
	*
	* @param Array $params
	* @return bool
	* @todo Could be a duplicate of kMainTagProcessor::ConstOn
	*/
	function ConstOn($params)
	{
	$constant_name = $this->SelectParam($params, 'name,const');
	$debug_mode = isset($params['debug_mode']) && $params['debug_mode'] ? $this->Application->isDebugMode() : true;

	return $debug_mode && kUtil::constOn($constant_name);
	}

	/**
	* Builds link to last template in main frame of admin
	*
	* @param Array $params
	* @return string
	*/
	function MainFrameLink($params)
	{
	$persistent = isset($params['persistent']) && $params['persistent'];
	if ($persistent && $this->Application->ConfigValue('RememberLastAdminTemplate')) {
	// check last_template in persistent session
	$last_template = $this->Application->RecallPersistentVar('last_template_popup');
	}
	else {
	// check last_template in session
	$last_template = $this->Application->RecallVar('last_template_popup'); // because of m_opener=s there
	}

	if (!$last_template) {
	$params['persistent'] = 1;
	return $persistent ? false : $this->MainFrameLink($params);
	}

	list($index_file, $env) = explode('\|', $last_template);
	- $vars = $this->Application->HttpQuery->processQueryString($env, 'pass');
	+ $vars = $this->Application->processQueryString($env, 'pass');
	$recursion_templates = Array ('login', 'index', 'no_permission');

	if (isset($vars['admin']) && $vars['admin'] == 1) {
	// index template doesn't begin recursion on front-end (in admin frame)
	$vars['m_theme'] = '';

	if (isset($params['m_opener']) && $params['m_opener'] == 'r') {
	// front-end link for highlighting purposes
	$vars['t'] = 'index';
	$vars['m_cat_id'] = $this->Application->getBaseCategory();
	}

	unset($recursion_templates[ array_search('index', $recursion_templates)]);
	}

	if (in_array($vars['t'], $recursion_templates)) {
	// prevents redirect recursion OR old in-portal pages
	$params['persistent'] = 1;
	return $persistent ? false : $this->MainFrameLink($params);
	}

	$vars = array_merge($vars, $params);
	$t = $vars['t'];
	unset($vars['t'], $vars['persistent']);

	// substitute language in link to current (link will work, even when language will be changed)
	$vars['m_lang'] = $this->Application->GetVar('m_lang');

	return $this->Application->HREF($t, '', $vars, $index_file);
	}

	/**
	* Returns menu frame width or 200 in case, when invalid width specified in config
	*
	* @param Array $params
	* @return string
	*/
	function MenuFrameWidth($params)
	{
	$width = (int)$this->Application->ConfigValue('MenuFrameWidth');

	return $width > 0 ? $width : 200;
	}

	function AdminSkin($params)
	{
	$skin_helper =& $this->Application->recallObject('SkinHelper');
	/* @var $skin_helper SkinHelper */

	return $skin_helper->AdminSkinTag($params);
	}

	/**
	* Prints errors, discovered during mass template compilation
	*
	* @param $params
	* @return string
	* @access protected
	*/
	protected function PrintCompileErrors($params)
	{
	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $params['render_as'];

	$errors = $this->Application->RecallVar('compile_errors');
	if ( !$errors ) {
	return '';
	}

	$ret = '';
	$errors = unserialize($errors);

	foreach ($errors as $an_error) {
	$block_params['file'] = str_replace(FULL_PATH, '', $an_error['file']);
	$block_params['line'] = $an_error['line'];
	$block_params['message'] = $an_error['msg'];

	$ret .= $this->Application->ParseBlock($block_params);
	}

	$this->Application->RemoveVar('compile_errors');

	return $ret;
	}

	function CompileErrorCount($params)
	{
	$errors = $this->Application->RecallVar('compile_errors');
	if (!$errors) {
	return 0;
	}

	return count( unserialize($errors) );
	}

	function ExportData($params)
	{
	$export_helper =& $this->Application->recallObject('CSVHelper');
	/* @var $export_helper kCSVHelper */
	$result = $export_helper->ExportData( $this->SelectParam($params, 'var,name,field') );
	return ($result === false) ? '' : $result;
	}

	function ImportData($params)
	{
	$import_helper =& $this->Application->recallObject('CSVHelper');
	/* @var $import_helper kCSVHelper */
	$result = $import_helper->ImportData( $this->SelectParam($params, 'var,name,field') );
	return ($result === false) ? '' : $result;
	}

	function PrintCSVNotImportedLines($params)
	{
	$import_helper =& $this->Application->recallObject('CSVHelper');
	/* @var $import_helper kCSVHelper */
	return $import_helper->GetNotImportedLines();
	}

	/**
	* Returns input field name to
	* be placed on form (for correct
	* event processing)
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function InputName($params)
	{
	list($id, $field) = $this->prepareInputName($params);

	$ret = $this->getPrefixSpecial().'[0]['.$field.']'; // 0 always, as has no idfield
	if( getArrayValue($params, 'as_preg') ) $ret = preg_quote($ret, '/');
	return $ret;
	}

	/**
	* Returns list of all backup file dates formatted
	* in passed block
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function PrintBackupDates($params)
	{
	$backup_helper =& $this->Application->recallObject('BackupHelper');
	/* @var $backup_helper BackupHelper */

	$ret = '';
	$dates = $backup_helper->getBackupFiles();

	foreach ($dates as $date) {
	$params['backuptimestamp'] = $date['filedate'];
	$params['backuptime'] = date('F j, Y, g:i a', $date['filedate']);
	$params['backupsize'] = round($date['filesize'] / 1024 / 1024, 2); // MBytes

	$ret .= $this->Application->ParseBlock($params);
	}

	return $ret;
	}

	/**
	* Returns phpinfo() output
	*
	* @param Array $params
	* @return string
	*/
	function PrintPHPinfo($params)
	{
	ob_start();
	phpinfo();

	return ob_get_clean();
	}

	function PrintSqlCols($params)
	{
	$a_data = unserialize($this->Application->GetVar('sql_rows'));
	$ret = '';
	$block = $params['render_as'];
	foreach ($a_data AS $a_row)
	{
	foreach ($a_row AS $col => $value)
	{
	$ret .= $this->Application->ParseBlock(Array('name'=>$block, 'value'=>$col));
	}
	break;
	}
	return $ret;
	}

	function PrintSqlRows($params)
	{
	$a_data = unserialize($this->Application->GetVar('sql_rows'));
	$ret = '';
	$block = $params['render_as'];
	foreach ($a_data AS $a_row)
	{
	$cells = '';
	foreach ($a_row AS $col => $value)
	{
	$cells .= '<td>'.$value.'</td>';
	}
	$ret .= $this->Application->ParseBlock(Array('name'=>$block, 'cells'=>$cells));
	}
	return $ret;
	}

	/**
	* Prints available and enabled import sources using given block
	*
	* @param Array $params
	* @return string
	*/
	function PrintImportSources($params)
	{
	$sql = 'SELECT *
	FROM ' . TABLE_PREFIX . 'ImportScripts
	WHERE (Status = ' . STATUS_ACTIVE . ') AND (Type = "CSV")';
	$import_sources = $this->Conn->Query($sql);

	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $params['render_as'];

	$ret = '';
	foreach ($import_sources as $import_source) {
	$block_params['script_id'] = $import_source['ImportId'];
	$block_params['script_module'] = mb_strtolower($import_source['Module']);
	$block_params['script_name'] = $import_source['Name'];
	$block_params['script_prefix'] = $import_source['Prefix'];
	$block_params['module_path'] = $this->Application->findModule('Name', $import_source['Module'], 'Path');

	$ret .= $this->Application->ParseBlock($block_params);
	}

	return $ret;
	}

	/**
	* Checks, that new window should be opened in "incs/close_popup" template instead of refreshing parent window
	*
	* @param Array $params
	* @return bool
	*/
	function OpenNewWindow($params)
	{
	if (!$this->UsePopups($params)) {
	return false;
	}

	$diff = array_key_exists('diff', $params) ? $params['diff'] : 0;
	$wid = $this->Application->GetVar('m_wid');

	$stack_name = rtrim('opener_stack_' . $wid, '_');
	$opener_stack = $this->Application->RecallVar($stack_name);
	$opener_stack = $opener_stack ? unserialize($opener_stack) : Array ();

	return count($opener_stack) >= 2 - $diff;
	}

	/**
	* Allows to dynamically change current language in template
	*
	* @param Array $params
	*/
	function SetLanguage($params)
	{
	$this->Application->SetVar('m_lang', $params['language_id']);
	$this->Application->Phrases->Init('phrases', '', $params['language_id']);
	}

	/**
	* Performs HTTP Authentification for administrative console
	*
	* @param Array $params
	*/
	function HTTPAuth($params)
	{
	if (!$this->Application->ConfigValue('UseHTTPAuth')) {
	// http authentification not required
	return true;
	}

	$super_admin_ips = defined('SA_IP') ? SA_IP : false;
	$auth_bypass_ips = $this->Application->ConfigValue('HTTPAuthBypassIPs');

	if (($auth_bypass_ips && kUtil::ipMatch($auth_bypass_ips)) \|\| ($super_admin_ips && kUtil::ipMatch($super_admin_ips))) {
	// user ip is in ip bypass list
	return true;
	}

	if (!array_key_exists('PHP_AUTH_USER', $_SERVER)) {
	// ask user to authentificate, when not authentificated before
	return $this->_httpAuthentificate();
	}
	else {
	// validate user credentials (browsers remembers user/password
	// and sends them each time page is visited, so no need to save
	// authentification result in session)
	if ($this->Application->ConfigValue('HTTPAuthUsername') != $_SERVER['PHP_AUTH_USER']) {
	// incorrect username
	return $this->_httpAuthentificate();
	}

	$password_formatter =& $this->Application->recallObject('kPasswordFormatter');
	/* @var $password_formatter kPasswordFormatter */

	$password = $password_formatter->EncryptPassword($_SERVER['PHP_AUTH_PW'], 'b38');

	if ($this->Application->ConfigValue('HTTPAuthPassword') != $password) {
	// incorrect password
	return $this->_httpAuthentificate();
	}
	}

	return true;
	}

	/**
	* Ask user to authentificate
	*
	* @return false
	*/
	function _httpAuthentificate()
	{
	$realm = strip_tags( $this->Application->ConfigValue('Site_Name') );
	header('WWW-Authenticate: Basic realm="' . $realm . '"');
	header('HTTP/1.0 401 Unauthorized');

	return false;
	}

	/**
	* Checks, that we are using memory cache
	*
	* @param Array $params
	* @return bool
	*/
	function MemoryCacheEnabled($params)
	{
	return $this->Application->isCachingType(CACHING_TYPE_MEMORY);
	}
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/units/languages/languages_event_handler.php
	===================================================================
	--- branches/5.2.x/core/units/languages/languages_event_handler.php (revision 14713)
	+++ branches/5.2.x/core/units/languages/languages_event_handler.php (revision 14714)
	@@ -1,667 +1,660 @@
	<?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 LanguagesEventHandler extends kDBEventHandler
	{
	/**
	* Allows to override standard permission mapping
	*
	*/
	function mapPermissions()
	{
	parent::mapPermissions();
	$permissions = Array(
	'OnChangeLanguage' => Array('self' => true),
	'OnSetPrimary' => Array('self' => 'advanced:set_primary\|add\|edit'),
	'OnImportLanguage' => Array('self' => 'advanced:import'),
	'OnExportLanguage' => Array('self' => 'advanced:export'),
	'OnExportProgress' => Array('self' => 'advanced:export'),
	'OnReflectMultiLingualFields' => Array ('self' => 'view'),
	'OnSynchronizeLanguages' => Array ('self' => 'edit'),
	);

	$this->permMapping = array_merge($this->permMapping, $permissions);
	}

	/**
	* Checks user permission to execute given $event
	*
	* @param kEvent $event
	* @return bool
	* @access public
	*/
	public function CheckPermission(&$event)
	{
	if ($event->Name == 'OnItemBuild') {
	// check permission without using $event->getSection(),
	// so first cache rebuild won't lead to "ldefault_Name" field being used
	return true;
	}

	return parent::CheckPermission($event);
	}

	/**
	* Allows to get primary language object
	*
	* @param kEvent $event
	*/
	function getPassedID(&$event)
	{
	if ($event->Special == 'primary') {
	return $this->Application->GetDefaultLanguageId();
	}

	return parent::getPassedID($event);
	}

	/**
	* [HOOK] Updates table structure on new language adding/removing language
	*
	* @param kEvent $event
	*/
	function OnReflectMultiLingualFields(&$event)
	{
	if ($this->Application->GetVar('ajax') == 'yes') {
	$event->status = kEvent::erSTOP;
	}

	if (is_object($event->MasterEvent)) {
	if ($event->MasterEvent->status != kEvent::erSUCCESS) {
	// only rebuild when all fields are validated
	return ;
	}

	if (($event->MasterEvent->Name == 'OnSave') && !$this->Application->GetVar('new_language')) {
	// only rebuild during new language adding
	return ;
	}
	}

	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$this->Application->UnitConfigReader->ReReadConfigs();
	foreach ($this->Application->UnitConfigReader->configData as $prefix => $config_data) {
	$ml_helper->createFields($prefix);
	}

	$event->SetRedirectParam('action_completed', 1);
	}

	/**
	* Allows to set selected language as primary
	*
	* @param kEvent $event
	*/
	function OnSetPrimary(&$event)
	{
	if ($this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1)) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$this->StoreSelectedIDs($event);
	$ids = $this->getSelectedIDs($event);
	if ($ids) {
	$id = array_shift($ids);
	$object =& $event->getObject( Array('skip_autoload' => true) );
	/* @var $object LanguagesItem */

	$object->Load($id);
	$object->copyMissingData( $object->setPrimary() );
	}
	}

	/**
	* [HOOK] Reset primary status of other languages if we are saving primary language
	*
	* @param kEvent $event
	*/
	function OnUpdatePrimary(&$event)
	{
	if ($event->MasterEvent->status != kEvent::erSUCCESS) {
	return ;
	}

	$object =& $event->getObject( Array('skip_autoload' => true) );
	/* @var $object LanguagesItem */

	$object->SwitchToLive();

	// set primary for each languages, that have this checkbox checked
	$ids = explode(',', $event->MasterEvent->getEventParam('ids'));
	foreach ($ids as $id) {
	$object->Load($id);
	if ($object->GetDBField('PrimaryLang')) {
	$object->copyMissingData( $object->setPrimary(true, false) );
	}

	if ($object->GetDBField('AdminInterfaceLang')) {
	$object->setPrimary(true, true);
	}
	}

	// if no primary language left, then set primary last language (not to load again) from edited list
	$sql = 'SELECT '.$object->IDField.'
	FROM '.$object->TableName.'
	WHERE PrimaryLang = 1';
	$primary_language = $this->Conn->GetOne($sql);

	if (!$primary_language) {
	$object->setPrimary(false, false); // set primary language
	}

	$sql = 'SELECT '.$object->IDField.'
	FROM '.$object->TableName.'
	WHERE AdminInterfaceLang = 1';
	$primary_language = $this->Conn->GetOne($sql);

	if (!$primary_language) {
	$object->setPrimary(false, true); // set admin interface language
	}
	}


	/**
	* Prefills options with dynamic values
	*
	* @param kEvent $event
	*/
	function OnAfterConfigRead(&$event)
	{
	parent::OnAfterConfigRead($event);

	$fields = $this->Application->getUnitOption($event->Prefix, 'Fields');

	// set dynamic hints for options in date format fields
	$options = $fields['InputDateFormat']['options'];
	if ($options) {
	foreach ($options as $i => $v) {
	$options[$i] = $v . ' (' . adodb_date($i) . ')';
	}
	$fields['InputDateFormat']['options'] = $options;
	}

	$options = $fields['InputTimeFormat']['options'];
	if ($options) {
	foreach ($options as $i => $v) {
	$options[$i] = $v . ' (' . adodb_date($i) . ')';
	}
	$fields['InputTimeFormat']['options'] = $options;
	}

	$this->Application->setUnitOption($event->Prefix, 'Fields', $fields);
	}

	/**
	* Occurs before updating item
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeItemUpdate(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	$status_fields = $this->Application->getUnitOption($event->Prefix, 'StatusField');
	$status_field = array_shift($status_fields);

	if ( $object->GetDBField('PrimaryLang') == 1 && $object->GetDBField($status_field) == 0 ) {
	$object->SetDBField($status_field, 1);
	}
	}

	/**
	* Shows only enabled languages on front
	*
	* @param kEvent $event
	* @return void
	* @access protected
	* @see kDBEventHandler::OnListBuild()
	*/
	protected function SetCustomQuery(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBList */

	if (in_array($event->Special, Array ('enabled', 'selected', 'available'))) {
	$object->addFilter('enabled_filter', '%1$s.Enabled = ' . STATUS_ACTIVE);
	}

	// site domain language picker
	if ($event->Special == 'selected' \|\| $event->Special == 'available') {
	$edit_picker_helper =& $this->Application->recallObject('EditPickerHelper');
	/* @var $edit_picker_helper EditPickerHelper */

	$edit_picker_helper->applyFilter($event, 'Languages');
	}

	// apply domain-based language filtering
	$languages = $this->Application->siteDomainField('Languages');

	if (strlen($languages)) {
	$languages = explode('\|', substr($languages, 1, -1));
	$object->addFilter('domain_filter', '%1$s.LanguageId IN (' . implode(',', $languages) . ')');
	}
	}

	/**
	* Copy labels from another language
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnAfterItemCreate(&$event)
	{
	parent::OnAfterItemCreate($event);

	$object =& $event->getObject();
	/* @var $object kDBItem */

	$src_language = $object->GetDBField('CopyFromLanguage');

	if ( $object->GetDBField('CopyLabels') && $src_language ) {
	$dst_language = $object->GetID();

	// 1. schedule data copy after OnSave event is executed
	$var_name = $event->getPrefixSpecial() . '_copy_data' . $this->Application->GetVar('m_wid');
	$pending_actions = $this->Application->RecallVar($var_name, Array ());

	if ( $pending_actions ) {
	$pending_actions = unserialize($pending_actions);
	}

	$pending_actions[$src_language] = $dst_language;
	$this->Application->StoreVar($var_name, serialize($pending_actions));
	$object->SetDBField('CopyLabels', 0);
	}
	}

	/**
	* Saves language from temp table to live
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnSave(&$event)
	{
	parent::OnSave($event);

	if ( $event->status != kEvent::erSUCCESS ) {
	return;
	}

	$var_name = $event->getPrefixSpecial() . '_copy_data' . $this->Application->GetVar('m_wid');
	$pending_actions = $this->Application->RecallVar($var_name, Array ());

	if ( $pending_actions ) {
	$pending_actions = unserialize($pending_actions);
	}

	// create multilingual columns for phrases & email events table first (actual for 6+ language)
	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$ml_helper->createFields('phrases');
	$ml_helper->createFields('emailevents');

	foreach ($pending_actions as $src_language => $dst_language) {
	// phrases import
	$sql = 'UPDATE ' . $this->Application->getUnitOption('phrases', 'TableName') . '
	SET l' . $dst_language . '_Translation = l' . $src_language . '_Translation';
	$this->Conn->Query($sql);

	// events import
	$sql = 'UPDATE ' . $this->Application->getUnitOption('emailevents', 'TableName') . '
	SET
	l' . $dst_language . '_Subject = l' . $src_language . '_Subject,
	l' . $dst_language . '_Body = l' . $src_language . '_Body';
	$this->Conn->Query($sql);
	}

	$this->Application->RemoveVar($var_name);

	$event->CallSubEvent('OnReflectMultiLingualFields');
	$event->CallSubEvent('OnUpdatePrimary');
	}

	/**
	* Prepare temp tables for creating new item
	* but does not create it. Actual create is
	* done in OnPreSaveCreated
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnPreCreate(&$event)
	{
	parent::OnPreCreate($event);

	$object =& $event->getObject();
	/* @var $object kDBItem */

	$object->SetDBField('CopyLabels', 1);

	$sql = 'SELECT ' . $object->IDField . '
	FROM ' . $this->Application->getUnitOption($event->Prefix, 'TableName') . '
	WHERE PrimaryLang = 1';
	$primary_lang_id = $this->Conn->GetOne($sql);

	$object->SetDBField('CopyFromLanguage', $primary_lang_id);
	$object->SetDBField('SynchronizationModes', Language::SYNCHRONIZE_DEFAULT);
	}

	/**
	* Sets new language mark
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnBeforeDeleteFromLive(&$event)
	{
	parent::OnBeforeDeleteFromLive($event);

	$id_field = $this->Application->getUnitOption($event->Prefix, 'IDField');

	$sql = 'SELECT ' . $id_field . '
	FROM ' . $this->Application->getUnitOption($event->Prefix, 'TableName') . '
	WHERE ' . $id_field . ' = ' . $event->getEventParam('id');
	$id = $this->Conn->GetOne($sql);

	if ( !$id ) {
	$this->Application->SetVar('new_language', 1);
	}
	}

	function OnChangeLanguage(&$event)
	{
	$language_id = $this->Application->GetVar('language');

	if ($this->Application->isAdmin) {
	// admin data only
	$this->Application->SetVar('m_lang', $language_id);

	// set new language for this session (admin interface only)
	$this->Application->Session->SetField('Language', $language_id);

	// remember last user language in administrative console
	if ($this->Application->RecallVar('user_id') == USER_ROOT) {
	$this->Application->StorePersistentVar('AdminLanguage', $language_id);
	}
	else {
	$object =& $this->Application->recallObject('u.current');
	/* @var $object kDBItem */

	$object->SetDBField('AdminLanguage', $language_id);
	$object->Update();
	}

	// without this language change in admin will cause erase of last remembered tree section
	$this->Application->SetVar('skip_last_template', 1);
	}
	else {
	// changing language on Front-End
	$this->Application->SetVar('m_lang', $language_id);
	-
	- if (MOD_REWRITE) {
	- $mod_rewrite_helper =& $this->Application->recallObject('ModRewriteHelper');
	- /* @var $mod_rewrite_helper kModRewriteHelper */
	-
	- $mod_rewrite_helper->removePages();
	- }
	}
	}

	/**
	* Parse language XML file into temp tables and redirect to progress bar screen
	*
	* @param kEvent $event
	*/
	function OnImportLanguage(&$event)
	{
	if ($this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1)) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$items_info = $this->Application->GetVar('phrases_import');
	if ($items_info) {
	list ($id, $field_values) = each($items_info);

	$object =& $this->Application->recallObject('phrases.import', 'phrases', Array('skip_autoload' => true));
	/* @var $object kDBItem */

	$object->setID($id);
	$object->SetFieldsFromHash($field_values);

	if (!$object->Validate()) {
	$event->status = kEvent::erFAIL;
	return ;
	}

	$filename = $object->GetField('LangFile', 'full_path');

	if (!filesize($filename)) {
	$object->SetError('LangFile', 'la_empty_file', 'la_EmptyFile');
	$event->status = kEvent::erFAIL;
	}

	$language_import_helper =& $this->Application->recallObject('LanguageImportHelper');
	/* @var $language_import_helper LanguageImportHelper */

	$language_import_helper->performImport(
	$filename,
	$object->GetDBField('PhraseType'),
	$object->GetDBField('Module'),
	$object->GetDBField('ImportOverwrite') ? LANG_OVERWRITE_EXISTING : LANG_SKIP_EXISTING
	);

	// delete uploaded language pack after import is finished
	unlink($filename);

	$event->SetRedirectParam('opener', 'u');
	}
	}

	/**
	* Stores ids of selected languages and redirects to export language step 1
	*
	* @param kEvent $event
	*/
	function OnExportLanguage(&$event)
	{
	if ($this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1)) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$this->Application->setUnitOption('phrases','AutoLoad',false);

	$this->StoreSelectedIDs($event);
	$this->Application->StoreVar('export_language_ids', implode(',', $this->getSelectedIDs($event)) );

	$event->setRedirectParams( Array('phrases.export_event' => 'OnNew', 'pass' => 'all,phrases.export') );
	}

	/**
	* Saves selected languages to xml file passed
	*
	* @param kEvent $event
	*/
	function OnExportProgress(&$event)
	{
	$items_info = $this->Application->GetVar('phrases_export');
	if ($items_info) {
	list($id, $field_values) = each($items_info);
	$object =& $this->Application->recallObject('phrases.export', null, Array('skip_autoload' => true));
	/* @var $object kDBItem */

	$object->setID($id);
	$object->SetFieldsFromHash($field_values);

	if (!$object->Validate()) {
	$event->status = kEvent::erFAIL;
	return ;
	}

	$file_helper =& $this->Application->recallObject('FileHelper');
	/* @var $file_helper FileHelper */

	$file_helper->CheckFolder(EXPORT_PATH);

	if (!is_writable(EXPORT_PATH)) {
	$event->status = kEvent::erFAIL;
	$object->SetError('LangFile', 'write_error', 'la_ExportFolderNotWritable');

	return ;
	}

	if ( substr($field_values['LangFile'], -5) != '.lang') {
	$field_values['LangFile'] .= '.lang';
	}

	$filename = EXPORT_PATH . '/' . $field_values['LangFile'];

	$language_import_helper =& $this->Application->recallObject('LanguageImportHelper');
	/* @var $language_import_helper LanguageImportHelper */

	if ($object->GetDBField('DoNotEncode')) {
	$language_import_helper->setExportEncoding('plain');
	}

	$language_import_helper->setExportLimits($field_values['ExportPhrases'], $field_values['ExportEmailEvents']);

	$lang_ids = explode(',', $this->Application->RecallVar('export_language_ids') );
	$language_import_helper->performExport($filename, $field_values['PhraseType'], $lang_ids, $field_values['Module']);

	}

	$event->redirect = 'regional/languages_export_step2';
	$event->SetRedirectParam('export_file', $field_values['LangFile']);
	}

	/**
	* Returns to previous template in opener stack
	*
	* @param kEvent $event
	*/
	function OnGoBack(&$event)
	{
	$event->SetRedirectParam('opener', 'u');
	}

	function OnScheduleTopFrameReload(&$event)
	{
	$this->Application->StoreVar('RefreshTopFrame',1);
	}

	/**
	* Do now allow deleting current language
	*
	* @param kEvent $event
	*/
	function OnBeforeItemDelete(&$event)
	{
	$object =& $event->getObject();
	/* @var $object kDBItem */

	if ( $object->GetDBField('PrimaryLang') \|\| $object->GetDBField('AdminInterfaceLang') \|\| $object->GetID() == $this->Application->GetVar('m_lang') ) {
	$event->status = kEvent::erFAIL;
	}
	}

	/**
	* Deletes phrases and email events on given language
	*
	* @param kEvent $event
	*/
	function OnAfterItemDelete(&$event)
	{
	parent::OnAfterItemDelete($event);

	$object =& $event->getObject();
	/* @var $object kDBItem */

	// clean Events table
	$fields_hash = Array (
	'l' . $object->GetID() . '_Subject' => NULL,
	'l' . $object->GetID() . '_Body' => NULL,
	);
	$this->Conn->doUpdate($fields_hash, $this->Application->getUnitOption('emailevents', 'TableName'), 1);

	// clean Phrases table
	$fields_hash = Array (
	'l' . $object->GetID() . '_Translation' => NULL,
	);
	$this->Conn->doUpdate($fields_hash, $this->Application->getUnitOption('phrases', 'TableName'), 1);
	}

	/**
	* Copy missing phrases across all system languages (starting from primary)
	*
	* @param kEvent $event
	* @return void
	* @access protected
	*/
	protected function OnSynchronizeLanguages(&$event)
	{
	if ( $this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1) ) {
	$event->status = kEvent::erFAIL;
	return;
	}

	$source_languages = $target_languages = Array ();

	// get language list with primary language first
	$sql = 'SELECT SynchronizationModes, LanguageId
	FROM ' . TABLE_PREFIX . 'Language
	WHERE SynchronizationModes <> ""
	ORDER BY PrimaryLang DESC';
	$languages = $this->Conn->GetCol($sql, 'LanguageId');

	foreach ($languages as $language_id => $synchronization_modes) {
	$synchronization_modes = explode('\|', substr($synchronization_modes, 1, -1));

	if ( in_array(Language::SYNCHRONIZE_TO_OTHERS, $synchronization_modes) ) {
	$source_languages[] = $language_id;
	}

	if ( in_array(Language::SYNCHRONIZE_FROM_OTHERS, $synchronization_modes) ) {
	$target_languages[] = $language_id;
	}
	}

	foreach ($source_languages as $source_id) {
	foreach ($target_languages as $target_id) {
	if ( $source_id == $target_id ) {
	continue;
	}

	$sql = 'UPDATE ' . TABLE_PREFIX . 'Phrase
	SET l' . $target_id . '_Translation = l' . $source_id . '_Translation
	WHERE COALESCE(l' . $target_id . '_Translation, "") = "" AND COALESCE(l' . $source_id . '_Translation, "") <> ""';
	$this->Conn->Query($sql);
	}
	}
	}
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/units/languages/languages_item.php
	===================================================================
	--- branches/5.2.x/core/units/languages/languages_item.php (revision 14713)
	+++ branches/5.2.x/core/units/languages/languages_item.php (revision 14714)
	@@ -1,282 +1,268 @@
	<?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 LanguagesItem extends kDBItem
	{
	function generateID()
	{
	$sql = 'SELECT MAX('.$this->IDField.') FROM '.$this->Application->getUnitOption($this->Prefix, 'TableName');
	return $this->Conn->GetOne($sql) + 1;
	}

	/**
	* Set's current language as new primary and return previous primary language
	*
	* @param bool $reset_primary
	* @param bool $admin_language
	* @return int
	*/
	function setPrimary($reset_primary = true, $admin_language = false)
	{
	$prev_primary = false;
	$primary_field = $admin_language ? 'AdminInterfaceLang' : 'PrimaryLang';

	if ($reset_primary) {
	$sql = 'SELECT ' . $this->IDField . '
	FROM ' . $this->TableName . '
	WHERE ' . $primary_field . ' = 1';
	$prev_primary = $this->Conn->GetOne($sql);

	$sql = 'UPDATE '.$this->TableName.'
	SET '.$primary_field.' = 0';
	$this->Conn->Query($sql);
	}

	$sql = 'UPDATE '.$this->TableName.'
	SET '.$primary_field.' = 1, Enabled = 1
	WHERE '.$this->IDField.' = '.$this->GetID();
	$this->Conn->Query($sql);

	// in case, when Update method is called for this langauge object
	$this->SetDBField($primary_field, 1);
	$this->SetDBField('Enabled', 1);

	// increment serial by hand, since no Update method is called
	$this->Application->incrementCacheSerial($this->Prefix);
	$this->Application->incrementCacheSerial($this->Prefix, $this->GetID());

	return $prev_primary;
	}

	/**
	* Copies missing data on current language from given language
	*
	* @param int $from_language
	*/
	function copyMissingData($from_language)
	{
	if ( !is_numeric($from_language) \|\| ($from_language == $this->GetID()) ) {
	// invalid or same language
	return ;
	}

	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$to_language = $this->GetID();
	$this->Application->UnitConfigReader->ReReadConfigs();

	foreach ($this->Application->UnitConfigReader->configData as $prefix => $config_data) {
	$ml_helper->copyMissingData($prefix, $from_language, $to_language);
	}
	}

	/**
	* Allows to format number according to regional settings
	*
	* @param float $number
	* @param int $precision
	* @return float
	*/
	function formatNumber($number, $precision = null)
	{
	if (is_null($precision)) {
	$precision = preg_match('/[\.,]+/', $number) ? strlen(preg_replace('/^.*[\.,]+/', '', $number)) : 0;
	}
	return number_format($number, $precision, (string)$this->GetDBField('DecimalPoint'), (string)$this->GetDBField('ThousandSep'));
	}

	/**
	* Returns language id based on HTTP header "Accept-Language"
	*
	* @return int
	*/
	function processAcceptLanguage()
	{
	if (!array_key_exists('HTTP_ACCEPT_LANGUAGE', $_SERVER) \|\| !$_SERVER['HTTP_ACCEPT_LANGUAGE']) {
	return false;
	}

	$accepted_languages = Array ();
	$language_string = explode(',', strtolower($_SERVER['HTTP_ACCEPT_LANGUAGE']));

	foreach ($language_string as $mixed_language) {
	if (strpos($mixed_language, ';') !== false) {
	list ($language_locale, $language_quality) = explode(';', $mixed_language);
	$language_quality = (float)substr($language_quality, 2); // format "q=4.45"
	}
	else {
	$language_locale = $mixed_language;
	$language_quality = 1.00;
	}

	$accepted_languages[ trim($language_locale) ] = trim($language_quality);
	}

	arsort($accepted_languages, SORT_NUMERIC);

	foreach ($accepted_languages as $language_locale => $language_quality) {
	$language_id = $this->getAvailableLanguage($language_locale);

	if ($language_id) {
	return $language_id;
	}
	}

	return false;
	}

	/**
	* Returns language ID based on given locale
	*
	* @param string $locale
	* @return int
	*/
	function getAvailableLanguage($locale)
	{
	$cache_key = 'available_languages[%LangSerial%]';
	$available_languages = $this->Application->getCache($cache_key);

	if ($available_languages === false) {
	$this->Conn->nextQueryCachable = true;
	$sql = 'SELECT LanguageId, LOWER(Locale) AS Locale
	FROM ' . TABLE_PREFIX . 'Language
	WHERE Enabled = 1';
	$available_languages = $this->Conn->GetCol($sql, 'Locale');
	$this->Application->setCache($cache_key, $available_languages);
	}

	if (strpos($locale, '-') !== false) {
	// exact language match requested
	$language_id = array_key_exists($locale, $available_languages) ? $available_languages[$locale] : false;

	if ($language_id && $this->siteDomainLanguageEnabled($language_id)) {
	return $language_id;
	}

	return false;
	}

	// partial (like "en" matches "en-GB" and "en-US") language match required
	foreach ($available_languages as $language_code => $language_id) {
	list ($language_code, ) = explode('-', $language_code);

	if (($locale == $language_code) && $this->siteDomainLanguageEnabled($language_id)) {
	return $language_id;
	}
	}

	return false;
	}

	- /**
	- * Checks, that url is empty
	- *
	- * @return bool
	- */
	- function isEmptyUrl()
	- {
	- if ($this->Application->RewriteURLs()) {
	- return !$this->Application->GetVar('_mod_rw_url_');
	- }
	-
	- return !count($this->Application->HttpQuery->Get);
	- }
	-
	public function Load($id, $id_field_name = null, $cachable = true)
	{
	$default = false;
	if ($id == 'default') {
	// domain based primary language
	$default = true;
	$id = $this->Application->siteDomainField('PrimaryLanguageId');

	if ($id) {
	$res = parent::Load($id, $id_field_name, $cachable);
	}
	else {
	$res = parent::Load(1, 'PrimaryLang', $cachable);
	}

	if (
	!$this->Application->isAdmin && !defined('GW_NOTIFY') && preg_match('/[\/]{0,1}index.php[\/]{0,1}/', $_SERVER['PHP_SELF']) &&
	- $this->isEmptyUrl() && $this->Application->ConfigValue('UseContentLanguageNegotiation')
	+ $this->Application->HttpQuery->isEmptyUrl() && $this->Application->ConfigValue('UseContentLanguageNegotiation')
	) {
	$language_id = $this->processAcceptLanguage();

	if ($language_id != $this->GetID()) {
	// redirect to same page with found language
	$url_params = Array (
	'm_cat_id' => 0, 'm_cat_page' => 1,
	'm_lang' => $language_id, 'm_opener' => 's',
	'pass' => 'm'
	);

	$this->Application->Redirect('', $url_params);
	}
	}
	}
	else {
	$res = parent::Load($id, $id_field_name, $cachable);
	}

	if ($res) {
	if (!$this->siteDomainLanguageEnabled($this->GetID())) {
	// language isn't allowed in site domain
	return $this->Clear();
	}
	}

	if ($default) {
	if (!$res) {
	if ($this->Application->isAdmin) {
	$res = parent::Load(1, $id_field_name, false);
	}
	else {
	if (defined('IS_INSTALL')) {
	// during first language import prevents sql errors
	$this->setID(1);
	$res = true;
	}
	else {
	$this->Application->ApplicationDie('No Primary Language Selected');
	}
	}
	}
	$this->Application->SetVar('lang.current_id', $this->GetID() );
	$this->Application->SetVar('m_lang', $this->GetID() );
	}

	return $res;
	}

	/**
	* Checks, that language is enabled in site domain
	*
	* @param int $id
	* @return bool
	*/
	function siteDomainLanguageEnabled($id)
	{
	$available_languages = $this->Application->siteDomainField('Languages');

	if ($available_languages) {
	return strpos($available_languages, '\|' .$id . '\|') !== false;
	}

	return true;
	}
	}
	\ No newline at end of file
	Index: branches/5.2.x/core/units/general/general_config.php
	===================================================================
	--- branches/5.2.x/core/units/general/general_config.php (revision 14713)
	+++ branches/5.2.x/core/units/general/general_config.php (revision 14714)
	@@ -1,46 +1,46 @@
	<?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!');

	$config = Array (
	'Prefix' => 'm',
	'EventHandlerClass' => Array ('class' => 'kEventHandler', 'file' => '', 'build_event' => 'OnBuild'),
	// 'TagProcessorClass' => Array ('class' => 'kMainTagProcessor', 'file' => '', 'build_event' => 'OnBuild'),

	'QueryString' => Array (
	1 => 'cat_id',
	2 => 'cat_page',
	3 => 'lang',
	4 => 'theme',
	5 => 'opener',
	6 => 'wid',
	),

	'TitleField' => 'CachedNavbar',
	'TitlePhrase' => 'la_Text_Category',
	'CatalogTabIcon' => 'icon16_section.png',
	'ItemType' => 1,
	'TableName' => TABLE_PREFIX . 'Category',

	'CatalogItem' => true,

	'PortalStyleEnv' => true,

	'RewritePriority' => 100,
	- 'RewriteListener' => 'ModRewriteHelper:MainRewriteListener',
	+ 'RewriteListener' => 'c_EventHandler:CategoryRewriteListener',

	'PermTabText' => 'In-Portal',
	'PermSection' => Array ('search' => 'in-portal:configuration_search', 'custom' => 'in-portal:configuration_custom'),
	);
	\ No newline at end of file
	Index: branches/5.2.x/core/install/upgrades.php
	===================================================================
	--- branches/5.2.x/core/install/upgrades.php (revision 14713)
	+++ branches/5.2.x/core/install/upgrades.php (revision 14714)
	@@ -1,1888 +1,1888 @@
	<?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!');

	$upgrade_class = 'CoreUpgrades';

	/**
	* Class, that holds all upgrade scripts for "Core" module
	*
	*/
	class CoreUpgrades extends kUpgradeHelper {

	/**
	* Changes table structure, where multilingual fields of TEXT type are present
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_4_1_0($mode)
	{
	if ($mode == 'before') {
	// don't user after, because In-Portal calls this method too
	$this->_toolkit->SaveConfig();
	}

	if ($mode == 'after') {
	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$this->Application->UnitConfigReader->iterateConfigs(Array (&$this, 'updateTextFields'), $ml_helper->getLanguages());
	}
	}

	/**
	* Moves ReplacementTags functionality from EmailMessage to Events table
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_4_1_1($mode)
	{
	if ($mode == 'after') {
	$sql = 'SELECT ReplacementTags, EventId
	FROM '.TABLE_PREFIX.'EmailMessage
	WHERE (ReplacementTags IS NOT NULL) AND (ReplacementTags <> "") AND (LanguageId = 1)';
	$replacement_tags = $this->Conn->GetCol($sql, 'EventId');

	foreach ($replacement_tags as $event_id => $replacement_tag) {
	$sql = 'UPDATE '.TABLE_PREFIX.'Events
	SET ReplacementTags = '.$this->Conn->qstr($replacement_tag).'
	WHERE EventId = '.$event_id;
	$this->Conn->Query($sql);
	}

	// drop moved field from source table
	$sql = 'ALTER TABLE '.TABLE_PREFIX.'EmailMessage
	DROP `ReplacementTags`';
	$this->Conn->Query($sql);
	}
	}

	/**
	* Callback function, that makes all ml fields of text type null with same default value
	*
	* @param string $prefix
	* @param Array $config_data
	* @param Array $languages
	* @return bool
	*/
	function updateTextFields($prefix, &$config_data, $languages)
	{
	if (!isset($config_data['TableName']) \|\| !isset($config_data['Fields'])) {
	// invalid config found or prefix not found
	return false;
	}

	$table_name = $config_data['TableName'];
	$table_structure = $this->Conn->Query('DESCRIBE '.$table_name, 'Field');
	if (!$table_structure) {
	// table not found
	return false;
	}

	$sqls = Array ();
	foreach ($config_data['Fields'] as $field => $options) {
	if (isset($options['formatter']) && $options['formatter'] == 'kMultiLanguage' && !isset($options['master_field'])) {
	// update all l<lang_id>_<field_name> fields (new format)

	foreach ($languages as $language_id) {
	$ml_field = 'l'.$language_id.'_'.$field;

	if ($table_structure[$ml_field]['Type'] == 'text') {
	$sqls[] = 'CHANGE '.$ml_field.' '.$ml_field.' TEXT NULL DEFAULT NULL';
	}
	}

	// update <field_name> if found (old format)
	if (isset($table_structure[$field]) && $table_structure[$field]['Type'] == 'text') {
	$sqls[] = 'CHANGE '.$field.' '.$field.' TEXT NULL DEFAULT NULL';
	}
	}
	}

	if ($sqls) {
	$sql = 'ALTER TABLE '.$table_name.' '.implode(', ', $sqls);
	$this->Conn->Query($sql);
	}

	return true;
	}

	/**
	* Replaces In-Portal tags in Forgot Password related email events to K4 ones
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_4_2_0($mode)
	{
	if ($mode == 'after') {
	// 1. get event ids based on their name and type combination
	$event_names = Array (
	'USER.PSWD_' . EmailEvent::EVENT_TYPE_ADMIN,
	'USER.PSWD_' . EmailEvent::EVENT_TYPE_FRONTEND,
	'USER.PSWDC_' . EmailEvent::EVENT_TYPE_FRONTEND,
	);

	$event_sql = Array ();
	foreach ($event_names as $mixed_event) {
	list ($event_name, $event_type) = explode('_', $mixed_event, 2);
	$event_sql[] = 'Event = "'.$event_name.'" AND Type = '.$event_type;
	}

	$sql = 'SELECT EventId
	FROM '.TABLE_PREFIX.'Events
	WHERE ('.implode(') OR (', $event_sql).')';
	$event_ids = implode(',', $this->Conn->GetCol($sql));

	// 2. replace In-Portal tags to K4 tags
	$replacements = Array (
	'<inp:touser _Field="Password" />' => '<inp2:u_ForgottenPassword />',
	'<inp:m_confirm_password_link />' => '<inp2:u_ConfirmPasswordLink no_amp="1"/>',
	);

	foreach ($replacements as $old_tag => $new_tag) {
	$sql = 'UPDATE '.TABLE_PREFIX.'EmailMessage
	SET Template = REPLACE(Template, '.$this->Conn->qstr($old_tag).', '.$this->Conn->qstr($new_tag).')
	WHERE EventId IN ('.$event_ids.')';
	$this->Conn->Query($sql);
	}

	}
	}

	/**
	* Makes admin primary language same as front-end - not needed, done in SQL
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_4_2_1($mode)
	{

	}

	function Upgrade_4_2_2($mode)
	{
	if ($mode == 'before') {
	if ($this->Conn->GetOne('SELECT LanguageId FROM '.TABLE_PREFIX.'Language WHERE PrimaryLang = 1')) return ;
	$this->Conn->Query('UPDATE '.TABLE_PREFIX.'Language SET PrimaryLang = 1 ORDER BY LanguageId LIMIT 1');
	}
	}

	/**
	* Adds index to "dob" field in "PortalUser" table when it's missing
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_4_3_1($mode)
	{
	if ($mode == 'after') {
	$sql = 'DESCRIBE ' . TABLE_PREFIX . 'PortalUser';
	$structure = $this->Conn->Query($sql);

	foreach ($structure as $field_info) {
	if ($field_info['Field'] == 'dob') {
	if (!$field_info['Key']) {
	$sql = 'ALTER TABLE ' . TABLE_PREFIX . 'PortalUser
	ADD INDEX (dob)';
	$this->Conn->Query($sql);
	}
	break;
	}
	}
	}
	}

	/**
	* Removes duplicate phrases, update file paths in database
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_4_3_9($mode)
	{
	// 1. find In-Portal old <inp: tags
	$sql = 'SELECT EmailMessageId
	FROM '.TABLE_PREFIX.'EmailMessage
	WHERE Template LIKE \'%<inp:%\'';
	$event_ids = implode(',', $this->Conn->GetCol($sql));

	// 2. replace In-Portal old <inp: tags to K4 tags
	$replacements = Array (
	'<inp:m_category_field _Field="Name" _StripHTML="1"' => '<inp2:c_Field name="Name"',
	'<inp:touser _Field="password"' => '<inp2:u_Field name="Password_plain"',
	'<inp:touser _Field="UserName"' => '<inp2:u_Field name="Login"',
	'<inp:touser _Field="' => '<inp2:u_Field name="',
	'<inp:m_page_title' => '<inp2:m_BaseUrl',
	'<inp:m_theme_url _page="current"' => '<inp2:m_BaseUrl',
	'<inp:topic _field="text"' => '<inp2:bb-post_Field name="PostingText"',
	'<inp:topic _field="link" _Template="inbulletin/post_list"' => '<inp2:bb_TopicLink template="__default__"',
	);

	if ($event_ids) {
	foreach ($replacements as $old_tag => $new_tag) {
	$sql = 'UPDATE '.TABLE_PREFIX.'EmailMessage
	SET Template = REPLACE(Template, '.$this->Conn->qstr($old_tag).', '.$this->Conn->qstr($new_tag).')
	WHERE EventId IN ('.$event_ids.')';
	$this->Conn->Query($sql);
	}
	}

	if ($mode == 'after') {
	$this->_insertInPortalData();
	$this->_moveDatabaseFolders();

	// in case, when In-Portal module is enabled -> turn AdvancedUserManagement on too
	if ($this->Application->findModule('Name', 'In-Portal')) {
	$sql = 'UPDATE ' . TABLE_PREFIX . 'ConfigurationValues
	SET VariableValue = 1
	WHERE VariableName = "AdvancedUserManagement"';
	$this->Conn->Query($sql);
	}
	}

	if ($mode == 'languagepack') {
	$this->_removeDuplicatePhrases();
	}
	}

	function _insertInPortalData()
	{
	$data = Array (
	'ConfigurationAdmin' => Array (
	'UniqueField' => 'VariableName',
	'Records' => Array (
	'AllowDeleteRootCats' => "('AllowDeleteRootCats', 'la_Text_General', 'la_AllowDeleteRootCats', 'checkbox', NULL , NULL , 10.09, 0, 0)",
	'Catalog_PreselectModuleTab' => "('Catalog_PreselectModuleTab', 'la_Text_General', 'la_config_CatalogPreselectModuleTab', 'checkbox', NULL, NULL, 10.10, 0, 1)",
	'RecycleBinFolder' => "('RecycleBinFolder', 'la_Text_General', 'la_config_RecycleBinFolder', 'text', NULL , NULL , 10.11, 0, 0)",
	'AdvancedUserManagement' => "('AdvancedUserManagement', 'la_Text_General', 'la_prompt_AdvancedUserManagement', 'checkbox', NULL, NULL, '10.011', 0, 1)",
	),
	),

	'ConfigurationValues' => Array (
	'UniqueField' => 'VariableName',
	'Records' => Array (
	'AdvancedUserManagement' => "(DEFAULT, 'AdvancedUserManagement', 0, 'In-Portal:Users', 'in-portal:configure_users')",
	),
	),

	'ItemTypes' => Array (
	'UniqueField' => 'ItemType',
	'Records' => Array (
	'1' => "(1, 'In-Portal', 'c', 'Category', 'Name', 'CreatedById', NULL, NULL, 'la_ItemTab_Categories', 1, 'admin/category/addcategory.php', 'clsCategory', 'Category')",
	'6' => "(6, 'In-Portal', 'u', 'PortalUser', 'Login', 'PortalUserId', NULL, NULL, '', 0, '', 'clsPortalUser', 'User')",
	),
	),

	'PermissionConfig' => Array (
	'UniqueField' => 'PermissionName',
	'Records' => Array (
	'CATEGORY.ADD' => "(DEFAULT, 'CATEGORY.ADD', 'lu_PermName_Category.Add_desc', 'lu_PermName_Category.Add_error', 'In-Portal')",
	'CATEGORY.DELETE' => "(DEFAULT, 'CATEGORY.DELETE', 'lu_PermName_Category.Delete_desc', 'lu_PermName_Category.Delete_error', 'In-Portal')",
	'CATEGORY.ADD.PENDING' => "(DEFAULT, 'CATEGORY.ADD.PENDING', 'lu_PermName_Category.AddPending_desc', 'lu_PermName_Category.AddPending_error', 'In-Portal')",
	'CATEGORY.MODIFY' => "(DEFAULT, 'CATEGORY.MODIFY', 'lu_PermName_Category.Modify_desc', 'lu_PermName_Category.Modify_error', 'In-Portal')",
	'ADMIN' => "(DEFAULT, 'ADMIN', 'lu_PermName_Admin_desc', 'lu_PermName_Admin_error', 'Admin')",
	'LOGIN' => "(DEFAULT, 'LOGIN', 'lu_PermName_Login_desc', 'lu_PermName_Admin_error', 'Front')",
	'DEBUG.ITEM' => "(DEFAULT, 'DEBUG.ITEM', 'lu_PermName_Debug.Item_desc', '', 'Admin')",
	'DEBUG.LIST' => "(DEFAULT, 'DEBUG.LIST', 'lu_PermName_Debug.List_desc', '', 'Admin')",
	'DEBUG.INFO' => "(DEFAULT, 'DEBUG.INFO', 'lu_PermName_Debug.Info_desc', '', 'Admin')",
	'PROFILE.MODIFY' => "(DEFAULT, 'PROFILE.MODIFY', 'lu_PermName_Profile.Modify_desc', '', 'Admin')",
	'SHOWLANG' => "(DEFAULT, 'SHOWLANG', 'lu_PermName_ShowLang_desc', '', 'Admin')",
	'FAVORITES' => "(DEFAULT, 'FAVORITES', 'lu_PermName_favorites_desc', 'lu_PermName_favorites_error', 'In-Portal')",
	'SYSTEM_ACCESS.READONLY' => "(DEFAULT, 'SYSTEM_ACCESS.READONLY', 'la_PermName_SystemAccess.ReadOnly_desc', 'la_PermName_SystemAccess.ReadOnly_error', 'Admin')",
	),
	),

	'Permissions' => Array (
	'UniqueField' => 'Permission;GroupId;Type;CatId',
	'Records' => Array (
	'LOGIN;12;1;0' => "(DEFAULT, 'LOGIN', 12, 1, 1, 0)",
	'in-portal:site.view;11;1;0' => "(DEFAULT, 'in-portal:site.view', 11, 1, 1, 0)",
	'in-portal:browse.view;11;1;0' => "(DEFAULT, 'in-portal:browse.view', 11, 1, 1, 0)",
	'in-portal:advanced_view.view;11;1;0' => "(DEFAULT, 'in-portal:advanced_view.view', 11, 1, 1, 0)",
	'in-portal:reviews.view;11;1;0' => "(DEFAULT, 'in-portal:reviews.view', 11, 1, 1, 0)",
	'in-portal:configure_categories.view;11;1;0' => "(DEFAULT, 'in-portal:configure_categories.view', 11, 1, 1, 0)",
	'in-portal:configure_categories.edit;11;1;0' => "(DEFAULT, 'in-portal:configure_categories.edit', 11, 1, 1, 0)",
	'in-portal:configuration_search.view;11;1;0' => "(DEFAULT, 'in-portal:configuration_search.view', 11, 1, 1, 0)",
	'in-portal:configuration_search.edit;11;1;0' => "(DEFAULT, 'in-portal:configuration_search.edit', 11, 1, 1, 0)",
	'in-portal:configuration_email.view;11;1;0' => "(DEFAULT, 'in-portal:configuration_email.view', 11, 1, 1, 0)",
	'in-portal:configuration_email.edit;11;1;0' => "(DEFAULT, 'in-portal:configuration_email.edit', 11, 1, 1, 0)",
	'in-portal:configuration_custom.view;11;1;0' => "(DEFAULT, 'in-portal:configuration_custom.view', 11, 1, 1, 0)",
	'in-portal:configuration_custom.add;11;1;0' => "(DEFAULT, 'in-portal:configuration_custom.add', 11, 1, 1, 0)",
	'in-portal:configuration_custom.edit;11;1;0' => "(DEFAULT, 'in-portal:configuration_custom.edit', 11, 1, 1, 0)",
	'in-portal:configuration_custom.delete;11;1;0' => "(DEFAULT, 'in-portal:configuration_custom.delete', 11, 1, 1, 0)",
	'in-portal:users.view;11;1;0' => "(DEFAULT, 'in-portal:users.view', 11, 1, 1, 0)",
	'in-portal:user_list.advanced:ban;11;1;0' => "(DEFAULT, 'in-portal:user_list.advanced:ban', 11, 1, 1, 0)",
	'in-portal:user_list.advanced:send_email;11;1;0' => "(DEFAULT, 'in-portal:user_list.advanced:send_email', 11, 1, 1, 0)",
	'in-portal:user_groups.view;11;1;0' => "(DEFAULT, 'in-portal:user_groups.view', 11, 1, 1, 0)",
	'in-portal:user_groups.add;11;1;0' => "(DEFAULT, 'in-portal:user_groups.add', 11, 1, 1, 0)",
	'in-portal:user_groups.edit;11;1;0' => "(DEFAULT, 'in-portal:user_groups.edit', 11, 1, 1, 0)",
	'in-portal:user_groups.delete;11;1;0' => "(DEFAULT, 'in-portal:user_groups.delete', 11, 1, 1, 0)",
	'in-portal:user_groups.advanced:send_email;11;1;0' => "(DEFAULT, 'in-portal:user_groups.advanced:send_email', 11, 1, 1, 0)",
	'in-portal:user_groups.advanced:manage_permissions;11;1;0' => "(DEFAULT, 'in-portal:user_groups.advanced:manage_permissions', 11, 1, 1, 0)",
	'in-portal:configure_users.view;11;1;0' => "(DEFAULT, 'in-portal:configure_users.view', 11, 1, 1, 0)",
	'in-portal:configure_users.edit;11;1;0' => "(DEFAULT, 'in-portal:configure_users.edit', 11, 1, 1, 0)",
	'in-portal:user_email.view;11;1;0' => "(DEFAULT, 'in-portal:user_email.view', 11, 1, 1, 0)",
	'in-portal:user_email.edit;11;1;0' => "(DEFAULT, 'in-portal:user_email.edit', 11, 1, 1, 0)",
	'in-portal:user_custom.view;11;1;0' => "(DEFAULT, 'in-portal:user_custom.view', 11, 1, 1, 0)",
	'in-portal:user_custom.add;11;1;0' => "(DEFAULT, 'in-portal:user_custom.add', 11, 1, 1, 0)",
	'in-portal:user_custom.edit;11;1;0' => "(DEFAULT, 'in-portal:user_custom.edit', 11, 1, 1, 0)",
	'in-portal:user_custom.delete;11;1;0' => "(DEFAULT, 'in-portal:user_custom.delete', 11, 1, 1, 0)",
	'in-portal:user_banlist.view;11;1;0' => "(DEFAULT, 'in-portal:user_banlist.view', 11, 1, 1, 0)",
	'in-portal:user_banlist.add;11;1;0' => "(DEFAULT, 'in-portal:user_banlist.add', 11, 1, 1, 0)",
	'in-portal:user_banlist.edit;11;1;0' => "(DEFAULT, 'in-portal:user_banlist.edit', 11, 1, 1, 0)",
	'in-portal:user_banlist.delete;11;1;0' => "(DEFAULT, 'in-portal:user_banlist.delete', 11, 1, 1, 0)",
	'in-portal:reports.view;11;1;0' => "(DEFAULT, 'in-portal:reports.view', 11, 1, 1, 0)",
	'in-portal:log_summary.view;11;1;0' => "(DEFAULT, 'in-portal:log_summary.view', 11, 1, 1, 0)",
	'in-portal:searchlog.view;11;1;0' => "(DEFAULT, 'in-portal:searchlog.view', 11, 1, 1, 0)",
	'in-portal:searchlog.delete;11;1;0' => "(DEFAULT, 'in-portal:searchlog.delete', 11, 1, 1, 0)",
	'in-portal:sessionlog.view;11;1;0' => "(DEFAULT, 'in-portal:sessionlog.view', 11, 1, 1, 0)",
	'in-portal:sessionlog.delete;11;1;0' => "(DEFAULT, 'in-portal:sessionlog.delete', 11, 1, 1, 0)",
	'in-portal:emaillog.view;11;1;0' => "(DEFAULT, 'in-portal:emaillog.view', 11, 1, 1, 0)",
	'in-portal:emaillog.delete;11;1;0' => "(DEFAULT, 'in-portal:emaillog.delete', 11, 1, 1, 0)",
	'in-portal:visits.view;11;1;0' => "(DEFAULT, 'in-portal:visits.view', 11, 1, 1, 0)",
	'in-portal:visits.delete;11;1;0' => "(DEFAULT, 'in-portal:visits.delete', 11, 1, 1, 0)",
	'in-portal:configure_general.view;11;1;0' => "(DEFAULT, 'in-portal:configure_general.view', 11, 1, 1, 0)",
	'in-portal:configure_general.edit;11;1;0' => "(DEFAULT, 'in-portal:configure_general.edit', 11, 1, 1, 0)",
	'in-portal:modules.view;11;1;0' => "(DEFAULT, 'in-portal:modules.view', 11, 1, 1, 0)",
	'in-portal:mod_status.view;11;1;0' => "(DEFAULT, 'in-portal:mod_status.view', 11, 1, 1, 0)",
	'in-portal:mod_status.edit;11;1;0' => "(DEFAULT, 'in-portal:mod_status.edit', 11, 1, 1, 0)",
	'in-portal:mod_status.advanced:approve;11;1;0' => "(DEFAULT, 'in-portal:mod_status.advanced:approve', 11, 1, 1, 0)",
	'in-portal:mod_status.advanced:decline;11;1;0' => "(DEFAULT, 'in-portal:mod_status.advanced:decline', 11, 1, 1, 0)",
	'in-portal:addmodule.view;11;1;0' => "(DEFAULT, 'in-portal:addmodule.view', 11, 1, 1, 0)",
	'in-portal:addmodule.add;11;1;0' => "(DEFAULT, 'in-portal:addmodule.add', 11, 1, 1, 0)",
	'in-portal:addmodule.edit;11;1;0' => "(DEFAULT, 'in-portal:addmodule.edit', 11, 1, 1, 0)",
	'in-portal:tag_library.view;11;1;0' => "(DEFAULT, 'in-portal:tag_library.view', 11, 1, 1, 0)",
	'in-portal:configure_themes.view;11;1;0' => "(DEFAULT, 'in-portal:configure_themes.view', 11, 1, 1, 0)",
	'in-portal:configure_themes.add;11;1;0' => "(DEFAULT, 'in-portal:configure_themes.add', 11, 1, 1, 0)",
	'in-portal:configure_themes.edit;11;1;0' => "(DEFAULT, 'in-portal:configure_themes.edit', 11, 1, 1, 0)",
	'in-portal:configure_themes.delete;11;1;0' => "(DEFAULT, 'in-portal:configure_themes.delete', 11, 1, 1, 0)",
	'in-portal:configure_styles.view;11;1;0' => "(DEFAULT, 'in-portal:configure_styles.view', 11, 1, 1, 0)",
	'in-portal:configure_styles.add;11;1;0' => "(DEFAULT, 'in-portal:configure_styles.add', 11, 1, 1, 0)",
	'in-portal:configure_styles.edit;11;1;0' => "(DEFAULT, 'in-portal:configure_styles.edit', 11, 1, 1, 0)",
	'in-portal:configure_styles.delete;11;1;0' => "(DEFAULT, 'in-portal:configure_styles.delete', 11, 1, 1, 0)",
	'in-portal:configure_lang.advanced:set_primary;11;1;0' => "(DEFAULT, 'in-portal:configure_lang.advanced:set_primary', 11, 1, 1, 0)",
	'in-portal:configure_lang.advanced:import;11;1;0' => "(DEFAULT, 'in-portal:configure_lang.advanced:import', 11, 1, 1, 0)",
	'in-portal:configure_lang.advanced:export;11;1;0' => "(DEFAULT, 'in-portal:configure_lang.advanced:export', 11, 1, 1, 0)",
	'in-portal:tools.view;11;1;0' => "(DEFAULT, 'in-portal:tools.view', 11, 1, 1, 0)",
	'in-portal:backup.view;11;1;0' => "(DEFAULT, 'in-portal:backup.view', 11, 1, 1, 0)",
	'in-portal:restore.view;11;1;0' => "(DEFAULT, 'in-portal:restore.view', 11, 1, 1, 0)",
	'in-portal:export.view;11;1;0' => "(DEFAULT, 'in-portal:export.view', 11, 1, 1, 0)",
	'in-portal:main_import.view;11;1;0' => "(DEFAULT, 'in-portal:main_import.view', 11, 1, 1, 0)",
	'in-portal:sql_query.view;11;1;0' => "(DEFAULT, 'in-portal:sql_query.view', 11, 1, 1, 0)",
	'in-portal:sql_query.edit;11;1;0' => "(DEFAULT, 'in-portal:sql_query.edit', 11, 1, 1, 0)",
	'in-portal:server_info.view;11;1;0' => "(DEFAULT, 'in-portal:server_info.view', 11, 1, 1, 0)",
	'in-portal:help.view;11;1;0' => "(DEFAULT, 'in-portal:help.view', 11, 1, 1, 0)",
	),
	),

	'SearchConfig' => Array (
	'UniqueField' => 'TableName;FieldName;ModuleName',
	'Records' => Array (
	'Category;NewItem;In-Portal' => "('Category', 'NewItem', 0, 1, 'lu_fielddesc_category_newitem', 'lu_field_newitem', 'In-Portal', 'la_text_category', 18, DEFAULT, 0, 'boolean', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;PopItem;In-Portal' => "('Category', 'PopItem', 0, 1, 'lu_fielddesc_category_popitem', 'lu_field_popitem', 'In-Portal', 'la_text_category', 19, DEFAULT, 0, 'boolean', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;HotItem;In-Portal' => "('Category', 'HotItem', 0, 1, 'lu_fielddesc_category_hotitem', 'lu_field_hotitem', 'In-Portal', 'la_text_category', 17, DEFAULT, 0, 'boolean', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;MetaDescription;In-Portal' => "('Category', 'MetaDescription', 0, 1, 'lu_fielddesc_category_metadescription', 'lu_field_metadescription', 'In-Portal', 'la_text_category', 16, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;ParentPath;In-Portal' => "('Category', 'ParentPath', 0, 1, 'lu_fielddesc_category_parentpath', 'lu_field_parentpath', 'In-Portal', 'la_text_category', 15, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;ResourceId;In-Portal' => "('Category', 'ResourceId', 0, 1, 'lu_fielddesc_category_resourceid', 'lu_field_resourceid', 'In-Portal', 'la_text_category', 14, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;CreatedById;In-Portal' => "('Category', 'CreatedById', 0, 1, 'lu_fielddesc_category_createdbyid', 'lu_field_createdbyid', 'In-Portal', 'la_text_category', 13, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;CachedNavbar;In-Portal' => "('Category', 'CachedNavbar', 0, 1, 'lu_fielddesc_category_cachednavbar', 'lu_field_cachednavbar', 'In-Portal', 'la_text_category', 12, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;CachedDescendantCatsQty;In-Portal' => "('Category', 'CachedDescendantCatsQty', 0, 1, 'lu_fielddesc_category_cacheddescendantcatsqty', 'lu_field_cacheddescendantcatsqty', 'In-Portal', 'la_text_category', 11, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;MetaKeywords;In-Portal' => "('Category', 'MetaKeywords', 0, 1, 'lu_fielddesc_category_metakeywords', 'lu_field_metakeywords', 'In-Portal', 'la_text_category', 10, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;Priority;In-Portal' => "('Category', 'Priority', 0, 1, 'lu_fielddesc_category_priority', 'lu_field_priority', 'In-Portal', 'la_text_category', 9, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;Status;In-Portal' => "('Category', 'Status', 0, 1, 'lu_fielddesc_category_status', 'lu_field_status', 'In-Portal', 'la_text_category', 7, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;EditorsPick;In-Portal' => "('Category', 'EditorsPick', 0, 1, 'lu_fielddesc_category_editorspick', 'lu_field_editorspick', 'In-Portal', 'la_text_category', 6, DEFAULT, 0, 'boolean', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;CreatedOn;In-Portal' => "('Category', 'CreatedOn', 0, 1, 'lu_fielddesc_category_createdon', 'lu_field_createdon', 'In-Portal', 'la_text_category', 5, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;Description;In-Portal' => "('Category', 'Description', 1, 1, 'lu_fielddesc_category_description', 'lu_field_description', 'In-Portal', 'la_text_category', 4, DEFAULT, 2, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;Name;In-Portal' => "('Category', 'Name', 1, 1, 'lu_fielddesc_category_name', 'lu_field_name', 'In-Portal', 'la_text_category', 3, DEFAULT, 2, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;ParentId;In-Portal' => "('Category', 'ParentId', 0, 1, 'lu_fielddesc_category_parentid', 'lu_field_parentid', 'In-Portal', 'la_text_category', 2, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;CategoryId;In-Portal' => "('Category', 'CategoryId', 0, 1, 'lu_fielddesc_category_categoryid', 'lu_field_categoryid', 'In-Portal', 'la_text_category', 0, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;Modified;In-Portal' => "('Category', 'Modified', 0, 1, 'lu_fielddesc_category_modified', 'lu_field_modified', 'In-Portal', 'la_text_category', 20, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'Category;ModifiedById;In-Portal' => "('Category', 'ModifiedById', 0, 1, 'lu_fielddesc_category_modifiedbyid', 'lu_field_modifiedbyid', 'In-Portal', 'la_text_category', 21, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",

	'PortalUser;PortalUserId;In-Portal' => "('PortalUser', 'PortalUserId', -1, 0, 'lu_fielddesc_user_portaluserid', 'lu_field_portaluserid', 'In-Portal', 'la_text_user', 0, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Login;In-Portal' => "('PortalUser', 'Login', -1, 0, 'lu_fielddesc_user_login', 'lu_field_login', 'In-Portal', 'la_text_user', 1, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Password;In-Portal' => "('PortalUser', 'Password', -1, 0, 'lu_fielddesc_user_password', 'lu_field_password', 'In-Portal', 'la_text_user', 2, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;tz;In-Portal' => "('PortalUser', 'tz', -1, 0, 'lu_fielddesc_user_tz', 'lu_field_tz', 'In-Portal', 'la_text_user', 17, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;dob;In-Portal' => "('PortalUser', 'dob', -1, 0, 'lu_fielddesc_user_dob', 'lu_field_dob', 'In-Portal', 'la_text_user', 16, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Modified;In-Portal' => "('PortalUser', 'Modified', -1, 0, 'lu_fielddesc_user_modified', 'lu_field_modified', 'In-Portal', 'la_text_user', 15, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Status;In-Portal' => "('PortalUser', 'Status', -1, 0, 'lu_fielddesc_user_status', 'lu_field_status', 'In-Portal', 'la_text_user', 14, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;ResourceId;In-Portal' => "('PortalUser', 'ResourceId', -1, 0, 'lu_fielddesc_user_resourceid', 'lu_field_resourceid', 'In-Portal', 'la_text_user', 13, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Country;In-Portal' => "('PortalUser', 'Country', -1, 0, 'lu_fielddesc_user_country', 'lu_field_country', 'In-Portal', 'la_text_user', 12, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Zip;In-Portal' => "('PortalUser', 'Zip', -1, 0, 'lu_fielddesc_user_zip', 'lu_field_zip', 'In-Portal', 'la_text_user', 11, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;State;In-Portal' => "('PortalUser', 'State', -1, 0, 'lu_fielddesc_user_state', 'lu_field_state', 'In-Portal', 'la_text_user', 10, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;City;In-Portal' => "('PortalUser', 'City', -1, 0, 'lu_fielddesc_user_city', 'lu_field_city', 'In-Portal', 'la_text_user', 9, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Street;In-Portal' => "('PortalUser', 'Street', -1, 0, 'lu_fielddesc_user_street', 'lu_field_street', 'In-Portal', 'la_text_user', 8, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Phone;In-Portal' => "('PortalUser', 'Phone', -1, 0, 'lu_fielddesc_user_phone', 'lu_field_phone', 'In-Portal', 'la_text_user', 7, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;CreatedOn;In-Portal' => "('PortalUser', 'CreatedOn', -1, 0, 'lu_fielddesc_user_createdon', 'lu_field_createdon', 'In-Portal', 'la_text_user', 6, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;Email;In-Portal' => "('PortalUser', 'Email', -1, 0, 'lu_fielddesc_user_email', 'lu_field_email', 'In-Portal', 'la_text_user', 5, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;LastName;In-Portal' => "('PortalUser', 'LastName', -1, 0, 'lu_fielddesc_user_lastname', 'lu_field_lastname', 'In-Portal', 'la_text_user', 4, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	'PortalUser;FirstName;In-Portal' => "('PortalUser', 'FirstName', -1, 0, 'lu_fielddesc_user_firstname', 'lu_field_firstname', 'In-Portal', 'la_text_user', 3, DEFAULT, 0, 'text', NULL, NULL, NULL, NULL, NULL, NULL, NULL)",
	),
	),

	'StatItem' => Array (
	'UniqueField' => 'Module;ListLabel',
	'Records' => Array (
	'In-Portal;la_prompt_ActiveCategories' => "(DEFAULT, 'In-Portal', 'SELECT count(*) FROM <%prefix%>Category WHERE Status=1 ', NULL, 'la_prompt_ActiveCategories', '0', '1')",
	'In-Portal;la_prompt_ActiveUsers' => "(DEFAULT, 'In-Portal', 'SELECT count(*) FROM <%prefix%>PortalUser WHERE Status=1 ', NULL, 'la_prompt_ActiveUsers', '0', '1')",
	'In-Portal;la_prompt_CurrentSessions' => "(DEFAULT, 'In-Portal', 'SELECT count(*) FROM <%prefix%>UserSession', NULL, 'la_prompt_CurrentSessions', '0', '1')",
	'In-Portal;la_prompt_TotalCategories' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) as CategoryCount FROM <%prefix%>Category', NULL, 'la_prompt_TotalCategories', 0, 2)",
	'In-Portal;la_prompt_ActiveCategories' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS ActiveCategories FROM <%prefix%>Category WHERE Status = 1', NULL, 'la_prompt_ActiveCategories', 0, 2)",
	'In-Portal;la_prompt_PendingCategories' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS PendingCategories FROM <%prefix%>Category WHERE Status = 2', NULL, 'la_prompt_PendingCategories', 0, 2)",
	'In-Portal;la_prompt_DisabledCategories' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS DisabledCategories FROM <%prefix%>Category WHERE Status = 0', NULL, 'la_prompt_DisabledCategories', 0, 2)",
	'In-Portal;la_prompt_NewCategories' => "(DEFAULT, 'In-Portal', 'SELECT COUNT() AS NewCategories FROM <%prefix%>Category WHERE (NewItem = 1) OR ( (UNIX_TIMESTAMP() - CreatedOn) <= <%m:config name=\"Category_DaysNew\"%>86400 AND (NewItem = 2) )', NULL, 'la_prompt_NewCategories', 0, 2)",
	'In-Portal;la_prompt_CategoryEditorsPick' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) FROM <%prefix%>Category WHERE EditorsPick = 1', NULL, 'la_prompt_CategoryEditorsPick', 0, 2)",
	'In-Portal;la_prompt_NewestCategoryDate' => "(DEFAULT, 'In-Portal', 'SELECT <%m:post_format field=\"MAX(CreatedOn)\" type=\"date\"%> FROM <%prefix%>Category', NULL, 'la_prompt_NewestCategoryDate', 0, 2)",
	'In-Portal;la_prompt_LastCategoryUpdate' => "(DEFAULT, 'In-Portal', 'SELECT <%m:post_format field=\"MAX(Modified)\" type=\"date\"%> FROM <%prefix%>Category', NULL, 'la_prompt_LastCategoryUpdate', 0, 2)",
	'In-Portal;la_prompt_TopicsUsers' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS TotalUsers FROM <%prefix%>PortalUser', NULL, 'la_prompt_TopicsUsers', 0, 2)",
	'In-Portal;la_prompt_UsersActive' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS ActiveUsers FROM <%prefix%>PortalUser WHERE Status = 1', NULL, 'la_prompt_UsersActive', 0, 2)",
	'In-Portal;la_prompt_UsersPending' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS PendingUsers FROM <%prefix%>PortalUser WHERE Status = 2', NULL, 'la_prompt_UsersPending', 0, 2)",
	'In-Portal;la_prompt_UsersDisabled' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS DisabledUsers FROM <%prefix%>PortalUser WHERE Status = 0', NULL, 'la_prompt_UsersDisabled', 0, 2)",
	'In-Portal;la_prompt_NewestUserDate' => "(DEFAULT, 'In-Portal', 'SELECT <%m:post_format field=\"MAX(CreatedOn)\" type=\"date\"%> FROM <%prefix%>PortalUser', NULL, 'la_prompt_NewestUserDate', 0, 2)",
	'In-Portal;la_prompt_UsersUniqueCountries' => "(DEFAULT, 'In-Portal', 'SELECT COUNT( DISTINCT LOWER( Country ) ) FROM <%prefix%>PortalUser WHERE LENGTH(Country) > 0', NULL, 'la_prompt_UsersUniqueCountries', 0, 2)",
	'In-Portal;la_prompt_UsersUniqueStates' => "(DEFAULT, 'In-Portal', 'SELECT COUNT( DISTINCT LOWER( State ) ) FROM <%prefix%>PortalUser WHERE LENGTH(State) > 0', NULL, 'la_prompt_UsersUniqueStates', 0, 2)",
	'In-Portal;la_prompt_TotalUserGroups' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS TotalUserGroups FROM <%prefix%>PortalGroup', NULL, 'la_prompt_TotalUserGroups', 0, 2)",
	'In-Portal;la_prompt_BannedUsers' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS BannedUsers FROM <%prefix%>PortalUser WHERE IsBanned = 1', NULL, 'la_prompt_BannedUsers', 0, 2)",
	'In-Portal;la_prompt_NonExpiredSessions' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS NonExipedSessions FROM <%prefix%>UserSession WHERE Status = 1', NULL, 'la_prompt_NonExpiredSessions', 0, 2)",
	'In-Portal;la_prompt_ThemeCount' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS ThemeCount FROM <%prefix%>Theme', NULL, 'la_prompt_ThemeCount', 0, 2)",
	'In-Portal;la_prompt_RegionsCount' => "(DEFAULT, 'In-Portal', 'SELECT COUNT(*) AS RegionsCount FROM <%prefix%>Language', NULL, 'la_prompt_RegionsCount', 0, 2)",
	'In-Portal;la_prompt_TablesCount' => "(DEFAULT, 'In-Portal', '<%m:sql_action sql=\"SHOW+TABLES\" action=\"COUNT\" field=\"*\"%>', NULL, 'la_prompt_TablesCount', 0, 2)",
	'In-Portal;la_prompt_RecordsCount' => "(DEFAULT, 'In-Portal', '<%m:sql_action sql=\"SHOW+TABLE+STATUS\" action=\"SUM\" field=\"Rows\"%>', NULL, 'la_prompt_RecordsCount', 0, 2)",
	'In-Portal;la_prompt_SystemFileSize' => "(DEFAULT, 'In-Portal', '<%m:custom_action sql=\"empty\" action=\"SysFileSize\"%>', NULL, 'la_prompt_SystemFileSize', 0, 2)",
	'In-Portal;la_prompt_DataSize' => "(DEFAULT, 'In-Portal', '<%m:sql_action sql=\"SHOW+TABLE+STATUS\" action=\"SUM\" format_as=\"file\" field=\"Data_length\"%>', NULL, 'la_prompt_DataSize', 0, 2)",
	),
	),

	'StylesheetSelectors' => Array (
	'UniqueField' => 'SelectorId',
	'Records' => Array (
	'169' => "(169, 8, 'Calendar''s selected days', '.calendar tbody .selected', 'a:0:{}', '', 1, 'font-weight: bold;\\\r\\nbackground-color: #9ED7ED;\\r\\nborder: 1px solid #83B2C5;', 0)",
	'118' => "(118, 8, 'Data grid row', 'td.block-data-row', 'a:0:{}', '', 2, 'border-bottom: 1px solid #cccccc;', 48)",
	'81' => "(81, 8, '\"More\" link', 'a.link-more', 'a:0:{}', '', 2, 'text-decoration: underline;', 64)",
	'88' => "(88, 8, 'Block data, separated rows', 'td.block-data-grid', 'a:0:{}', '', 2, 'border: 1px solid #cccccc;', 48)",
	'42' => "(42, 8, 'Block Header', 'td.block-header', 'a:4:{s:5:\"color\";s:16:\"rgb(0, 159, 240)\";s:9:\"font-size\";s:4:\"20px\";s:11:\"font-weight\";s:6:\"normal\";s:7:\"padding\";s:3:\"5px\";}', 'Block Header', 1, 'font-family: Verdana, Helvetica, sans-serif;', 0)",
	'76' => "(76, 8, 'Navigation bar menu', 'tr.head-nav td', 'a:0:{}', '', 1, 'vertical-align: middle;', 0)",
	'48' => "(48, 8, 'Block data', 'td.block-data', 'a:2:{s:9:\"font-size\";s:5:\"12px;\";s:7:\"padding\";s:3:\"5px\";}', '', 1, '', 0)",
	'78' => "(78, 8, 'Body main style', 'body', 'a:0:{}', '', 1, 'padding: 0px; \\r\\nbackground-color: #ffffff; \\r\\nfont-family: arial, verdana, helvetica; \\r\\nfont-size: small;\\r\\nwidth: auto;\\r\\nmargin: 0px;', 0)",
	'58' => "(58, 8, 'Main table', 'table.main-table', 'a:0:{}', '', 1, 'width: 770px;\\r\\nmargin: 0px;\\r\\n/table-layout: fixed;/', 0)",
	'79' => "(79, 8, 'Block: header of data block', 'span.block-data-grid-header', 'a:0:{}', '', 1, 'font-family: Arial, Helvetica, sans-serif;\\r\\ncolor: #009DF6;\\r\\nfont-size: 12px;\\r\\nfont-weight: bold;\\r\\nbackground-color: #E6EEFF;\\r\\npadding: 6px;\\r\\nwhite-space: nowrap;', 0)",
	'64' => "(64, 8, 'Link', 'a', 'a:0:{}', '', 1, '', 0)",
	'46' => "(46, 8, 'Product title link', 'a.link-product1', 'a:0:{}', 'Product title link', 1, 'color: #62A1DE;\\r\\nfont-size: 14px;\\r\\nfont-weight: bold;\\r\\nline-height: 20px;\\r\\npadding-bottom: 10px;', 0)",
	'75' => "(75, 8, 'Copy of Main path link', 'table.main-path td a:hover', 'a:0:{}', '', 1, 'color: #ffffff;', 0)",
	'160' => "(160, 8, 'Current item in navigation bar', '.checkout-step-current', 'a:0:{}', '', 1, 'color: #A20303;\\r\\nfont-weight: bold;', 0)",
	'51' => "(51, 8, 'Right block data', 'td.right-block-data', 'a:1:{s:9:\"font-size\";s:4:\"11px\";}', '', 2, 'padding: 7px;\\r\\nbackground: #e3edf6 url(\"/in-commerce4/themes/default/img/bgr_login.jpg\") repeat-y scroll left top;\\r\\nborder-bottom: 1px solid #64a1df;', 48)",
	'67' => "(67, 8, 'Pagination bar: text', 'table.block-pagination td', 'a:3:{s:5:\"color\";s:7:\"#8B898B\";s:9:\"font-size\";s:4:\"12px\";s:11:\"font-weight\";s:6:\"normal\";}', '', 1, '', 0)",
	'45' => "(45, 8, 'Category link', 'a.subcat', 'a:0:{}', 'Category link', 1, 'color: #2069A4', 0)",
	'68' => "(68, 8, 'Pagination bar: link', 'table.block-pagination td a', 'a:3:{s:5:\"color\";s:7:\"#8B898B\";s:9:\"font-size\";s:5:\"12px;\";s:11:\"font-weight\";s:6:\"normal\";}', '', 1, '', 0)",
	'69' => "(69, 8, 'Product description in product list', '.product-list-description', 'a:2:{s:5:\"color\";s:7:\"#8B898B\";s:9:\"font-size\";s:4:\"12px\";}', '', 1, '', 0)",
	'73' => "(73, 8, 'Main path link', 'table.main-path td a', 'a:0:{}', '', 1, 'color: #d5e231;', 0)",
	'83' => "(83, 8, 'Product title link in list (shopping cart)', 'a.link-product-cart', 'a:0:{}', 'Product title link', 1, 'color: #18559C;\\r\\nfont-size: 12px;\\r\\nfont-weight: bold;\\r\\ntext-decoration: none;\\r\\n\\r\\n', 0)",
	'72' => "(72, 8, 'Main path block text', 'table.main-path td', 'a:0:{}', '', 1, 'color: #ffffff;\\r\\nfont-size: 10px;\\r\\nfont-weight: normal;\\r\\npadding: 1px;\\r\\n', 0)",
	'61' => "(61, 8, 'Block: header of data table', 'td.block-data-grid-header', 'a:6:{s:4:\"font\";s:28:\"Arial, Helvetica, sans-serif\";s:5:\"color\";s:7:\"#009DF6\";s:9:\"font-size\";s:4:\"12px\";s:11:\"font-weight\";s:4:\"bold\";s:16:\"background-color\";s:7:\"#E6EEFF\";s:7:\"padding\";s:3:\"6px\";}', '', 1, 'white-space: nowrap;\\r\\npadding-left: 10px;\\r\\n/\\r\\nbackground-image: url(/in-commerce4/themes/default/img/bullet1.gif);\\r\\nbackground-position: 10px 12px;\\r\\nbackground-repeat: no-repeat;\\r\\n/', 0)",
	'65' => "(65, 8, 'Link in product list additional row', 'td.product-list-additional a', 'a:1:{s:5:\"color\";s:7:\"#8B898B\";}', '', 2, '', 64)",
	'55' => "(55, 8, 'Main table, left column', 'td.main-column-left', 'a:0:{}', '', 1, 'width:180px;\\r\\nborder: 1px solid #62A1DE;\\r\\nborder-top: 0px;', 0)",
	'70' => "(70, 8, 'Product title link in list (category)', 'a.link-product-category', 'a:0:{}', 'Product title link', 1, 'color: #18559C;\\r\\nfont-size: 12px;\\r\\nfont-weight: bold;\\r\\ntext-decoration: none;\\r\\n\\r\\n', 0)",
	'66' => "(66, 8, 'Pagination bar block', 'table.block-pagination', 'a:0:{}', '', 1, '', 0)",
	'49' => "(49, 8, 'Bulleted list inside block', 'td.block-data ul li', 'a:0:{}', '', 1, ' list-style-image: url(/in-commerce4/themes/default/img/bullet2.gif);\\r\\n margin-bottom: 10px;\\r\\n font-size: 11px;', 0)",
	'87' => "(87, 8, 'Cart item input form element', 'td.cart-item-atributes input', 'a:0:{}', '', 1, 'border: 1px solid #7BB2E6;', 0)",
	'119' => "(119, 8, 'Data grid row header', 'td.block-data-row-hdr', 'a:0:{}', 'Used in order preview', 2, 'background-color: #eeeeee;\\r\\nborder-bottom: 1px solid #dddddd;\\r\\nborder-top: 1px solid #cccccc;\\r\\nfont-weight: bold;', 48)",
	'82' => "(82, 8, '\"More\" link image', 'a.link-more img', 'a:0:{}', '', 2, 'text-decoration: none;\\r\\npadding-left: 5px;', 64)",
	'63' => "(63, 8, 'Additional info under product description in list', 'td.product-list-additional', 'a:5:{s:5:\"color\";s:7:\"#8B898B\";s:9:\"font-size\";s:4:\"11px\";s:11:\"font-weight\";s:6:\"normal\";s:10:\"border-top\";s:18:\"1px dashed #8B898B\";s:13:\"border-bottom\";s:18:\"1px dashed #8B898B\";}', '', 2, '', 48)",
	'43' => "(43, 8, 'Block', 'table.block', 'a:2:{s:16:\"background-color\";s:7:\"#E3EEF9\";s:6:\"border\";s:17:\"1px solid #64A1DF\";}', 'Block', 1, 'border: 0; \\r\\nmargin-bottom: 1px;\\r\\nwidth: 100%;', 0)",
	'84' => "(84, 8, 'Cart item cell', 'td.cart-item', 'a:0:{}', '', 1, 'background-color: #F6FAFF;\\r\\nborder-left: 1px solid #ffffff;\\r\\nborder-bottom: 1px solid #ffffff;\\r\\npadding: 4px;', 0)",
	'57' => "(57, 8, 'Main table, right column', 'td.main-column-right', 'a:0:{}', '', 1, 'width:220px;\\r\\nborder: 1px solid #62A1DE;\\r\\nborder-top: 0px;', 0)",
	'161' => "(161, 8, 'Block for sub categories', 'td.block-data-subcats', 'a:0:{}', '', 2, ' background: #FFFFFF\\r\\nurl(/in-commerce4/themes/default/in-commerce/img/bgr_categories.jpg);\\r\\n background-repeat: no-repeat;\\r\\n background-position: top right;\\r\\nborder-bottom: 5px solid #DEEAFF;\\r\\npadding-left: 10px;', 48)",
	'77' => "(77, 8, 'Left block header', 'td.left-block-header', 'a:0:{}', '', 2, 'font-family : verdana, helvetica, sans-serif;\\r\\ncolor : #ffffff;\\r\\nfont-size : 12px;\\r\\nfont-weight : bold;\\r\\ntext-decoration : none;\\r\\nbackground-color: #64a1df;\\r\\npadding: 5px;\\r\\npadding-left: 7px;', 42)",
	'80' => "(80, 8, 'Right block data - text', 'td.right-block-data td', 'a:1:{s:9:\"font-size\";s:5:\"11px;\";}', '', 2, '', 48)",
	'53' => "(53, 8, 'Right block header', 'td.right-block-header', 'a:0:{}', '', 2, 'font-family : verdana, helvetica, sans-serif;\\r\\ncolor : #ffffff;\\r\\nfont-size : 12px;\\r\\nfont-weight : bold;\\r\\ntext-decoration : none;\\r\\nbackground-color: #64a1df;\\r\\npadding: 5px;\\r\\npadding-left: 7px;', 42)",
	'85' => "(85, 8, 'Cart item cell with attributes', 'td.cart-item-attributes', 'a:0:{}', '', 1, 'background-color: #E6EEFF;\\r\\nborder-left: 1px solid #ffffff;\\r\\nborder-bottom: 1px solid #ffffff;\\r\\npadding: 4px;\\r\\ntext-align: center;\\r\\nvertical-align: middle;\\r\\nfont-size: 12px;\\r\\nfont-weight: normal;', 0)",
	'86' => "(86, 8, 'Cart item cell with name', 'td.cart-item-name', 'a:0:{}', '', 1, 'background-color: #F6FAFF;\\r\\nborder-left: 1px solid #ffffff;\\r\\nborder-bottom: 1px solid #ffffff;\\r\\npadding: 3px;', 0)",
	'47' => "(47, 8, 'Block content of featured product', 'td.featured-block-data', 'a:0:{}', '', 1, 'font-family: Arial,Helvetica,sans-serif;\\r\\nfont-size: 12px;', 0)",
	'56' => "(56, 8, 'Main table, middle column', 'td.main-column-center', 'a:0:{}', '', 1, '\\r\\n', 0)",
	'50' => "(50, 8, 'Product title link in list', 'a.link-product2', 'a:0:{}', 'Product title link', 1, 'color: #62A1DE;\\r\\nfont-size: 12px;\\r\\nfont-weight: bold;\\r\\ntext-decoration: none;\\r\\n\\r\\n', 0)",
	'71' => "(71, 8, 'Main path block', 'table.main-path', 'a:0:{}', '', 1, 'background: #61b0ec url(\"/in-commerce4/themes/default/img/bgr_path.jpg\") repeat-y scroll left top;\\r\\nwidth: 100%;\\r\\nmargin-bottom: 1px;\\r\\nmargin-right: 1px; \\r\\nmargin-left: 1px;', 0)",
	'62' => "(62, 8, 'Block: columns header for data table', 'table.block-no-border th', 'a:6:{s:4:\"font\";s:28:\"Arial, Helvetica, sans-serif\";s:5:\"color\";s:7:\"#18559C\";s:9:\"font-size\";s:4:\"11px\";s:11:\"font-weight\";s:4:\"bold\";s:16:\"background-color\";s:7:\"#B4D2EE\";s:7:\"padding\";s:3:\"6px\";}', '', 1, 'text-align: left;', 0)",
	'59' => "(59, 8, 'Block without border', 'table.block-no-border', 'a:0:{}', '', 1, 'border: 0px; \\r\\nmargin-bottom: 10px;\\r\\nwidth: 100%;', 0)",
	'74' => "(74, 8, 'Main path language selector cell', 'td.main-path-language', 'a:0:{}', '', 1, 'vertical-align: middle;\\r\\ntext-align: right;\\r\\npadding-right: 6px;', 0)",
	'171' => "(171, 8, 'Calendar''s highlighted day', '.calendar tbody .hilite', 'a:0:{}', '', 1, 'background-color: #f6f6f6;\\r\\nborder: 1px solid #83B2C5 !important;', 0)",
	'175' => "(175, 8, 'Calendar''s days', '.calendar tbody .day', 'a:0:{}', '', 1, 'text-align: right;\\r\\npadding: 2px 4px 2px 2px;\\r\\nwidth: 2em;\\r\\nborder: 1px solid #fefefe;', 0)",
	'170' => "(170, 8, 'Calendar''s weekends', '.calendar .weekend', 'a:0:{}', '', 1, 'color: #990000;', 0)",
	'173' => "(173, 8, 'Calendar''s control buttons', '.calendar .calendar_button', 'a:0:{}', '', 1, 'color: black;\\r\\nfont-size: 12px;\\r\\nbackground-color: #eeeeee;', 0)",
	'174' => "(174, 8, 'Calendar''s day names', '.calendar thead .name', 'a:0:{}', '', 1, 'background-color: #DEEEF6;\\r\\nborder-bottom: 1px solid #000000;', 0)",
	'172' => "(172, 8, 'Calendar''s top and bottom titles', '.calendar .title', 'a:0:{}', '', 1, 'color: #FFFFFF;\\r\\nbackground-color: #62A1DE;\\r\\nborder: 1px solid #107DC5;\\r\\nborder-top: 0px;\\r\\npadding: 1px;', 0)",
	'60' => "(60, 8, 'Block header for featured product', 'td.featured-block-header', 'a:0:{}', '', 2, '\\r\\n', 42)",
	'54' => "(54, 8, 'Right block', 'table.right-block', 'a:0:{}', '', 2, 'background-color: #E3EEF9;\\r\\nborder: 0px;\\r\\nwidth: 100%;', 43)",
	'44' => "(44, 8, 'Block content', 'td.block-data-big', 'a:0:{}', 'Block content', 1, ' background: #DEEEF6\\r\\nurl(/in-commerce4/themes/default/img/menu_bg.gif);\\r\\n background-repeat: no-repeat;\\r\\n background-position: top right;\\r\\n', 0)",
	),
	),

	'Stylesheets' => Array (
	'UniqueField' => 'StylesheetId',
	'Records' => Array (
	'8' => "(8, 'Default', 'In-Portal Default Theme', '', 1124952555, 1)",
	),
	),

	'Counters' => Array (
	'UniqueField' => 'Name',
	'Records' => Array (
	'members_count' => "(DEFAULT, 'members_count', 'SELECT COUNT(*) FROM <%PREFIX%>PortalUser WHERE Status = 1', NULL , NULL , '3600', '0', '\|PortalUser\|')",
	'members_online' => "(DEFAULT, 'members_online', 'SELECT COUNT(*) FROM <%PREFIX%>UserSession WHERE PortalUserId > 0', NULL , NULL , '3600', '0', '\|UserSession\|')",
	'guests_online' => "(DEFAULT, 'guests_online', 'SELECT COUNT(*) FROM <%PREFIX%>UserSession WHERE PortalUserId <= 0', NULL , NULL , '3600', '0', '\|UserSession\|')",
	'users_online' => "(DEFAULT, 'users_online', 'SELECT COUNT(*) FROM <%PREFIX%>UserSession', NULL , NULL , '3600', '0', '\|UserSession\|')",
	),
	),
	);

	// check & insert if not found defined before data
	foreach ($data as $table_name => $table_info) {
	$unique_fields = explode(';', $table_info['UniqueField']);
	foreach ($table_info['Records'] as $unique_value => $insert_sql) {
	$unique_values = explode(';', $unique_value);

	$where_clause = Array ();
	foreach ($unique_fields as $field_index => $unique_field) {
	$where_clause[] = $unique_field . ' = ' . $this->Conn->qstr($unique_values[$field_index]);
	}

	$sql = 'SELECT ' . implode(', ', $unique_fields) . '
	FROM ' . TABLE_PREFIX . $table_name . '
	WHERE (' . implode(') AND (', $where_clause) . ')';
	$found = $this->Conn->GetRow($sql);
	if ($found) {
	$found = implode(';', $found);
	}

	if ($found != $unique_value) {
	$this->Conn->Query('INSERT INTO ' . TABLE_PREFIX . $table_name . ' VALUES ' . $insert_sql);
	}
	}
	}
	}

	/**
	* Removes duplicate phrases per language basis (created during proj-base and in-portal shared installation)
	*
	*/
	function _removeDuplicatePhrases()
	{
	$id_field = $this->Application->getUnitOption('phrases', 'IDField');
	$table_name = $this->Application->getUnitOption('phrases', 'TableName');

	$sql = 'SELECT LanguageId, Phrase, MIN(LastChanged) AS LastChanged, COUNT(*) AS DupeCount
	FROM ' . $table_name . '
	GROUP BY LanguageId, Phrase
	HAVING COUNT(*) > 1';
	$duplicate_phrases = $this->Conn->Query($sql);

	foreach ($duplicate_phrases as $phrase_record) {
	// 1. keep phrase, that was added first, because it is selected in PhrasesCache::LoadPhraseByLabel
	$where_clause = Array (
	'LanguageId = ' . $phrase_record['LanguageId'],
	'Phrase = ' . $this->Conn->qstr($phrase_record['Phrase']),
	'LastChanged' . ' = ' . $phrase_record['LastChanged'],
	);

	$sql = 'SELECT ' . $id_field . '
	FROM ' . $table_name . '
	WHERE (' . implode(') AND (', $where_clause) . ')';
	$phrase_id = $this->Conn->GetOne($sql);

	// 2. delete all other duplicates
	$where_clause = Array (
	'LanguageId = ' . $phrase_record['LanguageId'],
	'Phrase = ' . $this->Conn->qstr($phrase_record['Phrase']),
	$id_field . ' <> ' . $phrase_id,
	);

	$sql = 'DELETE FROM ' . $table_name . '
	WHERE (' . implode(') AND (', $where_clause) . ')';
	$this->Conn->Query($sql);
	}
	}

	function _moveDatabaseFolders()
	{
	// Tables: PageContent, Images
	if ($this->Conn->TableFound('PageContent')) {
	// 1. replaces "/kernel/user_files/" references in content blocks
	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$languages = $ml_helper->getLanguages();
	$replace_sql = '%1$s = REPLACE(%1$s, "/kernel/user_files/", "/system/user_files/")';

	$update_sqls = Array ();

	foreach ($languages as $language_id) {
	$update_sqls[] = sprintf($replace_sql, 'l' . $language_id . '_Content');
	}

	if ($update_sqls) {
	$sql = 'UPDATE ' . TABLE_PREFIX . 'PageContent
	SET ' . implode(', ', $update_sqls);
	$this->Conn->Query($sql);
	}
	}

	// 2. replace path of images uploaded via "Images" tab of category items
	$this->_replaceImageFolder('/kernel/images/', '/system/images/');

	// 3. replace path of images uploaded via "Images" tab of category items (when badly formatted)
	$this->_replaceImageFolder('kernel/images/', 'system/images/');

	// 4. replace images uploaded via "In-Bulletin -> Emoticons" section
	$this->_replaceImageFolder('in-bulletin/images/emoticons/', 'system/images/emoticons/');

	// 5. update backup path in config
	$this->_toolkit->saveConfigValues(
	Array (
	'Backup_Path' => FULL_PATH . '/system/backupdata'
	)
	);
	}

	/**
	* Replaces mentions of "/kernel/images" folder in Images table
	*
	* @param string $from
	* @param string $to
	*/
	function _replaceImageFolder($from, $to)
	{
	$replace_sql = '%1$s = REPLACE(%1$s, "' . $from . '", "' . $to . '")';
	$sql = 'UPDATE ' . TABLE_PREFIX . 'Images
	SET ' . sprintf($replace_sql, 'ThumbPath') . ', ' . sprintf($replace_sql, 'LocalPath');
	$this->Conn->Query($sql);
	}


	/**
	* Update colors in skin (only if they were not changed manually)
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_5_0_0($mode)
	{
	if ($mode == 'before') {
	$this->_removeDuplicatePhrases(); // because In-Commerce & In-Link share some phrases with Proj-CMS
	$this->_createProjCMSTables();
	$this->_addMissingConfigurationVariables();
	}

	if ($mode == 'after') {
	$this->_fixSkinColors();
	$this->_restructureCatalog();
	$this->_sortImages();

	// $this->_sortConfigurationVariables('In-Portal', 'in-portal:configure_general');
	// $this->_sortConfigurationVariables('In-Portal', 'in-portal:configure_advanced');
	}
	}

	function _sortConfigurationVariables($module, $section)
	{
	$sql = 'SELECT ca.heading, cv.VariableName
	FROM ' . TABLE_PREFIX . 'ConfigurationAdmin ca
	LEFT JOIN ' . TABLE_PREFIX . 'ConfigurationValues cv USING(VariableName)
	WHERE (cv.ModuleOwner = ' . $this->Conn->qstr($module) . ') AND (cv.Section = ' . $this->Conn->qstr($section) . ')
	ORDER BY ca.DisplayOrder asc, ca.GroupDisplayOrder asc';
	$variables = $this->Conn->GetCol($sql, 'VariableName');

	if (!$variables) {
	return ;
	}

	$variables = $this->_groupRecords($variables);

	$group_number = 0;
	$variable_order = 1;

	$prev_heading = '';

	foreach ($variables as $variable_name => $variable_heading) {
	if ($prev_heading != $variable_heading) {
	$group_number++;
	$variable_order = 1;
	}

	$sql = 'UPDATE ' . TABLE_PREFIX . 'ConfigurationAdmin
	SET DisplayOrder = ' . $this->Conn->qstr($group_number * 10 + $variable_order / 100) . '
	WHERE VariableName = ' . $this->Conn->qstr($variable_name);
	$this->Conn->Query($sql);

	$variable_order++;
	$prev_heading = $variable_heading;
	}
	}

	/**
	* Group list records by header, saves internal order in group
	*
	* @param Array $variables
	* @return Array
	*/
	function _groupRecords($variables)
	{
	$sorted = Array();

	foreach ($variables as $variable_name => $variable_heading) {
	$sorted[$variable_heading][] = $variable_name;
	}

	$variables = Array();
	foreach ($sorted as $heading => $heading_records) {
	foreach ($heading_records as $variable_name) {
	$variables[$variable_name] = $heading;
	}
	}

	return $variables;
	}

	/**
	* Returns module root category
	*
	* @param string $module_name
	* @param string $module_prefix
	* @return int
	*/
	function _getRootCategory($module_name, $module_prefix)
	{
	// don't cache anything here (like in static variables), because database value is changed on the fly !!!
	$sql = 'SELECT RootCat
	FROM ' . TABLE_PREFIX . 'Modules
	WHERE LOWER(Name) = ' . $this->Conn->qstr( strtolower($module_name) );
	$root_category = $this->Conn->GetOne($sql);

	// put to cache too, because CategoriesEventHandler::_prepareAutoPage uses kApplication::findModule
	$this->Application->ModuleInfo[$module_name]['Name'] = $module_name;
	$this->Application->ModuleInfo[$module_name]['RootCat'] = $root_category;
	$this->Application->ModuleInfo[$module_name]['Var'] = $module_prefix;

	return $root_category;
	}

	/**
	* Move all categories (except "Content") from "Home" to "Content" category and hide them from menu
	*
	*/
	function _restructureCatalog()
	{
	$root_category = $this->_getRootCategory('Core', 'adm');

	$sql = 'SELECT CategoryId
	FROM ' . TABLE_PREFIX . 'Category
	WHERE ParentId = 0 AND CategoryId <> ' . $root_category;
	$top_categories = $this->Conn->GetCol($sql);

	if ($top_categories) {
	// hide all categories located outside "Content" category from menu
	$sql = 'UPDATE ' . TABLE_PREFIX . 'Category
	SET IsMenu = 0
	WHERE (ParentPath LIKE "\|' . implode('\|%") OR (ParentPath LIKE "\|', $top_categories) . '\|%")';
	$this->Conn->Query($sql);

	// move all top level categories under "Content" category and make them visible in menu
	$sql = 'UPDATE ' . TABLE_PREFIX . 'Category
	SET IsMenu = 1, ParentId = ' . $root_category . '
	WHERE ParentId = 0 AND CategoryId <> ' . $root_category;
	$this->Conn->Query($sql);
	}

	// make sure, that all categories have valid value for Priority field

	$priority_helper =& $this->Application->recallObject('PriorityHelper');
	/* @var $priority_helper kPriorityHelper */

	$event = new kEvent('c:OnListBuild');

	// update all categories, because they are all under "Content" category now
	$sql = 'SELECT CategoryId
	FROM ' . TABLE_PREFIX . 'Category';
	$categories = $this->Conn->GetCol($sql);

	foreach ($categories as $category_id) {
	$priority_helper->recalculatePriorities($event, 'ParentId = ' . $category_id);
	}

	// create initial theme structure in Category table
	$this->_toolkit->rebuildThemes();

	// make sure, that all system templates have ThemeId set (only possible during platform project upgrade)
	$sql = 'SELECT ThemeId
	FROM ' . TABLE_PREFIX . 'Theme
	WHERE PrimaryTheme = 1';
	$primary_theme_id = $this->Conn->GetOne($sql);

	if ($primary_theme_id) {
	$sql = 'UPDATE ' . TABLE_PREFIX . 'Category
	SET ThemeId = ' . $primary_theme_id . '
	WHERE IsSystem = 1 AND ThemeId = 0';
	$this->Conn->Query($sql);
	}
	}

	/**
	* Changes skin colors to match new ones (only in case, when they match default values)
	*
	*/
	function _fixSkinColors()
	{
	$skin =& $this->Application->recallObject('skin', null, Array ('skip_autoload' => 1));
	/* @var $skin kDBItem */

	$skin->Load(1, 'IsPrimary');
	if ($skin->isLoaded()) {
	$skin_options = unserialize( $skin->GetDBField('Options') );

	$changes = Array (
	// option: from -> to
	'HeadBgColor' => Array ('#1961B8', '#007BF4'),
	'HeadBarColor' => Array ('#FFFFFF', '#000000'),

	'HeadColor' => Array ('#CCFF00', '#FFFFFF'),
	'TreeColor' => Array ('#006F99', '#000000'),
	'TreeHoverColor' => Array ('', '#009FF0'),
	'TreeHighHoverColor' => Array ('', '#FFFFFF'),
	'TreeHighBgColor' => Array ('#4A92CE', '#4A92CE'),
	'TreeBgColor' => Array ('#FFFFFF', '#DCECF6'),
	);

	$can_change = true;
	foreach ($changes as $option_name => $change) {
	list ($change_from, $change_to) = $change;

	$can_change = $can_change && ($change_from == $skin_options[$option_name]['Value']);
	if ($can_change) {
	$skin_options[$option_name]['Value'] = $change_to;
	}
	}

	if ($can_change) {
	$skin->SetDBField('Options', serialize($skin_options));
	$skin->Update();

	$skin_helper =& $this->Application->recallObject('SkinHelper');
	/* @var $skin_helper SkinHelper */

	$skin_file = $skin_helper->getSkinPath();
	if (file_exists($skin_file)) {
	unlink($skin_file);
	}
	}
	}
	}

	/**
	* 1. Set root category not to generate filename automatically and hide it from catalog
	* 2. Hide root category of In-Edit and set it's fields
	*
	* @param int $category_id
	*/
	function _resetRootCategory($category_id)
	{
	$fields_hash = Array (
	'l1_Name' => 'Content', 'Filename' => 'Content', 'AutomaticFilename' => 0,
	'l1_Description' => 'Content', 'Status' => 4,
	);

	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX . 'Category', 'CategoryId = ' . $category_id);
	}

	function _createProjCMSTables()
	{
	// 0. make sure, that Content category exists
	$root_category = $this->_getRootCategory('Proj-CMS', 'st');
	if ($root_category) {
	// proj-cms module found -> remove it
	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'Modules
	WHERE Name = "Proj-CMS"';
	$this->Conn->Query($sql);
	unset($this->Application->ModuleInfo['Proj-CMS']);

	$this->_resetRootCategory($root_category);

	// unhide all structure categories
	$sql = 'UPDATE ' . TABLE_PREFIX . 'Category
	SET Status = 1
	WHERE (Status = 4) AND (CategoryId <> ' . $root_category . ')';
	$this->Conn->Query($sql);
	} else {
	$root_category = $this->_getRootCategory('In-Edit', 'cms');
	if ($root_category) {
	// in-edit module found -> remove it
	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'Modules
	WHERE Name = "In-Edit"';
	$this->Conn->Query($sql);
	unset($this->Application->ModuleInfo['In-Edit']);

	$this->_resetRootCategory($root_category);
	}
	}

	if (!$root_category) {
	// create "Content" category when Proj-CMS/In-Edit module was not installed before
	// use direct sql here, because category table structure doesn't yet match table structure in object

	$fields_hash = Array (
	'l1_Name' => 'Content', 'Filename' => 'Content', 'AutomaticFilename' => 0,
	'l1_Description' => 'Content', 'Status' => 4,
	);

	$this->Conn->doInsert($fields_hash, TABLE_PREFIX . 'Category');

	$root_category = $this->Conn->getInsertID();
	}

	$this->_toolkit->deleteCache();
	$this->_toolkit->SetModuleRootCategory('Core', $root_category);

	// 1. process "Category" table
	$structure = $this->Conn->Query('DESCRIBE ' . TABLE_PREFIX . 'Category', 'Field');
	if (!array_key_exists('Template', $structure)) {
	// fields from "Pages" table were not added to "Category" table (like before "Proj-CMS" module install)
	$sql = "ALTER TABLE " . TABLE_PREFIX . "Category
	ADD COLUMN Template varchar(255) default NULL,
	ADD COLUMN l1_Title varchar(255) default '',
	ADD COLUMN l2_Title varchar(255) default '',
	ADD COLUMN l3_Title varchar(255) default '',
	ADD COLUMN l4_Title varchar(255) default '',
	ADD COLUMN l5_Title varchar(255) default '',
	ADD COLUMN l1_MenuTitle varchar(255) NOT NULL default '',
	ADD COLUMN l2_MenuTitle varchar(255) NOT NULL default '',
	ADD COLUMN l3_MenuTitle varchar(255) NOT NULL default '',
	ADD COLUMN l4_MenuTitle varchar(255) NOT NULL default '',
	ADD COLUMN l5_MenuTitle varchar(255) NOT NULL default '',
	ADD COLUMN MetaTitle text,
	ADD COLUMN IndexTools text,
	ADD COLUMN IsIndex tinyint(1) NOT NULL default '0',
	ADD COLUMN IsMenu TINYINT(4) NOT NULL DEFAULT '1',
	ADD COLUMN IsSystem tinyint(4) NOT NULL default '0',
	ADD COLUMN FormId int(11) default NULL,
	ADD COLUMN FormSubmittedTemplate varchar(255) default NULL,
	ADD COLUMN l1_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN l2_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN l3_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN l4_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN l5_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN FriendlyURL varchar(255) NOT NULL default '',
	ADD INDEX IsIndex (IsIndex),
	ADD INDEX l1_Translated (l1_Translated),
	ADD INDEX l2_Translated (l2_Translated),
	ADD INDEX l3_Translated (l3_Translated),
	ADD INDEX l4_Translated (l4_Translated),
	ADD INDEX l5_Translated (l5_Translated)";
	$this->Conn->Query($sql);
	}

	if (array_key_exists('Path', $structure)) {
	$sql = 'ALTER TABLE ' . TABLE_PREFIX . 'Category
	DROP Path';
	$this->Conn->Query($sql);
	}

	// 2. process "PageContent" table
	if ($this->Conn->TableFound(TABLE_PREFIX . 'PageContent')) {
	$structure = $this->Conn->Query('DESCRIBE ' . TABLE_PREFIX . 'PageContent', 'Field');
	if (!array_key_exists('l1_Translated', $structure)) {
	$sql = "ALTER TABLE " . TABLE_PREFIX . "PageContent
	ADD COLUMN l1_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN l2_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN l3_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN l4_Translated tinyint(4) NOT NULL default '0',
	ADD COLUMN l5_Translated tinyint(4) NOT NULL default '0'";
	$this->Conn->Query($sql);
	}
	}

	// 3. process "FormFields" table
	if ($this->Conn->TableFound(TABLE_PREFIX . 'FormFields')) {
	$structure = $this->Conn->Query('DESCRIBE ' . TABLE_PREFIX . 'FormFields', 'Field');
	if (!$structure['FormId']['Key']) {
	$sql = "ALTER TABLE " . TABLE_PREFIX . "FormFields
	CHANGE Validation Validation TINYINT NOT NULL DEFAULT '0',
	ADD INDEX FormId (FormId),
	ADD INDEX Priority (Priority),
	ADD INDEX IsSystem (IsSystem),
	ADD INDEX DisplayInGrid (DisplayInGrid)";
	$this->Conn->Query($sql);
	}
	}
	else {
	$this->Conn->Query("INSERT INTO " . TABLE_PREFIX . "Permissions VALUES (DEFAULT, 'in-portal:forms.view', 11, 1, 1, 0)");
	$this->Conn->Query("INSERT INTO " . TABLE_PREFIX . "Permissions VALUES (DEFAULT, 'in-portal:forms.add', 11, 1, 1, 0)");
	$this->Conn->Query("INSERT INTO " . TABLE_PREFIX . "Permissions VALUES (DEFAULT, 'in-portal:forms.edit', 11, 1, 1, 0)");
	$this->Conn->Query("INSERT INTO " . TABLE_PREFIX . "Permissions VALUES (DEFAULT, 'in-portal:forms.delete', 11, 1, 1, 0)");
	}

	// 4. process "FormSubmissions" table
	if ($this->Conn->TableFound(TABLE_PREFIX . 'FormSubmissions')) {
	$structure = $this->Conn->Query('DESCRIBE ' . TABLE_PREFIX . 'FormSubmissions', 'Field');
	if (!$structure['SubmissionTime']['Key']) {
	$sql = "ALTER TABLE " . TABLE_PREFIX . "FormSubmissions
	ADD INDEX SubmissionTime (SubmissionTime)";
	$this->Conn->Query($sql);
	}
	}
	else {
	$this->Conn->Query("INSERT INTO " . TABLE_PREFIX . "Permissions VALUES (DEFAULT, 'in-portal:submissions.view', 11, 1, 1, 0)");
	}

	// 5. add missing event
	$sql = 'SELECT EventId
	FROM ' . TABLE_PREFIX . 'Events
	WHERE (Event = "FORM.SUBMITTED") AND (Type = 1)';
	$event_id = $this->Conn->GetOne($sql);

	if (!$event_id) {
	$sql = "INSERT INTO " . TABLE_PREFIX . "Events VALUES (DEFAULT, 'FORM.SUBMITTED', NULL, 1, 0, 'Core:Category', 'la_event_FormSubmitted', 1)";
	$this->Conn->Query($sql);
	}

	$sql = 'SELECT EventId
	FROM ' . TABLE_PREFIX . 'Events
	WHERE (Event = "FORM.SUBMITTED") AND (Type = 0)';
	$event_id = $this->Conn->GetOne($sql);

	if (!$event_id) {
	$sql = "INSERT INTO " . TABLE_PREFIX . "Events VALUES (DEFAULT, 'FORM.SUBMITTED', NULL, 1, 0, 'Core:Category', 'la_event_FormSubmitted', 0)";
	$this->Conn->Query($sql);
	}
	}

	function _addMissingConfigurationVariables()
	{
	$variables = Array (
	'cms_DefaultDesign' => Array (
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationAdmin VALUES ('cms_DefaultDesign', 'la_Text_General', 'la_prompt_DefaultDesignTemplate', 'text', NULL, NULL, 10.15, 0, 0)",
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationValues VALUES (DEFAULT, 'cms_DefaultDesign', '/platform/designs/general', 'In-Portal', 'in-portal:configure_categories')",
	),

	'Require_AdminSSL' => Array (
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationAdmin VALUES ('Require_AdminSSL', 'la_Text_Website', 'la_config_RequireSSLAdmin', 'checkbox', '', '', 10.105, 0, 1)",
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationValues VALUES (DEFAULT, 'Require_AdminSSL', '', 'In-Portal', 'in-portal:configure_advanced')",
	),

	'UsePopups' => Array (
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationAdmin VALUES ('UsePopups', 'la_Text_Website', 'la_config_UsePopups', 'radio', '', '1=la_Yes,0=la_No', 10.221, 0, 0)",
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationValues VALUES (DEFAULT, 'UsePopups', '1', 'In-Portal', 'in-portal:configure_advanced')",
	),

	'UseDoubleSorting' => Array (
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationAdmin VALUES ('UseDoubleSorting', 'la_Text_Website', 'la_config_UseDoubleSorting', 'radio', '', '1=la_Yes,0=la_No', 10.222, 0, 0)",
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationValues VALUES (DEFAULT, 'UseDoubleSorting', '0', 'In-Portal', 'in-portal:configure_advanced')",
	),

	'MenuFrameWidth' => Array (
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationAdmin VALUES ('MenuFrameWidth', 'la_title_General', 'la_prompt_MenuFrameWidth', 'text', NULL, NULL, 10.31, 0, 0)",
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationValues VALUES (DEFAULT, 'MenuFrameWidth', 200, 'In-Portal', 'in-portal:configure_advanced')",
	),

	'DefaultSettingsUserId' => Array (
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationAdmin VALUES ('DefaultSettingsUserId', 'la_title_General', 'la_prompt_DefaultUserId', 'text', NULL, NULL, '10.06', '0', '0')",
	"INSERT INTO " . TABLE_PREFIX . "ConfigurationValues VALUES (DEFAULT, 'DefaultSettingsUserId', -1, 'In-Portal:Users', 'in-portal:configure_users')",
	),
	);

	foreach ($variables as $variable_name => $variable_sqls) {
	$sql = 'SELECT VariableId
	FROM ' . TABLE_PREFIX . 'ConfigurationValues
	WHERE VariableName = ' . $this->Conn->qstr($variable_name);
	$variable_id = $this->Conn->GetOne($sql);

	if ($variable_id) {
	continue;
	}

	foreach ($variable_sqls as $variable_sql) {
	$this->Conn->Query($variable_sql);
	}
	}
	}

	/**
	* Sort images in database (update Priority field)
	*
	*/
	function _sortImages()
	{
	$sql = 'SELECT *
	FROM ' . TABLE_PREFIX . 'Images
	ORDER BY ResourceId ASC , DefaultImg DESC , ImageId ASC';
	$images = $this->Conn->Query($sql);

	$priority = 0;
	$last_resource_id = false;

	foreach ($images as $image) {
	if ($image['ResourceId'] != $last_resource_id) {
	// each item have own priorities among it's images
	$priority = 0;
	$last_resource_id = $image['ResourceId'];
	}

	if (!$image['DefaultImg']) {
	$priority--;
	}

	$sql = 'UPDATE ' . TABLE_PREFIX . 'Images
	SET Priority = ' . $priority . '
	WHERE ImageId = ' . $image['ImageId'];
	$this->Conn->Query($sql);
	}
	}

	/**
	* Update to 5.0.1
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_5_0_1($mode)
	{
	if ($mode == 'after') {
	// delete old events
	$events_to_delete = Array ('CATEGORY.MODIFY', 'CATEGORY.DELETE');

	$sql = 'SELECT EventId
	FROM ' . TABLE_PREFIX . 'Events
	WHERE Event IN ("' . implode('","', $events_to_delete) . '")';
	$event_ids = $this->Conn->GetCol($sql);

	if ($event_ids) {
	$this->_deleteEvents($event_ids);

	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'Phrase
	WHERE Phrase IN ("la_event_category.modify", "la_event_category.delete")';
	$this->Conn->Query($sql);
	}

	// partially delete events
	$sql = 'SELECT EventId
	FROM ' . TABLE_PREFIX . 'Events
	WHERE (Event IN ("CATEGORY.APPROVE", "CATEGORY.DENY")) AND (Type = ' . EmailEvent::EVENT_TYPE_ADMIN . ')';
	$event_ids = $this->Conn->GetCol($sql);

	if ($event_ids) {
	$this->_deleteEvents($event_ids);
	}
	}
	}

	function _deleteEvents($ids)
	{
	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'EmailMessage
	WHERE EventId IN (' . implode(',', $ids) . ')';
	$this->Conn->Query($sql);

	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'Events
	WHERE EventId IN (' . implode(',', $ids) . ')';
	$this->Conn->Query($sql);
	}

	/**
	* Update to 5.0.2-B2; Transforms IsIndex field values to SymLinkCategoryId field
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_5_0_2_B2($mode)
	{
	// 0 - Regular, 1 - Category Index, 2 - Container

	if ($mode == 'before') {
	// fix "Content" category
	$fields_hash = Array (
	'CreatedById' => USER_ROOT,
	'CreatedOn' => time(),
	'ResourceId' => $this->Application->NextResourceId(),
	);

	$category_id = $this->Application->findModule('Name', 'Core', 'RootCat');
	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX . 'Category', 'CategoryId = ' . $category_id);

	// get all categories, marked as category index
	$sql = 'SELECT ParentPath, CategoryId
	FROM ' . TABLE_PREFIX . 'Category
	WHERE IsIndex = 1';
	$category_indexes = $this->Conn->GetCol($sql, 'CategoryId');

	foreach ($category_indexes as $category_id => $parent_path) {
	$parent_path = explode('\|', substr($parent_path, 1, -1));

	// set symlink to $category_id for each category, marked as container in given category path
	$sql = 'SELECT CategoryId
	FROM ' . TABLE_PREFIX . 'Category
	WHERE CategoryId IN (' . implode(',', $parent_path) . ') AND (IsIndex = 2)';
	$category_containers = $this->Conn->GetCol($sql);

	if ($category_containers) {
	$sql = 'UPDATE ' . TABLE_PREFIX . 'Category
	SET SymLinkCategoryId = ' . $category_id . '
	WHERE CategoryId IN (' . implode(',', $category_containers) . ')';
	$this->Conn->Query($sql);
	}

	}
	}

	if ($mode == 'after') {
	// scan theme to fill Theme.TemplateAliases and ThemeFiles.TemplateAlias fields
	$this->_toolkit->rebuildThemes();

	$sql = 'SELECT TemplateAliases, ThemeId
	FROM ' . TABLE_PREFIX . 'Theme
	WHERE (Enabled = 1) AND (TemplateAliases <> "")';
	$template_aliases = $this->Conn->GetCol($sql, 'ThemeId');

	$all_template_aliases = Array (); // reversed alias (from real template to alias)

	foreach ($template_aliases as $theme_id => $theme_template_aliases) {
	$theme_template_aliases = unserialize($theme_template_aliases);

	if (!$theme_template_aliases) {
	continue;
	}

	$all_template_aliases = array_merge($all_template_aliases, array_flip($theme_template_aliases));
	}

	$default_design_replaced = false;
	$default_design = trim($this->Application->ConfigValue('cms_DefaultDesign'), '/');

	foreach ($all_template_aliases as $from_template => $to_alias) {
	// replace default design in configuration variable (when matches alias)
	if ($from_template == $default_design) {
	// specific alias matched
	$sql = 'UPDATE ' . TABLE_PREFIX . 'ConfigurationValues
	SET VariableValue = ' . $this->Conn->qstr($to_alias) . '
	WHERE VariableName = "cms_DefaultDesign"';
	$this->Conn->Query($sql);

	$default_design_replaced = true;
	}

	// replace Category.Template and Category.CachedTemplate fields (when matches alias)
	$sql = 'UPDATE ' . TABLE_PREFIX . 'Category
	SET Template = ' . $this->Conn->qstr($to_alias) . '
	WHERE Template IN (' . $this->Conn->qstr('/' . $from_template) . ',' . $this->Conn->qstr($from_template) . ')';
	$this->Conn->Query($sql);

	$sql = 'UPDATE ' . TABLE_PREFIX . 'Category
	SET CachedTemplate = ' . $this->Conn->qstr($to_alias) . '
	WHERE CachedTemplate IN (' . $this->Conn->qstr('/' . $from_template) . ',' . $this->Conn->qstr($from_template) . ')';
	$this->Conn->Query($sql);
	}

	if (!$default_design_replaced) {
	// in case if current default design template doesn't
	// match any of aliases, then set it to #default_design#
	$sql = 'UPDATE ' . TABLE_PREFIX . 'ConfigurationValues
	SET VariableValue = "#default_design#"
	WHERE VariableName = "cms_DefaultDesign"';
	$this->Conn->Query($sql);
	}

	// replace data in category custom fields used for category item template storage
	- $mod_rewrite_helper =& $this->Application->recallObject('ModRewriteHelper');
	- /* @var $mod_rewrite_helper kModRewriteHelper */
	+ $rewrite_processor =& $this->Application->recallObject('kRewriteUrlProcessor');
	+ /* @var $rewrite_processor kRewriteUrlProcessor */

	foreach ($this->Application->ModuleInfo as $module_name => $module_info) {
	- $custom_field_id = $mod_rewrite_helper->getItemTemplateCustomField($module_info['Var']);
	+ $custom_field_id = $rewrite_processor->getItemTemplateCustomField($module_info['Var']);

	if (!$custom_field_id) {
	continue;
	}

	foreach ($all_template_aliases as $from_template => $to_alias) {
	$sql = 'UPDATE ' . TABLE_PREFIX . 'CategoryCustomData
	SET l1_cust_' . $custom_field_id . ' = ' . $this->Conn->qstr($to_alias) . '
	WHERE l1_cust_' . $custom_field_id . ' = ' . $this->Conn->qstr($from_template);
	$this->Conn->Query($sql);
	}
	}
	}
	}

	/**
	* Update to 5.0.3-B2; Moves CATEGORY.* permission from module root categories to Content category
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_5_0_3_B2($mode)
	{
	if ($mode == 'before') {
	// get permissions
	$sql = 'SELECT PermissionName
	FROM ' . TABLE_PREFIX . 'PermissionConfig
	WHERE PermissionName LIKE "CATEGORY.%"';
	$permission_names = $this->Conn->GetCol($sql);

	// get groups
	$sql = 'SELECT GroupId
	FROM ' . TABLE_PREFIX . 'PortalGroup';
	$user_groups = $this->Conn->GetCol($sql);
	$user_group_count = count($user_groups);

	// get module root categories
	$sql = 'SELECT RootCat
	FROM ' . TABLE_PREFIX . 'Modules';
	$module_categories = $this->Conn->GetCol($sql);

	$module_categories[] = 0;
	$module_categories = implode(',', array_unique($module_categories));

	$permissions = $delete_permission_ids = Array ();

	foreach ($permission_names as $permission_name) {
	foreach ($user_groups as $group_id) {
	$sql = 'SELECT PermissionId
	FROM ' . TABLE_PREFIX . 'Permissions
	WHERE (Permission = ' . $this->Conn->qstr($permission_name) . ') AND (PermissionValue = 1) AND (GroupId = ' . $group_id . ') AND (`Type` = 0) AND (CatId IN (' . $module_categories . '))';
	$permission_ids = $this->Conn->GetCol($sql);

	if ($permission_ids) {
	if (!array_key_exists($permission_name, $permissions)) {
	$permissions[$permission_name] = Array ();
	}

	$permissions[$permission_name][] = $group_id;
	$delete_permission_ids = array_merge($delete_permission_ids, $permission_ids);
	}
	}
	}

	if ($delete_permission_ids) {
	// here we can delete some of permissions that will be added later
	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'Permissions
	WHERE PermissionId IN (' . implode(',', $delete_permission_ids) . ')';
	$this->Conn->Query($sql);
	}

	$home_category = $this->Application->findModule('Name', 'Core', 'RootCat');

	foreach ($permissions as $permission_name => $permission_groups) {
	// optimize a bit
	$has_everyone = in_array(15, $permission_groups);

	if ($has_everyone \|\| (!$has_everyone && count($permission_groups) == $user_group_count - 1)) {
	// has permission for "Everyone" group OR allowed in all groups except "Everyone" group
	// so remove all other explicitly allowed permissions
	$permission_groups = Array (15);
	}

	foreach ($permission_groups as $group_id) {
	$fields_hash = Array (
	'Permission' => $permission_name,
	'GroupId' => $group_id,
	'PermissionValue' => 1,
	'Type' => 0, // category-based permission,
	'CatId' => $home_category,
	);

	$this->Conn->doInsert($fields_hash, TABLE_PREFIX . 'Permissions');
	}
	}

	$updater =& $this->Application->makeClass('kPermCacheUpdater');
	/* @var $updater kPermCacheUpdater */

	$updater->OneStepRun();
	}
	}

	/**
	* Update to 5.1.0-B1; Makes email message fields multilingual
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_5_1_0_B1($mode)
	{
	if ($mode == 'before') {
	// migrate email events
	$table_structure = $this->Conn->Query('DESCRIBE ' . TABLE_PREFIX . 'Events', 'Field');

	if (!array_key_exists('Headers', $table_structure)) {
	$sql = 'ALTER TABLE ' . TABLE_PREFIX . 'Events
	ADD `Headers` TEXT NULL AFTER `ReplacementTags`,
	ADD `MessageType` VARCHAR(4) NOT NULL default "text" AFTER `Headers`';
	$this->Conn->Query($sql);
	}

	// alter here, because kMultiLanguageHelper::createFields
	// method, called after will expect that to be in database
	$sql = 'ALTER TABLE ' . TABLE_PREFIX . 'Events
	ADD AllowChangingSender TINYINT NOT NULL DEFAULT "0" AFTER MessageType ,
	ADD CustomSender TINYINT NOT NULL DEFAULT "0" AFTER AllowChangingSender ,
	ADD SenderName VARCHAR(255) NOT NULL DEFAULT "" AFTER CustomSender ,
	ADD SenderAddressType TINYINT NOT NULL DEFAULT "0" AFTER SenderName ,
	ADD SenderAddress VARCHAR(255) NOT NULL DEFAULT "" AFTER SenderAddressType ,
	ADD AllowChangingRecipient TINYINT NOT NULL DEFAULT "0" AFTER SenderAddress ,
	ADD CustomRecipient TINYINT NOT NULL DEFAULT "0" AFTER AllowChangingRecipient ,
	ADD Recipients TEXT AFTER CustomRecipient,
	ADD INDEX (AllowChangingSender),
	ADD INDEX (CustomSender),
	ADD INDEX (SenderAddressType),
	ADD INDEX (AllowChangingRecipient),
	ADD INDEX (CustomRecipient)';
	$this->Conn->Query($sql);

	// create multilingual fields for phrases and email events
	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$ml_helper->createFields('phrases');
	$ml_helper->createFields('emailevents');
	$languages = $ml_helper->getLanguages();

	if ($this->Conn->TableFound(TABLE_PREFIX . 'EmailMessage')) {
	$email_message_helper =& $this->Application->recallObject('EmailMessageHelper');
	/* @var $email_message_helper EmailMessageHelper */


	foreach ($languages as $language_id) {
	$sql = 'SELECT EmailMessageId, Template, EventId
	FROM ' . TABLE_PREFIX . 'EmailMessage
	WHERE LanguageId = ' . $language_id;
	$translations = $this->Conn->Query($sql, 'EventId');

	foreach ($translations as $event_id => $translation_data) {
	$parsed = $email_message_helper->parseTemplate($translation_data['Template']);

	$fields_hash = Array (
	'l' . $language_id . '_Subject' => $parsed['Subject'],
	'l' . $language_id . '_Body' => $parsed['Body'],
	);

	if ($parsed['Headers']) {
	$fields_hash['Headers'] = $parsed['Headers'];
	}

	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX . 'Events', 'EventId = ' . $event_id);

	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'EmailMessage
	WHERE EmailMessageId = ' . $translation_data['EmailMessageId'];
	$this->Conn->Query($sql);
	}
	}
	}

	// migrate phrases
	$temp_table = $this->Application->GetTempName(TABLE_PREFIX . 'Phrase');

	$sqls = Array (
	'DROP TABLE IF EXISTS ' . $temp_table,
	'CREATE TABLE ' . $temp_table . ' LIKE ' . TABLE_PREFIX . 'Phrase',
	'ALTER TABLE ' . $temp_table . ' DROP LanguageId, DROP Translation',
	'ALTER IGNORE TABLE ' . $temp_table . ' DROP INDEX LanguageId_2',
	'ALTER TABLE ' . $temp_table . ' DROP PhraseId',
	'ALTER TABLE ' . $temp_table . ' ADD PhraseId INT NOT NULL AUTO_INCREMENT PRIMARY KEY FIRST',
	);

	foreach ($sqls as $sql) {
	$this->Conn->Query($sql);
	}

	$already_added = Array ();
	$primary_language_id = $this->Application->GetDefaultLanguageId();

	foreach ($languages as $language_id) {
	$sql = 'SELECT Phrase, PhraseKey, Translation AS l' . $language_id . '_Translation, PhraseType, LastChanged, LastChangeIP, Module
	FROM ' . TABLE_PREFIX . 'Phrase
	WHERE LanguageId = ' . $language_id;
	$phrases = $this->Conn->Query($sql, 'Phrase');

	foreach ($phrases as $phrase => $fields_hash) {
	if (array_key_exists($phrase, $already_added)) {
	$this->Conn->doUpdate($fields_hash, $temp_table, 'PhraseId = ' . $already_added[$phrase]);
	}
	else {
	$this->Conn->doInsert($fields_hash, $temp_table);
	$already_added[$phrase] = $this->Conn->getInsertID();
	}
	}

	// in case some phrases were found in this language, but not in primary language -> copy them
	if ($language_id != $primary_language_id) {
	$sql = 'UPDATE ' . $temp_table . '
	SET l' . $primary_language_id . '_Translation = l' . $language_id . '_Translation
	WHERE l' . $primary_language_id . '_Translation IS NULL';
	$this->Conn->Query($sql);
	}
	}

	$this->Conn->Query('DROP TABLE IF EXISTS ' . TABLE_PREFIX . 'Phrase');
	$this->Conn->Query('RENAME TABLE ' . $temp_table . ' TO ' . TABLE_PREFIX . 'Phrase');

	$this->_updateCountryStatesTable();
	$this->_replaceConfigurationValueSeparator();

	// save "config.php" in php format, not ini format as before
	$this->_toolkit->SaveConfig();
	}

	if ($mode == 'after') {
	$this->_transformEmailRecipients();
	$this->_fixSkinColors();
	}
	}

	/**
	* Move country/state translations from Phrase to CountryStates table
	*
	*/
	function _updateCountryStatesTable()
	{
	// refactor StdDestinations table
	$sql = 'RENAME TABLE ' . TABLE_PREFIX . 'StdDestinations TO ' . TABLE_PREFIX . 'CountryStates';
	$this->Conn->Query($sql);

	$sql = 'ALTER TABLE ' . TABLE_PREFIX . 'CountryStates
	CHANGE DestId CountryStateId INT(11) NOT NULL AUTO_INCREMENT,
	CHANGE DestType Type INT(11) NOT NULL DEFAULT \'1\',
	CHANGE DestParentId StateCountryId INT(11) NULL DEFAULT NULL,
	CHANGE DestAbbr IsoCode CHAR(3) NOT NULL DEFAULT \'\',
	CHANGE DestAbbr2 ShortIsoCode CHAR(2) NULL DEFAULT NULL,
	DROP INDEX DestType,
	DROP INDEX DestParentId,
	ADD INDEX (`Type`),
	ADD INDEX (StateCountryId)';
	$this->Conn->Query($sql);

	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$ml_helper->createFields('country-state');
	$languages = $ml_helper->getLanguages();

	foreach ($languages as $language_id) {
	$sub_select = ' SELECT l' . $language_id . '_Translation
	FROM ' . TABLE_PREFIX . 'Phrase
	WHERE Phrase = DestName';

	$sql = 'UPDATE ' . TABLE_PREFIX . 'CountryStates
	SET l' . $language_id . '_Name = (' . $sub_select . ')';
	$this->Conn->Query($sql);
	}

	$sql = 'ALTER TABLE ' . TABLE_PREFIX . 'CountryStates
	DROP DestName';
	$this->Conn->Query($sql);

	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'Phrase
	WHERE Phrase LIKE ' . $this->Conn->qstr('la_country_%') . ' OR Phrase LIKE ' . $this->Conn->qstr('la_state_%');
	$this->Conn->Query($sql);
	}

	/**
	* Makes configuration values dropdowns use "\|\|" as separator
	*
	*/
	function _replaceConfigurationValueSeparator()
	{
	$custom_field_helper =& $this->Application->recallObject('InpCustomFieldsHelper');
	/* @var $custom_field_helper InpCustomFieldsHelper */

	$sql = 'SELECT ValueList, VariableName
	FROM ' . TABLE_PREFIX . 'ConfigurationAdmin
	WHERE ValueList LIKE "%,%"';
	$variables = $this->Conn->GetCol($sql, 'VariableName');

	foreach ($variables as $variable_name => $value_list) {
	$ret = Array ();
	$options = $custom_field_helper->GetValuesHash($value_list, ',', false);

	foreach ($options as $option_key => $option_title) {
	if (substr($option_key, 0, 3) == 'SQL') {
	$ret[] = $option_title;
	}
	else {
	$ret[] = $option_key . '=' . $option_title;
	}
	}

	$fields_hash = Array (
	'ValueList' => implode(VALUE_LIST_SEPARATOR, $ret),
	);

	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX . 'ConfigurationAdmin', 'VariableName = ' . $this->Conn->qstr($variable_name));
	}
	}

	/**
	* Transforms "FromUserId" into Sender* and Recipients columns
	*
	*/
	function _transformEmailRecipients()
	{
	$sql = 'SELECT FromUserId, Type, EventId
	FROM ' . TABLE_PREFIX . 'Events
	WHERE FromUserId IS NOT NULL AND (FromUserId <> ' . USER_ROOT . ')';
	$events = $this->Conn->Query($sql, 'EventId');

	$minput_helper =& $this->Application->recallObject('MInputHelper');
	/* @var $minput_helper MInputHelper */

	foreach ($events as $event_id => $event_data) {
	$sql = 'SELECT Login
	FROM ' . TABLE_PREFIX . 'PortalUser
	WHERE PortalUserId = ' . $event_data['FromUserId'];
	$username = $this->Conn->GetOne($sql);

	if (!$username) {
	continue;
	}

	if ($event_data['Type'] == EmailEvent::EVENT_TYPE_FRONTEND) {
	// from user
	$fields_hash = Array (
	'CustomSender' => 1,
	'SenderAddressType' => EmailEvent::ADDRESS_TYPE_USER,
	'SenderAddress' => $username
	);
	}

	if ($event_data['Type'] == EmailEvent::EVENT_TYPE_ADMIN) {
	// to user
	$records = Array (
	Array (
	'RecipientType' => EmailEvent::RECIPIENT_TYPE_TO,
	'RecipientName' => '',
	'RecipientAddressType' => EmailEvent::ADDRESS_TYPE_USER,
	'RecipientAddress' => $username
	)
	);

	$fields_hash = Array (
	'CustomRecipient' => 1,
	'Recipients' => $minput_helper->prepareMInputXML($records, array_keys( reset($records) ))
	);
	}

	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX . 'Events', 'EventId = ' . $event_id);
	}

	$this->Conn->Query('ALTER TABLE ' . TABLE_PREFIX . 'Events DROP FromUserId');
	}

	/**
	* Update to 5.1.0; Fixes refferer of form submissions
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_5_1_0($mode)
	{
	if ($mode == 'after') {
	$base_url = $this->Application->BaseURL();

	$sql = 'UPDATE ' . TABLE_PREFIX . 'FormSubmissions
	SET ReferrerURL = REPLACE(ReferrerURL, ' . $this->Conn->qstr($base_url) . ', "/")';
	$this->Conn->Query($sql);
	}
	}

	/**
	* Update to 5.1.1-B1; Transforms DisplayToPublic logic
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_5_1_1_B1($mode)
	{
	if ($mode == 'after') {
	$this->processDisplayToPublic();
	}
	}

	function processDisplayToPublic()
	{
	$profile_mapping = Array (
	'pp_firstname' => 'FirstName',
	'pp_lastname' => 'LastName',
	'pp_dob' => 'dob',
	'pp_email' => 'Email',
	'pp_phone' => 'Phone',
	'pp_street' => 'Street',
	'pp_city' => 'City',
	'pp_state' => 'State',
	'pp_zip' => 'Zip',
	'pp_country' => 'Country',
	);

	$fields = array_keys($profile_mapping);
	$fields = array_map(Array (&$this->Conn, 'qstr'), $fields);
	$where_clause = 'VariableName IN (' . implode(',', $fields) . ')';

	// 1. get user, that have saved their profile at least once
	$sql = 'SELECT DISTINCT PortalUserId
	FROM ' . TABLE_PREFIX . 'PersistantSessionData
	WHERE ' . $where_clause;
	$users = $this->Conn->GetCol($sql);

	foreach ($users as $user_id) {
	// 2. convert to new format
	$sql = 'SELECT VariableValue, VariableName
	FROM ' . TABLE_PREFIX . 'PersistantSessionData
	WHERE (PortalUserId = ' . $user_id . ') AND ' . $where_clause;
	$user_variables = $this->Conn->GetCol($sql, 'VariableName');

	// go through mapping to preserve variable order
	$value = Array ();

	foreach ($profile_mapping as $from_name => $to_name) {
	if (array_key_exists($from_name, $user_variables) && $user_variables[$from_name]) {
	$value[] = $to_name;
	}
	}

	if ($value) {
	$fields_hash = Array (
	'DisplayToPublic' => '\|' . implode('\|', $value) . '\|',
	);

	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX . 'PortalUser', 'PortalUserId = ' . $user_id);
	}

	// 3. delete old style variables
	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'PersistantSessionData
	WHERE (PortalUserId = ' . $user_id . ') AND ' . $where_clause;
	$this->Conn->Query($sql);
	}
	}

	/**
	* Update to 5.1.3; Merges column and field phrases
	*
	* @param string $mode when called mode {before, after)
	*/
	function Upgrade_5_1_3($mode)
	{
	if ($mode != 'after') {
	return ;
	}

	$sql = 'SELECT *
	FROM ' . TABLE_PREFIX . 'Phrase
	WHERE PhraseKey LIKE "LA_COL_%"';
	$column_phrases = $this->Conn->Query($sql, 'PhraseKey');

	$sql = 'SELECT *
	FROM ' . TABLE_PREFIX . 'Phrase
	WHERE PhraseKey LIKE "LA_FLD_%"';
	$field_phrases = $this->Conn->Query($sql, 'PhraseKey');

	$ml_helper =& $this->Application->recallObject('kMultiLanguageHelper');
	/* @var $ml_helper kMultiLanguageHelper */

	$delete_ids = Array ();
	$ml_helper->createFields('phrases');
	$languages = $ml_helper->getLanguages();

	foreach ($column_phrases as $phrase_key => $phrase_info) {
	$field_phrase_key = 'LA_FLD_' . substr($phrase_key, 7);

	if ( !isset($field_phrases[$field_phrase_key]) ) {
	continue;
	}

	$fields_hash = Array ();

	// copy column phrase main translation into field phrase column translation
	foreach ($languages as $language_id) {
	$fields_hash['l' . $language_id . '_ColumnTranslation'] = $phrase_info['l' . $language_id . '_Translation'];
	}

	$delete_ids[] = $phrase_info['PhraseId'];
	$this->Conn->doUpdate($fields_hash, TABLE_PREFIX . 'Phrase', 'PhraseId = ' . $field_phrases[$field_phrase_key]['PhraseId']);
	}

	// delete all column phrases, that were absorbed by field phrases
	if ( $delete_ids ) {
	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'Phrase
	WHERE PhraseId IN (' . implode(',', $delete_ids) . ')';
	$this->Conn->Query($sql);


	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'PhraseCache';
	$this->Conn->Query($sql);
	}
	}

	/**
	* Update to 5.2.0-B1; Transform list sortings storage
	*
	* @param string $mode when called mode {before, after)
	*/
	public function Upgrade_5_2_0_B1($mode)
	{
	if ($mode == 'after') {
	$this->transformSortings();
	}
	}

	/**
	* Transforms a way, how list sortings are stored
	*
	* @return void
	*/
	function transformSortings()
	{
	$sql = 'SELECT VariableName, PortalUserId
	FROM ' . TABLE_PREFIX . 'PersistantSessionData
	WHERE VariableName LIKE "%_Sort1.%"';
	$sortings = $this->Conn->Query($sql);

	foreach ($sortings AS $sorting) {
	if ( !preg_match('/^(.)_Sort1.(.)$/', $sorting['VariableName'], $regs) ) {
	continue;
	}

	$user_id = $sorting['PortalUserId'];
	$prefix_special = $regs[1] . '_';
	$view_name = '.' . $regs[2];

	$old_variable_names = Array (
	$prefix_special . 'Sort1' . $view_name, $prefix_special . 'Sort1_Dir' . $view_name,
	$prefix_special . 'Sort2' . $view_name, $prefix_special . 'Sort2_Dir' . $view_name,
	);
	$old_variable_names = array_map(Array (&$this->Conn, 'qstr'), $old_variable_names);

	$sql = 'SELECT VariableValue, VariableName
	FROM ' . TABLE_PREFIX . 'PersistantSessionData
	WHERE PortalUserId = ' . $user_id . ' AND VariableName IN (' . implode(',', $old_variable_names) . ')';
	$sorting_data = $this->Conn->GetCol($sql, 'VariableName');

	// prepare & save new sortings
	$new_sorting = Array (
	'Sort1' => $sorting_data[$prefix_special . 'Sort1' . $view_name],
	'Sort1_Dir' => $sorting_data[$prefix_special . 'Sort1_Dir' . $view_name],
	);

	if ( isset($sorting_data[$prefix_special . 'Sort2' . $view_name]) ) {
	$new_sorting['Sort2'] = $sorting_data[$prefix_special . 'Sort2' . $view_name];
	$new_sorting['Sort2_Dir'] = $sorting_data[$prefix_special . 'Sort2_Dir' . $view_name];
	}

	$fields_hash = Array (
	'PortalUserId' => $user_id,
	'VariableName' => $prefix_special . 'Sortings' . $view_name,
	'VariableValue' => serialize($new_sorting),
	);

	$this->Conn->doInsert($fields_hash, TABLE_PREFIX . 'PersistantSessionData');

	// delete sortings, that were already processed
	$sql = 'DELETE FROM ' . TABLE_PREFIX . 'PersistantSessionData
	WHERE PortalUserId = ' . $user_id . ' AND VariableName IN (' . implode(',', $old_variable_names) . ')';
	$this->Conn->Query($sql);
	}
	}
	}
	\ No newline at end of file

in-portalNo OneTemporaryActions

File Metadata

in-portalView Options

Event Timeline

in-portal
No OneTemporary
Actions

in-portal
View Options