See if this fixes issue with 64bit Ubuntu
[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->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 if (self->weight > 1 && root)
55 {
56 ((memcached_st *)root)->ketama.weighted= true;
57 }
58
59 self->root= root;
60 self->limit_maxbytes= 0;
61 if (hostname == NULL)
62 {
63 self->hostname[0]= 0;
64 }
65 else
66 {
67 strncpy(self->hostname, hostname, NI_MAXHOST - 1);
68 }
69 }
70
71 static memcached_server_st *_server_create(memcached_server_st *self, const memcached_st *memc)
72 {
73 if (self == NULL)
74 {
75 self= (memcached_server_st *)libmemcached_malloc(memc, sizeof(memcached_server_st));
76
77 if (! self)
78 return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
79
80 self->options.is_allocated= true;
81 }
82 else
83 {
84 self->options.is_allocated= false;
85 }
86
87 self->options.is_initialized= true;
88
89 return self;
90 }
91
92 memcached_server_st *memcached_server_create_with(const memcached_st *memc,
93 memcached_server_write_instance_st self,
94 const char *hostname, in_port_t port,
95 uint32_t weight, memcached_connection_t type)
96 {
97 self= _server_create(self, memc);
98
99 if (self == NULL)
100 return NULL;
101
102 _server_init(self, memc, hostname, port, weight, type);
103
104
105 if (type == MEMCACHED_CONNECTION_UDP)
106 {
107 self->write_buffer_offset= UDP_DATAGRAM_HEADER_LENGTH;
108 memcached_io_init_udp_header(self, 0);
109 }
110
111 return self;
112 }
113
114 void memcached_server_free(memcached_server_st *self)
115 {
116 memcached_quit_server(self, false);
117
118 if (self->cached_server_error)
119 free(self->cached_server_error);
120
121 if (self->address_info)
122 freeaddrinfo(self->address_info);
123
124 if (memcached_is_allocated(self))
125 {
126 if (self->root)
127 {
128 libmemcached_free(self->root, self);
129 }
130 else
131 {
132 free(self);
133 }
134 }
135 else
136 {
137 self->options.is_initialized= false;
138 }
139 }
140
141 /*
142 If we do not have a valid object to clone from, we toss an error.
143 */
144 memcached_server_st *memcached_server_clone(memcached_server_st *destination,
145 const memcached_server_st *source)
146 {
147 /* We just do a normal create if source is missing */
148 if (source == NULL)
149 return NULL;
150
151 destination= memcached_server_create_with(source->root, destination,
152 source->hostname, source->port, source->weight,
153 source->type);
154 if (destination != NULL)
155 {
156 destination->cached_errno= source->cached_errno;
157
158 if (source->cached_server_error)
159 destination->cached_server_error= strdup(source->cached_server_error);
160 }
161
162 return destination;
163
164 }
165
166 memcached_return_t memcached_server_cursor(const memcached_st *ptr,
167 const memcached_server_fn *callback,
168 void *context,
169 uint32_t number_of_callbacks)
170 {
171 for (uint32_t x= 0; x < memcached_server_count(ptr); x++)
172 {
173 memcached_server_instance_st instance=
174 memcached_server_instance_by_position(ptr, x);
175
176 for (uint32_t y= 0; y < number_of_callbacks; y++)
177 {
178 unsigned int iferror;
179
180 iferror= (*callback[y])(ptr, instance, context);
181
182 if (iferror)
183 continue;
184 }
185 }
186
187 return MEMCACHED_SUCCESS;
188 }
189
190 memcached_return_t memcached_server_execute(memcached_st *ptr,
191 memcached_server_execute_fn callback,
192 void *context)
193 {
194 for (uint32_t x= 0; x < memcached_server_count(ptr); x++)
195 {
196 memcached_server_write_instance_st instance=
197 memcached_server_instance_fetch(ptr, x);
198
199 unsigned int iferror;
200
201 iferror= (*callback)(ptr, instance, context);
202
203 if (iferror)
204 continue;
205 }
206
207 return MEMCACHED_SUCCESS;
208 }
209
210 memcached_server_instance_st memcached_server_by_key(const memcached_st *ptr,
211 const char *key,
212 size_t key_length,
213 memcached_return_t *error)
214 {
215 uint32_t server_key;
216 memcached_server_instance_st instance;
217
218 *error= memcached_validate_key_length(key_length,
219 ptr->flags.binary_protocol);
220 unlikely (*error != MEMCACHED_SUCCESS)
221 return NULL;
222
223 unlikely (memcached_server_count(ptr) == 0)
224 {
225 *error= MEMCACHED_NO_SERVERS;
226 return NULL;
227 }
228
229 if (ptr->flags.verify_key && (memcached_key_test((const char **)&key, &key_length, 1) == MEMCACHED_BAD_KEY_PROVIDED))
230 {
231 *error= MEMCACHED_BAD_KEY_PROVIDED;
232 return NULL;
233 }
234
235 server_key= memcached_generate_hash(ptr, key, key_length);
236 instance= memcached_server_instance_by_position(ptr, server_key);
237
238 return instance;
239
240 }
241
242 void memcached_server_error_reset(memcached_server_st *ptr)
243 {
244 ptr->cached_server_error[0]= 0;
245 }
246
247 memcached_server_instance_st memcached_server_get_last_disconnect(const memcached_st *ptr)
248 {
249 return ptr->last_disconnected_server;
250 }
251
252 void memcached_server_list_free(memcached_server_list_st self)
253 {
254 if (self == NULL)
255 return;
256
257 for (uint32_t x= 0; x < memcached_server_list_count(self); x++)
258 {
259 if (self[x].address_info)
260 {
261 freeaddrinfo(self[x].address_info);
262 self[x].address_info= NULL;
263 }
264 }
265
266 const memcached_st *root= self->root;
267 if (root)
268 {
269 libmemcached_free(root, self);
270 }
271 else
272 {
273 free(self);
274 }
275 }
276
277 uint32_t memcached_servers_set_count(memcached_server_st *servers, uint32_t count)
278 {
279 return servers->number_of_hosts= count;
280 }
281
282 uint32_t memcached_server_count(const memcached_st *self)
283 {
284 return self->number_of_hosts;
285 }
286
287 const char *memcached_server_name(memcached_server_instance_st self)
288 {
289 return self->hostname;
290 }
291
292 in_port_t memcached_server_port(memcached_server_instance_st self)
293 {
294 return self->port;
295 }
296
297 uint32_t memcached_server_response_count(memcached_server_instance_st self)
298 {
299 return self->cursor_active;
300 }
301
302 const char *memcached_server_error(memcached_server_instance_st ptr)
303 {
304 return ptr
305 ? ptr->cached_server_error
306 : NULL;
307 }
308