Path: utzoo!attcan!uunet!wuarchive!brutus.cs.uiuc.edu!samsung!think!ames!uhccux!munnari.oz.au!csc!gih900
From: gih900@csc.anu.oz (Geoff Huston)
Newsgroups: news.software.anu-news
Subject: NEWS V5.9B diff/patch 11/11
Message-ID: <1054.256d7390@csc.anu.oz>
Date: 24 Nov 89 17:00:00 GMT
Organization: Computer Services, Australian National University
Lines: 114

+-+-+-+ Beginning of part 11 +-+-+-+
X    fprintf(stderr,"Close_net\n");
X  #endif
X!`032
X! #ifdef POK_OUTPUT_BUFFER`032
X!   write_out();
X! #endif
X!`032
X!   sys$cancel(f);
X!   log_to_file(1);
X!   cks(sys$qiow(0,f,IO$_DELETE,iosb,0,0,0,0,0,0,0,0));
X!   cks(*i_o_sts);
X!   sys$dassgn(f);
X  `125
X  `012
X  /*
X**************
X*** 264,270
X      unsigned char fhost_len;
X      unsigned char lhost_len;
X      char fhost[128];
X-     short fill;
X      unsigned short fport;
X      short fill_1;
X      char lhost[128];
X--- 321,326 -----
X      unsigned char fhost_len;
X      unsigned char lhost_len;
X      char fhost[128];
X      unsigned short fport;
X      short fill_1;
X      char lhost[128];
X**************
X*** 272,278
X      short fill_2;
X      unsigned int linet_addr;
X      unsigned int finet_addr;
X!     `125 info_buffer;
X `032
X  getremhost(remhost,remuser,unit)
X      char *remhost, *remuser;
X--- 328,334 -----
X      short fill_2;
X      unsigned int linet_addr;
X      unsigned int finet_addr;
X!     `125 _align(quadword) info_buffer;
X `032
X  getremhost(remhost,remuser,unit)
X    char *remhost, *remuser;
X**************
X*** 275,282
X      `125 info_buffer;
X `032
X  getremhost(remhost,remuser,unit)
X!     char *remhost, *remuser;
X!     int unit;
X  `123
X      if (remhost) `123
X          cks(sys$qiow(0,f,IO$_MODIFY,iosb,0,0,&info_buffer,276,0,0,0,0));
X--- 331,338 -----
X      `125 _align(quadword) info_buffer;
X `032
X  getremhost(remhost,remuser,unit)
X!   char *remhost, *remuser;
X!   int unit;
X  `123
X    if (remhost) `123
X      strcpy(remhost,"tcp");
X**************
X*** 278,288
X      char *remhost, *remuser;
X      int unit;
X  `123
X!     if (remhost) `123
X!         cks(sys$qiow(0,f,IO$_MODIFY,iosb,0,0,&info_buffer,276,0,0,0,0));
X!         cks(*i_o_sts);
X!         strncpy(remhost,info_buffer.fhost,info_buffer.fhost_len);
X!         remhost[info_buffer.fhost_len] = '\0';
X!         `125
X!     if (remuser) strcpy(remuser,"nntp");
X  `125
X--- 334,347 -----
X    char *remhost, *remuser;
X    int unit;
X  `123
X!   if (remhost) `123
X!     strcpy(remhost,"tcp");
X! /*
V!     cks(sys$qiow(0,f,IO$_MODIFY,iosb,0,0,&info_buffer,sizeof(info_buffer),0
X,0,0,0));
X!     cks(*i_o_sts);
X!     strncpy(remhost,info_buffer.fhost,info_buffer.fhost_len);
X!     remhost[info_buffer.fhost_len] = '\0';
X! */
X!     `125
X!   if (remuser) strcpy(remuser,"nntp");
X  `125
$ GOSUB UNPACK_FILE

$ FILE_IS = "NNTP_TCPWIN.DIFF"
$ CHECKSUM_IS = 1985494578
$ COPY SYS$INPUT VMS_SHARE_DUMMY.DUMMY
X*** [.news_v59_src]nntp_tcpwin.c
X--- [.news_src]nntp_tcpwin.c
$ GOSUB UNPACK_FILE

$ FILE_IS = "NNTP_TTY.DIFF"
$ CHECKSUM_IS = 1985494842
$ COPY SYS$INPUT VMS_SHARE_DUMMY.DUMMY
X*** [.news_v59_src]nntp_tty.c
X--- [.news_src]nntp_tty.c
$ GOSUB UNPACK_FILE
$ EXIT
-+-+-+-+-+ End of part 11 +-+-+-+-+-