tests/scripts.at

   1 dnl Copyright © 2021 Nick Bowler
   2 dnl
   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.
   6
   7 AT_BANNER([Script tests])
   8
   9 AT_SETUP([gen-options.awk])
  10
  11 AT_DATA([options.def],
  12 [[--option-only
  13 --option-with-val (5)
  14 --option-with-flagval (&x, 5)
  15 --option-with-arg=ARG
  16 some "text" goes here
  17 --option-with-optional-arg[=OPTIONAL]
  18
  19 hello
  20 -a, --option-with-sopt
  21
  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)
  28 --with-sopt
  29 Here is a help string
  30     that has a line randomly indented
  31 # with a comment
  32     @&t@
  33 and a blank line
  34 --with-arg=ARG
  35 do stuff with ARG
  36 --flagval
  37 ]])
  38
  39 AT_CHECK([$AWK -f "$builddir/scripts/gen-options.awk" <options.def >options.h])
  40
  41 AT_DATA([context.h],
  42 [[struct option { const char *name; int has_arg; int *flag; int val; };
  43 int x, a[5];
  44 ]])
  45
  46 # test 0: sanity test
  47 AT_DATA([test0.c],
  48 [[#include "context.h"
  49 #include "options.h"
  50
  51 static const char sopts[] = SOPT_STRING;
  52 static const struct option opts[] = { LOPTS_INITIALIZER, {0} };
  53
  54 int main(void)
  55 {
  56   return 0;
  57 }
  58 ]])
  59 AT_CHECK([$CC -o test0$EXEEXT test0.c && ./test0$EXEEXT], [0], [], [ignore])
  60
  61 # test 1: long option names and help text
  62 AT_DATA([test1.c],
  63 [[#include <stdio.h>
  64 #include <stdlib.h>
  65
  66 #include "context.h"
  67 #include "options.h"
  68
  69 static const struct option opts[] = { LOPTS_INITIALIZER };
  70
  71 int main(void)
  72 {
  73   unsigned i;
  74
  75   for (i = 0; i < sizeof opts / sizeof opts[0]; i++) {
  76     struct lopt_help help = { "INVALID", "INVALID" };
  77
  78     if (!lopt_get_help(&opts[i], &help))
  79       return EXIT_FAILURE;
  80
  81     printf("--%s", opts[i].name);
  82     if (opts[i].has_arg)
  83       printf("=%s", help.arg);
  84     printf("\n%s", help.desc);
  85     if (help.desc[0])
  86       putchar('\n');
  87   }
  88
  89   return 0;
  90 }
  91 ]])
  92
  93 # pick out interesting bits from the definitions file
  94 sed -n '/^-/s/^.*--\([[^\= @<:@]]*\).*$/\1/p' options.def >options
  95 sed -n '/^-/{
  96   s/[[^=]]*\(=[[^@:>@ ]]*\).*$/\1/
  97   s/^[[^=]].*//
  98   s/^=//
  99   p
 100 }' options.def >argnames
 101
 102 AS_ECHO(["-"]) | sed -n '1s/^-.*//p
 103 1,/^-/d
 104 t clear
 105 :clear
 106 s/^-.*//p
 107 t
 108 s/^#.*//
 109 s/^ *//
 110 t next
 111 :next
 112 N
 113 s/\n-.*//
 114 t done
 115 s/\n#.*//
 116 s/\n */\n/g
 117 t next
 118 :done
 119 s/"/\\\\"/g
 120 s/[[^\n]][[^\n]]*/\\"&\\"/g
 121 s/^\n*//
 122 s/\n*$//
 123 s/\n\n*/ /g
 124 p
 125 ' options.def - >helptext
 126
 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
 131   else
 132     AS_ECHO(["--$opt"]) >&6
 133   fi
 134   eval "set x $help"; shift
 135   for arg
 136   do
 137     AS_ECHO(["$arg"]) >&6
 138   done
 139 done
 140 exec 3<&- 4<&- 5<&- 6>&-
 141
 142 AT_CHECK([$CC -o test1$EXEEXT test1.c && ./test1$EXEEXT],
 143   [0], [expout], [ignore])
 144
 145 # test 2: short option string
 146 AT_DATA([test2.c],
 147 [[#include <stdio.h>
 148 #include <stdlib.h>
 149
 150 #include "context.h"
 151 #include "options.h"
 152
 153 int main(void)
 154 {
 155   struct option lopts[] = {LOPTS_INITIALIZER};
 156   unsigned i, j;
 157
 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);
 163           break;
 164         }
 165       }
 166     }
 167     putchar(SOPT_STRING[i]);
 168     if (SOPT_STRING[i+1] != ':')
 169       putchar('\n');
 170   }
 171 }
 172 ]])
 173
 174 sed -n '/^-/{
 175   s/=.*/:/
 176   s/[[@<:@]]/:/
 177   s/^-\([[^-]]\)[[^:]]*/\1/p
 178   s/^-.*//p
 179 }' options.def >sopts
 180
 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
 185   fi
 186 done
 187 exec 3<&- 4<&- 5>&-
 188
 189 AT_CHECK([$CC -o test2$EXEEXT test2.c && ./test2$EXEEXT],
 190   [0], [expout], [ignore])
 191
 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
 198   fi
 199   AS_ECHO(["msgctxt \"$opt\" msgid${help:+ }$help"]) >&6
 200 done
 201 exec 3<&- 4<&- 5<&- 6>&-
 202
 203 AT_CHECK([xgettext --keyword=PN_:1c,2 options.h
 204   test -f messages.po || exit 77])
 205
 206 LC_ALL=C sort expected.po >expout
 207 AT_CHECK([sed -n '/^msgctxt/{
 208 t next
 209 :next
 210 N
 211 s/\nmsgstr.*//
 212 t done
 213 s/\s*""//
 214 s/\n/ /
 215 t next
 216 :done
 217 p
 218 }' messages.po | LC_ALL=C sort], [0], [expout])
 219
 220 AT_CLEANUP
 221
 222 AT_SETUP([gen-strtab.awk])
 223
 224 AT_DATA([test.def],
 225 [[
 226 &a world
 227 &b
 228 hello world
 229 &c
 230 hello
 231 world
 232 &d world\n
 233 &e
 234 \\not a newline
 235 &f
 236 \not a newline
 237 &g inline
 238 continued
 239 &h    no\
 240 newline\
 241 &i
 242 \   leading whitespace
 243 &j oneline
 244 # with a comment
 245 ]])
 246
 247 AT_CHECK([$AWK -f "$builddir/scripts/gen-strtab.awk" <test.def >test.h])
 248
 249 sed -n 's/^[[&]]\([[^ ]]*\).*/\1/p' test.def >identifiers
 250
 251 # test 0: sanity test
 252 AT_DATA([test0.c],
 253 [[#include "test.h"
 254 #include <stdio.h>
 255
 256 int main(void)
 257 {
 258   printf("---\n");
 259 ]])
 260 exec 3<identifiers 4>>test0.c
 261 while read ident <&3; do
 262   AS_ECHO(['  printf("%s\n---\n", '"strtab+$ident);"]) >&4
 263 done
 264 AS_ECHO(['  return 0;']) >&4
 265 AS_ECHO(['}']) >&4
 266 exec 3<&- 4>&-
 267
 268 AT_CHECK([$CC -o test0$EXEEXT test0.c && ./test0$EXEEXT], [0], [---
 269 world
 270 ---
 271 hello world
 272
 273 ---
 274 hello
 275 world
 276
 277 ---
 278 world
 279
 280 ---
 281 \not a newline
 282
 283 ---
 284
 285 ot a newline
 286
 287 ---
 288 inline
 289 continued
 290
 291 ---
 292 nonewline
 293 ---
 294    leading whitespace
 295
 296 ---
 297 oneline
 298 ---
 299 ], [ignore])
 300
 301 AT_CLEANUP