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
->cursor_active_
= 0;
49 self
->fd
= INVALID_SOCKET
;
50 self
->io_bytes_sent
= 0;
52 self
->server_failure_counter
= 0;
53 self
->server_failure_counter_query_id
= 0;
54 self
->weight
= weight
? weight
: 1; // 1 is the default weight value
55 self
->io_wait_count
.read
= 0;
56 self
->io_wait_count
.write
= 0;
57 self
->io_wait_count
.timeouts
= 0;
58 self
->io_wait_count
._bytes_read
= 0;
59 self
->major_version
= UINT8_MAX
;
60 self
->micro_version
= UINT8_MAX
;
61 self
->minor_version
= UINT8_MAX
;
63 self
->error_messages
= NULL
;
64 self
->read_ptr
= self
->read_buffer
;
65 self
->read_buffer_length
= 0;
66 self
->read_data_length
= 0;
67 self
->write_buffer_offset
= 0;
68 self
->address_info
= NULL
;
69 self
->address_info_next
= NULL
;
71 self
->state
= MEMCACHED_SERVER_STATE_NEW
;
77 self
->version
= ++root
->server_info
.version
;
81 self
->version
= UINT_MAX
;
83 self
->limit_maxbytes
= 0;
84 memcpy(self
->hostname
, hostname
.c_str
, hostname
.size
);
85 self
->hostname
[hostname
.size
]= 0;
88 static org::libmemcached::Instance
* _server_create(org::libmemcached::Instance
* self
, const memcached_st
*memc
)
92 self
= libmemcached_xmalloc(memc
, org::libmemcached::Instance
);
96 return NULL
; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
99 self
->options
.is_allocated
= true;
103 self
->options
.is_allocated
= false;
106 self
->options
.is_initialized
= true;
111 org::libmemcached::Instance
* __instance_create_with(memcached_st
*memc
,
112 org::libmemcached::Instance
* self
,
113 const memcached_string_t
& hostname
,
114 const in_port_t port
,
116 const memcached_connection_t type
)
118 if (memcached_is_valid_servername(hostname
) == false)
120 memcached_set_error(*memc
, MEMCACHED_INVALID_ARGUMENTS
, MEMCACHED_AT
, memcached_literal_param("Invalid hostname provided"));
124 self
= _server_create(self
, memc
);
131 _server_init(self
, const_cast<memcached_st
*>(memc
), hostname
, port
, weight
, type
);
133 if (memc
and memcached_is_udp(memc
))
135 self
->write_buffer_offset
= UDP_DATAGRAM_HEADER_LENGTH
;
136 memcached_io_init_udp_header(self
, 0);
141 memcached_connect_try(self
);
147 void __instance_free(org::libmemcached::Instance
* self
)
149 memcached_quit_server(self
, false);
151 if (self
->address_info
)
153 freeaddrinfo(self
->address_info
);
154 self
->address_info
= NULL
;
155 self
->address_info_next
= NULL
;
157 assert(self
->address_info_next
== NULL
);
159 memcached_error_free(*self
);
161 if (memcached_is_allocated(self
))
163 libmemcached_free(self
->root
, self
);
167 self
->options
.is_initialized
= false;
171 void memcached_instance_free(org::libmemcached::Instance
* self
)
178 __instance_free(self
);
182 If we do not have a valid object to clone from, we toss an error.
184 memcached_server_st
*memcached_instance_2_server(org::libmemcached::Instance
* source
)
186 /* We just do a normal create if source is missing */
192 memcached_string_t hostname
= { memcached_string_make_from_cstr(source
->hostname
) };
193 return __server_create_with(source
->root
, NULL
,
195 source
->port(), source
->weight
,
200 memcached_return_t
memcached_server_cursor(const memcached_st
*ptr
,
201 const memcached_server_fn
*callback
,
203 uint32_t number_of_callbacks
)
205 memcached_return_t rc
;
206 if (memcached_failed(rc
= initialize_const_query(ptr
)))
212 for (uint32_t x
= 0; x
< memcached_instance_list_count(ptr
); x
++)
214 org::libmemcached::Instance
* instance
= memcached_instance_by_position(ptr
, x
);
216 for (uint32_t y
= 0; y
< number_of_callbacks
; y
++)
218 memcached_return_t ret
= (*callback
[y
])(ptr
, instance
, context
);
220 if (memcached_failed(ret
))
228 return errors
? MEMCACHED_SOME_ERRORS
: MEMCACHED_SUCCESS
;
231 memcached_return_t
memcached_server_execute(memcached_st
*ptr
,
232 memcached_server_execute_fn callback
,
235 if (callback
== NULL
)
237 return MEMCACHED_INVALID_ARGUMENTS
;
240 bool some_errors
= false;;
241 for (uint32_t x
= 0; x
< memcached_instance_list_count(ptr
); x
++)
243 org::libmemcached::Instance
* instance
= memcached_instance_fetch(ptr
, x
);
245 memcached_return_t rc
= (*callback
)(ptr
, instance
, context
);
246 if (rc
== MEMCACHED_INVALID_ARGUMENTS
)
250 else if (memcached_fatal(rc
))
257 return MEMCACHED_SUCCESS
;
260 memcached_server_instance_st
memcached_server_by_key(memcached_st
*ptr
,
263 memcached_return_t
*error
)
265 memcached_return_t unused
;
272 memcached_return_t rc
;
273 if (memcached_failed(rc
= initialize_const_query(ptr
)))
279 if (memcached_failed((memcached_key_test(*ptr
, (const char **)&key
, &key_length
, 1))))
281 *error
= memcached_last_error(ptr
);
285 uint32_t server_key
= memcached_generate_hash(ptr
, key
, key_length
);
286 return memcached_instance_by_position(ptr
, server_key
);
290 If we do not have a valid object to clone from, we toss an error.
292 static org::libmemcached::Instance
* memcached_instance_clone(org::libmemcached::Instance
* source
)
294 /* We just do a normal create if source is missing */
300 memcached_string_t hostname
= { memcached_string_make_from_cstr(source
->hostname
) };
301 return __instance_create_with(source
->root
,
304 source
->port(), source
->weight
,
308 void set_last_disconnected_host(org::libmemcached::Instance
* self
)
313 if (memcached_server_get_last_disconnect(self
->root
) and
314 memcached_server_get_last_disconnect(self
->root
)->version
== self
->version
)
320 memcached_st
*root
= (memcached_st
*)self
->root
;
322 memcached_instance_free((org::libmemcached::Instance
*)(root
->last_disconnected_server
));
324 // We set is_parsing so that no lookup happens
325 root
->state
.is_parsing
= true;
326 root
->last_disconnected_server
= memcached_instance_clone(self
);
327 root
->state
.is_parsing
= false;
329 ((org::libmemcached::Instance
*)memcached_server_get_last_disconnect(root
))->version
= self
->version
;
333 memcached_server_instance_st
memcached_server_get_last_disconnect(const memcached_st
*self
)
335 WATCHPOINT_ASSERT(self
);
341 return (memcached_server_instance_st
)self
->last_disconnected_server
;
344 const char *memcached_instance_name(const memcached_server_instance_st self
)
346 WATCHPOINT_ASSERT(self
);
350 return self
->hostname
;
353 in_port_t
memcached_instance_port(const memcached_server_instance_st self
)
355 WATCHPOINT_ASSERT(self
);
364 void memcached_instance_next_retry(memcached_server_instance_st self
, const time_t absolute_time
)
366 WATCHPOINT_ASSERT(self
);
369 ((org::libmemcached::Instance
*)self
)->next_retry
= absolute_time
;
373 uint32_t memcached_instance_response_count(const org::libmemcached::Instance
* self
)
375 WATCHPOINT_ASSERT(self
);
381 return self
->cursor_active_
;