|
|
1.1 ! root 1: : recreate the active file from readers .newsrc files ! 2: : and from the existing articles ! 3: ! 4: lib=${1-/usr/lib/news} ! 5: tmp=/tmp/$$ ! 6: : Find the highest numbered articles from the .newsrcs ! 7: cat `sed 's/[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:// ! 8: s/:.*//' /etc/passwd | sort -u | sed 's;$;/.newsrc;' ` 2>/dev/null | ! 9: sed '/:/!d ! 10: s/:.*[,-]/ / ! 11: s/: */ /' >$tmp ! 12: : in case there are groups no-one reads, look in the list of newsgroups ! 13: sed 's/[ ].*/ 1/' $lib/newsgroups >>$tmp ! 14: sort +0 -1 +1nr $tmp | sort -m +0u -1 | sed 's/$/ 00001 y/ ! 15: /^fa/s/y$/n/' >$lib/active ! 16: : finally, scan the spool directory and fix up the active file. ! 17: $lib/expire -u ! 18: rm -f $tmp
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.