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