X-Git-Url: https://git.madduck.net/etc/mailfilter.git/blobdiff_plain/3fd481d208c03d80095d0c912f636630cab978b6..406e0c358dbe50c3ff0463c12f3d9bcdccfaf5d2:/procmail/tickle diff --git a/procmail/tickle b/procmail/tickle index dac3fb7..157ed9d 100644 --- a/procmail/tickle +++ b/procmail/tickle @@ -1,31 +1,41 @@ :0 +* ! DEST ?? . +* ! TICKLE_DELIVERED ?? . * ORIGINAL_TO ?? ^.+@tickle\.madduck\.net$ * ORIGINAL_TO ?? ^\/[^@]+ { + BIN_DATE=/bin/date + DELIVERY_TIME=04:20 STAMP + :0 * MATCH ?? ^[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]$ - { STAMP=$MATCH } + { STAMP="$MATCH (`$BIN_DATE -d @$MATCH +%c`)" } + + :0 E + * MATCH ?? ^[0-9]+h$ + * MATCH ?? ^\/[^h]+ + { DATESTR="$DATE + $MATCH hours" } + + JUST_DATE="`$BIN_DATE -d \"$DATE\" +%x`" :0 E * MATCH ?? ^[0-9]+m$ - * MATCH ?? ^\/[^m] - { DATESTR="$DATE + $MATCH months 00:00" } + * MATCH ?? ^\/[^m]+ + { DATESTR="$JUST_DATE + $MATCH months $DELIVERY_TIME" } :0 E * MATCH ?? ^[0-9]+w$ - * MATCH ?? ^\/[^w] - { DATESTR="$DATE + $MATCH weeks 00:00" } + * MATCH ?? ^\/[^w]+ + { DATESTR="$JUST_DATE + $MATCH weeks $DELIVERY_TIME" } :0 E * MATCH ?? ^[0-9]+d?$ - * MATCH ?? ^\/[^d] - { DATESTR="$DATE + $MATCH days 00:00" } + * MATCH ?? ^\/[^d]+ + { DATESTR="$JUST_DATE + $MATCH days $DELIVERY_TIME" } - :0 E - * MATCH ?? ^[0-9]+h$ - * MATCH ?? ^\/[^h] - { DATESTR="$DATE + $MATCH hours" } + JUST_DATE + DELIVERY_TIME :0 E { @@ -36,13 +46,25 @@ :0 * ! STAMP ?? . - { STAMP=`/bin/date +%s -d "$DATESTR"` } + { 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)" + } - LOG="tickle: stamping message $MSGID with $STAMP$NL" + :0 E + { LOG="tickle: stamping message $MSGID with $STAMP$NL" } :0 fw |$FORMAIL -i "X-Tickle: $STAMP" :0 - $BASE/.tickler/ + { DEST=$TICKLER_QUEUE } + + BIN_DATE } + +# vim:ft=procmail