#! /usr/pkg/bin/atf-sh
# AUTOMATICALLY GENERATED FROM Makefile
# Copyright 2011 The Kyua Authors.
# 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.


# Subcommand to strip out the durations and timestamps in a report.
#
# This is to make the reports deterministic and thus easily testable.  The
# time deltas are replaced by the fixed string S.UUU and the timestamps are
# replaced by the fixed strings YYYYMMDD.HHMMSS.ssssss and
# YYYY-MM-DDTHH:MM:SS.ssssssZ depending on their original format.
#
# This variable should be used as shown here:
#
#     atf_check ... -x kyua report "| ${utils_strip_times}"
#
# Use the utils_install_times_wrapper function to create a 'kyua' wrapper
# script that automatically does this.
# CHECK_STYLE_DISABLE
utils_strip_times='sed -E \
    -e "s,( |\[|\")[0-9][0-9]*\.[0-9][0-9][0-9](s]|s|\"),\1S.UUU\2,g" \
    -e "s,[0-9]{8}-[0-9]{6}-[0-9]{6},YYYYMMDD-HHMMSS-ssssss,g" \
    -e "s,[0-9]{4}-[0-9]{2}-[0-9]{2}T[0-9]{2}:[0-9]{2}:[0-9]{2}\.[0-9]{6}Z,YYYY-MM-DDTHH:MM:SS.ssssssZ,g"'
# CHECK_STYLE_ENABLE


# Same as utils_strip_times but avoids stripping timestamp-based report IDs.
#
# This is to make the reports deterministic and thus easily testable.  The
# time deltas are replaced by the fixed string S.UUU and the timestamps are
# replaced by the fixed string YYYY-MM-DDTHH:MM:SS.ssssssZ.
# CHECK_STYLE_DISABLE
utils_strip_times_but_not_ids='sed -E \
    -e "s,( |\[|\")[0-9][0-9]*\.[0-9][0-9][0-9](s]|s|\"),\1S.UUU\2,g" \
    -e "s,[0-9]{4}-[0-9]{2}-[0-9]{2}T[0-9]{2}:[0-9]{2}:[0-9]{2}\.[0-9]{6}Z,YYYY-MM-DDTHH:MM:SS.ssssssZ,g"'
# CHECK_STYLE_ENABLE


# Computes the results id for a test suite run.
#
# The computed path is "generic" in the sense that it does not include a
# real timestamp: it only includes a placeholder.  This function should be
# used along the utils_strip_times function so that the timestamps of
# the real results files are stripped out.
#
# \param path Optional path to use; if not given, use the cwd.
utils_results_id() {
    local test_suite_id="$(utils_test_suite_id "${@}")"
    echo "${test_suite_id}.YYYYMMDD-HHMMSS-ssssss"
}


# Computes the results file for a test suite run.
#
# The computed path is "generic" in the sense that it does not include a
# real timestamp: it only includes a placeholder.  This function should be
# used along the utils_strip_times function so that the timestampts of the
# real results files are stripped out.
#
# \param path Optional path to use; if not given, use the cwd.
utils_results_file() {
    echo "${HOME}/.kyua/store/results.$(utils_results_id "${@}").db"
}


# Copies a helper binary from the source directory to the work directory.
#
# \param name The name of the binary to copy.
# \param destination The target location for the binary; can be either
#     a directory name or a file name.
utils_cp_helper() {
    local name="${1}"; shift
    local destination="${1}"; shift

    ln -s "$(atf_get_srcdir)"/helpers/"${name}" "${destination}"
}


# Creates a 'kyua' binary in the path that strips timing data off the output.
#
# Call this on test cases that wish to replace timing data in the *stdout* of
# Kyua with the deterministic strings.  This is to be used by tests that
# validate the 'test' and 'report' subcommands.
utils_install_times_wrapper() {
    local DUMMY_KYUA_BINDIR=$(pwd)
    local DUMMY_KYUA_BIN="$DUMMY_KYUA_BINDIR/kyua"

    [ ! -x "$DUMMY_KYUA_BIN" ] || return

    local ORIG_KYUA_BIN=$(which kyua)
    cat >"$DUMMY_KYUA_BIN" <<EOF
#! /bin/sh

$ORIG_KYUA_BIN "\${@}" >kyua.tmpout
result=\${?}
cat kyua.tmpout | ${utils_strip_times}
exit \${result}
EOF
    chmod +x "$DUMMY_KYUA_BIN"
    export PATH="$DUMMY_KYUA_BINDIR:${PATH}"
}


# Creates a 'kyua' binary in the path that makes the output of 'test' stable.
#
# Call this on test cases that wish to replace timing data with deterministic
# strings and that need the result lines in the output to be sorted
# lexicographically.  The latter hides the indeterminism caused by parallel
# execution so that the output can be verified.  For these reasons, this is to
# be used exclusively by tests that validate the 'test' subcommand.
utils_install_stable_test_wrapper() {
    local DUMMY_KYUA_BINDIR=$(pwd)
    local DUMMY_KYUA_BIN="$DUMMY_KYUA_BINDIR/kyua"

    [ ! -x "$DUMMY_KYUA_BIN" ] || return

    local ORIG_KYUA_BIN=$(which kyua)
    cat >"$DUMMY_KYUA_BIN" <<EOF
#! /bin/sh

$ORIG_KYUA_BIN "\${@}" >kyua.tmpout
result=\${?}
cat kyua.tmpout | ${utils_strip_times} >kyua.tmpout2

# Sort the test result lines but keep the rest intact.
grep '[^ ]*:[^ ]*' kyua.tmpout2 | sort >kyua.tmpout3
grep -v '[^ ]*:[^ ]*' kyua.tmpout2 >kyua.tmpout4
cat kyua.tmpout3 kyua.tmpout4

exit \${result}
EOF
    chmod +x "$DUMMY_KYUA_BIN"
    export PATH="$DUMMY_KYUA_BINDIR:${PATH}"
}


# Defines a test case with a default head.
utils_test_case() {
    local name="${1}"; shift

    atf_test_case "${name}"
    eval "${name}_head() {
        atf_set require.progs kyua
    }"
}


# Computes the test suite identifier for results files files.
#
# \param path Optional path to use; if not given, use the cwd.
utils_test_suite_id() {
    local path=
    if [ ${#} -gt 0 ]; then
        path="$(cd ${1} && pwd)"; shift
    else
        path="$(pwd)"
    fi
    echo "${path}" | sed -e 's,^/,,' -e 's,/,_,g'
}
# Copyright 2011 The Kyua Authors.
# 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.


# Creates a new database file in the store directory.
#
# Subsequent invocations of db-exec should just pick this new file up.
create_empty_store() {
    cat >Kyuafile <<EOF
syntax(2)
EOF
    atf_check -s exit:0 -o ignore -e empty kyua test
}


utils_test_case one_arg
one_arg_body() {
    create_empty_store

    atf_check -s exit:0 -o save:metadata.csv -e empty \
        kyua db-exec "SELECT * FROM metadata"
    atf_check -s exit:0 -o ignore -e empty \
        grep 'schema_version,.*timestamp' metadata.csv
}


utils_test_case many_args
many_args_body() {
    create_empty_store

    atf_check -s exit:0 -o save:metadata.csv -e empty \
        kyua db-exec SELECT "*" FROM metadata
    atf_check -s exit:0 -o ignore -e empty \
        grep 'schema_version,.*timestamp' metadata.csv
}


utils_test_case no_args
no_args_body() {
    atf_check -s exit:3 -o empty -e match:"Not enough arguments" kyua db-exec
    test ! -d .kyua/store/ || atf_fail "Database created but it should" \
        "not have been"
}


utils_test_case invalid_statement
invalid_statement_body() {
    create_empty_store

    atf_check -s exit:1 -o empty -e match:"SQLite error.*foo" \
        kyua db-exec foo
}


utils_test_case no_create_store
no_create_store_body() {
    atf_check -s exit:1 -o empty -e match:"No previous results.*not-here" \
        kyua db-exec --results-file=not-here "SELECT * FROM metadata"
    if [ -f not-here ]; then
        atf_fail "Database created but it should not have been"
    fi
}


utils_test_case results_file__default_home
results_file__default_home_body() {
    HOME=home-dir
    create_empty_store

    atf_check -s exit:0 -o save:metadata.csv -e empty \
        kyua db-exec "SELECT * FROM metadata"
    test -f home-dir/.kyua/store/*.db || atf_fail "Database not created in" \
        "the home directory"
    atf_check -s exit:0 -o ignore -e empty \
        grep 'schema_version,.*timestamp' metadata.csv
}


utils_test_case results_file__explicit__ok
results_file__explicit__ok_body() {
    create_empty_store
    mv .kyua/store/*.db custom.db
    rmdir .kyua/store

    HOME=home-dir
    atf_check -s exit:0 -o save:metadata.csv -e empty \
        kyua --logfile=/dev/null db-exec -r custom.db "SELECT * FROM metadata"
    test ! -d home-dir/.kyua || atf_fail "Home directory created but this" \
        "should not have happened"
    atf_check -s exit:0 -o ignore -e empty \
        grep 'schema_version,.*timestamp' metadata.csv
}


utils_test_case results_file__explicit__fail
results_file__explicit__fail_head() {
    atf_set "require.user" "unprivileged"
}
results_file__explicit__fail_body() {
    atf_check -s exit:1 -o empty -e match:"No previous results.*foo.db" \
        kyua db-exec --results-file=foo.db "SELECT * FROM metadata"
}


utils_test_case no_headers_flag
no_headers_flag_body() {
    create_empty_store

    atf_check kyua db-exec "CREATE TABLE data" \
        "(a INTEGER PRIMARY KEY, b INTEGER, c TEXT)"
    atf_check kyua db-exec "INSERT INTO data VALUES (65, 43, NULL)"
    atf_check kyua db-exec "INSERT INTO data VALUES (23, 42, 'foo')"

    cat >expout <<EOF
a,b,c
23,42,foo
65,43,NULL
EOF
    atf_check -s exit:0 -o file:expout -e empty \
        kyua db-exec "SELECT * FROM data ORDER BY a"

    tail -n 2 <expout >expout2
    atf_check -s exit:0 -o file:expout2 -e empty \
        kyua db-exec --no-headers "SELECT * FROM data ORDER BY a"
}


atf_init_test_cases() {
    atf_add_test_case one_arg
    atf_add_test_case many_args
    atf_add_test_case no_args
    atf_add_test_case invalid_statement
    atf_add_test_case no_create_store

    atf_add_test_case results_file__default_home
    atf_add_test_case results_file__explicit__ok
    atf_add_test_case results_file__explicit__fail

    atf_add_test_case no_headers_flag
}
