7 #include "ccan/tap/tap.h"
8 #include "ccan/talloc/talloc.h"
9 #include "ccan/str/str.h"
12 /* FIXME: Use build bug later. */
13 #define ARRAY_SIZE(arr) (sizeof(arr) / sizeof((arr)[0]))
15 static struct test *tests = NULL;
16 static struct obj *objs = NULL;
22 void (*buildfn)(const char *dir, struct test_type *t, const char *name);
23 void (*runfn)(const char *name);
29 struct test_type *type;
39 static char *output_name(const char *name)
43 assert(strends(name, ".c"));
45 ret = talloc_strdup(name, name);
46 ret[strlen(ret) - 2] = '\0';
50 static char *obj_list(void)
52 char *list = talloc_strdup(objs, "");
55 for (i = objs; i; i = i->next)
56 list = talloc_asprintf_append(list, "%s ", i->name);
59 list = talloc_asprintf_append(list, "ccan/tap/tap.o");
63 static void compile_objs(void)
67 for (i = objs; i; i = i->next) {
68 char *cmd = talloc_asprintf(i, "gcc " CFLAGS " -o %s.o -c %s%s",
69 output_name(i->name), i->name,
70 verbose ? "" : "> /dev/null 2>&1");
71 ok(system(cmd) == 0, "%s", cmd);
75 static void cleanup_objs(void)
79 for (i = objs; i; i = i->next)
80 unlink(talloc_asprintf(i, "%s.o", output_name(i->name)));
83 static void add_test(const char *testdir, const char *name, struct test_type *t)
85 struct test *test = talloc(testdir, struct test);
89 test->name = talloc_asprintf(test, "%s/%s", testdir, name);
93 static void add_obj(const char *testdir, const char *name)
95 struct obj *obj = talloc(testdir, struct obj);
98 obj->name = talloc_asprintf(obj, "%s/%s", testdir, name);
102 static int build(const char *dir, const char *name, int fail)
106 char *externals = talloc_strdup(name, "");
109 for (deps = get_deps(talloc_autofree_context(), dir, true); *deps; deps++) {
110 if (!strstarts(*deps, "ccan/"))
113 /* ccan/foo -> ccan/foo.o */
114 externals = talloc_asprintf_append(externals, " %s.o", *deps);
117 cmd = talloc_asprintf(name, "gcc " CFLAGS " %s -o %s %s %s%s%s",
118 fail ? "-DFAIL" : "",
119 output_name(name), name, obj_list(), externals,
120 verbose ? "" : "> /dev/null 2>&1");
123 fprintf(stderr, "Running %s\n", cmd);
127 diag("cmd '%s' failed to execute", cmd);
132 static void compile_ok(const char *dir, struct test_type *t, const char *name)
134 ok(build(dir, name, 0) == 0, "%s %s", t->name, name);
137 static void compile_fail(const char *dir, struct test_type *t, const char *name)
139 if (build(dir, name, 0) != 0)
140 fail("non-FAIL build %s", name);
142 ok(build(dir, name, 1) > 0, "%s %s", t->name, name);
145 static void no_run(const char *name)
149 static void run(const char *name)
151 if (system(output_name(name)) == -1)
152 fail("running %s had error %m", name);
155 static void cleanup(const char *name)
157 unlink(output_name(name));
160 static struct test_type test_types[] = {
161 { "compile_ok", compile_ok, no_run },
162 { "compile_fail", compile_fail, no_run },
163 { "run", compile_ok, run },
164 { "api", compile_ok, run },
167 int main(int argc, char *argv[])
173 unsigned int num_tests = 0, num_objs = 0;
175 if (argc > 1 && streq(argv[1], "--verbose")) {
182 errx(1, "Usage: run_tests [--verbose] <dir>");
184 testdir = talloc_asprintf(NULL, "%s/test", argv[1]);
185 dir = opendir(testdir);
187 err(1, "Opening '%s'", testdir);
189 while ((d = readdir(dir)) != NULL) {
191 if (d->d_name[0] == '.' || !strends(d->d_name, ".c"))
194 for (i = 0; i < ARRAY_SIZE(test_types); i++) {
195 if (strstarts(d->d_name, test_types[i].name)) {
196 add_test(testdir, d->d_name, &test_types[i]);
201 if (i == ARRAY_SIZE(test_types)) {
202 add_obj(testdir, d->d_name);
207 plan_tests(num_tests + num_objs + (num_objs ? 1 : 0));
208 /* First all the extra object compilations. */
211 /* Do all the test compilations. */
212 for (test = tests; test; test = test->next)
213 test->type->buildfn(argv[1], test->type, test->name);
217 /* Now run all the ones which wanted to run. */
218 for (test = tests; test; test = test->next) {
219 test->type->runfn(test->name);