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
->number_of_hosts
= 0;
48 self
->cursor_active_
= 0;
50 self
->fd
= INVALID_SOCKET
;
51 self
->io_bytes_sent
= 0;
53 self
->server_failure_counter
= 0;
54 self
->server_failure_counter_query_id
= 0;
55 self
->weight
= weight
? weight
: 1; // 1 is the default weight value
56 self
->io_wait_count
.read
= 0;
57 self
->io_wait_count
.write
= 0;
58 self
->io_wait_count
.timeouts
= 0;
59 self
->io_wait_count
._bytes_read
= 0;
60 self
->major_version
= UINT8_MAX
;
61 self
->micro_version
= UINT8_MAX
;
62 self
->minor_version
= UINT8_MAX
;
64 self
->error_messages
= NULL
;
65 self
->read_ptr
= self
->read_buffer
;
66 self
->read_buffer_length
= 0;
67 self
->read_data_length
= 0;
68 self
->write_buffer_offset
= 0;
69 self
->address_info
= NULL
;
70 self
->address_info_next
= NULL
;
72 self
->state
= MEMCACHED_SERVER_STATE_NEW
;
78 self
->version
= ++root
->server_info
.version
;
82 self
->version
= UINT_MAX
;
84 self
->limit_maxbytes
= 0;
85 memcpy(self
->hostname
, hostname
.c_str
, hostname
.size
);
86 self
->hostname
[hostname
.size
]= 0;
89 static org::libmemcached::Instance
* _server_create(org::libmemcached::Instance
* self
, const memcached_st
*memc
)
93 self
= libmemcached_xmalloc(memc
, org::libmemcached::Instance
);
97 return NULL
; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
100 self
->options
.is_allocated
= true;
104 self
->options
.is_allocated
= false;
107 self
->options
.is_initialized
= true;
112 org::libmemcached::Instance
* __instance_create_with(memcached_st
*memc
,
113 org::libmemcached::Instance
* self
,
114 const memcached_string_t
& hostname
,
115 const in_port_t port
,
117 const memcached_connection_t type
)
119 if (memcached_is_valid_servername(hostname
) == false)
121 memcached_set_error(*memc
, MEMCACHED_INVALID_ARGUMENTS
, MEMCACHED_AT
, memcached_literal_param("Invalid hostname provided"));
125 self
= _server_create(self
, memc
);
132 _server_init(self
, const_cast<memcached_st
*>(memc
), hostname
, port
, weight
, type
);
134 if (memc
and memcached_is_udp(memc
))
136 self
->write_buffer_offset
= UDP_DATAGRAM_HEADER_LENGTH
;
137 memcached_io_init_udp_header(self
, 0);
142 memcached_connect_try(self
);
148 void __instance_free(org::libmemcached::Instance
* self
)
150 memcached_quit_server(self
, false);
152 if (self
->address_info
)
154 freeaddrinfo(self
->address_info
);
155 self
->address_info
= NULL
;
156 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
)
311 if (self
->root
== NULL
)
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
));
326 root
->last_disconnected_server
= memcached_instance_clone(self
);
327 ((org::libmemcached::Instance
*)memcached_server_get_last_disconnect(root
))->version
= self
->version
;
330 memcached_server_instance_st
memcached_server_get_last_disconnect(const memcached_st
*self
)
332 WATCHPOINT_ASSERT(self
);
338 return (memcached_server_instance_st
)self
->last_disconnected_server
;
341 uint32_t memcached_instance_set_count(org::libmemcached::Instance
* servers
, uint32_t count
)
343 WATCHPOINT_ASSERT(servers
);
349 return servers
->number_of_hosts
= count
;
352 const char *memcached_instance_name(const memcached_server_instance_st self
)
354 WATCHPOINT_ASSERT(self
);
358 return self
->hostname
;
361 in_port_t
memcached_instance_port(const memcached_server_instance_st self
)
363 WATCHPOINT_ASSERT(self
);
372 void memcached_instance_next_retry(memcached_server_instance_st self
, const time_t absolute_time
)
374 WATCHPOINT_ASSERT(self
);
377 ((org::libmemcached::Instance
*)self
)->next_retry
= absolute_time
;
381 uint32_t memcached_instance_response_count(const org::libmemcached::Instance
* self
)
383 WATCHPOINT_ASSERT(self
);
389 return self
->cursor_active_
;