1*11be35a1SLionel Sambuc# $NetBSD: t_here.sh,v 1.1 2012/03/17 16:33:11 jruoho Exp $ 2*11be35a1SLionel Sambuc# 3*11be35a1SLionel Sambuc# Copyright (c) 2007 The NetBSD Foundation, Inc. 4*11be35a1SLionel Sambuc# All rights reserved. 5*11be35a1SLionel Sambuc# 6*11be35a1SLionel Sambuc# Redistribution and use in source and binary forms, with or without 7*11be35a1SLionel Sambuc# modification, are permitted provided that the following conditions 8*11be35a1SLionel Sambuc# are met: 9*11be35a1SLionel Sambuc# 1. Redistributions of source code must retain the above copyright 10*11be35a1SLionel Sambuc# notice, this list of conditions and the following disclaimer. 11*11be35a1SLionel Sambuc# 2. Redistributions in binary form must reproduce the above copyright 12*11be35a1SLionel Sambuc# notice, this list of conditions and the following disclaimer in the 13*11be35a1SLionel Sambuc# documentation and/or other materials provided with the distribution. 14*11be35a1SLionel Sambuc# 15*11be35a1SLionel Sambuc# THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 16*11be35a1SLionel Sambuc# ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 17*11be35a1SLionel Sambuc# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 18*11be35a1SLionel Sambuc# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 19*11be35a1SLionel Sambuc# BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 20*11be35a1SLionel Sambuc# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 21*11be35a1SLionel Sambuc# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 22*11be35a1SLionel Sambuc# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 23*11be35a1SLionel Sambuc# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 24*11be35a1SLionel Sambuc# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 25*11be35a1SLionel Sambuc# POSSIBILITY OF SUCH DAMAGE. 26*11be35a1SLionel Sambuc# 27*11be35a1SLionel Sambuc 28*11be35a1SLionel Sambucnl=' 29*11be35a1SLionel Sambuc' 30*11be35a1SLionel Sambuc 31*11be35a1SLionel Sambuccheck() 32*11be35a1SLionel Sambuc{ 33*11be35a1SLionel Sambuc SVIFS="$IFS" 34*11be35a1SLionel Sambuc result="$(eval $1)" 35*11be35a1SLionel Sambuc # Remove newlines 36*11be35a1SLionel Sambuc oifs="$IFS" 37*11be35a1SLionel Sambuc IFS="$nl" 38*11be35a1SLionel Sambuc result="$(echo $result)" 39*11be35a1SLionel Sambuc IFS="$oifs" 40*11be35a1SLionel Sambuc if [ "$2" != "$result" ] 41*11be35a1SLionel Sambuc then 42*11be35a1SLionel Sambuc atf_fail "expected [$2], found [$result]" 43*11be35a1SLionel Sambuc fi 44*11be35a1SLionel Sambuc IFS="$SVIFS" 45*11be35a1SLionel Sambuc} 46*11be35a1SLionel Sambuc 47*11be35a1SLionel Sambucatf_test_case all 48*11be35a1SLionel Sambucall_head() { 49*11be35a1SLionel Sambuc atf_set "descr" "Basic tests for here documents" 50*11be35a1SLionel Sambuc} 51*11be35a1SLionel Sambucall_body() { 52*11be35a1SLionel Sambuc y=x 53*11be35a1SLionel Sambuc 54*11be35a1SLionel Sambuc IFS= 55*11be35a1SLionel Sambuc check 'x=`cat <<EOF'$nl'text'${nl}EOF$nl'`; echo $x' 'text' 56*11be35a1SLionel Sambuc check 'x=`cat <<\EOF'$nl'text'${nl}EOF$nl'`; echo $x' 'text' 57*11be35a1SLionel Sambuc 58*11be35a1SLionel Sambuc check 'x=`cat <<EOF'$nl'te${y}t'${nl}EOF$nl'`; echo $x' 'text' 59*11be35a1SLionel Sambuc check 'x=`cat <<\EOF'$nl'te${y}t'${nl}EOF$nl'`; echo $x' 'te${y}t' 60*11be35a1SLionel Sambuc check 'x=`cat <<"EOF"'$nl'te${y}t'${nl}EOF$nl'`; echo $x' 'te${y}t' 61*11be35a1SLionel Sambuc check 'x=`cat <<'"'EOF'"$nl'te${y}t'${nl}EOF$nl'`; echo $x' 'te${y}t' 62*11be35a1SLionel Sambuc 63*11be35a1SLionel Sambuc check 'x=`cat <<EOF'$nl'te'"'"'xt'${nl}EOF$nl'`; echo $x' 'te'"'"'xt' 64*11be35a1SLionel Sambuc check 'x=`cat <<\EOF'$nl'te'"'"'xt'${nl}EOF$nl'`; echo $x' 'te'"'"'xt' 65*11be35a1SLionel Sambuc check 'x=`cat <<"EOF"'$nl'te'"'"'xt'${nl}EOF$nl'`; echo $x' 'te'"'"'xt' 66*11be35a1SLionel Sambuc 67*11be35a1SLionel Sambuc check 'x=`cat <<EOF'$nl'te'"'"'${y}t'${nl}EOF$nl'`; echo $x' 'te'"'"'xt' 68*11be35a1SLionel Sambuc check 'x=`cat <<EOF'$nl'te'"''"'${y}t'${nl}EOF$nl'`; echo $x' 'te'"''"'xt' 69*11be35a1SLionel Sambuc} 70*11be35a1SLionel Sambuc 71*11be35a1SLionel Sambucatf_init_test_cases() { 72*11be35a1SLionel Sambuc atf_add_test_case all 73*11be35a1SLionel Sambuc} 74