--- /dev/null
+/* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
+ *
+ * Libmemcached library
+ *
+ * Copyright (C) 2011 Data Differential, http://datadifferential.com/
+ * Copyright (C) 2006-2009 Brian Aker All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are
+ * met:
+ *
+ * * Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ *
+ * * Redistributions in binary form must reproduce the above
+ * copyright notice, this list of conditions and the following disclaimer
+ * in the documentation and/or other materials provided with the
+ * distribution.
+ *
+ * * The names of its contributors may not be used to endorse or
+ * promote products derived from this software without specific prior
+ * written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+ * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+ * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+ * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
+ * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+ * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+ * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+ * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+ * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+ * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *
+ */
+
+#include <libmemcached/common.h>
+
+#include <libmemcached/options.hpp>
+#include <libmemcached/virtual_bucket.h>
+
+static inline bool _memcached_init(Memcached *self)
+{
+ self->state.is_purging= false;
+ self->state.is_processing_input= false;
+ self->state.is_time_for_rebuild= false;
+ self->state.is_parsing= false;
+
+ self->flags.auto_eject_hosts= false;
+ self->flags.binary_protocol= false;
+ self->flags.buffer_requests= false;
+ self->flags.hash_with_namespace= false;
+ self->flags.no_block= false;
+ self->flags.reply= true;
+ self->flags.randomize_replica_read= false;
+ self->flags.support_cas= false;
+ self->flags.tcp_nodelay= false;
+ self->flags.use_sort_hosts= false;
+ self->flags.use_udp= false;
+ self->flags.verify_key= false;
+ self->flags.tcp_keepalive= false;
+ self->flags.is_aes= false;
+ self->flags.is_fetching_version= false;
+
+ self->virtual_bucket= NULL;
+
+ self->distribution= MEMCACHED_DISTRIBUTION_MODULA;
+
+ if (hashkit_create(&self->hashkit) == NULL)
+ {
+ return false;
+ }
+
+ self->server_info.version= 0;
+
+ self->ketama.continuum= NULL;
+ self->ketama.continuum_count= 0;
+ self->ketama.continuum_points_counter= 0;
+ self->ketama.next_distribution_rebuild= 0;
+ self->ketama.weighted_= false;
+
+ self->number_of_hosts= 0;
+ self->servers= NULL;
+ self->last_disconnected_server= NULL;
+
+ self->snd_timeout= 0;
+ self->rcv_timeout= 0;
+ self->server_failure_limit= MEMCACHED_SERVER_FAILURE_LIMIT;
+ self->server_timeout_limit= MEMCACHED_SERVER_TIMEOUT_LIMIT;
+ self->query_id= 1; // 0 is considered invalid
+
+ /* TODO, Document why we picked these defaults */
+ self->io_msg_watermark= 500;
+ self->io_bytes_watermark= 65 * 1024;
+
+ self->tcp_keepidle= 0;
+
+ self->io_key_prefetch= 0;
+ self->poll_timeout= MEMCACHED_DEFAULT_TIMEOUT;
+ self->connect_timeout= MEMCACHED_DEFAULT_CONNECT_TIMEOUT;
+ self->retry_timeout= MEMCACHED_SERVER_FAILURE_RETRY_TIMEOUT;
+ self->dead_timeout= MEMCACHED_SERVER_FAILURE_DEAD_TIMEOUT;
+
+ self->send_size= -1;
+ self->recv_size= -1;
+
+ self->user_data= NULL;
+ self->number_of_replicas= 0;
+
+ self->allocators= memcached_allocators_return_default();
+
+ self->on_clone= NULL;
+ self->on_cleanup= NULL;
+ self->get_key_failure= NULL;
+ self->delete_trigger= NULL;
+ self->callbacks= NULL;
+ self->sasl.callbacks= NULL;
+ self->sasl.is_allocated= false;
+
+ self->error_messages= NULL;
+ self->_namespace= NULL;
+ self->configure.initial_pool_size= 1;
+ self->configure.max_pool_size= 1;
+ self->configure.version= -1;
+ self->configure.filename= NULL;
+
+ return true;
+}
+
+static void __memcached_free(Memcached *ptr, bool release_st)
+{
+ /* If we have anything open, lets close it now */
+ send_quit(ptr);
+ memcached_instance_list_free(memcached_instance_list(ptr), memcached_instance_list_count(ptr));
+ memcached_result_free(&ptr->result);
+
+ memcached_virtual_bucket_free(ptr);
+
+ memcached_instance_free((memcached_instance_st*)ptr->last_disconnected_server);
+
+ if (ptr->on_cleanup)
+ {
+ ptr->on_cleanup(ptr);
+ }
+
+ libmemcached_free(ptr, ptr->ketama.continuum);
+ ptr->ketama.continuum= NULL;
+
+ memcached_array_free(ptr->_namespace);
+ ptr->_namespace= NULL;
+
+ memcached_error_free(*ptr);
+
+ if (LIBMEMCACHED_WITH_SASL_SUPPORT and ptr->sasl.callbacks)
+ {
+ memcached_destroy_sasl_auth_data(ptr);
+ }
+
+ if (release_st)
+ {
+ memcached_array_free(ptr->configure.filename);
+ ptr->configure.filename= NULL;
+ }
+
+ hashkit_free(&ptr->hashkit);
+
+ if (memcached_is_allocated(ptr) and release_st)
+ {
+ libmemcached_free(ptr, ptr);
+ }
+}
+
+memcached_st *memcached_create(memcached_st *shell)
+{
+ if (shell)
+ {
+ shell->options.is_allocated= false;
+ }
+ else
+ {
+ shell= (memcached_st *)libmemcached_xmalloc(NULL, memcached_st);
+
+ if (shell == NULL)
+ {
+ return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
+ }
+
+ shell->options.is_allocated= true;
+ }
+
+ if (_memcached_init(shell) == false)
+ {
+ memcached_free(shell);
+ return NULL;
+ }
+
+ Memcached* memc= memcached2Memcached(shell);
+ if (memcached_result_create(shell, &memc->result) == NULL)
+ {
+ memcached_free(shell);
+ return NULL;
+ }
+
+ WATCHPOINT_ASSERT_INITIALIZED(&memc->result);
+
+ return shell;
+}
+
+memcached_st *memcached(const char *string, size_t length)
+{
+ if (length == 0 and string)
+ {
+ return NULL;
+ }
+
+ if (length and string == NULL)
+ {
+ return NULL;
+ }
+
+ if (length == 0)
+ {
+ if (bool(getenv("LIBMEMCACHED")))
+ {
+ string= getenv("LIBMEMCACHED");
+ length= string ? strlen(string) : 0;
+ }
+ }
+
+ memcached_st *memc= memcached_create(NULL);
+ if (memc == NULL)
+ {
+ return NULL;
+ }
+
+ if (length == 0 or string == NULL)
+ {
+ return memc;
+ }
+
+ memcached_return_t rc= memcached_parse_configuration(memc, string, length);
+ if (memcached_success(rc) and memcached_parse_filename(memc))
+ {
+ rc= memcached_parse_configure_file(*memc, memcached_parse_filename(memc), memcached_parse_filename_length(memc));
+ }
+
+ if (memcached_failed(rc))
+ {
+ memcached_free(memc);
+ return NULL;
+ }
+
+ return memc;
+}
+
+memcached_return_t memcached_reset(memcached_st *shell)
+{
+ Memcached* ptr= memcached2Memcached(shell);
+ WATCHPOINT_ASSERT(ptr);
+ if (ptr == NULL)
+ {
+ return MEMCACHED_INVALID_ARGUMENTS;
+ }
+
+ bool stored_is_allocated= memcached_is_allocated(ptr);
+ uint64_t query_id= ptr->query_id;
+ __memcached_free(ptr, false);
+ memcached_create(ptr);
+ memcached_set_allocated(ptr, stored_is_allocated);
+ ptr->query_id= query_id;
+
+ if (ptr->configure.filename)
+ {
+ return memcached_parse_configure_file(*ptr, memcached_param_array(ptr->configure.filename));
+ }
+
+ return MEMCACHED_SUCCESS;
+}
+
+void memcached_servers_reset(memcached_st *shell)
+{
+ Memcached* self= memcached2Memcached(shell);
+ if (self)
+ {
+ libmemcached_free(self, self->ketama.continuum);
+ self->ketama.continuum= NULL;
+ self->ketama.continuum_count= 0;
+ self->ketama.continuum_points_counter= 0;
+
+ memcached_instance_list_free(memcached_instance_list(self), self->number_of_hosts);
+ memcached_instance_set(self, NULL, 0);
+
+ memcached_reset_last_disconnected_server(self);
+ }
+}
+
+void memcached_reset_last_disconnected_server(memcached_st *shell)
+{
+ Memcached* self= memcached2Memcached(shell);
+ if (self)
+ {
+ memcached_instance_free((memcached_instance_st*)self->last_disconnected_server);
+ self->last_disconnected_server= NULL;
+ }
+}
+
+void memcached_free(memcached_st *ptr)
+{
+ if (ptr)
+ {
+ __memcached_free(ptr, true);
+ }
+}
+
+/*
+ clone is the destination, while source is the structure to clone.
+ If source is NULL the call is the same as if a memcached_create() was
+ called.
+*/
+memcached_st *memcached_clone(memcached_st *clone, const memcached_st *source)
+{
+ if (source == NULL)
+ {
+ return memcached_create(clone);
+ }
+
+ if (clone and memcached_is_allocated(clone))
+ {
+ return NULL;
+ }
+
+ memcached_st *new_clone= memcached_create(clone);
+
+ if (new_clone == NULL)
+ {
+ return NULL;
+ }
+
+ new_clone->flags= source->flags;
+ new_clone->send_size= source->send_size;
+ new_clone->recv_size= source->recv_size;
+ new_clone->poll_timeout= source->poll_timeout;
+ new_clone->connect_timeout= source->connect_timeout;
+ new_clone->retry_timeout= source->retry_timeout;
+ new_clone->dead_timeout= source->dead_timeout;
+ new_clone->distribution= source->distribution;
+
+ if (hashkit_clone(&new_clone->hashkit, &source->hashkit) == NULL)
+ {
+ memcached_free(new_clone);
+ return NULL;
+ }
+
+ new_clone->user_data= source->user_data;
+
+ new_clone->snd_timeout= source->snd_timeout;
+ new_clone->rcv_timeout= source->rcv_timeout;
+
+ new_clone->on_clone= source->on_clone;
+ new_clone->on_cleanup= source->on_cleanup;
+
+ new_clone->allocators= source->allocators;
+
+ new_clone->get_key_failure= source->get_key_failure;
+ new_clone->delete_trigger= source->delete_trigger;
+ new_clone->server_failure_limit= source->server_failure_limit;
+ new_clone->server_timeout_limit= source->server_timeout_limit;
+ new_clone->io_msg_watermark= source->io_msg_watermark;
+ new_clone->io_bytes_watermark= source->io_bytes_watermark;
+ new_clone->io_key_prefetch= source->io_key_prefetch;
+ new_clone->number_of_replicas= source->number_of_replicas;
+ new_clone->tcp_keepidle= source->tcp_keepidle;
+
+ if (memcached_server_count(source))
+ {
+ if (memcached_failed(memcached_push(new_clone, source)))
+ {
+ return NULL;
+ }
+ }
+
+
+ new_clone->_namespace= memcached_array_clone(new_clone, source->_namespace);
+ new_clone->configure.filename= memcached_array_clone(new_clone, source->_namespace);
+ new_clone->configure.version= source->configure.version;
+
+ if (LIBMEMCACHED_WITH_SASL_SUPPORT and source->sasl.callbacks)
+ {
+ if (memcached_failed(memcached_clone_sasl(new_clone, source)))
+ {
+ memcached_free(new_clone);
+ return NULL;
+ }
+ }
+
+ if (memcached_failed(run_distribution(new_clone)))
+ {
+ memcached_free(new_clone);
+
+ return NULL;
+ }
+
+ if (source->on_clone)
+ {
+ source->on_clone(new_clone, source);
+ }
+
+ return new_clone;
+}
+
+void *memcached_get_user_data(const memcached_st *shell)
+{
+ const Memcached* memc= memcached2Memcached(shell);
+ if (memc)
+ {
+ return memc->user_data;
+ }
+
+ return NULL;
+}
+
+void *memcached_set_user_data(memcached_st *shell, void *data)
+{
+ Memcached* memc= memcached2Memcached(shell);
+ if (memc)
+ {
+ void *ret= memc->user_data;
+ memc->user_data= data;
+
+ return ret;
+ }
+
+ return NULL;
+}
+
+memcached_return_t memcached_push(memcached_st *destination, const memcached_st *source)
+{
+ return memcached_instance_push(destination, (memcached_instance_st*)source->servers, source->number_of_hosts);
+}
+
+memcached_instance_st* memcached_instance_fetch(Memcached *ptr, uint32_t server_key)
+{
+ if (ptr == NULL)
+ {
+ return NULL;
+ }
+
+ return &ptr->servers[server_key];
+}
+
+const memcached_instance_st * memcached_server_instance_by_position(const memcached_st *shell, uint32_t server_key)
+{
+ const Memcached* memc= memcached2Memcached(shell);
+ if (memc)
+ {
+ return &memc->servers[server_key];
+ }
+
+ return NULL;
+}
+
+memcached_instance_st* memcached_instance_by_position(const memcached_st *shell, uint32_t server_key)
+{
+ const Memcached* memc= memcached2Memcached(shell);
+ if (memc)
+ {
+ return &memc->servers[server_key];
+ }
+
+ return NULL;
+}
+
+uint64_t memcached_query_id(const memcached_st *shell)
+{
+ const Memcached* memc= memcached2Memcached(shell);
+ if (memc)
+ {
+ return memc->query_id;
+ }
+
+ return 0;
+}
+
+memcached_instance_st* memcached_instance_list(const memcached_st *shell)
+{
+ const Memcached* memc= memcached2Memcached(shell);
+ if (memc)
+ {
+ return (memcached_instance_st*)memc->servers;
+ }
+
+ return NULL;
+}
+