tests/sed.test

   1 #!/bin/echo Run scripts/test.sh
   2
   3 #testing "name" "command" "result" "infile" "stdin"
   4
   5 testing 'as cat' 'sed ""' "one\ntwo\nthree" "" "one\ntwo\nthree"
   6 # This segfaults ubuntu 12.04's sed. No really.
   7 SKIP_HOST=1 testing 'sed - - twice' 'sed "" - -' "hello\n" "" "hello\n"
   8 testing '-n' 'sed -n ""' "" "" "one\ntwo\nthree"
   9 testing '-n p' 'sed -n p' "one\ntwo\nthree" "" "one\ntwo\nthree"
  10 testing 'explicit pattern' 'sed -e p -n' "one\ntwo\nthree" "" \
  11         "one\ntwo\nthree"
  12
  13 # Exploring the wonders of sed addressing modes
  14 testing '' 'sed -n 1p' "one\n" "" "one\ntwo\nthree"
  15 testing '' 'sed 2p' "one\ntwo\ntwo\nthree" "" "one\ntwo\nthree"
  16 testing '' 'sed -n 2p' "two\n" "" "one\ntwo\nthree"
  17 testing '-n $p' 'sed -n \$p' "three" "" "one\ntwo\nthree"
  18 testing 'as cat #2' "sed -n '1,\$p'" "one\ntwo\nthree" "" "one\ntwo\nthree"
  19 testing 'no input means no last line' "sed '\$a boing'" "" "" ""
  20 testing '-n $,$p' 'sed -n \$,\$p' 'three' '' 'one\ntwo\nthree'
  21 testing '' 'sed -n 1,2p' "one\ntwo\n" "" "one\ntwo\nthree"
  22 testing '' 'sed -n 2,3p' "two\nthree" "" "one\ntwo\nthree"
  23 testing '' 'sed -n 2,1p' "two\n" "" "one\ntwo\nthree"
  24 testing '$ with 2 inputs' 'sed -n \$p - input' "four\n" "four\n" \
  25         "one\ntwo\nthree"
  26 testing '' 'sed -n /two/p' "two\n" "" "one\ntwo\nthree"
  27 testing '' 'sed -n 1,/two/p' 'one\ntwo\n' '' 'one\ntwo\nthree'
  28 testing '' 'sed -n /one/,2p' 'one\ntwo\n' '' 'one\ntwo\nthree'
  29 testing '' 'sed -n 1,/one/p' 'one\ntwo\nthree' '' 'one\ntwo\nthree'
  30 testing '' 'sed -n /one/,1p' 'one\n' '' 'one\ntwo\nthree'
  31 testing 'sed -n /two/,$p' 'sed -n /two/,\$p' 'two\nthree' '' 'one\ntwo\nthree'
  32
  33
  34 # Fun with newlines!
  35 testing '' 'sed -n 3p' "three" "" "one\ntwo\nthree"
  36 testing 'prodigal newline' "sed -n '1,\$p' - input" \
  37         "one\ntwo\nthree\nfour\n" "four\n" "one\ntwo\nthree"
  38 testing 'Newline only added if further output' "sed -n 3p - input" "three" \
  39         "four\n" "one\ntwo\nthree"
  40
  41 # Fun with match delimiters and escapes
  42 testing 'match \t tab' "sed -n '/\t/p'" "\tx\n" "" "\tx\n"
  43 testing 'match t delim disables \t tab' "sed -n '\t\txtp'" "" "" "\tx\n"
  44 testing 'match t delim makes \t literal t' \
  45         "sed -n '\t\txtp'" "tx\n" "" "tx\n"
  46 testing 'match n delim' "sed -n '\n\txnp'" "\tx\n" "" "\tx\n"
  47 testing 'match n delim disables \n newline' "sed -n '\n\nxnp'" "" "" "\nx\n"
  48 SKIP_HOST=1 testing 'match \n literal n' "sed -n '\n\nxnp'" "nx\n" "" "nx\n"
  49 testing 'end match does not check starting match line' \
  50         "sed -n '/two/,/two/p'" "two\nthree" "" "one\ntwo\nthree"
  51 testing 'end match/start match mixing number/letter' \
  52         "sed -n '2,/two/p'" "two\nthree" "" "one\ntwo\nthree"
  53 testing 'num then regex' 'sed -n 2,/d/p' 'b\nc\nd\n' '' 'a\nb\nc\nd\ne\nf\n'
  54 testing 'regex then num' 'sed -n /b/,4p' 'b\nc\nd\n' '' 'a\nb\nc\nd\ne\nf\n'
  55 testing 'multiple regex address match' 'sed -n /on/,/off/p' \
  56         'bone\nturtle\scoff\ntron\nlurid\noffer\n'  "" \
  57         'zap\nbone\nturtle\scoff\nfred\ntron\nlurid\noffer\nbecause\n'
  58 testing 'regex address overlap' 'sed -n /on/,/off/p' "on\nzap\noffon\n" "" \
  59         'on\nzap\noffon\nping\noff\n'
  60 testing 'getdelim with nested [:blah:]' 'sed -n "sa\a[a[:space:]bc]*aXXagp"' \
  61         "ABXXCDXXEFXXGHXXIXX" "" "ABaaCDa EFaa aGHa a Ia "
  62 testing '[ in [[]' "sed 's@[[]@X@g'" "X" "" "["
  63 testing '[[] with ] as delimiter' "sed 's][[]]X]g'" "X" "" "["
  64 testing '[[] with [ as delimiter' "sed 's[\[\[][X['" "X" "" "["
  65
  66 # gGhHlnNpPqrstwxy:=
  67 # s///#comment
  68 # abcdDi
  69
  70 testing 'prodigaler newline' 'sed -e a\\ -e woo' 'one\nwoo\n' '' 'one'
  71 testing "aci" \
  72         "sed -e '3a boom' -e '/hre/i bang' -e '3a whack' -e '3c bong'" \
  73         "one\ntwo\nbang\nbong\nboom\nwhack\nfour\n" "" \
  74         "one\ntwo\nthree\nfour\n"
  75 testing "b loop" "sed ':woo;=;b woo' | head -n 5" '1\n1\n1\n1\n1\n' "" "X"
  76 testing "b skip" "sed -n '2b zap;d;:zap;p'" "two\n" "" "one\ntwo\nthree"
  77 testing "b end" "sed -n '2b;p'" "one\nthree" "" "one\ntwo\nthree"
  78 testing "c range" "sed '2,4c blah'" "one\nblah\nfive\nsix" "" \
  79         "one\ntwo\nthree\nfour\nfive\nsix"
  80 testing "c {range}" "sed -e '2,4{c blah' -e '}'" \
  81         "one\nblah\nblah\nblah\nfive\nsix" \
  82         "" "one\ntwo\nthree\nfour\nfive\nsix"
  83 testing "c multiple continuation" \
  84         "sed -e 'c\\' -e 'two\\' -e ''" "two\n\n" "" "hello"
  85 SKIP_HOST=1 testing "c empty continuation" "sed -e 'c\\'" "\n" "" "hello"
  86 testing "D further processing depends on whether line is blank" \
  87         "sed -e '/one/,/three/{' -e 'i meep' -e'N;2D;}'" \
  88         "meep\nmeep\ntwo\nthree\n" "" "one\ntwo\nthree\n"
  89 testing 'newline staying away' 'sed s/o/x/' 'xne\ntwx' '' 'one\ntwo'
  90
  91 # Why on _earth_ is this not an error? There's a \ with no continuation!
  92 #testing 'sed what, _really_?' 'sed -e a\\ && echo yes really' \
  93 #       'one\nyes really\n' '' 'one\n'
  94
  95 # all the s/// test
  96
  97 testing "match empty line" "sed -e 's/^\$/@/'" "@\n" "" "\n"
  98
  99 testing '\1' "sed 's/t\\(w\\)o/za\\1py/'" "one\nzawpy\nthree" "" \
 100         "one\ntwo\nthree"
 101 testing '\1 p' "sed 's/t\\(w\\)o/za\\1py/p'" "one\nzawpy\nzawpy\nthree" \
 102         "" "one\ntwo\nthree"
 103 testing '\1 no newline' "sed 's/t\\(w\\)o/za\\1py/'" "one\nzawpy" "" \
 104         "one\ntwo"
 105 testing '\1 p no newline' "sed 's/t\\(w\\)o/za\\1py/p'" \
 106         "one\nzawpy\nzawpy" "" "one\ntwo"
 107 testing '-n s//\1/p' "sed -n 's/t\\(w\\)o/za\\1py/p'" "zawpy" "" "one\ntwo"
 108 testing '-n s//\1/p no newline' "sed -n 's/t\\(w\\)o/za\\1py/p'" "zawpy" \
 109         "" "one\ntwo"
 110 testing 'backref error' \
 111         "sed 's/w/ale \2 ha/' >/dev/null 2>/dev/null || echo no" \
 112         "no\n" "" "one\ntwo\nthree"
 113 testing 'empty match after nonempty match' "sed -e 's/a*/c/g'" 'cbcncgc' \
 114         '' 'baaang'
 115 testing 'empty match' "sed -e 's/[^ac]*/A/g'" 'AaAcA' '' 'abcde'
 116 testing 's///#comment' "sed -e 's/TWO/four/i#comment'" "one\nfour\nthree" \
 117         "" "one\ntwo\nthree"
 118
 119 testing 'N flushes pending a and advances match counter' \
 120         "sed -e 'a woo' -e 'N;\$p'" 'woo\none\ntwo\none\ntwo' "" 'one\ntwo'
 121 testing "delimiter in regex [char range] doesn't count" "sed -e 's/[/]//'" \
 122         "onetwo\n" "" 'one/two\n'
 123 testing "delete regex range start line after trigger" \
 124         "sed -e '/one/,/three/{' -e 'i meep' -e '1D;}'" \
 125         "meep\nmeep\ntwo\nmeep\nthree" "" "one\ntwo\nthree"
 126 testing "blank pattern repeats last pattern" \
 127         "sed -e '/^three/s//abc&def/'" \
 128         "one two three\nabcthreedef four five\nfive six seven\n" "" \
 129         "one two three\nthree four five\nfive six seven\n"
 130
 131 # Different ways of parsing line continuations
 132
 133 testing "" "sed -e '1a\' -e 'huh'" "meep\nhuh\n" "" "meep"
 134 testing "" "sed -f input" "blah\nboom\n" '1a\\\nboom' 'blah'
 135 testing "" "sed -f - input" "blah\nboom\n" 'blah' '1a\\\nboom'
 136 testing "" "sed '1a\
 137 hello'" "merp\nhello\n" "" "merp"
 138
 139 testing "" "sed -e '/x/c\' -e 'y'" 'y\n' '' 'x\n'
 140 testing "" "sed -e 's/a[([]*b/X/'" 'X' '' 'a[(b'
 141 testing "" "sed 'y/a\\bc/de\f/'" "db\f" "" "abc"
 142 testing "[a-a] (for perl)" "sed '"'s/\([^a-zA-Z0-9.:_\-\/]\)/\\\1/g'"'" \
 143   'he\ llo' "" "he llo"
 144
 145 # Debian bug https://bugs.debian.org/635570 added code to ensure a file
 146 # ends with a newline via "sed -e '$a\'". Apparently all a\ with no additional
 147 # pattern lines after it does (other than making posix throw up) is
 148 # flush the pending newline as _if_ it had added another line. *shrug* Ok?
 149 testing "trailing a\ (for debian)" "sed 'a\\'" "hello\n" "" "hello"
 150
 151 # You have to match the first line of a range in order to activate
 152 # the range, numeric and ascii work the same way
 153 testing "skip start of range" "sed -e n -e '1,2s/b/c/'" "a\nb\n" "" "a\nb\n"
 154
 155 #echo meep | sed/sed -e '1a\' -e 'huh'
 156 #echo blah | sed/sed -f <(echo -e "1a\\\\\nboom")
 157 #echo merp | sed/sed "1a\\
 158 #hello"
 159
 160 testing "bonus backslashes" \
 161   "sed -e 'a \l \x\' -e \"\$(echo -e 'ab\\\nc')\"" \
 162   "hello\nl x\nab\nc\n" "" "hello\n"
 163 # -i with $ last line test