Merge in local trunk
[awesomized/libmemcached] / libmemcached / memcached.cc
1 /* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
2 *
3 * Libmemcached library
4 *
5 * Copyright (C) 2011 Data Differential, http://datadifferential.com/
6 * Copyright (C) 2006-2009 Brian Aker All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions are
10 * met:
11 *
12 * * Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 *
15 * * Redistributions in binary form must reproduce the above
16 * copyright notice, this list of conditions and the following disclaimer
17 * in the documentation and/or other materials provided with the
18 * distribution.
19 *
20 * * The names of its contributors may not be used to endorse or
21 * promote products derived from this software without specific prior
22 * written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
25 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
26 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
27 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
28 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
29 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
30 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
31 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
32 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
33 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
34 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
35 *
36 */
37
38 #include <libmemcached/common.h>
39 #include <libmemcached/virtual_bucket.h>
40
41 #if 0
42 static const memcached_st global_copy= {
43 .state= {
44 .is_purging= false, // .is_purging
45 .is_processing_input= false, // is_processing_input
46 .is_time_for_rebuild= false,
47 },
48 .flags= {
49 .auto_eject_hosts= false,
50 .binary_protocol= false,
51 .buffer_requests= false,
52 .hash_with_prefix_key= false,
53 .no_block= false,
54 .no_reply= false,
55 .randomize_replica_read= false,
56 .support_cas= false,
57 .tcp_nodelay= false,
58 .use_sort_hosts= false,
59 .use_udp= false,
60 .verify_key= false,
61 .tcp_keepalive= false,
62 },
63 };
64 #endif
65
66 static inline bool _memcached_init(memcached_st *self)
67 {
68 self->state.is_purging= false;
69 self->state.is_processing_input= false;
70 self->state.is_time_for_rebuild= false;
71
72 self->flags.auto_eject_hosts= false;
73 self->flags.binary_protocol= false;
74 self->flags.buffer_requests= false;
75 self->flags.hash_with_prefix_key= false;
76 self->flags.no_block= false;
77 self->flags.no_reply= false;
78 self->flags.randomize_replica_read= false;
79 self->flags.support_cas= false;
80 self->flags.tcp_nodelay= false;
81 self->flags.use_sort_hosts= false;
82 self->flags.use_udp= false;
83 self->flags.verify_key= false;
84 self->flags.tcp_keepalive= false;
85
86 self->virtual_bucket= NULL;
87
88 self->distribution= MEMCACHED_DISTRIBUTION_MODULA;
89
90 if (not hashkit_create(&self->hashkit))
91 return false;
92
93 self->ketama.continuum= NULL;
94 self->ketama.continuum_count= 0;
95 self->ketama.continuum_points_counter= 0;
96 self->ketama.next_distribution_rebuild= 0;
97 self->ketama.weighted= false;
98
99 self->number_of_hosts= 0;
100 self->servers= NULL;
101 self->last_disconnected_server= NULL;
102
103 self->snd_timeout= 0;
104 self->rcv_timeout= 0;
105 self->server_failure_limit= 0;
106 self->query_id= 1; // 0 is considered invalid
107
108 /* TODO, Document why we picked these defaults */
109 self->io_msg_watermark= 500;
110 self->io_bytes_watermark= 65 * 1024;
111
112 self->tcp_keepidle= 0;
113
114 self->io_key_prefetch= 0;
115 self->poll_timeout= MEMCACHED_DEFAULT_TIMEOUT;
116 self->connect_timeout= MEMCACHED_DEFAULT_CONNECT_TIMEOUT;
117 self->retry_timeout= 0;
118
119 self->send_size= -1;
120 self->recv_size= -1;
121
122 self->user_data= NULL;
123 self->number_of_replicas= 0;
124
125 self->allocators= memcached_allocators_return_default();
126
127 self->on_clone= NULL;
128 self->on_cleanup= NULL;
129 self->get_key_failure= NULL;
130 self->delete_trigger= NULL;
131 self->callbacks= NULL;
132 self->sasl.callbacks= NULL;
133 self->sasl.is_allocated= false;
134
135 self->error_messages= NULL;
136 self->prefix_key= NULL;
137 self->configure.initial_pool_size= 1;
138 self->configure.max_pool_size= 1;
139 self->configure.version= -1;
140 self->configure.filename= NULL;
141
142 return true;
143 }
144
145 static void _free(memcached_st *ptr, bool release_st)
146 {
147 /* If we have anything open, lets close it now */
148 send_quit(ptr);
149 memcached_server_list_free(memcached_server_list(ptr));
150 memcached_result_free(&ptr->result);
151
152 memcached_virtual_bucket_free(ptr);
153
154 if (ptr->last_disconnected_server)
155 memcached_server_free(ptr->last_disconnected_server);
156
157 if (ptr->on_cleanup)
158 ptr->on_cleanup(ptr);
159
160 libmemcached_free(ptr, ptr->ketama.continuum);
161
162 memcached_array_free(ptr->prefix_key);
163 ptr->prefix_key= NULL;
164
165 memcached_error_free(ptr);
166
167 if (ptr->sasl.callbacks)
168 {
169 #ifdef LIBMEMCACHED_WITH_SASL_SUPPORT
170 memcached_destroy_sasl_auth_data(ptr);
171 #endif
172 }
173
174 if (release_st)
175 {
176 memcached_array_free(ptr->configure.filename);
177 ptr->configure.filename= NULL;
178 }
179
180 if (memcached_is_allocated(ptr) && release_st)
181 {
182 libmemcached_free(ptr, ptr);
183 }
184 }
185
186 memcached_st *memcached_create(memcached_st *ptr)
187 {
188 if (ptr == NULL)
189 {
190 ptr= (memcached_st *)malloc(sizeof(memcached_st));
191
192 if (not ptr)
193 {
194 return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
195 }
196
197 ptr->options.is_allocated= true;
198 }
199 else
200 {
201 ptr->options.is_allocated= false;
202 }
203
204 #if 0
205 memcached_set_purging(ptr, false);
206 memcached_set_processing_input(ptr, false);
207 #endif
208
209 if (! _memcached_init(ptr))
210 {
211 memcached_free(ptr);
212 return NULL;
213 }
214
215 if (! memcached_result_create(ptr, &ptr->result))
216 {
217 memcached_free(ptr);
218 return NULL;
219 }
220
221 WATCHPOINT_ASSERT_INITIALIZED(&ptr->result);
222
223 return ptr;
224 }
225
226 memcached_st *memcached(const char *string, size_t length)
227 {
228 memcached_st *self= memcached_create(NULL);
229 if (not self)
230 {
231 errno= ENOMEM;
232 return NULL;
233 }
234
235 if (not length)
236 return self;
237
238 memcached_return_t rc= memcached_parse_configuration(self, string, length);
239
240 if (memcached_success(rc) and memcached_parse_filename(self))
241 {
242 rc= memcached_parse_configure_file(self, memcached_parse_filename(self), memcached_parse_filename_length(self));
243 }
244
245 if (memcached_failed(rc))
246 {
247 memcached_free(self);
248 errno= EINVAL;
249 return NULL;
250 }
251
252 return self;
253 }
254
255 memcached_return_t memcached_reset(memcached_st *ptr)
256 {
257 WATCHPOINT_ASSERT(ptr);
258 if (not ptr)
259 return MEMCACHED_INVALID_ARGUMENTS;
260
261 bool stored_is_allocated= memcached_is_allocated(ptr);
262 uint64_t query_id= ptr->query_id;
263 _free(ptr, false);
264 memcached_create(ptr);
265 memcached_set_allocated(ptr, stored_is_allocated);
266 ptr->query_id= query_id;
267
268 if (ptr->configure.filename)
269 {
270 return memcached_parse_configure_file(ptr, memcached_param_array(ptr->configure.filename));
271 }
272
273 return MEMCACHED_SUCCESS;
274 }
275
276 void memcached_servers_reset(memcached_st *ptr)
277 {
278 if (not ptr)
279 return;
280
281 memcached_server_list_free(memcached_server_list(ptr));
282
283 memcached_server_list_set(ptr, NULL);
284 ptr->number_of_hosts= 0;
285 if (ptr->last_disconnected_server)
286 {
287 memcached_server_free(ptr->last_disconnected_server);
288 }
289 ptr->last_disconnected_server= NULL;
290 ptr->server_failure_limit= 0;
291 }
292
293 void memcached_reset_last_disconnected_server(memcached_st *ptr)
294 {
295 if (not ptr)
296 return;
297
298 if (ptr->last_disconnected_server)
299 {
300 memcached_server_free(ptr->last_disconnected_server);
301 ptr->last_disconnected_server= NULL;
302 }
303 }
304
305 void memcached_free(memcached_st *ptr)
306 {
307 if (not ptr)
308 return;
309
310 _free(ptr, true);
311 }
312
313 /*
314 clone is the destination, while source is the structure to clone.
315 If source is NULL the call is the same as if a memcached_create() was
316 called.
317 */
318 memcached_st *memcached_clone(memcached_st *clone, const memcached_st *source)
319 {
320 memcached_return_t rc= MEMCACHED_SUCCESS;
321 memcached_st *new_clone;
322
323 if (source == NULL)
324 return memcached_create(clone);
325
326 if (clone && memcached_is_allocated(clone))
327 {
328 return NULL;
329 }
330
331 new_clone= memcached_create(clone);
332
333 if (new_clone == NULL)
334 return NULL;
335
336 new_clone->flags= source->flags;
337 new_clone->send_size= source->send_size;
338 new_clone->recv_size= source->recv_size;
339 new_clone->poll_timeout= source->poll_timeout;
340 new_clone->connect_timeout= source->connect_timeout;
341 new_clone->retry_timeout= source->retry_timeout;
342 new_clone->distribution= source->distribution;
343
344 if (not hashkit_clone(&new_clone->hashkit, &source->hashkit))
345 {
346 memcached_free(new_clone);
347 return NULL;
348 }
349
350 new_clone->user_data= source->user_data;
351
352 new_clone->snd_timeout= source->snd_timeout;
353 new_clone->rcv_timeout= source->rcv_timeout;
354
355 new_clone->on_clone= source->on_clone;
356 new_clone->on_cleanup= source->on_cleanup;
357
358 new_clone->allocators= source->allocators;
359
360 new_clone->get_key_failure= source->get_key_failure;
361 new_clone->delete_trigger= source->delete_trigger;
362 new_clone->server_failure_limit= source->server_failure_limit;
363 new_clone->io_msg_watermark= source->io_msg_watermark;
364 new_clone->io_bytes_watermark= source->io_bytes_watermark;
365 new_clone->io_key_prefetch= source->io_key_prefetch;
366 new_clone->number_of_replicas= source->number_of_replicas;
367 new_clone->tcp_keepidle= source->tcp_keepidle;
368
369 if (memcached_server_count(source))
370 rc= memcached_push(new_clone, source);
371
372 if (rc != MEMCACHED_SUCCESS)
373 {
374 memcached_free(new_clone);
375
376 return NULL;
377 }
378
379
380 new_clone->prefix_key= memcached_array_clone(new_clone, source->prefix_key);
381 new_clone->configure.filename= memcached_array_clone(new_clone, source->prefix_key);
382
383 #ifdef LIBMEMCACHED_WITH_SASL_SUPPORT
384 if (source->sasl.callbacks)
385 {
386 if (memcached_clone_sasl(new_clone, source) != MEMCACHED_SUCCESS)
387 {
388 memcached_free(new_clone);
389 return NULL;
390 }
391 }
392 #endif
393
394 rc= run_distribution(new_clone);
395
396 if (rc != MEMCACHED_SUCCESS)
397 {
398 memcached_free(new_clone);
399
400 return NULL;
401 }
402
403 if (source->on_clone)
404 source->on_clone(new_clone, source);
405
406 return new_clone;
407 }
408
409 void *memcached_get_user_data(const memcached_st *ptr)
410 {
411 return ptr->user_data;
412 }
413
414 void *memcached_set_user_data(memcached_st *ptr, void *data)
415 {
416 void *ret= ptr->user_data;
417 ptr->user_data= data;
418
419 return ret;
420 }
421
422 memcached_return_t memcached_push(memcached_st *destination, const memcached_st *source)
423 {
424 return memcached_server_push(destination, source->servers);
425 }
426
427 memcached_server_write_instance_st memcached_server_instance_fetch(memcached_st *ptr, uint32_t server_key)
428 {
429 return &ptr->servers[server_key];
430 }
431
432 memcached_server_instance_st memcached_server_instance_by_position(const memcached_st *ptr, uint32_t server_key)
433 {
434 return &ptr->servers[server_key];
435 }
436
437 uint64_t memcached_query_id(const memcached_st *self)
438 {
439 if (not self)
440 return 0;
441
442 return self->query_id;
443 }