#! /bin/sh
##  $Revision: 1.24 $
##  Rmgroup control-message handler

PROG=rmgroup
ACTION=unknown
LOGFILE=unknown

##  Some shells don't pass in $* unless we explicitly pass it in here.
##  =()<. @<_PATH_PARSECTL>@ "$@">()=
. /var/news/etc/parsecontrol "$@"

if [ "${ACTION}" = "unknown" -o "${LOGFILE}" = "unknown" ]
then
    LOGFILE=${MOST_LOGS}/badcontrol.log
## try to write message to logfile (not guaranteed to work since variables
## might not be set)
    ${WRITELOG} ${LOGFILE} "Parsecontrol failed for article from ${FROM}" <${ARTICLE}
    exit
fi

EXISTS=`${AWK} '$1 == "'"$1"'"' ${ACTIVE}`
if [ -z "$EXISTS" ]; then
    # Group doesn't exist
    exit
fi

case ${ACTION} in
mail)
    P1=$1
    export FROM P1 NEWSBIN ARTICLE
    (
	echo "${FROM} requested that ${P1} be removed."
	echo 'To do this, type the following:'
	echo "	${NEWSBIN}/ctlinnd rmgroup "'"'${P1}'"'
	echo ''
	echo 'The full article was:'
	sed -e 's/^~/~~/' ${ARTICLE}
    ) | ${MAILCMD} -s "rmgroup $1 by ${FROM}" ${NEWSMASTER}
    exit
    ;;
esac

##  Make sure the article is approved and that the group exists.
${SED} -e '/^$/q' <$ARTICLE >${TEMP}
grep '^Approved:' <${TEMP} >/dev/null 2>&1 || {
    ${WRITELOG} ${LOGFILE} "Unapproved rmgroup by ${FROM}" <${ARTICLE}
    rm -f ${TEMP}
    exit
}
rm -f ${TEMP}

case ${ACTION} in
logit)
    ${WRITELOG} ${LOGFILE} "rmgroup $1 by ${FROM} skipped" <${ARTICLE}
    exit
    ;;
doit)	# continue with execution
    ;;
*)	# unknown action ==> exit
    exit
    ;;
esac

##  Do the work.
ctlinnd -s rmgroup "$1"
${WRITELOG} ${LOGFILE} "rmgroup $1 by ${FROM}" <${ARTICLE}

##  We're sending to a file.
LOCK=${LOCKS}/LOCK.newsgroups
PID=$$
TRY=0
MAXTRY=60
export LOCK MAXTRY PID LOGFILE TRY
while [ ${TRY} -lt ${MAXTRY} ]; do
    shlock -p ${PID} -f ${LOCK} && break
    sleep 2
    TRY=`expr ${TRY} + 1`
done

##  If we got the lock, update the file; otherwise, give up.
test ${TRY} -lt ${MAXTRY} || {
    echo "Newgroup cannot update newsgroups.  Locked by" `cat ${LOCK}` 1>&2
    exit
}

${AWK} '$1 != "'"$1"'"' <${NEWSGROUPS} >${TEMP}
cat ${TEMP} >${NEWSGROUPS}
rm ${TEMP} ${LOCK}
exit
