1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
<?php
/*
** $Id$
**
** Copyright (C) 1995-2008 by the ITools Authors.
** This file is part of ITools - the Internet Tools Library
**
** ITools is free software; you can redistribute it and/or modify
** it under the terms of the GNU General Public License as published by
** the Free Software Foundation; either version 3 of the License, or
** (at your option) any later version.
**
** ITools 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 General Public License for more details.
**
** You should have received a copy of the GNU General Public License
** along with this program. If not, see <http://www.gnu.org/licenses/>.
**
** it_cache.class - Caching functions
*/
class it_cache
{
function _defaults($p)
{
$p += array(
'ttl' => 2,
'distributed' => false,
'hostsfile' => '/opt/ultra/etc/memcached.hosts',
);
if (!it::is_live())
$p['distributed'] = false; # Always local cache on non-live systems
return $p;
}
/**
* Get value for specific key from cache. Can be mixed value but no objects.
* @param $key Key to get value for
* @return Value for given key or null
*/
function get($key, $p = array())
{
$p = it_cache::_defaults($p);
if ($p['distributed'] && ($memcache = it_cache::_get_memcache($p)))
$result = @$memcache->get($key);
else
$result = function_exists("eaccelerator_get") ? eaccelerator_get($key) : null;
return $result;
}
/**
* Put value for specific key into cache. Can be mixed value but no objects.
* @param $key Key to put value with
* @param $value Value to put (mixed but no objects allowed)
* @param $p['ttl'] Time to live for this key/value-pair
* @return Boolean if value was put into cache
*/
function put($key, $value, $p = array())
{
$p = it_cache::_defaults($p);
if ($p['distributed'] && ($memcache = it_cache::_get_memcache($p)))
{
@$memcache->set($key, $value, 0, $p['ttl']);
}
else
{
function_exists("eaccelerator_gc") && eaccelerator_gc();
$result = function_exists("eaccelerator_put") ? eaccelerator_put($key, $value, $p['ttl']) : null;
}
return $result;
}
function _get_memcache($p)
{
$memcache_id = "it_cache_memcache_" . $p['hostsfile'];
if (!isset($GLOBALS[$memcache_id]) && class_exists("Memcache", false))
{
$memcache = new Memcache;
foreach (array_filter(it::replace(array('[#\s].*' => ""), file($p['hostsfile']))) as $host)
$reachable += intval(@$memcache->addServer($host));
$GLOBALS[$memcache_id] = $reachable ? $memcache : false;
}
return $GLOBALS[$memcache_id];
}
}
?>
|