X-Git-Url: https://git.madduck.net/etc/mailfilter.git/blobdiff_plain/97551d10e98e6d47b588f665041085bd548edc97..ce695b5f37533916b1d13761095da0fdc112d39f:/procmail/tickle diff --git a/procmail/tickle b/procmail/tickle index 672358d..4ba44e3 100644 --- a/procmail/tickle +++ b/procmail/tickle @@ -1,39 +1,38 @@ :0 +* ! DEST ?? . +* ! TICKLE_DELIVERED ?? . * ORIGINAL_TO ?? ^.+@tickle\.madduck\.net$ * ORIGINAL_TO ?? ^\/[^@]+ { - BIN_DATE=/bin/date - DELIVERY_TIME=04:20 - STAMP + 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]$ - { STAMP="$MATCH (`$BIN_DATE -d @$MATCH +%c`)" } + { DELAY="@$MATCH" } :0 E * MATCH ?? ^[0-9]+h$ * MATCH ?? ^\/[^h]+ - { DATESTR="$DATE + $MATCH hours" } - - JUST_DATE="`$BIN_DATE -d \"$DATE\" +%x`" + { DELAY="$DATE + $MATCH hours" } :0 E * MATCH ?? ^[0-9]+m$ * MATCH ?? ^\/[^m]+ - { DATESTR="$JUST_DATE + $MATCH months $DELIVERY_TIME" } + { DELAY="$JUST_DATE + $MATCH months $DAILY_DELIVERY_TIME" } :0 E * MATCH ?? ^[0-9]+w$ * MATCH ?? ^\/[^w]+ - { DATESTR="$JUST_DATE + $MATCH weeks $DELIVERY_TIME" } + { DELAY="$JUST_DATE + $MATCH weeks $DAILY_DELIVERY_TIME" } :0 E * MATCH ?? ^[0-9]+d?$ * MATCH ?? ^\/[^d]+ - { DATESTR="$JUST_DATE + $MATCH days $DELIVERY_TIME" } + { DELAY="$JUST_DATE + $MATCH days $DAILY_DELIVERY_TIME" } JUST_DATE - DELIVERY_TIME + DAILY_DELIVERY_TIME :0 E { @@ -42,25 +41,13 @@ HOST } - :0 - * ! STAMP ?? . - { STAMP=`$BIN_DATE +'%s (%c)' -d "$DATESTR"` } - - :0 - * ! STAMP ?? ^[0-9]+ \([A-Za-z ]+ [0-9 :]+\)$ - { - LOG="tickle: error creating timestamp ($STAMP), using \$now$NL" - STAMP="`$BIN_DATE +%s` (ERROR: original stamp '$STAMP' invalid)" - } - - :0 E - { LOG="tickle: stamping message $MSGID with $STAMP$NL" } - :0 fw - |$FORMAIL -i "X-Tickle: $STAMP" + |$FORMAIL -i "X-Tickle: $DELAY" - :0 - $BASE/.tickler/ + LOG="tickle: delaying message until $DELAY$NL" - BIN_DATE + # unset DISABLE_DELAYS to enable delaying for tickle messages + DISABLE_DELAYS } + +# vim:ft=procmail