#!/bin/sh

# TODO FIX uh oh this and the other missing msg cases passed by accident after inc uses ESEARCH
#  and now switching inc to leave mailbox open has broken it completely!

if test -z "$MH_OBJ_DIR"; then
    srcdir=`dirname "$0"`/../..
    MH_OBJ_DIR=`cd "$srcdir" && pwd`; export MH_OBJ_DIR
fi

. "$MH_OBJ_DIR/test/common.sh"

# common.sh sets this to something crazy; did i do that?!
testname=${0#$srcdir/}

setup_test_without_data Mail

imap_cleanup() {
    #### Save exit status to use as status for this program.
    status=$?
    set +e

    rm -f "$imapd"

    [ -n "$imapd_pid" ] && kill $imapd_pid
    "$MH_OBJ_DIR/target/debug/mhimap" imap shutdown

    # TODO have cleanup allow additional cleanup registration?
    #  Or just allow it to accept status as argument.
    (exit $status)
    cleanup
}
trap imap_cleanup 0

covdir="$MH_OBJ_DIR/covdata/${MH_COVERAGE_PROFILE:-default}/$testname"
install -d "$covdir"
export LLVM_PROFILE_FILE="$covdir/$profile-%m.profraw"

imapd="$MH_TEST_DIR/$$.imapd"
start_fakeinetd "$imapd"
imapd_pid=$fakeinetd_pid

cat >> "$MH" <<EOF
Managed-Folders: imap
imap-manager: $MH_OBJ_DIR/target/debug/imap-folder-manager
imap-socket: $MH_TEST_DIR/Mail/imap.d/socket
imap-db: $MH_TEST_DIR/Mail/imap.d
imap-host: 127.0.0.1
imap-port: $fakeinetd_port
imap-tls: don't protect my data i know what i'm doing
imap-auth: PREAUTH
imap-mailbox-root: test/
EOF
if [ -n "$MH_TEST_IMAP_LOG_LEVEL" ]; then
    echo "imap-log-level: $MH_TEST_IMAP_LOG_LEVEL" >> "$MH"
    echo "imap-log-$MH_TEST_IMAP_LOG_LEVEL-to: $MH_TEST_DIR/$profile/imap.d/log.$MH_TEST_IMAP_LOG_LEVEL" >> "$MH"
fi

# TODO handle this case next:
# UIDNEXT 12 so FETCH 1:11 but nothing is returned; 11 was deleted but never seen.

cat > "$imapd" <<EOSCRIPT
#!/bin/sh
cat <<EOF
* PREAUTH [CAPABILITY IMAP4REV1 UIDPLUS] authenticated
* LIST (\NoInferiors \UnMarked) "/" test/fold
1 OK LIST completed
* 1 EXISTS
* OK [UIDVALIDITY 1603585238] UID validity status
* OK [UIDNEXT 12] Predicted next UID
1 OK [READ-WRITE] SELECT completed
1 OK UID FETCH completed
1 OK SEARCH ALL completed
1 OK CLOSE completed
EOF
while read line; do :; done
EOSCRIPT
chmod 755 "$imapd"

check_exit '-eq 0' inc +imap

finish_test
exit ${failed:-0}