X-Git-Url: http://git.droids-corp.org/?a=blobdiff_plain;ds=sidebyside;f=lib%2Fecoli_test.c;h=291417da90f123d63e004de49c7d69c3a00f5022;hb=e746f568b6a3ab77d0100976d8fa5a68f611bcd3;hp=e3942c6a65f659566ff749c1b4ee3572a219fa65;hpb=81b21b1fdbd587fc2ac9ea465bc945efa45ab7b4;p=protos%2Flibecoli.git

diff --git a/lib/ecoli_test.c b/lib/ecoli_test.c
index e3942c6..291417d 100644
--- a/lib/ecoli_test.c
+++ b/lib/ecoli_test.c
@@ -28,10 +28,16 @@
 #include <stdlib.h>
 #include <stdio.h>
 #include <string.h>
+#include <assert.h>
 
+#include <ecoli_log.h>
 #include <ecoli_malloc.h>
 #include <ecoli_test.h>
-#include <ecoli_tk.h>
+#include <ecoli_strvec.h>
+#include <ecoli_node.h>
+#include <ecoli_parsed.h>
+#include <ecoli_completed.h>
+#include <ecoli_parsed.h>
 
 static struct ec_test_list test_list = TAILQ_HEAD_INITIALIZER(test_list);
 
@@ -39,221 +45,174 @@ static struct ec_test_list test_list = TAILQ_HEAD_INITIALIZER(test_list);
 void ec_test_register(struct ec_test *test)
 {
 	TAILQ_INSERT_TAIL(&test_list, test, next);
+	// XXX check if already exist, like for type
 }
 
-int ec_test_check_tk_parse(const struct ec_tk *tk, const char *input,
-	const char *expected)
+int ec_test_check_parse(struct ec_node *tk, int expected, ...)
 {
-	struct ec_parsed_tk *p;
+	struct ec_parsed *p;
+	struct ec_strvec *vec = NULL;
 	const char *s;
-	int ret = -1;
+	int ret = -1, match;
+	va_list ap;
 
-	p = ec_tk_parse(tk, input);
-	s = ec_parsed_tk_to_string(p);
-	if (s == NULL && expected == NULL)
-		ret = 0;
-	else if (s != NULL && expected != NULL &&
-		!strcmp(s, expected))
-		ret = 0;
+	va_start(ap, expected);
 
-	if (expected == NULL && ret != 0)
-		printf("tk should not match but matches <%s>\n", s);
-	if (expected != NULL && ret != 0)
-		printf("tk should match <%s> but matches <%s>\n",
-			expected, s);
+	/* build a string vector */
+	vec = ec_strvec();
+	if (vec == NULL)
+		goto out;
 
-	ec_parsed_tk_free(p);
+	for (s = va_arg(ap, const char *);
+	     s != EC_NODE_ENDLIST;
+	     s = va_arg(ap, const char *)) {
+		if (s == NULL)
+			goto out;
 
-	return ret;
-}
-
-int ec_test_check_tk_complete(const struct ec_tk *tk, const char *input,
-	const char *expected)
-{
-	struct ec_completed_tk *p;
-	const char *s;
-	int ret = -1;
+		if (ec_strvec_add(vec, s) < 0)
+			goto out;
+	}
 
-	p = ec_tk_complete(tk, input);
-	s = ec_completed_tk_smallest_start(p);
-	if (s == NULL && expected == NULL)
-		ret = 0;
-	else if (s != NULL && expected != NULL &&
-		!strcmp(s, expected))
+	p = ec_node_parse_strvec(tk, vec);
+	ec_parsed_dump(stdout, p); /* XXX only for debug */
+	if (p == NULL) {
+		ec_log(EC_LOG_ERR, "parsed is NULL\n");
+	}
+	if (ec_parsed_matches(p))
+		match = ec_parsed_len(p);
+	else
+		match = -1;
+	if (expected == match) {
 		ret = 0;
-
-	if (expected == NULL && ret != 0)
-		printf("tk should not complete but completes with <%s>\n", s);
-	if (expected != NULL && ret != 0)
-		printf("tk should complete with <%s> but completes with <%s>\n",
-			expected, s);
-
-	ec_completed_tk_free(p);
-
-	return ret;
-}
-
-TAILQ_HEAD(debug_alloc_hdr_list, debug_alloc_hdr);
-static struct debug_alloc_hdr_list debug_alloc_hdr_list =
-	TAILQ_HEAD_INITIALIZER(debug_alloc_hdr_list);
-
-struct debug_alloc_hdr {
-	TAILQ_ENTRY(debug_alloc_hdr) next;
-	const char *file;
-	unsigned int line;
-	size_t size;
-	unsigned int cookie;
-};
-
-static void *debug_malloc(size_t size, const char *file, unsigned int line)
-{
-	struct debug_alloc_hdr *hdr;
-	size_t new_size = size + sizeof(*hdr) + sizeof(unsigned int);
-	void *ret;
-
-	hdr = malloc(new_size);
-	if (hdr == NULL) {
-		ret = NULL;
 	} else {
-		hdr->file = file;
-		hdr->line = line;
-		hdr->size = size;
-		hdr->cookie = 0x12345678;
-		TAILQ_INSERT_TAIL(&debug_alloc_hdr_list, hdr, next);
-		ret = hdr + 1;
+		ec_log(EC_LOG_ERR,
+			"tk parsed len (%d) does not match expected (%d)\n",
+			match, expected);
 	}
 
-	printf("%s:%d: info: malloc(%zd) -> %p\n", file, line, size, ret);
+	ec_parsed_free(p);
 
+out:
+	ec_strvec_free(vec);
+	va_end(ap);
 	return ret;
 }
 
-static void debug_free(void *ptr, const char *file, unsigned int line)
+int ec_test_check_complete(struct ec_node *tk, ...)
 {
-	struct debug_alloc_hdr *hdr, *h;
-
-	(void)file;
-	(void)line;
+	struct ec_completed *c = NULL;
+	struct ec_strvec *vec = NULL;
+	const char *s;
+	int ret = 0;
+	unsigned int count = 0;
+	va_list ap;
 
-	printf("%s:%d: info: free(%p)\n", file, line, ptr);
+	va_start(ap, tk);
 
-	if (ptr == NULL)
-		return;
+	/* build a string vector */
+	vec = ec_strvec();
+	if (vec == NULL)
+		goto out;
 
-	hdr = (ptr - sizeof(*hdr));
-	if (hdr->cookie != 0x12345678) {
-		printf("%s:%d: error: free(%p): bad start cookie\n",
-			file, line, ptr);
-		abort();
-	}
+	for (s = va_arg(ap, const char *);
+	     s != EC_NODE_ENDLIST;
+	     s = va_arg(ap, const char *)) {
+		if (s == NULL)
+			goto out;
 
-	TAILQ_FOREACH(h, &debug_alloc_hdr_list, next) {
-		if (h == hdr)
-			break;
+		if (ec_strvec_add(vec, s) < 0)
+			goto out;
 	}
 
-	if (h == NULL) {
-		printf("%s:%d: error: free(%p): bad ptr\n",
-			file, line, ptr);
-		abort();
+	c = ec_node_complete_strvec(tk, vec);
+	if (c == NULL) {
+		ret = -1;
+		goto out;
 	}
 
-	TAILQ_REMOVE(&debug_alloc_hdr_list, hdr, next);
-	free(hdr);
-}
+	/* for each expected completion, check it is there */
+	for (s = va_arg(ap, const char *);
+	     s != EC_NODE_ENDLIST;
+	     s = va_arg(ap, const char *)) {
+		struct ec_completed_iter *iter;
+		const struct ec_completed_item *item;
 
-void *debug_realloc(void *ptr, size_t size, const char *file, unsigned int line)
-{
-	struct debug_alloc_hdr *hdr = (ptr - sizeof(*hdr));
-	struct debug_alloc_hdr *h;
-	size_t new_size = size + sizeof(*hdr) + sizeof(unsigned int);
-	void *ret;
-
-	if (ptr != NULL) {
-		if (hdr->cookie != 0x12345678) {
-			printf("%s:%d: error: realloc(%p): bad start cookie\n",
-				file, line, ptr);
-			abort();
+		if (s == NULL) {
+			ret = -1;
+			goto out;
 		}
 
-		TAILQ_FOREACH(h, &debug_alloc_hdr_list, next) {
-			if (h == hdr)
-				break;
-		}
+		count++;
 
-		if (h == NULL) {
-			printf("%s:%d: error: realloc(%p): bad ptr\n",
-				file, line, ptr);
-			abort();
+		/* only check matching completions */
+		iter = ec_completed_iter(c, EC_MATCH);
+		while ((item = ec_completed_iter_next(iter)) != NULL) {
+			if (item->str != NULL && strcmp(item->str, s) == 0)
+				break;
 		}
 
-		TAILQ_REMOVE(&debug_alloc_hdr_list, h, next);
-		hdr = realloc(hdr, new_size);
-		if (hdr == NULL) {
-			TAILQ_INSERT_TAIL(&debug_alloc_hdr_list, h, next);
-			ret = NULL;
-		} else {
-			ret = hdr + 1;
+		if (item == NULL) {
+			ec_log(EC_LOG_ERR,
+				"completion <%s> not in list\n", s);
+			ret = -1;
 		}
-	} else {
-		hdr = realloc(NULL, new_size);
-		if (hdr == NULL)
-			ret = NULL;
-		else
-			ret= hdr + 1;
-	}
-
-	if (hdr != NULL) {
-		hdr->file = file;
-		hdr->line = line;
-		hdr->size = size;
-		hdr->cookie = 0x12345678;
-		TAILQ_INSERT_TAIL(&debug_alloc_hdr_list, hdr, next);
+		ec_completed_iter_free(iter);
 	}
 
-	printf("%s:%d: info: realloc(%p, %zd) -> %p\n",
-		file, line, ptr, size, ret);
-
+	/* check if we have more completions (or less) than expected */
+	if (count != ec_completed_count(c, EC_MATCH)) {
+		ec_log(EC_LOG_ERR,
+			"nb_completion (%d) does not match (%d)\n",
+			count, ec_completed_count(c, EC_MATCH));
+		ec_completed_dump(stdout, c);
+		ret = -1;
+	} else
+		ec_completed_dump(stdout, c); //XXX
+
+out:
+	ec_strvec_free(vec);
+	ec_completed_free(c);
+	va_end(ap);
 	return ret;
 }
 
-void debug_alloc_dump(void)
-{
-	struct debug_alloc_hdr *hdr;
-
-	TAILQ_FOREACH(hdr, &debug_alloc_hdr_list, next) {
-		printf("%s:%d: error: memory leak size=%zd ptr=%p\n",
-			hdr->file, hdr->line, hdr->size, hdr + 1);
-	}
-}
-
-/* int ec_test_check_tk_complete_list(const struct ec_tk *tk, */
-/*	const char *input, ...) */
-
-int ec_test_all(void)
+static int launch_test(const char *name)
 {
 	struct ec_test *test;
 	int ret = 0;
+	unsigned int count = 0;
 
-	TAILQ_INIT(&debug_alloc_hdr_list);
+	TAILQ_FOREACH(test, &test_list, next) {
+		if (name != NULL && strcmp(name, test->name))
+			continue;
 
-	/* register a new malloc to trac memleaks */
-	if (ec_malloc_register(debug_malloc, debug_free, debug_realloc) < 0) {
-		printf("cannot register new malloc\n");
-		return -1;
-	}
+		ec_log(EC_LOG_INFO, "== starting test %-20s\n", test->name);
 
-	TAILQ_FOREACH(test, &test_list, next) {
+		count++;
 		if (test->test() == 0) {
-			printf("== test %-20s success\n", test->name);
+			ec_log(EC_LOG_INFO, "== test %-20s success\n",
+				test->name);
 		} else {
-			printf("== test %-20s failed\n", test->name);
+			ec_log(EC_LOG_INFO, "== test %-20s failed\n",
+				test->name);
 			ret = -1;
 		}
 	}
 
-	ec_malloc_unregister();
-	debug_alloc_dump();
+	if (name != NULL && count == 0) {
+		ec_log(EC_LOG_WARNING, "== test %s not found\n", name);
+		ret = -1;
+	}
 
 	return ret;
 }
+
+int ec_test_all(void)
+{
+	return launch_test(NULL);
+}
+
+int ec_test_one(const char *name)
+{
+	return launch_test(name);
+}