procmail/delay-delivery

   1 #TODO: create config/delay-(disabled|tonight|weekend)
   2
   3 :0
   4 * ! DISABLE_DELAYS ?? .
   5 * DELAY ?? .
   6 * ! DELAYED ?? .
   7 {
   8   #TODO: for tickling, use header date
   9   RELEASE="`$BIN_DATE -d \"$DELAY\" +'%s %c'`"
  10
  11   :0
  12   *$ RELEASE ?? ^\/${RE_NOT_SPACE}+
  13   { RELEASE_TS=$MATCH }
  14
  15   :0
  16   *$  $RELEASE_TS ^0
  17   *$ -$OURDATE_TS ^0
  18   {
  19     :0
  20     *$ RELEASE ?? ^[0-9]+${RE_SPACE}+\/.+
  21     { RELEASE_TIME="$MATCH" }
  22
  23     LOG="delay:       delay delivery of $MSGID until $RELEASE_TIME$NL"
  24
  25     :0 fw
  26     |$FORMAIL -I "X-Postponed: $RELEASE_TS ($RELEASE_TIME)"
  27
  28     INCLUDERC=$PMDIR/record-delayed-mail
  29
  30     :0
  31     $DELAYED_QUEUE
  32   }
  33 }