Return to subscriber.sh CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / news / misc

Annotation of 43BSD/contrib/news/misc/subscriber.sh, revision 1.1

1.1     ! root        1: From [email protected] (Cheshire Chuqui) Tue Nov 27 13:21:24 1984
        !             2: Relay-Version: version B 2.10.2 11/2/84; site seismo.UUCP
        !             3: Posting-Version: version B 2.10.2 9/17/84 chuqui version 1.7 9/23/84; site nsc.UUCP
        !             4: Path: seismo!nsc!chuqui
        !             5: From: [email protected] (Cheshire Chuqui)
        !             6: Newsgroups: net.wanted.sources
        !             7: Subject: Re: local netnews usage statistics
        !             8: Message-ID: <[email protected]>
        !             9: Date: 27 Nov 84 18:21:24 GMT
        !            10: Date-Received: 27 Nov 84 18:32:17 GMT
        !            11: References: <>
        !            12: Reply-To: [email protected] (Cheshire Chuqui)
        !            13: Distribution: net
        !            14: Organization: Plaid Heaven
        !            15: Lines: 41
        !            16: Summary: 
        !            17: In article <[email protected]> [email protected] (Richard Foulk) writes:
        !            18: >Does anyone have some kind of utility that pokes around in peoples .newsrc
        !            19: >files and produces meaningful (?) statistics on general news readership
        !            20: >for that site?
        !            21: 
        !            22: This is something Fred Blonder wrote a while back and passed around. It
        !            23: does come in handy, especially if you are short on disk space and trying to
        !            24: figure out what groups to shorten...
        !            25: 
        !            26: 
        !            27: #! /bin/sh
        !            28: #
        !            29: # @(#)subscribers.sh   (University of Maryland) Fred Blonder 19-Aug-1983
        !            30: #
        !            31: # Find out how many people subscribe to each newsgroup
        !            32: 
        !            33: sub_tmp=/tmp/#s.$$
        !            34: 
        !            35: trap "rm -f $sub_tmp" 0 1 2 15
        !            36: 
        !            37: for dir in `awk -F: '{ print $6 }' /etc/passwd | sort -u`
        !            38: do     # locate all login directories
        !            39:        if      # if .newsrc exists
        !            40:                [ -r $dir/.newsrc ]
        !            41:        then    # find all newsgroups subscribed to, append to $sub_tmp
        !            42:                awk -F: '/^net\..*: [0-9].*$/ { print $1 }' \
        !            43:                        $dir/.newsrc >> $sub_tmp
        !            44:        fi
        !            45: done
        !            46: 
        !            47: # Count all ocurrences of all newsgroups.
        !            48: # Print result sorted by decreasing number of subscribers.
        !            49: awk '{ x[$1] = x[$1] + 1 } \
        !            50:        END { for (i in x) print i " " x[i] }' $sub_tmp | sort +1 -rn
        !            51: 
        !            52: -- 
        !            53: >From the center of a Plaid pentagram:         Chuq Von Rospach
        !            54: {cbosgd,decwrl,fortune,hplabs,ihnp4,seismo}!nsc!chuqui  [email protected]
        !            55: 
        !            56:   ~But you know, monsieur, that as long as she wears the claw of the dragon
        !            57:   upon her breast you can do nothing-- her soul belongs to me!~
        !            58: 
        !            59: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.