minix/external/bsd/kyua-atf-compat/dist/atf2kyua_test.sh
Lionel Sambuc 11be35a165 Importing NetBSD "Kyua" test framework
To do so, a few dependencies have been imported:

 * external/bsd/lutok
 * external/mit/lua
 * external/public-domain/sqlite
 * external/public-domain/xz

The Kyua framework is the new generation of ATF (Automated Test
Framework), it is composed of:

 * external/bsd/atf
 * external/bsd/kyua-atf-compat
 * external/bsd/kyua-cli
 * external/bsd/kyua-tester
 * tests

Kyua/ATF being written in C++, it depends on libstdc++ which is
provided by GCC. As this is not part of the sources, Kyua is only
compiled when the native GCC utils are installed.

To install Kyua do the following:

 * In a cross-build enviromnent, add the following to the build.sh
   commandline: -V MKBINUTILS=yes -V MKGCCCMDS=yes

WARNING:
  At this point the import is still experimental, and not supported
  on native builds (a.k.a make build).

Change-Id: I26aee23c5bbd2d64adcb7c1beb98fe0d479d7ada
2013-07-23 20:43:41 +02:00

247 lines
6.4 KiB
Bash

#! __ATF_SH__
# Copyright 2012 Google Inc.
# All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions are
# met:
#
# * Redistributions of source code must retain the above copyright
# notice, this list of conditions and the following disclaimer.
# * Redistributions in binary form must reproduce the above copyright
# notice, this list of conditions and the following disclaimer in the
# documentation and/or other materials provided with the distribution.
# * Neither the name of Google Inc. nor the names of its contributors
# may be used to endorse or promote products derived from this software
# without specific prior written permission.
#
# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
# "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
# LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
# A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
# OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
# SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
# LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
. "${KYUA_ATF_COMPAT_PKGDATADIR:-__PKGDATADIR__}/tests_lib.subr"
# Performs a conversion test of an Atffile without recursion.
#
# \param source_root The directory in which to create the fake test suite. Must
# exist.
# \param target_root The directory in which the generated Kyuafiles will be
# stored. May not exist.
# \param ... Additional parameters to pass to atf2kyua.
one_level_test() {
local source_root="${1}"; shift
local target_root="${1}"; shift
cd "${source_root}"
create_test_program p1 pass
create_test_program p2 pass
create_atffile "Atffile" 'prop: test-suite = "foo"' 'tp: p1' 'tp: p2'
cd -
atf_check -s exit:0 -e ignore atf2kyua "${@}"
cd "${target_root}"
cat >expected <<EOF
syntax('kyuafile', 1)
test_suite('foo')
atf_test_program{name='p1'}
atf_test_program{name='p2'}
EOF
atf_check -s exit:0 -o file:expected cat "Kyuafile"
cd -
}
# Performs a conversion test of an Atffile with recursion.
#
# \param source_root The directory in which to create the fake test suite. Must
# exist.
# \param target_root The directory in which the generated Kyuafiles will be
# stored. May not exist.
# \param ... Additional parameters to pass to atf2kyua.
multiple_levels_test() {
local source_root="${1}"; shift
local target_root="${1}"; shift
cd "${source_root}"
create_test_program prog1 pass
mkdir dir1
create_test_program dir1/ignore-me pass
create_test_program dir1/prog2 fail
mkdir dir1/dir2
create_test_program dir1/dir2/prog3 skip
create_test_program dir1/dir2/prog4 pass
mkdir dir3
create_test_program dir3/prog1 fail
create_atffile Atffile 'prop: test-suite = "foo"' 'tp: prog1' 'tp: dir1'
create_atffile dir1/Atffile 'prop: test-suite = "bar"' 'tp-glob: [pd]*'
create_atffile dir1/dir2/Atffile 'prop: test-suite = "foo"' 'tp: prog3' \
'tp: prog4'
create_atffile dir3/Atffile 'prop: test-suite = "foo"' 'tp: prog1'
cd -
atf_check -s exit:0 -e ignore atf2kyua "${@}"
cd "${target_root}"
cat >expected <<EOF
syntax('kyuafile', 1)
test_suite('foo')
include('dir1/Kyuafile')
atf_test_program{name='prog1'}
EOF
atf_check -s exit:0 -o file:expected cat Kyuafile
cat >expected <<EOF
syntax('kyuafile', 1)
test_suite('bar')
include('dir2/Kyuafile')
atf_test_program{name='prog2'}
EOF
atf_check -s exit:0 -o file:expected cat dir1/Kyuafile
cat >expected <<EOF
syntax('kyuafile', 1)
test_suite('foo')
atf_test_program{name='prog3'}
atf_test_program{name='prog4'}
EOF
atf_check -s exit:0 -o file:expected cat dir1/dir2/Kyuafile
cat >expected <<EOF
syntax('kyuafile', 1)
test_suite('foo')
atf_test_program{name='prog1'}
EOF
atf_check -s exit:0 -o file:expected cat dir3/Kyuafile
cd -
}
atf_test_case default__one_level
default__one_level_body() {
one_level_test . .
}
atf_test_case default__multiple_levels
default__multiple_levels_body() {
multiple_levels_test . .
}
atf_test_case sflag__one_level
sflag__one_level_body() {
mkdir root
one_level_test root root -s root
}
atf_test_case sflag__multiple_levels
sflag__multiple_levels_body() {
mkdir root
multiple_levels_test root root -s root
}
atf_test_case tflag__one_level
tflag__one_level_body() {
one_level_test . target -t target
}
atf_test_case tflag__multiple_levels
tflag__multiple_levels_body() {
multiple_levels_test . target -t target
}
atf_test_case sflag_tflag__one_level
sflag_tflag__one_level_body() {
mkdir source
one_level_test source target -s source -t target
}
atf_test_case sflag_tflag__multiple_levels
sflag_tflag__multiple_levels_body() {
mkdir source
multiple_levels_test source target -s source -t target
}
atf_test_case prune_stale_kyuafiles
prune_stale_kyuafiles_body() {
create_test_program p1 fail
create_test_program p2 skip
chmod +x p1 p2
create_atffile Atffile 'prop: test-suite = "foo"' 'tp: p1' 'tp: p2'
mkdir subdir
touch subdir/Kyuafile
atf_check -s exit:0 -e ignore atf2kyua
test -f Kyuafile || atf_fail "Kyuafiles not created as expected"
test \! -f subdir/Kyuafile || atf_fail "Stale kyuafiles not removed"
}
atf_test_case unknown_option
unknown_option_body() {
atf_check -s exit:1 -o empty -e match:'E: Unknown option -Z' \
atf2kyua -Z -A
}
atf_test_case too_many_arguments
too_many_arguments_body() {
atf_check -s exit:1 -o empty -e match:'E: No arguments allowed' \
atf2kyua first
}
atf_init_test_cases() {
atf_add_test_case default__one_level
atf_add_test_case default__multiple_levels
atf_add_test_case sflag__one_level
atf_add_test_case sflag__multiple_levels
atf_add_test_case tflag__one_level
atf_add_test_case tflag__multiple_levels
atf_add_test_case sflag_tflag__one_level
atf_add_test_case sflag_tflag__multiple_levels
atf_add_test_case prune_stale_kyuafiles
atf_add_test_case unknown_option
atf_add_test_case too_many_arguments
}