-#include <brian.h>
+/* uTest
+ * Copyright (C) 2006-2009 Brian Aker
+ * All rights reserved.
+ *
+ * Use and distribution licensed under the BSD license. See
+ * the COPYING file in the parent directory for full text.
+ */
+
/*
Sample test application.
*/
#include <assert.h>
-#include <memcached.h>
-#include <stdio.h>
#include <stdlib.h>
#include <string.h>
+#include <sys/time.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+#include <time.h>
+#include <fnmatch.h>
+#include "server.h"
-void init_test(void)
-{
- memcached_st memc;
-
- (void)memcached_init(&memc);
- memcached_deinit(&memc);
-}
+#include "test.h"
-void allocation_test(void)
+static void world_stats_print(world_stats_st *stats)
{
- memcached_st *memc;
- memc= memcached_init(NULL);
- assert(memc);
- memcached_deinit(memc);
+ fprintf(stderr, "Total\t\t\t\t%u\n", stats->total);
+ fprintf(stderr, "\tFailed\t\t\t%u\n", stats->failed);
+ fprintf(stderr, "\tSkipped\t\t\t%u\n", stats->skipped);
+ fprintf(stderr, "\tSucceeded\t\t%u\n", stats->success);
}
-void set_test(void)
+static long int timedif(struct timeval a, struct timeval b)
{
- memcached_st *memc;
- char *foo;
- memcached_return rc;
- char *key= "foo";
- char *value= "when we sanitize";
-
- memc= memcached_init(NULL);
- assert(memc);
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint16_t)0);
- assert(rc == MEMCACHED_SUCCESS);
- assert(foo);
-
- memcached_deinit(memc);
-}
+ register int us, s;
-void add_test(void)
-{
- memcached_st *memc;
- char *foo;
- memcached_return rc;
- char *key= "foo";
- char *value= "when we sanitize";
-
- memc= memcached_init(NULL);
- assert(memc);
- rc= memcached_add(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint16_t)0);
- assert(rc == MEMCACHED_NOTSTORED);
- assert(foo);
-
- memcached_deinit(memc);
+ us = (int)(a.tv_usec - b.tv_usec);
+ us /= 1000;
+ s = (int)(a.tv_sec - b.tv_sec);
+ s *= 1000;
+ return s + us;
}
-void replace_test(void)
+static const char *test_strerror(test_return_t code)
{
- memcached_st *memc;
- char *foo;
- memcached_return rc;
- char *key= "foo";
- char *value= "when we sanitize";
-
- memc= memcached_init(NULL);
- assert(memc);
- rc= memcached_replace(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint16_t)0);
- assert(rc == MEMCACHED_SUCCESS);
- assert(foo);
-
- memcached_deinit(memc);
-}
+ switch (code) {
+ case TEST_SUCCESS:
+ return "ok";
+ case TEST_FAILURE:
+ return "failed";
+ case TEST_MEMORY_ALLOCATION_FAILURE:
+ return "memory allocation";
+ case TEST_SKIPPED:
+ return "skipped";
+ case TEST_MAXIMUM_RETURN:
+ default:
+ fprintf(stderr, "Unknown return value\n");
+ abort();
+ }
-void delete_test(void)
-{
- memcached_st *memc;
- char *foo;
- memcached_return rc;
- char *key= "foo";
- char *value= "when we sanitize";
-
- memc= memcached_init(NULL);
- assert(memc);
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint16_t)0);
- assert(rc == MEMCACHED_SUCCESS);
- assert(foo);
-
- rc= memcached_delete(memc, key, strlen(key), (time_t)0);
- assert(rc == MEMCACHED_SUCCESS);
- assert(foo);
-
- memcached_deinit(memc);
}
-void flush_test(void)
+void create_core(void)
{
- memcached_st *memc;
- memcached_return rc;
-
- memc= memcached_init(NULL);
- assert(memc);
- rc= memcached_flush(memc, 0);
- assert(rc == MEMCACHED_SUCCESS);
-
- memcached_deinit(memc);
+ if (getenv("LIBMEMCACHED_NO_COREDUMP") == NULL && fork() == 0)
+ abort();
}
-void get_test(void)
-{
- memcached_st *memc;
- memcached_return rc;
- char *key= "foo";
- char *string;
- size_t string_length;
- uint16_t flags;
-
- memc= memcached_init(NULL);
- assert(memc);
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- assert(string_length == 0);
- assert(!string);
-
- memcached_deinit(memc);
-}
-void get_test2(void)
+static test_return_t _runner_default(test_callback_fn func, void *p)
{
- memcached_st *memc;
- char *foo;
- memcached_return rc;
- char *key= "foo";
- char *value= "when we sanitize";
- char *string;
- size_t string_length;
- uint16_t flags;
-
- memc= memcached_init(NULL);
- assert(memc);
- rc= memcached_set(memc, key, strlen(key),
- value, strlen(value),
- (time_t)0, (uint16_t)0);
- assert(rc == MEMCACHED_SUCCESS);
-
- string= memcached_get(memc, key, strlen(key),
- &string_length, &flags, &rc);
-
- assert(string_length == strlen(value));
- assert(!memcmp(string, value, string_length));
-
- free(string);
-
- memcached_deinit(memc);
+ if (func)
+ {
+ return func(p);
+ }
+ else
+ {
+ return TEST_SUCCESS;
+ }
}
-int main(void)
+static world_runner_st defualt_runners= {
+ _runner_default,
+ _runner_default,
+ _runner_default
+};
+
+
+int main(int argc, char *argv[])
{
- /* Clean the server before beginning testing */
- flush_test();
-
- init_test();
- allocation_test();
- set_test();
- add_test();
- replace_test();
- flush_test();
- delete_test();
- flush_test();
- get_test();
- get_test2();
-
- /* Clean up whatever we might have left */
- flush_test();
- return 0;
+ test_return_t return_code;
+ unsigned int x;
+ char *collection_to_run= NULL;
+ char *wildcard= NULL;
+ world_st world;
+ collection_st *collection;
+ collection_st *next;
+ void *world_ptr;
+
+ world_stats_st stats;
+
+ memset(&stats, 0, sizeof(stats));
+ memset(&world, 0, sizeof(world));
+ get_world(&world);
+
+ if (! world.runner)
+ {
+ world.runner= &defualt_runners;
+ }
+
+ collection= world.collections;
+
+ if (world.create)
+ world_ptr= world.create();
+ else
+ world_ptr= NULL;
+
+ if (argc > 1)
+ collection_to_run= argv[1];
+
+ if (argc == 3)
+ wildcard= argv[2];
+
+ for (next= collection; next->name; next++)
+ {
+ test_st *run;
+
+ run= next->tests;
+ if (collection_to_run && fnmatch(collection_to_run, next->name, 0))
+ continue;
+
+ fprintf(stderr, "\n%s\n\n", next->name);
+
+ for (x= 0; run->name; run++)
+ {
+ struct timeval start_time, end_time;
+ long int load_time= 0;
+
+ if (wildcard && fnmatch(wildcard, run->name, 0))
+ continue;
+
+ fprintf(stderr, "Testing %s", run->name);
+
+ if (world.collection_startup)
+ {
+ world.collection_startup(world_ptr);
+ }
+
+ if (run->requires_flush && world.flush)
+ {
+ world.flush(world_ptr);
+ }
+
+ if (world.pre_run)
+ {
+ world.pre_run(world_ptr);
+ }
+
+
+ if (next->pre)
+ {
+ return_code= world.runner->pre(next->pre, world_ptr);
+
+ if (return_code != TEST_SUCCESS)
+ {
+ goto error;
+ }
+ }
+
+ gettimeofday(&start_time, NULL);
+ return_code= world.runner->run(run->test_fn, world_ptr);
+ gettimeofday(&end_time, NULL);
+ load_time= timedif(end_time, start_time);
+
+ if (next->post)
+ {
+ (void) world.runner->pre(next->pre, world_ptr);
+ }
+
+ if (world.post_run)
+ {
+ world.post_run(world_ptr);
+ }
+
+error:
+ stats.total++;
+
+ fprintf(stderr, "\t\t\t\t\t");
+
+ switch (return_code)
+ {
+ case TEST_SUCCESS:
+ fprintf(stderr, "%ld.%03ld ", load_time / 1000, load_time % 1000);
+ stats.success++;
+ break;
+ case TEST_FAILURE:
+ stats.failed++;
+ break;
+ case TEST_SKIPPED:
+ stats.skipped++;
+ break;
+ case TEST_MEMORY_ALLOCATION_FAILURE:
+ case TEST_MAXIMUM_RETURN:
+ default:
+ break;
+ }
+
+ fprintf(stderr, "[ %s ]\n", test_strerror(return_code));
+
+ if (world.on_error)
+ {
+ test_return_t rc;
+ rc= world.on_error(return_code, world_ptr);
+
+ if (rc != TEST_SUCCESS)
+ break;
+ }
+ }
+ }
+
+ fprintf(stderr, "All tests completed successfully\n\n");
+
+ if (world.destroy)
+ world.destroy(world_ptr);
+
+ world_stats_print(&stats);
+
+ return stats.failed == 0 ? 0 : 1;
}