From e9472285f78a5bf3f981df3de6f386d7ced94d55 Mon Sep 17 00:00:00 2001
From: mwolson_admin <mwolson_admin@deleuze.hcoop.net>
Date: Fri, 19 Oct 2007 14:27:44 -0400
Subject: [PATCH] redeliver-mail: new script to redeliver all mail in /var/mail

---
 redeliver-mail | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100755 redeliver-mail

diff --git a/redeliver-mail b/redeliver-mail
new file mode 100755
index 0000000..0d68870
--- /dev/null
+++ b/redeliver-mail
@@ -0,0 +1,23 @@
+#!/bin/bash
+#
+# Redeliver any messages that may have accidentally been sent to
+# /var/mail/$USER, due to temporary AFS glitches.
+#
+# This should be called as root on deleuze.
+
+for MBOX in /var/mail/*; do
+
+    USER=$(basename $MBOX)
+    TMPMBOX=/tmp/exim4/$USER.mbox.tmp
+
+    # Sanity check: file exists and has nonzero size
+    if ! test -s $MBOX; then
+        continue
+    fi
+
+    # Deliver mail.  If the message still can't be written to
+    # $USER/Maildir, Exim will place it in /var/mail/$USER again.
+    mv /var/mail/$USER $TMPMBOX
+    formail -s /etc/exim4/deliver-once $USER < $TMPMBOX
+    rm -f $TMPMBOX
+done
-- 
2.20.1