Merge "Move up devunt's name to Developers"
[lhc/web/wiklou.git] / includes / libs / objectcache / MemcachedPeclBagOStuff.php
1 <?php
2 /**
3 * Object caching using memcached.
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18 * http://www.gnu.org/copyleft/gpl.html
19 *
20 * @file
21 * @ingroup Cache
22 */
23
24 /**
25 * A wrapper class for the PECL memcached client
26 *
27 * @ingroup Cache
28 */
29 class MemcachedPeclBagOStuff extends MemcachedBagOStuff {
30
31 /**
32 * Constructor
33 *
34 * Available parameters are:
35 * - servers: The list of IP:port combinations holding the memcached servers.
36 * - persistent: Whether to use a persistent connection
37 * - compress_threshold: The minimum size an object must be before it is compressed
38 * - timeout: The read timeout in microseconds
39 * - connect_timeout: The connect timeout in seconds
40 * - retry_timeout: Time in seconds to wait before retrying a failed connect attempt
41 * - server_failure_limit: Limit for server connect failures before it is removed
42 * - serializer: May be either "php" or "igbinary". Igbinary produces more compact
43 * values, but serialization is much slower unless the php.ini option
44 * igbinary.compact_strings is off.
45 * - use_binary_protocol Whether to enable the binary protocol (default is ASCII) (boolean)
46 * @param array $params
47 * @throws InvalidArgumentException
48 */
49 function __construct( $params ) {
50 parent::__construct( $params );
51 $params = $this->applyDefaultParams( $params );
52
53 if ( $params['persistent'] ) {
54 // The pool ID must be unique to the server/option combination.
55 // The Memcached object is essentially shared for each pool ID.
56 // We can only reuse a pool ID if we keep the config consistent.
57 $this->client = new Memcached( md5( serialize( $params ) ) );
58 if ( count( $this->client->getServerList() ) ) {
59 $this->logger->debug( __METHOD__ . ": persistent Memcached object already loaded." );
60 return; // already initialized; don't add duplicate servers
61 }
62 } else {
63 $this->client = new Memcached;
64 }
65
66 if ( $params['use_binary_protocol'] ) {
67 $this->client->setOption( Memcached::OPT_BINARY_PROTOCOL, true );
68 }
69
70 if ( isset( $params['retry_timeout'] ) ) {
71 $this->client->setOption( Memcached::OPT_RETRY_TIMEOUT, $params['retry_timeout'] );
72 }
73
74 if ( isset( $params['server_failure_limit'] ) ) {
75 $this->client->setOption( Memcached::OPT_SERVER_FAILURE_LIMIT, $params['server_failure_limit'] );
76 }
77
78 // The compression threshold is an undocumented php.ini option for some
79 // reason. There's probably not much harm in setting it globally, for
80 // compatibility with the settings for the PHP client.
81 ini_set( 'memcached.compression_threshold', $params['compress_threshold'] );
82
83 // Set timeouts
84 $this->client->setOption( Memcached::OPT_CONNECT_TIMEOUT, $params['connect_timeout'] * 1000 );
85 $this->client->setOption( Memcached::OPT_SEND_TIMEOUT, $params['timeout'] );
86 $this->client->setOption( Memcached::OPT_RECV_TIMEOUT, $params['timeout'] );
87 $this->client->setOption( Memcached::OPT_POLL_TIMEOUT, $params['timeout'] / 1000 );
88
89 // Set libketama mode since it's recommended by the documentation and
90 // is as good as any. There's no way to configure libmemcached to use
91 // hashes identical to the ones currently in use by the PHP client, and
92 // even implementing one of the libmemcached hashes in pure PHP for
93 // forwards compatibility would require MemcachedClient::get_sock() to be
94 // rewritten.
95 $this->client->setOption( Memcached::OPT_LIBKETAMA_COMPATIBLE, true );
96
97 // Set the serializer
98 switch ( $params['serializer'] ) {
99 case 'php':
100 $this->client->setOption( Memcached::OPT_SERIALIZER, Memcached::SERIALIZER_PHP );
101 break;
102 case 'igbinary':
103 if ( !Memcached::HAVE_IGBINARY ) {
104 throw new InvalidArgumentException(
105 __CLASS__ . ': the igbinary extension is not available ' .
106 'but igbinary serialization was requested.'
107 );
108 }
109 $this->client->setOption( Memcached::OPT_SERIALIZER, Memcached::SERIALIZER_IGBINARY );
110 break;
111 default:
112 throw new InvalidArgumentException(
113 __CLASS__ . ': invalid value for serializer parameter'
114 );
115 }
116 $servers = [];
117 foreach ( $params['servers'] as $host ) {
118 if ( preg_match( '/^\[(.+)\]:(\d+)$/', $host, $m ) ) {
119 $servers[] = [ $m[1], (int)$m[2] ]; // (ip, port)
120 } elseif ( preg_match( '/^([^:]+):(\d+)$/', $host, $m ) ) {
121 $servers[] = [ $m[1], (int)$m[2] ]; // (ip or path, port)
122 } else {
123 $servers[] = [ $host, false ]; // (ip or path, port)
124 }
125 }
126 $this->client->addServers( $servers );
127 }
128
129 protected function applyDefaultParams( $params ) {
130 $params = parent::applyDefaultParams( $params );
131
132 if ( !isset( $params['use_binary_protocol'] ) ) {
133 $params['use_binary_protocol'] = false;
134 }
135
136 if ( !isset( $params['serializer'] ) ) {
137 $params['serializer'] = 'php';
138 }
139
140 return $params;
141 }
142
143 protected function getWithToken( $key, &$casToken, $flags = 0 ) {
144 $this->debugLog( "get($key)" );
145 $result = $this->client->get( $this->validateKeyEncoding( $key ), null, $casToken );
146 $result = $this->checkResult( $key, $result );
147 return $result;
148 }
149
150 public function set( $key, $value, $exptime = 0, $flags = 0 ) {
151 $this->debugLog( "set($key)" );
152 return $this->checkResult( $key, parent::set( $key, $value, $exptime ) );
153 }
154
155 protected function cas( $casToken, $key, $value, $exptime = 0 ) {
156 $this->debugLog( "cas($key)" );
157 return $this->checkResult( $key, parent::cas( $casToken, $key, $value, $exptime ) );
158 }
159
160 public function delete( $key ) {
161 $this->debugLog( "delete($key)" );
162 $result = parent::delete( $key );
163 if ( $result === false && $this->client->getResultCode() === Memcached::RES_NOTFOUND ) {
164 // "Not found" is counted as success in our interface
165 return true;
166 } else {
167 return $this->checkResult( $key, $result );
168 }
169 }
170
171 public function add( $key, $value, $exptime = 0 ) {
172 $this->debugLog( "add($key)" );
173 return $this->checkResult( $key, parent::add( $key, $value, $exptime ) );
174 }
175
176 public function incr( $key, $value = 1 ) {
177 $this->debugLog( "incr($key)" );
178 $result = $this->client->increment( $key, $value );
179 return $this->checkResult( $key, $result );
180 }
181
182 public function decr( $key, $value = 1 ) {
183 $this->debugLog( "decr($key)" );
184 $result = $this->client->decrement( $key, $value );
185 return $this->checkResult( $key, $result );
186 }
187
188 /**
189 * Check the return value from a client method call and take any necessary
190 * action. Returns the value that the wrapper function should return. At
191 * present, the return value is always the same as the return value from
192 * the client, but some day we might find a case where it should be
193 * different.
194 *
195 * @param string $key The key used by the caller, or false if there wasn't one.
196 * @param mixed $result The return value
197 * @return mixed
198 */
199 protected function checkResult( $key, $result ) {
200 if ( $result !== false ) {
201 return $result;
202 }
203 switch ( $this->client->getResultCode() ) {
204 case Memcached::RES_SUCCESS:
205 break;
206 case Memcached::RES_DATA_EXISTS:
207 case Memcached::RES_NOTSTORED:
208 case Memcached::RES_NOTFOUND:
209 $this->debugLog( "result: " . $this->client->getResultMessage() );
210 break;
211 default:
212 $msg = $this->client->getResultMessage();
213 $logCtx = [];
214 if ( $key !== false ) {
215 $server = $this->client->getServerByKey( $key );
216 $logCtx['memcached-server'] = "{$server['host']}:{$server['port']}";
217 $logCtx['memcached-key'] = $key;
218 $msg = "Memcached error for key \"{memcached-key}\" on server \"{memcached-server}\": $msg";
219 } else {
220 $msg = "Memcached error: $msg";
221 }
222 $this->logger->error( $msg, $logCtx );
223 $this->setLastError( BagOStuff::ERR_UNEXPECTED );
224 }
225 return $result;
226 }
227
228 public function getMulti( array $keys, $flags = 0 ) {
229 $this->debugLog( 'getMulti(' . implode( ', ', $keys ) . ')' );
230 foreach ( $keys as $key ) {
231 $this->validateKeyEncoding( $key );
232 }
233 $result = $this->client->getMulti( $keys ) ?: [];
234 return $this->checkResult( false, $result );
235 }
236
237 /**
238 * @param array $data
239 * @param int $exptime
240 * @return bool
241 */
242 public function setMulti( array $data, $exptime = 0 ) {
243 $this->debugLog( 'setMulti(' . implode( ', ', array_keys( $data ) ) . ')' );
244 foreach ( array_keys( $data ) as $key ) {
245 $this->validateKeyEncoding( $key );
246 }
247 $result = $this->client->setMulti( $data, $this->fixExpiry( $exptime ) );
248 return $this->checkResult( false, $result );
249 }
250
251 public function changeTTL( $key, $expiry = 0 ) {
252 $this->debugLog( "touch($key)" );
253 $result = $this->client->touch( $key, $expiry );
254 return $this->checkResult( $key, $result );
255 }
256 }