#! /bin/sh
#
# @(#)parameter.sh	1.15 20/04/28 Copyright 2016-2020 J. Schilling
#

# Read test core functions
. ../../common/test-common

docommand param1 "$SHELL -c 'parameter=param; echo \${parameter:-word}'" 0 "param\n" ""
docommand param2 "$SHELL -c 'parameter=\"\"; echo \${parameter:-word}'" 0 "word\n" ""
docommand param3 "$SHELL -c 'unset parameter; echo \${parameter:-word}'" 0 "word\n" ""

docommand param4 "$SHELL -c 'parameter=param; echo \${parameter-word}'" 0 "param\n" ""
docommand param5 "$SHELL -c 'parameter=\"\"; echo \${parameter-word}'" 0 "\n" ""
docommand param6 "$SHELL -c 'unset parameter; echo \${parameter-word}'" 0 "word\n" ""

docommand param7 "$SHELL -c 'parameter=param; echo \${parameter:=word}'" 0 "param\n" ""
docommand param8 "$SHELL -c 'parameter=\"\"; echo \${parameter:=word}'" 0 "word\n" ""
docommand param9 "$SHELL -c 'unset parameter; echo \${parameter:=word}'" 0 "word\n" ""

docommand param10 "$SHELL -c 'parameter=param; echo \${parameter=word}'" 0 "param\n" ""
docommand param11 "$SHELL -c 'parameter=\"\"; echo \${parameter=word}'" 0 "\n" ""
docommand param12 "$SHELL -c 'unset parameter; echo \${parameter=word}'" 0 "word\n" ""

docommand param13 "$SHELL -c 'parameter=param; echo \${parameter:?word}'" 0 "param\n" ""
docommand param14 "$SHELL -c 'parameter=\"\"; echo \${parameter:?word}'" "!=0" "" IGNORE
docommand param15 "$SHELL -c 'unset parameter; echo \${parameter:?word}'" "!=0" "" IGNORE

docommand param16 "$SHELL -c 'parameter=param; echo \${parameter?word}'" 0 "param\n" ""
docommand param17 "$SHELL -c 'parameter=\"\"; echo \${parameter?word}'" 0 "\n" ""
docommand param18 "$SHELL -c 'unset parameter; echo \${parameter?word}'" "!=0" "" IGNORE

docommand param19 "$SHELL -c 'parameter=param; echo \${parameter:+word}'" 0 "word\n" ""
docommand param20 "$SHELL -c 'parameter=\"\"; echo \${parameter:+word}'" 0 "\n" ""
docommand param21 "$SHELL -c 'unset parameter; echo \${parameter:+word}'" 0 "\n" ""

docommand param22 "$SHELL -c 'parameter=param; echo \${parameter+word}'" 0 "word\n" ""
docommand param23 "$SHELL -c 'parameter=\"\"; echo \${parameter+word}'" 0 "word\n" ""
docommand param24 "$SHELL -c 'unset parameter; echo \${parameter+word}'" 0 "\n" ""

docommand param25 "$SHELL -c 'echo \$#'" 0 "0\n" ""
docommand param26 "$SHELL -c 'echo \${#}'" 0 "0\n" ""
docommand param27 "$SHELL -c 'unset bla; echo \${#bla}'" 0 "0\n" ""
docommand param28 "$SHELL -c 'bla=ttt; echo \${#bla}'" 0 "3\n" ""
docommand param29 "$SHELL -c 'bla=ttt; echo \$#bla'" 0 "0bla\n" ""
docommand param30 "$SHELL -c 'bla=\"\"; echo \${#bla}'" 0 "0\n" ""

docommand param31 "$SHELL -c 'var=dlsfkjslfjalbla; echo \${var%*bla}'" 0 "dlsfkjslfjal\n" ""
docommand param32 "$SHELL -c 'var=dlsfkjslfjalbla; echo \${var%%*bla}'" 0 "\n" ""

docommand param33 "$SHELL -c 'var=bladlsfkblajslfjal; echo \${var#*bla}'" 0 "dlsfkblajslfjal\n" ""
docommand param34 "$SHELL -c 'var=bladlsfkblajslfjal; echo \${var##*bla}'" 0 "jslfjal\n" ""

docommand param35 "$SHELL -c 'var=/home/joerg; echo \${var%*rg}'" 0 "/home/joe\n" ""
docommand param36 "$SHELL -c 'var=/home/joerg; echo \${var%%*rg}'" 0 "\n" ""

docommand param37 "$SHELL -c 'var=/home/joerg; echo \${var#/h*}'" 0 "ome/joerg\n" ""
docommand param38 "$SHELL -c 'var=/home/joerg; echo \${var##/h*}'" 0 "\n" ""

docommand param39 "$SHELL -c 'echo \${#}'" 0 "0\n" ""

expect_fail_save=$expect_fail
expect_fail=true
docommand param40 "$SHELL -c 'echo \${#:}'" "0" "0\n" ""	# POSIX unspecified
expect_fail=$expect_fail_save
if [ "$failed" = true ] && [ "$is_bosh" = true ]; then
	fail "$cmd_label: is not expected to fail with bosh"
elif [ "$failed" = true ] ; then
	echo
	echo "Test $cmd_label is unspecified behavior by POSIX."
	echo
fi

docommand param41 "$SHELL -c 'echo \${#:-99}'" "0" "0\n" ""
docommand param42 "$SHELL -c 'echo \${#:+99}'" "0" "99\n" ""
docommand param43 "$SHELL -c 'echo \${#:-99}' a 1 2 3" "0" "3\n" ""
docommand param44 "$SHELL -c 'echo \${#-99}'" "0" "0\n" ""
docommand param45 "$SHELL -c 'echo \${#+99}'" "0" "99\n" ""
docommand param46 "$SHELL -c 'echo \${#?99}'" "0" "0\n" ""
docommand param47 "$SHELL -c 'echo \${#=99}'" "0" "0\n" ""

expect_fail_save=$expect_fail
expect_fail=true
docommand param50 "$SHELL -c 'echo \${xxx:}'" 0 "\n" ""		# POSIX unspecified
expect_fail=$expect_fail_save
if [ "$failed" = true ] && [ "$is_bosh" = true ]; then
	fail "$cmd_label: is not expected to fail with bosh"
elif [ "$failed" = true ] ; then
	echo
	echo "Test $cmd_label is unspecified behavior by POSIX."
	echo
fi

expect_fail_save=$expect_fail
expect_fail=true
docommand param51 "$SHELL -c 'echo \${xxx:a}'" "!=0" "" IGNORE
expect_fail=$expect_fail_save
if [ "$failed" = true ] && [ "$is_bosh" = true ]; then
	fail "$cmd_label: is not expected to fail with bosh"
elif [ "$failed" = true ] ; then
	echo
	echo "Test $cmd_label is unspecified behavior by POSIX."
	echo
fi

expect_fail_save=$expect_fail
expect_fail=true
docommand param52 "$SHELL -c 'xxx=/home/joerg; echo \${xxx:}'" 0 "/home/joerg\n" ""
expect_fail=$expect_fail_save
if [ "$failed" = true ] && [ "$is_bosh" = true ]; then
	fail "$cmd_label: is not expected to fail with bosh"
elif [ "$failed" = true ] ; then
	echo
	echo "Test $cmd_label is unspecified behavior by POSIX."
	echo
fi

#
# Test from Robert Elz <kre@munnari.oz.au>
# $ set -- "abab*cbb" 
# $ echo "${1} ${1#a} ${1%b} ${1##ab} ${1%%b} ${1#*\*} ${1%\**}"
#
cmd='set -- "abab*cbb"; echo "${1} ${1#a}"'
docommand param53 "$SHELL -c '$cmd'" 0 "abab*cbb bab*cbb\n" ""
cmd='set -- "abab*cbb"; echo ${1} ${1#a}'
docommand param54 "$SHELL -c '$cmd'" 0 "abab*cbb bab*cbb\n" ""

cmd='set -- "abab*cbb"; echo "${1} ${1%b}"'
docommand param55 "$SHELL -c '$cmd'" 0 "abab*cbb abab*cb\n" ""
cmd='set -- "abab*cbb"; echo ${1} ${1%b}'
docommand param56 "$SHELL -c '$cmd'" 0 "abab*cbb abab*cb\n" ""

cmd='set -- "abab*cbb"; echo "${1} ${1##ab}"'
docommand param57 "$SHELL -c '$cmd'" 0 "abab*cbb ab*cbb\n" ""
cmd='set -- "abab*cbb"; echo ${1} ${1##ab}'
docommand param58 "$SHELL -c '$cmd'" 0 "abab*cbb ab*cbb\n" ""

cmd='set -- "abab*cbb"; echo "${1} ${1%%b}"'
docommand param59 "$SHELL -c '$cmd'" 0 "abab*cbb abab*cb\n" ""
cmd='set -- "abab*cbb"; echo ${1} ${1%%b}'
docommand param60 "$SHELL -c '$cmd'" 0 "abab*cbb abab*cb\n" ""

cmd='set -- "abab*cbb"; echo "${1} ${1#*\*}"'
docommand param61 "$SHELL -c '$cmd'" 0 "abab*cbb cbb\n" ""
cmd='set -- "abab*cbb"; echo ${1} ${1#*\*}'
docommand param62 "$SHELL -c '$cmd'" 0 "abab*cbb cbb\n" ""

cmd='set -- "abab*cbb"; echo "${1} ${1%\**}"'
docommand param63 "$SHELL -c '$cmd'" 0 "abab*cbb abab\n" ""
cmd='set -- "abab*cbb"; echo ${1} ${1%\**}'
docommand param64 "$SHELL -c '$cmd'" 0 "abab*cbb abab\n" ""

docommand param70 "$SHELL -c 'X=#; VAR=#2345; echo \${VAR#\$X}'" 0 "2345\n" ""
docommand param71 "$SHELL -c 'X=#; VAR=#2345; echo \${VAR#\${X}}'" 0 "2345\n" ""


docommand param80 "$SHELL -c 'set -- a b c d; echo \${4}'" 0 "d\n" ""
docommand param81 "$SHELL -c 'set -- a b c d; echo \${2147483645}'" 0 "\n" ""
docommand param82 "$SHELL -c 'set -- a b c d; echo \${2147483646}'" 0 "\n" ""
docommand param83 "$SHELL -c 'set -- a b c d; echo \${2147483647}'" 0 "\n" ""
docommand param84 "$SHELL -c 'set -- a b c d; echo \${4294967297}'" 0 "\n" ""
docommand param85 "$SHELL -c 'set -- a b c d; echo \${4294967297-hello}'" 0 "hello\n" ""
#
# End test from Robert Elz <kre@munnari.oz.au>
#

#
# Test that set -u does not cause "$@" to fail
#
docommand param100 "$SHELL -cu 'echo \"\$@\"'" 0 "\n" ""

#
# Test left to right parameter evaluation
#
docommand param150 "$SHELL -c 'X=BAD; X=OK Z=\$X; echo \$Z'" 0 "OK\n" ""
docommand param151 "$SHELL -c 'X=OLD Y=\${X=OK} Z=\$X; echo \$X \$Z'" 0 "OLD OLD\n" ""
docommand param152 "$SHELL -c 'Y=\${X=OK} Z=\$X; echo \$X \$Z'" 0 "OK OK\n" ""
docommand param153 "$SHELL -c 'Y=\${X:=OK} Z=\$X; echo \$X \$Z'" 0 "OK OK\n" ""

#
# Test Prefix- and Suffix- parameter expansion with double quotes in the pattern
#
docommand param180 "$SHELL -c 'foo=abcdefghij; bar=efg ; echo \${foo%\"\$bar\"*}'" 0 "abcd\n" ""
docommand param181 "$SHELL -c 'foo=abcdefghij; bar=efg ; echo \${foo%\"\$bar*\"}'" 0 "abcdefghij\n" ""
docommand param182 "$SHELL -c 'foo=abcdefghij"\\\\\\"e; bar=efg ; echo \${foo%\"\e\"}'" 0 "abcdefghij\n" ""
docommand param183 "$SHELL -c 'foo=abcdefghij"\\\\\\"e; bar=efg ; echo \${foo%\e}'" 0 "abcdefghij\\\\\n" ""
docommand param184 "$SHELL -c 'in=\$1; pre=\${1%?}; out=\${in#\"\$pre\"}; printf [%s] \"\$out\"' -- AB\\\"C" 0 "[C]" ""

docommand param200 "$SHELL -c 'a=; printf \"<%s>\" \"\${a:-\"a b\"}\"'" 0 "<a b>" ""
docommand param201 "$SHELL -c 'x=\"a*b\"; y=\"a[*]b\"; printf \"<%s>\" \"\${x#\$y}\"'" 0 "<>" ""
docommand param202 "$SHELL -c 'x=\"a*b\"; y=\"a[*]b\"; printf \"<%s>\" \"\${x#\"\$y\"}\"'" 0 "<a*b>" ""

success
