# are not individually "signed-off" by adding their e-mail addresses to the
# X-Acked header. This header is removed from the mail before it is sent.
#
+# The file ~/.mutt/ack-recipients stores sha256sums of lower-cased e-mail
+# addresses (no newline) instead of the addresses themselves as a measure to
+# protect privacy. You can get new lines like this:
+#
+# printf my.new@e-mail.addre.ss | tr '[[:upper:]]' '[[:lower:]]' \
+# | sha256sum | sed -e 's, .*,,'
+#
+# E.g. my address (see below) will become
+# 84d5b33c9376f67274c2ec9ce0e03b6973fb8bc943ebd7abb470c903c47e00f4
+#
# Copyright © 2010 martin f. krafft <madduck@madduck.net>
# Released under the terms of the Artistic Licence 2.0
#
CHECKLIST="$HOME/.mutt/ack-recipients"
HEADER=X-Acked
-ACKED_RCPTS=$(formail -czx ${HEADER}: < $1 | tr -d ',')
+ACKED_RCPTS=$(formail -czx ${HEADER}: < $1 | tr -d ',' | tr '[[:upper:]]' '[[:lower:]]')
MAILFILE="$1"; shift
ret=0
for r in $@; do
ack=0
# check if this recipient is in the list of acked recipients
- for a in $ACKED_RCPTS; do [ $a = $r ] && ack=1 && break; done
- re=$(echo $r | sed -e 's,\.,\\.,')
+ rl=$(printf $r | tr '[[:upper:]]' '[[:lower:]]')
+ for a in $ACKED_RCPTS; do [ $a = $rl ] && ack=1 && break; done
+ rs=$(printf $rl | sha256sum)
# now check if this unacked recipient needs to be acked
- if [ $ack -eq 0 ] && grep -qi "^${re}$" "$CHECKLIST"; then
+ if [ $ack -eq 0 ] && grep -q "^${rs%% *}$" "$CHECKLIST"; then
echo >&2 "E: will not send mail until $r has been added to the $HEADER header"
ret=1
fi