<?php

/**

 * Zend Framework

 *

 * LICENSE

 *

 * This source file is subject to the new BSD license that is bundled

 * with this package in the file LICENSE.txt.

 * It is also available through the world-wide-web at this URL:

 * http://framework.zend.com/license/new-bsd

 * If you did not receive a copy of the license and are unable to

 * obtain it through the world-wide-web, please send an email

 * to license@zend.com so we can send you a copy immediately.

 *

 * @category   Zend

 * @package    Zend_Cache

 * @subpackage Zend_Cache_Backend

 * @copyright  Copyright (c) 2005-2015 Zend Technologies USA Inc. (http://www.zend.com)

 * @license    http://framework.zend.com/license/new-bsd     New BSD License

 * @version    $Id$

 */

/**

 * @see Zend_Cache_Backend_Interface

 */

require_once 'Zend/Cache/Backend/ExtendedInterface.php';

/**

 * @see Zend_Cache_Backend

 */

require_once 'Zend/Cache/Backend.php';

/**

 * @package    Zend_Cache

 * @subpackage Zend_Cache_Backend

 * @copyright  Copyright (c) 2005-2015 Zend Technologies USA Inc. (http://www.zend.com)

 * @license    http://framework.zend.com/license/new-bsd     New BSD License

 */

class Zend_Cache_Backend_File extends Zend_Cache_Backend implements Zend_Cache_Backend_ExtendedInterface

{

    /**

     * Available options

     *

     * =====> (string) cache_dir :

     * - Directory where to put the cache files

     *

     * =====> (boolean) file_locking :

     * - Enable / disable file_locking

     * - Can avoid cache corruption under bad circumstances but it doesn't work on multithread

     * webservers and on NFS filesystems for example

     *

     * =====> (boolean) read_control :

     * - Enable / disable read control

     * - If enabled, a control key is embeded in cache file and this key is compared with the one

     * calculated after the reading.

     *

     * =====> (string) read_control_type :

     * - Type of read control (only if read control is enabled). Available values are :

     *   'md5' for a md5 hash control (best but slowest)

     *   'crc32' for a crc32 hash control (lightly less safe but faster, better choice)

     *   'adler32' for an adler32 hash control (excellent choice too, faster than crc32)

     *   'strlen' for a length only test (fastest)

     *

     * =====> (int) hashed_directory_level :

     * - Hashed directory level

     * - Set the hashed directory structure level. 0 means "no hashed directory

     * structure", 1 means "one level of directory", 2 means "two levels"...

     * This option can speed up the cache only when you have many thousands of

     * cache file. Only specific benchs can help you to choose the perfect value

     * for you. Maybe, 1 or 2 is a good start.

     *

     * =====> (int) hashed_directory_umask :

     * - deprecated

     * - Permissions for hashed directory structure

     *

     * =====> (int) hashed_directory_perm :

     * - Permissions for hashed directory structure

     *

     * =====> (string) file_name_prefix :

     * - prefix for cache files

     * - be really carefull with this option because a too generic value in a system cache dir

     *   (like /tmp) can cause disasters when cleaning the cache

     *

     * =====> (int) cache_file_umask :

     * - deprecated

     * - Permissions for cache files

     *

     * =====> (int) cache_file_perm :

     * - Permissions for cache files

     *

     * =====> (int) metatadatas_array_max_size :

     * - max size for the metadatas array (don't change this value unless you

     *   know what you are doing)

     *

     * @var array available options

     */

    protected $_options = array(

        'cache_dir' => null,

        'file_locking' => true,

        'read_control' => true,

        'read_control_type' => 'crc32',

        'hashed_directory_level' => 0,

        'hashed_directory_perm' => 0700,

        'file_name_prefix' => 'zend_cache',

        'cache_file_perm' => 0600,

        'metadatas_array_max_size' => 100

    );

    /**

     * Array of metadatas (each item is an associative array)

     *

     * @var array

     */

    protected $_metadatasArray = array();

    /**

     * Constructor

     *

     * @param  array $options associative array of options

     * @throws Zend_Cache_Exception

     */

    public function __construct(array $options = array())

    {

        parent::__construct($options);

        if ($this->_options['cache_dir'] !== null) { // particular case for this option

            $this->setCacheDir($this->_options['cache_dir']);

        } else {

            $this->setCacheDir(self::getTmpDir() . DIRECTORY_SEPARATOR, false);

        }

        if (isset($this->_options['file_name_prefix'])) { // particular case for this option

            if (!preg_match('~^[a-zA-Z0-9_]+$~D', $this->_options['file_name_prefix'])) {

                Zend_Cache::throwException('Invalid file_name_prefix : must use only [a-zA-Z0-9_]');

            }

        }

        if ($this->_options['metadatas_array_max_size'] < 10) {

            Zend_Cache::throwException('Invalid metadatas_array_max_size, must be > 10');

        }

        if (isset($options['hashed_directory_umask'])) {

            // See #ZF-12047

            trigger_error("'hashed_directory_umask' is deprecated -> please use 'hashed_directory_perm' instead", E_USER_NOTICE);

            if (!isset($options['hashed_directory_perm'])) {

                $options['hashed_directory_perm'] = $options['hashed_directory_umask'];

            }

        }

        if (isset($options['hashed_directory_perm']) && is_string($options['hashed_directory_perm'])) {

            // See #ZF-4422

            $this->_options['hashed_directory_perm'] = octdec($this->_options['hashed_directory_perm']);

        }

        if (isset($options['cache_file_umask'])) {

            // See #ZF-12047

            trigger_error("'cache_file_umask' is deprecated -> please use 'cache_file_perm' instead", E_USER_NOTICE);

            if (!isset($options['cache_file_perm'])) {

                $options['cache_file_perm'] = $options['cache_file_umask'];

            }

        }

        if (isset($options['cache_file_perm']) && is_string($options['cache_file_perm'])) {

            // See #ZF-4422

            $this->_options['cache_file_perm'] = octdec($this->_options['cache_file_perm']);

        }

    }

    /**

     * Set the cache_dir (particular case of setOption() method)

     *

     * @param  string  $value

     * @param  boolean $trailingSeparator If true, add a trailing separator is necessary

     * @throws Zend_Cache_Exception

     * @return void

     */

    public function setCacheDir($value, $trailingSeparator = true)

    {

        if (!is_dir($value)) {

            Zend_Cache::throwException(sprintf('cache_dir "%s" must be a directory', $value));

        }

        if (!is_writable($value)) {

            Zend_Cache::throwException(sprintf('cache_dir "%s" is not writable', $value));

        }

        if ($trailingSeparator) {

            // add a trailing DIRECTORY_SEPARATOR if necessary

            $value = rtrim(realpath($value), '\\/') . DIRECTORY_SEPARATOR;

        }

        $this->_options['cache_dir'] = $value;

    }

    /**

     * Test if a cache is available for the given id and (if yes) return it (false else)

     *

     * @param string $id cache id

     * @param boolean $doNotTestCacheValidity if set to true, the cache validity won't be tested

     * @return string|false cached datas

     */

    public function load($id, $doNotTestCacheValidity = false)

    {

        if (!($this->_test($id, $doNotTestCacheValidity))) {

            // The cache is not hit !

            return false;

        }

        $metadatas = $this->_getMetadatas($id);

        $file = $this->_file($id);

        $data = $this->_fileGetContents($file);

        if ($this->_options['read_control']) {

            $hashData = $this->_hash($data, $this->_options['read_control_type']);

            $hashControl = $metadatas['hash'];

            if ($hashData != $hashControl) {

                // Problem detected by the read control !

                $this->_log('Zend_Cache_Backend_File::load() / read_control : stored hash and computed hash do not match');

                $this->remove($id);

                return false;

            }

        }

        return $data;

    }

    /**

     * Test if a cache is available or not (for the given id)

     *

     * @param string $id cache id

     * @return mixed false (a cache is not available) or "last modified" timestamp (int) of the available cache record

     */

    public function test($id)

    {

        clearstatcache();

        return $this->_test($id, false);

    }

    /**

     * Save some string datas into a cache record

     *

     * Note : $data is always "string" (serialization is done by the

     * core not by the backend)

     *

     * @param  string      $data             Datas to cache

     * @param  string      $id               Cache id

     * @param  array       $tags             Array of strings, the cache record will be tagged by each string entry

     * @param  boolean|int $specificLifetime If != false, set a specific lifetime for this cache record (null => infinite lifetime)

     * @return boolean true if no problem

     */

    public function save($data, $id, $tags = array(), $specificLifetime = false)

    {

        clearstatcache();

        $file = $this->_file($id);

        $path = $this->_path($id);

        if ($this->_options['hashed_directory_level'] > 0) {

            if (!is_writable($path)) {

                // maybe, we just have to build the directory structure

                $this->_recursiveMkdirAndChmod($id);

            }

            if (!is_writable($path)) {

                return false;

            }

        }

        if ($this->_options['read_control']) {

            $hash = $this->_hash($data, $this->_options['read_control_type']);

        } else {

            $hash = '';

        }

        $metadatas = array(

            'hash' => $hash,

            'mtime' => time(),

            'expire' => $this->_expireTime($this->getLifetime($specificLifetime)),

            'tags' => $tags

        );

        $res = $this->_setMetadatas($id, $metadatas);

        if (!$res) {

            $this->_log('Zend_Cache_Backend_File::save() / error on saving metadata');

            return false;

        }

        $res = $this->_filePutContents($file, $data);

        return $res;

    }

    /**

     * Remove a cache record

     *

     * @param  string $id cache id

     * @return boolean true if no problem

     */

    public function remove($id)

    {

        $file = $this->_file($id);

        $boolRemove   = $this->_remove($file);

        $boolMetadata = $this->_delMetadatas($id);

        return $boolMetadata && $boolRemove;

    }

    /**

     * Clean some cache records

     *

     * Available modes are :

     *

     * Zend_Cache::CLEANING_MODE_ALL (default)    => remove all cache entries ($tags is not used)

     * Zend_Cache::CLEANING_MODE_OLD              => remove too old cache entries ($tags is not used)

     * Zend_Cache::CLEANING_MODE_MATCHING_TAG     => remove cache entries matching all given tags

     *                                               ($tags can be an array of strings or a single string)

     * Zend_Cache::CLEANING_MODE_NOT_MATCHING_TAG => remove cache entries not {matching one of the given tags}

     *                                               ($tags can be an array of strings or a single string)

     * Zend_Cache::CLEANING_MODE_MATCHING_ANY_TAG => remove cache entries matching any given tags

     *                                               ($tags can be an array of strings or a single string)

     *

     * @param string $mode clean mode

     * @param array $tags array of tags

     * @return boolean true if no problem

     */

    public function clean($mode = Zend_Cache::CLEANING_MODE_ALL, $tags = array())

    {

        // We use this protected method to hide the recursive stuff

        clearstatcache();

        return $this->_clean($this->_options['cache_dir'], $mode, $tags);

    }

    /**

     * Return an array of stored cache ids

     *

     * @return array array of stored cache ids (string)

     */

    public function getIds()

    {

        return $this->_get($this->_options['cache_dir'], 'ids', array());

    }

    /**

     * Return an array of stored tags

     *

     * @return array array of stored tags (string)

     */

    public function getTags()

    {

        return $this->_get($this->_options['cache_dir'], 'tags', array());

    }

    /**

     * Return an array of stored cache ids which match given tags

     *

     * In case of multiple tags, a logical AND is made between tags

     *

     * @param array $tags array of tags

     * @return array array of matching cache ids (string)

     */

    public function getIdsMatchingTags($tags = array())

    {

        return $this->_get($this->_options['cache_dir'], 'matching', $tags);

    }

    /**

     * Return an array of stored cache ids which don't match given tags

     *

     * In case of multiple tags, a logical OR is made between tags

     *

     * @param array $tags array of tags

     * @return array array of not matching cache ids (string)

     */

    public function getIdsNotMatchingTags($tags = array())

    {

        return $this->_get($this->_options['cache_dir'], 'notMatching', $tags);

    }

    /**

     * Return an array of stored cache ids which match any given tags

     *

     * In case of multiple tags, a logical AND is made between tags

     *

     * @param array $tags array of tags

     * @return array array of any matching cache ids (string)

     */

    public function getIdsMatchingAnyTags($tags = array())

    {

        return $this->_get($this->_options['cache_dir'], 'matchingAny', $tags);

    }

    /**

     * Return the filling percentage of the backend storage

     *

     * @throws Zend_Cache_Exception

     * @return int integer between 0 and 100

     */

    public function getFillingPercentage()

    {

        $free = disk_free_space($this->_options['cache_dir']);

        $total = disk_total_space($this->_options['cache_dir']);

        if ($total == 0) {

            Zend_Cache::throwException('can\'t get disk_total_space');

        } else {

            if ($free >= $total) {

                return 100;

            }

            return ((int) (100. * ($total - $free) / $total));

        }

    }

    /**

     * Return an array of metadatas for the given cache id

     *

     * The array must include these keys :

     * - expire : the expire timestamp

     * - tags : a string array of tags

     * - mtime : timestamp of last modification time

     *

     * @param string $id cache id

     * @return array array of metadatas (false if the cache id is not found)

     */

    public function getMetadatas($id)

    {

        $metadatas = $this->_getMetadatas($id);

        if (!$metadatas) {

            return false;

        }

        if (time() > $metadatas['expire']) {

            return false;

        }

        return array(

            'expire' => $metadatas['expire'],

            'tags' => $metadatas['tags'],

            'mtime' => $metadatas['mtime']

        );

    }

    /**

     * Give (if possible) an extra lifetime to the given cache id

     *

     * @param string $id cache id

     * @param int $extraLifetime

     * @return boolean true if ok

     */

    public function touch($id, $extraLifetime)

    {

        $metadatas = $this->_getMetadatas($id);

        if (!$metadatas) {

            return false;

        }

        if (time() > $metadatas['expire']) {

            return false;

        }

        $newMetadatas = array(

            'hash' => $metadatas['hash'],