php仿照asp實現application緩衝的代碼分享

標籤：this   check   close   discuz   add   strlen   style   fopen   目錄   

php 怎麼沒有asp 那樣的application緩衝呢？最近我找了很多，都只有自己寫，下面我分享一段代碼

class php_cache{    //相對或者絕對目錄，末尾不要加 ‘/‘    var $cache_dir = ‘./cache‘;    var $cache_extension = ‘.cache.php‘;     function set_cache($name, $value){        $pre = "< ?\n//Cache Created at: ".date(‘Y-m-d H:i:s‘)."\n";        if(!is_array($value)){            $value = $value;            $str = "\$$name = ‘$value‘;";        }else{            $str = "\$$name = " . $this->arrayeval($value) . ‘;‘;        }        $end = "\n?>";        echo $cache = $pre . $str . $end;        $cache_file = $this->cache_dir . ‘/‘ . $name . $this->cache_extension;         if($fp = @fopen($cache_file, ‘wb‘)) {            fwrite($fp, $cache);            fclose($fp);            return true;        } else {            echo $cache_file;            exit(‘Can not write to cache files, please check cache directory ‘);            return false;        }    }     //將array變成字串, 來自discuz!    function arrayeval($array, $level = 0) {         if(!is_array($array)) {            return "‘".$array."‘";        }         $space = ‘‘;        for($i = 0; $i < = $level; $i++) {            $space .= "\t";        }        $evaluate = "Array\n$space(\n";        $comma = $space;        if(is_array($array)) {            foreach($array as $key => $val) {                $key = is_string($key) ? ‘\‘‘.addcslashes($key, ‘\‘\\‘).‘\‘‘ : $key;                $val = !is_array($val) && (!preg_match("/^\-?[1-9]\d*$/", $val) || strlen($val) > 12) ? ‘\‘‘.addcslashes($val, ‘\‘\\‘).‘\‘‘ : $val;                if(is_array($val)) {                    $evaluate .= "$comma$key => ".arrayeval($val, $level + 1);                } else {                    $evaluate .= "$comma$key => $val";                }                $comma = ",\n$space";            }        }        $evaluate .= "\n$space)";        return $evaluate;    }}

調用代碼如下：

include ‘./phpcache_class.php‘;$pc = new php_cache;$a = array(‘a‘, ‘b‘, ‘c‘);$pc->set_cache(‘a‘, addslashes($a));

 

php仿照asp實現application緩衝的代碼分享