3 * StatusNet - the distributed open-source microblogging tool
4 * Copyright (C) 2009, StatusNet, Inc.
6 * Plugin to implement cache interface with disk files
10 * This program is free software: you can redistribute it and/or modify
11 * it under the terms of the GNU Affero General Public License as published by
12 * the Free Software Foundation, either version 3 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU Affero General Public License for more details.
20 * You should have received a copy of the GNU Affero General Public License
21 * along with this program. If not, see <http://www.gnu.org/licenses/>.
25 * @author Evan Prodromou <evan@status.net>
26 * @copyright 2009 StatusNet, Inc.
27 * @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
28 * @link http://status.net/
31 if (!defined('STATUSNET')) {
32 // This check helps protect against security problems;
33 // your code file can't be executed directly from the web.
38 * A plugin to cache data on local disk
42 * @author Evan Prodromou <evan@status.net>
43 * @copyright 2009 StatusNet, Inc.
44 * @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
45 * @link http://status.net/
47 class DiskCachePlugin extends Plugin
49 const PLUGIN_VERSION = '2.0.0';
53 function keyToFilename($key)
55 return $this->root . '/' . str_replace(':', '/', $key);
59 * Get a value associated with a key
61 * The value should have been set previously.
63 * @param string &$key in; Lookup key
64 * @param mixed &$value out; value associated with key
66 * @return boolean hook success
68 function onStartCacheGet(&$key, &$value)
70 $filename = $this->keyToFilename($key);
72 if (file_exists($filename)) {
73 $data = file_get_contents($filename);
74 if ($data !== false) {
75 $value = unserialize($data);
79 Event::handle('EndCacheGet', array($key, &$value));
84 * Associate a value with a key
86 * @param string &$key in; Key to use for lookups
87 * @param mixed &$value in; Value to associate
88 * @param integer &$flag in; Flag (passed through to Memcache)
89 * @param integer &$expiry in; Expiry (passed through to Memcache)
90 * @param boolean &$success out; Whether the set was successful
92 * @return boolean hook success
94 function onStartCacheSet(&$key, &$value, &$flag, &$expiry, &$success)
96 $filename = $this->keyToFilename($key);
97 $parent = dirname($filename);
101 foreach (explode('/', $parent) as $part) {
105 $sofar .= '/' . $part;
106 if (!is_dir($sofar)) {
107 $this->debug("Creating new directory '$sofar'");
108 $success = mkdir($sofar, 0750);
110 $this->log(LOG_ERR, "Can't create directory '$sofar'");
116 if (is_dir($filename)) {
121 // Write to a temp file and move to destination
123 $tempname = tempnam(null, 'statusnetdiskcache');
125 $result = file_put_contents($tempname, serialize($value));
127 if ($result === false) {
128 $this->log(LOG_ERR, "Couldn't write '$key' to temp file '$tempname'");
132 $result = rename($tempname, $filename);
135 $this->log(LOG_ERR, "Couldn't move temp file '$tempname' to path '$filename' for key '$key'");
140 Event::handle('EndCacheSet', array($key, $value, $flag,
147 * Delete a value associated with a key
149 * @param string &$key in; Key to lookup
150 * @param boolean &$success out; whether it worked
152 * @return boolean hook success
154 function onStartCacheDelete(&$key, &$success)
156 $filename = $this->keyToFilename($key);
158 if (file_exists($filename) && !is_dir($filename)) {
162 Event::handle('EndCacheDelete', array($key));
166 function onPluginVersion(array &$versions)
168 $versions[] = array('name' => 'DiskCache',
169 'version' => self::PLUGIN_VERSION,
170 'author' => 'Evan Prodromou',
171 'homepage' => 'https://git.gnu.io/gnu/gnu-social/tree/master/plugins/DiskCache',
173 // TRANS: Plugin description.
174 _m('Plugin to implement cache interface with disk files.'));