1 #include <ccan/tap/tap.h>
8 /* Ensure width is sane. */
9 static const char *getenv_override(const char *name)
14 #define getenv getenv_override
16 #include <ccan/opt/opt.c>
17 #include <ccan/opt/usage.c>
18 #include <ccan/opt/helpers.c>
19 #include <ccan/opt/parse.c>
21 static char *my_cb(void *p)
27 int main(int argc, char *argv[])
30 char *longname = strdup("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa");
31 char *shortname = strdup("shortname");
34 opt_register_table(subtables, NULL);
35 opt_register_noarg("--kkk|-k", my_cb, NULL, "magic kkk option");
36 opt_register_noarg("-?", opt_usage_and_exit, "<MyArgs>...",
38 opt_register_arg("--longname", opt_set_charp, opt_show_charp,
39 &longname, "a really long option default");
40 opt_register_arg("--shortname", opt_set_charp, opt_show_charp,
41 &shortname, "a short option default");
42 output = opt_usage("my name", "ExTrA Args");
44 ok1(strstr(output, "Usage: my name"));
45 ok1(strstr(output, "--jjj|-j|--lll|-l <arg>"));
46 ok1(strstr(output, "ExTrA Args"));
47 ok1(strstr(output, "-a "));
48 ok1(strstr(output, " Description of a\n"));
49 ok1(strstr(output, "-b <arg>"));
50 ok1(strstr(output, " Description of b (default: b)\n"));
51 ok1(strstr(output, "--ddd "));
52 ok1(strstr(output, " Description of ddd\n"));
53 ok1(strstr(output, "--eee <filename> "));
54 ok1(strstr(output, " (default: eee)\n"));
55 ok1(strstr(output, "long table options:\n"));
56 ok1(strstr(output, "--ggg|-g "));
57 ok1(strstr(output, " Description of ggg\n"));
58 ok1(strstr(output, "-h|--hhh <arg>"));
59 ok1(strstr(output, " Description of hhh\n"));
60 ok1(strstr(output, "--kkk|-k"));
61 ok1(strstr(output, "magic kkk option"));
62 /* This entry is hidden. */
63 ok1(!strstr(output, "--mmm|-m"));
66 /* NULL should use string from registered options. */
67 output = opt_usage("my name", NULL);
69 ok1(strstr(output, "Usage: my name"));
70 ok1(strstr(output, "--jjj|-j|--lll|-l <arg>"));
71 ok1(strstr(output, "<MyArgs>..."));
72 ok1(strstr(output, "-a "));
73 ok1(strstr(output, " Description of a\n"));
74 ok1(strstr(output, "-b <arg>"));
75 ok1(strstr(output, " Description of b (default: b)\n"));
76 ok1(strstr(output, "--ddd "));
77 ok1(strstr(output, " Description of ddd\n"));
78 ok1(strstr(output, "--eee <filename> "));
79 ok1(strstr(output, " (default: eee)\n"));
80 ok1(strstr(output, "long table options:\n"));
81 ok1(strstr(output, "--ggg|-g "));
82 ok1(strstr(output, " Description of ggg\n"));
83 ok1(strstr(output, "-h|--hhh <arg>"));
84 ok1(strstr(output, " Description of hhh\n"));
85 ok1(strstr(output, "--kkk|-k"));
86 ok1(strstr(output, "magic kkk option"));
87 ok1(strstr(output, "--longname"));
88 ok1(strstr(output, "a really long option default"));
89 ok1(strstr(output, "(default: \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\"...)"));
90 ok1(strstr(output, "--shortname"));
91 ok1(strstr(output, "a short option default"));
92 ok1(strstr(output, "(default: \"shortname\")"));
93 /* This entry is hidden. */
94 ok1(!strstr(output, "--mmm|-m"));
98 /* Empty table test. */
99 output = opt_usage("nothing", NULL);
100 ok1(strstr(output, "Usage: nothing \n"));
104 opt_register_noarg("--aaa", test_noarg, NULL, "AAAAll");
105 output = opt_usage("onearg", NULL);
106 ok1(strstr(output, "Usage: onearg \n"));
107 ok1(strstr(output, "--aaa"));
108 ok1(strstr(output, "AAAAll"));
113 return exit_status();