X-Git-Url: http://git.draconx.ca/gitweb/dxcommon.git/blobdiff_plain/5d7b80ce6f21d6d90ecec188f135e665d789dede..ccd4df684019395c163eb3174c5e8bf2d3d8bdfc:/tests/scripts.at diff --git a/tests/scripts.at b/tests/scripts.at index a546b61..fc8fbc3 100644 --- a/tests/scripts.at +++ b/tests/scripts.at @@ -1,4 +1,4 @@ -dnl Copyright © 2021-2022 Nick Bowler +dnl Copyright © 2021-2023 Nick Bowler dnl dnl License WTFPL2: Do What The Fuck You Want To Public License, version 2. dnl This is free software: you are free to do what the fuck you want to. @@ -7,6 +7,7 @@ dnl There is NO WARRANTY, to the extent permitted by law. AT_BANNER([Script tests]) AT_SETUP([gen-options.awk]) +AT_KEYWORDS([gen-options awk script scripts]) AT_DATA([options.def], [[--option-only @@ -220,6 +221,7 @@ p AT_CLEANUP AT_SETUP([gen-strtab.awk]) +AT_KEYWORDS([gen-strtab awk script scripts]) AT_DATA([test.def], [[ @@ -298,11 +300,94 @@ oneline --- ], [ignore]) +AT_CLEANUP + +AT_SETUP([gen-strtab.awk @nozero option]) +AT_KEYWORDS([gen-strtab awk script scripts]) + +AT_DATA([test0.def], +[[&hello hello +]]) +AT_CHECK([$AWK -f "$builddir/scripts/gen-strtab.awk" test0.h]) + +AT_DATA([test1.def], +[[@nozero +&hello hello +]]) +AT_CHECK([$AWK -f "$builddir/scripts/gen-strtab.awk" test1.h]) + +AT_DATA([test.c], +[[#include +#include HEADER +int main(void) { printf("%d %s\n", hello, strtab+hello); return 0; } +]]) +AT_CHECK([$CC -DHEADER='"test0.h"' -o test0$EXEEXT test.c && ./test0$EXEEXT], + [0], [[0 hello +]]) +AT_CHECK([$CC -DHEADER='"test1.h"' -o test1$EXEEXT test.c && ./test1$EXEEXT], + [0], [[1 hello +]]) + +AT_CLEANUP + +AT_SETUP([gen-strtab.awk l10n options]) +AT_KEYWORDS([gen-strtab awk script scripts]) + +AT_DATA([l10n.sed], dnl ( +[[/^#/b +s/.*N_(\([^)]*\)).*/\1/p +]]) + +AT_DATA([test0.def], +[[&a hello world +&b world +&c goodbye +]]) +AT_CHECK([$AWK -f "$builddir/scripts/gen-strtab.awk" test0.h]) +AT_CHECK([sed -n -f l10n.sed test0.h | LC_ALL=C sort], [0], +[["goodbye" +"hello world" +"world" +]]) + +AT_DATA([test1.def], +[[&a hello world +&&b world +&&c goodbye +]]) +AT_CHECK([$AWK -f "$builddir/scripts/gen-strtab.awk" test1.h]) +AT_CHECK([sed -n -f l10n.sed test1.h], [0], +[["hello world" +]]) + +AT_DATA([test.c], +[[#include +#include HEADER + +int main(void) +{ + printf("%s %s %s\n", strtab+a, strtab+b, strtab+c); + return 0; +} +]]) + +AT_CHECK([$CC -DHEADER='"test0.h"' -o test0$EXEEXT test.c && ./test0$EXEEXT], + [0], [[hello world world goodbye +]]) + +AT_CHECK([$CC -DHEADER='"test1.h"' -o test1$EXEEXT test.c && ./test1$EXEEXT], + [0], [[hello world world goodbye +]]) + + AT_CLEANUP AT_SETUP([gen-tree.awk]) +AT_KEYWORDS([gen-tree awk script scripts]) + AT_DATA([tree.def], -[[ROOT0 +[[# comment +ROOT0 r0a, r0a_OFFSET r0b, r0b_OFFSET r0c @@ -310,6 +395,7 @@ AT_DATA([tree.def], r0e, r0e_OFFSET r0f r0g +# comment ROOT1 r1a, r1a_OFFSET r1b, r1b_OFFSET @@ -321,6 +407,7 @@ ROOT1 r1e r1b r1e +# comment ]]) AT_CHECK([$AWK -f "$builddir/scripts/gen-tree.awk" tree.h]) @@ -359,14 +446,84 @@ int main(void) print_subtree(tree0, 0, 1); printf("ROOT1\n"); print_subtree(tree1, 0, 1); + return 0; } ]]) -cp tree.def expout +sed '/^#/d' tree.def >expout AT_CHECK([$CC -o test0$EXEEXT test0.c && ./test0$EXEEXT], [0], [expout]) AT_CLEANUP +# Test the gen-tree features that avoid creating string labels for nodes. +AT_SETUP([gen-tree.awk @nostrtab option]) +AT_KEYWORDS([gen-tree awk script scripts]) + +AT_DATA([tree.def], +[[@nostrtab +ROOT + a 1, a_OFFSET + b 1 + c 2 + d 2, d_OFFSET + e 1 + f 2 +]]) +AT_CHECK([$AWK -f "$builddir/scripts/gen-tree.awk" tree.h]) + +AT_DATA([test0.c], +[[float tree_strtab = 0; +#define a [] +#define b [] +#define c [] +#define e [] +#define f [] +#include "tree.h" +#include + +static struct { int num, offset; } root[] = { ROOT_INITIALIZER }; + +int main(void) +{ + unsigned i; + for (i = 0; i < sizeof root / sizeof root[0]; i++) { + printf("%d, %d\n", root[i].num, root[i].offset); + } +} +]]) + +AT_CHECK([$CC -o test0$EXEEXT test0.c && ./test0$EXEEXT], [0], +[[1, 3 +2, 6 +0, 0 +1, 0 +2, 0 +0, 0 +1, 0 +2, 0 +0, 0 +]]) + +AT_DATA([flat.def], +[[FLAT + a 1 + b 2 + c 3 +@nostrtab +]]) +AT_CHECK([$AWK -f "$builddir/scripts/gen-tree.awk" flat.h]) + +sed -e 's/tree\.h/flat.h/' -e 's/ROOT/FLAT/' test0.c >test1.c +AT_CHECK([$CC -o test1$EXEEXT test1.c && ./test1$EXEEXT], [0], +[[1, 0 +2, 0 +3, 0 +0, 0 +]]) + +AT_CLEANUP + AT_SETUP([join.awk]) +AT_KEYWORDS([join awk script scripts]) JOIN="$AWK -f $builddir/scripts/join.awk --" @@ -580,14 +737,22 @@ AT_CHECK([echo wat | $JOIN -v1 - /dev/null], [0], AT_CLEANUP m4_divert_push([PREPARE_TESTS])dnl +test_fix_ltdl () { + $PERL -e 'my $x = 42; exit $x;'; test $? = 42 || exit 77 + $PERL -f "$srcdir/scripts/fix-ltdl.pl" "$@" +} test_fix_gnulib () { $PERL -e 'my $x = 42; exit $x;'; test $? = 42 || exit 77 $PERL -f "$srcdir/scripts/fix-gnulib.pl" "$@" } test_gnulib_mk () { - echo; sed -n -f - "$srcdir/tests/data/gnulib.mk" <test.mk.in +AT_CHECK([test_fix_gnulib -i test.mk.in -o test.mk || exit +sed -n -f extract.sed test.mk], [0], +[[lib/alloca.h: + $(AM_V_GEN)$(MKDIR_P) lib + $(AM_V_at) +lib/sys/types.h: + $(AM_V_GEN)$(MKDIR_P) lib/sys + $(AM_V_at) +lib/stddef.h: + $(AM_V_GEN)$(MKDIR_P) lib + $(AM_V_at) +]]) + +AT_CLEANUP + +dnl TEST_FIND_AUTOMAKE_VER([to-check], [test-action]) +dnl +dnl For each whitespace-separated version token in to-check, check if we can +dnl run the programs automake-VER and aclocal-VER. The special token 'default' +dnl also checks the unversioned automake and aclocal (or, if set in the +dnl environment, $AUTOMAKE and $ACLOCAL). +dnl +dnl Then test-action is expanded such that shell variables $ac and $am refer to +dnl the aclocal and automake programs, and $amver is the actual version +dnl reported by --version. The action should do nothing if the version is +dnl acceptable, or "continue" if the version is unacceptable. +dnl +dnl If an acceptable version is found, the AUTOMAKE and ACLOCAL environment +dnl variables are set accordingly. Otherwise, the test group is skipped. +m4_define([TEST_FIND_AUTOMAKE], +[have_am=false +for am in $1; do + AS_CASE([$am], + [default], [ac=${ACLOCAL-aclocal} am=${AUTOMAKE-automake}], + [ac=aclocal-$am; am=automake-$am]) + amver=`$am --version | sed -n '1s/.* //p'` + acver=`$ac --version | sed -n '1s/.* //p'` + set x $amver $acver; shift; test x"$[]#" = x"2" || continue + test x"$amver" = x"$acver" || continue + $2 + have_am=:; break +done +AT_CHECK([$have_am || exit 77]) +AUTOMAKE=$am; export AUTOMAKE +ACLOCAL=$ac; export ACLOCAL +AT_CHECK([$ACLOCAL --version && $AUTOMAKE --version], [0], [stdout]) +]) + +m4_define([TEST_LTDL_LIBOBJ_MANGLING], +[TEST_CONFIGURE_AC([[AM_INIT_AUTOMAKE([foreign subdir-objects]) +AC_PROG_CC +LT_INIT +AC_SUBST([ltdl_LTLIBOBJS], [libltdl/test.lo]) +AC_CONFIG_FILES([Makefile]) +]]) + +mkdir libltdl +AT_DATA([ltdl.mk.in], [[ +AM_CPPFLAGS += -DSTRING=\"helloworld\" + +noinst_LTLIBRARIES = libltdl/libltdl.la +libltdl_libltdl_la_SOURCES = libltdl/ltdl.c +libltdl_libltdl_la_LIBADD = $(ltdl_LTLIBOBJS) +libltdl_libltdl_la_DEPENDENCIES = $(ltdl_LTLIBOBJS) + +EXTRA_DIST += libltdl/test.c +]]) +AT_DATA([Makefile.am], [[AM_CPPFLAGS = +include $(top_srcdir)/ltdl.mk +AM_LIBTOOLFLAGS = --quiet +bin_PROGRAMS = test +test_SOURCES = +test_LDADD = libltdl/libltdl.la +all-local: ; @printf '%s\n' $(AM_CPPFLAGS) +]]) +AT_DATA([libltdl/test.c], [[#include +int foo(void) { printf("%s\n", STRING); return 0; } +]]) +AT_DATA([libltdl/ltdl.c], [[int foo(void); int main(void) { return foo(); } +]]) + +AT_CHECK([test_fix_ltdl -i ltdl.mk.in -o ltdl.mk]) +libtoolize; TEST_AUTORECONF +TEST_CONFIGURE([--disable-shared]) +AT_CHECK([make -s && ./test], [0], [ +helloworld +])]) + +AT_SETUP([fix-ltdl.pl LIBOBJ mangling (=automake-1.16)]) + +TEST_FIND_AUTOMAKE([default 1.16 1.17 1.18 1.19], + [AS_VERSION_COMPARE(["$amver"], [1.16], [continue])]) +TEST_LTDL_LIBOBJ_MANGLING + +AT_CLEANUP