info_compiles.c 1.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970
  1. #include <tools/ccanlint/ccanlint.h>
  2. #include <tools/tools.h>
  3. #include <ccan/tal/grab_file/grab_file.h>
  4. #include <ccan/read_write_all/read_write_all.h>
  5. #include <ccan/str/str.h>
  6. #include <sys/types.h>
  7. #include <sys/stat.h>
  8. #include <fcntl.h>
  9. #include <unistd.h>
  10. #include <limits.h>
  11. #include <errno.h>
  12. #include <stdlib.h>
  13. #include <stdio.h>
  14. #include <err.h>
  15. #include <string.h>
  16. #include <ctype.h>
  17. static void check_info_compiles(struct manifest *m,
  18. unsigned int *timeleft, struct score *score)
  19. {
  20. char *info_c_file, *info, *output;
  21. int fd;
  22. /* We don't really fail if we're in safe mode: our dependencies
  23. * still run. */
  24. if (safe_mode) {
  25. score->pass = true;
  26. score->score = 0;
  27. return;
  28. }
  29. /* Copy it to a file with proper .c suffix. */
  30. info = grab_file(score, m->info_file->fullname);
  31. if (!info) {
  32. score_file_error(score, m->info_file, 0,
  33. "could not be read: %s", strerror(errno));
  34. return;
  35. }
  36. info_c_file = temp_file(info, ".c", "_info");
  37. fd = open(info_c_file, O_WRONLY|O_CREAT|O_EXCL, 0600);
  38. if (fd < 0 || !write_all(fd, info, tal_count(info)-1))
  39. err(1, "Copying _info file");
  40. if (close(fd) != 0)
  41. err(1, "Closing _info file");
  42. m->info_file->compiled[COMPILE_NORMAL] = temp_file(m, "", "info");
  43. if (!compile_and_link(score, info_c_file, find_ccan_dir(m->dir), "",
  44. compiler, cflags, "",
  45. m->info_file->compiled[COMPILE_NORMAL],
  46. &output)) {
  47. score_file_error(score, m->info_file, 0,
  48. "Errors compiling _info:\n%s", output);
  49. return;
  50. }
  51. score->pass = true;
  52. score->score = 1;
  53. }
  54. struct ccanlint info_compiles = {
  55. .key = "info_compiles",
  56. .name = "_info compiles",
  57. .check = check_info_compiles,
  58. .needs = "info_exists",
  59. .compulsory = true
  60. };
  61. REGISTER_TEST(info_compiles);