[net.news.sa] Find out what your feeds are doing, or your users

reid@Glacier.ARPA (Brian Reid) (09/24/85)

#! /bin/sh
# find all news from a given site (and person)
# If you don't have bmgrep (fast Boyer-Moore fgrep) then just use fgrep
#
# Brian Reid, Mon Sep 23 23:55:49 1985
GREP=bmgrep
PAGER=/usr/ucb/more
PATH=/usr/local/bin:/usr/stanford/bin:/usr/ucb:/usr/bin/:/bin
NEWSDIR=/usr/lib/news
NEWSPOOL=/usr/spool/news
#######################################################
SITE=${1-1111}
PERSON=${2-0000}
if [ "$SITE" -eq "1111" ]; then
    echo Usage: newsfrom host \[ user \] 
    exit 1
fi
trap "rm -f /tmp/newsfrom.$$ /tmp/newsfr.$$" 0 1 2 15

$GREP "@${SITE}." $NEWSDIR/history | awk '{print $5}' | \
	sed -e 's,\.,/,g' -e 's,^,'"$NEWSPOOL/," > /tmp/newsfrom.$$
if [ "$PERSON" != "0000" ]; then
    egrep -l 'From:.*'"$PERSON" `cat /tmp/newsfrom.$$` > /tmp/newsfr.$$
    mv /tmp/newsfr.$$ /tmp/newsfrom.$$
fi
if [ -s /tmp/newsfrom.$$ ]; then
    $PAGER `cat /tmp/newsfrom.$$`
else
    echo No news from $1 $2
fi
# end of "newsfrom" script
-- 
	Brian Reid	decwrl!glacier!reid
	Stanford	reid@SU-Glacier.ARPA