How to cache php files

<?php 
class cache
{ 
 private static $_instance = null;

 protected $_options = array(
  &#39;cache_dir&#39;  => "./",
  &#39;file_name_prefix&#39; => &#39;cache&#39;,
  &#39;mode&#39;   => &#39;1&#39;, //mode 1 为serialize model 2为保存为可执行文件
 ); 
 
 /**
  * 得到本类实例
  * 
  * @return Ambiguous
  */
 public static function getInstance()
 {
  if(self::$_instance === null)
  {
   self::$_instance = new self();
  }
  return self::$_instance;
 } 
 
 /**
  * 得到缓存信息
  * 
  * @param string $id
  * @return boolean|array
  */
 public static function get($id)
 {
  $instance = self::getInstance();
  
  //缓存文件不存在
  if(!$instance->has($id))
  {
   return false;
  }
  
  $file = $instance->_file($id);
  
  $data = $instance->_fileGetContents($file);
  
  if($data[&#39;expire&#39;] == 0 || time() < $data[&#39;expire&#39;])
  {
   return $data[&#39;contents&#39;];
  }
  return false;
 }
 
 /**
  * 设置一个缓存
  * 
  * @param string $id 缓存id
  * @param array $data 缓存内容
  * @param int $cacheLife 缓存生命 默认为0无限生命
  */
 public static function set($id, $data, $cacheLife = 0)
 {
  $instance = self::getInstance();
  
  $time = time();
  $cache   = array();
  $cache[&#39;contents&#39;] = $data;
  $cache[&#39;expire&#39;] = $cacheLife === 0 ? 0 : $time + $cacheLife;
  $cache[&#39;mtime&#39;] = $time;
  
  $file = $instance->_file($id);
  
  return $instance->_filePutContents($file, $cache);
 }
 
 /**
  * 清除一条缓存
  * 
  * @param string cache id  
  * @return void
  */ 
 public static function delete($id)
 {
  $instance = self::getInstance();
  
  if(!$instance->has($id))
  {
   return false;
  }
  $file = $instance->_file($id);
  //删除该缓存
  return unlink($file);
 }
 
 /**
  * 判断缓存是否存在
  * 
  * @param string $id cache_id
  * @return boolean true 缓存存在 false 缓存不存在
  */
 public static function has($id)
 {
  $instance = self::getInstance();
  $file  = $instance->_file($id);
  
  if(!is_file($file))
  {
   return false;
  }
  return true;
 }
 
 /**
  * 通过缓存id得到缓存信息路径
  * @param string $id
  * @return string 缓存文件路径
  */
 protected function _file($id)
 {
  $instance = self::getInstance();
  $fileNmae = $instance->_idToFileName($id);
  return $instance->_options[&#39;cache_dir&#39;] . $fileNmae;
 } 
 
 /**
  * 通过id得到缓存信息存储文件名
  * 
  * @param $id
  * @return string 缓存文件名
  */
 protected function _idToFileName($id)
 {
  $instance = self::getInstance();
  $prefix = $instance->_options[&#39;file_name_prefix&#39;];
  return $prefix . &#39;---&#39; . $id;
 }
 
 /**
  * 通过filename得到缓存id
  * 
  * @param $id
  * @return string 缓存id
  */
 protected function _fileNameToId($fileName)
 {
  $instance = self::getInstance();
  $prefix = $instance->_options[&#39;file_name_prefix&#39;];
  return preg_replace(&#39;/^&#39; . $prefix . &#39;---(.*)$/&#39;, &#39;$1&#39;, $fileName);
 }
 
 /**
  * 把数据写入文件
  * 
  * @param string $file 文件名称
  * @param array $contents 数据内容
  * @return bool 
  */
 protected function _filePutContents($file, $contents)
 {
  if($this->_options[&#39;mode&#39;] == 1)
  {
   $contents = serialize($contents);
  }
  else 
  {
   $time = time(); 
   $contents = "<?php\n".
     " // mktime: ". $time. "\n".
     " return ".
     var_export($contents, true).
     "\n?>";
  }
  
  $result = false;
  $f = @fopen($file, &#39;w&#39;);
  if ($f) {
   @flock($f, LOCK_EX);
   fseek($f, 0);
   ftruncate($f, 0);
   $tmp = @fwrite($f, $contents);
   if (!($tmp === false)) {
    $result = true;
   }
   @fclose($f);
  }
  @chmod($file,0777);
  return $result;    
 }
 
 /**
  * 从文件得到数据
  * 
  * @param sring $file
  * @return boolean|array
  */
 protected function _fileGetContents($file)
 {
  if(!is_file($file))
  {
   return false;
  }
  
  if($this->_options[&#39;mode&#39;] == 1)
  {
   $f = @fopen($file, &#39;r&#39;); 
   @$data = fread($f,filesize($file));
   @fclose($f);
   return unserialize($data);
  }
  else
  {
   return include $file;
  }
 }
 
 /**
  * 构造函数
  */
 protected function __construct()
 {
 
 }
 
 /**
  * 设置缓存路径
  * 
  * @param string $path
  * @return self
  */
 public static function setCacheDir($path)
 {
  $instance = self::getInstance();
  if (!is_dir($path)) {
   exit(&#39;file_cache: &#39; . $path.&#39; 不是一个有效路径 &#39;);
  }
  if (!is_writable($path)) {
   exit(&#39;file_cache: 路径 "&#39;.$path.&#39;" 不可写&#39;);
  }
 
  $path = rtrim($path,&#39;/&#39;) . &#39;/&#39;;
  $instance->_options[&#39;cache_dir&#39;] = $path;
  
  return $instance;
 }
 
 /**
  * 设置缓存文件前缀
  * 
  * @param srting $prefix
  * @return self
  */
 public static function setCachePrefix($prefix)
 {
  $instance = self::getInstance();
  $instance->_options[&#39;file_name_prefix&#39;] = $prefix;
  return $instance;
 }
 
 /**
  * 设置缓存存储类型
  * 
  * @param int $mode
  * @return self
  */
 public static function setCacheMode($mode = 1)
 {
  $instance = self::getInstance();
  if($mode == 1)
  {
   $instance->_options[&#39;mode&#39;] = 1;
  }
  else
  {
   $instance->_options[&#39;mode&#39;] = 2;
  }
  
  return $instance;
 }
 
 /**
  * 删除所有缓存
  * @return boolean
  */
 public static function flush()
 {
  $instance = self::getInstance();
  $glob = @glob($instance->_options[&#39;cache_dir&#39;] . $instance->_options[&#39;file_name_prefix&#39;] . &#39;--*&#39;);
  
  if(empty($glob))
  {
   return false;
  }
  
  foreach ($glob as $v)
  {
   $fileName = basename($v);
   $id = $instance->_fileNameToId($fileName);
   $instance->delete($id);
  }
  return true;
 }
}

/* 初始化设置cache的配置信息什么的 */
cache::setCachePrefix(&#39;core&#39;); //设置缓存文件前缀
cache::setCacheDir(&#39;./cache&#39;); //设置存放缓存文件夹路径

//模式1 缓存存储方式
//a:3:{s:8:"contents";a:7:{i:0;i:1;i:1;i:2;i:2;i:3;i:3;i:34;i:4;i:5;i:5;i:6;i:6;i:6;}s:6:"expire";i:0;s:5:"mtime";i:1318218422;}
//模式2 缓存存储方式
/*
 <?php
 // mktime: 1318224645
 return array (
 &#39;contents&#39; => 
 array (
 0 => 1,
 1 => 2,
 2 => 3,
 3 => 34,
 4 => 5,
 5 => 6,
 6 => 6,
 ),
 &#39;expire&#39; => 0,
 &#39;mtime&#39; => 1318224645,
)
?>
 * 
 * 
 */
cache::setCacheMode(&#39;2&#39;);

if(!$row = cache::get(&#39;zj2&#39;))
{
 
 $array = array(1,2,3,34,5,6,6);
 $row = cache::set(&#39;zj2&#39;,$array);
}
// cache::flush(); 清空所有缓存

print_r($row);

<?php
/**
 * 文件缓存类
 * @author xiaojiong & 290747680@qq.com
 * @date 2011-08-17
 */
class cache
{
 const FILE_LIFE_KEY = &#39;FILE_LIFE_KEY&#39;;
  
 const CLEAR_ALL_KEY = &#39;CLEAR_ALL&#39;;
  
 static $_instance = null;
  
 protected $_options = array(
  &#39;cache_dir&#39; => &#39;./cache&#39;,
  &#39;file_locking&#39; => true,
  &#39;file_name_prefix&#39; => &#39;cache&#39;,
  &#39;cache_file_umask&#39; => 0777,
  &#39;file_life&#39; => 100000
 );
  
 static function &getInstance($options = array())
 {
  if(self::$_instance === null)
  {
   self::$_instance = new self($options);
  } 
  return self::$_instance;
 }
  
 /**
  * 设置参数
  * @param array $options 缓存参数
  * @return void
  */
 static function &setOptions($options = array())
 {
   return self::getInstance($options);
 }
  
 /**
  * 构造函数
  * @param array $options 缓存参数
  * @return void
  */
 private function __construct($options = array())
 {  
  if ($this->_options[&#39;cache_dir&#39;] !== null) {
    
   $dir = rtrim($this->_options[&#39;cache_dir&#39;],&#39;/&#39;) . &#39;/&#39;;
   $this->_options[&#39;cache_dir&#39;] = $dir;
    
   if (!is_dir($this->_options[&#39;cache_dir&#39;])) {
    mkdir($this->_options[&#39;cache_dir&#39;],0777,TRUE);
   }
   if (!is_writable($this->_options[&#39;cache_dir&#39;])) {
    exit(&#39;file_cache: 路径 "&#39;. $this->_options[&#39;cache_dir&#39;] .&#39;" 不可写&#39;);
   }
   
  } else {
   exit(&#39;file_cache: "options" cache_dir 不能为空 &#39;);
  }
 }
 
 /**
  * 设置缓存路径
  * @param string $value
  * @return void
  */
 static function setCacheDir($value)
 {
  $self = & self::getInstance();
   
  if (!is_dir($value)) {
   exit(&#39;file_cache: &#39; . $value.&#39; 不是一个有效路径 &#39;);
  }
  if (!is_writable($value)) {
   exit(&#39;file_cache: 路径 "&#39;.$value.&#39;" 不可写&#39;);
  }
  
  $value = rtrim($this->_options[&#39;cache_dir&#39;],&#39;/&#39;) . &#39;/&#39;;
   
  $self->_options[&#39;cache_dir&#39;] = $value;
 }
  
 /**
  * 存入缓存数据
  * @param array $data   放入缓存的数据
  * @param string $id   缓存id(又名缓存识别码)
  * @param cache_life   缓存时间
  * @return boolean True if no problem
  */
 static function save($data, $id = null, $cache_life = null)
 {
  $self = & self::getInstance();
  if (!$id) {
   if ($self->_id) {
    $id = $self->_id;
   } else {
    exit(&#39;file_cache:save() id 不能为空!&#39;);
   }
  }
  $time = time();
   
  if($cache_life) {
   $data[self::FILE_LIFE_KEY] = $time + $cache_life;
  }
  elseif
  ($cache_life != 0){
   $data[self::FILE_LIFE_KEY] = $time + $self->_options[&#39;file_life&#39;];
  }
   
  $file = $self->_file($id);
   
  $data = "<?php\n".
    " // mktime: ". $time. "\n".
    " return ".
    var_export($data, true).
    "\n?>"
    ;
   
  $res = $self->_filePutContents($file, $data);
  return $res;
 }
  
  
 /**
  * 得到缓存信息
  *
  * @param string $id 缓存id
  * @return string|array 缓存数据
  */
 static function load($id)
 {
  $self = & self::getInstance();
  $time = time();
  //检测缓存是否存在
  if (!$self->test($id)) {
   // The cache is not hit !
   return false;
  }
   
  //全部清空识别文件
  $clearFile = $self->_file(self::CLEAR_ALL_KEY);
   
  $file = $self->_file($id);
   
  //判断缓存是否已被全部清除
  if(is_file($clearFile) && filemtime($clearFile) > filemtime($file))
  {
   return false;
  }
  
  $data = $self->_fileGetContents($file);
  if(empty($data[self::FILE_LIFE_KEY]) || $time < $data[self::FILE_LIFE_KEY]) {
   unset($data[self::FILE_LIFE_KEY]); 
   return $data;   
  }
  return false;
 } 
  
 /**
  * 写入缓存文件
  *
  * @param string $file 缓存路径
  * @param string $string 缓存信息
  * @return boolean true 成功
  */
 protected function _filePutContents($file, $string)
 {
  $self = & self::getInstance();
  $result = false;
  $f = @fopen($file, &#39;ab+&#39;);
  if ($f) {
   if ($self->_options[&#39;file_locking&#39;]) @flock($f, LOCK_EX);
   fseek($f, 0);
   ftruncate($f, 0);
   $tmp = @fwrite($f, $string);
   if (!($tmp === false)) {
    $result = true;
   }
   @fclose($f);
  }
  @chmod($file, $self->_options[&#39;cache_file_umask&#39;]);
  return $result;
 }
  
 /**
  * 格式化后的缓存文件路径
  *
  * @param string $id 缓存id
  * @return string 缓存文件名(包括路径)
  */
 protected function _file($id)
 {
  $self = & self::getInstance();
  $fileName = $self->_idToFileName($id);
  return $self->_options[&#39;cache_dir&#39;] . $fileName;
 } 
  
 /**
  * 格式化后的缓存文件名字
  *
  * @param string $id 缓存id
  * @return string 缓存文件名
  */
 protected function _idToFileName($id)
 {
  $self = & self::getInstance();
  $self->_id = $id;
  $prefix = $self->_options[&#39;file_name_prefix&#39;];
  $result = $prefix . &#39;---&#39; . $id;
  return $result;
 } 
  
 /**
  * 判断缓存是否存在
  *
  * @param string $id Cache id
  * @return boolean True 缓存存在 False 缓存不存在
  */
 static function test($id)
 {
  $self = & self::getInstance();
  $file = $self->_file($id);
   
  if (!is_file($file)) {
   return false;
  }
   
  return true;
 }
  
 /**
  * 得到缓存信息
  *
  * @param string $file 缓存路径
  * @return string 缓存内容
  */
 protected function _fileGetContents($file)
 {
  if (!is_file($file)) {
   return false;
  }
  return include $file;
 }  
  
 /**
  * 清除所有缓存
  * 
  * @return void
  */ 
 static function clear()
 {
  $self = & self::getInstance();
  $self->save(&#39;CLEAR_ALL&#39;,self::CLEAR_ALL_KEY); 
 } 
  
 /**
  * 清除一条缓存
  * 
  * @param string cache id 
  * @return void
  */ 
 static function del($id)
 {
  $self = & self::getInstance();
  if(!$self->test($id)){
   // 该缓存不存在
   return false;
  }
  $file = $self->_file($id);
  return unlink($file);
 } 
}