A number of fixes/etc.
[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 "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.sockaddr_inited= false;
22 self->options.is_shutting_down= 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;
31 self->state.is_corked= false;
32 self->major_version= 0;
33 self->micro_version= 0;
34 self->minor_version= 0;
35 self->type= type;
36 self->read_ptr= self->read_buffer;
37 self->cached_server_error= NULL;
38 self->read_buffer_length= 0;
39 self->read_data_length= 0;
40 self->write_buffer_offset= 0;
41 self->address_info= NULL;
42
43 if (root)
44 {
45 self->next_retry= root->retry_timeout;
46 }
47 else
48 {
49 self->next_retry= 0;
50 }
51
52 self->root= root;
53 self->limit_maxbytes= 0;
54 if (hostname == NULL)
55 self->hostname[0]= 0;
56 else
57 strncpy(self->hostname, hostname, NI_MAXHOST - 1);
58 }
59
60 static memcached_server_st *_server_create(memcached_server_st *self, const memcached_st *memc)
61 {
62 if (self == NULL)
63 {
64 self= (memcached_server_st *)libmemcached_malloc(memc, sizeof(memcached_server_st));
65
66 if (! self)
67 return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
68
69 self->options.is_allocated= true;
70 }
71 else
72 {
73 self->options.is_allocated= false;
74 }
75
76 self->options.is_initialized= true;
77
78 return self;
79 }
80
81 memcached_server_st *memcached_server_create_with(const memcached_st *memc,
82 memcached_server_write_instance_st self,
83 const char *hostname, in_port_t port,
84 uint32_t weight, memcached_connection_t type)
85 {
86 self= _server_create(self, memc);
87
88 if (self == NULL)
89 return NULL;
90
91 _server_init(self, memc, hostname, port, weight, type);
92
93
94 if (type == MEMCACHED_CONNECTION_UDP)
95 {
96 self->write_buffer_offset= UDP_DATAGRAM_HEADER_LENGTH;
97 memcached_io_init_udp_header(self, 0);
98 }
99
100 return self;
101 }
102
103 void memcached_server_free(memcached_server_st *self)
104 {
105 memcached_quit_server(self, false);
106
107 if (self->cached_server_error)
108 free(self->cached_server_error);
109
110 if (self->address_info)
111 freeaddrinfo(self->address_info);
112
113 if (memcached_is_allocated(self))
114 {
115 libmemcached_free(self->root, self);
116 }
117 else
118 {
119 self->options.is_initialized= false;
120 }
121 }
122
123 /*
124 If we do not have a valid object to clone from, we toss an error.
125 */
126 memcached_server_st *memcached_server_clone(memcached_server_st *destination,
127 const memcached_server_st *source)
128 {
129 /* We just do a normal create if source is missing */
130 if (source == NULL)
131 return NULL;
132
133 destination= memcached_server_create_with(source->root, destination,
134 source->hostname, source->port, source->weight,
135 source->type);
136 if (destination != NULL)
137 {
138 destination->cached_errno= source->cached_errno;
139
140 if (source->cached_server_error)
141 destination->cached_server_error= strdup(source->cached_server_error);
142 }
143
144 return destination;
145
146 }
147
148 memcached_return_t memcached_server_cursor(const memcached_st *ptr,
149 const memcached_server_fn *callback,
150 void *context,
151 uint32_t number_of_callbacks)
152 {
153 for (uint32_t x= 0; x < memcached_server_count(ptr); x++)
154 {
155 memcached_server_instance_st instance=
156 memcached_server_instance_by_position(ptr, x);
157
158 for (uint32_t y= 0; y < number_of_callbacks; y++)
159 {
160 unsigned int iferror;
161
162 iferror= (*callback[y])(ptr, instance, context);
163
164 if (iferror)
165 continue;
166 }
167 }
168
169 return MEMCACHED_SUCCESS;
170 }
171
172 memcached_server_instance_st memcached_server_by_key(const memcached_st *ptr,
173 const char *key,
174 size_t key_length,
175 memcached_return_t *error)
176 {
177 uint32_t server_key;
178 memcached_server_instance_st instance;
179
180 *error= memcached_validate_key_length(key_length,
181 ptr->flags.binary_protocol);
182 unlikely (*error != MEMCACHED_SUCCESS)
183 return NULL;
184
185 unlikely (memcached_server_count(ptr) == 0)
186 {
187 *error= MEMCACHED_NO_SERVERS;
188 return NULL;
189 }
190
191 if (ptr->flags.verify_key && (memcached_key_test((const char **)&key, &key_length, 1) == MEMCACHED_BAD_KEY_PROVIDED))
192 {
193 *error= MEMCACHED_BAD_KEY_PROVIDED;
194 return NULL;
195 }
196
197 server_key= memcached_generate_hash(ptr, key, key_length);
198 instance= memcached_server_instance_by_position(ptr, server_key);
199
200 return instance;
201
202 }
203
204 void memcached_server_error_reset(memcached_server_st *ptr)
205 {
206 ptr->cached_server_error[0]= 0;
207 }
208
209 memcached_server_instance_st memcached_server_get_last_disconnect(const memcached_st *ptr)
210 {
211 return ptr->last_disconnected_server;
212 }
213
214 void memcached_server_list_free(memcached_server_list_st self)
215 {
216 if (self == NULL)
217 return;
218
219 const memcached_st *root= self->root;
220
221 for (uint32_t x= 0; x < memcached_server_list_count(self); x++)
222 {
223 if (self[x].address_info)
224 {
225 freeaddrinfo(self[x].address_info);
226 self[x].address_info= NULL;
227 }
228 }
229
230 if (root)
231 {
232 libmemcached_free(root, self);
233 }
234 else
235 {
236 free(self);
237 }
238 }
239
240 inline uint32_t memcached_servers_set_count(memcached_server_st *servers, uint32_t count)
241 {
242 return servers->number_of_hosts= count;
243 }
244
245 inline uint32_t memcached_server_count(const memcached_st *self)
246 {
247 return self->number_of_hosts;
248 }
249
250 inline const char *memcached_server_name(memcached_server_instance_st self)
251 {
252 return self->hostname;
253 }
254
255 inline in_port_t memcached_server_port(memcached_server_instance_st self)
256 {
257 return self->port;
258 }
259
260 inline uint32_t memcached_server_response_count(memcached_server_instance_st self)
261 {
262 return self->cursor_active;
263 }
264
265 const char *memcached_server_error(memcached_server_instance_st ptr)
266 {
267 return ptr
268 ? ptr->cached_server_error
269 : NULL;
270 }
271