multi_test.sh revision 167546 
1263646Sbapt#!/bin/sh -
2#
3# Copyright (c) 1992 Diomidis Spinellis.
4# Copyright (c) 1992, 1993
5#	The Regents of the University of California.  All rights reserved.
6#
7# Redistribution and use in source and binary forms, with or without
8# modification, are permitted provided that the following conditions
9# are met:
10# 1. Redistributions of source code must retain the above copyright
11#    notice, this list of conditions and the following disclaimer.
12# 2. Redistributions in binary form must reproduce the above copyright
13#    notice, this list of conditions and the following disclaimer in the
14#    documentation and/or other materials provided with the distribution.
15# 4. Neither the name of the University nor the names of its contributors
16#    may be used to endorse or promote products derived from this software
17#    without specific prior written permission.
18#
19# THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22# ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25# OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26# HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29# SUCH DAMAGE.
30#
31#	@(#)sed.test	8.1 (Berkeley) 6/6/93
32#
33#	$FreeBSD: head/tools/regression/usr.bin/sed/multitest.t 167546 2007-03-14 09:47:00Z dds $
34#
35
36# sed Regression Tests
37#
38# The following files are created:
39# lines[1-4], script1, script2
40# Two directories *.out contain the test results
41
42main()
43{
44	#BASE=/usr/bin/sed
45	BASE=/usr/ports/textproc/gsed/work/sed-4.1.5/sed/sed
46	BASELOG=sed.out
47	#TEST=`cd ..; make whereobj`/sed
48	TEST=/home/dds/src/fbsd-head/sed/sed
49	TESTLOG=nsed.out
50	DICT=/usr/share/dict/words
51
52	#test_error | more
53
54	awk 'END { for (i = 1; i < 15; i++) print "l1_" i}' </dev/null >lines1
55	awk 'END { for (i = 1; i < 10; i++) print "l2_" i}' </dev/null >lines2
56
57	exec 4>&1 5>&2
58
59	# Set these flags to get messages about known problems
60	BSD=0
61	GNU=1
62	SUN=0
63	tests $BASE $BASELOG
64
65	BSD=1
66	GNU=0
67	SUN=0
68	tests $TEST $TESTLOG
69	exec 1>&4 2>&5
70	diff -c $BASELOG $TESTLOG | more
71}
72
73tests()
74{
75	SED=$1
76	DIR=$2
77	rm -rf $DIR
78	mkdir $DIR
79	MARK=100
80
81	test_args
82	test_addr
83	echo Testing commands
84	test_group
85	test_acid
86	test_branch
87	test_pattern
88	test_print
89	test_subst
90}
91
92mark()
93{
94	MARK=`expr $MARK + 1`
95	exec 1>&4 2>&5
96	exec >"$DIR/${MARK}_$1"
97	echo "Test $1:$MARK"
98	# Uncomment this line to match tests with sed error messages
99	echo "Test $1:$MARK" >&5
100}
101
102test_args()
103{
104	mark '1.1'
105	echo Testing argument parsing
106	echo First type
107	if [ $SUN -eq 1 ] ; then
108		echo SunOS sed prints only with -n
109	else
110		$SED 's/^/e1_/p' lines1
111	fi
112	mark '1.2' ; $SED -n 's/^/e1_/p' lines1
113	mark '1.3'
114	if [ $SUN -eq 1 ] ; then
115		echo SunOS sed prints only with -n
116	else
117		$SED 's/^/e1_/p' <lines1
118	fi
119	mark '1.4' ; $SED -n 's/^/e1_/p' <lines1
120	echo Second type
121	mark '1.4.1'
122	if [ $SUN -eq 1 ] ; then
123		echo SunOS sed fails this
124	fi
125	$SED -e '' <lines1
126	echo 's/^/s1_/p' >script1
127	echo 's/^/s2_/p' >script2
128	mark '1.5'
129	if [ $SUN -eq 1 ] ; then
130		echo SunOS sed prints only with -n
131	else
132		$SED -f script1 lines1
133	fi
134	mark '1.6'
135	if [ $SUN -eq 1 ] ; then
136		echo SunOS sed prints only with -n
137	else
138		$SED -f script1 <lines1
139	fi
140	mark '1.7'
141	if [ $SUN -eq 1 ] ; then
142		echo SunOS sed prints only with -n
143	else
144		$SED -e 's/^/e1_/p' lines1
145	fi
146	mark '1.8'
147	if [ $SUN -eq 1 ] ; then
148		echo SunOS sed prints only with -n
149	else
150		$SED -e 's/^/e1_/p' <lines1
151	fi
152	mark '1.9' ; $SED -n -f script1 lines1
153	mark '1.10' ; $SED -n -f script1 <lines1
154	mark '1.11' ; $SED -n -e 's/^/e1_/p' lines1
155	mark '1.12'
156	if [ $SUN -eq 1 ] ; then
157		echo SunOS sed prints only with -n
158	else
159		$SED -n -e 's/^/e1_/p' <lines1
160	fi
161	mark '1.13'
162	if [ $SUN -eq 1 ] ; then
163		echo SunOS sed prints only with -n
164	else
165		$SED -e 's/^/e1_/p' -e 's/^/e2_/p' lines1
166	fi
167	mark '1.14'
168	if [ $SUN -eq 1 ] ; then
169		echo SunOS sed prints only with -n
170	else
171		$SED -f script1 -f script2 lines1
172	fi
173	mark '1.15'
174	if [ $SUN -eq 1 ] ; then
175		echo SunOS sed fails this following older POSIX draft
176	else
177		$SED -e 's/^/e1_/p' -f script1 lines1
178	fi
179	mark '1.16'
180	if [ $SUN -eq 1 ] ; then
181		echo SunOS sed prints only with -n
182	else
183		$SED -e 's/^/e1_/p' lines1 lines1
184	fi
185	# POSIX D11.2:11251
186	mark '1.17' ; $SED p <lines1 lines1
187cat >script1 <<EOF
188#n
189# A comment
190
191p
192EOF
193	mark '1.18' ; $SED -f script1 <lines1 lines1
194}
195
196test_addr()
197{
198	echo Testing address ranges
199	mark '2.1' ; $SED -n -e '4p' lines1
200	mark '2.2' ; $SED -n -e '20p' lines1 lines2
201	mark '2.3' ; $SED -n -e '$p' lines1
202	mark '2.4' ; $SED -n -e '$p' lines1 lines2
203	mark '2.5' ; $SED -n -e '$a\
204hello' /dev/null
205	mark '2.6' ; $SED -n -e '$p' lines1 /dev/null lines2
206	# Should not print anything
207	mark '2.7' ; $SED -n -e '20p' lines1
208	mark '2.8' ; $SED -n -e '/NOTFOUND/p' lines1
209	mark '2.9' ; $SED -n '/l1_7/p' lines1
210	mark '2.10' ; $SED -n ' /l1_7/ p' lines1
211	mark '2.11' ; $SED -n '\_l1\_7_p' lines1
212	mark '2.12' ; $SED -n '1,4p' lines1
213	mark '2.13' ; $SED -n '1,$p' lines1 lines2
214	mark '2.14' ; $SED -n '1,/l2_9/p' lines1 lines2
215	mark '2.15' ; $SED -n '/4/,$p' lines1 lines2
216	mark '2.16' ; $SED -n '/4/,20p' lines1 lines2
217	mark '2.17' ; $SED -n '/4/,/10/p' lines1 lines2
218	mark '2.18' ; $SED -n '/l2_3/,/l1_8/p' lines1 lines2
219	mark '2.19' ; $SED -n '12,3p' lines1 lines2
220	mark '2.20' ; $SED -n '/l1_7/,3p' lines1 lines2
221}
222
223test_group()
224{
225	echo Brace and other grouping
226	mark '3.1' ; $SED -e '
2274,12 {
228	s/^/^/
229	s/$/$/
230	s/_/T/
231}' lines1
232	mark '3.2' ; $SED -e '
2334,12 {
234	s/^/^/
235	/6/,/10/ {
236		s/$/$/
237		/8/ s/_/T/
238	}
239}' lines1
240	mark '3.3' ; $SED -e '
2414,12 !{
242	s/^/^/
243	/6/,/10/ !{
244		s/$/$/
245		/8/ !s/_/T/
246	}
247}' lines1
248	mark '3.4' ; $SED -e '4,12!s/^/^/' lines1
249}
250
251test_acid()
252{
253	echo Testing a c d and i commands
254	mark '4.1' ; $SED -n -e '
255s/^/before_i/p
25620i\
257inserted
258s/^/after_i/p
259' lines1 lines2
260	mark '4.2' ; $SED -n -e '
2615,12s/^/5-12/
262s/^/before_a/p
263/5-12/a\
264appended
265s/^/after_a/p
266' lines1 lines2
267	mark '4.3'
268	$SED -n -e '
269s/^/^/p
270/l1_/a\
271appended
2728,10N
273s/$/$/p
274' lines1 lines2
275	mark '4.4' ; $SED -n -e '
276c\
277hello
278' lines1
279	mark '4.5' ; $SED -n -e '
2808c\
281hello
282' lines1
283	mark '4.6' ; $SED -n -e '
2843,14c\
285hello
286' lines1
287# SunOS and GNU sed behave differently.   We follow POSIX
288#	mark '4.7' ; $SED -n -e '
289#8,3c\
290#hello
291#' lines1
292	mark '4.8' ; $SED d <lines1
293}
294
295test_branch()
296{
297	echo Testing labels and branching
298	mark '5.1' ; $SED -n -e '
299b label4
300:label3
301s/^/label3_/p
302b end
303:label4
3042,12b label1
305b label2
306:label1
307s/^/label1_/p
308b
309:label2
310s/^/label2_/p
311b label3
312:end
313' lines1
314	mark '5.2'
315	$SED -n -e '
316s/l1_/l2_/
317t ok
318b
319:ok
320s/^/tested /p
321' lines1 lines2
322# SunOS sed behaves differently here.  Clarification needed.
323#	mark '5.3' ; $SED -n -e '
324#5,8b inside
325#1,5 {
326#	s/^/^/p
327#	:inside
328#	s/$/$/p
329#}
330#' lines1
331# Check that t clears the substitution done flag
332	mark '5.4' ; $SED -n -e '
3331,8s/^/^/
334t l1
335:l1
336t l2
337s/$/$/p
338b
339:l2
340s/^/ERROR/
341' lines1
342# Check that reading a line clears the substitution done flag
343	mark '5.5'
344	$SED -n -e '
345t l2
3461,8s/^/^/p
3472,7N
348b
349:l2
350s/^/ERROR/p
351' lines1
352	mark '5.6' ; $SED 5q lines1
353	mark '5.7' ; $SED -e '
3545i\
355hello
3565q' lines1
357# Branch across block boundary
358	mark '5.8' ; $SED -e '
359{
360:b
361}
362s/l/m/
363tb' lines1
364}
365
366test_pattern()
367{
368echo Pattern space commands
369# Check that the pattern space is deleted
370	mark '6.1' ; $SED -n -e '
371c\
372changed
373p
374' lines1
375	mark '6.2' ; $SED -n -e '
3764d
377p
378' lines1
379# SunOS sed refused to print here
380#	mark '6.3' ; $SED -e '
381#N
382#N
383#N
384#D
385#P
386#4p
387#' lines1
388	mark '6.4' ; $SED -e '
3892h
3903H
3914g
3925G
3936x
3946p
3956x
3966p
397' lines1
398	mark '6.5' ; $SED -e '4n' lines1
399	mark '6.6' ; $SED -n -e '4n' lines1
400}
401
402test_print()
403{
404	echo Testing print and file routines
405	awk 'END {for (i = 1; i < 256; i++) printf("%c", i);print "\n"}' \
406		</dev/null >lines3
407	# GNU and SunOS sed behave differently here
408	mark '7.1'
409	$SED -n l lines3
410	mark '7.2' ; $SED -e '/l2_/=' lines1 lines2
411	rm -f lines4
412	mark '7.3' ; $SED -e '3,12w lines4' lines1
413	echo w results
414	cat lines4
415	mark '7.4' ; $SED -e '4r lines2' lines1
416	mark '7.5' ; $SED -e '5r /dev/dds' lines1
417	mark '7.6' ; $SED -e '6r /dev/null' lines1
418	mark '7.7'
419	sed '200q' $DICT | sed 's$.*$s/^/&/w tmpdir/&$' >script1
420	rm -rf tmpdir
421	mkdir tmpdir
422	$SED -f script1 lines1
423	cat tmpdir/*
424	rm -rf tmpdir
425	mark '7.8'
426	if [ $BSD -eq 1 ] ; then
427		echo BSD sed cannot pass 7.8
428	else
429		echo line1 > lines3
430		echo "" >> lines3
431		$SED -n -e '$p' lines3 /dev/null
432	fi
433		
434}
435
436test_subst()
437{
438	echo Testing substitution commands
439	mark '8.1' ; $SED -e 's/./X/g' lines1
440	mark '8.2' ; $SED -e 's,.,X,g' lines1
441# GNU and SunOS sed thinks we are escaping . as wildcard, not as separator
442#	mark '8.3' ; $SED -e 's.\..X.g' lines1
443# POSIX does not say that this should work
444#	mark '8.4' ; $SED -e 's/[/]/Q/' lines1
445	mark '8.4' ; $SED -e 's/[\/]/Q/' lines1
446	mark '8.5' ; $SED -e 's_\__X_' lines1
447	mark '8.6' ; $SED -e 's/./(&)/g' lines1
448	mark '8.7' ; $SED -e 's/./(\&)/g' lines1
449	mark '8.8' ; $SED -e 's/\(.\)\(.\)\(.\)/x\3x\2x\1/g' lines1
450	mark '8.9' ; $SED -e 's/_/u0\
451u1\
452u2/g' lines1
453	mark '8.10'
454	if [ $BSD -eq 1 -o $GNU -eq 1 ] ; then
455		echo 'BSD/GNU sed do not understand digit flags on s commands'
456	fi
457	$SED -e 's/./X/4' lines1
458	rm -f lines4
459	mark '8.11' ; $SED -e 's/1/X/w lines4' lines1
460	echo s wfile results
461	cat lines4
462	mark '8.12' ; $SED -e 's/[123]/X/g' lines1
463	mark '8.13' ; $SED -e 'y/0123456789/9876543210/' lines1
464	mark '8.14' ; 
465	if [ $BSD -eq 1 -o $GNU -eq 1 -o $SUN -eq 1 ] ; then
466		echo BSD/GNU/SUN sed fail this test
467	else
468		$SED -e 'y10\123456789198765432\101' lines1
469	fi
470	mark '8.15' ; $SED -e '1N;2y/\n/X/' lines1
471	mark '8.16'
472	echo 'eeefff' | $SED -e '
473		p
474		s/e/X/p
475		:x
476		s//Y/p 
477		# Establish limit counter in the hold space
478		# GNU sed version 3.02 enters into an infinite loop here
479		x 
480		/.\{10\}/ {
481			s/.*/ERROR/
482			b
483		}
484		s/.*/&./
485		x 
486		/f/bx
487	'
488}
489
490test_error()
491{
492	exec 0>&3 4>&1 5>&2
493	exec 0</dev/null
494	exec 2>&1
495	set -x
496	$TEST -x && exit 1
497	$TEST -f && exit 1
498	$TEST -e && exit 1
499	$TEST -f /dev/dds && exit 1
500	$TEST p /dev/dds && exit 1
501	$TEST -f /bin/sh && exit 1
502	$TEST '{' && exit 1
503	$TEST '{' && exit 1
504	$TEST '/hello/' && exit 1
505	$TEST '1,/hello/' && exit 1
506	$TEST -e '-5p' && exit 1
507	$TEST '/jj' && exit 1
508	$TEST 'a hello' && exit 1
509	$TEST 'a \ hello' && exit 1
510	$TEST 'b foo' && exit 1
511	$TEST 'd hello' && exit 1
512	$TEST 's/aa' && exit 1
513	$TEST 's/aa/' && exit 1
514	$TEST 's/a/b' && exit 1
515	$TEST 's/a/b/c/d' && exit 1
516	$TEST 's/a/b/ 1 2' && exit 1
517	$TEST 's/a/b/ 1 g' && exit 1
518	$TEST 's/a/b/w' && exit 1
519	$TEST 'y/aa' && exit 1
520	$TEST 'y/aa/b/' && exit 1
521	$TEST 'y/aa/' && exit 1
522	$TEST 'y/a/b' && exit 1
523	$TEST 'y/a/b/c/d' && exit 1
524	$TEST '!' && exit 1
525	$TEST supercalifrangolisticexprialidociussupercalifrangolisticexcius
526	set +x
527	exec 0>&3 1>&4 2>&5
528}
529
530main
531