Index: branches/RC/core/units/admin/admin_tag_processor.php
===================================================================
diff -u -N
--- branches/RC/core/units/admin/admin_tag_processor.php	(revision 11918)
+++ branches/RC/core/units/admin/admin_tag_processor.php	(revision 0)
@@ -1,1152 +0,0 @@
-<?php
-/**
-* @version	$Id: admin_tag_processor.php 11918 2009-07-19 11:34:55Z alex $
-* @package	In-Portal
-* @copyright	Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
-* @license      GNU/GPL
-* In-Portal is Open Source software.
-* This means that this software may have been modified pursuant
-* the GNU General Public License, and as distributed it includes
-* or is derivative of works licensed under the GNU General Public License
-* or other free or open source software licenses.
-* See http://www.in-portal.net/license/ for copyright notices and details.
-*/
-
-	class AdminTagProcessor extends kDBTagProcessor {
-
-		function SetConst($params)
-		{
-			$name = $this->SelectParam($params, 'name,const');
-			safeDefine($name, $params['value']);
-		}
-
-		/**
-		 * Allows to execute js script after the page is fully loaded
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function AfterScript($params)
-		{
-			$after_script = $this->Application->GetVar('after_script');
-			if ($after_script) {
-				return '<script type="text/javascript">'.$after_script.'</script>';
-			}
-			return '';
-		}
-
-		/**
-		 * Returns section title with #section# keyword replaced with current section
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function GetSectionTitle($params)
-		{
-			if (array_key_exists('default', $params)) {
-				return $params['default'];
-			}
-
-			return $this->Application->Phrase( replaceModuleSection($params['phrase']) );
-		}
-
-		/**
-		 * Returns section icon with #section# keyword replaced with current section
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function GetSectionIcon($params)
-		{
-			return replaceModuleSection($params['icon']);
-		}
-
-		/**
-		 * Returns version of module by name
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function ModuleVersion($params)
-		{
-			return $this->Application->findModule('Name', $params['module'], 'Version');
-		}
-
-		/**
-		 * Used in table form section drawing
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function DrawTree($params)
-		{
-			static $deep_level = 0;
-
-			// when processings, then sort children by priority (key of children array)
-			$ret = '';
-			$section_name = $params['section_name'];
-			$params['name'] = $this->SelectParam($params, 'name,render_as,block');
-			$sections_helper =& $this->Application->recallObject('SectionsHelper');
-			$section_data =& $sections_helper->getSectionData($section_name);
-
-			$params['children_count'] = isset($section_data['children']) ? count($section_data['children']) : 0;
-			$params['deep_level'] = $deep_level++;
-			$template = $section_data['url']['t'];
-			unset($section_data['url']['t']);
-			$section_data['section_url'] = $this->Application->HREF($template, '', $section_data['url']);
-			$ret .= $this->Application->ParseBlock( array_merge_recursive2($params, $section_data) );
-			if (!isset($section_data['children'])) {
-				return $ret;
-			}
-
-			$debug_mode = $this->Application->isDebugMode();
-			$super_admin_mode = $this->Application->RecallVar('super_admin');
-
-			ksort($section_data['children'], SORT_NUMERIC);
-			foreach ($section_data['children'] as $section_name) {
-				$section_data =& $sections_helper->getSectionData($section_name);
-
-				if (isset($section_data['show_mode']) && is_numeric($section_data['show_mode'])) {
-					$show_mode = $section_data['show_mode'];
-					// if super admin section -> show in super admin mode & debug mode
-					$show_section = $show_mode == smNORMAL || ((($show_mode & smSUPER_ADMIN) == smSUPER_ADMIN) && ($super_admin_mode || $debug_mode));
-					if (!$show_section) {
-						// if section is in debug mode only && debug mode -> show
-						$show_section = (($show_mode & smDEBUG) == smDEBUG) && $debug_mode;
-					}
-					if (!$show_section) {
-						continue;
-					}
-				}
-
-				$params['section_name'] = $section_name;
-				$ret .= $this->DrawTree($params);
-				$deep_level--;
-			}
-
-
-			return $ret;
-		}
-
-
-		function SectionInfo($params)
-		{
-			$section = $params['section'];
-			if ($section == '#session#') {
-				$section = $this->Application->RecallVar('section');
-			}
-
-			$sections_helper =& $this->Application->recallObject('SectionsHelper');
-			/* @var $sections_helper kSectionsHelper */
-
-			$section_data =& $sections_helper->getSectionData($section);
-			if (!$section_data) {
-				trigger_error('Use of undefined section "<strong>' . $section . '</strong>" in "<strong>' . __METHOD__ . '</strong>"', E_USER_ERROR);
-				return '';
-			}
-
-
-			if (array_key_exists('parent', $params) && $params['parent']) {
-				do {
-					$section = $section_data['parent'];
-					$section_data =& $sections_helper->getSectionData($section);
-				} while (array_key_exists('use_parent_header', $section_data) && $section_data['use_parent_header']);
-			}
-
-			$info = $params['info'];
-			switch ($info) {
-				case 'module_path':
-					if (isset($params['module']) && $params['module']) {
-						$module = $params['module'];
-					}
-					elseif (isset($section_data['icon_module'])) {
-						$module = $section_data['icon_module'];
-					}
-					else {
-						$module = '#session#';
-					}
-					$res = $this->ModulePath(array('module' => $module));
-					break;
-
-				case 'perm_section':
-					$res = $sections_helper->getPermSection($section);
-					break;
-
-				case 'label':
-					$res = $section_data['label'];
-					if ($section != 'in-portal:root') {
-						// don't translate label for top section, because it's already translated
-						$res = $this->Application->Phrase($res);
-					}
-					break;
-
-				default:
-					$res = $section_data[$info];
-					break;
-			}
-
-			if (array_key_exists('as_label', $params) && $params['as_label']) {
-				$res = $this->Application->Phrase($res);
-			}
-
-			return $res;
-		}
-
-
-		function PrintSection($params)
-		{
-			$section_name = $params['section_name'];
-			if ($section_name == '#session#') {
-				$section_name = $this->Application->RecallVar('section');
-			}
-
-			$sections_helper =& $this->Application->recallObject('SectionsHelper');
-			/* @var $sections_helper kSectionsHelper */
-
-			if (isset($params['use_first_child']) && $params['use_first_child']) {
-				$section_name = $sections_helper->getFirstChild($section_name, true);
-			}
-
-			$section_data =& $sections_helper->getSectionData($section_name);
-
-			$params['name'] = $this->SelectParam($params, 'name,render_as,block');
-			$params['section_name'] = $section_name;
-
-			$template = $section_data['url']['t'];
-			unset($section_data['url']['t']);
-
-			$section_data['section_url'] = $this->Application->HREF($template, '', $section_data['url']);
-			$ret = $this->Application->ParseBlock( array_merge_recursive2($params, $section_data) );
-
-			return $ret;
-		}
-
-		/**
-		 * Used in XML drawing for tree
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function PrintSections($params)
-		{
-			// when processings, then sort children by priority (key of children array)
-			$ret = '';
-			$section_name = $params['section_name'];
-			if ($section_name == '#session#') {
-				$section_name = $this->Application->RecallVar('section');
-			}
-
-			$sections_helper =& $this->Application->recallObject('SectionsHelper');
-			/* @var $sections_helper kSectionsHelper */
-
-			$section_data =& $sections_helper->getSectionData($section_name);
-
-			$params['name'] = $this->SelectParam($params, 'name,render_as,block');
-			if (!isset($section_data['children'])) {
-				return '';
-			}
-
-			$debug_mode = $this->Application->isDebugMode();
-			$super_admin_mode = $this->Application->RecallVar('super_admin');
-
-			ksort($section_data['children'], SORT_NUMERIC);
-			foreach ($section_data['children'] as $section_name) {
-				$params['section_name'] = $section_name;
-				$section_data =& $sections_helper->getSectionData($section_name);
-
-				if (isset($section_data['show_mode']) && is_numeric($section_data['show_mode'])) {
-					$show_mode = $section_data['show_mode'];
-					// if super admin section -> show in super admin mode & debug mode
-					$show_section = $show_mode == smNORMAL || ((($show_mode & smSUPER_ADMIN) == smSUPER_ADMIN) && ($super_admin_mode || $debug_mode));
-					if (!$show_section) {
-						// if section is in debug mode only && debug mode -> show
-						$show_section = (($show_mode & smDEBUG) == smDEBUG) && $debug_mode;
-					}
-					if (!$show_section) {
-						continue;
-					}
-				}
-
-				if (isset($section_data['tabs_only']) && $section_data['tabs_only']) {
-					$perm_status = false;
-					$folder_label = $section_data['label'];
-					ksort($section_data['children'], SORT_NUMERIC);
-					foreach ($section_data['children'] as $priority => $section_name) {
-						// if only tabs in this section & none of them have permission, then skip section too
-
-						$section_name = $sections_helper->getPermSection($section_name);
-						$perm_status = $this->Application->CheckPermission($section_name.'.view', 1);
-						if ($perm_status) {
-							break;
-						}
-					}
-					if (!$perm_status) {
-						// no permission for all tabs -> don't display tree node either
-						continue;
-					}
-
-					$params['section_name'] = $section_name;
-					$section_data =& $sections_helper->getSectionData($section_name);
-					$section_data['label'] = $folder_label; // use folder label in tree
-					$section_data['is_tab'] = 1;
-				}
-				else  {
-					$section_name = $sections_helper->getPermSection($section_name);
-					if (!$this->Application->CheckPermission($section_name.'.view', 1)) continue;
-				}
-
-				$params['children_count'] = isset($section_data['children']) ? count($section_data['children']) : 0;
-
-				// remove template, so it doesn't appear as additional parameter in url
-				$template = $section_data['url']['t'];
-				unset($section_data['url']['t']);
-
-				$section_data['section_url'] = $this->Application->HREF($template, '', $section_data['url']);
-
-				$late_load = getArrayValue($section_data, 'late_load');
-				if ($late_load) {
-					$t = $late_load['t'];
-					unset($late_load['t']);
-					$section_data['late_load'] = $this->Application->HREF($t, '', $late_load);
-					$params['children_count'] = 99;
-				}
-				else {
-					$section_data['late_load'] = '';
-				}
-
-				// restore template
-				$section_data['url']['t'] = $template;
-
-				$ret .= $this->Application->ParseBlock( array_merge_recursive2($params, $section_data) );
-				$params['section_name'] = $section_name;
-			}
-
-			return preg_replace("/\r\n|\n/", '', $ret);
-		}
-
-		function ListSectionPermissions($params)
-		{
-			$section_name = isset($params['section_name']) ? $params['section_name'] : $this->Application->GetVar('section_name');
-			$sections_helper =& $this->Application->recallObject('SectionsHelper');
-			$section_data =& $sections_helper->getSectionData($section_name);
-
-			$block_params = array_merge_recursive2($section_data, Array('name' => $params['render_as'], 'section_name' => $section_name));
-
-			$ret = '';
-			foreach ($section_data['permissions'] as $perm_name) {
-				if (preg_match('/^advanced:(.*)/', $perm_name) != $params['type']) continue;
-				$block_params['perm_name'] = $perm_name;
-				$ret .= $this->Application->ParseBlock($block_params);
-			}
-			return $ret;
-		}
-
-		function ModuleInclude($params)
-		{
-			foreach ($params as $param_name => $param_value) {
-				$params[$param_name] = replaceModuleSection($param_value);
-			}
-
-			$m =& $this->Application->recallObject('m_TagProcessor');
-			return $m->ModuleInclude($params);
-		}
-
-		function TodayDate($params)
-		{
-			return date($params['format']);
-		}
-
-		function TreeEditWarrning($params)
-		{
-			$ret = $this->Application->Phrase($params['label']);
-			$ret = str_replace(Array('&lt;', '&gt;', 'br/', 'br /', "\n", "\r"), Array('<', '>', 'br', 'br', '', ''), $ret);
-			if (getArrayValue($params, 'escape')) {
-				$ret = addslashes($ret);
-			}
-			$ret = str_replace('<br>', '\n', $ret);
-			return $ret;
-		}
-
-		/**
-		 * Draws section tabs using block name passed
-		 *
-		 * @param Array $params
-		 */
-		function ListTabs($params)
-		{
-			$sections_helper =& $this->Application->recallObject('SectionsHelper');
-			$section_data =& $sections_helper->getSectionData($params['section_name']);
-
-			$ret = '';
-			$block_params = Array('name' => $params['render_as']);
-			ksort($section_data['children'], SORT_NUMERIC);
-			foreach ($section_data['children'] as $priority => $section_name) {
-				if (!$this->Application->CheckPermission($section_name.'.view', 1)) continue;
-
-				$tab_data =& $sections_helper->getSectionData($section_name);
-				$block_params['t'] = $tab_data['url']['t'];
-				$block_params['title'] = $tab_data['label'];
-				$block_params['main_prefix'] = $section_data['SectionPrefix'];
-				$ret .= $this->Application->ParseBlock($block_params);
-			}
-
-
-			return $ret;
-		}
-
-		/**
-		 * Returns list of module item tabs that have view permission in current category
-		 *
-		 * @param Array $params
-		 */
-		function ListCatalogTabs($params)
-		{
-			$ret = '';
-			$special = isset($params['special']) ? $params['special'] : '';
-			$replace_main = isset($params['replace_m']) && $params['replace_m'];
-			$skip_prefixes = isset($params['skip_prefixes']) ? explode(',', $params['skip_prefixes']) : Array();
-
-			$block_params = $this->prepareTagParams($params);
-			$block_params['name'] = $params['render_as'];
-
-			foreach ($this->Application->ModuleInfo as $module_name => $module_info) {
-				$prefix = $module_info['Var'];
-
-				if ($prefix == 'm' && $replace_main) {
-					$prefix = 'c';
-				}
-
-				if (in_array($prefix, $skip_prefixes) || !$this->Application->prefixRegistred($prefix) || !$this->Application->getUnitOption($prefix, 'CatalogItem')) {
-					continue;
-				}
-
-				$icon = $this->Application->getUnitOption($prefix, 'CatalogTabIcon');
-				if (strpos($icon, ':') !== false) {
-					list ($icon_module, $icon) = explode(':', $icon, 2);
-				}
-				else {
-					$icon_module = 'core';
-				}
-
-				$label = $this->Application->getUnitOption($prefix, $params['title_property']);
-				$block_params['title'] = $label;
-				$block_params['prefix'] = $prefix;
-				$block_params['icon_module'] = $icon_module;
-				$block_params['icon'] = $icon;
-				$ret .= $this->Application->ParseBlock($block_params);
-			}
-			return $ret;
-		}
-
-		/**
-		 * Renders inividual catalog tab based on prefix and title_property given
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function CatalogTab($params)
-		{
-			$icon = $this->Application->getUnitOption($params['prefix'], 'CatalogTabIcon');
-			if (strpos($icon, ':') !== false) {
-				list ($icon_module, $icon) = explode(':', $icon, 2);
-			}
-			else {
-				$icon_module = 'core';
-			}
-
-			$block_params = $this->prepareTagParams($params);
-			$block_params['name'] = $params['render_as'];
-			$block_params['icon_module'] = $icon_module;
-			$block_params['icon'] = $icon;
-			$block_params['title'] = $this->Application->getUnitOption($params['prefix'], $params['title_property']);
-
-			return $this->Application->ParseBlock($block_params);
-		}
-
-		/**
-		 * Allows to construct link for opening any type of catalog item selector
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function SelectorLink($params)
-		{
-			$mode = 'catalog';
-			if (isset($params['mode'])) { // {catalog, advanced_view}
-				$mode = $params['mode'];
-				unset($params['mode']);
-			}
-
-			$params['t'] = 'catalog/item_selector/item_selector_'.$mode;
-			$params['m_cat_id'] = $this->Application->findModule('Name', 'Core', 'RootCat');
-
-			$default_params = Array('no_amp' => 1, 'pass' => 'all,'.$params['prefix']);
-			unset($params['prefix']);
-
-			$pass_through = Array();
-			if (isset($params['tabs_dependant'])) { // {yes, no}
-				$pass_through['td'] = $params['tabs_dependant'];
-				unset($params['tabs_dependant']);
-			}
-
-			if (isset($params['selection_mode'])) { // {single, multi}
-				$pass_through['tm'] = $params['selection_mode'];
-				unset($params['selection_mode']);
-			}
-
-			if (isset($params['tab_prefixes'])) { // {all, none, <comma separated prefix list>}
-				$pass_through['tp'] = $params['tab_prefixes'];
-				unset($params['tab_prefixes']);
-			}
-
-			if ($pass_through) {
-				// add pass_through to selector url if any
-				$params['pass_through'] = implode(',', array_keys($pass_through));
-				$params = array_merge_recursive2($params, $pass_through);
-			}
-
-			// user can override default parameters (except pass_through of course)
-			$params = array_merge_recursive2($default_params, $params);
-
-			$main_processor =& $this->Application->recallObject('m_TagProcessor');
-	    	return $main_processor->T($params);
-		}
-
-		function TimeFrame($params)
-		{
-			$w = adodb_date('w');
-			$m = adodb_date('m');
-			$y = adodb_date('Y');
-			//FirstDayOfWeek is 0 for Sunday and 1 for Monday
-			$fdow = $this->Application->ConfigValue('FirstDayOfWeek');
-			if ($fdow && $w == 0) $w = 7;
-			$today_start = adodb_mktime(0,0,0,adodb_date('m'),adodb_date('d'),$y);
-			$first_day_of_this_week = $today_start - ($w - $fdow)*86400;
-			$first_day_of_this_month = adodb_mktime(0,0,0,$m,1,$y);
-			$this_quater = ceil($m/3);
-			$this_quater_start = adodb_mktime(0,0,0,$this_quater*3-2,1,$y);
-
-			switch ($params['type']) {
-				case 'last_week_start':
-					$timestamp = $first_day_of_this_week - 86400*7;
-					break;
-				case 'last_week_end':
-					$timestamp = $first_day_of_this_week - 1;
-					break;
-
-				case 'last_month_start':
-					$timestamp = $m == 1 ? adodb_mktime(0,0,0,12,1,$y-1) : adodb_mktime(0,0,0,$m-1,1,$y);
-					break;
-				case 'last_month_end':
-					$timestamp = $first_day_of_this_month = adodb_mktime(0,0,0,$m,1,$y) - 1;
-					break;
-
-				case 'last_quater_start':
-					$timestamp = $this_quater == 1 ? adodb_mktime(0,0,0,10,1,$y-1) : adodb_mktime(0,0,0,($this_quater-1)*3-2,1,$y);
-					break;
-				case 'last_quater_end':
-					$timestamp = $this_quater_start - 1;
-					break;
-
-				case 'last_6_months_start':
-					$timestamp = $m <= 6 ? adodb_mktime(0,0,0,$m+6,1,$y-1) : adodb_mktime(0,0,0,$m-6,1,$y);
-					break;
-
-				case 'last_year_start':
-					$timestamp = adodb_mktime(0,0,0,1,1,$y-1);
-					break;
-				case 'last_year_end':
-					$timestamp = adodb_mktime(23,59,59,12,31,$y-1);
-					break;
-			}
-
-
-			if (isset($params['format'])) {
-				$format = $params['format'];
-				if(preg_match("/_regional_(.*)/", $format, $regs))
-				{
-					$lang =& $this->Application->recallObject('lang.current');
-					$format = $lang->GetDBField($regs[1]);
-				}
-				return adodb_date($format, $timestamp);
-			}
-
-			return $timestamp;
-
-		}
-
-		/**
-		 * Redirect to cache rebuild template, when required by installator
-		 *
-		 * @param Array $params
-		 */
-		function CheckPermCache($params)
-		{
-			// we have separate session between install wizard and admin console, so store in cache
-			$sql = 'SELECT Data
-					FROM '.TABLE_PREFIX.'Cache
-					WHERE VarName = "ForcePermCacheUpdate"';
-			$global_mark = $this->Conn->GetOne($sql);
-
-			$local_mark = $this->Application->RecallVar('PermCache_UpdateRequired');
-
-			if ($global_mark || $local_mark) {
-				$this->Application->RemoveVar('PermCache_UpdateRequired');
-
-				if ($this->Application->ConfigValue('QuickCategoryPermissionRebuild')) {
-					$updater =& $this->Application->recallObject('kPermCacheUpdater');
-					/* @var $updater kPermCacheUpdater */
-
-					$updater->OneStepRun();
-				}
-				else {
-					// update with progress bar
-					return true;
-				}
-			}
-
-			return false;
-		}
-
-		/**
-		 * Checks if current protocol is SSL
-		 *
-		 * @param Array $params
-		 * @return int
-		 */
-		function IsSSL($params)
-		{
-			return (PROTOCOL == 'https://')? 1 : 0;
-		}
-
-		function PrintColumns($params)
-		{
-			$picker_helper =& $this->Application->RecallObject('ColumnPickerHelper');
-			$picker_helper->SetGridName($this->Application->GetLinkedVar('grid_name'));
-			/* @var $picker_helper kColumnPickerHelper */
-
-			$main_prefix = $this->Application->RecallVar('main_prefix');
-			$cols = $picker_helper->LoadColumns($main_prefix);
-
-			$this->Application->Phrases->AddCachedPhrase('__FREEZER__', '-------------');
-
-			$o = '';
-			if (isset($params['hidden']) && $params['hidden']) {
-				foreach ($cols['hidden_fields'] as $col) {
-					$title = $this->Application->Phrase($cols['titles'][$col]);
-					$o .= "<option value='$col'>".$title;
-				}
-			}
-			else {
-				foreach ($cols['order'] as $col) {
-					if (in_array($col, $cols['hidden_fields'])) continue;
-					$title = $this->Application->Phrase($cols['titles'][$col]);
-					$o .= "<option value='$col'>".$title;
-				}
-			}
-			return $o;
-		}
-
-		/**
-		 * Allows to set popup size (key - current template name)
-		 *
-		 * @param Array $params
-		 */
-		function SetPopupSize($params)
-		{
-			$width = $params['width'];
-			$height = $params['height'];
-
-			if ($this->Application->GetVar('ajax') == 'yes') {
-				// during AJAX request just output size
-				die($width.'x'.$height);
-			}
-
-			if (!$this->UsePopups($params)) {
-				return ;
-			}
-
-			$t = $this->Application->GetVar('t');
-			$sql = 'SELECT *
-					FROM '.TABLE_PREFIX.'PopupSizes
-					WHERE TemplateName = '.$this->Conn->qstr($t);
-			$popup_info = $this->Conn->GetRow($sql);
-			if (!$popup_info) {
-				// create new popup size record
-				$fields_hash = 	Array (
-										'TemplateName'	=>	$t,
-										'PopupWidth'	=>	$width,
-										'PopupHeight'	=>	$height,
-								);
-				$this->Conn->doInsert($fields_hash, TABLE_PREFIX.'PopupSizes');
-			}
-			elseif ($popup_info['PopupWidth'] != $width || $popup_info['PopupHeight'] != $height) {
-				// popup found and size in tag differs from one in db -> update in db
-				$fields_hash = 	Array (
-										'PopupWidth'	=>	$width,
-										'PopupHeight'	=>	$height,
-								);
-				$this->Conn->doUpdate($fields_hash, TABLE_PREFIX.'PopupSizes', 'PopupId = '.$popup_info['PopupId']);
-			}
-		}
-
-		/**
-		 * Returns popup size (by template), if not cached, then parse template to get value
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function GetPopupSize($params)
-		{
-			$t = $this->Application->GetVar('template_name');
-			$sql = 'SELECT *
-					FROM '.TABLE_PREFIX.'PopupSizes
-					WHERE TemplateName = '.$this->Conn->qstr($t);
-			$popup_info = $this->Conn->GetRow($sql);
-			if (!$popup_info) {
-				$this->Application->InitParser();
-				$this->Application->ParseBlock(array('name' => $t)); // dies when SetPopupSize tag found & in ajax requrest
-				return '750x400'; // tag SetPopupSize not found in template -> use default size
-			}
-			return $popup_info['PopupWidth'].'x'.$popup_info['PopupHeight'];
-		}
-
-		function UsePopups($params)
-		{
-			return (int)$this->Application->ConfigValue('UsePopups') || $this->Application->GetVar('_force_popup');
-		}
-
-		function UseToolbarLabels($params)
-		{
-			return (int)$this->Application->ConfigValue('UseToolbarLabels');
-		}
-
-		/**
-		 * Checks if debug mode enabled (optionally) and specified constant is on
-		 *
-		 * @param Array $params
-		 * @return bool
-		 */
-		function ConstOn($params)
-		{
-			$constant_name = $this->SelectParam($params, 'name,const');
-			$debug_mode = isset($params['debug_mode']) && $params['debug_mode'] ? $this->Application->isDebugMode() : true;
-			return $debug_mode && constOn($constant_name);
-		}
-
-		/**
-		 * Builds link to last template in main frame of admin
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function MainFrameLink($params)
-		{
-			$persistent = isset($params['persistent']) && $params['persistent'];
-			if ($persistent && $this->Application->ConfigValue('RememberLastAdminTemplate')) {
-				// check last_template in persistent session
-				$last_template = $this->Application->RecallPersistentVar('last_template_popup');
-			}
-			else {
-				// check last_template in session
-				$last_template = $this->Application->RecallVar('last_template_popup'); // because of m_opener=s there
-			}
-
-			if (!$last_template) {
-				$params['persistent'] = 1;
-				return $persistent ? false : $this->MainFrameLink($params);
-			}
-
-			list($index_file, $env) = explode('|', $last_template);
-			$vars = $this->Application->HttpQuery->processQueryString($env, 'pass');
-			$recursion_templates = Array ('login', 'index', 'no_permission');
-
-			if (isset($vars['admin']) && $vars['admin'] == 1) {
-				// index template doesn't begin recursion on front-end (in admin frame)
-				$vars['m_theme'] = '';
-
-				if (isset($params['m_opener']) && $params['m_opener'] == 'r') {
-					// front-end link for highlighting purposes
-					$vars['t'] = 'index';
-					$vars['m_cat_id'] = $this->Application->findModule('Name', 'Core', 'RootCat');
-				}
-
-				unset($recursion_templates[ array_search('index', $recursion_templates)]);
-			}
-
-			if (in_array($vars['t'], $recursion_templates)) {
-				// prevents redirect recursion OR old in-portal pages
-				$params['persistent'] = 1;
-				return $persistent ? false : $this->MainFrameLink($params);
-			}
-
-			$vars = array_merge_recursive2($vars, $params);
-			$t = $vars['t'];
-			unset($vars['t'], $vars['persistent']);
-
-			// substitute language in link to current (link will work, even when language will be changed)
-			$vars['m_lang'] = $this->Application->GetVar('m_lang');
-
-			return $this->Application->HREF($t, '', $vars, $index_file);
-		}
-
-		/**
-		 * Returns menu frame width or 200 in case, when invalid width specified in config
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function MenuFrameWidth($params)
-		{
-			$width = (int)$this->Application->ConfigValue('MenuFrameWidth');
-
-			return $width > 0 ? $width : 200;
-		}
-
-		function AdminSkin($params)
-		{
-			static $style;
-			if (!isset($style)) {
-				$style =  $this->Conn->GetRow('SELECT * FROM '.TABLE_PREFIX.'Skins WHERE IsPrimary = 1');
-			}
-
-			$css_path = (defined('WRITEABLE') ? WRITEABLE : FULL_PATH. DIRECTORY_SEPARATOR . 'kernel') . DIRECTORY_SEPARATOR . 'user_files';
-			$css_url = $this->Application->BaseURL(defined('WRITEBALE_BASE') ? str_replace(DIRECTORY_SEPARATOR, '/', WRITEBALE_BASE) : '/kernel') . 'user_files/';
-
-			$type = array_key_exists('type', $params) ? $params['type'] : false;
-			if ($type == 'logo') {
-				$type = 'Logo';
-			}
-
-			if ($type == 'Logo' || $type == 'LogoBottom' || $type == 'LogoLogin') {
-				return $style[$type] ? $css_url.$style[$type] : '';
-			}
-
-			$last_compiled = $style['LastCompiled'];
-
-			$style_name = mb_strtolower( $style['Name'] );
-
-			if( file_exists($css_path.'/'.'admin-'.$style_name.'-'.$last_compiled.'.css') )
-			{
-				$ret = $css_url.'admin-'.$style_name.'-'.$last_compiled.'.css';
-
-			}
-			else
-			{
-				// search for previously compiled stylesheet
-				$last_compiled = 0;
-				if( $dh = opendir($css_path) )
-				{
-					while( ($file = readdir($dh)) !== false )
-					{
-						if( preg_match('/admin-(.*)-([\d]+).css/', $file, $rets) )
-						{
-							if( $rets[1] == $style_name && $rets[2] > $last_compiled ) $last_compiled = $rets[2];
-						}
-					}
-					closedir($dh);
-				}
-				if ($last_compiled) {
-					// found
-					$ret = $css_url.'admin-'.$style_name.'-'.$last_compiled.'.css';
-				}
-				else {
-					// not found (try to compile on the fly)
-					$object =& $this->Application->recallObject('skin.-item', null, Array ('skip_autoload' => true));
-					/* @var $object kDBItem */
-
-					$skin_eh =& $this->Application->recallObject('skin_EventHandler');
-					/* @var $skin_eh SkinEventHandler */
-
-					$object->Load(1, 'IsPrimary');
-					$skin_eh->Compile($object);
-					$ret = $css_url.'admin-'.$style_name.'-'.adodb_mktime().'.css';
-				}
-			}
-
-			if (isset($params['file_only'])) return $ret;
-
-			return '<link rel="stylesheet" rev="stylesheet" href="'.$ret.'" type="text/css" media="screen" />';
-		}
-
-		function PrintCompileErrors($params)
-		{
-			$block_params = $this->prepareTagParams($params);
-			$block_params['name'] = $params['render_as'];
-
-			$errors = $this->Application->RecallVar('compile_errors');
-			if (!$errors) {
-				return ;
-			}
-
-			$ret = '';
-			$errors = unserialize($errors);
-
-			foreach ($errors as $an_error) {
-				$block_params['file'] = str_replace(FULL_PATH, '', $an_error['file']);
-				$block_params['line'] = $an_error['line'];
-				$block_params['message'] = $an_error['msg'];
-
-				$ret .= $this->Application->ParseBlock($block_params);
-			}
-
-			$this->Application->RemoveVar('compile_errors');
-
-			return $ret;
-		}
-
-		function CompileErrorCount($params)
-		{
-			$errors = $this->Application->RecallVar('compile_errors');
-			if (!$errors) {
-				return 0;
-			}
-
-			return count( unserialize($errors) );
-		}
-
-		function ExportData($params)
-		{
-			$export_helper =& $this->Application->recallObject('CSVHelper');
-			/* @var $export_helper kCSVHelper */
-			$result = $export_helper->ExportData( $this->SelectParam($params, 'var,name,field') );
-			return ($result === false) ? '' : $result;
-		}
-
-		function ImportData($params)
-		{
-			$import_helper =& $this->Application->recallObject('CSVHelper');
-			/* @var $import_helper kCSVHelper */
-			$result = $import_helper->ImportData( $this->SelectParam($params, 'var,name,field') );
-			return ($result === false) ? '' : $result;
-		}
-
-		function PrintCSVNotImportedLines($params)
-		{
-			$import_helper =& $this->Application->recallObject('CSVHelper');
-			/* @var $import_helper kCSVHelper */
-			return  $import_helper->GetNotImportedLines();
-		}
-
-		/**
-		 * Returns input field name to
-		 * be placed on form (for correct
-		 * event processing)
-		 *
-		 * @param Array $params
-		 * @return string
-		 * @access public
-		 */
-		function InputName($params)
-		{
-			list($id, $field) = $this->prepareInputName($params);
-
-			$ret = $this->getPrefixSpecial().'[0]['.$field.']'; // 0 always, as has no idfield
-			if( getArrayValue($params, 'as_preg') ) $ret = preg_quote($ret, '/');
-			return $ret;
-		}
-
-		/**
-		 * Returns list of all backup file dates formatted
-		 * in passed block
-		 *
-		 * @param Array $params
-		 * @return string
-		 * @access public
-		 */
-		function PrintBackupDates($params)
-		{
-	 		$datearray = $this->getDirList($this->Application->ConfigValue('Backup_Path'));
-	 		$ret = '';
-	        foreach($datearray as $key => $value)
-	        {
-	        	$params['backuptimestamp'] = $value['filedate'];
-	        	$params['backuptime'] = date('F j, Y, g:i a', $value['filedate']);
-	        	$params['backupsize'] = round($value['filesize']/1024/1024, 2); // MBytes
-	        	$ret .= $this->Application->ParseBlock($params);
-	        }
-	        return $ret;
-		}
-
-		function getDirList ($dirName)
-		{
-		    $fileinfo = array();
-		    $d = dir($dirName);
-
-		    while($entry = $d->read())
-		    {
-		        if ($entry != "." && $entry != "..")
-		        {
-		            if (!is_dir($dirName."/".$entry) && eregi("dump",$entry))
-		            {
-		                $fileinfo[]= Array('filedate' => $this->chopchop($entry),
-		                					'filesize' => filesize($dirName. '/'. $entry)
-		                					);
-		            }
-		        }
-		    }
-		    $d->close();
-		    rsort($fileinfo);
-
-		    return $fileinfo;
-
-		}
-
-		function chopchop ($filename)
-		{
-			 $p = pathinfo($filename);
-			 $ext = '.'.$p["extension"];
-		     $filename;
-		     $filename= ereg_replace("dump","",$filename);
-		     $filename= ereg_replace($ext,"",$filename);
-		     return $filename;
-		}
-
-		function PrintPHPinfo($params)
-		{
-			$php_info = '';
-
-			ob_start();
-
-			   phpinfo();
-			   $php_info .= ob_get_contents();
-
-			ob_end_clean();
-
-			$php_info = str_replace(" width=\"600\"", " width=\"100%\" align=\"center\"", $php_info);
-			$php_info = str_replace("</body>", "", $php_info);
-			$php_info = str_replace("<body>", "", $php_info);
-			$php_info = str_replace("</html>", "", $php_info);
-			$php_info = str_replace("<html>", "", $php_info);
-			$php_info = str_replace("</head>", "", $php_info);
-			$php_info = str_replace("<head>", "", $php_info);
-
-			$offset   = strpos($php_info, "<table");
-
-			$php_info = substr($php_info, $offset);
-
-			$php_info = '<style type="text/css">
-			body {background-color: #ffffff; color: #000000;}
-			body, td, th, h1, h2 {font-family: sans-serif;}
-			pre {margin: 0px; font-family: monospace;}
-			a:link {color: #000099; text-decoration: none; background-color: #ffffff;}
-			a:hover {text-decoration: underline;}
-			table {border-collapse: collapse;}
-			.center {text-align: center;}
-			.center table { margin-left: auto; margin-right: auto; text-align: left;}
-			.center th { text-align: center !important; }
-			td, th { border: 1px solid #000000; font-size: 75%; vertical-align: baseline;}
-			h1 {font-size: 150%;}
-			h2 {font-size: 125%;}
-			.p {text-align: left;}
-			.e {background-color: #ccccff; font-weight: bold; color: #000000;}
-			.h {background-color: #9999cc; font-weight: bold; color: #000000;}
-			.v {background-color: #cccccc; color: #000000;}
-			i {color: #666666; background-color: #cccccc;}
-			hr {width: 600px; background-color: #cccccc; border: 0px; height: 1px; color: #000000;}
-			</style>'.$php_info;
-
-			return $php_info;
-
-		}
-
-		function PrintSqlCols($params)
-		{
-			$a_data = unserialize($this->Application->GetVar('sql_rows'));
-			$ret = '';
-			$block = $params['render_as'];
-			foreach ($a_data AS $a_row)
-			{
-				foreach ($a_row AS $col => $value)
-				{
-					$ret .= $this->Application->ParseBlock(Array('name'=>$block, 'value'=>$col));
-				}
-				break;
-			}
-			return $ret;
-		}
-
-		function PrintSqlRows($params)
-		{
-			$a_data = unserialize($this->Application->GetVar('sql_rows'));
-			$ret = '';
-			$block = $params['render_as'];
-			foreach ($a_data AS $a_row)
-			{
-				$cells = '';
-				foreach ($a_row AS $col => $value)
-				{
-					$cells .= '<td>'.$value.'</td>';
-				}
-				$ret .= $this->Application->ParseBlock(Array('name'=>$block, 'cells'=>$cells));
-			}
-			return $ret;
-		}
-
-		/**
-		 * Prints available and enabled import sources using given block
-		 *
-		 * @param Array $params
-		 * @return string
-		 */
-		function PrintImportSources($params)
- 		{
- 			$sql = 'SELECT *
- 					FROM ' . TABLE_PREFIX . 'ImportScripts
- 					WHERE (Status = ' . STATUS_ACTIVE . ') AND (Type = "CSV")';
- 			$import_sources = $this->Conn->Query($sql);
-
- 			$block_params = $this->prepareTagParams($params);
- 			$block_params['name'] = $params['render_as'];
-
- 			$ret = '';
- 			foreach ($import_sources as $import_source) {
- 				$block_params['script_id'] = $import_source['ImportId'];
- 				$block_params['script_module'] = $import_source['Module'];
- 				$block_params['script_name'] = $import_source['Name'];
- 				$block_params['script_prefix'] = $import_source['Prefix'];
-
- 				$ret .= $this->Application->ParseBlock($block_params);
- 			}
-
- 			return $ret;
- 		}
-
- 		/**
- 		 * Checks, that new window should be opened in "incs/close_popup" template instead of refreshing parent window
- 		 *
- 		 * @param Array $params
- 		 * @return bool
- 		 */
- 		function OpenNewWindow($params)
- 		{
-			if (!$this->UsePopups($params)) {
-				return false;
-			}
-
- 			$diff = array_key_exists('diff', $params) ? $params['diff'] : 0;
- 			$wid = $this->Application->GetVar('m_wid');
-
-			$stack_name = rtrim('opener_stack_' . $wid, '_');
-			$opener_stack = $this->Application->RecallVar($stack_name);
-			$opener_stack = $opener_stack ? unserialize($opener_stack) : Array ();
-
-			return count($opener_stack) >= 2 - $diff;
- 		}
-
-		/**
-		 * Allows to dynamically change current language in template
-		 *
-		 * @param Array $params
-		 */
-		function SetLanguage($params)
-		{
-			$this->Application->SetVar('m_lang', $params['language_id']);
-			$this->Application->Phrases->Init('');
-
-			$this->Application->Phrases->LanguageId = $params['language_id'];
-			$this->Application->Phrases->LoadPhrases( $this->Application->Caches['PhraseList'] );
-		}
-	}
-
-?>
\ No newline at end of file