163 lines
3.3 KiB
PHP
163 lines
3.3 KiB
PHP
<?php
|
|
/**
|
|
* Implementation methode Memoization
|
|
*
|
|
* @package SPIP\memoization\Memo
|
|
**/
|
|
|
|
// Sécurité
|
|
if (!defined('_ECRIRE_INC_VERSION')){
|
|
return;
|
|
}
|
|
|
|
# http://php.net/memcached
|
|
|
|
if (!defined('_CACHE_NAMESPACE')){
|
|
define('_CACHE_NAMESPACE', $_SERVER["SERVER_NAME"] . ":" . $_SERVER["SERVER_PORT"] . ":");
|
|
}
|
|
if (!defined('_LOCK_MAX')){
|
|
define('_LOCK_MAX', 30);
|
|
} # max lock time (seconds)
|
|
|
|
class MCacheBackend_memcached implements MCacheBackend {
|
|
|
|
/** @var Memcached $memcached */
|
|
private $memcached = null;
|
|
private $ok = false;
|
|
|
|
/* Interface */
|
|
|
|
public function init($params = null){
|
|
foreach (MCache::config_memcache_servers() as $server){
|
|
list($host, $port) = explode(':', $server);
|
|
if (!$this->memcached){
|
|
$this->memcached = new Memcached();
|
|
}
|
|
$this->memcached->addServer($host, $port);
|
|
}
|
|
if ($this->memcached){
|
|
$this->ok = true;
|
|
}
|
|
}
|
|
|
|
public function get($key){
|
|
if (!$this->ok){
|
|
return null;
|
|
}
|
|
$a = $this->memcached->get(_CACHE_NAMESPACE . $key);
|
|
// maybe_unserialize
|
|
if (is_array($a)){
|
|
return @unserialize($a[0]);
|
|
} else {
|
|
return $a;
|
|
}
|
|
}
|
|
|
|
public function set($key, $value, $ttl = null){
|
|
if (!$this->ok){
|
|
return null;
|
|
}
|
|
// maybe_serialize
|
|
if (is_object($value) or is_array($value) or is_null($value)){
|
|
$value = array(serialize($value));
|
|
}
|
|
return is_null($ttl)
|
|
? $this->memcached->set(_CACHE_NAMESPACE . $key, $value)
|
|
: $this->memcached->set(_CACHE_NAMESPACE . $key, $value, $ttl);
|
|
}
|
|
|
|
public function exists($key){
|
|
if (!$this->ok){
|
|
return null;
|
|
}
|
|
return $this->memcached->get(_CACHE_NAMESPACE . $key)!==FALSE;
|
|
}
|
|
|
|
public function del($key){
|
|
if (!$this->ok){
|
|
return null;
|
|
}
|
|
return $this->memcached->delete(_CACHE_NAMESPACE . $key, 0);
|
|
}
|
|
|
|
public function inc($key, $value = null, $ttl = null){
|
|
if (!$this->ok){
|
|
return null;
|
|
}
|
|
// set if not exists
|
|
$this->memcached->add(_CACHE_NAMESPACE . $key, 0, $ttl);
|
|
if (!isset($value)){
|
|
$value = 1;
|
|
}
|
|
return $this->memcached->increment(_CACHE_NAMESPACE . $key, $value);
|
|
}
|
|
|
|
public function dec($key, $value = null, $ttl = null){
|
|
if (!$this->ok){
|
|
return null;
|
|
}
|
|
// set if not exists
|
|
$this->memcached->add(_CACHE_NAMESPACE . $key, 0, $ttl);
|
|
if (!isset($value)){
|
|
$value = 1;
|
|
}
|
|
return $this->memcached->decrement(_CACHE_NAMESPACE . $key, $value);
|
|
}
|
|
|
|
public function lock($key, /* private */ $unlock = false){
|
|
static $locks = array();
|
|
|
|
if (!$this->ok){
|
|
return null;
|
|
}
|
|
|
|
/* unlock */
|
|
if ($unlock){
|
|
unset($locks[$key]);
|
|
$this->del('lock::' . $key);
|
|
} /* lock */
|
|
else {
|
|
# si on l'a deja, ok
|
|
if (isset($locks[$key])){
|
|
return true;
|
|
}
|
|
|
|
# sinon s'il existe, on attend qu'il se libere
|
|
$wait = 0;
|
|
while ($this->exists('lock::' . $key)){
|
|
if ($wait++<_LOCK_MAX){
|
|
sleep(1);
|
|
} else {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
# ... puis on le pose
|
|
# attention inc() renvoie parfois false (??)
|
|
if ($this->inc('lock::' . $key, 1, _LOCK_MAX)<=1){
|
|
$this->set('lock::' . $key, 2, _LOCK_MAX);
|
|
$locks[$key] = true;
|
|
register_shutdown_function(array($this, 'unlock'), $key);
|
|
return true;
|
|
}
|
|
|
|
return false;
|
|
}
|
|
}
|
|
|
|
public function unlock($key){
|
|
if (!$this->ok){
|
|
return null;
|
|
}
|
|
$this->lock($key, true);
|
|
}
|
|
|
|
public function size(){
|
|
return false;
|
|
}
|
|
|
|
public function purge(){
|
|
return false;
|
|
}
|
|
|
|
}
|