git.ozlabs.org Git - ccan/blob - tools/ccanlint/tests/main_header_compiles.c

   1 #include <tools/ccanlint/ccanlint.h>
   2 #include <tools/tools.h>
   3 #include <ccan/str/str.h>
   4 #include <sys/types.h>
   5 #include <sys/stat.h>
   6 #include <fcntl.h>
   7 #include <unistd.h>
   8 #include <limits.h>
   9 #include <errno.h>
  10 #include <stdlib.h>
  11 #include <stdio.h>
  12 #include <err.h>
  13 #include <string.h>
  14 #include <ctype.h>
  15
  16 static const char *can_build(struct manifest *m UNNEEDED)
  17 {
  18         if (safe_mode)
  19                 return "Safe mode enabled";
  20         return NULL;
  21 }
  22
  23 static struct ccan_file *main_header(struct manifest *m)
  24 {
  25         struct ccan_file *f;
  26
  27         list_for_each(&m->h_files, f, list) {
  28                 if (strstarts(f->name, m->basename)
  29                     && strlen(f->name) == strlen(m->basename) + 2)
  30                         return f;
  31         }
  32         /* Should not happen: we depend on has_main_header */
  33         abort();
  34 }
  35
  36 static void check_includes_build(struct manifest *m,
  37                                  unsigned int *timeleft UNNEEDED,
  38                                  struct score *score)
  39 {
  40         char *contents;
  41         char *tmpsrc, *tmpobj, *cmdout;
  42         int fd;
  43         struct ccan_file *mainh = main_header(m);
  44
  45         tmpsrc = temp_file(m, "-included.c", mainh->fullname);
  46         tmpobj = temp_file(m, ".o", tmpsrc);
  47
  48         fd = open(tmpsrc, O_WRONLY | O_CREAT | O_EXCL, 0600);
  49         if (fd < 0)
  50                 err(1, "Creating temporary file %s", tmpsrc);
  51
  52         contents = tal_fmt(tmpsrc, "#include <ccan/%s/%s.h>\n",
  53                            m->modname, m->basename);
  54         if (write(fd, contents, strlen(contents)) != strlen(contents))
  55                 err(1, "writing to temporary file %s", tmpsrc);
  56         close(fd);
  57
  58         if (compile_object(score, tmpsrc, ccan_dir, compiler, cflags,
  59                            tmpobj, &cmdout)) {
  60                 score->pass = true;
  61                 score->score = score->total;
  62         } else {
  63                 score->error = tal_fmt(score,
  64                                        "#include of the main header file:\n%s",
  65                                        cmdout);
  66         }
  67 }
  68
  69 struct ccanlint main_header_compiles = {
  70         .key = "main_header_compiles",
  71         .name = "Modules main header compiles",
  72         .check = check_includes_build,
  73         .can_run = can_build,
  74         .needs = "depends_exist main_header_exists info_ported"
  75 };
  76
  77 REGISTER_TEST(main_header_compiles);