| 1 | #!/bin/sh -
 | 
|---|
| 2 | #       $NetBSD: sed.test,v 1.3 1997/01/09 20:21:37 tls Exp $
 | 
|---|
| 3 | #
 | 
|---|
| 4 | # Copyright (c) 1992 Diomidis Spinellis.
 | 
|---|
| 5 | # Copyright (c) 1992, 1993
 | 
|---|
| 6 | #       The Regents of the University of California.  All rights reserved.
 | 
|---|
| 7 | #
 | 
|---|
| 8 | # Redistribution and use in source and binary forms, with or without
 | 
|---|
| 9 | # modification, are permitted provided that the following conditions
 | 
|---|
| 10 | # are met:
 | 
|---|
| 11 | # 1. Redistributions of source code must retain the above copyright
 | 
|---|
| 12 | #    notice, this list of conditions and the following disclaimer.
 | 
|---|
| 13 | # 2. Redistributions in binary form must reproduce the above copyright
 | 
|---|
| 14 | #    notice, this list of conditions and the following disclaimer in the
 | 
|---|
| 15 | #    documentation and/or other materials provided with the distribution.
 | 
|---|
| 16 | # 3. All advertising materials mentioning features or use of this software
 | 
|---|
| 17 | #    must display the following acknowledgement:
 | 
|---|
| 18 | #       This product includes software developed by the University of
 | 
|---|
| 19 | #       California, Berkeley and its contributors.
 | 
|---|
| 20 | # 4. Neither the name of the University nor the names of its contributors
 | 
|---|
| 21 | #    may be used to endorse or promote products derived from this software
 | 
|---|
| 22 | #    without specific prior written permission.
 | 
|---|
| 23 | #
 | 
|---|
| 24 | # THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 | 
|---|
| 25 | # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 | 
|---|
| 26 | # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 | 
|---|
| 27 | # ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 | 
|---|
| 28 | # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 | 
|---|
| 29 | # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 | 
|---|
| 30 | # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 | 
|---|
| 31 | # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 | 
|---|
| 32 | # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 | 
|---|
| 33 | # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 | 
|---|
| 34 | # SUCH DAMAGE.
 | 
|---|
| 35 | #
 | 
|---|
| 36 | #       from: @(#)sed.test      8.1 (Berkeley) 6/6/93
 | 
|---|
| 37 | #       $NetBSD: sed.test,v 1.3 1997/01/09 20:21:37 tls Exp $
 | 
|---|
| 38 | #
 | 
|---|
| 39 | 
 | 
|---|
| 40 | # sed Regression Tests
 | 
|---|
| 41 | 
 | 
|---|
| 42 | # Modified by Paolo Bonzini to:
 | 
|---|
| 43 | # - not warn about buggy seds
 | 
|---|
| 44 | # - run tests once instead of comparing them to the system sed
 | 
|---|
| 45 | # - remove most uses of awk
 | 
|---|
| 46 | # - cleanup at exit
 | 
|---|
| 47 | # - comment tests that broke because of extensions
 | 
|---|
| 48 | 
 | 
|---|
| 49 | main()
 | 
|---|
| 50 | {
 | 
|---|
| 51 |         TEST="${1-../sed/sed}"
 | 
|---|
| 52 |         TESTLOG="${2-sed.out}"
 | 
|---|
| 53 |         # DICT="${3-/usr/share/dict/words}"
 | 
|---|
| 54 | 
 | 
|---|
| 55 |         : > lines1
 | 
|---|
| 56 |         : > lines2
 | 
|---|
| 57 |         for i in 1 2 3 4 5 6 7 8 9; do
 | 
|---|
| 58 |           echo l1_$i >> lines1
 | 
|---|
| 59 |           echo l2_$i >> lines2
 | 
|---|
| 60 |         done
 | 
|---|
| 61 |         for i in 10 11 12 13 14; do
 | 
|---|
| 62 |           echo l1_$i >> lines1
 | 
|---|
| 63 |         done
 | 
|---|
| 64 | 
 | 
|---|
| 65 |         # Set these flags to get messages about known problems
 | 
|---|
| 66 |         tests "$TEST" "$TESTLOG"
 | 
|---|
| 67 | 
 | 
|---|
| 68 |         rm -f lines[1234] script[12]
 | 
|---|
| 69 | }
 | 
|---|
| 70 | 
 | 
|---|
| 71 | tests()
 | 
|---|
| 72 | {
 | 
|---|
| 73 |         SED="$1"
 | 
|---|
| 74 |         LOG="$2"
 | 
|---|
| 75 |         MARK=100
 | 
|---|
| 76 |         rm -f "$LOG"
 | 
|---|
| 77 | 
 | 
|---|
| 78 |         exec 3>&0 4>&1 5>&2
 | 
|---|
| 79 |         exec 0</dev/null 1>/dev/null 2>/dev/null
 | 
|---|
| 80 |         test_error
 | 
|---|
| 81 |         exec 0>&3 1>&4 2>&5
 | 
|---|
| 82 | 
 | 
|---|
| 83 |         exec 4>&1 5>&2
 | 
|---|
| 84 |         test_args
 | 
|---|
| 85 |         test_addr
 | 
|---|
| 86 |         test_group
 | 
|---|
| 87 |         test_acid
 | 
|---|
| 88 |         test_branch
 | 
|---|
| 89 |         test_pattern
 | 
|---|
| 90 |         test_print
 | 
|---|
| 91 |         test_subst
 | 
|---|
| 92 |         exec 1>&4 2>&5
 | 
|---|
| 93 | }
 | 
|---|
| 94 | 
 | 
|---|
| 95 | mark()
 | 
|---|
| 96 | {
 | 
|---|
| 97 |         exec 2>&1 >>$LOG
 | 
|---|
| 98 |         test $MARK = 100 || echo
 | 
|---|
| 99 |         MARK=`expr $MARK + 1`
 | 
|---|
| 100 |         echo "Test $1:$MARK" | sed 's/./=/g'
 | 
|---|
| 101 |         echo "Test $1:$MARK"
 | 
|---|
| 102 |         echo "Test $1:$MARK" | sed 's/./=/g'
 | 
|---|
| 103 | }
 | 
|---|
| 104 | 
 | 
|---|
| 105 | test_args()
 | 
|---|
| 106 | {
 | 
|---|
| 107 |         mark '1.1'
 | 
|---|
| 108 |         echo Testing argument parsing
 | 
|---|
| 109 |         echo First type
 | 
|---|
| 110 |         $SED 's/^/e1_/p' lines1
 | 
|---|
| 111 |         mark '1.2' ; $SED -n 's/^/e1_/p' lines1
 | 
|---|
| 112 |         mark '1.3' ; $SED 's/^/e1_/p' <lines1
 | 
|---|
| 113 |         mark '1.4' ; $SED -n 's/^/e1_/p' <lines1
 | 
|---|
| 114 |         echo Second type
 | 
|---|
| 115 |         mark '1.4.1'
 | 
|---|
| 116 |         $SED -e '' <lines1
 | 
|---|
| 117 |         echo 's/^/s1_/p' >script1
 | 
|---|
| 118 |         echo 's/^/s2_/p' >script2
 | 
|---|
| 119 |         mark '1.5' ; $SED -f script1 lines1
 | 
|---|
| 120 |         mark '1.6' ; $SED -f script1 <lines1
 | 
|---|
| 121 |         mark '1.7' ; $SED -e 's/^/e1_/p' lines1
 | 
|---|
| 122 |         mark '1.8' ; $SED -e 's/^/e1_/p' <lines1
 | 
|---|
| 123 |         mark '1.9' ; $SED -n -f script1 lines1
 | 
|---|
| 124 |         mark '1.10' ; $SED -n -f script1 <lines1
 | 
|---|
| 125 |         mark '1.11' ; $SED -n -e 's/^/e1_/p' lines1
 | 
|---|
| 126 |         mark '1.12' ; $SED -n -e 's/^/e1_/p' <lines1
 | 
|---|
| 127 |         mark '1.13' ; $SED -e 's/^/e1_/p' -e 's/^/e2_/p' lines1
 | 
|---|
| 128 |         mark '1.14' ; $SED -f script1 -f script2 lines1
 | 
|---|
| 129 |         mark '1.15' ; $SED -e 's/^/e1_/p' -f script1 lines1
 | 
|---|
| 130 |         mark '1.16' ; $SED -e 's/^/e1_/p' lines1 lines1
 | 
|---|
| 131 |         # POSIX D11.2:11251
 | 
|---|
| 132 |         mark '1.17' ; $SED p <lines1 lines1
 | 
|---|
| 133 | cat >script1 <<EOF
 | 
|---|
| 134 | #n
 | 
|---|
| 135 | # A comment
 | 
|---|
| 136 | 
 | 
|---|
| 137 | p
 | 
|---|
| 138 | EOF
 | 
|---|
| 139 |         mark '1.18' ; $SED -f script1 <lines1 lines1
 | 
|---|
| 140 | }
 | 
|---|
| 141 | 
 | 
|---|
| 142 | test_addr()
 | 
|---|
| 143 | {
 | 
|---|
| 144 |         echo Testing address ranges
 | 
|---|
| 145 |         mark '2.1' ; $SED -n -e '4p' lines1
 | 
|---|
| 146 |         mark '2.2' ; $SED -n -e '20p' lines1 lines2
 | 
|---|
| 147 |         mark '2.3' ; $SED -n -e '$p' lines1
 | 
|---|
| 148 |         mark '2.4' ; $SED -n -e '$p' lines1 lines2
 | 
|---|
| 149 |         mark '2.5' ; $SED -n -e '$a\
 | 
|---|
| 150 | hello' /dev/null
 | 
|---|
| 151 |         mark '2.6' ; $SED -n -e '$p' lines1 /dev/null lines2
 | 
|---|
| 152 |         # Should not print anything
 | 
|---|
| 153 |         mark '2.7' ; $SED -n -e '20p' lines1
 | 
|---|
| 154 |         # Disabled because it is undefined behavior
 | 
|---|
| 155 |         # mark '2.8' ; $SED -n -e '0p' lines1
 | 
|---|
| 156 |         mark '2.9' ; $SED -n '/l1_7/p' lines1
 | 
|---|
| 157 |         mark '2.10' ; $SED -n ' /l1_7/ p' lines1
 | 
|---|
| 158 |         mark '2.11' ; $SED -n '\_l1\_7_p' lines1
 | 
|---|
| 159 |         mark '2.12' ; $SED -n '1,4p' lines1
 | 
|---|
| 160 |         mark '2.13' ; $SED -n '1,$p' lines1 lines2
 | 
|---|
| 161 |         mark '2.14' ; $SED -n '1,/l2_9/p' lines1 lines2
 | 
|---|
| 162 |         mark '2.15' ; $SED -n '/4/,$p' lines1 lines2
 | 
|---|
| 163 |         mark '2.16' ; $SED -n '/4/,20p' lines1 lines2
 | 
|---|
| 164 |         mark '2.17' ; $SED -n '/4/,/10/p' lines1 lines2
 | 
|---|
| 165 |         mark '2.18' ; $SED -n '/l2_3/,/l1_8/p' lines1 lines2
 | 
|---|
| 166 |         mark '2.19' ; $SED -n '12,3p' lines1 lines2
 | 
|---|
| 167 |         mark '2.20' ; $SED -n '/l1_7/,3p' lines1 lines2
 | 
|---|
| 168 | }
 | 
|---|
| 169 | 
 | 
|---|
| 170 | test_group()
 | 
|---|
| 171 | {
 | 
|---|
| 172 |         echo Brace and other grouping
 | 
|---|
| 173 |         mark '3.1' ; $SED -e '
 | 
|---|
| 174 | 4,12 {
 | 
|---|
| 175 |         s/^/^/
 | 
|---|
| 176 |         s/$/$/
 | 
|---|
| 177 |         s/_/T/
 | 
|---|
| 178 | }' lines1
 | 
|---|
| 179 |         mark '3.2' ; $SED -e '
 | 
|---|
| 180 | 4,12 {
 | 
|---|
| 181 |         s/^/^/
 | 
|---|
| 182 |         /6/,/10/ {
 | 
|---|
| 183 |                 s/$/$/
 | 
|---|
| 184 |                 /8/ s/_/T/
 | 
|---|
| 185 |         }
 | 
|---|
| 186 | }' lines1
 | 
|---|
| 187 |         mark '3.3' ; $SED -e '
 | 
|---|
| 188 | 4,12 !{
 | 
|---|
| 189 |         s/^/^/
 | 
|---|
| 190 |         /6/,/10/ !{
 | 
|---|
| 191 |                 s/$/$/
 | 
|---|
| 192 |                 /8/ !s/_/T/
 | 
|---|
| 193 |         }
 | 
|---|
| 194 | }' lines1
 | 
|---|
| 195 |         mark '3.4' ; $SED -e '4,12!s/^/^/' lines1
 | 
|---|
| 196 | }
 | 
|---|
| 197 | 
 | 
|---|
| 198 | test_acid()
 | 
|---|
| 199 | {
 | 
|---|
| 200 |         echo Testing a c d and i commands
 | 
|---|
| 201 |         mark '4.1' ; $SED -n -e '
 | 
|---|
| 202 | s/^/before_i/p
 | 
|---|
| 203 | 20i\
 | 
|---|
| 204 | inserted
 | 
|---|
| 205 | s/^/after_i/p
 | 
|---|
| 206 | ' lines1 lines2
 | 
|---|
| 207 |         mark '4.2' ; $SED -n -e '
 | 
|---|
| 208 | 5,12s/^/5-12/
 | 
|---|
| 209 | s/^/before_a/p
 | 
|---|
| 210 | /5-12/a\
 | 
|---|
| 211 | appended
 | 
|---|
| 212 | s/^/after_a/p
 | 
|---|
| 213 | ' lines1 lines2
 | 
|---|
| 214 |         mark '4.3' ; $SED -n -e '
 | 
|---|
| 215 | s/^/^/p
 | 
|---|
| 216 | /l1_/a\
 | 
|---|
| 217 | appended
 | 
|---|
| 218 | 8,10N
 | 
|---|
| 219 | s/$/$/p
 | 
|---|
| 220 | ' lines1 lines2
 | 
|---|
| 221 |         mark '4.4' ; $SED -n -e '
 | 
|---|
| 222 | c\
 | 
|---|
| 223 | hello
 | 
|---|
| 224 | ' lines1
 | 
|---|
| 225 |         mark '4.5' ; $SED -n -e '
 | 
|---|
| 226 | 8c\
 | 
|---|
| 227 | hello
 | 
|---|
| 228 | ' lines1
 | 
|---|
| 229 |         mark '4.6' ; $SED -n -e '
 | 
|---|
| 230 | 3,14c\
 | 
|---|
| 231 | hello
 | 
|---|
| 232 | ' lines1
 | 
|---|
| 233 |         mark '4.7' ; $SED -n -e '
 | 
|---|
| 234 | 8,3c\
 | 
|---|
| 235 | hello
 | 
|---|
| 236 | ' lines1
 | 
|---|
| 237 |         mark '4.8' ; $SED d <lines1
 | 
|---|
| 238 | }
 | 
|---|
| 239 | 
 | 
|---|
| 240 | test_branch()
 | 
|---|
| 241 | {
 | 
|---|
| 242 |         echo Testing labels and branching
 | 
|---|
| 243 |         mark '5.1' ; $SED -n -e '
 | 
|---|
| 244 | b label4
 | 
|---|
| 245 | :label3
 | 
|---|
| 246 | s/^/label3_/p
 | 
|---|
| 247 | b end
 | 
|---|
| 248 | :label4
 | 
|---|
| 249 | 2,12b label1
 | 
|---|
| 250 | b label2
 | 
|---|
| 251 | :label1
 | 
|---|
| 252 | s/^/label1_/p
 | 
|---|
| 253 | b
 | 
|---|
| 254 | :label2
 | 
|---|
| 255 | s/^/label2_/p
 | 
|---|
| 256 | b label3
 | 
|---|
| 257 | :end
 | 
|---|
| 258 | ' lines1
 | 
|---|
| 259 |         mark '5.2' ; $SED -n -e '
 | 
|---|
| 260 | s/l1_/l2_/
 | 
|---|
| 261 | t ok
 | 
|---|
| 262 | b
 | 
|---|
| 263 | :ok
 | 
|---|
| 264 | s/^/tested /p
 | 
|---|
| 265 | ' lines1 lines2
 | 
|---|
| 266 |         mark '5.3' ; $SED -n -e '
 | 
|---|
| 267 | 5,8b inside
 | 
|---|
| 268 | 1,5 {
 | 
|---|
| 269 |         s/^/^/p
 | 
|---|
| 270 |         :inside
 | 
|---|
| 271 |         s/$/$/p
 | 
|---|
| 272 | }
 | 
|---|
| 273 | ' lines1
 | 
|---|
| 274 | # Check that t clears the substitution done flag
 | 
|---|
| 275 |         mark '5.4' ; $SED -n -e '
 | 
|---|
| 276 | 1,8s/^/^/
 | 
|---|
| 277 | t l1
 | 
|---|
| 278 | :l1
 | 
|---|
| 279 | t l2
 | 
|---|
| 280 | s/$/$/p
 | 
|---|
| 281 | b
 | 
|---|
| 282 | :l2
 | 
|---|
| 283 | s/^/ERROR/
 | 
|---|
| 284 | ' lines1
 | 
|---|
| 285 | # Check that reading a line clears the substitution done flag
 | 
|---|
| 286 |         mark '5.5' ; $SED -n -e '
 | 
|---|
| 287 | t l2
 | 
|---|
| 288 | 1,8s/^/^/p
 | 
|---|
| 289 | 2,7N
 | 
|---|
| 290 | b
 | 
|---|
| 291 | :l2
 | 
|---|
| 292 | s/^/ERROR/p
 | 
|---|
| 293 | ' lines1
 | 
|---|
| 294 |         mark '5.6' ; $SED 5q lines1
 | 
|---|
| 295 |         mark '5.7' ; $SED -e '
 | 
|---|
| 296 | 5i\
 | 
|---|
| 297 | hello
 | 
|---|
| 298 | 5q' lines1
 | 
|---|
| 299 | # Branch across block boundary
 | 
|---|
| 300 |         mark '5.8' ; $SED -e '
 | 
|---|
| 301 | {
 | 
|---|
| 302 | :b
 | 
|---|
| 303 | }
 | 
|---|
| 304 | s/l/m/
 | 
|---|
| 305 | tb' lines1
 | 
|---|
| 306 | }
 | 
|---|
| 307 | 
 | 
|---|
| 308 | test_pattern()
 | 
|---|
| 309 | {
 | 
|---|
| 310 | echo Pattern space commands
 | 
|---|
| 311 | # Check that the pattern space is deleted
 | 
|---|
| 312 |         mark '6.1' ; $SED -n -e '
 | 
|---|
| 313 | c\
 | 
|---|
| 314 | changed
 | 
|---|
| 315 | p
 | 
|---|
| 316 | ' lines1
 | 
|---|
| 317 |         mark '6.2' ; $SED -n -e '
 | 
|---|
| 318 | 4d
 | 
|---|
| 319 | p
 | 
|---|
| 320 | ' lines1
 | 
|---|
| 321 |         mark '6.3' ; $SED -e '
 | 
|---|
| 322 | N
 | 
|---|
| 323 | N
 | 
|---|
| 324 | N
 | 
|---|
| 325 | D
 | 
|---|
| 326 | P
 | 
|---|
| 327 | 4p
 | 
|---|
| 328 | ' lines1
 | 
|---|
| 329 |         mark '6.4' ; $SED -e '
 | 
|---|
| 330 | 2h
 | 
|---|
| 331 | 3H
 | 
|---|
| 332 | 4g
 | 
|---|
| 333 | 5G
 | 
|---|
| 334 | 6x
 | 
|---|
| 335 | 6p
 | 
|---|
| 336 | 6x
 | 
|---|
| 337 | 6p
 | 
|---|
| 338 | ' lines1
 | 
|---|
| 339 |         mark '6.5' ; $SED -e '4n' lines1
 | 
|---|
| 340 |         mark '6.6' ; $SED -n -e '4n' lines1
 | 
|---|
| 341 | }
 | 
|---|
| 342 | 
 | 
|---|
| 343 | test_print()
 | 
|---|
| 344 | {
 | 
|---|
| 345 |         echo Testing print and file routines
 | 
|---|
| 346 |         awk 'END {for (i = 1; i < 256; i++) printf("%c", i);print "\n"}' \
 | 
|---|
| 347 |                 </dev/null >lines3
 | 
|---|
| 348 |         mark '7.1' ; $SED -n l lines3
 | 
|---|
| 349 |         mark '7.2' ; $SED -e '/l2_/=' lines1 lines2
 | 
|---|
| 350 |         rm -f lines4
 | 
|---|
| 351 |         mark '7.3' ; $SED -e '3,12w lines4' lines1
 | 
|---|
| 352 |         echo w results
 | 
|---|
| 353 |         cat lines4
 | 
|---|
| 354 |         mark '7.4' ; $SED -e '4r lines2' lines1
 | 
|---|
| 355 |         mark '7.5' ; $SED -e '5r /dev/dds' lines1
 | 
|---|
| 356 |         mark '7.6' ; $SED -e '6r /dev/null' lines1
 | 
|---|
| 357 |         # mark '7.7'
 | 
|---|
| 358 |         # sed '200q' $DICT | sed 's$.*$s/^/&/w tmpdir/&$' >script1
 | 
|---|
| 359 |         # rm -rf tmpdir
 | 
|---|
| 360 |         # mkdir tmpdir
 | 
|---|
| 361 |         # $SED -f script1 lines1
 | 
|---|
| 362 |         # cat tmpdir/*
 | 
|---|
| 363 |         # rm -rf tmpdir
 | 
|---|
| 364 |         mark '7.8'
 | 
|---|
| 365 |         echo line1 > lines3
 | 
|---|
| 366 |         echo "" >> lines3
 | 
|---|
| 367 |         $SED -n -e '$p' lines3 /dev/null
 | 
|---|
| 368 | }
 | 
|---|
| 369 | 
 | 
|---|
| 370 | test_subst()
 | 
|---|
| 371 | {
 | 
|---|
| 372 |         echo Testing substitution commands
 | 
|---|
| 373 |         mark '8.1' ; $SED -e 's/./X/g' lines1
 | 
|---|
| 374 |         mark '8.2' ; $SED -e 's,.,X,g' lines1
 | 
|---|
| 375 |         mark '8.3' ; $SED -e 's.\..X.g' lines1
 | 
|---|
| 376 | # POSIX does not say that this should work
 | 
|---|
| 377 | #       mark '8.4' ; $SED -e 's/[/]/Q/' lines1
 | 
|---|
| 378 |         mark '8.4' ; $SED -e 's/[\/]/Q/' lines1
 | 
|---|
| 379 |         mark '8.5' ; $SED -e 's_\__X_' lines1
 | 
|---|
| 380 |         mark '8.6' ; $SED -e 's/./(&)/g' lines1
 | 
|---|
| 381 |         mark '8.7' ; $SED -e 's/./(\&)/g' lines1
 | 
|---|
| 382 |         mark '8.8' ; $SED -e 's/\(.\)\(.\)\(.\)/x\3x\2x\1/g' lines1
 | 
|---|
| 383 |         mark '8.9' ; $SED -e 's/_/u0\
 | 
|---|
| 384 | u1\
 | 
|---|
| 385 | u2/g' lines1
 | 
|---|
| 386 |         mark '8.10' ; $SED -e 's/./X/4' lines1
 | 
|---|
| 387 |         rm -f lines4
 | 
|---|
| 388 |         mark '8.11' ; $SED -e 's/1/X/w lines4' lines1
 | 
|---|
| 389 |         echo s wfile results
 | 
|---|
| 390 |         cat lines4
 | 
|---|
| 391 |         mark '8.12' ; $SED -e 's/[123]/X/g' lines1
 | 
|---|
| 392 |         mark '8.13' ; $SED -e 'y/0123456789/9876543210/' lines1
 | 
|---|
| 393 |         mark '8.14' ; $SED -e 'y10\123456789198765432\101' lines1
 | 
|---|
| 394 |         mark '8.15' ; $SED -e '1N;2y/\n/X/' lines1
 | 
|---|
| 395 |         mark '8.16'
 | 
|---|
| 396 |         echo 'eeefff' | $SED -e 'p' -e 's/e/X/p' -e ':x' \
 | 
|---|
| 397 |             -e 's//Y/p' -e '/f/bx'
 | 
|---|
| 398 |         mark '8.17' ; $SED -e 's&.&\&&g' lines1
 | 
|---|
| 399 | }
 | 
|---|
| 400 | 
 | 
|---|
| 401 | test_error()
 | 
|---|
| 402 | {
 | 
|---|
| 403 |         $SED -x && exit 1
 | 
|---|
| 404 |         $SED -f && exit 1
 | 
|---|
| 405 |         $SED -e && exit 1
 | 
|---|
| 406 |         $SED -f /dev/dds && exit 1
 | 
|---|
| 407 |         $SED p /dev/dds && exit 1
 | 
|---|
| 408 |         $SED -f /bin/sh && exit 1
 | 
|---|
| 409 |         $SED '{' && exit 1
 | 
|---|
| 410 |         $SED '{' && exit 1
 | 
|---|
| 411 |         $SED '/hello/' && exit 1
 | 
|---|
| 412 |         $SED '1,/hello/' && exit 1
 | 
|---|
| 413 |         $SED -e '-5p' && exit 1
 | 
|---|
| 414 |         $SED '/jj' && exit 1
 | 
|---|
| 415 |         # $SED 'a hello' && exit 1
 | 
|---|
| 416 |         # $SED 'a \ hello' && exit 1
 | 
|---|
| 417 |         $SED 'b foo' && exit 1
 | 
|---|
| 418 |         $SED 'd hello' && exit 1
 | 
|---|
| 419 |         $SED 's/aa' && exit 1
 | 
|---|
| 420 |         $SED 's/aa/' && exit 1
 | 
|---|
| 421 |         $SED 's/a/b' && exit 1
 | 
|---|
| 422 |         $SED 's/a/b/c/d' && exit 1
 | 
|---|
| 423 |         $SED 's/a/b/ 1 2' && exit 1
 | 
|---|
| 424 |         # $SED 's/a/b/ 1 g' && exit 1
 | 
|---|
| 425 |         $SED 's/a/b/w' && exit 1
 | 
|---|
| 426 |         $SED 'y/aa' && exit 1
 | 
|---|
| 427 |         $SED 'y/aa/b/' && exit 1
 | 
|---|
| 428 |         $SED 'y/aa/' && exit 1
 | 
|---|
| 429 |         $SED 'y/a/b' && exit 1
 | 
|---|
| 430 |         $SED 'y/a/b/c/d' && exit 1
 | 
|---|
| 431 |         $SED '!' && exit 1
 | 
|---|
| 432 |         $SED supercalifrangolisticexprialidociussupercalifrangolisticexcius
 | 
|---|
| 433 | }
 | 
|---|
| 434 | 
 | 
|---|
| 435 | main ${1+"$@"}
 | 
|---|