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