maildrop: clean up a dotlock file if exited while it is held.

Implement exit() by throwing an exception, which will wind up and clean
up the dotlock. Catch the exception and exit(), after everything gets
cleaned up.

1 files changed, 21 insertions, 0 deletions

diff --git a/maildrop/testsuite2 b/maildrop/testsuite2
index ae5bbf1..a199ed6 100644
--- a/maildrop/testsuite2
+++ b/maildrop/testsuite2
@@ -322,3 +322,24 @@ else
 fi
 
 rm -f testsuite?.filter testsuite.msg
+
+rm -f testsuite.dotlock
+cat >testmd <<EOF
+dotlock "testsuite.dotlock" {
+	EXITCODE=5
+	exit
+}
+EOF
+chmod 600 testmd
+./maildrop ./testmd </dev/null
+if test $? != 5
+then
+	echo "dotlock test did not exit with the correct exit code"
+	exit 1
+fi
+if test -f testsuite.dotlock
+then
+	echo "dotlock test did not clean up after itself"
+	exit 1
+fi
+rm -f testmd