#! /bin/sh

set -e
. defs

[ $# = 1 ] || fail "usage: $0 GROUP"
group=$1
entry=`cdbget "g:$group" <groups.cdb` || bad "unknown group $group"
set -- $entry
[ $3 = none ] && bad "posting to mail.$2 forbidden"
{ echo "To: $3";
  sed -n ":top; /^$/,\$ b ok
          /^[Tt][Oo]: / ! b ok; :loop; n; /^ / b loop; b top
          :ok; p"; } |
qmail-inject -a -f$USER-$1@`cat $QMAIL/control/me` $3