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
|
/* List files in a module, or modules. */
#include <ccan/opt/opt.h>
#include <ccan/foreach/foreach.h>
#include <ccan/tal/str/str.h>
#include "manifest.h"
#include <stdio.h>
static void add_file(const struct ccan_file *f,
bool fullpath, bool nul_term, bool gitonly)
{
/* Hacky way of seeing if git knows about this. */
if (gitonly) {
char *cmd = tal_fmt(f, "git status --porcelain --ignored %s | grep -q '^ *[!?]'", f->fullname);
if (system(cmd) == 0)
return;
}
printf("%s%c", fullpath ? f->fullname : f->name,
nul_term ? '\0' : '\n');
}
int main(int argc, char *argv[])
{
bool code = true;
bool license = true;
bool tests = true;
bool other = true;
bool info = true;
bool gitonly = false;
bool nul_term = false;
bool fullpath = false;
int i;
opt_register_noarg("--no-code", opt_set_invbool, &code,
"Don't list .c and .h files");
opt_register_noarg("--no-license", opt_set_invbool, &license,
"Don't list license file");
opt_register_noarg("--no-info", opt_set_invbool, &info,
"Don't list _info file");
opt_register_noarg("--no-tests", opt_set_invbool, &tests,
"Don't list test files");
opt_register_noarg("--no-other", opt_set_invbool, &other,
"Don't list other files");
opt_register_noarg("--git-only", opt_set_bool, &gitonly,
"Only include files in git");
opt_register_noarg("--fullpath", opt_set_bool, &fullpath,
"Print full path names instead of module-relative ones");
opt_register_noarg("--null|-0", opt_set_bool, &nul_term,
"Separate files with nul character instead of \\n");
opt_register_noarg("-h|--help", opt_usage_and_exit,
"<moduledir>...",
"Show usage");
opt_parse(&argc, argv, opt_log_stderr_exit);
if (argc < 2)
opt_usage_exit_fail("Expected one or more module directories");
for (i = 1; i < argc; i++) {
struct manifest *m = get_manifest(NULL, argv[i]);
struct list_head *list;
struct ccan_file *f;
if (info)
add_file(m->info_file, fullpath, nul_term, gitonly);
if (code) {
foreach_ptr(list, &m->c_files, &m->h_files) {
list_for_each(list, f, list)
add_file(f, fullpath, nul_term, gitonly);
}
}
if (license) {
list_for_each(&m->other_files, f, list) {
if (streq(f->name, "LICENSE"))
add_file(f, fullpath, nul_term, gitonly);
}
}
if (tests) {
foreach_ptr(list, &m->run_tests, &m->api_tests,
&m->compile_ok_tests, &m->compile_fail_tests,
&m->other_test_c_files,
&m->other_test_files) {
list_for_each(list, f, list)
add_file(f, fullpath, nul_term, gitonly);
}
}
if (other) {
list_for_each(&m->other_files, f, list) {
if (!streq(f->name, "LICENSE"))
add_file(f, fullpath, nul_term, gitonly);
}
}
}
return 0;
}
|
