9 #include "ccan/tap/tap.h"
10 #include "ccan/talloc/talloc.h"
11 #include "ccan/str/str.h"
12 #include "ccan/array_size/array_size.h"
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,
24 void (*runfn)(const char *name);
30 struct test_type *type;
41 static char *output_name(const char *name)
45 assert(strends(name, ".c"));
47 ret = talloc_strdup(name, name);
48 ret[strlen(ret) - 2] = '\0';
52 static char *obj_list(void)
54 char *list = talloc_strdup(objs, "");
57 for (i = objs; i; i = i->next)
58 list = talloc_asprintf_append(list, "%s ", i->name);
61 list = talloc_asprintf_append(list, "ccan/tap/tap.o");
65 static void compile_objs(void)
69 for (i = objs; i; i = i->next) {
70 char *cmd = talloc_asprintf(i, "gcc " CFLAGS " -o %s.o -c %s%s",
71 output_name(i->name), i->name,
72 verbose ? "" : "> /dev/null 2>&1");
73 ok(system(cmd) == 0, "%s", cmd);
77 static void cleanup_objs(void)
81 for (i = objs; i; i = i->next) {
84 unlink(talloc_asprintf(i, "%s.o", output_name(i->name)));
88 static void add_test(const char *testdir, const char *name, struct test_type *t)
90 struct test *test = talloc(testdir, struct test);
94 test->name = talloc_asprintf(test, "%s/%s", testdir, name);
98 static void add_obj(const char *testdir, const char *name, bool generate)
100 struct obj *obj = talloc(testdir, struct obj);
103 obj->name = talloc_asprintf(obj, "%s/%s", testdir, name);
104 obj->generate = generate;
108 static int build(const char *dir, const char *name, const char *apiobj,
114 cmd = talloc_asprintf(name, "gcc " CFLAGS " %s -o %s %s %s %s %s",
115 fail ? "-DFAIL" : "",
116 output_name(name), name, apiobj, obj_list(),
117 verbose ? "" : "> /dev/null 2>&1");
120 fprintf(stderr, "Running %s\n", cmd);
124 diag("cmd '%s' failed to execute", cmd);
129 static void compile_ok(const char *dir, struct test_type *t, const char *name,
132 ok(build(dir, name, "", 0) == 0, "%s %s", t->name, name);
135 /* api tests get the API obj linked in as well. */
136 static void compile_api_ok(const char *dir, struct test_type *t,
137 const char *name, const char *apiobj)
139 ok(build(dir, name, apiobj, 0) == 0, "%s %s", t->name, name);
142 static void compile_fail(const char *dir, struct test_type *t, const char *name,
145 if (build(dir, name, "", 0) != 0)
146 fail("non-FAIL build %s", name);
148 ok(build(dir, name, "", 1) > 0, "%s %s", t->name, name);
151 static void no_run(const char *name)
155 static void run(const char *name)
157 if (system(output_name(name)) != 0)
158 fail("running %s had error", name);
161 static void cleanup(const char *name)
163 unlink(output_name(name));
166 static struct test_type test_types[] = {
167 { "compile_ok", compile_ok, no_run },
168 { "compile_fail", compile_fail, no_run },
169 { "run", compile_ok, run },
170 { "api", compile_api_ok, run },
173 int main(int argc, char *argv[])
178 const char *apiobj = "";
180 unsigned int num_tests = 0, num_objs = 0, i;
182 if (argc > 1 && streq(argv[1], "--verbose")) {
188 if (argc > 1 && strstarts(argv[1], "--apiobj=")) {
189 apiobj = argv[1] + strlen("--apiobj=");
195 errx(1, "Usage: run_tests [--verbose] [--apiobj=<obj>] <dir> [<extra-objs>...]");
197 testdir = talloc_asprintf(NULL, "%s/test", argv[1]);
198 dir = opendir(testdir);
200 err(1, "Opening '%s'", testdir);
202 while ((d = readdir(dir)) != NULL) {
203 if (d->d_name[0] == '.' || !strends(d->d_name, ".c"))
206 for (i = 0; i < ARRAY_SIZE(test_types); i++) {
207 if (strstarts(d->d_name, test_types[i].name)) {
208 add_test(testdir, d->d_name, &test_types[i]);
213 if (i == ARRAY_SIZE(test_types)) {
214 add_obj(testdir, d->d_name, true);
219 plan_tests(num_tests + num_objs + (num_objs ? 1 : 0));
220 /* First all the extra object compilations. */
223 /* Now add any object files from the command line */
224 cwd = talloc_strdup(testdir, ".");
225 for (i = 2; i < argc; i++)
226 add_obj(cwd, argv[i], false);
228 /* Do all the test compilations. */
229 for (test = tests; test; test = test->next)
230 test->type->buildfn(argv[1], test->type, test->name, apiobj);
234 /* Now run all the ones which wanted to run. */
235 for (test = tests; test; test = test->next) {
236 test->type->runfn(test->name);