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