Merge in changes to allow for weights on hosts.
[m6w6/libmemcached] / libmemcached / server.c
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->number_of_hosts= 0;
23 self->cursor_active= 0;
24 self->port= port;
25 self->cached_errno= 0;
26 self->fd= -1;
27 self->io_bytes_sent= 0;
28 self->server_failure_counter= 0;
29 self->weight= weight ? weight : 1; // 1 is the default weight value
30 self->state.is_corked= false;
31 self->state.is_dead= false;
32 WATCHPOINT_SET(self->io_wait_count.read= 0);
33 WATCHPOINT_SET(self->io_wait_count.write= 0);
34 self->major_version= UINT8_MAX;
35 self->micro_version= UINT8_MAX;
36 self->minor_version= UINT8_MAX;
37 self->type= type;
38 self->read_ptr= self->read_buffer;
39 self->cached_server_error= NULL;
40 self->read_buffer_length= 0;
41 self->read_data_length= 0;
42 self->write_buffer_offset= 0;
43 self->address_info= NULL;
44 self->address_info_next= NULL;
45
46 if (root)
47 {
48 self->next_retry= root->retry_timeout;
49 }
50 else
51 {
52 self->next_retry= 0;
53 }
54
55 if (self->weight > 1 && root)
56 {
57 ((memcached_st *)root)->ketama.weighted= true;
58 }
59
60 self->root= root;
61 self->limit_maxbytes= 0;
62 if (hostname == NULL)
63 {
64 self->hostname[0]= 0;
65 }
66 else
67 {
68 strncpy(self->hostname, hostname, NI_MAXHOST - 1);
69 }
70 }
71
72 static memcached_server_st *_server_create(memcached_server_st *self, const memcached_st *memc)
73 {
74 if (self == NULL)
75 {
76 self= (memcached_server_st *)libmemcached_malloc(memc, sizeof(memcached_server_st));
77
78 if (! self)
79 return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
80
81 self->options.is_allocated= true;
82 }
83 else
84 {
85 self->options.is_allocated= false;
86 }
87
88 self->options.is_initialized= true;
89
90 return self;
91 }
92
93 memcached_server_st *memcached_server_create_with(const memcached_st *memc,
94 memcached_server_write_instance_st self,
95 const char *hostname, in_port_t port,
96 uint32_t weight, memcached_connection_t type)
97 {
98 self= _server_create(self, memc);
99
100 if (self == NULL)
101 return NULL;
102
103 _server_init(self, memc, hostname, port, weight, type);
104
105
106 if (type == MEMCACHED_CONNECTION_UDP)
107 {
108 self->write_buffer_offset= UDP_DATAGRAM_HEADER_LENGTH;
109 memcached_io_init_udp_header(self, 0);
110 }
111
112 return self;
113 }
114
115 void memcached_server_free(memcached_server_st *self)
116 {
117 memcached_quit_server(self, false);
118
119 if (self->cached_server_error)
120 free(self->cached_server_error);
121
122 if (self->address_info)
123 freeaddrinfo(self->address_info);
124
125 if (memcached_is_allocated(self))
126 {
127 if (self->root)
128 {
129 libmemcached_free(self->root, self);
130 }
131 else
132 {
133 free(self);
134 }
135 }
136 else
137 {
138 self->options.is_initialized= false;
139 }
140 }
141
142 /*
143 If we do not have a valid object to clone from, we toss an error.
144 */
145 memcached_server_st *memcached_server_clone(memcached_server_st *destination,
146 const memcached_server_st *source)
147 {
148 /* We just do a normal create if source is missing */
149 if (source == NULL)
150 return NULL;
151
152 destination= memcached_server_create_with(source->root, destination,
153 source->hostname, source->port, source->weight,
154 source->type);
155 if (destination != NULL)
156 {
157 destination->cached_errno= source->cached_errno;
158
159 if (source->cached_server_error)
160 destination->cached_server_error= strdup(source->cached_server_error);
161 }
162
163 return destination;
164
165 }
166
167 memcached_return_t memcached_server_cursor(const memcached_st *ptr,
168 const memcached_server_fn *callback,
169 void *context,
170 uint32_t number_of_callbacks)
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 uint32_t server_key;
217 memcached_server_instance_st instance;
218
219 *error= memcached_validate_key_length(key_length,
220 ptr->flags.binary_protocol);
221 unlikely (*error != MEMCACHED_SUCCESS)
222 return NULL;
223
224 unlikely (memcached_server_count(ptr) == 0)
225 {
226 *error= MEMCACHED_NO_SERVERS;
227 return NULL;
228 }
229
230 if (ptr->flags.verify_key && (memcached_key_test((const char **)&key, &key_length, 1) == MEMCACHED_BAD_KEY_PROVIDED))
231 {
232 *error= MEMCACHED_BAD_KEY_PROVIDED;
233 return NULL;
234 }
235
236 server_key= memcached_generate_hash(ptr, key, key_length);
237 instance= memcached_server_instance_by_position(ptr, server_key);
238
239 return instance;
240
241 }
242
243 void memcached_server_error_reset(memcached_server_st *ptr)
244 {
245 ptr->cached_server_error[0]= 0;
246 }
247
248 memcached_server_instance_st memcached_server_get_last_disconnect(const memcached_st *ptr)
249 {
250 return ptr->last_disconnected_server;
251 }
252
253 void memcached_server_list_free(memcached_server_list_st self)
254 {
255 if (self == NULL)
256 return;
257
258 for (uint32_t x= 0; x < memcached_server_list_count(self); x++)
259 {
260 if (self[x].address_info)
261 {
262 freeaddrinfo(self[x].address_info);
263 self[x].address_info= NULL;
264 }
265 }
266
267 const memcached_st *root= self->root;
268 if (root)
269 {
270 libmemcached_free(root, self);
271 }
272 else
273 {
274 free(self);
275 }
276 }
277
278 uint32_t memcached_servers_set_count(memcached_server_st *servers, uint32_t count)
279 {
280 return servers->number_of_hosts= count;
281 }
282
283 uint32_t memcached_server_count(const memcached_st *self)
284 {
285 return self->number_of_hosts;
286 }
287
288 const char *memcached_server_name(memcached_server_instance_st self)
289 {
290 return self->hostname;
291 }
292
293 in_port_t memcached_server_port(memcached_server_instance_st self)
294 {
295 return self->port;
296 }
297
298 uint32_t memcached_server_response_count(memcached_server_instance_st self)
299 {
300 return self->cursor_active;
301 }
302
303 const char *memcached_server_error(memcached_server_instance_st ptr)
304 {
305 return ptr
306 ? ptr->cached_server_error
307 : NULL;
308 }
309