#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);
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, 0);
- 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;
+
+ for (s = va_arg(ap, const char *);
+ s != EC_NODE_ENDLIST;
+ s = va_arg(ap, const char *)) {
+ if (s == NULL)
+ goto out;
+
+ if (ec_strvec_add(vec, s) < 0)
+ goto out;
+ }
- ec_parsed_tk_free(p);
+ 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;
+ } else {
+ ec_log(EC_LOG_ERR,
+ "tk parsed len (%d) does not match expected (%d)\n",
+ match, expected);
+ }
+ ec_parsed_free(p);
+
+out:
+ ec_strvec_free(vec);
+ va_end(ap);
return ret;
}
-int ec_test_check_tk_complete(const struct ec_tk *tk, const char *input,
- const char *expected)
+int ec_test_check_complete(struct ec_node *tk, ...)
{
- struct ec_completed_tk *p;
- const char *s;
- int ret = -1;
+ struct ec_completed *c = NULL;
+ struct ec_strvec *vec = NULL;
+ const char *s, *expected;
+ int ret = 0;
+ unsigned int count = 0;
+ va_list ap;
- p = ec_tk_complete(tk, input, 0);
- s = ec_completed_tk_smallest_start(p);
- if (s == NULL && expected == NULL)
- ret = 0;
- else if (s != NULL && expected != NULL &&
- !strcmp(s, expected))
- ret = 0;
+ va_start(ap, tk);
- 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);
+ /* build a string vector */
+ vec = ec_strvec();
+ if (vec == NULL)
+ goto out;
+
+ for (s = va_arg(ap, const char *);
+ s != EC_NODE_ENDLIST;
+ s = va_arg(ap, const char *)) {
+ if (s == NULL)
+ goto out;
+
+ if (ec_strvec_add(vec, s) < 0)
+ goto out;
+ }
+
+ c = ec_node_complete_strvec(tk, vec);
+ if (c == NULL) {
+ ret = -1;
+ goto out;
+ }
+
+ /* 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_match *item;
+
+ if (s == NULL) {
+ ret = -1;
+ goto out;
+ }
- ec_completed_tk_free(p);
+ count++;
+ /* only check matching completions */
+ iter = ec_completed_iter(c, EC_MATCH);
+ while ((item = ec_completed_iter_next(iter)) != NULL) {
+ if (item->add != NULL && strcmp(item->add, s) == 0)
+ break;
+ }
+
+ if (item == NULL) {
+ ec_log(EC_LOG_ERR,
+ "completion <%s> not in list\n", s);
+ ret = -1;
+ }
+ ec_completed_iter_free(iter);
+ }
+
+ /* 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
+
+ /* check the expected smallest start */
+ expected = va_arg(ap, const char *);
+ s = ec_completed_smallest_start(c);
+ if (strcmp(s, expected)) {
+ ret = -1;
+ ec_log(EC_LOG_ERR,
+ "should complete with <%s> but completes with <%s>\n",
+ expected, s);
+ }
+
+out:
+ ec_strvec_free(vec);
+ ec_completed_free(c);
+ va_end(ap);
return ret;
}
-/* 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;
-
- // XXX register a new malloc to trac memleaks
+ unsigned int count = 0;
TAILQ_FOREACH(test, &test_list, next) {
+ if (name != NULL && strcmp(name, test->name))
+ continue;
+
+ ec_log(EC_LOG_INFO, "== starting test %-20s\n", test->name);
+
+ 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;
}
}
+ 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);
+}