Return to triptest CVS log

Up to [MW Coherent from dump] / coherent / b / bin

Annotation of coherent/b/bin/triptest, revision 1.1.1.1

1.1       root        1: # A collection of both regular and pathological input for "test"
                      2: # In order to test out things like -p and -K we need to be root, so those
                      3: # things are not tested yet. We are more interested in the range of valid
                      4: # expressions that "test" can parse.
                      5: 
                      6: if [ $1 ]
                      7: then   TEST=$1
                      8: else   TEST=/bin/test
                      9: fi
                     10: 
                     11: STRING_BINARIES='= != < >'
                     12: ARITH_BINARIES="-eq -ne -lt -gt -le -ge"
                     13: NS_FILE_BINARIES="-ef -nt -ot"
                     14: 
                     15: STRING_UNARIES="-z -n !"
                     16: FILE_UNARIES="-r -w -x -t -b -c -d -p -f -g -u -s"
                     17: NS_FILE_UNARIES="-K -L"
                     18: 
                     19: LPAREN="\("
                     20: RPAREN="\)"
                     21: 
                     22: ALL_OPS="$STRING_BINARIES $ARITH_BINARIES $NS_FILE_BINARIES $STRING_UNARIES\
                     23:        $FILE_UNARIES $NS_FILE_UNARIES $LPAREN $RPAREN"
                     24: 
                     25: OLD_FILE=`which test`
                     26: NEW_FILE=/tmp/newfile
                     27: 
                     28: >$NEW_FILE                     # create the new file
                     29: 
                     30: xtest () {
                     31:        $TEST "$@"; A=$?
                     32:        if [ $# -gt 0 ]; then
                     33:                $TEST ! \( "$@" \); B="negated as $?"
                     34:        else    B=
                     35:        fi
                     36:        echo test "$@" "-->" $A $B
                     37: }
                     38: 
                     39: echo Testing pathological cases
                     40: 
                     41: xtest \( "" \)                 # => ( -n "" )
                     42: xtest \( -a \) = \)            # => -n ")" -a ( ")" = ")" )
                     43: xtest \( = \)                  # 0 => ( -n "!=" )
                     44:                                # 1 => "(" != ")"
                     45: xtest \( -a = -o \)            # 1 => ( "-a" = "-o" )
                     46:                                # 0 => -n "(" -a -n "=" -o -n ")"
                     47: 
                     48: echo Testing simple predicates
                     49: 
                     50: xtest
                     51: xtest ""
                     52: xtest "a"
                     53: xtest "!"
                     54: 
                     55: echo Testing file comparisons
                     56: 
                     57: for l in $OLD_FILE $NEW_FILE; do
                     58:        for r in $OLD_FILE $NEW_FILE; do
                     59:                for op in $NS_FILE_BINARIES; do
                     60:                        xtest $l $op $r
                     61:                done
                     62:        done
                     63: done
                     64: 
                     65: echo Testing precedence and associativity
                     66: 
                     67: xtest ! "" -o "a"              # good 0 => ( ! "" ) -o "a"
                     68:                                #  bad 1 => ! ( "" -o "a" )
                     69: xtest "" -o ! ""
                     70: 
                     71: xtest ! "" -a "a"              # good 0 => ( ! "" ) -a "a"
                     72:                                #  bad 1 => ! ("" -a "a")
                     73: xtest "a" -a ! ""
                     74: 
                     75: xtest "" -a "" -o "a"          # good 0 => ( "" -a "" ) -o "a"
                     76:                                #  bad 1 => "" -a ( "" -o "a" )
                     77: xtest "a" -o "" -a ""
                     78: 
                     79: echo Testing simple arithmetic
                     80: 
                     81: for l in 1 2; do
                     82:        for r in 1 2; do
                     83:                for op in $ARITH_BINARIES; do
                     84:                        xtest $l $op $r
                     85:                done
                     86:        done
                     87: done
                     88: 
                     89: echo Testing simple string operations.
                     90: 
                     91: TEST_OPS="$STRING_BINARIES $STRING_UNARIES $LPAREN $RPAREN"
                     92: 
                     93: for l in $TEST_OPS; do
                     94:        for r in $TEST_OPS; do
                     95:                for op in $STRING_BINARIES; do
                     96:                        xtest $l $op $r
                     97:                done
                     98:        done
                     99: done

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.