*.lo
+*.pop
*/*.l[oa]
*/*/*.l[oa]
*/*/.deps
-0.37
+0.37 Mon Jan 11 16:29:57 PST 2010
* Fixed build for libhashkit.
* Fixed install path regression.
* Modified RPM to strict check install.
* Added documentation for memcached_server_cursor();
-
* Added memcached_servers_reset().
-
* Modified memcached_st to remove dead cursor_server member.
0.36 Wed Jan 6 18:23:50 PST 2010
PANDORA_CANONICAL_TARGET
+#shared library versioning
+MEMCACHED_LIBRARY_VERSION=4:0:0
+# | | |
+# +------+ | +---+
+# | | |
+# current:revision:age
+# | | |
+# | | +- increment if interfaces have been added
+# | | set to zero if interfaces have been removed or changed
+# | +- increment if source code has changed
+# | set to zero if current is incremented
+# +- increment if interfaces have been added, removed or changed
+AC_SUBST(MEMCACHED_LIBRARY_VERSION)
+
+
HASHKIT_LIBRARY_VERSION=0:0:0
AC_SUBST(HASHKIT_LIBRARY_VERSION)
size_t send_length;
memcached_return_t rc;
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
- unsigned int server_key;
+ uint32_t server_key;
+ memcached_server_instance_st *instance;
bool no_reply= ptr->flags.no_reply;
- unlikely (ptr->hosts == NULL || memcached_server_count(ptr) == 0)
+ unlikely (memcached_server_count(ptr) == 0)
return MEMCACHED_NO_SERVERS;
if (ptr->flags.verify_key && (memcached_key_test((const char **)&key, &key_length, 1) == MEMCACHED_BAD_KEY_PROVIDED))
return MEMCACHED_BAD_KEY_PROVIDED;
server_key= memcached_generate_hash(ptr, master_key, master_key_length);
+ instance= memcached_server_instance_fetch(ptr, server_key);
send_length= (size_t)snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
"%s %s%.*s %" PRIu64 "%s\r\n", verb,
unlikely (send_length >= MEMCACHED_DEFAULT_COMMAND_SIZE)
return MEMCACHED_WRITE_FAILURE;
- rc= memcached_do(&ptr->hosts[server_key], buffer, send_length, 1);
+ rc= memcached_do(instance, buffer, send_length, 1);
if (no_reply || rc != MEMCACHED_SUCCESS)
return rc;
- rc= memcached_response(&ptr->hosts[server_key], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
+ rc= memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
/*
So why recheck responce? Because the protocol is brain dead :)
uint32_t expiration,
uint64_t *value)
{
- unsigned int server_key;
+ uint32_t server_key;
+ memcached_server_instance_st *instance;
bool no_reply= ptr->flags.no_reply;
- unlikely (ptr->hosts == NULL || memcached_server_count(ptr) == 0)
+ unlikely (memcached_server_count(ptr) == 0)
return MEMCACHED_NO_SERVERS;
server_key= memcached_generate_hash(ptr, master_key, master_key_length);
+ instance= memcached_server_instance_fetch(ptr, server_key);
if (no_reply)
{
request.message.body.initial= htonll(initial);
request.message.body.expiration= htonl((uint32_t) expiration);
- if ((memcached_do(&ptr->hosts[server_key], request.bytes,
+ if ((memcached_do(instance, request.bytes,
sizeof(request.bytes), 0)!=MEMCACHED_SUCCESS) ||
- (memcached_io_write(&ptr->hosts[server_key], key, key_length, 1) == -1))
+ (memcached_io_write(instance, key, key_length, 1) == -1))
{
- memcached_io_reset(&ptr->hosts[server_key]);
+ memcached_io_reset(instance);
return MEMCACHED_WRITE_FAILURE;
}
if (no_reply)
return MEMCACHED_SUCCESS;
- return memcached_response(&ptr->hosts[server_key], (char*)value, sizeof(*value), NULL);
+ return memcached_response(instance, (char*)value, sizeof(*value), NULL);
}
memcached_return_t memcached_increment(memcached_st *ptr,
{
int sock_size;
socklen_t sock_length= sizeof(int);
+ memcached_server_instance_st *instance;
+
+ instance= memcached_server_instance_fetch(ptr, 0);
/* REFACTOR */
/* We just try the first host, and if it is down we return zero */
- if ((memcached_connect(&ptr->hosts[0])) != MEMCACHED_SUCCESS)
+ if ((memcached_connect(instance)) != MEMCACHED_SUCCESS)
return 0;
- if (getsockopt(ptr->hosts[0].fd, SOL_SOCKET,
+ if (getsockopt(instance->fd, SOL_SOCKET,
SO_SNDBUF, &sock_size, &sock_length))
return 0; /* Zero means error */
{
int sock_size;
socklen_t sock_length= sizeof(int);
+ memcached_server_instance_st *instance;
+
+ instance= memcached_server_instance_fetch(ptr, 0);
/**
@note REFACTOR
*/
/* We just try the first host, and if it is down we return zero */
- if ((memcached_connect(&ptr->hosts[0])) != MEMCACHED_SUCCESS)
+ if ((memcached_connect(instance)) != MEMCACHED_SUCCESS)
return 0;
- if (getsockopt(ptr->hosts[0].fd, SOL_SOCKET,
+ if (getsockopt(instance->fd, SOL_SOCKET,
SO_RCVBUF, &sock_size, &sock_length))
return 0; /* Zero means error */
#include "libmemcached/memcached.h"
#include "libmemcached/watchpoint.h"
+typedef struct memcached_server_st memcached_server_instance_st;
+
/* These are private not to be installed headers */
#include "libmemcached/io.h"
#include "libmemcached/internal.h"
#include "libmemcached/libmemcached_probes.h"
#include "libmemcached/memcached/protocol_binary.h"
#include "libmemcached/byteorder.h"
+#include "libmemcached/response.h"
/* string value */
struct memcached_continuum_item_st
uint32_t jenkins_hash(const void *key, size_t length, uint32_t initval);
LIBMEMCACHED_LOCAL
-memcached_return_t memcached_connect(memcached_server_st *ptr);
-LIBMEMCACHED_LOCAL
-memcached_return_t memcached_response(memcached_server_st *ptr,
- char *buffer, size_t buffer_length,
- memcached_result_st *result);
+memcached_return_t memcached_connect(memcached_server_instance_st *ptr);
LIBMEMCACHED_LOCAL
-void memcached_quit_server(memcached_server_st *ptr, uint8_t io_death);
+void memcached_quit_server(memcached_server_instance_st *ptr, uint8_t io_death);
#define memcached_server_response_increment(A) (A)->cursor_active++
#define memcached_server_response_decrement(A) (A)->cursor_active--
#define memcached_server_response_reset(A) (A)->cursor_active=0
LIBMEMCACHED_LOCAL
-memcached_return_t memcached_do(memcached_server_st *ptr, const void *commmand,
+memcached_return_t memcached_do(memcached_server_instance_st *ptr, const void *commmand,
size_t command_length, uint8_t with_flush);
LIBMEMCACHED_LOCAL
-memcached_return_t value_fetch(memcached_server_st *ptr,
+memcached_return_t value_fetch(memcached_server_instance_st *ptr,
char *buffer,
memcached_result_st *result);
LIBMEMCACHED_LOCAL
-void server_list_free(memcached_st *ptr, memcached_server_st *servers);
+void server_list_free(memcached_st *ptr, memcached_server_instance_st *servers);
LIBMEMCACHED_LOCAL
memcached_return_t memcached_key_test(const char * const *keys,
uint32_t generate_hash(memcached_st *ptr, const char *key, size_t key_length);
LIBMEMCACHED_LOCAL
-memcached_return_t memcached_purge(memcached_server_st *ptr);
+memcached_return_t memcached_purge(memcached_server_instance_st *ptr);
static inline memcached_return_t memcached_validate_key_length(size_t key_length, bool binary)
{
}
static inline memcached_return_t binary_delete(memcached_st *ptr,
- unsigned int server_key,
+ uint32_t server_key,
const char *key,
size_t key_length,
uint8_t flush);
size_t send_length;
memcached_return_t rc;
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
- unsigned int server_key;
+ uint32_t server_key;
+ memcached_server_instance_st *instance;
LIBMEMCACHED_MEMCACHED_DELETE_START();
unlikely (rc != MEMCACHED_SUCCESS)
return rc;
- unlikely (ptr->hosts == NULL || memcached_server_count(ptr) == 0)
+ unlikely (memcached_server_count(ptr) == 0)
return MEMCACHED_NO_SERVERS;
server_key= memcached_generate_hash(ptr, master_key, master_key_length);
+ instance= memcached_server_instance_fetch(ptr, server_key);
+
to_write= (uint8_t)((ptr->flags.buffer_requests) ? 0 : 1);
+
bool no_reply= (ptr->flags.no_reply);
if (ptr->flags.binary_protocol)
{
likely (!expiration)
+ {
rc= binary_delete(ptr, server_key, key, key_length, to_write);
+ }
else
+ {
rc= MEMCACHED_INVALID_ARGUMENTS;
+ }
}
else
{
unlikely (expiration)
{
- if ((ptr->hosts[server_key].major_version == 1 &&
- ptr->hosts[server_key].minor_version > 2) ||
- ptr->hosts[server_key].major_version > 1)
+ if ((instance->major_version == 1 &&
+ instance->minor_version > 2) ||
+ instance->major_version > 1)
{
rc= MEMCACHED_INVALID_ARGUMENTS;
goto error;
{
/* ensure that we are connected, otherwise we might bump the
* command counter before connection */
- if ((rc= memcached_connect(&ptr->hosts[server_key])) != MEMCACHED_SUCCESS)
+ if ((rc= memcached_connect(instance)) != MEMCACHED_SUCCESS)
{
WATCHPOINT_ERROR(rc);
return rc;
}
- if (ptr->hosts[server_key].minor_version == 0)
+ if (instance->minor_version == 0)
{
if (no_reply || !to_write)
{
*/
to_write= 1;
if (no_reply)
- memcached_server_response_increment(&ptr->hosts[server_key]);
+ memcached_server_response_increment(instance);
no_reply= false;
}
}
{
if (send_length > MAX_UDP_DATAGRAM_LENGTH - UDP_DATAGRAM_HEADER_LENGTH)
return MEMCACHED_WRITE_FAILURE;
- if (send_length + ptr->hosts[server_key].write_buffer_offset > MAX_UDP_DATAGRAM_LENGTH)
- memcached_io_write(&ptr->hosts[server_key], NULL, 0, 1);
+ if (send_length + instance->write_buffer_offset > MAX_UDP_DATAGRAM_LENGTH)
+ memcached_io_write(instance, NULL, 0, 1);
}
- rc= memcached_do(&ptr->hosts[server_key], buffer, send_length, to_write);
+ rc= memcached_do(instance, buffer, send_length, to_write);
}
if (rc != MEMCACHED_SUCCESS)
rc= MEMCACHED_BUFFERED;
else if (!no_reply)
{
- rc= memcached_response(&ptr->hosts[server_key], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
+ rc= memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
if (rc == MEMCACHED_DELETED)
rc= MEMCACHED_SUCCESS;
}
}
static inline memcached_return_t binary_delete(memcached_st *ptr,
- unsigned int server_key,
+ uint32_t server_key,
const char *key,
size_t key_length,
uint8_t flush)
{
+ memcached_server_instance_st *instance;
protocol_binary_request_delete request= {.bytes= {0}};
+ instance= memcached_server_instance_fetch(ptr, server_key);
+
request.message.header.request.magic= PROTOCOL_BINARY_REQ;
if (ptr->flags.no_reply)
request.message.header.request.opcode= PROTOCOL_BINARY_CMD_DELETEQ;
size_t cmd_size= sizeof(request.bytes) + key_length;
if (cmd_size > MAX_UDP_DATAGRAM_LENGTH - UDP_DATAGRAM_HEADER_LENGTH)
return MEMCACHED_WRITE_FAILURE;
- if (cmd_size + ptr->hosts[server_key].write_buffer_offset > MAX_UDP_DATAGRAM_LENGTH)
- memcached_io_write(&ptr->hosts[server_key], NULL, 0, 1);
+ if (cmd_size + instance->write_buffer_offset > MAX_UDP_DATAGRAM_LENGTH)
+ memcached_io_write(instance, NULL, 0, 1);
}
memcached_return_t rc= MEMCACHED_SUCCESS;
- if ((memcached_do(&ptr->hosts[server_key], request.bytes,
+ if ((memcached_do(instance, request.bytes,
sizeof(request.bytes), 0) != MEMCACHED_SUCCESS) ||
- (memcached_io_write(&ptr->hosts[server_key], key,
+ (memcached_io_write(instance, key,
key_length, (char) flush) == -1))
{
- memcached_io_reset(&ptr->hosts[server_key]);
+ memcached_io_reset(instance);
rc= MEMCACHED_WRITE_FAILURE;
}
for (uint32_t x= 0; x < ptr->number_of_replicas; ++x)
{
+ memcached_server_instance_st *replica;
+
++server_key;
if (server_key == memcached_server_count(ptr))
server_key= 0;
- memcached_server_st* server= &ptr->hosts[server_key];
- if ((memcached_do(server, (const char*)request.bytes,
+ replica= memcached_server_instance_fetch(ptr, server_key);
+
+ if ((memcached_do(replica, (const char*)request.bytes,
sizeof(request.bytes), 0) != MEMCACHED_SUCCESS) ||
- (memcached_io_write(server, key, key_length, (char) flush) == -1))
- memcached_io_reset(server);
+ (memcached_io_write(replica, key, key_length, (char) flush) == -1))
+ {
+ memcached_io_reset(replica);
+ }
else
- memcached_server_response_decrement(server);
+ {
+ memcached_server_response_decrement(replica);
+ }
}
}
for (server_key= 0; server_key < memcached_server_count(ptr); server_key++)
{
+ memcached_server_instance_st *instance;
+ instance= memcached_server_instance_fetch(ptr, server_key);
+
/* 256 I BELIEVE is the upper limit of slabs */
for (x= 0; x < 256; x++)
{
send_length= (size_t) snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
"stats cachedump %u 0 0\r\n", x);
- rc= memcached_do(&ptr->hosts[server_key], buffer, send_length, 1);
+ rc= memcached_do(instance, buffer, send_length, 1);
unlikely (rc != MEMCACHED_SUCCESS)
goto error;
while (1)
{
uint32_t callback_counter;
- rc= memcached_response(&ptr->hosts[server_key], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
+ rc= memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
if (rc == MEMCACHED_ITEM)
{
for (x= 0; x < memcached_server_count(ptr); x++)
{
bool no_reply= ptr->flags.no_reply;
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
if (expiration)
send_length= (size_t) snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
send_length= (size_t) snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
"flush_all%s\r\n", no_reply ? " noreply" : "");
- rc= memcached_do(&ptr->hosts[x], buffer, send_length, 1);
+ rc= memcached_do(instance, buffer, send_length, 1);
if (rc == MEMCACHED_SUCCESS && !no_reply)
- (void)memcached_response(&ptr->hosts[x], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
+ (void)memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
}
return MEMCACHED_SUCCESS;
static memcached_return_t memcached_flush_binary(memcached_st *ptr,
time_t expiration)
{
- unsigned int x;
+ uint32_t x;
protocol_binary_request_flush request= {.bytes= {0}};
unlikely (memcached_server_count(ptr) == 0)
for (x= 0; x < memcached_server_count(ptr); x++)
{
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
+
if (ptr->flags.no_reply)
+ {
request.message.header.request.opcode= PROTOCOL_BINARY_CMD_FLUSHQ;
+ }
else
+ {
request.message.header.request.opcode= PROTOCOL_BINARY_CMD_FLUSH;
- if (memcached_do(&ptr->hosts[x], request.bytes,
+ }
+
+ if (memcached_do(instance, request.bytes,
sizeof(request.bytes), 1) != MEMCACHED_SUCCESS)
{
- memcached_io_reset(&ptr->hosts[x]);
+ memcached_io_reset(instance);
return MEMCACHED_WRITE_FAILURE;
}
}
for (x= 0; x < memcached_server_count(ptr); x++)
{
- if (memcached_server_response_count(&ptr->hosts[x]) > 0)
- (void)memcached_response(&ptr->hosts[x], NULL, 0, NULL);
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
+
+ if (memcached_server_response_count(instance) > 0)
+ (void)memcached_response(instance, NULL, 0, NULL);
}
return MEMCACHED_SUCCESS;
memcached_return_t ret= MEMCACHED_SUCCESS;
for (uint32_t x= 0; x < memcached_server_count(memc); ++x)
- if (memc->hosts[x].write_buffer_offset != 0)
+ {
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, x);
+
+ if (instance->write_buffer_offset != 0)
{
- if (memc->hosts[x].fd == -1 &&
- (ret= memcached_connect(&memc->hosts[x])) != MEMCACHED_SUCCESS)
+ if (instance->fd == -1 &&
+ (ret= memcached_connect(instance)) != MEMCACHED_SUCCESS)
{
WATCHPOINT_ERROR(ret);
return ret;
}
- if (memcached_io_write(&memc->hosts[x], NULL, 0, 1) == -1)
+ if (memcached_io_write(instance, NULL, 0, 1) == -1)
ret= MEMCACHED_SOME_ERRORS;
}
+ }
return ret;
}
}
static memcached_return_t binary_mget_by_key(memcached_st *ptr,
- unsigned int master_server_key,
+ uint32_t master_server_key,
bool is_master_key_set,
const char * const *keys,
const size_t *key_length,
*/
for (x= 0; x < memcached_server_count(ptr); x++)
{
- if (memcached_server_response_count(&ptr->hosts[x]))
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
+
+ if (memcached_server_response_count(instance))
{
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
if (ptr->flags.no_block)
- (void)memcached_io_write(&ptr->hosts[x], NULL, 0, 1);
+ (void)memcached_io_write(instance, NULL, 0, 1);
- while(memcached_server_response_count(&ptr->hosts[x]))
- (void)memcached_response(&ptr->hosts[x], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, &ptr->result);
+ while(memcached_server_response_count(instance))
+ (void)memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, &ptr->result);
}
}
*/
for (x= 0; x < number_of_keys; x++)
{
- unsigned int server_key;
+ memcached_server_instance_st *instance;
+ uint32_t server_key;
if (is_master_key_set)
+ {
server_key= master_server_key;
+ }
else
+ {
server_key= memcached_generate_hash(ptr, keys[x], key_length[x]);
+ }
- if (memcached_server_response_count(&ptr->hosts[server_key]) == 0)
+ instance= memcached_server_instance_fetch(ptr, server_key);
+
+ if (memcached_server_response_count(instance) == 0)
{
- rc= memcached_connect(&ptr->hosts[server_key]);
+ rc= memcached_connect(instance);
if (rc != MEMCACHED_SUCCESS)
continue;
- if ((memcached_io_write(&ptr->hosts[server_key], get_command, get_command_length, 0)) == -1)
+ if ((memcached_io_write(instance, get_command, get_command_length, 0)) == -1)
{
rc= MEMCACHED_SOME_ERRORS;
continue;
}
- WATCHPOINT_ASSERT(ptr->hosts[server_key].cursor_active == 0);
- memcached_server_response_increment(&ptr->hosts[server_key]);
- WATCHPOINT_ASSERT(ptr->hosts[server_key].cursor_active == 1);
+ WATCHPOINT_ASSERT(instance->cursor_active == 0);
+ memcached_server_response_increment(instance);
+ WATCHPOINT_ASSERT(instance->cursor_active == 1);
}
/* Only called when we have a prefix key */
if (ptr->prefix_key[0] != 0)
{
- if ((memcached_io_write(&ptr->hosts[server_key], ptr->prefix_key, ptr->prefix_key_length, 0)) == -1)
+ if ((memcached_io_write(instance, ptr->prefix_key, ptr->prefix_key_length, 0)) == -1)
{
- memcached_server_response_reset(&ptr->hosts[server_key]);
+ memcached_server_response_reset(instance);
rc= MEMCACHED_SOME_ERRORS;
continue;
}
}
- if ((memcached_io_write(&ptr->hosts[server_key], keys[x], key_length[x], 0)) == -1)
+ if ((memcached_io_write(instance, keys[x], key_length[x], 0)) == -1)
{
- memcached_server_response_reset(&ptr->hosts[server_key]);
+ memcached_server_response_reset(instance);
rc= MEMCACHED_SOME_ERRORS;
continue;
}
- if ((memcached_io_write(&ptr->hosts[server_key], " ", 1, 0)) == -1)
+ if ((memcached_io_write(instance, " ", 1, 0)) == -1)
{
- memcached_server_response_reset(&ptr->hosts[server_key]);
+ memcached_server_response_reset(instance);
rc= MEMCACHED_SOME_ERRORS;
continue;
}
*/
for (x= 0; x < memcached_server_count(ptr); x++)
{
- if (memcached_server_response_count(&ptr->hosts[x]))
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
+
+ if (memcached_server_response_count(instance))
{
/* We need to do something about non-connnected hosts in the future */
- if ((memcached_io_write(&ptr->hosts[x], "\r\n", 2, 1)) == -1)
+ if ((memcached_io_write(instance, "\r\n", 2, 1)) == -1)
{
rc= MEMCACHED_SOME_ERRORS;
}
}
static memcached_return_t simple_binary_mget(memcached_st *ptr,
- unsigned int master_server_key,
+ uint32_t master_server_key,
bool is_master_key_set,
const char * const *keys,
const size_t *key_length,
*/
for (x= 0; x < number_of_keys; x++)
{
- unsigned int server_key;
+ uint32_t server_key;
+ memcached_server_instance_st *instance;
if (is_master_key_set)
+ {
server_key= master_server_key;
+ }
else
+ {
server_key= memcached_generate_hash(ptr, keys[x], key_length[x]);
+ }
+
+ instance= memcached_server_instance_fetch(ptr, server_key);
- if (memcached_server_response_count(&ptr->hosts[server_key]) == 0)
+ if (memcached_server_response_count(instance) == 0)
{
- rc= memcached_connect(&ptr->hosts[server_key]);
+ rc= memcached_connect(instance);
if (rc != MEMCACHED_SUCCESS)
continue;
}
unlikely (vk != MEMCACHED_SUCCESS)
{
if (x > 0)
- memcached_io_reset(&ptr->hosts[server_key]);
+ {
+ memcached_io_reset(instance);
+ }
+
return vk;
}
request.message.header.request.datatype= PROTOCOL_BINARY_RAW_BYTES;
request.message.header.request.bodylen= htonl((uint32_t) key_length[x]);
- if ((memcached_io_write(&ptr->hosts[server_key], request.bytes,
+ if ((memcached_io_write(instance, request.bytes,
sizeof(request.bytes), 0) == -1) ||
- (memcached_io_write(&ptr->hosts[server_key], keys[x],
+ (memcached_io_write(instance, keys[x],
key_length[x], (char) flush) == -1))
{
- memcached_server_response_reset(&ptr->hosts[server_key]);
+ memcached_server_response_reset(instance);
rc= MEMCACHED_SOME_ERRORS;
continue;
}
/* We just want one pending response per server */
- memcached_server_response_reset(&ptr->hosts[server_key]);
- memcached_server_response_increment(&ptr->hosts[server_key]);
+ memcached_server_response_reset(instance);
+ memcached_server_response_increment(instance);
if ((x > 0 && x == ptr->io_key_prefetch) &&
memcached_flush_buffers(ptr) != MEMCACHED_SUCCESS)
rc= MEMCACHED_SOME_ERRORS;
request.message.header.request.datatype= PROTOCOL_BINARY_RAW_BYTES;
for (x= 0; x < memcached_server_count(ptr); x++)
- if (memcached_server_response_count(&ptr->hosts[x]))
+ {
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
+
+ if (memcached_server_response_count(instance))
{
- if (memcached_io_write(&ptr->hosts[x], NULL, 0, 1) == -1)
+ if (memcached_io_write(instance, NULL, 0, 1) == -1)
{
- memcached_server_response_reset(&ptr->hosts[x]);
- memcached_io_reset(&ptr->hosts[x]);
+ memcached_server_response_reset(instance);
+ memcached_io_reset(instance);
rc= MEMCACHED_SOME_ERRORS;
}
- if (memcached_io_write(&ptr->hosts[x], request.bytes,
+ if (memcached_io_write(instance, request.bytes,
sizeof(request.bytes), 1) == -1)
{
- memcached_server_response_reset(&ptr->hosts[x]);
- memcached_io_reset(&ptr->hosts[x]);
+ memcached_server_response_reset(instance);
+ memcached_io_reset(instance);
rc= MEMCACHED_SOME_ERRORS;
}
}
+ }
}
for (x= 0; x < number_of_keys; ++x)
{
+ memcached_server_instance_st *instance;
+
if (hash[x] == memcached_server_count(ptr))
continue; /* Already successfully sent */
if (dead_servers[server])
continue;
- if (memcached_server_response_count(&ptr->hosts[server]) == 0)
+ instance= memcached_server_instance_fetch(ptr, server);
+
+ if (memcached_server_response_count(instance) == 0)
{
- rc= memcached_connect(&ptr->hosts[server]);
+ rc= memcached_connect(instance);
if (rc != MEMCACHED_SUCCESS)
{
- memcached_io_reset(&ptr->hosts[server]);
+ memcached_io_reset(instance);
dead_servers[server]= true;
success= false;
continue;
* that we might have processed some of the responses etc. For now,
* just make sure we work _correctly_
*/
- if ((memcached_io_write(&ptr->hosts[server], request.bytes,
+ if ((memcached_io_write(instance, request.bytes,
sizeof(request.bytes), 0) == -1) ||
- (memcached_io_write(&ptr->hosts[server], keys[x],
+ (memcached_io_write(instance, keys[x],
key_length[x], 1) == -1))
{
- memcached_io_reset(&ptr->hosts[server]);
+ memcached_io_reset(instance);
dead_servers[server]= true;
success= false;
continue;
}
- memcached_server_response_increment(&ptr->hosts[server]);
+ memcached_server_response_increment(instance);
hash[x]= memcached_server_count(ptr);
}
}
static memcached_return_t binary_mget_by_key(memcached_st *ptr,
- unsigned int master_server_key,
+ uint32_t master_server_key,
bool is_master_key_set,
const char * const *keys,
const size_t *key_length,
static int compare_servers(const void *p1, const void *p2)
{
int return_value;
- memcached_server_st *a= (memcached_server_st *)p1;
- memcached_server_st *b= (memcached_server_st *)p2;
+ memcached_server_instance_st *a= (memcached_server_instance_st *)p1;
+ memcached_server_instance_st *b= (memcached_server_instance_st *)p2;
return_value= strcmp(a->hostname, b->hostname);
{
if (memcached_server_count(ptr))
{
- qsort(ptr->hosts, memcached_server_count(ptr), sizeof(memcached_server_st), compare_servers);
- ptr->hosts[0].number_of_hosts= memcached_server_count(ptr);
+ memcached_server_instance_st *instance;
+
+ qsort(memcached_server_list(ptr), memcached_server_count(ptr), sizeof(memcached_server_instance_st), compare_servers);
+ instance= memcached_server_instance_fetch(ptr, 0);
+ instance->number_of_hosts= memcached_server_count(ptr);
}
}
uint32_t host_index;
uint32_t continuum_index= 0;
uint32_t value;
- memcached_server_st *list;
+ memcached_server_instance_st *list;
uint32_t pointer_index;
uint32_t pointer_counter= 0;
uint32_t pointer_per_server= MEMCACHED_POINTS_PER_SERVER;
return MEMCACHED_ERRNO;
}
- list = ptr->hosts;
+ list = memcached_server_list(ptr);
/* count live servers (those without a retry delay set) */
is_auto_ejecting= memcached_behavior_get(ptr, MEMCACHED_BEHAVIOR_AUTO_EJECT_HOSTS);
memcached_return_t memcached_server_push(memcached_st *ptr, memcached_server_st *list)
{
- unsigned int x;
+ uint32_t x;
uint32_t count;
memcached_server_st *new_host_list;
- if (!list)
+ if (! list)
return MEMCACHED_SUCCESS;
count= memcached_servers_count(list);
- new_host_list= ptr->call_realloc(ptr, ptr->hosts,
- sizeof(memcached_server_st) * (count + memcached_server_count(ptr)));
+ new_host_list= ptr->call_realloc(ptr, memcached_server_list(ptr),
+ sizeof(memcached_server_instance_st) * (count + memcached_server_count(ptr)));
if (! new_host_list)
return MEMCACHED_MEMORY_ALLOCATION_FAILURE;
- ptr->hosts= new_host_list;
+ memcached_server_list_set(ptr, new_host_list);
for (x= 0; x < count; x++)
{
+ memcached_server_instance_st *instance;
+
if ((ptr->flags.use_udp && list[x].type != MEMCACHED_CONNECTION_UDP)
|| ((list[x].type == MEMCACHED_CONNECTION_UDP)
&& ! (ptr->flags.use_udp)) )
return MEMCACHED_INVALID_HOST_PROTOCOL;
WATCHPOINT_ASSERT(list[x].hostname[0] != 0);
- memcached_server_create(ptr, &ptr->hosts[memcached_server_count(ptr)]);
+
+ instance= memcached_server_instance_fetch(ptr, memcached_server_count(ptr));
+
+ memcached_server_create(ptr, instance);
/* TODO check return type */
- (void)memcached_server_create_with(ptr, &ptr->hosts[memcached_server_count(ptr)], list[x].hostname,
+ (void)memcached_server_create_with(ptr, instance, list[x].hostname,
list[x].port, list[x].weight, list[x].type);
ptr->number_of_hosts++;
}
- ptr->hosts[0].number_of_hosts= memcached_server_count(ptr);
+
+ // Provides backwards compatibility with server list.
+ {
+ memcached_server_instance_st *instance;
+ instance= memcached_server_instance_fetch(ptr, 0);
+ instance->number_of_hosts= memcached_server_count(ptr);
+ }
return run_distribution(ptr);
}
const char *filename,
uint32_t weight)
{
- if (!filename)
+ if (! filename)
return MEMCACHED_FAILURE;
return server_add(ptr, filename, 0, weight, MEMCACHED_CONNECTION_UNIX_SOCKET);
in_port_t port,
uint32_t weight)
{
- if (!port)
+ if (! port)
port= MEMCACHED_DEFAULT_PORT;
- if (!hostname)
+ if (! hostname)
hostname= "localhost";
return server_add(ptr, hostname, port, weight, MEMCACHED_CONNECTION_UDP);
in_port_t port,
uint32_t weight)
{
- if (!port)
+ if (! port)
port= MEMCACHED_DEFAULT_PORT;
- if (!hostname)
+ if (! hostname)
hostname= "localhost";
return server_add(ptr, hostname, port, weight, MEMCACHED_CONNECTION_TCP);
uint32_t weight,
memcached_connection_t type)
{
- memcached_server_st *new_host_list;
+ memcached_server_instance_st *new_host_list;
+ memcached_server_instance_st *instance;
if ( (ptr->flags.use_udp && type != MEMCACHED_CONNECTION_UDP)
|| ( (type == MEMCACHED_CONNECTION_UDP) && (! ptr->flags.use_udp) ) )
return MEMCACHED_INVALID_HOST_PROTOCOL;
- new_host_list= ptr->call_realloc(ptr, ptr->hosts,
- sizeof(memcached_server_st) * (ptr->number_of_hosts + 1));
+ new_host_list= ptr->call_realloc(ptr, memcached_server_list(ptr),
+ sizeof(memcached_server_instance_st) * (ptr->number_of_hosts + 1));
if (new_host_list == NULL)
return MEMCACHED_MEMORY_ALLOCATION_FAILURE;
- ptr->hosts= new_host_list;
+ memcached_server_list_set(ptr, new_host_list);
/* TODO: Check return type */
- (void)memcached_server_create_with(ptr, &ptr->hosts[memcached_server_count(ptr)], hostname, port, weight, type);
+ instance= memcached_server_instance_fetch(ptr, memcached_server_count(ptr));
+ (void)memcached_server_create_with(ptr, instance, hostname, port, weight, type);
ptr->number_of_hosts++;
- memcached_servers_set_count(&ptr->hosts[0], memcached_server_count(ptr));
+ instance= memcached_server_instance_fetch(ptr, 0);
+ memcached_servers_set_count(instance, memcached_server_count(ptr));
return run_distribution(ptr);
}
{
uint32_t x, host_index;
memcached_st *ptr= st_ptr->root;
- memcached_server_st *list= ptr->hosts;
+ memcached_server_st *list= memcached_server_list(ptr);
for (x= 0, host_index= 0; x < memcached_server_count(ptr); x++)
{
memcached_return_t *error)
{
unsigned int count;
- memcached_server_st *new_host_list;
+ memcached_server_instance_st *new_host_list;
if (hostname == NULL || error == NULL)
return NULL;
- if (!port)
+ if (! port)
port= MEMCACHED_DEFAULT_PORT;
/* Increment count for hosts */
count+= memcached_servers_count(ptr);
}
- new_host_list= (memcached_server_st *)realloc(ptr, sizeof(memcached_server_st) * count);
+ new_host_list= (memcached_server_instance_st *)realloc(ptr, sizeof(memcached_server_instance_st) * count);
if (!new_host_list)
{
*error= MEMCACHED_MEMORY_ALLOCATION_FAILURE;
noinst_HEADERS+= \
libmemcached/byteorder.h \
- libmemcached/libmemcached_probes.h \
- libmemcached/io.h \
- libmemcached/internal.h \
libmemcached/common.h \
- libmemcached/protocol/common.h \
+ libmemcached/internal.h \
+ libmemcached/io.h \
+ libmemcached/libmemcached_probes.h \
libmemcached/protocol/ascii_handler.h \
- libmemcached/protocol/binary_handler.h
+ libmemcached/protocol/binary_handler.h \
+ libmemcached/protocol/common.h \
+ libmemcached/response.h
nobase_include_HEADERS+= \
libmemcached/analyze.h \
libmemcached_libmemcached_la_DEPENDENCIES= libmemcached/libmemcachedcallbacks.la libmemcached/libmemcachedinternal.la
libmemcached_libmemcached_la_LIBADD= $(LIBM) libmemcached/libmemcachedcallbacks.la libmemcached/libmemcachedinternal.la
-libmemcached_libmemcached_la_LDFLAGS= ${AM_LDFLAGS} -version-info 3:0:0
+libmemcached_libmemcached_la_LDFLAGS= ${AM_LDFLAGS} -version-info ${MEMCACHED_LIBRARY_VERSION}
if BUILD_LIBMEMCACHEDUTIL
nobase_include_HEADERS+= \
MEM_WRITE
} memc_read_or_write;
-static ssize_t io_flush(memcached_server_st *ptr, memcached_return_t *error);
-static void increment_udp_message_id(memcached_server_st *ptr);
+static ssize_t io_flush(memcached_server_instance_st *ptr, memcached_return_t *error);
+static void increment_udp_message_id(memcached_server_instance_st *ptr);
-static memcached_return_t io_wait(memcached_server_st *ptr,
+static memcached_return_t io_wait(memcached_server_instance_st *ptr,
memc_read_or_write read_or_write)
{
struct pollfd fds= {
*
* @param ptr the server to pack
*/
-static bool repack_input_buffer(memcached_server_st *ptr)
+static bool repack_input_buffer(memcached_server_instance_st *ptr)
{
if (ptr->read_ptr != ptr->read_buffer)
{
* @param ptr the server to star processing iput messages for
* @return true if we processed anything, false otherwise
*/
-static bool process_input_buffer(memcached_server_st *ptr)
+static bool process_input_buffer(memcached_server_instance_st *ptr)
{
/*
** We might be able to process some of the response messages if we
}
#endif
-memcached_return_t memcached_io_read(memcached_server_st *ptr,
+memcached_return_t memcached_io_read(memcached_server_instance_st *ptr,
void *buffer, size_t length, ssize_t *nread)
{
char *buffer_ptr;
return MEMCACHED_SUCCESS;
}
-ssize_t memcached_io_write(memcached_server_st *ptr,
+ssize_t memcached_io_write(memcached_server_instance_st *ptr,
const void *buffer, size_t length, char with_flush)
{
size_t original_length;
return (ssize_t) original_length;
}
-memcached_return_t memcached_io_close(memcached_server_st *ptr)
+memcached_return_t memcached_io_close(memcached_server_instance_st *ptr)
{
if (ptr->fd == -1)
{
return MEMCACHED_SUCCESS;
}
-memcached_server_st *memcached_io_get_readable_server(memcached_st *memc)
+memcached_server_instance_st *memcached_io_get_readable_server(memcached_st *memc)
{
#define MAX_SERVERS_TO_POLL 100
struct pollfd fds[MAX_SERVERS_TO_POLL];
unsigned int host_index= 0;
- for (unsigned int x= 0;
+ for (uint32_t x= 0;
x< memcached_server_count(memc) && host_index < MAX_SERVERS_TO_POLL;
++x)
{
- if (memc->hosts[x].read_buffer_length > 0) /* I have data in the buffer */
- return &memc->hosts[x];
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, x);
- if (memcached_server_response_count(&memc->hosts[x]) > 0)
+ if (instance->read_buffer_length > 0) /* I have data in the buffer */
+ return instance;
+
+ if (memcached_server_response_count(instance) > 0)
{
fds[host_index].events = POLLIN;
fds[host_index].revents = 0;
- fds[host_index].fd = memc->hosts[x].fd;
+ fds[host_index].fd = instance->fd;
++host_index;
}
}
if (host_index < 2)
{
/* We have 0 or 1 server with pending events.. */
- for (unsigned int x= 0; x< memcached_server_count(memc); ++x)
- if (memcached_server_response_count(&memc->hosts[x]) > 0)
- return &memc->hosts[x];
+ for (uint32_t x= 0; x< memcached_server_count(memc); ++x)
+ {
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, x);
+
+ if (memcached_server_response_count(instance) > 0)
+ {
+ return instance;
+ }
+ }
return NULL;
}
{
if (fds[x].revents & POLLIN)
{
- for (unsigned int y= 0; y < memcached_server_count(memc); ++y)
+ for (uint32_t y= 0; y < memcached_server_count(memc); ++y)
{
- if (memc->hosts[y].fd == fds[x].fd)
- return &memc->hosts[y];
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, y);
+
+ if (instance->fd == fds[x].fd)
+ return instance;
}
}
}
return NULL;
}
-static ssize_t io_flush(memcached_server_st *ptr,
+static ssize_t io_flush(memcached_server_instance_st *ptr,
memcached_return_t *error)
{
/*
/*
Eventually we will just kill off the server with the problem.
*/
-void memcached_io_reset(memcached_server_st *ptr)
+void memcached_io_reset(memcached_server_instance_st *ptr)
{
memcached_quit_server(ptr, 1);
}
* Read a given number of bytes from the server and place it into a specific
* buffer. Reset the IO channel on this server if an error occurs.
*/
-memcached_return_t memcached_safe_read(memcached_server_st *ptr,
+memcached_return_t memcached_safe_read(memcached_server_instance_st *ptr,
void *dta,
size_t size)
{
return MEMCACHED_SUCCESS;
}
-memcached_return_t memcached_io_readline(memcached_server_st *ptr,
+memcached_return_t memcached_io_readline(memcached_server_instance_st *ptr,
char *buffer_ptr,
size_t size)
{
* extracts the message number from message_id, increments it and then
* writes the new value back into the header
*/
-static void increment_udp_message_id(memcached_server_st *ptr)
+static void increment_udp_message_id(memcached_server_instance_st *ptr)
{
struct udp_datagram_header_st *header= (struct udp_datagram_header_st *)ptr->write_buffer;
uint16_t cur_req= get_udp_datagram_request_id(header);
header->request_id= htons((uint16_t) (thread_id | msg_num));
}
-memcached_return_t memcached_io_init_udp_header(memcached_server_st *ptr, uint16_t thread_id)
+memcached_return_t memcached_io_init_udp_header(memcached_server_instance_st *ptr, uint16_t thread_id)
{
if (thread_id > UDP_REQUEST_ID_MAX_THREAD_ID)
return MEMCACHED_FAILURE;
};
LIBMEMCACHED_LOCAL
-ssize_t memcached_io_write(memcached_server_st *ptr,
+ssize_t memcached_io_write(memcached_server_instance_st *ptr,
const void *buffer, size_t length, char with_flush);
LIBMEMCACHED_LOCAL
-void memcached_io_reset(memcached_server_st *ptr);
+void memcached_io_reset(memcached_server_instance_st *ptr);
LIBMEMCACHED_LOCAL
-memcached_return_t memcached_io_read(memcached_server_st *ptr,
+memcached_return_t memcached_io_read(memcached_server_instance_st *ptr,
void *buffer, size_t length, ssize_t *nread);
/* Read a line (terminated by '\n') into the buffer */
LIBMEMCACHED_LOCAL
-memcached_return_t memcached_io_readline(memcached_server_st *ptr,
+memcached_return_t memcached_io_readline(memcached_server_instance_st *ptr,
char *buffer_ptr,
size_t size);
LIBMEMCACHED_LOCAL
-memcached_return_t memcached_io_close(memcached_server_st *ptr);
+memcached_return_t memcached_io_close(memcached_server_instance_st *ptr);
/* Read n bytes of data from the server and store them in dta */
LIBMEMCACHED_LOCAL
-memcached_return_t memcached_safe_read(memcached_server_st *ptr,
+memcached_return_t memcached_safe_read(memcached_server_instance_st *ptr,
void *dta,
size_t size);
-/* Read a single response from the server */
LIBMEMCACHED_LOCAL
-memcached_return_t memcached_read_one_response(memcached_server_st *ptr,
- char *buffer, size_t buffer_length,
- memcached_result_st *result);
-
-LIBMEMCACHED_LOCAL
-memcached_return_t memcached_io_init_udp_header(memcached_server_st *ptr,
+memcached_return_t memcached_io_init_udp_header(memcached_server_instance_st *ptr,
uint16_t thread_id);
LIBMEMCACHED_LOCAL
-memcached_server_st *memcached_io_get_readable_server(memcached_st *memc);
+memcached_server_instance_st *memcached_io_get_readable_server(memcached_st *memc);
#endif /* BUILDING_LIBMEMCACHED */
return;
for (x= 0; x < memcached_servers_count(servers); x++)
+ {
if (servers[x].address_info)
{
freeaddrinfo(servers[x].address_info);
servers[x].address_info= NULL;
}
+ }
if (ptr)
{
ptr->call_free(ptr, servers);
}
else
+ {
free(servers);
+ }
}
void memcached_servers_reset(memcached_st *ptr)
{
- server_list_free(ptr, ptr->hosts);
+ server_list_free(ptr, memcached_server_list(ptr));
- ptr->hosts= NULL;
+ memcached_server_list_set(ptr, NULL);
ptr->number_of_hosts= 0;
ptr->last_disconnected_server= NULL;
ptr->server_failure_limit= 0;
{
/* If we have anything open, lets close it now */
memcached_quit(ptr);
- server_list_free(ptr, ptr->hosts);
+ server_list_free(ptr, memcached_server_list(ptr));
memcached_result_free(&ptr->result);
if (ptr->on_cleanup)
new_clone->io_key_prefetch= source->io_key_prefetch;
new_clone->number_of_replicas= source->number_of_replicas;
- if (source->hosts)
- rc= memcached_server_push(new_clone, source->hosts);
+ if (memcached_server_list(source))
+ rc= memcached_server_push(new_clone, memcached_server_list(source));
if (rc != MEMCACHED_SUCCESS)
{
memcached_server_distribution_t distribution;
memcached_hash_t hash;
uint32_t continuum_points_counter; // Ketama
- memcached_server_st *hosts;
+ memcached_server_st *servers;
memcached_server_st *last_disconnected_server;
int32_t snd_timeout;
int32_t rcv_timeout;
LIBMEMCACHED_API
void memcached_servers_reset(memcached_st *ptr);
+// Local Only Inline
+static inline memcached_server_st *memcached_server_instance_fetch(memcached_st *ptr, uint32_t server_key)
+{
+ return &ptr->servers[server_key];
+}
+
/* Public API */
LIBMEMCACHED_API
#include "common.h"
-memcached_return_t memcached_purge(memcached_server_st *ptr)
+memcached_return_t memcached_purge(memcached_server_instance_st *ptr)
{
uint32_t x;
memcached_return_t ret= MEMCACHED_SUCCESS;
void memcached_quit(memcached_st *ptr)
{
- unsigned int x;
+ uint32_t x;
- if (ptr->hosts == NULL ||
- memcached_server_count(ptr) == 0)
+ if (memcached_server_count(ptr) == 0)
return;
- if (ptr->hosts && memcached_server_count(ptr))
+ if (memcached_server_count(ptr))
{
for (x= 0; x < memcached_server_count(ptr); x++)
- memcached_quit_server(&ptr->hosts[x], 0);
+ {
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
+
+ memcached_quit_server(instance, 0);
+ }
}
}
-/*
- Memcached library
-
- memcached_response() is used to determine the return result
- from an issued command.
+/* LibMemcached
+ * Copyright (C) 2006-2009 Brian Aker
+ * All rights reserved.
+ *
+ * Use and distribution licensed under the BSD license. See
+ * the COPYING file in the parent directory for full text.
+ *
+ * Summary: memcached_response() is used to determine the return result from an issued command.
+ *
*/
#include "common.h"
-static memcached_return_t textual_read_one_response(memcached_server_st *ptr,
- char *buffer, size_t buffer_length,
- memcached_result_st *result);
-static memcached_return_t binary_read_one_response(memcached_server_st *ptr,
- char *buffer, size_t buffer_length,
- memcached_result_st *result);
+static memcached_return_t textual_read_one_response(memcached_server_instance_st *ptr,
+ char *buffer, size_t buffer_length,
+ memcached_result_st *result);
+static memcached_return_t binary_read_one_response(memcached_server_instance_st *ptr,
+ char *buffer, size_t buffer_length,
+ memcached_result_st *result);
-memcached_return_t memcached_read_one_response(memcached_server_st *ptr,
- char *buffer, size_t buffer_length,
- memcached_result_st *result)
+memcached_return_t memcached_read_one_response(memcached_server_instance_st *ptr,
+ char *buffer, size_t buffer_length,
+ memcached_result_st *result)
{
memcached_server_response_decrement(ptr);
rc == MEMCACHED_PROTOCOL_ERROR ||
rc == MEMCACHED_CLIENT_ERROR ||
rc == MEMCACHED_MEMORY_ALLOCATION_FAILURE)
- memcached_io_reset(ptr);
+ memcached_io_reset(ptr);
return rc;
}
-memcached_return_t memcached_response(memcached_server_st *ptr,
- char *buffer, size_t buffer_length,
- memcached_result_st *result)
+memcached_return_t memcached_response(memcached_server_instance_st *ptr,
+ char *buffer, size_t buffer_length,
+ memcached_result_st *result)
{
/* We may have old commands in the buffer not set, first purge */
if (ptr->root->flags.no_block)
* The previous implementation purged all pending requests and just
* returned the last one. Purge all pending messages to ensure backwards
* compatibility.
- */
+ */
if (ptr->root->flags.binary_protocol == false)
while (memcached_server_response_count(ptr) > 1)
{
memcached_return_t rc= memcached_read_one_response(ptr, buffer, buffer_length, result);
-
+
unlikely (rc != MEMCACHED_END &&
rc != MEMCACHED_STORED &&
rc != MEMCACHED_SUCCESS &&
rc != MEMCACHED_NOTFOUND &&
rc != MEMCACHED_NOTSTORED &&
rc != MEMCACHED_DATA_EXISTS)
- return rc;
+ return rc;
}
return memcached_read_one_response(ptr, buffer, buffer_length, result);
}
-static memcached_return_t textual_value_fetch(memcached_server_st *ptr,
- char *buffer,
- memcached_result_st *result)
+static memcached_return_t textual_value_fetch(memcached_server_instance_st *ptr,
+ char *buffer,
+ memcached_result_st *result)
{
memcached_return_t rc= MEMCACHED_SUCCESS;
char *string_ptr;
goto read_error;
}
-/* This next bit blows the API, but this is internal....*/
+ /* This next bit blows the API, but this is internal....*/
{
char *char_ptr;
char_ptr= memcached_string_value(&result->value);;
return MEMCACHED_PARTIAL_READ;
}
-static memcached_return_t textual_read_one_response(memcached_server_st *ptr,
- char *buffer, size_t buffer_length,
- memcached_result_st *result)
+static memcached_return_t textual_read_one_response(memcached_server_instance_st *ptr,
+ char *buffer, size_t buffer_length,
+ memcached_result_st *result)
{
memcached_return_t rc= memcached_io_readline(ptr, buffer, buffer_length);
if (rc != MEMCACHED_SUCCESS)
return MEMCACHED_STAT;
}
else if (buffer[1] == 'E') /* SERVER_ERROR */
- {
- char *rel_ptr;
- char *startptr= buffer + 13, *endptr= startptr;
-
- while (*endptr != '\r' && *endptr != '\n') endptr++;
-
- /*
- Yes, we could make this "efficent" but to do that we would need
- to maintain more state for the size of the buffer. Why waste
- memory in the struct, which is important, for something that
- rarely should happen?
- */
- rel_ptr= (char *)ptr->root->call_realloc(ptr->root,
- ptr->cached_server_error,
- (size_t) (endptr - startptr + 1));
-
- if (rel_ptr == NULL)
- {
- /* If we happened to have some memory, we just null it since we don't know the size */
- if (ptr->cached_server_error)
- ptr->cached_server_error[0]= 0;
- return MEMCACHED_SERVER_ERROR;
- }
- ptr->cached_server_error= rel_ptr;
-
- memcpy(ptr->cached_server_error, startptr, (size_t) (endptr - startptr));
- ptr->cached_server_error[endptr - startptr]= 0;
- return MEMCACHED_SERVER_ERROR;
- }
+ {
+ char *rel_ptr;
+ char *startptr= buffer + 13, *endptr= startptr;
+
+ while (*endptr != '\r' && *endptr != '\n') endptr++;
+
+ /*
+ Yes, we could make this "efficent" but to do that we would need
+ to maintain more state for the size of the buffer. Why waste
+ memory in the struct, which is important, for something that
+ rarely should happen?
+ */
+ rel_ptr= (char *)ptr->root->call_realloc(ptr->root,
+ ptr->cached_server_error,
+ (size_t) (endptr - startptr + 1));
+
+ if (rel_ptr == NULL)
+ {
+ /* If we happened to have some memory, we just null it since we don't know the size */
+ if (ptr->cached_server_error)
+ ptr->cached_server_error[0]= 0;
+ return MEMCACHED_SERVER_ERROR;
+ }
+ ptr->cached_server_error= rel_ptr;
+
+ memcpy(ptr->cached_server_error, startptr, (size_t) (endptr - startptr));
+ ptr->cached_server_error[endptr - startptr]= 0;
+ return MEMCACHED_SERVER_ERROR;
+ }
else if (buffer[1] == 'T')
return MEMCACHED_STORED;
else
return MEMCACHED_UNKNOWN_READ_FAILURE;
}
case 'I': /* CLIENT ERROR */
- /* We add back in one because we will need to search for END */
- memcached_server_response_increment(ptr);
+ /* We add back in one because we will need to search for END */
+ memcached_server_response_increment(ptr);
return MEMCACHED_ITEM;
case 'C': /* CLIENT ERROR */
return MEMCACHED_CLIENT_ERROR;
/* NOTREACHED */
}
-static memcached_return_t binary_read_one_response(memcached_server_st *ptr,
- char *buffer, size_t buffer_length,
- memcached_result_st *result)
+static memcached_return_t binary_read_one_response(memcached_server_instance_st *ptr,
+ char *buffer, size_t buffer_length,
+ memcached_result_st *result)
{
protocol_binary_response_header header;
-
+
unlikely (memcached_safe_read(ptr, &header.bytes,
sizeof(header.bytes)) != MEMCACHED_SUCCESS)
return MEMCACHED_UNKNOWN_READ_FAILURE;
return MEMCACHED_PROTOCOL_ERROR;
/*
- ** Convert the header to host local endian!
- */
+ ** Convert the header to host local endian!
+ */
header.response.keylen= ntohs(header.response.keylen);
header.response.status= ntohs(header.response.status);
header.response.bodylen= ntohl(header.response.bodylen);
}
else if (header.response.bodylen)
{
- /* What should I do with the error message??? just discard it for now */
+ /* What should I do with the error message??? just discard it for now */
char hole[SMALL_STRING_LEN];
while (bodylen > 0)
{
/* This might be an error from one of the quiet commands.. if
* so, just throw it away and get the next one. What about creating
* a callback to the user with the error information?
- */
+ */
switch (header.response.opcode)
{
case PROTOCOL_BINARY_CMD_SETQ:
rc= MEMCACHED_PROTOCOL_ERROR;
break;
}
-
+
return rc;
}
--- /dev/null
+/* LibMemcached
+ * Copyright (C) 2010 Brian Aker
+ * All rights reserved.
+ *
+ * Use and distribution licensed under the BSD license. See
+ * the COPYING file in the parent directory for full text.
+ *
+ * Summary: Change the behavior of the memcached connection.
+ *
+ */
+
+#ifndef __MEMCACHED_RESPONSE_H__
+#define __MEMCACHED_RESPONSE_H__
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/* Read a single response from the server */
+LIBMEMCACHED_LOCAL
+memcached_return_t memcached_read_one_response(memcached_server_instance_st *ptr,
+ char *buffer, size_t buffer_length,
+ memcached_result_st *result);
+
+LIBMEMCACHED_LOCAL
+memcached_return_t memcached_response(memcached_server_instance_st *ptr,
+ char *buffer, size_t buffer_length,
+ memcached_result_st *result);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* __MEMCACHED_RESPONSE_H__ */
for (y= 0; y < memcached_server_count(ptr); y++)
{
uint32_t x;
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, y);
for (x= 0; x < number_of_callbacks; x++)
{
unsigned int iferror;
- iferror= (*callback[x])(ptr, &ptr->hosts[y], context);
+ iferror= (*callback[x])(ptr, instance, context);
if (iferror)
continue;
memcached_server_st *memcached_server_by_key(memcached_st *ptr, const char *key, size_t key_length, memcached_return_t *error)
{
uint32_t server_key;
+ memcached_server_instance_st *instance;
*error= memcached_validate_key_length(key_length,
ptr->flags.binary_protocol);
}
server_key= memcached_generate_hash(ptr, key, key_length);
+ instance= memcached_server_instance_fetch(ptr, server_key);
- return memcached_server_clone(NULL, &ptr->hosts[server_key]);
+ return memcached_server_clone(NULL, instance);
}
char hostname[MEMCACHED_MAX_HOST_LENGTH];
};
+// Local Only Inline
static inline uint32_t memcached_servers_count(memcached_server_st *servers)
{
return servers->number_of_hosts;
}
+// Local Only Inline
static inline uint32_t memcached_servers_set_count(memcached_server_st *servers, uint32_t count)
{
return servers->number_of_hosts= count;
}
+
+
#define memcached_server_count(A) (A)->number_of_hosts
#define memcached_server_name(A,B) (B).hostname
#define memcached_server_port(A,B) (B).port
-#define memcached_server_list(A) (A)->hosts
+#define memcached_server_list(A) (A)->servers
+#define memcached_server_list_set(A,B) (A)->servers=(B)
#define memcached_server_response_count(A) (A)->cursor_active
LIBMEMCACHED_API
/* These should not currently be used by end users */
/* TODO: Is the above comment valid? If so, how can we unit test these if they
* aren't exported. If not, we should remove the comment */
-LIBMEMCACHED_API
+LIBMEMCACHED_LOCAL
memcached_server_st *memcached_server_create(memcached_st *memc, memcached_server_st *ptr);
-LIBMEMCACHED_API
+LIBMEMCACHED_LOCAL
memcached_server_st *memcached_server_create_with(memcached_st *memc,
memcached_server_st *host,
const char *hostname,
LIBMEMCACHED_API
void memcached_server_free(memcached_server_st *ptr);
-LIBMEMCACHED_API
+LIBMEMCACHED_LOCAL
memcached_server_st *memcached_server_clone(memcached_server_st *clone,
memcached_server_st *ptr);
return ret;
}
-static memcached_return_t binary_stats_fetch(memcached_st *ptr,
- memcached_stat_st *memc_stat,
+static memcached_return_t binary_stats_fetch(memcached_stat_st *memc_stat,
char *args,
- unsigned int server_key)
+ memcached_server_instance_st *instance)
{
memcached_return_t rc;
request.message.header.request.keylen= htons((uint16_t)len);
request.message.header.request.bodylen= htonl((uint32_t) len);
- if ((memcached_do(&ptr->hosts[server_key], request.bytes,
+ if ((memcached_do(instance, request.bytes,
sizeof(request.bytes), 0) != MEMCACHED_SUCCESS) ||
- (memcached_io_write(&ptr->hosts[server_key], args, len, 1) == -1))
+ (memcached_io_write(instance, args, len, 1) == -1))
{
- memcached_io_reset(&ptr->hosts[server_key]);
+ memcached_io_reset(instance);
return MEMCACHED_WRITE_FAILURE;
}
}
else
{
- if (memcached_do(&ptr->hosts[server_key], request.bytes,
+ if (memcached_do(instance, request.bytes,
sizeof(request.bytes), 1) != MEMCACHED_SUCCESS)
{
- memcached_io_reset(&ptr->hosts[server_key]);
+ memcached_io_reset(instance);
return MEMCACHED_WRITE_FAILURE;
}
}
- memcached_server_response_decrement(&ptr->hosts[server_key]);
+ memcached_server_response_decrement(instance);
do
{
- rc= memcached_response(&ptr->hosts[server_key], buffer,
+ rc= memcached_response(instance, buffer,
sizeof(buffer), NULL);
if (rc == MEMCACHED_END)
break;
unlikely (rc != MEMCACHED_SUCCESS)
{
- memcached_io_reset(&ptr->hosts[server_key]);
+ memcached_io_reset(instance);
return rc;
}
/* shit... memcached_response will decrement the counter, so I need to
** reset it.. todo: look at this and try to find a better solution.
*/
- ptr->hosts[server_key].cursor_active= 0;
+ instance->cursor_active= 0;
return MEMCACHED_SUCCESS;
}
-static memcached_return_t ascii_stats_fetch(memcached_st *ptr,
- memcached_stat_st *memc_stat,
+static memcached_return_t ascii_stats_fetch(memcached_stat_st *memc_stat,
char *args,
- unsigned int server_key)
+ memcached_server_instance_st *instance)
{
memcached_return_t rc;
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
if (send_length >= MEMCACHED_DEFAULT_COMMAND_SIZE)
return MEMCACHED_WRITE_FAILURE;
- rc= memcached_do(&ptr->hosts[server_key], buffer, send_length, 1);
+ rc= memcached_do(instance, buffer, send_length, 1);
if (rc != MEMCACHED_SUCCESS)
goto error;
while (1)
{
- rc= memcached_response(&ptr->hosts[server_key], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
+ rc= memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
if (rc == MEMCACHED_STAT)
{
memcached_stat_st *memcached_stat(memcached_st *ptr, char *args, memcached_return_t *error)
{
- unsigned int x;
+ uint32_t x;
memcached_return_t rc;
memcached_stat_st *stats;
for (x= 0; x < memcached_server_count(ptr); x++)
{
memcached_return_t temp_return;
+ memcached_server_instance_st *instance;
+
+ instance= memcached_server_instance_fetch(ptr, x);
if (ptr->flags.binary_protocol)
- temp_return= binary_stats_fetch(ptr, stats + x, args, x);
+ {
+ temp_return= binary_stats_fetch(stats + x, args, instance);
+ }
else
- temp_return= ascii_stats_fetch(ptr, stats + x, args, x);
+ {
+ temp_return= ascii_stats_fetch(stats + x, args, instance);
+ }
if (temp_return != MEMCACHED_SUCCESS)
rc= MEMCACHED_SOME_ERRORS;
memcached_return_t rc;
memcached_st memc;
memcached_st *memc_ptr;
+ memcached_server_instance_st *instance;
memc_ptr= memcached_create(&memc);
WATCHPOINT_ASSERT(memc_ptr);
memcached_server_add(&memc, hostname, port);
+ instance= memcached_server_instance_fetch(memc_ptr, 0);
+
if (memc.flags.binary_protocol)
- rc= binary_stats_fetch(&memc, memc_stat, args, 0);
+ {
+ rc= binary_stats_fetch(memc_stat, args, instance);
+ }
else
- rc= ascii_stats_fetch(&memc, memc_stat, args, 0);
+ {
+ rc= ascii_stats_fetch(memc_stat, args, instance);
+ }
memcached_free(&memc);
size_t write_length;
memcached_return_t rc;
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
- unsigned int server_key;
+ uint32_t server_key;
+ memcached_server_instance_st *instance;
WATCHPOINT_ASSERT(!(value == NULL && value_length > 0));
}
server_key= memcached_generate_hash(ptr, master_key, master_key_length);
+ instance= memcached_server_instance_fetch(ptr, server_key);
if (cas)
{
size_t cmd_size= write_length + value_length + 2;
if (cmd_size > MAX_UDP_DATAGRAM_LENGTH - UDP_DATAGRAM_HEADER_LENGTH)
return MEMCACHED_WRITE_FAILURE;
- if (cmd_size + ptr->hosts[server_key].write_buffer_offset > MAX_UDP_DATAGRAM_LENGTH)
- memcached_io_write(&ptr->hosts[server_key], NULL, 0, 1);
+ if (cmd_size + instance->write_buffer_offset > MAX_UDP_DATAGRAM_LENGTH)
+ memcached_io_write(instance, NULL, 0, 1);
}
if (write_length >= MEMCACHED_DEFAULT_COMMAND_SIZE)
}
/* Send command header */
- rc= memcached_do(&ptr->hosts[server_key], buffer, write_length, 0);
+ rc= memcached_do(instance, buffer, write_length, 0);
if (rc != MEMCACHED_SUCCESS)
goto error;
/* Send command body */
- if (memcached_io_write(&ptr->hosts[server_key], value, value_length, 0) == -1)
+ if (memcached_io_write(instance, value, value_length, 0) == -1)
{
rc= MEMCACHED_WRITE_FAILURE;
goto error;
to_write= 1;
}
- if (memcached_io_write(&ptr->hosts[server_key], "\r\n", 2, to_write) == -1)
+ if (memcached_io_write(instance, "\r\n", 2, to_write) == -1)
{
rc= MEMCACHED_WRITE_FAILURE;
goto error;
if (to_write == 0)
return MEMCACHED_BUFFERED;
- rc= memcached_response(&ptr->hosts[server_key], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
+ rc= memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
if (rc == MEMCACHED_STORED)
return MEMCACHED_SUCCESS;
return rc;
error:
- memcached_io_reset(&ptr->hosts[server_key]);
+ memcached_io_reset(instance);
return rc;
}
size_t send_length= sizeof(request.bytes);
uint32_t server_key= memcached_generate_hash(ptr, master_key,
master_key_length);
- memcached_server_st *server= &ptr->hosts[server_key];
+
+ memcached_server_instance_st *server=
+ memcached_server_instance_fetch(ptr, server_key);
+
bool noreply= server->root->flags.no_reply;
request.message.header.request.magic= PROTOCOL_BINARY_REQ;
size_t cmd_size= send_length + key_length + value_length;
if (cmd_size > MAX_UDP_DATAGRAM_LENGTH - UDP_DATAGRAM_HEADER_LENGTH)
+ {
return MEMCACHED_WRITE_FAILURE;
+ }
if (cmd_size + server->write_buffer_offset > MAX_UDP_DATAGRAM_LENGTH)
- memcached_io_write(server,NULL,0, 1);
+ {
+ memcached_io_write(server, NULL, 0, 1);
+ }
}
/* write the header */
for (uint32_t x= 0; x < ptr->number_of_replicas; x++)
{
+ memcached_server_instance_st *instance;
+
++server_key;
if (server_key == memcached_server_count(ptr))
server_key= 0;
- memcached_server_st *srv= &ptr->hosts[server_key];
- if ((memcached_do(srv, (const char*)request.bytes,
+ instance= memcached_server_instance_fetch(ptr, server_key);
+
+ if ((memcached_do(instance, (const char*)request.bytes,
send_length, 0) != MEMCACHED_SUCCESS) ||
- (memcached_io_write(srv, key, key_length, 0) == -1) ||
- (memcached_io_write(srv, value, value_length, (char) flush) == -1))
- memcached_io_reset(srv);
+ (memcached_io_write(instance, key, key_length, 0) == -1) ||
+ (memcached_io_write(instance, value, value_length, (char) flush) == -1))
+ {
+ memcached_io_reset(instance);
+ }
else
- memcached_server_response_decrement(srv);
+ {
+ memcached_server_response_decrement(instance);
+ }
}
}
if (flush == 0)
+ {
return MEMCACHED_BUFFERED;
+ }
if (noreply)
+ {
return MEMCACHED_SUCCESS;
+ }
return memcached_response(server, NULL, 0, NULL);
}
memcached_return_t memcached_verbosity(memcached_st *ptr, unsigned int verbosity)
{
- unsigned int x;
+ uint32_t x;
size_t send_length;
memcached_return_t rc;
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
for (x= 0; x < memcached_server_count(ptr); x++)
{
memcached_return_t rrc;
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
- rrc= memcached_do(&ptr->hosts[x], buffer, send_length, 1);
+ rrc= memcached_do(instance, buffer, send_length, 1);
if (rrc != MEMCACHED_SUCCESS)
{
rc= MEMCACHED_SOME_ERRORS;
unlikely (ptr->flags.use_udp)
continue;
- rrc= memcached_response(&ptr->hosts[x], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
+ rrc= memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
if (rrc != MEMCACHED_SUCCESS)
rc= MEMCACHED_SOME_ERRORS;
}
for (x= 0; x < memcached_server_count(ptr); x++)
{
memcached_return_t rrc;
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
- rrc= memcached_do(&ptr->hosts[x], command, send_length, 1);
+ rrc= memcached_do(instance, command, send_length, 1);
if (rrc != MEMCACHED_SUCCESS)
{
rc= MEMCACHED_SOME_ERRORS;
continue;
}
- rrc= memcached_response(&ptr->hosts[x], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
+ rrc= memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
if (rrc != MEMCACHED_SUCCESS)
{
rc= MEMCACHED_SOME_ERRORS;
response_ptr= index(buffer, ' ');
response_ptr++;
- ptr->hosts[x].major_version= (uint8_t)strtol(response_ptr, (char **)NULL, 10);
+ instance->major_version= (uint8_t)strtol(response_ptr, (char **)NULL, 10);
response_ptr= index(response_ptr, '.');
response_ptr++;
- ptr->hosts[x].minor_version= (uint8_t)strtol(response_ptr, (char **)NULL, 10);
+ instance->minor_version= (uint8_t)strtol(response_ptr, (char **)NULL, 10);
response_ptr= index(response_ptr, '.');
response_ptr++;
- ptr->hosts[x].micro_version= (uint8_t)strtol(response_ptr, (char **)NULL, 10);
+ instance->micro_version= (uint8_t)strtol(response_ptr, (char **)NULL, 10);
}
return rc;
{
memcached_return_t rrc;
- rrc= memcached_do(&ptr->hosts[x], request.bytes, sizeof(request.bytes), 1);
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
+
+ rrc= memcached_do(instance, request.bytes, sizeof(request.bytes), 1);
if (rrc != MEMCACHED_SUCCESS)
{
- memcached_io_reset(&ptr->hosts[x]);
+ memcached_io_reset(instance);
rc= MEMCACHED_SOME_ERRORS;
continue;
}
for (x= 0; x < memcached_server_count(ptr); x++)
{
- if (memcached_server_response_count(&ptr->hosts[x]) > 0)
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(ptr, x);
+
+ if (memcached_server_response_count(instance) > 0)
{
memcached_return_t rrc;
char buffer[32];
char *p;
- rrc= memcached_response(&ptr->hosts[x], buffer, sizeof(buffer), NULL);
+ rrc= memcached_response(instance, buffer, sizeof(buffer), NULL);
if (rrc != MEMCACHED_SUCCESS)
{
- memcached_io_reset(&ptr->hosts[x]);
+ memcached_io_reset(instance);
rc= MEMCACHED_SOME_ERRORS;
continue;
}
- ptr->hosts[x].major_version= (uint8_t)strtol(buffer, &p, 10);
- ptr->hosts[x].minor_version= (uint8_t)strtol(p + 1, &p, 10);
- ptr->hosts[x].micro_version= (uint8_t)strtol(p + 1, NULL, 10);
+ instance->major_version= (uint8_t)strtol(buffer, &p, 10);
+ instance->minor_version= (uint8_t)strtol(p + 1, &p, 10);
+ instance->micro_version= (uint8_t)strtol(p + 1, NULL, 10);
}
}
%{_libdir}/libmemcached.so.*
%{_libdir}/libmemcachedutil.so.*
%{_libdir}/libmemcachedprotocol.so.*
-%{_mandir}/man1/mem*
+%{_mandir}/man1/memcapable.1.gz
+%{_mandir}/man1/memcat.1.gz
+%{_mandir}/man1/memcp.1.gz
+%{_mandir}/man1/memdump.1.gz
+%{_mandir}/man1/memerror.1.gz
+%{_mandir}/man1/memflush.1.gz
+%{_mandir}/man1/memrm.1.gz
+%{_mandir}/man1/memslap.1.gz
+%{_mandir}/man1/memstat.1.gz
%files devel
%{_includedir}/libmemcached/memcached.h
%{_includedir}/libmemcached/memcached.hpp
%{_includedir}/libmemcached/memcached_util.h
-%{_includedir}/libmemcached/protocol
%{_includedir}/libmemcached/protocol/cache.h
%{_includedir}/libmemcached/protocol/callback.h
%{_includedir}/libmemcached/protocol_handler.h
%{_includedir}/libmemcached/util/pool.h
%{_includedir}/libmemcached/visibility.h
%{_includedir}/libmemcached/watchpoint.h
+%{_includedir}/libmemcached/memcached/protocol_binary.h
%{_libdir}/libhashkit.so
%{_libdir}/libmemcached.so
%{_libdir}/libmemcachedprotocol.so
%{_libdir}/libmemcachedutil.so
%{_libdir}/pkgconfig/libmemcached.pc
-%{_mandir}/man3/hashkit*.3.gz
-%{_mandir}/man3/libmemcached*.3.gz
-%{_mandir}/man3/memcached_*.3.gz
+%{_mandir}/man3/hashkit_clone.3.gz
+%{_mandir}/man3/hashkit_crc32.3.gz
+%{_mandir}/man3/hashkit_create.3.gz
+%{_mandir}/man3/hashkit_fnv1_32.3.gz
+%{_mandir}/man3/hashkit_fnv1_64.3.gz
+%{_mandir}/man3/hashkit_fnv1a_32.3.gz
+%{_mandir}/man3/hashkit_fnv1a_64.3.gz
+%{_mandir}/man3/hashkit_free.3.gz
+%{_mandir}/man3/hashkit_functions.3.gz
+%{_mandir}/man3/hashkit_hsieh.3.gz
+%{_mandir}/man3/hashkit_is_allocated.3.gz
+%{_mandir}/man3/hashkit_jenkins.3.gz
+%{_mandir}/man3/hashkit_md5.3.gz
+%{_mandir}/man3/hashkit_murmur.3.gz
+%{_mandir}/man3/hashkit_value.3.gz
+%{_mandir}/man3/libmemcached.3.gz
+%{_mandir}/man3/libmemcached_examples.3.gz
+%{_mandir}/man3/libmemcachedutil.3.gz
+%{_mandir}/man3/memcached_add.3.gz
+%{_mandir}/man3/memcached_add_by_key.3.gz
+%{_mandir}/man3/memcached_analyze.3.gz
+%{_mandir}/man3/memcached_append.3.gz
+%{_mandir}/man3/memcached_append_by_key.3.gz
+%{_mandir}/man3/memcached_behavior_get.3.gz
+%{_mandir}/man3/memcached_behavior_set.3.gz
+%{_mandir}/man3/memcached_callback_get.3.gz
+%{_mandir}/man3/memcached_callback_set.3.gz
+%{_mandir}/man3/memcached_cas.3.gz
+%{_mandir}/man3/memcached_cas_by_key.3.gz
+%{_mandir}/man3/memcached_clone.3.gz
+%{_mandir}/man3/memcached_create.3.gz
+%{_mandir}/man3/memcached_decrement.3.gz
+%{_mandir}/man3/memcached_decrement_with_initial.3.gz
+%{_mandir}/man3/memcached_delete.3.gz
+%{_mandir}/man3/memcached_delete_by_key.3.gz
+%{_mandir}/man3/memcached_dump.3.gz
+%{_mandir}/man3/memcached_fetch.3.gz
+%{_mandir}/man3/memcached_fetch_execute.3.gz
+%{_mandir}/man3/memcached_fetch_result.3.gz
+%{_mandir}/man3/memcached_flush_buffers.3.gz
+%{_mandir}/man3/memcached_free.3.gz
+%{_mandir}/man3/memcached_generate_hash_value.3.gz
+%{_mandir}/man3/memcached_get.3.gz
+%{_mandir}/man3/memcached_get_by_key.3.gz
+%{_mandir}/man3/memcached_get_memory_allocators.3.gz
+%{_mandir}/man3/memcached_get_user_data.3.gz
+%{_mandir}/man3/memcached_increment.3.gz
+%{_mandir}/man3/memcached_increment_with_initial.3.gz
+%{_mandir}/man3/memcached_lib_version.3.gz
+%{_mandir}/man3/memcached_mget.3.gz
+%{_mandir}/man3/memcached_mget_by_key.3.gz
+%{_mandir}/man3/memcached_mget_execute.3.gz
+%{_mandir}/man3/memcached_mget_execute_by_key.3.gz
+%{_mandir}/man3/memcached_pool_behavior_get.3.gz
+%{_mandir}/man3/memcached_pool_behavior_set.3.gz
+%{_mandir}/man3/memcached_pool_create.3.gz
+%{_mandir}/man3/memcached_pool_destroy.3.gz
+%{_mandir}/man3/memcached_pool_pop.3.gz
+%{_mandir}/man3/memcached_pool_push.3.gz
+%{_mandir}/man3/memcached_prepend.3.gz
+%{_mandir}/man3/memcached_prepend_by_key.3.gz
+%{_mandir}/man3/memcached_quit.3.gz
+%{_mandir}/man3/memcached_replace.3.gz
+%{_mandir}/man3/memcached_replace_by_key.3.gz
+%{_mandir}/man3/memcached_server_add.3.gz
+%{_mandir}/man3/memcached_server_count.3.gz
+%{_mandir}/man3/memcached_server_cursor.3.gz
+%{_mandir}/man3/memcached_server_list.3.gz
+%{_mandir}/man3/memcached_server_list_append.3.gz
+%{_mandir}/man3/memcached_server_list_count.3.gz
+%{_mandir}/man3/memcached_server_list_free.3.gz
+%{_mandir}/man3/memcached_server_push.3.gz
+%{_mandir}/man3/memcached_servers_parse.3.gz
+%{_mandir}/man3/memcached_set.3.gz
+%{_mandir}/man3/memcached_set_by_key.3.gz
+%{_mandir}/man3/memcached_set_memory_allocators.3.gz
+%{_mandir}/man3/memcached_set_user_data.3.gz
+%{_mandir}/man3/memcached_stat.3.gz
+%{_mandir}/man3/memcached_stat_get_keys.3.gz
+%{_mandir}/man3/memcached_stat_get_value.3.gz
+%{_mandir}/man3/memcached_stat_servername.3.gz
+%{_mandir}/man3/memcached_strerror.3.gz
+%{_mandir}/man3/memcached_verbosity.3.gz
+%{_mandir}/man3/memcached_version.3.gz
+
%changelog
void get_world(world_st *world)
{
world->collections= collection;
- world->collection_startup= (test_callback_fn)world_collection_startup;
- world->flush= (test_callback_fn)world_flush;
- world->pre_run= (test_callback_fn)world_pre_run;
+
world->create= (test_callback_create_fn)world_create;
- world->post_run= (test_callback_fn)world_post_run;
- world->on_error= (test_callback_error_fn)world_on_error;
world->destroy= (test_callback_fn)world_destroy;
+
+ world->test.startup= (test_callback_fn)world_test_startup;
+ world->test.flush= (test_callback_fn)world_flush;
+ world->test.pre_run= (test_callback_fn)world_pre_run;
+ world->test.post_run= (test_callback_fn)world_post_run;
+ world->test.on_error= (test_callback_error_fn)world_on_error;
+
world->runner= &defualt_libmemcached_runner;
}
+++ /dev/null
-/* libMemcached Functions Test
- * Copyright (C) 2006-2009 Brian Aker
- * All rights reserved.
- *
- * Use and distribution licensed under the BSD license. See
- * the COPYING file in the parent directory for full text.
- */
-
-/*
- Sample test application.
-*/
-
-#include "libmemcached/common.h"
-
-#include <assert.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <sys/time.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <signal.h>
-#include <unistd.h>
-#include <time.h>
-#include "server.h"
-#include "clients/generator.h"
-#include "clients/execute.h"
-
-#ifndef INT64_MAX
-#define INT64_MAX LONG_MAX
-#endif
-#ifndef INT32_MAX
-#define INT32_MAX INT_MAX
-#endif
-
-
-#include "test.h"
-
-#ifdef HAVE_LIBMEMCACHEDUTIL
-#include <pthread.h>
-#include "libmemcached/memcached_util.h"
-#endif
-
-#include "hash_results.h"
-
-#define GLOBAL_COUNT 10000
-#define GLOBAL2_COUNT 100
-#define SERVERS_TO_CREATE 5
-static uint32_t global_count;
-
-static pairs_st *global_pairs;
-static const char *global_keys[GLOBAL_COUNT];
-static size_t global_keys_length[GLOBAL_COUNT];
-
-static test_return_t init_test(memcached_st *not_used __attribute__((unused)))
-{
- memcached_st memc;
-
- (void)memcached_create(&memc);
- memcached_free(&memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t server_list_null_test(memcached_st *ptr __attribute__((unused)))
-{
- memcached_server_st *server_list;
- memcached_return_t rc;
-
- server_list= memcached_server_list_append_with_weight(NULL, NULL, 0, 0, NULL);
- test_truth(server_list == NULL);
-
- server_list= memcached_server_list_append_with_weight(NULL, "localhost", 0, 0, NULL);
- test_truth(server_list == NULL);
-
- server_list= memcached_server_list_append_with_weight(NULL, NULL, 0, 0, &rc);
- test_truth(server_list == NULL);
-
- return TEST_SUCCESS;
-}
-
-#define TEST_PORT_COUNT 7
-in_port_t test_ports[TEST_PORT_COUNT];
-
-static memcached_return_t server_display_function(memcached_st *ptr __attribute__((unused)), memcached_server_st *server, void *context)
-{
- /* Do Nothing */
- uint32_t bigger= *((uint32_t *)(context));
- assert(bigger <= server->port);
- *((uint32_t *)(context))= server->port;
-
- return MEMCACHED_SUCCESS;
-}
-
-static test_return_t server_sort_test(memcached_st *ptr __attribute__((unused)))
-{
- uint32_t x;
- uint32_t bigger= 0; /* Prime the value for the test_truth in server_display_function */
- memcached_return_t rc;
- memcached_server_fn callbacks[1];
- memcached_st *local_memc;
-
- local_memc= memcached_create(NULL);
- test_truth(local_memc);
- memcached_behavior_set(local_memc, MEMCACHED_BEHAVIOR_SORT_HOSTS, 1);
-
- for (x= 0; x < TEST_PORT_COUNT; x++)
- {
- test_ports[x]= (in_port_t)random() % 64000;
- rc= memcached_server_add_with_weight(local_memc, "localhost", test_ports[x], 0);
- test_truth(memcached_server_count(local_memc) == x + 1);
- test_truth(memcached_servers_count(local_memc->hosts) == x+1);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- callbacks[0]= server_display_function;
- memcached_server_cursor(local_memc, callbacks, (void *)&bigger, 1);
-
-
- memcached_free(local_memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t server_sort2_test(memcached_st *ptr __attribute__((unused)))
-{
- uint32_t bigger= 0; /* Prime the value for the test_truth in server_display_function */
- memcached_return_t rc;
- memcached_server_fn callbacks[1];
- memcached_st *local_memc;
-
- local_memc= memcached_create(NULL);
- test_truth(local_memc);
- rc= memcached_behavior_set(local_memc, MEMCACHED_BEHAVIOR_SORT_HOSTS, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_server_add_with_weight(local_memc, "MEMCACHED_BEHAVIOR_SORT_HOSTS", 43043, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(local_memc->hosts[0].port == 43043);
-
- rc= memcached_server_add_with_weight(local_memc, "MEMCACHED_BEHAVIOR_SORT_HOSTS", 43042, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(local_memc->hosts[0].port == 43042);
- test_truth(local_memc->hosts[1].port == 43043);
-
- callbacks[0]= server_display_function;
- memcached_server_cursor(local_memc, callbacks, (void *)&bigger, 1);
-
-
- memcached_free(local_memc);
-
- return TEST_SUCCESS;
-}
-
-static memcached_return_t server_display_unsort_function(memcached_st *ptr __attribute__((unused)), memcached_server_st *server, void *context)
-{
- /* Do Nothing */
- uint32_t x= *((uint32_t *)(context));
-
- assert(test_ports[x] == server->port);
- *((uint32_t *)(context))= ++x;
-
- return MEMCACHED_SUCCESS;
-}
-
-static test_return_t server_unsort_test(memcached_st *ptr __attribute__((unused)))
-{
- uint32_t x;
- uint32_t counter= 0; /* Prime the value for the test_truth in server_display_function */
- uint32_t bigger= 0; /* Prime the value for the test_truth in server_display_function */
- memcached_return_t rc;
- memcached_server_fn callbacks[1];
- memcached_st *local_memc;
-
- local_memc= memcached_create(NULL);
- test_truth(local_memc);
-
- for (x= 0; x < TEST_PORT_COUNT; x++)
- {
- test_ports[x]= (in_port_t)(random() % 64000);
- rc= memcached_server_add_with_weight(local_memc, "localhost", test_ports[x], 0);
- test_truth(memcached_server_count(local_memc) == x+1);
- test_truth(memcached_servers_count(local_memc->hosts) == x+1);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- callbacks[0]= server_display_unsort_function;
- memcached_server_cursor(local_memc, callbacks, (void *)&counter, 1);
-
- /* Now we sort old data! */
- memcached_behavior_set(local_memc, MEMCACHED_BEHAVIOR_SORT_HOSTS, 1);
- callbacks[0]= server_display_function;
- memcached_server_cursor(local_memc, callbacks, (void *)&bigger, 1);
-
-
- memcached_free(local_memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t allocation_test(memcached_st *not_used __attribute__((unused)))
-{
- memcached_st *memc;
- memc= memcached_create(NULL);
- test_truth(memc);
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t clone_test(memcached_st *memc)
-{
- /* All null? */
- {
- memcached_st *memc_clone;
- memc_clone= memcached_clone(NULL, NULL);
- test_truth(memc_clone);
- memcached_free(memc_clone);
- }
-
- /* Can we init from null? */
- {
- memcached_st *memc_clone;
- memc_clone= memcached_clone(NULL, memc);
- test_truth(memc_clone);
-
- test_truth(memc_clone->call_free == memc->call_free);
- test_truth(memc_clone->call_malloc == memc->call_malloc);
- test_truth(memc_clone->call_realloc == memc->call_realloc);
- test_truth(memc_clone->call_calloc == memc->call_calloc);
- test_truth(memc_clone->connect_timeout == memc->connect_timeout);
- test_truth(memc_clone->delete_trigger == memc->delete_trigger);
- test_truth(memc_clone->distribution == memc->distribution);
- { // Test all of the flags
- test_truth(memc_clone->flags.no_block == memc->flags.no_block);
- test_truth(memc_clone->flags.tcp_nodelay == memc->flags.tcp_nodelay);
- test_truth(memc_clone->flags.reuse_memory == memc->flags.reuse_memory);
- test_truth(memc_clone->flags.use_cache_lookups == memc->flags.use_cache_lookups);
- test_truth(memc_clone->flags.support_cas == memc->flags.support_cas);
- test_truth(memc_clone->flags.buffer_requests == memc->flags.buffer_requests);
- test_truth(memc_clone->flags.use_sort_hosts == memc->flags.use_sort_hosts);
- test_truth(memc_clone->flags.verify_key == memc->flags.verify_key);
- test_truth(memc_clone->flags.ketama_weighted == memc->flags.ketama_weighted);
- test_truth(memc_clone->flags.binary_protocol == memc->flags.binary_protocol);
- test_truth(memc_clone->flags.hash_with_prefix_key == memc->flags.hash_with_prefix_key);
- test_truth(memc_clone->flags.no_reply == memc->flags.no_reply);
- test_truth(memc_clone->flags.use_udp == memc->flags.use_udp);
- test_truth(memc_clone->flags.auto_eject_hosts == memc->flags.auto_eject_hosts);
- test_truth(memc_clone->flags.randomize_replica_read == memc->flags.randomize_replica_read);
- }
- test_truth(memc_clone->get_key_failure == memc->get_key_failure);
- test_truth(memc_clone->hash == memc->hash);
- test_truth(memc_clone->distribution_hash == memc->distribution_hash);
- test_truth(memc_clone->io_bytes_watermark == memc->io_bytes_watermark);
- test_truth(memc_clone->io_msg_watermark == memc->io_msg_watermark);
- test_truth(memc_clone->io_key_prefetch == memc->io_key_prefetch);
- test_truth(memc_clone->on_cleanup == memc->on_cleanup);
- test_truth(memc_clone->on_clone == memc->on_clone);
- test_truth(memc_clone->poll_timeout == memc->poll_timeout);
- test_truth(memc_clone->rcv_timeout == memc->rcv_timeout);
- test_truth(memc_clone->recv_size == memc->recv_size);
- test_truth(memc_clone->retry_timeout == memc->retry_timeout);
- test_truth(memc_clone->send_size == memc->send_size);
- test_truth(memc_clone->server_failure_limit == memc->server_failure_limit);
- test_truth(memc_clone->snd_timeout == memc->snd_timeout);
- test_truth(memc_clone->user_data == memc->user_data);
-
- memcached_free(memc_clone);
- }
-
- /* Can we init from struct? */
- {
- memcached_st declared_clone;
- memcached_st *memc_clone;
- memset(&declared_clone, 0 , sizeof(memcached_st));
- memc_clone= memcached_clone(&declared_clone, NULL);
- test_truth(memc_clone);
- memcached_free(memc_clone);
- }
-
- /* Can we init from struct? */
- {
- memcached_st declared_clone;
- memcached_st *memc_clone;
- memset(&declared_clone, 0 , sizeof(memcached_st));
- memc_clone= memcached_clone(&declared_clone, memc);
- test_truth(memc_clone);
- memcached_free(memc_clone);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t userdata_test(memcached_st *memc)
-{
- void* foo= NULL;
- test_truth(memcached_set_user_data(memc, foo) == NULL);
- test_truth(memcached_get_user_data(memc) == foo);
- test_truth(memcached_set_user_data(memc, NULL) == foo);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t connection_test(memcached_st *memc)
-{
- memcached_return_t rc;
-
- rc= memcached_server_add_with_weight(memc, "localhost", 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t error_test(memcached_st *memc)
-{
- memcached_return_t rc;
- uint32_t values[] = { 851992627U, 2337886783U, 3196981036U, 4001849190U,
- 982370485U, 1263635348U, 4242906218U, 3829656100U,
- 1891735253U, 334139633U, 2257084983U, 3088286104U,
- 13199785U, 2542027183U, 1097051614U, 199566778U,
- 2748246961U, 2465192557U, 1664094137U, 2405439045U,
- 1842224848U, 692413798U, 3479807801U, 919913813U,
- 4269430871U, 610793021U, 527273862U, 1437122909U,
- 2300930706U, 2943759320U, 674306647U, 2400528935U,
- 54481931U, 4186304426U, 1741088401U, 2979625118U,
- 4159057246U, 3425930182U, 2593724503U};
-
- // You have updated the memcache_error messages but not updated docs/tests.
- test_truth(MEMCACHED_MAXIMUM_RETURN == 39);
- for (rc= MEMCACHED_SUCCESS; rc < MEMCACHED_MAXIMUM_RETURN; rc++)
- {
- uint32_t hash_val;
- const char *msg= memcached_strerror(memc, rc);
- hash_val= memcached_generate_hash_value(msg, strlen(msg),
- MEMCACHED_HASH_JENKINS);
- test_truth(values[rc] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t set_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- const char *value= "when we sanitize";
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t append_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "fig";
- const char *in_value= "we";
- char *out_value= NULL;
- size_t value_length;
- uint32_t flags;
-
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_set(memc, key, strlen(key),
- in_value, strlen(in_value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_append(memc, key, strlen(key),
- " the", strlen(" the"),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_append(memc, key, strlen(key),
- " people", strlen(" people"),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- out_value= memcached_get(memc, key, strlen(key),
- &value_length, &flags, &rc);
- test_truth(!memcmp(out_value, "we the people", strlen("we the people")));
- test_truth(strlen("we the people") == value_length);
- test_truth(rc == MEMCACHED_SUCCESS);
- free(out_value);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t append_binary_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "numbers";
- unsigned int *store_ptr;
- unsigned int store_list[] = { 23, 56, 499, 98, 32847, 0 };
- char *value;
- size_t value_length;
- uint32_t flags;
- unsigned int x;
-
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_set(memc,
- key, strlen(key),
- NULL, 0,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- for (x= 0; store_list[x] ; x++)
- {
- rc= memcached_append(memc,
- key, strlen(key),
- (char *)&store_list[x], sizeof(unsigned int),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- value= memcached_get(memc, key, strlen(key),
- &value_length, &flags, &rc);
- test_truth((value_length == (sizeof(unsigned int) * x)));
- test_truth(rc == MEMCACHED_SUCCESS);
-
- store_ptr= (unsigned int *)value;
- x= 0;
- while ((size_t)store_ptr < (size_t)(value + value_length))
- {
- test_truth(*store_ptr == store_list[x++]);
- store_ptr++;
- }
- free(value);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t cas2_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
- const char *value= "we the people";
- size_t value_length= strlen("we the people");
- unsigned int x;
- memcached_result_st results_obj;
- memcached_result_st *results;
- unsigned int set= 1;
-
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, set);
-
- for (x= 0; x < 3; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- rc= memcached_mget(memc, keys, key_length, 3);
-
- results= memcached_result_create(memc, &results_obj);
-
- results= memcached_fetch_result(memc, &results_obj, &rc);
- test_truth(results);
- test_truth(results->cas);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcached_result_cas(results));
-
- test_truth(!memcmp(value, "we the people", strlen("we the people")));
- test_truth(strlen("we the people") == value_length);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- memcached_result_free(&results_obj);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t cas_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "fun";
- size_t key_length= strlen(key);
- const char *value= "we the people";
- const char* keys[2] = { key, NULL };
- size_t keylengths[2] = { strlen(key), 0 };
- size_t value_length= strlen(value);
- const char *value2= "change the value";
- size_t value2_length= strlen(value2);
-
- memcached_result_st results_obj;
- memcached_result_st *results;
- unsigned int set= 1;
-
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, set);
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_mget(memc, keys, keylengths, 1);
-
- results= memcached_result_create(memc, &results_obj);
-
- results= memcached_fetch_result(memc, &results_obj, &rc);
- test_truth(results);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcached_result_cas(results));
- test_truth(!memcmp(value, memcached_result_value(results), value_length));
- test_truth(strlen(memcached_result_value(results)) == value_length);
- test_truth(rc == MEMCACHED_SUCCESS);
- uint64_t cas = memcached_result_cas(results);
-
- #if 0
- results= memcached_fetch_result(memc, &results_obj, &rc);
- test_truth(rc == MEMCACHED_END);
- test_truth(results == NULL);
-#endif
-
- rc= memcached_cas(memc, key, key_length, value2, value2_length, 0, 0, cas);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- /*
- * The item will have a new cas value, so try to set it again with the old
- * value. This should fail!
- */
- rc= memcached_cas(memc, key, key_length, value2, value2_length, 0, 0, cas);
- test_truth(rc == MEMCACHED_DATA_EXISTS);
-
- memcached_result_free(&results_obj);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t prepend_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "fig";
- const char *value= "people";
- char *out_value= NULL;
- size_t value_length;
- uint32_t flags;
-
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_prepend(memc, key, strlen(key),
- "the ", strlen("the "),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_prepend(memc, key, strlen(key),
- "we ", strlen("we "),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- out_value= memcached_get(memc, key, strlen(key),
- &value_length, &flags, &rc);
- test_truth(!memcmp(out_value, "we the people", strlen("we the people")));
- test_truth(strlen("we the people") == value_length);
- test_truth(rc == MEMCACHED_SUCCESS);
- free(out_value);
-
- return TEST_SUCCESS;
-}
-
-/*
- Set the value, then quit to make sure it is flushed.
- Come back in and test that add fails.
-*/
-static test_return_t add_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- const char *value= "when we sanitize";
- unsigned long long setting_value;
-
- setting_value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NO_BLOCK);
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- memcached_quit(memc);
- rc= memcached_add(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
-
- /* Too many broken OS'es have broken loopback in async, so we can't be sure of the result */
- if (setting_value)
- {
- test_truth(rc == MEMCACHED_NOTSTORED || rc == MEMCACHED_STORED);
- }
- else
- {
- test_truth(rc == MEMCACHED_NOTSTORED || rc == MEMCACHED_DATA_EXISTS);
- }
-
- return TEST_SUCCESS;
-}
-
-/*
-** There was a problem of leaking filedescriptors in the initial release
-** of MacOSX 10.5. This test case triggers the problem. On some Solaris
-** systems it seems that the kernel is slow on reclaiming the resources
-** because the connects starts to time out (the test doesn't do much
-** anyway, so just loop 10 iterations)
-*/
-static test_return_t add_wrapper(memcached_st *memc)
-{
- unsigned int x;
- unsigned int max= 10000;
-#ifdef __sun
- max= 10;
-#endif
-#ifdef __APPLE__
- max= 10;
-#endif
-
- for (x= 0; x < max; x++)
- add_test(memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t replace_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- const char *value= "when we sanitize";
- const char *original= "first we insert some data";
-
- rc= memcached_set(memc, key, strlen(key),
- original, strlen(original),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- rc= memcached_replace(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t delete_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- const char *value= "when we sanitize";
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- rc= memcached_delete(memc, key, strlen(key), (time_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t flush_test(memcached_st *memc)
-{
- memcached_return_t rc;
-
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- return TEST_SUCCESS;
-}
-
-static memcached_return_t server_function(memcached_st *ptr __attribute__((unused)),
- memcached_server_st *server __attribute__((unused)),
- void *context __attribute__((unused)))
-{
- /* Do Nothing */
-
- return MEMCACHED_SUCCESS;
-}
-
-static test_return_t memcached_server_cursor_test(memcached_st *memc)
-{
- char context[8];
- strcpy(context, "foo bad");
- memcached_server_fn callbacks[1];
-
- callbacks[0]= server_function;
- memcached_server_cursor(memc, callbacks, context, 1);
- return TEST_SUCCESS;
-}
-
-static test_return_t bad_key_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo bad";
- char *string;
- size_t string_length;
- uint32_t flags;
- memcached_st *memc_clone;
- unsigned int set= 1;
- size_t max_keylen= 0xffff;
-
- // Just skip if we are in binary mode.
- if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL))
- return TEST_SKIPPED;
-
- memc_clone= memcached_clone(NULL, memc);
- test_truth(memc_clone);
-
- rc= memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_VERIFY_KEY, set);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- /* All keys are valid in the binary protocol (except for length) */
- if (memcached_behavior_get(memc_clone, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 0)
- {
- string= memcached_get(memc_clone, key, strlen(key),
- &string_length, &flags, &rc);
- test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
- test_truth(string_length == 0);
- test_truth(!string);
-
- set= 0;
- rc= memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_VERIFY_KEY, set);
- test_truth(rc == MEMCACHED_SUCCESS);
- string= memcached_get(memc_clone, key, strlen(key),
- &string_length, &flags, &rc);
- test_truth(rc == MEMCACHED_NOTFOUND);
- test_truth(string_length == 0);
- test_truth(!string);
-
- /* Test multi key for bad keys */
- const char *keys[] = { "GoodKey", "Bad Key", "NotMine" };
- size_t key_lengths[] = { 7, 7, 7 };
- set= 1;
- rc= memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_VERIFY_KEY, set);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_mget(memc_clone, keys, key_lengths, 3);
- test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
-
- rc= memcached_mget_by_key(memc_clone, "foo daddy", 9, keys, key_lengths, 1);
- test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
-
- max_keylen= 250;
-
- /* The following test should be moved to the end of this function when the
- memcached server is updated to allow max size length of the keys in the
- binary protocol
- */
- rc= memcached_callback_set(memc_clone, MEMCACHED_CALLBACK_PREFIX_KEY, NULL);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- char *longkey= malloc(max_keylen + 1);
- if (longkey != NULL)
- {
- memset(longkey, 'a', max_keylen + 1);
- string= memcached_get(memc_clone, longkey, max_keylen,
- &string_length, &flags, &rc);
- test_truth(rc == MEMCACHED_NOTFOUND);
- test_truth(string_length == 0);
- test_truth(!string);
-
- string= memcached_get(memc_clone, longkey, max_keylen + 1,
- &string_length, &flags, &rc);
- test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
- test_truth(string_length == 0);
- test_truth(!string);
-
- free(longkey);
- }
- }
-
- /* Make sure zero length keys are marked as bad */
- set= 1;
- rc= memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_VERIFY_KEY, set);
- test_truth(rc == MEMCACHED_SUCCESS);
- string= memcached_get(memc_clone, key, 0,
- &string_length, &flags, &rc);
- test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
- test_truth(string_length == 0);
- test_truth(!string);
-
- memcached_free(memc_clone);
-
- return TEST_SUCCESS;
-}
-
-#define READ_THROUGH_VALUE "set for me"
-static memcached_return_t read_through_trigger(memcached_st *memc __attribute__((unused)),
- char *key __attribute__((unused)),
- size_t key_length __attribute__((unused)),
- memcached_result_st *result)
-{
-
- return memcached_result_set_value(result, READ_THROUGH_VALUE, strlen(READ_THROUGH_VALUE));
-}
-
-static test_return_t read_through(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- char *string;
- size_t string_length;
- uint32_t flags;
- memcached_trigger_key_fn cb= (memcached_trigger_key_fn)read_through_trigger;
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_NOTFOUND);
- test_false(string_length);
- test_false(string);
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_GET_FAILURE,
- *(void **)&cb);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(string_length == strlen(READ_THROUGH_VALUE));
- test_strcmp(READ_THROUGH_VALUE, string);
- free(string);
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(string_length == strlen(READ_THROUGH_VALUE));
- test_truth(!strcmp(READ_THROUGH_VALUE, string));
- free(string);
-
- return TEST_SUCCESS;
-}
-
-static memcached_return_t delete_trigger(memcached_st *ptr __attribute__((unused)),
- const char *key,
- size_t key_length __attribute__((unused)))
-{
- assert(key);
-
- return MEMCACHED_SUCCESS;
-}
-
-static test_return_t delete_through(memcached_st *memc)
-{
- memcached_trigger_delete_key_fn callback;
- memcached_return_t rc;
-
- callback= (memcached_trigger_delete_key_fn)delete_trigger;
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_DELETE_TRIGGER, *(void**)&callback);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- char *string;
- size_t string_length;
- uint32_t flags;
-
- rc= memcached_delete(memc, key, strlen(key), (time_t)0);
- test_truth(rc == MEMCACHED_BUFFERED || rc == MEMCACHED_NOTFOUND);
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_NOTFOUND);
- test_false(string_length);
- test_false(string);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_test2(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- const char *value= "when we sanitize";
- char *string;
- size_t string_length;
- uint32_t flags;
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- test_truth(string);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(string_length == strlen(value));
- test_truth(!memcmp(string, value, string_length));
-
- free(string);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t set_test2(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- const char *value= "train in the brain";
- size_t value_length= strlen(value);
- unsigned int x;
-
- for (x= 0; x < 10; x++)
- {
- rc= memcached_set(memc, key, strlen(key),
- value, value_length,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t set_test3(memcached_st *memc)
-{
- memcached_return_t rc;
- char *value;
- size_t value_length= 8191;
- unsigned int x;
-
- value = (char*)malloc(value_length);
- test_truth(value);
-
- for (x= 0; x < value_length; x++)
- value[x] = (char) (x % 127);
-
- /* The dump test relies on there being at least 32 items in memcached */
- for (x= 0; x < 32; x++)
- {
- char key[16];
-
- sprintf(key, "foo%u", x);
-
- rc= memcached_set(memc, key, strlen(key),
- value, value_length,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- free(value);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_test3(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- char *value;
- size_t value_length= 8191;
- char *string;
- size_t string_length;
- uint32_t flags;
- uint32_t x;
-
- value = (char*)malloc(value_length);
- test_truth(value);
-
- for (x= 0; x < value_length; x++)
- value[x] = (char) (x % 127);
-
- rc= memcached_set(memc, key, strlen(key),
- value, value_length,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(string);
- test_truth(string_length == value_length);
- test_truth(!memcmp(string, value, string_length));
-
- free(string);
- free(value);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_test4(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- char *value;
- size_t value_length= 8191;
- char *string;
- size_t string_length;
- uint32_t flags;
- uint32_t x;
-
- value = (char*)malloc(value_length);
- test_truth(value);
-
- for (x= 0; x < value_length; x++)
- value[x] = (char) (x % 127);
-
- rc= memcached_set(memc, key, strlen(key),
- value, value_length,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- for (x= 0; x < 10; x++)
- {
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(string);
- test_truth(string_length == value_length);
- test_truth(!memcmp(string, value, string_length));
- free(string);
- }
-
- free(value);
-
- return TEST_SUCCESS;
-}
-
-/*
- * This test verifies that memcached_read_one_response doesn't try to
- * dereference a NIL-pointer if you issue a multi-get and don't read out all
- * responses before you execute a storage command.
- */
-static test_return_t get_test5(memcached_st *memc)
-{
- /*
- ** Request the same key twice, to ensure that we hash to the same server
- ** (so that we have multiple response values queued up) ;-)
- */
- const char *keys[]= { "key", "key" };
- size_t lengths[]= { 3, 3 };
- uint32_t flags;
- size_t rlen;
-
- memcached_return_t rc= memcached_set(memc, keys[0], lengths[0],
- keys[0], lengths[0], 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- rc= memcached_mget(memc, keys, lengths, 2);
-
- memcached_result_st results_obj;
- memcached_result_st *results;
- results=memcached_result_create(memc, &results_obj);
- test_truth(results);
- results=memcached_fetch_result(memc, &results_obj, &rc);
- test_truth(results);
- memcached_result_free(&results_obj);
-
- /* Don't read out the second result, but issue a set instead.. */
- rc= memcached_set(memc, keys[0], lengths[0], keys[0], lengths[0], 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- char *val= memcached_get_by_key(memc, keys[0], lengths[0], "yek", 3,
- &rlen, &flags, &rc);
- test_truth(val == NULL);
- test_truth(rc == MEMCACHED_NOTFOUND);
- val= memcached_get(memc, keys[0], lengths[0], &rlen, &flags, &rc);
- test_truth(val != NULL);
- test_truth(rc == MEMCACHED_SUCCESS);
- free(val);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_end(memcached_st *memc)
-{
- const char *keys[]= { "foo", "foo2" };
- size_t lengths[]= { 3, 4 };
- const char *values[]= { "fjord", "41" };
-
- memcached_return_t rc;
-
- // Set foo and foo2
- for (int i= 0; i < 2; i++)
- {
- rc= memcached_set(memc, keys[i], lengths[i], values[i], strlen(values[i]),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- char *string;
- size_t string_length;
- uint32_t flags;
-
- // retrieve both via mget
- rc= memcached_mget(memc, keys, lengths, 2);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- char key[MEMCACHED_MAX_KEY];
- size_t key_length;
-
- // this should get both
- for (int i = 0; i < 2; i++)
- {
- string= memcached_fetch(memc, key, &key_length, &string_length,
- &flags, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- int val = 0;
- if (key_length == 4)
- val= 1;
- test_truth(string_length == strlen(values[val]));
- test_truth(strncmp(values[val], string, string_length) == 0);
- free(string);
- }
-
- // this should indicate end
- string= memcached_fetch(memc, key, &key_length, &string_length, &flags, &rc);
- test_truth(rc == MEMCACHED_END);
-
- // now get just one
- rc= memcached_mget(memc, keys, lengths, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- string= memcached_fetch(memc, key, &key_length, &string_length, &flags, &rc);
- test_truth(key_length == lengths[0]);
- test_truth(strncmp(keys[0], key, key_length) == 0);
- test_truth(string_length == strlen(values[0]));
- test_truth(strncmp(values[0], string, string_length) == 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- free(string);
-
- // this should indicate end
- string= memcached_fetch(memc, key, &key_length, &string_length, &flags, &rc);
- test_truth(rc == MEMCACHED_END);
-
- return TEST_SUCCESS;
-}
-
-/* Do not copy the style of this code, I just access hosts to testthis function */
-static test_return_t stats_servername_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_stat_st memc_stat;
- rc= memcached_stat_servername(&memc_stat, NULL,
- memc->hosts[0].hostname,
- memc->hosts[0].port);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t increment_test(memcached_st *memc)
-{
- uint64_t new_number;
- memcached_return_t rc;
- const char *key= "number";
- const char *value= "0";
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- rc= memcached_increment(memc, key, strlen(key),
- 1, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == 1);
-
- rc= memcached_increment(memc, key, strlen(key),
- 1, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == 2);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t increment_with_initial_test(memcached_st *memc)
-{
- if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
- {
- uint64_t new_number;
- memcached_return_t rc;
- const char *key= "number";
- uint64_t initial= 0;
-
- rc= memcached_increment_with_initial(memc, key, strlen(key),
- 1, initial, 0, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == initial);
-
- rc= memcached_increment_with_initial(memc, key, strlen(key),
- 1, initial, 0, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == (initial + 1));
- }
- return TEST_SUCCESS;
-}
-
-static test_return_t decrement_test(memcached_st *memc)
-{
- uint64_t new_number;
- memcached_return_t rc;
- const char *key= "number";
- const char *value= "3";
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- rc= memcached_decrement(memc, key, strlen(key),
- 1, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == 2);
-
- rc= memcached_decrement(memc, key, strlen(key),
- 1, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == 1);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t decrement_with_initial_test(memcached_st *memc)
-{
- if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
- {
- uint64_t new_number;
- memcached_return_t rc;
- const char *key= "number";
- uint64_t initial= 3;
-
- rc= memcached_decrement_with_initial(memc, key, strlen(key),
- 1, initial, 0, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == initial);
-
- rc= memcached_decrement_with_initial(memc, key, strlen(key),
- 1, initial, 0, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == (initial - 1));
- }
- return TEST_SUCCESS;
-}
-
-static test_return_t increment_by_key_test(memcached_st *memc)
-{
- uint64_t new_number;
- memcached_return_t rc;
- const char *master_key= "foo";
- const char *key= "number";
- const char *value= "0";
-
- rc= memcached_set_by_key(memc, master_key, strlen(master_key),
- key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- rc= memcached_increment_by_key(memc, master_key, strlen(master_key), key, strlen(key),
- 1, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == 1);
-
- rc= memcached_increment_by_key(memc, master_key, strlen(master_key), key, strlen(key),
- 1, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == 2);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t increment_with_initial_by_key_test(memcached_st *memc)
-{
- if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
- {
- uint64_t new_number;
- memcached_return_t rc;
- const char *master_key= "foo";
- const char *key= "number";
- uint64_t initial= 0;
-
- rc= memcached_increment_with_initial_by_key(memc, master_key, strlen(master_key),
- key, strlen(key),
- 1, initial, 0, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == initial);
-
- rc= memcached_increment_with_initial_by_key(memc, master_key, strlen(master_key),
- key, strlen(key),
- 1, initial, 0, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == (initial + 1));
- }
- return TEST_SUCCESS;
-}
-
-static test_return_t decrement_by_key_test(memcached_st *memc)
-{
- uint64_t new_number;
- memcached_return_t rc;
- const char *master_key= "foo";
- const char *key= "number";
- const char *value= "3";
-
- rc= memcached_set_by_key(memc, master_key, strlen(master_key),
- key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- rc= memcached_decrement_by_key(memc, master_key, strlen(master_key),
- key, strlen(key),
- 1, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == 2);
-
- rc= memcached_decrement_by_key(memc, master_key, strlen(master_key),
- key, strlen(key),
- 1, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == 1);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t decrement_with_initial_by_key_test(memcached_st *memc)
-{
- if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
- {
- uint64_t new_number;
- memcached_return_t rc;
- const char *master_key= "foo";
- const char *key= "number";
- uint64_t initial= 3;
-
- rc= memcached_decrement_with_initial_by_key(memc, master_key, strlen(master_key),
- key, strlen(key),
- 1, initial, 0, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == initial);
-
- rc= memcached_decrement_with_initial_by_key(memc, master_key, strlen(master_key),
- key, strlen(key),
- 1, initial, 0, &new_number);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(new_number == (initial - 1));
- }
- return TEST_SUCCESS;
-}
-
-static test_return_t quit_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "fudge";
- const char *value= "sanford and sun";
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)10, (uint32_t)3);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- memcached_quit(memc);
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)50, (uint32_t)9);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_result_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
- unsigned int x;
-
- memcached_result_st results_obj;
- memcached_result_st *results;
-
- results= memcached_result_create(memc, &results_obj);
- test_truth(results);
- test_truth(&results_obj == results);
-
- /* We need to empty the server before continueing test */
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- while ((results= memcached_fetch_result(memc, &results_obj, &rc)) != NULL)
- {
- test_truth(results);
- }
-
- while ((results= memcached_fetch_result(memc, &results_obj, &rc)) != NULL)
- test_truth(!results);
- test_truth(rc == MEMCACHED_END);
-
- for (x= 0; x < 3; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- while ((results= memcached_fetch_result(memc, &results_obj, &rc)))
- {
- test_truth(results);
- test_truth(&results_obj == results);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcached_result_key_length(results) == memcached_result_length(results));
- test_truth(!memcmp(memcached_result_key_value(results),
- memcached_result_value(results),
- memcached_result_length(results)));
- }
-
- memcached_result_free(&results_obj);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_result_alloc_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
- unsigned int x;
-
- memcached_result_st *results;
-
- /* We need to empty the server before continueing test */
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- while ((results= memcached_fetch_result(memc, NULL, &rc)) != NULL)
- {
- test_truth(results);
- }
- test_truth(!results);
- test_truth(rc == MEMCACHED_END);
-
- for (x= 0; x < 3; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- x= 0;
- while ((results= memcached_fetch_result(memc, NULL, &rc)))
- {
- test_truth(results);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcached_result_key_length(results) == memcached_result_length(results));
- test_truth(!memcmp(memcached_result_key_value(results),
- memcached_result_value(results),
- memcached_result_length(results)));
- memcached_result_free(results);
- x++;
- }
-
- return TEST_SUCCESS;
-}
-
-/* Count the results */
-static memcached_return_t callback_counter(memcached_st *ptr __attribute__((unused)),
- memcached_result_st *result __attribute__((unused)),
- void *context)
-{
- unsigned int *counter= (unsigned int *)context;
-
- *counter= *counter + 1;
-
- return MEMCACHED_SUCCESS;
-}
-
-static test_return_t mget_result_function(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
- unsigned int x;
- unsigned int counter;
- memcached_execute_fn callbacks[1];
-
- /* We need to empty the server before continueing test */
- rc= memcached_flush(memc, 0);
- for (x= 0; x < 3; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- callbacks[0]= &callback_counter;
- counter= 0;
- rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
-
- test_truth(counter == 3);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
- unsigned int x;
- uint32_t flags;
-
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *return_value;
- size_t return_value_length;
-
- /* We need to empty the server before continueing test */
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)) != NULL)
- {
- test_truth(return_value);
- }
- test_truth(!return_value);
- test_truth(return_value_length == 0);
- test_truth(rc == MEMCACHED_END);
-
- for (x= 0; x < 3; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- x= 0;
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)))
- {
- test_truth(return_value);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(return_key_length == return_value_length);
- test_truth(!memcmp(return_value, return_key, return_value_length));
- free(return_value);
- x++;
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_execute(memcached_st *memc)
-{
- bool binary= false;
- if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
- binary= true;
-
- /*
- * I only want to hit _one_ server so I know the number of requests I'm
- * sending in the pipeline.
- */
- uint32_t number_of_hosts= memc->number_of_hosts;
- memc->number_of_hosts= 1;
-
- int max_keys= binary ? 20480 : 1;
-
-
- char **keys= calloc((size_t)max_keys, sizeof(char*));
- size_t *key_length=calloc((size_t)max_keys, sizeof(size_t));
-
- /* First add all of the items.. */
- char blob[1024] = {0};
- memcached_return_t rc;
- for (int x= 0; x < max_keys; ++x)
- {
- char k[251];
- key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%u", x);
- keys[x]= strdup(k);
- test_truth(keys[x] != NULL);
- rc= memcached_add(memc, keys[x], key_length[x], blob, sizeof(blob), 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- /* Try to get all of them with a large multiget */
- unsigned int counter= 0;
- memcached_execute_fn callbacks[1]= { [0]= &callback_counter };
- rc= memcached_mget_execute(memc, (const char**)keys, key_length,
- (size_t)max_keys, callbacks, &counter, 1);
-
- if (binary)
- {
- test_truth(rc == MEMCACHED_SUCCESS);
-
- rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
- test_truth(rc == MEMCACHED_END);
-
- /* Verify that we got all of the items */
- test_truth(counter == (unsigned int)max_keys);
- }
- else
- {
- test_truth(rc == MEMCACHED_NOT_SUPPORTED);
- test_truth(counter == 0);
- }
-
- /* Release all allocated resources */
- for (int x= 0; x < max_keys; ++x)
- free(keys[x]);
- free(keys);
- free(key_length);
-
- memc->number_of_hosts= number_of_hosts;
- return TEST_SUCCESS;
-}
-
-static test_return_t get_stats_keys(memcached_st *memc)
-{
- char **stat_list;
- char **ptr;
- memcached_stat_st memc_stat;
- memcached_return_t rc;
-
- stat_list= memcached_stat_get_keys(memc, &memc_stat, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- for (ptr= stat_list; *ptr; ptr++)
- test_truth(*ptr);
-
- free(stat_list);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t version_string_test(memcached_st *memc __attribute__((unused)))
-{
- const char *version_string;
-
- version_string= memcached_lib_version();
-
- test_truth(!strcmp(version_string, LIBMEMCACHED_VERSION_STRING));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_stats(memcached_st *memc)
-{
- unsigned int x;
- char **stat_list;
- char **ptr;
- memcached_return_t rc;
- memcached_stat_st *memc_stat;
-
- memc_stat= memcached_stat(memc, NULL, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memc_stat);
-
- for (x= 0; x < memcached_server_count(memc); x++)
- {
- stat_list= memcached_stat_get_keys(memc, memc_stat+x, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- for (ptr= stat_list; *ptr; ptr++);
-
- free(stat_list);
- }
-
- memcached_stat_free(NULL, memc_stat);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t add_host_test(memcached_st *memc)
-{
- unsigned int x;
- memcached_server_st *servers;
- memcached_return_t rc;
- char servername[]= "0.example.com";
-
- servers= memcached_server_list_append_with_weight(NULL, servername, 400, 0, &rc);
- test_truth(servers);
- test_truth(1 == memcached_server_list_count(servers));
-
- for (x= 2; x < 20; x++)
- {
- char buffer[SMALL_STRING_LEN];
-
- snprintf(buffer, SMALL_STRING_LEN, "%u.example.com", 400+x);
- servers= memcached_server_list_append_with_weight(servers, buffer, 401, 0,
- &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(x == memcached_server_list_count(servers));
- }
-
- rc= memcached_server_push(memc, servers);
- test_truth(rc == MEMCACHED_SUCCESS);
- rc= memcached_server_push(memc, servers);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- memcached_server_list_free(servers);
-
- return TEST_SUCCESS;
-}
-
-static memcached_return_t clone_test_callback(memcached_st *parent __attribute__((unused)), memcached_st *memc_clone __attribute__((unused)))
-{
- return MEMCACHED_SUCCESS;
-}
-
-static memcached_return_t cleanup_test_callback(memcached_st *ptr __attribute__((unused)))
-{
- return MEMCACHED_SUCCESS;
-}
-
-static test_return_t callback_test(memcached_st *memc)
-{
- /* Test User Data */
- {
- int x= 5;
- int *test_ptr;
- memcached_return_t rc;
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_USER_DATA, &x);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_ptr= (int *)memcached_callback_get(memc, MEMCACHED_CALLBACK_USER_DATA, &rc);
- test_truth(*test_ptr == x);
- }
-
- /* Test Clone Callback */
- {
- memcached_clone_fn clone_cb= (memcached_clone_fn)clone_test_callback;
- void *clone_cb_ptr= *(void **)&clone_cb;
- void *temp_function= NULL;
- memcached_return_t rc;
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION,
- clone_cb_ptr);
- test_truth(rc == MEMCACHED_SUCCESS);
- temp_function= memcached_callback_get(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION, &rc);
- test_truth(temp_function == clone_cb_ptr);
- }
-
- /* Test Cleanup Callback */
- {
- memcached_cleanup_fn cleanup_cb=
- (memcached_cleanup_fn)cleanup_test_callback;
- void *cleanup_cb_ptr= *(void **)&cleanup_cb;
- void *temp_function= NULL;
- memcached_return_t rc;
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION,
- cleanup_cb_ptr);
- test_truth(rc == MEMCACHED_SUCCESS);
- temp_function= memcached_callback_get(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION, &rc);
- test_truth(temp_function == cleanup_cb_ptr);
- }
-
- return TEST_SUCCESS;
-}
-
-/* We don't test the behavior itself, we test the switches */
-static test_return_t behavior_test(memcached_st *memc)
-{
- uint64_t value;
- uint32_t set= 1;
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, set);
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NO_BLOCK);
- test_truth(value == 1);
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, set);
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY);
- test_truth(value == 1);
-
- set= MEMCACHED_HASH_MD5;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, set);
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
- test_truth(value == MEMCACHED_HASH_MD5);
-
- set= 0;
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, set);
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NO_BLOCK);
- test_truth(value == 0);
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, set);
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY);
- test_truth(value == 0);
-
- set= MEMCACHED_HASH_DEFAULT;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, set);
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
- test_truth(value == MEMCACHED_HASH_DEFAULT);
-
- set= MEMCACHED_HASH_CRC;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, set);
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
- test_truth(value == MEMCACHED_HASH_CRC);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE);
- test_truth(value > 0);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE);
- test_truth(value > 0);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, value + 1);
- test_truth((value + 1) == memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fetch_all_results(memcached_st *memc)
-{
- memcached_return_t rc= MEMCACHED_SUCCESS;
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *return_value;
- size_t return_value_length;
- uint32_t flags;
-
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)))
- {
- test_truth(return_value);
- test_truth(rc == MEMCACHED_SUCCESS);
- free(return_value);
- }
-
- return ((rc == MEMCACHED_END) || (rc == MEMCACHED_SUCCESS)) ? TEST_SUCCESS : TEST_FAILURE;
-}
-
-/* Test case provided by Cal Haldenbrand */
-static test_return_t user_supplied_bug1(memcached_st *memc)
-{
- unsigned int setter= 1;
- unsigned int x;
-
- unsigned long long total= 0;
- uint32_t size= 0;
- char key[10];
- char randomstuff[6 * 1024];
- memcached_return_t rc;
-
- memset(randomstuff, 0, 6 * 1024);
-
- /* We just keep looking at the same values over and over */
- srandom(10);
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, setter);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, setter);
-
-
- /* add key */
- for (x= 0 ; total < 20 * 1024576 ; x++ )
- {
- unsigned int j= 0;
-
- size= (uint32_t)(rand() % ( 5 * 1024 ) ) + 400;
- memset(randomstuff, 0, 6 * 1024);
- test_truth(size < 6 * 1024); /* Being safe here */
-
- for (j= 0 ; j < size ;j++)
- randomstuff[j] = (signed char) ((rand() % 26) + 97);
-
- total += size;
- sprintf(key, "%d", x);
- rc = memcached_set(memc, key, strlen(key),
- randomstuff, strlen(randomstuff), 10, 0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- /* If we fail, lets try again */
- if (rc != MEMCACHED_SUCCESS && rc != MEMCACHED_BUFFERED)
- rc = memcached_set(memc, key, strlen(key),
- randomstuff, strlen(randomstuff), 10, 0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- return TEST_SUCCESS;
-}
-
-/* Test case provided by Cal Haldenbrand */
-static test_return_t user_supplied_bug2(memcached_st *memc)
-{
- int errors;
- unsigned int setter;
- unsigned int x;
- unsigned long long total;
-
- setter= 1;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, setter);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, setter);
-#ifdef NOT_YET
- setter = 20 * 1024576;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE, setter);
- setter = 20 * 1024576;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE, setter);
- getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE);
- getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE);
-
- for (x= 0, errors= 0, total= 0 ; total < 20 * 1024576 ; x++)
-#endif
-
- for (x= 0, errors= 0, total= 0 ; total < 24576 ; x++)
- {
- memcached_return_t rc= MEMCACHED_SUCCESS;
- char buffer[SMALL_STRING_LEN];
- uint32_t flags= 0;
- size_t val_len= 0;
- char *getval;
-
- memset(buffer, 0, SMALL_STRING_LEN);
-
- snprintf(buffer, SMALL_STRING_LEN, "%u", x);
- getval= memcached_get(memc, buffer, strlen(buffer),
- &val_len, &flags, &rc);
- if (rc != MEMCACHED_SUCCESS)
- {
- if (rc == MEMCACHED_NOTFOUND)
- errors++;
- else
- {
- test_truth(rc);
- }
-
- continue;
- }
- total+= val_len;
- errors= 0;
- free(getval);
- }
-
- return TEST_SUCCESS;
-}
-
-/* Do a large mget() over all the keys we think exist */
-#define KEY_COUNT 3000 // * 1024576
-static test_return_t user_supplied_bug3(memcached_st *memc)
-{
- memcached_return_t rc;
- unsigned int setter;
- unsigned int x;
- char **keys;
- size_t key_lengths[KEY_COUNT];
-
- setter= 1;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, setter);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, setter);
-#ifdef NOT_YET
- setter = 20 * 1024576;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE, setter);
- setter = 20 * 1024576;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE, setter);
- getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE);
- getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE);
-#endif
-
- keys= calloc(KEY_COUNT, sizeof(char *));
- test_truth(keys);
- for (x= 0; x < KEY_COUNT; x++)
- {
- char buffer[30];
-
- snprintf(buffer, 30, "%u", x);
- keys[x]= strdup(buffer);
- key_lengths[x]= strlen(keys[x]);
- }
-
- rc= memcached_mget(memc, (const char **)keys, key_lengths, KEY_COUNT);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- test_truth(fetch_all_results(memc) == TEST_SUCCESS);
-
- for (x= 0; x < KEY_COUNT; x++)
- free(keys[x]);
- free(keys);
-
- return TEST_SUCCESS;
-}
-
-/* Make sure we behave properly if server list has no values */
-static test_return_t user_supplied_bug4(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
- unsigned int x;
- uint32_t flags;
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *return_value;
- size_t return_value_length;
-
- /* Here we free everything before running a bunch of mget tests */
- memcached_servers_reset(memc);
-
-
- /* We need to empty the server before continueing test */
- rc= memcached_flush(memc, 0);
- test_truth(rc == MEMCACHED_NO_SERVERS);
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_NO_SERVERS);
-
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)) != NULL)
- {
- test_truth(return_value);
- }
- test_truth(!return_value);
- test_truth(return_value_length == 0);
- test_truth(rc == MEMCACHED_NO_SERVERS);
-
- for (x= 0; x < 3; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_truth(rc == MEMCACHED_NO_SERVERS);
- }
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_NO_SERVERS);
-
- x= 0;
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)))
- {
- test_truth(return_value);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(return_key_length == return_value_length);
- test_truth(!memcmp(return_value, return_key, return_value_length));
- free(return_value);
- x++;
- }
-
- return TEST_SUCCESS;
-}
-
-#define VALUE_SIZE_BUG5 1048064
-static test_return_t user_supplied_bug5(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"036790384900", "036790384902", "036790384904", "036790384906"};
- size_t key_length[]= {strlen("036790384900"), strlen("036790384902"), strlen("036790384904"), strlen("036790384906")};
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *value;
- size_t value_length;
- uint32_t flags;
- unsigned int count;
- unsigned int x;
- char insert_data[VALUE_SIZE_BUG5];
-
- for (x= 0; x < VALUE_SIZE_BUG5; x++)
- insert_data[x]= (signed char)rand();
-
- memcached_flush(memc, 0);
- value= memcached_get(memc, keys[0], key_length[0],
- &value_length, &flags, &rc);
- test_truth(value == NULL);
- rc= memcached_mget(memc, keys, key_length, 4);
-
- count= 0;
- while ((value= memcached_fetch(memc, return_key, &return_key_length,
- &value_length, &flags, &rc)))
- count++;
- test_truth(count == 0);
-
- for (x= 0; x < 4; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- insert_data, VALUE_SIZE_BUG5,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- for (x= 0; x < 10; x++)
- {
- value= memcached_get(memc, keys[0], key_length[0],
- &value_length, &flags, &rc);
- test_truth(value);
- free(value);
-
- rc= memcached_mget(memc, keys, key_length, 4);
- count= 0;
- while ((value= memcached_fetch(memc, return_key, &return_key_length,
- &value_length, &flags, &rc)))
- {
- count++;
- free(value);
- }
- test_truth(count == 4);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t user_supplied_bug6(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"036790384900", "036790384902", "036790384904", "036790384906"};
- size_t key_length[]= {strlen("036790384900"), strlen("036790384902"), strlen("036790384904"), strlen("036790384906")};
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *value;
- size_t value_length;
- uint32_t flags;
- unsigned int count;
- unsigned int x;
- char insert_data[VALUE_SIZE_BUG5];
-
- for (x= 0; x < VALUE_SIZE_BUG5; x++)
- insert_data[x]= (signed char)rand();
-
- memcached_flush(memc, 0);
- value= memcached_get(memc, keys[0], key_length[0],
- &value_length, &flags, &rc);
- test_truth(value == NULL);
- test_truth(rc == MEMCACHED_NOTFOUND);
- rc= memcached_mget(memc, keys, key_length, 4);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- count= 0;
- while ((value= memcached_fetch(memc, return_key, &return_key_length,
- &value_length, &flags, &rc)))
- count++;
- test_truth(count == 0);
- test_truth(rc == MEMCACHED_END);
-
- for (x= 0; x < 4; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- insert_data, VALUE_SIZE_BUG5,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- for (x= 0; x < 2; x++)
- {
- value= memcached_get(memc, keys[0], key_length[0],
- &value_length, &flags, &rc);
- test_truth(value);
- free(value);
-
- rc= memcached_mget(memc, keys, key_length, 4);
- test_truth(rc == MEMCACHED_SUCCESS);
- count= 3;
- /* We test for purge of partial complete fetches */
- for (count= 3; count; count--)
- {
- value= memcached_fetch(memc, return_key, &return_key_length,
- &value_length, &flags, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(!(memcmp(value, insert_data, value_length)));
- test_truth(value_length);
- free(value);
- }
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t user_supplied_bug8(memcached_st *memc __attribute__((unused)))
-{
- memcached_return_t rc;
- memcached_st *mine;
- memcached_st *memc_clone;
-
- memcached_server_st *servers;
- const char *server_list= "memcache1.memcache.bk.sapo.pt:11211, memcache1.memcache.bk.sapo.pt:11212, memcache1.memcache.bk.sapo.pt:11213, memcache1.memcache.bk.sapo.pt:11214, memcache2.memcache.bk.sapo.pt:11211, memcache2.memcache.bk.sapo.pt:11212, memcache2.memcache.bk.sapo.pt:11213, memcache2.memcache.bk.sapo.pt:11214";
-
- servers= memcached_servers_parse(server_list);
- test_truth(servers);
-
- mine= memcached_create(NULL);
- rc= memcached_server_push(mine, servers);
- test_truth(rc == MEMCACHED_SUCCESS);
- memcached_server_list_free(servers);
-
- test_truth(mine);
- memc_clone= memcached_clone(NULL, mine);
-
- memcached_quit(mine);
- memcached_quit(memc_clone);
-
-
- memcached_free(mine);
- memcached_free(memc_clone);
-
- return TEST_SUCCESS;
-}
-
-/* Test flag store/retrieve */
-static test_return_t user_supplied_bug7(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys= "036790384900";
- size_t key_length= strlen(keys);
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *value;
- size_t value_length;
- uint32_t flags;
- unsigned int x;
- char insert_data[VALUE_SIZE_BUG5];
-
- for (x= 0; x < VALUE_SIZE_BUG5; x++)
- insert_data[x]= (signed char)rand();
-
- memcached_flush(memc, 0);
-
- flags= 245;
- rc= memcached_set(memc, keys, key_length,
- insert_data, VALUE_SIZE_BUG5,
- (time_t)0, flags);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- flags= 0;
- value= memcached_get(memc, keys, key_length,
- &value_length, &flags, &rc);
- test_truth(flags == 245);
- test_truth(value);
- free(value);
-
- rc= memcached_mget(memc, &keys, &key_length, 1);
-
- flags= 0;
- value= memcached_fetch(memc, return_key, &return_key_length,
- &value_length, &flags, &rc);
- test_truth(flags == 245);
- test_truth(value);
- free(value);
-
-
- return TEST_SUCCESS;
-}
-
-static test_return_t user_supplied_bug9(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *keys[]= {"UDATA:edevil@sapo.pt", "fudge&*@#", "for^#@&$not"};
- size_t key_length[3];
- unsigned int x;
- uint32_t flags;
- unsigned count= 0;
-
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *return_value;
- size_t return_value_length;
-
-
- key_length[0]= strlen("UDATA:edevil@sapo.pt");
- key_length[1]= strlen("fudge&*@#");
- key_length[2]= strlen("for^#@&$not");
-
-
- for (x= 0; x < 3; x++)
- {
- rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- rc= memcached_mget(memc, keys, key_length, 3);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- /* We need to empty the server before continueing test */
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)) != NULL)
- {
- test_truth(return_value);
- free(return_value);
- count++;
- }
- test_truth(count == 3);
-
- return TEST_SUCCESS;
-}
-
-/* We are testing with aggressive timeout to get failures */
-static test_return_t user_supplied_bug10(memcached_st *memc)
-{
- const char *key= "foo";
- char *value;
- size_t value_length= 512;
- unsigned int x;
- size_t key_len= 3;
- memcached_return_t rc;
- unsigned int set= 1;
- memcached_st *mclone= memcached_clone(NULL, memc);
- int32_t timeout;
-
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_NO_BLOCK, set);
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_TCP_NODELAY, set);
- timeout= 2;
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT,
- (uint64_t)timeout);
-
- value = (char*)malloc(value_length * sizeof(char));
-
- for (x= 0; x < value_length; x++)
- value[x]= (char) (x % 127);
-
- for (x= 1; x <= 100000; ++x)
- {
- rc= memcached_set(mclone, key, key_len,value, value_length, 0, 0);
-
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_WRITE_FAILURE ||
- rc == MEMCACHED_BUFFERED || rc == MEMCACHED_TIMEOUT);
-
- if (rc == MEMCACHED_WRITE_FAILURE || rc == MEMCACHED_TIMEOUT)
- x--;
- }
-
- free(value);
- memcached_free(mclone);
-
- return TEST_SUCCESS;
-}
-
-/*
- We are looking failures in the async protocol
-*/
-static test_return_t user_supplied_bug11(memcached_st *memc)
-{
- const char *key= "foo";
- char *value;
- size_t value_length= 512;
- unsigned int x;
- size_t key_len= 3;
- memcached_return_t rc;
- unsigned int set= 1;
- int32_t timeout;
- memcached_st *mclone= memcached_clone(NULL, memc);
-
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_NO_BLOCK, set);
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_TCP_NODELAY, set);
- timeout= -1;
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT,
- (size_t)timeout);
-
- timeout= (int32_t)memcached_behavior_get(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT);
-
- test_truth(timeout == -1);
-
- value = (char*)malloc(value_length * sizeof(char));
-
- for (x= 0; x < value_length; x++)
- value[x]= (char) (x % 127);
-
- for (x= 1; x <= 100000; ++x)
- {
- rc= memcached_set(mclone, key, key_len,value, value_length, 0, 0);
- }
-
- free(value);
- memcached_free(mclone);
-
- return TEST_SUCCESS;
-}
-
-/*
- Bug found where incr was not returning MEMCACHED_NOTFOUND when object did not exist.
-*/
-static test_return_t user_supplied_bug12(memcached_st *memc)
-{
- memcached_return_t rc;
- uint32_t flags;
- size_t value_length;
- char *value;
- uint64_t number_value;
-
- value= memcached_get(memc, "autoincrement", strlen("autoincrement"),
- &value_length, &flags, &rc);
- test_truth(value == NULL);
- test_truth(rc == MEMCACHED_NOTFOUND);
-
- rc= memcached_increment(memc, "autoincrement", strlen("autoincrement"),
- 1, &number_value);
-
- test_truth(value == NULL);
- /* The binary protocol will set the key if it doesn't exist */
- if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 1)
- {
- test_truth(rc == MEMCACHED_SUCCESS);
- }
- else
- {
- test_truth(rc == MEMCACHED_NOTFOUND);
- }
-
- rc= memcached_set(memc, "autoincrement", strlen("autoincrement"), "1", 1, 0, 0);
-
- value= memcached_get(memc, "autoincrement", strlen("autoincrement"),
- &value_length, &flags, &rc);
- test_truth(value);
- test_truth(rc == MEMCACHED_SUCCESS);
- free(value);
-
- rc= memcached_increment(memc, "autoincrement", strlen("autoincrement"),
- 1, &number_value);
- test_truth(number_value == 2);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- return TEST_SUCCESS;
-}
-
-/*
- Bug found where command total one more than MEMCACHED_MAX_BUFFER
- set key34567890 0 0 8169 \r\n is sent followed by buffer of size 8169, followed by 8169
- */
-static test_return_t user_supplied_bug13(memcached_st *memc)
-{
- char key[] = "key34567890";
- char *overflow;
- memcached_return_t rc;
- size_t overflowSize;
-
- char commandFirst[]= "set key34567890 0 0 ";
- char commandLast[] = " \r\n"; /* first line of command sent to server */
- size_t commandLength;
- size_t testSize;
-
- commandLength = strlen(commandFirst) + strlen(commandLast) + 4; /* 4 is number of characters in size, probably 8196 */
-
- overflowSize = MEMCACHED_MAX_BUFFER - commandLength;
-
- for (testSize= overflowSize - 1; testSize < overflowSize + 1; testSize++)
- {
- overflow= malloc(testSize);
- test_truth(overflow != NULL);
-
- memset(overflow, 'x', testSize);
- rc= memcached_set(memc, key, strlen(key),
- overflow, testSize, 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- free(overflow);
- }
-
- return TEST_SUCCESS;
-}
-
-
-/*
- Test values of many different sizes
- Bug found where command total one more than MEMCACHED_MAX_BUFFER
- set key34567890 0 0 8169 \r\n
- is sent followed by buffer of size 8169, followed by 8169
- */
-static test_return_t user_supplied_bug14(memcached_st *memc)
-{
- size_t setter= 1;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, setter);
- memcached_return_t rc;
- const char *key= "foo";
- char *value;
- size_t value_length= 18000;
- char *string;
- size_t string_length;
- uint32_t flags;
- unsigned int x;
- size_t current_length;
-
- value = (char*)malloc(value_length);
- test_truth(value);
-
- for (x= 0; x < value_length; x++)
- value[x] = (char) (x % 127);
-
- for (current_length= 0; current_length < value_length; current_length++)
- {
- rc= memcached_set(memc, key, strlen(key),
- value, current_length,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(string_length == current_length);
- test_truth(!memcmp(string, value, string_length));
-
- free(string);
- }
-
- free(value);
-
- return TEST_SUCCESS;
-}
-
-/*
- Look for zero length value problems
- */
-static test_return_t user_supplied_bug15(memcached_st *memc)
-{
- uint32_t x;
- memcached_return_t rc;
- const char *key= "mykey";
- char *value;
- size_t length;
- uint32_t flags;
-
- for (x= 0; x < 2; x++)
- {
- rc= memcached_set(memc, key, strlen(key),
- NULL, 0,
- (time_t)0, (uint32_t)0);
-
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_get(memc, key, strlen(key),
- &length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(value == NULL);
- test_truth(length == 0);
- test_truth(flags == 0);
-
- value= memcached_get(memc, key, strlen(key),
- &length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(value == NULL);
- test_truth(length == 0);
- test_truth(flags == 0);
- }
-
- return TEST_SUCCESS;
-}
-
-/* Check the return sizes on FLAGS to make sure it stores 32bit unsigned values correctly */
-static test_return_t user_supplied_bug16(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "mykey";
- char *value;
- size_t length;
- uint32_t flags;
-
- rc= memcached_set(memc, key, strlen(key),
- NULL, 0,
- (time_t)0, UINT32_MAX);
-
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_get(memc, key, strlen(key),
- &length, &flags, &rc);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(value == NULL);
- test_truth(length == 0);
- test_truth(flags == UINT32_MAX);
-
- return TEST_SUCCESS;
-}
-
-#ifndef __sun
-/* Check the validity of chinese key*/
-static test_return_t user_supplied_bug17(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "豆瓣";
- const char *value="我们在炎热抑郁的夏天无法停止豆瓣";
- char *value2;
- size_t length;
- uint32_t flags;
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, 0);
-
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value2= memcached_get(memc, key, strlen(key),
- &length, &flags, &rc);
-
- test_truth(length==strlen(value));
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcmp(value, value2, length)==0);
- free(value2);
-
- return TEST_SUCCESS;
-}
-#endif
-
-/*
- From Andrei on IRC
-*/
-
-static test_return_t user_supplied_bug19(memcached_st *memc)
-{
- memcached_st *m;
- memcached_server_st *s;
- memcached_return_t res;
-
- (void)memc;
-
- m= memcached_create(NULL);
- memcached_server_add_with_weight(m, "localhost", 11311, 100);
- memcached_server_add_with_weight(m, "localhost", 11312, 100);
-
- s= memcached_server_by_key(m, "a", 1, &res);
- memcached_server_free(s);
-
- memcached_free(m);
-
- return TEST_SUCCESS;
-}
-
-/* CAS test from Andei */
-static test_return_t user_supplied_bug20(memcached_st *memc)
-{
- memcached_return_t status;
- memcached_result_st *result, result_obj;
- const char *key = "abc";
- size_t key_len = strlen("abc");
- const char *value = "foobar";
- size_t value_len = strlen(value);
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, 1);
-
- status = memcached_set(memc, key, key_len, value, value_len, (time_t)0, (uint32_t)0);
- test_truth(status == MEMCACHED_SUCCESS);
-
- status = memcached_mget(memc, &key, &key_len, 1);
- test_truth(status == MEMCACHED_SUCCESS);
-
- result= memcached_result_create(memc, &result_obj);
- test_truth(result);
-
- memcached_result_create(memc, &result_obj);
- result= memcached_fetch_result(memc, &result_obj, &status);
-
- test_truth(result);
- test_truth(status == MEMCACHED_SUCCESS);
-
- memcached_result_free(result);
-
- return TEST_SUCCESS;
-}
-
-#include "ketama_test_cases.h"
-static test_return_t user_supplied_bug18(memcached_st *trash)
-{
- memcached_return_t rc;
- uint64_t value;
- int x;
- memcached_server_st *server_pool;
- memcached_st *memc;
-
- (void)trash;
-
- memc= memcached_create(NULL);
- test_truth(memc);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
- test_truth(value == 1);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
- test_truth(value == MEMCACHED_HASH_MD5);
-
- server_pool = memcached_servers_parse("10.0.1.1:11211 600,10.0.1.2:11211 300,10.0.1.3:11211 200,10.0.1.4:11211 350,10.0.1.5:11211 1000,10.0.1.6:11211 800,10.0.1.7:11211 950,10.0.1.8:11211 100");
- memcached_server_push(memc, server_pool);
-
- /* verify that the server list was parsed okay. */
- test_truth(memcached_server_count(memc) == 8);
- test_truth(strcmp(server_pool[0].hostname, "10.0.1.1") == 0);
- test_truth(server_pool[0].port == 11211);
- test_truth(server_pool[0].weight == 600);
- test_truth(strcmp(server_pool[2].hostname, "10.0.1.3") == 0);
- test_truth(server_pool[2].port == 11211);
- test_truth(server_pool[2].weight == 200);
- test_truth(strcmp(server_pool[7].hostname, "10.0.1.8") == 0);
- test_truth(server_pool[7].port == 11211);
- test_truth(server_pool[7].weight == 100);
-
- /* VDEAAAAA hashes to fffcd1b5, after the last continuum point, and lets
- * us test the boundary wraparound.
- */
- test_truth(memcached_generate_hash(memc, (char *)"VDEAAAAA", 8) == memc->continuum[0].index);
-
- /* verify the standard ketama set. */
- for (x= 0; x < 99; x++)
- {
- uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases[x].key, strlen(ketama_test_cases[x].key));
- char *hostname = memc->hosts[server_idx].hostname;
- test_strcmp(hostname, ketama_test_cases[x].server);
- }
-
- memcached_server_list_free(server_pool);
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-/* Large mget() of missing keys with binary proto
- *
- * If many binary quiet commands (such as getq's in an mget) fill the output
- * buffer and the server chooses not to respond, memcached_flush hangs. See
- * http://lists.tangent.org/pipermail/libmemcached/2009-August/000918.html
- */
-
-/* sighandler_t function that always asserts false */
-static void fail(int unused __attribute__((unused)))
-{
- assert(0);
-}
-
-
-static test_return_t _user_supplied_bug21(memcached_st* memc, size_t key_count)
-{
- memcached_return_t rc;
- unsigned int x;
- char **keys;
- size_t* key_lengths;
- void (*oldalarm)(int);
- memcached_st *memc_clone;
-
- memc_clone= memcached_clone(NULL, memc);
- test_truth(memc_clone);
-
- /* only binproto uses getq for mget */
- memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1);
-
- /* empty the cache to ensure misses (hence non-responses) */
- rc= memcached_flush(memc_clone, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- key_lengths= calloc(key_count, sizeof(size_t));
- keys= calloc(key_count, sizeof(char *));
- test_truth(keys);
- for (x= 0; x < key_count; x++)
- {
- char buffer[30];
-
- snprintf(buffer, 30, "%u", x);
- keys[x]= strdup(buffer);
- key_lengths[x]= strlen(keys[x]);
- }
-
- oldalarm= signal(SIGALRM, fail);
- alarm(5);
-
- rc= memcached_mget(memc_clone, (const char **)keys, key_lengths, key_count);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- alarm(0);
- signal(SIGALRM, oldalarm);
-
- test_truth(fetch_all_results(memc) == TEST_SUCCESS);
-
- for (x= 0; x < key_count; x++)
- free(keys[x]);
- free(keys);
- free(key_lengths);
-
- memcached_free(memc_clone);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_binary(memcached_st *memc);
-
-static test_return_t user_supplied_bug21(memcached_st *memc)
-{
- test_return_t test_rc;
- test_rc= pre_binary(memc);
-
- if (test_rc != TEST_SUCCESS)
- return test_rc;
-
- test_return_t rc;
-
- /* should work as of r580 */
- rc= _user_supplied_bug21(memc, 10);
- test_truth(rc == TEST_SUCCESS);
-
- /* should fail as of r580 */
- rc= _user_supplied_bug21(memc, 1000);
- test_truth(rc == TEST_SUCCESS);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t auto_eject_hosts(memcached_st *trash)
-{
- (void) trash;
-
- memcached_return_t rc;
- memcached_st *memc= memcached_create(NULL);
- test_truth(memc);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- uint64_t value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
- test_truth(value == 1);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
- test_truth(value == MEMCACHED_HASH_MD5);
-
- /* server should be removed when in delay */
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_AUTO_EJECT_HOSTS, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_AUTO_EJECT_HOSTS);
- test_truth(value == 1);
-
- memcached_server_st *server_pool;
- server_pool = memcached_servers_parse("10.0.1.1:11211 600,10.0.1.2:11211 300,10.0.1.3:11211 200,10.0.1.4:11211 350,10.0.1.5:11211 1000,10.0.1.6:11211 800,10.0.1.7:11211 950,10.0.1.8:11211 100");
- memcached_server_push(memc, server_pool);
-
- /* verify that the server list was parsed okay. */
- test_truth(memcached_server_count(memc) == 8);
- test_truth(strcmp(server_pool[0].hostname, "10.0.1.1") == 0);
- test_truth(server_pool[0].port == 11211);
- test_truth(server_pool[0].weight == 600);
- test_truth(strcmp(server_pool[2].hostname, "10.0.1.3") == 0);
- test_truth(server_pool[2].port == 11211);
- test_truth(server_pool[2].weight == 200);
- test_truth(strcmp(server_pool[7].hostname, "10.0.1.8") == 0);
- test_truth(server_pool[7].port == 11211);
- test_truth(server_pool[7].weight == 100);
-
- memc->hosts[2].next_retry = time(NULL) + 15;
- memc->next_distribution_rebuild= time(NULL) - 1;
-
- for (int x= 0; x < 99; x++)
- {
- uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases[x].key, strlen(ketama_test_cases[x].key));
- test_truth(server_idx != 2);
- }
-
- /* and re-added when it's back. */
- memc->hosts[2].next_retry = time(NULL) - 1;
- memc->next_distribution_rebuild= time(NULL) - 1;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION,
- memc->distribution);
- for (int x= 0; x < 99; x++)
- {
- uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases[x].key, strlen(ketama_test_cases[x].key));
- char *hostname = memc->hosts[server_idx].hostname;
- test_truth(strcmp(hostname, ketama_test_cases[x].server) == 0);
- }
-
- memcached_server_list_free(server_pool);
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t output_ketama_weighted_keys(memcached_st *trash)
-{
- (void) trash;
-
- memcached_return_t rc;
- memcached_st *memc= memcached_create(NULL);
- test_truth(memc);
-
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- uint64_t value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
- test_truth(value == 1);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
- test_truth(value == MEMCACHED_HASH_MD5);
-
-
- test_truth(memcached_behavior_set_distribution(memc, MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA_SPY) == MEMCACHED_SUCCESS);
-
- memcached_server_st *server_pool;
- server_pool = memcached_servers_parse("10.0.1.1:11211,10.0.1.2:11211,10.0.1.3:11211,10.0.1.4:11211,10.0.1.5:11211,10.0.1.6:11211,10.0.1.7:11211,10.0.1.8:11211,192.168.1.1:11211,192.168.100.1:11211");
- memcached_server_push(memc, server_pool);
-
- // @todo this needs to be refactored to actually test something.
-#if 0
- FILE *fp;
- if ((fp = fopen("ketama_keys.txt", "w")))
- {
- // noop
- } else {
- printf("cannot write to file ketama_keys.txt");
- return TEST_FAILURE;
- }
-
- for (int x= 0; x < 10000; x++)
- {
- char key[10];
- sprintf(key, "%d", x);
-
- uint32_t server_idx = memcached_generate_hash(memc, key, strlen(key));
- char *hostname = memc->hosts[server_idx].hostname;
- in_port_t port = memc->hosts[server_idx].port;
- fprintf(fp, "key %s is on host /%s:%u\n", key, hostname, port);
- }
- fclose(fp);
-#endif
- memcached_server_list_free(server_pool);
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-
-static test_return_t result_static(memcached_st *memc)
-{
- memcached_result_st result;
- memcached_result_st *result_ptr;
-
- result_ptr= memcached_result_create(memc, &result);
- test_truth(result.options.is_allocated == false);
- test_truth(memcached_is_initialized(&result) == true);
- test_truth(result_ptr);
- test_truth(result_ptr == &result);
-
- memcached_result_free(&result);
-
- test_truth(result.options.is_allocated == false);
- test_truth(memcached_is_initialized(&result) == false);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t result_alloc(memcached_st *memc)
-{
- memcached_result_st *result_ptr;
-
- result_ptr= memcached_result_create(memc, NULL);
- test_truth(result_ptr);
- test_truth(result_ptr->options.is_allocated == true);
- test_truth(memcached_is_initialized(result_ptr) == true);
- memcached_result_free(result_ptr);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t string_static_null(memcached_st *memc)
-{
- memcached_string_st string;
- memcached_string_st *string_ptr;
-
- string_ptr= memcached_string_create(memc, &string, 0);
- test_truth(string.options.is_initialized == true);
- test_truth(string_ptr);
-
- /* The following two better be the same! */
- test_truth(memcached_is_allocated(string_ptr) == false);
- test_truth(memcached_is_allocated(&string) == false);
- test_truth(&string == string_ptr);
-
- test_truth(string.options.is_initialized == true);
- test_truth(memcached_is_initialized(&string) == true);
- memcached_string_free(&string);
- test_truth(memcached_is_initialized(&string) == false);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t string_alloc_null(memcached_st *memc)
-{
- memcached_string_st *string;
-
- string= memcached_string_create(memc, NULL, 0);
- test_truth(string);
- test_truth(memcached_is_allocated(string) == true);
- test_truth(memcached_is_initialized(string) == true);
- memcached_string_free(string);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t string_alloc_with_size(memcached_st *memc)
-{
- memcached_string_st *string;
-
- string= memcached_string_create(memc, NULL, 1024);
- test_truth(string);
- test_truth(memcached_is_allocated(string) == true);
- test_truth(memcached_is_initialized(string) == true);
- memcached_string_free(string);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t string_alloc_with_size_toobig(memcached_st *memc)
-{
- memcached_string_st *string;
-
- string= memcached_string_create(memc, NULL, SIZE_MAX);
- test_truth(string == NULL);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t string_alloc_append(memcached_st *memc)
-{
- unsigned int x;
- char buffer[SMALL_STRING_LEN];
- memcached_string_st *string;
-
- /* Ring the bell! */
- memset(buffer, 6, SMALL_STRING_LEN);
-
- string= memcached_string_create(memc, NULL, 100);
- test_truth(string);
- test_truth(memcached_is_allocated(string) == true);
- test_truth(memcached_is_initialized(string) == true);
-
- for (x= 0; x < 1024; x++)
- {
- memcached_return_t rc;
- rc= memcached_string_append(string, buffer, SMALL_STRING_LEN);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
- test_truth(memcached_is_allocated(string) == true);
- memcached_string_free(string);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t string_alloc_append_toobig(memcached_st *memc)
-{
- memcached_return_t rc;
- unsigned int x;
- char buffer[SMALL_STRING_LEN];
- memcached_string_st *string;
-
- /* Ring the bell! */
- memset(buffer, 6, SMALL_STRING_LEN);
-
- string= memcached_string_create(memc, NULL, 100);
- test_truth(string);
- test_truth(memcached_is_allocated(string) == true);
- test_truth(memcached_is_initialized(string) == true);
-
- for (x= 0; x < 1024; x++)
- {
- rc= memcached_string_append(string, buffer, SMALL_STRING_LEN);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
- rc= memcached_string_append(string, buffer, SIZE_MAX);
- test_truth(rc == MEMCACHED_MEMORY_ALLOCATION_FAILURE);
- test_truth(memcached_is_allocated(string) == true);
- memcached_string_free(string);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t cleanup_pairs(memcached_st *memc __attribute__((unused)))
-{
- pairs_free(global_pairs);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t generate_pairs(memcached_st *memc __attribute__((unused)))
-{
- unsigned long long x;
- global_pairs= pairs_generate(GLOBAL_COUNT, 400);
- global_count= GLOBAL_COUNT;
-
- for (x= 0; x < global_count; x++)
- {
- global_keys[x]= global_pairs[x].key;
- global_keys_length[x]= global_pairs[x].key_length;
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t generate_large_pairs(memcached_st *memc __attribute__((unused)))
-{
- unsigned long long x;
- global_pairs= pairs_generate(GLOBAL2_COUNT, MEMCACHED_MAX_BUFFER+10);
- global_count= GLOBAL2_COUNT;
-
- for (x= 0; x < global_count; x++)
- {
- global_keys[x]= global_pairs[x].key;
- global_keys_length[x]= global_pairs[x].key_length;
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t generate_data(memcached_st *memc)
-{
- execute_set(memc, global_pairs, global_count);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t generate_data_with_stats(memcached_st *memc)
-{
- memcached_stat_st *stat_p;
- memcached_return_t rc;
- uint32_t host_index= 0;
- execute_set(memc, global_pairs, global_count);
-
- //TODO: hosts used size stats
- stat_p= memcached_stat(memc, NULL, &rc);
- test_truth(stat_p);
-
- for (host_index= 0; host_index < SERVERS_TO_CREATE; host_index++)
- {
- /* This test was changes so that "make test" would work properlly */
-#ifdef DEBUG
- printf("\nserver %u|%s|%u bytes: %llu\n", host_index, (memc->hosts)[host_index].hostname, (memc->hosts)[host_index].port, (unsigned long long)(stat_p + host_index)->bytes);
-#endif
- test_truth((unsigned long long)(stat_p + host_index)->bytes);
- }
-
- memcached_stat_free(NULL, stat_p);
-
- return TEST_SUCCESS;
-}
-static test_return_t generate_buffer_data(memcached_st *memc)
-{
- size_t latch= 0;
-
- latch= 1;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, latch);
- generate_data(memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_read_count(memcached_st *memc)
-{
- unsigned int x;
- memcached_return_t rc;
- memcached_st *memc_clone;
-
- memc_clone= memcached_clone(NULL, memc);
- test_truth(memc_clone);
-
- memcached_server_add_with_weight(memc_clone, "localhost", 6666, 0);
-
- {
- char *return_value;
- size_t return_value_length;
- uint32_t flags;
- uint32_t count;
-
- for (x= count= 0; x < global_count; x++)
- {
- return_value= memcached_get(memc_clone, global_keys[x], global_keys_length[x],
- &return_value_length, &flags, &rc);
- if (rc == MEMCACHED_SUCCESS)
- {
- count++;
- if (return_value)
- free(return_value);
- }
- }
- }
-
- memcached_free(memc_clone);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_read(memcached_st *memc)
-{
- unsigned int x;
- memcached_return_t rc;
-
- {
- char *return_value;
- size_t return_value_length;
- uint32_t flags;
-
- for (x= 0; x < global_count; x++)
- {
- return_value= memcached_get(memc, global_keys[x], global_keys_length[x],
- &return_value_length, &flags, &rc);
- /*
- test_truth(return_value);
- test_truth(rc == MEMCACHED_SUCCESS);
- */
- if (rc == MEMCACHED_SUCCESS && return_value)
- free(return_value);
- }
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_read(memcached_st *memc)
-{
- memcached_return_t rc;
-
- rc= memcached_mget(memc, global_keys, global_keys_length, global_count);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(fetch_all_results(memc) == TEST_SUCCESS);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_read_result(memcached_st *memc)
-{
- memcached_return_t rc;
-
- rc= memcached_mget(memc, global_keys, global_keys_length, global_count);
- test_truth(rc == MEMCACHED_SUCCESS);
- /* Turn this into a help function */
- {
- memcached_result_st results_obj;
- memcached_result_st *results;
-
- results= memcached_result_create(memc, &results_obj);
-
- while ((results= memcached_fetch_result(memc, &results_obj, &rc)))
- {
- test_truth(results);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- memcached_result_free(&results_obj);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_read_function(memcached_st *memc)
-{
- memcached_return_t rc;
- unsigned int counter;
- memcached_execute_fn callbacks[1];
-
- rc= memcached_mget(memc, global_keys, global_keys_length, global_count);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- callbacks[0]= &callback_counter;
- counter= 0;
- rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t delete_generate(memcached_st *memc)
-{
- unsigned int x;
-
- for (x= 0; x < global_count; x++)
- {
- (void)memcached_delete(memc, global_keys[x], global_keys_length[x], (time_t)0);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t delete_buffer_generate(memcached_st *memc)
-{
- size_t latch= 0;
- unsigned int x;
-
- latch= 1;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, latch);
-
- for (x= 0; x < global_count; x++)
- {
- (void)memcached_delete(memc, global_keys[x], global_keys_length[x], (time_t)0);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t add_host_test1(memcached_st *memc)
-{
- unsigned int x;
- memcached_return_t rc;
- char servername[]= "0.example.com";
- memcached_server_st *servers;
-
- servers= memcached_server_list_append_with_weight(NULL, servername, 400, 0, &rc);
- test_truth(servers);
- test_truth(1 == memcached_server_list_count(servers));
-
- for (x= 2; x < 20; x++)
- {
- char buffer[SMALL_STRING_LEN];
-
- snprintf(buffer, SMALL_STRING_LEN, "%u.example.com", 400+x);
- servers= memcached_server_list_append_with_weight(servers, buffer, 401, 0,
- &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(x == memcached_server_list_count(servers));
- }
-
- rc= memcached_server_push(memc, servers);
- test_truth(rc == MEMCACHED_SUCCESS);
- rc= memcached_server_push(memc, servers);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- memcached_server_list_free(servers);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_nonblock(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 0);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_nonblock_binary(memcached_st *memc)
-{
- memcached_return_t rc= MEMCACHED_FAILURE;
- memcached_st *memc_clone;
-
- memc_clone= memcached_clone(NULL, memc);
- test_truth(memc_clone);
- // The memcached_version needs to be done on a clone, because the server
- // will not toggle protocol on an connection.
- memcached_version(memc_clone);
-
- if (memc_clone->hosts[0].major_version >= 1 && memc_clone->hosts[0].minor_version > 2)
- {
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 0);
- rc = memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 1);
- }
- else
- {
- return TEST_SKIPPED;
- }
-
- memcached_free(memc_clone);
-
- return rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_SKIPPED;
-}
-
-static test_return_t pre_murmur(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_MURMUR);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_jenkins(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_JENKINS);
-
- return TEST_SUCCESS;
-}
-
-
-static test_return_t pre_md5(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_MD5);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_crc(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_CRC);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_hsieh(memcached_st *memc)
-{
-#ifdef HAVE_HSIEH_HASH
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_HSIEH);
- return TEST_SUCCESS;
-#else
- (void) memc;
- return TEST_SKIPPED;
-#endif
-}
-
-static test_return_t pre_hash_fnv1_64(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_MURMUR);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_hash_fnv1a_64(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_FNV1A_64);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_hash_fnv1_32(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_FNV1_32);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_hash_fnv1a_32(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_FNV1A_32);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_behavior_ketama(memcached_st *memc)
-{
- memcached_return_t rc;
- uint64_t value;
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA);
- test_truth(value == 1);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_behavior_ketama_weighted(memcached_st *memc)
-{
- memcached_return_t rc;
- uint64_t value;
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
- test_truth(value == 1);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
- test_truth(value == MEMCACHED_HASH_MD5);
-
- return TEST_SUCCESS;
-}
-
-/**
- @note This should be testing to see if the server really supports the binary protocol.
-*/
-static test_return_t pre_binary(memcached_st *memc)
-{
- memcached_return_t rc= MEMCACHED_FAILURE;
- memcached_st *memc_clone;
-
- memc_clone= memcached_clone(NULL, memc);
- test_truth(memc_clone);
- // The memcached_version needs to be done on a clone, because the server
- // will not toggle protocol on an connection.
- memcached_version(memc_clone);
-
- if (memc_clone->hosts[0].major_version >= 1 && memc_clone->hosts[0].minor_version > 2)
- {
- rc = memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 1);
- }
-
- memcached_free(memc_clone);
-
- return rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_SKIPPED;
-}
-
-
-static test_return_t pre_replication(memcached_st *memc)
-{
- test_return_t test_rc;
- test_rc= pre_binary(memc);
-
- if (test_rc != TEST_SUCCESS)
- return test_rc;
-
- /*
- * Make sure that we store the item on all servers
- * (master + replicas == number of servers)
- */
- memcached_return_t rc;
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS,
- memcached_server_count(memc) - 1);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS) == memcached_server_count(memc) - 1);
-
- return rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_SKIPPED;
-}
-
-
-static test_return_t pre_replication_noblock(memcached_st *memc)
-{
- test_return_t rc;
-
- rc= pre_replication(memc);
- if (rc != TEST_SUCCESS)
- return rc;
-
- rc= pre_nonblock(memc);
-
- return rc;
-}
-
-
-static void my_free(memcached_st *ptr __attribute__((unused)), void *mem)
-{
-#ifdef HARD_MALLOC_TESTS
- void *real_ptr= (mem == NULL) ? mem : (void*)((caddr_t)mem - 8);
- free(real_ptr);
-#else
- free(mem);
-#endif
-}
-
-
-static void *my_malloc(memcached_st *ptr __attribute__((unused)), const size_t size)
-{
-#ifdef HARD_MALLOC_TESTS
- void *ret= malloc(size + 8);
- if (ret != NULL)
- {
- ret= (void*)((caddr_t)ret + 8);
- }
-#else
- void *ret= malloc(size);
-#endif
-
- if (ret != NULL)
- {
- memset(ret, 0xff, size);
- }
-
- return ret;
-}
-
-
-static void *my_realloc(memcached_st *ptr __attribute__((unused)), void *mem, const size_t size)
-{
-#ifdef HARD_MALLOC_TESTS
- void *real_ptr= (mem == NULL) ? NULL : (void*)((caddr_t)mem - 8);
- void *nmem= realloc(real_ptr, size + 8);
-
- void *ret= NULL;
- if (nmem != NULL)
- {
- ret= (void*)((caddr_t)nmem + 8);
- }
-
- return ret;
-#else
- return realloc(mem, size);
-#endif
-}
-
-
-static void *my_calloc(memcached_st *ptr __attribute__((unused)), size_t nelem, const size_t size)
-{
-#ifdef HARD_MALLOC_TESTS
- void *mem= my_malloc(ptr, nelem * size);
- if (mem)
- {
- memset(mem, 0, nelem * size);
- }
-
- return mem;
-#else
- return calloc(nelem, size);
-#endif
-}
-
-
-static test_return_t set_prefix(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "mine";
- char *value;
-
- /* Make sure be default none exists */
- value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
- test_truth(rc == MEMCACHED_FAILURE);
-
- /* Test a clean set */
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, (void *)key);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
- test_truth(memcmp(value, key, 4) == 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- /* Test that we can turn it off */
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, NULL);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
- test_truth(rc == MEMCACHED_FAILURE);
-
- /* Now setup for main test */
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, (void *)key);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memcmp(value, key, 4) == 0);
-
- /* Set to Zero, and then Set to something too large */
- {
- char long_key[255];
- memset(long_key, 0, 255);
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, NULL);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
- test_truth(rc == MEMCACHED_FAILURE);
- test_truth(value == NULL);
-
- /* Test a long key for failure */
- /* TODO, extend test to determine based on setting, what result should be */
- strcpy(long_key, "Thisismorethentheallottednumberofcharacters");
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, long_key);
- //test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- /* Now test a key with spaces (which will fail from long key, since bad key is not set) */
- strcpy(long_key, "This is more then the allotted number of characters");
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, long_key);
- test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
-
- /* Test for a bad prefix, but with a short key */
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_VERIFY_KEY, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- strcpy(long_key, "dog cat");
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, long_key);
- test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
- }
-
- return TEST_SUCCESS;
-}
-
-
-#ifdef MEMCACHED_ENABLE_DEPRECATED
-static test_return_t deprecated_set_memory_alloc(memcached_st *memc)
-{
- void *test_ptr= NULL;
- void *cb_ptr= NULL;
- {
- memcached_malloc_fn malloc_cb=
- (memcached_malloc_fn)my_malloc;
- cb_ptr= *(void **)&malloc_cb;
- memcached_return_t rc;
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_MALLOC_FUNCTION, cb_ptr);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_MALLOC_FUNCTION, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(test_ptr == cb_ptr);
- }
-
- {
- memcached_realloc_fn realloc_cb=
- (memcached_realloc_fn)my_realloc;
- cb_ptr= *(void **)&realloc_cb;
- memcached_return_t rc;
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_REALLOC_FUNCTION, cb_ptr);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_REALLOC_FUNCTION, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(test_ptr == cb_ptr);
- }
-
- {
- memcached_free_fn free_cb=
- (memcached_free_fn)my_free;
- cb_ptr= *(void **)&free_cb;
- memcached_return_t rc;
-
- rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_FREE_FUNCTION, cb_ptr);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_FREE_FUNCTION, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(test_ptr == cb_ptr);
- }
-
- return TEST_SUCCESS;
-}
-#endif
-
-
-static test_return_t set_memory_alloc(memcached_st *memc)
-{
- memcached_return_t rc;
- rc= memcached_set_memory_allocators(memc, NULL, my_free,
- my_realloc, my_calloc);
- test_truth(rc == MEMCACHED_FAILURE);
-
- rc= memcached_set_memory_allocators(memc, my_malloc, my_free,
- my_realloc, my_calloc);
-
- memcached_malloc_fn mem_malloc;
- memcached_free_fn mem_free;
- memcached_realloc_fn mem_realloc;
- memcached_calloc_fn mem_calloc;
- memcached_get_memory_allocators(memc, &mem_malloc, &mem_free,
- &mem_realloc, &mem_calloc);
-
- test_truth(mem_malloc == my_malloc);
- test_truth(mem_realloc == my_realloc);
- test_truth(mem_calloc == my_calloc);
- test_truth(mem_free == my_free);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t enable_consistent_crc(memcached_st *memc)
-{
- test_return_t rc;
- memcached_server_distribution_t value= MEMCACHED_DISTRIBUTION_CONSISTENT;
- memcached_hash_t hash;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION, value);
- if ((rc= pre_crc(memc)) != TEST_SUCCESS)
- return rc;
-
- value= (memcached_server_distribution_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION);
- test_truth(value == MEMCACHED_DISTRIBUTION_CONSISTENT);
-
- hash= (memcached_hash_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
-
- if (hash != MEMCACHED_HASH_CRC)
- return TEST_SKIPPED;
-
- return TEST_SUCCESS;
-}
-
-static test_return_t enable_consistent_hsieh(memcached_st *memc)
-{
- test_return_t rc;
- memcached_server_distribution_t value= MEMCACHED_DISTRIBUTION_CONSISTENT;
- memcached_hash_t hash;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION, value);
- if ((rc= pre_hsieh(memc)) != TEST_SUCCESS)
- return rc;
-
- value= (memcached_server_distribution_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION);
- test_truth(value == MEMCACHED_DISTRIBUTION_CONSISTENT);
-
- hash= (memcached_hash_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
-
- if (hash != MEMCACHED_HASH_HSIEH)
- return TEST_SKIPPED;
-
-
- return TEST_SUCCESS;
-}
-
-static test_return_t enable_cas(memcached_st *memc)
-{
- unsigned int set= 1;
-
- memcached_version(memc);
-
- if ((memc->hosts[0].major_version >= 1 && (memc->hosts[0].minor_version == 2 && memc->hosts[0].micro_version >= 4))
- || memc->hosts[0].minor_version > 2)
- {
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, set);
-
- return TEST_SUCCESS;
- }
-
- return TEST_SKIPPED;
-}
-
-static test_return_t check_for_1_2_3(memcached_st *memc)
-{
- memcached_version(memc);
-
- if ((memc->hosts[0].major_version >= 1 && (memc->hosts[0].minor_version == 2 && memc->hosts[0].micro_version >= 4))
- || memc->hosts[0].minor_version > 2)
- return TEST_SUCCESS;
-
- return TEST_SKIPPED;
-}
-
-static test_return_t pre_unix_socket(memcached_st *memc)
-{
- memcached_return_t rc;
- struct stat buf;
-
- memcached_servers_reset(memc);
-
- if (stat("/tmp/memcached.socket", &buf))
- return TEST_SKIPPED;
-
- rc= memcached_server_add_unix_socket_with_weight(memc, "/tmp/memcached.socket", 0);
-
- return ( rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_FAILURE );
-}
-
-static test_return_t pre_nodelay(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 0);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, 0);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_settimer(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SND_TIMEOUT, 1000);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_RCV_TIMEOUT, 1000);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t poll_timeout(memcached_st *memc)
-{
- size_t timeout;
-
- timeout= 100;
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_POLL_TIMEOUT, timeout);
-
- timeout= (size_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_POLL_TIMEOUT);
-
- test_truth(timeout == 100);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t noreply_test(memcached_st *memc)
-{
- memcached_return_t ret;
- ret= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 1);
- test_truth(ret == MEMCACHED_SUCCESS);
- ret= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1);
- test_truth(ret == MEMCACHED_SUCCESS);
- ret= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, 1);
- test_truth(ret == MEMCACHED_SUCCESS);
- test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NOREPLY) == 1);
- test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS) == 1);
- test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS) == 1);
-
- for (int count=0; count < 5; ++count)
- {
- for (int x=0; x < 100; ++x)
- {
- char key[10];
- size_t len= (size_t)sprintf(key, "%d", x);
- switch (count)
- {
- case 0:
- ret= memcached_add(memc, key, len, key, len, 0, 0);
- break;
- case 1:
- ret= memcached_replace(memc, key, len, key, len, 0, 0);
- break;
- case 2:
- ret= memcached_set(memc, key, len, key, len, 0, 0);
- break;
- case 3:
- ret= memcached_append(memc, key, len, key, len, 0, 0);
- break;
- case 4:
- ret= memcached_prepend(memc, key, len, key, len, 0, 0);
- break;
- default:
- test_truth(count);
- break;
- }
- test_truth(ret == MEMCACHED_SUCCESS || ret == MEMCACHED_BUFFERED);
- }
-
- /*
- ** NOTE: Don't ever do this in your code! this is not a supported use of the
- ** API and is _ONLY_ done this way to verify that the library works the
- ** way it is supposed to do!!!!
- */
- int no_msg=0;
- for (uint32_t x=0; x < memcached_server_count(memc); ++x)
- no_msg+=(int)(memc->hosts[x].cursor_active);
-
- test_truth(no_msg == 0);
- test_truth(memcached_flush_buffers(memc) == MEMCACHED_SUCCESS);
-
- /*
- ** Now validate that all items was set properly!
- */
- for (int x=0; x < 100; ++x)
- {
- char key[10];
- size_t len= (size_t)sprintf(key, "%d", x);
- size_t length;
- uint32_t flags;
- char* value=memcached_get(memc, key, strlen(key),
- &length, &flags, &ret);
- test_truth(ret == MEMCACHED_SUCCESS && value != NULL);
- switch (count)
- {
- case 0: /* FALLTHROUGH */
- case 1: /* FALLTHROUGH */
- case 2:
- test_truth(strncmp(value, key, len) == 0);
- test_truth(len == length);
- break;
- case 3:
- test_truth(length == len * 2);
- break;
- case 4:
- test_truth(length == len * 3);
- break;
- default:
- test_truth(count);
- break;
- }
- free(value);
- }
- }
-
- /* Try setting an illegal cas value (should not return an error to
- * the caller (because we don't expect a return message from the server)
- */
- const char* keys[]= {"0"};
- size_t lengths[]= {1};
- size_t length;
- uint32_t flags;
- memcached_result_st results_obj;
- memcached_result_st *results;
- ret= memcached_mget(memc, keys, lengths, 1);
- test_truth(ret == MEMCACHED_SUCCESS);
-
- results= memcached_result_create(memc, &results_obj);
- test_truth(results);
- results= memcached_fetch_result(memc, &results_obj, &ret);
- test_truth(results);
- test_truth(ret == MEMCACHED_SUCCESS);
- uint64_t cas= memcached_result_cas(results);
- memcached_result_free(&results_obj);
-
- ret= memcached_cas(memc, keys[0], lengths[0], keys[0], lengths[0], 0, 0, cas);
- test_truth(ret == MEMCACHED_SUCCESS);
-
- /*
- * The item will have a new cas value, so try to set it again with the old
- * value. This should fail!
- */
- ret= memcached_cas(memc, keys[0], lengths[0], keys[0], lengths[0], 0, 0, cas);
- test_truth(ret == MEMCACHED_SUCCESS);
- test_truth(memcached_flush_buffers(memc) == MEMCACHED_SUCCESS);
- char* value=memcached_get(memc, keys[0], lengths[0], &length, &flags, &ret);
- test_truth(ret == MEMCACHED_SUCCESS && value != NULL);
- free(value);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t analyzer_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_stat_st *memc_stat;
- memcached_analysis_st *report;
-
- memc_stat= memcached_stat(memc, NULL, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(memc_stat);
-
- report= memcached_analyze(memc, memc_stat, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(report);
-
- free(report);
- memcached_stat_free(NULL, memc_stat);
-
- return TEST_SUCCESS;
-}
-
-/* Count the objects */
-static memcached_return_t callback_dump_counter(memcached_st *ptr __attribute__((unused)),
- const char *key __attribute__((unused)),
- size_t key_length __attribute__((unused)),
- void *context)
-{
- uint32_t *counter= (uint32_t *)context;
-
- *counter= *counter + 1;
-
- return MEMCACHED_SUCCESS;
-}
-
-static test_return_t dump_test(memcached_st *memc)
-{
- memcached_return_t rc;
- uint32_t counter= 0;
- memcached_dump_fn callbacks[1];
- test_return_t main_rc;
-
- callbacks[0]= &callback_dump_counter;
-
- /* No support for Binary protocol yet */
- if (memc->flags.binary_protocol)
- return TEST_SUCCESS;
-
- main_rc= set_test3(memc);
-
- test_truth (main_rc == TEST_SUCCESS);
-
- rc= memcached_dump(memc, callbacks, (void *)&counter, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- /* We may have more then 32 if our previous flush has not completed */
- test_truth(counter >= 32);
-
- return TEST_SUCCESS;
-}
-
-#ifdef HAVE_LIBMEMCACHEDUTIL
-static void* connection_release(void *arg)
-{
- struct {
- memcached_pool_st* pool;
- memcached_st* mmc;
- } *resource= arg;
-
- usleep(250);
- assert(memcached_pool_push(resource->pool, resource->mmc) == MEMCACHED_SUCCESS);
- return arg;
-}
-
-static test_return_t connection_pool_test(memcached_st *memc)
-{
- memcached_pool_st* pool= memcached_pool_create(memc, 5, 10);
- test_truth(pool != NULL);
- memcached_st* mmc[10];
- memcached_return_t rc;
-
- for (int x= 0; x < 10; ++x) {
- mmc[x]= memcached_pool_pop(pool, false, &rc);
- test_truth(mmc[x] != NULL);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- test_truth(memcached_pool_pop(pool, false, &rc) == NULL);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- pthread_t tid;
- struct {
- memcached_pool_st* pool;
- memcached_st* mmc;
- } item= { .pool = pool, .mmc = mmc[9] };
- pthread_create(&tid, NULL, connection_release, &item);
- mmc[9]= memcached_pool_pop(pool, true, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- pthread_join(tid, NULL);
- test_truth(mmc[9] == item.mmc);
- const char *key= "key";
- size_t keylen= strlen(key);
-
- // verify that I can do ops with all connections
- rc= memcached_set(mmc[0], key, keylen, "0", 1, 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- for (unsigned int x= 0; x < 10; ++x) {
- uint64_t number_value;
- rc= memcached_increment(mmc[x], key, keylen, 1, &number_value);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(number_value == (x+1));
- }
-
- // Release them..
- for (int x= 0; x < 10; ++x)
- test_truth(memcached_pool_push(pool, mmc[x]) == MEMCACHED_SUCCESS);
-
-
- /* verify that I can set behaviors on the pool when I don't have all
- * of the connections in the pool. It should however be enabled
- * when I push the item into the pool
- */
- mmc[0]= memcached_pool_pop(pool, false, &rc);
- test_truth(mmc[0] != NULL);
-
- rc= memcached_pool_behavior_set(pool, MEMCACHED_BEHAVIOR_IO_MSG_WATERMARK, 9999);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- mmc[1]= memcached_pool_pop(pool, false, &rc);
- test_truth(mmc[1] != NULL);
-
- test_truth(memcached_behavior_get(mmc[1], MEMCACHED_BEHAVIOR_IO_MSG_WATERMARK) == 9999);
- test_truth(memcached_pool_push(pool, mmc[1]) == MEMCACHED_SUCCESS);
- test_truth(memcached_pool_push(pool, mmc[0]) == MEMCACHED_SUCCESS);
-
- mmc[0]= memcached_pool_pop(pool, false, &rc);
- test_truth(memcached_behavior_get(mmc[0], MEMCACHED_BEHAVIOR_IO_MSG_WATERMARK) == 9999);
- test_truth(memcached_pool_push(pool, mmc[0]) == MEMCACHED_SUCCESS);
-
-
- test_truth(memcached_pool_destroy(pool) == memc);
- return TEST_SUCCESS;
-}
-#endif
-
-static test_return_t replication_set_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 0);
-
- rc= memcached_set(memc, "bubba", 5, "0", 1, 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- /*
- ** We are using the quiet commands to store the replicas, so we need
- ** to ensure that all of them are processed before we can continue.
- ** In the test we go directly from storing the object to trying to
- ** receive the object from all of the different servers, so we
- ** could end up in a race condition (the memcached server hasn't yet
- ** processed the quiet command from the replication set when it process
- ** the request from the other client (created by the clone)). As a
- ** workaround for that we call memcached_quit to send the quit command
- ** to the server and wait for the response ;-) If you use the test code
- ** as an example for your own code, please note that you shouldn't need
- ** to do this ;-)
- */
- memcached_quit(memc);
-
- /*
- ** "bubba" should now be stored on all of our servers. We don't have an
- ** easy to use API to address each individual server, so I'll just iterate
- ** through a bunch of "master keys" and I should most likely hit all of the
- ** servers...
- */
- for (int x= 'a'; x <= 'z'; ++x)
- {
- char key[2]= { [0]= (char)x };
- size_t len;
- uint32_t flags;
- char *val= memcached_get_by_key(memc_clone, key, 1, "bubba", 5,
- &len, &flags, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(val != NULL);
- free(val);
- }
-
- memcached_free(memc_clone);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t replication_get_test(memcached_st *memc)
-{
- memcached_return_t rc;
-
- /*
- * Don't do the following in your code. I am abusing the internal details
- * within the library, and this is not a supported interface.
- * This is to verify correct behavior in the library
- */
- for (uint32_t host= 0; host < memcached_server_count(memc); ++host)
- {
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- memc_clone->hosts[host].port= 0;
-
- for (int x= 'a'; x <= 'z'; ++x)
- {
- char key[2]= { [0]= (char)x };
- size_t len;
- uint32_t flags;
- char *val= memcached_get_by_key(memc_clone, key, 1, "bubba", 5,
- &len, &flags, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(val != NULL);
- free(val);
- }
-
- memcached_free(memc_clone);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t replication_mget_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 0);
-
- const char *keys[]= { "bubba", "key1", "key2", "key3" };
- size_t len[]= { 5, 4, 4, 4 };
-
- for (int x=0; x< 4; ++x)
- {
- rc= memcached_set(memc, keys[x], len[x], "0", 1, 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- /*
- ** We are using the quiet commands to store the replicas, so we need
- ** to ensure that all of them are processed before we can continue.
- ** In the test we go directly from storing the object to trying to
- ** receive the object from all of the different servers, so we
- ** could end up in a race condition (the memcached server hasn't yet
- ** processed the quiet command from the replication set when it process
- ** the request from the other client (created by the clone)). As a
- ** workaround for that we call memcached_quit to send the quit command
- ** to the server and wait for the response ;-) If you use the test code
- ** as an example for your own code, please note that you shouldn't need
- ** to do this ;-)
- */
- memcached_quit(memc);
-
- /*
- * Don't do the following in your code. I am abusing the internal details
- * within the library, and this is not a supported interface.
- * This is to verify correct behavior in the library
- */
- memcached_result_st result_obj;
- for (uint32_t host= 0; host < memc_clone->number_of_hosts; host++)
- {
- memcached_st *new_clone= memcached_clone(NULL, memc);
- new_clone->hosts[host].port= 0;
-
- for (int x= 'a'; x <= 'z'; ++x)
- {
- const char key[2]= { [0]= (const char)x };
-
- rc= memcached_mget_by_key(new_clone, key, 1, keys, len, 4);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- memcached_result_st *results= memcached_result_create(new_clone, &result_obj);
- test_truth(results);
-
- int hits= 0;
- while ((results= memcached_fetch_result(new_clone, &result_obj, &rc)) != NULL)
- {
- hits++;
- }
- test_truth(hits == 4);
- memcached_result_free(&result_obj);
- }
-
- memcached_free(new_clone);
- }
-
- memcached_free(memc_clone);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t replication_randomize_mget_test(memcached_st *memc)
-{
- memcached_result_st result_obj;
- memcached_return_t rc;
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 3);
- memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_RANDOMIZE_REPLICA_READ, 1);
-
- const char *keys[]= { "key1", "key2", "key3", "key4", "key5", "key6", "key7" };
- size_t len[]= { 4, 4, 4, 4, 4, 4, 4 };
-
- for (int x=0; x< 7; ++x)
- {
- rc= memcached_set(memc, keys[x], len[x], "1", 1, 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- memcached_quit(memc);
-
- for (int x=0; x< 7; ++x) {
- const char key[2]= { [0]= (const char)x };
-
- rc= memcached_mget_by_key(memc_clone, key, 1, keys, len, 7);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- memcached_result_st *results= memcached_result_create(memc_clone, &result_obj);
- test_truth(results);
-
- int hits= 0;
- while ((results= memcached_fetch_result(memc_clone, &result_obj, &rc)) != NULL)
- {
- ++hits;
- }
- test_truth(hits == 7);
- memcached_result_free(&result_obj);
- }
- memcached_free(memc_clone);
- return TEST_SUCCESS;
-}
-
-static test_return_t replication_delete_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- /* Delete the items from all of the servers except 1 */
- uint64_t repl= memcached_behavior_get(memc,
- MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, --repl);
-
- const char *keys[]= { "bubba", "key1", "key2", "key3" };
- size_t len[]= { 5, 4, 4, 4 };
-
- for (int x=0; x< 4; ++x)
- {
- rc= memcached_delete_by_key(memc, keys[0], len[0], keys[x], len[x], 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- /*
- * Don't do the following in your code. I am abusing the internal details
- * within the library, and this is not a supported interface.
- * This is to verify correct behavior in the library
- */
- uint32_t hash= memcached_generate_hash(memc, keys[0], len[0]);
- for (uint32_t x= 0; x < (repl + 1); ++x)
- {
- memc_clone->hosts[hash].port= 0;
- if (++hash == memc_clone->number_of_hosts)
- hash= 0;
- }
-
- memcached_result_st result_obj;
- for (uint32_t host= 0; host < memc_clone->number_of_hosts; ++host)
- {
- for (int x= 'a'; x <= 'z'; ++x)
- {
- const char key[2]= { [0]= (const char)x };
-
- rc= memcached_mget_by_key(memc_clone, key, 1, keys, len, 4);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- memcached_result_st *results= memcached_result_create(memc_clone, &result_obj);
- test_truth(results);
-
- int hits= 0;
- while ((results= memcached_fetch_result(memc_clone, &result_obj, &rc)) != NULL)
- {
- ++hits;
- }
- test_truth(hits == 4);
- memcached_result_free(&result_obj);
- }
- }
- memcached_free(memc_clone);
-
- return TEST_SUCCESS;
-}
-
-static void increment_request_id(uint16_t *id)
-{
- (*id)++;
- if ((*id & UDP_REQUEST_ID_THREAD_MASK) != 0)
- *id= 0;
-}
-
-static uint16_t *get_udp_request_ids(memcached_st *memc)
-{
- uint16_t *ids= malloc(sizeof(uint16_t) * memcached_server_count(memc));
- assert(ids != NULL);
- unsigned int x;
-
- for (x= 0; x < memcached_server_count(memc); x++)
- ids[x]= get_udp_datagram_request_id((struct udp_datagram_header_st *) memc->hosts[x].write_buffer);
-
- return ids;
-}
-
-static test_return_t post_udp_op_check(memcached_st *memc, uint16_t *expected_req_ids)
-{
- unsigned int x;
- memcached_server_st *cur_server = memc->hosts;
- uint16_t *cur_req_ids = get_udp_request_ids(memc);
-
- for (x= 0; x < memcached_server_count(memc); x++)
- {
- test_truth(cur_server[x].cursor_active == 0);
- test_truth(cur_req_ids[x] == expected_req_ids[x]);
- }
- free(expected_req_ids);
- free(cur_req_ids);
-
- return TEST_SUCCESS;
-}
-
-/*
-** There is a little bit of a hack here, instead of removing
-** the servers, I just set num host to 0 and them add then new udp servers
-**/
-static test_return_t init_udp(memcached_st *memc)
-{
- memcached_version(memc);
- /* For the time being, only support udp test for >= 1.2.6 && < 1.3 */
- if (memc->hosts[0].major_version != 1 || memc->hosts[0].minor_version != 2
- || memc->hosts[0].micro_version < 6)
- return TEST_SKIPPED;
-
- uint32_t num_hosts= memcached_server_count(memc);
- unsigned int x= 0;
- memcached_server_st servers[num_hosts];
- memcpy(servers, memc->hosts, sizeof(memcached_server_st) * num_hosts);
- for (x= 0; x < num_hosts; x++)
- memcached_server_free(&memc->hosts[x]);
-
- memc->number_of_hosts= 0;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_USE_UDP, 1);
- for (x= 0; x < num_hosts; x++)
- {
- test_truth(memcached_server_add_udp(memc, servers[x].hostname, servers[x].port) == MEMCACHED_SUCCESS);
- test_truth(memc->hosts[x].write_buffer_offset == UDP_DATAGRAM_HEADER_LENGTH);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t binary_init_udp(memcached_st *memc)
-{
- test_return_t test_rc;
- test_rc= pre_binary(memc);
-
- if (test_rc != TEST_SUCCESS)
- return test_rc;
-
- return init_udp(memc);
-}
-
-/* Make sure that I cant add a tcp server to a udp client */
-static test_return_t add_tcp_server_udp_client_test(memcached_st *memc)
-{
- memcached_server_st server;
- memcached_server_clone(&server, &memc->hosts[0]);
- test_truth(memcached_server_remove(&(memc->hosts[0])) == MEMCACHED_SUCCESS);
- test_truth(memcached_server_add(memc, server.hostname, server.port) == MEMCACHED_INVALID_HOST_PROTOCOL);
- return TEST_SUCCESS;
-}
-
-/* Make sure that I cant add a udp server to a tcp client */
-static test_return_t add_udp_server_tcp_client_test(memcached_st *memc)
-{
- memcached_server_st server;
- memcached_server_clone(&server, &memc->hosts[0]);
- test_truth(memcached_server_remove(&(memc->hosts[0])) == MEMCACHED_SUCCESS);
-
- memcached_st tcp_client;
- memcached_create(&tcp_client);
- test_truth(memcached_server_add_udp(&tcp_client, server.hostname, server.port) == MEMCACHED_INVALID_HOST_PROTOCOL);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t set_udp_behavior_test(memcached_st *memc)
-{
-
- memcached_quit(memc);
- memc->number_of_hosts= 0;
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION, memc->distribution);
- test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_USE_UDP, 1) == MEMCACHED_SUCCESS);
- test_truth(memc->flags.use_udp);
- test_truth(memc->flags.no_reply);
-
- test_truth(memcached_server_count(memc) == 0);
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_USE_UDP,0);
- test_truth(! (memc->flags.use_udp));
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY,0);
- test_truth(! (memc->flags.no_reply));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t udp_set_test(memcached_st *memc)
-{
- unsigned int x= 0;
- unsigned int num_iters= 1025; //request id rolls over at 1024
- for (x= 0; x < num_iters;x++)
- {
- memcached_return_t rc;
- const char *key= "foo";
- const char *value= "when we sanitize";
- uint16_t *expected_ids= get_udp_request_ids(memc);
- unsigned int server_key= memcached_generate_hash(memc,key,strlen(key));
- size_t init_offset= memc->hosts[server_key].write_buffer_offset;
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- /** NB, the check below assumes that if new write_ptr is less than
- * the original write_ptr that we have flushed. For large payloads, this
- * maybe an invalid assumption, but for the small payload we have it is OK
- */
- if (rc == MEMCACHED_SUCCESS ||
- memc->hosts[server_key].write_buffer_offset < init_offset)
- increment_request_id(&expected_ids[server_key]);
-
- if (rc == MEMCACHED_SUCCESS)
- {
- test_truth(memc->hosts[server_key].write_buffer_offset == UDP_DATAGRAM_HEADER_LENGTH);
- }
- else
- {
- test_truth(memc->hosts[server_key].write_buffer_offset != UDP_DATAGRAM_HEADER_LENGTH);
- test_truth(memc->hosts[server_key].write_buffer_offset <= MAX_UDP_DATAGRAM_LENGTH);
- }
- test_truth(post_udp_op_check(memc,expected_ids) == TEST_SUCCESS);
- }
- return TEST_SUCCESS;
-}
-
-static test_return_t udp_buffered_set_test(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1);
- return udp_set_test(memc);
-}
-
-static test_return_t udp_set_too_big_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "bar";
- char value[MAX_UDP_DATAGRAM_LENGTH];
- uint16_t *expected_ids= get_udp_request_ids(memc);
- rc= memcached_set(memc, key, strlen(key),
- value, MAX_UDP_DATAGRAM_LENGTH,
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_WRITE_FAILURE);
- return post_udp_op_check(memc,expected_ids);
-}
-
-static test_return_t udp_delete_test(memcached_st *memc)
-{
- unsigned int x= 0;
- unsigned int num_iters= 1025; //request id rolls over at 1024
- for (x= 0; x < num_iters;x++)
- {
- memcached_return_t rc;
- const char *key= "foo";
- uint16_t *expected_ids=get_udp_request_ids(memc);
- unsigned int server_key= memcached_generate_hash(memc, key, strlen(key));
- size_t init_offset= memc->hosts[server_key].write_buffer_offset;
- rc= memcached_delete(memc, key, strlen(key), 0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- if (rc == MEMCACHED_SUCCESS || memc->hosts[server_key].write_buffer_offset < init_offset)
- increment_request_id(&expected_ids[server_key]);
- if (rc == MEMCACHED_SUCCESS)
- {
- test_truth(memc->hosts[server_key].write_buffer_offset == UDP_DATAGRAM_HEADER_LENGTH);
- }
- else
- {
- test_truth(memc->hosts[server_key].write_buffer_offset != UDP_DATAGRAM_HEADER_LENGTH);
- test_truth(memc->hosts[server_key].write_buffer_offset <= MAX_UDP_DATAGRAM_LENGTH);
- }
- test_truth(post_udp_op_check(memc,expected_ids) == TEST_SUCCESS);
- }
- return TEST_SUCCESS;
-}
-
-static test_return_t udp_buffered_delete_test(memcached_st *memc)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1);
- return udp_delete_test(memc);
-}
-
-static test_return_t udp_verbosity_test(memcached_st *memc)
-{
- memcached_return_t rc;
- uint16_t *expected_ids= get_udp_request_ids(memc);
- unsigned int x;
- for (x= 0; x < memcached_server_count(memc); x++)
- increment_request_id(&expected_ids[x]);
-
- rc= memcached_verbosity(memc,3);
- test_truth(rc == MEMCACHED_SUCCESS);
- return post_udp_op_check(memc,expected_ids);
-}
-
-static test_return_t udp_quit_test(memcached_st *memc)
-{
- uint16_t *expected_ids= get_udp_request_ids(memc);
- memcached_quit(memc);
- return post_udp_op_check(memc, expected_ids);
-}
-
-static test_return_t udp_flush_test(memcached_st *memc)
-{
- memcached_return_t rc;
- uint16_t *expected_ids= get_udp_request_ids(memc);
- unsigned int x;
- for (x= 0; x < memcached_server_count(memc);x++)
- increment_request_id(&expected_ids[x]);
-
- rc= memcached_flush(memc,0);
- test_truth(rc == MEMCACHED_SUCCESS);
- return post_udp_op_check(memc,expected_ids);
-}
-
-static test_return_t udp_incr_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "incr";
- const char *value= "1";
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- uint16_t *expected_ids= get_udp_request_ids(memc);
- unsigned int server_key= memcached_generate_hash(memc, key, strlen(key));
- increment_request_id(&expected_ids[server_key]);
- uint64_t newvalue;
- rc= memcached_increment(memc, key, strlen(key), 1, &newvalue);
- test_truth(rc == MEMCACHED_SUCCESS);
- return post_udp_op_check(memc, expected_ids);
-}
-
-static test_return_t udp_decr_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "decr";
- const char *value= "1";
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
-
- test_truth(rc == MEMCACHED_SUCCESS);
- uint16_t *expected_ids= get_udp_request_ids(memc);
- unsigned int server_key= memcached_generate_hash(memc, key, strlen(key));
- increment_request_id(&expected_ids[server_key]);
- uint64_t newvalue;
- rc= memcached_decrement(memc, key, strlen(key), 1, &newvalue);
- test_truth(rc == MEMCACHED_SUCCESS);
- return post_udp_op_check(memc, expected_ids);
-}
-
-
-static test_return_t udp_stat_test(memcached_st *memc)
-{
- memcached_stat_st * rv= NULL;
- memcached_return_t rc;
- char args[]= "";
- uint16_t *expected_ids = get_udp_request_ids(memc);
- rv = memcached_stat(memc, args, &rc);
- free(rv);
- test_truth(rc == MEMCACHED_NOT_SUPPORTED);
- return post_udp_op_check(memc, expected_ids);
-}
-
-static test_return_t udp_version_test(memcached_st *memc)
-{
- memcached_return_t rc;
- uint16_t *expected_ids = get_udp_request_ids(memc);
- rc = memcached_version(memc);
- test_truth(rc == MEMCACHED_NOT_SUPPORTED);
- return post_udp_op_check(memc, expected_ids);
-}
-
-static test_return_t udp_get_test(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "foo";
- size_t vlen;
- uint16_t *expected_ids = get_udp_request_ids(memc);
- char *val= memcached_get(memc, key, strlen(key), &vlen, (uint32_t)0, &rc);
- test_truth(rc == MEMCACHED_NOT_SUPPORTED);
- test_truth(val == NULL);
- return post_udp_op_check(memc, expected_ids);
-}
-
-static test_return_t udp_mixed_io_test(memcached_st *memc)
-{
- test_st current_op;
- test_st mixed_io_ops [] ={
- {"udp_set_test", 0,
- (test_callback_fn)udp_set_test},
- {"udp_set_too_big_test", 0,
- (test_callback_fn)udp_set_too_big_test},
- {"udp_delete_test", 0,
- (test_callback_fn)udp_delete_test},
- {"udp_verbosity_test", 0,
- (test_callback_fn)udp_verbosity_test},
- {"udp_quit_test", 0,
- (test_callback_fn)udp_quit_test},
- {"udp_flush_test", 0,
- (test_callback_fn)udp_flush_test},
- {"udp_incr_test", 0,
- (test_callback_fn)udp_incr_test},
- {"udp_decr_test", 0,
- (test_callback_fn)udp_decr_test},
- {"udp_version_test", 0,
- (test_callback_fn)udp_version_test}
- };
- unsigned int x= 0;
- for (x= 0; x < 500; x++)
- {
- current_op= mixed_io_ops[random() % 9];
- test_truth(current_op.test_fn(memc) == TEST_SUCCESS);
- }
- return TEST_SUCCESS;
-}
-
-#if 0
-static test_return_t hash_sanity_test (memcached_st *memc)
-{
- (void)memc;
-
- assert(MEMCACHED_HASH_DEFAULT == MEMCACHED_HASH_DEFAULT);
- assert(MEMCACHED_HASH_MD5 == MEMCACHED_HASH_MD5);
- assert(MEMCACHED_HASH_CRC == MEMCACHED_HASH_CRC);
- assert(MEMCACHED_HASH_FNV1_64 == MEMCACHED_HASH_FNV1_64);
- assert(MEMCACHED_HASH_FNV1A_64 == MEMCACHED_HASH_FNV1A_64);
- assert(MEMCACHED_HASH_FNV1_32 == MEMCACHED_HASH_FNV1_32);
- assert(MEMCACHED_HASH_FNV1A_32 == MEMCACHED_HASH_FNV1A_32);
-#ifdef HAVE_HSIEH_HASH
- assert(MEMCACHED_HASH_HSIEH == MEMCACHED_HASH_HSIEH);
-#endif
- assert(MEMCACHED_HASH_MURMUR == MEMCACHED_HASH_MURMUR);
- assert(MEMCACHED_HASH_JENKINS == MEMCACHED_HASH_JENKINS);
- assert(MEMCACHED_HASH_MAX == MEMCACHED_HASH_MAX);
-
- return TEST_SUCCESS;
-}
-#endif
-
-static test_return_t hsieh_avaibility_test (memcached_st *memc)
-{
- memcached_return_t expected_rc= MEMCACHED_FAILURE;
-#ifdef HAVE_HSIEH_HASH
- expected_rc= MEMCACHED_SUCCESS;
-#endif
- memcached_return_t rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH,
- (uint64_t)MEMCACHED_HASH_HSIEH);
- test_truth(rc == expected_rc);
- return TEST_SUCCESS;
-}
-
-static test_return_t md5_run (memcached_st *memc __attribute__((unused)))
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_MD5);
- test_truth(md5_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t crc_run (memcached_st *memc __attribute__((unused)))
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_CRC);
- test_truth(crc_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fnv1_64_run (memcached_st *memc __attribute__((unused)))
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1_64);
- test_truth(fnv1_64_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fnv1a_64_run (memcached_st *memc __attribute__((unused)))
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1A_64);
- test_truth(fnv1a_64_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fnv1_32_run (memcached_st *memc __attribute__((unused)))
-{
- uint32_t x;
- const char **ptr;
-
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1_32);
- test_truth(fnv1_32_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fnv1a_32_run (memcached_st *memc __attribute__((unused)))
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1A_32);
- test_truth(fnv1a_32_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t hsieh_run (memcached_st *memc __attribute__((unused)))
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_HSIEH);
- test_truth(hsieh_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t murmur_run (memcached_st *memc __attribute__((unused)))
-{
-#ifdef __sparc
- return TEST_SKIPPED;
-#else
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_MURMUR);
- test_truth(murmur_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-#endif
-}
-
-static test_return_t jenkins_run (memcached_st *memc __attribute__((unused)))
-{
- uint32_t x;
- const char **ptr;
-
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_JENKINS);
- test_truth(jenkins_values[x] == hash_val);
- }
-
- return TEST_SUCCESS;
-}
-
-
-static test_return_t ketama_compatibility_libmemcached(memcached_st *trash)
-{
- memcached_return_t rc;
- uint64_t value;
- int x;
- memcached_server_st *server_pool;
- memcached_st *memc;
-
- (void)trash;
-
- memc= memcached_create(NULL);
- test_truth(memc);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
- test_truth(value == 1);
-
- test_truth(memcached_behavior_set_distribution(memc, MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA) == MEMCACHED_SUCCESS);
- test_truth(memcached_behavior_get_distribution(memc) == MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA);
-
-
- server_pool = memcached_servers_parse("10.0.1.1:11211 600,10.0.1.2:11211 300,10.0.1.3:11211 200,10.0.1.4:11211 350,10.0.1.5:11211 1000,10.0.1.6:11211 800,10.0.1.7:11211 950,10.0.1.8:11211 100");
- memcached_server_push(memc, server_pool);
-
- /* verify that the server list was parsed okay. */
- test_truth(memcached_server_count(memc) == 8);
- test_strcmp(server_pool[0].hostname, "10.0.1.1");
- test_truth(server_pool[0].port == 11211);
- test_truth(server_pool[0].weight == 600);
- test_strcmp(server_pool[2].hostname, "10.0.1.3");
- test_truth(server_pool[2].port == 11211);
- test_truth(server_pool[2].weight == 200);
- test_strcmp(server_pool[7].hostname, "10.0.1.8");
- test_truth(server_pool[7].port == 11211);
- test_truth(server_pool[7].weight == 100);
-
- /* VDEAAAAA hashes to fffcd1b5, after the last continuum point, and lets
- * us test the boundary wraparound.
- */
- test_truth(memcached_generate_hash(memc, (char *)"VDEAAAAA", 8) == memc->continuum[0].index);
-
- /* verify the standard ketama set. */
- for (x= 0; x < 99; x++)
- {
- uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases[x].key, strlen(ketama_test_cases[x].key));
- char *hostname = memc->hosts[server_idx].hostname;
-
- test_strcmp(hostname, ketama_test_cases[x].server);
- }
-
- memcached_server_list_free(server_pool);
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t ketama_compatibility_spymemcached(memcached_st *trash)
-{
- memcached_return_t rc;
- uint64_t value;
- int x;
- memcached_server_st *server_pool;
- memcached_st *memc;
-
- (void)trash;
-
- memc= memcached_create(NULL);
- test_truth(memc);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
- test_truth(value == 1);
-
- test_truth(memcached_behavior_set_distribution(memc, MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA_SPY) == MEMCACHED_SUCCESS);
- test_truth(memcached_behavior_get_distribution(memc) == MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA_SPY);
-
- server_pool = memcached_servers_parse("10.0.1.1:11211 600,10.0.1.2:11211 300,10.0.1.3:11211 200,10.0.1.4:11211 350,10.0.1.5:11211 1000,10.0.1.6:11211 800,10.0.1.7:11211 950,10.0.1.8:11211 100");
- memcached_server_push(memc, server_pool);
-
- /* verify that the server list was parsed okay. */
- test_truth(memcached_server_count(memc) == 8);
- test_strcmp(server_pool[0].hostname, "10.0.1.1");
- test_truth(server_pool[0].port == 11211);
- test_truth(server_pool[0].weight == 600);
- test_strcmp(server_pool[2].hostname, "10.0.1.3");
- test_truth(server_pool[2].port == 11211);
- test_truth(server_pool[2].weight == 200);
- test_strcmp(server_pool[7].hostname, "10.0.1.8");
- test_truth(server_pool[7].port == 11211);
- test_truth(server_pool[7].weight == 100);
-
- /* VDEAAAAA hashes to fffcd1b5, after the last continuum point, and lets
- * us test the boundary wraparound.
- */
- test_truth(memcached_generate_hash(memc, (char *)"VDEAAAAA", 8) == memc->continuum[0].index);
-
- /* verify the standard ketama set. */
- for (x= 0; x < 99; x++)
- {
- uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases_spy[x].key, strlen(ketama_test_cases_spy[x].key));
- char *hostname = memc->hosts[server_idx].hostname;
- test_strcmp(hostname, ketama_test_cases_spy[x].server);
- }
-
- memcached_server_list_free(server_pool);
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t regression_bug_434484(memcached_st *memc)
-{
- test_return_t test_rc;
- test_rc= pre_binary(memc);
-
- if (test_rc != TEST_SUCCESS)
- return test_rc;
-
- memcached_return_t ret;
- const char *key= "regression_bug_434484";
- size_t keylen= strlen(key);
-
- ret= memcached_append(memc, key, keylen, key, keylen, 0, 0);
- test_truth(ret == MEMCACHED_NOTSTORED);
-
- size_t size= 2048 * 1024;
- void *data= calloc(1, size);
- test_truth(data != NULL);
- ret= memcached_set(memc, key, keylen, data, size, 0, 0);
- test_truth(ret == MEMCACHED_E2BIG);
- free(data);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t regression_bug_434843(memcached_st *memc)
-{
- test_return_t test_rc;
- test_rc= pre_binary(memc);
-
- if (test_rc != TEST_SUCCESS)
- return test_rc;
-
- memcached_return_t rc;
- unsigned int counter= 0;
- memcached_execute_fn callbacks[1]= { [0]= &callback_counter };
-
- /*
- * I only want to hit only _one_ server so I know the number of requests I'm
- * sending in the pipleine to the server. Let's try to do a multiget of
- * 1024 (that should satisfy most users don't you think?). Future versions
- * will include a mget_execute function call if you need a higher number.
- */
- uint32_t number_of_hosts= memcached_server_count(memc);
- memc->number_of_hosts= 1;
- const size_t max_keys= 1024;
- char **keys= calloc(max_keys, sizeof(char*));
- size_t *key_length=calloc(max_keys, sizeof(size_t));
-
- for (int x= 0; x < (int)max_keys; ++x)
- {
- char k[251];
- key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%u", x);
- keys[x]= strdup(k);
- test_truth(keys[x] != NULL);
- }
-
- /*
- * Run two times.. the first time we should have 100% cache miss,
- * and the second time we should have 100% cache hits
- */
- for (int y= 0; y < 2; ++y)
- {
- rc= memcached_mget(memc, (const char**)keys, key_length, max_keys);
- test_truth(rc == MEMCACHED_SUCCESS);
- rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
- if (y == 0)
- {
- /* The first iteration should give me a 100% cache miss. verify that*/
- test_truth(counter == 0);
- char blob[1024]= { 0 };
- for (int x= 0; x < (int)max_keys; ++x)
- {
- rc= memcached_add(memc, keys[x], key_length[x],
- blob, sizeof(blob), 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
- }
- else
- {
- /* Verify that we received all of the key/value pairs */
- test_truth(counter == (unsigned int)max_keys);
- }
- }
-
- /* Release allocated resources */
- for (size_t x= 0; x < max_keys; ++x)
- free(keys[x]);
- free(keys);
- free(key_length);
-
- memc->number_of_hosts= number_of_hosts;
-
- return TEST_SUCCESS;
-}
-
-static test_return_t regression_bug_434843_buffered(memcached_st *memc)
-{
- memcached_return_t rc;
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- return regression_bug_434843(memc);
-}
-
-static test_return_t regression_bug_421108(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_stat_st *memc_stat= memcached_stat(memc, NULL, &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- char *bytes= memcached_stat_get_value(memc, memc_stat, "bytes", &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(bytes != NULL);
- char *bytes_read= memcached_stat_get_value(memc, memc_stat,
- "bytes_read", &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(bytes_read != NULL);
-
- char *bytes_written= memcached_stat_get_value(memc, memc_stat,
- "bytes_written", &rc);
- test_truth(rc == MEMCACHED_SUCCESS);
- test_truth(bytes_written != NULL);
-
- test_truth(strcmp(bytes, bytes_read) != 0);
- test_truth(strcmp(bytes, bytes_written) != 0);
-
- /* Release allocated resources */
- free(bytes);
- free(bytes_read);
- free(bytes_written);
- memcached_stat_free(NULL, memc_stat);
-
- return TEST_SUCCESS;
-}
-
-/*
- * The test case isn't obvious so I should probably document why
- * it works the way it does. Bug 442914 was caused by a bug
- * in the logic in memcached_purge (it did not handle the case
- * where the number of bytes sent was equal to the watermark).
- * In this test case, create messages so that we hit that case
- * and then disable noreply mode and issue a new command to
- * verify that it isn't stuck. If we change the format for the
- * delete command or the watermarks, we need to update this
- * test....
- */
-static test_return_t regression_bug_442914(memcached_st *memc)
-{
- memcached_return_t rc;
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 1);
- test_truth(rc == MEMCACHED_SUCCESS);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, 1);
-
- uint32_t number_of_hosts= memcached_server_count(memc);
- memc->number_of_hosts= 1;
-
- char k[250];
- size_t len;
-
- for (int x= 0; x < 250; ++x)
- {
- len= (size_t)snprintf(k, sizeof(k), "%0250u", x);
- rc= memcached_delete(memc, k, len, 0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- len= (size_t)snprintf(k, sizeof(k), "%037u", 251);
- rc= memcached_delete(memc, k, len, 0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- rc= memcached_delete(memc, k, len, 0);
- test_truth(rc == MEMCACHED_NOTFOUND);
-
- memc->number_of_hosts= number_of_hosts;
-
- return TEST_SUCCESS;
-}
-
-static test_return_t regression_bug_447342(memcached_st *memc)
-{
- if (memcached_server_count(memc) < 3 || pre_replication(memc) != MEMCACHED_SUCCESS)
- return TEST_SKIPPED;
-
- memcached_return_t rc;
-
- rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 2);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- const size_t max_keys= 100;
- char **keys= calloc(max_keys, sizeof(char*));
- size_t *key_length=calloc(max_keys, sizeof(size_t));
-
- for (int x= 0; x < (int)max_keys; ++x)
- {
- char k[251];
- key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%u", x);
- keys[x]= strdup(k);
- test_truth(keys[x] != NULL);
- rc= memcached_set(memc, k, key_length[x], k, key_length[x], 0, 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
-
- /*
- ** We are using the quiet commands to store the replicas, so we need
- ** to ensure that all of them are processed before we can continue.
- ** In the test we go directly from storing the object to trying to
- ** receive the object from all of the different servers, so we
- ** could end up in a race condition (the memcached server hasn't yet
- ** processed the quiet command from the replication set when it process
- ** the request from the other client (created by the clone)). As a
- ** workaround for that we call memcached_quit to send the quit command
- ** to the server and wait for the response ;-) If you use the test code
- ** as an example for your own code, please note that you shouldn't need
- ** to do this ;-)
- */
- memcached_quit(memc);
-
- /* Verify that all messages are stored, and we didn't stuff too much
- * into the servers
- */
- rc= memcached_mget(memc, (const char* const *)keys, key_length, max_keys);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- unsigned int counter= 0;
- memcached_execute_fn callbacks[1]= { [0]= &callback_counter };
- rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
- /* Verify that we received all of the key/value pairs */
- test_truth(counter == (unsigned int)max_keys);
-
- memcached_quit(memc);
- /*
- * Don't do the following in your code. I am abusing the internal details
- * within the library, and this is not a supported interface.
- * This is to verify correct behavior in the library. Fake that two servers
- * are dead..
- */
- in_port_t port0= memc->hosts[0].port;
- in_port_t port2= memc->hosts[2].port;
-
- memc->hosts[0].port= 0;
- memc->hosts[2].port= 0;
-
- rc= memcached_mget(memc, (const char* const *)keys, key_length, max_keys);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- counter= 0;
- rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
- test_truth(counter == (unsigned int)max_keys);
-
- /* restore the memc handle */
- memc->hosts[0].port= port0;
- memc->hosts[2].port= port2;
-
- memcached_quit(memc);
-
- /* Remove half of the objects */
- for (int x= 0; x < (int)max_keys; ++x)
- {
- if (x & 1)
- {
- rc= memcached_delete(memc, keys[x], key_length[x], 0);
- test_truth(rc == MEMCACHED_SUCCESS);
- }
- }
-
- memcached_quit(memc);
- memc->hosts[0].port= 0;
- memc->hosts[2].port= 0;
-
- /* now retry the command, this time we should have cache misses */
- rc= memcached_mget(memc, (const char* const *)keys, key_length, max_keys);
- test_truth(rc == MEMCACHED_SUCCESS);
-
- counter= 0;
- rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
- test_truth(counter == (unsigned int)(max_keys >> 1));
-
- /* Release allocated resources */
- for (size_t x= 0; x < max_keys; ++x)
- free(keys[x]);
- free(keys);
- free(key_length);
-
- /* restore the memc handle */
- memc->hosts[0].port= port0;
- memc->hosts[2].port= port2;
-
- return TEST_SUCCESS;
-}
-
-static test_return_t regression_bug_463297(memcached_st *memc)
-{
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- test_truth(memc_clone != NULL);
- test_truth(memcached_version(memc_clone) == MEMCACHED_SUCCESS);
-
- if (memc_clone->hosts[0].major_version > 1 ||
- (memc_clone->hosts[0].major_version == 1 &&
- memc_clone->hosts[0].minor_version > 2))
- {
- /* Binary protocol doesn't support deferred delete */
- memcached_st *bin_clone= memcached_clone(NULL, memc);
- test_truth(bin_clone != NULL);
- test_truth(memcached_behavior_set(bin_clone, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1) == MEMCACHED_SUCCESS);
- test_truth(memcached_delete(bin_clone, "foo", 3, 1) == MEMCACHED_INVALID_ARGUMENTS);
- memcached_free(bin_clone);
-
- memcached_quit(memc_clone);
-
- /* If we know the server version, deferred delete should fail
- * with invalid arguments */
- test_truth(memcached_delete(memc_clone, "foo", 3, 1) == MEMCACHED_INVALID_ARGUMENTS);
-
- /* If we don't know the server version, we should get a protocol error */
- memcached_return_t rc= memcached_delete(memc, "foo", 3, 1);
-
- /* but there is a bug in some of the memcached servers (1.4) that treats
- * the counter as noreply so it doesn't send the proper error message
- */
- test_truth(rc == MEMCACHED_PROTOCOL_ERROR || rc == MEMCACHED_NOTFOUND || rc == MEMCACHED_CLIENT_ERROR);
-
- /* And buffered mode should be disabled and we should get protocol error */
- test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1) == MEMCACHED_SUCCESS);
- rc= memcached_delete(memc, "foo", 3, 1);
- test_truth(rc == MEMCACHED_PROTOCOL_ERROR || rc == MEMCACHED_NOTFOUND || rc == MEMCACHED_CLIENT_ERROR);
-
- /* Same goes for noreply... */
- test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 1) == MEMCACHED_SUCCESS);
- rc= memcached_delete(memc, "foo", 3, 1);
- test_truth(rc == MEMCACHED_PROTOCOL_ERROR || rc == MEMCACHED_NOTFOUND || rc == MEMCACHED_CLIENT_ERROR);
-
- /* but a normal request should go through (and be buffered) */
- test_truth((rc= memcached_delete(memc, "foo", 3, 0)) == MEMCACHED_BUFFERED);
- test_truth(memcached_flush_buffers(memc) == MEMCACHED_SUCCESS);
-
- test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 0) == MEMCACHED_SUCCESS);
- /* unbuffered noreply should be success */
- test_truth(memcached_delete(memc, "foo", 3, 0) == MEMCACHED_SUCCESS);
- /* unbuffered with reply should be not found... */
- test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 0) == MEMCACHED_SUCCESS);
- test_truth(memcached_delete(memc, "foo", 3, 0) == MEMCACHED_NOTFOUND);
- }
-
- memcached_free(memc_clone);
- return TEST_SUCCESS;
-}
-
-
-/* Test memcached_server_get_last_disconnect
- * For a working server set, shall be NULL
- * For a set of non existing server, shall not be NULL
- */
-static test_return_t test_get_last_disconnect(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_server_st *disconnected_server;
-
- /* With the working set of server */
- const char *key= "marmotte";
- const char *value= "milka";
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- disconnected_server = memcached_server_get_last_disconnect(memc);
- test_truth(disconnected_server == NULL);
-
- /* With a non existing server */
- memcached_st *mine;
- memcached_server_st *servers;
-
- const char *server_list= "localhost:9";
-
- servers= memcached_servers_parse(server_list);
- test_truth(servers);
- mine= memcached_create(NULL);
- rc= memcached_server_push(mine, servers);
- test_truth(rc == MEMCACHED_SUCCESS);
- memcached_server_list_free(servers);
- test_truth(mine);
-
- rc= memcached_set(mine, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc != MEMCACHED_SUCCESS);
-
- disconnected_server = memcached_server_get_last_disconnect(mine);
- test_truth(disconnected_server != NULL);
- test_truth(disconnected_server->port == 9);
- test_truth(strncmp(disconnected_server->hostname,"localhost",9) == 0);
-
- memcached_quit(mine);
- memcached_free(mine);
-
- return TEST_SUCCESS;
-}
-
-/*
- * This test ensures that the failure counter isn't incremented during
- * normal termination of the memcached instance.
- */
-static test_return_t wrong_failure_counter_test(memcached_st *memc)
-{
- memcached_return_t rc;
-
- /* Set value to force connection to the server */
- const char *key= "marmotte";
- const char *value= "milka";
-
- /*
- * Please note that I'm abusing the internal structures in libmemcached
- * in a non-portable way and you shouldn't be doing this. I'm only
- * doing this in order to verify that the library works the way it should
- */
- uint32_t number_of_hosts= memcached_server_count(memc);
- memc->number_of_hosts= 1;
-
- /* Ensure that we are connected to the server by setting a value */
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
-
- /* The test is to see that the memcached_quit doesn't increase the
- * the server failure conter, so let's ensure that it is zero
- * before sending quit
- */
- memc->hosts[0].server_failure_counter= 0;
-
- memcached_quit(memc);
-
- /* Verify that it memcached_quit didn't increment the failure counter
- * Please note that this isn't bullet proof, because an error could
- * occur...
- */
- test_truth(memc->hosts[0].server_failure_counter == 0);
-
- /* restore the instance */
- memc->number_of_hosts= number_of_hosts;
-
- return TEST_SUCCESS;
-}
-
-test_st udp_setup_server_tests[] ={
- {"set_udp_behavior_test", 0, (test_callback_fn)set_udp_behavior_test},
- {"add_tcp_server_udp_client_test", 0, (test_callback_fn)add_tcp_server_udp_client_test},
- {"add_udp_server_tcp_client_test", 0, (test_callback_fn)add_udp_server_tcp_client_test},
- {0, 0, 0}
-};
-
-test_st upd_io_tests[] ={
- {"udp_set_test", 0, (test_callback_fn)udp_set_test},
- {"udp_buffered_set_test", 0, (test_callback_fn)udp_buffered_set_test},
- {"udp_set_too_big_test", 0, (test_callback_fn)udp_set_too_big_test},
- {"udp_delete_test", 0, (test_callback_fn)udp_delete_test},
- {"udp_buffered_delete_test", 0, (test_callback_fn)udp_buffered_delete_test},
- {"udp_verbosity_test", 0, (test_callback_fn)udp_verbosity_test},
- {"udp_quit_test", 0, (test_callback_fn)udp_quit_test},
- {"udp_flush_test", 0, (test_callback_fn)udp_flush_test},
- {"udp_incr_test", 0, (test_callback_fn)udp_incr_test},
- {"udp_decr_test", 0, (test_callback_fn)udp_decr_test},
- {"udp_stat_test", 0, (test_callback_fn)udp_stat_test},
- {"udp_version_test", 0, (test_callback_fn)udp_version_test},
- {"udp_get_test", 0, (test_callback_fn)udp_get_test},
- {"udp_mixed_io_test", 0, (test_callback_fn)udp_mixed_io_test},
- {0, 0, 0}
-};
-
-/* Clean the server before beginning testing */
-test_st tests[] ={
- {"flush", 0, (test_callback_fn)flush_test },
- {"init", 0, (test_callback_fn)init_test },
- {"allocation", 0, (test_callback_fn)allocation_test },
- {"server_list_null_test", 0, (test_callback_fn)server_list_null_test},
- {"server_unsort", 0, (test_callback_fn)server_unsort_test},
- {"server_sort", 0, (test_callback_fn)server_sort_test},
- {"server_sort2", 0, (test_callback_fn)server_sort2_test},
- {"clone_test", 0, (test_callback_fn)clone_test },
- {"connection_test", 0, (test_callback_fn)connection_test},
- {"callback_test", 0, (test_callback_fn)callback_test},
- {"userdata_test", 0, (test_callback_fn)userdata_test},
- {"error", 0, (test_callback_fn)error_test },
- {"set", 0, (test_callback_fn)set_test },
- {"set2", 0, (test_callback_fn)set_test2 },
- {"set3", 0, (test_callback_fn)set_test3 },
- {"dump", 1, (test_callback_fn)dump_test},
- {"add", 1, (test_callback_fn)add_test },
- {"replace", 1, (test_callback_fn)replace_test },
- {"delete", 1, (test_callback_fn)delete_test },
- {"get", 1, (test_callback_fn)get_test },
- {"get2", 0, (test_callback_fn)get_test2 },
- {"get3", 0, (test_callback_fn)get_test3 },
- {"get4", 0, (test_callback_fn)get_test4 },
- {"partial mget", 0, (test_callback_fn)get_test5 },
- {"stats_servername", 0, (test_callback_fn)stats_servername_test },
- {"increment", 0, (test_callback_fn)increment_test },
- {"increment_with_initial", 1, (test_callback_fn)increment_with_initial_test },
- {"decrement", 0, (test_callback_fn)decrement_test },
- {"decrement_with_initial", 1, (test_callback_fn)decrement_with_initial_test },
- {"increment_by_key", 0, (test_callback_fn)increment_by_key_test },
- {"increment_with_initial_by_key", 1, (test_callback_fn)increment_with_initial_by_key_test },
- {"decrement_by_key", 0, (test_callback_fn)decrement_by_key_test },
- {"decrement_with_initial_by_key", 1, (test_callback_fn)decrement_with_initial_by_key_test },
- {"quit", 0, (test_callback_fn)quit_test },
- {"mget", 1, (test_callback_fn)mget_test },
- {"mget_result", 1, (test_callback_fn)mget_result_test },
- {"mget_result_alloc", 1, (test_callback_fn)mget_result_alloc_test },
- {"mget_result_function", 1, (test_callback_fn)mget_result_function },
- {"mget_execute", 1, (test_callback_fn)mget_execute },
- {"mget_end", 0, (test_callback_fn)mget_end },
- {"get_stats", 0, (test_callback_fn)get_stats },
- {"add_host_test", 0, (test_callback_fn)add_host_test },
- {"add_host_test_1", 0, (test_callback_fn)add_host_test1 },
- {"get_stats_keys", 0, (test_callback_fn)get_stats_keys },
- {"version_string_test", 0, (test_callback_fn)version_string_test},
- {"bad_key", 1, (test_callback_fn)bad_key_test },
- {"memcached_server_cursor", 1, (test_callback_fn)memcached_server_cursor_test },
- {"read_through", 1, (test_callback_fn)read_through },
- {"delete_through", 1, (test_callback_fn)delete_through },
- {"noreply", 1, (test_callback_fn)noreply_test},
- {"analyzer", 1, (test_callback_fn)analyzer_test},
-#ifdef HAVE_LIBMEMCACHEDUTIL
- {"connectionpool", 1, (test_callback_fn)connection_pool_test },
-#endif
- {"test_get_last_disconnect", 1, (test_callback_fn)test_get_last_disconnect},
- {0, 0, 0}
-};
-
-test_st behavior_tests[] ={
- {"behavior_test", 0, (test_callback_fn)behavior_test},
- {0, 0, 0}
-};
-
-test_st async_tests[] ={
- {"add", 1, (test_callback_fn)add_wrapper },
- {0, 0, 0}
-};
-
-test_st string_tests[] ={
- {"string static with null", 0, (test_callback_fn)string_static_null },
- {"string alloc with null", 0, (test_callback_fn)string_alloc_null },
- {"string alloc with 1K", 0, (test_callback_fn)string_alloc_with_size },
- {"string alloc with malloc failure", 0, (test_callback_fn)string_alloc_with_size_toobig },
- {"string append", 0, (test_callback_fn)string_alloc_append },
- {"string append failure (too big)", 0, (test_callback_fn)string_alloc_append_toobig },
- {0, 0, (test_callback_fn)0}
-};
-
-test_st result_tests[] ={
- {"result static", 0, (test_callback_fn)result_static},
- {"result alloc", 0, (test_callback_fn)result_alloc},
- {0, 0, (test_callback_fn)0}
-};
-
-test_st version_1_2_3[] ={
- {"append", 0, (test_callback_fn)append_test },
- {"prepend", 0, (test_callback_fn)prepend_test },
- {"cas", 0, (test_callback_fn)cas_test },
- {"cas2", 0, (test_callback_fn)cas2_test },
- {"append_binary", 0, (test_callback_fn)append_binary_test },
- {0, 0, (test_callback_fn)0}
-};
-
-test_st user_tests[] ={
- {"user_supplied_bug1", 0, (test_callback_fn)user_supplied_bug1 },
- {"user_supplied_bug2", 0, (test_callback_fn)user_supplied_bug2 },
- {"user_supplied_bug3", 0, (test_callback_fn)user_supplied_bug3 },
- {"user_supplied_bug4", 0, (test_callback_fn)user_supplied_bug4 },
- {"user_supplied_bug5", 1, (test_callback_fn)user_supplied_bug5 },
- {"user_supplied_bug6", 1, (test_callback_fn)user_supplied_bug6 },
- {"user_supplied_bug7", 1, (test_callback_fn)user_supplied_bug7 },
- {"user_supplied_bug8", 1, (test_callback_fn)user_supplied_bug8 },
- {"user_supplied_bug9", 1, (test_callback_fn)user_supplied_bug9 },
- {"user_supplied_bug10", 1, (test_callback_fn)user_supplied_bug10 },
- {"user_supplied_bug11", 1, (test_callback_fn)user_supplied_bug11 },
- {"user_supplied_bug12", 1, (test_callback_fn)user_supplied_bug12 },
- {"user_supplied_bug13", 1, (test_callback_fn)user_supplied_bug13 },
- {"user_supplied_bug14", 1, (test_callback_fn)user_supplied_bug14 },
- {"user_supplied_bug15", 1, (test_callback_fn)user_supplied_bug15 },
- {"user_supplied_bug16", 1, (test_callback_fn)user_supplied_bug16 },
-#ifndef __sun
- /*
- ** It seems to be something weird with the character sets..
- ** value_fetch is unable to parse the value line (iscntrl "fails"), so I
- ** guess I need to find out how this is supposed to work.. Perhaps I need
- ** to run the test in a specific locale (I tried zh_CN.UTF-8 without success,
- ** so just disable the code for now...).
- */
- {"user_supplied_bug17", 1, (test_callback_fn)user_supplied_bug17 },
-#endif
- {"user_supplied_bug18", 1, (test_callback_fn)user_supplied_bug18 },
- {"user_supplied_bug19", 1, (test_callback_fn)user_supplied_bug19 },
- {"user_supplied_bug20", 1, (test_callback_fn)user_supplied_bug20 },
- {"user_supplied_bug21", 1, (test_callback_fn)user_supplied_bug21 },
- {"wrong_failure_counter_test", 1, (test_callback_fn)wrong_failure_counter_test},
- {0, 0, (test_callback_fn)0}
-};
-
-test_st replication_tests[]= {
- {"set", 1, (test_callback_fn)replication_set_test },
- {"get", 0, (test_callback_fn)replication_get_test },
- {"mget", 0, (test_callback_fn)replication_mget_test },
- {"delete", 0, (test_callback_fn)replication_delete_test },
- {"rand_mget", 0, (test_callback_fn)replication_randomize_mget_test },
- {0, 0, (test_callback_fn)0}
-};
-
-/*
- * The following test suite is used to verify that we don't introduce
- * regression bugs. If you want more information about the bug / test,
- * you should look in the bug report at
- * http://bugs.launchpad.net/libmemcached
- */
-test_st regression_tests[]= {
- {"lp:434484", 1, (test_callback_fn)regression_bug_434484 },
- {"lp:434843", 1, (test_callback_fn)regression_bug_434843 },
- {"lp:434843 buffered", 1, (test_callback_fn)regression_bug_434843_buffered },
- {"lp:421108", 1, (test_callback_fn)regression_bug_421108 },
- {"lp:442914", 1, (test_callback_fn)regression_bug_442914 },
- {"lp:447342", 1, (test_callback_fn)regression_bug_447342 },
- {"lp:463297", 1, (test_callback_fn)regression_bug_463297 },
- {0, 0, (test_callback_fn)0}
-};
-
-test_st ketama_compatibility[]= {
- {"libmemcached", 1, (test_callback_fn)ketama_compatibility_libmemcached },
- {"spymemcached", 1, (test_callback_fn)ketama_compatibility_spymemcached },
- {0, 0, (test_callback_fn)0}
-};
-
-test_st generate_tests[] ={
- {"generate_pairs", 1, (test_callback_fn)generate_pairs },
- {"generate_data", 1, (test_callback_fn)generate_data },
- {"get_read", 0, (test_callback_fn)get_read },
- {"delete_generate", 0, (test_callback_fn)delete_generate },
- {"generate_buffer_data", 1, (test_callback_fn)generate_buffer_data },
- {"delete_buffer", 0, (test_callback_fn)delete_buffer_generate},
- {"generate_data", 1, (test_callback_fn)generate_data },
- {"mget_read", 0, (test_callback_fn)mget_read },
- {"mget_read_result", 0, (test_callback_fn)mget_read_result },
- {"mget_read_function", 0, (test_callback_fn)mget_read_function },
- {"cleanup", 1, (test_callback_fn)cleanup_pairs },
- {"generate_large_pairs", 1, (test_callback_fn)generate_large_pairs },
- {"generate_data", 1, (test_callback_fn)generate_data },
- {"generate_buffer_data", 1, (test_callback_fn)generate_buffer_data },
- {"cleanup", 1, (test_callback_fn)cleanup_pairs },
- {0, 0, (test_callback_fn)0}
-};
-
-test_st consistent_tests[] ={
- {"generate_pairs", 1, (test_callback_fn)generate_pairs },
- {"generate_data", 1, (test_callback_fn)generate_data },
- {"get_read", 0, (test_callback_fn)get_read_count },
- {"cleanup", 1, (test_callback_fn)cleanup_pairs },
- {0, 0, (test_callback_fn)0}
-};
-
-test_st consistent_weighted_tests[] ={
- {"generate_pairs", 1, (test_callback_fn)generate_pairs },
- {"generate_data", 1, (test_callback_fn)generate_data_with_stats },
- {"get_read", 0, (test_callback_fn)get_read_count },
- {"cleanup", 1, (test_callback_fn)cleanup_pairs },
- {0, 0, (test_callback_fn)0}
-};
-
-test_st hsieh_availability[] ={
- {"hsieh_avaibility_test", 0, (test_callback_fn)hsieh_avaibility_test},
- {0, 0, (test_callback_fn)0}
-};
-
-#if 0
-test_st hash_sanity[] ={
- {"hash sanity", 0, (test_callback_fn)hash_sanity_test},
- {0, 0, (test_callback_fn)0}
-};
-#endif
-
-test_st ketama_auto_eject_hosts[] ={
- {"auto_eject_hosts", 1, (test_callback_fn)auto_eject_hosts },
- {"output_ketama_weighted_keys", 1, (test_callback_fn)output_ketama_weighted_keys },
- {0, 0, (test_callback_fn)0}
-};
-
-test_st hash_tests[] ={
- {"md5", 0, (test_callback_fn)md5_run },
- {"crc", 0, (test_callback_fn)crc_run },
- {"fnv1_64", 0, (test_callback_fn)fnv1_64_run },
- {"fnv1a_64", 0, (test_callback_fn)fnv1a_64_run },
- {"fnv1_32", 0, (test_callback_fn)fnv1_32_run },
- {"fnv1a_32", 0, (test_callback_fn)fnv1a_32_run },
- {"hsieh", 0, (test_callback_fn)hsieh_run },
- {"murmur", 0, (test_callback_fn)murmur_run },
- {"jenkis", 0, (test_callback_fn)jenkins_run },
- {0, 0, (test_callback_fn)0}
-};
-
-collection_st collection[] ={
-#if 0
- {"hash_sanity", 0, 0, hash_sanity},
-#endif
- {"hsieh_availability", 0, 0, hsieh_availability},
- {"udp_setup", (test_callback_fn)init_udp, 0, udp_setup_server_tests},
- {"udp_io", (test_callback_fn)init_udp, 0, upd_io_tests},
- {"udp_binary_io", (test_callback_fn)binary_init_udp, 0, upd_io_tests},
- {"block", 0, 0, tests},
- {"binary", (test_callback_fn)pre_binary, 0, tests},
- {"nonblock", (test_callback_fn)pre_nonblock, 0, tests},
- {"nodelay", (test_callback_fn)pre_nodelay, 0, tests},
- {"settimer", (test_callback_fn)pre_settimer, 0, tests},
- {"md5", (test_callback_fn)pre_md5, 0, tests},
- {"crc", (test_callback_fn)pre_crc, 0, tests},
- {"hsieh", (test_callback_fn)pre_hsieh, 0, tests},
- {"jenkins", (test_callback_fn)pre_jenkins, 0, tests},
- {"fnv1_64", (test_callback_fn)pre_hash_fnv1_64, 0, tests},
- {"fnv1a_64", (test_callback_fn)pre_hash_fnv1a_64, 0, tests},
- {"fnv1_32", (test_callback_fn)pre_hash_fnv1_32, 0, tests},
- {"fnv1a_32", (test_callback_fn)pre_hash_fnv1a_32, 0, tests},
- {"ketama", (test_callback_fn)pre_behavior_ketama, 0, tests},
- {"ketama_auto_eject_hosts", (test_callback_fn)pre_behavior_ketama, 0, ketama_auto_eject_hosts},
- {"unix_socket", (test_callback_fn)pre_unix_socket, 0, tests},
- {"unix_socket_nodelay", (test_callback_fn)pre_nodelay, 0, tests},
- {"poll_timeout", (test_callback_fn)poll_timeout, 0, tests},
- {"gets", (test_callback_fn)enable_cas, 0, tests},
- {"consistent_crc", (test_callback_fn)enable_consistent_crc, 0, tests},
- {"consistent_hsieh", (test_callback_fn)enable_consistent_hsieh, 0, tests},
-#ifdef MEMCACHED_ENABLE_DEPRECATED
- {"deprecated_memory_allocators", (test_callback_fn)deprecated_set_memory_alloc, 0, tests},
-#endif
- {"memory_allocators", (test_callback_fn)set_memory_alloc, 0, tests},
- {"prefix", (test_callback_fn)set_prefix, 0, tests},
- {"version_1_2_3", (test_callback_fn)check_for_1_2_3, 0, version_1_2_3},
- {"string", 0, 0, string_tests},
- {"result", 0, 0, result_tests},
- {"async", (test_callback_fn)pre_nonblock, 0, async_tests},
- {"async_binary", (test_callback_fn)pre_nonblock_binary, 0, async_tests},
- {"user", 0, 0, user_tests},
- {"generate", 0, 0, generate_tests},
- {"generate_hsieh", (test_callback_fn)pre_hsieh, 0, generate_tests},
- {"generate_ketama", (test_callback_fn)pre_behavior_ketama, 0, generate_tests},
- {"generate_hsieh_consistent", (test_callback_fn)enable_consistent_hsieh, 0, generate_tests},
- {"generate_md5", (test_callback_fn)pre_md5, 0, generate_tests},
- {"generate_murmur", (test_callback_fn)pre_murmur, 0, generate_tests},
- {"generate_jenkins", (test_callback_fn)pre_jenkins, 0, generate_tests},
- {"generate_nonblock", (test_callback_fn)pre_nonblock, 0, generate_tests},
- {"consistent_not", 0, 0, consistent_tests},
- {"consistent_ketama", (test_callback_fn)pre_behavior_ketama, 0, consistent_tests},
- {"consistent_ketama_weighted", (test_callback_fn)pre_behavior_ketama_weighted, 0, consistent_weighted_tests},
- {"ketama_compat", 0, 0, ketama_compatibility},
- {"test_hashes", 0, 0, hash_tests},
- {"replication", (test_callback_fn)pre_replication, 0, replication_tests},
- {"replication_noblock", (test_callback_fn)pre_replication_noblock, 0, replication_tests},
- {"regression", 0, 0, regression_tests},
- {"behaviors", 0, 0, behavior_tests},
- {0, 0, 0, 0}
-};
-
-#define SERVERS_TO_CREATE 5
-
-#include "libmemcached_world.h"
-
-void get_world(world_st *world)
-{
- world->collections= collection;
- world->collection_startup= (test_callback_fn)world_collection_startup;
- world->flush= (test_callback_fn)world_flush;
- world->pre_run= (test_callback_fn)world_pre_run;
- world->create= (test_callback_create_fn)world_create;
- world->post_run= (test_callback_fn)world_post_run;
- world->on_error= (test_callback_error_fn)world_on_error;
- world->destroy= (test_callback_fn)world_destroy;
- world->runner= &defualt_libmemcached_runner;
-}
TESTS_LDADDS = libmemcached/libmemcached.la
+VALGRIND_COMMAND= $(LIBTOOL) --mode=execute valgrind --leak-check=yes --show-reachable=yes
+
+DEBUG_COMMAND= $(LIBTOOL) --mode=execute gdb
+
if BUILD_LIBMEMCACHEDUTIL
TESTS_LDADDS+= libmemcached/libmemcachedutil.la
endif
EXTRA_DIST+= \
- tests/r/memcat.res \
- tests/r/memcp.res \
- tests/r/memrm.res \
- tests/r/memslap.res \
- tests/r/memstat.res \
- tests/t/memcat.test \
- tests/t/memcp.test \
- tests/t/memrm.test \
- tests/t/memslap.test \
- tests/t/memstat.test
+ tests/r/memcat.res \
+ tests/r/memcp.res \
+ tests/r/memrm.res \
+ tests/r/memslap.res \
+ tests/r/memstat.res \
+ tests/t/memcat.test \
+ tests/t/memcp.test \
+ tests/t/memrm.test \
+ tests/t/memslap.test \
+ tests/t/memstat.test
noinst_HEADERS+= \
- tests/hash_results.h \
- tests/ketama_test_cases.h \
- tests/ketama_test_cases_spy.h \
- tests/libmemcached_world.h \
- tests/server.h \
- tests/test.h
+ tests/hash_results.h \
+ tests/ketama_test_cases.h \
+ tests/ketama_test_cases_spy.h \
+ tests/libmemcached_world.h \
+ tests/server.h \
+ tests/test.h
noinst_PROGRAMS+= \
- tests/atomsmasher \
- tests/startservers \
- tests/testapp \
- tests/testhashkit \
- tests/testplus \
- tests/udptest
+ tests/atomsmasher \
+ tests/startservers \
+ tests/testapp \
+ tests/testhashkit \
+ tests/testplus \
+ tests/udptest
noinst_LTLIBRARIES+= tests/libserver.la
tests_libserver_la_SOURCES= tests/server.c
tests_libtest_la_SOURCES= tests/test.c
tests_testapp_CFLAGS= $(AM_CFLAGS) $(NO_CONVERSION) $(NO_STRICT_ALIASING)
-tests_testapp_SOURCES= tests/function.c
+tests_testapp_SOURCES= tests/mem_functions.c
tests_testapp_LDADD= \
clients/libgenexec.la \
tests/libserver.la \
sh tests/t/memslap.test > tests/r/memslap.res
sh tests/t/memstat.test > tests/r/memstat.res
-test: test-docs tests/testapp tests/testplus library_test memcapable libmhashkit_test
+test: test-docs tests/testplus library_test memcapable libmhashkit_test
echo "Tests completed"
-library_test:
+library_test: tests/testapp
tests/testapp
libmhashkit_test: libhashkit
cat tests/Xumemc.pid | xargs kill
rm tests/Xumemc.pid
+MEM_COMMAND= tests/testapp $(COLLECTION) $(SUITE)
+
+HASH_COMMAND= tests/testhashkit $(COLLECTION) $(SUITE)
+
+test-mem:
+ $(MEM_COMMAND)
+
+test-hash:
+ $(HASH_COMMAND)
+
gdb-mem:
- $(LIBTOOL) --mode=execute gdb tests/testapp
+ $(DEBUG_COMMAND) $(MEM_COMMAND)
gdb-hash:
- $(LIBTOOL) --mode=execute gdb tests/testhashkit
+ $(DEBUG_COMMAND) $(HASH_COMMAND)
+
+valgrind-mem:
+ $(VALGRIND_COMMAND) $(MEM_COMMAND)
+
+valgrind-hash:
+ $(VALGRIND_COMMAND) $(HASH_COMMAND)
PHONY += valgrind
-valgrind:
- $(LIBTOOL) --mode=execute valgrind --leak-check=yes --show-reachable=yes tests/testapp
+valgrind: tests/testapp tests/testhashkit valgrind-mem valgrind-hash
PHONY += cachegrind
CLEANFILES += tests/cachegrind.out
typedef struct
{
server_startup_st construct;
+ memcached_st *parent;
memcached_st *memc;
} libmemcached_test_container_st;
/* Prototypes for functions we will pass to test framework */
libmemcached_test_container_st *world_create(test_return_t *error);
-test_return_t world_collection_startup(libmemcached_test_container_st *);
+test_return_t world_test_startup(libmemcached_test_container_st *);
test_return_t world_flush(libmemcached_test_container_st *container);
test_return_t world_pre_run(libmemcached_test_container_st *);
static libmemcached_test_container_st global_container;
+/**
+ @note generic shutdown/startup for libmemcached tests.
+*/
+test_return_t world_container_startup(libmemcached_test_container_st *container);
+test_return_t world_container_shutdown(libmemcached_test_container_st *container);
+
libmemcached_test_container_st *world_create(test_return_t *error)
{
memset(&global_container, 0, sizeof(global_container));
return &global_container;
}
-
-test_return_t world_collection_startup(libmemcached_test_container_st *container)
+test_return_t world_container_startup(libmemcached_test_container_st *container)
{
memcached_return_t rc;
- container->memc= memcached_create(NULL);
- test_truth((container->memc != NULL));
+ container->parent= memcached_create(NULL);
+ test_truth((container->parent != NULL));
- rc= memcached_server_push(container->memc, container->construct.servers);
+ rc= memcached_server_push(container->parent, container->construct.servers);
test_truth(rc == MEMCACHED_SUCCESS);
return TEST_SUCCESS;
}
+test_return_t world_container_shutdown(libmemcached_test_container_st *container)
+{
+ memcached_free(container->parent);
+ container->parent= NULL;
+
+ return TEST_SUCCESS;
+}
+
+test_return_t world_test_startup(libmemcached_test_container_st *container)
+{
+ container->memc= memcached_clone(NULL, container->parent);
+ test_truth((container->memc != NULL));
+
+ return TEST_SUCCESS;
+}
+
test_return_t world_flush(libmemcached_test_container_st *container)
{
memcached_flush(container->memc, 0);
for (loop= 0; loop < memcached_server_list_count(container->construct.servers); loop++)
{
- test_truth(container->memc->hosts[loop].fd == -1);
- test_truth(container->memc->hosts[loop].cursor_active == 0);
+ memcached_server_st *instance=
+ memcached_server_instance_fetch(container->memc, loop);
+
+ test_truth(instance->fd == -1);
+ test_truth(instance->cursor_active == 0);
}
return TEST_SUCCESS;
{
(void)test_state;
memcached_free(container->memc);
+ container->memc= NULL;
return TEST_SUCCESS;
}
--- /dev/null
+/* libMemcached Functions Test
+ * Copyright (C) 2006-2009 Brian Aker
+ * All rights reserved.
+ *
+ * Use and distribution licensed under the BSD license. See
+ * the COPYING file in the parent directory for full text.
+ */
+
+/*
+ Sample test application.
+*/
+
+#include "libmemcached/common.h"
+
+#include <assert.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/time.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <signal.h>
+#include <unistd.h>
+#include <time.h>
+#include "server.h"
+#include "clients/generator.h"
+#include "clients/execute.h"
+
+#ifndef INT64_MAX
+#define INT64_MAX LONG_MAX
+#endif
+#ifndef INT32_MAX
+#define INT32_MAX INT_MAX
+#endif
+
+
+#include "test.h"
+
+#ifdef HAVE_LIBMEMCACHEDUTIL
+#include <pthread.h>
+#include "libmemcached/memcached_util.h"
+#endif
+
+#include "hash_results.h"
+
+#define GLOBAL_COUNT 10000
+#define GLOBAL2_COUNT 100
+#define SERVERS_TO_CREATE 5
+static uint32_t global_count;
+
+static pairs_st *global_pairs;
+static const char *global_keys[GLOBAL_COUNT];
+static size_t global_keys_length[GLOBAL_COUNT];
+
+static test_return_t init_test(memcached_st *not_used __attribute__((unused)))
+{
+ memcached_st memc;
+
+ (void)memcached_create(&memc);
+ memcached_free(&memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t server_list_null_test(memcached_st *ptr __attribute__((unused)))
+{
+ memcached_server_st *server_list;
+ memcached_return_t rc;
+
+ server_list= memcached_server_list_append_with_weight(NULL, NULL, 0, 0, NULL);
+ test_truth(server_list == NULL);
+
+ server_list= memcached_server_list_append_with_weight(NULL, "localhost", 0, 0, NULL);
+ test_truth(server_list == NULL);
+
+ server_list= memcached_server_list_append_with_weight(NULL, NULL, 0, 0, &rc);
+ test_truth(server_list == NULL);
+
+ return TEST_SUCCESS;
+}
+
+#define TEST_PORT_COUNT 7
+in_port_t test_ports[TEST_PORT_COUNT];
+
+static memcached_return_t server_display_function(memcached_st *ptr __attribute__((unused)), memcached_server_st *server, void *context)
+{
+ /* Do Nothing */
+ uint32_t bigger= *((uint32_t *)(context));
+ assert(bigger <= server->port);
+ *((uint32_t *)(context))= server->port;
+
+ return MEMCACHED_SUCCESS;
+}
+
+static test_return_t server_sort_test(memcached_st *ptr __attribute__((unused)))
+{
+ uint32_t x;
+ uint32_t bigger= 0; /* Prime the value for the test_truth in server_display_function */
+ memcached_return_t rc;
+ memcached_server_fn callbacks[1];
+ memcached_st *local_memc;
+
+ local_memc= memcached_create(NULL);
+ test_truth(local_memc);
+ memcached_behavior_set(local_memc, MEMCACHED_BEHAVIOR_SORT_HOSTS, 1);
+
+ for (x= 0; x < TEST_PORT_COUNT; x++)
+ {
+ test_ports[x]= (in_port_t)random() % 64000;
+ rc= memcached_server_add_with_weight(local_memc, "localhost", test_ports[x], 0);
+ test_truth(memcached_server_count(local_memc) == x + 1);
+ test_truth(memcached_servers_count(memcached_server_list(local_memc)) == x+1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ callbacks[0]= server_display_function;
+ memcached_server_cursor(local_memc, callbacks, (void *)&bigger, 1);
+
+
+ memcached_free(local_memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t server_sort2_test(memcached_st *ptr __attribute__((unused)))
+{
+ uint32_t bigger= 0; /* Prime the value for the test_truth in server_display_function */
+ memcached_return_t rc;
+ memcached_server_fn callbacks[1];
+ memcached_st *local_memc;
+ memcached_server_instance_st *instance;
+
+ local_memc= memcached_create(NULL);
+ test_truth(local_memc);
+ rc= memcached_behavior_set(local_memc, MEMCACHED_BEHAVIOR_SORT_HOSTS, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_server_add_with_weight(local_memc, "MEMCACHED_BEHAVIOR_SORT_HOSTS", 43043, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ instance= memcached_server_instance_fetch(local_memc, 0);
+ test_truth(instance->port == 43043);
+
+ rc= memcached_server_add_with_weight(local_memc, "MEMCACHED_BEHAVIOR_SORT_HOSTS", 43042, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ instance= memcached_server_instance_fetch(local_memc, 0);
+ test_truth(instance->port == 43042);
+
+ instance= memcached_server_instance_fetch(local_memc, 1);
+ test_truth(instance->port == 43043);
+
+ callbacks[0]= server_display_function;
+ memcached_server_cursor(local_memc, callbacks, (void *)&bigger, 1);
+
+
+ memcached_free(local_memc);
+
+ return TEST_SUCCESS;
+}
+
+static memcached_return_t server_display_unsort_function(memcached_st *ptr __attribute__((unused)), memcached_server_st *server, void *context)
+{
+ /* Do Nothing */
+ uint32_t x= *((uint32_t *)(context));
+
+ assert(test_ports[x] == server->port);
+ *((uint32_t *)(context))= ++x;
+
+ return MEMCACHED_SUCCESS;
+}
+
+static test_return_t server_unsort_test(memcached_st *ptr __attribute__((unused)))
+{
+ uint32_t x;
+ uint32_t counter= 0; /* Prime the value for the test_truth in server_display_function */
+ uint32_t bigger= 0; /* Prime the value for the test_truth in server_display_function */
+ memcached_return_t rc;
+ memcached_server_fn callbacks[1];
+ memcached_st *local_memc;
+
+ local_memc= memcached_create(NULL);
+ test_truth(local_memc);
+
+ for (x= 0; x < TEST_PORT_COUNT; x++)
+ {
+ test_ports[x]= (in_port_t)(random() % 64000);
+ rc= memcached_server_add_with_weight(local_memc, "localhost", test_ports[x], 0);
+ test_truth(memcached_server_count(local_memc) == x+1);
+ test_truth(memcached_servers_count(memcached_server_list(local_memc)) == x+1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ callbacks[0]= server_display_unsort_function;
+ memcached_server_cursor(local_memc, callbacks, (void *)&counter, 1);
+
+ /* Now we sort old data! */
+ memcached_behavior_set(local_memc, MEMCACHED_BEHAVIOR_SORT_HOSTS, 1);
+ callbacks[0]= server_display_function;
+ memcached_server_cursor(local_memc, callbacks, (void *)&bigger, 1);
+
+
+ memcached_free(local_memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t allocation_test(memcached_st *not_used __attribute__((unused)))
+{
+ memcached_st *memc;
+ memc= memcached_create(NULL);
+ test_truth(memc);
+ memcached_free(memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t clone_test(memcached_st *memc)
+{
+ /* All null? */
+ {
+ memcached_st *memc_clone;
+ memc_clone= memcached_clone(NULL, NULL);
+ test_truth(memc_clone);
+ memcached_free(memc_clone);
+ }
+
+ /* Can we init from null? */
+ {
+ memcached_st *memc_clone;
+ memc_clone= memcached_clone(NULL, memc);
+ test_truth(memc_clone);
+
+ test_truth(memc_clone->call_free == memc->call_free);
+ test_truth(memc_clone->call_malloc == memc->call_malloc);
+ test_truth(memc_clone->call_realloc == memc->call_realloc);
+ test_truth(memc_clone->call_calloc == memc->call_calloc);
+ test_truth(memc_clone->connect_timeout == memc->connect_timeout);
+ test_truth(memc_clone->delete_trigger == memc->delete_trigger);
+ test_truth(memc_clone->distribution == memc->distribution);
+ { // Test all of the flags
+ test_truth(memc_clone->flags.no_block == memc->flags.no_block);
+ test_truth(memc_clone->flags.tcp_nodelay == memc->flags.tcp_nodelay);
+ test_truth(memc_clone->flags.reuse_memory == memc->flags.reuse_memory);
+ test_truth(memc_clone->flags.use_cache_lookups == memc->flags.use_cache_lookups);
+ test_truth(memc_clone->flags.support_cas == memc->flags.support_cas);
+ test_truth(memc_clone->flags.buffer_requests == memc->flags.buffer_requests);
+ test_truth(memc_clone->flags.use_sort_hosts == memc->flags.use_sort_hosts);
+ test_truth(memc_clone->flags.verify_key == memc->flags.verify_key);
+ test_truth(memc_clone->flags.ketama_weighted == memc->flags.ketama_weighted);
+ test_truth(memc_clone->flags.binary_protocol == memc->flags.binary_protocol);
+ test_truth(memc_clone->flags.hash_with_prefix_key == memc->flags.hash_with_prefix_key);
+ test_truth(memc_clone->flags.no_reply == memc->flags.no_reply);
+ test_truth(memc_clone->flags.use_udp == memc->flags.use_udp);
+ test_truth(memc_clone->flags.auto_eject_hosts == memc->flags.auto_eject_hosts);
+ test_truth(memc_clone->flags.randomize_replica_read == memc->flags.randomize_replica_read);
+ }
+ test_truth(memc_clone->get_key_failure == memc->get_key_failure);
+ test_truth(memc_clone->hash == memc->hash);
+ test_truth(memc_clone->distribution_hash == memc->distribution_hash);
+ test_truth(memc_clone->io_bytes_watermark == memc->io_bytes_watermark);
+ test_truth(memc_clone->io_msg_watermark == memc->io_msg_watermark);
+ test_truth(memc_clone->io_key_prefetch == memc->io_key_prefetch);
+ test_truth(memc_clone->on_cleanup == memc->on_cleanup);
+ test_truth(memc_clone->on_clone == memc->on_clone);
+ test_truth(memc_clone->poll_timeout == memc->poll_timeout);
+ test_truth(memc_clone->rcv_timeout == memc->rcv_timeout);
+ test_truth(memc_clone->recv_size == memc->recv_size);
+ test_truth(memc_clone->retry_timeout == memc->retry_timeout);
+ test_truth(memc_clone->send_size == memc->send_size);
+ test_truth(memc_clone->server_failure_limit == memc->server_failure_limit);
+ test_truth(memc_clone->snd_timeout == memc->snd_timeout);
+ test_truth(memc_clone->user_data == memc->user_data);
+
+ memcached_free(memc_clone);
+ }
+
+ /* Can we init from struct? */
+ {
+ memcached_st declared_clone;
+ memcached_st *memc_clone;
+ memset(&declared_clone, 0 , sizeof(memcached_st));
+ memc_clone= memcached_clone(&declared_clone, NULL);
+ test_truth(memc_clone);
+ memcached_free(memc_clone);
+ }
+
+ /* Can we init from struct? */
+ {
+ memcached_st declared_clone;
+ memcached_st *memc_clone;
+ memset(&declared_clone, 0 , sizeof(memcached_st));
+ memc_clone= memcached_clone(&declared_clone, memc);
+ test_truth(memc_clone);
+ memcached_free(memc_clone);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t userdata_test(memcached_st *memc)
+{
+ void* foo= NULL;
+ test_truth(memcached_set_user_data(memc, foo) == NULL);
+ test_truth(memcached_get_user_data(memc) == foo);
+ test_truth(memcached_set_user_data(memc, NULL) == foo);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t connection_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+
+ rc= memcached_server_add_with_weight(memc, "localhost", 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t error_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ uint32_t values[] = { 851992627U, 2337886783U, 3196981036U, 4001849190U,
+ 982370485U, 1263635348U, 4242906218U, 3829656100U,
+ 1891735253U, 334139633U, 2257084983U, 3088286104U,
+ 13199785U, 2542027183U, 1097051614U, 199566778U,
+ 2748246961U, 2465192557U, 1664094137U, 2405439045U,
+ 1842224848U, 692413798U, 3479807801U, 919913813U,
+ 4269430871U, 610793021U, 527273862U, 1437122909U,
+ 2300930706U, 2943759320U, 674306647U, 2400528935U,
+ 54481931U, 4186304426U, 1741088401U, 2979625118U,
+ 4159057246U, 3425930182U, 2593724503U};
+
+ // You have updated the memcache_error messages but not updated docs/tests.
+ test_truth(MEMCACHED_MAXIMUM_RETURN == 39);
+ for (rc= MEMCACHED_SUCCESS; rc < MEMCACHED_MAXIMUM_RETURN; rc++)
+ {
+ uint32_t hash_val;
+ const char *msg= memcached_strerror(memc, rc);
+ hash_val= memcached_generate_hash_value(msg, strlen(msg),
+ MEMCACHED_HASH_JENKINS);
+ test_truth(values[rc] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t set_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ const char *value= "when we sanitize";
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t append_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "fig";
+ const char *in_value= "we";
+ char *out_value= NULL;
+ size_t value_length;
+ uint32_t flags;
+
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_set(memc, key, strlen(key),
+ in_value, strlen(in_value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_append(memc, key, strlen(key),
+ " the", strlen(" the"),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_append(memc, key, strlen(key),
+ " people", strlen(" people"),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ out_value= memcached_get(memc, key, strlen(key),
+ &value_length, &flags, &rc);
+ test_truth(!memcmp(out_value, "we the people", strlen("we the people")));
+ test_truth(strlen("we the people") == value_length);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ free(out_value);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t append_binary_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "numbers";
+ unsigned int *store_ptr;
+ unsigned int store_list[] = { 23, 56, 499, 98, 32847, 0 };
+ char *value;
+ size_t value_length;
+ uint32_t flags;
+ unsigned int x;
+
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_set(memc,
+ key, strlen(key),
+ NULL, 0,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ for (x= 0; store_list[x] ; x++)
+ {
+ rc= memcached_append(memc,
+ key, strlen(key),
+ (char *)&store_list[x], sizeof(unsigned int),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ value= memcached_get(memc, key, strlen(key),
+ &value_length, &flags, &rc);
+ test_truth((value_length == (sizeof(unsigned int) * x)));
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ store_ptr= (unsigned int *)value;
+ x= 0;
+ while ((size_t)store_ptr < (size_t)(value + value_length))
+ {
+ test_truth(*store_ptr == store_list[x++]);
+ store_ptr++;
+ }
+ free(value);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t cas2_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"fudge", "son", "food"};
+ size_t key_length[]= {5, 3, 4};
+ const char *value= "we the people";
+ size_t value_length= strlen("we the people");
+ unsigned int x;
+ memcached_result_st results_obj;
+ memcached_result_st *results;
+ unsigned int set= 1;
+
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, set);
+
+ for (x= 0; x < 3; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ keys[x], key_length[x],
+ (time_t)50, (uint32_t)9);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+
+ results= memcached_result_create(memc, &results_obj);
+
+ results= memcached_fetch_result(memc, &results_obj, &rc);
+ test_truth(results);
+ test_truth(results->cas);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcached_result_cas(results));
+
+ test_truth(!memcmp(value, "we the people", strlen("we the people")));
+ test_truth(strlen("we the people") == value_length);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ memcached_result_free(&results_obj);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t cas_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "fun";
+ size_t key_length= strlen(key);
+ const char *value= "we the people";
+ const char* keys[2] = { key, NULL };
+ size_t keylengths[2] = { strlen(key), 0 };
+ size_t value_length= strlen(value);
+ const char *value2= "change the value";
+ size_t value2_length= strlen(value2);
+
+ memcached_result_st results_obj;
+ memcached_result_st *results;
+ unsigned int set= 1;
+
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, set);
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_mget(memc, keys, keylengths, 1);
+
+ results= memcached_result_create(memc, &results_obj);
+
+ results= memcached_fetch_result(memc, &results_obj, &rc);
+ test_truth(results);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcached_result_cas(results));
+ test_truth(!memcmp(value, memcached_result_value(results), value_length));
+ test_truth(strlen(memcached_result_value(results)) == value_length);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ uint64_t cas = memcached_result_cas(results);
+
+ #if 0
+ results= memcached_fetch_result(memc, &results_obj, &rc);
+ test_truth(rc == MEMCACHED_END);
+ test_truth(results == NULL);
+#endif
+
+ rc= memcached_cas(memc, key, key_length, value2, value2_length, 0, 0, cas);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ /*
+ * The item will have a new cas value, so try to set it again with the old
+ * value. This should fail!
+ */
+ rc= memcached_cas(memc, key, key_length, value2, value2_length, 0, 0, cas);
+ test_truth(rc == MEMCACHED_DATA_EXISTS);
+
+ memcached_result_free(&results_obj);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t prepend_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "fig";
+ const char *value= "people";
+ char *out_value= NULL;
+ size_t value_length;
+ uint32_t flags;
+
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_prepend(memc, key, strlen(key),
+ "the ", strlen("the "),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_prepend(memc, key, strlen(key),
+ "we ", strlen("we "),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ out_value= memcached_get(memc, key, strlen(key),
+ &value_length, &flags, &rc);
+ test_truth(!memcmp(out_value, "we the people", strlen("we the people")));
+ test_truth(strlen("we the people") == value_length);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ free(out_value);
+
+ return TEST_SUCCESS;
+}
+
+/*
+ Set the value, then quit to make sure it is flushed.
+ Come back in and test that add fails.
+*/
+static test_return_t add_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ const char *value= "when we sanitize";
+ unsigned long long setting_value;
+
+ setting_value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NO_BLOCK);
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ memcached_quit(memc);
+ rc= memcached_add(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+
+ /* Too many broken OS'es have broken loopback in async, so we can't be sure of the result */
+ if (setting_value)
+ {
+ test_truth(rc == MEMCACHED_NOTSTORED || rc == MEMCACHED_STORED);
+ }
+ else
+ {
+ test_truth(rc == MEMCACHED_NOTSTORED || rc == MEMCACHED_DATA_EXISTS);
+ }
+
+ return TEST_SUCCESS;
+}
+
+/*
+** There was a problem of leaking filedescriptors in the initial release
+** of MacOSX 10.5. This test case triggers the problem. On some Solaris
+** systems it seems that the kernel is slow on reclaiming the resources
+** because the connects starts to time out (the test doesn't do much
+** anyway, so just loop 10 iterations)
+*/
+static test_return_t add_wrapper(memcached_st *memc)
+{
+ unsigned int x;
+ unsigned int max= 10000;
+#ifdef __sun
+ max= 10;
+#endif
+#ifdef __APPLE__
+ max= 10;
+#endif
+
+ for (x= 0; x < max; x++)
+ add_test(memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t replace_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ const char *value= "when we sanitize";
+ const char *original= "first we insert some data";
+
+ rc= memcached_set(memc, key, strlen(key),
+ original, strlen(original),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ rc= memcached_replace(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t delete_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ const char *value= "when we sanitize";
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ rc= memcached_delete(memc, key, strlen(key), (time_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t flush_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ return TEST_SUCCESS;
+}
+
+static memcached_return_t server_function(memcached_st *ptr __attribute__((unused)),
+ memcached_server_st *server __attribute__((unused)),
+ void *context __attribute__((unused)))
+{
+ /* Do Nothing */
+
+ return MEMCACHED_SUCCESS;
+}
+
+static test_return_t memcached_server_cursor_test(memcached_st *memc)
+{
+ char context[8];
+ strcpy(context, "foo bad");
+ memcached_server_fn callbacks[1];
+
+ callbacks[0]= server_function;
+ memcached_server_cursor(memc, callbacks, context, 1);
+ return TEST_SUCCESS;
+}
+
+static test_return_t bad_key_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo bad";
+ char *string;
+ size_t string_length;
+ uint32_t flags;
+ memcached_st *memc_clone;
+ unsigned int set= 1;
+ size_t max_keylen= 0xffff;
+
+ // Just skip if we are in binary mode.
+ if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL))
+ return TEST_SKIPPED;
+
+ memc_clone= memcached_clone(NULL, memc);
+ test_truth(memc_clone);
+
+ rc= memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_VERIFY_KEY, set);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ /* All keys are valid in the binary protocol (except for length) */
+ if (memcached_behavior_get(memc_clone, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 0)
+ {
+ string= memcached_get(memc_clone, key, strlen(key),
+ &string_length, &flags, &rc);
+ test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
+ test_truth(string_length == 0);
+ test_truth(!string);
+
+ set= 0;
+ rc= memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_VERIFY_KEY, set);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ string= memcached_get(memc_clone, key, strlen(key),
+ &string_length, &flags, &rc);
+ test_truth(rc == MEMCACHED_NOTFOUND);
+ test_truth(string_length == 0);
+ test_truth(!string);
+
+ /* Test multi key for bad keys */
+ const char *keys[] = { "GoodKey", "Bad Key", "NotMine" };
+ size_t key_lengths[] = { 7, 7, 7 };
+ set= 1;
+ rc= memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_VERIFY_KEY, set);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_mget(memc_clone, keys, key_lengths, 3);
+ test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
+
+ rc= memcached_mget_by_key(memc_clone, "foo daddy", 9, keys, key_lengths, 1);
+ test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
+
+ max_keylen= 250;
+
+ /* The following test should be moved to the end of this function when the
+ memcached server is updated to allow max size length of the keys in the
+ binary protocol
+ */
+ rc= memcached_callback_set(memc_clone, MEMCACHED_CALLBACK_PREFIX_KEY, NULL);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ char *longkey= malloc(max_keylen + 1);
+ if (longkey != NULL)
+ {
+ memset(longkey, 'a', max_keylen + 1);
+ string= memcached_get(memc_clone, longkey, max_keylen,
+ &string_length, &flags, &rc);
+ test_truth(rc == MEMCACHED_NOTFOUND);
+ test_truth(string_length == 0);
+ test_truth(!string);
+
+ string= memcached_get(memc_clone, longkey, max_keylen + 1,
+ &string_length, &flags, &rc);
+ test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
+ test_truth(string_length == 0);
+ test_truth(!string);
+
+ free(longkey);
+ }
+ }
+
+ /* Make sure zero length keys are marked as bad */
+ set= 1;
+ rc= memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_VERIFY_KEY, set);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ string= memcached_get(memc_clone, key, 0,
+ &string_length, &flags, &rc);
+ test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
+ test_truth(string_length == 0);
+ test_truth(!string);
+
+ memcached_free(memc_clone);
+
+ return TEST_SUCCESS;
+}
+
+#define READ_THROUGH_VALUE "set for me"
+static memcached_return_t read_through_trigger(memcached_st *memc __attribute__((unused)),
+ char *key __attribute__((unused)),
+ size_t key_length __attribute__((unused)),
+ memcached_result_st *result)
+{
+
+ return memcached_result_set_value(result, READ_THROUGH_VALUE, strlen(READ_THROUGH_VALUE));
+}
+
+static test_return_t read_through(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ char *string;
+ size_t string_length;
+ uint32_t flags;
+ memcached_trigger_key_fn cb= (memcached_trigger_key_fn)read_through_trigger;
+
+ string= memcached_get(memc, key, strlen(key),
+ &string_length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_NOTFOUND);
+ test_false(string_length);
+ test_false(string);
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_GET_FAILURE,
+ *(void **)&cb);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ string= memcached_get(memc, key, strlen(key),
+ &string_length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(string_length == strlen(READ_THROUGH_VALUE));
+ test_strcmp(READ_THROUGH_VALUE, string);
+ free(string);
+
+ string= memcached_get(memc, key, strlen(key),
+ &string_length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(string_length == strlen(READ_THROUGH_VALUE));
+ test_truth(!strcmp(READ_THROUGH_VALUE, string));
+ free(string);
+
+ return TEST_SUCCESS;
+}
+
+static memcached_return_t delete_trigger(memcached_st *ptr __attribute__((unused)),
+ const char *key,
+ size_t key_length __attribute__((unused)))
+{
+ assert(key);
+
+ return MEMCACHED_SUCCESS;
+}
+
+static test_return_t delete_through(memcached_st *memc)
+{
+ memcached_trigger_delete_key_fn callback;
+ memcached_return_t rc;
+
+ callback= (memcached_trigger_delete_key_fn)delete_trigger;
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_DELETE_TRIGGER, *(void**)&callback);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t get_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ char *string;
+ size_t string_length;
+ uint32_t flags;
+
+ rc= memcached_delete(memc, key, strlen(key), (time_t)0);
+ test_truth(rc == MEMCACHED_BUFFERED || rc == MEMCACHED_NOTFOUND);
+
+ string= memcached_get(memc, key, strlen(key),
+ &string_length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_NOTFOUND);
+ test_false(string_length);
+ test_false(string);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t get_test2(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ const char *value= "when we sanitize";
+ char *string;
+ size_t string_length;
+ uint32_t flags;
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ string= memcached_get(memc, key, strlen(key),
+ &string_length, &flags, &rc);
+
+ test_truth(string);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(string_length == strlen(value));
+ test_truth(!memcmp(string, value, string_length));
+
+ free(string);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t set_test2(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ const char *value= "train in the brain";
+ size_t value_length= strlen(value);
+ unsigned int x;
+
+ for (x= 0; x < 10; x++)
+ {
+ rc= memcached_set(memc, key, strlen(key),
+ value, value_length,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t set_test3(memcached_st *memc)
+{
+ memcached_return_t rc;
+ char *value;
+ size_t value_length= 8191;
+ unsigned int x;
+
+ value = (char*)malloc(value_length);
+ test_truth(value);
+
+ for (x= 0; x < value_length; x++)
+ value[x] = (char) (x % 127);
+
+ /* The dump test relies on there being at least 32 items in memcached */
+ for (x= 0; x < 32; x++)
+ {
+ char key[16];
+
+ sprintf(key, "foo%u", x);
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, value_length,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ free(value);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t get_test3(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ char *value;
+ size_t value_length= 8191;
+ char *string;
+ size_t string_length;
+ uint32_t flags;
+ uint32_t x;
+
+ value = (char*)malloc(value_length);
+ test_truth(value);
+
+ for (x= 0; x < value_length; x++)
+ value[x] = (char) (x % 127);
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, value_length,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ string= memcached_get(memc, key, strlen(key),
+ &string_length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(string);
+ test_truth(string_length == value_length);
+ test_truth(!memcmp(string, value, string_length));
+
+ free(string);
+ free(value);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t get_test4(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ char *value;
+ size_t value_length= 8191;
+ char *string;
+ size_t string_length;
+ uint32_t flags;
+ uint32_t x;
+
+ value = (char*)malloc(value_length);
+ test_truth(value);
+
+ for (x= 0; x < value_length; x++)
+ value[x] = (char) (x % 127);
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, value_length,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ for (x= 0; x < 10; x++)
+ {
+ string= memcached_get(memc, key, strlen(key),
+ &string_length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(string);
+ test_truth(string_length == value_length);
+ test_truth(!memcmp(string, value, string_length));
+ free(string);
+ }
+
+ free(value);
+
+ return TEST_SUCCESS;
+}
+
+/*
+ * This test verifies that memcached_read_one_response doesn't try to
+ * dereference a NIL-pointer if you issue a multi-get and don't read out all
+ * responses before you execute a storage command.
+ */
+static test_return_t get_test5(memcached_st *memc)
+{
+ /*
+ ** Request the same key twice, to ensure that we hash to the same server
+ ** (so that we have multiple response values queued up) ;-)
+ */
+ const char *keys[]= { "key", "key" };
+ size_t lengths[]= { 3, 3 };
+ uint32_t flags;
+ size_t rlen;
+
+ memcached_return_t rc= memcached_set(memc, keys[0], lengths[0],
+ keys[0], lengths[0], 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ rc= memcached_mget(memc, keys, lengths, 2);
+
+ memcached_result_st results_obj;
+ memcached_result_st *results;
+ results=memcached_result_create(memc, &results_obj);
+ test_truth(results);
+ results=memcached_fetch_result(memc, &results_obj, &rc);
+ test_truth(results);
+ memcached_result_free(&results_obj);
+
+ /* Don't read out the second result, but issue a set instead.. */
+ rc= memcached_set(memc, keys[0], lengths[0], keys[0], lengths[0], 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ char *val= memcached_get_by_key(memc, keys[0], lengths[0], "yek", 3,
+ &rlen, &flags, &rc);
+ test_truth(val == NULL);
+ test_truth(rc == MEMCACHED_NOTFOUND);
+ val= memcached_get(memc, keys[0], lengths[0], &rlen, &flags, &rc);
+ test_truth(val != NULL);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ free(val);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t mget_end(memcached_st *memc)
+{
+ const char *keys[]= { "foo", "foo2" };
+ size_t lengths[]= { 3, 4 };
+ const char *values[]= { "fjord", "41" };
+
+ memcached_return_t rc;
+
+ // Set foo and foo2
+ for (int i= 0; i < 2; i++)
+ {
+ rc= memcached_set(memc, keys[i], lengths[i], values[i], strlen(values[i]),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ char *string;
+ size_t string_length;
+ uint32_t flags;
+
+ // retrieve both via mget
+ rc= memcached_mget(memc, keys, lengths, 2);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ char key[MEMCACHED_MAX_KEY];
+ size_t key_length;
+
+ // this should get both
+ for (int i = 0; i < 2; i++)
+ {
+ string= memcached_fetch(memc, key, &key_length, &string_length,
+ &flags, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ int val = 0;
+ if (key_length == 4)
+ val= 1;
+ test_truth(string_length == strlen(values[val]));
+ test_truth(strncmp(values[val], string, string_length) == 0);
+ free(string);
+ }
+
+ // this should indicate end
+ string= memcached_fetch(memc, key, &key_length, &string_length, &flags, &rc);
+ test_truth(rc == MEMCACHED_END);
+
+ // now get just one
+ rc= memcached_mget(memc, keys, lengths, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ string= memcached_fetch(memc, key, &key_length, &string_length, &flags, &rc);
+ test_truth(key_length == lengths[0]);
+ test_truth(strncmp(keys[0], key, key_length) == 0);
+ test_truth(string_length == strlen(values[0]));
+ test_truth(strncmp(values[0], string, string_length) == 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ free(string);
+
+ // this should indicate end
+ string= memcached_fetch(memc, key, &key_length, &string_length, &flags, &rc);
+ test_truth(rc == MEMCACHED_END);
+
+ return TEST_SUCCESS;
+}
+
+/* Do not copy the style of this code, I just access hosts to testthis function */
+static test_return_t stats_servername_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ memcached_stat_st memc_stat;
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, 0);
+
+ rc= memcached_stat_servername(&memc_stat, NULL,
+ instance->hostname,
+ instance->port);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t increment_test(memcached_st *memc)
+{
+ uint64_t new_number;
+ memcached_return_t rc;
+ const char *key= "number";
+ const char *value= "0";
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ rc= memcached_increment(memc, key, strlen(key),
+ 1, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == 1);
+
+ rc= memcached_increment(memc, key, strlen(key),
+ 1, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == 2);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t increment_with_initial_test(memcached_st *memc)
+{
+ if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
+ {
+ uint64_t new_number;
+ memcached_return_t rc;
+ const char *key= "number";
+ uint64_t initial= 0;
+
+ rc= memcached_increment_with_initial(memc, key, strlen(key),
+ 1, initial, 0, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == initial);
+
+ rc= memcached_increment_with_initial(memc, key, strlen(key),
+ 1, initial, 0, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == (initial + 1));
+ }
+ return TEST_SUCCESS;
+}
+
+static test_return_t decrement_test(memcached_st *memc)
+{
+ uint64_t new_number;
+ memcached_return_t rc;
+ const char *key= "number";
+ const char *value= "3";
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ rc= memcached_decrement(memc, key, strlen(key),
+ 1, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == 2);
+
+ rc= memcached_decrement(memc, key, strlen(key),
+ 1, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == 1);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t decrement_with_initial_test(memcached_st *memc)
+{
+ if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
+ {
+ uint64_t new_number;
+ memcached_return_t rc;
+ const char *key= "number";
+ uint64_t initial= 3;
+
+ rc= memcached_decrement_with_initial(memc, key, strlen(key),
+ 1, initial, 0, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == initial);
+
+ rc= memcached_decrement_with_initial(memc, key, strlen(key),
+ 1, initial, 0, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == (initial - 1));
+ }
+ return TEST_SUCCESS;
+}
+
+static test_return_t increment_by_key_test(memcached_st *memc)
+{
+ uint64_t new_number;
+ memcached_return_t rc;
+ const char *master_key= "foo";
+ const char *key= "number";
+ const char *value= "0";
+
+ rc= memcached_set_by_key(memc, master_key, strlen(master_key),
+ key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ rc= memcached_increment_by_key(memc, master_key, strlen(master_key), key, strlen(key),
+ 1, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == 1);
+
+ rc= memcached_increment_by_key(memc, master_key, strlen(master_key), key, strlen(key),
+ 1, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == 2);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t increment_with_initial_by_key_test(memcached_st *memc)
+{
+ if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
+ {
+ uint64_t new_number;
+ memcached_return_t rc;
+ const char *master_key= "foo";
+ const char *key= "number";
+ uint64_t initial= 0;
+
+ rc= memcached_increment_with_initial_by_key(memc, master_key, strlen(master_key),
+ key, strlen(key),
+ 1, initial, 0, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == initial);
+
+ rc= memcached_increment_with_initial_by_key(memc, master_key, strlen(master_key),
+ key, strlen(key),
+ 1, initial, 0, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == (initial + 1));
+ }
+ return TEST_SUCCESS;
+}
+
+static test_return_t decrement_by_key_test(memcached_st *memc)
+{
+ uint64_t new_number;
+ memcached_return_t rc;
+ const char *master_key= "foo";
+ const char *key= "number";
+ const char *value= "3";
+
+ rc= memcached_set_by_key(memc, master_key, strlen(master_key),
+ key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ rc= memcached_decrement_by_key(memc, master_key, strlen(master_key),
+ key, strlen(key),
+ 1, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == 2);
+
+ rc= memcached_decrement_by_key(memc, master_key, strlen(master_key),
+ key, strlen(key),
+ 1, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == 1);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t decrement_with_initial_by_key_test(memcached_st *memc)
+{
+ if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
+ {
+ uint64_t new_number;
+ memcached_return_t rc;
+ const char *master_key= "foo";
+ const char *key= "number";
+ uint64_t initial= 3;
+
+ rc= memcached_decrement_with_initial_by_key(memc, master_key, strlen(master_key),
+ key, strlen(key),
+ 1, initial, 0, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == initial);
+
+ rc= memcached_decrement_with_initial_by_key(memc, master_key, strlen(master_key),
+ key, strlen(key),
+ 1, initial, 0, &new_number);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(new_number == (initial - 1));
+ }
+ return TEST_SUCCESS;
+}
+
+static test_return_t quit_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "fudge";
+ const char *value= "sanford and sun";
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)10, (uint32_t)3);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ memcached_quit(memc);
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)50, (uint32_t)9);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t mget_result_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"fudge", "son", "food"};
+ size_t key_length[]= {5, 3, 4};
+ unsigned int x;
+
+ memcached_result_st results_obj;
+ memcached_result_st *results;
+
+ results= memcached_result_create(memc, &results_obj);
+ test_truth(results);
+ test_truth(&results_obj == results);
+
+ /* We need to empty the server before continueing test */
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ while ((results= memcached_fetch_result(memc, &results_obj, &rc)) != NULL)
+ {
+ test_truth(results);
+ }
+
+ while ((results= memcached_fetch_result(memc, &results_obj, &rc)) != NULL)
+ test_truth(!results);
+ test_truth(rc == MEMCACHED_END);
+
+ for (x= 0; x < 3; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ keys[x], key_length[x],
+ (time_t)50, (uint32_t)9);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ while ((results= memcached_fetch_result(memc, &results_obj, &rc)))
+ {
+ test_truth(results);
+ test_truth(&results_obj == results);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcached_result_key_length(results) == memcached_result_length(results));
+ test_truth(!memcmp(memcached_result_key_value(results),
+ memcached_result_value(results),
+ memcached_result_length(results)));
+ }
+
+ memcached_result_free(&results_obj);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t mget_result_alloc_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"fudge", "son", "food"};
+ size_t key_length[]= {5, 3, 4};
+ unsigned int x;
+
+ memcached_result_st *results;
+
+ /* We need to empty the server before continueing test */
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ while ((results= memcached_fetch_result(memc, NULL, &rc)) != NULL)
+ {
+ test_truth(results);
+ }
+ test_truth(!results);
+ test_truth(rc == MEMCACHED_END);
+
+ for (x= 0; x < 3; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ keys[x], key_length[x],
+ (time_t)50, (uint32_t)9);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ x= 0;
+ while ((results= memcached_fetch_result(memc, NULL, &rc)))
+ {
+ test_truth(results);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcached_result_key_length(results) == memcached_result_length(results));
+ test_truth(!memcmp(memcached_result_key_value(results),
+ memcached_result_value(results),
+ memcached_result_length(results)));
+ memcached_result_free(results);
+ x++;
+ }
+
+ return TEST_SUCCESS;
+}
+
+/* Count the results */
+static memcached_return_t callback_counter(memcached_st *ptr __attribute__((unused)),
+ memcached_result_st *result __attribute__((unused)),
+ void *context)
+{
+ unsigned int *counter= (unsigned int *)context;
+
+ *counter= *counter + 1;
+
+ return MEMCACHED_SUCCESS;
+}
+
+static test_return_t mget_result_function(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"fudge", "son", "food"};
+ size_t key_length[]= {5, 3, 4};
+ unsigned int x;
+ unsigned int counter;
+ memcached_execute_fn callbacks[1];
+
+ /* We need to empty the server before continueing test */
+ rc= memcached_flush(memc, 0);
+ for (x= 0; x < 3; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ keys[x], key_length[x],
+ (time_t)50, (uint32_t)9);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ callbacks[0]= &callback_counter;
+ counter= 0;
+ rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
+
+ test_truth(counter == 3);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t mget_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"fudge", "son", "food"};
+ size_t key_length[]= {5, 3, 4};
+ unsigned int x;
+ uint32_t flags;
+
+ char return_key[MEMCACHED_MAX_KEY];
+ size_t return_key_length;
+ char *return_value;
+ size_t return_value_length;
+
+ /* We need to empty the server before continueing test */
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
+ &return_value_length, &flags, &rc)) != NULL)
+ {
+ test_truth(return_value);
+ }
+ test_truth(!return_value);
+ test_truth(return_value_length == 0);
+ test_truth(rc == MEMCACHED_END);
+
+ for (x= 0; x < 3; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ keys[x], key_length[x],
+ (time_t)50, (uint32_t)9);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ x= 0;
+ while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
+ &return_value_length, &flags, &rc)))
+ {
+ test_truth(return_value);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(return_key_length == return_value_length);
+ test_truth(!memcmp(return_value, return_key, return_value_length));
+ free(return_value);
+ x++;
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t mget_execute(memcached_st *memc)
+{
+ bool binary= false;
+ if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) != 0)
+ binary= true;
+
+ /*
+ * I only want to hit _one_ server so I know the number of requests I'm
+ * sending in the pipeline.
+ */
+ uint32_t number_of_hosts= memc->number_of_hosts;
+ memc->number_of_hosts= 1;
+
+ int max_keys= binary ? 20480 : 1;
+
+
+ char **keys= calloc((size_t)max_keys, sizeof(char*));
+ size_t *key_length=calloc((size_t)max_keys, sizeof(size_t));
+
+ /* First add all of the items.. */
+ char blob[1024] = {0};
+ memcached_return_t rc;
+ for (int x= 0; x < max_keys; ++x)
+ {
+ char k[251];
+ key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%u", x);
+ keys[x]= strdup(k);
+ test_truth(keys[x] != NULL);
+ rc= memcached_add(memc, keys[x], key_length[x], blob, sizeof(blob), 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ /* Try to get all of them with a large multiget */
+ unsigned int counter= 0;
+ memcached_execute_fn callbacks[1]= { [0]= &callback_counter };
+ rc= memcached_mget_execute(memc, (const char**)keys, key_length,
+ (size_t)max_keys, callbacks, &counter, 1);
+
+ if (binary)
+ {
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
+ test_truth(rc == MEMCACHED_END);
+
+ /* Verify that we got all of the items */
+ test_truth(counter == (unsigned int)max_keys);
+ }
+ else
+ {
+ test_truth(rc == MEMCACHED_NOT_SUPPORTED);
+ test_truth(counter == 0);
+ }
+
+ /* Release all allocated resources */
+ for (int x= 0; x < max_keys; ++x)
+ free(keys[x]);
+ free(keys);
+ free(key_length);
+
+ memc->number_of_hosts= number_of_hosts;
+ return TEST_SUCCESS;
+}
+
+static test_return_t get_stats_keys(memcached_st *memc)
+{
+ char **stat_list;
+ char **ptr;
+ memcached_stat_st memc_stat;
+ memcached_return_t rc;
+
+ stat_list= memcached_stat_get_keys(memc, &memc_stat, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ for (ptr= stat_list; *ptr; ptr++)
+ test_truth(*ptr);
+
+ free(stat_list);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t version_string_test(memcached_st *memc __attribute__((unused)))
+{
+ const char *version_string;
+
+ version_string= memcached_lib_version();
+
+ test_truth(!strcmp(version_string, LIBMEMCACHED_VERSION_STRING));
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t get_stats(memcached_st *memc)
+{
+ unsigned int x;
+ char **stat_list;
+ char **ptr;
+ memcached_return_t rc;
+ memcached_stat_st *memc_stat;
+
+ memc_stat= memcached_stat(memc, NULL, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memc_stat);
+
+ for (x= 0; x < memcached_server_count(memc); x++)
+ {
+ stat_list= memcached_stat_get_keys(memc, memc_stat+x, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ for (ptr= stat_list; *ptr; ptr++);
+
+ free(stat_list);
+ }
+
+ memcached_stat_free(NULL, memc_stat);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t add_host_test(memcached_st *memc)
+{
+ unsigned int x;
+ memcached_server_st *servers;
+ memcached_return_t rc;
+ char servername[]= "0.example.com";
+
+ servers= memcached_server_list_append_with_weight(NULL, servername, 400, 0, &rc);
+ test_truth(servers);
+ test_truth(1 == memcached_server_list_count(servers));
+
+ for (x= 2; x < 20; x++)
+ {
+ char buffer[SMALL_STRING_LEN];
+
+ snprintf(buffer, SMALL_STRING_LEN, "%u.example.com", 400+x);
+ servers= memcached_server_list_append_with_weight(servers, buffer, 401, 0,
+ &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(x == memcached_server_list_count(servers));
+ }
+
+ rc= memcached_server_push(memc, servers);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ rc= memcached_server_push(memc, servers);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ memcached_server_list_free(servers);
+
+ return TEST_SUCCESS;
+}
+
+static memcached_return_t clone_test_callback(memcached_st *parent __attribute__((unused)), memcached_st *memc_clone __attribute__((unused)))
+{
+ return MEMCACHED_SUCCESS;
+}
+
+static memcached_return_t cleanup_test_callback(memcached_st *ptr __attribute__((unused)))
+{
+ return MEMCACHED_SUCCESS;
+}
+
+static test_return_t callback_test(memcached_st *memc)
+{
+ /* Test User Data */
+ {
+ int x= 5;
+ int *test_ptr;
+ memcached_return_t rc;
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_USER_DATA, &x);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_ptr= (int *)memcached_callback_get(memc, MEMCACHED_CALLBACK_USER_DATA, &rc);
+ test_truth(*test_ptr == x);
+ }
+
+ /* Test Clone Callback */
+ {
+ memcached_clone_fn clone_cb= (memcached_clone_fn)clone_test_callback;
+ void *clone_cb_ptr= *(void **)&clone_cb;
+ void *temp_function= NULL;
+ memcached_return_t rc;
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION,
+ clone_cb_ptr);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ temp_function= memcached_callback_get(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION, &rc);
+ test_truth(temp_function == clone_cb_ptr);
+ }
+
+ /* Test Cleanup Callback */
+ {
+ memcached_cleanup_fn cleanup_cb=
+ (memcached_cleanup_fn)cleanup_test_callback;
+ void *cleanup_cb_ptr= *(void **)&cleanup_cb;
+ void *temp_function= NULL;
+ memcached_return_t rc;
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION,
+ cleanup_cb_ptr);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ temp_function= memcached_callback_get(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION, &rc);
+ test_truth(temp_function == cleanup_cb_ptr);
+ }
+
+ return TEST_SUCCESS;
+}
+
+/* We don't test the behavior itself, we test the switches */
+static test_return_t behavior_test(memcached_st *memc)
+{
+ uint64_t value;
+ uint32_t set= 1;
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, set);
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NO_BLOCK);
+ test_truth(value == 1);
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, set);
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY);
+ test_truth(value == 1);
+
+ set= MEMCACHED_HASH_MD5;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, set);
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
+ test_truth(value == MEMCACHED_HASH_MD5);
+
+ set= 0;
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, set);
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NO_BLOCK);
+ test_truth(value == 0);
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, set);
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY);
+ test_truth(value == 0);
+
+ set= MEMCACHED_HASH_DEFAULT;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, set);
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
+ test_truth(value == MEMCACHED_HASH_DEFAULT);
+
+ set= MEMCACHED_HASH_CRC;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, set);
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
+ test_truth(value == MEMCACHED_HASH_CRC);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE);
+ test_truth(value > 0);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE);
+ test_truth(value > 0);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS);
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, value + 1);
+ test_truth((value + 1) == memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS));
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t fetch_all_results(memcached_st *memc)
+{
+ memcached_return_t rc= MEMCACHED_SUCCESS;
+ char return_key[MEMCACHED_MAX_KEY];
+ size_t return_key_length;
+ char *return_value;
+ size_t return_value_length;
+ uint32_t flags;
+
+ while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
+ &return_value_length, &flags, &rc)))
+ {
+ test_truth(return_value);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ free(return_value);
+ }
+
+ return ((rc == MEMCACHED_END) || (rc == MEMCACHED_SUCCESS)) ? TEST_SUCCESS : TEST_FAILURE;
+}
+
+/* Test case provided by Cal Haldenbrand */
+static test_return_t user_supplied_bug1(memcached_st *memc)
+{
+ unsigned int setter= 1;
+ unsigned int x;
+
+ unsigned long long total= 0;
+ uint32_t size= 0;
+ char key[10];
+ char randomstuff[6 * 1024];
+ memcached_return_t rc;
+
+ memset(randomstuff, 0, 6 * 1024);
+
+ /* We just keep looking at the same values over and over */
+ srandom(10);
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, setter);
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, setter);
+
+
+ /* add key */
+ for (x= 0 ; total < 20 * 1024576 ; x++ )
+ {
+ unsigned int j= 0;
+
+ size= (uint32_t)(rand() % ( 5 * 1024 ) ) + 400;
+ memset(randomstuff, 0, 6 * 1024);
+ test_truth(size < 6 * 1024); /* Being safe here */
+
+ for (j= 0 ; j < size ;j++)
+ randomstuff[j] = (signed char) ((rand() % 26) + 97);
+
+ total += size;
+ sprintf(key, "%d", x);
+ rc = memcached_set(memc, key, strlen(key),
+ randomstuff, strlen(randomstuff), 10, 0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ /* If we fail, lets try again */
+ if (rc != MEMCACHED_SUCCESS && rc != MEMCACHED_BUFFERED)
+ rc = memcached_set(memc, key, strlen(key),
+ randomstuff, strlen(randomstuff), 10, 0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ return TEST_SUCCESS;
+}
+
+/* Test case provided by Cal Haldenbrand */
+static test_return_t user_supplied_bug2(memcached_st *memc)
+{
+ int errors;
+ unsigned int setter;
+ unsigned int x;
+ unsigned long long total;
+
+ setter= 1;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, setter);
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, setter);
+#ifdef NOT_YET
+ setter = 20 * 1024576;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE, setter);
+ setter = 20 * 1024576;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE, setter);
+ getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE);
+ getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE);
+
+ for (x= 0, errors= 0, total= 0 ; total < 20 * 1024576 ; x++)
+#endif
+
+ for (x= 0, errors= 0, total= 0 ; total < 24576 ; x++)
+ {
+ memcached_return_t rc= MEMCACHED_SUCCESS;
+ char buffer[SMALL_STRING_LEN];
+ uint32_t flags= 0;
+ size_t val_len= 0;
+ char *getval;
+
+ memset(buffer, 0, SMALL_STRING_LEN);
+
+ snprintf(buffer, SMALL_STRING_LEN, "%u", x);
+ getval= memcached_get(memc, buffer, strlen(buffer),
+ &val_len, &flags, &rc);
+ if (rc != MEMCACHED_SUCCESS)
+ {
+ if (rc == MEMCACHED_NOTFOUND)
+ errors++;
+ else
+ {
+ test_truth(rc);
+ }
+
+ continue;
+ }
+ total+= val_len;
+ errors= 0;
+ free(getval);
+ }
+
+ return TEST_SUCCESS;
+}
+
+/* Do a large mget() over all the keys we think exist */
+#define KEY_COUNT 3000 // * 1024576
+static test_return_t user_supplied_bug3(memcached_st *memc)
+{
+ memcached_return_t rc;
+ unsigned int setter;
+ unsigned int x;
+ char **keys;
+ size_t key_lengths[KEY_COUNT];
+
+ setter= 1;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, setter);
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, setter);
+#ifdef NOT_YET
+ setter = 20 * 1024576;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE, setter);
+ setter = 20 * 1024576;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE, setter);
+ getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE);
+ getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE);
+#endif
+
+ keys= calloc(KEY_COUNT, sizeof(char *));
+ test_truth(keys);
+ for (x= 0; x < KEY_COUNT; x++)
+ {
+ char buffer[30];
+
+ snprintf(buffer, 30, "%u", x);
+ keys[x]= strdup(buffer);
+ key_lengths[x]= strlen(keys[x]);
+ }
+
+ rc= memcached_mget(memc, (const char **)keys, key_lengths, KEY_COUNT);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ test_truth(fetch_all_results(memc) == TEST_SUCCESS);
+
+ for (x= 0; x < KEY_COUNT; x++)
+ free(keys[x]);
+ free(keys);
+
+ return TEST_SUCCESS;
+}
+
+/* Make sure we behave properly if server list has no values */
+static test_return_t user_supplied_bug4(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"fudge", "son", "food"};
+ size_t key_length[]= {5, 3, 4};
+ unsigned int x;
+ uint32_t flags;
+ char return_key[MEMCACHED_MAX_KEY];
+ size_t return_key_length;
+ char *return_value;
+ size_t return_value_length;
+
+ /* Here we free everything before running a bunch of mget tests */
+ memcached_servers_reset(memc);
+
+
+ /* We need to empty the server before continueing test */
+ rc= memcached_flush(memc, 0);
+ test_truth(rc == MEMCACHED_NO_SERVERS);
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_NO_SERVERS);
+
+ while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
+ &return_value_length, &flags, &rc)) != NULL)
+ {
+ test_truth(return_value);
+ }
+ test_truth(!return_value);
+ test_truth(return_value_length == 0);
+ test_truth(rc == MEMCACHED_NO_SERVERS);
+
+ for (x= 0; x < 3; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ keys[x], key_length[x],
+ (time_t)50, (uint32_t)9);
+ test_truth(rc == MEMCACHED_NO_SERVERS);
+ }
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_NO_SERVERS);
+
+ x= 0;
+ while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
+ &return_value_length, &flags, &rc)))
+ {
+ test_truth(return_value);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(return_key_length == return_value_length);
+ test_truth(!memcmp(return_value, return_key, return_value_length));
+ free(return_value);
+ x++;
+ }
+
+ return TEST_SUCCESS;
+}
+
+#define VALUE_SIZE_BUG5 1048064
+static test_return_t user_supplied_bug5(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"036790384900", "036790384902", "036790384904", "036790384906"};
+ size_t key_length[]= {strlen("036790384900"), strlen("036790384902"), strlen("036790384904"), strlen("036790384906")};
+ char return_key[MEMCACHED_MAX_KEY];
+ size_t return_key_length;
+ char *value;
+ size_t value_length;
+ uint32_t flags;
+ unsigned int count;
+ unsigned int x;
+ char insert_data[VALUE_SIZE_BUG5];
+
+ for (x= 0; x < VALUE_SIZE_BUG5; x++)
+ insert_data[x]= (signed char)rand();
+
+ memcached_flush(memc, 0);
+ value= memcached_get(memc, keys[0], key_length[0],
+ &value_length, &flags, &rc);
+ test_truth(value == NULL);
+ rc= memcached_mget(memc, keys, key_length, 4);
+
+ count= 0;
+ while ((value= memcached_fetch(memc, return_key, &return_key_length,
+ &value_length, &flags, &rc)))
+ count++;
+ test_truth(count == 0);
+
+ for (x= 0; x < 4; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ insert_data, VALUE_SIZE_BUG5,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ for (x= 0; x < 10; x++)
+ {
+ value= memcached_get(memc, keys[0], key_length[0],
+ &value_length, &flags, &rc);
+ test_truth(value);
+ free(value);
+
+ rc= memcached_mget(memc, keys, key_length, 4);
+ count= 0;
+ while ((value= memcached_fetch(memc, return_key, &return_key_length,
+ &value_length, &flags, &rc)))
+ {
+ count++;
+ free(value);
+ }
+ test_truth(count == 4);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t user_supplied_bug6(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"036790384900", "036790384902", "036790384904", "036790384906"};
+ size_t key_length[]= {strlen("036790384900"), strlen("036790384902"), strlen("036790384904"), strlen("036790384906")};
+ char return_key[MEMCACHED_MAX_KEY];
+ size_t return_key_length;
+ char *value;
+ size_t value_length;
+ uint32_t flags;
+ unsigned int count;
+ unsigned int x;
+ char insert_data[VALUE_SIZE_BUG5];
+
+ for (x= 0; x < VALUE_SIZE_BUG5; x++)
+ insert_data[x]= (signed char)rand();
+
+ memcached_flush(memc, 0);
+ value= memcached_get(memc, keys[0], key_length[0],
+ &value_length, &flags, &rc);
+ test_truth(value == NULL);
+ test_truth(rc == MEMCACHED_NOTFOUND);
+ rc= memcached_mget(memc, keys, key_length, 4);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ count= 0;
+ while ((value= memcached_fetch(memc, return_key, &return_key_length,
+ &value_length, &flags, &rc)))
+ count++;
+ test_truth(count == 0);
+ test_truth(rc == MEMCACHED_END);
+
+ for (x= 0; x < 4; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ insert_data, VALUE_SIZE_BUG5,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ for (x= 0; x < 2; x++)
+ {
+ value= memcached_get(memc, keys[0], key_length[0],
+ &value_length, &flags, &rc);
+ test_truth(value);
+ free(value);
+
+ rc= memcached_mget(memc, keys, key_length, 4);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ count= 3;
+ /* We test for purge of partial complete fetches */
+ for (count= 3; count; count--)
+ {
+ value= memcached_fetch(memc, return_key, &return_key_length,
+ &value_length, &flags, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(!(memcmp(value, insert_data, value_length)));
+ test_truth(value_length);
+ free(value);
+ }
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t user_supplied_bug8(memcached_st *memc __attribute__((unused)))
+{
+ memcached_return_t rc;
+ memcached_st *mine;
+ memcached_st *memc_clone;
+
+ memcached_server_st *servers;
+ const char *server_list= "memcache1.memcache.bk.sapo.pt:11211, memcache1.memcache.bk.sapo.pt:11212, memcache1.memcache.bk.sapo.pt:11213, memcache1.memcache.bk.sapo.pt:11214, memcache2.memcache.bk.sapo.pt:11211, memcache2.memcache.bk.sapo.pt:11212, memcache2.memcache.bk.sapo.pt:11213, memcache2.memcache.bk.sapo.pt:11214";
+
+ servers= memcached_servers_parse(server_list);
+ test_truth(servers);
+
+ mine= memcached_create(NULL);
+ rc= memcached_server_push(mine, servers);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ memcached_server_list_free(servers);
+
+ test_truth(mine);
+ memc_clone= memcached_clone(NULL, mine);
+
+ memcached_quit(mine);
+ memcached_quit(memc_clone);
+
+
+ memcached_free(mine);
+ memcached_free(memc_clone);
+
+ return TEST_SUCCESS;
+}
+
+/* Test flag store/retrieve */
+static test_return_t user_supplied_bug7(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys= "036790384900";
+ size_t key_length= strlen(keys);
+ char return_key[MEMCACHED_MAX_KEY];
+ size_t return_key_length;
+ char *value;
+ size_t value_length;
+ uint32_t flags;
+ unsigned int x;
+ char insert_data[VALUE_SIZE_BUG5];
+
+ for (x= 0; x < VALUE_SIZE_BUG5; x++)
+ insert_data[x]= (signed char)rand();
+
+ memcached_flush(memc, 0);
+
+ flags= 245;
+ rc= memcached_set(memc, keys, key_length,
+ insert_data, VALUE_SIZE_BUG5,
+ (time_t)0, flags);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ flags= 0;
+ value= memcached_get(memc, keys, key_length,
+ &value_length, &flags, &rc);
+ test_truth(flags == 245);
+ test_truth(value);
+ free(value);
+
+ rc= memcached_mget(memc, &keys, &key_length, 1);
+
+ flags= 0;
+ value= memcached_fetch(memc, return_key, &return_key_length,
+ &value_length, &flags, &rc);
+ test_truth(flags == 245);
+ test_truth(value);
+ free(value);
+
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t user_supplied_bug9(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *keys[]= {"UDATA:edevil@sapo.pt", "fudge&*@#", "for^#@&$not"};
+ size_t key_length[3];
+ unsigned int x;
+ uint32_t flags;
+ unsigned count= 0;
+
+ char return_key[MEMCACHED_MAX_KEY];
+ size_t return_key_length;
+ char *return_value;
+ size_t return_value_length;
+
+
+ key_length[0]= strlen("UDATA:edevil@sapo.pt");
+ key_length[1]= strlen("fudge&*@#");
+ key_length[2]= strlen("for^#@&$not");
+
+
+ for (x= 0; x < 3; x++)
+ {
+ rc= memcached_set(memc, keys[x], key_length[x],
+ keys[x], key_length[x],
+ (time_t)50, (uint32_t)9);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ rc= memcached_mget(memc, keys, key_length, 3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ /* We need to empty the server before continueing test */
+ while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
+ &return_value_length, &flags, &rc)) != NULL)
+ {
+ test_truth(return_value);
+ free(return_value);
+ count++;
+ }
+ test_truth(count == 3);
+
+ return TEST_SUCCESS;
+}
+
+/* We are testing with aggressive timeout to get failures */
+static test_return_t user_supplied_bug10(memcached_st *memc)
+{
+ const char *key= "foo";
+ char *value;
+ size_t value_length= 512;
+ unsigned int x;
+ size_t key_len= 3;
+ memcached_return_t rc;
+ unsigned int set= 1;
+ memcached_st *mclone= memcached_clone(NULL, memc);
+ int32_t timeout;
+
+ memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_NO_BLOCK, set);
+ memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_TCP_NODELAY, set);
+ timeout= 2;
+ memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT,
+ (uint64_t)timeout);
+
+ value = (char*)malloc(value_length * sizeof(char));
+
+ for (x= 0; x < value_length; x++)
+ value[x]= (char) (x % 127);
+
+ for (x= 1; x <= 100000; ++x)
+ {
+ rc= memcached_set(mclone, key, key_len,value, value_length, 0, 0);
+
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_WRITE_FAILURE ||
+ rc == MEMCACHED_BUFFERED || rc == MEMCACHED_TIMEOUT);
+
+ if (rc == MEMCACHED_WRITE_FAILURE || rc == MEMCACHED_TIMEOUT)
+ x--;
+ }
+
+ free(value);
+ memcached_free(mclone);
+
+ return TEST_SUCCESS;
+}
+
+/*
+ We are looking failures in the async protocol
+*/
+static test_return_t user_supplied_bug11(memcached_st *memc)
+{
+ const char *key= "foo";
+ char *value;
+ size_t value_length= 512;
+ unsigned int x;
+ size_t key_len= 3;
+ memcached_return_t rc;
+ unsigned int set= 1;
+ int32_t timeout;
+ memcached_st *mclone= memcached_clone(NULL, memc);
+
+ memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_NO_BLOCK, set);
+ memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_TCP_NODELAY, set);
+ timeout= -1;
+ memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT,
+ (size_t)timeout);
+
+ timeout= (int32_t)memcached_behavior_get(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT);
+
+ test_truth(timeout == -1);
+
+ value = (char*)malloc(value_length * sizeof(char));
+
+ for (x= 0; x < value_length; x++)
+ value[x]= (char) (x % 127);
+
+ for (x= 1; x <= 100000; ++x)
+ {
+ rc= memcached_set(mclone, key, key_len,value, value_length, 0, 0);
+ }
+
+ free(value);
+ memcached_free(mclone);
+
+ return TEST_SUCCESS;
+}
+
+/*
+ Bug found where incr was not returning MEMCACHED_NOTFOUND when object did not exist.
+*/
+static test_return_t user_supplied_bug12(memcached_st *memc)
+{
+ memcached_return_t rc;
+ uint32_t flags;
+ size_t value_length;
+ char *value;
+ uint64_t number_value;
+
+ value= memcached_get(memc, "autoincrement", strlen("autoincrement"),
+ &value_length, &flags, &rc);
+ test_truth(value == NULL);
+ test_truth(rc == MEMCACHED_NOTFOUND);
+
+ rc= memcached_increment(memc, "autoincrement", strlen("autoincrement"),
+ 1, &number_value);
+
+ test_truth(value == NULL);
+ /* The binary protocol will set the key if it doesn't exist */
+ if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 1)
+ {
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+ else
+ {
+ test_truth(rc == MEMCACHED_NOTFOUND);
+ }
+
+ rc= memcached_set(memc, "autoincrement", strlen("autoincrement"), "1", 1, 0, 0);
+
+ value= memcached_get(memc, "autoincrement", strlen("autoincrement"),
+ &value_length, &flags, &rc);
+ test_truth(value);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ free(value);
+
+ rc= memcached_increment(memc, "autoincrement", strlen("autoincrement"),
+ 1, &number_value);
+ test_truth(number_value == 2);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ return TEST_SUCCESS;
+}
+
+/*
+ Bug found where command total one more than MEMCACHED_MAX_BUFFER
+ set key34567890 0 0 8169 \r\n is sent followed by buffer of size 8169, followed by 8169
+ */
+static test_return_t user_supplied_bug13(memcached_st *memc)
+{
+ char key[] = "key34567890";
+ char *overflow;
+ memcached_return_t rc;
+ size_t overflowSize;
+
+ char commandFirst[]= "set key34567890 0 0 ";
+ char commandLast[] = " \r\n"; /* first line of command sent to server */
+ size_t commandLength;
+ size_t testSize;
+
+ commandLength = strlen(commandFirst) + strlen(commandLast) + 4; /* 4 is number of characters in size, probably 8196 */
+
+ overflowSize = MEMCACHED_MAX_BUFFER - commandLength;
+
+ for (testSize= overflowSize - 1; testSize < overflowSize + 1; testSize++)
+ {
+ overflow= malloc(testSize);
+ test_truth(overflow != NULL);
+
+ memset(overflow, 'x', testSize);
+ rc= memcached_set(memc, key, strlen(key),
+ overflow, testSize, 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ free(overflow);
+ }
+
+ return TEST_SUCCESS;
+}
+
+
+/*
+ Test values of many different sizes
+ Bug found where command total one more than MEMCACHED_MAX_BUFFER
+ set key34567890 0 0 8169 \r\n
+ is sent followed by buffer of size 8169, followed by 8169
+ */
+static test_return_t user_supplied_bug14(memcached_st *memc)
+{
+ size_t setter= 1;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, setter);
+ memcached_return_t rc;
+ const char *key= "foo";
+ char *value;
+ size_t value_length= 18000;
+ char *string;
+ size_t string_length;
+ uint32_t flags;
+ unsigned int x;
+ size_t current_length;
+
+ value = (char*)malloc(value_length);
+ test_truth(value);
+
+ for (x= 0; x < value_length; x++)
+ value[x] = (char) (x % 127);
+
+ for (current_length= 0; current_length < value_length; current_length++)
+ {
+ rc= memcached_set(memc, key, strlen(key),
+ value, current_length,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ string= memcached_get(memc, key, strlen(key),
+ &string_length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(string_length == current_length);
+ test_truth(!memcmp(string, value, string_length));
+
+ free(string);
+ }
+
+ free(value);
+
+ return TEST_SUCCESS;
+}
+
+/*
+ Look for zero length value problems
+ */
+static test_return_t user_supplied_bug15(memcached_st *memc)
+{
+ uint32_t x;
+ memcached_return_t rc;
+ const char *key= "mykey";
+ char *value;
+ size_t length;
+ uint32_t flags;
+
+ for (x= 0; x < 2; x++)
+ {
+ rc= memcached_set(memc, key, strlen(key),
+ NULL, 0,
+ (time_t)0, (uint32_t)0);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_get(memc, key, strlen(key),
+ &length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(value == NULL);
+ test_truth(length == 0);
+ test_truth(flags == 0);
+
+ value= memcached_get(memc, key, strlen(key),
+ &length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(value == NULL);
+ test_truth(length == 0);
+ test_truth(flags == 0);
+ }
+
+ return TEST_SUCCESS;
+}
+
+/* Check the return sizes on FLAGS to make sure it stores 32bit unsigned values correctly */
+static test_return_t user_supplied_bug16(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "mykey";
+ char *value;
+ size_t length;
+ uint32_t flags;
+
+ rc= memcached_set(memc, key, strlen(key),
+ NULL, 0,
+ (time_t)0, UINT32_MAX);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_get(memc, key, strlen(key),
+ &length, &flags, &rc);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(value == NULL);
+ test_truth(length == 0);
+ test_truth(flags == UINT32_MAX);
+
+ return TEST_SUCCESS;
+}
+
+#ifndef __sun
+/* Check the validity of chinese key*/
+static test_return_t user_supplied_bug17(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "豆瓣";
+ const char *value="我们在炎热抑郁的夏天无法停止豆瓣";
+ char *value2;
+ size_t length;
+ uint32_t flags;
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, 0);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value2= memcached_get(memc, key, strlen(key),
+ &length, &flags, &rc);
+
+ test_truth(length==strlen(value));
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcmp(value, value2, length)==0);
+ free(value2);
+
+ return TEST_SUCCESS;
+}
+#endif
+
+/*
+ From Andrei on IRC
+*/
+
+static test_return_t user_supplied_bug19(memcached_st *memc)
+{
+ memcached_st *m;
+ memcached_server_st *s;
+ memcached_return_t res;
+
+ (void)memc;
+
+ m= memcached_create(NULL);
+ memcached_server_add_with_weight(m, "localhost", 11311, 100);
+ memcached_server_add_with_weight(m, "localhost", 11312, 100);
+
+ s= memcached_server_by_key(m, "a", 1, &res);
+ memcached_server_free(s);
+
+ memcached_free(m);
+
+ return TEST_SUCCESS;
+}
+
+/* CAS test from Andei */
+static test_return_t user_supplied_bug20(memcached_st *memc)
+{
+ memcached_return_t status;
+ memcached_result_st *result, result_obj;
+ const char *key = "abc";
+ size_t key_len = strlen("abc");
+ const char *value = "foobar";
+ size_t value_len = strlen(value);
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, 1);
+
+ status = memcached_set(memc, key, key_len, value, value_len, (time_t)0, (uint32_t)0);
+ test_truth(status == MEMCACHED_SUCCESS);
+
+ status = memcached_mget(memc, &key, &key_len, 1);
+ test_truth(status == MEMCACHED_SUCCESS);
+
+ result= memcached_result_create(memc, &result_obj);
+ test_truth(result);
+
+ memcached_result_create(memc, &result_obj);
+ result= memcached_fetch_result(memc, &result_obj, &status);
+
+ test_truth(result);
+ test_truth(status == MEMCACHED_SUCCESS);
+
+ memcached_result_free(result);
+
+ return TEST_SUCCESS;
+}
+
+#include "ketama_test_cases.h"
+static test_return_t user_supplied_bug18(memcached_st *trash)
+{
+ memcached_return_t rc;
+ uint64_t value;
+ int x;
+ memcached_server_st *server_pool;
+ memcached_st *memc;
+
+ (void)trash;
+
+ memc= memcached_create(NULL);
+ test_truth(memc);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
+ test_truth(value == 1);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
+ test_truth(value == MEMCACHED_HASH_MD5);
+
+ server_pool = memcached_servers_parse("10.0.1.1:11211 600,10.0.1.2:11211 300,10.0.1.3:11211 200,10.0.1.4:11211 350,10.0.1.5:11211 1000,10.0.1.6:11211 800,10.0.1.7:11211 950,10.0.1.8:11211 100");
+ memcached_server_push(memc, server_pool);
+
+ /* verify that the server list was parsed okay. */
+ test_truth(memcached_server_count(memc) == 8);
+ test_truth(strcmp(server_pool[0].hostname, "10.0.1.1") == 0);
+ test_truth(server_pool[0].port == 11211);
+ test_truth(server_pool[0].weight == 600);
+ test_truth(strcmp(server_pool[2].hostname, "10.0.1.3") == 0);
+ test_truth(server_pool[2].port == 11211);
+ test_truth(server_pool[2].weight == 200);
+ test_truth(strcmp(server_pool[7].hostname, "10.0.1.8") == 0);
+ test_truth(server_pool[7].port == 11211);
+ test_truth(server_pool[7].weight == 100);
+
+ /* VDEAAAAA hashes to fffcd1b5, after the last continuum point, and lets
+ * us test the boundary wraparound.
+ */
+ test_truth(memcached_generate_hash(memc, (char *)"VDEAAAAA", 8) == memc->continuum[0].index);
+
+ /* verify the standard ketama set. */
+ for (x= 0; x < 99; x++)
+ {
+ uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases[x].key, strlen(ketama_test_cases[x].key));
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, server_idx);
+ char *hostname = instance->hostname;
+ test_strcmp(hostname, ketama_test_cases[x].server);
+ }
+
+ memcached_server_list_free(server_pool);
+ memcached_free(memc);
+
+ return TEST_SUCCESS;
+}
+
+/* Large mget() of missing keys with binary proto
+ *
+ * If many binary quiet commands (such as getq's in an mget) fill the output
+ * buffer and the server chooses not to respond, memcached_flush hangs. See
+ * http://lists.tangent.org/pipermail/libmemcached/2009-August/000918.html
+ */
+
+/* sighandler_t function that always asserts false */
+static void fail(int unused __attribute__((unused)))
+{
+ assert(0);
+}
+
+
+static test_return_t _user_supplied_bug21(memcached_st* memc, size_t key_count)
+{
+ memcached_return_t rc;
+ unsigned int x;
+ char **keys;
+ size_t* key_lengths;
+ void (*oldalarm)(int);
+ memcached_st *memc_clone;
+
+ memc_clone= memcached_clone(NULL, memc);
+ test_truth(memc_clone);
+
+ /* only binproto uses getq for mget */
+ memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1);
+
+ /* empty the cache to ensure misses (hence non-responses) */
+ rc= memcached_flush(memc_clone, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ key_lengths= calloc(key_count, sizeof(size_t));
+ keys= calloc(key_count, sizeof(char *));
+ test_truth(keys);
+ for (x= 0; x < key_count; x++)
+ {
+ char buffer[30];
+
+ snprintf(buffer, 30, "%u", x);
+ keys[x]= strdup(buffer);
+ key_lengths[x]= strlen(keys[x]);
+ }
+
+ oldalarm= signal(SIGALRM, fail);
+ alarm(5);
+
+ rc= memcached_mget(memc_clone, (const char **)keys, key_lengths, key_count);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ alarm(0);
+ signal(SIGALRM, oldalarm);
+
+ test_truth(fetch_all_results(memc) == TEST_SUCCESS);
+
+ for (x= 0; x < key_count; x++)
+ free(keys[x]);
+ free(keys);
+ free(key_lengths);
+
+ memcached_free(memc_clone);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_binary(memcached_st *memc);
+
+static test_return_t user_supplied_bug21(memcached_st *memc)
+{
+ test_return_t test_rc;
+ test_rc= pre_binary(memc);
+
+ if (test_rc != TEST_SUCCESS)
+ return test_rc;
+
+ test_return_t rc;
+
+ /* should work as of r580 */
+ rc= _user_supplied_bug21(memc, 10);
+ test_truth(rc == TEST_SUCCESS);
+
+ /* should fail as of r580 */
+ rc= _user_supplied_bug21(memc, 1000);
+ test_truth(rc == TEST_SUCCESS);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t auto_eject_hosts(memcached_st *trash)
+{
+ (void) trash;
+ memcached_server_instance_st *instance;
+
+ memcached_return_t rc;
+ memcached_st *memc= memcached_create(NULL);
+ test_truth(memc);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ uint64_t value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
+ test_truth(value == 1);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
+ test_truth(value == MEMCACHED_HASH_MD5);
+
+ /* server should be removed when in delay */
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_AUTO_EJECT_HOSTS, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_AUTO_EJECT_HOSTS);
+ test_truth(value == 1);
+
+ memcached_server_st *server_pool;
+ server_pool = memcached_servers_parse("10.0.1.1:11211 600,10.0.1.2:11211 300,10.0.1.3:11211 200,10.0.1.4:11211 350,10.0.1.5:11211 1000,10.0.1.6:11211 800,10.0.1.7:11211 950,10.0.1.8:11211 100");
+ memcached_server_push(memc, server_pool);
+
+ /* verify that the server list was parsed okay. */
+ test_truth(memcached_server_count(memc) == 8);
+ test_truth(strcmp(server_pool[0].hostname, "10.0.1.1") == 0);
+ test_truth(server_pool[0].port == 11211);
+ test_truth(server_pool[0].weight == 600);
+ test_truth(strcmp(server_pool[2].hostname, "10.0.1.3") == 0);
+ test_truth(server_pool[2].port == 11211);
+ test_truth(server_pool[2].weight == 200);
+ test_truth(strcmp(server_pool[7].hostname, "10.0.1.8") == 0);
+ test_truth(server_pool[7].port == 11211);
+ test_truth(server_pool[7].weight == 100);
+
+ instance= memcached_server_instance_fetch(memc, 2);
+ instance->next_retry = time(NULL) + 15;
+ memc->next_distribution_rebuild= time(NULL) - 1;
+
+ for (int x= 0; x < 99; x++)
+ {
+ uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases[x].key, strlen(ketama_test_cases[x].key));
+ test_truth(server_idx != 2);
+ }
+
+ /* and re-added when it's back. */
+ instance->next_retry = time(NULL) - 1;
+ memc->next_distribution_rebuild= time(NULL) - 1;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION,
+ memc->distribution);
+ for (int x= 0; x < 99; x++)
+ {
+ uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases[x].key, strlen(ketama_test_cases[x].key));
+ // We re-use instance from above.
+ instance=
+ memcached_server_instance_fetch(memc, server_idx);
+ char *hostname = instance->hostname;
+ test_truth(strcmp(hostname, ketama_test_cases[x].server) == 0);
+ }
+
+ memcached_server_list_free(server_pool);
+ memcached_free(memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t output_ketama_weighted_keys(memcached_st *trash)
+{
+ (void) trash;
+
+ memcached_return_t rc;
+ memcached_st *memc= memcached_create(NULL);
+ test_truth(memc);
+
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ uint64_t value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
+ test_truth(value == 1);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
+ test_truth(value == MEMCACHED_HASH_MD5);
+
+
+ test_truth(memcached_behavior_set_distribution(memc, MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA_SPY) == MEMCACHED_SUCCESS);
+
+ memcached_server_st *server_pool;
+ server_pool = memcached_servers_parse("10.0.1.1:11211,10.0.1.2:11211,10.0.1.3:11211,10.0.1.4:11211,10.0.1.5:11211,10.0.1.6:11211,10.0.1.7:11211,10.0.1.8:11211,192.168.1.1:11211,192.168.100.1:11211");
+ memcached_server_push(memc, server_pool);
+
+ // @todo this needs to be refactored to actually test something.
+#if 0
+ FILE *fp;
+ if ((fp = fopen("ketama_keys.txt", "w")))
+ {
+ // noop
+ } else {
+ printf("cannot write to file ketama_keys.txt");
+ return TEST_FAILURE;
+ }
+
+ for (int x= 0; x < 10000; x++)
+ {
+ char key[10];
+ sprintf(key, "%d", x);
+
+ uint32_t server_idx = memcached_generate_hash(memc, key, strlen(key));
+ char *hostname = memc->hosts[server_idx].hostname;
+ in_port_t port = memc->hosts[server_idx].port;
+ fprintf(fp, "key %s is on host /%s:%u\n", key, hostname, port);
+ }
+ fclose(fp);
+#endif
+ memcached_server_list_free(server_pool);
+ memcached_free(memc);
+
+ return TEST_SUCCESS;
+}
+
+
+static test_return_t result_static(memcached_st *memc)
+{
+ memcached_result_st result;
+ memcached_result_st *result_ptr;
+
+ result_ptr= memcached_result_create(memc, &result);
+ test_truth(result.options.is_allocated == false);
+ test_truth(memcached_is_initialized(&result) == true);
+ test_truth(result_ptr);
+ test_truth(result_ptr == &result);
+
+ memcached_result_free(&result);
+
+ test_truth(result.options.is_allocated == false);
+ test_truth(memcached_is_initialized(&result) == false);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t result_alloc(memcached_st *memc)
+{
+ memcached_result_st *result_ptr;
+
+ result_ptr= memcached_result_create(memc, NULL);
+ test_truth(result_ptr);
+ test_truth(result_ptr->options.is_allocated == true);
+ test_truth(memcached_is_initialized(result_ptr) == true);
+ memcached_result_free(result_ptr);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t string_static_null(memcached_st *memc)
+{
+ memcached_string_st string;
+ memcached_string_st *string_ptr;
+
+ string_ptr= memcached_string_create(memc, &string, 0);
+ test_truth(string.options.is_initialized == true);
+ test_truth(string_ptr);
+
+ /* The following two better be the same! */
+ test_truth(memcached_is_allocated(string_ptr) == false);
+ test_truth(memcached_is_allocated(&string) == false);
+ test_truth(&string == string_ptr);
+
+ test_truth(string.options.is_initialized == true);
+ test_truth(memcached_is_initialized(&string) == true);
+ memcached_string_free(&string);
+ test_truth(memcached_is_initialized(&string) == false);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t string_alloc_null(memcached_st *memc)
+{
+ memcached_string_st *string;
+
+ string= memcached_string_create(memc, NULL, 0);
+ test_truth(string);
+ test_truth(memcached_is_allocated(string) == true);
+ test_truth(memcached_is_initialized(string) == true);
+ memcached_string_free(string);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t string_alloc_with_size(memcached_st *memc)
+{
+ memcached_string_st *string;
+
+ string= memcached_string_create(memc, NULL, 1024);
+ test_truth(string);
+ test_truth(memcached_is_allocated(string) == true);
+ test_truth(memcached_is_initialized(string) == true);
+ memcached_string_free(string);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t string_alloc_with_size_toobig(memcached_st *memc)
+{
+ memcached_string_st *string;
+
+ string= memcached_string_create(memc, NULL, SIZE_MAX);
+ test_truth(string == NULL);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t string_alloc_append(memcached_st *memc)
+{
+ unsigned int x;
+ char buffer[SMALL_STRING_LEN];
+ memcached_string_st *string;
+
+ /* Ring the bell! */
+ memset(buffer, 6, SMALL_STRING_LEN);
+
+ string= memcached_string_create(memc, NULL, 100);
+ test_truth(string);
+ test_truth(memcached_is_allocated(string) == true);
+ test_truth(memcached_is_initialized(string) == true);
+
+ for (x= 0; x < 1024; x++)
+ {
+ memcached_return_t rc;
+ rc= memcached_string_append(string, buffer, SMALL_STRING_LEN);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+ test_truth(memcached_is_allocated(string) == true);
+ memcached_string_free(string);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t string_alloc_append_toobig(memcached_st *memc)
+{
+ memcached_return_t rc;
+ unsigned int x;
+ char buffer[SMALL_STRING_LEN];
+ memcached_string_st *string;
+
+ /* Ring the bell! */
+ memset(buffer, 6, SMALL_STRING_LEN);
+
+ string= memcached_string_create(memc, NULL, 100);
+ test_truth(string);
+ test_truth(memcached_is_allocated(string) == true);
+ test_truth(memcached_is_initialized(string) == true);
+
+ for (x= 0; x < 1024; x++)
+ {
+ rc= memcached_string_append(string, buffer, SMALL_STRING_LEN);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+ rc= memcached_string_append(string, buffer, SIZE_MAX);
+ test_truth(rc == MEMCACHED_MEMORY_ALLOCATION_FAILURE);
+ test_truth(memcached_is_allocated(string) == true);
+ memcached_string_free(string);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t cleanup_pairs(memcached_st *memc __attribute__((unused)))
+{
+ pairs_free(global_pairs);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t generate_pairs(memcached_st *memc __attribute__((unused)))
+{
+ unsigned long long x;
+ global_pairs= pairs_generate(GLOBAL_COUNT, 400);
+ global_count= GLOBAL_COUNT;
+
+ for (x= 0; x < global_count; x++)
+ {
+ global_keys[x]= global_pairs[x].key;
+ global_keys_length[x]= global_pairs[x].key_length;
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t generate_large_pairs(memcached_st *memc __attribute__((unused)))
+{
+ unsigned long long x;
+ global_pairs= pairs_generate(GLOBAL2_COUNT, MEMCACHED_MAX_BUFFER+10);
+ global_count= GLOBAL2_COUNT;
+
+ for (x= 0; x < global_count; x++)
+ {
+ global_keys[x]= global_pairs[x].key;
+ global_keys_length[x]= global_pairs[x].key_length;
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t generate_data(memcached_st *memc)
+{
+ execute_set(memc, global_pairs, global_count);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t generate_data_with_stats(memcached_st *memc)
+{
+ memcached_stat_st *stat_p;
+ memcached_return_t rc;
+ uint32_t host_index= 0;
+ execute_set(memc, global_pairs, global_count);
+
+ //TODO: hosts used size stats
+ stat_p= memcached_stat(memc, NULL, &rc);
+ test_truth(stat_p);
+
+ for (host_index= 0; host_index < SERVERS_TO_CREATE; host_index++)
+ {
+ /* This test was changes so that "make test" would work properlly */
+#ifdef DEBUG
+ printf("\nserver %u|%s|%u bytes: %llu\n", host_index, (memc->hosts)[host_index].hostname, (memc->hosts)[host_index].port, (unsigned long long)(stat_p + host_index)->bytes);
+#endif
+ test_truth((unsigned long long)(stat_p + host_index)->bytes);
+ }
+
+ memcached_stat_free(NULL, stat_p);
+
+ return TEST_SUCCESS;
+}
+static test_return_t generate_buffer_data(memcached_st *memc)
+{
+ size_t latch= 0;
+
+ latch= 1;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, latch);
+ generate_data(memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t get_read_count(memcached_st *memc)
+{
+ unsigned int x;
+ memcached_return_t rc;
+ memcached_st *memc_clone;
+
+ memc_clone= memcached_clone(NULL, memc);
+ test_truth(memc_clone);
+
+ memcached_server_add_with_weight(memc_clone, "localhost", 6666, 0);
+
+ {
+ char *return_value;
+ size_t return_value_length;
+ uint32_t flags;
+ uint32_t count;
+
+ for (x= count= 0; x < global_count; x++)
+ {
+ return_value= memcached_get(memc_clone, global_keys[x], global_keys_length[x],
+ &return_value_length, &flags, &rc);
+ if (rc == MEMCACHED_SUCCESS)
+ {
+ count++;
+ if (return_value)
+ free(return_value);
+ }
+ }
+ }
+
+ memcached_free(memc_clone);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t get_read(memcached_st *memc)
+{
+ unsigned int x;
+ memcached_return_t rc;
+
+ {
+ char *return_value;
+ size_t return_value_length;
+ uint32_t flags;
+
+ for (x= 0; x < global_count; x++)
+ {
+ return_value= memcached_get(memc, global_keys[x], global_keys_length[x],
+ &return_value_length, &flags, &rc);
+ /*
+ test_truth(return_value);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ */
+ if (rc == MEMCACHED_SUCCESS && return_value)
+ free(return_value);
+ }
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t mget_read(memcached_st *memc)
+{
+ memcached_return_t rc;
+
+ rc= memcached_mget(memc, global_keys, global_keys_length, global_count);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(fetch_all_results(memc) == TEST_SUCCESS);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t mget_read_result(memcached_st *memc)
+{
+ memcached_return_t rc;
+
+ rc= memcached_mget(memc, global_keys, global_keys_length, global_count);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ /* Turn this into a help function */
+ {
+ memcached_result_st results_obj;
+ memcached_result_st *results;
+
+ results= memcached_result_create(memc, &results_obj);
+
+ while ((results= memcached_fetch_result(memc, &results_obj, &rc)))
+ {
+ test_truth(results);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ memcached_result_free(&results_obj);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t mget_read_function(memcached_st *memc)
+{
+ memcached_return_t rc;
+ unsigned int counter;
+ memcached_execute_fn callbacks[1];
+
+ rc= memcached_mget(memc, global_keys, global_keys_length, global_count);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ callbacks[0]= &callback_counter;
+ counter= 0;
+ rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t delete_generate(memcached_st *memc)
+{
+ unsigned int x;
+
+ for (x= 0; x < global_count; x++)
+ {
+ (void)memcached_delete(memc, global_keys[x], global_keys_length[x], (time_t)0);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t delete_buffer_generate(memcached_st *memc)
+{
+ size_t latch= 0;
+ unsigned int x;
+
+ latch= 1;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, latch);
+
+ for (x= 0; x < global_count; x++)
+ {
+ (void)memcached_delete(memc, global_keys[x], global_keys_length[x], (time_t)0);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t add_host_test1(memcached_st *memc)
+{
+ unsigned int x;
+ memcached_return_t rc;
+ char servername[]= "0.example.com";
+ memcached_server_st *servers;
+
+ servers= memcached_server_list_append_with_weight(NULL, servername, 400, 0, &rc);
+ test_truth(servers);
+ test_truth(1 == memcached_server_list_count(servers));
+
+ for (x= 2; x < 20; x++)
+ {
+ char buffer[SMALL_STRING_LEN];
+
+ snprintf(buffer, SMALL_STRING_LEN, "%u.example.com", 400+x);
+ servers= memcached_server_list_append_with_weight(servers, buffer, 401, 0,
+ &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(x == memcached_server_list_count(servers));
+ }
+
+ rc= memcached_server_push(memc, servers);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ rc= memcached_server_push(memc, servers);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ memcached_server_list_free(servers);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_nonblock(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 0);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_nonblock_binary(memcached_st *memc)
+{
+ memcached_return_t rc= MEMCACHED_FAILURE;
+ memcached_st *memc_clone;
+ memcached_server_instance_st *instance;
+
+ memc_clone= memcached_clone(NULL, memc);
+ test_truth(memc_clone);
+ // The memcached_version needs to be done on a clone, because the server
+ // will not toggle protocol on an connection.
+ memcached_version(memc_clone);
+
+ instance= memcached_server_instance_fetch(memc_clone, 0);
+
+ if (instance->major_version >= 1 && instance->minor_version > 2)
+ {
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 0);
+ rc = memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 1);
+ }
+ else
+ {
+ return TEST_SKIPPED;
+ }
+
+ memcached_free(memc_clone);
+
+ return rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_SKIPPED;
+}
+
+static test_return_t pre_murmur(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_MURMUR);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_jenkins(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_JENKINS);
+
+ return TEST_SUCCESS;
+}
+
+
+static test_return_t pre_md5(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_MD5);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_crc(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_CRC);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_hsieh(memcached_st *memc)
+{
+#ifdef HAVE_HSIEH_HASH
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_HSIEH);
+ return TEST_SUCCESS;
+#else
+ (void) memc;
+ return TEST_SKIPPED;
+#endif
+}
+
+static test_return_t pre_hash_fnv1_64(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_MURMUR);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_hash_fnv1a_64(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_FNV1A_64);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_hash_fnv1_32(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_FNV1_32);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_hash_fnv1a_32(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_FNV1A_32);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_behavior_ketama(memcached_st *memc)
+{
+ memcached_return_t rc;
+ uint64_t value;
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA);
+ test_truth(value == 1);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_behavior_ketama_weighted(memcached_st *memc)
+{
+ memcached_return_t rc;
+ uint64_t value;
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
+ test_truth(value == 1);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
+ test_truth(value == MEMCACHED_HASH_MD5);
+
+ return TEST_SUCCESS;
+}
+
+/**
+ @note This should be testing to see if the server really supports the binary protocol.
+*/
+static test_return_t pre_binary(memcached_st *memc)
+{
+ memcached_return_t rc= MEMCACHED_FAILURE;
+ memcached_st *memc_clone;
+ memcached_server_instance_st *instance;
+
+ memc_clone= memcached_clone(NULL, memc);
+ test_truth(memc_clone);
+ // The memcached_version needs to be done on a clone, because the server
+ // will not toggle protocol on an connection.
+ memcached_version(memc_clone);
+
+ instance= memcached_server_instance_fetch(memc_clone, 0);
+
+ if (instance->major_version >= 1 && instance->minor_version > 2)
+ {
+ rc = memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 1);
+ }
+
+ memcached_free(memc_clone);
+
+ return rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_SKIPPED;
+}
+
+
+static test_return_t pre_replication(memcached_st *memc)
+{
+ test_return_t test_rc;
+ test_rc= pre_binary(memc);
+
+ if (test_rc != TEST_SUCCESS)
+ return test_rc;
+
+ /*
+ * Make sure that we store the item on all servers
+ * (master + replicas == number of servers)
+ */
+ memcached_return_t rc;
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS,
+ memcached_server_count(memc) - 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS) == memcached_server_count(memc) - 1);
+
+ return rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_SKIPPED;
+}
+
+
+static test_return_t pre_replication_noblock(memcached_st *memc)
+{
+ test_return_t rc;
+
+ rc= pre_replication(memc);
+ if (rc != TEST_SUCCESS)
+ return rc;
+
+ rc= pre_nonblock(memc);
+
+ return rc;
+}
+
+
+static void my_free(memcached_st *ptr __attribute__((unused)), void *mem)
+{
+#ifdef HARD_MALLOC_TESTS
+ void *real_ptr= (mem == NULL) ? mem : (void*)((caddr_t)mem - 8);
+ free(real_ptr);
+#else
+ free(mem);
+#endif
+}
+
+
+static void *my_malloc(memcached_st *ptr __attribute__((unused)), const size_t size)
+{
+#ifdef HARD_MALLOC_TESTS
+ void *ret= malloc(size + 8);
+ if (ret != NULL)
+ {
+ ret= (void*)((caddr_t)ret + 8);
+ }
+#else
+ void *ret= malloc(size);
+#endif
+
+ if (ret != NULL)
+ {
+ memset(ret, 0xff, size);
+ }
+
+ return ret;
+}
+
+
+static void *my_realloc(memcached_st *ptr __attribute__((unused)), void *mem, const size_t size)
+{
+#ifdef HARD_MALLOC_TESTS
+ void *real_ptr= (mem == NULL) ? NULL : (void*)((caddr_t)mem - 8);
+ void *nmem= realloc(real_ptr, size + 8);
+
+ void *ret= NULL;
+ if (nmem != NULL)
+ {
+ ret= (void*)((caddr_t)nmem + 8);
+ }
+
+ return ret;
+#else
+ return realloc(mem, size);
+#endif
+}
+
+
+static void *my_calloc(memcached_st *ptr __attribute__((unused)), size_t nelem, const size_t size)
+{
+#ifdef HARD_MALLOC_TESTS
+ void *mem= my_malloc(ptr, nelem * size);
+ if (mem)
+ {
+ memset(mem, 0, nelem * size);
+ }
+
+ return mem;
+#else
+ return calloc(nelem, size);
+#endif
+}
+
+
+static test_return_t set_prefix(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "mine";
+ char *value;
+
+ /* Make sure be default none exists */
+ value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
+ test_truth(rc == MEMCACHED_FAILURE);
+
+ /* Test a clean set */
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, (void *)key);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
+ test_truth(memcmp(value, key, 4) == 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ /* Test that we can turn it off */
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, NULL);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
+ test_truth(rc == MEMCACHED_FAILURE);
+
+ /* Now setup for main test */
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, (void *)key);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memcmp(value, key, 4) == 0);
+
+ /* Set to Zero, and then Set to something too large */
+ {
+ char long_key[255];
+ memset(long_key, 0, 255);
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, NULL);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_callback_get(memc, MEMCACHED_CALLBACK_PREFIX_KEY, &rc);
+ test_truth(rc == MEMCACHED_FAILURE);
+ test_truth(value == NULL);
+
+ /* Test a long key for failure */
+ /* TODO, extend test to determine based on setting, what result should be */
+ strcpy(long_key, "Thisismorethentheallottednumberofcharacters");
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, long_key);
+ //test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ /* Now test a key with spaces (which will fail from long key, since bad key is not set) */
+ strcpy(long_key, "This is more then the allotted number of characters");
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, long_key);
+ test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
+
+ /* Test for a bad prefix, but with a short key */
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_VERIFY_KEY, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ strcpy(long_key, "dog cat");
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, long_key);
+ test_truth(rc == MEMCACHED_BAD_KEY_PROVIDED);
+ }
+
+ return TEST_SUCCESS;
+}
+
+
+#ifdef MEMCACHED_ENABLE_DEPRECATED
+static test_return_t deprecated_set_memory_alloc(memcached_st *memc)
+{
+ void *test_ptr= NULL;
+ void *cb_ptr= NULL;
+ {
+ memcached_malloc_fn malloc_cb=
+ (memcached_malloc_fn)my_malloc;
+ cb_ptr= *(void **)&malloc_cb;
+ memcached_return_t rc;
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_MALLOC_FUNCTION, cb_ptr);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_MALLOC_FUNCTION, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(test_ptr == cb_ptr);
+ }
+
+ {
+ memcached_realloc_fn realloc_cb=
+ (memcached_realloc_fn)my_realloc;
+ cb_ptr= *(void **)&realloc_cb;
+ memcached_return_t rc;
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_REALLOC_FUNCTION, cb_ptr);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_REALLOC_FUNCTION, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(test_ptr == cb_ptr);
+ }
+
+ {
+ memcached_free_fn free_cb=
+ (memcached_free_fn)my_free;
+ cb_ptr= *(void **)&free_cb;
+ memcached_return_t rc;
+
+ rc= memcached_callback_set(memc, MEMCACHED_CALLBACK_FREE_FUNCTION, cb_ptr);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_FREE_FUNCTION, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(test_ptr == cb_ptr);
+ }
+
+ return TEST_SUCCESS;
+}
+#endif
+
+
+static test_return_t set_memory_alloc(memcached_st *memc)
+{
+ memcached_return_t rc;
+ rc= memcached_set_memory_allocators(memc, NULL, my_free,
+ my_realloc, my_calloc);
+ test_truth(rc == MEMCACHED_FAILURE);
+
+ rc= memcached_set_memory_allocators(memc, my_malloc, my_free,
+ my_realloc, my_calloc);
+
+ memcached_malloc_fn mem_malloc;
+ memcached_free_fn mem_free;
+ memcached_realloc_fn mem_realloc;
+ memcached_calloc_fn mem_calloc;
+ memcached_get_memory_allocators(memc, &mem_malloc, &mem_free,
+ &mem_realloc, &mem_calloc);
+
+ test_truth(mem_malloc == my_malloc);
+ test_truth(mem_realloc == my_realloc);
+ test_truth(mem_calloc == my_calloc);
+ test_truth(mem_free == my_free);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t enable_consistent_crc(memcached_st *memc)
+{
+ test_return_t rc;
+ memcached_server_distribution_t value= MEMCACHED_DISTRIBUTION_CONSISTENT;
+ memcached_hash_t hash;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION, value);
+ if ((rc= pre_crc(memc)) != TEST_SUCCESS)
+ return rc;
+
+ value= (memcached_server_distribution_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION);
+ test_truth(value == MEMCACHED_DISTRIBUTION_CONSISTENT);
+
+ hash= (memcached_hash_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
+
+ if (hash != MEMCACHED_HASH_CRC)
+ return TEST_SKIPPED;
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t enable_consistent_hsieh(memcached_st *memc)
+{
+ test_return_t rc;
+ memcached_server_distribution_t value= MEMCACHED_DISTRIBUTION_CONSISTENT;
+ memcached_hash_t hash;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION, value);
+ if ((rc= pre_hsieh(memc)) != TEST_SUCCESS)
+ return rc;
+
+ value= (memcached_server_distribution_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION);
+ test_truth(value == MEMCACHED_DISTRIBUTION_CONSISTENT);
+
+ hash= (memcached_hash_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH);
+
+ if (hash != MEMCACHED_HASH_HSIEH)
+ return TEST_SKIPPED;
+
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t enable_cas(memcached_st *memc)
+{
+ unsigned int set= 1;
+
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, 0);
+
+ memcached_version(memc);
+
+ if ((instance->major_version >= 1 && (instance->minor_version == 2 && instance->micro_version >= 4))
+ || instance->minor_version > 2)
+ {
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, set);
+
+ return TEST_SUCCESS;
+ }
+
+ return TEST_SKIPPED;
+}
+
+static test_return_t check_for_1_2_3(memcached_st *memc)
+{
+ memcached_version(memc);
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, 0);
+
+ if ((instance->major_version >= 1 && (instance->minor_version == 2 && instance->micro_version >= 4))
+ || instance->minor_version > 2)
+ return TEST_SUCCESS;
+
+ return TEST_SKIPPED;
+}
+
+static test_return_t pre_unix_socket(memcached_st *memc)
+{
+ memcached_return_t rc;
+ struct stat buf;
+
+ memcached_servers_reset(memc);
+
+ if (stat("/tmp/memcached.socket", &buf))
+ return TEST_SKIPPED;
+
+ rc= memcached_server_add_unix_socket_with_weight(memc, "/tmp/memcached.socket", 0);
+
+ return ( rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_FAILURE );
+}
+
+static test_return_t pre_nodelay(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 0);
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, 0);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t pre_settimer(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SND_TIMEOUT, 1000);
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_RCV_TIMEOUT, 1000);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t poll_timeout(memcached_st *memc)
+{
+ size_t timeout;
+
+ timeout= 100;
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_POLL_TIMEOUT, timeout);
+
+ timeout= (size_t)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_POLL_TIMEOUT);
+
+ test_truth(timeout == 100);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t noreply_test(memcached_st *memc)
+{
+ memcached_return_t ret;
+ ret= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 1);
+ test_truth(ret == MEMCACHED_SUCCESS);
+ ret= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1);
+ test_truth(ret == MEMCACHED_SUCCESS);
+ ret= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, 1);
+ test_truth(ret == MEMCACHED_SUCCESS);
+ test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NOREPLY) == 1);
+ test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS) == 1);
+ test_truth(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS) == 1);
+
+ for (int count=0; count < 5; ++count)
+ {
+ for (int x=0; x < 100; ++x)
+ {
+ char key[10];
+ size_t len= (size_t)sprintf(key, "%d", x);
+ switch (count)
+ {
+ case 0:
+ ret= memcached_add(memc, key, len, key, len, 0, 0);
+ break;
+ case 1:
+ ret= memcached_replace(memc, key, len, key, len, 0, 0);
+ break;
+ case 2:
+ ret= memcached_set(memc, key, len, key, len, 0, 0);
+ break;
+ case 3:
+ ret= memcached_append(memc, key, len, key, len, 0, 0);
+ break;
+ case 4:
+ ret= memcached_prepend(memc, key, len, key, len, 0, 0);
+ break;
+ default:
+ test_truth(count);
+ break;
+ }
+ test_truth(ret == MEMCACHED_SUCCESS || ret == MEMCACHED_BUFFERED);
+ }
+
+ /*
+ ** NOTE: Don't ever do this in your code! this is not a supported use of the
+ ** API and is _ONLY_ done this way to verify that the library works the
+ ** way it is supposed to do!!!!
+ */
+ int no_msg=0;
+ for (uint32_t x=0; x < memcached_server_count(memc); ++x)
+ {
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, x);
+ no_msg+=(int)(instance->cursor_active);
+ }
+
+ test_truth(no_msg == 0);
+ test_truth(memcached_flush_buffers(memc) == MEMCACHED_SUCCESS);
+
+ /*
+ ** Now validate that all items was set properly!
+ */
+ for (int x=0; x < 100; ++x)
+ {
+ char key[10];
+ size_t len= (size_t)sprintf(key, "%d", x);
+ size_t length;
+ uint32_t flags;
+ char* value=memcached_get(memc, key, strlen(key),
+ &length, &flags, &ret);
+ test_truth(ret == MEMCACHED_SUCCESS && value != NULL);
+ switch (count)
+ {
+ case 0: /* FALLTHROUGH */
+ case 1: /* FALLTHROUGH */
+ case 2:
+ test_truth(strncmp(value, key, len) == 0);
+ test_truth(len == length);
+ break;
+ case 3:
+ test_truth(length == len * 2);
+ break;
+ case 4:
+ test_truth(length == len * 3);
+ break;
+ default:
+ test_truth(count);
+ break;
+ }
+ free(value);
+ }
+ }
+
+ /* Try setting an illegal cas value (should not return an error to
+ * the caller (because we don't expect a return message from the server)
+ */
+ const char* keys[]= {"0"};
+ size_t lengths[]= {1};
+ size_t length;
+ uint32_t flags;
+ memcached_result_st results_obj;
+ memcached_result_st *results;
+ ret= memcached_mget(memc, keys, lengths, 1);
+ test_truth(ret == MEMCACHED_SUCCESS);
+
+ results= memcached_result_create(memc, &results_obj);
+ test_truth(results);
+ results= memcached_fetch_result(memc, &results_obj, &ret);
+ test_truth(results);
+ test_truth(ret == MEMCACHED_SUCCESS);
+ uint64_t cas= memcached_result_cas(results);
+ memcached_result_free(&results_obj);
+
+ ret= memcached_cas(memc, keys[0], lengths[0], keys[0], lengths[0], 0, 0, cas);
+ test_truth(ret == MEMCACHED_SUCCESS);
+
+ /*
+ * The item will have a new cas value, so try to set it again with the old
+ * value. This should fail!
+ */
+ ret= memcached_cas(memc, keys[0], lengths[0], keys[0], lengths[0], 0, 0, cas);
+ test_truth(ret == MEMCACHED_SUCCESS);
+ test_truth(memcached_flush_buffers(memc) == MEMCACHED_SUCCESS);
+ char* value=memcached_get(memc, keys[0], lengths[0], &length, &flags, &ret);
+ test_truth(ret == MEMCACHED_SUCCESS && value != NULL);
+ free(value);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t analyzer_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ memcached_stat_st *memc_stat;
+ memcached_analysis_st *report;
+
+ memc_stat= memcached_stat(memc, NULL, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(memc_stat);
+
+ report= memcached_analyze(memc, memc_stat, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(report);
+
+ free(report);
+ memcached_stat_free(NULL, memc_stat);
+
+ return TEST_SUCCESS;
+}
+
+/* Count the objects */
+static memcached_return_t callback_dump_counter(memcached_st *ptr __attribute__((unused)),
+ const char *key __attribute__((unused)),
+ size_t key_length __attribute__((unused)),
+ void *context)
+{
+ uint32_t *counter= (uint32_t *)context;
+
+ *counter= *counter + 1;
+
+ return MEMCACHED_SUCCESS;
+}
+
+static test_return_t dump_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ uint32_t counter= 0;
+ memcached_dump_fn callbacks[1];
+ test_return_t main_rc;
+
+ callbacks[0]= &callback_dump_counter;
+
+ /* No support for Binary protocol yet */
+ if (memc->flags.binary_protocol)
+ return TEST_SUCCESS;
+
+ main_rc= set_test3(memc);
+
+ test_truth (main_rc == TEST_SUCCESS);
+
+ rc= memcached_dump(memc, callbacks, (void *)&counter, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ /* We may have more then 32 if our previous flush has not completed */
+ test_truth(counter >= 32);
+
+ return TEST_SUCCESS;
+}
+
+#ifdef HAVE_LIBMEMCACHEDUTIL
+static void* connection_release(void *arg)
+{
+ struct {
+ memcached_pool_st* pool;
+ memcached_st* mmc;
+ } *resource= arg;
+
+ usleep(250);
+ assert(memcached_pool_push(resource->pool, resource->mmc) == MEMCACHED_SUCCESS);
+ return arg;
+}
+
+static test_return_t connection_pool_test(memcached_st *memc)
+{
+ memcached_pool_st* pool= memcached_pool_create(memc, 5, 10);
+ test_truth(pool != NULL);
+ memcached_st* mmc[10];
+ memcached_return_t rc;
+
+ for (int x= 0; x < 10; ++x) {
+ mmc[x]= memcached_pool_pop(pool, false, &rc);
+ test_truth(mmc[x] != NULL);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ test_truth(memcached_pool_pop(pool, false, &rc) == NULL);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ pthread_t tid;
+ struct {
+ memcached_pool_st* pool;
+ memcached_st* mmc;
+ } item= { .pool = pool, .mmc = mmc[9] };
+ pthread_create(&tid, NULL, connection_release, &item);
+ mmc[9]= memcached_pool_pop(pool, true, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ pthread_join(tid, NULL);
+ test_truth(mmc[9] == item.mmc);
+ const char *key= "key";
+ size_t keylen= strlen(key);
+
+ // verify that I can do ops with all connections
+ rc= memcached_set(mmc[0], key, keylen, "0", 1, 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ for (unsigned int x= 0; x < 10; ++x) {
+ uint64_t number_value;
+ rc= memcached_increment(mmc[x], key, keylen, 1, &number_value);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(number_value == (x+1));
+ }
+
+ // Release them..
+ for (int x= 0; x < 10; ++x)
+ test_truth(memcached_pool_push(pool, mmc[x]) == MEMCACHED_SUCCESS);
+
+
+ /* verify that I can set behaviors on the pool when I don't have all
+ * of the connections in the pool. It should however be enabled
+ * when I push the item into the pool
+ */
+ mmc[0]= memcached_pool_pop(pool, false, &rc);
+ test_truth(mmc[0] != NULL);
+
+ rc= memcached_pool_behavior_set(pool, MEMCACHED_BEHAVIOR_IO_MSG_WATERMARK, 9999);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ mmc[1]= memcached_pool_pop(pool, false, &rc);
+ test_truth(mmc[1] != NULL);
+
+ test_truth(memcached_behavior_get(mmc[1], MEMCACHED_BEHAVIOR_IO_MSG_WATERMARK) == 9999);
+ test_truth(memcached_pool_push(pool, mmc[1]) == MEMCACHED_SUCCESS);
+ test_truth(memcached_pool_push(pool, mmc[0]) == MEMCACHED_SUCCESS);
+
+ mmc[0]= memcached_pool_pop(pool, false, &rc);
+ test_truth(memcached_behavior_get(mmc[0], MEMCACHED_BEHAVIOR_IO_MSG_WATERMARK) == 9999);
+ test_truth(memcached_pool_push(pool, mmc[0]) == MEMCACHED_SUCCESS);
+
+
+ test_truth(memcached_pool_destroy(pool) == memc);
+ return TEST_SUCCESS;
+}
+#endif
+
+static test_return_t replication_set_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ memcached_st *memc_clone= memcached_clone(NULL, memc);
+ memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 0);
+
+ rc= memcached_set(memc, "bubba", 5, "0", 1, 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ /*
+ ** We are using the quiet commands to store the replicas, so we need
+ ** to ensure that all of them are processed before we can continue.
+ ** In the test we go directly from storing the object to trying to
+ ** receive the object from all of the different servers, so we
+ ** could end up in a race condition (the memcached server hasn't yet
+ ** processed the quiet command from the replication set when it process
+ ** the request from the other client (created by the clone)). As a
+ ** workaround for that we call memcached_quit to send the quit command
+ ** to the server and wait for the response ;-) If you use the test code
+ ** as an example for your own code, please note that you shouldn't need
+ ** to do this ;-)
+ */
+ memcached_quit(memc);
+
+ /*
+ ** "bubba" should now be stored on all of our servers. We don't have an
+ ** easy to use API to address each individual server, so I'll just iterate
+ ** through a bunch of "master keys" and I should most likely hit all of the
+ ** servers...
+ */
+ for (int x= 'a'; x <= 'z'; ++x)
+ {
+ char key[2]= { [0]= (char)x };
+ size_t len;
+ uint32_t flags;
+ char *val= memcached_get_by_key(memc_clone, key, 1, "bubba", 5,
+ &len, &flags, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(val != NULL);
+ free(val);
+ }
+
+ memcached_free(memc_clone);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t replication_get_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+
+ /*
+ * Don't do the following in your code. I am abusing the internal details
+ * within the library, and this is not a supported interface.
+ * This is to verify correct behavior in the library
+ */
+ for (uint32_t host= 0; host < memcached_server_count(memc); ++host)
+ {
+ memcached_st *memc_clone= memcached_clone(NULL, memc);
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc_clone, host);
+
+ instance->port= 0;
+
+ for (int x= 'a'; x <= 'z'; ++x)
+ {
+ char key[2]= { [0]= (char)x };
+ size_t len;
+ uint32_t flags;
+ char *val= memcached_get_by_key(memc_clone, key, 1, "bubba", 5,
+ &len, &flags, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(val != NULL);
+ free(val);
+ }
+
+ memcached_free(memc_clone);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t replication_mget_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ memcached_st *memc_clone= memcached_clone(NULL, memc);
+ memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 0);
+
+ const char *keys[]= { "bubba", "key1", "key2", "key3" };
+ size_t len[]= { 5, 4, 4, 4 };
+
+ for (int x=0; x< 4; ++x)
+ {
+ rc= memcached_set(memc, keys[x], len[x], "0", 1, 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ /*
+ ** We are using the quiet commands to store the replicas, so we need
+ ** to ensure that all of them are processed before we can continue.
+ ** In the test we go directly from storing the object to trying to
+ ** receive the object from all of the different servers, so we
+ ** could end up in a race condition (the memcached server hasn't yet
+ ** processed the quiet command from the replication set when it process
+ ** the request from the other client (created by the clone)). As a
+ ** workaround for that we call memcached_quit to send the quit command
+ ** to the server and wait for the response ;-) If you use the test code
+ ** as an example for your own code, please note that you shouldn't need
+ ** to do this ;-)
+ */
+ memcached_quit(memc);
+
+ /*
+ * Don't do the following in your code. I am abusing the internal details
+ * within the library, and this is not a supported interface.
+ * This is to verify correct behavior in the library
+ */
+ memcached_result_st result_obj;
+ for (uint32_t host= 0; host < memc_clone->number_of_hosts; host++)
+ {
+ memcached_st *new_clone= memcached_clone(NULL, memc);
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(new_clone, host);
+ instance->port= 0;
+
+ for (int x= 'a'; x <= 'z'; ++x)
+ {
+ const char key[2]= { [0]= (const char)x };
+
+ rc= memcached_mget_by_key(new_clone, key, 1, keys, len, 4);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ memcached_result_st *results= memcached_result_create(new_clone, &result_obj);
+ test_truth(results);
+
+ int hits= 0;
+ while ((results= memcached_fetch_result(new_clone, &result_obj, &rc)) != NULL)
+ {
+ hits++;
+ }
+ test_truth(hits == 4);
+ memcached_result_free(&result_obj);
+ }
+
+ memcached_free(new_clone);
+ }
+
+ memcached_free(memc_clone);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t replication_randomize_mget_test(memcached_st *memc)
+{
+ memcached_result_st result_obj;
+ memcached_return_t rc;
+ memcached_st *memc_clone= memcached_clone(NULL, memc);
+ memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 3);
+ memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_RANDOMIZE_REPLICA_READ, 1);
+
+ const char *keys[]= { "key1", "key2", "key3", "key4", "key5", "key6", "key7" };
+ size_t len[]= { 4, 4, 4, 4, 4, 4, 4 };
+
+ for (int x=0; x< 7; ++x)
+ {
+ rc= memcached_set(memc, keys[x], len[x], "1", 1, 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ memcached_quit(memc);
+
+ for (int x=0; x< 7; ++x) {
+ const char key[2]= { [0]= (const char)x };
+
+ rc= memcached_mget_by_key(memc_clone, key, 1, keys, len, 7);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ memcached_result_st *results= memcached_result_create(memc_clone, &result_obj);
+ test_truth(results);
+
+ int hits= 0;
+ while ((results= memcached_fetch_result(memc_clone, &result_obj, &rc)) != NULL)
+ {
+ ++hits;
+ }
+ test_truth(hits == 7);
+ memcached_result_free(&result_obj);
+ }
+ memcached_free(memc_clone);
+ return TEST_SUCCESS;
+}
+
+static test_return_t replication_delete_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ memcached_st *memc_clone= memcached_clone(NULL, memc);
+ /* Delete the items from all of the servers except 1 */
+ uint64_t repl= memcached_behavior_get(memc,
+ MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS);
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, --repl);
+
+ const char *keys[]= { "bubba", "key1", "key2", "key3" };
+ size_t len[]= { 5, 4, 4, 4 };
+
+ for (int x=0; x< 4; ++x)
+ {
+ rc= memcached_delete_by_key(memc, keys[0], len[0], keys[x], len[x], 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ /*
+ * Don't do the following in your code. I am abusing the internal details
+ * within the library, and this is not a supported interface.
+ * This is to verify correct behavior in the library
+ */
+ uint32_t hash= memcached_generate_hash(memc, keys[0], len[0]);
+ for (uint32_t x= 0; x < (repl + 1); ++x)
+ {
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc_clone, x);
+
+ instance->port= 0;
+ if (++hash == memc_clone->number_of_hosts)
+ hash= 0;
+ }
+
+ memcached_result_st result_obj;
+ for (uint32_t host= 0; host < memc_clone->number_of_hosts; ++host)
+ {
+ for (int x= 'a'; x <= 'z'; ++x)
+ {
+ const char key[2]= { [0]= (const char)x };
+
+ rc= memcached_mget_by_key(memc_clone, key, 1, keys, len, 4);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ memcached_result_st *results= memcached_result_create(memc_clone, &result_obj);
+ test_truth(results);
+
+ int hits= 0;
+ while ((results= memcached_fetch_result(memc_clone, &result_obj, &rc)) != NULL)
+ {
+ ++hits;
+ }
+ test_truth(hits == 4);
+ memcached_result_free(&result_obj);
+ }
+ }
+ memcached_free(memc_clone);
+
+ return TEST_SUCCESS;
+}
+
+static void increment_request_id(uint16_t *id)
+{
+ (*id)++;
+ if ((*id & UDP_REQUEST_ID_THREAD_MASK) != 0)
+ *id= 0;
+}
+
+static uint16_t *get_udp_request_ids(memcached_st *memc)
+{
+ uint16_t *ids= malloc(sizeof(uint16_t) * memcached_server_count(memc));
+ assert(ids != NULL);
+ unsigned int x;
+
+ for (x= 0; x < memcached_server_count(memc); x++)
+ {
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, x);
+
+ ids[x]= get_udp_datagram_request_id((struct udp_datagram_header_st *) instance->write_buffer);
+ }
+
+ return ids;
+}
+
+static test_return_t post_udp_op_check(memcached_st *memc, uint16_t *expected_req_ids)
+{
+ unsigned int x;
+ memcached_server_st *cur_server = memcached_server_list(memc);
+ uint16_t *cur_req_ids = get_udp_request_ids(memc);
+
+ for (x= 0; x < memcached_server_count(memc); x++)
+ {
+ test_truth(cur_server[x].cursor_active == 0);
+ test_truth(cur_req_ids[x] == expected_req_ids[x]);
+ }
+ free(expected_req_ids);
+ free(cur_req_ids);
+
+ return TEST_SUCCESS;
+}
+
+/*
+** There is a little bit of a hack here, instead of removing
+** the servers, I just set num host to 0 and them add then new udp servers
+**/
+static test_return_t init_udp(memcached_st *memc)
+{
+ memcached_version(memc);
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, 0);
+
+ /* For the time being, only support udp test for >= 1.2.6 && < 1.3 */
+ if (instance->major_version != 1 || instance->minor_version != 2
+ || instance->micro_version < 6)
+ return TEST_SKIPPED;
+
+ uint32_t num_hosts= memcached_server_count(memc);
+ unsigned int x= 0;
+ memcached_server_st servers[num_hosts];
+ memcpy(servers, memcached_server_list(memc), sizeof(memcached_server_st) * num_hosts);
+ for (x= 0; x < num_hosts; x++)
+ {
+ memcached_server_instance_st *set_instance=
+ memcached_server_instance_fetch(memc, x);
+
+ memcached_server_free(set_instance);
+ }
+
+ memc->number_of_hosts= 0;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_USE_UDP, 1);
+ for (x= 0; x < num_hosts; x++)
+ {
+ memcached_server_instance_st *set_instance=
+ memcached_server_instance_fetch(memc, x);
+
+ test_truth(memcached_server_add_udp(memc, servers[x].hostname, servers[x].port) == MEMCACHED_SUCCESS);
+ test_truth(set_instance->write_buffer_offset == UDP_DATAGRAM_HEADER_LENGTH);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t binary_init_udp(memcached_st *memc)
+{
+ test_return_t test_rc;
+ test_rc= pre_binary(memc);
+
+ if (test_rc != TEST_SUCCESS)
+ return test_rc;
+
+ return init_udp(memc);
+}
+
+/* Make sure that I cant add a tcp server to a udp client */
+static test_return_t add_tcp_server_udp_client_test(memcached_st *memc)
+{
+ (void)memc;
+#if 0
+ memcached_server_st server;
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, 0);
+ memcached_server_clone(&server, &memc->hosts[0]);
+ test_truth(memcached_server_remove(&(memc->hosts[0])) == MEMCACHED_SUCCESS);
+ test_truth(memcached_server_add(memc, server.hostname, server.port) == MEMCACHED_INVALID_HOST_PROTOCOL);
+#endif
+ return TEST_SUCCESS;
+}
+
+/* Make sure that I cant add a udp server to a tcp client */
+static test_return_t add_udp_server_tcp_client_test(memcached_st *memc)
+{
+ (void)memc;
+#if 0
+ memcached_server_st server;
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, 0);
+ memcached_server_clone(&server, &memc->hosts[0]);
+ test_truth(memcached_server_remove(&(memc->hosts[0])) == MEMCACHED_SUCCESS);
+
+ memcached_st tcp_client;
+ memcached_create(&tcp_client);
+ test_truth(memcached_server_add_udp(&tcp_client, server.hostname, server.port) == MEMCACHED_INVALID_HOST_PROTOCOL);
+#endif
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t set_udp_behavior_test(memcached_st *memc)
+{
+
+ memcached_quit(memc);
+ memc->number_of_hosts= 0;
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_DISTRIBUTION, memc->distribution);
+ test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_USE_UDP, 1) == MEMCACHED_SUCCESS);
+ test_truth(memc->flags.use_udp);
+ test_truth(memc->flags.no_reply);
+
+ test_truth(memcached_server_count(memc) == 0);
+
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_USE_UDP,0);
+ test_truth(! (memc->flags.use_udp));
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY,0);
+ test_truth(! (memc->flags.no_reply));
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t udp_set_test(memcached_st *memc)
+{
+ unsigned int x= 0;
+ unsigned int num_iters= 1025; //request id rolls over at 1024
+ for (x= 0; x < num_iters;x++)
+ {
+ memcached_return_t rc;
+ const char *key= "foo";
+ const char *value= "when we sanitize";
+ uint16_t *expected_ids= get_udp_request_ids(memc);
+ unsigned int server_key= memcached_generate_hash(memc, key, strlen(key));
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, server_key);
+ size_t init_offset= instance->write_buffer_offset;
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ /** NB, the check below assumes that if new write_ptr is less than
+ * the original write_ptr that we have flushed. For large payloads, this
+ * maybe an invalid assumption, but for the small payload we have it is OK
+ */
+ if (rc == MEMCACHED_SUCCESS ||
+ instance->write_buffer_offset < init_offset)
+ increment_request_id(&expected_ids[server_key]);
+
+ if (rc == MEMCACHED_SUCCESS)
+ {
+ test_truth(instance->write_buffer_offset == UDP_DATAGRAM_HEADER_LENGTH);
+ }
+ else
+ {
+ test_truth(instance->write_buffer_offset != UDP_DATAGRAM_HEADER_LENGTH);
+ test_truth(instance->write_buffer_offset <= MAX_UDP_DATAGRAM_LENGTH);
+ }
+ test_truth(post_udp_op_check(memc, expected_ids) == TEST_SUCCESS);
+ }
+ return TEST_SUCCESS;
+}
+
+static test_return_t udp_buffered_set_test(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1);
+ return udp_set_test(memc);
+}
+
+static test_return_t udp_set_too_big_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "bar";
+ char value[MAX_UDP_DATAGRAM_LENGTH];
+ uint16_t *expected_ids= get_udp_request_ids(memc);
+ rc= memcached_set(memc, key, strlen(key),
+ value, MAX_UDP_DATAGRAM_LENGTH,
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_WRITE_FAILURE);
+ return post_udp_op_check(memc,expected_ids);
+}
+
+static test_return_t udp_delete_test(memcached_st *memc)
+{
+ unsigned int x= 0;
+ unsigned int num_iters= 1025; //request id rolls over at 1024
+ for (x= 0; x < num_iters;x++)
+ {
+ memcached_return_t rc;
+ const char *key= "foo";
+ uint16_t *expected_ids=get_udp_request_ids(memc);
+ unsigned int server_key= memcached_generate_hash(memc, key, strlen(key));
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, server_key);
+ size_t init_offset= instance->write_buffer_offset;
+
+ rc= memcached_delete(memc, key, strlen(key), 0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ if (rc == MEMCACHED_SUCCESS || instance->write_buffer_offset < init_offset)
+ increment_request_id(&expected_ids[server_key]);
+ if (rc == MEMCACHED_SUCCESS)
+ {
+ test_truth(instance->write_buffer_offset == UDP_DATAGRAM_HEADER_LENGTH);
+ }
+ else
+ {
+ test_truth(instance->write_buffer_offset != UDP_DATAGRAM_HEADER_LENGTH);
+ test_truth(instance->write_buffer_offset <= MAX_UDP_DATAGRAM_LENGTH);
+ }
+ test_truth(post_udp_op_check(memc,expected_ids) == TEST_SUCCESS);
+ }
+ return TEST_SUCCESS;
+}
+
+static test_return_t udp_buffered_delete_test(memcached_st *memc)
+{
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1);
+ return udp_delete_test(memc);
+}
+
+static test_return_t udp_verbosity_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ uint16_t *expected_ids= get_udp_request_ids(memc);
+ unsigned int x;
+ for (x= 0; x < memcached_server_count(memc); x++)
+ increment_request_id(&expected_ids[x]);
+
+ rc= memcached_verbosity(memc,3);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ return post_udp_op_check(memc,expected_ids);
+}
+
+static test_return_t udp_quit_test(memcached_st *memc)
+{
+ uint16_t *expected_ids= get_udp_request_ids(memc);
+ memcached_quit(memc);
+ return post_udp_op_check(memc, expected_ids);
+}
+
+static test_return_t udp_flush_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ uint16_t *expected_ids= get_udp_request_ids(memc);
+ unsigned int x;
+ for (x= 0; x < memcached_server_count(memc);x++)
+ increment_request_id(&expected_ids[x]);
+
+ rc= memcached_flush(memc,0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ return post_udp_op_check(memc,expected_ids);
+}
+
+static test_return_t udp_incr_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "incr";
+ const char *value= "1";
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ uint16_t *expected_ids= get_udp_request_ids(memc);
+ unsigned int server_key= memcached_generate_hash(memc, key, strlen(key));
+ increment_request_id(&expected_ids[server_key]);
+ uint64_t newvalue;
+ rc= memcached_increment(memc, key, strlen(key), 1, &newvalue);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ return post_udp_op_check(memc, expected_ids);
+}
+
+static test_return_t udp_decr_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "decr";
+ const char *value= "1";
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+
+ test_truth(rc == MEMCACHED_SUCCESS);
+ uint16_t *expected_ids= get_udp_request_ids(memc);
+ unsigned int server_key= memcached_generate_hash(memc, key, strlen(key));
+ increment_request_id(&expected_ids[server_key]);
+ uint64_t newvalue;
+ rc= memcached_decrement(memc, key, strlen(key), 1, &newvalue);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ return post_udp_op_check(memc, expected_ids);
+}
+
+
+static test_return_t udp_stat_test(memcached_st *memc)
+{
+ memcached_stat_st * rv= NULL;
+ memcached_return_t rc;
+ char args[]= "";
+ uint16_t *expected_ids = get_udp_request_ids(memc);
+ rv = memcached_stat(memc, args, &rc);
+ free(rv);
+ test_truth(rc == MEMCACHED_NOT_SUPPORTED);
+ return post_udp_op_check(memc, expected_ids);
+}
+
+static test_return_t udp_version_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ uint16_t *expected_ids = get_udp_request_ids(memc);
+ rc = memcached_version(memc);
+ test_truth(rc == MEMCACHED_NOT_SUPPORTED);
+ return post_udp_op_check(memc, expected_ids);
+}
+
+static test_return_t udp_get_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ const char *key= "foo";
+ size_t vlen;
+ uint16_t *expected_ids = get_udp_request_ids(memc);
+ char *val= memcached_get(memc, key, strlen(key), &vlen, (uint32_t)0, &rc);
+ test_truth(rc == MEMCACHED_NOT_SUPPORTED);
+ test_truth(val == NULL);
+ return post_udp_op_check(memc, expected_ids);
+}
+
+static test_return_t udp_mixed_io_test(memcached_st *memc)
+{
+ test_st current_op;
+ test_st mixed_io_ops [] ={
+ {"udp_set_test", 0,
+ (test_callback_fn)udp_set_test},
+ {"udp_set_too_big_test", 0,
+ (test_callback_fn)udp_set_too_big_test},
+ {"udp_delete_test", 0,
+ (test_callback_fn)udp_delete_test},
+ {"udp_verbosity_test", 0,
+ (test_callback_fn)udp_verbosity_test},
+ {"udp_quit_test", 0,
+ (test_callback_fn)udp_quit_test},
+ {"udp_flush_test", 0,
+ (test_callback_fn)udp_flush_test},
+ {"udp_incr_test", 0,
+ (test_callback_fn)udp_incr_test},
+ {"udp_decr_test", 0,
+ (test_callback_fn)udp_decr_test},
+ {"udp_version_test", 0,
+ (test_callback_fn)udp_version_test}
+ };
+ unsigned int x= 0;
+ for (x= 0; x < 500; x++)
+ {
+ current_op= mixed_io_ops[random() % 9];
+ test_truth(current_op.test_fn(memc) == TEST_SUCCESS);
+ }
+ return TEST_SUCCESS;
+}
+
+#if 0
+static test_return_t hash_sanity_test (memcached_st *memc)
+{
+ (void)memc;
+
+ assert(MEMCACHED_HASH_DEFAULT == MEMCACHED_HASH_DEFAULT);
+ assert(MEMCACHED_HASH_MD5 == MEMCACHED_HASH_MD5);
+ assert(MEMCACHED_HASH_CRC == MEMCACHED_HASH_CRC);
+ assert(MEMCACHED_HASH_FNV1_64 == MEMCACHED_HASH_FNV1_64);
+ assert(MEMCACHED_HASH_FNV1A_64 == MEMCACHED_HASH_FNV1A_64);
+ assert(MEMCACHED_HASH_FNV1_32 == MEMCACHED_HASH_FNV1_32);
+ assert(MEMCACHED_HASH_FNV1A_32 == MEMCACHED_HASH_FNV1A_32);
+#ifdef HAVE_HSIEH_HASH
+ assert(MEMCACHED_HASH_HSIEH == MEMCACHED_HASH_HSIEH);
+#endif
+ assert(MEMCACHED_HASH_MURMUR == MEMCACHED_HASH_MURMUR);
+ assert(MEMCACHED_HASH_JENKINS == MEMCACHED_HASH_JENKINS);
+ assert(MEMCACHED_HASH_MAX == MEMCACHED_HASH_MAX);
+
+ return TEST_SUCCESS;
+}
+#endif
+
+static test_return_t hsieh_avaibility_test (memcached_st *memc)
+{
+ memcached_return_t expected_rc= MEMCACHED_FAILURE;
+#ifdef HAVE_HSIEH_HASH
+ expected_rc= MEMCACHED_SUCCESS;
+#endif
+ memcached_return_t rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH,
+ (uint64_t)MEMCACHED_HASH_HSIEH);
+ test_truth(rc == expected_rc);
+ return TEST_SUCCESS;
+}
+
+static test_return_t md5_run (memcached_st *memc __attribute__((unused)))
+{
+ uint32_t x;
+ const char **ptr;
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_MD5);
+ test_truth(md5_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t crc_run (memcached_st *memc __attribute__((unused)))
+{
+ uint32_t x;
+ const char **ptr;
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_CRC);
+ test_truth(crc_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t fnv1_64_run (memcached_st *memc __attribute__((unused)))
+{
+ uint32_t x;
+ const char **ptr;
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1_64);
+ test_truth(fnv1_64_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t fnv1a_64_run (memcached_st *memc __attribute__((unused)))
+{
+ uint32_t x;
+ const char **ptr;
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1A_64);
+ test_truth(fnv1a_64_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t fnv1_32_run (memcached_st *memc __attribute__((unused)))
+{
+ uint32_t x;
+ const char **ptr;
+
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1_32);
+ test_truth(fnv1_32_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t fnv1a_32_run (memcached_st *memc __attribute__((unused)))
+{
+ uint32_t x;
+ const char **ptr;
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1A_32);
+ test_truth(fnv1a_32_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t hsieh_run (memcached_st *memc __attribute__((unused)))
+{
+ uint32_t x;
+ const char **ptr;
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_HSIEH);
+ test_truth(hsieh_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t murmur_run (memcached_st *memc __attribute__((unused)))
+{
+#ifdef __sparc
+ return TEST_SKIPPED;
+#else
+ uint32_t x;
+ const char **ptr;
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_MURMUR);
+ test_truth(murmur_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+#endif
+}
+
+static test_return_t jenkins_run (memcached_st *memc __attribute__((unused)))
+{
+ uint32_t x;
+ const char **ptr;
+
+
+ for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
+ {
+ uint32_t hash_val;
+
+ hash_val= memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_JENKINS);
+ test_truth(jenkins_values[x] == hash_val);
+ }
+
+ return TEST_SUCCESS;
+}
+
+
+static test_return_t ketama_compatibility_libmemcached(memcached_st *trash)
+{
+ memcached_return_t rc;
+ uint64_t value;
+ int x;
+ memcached_server_st *server_pool;
+ memcached_st *memc;
+
+ (void)trash;
+
+ memc= memcached_create(NULL);
+ test_truth(memc);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
+ test_truth(value == 1);
+
+ test_truth(memcached_behavior_set_distribution(memc, MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA) == MEMCACHED_SUCCESS);
+ test_truth(memcached_behavior_get_distribution(memc) == MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA);
+
+
+ server_pool = memcached_servers_parse("10.0.1.1:11211 600,10.0.1.2:11211 300,10.0.1.3:11211 200,10.0.1.4:11211 350,10.0.1.5:11211 1000,10.0.1.6:11211 800,10.0.1.7:11211 950,10.0.1.8:11211 100");
+ memcached_server_push(memc, server_pool);
+
+ /* verify that the server list was parsed okay. */
+ test_truth(memcached_server_count(memc) == 8);
+ test_strcmp(server_pool[0].hostname, "10.0.1.1");
+ test_truth(server_pool[0].port == 11211);
+ test_truth(server_pool[0].weight == 600);
+ test_strcmp(server_pool[2].hostname, "10.0.1.3");
+ test_truth(server_pool[2].port == 11211);
+ test_truth(server_pool[2].weight == 200);
+ test_strcmp(server_pool[7].hostname, "10.0.1.8");
+ test_truth(server_pool[7].port == 11211);
+ test_truth(server_pool[7].weight == 100);
+
+ /* VDEAAAAA hashes to fffcd1b5, after the last continuum point, and lets
+ * us test the boundary wraparound.
+ */
+ test_truth(memcached_generate_hash(memc, (char *)"VDEAAAAA", 8) == memc->continuum[0].index);
+
+ /* verify the standard ketama set. */
+ for (x= 0; x < 99; x++)
+ {
+ uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases[x].key, strlen(ketama_test_cases[x].key));
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, server_idx);
+ char *hostname = instance->hostname;
+
+ test_strcmp(hostname, ketama_test_cases[x].server);
+ }
+
+ memcached_server_list_free(server_pool);
+ memcached_free(memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t ketama_compatibility_spymemcached(memcached_st *trash)
+{
+ memcached_return_t rc;
+ uint64_t value;
+ int x;
+ memcached_server_st *server_pool;
+ memcached_st *memc;
+
+ (void)trash;
+
+ memc= memcached_create(NULL);
+ test_truth(memc);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
+ test_truth(value == 1);
+
+ test_truth(memcached_behavior_set_distribution(memc, MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA_SPY) == MEMCACHED_SUCCESS);
+ test_truth(memcached_behavior_get_distribution(memc) == MEMCACHED_DISTRIBUTION_CONSISTENT_KETAMA_SPY);
+
+ server_pool = memcached_servers_parse("10.0.1.1:11211 600,10.0.1.2:11211 300,10.0.1.3:11211 200,10.0.1.4:11211 350,10.0.1.5:11211 1000,10.0.1.6:11211 800,10.0.1.7:11211 950,10.0.1.8:11211 100");
+ memcached_server_push(memc, server_pool);
+
+ /* verify that the server list was parsed okay. */
+ test_truth(memcached_server_count(memc) == 8);
+ test_strcmp(server_pool[0].hostname, "10.0.1.1");
+ test_truth(server_pool[0].port == 11211);
+ test_truth(server_pool[0].weight == 600);
+ test_strcmp(server_pool[2].hostname, "10.0.1.3");
+ test_truth(server_pool[2].port == 11211);
+ test_truth(server_pool[2].weight == 200);
+ test_strcmp(server_pool[7].hostname, "10.0.1.8");
+ test_truth(server_pool[7].port == 11211);
+ test_truth(server_pool[7].weight == 100);
+
+ /* VDEAAAAA hashes to fffcd1b5, after the last continuum point, and lets
+ * us test the boundary wraparound.
+ */
+ test_truth(memcached_generate_hash(memc, (char *)"VDEAAAAA", 8) == memc->continuum[0].index);
+
+ /* verify the standard ketama set. */
+ for (x= 0; x < 99; x++)
+ {
+ uint32_t server_idx = memcached_generate_hash(memc, ketama_test_cases_spy[x].key, strlen(ketama_test_cases_spy[x].key));
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc, server_idx);
+ char *hostname = instance->hostname;
+ test_strcmp(hostname, ketama_test_cases_spy[x].server);
+ }
+
+ memcached_server_list_free(server_pool);
+ memcached_free(memc);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t regression_bug_434484(memcached_st *memc)
+{
+ test_return_t test_rc;
+ test_rc= pre_binary(memc);
+
+ if (test_rc != TEST_SUCCESS)
+ return test_rc;
+
+ memcached_return_t ret;
+ const char *key= "regression_bug_434484";
+ size_t keylen= strlen(key);
+
+ ret= memcached_append(memc, key, keylen, key, keylen, 0, 0);
+ test_truth(ret == MEMCACHED_NOTSTORED);
+
+ size_t size= 2048 * 1024;
+ void *data= calloc(1, size);
+ test_truth(data != NULL);
+ ret= memcached_set(memc, key, keylen, data, size, 0, 0);
+ test_truth(ret == MEMCACHED_E2BIG);
+ free(data);
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t regression_bug_434843(memcached_st *memc)
+{
+ test_return_t test_rc;
+ test_rc= pre_binary(memc);
+
+ if (test_rc != TEST_SUCCESS)
+ return test_rc;
+
+ memcached_return_t rc;
+ unsigned int counter= 0;
+ memcached_execute_fn callbacks[1]= { [0]= &callback_counter };
+
+ /*
+ * I only want to hit only _one_ server so I know the number of requests I'm
+ * sending in the pipleine to the server. Let's try to do a multiget of
+ * 1024 (that should satisfy most users don't you think?). Future versions
+ * will include a mget_execute function call if you need a higher number.
+ */
+ uint32_t number_of_hosts= memcached_server_count(memc);
+ memc->number_of_hosts= 1;
+ const size_t max_keys= 1024;
+ char **keys= calloc(max_keys, sizeof(char*));
+ size_t *key_length=calloc(max_keys, sizeof(size_t));
+
+ for (int x= 0; x < (int)max_keys; ++x)
+ {
+ char k[251];
+ key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%u", x);
+ keys[x]= strdup(k);
+ test_truth(keys[x] != NULL);
+ }
+
+ /*
+ * Run two times.. the first time we should have 100% cache miss,
+ * and the second time we should have 100% cache hits
+ */
+ for (int y= 0; y < 2; ++y)
+ {
+ rc= memcached_mget(memc, (const char**)keys, key_length, max_keys);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
+ if (y == 0)
+ {
+ /* The first iteration should give me a 100% cache miss. verify that*/
+ test_truth(counter == 0);
+ char blob[1024]= { 0 };
+ for (int x= 0; x < (int)max_keys; ++x)
+ {
+ rc= memcached_add(memc, keys[x], key_length[x],
+ blob, sizeof(blob), 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+ }
+ else
+ {
+ /* Verify that we received all of the key/value pairs */
+ test_truth(counter == (unsigned int)max_keys);
+ }
+ }
+
+ /* Release allocated resources */
+ for (size_t x= 0; x < max_keys; ++x)
+ free(keys[x]);
+ free(keys);
+ free(key_length);
+
+ memc->number_of_hosts= number_of_hosts;
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t regression_bug_434843_buffered(memcached_st *memc)
+{
+ memcached_return_t rc;
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ return regression_bug_434843(memc);
+}
+
+static test_return_t regression_bug_421108(memcached_st *memc)
+{
+ memcached_return_t rc;
+ memcached_stat_st *memc_stat= memcached_stat(memc, NULL, &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ char *bytes= memcached_stat_get_value(memc, memc_stat, "bytes", &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(bytes != NULL);
+ char *bytes_read= memcached_stat_get_value(memc, memc_stat,
+ "bytes_read", &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(bytes_read != NULL);
+
+ char *bytes_written= memcached_stat_get_value(memc, memc_stat,
+ "bytes_written", &rc);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ test_truth(bytes_written != NULL);
+
+ test_truth(strcmp(bytes, bytes_read) != 0);
+ test_truth(strcmp(bytes, bytes_written) != 0);
+
+ /* Release allocated resources */
+ free(bytes);
+ free(bytes_read);
+ free(bytes_written);
+ memcached_stat_free(NULL, memc_stat);
+
+ return TEST_SUCCESS;
+}
+
+/*
+ * The test case isn't obvious so I should probably document why
+ * it works the way it does. Bug 442914 was caused by a bug
+ * in the logic in memcached_purge (it did not handle the case
+ * where the number of bytes sent was equal to the watermark).
+ * In this test case, create messages so that we hit that case
+ * and then disable noreply mode and issue a new command to
+ * verify that it isn't stuck. If we change the format for the
+ * delete command or the watermarks, we need to update this
+ * test....
+ */
+static test_return_t regression_bug_442914(memcached_st *memc)
+{
+ memcached_return_t rc;
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 1);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, 1);
+
+ uint32_t number_of_hosts= memcached_server_count(memc);
+ memc->number_of_hosts= 1;
+
+ char k[250];
+ size_t len;
+
+ for (int x= 0; x < 250; ++x)
+ {
+ len= (size_t)snprintf(k, sizeof(k), "%0250u", x);
+ rc= memcached_delete(memc, k, len, 0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+ }
+
+ len= (size_t)snprintf(k, sizeof(k), "%037u", 251);
+ rc= memcached_delete(memc, k, len, 0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ rc= memcached_delete(memc, k, len, 0);
+ test_truth(rc == MEMCACHED_NOTFOUND);
+
+ memc->number_of_hosts= number_of_hosts;
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t regression_bug_447342(memcached_st *memc)
+{
+ memcached_server_instance_st *instance_one;
+ memcached_server_instance_st *instance_two;
+
+ if (memcached_server_count(memc) < 3 || pre_replication(memc) != MEMCACHED_SUCCESS)
+ return TEST_SKIPPED;
+
+ memcached_return_t rc;
+
+ rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 2);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ const size_t max_keys= 100;
+ char **keys= calloc(max_keys, sizeof(char*));
+ size_t *key_length= calloc(max_keys, sizeof(size_t));
+
+ for (uint64_t x= 0; x < max_keys; ++x)
+ {
+ char k[251];
+ key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%"PRIu64, x);
+ keys[x]= strdup(k);
+ test_truth(keys[x] != NULL);
+ rc= memcached_set(memc, k, key_length[x], k, key_length[x], 0, 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+
+ /*
+ ** We are using the quiet commands to store the replicas, so we need
+ ** to ensure that all of them are processed before we can continue.
+ ** In the test we go directly from storing the object to trying to
+ ** receive the object from all of the different servers, so we
+ ** could end up in a race condition (the memcached server hasn't yet
+ ** processed the quiet command from the replication set when it process
+ ** the request from the other client (created by the clone)). As a
+ ** workaround for that we call memcached_quit to send the quit command
+ ** to the server and wait for the response ;-) If you use the test code
+ ** as an example for your own code, please note that you shouldn't need
+ ** to do this ;-)
+ */
+ memcached_quit(memc);
+
+ /* Verify that all messages are stored, and we didn't stuff too much
+ * into the servers
+ */
+ rc= memcached_mget(memc, (const char* const *)keys, key_length, max_keys);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ unsigned int counter= 0;
+ memcached_execute_fn callbacks[1]= { [0]= &callback_counter };
+ rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
+ /* Verify that we received all of the key/value pairs */
+ test_truth(counter == (unsigned int)max_keys);
+
+ memcached_quit(memc);
+ /*
+ * Don't do the following in your code. I am abusing the internal details
+ * within the library, and this is not a supported interface.
+ * This is to verify correct behavior in the library. Fake that two servers
+ * are dead..
+ */
+ instance_one= memcached_server_instance_fetch(memc, 0);
+ instance_two= memcached_server_instance_fetch(memc, 2);
+ in_port_t port0= instance_one->port;
+ in_port_t port2= instance_two->port;
+
+ instance_one->port= 0;
+ instance_two->port= 0;
+
+ rc= memcached_mget(memc, (const char* const *)keys, key_length, max_keys);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ counter= 0;
+ rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
+ test_truth(counter == (unsigned int)max_keys);
+
+ /* restore the memc handle */
+ instance_one->port= port0;
+ instance_two->port= port2;
+
+ memcached_quit(memc);
+
+ /* Remove half of the objects */
+ for (size_t x= 0; x < max_keys; ++x)
+ {
+ if (x & 1)
+ {
+ rc= memcached_delete(memc, keys[x], key_length[x], 0);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ }
+ }
+
+ memcached_quit(memc);
+ instance_one->port= 0;
+ instance_two->port= 0;
+
+ /* now retry the command, this time we should have cache misses */
+ rc= memcached_mget(memc, (const char* const *)keys, key_length, max_keys);
+ test_truth(rc == MEMCACHED_SUCCESS);
+
+ counter= 0;
+ rc= memcached_fetch_execute(memc, callbacks, (void *)&counter, 1);
+ test_truth(counter == (unsigned int)(max_keys >> 1));
+
+ /* Release allocated resources */
+ for (size_t x= 0; x < max_keys; ++x)
+ {
+ free(keys[x]);
+ }
+ free(keys);
+ free(key_length);
+
+ /* restore the memc handle */
+ instance_one->port= port0;
+ instance_two->port= port2;
+
+ return TEST_SUCCESS;
+}
+
+static test_return_t regression_bug_463297(memcached_st *memc)
+{
+ memcached_st *memc_clone= memcached_clone(NULL, memc);
+ test_truth(memc_clone != NULL);
+ test_truth(memcached_version(memc_clone) == MEMCACHED_SUCCESS);
+
+ memcached_server_instance_st *instance=
+ memcached_server_instance_fetch(memc_clone, 0);
+
+ if (instance->major_version > 1 ||
+ (instance->major_version == 1 &&
+ instance->minor_version > 2))
+ {
+ /* Binary protocol doesn't support deferred delete */
+ memcached_st *bin_clone= memcached_clone(NULL, memc);
+ test_truth(bin_clone != NULL);
+ test_truth(memcached_behavior_set(bin_clone, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1) == MEMCACHED_SUCCESS);
+ test_truth(memcached_delete(bin_clone, "foo", 3, 1) == MEMCACHED_INVALID_ARGUMENTS);
+ memcached_free(bin_clone);
+
+ memcached_quit(memc_clone);
+
+ /* If we know the server version, deferred delete should fail
+ * with invalid arguments */
+ test_truth(memcached_delete(memc_clone, "foo", 3, 1) == MEMCACHED_INVALID_ARGUMENTS);
+
+ /* If we don't know the server version, we should get a protocol error */
+ memcached_return_t rc= memcached_delete(memc, "foo", 3, 1);
+
+ /* but there is a bug in some of the memcached servers (1.4) that treats
+ * the counter as noreply so it doesn't send the proper error message
+ */
+ test_truth(rc == MEMCACHED_PROTOCOL_ERROR || rc == MEMCACHED_NOTFOUND || rc == MEMCACHED_CLIENT_ERROR);
+
+ /* And buffered mode should be disabled and we should get protocol error */
+ test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1) == MEMCACHED_SUCCESS);
+ rc= memcached_delete(memc, "foo", 3, 1);
+ test_truth(rc == MEMCACHED_PROTOCOL_ERROR || rc == MEMCACHED_NOTFOUND || rc == MEMCACHED_CLIENT_ERROR);
+
+ /* Same goes for noreply... */
+ test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 1) == MEMCACHED_SUCCESS);
+ rc= memcached_delete(memc, "foo", 3, 1);
+ test_truth(rc == MEMCACHED_PROTOCOL_ERROR || rc == MEMCACHED_NOTFOUND || rc == MEMCACHED_CLIENT_ERROR);
+
+ /* but a normal request should go through (and be buffered) */
+ test_truth((rc= memcached_delete(memc, "foo", 3, 0)) == MEMCACHED_BUFFERED);
+ test_truth(memcached_flush_buffers(memc) == MEMCACHED_SUCCESS);
+
+ test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 0) == MEMCACHED_SUCCESS);
+ /* unbuffered noreply should be success */
+ test_truth(memcached_delete(memc, "foo", 3, 0) == MEMCACHED_SUCCESS);
+ /* unbuffered with reply should be not found... */
+ test_truth(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 0) == MEMCACHED_SUCCESS);
+ test_truth(memcached_delete(memc, "foo", 3, 0) == MEMCACHED_NOTFOUND);
+ }
+
+ memcached_free(memc_clone);
+ return TEST_SUCCESS;
+}
+
+
+/* Test memcached_server_get_last_disconnect
+ * For a working server set, shall be NULL
+ * For a set of non existing server, shall not be NULL
+ */
+static test_return_t test_get_last_disconnect(memcached_st *memc)
+{
+ memcached_return_t rc;
+ memcached_server_st *disconnected_server;
+
+ /* With the working set of server */
+ const char *key= "marmotte";
+ const char *value= "milka";
+
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+ disconnected_server = memcached_server_get_last_disconnect(memc);
+ test_truth(disconnected_server == NULL);
+
+ /* With a non existing server */
+ memcached_st *mine;
+ memcached_server_st *servers;
+
+ const char *server_list= "localhost:9";
+
+ servers= memcached_servers_parse(server_list);
+ test_truth(servers);
+ mine= memcached_create(NULL);
+ rc= memcached_server_push(mine, servers);
+ test_truth(rc == MEMCACHED_SUCCESS);
+ memcached_server_list_free(servers);
+ test_truth(mine);
+
+ rc= memcached_set(mine, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc != MEMCACHED_SUCCESS);
+
+ disconnected_server = memcached_server_get_last_disconnect(mine);
+ test_truth(disconnected_server != NULL);
+ test_truth(disconnected_server->port == 9);
+ test_truth(strncmp(disconnected_server->hostname,"localhost",9) == 0);
+
+ memcached_quit(mine);
+ memcached_free(mine);
+
+ return TEST_SUCCESS;
+}
+
+/*
+ * This test ensures that the failure counter isn't incremented during
+ * normal termination of the memcached instance.
+ */
+static test_return_t wrong_failure_counter_test(memcached_st *memc)
+{
+ memcached_return_t rc;
+ memcached_server_instance_st *instance;
+
+ /* Set value to force connection to the server */
+ const char *key= "marmotte";
+ const char *value= "milka";
+
+ /*
+ * Please note that I'm abusing the internal structures in libmemcached
+ * in a non-portable way and you shouldn't be doing this. I'm only
+ * doing this in order to verify that the library works the way it should
+ */
+ uint32_t number_of_hosts= memcached_server_count(memc);
+ memc->number_of_hosts= 1;
+
+ /* Ensure that we are connected to the server by setting a value */
+ rc= memcached_set(memc, key, strlen(key),
+ value, strlen(value),
+ (time_t)0, (uint32_t)0);
+ test_truth(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
+
+
+ instance= memcached_server_instance_fetch(memc, 0);
+ /* The test is to see that the memcached_quit doesn't increase the
+ * the server failure conter, so let's ensure that it is zero
+ * before sending quit
+ */
+ instance->server_failure_counter= 0;
+
+ memcached_quit(memc);
+
+ /* Verify that it memcached_quit didn't increment the failure counter
+ * Please note that this isn't bullet proof, because an error could
+ * occur...
+ */
+ test_truth(instance->server_failure_counter == 0);
+
+ /* restore the instance */
+ memc->number_of_hosts= number_of_hosts;
+
+ return TEST_SUCCESS;
+}
+
+test_st udp_setup_server_tests[] ={
+ {"set_udp_behavior_test", 0, (test_callback_fn)set_udp_behavior_test},
+ {"add_tcp_server_udp_client_test", 0, (test_callback_fn)add_tcp_server_udp_client_test},
+ {"add_udp_server_tcp_client_test", 0, (test_callback_fn)add_udp_server_tcp_client_test},
+ {0, 0, 0}
+};
+
+test_st upd_io_tests[] ={
+ {"udp_set_test", 0, (test_callback_fn)udp_set_test},
+ {"udp_buffered_set_test", 0, (test_callback_fn)udp_buffered_set_test},
+ {"udp_set_too_big_test", 0, (test_callback_fn)udp_set_too_big_test},
+ {"udp_delete_test", 0, (test_callback_fn)udp_delete_test},
+ {"udp_buffered_delete_test", 0, (test_callback_fn)udp_buffered_delete_test},
+ {"udp_verbosity_test", 0, (test_callback_fn)udp_verbosity_test},
+ {"udp_quit_test", 0, (test_callback_fn)udp_quit_test},
+ {"udp_flush_test", 0, (test_callback_fn)udp_flush_test},
+ {"udp_incr_test", 0, (test_callback_fn)udp_incr_test},
+ {"udp_decr_test", 0, (test_callback_fn)udp_decr_test},
+ {"udp_stat_test", 0, (test_callback_fn)udp_stat_test},
+ {"udp_version_test", 0, (test_callback_fn)udp_version_test},
+ {"udp_get_test", 0, (test_callback_fn)udp_get_test},
+ {"udp_mixed_io_test", 0, (test_callback_fn)udp_mixed_io_test},
+ {0, 0, 0}
+};
+
+/* Clean the server before beginning testing */
+test_st tests[] ={
+ {"flush", 0, (test_callback_fn)flush_test },
+ {"init", 0, (test_callback_fn)init_test },
+ {"allocation", 0, (test_callback_fn)allocation_test },
+ {"server_list_null_test", 0, (test_callback_fn)server_list_null_test},
+ {"server_unsort", 0, (test_callback_fn)server_unsort_test},
+ {"server_sort", 0, (test_callback_fn)server_sort_test},
+ {"server_sort2", 0, (test_callback_fn)server_sort2_test},
+ {"clone_test", 0, (test_callback_fn)clone_test },
+ {"connection_test", 0, (test_callback_fn)connection_test},
+ {"callback_test", 0, (test_callback_fn)callback_test},
+ {"userdata_test", 0, (test_callback_fn)userdata_test},
+ {"error", 0, (test_callback_fn)error_test },
+ {"set", 0, (test_callback_fn)set_test },
+ {"set2", 0, (test_callback_fn)set_test2 },
+ {"set3", 0, (test_callback_fn)set_test3 },
+ {"dump", 1, (test_callback_fn)dump_test},
+ {"add", 1, (test_callback_fn)add_test },
+ {"replace", 1, (test_callback_fn)replace_test },
+ {"delete", 1, (test_callback_fn)delete_test },
+ {"get", 1, (test_callback_fn)get_test },
+ {"get2", 0, (test_callback_fn)get_test2 },
+ {"get3", 0, (test_callback_fn)get_test3 },
+ {"get4", 0, (test_callback_fn)get_test4 },
+ {"partial mget", 0, (test_callback_fn)get_test5 },
+ {"stats_servername", 0, (test_callback_fn)stats_servername_test },
+ {"increment", 0, (test_callback_fn)increment_test },
+ {"increment_with_initial", 1, (test_callback_fn)increment_with_initial_test },
+ {"decrement", 0, (test_callback_fn)decrement_test },
+ {"decrement_with_initial", 1, (test_callback_fn)decrement_with_initial_test },
+ {"increment_by_key", 0, (test_callback_fn)increment_by_key_test },
+ {"increment_with_initial_by_key", 1, (test_callback_fn)increment_with_initial_by_key_test },
+ {"decrement_by_key", 0, (test_callback_fn)decrement_by_key_test },
+ {"decrement_with_initial_by_key", 1, (test_callback_fn)decrement_with_initial_by_key_test },
+ {"quit", 0, (test_callback_fn)quit_test },
+ {"mget", 1, (test_callback_fn)mget_test },
+ {"mget_result", 1, (test_callback_fn)mget_result_test },
+ {"mget_result_alloc", 1, (test_callback_fn)mget_result_alloc_test },
+ {"mget_result_function", 1, (test_callback_fn)mget_result_function },
+ {"mget_execute", 1, (test_callback_fn)mget_execute },
+ {"mget_end", 0, (test_callback_fn)mget_end },
+ {"get_stats", 0, (test_callback_fn)get_stats },
+ {"add_host_test", 0, (test_callback_fn)add_host_test },
+ {"add_host_test_1", 0, (test_callback_fn)add_host_test1 },
+ {"get_stats_keys", 0, (test_callback_fn)get_stats_keys },
+ {"version_string_test", 0, (test_callback_fn)version_string_test},
+ {"bad_key", 1, (test_callback_fn)bad_key_test },
+ {"memcached_server_cursor", 1, (test_callback_fn)memcached_server_cursor_test },
+ {"read_through", 1, (test_callback_fn)read_through },
+ {"delete_through", 1, (test_callback_fn)delete_through },
+ {"noreply", 1, (test_callback_fn)noreply_test},
+ {"analyzer", 1, (test_callback_fn)analyzer_test},
+#ifdef HAVE_LIBMEMCACHEDUTIL
+ {"connectionpool", 1, (test_callback_fn)connection_pool_test },
+#endif
+ {"test_get_last_disconnect", 1, (test_callback_fn)test_get_last_disconnect},
+ {0, 0, 0}
+};
+
+test_st behavior_tests[] ={
+ {"behavior_test", 0, (test_callback_fn)behavior_test},
+ {0, 0, 0}
+};
+
+test_st async_tests[] ={
+ {"add", 1, (test_callback_fn)add_wrapper },
+ {0, 0, 0}
+};
+
+test_st string_tests[] ={
+ {"string static with null", 0, (test_callback_fn)string_static_null },
+ {"string alloc with null", 0, (test_callback_fn)string_alloc_null },
+ {"string alloc with 1K", 0, (test_callback_fn)string_alloc_with_size },
+ {"string alloc with malloc failure", 0, (test_callback_fn)string_alloc_with_size_toobig },
+ {"string append", 0, (test_callback_fn)string_alloc_append },
+ {"string append failure (too big)", 0, (test_callback_fn)string_alloc_append_toobig },
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st result_tests[] ={
+ {"result static", 0, (test_callback_fn)result_static},
+ {"result alloc", 0, (test_callback_fn)result_alloc},
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st version_1_2_3[] ={
+ {"append", 0, (test_callback_fn)append_test },
+ {"prepend", 0, (test_callback_fn)prepend_test },
+ {"cas", 0, (test_callback_fn)cas_test },
+ {"cas2", 0, (test_callback_fn)cas2_test },
+ {"append_binary", 0, (test_callback_fn)append_binary_test },
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st user_tests[] ={
+ {"user_supplied_bug1", 0, (test_callback_fn)user_supplied_bug1 },
+ {"user_supplied_bug2", 0, (test_callback_fn)user_supplied_bug2 },
+ {"user_supplied_bug3", 0, (test_callback_fn)user_supplied_bug3 },
+ {"user_supplied_bug4", 0, (test_callback_fn)user_supplied_bug4 },
+ {"user_supplied_bug5", 1, (test_callback_fn)user_supplied_bug5 },
+ {"user_supplied_bug6", 1, (test_callback_fn)user_supplied_bug6 },
+ {"user_supplied_bug7", 1, (test_callback_fn)user_supplied_bug7 },
+ {"user_supplied_bug8", 1, (test_callback_fn)user_supplied_bug8 },
+ {"user_supplied_bug9", 1, (test_callback_fn)user_supplied_bug9 },
+ {"user_supplied_bug10", 1, (test_callback_fn)user_supplied_bug10 },
+ {"user_supplied_bug11", 1, (test_callback_fn)user_supplied_bug11 },
+ {"user_supplied_bug12", 1, (test_callback_fn)user_supplied_bug12 },
+ {"user_supplied_bug13", 1, (test_callback_fn)user_supplied_bug13 },
+ {"user_supplied_bug14", 1, (test_callback_fn)user_supplied_bug14 },
+ {"user_supplied_bug15", 1, (test_callback_fn)user_supplied_bug15 },
+ {"user_supplied_bug16", 1, (test_callback_fn)user_supplied_bug16 },
+#ifndef __sun
+ /*
+ ** It seems to be something weird with the character sets..
+ ** value_fetch is unable to parse the value line (iscntrl "fails"), so I
+ ** guess I need to find out how this is supposed to work.. Perhaps I need
+ ** to run the test in a specific locale (I tried zh_CN.UTF-8 without success,
+ ** so just disable the code for now...).
+ */
+ {"user_supplied_bug17", 1, (test_callback_fn)user_supplied_bug17 },
+#endif
+ {"user_supplied_bug18", 1, (test_callback_fn)user_supplied_bug18 },
+ {"user_supplied_bug19", 1, (test_callback_fn)user_supplied_bug19 },
+ {"user_supplied_bug20", 1, (test_callback_fn)user_supplied_bug20 },
+ {"user_supplied_bug21", 1, (test_callback_fn)user_supplied_bug21 },
+ {"wrong_failure_counter_test", 1, (test_callback_fn)wrong_failure_counter_test},
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st replication_tests[]= {
+ {"set", 1, (test_callback_fn)replication_set_test },
+ {"get", 0, (test_callback_fn)replication_get_test },
+ {"mget", 0, (test_callback_fn)replication_mget_test },
+ {"delete", 0, (test_callback_fn)replication_delete_test },
+ {"rand_mget", 0, (test_callback_fn)replication_randomize_mget_test },
+ {0, 0, (test_callback_fn)0}
+};
+
+/*
+ * The following test suite is used to verify that we don't introduce
+ * regression bugs. If you want more information about the bug / test,
+ * you should look in the bug report at
+ * http://bugs.launchpad.net/libmemcached
+ */
+test_st regression_tests[]= {
+ {"lp:434484", 1, (test_callback_fn)regression_bug_434484 },
+ {"lp:434843", 1, (test_callback_fn)regression_bug_434843 },
+ {"lp:434843 buffered", 1, (test_callback_fn)regression_bug_434843_buffered },
+ {"lp:421108", 1, (test_callback_fn)regression_bug_421108 },
+ {"lp:442914", 1, (test_callback_fn)regression_bug_442914 },
+ {"lp:447342", 1, (test_callback_fn)regression_bug_447342 },
+ {"lp:463297", 1, (test_callback_fn)regression_bug_463297 },
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st ketama_compatibility[]= {
+ {"libmemcached", 1, (test_callback_fn)ketama_compatibility_libmemcached },
+ {"spymemcached", 1, (test_callback_fn)ketama_compatibility_spymemcached },
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st generate_tests[] ={
+ {"generate_pairs", 1, (test_callback_fn)generate_pairs },
+ {"generate_data", 1, (test_callback_fn)generate_data },
+ {"get_read", 0, (test_callback_fn)get_read },
+ {"delete_generate", 0, (test_callback_fn)delete_generate },
+ {"generate_buffer_data", 1, (test_callback_fn)generate_buffer_data },
+ {"delete_buffer", 0, (test_callback_fn)delete_buffer_generate},
+ {"generate_data", 1, (test_callback_fn)generate_data },
+ {"mget_read", 0, (test_callback_fn)mget_read },
+ {"mget_read_result", 0, (test_callback_fn)mget_read_result },
+ {"mget_read_function", 0, (test_callback_fn)mget_read_function },
+ {"cleanup", 1, (test_callback_fn)cleanup_pairs },
+ {"generate_large_pairs", 1, (test_callback_fn)generate_large_pairs },
+ {"generate_data", 1, (test_callback_fn)generate_data },
+ {"generate_buffer_data", 1, (test_callback_fn)generate_buffer_data },
+ {"cleanup", 1, (test_callback_fn)cleanup_pairs },
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st consistent_tests[] ={
+ {"generate_pairs", 1, (test_callback_fn)generate_pairs },
+ {"generate_data", 1, (test_callback_fn)generate_data },
+ {"get_read", 0, (test_callback_fn)get_read_count },
+ {"cleanup", 1, (test_callback_fn)cleanup_pairs },
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st consistent_weighted_tests[] ={
+ {"generate_pairs", 1, (test_callback_fn)generate_pairs },
+ {"generate_data", 1, (test_callback_fn)generate_data_with_stats },
+ {"get_read", 0, (test_callback_fn)get_read_count },
+ {"cleanup", 1, (test_callback_fn)cleanup_pairs },
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st hsieh_availability[] ={
+ {"hsieh_avaibility_test", 0, (test_callback_fn)hsieh_avaibility_test},
+ {0, 0, (test_callback_fn)0}
+};
+
+#if 0
+test_st hash_sanity[] ={
+ {"hash sanity", 0, (test_callback_fn)hash_sanity_test},
+ {0, 0, (test_callback_fn)0}
+};
+#endif
+
+test_st ketama_auto_eject_hosts[] ={
+ {"auto_eject_hosts", 1, (test_callback_fn)auto_eject_hosts },
+ {"output_ketama_weighted_keys", 1, (test_callback_fn)output_ketama_weighted_keys },
+ {0, 0, (test_callback_fn)0}
+};
+
+test_st hash_tests[] ={
+ {"md5", 0, (test_callback_fn)md5_run },
+ {"crc", 0, (test_callback_fn)crc_run },
+ {"fnv1_64", 0, (test_callback_fn)fnv1_64_run },
+ {"fnv1a_64", 0, (test_callback_fn)fnv1a_64_run },
+ {"fnv1_32", 0, (test_callback_fn)fnv1_32_run },
+ {"fnv1a_32", 0, (test_callback_fn)fnv1a_32_run },
+ {"hsieh", 0, (test_callback_fn)hsieh_run },
+ {"murmur", 0, (test_callback_fn)murmur_run },
+ {"jenkis", 0, (test_callback_fn)jenkins_run },
+ {0, 0, (test_callback_fn)0}
+};
+
+collection_st collection[] ={
+#if 0
+ {"hash_sanity", 0, 0, hash_sanity},
+#endif
+ {"hsieh_availability", 0, 0, hsieh_availability},
+ {"udp_setup", (test_callback_fn)init_udp, 0, udp_setup_server_tests},
+ {"udp_io", (test_callback_fn)init_udp, 0, upd_io_tests},
+ {"udp_binary_io", (test_callback_fn)binary_init_udp, 0, upd_io_tests},
+ {"block", 0, 0, tests},
+ {"binary", (test_callback_fn)pre_binary, 0, tests},
+ {"nonblock", (test_callback_fn)pre_nonblock, 0, tests},
+ {"nodelay", (test_callback_fn)pre_nodelay, 0, tests},
+ {"settimer", (test_callback_fn)pre_settimer, 0, tests},
+ {"md5", (test_callback_fn)pre_md5, 0, tests},
+ {"crc", (test_callback_fn)pre_crc, 0, tests},
+ {"hsieh", (test_callback_fn)pre_hsieh, 0, tests},
+ {"jenkins", (test_callback_fn)pre_jenkins, 0, tests},
+ {"fnv1_64", (test_callback_fn)pre_hash_fnv1_64, 0, tests},
+ {"fnv1a_64", (test_callback_fn)pre_hash_fnv1a_64, 0, tests},
+ {"fnv1_32", (test_callback_fn)pre_hash_fnv1_32, 0, tests},
+ {"fnv1a_32", (test_callback_fn)pre_hash_fnv1a_32, 0, tests},
+ {"ketama", (test_callback_fn)pre_behavior_ketama, 0, tests},
+ {"ketama_auto_eject_hosts", (test_callback_fn)pre_behavior_ketama, 0, ketama_auto_eject_hosts},
+ {"unix_socket", (test_callback_fn)pre_unix_socket, 0, tests},
+ {"unix_socket_nodelay", (test_callback_fn)pre_nodelay, 0, tests},
+ {"poll_timeout", (test_callback_fn)poll_timeout, 0, tests},
+ {"gets", (test_callback_fn)enable_cas, 0, tests},
+ {"consistent_crc", (test_callback_fn)enable_consistent_crc, 0, tests},
+ {"consistent_hsieh", (test_callback_fn)enable_consistent_hsieh, 0, tests},
+#ifdef MEMCACHED_ENABLE_DEPRECATED
+ {"deprecated_memory_allocators", (test_callback_fn)deprecated_set_memory_alloc, 0, tests},
+#endif
+ {"memory_allocators", (test_callback_fn)set_memory_alloc, 0, tests},
+ {"prefix", (test_callback_fn)set_prefix, 0, tests},
+ {"version_1_2_3", (test_callback_fn)check_for_1_2_3, 0, version_1_2_3},
+ {"string", 0, 0, string_tests},
+ {"result", 0, 0, result_tests},
+ {"async", (test_callback_fn)pre_nonblock, 0, async_tests},
+ {"async_binary", (test_callback_fn)pre_nonblock_binary, 0, async_tests},
+ {"user", 0, 0, user_tests},
+ {"generate", 0, 0, generate_tests},
+ {"generate_hsieh", (test_callback_fn)pre_hsieh, 0, generate_tests},
+ {"generate_ketama", (test_callback_fn)pre_behavior_ketama, 0, generate_tests},
+ {"generate_hsieh_consistent", (test_callback_fn)enable_consistent_hsieh, 0, generate_tests},
+ {"generate_md5", (test_callback_fn)pre_md5, 0, generate_tests},
+ {"generate_murmur", (test_callback_fn)pre_murmur, 0, generate_tests},
+ {"generate_jenkins", (test_callback_fn)pre_jenkins, 0, generate_tests},
+ {"generate_nonblock", (test_callback_fn)pre_nonblock, 0, generate_tests},
+ {"consistent_not", 0, 0, consistent_tests},
+ {"consistent_ketama", (test_callback_fn)pre_behavior_ketama, 0, consistent_tests},
+ {"consistent_ketama_weighted", (test_callback_fn)pre_behavior_ketama_weighted, 0, consistent_weighted_tests},
+ {"ketama_compat", 0, 0, ketama_compatibility},
+ {"test_hashes", 0, 0, hash_tests},
+ {"replication", (test_callback_fn)pre_replication, 0, replication_tests},
+ {"replication_noblock", (test_callback_fn)pre_replication_noblock, 0, replication_tests},
+ {"regression", 0, 0, regression_tests},
+ {"behaviors", 0, 0, behavior_tests},
+ {0, 0, 0, 0}
+};
+
+#define SERVERS_TO_CREATE 5
+
+#include "libmemcached_world.h"
+
+void get_world(world_st *world)
+{
+ world->collections= collection;
+
+ world->create= (test_callback_create_fn)world_create;
+ world->destroy= (test_callback_fn)world_destroy;
+
+ world->test.startup= (test_callback_fn)world_test_startup;
+ world->test.flush= (test_callback_fn)world_flush;
+ world->test.pre_run= (test_callback_fn)world_pre_run;
+ world->test.post_run= (test_callback_fn)world_post_run;
+ world->test.on_error= (test_callback_error_fn)world_on_error;
+
+ world->collection.startup= (test_callback_fn)world_container_startup;
+ world->collection.shutdown= (test_callback_fn)world_container_shutdown;
+
+ world->runner= &defualt_libmemcached_runner;
+}
void get_world(world_st *world)
{
world->collections= collection;
- world->collection_startup= reinterpret_cast<test_callback_fn>(world_collection_startup);
- world->flush= reinterpret_cast<test_callback_fn>(world_flush);
- world->pre_run= reinterpret_cast<test_callback_fn>(world_pre_run);
+
world->create= reinterpret_cast<test_callback_create_fn>(world_create);
- world->post_run= reinterpret_cast<test_callback_fn>(world_post_run);
- world->on_error= reinterpret_cast<test_callback_error_fn>(world_on_error);
world->destroy= reinterpret_cast<test_callback_fn>(world_destroy);
+
+ world->test.startup= reinterpret_cast<test_callback_fn>(world_test_startup);
+ world->test.flush= reinterpret_cast<test_callback_fn>(world_flush);
+ world->test.pre_run= reinterpret_cast<test_callback_fn>(world_pre_run);
+ world->test.post_run= reinterpret_cast<test_callback_fn>(world_post_run);
+ world->test.on_error= reinterpret_cast<test_callback_error_fn>(world_on_error);
+
world->runner= &defualt_libmemcached_runner;
}
#include <unistd.h>
#include <time.h>
#include <fnmatch.h>
+#include <stdint.h>
#include "test.h"
static void world_stats_print(world_stats_st *stats)
{
+ fputc('\n', stderr);
+ fprintf(stderr, "Total Collections\t\t\t\t%u\n", stats->collection_total);
+ fprintf(stderr, "\tFailed Collections\t\t\t%u\n", stats->collection_failed);
+ fprintf(stderr, "\tSkipped Collections\t\t\t%u\n", stats->collection_skipped);
+ fprintf(stderr, "\tSucceeded Collections\t\t%u\n", stats->collection_success);
+ fputc('\n', stderr);
fprintf(stderr, "Total\t\t\t\t%u\n", stats->total);
fprintf(stderr, "\tFailed\t\t\t%u\n", stats->failed);
fprintf(stderr, "\tSkipped\t\t\t%u\n", stats->skipped);
_runner_default
};
+static test_return_t _default_callback(void *p)
+{
+ (void)p;
+
+ return TEST_SUCCESS;
+}
+
+static inline void set_default_fn(test_callback_fn *fn)
+{
+ if (*fn == NULL)
+ {
+ *fn= _default_callback;
+ }
+}
+
+static collection_st *init_world(world_st *world)
+{
+ if (! world->runner)
+ {
+ world->runner= &defualt_runners;
+ }
+
+ set_default_fn(&world->collection.startup);
+ set_default_fn(&world->collection.shutdown);
+
+ return world->collections;
+}
+
int main(int argc, char *argv[])
{
memset(&world, 0, sizeof(world));
get_world(&world);
- if (! world.runner)
- {
- world.runner= &defualt_runners;
- }
-
- collection= world.collections;
+ collection= init_world(&world);
if (world.create)
{
for (next= collection; next->name; next++)
{
+ test_return_t collection_rc= TEST_SUCCESS;
test_st *run;
+ bool failed= false;
+ bool skipped= false;
run= next->tests;
if (collection_to_run && fnmatch(collection_to_run, next->name, 0))
continue;
- fprintf(stderr, "\n%s\n\n", next->name);
+ stats.collection_total++;
+
+ collection_rc= world.collection.startup(world_ptr);
+
+ switch (collection_rc)
+ {
+ case TEST_SUCCESS:
+ fprintf(stderr, "\n%s\n\n", next->name);
+ break;
+ case TEST_FAILURE:
+ fprintf(stderr, "\n%s [ failed ]\n\n", next->name);
+ stats.failed++;
+ continue;
+ case TEST_SKIPPED:
+ fprintf(stderr, "\n%s [ skipping ]\n\n", next->name);
+ stats.skipped++;
+ continue;
+ case TEST_MEMORY_ALLOCATION_FAILURE:
+ case TEST_MAXIMUM_RETURN:
+ default:
+ assert(0);
+ break;
+ }
for (x= 0; run->name; run++)
{
fprintf(stderr, "Testing %s", run->name);
- if (world.collection_startup)
+ if (world.test.startup)
{
- world.collection_startup(world_ptr);
+ world.test.startup(world_ptr);
}
- if (run->requires_flush && world.flush)
+ if (run->requires_flush && world.test.flush)
{
- world.flush(world_ptr);
+ world.test.flush(world_ptr);
}
- if (world.pre_run)
+ if (world.test.pre_run)
{
- world.pre_run(world_ptr);
+ world.test.pre_run(world_ptr);
}
- if (next->pre && world.runner->pre)
+ // Runner code
{
- return_code= world.runner->pre(next->pre, world_ptr);
-
- if (return_code != TEST_SUCCESS)
+ if (next->pre && world.runner->pre)
{
- goto error;
+ return_code= world.runner->pre(next->pre, world_ptr);
+
+ if (return_code != TEST_SUCCESS)
+ {
+ goto error;
+ }
}
- }
- gettimeofday(&start_time, NULL);
- return_code= world.runner->run(run->test_fn, world_ptr);
- gettimeofday(&end_time, NULL);
- load_time= timedif(end_time, start_time);
+ gettimeofday(&start_time, NULL);
+ return_code= world.runner->run(run->test_fn, world_ptr);
+ gettimeofday(&end_time, NULL);
+ load_time= timedif(end_time, start_time);
- if (next->post && world.runner->post)
- {
- (void) world.runner->post(next->post, world_ptr);
+ if (next->post && world.runner->post)
+ {
+ (void) world.runner->post(next->post, world_ptr);
+ }
}
- if (world.post_run)
+ if (world.test.post_run)
{
- world.post_run(world_ptr);
+ world.test.post_run(world_ptr);
}
error:
break;
case TEST_FAILURE:
stats.failed++;
+ failed= true;
break;
case TEST_SKIPPED:
stats.skipped++;
+ skipped= true;
break;
case TEST_MEMORY_ALLOCATION_FAILURE:
+ fprintf(stderr, "Exhausted memory, quitting\n");
+ abort();
case TEST_MAXIMUM_RETURN:
default:
+ assert(0); // Coding error.
break;
}
fprintf(stderr, "[ %s ]\n", test_strerror(return_code));
- if (world.on_error)
+ if (world.test.on_error)
{
test_return_t rc;
- rc= world.on_error(return_code, world_ptr);
+ rc= world.test.on_error(return_code, world_ptr);
if (rc != TEST_SUCCESS)
break;
}
}
+
+ if (failed)
+ {
+ stats.collection_failed++;
+ }
+
+ if (skipped)
+ {
+ stats.collection_skipped++;
+ }
+
+ if (! failed && ! skipped)
+ {
+ stats.collection_success++;
+ }
+
+ world.collection.shutdown(world_ptr);
}
- fprintf(stderr, "All tests completed successfully\n\n");
+ if (stats.collection_failed || stats.collection_skipped)
+ {
+ fprintf(stderr, "Some test failures and/or skipped test occurred.\n\n");
+ }
+ else
+ {
+ fprintf(stderr, "All tests completed successfully\n\n");
+ }
if (world.destroy)
{
test_callback_create_fn create;
test_callback_fn destroy;
- /* This is called a the beginning of any collection run. */
- test_callback_fn collection_startup;
+ struct {
+ /* This is called a the beginning of any test run. */
+ test_callback_fn startup;
- /* This called on a test if the test requires a flush call (the bool is from test_st) */
- test_callback_fn flush;
+ /* This called on a test if the test requires a flush call (the bool is from test_st) */
+ test_callback_fn flush;
- /**
- These are run before/after the test. If implemented. Their execution is not controlled
- by the test.
- */
- test_callback_fn pre_run;
- test_callback_fn post_run;
+ /**
+ These are run before/after the test. If implemented. Their execution is not controlled
+ by the test.
+ */
+ test_callback_fn pre_run;
+ test_callback_fn post_run;
+
+ /**
+ If an error occurs during the test, this is called.
+ */
+ test_callback_error_fn on_error;
+ } test;
+
+ struct {
+ /* This is called a the beginning of any collection run. */
+ test_callback_fn startup;
+
+ /* This is called at the end of any collection run. */
+ test_callback_fn shutdown;
+ } collection;
- /**
- If an error occurs during the test, this is called.
- */
- test_callback_error_fn on_error;
/**
Runner represents the callers for the tests. If not implemented we will use
@note world_stats_st is a simple structure for tracking test successes.
*/
typedef struct {
+ uint32_t collection_success;
+ uint32_t collection_skipped;
+ uint32_t collection_failed;
+ uint32_t collection_total;
uint32_t success;
uint32_t skipped;
uint32_t failed;
void get_world(world_st *world)
{
world->collections= collection;
- world->collection_startup= (test_callback_fn)world_collection_startup;
- world->flush= (test_callback_fn)world_flush;
- world->pre_run= (test_callback_fn)world_pre_run;
+
world->create= (test_callback_create_fn)world_create;
- world->post_run= (test_callback_fn)world_post_run;
- world->on_error= (test_callback_error_fn)world_on_error;
world->destroy= (test_callback_fn)world_destroy;
+
+ world->test.startup= (test_callback_fn)world_test_startup;
+ world->test.flush= (test_callback_fn)world_flush;
+ world->test.pre_run= (test_callback_fn)world_pre_run;
+ world->test.post_run= (test_callback_fn)world_post_run;
+ world->test.on_error= (test_callback_error_fn)world_on_error;
+
world->runner= &defualt_libmemcached_runner;
}