]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - usr.bin/sed/tests/multi_test.sh
Import DTS includes from 4.19
[FreeBSD/FreeBSD.git] / usr.bin / sed / tests / multi_test.sh
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 # 3. 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 mostly created during the development
41 # of the BSD sed.  Each test should have a unique mark name, which is
42 # used for naming the corresponding file in regress.multitest.out.
43
44 SRCDIR=$(dirname $0)
45
46 main()
47 {
48         REGRESS=${SRCDIR}/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..130"
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/${TESTNAME} ] ; then
91                 echo "Seeding $REGRESS/${TESTNAME} with current result" 1>&2
92                 cp current.out $REGRESS/${TESTNAME}
93         fi
94         if diff -c $REGRESS/${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         mark '2.21' ; $SED -n '13,+4p' lines1 lines2
183         mark '2.22' ; $SED -n '/l1_6/,+2p' lines1 lines2
184         # For PR bin/192108
185         mark '2.23'; $SED -n '12,+1p' lines1
186 }
187
188 test_group()
189 {
190         COMMENT='Brace and other grouping'
191         mark '3.1' ; $SED -e '
192 4,12 {
193         s/^/^/
194         s/$/$/
195         s/_/T/
196 }' lines1
197         mark '3.2' ; $SED -e '
198 4,12 {
199         s/^/^/
200         /6/,/10/ {
201                 s/$/$/
202                 /8/ s/_/T/
203         }
204 }' lines1
205         mark '3.3' ; $SED -e '
206 4,12 !{
207         s/^/^/
208         /6/,/10/ !{
209                 s/$/$/
210                 /8/ !s/_/T/
211         }
212 }' lines1
213         mark '3.4' ; $SED -e '4,12!s/^/^/' lines1
214 }
215
216 test_acid()
217 {
218         COMMENT='Commands a c d and i'
219         mark '4.1' ; $SED -n -e '
220 s/^/before_i/p
221 20i\
222 inserted
223 s/^/after_i/p
224 ' lines1 lines2
225         mark '4.2' ; $SED -n -e '
226 5,12s/^/5-12/
227 s/^/before_a/p
228 /5-12/a\
229 appended
230 s/^/after_a/p
231 ' lines1 lines2
232         mark '4.3'
233         $SED -n -e '
234 s/^/^/p
235 /l1_/a\
236 appended
237 8,10N
238 s/$/$/p
239 ' lines1 lines2
240         mark '4.4' ; $SED -n -e '
241 c\
242 hello
243 ' lines1
244         mark '4.5' ; $SED -n -e '
245 8c\
246 hello
247 ' lines1
248         mark '4.6' ; $SED -n -e '
249 3,14c\
250 hello
251 ' lines1
252 # SunOS and GNU sed behave differently.   We follow POSIX
253         mark '4.7' ; $SED -n -e '
254 8,3c\
255 hello
256 ' lines1
257         mark '4.8' ; $SED d <lines1
258 }
259
260 test_branch()
261 {
262         COMMENT='Labels and branching'
263         mark '5.1' ; $SED -n -e '
264 b label4
265 :label3
266 s/^/label3_/p
267 b end
268 :label4
269 2,12b label1
270 b label2
271 :label1
272 s/^/label1_/p
273 b
274 :label2
275 s/^/label2_/p
276 b label3
277 :end
278 ' lines1
279         mark '5.2'
280         $SED -n -e '
281 s/l1_/l2_/
282 t ok
283 b
284 :ok
285 s/^/tested /p
286 ' lines1 lines2
287 # SunOS and GNU sed behave as follows: lines 9-$ aren't printed at all
288         mark '5.3' ; $SED -n -e '
289 5,8b inside
290 1,5 {
291         s/^/^/p
292         :inside
293         s/$/$/p
294 }
295 ' lines1
296 # Check that t clears the substitution done flag
297         mark '5.4' ; $SED -n -e '
298 1,8s/^/^/
299 t l1
300 :l1
301 t l2
302 s/$/$/p
303 b
304 :l2
305 s/^/ERROR/
306 ' lines1
307 # Check that reading a line clears the substitution done flag
308         mark '5.5'
309         $SED -n -e '
310 t l2
311 1,8s/^/^/p
312 2,7N
313 b
314 :l2
315 s/^/ERROR/p
316 ' lines1
317         mark '5.6' ; $SED 5q lines1
318         mark '5.7' ; $SED -e '
319 5i\
320 hello
321 5q' lines1
322 # Branch across block boundary
323         mark '5.8' ; $SED -e '
324 {
325 :b
326 }
327 s/l/m/
328 tb' lines1
329 }
330
331 test_pattern()
332 {
333 COMMENT='Pattern space commands'
334 # Check that the pattern space is deleted
335         mark '6.1' ; $SED -n -e '
336 c\
337 changed
338 p
339 ' lines1
340         mark '6.2' ; $SED -n -e '
341 4d
342 p
343 ' lines1
344         mark '6.3'
345         $SED -e 'N;N;N;D' lines1
346         mark '6.4' ; $SED -e '
347 2h
348 3H
349 4g
350 5G
351 6x
352 6p
353 6x
354 6p
355 ' lines1
356         mark '6.5' ; $SED -e '4n' lines1
357         mark '6.6' ; $SED -n -e '4n' lines1
358 }
359
360 test_print()
361 {
362         COMMENT='Print and file routines'
363         awk 'END {for (i = 1; i < 256; i++) printf("%c", i);print "\n"}' \
364                 </dev/null >lines3
365         # GNU and SunOS sed behave differently here
366         mark '7.1'
367         $SED -n l lines3
368         mark '7.2' ; $SED -e '/l2_/=' lines1 lines2
369         rm -f lines4
370         mark '7.3' ; $SED -e '3,12w lines4' lines1
371         COMMENT='w results'
372         cat lines4
373         mark '7.4' ; $SED -e '4r lines2' lines1
374         mark '7.5' ; $SED -e '5r /dev/dds' lines1
375         mark '7.6' ; $SED -e '6r /dev/null' lines1
376         mark '7.7'
377         sed '200q' $DICT | sed 's$.*$s/^/&/w tmpdir/&$' >script1
378         rm -rf tmpdir
379         mkdir tmpdir
380         $SED -f script1 lines1
381         cat tmpdir/*
382         rm -rf tmpdir
383         mark '7.8'
384         echo line1 > lines3
385         echo "" >> lines3
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         COMMENT='[ as an s delimiter and its escapes'
439         mark '8.18' ; $SED -e 's[_[X[' lines1
440         # This is a matter of interpretation
441         # POSIX 1003.1, 2004 says "Within the BRE and the replacement,
442         # the BRE delimiter itself can be used as a *literal* character
443         # if it is preceded by a backslash"
444         # SunOS 5.1 /usr/bin/sed and Mac OS X follow the literal POSIX
445         # interpretation.
446         # GNU sed version 4.1.5 treats \[ as the beginning of a character
447         # set specification (both with --posix and without).
448         mark '8.19' ; sed 's/l/[/' lines1 | $SED -e 's[\[.[X['
449         mark '8.20' ; sed 's/l/[/' lines1 | $SED -e 's[\[.[X\[['
450         COMMENT='\ in y command'
451         mark '8.21'
452         echo 'a\b(c' |
453         $SED 'y%ABCDEFGHIJKLMNOPQRSTUVWXYZ, /\\()"%abcdefghijklmnopqrstuvwxyz,------%'
454         COMMENT='\n in a character class and a BRE'
455         mark '8.22' ; (echo 1; echo 2) | $SED -n '1{;N;s/[\n]/X/;p;}'
456         mark '8.23' ; (echo 1; echo 2) | $SED -n '1{;N;s/\n/X/;p;}'
457 }
458
459 test_error()
460 {
461         COMMENT='Error cases'
462         mark '9.1' ; $SED -x 2>/dev/null ; echo $?
463         mark '9.2' ; $SED -f 2>/dev/null ; echo $?
464         mark '9.3' ; $SED -e 2>/dev/null ; echo $?
465         mark '9.4' ; $SED -f /dev/xyzzyxyzy 2>/dev/null ; echo $?
466         mark '9.5' ; $SED p /dev/xyzzyxyzy 2>/dev/null ; echo $?
467         mark '9.6' ; $SED -f /bin/sh 2>/dev/null ; echo $?
468         mark '9.7' ; $SED '{' 2>/dev/null ; echo $?
469         mark '9.8' ; $SED '{' 2>/dev/null ; echo $?
470         mark '9.9' ; $SED '/hello/' 2>/dev/null ; echo $?
471         mark '9.10' ; $SED '1,/hello/' 2>/dev/null ; echo $?
472         mark '9.11' ; $SED -e '-5p' 2>/dev/null ; echo $?
473         mark '9.12' ; $SED '/jj' 2>/dev/null ; echo $?
474         mark '9.13' ; $SED 'a hello' 2>/dev/null ; echo $?
475         mark '9.14' ; $SED 'a \ hello' 2>/dev/null ; echo $?
476         mark '9.15' ; $SED 'b foo' 2>/dev/null ; echo $?
477         mark '9.16' ; $SED 'd hello' 2>/dev/null ; echo $?
478         mark '9.17' ; $SED 's/aa' 2>/dev/null ; echo $?
479         mark '9.18' ; $SED 's/aa/' 2>/dev/null ; echo $?
480         mark '9.19' ; $SED 's/a/b' 2>/dev/null ; echo $?
481         mark '9.20' ; $SED 's/a/b/c/d' 2>/dev/null ; echo $?
482         mark '9.21' ; $SED 's/a/b/ 1 2' 2>/dev/null ; echo $?
483         mark '9.22' ; $SED 's/a/b/ 1 g' 2>/dev/null ; echo $?
484         mark '9.23' ; $SED 's/a/b/w' 2>/dev/null ; echo $?
485         mark '9.24' ; $SED 'y/aa' 2>/dev/null ; echo $?
486         mark '9.25' ; $SED 'y/aa/b/' 2>/dev/null ; echo $?
487         mark '9.26' ; $SED 'y/aa/' 2>/dev/null ; echo $?
488         mark '9.27' ; $SED 'y/a/b' 2>/dev/null ; echo $?
489         mark '9.28' ; $SED 'y/a/b/c/d' 2>/dev/null ; echo $?
490         mark '9.29' ; $SED '!' 2>/dev/null ; echo $?
491         mark '9.30' ; $SED supercalifrangolisticexprialidociussupercalifrangolisticexcius 2>/dev/null ; echo $?
492         mark '9.31' ; $SED '' /dev/null 2>/dev/null ; echo $?
493 }
494
495 main