105 lines
2.0 KiB
C
105 lines
2.0 KiB
C
// 19 january 2020
|
|
#include "test.h"
|
|
|
|
// Do not put any test cases in this file; they will not be run.
|
|
|
|
struct test {
|
|
const char *name;
|
|
void (*f)(void);
|
|
};
|
|
|
|
static struct test *tests = NULL;
|
|
static size_t lenTests = 0;
|
|
static size_t capTests = 0;
|
|
|
|
void testingprivRegisterTest(const char *name, void (*f)(void))
|
|
{
|
|
if (lenTests == capTests) {
|
|
struct test *newtests;
|
|
|
|
capTests += 32;
|
|
newtests = (struct test *) realloc(tests, capTests * sizeof (struct test));
|
|
if (newtests == NULL) {
|
|
fprintf(stderr, "memory exhausted registering test %s\n", name);
|
|
exit(1);
|
|
}
|
|
tests = newtests;
|
|
}
|
|
tests[lenTests].name = name;
|
|
tests[lenTests].f = f;
|
|
lenTests++;
|
|
}
|
|
|
|
static int testcmp(const void *aa, const void *bb)
|
|
{
|
|
const struct test *a = (const struct test *) aa;
|
|
const struct test *b = (const struct test *) bb;
|
|
|
|
return strcmp(a->name, b->name);
|
|
}
|
|
|
|
static int testingprivRet = 0;
|
|
|
|
void TestFail(void)
|
|
{
|
|
testingprivRet = 1;
|
|
}
|
|
|
|
void TestFailNow(void)
|
|
{
|
|
exit(1);
|
|
}
|
|
|
|
void TestSkipNow(void)
|
|
{
|
|
// see https://mesonbuild.com/Unit-tests.html#skipped-tests-and-hard-errors
|
|
exit(77);
|
|
}
|
|
|
|
static const char *basename(const char *file)
|
|
{
|
|
const char *p;
|
|
|
|
for (;;) {
|
|
p = strpbrk(file, "/\\");
|
|
if (p == NULL)
|
|
break;
|
|
file = p + 1;
|
|
}
|
|
return file;
|
|
}
|
|
|
|
void testingprivLogfFullThen(FILE *f, void (*then)(void), const char *filename, long line, const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
fprintf(f, "%s:%ld: ", basename(filename), line);
|
|
vfprintf(f, fmt, ap);
|
|
fprintf(f, "\n");
|
|
va_end(ap);
|
|
if (then != NULL)
|
|
(*then)();
|
|
}
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
struct test *t;
|
|
struct test want;
|
|
|
|
if (argc != 2) {
|
|
fprintf(stderr, "usage: %s TestName\n", argv[0]);
|
|
return 1;
|
|
}
|
|
qsort(tests, lenTests, sizeof (struct test), testcmp);
|
|
want.name = argv[1];
|
|
t = (struct test *) bsearch(&want, tests, lenTests, sizeof (struct test), testcmp);
|
|
if (t == NULL) {
|
|
fprintf(stderr, "%s: no such test\n", argv[1]);
|
|
return 1;
|
|
}
|
|
testingprivRet = 0;
|
|
(*(t->f))();
|
|
return testingprivRet;
|
|
}
|