procmail/delay-delivery

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