.mutt/sendmail-checks.d/ack-recipients

   1 #!/bin/sh
   2 #
   3 # ack-recipients – require double-checking of some recipients
   4 #
   5 # refuse to send a mail as long as recipients listed in ~/.mutt/ack-recipients
   6 # are not individually "signed-off" by adding their e-mail addresses to the
   7 # X-Acked header. This header is removed from the mail before it is sent.
   8 #
   9 # Copyright © 2010 martin f. krafft <madduck@madduck.net>
  10 # Released under the terms of the Artistic Licence 2.0
  11 #
  12 set -eu
  13
  14 CHECKLIST="$HOME/.mutt/ack-recipients"
  15 HEADER=X-Acked
  16 ACKED_RCPTS=$(formail -czx ${HEADER}: < $1 | tr -d ',')
  17 MAILFILE="$1"; shift
  18
  19 ret=0
  20 for r in $@; do
  21   ack=0
  22   # check if this recipient is in the list of acked recipients
  23   for a in $ACKED_RCPTS; do [ $a = $r ] && ack=1 && break; done
  24   re=$(echo $r | sed -e 's,\.,\\.,')
  25   # now check if this unacked recipient needs to be acked
  26   if [ $ack -eq 0 ] && grep -qi "^${re}$" "$CHECKLIST"; then
  27     echo >&2 "E: will not send mail until $r has been added to the $HEADER header"
  28     ret=1
  29   fi
  30 done
  31
  32 [ $ret -eq 0 ] || exit $ret
  33
  34 # now remove the X-Acked header from the mail
  35 TMPFILE=$(tempfile -p mutt-sendmail -s .msg)
  36 settrap () { trap "$@" 0 1 2 3 4 5 6 7 8 10 11 12 13 14 15; }
  37 cleanup () { rm -f "$TMPFILE"; settrap -; }
  38 settrap cleanup
  39 formail -I ${HEADER}: < "$MAILFILE" > "$TMPFILE"
  40 mv "$TMPFILE" "$MAILFILE"
  41 settrap -