in-portal
No OneTemporary
Actions

Subscribers

None

File Metadata

Created: Wed, May 21, 12:43 AM

in-portal
View Options

	Index: trunk/core/kernel/session/session.php
	===================================================================
	--- trunk/core/kernel/session/session.php (revision 6832)
	+++ trunk/core/kernel/session/session.php (revision 6833)
	@@ -1,775 +1,856 @@
	<?php

	/*

	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:

	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)

	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.

	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

	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(smAUTO); //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>";

	*/

	//Implements session storage in the database
	class SessionStorage extends kDBBase {

	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;

	function Init($prefix,$special)
	{
	parent::Init($prefix,$special);
	$this->setTableName('sessions');
	$this->setIDField('sid');
	$this->TimestampField = 'expire';
	$this->SessionDataTable = 'SessionData';
	$this->DataValueField = 'value';
	$this->DataVarField = 'var';
	}

	function setSessionTimeout($new_timeout)
	{
	$this->SessionTimeout = $new_timeout;
	}

	function StoreSession(&$session, $additional_fields = Array())
	{
	$fields_hash = Array (
	$this->IDField => $session->SID,
	$this->TimestampField => $session->Expiration
	);

	$this->Conn->doInsert($fields_hash, $this->TableName);

	foreach ($additional_fields as $field_name => $field_value) {
	$this->SetField($session, $field_name, $field_value);
	}
	}

	function DeleteSession(&$session)
	{
	$query = ' DELETE FROM '.$this->TableName.' WHERE '.$this->IDField.' = '.$this->Conn->qstr($session->SID);
	$this->Conn->Query($query);

	$query = ' DELETE FROM '.$this->SessionDataTable.' WHERE '.$this->IDField.' = '.$this->Conn->qstr($session->SID);
	$this->Conn->Query($query);

	$this->OriginalData = Array();
	}

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

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

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

	$this->DirectVars = $result;

	$this->Expiration = $result[$this->TimestampField];
	return true;
	}

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

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

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

	/**
	* Enter description here...
	*
	* @param Session $session
	* @param string $var_name
	* @param mixed $default
	*/
	function GetField(&$session, $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($session->GetID()) );
	}

	function SetField(&$session, $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($session->GetID()) );
	}

	function SaveData(&$session)
	{
	if(!$session->SID) return false; // can't save without sid

	$ses_data = $session->Data->GetParams();

	$replace = '';
	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($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($session->GetID());
	$this->Conn->Query($query);
	}
	}

	function RemoveFromData(&$session, $var)
	{
	$query = 'DELETE FROM '.$this->SessionDataTable.' WHERE '.$this->IDField.' = '.$this->Conn->qstr($session->SID).
	' AND '.$this->DataVarField.' = '.$this->Conn->qstr($var);
	$this->Conn->Query($query);
	unset($this->OriginalData[$var]);
	}

	function GetFromData(&$session, $var)
	{
	return getArrayValue($this->OriginalData, $var);
	}

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

	function DeleteExpired()
	{
	$expired_sids = $this->GetExpiredSIDs();
	if ($expired_sids) {
	$where_clause=' WHERE '.$this->IDField.' IN ("'.implode('","',$expired_sids).'")';
	$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 expired sessions
	foreach ($expired_sids as $expired_sid) {
	$debug_file = KERNEL_PATH.'/../cache/debug_@'.$expired_sid.'@.txt';
	if (file_exists($debug_file)) {
	@unlink($debug_file);
	}
	}
	}
	return $expired_sids;
	}
	+
	+ function LoadPersistentVars(&$session)
	+ {
	+ $user_id = $this->Application->GetVar('u_id');
	+ if ($user_id != -2) {
	+ // 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 ();
	+ }
	+ }
	+
	+ function StorePersistentVar(&$session, $var_name, $var_value)
	+ {
	+ $this->PersistentVars[$var_name] = $var_value;
	+
	+ $replace_hash = Array (
	+ 'PortalUserId' => $this->Application->GetVar('u_id'),
	+ 'VariableName' => $var_name,
	+ 'VariableValue' => $var_value
	+ );
	+ $this->Conn->doInsert($replace_hash, TABLE_PREFIX.'PersistantSessionData', 'REPLACE');
	+
	+ }
	+
	+ function RecallPersistentVar(&$session, $var_name, $default = false)
	+ {
	+ return isset($this->PersistentVars[$var_name]) ? $this->PersistentVars[$var_name] : $default;
	+ }
	+
	+ function RemovePersistentVar(&$session, $var_name)
	+ {
	+ unset($this->PersistentVars[$var_name]);
	+
	+ $user_id = $this->Application->GetVar('u_id');
	+
	+ if ($user_id != -2) {
	+ $sql = 'DELETE FROM '.TABLE_PREFIX.'PersistantSessionData
	+ WHERE PortalUserId = '.$user_id.' AND VariableName = '.$this->Conn->qstr($var_name);
	+ $this->Conn->Query($sql);
	+ }
	+ }
	}

	define('smAUTO', 1);
	define('smCOOKIES_ONLY', 2);
	define('smGET_ONLY', 3);
	define('smCOOKIES_AND_GET', 4);

	class Session extends kBase {
	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;

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

	var $CachedNeedQueryString = null;

	var $Data;


	function Session($mode=smAUTO)
	{
	parent::kBase();
	$this->SetMode($mode);
	}

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

	function SetCookiePath($path)
	{
	$this->CookiePath = $path;
	}

	function SetCookieDomain($domain)
	{
	$this->CookieDomain = '.'.ltrim($domain, '.');
	}

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

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

	function InitStorage()
	{
	$this->Storage =& $this->Application->recallObject('SessionStorage');
	$this->Storage->setSessionTimeout($this->SessionTimeout);
	}

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

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

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

	$tmp_sid = $this->GetPassedSIDValue();

	$check = $this->Check();
	if( !(defined('IS_INSTALL') && IS_INSTALL) )
	{
	$expired_sids = $this->DeleteExpired();
	if( ( $expired_sids && in_array($tmp_sid,$expired_sids) ) \|\| ( $tmp_sid && !$check ) )
	{
	$this->SetSession();
	$this->Application->HandleEvent($event, 'u:OnSessionExpire');
	}
	}

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

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

	function IsHTTPSRedirect()
	{
	$http_referer = getArrayValue($_SERVER, 'HTTP_REFERER');
	return (
	( PROTOCOL == 'https://' && preg_match('#http:\/\/#', $http_referer) )
	\|\|
	( PROTOCOL == 'http://' && preg_match('#https:\/\/#', $http_referer) )
	);
	}

	function CheckReferer($for_cookies=0)
	{
	if (!$for_cookies) {
	if ( !$this->Application->ConfigValue('SessionReferrerCheck') \|\| $_SERVER['REQUEST_METHOD'] != 'POST') {
	return true;
	}
	}
	$path = preg_replace('/admin[\/]{0,1}$/', '', $this->CookiePath); // removing /admin for compatability with in-portal (in-link/admin/add_link.php)
	$reg = '#^'.preg_quote(PROTOCOL.ltrim($this->CookieDomain, '.').$path).'#';
	return preg_match($reg, getArrayValue($_SERVER, 'HTTP_REFERER') ) \|\| (defined('IS_POPUP') && IS_POPUP);
	}

	/*function CheckDuplicateCookies()
	{
	if (isset($_SERVER['HTTP_COOKIE'])) {
	$cookie_str = $_SERVER['HTTP_COOKIE'];
	$cookies = explode('; ', $cookie_str);
	$all_cookies = array();
	foreach ($cookies as $cookie) {
	list($name, $value) = explode('=', $cookie);
	if (isset($all_cookies[$name])) {
	//double cookie name!!!
	$this->RemoveCookie($name);
	}
	else $all_cookies[$name] = $value;
	}
	}
	}

	function RemoveCookie($name)
	{
	$path = $_SERVER['PHP_SELF'];
	$path_parts = explode('/', $path);
	$cur_path = '';
	setcookie($name, false, null, $cur_path);
	foreach ($path_parts as $part) {
	$cur_path .= $part;
	setcookie($name, false, null, $cur_path);
	$cur_path .= '/';
	setcookie($name, false, null, $cur_path);
	}
	}*/

	function CheckIfCookiesAreOn()
	{
	// $this->CheckDuplicateCookies();
	if ($this->Mode == smGET_ONLY)
	{
	//we don't need to bother checking if we would not use it
	$this->CookiesEnabled = false;
	return;
	}
	$http_query =& $this->Application->recallObject('HTTPQuery');
	$cookies_on = isset($http_query->Cookie['cookies_on']); // not good here

	$get_sid = getArrayValue($http_query->Get, $this->GETName);
	if ($this->IsHTTPSRedirect() && $get_sid) { //Redirect from http to https on different domain
	$this->OriginalMode = $this->Mode;
	$this->SetMode(smGET_ONLY);
	}

	if (!$cookies_on \|\| $this->IsHTTPSRedirect()) {
	//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->CheckReferer(1) && !$this->Application->GetVar('admin') && !$this->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
	setcookie(
	'cookies_on',
	1,
	adodb_mktime()+31104000, //one year should be enough
	$this->CookiePath,
	$this->CookieDomain,
	$this->CookieSecure
	);
	}
	}
	else
	$this->CookiesEnabled = true;
	return $this->CookiesEnabled;
	}

	function Check()
	{
	// we should check referer if cookies are disabled, and in combined mode
	// auto mode would detect cookies, get only mode would turn it off - so we would get here
	// and we don't care about referal in cookies only mode

	if ( $this->Mode != smCOOKIES_ONLY && (!$this->CookiesEnabled \|\| $this->Mode == smCOOKIES_AND_GET) ) {
	if (!$this->CheckReferer())
	return false;
	}

	$sid = $this->GetPassedSIDValue();

	if (empty($sid)) return false;

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

	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()) return false;

	//Otherwise it's ok
	return true;
	}
	else //fake or deleted due to expiration SID
	return false;
	}

	function GetPassedSIDValue($use_cache = 1)
	{
	if (!empty($this->CachedSID) && $use_cache) return $this->CachedSID;
	$http_query =& $this->Application->recallObject('HTTPQuery');
	$get_sid = getArrayValue($http_query->Get, $this->GETName);

	if ($this->Application->GetVar('admin') == 1 && $get_sid) {
	$sid = $get_sid;
	}
	else {
	switch ($this->Mode) {
	case smAUTO:
	//Cookies has the priority - we ignore everything else
	$sid = $this->CookiesEnabled ? $this->GetSessionCookie() : $get_sid;
	break;
	case smCOOKIES_ONLY:
	$sid = $this->GetSessionCookie();
	break;
	case smGET_ONLY:
	$sid = $get_sid;
	break;
	case 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 = '';
	}
	break;
	}
	}


	$this->CachedSID = $sid;
	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 = ereg_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=$new_sid;
	$this->Application->SetVar($this->GETName,$new_sid);
	}

	function SetSession()
	{
	$this->GenerateSID();
	$this->Expiration = adodb_mktime() + $this->SessionTimeout;
	switch ($this->Mode) {
	case smAUTO:
	if ($this->CookiesEnabled) {
	$this->SetSessionCookie();
	}
	break;
	case smGET_ONLY:
	break;
	case smCOOKIES_ONLY:
	case smCOOKIES_AND_GET:
	$this->SetSessionCookie();
	break;
	}
	$this->Storage->StoreSession($this);
	}

	/**
	* Returns SID from cookie
	*
	* @return int
	*/
	function GetSessionCookie()
	{
	return isset($this->Application->HttpQuery->Cookie[$this->CookieName]) ? $this->Application->HttpQuery->Cookie[$this->CookieName] : false;
	}

	/**
	* Updates SID in cookie with new value
	*
	*/
	function SetSessionCookie()
	{
	setcookie(
	$this->CookieName,
	$this->SID,
	$this->Expiration,
	$this->CookiePath,
	$this->CookieDomain,
	$this->CookieSecure
	);

	$_COOKIE[$this->CookieName] = $this->SID; // for compatibility with in-portal
	}

	/**
	* Refreshes session expiration time
	*
	* @access private
	*/
	function Refresh()
	{
	if ($this->CookiesEnabled) $this->SetSessionCookie(); //we need to refresh the cookie
	$this->Storage->UpdateSession($this);
	}

	function Destroy()
	{
	$this->Storage->DeleteSession($this);
	$this->Data =& new Params();
	$this->SID = '';
	if ($this->CookiesEnabled) $this->SetSessionCookie(); //will remove the cookie due to value (sid) is empty
	$this->SetSession(); //will create a new session
	}

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

	$result = false;
	switch ($this->Mode)
	{
	case smAUTO:
	if (!$this->CookiesEnabled) $result = true;
	break;
	/*case smCOOKIES_ONLY:
	break;*/
	case smGET_ONLY:
	case smCOOKIES_AND_GET:
	$result = true;
	break;
	}
	$this->CachedNeedQueryString = $result;
	return $result;
	}

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

	function PrintSession($comment='')
	{
	if($this->Application->isDebugMode() && constOn('DBG_SHOW_SESSIONDATA')) {
	+ // dump session data
	$this->Application->Debugger->appendHTML('SessionStorage ('.$comment.'):');
	$session_data = $this->Data->GetParams();
	ksort($session_data);
	foreach ($session_data as $session_key => $session_value) {
	if (IsSerialized($session_value)) {
	$session_data[$session_key] = unserialize($session_value);
	}
	}
	$this->Application->Debugger->dumpVars($session_data);

	- // to insert after HTTPQuery if it's visible
	- $new_row = constOn('DBG_SHOW_HTTPQUERY') ? 4 : 2;
	-
	- //$debugger->moveAfterRow($new_row,2);
	+ // 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 (IsSerialized($session_value)) {
	+ $session_data[$session_key] = unserialize($session_value);
	+ }
	+ }
	+ $this->Application->Debugger->dumpVars($session_data);
	+ }
	+
	+// to insert after HTTPQuery if it's visible
	+// $new_row = constOn('DBG_SHOW_HTTPQUERY') ? 4 : 2;
	+// $debugger->moveAfterRow($new_row,2);
	}
	}

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

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

	function SaveLastTemplate($t)
	{
	$last_env = $this->Application->BuildEnv($t, Array('m_opener' => 'u', '__URLENCODE__' => 1), 'all');
	$last_template = basename($_SERVER['PHP_SELF']).'\|'.substr($last_env, strlen(ENV_VAR_NAME) + 1);
	$this->StoreVar('last_template', $last_template);
	$this->StoreVar('last_url', $_SERVER['REQUEST_URI']);

	$this->StoreVar('last_env', substr($this->Application->BuildEnv($t, Array('__URLENCODE__' => 1), 'all'), strlen(ENV_VAR_NAME)+1));
	}

	function StoreVar($name, $value)
	{
	$this->Data->Set($name, $value);
	}
	-
	+
	+ function StorePersistentVar($name, $value)
	+ {
	+ $this->Storage->StorePersistentVar($this, $name, $value);
	+ }
	+
	+ function LoadPersistentVars()
	+ {
	+ $this->Storage->LoadPersistentVars($this);
	+ }
	+
	function StoreVarDefault($name, $value)
	{
	$tmp = $this->RecallVar($name);
	if($tmp === false \|\| $tmp == '')
	{
	$this->StoreVar($name, $value);
	}
	}

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

	+ function RecallPersistentVar($name, $default = false)
	+ {
	+ return $this->Storage->RecallPersistentVar($this, $name, $default);
	+ }
	+
	function RemoveVar($name)
	{
	$this->Storage->RemoveFromData($this, $name);
	$this->Data->Remove($name);
	}

	+ function RemovePersistentVar($name)
	+ {
	+ return $this->Storage->RemovePersistentVar($this, $name);
	+ }
	+
	/**
	* Ignores session varible value set before
	*
	* @param string $name
	*/
	function RestoreVar($name)
	{
	return $this->StoreVar($name, $this->Storage->GetFromData($this, $name));
	}

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

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

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

	}

	?>
	\ No newline at end of file

	Property changes on: trunk/core/kernel/session/session.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.52
	\ No newline at end of property
	+1.53
	\ No newline at end of property
	Index: trunk/core/kernel/db/db_tag_processor.php
	===================================================================
	--- trunk/core/kernel/db/db_tag_processor.php (revision 6832)
	+++ trunk/core/kernel/db/db_tag_processor.php (revision 6833)
	@@ -1,1651 +1,1653 @@
	<?php

	class kDBTagProcessor extends TagProcessor {

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

	function kDBTagProcessor()
	{
	parent::kBase();
	$this->Conn =& $this->Application->GetADODBConnection();
	}


	/**
	* Returns true if "new" button was pressed in toolbar
	*
	* @param Array $params
	* @return bool
	*/
	function IsNewMode($params)
	{
	$object =& $this->getObject($params);
	return $object->GetID() <= 0;
	}

	/**
	* Returns view menu name for current prefix
	*
	* @param Array $params
	* @return string
	*/
	function GetItemName($params)
	{
	$item_name = $this->Application->getUnitOption($this->Prefix, 'ViewMenuPhrase');
	return $this->Application->Phrase($item_name);
	}

	function ViewMenu($params)
	{
	$block_params = $params;
	unset($block_params['block']);
	$block_params['name'] = $params['block'];

	$list =& $this->GetList($params);
	$block_params['PrefixSpecial'] = $list->getPrefixSpecial();
	return $this->Application->ParseBlock($block_params);
	}

	function SearchKeyword($params)
	{
	$list =& $this->GetList($params);
	return $this->Application->RecallVar($list->getPrefixSpecial().'_search_keyword');
	}

	/**
	* Draw filter menu content (for ViewMenu) based on filters defined in config
	*
	* @param Array $params
	* @return string
	*/
	function DrawFilterMenu($params)
	{
	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $params['spearator_block'];
	$separator = $this->Application->ParseBlock($block_params);
	$filter_menu = $this->Application->getUnitOption($this->Prefix,'FilterMenu');
	if(!$filter_menu)
	{
	trigger_error('<span class="debug_error">no filters defined</span> for prefix <b>'.$this->Prefix.'</b>, but <b>DrawFilterMenu</b> tag used', E_USER_WARNING);
	return '';
	}

	// Params: label, filter_action, filter_status
	$block_params['name'] = $params['item_block'];

	$view_filter = $this->Application->RecallVar($this->getPrefixSpecial().'_view_filter');
	if($view_filter === false)
	{
	$event_params = Array('prefix'=>$this->Prefix,'special'=>$this->Special,'name'=>'OnRemoveFilters');
	$this->Application->HandleEvent( new kEvent($event_params) );
	$view_filter = $this->Application->RecallVar($this->getPrefixSpecial().'_view_filter');
	}
	$view_filter = unserialize($view_filter);

	$filters = Array();
	$prefix_special = $this->getPrefixSpecial();

	foreach ($filter_menu['Filters'] as $filter_key => $filter_params) {
	$group_params = isset($filter_params['group_id']) ? $filter_menu['Groups'][ $filter_params['group_id'] ] : Array();
	if (!isset($group_params['element_type'])) {
	$group_params['element_type'] = 'checkbox';
	}

	if (!$filter_params) {
	$filters[] = $separator;
	continue;
	}

	$block_params['label'] = addslashes( $this->Application->Phrase($filter_params['label']) );
	if (getArrayValue($view_filter,$filter_key)) {
	$submit = 0;
	$status = $group_params['element_type'] == 'checkbox' ? 1 : 2;
	}
	else {
	$submit = 1;
	$status = 0;
	}
	$block_params['filter_action'] = 'set_filter("'.$prefix_special.'","'.$filter_key.'","'.$submit.'",'.$params['ajax'].');';
	$block_params['filter_status'] = $status; // 1 - checkbox, 2 - radio, 0 - no image
	$filters[] = $this->Application->ParseBlock($block_params);
	}


	return implode('', $filters);
	}

	function IterateGridFields($params)
	{
	$mode = $params['mode'];
	$def_block = $params['block'];

	$grids = $this->Application->getUnitOption($this->Prefix,'Grids');
	$grid_config = $grids[$params['grid']]['Fields'];

	$std_params['pass_params']='true';
	$std_params['PrefixSpecial']=$this->getPrefixSpecial();

	$o = '';
	foreach ($grid_config as $field => $options) {
	$block_params = Array();
	$block_params['name'] = isset($options[$mode.'_block']) ? $options[$mode.'_block'] : $def_block;
	$block_params['field'] = $field;
	$block_params['sort_field'] = isset($options['sort_field']) ? $options['sort_field'] : $field;
	$block_params['filter_field'] = isset($options['filter_field']) ? $options['filter_field'] : $field;
	$block_params = array_merge($std_params, $block_params, $options);
	$o.= $this->Application->ParseBlock($block_params, 1);
	}
	return $o;
	}

	function GridFieldsCount($params)
	{
	$grids = $this->Application->getUnitOption($this->Prefix, 'Grids');
	$grid_config = $grids[$params['grid']]['Fields'];

	return count($grid_config);
	}

	/**
	* Prints list content using block specified
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function PrintList($params)
	{
	$list =& $this->GetList($params);
	$id_field = $this->Application->getUnitOption($this->Prefix,'IDField');

	$list->Query();
	$o = '';
	$list->GoFirst();

	$block_params=$this->prepareTagParams($params);
	$block_params['name'] = $this->SelectParam($params, 'render_as,block');
	$block_params['pass_params'] = 'true';

	while (!$list->EOL())
	{
	$this->Application->SetVar( $this->getPrefixSpecial().'_id', $list->GetDBField($id_field) ); // for edit/delete links using GET
	$o.= $this->Application->ParseBlock($block_params, 1);
	$list->GoNext();
	}

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

	function InitList($params)
	{
	$list_name = isset($params['list_name']) ? $params['list_name'] : '';

	$names_mapping = $this->Application->GetVar('NamesToSpecialMapping');

	if( !getArrayValue($names_mapping, $this->Prefix, $list_name) )
	{
	$list =& $this->GetList($params);
	}
	}

	function BuildListSpecial($params)
	{
	return $this->Special;
	}

	/**
	* Enter description here...
	*
	* @param Array $params
	* @return kDBList
	*/
	function &GetList($params)
	{
	$list_name = $this->SelectParam($params, 'list_name,name');
	if (!$list_name) {
	$list_name = $this->Application->Parser->GetParam('list_name');
	}

	$requery = getArrayValue($params, 'requery');
	if ($list_name && !$requery){
	$names_mapping = $this->Application->GetVar('NamesToSpecialMapping');

	$special = getArrayValue($names_mapping, $this->Prefix, $list_name);
	if(!$special)
	{
	$special = $this->BuildListSpecial($params);
	}
	}
	else
	{
	$special = $this->BuildListSpecial($params);
	}

	$prefix_special = rtrim($this->Prefix.'.'.$special, '.');
	$params['skip_counting'] = true;
	$list =& $this->Application->recallObject( $prefix_special, $this->Prefix.'_List', $params);
	if ($requery) {
	$this->Application->HandleEvent($an_event, $prefix_special.':OnListBuild', $params);
	}
	$list->Query($requery);
	$this->Special = $special;

	if ($list_name) {
	$names_mapping[$this->Prefix][$list_name] = $special;
	$this->Application->SetVar('NamesToSpecialMapping', $names_mapping);
	}

	return $list;
	}

	function ListMarker($params)
	{
	$list =& $this->GetList($params);
	$ret = $list->getPrefixSpecial();
	if( getArrayValue($params, 'as_preg') ) $ret = preg_quote($ret, '/');
	return $ret;
	}

	function SubmitName($params)
	{
	$list =& $this->GetList($params);

	$prefix_special = $list->getPrefixSpecial();

	return 'events['.$prefix_special.']['.$params['event'].']';
	}


	function CombinedSortingDropDownName($params)
	{
	$list =& $this->GetList($params);
	$prefix_special = $list->getPrefixSpecial();

	return $prefix_special.'_CombinedSorting';
	}

	function SortingSelected($params)
	{
	$list =& $this->GetList($params);
	$user_sorting_start = $this->getUserSortIndex();

	$sorting = strtolower($list->GetOrderField($user_sorting_start).'\|'.$list->GetOrderDirection($user_sorting_start));

	if ($sorting == strtolower($params['sorting'])) return $params['selected'];
	}



	/**
	* Prints list content using block specified
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function PrintList2($params)
	{
	$per_page = $this->SelectParam($params, 'per_page,max_items');
	if ($per_page !== false) $params['per_page'] = $per_page;

	$list =& $this->GetList($params);
	$o = '';

	$direction = (isset($params['direction']) && $params['direction']=="H")?"H":"V";
	$columns = (isset($params['columns'])) ? $params['columns'] : 1;

	$id_field = (isset($params['id_field'])) ? $params['id_field'] : $this->Application->getUnitOption($this->Prefix, 'IDField');

	if ($columns>1 && $direction=="V") {
	$list->Records = $this->LinearToVertical($list->Records, $columns, $list->GetPerPage());
	$list->SelectedCount=count($list->Records);
	ksort($list->Records); // this is issued twice, maybe need to be removed
	}

	$list->GoFirst();

	$block_params=$this->prepareTagParams($params);
	$block_params['name']=$this->SelectParam($params, 'render_as,block');
	$block_params['pass_params']='true';
	$block_params['column_width'] = 100 / $columns;
	$block_start_row_params = $this->prepareTagParams($params);
	$block_start_row_params['name'] = $this->SelectParam($params, 'row_start_render_as,block_row_start,row_start_block');

	$block_end_row_params=$this->prepareTagParams($params);
	$block_end_row_params['name'] = $this->SelectParam($params, 'row_end_render_as,block_row_end,row_end_block');

	$block_empty_cell_params = $this->prepareTagParams($params);
	$block_empty_cell_params['name'] = $this->SelectParam($params, 'empty_cell_render_as,block_empty_cell,empty_cell_block');

	$i=0;

	$backup_id=$this->Application->GetVar($this->Prefix."_id");
	$displayed = array();
	$column_number = 1;

	$cache_mod_rw = $this->Application->getUnitOption($this->Prefix, 'CacheModRewrite') && $this->Application->RewriteURLs();

	while (!$list->EOL())
	{
	$this->Application->SetVar( $this->getPrefixSpecial().'_id', $list->GetDBField($id_field) ); // for edit/delete links using GET
	$this->Application->SetVar( $this->Prefix.'_id', $list->GetDBField($id_field) );

	if ($cache_mod_rw) {
	$this->Application->setCache('filenames', $this->Prefix.'_'.$list->GetDBField($id_field), $list->GetDBField('Filename'));
	$this->Application->setCache('filenames', 'c_'.$list->GetDBField('CategoryId'), $list->GetDBField('CategoryFilename'));
	}

	if ($i % $columns == 0) {
	// record in this iteration is first in row, then open row
	$column_number = 1;
	$o.= $block_start_row_params['name'] ?
	$this->Application->ParseBlock($block_start_row_params, 1) :
	(!isset($params['no_table']) ? '<tr>' : '');
	}
	else {
	$column_number++;
	}

	$block_params['column_number'] = $column_number;
	$o.= $this->Application->ParseBlock($block_params, 1);
	array_push($displayed, $list->GetDBField($id_field));

	if (($i+1) % $columns == 0) {
	// record in next iteration is first in row too, then close this row
	$o.= $block_end_row_params['name'] ?
	$this->Application->ParseBlock($block_end_row_params, 1) :
	(!isset($params['no_table']) ? '<tr>' : '');
	}

	$list->GoNext();
	$i++;
	}

	// append empty cells in place of missing cells in last row
	while ($i % $columns != 0) {
	// until next cell will be in new row append empty cells
	$o .= $block_empty_cell_params['name'] ? $this->Application->ParseBlock($block_empty_cell_params, 1) : '<td> </td>';

	if (($i+1) % $columns == 0) {
	// record in next iteration is first in row too, then close this row
	$o .= $block_end_row_params['name'] ? $this->Application->ParseBlock($block_end_row_params, 1) : '</tr>';
	}
	$i++;
	}

	$cur_displayed = $this->Application->GetVar($this->Prefix.'_displayed_ids');
	if (!$cur_displayed) {
	$cur_displayed = Array();
	}
	else {
	$cur_displayed = explode(',', $cur_displayed);
	}

	$displayed = array_unique(array_merge($displayed, $cur_displayed));
	$this->Application->SetVar($this->Prefix.'_displayed_ids', implode(',',$displayed));

	$this->Application->SetVar( $this->Prefix.'_id', $backup_id);
	$this->Application->SetVar( $this->getPrefixSpecial().'_id', '');

	if (isset($params['more_link_render_as'])) {
	$block_params = $params;
	$params['render_as'] = $params['more_link_render_as'];
	$o .= $this->MoreLink($params);
	}

	return $o;
	}

	function MoreLink($params)
	{
	$per_page = $this->SelectParam($params, 'per_page,max_items');
	if ($per_page !== false) $params['per_page'] = $per_page;
	$list =& $this->GetList($params);
	if ($list->PerPage < $list->RecordsCount) {
	$block_params = array();
	$block_params['name'] = $this->SelectParam($params, 'render_as,block');
	return $this->Application->ParseBlock($block_params, 1);
	}
	}

	function NotLastItem($params)
	{
	$object =& $this->getList($params); // maybe we should use $this->GetList($params) instead
	return ($object->CurrentIndex < min($object->PerPage == -1 ? $object->RecordsCount : $object->PerPage, $object->RecordsCount) - 1);
	}

	function PageLink($params)
	{
	$t = isset($params['template']) ? $param['template'] : '';
	if (!$t) $t = $this->Application->GetVar('t');

	if (isset($params['page'])) {
	$this->Application->SetVar($this->getPrefixSpecial().'_Page', $params['page']);
	}

	// $http_query =& $this->Application->recallObject('HTTPQuery');
	// $get = $http_query->getRedirectParams();
	$pass = Array('pass' => 'm,'.$this->getPrefixSpecial());
	// $pass = array_merge($get, $pass);

	return $this->Application->HREF($t, '', $pass);
	}

	function ColumnWidth($params)
	{
	$columns = $this->Application->Parser->GetParam('columns');
	return round(100/$columns).'%';
	}

	/**
	* Append prefix and special to tag
	* params (get them from tagname) like
	* they were really passed as params
	*
	* @param Array $tag_params
	* @return Array
	* @access protected
	*/
	function prepareTagParams($tag_params = Array())
	{
	/*if (isset($tag_params['list_name'])) {
	$list =& $this->GetList($tag_params);
	$this->Init($list->Prefix, $list->Special);
	}*/

	$ret = $tag_params;
	$ret['Prefix'] = $this->Prefix;
	$ret['Special'] = $this->Special;
	$ret['PrefixSpecial'] = $this->getPrefixSpecial();
	return $ret;
	}

	function GetISO($currency)
	{
	if ($currency == 'selected') {
	$iso = $this->Application->RecallVar('curr_iso');
	}
	elseif ($currency == 'primary' \|\| $currency == '') {
	$iso = $this->Application->GetPrimaryCurrency();
	}
	else { //explicit currency
	$iso = $currency;
	}
	return $iso;
	}

	function ConvertCurrency($value, $iso)
	{
	$converter =& $this->Application->recallObject('kCurrencyRates');
	// convery primary currency to selected (if they are the same, converter will just return)
	$value = $converter->Convert($value, 'PRIMARY', $iso);
	return $value;
	}

	function AddCurrencySymbol($value, $iso)
	{
	$currency =& $this->Application->recallObject('curr.-'.$iso, null, Array('skip_autoload' => true));
	if( !$currency->isLoaded() ) $currency->Load($iso, 'ISO');

	$symbol = $currency->GetDBField('Symbol');
	if (!$symbol) $symbol = $currency->GetDBField('ISO').' ';
	if ($currency->GetDBField('SymbolPosition') == 0) {
	$value = $symbol.$value;
	}
	if ($currency->GetDBField('SymbolPosition') == 1) {
	$value = $value.$symbol;
	}
	return $value;
	}

	/**
	* Get's requested field value
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function Field($params)
	{
	$field = $this->SelectParam($params, 'name,field');

	if( !$this->Application->IsAdmin() ) $params['no_special'] = 'no_special';

	$object =& $this->getObject($params);

	if ( $this->HasParam($params, 'db') )
	{
	$value = $object->GetDBField($field);
	}
	else
	{
	if( $this->HasParam($params, 'currency') )
	{
	$iso = $this->GetISO($params['currency']);
	$original = $object->GetDBField($field);
	$value = $this->ConvertCurrency($original, $iso);
	$object->SetDBField($field, $value);
	$object->Fields[$field]['converted'] = true;
	}

	$format = getArrayValue($params, 'format');
	if( !$format \|\| $format == '$format' )
	{
	$format = null;
	}
	else
	{
	if(preg_match("/_regional_(.*)/", $format, $regs))
	{
	$lang =& $this->Application->recallObject('lang.current');
	$format = $lang->GetDBField($regs[1]);
	}
	}
	$value = $object->GetField($field, $format);

	if( $this->SelectParam($params, 'negative') )
	{
	if(strpos($value, '-') === 0)
	{
	$value = substr($value, 1);
	}
	else
	{
	$value = '-'.$value;
	}
	}

	if( $this->HasParam($params, 'currency') )
	{
	$value = $this->AddCurrencySymbol($value, $iso);
	$params['no_special'] = 1;
	}
	}

	if( !$this->HasParam($params, 'no_special') ) $value = htmlspecialchars($value);
	if( getArrayValue($params,'checked' ) ) $value = ($value == ( isset($params['value']) ? $params['value'] : 1)) ? 'checked' : '';
	if( isset($params['plus_or_as_label']) ) {
	$value = substr($value, 0,1) == '+' ? substr($value, 1) : $this->Application->Phrase($value);
	}
	elseif( getArrayValue($params,'as_label') ) $value = $this->Application->Phrase($value);

	$first_chars = $this->SelectParam($params,'first_chars,cut_first');
	if($first_chars)
	{
	$needs_cut = strlen($value) > $first_chars;
	$value = substr($value,0,$first_chars);
	if($needs_cut) $value .= ' ...';
	}
	if( getArrayValue($params,'nl2br' ) ) $value = nl2br($value);

	if ($value != '') $this->Application->Parser->DataExists = true;

	if( $this->HasParam($params, 'currency') )
	{
	//restoring value in original currency, for other Field tags to work properly
	$object->SetDBField($field, $original);
	}

	return $value;
	}

	function SetField($params)
	{
	// <inp2:SetField field="Value" src=p:cust_{$custom_name}"/>

	$object =& $this->getObject($params);
	$dst_field = $this->SelectParam($params, 'name,field');

	list($prefix_special, $src_field) = explode(':', $params['src']);
	$src_object =& $this->Application->recallObject($prefix_special);
	$object->SetDBField($dst_field, $src_object->GetDBField($src_field));
	}

	/**
	* Checks if parameter is passed
	* Note: works like Tag and line simple method too
	*
	* @param Array $params
	* @param string $param_name
	* @return bool
	*/
	function HasParam($params, $param_name = null)
	{
	if( !isset($param_name) )
	{
	$param_name = $this->SelectParam($params, 'name');
	$params = $this->Application->Parser->Params;
	}
	$value = getArrayValue($params, $param_name);
	return $value && ($value != '$'.$param_name);
	}

	function PhraseField($params)
	{
	$field_label = $this->Field($params);
	$translation = $this->Application->Phrase( $field_label );
	return $translation;
	}

	function Error($params)
	{
	$field = $this->SelectParam($params, 'name,field');
	$object =& $this->getObject($params);
	$msg = $object->GetErrorMsg($field, false);
	return $msg;
	}

	function HasError($params)
	{
	if ($params['field'] == 'any')
	{
	$object =& $this->getObject($params);

	$skip_fields = getArrayValue($params, 'except');
	$skip_fields = $skip_fields ? explode(',', $skip_fields) : Array();

	return $object->HasErrors($skip_fields);
	}
	else
	{
	$fields = $this->SelectParam($params, 'field,fields');
	$fields = explode(',', $fields);
	$res = false;
	foreach($fields as $field)
	{
	$params['field'] = $field;
	$res = $res \|\| ($this->Error($params) != '');
	}
	return $res;
	}
	}

	function IsRequired($params)
	{
	$field = $params['field'];
	$object =& $this->getObject($params);;

	$formatter_class = getArrayValue($object->Fields, $field, 'formatter');
	if ($formatter_class == 'kMultiLanguage')
	{
	$formatter =& $this->Application->recallObject($formatter_class);
	$field = $formatter->LangFieldName($field);
	}

	$options = $object->GetFieldOptions($field);
	return getArrayValue($options,'required');
	}

	function PredefinedOptions($params)
	{
	$field = $params['field'];
	$object =& $this->getObject($params);

	$value = $object->GetDBField($field);
	$options = $object->GetFieldOptions($field);
	if( $this->HasParam($params,'has_empty') )
	{
	$empty_value = getArrayValue($params, 'empty_value');
	if($empty_value === false) $empty_value = '';
	$options['options'] = array_merge_recursive2( Array($empty_value => ''), $options['options'] );
	}

	$block_params = $this->prepareTagParams($params);

	$block_params['name'] = $this->SelectParam($params, 'render_as,block');
	$block_params['field'] = $params['field'];
	$block_params['pass_params'] = 'true';
	$block_params['field_name'] = $this->InputName($params);
	$block_params['PrefixSpecial'] = $this->getPrefixSpecial();

	$selected_param_name = getArrayValue($params,'selected_param');
	if(!$selected_param_name) $selected_param_name = $params['selected'];
	$selected = $params['selected'];

	$o = '';
	if( $this->HasParam($params,'no_empty') && !getArrayValue($options['options'],'') ) array_shift($options['options']);

	if( strpos($value, '\|') !== false )
	{
	// multiple selection checkboxes
	$value = explode('\|', substr($value, 1, -1) );
	foreach ($options['options'] as $key => $val)
	{
	$block_params['key'] = $key;
	$block_params['option'] = $val;
	$block_params[$selected_param_name] = ( in_array($key, $value) ? ' '.$selected : '');
	$o .= $this->Application->ParseBlock($block_params, 1);
	}
	}
	else
	{
	// single selection radio or checkboxes
	foreach ($options['options'] as $key => $val)
	{
	$block_params['key'] = $key;
	$block_params['option'] = $val;
	$block_params[$selected_param_name] = ( $key == $value ? ' '.$selected : '');
	$o .= $this->Application->ParseBlock($block_params, 1);
	}
	}
	return $o;
	}

	function PredefinedSearchOptions($params)
	{
	$object =& $this->getObject($params);
	$field = $params['field'];
	$saved_value = $object->GetDBField($field);

	$object->SetDBField($field, $this->SearchField($params));
	- $custom_filter = $this->Application->RecallVar($this->getPrefixSpecial().'_custom_filter');
	+ $view_name = $this->Application->RecallVar($this->getPrefixSpecial().'_current_view');
	+ $custom_filter = $this->Application->RecallPersistentVar($this->getPrefixSpecial().'_custom_filter.'.$view_name);

	$ret = $this->PredefinedOptions($params);
	$object->SetDBField($field, $saved_value);
	return $ret;
	}

	function Format($params)
	{
	$field = $this->SelectParam($params, 'name,field');
	$object =& $this->getObject($params);

	$options = $object->GetFieldOptions($field);

	$format = $options[ $this->SelectParam($params, 'input_format') ? 'input_format' : 'format' ];

	$formatter_class = getArrayValue($options,'formatter');
	if($formatter_class)
	{
	$formatter =& $this->Application->recallObject($formatter_class);
	$human_format = getArrayValue($params,'human');
	$edit_size = getArrayValue($params,'edit_size');
	$sample = getArrayValue($params,'sample');
	if($sample)
	{
	return $formatter->GetSample($field, $options, $object);
	}
	elseif($human_format \|\| $edit_size)
	{
	$format = $formatter->HumanFormat($format);
	return $edit_size ? strlen($format) : $format;
	}
	}

	return $format;
	}

	/**
	* Print grid pagination using
	* block names specified
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function PrintPages($params)
	{
	$list =& $this->GetList($params);
	$prefix_special = $list->getPrefixSpecial();
	$total_pages = $list->GetTotalPages();

	if ($total_pages > 1) $this->Application->Parser->DataExists = true;

	if($total_pages == 0) $total_pages = 1; // display 1st page as selected in case if we have no pages at all
	$o = '';

	// what are these 2 lines for?
	$this->Application->SetVar($prefix_special.'_event','');
	$this->Application->SetVar($prefix_special.'_id','');

	$current_page = $list->Page; // $this->Application->RecallVar($prefix_special.'_Page');

	$block_params = $this->prepareTagParams($params);

	$split = ( isset($params['split'] ) ? $params['split'] : 10 );

	$split_start = $current_page - ceil($split/2);
	if ($split_start < 1){
	$split_start = 1;
	}
	$split_end = $split_start + $split-1;

	if ($split_end > $total_pages) {
	$split_end = $total_pages;
	$split_start = max($split_end - $split + 1, 1);
	}

	if ($current_page > 1){
	$prev_block_params = $this->prepareTagParams();

	if ($total_pages > $split){
	$prev_block_params['page'] = max($current_page-$split, 1);
	$prev_block_params['name'] = $this->SelectParam($params, 'prev_page_split_render_as,prev_page_split_block');
	if ($prev_block_params['name']){
	$o .= $this->Application->ParseBlock($prev_block_params, 1);
	}
	}

	$prev_block_params['name'] = 'page';
	$prev_block_params['page'] = $current_page-1;
	$prev_block_params['name'] = $this->SelectParam($params, 'prev_page_render_as,block_prev_page,prev_page_block');
	if ($prev_block_params['name']) {
	$this->Application->SetVar($this->getPrefixSpecial().'_Page', $current_page-1);
	$o .= $this->Application->ParseBlock($prev_block_params, 1);
	}
	}
	else {
	if ( $no_prev_page_block = $this->SelectParam($params, 'no_prev_page_render_as,block_no_prev_page') ) {
	$block_params['name'] = $no_prev_page_block;
	$o .= $this->Application->ParseBlock($block_params, 1);
	}
	}

	$separator_params['name'] = $this->SelectParam($params, 'separator_render_as,block_separator');
	for ($i = $split_start; $i <= $split_end; $i++)
	{
	if ($i == $current_page) {
	$block = $this->SelectParam($params, 'current_render_as,active_render_as,block_current,active_block');
	}
	else {
	$block = $this->SelectParam($params, 'link_render_as,inactive_render_as,block_link,inactive_block');
	}

	$block_params['name'] = $block;
	$block_params['page'] = $i;
	$this->Application->SetVar($this->getPrefixSpecial().'_Page', $i);
	$o .= $this->Application->ParseBlock($block_params, 1);

	if ($this->SelectParam($params, 'separator_render_as,block_separator')
	&& $i < $split_end)
	{
	$o .= $this->Application->ParseBlock($separator_params, 1);
	}
	}

	if ($current_page < $total_pages){
	$next_block_params = $this->prepareTagParams();
	$next_block_params['page']=$current_page+1;
	$next_block_params['name'] = $this->SelectParam($params, 'next_page_render_as,block_next_page,next_page_block');
	if ($next_block_params['name']){
	$this->Application->SetVar($this->getPrefixSpecial().'_Page', $current_page+1);
	$o .= $this->Application->ParseBlock($next_block_params, 1);
	}
	if ($total_pages > $split){
	$next_block_params['page']=min($current_page+$split, $total_pages);
	$next_block_params['name'] = $this->SelectParam($params, 'next_page_split_render_as,next_page_split_block');
	if ($next_block_params['name']){
	$o .= $this->Application->ParseBlock($next_block_params, 1);
	}
	}
	}

	$this->Application->SetVar($this->getPrefixSpecial().'_Page', $current_page);
	return $o;
	}

	/**
	* Print grid pagination using
	* block names specified
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function PaginationBar($params)
	{
	return $this->PrintPages($params);
	}


	/**
	* Returns field name (processed by kMultiLanguage formatter
	* if required) and item's id from it's IDField or field required
	*
	* @param Array $params
	* @return Array (id,field)
	* @access private
	*/
	function prepareInputName($params)
	{
	$field = $this->SelectParam($params, 'name,field');
	$object =& $this->getObject($params);

	$formatter_class = getArrayValue($object->Fields, $field, 'formatter');
	if ($formatter_class == 'kMultiLanguage')
	{
	$formatter =& $this->Application->recallObject($formatter_class);
	$field = $formatter->LangFieldName($field);
	}

	$id_field = getArrayValue($params, 'IdField');
	$id = $id_field ? $object->GetDBField($id_field) : $object->GetID();

	return Array($id, $field);
	}


	/**
	* 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().'['.$id.']['.$field.']';
	if( getArrayValue($params, 'as_preg') ) $ret = preg_quote($ret, '/');
	return $ret;
	}

	/**
	* Allows to override various field options through hidden fields with specific names in submit.
	* This tag generates this special names
	*
	* @param Array $params
	* @return string
	* @author Alex
	*/
	function FieldModifier($params)
	{
	list($id, $field) = $this->prepareInputName($params);

	$ret = 'field_modifiers['.$this->getPrefixSpecial().']['.$field.']['.$params['type'].']';
	if( getArrayValue($params, 'as_preg') ) $ret = preg_quote($ret, '/');
	return $ret;
	}

	/**
	* Returns index where 1st changable sorting field begins
	*
	* @return int
	* @access private
	*/
	function getUserSortIndex()
	{
	$list_sortings = $this->Application->getUnitOption($this->Prefix, 'ListSortings');
	$sorting_prefix = getArrayValue($list_sortings, $this->Special) ? $this->Special : '';

	$user_sorting_start = 0;
	if ( $forced_sorting = getArrayValue($list_sortings, $sorting_prefix, 'ForcedSorting') ) {
	$user_sorting_start = count($forced_sorting);
	}
	return $user_sorting_start;
	}

	/**
	* Returns order direction for given field
	*
	*
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function Order($params)
	{
	$field = $params['field'];
	$user_sorting_start = $this->getUserSortIndex();

	$list =& $this->GetList($params);

	if ($list->GetOrderField($user_sorting_start) == $field)
	{
	return strtolower($list->GetOrderDirection($user_sorting_start));
	}
	elseif($list->GetOrderField($user_sorting_start+1) == $field)
	{
	return '2_'.strtolower($list->GetOrderDirection($user_sorting_start+1));
	}
	else
	{
	return 'no';
	}
	}

	/**
	* Get's information of sorting field at "pos" position,
	* like sorting field name (type="field") or sorting direction (type="direction")
	*
	* @param Array $params
	* @return mixed
	*/
	function OrderInfo($params)
	{
	$user_sorting_start = $this->getUserSortIndex() + --$params['pos'];
	$list =& $this->GetList($params);
	// $object =& $this->Application->recallObject( $this->getPrefixSpecial() );

	if($params['type'] == 'field') return $list->GetOrderField($user_sorting_start);
	if($params['type'] == 'direction') return $list->GetOrderDirection($user_sorting_start);
	}

	/**
	* Checks if sorting field/direction matches passed field/direction parameter
	*
	* @param Array $params
	* @return bool
	*/
	function IsOrder($params)
	{
	$params['type'] = isset($params['field']) ? 'field' : 'direction';
	$value = $this->OrderInfo($params);

	if( isset($params['field']) ) return $params['field'] == $value;
	if( isset($params['direction']) ) return $params['direction'] == $value;
	}

	/**
	* Returns list perpage
	*
	* @param Array $params
	* @return int
	*/
	function PerPage($params)
	{
	$object =& $this->getObject($params);
	return $object->PerPage;
	}

	/**
	* Checks if list perpage matches value specified
	*
	* @param Array $params
	* @return bool
	*/
	function PerPageEquals($params)
	{
	$object =& $this->getObject($params);
	return $object->PerPage == $params['value'];
	}

	function SaveEvent($params)
	{
	// SaveEvent is set during OnItemBuild, but we may need it before any other tag calls OnItemBuild
	$object =& $this->getObject($params);
	return $this->Application->GetVar($this->getPrefixSpecial().'_SaveEvent');
	}

	function NextId($params)
	{
	$object =& $this->getObject($params);
	$ids = explode(',', $this->Application->RecallVar($this->getPrefixSpecial().'_selected_ids'));

	$cur_id = $object->GetID();

	$i = array_search($cur_id, $ids);
	if ($i !== false) {
	return $i < count($ids) - 1 ? $ids[$i + 1] : '';
	}
	return '';
	}

	function PrevId($params)
	{
	$object =& $this->getObject($params);
	$ids = explode(',', $this->Application->RecallVar($this->getPrefixSpecial().'_selected_ids'));

	$cur_id = $object->GetID();

	$i = array_search($cur_id, $ids);
	if ($i !== false) {
	return $i > 0 ? $ids[$i - 1] : '';
	}
	return '';
	}

	function IsSingle($params)
	{
	return ($this->NextId($params) === '' && $this->PrevId($params) === '');
	}

	function IsLast($params)
	{
	return ($this->NextId($params) === '');
	}

	function IsFirst($params)
	{
	return ($this->PrevId($params) === '');
	}

	/**
	* Checks if field value is equal to proposed one
	*
	* @param Array $params
	* @return bool
	*/
	function FieldEquals($params)
	{
	$object =& $this->getObject($params);
	$ret = $object->GetDBField($this->SelectParam($params, 'name,field')) == $params['value'];
	// if( getArrayValue($params,'inverse') ) $ret = !$ret;
	return $ret;
	}

	function ItemIcon($params)
	{
	$object =& $this->getObject($params);

	$grids = $this->Application->getUnitOption($this->Prefix,'Grids');
	$icons =& $grids[ $params['grid'] ]['Icons'];

	$key = '';
	$status_fields = $this->Application->getUnitOption($this->Prefix,'StatusField');
	if(!$status_fields) return $icons['default'];

	foreach($status_fields as $status_field)
	{
	$key .= $object->GetDBField($status_field).'_';
	}
	$key = rtrim($key,'_');
	$value = ($key !== false) ? $key : 'default';

	return isset($icons[$value]) ? $icons[$value] : $icons['default'];
	}

	/**
	* Generates bluebar title + initializes prefixes used on page
	*
	* @param Array $params
	* @return string
	*/
	function SectionTitle($params)
	{
	$preset_name = replaceModuleSection($params['title_preset']);
	$title_presets = $this->Application->getUnitOption($this->Prefix,'TitlePresets');
	$title_info = getArrayValue($title_presets, $preset_name);
	if($title_info === false) return str_replace('#preset_name#', $preset_name, $params['title']);

	if( getArrayValue($title_presets,'default') )
	{
	// use default labels + custom labels specified in preset used
	$title_info = array_merge_recursive2($title_presets['default'], $title_info);
	}

	$title = $title_info['format'];

	// 1. get objects in use for title construction
	$objects = Array();
	$object_status = Array();
	$status_labels = Array();

	$prefixes = getArrayValue($title_info,'prefixes');
	$all_tag_params = getArrayValue($title_info,'tag_params');
	if($prefixes)
	{
	$tag_params = Array();
	foreach($prefixes as $prefix_special)
	{
	$prefix_data = $this->Application->processPrefix($prefix_special);
	$prefix_data['prefix_special'] = rtrim($prefix_data['prefix_special'],'.');

	if($all_tag_params)
	{
	$tag_params = getArrayValue($all_tag_params, $prefix_data['prefix_special']);
	if(!$tag_params) $tag_params = Array();
	}

	$tag_params = array_merge_recursive2($params, $tag_params);
	$objects[ $prefix_data['prefix_special'] ] =& $this->Application->recallObject($prefix_data['prefix_special'], $prefix_data['prefix'], $tag_params);
	$object_status[ $prefix_data['prefix_special'] ] = $objects[ $prefix_data['prefix_special'] ]->IsNewItem() ? 'new' : 'edit';

	// a. set object's status field (adding item/editing item) for each object in title
	if( getArrayValue($title_info[ $object_status[ $prefix_data['prefix_special'] ].'_status_labels' ],$prefix_data['prefix_special']) )
	{
	$status_labels[ $prefix_data['prefix_special'] ] = $title_info[ $object_status[ $prefix_data['prefix_special'] ].'_status_labels' ][ $prefix_data['prefix_special'] ];
	$title = str_replace('#'.$prefix_data['prefix_special'].'_status#', $status_labels[ $prefix_data['prefix_special'] ], $title);
	}

	// b. setting object's titlefield value (in titlebar ONLY) to default in case if object beeing created with no titlefield filled in
	if( $object_status[ $prefix_data['prefix_special'] ] == 'new' )
	{
	$new_value = $this->getInfo( $objects[ $prefix_data['prefix_special'] ], 'titlefield' );
	if(!$new_value && getArrayValue($title_info['new_titlefield'],$prefix_data['prefix_special']) ) $new_value = $this->Application->Phrase($title_info['new_titlefield'][ $prefix_data['prefix_special'] ]);
	$title = str_replace('#'.$prefix_data['prefix_special'].'_titlefield#', $new_value, $title);
	}
	}
	}

	// 2. replace phrases if any found in format string
	$title = $this->Application->ReplaceLanguageTags($title,false);

	// 3. find and replace any replacement vars
	preg_match_all('/#(._.)#/Uis',$title,$rets);
	if($rets[1])
	{
	$replacement_vars = array_keys( array_flip($rets[1]) );
	foreach($replacement_vars as $replacement_var)
	{
	$var_info = explode('_',$replacement_var,2);
	$object =& $objects[ $var_info[0] ];
	$new_value = $this->getInfo($object,$var_info[1]);
	$title = str_replace('#'.$replacement_var.'#', $new_value, $title);
	}
	}

	$cut_first = getArrayValue($params,'cut_first');
	if( $cut_first && strlen($title) > $cut_first && !preg_match('/<a href="(.)">(.)<\/a>/',$title) ) $title = substr($title, 0, $cut_first).' ...';

	return $title;
	}

	function getInfo(&$object, $info_type)
	{
	switch ($info_type)
	{
	case 'titlefield':
	$field = $this->Application->getUnitOption($object->Prefix,'TitleField');
	return $field !== false ? $object->GetField($field) : 'TitleField Missing';
	break;

	case 'recordcount':
	$of_phrase = $this->Application->Phrase('la_of');
	return $object->NoFilterCount != $object->RecordsCount ? $object->RecordsCount.' '.$of_phrase.' '.$object->NoFilterCount : $object->RecordsCount;
	break;

	default:
	return $object->GetField($info_type);
	break;
	}
	}

	/**
	* Parses block depending on its element type.
	* For radio and select elements values are taken from 'value_list_field' in key1=value1,key2=value2
	* format. key=value can be substituted by <SQL>SELECT f1 AS OptionName, f2 AS OptionValue... FROM <PREFIX>TableName </SQL>
	* where prefix is TABLE_PREFIX
	*
	* @param Array $params
	* @return string
	*/
	function ConfigFormElement($params)
	{
	$object =& $this->getObject($params);
	$field = $params['field'];

	$helper =& $this->Application->recallObject('InpCustomFieldsHelper');

	$element_type = $object->GetDBField($params['element_type_field']);

	if($element_type == 'label') $element_type = 'text';
	$params['name'] = $params['blocks_prefix'].$element_type;

	switch ($element_type) {
	case 'select':
	case 'radio':
	$field_options = $object->GetFieldOptions($field, 'options');
	$field_options['options'] = $helper->GetValuesHash( $object->GetDBField($params['value_list_field']) );
	$object->SetFieldOptions($field, $field_options);
	break;

	case 'text':
	case 'textarea':
	$params['field_params'] = $helper->ParseConfigSQL($object->GetDBField($params['value_list_field']));
	break;

	case 'password':
	case 'checkbox':
	default:
	break;
	}
	return $this->Application->ParseBlock($params, 1);
	}

	/**
	* Get's requested custom field value
	*
	* @param Array $params
	* @return string
	* @access public
	*/
	function CustomField($params)
	{
	$params['name'] = 'cust_'.$this->SelectParam($params, 'name,field');
	return $this->Field($params);
	}

	function CustomFieldLabel($params)
	{
	$object =& $this->getObject($params);

	$field = $this->SelectParam($params, 'name,field');

	$sql = 'SELECT FieldLabel
	FROM '.$this->Application->getUnitOption('cf', 'TableName').'
	WHERE FieldName = '.$this->Conn->qstr($field);
	return $this->Application->Phrase($this->Conn->GetOne($sql));
	}

	/**
	* transposes 1-dimensional array elements for vertical alignment according to given columns and per_page parameters
	*
	* @param array $arr
	* @param int $columns
	* @param int $per_page
	* @return array
	*/
	function LinearToVertical(&$arr, $columns, $per_page)
	{
	$rows = $columns;
	// in case if after applying per_page limit record count less then
	// can fill requrested column count, then fill as much as we can
	$cols = min(ceil($per_page / $columns), ceil(count($arr) / $columns));
	$imatrix = array();
	for ($row = 0; $row < $rows; $row++) {
	for ($col = 0; $col < $cols; $col++) {
	$source_index = $row * $cols + $col;
	if (!isset($arr[$source_index])) {
	// in case if source array element count is less then element count in one row
	continue;
	}
	$imatrix[$col * $rows + $row] = $arr[$source_index];
	}
	}

	ksort($imatrix);
	reset($imatrix);
	return $imatrix;
	}

	/**
	* If data was modfied & is in TempTables mode, then parse block with name passed;
	* remove modification mark if not in TempTables mode
	*
	* @param Array $params
	* @return string
	* @access public
	* @author Alexey
	*/
	function 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 = $this->Application->GetVar($top_prefix.'_mode') == 't';
	$modified = $this->Application->RecallVar($top_prefix.'_modified');

	if ($temp_tables && $modified) {
	$block_params = $this->prepareTagParams($params);
	$block_params['name'] = $this->SelectParam($params, 'render_as,name');
	$block_params['edit_mode'] = $temp_tables ? 1 : 0;
	return $this->Application->ParseBlock($block_params);
	}
	$this->Application->RemoveVar($top_prefix.'_modified');
	return '';
	}

	/**
	* Returns list record count queries (on all pages)
	*
	* @param Array $params
	* @return int
	*/
	function TotalRecords($params)
	{
	$list =& $this->GetList($params);
	if (!$list->Counted) $list->CountRecs();
	return $list->RecordsCount;
	}

	/**
	* Range filter field name
	*
	* @param Array $params
	* @return string
	*/
	function SearchInputName($params)
	{
	$field = $this->SelectParam($params, 'field,name');

	$ret = 'custom_filters['.$this->getPrefixSpecial().']['.$params['grid'].']['.$field.']['.$params['filter_type'].']';

	if (isset($params['type'])) {
	$ret .= '['.$params['type'].']';
	}

	return $ret;
	}

	/**
	* Return range filter field value
	*
	* @param Array $params
	* @return string
	*/
	function SearchField($params) // RangeValue
	{
	$field = $this->SelectParam($params, 'field,name');

	- $custom_filter = $this->Application->RecallVar($this->getPrefixSpecial().'_custom_filter');
	+ $view_name = $this->Application->RecallVar($this->getPrefixSpecial().'_current_view');
	+ $custom_filter = $this->Application->RecallPersistentVar($this->getPrefixSpecial().'_custom_filter.'.$view_name);
	$custom_filter = $custom_filter ? unserialize($custom_filter) : Array();

	if (isset($custom_filter[ $params['grid'] ][$field])) {
	$ret = $custom_filter[ $params['grid'] ][$field][ $params['filter_type'] ]['submit_value'];
	if (isset($params['type'])) {
	$ret = $ret[ $params['type'] ];
	}
	return $ret;
	}

	return '';
	}

	function SearchFormat($params)
	{
	$field = $params['field'];
	$object =& $this->GetList($params);

	$options = $object->GetFieldOptions($field);

	$format = $options[ $this->SelectParam($params, 'input_format') ? 'input_format' : 'format' ];

	$formatter_class = getArrayValue($options,'formatter');
	if($formatter_class)
	{
	$formatter =& $this->Application->recallObject($formatter_class);
	$human_format = getArrayValue($params,'human');
	$edit_size = getArrayValue($params,'edit_size');
	$sample = getArrayValue($params,'sample');
	if($sample)
	{
	return $formatter->GetSample($field, $options, $object);
	}
	elseif($human_format \|\| $edit_size)
	{
	$format = $formatter->HumanFormat($format);
	return $edit_size ? strlen($format) : $format;
	}
	}

	return $format;
	}

	/**
	* Returns error of range field
	*
	* @param unknown_type $params
	* @return unknown
	*/
	function SearchError($params)
	{
	$field = $this->SelectParam($params, 'field,name');

	$error_var_name = $this->getPrefixSpecial().'_'.$field.'_'.$params['type'].'_error';
	$error_msg = $this->Application->RecallVar($error_var_name);
	if($error_msg)
	{
	$this->Application->StoreVar($error_var_name, '');
	}

	$object =& $this->Application->recallObject($this->Prefix.'.'.$this->Special.'-item', null, Array('skip_autoload' => true));
	return $object->ErrorMsgs[$error_msg];
	}

	/**
	* Returns templates path for module, which is gathered from prefix module
	*
	* @param Array $params
	* @return string
	* @author Alex
	*/
	function ModulePath($params)
	{
	$force_module = getArrayValue($params, 'module');
	if ($force_module) {
	if ($force_module == '#session#') {
	$force_module = $this->Application->RecallVar('module');
	if (!$force_module) $force_module = 'core';
	}
	else {
	$force_module = strtolower($force_module);
	}

	if ($force_module == 'core') {
	$module_folder = 'core';
	}
	else {
	$module_folder = trim( $this->Application->findModule('Name', $force_module, 'Path'), '/');
	}
	}
	else {
	$module_folder = $this->Application->getUnitOption($this->Prefix, 'ModuleFolder');
	}
	return '../../'.$module_folder.'/admin_templates/';
	}

	/**
	* Returns object used in tag processor
	*
	* @access public
	* @return kDBBase
	*/
	function &getObject($params = Array())
	{
	$object =& $this->Application->recallObject($this->getPrefixSpecial(), $this->Prefix, $params);
	return $object;
	}

	/**
	* Checks if object propery value matches value passed
	*
	* @param Array $params
	* @return bool
	*/
	function PropertyEquals($params)
	{
	$object =& $this->getObject($params);
	$property_name = $this->SelectParam($params, 'name,var,property');
	return $object->$property_name == $params['value'];
	}

	/**
	* Group list records by header, saves internal order in group
	*
	* @param Array $records
	* @param string $heading_field
	*/
	function groupRecords(&$records, $heading_field)
	{
	$sorted = Array();
	$i = 0; $record_count = count($records);
	while ($i < $record_count) {
	$sorted[ $records[$i][$heading_field] ][] = $records[$i];
	$i++;
	}

	$records = Array();
	foreach ($sorted as $heading => $heading_records) {
	$records = array_merge_recursive($records, $heading_records);
	}
	}

	function DisplayOriginal($params)
	{
	return false;
	}

	function MultipleEditing($params)
	{
	$selected_ids = $this->Application->RecallVar($this->getPrefixSpecial().'_selected_ids');
	$ret = '';
	if ($selected_ids) {
	$selected_ids = explode(',', $selected_ids);
	$object =& $this->getObject( array_merge_recursive2($params, Array('skip_autoload' => true)) );
	$params['name'] = $params['render_as'];
	foreach ($selected_ids as $id) {
	$object->Load($id);
	$ret .= $this->Application->ParseBlock($params);
	}
	}

	return $ret;
	}

	function ExportStatus($params)
	{
	$export_object =& $this->Application->recallObject('CatItemExportHelper');

	$event = new kEvent($this->getPrefixSpecial().':OnDummy');

	$action_method = 'perform'.ucfirst($this->Special);
	$field_values = $export_object->$action_method($event);

	// finish code is done from JS now
	if ($field_values['start_from'] == $field_values['total_records'])
	{
	if ($this->Special == 'import') {
	$this->Application->StoreVar('PermCache_UpdateRequired', 1);
	$this->Application->Redirect('categories/cache_updater', Array('m_opener' => 'r', 'pass' => 'm', 'continue' => 1, 'no_amp' => 1));
	}
	elseif ($this->Special == 'export') {
	$finish_t = $this->Application->RecallVar('export_finish_t');
	$this->Application->Redirect($finish_t, Array('pass' => 'all'));
	$this->Application->RemoveVar('export_finish_t');
	}
	}

	$export_options = $export_object->loadOptions($event);
	return $export_options['start_from'] * 100 / $export_options['total_records'];
	}

	/**
	* Returns path where exported category items should be saved
	*
	* @param Array $params
	*/
	function ExportPath($params)
	{
	$ret = EXPORT_PATH.'/';

	if( getArrayValue($params, 'as_url') )
	{
	$ret = str_replace( FULL_PATH.'/', $this->Application->BaseURL(), $ret);
	}

	$export_options = unserialize($this->Application->RecallVar($this->getPrefixSpecial().'_options'));
	$ret .= $export_options['ExportFilename'].'.'.($export_options['ExportFormat'] == 1 ? 'csv' : 'xml');

	return $ret;
	}

	}

	?>
	\ No newline at end of file

	Property changes on: trunk/core/kernel/db/db_tag_processor.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.68
	\ No newline at end of property
	+1.69
	\ No newline at end of property
	Index: trunk/core/kernel/db/db_event_handler.php
	===================================================================
	--- trunk/core/kernel/db/db_event_handler.php (revision 6832)
	+++ trunk/core/kernel/db/db_event_handler.php (revision 6833)
	@@ -1,1929 +1,1930 @@
	<?php

	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->Prefix_Special 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->Prefix_Special.'_varname')
	*
	*/


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

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

	/**
	* Adds ability to address db connection
	*
	* @return kDBEventHandler
	* @access public
	*/
	function kDBEventHandler()
	{
	parent::kBase();
	$this->Conn =& $this->Application->GetADODBConnection();
	}

	/**
	* Checks permissions of user
	*
	* @param kEvent $event
	*/
	function CheckPermission(&$event)
	{
	if (!$this->Application->IsAdmin()) {
	$allow_events = Array('OnSearch', 'OnSearchReset', 'OnNew');
	if (in_array($event->Name, $allow_events)) {
	// allow search on front
	return true;
	}
	}

	$section = $event->getSection();
	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');
	}

	return parent::CheckPermission($event);
	}

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

	'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'),
	'OnMassDelete' => Array('self' => 'delete', 'subitem' => 'add\|edit'),
	'OnMassClone' => Array('self' => 'add', 'subitem' => 'add\|edit'),

	'OnSelectItems' => Array('self' => 'add\|edit', 'subitem' => 'add\|edit'),
	'OnProcessSelected' => 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'),
	'OnEdit' => Array('self' => 'edit\|edit.pending'),

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


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

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

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

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

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

	'OnGoBack' => Array('self' => true, 'subitem' => true),
	);
	$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);
	}

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

	// 2. get id from env (used in front)
	$ret = $this->Application->GetVar($event->getPrefixSpecial().'_id');
	if($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(true).'_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
	* @return Array ids stored
	*/
	function StoreSelectedIDs(&$event)
	{
	$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');

	// 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 <b>'.$event->getPrefixSpecial().'</b> <span class="debug_error">not passed</span>',E_USER_NOTICE);
	}
	$this->Application->SetVar($event->getPrefixSpecial(true).'_id', $first_id);
	return $ret;
	}

	/**
	* Returns stored selected ids as an array
	*
	* @param kEvent $event
	* @return array
	*/
	function getSelectedIDs(&$event)
	{
	return explode(',', $this->Application->GetVar($event->getPrefixSpecial().'_selected_ids'));
	}

	/**
	* 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 = $this->Application->RecallVar($prefix_special.'_selected_ids');
	$event->setEventParam('ids', $ids);

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

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

	/*function SetSaveEvent(&$event)
	{
	$this->Application->SetVar($event->Prefix_Special.'_SaveEvent','OnUpdate');
	$this->Application->LinkVar($event->Prefix_Special.'_SaveEvent');
	}*/

	/**
	* Common builder part for Item & List
	*
	* @param kDBBase $object
	* @param kEvent $event
	* @access private
	*/
	function dbBuild(&$object, &$event)
	{
	$object->Configure();
	$this->PrepareObject($object, $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 strange constuction creates hidden field for storing event name in form submit
	// It pass SaveEvent to next screen, otherwise after unsuccsefull create it will try to update rather than create
	$current_event = $this->Application->GetVar($event->Prefix_Special.'_event');
	// $this->Application->setEvent($event->Prefix_Special, $current_event);
	$this->Application->setEvent($event->Prefix_Special, '');

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

	/**
	* Builds item (loads if needed)
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnItemBuild(&$event)
	{
	$object =& $event->getObject();
	$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) $this->LoadItem($event);

	$actions =& $this->Application->recallObject('kActions');
	$actions->Set($event->Prefix_Special.'_GoTab', '');

	$actions->Set($event->Prefix_Special.'_GoId', '');
	}

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

	/**
	* Enter description here...
	*
	* @param kEvent $event
	* @return unknown
	*/
	function UseTempTables(&$event)
	{
	$object = &$event->getObject();
	$top_prefix = $this->Application->GetTopmostPrefix($event->Prefix);

	return (
	$this->Application->GetVar(rtrim($top_prefix.'_'.$event->Special, '_')) == 't'
	\|\|
	$this->Application->GetVar(rtrim($top_prefix.'.'.$event->Special, '.')) == 't'
	\|\|
	$this->Application->GetVar($top_prefix.'_mode') == 't'
	);
	}

	/**
	* 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().TABLE_PREFIX : TABLE_PREFIX;
	}

	/**
	* Load item if id is available
	*
	* @param kEvent $event
	*/
	function LoadItem(&$event)
	{
	$object =& $event->getObject();
	$id = $this->getPassedID($event);
	if ($object->Load($id) )
	{
	$actions =& $this->Application->recallObject('kActions');
	$actions->Set($event->Prefix_Special.'_id', $object->GetID() );

	$use_pending_editing = $this->Application->getUnitOption($event->Prefix, 'UsePendingEditing');
	if ($use_pending_editing && $event->Special != 'original') {
	$this->Application->SetVar($event->Prefix.'.original_id', $object->GetDBField('OrgId'));
	}
	}
	else
	{
	$object->setID($id);
	}
	}

	/**
	* Builds list
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnListBuild(&$event)
	{
	$object =& $event->getObject();

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

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

	$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);

	// $object->CalculateTotals(); // Now called in getTotals to avoid extra query

	$actions =& $this->Application->recallObject('kActions');
	$actions->Set('remove_specials['.$event->Prefix_Special.']', '0');
	$actions->Set($event->Prefix_Special.'_GoTab', '');
	}


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

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

	}

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

	/**
	* Set's correct page for list
	* based on data provided with event
	*
	* @param kEvent $event
	* @access private
	* @see OnListBuild
	*/
	function SetPagination(&$event)
	{
	// get PerPage (forced -> session -> config -> 10)
	$per_page = $this->getPerPage($event);

	$object =& $event->getObject();
	$object->SetPerPage($per_page);
	$this->Application->StoreVarDefault($event->getPrefixSpecial().'_Page', 1);

	$page = $this->Application->GetVar($event->getPrefixSpecial().'_Page');
	if (!$page) {
	$page = $this->Application->GetVar($event->getPrefixSpecial(true).'_Page');
	}
	if (!$page) {
	$page = $this->Application->RecallVar($event->getPrefixSpecial().'_Page');
	}
	else {
	$this->Application->StoreVar($event->getPrefixSpecial().'_Page', $page);
	}

	if( !$event->getEventParam('skip_counting') )
	{
	$pages = $object->GetTotalPages();
	if($page > $pages)
	{
	$this->Application->StoreVar($event->getPrefixSpecial().'_Page', 1);
	$page = 1;
	}
	}

	/*$per_page = $event->getEventParam('per_page');
	if ($per_page == 'list_next') {

	$cur_page = $page;
	$cur_per_page = $per_page;

	$object->SetPerPage(1);

	$object =& $this->Application->recallObject($event->Prefix);
	$cur_item_index = $object->CurrentIndex;

	$page = ($cur_page-1) * $cur_per_page + $cur_item_index + 1;
	$object->SetPerPage(1);
	}*/

	$object->SetPage($page);
	}

	function getPerPage(&$event)
	{
	$per_page = $event->getEventParam('per_page');

	/* if ($per_page == 'list_next') {
	$per_page = '';
	}*/

	$config_mapping = $this->Application->getUnitOption($event->Prefix, 'ConfigMapping');

	if ( $config_mapping ) {
	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;
	}
	}

	if(!$per_page)
	{
	$per_page_var = $event->getPrefixSpecial().'_PerPage';

	$per_page = $this->Application->RecallVar($per_page_var);
	if(!$per_page)
	{

	if ($config_mapping) {
	if (!isset($config_mapping['PerPage'])) {
	trigger_error('Incorrect mapping of <span class="debug_error">PerPage</span> key in config for prefix <b>'.$event->Prefix.'</b>', E_USER_WARNING);
	}
	$per_page = $this->Application->ConfigValue($config_mapping['PerPage']);
	}
	if(!$per_page) $per_page = 10;
	}
	}

	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();

	$cur_sort1 = $this->Application->RecallVar($event->Prefix_Special.'_Sort1');
	$cur_sort1_dir = $this->Application->RecallVar($event->Prefix_Special.'_Sort1_Dir');
	$cur_sort2 = $this->Application->RecallVar($event->Prefix_Special.'_Sort2');
	$cur_sort2_dir = $this->Application->RecallVar($event->Prefix_Special.'_Sort2_Dir');


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

	$tag_sort_by = $event->getEventParam('sort_by');
	if ($tag_sort_by) {
	list($by, $dir) = explode(',', $tag_sort_by);
	if ($by == 'random') $by = 'RAND()';
	$object->AddOrderField($by, $dir);
	}

	if ($sorting_configs && isset ($sorting_configs['DefaultSorting1Field'])){
	$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']),
	);
	}

	// Use default if not specified
	if ( !$cur_sort1 \|\| !$cur_sort1_dir)
	{
	if ( $sorting = getArrayValue($list_sortings, $sorting_prefix, 'Sorting') ) {
	reset($sorting);
	$cur_sort1 = key($sorting);
	$cur_sort1_dir = current($sorting);
	if (next($sorting)) {
	$cur_sort2 = key($sorting);
	$cur_sort2_dir = current($sorting);
	}
	}
	}

	if ( $forced_sorting = getArrayValue($list_sortings, $sorting_prefix, 'ForcedSorting') ) {
	foreach ($forced_sorting as $field => $dir) {
	$object->AddOrderField($field, $dir);
	}
	}

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

	/**
	* Adds filters found in session to object
	*
	* @param kEvent $event
	* @param string $session_var variable name in session, where filter is stored
	* @param string $filter_class filter class, e.g. FLT_SYSTEM, FLT_NORMAL, etc.
	*/
	function addStoredFilter(&$event, $session_var, $filter_class)
	{
	$filter_data = $this->Application->RecallVar($event->getPrefixSpecial().'_'.$session_var);
	if ($filter_data) {
	$object =& $event->getObject();
	$filter_data = unserialize($filter_data);
	foreach ($filter_data as $filter_field => $filter_params) {
	$filter_type = ($filter_params['type'] == 'having') ? HAVING_FILTER : WHERE_FILTER;
	$object->addFilter($filter_field, $filter_params['value'], $filter_type, $filter_sub_type);
	}
	}
	}

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

	// 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') ? HAVING_FILTER : WHERE_FILTER;
	$object->addFilter($filter_field, $filter_params['value'], $filter_type, FLT_SEARCH);
	}
	}

	// add custom filter
	- $custom_filters = $this->Application->RecallVar($event->getPrefixSpecial().'_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 ($field_options['value']) {
	$filter_type = ($field_options['sql_filter_type'] == 'having') ? HAVING_FILTER : WHERE_FILTER;
	$object->addFilter($field_name, $field_options['value'], $filter_type, 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');
	$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('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'] , FLT_VIEW);
	$group_key++;
	}
	}
	}

	/**
	* Set's new sorting for list
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnSetSorting(&$event)
	{
	$cur_sort1 = $this->Application->RecallVar($event->Prefix_Special.'_Sort1');
	$cur_sort1_dir = $this->Application->RecallVar($event->Prefix_Special.'_Sort1_Dir');
	$cur_sort2 = $this->Application->RecallVar($event->Prefix_Special.'_Sort2');
	$cur_sort2_dir = $this->Application->RecallVar($event->Prefix_Special.'_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 {
	$cur_sort2 = $cur_sort1;
	$cur_sort2_dir = $cur_sort1_dir;
	$cur_sort1 = $passed_sort1;
	$cur_sort1_dir = 'asc';
	}

	$this->Application->StoreVar($event->Prefix_Special.'_Sort1', $cur_sort1);
	$this->Application->StoreVar($event->Prefix_Special.'_Sort1_Dir', $cur_sort1_dir);
	$this->Application->StoreVar($event->Prefix_Special.'_Sort2', $cur_sort2);
	$this->Application->StoreVar($event->Prefix_Special.'_Sort2_Dir', $cur_sort2_dir);
	}

	/**
	* Set sorting directly to session
	*
	* @param kEvent $event
	*/
	function OnSetSortingDirect(&$event)
	{
	$combined = $this->Application->GetVar($event->getPrefixSpecial(true).'_CombinedSorting');
	if ($combined) {
	list($field,$dir) = explode('\|',$combined);
	$this->Application->StoreVar($event->Prefix_Special.'_Sort1', $field);
	$this->Application->StoreVar($event->Prefix_Special.'_Sort1_Dir', $dir);
	return;
	}

	$field_pos = $this->Application->GetVar($event->getPrefixSpecial(true).'_SortPos');
	$this->Application->LinkVar( $event->getPrefixSpecial(true).'_Sort'.$field_pos, $event->Prefix_Special.'_Sort'.$field_pos);
	$this->Application->LinkVar( $event->getPrefixSpecial(true).'_Sort'.$field_pos.'_Dir', $event->Prefix_Special.'_Sort'.$field_pos.'_Dir');
	}

	/**
	* Reset grid sorting to default (from config)
	*
	* @param kEvent $event
	*/
	function OnResetSorting(&$event)
	{
	$this->Application->RemoveVar($event->Prefix_Special.'_Sort1');
	$this->Application->RemoveVar($event->Prefix_Special.'_Sort1_Dir');
	$this->Application->RemoveVar($event->Prefix_Special.'_Sort2');
	$this->Application->RemoveVar($event->Prefix_Special.'_Sort2_Dir');
	}

	/**
	* 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)
	{
	$sqls = $this->Application->getUnitOption($event->Prefix,'ItemSQLs');
	return isset($sqls[$event->Special]) ? $sqls[$event->Special] : $sqls[''];
	}

	/**
	* 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)
	{
	$sqls = $this->Application->getUnitOption($event->Prefix,'ListSQLs');
	return isset( $sqls[$event->Special] ) ? $sqls[$event->Special] : $sqls[''];
	}

	/**
	* Apply custom processing to item
	*
	* @param kEvent $event
	*/
	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) );

	$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')) )
	{
	if( $object->IsTempTable() ) $object->setTempID();
	$this->customProcessing($event,'after');
	$event->status=erSUCCESS;
	$event->redirect_params = Array('opener'=>'u');
	}
	else
	{
	$event->status = erFAIL;
	$event->redirect = false;
	$this->Application->SetVar($event->Prefix_Special.'_SaveEvent','OnCreate');
	$object->setID($id);
	}
	}

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

	$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=erSUCCESS;
	}
	else
	{
	$event->status=erFAIL;
	$event->redirect=false;
	break;
	}
	}
	}
	$event->redirect_params = Array('opener'=>'u');
	}

	/**
	* Delete's kDBItem object
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnDelete(&$event)
	{
	$object =& $event->getObject( Array('skip_autoload' => true) );
	$object->ID = $this->getPassedID($event);
	if( $object->Delete() )
	{
	$event->status = erSUCCESS;
	}
	else
	{
	$event->status = erFAIL;
	$event->redirect = false;
	}
	}

	/**
	* Prepares new kDBItem object
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnNew(&$event)
	{
	$object =& $event->getObject( Array('skip_autoload' => true) );
	$object->setID(0);
	$this->Application->SetVar($event->Prefix_Special.'_SaveEvent','OnCreate');

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

	$event->redirect = false;
	}

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

	$items_info = $this->Application->GetVar($event->getPrefixSpecial(true));
	if ($items_info) {
	$delete_ids = Array();
	$temp =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', '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->DeleteItems($event->Prefix, $event->Special, $delete_ids);
	}
	}

	$event->redirect_params = Array('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
	*/
	function OnMassDelete(&$event)
	{
	if ($this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1)) {
	return;
	}

	$event->status=erSUCCESS;

	$temp =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler');

	$this->StoreSelectedIDs($event);

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

	if($ids)
	{
	$temp->DeleteItems($event->Prefix, $event->Special, $ids);
	}
	$this->clearSelectedIDs($event);
	}

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

	$temp =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler');
	$temp->PrepareEdit();

	$event->redirect=false;
	}

	/**
	* Saves content of temp table into live and
	* redirects to event' default redirect (normally grid template)
	*
	* @param kEvent $event
	*/
	function OnSave(&$event)
	{
	$event->CallSubEvent('OnPreSave');
	if ($event->status == erSUCCESS) {
	$skip_master = false;
	$temp =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler');

	if (!$this->Application->CheckPermission('SYSTEM_ACCESS.READONLY', 1)) {
	$live_ids = $temp->SaveEdit($event->getEventParam('master_ids') ? $event->getEventParam('master_ids') : Array());
	if ($live_ids) {
	// ensure, that newly created item ids are avalable as if they were selected from grid
	// NOTE: only works if main item has subitems !!!
	$this->Application->StoreVar($event->getPrefixSpecial().'_selected_ids', implode(',', $live_ids));
	}
	}
	$this->clearSelectedIDs($event);

	$event->redirect_params = Array('opener' => 'u');
	$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', '');
	}
	}

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

	$this->clearSelectedIDs($event);
	$event->redirect_params = Array('opener'=>'u');
	$this->Application->RemoveVar($event->getPrefixSpecial().'_modified');
	}


	/**
	* Allows to determine if we are creating new item or editing already created item
	*
	* @param kEvent $event
	* @return bool
	*/
	function isNewItemCreate(&$event)
	{
	$event->setEventParam('raise_warnings', 0);
	$item_id = $this->getPassedID($event);
	return ($item_id == '') ? true : false;
	}

	/**
	* Saves edited item into temp table
	* If there is no id, new item is created in temp table
	*
	* @param kEvent $event
	*/
	function OnPreSave(&$event)
	{
	//$event->redirect = false;
	// 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) );

	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	if ($items_info) {
	foreach ($items_info as $id => $field_values) {
	$object->SetDefaultValues();
	$object->Load($id);
	$object->SetFieldsFromHash($field_values);
	$this->customProcessing($event, 'before');
	if( $object->Update($id) )
	{
	$this->customProcessing($event, 'after');
	$event->status=erSUCCESS;
	}
	else {
	$event->status = erFAIL;
	$event->redirect = false;
	break;
	}
	}
	}
	}

	/**
	* 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==erSUCCESS) {
	$event->redirect_params[$event->getPrefixSpecial(true).'_id'] = $this->Application->GetVar($event->Prefix_Special.'_GoId');
	}
	}

	/**
	* 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==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==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
	*/
	function OnPreCreate(&$event)
	{
	$this->clearSelectedIDs($event);
	$object =& $event->getObject( Array('skip_autoload' => true) );

	$temp =& $this->Application->recallObject($event->Prefix.'_TempHandler', 'kTempTablesHandler');
	$temp->PrepareEdit();

	$object->setID(0);

	$event->redirect=false;
	}

	/**
	* Creates a new item in temp table and
	* stores item id in App vars and Session on succsess
	*
	* @param kEvent $event
	*/
	function OnPreSaveCreated(&$event)
	{
	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	if($items_info) $field_values = array_shift($items_info);

	$object =& $event->getObject( Array('skip_autoload' => true) );
	$object->SetFieldsFromHash($field_values);

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

	if( $object->Create() )
	{
	$this->customProcessing($event, 'after');
	$event->redirect_params[$event->getPrefixSpecial(true).'_id'] = $object->GetId();
	$event->status=erSUCCESS;
	}
	else
	{
	$event->status=erFAIL;
	$event->redirect=false;
	$object->setID(0);
	}

	}

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

	$object =& $event->getObject( Array('skip_autoload' => true) );
	$ids = $this->StoreSelectedIDs($event);

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

	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('Priority', $object->GetDBField('Priority') + 1);
	break;

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

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

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

	$event->status = erSUCCESS;

	$temp =& $this->Application->recallObject($event->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler');

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

	if ($ids) {
	$temp->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;
	}

	function OnPreSavePopup(&$event)
	{
	$object =& $event->getObject();
	$this->RemoveRequiredFields($object);
	$event->CallSubEvent('OnPreSave');

	$this->finalizePopup($event);
	}


	/* 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)
	{

	}

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

	}

	/**
	* Occurse before creating item
	*
	* @param kEvent $event
	* @access public
	*/
	function OnBeforeItemCreate(&$event)
	{

	}

	/**
	* Occurse after creating item
	*
	* @param kEvent $event
	* @access public
	*/
	function OnAfterItemCreate(&$event)
	{

	}

	/**
	* Occurse before updating item
	*
	* @param kEvent $event
	* @access public
	*/
	function OnBeforeItemUpdate(&$event)
	{

	}

	/**
	* Occurse after updating item
	*
	* @param kEvent $event
	* @access public
	*/
	function OnAfterItemUpdate(&$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 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)
	{

	}

	/**
	* Occures 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
	*/
	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)
	{

	}

	/**
	* !!! NOT FULLY IMPLEMENTED - SEE TEMP HANDLER COMMENTS (search by event name)!!!
	* 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)
	{

	}

	/**
	* Occures before an item is cloneded
	* Id of ORIGINAL item is passed as event' 'id' param
	* Do not call object' Update method in this event, just set needed fields!
	*
	* @param kEvent $event
	*/
	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)
	{

	}

	/**
	* Ensures that popup will be closed automatically
	* and parent window will be refreshed with template
	* passed
	*
	* @param kEvent $event
	* @access public
	*/
	function finalizePopup(&$event)
	{
	$event->redirect = 'incs/close_popup';

	// 2. substitute opener
	$opener_stack = $this->Application->RecallVar('opener_stack');
	$opener_stack = $opener_stack ? unserialize($opener_stack) : Array();
	//array_pop($opener_stack);

	$t = $this->Application->RecallVar('return_template');
	$this->Application->RemoveVar('return_template');

	// restore original "m" prefix all params, that have values before opening selector
	$return_m = $this->Application->RecallVar('return_m');
	$this->Application->RemoveVar('return_m');
	$this->Application->HttpQuery->parseEnvPart($return_m);

	$pass_events = $event->getEventParam('pass_events');
	$redirect_params = array_merge_recursive2($event->redirect_params, Array('m_opener' => 'u', '__URLENCODE__' => 1));

	$new_level = 'index.php\|'.ltrim($this->Application->BuildEnv($t, $redirect_params, 'all', $pass_events), ENV_VAR_NAME.'=');
	array_push($opener_stack, $new_level);
	$this->Application->StoreVar('opener_stack', serialize($opener_stack));
	}


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

	$search_helper =& $this->Application->recallObject('SearchHelper');
	$search_helper->performSearch($event);
	}

	/**
	* Clear search keywords
	*
	* @param kEvent $event
	* @access protected
	*/
	function OnSearchReset(&$event)
	{
	$search_helper =& $this->Application->recallObject('SearchHelper');
	$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) );
	}

	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
	*/
	function OnPreSaveAndOpenTranslator(&$event)
	{
	$this->Application->SetVar('allow_translation', true);
	$object =& $event->getObject();
	$this->RemoveRequiredFields($object);
	$event->CallSubEvent('OnPreSave');

	if ($event->status == 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));
	$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');
	$event->redirect_params = Array('pass'=>'all,trans,'.$this->Application->GetVar('translator_prefixes'),
	$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'),
	);

	// 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'));
	}
	}

	function RemoveRequiredFields(&$object)
	{
	// making all field non-required to achieve successful presave
	foreach($object->Fields as $field => $options)
	{
	if(isset($options['required']))
	{
	unset($object->Fields[$field]['required']);
	}
	}
	}

	/**
	* Dynamically fills customdata config
	*
	* @param kEvent $event
	*/
	function OnCreateCustomFields(&$event)
	{
	$main_prefix = $this->Application->getUnitOption($event->Prefix, 'ParentPrefix');
	if (!$main_prefix) return false;
	$item_type = $this->Application->getUnitOption($main_prefix, 'ItemType');
	if (!$item_type) {
	// no main config of such type
	return false;
	}

	// 1. get custom field information
	$sql = 'SELECT *
	FROM '.TABLE_PREFIX.'CustomField
	WHERE Type = '.$item_type.'
	ORDER BY CustomFieldId';
	$custom_fields = $this->Conn->Query($sql, 'CustomFieldId');
	if (!$custom_fields) {
	// config doesn't have custom fields
	return false;
	}

	// 2. create fields (for customdata item)
	$fields = $this->Application->getUnitOption($event->Prefix, 'Fields', Array());
	$field_options = Array('type' => 'string', 'formatter' => 'kMultiLanguage', 'not_null' => 1, 'db_type' => 'text', 'default' => '');
	foreach ($custom_fields as $custom_id => $custom_params) {
	if (isset($fields['cust_'.$custom_id])) continue;
	$fields['cust_'.$custom_id] = $field_options;
	}
	$this->Application->setUnitOption($event->Prefix, 'Fields', $fields);

	// 3. create virtual & calculated fields (for main item)
	$calculated_fields = Array();
	$virtual_fields = $this->Application->getUnitOption($main_prefix, 'VirtualFields', Array());

	$cf_helper =& $this->Application->recallObject('InpCustomFieldsHelper');
	$field_options = Array('type' => 'string', 'not_null' => 1, 'default' => '');
	$ml_formatter =& $this->Application->recallObject('kMultiLanguage');

	foreach ($custom_fields as $custom_id => $custom_params) {
	switch ($custom_params['ElementType']) {
	case 'date':
	case 'datetime':
	unset($field_options['options']);
	$field_options['formatter'] = 'kDateFormatter';
	break;

	case 'select':
	case 'radio':
	if ($custom_params['ValueList']) {
	$field_options['options'] = $cf_helper->GetValuesHash($custom_params['ValueList']);
	$field_options['formatter'] = 'kOptionsFormatter';
	}
	break;

	default:
	unset($field_options['options'], $field_options['formatter']);
	break;
	}

	$custom_name = $custom_params['FieldName'];
	$calculated_fields['cust_'.$custom_name] = 'cust.'.$ml_formatter->LangFieldName('cust_'.$custom_id);
	if (!isset($virtual_fields['cust_'.$custom_name])) {
	$virtual_fields['cust_'.$custom_name] = Array();
	}
	$virtual_fields['cust_'.$custom_name] = array_merge_recursive2($field_options, $virtual_fields['cust_'.$custom_name]);
	$custom_fields[$custom_id] = $custom_name;
	}

	$config_calculated_fields = $this->Application->getUnitOption($main_prefix, 'CalculatedFields', Array());
	foreach ($config_calculated_fields as $special => $special_fields) {
	$config_calculated_fields[$special] = array_merge_recursive2($config_calculated_fields[$special], $calculated_fields);
	}
	$this->Application->setUnitOption($main_prefix, 'CalculatedFields', $config_calculated_fields);

	$this->Application->setUnitOption($main_prefix, 'CustomFields', $custom_fields);
	$this->Application->setUnitOption($main_prefix, 'VirtualFields', $virtual_fields);
	}

	/**
	* Saves selected user in needed field
	*
	* @param kEvent $event
	*/
	function OnSelectUser(&$event)
	{
	$items_info = $this->Application->GetVar('u');
	if ($items_info) {
	$user_id = array_shift( array_keys($items_info) );

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

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

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

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

	if ($is_new) {
	$object->Create();
	if (!$is_main && $object->IsTempTable()) {
	$object->setTempID();
	}
	}
	else {
	$object->Update();
	}
	}

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


	/ EXPORT RELATED /

	/**
	* Shows export dialog
	*
	* @param kEvent $event
	*/
	function OnExport(&$event)
	{
	$this->StoreSelectedIDs($event);
	$selected_ids = $this->getSelectedIDs($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) : '' );

	$export_t = $this->Application->GetVar('export_template');
	$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');
	$event->redirect = $export_t ? $export_t : $export_helper->getModuleFolder($event).'/export';

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

	$event->setRedirectParams($redirect_params);
	}

	/**
	* Apply some special processing to
	* object beeing recalled before using
	* it in other events that call prepareObject
	*
	* @param Object $object
	* @param kEvent $event
	* @access protected
	*/
	function prepareObject(&$object, &$event)
	{
	if ($event->Special == 'export' \|\| $event->Special == 'import')
	{
	$export_helper =& $this->Application->recallObject('CatItemExportHelper');
	$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');
	$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)
	{

	}

	function OnDeleteExportPreset(&$event)
	{
	$object =& $event->GetObject();

	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	if($items_info)
	{
	list($id,$field_values) = each($items_info);
	$preset_key = $field_values['ExportPresets'];

	$user =& $this->Application->recallObject('u');
	$export_settings = $user->getPersistantVar('export_settings');
	if (!$export_settings) return ;
	$export_settings = unserialize($export_settings);
	if (!isset($export_settings[$event->Prefix])) return ;

	$to_delete = '';
	$export_presets = array(''=>'');
	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]);
	$user->setPersistantVar('export_settings', serialize($export_settings));
	}
	}
	}

	}


	?>
	\ No newline at end of file

	Property changes on: trunk/core/kernel/db/db_event_handler.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.79
	\ No newline at end of property
	+1.80
	\ No newline at end of property
	Index: trunk/core/kernel/application.php
	===================================================================
	--- trunk/core/kernel/application.php (revision 6832)
	+++ trunk/core/kernel/application.php (revision 6833)
	@@ -1,2252 +1,2281 @@
	<?php

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

	class kApplication {

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

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

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

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

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

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

	/**
	* Ids of config variables used in current run (for caching)
	*
	* @var Array
	* @access private
	*/
	var $ConfigCacheIds = array();

	/**
	* Template names, that will be used instead of regular templates
	*
	* @var Array
	*/
	var $ReplacementTemplates = 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();


	// performance needs:
	/**
	* Holds a refererence 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;

	/**
	* Ref to itself, needed because everybody used to write $this->Application, even inside kApplication
	*
	* @var kApplication
	*/
	var $Application = null;

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

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

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

	if(!$instance)
	{
	safeDefine('APPLICATION_CLASS', 'kApplication');
	$class = APPLICATION_CLASS;
	$instance = new $class();
	$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
	*/
	function Init()
	{
	if($this->InitDone) return false;

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

	if(defined('DEBUG_MODE') && $this->isDebugMode() && constOn('DBG_PROFILE_MEMORY')) {
	$this->Debugger->appendMemoryUsage('Application before Init:');
	}
	if (!$this->isDebugMode() && !constOn('DBG_ZEND_PRESENT')) {
	error_reporting(0);
	ini_set('display_errors', 0);
	}
	if (!constOn('DBG_ZEND_PRESENT')) {
	$error_handler = set_error_handler( Array(&$this,'handleError') );
	if ($error_handler) $this->errorHandlers[] = $error_handler;
	}

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

	$this->Factory = new kFactory();
	$this->registerDefaultClasses();
	$this->Phrases = new PhrasesCache();
	$this->EventManager =& $this->Factory->makeClass('EventManager');
	$this->Factory->Storage['EventManager'] =& $this->EventManager;
	$this->RegisterDefaultBuildEvents();
	$this->SetDefaultConstants();

	$this->UnitConfigReader =& $this->recallObject('kUnitConfigReader');
	$this->UnitConfigReader->scanModules(MODULES_PATH);
	$this->registerModuleConstants();

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

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

	$this->HttpQuery->AfterInit();

	$this->LoadCache();
	$this->InitConfig();

	$this->Phrases->Init('phrases');

	$this->UnitConfigReader->AfterConfigRead();


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

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

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

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

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

	$this->ValidateLogin();

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

	$this->InitDone = true;

	$this->HandleEvent( new kEvent('adm:OnStartup') );

	return true;
	}

	/**
	* Returns module information. Searches module by requested field
	*
	* @param string $field
	* @param mixed $value
	* @param string field value to returns, if not specified, then return all fields
	* @param string field to return
	* @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;
	}

	function refreshModuleInfo()
	{
	$modules_helper =& $this->recallObject('ModulesHelper');
	$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');
	if ( !$lang->IsLoaded() \|\| (!$this->Application->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->Application->IsAdmin()) {
	safeDefine('THEMES_PATH', '/core/admin_templates');
	return;
	}

	$theme_id = $this->GetVar('m_theme');
	if (!$theme_id) {
	$theme_id = $this->GetDefaultThemeId();
	if (!$theme_id) {
	if (!defined('IS_INSTALL')) $this->ApplicationDie('No Primary Theme Selected');
	}
	}
	$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');
	if (!$theme->IsLoaded() \|\| !$theme->GetDBField('Enabled')) {
	if (!defined('IS_INSTALL')) $this->ApplicationDie('Unknown or disabled theme');
	}
	safeDefine('THEMES_PATH', '/themes/'.$theme->GetDBField('Name'));
	}

	function GetDefaultLanguageId()
	{
	static $language_id = 0;

	if ($language_id > 0) return $language_id;

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

	if (!$language_id && defined('IS_INSTALL') && IS_INSTALL) {
	$language_id = 1;
	}

	return $language_id;
	}

	function GetDefaultThemeId()
	{
	static $theme_id = 0;

	if($theme_id > 0) return $theme_id;

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

	function GetPrimaryCurrency()
	{
	if ($this->isModuleEnabled('In-Commerce')) {
	$table = $this->getUnitOption('curr', 'TableName');
	return $this->Conn->GetOne('SELECT ISO FROM '.$table.' WHERE IsPrimary = 1');
	}
	else {
	return 'USD';
	}
	}

	/**
	* Registers default classes such as ItemController, GridController and LoginController
	*
	* Called automatically while initializing Application
	* @access private
	* @return void
	*/
	function RegisterDefaultClasses()
	{
	$this->registerClass('kTempTablesHandler', KERNEL_PATH.'/utility/temp_handler.php');
	$this->registerClass('kEventManager', KERNEL_PATH.'/event_manager.php', 'EventManager');
	$this->registerClass('kUnitConfigReader', KERNEL_PATH.'/utility/unit_config_reader.php');

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

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

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



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

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

	$this->registerClass('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('TemplatesCache', KERNEL_PATH.'/parser/template.php');
	$this->registerClass('Template', KERNEL_PATH.'/parser/template.php');
	$this->registerClass('TemplateParser', KERNEL_PATH.'/parser/template_parser.php',null, 'kDBTagProcessor');

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

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

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

	/* Moved from MyApplication */

	$this->registerClass('Inp1Parser',KERNEL_PATH.'/../units/general/inp1_parser.php','Inp1Parser');

	$this->registerClass('InpSession',KERNEL_PATH.'/../units/general/inp_ses_storage.php','Session');
	$this->registerClass('InpSessionStorage',KERNEL_PATH.'/../units/general/inp_ses_storage.php','SessionStorage');

	$this->registerClass('kCatDBItem',KERNEL_PATH.'/../units/general/cat_dbitem.php');
	$this->registerClass('kCatDBItemExportHelper',KERNEL_PATH.'/../units/general/cat_dbitem_export.php', 'CatItemExportHelper');
	$this->registerClass('kCatDBList',KERNEL_PATH.'/../units/general/cat_dblist.php');
	$this->registerClass('kCatDBEventHandler',KERNEL_PATH.'/../units/general/cat_event_handler.php');
	$this->registerClass('kCatDBTagProcessor',KERNEL_PATH.'/../units/general/cat_tag_processor.php');

	// Do not move to config - this helper is used before configs are read
	$this->registerClass('kModulesHelper', KERNEL_PATH.'/../units/general/helpers/modules.php', 'ModulesHelper');

	/* End moved */

	}

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

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

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

	// this allows to save 2 sql queries for each category
	$sql = 'SELECT NamedParentPath, CachedCategoryTemplate
	FROM '.$table.'
	WHERE '.$id_field.' = '.$this->Conn->qstr($id);
	$category_data = $this->Conn->GetRow($sql);
	$filename = $category_data['NamedParentPath'];
	$this->setCache('category_templates', $id, $category_data['CachedCategoryTemplate']);
	// $this->setCache('item_templates', $id, $category_data['CachedItemTemplate']);
	}
	else {
	$resource_id = $this->Conn->GetOne('SELECT ResourceId FROM '.$table.' WHERE '.$id_field.' = '.$this->Conn->qstr($id));
	if (is_null($category_id)) $category_id = $this->GetVar('m_cat_id');
	$sql = 'SELECT Filename FROM '.TABLE_PREFIX.'CategoryItems WHERE ItemResourceId = '.$resource_id.' AND CategoryId = '.$category_id;
	$filename = $this->Conn->GetOne($sql);

	/*if (!$filename) {
	$sql = 'SELECT Filename FROM '.TABLE_PREFIX.'CategoryItems WHERE ItemResourceId = '.$resource_id.' AND PrimaryCat = 1';
	$filename = $this->Conn->GetOne($sql);
	}*/

	/*$sql = 'SELECT Filename
	FROM '.$table.'
	WHERE '.$id_field.' = '.$this->Conn->qstr($id);
	$filename = $this->Conn->GetOne($sql);*/
	}
	$this->setCache('filenames', $prefix.'_'.$id, $filename);
	}
	return $filename;
	}


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

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

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

	/**
	* Registers each module specific constants if any found
	*
	*/
	function registerModuleConstants()
	{
	if (file_exists(KERNEL_PATH.'/constants.php')) {
	k4_include_once(KERNEL_PATH.'/constants.php');
	}

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

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

	if($this->isDebugMode() && constOn('DBG_SHOW_HTTPQUERY')) {
	$this->Debugger->appendHTML('HTTPQuery:');
	$this->Debugger->dumpVars($this->HttpQuery->_Params);
	}

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

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

	if ($this->IsAdmin()) {
	// for permission checking in events & templates
	$this->LinkVar('module'); // for common configuration 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
	$this->LinkVar('return_template'); // template to go, when something was coosen from popup (from finalizePopup)
	$this->LinkVar('return_m'); // main env part to restore after popup will be closed (from finalizePopup)
	}

	if ($this->GetVar('ajax') == 'yes') {
	// hide debug output from ajax requests automatically
	define('DBG_SKIP_REPORTING', 1);
	}
	}

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

	$this->InitParser();
	$t = $this->GetVar('t');

	if ($this->isModuleEnabled('In-Edit')) {
	$cms_handler =& $this->recallObject('cms_EventHandler');
	if (!$this->TemplatesCache->TemplateExists($t) && !$this->IsAdmin()) {
	$t = $cms_handler->GetDesignTemplate();
	}
	/*else {
	$cms_handler->SetCatByTemplate();
	}*/
	}

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

	$this->HTML = $this->Parser->ParseTemplate( $t );

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

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

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

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

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

	if ($this->isDebugMode()) {
	$this->EventManager->RunRegularEvents(reAFTER);
	$this->Session->SaveData();

	$this->HTML = ob_get_clean() . $this->HTML . $this->Debugger->printReport(true);
	}
	else {
	$this->HTML = ob_get_clean().$this->HTML;
	}

	if ($this->UseOutputCompression()) {
	header('Content-Encoding: gzip');
	$compression_level = $this->ConfigValue('OutputCompressionLevel');
	if ($compression_level < 0 \|\| $compression_level > 9) $compression_level = 7;
	echo gzencode($this->HTML, $compression_level);
	}
	else {
	echo $this->HTML;
	}

	$this->UpdateCache();

	flush();

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

	$this->EventManager->RunRegularEvents(reAFTER);
	$this->Session->SaveData();
	}

	/**
	* Checks if output compression options is available
	*
	* @return string
	*/
	function UseOutputCompression()
	{
	if (constOn('IS_INSTALL') \|\| constOn('DBG_ZEND_PRESENT') \|\| 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 longint
	*/
	function GetSID()
	{
	$session =& $this->recallObject('Session');
	return $session->GetID();
	}

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

	/**
	* Returns variable passed to the script as GET/POST/COOKIE
	*
	* @access public
	* @param string $name Name of variable to retrieve
	* @param int $default default value returned in case if varible not present
	* @return mixed
	*/
	function GetVar($name, $default = false)
	{
	// $http_query =& $this->recallObject('HTTPQuery');
	return isset($this->HttpQuery->_Params[$name]) ? $this->HttpQuery->_Params[$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
	*/
	function SetVar($var,$val)
	{
	// $http_query =& $this->recallObject('HTTPQuery');
	return $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.
	* @see RecallVar
	* @access public
	* @param string $var Variable name
	* @param mixed $val Variable value
	*/
	function StoreVar($var, $val)
	{
	$session =& $this->recallObject('Session');
	$this->Session->StoreVar($var, $val);
	}

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

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

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

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

	/* Seems to be not used anywhere... /Kostja

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

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

	function ProcessParsedTag($prefix, $tag, $params)
	{
	$a_tag = new Tag('',$this->Parser);
	$a_tag->Tag = $tag;
	$tmp=$this->Application->processPrefix($prefix);
	$a_tag->Processor = $tmp['prefix'];
	$a_tag->Special = $tmp['special'];
	$a_tag->NamedParams = $params;
	return $a_tag->DoProcessTag();
	}

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

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

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

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

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

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

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

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

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

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

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

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

	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) {
	$session =& $this->recallObject('Session');
	$cookie_url = trim($session->CookieDomain.$session->CookiePath, '/.');
	if ($ssl) {
	$target_url = $this->ConfigValue('SSL_URL');
	}
	else {
	$target_url = 'http://'.DOMAIN.$this->ConfigValue('Site_Path');
	}

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

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

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

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

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

	$no_rewrite = false;
	if( isset($params['__NO_REWRITE__']) )
	{
	$no_rewrite = true;
	unset($params['__NO_REWRITE__']);
	}

	$force_rewrite = false;
	if( isset($params['__MOD_REWRITE__']) )
	{
	$force_rewrite = true;
	unset($params['__MOD_REWRITE__']);
	}

	$force_no_sid = false;
	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_recursive2($this->getPassThroughVariables($params), $params);

	if ($force_rewrite \|\| ($this->RewriteURLs($ssl) && !$no_rewrite))
	{
	$session =& $this->recallObject('Session');
	if( $session->NeedQueryString() && !$force_no_sid ) $params['sid'] = $this->GetSID();
	$url = $this->BuildEnv_NEW($t, $params, $pass, $pass_events);
	$ret = $this->BaseURL($prefix, $ssl).$url.$map_link;
	}
	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->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;
	}


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

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

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

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

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

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

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

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

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

	$m_only = true;
	$pass_info = $this->getPassInfo($pass);
	if ($pass_info) {
	if ($pass_info[0] == 'm') array_shift($pass_info);
	$params['t'] = $t;
	foreach($pass_info as $pass_index => $pass_element)
	{
	list($prefix) = explode('.', $pass_element);
	$require_rewrite = $this->findModule('Var', $prefix) && $this->getUnitOption($prefix, 'CatalogItem');
	if ($require_rewrite) {
	// if next prefix is same as current, but with special => exclude current prefix from url
	$next_prefix = getArrayValue($pass_info, $pass_index + 1);
	if ($next_prefix) {
	$next_prefix = substr($next_prefix, 0, strlen($prefix) + 1);
	if ($prefix.'.' == $next_prefix) continue;
	}
	$a = $this->BuildModuleEnv_NEW($pass_element, $params, $pass_events);
	if ($a) {
	$ret .= '/'.$a;
	$m_only = false;
	}
	}
	else
	{
	$env .= ':'.$this->BuildModuleEnv($pass_element, $params, $pass_events);
	}
	}
	if (!$m_only) $params['pass_category'] = 1;
	$ret = $this->BuildModuleEnv_NEW('m', $params, $pass_events).$ret;
	$cat_processed = isset($params['category_processed']) && $params['category_processed'];
	if ($cat_processed) {
	unset($params['category_processed']);
	}

	if (!$m_only \|\| !$cat_processed \|\| !defined('EXP_DIR_URLS')) {
	$ret = trim($ret, '/').'.html';
	}
	else {
	$ret .= '/';
	}

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

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

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

	$ret = str_replace('%2F', '/', urlencode($ret));

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

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


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

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

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

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

	if(!$query_vars) return '';

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

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

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

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

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

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

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

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

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

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

	if (strtolower($t) == '__default__') {
	// to put category & item templates into cache
	$filename = $this->getFilename('c', $category_id);
	if ($item_id) {
	$mod_rw_helper =& $this->Application->recallObject('ModRewriteHelper');
	$t = $mod_rw_helper->GetItemTemplate($category_id, $pass_element); // $pass_element should be the last processed element
	// $t = $this->getCache('item_templates', $category_id);
	}
	elseif ($category_id) {
	$t = $this->getCache('category_templates', $category_id);
	}
	else {
	$t = 'index';
	}
	}

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

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

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

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

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

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

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

	function Redirect($t='', $params=null, $prefix='', $index_file=null)
	{
	$js_redirect = getArrayValue($params, 'js_redirect');
	if (preg_match("/external:(.*)/", $t, $rets)) {
	$location = $rets[1];
	}
	else {
	if ($t == '' \|\| $t === true) $t = $this->GetVar('t');

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

	if (!isset($params['pass'])) $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);
	//echo " location : $location <br>";
	}

	$a_location = $location;
	$location = "Location: $location";


	if ($this->isDebugMode() && constOn('DBG_REDIRECT')) {
	$this->Debugger->appendTrace();
	echo "<b>Debug output above!!!</b> Proceed to redirect: <a href=\"$a_location\">$a_location</a><br>";
	}
	else {
	if ($js_redirect) {
	$this->SetVar('t', 'redirect');
	$this->SetVar('redirect_to_js', addslashes($a_location) );
	$this->SetVar('redirect_to', $a_location);
	return true;
	}
	else {
	if ($this->GetVar('ajax') == 'yes' && $t != $this->GetVar('t')) {
	// redirection to other then current template during ajax request
	echo '#redirect#'.$a_location;
	}
	elseif (headers_sent() != '') {
	// some output occured -> redirect using javascript
	echo '<script type="text/javascript">window.location.href = \''.$a_location.'\';</script>';
	}
	else {
	// no output before -> redirect using HTTP header

	// header('HTTP/1.1 302 Found');
	header("$location");
	}
	}
	}

	ob_end_flush();
	// session expiration is called from session initialization,
	// that's why $this->Session may be not defined here
	if (is_object($this->Session)) {
	$this->Session->SaveData();
	}
	exit;
	}

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

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

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

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

	if (($user_id != -2) && constOn('DBG_REQUREST_LOG') ) {
	$http_query =& $this->recallObject('HTTPQuery');
	$http_query->writeRequestLog(DBG_REQUREST_LOG);
	}
	+
	+ if ($user_id != -2) {
	+ // normal users + root
	+ $this->LoadPersistentVars();
	+ }
	}

	+ /**
	+ * Loads current user persistent session data
	+ *
	+ */
	+ function LoadPersistentVars()
	+ {
	+ $this->Session->LoadPersistentVars();
	+ }
	+
	function LoadCache() {
	$cache_key = $this->GetVar('t').$this->GetVar('m_theme').$this->GetVar('m_lang').$this->IsAdmin();
	$query = sprintf("SELECT PhraseList, ConfigVariables FROM %s WHERE Template = %s",
	TABLE_PREFIX.'PhraseCache',
	$this->Conn->Qstr(md5($cache_key)));
	$res = $this->Conn->GetRow($query);

	if ($res) {
	$this->Caches['PhraseList'] = $res['PhraseList'] ? explode(',', $res['PhraseList']) : array();

	$config_ids = $res['ConfigVariables'] ? explode(',', $res['ConfigVariables']) : array();
	$config_ids = array_diff($config_ids, $this->Caches['ConfigVariables']);
	}
	else {
	$config_ids = array();
	}
	$this->Caches['ConfigVariables'] = $config_ids;
	$this->ConfigCacheIds = $config_ids;
	}

	function UpdateCache()
	{
	$update = false;
	//something changed
	$update = $update \|\| $this->Phrases->NeedsCacheUpdate();
	$update = $update \|\| (count($this->ConfigCacheIds) && $this->ConfigCacheIds != $this->Caches['ConfigVariables']);
	if ($update) {
	$cache_key = $this->GetVar('t').$this->GetVar('m_theme').$this->GetVar('m_lang').$this->IsAdmin();
	$query = sprintf("REPLACE %s (PhraseList, CacheDate, Template, ConfigVariables)
	VALUES (%s, %s, %s, %s)",
	TABLE_PREFIX.'PhraseCache',
	$this->Conn->Qstr(join(',', $this->Phrases->Ids)),
	adodb_mktime(),
	$this->Conn->Qstr(md5($cache_key)),
	$this->Conn->qstr(implode(',', array_unique($this->ConfigCacheIds))));
	$this->Conn->Query($query);
	}
	}

	function InitConfig()
	{
	if (isset($this->Caches['ConfigVariables']) && count($this->Caches['ConfigVariables']) > 0) {
	$this->ConfigHash = array_merge($this->ConfigHash, $this->Conn->GetCol(
	'SELECT VariableValue, VariableName FROM '.TABLE_PREFIX.'ConfigurationValues
	WHERE VariableId IN ('.implode(',', $this->Caches['ConfigVariables']).')', 'VariableName'));
	}
	}

	/**
	* Returns configuration option value by name
	*
	* @param string $name
	* @return string
	*/
	function ConfigValue($name)
	{
	$res = isset($this->ConfigHash[$name]) ? $this->ConfigHash[$name] : false;
	if ($res !== false) return $res;

	$res = $this->Conn->GetRow('SELECT VariableId, VariableValue FROM '.TABLE_PREFIX.'ConfigurationValues WHERE VariableName = '.$this->Conn->qstr($name));
	if ($res) {
	$this->ConfigHash[$name] = $res['VariableValue'];
	$this->ConfigCacheIds[] = $res['VariableId'];
	return $res['VariableValue'];
	}
	return false;
	}

	function UpdateConfigCache()
	{
	if ($this->ConfigCacheIds) {

	}
	}

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

	if (!isset($this->EventManager)) {
	$this->EventManager =& $this->recallObject('EventManager');
	}

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

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

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

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

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

	/**
	* Returns object using Variable number of params,
	* all params starting with 4th are passed to object consturctor
	*
	* @param string $name
	* @param string $pseudo_class
	* @param Array $event_params
	* @return Object
	* @author Alex
	*/
	function &recallObjectP($name,$pseudo_class=null,$event_params=Array())
	{
	$func_args = func_get_args();
	$result =& ref_call_user_func_array( Array(&$this->Factory, 'getObjectP'), $func_args );
	return $result;
	}

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

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

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

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

	return $result;
	}

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

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

	/**
	* Apply url rewriting used by mod_rewrite or not
	*
	* @param bool $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 constOn('MOD_REWRITE') && $allow_rewriting;
	}

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

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

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

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

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

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


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

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

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

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

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

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

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

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

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

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

	return $event;
	}


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

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

	/**
	* 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');
	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)
	{
	$visit =& $this->recallObject('visits');
	$visit->SetDBField($field, $value);
	$visit->Update();
	}

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

	/**
	* 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;

	}

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


	/**
	* Get temp table name
	*
	* @param string $table
	* @return string
	*/
	function GetTempName($table)
	{
	return TABLE_PREFIX.'ses_'.$this->GetSID().'_edit_'.$table;
	}

	function GetTempTablePrefix()
	{
	return TABLE_PREFIX.'ses_'.$this->GetSID().'_edit_';
	}

	function IsTempTable($table)
	{
	return strpos($table, TABLE_PREFIX.'ses_'.$this->GetSID().'_edit_') !== false;
	}

	/**
	* 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().'_edit_(.*)/',$temp_table,$rets) )
	{
	return $rets[1];
	}
	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 TimeZoneAdjustment($time_zone=null)
	{
	$target_zone = isset($time_zone) ? $time_zone : $this->ConfigValue('Config_Site_Time');
	return 3600 * ($target_zone - $this->ConfigValue('Config_Server_Time'));
	}

	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 -1:
	$user_groups = $this->ConfigValue('User_LoggedInGroup');
	break;
	case -2:
	$user_groups = $this->ConfigValue('User_LoggedInGroup');
	$user_groups .= ','.$this->ConfigValue('User_GuestGroup');
	break;
	default:
	$sql = 'SELECT GroupId FROM '.TABLE_PREFIX.'UserGroup WHERE PortalUserId = '.$user_id;
	$res = $this->Conn->GetCol($sql);
	$user_groups = Array( $this->ConfigValue('User_LoggedInGroup') );
	if(is_array($res))
	{
	$user_groups = array_merge($user_groups, $res);
	}
	$user_groups = implode(',', $user_groups);
	}
	return $user_groups;
	}

	}

	?>
	\ No newline at end of file

	Property changes on: trunk/core/kernel/application.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.166
	\ No newline at end of property
	+1.167
	\ No newline at end of property
	Index: trunk/core/units/users/users_event_handler.php
	===================================================================
	--- trunk/core/units/users/users_event_handler.php (revision 6832)
	+++ trunk/core/units/users/users_event_handler.php (revision 6833)
	@@ -1,1041 +1,1042 @@
	<?php

	class UsersEventHandler extends kDBEventHandler
	{
	/**
	* Allows to override standart permission mapping
	*
	*/
	function mapPermissions()
	{
	parent::mapPermissions();
	$permissions = Array(
	// admin
	'OnSetPersistantVariable' => Array('self' => 'view'), // because setting to logged in user only

	// front
	'OnRefreshForm' => Array('self' => true),

	'OnForgotPassword' => Array('self' => true),
	'OnResetPassword' => Array('self' => true),
	'OnResetPasswordConfirmed' => Array('self' => true),

	'OnSubscribeQuery' => Array('self' => true),
	'OnSubscribeUser' => Array('self' => true),

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

	/**
	* Checks permissions of user
	*
	* @param kEvent $event
	*/
	function CheckPermission(&$event)
	{
	if ($event->Name == 'OnLogin' \|\| $event->Name == 'OnLogout') {
	// permission is checked in OnLogin event directly
	return true;
	}

	if (!$this->Application->IsAdmin()) {
	$user_id = $this->Application->GetVar('u_id');
	$items_info = $this->Application->GetVar($event->getPrefixSpecial(true));

	if ($event->Name == 'OnCreate' && $user_id == -2) {
	// "Guest" can create new users
	return true;
	}

	if ($event->Name == 'OnUpdate' && $user_id > 0) {
	$user_dummy =& $this->Application->recallObject($event->Prefix.'.-item', null, Array('skip_autoload' => true));
	foreach ($items_info as $id => $field_values) {
	if ($id != $user_id) {
	// registered users can update their record only
	return false;
	}

	$user_dummy->Load($id);
	$status_field = array_shift($this->Application->getUnitOption($event->Prefix, 'StatusField'));

	if ($user_dummy->GetDBField($status_field) != STATUS_ACTIVE) {
	// not active user is not allowed to update his record (he could not activate himself manually)
	return false;
	}

	if (isset($field_values[$status_field]) && $user_dummy->GetDBField($status_field) != $field_values[$status_field]) {
	// user can't change status by himself
	return false;
	}
	}
	return true;
	}

	if ($event->Name == 'OnUpdate' && $user_id <= 0) {
	// guests are not allowed to update their record, because they don't have it :)
	return false;
	}
	}

	return parent::CheckPermission($event);
	}

	function OnSessionExpire()
	{
	if( $this->Application->IsAdmin() ) {
	$this->Application->Redirect('index', Array('expired' => 1), '', 'index.php');
	}
	else {
	$http_query =& $this->Application->recallObject('HTTPQuery');
	$get = $http_query->getRedirectParams();

	$t = $this->Application->GetVar('t');
	$get['js_redirect'] = $this->Application->ConfigValue('UseJSRedirect');
	$this->Application->Redirect($t ? $t : 'index', $get);
	}
	}

	/**
	* Checks user data and logs it in if allowed
	*
	* @param kEvent $event
	*/
	function OnLogin(&$event)
	{
	+ // persistent session data after login is not refreshed, because redirect will follow in any case
	$object =& $this->Application->recallObject('u', null, Array('skip_autoload' => true));

	$password = $this->Application->GetVar('password');
	if(!$password)
	{
	$object->SetError('ValidateLogin', 'blank_password', 'lu_blank_password');
	$event->status = erFAIL;
	return false;
	}

	$email_as_login = $this->Application->ConfigValue('Email_As_Login');
	list($login_field, $submit_field) = $email_as_login && !$this->Application->IsAdmin() ? Array('Email', 'email') : Array('Login', 'login');
	$login_value = $this->Application->GetVar($submit_field);

	if ($this->Application->IsAdmin() && ($login_value == 'root')) {
	// logging in "root" (admin only)
	$root_password = $this->Application->ConfigValue('RootPass');
	$password_formatter =& $this->Application->recallObject('kPasswordFormatter');
	$test = $password_formatter->EncryptPassword($password, 'b38');
	if ($root_password != $test) {
	$object->SetError('ValidateLogin', 'invalid_password', 'lu_invalid_password');
	$event->status = erFAIL;
	return false;
	}
	elseif ($this->checkLoginPermission($login_value)) {
	$user_id = -1;
	$object->Load($user_id);
	$object->SetDBField('Login', $login_value);

	$session =& $this->Application->recallObject('Session');
	$session->SetField('PortalUserId', $user_id);
	// $session->SetField('GroupList', implode(',', $groups) );
	$this->Application->SetVar('u_id', $user_id);
	$this->Application->StoreVar('user_id', $user_id);

	$this->processLoginRedirect($event, $password);
	return true;
	}
	else {
	$object->SetError('ValidateLogin', 'invalid_license', 'la_invalid_license');
	$event->status = erFAIL;
	return false;
	}
	}

	/*$sql = 'SELECT PortalUserId FROM '.$object->TableName.' WHERE (%s = %s) AND (Password = MD5(%s))';
	$user_id = $this->Conn->GetOne( sprintf($sql, $login_field, $this->Conn->qstr($login_value), $this->Conn->qstr($password) ) );*/

	$sql = 'SELECT PortalUserId FROM '.$object->TableName.' WHERE (Email = %1$s OR Login = %1$s) AND (Password = MD5(%2$s))';
	$user_id = $this->Conn->GetOne( sprintf($sql, $this->Conn->qstr($login_value), $this->Conn->qstr($password) ) );

	if ($user_id) {
	$object->Load($user_id);
	if ($object->GetDBField('Status') == STATUS_ACTIVE) {
	$groups = $object->getMembershipGroups(true);
	if(!$groups) $groups = Array();
	array_push($groups, $this->Application->ConfigValue('User_LoggedInGroup') );
	$this->Application->StoreVar( 'UserGroups', implode(',', $groups) );

	if ($this->checkLoginPermission($login_value)) {
	$session =& $this->Application->recallObject('Session');
	$session->SetField('PortalUserId', $user_id);
	$session->SetField('GroupList', implode(',', $groups) );
	$this->Application->SetVar('u_id', $user_id);
	$this->Application->StoreVar('user_id', $user_id);
	$this->Application->setVisitField('PortalUserId', $user_id);

	$this_login = (int)$object->getPersistantVar('ThisLogin');
	$object->setPersistantVar('LastLogin', $this_login);
	$object->setPersistantVar('ThisLogin', adodb_mktime());
	}
	else {
	$object->Load(-2);
	$object->SetError('ValidateLogin', 'no_permission', 'lu_no_permissions');
	$event->status = erFAIL;
	}

	$this->processLoginRedirect($event, $password);
	}
	else {
	$event->redirect = $this->Application->GetVar('pending_disabled_template');
	}
	}
	else
	{
	$object->SetID(-2);
	$object->SetError('ValidateLogin', 'invalid_password', 'lu_invalid_password');
	$event->status = erFAIL;
	}
	}

	/**
	* Enter description here...
	*
	* @param string $user_name
	* @return bool
	*/
	function checkLoginPermission($user_name)
	{
	$ret = true;
	if ($this->Application->IsAdmin()) {
	$modules_helper =& $this->Application->recallObject('ModulesHelper');
	if ($user_name != 'root') {
	// root is virtual user, so allow him to login to admin in any case
	$ret = $this->Application->CheckPermission('ADMIN', 1);
	}
	$ret = $ret && $modules_helper->checkLogin();
	}
	else {
	$ret = $this->Application->CheckPermission('LOGIN', 1);
	}
	return $ret;
	}

	/**
	* Process all required data and redirect logged-in user
	*
	* @param kEvent $event
	*/
	function processLoginRedirect(&$event, $password)
	{
	$object =& $event->getObject();

	$next_template = $this->Application->GetVar('next_template');
	if ($next_template == '_ses_redirect') {
	$location = $this->Application->BaseURL().$this->Application->RecallVar($next_template);
	if( $this->Application->isDebugMode() && constOn('DBG_REDIRECT') )
	{
	$this->Application->Debugger->appendTrace();
	echo "<b>Debug output above!!!</b> Proceed to redirect: <a href=\"$location\">$location</a><br>";
	}
	else {
	header('Location: '.$location);
	}

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

	if ($next_template) {
	$event->redirect = $next_template;
	}

	if ($this->Application->ConfigValue('UseJSRedirect')) {
	$event->SetRedirectParam('js_redirect', 1);
	}

	$sync_manager =& $this->Application->recallObjectP('UsersSyncronizeManager', null, Array(), 'InPortalSyncronize');
	$sync_manager->performAction('LoginUser', $object->GetDBField('Login'), $password);
	}

	/**
	* Called when user logs in using old in-portal
	*
	* @param kEvent $event
	*/
	function OnInpLogin(&$event)
	{
	$sync_manager =& $this->Application->recallObjectP('UsersSyncronizeManager', null, Array(), 'InPortalSyncronize');
	$sync_manager->performAction('LoginUser', $event->getEventParam('user'), $event->getEventParam('pass') );

	if ($event->redirect && is_string($event->redirect)) {
	// some real template specified instead of true
	$this->Application->Redirect($event->redirect, $event->redirect_params);
	}
	}

	/**
	* Called when user logs in using old in-portal
	*
	* @param kEvent $event
	*/
	function OnInpLogout(&$event)
	{
	$sync_manager =& $this->Application->recallObjectP('UsersSyncronizeManager', null, Array(), 'InPortalSyncronize');
	$sync_manager->performAction('LogoutUser');
	}

	function OnLogout(&$event)
	{
	$sync_manager =& $this->Application->recallObjectP('UsersSyncronizeManager', null, Array(), 'InPortalSyncronize');
	$sync_manager->performAction('LogoutUser');

	$session =& $this->Application->recallObject('Session');
	$session->SetField('PortalUserId', -2);
	$this->Application->SetVar('u_id', -2);
	$this->Application->StoreVar('user_id', -2);
	$object =& $this->Application->recallObject('u');
	$object->Load(-2);

	$this->Application->DestroySession();

	$group_list = $this->Application->ConfigValue('User_GuestGroup').','.$this->Application->ConfigValue('User_LoggedInGroup');
	$session->SetField('GroupList', $group_list);
	$this->Application->StoreVar('UserGroups', $group_list);

	if ($this->Application->ConfigValue('UseJSRedirect')) {
	$event->SetRedirectParam('js_redirect', 1);
	}
	}

	/**
	* Prefill states dropdown with correct values
	*
	* @param kEvent $event
	* @access public
	*/
	function OnPrepareStates(&$event)
	{
	$cs_helper =& $this->Application->recallObject('CountryStatesHelper');
	$cs_helper->PopulateStates($event, 'State', 'Country');

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

	if( $object->isRequired('Country') && $cs_helper->CountryHasStates( $object->GetDBField('Country') ) ) $object->setRequired('State', true);
	$object->setLogin();
	}

	/**
	* Redirects user after succesfull registration to confirmation template (on Front only)
	*
	* @param kEvent $event
	*/
	function OnAfterItemCreate(&$event)
	{
	$is_subscriber = $this->Application->GetVar('IsSubscriber');
	if(!$is_subscriber)
	{
	$object =& $event->getObject();

	$sql = 'UPDATE '.TABLE_PREFIX.'UserGroup
	SET PrimaryGroup = 0
	WHERE PortalUserId = '.$object->GetDBField('PortalUserId');
	$this->Conn->Query($sql);

	$group_id = $this->Application->ConfigValue('User_NewGroup');

	$sql = 'REPLACE INTO '.TABLE_PREFIX.'UserGroup(PortalUserId,GroupId,PrimaryGroup) VALUES (%s,%s,1)';
	$this->Conn->Query( sprintf($sql, $object->GetID(), $group_id) );
	}
	}

	/**
	* Login user if possible, if not then redirect to corresponding template
	*
	* @param kEvent $event
	*/
	function autoLoginUser(&$event)
	{
	$object =& $event->getObject();
	$this->Application->SetVar('u_id', $object->GetID() );

	if($object->GetDBField('Status') == STATUS_ACTIVE && !$this->Application->ConfigValue('User_Password_Auto'))
	{
	$email_as_login = $this->Application->ConfigValue('Email_As_Login');
	list($login_field, $submit_field) = $email_as_login ? Array('Email', 'email') : Array('Login', 'login');

	$this->Application->SetVar($submit_field, $object->GetDBField($login_field) );
	$this->Application->SetVar('password', $object->GetDBField('Password_plain') );

	$event->CallSubEvent('OnLogin');
	}
	}


	/**
	* When creating user & user with such email exists then force to use OnUpdate insted of ?
	*
	* @param kEvent $event
	*/
	function OnSubstituteSubscriber(&$event)
	{
	$ret = false;
	$object =& $event->getObject( Array('skip_autoload' => true) );
	$items_info = $this->Application->GetVar( $event->getPrefixSpecial(true) );
	if($items_info)
	{
	list($id, $field_values) = each($items_info);
	$user_email = $field_values['Email'];
	if($user_email)
	{
	// check if is subscriber
	$verify_user =& $this->Application->recallObject('u.verify', null, Array('skup_autoload' => true) );
	$verify_user->Load($user_email, 'Email');
	if( $verify_user->isLoaded() && $verify_user->isSubscriberOnly() )
	{
	$items_info = Array( $verify_user->GetDBField('PortalUserId') => $field_values );
	$this->Application->SetVar($event->getPrefixSpecial(true), $items_info);
	$ret = true;
	}
	}
	}

	if( isset($event->MasterEvent) )
	{
	$event->MasterEvent->setEventParam('is_subscriber_only', $ret);
	}
	else
	{
	$event->setEventParam('is_subscriber_only', $ret);
	}
	}


	/**
	* Enter description here...
	*
	* @param kEvent $event
	* @return bool
	*/
	function isSubscriberOnly(&$event)
	{
	$event->CallSubEvent('OnSubstituteSubscriber');
	$is_subscriber = false;
	if( $event->getEventParam('is_subscriber_only') )
	{
	$is_subscriber = true;
	$object =& $event->getObject( Array('skip_autoload' => true) );
	$this->OnUpdate($event);
	if($event->status == erSUCCESS)
	{
	$this->OnAfterItemCreate($event);
	$object->SendEmailEvents();
	if( !$this->Application->IsAdmin() && ($event->status == erSUCCESS) && $event->redirect) $this->autoLoginUser($event);
	}
	}
	return $is_subscriber;
	}

	/**
	* Creates new user
	*
	* @param kEvent $event
	*/
	function OnCreate(&$event)
	{
	if( !$this->Application->IsAdmin() ) $this->setUserStatus($event);

	if( !$this->isSubscriberOnly($event) )
	{
	$cs_helper =& $this->Application->recallObject('CountryStatesHelper');
	$cs_helper->CheckStateField($event, 'State', 'Country');

	$object =& $event->getObject( Array('skip_autoload' => true) );
	if ($this->Application->ConfigValue('User_Password_Auto')) {
	$pass = makepassword4(rand(5,8));
	$object->SetField('Password', $pass);
	$object->SetField('VerifyPassword', $pass);
	$this->Application->SetVar('user_password',$pass);
	}
	parent::OnCreate($event);


	$this->Application->SetVar('u_id', $object->getID() );

	$this->setNextTemplate($event);

	if( !$this->Application->IsAdmin() && ($event->status == erSUCCESS) && $event->redirect)
	{
	$object->SendEmailEvents();
	$this->autoLoginUser($event);
	}
	}
	}

	/**
	* Set's new user status based on config options
	*
	* @param kEvent $event
	*/
	function setUserStatus(&$event)
	{
	$object =& $event->getObject( Array('skip_autoload' => true) );

	$new_users_allowed = $this->Application->ConfigValue('User_Allow_New');
	// 1 - Instant, 2 - Not Allowed, 3 - Pending

	switch ($new_users_allowed)
	{
	case 1: // Instant
	$object->SetDBField('Status', 1);
	$next_template = $this->Application->GetVar('registration_confirm_template');
	if($next_template) $event->redirect = $next_template;
	break;

	case 3: // Pending
	$next_template = $this->Application->GetVar('registration_confirm_pending_template');
	if($next_template) $event->redirect = $next_template;
	$object->SetDBField('Status', 2);
	break;

	case 2: // Not Allowed
	$object->SetDBField('Status', 0);
	break;
	}

	/*if ($object->GetDBField('PaidMember') == 1) {
	$this->Application->HandleEvent($add_to_cart, 'ord:OnAddToCart');
	$event->redirect = 'in-commerce/checkout/shop_cart';
	} */

	}




	/**
	* Set's new unique resource id to user
	*
	* @param kEvent $event
	*/
	function OnBeforeItemCreate(&$event)
	{
	$email_as_login = $this->Application->ConfigValue('Email_As_Login');
	$object =& $event->getObject();
	if ($email_as_login) {
	$object->Fields['Email']['error_msgs']['unique'] = $this->Application->Phrase('lu_user_and_email_already_exist');
	}

	}

	/**
	* Set's new unique resource id to user
	*
	* @param kEvent $event
	*/
	function OnAfterItemValidate(&$event)
	{
	$object =& $event->getObject();
	$resource_id = $object->GetDBField('ResourceId');
	if (!$resource_id)
	{
	$object->SetDBField('ResourceId', $this->Application->NextResourceId() );
	}
	}


	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnRecommend(&$event){

	$friend_email = $this->Application->GetVar('friend_email');
	$friend_name = $this->Application->GetVar('friend_email');

	if (preg_match("/^[_a-zA-Z0-9-\.]+@[a-zA-Z0-9-\.]+\.[a-z]{2,4}$/", $friend_email))
	{

	$send_params = array();
	$send_params['to_email']=$friend_email;
	$send_params['to_name']=$friend_name;

	$user_id = $this->Application->GetVar('u_id');
	$email_event = &$this->Application->EmailEventUser('SITE.SUGGEST', $user_id, $send_params);

	if ($email_event->status == erSUCCESS){
	$event->redirect_params = array('opener' => 's', 'pass' => 'all');
	$event->redirect = $this->Application->GetVar('template_success');
	}
	else {
	// $event->redirect_params = array('opener' => 's', 'pass' => 'all');
	// $event->redirect = $this->Application->GetVar('template_fail');
	$object =& $this->Application->recallObject('u');
	$object->ErrorMsgs['send_error'] = $this->Application->Phrase('lu_email_send_error');
	$object->FieldErrors['Email']['pseudo'] = 'send_error';
	$event->status = erFAIL;

	}
	}
	else {
	$object =& $this->Application->recallObject('u');
	$object->ErrorMsgs['invalid_email'] = $this->Application->Phrase('lu_InvalidEmail');
	$object->FieldErrors['Email']['pseudo'] = 'invalid_email';
	$event->status = erFAIL;
	}


	}

	/**
	* Saves address changes and mades no redirect
	*
	* @param kEvent $event
	*/
	function OnUpdateAddress(&$event)
	{
	$object =& $event->getObject( Array('skip_autoload' => true) );

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

	$event->redirect = false;
	}

	function OnSubscribeQuery(&$event){

	$user_email = $this->Application->GetVar('subscriber_email');
	if ( preg_match("/^[_a-zA-Z0-9-\.]+@[a-zA-Z0-9-\.]+\.[a-z]{2,4}$/", $user_email) ){

	$object = &$this->Application->recallObject($this->Prefix.'.subscriber', null, Array('skip_autoload' => true));

	$this->Application->StoreVar('SubscriberEmail', $user_email);

	if( $object->Load(array('Email'=>$user_email)) ){
	$group_info = $this->GetGroupInfo($object->GetID());
	if($group_info){
	$event->redirect = $this->Application->GetVar('unsubscribe_template');
	}
	else {
	$event->redirect = $this->Application->GetVar('subscribe_template');
	}
	}
	else {
	$event->redirect = $this->Application->GetVar('subscribe_template');
	$this->Application->StoreVar('SubscriberEmail', $user_email);
	}

	}
	else {

	$object =& $this->Application->recallObject('u');
	$object->ErrorMsgs['invalid_email'] = $this->Application->Phrase('lu_InvalidEmail');
	$object->FieldErrors['SubscribeEmail']['pseudo'] = 'invalid_email';
	$event->status = erFAIL;

	}


	//subscribe_query_ok_template
	}

	function OnSubscribeUser(&$event){

	$object = &$this->Application->recallObject($this->Prefix.'.subscriber', null, Array('skip_autoload' => true));

	$user_email = $this->Application->RecallVar('SubscriberEmail');

	if (preg_match("/^[_a-zA-Z0-9-\.]+@[a-zA-Z0-9-\.]+\.[a-z]{2,4}$/", $user_email)){

	if($object->Load(array('Email'=>$user_email))){

	$group_info = $this->GetGroupInfo($object->GetID());

	if ($group_info){
	if ($event->getEventParam('no_unsubscribe')) return;

	if ($group_info['PrimaryGroup']){
	// delete user
	$object->Delete();
	}
	else {
	$this->RemoveSubscriberGroup($object->GetID());
	}

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

	}
	else {
	$this->AddSubscriberGroup($object->GetID(), 0);
	$event->redirect = $this->Application->GetVar('subscribe_ok_template');
	}


	}
	else {

	$object->SetField('Email', $user_email);
	$object->SetField('Login', $user_email);
	$object->SetDBField('dob', 1);
	$object->SetDBField('dob_date', 1);
	$object->SetDBField('dob_time', 1);
	$ip = getenv('HTTP_X_FORWARDED_FOR')?getenv('HTTP_X_FORWARDED_FOR'):getenv('REMOTE_ADDR');
	$object->SetDBField('ip', $ip);

	$this->Application->SetVar('IsSubscriber', 1);

	if ($object->Create()) {

	$this->AddSubscriberGroup($object->GetID(), 1);
	$event->redirect = $this->Application->GetVar('subscribe_ok_template');
	}

	$this->Application->SetVar('IsSubscriber', 0);
	}
	}
	else {
	// error handling here
	$event->redirect = $this->Application->GetVar('subscribe_fail_template');
	}


	}

	function AddSubscriberGroup($user_id, $is_primary){

	$group_id = $this->Application->ConfigValue('User_SubscriberGroup');
	$sql = 'INSERT INTO '.TABLE_PREFIX.'UserGroup(PortalUserId,GroupId,PrimaryGroup) VALUES (%s,%s,'.$is_primary.')';
	$this->Conn->Query( sprintf($sql, $user_id, $group_id) );
	$this->Application->EmailEventAdmin('USER.SUBSCRIBE', $user_id);
	$this->Application->EmailEventUser('USER.SUBSCRIBE', $user_id);

	}

	function RemoveSubscriberGroup($user_id){

	$group_id = $this->Application->ConfigValue('User_SubscriberGroup');
	$sql = 'DELETE FROM '.TABLE_PREFIX.'UserGroup WHERE PortalUserId='.$user_id.' AND GroupId='.$this->Application->ConfigValue('User_SubscriberGroup');
	$this->Conn->Query($sql);
	$this->Application->EmailEventAdmin('USER.UNSUBSCRIBE', $user_id);
	$this->Application->EmailEventUser('USER.UNSUBSCRIBE', $user_id);

	}

	function GetGroupInfo($user_id){

	$group_info = $this->Conn->GetRow('SELECT * FROM '.TABLE_PREFIX.'UserGroup
	WHERE PortalUserId='.$user_id.'
	AND GroupId='.$this->Application->ConfigValue('User_SubscriberGroup'));
	return $group_info;

	}

	function OnForgotPassword(&$event){

	$user_object = &$this->Application->recallObject('u.forgot', null, Array('skip_autoload' => true));
	$user_current_object = &$this->Application->recallObject('u');

	$username = $this->Application->GetVar('username');
	$email = $this->Application->GetVar('email');
	$found = false;
	$allow_reset = true;

	if( strlen($username) )
	{
	if( $user_object->Load(array('Login'=>$username)) )
	$found = ($user_object->GetDBField("Login")==$username && $user_object->GetDBField("Status")==1) && strlen($user_object->GetDBField("Password"));
	}
	else if( strlen($email) )
	{
	if( $user_object->Load(array('Email'=>$email)) )
	$found = ($user_object->GetDBField("Email")==$email && $user_object->GetDBField("Status")==1) && strlen($user_object->GetDBField("Password"));
	}

	if( $user_object->isLoaded() )
	{
	$PwResetConfirm = $user_object->GetDBField('PwResetConfirm');
	$PwRequestTime = $user_object->GetDBField('PwRequestTime');
	$PassResetTime = $user_object->GetDBField('PassResetTime');
	//$MinPwResetDelay = $user_object->GetDBField('MinPwResetDelay');
	$MinPwResetDelay = $this->Application->ConfigValue('Users_AllowReset');

	$allow_reset = (strlen($PwResetConfirm) ?
	adodb_mktime() > $PwRequestTime + $MinPwResetDelay :
	adodb_mktime() > $PassResetTime + $MinPwResetDelay);
	}

	if($found && $allow_reset)
	{
	$this->Application->StoreVar('tmp_user_id', $user_object->GetDBField("PortalUserId"));
	$this->Application->StoreVar('tmp_email', $user_object->GetDBField("Email"));
	$this->Application->EmailEventUser('INCOMMERCEUSER.PSWDC', $user_object->GetDBField("PortalUserId"));

	$event->redirect = $this->Application->GetVar('template_success');
	}
	else
	{
	if(!strlen($username) && !strlen($email))
	{
	$user_current_object->ErrorMsgs['forgotpw_nodata'] = $this->Application->Phrase('lu_ferror_forgotpw_nodata');
	$user_current_object->FieldErrors['Login']['pseudo'] = 'forgotpw_nodata';
	$user_current_object->FieldErrors['Email']['pseudo'] = 'forgotpw_nodata';
	}
	else
	{
	if($allow_reset)
	{
	if( strlen($username) ){
	$user_current_object->ErrorMsgs['unknown_username'] = $this->Application->Phrase('lu_ferror_unknown_username');
	$user_current_object->FieldErrors['Login']['pseudo']='unknown_username';
	}
	if( strlen($email) ){
	$user_current_object->ErrorMsgs['unknown_email'] = $this->Application->Phrase('lu_ferror_unknown_email');
	$user_current_object->FieldErrors['Email']['pseudo']='unknown_email';
	}
	}
	else
	{
	$user_current_object->ErrorMsgs['reset_denied'] = $this->Application->Phrase('lu_ferror_reset_denied');
	if( strlen($username) ){
	$user_current_object->FieldErrors['Login']['pseudo']='reset_denied';
	}
	if( strlen($email) ){
	$user_current_object->FieldErrors['Email']['pseudo']='reset_denied';
	}
	}
	}

	if($user_current_object->FieldErrors){
	$event->redirect = false;
	}
	}

	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnResetPassword(&$event){

	$user_object = &$this->Application->recallObject('u.forgot');

	if($user_object->Load($this->Application->RecallVar('tmp_user_id'))){

	$this->Application->EmailEventUser('INCOMMERCEUSER.PSWDC', $user_object->GetDBField("PortalUserId"));
	$event->redirect = $this->Application->GetVar('template_success');

	$mod_object =& $this->Application->recallObject('mod.'.'In-Commerce');
	$m_cat_id = $mod_object->GetDBField('RootCat');
	$event->SetRedirectParam('pass', 'm');
	//$event->SetRedirectParam('m_cat_id', $m_cat_id);
	$this->Application->SetVar('m_cat_id', $m_cat_id);


	}

	}

	function OnResetPasswordConfirmed(&$event){

	$passed_key = $this->Application->GetVar('user_key');

	$user_object = &$this->Application->recallObject('u.forgot');
	$user_current_object = &$this->Application->recallObject('u');

	if (strlen(trim($passed_key)) == 0) {
	$event->redirect_params = array('opener' => 's', 'pass' => 'all');
	$event->redirect = false;

	$user_current_object->ErrorMsgs['code_is_not_valid'] = $this->Application->Phrase('lu_code_is_not_valid');
	$user_current_object->FieldErrors['PwResetConfirm']['pseudo'] = 'code_is_not_valid';
	}


	if($user_object->Load(array('PwResetConfirm'=>$passed_key)))
	{
	$exp_time = $user_object->GetDBField('PwRequestTime') + 3600;
	$user_object->SetDBField("PwResetConfirm", '');
	$user_object->SetDBField("PwRequestTime", 0);
	if ( $exp_time > adodb_mktime() )
	{
	//$m_var_list_update['codevalidationresult'] = 'lu_resetpw_confirm_text';
	$newpw = makepassword4();

	$this->Application->StoreVar('password', $newpw);

	$user_object->SetDBField("Password",$newpw);
	$user_object->SetDBField("PassResetTime", adodb_mktime());
	$user_object->SetDBField("PwResetConfirm", '');
	$user_object->SetDBField("PwRequestTime", 0);
	$user_object->Update();

	$this->Application->SetVar('ForgottenPassword', $newpw);

	$email_event_user = &$this->Application->EmailEventUser('INCOMMERCEUSER.PSWD', $user_object->GetDBField('PortalUserId'));
	$email_event_admin = &$this->Application->EmailEventAdmin('INCOMMERCEUSER.PSWD');

	$this->Application->DeleteVar('ForgottenPassword');

	if ($email_event_user->status == erSUCCESS){
	$event->redirect_params = array('opener' => 's', 'pass' => 'all');
	$event->redirect = $this->Application->GetVar('template_success');
	}

	$user_object->SetDBField("Password",md5($newpw));
	$user_object->Update();

	} else {
	$user_current_object->ErrorMsgs['code_expired'] = $this->Application->Phrase('lu_code_expired');
	$user_current_object->FieldErrors['PwResetConfirm']['pseudo'] = 'code_expired';
	$event->redirect = false;

	}
	} else {
	$user_current_object->ErrorMsgs['code_is_not_valid'] = $this->Application->Phrase('lu_code_is_not_valid');
	$user_current_object->FieldErrors['PwResetConfirm']['pseudo'] = 'code_is_not_valid';
	$event->redirect = false;

	}
	}

	function OnUpdate(&$event)
	{
	$cs_helper =& $this->Application->recallObject('CountryStatesHelper');
	$cs_helper->CheckStateField($event, 'State', 'Country');

	parent::OnUpdate($event);

	$this->setNextTemplate($event);
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function setNextTemplate(&$event)
	{
	if( !$this->Application->IsAdmin() )
	{
	$event->redirect_params['opener'] = 's';
	$object =& $event->getObject();
	if($object->GetDBField('Status') == STATUS_ACTIVE)
	{
	$next_template = $this->Application->GetVar('next_template');
	if($next_template) $event->redirect = $next_template;
	}
	}
	}



	/**
	* Delete users from groups if their membership is expired
	*
	* @param kEvent $event
	*/
	function OnCheckExpiredMembership(&$event)
	{
	// send pre-expiration reminders: begin
	$pre_expiration = adodb_mktime() + $this->Application->ConfigValue('User_MembershipExpirationReminder') * 3600 * 24;
	$sql = 'SELECT PortalUserId, GroupId
	FROM '.TABLE_PREFIX.'UserGroup
	WHERE (MembershipExpires IS NOT NULL) AND (ExpirationReminderSent = 0) AND (MembershipExpires < '.$pre_expiration.')';

	$skip_clause = $event->getEventParam('skip_clause');
	if ($skip_clause) {
	$sql .= ' AND !('.implode(') AND !(', $skip_clause).')';
	}

	$records = $this->Conn->Query($sql);
	if ($records) {
	$conditions = Array();
	foreach ($records as $record) {
	$email_event_user =& $this->Application->EmailEventUser('USER.MEMBERSHIP.EXPIRATION.NOTICE', $record['PortalUserId']);
	$email_event_admin =& $this->Application->EmailEventAdmin('USER.MEMBERSHIP.EXPIRATION.NOTICE');
	$conditions[] = '(PortalUserId = '.$record['PortalUserId'].' AND GroupId = '.$record['GroupId'].')';
	}
	$sql = 'UPDATE '.TABLE_PREFIX.'UserGroup
	SET ExpirationReminderSent = 1
	WHERE '.implode(' OR ', $conditions);
	$this->Conn->Query($sql);
	}
	// send pre-expiration reminders: end

	// remove users from groups with expired membership: begin
	$sql = 'SELECT PortalUserId
	FROM '.TABLE_PREFIX.'UserGroup
	WHERE (MembershipExpires IS NOT NULL) AND (MembershipExpires < '.adodb_mktime().')';
	$user_ids = $this->Conn->GetCol($sql);
	if ($user_ids) {
	foreach ($user_ids as $id) {
	$email_event_user =& $this->Application->EmailEventUser('USER.MEMBERSHIP.EXPIRED', $id);
	$email_event_admin =& $this->Application->EmailEventAdmin('USER.MEMBERSHIP.EXPIRED');
	}
	}
	$sql = 'DELETE FROM '.TABLE_PREFIX.'UserGroup
	WHERE (MembershipExpires IS NOT NULL) AND (MembershipExpires < '.adodb_mktime().')';
	$this->Conn->Query($sql);
	// remove users from groups with expired membership: end
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function OnRefreshForm(&$event)
	{
	$event->redirect = false;
	$item_info = $this->Application->GetVar($event->Prefix_Special);
	list($id, $fields) = each($item_info);

	$object =& $event->getObject( Array('skip_autoload' => true) );
	$object->setID($id);
	$object->IgnoreValidation = true;
	$object->SetFieldsFromHash($fields);
	}

	/**
	* Sets persistant variable
	*
	* @param kEvent $event
	*/
	function OnSetPersistantVariable(&$event)
	{
	$object =& $event->getObject();

	$field = $this->Application->GetVar('field');
	$value = $this->Application->GetVar('value');
	$object->setPersistantVar($field, $value);

	$force_tab = $this->Application->GetVar('SetTab');
	if ($force_tab) {
	$this->Application->StoreVar('force_tab', $force_tab);
	}
	}

	/**
	* Overwritten to return user from order by special .ord
	*
	* @param kEvent $event
	*/
	function getPassedId(&$event)
	{
	if ($event->Special == 'ord') {
	$order =& $this->Application->recallObject('ord');
	return $order->GetDBField('PortalUserId');
	}
	return parent::getPassedID($event);
	}
	}

	?>
	\ No newline at end of file

	Property changes on: trunk/core/units/users/users_event_handler.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.68
	\ No newline at end of property
	+1.69
	\ No newline at end of property
	Index: trunk/core/units/general/helpers/search_helper.php
	===================================================================
	--- trunk/core/units/general/helpers/search_helper.php (revision 6832)
	+++ trunk/core/units/general/helpers/search_helper.php (revision 6833)
	@@ -1,505 +1,507 @@
	<?php

	class kSearchHelper extends kHelper {


	/**
	* Splits search phrase into keyword using quotes,plus and minus sings and spaces as split criteria
	*
	* @param string $keyword
	* @return string
	*/
	function splitKeyword($keyword)
	{
	$quotes_re = '/([+\-]?)"(.*?)"/';
	$no_quotes_re = '/([+\-]?)([^ ]+)/';

	$quoted_kw = preg_match_all($quotes_re, $keyword, $res);
	foreach ($res[2] as $index => $kw) $final[$kw] = $res[1][$index];
	$keyword = preg_replace($quotes_re, '', $keyword);
	$not_quoted_kw = preg_match_all($no_quotes_re, $keyword, $res);
	foreach ($res[2] as $index => $kw) $final[$kw] = $res[1][$index];

	return $final;
	}

	function getPositiveKeywords($keyword)
	{
	$keywords = $this->splitKeyword($keyword);

	$ret = Array();
	foreach ($keywords as $keyword => $sign) {
	if ($sign == '+' \|\| $sign == '') {
	$ret[] = $keyword;
	}
	}
	return $ret;
	}

	function buildWhereClause($keyword, $fields)
	{
	$keywords = $this->splitKeyword($keyword);

	$normal_conditions = Array();
	$plus_conditions = Array();
	$minus_conditions = Array();

	foreach ($keywords as $keyword => $sign) {
	switch ($sign) {
	case '+':
	$plus_conditions[] = implode(' LIKE "%'.$keyword.'%" OR ', $fields).' LIKE "%'.$keyword.'%"';
	break;

	case '-':
	foreach ($fields as $field) {
	$condition[] = $field.' NOT LIKE "%'.$keyword.'%" OR '.$field.' IS NULL';
	}
	$minus_conditions[] = '('.implode(') AND (', $condition).')';
	break;

	case '':
	$normal_conditions[] = implode(' LIKE "%'.$keyword.'%" OR ', $fields).' LIKE "%'.$keyword.'%"';
	break;
	}
	}

	// building where clause
	if ($normal_conditions) {
	$where_clause = '('.implode(') OR (', $normal_conditions).')';
	}
	else {
	$where_clause = '1';
	}

	if ($plus_conditions) {
	$where_clause = '('.$where_clause.') AND ('.implode(') AND (', $plus_conditions).')';
	}

	if ($minus_conditions) {
	$where_clause = '('.$where_clause.') AND ('.implode(') AND (', $minus_conditions).')';
	}

	return $where_clause;
	}

	/**
	* Returns additional information about search field
	*
	* @param kDBList $object
	* @param string $field_name
	* @return Array
	*/
	function getFieldInformation(&$object, $field_name)
	{
	$sql_filter_type = isset($object->VirtualFields[$field_name]) ? 'having' : 'where';
	$field_type = isset($object->Fields[$field_name]['type']) ? $object->Fields[$field_name]['type'] : 'string';

	if (preg_match('/(.)\.(.)/', $field_name, $regs)) {
	$table_name = '`'.$regs[1].'`.'; // field from external table
	$field_name = $regs[2];
	}
	elseif ($sql_filter_type == 'where') {
	$table_name = '`'.$object->TableName.'`.'; // field from local table
	}

	$table_name = ($sql_filter_type == 'where') ? $table_name : '';
	return Array ('field_name' => $field_name, 'field_type' => $field_type, 'table_name' => $table_name, 'sql_filter_type' => $sql_filter_type);
	}

	/**
	* Enter description here...
	*
	* @param kEvent $event
	*/
	function performSearch(&$event)
	{
	$object =& $event->getObject();

	// process search keyword
	$search_keyword = $this->Application->GetVar( $event->getPrefixSpecial(true).'_search_keyword');
	$this->Application->StoreVar( $event->getPrefixSpecial().'_search_keyword', $search_keyword);
	$search_keyword = str_replace('*', '%', $search_keyword);

	$custom_filter = $this->processCustomFilters($event);

	if(!$search_keyword && $custom_filter === false) {
	$this->resetSearch($event);
	return true;
	}

	if ($search_keyword) {
	$this->processAutomaticFilters($event, $search_keyword, $custom_filter);
	}
	}


	function processAutomaticFilters(&$event, $search_keyword, $custom_filter)
	{
	$grid_name = $this->Application->GetVar('grid_name');
	$grids = $this->Application->getUnitOption($event->Prefix, 'Grids');
	$search_fields = array_keys($grids[$grid_name]['Fields']);

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

	foreach ($search_fields as $search_field) {
	$custom_search = isset($custom_filter[$search_field]);

	$filter_data = $this->getSearchClause($object, $search_field, $search_keyword, $custom_search);

	if ($filter_data) {
	$search_filter[$search_field] = $filter_data;
	}
	else {
	unset($search_filter[$search_field]);
	}
	}
	$this->Application->StoreVar($event->getPrefixSpecial().'_search_filter', serialize($search_filter) );
	}

	/**
	* Returns search clause for any particular field
	*
	* @param kDBList $object
	* @param string $search_field
	* @param string $search_keyword what we are searching (false, when building custom filter clause)
	* @param string $custom_search already found using custom filter
	* @return Array
	*/
	function getSearchClause(&$object, $field_name, $search_keyword, $custom_search)
	{
	$search_keywords = $this->splitKeyword($search_keyword);

	extract( $this->getFieldInformation($object, $field_name) ); // see getFieldInformation for more details

	$filter_value = '';

	// get field clause by formatter name and/or parameters
	$formatter = getArrayValue($object->Fields[$field_name], 'formatter');
	switch ($formatter) {
	case 'kOptionsFormatter':
	$search_keys = Array();

	if ($custom_search === false) {
	// if keywords passed through simple search filter (on each grid)
	$use_phrases = getArrayValue($object->Fields[$field_name], 'use_phrases');
	$field_options = $object->GetFieldOptions($field_name);
	foreach ($field_options['options'] as $key => $val) {
	foreach ($search_keywords as $keyword => $sign) {
	$pattern = '#'.$keyword.'#i';
	if (!preg_match($pattern, $use_phrases ? $this->Application->Phrase($val) : $val)) {
	if ($sign == '+') {
	$filter_value = $table_name.'`'.$field_name.'` = NULL';
	break;
	}
	else {
	continue;
	}
	}

	if ($sign == '+' \|\| $sign == '') {
	$search_keys[$key] = $this->Conn->qstr($key);
	}
	elseif($sign == '-') {
	// if same value if found as exclusive too, then remove from search result
	unset($search_keys[$key]);
	}
	}
	}
	}

	if ($search_keys) {
	$filter_value = $table_name.'`'.$field_name.'` IN ('.implode(',', $search_keys).')';
	}

	$field_processed = true;
	break;

	case 'kDateFormatter':
	// if date is searched using direct filter, then do nothing here, otherwise search using LIKE clause
	$field_processed = ($custom_search !== false) ? true : false;
	break;

	default:
	$field_processed = false;
	break;
	}

	// if not already processed by formatter, then get clause by field type
	if (!$field_processed && $search_keywords) {
	switch($field_type)
	{
	case 'int':
	case 'integer':
	case 'numeric':
	$search_keys = Array();
	foreach ($search_keywords as $keyword => $sign) {
	if (!is_numeric($keyword) \|\| ($sign == '-')) continue;
	$search_keys[] = $this->Conn->qstr($keyword);
	}

	if ($search_keys) {
	$filter_value = $table_name.'`'.$field_name.'` IN ('.implode(',', $search_keys).')';
	}
	break;

	case 'double':
	case 'float':
	case 'real':
	$search_keys = Array();
	foreach ($search_keywords as $keyword => $sign) {
	$keyword = str_replace(',', '.', $keyword);
	if (!is_numeric($keyword) \|\| ($sign == '-')) continue;
	$search_keys[] = 'ABS('.$table_name.'`'.$field_name.'` - '.$this->Conn->qstr($keyword).') <= 0.0001';
	}

	if ($search_keys) {
	$filter_value = '('.implode(') OR (', $search_keys).')';
	}
	break;

	case 'string':
	$filter_value = $this->buildWhereClause($search_keyword, Array($table_name.'`'.$field_name.'`'));
	break;
	}
	}

	if ($filter_value) {
	return Array('type' => $sql_filter_type, 'value' => $filter_value);
	}

	return false;
	}

	/**
	* Processes custom filters from submit
	*
	* @param KEvent $event
	* @return bool
	*/
	function processCustomFilters(&$event)
	{
	$grid_name = $this->Application->GetVar('grid_name');

	// update "custom filter" with values from submit: begin
	- $custom_filters = $this->Application->RecallVar($event->getPrefixSpecial().'_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) {
	$custom_filters = unserialize($custom_filters);
	$custom_filter = isset($custom_filters[$grid_name]) ? $custom_filters[$grid_name] : Array ();
	}
	else {
	$custom_filter = Array ();
	}

	// submit format custom_filters[prefix_special][field]
	$submit_filters = $this->Application->GetVar('custom_filters');
	if ($submit_filters) {
	$submit_filters = getArrayValue($submit_filters, $event->getPrefixSpecial(), $grid_name);
	if ($submit_filters) {
	foreach ($submit_filters as $field_name => $field_options) {
	list ($filter_type, $field_value) = each($field_options);
	$is_empty = is_array($field_value) ? !implode('', $field_value) : !$field_value;
	if ($is_empty) {
	if (isset($custom_filter[$field_name])) {
	// use isset, because non-existing key will cause "php notice"!
	unset($custom_filter[$field_name][$filter_type]); // remove filter

	if (!$custom_filter[$field_name]) {
	// if no filters left for field, then delete record at all
	unset($custom_filter[$field_name]);
	}
	}
	}
	else {
	$custom_filter[$field_name][$filter_type]['submit_value'] = $field_value;
	}
	}
	}
	}

	if ($custom_filter) {
	$custom_filters[$grid_name] = $custom_filter;
	}
	else {
	unset($custom_filters[$grid_name]);
	}
	// update "custom filter" with values from submit: end

	if (!$custom_filter) {
	// in case when no filters specified, there are nothing to process
	- $this->Application->StoreVar($event->getPrefixSpecial().'_custom_filter', serialize($custom_filters) );
	+ $this->Application->StorePersistentVar($event->getPrefixSpecial().'_custom_filter.'.$view_name, serialize($custom_filters) );
	return false;
	}

	$object =& $event->getObject(); // don't recall it each time in getCustomFilterSearchClause
	$grid_info = $this->Application->getUnitOption($event->Prefix.'.'.$grid_name, 'Grids');
	foreach ($custom_filter as $field_name => $field_options) {
	list ($filter_type, $field_options) = each($field_options);
	$field_options['grid_options'] = $grid_info['Fields'][$field_name];
	$field_options = $this->getCustomFilterSearchClause($object, $field_name, $filter_type, $field_options);
	if ($field_options['value']) {
	unset($field_options['grid_options']);
	$custom_filter[$field_name][$filter_type] = $field_options;
	}
	}

	$custom_filters[$grid_name] = $custom_filter;
	- $this->Application->StoreVar($event->getPrefixSpecial().'_custom_filter', serialize($custom_filters) );
	+ $this->Application->StorePersistentVar($event->getPrefixSpecial().'_custom_filter.'.$view_name, serialize($custom_filters) );
	return $custom_filter;
	}

	/**
	* Return numeric range filter value + checking that it's number
	*
	* @param Array $value array containing range filter value
	* @return unknown
	*/
	function getRangeValue($value)
	{
	return $value && is_numeric($value) ? $this->Conn->qstr($value) : false;
	}

	function getCustomFilterSearchClause(&$object, $field_name, $filter_type, $field_options)
	{
	if ($filter_type == 'date_range') {
	// use timestamp field, not formatted one
	$field_name = $field_options['grid_options']['sort_field'];
	}

	extract( $this->getFieldInformation($object, $field_name) ); // see getFieldInformation for more details

	$filter_value = '';

	switch ($filter_type) {
	case 'range':
	$from = $this->getRangeValue($field_options['submit_value']['from']);
	$to = $this->getRangeValue($field_options['submit_value']['to']);

	if ($from !== false && $to !== false) {
	// add range filter
	$filter_value = $table_name.'`'.$field_name.'` >= '.$from.' AND '.$table_name.'`'.$field_name.'` <= '.$to;
	}
	elseif ($from !== false) {
	// add equals filter on $from
	$filter_value = $table_name.'`'.$field_name.'` = '.$from;
	}
	elseif ($to !== false) {
	// add equals filter on $to
	$filter_value = $table_name.'`'.$field_name.'` = '.$to;
	}
	break;

	case 'float_range':
	// MySQL can't compare values in "float" type columns using "=" operator
	$from = $this->getRangeValue($field_options['submit_value']['from']);
	$to = $this->getRangeValue($field_options['submit_value']['to']);

	if ($from !== false && $to !== false) {
	// add range filter
	$filter_value = $table_name.'`'.$field_name.'` >= '.$from.' AND '.$table_name.'`'.$field_name.'` <= '.$to;
	}
	elseif ($from !== false) {
	// add equals filter on $from
	$filter_value = 'ABS('.$table_name.'`'.$field_name.'` - '.$from.') <= 0.0001';
	}
	elseif ($to !== false) {
	// add equals filter on $to
	$filter_value = 'ABS('.$table_name.'`'.$field_name.'` - '.$to.') <= 0.0001';
	}
	break;

	case 'date_range':
	$from = $this->processRangeField($object, $field_name, $field_options['submit_value'], 'from');
	$to = $this->processRangeField($object, $field_name, $field_options['submit_value'], 'to');

	$day_seconds = 23 * 60 * 60 + 59 * 60 + 59;
	if ($from !== false && $to === false) {
	$to = $from + $day_seconds;
	}
	elseif ($from === false && $to !== false) {
	$from = $to - $day_seconds;
	}

	if ($from !== false && $to !== false) {
	$filter_value = $table_name.'`'.$field_name.'` >= '.$from.' AND '.$table_name.'`'.$field_name.'` <= '.$to;
	}
	break;

	case 'equals':
	case 'options':
	$field_value = $field_options['submit_value'] ? $this->Conn->qstr($field_options['submit_value']) : false;
	if ($field_value) {
	$filter_value = $table_name.'`'.$field_name.'` = '.$field_value;
	}
	break;

	case 'like':
	$filter_value = $this->buildWhereClause($field_options['submit_value'], Array($table_name.'`'.$field_name.'`'));
	break;

	default:
	break;
	}

	$field_options['sql_filter_type'] = $sql_filter_type;
	$field_options['value'] = $filter_value;

	return $field_options;
	}

	/**
	* Enter description here...
	*
	* @param kdbItem $object
	* @param string $search_field
	* @param string $value
	* @param string $type
	*/
	function processRangeField(&$object, $search_field, $value, $type)
	{
	if (!$value[$type]) {
	return false;
	}

	$lang_current =& $this->Application->recallObject('lang.current');
	$dt_separator = getArrayValue($object->GetFieldOptions($search_field), 'date_time_separator');
	if (!$dt_separator) {
	$dt_separator = ' ';
	}

	$time = ($type == 'from') ? adodb_mktime(0, 0, 0) : adodb_mktime(23, 59, 59);
	$time = adodb_date($lang_current->GetDBField('InputTimeFormat'), $time);

	$full_value = $value[$type].$dt_separator.$time;

	$formatter =& $this->Application->recallObject($object->Fields[$search_field]['formatter']);

	$value_ts = $formatter->Parse($full_value, $search_field, $object);
	$pseudo = getArrayValue($object->FieldErrors, $search_field, 'pseudo');
	if ($pseudo) {
	unset($object->FieldErrors[$search_field]); // remove error!
	// invalid format -> ignore this date in search
	return false;
	}
	return $value_ts;
	}

	/**
	* Resets current search
	*
	* @param kEvent $event
	*/
	function resetSearch(&$event)
	{
	$this->Application->RemoveVar($event->getPrefixSpecial().'_search_filter');
	$this->Application->RemoveVar($event->getPrefixSpecial().'_search_keyword');

	- $this->Application->RemoveVar($event->getPrefixSpecial().'_custom_filter');
	+ $view_name = $this->Application->RecallVar($event->getPrefixSpecial().'_current_view');
	+ $this->Application->RemovePersistentVar($event->getPrefixSpecial().'_custom_filter.'.$view_name);
	}




	}

	?>
	\ No newline at end of file

	Property changes on: trunk/core/units/general/helpers/search_helper.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.6
	\ No newline at end of property
	+1.7
	\ No newline at end of property

in-portalNo OneTemporaryActions

File Metadata

in-portalView Options

Event Timeline

in-portal
No OneTemporary
Actions

in-portal
View Options