home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume19 / cnews2 / pch13nov89 < prev    next >
Internet Message Format  |  1990-02-05  |  49KB
  1. From attcan!utzoo!henry@uunet.uu.net Thu Nov 16 00:55:29 1989
  2. Received: from BBN.COM by pineapple.bbn.com id <AA08434@pineapple.bbn.com>; Thu, 16 Nov 89 00:54:56 -0500
  3. Received: from uunet.uu.net by BBN.COM id aa05122; 16 Nov 89 0:56 EST
  4. Received: from attcan.UUCP by uunet.uu.net (5.61/1.14) with UUCP 
  5.     id AA18279; Thu, 16 Nov 89 00:55:59 -0500
  6. Date: Thu, 16 Nov 89 00:55:59 -0500
  7. From: attcan!utzoo!henry@uunet.uu.net
  8. Message-Id: <8911160555.AA18279@uunet.uu.net>
  9. To: source-patches@uunet.uu.net
  10. Subject: 13-Nov-1989 patch for C News
  11. Content-Type: text  
  12. Content-Length: 48664  
  13. Status: R
  14.  
  15. There are two big items in this.  First, relaynew's sys-file handling has
  16. been revised to eliminate a slow memory leak.  Second, Geoff has done a
  17. substantial portability-and-robustness overhaul on the Aussie readnews.
  18.  
  19. Also...  The batcher now logs both start time and end time for a batching
  20. run, so you can see how long it took.  Newsrunning with no argument now
  21. prints the current state, so a save/restore is possible.  The RFC-errata
  22. document more fully discusses the two areas where C News's compliance is
  23. (according to some) debatable.  (The comment on rfc822ize() has also been
  24. expanded.)  Adddirs now disregards newsgroups marked with "x" or "=", and
  25. actually [blush!] makes the directories it's supposed to make.  Newsdaily
  26. now notes space shortages and reports on unmoderated articles in groups
  27. that your active file thinks are moderated.  Tolerance of syntactically-
  28. illegal message-ids has been reduced.  Relaynews now does a sanity check
  29. on MAXLONG, the definition of which trips up some compilers.  There is
  30. also the usual scattering of minor cleanups.
  31.  
  32. Finally, the patch-preparation process has been revised to avoid the
  33. 14-Sep-1989 problems, and in particular the patch (not just the files
  34. that went into preparing it) has been tested.
  35.  
  36. start of patch 13-Nov-1989
  37. (suggested archive name: `pch13Nov89.Z')
  38. this should be run with   patch -p0 <thisfile
  39.  
  40. The following is a complete list of patches to date.
  41.  
  42. Prereq: 23-Jun-1989
  43. Prereq: 7-Jul-1989
  44. Prereq: 23-Jul-1989
  45. Prereq: 22-Aug-1989
  46. Prereq: 24-Aug-1989
  47. Prereq: 14-Sep-1989
  48. *** PATCHDATES.old    Mon Nov 13 16:23:36 1989
  49. --- PATCHDATES    Mon Nov 13 16:23:36 1989
  50. ***************
  51. *** 1,6 ****
  52. --- 1,7 ----
  53.   23-Jun-1989
  54.   7-Jul-1989
  55.   23-Jul-1989
  56.   22-Aug-1989
  57.   24-Aug-1989
  58.   14-Sep-1989
  59. + 13-Nov-1989
  60.  
  61. Changed files, if any:
  62.  
  63. *** cnpatch/old/batch/Makefile    Thu Sep 14 16:03:25 1989
  64. --- batch/Makefile    Tue Oct 31 17:49:05 1989
  65. ***************
  66. *** 161,167 ****
  67.       test ! -s out.going/bar/togo ;
  68.       cmp test.left out.going/bar/togo.2
  69. !     sed '/^$$/q' batchlog | sed '1d;$$d' >test.log
  70.       test ! -s test.log ;
  71. !     sed '1,/^$$/d' batchlog | sed '1d;$$d' >test.log
  72.       echo 'bar    backlog 1 (batches flowing)' >test.good
  73.       cmp test.good test.log
  74. --- 161,167 ----
  75.       test ! -s out.going/bar/togo ;
  76.       cmp test.left out.going/bar/togo.2
  77. !     sed '/^$$/q' batchlog | sed '1d;$$d' | sed '$$d' >test.log
  78.       test ! -s test.log ;
  79. !     sed '1,/^$$/d' batchlog | sed '1d;$$d' | sed '$$d' >test.log
  80.       echo 'bar    backlog 1 (batches flowing)' >test.good
  81.       cmp test.good test.log
  82.  
  83. *** cnpatch/old/batch/sendbatches    Tue Aug 22 14:47:39 1989
  84. --- batch/sendbatches    Wed Sep 20 22:05:31 1989
  85. ***************
  86. *** 177,179 ****
  87. --- 177,180 ----
  88.   done
  89.   
  90. + date >>$log
  91.   echo >>$log
  92.  
  93. *** cnpatch/old/conf/build    Thu Sep 14 16:03:26 1989
  94. --- conf/build    Mon Nov 13 14:59:43 1989
  95. ***************
  96. *** 825,828 ****
  97. --- 825,829 ----
  98.       echo '#! /bin/sh'
  99.       echo '# -i suppresses install, -t suppresses stdio test, -s suppresses subst'
  100. +     echo '# options are seen in first argument only, i.e. use -si not -s -i'
  101.       echo "umask $newsumask"
  102.       echo "set -x"
  103.  
  104. *** cnpatch/old/expire/expire.c    Thu Sep 14 16:03:30 1989
  105. --- expire/expire.c    Thu Sep 14 23:39:41 1989
  106. ***************
  107. *** 435,439 ****
  108.       datum rhs;
  109.       register int ret;
  110. -     register char *id;
  111.   
  112.       cd(ctlfile((char *)NULL));
  113. --- 435,438 ----
  114.  
  115. *** cnpatch/old/h/libc.h    Thu Sep 14 16:03:35 1989
  116. --- h/libc.h    Sun Sep 17 16:42:07 1989
  117. ***************
  118. *** 56,60 ****
  119.   extern FILE *popen();            /* stdio.h */
  120.   #ifdef __STDC__
  121. ! extern int printf(char *fmt, ...)    /* stdio.h */
  122.   extern int fprintf(FILE *fp, char *fmt, ...);        /* stdio.h */
  123.   extern sprvalue sprintf(char *buf, char *fmt, ...);    /* stdio.h */
  124. --- 56,60 ----
  125.   extern FILE *popen();            /* stdio.h */
  126.   #ifdef __STDC__
  127. ! extern int printf(char *fmt, ...);    /* stdio.h */
  128.   extern int fprintf(FILE *fp, char *fmt, ...);        /* stdio.h */
  129.   extern sprvalue sprintf(char *buf, char *fmt, ...);    /* stdio.h */
  130.  
  131. *** cnpatch/old/h/news.h    Thu Aug 24 16:39:52 1989
  132. --- h/news.h    Mon Oct 30 13:22:31 1989
  133. ***************
  134. *** 102,105 ****
  135. --- 102,107 ----
  136.   #define NO 0
  137.   
  138. + #define SIZENUL (sizeof(char))        /* size in bytes of an ASCII NUL byte */
  139. + 
  140.   #define NOTALLHDRS NO            /* hdrdump flags for "all headers seen?" */
  141.   #define ALLHDRS YES
  142.  
  143. *** cnpatch/old/input/newsrunning    Tue Jun 20 18:58:15 1989
  144. --- input/newsrunning    Fri Nov  3 15:09:26 1989
  145. ***************
  146. *** 23,28 ****
  147.       ;;
  148.   
  149.       *)
  150. !     echo "Usage: $0 on/off" >&2
  151.       exit 2
  152.       ;;
  153. --- 23,37 ----
  154.       ;;
  155.   
  156. +     '')
  157. +     if test -r $stop
  158. +     then
  159. +         echo off
  160. +     else
  161. +         echo on
  162. +     fi
  163. +     ;;
  164. + 
  165.       *)
  166. !     echo "Usage: $0 [on/off]" >&2
  167.       exit 2
  168.       ;;
  169.  
  170. *** cnpatch/old/libbig/sys.fast.c    Tue Jun 20 18:58:24 1989
  171. --- libbig/sys.fast.c    Thu Oct  5 05:14:57 1989
  172. ***************
  173. *** 11,26 ****
  174.   extern struct system *currsys, *firstsys;
  175.   
  176. - /* exports */
  177. - boolean justone = NO;
  178. - 
  179.   /* private */
  180.   static struct system *thissys = NULL;
  181.   
  182. - /* ARGSUSED */
  183.   void
  184. ! rewsys(fp)
  185. ! FILE *fp;
  186.   {
  187. !     currsys = firstsys;
  188.   }
  189.   
  190. --- 11,22 ----
  191.   extern struct system *currsys, *firstsys;
  192.   
  193.   /* private */
  194.   static struct system *thissys = NULL;
  195.   
  196.   void
  197. ! remmysys(sys)                /* remember this system */
  198. ! struct system *sys;
  199.   {
  200. !     thissys = sys;
  201.   }
  202.   
  203. ***************
  204. *** 32,44 ****
  205.   
  206.   void
  207. ! remmysys(sys)                /* remember this system */
  208. ! struct system *sys;
  209.   {
  210. !     thissys = sys;
  211.   }
  212.   
  213.   void
  214. ! freecurrsys()
  215.   {
  216. !     /* never free sys entries */
  217.   }
  218. --- 28,55 ----
  219.   
  220.   void
  221. ! setupsys(fp)
  222. ! FILE *fp;
  223.   {
  224. !     rewind(fp);
  225.   }
  226.   
  227. + boolean
  228. + donesys()
  229. + {
  230. +     return NO;
  231. + }
  232. + 
  233. + /* ARGSUSED */
  234.   void
  235. ! rewsys(fp)
  236. ! FILE *fp;
  237.   {
  238. !     currsys = firstsys;
  239. ! }
  240. ! 
  241. ! void
  242. ! advcurrsys()    /* advance currsys to the next in-core sys entry, if any. */
  243. ! {
  244. !     if (currsys != NULL)
  245. !         currsys = currsys->sy_next;
  246.   }
  247.  
  248. *** cnpatch/old/libcnews/case.c    Thu Sep 14 16:03:37 1989
  249. --- libcnews/case.c    Mon Oct 30 16:59:03 1989
  250. ***************
  251. *** 88,91 ****
  252. --- 88,100 ----
  253.   /*
  254.    - rfc822ize - do the bizarre case conversion needed for rfc822 message-ids
  255. +  *
  256. +  * Actually, this is not quite complete.  Absolute, total, full RFC822
  257. +  * compliance requires a horrible parsing job, because of the arcane
  258. +  * quoting conventions -- abc"def"ghi is not equivalent to abc"DEF"ghi,
  259. +  * for example.  There are three or four things that might occur in the
  260. +  * domain part of a message-id that are case-sensitive.  They don't seem
  261. +  * to ever occur in real news, thank Cthulhu.  (What?  You were expecting
  262. +  * a merciful and forgiving deity to be invoked in connection with RFC822?
  263. +  * Forget it; none of them would come near it.)
  264.    */
  265.   char *                /* returns the argument */
  266.  
  267. *** cnpatch/old/libsmall/sys.slow.c    Tue Jun 20 18:59:34 1989
  268. --- libsmall/sys.slow.c    Thu Oct  5 05:14:23 1989
  269. ***************
  270. *** 8,17 ****
  271.   #include "system.h"
  272.   
  273. - /* exports */
  274. - boolean justone = YES;
  275. - 
  276.   /* imports */
  277.   extern struct system *currsys, *firstsys;
  278.   
  279.   struct system *
  280.   mysysincache()
  281. --- 8,24 ----
  282.   #include "system.h"
  283.   
  284.   /* imports */
  285.   extern struct system *currsys, *firstsys;
  286.   
  287. + /* forwards */
  288. + FORWARD void freecurrsys();
  289. + 
  290. + void
  291. + remmysys(sys)
  292. + struct system *sys;
  293. + {
  294. +     /* no cache */
  295. + }
  296. + 
  297.   struct system *
  298.   mysysincache()
  299. ***************
  300. *** 20,30 ****
  301.   }
  302.   
  303.   void
  304. ! remmysys(sys)
  305. ! struct system *sys;
  306.   {
  307. !     /* no cache */
  308.   }
  309.   
  310.   void
  311.   rewsys(fp)
  312. --- 27,48 ----
  313.   }
  314.   
  315. + /* ARGSUSED */
  316.   void
  317. ! setupsys(fp)                /* reuse currsys */
  318. ! FILE *fp;
  319.   {
  320. !     freecurrsys();
  321.   }
  322.   
  323. + boolean
  324. + donesys()
  325. + {
  326. +     if (firstsys != NULL) {        /* parsed an entry? */
  327. +         firstsys = NULL;    /* not cached, but currsys still valid */
  328. +         return YES;
  329. +     } else
  330. +         return NO;        /* was a comment */
  331. + }
  332. + 
  333.   void
  334.   rewsys(fp)
  335. ***************
  336. *** 35,49 ****
  337.   }
  338.   
  339.   /*
  340.    * Free current sys entry & associated memory.  Zero currsys too.
  341.    */
  342. ! void
  343.   freecurrsys()
  344.   {
  345. !     if (currsys == NULL)
  346. !         return;
  347. !     nnfree(&currsys->sy_name);
  348. !     nnfree(&currsys->sy_ngs);
  349. !     nnfree(&currsys->sy_cmd);
  350. !     nnafree(&currsys);
  351.   }
  352. --- 53,78 ----
  353.   }
  354.   
  355. + void
  356. + advcurrsys()
  357. + {
  358. +     /*
  359. +      * the sys file is not in core, so we must not change currsys
  360. +      * to ensure that it gets freed later by freecurrsys().
  361. +      */
  362. + }
  363. + 
  364.   /*
  365.    * Free current sys entry & associated memory.  Zero currsys too.
  366.    */
  367. ! STATIC void
  368.   freecurrsys()
  369.   {
  370. !     if (currsys != NULL) {
  371. !         nnfree(&currsys->sy_name);
  372. !         nnfree(&currsys->sy_excl);
  373. !         nnfree(&currsys->sy_ngs);
  374. !         nnfree(&currsys->sy_distr);
  375. !         nnfree(&currsys->sy_cmd);
  376. !         nnafree(&currsys);
  377. !     }
  378.   }
  379.  
  380. *** cnpatch/old/libstdio/fgets.c    Thu Sep 14 16:03:39 1989
  381. --- libstdio/fgets.c    Tue Oct  3 00:58:19 1989
  382. ***************
  383. *** 75,84 ****
  384.            */
  385.           {
  386. !             register int copy;
  387.   
  388. -             if (nlp == NULL)
  389. -                 copy = origbytesleft;
  390. -             else
  391. -                 copy = nlp - (char *)fp->_ptr;
  392.               lim -= copy;
  393.               fp->_cnt -= copy;
  394. --- 75,81 ----
  395.            */
  396.           {
  397. !             register int copy = (nlp == NULL?
  398. !                 origbytesleft: nlp - (char *)fp->_ptr);
  399.   
  400.               lim -= copy;
  401.               fp->_cnt -= copy;
  402.  
  403. *** cnpatch/old/man/newsaux.8    Thu Sep 14 16:03:42 1989
  404. --- man/newsaux.8    Fri Sep 15 13:19:38 1989
  405. ***************
  406. *** 7,11 ****
  407.   .\" =()<.ds m @<NEWSMASTER>@>()=
  408.   .ds m usenet
  409. ! .TH NEWSAUX 8 "13 Sept 1989" "C News"
  410.   .SH NAME
  411.   spacefor \- check available space for news
  412. --- 7,11 ----
  413.   .\" =()<.ds m @<NEWSMASTER>@>()=
  414.   .ds m usenet
  415. ! .TH NEWSAUX 8 "15 Sept 1989" "C News"
  416.   .SH NAME
  417.   spacefor \- check available space for news
  418. ***************
  419. *** 150,154 ****
  420.   for easier processing.
  421.   Canonicalization forces all alphabetics to lower case except the first
  422. ! letter of the keyword, which is forced to upper case.
  423.   (One exception:
  424.   ``Message-ID'' is the canonical form of [e.g.] ``message-id''.)
  425. --- 150,155 ----
  426.   for easier processing.
  427.   Canonicalization forces all alphabetics to lower case except the first
  428. ! letter of each (hyphen-separated) word in the keyword,
  429. ! which is forced to upper case.
  430.   (One exception:
  431.   ``Message-ID'' is the canonical form of [e.g.] ``message-id''.)
  432.  
  433. *** cnpatch/old/man/rnews.8    Sun Jul 23 00:48:11 1989
  434. --- man/rnews.8    Fri Nov  3 15:15:21 1989
  435. ***************
  436. *** 7,11 ****
  437.   .\" =()<.ds m @<NEWSMASTER>@>()=
  438.   .ds m usenet
  439. ! .TH RNEWS 8 "14 July 1989" "C News"
  440.   .SH NAME
  441.   rnews, cunbatch \- accept and spool news input
  442. --- 7,11 ----
  443.   .\" =()<.ds m @<NEWSMASTER>@>()=
  444.   .ds m usenet
  445. ! .TH RNEWS 8 "3 Nov 1989" "C News"
  446.   .SH NAME
  447.   rnews, cunbatch \- accept and spool news input
  448. ***************
  449. *** 29,33 ****
  450.   .br
  451.   .B \*b/input/newsrunning
  452. ! {\fBon\fR|\fBoff\fR}
  453.   .SH DESCRIPTION
  454.   .I Rnews
  455. --- 29,33 ----
  456.   .br
  457.   .B \*b/input/newsrunning
  458. ! [\fBon\fR|\fBoff\fR]
  459.   .SH DESCRIPTION
  460.   .I Rnews
  461. ***************
  462. *** 55,60 ****
  463.   should be run periodically (e.g. by \fIcron\fR(8)) to process spooled news.
  464.   .I Newsrunning
  465. ! can be used to enable and disable \fInewsrun\fR's processing if it is desired
  466.   to avoid major news processing during certain hours.
  467.   .PP
  468.   .I Newsrun
  469. --- 55,66 ----
  470.   should be run periodically (e.g. by \fIcron\fR(8)) to process spooled news.
  471.   .I Newsrunning
  472. ! can be used to turn \fInewsrun\fR's processing off and on if it is desired
  473.   to avoid major news processing during certain hours.
  474. + `\fBnewsrunning off\fR' instructs any currently-running \fInewsrun\fR to
  475. + stop as soon as possible, and prevents later ones from running.
  476. + `\fBnewsrunning on\fR' removes the inhibition (but does not actually
  477. + start a new \fInewsrun\fR).
  478. + Without an argument, \fInewsrunning\fR reports the current status:
  479. + ``off'' or ``on''.
  480.   .PP
  481.   .I Newsrun
  482.  
  483. *** cnpatch/old/misc/adddirs    Tue Aug 22 14:47:37 1989
  484. --- misc/adddirs    Mon Sep 18 18:21:58 1989
  485. ***************
  486. *** 8,12 ****
  487.   umask $NEWSUMASK
  488.   
  489. ! for dir in `sed 's/[     ].*//' $NEWSCTL/active | tr . /`
  490.   do
  491.       if test ! -d $NEWSARTS/$dir
  492. --- 8,12 ----
  493.   umask $NEWSUMASK
  494.   
  495. ! for dir in `awk '$4 !~ /^[x=]/ { print $1 }' $NEWSCTL/active | tr . /`
  496.   do
  497.       if test ! -d $NEWSARTS/$dir
  498. ***************
  499. *** 13,17 ****
  500.       then
  501.           echo "making $dir (and parents if needed...)"
  502. !         : mkpdir $NEWSARTS/$dir
  503.       fi
  504.   done
  505. --- 13,17 ----
  506.       then
  507.           echo "making $dir (and parents if needed...)"
  508. !         mkpdir $NEWSARTS/$dir
  509.       fi
  510.   done
  511.  
  512. *** cnpatch/old/misc/delgroup    Tue Jun 20 19:00:10 1989
  513. --- misc/delgroup    Wed Nov  8 14:23:38 1989
  514. ***************
  515. *** 46,48 ****
  516.   mv active active.old && mv active.tmp active
  517.   
  518. ! echo "You may wish to rm -rf $NEWSARTS/`echo "$1" | sed 's;\.;/;g'` at some point."
  519. --- 46,48 ----
  520.   mv active active.old && mv active.tmp active
  521.   
  522. ! echo "You may wish to rmdir $NEWSARTS/`echo "$1" | sed 's;\.;/;g'` at some point."
  523.  
  524. *** cnpatch/old/misc/getdate.c    Tue Jun 20 19:00:06 1989
  525. --- misc/getdate.c    Tue Oct 31 15:58:40 1989
  526. ***************
  527. *** 74,78 ****
  528.       it = getdate(tm, &ftnow);
  529.       if (it < 0)
  530. !         error("`%s' not valid date", tm);
  531.       else
  532.           (void) printf("%ld\n", it);
  533. --- 74,78 ----
  534.       it = getdate(tm, &ftnow);
  535.       if (it < 0)
  536. !         (void) fprintf(stderr, "%s: `%s' not a valid date\n", progname, tm);
  537.       else
  538.           (void) printf("%ld\n", it);
  539.  
  540. *** cnpatch/old/misc/newsdaily    Tue Aug 22 14:47:48 1989
  541. --- misc/newsdaily    Sat Nov  4 15:11:16 1989
  542. ***************
  543. *** 29,33 ****
  544.   
  545.   # keep one generation of log -- it's big
  546. ! rm log.o
  547.   mv log log.o && >log
  548.   
  549. --- 29,33 ----
  550.   
  551.   # keep one generation of log -- it's big
  552. ! rm -f log.o
  553.   mv log log.o && >log
  554.   
  555. ***************
  556. *** 84,89 ****
  557.       ) >>$gripes
  558.   fi
  559.   
  560. ! # look for unknown newsgroups on input (misses cross-posted articles)
  561.   cd $NEWSCTL
  562.   egrep '`' log.o | egrep junked | sed 's/.*`\(.*\)'"'"'.*/\1/' | sort |
  563. --- 84,98 ----
  564.       ) >>$gripes
  565.   fi
  566. + cd $NEWSCTL
  567. + no=`egrep 'disk too full' batchlog.o | wc -l`
  568. + if test " $no" -gt 0
  569. + then
  570. +     (
  571. +         echo "space shortage(s) limited batching $no times"
  572. +         echo
  573. +     ) >>$gripes
  574. + fi
  575.   
  576. ! # look for problem newsgroups on input (can miss cross-posted articles)
  577.   cd $NEWSCTL
  578.   egrep '`' log.o | egrep junked | sed 's/.*`\(.*\)'"'"'.*/\1/' | sort |
  579. ***************
  580. *** 93,96 ****
  581. --- 102,115 ----
  582.       (
  583.           echo 'leading five unknown newsgroups by number of articles:'
  584. +         cat $tmp
  585. +         echo
  586. +     ) >>$gripes
  587. + fi
  588. + egrep '`' log.o | egrep unapproved | sed 's/.*`\(.*\)'"'"'.*/\1/' | sort |
  589. +     uniq -c | sort -nr | sed 5q >$tmp
  590. + if test -s $tmp
  591. + then
  592. +     (
  593. +         echo 'top five supposedly-moderated groups with unmoderated postings:'
  594.           cat $tmp
  595.           echo
  596.  
  597. *** cnpatch/old/notebook/rfcerrata    Tue Jun 20 18:56:30 1989
  598. --- notebook/rfcerrata    Mon Nov 13 16:09:15 1989
  599. ***************
  600. *** 68,78 ****
  601.   .PP
  602.   RFC 1036
  603. ! claims that
  604.   .I cancel
  605. ! control messages should stop propagating when their target messages
  606. ! are not present;
  607. ! it would improve the efficacy of
  608. ! .I cancel s
  609. ! to propagate them anyway.
  610.   .SH
  611.   ihave/sendme not documented
  612. --- 68,88 ----
  613.   .PP
  614.   RFC 1036
  615. ! says that
  616.   .I cancel
  617. ! control messages should stop propagating if the receiving system
  618. ! is ``unable to cancel the message as requested''.
  619. ! It is not clear what this means, given that modern news systems hang
  620. ! onto cancellations for not-yet-seen articles in hopes of being able
  621. ! to cancel them in the future.
  622. ! B 2.11 interprets absence of the target article as ``unable to cancel''.
  623. ! It would improve the efficacy and reliability of
  624. ! .IR cancel s
  625. ! to propagate them anyway, given that feed anomalies are widespread.
  626. ! There have been verified instances in which cancellations did not achieve
  627. ! anywhere near the propagation of the original article.
  628. ! In the interests of robustness,
  629. ! C News interprets absence of the target article as deferred cancellation
  630. ! rather than failure to cancel, and propagates the
  631. ! .IR cancel .
  632.   .SH
  633.   ihave/sendme not documented
  634. ***************
  635. *** 94,95 ****
  636. --- 104,119 ----
  637.   or a
  638.   .I remotesys .
  639. + .SH
  640. + case-sensitivity in message-ids
  641. + .PP
  642. + RFC 1036 says nothing about whether message-ids are case-sensitive or not,
  643. + thereby punting the issue to RFC 822.
  644. + The RFC 822 rules are horrendously complex and no news system has ever
  645. + implemented them correctly.
  646. + (B 2.10 considers them fully case-sensitive, which is wrong.
  647. + B 2.11 considers them fully case-insensitive, which is also wrong.
  648. + C News gets the normal case right, but correct handling of certain
  649. + obscure RFC 822 constructs would
  650. + require a complex parsing algorithm; fortunately, the cases where this
  651. + matters appear to be extremely rare.)
  652. + Simplification appears necessary.
  653.  
  654. *** cnpatch/old/relay/hdrparse.c    Thu Sep 14 16:03:48 1989
  655. --- relay/hdrparse.c    Mon Sep 18 18:19:59 1989
  656. ***************
  657. *** 60,63 ****
  658. --- 60,66 ----
  659.    * then the strsave calls need to check for failure.
  660.    *
  661. +  * An article lacking a Message-ID: but possessing an (obsolete)
  662. +  * Article-I.D.: gets the transformed Article-I.D. as its Message-ID:.
  663. +  *
  664.    * We support control message *backwards* compatibility: if no Control:
  665.    * header exists and the newsgroup matches all.all.ctl, use the Subject:
  666. ***************
  667. *** 72,92 ****
  668.       if (hdrs->h_distr == NULL)
  669.           hdrs->h_distr = strsave(DEFDIST);
  670. !     if (hdrs->h_msgid == NULL && hdrs->h_artid != NULL)    /* obs. art.id. */
  671. !         hdrs->h_msgid = strsave(hdrs->h_artid);
  672. !     if (hdrs->h_msgid == NULL)
  673.           hdrs->h_msgid = strsave(DEFMSGID);
  674. -     if (hdrs->h_msgid[0] == '\0') {
  675. -         free(hdrs->h_msgid);
  676. -         hdrs->h_msgid = strsave(DEFMSGID);
  677.       }
  678. !     if (hdrs->h_expiry == NULL)
  679.           hdrs->h_expiry = strsave(DEFEXP);
  680. -     if (hdrs->h_expiry[0] == '\0') {
  681. -         free(hdrs->h_expiry);
  682. -         hdrs->h_expiry = strsave(DEFEXP);
  683.       }
  684.       if (hdrs->h_subj == NULL)
  685.           hdrs->h_subj = strsave("");
  686. - 
  687.       if (hdrs->h_ctlcmd == NULL && oldctl(hdrs))
  688.           hdrs->h_ctlcmd = strsave(hdrs->h_subj);
  689. --- 75,93 ----
  690.       if (hdrs->h_distr == NULL)
  691.           hdrs->h_distr = strsave(DEFDIST);
  692. ! 
  693. !     if (hdrs->h_msgid == NULL && hdrs->h_artid != NULL)
  694. !         hdrs->h_msgid = str3save("<", hdrs->h_artid, ">");
  695. !     if (hdrs->h_msgid == NULL || hdrs->h_msgid[0] == '\0') {
  696. !         nnfree(&hdrs->h_msgid);
  697.           hdrs->h_msgid = strsave(DEFMSGID);
  698.       }
  699. ! 
  700. !     if (hdrs->h_expiry == NULL || hdrs->h_expiry[0] == '\0') {
  701. !         nnfree(&hdrs->h_expiry);
  702.           hdrs->h_expiry = strsave(DEFEXP);
  703.       }
  704. + 
  705.       if (hdrs->h_subj == NULL)
  706.           hdrs->h_subj = strsave("");
  707.       if (hdrs->h_ctlcmd == NULL && oldctl(hdrs))
  708.           hdrs->h_ctlcmd = strsave(hdrs->h_subj);
  709.  
  710. *** cnpatch/old/relay/makefile    Thu Sep 14 16:03:49 1989
  711. --- relay/makefile    Fri Sep 15 13:55:22 1989
  712. ***************
  713. *** 49,53 ****
  714.   
  715.   all: makefile relaynews
  716. !     chmod +x sh/* aux/* ctl/*
  717.   
  718.   mkfile: makefile
  719. --- 49,53 ----
  720.   
  721.   all: makefile relaynews
  722. !     chmod +x sh/[a-z]* aux/[a-z]* ctl/[a-z]*
  723.   
  724.   mkfile: makefile
  725. ***************
  726. *** 72,78 ****
  727.       cp relaynews $(NEWSBIN)/relay
  728.       : needs to be news-owned, setuid -- build looks after that
  729. !     cp sh/* $(NEWSBIN)/inject
  730. !     cp ctl/* $(NEWSBIN)/ctl
  731. !     cp aux/* $(NEWSBIN)/relay
  732.       rm -f $(BIN)/inews
  733.       ln $(NEWSBIN)/inject/inews $(BIN)/inews 2>/dev/null || cp sh/inews $(BIN)
  734. --- 72,78 ----
  735.       cp relaynews $(NEWSBIN)/relay
  736.       : needs to be news-owned, setuid -- build looks after that
  737. !     cp sh/[a-z]* $(NEWSBIN)/inject
  738. !     cp ctl/[a-z]* $(NEWSBIN)/ctl
  739. !     cp aux/[a-z]* $(NEWSBIN)/relay
  740.       rm -f $(BIN)/inews
  741.       ln $(NEWSBIN)/inject/inews $(BIN)/inews 2>/dev/null || cp sh/inews $(BIN)
  742.  
  743. *** cnpatch/old/relay/procart.c    Thu Sep 14 16:03:49 1989
  744. --- relay/procart.c    Mon Sep 18 18:20:00 1989
  745. ***************
  746. *** 294,312 ****
  747.   register struct article *art;
  748.   {
  749. !     if (art->h.h_path == NULL) {
  750.           prefuse(art);
  751.           (void) printf("no Path: header\n");
  752. !     } else if (art->h.h_msgid == NULL || art->h.h_msgid[0] == '\0') {
  753.           prefuse(art);
  754.           (void) printf("missing Message-ID\n");
  755. !     } else if (strchr(art->h.h_msgid, ' ') != NULL ||
  756. !        strchr(art->h.h_msgid, '\t') != NULL) {
  757.           prefuse(art);
  758.           (void) printf("whitespace in Message-ID\n");
  759. !     } else if (alreadyseen(art->h.h_msgid)) {
  760.           prefuse(art);
  761.           (void) printf("duplicate\n");
  762. !     } else if (art->h.h_path != NULL && hopcount(art->h.h_path) > 0 &&
  763. !         !ngmatch(oursys()->sy_ngs, art->h.h_ngs)) {
  764.           extern boolean histreject;
  765.   
  766. --- 294,318 ----
  767.   register struct article *art;
  768.   {
  769. !     register char *msgid = art->h.h_msgid;
  770. !     register char *path =  art->h.h_path;
  771. !     register char *ngs =   art->h.h_ngs;
  772. ! 
  773. !     if (path == NULL) {
  774.           prefuse(art);
  775.           (void) printf("no Path: header\n");
  776. !     } else if (msgid == NULL || msgid[0] == '\0') {
  777.           prefuse(art);
  778.           (void) printf("missing Message-ID\n");
  779. !     } else if (strchr(msgid, ' ') != NULL || strchr(msgid, '\t') != NULL) {
  780.           prefuse(art);
  781.           (void) printf("whitespace in Message-ID\n");
  782. !     } else if (msgid[0] != '<' || msgid[strlen(msgid)-1] != '>') {
  783.           prefuse(art);
  784. +         (void) printf("<> brackets missing in Message-ID\n");
  785. +     } else if (alreadyseen(msgid)) {
  786. +         prefuse(art);
  787.           (void) printf("duplicate\n");
  788. !     } else if (path != NULL && hopcount(path) > 0 &&
  789. !         !ngmatch(oursys()->sy_ngs, ngs)) {
  790.           extern boolean histreject;
  791.   
  792. ***************
  793. *** 319,327 ****
  794.               history(art, NOLOG);
  795.           prefuse(art);
  796. !         (void) printf("no subscribed groups in `%s'\n", art->h.h_ngs);
  797. !     } else if (art->h.h_approved == NULL && moderated(art->h.h_ngs)) {
  798.           prefuse(art);
  799.           (void) printf("unapproved article in moderated group(s) `%s'\n",
  800. !             art->h.h_ngs);
  801.       } else
  802.           return;            /* art was accepted */
  803. --- 325,333 ----
  804.               history(art, NOLOG);
  805.           prefuse(art);
  806. !         (void) printf("no subscribed groups in `%s'\n", ngs);
  807. !     } else if (art->h.h_approved == NULL && moderated(ngs)) {
  808.           prefuse(art);
  809.           (void) printf("unapproved article in moderated group(s) `%s'\n",
  810. !             ngs);
  811.       } else
  812.           return;            /* art was accepted */
  813.  
  814. *** cnpatch/old/relay/relaynews.c    Thu Sep 14 16:03:51 1989
  815. --- relay/relaynews.c    Wed Nov  1 14:26:33 1989
  816. ***************
  817. *** 410,415 ****
  818.       if (c == '#')
  819.           return unbatch(in, inname);
  820. !     else
  821. !         return cpinsart(in, inname, MAXLONG, NO);
  822.   }
  823.   
  824. --- 410,424 ----
  825.       if (c == '#')
  826.           return unbatch(in, inname);
  827. !     else {
  828. !         register long infinite = MAXLONG;
  829. ! 
  830. !         if (infinite <= 0) {        /* paranoia */
  831. !             errno = 0;
  832. !             errunlock(
  833. !             "MAXLONG is non-positive; rebuild the news software",
  834. !                 "");
  835. !         }
  836. !         return cpinsart(in, inname, infinite, NO);
  837. !     }
  838.   }
  839.   
  840.  
  841. *** cnpatch/old/relay/sys.c    Thu Aug 24 16:40:07 1989
  842. --- relay/sys.c    Thu Oct  5 05:14:06 1989
  843. ***************
  844. *** 32,38 ****
  845.   
  846.   /* imports */
  847. ! extern boolean justone;
  848.   extern struct system *mysysincache();
  849. ! extern void rewsys(), remmysys(), freecurrsys();
  850.   
  851.   struct system *
  852. --- 32,38 ----
  853.   
  854.   /* imports */
  855. ! extern boolean donesys();
  856.   extern struct system *mysysincache();
  857. ! extern void rewsys(), remmysys(), advcurrsys(), setupsys();
  858.   
  859.   struct system *
  860. ***************
  861. *** 66,75 ****
  862.   /*
  863.    * Return the next sys entry, which may span multiple lines.
  864. !  * Returned pointer points at a static struct whose members
  865. !  * point at static storage.
  866.    *
  867. !  * It would be clearer to rewrite the justone/nextsys/readsys dance
  868. !  * to get rid of justone, but I haven't the energy.  Sorry.  Beware that
  869. !  * justone is set in either ../libbig/sys.fast.c or ../libsmall/sys.slow.c.
  870.    */
  871.   struct system *
  872. --- 66,75 ----
  873.   /*
  874.    * Return the next sys entry, which may span multiple lines.
  875. !  * Returned pointer points at a struct whose lifetime (and that of its
  876. !  * members) is not promised to last beyond the next call to nextsys();
  877. !  * copy it and its pointed-to strings if you need them for longer.
  878.    *
  879. !  * Note that readsys() reads one entry on small systems, but the entire
  880. !  * sys file on big systems, so the common code in this file is subtle.
  881.    */
  882.   struct system *
  883. ***************
  884. *** 84,89 ****
  885.           readsys();
  886.       retsys = currsys;
  887. !     if (currsys != NULL)
  888. !         currsys = currsys->sy_next;
  889.       return retsys;
  890.   }
  891. --- 84,88 ----
  892.           readsys();
  893.       retsys = currsys;
  894. !     advcurrsys();
  895.       return retsys;
  896.   }
  897. ***************
  898. *** 90,94 ****
  899.   
  900.   /*
  901. !  * If justone, read one entry; else read whole sys file (done once only).
  902.    * Ignores '#' comments and blank lines; uses cfgetms to read possibly-
  903.    * continued lines of arbitrary length.
  904. --- 89,93 ----
  905.   
  906.   /*
  907. !  * On small systems, read one entry; else read whole sys file (done once only).
  908.    * Ignores '#' comments and blank lines; uses cfgetms to read possibly-
  909.    * continued lines of arbitrary length.
  910. ***************
  911. *** 99,106 ****
  912.       register char *sysline;
  913.   
  914. !     if (justone)
  915. !         freecurrsys();
  916. !     else
  917. !         rewind(fp);
  918.       while ((sysline = cfgetms(fp)) != NULL) {
  919.           if (sysline[0] != '#' && sysline[0] != '\n')
  920. --- 98,102 ----
  921.       register char *sysline;
  922.   
  923. !     setupsys(fp);        /* reuse currsys or rewind sys file */
  924.       while ((sysline = cfgetms(fp)) != NULL) {
  925.           if (sysline[0] != '#' && sysline[0] != '\n')
  926. ***************
  927. *** 107,114 ****
  928.               parsesysln(sysline);
  929.           free(sysline);
  930. !         if (justone && firstsys != NULL) {    /* parsed an entry */
  931. !             firstsys = NULL;
  932.               return;
  933. -         }
  934.       }
  935.       (void) nfclose(fp);
  936. --- 103,108 ----
  937.               parsesysln(sysline);
  938.           free(sysline);
  939. !         if (donesys())        /* early exit if on disk (small) */
  940.               return;
  941.       }
  942.       (void) nfclose(fp);
  943. ***************
  944. *** 121,125 ****
  945.   /*
  946.    * Parse (and modify) sysline into *currsys, which is malloced here
  947. !  * and freed iff "justone", in readsys(), see freecursys().
  948.    *
  949.    * Side-effect: sysline has a trailing newline removed.
  950. --- 115,119 ----
  951.   /*
  952.    * Parse (and modify) sysline into *currsys, which is malloced here
  953. !  * and freed iff on a small system, in readsys(), see freecursys().
  954.    *
  955.    * Side-effect: sysline has a trailing newline removed.
  956. ***************
  957. *** 153,160 ****
  958.   
  959.       /* stash *sysp away on the tail of the current list of systems */
  960. !     if (firstsys == NULL)
  961. !         firstsys = sysp;
  962. !     else
  963. !         currsys->sy_next = sysp;
  964.       currsys = sysp;
  965.   }
  966. --- 147,151 ----
  967.   
  968.       /* stash *sysp away on the tail of the current list of systems */
  969. !     *(firstsys == NULL? &firstsys: &currsys->sy_next) = sysp;
  970.       currsys = sysp;
  971.   }
  972. ***************
  973. *** 211,215 ****
  974.   /*
  975.    * Parse "next" to colon into malloced storage, return its ptr via "into".
  976. !  * *into is freed iff "justone", in readsys(), see freecursys().
  977.    */
  978.   STATIC void
  979. --- 202,206 ----
  980.   /*
  981.    * Parse "next" to colon into malloced storage, return its ptr via "into".
  982. !  * *into is freed iff on a small system, in readsys(), see freecursys().
  983.    */
  984.   STATIC void
  985.  
  986. *** cnpatch/old/rna/active.c    Tue Jun 20 19:01:47 1989
  987. --- rna/active.c    Mon Oct 23 21:51:15 1989
  988. ***************
  989. *** 3,8 ****
  990.    *
  991.    * format of file:
  992. !  *    <groupname> ' ' <5 digit #> ' ' <5 digit #> ' ' flag '\n'
  993. !  *              (seq)          (low)
  994.    */
  995.   
  996. --- 3,8 ----
  997.    *
  998.    * format of file:
  999. !  *    <groupname> ' ' <#> ' ' <#> ' ' flag '\n'
  1000. !  *            (seq)    (low)
  1001.    */
  1002.   
  1003. ***************
  1004. *** 23,29 ****
  1005.   {
  1006.       register FILE    *f;
  1007. !     register int i;
  1008.       char gbuf[BUFSIZ / 2], dbuf[BUFSIZ / 4], dbuf2[BUFSIZ / 4];
  1009. !     extern char *itoa();
  1010.   
  1011.       f = fopenl(actname);
  1012. --- 23,29 ----
  1013.   {
  1014.       register FILE    *f;
  1015. !     register long l;
  1016.       char gbuf[BUFSIZ / 2], dbuf[BUFSIZ / 4], dbuf2[BUFSIZ / 4];
  1017. !     extern char *itoa(), *ltoa();
  1018.   
  1019.       f = fopenl(actname);
  1020. ***************
  1021. *** 31,45 ****
  1022.       while (getline(f, gbuf, dbuf, dbuf2))
  1023.           if (CMP(gbuf, group) == 0) {
  1024. !             i = atoi(dbuf);
  1025. !             i++;
  1026. !             fseek(f, -12L, 1);
  1027. !             (void) fprintf(f, "%05d", i);
  1028. !             fclose(f);
  1029.   #if !AUSAM
  1030.               unlock(actname);
  1031.   #endif
  1032. !             return itoa(i);
  1033.           }
  1034. !     (void) fprintf(f, "%s 00001 00001 y\n", group);
  1035.       fclose(f);
  1036.   #if !AUSAM
  1037. --- 31,44 ----
  1038.       while (getline(f, gbuf, dbuf, dbuf2))
  1039.           if (CMP(gbuf, group) == 0) {
  1040. !             l = atol(dbuf) + 1;
  1041. !             (void) fseek(f, -(long)(2*(10+1)), 1);    /* TODO: fix this */
  1042. !             (void) fprintf(f, "%010d", l);        /* TODO: fix this */
  1043. !             (void) fclose(f);
  1044.   #if !AUSAM
  1045.               unlock(actname);
  1046.   #endif
  1047. !             return ltoa(l);
  1048.           }
  1049. !     (void) fprintf(f, "%s 0000000000 0000000001 y\n", group);
  1050.       fclose(f);
  1051.   #if !AUSAM
  1052. ***************
  1053. *** 49,53 ****
  1054.   }
  1055.   
  1056. - 
  1057.   static
  1058.   getline(f, g, d, d2)
  1059. --- 48,51 ----
  1060. ***************
  1061. *** 97,101 ****
  1062.       char gbuf[BUFSIZ / 2], dbuf[BUFSIZ / 4], dbuf2[BUFSIZ / 4];
  1063.   
  1064. !     alist = last = NIL(active);
  1065.       f = fopenf(actname, "r");
  1066.       lineno = 0;
  1067. --- 95,99 ----
  1068.       char gbuf[BUFSIZ / 2], dbuf[BUFSIZ / 4], dbuf2[BUFSIZ / 4];
  1069.   
  1070. !     alist = last = NULL;
  1071.       f = fopenf(actname, "r");
  1072.       lineno = 0;
  1073. ***************
  1074. *** 103,109 ****
  1075.           ap = NEW(active);
  1076.           ap->a_name = newstr(gbuf);
  1077. !         ap->a_seq = atoi(dbuf);
  1078. !         ap->a_low = atoi(dbuf2);
  1079. !         ap->a_next = NIL(active);
  1080.           if (!alist)
  1081.               alist = ap;
  1082. --- 101,107 ----
  1083.           ap = NEW(active);
  1084.           ap->a_name = newstr(gbuf);
  1085. !         ap->a_seq = atol(dbuf);
  1086. !         ap->a_low = atol(dbuf2);
  1087. !         ap->a_next = NULL;
  1088.           if (!alist)
  1089.               alist = ap;
  1090. ***************
  1091. *** 148,153 ****
  1092.       while (getline(f, gbuf, dbuf, dbuf2))
  1093.           if (CMP(gbuf, group) == 0) {
  1094. !             fseek(f, -6L, 1);
  1095. !             (void) fprintf(f, "%05d", low);
  1096.               break;
  1097.           }
  1098. --- 146,151 ----
  1099.       while (getline(f, gbuf, dbuf, dbuf2))
  1100.           if (CMP(gbuf, group) == 0) {
  1101. !             fseek(f, -(long)(10+1), 1);    /* TODO: fix this */
  1102. !             (void) fprintf(f, "%010d", low); /* TODO: fix this */
  1103.               break;
  1104.           }
  1105. ***************
  1106. *** 158,163 ****
  1107.   }
  1108.   
  1109. - 
  1110. - 
  1111.   /*
  1112.    * initgrp - initialise an entry for this group
  1113. --- 156,159 ----
  1114. ***************
  1115. *** 178,182 ****
  1116.               return;
  1117.           }
  1118. !     (void) fprintf(f, "%s 00000 00001\n", group);
  1119.   
  1120.   }
  1121. --- 174,178 ----
  1122.               return;
  1123.           }
  1124. !     (void) fprintf(f, "%s 0000000000 0000000001\n", group);
  1125.   
  1126.   }
  1127.  
  1128. *** cnpatch/old/rna/defs.h    Tue Jun 20 19:01:48 1989
  1129. --- rna/defs.h    Mon Oct 23 21:33:25 1989
  1130. ***************
  1131. *** 42,46 ****
  1132.                          allows "-s subject -i include_file"
  1133.                          arguments */
  1134. ! #define NETID "utzoo"
  1135.   #ifndef NETID
  1136.   #define NETID "utstat"            /* else define it here */
  1137. --- 42,46 ----
  1138.                          allows "-s subject -i include_file"
  1139.                          arguments */
  1140. ! #define NETID "utstat"
  1141.   #ifndef NETID
  1142.   #define NETID "utstat"            /* else define it here */
  1143. ***************
  1144. *** 72,76 ****
  1145.   
  1146.   #define MYDOMAIN "uucp"            /* Local domain */
  1147. ! #define MYORG    "U of Toronto Zoology" /* My organization */
  1148.   #define NEWSROOT "news"            /* news editor */
  1149.   
  1150. --- 72,76 ----
  1151.   
  1152.   #define MYDOMAIN "uucp"            /* Local domain */
  1153. ! #define MYORG    "U of Toronto Statistics" /* My organization */
  1154.   #define NEWSROOT "news"            /* news editor */
  1155.   
  1156. ***************
  1157. *** 142,147 ****
  1158.   struct active {
  1159.       char    *a_name;
  1160. !     short    a_seq;
  1161. !     short    a_low;
  1162.       active    *a_next;
  1163.   };
  1164. --- 142,147 ----
  1165.   struct active {
  1166.       char    *a_name;
  1167. !     long    a_seq;
  1168. !     long    a_low;
  1169.       active    *a_next;
  1170.   };
  1171. ***************
  1172. *** 154,158 ****
  1173.       char    *n_name;
  1174.       bool    n_subscribe;
  1175. !     short    n_last;
  1176.       newsrc    *n_next;
  1177.   };
  1178. --- 154,158 ----
  1179.       char    *n_name;
  1180.       bool    n_subscribe;
  1181. !     long    n_last;
  1182.       newsrc    *n_next;
  1183.   };
  1184. ***************
  1185. *** 159,163 ****
  1186.   
  1187.   char    *strrchr(), *strchr(), *strcat(), *strcpy(), *strpbrk();
  1188. ! char    *itoa(), *convg(), *ngsquash(), *ttoa(), *mgets(), *rconvg();
  1189.   char    *newstr(), *newstr2(), *newstr3(), *newstr4(), *newstr5(), *catstr();
  1190.   char    *catstr2(), *bsearch(), *mtempnam(), *newstr6();
  1191. --- 159,163 ----
  1192.   
  1193.   char    *strrchr(), *strchr(), *strcat(), *strcpy(), *strpbrk();
  1194. ! char    *itoa(), *ltoa(), *convg(), *ngsquash(), *ttoa(), *mgets(), *rconvg();
  1195.   char    *newstr(), *newstr2(), *newstr3(), *newstr4(), *newstr5(), *catstr();
  1196.   char    *catstr2(), *bsearch(), *mtempnam(), *newstr6();
  1197.  
  1198. *** cnpatch/old/rna/funcs.c    Tue Jun 20 19:01:50 1989
  1199. --- rna/funcs.c    Mon Oct 23 21:14:21 1989
  1200. ***************
  1201. *** 212,216 ****
  1202.   }
  1203.   
  1204. - 
  1205.   /*
  1206.    * get unique sequence number from SEQ
  1207. --- 212,215 ----
  1208. ***************
  1209. *** 220,235 ****
  1210.   {
  1211.       register long number;
  1212. !     register FILE    *f;
  1213.       static char buf[12];
  1214.   
  1215.       f = fopenl(SEQ);
  1216. !     if (fread(buf, 1, sizeof(buf), f) > 0)
  1217.           number = atol(buf);
  1218.       else
  1219.           number = 1;
  1220. - 
  1221.       rewind(f);
  1222.       (void) fprintf(f, "%ld\n", number + 1);
  1223. !     fclose(f);
  1224.   #if !AUSAM
  1225.       unlock(SEQ);
  1226. --- 219,233 ----
  1227.   {
  1228.       register long number;
  1229. !     register FILE *f;
  1230.       static char buf[12];
  1231.   
  1232.       f = fopenl(SEQ);
  1233. !     if (fread(buf, 1, sizeof buf, f) > 0)
  1234.           number = atol(buf);
  1235.       else
  1236.           number = 1;
  1237.       rewind(f);
  1238.       (void) fprintf(f, "%ld\n", number + 1);
  1239. !     (void) fclose(f);
  1240.   #if !AUSAM
  1241.       unlock(SEQ);
  1242. ***************
  1243. *** 240,244 ****
  1244.   }
  1245.   
  1246. - 
  1247.   /*
  1248.    * open a locked file (or create) for reading and writing
  1249. --- 238,241 ----
  1250. ***************
  1251. *** 248,260 ****
  1252.   char *fname;
  1253.   {
  1254. !     register FILE    *f;
  1255.   #ifdef AUSAM
  1256.       struct stat sbuf;
  1257.   #endif
  1258.   
  1259. !     extern uid_t    newsuid;
  1260. ! 
  1261. !     if ((f = fopen(fname, "r+")) == NIL(FILE) && (f = fopen(fname, "w+")) ==
  1262. !         NIL(FILE))
  1263.           error("Can't open %s", fname);
  1264.   
  1265. --- 245,256 ----
  1266.   char *fname;
  1267.   {
  1268. !     register FILE *f;
  1269.   #ifdef AUSAM
  1270.       struct stat sbuf;
  1271.   #endif
  1272. +     extern uid_t newsuid;
  1273.   
  1274. !     if ((f = fopen(fname, "r+")) == NULL &&
  1275. !         (f = fopen(fname, "w+")) == NULL)
  1276.           error("Can't open %s", fname);
  1277.   
  1278. ***************
  1279. *** 262,268 ****
  1280.       if (fstat(fileno(f), &sbuf) != 0)
  1281.           error("Can't stat %s", fname);
  1282. !     if ((sbuf.st_mode & S_IFMT) != S_IFALK && (chmod(fname, (int) (sbuf.st_mode
  1283. !         &~S_IFMT) | S_IFALK) != 0 || chown(fname, (int) newsuid, (int) newsuid) !=
  1284. !         0 || fclose(f) == EOF || (f = fopen(fname, "r+")) == NIL(FILE)))
  1285.           error("Can't create %s", fname);
  1286.   #else
  1287. --- 258,266 ----
  1288.       if (fstat(fileno(f), &sbuf) != 0)
  1289.           error("Can't stat %s", fname);
  1290. !     if ((sbuf.st_mode & S_IFMT) != S_IFALK &&
  1291. !         (chmod(fname, (int)(sbuf.st_mode&~S_IFMT) | S_IFALK) != 0 ||
  1292. !         chown(fname, (int)newsuid, (int)newsuid) != 0 ||
  1293. !         fclose(f) == EOF ||
  1294. !         (f = fopen(fname, "r+")) == NULL))
  1295.           error("Can't create %s", fname);
  1296.   #else
  1297. ***************
  1298. *** 320,324 ****
  1299.       register FILE    *f;
  1300.   
  1301. !     if ((f = fopen(name, mode)) == NIL(FILE))
  1302.           error("Can't %s %s", *mode == 'r' ? "open" : "create", name);
  1303.       return f;
  1304. --- 318,322 ----
  1305.       register FILE    *f;
  1306.   
  1307. !     if ((f = fopen(name, mode)) == NULL)
  1308.           error("Can't %s %s", *mode == 'r' ? "open" : "create", name);
  1309.       return f;
  1310. ***************
  1311. *** 369,373 ****
  1312.   
  1313.       fflush(stdout);
  1314. !     if (fgets(buf, sizeof(buf), stdin) == NIL(char)) {
  1315.           (void) printf("\n");
  1316.           return NIL(char);
  1317. --- 367,371 ----
  1318.   
  1319.       fflush(stdout);
  1320. !     if (fgets(buf, sizeof(buf), stdin) == NULL) {
  1321.           (void) printf("\n");
  1322.           return NIL(char);
  1323. ***************
  1324. *** 376,383 ****
  1325.           while (isspace(*s) && s > buf)
  1326.               *s-- = '\0';
  1327. !     else
  1328. !      {
  1329.           (void) printf("Input line too long.\n");
  1330. !         return NIL(char);
  1331.       }
  1332.       s = buf;
  1333. --- 374,380 ----
  1334.           while (isspace(*s) && s > buf)
  1335.               *s-- = '\0';
  1336. !     else {
  1337.           (void) printf("Input line too long.\n");
  1338. !         return NULL;
  1339.       }
  1340.       s = buf;
  1341. ***************
  1342. *** 531,535 ****
  1343.   char *path;
  1344.   {
  1345. !     FILE         * f;
  1346.       register char *ex1, *ex2, *com, *new;
  1347.       char buf[BUFSIZ];
  1348. --- 528,532 ----
  1349.   char *path;
  1350.   {
  1351. !     FILE *f;
  1352.       register char *ex1, *ex2, *com, *new;
  1353.       char buf[BUFSIZ];
  1354. ***************
  1355. *** 540,545 ****
  1356.           if ((f = popen(com, "r")) == NIL(FILE))
  1357.               (void) printf("Couldn't run \"%s\"\n", com);
  1358. !         else
  1359. !          {
  1360.               fread(buf, sizeof(buf), 1, f);
  1361.               if (pclose(f) != 0) {
  1362. --- 537,541 ----
  1363.           if ((f = popen(com, "r")) == NIL(FILE))
  1364.               (void) printf("Couldn't run \"%s\"\n", com);
  1365. !         else {
  1366.               fread(buf, sizeof(buf), 1, f);
  1367.               if (pclose(f) != 0) {
  1368. ***************
  1369. *** 558,562 ****
  1370.       }
  1371.       return path;
  1372. - 
  1373.   }
  1374.   
  1375. --- 554,557 ----
  1376. ***************
  1377. *** 571,577 ****
  1378.   register char *sp;
  1379.   {
  1380. !     register char *sep;
  1381.   
  1382. -     sep = NIL(char);
  1383.       while (*sp) {
  1384.           if (sep)
  1385. --- 566,571 ----
  1386.   register char *sp;
  1387.   {
  1388. !     register char *sep = NULL;
  1389.   
  1390.       while (*sp) {
  1391.           if (sep)
  1392. ***************
  1393. *** 586,589 ****
  1394.       }
  1395.   }
  1396. - 
  1397. - 
  1398. --- 580,581 ----
  1399.  
  1400. *** cnpatch/old/rna/header.c    Tue Jun 20 19:01:51 1989
  1401. --- rna/header.c    Mon Oct 23 20:50:27 1989
  1402. ***************
  1403. *** 111,115 ****
  1404.       field        af;
  1405.       char buf[BUFLEN*2];
  1406. - 
  1407.       char *hfgets();
  1408.   
  1409. --- 111,114 ----
  1410. ***************
  1411. *** 118,131 ****
  1412.           if (buf[0] == '\n')
  1413.               return;
  1414. !         if (isupper(buf[0]) && (colon = strchr(buf, ':')) && (space =
  1415. !             strchr(buf, ' ')) && (colon + 1 == space)) {
  1416.               *colon = '\0';
  1417.               af.f_name = buf;
  1418. !             fp = (field * ) bsearch((char *) & af, (char *) fields,
  1419. !                                  sizeof(fields) / sizeof(fields[0]), sizeof(fields[0]),
  1420. !                  fieldcmp);
  1421.               *colon = ':';
  1422.           } else
  1423. !             fp = NIL(field);
  1424.           if (!fp)
  1425.               if (hp->h_others)
  1426. --- 117,130 ----
  1427.           if (buf[0] == '\n')
  1428.               return;
  1429. !         if (isupper(buf[0]) && (colon = strchr(buf, ':')) &&
  1430. !             (space = strchr(buf, ' ')) && (colon + 1 == space)) {
  1431.               *colon = '\0';
  1432.               af.f_name = buf;
  1433. !             fp = (field * )bsearch((char *)&af, (char *)fields,
  1434. !                 sizeof fields/sizeof fields[0], sizeof fields[0],
  1435. !                 fieldcmp);
  1436.               *colon = ':';
  1437.           } else
  1438. !             fp = NULL;
  1439.           if (!fp)
  1440.               if (hp->h_others)
  1441. ***************
  1442. *** 133,138 ****
  1443.               else
  1444.                   hp->h_others = newstr(buf);
  1445. !         else
  1446. !          {
  1447.               if (colon = strchr(space + 1, '\n'))
  1448.                   *colon = '\0';
  1449. --- 132,136 ----
  1450.               else
  1451.                   hp->h_others = newstr(buf);
  1452. !         else {
  1453.               if (colon = strchr(space + 1, '\n'))
  1454.                   *colon = '\0';
  1455. ***************
  1456. *** 394,399 ****
  1457.       register char *cp, *tp;
  1458.   
  1459. !     if ((cp = fgets(buf, len, fp)) == NIL(char))
  1460. !         return NIL(char);
  1461.   
  1462.       if (*cp == '\n')
  1463. --- 392,397 ----
  1464.       register char *cp, *tp;
  1465.   
  1466. !     if ((cp = fgets(buf, len, fp)) == NULL)
  1467. !         return NULL;
  1468.   
  1469.       if (*cp == '\n')
  1470. ***************
  1471. *** 445,449 ****
  1472.            tp->tm_sec, tzone);
  1473.       return buf;
  1474. - 
  1475.   }
  1476.   
  1477. --- 443,446 ----
  1478. ***************
  1479. *** 474,477 ****
  1480.       return maketime(4, argv, STIMES);
  1481.   }
  1482. - 
  1483. - 
  1484. --- 471,472 ----
  1485.  
  1486. *** cnpatch/old/rna/history.c    Tue Jun 20 19:01:52 1989
  1487. --- rna/history.c    Mon Oct 23 21:35:49 1989
  1488. ***************
  1489. *** 168,175 ****
  1490.   
  1491.       f = fopenl(histname);
  1492. !     fseek(f, 0L, 2);
  1493. !     (void) fprintf(f, "%s %s%ld %s\n", histid, etime ? "E" : "", etime ? etime :
  1494. !         now, histline);
  1495. !     fclose(f);
  1496.   #if !AUSAM
  1497.       unlock(histname);
  1498. --- 168,175 ----
  1499.   
  1500.       f = fopenl(histname);
  1501. !     (void) fseek(f, 0L, 2);
  1502. !     (void) fprintf(f, "%s %s%ld %s\n", histid, (etime? "E": ""),
  1503. !         (etime? (long)etime: now), histline);
  1504. !     (void) fclose(f);
  1505.   #if !AUSAM
  1506.       unlock(histname);
  1507.  
  1508. *** cnpatch/old/rna/lib/itoa.c    Tue Jun 20 19:01:53 1989
  1509. --- rna/lib/itoa.c    Mon Oct 23 21:55:01 1989
  1510. ***************
  1511. *** 8,9 ****
  1512. --- 8,19 ----
  1513.       return buf;
  1514.   }
  1515. + 
  1516. + char *
  1517. + ltoa(l)
  1518. + long l;
  1519. + {
  1520. +     static char buf[30];
  1521. + 
  1522. +     sprintf(buf, "%ld", l);
  1523. +     return buf;
  1524. + }
  1525.  
  1526. *** cnpatch/old/rna/makefile    Thu Aug 24 16:40:08 1989
  1527. --- rna/makefile    Mon Oct 23 20:55:25 1989
  1528. ***************
  1529. *** 24,29 ****
  1530.   FILES = help
  1531.   LCOMMANDS = postnews.lint uurec.lint readnews.lint uusend.lint expire.lint
  1532. ! # PFILES = header.c postnews.c funcs.c active.c history.c maketime.c mtempnam.c
  1533. ! PFILES = header.c funcs.c active.c history.c maketime.c mtempnam.c
  1534.   RFILES = header.c readnews.c funcs.c active.c newsrc.c history.c maketime.c
  1535.   ROFILES= header.o readnews.o funcs.o active.o newsrc.o history.o maketime.o
  1536. --- 24,29 ----
  1537.   FILES = help
  1538.   LCOMMANDS = postnews.lint uurec.lint readnews.lint uusend.lint expire.lint
  1539. ! # PFILES = header.c postnews.c funcs.c active.c history.c maketime.c
  1540. ! PFILES = header.c funcs.c active.c history.c maketime.c
  1541.   RFILES = header.c readnews.c funcs.c active.c newsrc.c history.c maketime.c
  1542.   ROFILES= header.o readnews.o funcs.o active.o newsrc.o history.o maketime.o
  1543.  
  1544. *** cnpatch/old/rna/maketime.c    Tue Jun 20 19:01:57 1989
  1545. --- rna/maketime.c    Mon Oct 23 21:20:36 1989
  1546. ***************
  1547. *** 396,400 ****
  1548.   }
  1549.   
  1550. - 
  1551.   static long 
  1552.   construct()
  1553. --- 396,399 ----
  1554. ***************
  1555. *** 411,418 ****
  1556.       if (setdayofweek)
  1557.           days += dayofweek;
  1558. !     return days * SECINDAY + hour * SECINHOUR + minute * SECINMIN + second;
  1559.   }
  1560.   
  1561. - 
  1562.   static
  1563.   adjust()
  1564. --- 410,416 ----
  1565.       if (setdayofweek)
  1566.           days += dayofweek;
  1567. !     return (long)days*SECINDAY + (long)hour*SECINHOUR + minute*SECINMIN + second;
  1568.   }
  1569.   
  1570.   static
  1571.   adjust()
  1572. ***************
  1573. *** 442,447 ****
  1574.        * month == tim->tm_mon && day == tim->tm_mday
  1575.        */
  1576. !     if ((long)(hour*SECINHOUR + minute*SECINMIN + second) <
  1577. !         (long)(tim->tm_hour*SECINHOUR + tim->tm_min*SECINMIN + tim->tm_sec)) {
  1578.           dim = daysinmonth[month] + (month == 1? leapyear(month): 0);
  1579.           if (setday || ++day / dim) {
  1580. --- 440,445 ----
  1581.        * month == tim->tm_mon && day == tim->tm_mday
  1582.        */
  1583. !     if ((long)hour*SECINHOUR + minute*SECINMIN + second <
  1584. !         (long)tim->tm_hour*SECINHOUR + tim->tm_min*SECINMIN + tim->tm_sec) {
  1585.           dim = daysinmonth[month] + (month == 1? leapyear(month): 0);
  1586.           if (setday || ++day / dim) {
  1587. ***************
  1588. *** 453,456 ****
  1589.       }
  1590.   }
  1591. - 
  1592. - 
  1593. --- 451,452 ----
  1594.  
  1595. *** cnpatch/old/rna/newsrc.c    Tue Jun 20 19:01:59 1989
  1596. --- rna/newsrc.c    Mon Oct 23 21:02:59 1989
  1597. ***************
  1598. *** 168,175 ****
  1599.               if (!ngmatch(ap->a_name, group))
  1600.                   continue;
  1601. !             if ((np = findnewsrc(ap->a_name)) == NIL(newsrc)) {
  1602.                   np = NEW(newsrc);
  1603.                   np->n_name = newstr(ap->a_name);
  1604. !                 np->n_next = NIL(newsrc);
  1605.                   np->n_last = 0;
  1606.                   np->n_subscribe = true;
  1607. --- 168,175 ----
  1608.               if (!ngmatch(ap->a_name, group))
  1609.                   continue;
  1610. !             if ((np = findnewsrc(ap->a_name)) == NULL) {
  1611.                   np = NEW(newsrc);
  1612.                   np->n_name = newstr(ap->a_name);
  1613. !                 np->n_next = NULL;
  1614.                   np->n_last = 0;
  1615.                   np->n_subscribe = true;
  1616. ***************
  1617. *** 212,216 ****
  1618.   
  1619.   /*
  1620. !  * find if a newrc entry exists,
  1621.    * taking advantange of the fact that requests should be
  1622.    * in the same order
  1623. --- 212,216 ----
  1624.   
  1625.   /*
  1626. !  * find if a newsrc entry exists,
  1627.    * taking advantange of the fact that requests should be
  1628.    * in the same order
  1629. ***************
  1630. *** 228,232 ****
  1631.   
  1632.       if (!rc)
  1633. !         return NIL(newsrc);
  1634.   
  1635.       found = false;
  1636. --- 228,232 ----
  1637.   
  1638.       if (!rc)
  1639. !         return NULL;
  1640.   
  1641.       found = false;
  1642. ***************
  1643. *** 295,298 ****
  1644. --- 295,299 ----
  1645.   static
  1646.   writengline(f, np)        /* write .newsrc n.g. line in normal form on f */
  1647. + FILE *f;
  1648.   register newsrc *np;
  1649.   {
  1650.  
  1651. *** cnpatch/old/rna/readnews.c    Tue Jun 20 19:02:10 1989
  1652. --- rna/readnews.c    Mon Oct 23 21:57:42 1989
  1653. ***************
  1654. *** 458,462 ****
  1655.       np->n_last++;
  1656.       fname = convg(newstr5(newsdir, "/", ap->a_name, ARTSEP,
  1657. !         itoa(np->n_last)));
  1658.       ino = 0;
  1659.       f = fopen(fname, "r");
  1660. --- 458,462 ----
  1661.       np->n_last++;
  1662.       fname = convg(newstr5(newsdir, "/", ap->a_name, ARTSEP,
  1663. !         ltoa(np->n_last)));
  1664.       ino = 0;
  1665.       f = fopen(fname, "r");
  1666. ***************
  1667. *** 493,500 ****
  1668.   {
  1669.       static bool done;
  1670. -     register int num;
  1671.   
  1672.       np->n_last++;
  1673.       if (Cflag) {
  1674.           if (!done)
  1675.               (void) printf("You have news:\n");
  1676. --- 493,501 ----
  1677.   {
  1678.       static bool done;
  1679.   
  1680.       np->n_last++;
  1681.       if (Cflag) {
  1682. +         register long num;
  1683. + 
  1684.           if (!done)
  1685.               (void) printf("You have news:\n");
  1686. ***************
  1687. *** 501,505 ****
  1688.           done = true;
  1689.           num = ap->a_seq - np->n_last + 1;
  1690. !         (void) printf("\t%s at most %d article%s\n",
  1691.               ap->a_name, num, (num > 1? "s": ""));
  1692.           return nextgroup;
  1693. --- 502,506 ----
  1694.           done = true;
  1695.           num = ap->a_seq - np->n_last + 1;
  1696. !         (void) printf("\t%s at most %ld article%s\n",
  1697.               ap->a_name, num, (num > 1? "s": ""));
  1698.           return nextgroup;
  1699. ***************
  1700. *** 511,515 ****
  1701.   }
  1702.   
  1703. - 
  1704.   /*
  1705.    * normal command handler (or pflag)
  1706. --- 512,515 ----
  1707. ***************
  1708. *** 548,563 ****
  1709.   bool pushed;
  1710.   {
  1711. -     static char errmess[] = "Incorrect command; Type `?' for help.\n";
  1712. -     static char form[]    = "%s: %s\n";
  1713. - 
  1714. -     static char savedsys[BUFSIZ / 2];
  1715. -     static active    *lastap, *rlastap;
  1716. -     static newsrc    lastn;
  1717. -     static char number[20];
  1718. -     static active    *wantap;
  1719. - 
  1720.       register char *com, *arg;
  1721. !     register int c, i, size;
  1722. !     register FILE     *f;
  1723.       char *fname;
  1724.       header        h;
  1725. --- 548,555 ----
  1726.   bool pushed;
  1727.   {
  1728.       register char *com, *arg;
  1729. !     register int c, size;
  1730. !     register long i;
  1731. !     register FILE *f;
  1732.       char *fname;
  1733.       header        h;
  1734. ***************
  1735. *** 566,570 ****
  1736.       bool printed, pheader, verbose, hadinterrupt;
  1737.       applycom    nextact;
  1738. ! 
  1739.       extern char t_from[], t_subject[], t_date[];
  1740.       extern char t_newsgroups[], t_path[], t_sender[];
  1741. --- 558,568 ----
  1742.       bool printed, pheader, verbose, hadinterrupt;
  1743.       applycom    nextact;
  1744. !     static char errmess[] = "Incorrect command; Type `?' for help.\n";
  1745. !     static char form[]    = "%s: %s\n";
  1746. !     static char savedsys[BUFSIZ / 2];
  1747. !     static active    *lastap, *rlastap;
  1748. !     static newsrc    lastn;
  1749. !     static char number[20];
  1750. !     static active    *wantap;
  1751.       extern char t_from[], t_subject[], t_date[];
  1752.       extern char t_newsgroups[], t_path[], t_sender[];
  1753. ***************
  1754. *** 573,577 ****
  1755.       extern active    *activep();
  1756.   
  1757. - 
  1758.       if (last) {
  1759.           /*
  1760. --- 571,574 ----
  1761. ***************
  1762. *** 591,598 ****
  1763.               return nextgroup;
  1764.           else
  1765. !             wantap = NIL(active);
  1766.   
  1767.       fname = convg(newstr5(newsdir, "/", ap->a_name, ARTSEP,
  1768. !         itoa(np->n_last + 1)));
  1769.       f = fopen(fname, "r");
  1770.       ino = 0;
  1771. --- 588,595 ----
  1772.               return nextgroup;
  1773.           else
  1774. !             wantap = NULL;
  1775.   
  1776.       fname = convg(newstr5(newsdir, "/", ap->a_name, ARTSEP,
  1777. !         ltoa(np->n_last + 1)));
  1778.       f = fopen(fname, "r");
  1779.       ino = 0;
  1780. ***************
  1781. *** 599,603 ****
  1782.       if (!f || !last && !pushed && seen(f, &ino)) {
  1783.           if (pushed)
  1784. !             (void) printf("Article %d (%s) no longer exists.\n",
  1785.                   np->n_last + 1, ap->a_name);
  1786.           else
  1787. --- 596,600 ----
  1788.       if (!f || !last && !pushed && seen(f, &ino)) {
  1789.           if (pushed)
  1790. !             (void) printf("Article %ld (%s) no longer exists.\n",
  1791.                   np->n_last + 1, ap->a_name);
  1792.           else
  1793. ***************
  1794. *** 639,643 ****
  1795.           lastap = ap;
  1796.           if (!pheader) {
  1797. !             (void) printf("Article %d of %d (%s)",
  1798.                   np->n_last + 1, ap->a_seq, ap->a_name);
  1799.               if (h.h_lines != 0)
  1800. --- 636,640 ----
  1801.           lastap = ap;
  1802.           if (!pheader) {
  1803. !             (void) printf("Article %ld of %ld (%s)",
  1804.                   np->n_last + 1, ap->a_seq, ap->a_name);
  1805.               if (h.h_lines != 0)
  1806. ***************
  1807. *** 671,676 ****
  1808.                */
  1809.               com = "";
  1810. !         else
  1811. !          {
  1812.               (void) printf("? ");
  1813.               if (fflush(stdout) == EOF) {
  1814. --- 668,672 ----
  1815.                */
  1816.               com = "";
  1817. !         else {
  1818.               (void) printf("? ");
  1819.               if (fflush(stdout) == EOF) {
  1820. ***************
  1821. *** 775,780 ****
  1822.   #endif
  1823.                    {
  1824. !                     (void) printf("Group \"%s\" can't be unsubscribed.\n",
  1825. !                                               np->n_name);
  1826.                       continue;
  1827.                   }
  1828. --- 771,777 ----
  1829.   #endif
  1830.                    {
  1831. !                     (void) printf(
  1832. !                     "Group \"%s\" can't be unsubscribed.\n",
  1833. !                         np->n_name);
  1834.                       continue;
  1835.                   }
  1836. ***************
  1837. *** 797,801 ****
  1838.               if (!ngmatch(arg, nflag)) {
  1839.                   (void) printf("%s: is not subscribed to!\n", arg);
  1840. !                 wantap = NIL(active);
  1841.                   continue;
  1842.               }
  1843. --- 794,798 ----
  1844.               if (!ngmatch(arg, nflag)) {
  1845.                   (void) printf("%s: is not subscribed to!\n", arg);
  1846. !                 wantap = NULL;
  1847.                   continue;
  1848.               }
  1849. ***************
  1850. *** 833,837 ****
  1851.               while (number[0]) {
  1852.                   ntmp = lastn;
  1853. !                 ntmp.n_last = atoi(number) - 1;
  1854.                   number[0] = '\0';
  1855.                   nextact = commands(rlastap, &ntmp, false, true);
  1856. --- 830,834 ----
  1857.               while (number[0]) {
  1858.                   ntmp = lastn;
  1859. !                 ntmp.n_last = atol(number) - 1;
  1860.                   number[0] = '\0';
  1861.                   nextact = commands(rlastap, &ntmp, false, true);
  1862. ***************
  1863. *** 844,847 ****
  1864. --- 841,845 ----
  1865.           default:
  1866.               if (isdigit(c)) {
  1867. + /*                i = atol(arg);        */
  1868.                   i = c - '0';
  1869.                   while (isdigit(*arg))
  1870. ***************
  1871. *** 854,863 ****
  1872.               number[0] = '\0';
  1873.               if (i < ap->a_low || i > ap->a_seq) {
  1874. !                 (void) printf("Articles in \"%s\" group range %d to %d.\n",
  1875. !                                          np->n_name, ap->a_low, ap->a_seq);
  1876.                   continue;
  1877.               }
  1878.               if (pushed) {
  1879. !                 sprintf(number, "%d", i);
  1880.                   nextact = next;
  1881.                   break;
  1882. --- 852,862 ----
  1883.               number[0] = '\0';
  1884.               if (i < ap->a_low || i > ap->a_seq) {
  1885. !                 (void) printf(
  1886. !                     "Articles in \"%s\" group range %ld to %ld.\n",
  1887. !                     np->n_name, ap->a_low, ap->a_seq);
  1888.                   continue;
  1889.               }
  1890.               if (pushed) {
  1891. !                 sprintf(number, "%ld", i);
  1892.                   nextact = next;
  1893.                   break;
  1894. ***************
  1895. *** 865,870 ****
  1896.               ntmp = *np;
  1897.               ntmp.n_last = i - 1;
  1898. !             if ((nextact = commands(ap, &ntmp, false, true)) !=
  1899. !                 next)
  1900.                   break;
  1901.               if (!number[0]) {
  1902. --- 864,868 ----
  1903.               ntmp = *np;
  1904.               ntmp.n_last = i - 1;
  1905. !             if ((nextact = commands(ap, &ntmp, false, true)) != next)
  1906.                   break;
  1907.               if (!number[0]) {
  1908. ***************
  1909. *** 889,893 ****
  1910.   }
  1911.   
  1912. - 
  1913.   /*
  1914.    * see if this is a followup we are ignoring
  1915. --- 887,890 ----
  1916. ***************
  1917. *** 1259,1263 ****
  1918.               id++;
  1919.       }
  1920. !     qsort((char *) uflag, (unsigned) usize, sizeof(char *), strpcmp);
  1921.   }
  1922.   
  1923. --- 1256,1260 ----
  1924.               id++;
  1925.       }
  1926. !     qsort((char *)uflag, (unsigned)usize, sizeof(char *), strpcmp);
  1927.   }
  1928.   
  1929. ***************
  1930. *** 1266,1269 ****
  1931. --- 1263,1267 ----
  1932.    * print an article, if it's long enough call page()
  1933.    */
  1934. + /* ARGSUSED */
  1935.   print(hp, f)
  1936.   header *hp;
  1937. ***************
  1938. *** 1276,1282 ****
  1939.       if (!pflag
  1940.   #ifdef LINESHDRPRESENT
  1941. !      && hp->h_lines && atoi(hp->h_lines) >= PAGESIZE - 4
  1942.   #endif
  1943. !      )
  1944.           page(f);
  1945.       else
  1946. --- 1274,1280 ----
  1947.       if (!pflag
  1948.   #ifdef LINESHDRPRESENT
  1949. !         && hp->h_lines && atoi(hp->h_lines) >= PAGESIZE - 4
  1950.   #endif
  1951. !         )
  1952.           page(f);
  1953.       else
  1954. ***************
  1955. *** 1283,1287 ****
  1956.           while ((c = getc(f)) != EOF)
  1957.               (void) putchar(c);
  1958. !     fseek(f, pos, 0);
  1959.   }
  1960.   
  1961. --- 1281,1285 ----
  1962.           while ((c = getc(f)) != EOF)
  1963.               (void) putchar(c);
  1964. !     (void) fseek(f, pos, 0);
  1965.   }
  1966.   
  1967.  
  1968.  
  1969. end of patch 13-Nov-1989
  1970.  
  1971.  
  1972.