kc3-lang/gnulib/tests/test-xstrtol.sh
Branch
-
Show log
Commit
-
Hash : 77dd6278
Author :
Date : 2024-07-25T22:05:18
xstrtol, xstrtoll tests: Test behaviour for an invalid base. Reported by Alejandro Colomar <alx@kernel.org> in <https://lists.gnu.org/archive/html/bug-gnulib/2024-07/msg00249.html>. * modules/xstrtol-tests (Files): Add tests/macros.h. * modules/xstrtoll-tests (Files): Likewise. * tests/test-xstrtol.c: Include macros.h. (main): If no arguments are given on the command line, perform miscellaneous tests. * tests/test-xstrtol.sh: Also invoke test-xstrtol without arguments. * tests/test-xstrtoll.sh: Also invoke test-xstrtoll without arguments.
-
tests/test-xstrtol.sh
-
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
#!/bin/sh : "${srcdir=.}" . "$srcdir/init.sh"; path_prepend_ . too_big=99999999999999999999999999999999999999999999999999999999999999999999 result=0 # test xstrtol ${CHECKER} test-xstrtol 1 >> out 2>&1 || result=1 ${CHECKER} test-xstrtol -1 >> out 2>&1 || result=1 ${CHECKER} test-xstrtol 1k >> out 2>&1 || result=1 ${CHECKER} test-xstrtol ${too_big}h >> out 2>&1 && result=1 ${CHECKER} test-xstrtol $too_big >> out 2>&1 && result=1 ${CHECKER} test-xstrtol x >> out 2>&1 && result=1 ${CHECKER} test-xstrtol 9x >> out 2>&1 && result=1 ${CHECKER} test-xstrtol 010 >> out 2>&1 || result=1 # suffix without integer is valid ${CHECKER} test-xstrtol MiB >> out 2>&1 || result=1 ${CHECKER} test-xstrtol 1bB >> out 2>&1 && result=1 # test xstrtoul ${CHECKER} test-xstrtoul 1 >> out 2>&1 || result=1 ${CHECKER} test-xstrtoul -1 >> out 2>&1 && result=1 ${CHECKER} test-xstrtoul 1k >> out 2>&1 || result=1 ${CHECKER} test-xstrtoul ${too_big}h >> out 2>&1 && result=1 ${CHECKER} test-xstrtoul $too_big >> out 2>&1 && result=1 ${CHECKER} test-xstrtoul x >> out 2>&1 && result=1 ${CHECKER} test-xstrtoul 9x >> out 2>&1 && result=1 ${CHECKER} test-xstrtoul 010 >> out 2>&1 || result=1 ${CHECKER} test-xstrtoul MiB >> out 2>&1 || result=1 ${CHECKER} test-xstrtoul 1bB >> out 2>&1 && result=1 # Find out how to remove carriage returns from output. Solaris /usr/ucb/tr # does not understand '\r'. if echo solaris | tr -d '\r' | grep solais > /dev/null; then cr='\015' else cr='\r' fi # normalize output LC_ALL=C tr -d "$cr" < out > k mv k out # compare expected output cat > expected <<EOF 1->1 () -1->-1 () 1k->1024 () invalid suffix in X argument '${too_big}h' X argument '$too_big' too large invalid X argument 'x' invalid suffix in X argument '9x' 010->8 () MiB->1048576 () invalid suffix in X argument '1bB' 1->1 () invalid X argument '-1' 1k->1024 () invalid suffix in X argument '${too_big}h' X argument '$too_big' too large invalid X argument 'x' invalid suffix in X argument '9x' 010->8 () MiB->1048576 () invalid suffix in X argument '1bB' EOF compare expected out || result=1 # Other misc tests. ${CHECKER} test-xstrtol || result=1 Exit $result