From:	CSBVAX::CSBVAX::MRGATE::"SMTP::CRVAX.SRI.COM::RELAY-INFO-VAX" 26-JAN-1989 01:30
To:	MRGATE::"ARISIA::EVERHART"
Subj:	ANU News version 5.7 available for anonymous FTP.


Received: From KL.SRI.COM by CRVAX.SRI.COM with TCP; Wed, 25 JAN 89 16:10:29 PDT
Received: from ucbvax.Berkeley.EDU by KL.SRI.COM with TCP; Wed, 25 Jan 89 15:54:01 PST
Received: by ucbvax.Berkeley.EDU (5.61/1.33)
	id AA25780; Wed, 25 Jan 89 14:59:28 -0800
Received: from USENET by ucbvax.Berkeley.EDU with netnews
	for info-vax@kl.sri.com (info-vax@kl.sri.com)
	(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 25 Jan 89 12:10:16 GMT
From: mailrus!sharkey!atanasoff!deimos!ksuvax1!kuhub.cc.ukans.edu!sloane@ames.arc.nasa.gov  (Bob Sloane)
Organization: University of Kansas Academic Computing Services
Subject: ANU News version 5.7 available for anonymous FTP.
Message-Id: <3023@kuhub.cc.ukans.edu>
Sender: info-vax-request@kl.sri.com
To: info-vax@kl.sri.com

Hi All,

We just got version 5.7 of ANU news direct from Geoff Huston in Australia
(thanks, Geoff).  It is available for anonymous FTP from kuhub.cc.ukans.edu
(129.237.1.10).

There are 2 bugs that need to be fixed in the NEWS Version 5.7 distribution.
They are *NOT* fixed in the source save set, but *ARE* fixed in the executable
distribution save set. If you need to recompile from source, you will have
to update the file newssite.c.  The changes needed are documented at the end
of this article.  If you have any problems, let me know.

There are four backup save sets in the distribution:

    1. NEWS_V57_DIST.BCK_Z    - Basic Distribution. Contains all executables,
                                an ascii version of the NEWS manual, help file,
                                etc.  Everything you need to get started.

    2. NEWS_V57_DOC.BCK_Z     - TeX and Scribe versions of the documentation,
                                as well as other useful documentation.

    3. NEWS_V57_SRC.BCK_Z     - Complete source in C.

    4. NEWS_V57_OBJ.BCK_Z     - Compiled object files, libraries, etc.

We have compressed the save sets using the LZW compression program on recent
DECUS tapes, both to save space, and to save transfer time.  If you don't have
this package, it is also available, in 3 files:

    1. LZDCMP.EXE             - Executable to decompress LZW compressed files.

    2. LZCOMP.EXE             - Executable to compress files.

    3. LZW.BCK_Z              - Source in C for the LZW compress programs.

To use the decompression routine, define a symbol:

   $ LZDCMP:==$dev:[dir]LZDCMP

After you get the files from us (in binary ftp mode), use the command:

   $ LZDCMP LZW.BCK_Z LZW.BCK

This command will create a normal VMS Backup save set which you can extract the
source files from.  Again, if you have problems, let me know.
+-------------------+-------------------------------------+------------------+
|  Bob Sloane        \Internet: SLOANE@KUHUB.CC.UKANS.EDU/Anything I said is |
|  Computer Center    \ BITNET: SLOANE@UKANVAX.BITNET   / my opinion, not my |
|  University of Kansas\  AT&T: (913) 864-0444         /  employer's.        |
+-----------------------+-----------------------------+----------------------+
[part of a mail message from Geoff Huston]

There's two more bugs to fix (sorry 'bout this). The fix was published in NEWS
last week from Mats Sundvall:

In NEWSSITE.C:

/*
 *  scan
 *
 *  Read a news.sys line of the form "node:filter:format:file^xmitformat"
 *  and store in local structure
 */

static scan(s)
    char *s;
{
    struct sys_entry *tmp, *t1 = sysfile;
    struct sys_filter *fmp, *f1;
    char node[36],
         filters[512],
         type[30],
         file[256],
         *cp1,
         *cp2,
         filtname[50];

    *node = *filters = *type = *file = '\0';

    sscanf(s,"%[^:]:%[^:]:%[^:]:%s",node,filters,type,file);
/* change the above line to remove the leading blank character in the
   format string */
     ...
}

   ...

/*
 *  test_accept
 *
 *  Test if the newsgroup groups and distribution dist is accepted
 *  using the filter f
 */

static test_accept(groups,dist,f)
    char *groups,
         *dist;
    struct sys_filter *f;
{
    char *cp1,
         *cp2,
         locname[132],
         wname[132],
         line[512];
    int accept = 0;
    struct sys_filter *f_sav = f;

    strcpy(line,groups);
    cp1 = line;

    if (!f) return(1);
    do {
        if (cp2 = strchr(cp1,',')) *cp2++ = '\0';
        util_cvrt(locname,cp1);
        f = f_sav;
        while (f) {
            if (*f->sys_filtnam == '!') {
                if (wild_match(locname,f->sys_filtnam + 1)) return(0);
                else {
                    strcpy(wname,f->sys_filtnam + 1);
                    strcat(wname,".*");
                    if (wild_match(locname,wname)) return(0);
                    }
                }
            else {
                if (wild_match(locname,f->sys_filtnam)) accept = 1;

/* for some inexplicable reason I had altered the above line to be:
    if (!wild_match(...
   For the life of me I can't remember what I was up to, and its incorrect
   code anyway.   :-)

   Remove the ! character

*/

                else {
                    strcpy(wname,f->sys_filtnam);
                    strcat(wname,".*");
                    if (wild_match(locname,wname)) accept = 1;
                    }
                }
            f = f->sys_fnext;
            }
        cp1 = cp2;
        } while ((!accept) && (cp1));

      ...
}


Cheers,
Geoff Huston

gih900@csc.anu.oz