haskell-persistent/bin/test-backend

#!/usr/bin/env bash
set -eu
set -o pipefail

function command_help() {
  echo "\
    $0 [-h|--help] IMAGE:TAG
  "
}

function error_msg() {
  echo ""
  echo "ERROR: $*"
  echo ""
}

function exit_msg() {
  error_msg "$@"
  command_help
  echo ""
  exit 1
}

case "$1" in
    mongo|mongodb)
        docker-compose run --rm -d mongo
        sleep 2
        function finish() {
            docker rm -f persistent_mongo_run_1
        }
        trap finish EXIT
        stack test persistent-mongodb
        ;;
    postgresql|postgres)
        docker-compose run --rm -d postgres
        sleep 2
        function finish() {
            docker rm -f persistent_postgres_run_1 || {
                echo "startup failure"
                exit 1
            }
        }
        trap finish EXIT
        stack test persistent-postgresql
        ;;
    *)
        exit_msg "don't yet know how to test: $1, please teach me!"
        ;;
esac