<?
// some settings
$QTPLCACHE = true; //want to use the cache-system? (recomanded: true)
$QTPLPRECACHE = true; //want to use secondar cache? (recomanded: true for large templates)
$QTPLCACHEEXTENSION = ".qtpl-cache"; //cache file extension
$QTPLPRECACHEEXTENSION = ".qtpl-cache.PRE"; //sec-cache file extension
$QTPLCACHEPATH = "/tmp/tmp-cache/"; //folder for cache files
//(!) NOTE: if you use the cache methods don't forget to
// give write rights for your web user (eg: apache)
/*
LICENSE: GNU LGPL
This class is free software, you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as
published by the Free Software Foundation.
The author.
*/
class QuickTemplate {
/*************************************************
*
* CLASS NAME: QuickTemplate
* AUTHOR: Stefan Bocskai
<stefanbocskai@hotmail.com>
* Date: 03/12/2001
* Version: V 3.2.2
*
******************************************/
//===================================================================
var $Error = ""; // Last error
var $BLOCKS; // The children of current block
var $TEXT = ""; // The current text of BLOCK
var $DEFAULTTEXT = ""; // The default text if block is empty
var $BlockName = ""; // The name of the Block
var $BlockTemplate = ""; // Unparsed content of the block
var $VARLIST; // List of variables of this block
var $VARS; // List of values of variables of this block
var $AUTOINCREMENT = 1; // Start value of auto-inrement variable
var $INCREMENT = 1; // step of incrementation
//===================================================================
var $__VERSION__ = "V3.2.1";
var $__CLASS_NAME__ = "QuickTemplate";
var $_start_tag_ = "<!--";
var $_end_tag_ = "-->";
var $_begin_block_ = "BEGIN[[:blank:]]+BLOCK:";
var $_end_block_ = "END[[:blank:]]+BLOCK:";
var $_html_source_= "HTML_SOURCE:";
var $_pre_chache_= "HTML_PRE_CACHE:";
var $__BLOCKS_VAR__ = "__BLOCKS_VAR__";
var $__NULL_STRING__ = "BLANK";
var $__VAR_NULL_STRING__ = "__VAR_NULL_STRING__";
var $__DEFAULTS_VALUES__ = "DEFAULTS";
var $__DEFAULTVALUENAME__ = "DEFAULT";
var $__AUTOINCREMENT_NAME__ ="AUTOINCREMENT";
var $LOCAUTOINCREMENT;
var $PARSED;
var $CACHED=false;
var $cachedfilename = "";
var $precachedfname = "";
var $level=0;
//===================================================================
//===================================================================
//====== PUBLIC Functions ===========================================
//===================================================================
//========================
//===========
//========================
// QuickTemplate
//========================
function QuickTemplate($misc, $part="main", $flag=0, $level=0){
// do not use $flag is just
// for internal use
global $QTPLCACHEPATH, $QTPLCACHE, $QTPLPRECACHE, $QTPLCACHEEXTENSION, $QTPLPRECACHEEXTENSION;
$this->level=$level;
if(($level==0)&&($QTPLCACHE)){
$basefilename = $QTPLCACHEPATH.substr(md5($misc.filemtime($misc)),0,20);
$this->cachedfilename = $basefilename.$QTPLCACHEEXTENSION;
$this->precachedfname = $basefilename.$QTPLPRECACHEEXTENSION;
if (fileperms($this->cachedfilename))
$chf = fopen($this->cachedfilename,"r");
else
$chf = false;
if($chf){
$obj_ser = fread ($chf, filesize ($this->cachedfilename));
fclose($chf);
$this=ugnserialize($obj_ser);
$this->CACHED=true;
}
}
$this->isDebug = false;
global $PHP_SELF;
if(!$this->CACHED){
$this->BlockName = $part;
$this->BLOCKS = array();
$this->TEXT = "";
$this->PARSED=false;
if (!$flag){
if ($QTPLCACHE && $QTPLPRECACHE){
$this->BlockTemplate = $this->_getBlockPart_($this->_createHtmlSourceCached_($this->_openFileFromTemplate_($misc)),$part);
}else{
$this->BlockTemplate = $this->_getBlockPart_($this->_openFileFromTemplate_($misc),$part);
}
}else{
$this->BlockTemplate = $misc;
}
}
//if ($this->level==0) echo "<hr><pre>".htmlspecialchars($this->BlockTemplate)."</pre>";
//exit;
// default variables ...
$this->VARS[$this->__DEFAULTS_VALUES__] = array();
$dt = date("l d F Y"); $tm=date("H:i A");
$this->_assign_defaults_("DATE", $dt);
$this->_assign_defaults_("TIME", $tm);
$this->_assign_defaults_("VERSION",$this->__CLASS_NAME__." ".$this->__VERSION__);
$this->_assign_defaults_("SELFURL", $PHP_SELF);
$this->_assign_defaults_($this->__NULL_STRING__, "");
$this->_assign_defaults_($this->__VAR_NULL_STRING__, array());
$this->_assign_defaults_($this->__AUTOINCREMENT_NAME__, $this->AUTOINCREMENT);
$this->LOCAUTOINCREMENT = $this->AUTOINCREMENT;
$this->_assign_defaults_("LANG", $GLOBALS[LANG]);
$this->_assign_defaults_("REFRESH", md5(uniqid(rand())));
$this->_assign_defaults_("USER_TYPE", $GLOBALS[USER_TYPE]);
if(!$this->CACHED){
$this->_createChildrens_();
$this->_getVariables_();
}
if ((!$flag)&&($this->level==0)&&($QTPLCACHE)){
$chf=fopen($this->cachedfilename,"w");
if($chf){
fwrite($chf, serialize($this));
fclose($chf);
}
}
}
//===================================================
function _createHtmlSourceCached_(&$text){
global $QTPLCACHEPATH;
$stopchar=array();
$stopchar[]=1;
$p=0;
while(true){
$p=strpos($text,"<!--", $p+1);
//$q=(strpos(substr($text,$p+1,50),"BLOCK:"));
if($p===false) break;
if ($q!==false){$stopchar[]=$p;$stopchar[]=$p+3;}
}
$p=0;
while(true){
$p=strpos($text,"-->", $p+1);
//$q=(strpos(substr($text,$p-50,50),"BLOCK:"));
if($p===false)break;
if ($q!==false){$stopchar[]=$p;$stopchar[]=$p+2;}
}
$p=0;
while(true){
$p=strpos($text,"{", $p+1);
//$q=(strpos(substr($text,$p+1,50),"}"));
if($p===false) break;
if ($q!==false){$stopchar[]=$p;}
}
$p=0;
while(true){
$p=strpos($text,"}", $p+1);
//$q=(strpos(substr($text,$p-50,50),"{"));
if($p===false) break;
if ($q!==false){$stopchar[]=$p;}
}
$stopchar[]=0;
sort($stopchar);
reset($stopchar);
$i=1;$s=0;$offset=0;
$seek=0;
$chf=fopen($this->precachedfname,"w");
if (!chf) return $text;
while($stopchar[$i]){
if ($stopchar[$i+1]-$stopchar[$i]>200){
$s=$s+$stopchar[$i+1]-$stopchar[$i];
$text2=substr($text,-$offset+$stopchar[$i]+1,$stopchar[$i+1]-$stopchar[$i]-1);
if($chf){
fwrite($chf, $text2);
$l1=($stopchar[$i+1]-$stopchar[$i]-1);
$identificator = sprintf("%06d%06d",$l1,$seek);
$seek+=$l1;
$repltext="{".$this->_pre_chache_.$identificator."}";
$text=substr_replace($text,$repltext,-$offset+$stopchar[$i]+1,$stopchar[$i+1]-$stopchar[$i]-1);
$offset=$offset+$stopchar[$i+1]-$stopchar[$i]-strlen($repltext)-1;
}
}
$i++;
}
fclose($chf);
return $text;
}
//===================================================
//========================
// SetNullString
//========================
function SetNullString($part, $nullstring = ""){
$vname = $this->__DEFAULTS_VALUES__.".".$this->__NULL_STRING__;
if ($part=="")
$this->_assign_(&$vname,&$nullstring);
else
$this->_assignLocal_(&$this->BlockName,&$vname,&$nullstring);
}
function SetVarNullString($part, $var, $nullstring = ""){
$vname = $this->__DEFAULTS_VALUES__.".".$this->__VAR_NULL_STRING__.".".$var;
if ($part=="")
$this->_assign_(&$vname,&$nullstring);
else
$this->_assignLocal_(&$this->BlockName,&$vname,&$nullstring);
}
//========================
// quickText
//========================
function quickText($part = ""){
global $QTPLCACHEPATH, $QTPLCACHE, $QTPLPRECACHE, $QTPLCACHEEXTENSION,$QTPLPRECACHEEXTENSION;
if ($part=="") $part = $this->BlockName;
$a = $this->_quicktext_($part);
if($this->level==0){
$a = $this->_replace_all_html_sources_(&$a);
if (($QTPLCACHE)&&($QTPLPRECACHE))
$a = $this->_replace_all_precached_src_(&$a);
}
return $a;
}
//========================
// quickPrint
//========================
function quickPrint($part = ""){
if ($part=="") $part = $this->BlockName;
print($this->quickText($part));
//flush();
}
//========================
// parse
//========================
function parse($part = ""){
if ($part=="") $part = $this->BlockName;
return $this->_parse_($part);
}
//========================
// AssignLocal & Assign
//========================
function AssignLocal($part, $name, $val){
return $this->_assignLocal_(&$part,&$name,&$val);
}
function Assign($name, $val){
return $this->_assign_(&$name, &$val);
}
//========================
// DefaultBlocksValue
//========================
function DefaultBlocksValue($value=""){
return $this->_assign_($__DEFAULTS_VALUES__.".".$__DEFAULTVALUENAME__,$value);
}
function DefaultBlockValue($part, $value=""){
return $this->_assignLocal_($part,$__DEFAULTS_VALUES__.".".$__DEFAULTVALUENAME__,$value);
}
//========================
// Reset
//========================
function Reset($part=""){
if ($part=="") $part = $this->BlockName;
return $this->_reset_($part);
}
//========================
// SetAutoincrement
//========================
function SetAutoincrement($part, $value=1, $incr=1){
return $this->_setautoincrement_($part,$value,$incr);
}
//========================
// GetAutoincrement
//========================
function GetAutoincrement($part = ""){
if ($part=="") $part = $this->BlockName;
}
//========================
// Parsed
//========================
function Parsed($part = ""){
if ($part=="") $part = $this->BlockName;
return $this->_parsed_($part);
}
//========================
// getError
//========================
function getError(){
return ($this->Error == "")?0:$this->Error;
}
//========================
// setError
//========================
function setError($error){
$this->Error = $error;
echo "DebugQT:".$error."<br>";
}
//===================================================================
//====== PRIVAT Functions ===========================================
//===================================================================
//========================
//===========
function _debug_($text){
if ($this->isDebug){
list($usec, $sec) = explode(" ",microtime());
print("<br><b>Debug: [$usec:$sec]</b> ".$text."\n");
}
}
//-------------------------------------------------------------------
function _openFileFromTemplate_($filename){
$res = "";
// don't need to use: file_exists($filename)
if ($fh = fopen($filename,"r")){
$res = fread ($fh, filesize ($filename));
fclose($fh);
}else{
$res="";
$this->setError("[_openFileFromTemplate_]:Cannot open file: ".$filename);
}
return $res;
}
//---------------------------------------------------------------------
function _getBlockPart_(&$text, $part){
$patern_begin = $this->_start_tag_."[[:blank:]]*".$this->_begin_block_."[[:blank:]]*".$part."[[:blank:]]*".$this->_end_tag_;
$patern_end = $this->_start_tag_."[[:blank:]]*".$this->_end_block_."[[:blank:]]*".$part."[[:blank:]]*".$this->_end_tag_;
if (eregi($patern_begin."(.*)".$patern_end, $text, $res)){
return $res[1];
}else{
$this->setError("[_getBlockPart_]:Cannot find part: ".$part);
return "";
}
}//end _getBlockPart_
//---------------------------------------------------------------------
function _createChildrens_(){
$part="[a-z,0-9,\_]+";
$patern_begin = $this->_start_tag_."[[:blank:]]*".$this->_begin_block_."[[:blank:]]*(".$part.")[[:blank:]]*".$this->_end_tag_;
$patern_end = $this->_start_tag_."[[:blank:]]*".$this->_end_block_."[[:blank:]]*(\\1)[[:blank:]]*".$this->_end_tag_;
$allpatern = "".$patern_begin."(.*)".$patern_end;
while (eregi($allpatern,&$this->BlockTemplate,$res)){
// now $res[2] is the content of the new block
// and $res[1] is the name ...
$this->BLOCKS[$res[1]] = new QuickTemplate(&$res[2],$res[1], 1, ($this->level+1));
$patern = $res[0];
$this->BlockTemplate = str_replace($patern,"{".$this->__BLOCKS_VAR__.".".$res[1]."}", &$this->BlockTemplate);
}//while
}
//---------------------------------------------------------------------
function _getVariables_(){
$v = $this->BlockTemplate;
while (eregi("[\{]([A-Z,0-9,\.,\_]+)[\}](.*)$",$v, $res)){
$this->VARLIST[] = $res[1];
$v = &$res[2];
}
}
//---------------------------------------------------------------------
function _get_base_(&$longname){
$pospoint = strpos($longname,".");
return substr($longname,0,($pospoint===false)?255:$pospoint);
}
//---------------------------------------------------------------------
function _get_queque_($longname){
$pospoint = strpos($longname,".");
if ($pospoint===false) return false;
return substr($longname,$pospoint+1);
}
//---------------------------------------------------------------------
function _assignLocal_($part,$var,$val,$base=""){
/*
if ($base!=$this->BlockName){
if ($this->_get_base_($part)!=$this->BlockName){
$this->setError("[_assignLocal_]:Current block is ".$this->BlockName." not ".$this->_get_base_($part).". You cannot assign var in this block!");
return 0;
}
}
*/
$queque=$this->_get_queque_(&$part);
if (!($queque===false)){
$nextpart=$this->_get_base_(&$queque);
if (gettype($this->BLOCKS[$nextpart])=="object"){
return $this->BLOCKS[$nextpart]->_assignLocal_(&$queque,&$var,&$val,&$nextpart);
}else{
$this->setError("[_assignLocal_]: Assigning var $var to next block: $nextpart failed because block $nextpart is not an object!");
return false;
}
}
$vr = $var;
$VRS = &$this->VARS;
while($this->_get_queque_($vr)){
$vbase = $this->_get_base_($vr);
if ((gettype($VRS[$vbase])!="array")&&(!isset($VRS[$vbase]) ) )
$VRS[$vbase] = array();
else if (gettype($VRS[$vbase])!="array"){
$this->setError("Cannot assign $var beacuse the var base name doesn't corespond to an array! $vr");
return false;
}
$VRS = &$VRS[$vbase];
$vr = $this->_get_queque_($vr);
}//while
$VRS[$vr]=$val;
return true;
}
//---------------------------------------------------------------------
function _assign_($name, $val){
if ($this->_exists_var_(&$name))
$this->_assignLocal_(&$this->BlockName,&$name,&$val);
reset($this->BLOCKS);
while(list($k, $v) = each($this->BLOCKS)){
$this->BLOCKS[$k]->_assign_(&$name,&$val);
}
}
//---------------------------------------------------------------------
function _exists_var_($varname){
if (gettype($this->VARLIST)!="array") return false;
reset($this->VARLIST);
while(list($k,$v) = each($this->VARLIST))
if ($v == $varname) return true;
return false;
}
//---------------------------------------------------------------------
function &_quicktext_($part){
return ($this->TEXT == "")?$this->DEFAULTTEXT:$this->TEXT;
}
//---------------------------------------------------------------------
function _assign_defaults_($var, $val){
$this->VARS[$this->__DEFAULTS_VALUES__][$var] = &$val;
}
//---------------------------------------------------------------------
function _parse_($part){
/* optimized
if ($this->_get_base_($part)!=$this->BlockName){
$this->setError("[_parse_]:Current block is ".$this->BlockName." not ".$this->_get_base_($part).". You cannot parse this block!");
return 0;
}
*/
$queque=$this->_get_queque_($part);
if (!($queque===false)){
$nextpart=$this->_get_base_($queque);
if (gettype($this->BLOCKS[$nextpart])=="object"){
return $this->BLOCKS[$nextpart]->_parse_($queque);
}else{
$this->setError("[_parse_]: Parsing next block: $nextpart failed because block $nextpart is not an object!");
return false;
}
}
//getting values from subblocks
if (gettype($this->BLOCKS)=="array"){
reset($this->BLOCKS);
while(list($k,$v) = each($this->BLOCKS)){
$this->AssignLocal(&$this->BlockName,$this->__BLOCKS_VAR__.".".$k,&$this->BLOCKS[$k]->TEXT);
$this->BLOCKS[$k]->Reset();
}
}
//inserting vars ...
//$tmp = implode('',$this->BlockTemplate);
$tmp = $this->BlockTemplate;
if (gettype($this->VARLIST)=="array"){
reset($this->VARLIST);
while(list($k, $v) = each($this->VARLIST)){
$tmp = str_replace("{".$v."}",$this->_get_var_value_($v), $tmp);
}
}
$vname = $this->__DEFAULTS_VALUES__.".".$this->__AUTOINCREMENT_NAME__;
$this->LOCAUTOINCREMENT += $this->INCREMENT;
$this->_assignlocal_(&$this->BlockName, &$vname, &$this->LOCAUTOINCREMENT);
$this->TEXT .= $tmp;
$this->PARSED=true;
}
//---------------------------------------------------------------------
function _get_var_value_($var, $flag=0){
$vr = $var;
$VRS = &$this->VARS;
while($this->_get_queque_($vr)){
$vbase = $this->_get_base_($vr);
if (gettype($VRS[$vbase])=="array"){
$VRS = &$VRS[$vbase];
$vr = $this->_get_queque_($vr);
}else{
if ($flag==0)
return $this->_get_var_value_($this->__DEFAULTS_VALUES__.".".$this->__VAR_NULL_STRING__.".".$var,1);
else
if ($flag==1)
return $this->_get_var_value_($this->__DEFAULTS_VALUES__.".".$this->__NULL_STRING__,2);
else
return "";
}
}//while
if (($VRS[$vr]=="")&&($flag==0))
return $this->_get_var_value_($this->__DEFAULTS_VALUES__.".".$this->__VAR_NULL_STRING__.".".$var,1);
else
if (($VRS[$vr]=="")&&($flag==1))
return $this->_get_var_value_($this->__DEFAULTS_VALUES__.".".$this->__NULL_STRING__,2);
else
return $VRS[$vr];
}
//---------------------------------------------------------------------
function _reset_($part){
if ($this->_get_base_($part)!=$this->BlockName){
$this->setError("[_reset_]:Current block is ".$this->BlockName." not ".$this->_get_base_($part).". You cannot reset this block!");
return 0;
}
$queque=$this->_get_queque_($part);
if (!($queque===false)){
$nextpart=$this->_get_base_($queque);
if (gettype($this->BLOCKS[$nextpart])=="object"){
return $this->BLOCKS[$nextpart]->_reset_($queque);
}else{
$this->setError("[_reset_]: Reseting next block: $nextpart failed because block $nextpart is not an object!");
return false;
}
}
$this->PARSED=false;
$this->TEXT="";
return true;
}
//---------------------------------------------------------------------
function _parsed_($part){
if ($this->_get_base_($part)!=$this->BlockName){
$this->setError("[_parsed_]:Current block is ".$this->BlockName." not ".$this->_get_base_($part));
return 0;
}
$queque=$this->_get_queque_($part);
if (!($queque===false)){
$nextpart=$this->_get_base_($queque);
if (gettype($this->BLOCKS[$nextpart])=="object"){
return $this->BLOCKS[$nextpart]->_parsed_($queque);
}else{
$this->setError("[_parsed_]: Reseting next block: $nextpart failed because block $nextpart is not an object!");
return false;
}
}
return $this->PARSED;
}
//---------------------------------------------------------------------
function _setautoincrement_($part, $value, $incr){
if ($this->_get_base_($part)!=$this->BlockName){
$this->setError("[_setautoincrement_]:Current block is ".$this->BlockName." not ".$this->_get_base_($part));
return 0;
}
$queque=$this->_get_queque_($part);
if (!($queque===false)){
$nextpart=$this->_get_base_($queque);
if (gettype($this->BLOCKS[$nextpart])=="object"){
return $this->BLOCKS[$nextpart]->_setautoincrement_($queque, $value, $incr);
}else{
$this->setError("[_setautoincrement_]: Reseting next block: $nextpart failed because block $nextpart is not an object!");
return false;
}
}
$this->AUTOINCREMENT = $value;
$this->INCREMENT = $incr;
return true;
}
//---------------------------------------------------------------------
function _replace_all_html_sources_($new_text){
$tab = explode("{".$this->_html_source_, &$new_text);
if(gettype($tab)=="array"){
reset($tab);
$new_text = "";
$first=true;
foreach($tab as $tpart){
if ($first){$first=false;$new_text=$tpart;continue;}
if (empty($tpart)) continue;
$pos = strpos( $tpart, "}");
if (!$pos) {
$new_text .= $tpart;
continue;
}
$file = substr(&$tpart, 0, $pos);
$file = str_replace("\"","",$file);
$file = str_replace("'","",$file);
//$file = str_replace(" ","",$file);
$file = trim($file);
/*if ((strpos($file," "))||(strpos($file,"\n"))){
$new_text .= $tpart;
continue;
}*/
if ($fh = fopen($file, "r")){
$file_text = fread( $fh, 1000000);
}else $file_text = "";
$new_text .= $file_text.substr(&$tpart, $pos+1);
}
}
return $new_text;
}
//---------------------------------------------------------------------
function _replace_all_precached_src_($new_text){
$tab = explode("{".$this->_pre_chache_, &$new_text);
if(gettype($tab)=="array"){
$fh = fopen($this->precachedfname, "r");
if (!$fh) return $new_text;
reset($tab);
$new_text = "";
$first=true;
foreach($tab as $tpart){
if ($first){$first=false;$new_text=$tpart;continue;}
if (empty($tpart)) continue;
$pos = strpos( $tpart, "}");
if ((!$pos)||($pos>15)) {
$new_text .= $tpart;
continue;
}
$identificator = substr(&$tpart, 0, $pos);
if ((strpos($identificator," "))||(strpos($identificator,"\n"))||(!ereg("^[0123456789]+$", $identificator))){
$new_text .= $tpart;
continue;
}
$filesize = substr($identificator,0,6)+1-1;
$seek = substr($identificator,6)+1-1;
fseek($fh,$seek);
$file_text = fread( $fh, $filesize);
$new_text .= $file_text.substr(&$tpart, $pos+1);
}
fclose($fh);
}//if
return $new_text;
}
//---------------------------------------------------------------------
//---------------------------------------------------------------------
// other functions ...
function tree(){
echo "<blockquote>\n";
echo "<li>Block: <b>".$this->BlockName."</b>\n";
if (gettype($this->BLOCKS)=="array"){
reset($this->BLOCKS);
while(list($k,$v) = each($this->BLOCKS)){
$this->BLOCKS[$k]->tree();
}
}
echo "</blockquote>\n";
}
//just for compatibility with older versions
function testtree(){
$this->tree();
}
//---------------------------------------------------------------------
//---------------------------------------------------------------------
//---------------------------------------------------------------------
//---------------------------------------------------------------------
} // end of class
//======================================================================
// this is the end my friend !
//===============================
//===========================
//======================
//=================
?>
|
Download
