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