#!/bin/sh - # # Copyright (c) 1992 Diomidis Spinellis. # Copyright (c) 1992, 1993 # The Regents of the University of California. All rights reserved. # # Redistribution and use in source and binary forms, with or without # modification, are permitted provided that the following conditions # are met: # 1. Redistributions of source code must retain the above copyright # notice, this list of conditions and the following disclaimer. # 2. Redistributions in binary form must reproduce the above copyright # notice, this list of conditions and the following disclaimer in the # documentation and/or other materials provided with the distribution. # 3. All advertising materials mentioning features or use of this software # must display the following acknowledgement: # This product includes software developed by the University of # California, Berkeley and its contributors. # 4. Neither the name of the University nor the names of its contributors # may be used to endorse or promote products derived from this software # without specific prior written permission. # # THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE # ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF # SUCH DAMAGE. # # @(#)sed.test 8.1 (Berkeley) 6/6/93 # # sed Regression Tests # # The following files are created: # lines[1-4], script1, script2 # Two directories *.out contain the test results main() { BASE=/usr/old/bin/sed BASELOG=sed.out TEST=../obj/sed TESTLOG=nsed.out DICT=/usr/share/dict/words test_error | more awk 'END { for (i = 1; i < 15; i++) print "l1_" i}' </dev/null >lines1 awk 'END { for (i = 1; i < 10; i++) print "l2_" i}' </dev/null >lines2 exec 4>&1 5>&2 # Set these flags to get messages about known problems BSD=1 GNU=0 SUN=0 tests $BASE $BASELOG BSD=0 GNU=0 SUN=0 tests $TEST $TESTLOG exec 1>&4 2>&5 diff -c $BASELOG $TESTLOG | more } tests() { SED=$1 DIR=$2 rm -rf $DIR mkdir $DIR MARK=100 test_args test_addr echo Testing commands test_group test_acid test_branch test_pattern test_print test_subst } mark() { MARK=`expr $MARK + 1` exec 1>&4 2>&5 exec >"$DIR/${MARK}_$1" echo "Test $1:$MARK" # Uncomment this line to match tests with sed error messages echo "Test $1:$MARK" >&5 } test_args() { mark '1.1' echo Testing argument parsing echo First type if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED 's/^/e1_/p' lines1 fi mark '1.2' ; $SED -n 's/^/e1_/p' lines1 mark '1.3' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED 's/^/e1_/p' <lines1 fi mark '1.4' ; $SED -n 's/^/e1_/p' <lines1 echo Second type mark '1.4.1' if [ $SUN -eq 1 ] ; then echo SunOS sed fails this fi $SED -e '' <lines1 echo 's/^/s1_/p' >script1 echo 's/^/s2_/p' >script2 mark '1.5' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED -f script1 lines1 fi mark '1.6' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED -f script1 <lines1 fi mark '1.7' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED -e 's/^/e1_/p' lines1 fi mark '1.8' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED -e 's/^/e1_/p' <lines1 fi mark '1.9' ; $SED -n -f script1 lines1 mark '1.10' ; $SED -n -f script1 <lines1 mark '1.11' ; $SED -n -e 's/^/e1_/p' lines1 mark '1.12' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED -n -e 's/^/e1_/p' <lines1 fi mark '1.13' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED -e 's/^/e1_/p' -e 's/^/e2_/p' lines1 fi mark '1.14' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED -f script1 -f script2 lines1 fi mark '1.15' if [ $GNU -eq 1 -o $SUN -eq 1 ] ; then echo GNU and SunOS sed fail this following older POSIX draft else $SED -e 's/^/e1_/p' -f script1 lines1 fi mark '1.16' if [ $SUN -eq 1 ] ; then echo SunOS sed prints only with -n else $SED -e 's/^/e1_/p' lines1 lines1 fi # POSIX D11.2:11251 mark '1.17' ; $SED p <lines1 lines1 cat >script1 <<EOF #n # A comment p EOF mark '1.18' ; $SED -f script1 <lines1 lines1 } test_addr() { echo Testing address ranges mark '2.1' ; $SED -n -e '4p' lines1 mark '2.2' ; $SED -n -e '20p' lines1 lines2 mark '2.3' ; $SED -n -e '$p' lines1 mark '2.4' ; $SED -n -e '$p' lines1 lines2 mark '2.5' ; $SED -n -e '$a\ hello' /dev/null mark '2.6' ; $SED -n -e '$p' lines1 /dev/null lines2 # Should not print anything mark '2.7' ; $SED -n -e '20p' lines1 mark '2.8' ; $SED -n -e '0p' lines1 mark '2.9' ; $SED -n '/l1_7/p' lines1 mark '2.10' ; $SED -n ' /l1_7/ p' lines1 mark '2.11' if [ $BSD -eq 1 ] ; then echo BSD sed fails this test fi if [ $GNU -eq 1 ] ; then echo GNU sed fails this fi $SED -n '\_l1\_7_p' lines1 mark '2.12' ; $SED -n '1,4p' lines1 mark '2.13' ; $SED -n '1,$p' lines1 lines2 mark '2.14' ; $SED -n '1,/l2_9/p' lines1 lines2 mark '2.15' ; $SED -n '/4/,$p' lines1 lines2 mark '2.16' ; $SED -n '/4/,20p' lines1 lines2 mark '2.17' ; $SED -n '/4/,/10/p' lines1 lines2 mark '2.18' ; $SED -n '/l2_3/,/l1_8/p' lines1 lines2 mark '2.19' if [ $GNU -eq 1 ] ; then echo GNU sed fails this fi $SED -n '12,3p' lines1 lines2 mark '2.20' if [ $GNU -eq 1 ] ; then echo GNU sed fails this fi $SED -n '/l1_7/,3p' lines1 lines2 } test_group() { echo Brace and other grouping mark '3.1' ; $SED -e ' 4,12 { s/^/^/ s/$/$/ s/_/T/ }' lines1 mark '3.2' ; $SED -e ' 4,12 { s/^/^/ /6/,/10/ { s/$/$/ /8/ s/_/T/ } }' lines1 mark '3.3' ; $SED -e ' 4,12 !{ s/^/^/ /6/,/10/ !{ s/$/$/ /8/ !s/_/T/ } }' lines1 mark '3.4' ; $SED -e '4,12!s/^/^/' lines1 } test_acid() { echo Testing a c d and i commands mark '4.1' ; $SED -n -e ' s/^/before_i/p 20i\ inserted s/^/after_i/p ' lines1 lines2 mark '4.2' ; $SED -n -e ' 5,12s/^/5-12/ s/^/before_a/p /5-12/a\ appended s/^/after_a/p ' lines1 lines2 mark '4.3' if [ $GNU -eq 1 ] ; then echo GNU sed fails this fi $SED -n -e ' s/^/^/p /l1_/a\ appended 8,10N s/$/$/p ' lines1 lines2 mark '4.4' ; $SED -n -e ' c\ hello ' lines1 mark '4.5' ; $SED -n -e ' 8c\ hello ' lines1 mark '4.6' ; $SED -n -e ' 3,14c\ hello ' lines1 # SunOS and GNU sed behave differently. We follow POSIX # mark '4.7' ; $SED -n -e ' #8,3c\ #hello #' lines1 mark '4.8' ; $SED d <lines1 } test_branch() { echo Testing labels and branching mark '5.1' ; $SED -n -e ' b label4 :label3 s/^/label3_/p b end :label4 2,12b label1 b label2 :label1 s/^/label1_/p b :label2 s/^/label2_/p b label3 :end ' lines1 mark '5.2' if [ $BSD -eq 1 ] ; then echo BSD sed fails this test fi $SED -n -e ' s/l1_/l2_/ t ok b :ok s/^/tested /p ' lines1 lines2 # SunOS sed behaves differently here. Clarification needed. # mark '5.3' ; $SED -n -e ' #5,8b inside #1,5 { # s/^/^/p # :inside # s/$/$/p #} #' lines1 # Check that t clears the substitution done flag mark '5.4' ; $SED -n -e ' 1,8s/^/^/ t l1 :l1 t l2 s/$/$/p b :l2 s/^/ERROR/ ' lines1 # Check that reading a line clears the substitution done flag mark '5.5' if [ $BSD -eq 1 ] ; then echo BSD sed fails this test fi $SED -n -e ' t l2 1,8s/^/^/p 2,7N b :l2 s/^/ERROR/p ' lines1 mark '5.6' ; $SED 5q lines1 mark '5.7' ; $SED -e ' 5i\ hello 5q' lines1 # Branch across block boundary mark '5.8' ; $SED -e ' { :b } s/l/m/ tb' lines1 } test_pattern() { echo Pattern space commands # Check that the pattern space is deleted mark '6.1' ; $SED -n -e ' c\ changed p ' lines1 mark '6.2' ; $SED -n -e ' 4d p ' lines1 # SunOS sed refused to print here # mark '6.3' ; $SED -e ' #N #N #N #D #P #4p #' lines1 mark '6.4' ; $SED -e ' 2h 3H 4g 5G 6x 6p 6x 6p ' lines1 mark '6.5' ; $SED -e '4n' lines1 mark '6.6' ; $SED -n -e '4n' lines1 } test_print() { echo Testing print and file routines awk 'END {for (i = 1; i < 256; i++) printf("%c", i);print "\n"}' \ </dev/null >lines3 # GNU and SunOS sed behave differently here mark '7.1' if [ $BSD -eq 1 ] ; then echo 'BSD sed drops core on this one; TEST SKIPPED' else $SED -n l lines3 fi mark '7.2' ; $SED -e '/l2_/=' lines1 lines2 rm -f lines4 mark '7.3' ; $SED -e '3,12w lines4' lines1 echo w results cat lines4 mark '7.4' ; $SED -e '4r lines2' lines1 mark '7.5' ; $SED -e '5r /dev/dds' lines1 mark '7.6' ; $SED -e '6r /dev/null' lines1 mark '7.7' if [ $BSD -eq 1 -o $GNU -eq 1 -o $SUN -eq 1 ] ; then echo BSD, GNU and SunOS cannot pass this one else sed '200q' $DICT | sed 's$.*$s/^/&/w tmpdir/&$' >script1 rm -rf tmpdir mkdir tmpdir $SED -f script1 lines1 cat tmpdir/* rm -rf tmpdir fi mark '7.8' if [ $BSD -eq 1 ] ; then echo BSD sed cannot pass 7.7 else echo line1 > lines3 echo "" >> lines3 $SED -n -e '$p' lines3 /dev/null fi } test_subst() { echo Testing substitution commands mark '8.1' ; $SED -e 's/./X/g' lines1 mark '8.2' ; $SED -e 's,.,X,g' lines1 # GNU and SunOS sed thinks we are escaping . as wildcard, not as separator # mark '8.3' ; $SED -e 's.\..X.g' lines1 # POSIX does not say that this should work # mark '8.4' ; $SED -e 's/[/]/Q/' lines1 mark '8.4' ; $SED -e 's/[\/]/Q/' lines1 mark '8.5' ; $SED -e 's_\__X_' lines1 mark '8.6' ; $SED -e 's/./(&)/g' lines1 mark '8.7' ; $SED -e 's/./(\&)/g' lines1 mark '8.8' ; $SED -e 's/\(.\)\(.\)\(.\)/x\3x\2x\1/g' lines1 mark '8.9' ; $SED -e 's/_/u0\ u1\ u2/g' lines1 mark '8.10' if [ $BSD -eq 1 -o $GNU -eq 1 ] ; then echo 'BSD/GNU sed do not understand digit flags on s commands' fi $SED -e 's/./X/4' lines1 rm -f lines4 mark '8.11' ; $SED -e 's/1/X/w lines4' lines1 echo s wfile results cat lines4 mark '8.12' ; $SED -e 's/[123]/X/g' lines1 mark '8.13' ; $SED -e 'y/0123456789/9876543210/' lines1 mark '8.14' ; if [ $BSD -eq 1 -o $GNU -eq 1 -o $SUN -eq 1 ] ; then echo BSD/GNU/SUN sed fail this test else $SED -e 'y10\123456789198765432\101' lines1 fi mark '8.15' ; $SED -e '1N;2y/\n/X/' lines1 mark '8.16' if [ $BSD -eq 1 ] ; then echo 'BSD sed does not handle branch defined REs' else echo 'eeefff' | $SED -e 'p' -e 's/e/X/p' -e ':x' \ -e 's//Y/p' -e '/f/bx' fi } test_error() { exec 0>&3 4>&1 5>&2 exec 0</dev/null exec 2>&1 set -x $TEST -x && exit 1 $TEST -f && exit 1 $TEST -e && exit 1 $TEST -f /dev/dds && exit 1 $TEST p /dev/dds && exit 1 $TEST -f /bin/sh && exit 1 $TEST '{' && exit 1 $TEST '{' && exit 1 $TEST '/hello/' && exit 1 $TEST '1,/hello/' && exit 1 $TEST -e '-5p' && exit 1 $TEST '/jj' && exit 1 $TEST 'a hello' && exit 1 $TEST 'a \ hello' && exit 1 $TEST 'b foo' && exit 1 $TEST 'd hello' && exit 1 $TEST 's/aa' && exit 1 $TEST 's/aa/' && exit 1 $TEST 's/a/b' && exit 1 $TEST 's/a/b/c/d' && exit 1 $TEST 's/a/b/ 1 2' && exit 1 $TEST 's/a/b/ 1 g' && exit 1 $TEST 's/a/b/w' && exit 1 $TEST 'y/aa' && exit 1 $TEST 'y/aa/b/' && exit 1 $TEST 'y/aa/' && exit 1 $TEST 'y/a/b' && exit 1 $TEST 'y/a/b/c/d' && exit 1 $TEST '!' && exit 1 $TEST supercalifrangolisticexprialidociussupercalifrangolisticexcius set +x exec 0>&3 1>&4 2>&5 } main