Fix rewrite error which appeared in rev 1.3.
[dragonfly.git] / bin / test / TEST.sh
1 #!/bin/sh
2 #
3 # Copyright (c) June 1996 Wolfram Schneider <wosch@FreeBSD.org>. Berlin.
4 # All rights reserved. 
5 #
6 # Redistribution and use in source and binary forms, with or without
7 # modification, are permitted provided that the following conditions
8 # are met:
9 # 1. Redistributions of source code must retain the above copyright
10 #    notice, this list of conditions and the following disclaimer.
11 # 2. Redistributions in binary form must reproduce the above copyright
12 #    notice, this list of conditions and the following disclaimer in the
13 #    documentation and/or other materials provided with the distribution.
14 #
15 # THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 # ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 # SUCH DAMAGE.
26 #
27 # TEST.sh - check if test(1) or builtin test works
28 #
29 # $FreeBSD: src/bin/test/TEST.sh,v 1.6.2.1 2000/07/01 03:13:10 ps Exp $
30 # $DragonFly: src/bin/test/TEST.sh,v 1.2 2003/06/17 04:22:50 dillon Exp $
31
32 # force a specified test program, e.g. `env test=/bin/test sh TEST.sh'
33 : ${test=test}          
34
35 ERROR=0 FAILED=0
36
37 t ()
38 {
39         # $1 -> exit code
40         # $2 -> $test expression
41
42         echo -n "$1: $test $2 "
43
44         # check for syntax errors
45         syntax="`eval $test $2 2>&1`"
46         if test -z "$syntax"; then
47
48         case $1 in
49                 0) if eval $test $2; then echo " OK"; else failed;fi;;
50                 1) if eval $test $2; then failed; else echo " OK";fi;;
51         esac
52
53         else
54                 error
55         fi
56 }
57
58 error () 
59 {
60         echo ""; echo " $syntax"
61         ERROR=`expr $ERROR + 1`
62 }
63
64 failed () 
65 {
66         echo ""; echo " failed"
67         FAILED=`expr $FAILED + 1`
68 }
69
70
71 t 0 'b = b' 
72 t 1 'b != b' 
73 t 0 '\( b = b \)' 
74 t 1 '! \( b = b \)' 
75 t 1 '! -f /etc/passwd'
76
77 t 0 '-h = -h'
78 t 0 '-o = -o'
79 t 1 '-f = h'
80 t 1 '-h = f'
81 t 1 '-o = f'
82 t 1 'f = -o'
83 t 0 '\( -h = -h \)'
84 t 1 '\( a = -h \)'
85 t 1 '\( -f = h \)'
86 t 0 '-h = -h -o a'
87 t 0 '\( -h = -h \) -o 1'
88 t 0 '-h = -h -o -h = -h'
89 t 0 '\( -h = -h \) -o \( -h = -h \)'
90 t 0 'roedelheim = roedelheim'
91 t 1 'potsdam = berlin-dahlem'
92
93 t 0 '-d /'
94 t 0 '-d / -a a != b'
95 t 1 '-z "-z"'
96 t 0 '-n -n'
97
98 t 0 '0'
99 t 0 '\( 0 \)'
100 t 0 '-E'
101 t 0 '-X -a -X'
102 t 0 '-XXX'
103 t 0 '\( -E \)'
104 t 0 'true -o X'
105 t 0 'true -o -X'
106 t 0 '\( \( \( a = a \) -o 1 \) -a 1 \) -a true'
107 t 1 '-h /'
108 t 0 '-r /'
109 t 1 '-w /'
110 t 0 '-x /bin/sh'
111 t 0 '-c /dev/null'
112 t 0 '-f /etc/passwd'
113 t 0 '-s /etc/passwd'
114
115 t 1 '! \( 700 -le 1000 -a -n "1" -a "20" = "20" \)'
116 t 0 '100 -eq 100'
117 t 0 '100 -lt 200'
118 t 1 '1000 -lt 200'
119 t 0 '1000 -gt 200'
120 t 0 '1000 -ge 200'
121 t 0 '1000 -ge 1000'
122 t 1 '2 -ne 2'
123 t 0 '0 -eq 0'
124 t 1 '-5 -eq 5'
125 t 0 '\( 0 -eq 0 \)'
126 t 1 '1 -eq 0 -o a = a -a 1 -eq 0 -o a = aa'
127
128 t 1 '"" -o ""'
129 t 1 '"" -a ""'
130 t 1 '"a" -a ""'
131 t 0 '"a" -a ! ""'
132 t 1 '""'
133 t 0 '! ""'
134
135 echo ""
136 echo "Syntax errors: $ERROR Failed: $FAILED"