]> CyberLeo.Net >> Repos - FreeBSD/releng/8.0.git/blob - tools/regression/usr.bin/sed/multitest.t
Adjust to reflect 8.0-RELEASE.
[FreeBSD/releng/8.0.git] / tools / regression / usr.bin / sed / multitest.t
1 #!/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$
34 #
35
36 # sed Regression Tests
37 #
38 # The directory regress.test.out contains the expected test results
39 #
40 # These are the regression tests created during the development of the
41 # BSD sed.  The reference file naming scheme used in this script can't
42 # handle gracefully the insertion of new tests between existing ones.
43 # Therefore, either use the new m4-based regress.t framework, or add
44 # tests after the last existing test.
45
46 main()
47 {
48         cd `dirname $0`
49         REGRESS=regress.multitest.out
50         DICT=/usr/share/dict/words
51
52         awk 'END { for (i = 1; i < 15; i++) print "l1_" i}' </dev/null >lines1
53         awk 'END { for (i = 1; i < 10; i++) print "l2_" i}' </dev/null >lines2
54
55         echo "1..121"
56
57         exec 4>&1 5>&2
58         tests
59         exec 1>&4 2>&5
60
61         # Remove temporary files
62         rm -f current.out lines[1-4] script[1-2]
63 }
64
65 tests()
66 {
67         SED=sed
68         MARK=0
69
70         test_args
71         test_addr
72         test_group
73         test_acid
74         test_branch
75         test_pattern
76         test_print
77         test_subst
78         test_error
79         # Handle the result of the last test
80         result
81 }
82
83 # Display a test's result
84 result()
85 {
86         if [ "$TODO" = '1' ] ; then
87                 TODO='TODO '
88         else
89                 TODO=''
90         fi
91         if ! [ -r $REGRESS/${MARK}_${TESTNAME} ] ; then
92                 echo "Seeding $REGRESS/${MARK}_${TESTNAME} with current result" 1>&2
93                 cp current.out $REGRESS/${MARK}_${TESTNAME}
94         fi
95         if diff -c $REGRESS/${MARK}_${TESTNAME} current.out ; then
96                 echo "ok $MARK $TESTNAME # $TODO$COMMENT"
97         else
98                 echo "not ok $MARK $TESTNAME # $TODO$COMMENT"
99         fi 1>&4 2>&5
100 }
101
102 # Mark the beginning of each test
103 mark()
104 {
105         [ $MARK -gt 0 ] && result
106         MARK=`expr $MARK + 1`
107         TESTNAME=$1
108         exec 1>&4 2>&5
109         exec >"current.out"
110 }
111
112 test_args()
113 {
114         COMMENT='Argument parsing - first type'
115         mark '1.1'
116         $SED 's/^/e1_/p' lines1
117         mark '1.2' ; $SED -n 's/^/e1_/p' lines1
118         mark '1.3'
119         $SED 's/^/e1_/p' <lines1
120         mark '1.4' ; $SED -n 's/^/e1_/p' <lines1
121         COMMENT='Argument parsing - second type'
122         mark '1.4.1'
123         $SED -e '' <lines1
124         echo 's/^/s1_/p' >script1
125         echo 's/^/s2_/p' >script2
126         mark '1.5'
127         $SED -f script1 lines1
128         mark '1.6'
129         $SED -f script1 <lines1
130         mark '1.7'
131         $SED -e 's/^/e1_/p' lines1
132         mark '1.8'
133         $SED -e 's/^/e1_/p' <lines1
134         mark '1.9' ; $SED -n -f script1 lines1
135         mark '1.10' ; $SED -n -f script1 <lines1
136         mark '1.11' ; $SED -n -e 's/^/e1_/p' lines1
137         mark '1.12'
138         $SED -n -e 's/^/e1_/p' <lines1
139         mark '1.13'
140         $SED -e 's/^/e1_/p' -e 's/^/e2_/p' lines1
141         mark '1.14'
142         $SED -f script1 -f script2 lines1
143         mark '1.15'
144         $SED -e 's/^/e1_/p' -f script1 lines1
145         mark '1.16'
146         $SED -e 's/^/e1_/p' lines1 lines1
147         # POSIX D11.2:11251
148         mark '1.17' ; $SED p <lines1 lines1
149 cat >script1 <<EOF
150 #n
151 # A comment
152
153 p
154 EOF
155         mark '1.18' ; $SED -f script1 <lines1 lines1
156 }
157
158 test_addr()
159 {
160         COMMENT='Address ranges'
161         mark '2.1' ; $SED -n -e '4p' lines1
162         mark '2.2' ; $SED -n -e '20p' lines1 lines2
163         mark '2.3' ; $SED -n -e '$p' lines1
164         mark '2.4' ; $SED -n -e '$p' lines1 lines2
165         mark '2.5' ; $SED -n -e '$a\
166 hello' /dev/null
167         mark '2.6' ; $SED -n -e '$p' lines1 /dev/null lines2
168         # Should not print anything
169         mark '2.7' ; $SED -n -e '20p' lines1
170         mark '2.8' ; $SED -n -e '/NOTFOUND/p' lines1
171         mark '2.9' ; $SED -n '/l1_7/p' lines1
172         mark '2.10' ; $SED -n ' /l1_7/ p' lines1
173         mark '2.11' ; $SED -n '\_l1\_7_p' lines1
174         mark '2.12' ; $SED -n '1,4p' lines1
175         mark '2.13' ; $SED -n '1,$p' lines1 lines2
176         mark '2.14' ; $SED -n '1,/l2_9/p' lines1 lines2
177         mark '2.15' ; $SED -n '/4/,$p' lines1 lines2
178         mark '2.16' ; $SED -n '/4/,20p' lines1 lines2
179         mark '2.17' ; $SED -n '/4/,/10/p' lines1 lines2
180         mark '2.18' ; $SED -n '/l2_3/,/l1_8/p' lines1 lines2
181         mark '2.19' ; $SED -n '12,3p' lines1 lines2
182         mark '2.20' ; $SED -n '/l1_7/,3p' lines1 lines2
183         mark '2.21' ; $SED -n '13,+4p' lines1 lines2
184         mark '2.22' ; $SED -n '/l1_6/,+2p' lines1 lines2
185 }
186
187 test_group()
188 {
189         COMMENT='Brace and other grouping'
190         mark '3.1' ; $SED -e '
191 4,12 {
192         s/^/^/
193         s/$/$/
194         s/_/T/
195 }' lines1
196         mark '3.2' ; $SED -e '
197 4,12 {
198         s/^/^/
199         /6/,/10/ {
200                 s/$/$/
201                 /8/ s/_/T/
202         }
203 }' lines1
204         mark '3.3' ; $SED -e '
205 4,12 !{
206         s/^/^/
207         /6/,/10/ !{
208                 s/$/$/
209                 /8/ !s/_/T/
210         }
211 }' lines1
212         mark '3.4' ; $SED -e '4,12!s/^/^/' lines1
213 }
214
215 test_acid()
216 {
217         COMMENT='Commands a c d and i'
218         mark '4.1' ; $SED -n -e '
219 s/^/before_i/p
220 20i\
221 inserted
222 s/^/after_i/p
223 ' lines1 lines2
224         mark '4.2' ; $SED -n -e '
225 5,12s/^/5-12/
226 s/^/before_a/p
227 /5-12/a\
228 appended
229 s/^/after_a/p
230 ' lines1 lines2
231         mark '4.3'
232         $SED -n -e '
233 s/^/^/p
234 /l1_/a\
235 appended
236 8,10N
237 s/$/$/p
238 ' lines1 lines2
239         mark '4.4' ; $SED -n -e '
240 c\
241 hello
242 ' lines1
243         mark '4.5' ; $SED -n -e '
244 8c\
245 hello
246 ' lines1
247         mark '4.6' ; $SED -n -e '
248 3,14c\
249 hello
250 ' lines1
251 # SunOS and GNU sed behave differently.   We follow POSIX
252         mark '4.7' ; $SED -n -e '
253 8,3c\
254 hello
255 ' lines1
256         mark '4.8' ; $SED d <lines1
257 }
258
259 test_branch()
260 {
261         COMMENT='Labels and branching'
262         mark '5.1' ; $SED -n -e '
263 b label4
264 :label3
265 s/^/label3_/p
266 b end
267 :label4
268 2,12b label1
269 b label2
270 :label1
271 s/^/label1_/p
272 b
273 :label2
274 s/^/label2_/p
275 b label3
276 :end
277 ' lines1
278         mark '5.2'
279         $SED -n -e '
280 s/l1_/l2_/
281 t ok
282 b
283 :ok
284 s/^/tested /p
285 ' lines1 lines2
286 # SunOS and GNU sed behave as follows: lines 9-$ aren't printed at all
287         mark '5.3' ; $SED -n -e '
288 5,8b inside
289 1,5 {
290         s/^/^/p
291         :inside
292         s/$/$/p
293 }
294 ' lines1
295 # Check that t clears the substitution done flag
296         mark '5.4' ; $SED -n -e '
297 1,8s/^/^/
298 t l1
299 :l1
300 t l2
301 s/$/$/p
302 b
303 :l2
304 s/^/ERROR/
305 ' lines1
306 # Check that reading a line clears the substitution done flag
307         mark '5.5'
308         $SED -n -e '
309 t l2
310 1,8s/^/^/p
311 2,7N
312 b
313 :l2
314 s/^/ERROR/p
315 ' lines1
316         mark '5.6' ; $SED 5q lines1
317         mark '5.7' ; $SED -e '
318 5i\
319 hello
320 5q' lines1
321 # Branch across block boundary
322         mark '5.8' ; $SED -e '
323 {
324 :b
325 }
326 s/l/m/
327 tb' lines1
328 }
329
330 test_pattern()
331 {
332 COMMENT='Pattern space commands'
333 # Check that the pattern space is deleted
334         mark '6.1' ; $SED -n -e '
335 c\
336 changed
337 p
338 ' lines1
339         mark '6.2' ; $SED -n -e '
340 4d
341 p
342 ' lines1
343         mark '6.3'
344         $SED -e 'N;N;N;D' lines1
345         mark '6.4' ; $SED -e '
346 2h
347 3H
348 4g
349 5G
350 6x
351 6p
352 6x
353 6p
354 ' lines1
355         mark '6.5' ; $SED -e '4n' lines1
356         mark '6.6' ; $SED -n -e '4n' lines1
357 }
358
359 test_print()
360 {
361         COMMENT='Print and file routines'
362         awk 'END {for (i = 1; i < 256; i++) printf("%c", i);print "\n"}' \
363                 </dev/null >lines3
364         # GNU and SunOS sed behave differently here
365         mark '7.1'
366         $SED -n l lines3
367         mark '7.2' ; $SED -e '/l2_/=' lines1 lines2
368         rm -f lines4
369         mark '7.3' ; $SED -e '3,12w lines4' lines1
370         COMMENT='w results'
371         cat lines4
372         mark '7.4' ; $SED -e '4r lines2' lines1
373         mark '7.5' ; $SED -e '5r /dev/dds' lines1
374         mark '7.6' ; $SED -e '6r /dev/null' lines1
375         mark '7.7'
376         sed '200q' $DICT | sed 's$.*$s/^/&/w tmpdir/&$' >script1
377         rm -rf tmpdir
378         mkdir tmpdir
379         $SED -f script1 lines1
380         cat tmpdir/*
381         rm -rf tmpdir
382         mark '7.8'
383         echo line1 > lines3
384         echo "" >> lines3
385         TODO=1
386         $SED -n -e '$p' lines3 /dev/null
387                 
388 }
389
390 test_subst()
391 {
392         COMMENT='Substitution commands'
393         mark '8.1' ; $SED -e 's/./X/g' lines1
394         mark '8.2' ; $SED -e 's,.,X,g' lines1
395 # SunOS sed thinks we are escaping . as wildcard, not as separator
396         mark '8.3'
397         $SED -e 's.\..X.g' lines1
398         mark '8.4' ; $SED -e 's/[\/]/Q/' lines1
399         mark '8.5' ; $SED -e 's_\__X_' lines1
400         mark '8.6' ; $SED -e 's/./(&)/g' lines1
401         mark '8.7' ; $SED -e 's/./(\&)/g' lines1
402         mark '8.8' ; $SED -e 's/\(.\)\(.\)\(.\)/x\3x\2x\1/g' lines1
403         mark '8.9' ; $SED -e 's/_/u0\
404 u1\
405 u2/g' lines1
406         mark '8.10'
407         $SED -e 's/./X/4' lines1
408         rm -f lines4
409         mark '8.11' ; $SED -e 's/1/X/w lines4' lines1
410         COMMENT='s wfile results'
411         cat lines4
412         mark '8.12' ; $SED -e 's/[123]/X/g' lines1
413         mark '8.13' ; $SED -e 'y/0123456789/9876543210/' lines1
414         mark '8.14' ; 
415         $SED -e 'y10\123456789198765432\101' lines1
416         mark '8.15' ; $SED -e '1N;2y/\n/X/' lines1
417         mark '8.16'
418         echo 'eeefff' | $SED -e '
419                 p
420                 s/e/X/p
421                 :x
422                 s//Y/p 
423                 # Establish limit counter in the hold space
424                 # GNU sed version 3.02 enters into an infinite loop here
425                 x 
426                 /.\{10\}/ {
427                         s/.*/ERROR/
428                         b
429                 }
430                 s/.*/&./
431                 x 
432                 /f/bx
433         '
434         # POSIX does not say that this should work,
435         # but it does for GNU, BSD, and SunOS
436         mark '8.17' ; $SED -e 's/[/]/Q/' lines1
437 }
438
439 test_error()
440 {
441         COMMENT='Error cases'
442         mark '9.1' ; $SED -x 2>/dev/null ; echo $?
443         mark '9.2' ; $SED -f 2>/dev/null ; echo $?
444         mark '9.3' ; $SED -e 2>/dev/null ; echo $?
445         mark '9.4' ; $SED -f /dev/xyzzyxyzy 2>/dev/null ; echo $?
446         mark '9.5' ; $SED p /dev/xyzzyxyzy 2>/dev/null ; echo $?
447         mark '9.6' ; $SED -f /bin/sh 2>/dev/null ; echo $?
448         mark '9.7' ; $SED '{' 2>/dev/null ; echo $?
449         mark '9.8' ; $SED '{' 2>/dev/null ; echo $?
450         mark '9.9' ; $SED '/hello/' 2>/dev/null ; echo $?
451         mark '9.10' ; $SED '1,/hello/' 2>/dev/null ; echo $?
452         mark '9.11' ; $SED -e '-5p' 2>/dev/null ; echo $?
453         mark '9.12' ; $SED '/jj' 2>/dev/null ; echo $?
454         mark '9.13' ; $SED 'a hello' 2>/dev/null ; echo $?
455         mark '9.14' ; $SED 'a \ hello' 2>/dev/null ; echo $?
456         mark '9.15' ; $SED 'b foo' 2>/dev/null ; echo $?
457         mark '9.16' ; $SED 'd hello' 2>/dev/null ; echo $?
458         mark '9.17' ; $SED 's/aa' 2>/dev/null ; echo $?
459         mark '9.18' ; $SED 's/aa/' 2>/dev/null ; echo $?
460         mark '9.19' ; $SED 's/a/b' 2>/dev/null ; echo $?
461         mark '9.20' ; $SED 's/a/b/c/d' 2>/dev/null ; echo $?
462         mark '9.21' ; $SED 's/a/b/ 1 2' 2>/dev/null ; echo $?
463         mark '9.22' ; $SED 's/a/b/ 1 g' 2>/dev/null ; echo $?
464         mark '9.23' ; $SED 's/a/b/w' 2>/dev/null ; echo $?
465         mark '9.24' ; $SED 'y/aa' 2>/dev/null ; echo $?
466         mark '9.25' ; $SED 'y/aa/b/' 2>/dev/null ; echo $?
467         mark '9.26' ; $SED 'y/aa/' 2>/dev/null ; echo $?
468         mark '9.27' ; $SED 'y/a/b' 2>/dev/null ; echo $?
469         mark '9.28' ; $SED 'y/a/b/c/d' 2>/dev/null ; echo $?
470         mark '9.29' ; $SED '!' 2>/dev/null ; echo $?
471         mark '9.30' ; $SED supercalifrangolisticexprialidociussupercalifrangolisticexcius 2>/dev/null ; echo $?
472         mark '9.31' ; $SED '' /dev/null 2>/dev/null ; echo $?
473 }
474
475 main