Build tests for ccan.

[ccan] / tools / ccanlint / tests / build_objs.c

diff --git a/tools/ccanlint/tests/build_objs.c b/tools/ccanlint/tests/build_objs.c
new file mode 100644 (file)
index 0000000..199772a
--- /dev/null
+++ b/tools/ccanlint/tests/build_objs.c
@@ -0,0 +1,82 @@
+#include <tools/ccanlint/ccanlint.h>
+#include <tools/tools.h>
+#include <ccan/talloc/talloc.h>
+#include <ccan/str/str.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <limits.h>
+#include <errno.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <err.h>
+#include <string.h>
+#include <ctype.h>
+
+static const char *can_build(struct manifest *m)
+{
+       if (list_empty(&m->c_files))
+               return "No C files in module";
+       if (safe_mode)
+               return "Safe mode enabled";
+       return NULL;
+}
+
+static bool compile_obj(struct ccan_file *c_file, char *objfile, char **report)
+{
+       char *contents;
+
+       contents = run_command(objfile, "cc " CFLAGS " -o %s -c %s",
+                              objfile, c_file->name);
+       if (contents) {
+               if (*report)
+                       *report = talloc_append_string(*report, contents);
+               else
+                       *report = contents;
+               return false;
+       }
+       return true;
+}
+
+static int cleanup_obj(char *objfile)
+{
+       unlink(objfile);
+       return 0;
+}
+
+static void *check_objs_build(struct manifest *m)
+{
+       char *report = NULL;
+       struct ccan_file *i;
+
+       /* One point for each obj file. */
+       build_objs.total_score = 0;
+       list_for_each(&m->c_files, i, list)
+               build_objs.total_score++;
+
+       list_for_each(&m->c_files, i, list) {
+               char *objfile = talloc_strdup(m, i->name);
+               objfile[strlen(objfile)-1] = 'o';
+
+               if (compile_obj(i, objfile, &report))
+                       talloc_set_destructor(objfile, cleanup_obj);
+       }
+       return report;
+}
+
+static const char *describe_objs_build(struct manifest *m, void *check_result)
+{
+       return talloc_asprintf(check_result, 
+                              "%s", (char *)check_result);
+}
+
+struct ccanlint build_objs = {
+       .name = "Module object files can be built",
+       .total_score = 1,
+       .check = check_objs_build,
+       .describe = describe_objs_build,
+       .can_run = can_build,
+};
+
+REGISTER_TEST(build_objs, &depends_exist, NULL);