#include <sys/socket.h>
#include <netinet/tcp.h>
+static bool set_flag(uint64_t data)
+{
+ // Wordy :)
+ return data ? true : false;
+}
+
/*
This function is used to modify the behavior of running client.
*/
memcached_return_t memcached_behavior_set(memcached_st *ptr,
- memcached_behavior_t flag,
+ const memcached_behavior_t flag,
uint64_t data)
{
switch (flag)
break;
case MEMCACHED_BEHAVIOR_BINARY_PROTOCOL:
if (data)
- ptr->flags.verify_key= false;
-
- ptr->flags.binary_protocol= data ? true : false;
+ {
+ ptr->flags.verify_key= false;
+ }
+ ptr->flags.binary_protocol= set_flag(data);
break;
case MEMCACHED_BEHAVIOR_SUPPORT_CAS:
- ptr->flags.support_cas= data ? true: false;
+ ptr->flags.support_cas= set_flag(data);
break;
case MEMCACHED_BEHAVIOR_NO_BLOCK:
- ptr->flags.no_block= data ? true: false;
+ ptr->flags.no_block= set_flag(data);
memcached_quit(ptr);
break;
case MEMCACHED_BEHAVIOR_BUFFER_REQUESTS:
- ptr->flags.buffer_requests= data ? true : false;
+ ptr->flags.buffer_requests= set_flag(data);
memcached_quit(ptr);
break;
case MEMCACHED_BEHAVIOR_USE_UDP:
- if (ptr->number_of_hosts)
+ if (memcached_server_count(ptr))
+ {
return MEMCACHED_FAILURE;
- ptr->flags.use_udp= data ? true : false;
-
+ }
+ ptr->flags.use_udp= set_flag(data);
if (data)
- ptr->flags.no_reply= data ? true : false;
+ {
+ ptr->flags.no_reply= set_flag(data);
+ }
break;
-
case MEMCACHED_BEHAVIOR_TCP_NODELAY:
- ptr->flags.tcp_nodelay= data ? true : false;
+ ptr->flags.tcp_nodelay= set_flag(data);
memcached_quit(ptr);
break;
case MEMCACHED_BEHAVIOR_DISTRIBUTION:
- {
- ptr->distribution= (memcached_server_distribution_t)(data);
- if (ptr->distribution == MEMCACHED_DISTRIBUTION_RANDOM)
- {
- srandom((uint32_t) time(NULL));
- }
- run_distribution(ptr);
- break;
- }
+ return memcached_behavior_set_distribution(ptr, (memcached_server_distribution_t)data);
case MEMCACHED_BEHAVIOR_KETAMA:
{
if (data)
{
- ptr->hash= MEMCACHED_HASH_MD5;
- ptr->distribution= MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA;
+ (void)memcached_behavior_set_key_hash(ptr, MEMCACHED_HASH_MD5);
+ (void)memcached_behavior_set_distribution_hash(ptr, MEMCACHED_HASH_MD5);
+ (void)memcached_behavior_set_distribution(ptr, MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA);
}
else
{
- ptr->hash= 0;
- ptr->distribution= 0;
+ (void)memcached_behavior_set_key_hash(ptr, MEMCACHED_HASH_DEFAULT);
+ (void)memcached_behavior_set_distribution_hash(ptr, MEMCACHED_HASH_DEFAULT);
+ (void)memcached_behavior_set_distribution(ptr, MEMCACHED_DISTRIBUTION_MODULA);
}
- run_distribution(ptr);
+
break;
}
case MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED:
{
- ptr->hash= MEMCACHED_HASH_MD5;
- ptr->distribution= MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA;
- ptr->flags.ketama_weighted= data ? true : false;
- run_distribution(ptr);
- break;
+ (void)memcached_behavior_set_key_hash(ptr, MEMCACHED_HASH_MD5);
+ (void)memcached_behavior_set_distribution_hash(ptr, MEMCACHED_HASH_MD5);
+ ptr->flags.ketama_weighted= set_flag(data);
+ /**
+ @note We try to keep the same distribution going. This should be deprecated and rewritten.
+ */
+ return memcached_behavior_set_distribution(ptr, MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA);
}
- case MEMCACHED_BEHAVIOR_KETAMA_COMPAT_MODE:
- switch (data)
- {
- case MEMCACHED_KETAMA_COMPAT_LIBMEMCACHED:
- ptr->hash= MEMCACHED_HASH_MD5;
- ptr->distribution= MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA;
- break;
- case MEMCACHED_KETAMA_COMPAT_SPY:
- ptr->hash= MEMCACHED_HASH_MD5;
- ptr->distribution= MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA_SPY;
- break;
- default:
- return MEMCACHED_FAILURE;
- }
- run_distribution(ptr);
- break;
case MEMCACHED_BEHAVIOR_HASH:
-#ifndef HAVE_HSIEH_HASH
- if ((memcached_hash_t)(data) == MEMCACHED_HASH_HSIEH)
- return MEMCACHED_FAILURE;
-#endif
- ptr->hash= (memcached_hash_t)(data);
- break;
+ return memcached_behavior_set_key_hash(ptr, (memcached_hash_t)(data));
case MEMCACHED_BEHAVIOR_KETAMA_HASH:
- ptr->hash_continuum= (memcached_hash_t)(data);
- run_distribution(ptr);
- break;
+ return memcached_behavior_set_distribution_hash(ptr, (memcached_hash_t)(data));
case MEMCACHED_BEHAVIOR_CACHE_LOOKUPS:
- ptr->flags.use_cache_lookups= data ? true : false;
+ ptr->flags.use_cache_lookups= set_flag(data);
memcached_quit(ptr);
break;
case MEMCACHED_BEHAVIOR_VERIFY_KEY:
if (ptr->flags.binary_protocol)
- break;
- ptr->flags.verify_key= data ? true : false;
+ return MEMCACHED_FAILURE;
+ ptr->flags.verify_key= set_flag(data);
break;
case MEMCACHED_BEHAVIOR_SORT_HOSTS:
{
- ptr->flags.use_sort_hosts= data ? true : false;
+ ptr->flags.use_sort_hosts= set_flag(data);
run_distribution(ptr);
break;
case MEMCACHED_BEHAVIOR_USER_DATA:
return MEMCACHED_FAILURE;
case MEMCACHED_BEHAVIOR_HASH_WITH_PREFIX_KEY:
- ptr->flags.hash_with_prefix_key= data ? true : false;
+ ptr->flags.hash_with_prefix_key= set_flag(data);
break;
case MEMCACHED_BEHAVIOR_NOREPLY:
- ptr->flags.no_reply= data ? true : false;
+ ptr->flags.no_reply= set_flag(data);
break;
case MEMCACHED_BEHAVIOR_AUTO_EJECT_HOSTS:
- ptr->flags.auto_eject_hosts= data ? true : false;
+ ptr->flags.auto_eject_hosts= set_flag(data);
break;
case MEMCACHED_BEHAVIOR_RANDOMIZE_REPLICA_READ:
srandom((uint32_t) time(NULL));
- ptr->flags.randomize_replica_read= data ? true : false;
+ ptr->flags.randomize_replica_read= set_flag(data);
+ break;
+ case MEMCACHED_BEHAVIOR_CORK:
+ {
+ memcached_server_write_instance_st instance;
+ bool action= set_flag(data);
+
+ if (action == false)
+ {
+ ptr->flags.cork= set_flag(false);
+ return MEMCACHED_SUCCESS;
+ }
+
+ instance= memcached_server_instance_fetch(ptr, 0);
+ if (! instance)
+ return MEMCACHED_NO_SERVERS;
+
+
+ /* We just try the first host, and if it is down we return zero */
+ memcached_return_t rc;
+ rc= memcached_connect(instance);
+ if (rc != MEMCACHED_SUCCESS)
+ {
+ return rc;
+ }
+
+ /* Now we test! */
+ memcached_ternary_t enabled;
+ enabled= test_cork(instance, true);
+
+ switch (enabled)
+ {
+ case MEM_FALSE:
+ return ptr->cached_errno ? MEMCACHED_ERRNO : MEMCACHED_FAILURE ;
+ case MEM_TRUE:
+ {
+ enabled= test_cork(instance, false);
+
+ if (enabled == false) // Possible bug in OS?
+ {
+ memcached_quit_server(instance, false); // We should reset everything on this error.
+ return MEMCACHED_ERRNO; // Errno will be true because we will have already set it.
+ }
+ ptr->flags.cork= true;
+ ptr->flags.tcp_nodelay= true;
+ memcached_quit(ptr); // We go on and reset the connections.
+ }
+ break;
+ case MEM_NOT:
+ default:
+ return MEMCACHED_NOT_SUPPORTED;
+ }
+ }
break;
+ case MEMCACHED_BEHAVIOR_MAX:
default:
/* Shouldn't get here */
- WATCHPOINT_ASSERT(flag);
- break;
+ WATCHPOINT_ASSERT(0);
+ return MEMCACHED_FAILURE;
}
return MEMCACHED_SUCCESS;
}
+inline bool _is_auto_eject_host(const memcached_st *ptr)
+{
+ return ptr->flags.auto_eject_hosts;
+}
+
uint64_t memcached_behavior_get(memcached_st *ptr,
- memcached_behavior_t flag)
+ const memcached_behavior_t flag)
{
switch (flag)
{
return ptr->distribution;
case MEMCACHED_BEHAVIOR_KETAMA:
return (ptr->distribution == MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA) ? (uint64_t) 1 : 0;
- case MEMCACHED_BEHAVIOR_KETAMA_COMPAT_MODE:
- switch (ptr->distribution)
- {
- case MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA:
- return MEMCACHED_KETAMA_COMPAT_LIBMEMCACHED;
- case MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA_SPY:
- return MEMCACHED_KETAMA_COMPAT_SPY;
- case MEMCACHED_DISTRIBUTION_MODULA:
- case MEMCACHED_DISTRIBUTION_CONSISTENT:
- case MEMCACHED_DISTRIBUTION_RANDOM:
- default:
- return (uint64_t)-1;
- }
- /* NOTREACHED */
case MEMCACHED_BEHAVIOR_HASH:
- return ptr->hash;
+ return hashkit_get_function(&ptr->hashkit);
case MEMCACHED_BEHAVIOR_KETAMA_HASH:
- return ptr->hash_continuum;
+ return hashkit_get_function(&ptr->distribution_hashkit);
case MEMCACHED_BEHAVIOR_SERVER_FAILURE_LIMIT:
return ptr->server_failure_limit;
case MEMCACHED_BEHAVIOR_SORT_HOSTS:
return (uint64_t)ptr->rcv_timeout;
case MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE:
{
- int sock_size;
+ int sock_size= 0;
socklen_t sock_length= sizeof(int);
+ memcached_server_write_instance_st instance;
+
+ if (ptr->send_size != -1) // If value is -1 then we are using the default
+ return (uint64_t) ptr->send_size;
- /* REFACTOR */
- /* We just try the first host, and if it is down we return zero */
- if ((memcached_connect(&ptr->hosts[0])) != MEMCACHED_SUCCESS)
- return 0;
+ instance= memcached_server_instance_fetch(ptr, 0);
- if (getsockopt(ptr->hosts[0].fd, SOL_SOCKET,
- SO_SNDBUF, &sock_size, &sock_length))
- return 0; /* Zero means error */
+ if (instance) // If we have an instance we test, otherwise we just set and pray
+ {
+ /* REFACTOR */
+ /* We just try the first host, and if it is down we return zero */
+ if ((memcached_connect(instance)) != MEMCACHED_SUCCESS)
+ return 0;
+
+ if (getsockopt(instance->fd, SOL_SOCKET,
+ SO_SNDBUF, &sock_size, &sock_length))
+ return 0; /* Zero means error */
+ }
return (uint64_t) sock_size;
}
case MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE:
{
- int sock_size;
+ int sock_size= 0;
socklen_t sock_length= sizeof(int);
+ memcached_server_write_instance_st instance;
- /* REFACTOR */
- /* We just try the first host, and if it is down we return zero */
- if ((memcached_connect(&ptr->hosts[0])) != MEMCACHED_SUCCESS)
- return 0;
+ if (ptr->recv_size != -1) // If value is -1 then we are using the default
+ return (uint64_t) ptr->recv_size;
+
+ instance= memcached_server_instance_fetch(ptr, 0);
+
+ /**
+ @note REFACTOR
+ */
+ if (instance)
+ {
+ /* We just try the first host, and if it is down we return zero */
+ if ((memcached_connect(instance)) != MEMCACHED_SUCCESS)
+ return 0;
- if (getsockopt(ptr->hosts[0].fd, SOL_SOCKET,
- SO_RCVBUF, &sock_size, &sock_length))
- return 0; /* Zero means error */
+ if (getsockopt(instance->fd, SOL_SOCKET,
+ SO_RCVBUF, &sock_size, &sock_length))
+ return 0; /* Zero means error */
+
+ }
return (uint64_t) sock_size;
}
return ptr->flags.auto_eject_hosts;
case MEMCACHED_BEHAVIOR_RANDOMIZE_REPLICA_READ:
return ptr->flags.randomize_replica_read;
+ case MEMCACHED_BEHAVIOR_CORK:
+ return ptr->flags.cork;
+ case MEMCACHED_BEHAVIOR_MAX:
default:
- WATCHPOINT_ASSERT(flag);
- break;
+ WATCHPOINT_ASSERT(0); /* Programming mistake if it gets this far */
+ return 0;
}
- WATCHPOINT_ASSERT(0); /* Programming mistake if it gets this far */
- return 0;
+ /* NOTREACHED */
+}
+
+
+memcached_return_t memcached_behavior_set_distribution(memcached_st *ptr, memcached_server_distribution_t type)
+{
+ if (type < MEMCACHED_DISTRIBUTION_CONSISTENT_MAX)
+ {
+ ptr->distribution= type;
+ run_distribution(ptr);
+ }
+ else
+ {
+ return MEMCACHED_FAILURE;
+ }
+
+ return MEMCACHED_SUCCESS;
+}
+
+
+memcached_server_distribution_t memcached_behavior_get_distribution(memcached_st *ptr)
+{
+ return ptr->distribution;
+}
+
+memcached_return_t memcached_behavior_set_key_hash(memcached_st *ptr, memcached_hash_t type)
+{
+ hashkit_return_t rc;
+ rc= hashkit_set_function(&ptr->hashkit, (hashkit_hash_algorithm_t)type);
+
+ return rc == HASHKIT_SUCCESS ? MEMCACHED_SUCCESS : MEMCACHED_FAILURE;
+}
+
+memcached_hash_t memcached_behavior_get_key_hash(memcached_st *ptr)
+{
+ return (memcached_hash_t)hashkit_get_function(&ptr->hashkit);
+}
+
+memcached_return_t memcached_behavior_set_distribution_hash(memcached_st *ptr, memcached_hash_t type)
+{
+ hashkit_return_t rc;
+ rc= hashkit_set_function(&ptr->distribution_hashkit, (hashkit_hash_algorithm_t)type);
+
+ return rc == HASHKIT_SUCCESS ? MEMCACHED_SUCCESS : MEMCACHED_FAILURE;
+}
+
+memcached_hash_t memcached_behavior_get_distribution_hash(memcached_st *ptr)
+{
+ return (memcached_hash_t)hashkit_get_function(&ptr->distribution_hashkit);
}