in-portal
No OneTemporary
Actions

Subscribers

None

File Metadata

Created: Sun, Feb 2, 10:08 AM

in-portal
View Options

	Index: trunk/kernel/include/theme.php
	===================================================================
	--- trunk/kernel/include/theme.php (revision 1015)
	+++ trunk/kernel/include/theme.php (revision 1016)
	@@ -1,778 +1,778 @@
	<?php
	define('THEME_ERROR_1', 'Theme folder not writable');
	define('THEME_ERROR_2', 'Template File Not Found');

	class clsThemeFile extends clsItem
	{
	var $Contents;
	var $Root;
	var $Errors = Array(); // global template error messages (not db related)

	function clsThemeFile($id=NULL)
	{
	$this->clsItem();
	$this->tablename = GetTablePrefix()."ThemeFiles";
	$this->id_field = "FileId";
	$this->NoResourceId=1;
	$this->Root = "";
	$this->Contents = '';
	if($id) $this->LoadFromDatabase($id);
	}

	function DetectChanges($name, $value)
	{
	global $objSession;

	if ($this->Data[$name] != $value) {
	//echo "$name Modified tt ".$this->Data[$name]." tt $value<br>";
	if (!stristr($name, 'File') && !stristr($name, 'Theme')) {
	if ($objSession->GetVariable("HasChanges") != 1) {
	$objSession->SetVariable("HasChanges", 2);
	}
	}
	}
	}

	function ThemeRoot()
	{
	if( !$this->Root )
	{
	$t = new clsTheme( $this->Get("ThemeId") );
	$this->Root = $t->Get("Name");
	}
	return $this->Root;
	}

	function FullPath()
	{
	// need to rewrite (by Alex)
	global $objConfig, $pathchar,$pathtoroot;

	$path = $pathtoroot."themes".$pathchar.$this->ThemeRoot();
	if(strlen(trim($this->Get("FilePath"))))
	$path .= $pathchar.$this->Get("FilePath");
	$path .= $pathchar.$this->Get("FileName");
	//echo "Full Path is $path <br>\n";
	return str_replace('//','/',$path);
	}

	function Get($name)
	{
	if($name == 'Contents')
	return $this->Contents;
	else
	return parent::Get($name);
	}

	function Set($name, $value)
	{
	if( !is_array($name) )
	{
	$name = Array($name);
	$value = Array($value);
	}

	$i = 0; $field_count = count($name);
	while($i < $field_count)
	{
	if($name[$i] == 'Contents')
	$this->Contents = $value[$i];
	else
	parent::Set($name[$i], $value[$i]);
	$i++;
	}
	}
	/*
	function LoadFromDatabase($Id)
	{
	global $Errors;

	if(!isset($Id))
	{
	$Errors->AddError("error.AppError",NULL,'Internal error: LoadFromDatabase id',"",get_class($this),"LoadFromDatabase");
	return false;
	}
	$sql = sprintf("SELECT * FROM ".$this->tablename." WHERE ".$this->IdField()." = '%s'",$Id);
	$result = $this->adodbConnection->Execute($sql);
	if ($result === false)
	{
	$Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"LoadFromDatabase");
	return false;
	}

	$data = $result->fields;

	$this->SetFromArray($data);
	$this->Clean();
	return true;
	}
	*/

	function Delete()
	{
	$path = $this->FullPath();
	if($this->debuglevel) echo "Trying to delete file [$path]<br>";
	if( file_exists($path) ) @unlink($path);
	parent::Delete();
	}

	function LoadFileContents($want_return = true)
	{
	global $objConfig,$pathchar;

	$this->Contents = '';
	$path = $this->FullPath();

	if( file_exists($path) )
	$this->Contents = file_get_contents($path);
	else
	$this->SetError(THEME_ERROR_2, 2); // template not found
	if($want_return) return $this->Contents;
	}

	function SetError($msg, $code, $field = 'global_error')
	{
	$this->Errors[$field]['msg'] = $msg;
	$this->Errors[$field]['code'] = $code;
	}

	function HasError()
	{
	return count($this->Errors) ? 1 : 0;
	}

	function ErrorMsg()
	{
	return $this->Errors['global_error']['msg'];
	}

	function SaveFileContents($filecontents, $new_file = false)
	{
	$path = $this->FullPath();
	if( is_array($filecontents) ) $filecontents = implode("\n",$filecontents);

	if( $this->IsWriteablePath($new_file) )
	{
	$fp = fopen($path,"w");
	if($fp)
	{
	fwrite($fp,$filecontents);
	fclose($fp);
	return true;
	}
	}
	return false;
	}

	function IsWriteablePath($new_file = false)
	{

	$path = $this->FullPath();
	$path = str_replace('//','/',$path);
	$ret = $new_file ? is_writable(dirname($path)): is_writable($path);

	if(!$ret)
	{
	$this->SetError(THEME_ERROR_1, 1);
	return false;
	}
	return $ret;
	}
	}

	class clsThemeFileList extends clsItemCollection
	{
	var $Page;
	var $PerPageVar;
	var $ThemeId;

	function clsThemeFileList($theme_id=NULL)
	{
	global $m_var_list;
	$this->clsItemCollection();
	$this->classname = "clsThemeFile";
	$this->Page=(int)$m_var_list["p"];
	$this->PerPageVar = "Perpage_ThemeFiles";
	$this->SourceTable = GetTablePrefix()."ThemeFiles";
	$this->AdminSearchFields = array("FileName","FilePath","Description");


	$this->ThemeId=$theme_id;
	//if($theme_id)
	// $this->LoadFiles($theme_id);
	}

	function LoadFiles($id,$where="",$orderBy="",$limit="")
	{
	global $objConfig;

	$this->Clear();
	$this->ThemeId=$id;
	$sql = "SELECT * FROM ".$this->SourceTable. " WHERE ThemeId=$id ";
	if(strlen(trim($where))) $sql .= ' AND '.$where." ";
	if(strlen(trim($orderBy))) $sql .= "ORDER BY $orderBy";
	if(strlen(trim($limit))) $sql .= $limit;

	if(strlen($this->PerPageVar))
	{
	$sql .= GetLimitSQL($this->Page,$objConfig->Get($this->PerPageVar));
	}
	//echo $sql;
	return $this->Query_Item($sql);
	}

	function GetFileByName($path,$name,$LoadFromDB=TRUE)
	{
	$found = FALSE;
	$f = FALSE;
	//echo "Looking through ".$this->NumItems()." Files <br>\n";
	if($this->NumItems()>0)
	{
	foreach($this->Items as $f)
	{
	if(($f->Get("FilePath")== $path) && ($f->Get("FileName")==$name))
	{
	$found = TRUE;
	break;
	}
	}
	}

	if(!$found && $LoadFromDB)
	{
	$sql = "SELECT * FROM ".$this->SourceTable." WHERE ThemeId=".$this->ThemeId." AND FileName LIKE '$name' AND FilePath LIKE '$path'";
	$rs = $this->adodbConnection->Execute($sql);
	//echo $sql."<br>\n";
	if($rs && !$rs->EOF)
	{
	$data = $rs->fields;
	$f =& $this->AddItemFromArray($data);
	}
	else
	$f = FALSE;
	}
	return $f;
	}

	function AddFile($Path,$Name,$ThemeId,$Type,$Description,$contents=NULL)
	{
	$f = new clsThemeFile();
	$f->Set(array("FilePath","FileName","ThemeId","FileType","Description"),
	array($Path,$Name,$ThemeId,$Type,$Description));
	$f->Create();
	if($contents!==NULL)
	{
	$f->SaveFileContents($contents,$Name);
	}
	//echo $f->Get("FilePath")."/".$f->Get("FileName")."<br>\n";
	return $f;
	}

	function EditFile($FileId,$Path,$Name,$ThemeId,$Type,$Description,$contents=NULL)
	{
	$f = $this->GetItem($FileId);
	$f->Set(array("FilePath","FileName","ThemeId","FileType","Description"),
	array($Path,$Name,$ThemeId,$Type,$Description));
	$f->Update();
	if($Contents!=NULL)
	$f->SaveFileContents($Contents);

	return $f;
	}

	function DeleteFile($FileId)
	{
	$f = $this->GetItem($FileId);
	$f->Delete();
	}

	function DeleteAll()
	{
	$this->Clear();
	$this->LoadFiles($this->ThemeId);
	foreach($this->Items as $f)
	$f->Delete();
	$this->Clear();
	}

	function SetFileContents($FileId,$Contents)
	{
	$f = $this->GetItem($FileId);
	$f->SaveFileContents($Contents);
	}

	function GetFileContents($FileId)
	{
	$f = $this->GetItem($FileId);
	return $f->LoadFileContents();
	}

	function FindMissingFiles($path, $where = null, $OrderBy = null, $limit = null)
	{
	global $pathtoroot;
	$this->Clear();
	$fullpath = $pathtoroot.'themes/'.$path;
	// get all templates from database
	$sql = 'SELECT FileId AS i,CONCAT(FilePath,"/",FileName) AS f FROM '.$this->SourceTable. ' WHERE ThemeId='.$this->ThemeId;
	$DBfiles=Array();
	if($rs = $this->adodbConnection->Execute($sql))
	{
	while(!$rs->EOF)
	{
	$DBfiles[$rs->fields['i']] = $fullpath.$rs->fields['f'];
	$rs->MoveNext();
	}
	$rs->Free();
	}
	// get all templates file from disk
	$HDDfiles = filelist($fullpath, NULL, "tpl");

	$missingFiles=array_diff($HDDfiles,$DBfiles);
	$orphanFiles=array_diff($DBfiles,$HDDfiles);
	if($orphanFiles)
	{
	$sql = 'DELETE FROM '.$this->SourceTable.' WHERE FileId IN('.join(',',array_keys($orphanFiles)).')';
	$this->adodbConnection->Execute($sql);
	}
	$l=strlen($fullpath);
	foreach($missingFiles as $file)
	$this->AddFile(substr(dirname($file),$l),basename($file),$this->ThemeId,0,'');
	}
	}

	RegisterPrefix("clsTheme","theme","kernel/include/theme.php");

	class clsTheme extends clsParsedItem
	{
	var $Files;
	var $FileCache;
	var $IdCache;
	var $ParseCacheDate;
	var $ParseCacheTimeout;

	function clsTheme($Id = NULL)
	{
	$this->clsParsedItem($Id);
	$this->tablename = GetTablePrefix()."Theme";
	$this->id_field = "ThemeId";
	$this->NoResourceId=1;
	$this->TagPrefix="theme";

	$this->Files = new clsThemeFileList($Id);
	$this->FileCache = array();
	$this->IdCache = array();
	$this->ParseCacheDate=array();
	$this->ParseCacheTimeout = array();

	if($Id)
	$this->LoadFromDatabase($Id);
	}

	function ThemeDirectory()
	{
	global $objConfig, $pathchar, $pathtoroot;

	$path = $pathtoroot."themes/".strtolower($this->Get("Name"));
	return $path;
	}

	function UpdateFileCacheData($id,$CacheDate)
	{
	$sql = "UPDATE ".GetTablePrefix()."ThemeFiles SET CacheDate=$CacheDate WHERE FileId=$id";
	$this->adodbConnection->Execute($sql);
	}

	function LoadFileCache()
	{
	if(!is_numeric($id=$this->Get("ThemeId")))return;
	$sql = "SELECT * FROM ".GetTablePrefix()."ThemeFiles WHERE ThemeId=".$id;
	$rs = $this->adodbConnection->Execute($sql);
	while($rs && ! $rs->EOF)
	{
	//$this->Files->AddItemFromArray($rs->fields,TRUE);
	$f = $rs->fields["FileName"];
	$t = $rs->fields["FilePath"];
	if(strlen($t))
	$t .= "/";
	$parts = pathinfo($f);
	$fname = substr($f,0,(strlen($parts["extension"])+1)*-1);
	// echo "Name: $fname<br>\n";
	$t .= $fname;

	$this->FileCache[$t] = $rs->fields["FileId"];
	$this->IdCache[$rs->fields["FileId"]] = $t;
	/*
	if($rs->fields["EnableCache"]) // no such field in this table (commented by Alex)
	{
	$this->ParseCacheDate[$rs->fields["FileId"]] = $rs->fields["CacheDate"];
	$this->ParseCacheTimeout[$rs->fields["FileId"]] = $rs->fields["CacheTimeout"];
	}
	*/
	if( defined('ADODB_EXTENSION') && constant('ADODB_EXTENSION') > 0 )
	adodb_movenext($rs);
	else
	$rs->MoveNext();
	}
	//echo "<PRE>"; print_r($this->IdCache); echo "</PRE>";
	}

	function GetTemplateById($FileId)
	{
	if(count($this->FileCache)==0)
	$this->LoadFileCache();
	$f = $this->IdCache[$FileId];

	return $f;
	}

	function GetTemplateId($t)
	{
	if( count($this->IdCache) == 0 ) $this->LoadFileCache();
	$f = isset( $this->FileCache[$t] ) ? $this->FileCache[$t] : '';
	return is_numeric($f) ? $f : $t;
	}

	function LoadFromDatabase($Id)
	{
	global $Errors;

	if(!isset($Id))
	{
	$Errors->AddError("error.AppError",NULL,'Internal error: LoadFromDatabase id',"",get_class($this),"LoadFromDatabase");
	return false;
	}
	$sql = sprintf("SELECT * FROM ".$this->tablename." WHERE ".$this->IdField()." = '%s'",$Id);
	$result = $this->adodbConnection->Execute($sql);
	if ($result === false)
	{
	$Errors->AddError("error.DatabaseError",NULL,$this->adodbConnection->ErrorMsg(),"",get_class($this),"LoadFromDatabase");
	return false;
	}

	$data = $result->fields;

	$this->SetFromArray($data);
	$this->Clean();
	$this->Files = new clsThemeFileList($Id);
	return true;
	}

	function GetFileList($where,$OrderBy)
	{
	global $objConfig, $pathchar;

	$this->Files->PerPageVar="";
	$this->Files->ThemeId = $this->Get("ThemeId");
	$this->Files->LoadFiles($this->Get("ThemeId"),$where,$OrderBy);
	}

	function VerifyTemplates($where = null,$OrderBy = null,$limit = null)
	{
	if(!is_object($this->Files))
	$this->Files = new clsThemeFileList($this->Get("ThemeId"));
	$this->Files->ThemeId = $this->Get("ThemeId");

	$this->Files->FindMissingFiles(strtolower($this->Get("Name")),$where,$OrderBy,$limit);
	}

	function EditTemplateContents($FileId,$Contents)
	{
	$this->Files->SetFileContents($FileId,$Contents);
	}

	function ReadTemplateContents($FileId)
	{
	return $this->Files->GetFileContents($FileId);
	}

	function CreateDirectory()
	{
	$dir = $this->ThemeDirectory();
	if(!is_dir($dir))
	mkdir($dir);
	if(is_dir($dir))
	{
	$fp = fopen($dir.'/index.tpl',"w");
	if($fp)
	{
	fwrite($fp,'');
	fclose($fp);
	}

	}
	}

	function Delete()
	{
	$this->Files->DeleteAll();
	$dir = $this->ThemeDirectory();
	if(is_writable($dir))
	@rmdir($dir);
	parent::Delete();
	}

	function AdminIcon()
	{
	global $imagesURL;

	$file = $imagesURL."/itemicons/icon16_theme";
	if($this->Get("PrimaryTheme")==1)
	{
	$file .= "_primary.gif";
	}
	else
	{
	if($this->Get("Enabled")==0)
	{
	$file .= "_disabled";
	}
	$file .= ".gif";
	}
	return $file;
	}

	function ParseObject($element)
	{
	global $var_list_update, $objSession;

	$extra_attribs = ExtraAttributes($element->attributes);
	if(strtolower($element->name)==$this->TagPrefix)
	{
	$field = strtolower($element->attributes["_field"]);
	switch($field)
	{
	case "id":
	$ret = $this->Get("ThemeId");
	break;
	case "name": // was "nane"
	$ret = $this->Get("Name");
	break;
	case "description":
	$ret = $this->Get("Description");
	break;
	case "adminicon":
	$ret = $this->AdminIcon();
	break;
	case "directory":
	$ret = $this->ThemeDirectory();
	break;
	case "select_url":
	$var_list_update["t"] = "index";
	$ret = GetIndexURL(2)."?env=".BuildEnv()."&Action=m_set_theme&ThemeId=".$this->Get("ThemeId");
	break;
	case "selected":
	$ret = "";
	if($this->Get("Name")==$objSession->Get("Theme"))
	$ret = "SELECTED";
	break;
	default:
	$tag = $this->TagPrefix."_".$field;
	$ret = ""; $this->parsetag($tag);
	break;
	}
	}
	return $ret;
	}
	}

	class clsThemeList extends clsItemCollection
	{
	var $Page;
	var $PerPageVar;

	function clsThemeList($id=NULL)
	{
	$this->clsItemCollection();
	$this->classname="clsTheme";
	$this->SourceTable=GetTablePrefix()."Theme";
	$this->PerPageVar = "Perpage_Themes";
	$this->AdminSearchFields = array("Name","Description");
	}

	function LoadThemes($where='',$orderBy='')
	{
	global $objConfig;

	$this->Clear();
	$sql = "SELECT * FROM ".$this->SourceTable." ";
	if(trim($where))
	$sql .= "WHERE ".$where." ";
	if(trim($orderBy))
	$sql .= "ORDER BY $orderBy";

	$sql .= GetLimitSQL($this->Page,$objConfig->Get($this->PerPageVar));
	return $this->Query_Item($sql);
	}

	function AddTheme($Name,$Description,$Enabled,$Primary,$CacheTimeout=3600)
	{
	$t = new clsTheme();
	$t->tablename = $this->SourceTable;
	$t->Set(array("Name","Description","Enabled","PrimaryTheme","CacheTimeout"),
	array($Name,$Description,$Enabled,$Primary,$CacheTimeout));
	$t->Create();
	$t->Files->ThemeId=$t->Get("ThemeId");
	if($Primary==1)
	{
	$sql = "UPDATE ".$this->SourceTable." SET PrimaryTheme=0 WHERE ThemeId != ".$t->Get("ThemeId");
	$this->adodbConnection->Execute($sql);
	}
	return $t;
	}

	function EditTheme($ThemeId,$Name,$Description,$Enabled,$Primary, $CacheTimeout)
	{
	$t = $this->GetItem($ThemeId);
	$oldName = $t->Get("Name");
	if($oldName!=$Name)
	{
	$dir=dirname($t->ThemeDirectory());
	if(!rename($dir.'/'.$oldName,$dir.'/'.$Name))
	$Name=$oldName;
	}
	$t->Set(array("Name","Description","Enabled","PrimaryTheme","CacheTimeout"),
	array($Name, $Description, $Enabled, $Primary, $CacheTimeout));
	$t->Dirty();
	$t->Update();
	if($Primary==1)
	{
	$sql = "UPDATE ".$this->SourceTable." SET PrimaryTheme=0 WHERE ThemeId!=$ThemeId";
	$this->adodbConnection->Execute($sql);
	}
	return $t;
	}

	function DeleteTheme($ThemeId)
	{
	$t = $this->GetItem($ThemeId);
	$t->Delete();
	}

	function SetPrimaryTheme($ThemeId)
	{
	$theme = $this->GetItem($ThemeId);
	$theme->Dirty();
	if($theme->Get("Enabled")==1)
	{
	$sql = "UPDATE ".$this->SourceTable." SET PrimaryTheme=0";
	$this->adodbConnection->Execute($sql);
	$theme->Set("PrimaryTheme","1");
	$theme->Update();
	}
	}

	function GetPrimaryTheme($field="ThemeId")
	{
	$sql = "SELECT * FROM ".$this->SourceTable." WHERE PrimaryTheme=1";
	$rs = $this->adodbConnection->Execute($sql);
	if($rs && !$rs->EOF)
	{
	$l = $rs->fields[$field];
	}
	else
	$l = 0;
	return $l;
	}

	function CreateMissingThemes()
	{
	global $objConfig,$pathchar, $pathtoroot;

	$path = $pathtoroot."themes";

	$themes = array();
	$HDDThemes=Array();
	if ($dir = @opendir($path))
	{
	while (($file = readdir($dir)) !== false)
	{
	if($file !="." && $file !=".." && substr($file,0,1)!="_")
	{
	if(is_dir($path."/".$file)&&file_exists($path."/".$file.'/index.tpl'))
	{
	$file = strtolower($file);
	$themes[$file]=0;
	$HDDThemes[]=$file;
	}
	}
	}
	}
	closedir($dir);

	$sql = 'SELECT ThemeId AS i,Name AS n FROM '.$this->SourceTable;
	$DBThemes=Array();
	if($rs = $this->adodbConnection->Execute($sql))
	{
	while(!$rs->EOF)
	{
	$DBThemes[$rs->fields['i']] = $fullpath.$rs->fields['n'];
	$rs->MoveNext();
	}
	$rs->Free();
	}

	- $missingThemes=array_diff($HDDThemes,$DBThemes);
	- $orphanThemes=array_diff($DBThemes,$HDDThemes);
	+ $missingThemes=array_udiff($HDDThemes,$DBThemes,stricmp);
	+ $orphanThemes=array_udiff($DBThemes,$HDDThemes,stricmp);

	if($orphanThemes)
	{
	$sql = 'DELETE FROM '.$this->SourceTable.' WHERE ThemeId IN('.join(',',array_keys($orphanThemes)).')';
	$this->adodbConnection->Execute($sql);
	$sql = 'DELETE FROM '.GetTablePrefix().'ThemeFiles WHERE ThemeId IN('.join(',',array_keys($orphanThemes)).')';
	$this->adodbConnection->Execute($sql);
	}
	$this->Clear();
	foreach($missingThemes as $theme)
	{
	$t=$this->AddTheme($theme,"New Theme",0,0);
	$t->Files->FindMissingFiles($t->Get('Name'));
	}
	}

	function CopyFromEditTable()
	{
	global $objSession;
	$GLOBALS['_CopyFromEditTable']=1;

	$edit_table = $objSession->GetEditTable($this->SourceTable);
	$idlist = array();
	$sql = "SELECT * FROM $edit_table";
	$this->Clear();
	$rs = $this->adodbConnection->Execute($sql);
	while($rs && !$rs->EOF)
	{
	$data = $rs->fields;
	$c = $this->AddItemFromArray($data);

	$c->Dirty();
	if($data["ThemeId"]>0)
	{
	$c->Update();
	}
	else
	{
	$c->UnsetIdField();
	$c->Create();
	$c->CreateDirectory();
	}
	if($c->Get("PrimaryTheme"))
	{
	$this->SetPrimaryTheme($c->Get("ThemeId"));
	}
	$rs->MoveNext();
	}
	$this->adodbConnection->Execute($sql);
	unset($GLOBALS['_CopyFromEditTable']);
	}

	function PurgeEditTable()
	{
	global $objSession;

	$edit_table = $objSession->GetEditTable($this->SourceTable);
	$this->adodbConnection->Execute("DROP TABLE IF EXISTS $edit_table");
	}


	}
	?>

	Property changes on: trunk/kernel/include/theme.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.13
	\ No newline at end of property
	+1.14
	\ No newline at end of property
	Index: trunk/admin/include/mainscript.php
	===================================================================
	--- trunk/admin/include/mainscript.php (revision 1015)
	+++ trunk/admin/include/mainscript.php (revision 1016)
	@@ -1,553 +1,565 @@
	<?php
	global $imagesURL,$objConfig,$adminURL,$rootURL, $en;

	$group_select = $adminURL."/users/group_select.php";
	$item_select = $adminURL."/relation_select.php";
	$user_select = $adminURL."/users/user_select.php";
	$cat_select = $adminURL."/cat_select.php";
	$missing_edit = $adminURL."/config/missing_label_search.php";

	$lang_Filter = language("la_Text_Filter");
	$lang_View = language("la_Text_View");
	$lang_Sort = language("la_Text_Sort");
	$lang_Select = language("la_Text_Select");
	$lang_Unselect = language("la_Text_Unselect");
	$lang_Invert = language("la_Text_Invert");
	$lang_PerPage = language("la_prompt_PerPage");
	$lang_All = language("la_Text_All");
	$lang_Asc = language("la_common_ascending");
	$lang_Desc = language("la_common_descending");
	$lang_Disabled = language("la_Text_Disabled");
	$lang_Enabled = language("la_Text_Enabled");
	$lang_Pending = language("la_Text_Pending");
	$lang_Default = language("la_Text_Default");
	$lang_CreatedOn = language("la_prompt_CreatedOn");
	$lang_None = language("la_Text_None");
	$lang_PerPage = language("la_prompt_PerPage");
	$lang_Views = language("la_Text_Views");
	$lang_URL = language("la_ColHeader_Url");
	$lang_Status = language("la_prompt_Status");
	$lang_Name = language("la_prompt_Name");
	$lang_MoveDn = language("la_prompt_MoveDown");
	$lang_MoveUp = language("la_prompt_MoveUp");
	$lang_Delete = language("la_prompt_Delete");
	$lang_Edit = language("la_prompt_Edit");
	$errormsg = language("la_validation_AlertMsg");

	$env2 = BuildEnv();
	if(is_numeric($en))
	{
	$env2 = BuildEnv() . "&en=$en";
	}

	$editor_url = $adminURL."/editor/editor.php?env=$env2";
	$email_url = $adminURL."/email/sendmail.php?env=$env2";
	$phrase_edit = $adminURL."/config/edit_label.php?env=".$env2;
	$submit_done = isset($_REQUEST['submit_done']) ? 1 : 0; // returns form submit status

	$Cal = GetDateFormat();
	if(strpos($Cal,"y"))
	{
	$Cal = str_replace("y","yy",$Cal);
	}
	else
	$Cal = str_replace("Y","y",$Cal);


	$Cal = str_replace("m","mm",$Cal);
	$Cal = str_replace("n","m",$Cal);
	$Cal = str_replace("d","dd",$Cal);

	$format = GetStdFormat(GetDateFormat());

	$yearpos = (int)DateFieldOrder($format,"year");
	$monthpos = (int)DateFieldOrder($format,"month");
	$daypos = (int)DateFieldOrder($format,"day");

	$ampm = "false";
	if($objConfig->Get("ampm_time")=="1")
	{
	$ampm = "true";
	}

	require_once($pathtoroot.$admin."/lv/js/js_lang.php");
	print <<<END
	<script type="text/javascript" src="$adminURL/lv/js/in-portal.js"></script>
	<script language="Javascript">

	var CurrentTab= new String();

	var lang_Filter = "$lang_Filter";
	var lang_Sort = "$lang_Sort";
	var lang_Select = "$lang_Select";
	var lang_Unselect = "$lang_Unselect";
	var lang_Invert = "$lang_Invert";
	var lang_PerPage = "$lang_PerPage";
	var lang_All = "$lang_All";
	var lang_Asc = "$lang_Asc";
	var lang_Desc = "$lang_Desc";
	var lang_Disabled = "$lang_Disabled";
	var lang_Pending = "$lang_Pending";
	var lang_Default = "$lang_Default";
	var lang_CreatedOn = "$lang_CreatedOn";
	var lang_View = "$lang_View";
	var lang_Views = "$lang_Views";
	var lang_None = "$lang_None";
	var lang_PerPage = "$lang_PerPage";
	var lang_Enabled = "$lang_Enabled";
	var lang_URL = "$lang_URL";
	var lang_Status = "$lang_Status";
	var lang_Name = "$lang_Name";

	var lang_Edit = "$lang_Edit";
	var lang_Delete = "$lang_Delete";
	var lang_MoveUp = "$lang_MoveUp";
	var lang_MoveDn = "$lang_MoveDn";
	var ampm = $ampm;
	var listview_clear=1;
	var CalDateFormat = "$Cal";

	var yearpos = $yearpos;
	var monthpos = $monthpos;
	var daypos = $daypos;
	var ErrorMsg = '$errormsg';
	//en = $en
	var rootURL = '$rootURL';

	function clear_list_checkboxes()
	{
	var inputs = document.getElementsByTagName("INPUT");
	for (var i = 0; i < inputs.length; i++)
	if (inputs[i].type == "checkbox" && inputs[i].getAttribute("isSelector"))
	{
	inputs[i].checked=false;
	}
	}


	function getRealLeft(el) {
	xPos = el.offsetLeft;
	tempEl = el.offsetParent;
	while (tempEl != null) {
	xPos += tempEl.offsetLeft;
	tempEl = tempEl.offsetParent;
	}
	return xPos;
	}

	function getRealTop(el) {
	yPos = el.offsetTop;
	tempEl = el.offsetParent;
	while (tempEl != null) {
	yPos += tempEl.offsetTop;
	tempEl = tempEl.offsetParent;
	}
	return yPos;
	}

	function MM_preloadImages() { //v3.0
	var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
	var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
	if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
	}

	function SetButtonStateByImage(btn_id, img_src)
	{
	// set state depending on image name
	var btn = document.getElementById(btn_id);
	if(btn)
	{
	if( !HasParam(img_src) ) img_src = btn.getAttribute('src');
	var img_name = img_src.split('/');
	img_name = img_name.length ? img_name[img_name.length - 1] : img_name;
	img_name = img_name.split('.');
	img_name = img_name[0].split('_');
	img_name = img_name.length ? img_name[img_name.length - 1] : img_name;
	if(img_name)
	{
	switch(img_name)
	{
	case 'f2': btn.setAttribute('ButtonState','over'); break;
	case 'f3': btn.setAttribute('ButtonState','disabled'); break;
	default: btn.setAttribute('ButtonState','enabled'); break;
	}
	}
	}
	}


	function swap(imgid, src, module_name){
	// swaps toobar icons from kernel
	// admin or from module specified

	var ob = document.getElementById(imgid);
	if(ob)
	{
	SetButtonStateByImage(imgid, src);
	var s = src;
	s = s.slice(0,4);
	if(s=='http')
	{
	ob.src = src;
	}
	else
	{
	if(module_name == null)
	ob.src = '$adminURL' + '/images/' + src;
	else
	{
	ob.src = '$rootURL' + module_name + '/$admin/images/' + src;
	}
	}
	}
	}

	function flip(val)
	{
	if (val == 0)
	return 1;
	else
	return 0;
	}

	function config_val(field, val2,url){
	//alert('Setting ' + field + ' to ' + val2);
	if(url)
	document.viewmenu.action=url;
	document.viewmenu.Action.value = "m_SetVariable";
	document.viewmenu.fieldname.value = field;
	document.viewmenu.varvalue.value = val2;
	document.viewmenu.submit();
	}

	function session_val(field, val2){
	//alert('Setting ' + field + ' to ' + val2);
	document.viewmenu.Action.value = "m_SetSessionVariable";
	document.viewmenu.fieldname.value = field;
	document.viewmenu.varvalue.value = val2;
	document.viewmenu.submit();
	}

	function Submit_ListSearch(action)
	{
	f = document.getElementById('ListSearchForm');
	s = document.getElementById('ListSearchWord');
	if(f)
	{
	f.Action.value = action;
	f.list_search.value = s.value;
	f.submit();
	}
	}

	function ValidTime(time_str)
	{
	var valid = true;

	if( trim(time_str) == '' ) return true; // is valid in case if not entered
	time_str = time_str.toUpperCase();
	parts = time_str.split(/\s[: ]\s/);
	hour = parseInt(parts[0]);
	minute = parseInt(parts[1]);
	sec = parseInt(parts[2]);
	if(ampm == true)
	{
	amstr = parts[3];
	var am_valid = (amstr == 'AM' \|\| amstr == 'PM');
	if(am_valid && hour > 12) valid = false;
	if(amstr == 'PM' && hour <= 12) hour = hour + 12;
	if(hour == 24) hour = 0;
	if(!am_valid) valid = false;
	}
	valid = valid && (hour > -1 && hour < 24);
	valid = valid && (minute > -1 && minute < 60);
	valid = valid && (sec > -1 && sec < 60);
	return valid;
	}

	function ValidCustomName(name_str)
	{
	if (trim(name_str) == '') return false;
	var re = new RegExp('^[a-zA-Z0-9_]{1,}$');
	if (name_str.match(re)) {
	return true;
	}
	else {
	return false;
	}
	}

	+function ValidThemeName(name_str)
	+{
	+ if (trim(name_str) == '') return false;
	+ var re = new RegExp('^[a-zA-Z0-9_ ]{1,}$');
	+ if (name_str.match(re)) {
	+ return true;
	+ }
	+ else {
	+ return false;
	+ }
	+}
	+
	function DaysInMonth(month,year)
	{
	timeA = new Date(year, month,1);
	timeDifference = timeA - 86400000;
	timeB = new Date(timeDifference);
	return timeB.getDate();
	}

	function ValidDate(date_str)
	{
	var valid = true;

	if( trim(date_str) == '' ) return true; // is valid in case if not entered
	parts = date_str.split(/\s\D\s/);

	year = parts[yearpos-1];
	month = parts[monthpos-1];
	day = parts[daypos-1];

	valid = (year>0);
	valid = valid && ((month>0) && (month<13));
	valid = valid && (day<DaysInMonth(month,year)+1);
	return valid;
	}

	function trim(str)
	{
	return str.replace(/(^\s)\|(\s$)/g,'');
	}

	function ValidateNumber(aValue, aNumberType)
	{
	var valid = true;
	if( trim(aValue) == '' ) return true;
	return (parseInt(aValue) == aValue);
	}

	function OpenEditor(extra_env,TargetForm,TargetField)
	{
	var url = '$editor_url';

	url = url+'&TargetForm='+TargetForm+'&TargetField='+TargetField+'&destform=popup';
	if(extra_env.length>0)
	url = url+extra_env;

	window.open(url,"html_edit","width=800,height=575,status=yes,resizable=yes,menubar=no,scrollbars=yes,toolbar=no");
	}

	function BitStatus(Value,bit)
	{
	var val = Math.pow(2,bit);
	if((Value & val))
	{
	return 1;
	}
	else
	return 0;
	}

	function FlipBit(ValueName,Value,bit)
	{
	var val = Math.pow(2,bit);
	//alert("Setting bit "+bit);
	if(BitStatus(Value,bit))
	{
	Value = Value - val;
	}
	else
	Value = Value + val;
	session_val(ValueName,Value);
	}

	function PerPageSelected(Value,PageCount)
	{
	if(Value==PageCount)
	{
	return 2;
	}
	else
	return 0;
	}

	function RadioIsSelected(Value1,Value2)
	{
	if(Value1 == Value2)
	{
	return 2;
	}
	else
	return 0;
	}

	function OpenItemSelector(envstr)
	{
	//alert(envstr);
	window.open('$item_select?'+envstr,"groupselect","width=750,height=400,status=yes,resizable=yes,menubar=no,scrollbars=yes,toolbar=no");
	}

	function OpenUserSelector(CheckIdField,Checks,envstr)
	{
	if(Checks) var retval = Checks.getItemList();
	f = document.getElementById('userpopup');
	if(f)
	{
	if(CheckIdField)
	f.elements[CheckIdField].value = retval;
	}
	SessionPrepare('$user_select', envstr, 'userselect');
	}


	function SessionPrepare(url, get_str, window_name)
	{
	var params = ExtractParams(get_str);

	if(params['destform'])
	{
	if(params['destform'] == 'popup')
	{
	CreatePopup(window_name, url + '?' + get_str);
	return true;
	}
	else
	var frm = CreateFakeForm();
	}
	else
	var frm = CreateFakeForm();

	if(!frm) return false;
	frm.destform.value = params['destform'];
	params['destform'] = 'popup';
	get_str = MergeParams(params);
	CreatePopup(window_name);
	frm.target = window_name;
	frm.method = 'POST';
	frm.action = url + '?' + get_str;
	frm.submit();
	}

	function addField(form, type, name, value)
	{
	// create field in form
	var field = document.createElement("INPUT");
	field.type = type;
	field.name = name;
	field.id = name;
	field.value = value;
	form.insertBefore(field, form.nextSibling);
	}

	function CreateFakeForm()
	{
	if($submit_done == 0)
	{
	var theBody = document.getElementsByTagName("BODY");
	if(theBody.length == 1)
	{
	var frm = document.createElement("FORM");
	frm.name = "fake_form";
	frm.id = "fake_form";
	frm.method = "post";

	theBody[0].insertBefore(frm, theBody[0].nextSibling);
	addField(frm, 'hidden', 'submit_done', 1);
	addField(frm, 'hidden', 'destform', '');
	return document.getElementById('fake_form');
	}
	}
	return false;
	}

	function CreatePopup(window_name, url, width, height)
	{
	// creates a popup window & returns it
	if(url == null && typeof(url) == 'undefined' ) url = '';
	if(width == null && typeof(width) == 'undefined' ) width = 750;
	if(height == null && typeof(height) == 'undefined' ) height = 400;


	return window.open(url,window_name,'width='+width+',height='+height+',status=yes,resizable=yes,menubar=no,scrollbars=yes,toolbar=no');
	}

	function ShowHelp(section)
	{
	var frm = document.getElementById('help_form');
	frm.section.value = section;
	frm.method = 'POST';
	CreatePopup('HelpPopup','$rootURL$admin/help/blank.html'); // , null, 600
	frm.target = 'HelpPopup';
	frm.submit();
	}

	function ExtractParams(get_str)
	{
	// extract params into associative array
	var params = get_str.split('&');
	var result = Array();
	var temp_var;
	var i = 0;
	var params_count = params.length;
	while(i < params_count)
	{
	temp_var = params[i].split('=');
	result[temp_var[0]] = temp_var[1];
	i++;
	}
	return result;
	}

	function MergeParams(params)
	{
	// join splitted params into GET string
	var key;
	var result = '';
	for(key in params)
	result += key + '=' + params[key] + '&';
	if(result.length) result = result.substring(0, result.length - 1);
	return result;
	}

	function show_props(obj, objName)
	{
	var result = "";
	for (var i in obj) {
	result += objName + "." + i + " = " + obj[i] + "\\n";
	}
	return result;
	}

	function OpenGroupSelector(envstr)
	{
	//alert(envstr);
	SessionPrepare('$group_select', envstr, 'groupselect');
	//window.open('$group_select?'+envstr,"groupselect","width=750,height=400,status=yes,resizable=yes,menubar=no,scrollbars=yes,toolbar=no");
	}

	function OpenCatSelector(envstr)
	{
	//alert(envstr);
	window.open('$cat_select?'+envstr,"catselect","width=750,height=400,status=yes,resizable=yes,menubar=no,scrollbars=yes,toolbar=no");
	}

	function openEmailPopup(envar,form,Checks)
	{
	var email_url='$email_url';
	var url = email_url+envar;

	if(Checks.itemChecked())
	{
	f = document.getElementById(form);
	if(f)
	{
	window.open('',"sendmail","width=750,height=400,status=yes,resizable=yes,menubar=no,scrollbars=yes,toolbar=no");
	f.idlist.value = Checks.getItemList();
	f.submit();
	}
	}
	}

	function OpenPhraseEditor(extra_env)
	{
	//SessionPrepare('$phrase_edit', extra_env, 'phrase_edit');

	var url = '$phrase_edit'+extra_env+'&destform=popup';
	window.open(url,"phrase_edit","width=750,height=400,status=yes,resizable=yes,menubar=no,scrollbars=yes,toolbar=no");
	}

	var env = '$env2';
	var SubmitFunc = false;

	</script>

	END;
	?>

	Property changes on: trunk/admin/include/mainscript.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.8
	\ No newline at end of property
	+1.9
	\ No newline at end of property
	Index: trunk/admin/include/tabs.js
	===================================================================
	--- trunk/admin/include/tabs.js (revision 1015)
	+++ trunk/admin/include/tabs.js (revision 1016)
	@@ -1,275 +1,278 @@
	//parses input tags looking for validation attributes

	function DataIsValid(f)
	{
	var ValType = '';
	var span_id = '';
	var form_result = true;
	var field_result = true;
	var j = 0;

	for (var i = 0; i < f.elements.length; i++)
	{
	ValType = '';
	Field = f.elements[i];
	ValType = Field.getAttribute('ValidationType');
	if(ValType)
	{
	ValType = TransformValidationType(ValType); // for capability with old forms
	span_id = 'prompt_' + Field.name;
	span = document.getElementById(span_id);
	if(span)
	{
	field_result = true;
	ValType = ValType.split(',');

	j = 0;
	while(j < ValType.length)
	{
	//alert('Validating ['+Field.name+'] as ['+ValType[j]+']');
	if(ValType[j] == 'password')
	{
	var repasswd = document.getElementById(Field.name + '_verify');
	if(repasswd)
	{
	field_result &= ValidateField(Field.value, ValType[j], repasswd.value);
	document.getElementById('prompt_' + Field.name + '_verify').className = field_result ? 'text' : 'validation_error';
	}
	}
	else
	field_result &= ValidateField(Field.value, ValType[j]);
	j++;
	}
	span.className = field_result ? 'text' : 'validation_error';
	form_result &= field_result;
	}
	}
	}
	return form_result;
	}

	function TransformValidationType(OldType)
	{
	// replace old validation types with new
	// on the fly in case if we have some forms
	// that still use old validation types

	var NewType = '';
	switch(OldType)
	{
	case 'optional_date':
	NewType = 'date';
	break;
	default:
	NewType = OldType;
	break;
	}
	return NewType;
	}

	function ValidateField(FieldValue, ValidateAs, RePasswdValue)
	{
	// validate FieldValue based on ValidateAs rule specified;
	// in case if password field compare it with RePasswdValue
	var result = true;
	switch(ValidateAs)
	{
	case 'exists': // field is required
	if(FieldValue.length == 0) result = false;
	break;

	case 'integer': // field must be integer number
	result = ValidateNumber(FieldValue, ValidateAs);
	break;

	case 'password': // validate as password field
	result = (FieldValue == RePasswdValue) \|\| (FieldValue.length == 0);
	break;

	case 'date': // text must be a formatted date
	result = ValidDate(FieldValue);
	break;

	case 'time': // text must be a formatted time
	result = ValidTime(FieldValue);
	break;
	case 'custom_name':
	result = ValidCustomName(FieldValue);
	break;
	+ case 'theme_name':
	+ result = ValidThemeName(FieldValue);
	+ break;
	}
	return result;
	}

	function MarkAsRequired(f)
	{
	var ValType = '';
	var span_id = '';
	var result = true;

	for (var i = 0; i < f.elements.length; i++)
	{
	ValType = '';
	Field = f.elements[i];
	ValType = Field.getAttribute('ValidationType');
	if(ValType)
	{
	ValType = ValType.split(',');
	if( InArray(ValType,'exists') !== false )
	{
	span_id = 'prompt_' + Field.name;
	span = document.getElementById(span_id);
	span.innerHTML = span.innerHTML + '<span class="error">*</span>';
	}
	}
	}
	}

	function InArray(aArray, aValue)
	{
	// checks if element in array
	var k = 0;
	while(k < aArray.length)
	{
	if(aArray[k] == aValue) return k;
	k++;
	}
	return false;
	}

	//Used to submit the form when a tab is clicked on
	function edit_submit(formname, status_field, targetURL, save_value, env_str, new_target)
	{
	var full_env = env;
	if( HasParam(env_str) ) full_env += env_str;

	if(full_env.substr(0,3) != "env") full_env = 'env=' + full_env;
	f = document.getElementById(formname);

	if(f)
	{
	var valid = false;
	if(save_value != 2 && save_value !=-1)
	{
	valid = DataIsValid(f);
	}
	else
	{
	var a = f.Action;
	if(a)
	{
	a.value='';
	}
	}
	if(valid \|\| save_value==2 \|\| save_value==-1)
	{
	var URLPrefix = '';
	if( targetURL.substring(0, rootURL.length) != rootURL ) URLPrefix = rootURL;

	f.action = URLPrefix + targetURL + '?' + full_env;
	if(status_field.length > 0)
	{
	f.elements[status_field].value = save_value; //0= stay in temp, 1=save to perm, 2 = purge no save
	}

	if(new_target != null && typeof(new_target) != 'undefined') f.target = new_target;
	f.submit();
	}
	else
	if(!valid) alert(ErrorMsg);
	}
	else
	alert('Form '+formname+' was not found.');
	}

	//Used when the save or cancel buttin is hit
	function do_edit_save(formname, status_field, targetURL, save_value, env_str)
	{
	var full_env = env;
	if( HasParam(env_str) ) full_env += env_str;
	if(full_env.substr(0,3)!="env")
	full_env = 'env='+full_env;

	f = document.getElementById(formname);
	if(f)
	{
	f.action = rootURL + targetURL + '?' + full_env;
	//alert(f.action);
	if(status_field.length>0)
	{
	f.elements[status_field].value = save_value; //0= stay in temp, 1=save to perm, 2 = purge no save
	}
	f.submit();
	}
	else
	alert('Form '+formname+' was not found.');
	}

	function jump_to_url(targetURL, env_str)
	{
	var full_env = env;
	if( HasParam(env_str) ) full_env += env_str;

	if(full_env.substr(0,3)!="env")
	full_env = 'env='+full_env;

	document.location = rootURL + targetURL + '?' + full_env;
	}
	// -------------------------------------------------------------------------------------------------------------
	function submit_form(formname, status_field, targetURL, save_value, env_str)
	{
	// by Alex, submits form.

	var full_env = env;
	if( HasParam(env_str) ) full_env += env_str;
	if(full_env.substr(0,3)!="env")
	full_env = 'env='+full_env;


	f = document.getElementById(formname);

	if(f)
	{
	var valid = false;
	if(save_value != 2 && save_value !=-1)
	{
	valid = DataIsValid(f);
	}
	else
	{
	var a = f.Action;
	if(a)
	{
	a.value='';
	}
	}
	if(valid \|\| save_value==2 \|\| save_value==-1)
	{
	f.action = rootURL + targetURL + '?' + full_env;
	if(status_field.length>0)
	{
	f.elements[status_field].value = save_value; //0= stay in temp, 1=save to perm, 2 = purge no save
	}

	f.submit();
	}
	else
	if(!valid)
	alert(ErrorMsg);

	}
	else
	alert('Form '+formname+' was not found.');
	}

	function HasParam(param)
	{
	// checks of parameter is passed to function (cross-browser)
	return typeof(param) == 'undefined' ? false : true;
	}

	function SetBackground(element_id, img_url)
	{
	// set background image of element specified by id
	var el = document.getElementById(element_id);
	el.style.backgroundImage = 'url('+img_url+')';
	}
	\ No newline at end of file

	Property changes on: trunk/admin/include/tabs.js
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.9
	\ No newline at end of property
	+1.10
	\ No newline at end of property
	Index: trunk/admin/config/addtheme.php
	===================================================================
	--- trunk/admin/config/addtheme.php (revision 1015)
	+++ trunk/admin/config/addtheme.php (revision 1016)
	@@ -1,255 +1,255 @@
	<?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;
	}
	//echo $pathtoroot;
	//print_r($_GET);
	//print_r($_POST);
	require_once($pathtoroot."kernel/startup.php");
	//admin only util

	/* set the destination of the image upload, relative to the root path */
	$DestDir = "kernel/images/";

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

	$browseURL = $adminURL."/browse";

	$pathtolocal = $pathtoroot."kernel/";
	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 clsThemeList();
	$objEditItems->SourceTable = $objSession->GetEditTable("Theme");
	$objEditItems->EnablePaging = FALSE;

	if ($_GET["new"] == 1)
	{
	$c = new clsTheme(NULL);
	$en = 0;
	$action = "m_theme_add";
	$name = prompt_language("la_Text_NewTheme");
	$objThemes->CreateEmptyEditTable("ThemeId");
	}
	else
	{
	$en = (int)$_GET["en"];
	if (isset($_POST["itemlist"]))
	{
	$objThemes->CopyToEditTable("ThemeId",$_POST["itemlist"]);
	}
	$objEditItems->Query_Item("SELECT * FROM ".$objEditItems->SourceTable);
	$itemcount=$objEditItems->NumItems();

	$c = $objEditItems->GetItemByIndex($en);

	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_theme_edit";
	$name = $c->Get("Name");
	}

	$section = "in-portal:theme_general";

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

	$title = GetTitle("la_Text_Theme", "la_tab_General", $c->Get('ThemeId'), $c->Get('Name'));//prompt_language("la_Text_Editing")." ".prompt_language("la_Text_Theme")." -'".$name."'";

	//Display header
	$sec = $objSections->GetSection($section);
	$objCatToolBar = new clsToolBar();
	$objCatToolBar->Add("img_save", "la_Save","#","swap('img_save','toolbar/tool_select_f2.gif');", "swap('img_save', 'toolbar/tool_select.gif');","edit_submit('theme','ThemeEditStatus','".$admin."/config/config_theme.php',1);","/toolbar/tool_select.gif");
	$objCatToolBar->Add("img_cancel", "la_Cancel","#","swap('img_cancel','toolbar/tool_cancel_f2.gif');", "swap('img_cancel', 'toolbar/tool_cancel.gif');","edit_submit('theme','ThemeEditStatus','".$admin."/config/config_theme.php',2);",$imagesURL."/toolbar/tool_cancel.gif");

	if ( isset($en_prev) \|\| isset($en_next) )
	{
	$url = $RootUrl.$admin."/config/addtheme.php";
	$StatusField = "ThemeEditStatus";
	$form = "theme";
	MultiEditButtons($objCatToolBar,$en_next,$en_prev,$form,$StatusField,$url,$sec->Get("OnClick"));
	$objCatToolBar->Add("divider");
	}

	int_header($objCatToolBar,NULL,$title);
	$c->Data=inp_htmlize($c->Data);

	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 } ?>
	<FORM enctype="multipart/form-data" ID="theme" NAME="theme" method="POST" ACTION="">
	<TABLE cellSpacing="0" cellPadding="2" width="100%" class="tableborder">
	<?php int_subsection_title(prompt_language("la_tab_General")); ?>

	<TR <?php int_table_color(); ?> >
	<TD><?php echo prompt_language("la_prompt_ThemeId"); ?></TD>
	<TD><?php echo $c->Get("ThemeId"); ?></TD>
	<TD></TD>
	</TR>

	<TR <?php int_table_color(); ?> >
	<TD><SPAN id="prompt_name" CLASS="text"><?php echo prompt_language("la_prompt_Name"); ?></SPAN></TD>
	- <TD><input type=text ValidationType="exists" NAME="name" VALUE="<?php echo $c->Get("Name"); ?>"></TD>
	+ <TD><input type=text ValidationType="theme_name" NAME="name" VALUE="<?php echo $c->Get("Name"); ?>" maxlength="16"></TD>
	<TD></TD>
	</TR>

	<TR <?php int_table_color(); ?> >
	<TD><SPAN id="prompt_description"><?php echo prompt_language("la_prompt_Description"); ?></SPAN></TD>
	<TD><input type=text NAME="description" VALUE="<?php echo $c->Get("Description"); ?>"></TD>
	<TD></TD>
	</TR>

	<tr <?php int_table_color(); ?>>
	<td valign="top" class="text"><?php echo prompt_language("la_prompt_Enabled"); ?></td>
	<td>
	<input type="checkbox" name="enabled" class="text" value="1" <?php if($c->Get("Enabled") == 1) echo "checked"; ?>>
	</td>
	<td class="text"> </td>
	</tr>

	<tr <?php int_table_color(); ?>>
	<td valign="top" class="text"><?php echo prompt_language("la_prompt_lang_cache_timeout"); ?></td>
	<td>
	<input type=text NAME="CacheTimeout" VALUE="<?php echo $c->Get("CacheTimeout"); ?>">
	</td>
	<td class="text"> </td>
	</tr>


	<tr <?php int_table_color(); ?>>
	<td valign="top" class="text"><?php echo prompt_language("la_prompt_Primary"); ?></td>
	<td>
	- <input type="checkbox" name="primary" class="text" value="1" <?php if($c->Get("PrimaryTheme") == 1) echo "checked"; ?>>
	+ <input type="checkbox" name="primary" class="text" value="1" <?php if($c->Get("PrimaryTheme") == 1) echo "checked disabled"; ?>>
	</td>
	<td class="text"> </td>
	<input type=hidden NAME="Action" VALUE="<?php echo $action; ?>">
	<INPUT TYPE="hidden" NAME="ThemeId" VALUE="<?php echo $c->Get("ThemeId"); ?>">
	<input TYPE="HIDDEN" NAME="DataType" VALUE="<?php echo $DataType; ?>">
	<input type="hidden" name="ThemeEditStatus" VALUE="0">
	</FORM>
	</tr>
	<FORM>
	<TR <?php int_table_color(); ?> >
	<td colspan="3">

	</td>
	</tr>
	</FORM>
	</TABLE>

	<!-- 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/config/addtheme.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.5
	\ No newline at end of property
	+1.6
	\ No newline at end of property
	Index: trunk/globals.php
	===================================================================
	--- trunk/globals.php (revision 1015)
	+++ trunk/globals.php (revision 1016)
	@@ -1,1639 +1,1642 @@
	<?php

	$vars = parse_portal_ini($pathtoroot."config.php");

	while($key = key($vars))
	{
	$key = "g_".$key;
	global $$key;
	$$key = current($vars); //variable variables
	next($vars);
	}

	/list the tables which contain item data /
	$ItemTables = array();

	$KeywordIgnore = array();
	global $debuglevel;

	$debuglevel = 0;
	//$GLOBALS['debuglevel'] = 0;

	/New, Hot, Pop field values /
	define('NEVER', 0);
	define('ALWAYS', 1);
	define('AUTO', 2);

	/Status Values /
	define('STATUS_DISABLED', 0);
	define('STATUS_ACTIVE', 1);
	define('STATUS_PENDING', 2);

	$LogLevel=0;
	$LogFile = NULL;


	function parse_portal_ini($file, $parse_section = false) {
	if(!file_exists($file) && !is_readable($file))
	die('Could Not Open Ini File');

	$contents = file($file);

	$retval = array();

	$section = '';
	$ln = 1;
	$resave = false;
	foreach($contents as $line) {
	if ($ln == 1 && $line != '<'.'?'.'php die() ?'.">\n") {
	$resave = true;
	}
	$ln++;
	$line = trim($line);
	$line = eregi_replace(';[.]*','',$line);
	if(strlen($line) > 0) {
	//echo $line . " - ";
	if(eregi('^[[a-z]+]$',str_replace(' ', '', $line))) {
	//echo 'section';
	$section = substr($line,1,(strlen($line)-2));
	if ($parse_section) {
	$retval[$section] = array();
	}
	continue;
	} elseif(eregi('=',$line)) {
	//echo 'main element';
	list($key,$val) = explode(' = ',$line);
	if (!$parse_section) {
	$retval[trim($key)] = str_replace('"', '', $val);
	}
	else {
	$retval[$section][trim($key)] = str_replace('"', '', $val);
	}
	} //end if
	//echo '<br />';
	} //end if
	} //end foreach
	if ($resave) {
	$fp = fopen($file, "w");
	reset($contents);
	fwrite($fp,'<'.'?'.'php die() ?'.">\n\n");
	foreach($contents as $line) fwrite($fp,"$line");
	fclose($fp);
	}

	return $retval;
	}

	/**
	* @return object
	* @desc Returns reference to database connection
	*/
	function &GetADODBConnection()
	{
	static $DB = null;

	global $g_DBType, $g_DBHost, $g_DBUser, $g_DBUserPassword, $g_DBName, $g_DebugMode;
	global $ADODB_FETCH_MODE, $ADODB_COUNTRECS, $ADODB_CACHE_DIR, $pathtoroot;

	if( !isset($DB) && strlen($g_DBType) > 0 )
	{
	$DB = ADONewConnection($g_DBType);
	$connected = $DB->Connect($g_DBHost, $g_DBUser, $g_DBUserPassword, $g_DBName);
	if(!$connected) die("Error connecting to database $g_DBHost <br>\n");

	$ADODB_CACHE_DIR = $pathtoroot."cache";
	$ADODB_FETCH_MODE = 2;
	$ADODB_COUNTRECS = false;
	$DB->debug = defined('ADODB_OUTP') ? 1 : 0;
	$DB->cacheSecs = 3600;
	$DB->Execute('SET SQL_BIG_SELECTS = 1');
	}
	elseif( !strlen($g_DBType) )
	{
	global $rootURL;
	echo 'In-Portal is probably not installed, or configuration file is missing.<br>';
	echo 'Please use the installation script to fix the problem.<br><br>';
	if ( !preg_match('/admin/', __FILE__) ) $ins = 'admin/';

	echo '<a href="'.$rootURL.$ins.'install.php">Go to installation script</a><br><br>';
	flush();
	exit;
	}
	return $DB;
	}

	function GetNextResourceId($Increment=1)
	{
	$adodbConnection = &GetADODBConnection();
	$sql = "LOCK TABLES ".GetTablePrefix()."IdGenerator WRITE";
	$adodbConnection->Execute($sql);
	$sql = "UPDATE ".GetTablePrefix()."IdGenerator SET lastid=lastid+".$Increment;
	$adodbConnection->Execute($sql);
	$rs = $adodbConnection->Execute("SELECT lastid FROM ".GetTablePrefix()."IdGenerator");
	$val = $rs->fields["lastid"];
	if(!$rs \|\| $rs->EOF)
	{
	echo $adodbConnection->ErrorMsg();
	$sql = "INSERT INTO ".GetTablePrefix()."IdGenerator (lastid) VALUES ($Increment)";
	$adodbConnection->Execute($sql);
	$val = 1;
	}
	$sql = "UNLOCK TABLES";
	$adodbConnection->Execute($sql);
	$val = $val-($Increment-1);
	return $val;
	}

	function AddSlash($s)
	{
	if(substr($s,-1) != "/")
	{
	return $s."/";
	}
	else
	return $s;
	}

	function StripNewline($s)
	{
	$bfound = false;
	while (strlen($s)>0 && !$bfound)
	{
	if(ord(substr($s,-1))<32)
	{
	$s = substr($s,0,-1);
	}
	else
	$bfound = true;
	}
	return $s;
	}

	function DeleteElement($array, $indice)
	{
	for($i=$indice;$i<count($array)-1;$i++)
	$array[$i] = $array[$i+1];
	unset($array[count($array)-1]);
	return $array;
	}

	function DeleteElementValue($needle, &$haystack)
	{
	while(($gotcha = array_search($needle,$haystack)) > -1)
	unset($haystack[$gotcha]);
	}

	function TableCount($TableName, $where="",$JoinCats=1)
	{
	$db = &GetADODBConnection();
	if(!$JoinCats)
	{
	$sql = "SELECT count(*) as TableCount FROM $TableName";
	}
	else
	$sql = "SELECT count(*) as TableCount FROM $TableName INNER JOIN ".GetTablePrefix()."CategoryItems ON ".GetTablePrefix()."CategoryItems.ItemResourceId=$TableName.ResourceId";
	if(strlen($where)>0)
	$sql .= " WHERE ".$where;

	$rs = $db->Execute($sql);

	// echo "SQL TABLE COUNT: ".$sql."<br>\n";

	$res = $rs->fields["TableCount"];
	return $res;
	}

	Function QueryCount($sql)
	{
	$sql = preg_replace('/SELECT(.)FROM[ \n\r](.)/is','SELECT COUNT(*) AS TableCount FROM $2', $sql);
	$sql = preg_replace('/(.)LIMIT(.)/is','$1', $sql);
	$sql = preg_replace('/(.)ORDER BY(.)/is','$1', $sql);

	//echo $sql;

	$db =& GetADODBConnection();
	return $db->GetOne($sql);
	}

	function GetPageCount($ItemsPerPage,$NumItems)
	{
	if($ItemsPerPage==0 \|\| $NumItems==0)
	{
	return 1;
	}
	$value = $NumItems/$ItemsPerPage;
	return ceil($value);
	}


	/**
	* @return string
	* @desc Returns database table prefix entered while installation
	*/
	function GetTablePrefix()
	{
	global $g_TablePrefix;

	return $g_TablePrefix;
	}

	function TableHasPrefix($t)
	{
	$pre = GetTablePrefix();

	if(strlen($pre)>0)
	{
	if(substr($t,0,strlen($pre))==$pre)
	{
	return TRUE;
	}
	else
	return FALSE;
	}
	else
	return TRUE;
	}

	function AddTablePrefix($t)
	{
	if(!TableHasPrefix($t))
	$t = GetTablePrefix().$t;

	return $t;
	}

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

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

	return $d;
	}

	function GetIndexUrl($secure=0)
	{
	global $indexURL, $rootURL, $secureURL;

	switch($secure)
	{
	case 0:
	$ret = $indexURL;
	break;

	case 1:
	$ret = $secureURL."index.php";
	break;

	case 2:
	$ret = $rootURL."index.php";
	break;

	default:
	$ret = $i;
	break;
	}
	return $ret;
	}

	function GetLimitSQL($Page,$PerPage)
	{
	if($Page<1)
	$Page=1;

	if(is_numeric($PerPage))
	{
	if($PerPage==0)
	$PerPage = 20;
	$Start = ($Page-1)*$PerPage;
	$limit = "LIMIT ".$Start.",".$PerPage;
	}
	else
	$limit = NULL;
	return $limit;
	}

	function filelist ($currentdir, $startdir=NULL,$ext=NULL)
	{
	global $pathchar;

	//chdir ($currentdir);

	// remember where we started from
	if (!$startdir)
	{
	$startdir = $currentdir;
	}

	$d = @opendir($currentdir);

	$files = array();
	if(!$d)
	return $files;
	//list the files in the dir
	while (false !== ($file = readdir($d)))
	{
	if ($file != ".." && $file != ".")
	{
	if (is_dir($currentdir."/".$file))
	{
	// If $file is a directory take a look inside
	$a = filelist ($currentdir."/".$file, $startdir,$ext);
	if(is_array($a))
	$files = array_merge($files,$a);
	}
	else
	{
	if($ext!=NULL)
	{
	$extstr = stristr($file,".".$ext);
	if(strlen($extstr))
	$files[] = $currentdir."/".$file;
	}
	else
	$files[] = $currentdir.'/'.$file;
	}
	}
	}

	closedir ($d);

	return $files;
	}

	function DecimalToBin($dec,$WordLength=8)
	{
	$bits = array();

	$str = str_pad(decbin($dec),$WordLength,"0",STR_PAD_LEFT);
	for($i=$WordLength;$i>0;$i--)
	{
	$bits[$i-1] = (int)substr($str,$i-1,1);
	}
	return $bits;
	}
	/*
	function inp_escape($in, $html_enable=0)
	{
	$out = stripslashes($in);
	$out = str_replace("\n", "\n^br^", $out);
	if($html_enable==0)
	{
	$out=ereg_replace("<","<",$out);
	$out=ereg_replace(">",">",$out);
	$out=ereg_replace("\"",""",$out);
	$out = str_replace("\n^br^", "\n<br />", $out);
	}
	else
	$out = str_replace("\n^br^", "\n", $out);
	$out=addslashes($out);

	return $out;
	}
	*/
	function inp_escape($var,$html=0)
	{
	if($html)return $var;
	if(is_array($var))
	foreach($var as $k=>$v)
	$var[$k]=inp_escape($v);
	else
	// $var=htmlspecialchars($var,ENT_NOQUOTES);
	$var=strtr($var,Array('<'=>'<','>'=>'>',));
	return $var;
	}
	function inp_striptags($var,$html=0)
	{
	if($html)return $var;
	if(is_array($var))
	foreach($var as $k=>$v)
	$var[$k]=inp_striptags($v);
	else
	$var=strip_tags($var);
	return $var;
	}

	function inp_unescape($in)
	{
	return $in;
	$out=stripslashes($in);

	return $out;
	}

	function inp_textarea_unescape($in)
	{
	return $in;
	$out=stripslashes($in);
	$out = str_replace("\n<br />", "\n", $out);
	return $out;
	}

	function HighlightKeywords($Keywords, $html, $OpenTag="", $CloseTag="")
	{
	global $objConfig;

	if(!strlen($OpenTag))
	$OpenTag = "<B>";
	if(!strlen($CloseTag))
	$CloseTag = "</B>";

	$r = preg_split('((>)\|(<))', $html, -1, PREG_SPLIT_DELIM_CAPTURE);

	foreach ($Keywords as $k) {
	for ($i = 0; $i < count($r); $i++) {
	if ($r[$i] == "<") {
	$i++; continue;
	}
	$r[$i] = preg_replace("/($k)/i", "$OpenTag\\1$CloseTag", $r[$i]);
	}
	}
	return join("", $r);
	}

	/*
	function HighlightKeywords($Keywords,$html, $OpenTag="", $CloseTag="")
	{
	global $objConfig;

	if(!strlen($OpenTag))
	$OpenTag = "<B>";
	if(!strlen($CloseTag))
	$CloseTag = "</B>";
	$ret = strip_tags($html);

	foreach ($Keywords as $k)
	{
	if(strlen($k))
	{
	//$html = str_replace("<$k>", ":#:", $html);
	//$html = str_replace("</$k>", ":##:", $html);
	//$html = strip_tags($html);
	if ($html = preg_replace("/($k)/Ui","$OpenTag\\1$CloseTag", $html))
	//if ($html = preg_replace("/(>[^<])($k)([^<]< )/Ui","$OpenTag\\1$CloseTag", $html))
	$ret = $html;
	//$ret = str_replace(":#:", "<$k>", $ret);
	//$ret = str_replace(":##:", "</$k>", $ret);
	}
	}
	return $ret;
	}
	*/
	function ExtractDatePart($part,$datestamp)
	{
	switch($part)
	{
	case "month":
	if($datestamp<=0)
	{
	$ret = "";
	}
	else
	$ret = adodb_date("m",$datestamp);
	break;
	case "day":
	if($datestamp<=0)
	{
	$ret = "";
	}
	else
	$ret = adodb_date("d", $datestamp);
	break;
	case "year":
	if($datestamp<=0)
	{
	$ret = "";
	}
	else
	$ret = adodb_date("Y", $datestamp);
	break;
	case "time_24hr":
	if($datestamp<=0)
	{
	$ret = "";
	}
	else
	$ret = adodb_date("H:i", $datestamp);
	break;
	case "time_12hr":
	if($datestamp<=0)
	{
	$ret = "";
	}
	else
	$ret = adodb_date("g:i a",$datestamp);
	break;
	default:
	$ret = adodb_date($part, $datestamp);
	break;
	}
	return $ret;
	}

	function GetLocalTime($TimeStamp,$TargetZone=NULL)
	{
	if($TargetZone==NULL)
	$TargetZone = $objConfig->Get("Config_Site_Time");
	$server = $objConfig->Get("Config_Server_Time");
	if($TargetZone!=$server)
	{
	$offset = ($server - $TargetZone) * -1;
	$TimeStamp = $TimeStamp + (3600 * $offset);
	}
	return $TimeStamp;
	}

	function _unhtmlentities ($string)
	{
	$trans_tbl = get_html_translation_table (HTML_ENTITIES);
	$trans_tbl = array_flip ($trans_tbl);
	return strtr ($string, $trans_tbl);
	}

	function getLastStr($hay, $need){
	$getLastStr = 0;
	$pos = strpos($hay, $need);
	if (is_int ($pos)){ //this is to decide whether it is "false" or "0"
	while($pos) {
	$getLastStr = $getLastStr + $pos + strlen($need);
	$hay = substr ($hay , $pos + strlen($need));
	$pos = strpos($hay, $need);
	}
	return $getLastStr - strlen($need);
	} else {
	return -1; //if $need wasn´t found it returns "-1" , because it could return "0" if it´s found on position "0".
	}
	}

	// --- bbcode processing function: begin ----
	function PreformatBBCodes($text)
	{
	// convert phpbb url bbcode to valid in-bulletin's format
	// 1. urls
	$text = preg_replace('/\[url=(.)\](.)\[\/url\]/Ui','[url href="$1"]$2[/url]',$text);
	$text = preg_replace('/\[url\](.*)\[\/url\]/Ui','[url href="$1"]$1[/url]',$text);
	// 2. images
	$text = preg_replace('/\[img\](.*)\[\/img\]/Ui','[img src="$1" border="0"][/img]',$text);
	// 3. color
	$text = preg_replace('/\[color=(.)\](.)\[\/color\]/Ui','[font color="$1"]$2[/font]',$text);
	// 4. size
	$text = preg_replace('/\[size=(.)\](.)\[\/size\]/Ui','[font size="$1"]$2[/font]',$text);
	// 5. lists
	$text = preg_replace('/\[list(.)\](.)\[\/list\]/Uis','[ul]$2[/ul]',$text);
	// 6. email to link
	$text = preg_replace('/\[email\](.*)\[\/email\]/Ui','[url href="mailto:$1"]$1[/url]',$text);
	//7. b tag
	$text = preg_replace('/\[(b\|i\|u):(.)\](.)\[\/(b\|i\|u):(.*)\]/Ui','[$1]$3[/$4]',$text);
	//8. code tag
	$text = preg_replace('/\[code:(.)\](.)\[\/code:(.*)\]/Uis','[code]$2[/code]',$text);
	return $text;
	}

	/**
	* @return string
	* @param string $BBCode
	* @param string $TagParams
	* @param string $TextInside
	* @param string $ParamsAllowed
	* @desc Removes not allowed params from tag and returns result
	*/
	function CheckBBCodeAttribs($BBCode, $TagParams, $TextInside, $ParamsAllowed)
	{
	// $BBCode - bbcode to check, $TagParams - params string entered by user
	// $TextInside - text between opening and closing bbcode tag
	// $ParamsAllowed - list of allowed parameter names ("\|" separated)
	$TagParams=str_replace('\"','"',$TagParams);
	$TextInside=str_replace('\"','"',$TextInside);
	if( $ParamsAllowed && preg_match_all('/ +([^=])=["\']?([^ "\'])["\']?/is',$TagParams,$params,PREG_SET_ORDER) )
	{
	$ret = Array();
	foreach($params as $param)
	{
	// remove spaces in both parameter name & value & lowercase parameter name
	$param[1] = strtolower(trim($param[1])); // name lowercased
	if(($BBCode=='url')&&($param[1]=='href'))
	if(false!==strpos(strtolower($param[2]),'script:'))
	return $TextInside;
	// $param[2]='about:blank';
	if( isset($ParamsAllowed[ $param[1] ]) )
	$ret[] = $param[1].'="'.$param[2].'"';
	}
	$ret = count($ret) ? ' '.implode(' ',$ret) : '';
	return '<'.$BBCode.$ret.'>'.$TextInside.'</'.$BBCode.'>';
	}
	else
	return '<'.$BBCode.'>'.$TextInside.'</'.$BBCode.'>';
	return false;
	}
	function ReplaceBBCode($text)
	{
	global $objConfig;
	// convert phpbb bbcodes to in-bulletin bbcodes
	$text = PreformatBBCodes($text);

	// $tag_defs = 'b:;i:;u:;ul:type\|align;font:color\|face\|size;url:href;img:src\|border';

	$tags_defs = $objConfig->Get('BBTags');
	foreach(explode(';',$tags_defs) as $tag)
	{
	$tag = explode(':',$tag);
	$tag_name = $tag[0];
	$tag_params = $tag[1]?array_flip(explode('\|',$tag[1])):0;
	$text = preg_replace('/\['.$tag_name.'(.)\](.)\[\/'.$tag_name.' *\]/Uise','CheckBBCodeAttribs("'.$tag_name.'",\'$1\',\'$2\',$tag_params);', $text);
	}

	// additional processing for [url], [*], [img] bbcode
	$text = preg_replace('/<url>(.*)<\/url>/Usi','<url href="$1">$1</url>',$text);
	$text = preg_replace('/<font>(.*)<\/font>/Usi','$1',$text); // skip empty fonts
	$text = str_replace( Array('<url','</url>','[*]'),
	Array('<a target="_blank"','</a>','<li>'),
	$text);

	// bbcode [code]xxx[/code] processing
	$text = preg_replace('/\[code\](.*)\[\/code\]/Uise', "ReplaceCodeBBCode('$1')", $text);
	return $text;
	}
	function leadSpace2nbsp($x)
	{
	return "\n".str_repeat(' ',strlen($x));
	}
	function ReplaceCodeBBCode($input_string)
	{
	$input_string=str_replace('\"','"',$input_string);
	$input_string=$GLOBALS['objSmileys']->UndoSmileys(_unhtmlentities($input_string));
	$input_string=trim($input_string);
	$input_string=inp_htmlize($input_string);
	$input_string=str_replace("\r",'',$input_string);
	$input_string = str_replace("\t", " ", $input_string);
	$input_string = preg_replace('/\n( +)/se',"leadSpace2nbsp('$1')",$input_string);
	$input_string='<div style="border:1px solid #888888;width:100%;background-color:#eeeeee;margin-top:6px;margin-bottom:6px"><div style="padding:10px;"><code>'.$input_string.'</code></div></div>';
	// $input_string='<textarea wrap="off" style="border:1px solid #888888;width:100%;height:200px;background-color:#eeeeee;">'.inp_htmlize($input_string).'</textarea>';
	return $input_string;

	if(false!==strpos($input_string,'<'.'?'))
	{
	$input_string=str_replace('<'.'?','<'.'?php',$input_string);
	$input_string=str_replace('<'.'?phpphp','<'.'?php',$input_string);
	$input_string=@highlight_string($input_string,1);
	}
	else
	{
	$input_string = @highlight_string('<'.'?php'.$input_string.'?'.'>',1);
	$input_string = str_replace('<?php', '', str_replace('?>', '', $input_string));
	}
	return str_replace('<br />','',$input_string);

	}


	// --- bbcode processing function: end ----

	function GetMinValue($Table,$Field, $Where=NULL)
	{
	$ret = 0;
	$sql = "SELECT min($Field) as val FROM $Table ";
	if(strlen($where))
	$sql .= "WHERE $Where";
	$ado = &GetADODBConnection();
	$rs = $ado->execute($sql);
	if($rs)
	$ret = (int)$rs->fields["val"];
	return $ret;
	}

	function getmicrotime()
	{
	list($usec, $sec) = explode(" ",microtime());
	return ((float)$usec + (float)$sec);
	}

	function SetMissingDataErrors($f)
	{
	global $FormError;

	$count = 0;
	if(is_array($_POST))
	{
	if(is_array($_POST["required"]))
	{
	foreach($_POST["required"] as $r)
	{
	$found = FALSE;
	if(is_array($_FILES))
	{
	if( isset($_FILES[$r]) && $_FILES[$r]['size'] > 0 ) $found = TRUE;
	}

	if(!strlen(trim($_POST[$r])) && !$found)
	{
	$count++;

	if (($r == "dob_day") \|\| ($r == "dob_month") \|\| ($r == "dob_year"))
	$r = "dob";

	$tag = isset($_POST["errors"]) ? $_POST["errors"][$r] : '';
	if(!strlen($tag))
	$tag = "lu_ferror_".$f."_".$r;
	$FormError[$f][$r] = language($tag);
	}
	}
	}
	}
	return $count;
	}

	function makepassword($length=10)
	{
	$pass_length=$length;

	$p1=array('b','c','d','f','g','h','j','k','l','m','n','p','q','r','s','t','v','w','x','y','z');
	$p2=array('a','e','i','o','u');
	$p3=array('1','2','3','4','5','6','7','8','9');
	$p4=array('(','&',')',';','%'); // if you need real strong stuff

	// how much elements in the array
	// can be done with a array count but counting once here is faster

	$s1=21;// this is the count of $p1
	$s2=5; // this is the count of $p2
	$s3=9; // this is the count of $p3
	$s4=5; // this is the count of $p4

	// possible readable combinations

	$c1='121'; // will be like 'bab'
	$c2='212'; // will be like 'aba'
	$c3='12'; // will be like 'ab'
	$c4='3'; // will be just a number '1 to 9' if you dont like number delete the 3
	// $c5='4'; // uncomment to active the strong stuff

	$comb='4'; // the amount of combinations you made above (and did not comment out)



	for ($p=0;$p<$pass_length;)
	{
	mt_srand((double)microtime()*1000000);
	$strpart=mt_rand(1,$comb);
	// checking if the stringpart is not the same as the previous one
	if($strpart<>$previous)
	{
	$pass_structure.=${'c'.$strpart};

	// shortcutting the loop a bit
	$p=$p+strlen(${'c'.$strpart});
	}
	$previous=$strpart;
	}


	// generating the password from the structure defined in $pass_structure
	for ($g=0;$g<strlen($pass_structure);$g++)
	{
	mt_srand((double)microtime()*1000000);
	$sel=substr($pass_structure,$g,1);
	$pass.=${'p'.$sel}[mt_rand(0,-1+${'s'.$sel})];

	}
	return $pass;
	}

	function LogEntry($text,$writefile=FALSE)
	{
	global $g_LogFile,$LogFile, $LogData, $LogLevel, $timestart;

	static $last;

	if(strlen($g_LogFile))
	{
	$el = str_pad(getmicrotime()- $timestart,10," ");
	if($last>0)
	$elapsed = getmicrotime() - $last;

	if(strlen($el)>10)
	$el = substr($el,0,10);
	$indent = str_repeat(" ",$LogLevel);
	$text = str_pad($text,$LogLevel,"==",STR_PAD_LEFT);
	$LogData .= "$el:". round($elapsed,6).":$indent $text";
	$last = getmicrotime();
	if($writefile==TRUE && is_writable($g_LogFile))
	{
	if(!$LogFile)
	{
	if(file_exists($g_LogFile))
	unlink($g_LogFile);
	$LogFile=@fopen($g_LogFile,"w");
	}
	if($LogFile)
	{
	fputs($LogFile,$LogData);
	}
	}
	}
	}

	function ValidEmail($email)
	{
	if (eregi("^[a-z0-9]+([-_\.]?[a-z0-9])+@[a-z0-9]+([-_\.]?[a-z0-9])+\.[a-z]{2,4}", $email))
	{
	return TRUE;
	}
	else
	{
	return FALSE;
	}
	}

	function language($phrase,$LangId=0)
	{
	global $objSession, $objLanguageCache, $objLanguages;

	if($LangId==0)
	$LangId = $objSession->Get("Language");

	if($LangId==0)
	$LangId = $objLanguages->GetPrimary();

	$translation = $objLanguageCache->GetTranslation($phrase,$LangId);

	return $translation;
	}

	function admin_language($phrase,$lang=0,$LinkMissing=FALSE)
	{
	global $objSession, $objLanguageCache, $objLanguages;

	//echo "Language passed: $lang<br>";

	if($lang==0)
	$lang = $objSession->Get("Language");

	//echo "Language from session: $lang<br>";

	if($lang==0)
	$lang = $objLanguages->GetPrimary();

	//echo "Language after primary: $lang<br>";
	//echo "Phrase: $phrase<br>";
	$translation = $objLanguageCache->GetTranslation($phrase,$lang);
	if($LinkMissing && substr($translation,0,1)=="!" && substr($translation,-1)=="!")
	{
	$res = "<A href=\"javascript:OpenPhraseEditor('&direct=1&label=$phrase'); \">$translation</A>";
	return $res;
	}
	else
	return $translation;
	}

	function prompt_language($phrase,$lang=0)
	{
	return admin_language($phrase,$lang,TRUE);
	}

	function GetPrimaryTranslation($Phrase)
	{
	global $objLanguages;

	$l = $objLanguages->GetPrimary();
	return language($Phrase,$l);
	}

	function CategoryNameCount($ParentId,$Name)
	{
	$cat_table = GetTablePrefix()."Category";
	$sql = "SELECT Name from $cat_table WHERE ParentId=$ParentId AND ";
	$sql .="(Name LIKE '".addslashes($Name)."' OR Name LIKE 'Copy of ".addslashes($Name)."' OR Name LIKE 'Copy % of ".addslashes($Name)."')";

	$ado = &GetADODBConnection();
	$rs = $ado->Execute($sql);
	$ret = array();
	while($rs && !$rs->EOF)
	{
	$ret[] = $rs->fields["Name"];
	$rs->MoveNext();
	}
	return $ret;
	}

	function CategoryItemNameCount($CategoryId,$Table,$Field,$Name)
	{
	$Name=addslashes($Name);
	$cat_table = GetTablePrefix()."CategoryItems";
	$sql = "SELECT $Field FROM $Table INNER JOIN $cat_table ON ($Table.ResourceId=$cat_table.ItemResourceId) ";
	$sql .=" WHERE ($Field LIKE 'Copy % of $Name' OR $Field LIKE '$Name' OR $Field LIKE 'Copy of $Name') AND CategoryId=$CategoryId";
	//echo $sql."<br>\n ";
	$ado = &GetADODBConnection();
	$rs = $ado->Execute($sql);
	$ret = array();
	while($rs && !$rs->EOF)
	{
	$ret[] = $rs->fields[$Field];
	$rs->MoveNext();
	}
	return $ret;
	}

	function &GetItemCollection($ItemName)
	{
	global $objItemTypes;

	if(is_numeric($ItemName))
	{
	$item = $objItemTypes->GetItem($ItemName);
	}
	else
	$item = $objItemTypes->GetTypeByName($ItemName);
	if(is_object($item))
	{
	$module = $item->Get("Module");
	$prefix = ModuleTagPrefix($module);
	$func = $prefix."_ItemCollection";
	if(function_exists($func))
	{
	$var =& $func();
	}
	}
	return $var;
	}


	function UpdateCategoryCount($item_type,$CategoriesIds,$ListType='')
	{
	global $objCountCache, $objItemTypes;
	$db=&GetADODBConnection();
	if( !is_numeric($item_type) )
	{
	$sql = 'SELECT ItemType FROM '.$objItemTypes->SourceTable.' WHERE ItemName=\''.$item_type.'\'';
	$item_type=$db->GetOne($sql);
	}
	if($item_type)
	{
	if(is_array($CategoriesIds))
	{
	$CategoriesIds=implode(',',$CategoriesIds);
	}
	if(!is_array($ListType)) $ListType=Array($ListType=>'opa');

	$sql = 'SELECT ParentPath FROM '.GetTablePrefix().'Category WHERE CategoryId IN ('.$CategoriesIds.')';
	$rs = $db->Execute($sql);
	$parents = Array();
	while (!$rs->EOF)
	{
	$tmp=$rs->fields['ParentPath'];
	$tmp=substr($tmp,1,strlen($tmp)-2);
	$tmp=explode('\|',$tmp);
	foreach ($tmp as $tmp_cat_id) {
	$parents[$tmp_cat_id]=1;
	}
	$rs->MoveNext();
	}
	$parents=array_keys($parents);
	$list_types=array_keys($ListType);
	foreach($parents as $ParentCategoryId)
	{
	foreach ($list_types as $list_type) {
	$objCountCache->DeleteValue($list_type, $item_type, $ParentCategoryId, 0); // total count
	$objCountCache->DeleteValue($list_type, $item_type, $ParentCategoryId, 1); // total count today
	}
	}
	}
	else
	{
	die('wrong item type passed to "UpdateCategoryCount"');
	}

	/* if(is_object($item))
	{
	$ItemType = $item->Get("ItemType");

	$sql = "DELETE FROM ".$objCountCache->SourceTable." WHERE ItemType=$ItemType";
	if( is_numeric($ListType) ) $sql .= " AND ListType=$ListType";
	$objCountCache->adodbConnection->Execute($sql);
	} */
	}

	function ResetCache($CategoryId)
	{
	global $objCountCache;
	$db =& GetADODBConnection();
	$sql = 'SELECT ParentPath FROM '.GetTablePrefix().'Category WHERE CategoryId = '.$CategoryId;
	$parents = $db->GetOne($sql);
	$parents = substr($parents,1,strlen($parents)-2);
	$parents = explode('\|',$parents);
	foreach($parents as $ParentCategoryId)
	{
	$objCountCache->DeleteValue('_', TYPE_TOPIC, $ParentCategoryId, 0); // total topic count
	$objCountCache->DeleteValue('_', TYPE_TOPIC, $ParentCategoryId, 1); // total
	}
	}

	function UpdateModifiedCategoryCount($ItemTypeName,$CatId=NULL,$Modifier=0,$ExtraId=NULL)
	{
	}

	function UpdateGroupCategoryCount($ItemTypeName,$CatId=NULL,$Modifier=0,$GroupId=NULL)
	{
	}

	function GetTagCache($module,$tag,$attribs,$env)
	{
	global $objSystemCache, $objSession, $objConfig;

	if($objConfig->Get("SystemTagCache"))
	{
	$name = $tag;
	if(is_array($attribs))
	{
	foreach($attribs as $n => $val)
	{
	$name .= "-".$val;
	}
	}
	$CachedValue = $objSystemCache->GetContextValue($name,$module,$env, $objSession->Get("GroupList"));
	}
	else
	$CachedValue="";
	return $CachedValue;
	}

	function SaveTagCache($module, $tag, $attribs, $env, $newvalue)
	{
	global $objSystemCache, $objSession, $objConfig;

	if($objConfig->Get("SystemTagCache"))
	{
	$name = $tag;
	if(is_array($attribs))
	{
	foreach($attribs as $a => $val)
	{
	$name .= "-".$val;
	}
	}
	$objSystemCache->EditCacheItem($name,$newvalue,$module,0,$env,$objSession->Get("GroupList"));
	}
	}

	function DeleteTagCache($name,$extraparams, $env="")
	{
	global $objSystemCache, $objConfig;

	if($objConfig->Get("SystemTagCache"))
	{
	$where = "Name LIKE '$name%".$extraparams."'";
	if(strlen($env))
	$where .= " AND Context LIKE $env";
	$objSystemCache->DeleteCachedItem($where);
	}
	}

	/**
	* Deletes whole tag cache for
	* selected module
	*
	* @param string $module
	* @param string $name
	* @access public
	*/
	function DeleteModuleTagCache($module, $tagname='')
	{
	global $objSystemCache, $objConfig;

	if($objConfig->Get("SystemTagCache"))
	{
	$where = 'Module LIKE \''.$module.'\'';
	if(strlen($tagname))
	{
	$where .= ' AND Name LIKE \''.$tagname.'\'';
	}
	$objSystemCache->DeleteCachedItem($where);
	}
	}



	/*function ClearTagCache()
	{
	global $objSystemCache, $objConfig;

	if($objConfig->Get("SystemTagCache"))
	{
	$where = '';
	$objSystemCache->DeleteCachedItem($where);
	}
	}*/

	/*function EraseCountCache()
	{
	// global $objSystemCache, $objConfig;

	$db =& GetADODBConnection();
	$sql = 'DELETE * FROM '.GetTablePrefix().'CountCache';
	return $db->Execute($sql) ? true : false;
	}*/


	function ParseTagLibrary()
	{
	$objTagList = new clsTagList();
	$objTagList->ParseInportalTags();
	unset($objTagList);
	}

	function GetDateFormat($LangId=0)
	{
	global $objLanguages;

	if(!$LangId)
	$LangId= $objLanguages->GetPrimary();
	$l = $objLanguages->GetItem($LangId);
	if(is_object($l))
	{
	$fmt = $l->Get("DateFormat");
	}
	else
	$fmt = "m-d-Y";

	if(isset($GLOBALS['FrontEnd'])&&$GLOBALS['FrontEnd'])
	return $fmt;
	return preg_replace('/y+/i','Y',$fmt);
	}

	function GetTimeFormat($LangId=0)
	{
	global $objLanguages;

	if(!$LangId)
	$LangId= $objLanguages->GetPrimary();
	$l = $objLanguages->GetItem($LangId);
	if(is_object($l))
	{
	$fmt = $l->Get("TimeFormat");
	}
	else
	$fmt = "H:i:s";
	return $fmt;
	}

	/**
	* Gets one of currently selected language options
	*
	* @param string $optionName
	* @param int $LangId
	* @return string
	* @access public
	*/
	function GetRegionalOption($optionName,$LangId=0)
	{
	global $objLanguages, $objSession;

	if(!$LangId) $LangId=$objSession->Get('Language');
	if(!$LangId) $LangId=$objLanguages->GetPrimary();
	$l = $objLanguages->GetItem($LangId);
	return is_object($l)?$l->Get($optionName):false;
	}

	function LangDate($TimeStamp=NULL,$LangId=0)
	{
	$fmt = GetDateFormat($LangId);
	$ret = adodb_date($fmt,$TimeStamp);
	return $ret;
	}

	function LangTime($TimeStamp=NULL,$LangId=0)
	{
	$fmt = GetTimeFormat($LangId);
	$ret = adodb_date($fmt,$TimeStamp);
	return $ret;
	}

	function LangNumber($Num,$DecPlaces=NULL,$LangId=0)
	{
	global $objLanguages;

	if(!$LangId)
	$LangId= $objLanguages->GetPrimary();
	$l = $objLanguages->GetItem($LangId);
	if(is_object($l))
	{
	$ret = number_format($Num,$DecPlaces,$l->Get("DecimalPoint"),$l->Get("ThousandSep"));
	}
	else
	$ret = $num;

	return $ret;
	}

	function replacePngTags($x, $spacer="images/spacer.gif")
	{
	global $rootURL,$pathtoroot;

	// make sure that we are only replacing for the Windows versions of Internet
	// Explorer 5+, and not Opera identified as MSIE
	$msie='/msie\s([5-9])\.?[0-9].(win)/i';
	$opera='/opera\s+[0-9]+/i';
	if(!isset($_SERVER['HTTP_USER_AGENT']) \|\|
	!preg_match($msie,$_SERVER['HTTP_USER_AGENT']) \|\|
	preg_match($opera,$_SERVER['HTTP_USER_AGENT']))
	return $x;

	// find all the png images in backgrounds
	preg_match_all('/background-image:\surl$\'(.\.png)\'$;/Uis',$x,$background);
	for($i=0;$i<count($background[0]);$i++){
	// simply replace:
	// "background-image: url('image.png');"
	// with:
	// "filter:progid:DXImageTransform.Microsoft.AlphaImageLoader(
	// enabled=true, sizingMethod=scale src='image.png');"
	// haven't tested to see if background-repeat styles work...
	$x=str_replace($background[0][$i],'filter:progid:DXImageTransform.'.
	'Microsoft.AlphaImageLoader(enabled=true, sizingMethod=scale'.
	' src=\''.$background[1][$i].'\');',$x);
	}

	// OK, time to find all the IMG tags with ".png" in them
	preg_match_all('/(<img.\.png.>\|<input.type=([\'"])image\\2.\.png.*>)/Uis',$x,$images);
	while(list($imgnum,$v)=@each($images[0])){
	$original=$v;
	$atts=''; $width=0; $height=0;
	// If the size is defined by styles, find
	preg_match_all('/style=".(width: ([0-9]+))px.'.
	'(height: ([0-9]+))px.*"/Ui',$v,$arr2);
	if(is_array($arr2) && count($arr2[0])){
	// size was defined by styles, get values
	$width=$arr2[2][0];
	$height=$arr2[4][0];
	}
	// size was not defined by styles, get values
	preg_match_all('/width=\"?([0-9]+)\"?/i',$v,$arr2);
	if(is_array($arr2) && count($arr2[0])){
	$width=$arr2[1][0];
	}
	preg_match_all('/height=\"?([0-9]+)\"?/i',$v,$arr2);
	if(is_array($arr2) && count($arr2[0])){
	$height=$arr2[1][0];
	}
	preg_match_all('/src=\"([^\"]+\.png)\"/i',$v,$arr2);
	if(isset($arr2[1][0]) && !empty($arr2[1][0]))
	$image=$arr2[1][0];
	else
	$image=NULL;

	// We do this so that we can put our spacer.gif image in the same
	// directory as the image
	$tmp=split('[\\/]',$image);
	array_pop($tmp);
	$image_path=join('/',$tmp);
	if(substr($image,0,strlen($rootURL))==$rootURL)
	{
	$path = str_replace($rootURL,$pathtoroot,$image);
	}
	else
	{
	$path = $pathtoroot."themes/telestial/$image";
	}
	// echo "Sizing $path.. <br>\n";
	// echo "Full Tag: ".htmlentities($image)."<br>\n";
	//if(!$height \|\| !$width)
	//{

	$g = imagecreatefrompng($path);
	if($g)
	{
	$height = imagesy($g);
	$width = imagesx($g);
	}
	//}
	if(strlen($image_path)) $image_path.='/';

	// end quote is already supplied by originial src attribute
	$replace_src_with=$spacer.'" style="width: '.$width.
	'px; height: '.$height.'px; filter: progid:DXImageTransform.'.
	'Microsoft.AlphaImageLoader(src=\''.$image.'\', sizingMethod='.
	'\'scale\')';

	// now create the new tag from the old
	$new_tag=str_replace($image,$replace_src_with,$original);

	// now place the new tag into the content
	$x=str_replace($original,$new_tag,$x);
	}
	return $x;
	}

	function print_pre($str)
	{
	// no comments here :)
	echo '<pre>'.print_r($str, true).'</pre>';
	}

	function GetOptions($field) // by Alex
	{
	// get dropdown values from custom field
	$tmp =& new clsCustomField();

	$tmp->LoadFromDatabase($field, 'FieldName');
	$tmp_values = $tmp->Get('ValueList');
	unset($tmp);
	$tmp_values = explode(',', $tmp_values);

	foreach($tmp_values as $mixed)
	{
	$elem = explode('=', trim($mixed));
	$ret[ $elem[0] ] = $elem[1];
	}
	return $ret;
	}

	function ResetPage($module_prefix, $page_variable = 'p')
	{
	// resets page in specific module when category is changed
	global $objSession;
	if( !is_object($objSession) ) // when changing pages session doesn't exist -> InPortal BUG
	{
	global $var_list, $SessionQueryString, $FrontEnd;
	//if(!$var_list["sid"]) $var_list["sid"] = $_COOKIE["sid"];
	$objSession = new clsUserSession($var_list["sid"],($SessionQueryString && $FrontEnd==1));
	}
	//echo "SID_RESET: ".$GLOBALS['var_list']["sid"].'(COOKIE_SID: '.$_COOKIE["sid"].')<br>';
	$last_cat = $objSession->GetVariable('last_category');
	$prev_cat = $objSession->GetVariable('prev_category');
	//echo "Resetting Page [$prev_cat] -> [$last_cat]<br>";

	if($prev_cat != $last_cat) $GLOBALS[$module_prefix.'_var_list'][$page_variable] = 1;
	}

	if( !function_exists('GetVar') )
	{
	/**
	* @return string
	* @param string $name
	* @param bool $post_priority
	* @desc Get's variable from http query
	*/
	function GetVar($name, $post_priority = false)
	{
	if(!$post_priority) // follow gpc_order in php.ini
	return isset($_REQUEST[$name]) ? $_REQUEST[$name] : false;
	else // get variable from post 1stly if not found then from get
	return isset($_POST[$name]) && $_POST[$name] !== false ? $_POST[$name] : ( isset($_GET[$name]) && $_GET[$name] ? $_GET[$name] : false );
	}
	}

	function SetVar($VarName, $VarValue)
	{
	$_REQUEST[$VarName] = $VarValue;
	$_POST[$VarName] = $VarValue;
	}

	function PassVar(&$source)
	{
	// source array + any count of key names in passed array
	$params = func_get_args();
	array_shift($params);

	if( count($params) )
	{
	$ret = Array();
	foreach($params as $var_name)
	if( isset($source[$var_name]) )
	$ret[] = $var_name.'='.$source[$var_name];
	$ret = '&'.implode('&', $ret);
	}
	return $ret;
	}

	function GetSubmitVariable(&$array, $postfix)
	{
	// gets edit status of module
	// used in case if some modules share
	// common action parsed by kernel parser,
	// but each module uses own EditStatus variable

	$modules = Array('In-Link' => 'Link', 'In-News' => 'News', 'In-Bulletin' => 'Topic', 'In-Portal'=>'Review');
	foreach($modules as $module => $prefix)
	if( isset($array[$prefix.$postfix]) )
	return Array('Module' => $module, 'variable' => $array[$prefix.$postfix]);
	return false;
	}

	function GetModuleByAction()
	{
	$prefix2module = Array('m' => 'In-Portal', 'l' => 'In-Link', 'n' => 'In-News', 'bb' => 'In-Bulletin');
	$action = GetVar('Action');
	if($action)
	{
	$module_prefix = explode('_', $action);
	return $prefix2module[ $module_prefix[0] ];
	}
	else
	return false;
	}

	function dir_size($dir) {
	// calculates folder size based on filesizes inside it (recursively)
	$totalsize=0;
	if ($dirstream = @opendir($dir)) {
	while (false !== ($filename = readdir($dirstream))) {
	if ($filename!="." && $filename!="..")
	{
	if (is_file($dir."/".$filename))
	$totalsize+=filesize($dir."/".$filename);

	if (is_dir($dir."/".$filename))
	$totalsize+=dir_size($dir."/".$filename);
	}
	}
	}
	closedir($dirstream);
	return $totalsize;
	}

	function size($bytes) {
	// shows formatted file/directory size
	$types = Array("la_bytes","la_kilobytes","la_megabytes","la_gigabytes","la_terabytes");
	$current = 0;
	while ($bytes > 1024) {
	$current++;
	$bytes /= 1024;
	}
	return round($bytes,2)." ".language($types[$current]);
	}

	function echod($str)
	{
	// echo debug output
	echo str_replace( Array('[',']'), Array('[<b>', '</b>]'), $str).'<br>';
	}


	function PrepareParams($source, $to_lower, $mapping)
	{
	// prepare array with form values to use with item
	$result = Array();
	foreach($to_lower as $field)
	$result[ $field ] = $source[ strtolower($field) ];

	if( is_array($mapping) )
	{
	foreach($mapping as $field_from => $field_to)
	$result[$field_to] = $source[$field_from];
	}

	return $result;
	}

	function GetELT($field, $phrases = Array())
	{
	// returns FieldOptions equivalent in In-Portal
	$ret = Array();
	foreach($phrases as $phrase)
	$ret[] = admin_language($phrase);
	$ret = "'".implode("','", $ret)."'";
	return 'ELT('.$field.','.$ret.')';
	}

	function GetModuleImgPath($module)
	{
	global $rootURL, $admin;
	return $rootURL.$module.'/'.$admin.'/images';
	}

	function ActionPostProcess($StatusField, $ListClass, $ListObjectName = '', $IDField = null)
	{
	// each action postprocessing stuff from admin
	if( !isset($_REQUEST[$StatusField]) ) return false;

	$list =& $GLOBALS[$ListObjectName];
	if( !is_object($list) ) $list = new $ListClass();
	$SFValue = $_REQUEST[$StatusField]; // status field value
	switch($SFValue)
	{
	case 1: // User hit "Save" button
	$list->CopyFromEditTable($IDField);
	break;
	case 2: // User hit "Cancel" button
	$list->PurgeEditTable($IDField);
	break;
	}
	if( function_exists('SpecificProcessing') ) SpecificProcessing($StatusField, $SFValue);
	if($SFValue == 1 \|\| $SFValue == 2) $list->Clear();
	}

	/**
	* Returns array value if key exists
	*
	* @param Array $aArray
	* @param int $aIndex
	* @return string
	*/
	function getArrayValue(&$aArray, $aIndex)
	{
	return isset($aArray[$aIndex]) ? $aArray[$aIndex] : false;
	}

	function MakeHTMLTag($element, $attrib_prefix)
	{
	$result = Array();
	$ap_length = strlen($attrib_prefix);
	foreach($element->attributes as $attib_name => $attr_value)
	if( substr($attib_name, $ap_length) == $ap_length )
	$result[] = substr($attib_name, $ap_length, strlen($attib_name)).'="'.$attr_value.'"';
	return count($result) ? implode(' ', $result) : false;
	}

	function GetImportScripts()
	{
	// return currently installed import scripts
	static $import_scripts = Array();
	if( count($import_scripts) == 0 )
	{
	$sql = 'SELECT * FROM '.GetTablePrefix().'ImportScripts ORDER BY is_id';
	$db =&GetADODBConnection();
	$rs = $db->Execute($sql);
	if( $rs && $rs->RecordCount() > 0 )
	{
	while(!$rs->EOF)
	{
	$rec =& $rs->fields;
	$import_scripts[] = Array( 'label' => $rec['is_label'], 'url' => $rec['is_script'],
	'enabled' => $rec['is_enabled'], 'field_prefix' => $rec['is_field_prefix'],
	'id' => $rec['is_string_id'], 'required_fields' => $rec['is_requred_fields'],
	'module' => strtolower($rec['is_Module']) );
	$rs->MoveNext();
	}
	}
	else
	{
	$import_scripts = Array();
	}
	}
	return $import_scripts;
	}

	function GetImportScript($id)
	{
	$scripts = GetImportScripts();
	return isset($scripts[$id]) ? $scripts[$id] : false;
	}
	function GetNextTemplate($current_template)
	{
	// used on front, returns next template to make
	// redirect to
	$dest = GetVar('dest', true);
	if(!$dest) $dest = GetVar('DestTemplate', true);
	return $dest ? $dest : $current_template;
	}


	// functions for dealign with enviroment variable construction
	function GenerateModuleEnv($prefix, $var_list)
	{
	// globalize module varible arrays
	$main =& $GLOBALS[$prefix.'_var_list'];
	$update =& $GLOBALS[$prefix.'_var_list_update'];
	//echo "VAR: [$main]; VAR_UPDATE: [$update]<br>";

	// ensure that we have no empty values in enviroment variable
	foreach($update as $vl_key => $vl_value)
	if(!$vl_value) $update[$vl_key] = '0'; // unset($update[$vl_key]);

	// if update var count is zero, then do nothing
	if(count($update) == 0) return '';

	foreach($main as $vl_key => $vl_value)
	if(!$vl_value) $main[$vl_key] = '0'; // unset($main[$vl_key]);

	$ret = Array();
	foreach($var_list as $var_name)
	$ret[] = GetEnvVar($prefix, $var_name);

	return ':'.$prefix.implode('-',$ret);
	}

	function GetEnvVar($prefix, $name)
	{
	// get variable from template variable's list
	// (used in module parsers to build env string)
	$main =& $GLOBALS[$prefix.'_var_list'];
	$update =& $GLOBALS[$prefix.'_var_list_update'];

	return isset($update[$name]) ? $update[$name] : ( isset($main[$name]) ? $main[$name] : '');
	}

	/**
	* @return int
	* @desc Checks for debug mode
	*/
	function IsDebugMode()
	{
	return defined('DEBUG_MODE') && constant('DEBUG_MODE') == 1 ? 1 : 0;
	}

	+function stricmp ($string1, $string2) {
	+ return strcmp(strtolower($string1), strtolower($string2));
	+}

	?>

	Property changes on: trunk/globals.php
	___________________________________________________________________
	Modified: cvs2svn:cvs-rev
	## -1 +1 ##
	-1.65
	\ No newline at end of property
	+1.66
	\ 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