1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
#include <tools/ccanlint/ccanlint.h>
#include <tools/tools.h>
#include <ccan/str/str.h>
#include <ccan/take/take.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 (safe_mode)
return "Safe mode enabled";
return NULL;
}
static char *obj_list(const struct manifest *m)
{
char *list;
struct manifest *i;
if (m->compiled[COMPILE_NORMAL])
list = tal_strdup(m, m->compiled[COMPILE_NORMAL]);
else
list = tal_strdup(m, "");
/* Other CCAN deps. */
list_for_each(&m->deps, i, list) {
if (!i->compiled[COMPILE_NORMAL])
continue;
list = tal_strcat(m, take(list), " ");
list = tal_strcat(m, take(list), i->compiled[COMPILE_NORMAL]);
}
return list;
}
static char *cflags_list(const struct manifest *m)
{
unsigned int i;
char *ret = tal_strdup(m, cflags);
char **flags = get_cflags(m, m->dir, get_or_compile_info);
for (i = 0; flags[i]; i++)
tal_append_fmt(&ret, " %s", flags[i]);
return ret;
}
static char *lib_list(const struct manifest *m)
{
unsigned int i;
char **libs;
char *ret = tal_strdup(m, "");
libs = get_libs(m, m->dir, "depends", get_or_compile_info);
for (i = 0; libs[i]; i++)
tal_append_fmt(&ret, "-l%s ", libs[i]);
return ret;
}
static void check_use_build(struct manifest *m,
unsigned int *timeleft, struct score *score)
{
char *contents;
char *tmpfile, *cmdout;
int fd;
char *flags;
tmpfile = temp_file(m, ".c", "example.c");
fd = open(tmpfile, O_WRONLY | O_CREAT | O_EXCL, 0600);
if (fd < 0)
err(1, "Creating temporary file %s", tmpfile);
contents = tal_fmt(tmpfile,
"#include <ccan/%s/%s.h>\n"
"int main(void)\n"
"{\n"
" return 0;\n"
"}\n",
m->modname, m->basename);
if (write(fd, contents, strlen(contents)) != strlen(contents))
err(1, "Failure writing to temporary file %s", tmpfile);
close(fd);
flags = cflags_list(m);
if (compile_and_link(score, tmpfile, ccan_dir, obj_list(m),
compiler, flags, lib_list(m),
temp_file(m, "", tmpfile),
&cmdout)) {
score->pass = true;
score->score = score->total;
} else {
score->error = cmdout;
}
}
struct ccanlint module_links = {
.key = "module_links",
.name = "Module can be linked against trivial program",
.check = check_use_build,
.can_run = can_build,
.needs = "module_builds depends_build"
};
REGISTER_TEST(module_links);
|
