Broaden use of doc_extract code, put in ccanlint, and fix ccanlint
[ccan] / tools / ccanlint / has_tests.c
1 #include "ccanlint.h"
2 #include <sys/types.h>
3 #include <sys/stat.h>
4 #include <fcntl.h>
5 #include <unistd.h>
6 #include <limits.h>
7 #include <errno.h>
8 #include <stdlib.h>
9 #include <stdio.h>
10 #include <err.h>
11 #include <ccan/talloc/talloc.h>
12
13 static char test_is_not_dir[] = "test is not a directory";
14
15 static void *check_has_tests(struct manifest *m)
16 {
17         struct stat st;
18
19         if (lstat("test", &st) != 0) {
20                 if (errno != ENOENT)
21                         err(1, "statting test/");
22                 return "You have no test directory";
23         }
24
25         if (!S_ISDIR(st.st_mode))
26                 return test_is_not_dir;
27
28         if (list_empty(&m->run_tests) && list_empty(&m->compile_ok_tests)) {
29                 if (list_empty(&m->compile_fail_tests)) 
30                         return "You have no tests in the test directory";
31                 else
32                         return "You have no positive tests in the test directory";
33         }
34         return NULL;
35 }
36
37 static const char *describe_has_tests(struct manifest *m, void *check_result)
38 {
39         return talloc_asprintf(m, "%s\n\n"
40         "CCAN modules have a directory called test/ which contains tests.\n"
41         "There are three kinds of tests: run, compile_ok and compile_fail:\n"
42         "you can tell which type of test a C file is by its name, eg 'run.c'\n"
43         "and 'run-simple.c' are both run tests.\n\n"
44         "The simplest kind of test is a run test, which must compile with no\n"
45         "warnings, and then run: it is expected to use libtap to report its\n"
46         "results in a simple and portable format.\n"
47         "compile_ok tests are a subset of run tests: they must compile and\n"
48         "link, but aren't run.\n"
49         "compile_fail tests are tests which should fail to compile (or emit\n"
50         "warnings) or link when FAIL is defined, but should compile and link\n"
51         "when it's not defined: this helps ensure unrelated errors don't make\n"
52         "compilation fail.\n\n"
53         "Note that the tests are not linked against the files in the\n"
54         "above: you should directly #include those C files you want.  This\n"
55         "allows access to static functions and use special effects inside\n"
56         "test files\n", (char *)check_result);
57 }
58
59 static void handle_no_tests(struct manifest *m, void *check_result)
60 {
61         FILE *run;
62         struct ccan_file *i;
63
64         if (check_result == test_is_not_dir)
65                 return;
66
67         if (!ask("Should I create a template test/run.c file for you?"))
68                 return;
69
70         if (mkdir("test", 0600) != 0) {
71                 if (errno != EEXIST)
72                         err(1, "Creating test/ directory");
73         }
74
75         run = fopen("test/run.c", "w");
76         if (!run)
77                 err(1, "Trying to create a test/run.c");
78
79         fputs("/* Include the main header first, to test it works */\n", run);
80         fprintf(run, "#include \"%s/%s.h\"\n", m->basename, m->basename);
81         fputs("/* Include the C files directly. */\n", run);
82         list_for_each(&m->c_files, i, list)
83                 fprintf(run, "#include \"%s/%s\"\n", m->basename, i->name);
84         fputs("#include \"tap/tap.h\"\n", run);
85         fputs("\n", run);
86
87         fputs("int main(int argc, char *argv[])\n", run);
88         fputs("{\n", run);
89         fputs("\t/* This is how many tests you plan to run\n", run);
90         fputs("\tplan_tests(3);\n", run);
91         fputs("\n", run);
92         fputs("\t/* Simple thing we expect to succeed */\n", run);
93         fputs("\tok1(some_test())\n", run);
94         fputs("\t/* Same, with an explicit description of the test. */\n", run);
95         fputs("\tok(some_test(), \"%s with no args should return 1\", \"some_test\")\n", run);
96         fputs("\t/* How to print out messages for debugging. */\n", run);
97         fputs("\tdiag(\"Address of some_test is %p\", &some_test)\n", run);
98         fputs("\t/* Conditional tests must be explicitly skipped. */\n", run);
99         fputs("#if HAVE_SOME_FEATURE\n", run);
100         fputs("\tok1(test_some_feature())\n", run);
101         fputs("#else\n", run);
102         fputs("\tskip(1, \"Don\'t have SOME_FEATURE\")\n", run);
103         fputs("#endif\n", run);
104         fputs("\n", run);
105         fputs("\t/* This exits depending on whether all tests passed */\n", run);
106         fputs("\return exit_status()\n", run);
107
108         fclose(run);
109 }       
110
111 struct ccanlint has_tests = {
112         .name = "No tests",
113         .check = check_has_tests,
114         .describe = describe_has_tests,
115         .handle = handle_no_tests,
116 };