route tickler via resubmit and delay queue

[etc/mailfilter.git] / procmail / tickle

diff --git a/procmail/tickle b/procmail/tickle
index 4ba44e30ec5e2a73d65274756048e2d159b0b8f9..bc4572d8cba121bfaf21445203147b723d98d6d0 100644 (file)
--- a/procmail/tickle
+++ b/procmail/tickle
@@ -1,53 +1,62 @@
 :0
 :0

-* ! DEST ?? .
-* ! TICKLE_DELIVERED ?? .

 * ORIGINAL_TO ?? ^.+@tickle\.madduck\.net$
 * ORIGINAL_TO ?? ^\/[^@]+
 * ORIGINAL_TO ?? ^.+@tickle\.madduck\.net$
 * ORIGINAL_TO ?? ^\/[^@]+

+{ TICKLE="$MATCH" }
+
+:0 E
+*$ ^X-Tickle:${RE_SPACE}+\/${RE_NOT_SPACE}+
+{ TICKLE="$MATCH" }
+
+:0
+* TICKLE ?? .
+* ! DEST ?? .
+* ! TICKLE_DELIVERED ?? .

 {
 {

+  LOG="tickle:      '$TICKLE'$NL"

   DAILY_DELIVERY_TIME=04:20
   JUST_DATE="`$BIN_DATE -d \"$DATE\" +%x`"
 
   :0
   DAILY_DELIVERY_TIME=04:20
   JUST_DATE="`$BIN_DATE -d \"$DATE\" +%x`"
 
   :0

-  * MATCH ?? ^[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]$
-  { DELAY="@$MATCH" }
+  * TICKLE ?? ^[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]$
+  { DELAY="@$TICKLE" }

 
   :0 E
 
   :0 E

-  * MATCH ?? ^[0-9]+h$
-  * MATCH ?? ^\/[^h]+
+  * TICKLE ?? ^[0-9]+h$
+  * TICKLE ?? ^\/[^h]+

   { DELAY="$DATE + $MATCH hours" }
 
   :0 E
   { DELAY="$DATE + $MATCH hours" }
 
   :0 E

-  * MATCH ?? ^[0-9]+m$
-  * MATCH ?? ^\/[^m]+
+  * TICKLE ?? ^[0-9]+m$
+  * TICKLE ?? ^\/[^m]+

   { DELAY="$JUST_DATE + $MATCH months $DAILY_DELIVERY_TIME" }
 
   :0 E
   { DELAY="$JUST_DATE + $MATCH months $DAILY_DELIVERY_TIME" }
 
   :0 E

-  * MATCH ?? ^[0-9]+w$
-  * MATCH ?? ^\/[^w]+
+  * TICKLE ?? ^[0-9]+w$
+  * TICKLE ?? ^\/[^w]+

   { DELAY="$JUST_DATE + $MATCH weeks $DAILY_DELIVERY_TIME" }
 
   :0 E
   { DELAY="$JUST_DATE + $MATCH weeks $DAILY_DELIVERY_TIME" }
 
   :0 E

-  * MATCH ?? ^[0-9]+d?$
-  * MATCH ?? ^\/[^d]+
+  * TICKLE ?? ^[0-9]+d?$
+  * TICKLE ?? ^\/[^d]+

   { DELAY="$JUST_DATE + $MATCH days $DAILY_DELIVERY_TIME" }
 
   { DELAY="$JUST_DATE + $MATCH days $DAILY_DELIVERY_TIME" }
 

-  JUST_DATE
-  DAILY_DELIVERY_TIME
-

   :0 E
   {
   :0 E
   {

-    LOG="tickle:      invalid date string: $MATCH$NL"
+    LOG="tickle:      invalid tickler date string: $TICKLE$NL"

     EXITCODE=69
     HOST
   }
 
     EXITCODE=69
     HOST
   }
 

-  :0 fw
-  |$FORMAIL -i "X-Tickle: $DELAY"
+  JUST_DATE
+  DAILY_DELIVERY_TIME

 
   LOG="tickle:      delaying message until $DELAY$NL"
 
   LOG="tickle:      delaying message until $DELAY$NL"

+  DELAYED_QUEUE=$TICKLER_QUEUE

 
   # unset DISABLE_DELAYS to enable delaying for tickle messages
   DISABLE_DELAYS
 }
 
 
   # unset DISABLE_DELAYS to enable delaying for tickle messages
   DISABLE_DELAYS
 }
 

+TICKLE
+

 # vim:ft=procmail
 # vim:ft=procmail