#!/bin/sh
# Copyright (C) 2019, 2020  C. McEnroe <june@causal.agency>
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <https://www.gnu.org/licenses/>.

set -u

host=$(git config fetchemail.imapServer)
port=$(git config fetchemail.imapServerPort)
user=$(git config fetchemail.imapUser)
pass=$(git config fetchemail.imapPass)
mailbox=$(git config fetchemail.imapMailbox)
subject=$(git config fetchemail.subject)
from=$(git config fetchemail.from)
to=$(git config fetchemail.to)
cc=$(git config fetchemail.cc)

OPTS_SPEC="\
git fetch-email [<options>]
--
C,cc= fetch patches with matching Cc headers
F,from= fetch patches with matching From headers
S,subject= fetch patches with matching Subject headers
T,to= fetch patches with matching To headers
a,apply apply patches with git-am
h,host=! connect to IMAP on host
m,mailbox=! fetch patches from mailbox
p,port=! connect to IMAP on port
u,user=! log in to IMAP as user
v,verbose log IMAP protocol to standard error
"
eval "$(echo "$OPTS_SPEC" | git rev-parse --parseopt -- "$@" || echo exit $?)"

for opt; do
	case "${opt}" in
		(-C) cc=$2; shift;;
		(-F) from=$2; shift;;
		(-S) subject=$2; shift;;
		(-T) to=$2; shift;;
		(-a) apply=1;;
		(-h) host=$2; shift;;
		(-m) mailbox=$2; shift;;
		(-p) port=$2; shift;;
		(-u) user=$2; shift;;
		(-v) verbose=1;;
		(--no-apply) apply=;;
		(--no-cc) cc=;;
		(--no-from) from=;;
		(--no-subject) subject=;;
		(--no-to) to=;;
		(--no-verbose) verbose=;;
		(--) break;;
	esac
	shift
done
if [ -z "${user:-}" ]; then
	echo "${0}: username required" >&2
	exit 1
fi

description() {
	cat <<-EOF
		protocol=imaps
		host=${user#*@}
		username=${user%@*}
		${pass:+password=${pass}}
	EOF
}

if [ -z "${pass:-}" ]; then
	pass=$(description | git credential fill | grep '^password=')
	pass=${pass#*=}
fi

fetch() {
	echo "${pass}" | imbox -w \
		${verbose:+-v} \
		${host:+-h "${host}"} \
		${port:+-p "${port}"} \
		${mailbox:+-m "${mailbox}"} \
		${subject:+-S "${subject}"} \
		${from:+-F "${from}"} \
		${to:+-T "${to}"} \
		${cc:+-C "${cc}"} \
		${user}
	local status=$?
	if [ $status -ne 78 ]; then
		description | git credential approve
	else
		description | git credential reject
	fi
	return $status
}

if [ -n "${apply:-}" ]; then
	fetch | git am --patch-format=mboxrd "$@"
else
	fetch
fi