- // retrieve both via mget
- test_compare(MEMCACHED_SUCCESS, memcached_mget(memc, keys, lengths, test_array_length(keys)));
-
- char key[MEMCACHED_MAX_KEY];
- size_t key_length;
-
- // this should get both
- for (size_t x= 0; x < test_array_length(keys); x++)
- {
- string= memcached_fetch(memc, key, &key_length, &string_length,
- &flags, &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- int val = 0;
- if (key_length == 4)
- {
- val= 1;
- }
-
- test_compare(string_length, strlen(values[val]));
- test_true(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_compare(MEMCACHED_END, rc);
- test_null(string);
-
- // now get just one
- rc= memcached_mget(memc, keys, lengths, 1);
- test_compare(MEMCACHED_SUCCESS, rc);
-
- string= memcached_fetch(memc, key, &key_length, &string_length, &flags, &rc);
- test_compare(key_length, lengths[0]);
- test_true(strncmp(keys[0], key, key_length) == 0);
- test_compare(string_length, strlen(values[0]));
- test_true(strncmp(values[0], string, string_length) == 0);
- test_compare(MEMCACHED_SUCCESS, rc);
- free(string);
-
- // this should indicate end
- string= memcached_fetch(memc, key, &key_length, &string_length, &flags, &rc);
- test_compare(MEMCACHED_END, rc);
- test_null(string);
-
- 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_stat_st memc_stat;
- memcached_server_instance_st instance=
- memcached_server_instance_by_position(memc, 0);
-
- if (LIBMEMCACHED_WITH_SASL_SUPPORT and memcached_get_sasl_callbacks(memc))
- {
- return TEST_SKIPPED;
- }
-
- test_compare(MEMCACHED_SUCCESS, memcached_stat_servername(&memc_stat, NULL,
- memcached_server_name(instance),
- memcached_server_port(instance)));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t increment_test(memcached_st *memc)
-{
- uint64_t new_number;
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_set(memc,
- test_literal_param("number"),
- test_literal_param("0"),
- (time_t)0, (uint32_t)0));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_increment(memc, test_literal_param("number"), 1, &new_number));
- test_compare(uint64_t(1), new_number);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_increment(memc, test_literal_param("number"), 1, &new_number));
- test_compare(uint64_t(2), new_number);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t increment_with_initial_test(memcached_st *memc)
-{
- test_skip(true, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL));
-
- uint64_t new_number;
- uint64_t initial= 0;
-
- test_compare(MEMCACHED_SUCCESS, memcached_flush_buffers(memc));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_increment_with_initial(memc, test_literal_param("number"), 1, initial, 0, &new_number));
- test_compare(new_number, initial);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_increment_with_initial(memc, test_literal_param("number"), 1, initial, 0, &new_number));
- test_compare(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 *value= "3";
-
- rc= memcached_set(memc,
- test_literal_param("number"),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_true(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_decrement(memc,
- test_literal_param("number"),
- 1, &new_number));
- test_compare(uint64_t(2), new_number);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_decrement(memc,
- test_literal_param("number"),
- 1, &new_number));
- test_compare(uint64_t(1), new_number);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t decrement_with_initial_test(memcached_st *memc)
-{
- test_skip(true, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL));
-
- uint64_t new_number;
- uint64_t initial= 3;
-
- test_compare(MEMCACHED_SUCCESS, memcached_flush_buffers(memc));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_decrement_with_initial(memc,
- test_literal_param("number"),
- 1, initial, 0, &new_number));
- test_compare(new_number, initial);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_decrement_with_initial(memc,
- test_literal_param("number"),
- 1, initial, 0, &new_number));
- test_compare(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_true(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_increment_by_key(memc, master_key, strlen(master_key), key, strlen(key), 1, &new_number));
- test_compare(uint64_t(1), new_number);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_increment_by_key(memc, master_key, strlen(master_key), key, strlen(key), 1, &new_number));
- test_compare(uint64_t(2), new_number);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t increment_with_initial_by_key_test(memcached_st *memc)
-{
- test_skip(true, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL));
-
- 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_compare(MEMCACHED_SUCCESS, rc);
- test_compare(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_compare(MEMCACHED_SUCCESS, rc);
- test_compare(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 *value= "3";
-
- rc= memcached_set_by_key(memc,
- test_literal_param("foo"),
- test_literal_param("number"),
- value, strlen(value),
- (time_t)0, (uint32_t)0);
- test_true(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_decrement_by_key(memc,
- test_literal_param("foo"),
- test_literal_param("number"),
- 1, &new_number));
- test_compare(uint64_t(2), new_number);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_decrement_by_key(memc,
- test_literal_param("foo"),
- test_literal_param("number"),
- 1, &new_number));
- test_compare(uint64_t(1), new_number);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t decrement_with_initial_by_key_test(memcached_st *memc)
-{
- test_skip(true, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL));
-
- uint64_t new_number;
- uint64_t initial= 3;
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_decrement_with_initial_by_key(memc,
- test_literal_param("foo"),
- test_literal_param("number"),
- 1, initial, 0, &new_number));
- test_compare(new_number, initial);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_decrement_with_initial_by_key(memc,
- test_literal_param("foo"),
- test_literal_param("number"),
- 1, initial, 0, &new_number));
- test_compare(new_number, (initial - 1));
-
- return TEST_SUCCESS;
-}
-static test_return_t binary_increment_with_prefix_test(memcached_st *orig_memc)
-{
- memcached_st *memc= memcached_clone(NULL, orig_memc);
-
- test_skip(TEST_SUCCESS, pre_binary(memc));
-
- test_compare(MEMCACHED_SUCCESS, memcached_callback_set(memc, MEMCACHED_CALLBACK_PREFIX_KEY, (void *)"namespace:"));
-
- memcached_return_t rc;
- rc= memcached_set(memc,
- test_literal_param("number"),
- test_literal_param("0"),
- (time_t)0, (uint32_t)0);
- test_true(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- uint64_t new_number;
- test_compare(MEMCACHED_SUCCESS, memcached_increment(memc,
- test_literal_param("number"),
- 1, &new_number));
- test_compare(uint64_t(1), new_number);
-
- test_compare(MEMCACHED_SUCCESS, memcached_increment(memc,
- test_literal_param("number"),
- 1, &new_number));
- test_compare(uint64_t(2), new_number);
- memcached_free(memc);
-
- 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_true_got(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED, memcached_strerror(NULL, rc));
- memcached_quit(memc);
-
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)50, (uint32_t)9);
- test_true(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_result_test(memcached_st *memc)
-{
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
-
- memcached_result_st results_obj;
- memcached_result_st *results;
-
- results= memcached_result_create(memc, &results_obj);
- test_true(results);
- test_true(&results_obj == results);
-
- /* We need to empty the server before continueing test */
- test_compare(MEMCACHED_SUCCESS,
- memcached_flush(memc, 0));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 3));
-
- memcached_return_t rc;
- while ((results= memcached_fetch_result(memc, &results_obj, &rc)))
- {
- test_true(results);
- }
-
- while ((results= memcached_fetch_result(memc, &results_obj, &rc))) { test_true(false); /* We should never see a value returned */ };
- test_false(results);
- test_compare_got(MEMCACHED_NOTFOUND, rc, memcached_strerror(NULL, rc));
-
- for (uint32_t 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_true_got(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED, memcached_strerror(NULL, rc));
- }
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 3));
-
- while ((results= memcached_fetch_result(memc, &results_obj, &rc)))
- {
- test_true(results);
- test_true(&results_obj == results);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_memcmp(memcached_result_key_value(results),
- memcached_result_value(results),
- memcached_result_length(results));
- test_compare(memcached_result_key_length(results), memcached_result_length(results));
- }
-
- memcached_result_free(&results_obj);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_result_alloc_test(memcached_st *memc)
-{
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
-
- memcached_result_st *results;
-
- /* We need to empty the server before continueing test */
- test_compare(MEMCACHED_SUCCESS,
- memcached_flush(memc, 0));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 3));
-
- memcached_return_t rc;
- while ((results= memcached_fetch_result(memc, NULL, &rc)))
- {
- test_true(results);
- }
- test_false(results);
- test_compare_got(MEMCACHED_NOTFOUND, rc, memcached_strerror(NULL, rc));
-
- for (uint32_t 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_true_got(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED, memcached_strerror(NULL, rc));
- }
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 3));
-
- uint32_t x= 0;
- while ((results= memcached_fetch_result(memc, NULL, &rc)))
- {
- test_true(results);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_compare(memcached_result_key_length(results), memcached_result_length(results));
- test_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(const memcached_st*, memcached_result_st*, void *context)
-{
- size_t *counter= (size_t *)context;
-
- *counter= *counter + 1;
-
- return MEMCACHED_SUCCESS;
-}
-
-static test_return_t mget_result_function(memcached_st *memc)
-{
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
- size_t counter;
- memcached_execute_fn callbacks[1];
-
- /* We need to empty the server before continueing test */
- test_compare(MEMCACHED_SUCCESS,
- memcached_flush(memc, 0));
- for (uint32_t x= 0; x < 3; x++)
- {
- memcached_return_t rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_true(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 3));
-
- callbacks[0]= &callback_counter;
- counter= 0;
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_fetch_execute(memc, callbacks, (void *)&counter, 1));
-
- test_compare(size_t(3), counter);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_test(memcached_st *memc)
-{
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
-
- 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 */
- test_compare(MEMCACHED_SUCCESS,
- memcached_flush(memc, 0));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 3));
-
- uint32_t flags;
- memcached_return_t rc;
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)))
- {
- test_true(return_value);
- }
- test_false(return_value);
- test_zero(return_value_length);
- test_compare(MEMCACHED_NOTFOUND, rc);
-
- for (uint32_t 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_true_got(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED, memcached_strerror(NULL, rc));
- }
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 3));
-
- uint32_t x= 0;
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)))
- {
- test_true(return_value);
- test_compare(MEMCACHED_SUCCESS, rc);
- if (not memc->_namespace)
- {
- test_compare(return_key_length, return_value_length);
- test_memcmp(return_value, return_key, return_value_length);
- }
- free(return_value);
- x++;
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_execute(memcached_st *original_memc)
-{
- test_skip(true, memcached_behavior_get(original_memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL));
-
- memcached_st *memc= create_single_instance_memcached(original_memc, "--BINARY-PROTOCOL");
- test_true(memc);
-
- size_t max_keys= 20480;
-
-
- char **keys= static_cast<char **>(calloc(max_keys, sizeof(char*)));
- size_t *key_length=static_cast<size_t *>(calloc(max_keys, sizeof(size_t)));
-
- /* First add all of the items.. */
- char blob[1024] = {0};
-
- for (size_t x= 0; x < max_keys; ++x)
- {
- char k[251];
-
- key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%lu", (unsigned long)x);
- keys[x]= strdup(k);
- test_true(keys[x] != NULL);
- uint64_t query_id= memcached_query_id(memc);
- memcached_return_t rc= memcached_add(memc, keys[x], key_length[x], blob, sizeof(blob), 0, 0);
- test_true_got(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED, memcached_strerror(NULL, rc));
- test_compare(query_id +1, memcached_query_id(memc));
- }
-
- /* Try to get all of them with a large multiget */
- size_t counter= 0;
- memcached_execute_fn callbacks[]= { &callback_counter };
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget_execute(memc, (const char**)keys, key_length,
- max_keys, callbacks, &counter, 1));
-
- {
- uint64_t query_id= memcached_query_id(memc);
- test_compare(MEMCACHED_SUCCESS,
- memcached_fetch_execute(memc, callbacks, (void *)&counter, 1));
- test_compare(query_id, memcached_query_id(memc));
-
- /* Verify that we got all of the items */
- test_true(counter == max_keys);
- }
-
- /* Release all allocated resources */
- for (size_t x= 0; x < max_keys; ++x)
- {
- free(keys[x]);
- }
- free(keys);
- free(key_length);
-
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-#define REGRESSION_BINARY_VS_BLOCK_COUNT 20480
-
-static test_return_t key_setup(memcached_st *memc)
-{
- test_skip(TEST_SUCCESS, pre_binary(memc));
-
- global_pairs= pairs_generate(REGRESSION_BINARY_VS_BLOCK_COUNT, 0);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t key_teardown(memcached_st *memc)
-{
- (void)memc;
- pairs_free(global_pairs);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t block_add_regression(memcached_st *memc)
-{
- /* First add all of the items.. */
- for (size_t x= 0; x < REGRESSION_BINARY_VS_BLOCK_COUNT; ++x)
- {
- char blob[1024] = {0};
-
- memcached_return_t rc= memcached_add_by_key(memc, "bob", 3, global_pairs[x].key, global_pairs[x].key_length, blob, sizeof(blob), 0, 0);
- test_true_got(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_SERVER_MEMORY_ALLOCATION_FAILURE, memcached_strerror(NULL, rc));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t binary_add_regression(memcached_st *memc)
-{
- test_skip(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, true));
- test_return_t rc= block_add_regression(memc);
-
- return rc;
-}
-
-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_compare(MEMCACHED_SUCCESS, rc);
- for (ptr= stat_list; *ptr; ptr++)
- test_true(*ptr);
-
- free(stat_list);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t version_string_test(memcached_st *)
-{
- test_strcmp(LIBMEMCACHED_VERSION_STRING, memcached_lib_version());
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_stats(memcached_st *memc)
-{
- memcached_return_t rc;
-
- memcached_stat_st *memc_stat= memcached_stat(memc, NULL, &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(memc_stat);
-
- for (uint32_t x= 0; x < memcached_server_count(memc); x++)
- {
- char **stat_list= memcached_stat_get_keys(memc, memc_stat+x, &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- for (char **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)
-{
- char servername[]= "0.example.com";
-
- memcached_return_t rc;
- memcached_server_st *servers= memcached_server_list_append_with_weight(NULL, servername, 400, 0, &rc);
- test_compare(1U, memcached_server_list_count(servers));
-
- for (unsigned int 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_compare(MEMCACHED_SUCCESS, rc);
- test_compare(x, memcached_server_list_count(servers));
- }
-
- test_compare(MEMCACHED_SUCCESS, memcached_server_push(memc, servers));
- test_compare(MEMCACHED_SUCCESS, memcached_server_push(memc, servers));
-
- memcached_server_list_free(servers);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t memcached_fetch_result_NOT_FOUND(memcached_st *memc)
-{
- memcached_return_t rc;
-
- const char *key= "not_found";
- size_t key_length= test_literal_param_size("not_found");
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, &key, &key_length, 1));
-
- memcached_result_st *result= memcached_fetch_result(memc, NULL, &rc);
- test_null(result);
- test_compare_got(MEMCACHED_NOTFOUND, rc, memcached_strerror(NULL, rc));
-
- memcached_result_free(result);
-
- return TEST_SUCCESS;
-}
-
-static memcached_return_t clone_test_callback(memcached_st *, memcached_st *)
-{
- return MEMCACHED_SUCCESS;
-}
-
-static memcached_return_t cleanup_test_callback(memcached_st *)
-{
- 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;
-
- test_compare(MEMCACHED_SUCCESS, memcached_callback_set(memc, MEMCACHED_CALLBACK_USER_DATA, &x));
- test_ptr= (int *)memcached_callback_get(memc, MEMCACHED_CALLBACK_USER_DATA, &rc);
- test_true(*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;
-
- test_compare(MEMCACHED_SUCCESS, memcached_callback_set(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION, clone_cb_ptr));
- memcached_return_t rc;
- temp_function= memcached_callback_get(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION, &rc);
- test_true(temp_function == clone_cb_ptr);
- test_compare(MEMCACHED_SUCCESS, rc);
- }
-
- /* 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;
-
- test_compare(MEMCACHED_SUCCESS, memcached_callback_set(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION, cleanup_cb_ptr));
- temp_function= memcached_callback_get(memc, MEMCACHED_CALLBACK_CLONE_FUNCTION, &rc);
- test_true(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)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 1);
- test_compare(true, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NO_BLOCK));
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, 1);
- test_compare(true, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY));
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, MEMCACHED_HASH_MD5);
- test_compare(uint64_t(MEMCACHED_HASH_MD5), memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH));
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 0);
- test_zero(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NO_BLOCK));
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, 0);
- test_zero(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY));
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, MEMCACHED_HASH_DEFAULT);
- test_compare(uint64_t(MEMCACHED_HASH_DEFAULT), memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH));
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, MEMCACHED_HASH_CRC);
- test_compare(uint64_t(MEMCACHED_HASH_CRC), memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_HASH));
-
- test_true(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE));
-
- test_true(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE));
-
- uint64_t value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, value +1);
- test_compare((value +1), memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t MEMCACHED_BEHAVIOR_CORK_test(memcached_st *memc)
-{
- test_compare(MEMCACHED_DEPRECATED,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_CORK, true));
-
- // Platform dependent
-#if 0
- bool value= (bool)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_CORK);
- test_false(value);
-#endif
-
- return TEST_SUCCESS;
-}
-
-
-static test_return_t MEMCACHED_BEHAVIOR_TCP_KEEPALIVE_test(memcached_st *memc)
-{
- memcached_return_t rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_KEEPALIVE, true);
- test_true(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_NOT_SUPPORTED);
-
- bool value= (bool)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_TCP_KEEPALIVE);
-
- if (memcached_success(rc))
- {
- test_true(value);
- }
- else
- {
- test_false(value);
- }
-
- return TEST_SUCCESS;
-}
-
-
-static test_return_t MEMCACHED_BEHAVIOR_TCP_KEEPIDLE_test(memcached_st *memc)
-{
- memcached_return_t rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_KEEPIDLE, true);
- test_true(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_NOT_SUPPORTED);
-
- bool value= (bool)memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_TCP_KEEPIDLE);
-
- if (memcached_success(rc))
- {
- test_true(value);
- }
- else
- {
- test_false(value);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fetch_all_results(memcached_st *memc, unsigned int &keys_returned, const memcached_return_t expect)
-{
- memcached_return_t rc;
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *return_value;
- size_t return_value_length;
- uint32_t flags;
-
- keys_returned= 0;
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)))
- {
- test_true(return_value);
- test_compare_got(MEMCACHED_SUCCESS, rc, memcached_strerror(NULL, rc));
- free(return_value);
- keys_returned+= 1;
- }
-
- if (memcached_success(expect) and memcached_success(rc))
- {
- return TEST_SUCCESS;
- }
- else if (expect == rc)
- {
- return TEST_SUCCESS;
- }
- fprintf(stderr, "\n%s:%u %s(#%u)\n", __FILE__, __LINE__, memcached_strerror(NULL, rc), keys_returned);
-
- return TEST_FAILURE;
-}
-
-/* Test case provided by Cal Haldenbrand */
-#define HALDENBRAND_KEY_COUNT 3000U // * 1024576
-#define HALDENBRAND_FLAG_KEY 99 // * 1024576
-static test_return_t user_supplied_bug1(memcached_st *memc)
-{
- /* We just keep looking at the same values over and over */
- srandom(10);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, true));
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, true));
-
-
- /* add key */
- unsigned long long total= 0;
- for (uint32_t x= 0 ; total < 20 * 1024576 ; x++ )
- {
- uint32_t size= (uint32_t)(rand() % ( 5 * 1024 ) ) + 400;
- char randomstuff[6 * 1024];
- memset(randomstuff, 0, 6 * 1024);
- test_true(size < 6 * 1024); /* Being safe here */
-
- for (uint32_t j= 0 ; j < size ;j++)
- {
- randomstuff[j] = (signed char) ((rand() % 26) + 97);
- }
-
- total+= size;
- char key[22];
- int key_length= snprintf(key, sizeof(key), "%u", x);
- test_compare(MEMCACHED_SUCCESS,
- memcached_set(memc, key, key_length, randomstuff, strlen(randomstuff), time_t(0), HALDENBRAND_FLAG_KEY));
- }
- test_true(total > HALDENBRAND_KEY_COUNT);
-
- return TEST_SUCCESS;
-}
-
-/* Test case provided by Cal Haldenbrand */
-static test_return_t user_supplied_bug2(memcached_st *memc)
-{
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, true));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, true));
-
-#ifdef NOT_YET
- test_compare(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE, 20 * 1024576));
- test_compare(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE, 20 * 1024576));
- 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 < 20 * 1024576 ; x++)
-#endif
-
- size_t total_value_length= 0;
- for (uint32_t x= 0, errors= 0; total_value_length < 24576 ; x++)
- {
- uint32_t flags= 0;
- size_t val_len= 0;
-
- char key[MEMCACHED_MAXIMUM_INTEGER_DISPLAY_LENGTH +1];
- int key_length= snprintf(key, sizeof(key), "%u", x);
-
- memcached_return_t rc;
- char *getval= memcached_get(memc, key, key_length, &val_len, &flags, &rc);
- if (memcached_failed(rc))
- {
- if (rc == MEMCACHED_NOTFOUND)
- {
- errors++;
- }
- else
- {
- test_true(rc);
- }
-
- continue;
- }
- test_compare(uint32_t(HALDENBRAND_FLAG_KEY), flags);
-
- total_value_length+= val_len;
- errors= 0;
- free(getval);
- }
-
- return TEST_SUCCESS;
-}
-
-/* Do a large mget() over all the keys we think exist */
-static test_return_t user_supplied_bug3(memcached_st *memc)
-{
- test_compare(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 1));
- test_compare(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, 1));
-
-#ifdef NOT_YET
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE, 20 * 1024576);
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE, 20 * 1024576);
- getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE);
- getter = memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE);
-#endif
-
- std::vector<size_t> key_lengths;
- key_lengths.resize(HALDENBRAND_KEY_COUNT);
- std::vector<char *> keys;
- keys.resize(key_lengths.size());
- for (uint32_t x= 0; x < key_lengths.size(); x++)
- {
- char key[MEMCACHED_MAXIMUM_INTEGER_DISPLAY_LENGTH +1];
- int key_length= snprintf(key, sizeof(key), "%u", x);
- test_true(key_length > 0 and key_length < MEMCACHED_MAXIMUM_INTEGER_DISPLAY_LENGTH +1);
- keys[x]= strdup(key);
- key_lengths[x]= key_length;
- }
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, &keys[0], &key_lengths[0], key_lengths.size()));
-
- unsigned int keys_returned;
- test_compare(TEST_SUCCESS, fetch_all_results(memc, keys_returned, MEMCACHED_SUCCESS));
- test_compare(HALDENBRAND_KEY_COUNT, keys_returned);
-
- for (std::vector<char *>::iterator iter= keys.begin();
- iter != keys.end();
- iter++)
- {
- free(*iter);
- }
-
- return TEST_SUCCESS;
-}
-
-/* Make sure we behave properly if server list has no values */
-static test_return_t user_supplied_bug4(memcached_st *memc)
-{
- const char *keys[]= {"fudge", "son", "food"};
- size_t key_length[]= {5, 3, 4};
-
- /* Here we free everything before running a bunch of mget tests */
- memcached_servers_reset(memc);
-
-
- /* We need to empty the server before continueing test */
- test_compare(MEMCACHED_NO_SERVERS,
- memcached_flush(memc, 0));
-
- test_compare(MEMCACHED_NO_SERVERS,
- memcached_mget(memc, keys, key_length, 3));
-
- unsigned int keys_returned;
- test_compare(TEST_SUCCESS, fetch_all_results(memc, keys_returned, MEMCACHED_NOTFOUND));
- test_zero(keys_returned);
-
- for (uint32_t x= 0; x < 3; x++)
- {
- test_compare(MEMCACHED_NO_SERVERS,
- memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9));
- }
-
- test_compare(MEMCACHED_NO_SERVERS,
- memcached_mget(memc, keys, key_length, 3));
-
- {
- char *return_value;
- char return_key[MEMCACHED_MAX_KEY];
- memcached_return_t rc;
- size_t return_key_length;
- size_t return_value_length;
- uint32_t flags;
- uint32_t x= 0;
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)))
- {
- test_true(return_value);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(return_key_length == return_value_length);
- test_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)
-{
- const char *keys[]= {"036790384900", "036790384902", "036790384904", "036790384906"};
- size_t key_length[]= {strlen("036790384900"), strlen("036790384902"), strlen("036790384904"), strlen("036790384906")};
- char *value;
- size_t value_length;
- uint32_t flags;
- char *insert_data= new (std::nothrow) char[VALUE_SIZE_BUG5];
-
- for (uint32_t x= 0; x < VALUE_SIZE_BUG5; x++)
- {
- insert_data[x]= (signed char)rand();
- }
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_flush(memc, 0));
-
- memcached_return_t rc;
- test_null(memcached_get(memc, keys[0], key_length[0], &value_length, &flags, &rc));
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 4));
-
- unsigned int count;
- test_compare(TEST_SUCCESS, fetch_all_results(memc, count, MEMCACHED_NOTFOUND));
- test_zero(count);
-
- for (uint32_t x= 0; x < 4; x++)
- {
- test_compare(MEMCACHED_SUCCESS,
- memcached_set(memc, keys[x], key_length[x],
- insert_data, VALUE_SIZE_BUG5,
- (time_t)0, (uint32_t)0));
- }
-
- for (uint32_t x= 0; x < 10; x++)
- {
- value= memcached_get(memc, keys[0], key_length[0],
- &value_length, &flags, &rc);
- test_compare(rc, MEMCACHED_SUCCESS);
- test_true(value);
- free(value);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 4));
-
- test_compare(TEST_SUCCESS, fetch_all_results(memc, count, MEMCACHED_SUCCESS));
- test_compare(4U, count);
- }
- delete [] insert_data;
-
- return TEST_SUCCESS;
-}
-
-static test_return_t user_supplied_bug6(memcached_st *memc)
-{
- 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;
- char *insert_data= new (std::nothrow) char[VALUE_SIZE_BUG5];
-
- for (uint32_t x= 0; x < VALUE_SIZE_BUG5; x++)
- {
- insert_data[x]= (signed char)rand();
- }
-
- test_compare(MEMCACHED_SUCCESS, memcached_flush(memc, 0));
-
- test_compare(TEST_SUCCESS, confirm_keys_dont_exist(memc, keys, test_array_length(keys)));
-
- // We will now confirm that memcached_mget() returns success, but we will
- // then check to make sure that no actual keys are returned.
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 4));
-
- memcached_return_t rc;
- uint32_t count= 0;
- while ((value= memcached_fetch(memc, return_key, &return_key_length,
- &value_length, &flags, &rc)))
- {
- count++;
- }
- test_zero(count);
- test_compare_got(MEMCACHED_NOTFOUND, rc, memcached_strerror(NULL, rc));
-
- for (uint32_t x= 0; x < test_array_length(keys); x++)
- {
- test_compare(MEMCACHED_SUCCESS,
- memcached_set(memc, keys[x], key_length[x],
- insert_data, VALUE_SIZE_BUG5,
- (time_t)0, (uint32_t)0));
- }
- test_compare(TEST_SUCCESS, confirm_keys_exist(memc, keys, test_array_length(keys)));
-
- for (uint32_t x= 0; x < 2; x++)
- {
- value= memcached_get(memc, keys[0], key_length[0],
- &value_length, &flags, &rc);
- test_true(value);
- free(value);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, key_length, 4));
- /* 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_compare(MEMCACHED_SUCCESS, rc);
- test_memcmp(value, insert_data, value_length);
- test_true(value_length);
- free(value);
- }
- }
- delete [] insert_data;
-
- return TEST_SUCCESS;
-}
-
-static test_return_t user_supplied_bug8(memcached_st *)
-{
- 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_true(servers);
-
- mine= memcached_create(NULL);
- rc= memcached_server_push(mine, servers);
- test_compare(MEMCACHED_SUCCESS, rc);
- memcached_server_list_free(servers);
-
- test_true(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)
-{
- char *insert_data= new (std::nothrow) char[VALUE_SIZE_BUG5];
- test_true(insert_data);
-
- for (size_t x= 0; x < VALUE_SIZE_BUG5; x++)
- {
- insert_data[x]= (signed char)rand();
- }
-
- memcached_flush(memc, 0);
-
- const char *keys= "036790384900";
- size_t key_length= strlen(keys);
- test_compare_hint(MEMCACHED_SUCCESS, memcached_set(memc, keys, key_length,
- insert_data, VALUE_SIZE_BUG5,
- time_t(0), 245U),
- memcached_last_error_message(memc));
-
- memcached_return_t rc;
- size_t value_length;
- uint32_t flags= 0;
- char *value= memcached_get(memc, keys, key_length,
- &value_length, &flags, &rc);
- test_compare(245U, flags);
- test_true(value);
- free(value);
-
- test_compare(MEMCACHED_SUCCESS, memcached_mget(memc, &keys, &key_length, 1));
-
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- flags= 0;
- value= memcached_fetch(memc, return_key, &return_key_length,
- &value_length, &flags, &rc);
- test_compare(uint32_t(245), flags);
- test_true(value);
- free(value);
- delete [] insert_data;
-
-
- return TEST_SUCCESS;
-}
-
-static test_return_t user_supplied_bug9(memcached_st *memc)
-{
- const char *keys[]= {"UDATA:edevil@sapo.pt", "fudge&*@#", "for^#@&$not"};
- size_t key_length[3];
- 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 (unsigned int x= 0; x < 3; x++)
- {
- memcached_return_t rc= memcached_set(memc, keys[x], key_length[x],
- keys[x], key_length[x],
- (time_t)50, (uint32_t)9);
- test_compare(MEMCACHED_SUCCESS, rc);
- }
-
- memcached_return_t rc= memcached_mget(memc, keys, key_length, 3);
- test_compare(MEMCACHED_SUCCESS, rc);
-
- /* 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_true(return_value);
- free(return_value);
- count++;
- }
- test_compare(3U, count);
-
- return TEST_SUCCESS;
-}
-
-/* We are testing with aggressive timeout to get failures */
-static test_return_t user_supplied_bug10(memcached_st *memc)
-{
- size_t value_length= 512;
- unsigned int set= 1;
- 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);
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT, uint64_t(0));
-
- std::vector<char> value;
- value.reserve(value_length);
- for (uint32_t x= 0; x < value_length; x++)
- {
- value.push_back(char(x % 127));
- }
-
- for (unsigned int x= 1; x <= 100000; ++x)
- {
- memcached_return_t rc= memcached_set(mclone,
- test_literal_param("foo"),
- &value[0], value.size(),
- 0, 0);
-
- test_true_got((rc == MEMCACHED_SUCCESS or rc == MEMCACHED_WRITE_FAILURE or rc == MEMCACHED_BUFFERED or rc == MEMCACHED_TIMEOUT or rc == MEMCACHED_CONNECTION_FAILURE
- or rc == MEMCACHED_SERVER_TEMPORARILY_DISABLED),
- memcached_strerror(NULL, rc));
-
- if (rc == MEMCACHED_WRITE_FAILURE or rc == MEMCACHED_TIMEOUT)
- {
- x--;
- }
- }
-
- memcached_free(mclone);
-
- return TEST_SUCCESS;
-}
-
-/*
- We are looking failures in the async protocol
-*/
-static test_return_t user_supplied_bug11(memcached_st *memc)
-{
- memcached_st *mclone= memcached_clone(NULL, memc);
-
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_NO_BLOCK, true);
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_TCP_NODELAY, true);
- memcached_behavior_set(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT, size_t(-1));
-
- test_compare(-1, int32_t(memcached_behavior_get(mclone, MEMCACHED_BEHAVIOR_POLL_TIMEOUT)));
-
-
- std::vector<char> value;
- value.reserve(512);
- for (unsigned int x= 0; x < 512; x++)
- {
- value.push_back(char(x % 127));
- }
-
- for (unsigned int x= 1; x <= 100000; ++x)
- {
- memcached_return_t rc= memcached_set(mclone, test_literal_param("foo"), &value[0], value.size(), 0, 0);
- (void)rc;
- }
-
- 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_null(value);
- test_compare(MEMCACHED_NOTFOUND, rc);
-
- rc= memcached_increment(memc, "autoincrement", strlen("autoincrement"),
- 1, &number_value);
- test_null(value);
- /* The binary protocol will set the key if it doesn't exist */
- if (memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) == 1)
- {
- test_compare(MEMCACHED_SUCCESS, rc);
- }
- else
- {
- test_compare(MEMCACHED_NOTFOUND, rc);
- }
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_set(memc, "autoincrement", strlen("autoincrement"), "1", 1, 0, 0));
-
- value= memcached_get(memc, "autoincrement", strlen("autoincrement"), &value_length, &flags, &rc);
- test_true(value);
- free(value);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_increment(memc, "autoincrement", strlen("autoincrement"), 1, &number_value));
- test_compare(2UL, number_value);
-
- 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";
- 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++)
- {
- char *overflow= new (std::nothrow) char[testSize];
- test_true(overflow);
-
- memset(overflow, 'x', testSize);
- rc= memcached_set(memc, key, strlen(key),
- overflow, testSize, 0, 0);
- test_compare(MEMCACHED_SUCCESS, rc);
- delete [] 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)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_TCP_NODELAY, true);
-
- std::vector<char> value;
- value.reserve(18000);
- for (size_t x= 0; x < 18000; x++)
- {
- value.push_back((char) (x % 127));
- }
-
- for (size_t current_length= 0; current_length < value.size(); current_length++)
- {
- memcached_return_t rc= memcached_set(memc, test_literal_param("foo"),
- &value[0], current_length,
- (time_t)0, (uint32_t)0);
- test_true(rc == MEMCACHED_SUCCESS or rc == MEMCACHED_BUFFERED);
-
- size_t string_length;
- uint32_t flags;
- char *string= memcached_get(memc, test_literal_param("foo"),
- &string_length, &flags, &rc);
-
- test_compare(MEMCACHED_SUCCESS, rc);
- test_compare(string_length, current_length);
- test_memcmp(string, &value[0], string_length);
-
- free(string);
- }
-
- return TEST_SUCCESS;
-}
-
-/*
- Look for zero length value problems
-*/
-static test_return_t user_supplied_bug15(memcached_st *memc)
-{
- for (uint32_t x= 0; x < 2; x++)
- {
- memcached_return_t rc= memcached_set(memc, test_literal_param("mykey"),
- NULL, 0,
- (time_t)0, (uint32_t)0);
-
- test_compare(MEMCACHED_SUCCESS, rc);
-
- size_t length;
- uint32_t flags;
- char *value= memcached_get(memc, test_literal_param("mykey"),
- &length, &flags, &rc);
-
- test_compare(MEMCACHED_SUCCESS, rc);
- test_false(value);
- test_zero(length);
- test_zero(flags);
-
- value= memcached_get(memc, test_literal_param("mykey"),
- &length, &flags, &rc);
-
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(value == NULL);
- test_zero(length);
- test_zero(flags);
- }
-
- 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)
-{
- test_compare_hint(MEMCACHED_SUCCESS, memcached_set(memc, test_literal_param("mykey"),
- NULL, 0,
- (time_t)0, UINT32_MAX),
- memcached_last_error_message(memc));
-
-
- size_t length;
- uint32_t flags;
- memcached_return_t rc;
- char *value= memcached_get(memc, test_literal_param("mykey"),
- &length, &flags, &rc);
-
- test_compare(MEMCACHED_SUCCESS, rc);
- test_null(value);
- test_zero(length);
- test_compare(flags, UINT32_MAX);
-
- return TEST_SUCCESS;
-}
-
-#if !defined(__sun) && !defined(__OpenBSD__)
-/* Check the validity of chinese key*/
-static test_return_t user_supplied_bug17(memcached_st *memc)
-{
- const char *key= "豆瓣";
- const char *value="我们在炎热抑郁的夏天无法停止豆瓣";
- memcached_return_t rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, 0);
-
- test_compare(MEMCACHED_SUCCESS, rc);
-
- size_t length;
- uint32_t flags;
- char *value2= memcached_get(memc, key, strlen(key),
- &length, &flags, &rc);
-
- test_true(length==strlen(value));
- test_compare(MEMCACHED_SUCCESS, rc);
- test_memcmp(value, value2, length);
- free(value2);
-
- return TEST_SUCCESS;
-}
-#endif
-
-/*
- From Andrei on IRC
-*/
-
-static test_return_t user_supplied_bug19(memcached_st *)
-{
- memcached_return_t res;
-
- memcached_st *memc= memcached(test_literal_param("--server=localhost:11311/?100 --server=localhost:11312/?100"));
-
- const memcached_server_st *server= memcached_server_by_key(memc, "a", 1, &res);
- test_true(server);
-
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-/* CAS test from Andei */
-static test_return_t user_supplied_bug20(memcached_st *memc)
-{
- const char *key= "abc";
- size_t key_len= strlen("abc");
-
- test_skip(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, true));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_set(memc,
- test_literal_param("abc"),
- test_literal_param("foobar"),
- (time_t)0, (uint32_t)0));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, &key, &key_len, 1));
-
- memcached_result_st result_obj;
- memcached_result_st *result= memcached_result_create(memc, &result_obj);
- test_true(result);
-
- memcached_result_create(memc, &result_obj);
- memcached_return_t status;
- result= memcached_fetch_result(memc, &result_obj, &status);
-
- test_true(result);
- test_compare(MEMCACHED_SUCCESS, status);
-
- memcached_result_free(result);
-
- 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)
-{
- assert(0);
-}
-
-
-static test_return_t _user_supplied_bug21(memcached_st* memc, size_t key_count)
-{
-#ifdef WIN32
- (void)memc;
- (void)key_count;
- return TEST_SKIPPED;
-#else
- void (*oldalarm)(int);
-
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- test_true(memc_clone);
-
- /* only binproto uses getq for mget */
- test_compare(MEMCACHED_SUCCESS, memcached_behavior_set(memc_clone, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, true));
-
- /* empty the cache to ensure misses (hence non-responses) */
- test_compare(MEMCACHED_SUCCESS, memcached_flush(memc_clone, 0));
-
- std::vector<size_t> key_lengths;
- key_lengths.resize(key_count);
- std::vector<char *> keys;
- keys.resize(key_lengths.size());
- for (unsigned int x= 0; x < key_lengths.size(); x++)
- {
- char key[MEMCACHED_MAXIMUM_INTEGER_DISPLAY_LENGTH +1];
- int key_length= snprintf(key, sizeof(key), "%u", x);
- test_true(key_length > 0 and key_length < MEMCACHED_MAXIMUM_INTEGER_DISPLAY_LENGTH +1);
- keys[x]= strdup(key);
- key_lengths[x]= key_length;
- }
-
- oldalarm= signal(SIGALRM, fail);
- alarm(5);
-
- test_compare_got(MEMCACHED_SUCCESS,
- memcached_mget(memc_clone, &keys[0], &key_lengths[0], key_count), memcached_last_error_message(memc_clone));
-
- alarm(0);
- signal(SIGALRM, oldalarm);
-
- memcached_return_t rc;
- uint32_t flags;
- char return_key[MEMCACHED_MAX_KEY];
- size_t return_key_length;
- char *return_value;
- size_t return_value_length;
- while ((return_value= memcached_fetch(memc, return_key, &return_key_length,
- &return_value_length, &flags, &rc)))
- {
- test_false(return_value); // There are no keys to fetch, so the value should never be returned
- }
- test_compare(MEMCACHED_NOTFOUND, rc);
- test_zero(return_value_length);
- test_zero(return_key_length);
- test_false(return_key[0]);
- test_false(return_value);
-
- for (std::vector<char *>::iterator iter= keys.begin();
- iter != keys.end();
- iter++)
- {
- free(*iter);
- }
-
- memcached_free(memc_clone);
-
- return TEST_SUCCESS;
-#endif
-}
-
-static test_return_t user_supplied_bug21(memcached_st *memc)
-{
- test_skip(TEST_SUCCESS, pre_binary(memc));
-
- /* should work as of r580 */
- test_compare(TEST_SUCCESS,
- _user_supplied_bug21(memc, 10));
-
- /* should fail as of r580 */
- test_compare(TEST_SUCCESS,
- _user_supplied_bug21(memc, 1000));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t output_ketama_weighted_keys(memcached_st *)
-{
- memcached_st *memc= memcached_create(NULL);
- test_true(memc);
-
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, true));
-
- uint64_t value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
- test_compare(value, uint64_t(1));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5));
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
- test_true(value == MEMCACHED_HASH_MD5);
-
-
- test_true(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];
- snprintf(key, sizeof(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);
- memcached_server_instance_st instance=
- memcached_server_instance_by_position(memc, host_index);
- }
- 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= memcached_result_create(memc, &result);
- test_false(result.options.is_allocated);
- test_true(memcached_is_initialized(&result));
- test_true(result_ptr);
- test_true(result_ptr == &result);
-
- memcached_result_free(&result);
-
- test_false(result.options.is_allocated);
- test_false(memcached_is_initialized(&result));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t result_alloc(memcached_st *memc)
-{
- memcached_result_st *result_ptr= memcached_result_create(memc, NULL);
- test_true(result_ptr);
- test_true(result_ptr->options.is_allocated);
- test_true(memcached_is_initialized(result_ptr));
- memcached_result_free(result_ptr);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t cleanup_pairs(memcached_st *memc)
-{
- (void)memc;
- pairs_free(global_pairs);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t generate_pairs(memcached_st *)
-{
- global_pairs= pairs_generate(GLOBAL_COUNT, 400);
- global_count= GLOBAL_COUNT;
-
- for (size_t 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 *)
-{
- global_pairs= pairs_generate(GLOBAL2_COUNT, MEMCACHED_MAX_BUFFER+10);
- global_count= GLOBAL2_COUNT;
-
- for (size_t 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)
-{
- unsigned int check_execute= execute_set(memc, global_pairs, global_count);
-
- test_compare(global_count, check_execute);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t generate_data_with_stats(memcached_st *memc)
-{
- unsigned int check_execute= execute_set(memc, global_pairs, global_count);
-
- test_compare(check_execute, global_count);
-
- // @todo hosts used size stats
- memcached_return_t rc;
- memcached_stat_st *stat_p= memcached_stat(memc, NULL, &rc);
- test_true(stat_p);
-
- for (uint32_t host_index= 0; host_index < SERVERS_TO_CREATE; host_index++)
- {
- /* This test was changes so that "make test" would work properlly */
- if (DEBUG)
- {
- memcached_server_instance_st instance=
- memcached_server_instance_by_position(memc, host_index);
-
- printf("\nserver %u|%s|%u bytes: %llu\n", host_index, instance->hostname, instance->port, (unsigned long long)(stat_p + host_index)->bytes);
- }
- test_true((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)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, true);
- generate_data(memc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t get_read_count(memcached_st *memc)
-{
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- test_true(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 (size_t x= count= 0; x < global_count; x++)
- {
- memcached_return_t rc;
- 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)
-{
- for (size_t x= 0; x < global_count; x++)
- {
- size_t return_value_length;
- uint32_t flags;
- memcached_return_t rc;
- char *return_value= memcached_get(memc, global_keys[x], global_keys_length[x],
- &return_value_length, &flags, &rc);
- /*
- test_true(return_value);
- test_compare(MEMCACHED_SUCCESS, rc);
- */
- if (rc == MEMCACHED_SUCCESS && return_value)
- {
- free(return_value);
- }
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_read(memcached_st *memc)
-{
-
- test_skip(true, bool(libmemcached_util_version_check(memc, 1, 4, 4)));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, global_keys, global_keys_length, global_count));
-
- // Go fetch the keys and test to see if all of them were returned
- {
- unsigned int keys_returned;
- test_compare(TEST_SUCCESS, fetch_all_results(memc, keys_returned, MEMCACHED_SUCCESS));
- test_true(keys_returned > 0);
- test_compare_warn_hint(global_count, keys_returned, "Possible false, positive, memcached may have ejected key/value based on memory needs");
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_read_result(memcached_st *memc)
-{
-
- test_skip(true, bool(libmemcached_util_version_check(memc, 1, 4, 4)));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, global_keys, global_keys_length, global_count));
-
- /* Turn this into a help function */
- {
- memcached_result_st results_obj;
- memcached_result_st *results= memcached_result_create(memc, &results_obj);
- test_true(results);
-
- memcached_return_t rc;
- while ((results= memcached_fetch_result(memc, &results_obj, &rc)))
- {
- if (rc == MEMCACHED_IN_PROGRESS)
- {
- continue;
- }
-
- test_true(results);
- test_compare(MEMCACHED_SUCCESS, rc);
- }
- test_compare(MEMCACHED_END, rc);
-
- memcached_result_free(&results_obj);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_read_internal_result(memcached_st *memc)
-{
-
- test_skip(true, bool(libmemcached_util_version_check(memc, 1, 4, 4)));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, global_keys, global_keys_length, global_count));
- {
- memcached_result_st *results= NULL;
- memcached_return_t rc;
- while ((results= memcached_fetch_result(memc, results, &rc)))
- {
- test_true(results);
- test_compare(MEMCACHED_SUCCESS, rc);
- }
- test_compare(MEMCACHED_END, rc);
-
- memcached_result_free(results);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_read_partial_result(memcached_st *memc)
-{
-
- test_skip(true, bool(libmemcached_util_version_check(memc, 1, 4, 4)));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, global_keys, global_keys_length, global_count));
-
- // We will scan for just one key
- {
- memcached_result_st results_obj;
- memcached_result_st *results= memcached_result_create(memc, &results_obj);
-
- memcached_return_t rc;
- results= memcached_fetch_result(memc, results, &rc);
- test_true(results);
- test_compare(MEMCACHED_SUCCESS, rc);
-
- memcached_result_free(&results_obj);
- }
-
- // We already have a read happening, lets start up another one.
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, global_keys, global_keys_length, global_count));
- {
- memcached_result_st results_obj;
- memcached_result_st *results= memcached_result_create(memc, &results_obj);
- test_true(results);
- test_false(memcached_is_allocated(results));
-
- memcached_return_t rc;
- while ((results= memcached_fetch_result(memc, &results_obj, &rc)))
- {
- test_true(results);
- test_compare(MEMCACHED_SUCCESS, rc);
- }
- test_compare(MEMCACHED_END, rc);
-
- memcached_result_free(&results_obj);
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t mget_read_function(memcached_st *memc)
-{
- test_skip(true, bool(libmemcached_util_version_check(memc, 1, 4, 4)));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, global_keys, global_keys_length, global_count));
-
- memcached_execute_fn callbacks[]= { &callback_counter };
- size_t counter= 0;
- test_compare(MEMCACHED_SUCCESS,
- memcached_fetch_execute(memc, callbacks, (void *)&counter, 1));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t delete_generate(memcached_st *memc)
-{
- for (size_t 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)
-{
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, true);
-
- for (size_t 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)
-{
- memcached_return_t rc;
- char servername[]= "0.example.com";
-
- memcached_server_st *servers= memcached_server_list_append_with_weight(NULL, servername, 400, 0, &rc);
- test_true(servers);
- test_compare(1U, memcached_server_list_count(servers));
-
- for (uint32_t x= 2; x < 20; x++)
- {
- char buffer[SMALL_STRING_LEN];
-
- snprintf(buffer, SMALL_STRING_LEN, "%lu.example.com", (unsigned long)(400 +x));
- servers= memcached_server_list_append_with_weight(servers, buffer, 401, 0,
- &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_compare(x, memcached_server_list_count(servers));
- }
-
- test_compare(MEMCACHED_SUCCESS, memcached_server_push(memc, servers));
- test_compare(MEMCACHED_SUCCESS, memcached_server_push(memc, servers));
-
- 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_cork(memcached_st *memc)
-{
-#ifdef __APPLE__
- return TEST_SKIPPED;
-#endif
- bool set= true;
- if (memcached_success(memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_CORK, set)))
- return TEST_SUCCESS;
-
- return TEST_SKIPPED;
-}
-
-static test_return_t pre_cork_and_nonblock(memcached_st *memc)
-{
-#ifdef __APPLE__
- return TEST_SKIPPED;
-#endif
- test_return_t test_rc;
- if ((test_rc= pre_cork(memc)) != TEST_SUCCESS)
- return test_rc;
-
- return pre_nonblock(memc);
-}
-
-static test_return_t pre_nonblock_binary(memcached_st *memc)
-{
- memcached_st *memc_clone= memcached_clone(NULL, memc);
- test_true(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);
-
- memcached_return_t rc= MEMCACHED_FAILURE;
- if (libmemcached_util_version_check(memc_clone, 1, 4, 4))
- {
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NO_BLOCK, 0);
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL, 1));
- test_compare(uint64_t(1), memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL));
- }
- else
- {
- memcached_free(memc_clone);
- return TEST_SKIPPED;
- }
-
- memcached_free(memc_clone);
-
- return rc == MEMCACHED_SUCCESS ? TEST_SUCCESS : TEST_SKIPPED;
-}
-
-static test_return_t pre_murmur(memcached_st *memc)
-{
- test_skip(MEMCACHED_SUCCESS, 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_SKIPPED;
-}
-
-
-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)
-{
- test_skip(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_HSIEH));
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_hash_fnv1_64(memcached_st *memc)
-{
- test_skip(MEMCACHED_SUCCESS, 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)
-{
- test_skip(MEMCACHED_SUCCESS, 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= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA, 1);
- test_compare(MEMCACHED_SUCCESS, rc);
-
- uint64_t value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA);
- test_compare(value, uint64_t(1));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_behavior_ketama_weighted(memcached_st *memc)
-{
- memcached_return_t rc= memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED, 1);
- test_compare(MEMCACHED_SUCCESS, rc);
-
- uint64_t value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_WEIGHTED);
- test_compare(value, uint64_t(1));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH, MEMCACHED_HASH_MD5));
-
- value= memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_KETAMA_HASH);
- test_compare(MEMCACHED_HASH_MD5, memcached_hash_t(value));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t pre_replication(memcached_st *memc)
-{
- test_skip(TEST_SUCCESS, pre_binary(memc));
-
- /*
- * Make sure that we store the item on all servers
- * (master + replicas == number of servers)
- */
- test_compare(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, memcached_server_count(memc) - 1));
- test_compare(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS), uint64_t(memcached_server_count(memc) - 1));
-
- return TEST_SUCCESS;
-}
-
-
-static test_return_t pre_replication_noblock(memcached_st *memc)
-{
- test_skip(TEST_SUCCESS, pre_replication(memc));
-
- return pre_nonblock(memc);
-}
-
-
-static void my_free(const memcached_st *ptr, void *mem, void *context)
-{
- (void)context;
- (void)ptr;
-#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(const memcached_st *ptr, const size_t size, void *context)
-{
- (void)context;
- (void)ptr;
-#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(const memcached_st *ptr, void *mem, const size_t size, void *)
-{
-#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
- (void)ptr;
- return realloc(mem, size);
-#endif
-}
-
-
-static void *my_calloc(const memcached_st *ptr, size_t nelem, const size_t size, void *)
-{
-#ifdef HARD_MALLOC_TESTS
- void *mem= my_malloc(ptr, nelem * size);
- if (mem)
- {
- memset(mem, 0, nelem * size);
- }
-
- return mem;
-#else
- (void)ptr;
- return calloc(nelem, size);
-#endif
-}
-
-static test_return_t selection_of_namespace_tests(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "mine";
- char *value;
-
- /* Make sure be default none exists */
- value= (char*)memcached_callback_get(memc, MEMCACHED_CALLBACK_NAMESPACE, &rc);
- test_null(value);
- test_compare_got(MEMCACHED_SUCCESS, rc, memcached_strerror(NULL, rc));
-
- /* Test a clean set */
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_NAMESPACE, (void *)key));
-
- value= (char*)memcached_callback_get(memc, MEMCACHED_CALLBACK_NAMESPACE, &rc);
- test_true(value);
- test_memcmp(value, key, 4);
- test_compare_got(MEMCACHED_SUCCESS, rc, memcached_strerror(NULL, rc));
-
- /* Test that we can turn it off */
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_NAMESPACE, NULL));
-
- value= (char*)memcached_callback_get(memc, MEMCACHED_CALLBACK_NAMESPACE, &rc);
- test_null(value);
- test_compare_got(MEMCACHED_SUCCESS, rc, memcached_strerror(NULL, rc));
-
- /* Now setup for main test */
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_NAMESPACE, (void *)key));
-
- value= (char *)memcached_callback_get(memc, MEMCACHED_CALLBACK_NAMESPACE, &rc);
- test_true(value);
- test_compare_got(MEMCACHED_SUCCESS, rc, memcached_strerror(NULL, rc));
- test_memcmp(value, key, 4);
-
- /* Set to Zero, and then Set to something too large */
- {
- char long_key[255];
- memset(long_key, 0, 255);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_NAMESPACE, NULL));
-
- value= (char*)memcached_callback_get(memc, MEMCACHED_CALLBACK_NAMESPACE, &rc);
- test_null(value);
- test_compare(MEMCACHED_SUCCESS, rc);
-
- /* Test a long key for failure */
- /* TODO, extend test to determine based on setting, what result should be */
- strncpy(long_key, "Thisismorethentheallottednumberofcharacters", sizeof(long_key));
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_NAMESPACE, long_key));
-
- /* Now test a key with spaces (which will fail from long key, since bad key is not set) */
- strncpy(long_key, "This is more then the allotted number of characters", sizeof(long_key));
- test_compare(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) ? MEMCACHED_SUCCESS : MEMCACHED_BAD_KEY_PROVIDED,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_NAMESPACE, long_key));
-
- /* Test for a bad prefix, but with a short key */
- test_compare(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) ? MEMCACHED_INVALID_ARGUMENTS : MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_VERIFY_KEY, 1));
-
- test_compare(memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL) ? MEMCACHED_SUCCESS : MEMCACHED_BAD_KEY_PROVIDED,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_NAMESPACE, "dog cat"));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t set_namespace(memcached_st *memc)
-{
- memcached_return_t rc;
- const char *key= "mine";
- char *value;
-
- // Make sure we default to a null namespace
- value= (char*)memcached_callback_get(memc, MEMCACHED_CALLBACK_NAMESPACE, &rc);
- test_null(value);
- test_compare_got(MEMCACHED_SUCCESS, rc, memcached_strerror(NULL, rc));
-
- /* Test a clean set */
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_NAMESPACE, (void *)key));
-
- value= (char*)memcached_callback_get(memc, MEMCACHED_CALLBACK_NAMESPACE, &rc);
- test_true(value);
- test_memcmp(value, key, 4);
- test_compare_got(MEMCACHED_SUCCESS, rc, memcached_strerror(NULL, rc));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t set_namespace_and_binary(memcached_st *memc)
-{
- test_return_if(pre_binary(memc));
- test_return_if(set_namespace(memc));
-
- 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;
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_MALLOC_FUNCTION, cb_ptr));
- test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_MALLOC_FUNCTION, &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(test_ptr == cb_ptr);
- }
-
- {
- memcached_realloc_fn realloc_cb=
- (memcached_realloc_fn)my_realloc;
- cb_ptr= *(void **)&realloc_cb;
- memcached_return_t rc;
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_REALLOC_FUNCTION, cb_ptr));
- test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_REALLOC_FUNCTION, &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(test_ptr == cb_ptr);
- }
-
- {
- memcached_free_fn free_cb=
- (memcached_free_fn)my_free;
- cb_ptr= *(void **)&free_cb;
- memcached_return_t rc;
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_callback_set(memc, MEMCACHED_CALLBACK_FREE_FUNCTION, cb_ptr));
- test_ptr= memcached_callback_get(memc, MEMCACHED_CALLBACK_FREE_FUNCTION, &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(test_ptr == cb_ptr);
- }
-
- return TEST_SUCCESS;
-}
-#endif
-
-
-static test_return_t set_memory_alloc(memcached_st *memc)
-{
- test_compare(MEMCACHED_INVALID_ARGUMENTS,
- memcached_set_memory_allocators(memc, NULL, my_free,
- my_realloc, my_calloc, NULL));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_set_memory_allocators(memc, my_malloc, my_free,
- my_realloc, my_calloc, NULL));
-
- 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_true(mem_malloc == my_malloc);
- test_true(mem_realloc == my_realloc);
- test_true(mem_calloc == my_calloc);
- test_true(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_true(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_true(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;
-
- if (libmemcached_util_version_check(memc, 1, 2, 4))
- {
- 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_by_position(memc, 0);
-
- if ((instance->major_version >= 1 && (instance->minor_version == 2 && instance->micro_version >= 4))
- or instance->minor_version > 2)
- {
- return TEST_SUCCESS;
- }
-
- return TEST_SKIPPED;
-}
-
-static test_return_t pre_unix_socket(memcached_st *memc)
-{
- struct stat buf;
-
- memcached_servers_reset(memc);
- const char *socket_file= default_socket();
-
- test_skip(0, stat(socket_file, &buf));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_server_add_unix_socket_with_weight(memc, socket_file, 0));
-
- return TEST_SUCCESS;
-}
-
-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 MEMCACHED_BEHAVIOR_POLL_TIMEOUT_test(memcached_st *memc)
-{
- const uint64_t timeout= 100; // Not using, just checking that it sets
-
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_POLL_TIMEOUT, timeout);
-
- test_compare(timeout, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_POLL_TIMEOUT));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t noreply_test(memcached_st *memc)
-{
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 1));
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS, 1));
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS, 1));
- test_compare(1LLU, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_NOREPLY));
- test_compare(1LLU, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_BUFFER_REQUESTS));
- test_compare(1LLU, memcached_behavior_get(memc, MEMCACHED_BEHAVIOR_SUPPORT_CAS));
-
- memcached_return_t ret;
- for (int count= 0; count < 5; ++count)
- {
- for (size_t x= 0; x < 100; ++x)
- {
- char key[10];
- int check_length= (size_t)snprintf(key, sizeof(key), "%lu", (unsigned long)x);
- test_false((size_t)check_length >= sizeof(key) || check_length < 0);
-
- size_t len= (size_t)check_length;
-
- 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_true(count);
- break;
- }
- test_true_got(ret == MEMCACHED_SUCCESS or ret == MEMCACHED_BUFFERED, memcached_strerror(NULL, ret));
- }
-
- /*
- ** 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_by_position(memc, x);
- no_msg+=(int)(instance->cursor_active);
- }
-
- test_true(no_msg == 0);
- test_compare(MEMCACHED_SUCCESS, memcached_flush_buffers(memc));
-
- /*
- ** Now validate that all items was set properly!
- */
- for (size_t x= 0; x < 100; ++x)
- {
- char key[10];
-
- int check_length= (size_t)snprintf(key, sizeof(key), "%lu", (unsigned long)x);
-
- test_false((size_t)check_length >= sizeof(key) || check_length < 0);
-
- size_t len= (size_t)check_length;
- size_t length;
- uint32_t flags;
- char* value=memcached_get(memc, key, strlen(key),
- &length, &flags, &ret);
- test_true_got(ret == MEMCACHED_SUCCESS && value != NULL, memcached_strerror(NULL, ret));
- switch (count)
- {
- case 0: /* FALLTHROUGH */
- case 1: /* FALLTHROUGH */
- case 2:
- test_true(strncmp(value, key, len) == 0);
- test_true(len == length);
- break;
- case 3:
- test_true(length == len * 2);
- break;
- case 4:
- test_true(length == len * 3);
- break;
- default:
- test_true(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;
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, keys, lengths, 1));
-
- results= memcached_result_create(memc, &results_obj);
- test_true(results);
- results= memcached_fetch_result(memc, &results_obj, &ret);
- test_true(results);
- test_compare(MEMCACHED_SUCCESS, ret);
- uint64_t cas= memcached_result_cas(results);
- memcached_result_free(&results_obj);
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_cas(memc, keys[0], lengths[0], keys[0], lengths[0], 0, 0, cas));
-
- /*
- * The item will have a new cas value, so try to set it again with the old
- * value. This should fail!
- */
- test_compare(MEMCACHED_SUCCESS,
- memcached_cas(memc, keys[0], lengths[0], keys[0], lengths[0], 0, 0, cas));
- test_true(memcached_flush_buffers(memc) == MEMCACHED_SUCCESS);
- char* value=memcached_get(memc, keys[0], lengths[0], &length, &flags, &ret);
- test_true(ret == MEMCACHED_SUCCESS && value != NULL);
- free(value);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t analyzer_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_analysis_st *report;
-
- memcached_stat_st *memc_stat= memcached_stat(memc, NULL, &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(memc_stat);
-
- report= memcached_analyze(memc, memc_stat, &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(report);
-
- free(report);
- memcached_stat_free(NULL, memc_stat);
-
- return TEST_SUCCESS;
-}
-
-/* Count the objects */
-
-static test_return_t dump_test(memcached_st *memc)
-{
- /* No support for Binary protocol yet */
- test_skip(false, memc->flags.binary_protocol);
-
- test_compare(TEST_SUCCESS, set_test3(memc));
-
- // confirm_key_count() call dump
- size_t counter= confirm_key_count(memc);
-
- /* We may have more then 32 if our previous flush has not completed */
- test_true(counter >= 32);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t util_version_test(memcached_st *memc)
-{
- test_compare_hint(MEMCACHED_SUCCESS, memcached_version(memc), memcached_last_error_message(memc));
- test_true(libmemcached_util_version_check(memc, 0, 0, 0));
-
- bool if_successful= libmemcached_util_version_check(memc, 9, 9, 9);
-
- // We expect failure
- if (if_successful)
- {
- fprintf(stderr, "\n----------------------------------------------------------------------\n");
- fprintf(stderr, "\nDumping Server Information\n\n");
- memcached_server_fn callbacks[1];
-
- callbacks[0]= dump_server_information;
- memcached_server_cursor(memc, callbacks, (void *)stderr, 1);
- fprintf(stderr, "\n----------------------------------------------------------------------\n");
- }
- test_true(if_successful == false);
-
- memcached_server_instance_st instance=
- memcached_server_instance_by_position(memc, 0);
-
- memcached_version(memc);
-
- // We only use one binary when we test, so this should be just fine.
- if_successful= libmemcached_util_version_check(memc, instance->major_version, instance->minor_version, instance->micro_version);
- test_true(if_successful == true);
-
- if (instance->micro_version > 0)
- {
- if_successful= libmemcached_util_version_check(memc, instance->major_version, instance->minor_version, (uint8_t)(instance->micro_version -1));
- }
- else if (instance->minor_version > 0)
- {
- if_successful= libmemcached_util_version_check(memc, instance->major_version, (uint8_t)(instance->minor_version - 1), instance->micro_version);
- }
- else if (instance->major_version > 0)
- {
- if_successful= libmemcached_util_version_check(memc, (uint8_t)(instance->major_version -1), instance->minor_version, instance->micro_version);
- }
-
- test_true(if_successful == true);
-
- if (instance->micro_version > 0)
- {
- if_successful= libmemcached_util_version_check(memc, instance->major_version, instance->minor_version, (uint8_t)(instance->micro_version +1));
- }
- else if (instance->minor_version > 0)
- {
- if_successful= libmemcached_util_version_check(memc, instance->major_version, (uint8_t)(instance->minor_version +1), instance->micro_version);
- }
- else if (instance->major_version > 0)
- {
- if_successful= libmemcached_util_version_check(memc, (uint8_t)(instance->major_version +1), instance->minor_version, instance->micro_version);
- }
-
- test_true(if_successful == false);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t getpid_connection_failure_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_server_instance_st instance=
- memcached_server_instance_by_position(memc, 0);
-
- // Test both the version that returns a code, and the one that does not.
- test_true(libmemcached_util_getpid(memcached_server_name(instance),
- memcached_server_port(instance) -1, NULL) == -1);
-
- test_true(libmemcached_util_getpid(memcached_server_name(instance),
- memcached_server_port(instance) -1, &rc) == -1);
- test_compare_got(MEMCACHED_CONNECTION_FAILURE, rc, memcached_strerror(memc, rc));
-
- return TEST_SUCCESS;
-}
-
-
-static test_return_t getpid_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_server_instance_st instance=
- memcached_server_instance_by_position(memc, 0);
-
- // Test both the version that returns a code, and the one that does not.
- test_true(libmemcached_util_getpid(memcached_server_name(instance),
- memcached_server_port(instance), NULL) > -1);
-
- test_true(libmemcached_util_getpid(memcached_server_name(instance),
- memcached_server_port(instance), &rc) > -1);
- test_compare(MEMCACHED_SUCCESS, rc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t ping_test(memcached_st *memc)
-{
- memcached_return_t rc;
- memcached_server_instance_st instance=
- memcached_server_instance_by_position(memc, 0);
-
- // Test both the version that returns a code, and the one that does not.
- test_true(libmemcached_util_ping(memcached_server_name(instance),
- memcached_server_port(instance), NULL));
-
- test_true(libmemcached_util_ping(memcached_server_name(instance),
- memcached_server_port(instance), &rc));
-
- test_compare(MEMCACHED_SUCCESS, rc);
-
- 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)
-{
- test_skip(true, libhashkit_has_algorithm(HASHKIT_HASH_HSIEH));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH,
- (uint64_t)MEMCACHED_HASH_HSIEH));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t murmur_avaibility_test (memcached_st *memc)
-{
- test_skip(true, libhashkit_has_algorithm(HASHKIT_HASH_MURMUR));
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_HASH, (uint64_t)MEMCACHED_HASH_MURMUR));
-
- return TEST_SUCCESS;
-}
-
-static test_return_t one_at_a_time_run (memcached_st *)
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(one_at_a_time_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_DEFAULT));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t md5_run (memcached_st *)
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(md5_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_MD5));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t crc_run (memcached_st *)
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(crc_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_CRC));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fnv1_64_run (memcached_st *)
-{
- test_skip(true, libhashkit_has_algorithm(HASHKIT_HASH_FNV1_64));
-
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(fnv1_64_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1_64));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fnv1a_64_run (memcached_st *)
-{
- test_skip(true, libhashkit_has_algorithm(HASHKIT_HASH_FNV1A_64));
-
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(fnv1a_64_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1A_64));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fnv1_32_run (memcached_st *)
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(fnv1_32_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1_32));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t fnv1a_32_run (memcached_st *)
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(fnv1a_32_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_FNV1A_32));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t hsieh_run (memcached_st *)
-{
- test_skip(true, libhashkit_has_algorithm(HASHKIT_HASH_HSIEH));
-
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(hsieh_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_HSIEH));
- }
-
- return TEST_SUCCESS;
-}
-
-static test_return_t murmur_run (memcached_st *)
-{
- test_skip(true, libhashkit_has_algorithm(HASHKIT_HASH_MURMUR));
-
-#ifdef WORDS_BIGENDIAN
- (void)murmur_values;
- return TEST_SKIPPED;
-#else
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(murmur_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_MURMUR));
- }
-
- return TEST_SUCCESS;
-#endif
-}
-
-static test_return_t jenkins_run (memcached_st *)
-{
- uint32_t x;
- const char **ptr;
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- test_compare(jenkins_values[x],
- memcached_generate_hash_value(*ptr, strlen(*ptr), MEMCACHED_HASH_JENKINS));
- }
-
- return TEST_SUCCESS;
-}
-
-static uint32_t hash_md5_test_function(const char *string, size_t string_length, void *)
-{
- return libhashkit_md5(string, string_length);
-}
-
-static uint32_t hash_crc_test_function(const char *string, size_t string_length, void *)
-{
- return libhashkit_crc32(string, string_length);
-}
-
-static test_return_t memcached_get_hashkit_test (memcached_st *)
-{
- uint32_t x;
- const char **ptr;
- hashkit_st new_kit;
-
- memcached_st *memc= memcached(test_literal_param("--server=localhost:1 --server=localhost:2 --server=localhost:3 --server=localhost:4 --server=localhost5 --DISTRIBUTION=modula"));
-
- uint32_t md5_hosts[]= {4U, 1U, 0U, 1U, 4U, 2U, 0U, 3U, 0U, 0U, 3U, 1U, 0U, 0U, 1U, 3U, 0U, 0U, 0U, 3U, 1U, 0U, 4U, 4U, 3U};
- uint32_t crc_hosts[]= {2U, 4U, 1U, 0U, 2U, 4U, 4U, 4U, 1U, 2U, 3U, 4U, 3U, 4U, 1U, 3U, 3U, 2U, 0U, 0U, 0U, 1U, 2U, 4U, 0U};
-
- const hashkit_st *kit= memcached_get_hashkit(memc);
-
- hashkit_clone(&new_kit, kit);
- test_compare(HASHKIT_SUCCESS, hashkit_set_custom_function(&new_kit, hash_md5_test_function, NULL));
-
- memcached_set_hashkit(memc, &new_kit);
-
- /*
- Verify Setting the hash.
- */
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= hashkit_digest(kit, *ptr, strlen(*ptr));
- test_compare_got(md5_values[x], hash_val, *ptr);
- }
-
-
- /*
- Now check memcached_st.
- */
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash(memc, *ptr, strlen(*ptr));
- test_compare_got(md5_hosts[x], hash_val, *ptr);
- }
-
- test_compare(HASHKIT_SUCCESS, hashkit_set_custom_function(&new_kit, hash_crc_test_function, NULL));
-
- memcached_set_hashkit(memc, &new_kit);
-
- /*
- Verify Setting the hash.
- */
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= hashkit_digest(kit, *ptr, strlen(*ptr));
- test_true(crc_values[x] == hash_val);
- }
-
- for (ptr= list_to_hash, x= 0; *ptr; ptr++, x++)
- {
- uint32_t hash_val;
-
- hash_val= memcached_generate_hash(memc, *ptr, strlen(*ptr));
- test_compare(crc_hosts[x], hash_val);
- }
-
- memcached_free(memc);
-
- return TEST_SUCCESS;
-}
-
-/*
- Test case adapted from John Gorman <johngorman2@gmail.com>
-
- We are testing the error condition when we connect to a server via memcached_get()
- but find that the server is not available.
-*/
-static test_return_t memcached_get_MEMCACHED_ERRNO(memcached_st *)
-{
- const char *key= "MemcachedLives";
- size_t len;
- uint32_t flags;
- memcached_return rc;
-
- // Create a handle.
- memcached_st *tl_memc_h= memcached(test_literal_param("--server=localhost:9898 --server=localhost:9899")); // This server should not exist
-
- // See if memcached is reachable.
- char *value= memcached_get(tl_memc_h, key, strlen(key), &len, &flags, &rc);
-
- test_false(value);
- test_zero(len);
- test_true(memcached_failed(rc));
-
- memcached_free(tl_memc_h);
-
- return TEST_SUCCESS;
-}
-
-/*
- We connect to a server which exists, but search for a key that does not exist.
-*/
-static test_return_t memcached_get_MEMCACHED_NOTFOUND(memcached_st *memc)
-{
- const char *key= "MemcachedKeyNotEXIST";
- size_t len;
- uint32_t flags;
- memcached_return rc;
-
- // See if memcached is reachable.
- char *value= memcached_get(memc, key, strlen(key), &len, &flags, &rc);
-
- test_false(value);
- test_zero(len);
- test_compare(MEMCACHED_NOTFOUND, rc);
-
- return TEST_SUCCESS;
-}
-
-/*
- Test case adapted from John Gorman <johngorman2@gmail.com>
-
- We are testing the error condition when we connect to a server via memcached_get_by_key()
- but find that the server is not available.
-*/
-static test_return_t memcached_get_by_key_MEMCACHED_ERRNO(memcached_st *memc)
-{
- (void)memc;
- memcached_st *tl_memc_h;
- memcached_server_st *servers;
-
- const char *key= "MemcachedLives";
- size_t len;
- uint32_t flags;
- memcached_return rc;
- char *value;
-
- // Create a handle.
- tl_memc_h= memcached_create(NULL);
- servers= memcached_servers_parse("localhost:9898,localhost:9899"); // This server should not exist
- memcached_server_push(tl_memc_h, servers);
- memcached_server_list_free(servers);
-
- // See if memcached is reachable.
- value= memcached_get_by_key(tl_memc_h, key, strlen(key), key, strlen(key), &len, &flags, &rc);
-
- test_false(value);
- test_zero(len);
- test_true(memcached_failed(rc));
-
- memcached_free(tl_memc_h);
-
- return TEST_SUCCESS;
-}
-
-/*
- We connect to a server which exists, but search for a key that does not exist.
-*/
-static test_return_t memcached_get_by_key_MEMCACHED_NOTFOUND(memcached_st *memc)
-{
- const char *key= "MemcachedKeyNotEXIST";
- size_t len;
- uint32_t flags;
- memcached_return rc;
- char *value;
-
- // See if memcached is reachable.
- value= memcached_get_by_key(memc, key, strlen(key), key, strlen(key), &len, &flags, &rc);
-
- test_false(value);
- test_zero(len);
- test_compare(MEMCACHED_NOTFOUND, rc);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t regression_bug_434484(memcached_st *memc)
-{
- test_skip(TEST_SUCCESS, pre_binary(memc));
-
- const char *key= "regression_bug_434484";
- size_t keylen= strlen(key);
-
- memcached_return_t ret= memcached_append(memc, key, keylen, key, keylen, 0, 0);
- test_compare(MEMCACHED_NOTSTORED, ret);
-
- size_t size= 2048 * 1024;
- char *data= (char*)calloc(1, size);
- test_true(data);
- test_compare(MEMCACHED_E2BIG,
- memcached_set(memc, key, keylen, data, size, 0, 0));
- free(data);
-
- return TEST_SUCCESS;
-}
-
-static test_return_t regression_bug_434843(memcached_st *original_memc)
-{
- test_skip(TEST_SUCCESS, pre_binary(original_memc));
-
- memcached_return_t rc;
- size_t counter= 0;
- memcached_execute_fn callbacks[]= { &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.
- */
- memcached_st *memc= create_single_instance_memcached(original_memc, "--BINARY-PROTOCOL");
-
- const size_t max_keys= 1024;
- char **keys= (char**)calloc(max_keys, sizeof(char*));
- size_t *key_length= (size_t *)calloc(max_keys, sizeof(size_t));
-
- for (size_t x= 0; x < max_keys; ++x)
- {
- char k[251];
-
- key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%lu", (unsigned long)x);
- keys[x]= strdup(k);
- test_true(keys[x]);
- }
-
- /*
- * Run two times.. the first time we should have 100% cache miss,
- * and the second time we should have 100% cache hits
- */
- for (size_t y= 0; y < 2; y++)
- {
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, (const char**)keys, key_length, max_keys));
-
- test_compare(y ? MEMCACHED_SUCCESS : MEMCACHED_NOTFOUND,
- memcached_fetch_execute(memc, callbacks, (void *)&counter, 1));
-
- if (y == 0)
- {
- /* The first iteration should give me a 100% cache miss. verify that*/
- char blob[1024]= { 0 };
-
- test_false(counter);
-
- for (size_t x= 0; x < max_keys; ++x)
- {
- rc= memcached_add(memc, keys[x], key_length[x],
- blob, sizeof(blob), 0, 0);
- test_true(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
- }
- else
- {
- /* Verify that we received all of the key/value pairs */
- test_compare(counter, max_keys);
- }
- }
-
- /* Release allocated resources */
- for (size_t x= 0; x < max_keys; ++x)
- {
- free(keys[x]);
- }
- free(keys);
- free(key_length);
-
- memcached_free(memc);
-
- 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_compare(MEMCACHED_SUCCESS, rc);
-
- 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_compare(MEMCACHED_SUCCESS, rc);
-
- char *bytes_str= memcached_stat_get_value(memc, memc_stat, "bytes", &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(bytes_str);
- char *bytes_read_str= memcached_stat_get_value(memc, memc_stat,
- "bytes_read", &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(bytes_read_str);
-
- char *bytes_written_str= memcached_stat_get_value(memc, memc_stat,
- "bytes_written", &rc);
- test_compare(MEMCACHED_SUCCESS, rc);
- test_true(bytes_written_str);
-
- unsigned long long bytes= strtoull(bytes_str, 0, 10);
- unsigned long long bytes_read= strtoull(bytes_read_str, 0, 10);
- unsigned long long bytes_written= strtoull(bytes_written_str, 0, 10);
-
- test_true(bytes != bytes_read);
- test_true(bytes != bytes_written);
-
- /* Release allocated resources */
- free(bytes_str);
- free(bytes_read_str);
- free(bytes_written_str);
- 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)
-{
- test_skip(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 1));
- 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 (uint32_t x= 0; x < 250; ++x)
- {
- len= (size_t)snprintf(k, sizeof(k), "%0250u", x);
- memcached_return_t rc= memcached_delete(memc, k, len, 0);
- test_true(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
- }
-
- (void)snprintf(k, sizeof(k), "%037u", 251U);
- len= strlen(k);
-
- memcached_return_t rc= memcached_delete(memc, k, len, 0);
- test_true(rc == MEMCACHED_SUCCESS || rc == MEMCACHED_BUFFERED);
-
- test_compare(MEMCACHED_SUCCESS, memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NOREPLY, 0));
- test_compare(MEMCACHED_NOTFOUND, memcached_delete(memc, k, len, 0));
-
- 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 or pre_replication(memc) != TEST_SUCCESS)
- return TEST_SKIPPED;
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_NUMBER_OF_REPLICAS, 2));
-
- const unsigned int max_keys= 100;
- char **keys= (char**)calloc(max_keys, sizeof(char*));
- size_t *key_length= (size_t *)calloc(max_keys, sizeof(size_t));
-
- for (unsigned int x= 0; x < max_keys; ++x)
- {
- char k[251];
-
- key_length[x]= (size_t)snprintf(k, sizeof(k), "0200%lu", (unsigned long)x);
- keys[x]= strdup(k);
- test_true(keys[x]);
- test_compare(MEMCACHED_SUCCESS,
- memcached_set(memc, k, key_length[x], k, key_length[x], 0, 0));
- }
-
- /*
- ** 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
- */
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, (const char* const *)keys, key_length, max_keys));
-
- unsigned int counter= 0;
- memcached_execute_fn callbacks[]= { &callback_counter };
- test_compare(MEMCACHED_SUCCESS,
- memcached_fetch_execute(memc, callbacks, (void *)&counter, 1));
-
- /* Verify that we received all of the key/value pairs */
- test_compare(counter, 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_by_position(memc, 0);
- instance_two= memcached_server_instance_by_position(memc, 2);
- in_port_t port0= instance_one->port;
- in_port_t port2= instance_two->port;
-
- ((memcached_server_write_instance_st)instance_one)->port= 0;
- ((memcached_server_write_instance_st)instance_two)->port= 0;
-
- test_compare(MEMCACHED_SUCCESS,
- memcached_mget(memc, (const char* const *)keys, key_length, max_keys));
-
- counter= 0;
- test_compare(MEMCACHED_SUCCESS,
- memcached_fetch_execute(memc, callbacks, (void *)&counter, 1));
- test_compare(counter, (unsigned int)max_keys);
-
- /* restore the memc handle */
- ((memcached_server_write_instance_st)instance_one)->port= port0;
- ((memcached_server_write_instance_st)instance_two)->port= port2;
-
- memcached_quit(memc);
-
- /* Remove half of the objects */
- for (size_t x= 0; x < max_keys; ++x)
- {
- if (x & 1)
- {
- test_compare(MEMCACHED_SUCCESS,
- memcached_delete(memc, keys[x], key_length[x], 0));
- }
- }