Merge Andre
[awesomized/libmemcached] / libmemcached / memcached.c
1 /* LibMemcached
2 * Copyright (C) 2006-2010 Brian Aker
3 * All rights reserved.
4 *
5 * Use and distribution licensed under the BSD license. See
6 * the COPYING file in the parent directory for full text.
7 *
8 * Summary:
9 *
10 */
11
12 #include "common.h"
13
14 static const memcached_st global_copy= {
15 .state= {
16 .is_purging= false,
17 .is_processing_input= false,
18 },
19 .flags= {
20 .auto_eject_hosts= false,
21 .binary_protocol= false,
22 .buffer_requests= false,
23 .cork= false,
24 .hash_with_prefix_key= false,
25 .ketama_weighted= false,
26 .no_block= false,
27 .no_reply= false,
28 .randomize_replica_read= false,
29 .reuse_memory= false,
30 .support_cas= false,
31 .tcp_nodelay= false,
32 .use_cache_lookups= false,
33 .use_sort_hosts= false,
34 .use_udp= false,
35 .verify_key= false,
36 .tcp_keepalive= false
37 }
38 };
39
40 static inline bool _memcached_init(memcached_st *self)
41 {
42 self->state= global_copy.state;
43 self->flags= global_copy.flags;
44
45 self->distribution= MEMCACHED_DISTRIBUTION_MODULA;
46
47 hashkit_st *hash_ptr;
48 hash_ptr= hashkit_create(&self->hashkit);
49 if (! hash_ptr)
50 return false;
51
52 self->continuum_points_counter= 0;
53
54 self->number_of_hosts= 0;
55 self->servers= NULL;
56 self->last_disconnected_server= NULL;
57
58 self->snd_timeout= 0;
59 self->rcv_timeout= 0;
60 self->server_failure_limit= 0;
61
62 /* TODO, Document why we picked these defaults */
63 self->io_msg_watermark= 500;
64 self->io_bytes_watermark= 65 * 1024;
65
66 self->tcp_keepidle= 0;
67
68 self->io_key_prefetch= 0;
69 self->cached_errno= 0;
70 self->poll_timeout= MEMCACHED_DEFAULT_TIMEOUT;
71 self->connect_timeout= MEMCACHED_DEFAULT_TIMEOUT;
72 self->retry_timeout= 0;
73 self->continuum_count= 0;
74
75 self->send_size= -1;
76 self->recv_size= -1;
77
78 self->user_data= NULL;
79 self->next_distribution_rebuild= 0;
80 self->prefix_key_length= 0;
81 self->number_of_replicas= 0;
82 hash_ptr= hashkit_create(&self->distribution_hashkit);
83 if (! hash_ptr)
84 return false;
85 self->continuum= NULL;
86
87 self->allocators= memcached_allocators_return_default();
88
89 self->on_clone= NULL;
90 self->on_cleanup= NULL;
91 self->get_key_failure= NULL;
92 self->delete_trigger= NULL;
93 self->callbacks= NULL;
94 #ifdef LIBMEMCACHED_WITH_SASL_SUPPORT
95 self->sasl.callbacks= NULL;
96 self->sasl.is_allocated= false;
97 #endif
98
99 return true;
100 }
101
102 memcached_st *memcached_create(memcached_st *ptr)
103 {
104 if (ptr == NULL)
105 {
106 ptr= (memcached_st *)malloc(sizeof(memcached_st));
107
108 if (! ptr)
109 {
110 return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
111 }
112
113 ptr->options.is_allocated= true;
114 }
115 else
116 {
117 ptr->options.is_allocated= false;
118 }
119
120 #if 0
121 memcached_set_purging(ptr, false);
122 memcached_set_processing_input(ptr, false);
123 #endif
124
125 if (! _memcached_init(ptr))
126 {
127 memcached_free(ptr);
128 return NULL;
129 }
130
131 if (! memcached_result_create(ptr, &ptr->result))
132 {
133 memcached_free(ptr);
134 return NULL;
135 }
136
137 WATCHPOINT_ASSERT_INITIALIZED(&ptr->result);
138
139 return ptr;
140 }
141
142 void memcached_servers_reset(memcached_st *ptr)
143 {
144 memcached_server_list_free(memcached_server_list(ptr));
145
146 memcached_server_list_set(ptr, NULL);
147 ptr->number_of_hosts= 0;
148 ptr->last_disconnected_server= NULL;
149 ptr->server_failure_limit= 0;
150 }
151
152 void memcached_free(memcached_st *ptr)
153 {
154 /* If we have anything open, lets close it now */
155 memcached_quit(ptr);
156 memcached_server_list_free(memcached_server_list(ptr));
157 memcached_result_free(&ptr->result);
158
159 if (ptr->on_cleanup)
160 ptr->on_cleanup(ptr);
161
162 if (ptr->continuum)
163 libmemcached_free(ptr, ptr->continuum);
164
165 #ifdef LIBMEMCACHED_WITH_SASL_SUPPORT
166 if (ptr->sasl.callbacks != NULL)
167 {
168 memcached_destroy_sasl_auth_data(ptr);
169 }
170 #endif
171
172 if (memcached_is_allocated(ptr))
173 {
174 libmemcached_free(ptr, ptr);
175 }
176 }
177
178 /*
179 clone is the destination, while source is the structure to clone.
180 If source is NULL the call is the same as if a memcached_create() was
181 called.
182 */
183 memcached_st *memcached_clone(memcached_st *clone, const memcached_st *source)
184 {
185 memcached_return_t rc= MEMCACHED_SUCCESS;
186 memcached_st *new_clone;
187
188 if (source == NULL)
189 return memcached_create(clone);
190
191 if (clone && memcached_is_allocated(clone))
192 {
193 return NULL;
194 }
195
196 new_clone= memcached_create(clone);
197
198 if (new_clone == NULL)
199 return NULL;
200
201 new_clone->flags= source->flags;
202 new_clone->send_size= source->send_size;
203 new_clone->recv_size= source->recv_size;
204 new_clone->poll_timeout= source->poll_timeout;
205 new_clone->connect_timeout= source->connect_timeout;
206 new_clone->retry_timeout= source->retry_timeout;
207 new_clone->distribution= source->distribution;
208
209 hashkit_st *hash_ptr;
210
211 hash_ptr= hashkit_clone(&new_clone->hashkit, &source->hashkit);
212 if (! hash_ptr)
213 {
214 memcached_free(new_clone);
215 return NULL;
216 }
217
218 hash_ptr= hashkit_clone(&new_clone->distribution_hashkit, &source->distribution_hashkit);
219 if (! hash_ptr)
220 {
221 memcached_free(new_clone);
222 return NULL;
223 }
224
225 new_clone->user_data= source->user_data;
226
227 new_clone->snd_timeout= source->snd_timeout;
228 new_clone->rcv_timeout= source->rcv_timeout;
229
230 new_clone->on_clone= source->on_clone;
231 new_clone->on_cleanup= source->on_cleanup;
232
233 new_clone->allocators= source->allocators;
234
235 new_clone->get_key_failure= source->get_key_failure;
236 new_clone->delete_trigger= source->delete_trigger;
237 new_clone->server_failure_limit= source->server_failure_limit;
238 new_clone->io_msg_watermark= source->io_msg_watermark;
239 new_clone->io_bytes_watermark= source->io_bytes_watermark;
240 new_clone->io_key_prefetch= source->io_key_prefetch;
241 new_clone->number_of_replicas= source->number_of_replicas;
242 new_clone->tcp_keepidle= source->tcp_keepidle;
243
244 if (memcached_server_count(source))
245 rc= memcached_push(new_clone, source);
246
247 if (rc != MEMCACHED_SUCCESS)
248 {
249 memcached_free(new_clone);
250
251 return NULL;
252 }
253
254
255 if (source->prefix_key_length)
256 {
257 strcpy(new_clone->prefix_key, source->prefix_key);
258 new_clone->prefix_key_length= source->prefix_key_length;
259 }
260
261 #ifdef LIBMEMCACHED_WITH_SASL_SUPPORT
262 if (source->sasl.callbacks)
263 {
264 if (memcached_clone_sasl(new_clone, source) != MEMCACHED_SUCCESS)
265 {
266 memcached_free(new_clone);
267 return NULL;
268 }
269 }
270 #endif
271
272 rc= run_distribution(new_clone);
273
274 if (rc != MEMCACHED_SUCCESS)
275 {
276 memcached_free(new_clone);
277
278 return NULL;
279 }
280
281 if (source->on_clone)
282 source->on_clone(new_clone, source);
283
284 return new_clone;
285 }
286
287 void *memcached_get_user_data(const memcached_st *ptr)
288 {
289 return ptr->user_data;
290 }
291
292 void *memcached_set_user_data(memcached_st *ptr, void *data)
293 {
294 void *ret= ptr->user_data;
295 ptr->user_data= data;
296
297 return ret;
298 }
299
300 memcached_return_t memcached_push(memcached_st *destination, const memcached_st *source)
301 {
302 return memcached_server_push(destination, source->servers);
303 }
304
305 memcached_server_write_instance_st memcached_server_instance_fetch(memcached_st *ptr, uint32_t server_key)
306 {
307 return &ptr->servers[server_key];
308 }
309
310 memcached_server_instance_st memcached_server_instance_by_position(const memcached_st *ptr, uint32_t server_key)
311 {
312 return &ptr->servers[server_key];
313 }