53f74f79365ee5d5a48e11a3f78e1497232db8e7
[awesomized/libmemcached] / libmemcached / instance.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
40 static inline void _server_init(memcached_instance_st* self, Memcached *root,
41 const memcached_string_t& hostname,
42 in_port_t port,
43 uint32_t weight, memcached_connection_t type)
44 {
45 self->options.is_shutting_down= false;
46 self->options.is_dead= false;
47 self->options.ready= false;
48 self->_events= 0;
49 self->_revents= 0;
50 self->cursor_active_= 0;
51 self->port_= port;
52 self->fd= INVALID_SOCKET;
53 self->io_bytes_sent= 0;
54 self->request_id= 0;
55 self->server_failure_counter= 0;
56 self->server_failure_counter_query_id= 0;
57 self->server_timeout_counter= 0;
58 self->server_timeout_counter_query_id= 0;
59 self->weight= weight ? weight : 1; // 1 is the default weight value
60 self->io_wait_count.read= 0;
61 self->io_wait_count.write= 0;
62 self->io_wait_count.timeouts= 0;
63 self->io_wait_count._bytes_read= 0;
64 self->major_version= UINT8_MAX;
65 self->micro_version= UINT8_MAX;
66 self->minor_version= UINT8_MAX;
67 self->type= type;
68 self->error_messages= NULL;
69 self->read_ptr= self->read_buffer;
70 self->read_buffer_length= 0;
71 self->read_data_length= 0;
72 self->write_buffer_offset= 0;
73 self->address_info= NULL;
74 self->address_info_next= NULL;
75
76 self->state= MEMCACHED_SERVER_STATE_NEW;
77 self->next_retry= 0;
78
79 self->root= root;
80 if (root)
81 {
82 self->version= ++root->server_info.version;
83 }
84 else
85 {
86 self->version= UINT_MAX;
87 }
88 self->limit_maxbytes= 0;
89 self->hostname(hostname);
90 }
91
92 static memcached_instance_st* _server_create(memcached_instance_st* self, const memcached_st *memc)
93 {
94 if (self == NULL)
95 {
96 self= libmemcached_xmalloc(memc, memcached_instance_st);
97
98 if (self == NULL)
99 {
100 return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
101 }
102
103 self->options.is_allocated= true;
104 }
105 else
106 {
107 self->options.is_allocated= false;
108 }
109
110 self->options.is_initialized= true;
111
112 return self;
113 }
114
115 void memcached_instance_st::events(short arg)
116 {
117 if ((_events | arg) == _events)
118 {
119 return;
120 }
121
122 _events|= arg;
123 }
124
125 void memcached_instance_st::revents(short arg)
126 {
127 if (arg)
128 {
129 options.ready= true;
130 }
131
132 _revents= arg;
133 _events&= short(~arg);
134 }
135
136 memcached_instance_st* __instance_create_with(memcached_st *memc,
137 memcached_instance_st* self,
138 const memcached_string_t& hostname,
139 const in_port_t port,
140 uint32_t weight,
141 const memcached_connection_t type)
142 {
143 if (memcached_is_valid_servername(hostname) == false)
144 {
145 memcached_set_error(*memc, MEMCACHED_INVALID_ARGUMENTS, MEMCACHED_AT, memcached_literal_param("Invalid hostname provided"));
146 return NULL;
147 }
148
149 self= _server_create(self, memc);
150
151 if (self == NULL)
152 {
153 return NULL;
154 }
155
156 _server_init(self, const_cast<memcached_st *>(memc), hostname, port, weight, type);
157
158 if (memc and memcached_is_udp(memc))
159 {
160 self->write_buffer_offset= UDP_DATAGRAM_HEADER_LENGTH;
161 memcached_io_init_udp_header(self, 0);
162 }
163
164 return self;
165 }
166
167 void __instance_free(memcached_instance_st* self)
168 {
169 memcached_quit_server(self, false);
170
171 self->clear_addrinfo();
172 assert(self->address_info_next == NULL);
173
174 memcached_error_free(*self);
175
176 if (memcached_is_allocated(self))
177 {
178 libmemcached_free(self->root, self);
179 }
180 else
181 {
182 self->options.is_initialized= false;
183 }
184 }
185
186 void memcached_instance_free(memcached_instance_st* self)
187 {
188 if (self)
189 {
190 __instance_free(self);
191 }
192 }
193
194 memcached_return_t memcached_server_cursor(const memcached_st* shell,
195 const memcached_server_fn *callback,
196 void *context,
197 uint32_t number_of_callbacks)
198 {
199 const Memcached* memc= memcached2Memcached(shell);
200 memcached_return_t rc;
201 if (memcached_failed(rc= initialize_const_query(memc)))
202 {
203 return rc;
204 }
205
206 size_t errors= 0;
207 for (uint32_t x= 0; x < memcached_instance_list_count(memc); x++)
208 {
209 memcached_instance_st* instance= memcached_instance_by_position(memc, x);
210
211 for (uint32_t y= 0; y < number_of_callbacks; y++)
212 {
213 memcached_return_t ret= (*callback[y])(memc, instance, context);
214
215 if (memcached_failed(ret))
216 {
217 errors++;
218 continue;
219 }
220 }
221 }
222
223 return errors ? MEMCACHED_SOME_ERRORS : MEMCACHED_SUCCESS;
224 }
225
226 memcached_return_t memcached_server_execute(memcached_st *memc,
227 memcached_server_execute_fn callback,
228 void *context)
229 {
230 if (callback == NULL)
231 {
232 return MEMCACHED_INVALID_ARGUMENTS;
233 }
234
235 bool some_errors= false;;
236 for (uint32_t x= 0; x < memcached_instance_list_count(memc); x++)
237 {
238 memcached_instance_st* instance= memcached_instance_fetch(memc, x);
239
240 memcached_return_t rc= (*callback)(memc, instance, context);
241 if (rc == MEMCACHED_INVALID_ARGUMENTS)
242 {
243 return rc;
244 }
245 else if (memcached_fatal(rc))
246 {
247 some_errors= true;
248 }
249 }
250
251 (void)some_errors;
252 return MEMCACHED_SUCCESS;
253 }
254
255 const memcached_instance_st * memcached_server_by_key(memcached_st *shell,
256 const char *key,
257 size_t key_length,
258 memcached_return_t *error)
259 {
260 Memcached* memc= memcached2Memcached(shell);
261 memcached_return_t unused;
262 if (error == NULL)
263 {
264 error= &unused;
265 }
266
267
268 memcached_return_t rc;
269 if (memcached_failed(rc= initialize_const_query(memc)))
270 {
271 *error= rc;
272 return NULL;
273 }
274
275 if (memcached_failed((memcached_key_test(*memc, (const char **)&key, &key_length, 1))))
276 {
277 *error= memcached_last_error(memc);
278 return NULL;
279 }
280
281 uint32_t server_key= memcached_generate_hash(memc, key, key_length);
282 return memcached_instance_by_position(memc, server_key);
283 }
284
285 /*
286 If we do not have a valid object to clone from, we toss an error.
287 */
288 static memcached_instance_st* memcached_instance_clone(memcached_instance_st* source)
289 {
290 /* We just do a normal create if source is missing */
291 if (source == NULL)
292 {
293 return NULL;
294 }
295
296 memcached_string_t hostname_= { memcached_string_make_from_cstr(source->hostname()) };
297 return __instance_create_with(source->root,
298 NULL,
299 hostname_,
300 source->port(), source->weight,
301 source->type);
302 }
303
304 void set_last_disconnected_host(memcached_instance_st* self)
305 {
306 assert(self->root);
307 if (self->root)
308 {
309 if (memcached_server_get_last_disconnect(self->root) and
310 memcached_server_get_last_disconnect(self->root)->version == self->version)
311 {
312 return;
313 }
314
315 // const_cast
316 memcached_st *root= (memcached_st *)self->root;
317
318 memcached_instance_free((memcached_instance_st*)(root->last_disconnected_server));
319
320 // We set is_parsing so that no lookup happens
321 root->state.is_parsing= true;
322 root->last_disconnected_server= memcached_instance_clone(self);
323 root->state.is_parsing= false;
324
325 ((memcached_instance_st*)memcached_server_get_last_disconnect(root))->version= self->version;
326 }
327 }
328
329 const memcached_instance_st * memcached_server_get_last_disconnect(const memcached_st *shell)
330 {
331 const Memcached* self= memcached2Memcached(shell);
332 if (self)
333 {
334 return (const memcached_instance_st *)self->last_disconnected_server;
335 }
336
337 return 0;
338 }
339
340 void memcached_instance_next_retry(const memcached_instance_st * self, const time_t absolute_time)
341 {
342 WATCHPOINT_ASSERT(self);
343 if (self)
344 {
345 ((memcached_instance_st*)self)->next_retry= absolute_time;
346 }
347 }
348
349 bool memcached_instance_st::valid() const
350 {
351 if (fd == INVALID_SOCKET)
352 {
353 return false;
354 }
355
356 return true;
357 }
358
359 bool memcached_instance_st::is_shutting_down() const
360 {
361 return options.is_shutting_down;
362 }