在下面的代码中，命名有规律。$tpl是没有后缀名的，$tplfile是后缀为htm的模板文件，$objfile是后缀为php的缓存文件
UCH里使用模板的流程是：
在php代码中获取动态数据，然后include_once template($tpl)
template函数解析模板文件$tplfile，返回缓存文件$objfile。
template函数中调用parse_template函数解析$tplfile，
$tplfile里有UCH定义的一套语法，在parse_template函数里可以看到，有<!-- template name--> <!—block/name-->等。这些语法在parse_template中都会被替换成对应的函数，如readtemplate blocktags等，这些函数也都位于function_template.php中。
这里有点点纠结的就是，模板文件中可能还通过<!-- template name-->包含了其他的模板文件，所以在parse_template中要两次调用preg_replace，第一次读模板文件$tplfile所包含的子模板文件name，第二次是读子模板文件name中再包含的孙子模板文件。UCH中至多有3层模板包含关系，即父亲->儿子->孙子，所以不需要第三次调用preg_replace来读取孙子模板文件可能包含的重孙模板文件了。
template函数在function_common.php中定义
function template($name) {
global $_SCONFIG, $_SGLOBAL;
if(strexists($name,'/')) {
$tpl = $name;//$name是完整目录的情况
} else {
$tpl = "template/$_SCONFIG[template]/$name";
/*
$name只是一个文件名的情况，$tpl类似template/default/cp_blog或者template/blue/cp_blog
默认的模板风格是default，但是如果用户选择了其他风格，$_SCONFIG[template]就会变成blue之类的其他值
在首页的右下角可以选择模板风格
*/
}
$objfile = S_ROOT.'./data/tpl_cache/'.str_replace('/','_',$tpl).'.php';
/*
缓存文件名,$objfile类似data/tpl_cache/template_default_cp_blog.php或者data/tpl_cache/template_blue_cp_blog.php
*/
if(!file_exists($objfile)) {
include_once(S_ROOT.'./source/function_template.php');
parse_template($tpl);
//如果缓存文件不存在，则对模板文件进行解析
}
return $objfile;
}
parse_template函数在function_template.php中定义
function parse_template($tpl) {
global $_SGLOBAL, $_SC, $_SCONFIG;
//包含模板
$_SGLOBAL['sub_tpls'] = array($tpl);
$tplfile = S_ROOT.'./'.$tpl.'.htm';
/*
$tplfile类似template/default/cp_blog.htm或者template/blue/cp_blog.htm
*/
$objfile = S_ROOT.'./data/tpl_cache/'.str_replace('/','_',$tpl).'.php';
/*
$objfile类似data/tpl_cache/template_default_cp_blog.php或者data/tpl_cache/template_blue_cp_blog.php
*/
//read
if(!file_exists($tplfile)) {
$tplfile = str_replace('/'.$_SCONFIG['template'].'/', '/default/', $tplfile);
//如果非默认模板风格的某个模板文件不存在，那么就改用default风格的该模板文件
}
$template = sreadfile($tplfile);
//读入模板文件内容
if(empty($template)) {
exit("Template file : $tplfile Not found or have no access!");
}
//模板
$template = preg_replace("/\<\!\-\-\{template\s+([a-z0-9_\/]+)\}\-\-\>/ie", "readtemplate('\\1')", $template);
/*
这就是定义UCH的模板语法了，模板页中的<!--{template name}-->
被替换成readtemplate(name),readtemplate函数也在function_template.php中定义。name就是([a-zA-Z0-9_\/]+)
为什么多了A-Z呢，因为"/\<\!\-\-\{template\s+([a-z0-9_\/]+)\}\-\-\>/ie"最后的i选项表示不区分大小写的正则匹配
python里的正则表达式分组，似乎就是用\1来表示第一组，这里用了\\1
\\1为什么又要用单引号裹起来呢，这是因为readtemplate函数的参数要是一个字符串
*/
//处理子页面中的代码
$template = preg_replace("/\<\!\-\-\{template\s+([a-z0-9_\/]+)\}\-\-\>/ie", "readtemplate('\\1')", $template);
//解析模块调用
$template = preg_replace("/\<\!\-\-\{block\/(.+?)\}\-\-\>/ie", "blocktags('\\1')", $template);
/*
<!--{block/name}-->被替换成blocktags(name)
name就是(.+?) .匹配除换行符外的任意字符，+表示出现一次或多次
?表示懒惰匹配，不然后面的\} \- \>都会被.+匹配掉
*/
//解析广告
$template = preg_replace("/\<\!\-\-\{ad\/(.+?)\}\-\-\>/ie", "adtags('\\1')", $template);
/*
<!--{ad/name}-->被替换成<!--adtags(name)-->
如space_doing.htm里有一个<!--{ad/header}-->被替换成了<!--AD_TAG_1-->
*/
//时间处理
$template = preg_replace("/\<\!\-\-\{date\((.+?)\)\}\-\-\>/ie", "datetags('\\1')", $template);
/*
<!--{date(name)}-->被替换成datetags(name)
如space_doing.htm里有一个
<!--{date('m-d H:i',$basevalue[dateline],1)}-->被替换成了<!--DATE_TAG_7-->
*/
//头像处理
$template = preg_replace("/\<\!\-\-\{avatar\((.+?)\)\}\-\-\>/ie", "avatartags('\\1')", $template);
/*
<!--{avatar(name)}-->被替换成avatartags(name)
如space_doing.htm里有一个<!--{avatar($_SGLOBAL[supe_uid],small)}-->被替换成了<!--AVATAR_TAG_10-->
*/
//PHP代码
$template = preg_replace("/\<\!\-\-\{eval\s+(.+?)\s*\}\-\-\>/ies", "evaltags('\\1')", $template);
/*
<!--{eval php_expression}-->被替换成evaltags(php_expression)
php_expression就是(.+?) 而且这里的.匹配包括换行符在内的一切字符 这是由/ies中的s选项确定的
如space_doing.htm里有一个<!--{eval echo formhash();}-->被替换成了<!--EVAL_TAG_16-->
*/
//开始处理
//变量
$var_regexp = "((\\\$[a-zA-Z_\x7f-\xff][a-zA-Z0-9_\x7f-\xff]*)(\[[a-zA-Z0-9_\-\.\"\'\[\]\$\x7f-\xff]+\])*)";
/*
上面用红色显示的\是转义符，没用红色显示的\就还是反斜杠
但是一开始为什么要用三个\，我搞不明白。试验了一下，\\\$匹配的就是$，而改成\$却没能匹配模板文件里的变量名。这个我还没搞明白。
$var_regexp匹配变量名
[a-zA-Z_\x7f-\xff] 变量名以字母或下划线或汉字开头
\x7f-\xff这个让人非常困惑，到底是想匹配什么呢？难道是想匹配扩展ASCII码吗？0x7f-0xff确实是扩展ASCII码表的范围，但显然没人会用这些控制字符去当变量名。
我这个UCH是UTF-8版本的，从UCS-2（就是现在通用的Unicode）到UTF-8的编码方式如下：
| UCS-2编码(16进制) | UTF-8 字节流(二进制) |
| 0000 - 007F | 0xxxxxxx |
| 0080 - 07FF | 110xxxxx 10xxxxxx |
| 0800 - FFFF | 1110xxxx 10xxxxxx 10xxxxxx |
前面的0000-007F是兼容ASCII码的
汉字的unicode编码在0080-FFFF里，转换成UTF-8后的字节是
110xxxxx或10xxxxxx或1110xxxx，在0x01111111-0x11111111范围内，也即0x7f-0xff。
更精确地，这个匹配变量名开头的部分可以写成[a-zA-Z_\xc0-\xef],因为汉字的开始字节只可能是110xxxxx或1110xxxx，范围就是0xc0-0xdf和0xe0-0xef
[a-zA-Z0-9_\x7f-\xff]* 比变量名的开头字节的允许取值范围多了数字，和C语言是一样的，变量名不能以数字开头
更精确地，这里可以写成[a-zA-Z0-9_\x80-\xef]* 因为这里汉字的字节可能是110xxxxx或1110xxxx或10xxxxxx，比0xc0-0xef多了10xxxxxx，即0x80-0xbf，合起来就是0x80-0xef
(\[[a-zA-Z0-9_\-\.\"\'\[\]\$\x7f-\xff]+\])*
变量可能是数组形式的，如$name1[$name2]，\$[a-zA-Z_\x7f-\xff][a-zA-Z0-9_\x7f-\xff]*匹配了$name1，后面的[$name2]怎么匹配呢？我一开始以为是\[\$[a-zA-Z_\x7f-\xff][a-zA-Z0-9_\x7f-\xff]\],因为[]里面也应该是一个变量名。
但是变量可能是嵌套数组形式的，如$name1[$name2[$name3[$name4]]]，此时用\$[a-zA-Z_\x7f-\xff][a-zA-Z0-9_\x7f-\xff]来一个个匹配变量名明显不可行。所以只是用[]把可能的字符都框起来，希望程序员不要写太扯淡的变量名了。
*/
$template = preg_replace("/\<\!\-\-\{(.+?)\}\-\-\>/s", "{\\1}", $template);
/*
形如<!--{name}-->的字符串被替换成{name}
前面 解析广告，时间处理等产生的<!--EVAL_TAG_15-->等都不匹配，仍然保留
name就是(.+?) 这里的.匹配包括换行符在内的所有字符（有/s选项） ?表示懒惰匹配
*/
$template = preg_replace("/([\n\r]+)\t+/s", "\\1", $template);
/*
去掉换行回车后的制表符
beyondcompare中的对比效果如下
*/
$template = preg_replace("/(\\\$[a-zA-Z0-9_\[\]\'\"\$\x7f-\xff]+)\.([a-zA-Z_\x7f-\xff][a-zA-Z0-9_\x7f-\xff]*)/s", "\\1['\\2']", $template);
/*
形如$name1.name2替换成$name1[name2],不要搞成了$name1['name2']，'\\2'和"\\1"都是正则表达式的后向引用。可是我在模板文件中还没找到例子
*/
$template = preg_replace("/\{(\\\$[a-zA-Z0-9_\[\]\'\"\$\.\x7f-\xff]+)\}/s", "<?=\\1?>", $template);
/*
形如{$name1}替换成<?=$name1?>
如space_doing.htm里有{$_SN[$space[uid]]}被换成了
<?=$_SN[$space[uid]]?>
*/
$template = preg_replace("/$var_regexp/es", "addquote('<?=\\1?>')", $template);
/*
将没有被{}包裹的变量名替换成addquote('<?=\\1?>')
addquote的作用是将类似[name]转换成[‘name’]
如space_doing.htm里有{if $space}被替换成了{if <?=$space?>}
但是这样也有副作用，比如space_doing.htm里有{$_SN[$space[uid]]}，在上一条语句中被替换成了<?=$_SN[$space[uid]]?>，在这又被替换成了<?=<?=$_SN[$space['uid']]?>?>
*/
$template = preg_replace("/\<\?\=\<\?\=$var_regexp\?\>\?\>/es", "addquote('<?=\\1?>')", $template);
/*
消除上一条语句的副作用，将<?=<?=$_SN[$space['uid']]?>?>换成<?=$_SN[$space['uid']]?>
*/
//逻辑
$template = preg_replace("/\{elseif\s+(.+?)\}/ies", "stripvtags('<?php } elseif(\\1) { ?>','')", $template);
/*
{elseif expression1} 替换成stripvtags('<?php } elseif(expression1) { ?>','')
stripvtags的作用是将类似<?=$name?>替换成$name
*/
$template = preg_replace("/\{else\}/is", "<?php } else { ?>", $template);
/*
{else} 替换成<?php } else { ?>
*/
//循环
for($i = 0; $i < 5; $i++) {
$template = preg_replace("/\{loop\s+(\S+)\s+(\S+)\}(.+?)\{\/loop\}/ies", "stripvtags('<?php if(is_array(\\1)) { foreach(\\1 as \\2) { ?>','\\3<?php } } ?>')", $template);
/*
解析loop
将类似{loop array1 key1} expression1 {/loop}替换成
stripvtags（
<’?php if(is_array(array1)) {foreach (array1 as key1){?>’,
‘expression1<?php } } ?>’
）
如space_doing.htm里将
<title>{if <?=$_TPL['titles']?>}{loop <?=$_TPL['titles']?> <?=$value?>}{if <?=$value?>}<?=$value?> - {/if}{/loop}{/if}{if <?=$space?>}<?=$_SN[$space['uid']]?> - {/if}<?=$_SCONFIG['sitename']?>
替换成了
<title>{if <?=$_TPL['titles']?>}<?php if(is_array($_TPL['titles'])) { foreach($_TPL['titles'] as $value) { ?>{if <?=$value?>}<?=$value?> - {/if}<?php } } ?>{/if}{if <?=$space?>}<?=$_SN[$space['uid']]?> - {/if}<?=$_SCONFIG['sitename']?>
*/
$template = preg_replace("/\{loop\s+(\S+)\s+(\S+)\s+(\S+)\}(.+?)\{\/loop\}/ies", "stripvtags('<?php if(is_array(\\1)) { foreach(\\1 as \\2 => \\3) { ?>','\\4<?php } } ?>')", $template);
/*
解析loop
将类似{loop array1 key1 value1} expression1 {/loop}替换成
stripvtags（
<’?php if(is_array(array1)) {foreach (array1 as key1=>value1){?>’,
‘expression1<?php } } ?>’
）
如space_doing.htm里将
{loop <?=$moodlist?> <?=$key?> <?=$value?>}
<li>
<div class="avatar48"><a href="space.php?uid=<?=$value['uid']?>&do=doing"><img src="<!--AVATAR_TAG_14-->" alt="<?=$_SN[$value['uid']]?>" /></a></div>
<p><a href="space.php?uid=<?=$value['uid']?>" title="<?=$_SN[$value['uid']]?>"><?=$_SN[$value['uid']]?></a></p>
<p class="time"><!--DATE_TAG_9--></p>
</li>
{/loop}
替换成了
<?php if(is_array($moodlist)) { foreach($moodlist as $key => $value) { ?>
<li>
<div class="avatar48"><a href="space.php?uid=<?=$value['uid']?>&do=doing"><img src="<!--AVATAR_TAG_14-->" alt="<?=$_SN[$value['uid']]?>" /></a></div>
<p><a href="space.php?uid=<?=$value['uid']?>" title="<?=$_SN[$value['uid']]?>"><?=$_SN[$value['uid']]?></a></p>
<p class="time"><!--DATE_TAG_9--></p>
</li>
<?php } } ?>
*/
$template = preg_replace("/\{if\s+(.+?)\}(.+?)\{\/if\}/ies", "stripvtags('<?php if(\\1) { ?>','\\2<?php } ?>')", $template);
/*
解析if
将类似
{if name1} expression1 {/if}
替换成
stripvtags(
<’?php if(name1) { ?>’,
‘expression1<?php } ?>’
)
如space_doing.htm里将
{if empty(<?=$_SGLOBAL['inajax']?>)}
替换成
<?php if(empty($_SGLOBAL['inajax'])) { ?>
*/
}/*for循环结束*/
/*
为什么要有for循环呢？因为可能存在循环语句嵌套的情况。
比如space_doing.htm里有这么一段代码
{loop <?=$list?> <?=$basevalue?>}
………
………
{loop <?=$clist[$basevalue['doid']]?> <?=$value?>}
………
{/loop}
………
{/loop}
$i=0时，
$template = preg_replace("/\{loop\s+(\S+)\s+(\S+)\}(.+?)\{\/loop\}/ies", "stripvtags('<?php if(is_array(\\1)) { foreach(\\1 as \\2) { ?>','\\3<?php } } ?>')", $template);
只替换掉了外层的loop，内层的loop被(.+?)所匹配
?表示懒惰匹配，否则后面的{/loop}都会被(.+)所匹配
但是既然是懒惰匹配，为什么(.+?)不是匹配到内层的{/loop}就停止呢？
因为正则表达式有另一条规则，比懒惰／贪婪规则的优先级更高：最先开始的匹配拥有最高的优先权——The match that begins earliest wins。
$i=1时，内层的loop也将被替换掉
从这个for循环我们也可以看出，UCH的模板中最多允许5层嵌套循环，当然这已经足够了
*/
//常量
$template = preg_replace("/\{([a-zA-Z_\x7f-\xff][a-zA-Z0-9_\x7f-\xff]*)\}/s", "<?=\\1?>", $template);
/*
比变量名少了一开始的$，也不考虑数组形式的常量
*/
//替换
if(!empty($_SGLOBAL['block_search'])) {
$template = str_replace($_SGLOBAL['block_search'], $_SGLOBAL['block_replace'], $template);
}
//换行
$template = preg_replace("/ \?\>[\n\r]*\<\? /s", " ", $template);
/*
?>
<?
前一段php代码的结尾和下一段php代码的开始都被以空格代替了
*/
//附加处理
$template = "<?php if(!defined('IN_UCHOME')) exit('Access Denied');?><?php subtplcheck('".implode('|', $_SGLOBAL['sub_tpls'])."', '$_SGLOBAL[timestamp]', '$tpl');?>$template<?php ob_out();?>";
//write
if(!swritefile($objfile, $template)) {
exit("File: $objfile can not be write!");
}
/*
写入缓存文件
所以在template函数最后，无论$objfile一开始是否存在，最后都是返回$objfile
*/
}
function readtemplate($name) {
global $_SGLOBAL, $_SCONFIG;
$tpl = strexists($name,'/')?$name:"template/$_SCONFIG[template]/$name";
$tplfile = S_ROOT.'./'.$tpl.'.htm';
$_SGLOBAL['sub_tpls'][] = $tpl;
if(!file_exists($tplfile)) {
$tplfile = str_replace('/'.$_SCONFIG['template'].'/', '/default/', $tplfile);
}
/*
如果$_SCONFIG['template']风格的模板文件不存在，则改用default风格的模板文件
*/
$content = sreadfile($tplfile);
//读入模板文件的内容
return $content;
}
function addquote($var) {
return str_replace("\\\"", "\"", preg_replace("/\[([a-zA-Z0-9_\-\.\x7f-\xff]+)\]/s", "['\\1']", $var));
/*
这个preg_replace感觉没什么用啊，[name1]替换成[name1]？
str_replace将\\\"替换成\"
*/
}
function blocktags($parameter) {
global $_SGLOBAL;
$_SGLOBAL['i']++;
$search = "<!--BLOCK_TAG_{$_SGLOBAL['i']}-->";
/*
按广告出现的次序，依次将{block/name}替换成BLOCK_TAG_1 BLOCK_TAG_2等等
*/
$_SGLOBAL['block_search'][$_SGLOBAL['i']] = $search;
$_SGLOBAL['block_replace'][$_SGLOBAL['i']] = "<?php block(\"$parameter\"); ?>";
return $search;
}
function adtags($pagetype) {
global $_SGLOBAL;
$_SGLOBAL['i']++;
$search = "<!--AD_TAG_{$_SGLOBAL['i']}-->";
/*
按广告出现的次序，依次将{ad/name}替换成AD_TAG_3 AD_TAG_4等等
这个编号是跟着前面的BLOCK_TAG来的
*/
$_SGLOBAL['block_search'][$_SGLOBAL['i']] = $search;
$_SGLOBAL['block_replace'][$_SGLOBAL['i']] = "<?php adshow('$pagetype'); ?>";
return $search;
}
function datetags($parameter) {
global $_SGLOBAL;
$_SGLOBAL['i']++;
$search = "<!--DATE_TAG_{$_SGLOBAL['i']}-->";
/*
按date模板方法出现的次序，依次将{date(name)}替换成DATE_TAG_7 DATE_TAG_8等等
注意这里的编号是跟着前面的AD_TAG来的
*/
$_SGLOBAL['block_search'][$_SGLOBAL['i']] = $search;
$_SGLOBAL['block_replace'][$_SGLOBAL['i']] = "<?php echo sgmdate($parameter); ?>";
return $search;
}
function avatartags($parameter) {
global $_SGLOBAL;
$_SGLOBAL['i']++;
$search = "<!--AVATAR_TAG_{$_SGLOBAL['i']}-->";
/*
按avatar模板方法出现的次序，依次将{avatar(name)}替换成AVATAR_TAG_9 AVATAR_TAG_10等等
注意这里的编号是跟着前面的DATE_TAG来的
*/
$_SGLOBAL['block_search'][$_SGLOBAL['i']] = $search;
$_SGLOBAL['block_replace'][$_SGLOBAL['i']] = "<?php echo avatar($parameter); ?>";
return $search;
}
function evaltags($php) {
global $_SGLOBAL;
$_SGLOBAL['i']++;
$search = "<!--EVAL_TAG_{$_SGLOBAL['i']}-->";
/*
按eval模板方法出现的次序，依次将{eval php_expression}替换成EVAL_TAG_16 EVAL_TAG_17等等
注意这里的编号是跟着前面的AVATAR_TAG来的
*/
$_SGLOBAL['block_search'][$_SGLOBAL['i']] = $search;
$_SGLOBAL['block_replace'][$_SGLOBAL['i']] = "<?php ".stripvtags($php)." ?>";
return $search;
}
function addquote($var) {
return str_replace("\\\"", "\"", preg_replace("/\[([a-zA-Z0-9_\-\.\x7f-\xff]+)\]/s", "['\\1']", $var));
/*
preg_replace将类似[name]转换成[‘name’]
str_replace将\\\转换成\ 不过我还没找到例子
*/
}
function stripvtags($expr, $statement='') {
$expr = str_replace("\\\"", "\"", preg_replace("/\<\?\=(\\\$.+?)\?\>/s", "\\1", $expr));
/*
preg_replace将<?=$name?>替换成$name
*/
$statement = str_replace("\\\"", "\"", $statement);
return $expr.$statement;
}