mirror of
https://https.git.savannah.gnu.org/git/gnulib.git
synced 2026-04-28 06:33:36 +00:00
77dd627875
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.
71 lines
2.0 KiB
Bash
Executable File
71 lines
2.0 KiB
Bash
Executable File
#!/bin/sh
|
|
: "${srcdir=.}"
|
|
. "$srcdir/init.sh"; path_prepend_ .
|
|
|
|
too_big=99999999999999999999999999999999999999999999999999999999999999999999
|
|
result=0
|
|
|
|
# test xstrtoll
|
|
${CHECKER} test-xstrtoll 1 >> out 2>&1 || result=1
|
|
${CHECKER} test-xstrtoll -1 >> out 2>&1 || result=1
|
|
${CHECKER} test-xstrtoll 1k >> out 2>&1 || result=1
|
|
${CHECKER} test-xstrtoll ${too_big}h >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoll $too_big >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoll x >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoll 9x >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoll 010 >> out 2>&1 || result=1
|
|
# suffix without integer is valid
|
|
${CHECKER} test-xstrtoll MiB >> out 2>&1 || result=1
|
|
|
|
# test xstrtoull
|
|
${CHECKER} test-xstrtoull 1 >> out 2>&1 || result=1
|
|
${CHECKER} test-xstrtoull -1 >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoull 1k >> out 2>&1 || result=1
|
|
${CHECKER} test-xstrtoull ${too_big}h >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoull $too_big >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoull x >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoull 9x >> out 2>&1 && result=1
|
|
${CHECKER} test-xstrtoull 010 >> out 2>&1 || result=1
|
|
${CHECKER} test-xstrtoull MiB >> 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 ()
|
|
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 ()
|
|
EOF
|
|
|
|
compare expected out || result=1
|
|
|
|
# Other misc tests.
|
|
${CHECKER} test-xstrtoll || result=1
|
|
|
|
Exit $result
|