今天改了一天也没弄出来的一个 PHP bug 我要哭了 大家帮忙看看

<?php

function template($file, $templateid = 0) {
    $templateid = $templateid ? $templateid : TEMPLATEID;
    $tplfile = TPLDIR.$file.'.html';
    $objfile = TPLDIR_C.$templateid.'_'.$file.'.tpl.php';
    checktplrefresh($tplfile, $tplfile, @filemtime($objfile), $templateid);
    return $objfile;
}

function checktplrefresh($maintpl, $subtpl, $timecompare, $templateid,$tpldir=null) {
    if(empty($timecompare) || TPLREFRESH == 1 || (TPLREFRESH > 1 && !($GLOBALS['timestamp'] % TPLREFRESH))) {
        if(empty($timecompare) || @filemtime($subtpl) > $timecompare) {
            parse_template($maintpl, $templateid);
            return TRUE;
        }
    }
    return  FALSE;
}

function parse_template($tplfile, $templateid) {
    global $language;
    $nest = 6;
    $file = basename($tplfile, '.html');
    $objfile = TPLDIR_C.$templateid."_".$file.".tpl.php";

    if(!@$fp = fopen($tplfile, 'r')) {
        die("Current template file './".TPLDIR."/$file.html' not found or have no access.");
    }

    $template = @fread($fp, filesize($tplfile));
    fclose($fp);

    $var_regexp = "((\\\$[a-zA-Z_\x7f-\xff][a-zA-Z0-9_\x7f-\xff]*)(\[[a-zA-Z0-9_\-\.\"\'\[\]\$\x7f-\xff]+\])*)";
    $const_regexp = "([a-zA-Z_\x7f-\xff][a-zA-Z0-9_\x7f-\xff]*)";

    $template = preg_replace("/([\n\r]+)\t+/s", "\\1", $template);
    $template = preg_replace("/\<\!\-\-\{{(.+?)\}}\-\-\>/s", "{{\\1}}", $template);
    $template = preg_replace("/\{{lang\s+(.+?)\}}/ies", "languagevar('\\1')", $template);
    $template = str_replace("{{LF}}", "<?=\"\\n\"?>", $template);

    $template = preg_replace("/\{{(\\\$[a-zA-Z0-9_\[\]\'\"\$\.\x7f-\xff]+)\}}/s", "<?=\\1?>", $template);

    $template = preg_replace("/[\n\r\t]*\{{template\s+([a-z0-9_]+)\}}[\n\r\t]*/is", "\n<? include template('\\1'); ?>\n", $template);
    $template = preg_replace("/[\n\r\t]*\{{template\s+(.+?)\}}[\n\r\t]*/is", "\n<? include template('\\1'); ?>\n", $template);
    $template = preg_replace("/[\n\r\t]*\{{eval\s+(.+?)\}}[\n\r\t]*/ies", "stripvtags('<? \\1 ?>','')", $template);
    $template = preg_replace("/[\n\r\t]*\{{echo\s+(.+?)\}}[\n\r\t]*/ies", "stripvtags('<? echo \\1; ?>','')", $template);
    $template = preg_replace("/([\n\r\t]*)\{{elseif\s+(.+?)\}}([\n\r\t]*)/ies", "stripvtags('\\1<? } elseif(\\2) { ?>\\3','')", $template);
    $template = preg_replace("/([\n\r\t]*)\{{else\}}([\n\r\t]*)/is", "\\1<? } else { ?>\\2", $template);

    for($i = 0; $i < $nest; $i++) {
        $template = preg_replace("/[\n\r\t]*\{{loop\s+(\S+)\s+(\S+)\}}[\n\r]*(.+?)[\n\r]*\{{\/loop\}}[\n\r\t]*/ies", "stripvtags('<? if(is_array(\\1)) { foreach(\\1 as \\2) { ?>','\\3<? } } ?>')", $template);
        $template = preg_replace("/[\n\r\t]*\{{loop\s+(\S+)\s+(\S+)\s+(\S+)\}}[\n\r\t]*(.+?)[\n\r\t]*\{{\/loop\}}[\n\r\t]*/ies", "stripvtags('<? if(is_array(\\1)) { foreach(\\1 as \\2 => \\3) { ?>','\\4<? } } ?>')", $template);
        $template = preg_replace("/([\n\r\t]*)\{{if\s+(.+?)\}}([\n\r]*)(.+?)([\n\r]*)\{{\/if\}}([\n\r\t]*)/ies", "stripvtags('\\1<? if(\\2) { ?>\\3','\\4\\5<? } ?>\\6')", $template);

        //$template_back = preg_replace_callback ("/([\n\r\t]*)\{{if\s+(.+?)\}}([\n\r]*)(.+?)([\n\r]*)\{{\/if\}}([\n\r\t]*)/is", "match_call_back", $template); 
    }

    $template = preg_replace("/ \?\>[\n\r]*\<\? /s", " ", $template);

    if(!@$fp = fopen($objfile, 'w')) {
        die("Directory:".$objfile." not found or have no access.");
    }

    $template = preg_replace("/\"(http)?[\w\.\/:]+\?[^\"]+?&[^\"]+?\"/e", "transamp('\\0')", $template);
    $template = preg_replace("/\<script[^\>]*?src=\"(.+?)\"(.*?)\>\s*\<\/script\>/ise", "stripscriptamp('\\1', '\\2')", $template);

    flock($fp, 2);
    fwrite($fp, $template);
    fclose($fp);
}

$language = array
(
    //'add_to_cart' => 'Add to cart',
    'login_input_missing' => 'Missing login input.',
);

function languagevar($var) {
    global $language;
    if(isset($language[$var])) {
        return $language[$var];
    } else {
        return $var;
    }
}


function transamp($str) {
    $str = str_replace('&', '&amp;', $str);
    $str = str_replace('&amp;amp;', '&amp;', $str);
    $str = str_replace('\"', '"', $str);
    return $str;
}

function stripvtags($expr, $statement) {
    $expr = str_replace("\\\"", "\"", preg_replace("/\<\?\=(\\\$.+?)\?\>/s", "\\1", $expr));
    $statement = str_replace("\\\"", "\"", $statement);
    return $expr.$statement;
}

function stripscriptamp($s, $extra) {
    $extra = str_replace('\\"', '"', $extra);
    $s = str_replace('&amp;', '&', $s);
    return "<script src=\"$s\" type=\"text/javascript\"$extra></script>";
}

function match_call_back($matches) {
    return stripvtags($matches[1] . '<? if(' . $matches[2] . ') { ?>' .   $matches[3], $matches[4] . $matches[5] . '<? } ?>' . $matches[6]);
}
?>

$template = preg_replace("/([\n\r\t]*)\{{if\s+(.+?)\}}([\n\r]*)(.+?)([\n\r]*)\{{\/if\}}([\n\r\t]*)/ies", "stripvtags('\\1<? if(\\2) { ?>\\3','\\4\\5<? } ?>\\6')", $template);

$template_back = preg_replace_callback ("/([\n\r\t]*)\{{if\s+(.+?)\}}([\n\r]*)(.+?)([\n\r]*)\{{\/if\}}([\n\r\t]*)/is", "match_call_back", $template); 

function match_call_back($matches) {
    return stripvtags($matches[1] . '<? if(' . $matches[2] . ') { ?>' .   $matches[3], $matches[4] . $matches[5] . '<? } ?>' . $matches[6]);
}