• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1#!/bin/echo no
2
3# TODO: categorize tests
4
5# TODO https://mywiki.wooledge.org/BashFAQ
6#   http://tiswww.case.edu/php/chet/bash/FAQ
7#   https://mywiki.wooledge.org/BashPitfalls#set_-euo_pipefail
8
9#        // ${#} ${#x} ${#@} ${#x[@]} ${#!} ${!#}
10#        // ${!} ${!@} ${!@Q} ${!x} ${!x@} ${!x@Q} ${!x#} ${!x[} ${!x[*]}
11
12# Looked like a prefix but wasn't: three chars (@ # -) are both paremeter name
13# and slice operator. When immediately followed by } it's parameter, otherwise
14# we did NOT have a prefix and it's an operator.
15#
16# ${#-} ${#-abc}
17# ${##} ${##0}
18# ${#@} ${#@Q}
19#
20# backslash not discarded: echo "abc\"def"
21
22# ${x:-y} use default
23# ${x:=y} assign default (error if positional)
24# ${x:?y} err if null
25# ${x:+y} alt value
26# ${x:off} ${x:off:len} off<0 from end (must ": -"), len<0 also from end must
27#   0-based indexing
28# ${@:off:len} positional parameters, off -1 = len, -len is error
29#   1-based indexing
30
31# [] wins over +()
32# touch 'AB[DEF]'; echo AB[+(DEF]) AB[+(DEF)?
33# AB[+(DEF]) AB[DEF]
34
35# Testing shell corner cases _within_ a shell script is kind of hard.
36
37[ -f testing.sh ] && . testing.sh
38
39# TODO make fake pty wrapper for test infrastructure
40
41#testing "name" "command" "result" "infile" "stdin"
42
43# texpect "name" "command" E/O/I"string"
44
45# Use "bash" name for host, "sh" for toybox
46[ -z "$SH" ] && { [ -z "$TEST_HOST" ] && SH="sh" || export SH="bash" ; }
47# Prompt changes for root/normal user
48[ $(id -u) -eq 0 ] && P='# ' || P='$ '
49# run sufficiently isolated shell child process to get predictable results
50SS="env -i PATH=${PATH@Q} PS1='\\$ ' $SH --noediting --noprofile --norc -is"
51
52shxpect() {
53  X="$1"
54  shift
55  txpect "$X" "$SS" E"$P" "$@" X0
56}
57
58shxpect "prompt and exit" I$'exit\n'
59shxpect "prompt and echo" I$'echo hello\n' O$'hello\n' E"$P"
60shxpect "redirect err" I$'echo > /dev/full\n' E E"$P"
61shxpect "wait for <(exit)" I$'cat <(echo hello 1>&2)\n' E$'hello\n' E"$P"
62
63# Test the sh -c stuff before changing EVAL
64testing '-c "" exit status 0' '$SH -c "" && echo $?' '0\n' '' ''
65testing '-c args' "\$SH -c 'echo \$0,\$1,\$2,\$3' one two three four five" \
66  "one,two,three,four\n" "" ""
67testing '-c args2' "\$SH -c 'echo \${10}' a b c d e f g h i j k l" "k\n" "" ""
68testing '-c arg split' \
69  "$SH -c 'for i in a\"\$@\"b;do echo =\$i=;done;echo \$0' 123 456 789" \
70  "=a456=\n=789b=\n123\n" "" ""
71testing '-c arg split2' \
72  "$SH -c 'for i in a\"\$* \$@\"b; do echo =\$i=;done' one two three four five"\
73  "=atwo three four five two=\n=three=\n=four=\n=fiveb=\n" "" ""
74testing '-c arg count' "$SH -c 'echo \$#' 9 8 7 6 1 2 3 4" "7\n" "" ""
75testing "exec3" '$C -c "{ exec readlink /proc/self/fd/0;} < /proc/self/exe"' \
76  "$(readlink -f $C)\n" "" ""
77testing 'arg shift' "$SH -c '"'for i in "" 2 1 1 1; do echo $? $1; shift $i; done'"' one two three four five" \
78  "0 two\n0 three\n0 five\n0\n1\n" "" ""
79testing '(subshell)' '$SH -c "(echo hello)"' 'hello\n' '' ''
80testing 'syntax' '$SH -c "if true; then echo hello | fi" 2>/dev/null || echo x'\
81  'x\n' '' ''
82
83# The bash man page is lying when it says $_ starts with an absolute path.
84ln -s $(which $SH) bash
85testing 'non-absolute $_' "./bash -c 'echo \$_'" './bash\n' '' ''
86rm bash
87testing '$_ with functions' 'true; x(){ echo $_;}; x abc; echo $_' \
88  'true\nabc\n' '' ''
89
90shxpect '$_ preserved on assignment error' I$'true hello; a=1 b=2 c=${}\n' \
91  E E"$P" I$'echo $_\n' O$'hello\n'
92shxpect '$_ preserved on prefix error' I$'true hello; a=1 b=2 c=${} true\n' \
93  E E"$P" I$'echo $_\n' O$'hello\n'
94shxpect '$_ preserved on exec error' I$'true hello; ${}\n' \
95  E E"$P" I$'echo $_\n' O$'hello\n'
96shxpect '$_ abspath on exec' I$'env | grep ^_=\n' O$'_=/usr/bin/env\n'
97testing '$_ literal after exec' 'env >/dev/null; echo $_' 'env\n' '' ''
98shxpect '$_ no path for builtin' I$'true; echo $_\n' O$'true\n'
99testing 'prefix is local for builtins' 'abc=123; abc=def unset abc; echo $abc' \
100  '123\n' '' ''
101testing 'prefix localizes magic vars' \
102  'SECONDS=123; SECONDS=345 true; echo $SECONDS' '123\n' '' ''
103shxpect 'body evaluated before variable exports' I$'a=x${} y${}\n' RE'y${}'
104testing '$NOTHING clears $_' 'true; $NOTHING; echo $_' '\n' '' ''
105
106testing 'exec exitval' "$SH -c 'exec echo hello' && echo \$?" "hello\n0\n" "" ""
107testing 'simple script' '$SH input' 'input\n' 'echo $0' ''
108testing 'simple script2' '$SH ./input two;echo $?' './input+two\n42\n' \
109  '\necho $0+$1\n\nexit 42' ''
110# this segfaults bash
111toyonly testing 'recursion guard' \
112  '$SH input 2>/dev/null; [ $? -lt 128 ] && echo pass' 'pass\n' \
113  'source input' ''
114testing '$LINENO 1' "$SH input" "1\n" 'echo $LINENO' ''
115
116mkdir sub
117echo echo hello > sub/script
118testing 'simple script in $PATH' "PATH='$PWD/sub:$PATH' $SH script" \
119  'hello\n' '' ''
120rm -rf sub
121
122testing "script file" "chmod +x input; ./input" "hello\n" "#!$C\necho hello" ""
123testing 'IFS $*' "$SH -c 'IFS=xy; echo \"\$*\"' one two tyree" "twoxtyree\n" \
124  "" ""
125# Without the \n\n bash 5 emits SHLVL=0
126testing 'default exports' \
127  "env -i \"$(which $SH)\" --noprofile --norc -c \$'env\n\n' | sort" \
128  "PWD=$(pwd)\nSHLVL=1\n_=$(which env)\n" "" ""
129# toysh order of operations not matching bash
130#testing "leading assignment fail" \
131#  "{ \$SH -c 'X=\${a?blah} > walroid';ls walroid;} 2>/dev/null" '' '' ''
132testing "lineno" "$SH input" "5 one\n6 one\n5 two\n6 two\n" \
133  '#!/bin/bash\n\nfor i in one two\ndo\n  echo $LINENO $i\n  echo $LINENO $i\ndone\n' ""
134testing "eval0" "sh -c 'eval echo \$*' one two three" "two three\n" "" ""
135
136#########################################################################
137# Change EVAL to call sh -c for us, using "bash" explicitly for the host.
138export EVAL="$SH -c"
139
140
141mkdir -p one/two/three
142testing 'cd in renamed dir' \
143  'cd one/two/three && mv ../../../{one,four} && cd .. && echo ${PWD: -9:9}' \
144  '/four/two\n' '' ''
145rm -rf one
146
147testing "smoketest" "echo hello" "hello\n" "" ""
148testing "line break" $'ec\\\nho hello' 'hello\n' '' ''
149testing "assignment" 'x=y; echo $x' 'y\n' '' ''
150testing "+= assignment" 'x+=abc; y=def; y+=$x; echo $y' 'defabc\n' '' ''
151testing "eval" "eval echo hello" "hello\n" "" ""
152testing "eval2" "eval 'echo hello'; echo $?" "hello\n0\n" "" ""
153testing "eval3" 'X="echo hello"; eval "$X"' "hello\n" "" ""
154testing "eval4" 'eval printf '=%s=' \" hello \"' "= hello =" "" ""
155NOSPACE=1 testing "eval5" 'eval echo \" hello \" | wc' ' 1 1 8' "" ""
156testing "exec" "exec echo hello" "hello\n" "" ""
157testing "exec2" "exec echo hello; echo $?" "hello\n" "" ""
158
159# ; | && ||
160testing "semicolon" "echo one;echo two" "one\ntwo\n" "" ""
161testing "simple pipe" "echo hello | cat" "hello\n" "" ""
162testing "&&" "true && echo hello" "hello\n" "" ""
163testing "&&2" "false && echo hello" "" "" ""
164testing "||" "true || echo hello" "" "" ""
165testing "||2" "false || echo hello" "hello\n" "" ""
166testing "&& ||" "true && false && potato || echo hello" "hello\n" "" ""
167testing "&& after function" "x(){ false;};x && echo yes" "" "" ""
168testing "|| after function" "x(){ false;};x || echo yes" "yes\n" "" ""
169
170# redirection
171
172testing "redir1" "cat < input" "hello\n" "hello\n" ""
173testing "redir2" "echo blah >out; cat out" "blah\n" "" ""
174testing "redir3" "echo more >>out; cat out" "blah\nmore\n" "" ""
175testing "redir4" "touch /not/exist 2>out||grep -o /not/exist out" \
176  "/not/exist\n" "" ""
177testing "redir5" "ls out /not/exist &> out2 || wc -l < out2" "2\n" "" ""
178testing "redir6" "ls out /not/exist &>>-abc || wc -l < ./-abc" "2\n" "" ""
179testing "redir7" "ls out /not/exist |& wc -l" "2\n" "" ""
180testing "redir8" 'echo -n $(<input)' "boing" "boing\n" ""
181shxpect "redir9" I$'echo hello > out 2>/does/not/exist\n' E E"$P" \
182  I$'wc -l < out\n' O$'0\n'
183testing "redir10" 'echo hello 3<&3' "hello\n" "" ""
184testing "redir11" 'if :;then echo one;fi {abc}<input; cat <&$abc' \
185  "one\npotato\n" "potato\n" ""
186rm -f out out2 ./-abc
187
188# expansion
189
190testing "tilde expansion" "echo ~" "$HOME\n" "" ""
191testing "tilde2" "echo ~/dir" "$HOME/dir\n" "" ""
192testing "bracket expansion" \
193  "echo {A{a,b}B{c,d}C}" "{AaBcC} {AaBdC} {AbBcC} {AbBdC}\n" "" ""
194testing "brackets2" "echo {A{a,b}B{c,d}C,D}" "AaBcC AaBdC AbBcC AbBdC D\n" "" ""
195testing "brackets3" 'echo {A"b,c"D}' "{Ab,cD}\n" "" ""
196testing "brackets4" 'echo {A"bc",D}' "Abc D\n" "" ""
197testing "brackets5" 'echo {A,B,C' "{A,B,C\n" "" ""
198testing "brackets6" 'echo {{{{A,B},C}D},E}' "{AD} {BD} {CD} E\n" "" ""
199testing "brackets7" 'echo {{{a,b},c,{d,e}},f}' "a b c d e f\n" "" ""
200testing "brackets8" 'echo A{a{b,c{B,C}D}d{e,f},g{h,i}j}E' \
201  "AabdeE AabdfE AacBDdeE AacBDdfE AacCDdeE AacCDdfE AghjE AgijE\n" "" ""
202testing "brackets9" 'echo A{B{C,D}E{N,O},F{G,H}I}J{K,L}M' \
203  "ABCENJKM ABCENJLM ABCEOJKM ABCEOJLM ABDENJKM ABDENJLM ABDEOJKM ABDEOJLM AFGIJKM AFGIJLM AFHIJKM AFHIJLM\n" "" ""
204for i in /root /var/root /; do [ -e $i ] && EXPECT=$i && break; done
205testing "bracket+tilde" "echo {~,~root}/pwd" "$HOME/pwd $EXPECT/pwd\n" "" ""
206
207# Slices
208
209testing '${x#prefix}' 'x=abcde; echo ${x#abc}' 'de\n' '' ''
210testing '${x#short} ${x##long}' 'x=banana; echo ${x#b*n} ${x##b*n}' \
211  'ana a\n' '' ''
212toyonly testing '${x#utf8}' 'x=aそcde; echo ${x##a?c}' 'de\n' '' ''
213testing '${x%y}' 'x=potato; echo ${x%t*o} ${x%%t*o}' 'pota po\n' '' ''
214testing '${x^y}' 'x=aaaaa; echo ${x^a}' 'Aaaaa\n' '' ''
215testing '${x^^y}' 'x=abccdec; echo ${x^^c}; x=abcdec; echo ${x^^c}' \
216  'abCCdeC\nabCdeC\n' '' ''
217testing '${x,y}' 'x=BBB; echo ${x,B}' 'bBB\n' '' ''
218testing '${x,,y}' 'x=POTATO; echo ${x,,} ${x,,?} ${x,,*} ${x,,T}' \
219  'potato potato potato POtAtO\n' '' ''
220
221mkdir -p abc/def/ghi
222touch www
223testing 'wildcards' 'echo w[v-x]w w[x-v]w abc/*/ghi' \
224  'www w[x-v]w abc/def/ghi\n' '' ''
225
226testing "backtick1" 'x=fred; echo `echo $x`' 'fred\n' "" ""
227testing "backtick2" 'x=fred; echo `x=y; echo $x`; echo $x' 'y\nfred\n' "" ""
228testing '$(( ) )' 'echo ab$((echo hello) | tr e x)cd' "abhxllocd\n" "" ""
229SKIPNEXT=1 testing '$((x=y)) lifetime' 'a=boing; echo $a $a$((a=4))$a $a' 'boing boing44 4\n' '' ''
230
231testing 'quote' "echo \"'\"" "'\n" "" ""
232
233testing "math" 'echo $((1+2))' '3\n' '' ''
234testing "[math]" 'echo $[1+2]' '3\n' '' ''
235testing "math prio" 'echo $((1+2*3**4))' '163\n' '' ''
236testing "math paren" 'echo $(((1+2)*3))' '9\n' '' ''
237testing "math spaces" 'echo $(( ( 1 + 2 ) * 7 - 5 ** 2 ))' '-4\n' '' ''
238
239# Loops and flow control
240testing "case" 'for i in A C J B; do case "$i" in A) echo got A ;; B) echo and B ;; C) echo then C ;; *) echo default ;; esac; done' \
241  "got A\nthen C\ndefault\nand B\n" "" ""
242testing 'case;;&' 'case wow in w?w) echo ok;;& wow) echo no; esac' 'ok\nno\n' \
243  "" ""
244testing "case newlines" \
245  $'case i\n\nin\n\na) echo one\n\n;;\n\ni)\n\necho two\n\n;;\n\nesac' \
246  "two\n" "" ""
247testing 'loop in && ||' \
248  'false && for i in a b c; do echo $i; done || echo no' 'no\n' '' ''
249testing "continue" 'for i in a b c; do for j in d e f; do echo $i $j; continue 2; done; done' \
250  "a d\nb d\nc d\n" "" ""
251testing "piped loops that don't exit" \
252  'while X=$(($X+1)); do echo $X; done | while read i; do echo $i; done | head -n 5' \
253  '1\n2\n3\n4\n5\n' '' ''
254
255# <glinda>A variable occurred</glinda>
256
257testing "expand" 'echo $PWD' "$(pwd)\n" "" ""
258testing "expand2" 'echo "$PWD"' "$(pwd)\n" "" ""
259testing "expand3" 'echo "$"PWD' '$PWD\n' "" ""
260testing "expand4" 'P=x; echo "$P"WD' 'xWD\n' "" ""
261testing "dequote" "echo one 'two' ''three 'fo'ur '\\'" \
262  'one two three four \\\n' '' ''
263
264testing "leading variable assignment" 'abc=def env | grep ^abc=; echo $abc' \
265  "abc=def\n\n" "" ""
266testing "leading variable assignments" \
267  "abc=def ghi=jkl env | egrep '^(abc|ghi)=' | sort; echo \$abc \$ghi" \
268  "abc=def\nghi=jkl\n\n" "" ""
269testing "leading assignment occurs after parsing" \
270  'abc=def; abc=ghi echo $abc' "def\n" "" ""
271testing "leading assignment space" 'X="abc  def"; Y=$X; echo "$Y"' \
272  "abc  def\n" "" ""
273testing "leading assignment space2" \
274  'chicken() { X="$@"; }; chicken a b c d e; echo "$X"' 'a b c d e\n' '' ''
275testing "leading assignment fail2" \
276  "{ 1blah=123 echo hello;} 2>/dev/null || echo no" "no\n" "" ""
277testing "leading assignment redirect" \
278  "blah=123 echo hello > walrus && ls walrus" "walrus\n" "" ""
279rm -f walrus
280
281testing "{1..5}" "echo {1..5}" "1 2 3 4 5\n" "" ""
282testing "{5..1}" "echo {5..1}" "5 4 3 2 1\n" "" ""
283testing "{5..1..2}" "echo {5..1..2}" "5 3 1\n" "" ""
284testing "{a..z..-3}" "echo {a..z..-3}" "a d g j m p s v y\n" "" ""
285
286mkfifo POIT
287testing 'background curly block' \
288  '{ sed s/ll/xx/ POIT; }& echo hello > POIT; wait && echo yes' \
289  'hexxo\nyes\n' '' ''
290rm -f POIT
291
292testing 'background pipe block' \
293  'if true; then { sleep .25;bzcat "$FILES"/blkid/ntfs.bz2; }& fi | wc -c' \
294  '8388608\n' '' ''
295testing 'background variable assignment' 'X=x; X=y & echo $X' 'x\n' '' ''
296
297#$ IFS=x X=xyxz; for i in abc${X}def; do echo =$i=; done
298#=abc=
299#=y=
300#=zdef=
301
302testing "IFS whitespace before/after" \
303  'IFS=" x"; A=" x " B=" x" C="x " D=x E="   "; for i in $A $B $C $D L$A L$B L$C L$D $A= $B= $C= $D= L$A= L$B= L$C= L$D=; do echo -n {$i}; done' \
304  "{}{}{}{}{L}{L}{L}{L}{}{=}{}{=}{}{=}{}{=}{L}{=}{L}{=}{L}{=}{L}{=}" "" ""
305testing "quotes and whitespace" \
306  'A="   abc   def   "; for i in ""$A""; do echo =$i=; done' \
307  "==\n=abc=\n=def=\n==\n" "" ""
308testing "quotes and whitespace2" \
309  'A="   abc   def   "; for i in """"$A""; do echo =$i=; done' \
310  "==\n=abc=\n=def=\n==\n" "" ""
311testing "quotes and whitespace3" \
312  'A="   abc   def   "; for i in ""x""$A""; do echo =$i=; done' \
313  "=x=\n=abc=\n=def=\n==\n" "" ""
314
315testing "IFS" 'IFS=x; A=abx; echo -n "$A"' "abx" "" ""
316testing "IFS2" 'IFS=x; A=abx; echo -n $A' "ab" "" ""
317testing "IFS3" 'IFS=x; echo "$(echo abx)"' "abx\n" "" ""
318testing "IFS4" 'IFS=x; echo $(echo abx)y' "ab y\n" "" ""
319testing "IFS5" 'IFS=xy; for i in abcxdefyghi; do echo =$i=; done' \
320  "=abc def ghi=\n" "" ""
321
322testing 'empty $! is blank' 'echo $!' "\n" "" ""
323testing '$! = jobs -p' 'true & [ $(jobs -p) = $! ] && echo yes' "yes\n" "" ""
324
325testing '$*' 'cc(){ for i in $*;do echo =$i=;done;};cc "" "" "" "" ""' \
326  "" "" ""
327testing '$*2' 'cc(){ for i in "$*";do echo =$i=;done;};cc ""' \
328  "==\n" "" ""
329testing '$*3... Flame. Flames. Flames, on the side of my face...' \
330  'cc(){ for i in "$*";do echo =$i=;done;};cc "" ""' "= =\n" "" ""
331testing 'why... oh.' \
332  'cc() { echo ="$*"=; for i in =$*=; do echo -$i-; done;}; cc "" ""; echo and; cc ""' \
333  '= =\n-=-\n-=-\nand\n==\n-==-\n' "" ""
334testing 'really?' 'cc() { for i in $*; do echo -$i-; done;}; cc "" "" ""' \
335  "" "" ""
336testing 'Sigh.' 'cc() { echo =$1$2=;}; cc "" ""' "==\n" "" ""
337testing '$*4' 'cc(){ for i in "$*";do echo =$i=;done;};cc "" "" "" "" ""' \
338  "= =\n" "" ""
339testing '$*5' 'cc(){ for i in "$*";do echo =$i=;done;};cc "" "abc" ""' \
340  "= abc =\n" "" ""
341
342# creating empty arguments without quotes
343testing '$* + IFS' \
344  'IFS=x; cc(){ for i in $*; do echo =$i=;done;};cc xabcxx' \
345  "==\n=abc=\n==\n" "" ""
346testing '$@' 'cc(){ for i in "$@";do echo =$i=;done;};cc "" "" "" "" ""' \
347  "==\n==\n==\n==\n==\n" "" ""
348testing "IFS10" 'IFS=bcd; A=abcde; for i in $A; do echo =$i=; done' \
349  "=a=\n==\n==\n=e=\n" "" ""
350testing "IFS11" \
351  'IFS=x; chicken() { for i in $@$@; do echo =$i=; done;}; chicken one "" abc dxf ghi' \
352  "=one=\n==\n=abc=\n=d=\n=f=\n=ghione=\n==\n=abc=\n=d=\n=f=\n=ghi=\n" "" ""
353testing "IFS12" 'IFS=3;chicken(){ return 3;}; chicken;echo 3$?3' '3 3\n' "" ""
354
355testing "IFS combinations" \
356  'IFS=" x"; A=" x " B=" x" C="x " D=x E="   "; for i in $A $B $C $D L$A L$B L$C L$D $A= $B= $C= $D= L$A= L$B= L$C= L$D=; do echo -n {$i}; done' \
357  "{}{}{}{}{L}{L}{L}{L}{}{=}{}{=}{}{=}{}{=}{L}{=}{L}{=}{L}{=}{L}{=}" "" ""
358
359testing "! isn't special" "echo !" "!\n" "" ""
360testing "! by itself" '!; echo $?' "1\n" "" ""
361testing "! true" '! true; echo $?' "1\n" "" ""
362testing "! ! true" '! ! true; echo $?' "0\n" "" ""
363testing "! syntax err" '! echo 2>/dev/null < doesnotexist; echo $?' "0\n" "" ""
364
365# The bash man page doesn't say quote removal here, and yet:
366testing "case quoting" 'case a in "a") echo hello;; esac' 'hello\n' "" ""
367
368testing "subshell splitting" 'for i in $(true); do echo =$i=; done' "" "" ""
369testing "subshell split 2" 'for i in $(echo "one two thr"); do echo =$i=; done'\
370  "=one=\n=two=\n=thr=\n" "" ""
371
372# variable assignment argument splitting only performed for "$@"
373testing "assignment nosplit" 'X="one two"; Y=$X; echo $Y' "one two\n" "" ""
374testing "argument splitting" \
375  'chicken() { for i in a"$@"b;do echo =$i=;done;}; chicken 123 456 789' \
376  "=a123=\n=456=\n=789b=\n" "" ""
377testing "assignment nosplit2" 'pop(){ X="$@";};pop one two three; echo $X' \
378  "one two three\n" "" ""
379
380#testing "leading assignments don't affect current line" \
381#  'VAR=12345 echo ${VAR}a' "a\n" "" ""
382#testing "can't have space before first : but yes around arguments" \
383#  'BLAH=abcdefghi; echo ${BLAH: 1 : 3 }' "bcd\n" "" ""
384
385testing "subshell exit err" '(exit 42); echo $?' "42\n" "" ""
386
387# Same thing twice, but how do we cmp if exec exited?
388#testing 'exec and $$' testing 'echo $$;exec readlink /proc/self'
389
390X="$(realpath $(which readlink))"
391testing "exec in paren" \
392  '(exec readlink /proc/self/exe);echo hello' "$X\nhello\n" "" ""
393testing "exec in brackets" \
394  "{ exec readlink /proc/self/exe;};echo hi" "$X\n" "" ""
395
396NOSPACE=1 testing "curly brackets and pipe" \
397  '{ echo one; echo two ; } | tee blah.txt; wc blah.txt' \
398  "one\ntwo\n2 2 8 blah.txt\n" "" ""
399NOSPACE=1 testing "parentheses and pipe" \
400  '(echo two;echo three)|tee blah.txt;wc blah.txt' \
401  "two\nthree\n2 2 10 blah.txt\n" "" ""
402testing "pipe into parentheses" \
403  'echo hello | (read i <input; echo $i; read i; echo $i)' \
404  "there\nhello\n" "there\n" ""
405
406testing "\$''" $'echo $\'abc\\\'def\\nghi\'' "abc'def\nghi\n" '' ''
407testing "shift shift" 'shift; shift; shift; echo $? hello' "1 hello\n" "" ""
408testing 'search cross $*' 'chicken() { echo ${*/b c/ghi}; }; chicken a b c d' \
409  "a b c d\n" "" ""
410testing 'eval $IFS' 'IFS=x; X=x; eval abc=a${X}b 2>/dev/null; echo $abc' \
411  "\n" '' ''
412testing '${@:3:5}' 'chicken() { for i in "${@:3:5}"; do echo =$i=; done; } ; chicken ab cd ef gh ij kl mn op qr' \
413  '=ef=\n=gh=\n=ij=\n=kl=\n=mn=\n' '' ''
414testing '${@:3:5}' 'chicken() { for i in "${*:3:5}"; do unset IFS; echo =$i=; done; } ; IFS=x chicken ab cd ef gh ij kl mn op qr' \
415  '=efxghxijxklxmn=\n' '' ''
416testing 'sequence check' 'IFS=x; X=abxcd; echo ${X/bxc/g}' 'agd\n' '' ''
417
418# TODO: The txpect plumbing does not work right yet even on TEST_HOST
419#txpect "backtick0" "$SS" "E$P" 'IX=fred; echo `echo \\\\$x`'$'\n' 'Ofred' "E$P" X0
420#txpect "backtick1" "$SS" "E$P" 'IX=fred; echo `echo $x`'$'\n' 'Ofred'$'\n' "E$P" X0
421#txpect "backtick2" "$SS" "E$P" 'IX=fred; echo `x=y; echo $x`' $'Oy\n' "E$P" X0
422
423shxpect '${ with newline' I$'HELLO=abc; echo ${HELLO/b/\n' E"> " I$'}\n' O$'a c\n'
424
425shxpect 'here1' I$'POTATO=123; cat << EOF\n' E"> " \
426  I$'$POTATO\n' E"> " I$'EOF\n' O$'123\n'
427shxpect 'here2' I$'POTATO=123; cat << E"O"F\n' E"> " \
428  I$'$POTATO\n' E"> " I$'EOF\n' O$'$POTATO\n'
429testing 'here3' 'abc(){ cat <<< x"$@"yz;};abc one two "three  four"' \
430  "xone two three  fouryz\n" "" ""
431
432testing '${var}' 'X=abcdef; echo ${X}' 'abcdef\n' '' ''
433testing '${#}' 'X=abcdef; echo ${#X}' "6\n" "" ""
434testing 'empty ${}' '{ echo ${};} 2>&1 | grep -o bad' 'bad\n' '' ''
435shxpect 'empty ${} syntax err abort' I$'echo ${}; echo hello\n' \
436  E I$'echo and\n' O$'and\n'
437testing '${$b}' '{ echo ${$b};} 2>&1 | grep -o bad' 'bad\n' '' ''
438testing '${!PATH*}' 'echo ${!PATH*}' 'PATH\n' '' ''
439testing '${!PATH@}' 'echo ${!PATH@}' 'PATH\n' '' ''
440#testing '${!PATH[@]}' 'echo ${!PATH[@]}' '0\n' '' ''
441testing '${!x}' 'X=abcdef Y=X; echo ${!Y}' 'abcdef\n' '' ''
442testing '${!x@}' 'ABC=def; def=ghi; echo ${!ABC@}' 'ABC\n' '' ''
443testing '${!x} err' '{ X=abcdef Y=X:2; echo ${!Y}; echo bang;} 2>/dev/null' \
444  '' '' ''
445testing '${!x*}' 'abcdef=1 abc=2 abcq=; echo "${!abc@}" | tr " " \\n | sort' \
446  'abc\nabcdef\nabcq\n' '' ''
447testing '${!x*} none' 'echo "${!abc*}"' '\n' '' ''
448testing '${!x*} err' '{ echo "${!abc*x}"; echo boing;} 2>/dev/null' '' '' ''
449# TODO bash 5.x broke this
450#testing '${!none@Q}' 'echo ${X@Q} ${!X@Q}; X=ABC; echo ${!X@Q}' '\n\n' '' ''
451testing '${!x@Q}' 'ABC=123 X=ABC; echo ${!X@Q}' "'123'\n" '' ''
452testing '${#@Q}' 'echo ${#@Q}' "'0'\n" '' ''
453testing '${!*}' 'xx() { echo ${!*};}; fruit=123; xx fruit' '123\n' '' ''
454testing '${!*} indirect' 'xx() { echo ${!a@Q};}; a=@; xx one two three' \
455  "'one' 'two' 'three'\n" '' ''
456testing '${!x@ } match' \
457  '{ ABC=def; def=ghi; echo ${!ABC@ }; } 2>&1 | grep -o bad' 'bad\n' '' ''
458# Bash added an error for this between 4.4 and 5.x.
459#testing '${!x@ } no match no err' 'echo ${!ABC@ }def' 'def\n' '' ''
460testing '${!x@ } no match no err2' 'ABC=def; echo ${!ABC@ }ghi' 'ghi\n' '' ''
461toyonly testing '${#x::}' 'ABC=abcdefghijklmno; echo ${#ABC:1:2}' '5\n' '' ''
462# TODO: ${!abc@x} does _not_ error? And ${PWD@q}
463testing '$""' 'ABC=def; echo $"$ABC"' 'def\n' '' ''
464testing '"$""" does not nest' 'echo "$"abc""' '$abc\n' '' ''
465testing '${\}}' 'ABC=ab}cd; echo ${ABC/\}/x}' 'abxcd\n' '' ''
466testing 'bad ${^}' '{ echo ${^};} 2>&1 | grep -o bad' 'bad\n' '' ''
467testing '${:}' 'ABC=def; echo ${ABC:1}' 'ef\n' '' ''
468testing '${a: }' 'ABC=def; echo ${ABC: 1}' 'ef\n' '' ''
469testing '${a :}' 'ABC=def; { echo ${ABC :1};} 2>&1 | grep -o bad' 'bad\n' '' ''
470testing '${::}' 'ABC=defghi; echo ${ABC:1:2}' 'ef\n' '' ''
471testing '${: : }' 'ABC=defghi; echo ${ABC: 1 : 2 }' 'ef\n' '' ''
472testing '${::} indirect' \
473  'ABC=defghi:1:2; ( echo ${!ABC};) 2>input; [ -s input ] && echo yes' \
474  'yes\n' '' ''
475testing '${::-}' 'ABC=defghi; echo ${ABC:1:-2}' 'efg\n' '' ''
476testing '${:-:-}' 'ABC=defghi; echo ${ABC:-3:2}' 'defghi\n' '' ''
477testing '${:-:-}2' 'echo ${ABC:-3:2}' '3:2\n' '' ''
478testing '${: -:}' 'ABC=defghi; echo ${ABC: -3:2}' 'gh\n' '' ''
479testing '${@%}' 'chicken() { for i in "${@%abc}"; do echo "=$i="; done;}; chicken 1abc 2abc 3abc' '=1=\n=2=\n=3=\n' '' ''
480testing '${*%}' 'chicken() { for i in "${*%abc}"; do echo "=$i="; done;}; chicken 1abc 2abc 3abc' '=1 2 3=\n' '' ''
481testing '${@@Q}' 'xx() { echo "${@@Q}"; }; xx one two three' \
482  "'one' 'two' 'three'\n" '' ''
483
484shxpect '${/newline/}' I$'x=$\'\na\';echo ${x/\n' E'> ' I$'/b}\n' O$'ba\n' E'> '
485
486shxpect 'line continuation' I$'echo "hello" \\\n' E'> ' I$'> blah\n' E"$P" \
487  I$'wc blah\n' O$'1 1 6 blah\n'
488shxpect 'line continuation2' I$'echo ABC\\\n' E'> ' I$'DEF\n' O$'ABCDEF\n'
489
490# Race condition (in bash, but not in toysh) can say 43.
491testing 'SECONDS' 'readonly SECONDS=41; sleep 1; echo $SECONDS' '42\n' '' ''
492# testing 'SECONDS2' 'readonly SECONDS; SECONDS=0; echo $SECONDS' '' '' '' #bash!
493testing 'SECONDS2' 'SECONDS=123+456; echo $SECONDS' '0\n' '' '' #bash!!
494testing '$LINENO 2' $'echo $LINENO\necho $LINENO' '0\n1\n' '' ''
495testing '$EUID' 'echo $EUID' "$(id -u)\n" '' ''
496testing '$UID' 'echo $UID' "$(id -ur)\n" '' ''
497
498testing 'readonly leading assignment' \
499  '{ readonly abc=123;abc=def echo hello; echo $?;} 2>output; grep -o readonly output' \
500  'hello\n0\nreadonly\n' '' ''
501testing 'readonly leading assignment2' \
502  'readonly boink=123; export boink; { boink=234 env | grep ^boink=;} 2>/dev/null; echo $?' 'boink=123\n0\n' '' ''
503testing 'readonly for' \
504  'readonly i; for i in one two three; do echo $i; done 2>/dev/null; echo $?' \
505  '1\n' '' ''
506testing 'readonly {}<' \
507  'readonly i; echo hello 2>/dev/null {i}</dev/null; echo $?' '1\n' '' ''
508testing '$_ 1' 'echo walrus; echo $_' 'walrus\nwalrus\n' '' ''
509testing '$_ 2' 'unset _; echo $_' '_\n' '' ''
510
511# wildcards
512
513touch walrus wallpapers
514testing 'IFS wildcards' \
515  'IFS=xy; ABC=abcywal*sxdef; echo $ABC | tr " " "\n" | sort' \
516  'abc\ndef\nwallpapers\nwalrus\n' '' ''
517rm -f walrus wallpapers
518
519# Force parsing granularity via interactive shxpect because bash parses all
520# of sh -c "str" in one go, meaning the "shopt -s extglob" won't take effect
521shxpect 'IFS +(extglob)' I$'shopt -s extglob\n' E"$P" \
522  I$'IFS=x; ABC=cxd; for i in +($ABC); do echo =$i=; done\n' \
523  O$'=+(c=\n' O$'=d)=\n'
524
525touch abc\)d
526shxpect 'IFS +(extglob) 2' I$'shopt -s extglob\n' E"$P" \
527  I$'ABC="c?d"; for i in ab+($ABC); do echo =$i=; done\n' \
528  O$'=abc)d=\n'
529rm abc\)d
530
531shxpect '[+(]) overlap priority' I$'shopt -s extglob\n' E"$P" \
532  I$'touch "AB[DEF]"; echo AB[+(DEF]) AB[+(DEF)? AB+([DEF)]\n' \
533  O$'AB[+(DEF]) AB[DEF] AB+([DEF)]\n' \
534  I$'X="("; Y=")"; echo AB[+${X}DEF${Y}?\n' O$'AB[DEF]\n'
535
536# TODO: syntax error takes out ': ${a?b}; echo $?' (I.E. never runs echo)
537shxpect '${a?b} sets err, stops cmdline eval' \
538  I$': ${a?b} ${c:=d}\n' E E"$P" I$'echo $?$c\n' O$'1\n'
539
540shxpect 'trace redirect' I$'set -x; echo one\n' E$'+ echo one\n'"$P" O$'one\n' \
541  I$'echo two 2>/dev/null\n' O$'two\n' E$'+ echo two\n'"$P" \
542  I$'{ echo three; } 2>/dev/null\n' O$'three\n' E"$P"
543
544testing 'source file' 'source input' 'hello\n' 'echo hello \\\n' ''
545testing '. file' '. input' 'hello\n' 'echo hello \\\n' ''
546testing 'source no newline' 'source input' 'hello \\\n' 'echo hello \\' ''
547testing 'source is live' \
548  'for i in one two three; do echo "echo $i" > input; source input; done' \
549  'one\ntwo\nthree\n' 'x' ''
550testing 'source is live in functions' \
551  'func() { source input; }; for i in one two three; do echo echo $i > input; func; done' \
552  'one\ntwo\nthree\n' 'x' ''
553testing 'subshell inheritance' \
554  'func() { source input; cat <(echo $xx; xx=456; echo $xx); echo $xx;}; echo local xx=123 > input; func; echo $xx' \
555  '123\n456\n123\n\n' 'x' ''
556testing 'semicolon vs newline' \
557  'source input 2>/dev/null || echo yes' 'one\nyes\n' \
558  'echo one\necho two; echo |' ''
559testing 'syntax err pops to source but encapsulating function continues' \
560  'func() { echo one; source <(echo -e "echo hello\necho |") 2>/dev/null; echo three;}; func; echo four' \
561  'one\nhello\nthree\nfour\n' '' ''
562testing '"exit shell" means exit eval but encapsulating function continues' \
563  'func() { eval "echo one; echo \${?potato}; echo and" 2>/dev/null; echo plus;}; func; echo then' \
564  'one\nplus\nthen\n' '' ''
565
566testing 'functions() {} in same PID' \
567  '{ echo $BASHPID; chicken() { echo $BASHPID;}; chicken;} | sort -u | wc -l' '1\n' '' ''
568testing 'functions() () different PID' \
569  '{ echo $BASHPID; chicken() ( echo $BASHPID;); chicken;} | sort -u | wc -l' '2\n' '' ''
570testing 'function() just wants any block span' \
571  'func() if true; then echo hello; fi; echo one; func; echo two' \
572  'one\nhello\ntwo\n' '' ''
573testing 'function alternate syntax' \
574  'function func if true; then echo hello; fi; echo one; func; echo two' \
575  'one\nhello\ntwo\n' '' ''
576testing 'function syntax 3' \
577  'function func ( ) if true; then echo hello; fi; echo one; func; echo two' \
578  'one\nhello\ntwo\n' '' ''
579testing 'function nested parentheses' \
580  '( potato() { echo aaa; }; potato )' 'aaa\n' '' ''
581shxpect 'local creates a whiteout' \
582  I$'func() { local potato; echo ${potato?bang}; }; potato=123; func\n' \
583  E E"$P" I$'echo $?\n' O$'1\n'
584testing 'local replaces/preserves magic type' \
585  'x() { local RANDOM=potato; echo $RANDOM;};x;echo -e "$RANDOM\n$RANDOM"|wc -l'\
586  'potato\n2\n' '' ''
587
588testing '$$ is parent shell' \
589  '{ echo $$; (echo $$) } | sort -u | wc -l' "1\n" "" ""
590testing '$PPID is parent shell' \
591  '{ echo $PPID; (echo $PPID) } | sort -u | wc -l' "1\n" "" ""
592testing '$BASHPID is current PID' \
593  '{ echo $BASHPID; (echo $BASHPID) } | sort -u | wc -l' "2\n" "" ""
594
595testing 'unexport supports +=' 'export -n ABC+=DEF; declare -p ABC' \
596  'declare -- ABC="DEF"\n' '' ''
597testing 'unexport existing +=' \
598  'export ABC=XYZ; export -n ABC+=DEF; declare -p ABC' \
599  'declare -- ABC="XYZDEF"\n' '' ''
600
601testing '$!' '{ echo $BASHPID & echo $!; echo ${!};} | sort -u | wc -l' '1\n' \
602  '' ''
603
604shxpect 'blank line preserves $?' \
605  I$'false\n' E"$P" I$'\n' E"$P" I$'echo $?\n' O$'1\n'
606testing 'NOP line clears $?' 'false;$NOTHING;echo $?' '0\n' '' ''
607testing 'run "$@"' 'false;"$@";echo $?' '0\n' '' ''
608
609# TODO finish variable list from shell init
610
611# $# $? $- $! $0  # $$
612# always exported: PWD SHLVL _
613#  ./bash -c 'echo $_' prints $BASH, but PATH search shows path? Hmmm...
614# ro: UID PPID EUID $
615# IFS LINENO
616# PATH HOME SHELL USER LOGNAME SHLVL HOSTNAME HOSTTYPE MACHTYPE OSTYPE OLDPWD
617# PS0 PS1='$ ' PS2='> ' PS3 PS4 BASH BASH_VERSION
618# ENV - if [ -n "$ENV" ]; then . "$ENV"; fi # BASH_ENV - synonym for ENV
619# FUNCNEST - maximum function nesting level (abort when above)
620# REPLY - set by input with no args
621# OPTARG OPTIND - set by getopts builtin
622# OPTERR
623
624# maybe not: EXECIGNORE, FIGNORE, GLOBIGNORE
625
626#BASH_SUBSHELL - SHLVL synonym
627#BASH_EXECUTION_STRING - -c argument
628#
629#automatically set:
630#OPTARG - set by getopts builtin
631#OPTIND - set by getopts builtin
632#
633#PROMPT_COMMAND PROMPT_DIRTRIM PS0 PS1 PS2 PS3 PS4
634#
635#unsettable (assignments ignored before then)
636#LINENO SECONDS RANDOM
637#GROUPS - id -g
638#HISTCMD - history number
639#
640#TMOUT - used by read
641
642# does not match: ./sh -c 'echo {a..Z}' becomes a ` _ ^ ] \ [ Z
643
644# commit ec6639407b9e
645#-  IS_TOYBOX_RE='(toybox|This is not GNU).*'
646#-  [[ "$IS_TOYBOX" =~ $IS_TOYBOX_RE ]] || SKIPNEXT=1
647#+  case "$IS_TOYBOX" in
648#+    toybox*) ;;
649#+    This\ is\ not\ GNU*) ;;
650#+    *) SKIPNEXT=1 ;;
651#+  esac
652
653