forked from GNUsocial/gnu-social
274 lines
8.9 KiB
PHP
274 lines
8.9 KiB
PHP
<?php
|
|
// This file is part of GNU social - https://www.gnu.org/software/social
|
|
//
|
|
// GNU social is free software: you can redistribute it and/or modify
|
|
// it under the terms of the GNU Affero General Public License as published by
|
|
// the Free Software Foundation, either version 3 of the License, or
|
|
// (at your option) any later version.
|
|
//
|
|
// GNU social is distributed in the hope that it will be useful,
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
// GNU Affero General Public License for more details.
|
|
//
|
|
// You should have received a copy of the GNU Affero General Public License
|
|
// along with GNU social. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
/**
|
|
* A plugin to use memcached for the interface with memcache
|
|
*
|
|
* @category Cache
|
|
* @package GNUsocial
|
|
* @author Evan Prodromou <evan@status.net>
|
|
* @author Craig Andrews <candrews@integralblue.com>
|
|
* @author Miguel Dantas <biodantas@gmail.com>
|
|
* @copyright 2009, 2019 Free Software Foundation, Inc http://www.fsf.org
|
|
* @license https://www.gnu.org/licenses/agpl.html GNU AGPL v3 or later
|
|
*/
|
|
|
|
defined('GNUSOCIAL') || die();
|
|
|
|
/**
|
|
* A plugin to use memcached for the cache interface
|
|
*
|
|
* This used to be encoded as config-variable options in the core code;
|
|
* it's now broken out to a separate plugin. The same interface can be
|
|
* implemented by other plugins.
|
|
*
|
|
* @copyright 2009, 2019 Free Software Foundation, Inc http://www.fsf.org
|
|
* @license https://www.gnu.org/licenses/agpl.html GNU AGPL v3 or later
|
|
*/
|
|
class MemcachedPlugin extends Plugin
|
|
{
|
|
const PLUGIN_VERSION = '2.1.0';
|
|
|
|
public static $cacheInitialized = false;
|
|
|
|
public $servers = ['127.0.0.1'];
|
|
public $defaultExpiry = 86400; // 24h
|
|
|
|
private $_conn = null;
|
|
|
|
/**
|
|
* Initialize the plugin
|
|
*
|
|
* Note that onStartCacheGet() may have been called before this!
|
|
*
|
|
* @return bool flag value
|
|
*/
|
|
public function initialize(): bool
|
|
{
|
|
if (self::$cacheInitialized) {
|
|
$this->persistent = true;
|
|
} else {
|
|
// If we're a parent command-line process we need
|
|
// to be able to close out the connection after
|
|
// forking, so disable persistence.
|
|
//
|
|
// We'll turn it back on again the second time
|
|
// through which will either be in a child process,
|
|
// or a single-process script which is switching
|
|
// configurations.
|
|
$this->persistent = (php_sapi_name() == 'cli') ? false : true;
|
|
}
|
|
|
|
try {
|
|
$this->_ensureConn();
|
|
self::$cacheInitialized = true;
|
|
} catch (MemcachedException $e) {
|
|
common_log(LOG_ERR, 'Memcached encountered exception ' . get_class($e) . ': ' . $e->getMessage());
|
|
}
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Get a value associated with a key
|
|
*
|
|
* The value should have been set previously.
|
|
*
|
|
* @param string &$key in; Lookup key
|
|
* @param mixed &$value out; value associated with key
|
|
*
|
|
* @return bool hook success
|
|
*/
|
|
public function onStartCacheGet(&$key, &$value): bool
|
|
{
|
|
try {
|
|
$this->_ensureConn();
|
|
$value = $this->_conn->get($key);
|
|
} catch (MemcachedException $e) {
|
|
common_log(LOG_ERR, 'Memcached encountered exception ' . get_class($e) . ': ' . $e->getMessage());
|
|
return true;
|
|
}
|
|
if ($value === false) {
|
|
// If not found, let other plugins handle it
|
|
return $this->_conn->getResultCode() === Memcached::RES_NOTFOUND;
|
|
} else {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Associate a value with a key
|
|
*
|
|
* @param string &$key in; Key to use for lookups
|
|
* @param mixed &$value in; Value to associate
|
|
* @param integer &$flag in; Flag empty or Memcached::OPT_COMPRESSION (translated by the `flag` method)
|
|
* @param integer &$expiry in; Expiry (passed through to Memcache)
|
|
* @param bool &$success out; Whether the set was successful
|
|
*
|
|
* @return bool hook success
|
|
*/
|
|
public function onStartCacheSet(&$key, &$value, &$flag, &$expiry, &$success): bool
|
|
{
|
|
if ($expiry === null) {
|
|
$expiry = $this->defaultExpiry;
|
|
}
|
|
try {
|
|
$this->_ensureConn();
|
|
if (!empty($flag)) {
|
|
$this->_conn->setOption(Memcached::OPT_COMPRESSION, $flag);
|
|
}
|
|
$success = $this->_conn->set($key, $value, $expiry);
|
|
} catch (MemcachedException $e) {
|
|
common_log(LOG_ERR, 'Memcached encountered exception ' . get_class($e) . ': ' . $e->getMessage());
|
|
return true;
|
|
}
|
|
return !$success;
|
|
}
|
|
|
|
/**
|
|
* Atomically increment an existing numeric key value.
|
|
* Existing expiration time will not be changed.
|
|
*
|
|
* @param string &$key in; Key to use for lookups
|
|
* @param int &$step in; Amount to increment (default 1)
|
|
* @param mixed &$value out; Incremented value, or false if key not set.
|
|
*
|
|
* @return bool hook success
|
|
*/
|
|
public function onStartCacheIncrement(&$key, &$step, &$value): bool
|
|
{
|
|
try {
|
|
$this->_ensureConn();
|
|
$value = $this->_conn->increment($key, $step);
|
|
} catch (MemcachedException $e) {
|
|
common_log(LOG_ERR, 'Memcached encountered exception ' . get_class($e) . ': ' . $e->getMessage());
|
|
return true;
|
|
}
|
|
if ($value === false) {
|
|
// If not found, let other plugins handle it
|
|
return $this->_conn->getResultCode() === Memcached::RES_NOTFOUND;
|
|
} else {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Delete a value associated with a key
|
|
*
|
|
* @param string &$key in; Key to lookup
|
|
* @param bool &$success out; whether it worked
|
|
*
|
|
* @return bool hook success
|
|
*/
|
|
public function onStartCacheDelete(&$key, &$success): bool
|
|
{
|
|
try {
|
|
$this->_ensureConn();
|
|
$success = $this->_conn->delete($key);
|
|
} catch (MemcachedException $e) {
|
|
common_log(LOG_ERR, 'Memcached encountered exception ' . get_class($e) . ': ' . $e->getMessage());
|
|
return true;
|
|
}
|
|
return !$success;
|
|
}
|
|
|
|
/**
|
|
* @param $success
|
|
* @return bool
|
|
*/
|
|
public function onStartCacheReconnect(&$success): bool
|
|
{
|
|
if (empty($this->_conn)) {
|
|
// nothing to do
|
|
return true;
|
|
}
|
|
if ($this->persistent) {
|
|
common_log(LOG_ERR, "Cannot close persistent memcached connection");
|
|
$success = false;
|
|
} else {
|
|
common_log(LOG_INFO, "Closing memcached connection");
|
|
$success = $this->_conn->close();
|
|
$this->_conn = null;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* Ensure that a connection exists
|
|
*
|
|
* Checks the instance $_conn variable and connects
|
|
* if it is empty.
|
|
*
|
|
* @return void
|
|
*/
|
|
private function _ensureConn(): void
|
|
{
|
|
if (empty($this->_conn)) {
|
|
$this->_conn = new Memcached(common_config('site', 'nickname'));
|
|
|
|
if (!count($this->_conn->getServerList())) {
|
|
if (is_array($this->servers)) {
|
|
$servers = $this->servers;
|
|
} else {
|
|
$servers = [$this->servers];
|
|
}
|
|
foreach ($servers as $server) {
|
|
if (is_array($server) && count($server) === 2) {
|
|
list($host, $port) = $server;
|
|
} else {
|
|
$host = is_array($server) ? $server[0] : $server;
|
|
$port = 11211;
|
|
}
|
|
|
|
$this->_conn->addServer($host, $port);
|
|
}
|
|
|
|
// Compress items stored in the cache.
|
|
|
|
// Allows the cache to store objects larger than 1MB (if they
|
|
// compress to less than 1MB), and improves cache memory efficiency.
|
|
|
|
$this->_conn->setOption(Memcached::OPT_COMPRESSION, true);
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Translate general flags to Memcached-specific flags
|
|
* @param int $flag
|
|
* @return int
|
|
*/
|
|
protected function flag(int $flag): int
|
|
{
|
|
$out = 0;
|
|
if ($flag & Cache::COMPRESSED == Cache::COMPRESSED) {
|
|
$out |= Memcached::OPT_COMPRESSION;
|
|
}
|
|
return $out;
|
|
}
|
|
|
|
public function onPluginVersion(array &$versions): bool
|
|
{
|
|
$versions[] = array('name' => 'Memcached',
|
|
'version' => self::PLUGIN_VERSION,
|
|
'author' => 'Evan Prodromou, Craig Andrews',
|
|
'homepage' => 'https://git.gnu.io/gnu/gnu-social/tree/master/plugins/Memcached',
|
|
'rawdescription' =>
|
|
// TRANS: Plugin description.
|
|
_m('Use <a href="http://memcached.org/">Memcached</a> to cache query results.'));
|
|
return true;
|
|
}
|
|
}
|