1 dnl Copyright © 2021 Nick Bowler
3 dnl License WTFPL2: Do What The Fuck You Want To Public License, version 2.
4 dnl This is free software: you are free to do what the fuck you want to.
5 dnl There is NO WARRANTY, to the extent permitted by law.
7 AT_BANNER([Script tests])
9 AT_SETUP([gen-options.awk])
11 AT_DATA([options.def],
14 --option-with-flagval (&x, 5)
17 --option-with-optional-arg[=OPTIONAL]
20 -a, --option-with-sopt
22 -b, --option-with-sopt-and-arg=SOPTARG
23 -c, --option-with-sopt-and-optional-arg[=SOPTOPTIONAL]
24 --option-with-arg-and-val=ARGVAL (42)
25 --option-with-arg-and-flagval=ARGFLAGVAL (&a[1], 'x')
26 --option-with-optional-arg-and-val[=OPTIONALARGVAL] (54)
27 --option-with-optional-arg-and-flagval[=OPTIONALFLAGVAL] (0, 0)
30 that has a line randomly indented
39 AT_CHECK([$AWK -f "$builddir/scripts/gen-options.awk" <options.def >options.h])
42 [[struct option { const char *name; int has_arg; int *flag; int val; };
48 [[#include "context.h"
51 static const char sopts[] = SOPT_STRING;
52 static const struct option opts[] = { LOPTS_INITIALIZER, {0} };
59 AT_CHECK([$CC -o test0$EXEEXT test0.c && ./test0$EXEEXT], [0], [], [ignore])
61 # test 1: long option names and help text
69 static const struct option opts[] = { LOPTS_INITIALIZER };
75 for (i = 0; i < sizeof opts / sizeof opts[0]; i++) {
76 struct lopt_help help = { "INVALID", "INVALID" };
78 if (!lopt_get_help(&opts[i], &help))
81 printf("--%s", opts[i].name);
83 printf("=%s", help.arg);
84 printf("\n%s", help.desc);
93 # pick out interesting bits from the definitions file
94 sed -n '/^-/s/^.*--\([[^\= @<:@]]*\).*$/\1/p' options.def >options
96 s/[[^=]]*\(=[[^@:>@ ]]*\).*$/\1/
100 }' options.def >argnames
102 AS_ECHO(["-"]) | sed -n '1s/^-.*//p
120 s/[[^\n]][[^\n]]*/\\"&\\"/g
125 ' options.def - >helptext
127 exec 3<options 4<argnames 5<helptext 6>expout
128 while read opt <&3 && read arg <&4 && read help <&5; do
129 if test ${arg:+y}; then
130 AS_ECHO(["--$opt=$arg"]) >&6
132 AS_ECHO(["--$opt"]) >&6
134 eval "set x $help"; shift
137 AS_ECHO(["$arg"]) >&6
140 exec 3<&- 4<&- 5<&- 6>&-
142 AT_CHECK([$CC -o test1$EXEEXT test1.c && ./test1$EXEEXT],
143 [0], [expout], [ignore])
145 # test 2: short option string
155 struct option lopts[] = {LOPTS_INITIALIZER};
158 for (i = 0; i < sizeof SOPT_STRING - 1; i++) {
159 if (SOPT_STRING[i] != ':') {
160 for (j = 0; j < sizeof lopts / sizeof lopts[0]; j++) {
161 if (lopts[j].val == SOPT_STRING[i]) {
162 printf("--%s ", lopts[j].name);
167 putchar(SOPT_STRING[i]);
168 if (SOPT_STRING[i+1] != ':')
177 s/^-\([[^-]]\)[[^:]]*/\1/p
179 }' options.def >sopts
181 exec 3<options 4<sopts 5>expout
182 while read lopt <&3 && read sopt <&4; do
183 if test ${sopt:+y}; then
184 AS_ECHO(["--$lopt $sopt"]) >&5
189 AT_CHECK([$CC -o test2$EXEEXT test2.c && ./test2$EXEEXT],
190 [0], [expout], [ignore])
192 # Check that all help strings are translatable
193 sed 's/\([[^\\]]\\\)" /\1\\n\\" /g' helptext >help-po
194 exec 3<options 4<argnames 5<help-po 6>expected.po
195 while read opt <&3 && read arg <&4 && read help <&5; do
196 if test ${arg:+y}; then
197 AS_ECHO(["msgctxt \"$opt\" msgid \"$arg\""]) >&6
199 AS_ECHO(["msgctxt \"$opt\" msgid${help:+ }$help"]) >&6
201 exec 3<&- 4<&- 5<&- 6>&-
203 AT_CHECK([xgettext --keyword=PN_:1c,2 options.h
204 test -f messages.po || exit 77])
206 LC_ALL=C sort expected.po >expout
207 AT_CHECK([sed -n '/^msgctxt/{
218 }' messages.po | LC_ALL=C sort], [0], [expout])
222 AT_SETUP([gen-strtab.awk])
247 AT_CHECK([$AWK -f "$builddir/scripts/gen-strtab.awk" <test.def >test.h])
249 sed -n 's/^[[&]]\([[^ ]]*\).*/\1/p' test.def >identifiers
251 # test 0: sanity test
260 exec 3<identifiers 4>>test0.c
261 while read ident <&3; do
262 AS_ECHO([' printf("%s\n---\n", '"strtab+$ident);"]) >&4
264 AS_ECHO([' return 0;']) >&4
268 AT_CHECK([$CC -o test0$EXEEXT test0.c && ./test0$EXEEXT], [0], [---