You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
200 lines
3.2 KiB
200 lines
3.2 KiB
#!/usr/bin/env bash-shlib
|
|
# -*- mode: shell-script -*-
|
|
|
|
include shunit
|
|
|
|
depends sed grep git mkdir readlink
|
|
|
|
export -f matches
|
|
export grep
|
|
|
|
tmp=/tmp
|
|
tprog="../bin/compose-core"
|
|
tprog=$(readlink -f $tprog)
|
|
|
|
|
|
export PATH=".:$PATH"
|
|
short_tprog=$(basename "$tprog")
|
|
|
|
|
|
##
|
|
## Convenience function
|
|
##
|
|
|
|
init_test() {
|
|
test_tmpdir=$(mktemp -d -t tmp.XXXXXXXXXX)
|
|
cd "$test_tmpdir"
|
|
export CACHEDIR="$test_tmpdir/.cache"
|
|
export VARDIR="$test_tmpdir/.var"
|
|
mkdir -p "$CACHEDIR"
|
|
}
|
|
|
|
|
|
|
|
tear_test() {
|
|
rm -rf "$test_tmpdir"
|
|
}
|
|
|
|
|
|
##
|
|
## Tests
|
|
##
|
|
|
|
|
|
function test_uses {
|
|
|
|
init_test
|
|
|
|
export CHARM_STORE=$test_tmpdir
|
|
mkdir -p $test_tmpdir/www/actions
|
|
cat <<EOF2 > $test_tmpdir/www/metadata.yml
|
|
docker-image: bar ## required as we want relation to know the base image
|
|
uses:
|
|
myrelation: myrelationdef
|
|
EOF2
|
|
|
|
cat <<EOF2 > $test_tmpdir/compose.yml
|
|
web_site:
|
|
charm: www
|
|
EOF2
|
|
|
|
export DISABLE_SYSTEM_CONFIG_FILE=true
|
|
|
|
assert_list <<EOF
|
|
|
|
### Testing _get_services_uses
|
|
|
|
## -- simple case with only one service with one relation
|
|
|
|
cd "$test_tmpdir"
|
|
. "$tprog" || exit 1
|
|
|
|
_setup_state_dir
|
|
|
|
|
|
out=\$(_get_services_uses web_site | tr '\0' ':')
|
|
expected="web_site:myrelation:myrelationdef:"
|
|
|
|
[[ "\$out" == "\$expected" ]] || {
|
|
echo "doesn't end with: \$expected" >&2
|
|
echo "\$out"
|
|
exit 1
|
|
}
|
|
|
|
## -- service not defined in compose, but has charm
|
|
|
|
cd "$test_tmpdir"
|
|
. "$tprog" || exit 1
|
|
|
|
_setup_state_dir
|
|
|
|
out=\$(_get_services_uses www | tr '\0' ':') || exit 2
|
|
expected="www:myrelation:myrelationdef:"
|
|
|
|
[[ "\$out" == "\$expected" ]] || {
|
|
echo "doesn't end with: \$expected" >&2
|
|
echo "\$out"
|
|
exit 1
|
|
}
|
|
|
|
|
|
## -- service not defined in compose, nor has charm should fail
|
|
|
|
cd "$test_tmpdir"
|
|
. "$tprog" || exit 1
|
|
|
|
_setup_state_dir
|
|
|
|
_get_services_uses xxx || exit 0
|
|
|
|
echo "Expected it to fail"
|
|
exit 1
|
|
|
|
EOF
|
|
|
|
tear_test
|
|
}
|
|
|
|
|
|
function test_provides {
|
|
|
|
init_test
|
|
|
|
export CHARM_STORE=$test_tmpdir
|
|
mkdir -p $test_tmpdir/www/actions
|
|
cat <<EOF2 > $test_tmpdir/www/metadata.yml
|
|
docker-image: bar ## required as we want relation to know the base image
|
|
provides:
|
|
myrelation: myrelationdef
|
|
EOF2
|
|
|
|
cat <<EOF2 > $test_tmpdir/compose.yml
|
|
web_site:
|
|
charm: www
|
|
EOF2
|
|
|
|
export DISABLE_SYSTEM_CONFIG_FILE=true
|
|
|
|
assert_list <<EOF
|
|
|
|
### Testing _get_services_provides
|
|
|
|
## -- simple case with only one service with one relation
|
|
|
|
cd "$test_tmpdir"
|
|
. "$tprog" || exit 1
|
|
|
|
_setup_state_dir
|
|
|
|
|
|
out=\$(_get_services_provides web_site | tr '\0' ':')
|
|
expected="web_site:myrelation:myrelationdef:"
|
|
|
|
[[ "\$out" == "\$expected" ]] || {
|
|
echo "doesn't end with: \$expected" >&2
|
|
echo "\$out"
|
|
exit 1
|
|
}
|
|
|
|
|
|
## -- service not defined in compose, but has charm
|
|
|
|
cd "$test_tmpdir"
|
|
. "$tprog" || exit 1
|
|
|
|
_setup_state_dir
|
|
|
|
|
|
out=\$(_get_services_provides www | tr '\0' ':')
|
|
expected="www:myrelation:myrelationdef:"
|
|
|
|
[[ "\$out" == "\$expected" ]] || {
|
|
echo "doesn't end with: \$expected" >&2
|
|
echo "\$out"
|
|
exit 1
|
|
}
|
|
|
|
|
|
## -- service not defined in compose, nor has charm should fail
|
|
|
|
cd "$test_tmpdir"
|
|
. "$tprog" || exit 1
|
|
|
|
_setup_state_dir
|
|
|
|
out=\$(set -o pipefail
|
|
_get_provides_uses xxx | tr '\0' :) || exit 0
|
|
|
|
echo "Expected it to fail"
|
|
exit 1
|
|
|
|
|
|
EOF
|
|
|
|
tear_test
|
|
}
|
|
|
|
|
|
|
|
|
|
continue_on_error="0" testbench $*
|