home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 1 / GoldFishApril1994_CD2.img / d4xx / d473 / cnewssrc / cnews_src.lzh / relay / ctl / README.amidos < prev    next >
Text File  |  1990-12-01  |  1KB  |  29 lines
  1. checkgroups:
  2.     copy $NEWSCTL/localgroups to $NEWSCTL/newsgroups;
  3.     reads <stdin> for article containing "checkgroups" control message.
  4.     skip headers;
  5.     append article body to $NEWSCTL/newsgroups;
  6.     copy $NEWSCTL/newsgroups to $NEWSCTL/newsgroups.bac;
  7.     sort $NEWSCTL/newsgroups (output to original filename);
  8.     locate our "sys" file entry;
  9.     grab just the newsgroup list from field 2;
  10.     add "junk" and "control" to all the "field 1"'s from $NEWSCTL/newsgroups;
  11.     look for lines which start with zero or more occurences of
  12.         something besides a period, followed by a period; or the
  13.         pseudo-newsgroup "general".
  14.     send result into "gngp -a ..." and from there to "sort -u"
  15.     find local newsgroups from `active' file;
  16.     compare the results of the last two steps:
  17.         files found in first step and not in second should be removed;
  18.         files found in second step and not in first should be added;
  19.         (perhaps the commands should be email'd to $NEWSMASTER instead
  20.         of actually executed -- the SA may not want to add them)
  21.  
  22. rmgroup:
  23.     canonhdr; output to temp file
  24.     if no line starts with `Approved:' then remove the temp file and exit 0
  25.     look for $1 in $NEWSCTL/active
  26.     if not found, remove the temp file and exit 0
  27.     extract `Sender:' or `From:' header
  28.     send email to $NEWSMASTER which says, "rmgroup $1 says $WHO"
  29.