cache.class.php

<?php
/**
 * Memcache driver.
 * Implementation of http://www.smira.ru/2008/10/29/web-caching-memcached-5/
 *
 * @package stalker_portal
 * @author [email protected]
 */

namespace Stalker\Lib\Core;

class Cache
{

    private $backend;
    private $use_tags = false;

    private static $instance = NULL;

    /**
     * @static
     * @param $tags Boolean
     * @return Cache
     */
    public static function getInstance($tags = false){
        if (self::$instance == NULL)
        {
            self::$instance = new Cache();
        }
        self::$instance->useTags($tags);
        return self::$instance;
    }

    private function __construct(){

        $this->backend = new \Memcache;

        $hosts = Config::get('memcache_host');

        if (!is_array($hosts)){
            $hosts = array($hosts);
        }

        foreach ($hosts as $host){
            if (!$this->backend->addServer($host, 11211)) {
                error_log("Could not connect to memcached. Host: " . $host);
            }
        }
    }

    public function useTags($val){
        $this->use_tags = $val;
    }

    private function customGet($key){

        $val = $this->backend->get($key);
        if (Mysql::$debug)
            var_dump('-----------------------customGet', $key);

        if (!is_array($val)){
            return $val;
        }

        if(floatval($val['expire']) < time() && $val['expire'] != 0){
            $this->miss();
            return false;
        }

        if ($this->isInvalidTags($val['tags'])){
            $this->miss();
            return false;
        }

        $this->hit();

        return $val['data'];
    }

    private function realGet($key){
        return $this->backend->get($key);
    }

    public function get($key){

        if ($this->use_tags){
            return $this->customGet($key);
        }else{
            return $this->realGet($key);
        }
    }

    private function customSet($key, $val, $tags, $expire = 0){

        $tags = $this->setInvalidTags($tags);
        if (Mysql::$debug)
            var_dump('-----------------------customSet', $tags);

        $prepared_val = array(
            'expire' => ($expire == 0)? 0 : $expire + time(),
            'data'   => $val,
            'tags'   => $tags
        );

        return $this->backend->set($key, $prepared_val, 0, 0);
    }

    private function realSet($key, $val, $flag = 0, $expire = 0){
        $result = $this->backend->set($key, $val, $flag, $expire);

        $hosts = Config::get('memcache_host');

        if (!is_array($hosts)){
            $hosts = array($hosts);
        }

        foreach ($hosts as $host){
            error_log(sprintf('Memcache::getServerStatus for %s: %s', $host, var_export($this->backend->getServerStatus($host, 11211), true)));
        }

        error_log(sprintf('Memcache::set result: %s', var_export($result, true)));
        return $result;
    }

    public function set($key, $val, $tags = array(), $expire = 0){

        if ($this->use_tags){
            return $this->customSet($key, $val, $tags, $expire);
        }else{
            return $this->realSet($key, $val, 0, $expire);
        }
    }

    public function del($key){

        return $this->backend->delete($key, 0);
    }

    public function setInvalidTags($tags){
        if (Mysql::$debug)
            var_dump('-----------------------setInvalidTags', $tags);

        $new_tags = array();

        $tag_version = strval(microtime(true));

        foreach ($tags as $tag){

            $tag_name = 'tag_'.$tag;

            $this->backend->set($tag_name, $tag_version);
            $new_tags[$tag_name] = $tag_version;
        }
        if (Mysql::$debug)
            var_dump($new_tags);

        return $new_tags;
    }

    private function isInvalidTags($tags){
        if (Mysql::$debug)
            var_dump('-----------------------isInvalidTags?', $tags);

        foreach ($tags as $tag => $version){
            $cur_version = $this->backend->get($tag);

            if($cur_version === false){
                $this->backend->set($tag, $version);
            }

            if ($cur_version != $version){
                return true;
            }
        }
        return false;
    }

    private function hit(){

        if (Mysql::$debug)
            var_dump('!!!!!!!!!!!!!++++++++++++HIT');

        $stats = $this->backend->get('stats');

        if ($stats === false || empty($stats)){
            $stats = array();
        }

        !array_key_exists('hits', $stats) ? $stats['hits'] = 0 : $stats['hits'] += 1;

        $this->backend->set('stats', $stats);
    }

    private function miss(){
        if (Mysql::$debug)
            var_dump('!!!!!!!!!!!!!----------MISS');

        $stats = $this->backend->get('stats');

        if ($stats === false || empty($stats)){
            $stats = array();
        }

        !array_key_exists('misses', $stats) ? $stats['misses'] = 0 : $stats['misses'] += 1;

        $this->backend->set('stats', $stats);
    }

    public function getHits(){

        $stats = $this->backend->get('stats');

        if ($stats === false || empty($stats)){
            $stats = array();
        }

        $hits = !array_key_exists('hits', $stats) ? 0 : $stats['hits'];

        $stats['hits'] = 0;

        $this->backend->set('stats', $stats);

        return $hits;
    }

    public function getMisses(){

        $stats = $this->backend->get('stats');

        if ($stats === false || empty($stats)){
            $stats = array();
        }

        $misses = !array_key_exists('misses', $stats) ? 0 : $stats['misses'];

        $stats['misses'] = 0;

        $this->backend->set('stats', $stats);

        return $misses;
    }
}