<?php

if (!defined('PLUGIN_CACHE_FILE_EXPIRE_MAX')) {
    define('PLUGIN_CACHE_FILE_EXPIRE_MAX', 2592000);
}

/**
 * File class
 */
/**
 * Class Plugin_Cache_File
 */
class Plugin_Cache_File
{
    /**
     * Path to cache dir
     *
     * @var string
     */
    var $_cache_dir = '';

    /**
     * File locking
     *
     * @var boolean
     */
    var $_locking = false;

    /**
     * PHP5 constructor
     *
     * @param array $config
     */
    function __construct($config = array())
    {
        $cache_dir = isset($config['cache_dir']) ? trim($config['cache_dir']) :WP_CONTENT_DIR.'/apptivo-cache';
        if(!@is_dir($cache_dir))
            if(@mkdir ($cache_dir))
                 @chmod($cache_dir, 0755);
        $this->_cache_dir = $cache_dir;
        $this->_locking = isset($config['locking']) ? (boolean) $config['locking'] : false;
    }

    /**
     * PHP4 constructor
     *
     * @paran array $config
     * @return W3_Cache_File
     */
    function Plugin_Cache_File($config = array())
    {
        $this->__construct($config);
    }

    /**
     * Adds data
     *
     * @param string $key
     * @param mixed $var
     * @param integer $expire
     * @return boolean
     */
    function add($key, &$var, $expire = 0)
    {
        if ($this->get($key) === false) {
            return $this->set($key, $var, $expire);
        }

        return false;
    }

    /**
     * Sets data
     *
     * @param string $key
     * @param mixed $var
     * @param integer $expire
     * @return boolean
     */
    function set($key, &$var, $expire = 0)
    {
        $sub_path = $this->_get_path($key); 
        $path = $this->_cache_dir . '/' . $sub_path;
        $sub_dir = dirname($sub_path);
        $dir = dirname($path);
        if ((@is_dir($dir) || awp_mkdir($sub_dir, 0755, $this->_cache_dir))) {
            $fp = @fopen($path, 'wb');

            if ($fp) {
                if ($this->_locking) {
                    @flock($fp, LOCK_EX);
                }

                @fputs($fp, pack('L', $expire));
                @fputs($fp, @serialize($var));
                @fclose($fp);

                if ($this->_locking) {
                    @flock($fp, LOCK_UN);
                }
                return true;
            }
        }
        return false;
    }

    /**
     * Returns data
     *
     * @param string $key
     * @return mixed
     */
    function get($key)
    {
        $var = false;
        $path = $this->_cache_dir . '/' . $this->_get_path($key);

        if (is_readable($path)) {
            $ftime = @filemtime($path);

            if ($ftime) {
                $fp = @fopen($path, 'rb');

                if ($fp) {
                    if ($this->_locking) {
                        @flock($fp, LOCK_SH);
                    }

                    $expires = @fread($fp, 4);

                    if ($expires !== false) {
                        list(, $expire) = @unpack('L', $expires);
                        $expire = ($expire && $expire <= PLUGIN_CACHE_FILE_EXPIRE_MAX ? $expire : PLUGIN_CACHE_FILE_EXPIRE_MAX);

                        if ($ftime > time() - $expire) {
                            $data = '';

                            while (!@feof($fp)) {
                                $data .= @fread($fp, 4096);
                            }

                            $var = @unserialize($data);
                        }
                    }

                    if ($this->_locking) {
                        @flock($fp, LOCK_UN);
                    }

                    @fclose($fp);
                }
            }
        }

        return $var;
    }

    /**
     * Replaces data
     *
     * @param string $key
     * @param mixed $var
     * @param integer $expire
     * @return boolean
     */
    function replace($key, &$var, $expire = 0)
    {
        if ($this->get($key) !== false) {
            return $this->set($key, $var, $expire);
        }

        return false;
    }

    /**
     * Deletes data
     *
     * @param string $key
     * @return boolean
     */
    function delete($key)
    {
        $path = $this->_cache_dir . '/' . $this->_get_path($key);

        if (file_exists($path)) {
            return @unlink($path);
        }

        return false;
    }

    /**
     * Flushes all data
     *
     * @return boolean
     */
    function flush()
    {
        @set_time_limit(180);

        awp_emptydir($this->_cache_dir);

        return true;
    }

    /**
     * Returns modification time of cache file
     *
     * @param integer $key
     */
    function mtime($key)
    {
        $path = $this->_cache_dir . '/' . $this->_get_path($key);

        if (file_exists($path)) {
            return @filemtime($path);
        }

        return false;
    }

    /**
     * Returns file path for key
     *
     * @param string $key
     * @return string
     */
    function _get_path($key)
    {
        $hash = md5($key);
        $path = sprintf('%s/%s/%s/%s', substr($hash, 0, 1), substr($hash, 1, 1), substr($hash, 2, 1), $hash);

        return $path;
    }
}
?>