#! /bin/sh
# Find size of current queue of news outbound to $1.  Ancient-uucp version.

# =()<. ${NEWSCONFIG-@<NEWSCONFIG>@}>()=
. ${NEWSCONFIG-/usr/local/libexec/cnews/config}

PATH=$NEWSCTL/bin:$NEWSBIN:$NEWSPATH ; export PATH
umask $NEWSUMASK

if test -d /usr/spool/uucp
then
	cd /usr/spool/uucp
elif test -d /var/spool/uucp
then
	cd /var/spool/uucp
else
	echo "$0: can't find uucp spool directory" >&2
	echo 9999
	exit 1
fi
grade=d

case "$1" in
?|??|???|????|?????|??????|???????)	site="$1" ;;
*)	site=`expr "$1" : '^\(.......\).*'`
esac

ls | egrep "^C\.$site$grade....\$" | wc -l