1 /* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
5 * Copyright (C) 2011 Data Differential, http://datadifferential.com/
6 * Copyright (C) 2006-2009 Brian Aker All rights reserved.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions are
12 * * Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
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
20 * * The names of its contributors may not be used to endorse or
21 * promote products derived from this software without specific prior
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.
38 #include <libmemcached/common.h>
40 static inline void _server_init(org::libmemcached::Instance
* self
, memcached_st
*root
,
41 const memcached_string_t
& hostname
,
43 uint32_t weight
, memcached_connection_t type
)
45 self
->options
.is_shutting_down
= false;
46 self
->options
.is_dead
= false;
47 self
->options
.ready
= false;
50 self
->cursor_active_
= 0;
52 self
->fd
= INVALID_SOCKET
;
53 self
->io_bytes_sent
= 0;
55 self
->server_failure_counter
= 0;
56 self
->server_failure_counter_query_id
= 0;
57 self
->weight
= weight
? weight
: 1; // 1 is the default weight value
58 self
->io_wait_count
.read
= 0;
59 self
->io_wait_count
.write
= 0;
60 self
->io_wait_count
.timeouts
= 0;
61 self
->io_wait_count
._bytes_read
= 0;
62 self
->major_version
= UINT8_MAX
;
63 self
->micro_version
= UINT8_MAX
;
64 self
->minor_version
= UINT8_MAX
;
66 self
->error_messages
= NULL
;
67 self
->read_ptr
= self
->read_buffer
;
68 self
->read_buffer_length
= 0;
69 self
->read_data_length
= 0;
70 self
->write_buffer_offset
= 0;
71 self
->address_info
= NULL
;
72 self
->address_info_next
= NULL
;
74 self
->state
= MEMCACHED_SERVER_STATE_NEW
;
80 self
->version
= ++root
->server_info
.version
;
84 self
->version
= UINT_MAX
;
86 self
->limit_maxbytes
= 0;
87 memcpy(self
->hostname
, hostname
.c_str
, hostname
.size
);
88 self
->hostname
[hostname
.size
]= 0;
91 static org::libmemcached::Instance
* _server_create(org::libmemcached::Instance
* self
, const memcached_st
*memc
)
95 self
= libmemcached_xmalloc(memc
, org::libmemcached::Instance
);
99 return NULL
; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
102 self
->options
.is_allocated
= true;
106 self
->options
.is_allocated
= false;
109 self
->options
.is_initialized
= true;
114 void org::libmemcached::Instance::events(short arg
)
116 if ((_events
| arg
) == _events
)
124 void org::libmemcached::Instance::revents(short arg
)
132 _events
&= short(~arg
);
135 org::libmemcached::Instance
* __instance_create_with(memcached_st
*memc
,
136 org::libmemcached::Instance
* self
,
137 const memcached_string_t
& hostname
,
138 const in_port_t port
,
140 const memcached_connection_t type
)
142 if (memcached_is_valid_servername(hostname
) == false)
144 memcached_set_error(*memc
, MEMCACHED_INVALID_ARGUMENTS
, MEMCACHED_AT
, memcached_literal_param("Invalid hostname provided"));
148 self
= _server_create(self
, memc
);
155 _server_init(self
, const_cast<memcached_st
*>(memc
), hostname
, port
, weight
, type
);
157 if (memc
and memcached_is_udp(memc
))
159 self
->write_buffer_offset
= UDP_DATAGRAM_HEADER_LENGTH
;
160 memcached_io_init_udp_header(self
, 0);
165 memcached_connect_try(self
);
171 void __instance_free(org::libmemcached::Instance
* self
)
173 memcached_quit_server(self
, false);
175 if (self
->address_info
)
177 freeaddrinfo(self
->address_info
);
178 self
->address_info
= NULL
;
179 self
->address_info_next
= NULL
;
181 assert(self
->address_info_next
== NULL
);
183 memcached_error_free(*self
);
185 if (memcached_is_allocated(self
))
187 libmemcached_free(self
->root
, self
);
191 self
->options
.is_initialized
= false;
195 void memcached_instance_free(org::libmemcached::Instance
* self
)
199 __instance_free(self
);
203 memcached_return_t
memcached_server_cursor(const memcached_st
* memc
,
204 const memcached_server_fn
*callback
,
206 uint32_t number_of_callbacks
)
208 memcached_return_t rc
;
209 if (memcached_failed(rc
= initialize_const_query(memc
)))
215 for (uint32_t x
= 0; x
< memcached_instance_list_count(memc
); x
++)
217 org::libmemcached::Instance
* instance
= memcached_instance_by_position(memc
, x
);
219 for (uint32_t y
= 0; y
< number_of_callbacks
; y
++)
221 memcached_return_t ret
= (*callback
[y
])(memc
, instance
, context
);
223 if (memcached_failed(ret
))
231 return errors
? MEMCACHED_SOME_ERRORS
: MEMCACHED_SUCCESS
;
234 memcached_return_t
memcached_server_execute(memcached_st
*memc
,
235 memcached_server_execute_fn callback
,
238 if (callback
== NULL
)
240 return MEMCACHED_INVALID_ARGUMENTS
;
243 bool some_errors
= false;;
244 for (uint32_t x
= 0; x
< memcached_instance_list_count(memc
); x
++)
246 org::libmemcached::Instance
* instance
= memcached_instance_fetch(memc
, x
);
248 memcached_return_t rc
= (*callback
)(memc
, instance
, context
);
249 if (rc
== MEMCACHED_INVALID_ARGUMENTS
)
253 else if (memcached_fatal(rc
))
260 return MEMCACHED_SUCCESS
;
263 memcached_server_instance_st
memcached_server_by_key(memcached_st
*memc
,
266 memcached_return_t
*error
)
268 memcached_return_t unused
;
275 memcached_return_t rc
;
276 if (memcached_failed(rc
= initialize_const_query(memc
)))
282 if (memcached_failed((memcached_key_test(*memc
, (const char **)&key
, &key_length
, 1))))
284 *error
= memcached_last_error(memc
);
288 uint32_t server_key
= memcached_generate_hash(memc
, key
, key_length
);
289 return memcached_instance_by_position(memc
, server_key
);
293 If we do not have a valid object to clone from, we toss an error.
295 static org::libmemcached::Instance
* memcached_instance_clone(org::libmemcached::Instance
* source
)
297 /* We just do a normal create if source is missing */
303 memcached_string_t hostname
= { memcached_string_make_from_cstr(source
->hostname
) };
304 return __instance_create_with(source
->root
,
307 source
->port(), source
->weight
,
311 void set_last_disconnected_host(org::libmemcached::Instance
* self
)
316 if (memcached_server_get_last_disconnect(self
->root
) and
317 memcached_server_get_last_disconnect(self
->root
)->version
== self
->version
)
323 memcached_st
*root
= (memcached_st
*)self
->root
;
325 memcached_instance_free((org::libmemcached::Instance
*)(root
->last_disconnected_server
));
327 // We set is_parsing so that no lookup happens
328 root
->state
.is_parsing
= true;
329 root
->last_disconnected_server
= memcached_instance_clone(self
);
330 root
->state
.is_parsing
= false;
332 ((org::libmemcached::Instance
*)memcached_server_get_last_disconnect(root
))->version
= self
->version
;
336 memcached_server_instance_st
memcached_server_get_last_disconnect(const memcached_st
*self
)
338 WATCHPOINT_ASSERT(self
);
344 return (memcached_server_instance_st
)self
->last_disconnected_server
;
347 void memcached_instance_next_retry(memcached_server_instance_st self
, const time_t absolute_time
)
349 WATCHPOINT_ASSERT(self
);
352 ((org::libmemcached::Instance
*)self
)->next_retry
= absolute_time
;