2015-02-18 00:57:37 +00:00
|
|
|
// A simple test harness. To create new tests define functions starting with
|
|
|
|
// 'test_'. To run all tests so defined, run:
|
|
|
|
// $ wart test
|
|
|
|
//
|
|
|
|
// So far it seems tasteful for layers to never ever reach back to modify
|
|
|
|
// previously-defined tests. Every test is a contract once written, and should
|
|
|
|
// pass as-is if it is included, regardless of how much later layers change
|
|
|
|
// the program. Avoid writing 'temporary' tests that only work with some
|
|
|
|
// subsets of the program.
|
|
|
|
|
|
|
|
:(before "End Types")
|
|
|
|
typedef void (*test_fn)(void);
|
|
|
|
|
|
|
|
:(before "End Globals")
|
|
|
|
const test_fn Tests[] = {
|
|
|
|
#include "test_list" // auto-generated; see makefile
|
|
|
|
};
|
|
|
|
|
|
|
|
bool Passed = true;
|
|
|
|
|
|
|
|
long Num_failures = 0;
|
|
|
|
|
|
|
|
#define CHECK(X) \
|
|
|
|
if (!(X)) { \
|
|
|
|
++Num_failures; \
|
|
|
|
cerr << "\nF " << __FUNCTION__ << "(" << __FILE__ << ":" << __LINE__ << "): " << #X << '\n'; \
|
|
|
|
Passed = false; \
|
|
|
|
return; \
|
|
|
|
}
|
|
|
|
|
|
|
|
#define CHECK_EQ(X, Y) \
|
|
|
|
if ((X) != (Y)) { \
|
|
|
|
++Num_failures; \
|
|
|
|
cerr << "\nF " << __FUNCTION__ << "(" << __FILE__ << ":" << __LINE__ << "): " << #X << " == " << #Y << '\n'; \
|
|
|
|
cerr << " got " << (X) << '\n'; /* BEWARE: multiple eval */ \
|
|
|
|
Passed = false; \
|
|
|
|
return; \
|
|
|
|
}
|
|
|
|
|
2015-03-15 05:17:37 +00:00
|
|
|
:(before "End Main")
|
2015-03-17 16:08:09 +00:00
|
|
|
if (argc == 2 && is_equal(argv[1], "test")) {
|
2015-03-15 05:17:37 +00:00
|
|
|
run_tests();
|
2015-03-17 16:08:09 +00:00
|
|
|
cerr << '\n';
|
|
|
|
if (Num_failures > 0)
|
|
|
|
cerr << Num_failures << " failure"
|
|
|
|
<< (Num_failures > 1 ? "s" : "")
|
|
|
|
<< '\n';
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
// pass in a set of line numbers in test_file to run just those tests
|
|
|
|
if (argc > 2 && is_equal(argv[1], "test")) {
|
|
|
|
for (int i = 2; i < argc; ++i) {
|
|
|
|
run_test(to_int(argv[i])-1);
|
|
|
|
}
|
|
|
|
cerr << '\n';
|
|
|
|
if (Num_failures > 0)
|
|
|
|
cerr << Num_failures << " failure"
|
|
|
|
<< (Num_failures > 1 ? "s" : "")
|
|
|
|
<< '\n';
|
2015-03-15 05:17:37 +00:00
|
|
|
return 0;
|
|
|
|
}
|
2015-02-18 00:57:37 +00:00
|
|
|
|
|
|
|
:(code)
|
|
|
|
void run_tests() {
|
|
|
|
time_t t; time(&t);
|
|
|
|
cerr << "C tests: " << ctime(&t);
|
2015-04-22 17:09:09 +00:00
|
|
|
for (size_t i=0; i < sizeof(Tests)/sizeof(Tests[0]); ++i) {
|
2015-03-17 16:08:09 +00:00
|
|
|
run_test(i);
|
2015-02-18 00:57:37 +00:00
|
|
|
}
|
2015-04-06 19:02:38 +00:00
|
|
|
// End Tests
|
2015-03-17 16:08:09 +00:00
|
|
|
}
|
2015-02-18 00:57:37 +00:00
|
|
|
|
2015-04-22 17:09:09 +00:00
|
|
|
void run_test(size_t i) {
|
|
|
|
if (i >= sizeof(Tests)/sizeof(Tests[0])) {
|
|
|
|
cerr << "no test " << i << '\n';
|
|
|
|
return;
|
|
|
|
}
|
2015-03-17 16:08:09 +00:00
|
|
|
setup();
|
|
|
|
// End Test Setup
|
|
|
|
(*Tests[i])();
|
|
|
|
if (Passed) cerr << ".";
|
|
|
|
// Test Teardown
|
|
|
|
// End Test Teardown
|
2015-02-18 00:57:37 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
bool is_equal(char* s, const char* lit) {
|
|
|
|
return strncmp(s, lit, strlen(lit)) == 0;
|
|
|
|
}
|
|
|
|
|
2015-03-17 16:08:09 +00:00
|
|
|
int to_int(string n) {
|
|
|
|
char* end = NULL;
|
|
|
|
int result = strtol(n.c_str(), &end, /*any base*/0);
|
|
|
|
assert(*end == '\0');
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
2015-02-18 00:57:37 +00:00
|
|
|
:(before "End Includes")
|
2015-04-06 19:21:18 +00:00
|
|
|
#include<assert.h>
|
|
|
|
#include<cstdlib>
|
|
|
|
|
2015-02-18 00:57:37 +00:00
|
|
|
#include<iostream>
|
|
|
|
using std::istream;
|
|
|
|
using std::ostream;
|
|
|
|
using std::iostream;
|
|
|
|
using std::cin;
|
|
|
|
using std::cout;
|
|
|
|
using std::cerr;
|
|
|
|
|
|
|
|
#include<cstring>
|
2015-04-06 19:21:18 +00:00
|
|
|
#include<string>
|
|
|
|
using std::string;
|
|
|
|
#define NOT_FOUND string::npos // macro doesn't complain about redef
|