* NEWS: In xstrtol, remove STRTOL_FATAL_ERROR and add xstrtol_fatal.
[gnulib.git] / tests / test-xstrtol.sh
1 #!/bin/sh
2
3 tmpfiles=""
4 trap 'rm -fr $tmpfiles' 1 2 3 15
5
6 tmpfiles="t-xstrtol.tmp t-xstrtol.xo"
7 : > t-xstrtol.tmp
8 too_big=99999999999999999999999999999999999999999999999999999999999999999999
9 result=0
10
11 # test xstrtol
12 ./test-xstrtol${EXEEXT} 1 >> t-xstrtol.tmp 2>&1 || result=1
13 ./test-xstrtol${EXEEXT} -1 >> t-xstrtol.tmp 2>&1 || result=1
14 ./test-xstrtol${EXEEXT} 1k >> t-xstrtol.tmp 2>&1 || result=1
15 ./test-xstrtol${EXEEXT} ${too_big}h >> t-xstrtol.tmp 2>&1 && result=1
16 ./test-xstrtol${EXEEXT} $too_big >> t-xstrtol.tmp 2>&1 && result=1
17 ./test-xstrtol${EXEEXT} x >> t-xstrtol.tmp 2>&1 && result=1
18 ./test-xstrtol${EXEEXT} 9x >> t-xstrtol.tmp 2>&1 && result=1
19 ./test-xstrtol${EXEEXT} 010 >> t-xstrtol.tmp 2>&1 || result=1
20 # suffix without integer is valid
21 ./test-xstrtol${EXEEXT} MiB >> t-xstrtol.tmp 2>&1 || result=1
22
23 # test xstrtoul
24 ./test-xstrtoul${EXEEXT} 1 >> t-xstrtol.tmp 2>&1 || result=1
25 ./test-xstrtoul${EXEEXT} -1 >> t-xstrtol.tmp 2>&1 && result=1
26 ./test-xstrtoul${EXEEXT} 1k >> t-xstrtol.tmp 2>&1 || result=1
27 ./test-xstrtoul${EXEEXT} ${too_big}h >> t-xstrtol.tmp 2>&1 && result=1
28 ./test-xstrtoul${EXEEXT} $too_big >> t-xstrtol.tmp 2>&1 && result=1
29 ./test-xstrtoul${EXEEXT} x >> t-xstrtol.tmp 2>&1 && result=1
30 ./test-xstrtoul${EXEEXT} 9x >> t-xstrtol.tmp 2>&1 && result=1
31 ./test-xstrtoul${EXEEXT} 010 >> t-xstrtol.tmp 2>&1 || result=1
32 ./test-xstrtoul${EXEEXT} MiB >> t-xstrtol.tmp 2>&1 || result=1
33
34 # normalize output
35 sed -e 's/^[^:]*: //' < t-xstrtol.tmp > t-xstrtol.xo
36 mv t-xstrtol.xo t-xstrtol.tmp
37
38 # compare expected output
39 cat > t-xstrtol.xo <<EOF
40 1->1 ()
41 -1->-1 ()
42 1k->1024 ()
43 invalid suffix in X argument \`${too_big}h'
44 X argument \`$too_big' too large
45 invalid X argument \`x'
46 invalid suffix in X argument \`9x'
47 010->8 ()
48 MiB->1048576 ()
49 1->1 ()
50 invalid X argument \`-1'
51 1k->1024 ()
52 invalid suffix in X argument \`${too_big}h'
53 X argument \`$too_big' too large
54 invalid X argument \`x'
55 invalid suffix in X argument \`9x'
56 010->8 ()
57 MiB->1048576 ()
58 EOF
59
60 diff t-xstrtol.xo t-xstrtol.tmp || result=1
61
62 rm -fr $tmpfiles
63
64 exit $result