in-portal
No OneTemporary
Actions

Subscribers

None

File Metadata

Created: Sat, Feb 1, 11:40 PM

in-portal
View Options

	Index: trunk/kernel/include/modules.php
	===================================================================
	--- trunk/kernel/include/modules.php (revision 539)
	+++ trunk/kernel/include/modules.php (revision 540)
	@@ -1,908 +1,908 @@
	<?php
	/* List of installed modules and module-specific variables
	Copyright 2002, Intechnic Corporation, All rights reserved
	*/

	setcookie("CookiesTest", "1");

	// if branches that uses if($mod_prefix) or like that will never be executed
	// due global variable $mod_prefix is never defined

	$ExtraVars = array();

	function ParseEnv()
	{
	global $env, $var_list, $mod_prefix,$objSession, $SessionQueryString;

	/* parse individual sections */
	$env = isset($_GET['env']) ? $_GET['env'] : '';
	if ($env == "")
	{
	$var_list["t"] = "index";
	if(is_array($mod_prefix))
	{

	foreach($mod_prefix as $key => $value)
	{
	if(strlen($key))
	{
	$parser_name = $key . "_ParseEnv";
	if(function_exists($parser_name))
	{
	@$parser_name();
	}
	}
	}

	}
	}
	else
	{
	$envsections = explode(":", $env);
	foreach($mod_prefix as $key => $value)
	{
	if(strlen($key))
	{
	$parsed=FALSE;
	$parser_name = $key . "_ParseEnv";
	for($i=1; $i<sizeof($envsections); $i++)
	{
	$pieces = explode("-", $envsections[$i]);
	if(substr($pieces[0],0,strlen($key))==$key)
	{
	$parsed=TRUE;
	if(function_exists($parser_name))
	{
	$parser_name($envsections[$i]);
	}
	}
	}
	if(!$parsed)
	{
	if(function_exists($parser_name))
	{
	@$parser_name();
	}
	}
	}
	}
	$req_vars = explode("-", $envsections[0]);
	$sid = $req_vars[0];
	if(!$SessionQueryString)
	{
	if(!strlen($sid) \|\| $sid=="_")
	{
	if($sid != "_")
	$sid = $_COOKIE["sid"];
	}
	else
	$SessionQueryString = TRUE;
	}
	$var_list["sid"] = $sid;

	$var_list["t"] = $req_vars[1];
	if( isset($_GET['dest']) )
	$var_list['dest'] = $_GET['dest'];
	}

	}

	function LoadEnv()
	{
	global $env, $var_list, $mod_prefix,$objSession;

	$env = $_GET["env"];
	// echo "Loading Variables..<br>\n";
	if ($env != "")
	{
	$envsections = explode(":", $env);
	foreach($mod_prefix as $key => $value)
	{
	if(strlen($key))
	{
	$parsed=FALSE;
	for($i=1; $i<sizeof($envsections); $i++)
	{
	$pieces = explode("-", $envsections[$i]);
	if(substr($pieces[0],0,strlen($key))==$key)
	{
	$parsed=TRUE;
	break;
	}
	}
	if(!$parsed)
	{
	$parser_name = $key . "_LoadEnv";
	//echo $parser_name;
	if(function_exists($parser_name))
	{
	$parser_name();
	}
	}
	else
	{
	$parser_name = $key . "_SaveEnv";
	//echo $parser_name;
	if(function_exists($parser_name))
	{
	$parser_name($envsections[$i]);
	}
	}
	}
	}
	}
	}

	function BuildEnv($mod_prefix = false)
	{
	global $var_list,$m_var_list, $var_list_update, $mod_prefix, $objSession, $objConfig,
	$ExtraVars, $objThemes, $CurrentTheme, $SessionQueryString, $FrontEnd;

	static $theme;

	$env = "";
	//echo "Query String: $SessionQueryString<br>\n";
	if(($objConfig->Get("CookieSessions")==0 \|\| !$FrontEnd \|\| ($objConfig->Get("CookieSessions")==2 && $SessionQueryString==TRUE)))
	{
	if(!$objSession->UseTempKeys)
	{
	$sessionkey = $objSession->GetSessionKey();
	}
	else
	$sessionkey = $objSession->Get("CurrentTempKey");
	$env = $sessionkey;
	}
	$env .= "-";

	if (isset($var_list_update["t"]))
	{
	if($var_list_update["t"]=="_referer_")
	{
	$var_list_update["t"] =$objSession->GetVariable("Template_Referer");
	}

	$t = $var_list_update["t"];
	if(!is_numeric($t))
	{
	if(!is_object($theme))
	$theme = $objThemes->GetItem($m_var_list["theme"]);
	$id = $theme->GetTemplateId($t);
	$var_list_update["t"] = $id;
	}
	$env .= $var_list_update["t"];
	}
	else
	{
	$t = isset($var_list['t']) ? $var_list['t'] : '';
	if(!is_numeric($t))
	{
	if(!is_object($theme))
	$theme = $objThemes->GetItem($m_var_list["theme"]);
	$id = $theme->GetTemplateId($t);
	$t = $id;
	}
	$env .= $t;
	}

	if(is_array($mod_prefix))
	{
	foreach($mod_prefix as $key => $value)
	{
	$builder_name = $key . "_BuildEnv";
	if(function_exists($builder_name))
	{
	$GLOBALS[$key.'_var_list_update']['test'] = 'test';
	$env .= $builder_name();
	}
	}
	}

	$extra = "";
	$keys = array_keys($ExtraVars);
	if(is_array($keys))
	{
	for($i=0;$i<count($keys);$i++)
	{
	$key = $keys[$i];

	$e = "&".$key."=".$ExtraVars[$key];
	$extra .= $e;
	$e = "";
	}
	}
	$env .= $extra;

	return $env;
	}

	function CategoryActionFunc($basename,$CatList)
	{
	global $mod_prefix;

	foreach($mod_prefix as $key => $value)
	{
	$function_name = $key."_".$basename;
	if(function_exists($function_name))
	{
	$function_name($CatList);
	}
	}
	}


	function RegisterEnv($Var,$Value)
	{
	global $ExtraVars;

	$ExtraVars[$Var] = $Value;
	}

	function UnregisterEnv($Var)
	{
	global $ExtraVars;

	unset($ExtraVars[$Var]);
	}

	function ModuleTagPrefix($name)
	{
	global $modules_loaded;

	$ret = "";
	foreach($modules_loaded as $prefix=>$mod_name)
	{
	if($name==$mod_name)
	{
	$ret = $prefix;
	break;
	}
	}
	return $ret;
	}

	function ModuleEnabled($name)
	{
	global $template_path;

	$a = array_keys($template_path);
	if(in_array($name,$a))
	return TRUE;
	return FALSE;
	}

	function GetModuleArray($array_name="mod_prefix")
	{
	switch($array_name)
	{
	case "mod_prefix":
	global $mod_prefix;
	return $mod_prefix;
	break;
	case "admin":
	global $mod_prefix, $modules_loaded;
	$mod = array();
	if(is_array($mod_prefix) && is_array($modules_loaded))
	{
	foreach ($mod_prefix as $key=>$value)
	{
	- if(_ModuleLicensed($modules_loaded[$key]) \|\| $key=="m")
	+ if($key != 'bbcat' && _ModuleLicensed($modules_loaded[$key]) \|\| $key=="m")
	{
	$mod[$key] = $value;
	}
	}
	}
	return $mod;
	break;
	case "loaded":
	global $modules_loaded;
	return $modules_loaded;
	break;
	case "template":
	global $template_path;
	return $template_path;
	case "rootcat":
	global $mod_root_cats;
	return $mod_root_cats;
	break;
	}
	}

	function admin_login()
	{
	global $objSession,$login_error, $objConfig,$g_Allow,$g_Deny;

	//echo "<pre>"; print_r($objSession); echo "</pre>";

	if( GetVar('help_usage') == 'install' ) return true;

	$env_arr = explode('-', $_GET['env']);
	$get_session_key = $env_arr[0];
	$admin_login = isset($_POST['adminlogin']) && $_POST['adminlogin']; // $_POST['adminlogin'] != 1
	if(!$objSession->ValidSession() \|\| ($objSession->GetSessionKey() != $get_session_key && !$admin_login)) {
	if( isset($_GET['expired']) && ($_GET['expired'] == 1) )
	$login_error = admin_language("la_text_sess_expired");

	return FALSE;
	//echo "Expired<br>";
	}

	if ($objSession->HasSystemPermission("ADMIN") == 1)
	return TRUE;

	if(count($_POST)==0 \|\| $_POST["adminlogin"]!=1)
	return FALSE;
	$login=$_POST["login"];
	$password = $_POST["password"];

	if (strlen($login) && strlen($password))
	{
	if(!_IpAccess($_SERVER['REMOTE_ADDR'],$g_Allow,$g_Deny))
	{
	$login_error = admin_language("la_text_address_denied");
	return FALSE;
	}
	$valid = $objSession->Login($login, md5($password));
	$hasperm = ($objSession->HasSystemPermission("ADMIN") == 1);
	if (($login=="root" \|\| $hasperm) && $valid)
	{
	if(_ValidateModules())
	{
	return TRUE;
	}
	else
	$login_error = "Missing or invalid In-Portal License";
	}
	else
	{
	if(!$hasperm && $valid)
	{
	$login_error = admin_language("la_text_nopermissions");
	}
	else
	{
	$login_error = admin_language("la_Text_Access_Denied");
	}
	return FALSE;
	}
	}
	else
	{
	if(!strlen($login))
	{
	$login_error = admin_language("la_Text_Missing_Username");
	}
	else
	if(!strlen($password))
	$login_error = admin_language("la_Text_Missing_Password");
	return FALSE;
	}
	}


	#---------------------------------------------------------------------------

	function _EnableCookieSID()
	{
	global $var_list, $objConfig;

	if((!$_COOKIE["sid"] && $objConfig->Get("CookieSessions")>0 && strlen($var_list["sid"])<2 && !headers_sent())
	\|\| strlen($_COOKIE["sid"])>0)
	{
	return TRUE;
	}
	else
	return FALSE;
	}

	function _IsSpider($UserAgent)
	{
	global $robots, $pathtoroot;

	$lines = file($pathtoroot."robots_list.txt");

	if(!is_array($robots))
	{
	$robots = array();
	for($i=0;$i<count($lines);$i++)
	{
	$l = $lines[$i];
	$p = explode("\t",$l,3);
	$robots[] = $p[2];
	}
	}
	return in_array($UserAgent,$robots);
	}

	function _StripDomainHost($d)
	{
	$dotcount = substr_count($d,".");
	if($dotcount==3)
	{
	$IsIp = TRUE;
	for($x=0;$x<strlen($d);$x++)
	{
	if(!is_numeric(substr($d,$x,1)) && substr($d,$x,1)!=".")
	{
	$IsIp = FALSE;
	break;
	}
	}
	}
	if($dotcount>1 && !$IsIp)
	{
	$p = explode(".",$d);
	$ret = $p[count($p)-2].".".$p[count($p)-1];
	}
	else
	$ret = $d;
	return $ret;
	}

	function _MatchIp($ip1,$ip2)
	{
	$matched = TRUE;

	$ip = explode(".",$ip1);
	$MatchIp = explode(".",$ip2);
	for($i=0;$i<count($ip);$i++)
	{
	if($i==count($MatchIp))
	break;
	if(trim($ip[$i]) != trim($MatchIp[$i]) \|\| trim($ip[$i])=="*")
	{
	$matched=FALSE;
	break;
	}
	}
	return $matched;
	}

	function _IpAccess($IpAddress,$AllowList,$DenyList)
	{
	$allowed = explode(",",$AllowList);
	$denied = explode(",",$DenyList);

	$MatchAllowed = FALSE;
	for($x=0;$x<count($allowed);$x++)
	{
	$ip = explode(".",$allowed[$x]);

	$MatchAllowed = _MatchIp($IpAddress,$allowed[$x]);
	if($MatchAllowed)
	break;
	}
	$MatchDenied = FALSE;
	for($x=0;$x<count($denied);$x++)
	{
	$ip = explode(".",$denied[$x]);

	$MatchDenied = _MatchIp($IpAddress,$denied[$x]);
	if($MatchDenied)
	break;
	}

	$Result = (($MatchAllowed && !$MatchDenied) \|\| (!$MatchAllowed && !$MatchDenied) \|\|
	($MatchAllowed && $MatchDenied));
	return $Result;
	}

	function _ValidateModules()
	{
	global $i_Keys, $objConfig, $g_License;

	$lic = base64_decode($g_License);
	_ParseLicense($lic);

	$modules = array();
	//echo "License: ".$lic."<br>";
	$domain = _GetDomain();
	//echo "Domain: ".$domain."<br>";
	if(!_IsLocalSite($domain))
	{
	$domain = _StripDomainHost($domain);
	//echo "New domain: $domain<br>";
	// echo "<pre>"; print_r($i_Keys); echo "</pre>";
	for($x=0;$x<count($i_Keys);$x++)
	{
	$key = $i_Keys[$x];
	if(strlen(stristr($key["domain"],$domain)))
	{
	$modules = explode(",",$key["mod"]);
	//echo "Modules: $modules";
	}
	}
	if(count($modules)>0)
	{
	return TRUE;
	}
	}
	else
	return TRUE;
	return FALSE;
	}

	function _ModuleLicensed($name)
	{
	global $i_Keys, $objConfig, $pathtoroot;
	$vars = parse_portal_ini($pathtoroot."config.php");

	// globalize vars from config
	while($key = key($vars))
	{
	$GLOBALS["g_".$key] = current($vars);
	next($vars);
	}
	$lic = base64_decode($GLOBALS['g_License']); // this works in all cases

	_ParseLicense($lic);
	$modules = array();
	if(!_IsLocalSite(_GetDomain()))
	{
	for($x=0;$x<count($i_Keys);$x++)
	{
	$key = $i_Keys[$x];
	if(strlen(stristr(_GetDomain(),$key["domain"])))
	{
	//echo "ok<br>";
	$modules = explode(",",$key["mod"]);
	}
	}
	if(in_array($name,$modules)) {
	//echo "ok<br>";
	return TRUE;
	}
	}
	else {
	return TRUE;
	}

	return FALSE;
	}

	function _GetDomain()
	{
	global $objConfig, $g_Domain;

	if($objConfig->Get("DomainDetect"))
	{
	$d = $_SERVER['HTTP_HOST'];
	}
	else
	$d = $g_Domain;

	return $d;
	}

	function _keyED($txt,$encrypt_key)
	{
	$encrypt_key = md5($encrypt_key);
	$ctr=0;
	$tmp = "";
	for ($i=0;$i<strlen($txt);$i++)
	{
	if ($ctr==strlen($encrypt_key)) $ctr=0;
	$tmp.= substr($txt,$i,1) ^ substr($encrypt_key,$ctr,1);
	$ctr++;
	}
	return $tmp;
	}


	function _decrypt($txt,$key)
	{
	$txt = _keyED($txt,$key);
	$tmp = "";
	for ($i=0;$i<strlen($txt);$i++)
	{
	$md5 = substr($txt,$i,1);
	$i++;
	$tmp.= (substr($txt,$i,1) ^ $md5);
	}
	return $tmp;
	}

	function LoadFromRemote()
	{
	return "";
	}

	function DLid()
	{
	global $lid;
	echo $lid."\n";
	die();
	}

	function _LoadLicense($LoadRemote=FALSE)
	{
	global $pathtoroot, $objConfig;

	$f = $pathtoroot."intechnic.php";
	if(file_exists($f))
	{
	$contents = file($f);
	$data = base64_decode($contents[1]);
	}
	else
	if($LoadRemote)
	return $LoadFromRemote;
	return $data;
	}

	function _VerifyKey($domain,$k)
	{
	$key = md5($domain);
	$lkey = substr($key,0,strlen($key)/2);
	$rkey = substr($key,strlen($key)/2);
	$r = $rkey.$lkey;
	if($k==$r)
	return TRUE;
	return FALSE;
	}

	function _ParseLicense($txt)
	{
	global $i_User, $i_Pswd, $i_Keys;

	$data = _decrypt($txt,"beagle");
	$i_Keys = array();
	$lines = explode("\n",$data);
	for($x=0;$x<count($lines);$x++)
	{
	$l = $lines[$x];
	$p = explode("=",$l,2);
	switch($p[0])
	{
	case "Username":
	$i_User = $p[1];
	break;
	case "UserPass":
	$i_Pswd = $p[1];
	break;
	default:
	if(substr($p[0],0,3)=="key")
	{
	$parts = explode("\|",$p[1]);
	if(_VerifyKey($parts[0],$parts[1]))
	{
	unset($K);
	$k["domain"]=$parts[0];
	$k["key"]=$parts[1];
	$k["desc"]=$parts[2];
	$k["mod"]=$parts[3];
	$i_Keys[] = $k;
	}
	}
	break;
	}
	}
	}

	function _IsLocalSite($domain)
	{
	$localb = FALSE;
	if(substr($domain,0,3)=="172")
	{
	$b = substr($domain,0,6);
	$p = explode(".",$domain);
	$subnet = $p[1];
	if($p[1]>15 && $p[1]<32)
	$localb=TRUE;
	}
	if($domain=="localhost" \|\| $domain=="127.0.0.1" \|\| substr($domain,0,7)=="192.168" \|\|
	substr($domain,0,3)=="10." \|\| $localb \|\| strpos($domain,".")==0)
	{
	return TRUE;
	}
	return FALSE;
	}
	//echo "Before Stuff<br>";
	LogEntry("Loading Modules\n");
	/* get the module list from the database */
	$adodbConnection = &GetADODBConnection();
	$sql = "SELECT Name, Path, Var,TemplatePath, RootCat from ".GetTablePrefix()."Modules where Loaded=1 ORDER BY LoadOrder";
	$rs = $adodbConnection->Execute($sql);

	while($rs && !$rs->EOF)
	{
	$key = $rs->fields["Var"];
	$mod_prefix[$key] = $rs->fields["Path"];
	$modules_loaded[$key] = $rs->fields["Name"];
	$name = $rs->fields["Name"];
	$template_path[$name] = $rs->fields["TemplatePath"];
	$mod_root_cats[$name] = $rs->fields["RootCat"];
	// echo $key . "=". $modules_loaded[$key]."<br>\n";
	$rs->MoveNext();
	}

	LogEntry("Loading Module Parser scripts\n");
	/* for each module enabled, load up parser.php */
	//foreach($mod_prefix as $key => $value)
	$LogLevel++;
	if(is_array($mod_prefix))
	{
	foreach($mod_prefix as $key => $value)
	{

	$mod = $pathtoroot . $value . "parser.php";
	// LogEntry("Loading parser $mod \n");
	require_once($mod);

	}
	}
	$LogLevel--;
	LogEntry("Finished Loading Module Parser scripts\n");
	/now each module gets a look at the environment string /

	$SessionQueryString = FALSE;

	if(!isset($FrontEnd)) $FrontEnd = false;

	if($FrontEnd != 1)
	$SessionQueryString = TRUE;

	if(is_array($mod_prefix))
	ParseEnv();

	/* create the session object */

	$ip = $_SERVER["REMOTE_ADDR"];

	if ( !isset($var_list['sid']) ) $var_list['sid'] = '';
	if ( !isset($_GET['env']) ) $_GET['env'] = '';

	if(strlen($var_list["sid"])==0 && strlen($_GET["env"])>0 && $objConfig->Get("CookieSessions")==2)
	{
	if(_IsSpider($_SERVER["HTTP_USER_AGENT"]))
	{
	$UseSession = FALSE;
	}
	else
	{
	/* switch user to GET session var */
	if (!$_COOKIE['sid']) {
	$SessionQueryString = TRUE;
	}
	//else {
	//$SessionQueryString = FALSE;
	//}
	$UseSession = TRUE;
	}
	}
	else {
	$UseSession = TRUE;
	}

	if($var_list["sid"]=="_")
	$var_list["sid"]="";

	/setup action variable/
	$Action = isset($_REQUEST['Action']) ? $_REQUEST['Action'] : '';

	if($Action=="m_logout")
	{
	$u = new clsUserSession($var_list["sid"] ,($SessionQueryString && $FrontEnd==1));
	$u->Logout();
	unset($u);
	$var_list_update["t"] = "index";
	$var_list["t"] = "";
	$var_list["sid"]="";
	setcookie("login","",time()-3600);
	setcookie("sid","",time()-3600);
	}

	$CookieTest = isset($_COOKIE["CookiesTest"]) ? $_COOKIE["CookiesTest"] : '';
	$HTTP_REFERER = isset($_SERVER['HTTP_REFERER']) ? $_SERVER['HTTP_REFERER'] : '';

	if ( ($CookieTest == 1) \|\| !strstr($HTTP_REFERER, $_SERVER['HTTP_HOST'].$objConfig->Get("Site_Path"))) {
	$SessionQueryString = FALSE;
	}

	if ($FrontEnd != 1) {
	$SessionQueryString = TRUE;
	}

	$objSession = new clsUserSession($var_list["sid"],($SessionQueryString && $FrontEnd==1));

	if($UseSession)
	{
	if(!$objSession->ValidSession())
	{
	/* Get rid of Invalid Session and make a brand new one*/
	// echo "Dumping Session ".$var_list["sid"]."<br>";
	unset($var_list["sid"]);
	$objSession->GetNewSession();
	$var_list["sid"] = $objSession->GetSessionKey();
	$var_list_update["sid"]=$objSession->GetSessionKey();
	if(is_numeric($m_var_list["theme"]))
	$objSession->SetThemeName($m_var_list["theme"]);
	if($objConfig->Get("CookieSessions")>0 && !$SessionQueryString && !headers_sent())
	setcookie("sid",$var_list["sid"]);
	//echo "New Session: ".$objSession->GetSessionKey()."<br>\n";
	if(isset($_COOKIE["login"]) && $Action != "m_logout" && $FrontEnd==1)
	{
	$parts = explode("\|",$_COOKIE["login"]);
	$username = $parts[0];
	$pass = $parts[1];
	$objSession->Login($username,$pass);
	}
	}
	else
	{ //echo "Update Session<br>";
	if($objSession->Get("Language")!=$m_var_list["lang"])
	{
	$objSession->Set("Language",$m_var_list["lang"]);
	}
	$objSession->LoadSessionData();
	$objSession->UpdateAccessTime();
	$objSession->Update();
	LoadEnv();
	}
	}

	if( isset($var_list['t']) && is_numeric($var_list['t']))
	{
	if( !isset($CurrentTheme) ) $CurrentTheme = null;
	if(!is_object($CurrentTheme))
	$CurrentTheme = $objThemes->GetItem($m_var_list["theme"]);

	$var_list["t"] = $CurrentTheme->GetTemplateById($var_list["t"]);
	$objSession->Set("Theme",$CurrentTheme->Get("Name"));
	}
	/create the global current user object /
	$UserID=$objSession->Get("PortalUserId");
	$objCurrentUser = new clsPortalUser($UserID);
	$objLanguageCache = new clsLanguageCache($m_var_list["lang"]);

	/* include each module's action.php script */
	LogEntry("Loading Module action scripts\n");

	## Global Referer Template
	$_local_t = isset($var_list['t']) ? $var_list['t'] : '';

	if(is_array($mod_prefix))
	{
	foreach($mod_prefix as $key => $folder_name)
	{
	- if($FrontEnd==0 \|\| !is_numeric($FrontEnd) \|\| $FrontEnd==2)
	+ if( $FrontEnd==0 \|\| !is_numeric($FrontEnd) \|\| $FrontEnd==2)
	{
	$rootURL="http://".ThisDomain().$objConfig->Get("Site_Path");
	$admin = $objConfig->Get("AdminDirectory");
	if( !strlen($admin) ) $admin = "admin";
	$adminURL = $rootURL.$admin;
	$imagesURL = $adminURL."/images";

	- if(_ModuleLicensed($modules_loaded[$key]))
	+ if( $key != 'bbcat' && _ModuleLicensed($modules_loaded[$key]) )
	{
	$mod = $pathtoroot.$folder_name."module_init.php";
	if( file_exists($mod) ) require_once($mod);

	$mod = $pathtoroot.$folder_name."action.php";
	if( file_exists($mod) ) require_once($mod);

	$mod = $pathtoroot.$folder_name."searchaction.php";
	if( file_exists($mod) ) require_once($mod);

	}

	}
	if($FrontEnd==1 \|\| $FrontEnd==2)
	{
	$mod = $pathtoroot.$folder_name."module_init.php";
	if(file_exists($mod))
	require_once($mod);
	$mod = $pathtoroot.$folder_name."frontaction.php";
	if(file_exists($mod))
	require_once($mod);
	}
	}
	}

	if (strstr($_SERVER['SCRIPT_NAME'], 'install') && $objSession->Get("PortalUserId") == 0) {
	$objSession->Delete();
	}

	if( !isset($SearchPerformed) ) $SearchPerformed = false;
	if($SearchPerformed == true) $objSearch->BuildIndexes();
	LogEntry("Finished Loading Module action scripts\n");
	?>
	\ No newline at end of file

	Property changes on: trunk/kernel/include/modules.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.17
	\ No newline at end of property
	+1.18
	\ No newline at end of property
	Index: trunk/kernel/include/usersession.php
	===================================================================
	--- trunk/kernel/include/usersession.php (revision 539)
	+++ trunk/kernel/include/usersession.php (revision 540)
	@@ -1,1130 +1,1140 @@
	<?php

	class clsUserSession
	{
	//Common DB operation class variables
	var $m_dirtyFieldsMap = array();
	//Identity
	var $m_SessionKey;
	var $m_CurrentTempKey;
	var $m_PrevTempKey;
	//Required attributes
	var $m_LastAccessed;
	var $m_PortalUserId;
	var $m_Language;
	var $m_Theme;
	var $m_GroupId;
	var $adodbConnection;
	var $m_Errors;
	var $m_GroupList;
	var $PermCache;
	var $SysPermCache;
	var $PermCacheGroups;
	var $CurrentUser;
	var $UseTempKeys;

	function clsUserSession($id=NULL, $TempKeys=FALSE)
	{
	global $objConfig, $objLanguages, $objThemes, $m_var_list;

	$this->m_Errors = new clsErrorManager();
	$this->adodbConnection = &GetADODBConnection();

	$this->PermCache = array();
	$this->PermCacheGroups ="";
	$this->UseTempKeys = $TempKeys;

	if( GetVar('help_usage') == 'install' ) return;

	if(!$this->UseTempKeys \|\| strlen($id)==0)
	{
	//echo "with cookies";
	if( !isset($_SERVER['HTTP_REFERER']) ) $_SERVER['HTTP_REFERER'] = '';
	if(!isset($_GET['destform'])) $_GET['destform'] = null;
	if(!isset($_GET['continue_sess'])) $_GET['continue_sess'] = null;
	if( strlen($id) && (strstr($_SERVER['HTTP_REFERER'], $_SERVER['HTTP_HOST'].$objConfig->Get("Site_Path")) \|\| $_GET['destform'] == 'popup' \|\| $_GET['continue_sess'] == 1))
	{
	$this->Set("SessionKey",$id);
	return $this->LoadFromDatabase($id);
	}
	else
	{
	$this->Set("PortalUserId", 0);
	$this->Set("Language", $objLanguages->GetPrimary());
	$ThemeId = $m_var_list["theme"];
	$this->SetThemeName($ThemeId);
	//$this->Set("Theme", $objConfig->Get("Default_Theme"));
	$this->Set("GroupList",0);
	$this->Set("SessionKey","");
	$this->Set("GroupList",$objConfig->Get("User_GuestGroup"));
	}
	}
	else
	{
	//echo "without cookies";
	return $this->LoadFromTempKey($id);
	}
	}

	function CopyToNewSession()
	{
	$OldKey = $this->GetSessionKey();
	$this->GetNewSession();
	if($OldKey != $this->GetSessionKey())
	{
	$this->Set("PortalUserId",$this->Get("PortalUserId"));
	$this->Set("GroupId",$this->Get("GroupId"));
	$this->Set("GroupList",$this->Get("GroupList"));
	$this->Set("Language",$this->Get("Language"));
	$this->Set("tz",$this->Get("tz"));
	$this->Set("LastAccessed",date("U"));
	$this->Update();
	}
	}

	function Get($name)
	{
	$var = "m_" . $name;
	return isset($this->$var) ? $this->$var : '';
	}

	function Set($name, $value)
	{
	if (is_array($name))
	{
	for ($i=0; $i<sizeof($name); $i++)
	{ $var = "m_" . $name[$i];
	$this->$var = $value[$i];
	$this->m_dirtyFieldsMap[$name[$i]] = $value[$i];
	}
	}
	else
	{
	$var = "m_" . $name;
	$this->$var = $value;
	$this->m_dirtyFieldsMap[$name] = $value;
	//echo "Set: $var = $value <br>\n";
	}
	}

	function Validate()
	{
	$dataValid = true;
	if(!isset($this->m_LastAccessed))
	{
	$this->m_Errors->AddError("error.fieldIsRequired",'LastAccessed',"","",get_class($this),"Validate");
	$dataValid = false;
	}

	if(!isset($this->m_PortalUserId))
	{
	$this->m_Errors->AddError("error.fieldIsRequired",'PortalUserId',"","",get_class($this),"Validate");
	$dataValid = false;
	}

	if(!isset($this->m_Language))
	{
	$this->m_Errors->AddError("error.fieldIsRequired",'Language',"","",get_class($this),"Validate");
	$dataValid = false;
	}

	if(!isset($this->m_Theme))
	{
	$this->m_Errors->AddError("error.fieldIsRequired",'Theme',"","",get_class($this),"Validate");
	$dataValid = false;
	}

	return $dataValid;
	}

	function Delete()
	{
	if(!isset($this->m_SessionKey))
	{
	$this->m_Errors->AddError("error.AppError",NULL,'Internal error: Delete requires set id',"",get_class($this),"Delete");
	return false;
	}
	//Delete associated adata first
	$sql = sprintf("DELETE FROM ".GetTablePrefix()."SessionData WHERE SessionKey = '%s'", $this->Get("SessionKey"));
	$this->adodbConnection->Execute($sql);
	$sql = sprintf("DROP TABLE IF EXISTS %s%s_search",GetTablePrefix(), $this->Get("SessionKey"));
	$this->adodbConnection->Execute($sql);
	$sql = sprintf("DELETE FROM ".GetTablePrefix()."UserSession WHERE SessionKey = '%s'", $this->Get("SessionKey"));
	$this->adodbConnection->Execute($sql);
	if ($this->adodbConnection->Execute($sql) === false)
	{
	$this->m_Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"Delete");
	return false;
	}
	$this->Set("SessionKey","");
	$this->Set("SessionDataLoaded",false);
	return true;
	}

	function Update()
	{
	global $objConfig;

	//$this->Set("LastAccessed",date("U"));
	$this->Set("IpAddress",$_SERVER["REMOTE_ADDR"]);
	if(!isset($this->m_SessionKey))
	{
	$this->m_Errors->AddError("error.AppError",NULL,'Internal error: Update requires set id',"",get_class($this),"Update");
	return false;
	}
	if(!is_numeric($this->Get("PortalUserId")))
	{
	$this->Set("PortalUserId",0);
	}
	if(!strlen($this->Get("GroupList")))
	{
	$this->Set("GroupList",$objConfig->Get("User_GuestGroup"));
	}
	if(count($this->m_dirtyFieldsMap) == 0)
	return true;
	$sql = "UPDATE ".GetTablePrefix()."UserSession SET ";
	$first = 1;
	foreach ($this->m_dirtyFieldsMap as $key => $value)
	{
	if($first)
	{
	$sql = sprintf("%s %s=%s",$sql,$key,$this->adodbConnection->qstr($value));
	$first = 0;
	}
	else
	{
	$sql = sprintf("%s, %s=%s",$sql,$key,$this->adodbConnection->qstr($value));
	}
	}
	$sql = sprintf("%s WHERE SessionKey = '%s'",$sql, $this->Get("SessionKey"));
	//echo $sql;
	if ($this->adodbConnection->Execute($sql) === false)
	{
	$this->m_Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"Update");
	return false;
	}
	return true;
	}

	function Create()
	{
	global $objConfig;

	$this->Set("LastAccessed", time());
	if(!is_numeric($this->Get("PortalUserId")))
	{
	$this->Set("PortalUserId",0);
	}
	if(!strlen($this->Get("GroupList")))
	{
	$this->Set("GroupList",$objConfig->Get("User_GuestGroup"));
	}
	$sql = "INSERT INTO ".GetTablePrefix()."UserSession (";
	$first = 1;
	foreach ($this->m_dirtyFieldsMap as $key => $value)
	{
	if($first)
	{
	$sql = sprintf("%s %s",$sql,$key);
	$first = 0;
	}
	else
	{
	$sql = sprintf("%s, %s",$sql,$key);
	}
	}
	$sql = sprintf('%s ) VALUES (',$sql);
	$first = 1;
	foreach ($this->m_dirtyFieldsMap as $key => $value)
	{
	if($first)
	{
	$sql = sprintf("%s %s",$sql,$this->adodbConnection->qstr($value));
	$first = 0;
	}
	else
	{
	$sql = sprintf("%s, %s",$sql,$this->adodbConnection->qstr($value));
	}
	}
	$sql = sprintf('%s)',$sql);
	//echo $sql."<br>\n";
	if ($this->adodbConnection->Execute($sql) === false)
	{
	$this->m_Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"Create");
	return false;
	}
	return true;
	}

	function LoadFromTempKey($id=NULL)
	{
	global $objLanguages, $objConfig,$m_var_list;
	$referer = $_SERVER["HTTP_REFERER"];
	//echo "Referer: $referer <br>\n";
	if(strlen($referer) && strpos($referer,"env="))
	{
	$keystart = strpos($referer,"env=")+4;
	$referer = substr($referer,$keystart);
	$keyend = strpos($referer,"-");
	$LastKey = substr($referer,0,$keyend);
	if(strlen($LastKey))
	{
	$sql = "SELECT * FROM ".GetTablePrefix()."UserSession WHERE (CurrentTempKey = '$id' OR PrevTempKey='$id' OR CurrentTempKey='$LastKey' OR PrevTempKey='$LastKey') ";
	}
	else
	$sql = "SELECT * FROM ".GetTablePrefix()."UserSession WHERE CurrentTempKey = '$id' AND PrevTempKey IS NULL";
	}
	else
	$sql = "SELECT * FROM ".GetTablePrefix()."UserSession WHERE CurrentTempKey = '$id' AND PrevTempKey IS NULL";

	$result = $this->adodbConnection->Execute($sql);
	if ($result === false)
	{
	$this->m_Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"LoadFromDatabase");
	return false;
	}
	$data = $result->fields;
	if (is_array($data))
	{
	foreach($data as $field => $value)
	{
	$mname = "m_" . $field;
	$this->$mname = $data[$field];
	}

	if($this->Get("CurrentTempKey")) {
	$this->Set("PrevTempKey",$this->Get("CurrentTempKey"));
	$this->UseTempKeys=TRUE;
	}

	if (!$this->Get("CurrentTempKey") \|\| !strstr($_SERVER['HTTP_REFERER'], $_SERVER['HTTP_HOST'].$objConfig->Get("Site_Path"))) {
	//$this->Set("PrevTempKey",$this->Get("CurrentTempKey"));
	//$this->Set("CurrentTempKey",$this->GetUniqueKey());
	$this->UseTempKeys=FALSE;
	$this->Set("PortalUserId", 0);
	$this->Set("Language", $objLanguages->GetPrimary());
	$ThemeId = $m_var_list["theme"];
	$this->SetThemeName($ThemeId);
	//$this->Set("Theme", $objConfig->Get("Default_Theme"));
	$this->Set("GroupList",0);
	$this->Set("SessionKey","");
	$this->Set("GroupList",$objConfig->Get("User_GuestGroup"));
	}
	//$this->UseTempKeys=TRUE;
	$this->Update();
	return true;
	}
	else
	{
	$this->Set("PortalUserId", 0);
	$this->Set("Language", $objLanguages->GetPrimary());
	$ThemeId = $m_var_list["theme"];
	$this->SetThemeName($ThemeId);
	//$this->Set("Theme", $objConfig->Get("Default_Theme"));
	$this->Set("GroupList",0);
	$this->Set("SessionKey","");
	$this->Set("GroupList",$objConfig->Get("User_GuestGroup"));
	$this->Set("CurrentTempKey",$this->GetUniqueKey());
	return false;
	}
	}

	function LoadFromDatabase($id)
	{
	if(!isset($id))
	{
	$this->m_Errors->AddError("error.AppError",NULL,'Internal error: LoadFromDatabase id',"",get_class($this),"LoadFromDatabase");
	return false;
	}
	$sql = sprintf("SELECT * FROM ".GetTablePrefix()."UserSession WHERE SessionKey = '%s'",$id);

	$result = $this->adodbConnection->Execute($sql);
	if ($result === false)
	{
	$this->m_Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"LoadFromDatabase");
	return false;
	}
	$data = $result->fields;
	if (is_array($data))
	{
	foreach($data as $field => $value)
	{
	$mname = "m_" . $field;
	$this->$mname = $data[$field];
	}
	return true;
	}
	else
	{
	return false;
	}
	}

	function Login($userLogin, $userPassword)
	{
	global $expired, $objConfig, $FrontEnd;

	if($userLogin == "root")
	{
	// logging in "root" (admin only)
	$rootpass = $objConfig->Get("RootPass");
	if($rootpass!=$userPassword)
	{
	return false;
	}
	else
	{
	if(!strlen($this->GetSessionKey()))
	$this->GetNewSession();
	$this->Set("PortalUserId",-1);
	$this->Update();
	return true;
	}
	}
	else
	{
	// logging in any user (admin & front)
	$pre = GetTablePrefix();
	$sql = "SELECT *,MD5(".$pre."PortalUser.Password) as md5pw FROM ".$pre."PortalUser LEFT JOIN ".$pre."UserGroup USING (PortalUserId) "
	."LEFT JOIN ".$pre."PortalGroup ON (".$pre."UserGroup.GroupId=".$pre."PortalGroup.GroupId)
	WHERE
	".$pre."PortalUser.Login='$userLogin' AND ".$pre."PortalUser.Status=1
	AND (".$pre."PortalUser.Password='$userPassword' OR MD5(".$pre."PortalUser.Password)='$userPassword' OR ".$pre."PortalUser.Password='".md5($userPassword)."')
	ORDER BY ".$pre."UserGroup.PrimaryGroup DESC, ".$pre."PortalGroup.Personal DESC";
	//echo $sql."<br>\n";
	$result = $this->adodbConnection->Execute($sql);

	if ($result === false)
	{
	$this->m_Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"Login");
	return false;
	}

	if($result->EOF) return -1; // no any user with username & pass specified
	}
	if(!strlen($this->GetSessionKey()))
	{
	$this->GetNewSession();
	}

	$this->Set("PortalUserId", $result->fields["PortalUserId"]);
	+ unset($this->CurrentUser);
	if(strlen($result->fields["tz"])>0)
	$this->Set("tz",$result->fields["tz"]);
	$PrimaryGroup=0;
	$PersonalGroup=0;
	$GroupList = array();
	while($result && !$result->EOF)
	{
	$skipadd=0;
	$g = $result->fields["GroupId"];

	if($result->fields["PrimaryGroup"]==1)
	{
	$PrimaryGroup = $g;
	$skipadd=1;
	}
	if($result->fields["Personal"]==1)
	{
	$PersonalGroup=$g;
	$skipadd=0;
	}
	if(!$skipadd)
	$GroupList[] = $g;
	$result->MoveNext();
	}
	$extra_groups = implode(",",$GroupList);
	if($PrimaryGroup)
	$extra_groups = $PrimaryGroup.",".$extra_groups;
	if($PersonalGroup)
	{
	$this->Set("GroupId",$PersonalGroup);
	//$extra_groups .= ",".$PersonalGroup;
	}
	else
	{
	$this->Set("GroupId",$PrimaryGroup);
	}

	$this->Set("GroupList", $extra_groups);
	$this->Set("LastAccessed",date("U"));
	$this_login = $this->GetPersistantVariable("ThisLogin");
	$this->SetPersistantVariable("LastLogin", $this_login);
	$this->SetPersistantVariable("ThisLogin", time());
	$this->ResetSysPermCache();
	$this->PermCache = array();
	$this->Update();

	if($userLogin != 'root' && $FrontEnd)
	{
	if( ! $this->HasSystemPermission('LOGIN') )
	{
	$this->Logout();
	return -2; // no perm login
	}
	}

	return true; // login ok
	}

	function Logout()
	{
	global $objConfig;

	$this->Set("PortalUserId", 0);
	$this->Set("GroupId", $objConfig->Get("User_GuestGroup"));
	#$this->SetPersistantVariable("LastLogin", time());
	$this->Set("GroupList",$objConfig->Get("User_GuestGroup"));
	$this->Set("IpAddress",$_SERVER['REMOTE_ADDR']);
	$this->DeleteSessionData($this->GetSessionKey());
	$this->Update();
	$this->Delete();
	$this->ResetSysPermCache();
	$this->PermCache = array();
	}

	function SetVariable( $variableName, $variableValue)
	{
	global $objConfig, $FrontEnd;

	$objConfig->Set($variableName,$variableValue,2);

	//if(!(int)$FrontEnd==1)
	//{
	$sessionkey = $this->GetSessionKey();
	$sql = "SELECT * FROM ".GetTablePrefix()."SessionData WHERE VariableName='$variableName' AND SessionKey='$sessionkey'";
	$rs = $this->adodbConnection->Execute($sql);
	if($rs && !$rs->EOF)
	{
	$sql = "UPDATE ".GetTablePrefix()."SessionData SET VariableValue='$variableValue' WHERE VariableName='$variableName' AND SessionKey='$sessionkey'";
	}
	else
	$sql = "INSERT INTO ".GetTablePrefix()."SessionData (VariableName,VariableValue,SessionKey) VALUES ('$variableName','$variableValue','$sessionkey')";

	$this->adodbConnection->Execute($sql);
	// echo "<BR>UPDATE: $sql<BR>";
	//}
	}

	function SetPersistantVariable($variableName, $variableValue)
	{
	global $objConfig, $objUsers;

	$userid = (int)$this->Get("PortalUserId");

	if($userid > 0)
	{
	if(!is_object($this->CurrentUser))
	- $this->CurrentUser = $objUsers->GetItem($this->Get("PortalUserId"));
	+ {
	+ $this->CurrentUser = $objUsers->GetItem($userid);
	+ }
	if(!$this->CurrentUser->VarsLoaded)
	+ {
	$this->CurrentUser->LoadPersistantVars();
	+ }
	//echo "setting current user' $variableName, $variableValue<br>";
	$this->CurrentUser->SetPersistantVariable($variableName, $variableValue);
	//$this->SetVariable($variableName,$variableValue);
	}
	else
	$this->SetVariable($variableName,$variableValue);
	}

	function GetPersistantVariable($variableName)
	{
	global $objConfig, $objUsers;

	- if(is_numeric($this->Get("PortalUserId")))
	+ $UserID = $this->Get("PortalUserId");
	+ if(is_numeric($UserID))
	{
	if(!is_object($this->CurrentUser))
	- $this->CurrentUser = $objUsers->GetItem($this->Get("PortalUserId"));
	+ {
	+ $this->CurrentUser = $objUsers->GetItem($UserID);
	+ }
	if(!$this->CurrentUser->VarsLoaded)
	+ {
	$this->CurrentUser->LoadPersistantVars();
	+ }
	$val = $this->CurrentUser->GetPersistantVariable($variableName);
	}
	if(!strlen($val))
	$val = $objConfig->Get($variableName);
	return $val;
	}

	function GetVariable($variableName)
	{
	global $objConfig;

	return $objConfig->Get($variableName);
	}

	function LoadSessionData()
	{
	global $objConfig, $objUsers;

	if(is_numeric($this->Get("PortalUserId")))
	{
	$sql = "SELECT VariableName, VariableValue FROM ".GetTablePrefix()."SessionData where SessionKey='" . $this->Get("SessionKey") . "'";
	//echo $sql."<br>\n";
	$result = $this->adodbConnection->Execute($sql);
	while ($result && !$result->EOF)
	{
	$data = $result->fields;
	//echo "<PRE>"; print_r($data); echo "</PRE>";
	$objConfig->Set($data["VariableName"],$data["VariableValue"],FALSE);
	$result->MoveNext();
	}

	if(!is_object($this->CurrentUser))
	$this->CurrentUser = $objUsers->GetItem($this->Get("PortalUserId"));
	if(!$this->CurrentUser->VarsLoaded)
	$this->CurrentUser->LoadPersistantVars();
	}
	if((int)$this->GetPersistantVariable("Language"))
	$this->Set("Language",$objConfig->Get("Language"));
	$this->DeleteExpiredSessions();
	return true;
	}

	function DeleteSessionData($key)
	{
	$sql = "DELETE FROM ".GetTablePrefix()."SessionData WHERE SessionKey='$key'";
	$this->adodbConnection->Execute($sql);
	}

	function SaveSessionData()
	{
	global $objConfig;

	//echo "Saving Session Data..<br>\n";
	if($this->SessionEnabled())
	{
	$data = $objConfig->GetDirtySessionValues(2); //session data
	//echo "<PRE>"; print_r($data); echo "</PRE>";
	$sessionkey = $this->GetSessionKey();
	foreach($data as $field=>$value)
	{
	$sql = "UPDATE ".GetTablePrefix()."SessionData SET VariableValue='$value' WHERE VariableName='$field' AND SessionKey='$sessionkey'";
	$this->adodbConnection->Execute($sql);
	//echo $sql."<br>\n";

	if($this->adodbConnection->Affected_Rows()==0)
	{
	$sql = "INSERT INTO ".GetTablePrefix()."SessionData (VariableName,VariableValue,SessionKey) VALUES ('$field','$value','$sessionkey')";
	$this->adodbConnection->Execute($sql);
	}
	// echo $sql."<br>\n";
	}
	}
	}

	function DeleteEditTables()
	{
	$tables = $this->adodbConnection->MetaTables();
	$sql = "SHOW TABLES";
	//echo "<PRE>";print_r($tables); echo "</PRE>";
	for($i=0;$i<count($tables);$i++)
	{
	$t = strtoupper($tables[$i]);
	$p = strtoupper(GetTablePrefix()."ses_ad");
	$k = substr($t,0,strlen($p));

	if($k == $p && strpos($t,"FD_")>0)
	{
	$key = "AD".strtoupper(substr($t,strlen($p),strpos($t,"FD_")-strlen($p)))."FD";
	$sql = "SELECT * FROM ".GetTablePrefix()."UserSession WHERE SessionKey='$key'";
	//echo $sql."<br>\n";
	$rs = $this->adodbConnection->Execute($sql);
	if(!$rs \|\| $rs->EOF)
	{
	//echo "Dropping Table $tables[$i] <br>\n";
	@$this->adodbConnection->Execute("DROP TABLE IF EXISTS ".$tables[$i]);
	}
	}
	}
	}

	function DeleteExpiredSessions()
	{
	global $objConfig;

	$cutoff = time()-$objConfig->Get("SessionTimeout");
	$thiskey = $this->GetSessionKey();
	$sql = "SELECT SessionKey from ".GetTablePrefix()."UserSession WHERE LastAccessed<$cutoff AND SessionKey != '$thiskey'";
	$result = $this->adodbConnection->Execute($sql);
	$keys = array();
	while ($result && !$result->EOF)
	{
	$keys[] = "SessionKey='" . $result->fields["SessionKey"] . "'";
	$result->MoveNext();
	}
	if(count($keys)>0)
	{
	$keywhere = implode(" OR ", $keys);
	$sql = "DELETE FROM ".GetTablePrefix()."SessionData WHERE $keywhere";
	//echo $sql;
	$this->adodbConnection->Execute($sql);
	$this->adodbConnection->Execute("DELETE FROM ".GetTablePrefix()."UserSession WHERE LastAccessed<$cutoff");
	$this->DeleteEditTables();
	}
	}

	function SetSysPermCache()
	{
	unset($this->SysPermCache);
	$GroupList = $this->Get("GroupList");

	if(strlen($GroupList) && $GroupList !="0")
	{
	$this->SysPermCache = array();
	$sql = "SELECT * FROM ".GetTablePrefix()."Permissions WHERE Type=1 AND GroupId IN (".$GroupList.")";
	//echo $sql."<br>\n";
	$rs = $this->adodbConnection->Execute($sql);

	while($rs && !$rs->EOF)
	{
	$val = $rs->fields["PermissionValue"];
	//if($val==1)
	$this->SysPermCache[$rs->fields["Permission"]] = $val;
	$PermList[] = $rs->fields["Permission"];
	$rs->MoveNext();
	}
	if( isset($PermList) && count($PermList) > 0) // I think this is never issued (comment by Alex)
	$this->SetVariable("SysPerm",implode(",",$PermList));
	}
	}

	function GetSysPermCache()
	{
	$perms = trim($this->GetVariable("SysPerm"));
	if(!strlen($perms))
	{
	$this->SetSysPermCache();
	}
	else
	{
	$p = explode(",",$perms);

	$this->SysPermCache = array();
	for($i=0;$i<count($p);$i++)
	{
	$n = $p[$i];
	$this->SysPermCache[$n]=1;
	}
	}
	}

	function SysPermCacheLoaded()
	{
	return (isset($this->SysPermCache));
	}

	function ResetSysPermCache()
	{
	// echo "Resetting Perm Cache<br>\n";
	$this->SetVariable("SysPerm","");
	unset($this->SysPermCache);
	//$this->SysPermCache=array();
	}

	function HasSystemPermission($PermissionName)
	{
	global $objGroups;

	if($this->Get("PortalUserId")==-1 && ($PermissionName=="ADMIN" \|\| $PermissionName=="LOGIN"))
	return TRUE;
	//echo "Looking up $PermissionName:".$this->Get("GroupList")."<br>\n";
	//echo $this->Get("GroupList")." - ".$this->PermCacheGroups;
	$GroupList = $this->Get("GroupList");
	if(substr($GroupList,-1)==",")
	{
	$GroupList = substr($GroupList,0,-1);
	$this->Set("GroupList",$GroupList);
	}
	//print_pre( $GroupList);
	if($this->Get("GroupList")!=$this->PermCacheGroups)
	$this->ResetSysPermCache();
	if(!$this->SysPermCacheLoaded())
	{
	//echo "Loading Perm Cache<br>\n";
	$this->GetSysPermCache();
	$this->PermCacheGroups = $this->Get("GroupList");
	}
	//echo "SysPerm $PermissionName: [". $this->SysPermCache[$PermissionName]."]<br>\n";
	return isset($this->SysPermCache[$PermissionName]) ? $this->SysPermCache[$PermissionName] == 1 : false;
	}

	function HasCatPermission($PermissionName,$CatId=NULL)
	{
	global $objCatList, $objUsers;

	$PermSet =FALSE;
	$Value = 0;
	if($this->Get("PortalUserId")==-1)
	return TRUE;
	if(!strlen($PermissionName))
	return FALSE;
	$GroupList = $this->Get("GroupList");
	if(substr($GroupList,-1)==",")
	{
	$GroupList = substr($GroupList,0,-1);
	$this->Set("GroupList",$GroupList);
	}
	if(!strlen($this->Get("SessionKey")))
	$this->Set("GroupId",0);
	if(strlen(trim($GroupList)))
	{
	if(strlen($this->Get("GroupId")))
	{
	$GroupList = $this->Get("GroupId").",".$GroupList;
	}
	}
	else
	{
	$GroupList = $this->Get("GroupId");
	}

	if($CatId == NULL)
	{
	$CatId = $objCatList->CurrentCategoryID();
	}

	$Cat = &$objCatList->GetCategory($CatId);

	$Value="";
	for($p=0;$p<count($this->PermCache);$p++)
	{
	$pItem = $this->PermCache[$p];
	if($pItem["perm"]==$PermissionName && $pItem["cat"]==$CatId)
	{
	$Value=$pItem["value"];
	break;
	}
	}
	if(is_object($Cat) && !is_numeric($Value))
	{
	$Value = 0;
	$CatList = $Cat->Get("ParentPath");
	$CatList = substr($CatList,1,-1);
	$CatList = str_replace("\|",",",$CatList);
	if(strlen($CatList))
	{
	$CatList ="0,".$CatList;
	}
	else
	$CatList = "0";
	$sql = "SELECT * FROM ".GetTablePrefix()."Permissions WHERE Permission LIKE '$PermissionName' AND CatId IN ($CatList) AND GroupId IN ($GroupList)";
	// echo $sql."<br>\n";
	$rs = $this->adodbConnection->Execute($sql);
	$PermValue = array();
	while($rs && !$rs->EOF)
	{
	$index = $rs->fields["CatId"];
	if(!is_numeric($PermValue[$index]))
	$PermValue[$index] = $rs->fields["PermissionValue"];
	$rs->MoveNext();
	}
	$cats = array_reverse(explode(",",$CatList));
	for($c=0;$c<count($cats);$c++)
	{
	$index = $cats[$c];
	if( isset($PermValue[$index]) && is_numeric($PermValue[$index]) )
	{
	$Value = $PermValue[$index];
	break;
	}
	}
	$perm = array();
	$perm["perm"] = $PermissionName;
	$perm["cat"] = $CatId;
	$perm["value"] = $Value;
	array_push($this->PermCache, $perm);
	}
	//echo $GroupList." Has Permission $PermissionName = $Value<br>\n";
	return $Value;
	}

	function HasCatPermInList($PermList,$CatId=NULL, $System=FALSE)
	{
	$value = 0;
	if(strlen($PermList))
	{
	$plist = explode(",",$PermList);
	$value=0;
	for($p=0;$p<count($plist);$p++)
	{
	if($this->HasCatPermission($plist[$p]))
	{
	$value = 1;
	break;
	}
	else
	{
	if($System)
	{
	if($this->HasSystemPermission($plist[$p]))
	{
	$value = 1;
	break;
	}
	}
	}
	}
	}
	return $value;
	}

	function GetACLClause()
	{
	$GroupList = $this->Get("GroupList");
	if(strlen($GroupList))
	$Groups = explode(",",$GroupList);
	$acl_where = "";
	if(@count($Groups)>0 && is_array($Groups))
	{
	$acl_where = array();
	for($i=0;$i<count($Groups);$i++)
	{
	$g = $Groups[$i];
	if(strlen($g)>0)
	$acl_where[] = "(FIND_IN_SET($g,acl) OR ((NOT FIND_IN_SET($g,dacl)) AND acl='')) ";
	}
	if(count($acl_where))
	{
	$acl_where = "(".implode(" OR ",$acl_where).")";
	}
	else
	$acl_where = "(FIND_IN_SET(0,acl))";
	}
	else
	$acl_where = "(FIND_IN_SET(0,acl))";
	return $acl_where;
	}

	function GetEditTable($base_table)
	{
	$prefix = GetTablePrefix();
	if(strlen($prefix))
	{
	if(substr($base_table,0,strlen($prefix))!=$prefix)
	$base_table = $prefix.$base_table;
	}
	$table = $prefix."ses_".$this->GetSessionKey()."_edit_".$base_table;
	//echo "Table: $table <br>\n";
	return $table;
	}

	function GetSessionTable($base_table,$name)
	{
	$prefix = GetTablePrefix();
	if(strlen($prefix))
	{
	if(substr($base_table,0,strlen($prefix))!=$prefix)
	$base_table = $prefix.$base_table;
	}
	$table = $prefix."ses_".$this->GetSessionKey()."_".$name.$base_table;
	//echo "Table: $table <br>\n";
	return $table;
	}

	function GetSearchTable($base_table="")
	{
	$prefix = GetTablePrefix();
	if(strlen($base_table))
	{
	if(strlen($prefix))
	{
	if(substr($base_table,0,strlen($prefix))!=$prefix)
	$base_table = $prefix.$base_table;
	}
	$table = $prefix."ses_".$this->GetSessionKey()."_search_".$base_table;
	}
	else
	$table = $this->GetSessionTable('Search',''); //$prefix."ses_".$this->GetSessionKey()."_search";
	return $table;
	}

	function GetTotalSessions()
	{
	# $time = time() - 900;
	$sql = "SELECT count(*) as SesCount FROM ".GetTablePrefix()."UserSession";
	$result = $this->adodbConnection->Execute($sql);
	if ($result === false)
	{
	$this->m_Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"GetTotalSessions");
	return false;
	}
	return $result->fields["SesCount"];
	}

	function Query_UserSession($whereClause,$orderByClause)
	{
	$resultSet = array();
	$sql = "SELECT ".GetTablePrefix()."* FROM ".GetTablePrefix()."UserSession ";
	if(isset($whereClause))
	$sql = sprintf('%s WHERE %s',$sql,$whereClause);
	if(isset($orderByClause))
	$sql = sprintf('%s ORDER BY %s',$sql,$orderByClause);
	$result = $this->adodbConnection->Execute($sql);
	if ($result === false)
	{
	$this->m_Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"Query_UserSession");
	return false;
	}
	while (!$result->EOF)
	{
	$item = new clsUserSession(NULL);
	$item->Set("SessionKey",$result->fields["SessionKey"]);
	$item->Set("LastAccessed", $result->fields["LastAccessed"]);
	$item->Set("PortalUserId", $result->fields["PortalUserId"]);
	$item->Set("Language", $result->fields["Language"]);
	$item->Set("Theme" , $result->fields["Theme"]);
	array_push($resultSet,$item);
	$result->MoveNext();
	}
	return $resultSet;
	}

	function GetUniqueKey()
	{
	while(true)
	{
	/* create the new session key here */
	mt_srand(100000000*(double)microtime());
	$sessionId=strtoupper(sprintf("AD%xFD",mt_rand(100000000,999999999))); //9 digit hex session id
	$query = "select SessionKey from ".GetTablePrefix()."UserSession ";
	$query .= "where SessionKey='$sessionId' OR CurrentTempKey='$sessionId' OR PrevTempKey='$sessionId'";
	$rs = $this->adodbConnection->Execute($query);
	if($rs->EOF)
	break;
	if($i>100)
	{
	return "";
	}
	$i++;
	}
	//echo "Getting Unique Key: $sessionId<br>";
	return $sessionId;
	}

	function GetNewSession()
	{
	global $sessionId, $objConfig, $objLanguages, $m_var_list;

	$i=0;

	if($this->Get("PortalUserId")>0 \|\| $objConfig->Get("GuestSessions")==1)
	{
	//echo "Creating Session<br>\n";
	$sessionId = $this->GetUniqueKey();
	$this->Set("SessionKey", $sessionId);
	$this->Set("CurrentTempKey",$sessionId);
	if($m_var_list["lang"])
	{
	$this->Set("Language",$m_var_list["lang"]);
	}
	else
	$this->Set("Language", $objLanguages->GetPrimary());
	$this->SetThemeName();
	//$this->Set("Theme", $objConfig->Get("Default_Theme"));
	$this->UpdateAccessTime();
	$this->Set("IpAddress", $_SERVER['REMOTE_ADDR'] );
	$this->Create();
	}
	else
	$this->Set("SessionKey","");
	}

	function SessionEnabled()
	{
	//trace();
	$res = FALSE;
	$key = $this->GetSessionKey();
	if(strlen($key)>0)
	$res = TRUE;
	return $res;
	}

	function GetSessionKey()
	{
	return $this->Get("SessionKey");
	}

	function SetThemeName($id=0)
	{
	global $objThemes;

	if($id==0)
	$id = $objThemes->GetPrimaryTheme();

	$Theme = $objThemes->GetItem($id);
	$name = $Theme->Get("Name");
	$this->Set("Theme",$name);
	//$this->Update();
	}

	function ValidSession($SessionKey=NULL)
	{
	global $objConfig;

	$a = $this->Get("LastAccessed");
	$cutoff = time()-$objConfig->Get("SessionTimeout");
	//echo $a." ".$cutoff."<br>";
	//$ip = ($_SERVER['REMOTE_ADDR'] == $this->Get("IpAddress"));
	//echo $this->Get("IpAddress");
	//$ip = TRUE;
	if ($a < $cutoff) {
	//$this->UpdateAccessTime();
	}
	return ($a >= $cutoff);


	}

	function UpdateAccessTime()
	{
	$now = time();
	$this->Set("LastAccessed",$now);
	}

	function InSpamControl($ResourceId,$DataType=NULL)
	{
	static $ClearStat;

	if(!$ClearStat)
	$this->PurgeSpamControl();
	$ClearStat=1;
	if(strlen($DataType))
	$DataType="'".$DataType."'";
	$sql = "SELECT count(*) as SpamCount FROM ".GetTablePrefix()."SpamControl WHERE ItemResourceId=$ResourceId AND DataType=$DataType";
	if($this->Get("PortalUserId")==0)
	{
	$sql .= " AND PortalUserId=0 AND IPaddress='".$_SERVER["REMOTE_ADDR"]."'";
	}
	else
	{
	$sql .= " AND PortalUserId=".$this->Get("PortalUserId");
	}
	$rs = $this->adodbConnection->Execute($sql);
	$value = (int)$rs->fields["SpamCount"];
	if($value>0)
	{
	return TRUE;
	}
	else
	return FALSE;
	}

	function AddToSpamControl($ResourceId,$secstoexpire,$DataType=NULL)
	{
	$expire = adodb_date("U") + $secstoexpire;
	if(strlen($DataType))
	$DataType = "'".$DataType."'";
	$sql = "INSERT INTO ".GetTablePrefix()."SpamControl (ItemResourceId,IPaddress,Expire,PortalUserId,DataType) VALUES (";
	$sql .= $ResourceId.",'".$_SERVER["REMOTE_ADDR"]."',$expire,".$this->Get("PortalUserId").",$DataType)";
	//echo $sql;
	$this->adodbConnection->Execute($sql);
	}

	function PurgeSpamControl()
	{
	$sql = "DELETE FROM ".GetTablePrefix()."SpamControl WHERE Expire<".adodb_date("U");

	$this->adodbConnection->Execute($sql);
	}

	}/* clsUserSession */

	?>

	Property changes on: trunk/kernel/include/usersession.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.17
	\ No newline at end of property
	+1.18
	\ No newline at end of property
	Index: trunk/admin/category/addpermission_modules.php
	===================================================================
	--- trunk/admin/category/addpermission_modules.php (revision 539)
	+++ trunk/admin/category/addpermission_modules.php (revision 540)
	@@ -1,293 +1,293 @@
	<?php
	##############################################################
	##In-portal ##
	##############################################################
	## In-portal ##
	## Intechnic Corporation ##
	## All Rights Reserved, 1998-2002 ##
	## ##
	## No portion of this code may be copied, reproduced or ##
	## otherwise redistributed without proper written ##
	## consent of Intechnic Corporation. Violation will ##
	## result in revocation of the license and support ##
	## privileges along maximum prosecution allowed by law. ##
	##############################################################
	if(!strlen($pathtoroot))
	{
	$path=dirname(realpath(__FILE__));
	if(strlen($path))
	{
	/* determine the OS type for path parsing */
	$pos = strpos($path,":");
	if ($pos === false)
	{
	$gOS_TYPE="unix";
	$pathchar = "/";
	}
	else
	{
	$gOS_TYPE="win";
	$pathchar="\\";
	}
	$p = $path.$pathchar;
	/Start looking for the root flag file /
	while(!strlen($pathtoroot) && strlen($p))
	{
	$sub = substr($p,strlen($pathchar)*-1);
	if($sub==$pathchar)
	{
	$filename = $p."root.flg";
	}
	else
	$filename = $p.$pathchar."root.flg";
	if(file_exists($filename))
	{
	$pathtoroot = $p;
	}
	else
	{
	$parent = realpath($p.$pathchar."..".$pathchar);
	if($parent!=$p)
	{
	$p = $parent;
	}
	else
	$p = "";
	}
	}
	if(!strlen($pathtoroot))
	$pathtoroot = ".".$pathchar;
	}
	else
	{
	$pathtoroot = ".".$pathchar;
	}
	}

	$sub = substr($pathtoroot,strlen($pathchar)*-1);
	if($sub!=$pathchar)
	{
	$pathtoroot = $pathtoroot.$pathchar;
	}

	require_once($pathtoroot."kernel/startup.php");

	//admin only util
	$rootURL="http://".ThisDomain().$objConfig->Get("Site_Path");
	$admin = $objConfig->Get("AdminDirectory");
	if(!strlen($admin))
	$admin = "admin";

	$localURL=$rootURL."kernel/";
	$adminURL = $rootURL.$admin;

	$imagesURL = $adminURL."/images";
	$cssURL = $adminURL."/include";
	$browseURL = $adminURL."/browse";

	//$pathtolocal = $pathtoroot."in-news/";
	require_once ($pathtoroot.$admin."/include/elements.php");
	require_once ($pathtoroot."kernel/admin/include/navmenu.php");
	//require_once ($pathtolocal."admin/include/navmenu.php");
	require_once($pathtoroot.$admin."/browse/toolbar.php");
	require_once($pathtoroot.$admin."/listview/listview.php");

	$m = GetModuleArray();
	foreach($m as $key=>$value)
	{
	$path = $pathtoroot. $value."admin/include/parser.php";
	if(file_exists($path))
	{
	include_once($path);
	}
	}

	unset($objEditItems);

	$objEditItems = new clsCatList();
	$objEditItems->SourceTable = $objSession->GetEditTable("Category");

	//Multiedit init
	$en = (int)$_GET["en"];
	$objEditItems->Query_Item("SELECT * FROM ".$objEditItems->SourceTable);
	$itemcount=$objEditItems->NumItems();

	if(isset($_GET["en"]))
	{
	$c = $objEditItems->GetItemByIndex($en);
	}
	else
	{
	$c = new clsCategory($m_var_list["cat"]);
	}

	if(!is_object($c))
	{
	$c = new clsCategory();
	$c->Set("CategoryId",0);
	}
	if($itemcount>1)
	{
	if ($en+1 == $itemcount)
	$en_next = -1;
	else
	$en_next = $en+1;

	if ($en == 0)
	$en_prev = -1;
	else
	$en_prev = $en-1;
	}
	$action = "m_edit_permissions";

	$envar = "env=" . BuildEnv() . "&en=$en";

	//$section = 'in-portal:editcategory_permissions';
	$section = 'in-portal:catperm_modules';

	if(count($_POST))
	{
	if($_POST["Action"]=="m_edit_permissions")
	{
	$GroupId = $_POST["GroupId"];
	$g = $objGroups->GetItem($GroupId);
	}
	else
	{
	if(!is_array($_POST["itemlist"]))
	{
	$g = $objGroups->GetItemByField("ResourceId", $_POST["itemlist"]);
	if(is_object($g))
	$GroupId = $g->Get("GroupId");
	}
	else
	{
	$g = $objGroups->GetItemByField("ResourceId", $_POST["itemlist"][0]);
	$GroupId = $g->Get("GroupId");
	}
	}
	}
	else
	{
	$GroupId = $_GET["GroupId"];
	$g = $objGroups->GetItem($GroupId);
	}

	$objPermList = new clsPermList($c->Get("CategoryId"),$GroupId);

	$ado = &GetADODBConnection();
	$sql = "SELECT DISTINCT(ModuleId) FROM ".GetTablePrefix()."PermissionConfig";
	$rs = $ado->Execute($sql);
	$Modules = array();

	while($rs && !$rs->EOF)
	{
	$data = $rs->fields;
	$Modules[] = $data["ModuleId"];
	$rs->MoveNext();
	}
	/* page header */
	print <<<END
	<html>
	<head>
	<title>In-portal</title>
	<meta http-equiv="content-type" content="text/html;charset=iso-8859-1">
	<meta http-equiv="Pragma" content="no-cache">
	<script language="JavaScript">
	imagesPath='$imagesURL'+'/';
	</script>
	<script src="$browseURL/common.js"></script>
	<script src="$browseURL/toolbar.js"></script>
	<script src="$browseURL/utility.js"></script>
	<script src="$browseURL/checkboxes.js"></script>
	<script language="JavaScript1.2" src="$browseURL/fw_menu.js"></script>
	<link rel="stylesheet" type="text/css" href="$browseURL/checkboxes.css">
	<link rel="stylesheet" type="text/css" href="$cssURL/style.css">
	<link rel="stylesheet" type="text/css" href="$browseURL/toolbar.css">
	END;

	//int_SectionHeader();
	if($c->Get("CategoryId")!=0)
	{
	$title = admin_language("la_Text_Editing")." ".admin_language("la_Text_Category")." '".$c->Get("Name")."' - ".admin_language("la_tab_Permissions");
	$title .= " ".admin_language("la_text_for")." '".$g->parsetag("group_name")."'";
	}
	else
	{
	$title = admin_language("la_Text_Editing")." ".admin_language("la_Text_Root")." ".admin_language("la_Text_Category")." - "."' - ".admin_language("la_tab_Permissions");
	$title .= " ".admin_language("la_text_for")." '".$g->parsetag("group_name")."'";
	}

	$objListToolBar = new clsToolBar();
	$objListToolBar->Add("img_save", "la_Save","#","swap('img_save','toolbar/tool_select_f2.gif');", "swap('img_save', 'toolbar/tool_select.gif');","do_edit_save('category','CatEditStatus','$admin/category/addcategory_permissions.php',0);",$imagesURL."/toolbar/tool_select.gif");
	$objListToolBar->Add("img_cancel", "la_Cancel","#","swap('img_cancel','toolbar/tool_cancel_f2.gif');", "swap('img_cancel', 'toolbar/tool_cancel.gif');","do_edit_save('category','CatEditStatus','".$admin."/category/addcategory_permissions.php',-1);", $imagesURL."/toolbar/tool_cancel.gif");

	$sec =& $objSections->GetSection($section);
	if($c->Get("CategoryId")==0)
	{
	$sec->Set("left",NULL);
	$sec->Set("right",NULL);
	}

	int_header($objListToolBar,NULL,$title);
	if ($objSession->GetVariable("HasChanges") == 1) {
	?>
	<table width="100%" border="0" cellspacing="0" cellpadding="0" class="toolbar">
	<tr>
	<td valign="top">
	<?php int_hint_red(admin_language("la_Warning_Save_Item")); ?>
	</td>
	</tr>
	</table>
	<?php } ?>
	<TABLE CELLPADDING=0 CELLSPACING=0 class="tableborder" width="100%">
	<TBODY>
	<tr BGCOLOR="#e0e0da">
	<td WIDTH="100%" CLASS="navar">
	<img height="15" src="<?php echo $imagesURL; ?>/arrow.gif" width="15" align="middle" border="0">
	<span class="NAV_CURRENT_ITEM"><?php echo admin_language("la_Prompt_CategoryPermissions"); ?></span>
	</td>
	</TR>
	</TBODY>
	</TABLE>
	<TABLE CELLPADDING=0 CELLSPACING=0 class="tableborder" width="100%">
	<TBODY>
	<FORM ID="category" NAME="category" method="POST" ACTION="">
	<?php
	for($i=0;$i<count($Modules);$i++)
	{
	$module = $Modules[$i];
	if($module != "Admin" && $module != "Front")
	{
	echo "<TR ".int_table_color_ret().">";
	echo "<TD><IMG src=\"".$imagesURL."/itemicons/icon16_permission.gif\"> ";
	- $getvar = "?env=".BuildEnv()."&module=$module&GroupId=$GroupId";
	+ $getvar = "?env=".BuildEnv()."&module=$module&GroupId=$GroupId&en=".GetVar('en');
	echo "<A class=\"NAV_URL\" HREF=\"".$adminURL."/category/addpermission.php$getvar\">$module</A></TD>";
	echo "</TR>";
	}
	}
	?>
	</TBODY>
	</TABLE>
	<input type="hidden" name="ParentId" value="<?php echo $c->Get("ParentId"); ?>">
	<input type="hidden" name="CategoryId" value="<?php echo $c->parsetag("cat_id"); ?>">
	<input type="hidden" name="GroupId" value ="<?php echo $GroupId; ?>">
	<input type="hidden" name="Action" value="<?php echo $action; ?>">
	<input type="hidden" name="CatEditStatus" VALUE="0">
	</FORM>
	<FORM NAME="save_edit_buttons" ID="save_edit_buttons" method="POST" ACTION="">
	<tr <?php int_table_color(); ?>>
	<td colspan="3">
	<input type=hidden NAME="Action" VALUE="save_cat_edit">
	</td>
	</tr>
	</FORM>
	<!-- CODE FOR VIEW MENU -->
	<form method="post" action="user_groups.php?<?php echo $envar; ?>" name="viewmenu">
	<input type="hidden" name="fieldname" value="">
	<input type="hidden" name="varvalue" value="">
	<input type="hidden" name="varvalue2" value="">
	<input type="hidden" name="Action" value="">
	</form>
	<!-- END CODE-->
	<?php int_footer(); ?>

	Property changes on: trunk/admin/category/addpermission_modules.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.3
	\ No newline at end of property
	+1.4
	\ No newline at end of property
	Index: trunk/admin/category/category_maint.php
	===================================================================
	--- trunk/admin/category/category_maint.php (revision 539)
	+++ trunk/admin/category/category_maint.php (revision 540)
	@@ -1,245 +1,245 @@
	<?php
	##############################################################
	##In-portal ##
	##############################################################
	## In-portal ##
	## Intechnic Corporation ##
	## All Rights Reserved, 1998-2002 ##
	## ##
	## No portion of this code may be copied, reproduced or ##
	## otherwise redistributed without proper written ##
	## consent of Intechnic Corporation. Violation will ##
	## result in revocation of the license and support ##
	## privileges along maximum prosecution allowed by law. ##
	##############################################################


	if(!strlen($pathtoroot))
	{
	$path = dirname(realpath($_SERVER['SCRIPT_FILENAME']));
	if( strlen($path) )
	{
	// determine the OS type for path parsing
	$pos = strpos($path, ':');
	$gOS_TYPE = ($pos === false) ? 'unix' : 'win';
	$pathchar = ($gOS_TYPE == 'unix') ? '/' : "\\";
	$p = $path.$pathchar;

	// Start looking for the root flag file
	while( !strlen($pathtoroot) && strlen($p) )
	{
	$sub = substr($p, strlen($pathchar) * -1);
	$filename = $p.( ($sub == $pathchar) ? '' : $pathchar).'root.flg';
	if( !file_exists($filename) )
	{
	$parent = realpath($p.$pathchar."..".$pathchar);
	$p = ($parent != $p) ? $parent : '';
	}
	else
	$pathtoroot = $p;
	}
	if( !strlen($pathtoroot) ) $pathtoroot = '.'.$pathchar;
	}
	else
	$pathtoroot = '.'.$pathchar;
	}

	$sub = substr($pathtoroot,strlen($pathchar)*-1);
	if( $sub != $pathchar) $pathtoroot = $pathtoroot.$pathchar;

	//echo $pathtoroot;
	//$FrontEnd=2;

	require_once($pathtoroot."kernel/startup.php");

	//admin only util
	$rootURL="http://".ThisDomain().$objConfig->Get("Site_Path");
	$admin = $objConfig->Get("AdminDirectory");
	if(!strlen($admin))
	$admin = "admin";
	$localURL=$rootURL."kernel/";
	$adminURL = $rootURL.$admin;
	$imagesURL = $adminURL."/images";
	//$pathtolocal = $pathtoroot."in-news/";
	require_once ($pathtoroot.$admin."/include/elements.php");
	require_once ($pathtoroot."kernel/admin/include/navmenu.php");
	//require_once ($pathtolocal."admin/include/navmenu.php");
	require_once($pathtoroot.$admin."/toolbar.php");
	require_once($pathtoroot.$admin."/listview/listview.php");

	$section = "in-portal:category_maint";

	$CatsPerLoad = 10;
	$ado = &GetADODBConnection();

	// init vars
	if( !isset($NumCats) ) $NumCats = 0;
	if( !isset($CatIndex) ) $CatIndex = 0;

	if( !is_numeric( GetVar('CatIndex') ) )
	{
	unset($objEditItems);

	$objEditItems = new clsCatList();
	$objEditItems->SourceTable = $objSession->GetEditTable("Category");
	$table = $objEditItems->SourceTable;
	//echo "Dropping Table..<br>\n";
	@$ado->Execute("DROP TABLE IF EXISTS $table");

	if($objCatList->CurrentCategoryID()>0)
	{
	$c = $objCatList->GetItem($objCatList->CurrentCategoryID());
	$path = $c->Get("ParentPath");
	$sql = "SELECT CategoryId,ParentPath FROM ".$objCatList->SourceTable." WHERE ParentPath LIKE '".$path."%'";
	$ado->Execute("CREATE TABLE $table ".$sql);
	}
	else
	{
	$sql = "SELECT CategoryId,ParentPath FROM ".$objCatList->SourceTable;
	$objEditTable->SourceTable = $objCatList->SourceTable;
	$table = $objCatList->SourceTable;
	}
	$NumCats = TableCount($table,"",0);

	$title = prompt_language("la_prompt_updating")." ".prompt_language("la_Text_Categories");
	int_header(NULL,NULL,$title);
	flush();
	}
	elseif( is_numeric($_GET["CatIndex"]) )
	{
	$NumCats = $_REQUEST['NumCats'];
	$CatIndex = (int)$_REQUEST['CatIndex'];
	$table = ($objCatList->CurrentCategoryID() > 0) ? $objSession->GetEditTable("Category") : $objCatList->SourceTable;
	//echo $NumCats." Loaded <br>\n";
	$title = prompt_language("la_prompt_updating")." ".prompt_language("la_Text_Categories");
	$title .= " $CatIndex / $NumCats ".prompt_language("la_Text_complete");
	int_header(NULL,NULL,$title);
	flush();

	$sql = "SELECT * FROM $table ORDER BY ParentPath ASC LIMIT $CatIndex,$CatsPerLoad";

	$objCatList->Query_Item($sql);
	foreach($objCatList->Items as $cat)
	{
	$cat->UpdateACL();
	$cat->UpdateCachedPath();
	}
	}
	else
	{
	$title = prompt_language("la_prompt_updating")." ".prompt_language("la_Text_Categories");
	int_header(NULL,NULL,$title);
	flush();
	}

	$no_url = $adminURL.'/'.$objSession->GetVariable('ReturnScript').'?env='.BuildEnv();
	$yes_url = $_SERVER['PHP_SELF'].'?env='.BuildEnv().'&CatIndex=0&NumCats='.$NumCats;
	$cat_update = $objSession->GetVariable('PermCache_UpdateRequired');


	?>
	<TABLE cellspacing="0" cellpadding="2" width="100%" border="0" class="tableborder">
	<script language="javascript">
	function goto_url(url)
	{
	document.location = url;
	}
	<?php if( !$cat_update )
	{
	$objSession->SetVariable('PermCache_UpdateRequired', 0);
	echo "goto_url('$no_url');\n";
	}
	?>
	</script>
	<?php


	if(!is_numeric( GetVar('CatIndex') ) && $NumCats > $CatsPerLoad)
	{
	int_subsection_title(prompt_language("la_confirm_maintenance"));


	?>
	<tr>
	<td align="center" colspan="3" bgcolor="#FFFFFF"><?php echo prompt_language("la_prompt_perform_now"); ?></td>
	</tr>
	<tr>
	<td align="right" width="50%">
	<input type="button" name="yes_btn" value="<?php echo admin_language("lu_yes"); ?>" onclick="javascript:goto_url('<?php echo $yes_url; ?>');" class="button">
	</td>
	<td><img src="<?php echo $imagesURL; ?>/spacer.gif" width="10"></td>
	<td align="left" width="50%">
	<input type="button" name="yes_btn" value="<?php echo admin_language("lu_no"); ?>" onclick="javascript:goto_url('<?php echo $no_url; ?>');" class="button">
	</td>
	</tr>
	</table>
	<?php
	int_footer();
	die();
	}
	?>
	<?php int_subsection_title(""); ?>
	<?php
	if($NumCats==0)
	{
	$percent=100;
	}
	else
	{
	$percent = (int)(($CatIndex/$NumCats) * 100);
	}

	- if(is_numeric($_GET["CatIndex"]))
	+ if( is_numeric( GetVar('CatIndex') ) )
	{
	if ($percent == 0)
	{
	echo "<TR>";
	echo "<TD BGCOLOR=\"#FFFFFF\" width=\"100%\" >$percent";
	echo "%</td></TR>";
	}
	else if ($percent < 60)
	{
	echo "<TR><TD BGCOLOR=\"#4682B2\" width=\"".$percent."%\" >";
	$row2 = 100-$percent;
	echo "</td> <TD BGCOLOR=\"#FFFFFF\" width=\"".$row2."%\" > $percent";
	echo "%</td></TR>";
	}
	else if ($percent == 100)
	{
	echo "<TR><TD BGCOLOR=\"#4682B2\" align=\"right\" width=\"100%\" ><FONT COLOR=\"#FFFFFF\">$percent%</FONT></td>";
	}
	else
	{
	echo "<TR><TD BGCOLOR=\"#4682B2\" align=\"right\" width=\"".$percent."%\" ><FONT COLOR=\"#FFFFFF\">$percent%</FONT>";
	$row2 = 100-$percent;
	echo "</td> <TD BGCOLOR=\"#FFFFFF\" width=\"".$row2."%\" ></td></TR>";
	}
	}
	flush();
	?>
	</TABLE>
	<?php
	if($CatIndex+1 >$NumCats)
	{
	$objSession->SetVariable('PermCache_UpdateRequired', 0);
	$target = $adminURL."/".$objSession->GetVariable('ReturnScript').'?env='.BuildEnv();
	}
	else
	{
	$next = $CatIndex+$CatsPerLoad;
	if($next > $NumCats)
	{
	$objSession->SetVariable('PermCache_UpdateRequired', 0);
	$target = $adminURL."/".$objSession->GetVariable('ReturnScript').'?env='.BuildEnv();
	}
	else
	$target = $_SERVER["PHP_SELF"]."?env=".BuildEnv()."&CatIndex=".$next."&NumCats=$NumCats";
	}

	//print "<A HREF=\"$target\">$target</A>";

	print "<script language=\"javascript\">" ;
	print "setTimeout(\"document.location='$target';\",40);";
	print " </script>";
	?>
	<?php int_footer(); ?>

	Property changes on: trunk/admin/category/category_maint.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.8
	\ No newline at end of property
	+1.9
	\ 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