1*3e3895bfSKrzysztof Piecuch# $FreeBSD: head/bin/sh/tests/expansion/trim9.0 292758 2015-12-26 22:27:48Z jilles $ 2*3e3895bfSKrzysztof Piecuch 3*3e3895bfSKrzysztof Piecuch# POSIX does not specify these but they occasionally occur in the wild. 4*3e3895bfSKrzysztof Piecuch# This just serves to keep working what currently works. 5*3e3895bfSKrzysztof Piecuch 6*3e3895bfSKrzysztof Piecuchfailures='' 7*3e3895bfSKrzysztof Piecuchok='' 8*3e3895bfSKrzysztof Piecuch 9*3e3895bfSKrzysztof Piecuchtestcase() { 10*3e3895bfSKrzysztof Piecuch code="$1" 11*3e3895bfSKrzysztof Piecuch expected="$2" 12*3e3895bfSKrzysztof Piecuch oIFS="$IFS" 13*3e3895bfSKrzysztof Piecuch eval "$code" 14*3e3895bfSKrzysztof Piecuch IFS='|' 15*3e3895bfSKrzysztof Piecuch result="$#|$*" 16*3e3895bfSKrzysztof Piecuch IFS="$oIFS" 17*3e3895bfSKrzysztof Piecuch if [ "x$result" = "x$expected" ]; then 18*3e3895bfSKrzysztof Piecuch ok=x$ok 19*3e3895bfSKrzysztof Piecuch else 20*3e3895bfSKrzysztof Piecuch failures=x$failures 21*3e3895bfSKrzysztof Piecuch echo "For $code, expected $expected actual $result" 22*3e3895bfSKrzysztof Piecuch fi 23*3e3895bfSKrzysztof Piecuch} 24*3e3895bfSKrzysztof Piecuch 25*3e3895bfSKrzysztof Piecuchtestcase 'shift $#; set -- "${*#Q}"' '1|' 26*3e3895bfSKrzysztof Piecuchtestcase 'shift $#; set -- "${*##Q}"' '1|' 27*3e3895bfSKrzysztof Piecuchtestcase 'shift $#; set -- "${*%Q}"' '1|' 28*3e3895bfSKrzysztof Piecuchtestcase 'shift $#; set -- "${*%%Q}"' '1|' 29*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${*#Q}"' '1| R' 30*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${*##Q}"' '1| R' 31*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${*%R}"' '1|Q ' 32*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${*%%R}"' '1|Q ' 33*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${*#S}"' '1|Q R' 34*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${*##S}"' '1|Q R' 35*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${*%S}"' '1|Q R' 36*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${*%%S}"' '1|Q R' 37*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${*#Q}' '1|R' 38*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${*##Q}' '1|R' 39*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${*%R}' '1|Q' 40*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${*%%R}' '1|Q' 41*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${*#S}' '2|Q|R' 42*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${*##S}' '2|Q|R' 43*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${*%S}' '2|Q|R' 44*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${*%%S}' '2|Q|R' 45*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${@#Q}' '1|R' 46*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${@##Q}' '1|R' 47*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${@%R}' '1|Q' 48*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${@%%R}' '1|Q' 49*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${@#S}' '2|Q|R' 50*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${@##S}' '2|Q|R' 51*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${@%S}' '2|Q|R' 52*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- ${@%%S}' '2|Q|R' 53*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${@#Q}"' '2||R' 54*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${@%R}"' '2|Q|' 55*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${@%%R}"' '2|Q|' 56*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${@#S}"' '2|Q|R' 57*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${@##S}"' '2|Q|R' 58*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${@%S}"' '2|Q|R' 59*3e3895bfSKrzysztof Piecuchtestcase 'set -- Q R; set -- "${@%%S}"' '2|Q|R' 60*3e3895bfSKrzysztof Piecuch 61*3e3895bfSKrzysztof Piecuchtest "x$failures" = x 62