This fixes bug 776354.
[m6w6/libmemcached] / libmemcached / server.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 /*
39 This is a partial implementation for fetching/creating memcached_server_st objects.
40 */
41 #include <libmemcached/common.h>
42 #include <cassert>
43
44 static inline void _server_init(memcached_server_st *self, memcached_st *root,
45 const char *hostname, in_port_t port,
46 uint32_t weight, memcached_connection_t type)
47 {
48 self->options.is_shutting_down= false;
49 self->options.is_dead= false;
50 self->number_of_hosts= 0;
51 self->cursor_active= 0;
52 self->port= port;
53 self->cached_errno= 0;
54 self->fd= -1;
55 self->io_bytes_sent= 0;
56 self->server_failure_counter= 0;
57 self->weight= weight ? weight : 1; // 1 is the default weight value
58 WATCHPOINT_SET(self->io_wait_count.read= 0);
59 WATCHPOINT_SET(self->io_wait_count.write= 0);
60 self->major_version= UINT8_MAX;
61 self->micro_version= UINT8_MAX;
62 self->minor_version= UINT8_MAX;
63 self->type= type;
64 self->read_ptr= self->read_buffer;
65 self->cached_server_error= NULL;
66 self->read_buffer_length= 0;
67 self->read_data_length= 0;
68 self->write_buffer_offset= 0;
69 self->address_info= NULL;
70 self->address_info_next= NULL;
71
72 if (root)
73 {
74 self->next_retry= root->retry_timeout;
75 }
76 else
77 {
78 self->next_retry= 0;
79 }
80
81 self->root= root;
82 self->limit_maxbytes= 0;
83 if (hostname == NULL)
84 {
85 self->hostname[0]= 0;
86 }
87 else
88 {
89 strncpy(self->hostname, hostname, NI_MAXHOST - 1);
90 }
91 }
92
93 static memcached_server_st *_server_create(memcached_server_st *self, const memcached_st *memc)
94 {
95 if (not self)
96 {
97 self= (memcached_server_st *)libmemcached_malloc(memc, sizeof(memcached_server_st));
98
99 if (not self)
100 return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
101
102 self->options.is_allocated= true;
103 }
104 else
105 {
106 self->options.is_allocated= false;
107 }
108
109 self->options.is_initialized= true;
110
111 return self;
112 }
113
114 memcached_server_st *memcached_server_create_with(const memcached_st *memc,
115 memcached_server_write_instance_st self,
116 const char *hostname, in_port_t port,
117 uint32_t weight, memcached_connection_t type)
118 {
119 self= _server_create(self, memc);
120
121 if (not self)
122 return NULL;
123
124 _server_init(self, const_cast<memcached_st *>(memc), hostname, port, weight, type);
125
126
127 if (type == MEMCACHED_CONNECTION_UDP)
128 {
129 self->write_buffer_offset= UDP_DATAGRAM_HEADER_LENGTH;
130 memcached_io_init_udp_header(self, 0);
131 }
132
133 return self;
134 }
135
136 void memcached_server_free(memcached_server_st *self)
137 {
138 assert(self);
139 memcached_quit_server(self, false);
140
141 if (self->cached_server_error)
142 free(self->cached_server_error);
143
144 if (self->address_info)
145 freeaddrinfo(self->address_info);
146
147 if (memcached_is_allocated(self))
148 {
149 if (self->root)
150 {
151 libmemcached_free(self->root, self);
152 }
153 else
154 {
155 free(self);
156 }
157 }
158 else
159 {
160 self->options.is_initialized= false;
161 }
162 }
163
164 /*
165 If we do not have a valid object to clone from, we toss an error.
166 */
167 memcached_server_st *memcached_server_clone(memcached_server_st *destination,
168 const memcached_server_st *source)
169 {
170 /* We just do a normal create if source is missing */
171 if (not source)
172 return NULL;
173
174 destination= memcached_server_create_with(source->root, destination,
175 source->hostname, source->port, source->weight,
176 source->type);
177 if (destination != NULL)
178 {
179 destination->cached_errno= source->cached_errno;
180
181 if (source->cached_server_error)
182 destination->cached_server_error= strdup(source->cached_server_error);
183 }
184
185 return destination;
186
187 }
188
189 memcached_return_t memcached_server_cursor(const memcached_st *ptr,
190 const memcached_server_fn *callback,
191 void *context,
192 uint32_t number_of_callbacks)
193 {
194 memcached_return_t rc;
195 if (memcached_failed(rc= initialize_const_query(ptr)))
196 {
197 return rc;
198 }
199
200 for (uint32_t x= 0; x < memcached_server_count(ptr); x++)
201 {
202 memcached_server_instance_st instance=
203 memcached_server_instance_by_position(ptr, x);
204
205 for (uint32_t y= 0; y < number_of_callbacks; y++)
206 {
207 unsigned int iferror;
208
209 iferror= (*callback[y])(ptr, instance, context);
210
211 if (iferror)
212 continue;
213 }
214 }
215
216 return MEMCACHED_SUCCESS;
217 }
218
219 memcached_return_t memcached_server_execute(memcached_st *ptr,
220 memcached_server_execute_fn callback,
221 void *context)
222 {
223 for (uint32_t x= 0; x < memcached_server_count(ptr); x++)
224 {
225 memcached_server_write_instance_st instance= memcached_server_instance_fetch(ptr, x);
226
227 unsigned int iferror= (*callback)(ptr, instance, context);
228
229 if (iferror)
230 continue;
231 }
232
233 return MEMCACHED_SUCCESS;
234 }
235
236 memcached_server_instance_st memcached_server_by_key(const memcached_st *ptr,
237 const char *key,
238 size_t key_length,
239 memcached_return_t *error)
240 {
241 memcached_return_t rc;
242 memcached_return_t unused;
243
244 if (not error)
245 error= &unused;
246
247 if (memcached_failed(rc= initialize_const_query(ptr)))
248 {
249 *error= rc;
250 return NULL;
251 }
252
253 if (memcached_failed(rc= memcached_validate_key_length(key_length, ptr->flags.binary_protocol)))
254 {
255 *error= rc;
256 return NULL;
257 }
258
259 if (ptr->flags.verify_key && (memcached_key_test((const char **)&key, &key_length, 1) == MEMCACHED_BAD_KEY_PROVIDED))
260 {
261 *error= MEMCACHED_BAD_KEY_PROVIDED;
262 return NULL;
263 }
264
265 uint32_t server_key= memcached_generate_hash(ptr, key, key_length);
266 return memcached_server_instance_by_position(ptr, server_key);
267
268 }
269
270 void memcached_server_error_reset(memcached_server_st *self)
271 {
272 WATCHPOINT_ASSERT(self);
273 if (not self)
274 return;
275
276 self->cached_server_error[0]= 0;
277 }
278
279 memcached_server_instance_st memcached_server_get_last_disconnect(const memcached_st *self)
280 {
281 WATCHPOINT_ASSERT(self);
282 if (not self)
283 return 0;
284
285 return self->last_disconnected_server;
286 }
287
288 void memcached_server_list_free(memcached_server_list_st self)
289 {
290 if (not self)
291 return;
292
293 for (uint32_t x= 0; x < memcached_server_list_count(self); x++)
294 {
295 if (self[x].address_info)
296 {
297 freeaddrinfo(self[x].address_info);
298 self[x].address_info= NULL;
299 }
300 }
301
302 memcached_st *root= self->root;
303 if (root)
304 {
305 libmemcached_free(root, self);
306 }
307 else
308 {
309 free(self);
310 }
311 }
312
313 uint32_t memcached_servers_set_count(memcached_server_st *servers, uint32_t count)
314 {
315 WATCHPOINT_ASSERT(servers);
316 if (not servers)
317 return 0;
318
319 return servers->number_of_hosts= count;
320 }
321
322 uint32_t memcached_server_count(const memcached_st *self)
323 {
324 WATCHPOINT_ASSERT(self);
325 if (not self)
326 return 0;
327
328 return self->number_of_hosts;
329 }
330
331 const char *memcached_server_name(memcached_server_instance_st self)
332 {
333 WATCHPOINT_ASSERT(self);
334 if (not self)
335 return NULL;
336
337 return self->hostname;
338 }
339
340 in_port_t memcached_server_port(memcached_server_instance_st self)
341 {
342 WATCHPOINT_ASSERT(self);
343 if (not self)
344 return 0;
345
346 return self->port;
347 }
348
349 uint32_t memcached_server_response_count(memcached_server_instance_st self)
350 {
351 WATCHPOINT_ASSERT(self);
352 if (not self)
353 return 0;
354
355 return self->cursor_active;
356 }
357
358 const char *memcached_server_error(memcached_server_instance_st ptr)
359 {
360 return ptr ? ptr->cached_server_error : NULL;
361 }
362