generate (or use resent-)message-id if missing

[etc/mailfilter.git] / procmail / get-msgid

diff --git a/procmail/get-msgid b/procmail/get-msgid
index 3639f51e8cd599a3e80de7d8656ed4103cada3cc..c1260ac8bd9a5639ac573c05e6ff9a3e2e40e90b 100644 (file)
--- a/procmail/get-msgid
+++ b/procmail/get-msgid
@@ -5,15 +5,24 @@
 :0
 * MSGID ?? ^[  ]*$|^<>$
 {
-  TMPFILE="`tempfile -p msgid`"
-  LOG="get-msgid:   LACKING MSGID header, DUMPING to $TMPFILE (@$OURDATE)$NL"
+  :0
+  * ^Resent-Message-Id:[       ]*\/[^  ]+
+  {
+    LOG="get-msgid:   lacking message-id, using resent-message-id...$NL"
+    :0 fw
+    |$FORMAIL -R Resent-Message-Id Message-Id
+  }
 
-  :0 ifw
-  |cat > $TMPFILE
+  :0 E
+  {
+    LOG="get-msgid:   lacking message-id, generating one...$NL"
+    :0 fw
+    |$FORMAIL -a Message-ID:
+  }
 
-  EX_DEFER=75
-  EXITCODE=$EX_DEFER
-  HOST
+  :0
+  * ^Message-Id:[      ]*\/[^  ]+
+  { MSGID="$MATCH" }
 }
 
 :0