1*0a6a1f1dSLionel Sambuc# $NetBSD: t_dotcmd.sh,v 1.1 2014/05/31 14:29:06 christos Exp $ 2*0a6a1f1dSLionel Sambuc# 3*0a6a1f1dSLionel Sambuc# Copyright (c) 2014 The NetBSD Foundation, Inc. 4*0a6a1f1dSLionel Sambuc# All rights reserved. 5*0a6a1f1dSLionel Sambuc# 6*0a6a1f1dSLionel Sambuc# This code is derived from software contributed to The NetBSD Foundation 7*0a6a1f1dSLionel Sambuc# by Jarmo Jaakkola. 8*0a6a1f1dSLionel Sambuc# 9*0a6a1f1dSLionel Sambuc# Redistribution and use in source and binary forms, with or without 10*0a6a1f1dSLionel Sambuc# modification, are permitted provided that the following conditions 11*0a6a1f1dSLionel Sambuc# are met: 12*0a6a1f1dSLionel Sambuc# 1. Redistributions of source code must retain the above copyright 13*0a6a1f1dSLionel Sambuc# notice, this list of conditions and the following disclaimer. 14*0a6a1f1dSLionel Sambuc# 2. Redistributions in binary form must reproduce the above copyright 15*0a6a1f1dSLionel Sambuc# notice, this list of conditions and the following disclaimer in the 16*0a6a1f1dSLionel Sambuc# documentation and/or other materials provided with the distribution. 17*0a6a1f1dSLionel Sambuc# 18*0a6a1f1dSLionel Sambuc# THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 19*0a6a1f1dSLionel Sambuc# ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 20*0a6a1f1dSLionel Sambuc# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 21*0a6a1f1dSLionel Sambuc# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 22*0a6a1f1dSLionel Sambuc# BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 23*0a6a1f1dSLionel Sambuc# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 24*0a6a1f1dSLionel Sambuc# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 25*0a6a1f1dSLionel Sambuc# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 26*0a6a1f1dSLionel Sambuc# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 27*0a6a1f1dSLionel Sambuc# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 28*0a6a1f1dSLionel Sambuc# POSSIBILITY OF SUCH DAMAGE. 29*0a6a1f1dSLionel Sambuc# 30*0a6a1f1dSLionel Sambuc 31*0a6a1f1dSLionel Sambuc# Test loop and function flow control statements in various scopes in a file 32*0a6a1f1dSLionel Sambuc# sourced by a dotcmd in various scopes. Basically, dotcmd is like #include 33*0a6a1f1dSLionel Sambuc# in C/C++ so, for example, if the dotcmd is in a loop's body, a break in 34*0a6a1f1dSLionel Sambuc# the sourced file can be used to break out of that loop. 35*0a6a1f1dSLionel Sambuc 36*0a6a1f1dSLionel Sambuccmds='return break continue' 37*0a6a1f1dSLionel Sambucscopes='case compound file for func subshell until while' 38*0a6a1f1dSLionel Sambuc 39*0a6a1f1dSLionel Sambuccase_ids='' 40*0a6a1f1dSLionel Sambuc 41*0a6a1f1dSLionel Sambucfor dot_scope in ${scopes} 42*0a6a1f1dSLionel Sambucdo 43*0a6a1f1dSLionel Sambuc for cmd in ${cmds} 44*0a6a1f1dSLionel Sambuc do 45*0a6a1f1dSLionel Sambuc for cmd_scope in ${scopes} 46*0a6a1f1dSLionel Sambuc do 47*0a6a1f1dSLionel Sambuc case_id="${dot_scope}_${cmd}_${cmd_scope}" 48*0a6a1f1dSLionel Sambuc case_ids="${case_ids} ${case_id}" 49*0a6a1f1dSLionel Sambuc atf_test_case "${case_id}" 50*0a6a1f1dSLionel Sambuc eval " 51*0a6a1f1dSLionel Sambuc${case_id}_head() 52*0a6a1f1dSLionel Sambuc{ 53*0a6a1f1dSLionel Sambuc atf_set 'descr' \\ 54*0a6a1f1dSLionel Sambuc 'dotcmd in ${dot_scope}, file contains ${cmd} in ${cmd_scope}' 55*0a6a1f1dSLionel Sambuc} 56*0a6a1f1dSLionel Sambuc 57*0a6a1f1dSLionel Sambuc${case_id}_body() 58*0a6a1f1dSLionel Sambuc{ 59*0a6a1f1dSLionel Sambuc srcdir=\$(atf_get_srcdir) 60*0a6a1f1dSLionel Sambuc # for dotcmd to find the sourced files 61*0a6a1f1dSLionel Sambuc PATH=\"\${PATH}:\${srcdir}\" 62*0a6a1f1dSLionel Sambuc atf_check -o file:\"\${srcdir}/out/${case_id}.out\" \\ 63*0a6a1f1dSLionel Sambuc \"\${srcdir}/${case_id}\" 64*0a6a1f1dSLionel Sambuc} 65*0a6a1f1dSLionel Sambuc" # end eval 66*0a6a1f1dSLionel Sambuc done 67*0a6a1f1dSLionel Sambuc done 68*0a6a1f1dSLionel Sambucdone 69*0a6a1f1dSLionel Sambuc 70*0a6a1f1dSLionel Sambucatf_init_test_cases() 71*0a6a1f1dSLionel Sambuc{ 72*0a6a1f1dSLionel Sambuc for case_id in ${case_ids} 73*0a6a1f1dSLionel Sambuc do 74*0a6a1f1dSLionel Sambuc atf_add_test_case "${case_id}" 75*0a6a1f1dSLionel Sambuc done 76*0a6a1f1dSLionel Sambuc} 77