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