Merge "Let User::idFromName always return int or null"
[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 * Available parameters are:
33 * - servers: The list of IP:port combinations holding the memcached servers.
34 * - persistent: Whether to use a persistent connection
35 * - compress_threshold: The minimum size an object must be before it is compressed
36 * - timeout: The read timeout in microseconds
37 * - connect_timeout: The connect timeout in seconds
38 * - retry_timeout: Time in seconds to wait before retrying a failed connect attempt
39 * - server_failure_limit: Limit for server connect failures before it is removed
40 * - serializer: May be either "php" or "igbinary". Igbinary produces more compact
41 * values, but serialization is much slower unless the php.ini option
42 * igbinary.compact_strings is off.
43 * - use_binary_protocol Whether to enable the binary protocol (default is ASCII) (boolean)
44 * @param array $params
45 * @throws InvalidArgumentException
46 */
47 function __construct( $params ) {
48 parent::__construct( $params );
49 $params = $this->applyDefaultParams( $params );
50
51 if ( $params['persistent'] ) {
52 // The pool ID must be unique to the server/option combination.
53 // The Memcached object is essentially shared for each pool ID.
54 // We can only reuse a pool ID if we keep the config consistent.
55 $this->client = new Memcached( md5( serialize( $params ) ) );
56 if ( count( $this->client->getServerList() ) ) {
57 $this->logger->debug( __METHOD__ . ": persistent Memcached object already loaded." );
58 return; // already initialized; don't add duplicate servers
59 }
60 } else {
61 $this->client = new Memcached;
62 }
63
64 if ( $params['use_binary_protocol'] ) {
65 $this->client->setOption( Memcached::OPT_BINARY_PROTOCOL, true );
66 }
67
68 if ( isset( $params['retry_timeout'] ) ) {
69 $this->client->setOption( Memcached::OPT_RETRY_TIMEOUT, $params['retry_timeout'] );
70 }
71
72 if ( isset( $params['server_failure_limit'] ) ) {
73 $this->client->setOption( Memcached::OPT_SERVER_FAILURE_LIMIT, $params['server_failure_limit'] );
74 }
75
76 // The compression threshold is an undocumented php.ini option for some
77 // reason. There's probably not much harm in setting it globally, for
78 // compatibility with the settings for the PHP client.
79 ini_set( 'memcached.compression_threshold', $params['compress_threshold'] );
80
81 // Set timeouts
82 $this->client->setOption( Memcached::OPT_CONNECT_TIMEOUT, $params['connect_timeout'] * 1000 );
83 $this->client->setOption( Memcached::OPT_SEND_TIMEOUT, $params['timeout'] );
84 $this->client->setOption( Memcached::OPT_RECV_TIMEOUT, $params['timeout'] );
85 $this->client->setOption( Memcached::OPT_POLL_TIMEOUT, $params['timeout'] / 1000 );
86
87 // Set libketama mode since it's recommended by the documentation and
88 // is as good as any. There's no way to configure libmemcached to use
89 // hashes identical to the ones currently in use by the PHP client, and
90 // even implementing one of the libmemcached hashes in pure PHP for
91 // forwards compatibility would require MemcachedClient::get_sock() to be
92 // rewritten.
93 $this->client->setOption( Memcached::OPT_LIBKETAMA_COMPATIBLE, true );
94
95 // Set the serializer
96 switch ( $params['serializer'] ) {
97 case 'php':
98 $this->client->setOption( Memcached::OPT_SERIALIZER, Memcached::SERIALIZER_PHP );
99 break;
100 case 'igbinary':
101 if ( !Memcached::HAVE_IGBINARY ) {
102 throw new InvalidArgumentException(
103 __CLASS__ . ': the igbinary extension is not available ' .
104 'but igbinary serialization was requested.'
105 );
106 }
107 $this->client->setOption( Memcached::OPT_SERIALIZER, Memcached::SERIALIZER_IGBINARY );
108 break;
109 default:
110 throw new InvalidArgumentException(
111 __CLASS__ . ': invalid value for serializer parameter'
112 );
113 }
114 $servers = [];
115 foreach ( $params['servers'] as $host ) {
116 if ( preg_match( '/^\[(.+)\]:(\d+)$/', $host, $m ) ) {
117 $servers[] = [ $m[1], (int)$m[2] ]; // (ip, port)
118 } elseif ( preg_match( '/^([^:]+):(\d+)$/', $host, $m ) ) {
119 $servers[] = [ $m[1], (int)$m[2] ]; // (ip or path, port)
120 } else {
121 $servers[] = [ $host, false ]; // (ip or path, port)
122 }
123 }
124 $this->client->addServers( $servers );
125 }
126
127 protected function applyDefaultParams( $params ) {
128 $params = parent::applyDefaultParams( $params );
129
130 if ( !isset( $params['use_binary_protocol'] ) ) {
131 $params['use_binary_protocol'] = false;
132 }
133
134 if ( !isset( $params['serializer'] ) ) {
135 $params['serializer'] = 'php';
136 }
137
138 return $params;
139 }
140
141 /**
142 * @suppress PhanTypeNonVarPassByRef
143 */
144 protected function doGet( $key, $flags = 0, &$casToken = null ) {
145 $this->debug( "get($key)" );
146 if ( defined( Memcached::class . '::GET_EXTENDED' ) ) { // v3.0.0
147 $flags = Memcached::GET_EXTENDED;
148 $res = $this->client->get( $this->validateKeyEncoding( $key ), null, $flags );
149 if ( is_array( $res ) ) {
150 $result = $res['value'];
151 $casToken = $res['cas'];
152 } else {
153 $result = false;
154 $casToken = null;
155 }
156 } else {
157 $result = $this->client->get( $this->validateKeyEncoding( $key ), null, $casToken );
158 }
159 $result = $this->checkResult( $key, $result );
160 return $result;
161 }
162
163 public function set( $key, $value, $exptime = 0, $flags = 0 ) {
164 $this->debug( "set($key)" );
165 $result = parent::set( $key, $value, $exptime, $flags = 0 );
166 if ( $result === false && $this->client->getResultCode() === Memcached::RES_NOTSTORED ) {
167 // "Not stored" is always used as the mcrouter response with AllAsyncRoute
168 return true;
169 }
170 return $this->checkResult( $key, $result );
171 }
172
173 protected function cas( $casToken, $key, $value, $exptime = 0, $flags = 0 ) {
174 $this->debug( "cas($key)" );
175 return $this->checkResult( $key, parent::cas( $casToken, $key, $value, $exptime, $flags ) );
176 }
177
178 public function delete( $key, $flags = 0 ) {
179 $this->debug( "delete($key)" );
180 $result = parent::delete( $key );
181 if ( $result === false && $this->client->getResultCode() === Memcached::RES_NOTFOUND ) {
182 // "Not found" is counted as success in our interface
183 return true;
184 }
185 return $this->checkResult( $key, $result );
186 }
187
188 public function add( $key, $value, $exptime = 0, $flags = 0 ) {
189 $this->debug( "add($key)" );
190 return $this->checkResult( $key, parent::add( $key, $value, $exptime ) );
191 }
192
193 public function incr( $key, $value = 1 ) {
194 $this->debug( "incr($key)" );
195 $result = $this->client->increment( $key, $value );
196 return $this->checkResult( $key, $result );
197 }
198
199 public function decr( $key, $value = 1 ) {
200 $this->debug( "decr($key)" );
201 $result = $this->client->decrement( $key, $value );
202 return $this->checkResult( $key, $result );
203 }
204
205 /**
206 * Check the return value from a client method call and take any necessary
207 * action. Returns the value that the wrapper function should return. At
208 * present, the return value is always the same as the return value from
209 * the client, but some day we might find a case where it should be
210 * different.
211 *
212 * @param string $key The key used by the caller, or false if there wasn't one.
213 * @param mixed $result The return value
214 * @return mixed
215 */
216 protected function checkResult( $key, $result ) {
217 if ( $result !== false ) {
218 return $result;
219 }
220 switch ( $this->client->getResultCode() ) {
221 case Memcached::RES_SUCCESS:
222 break;
223 case Memcached::RES_DATA_EXISTS:
224 case Memcached::RES_NOTSTORED:
225 case Memcached::RES_NOTFOUND:
226 $this->debug( "result: " . $this->client->getResultMessage() );
227 break;
228 default:
229 $msg = $this->client->getResultMessage();
230 $logCtx = [];
231 if ( $key !== false ) {
232 $server = $this->client->getServerByKey( $key );
233 $logCtx['memcached-server'] = "{$server['host']}:{$server['port']}";
234 $logCtx['memcached-key'] = $key;
235 $msg = "Memcached error for key \"{memcached-key}\" on server \"{memcached-server}\": $msg";
236 } else {
237 $msg = "Memcached error: $msg";
238 }
239 $this->logger->error( $msg, $logCtx );
240 $this->setLastError( BagOStuff::ERR_UNEXPECTED );
241 }
242 return $result;
243 }
244
245 public function getMulti( array $keys, $flags = 0 ) {
246 $this->debug( 'getMulti(' . implode( ', ', $keys ) . ')' );
247 foreach ( $keys as $key ) {
248 $this->validateKeyEncoding( $key );
249 }
250 $result = $this->client->getMulti( $keys ) ?: [];
251 return $this->checkResult( false, $result );
252 }
253
254 public function setMulti( array $data, $exptime = 0, $flags = 0 ) {
255 $this->debug( 'setMulti(' . implode( ', ', array_keys( $data ) ) . ')' );
256 foreach ( array_keys( $data ) as $key ) {
257 $this->validateKeyEncoding( $key );
258 }
259 $result = $this->client->setMulti( $data, $this->fixExpiry( $exptime ) );
260 return $this->checkResult( false, $result );
261 }
262
263 public function changeTTL( $key, $expiry = 0, $flags = 0 ) {
264 $this->debug( "touch($key)" );
265 $result = $this->client->touch( $key, $expiry );
266 return $this->checkResult( $key, $result );
267 }
268 }