sh: Add tests for lines that look like heredoc delimiters but are not.

This commit is contained in:
jilles 2011-05-14 14:19:30 +00:00
parent ea495298d6
commit 975e1272ee
2 changed files with 107 additions and 0 deletions

View File

@ -0,0 +1,49 @@
# $FreeBSD$
# It may be argued that
# x=$(cat <<EOF
# foo
# EOF)
# is a valid complete command that sets x to foo, because
# cat <<EOF
# foo
# EOF
# is a valid script even without the final newline.
# However, if the here-document is not within a new-style command substitution
# or there are other constructs nested inside the command substitution that
# need terminators, the delimiter at the start of a line followed by a close
# parenthesis is clearly a literal part of the here-document.
# This file contains tests that may not work with simplistic $(...) parsers.
# The open parentheses in comments help mksh, but not zsh.
failures=0
check() {
if ! eval "[ $* ]"; then
echo "Failed: $*"
: $((failures += 1))
fi
}
check '"$(cat <<EOF # (
EOF )
EOF
)" = "EOF )"'
check '"$({ cat <<EOF # (
EOF)
EOF
})" = "EOF)"'
check '"$(if :; then cat <<EOF # (
EOF)
EOF
fi)" = "EOF)"'
check '"$( (cat <<EOF # (
EOF)
EOF
))" = "EOF)"'
exit $((failures != 0))

View File

@ -0,0 +1,58 @@
# $FreeBSD$
# It may be argued that
# x=$(cat <<EOF
# foo
# EOF)
# is a valid complete command that sets x to foo, because
# cat <<EOF
# foo
# EOF
# is a valid script even without the final newline.
# However, if the here-document is not within a new-style command substitution
# or there are other constructs nested inside the command substitution that
# need terminators, the delimiter at the start of a line followed by a close
# parenthesis is clearly a literal part of the here-document.
# This file contains tests that also work with simplistic $(...) parsers.
failures=0
check() {
if ! eval "[ $* ]"; then
echo "Failed: $*"
: $((failures += 1))
fi
}
check '`${SH} -c "cat <<EOF
EOF)
EOF
"` = "EOF)"'
check '`${SH} -c "(cat <<EOF
EOF)
EOF
)"` = "EOF)"'
check '"`cat <<EOF
EOF x
EOF
`" = "EOF x"'
check '"`cat <<EOF
EOF )
EOF
`" = "EOF )"'
check '"`cat <<EOF
EOF)
EOF
`" = "EOF)"'
check '"$(cat <<EOF
EOF x
EOF
)" = "EOF x"'
exit $((failures != 0))