home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume19 / cnews2 / pch22aug89 < prev    next >
Internet Message Format  |  1989-09-17  |  60KB
  1. From attcan!utzoo!henry@uunet.uu.net Tue Aug 22 23:35:45 1989
  2. Received: from BBN.COM by pineapple.bbn.com
  3.     id <AA00485@pineapple.bbn.com>; Tue, 22 Aug 89 23:35:24 -0400
  4. Received: from uunet.uu.net by BBN.COM id aa03912; 22 Aug 89 23:36 EDT
  5. Received: from attcan.UUCP by uunet.uu.net (5.61/1.14) with UUCP 
  6.     id AA07897; Tue, 22 Aug 89 23:32:19 -0400
  7. Date: Tue, 22 Aug 89 23:32:19 -0400
  8. From: attcan!utzoo!henry@uunet.uu.net
  9. Message-Id: <8908230332.AA07897@uunet.uu.net>
  10. To: source-patches@uunet.uu.net
  11. Cc: utstat!geoff@uunet.uu.net
  12. Subject: C News patch of 22-Aug-1989
  13. Content-Type: text  
  14. Content-Length: 59094  
  15. Status: R
  16.  
  17. This one is a lot of small stuff; some more major work is coming, but this
  18. one is already pushing 60KB (context diffs are so damned bulky...).
  19.  
  20. Some "make cmp" stuff intended for our own testing, but possibly of use.
  21. A C version of upact.  Some new fflushes in relaynews to make "status 16"
  22. failures report properly.  A new option to expire to suppress the history
  23. rebuild.  "inews -C" now produces an (informative) error message and exits.
  24. Lots of minor cleanup and improvement.
  25.  
  26. start of patch 22-Aug-1989
  27. this should be run with   patch -p0 <thisfile
  28.  
  29. Please do the following (there is no easy way we can convince
  30. patch to do this automatically):
  31. rm expire/lowest.c
  32. mv relay/sh/postnews rna/postnews
  33.  
  34. The following is a complete list of patches to date.
  35.  
  36. Prereq: 23-Jun-1989
  37. Prereq: 7-Jul-1989
  38. Prereq: 23-Jul-1989
  39. *** tmp.dates.with.really.long.filename.for.patch    Tue Aug 22 14:05:43 1989
  40. --- PATCHDATES    Tue Aug 22 14:05:43 1989
  41. ***************
  42. *** 1,3 ****
  43. --- 1,4 ----
  44.   23-Jun-1989
  45.   7-Jul-1989
  46.   23-Jul-1989
  47. + 22-Aug-1989
  48.  
  49. Changed files, if any:
  50.  
  51. *** cnpatch/tmp.file    Tue Aug 22 14:05:49 1989
  52. --- batch/Makefile    Mon Aug 21 19:15:19 1989
  53. ***************
  54. *** 17,21 ****
  55.   
  56.   PGMS=batcher batchih batchsm batchsplit comp compcun nocomp viainews viauux \
  57. !     sendbatches compc7 c7encode viamail viapmail bencode compb
  58.   DTR=Makefile batcher.c batchih batchsplit c7encode.c comp compc7 compcun \
  59.       newsbatch.8 nocomp sendbatches viainews viauux viamail \
  60. --- 17,22 ----
  61.   
  62.   PGMS=batcher batchih batchsm batchsplit comp compcun nocomp viainews viauux \
  63. !     sendbatches compc7 c7encode viamail viapmail bencode compb viauuxz \
  64. !     viaemail
  65.   DTR=Makefile batcher.c batchih batchsplit c7encode.c comp compc7 compcun \
  66.       newsbatch.8 nocomp sendbatches viainews viauux viamail \
  67. ***************
  68. *** 41,44 ****
  69. --- 42,48 ----
  70.       cp $(PGMS) $(PGMDIR)
  71.   
  72. + cmp:    $(PGMS)
  73. +     for f in $(PGMS) ; do cmp $(PGMDIR)/$$f $$f ; done
  74. + 
  75.   newsinstall:    batchparms
  76.       -if test ! -d $(OUTGOING) ; then mkdir $(OUTGOING) ; fi
  77. ***************
  78. *** 61,64 ****
  79. --- 65,74 ----
  80.       sed 's/ihave/sendme/g' batchih >$@
  81.   
  82. + viauuxz:    viauux
  83. +     sed '$$s/-r/-r -z/' viauux >$@
  84. + 
  85. + viaemail:    viamail
  86. +     sed '$$s/rnews/enews/' viamail >$@
  87. + 
  88.   test.1:
  89.       echo 'a test' >$@
  90. ***************
  91. *** 165,167 ****
  92.       rm -rf out.going bin
  93.       rm -f *.o test.* togo togo.* batchparms batcher batchsm 
  94. !     rm -f batchlog batchlog.* c7encode bencode
  95. --- 175,177 ----
  96.       rm -rf out.going bin
  97.       rm -f *.o test.* togo togo.* batchparms batcher batchsm 
  98. !     rm -f batchlog batchlog.* c7encode bencode viauuxz viaemail
  99.  
  100. *** cnpatch/tmp.file    Tue Aug 22 14:05:51 1989
  101. --- batch/batcher.c    Sun Aug 20 00:42:51 1989
  102. ***************
  103. *** 115,119 ****
  104.           error("internal disaster, can't fstat", "");
  105.       if ((sbuf.st_mode&S_IFMT) != S_IFREG) {
  106. !         close(artfile);
  107.           return;        /* Don't try to batch directories etc. */
  108.       }
  109. --- 115,119 ----
  110.           error("internal disaster, can't fstat", "");
  111.       if ((sbuf.st_mode&S_IFMT) != S_IFREG) {
  112. !         (void) close(artfile);
  113.           return;        /* Don't try to batch directories etc. */
  114.       }
  115.  
  116. *** cnpatch/tmp.file    Tue Aug 22 14:05:58 1989
  117. --- batch/sendbatches    Wed Aug 16 15:54:35 1989
  118. ***************
  119. *** 148,152 ****
  120.               if test $? -eq 0 -a ! -s /tmp/nb$$
  121.               then
  122. !                 rm $f /tmp/nb$$
  123.               else
  124.                   (
  125. --- 148,152 ----
  126.               if test $? -eq 0 -a ! -s /tmp/nb$$
  127.               then
  128. !                 rm -f $f /tmp/nb$$
  129.               else
  130.                   (
  131.  
  132. *** cnpatch/tmp.file    Tue Aug 22 14:05:59 1989
  133. --- batch/viainews    Sun Aug  6 02:48:24 1989
  134. ***************
  135. *** 2,4 ****
  136. --- 2,5 ----
  137.   # Feed batch to inews, for ihave/sendme mostly.
  138.   
  139. + HOME=/dev/null ; export HOME    # suppress signatures, .name, etc.
  140.   exec inews -h -W -A
  141.  
  142. *** cnpatch/tmp.file    Tue Aug 22 14:06:01 1989
  143. --- conf/Makefile    Mon Aug 21 19:46:47 1989
  144. ***************
  145. *** 15,18 ****
  146. --- 15,20 ----
  147.       libsmall libstdio libusg libv7 libv8
  148.   DIRS = batch conf expire h hfake input $(LIBDIRS) misc relay rna
  149. + CMPDIRS = batch conf expire input man misc relay rna
  150. + SHS = doit.root doit.bin doit.news again.root
  151.   
  152.   PGMS = spacefor queuelen
  153. ***************
  154. *** 27,30 ****
  155. --- 29,38 ----
  156.       : and build takes care of setnewsids if needed
  157.   
  158. + pcmp:    $(PGMS)
  159. +     for f in $(PGMS) ; do cmp $(NEWSBIN)/$$f $$f ; done
  160. + 
  161. + cmp:
  162. +     : nothing
  163. + 
  164.   newsinstall:
  165.       : build stuff does the real work
  166. ***************
  167. *** 82,86 ****
  168.       rm -f substitutions history history.pag history.dir active localgroups
  169.       rm -f log mailpaths sys cron rc setnewsids setnewsids.o spacefor.bsd
  170. !     rm -f replyusepath spacefor queuelen junk
  171.   
  172.   gclean:    tidy
  173. --- 90,94 ----
  174.       rm -f substitutions history history.pag history.dir active localgroups
  175.       rm -f log mailpaths sys cron rc setnewsids setnewsids.o spacefor.bsd
  176. !     rm -rf replyusepath spacefor queuelen junk save
  177.   
  178.   gclean:    tidy
  179. ***************
  180. *** 92,96 ****
  181.   
  182.   spotless:    gclean
  183. !     rm -f again.root doit.bin doit.news doit.root
  184.   
  185.   lclean:
  186. --- 100,104 ----
  187.   
  188.   spotless:    gclean
  189. !     rm -f $(SHS)
  190.   
  191.   lclean:
  192. ***************
  193. *** 97,98 ****
  194. --- 105,116 ----
  195.       rm -f ../ranlibed
  196.       for d in $(LIBDIRS) ; do cd ../$$d ; make clean ; done
  197. + 
  198. + cmps:
  199. +     for d in $(CMPDIRS) ; do cd ../$$d ; make cmp RBIN=/usr/lib/uucp/bin ; done
  200. + 
  201. + save:    $(SHS)
  202. +     mkdir save
  203. +     mv $(SHS) save
  204. + 
  205. + check:
  206. +     -for f in $(SHS) ; do diff save/$$f $$f ; done
  207.  
  208. *** cnpatch/tmp.file    Tue Aug 22 14:06:03 1989
  209. --- conf/build    Mon Aug 21 19:08:35 1989
  210. ***************
  211. *** 8,12 ****
  212.   # directories in which to do makes
  213.   # batch must precede input; relay must precede misc
  214. ! pgmdirs='conf batch expire input relay misc rna'
  215.   
  216.   # control files built in conf
  217. --- 8,13 ----
  218.   # directories in which to do makes
  219.   # batch must precede input; relay must precede misc
  220. ! # the "doui" code below may add rna to the list
  221. ! pgmdirs='conf batch expire input relay misc'
  222.   
  223.   # control files built in conf
  224. ***************
  225. *** 727,731 ****
  226.   
  227.   echo
  228. ! echo 'The "inews", "postnews", "readnews", and "checknews" commands should'
  229.   echo 'go in one of the directories searched for normal commands, so users'
  230.   echo 'can run them without special arrangements.  What directory should'
  231. --- 728,748 ----
  232.   
  233.   echo
  234. ! echo 'Our "postnews", "readnews", and "checknews" are included mostly for'
  235. ! echo 'completeness.  They are very simple and crude compared to the user'
  236. ! echo 'interface many users are accustomed to.  As far as we know, B News'
  237. ! echo '(or other) versions should run fine with C News.  If you are already'
  238. ! echo 'running such user-interface software, you may not want to change.'
  239. ! ./query 'Do you want to install our user-interface programs [yes]? '
  240. ! read doui
  241. ! case "$doui" in
  242. ! ''|y*|Y*)    doui=yes ; pgmdirs="$pgmdirs rna"    ;;
  243. ! *)    doui=no    ;;
  244. ! esac
  245. ! 
  246. ! echo
  247. ! case "$doui" in
  248. ! no)    echo 'The "inews" command(s) should'    ;;
  249. ! *)    echo 'The "inews", "postnews", "readnews", and "checknews" commands should'    ;;
  250. ! esac
  251.   echo 'go in one of the directories searched for normal commands, so users'
  252.   echo 'can run them without special arrangements.  What directory should'
  253. ***************
  254. *** 748,763 ****
  255.   esac
  256.   
  257. ! echo
  258. ! echo 'Postnews can supply a default newsgroup, to assist naive users in'
  259. ! echo 'getting the group right for simple postings.  What should the default'
  260. ! ./query 'newsgroup for postnews be [no default]? '
  261. ! read postdefltgroup
  262.   
  263. ! echo
  264. ! echo 'Postnews can supply a default distribution, to restrict news to a'
  265. ! echo 'local area unless the user specifically changes it.  This is probably'
  266. ! echo 'a good idea.  What should the default distribution for postnews'
  267. ! ./query 'be [world]? '
  268. ! read postdefltdist
  269.   
  270.   echo
  271. --- 765,784 ----
  272.   esac
  273.   
  274. ! case "$doui" in
  275. ! yes)
  276. !     echo
  277. !     echo 'Postnews can supply a default newsgroup, to aid naive users in'
  278. !     echo 'getting this right for simple postings.  What should the default'
  279. !     ./query 'newsgroup for postnews be [no default]? '
  280. !     read postdefltgroup
  281.   
  282. !     echo
  283. !     echo 'Postnews can supply a default distribution, to limit news to a'
  284. !     echo 'local area unless the user specifically changes it.  This is'
  285. !     echo 'probably wise.  What should the default postnews distribution'
  286. !     ./query 'be [world]? '
  287. !     read postdefltdist
  288. !     ;;
  289. ! esac
  290.   
  291.   echo
  292. ***************
  293. *** 771,775 ****
  294.   case "$answer" in
  295.   n*|N*|'')    ;;
  296. ! *)    echo 'You should substitute relay/ihave.not.c for relay/ihave.c'
  297.       echo 'before running doit.bin, so that ihave/sendme is disabled'
  298.       echo 'at your site.'
  299. --- 792,796 ----
  300.   case "$answer" in
  301.   n*|N*|'')    ;;
  302. ! *)    echo 'You may want to substitute relay/ihave.not.c for relay/ihave.c'
  303.       echo 'before running doit.bin, so that ihave/sendme is disabled'
  304.       echo 'at your site.'
  305. ***************
  306. *** 859,866 ****
  307.           echo 'case "$1" in'
  308.           echo '-*s*)    ;;'
  309. !         echo '*)    make substs    ;;'
  310.           echo 'esac'
  311.       else
  312. !         echo ": make substs        not necessary, defaults used"
  313.       fi
  314.       echo ": done"
  315. --- 880,887 ----
  316.           echo 'case "$1" in'
  317.           echo '-*s*)    ;;'
  318. !         echo '*)    make substs || exit 1    ;;'
  319.           echo 'esac'
  320.       else
  321. !         echo ": make substs || exit 1    not necessary, defaults used"
  322.       fi
  323.       echo ": done"
  324. ***************
  325. *** 867,873 ****
  326.       echo ": making spacefor, queuelen, etc...."
  327.       echo "rm -f spacefor queuelen hostname setnewsids"
  328. !     echo "make spacefor.$dftype"
  329.       echo "cp spacefor.$dftype spacefor"
  330. !     echo "make queuelen.$uucptype"
  331.       echo "cp queuelen.$uucptype queuelen"
  332.       if test " $hostname" = " y"
  333. --- 888,894 ----
  334.       echo ": making spacefor, queuelen, etc...."
  335.       echo "rm -f spacefor queuelen hostname setnewsids"
  336. !     echo "make spacefor.$dftype || exit 1"
  337.       echo "cp spacefor.$dftype spacefor"
  338. !     echo "make queuelen.$uucptype || exit 1"
  339.       echo "cp queuelen.$uucptype queuelen"
  340.       if test " $hostname" = " y"
  341. ***************
  342. *** 901,905 ****
  343.       if test " $ranlib" = " y"
  344.       then
  345. !         echo "make ../ranlibed"
  346.       fi
  347.       echo ': library done'
  348. --- 922,926 ----
  349.       if test " $ranlib" = " y"
  350.       then
  351. !         echo "make ../ranlibed || exit 1"
  352.       fi
  353.       echo ': library done'
  354. ***************
  355. *** 922,926 ****
  356.       if test " $sete" != " y"
  357.       then
  358. !         echo "make setnewsids NEWSUSER=$newsuid NEWSGROUP=$newsgid $cc $copts $postlibs"
  359.       fi
  360.       echo "for dir in $pgmdirs"
  361. --- 943,947 ----
  362.       if test " $sete" != " y"
  363.       then
  364. !         echo "make setnewsids NEWSUSER=$newsuid NEWSGROUP=$newsgid $cc $copts $postlibs || exit 1"
  365.       fi
  366.       echo "for dir in $pgmdirs"
  367. ***************
  368. *** 927,931 ****
  369.       echo "do"
  370.       echo "    cd ../\$dir"
  371. !     echo "    make all $dbm $cc $copts $postlibs"
  372.       echo "done"
  373.       echo ": done"
  374. --- 948,952 ----
  375.       echo "do"
  376.       echo "    cd ../\$dir"
  377. !     echo "    make all $dbm $cc $copts $postlibs || exit 1"
  378.       echo "done"
  379.       echo ": done"
  380. ***************
  381. *** 955,960 ****
  382.       fi
  383.       echo "echo '$whoami' >whoami"
  384. !     echo "echo 'general 00000 00000 y' >active"
  385. !     echo "echo 'news.announce.newusers 00000 00000 y' >>active"
  386.       echo ">errlog"
  387.       echo ">history"
  388. --- 976,981 ----
  389.       fi
  390.       echo "echo '$whoami' >whoami"
  391. !     echo "echo 'general 0000000000 0000000001 y' >active"
  392. !     echo "echo 'news.announce.newusers 0000000000 0000000001 y' >>active"
  393.       echo ">errlog"
  394.       echo ">history"
  395. ***************
  396. *** 972,976 ****
  397.   40 *    1-31 *    0-6    su news -c '$newsbin/batch/sendbatches'
  398.   59 0    1-31 *    0-6    su news -c '$newsbin/expire/doexpire'
  399. ! 45 3    1-31 *    0-6    su news -c '$newsbin/expire/superkludge comp.mail.maps'
  400.   10 8    1-31 *    0-6    su news -c '$newsbin/maint/newsdaily'
  401.   00 5,13,21    1-31 *    0-6    su news -c '$newsbin/maint/newswatch'
  402. --- 993,997 ----
  403.   40 *    1-31 *    0-6    su news -c '$newsbin/batch/sendbatches'
  404.   59 0    1-31 *    0-6    su news -c '$newsbin/expire/doexpire'
  405. ! 45 3    1-31 *    0-6    su news -c '$newsbin/expire/superkludge comp.mail.maps news.announce.newusers'
  406.   10 8    1-31 *    0-6    su news -c '$newsbin/maint/newsdaily'
  407.   00 5,13,21    1-31 *    0-6    su news -c '$newsbin/maint/newswatch'
  408. ***************
  409. *** 986,990 ****
  410.       echo "do"
  411.       echo "    cd ../\$dir"
  412. !     echo "    make bininstall BIN=$bin RBIN=$rbin $dbm"
  413.       echo "done"
  414.       echo ": done"
  415. --- 1007,1011 ----
  416.       echo "do"
  417.       echo "    cd ../\$dir"
  418. !     echo "    make bininstall BIN=$bin RBIN=$rbin $dbm || exit 1"
  419.       echo "done"
  420.       echo ": done"
  421. ***************
  422. *** 991,997 ****
  423.       echo ': installing manual pages'
  424.       echo 'cd ../man'
  425.       for chap in $chaps
  426.       do
  427. !         for f in `ls ../man | egrep "\.$chap\$"`
  428.           do
  429.               echo "cp $f $manpages/man$chap/$f"
  430. --- 1012,1022 ----
  431.       echo ': installing manual pages'
  432.       echo 'cd ../man'
  433. +     case "$doui" in
  434. +     yes)    exclude='!!nothing!!'    ;;
  435. +     no)    exclude='^postnews\.'    ;;
  436. +     esac
  437.       for chap in $chaps
  438.       do
  439. !         for f in `ls ../man | egrep -v "$exclude" | egrep "\.$chap\$"`
  440.           do
  441.               echo "cp $f $manpages/man$chap/$f"
  442. ***************
  443. *** 1018,1022 ****
  444.       echo "do"
  445.       echo "    cd ../\$dir"
  446. !     echo "    make newsinstall BIN=$bin RBIN=$rbin $dbm"
  447.       echo "done"
  448.       echo ": done"
  449. --- 1043,1047 ----
  450.       echo "do"
  451.       echo "    cd ../\$dir"
  452. !     echo "    make newsinstall BIN=$bin RBIN=$rbin $dbm || exit 1"
  453.       echo "done"
  454.       echo ": done"
  455.  
  456. *** cnpatch/tmp.file    Tue Aug 22 14:06:07 1989
  457. --- conf/config.proto    Mon Aug 14 13:23:58 1989
  458. ***************
  459. *** 3,6 ****
  460. --- 3,12 ----
  461.   #  available everywhere immediately
  462.   #
  463. + # This is not, repeat NOT, a master control file for all of C News.
  464. + # This is the shell equivalent of libcnews/config.c, a "subroutine
  465. + # library" that gives shell files access to the default settings and
  466. + # lets environment variables override the defaults.  Changing the
  467. + # defaults here will *NOT* change them throughout C News.
  468. + #
  469.   # =()<NEWSCTL=${NEWSCTL-@<NEWSCTL>@}>()=
  470.   NEWSCTL=${NEWSCTL-/usr/lib/news}
  471.  
  472. *** cnpatch/tmp.file    Tue Aug 22 14:06:11 1989
  473. --- conf/spacefor.proto    Sun Aug 20 01:08:15 1989
  474. ***************
  475. *** 37,41 ****
  476.   incoming)    arg="$NEWSARTS/in.coming" ; desire=5000 ;;
  477.   articles)    arg="$NEWSARTS" ; desire=5000 ;;
  478. ! control)    arg="$NEWSCTL" ; desire=3000 ;;
  479.   outbound)    arg="/usr/spool/uucp" ; desire=10000 ;;    # ignore $3
  480.   archive)    arg="$NEWSARTS" ; desire=1 ;;        # system-specific
  481. --- 37,41 ----
  482.   incoming)    arg="$NEWSARTS/in.coming" ; desire=5000 ;;
  483.   articles)    arg="$NEWSARTS" ; desire=5000 ;;
  484. ! control)    arg="$NEWSCTL" ; desire=3000 ;;        # for expire, mostly
  485.   outbound)    arg="/usr/spool/uucp" ; desire=10000 ;;    # ignore $3
  486.   archive)    arg="$NEWSARTS" ; desire=1 ;;        # system-specific
  487.  
  488. *** cnpatch/tmp.file    Tue Aug 22 14:06:12 1989
  489. --- conf/subst.gc    Mon Aug 21 18:43:45 1989
  490. ***************
  491. *** 16,18 ****
  492.   relay/sh/inews
  493.   rna/makefile
  494. ! relay/sh/postnews
  495. --- 16,18 ----
  496.   relay/sh/inews
  497.   rna/makefile
  498. ! rna/postnews
  499.  
  500. *** cnpatch/tmp.file    Tue Aug 22 14:06:29 1989
  501. --- doc/interface    Sat Aug 19 23:26:32 1989
  502. ***************
  503. *** 1,3 ****
  504. ! .DA "4 July 1989"
  505.   .TL
  506.   The Interface Between C News And The Outside World
  507. --- 1,3 ----
  508. ! .DA "19 Aug 1989"
  509.   .TL
  510.   The Interface Between C News And The Outside World
  511. ***************
  512. *** 130,137 ****
  513.   That is, with news's standard PATH, if
  514.   .DS
  515. ! echo hi there Joe | mail joe
  516.   .DE
  517. ! does not result in the message ``hi there Joe'' arriving in the mailbox
  518.   ``joe'', you're going to have to fake it.
  519.   See \fIDirectory Layout\fR for insight on where to put a fake \fImail\fR
  520.   so that C News components will use it rather than \fI/bin/mail\fR.
  521. --- 130,140 ----
  522.   That is, with news's standard PATH, if
  523.   .DS
  524. ! echo "relaynews: hi there Joe" | mail joe
  525.   .DE
  526. ! does not result in the message ``relaynews: hi there Joe''
  527. ! arriving in the mailbox
  528.   ``joe'', you're going to have to fake it.
  529. + (Note that some BSD mailers run into trouble with the colon in the example,
  530. + interpreting such a line as a header.)
  531.   See \fIDirectory Layout\fR for insight on where to put a fake \fImail\fR
  532.   so that C News components will use it rather than \fI/bin/mail\fR.
  533.  
  534. *** cnpatch/tmp.file    Tue Aug 22 14:06:33 1989
  535. --- expire/Makefile    Mon Aug 21 14:50:57 1989
  536. ***************
  537. *** 10,15 ****
  538.       superkludge upact doexpire mkadir
  539.   DTR = README Makefile dircheck doexpire expire.c histdups histinfo.c \
  540. !     histslash.c lowest.c mkdbm.c mkhistory pgood superkludge tgood upact \
  541. !     mkadir
  542.   # =()<NEWSARTS = @<NEWSARTS>@>()=
  543.   NEWSARTS = /usr/spool/news
  544. --- 10,16 ----
  545.       superkludge upact doexpire mkadir
  546.   DTR = README Makefile dircheck doexpire expire.c histdups histinfo.c \
  547. !     histslash.c mkdbm.c mkhistory pgood superkludge tgood upact \
  548. !     mkadir updatemin.c
  549. ! UPACT=upact
  550.   # =()<NEWSARTS = @<NEWSARTS>@>()=
  551.   NEWSARTS = /usr/spool/news
  552. ***************
  553. *** 21,37 ****
  554.   SHELL = /bin/sh
  555.   
  556. ! all:    $(THEM)
  557.       chmod +x $(THEM)
  558.   
  559. ! bininstall:    $(THEM) explist.proto
  560.       -if test ! -d $(NEWSBIN)/expire ; then mkdir $(NEWSBIN)/expire; fi
  561.       cp $(THEM) $(NEWSBIN)/expire
  562.   
  563.   newsinstall:    explist.proto
  564.       -if test ! -r $(NEWSCTL)/explist ; then cp explist.proto $(NEWSCTL)/explist ; fi
  565.   
  566. - cmp:    $(THEM)
  567. -     -for f in $(THEM) ; do cmp $$f $(NEWSBIN)/expire/$$f ; done
  568. - 
  569.   expire: expire.o $(LIBS)
  570.       $(CC) $(LDFLAGS) expire.o $(PRE) $(LIBS) $(DBM) $(POST) -o $@
  571. --- 22,38 ----
  572.   SHELL = /bin/sh
  573.   
  574. ! all:    $(THEM) explist.proto
  575.       chmod +x $(THEM)
  576.   
  577. ! bininstall:    $(THEM)
  578.       -if test ! -d $(NEWSBIN)/expire ; then mkdir $(NEWSBIN)/expire; fi
  579.       cp $(THEM) $(NEWSBIN)/expire
  580.   
  581. + cmp:    $(THEM)
  582. +     for f in $(THEM) ; do cmp $(NEWSBIN)/expire/$$f $$f ; done
  583. + 
  584.   newsinstall:    explist.proto
  585.       -if test ! -r $(NEWSCTL)/explist ; then cp explist.proto $(NEWSCTL)/explist ; fi
  586.   
  587.   expire: expire.o $(LIBS)
  588.       $(CC) $(LDFLAGS) expire.o $(PRE) $(LIBS) $(DBM) $(POST) -o $@
  589. ***************
  590. *** 40,45 ****
  591.       $(CC) $(LDFLAGS) histinfo.o $(PRE) $(LIBS) $(POST) -o $@
  592.   
  593. ! lowest:    lowest.o $(LIBS)
  594. !     $(CC) $(LDFLAGS) lowest.o $(PRE) $(LIBS) $(POST) -o $@
  595.   
  596.   histslash:    histslash.o $(LIBS)
  597. --- 41,46 ----
  598.       $(CC) $(LDFLAGS) histinfo.o $(PRE) $(LIBS) $(POST) -o $@
  599.   
  600. ! updatemin:    updatemin.o $(LIBS)
  601. !     $(CC) $(LDFLAGS) updatemin.o $(PRE) $(LIBS) $(POST) -o $@
  602.   
  603.   histslash:    histslash.o $(LIBS)
  604. ***************
  605. *** 98,102 ****
  606.       echo 'foo 00099 00001 y' >>active.after
  607.       echo 'bar 00099 00000 m' >>active
  608. !     echo 'bar 00099 00099 m' >>active.after
  609.       echo 'bar.ugh 00099 00000 m' >>active
  610.       echo 'bar.ugh 00099 00099 m' >>active.after
  611. --- 99,103 ----
  612.       echo 'foo 00099 00001 y' >>active.after
  613.       echo 'bar 00099 00000 m' >>active
  614. !     echo 'bar 00099 00100 m' >>active.after
  615.       echo 'bar.ugh 00099 00000 m' >>active
  616.       echo 'bar.ugh 00099 00099 m' >>active.after
  617. ***************
  618. *** 108,112 ****
  619.       echo 'mod.unmod 00016 00016 y' >>active.after
  620.       echo 'bletch 00099 00000 y' >>active
  621. !     echo 'bletch 00099 00099 y' >>active.after
  622.       echo '<wont1>    9999~-    foo/1' >>history.proto
  623.       echo :foo/1: >arts/foo/1
  624. --- 109,113 ----
  625.       echo 'mod.unmod 00016 00016 y' >>active.after
  626.       echo 'bletch 00099 00000 y' >>active
  627. !     echo 'bletch 00099 00100 y' >>active.after
  628.       echo '<wont1>    9999~-    foo/1' >>history.proto
  629.       echo :foo/1: >arts/foo/1
  630. ***************
  631. *** 187,191 ****
  632.   
  633.   # the regression test proper
  634. ! r:    $(THEM) dircheck setup tgood pgood
  635.       chmod +x dircheck $(THEM)
  636.       $(RUN) -c explist
  637. --- 188,192 ----
  638.   
  639.   # the regression test proper
  640. ! r:    $(THEM) $(UPACT) dircheck setup tgood pgood
  641.       chmod +x dircheck $(THEM)
  642.       $(RUN) -c explist
  643. ***************
  644. *** 213,217 ****
  645.       cmp history history.after
  646.       : "that's it for expire, on to upact"
  647. !     $(D) ./upact
  648.       cmp active active.after
  649.       : "and for upact, on to mkhistory"
  650. --- 214,218 ----
  651.       cmp history history.after
  652.       : "that's it for expire, on to upact"
  653. !     $(D) ./$(UPACT)
  654.       cmp active active.after
  655.       : "and for upact, on to mkhistory"
  656. ***************
  657. *** 230,233 ****
  658. --- 231,254 ----
  659.       : "success!"
  660.   
  661. + # variant regression test for -r
  662. + rr:    $(THEM) $(UPACT) dircheck setup tgood pgood
  663. +     chmod +x dircheck $(THEM)
  664. +     $(RUN) -p -r explist >test.out 2>test.stderr
  665. +     test ! -s test.stderr ;
  666. +     cmp test.out pgood
  667. +     cmp history.proto history
  668. +     egrep wont history.proto | ./dircheck arts
  669. +     egrep 'will|two|gone|three' history.proto | ./dircheck -n arts
  670. +     egrep will history.proto | ./dircheck arch
  671. +     egrep 'wont|two|gone|three' history.proto | ./dircheck -n arch
  672. +     egrep two history.proto | ./dircheck arch2
  673. +     egrep 'will|wont|gone|three' history.proto | ./dircheck -n arch2
  674. +     egrep three history.proto | ./dircheck arch3
  675. +     egrep 'will|wont|gone|two' history.proto | ./dircheck -n arch3
  676. +     test -f arts/foo/99 ;
  677. +     test -f arts/bar/ugh/99 ;
  678. +     test -f arch2/bar/99 ;
  679. +     test ! -f arts/urp/99 ;
  680. + 
  681.   tidy:
  682.       rm -f junk history history.pag history.dir history.o active
  683. ***************
  684. *** 237,242 ****
  685.   
  686.   clean:    tidy
  687. !     rm -f *.o expire histslash mkdbm histinfo lowest explist.proto
  688. !     rm -f dtr
  689.   
  690.   spotless:    clean    # don't run this unless you know what you're doing
  691. --- 258,263 ----
  692.   
  693.   clean:    tidy
  694. !     rm -f *.o expire histslash mkdbm histinfo explist.proto
  695. !     rm -f dtr updatemin
  696.   
  697.   spotless:    clean    # don't run this unless you know what you're doing
  698.  
  699. *** cnpatch/tmp.file    Tue Aug 22 14:06:35 1989
  700. --- expire/README    Sun Aug 20 01:24:03 1989
  701. ***************
  702. *** 22,28 ****
  703.   dircheck checks the results of expire regression testing.
  704.   histdups, histinfo, histslash, and mkdbm are parts of mkhistory.
  705. ! lowest is an optimized version of part of upact -- it's faster, but it's
  706.       also the only thing in C News that needs to know how to read
  707.       directories, which is a portability hassle, so it's not the default.
  708.   pgood and tgood are regression-test output-should-look-like-this files.
  709.   mkadir is what expire invokes to create archiving subdirectories.
  710. --- 22,31 ----
  711.   dircheck checks the results of expire regression testing.
  712.   histdups, histinfo, histslash, and mkdbm are parts of mkhistory.
  713. ! updatemin is a C version of upact -- it's vastly faster, but it's
  714.       also the only thing in C News that needs to know how to read
  715.       directories, which is a portability hassle, so it's not the default.
  716. +     Compile it with -DBERKDIR if you have 4BSD directory functions
  717. +     rather than standard (POSIX) ones.  "make r UPACT=updatemin"
  718. +     will include it in the regression test.
  719.   pgood and tgood are regression-test output-should-look-like-this files.
  720.   mkadir is what expire invokes to create archiving subdirectories.
  721.  
  722. *** cnpatch/tmp.file    Tue Aug 22 14:06:38 1989
  723. --- expire/expire.c    Sun Aug 20 03:21:09 1989
  724. ***************
  725. *** 75,78 ****
  726. --- 75,79 ----
  727.   int leaders = 0;        /* only first link ("leader") is hard link */
  728.   int verbose = 0;        /* report statistics */
  729. + int rebuild = 1;        /* rebuild history files */
  730.   
  731.   long nkept = 0;            /* count of articles not expired */
  732. ***************
  733. *** 165,169 ****
  734.       ftime(&ftnow);
  735.   
  736. !     while ((c = getopt(argc, argv, "pa:sF:cn:tlvd")) != EOF)
  737.           switch (c) {
  738.           case 'p':    /* print info line for archived articles */
  739. --- 166,170 ----
  740.       ftime(&ftnow);
  741.   
  742. !     while ((c = getopt(argc, argv, "pa:sF:cn:tlvrd")) != EOF)
  743.           switch (c) {
  744.           case 'p':    /* print info line for archived articles */
  745. ***************
  746. *** 194,197 ****
  747. --- 195,201 ----
  748.               verbose = 1;
  749.               break;
  750. +         case 'r':    /* suppress history-file rebuild */
  751. +             rebuild = 0;
  752. +             break;
  753.           case 'd':    /* debug */
  754.               expdebug = 1;
  755. ***************
  756. *** 431,444 ****
  757.       if (old < 0)
  758.           fail("cannot open `%s'", "history");
  759. !     (void) unlink("history.n");
  760. !     (void) unlink("history.n.dir");
  761. !     (void) unlink("history.n.pag");
  762. !     if (spacetight)
  763. !         (void) unlink("history.o");
  764. !     new = eufopen("history.n", "w");
  765. !     (void) fclose(eufopen("history.n.dir", "w"));
  766. !     (void) fclose(eufopen("history.n.pag", "w"));
  767. !     if (dbminit("history.n") < 0)
  768. !         fail("dbminit(history.n) failed", "");
  769.   
  770.       cd(artfile((char *)NULL));
  771. --- 435,450 ----
  772.       if (old < 0)
  773.           fail("cannot open `%s'", "history");
  774. !     if (rebuild) {
  775. !         (void) unlink("history.n");
  776. !         (void) unlink("history.n.dir");
  777. !         (void) unlink("history.n.pag");
  778. !         if (spacetight)
  779. !             (void) unlink("history.o");
  780. !         new = eufopen("history.n", "w");
  781. !         (void) fclose(eufopen("history.n.dir", "w"));
  782. !         (void) fclose(eufopen("history.n.pag", "w"));
  783. !         if (dbminit("history.n") < 0)
  784. !             fail("dbminit(history.n) failed", "");
  785. !     }
  786.   
  787.       cd(artfile((char *)NULL));
  788. ***************
  789. *** 445,449 ****
  790.       while ((line = readline(old)) != NULL) {
  791.           line = doline(line);
  792. !         if (line != NULL) {
  793.               /* extract the message-id */
  794.               nameend = strchr(line, '\t');
  795. --- 451,455 ----
  796.       while ((line = readline(old)) != NULL) {
  797.           line = doline(line);
  798. !         if (line != NULL && rebuild) {
  799.               /* extract the message-id */
  800.               nameend = strchr(line, '\t');
  801. ***************
  802. *** 469,474 ****
  803.               fputs(line, new);
  804.               putc('\n', new);
  805. -             free(line);
  806.           }
  807.       }
  808.       /* side effect of readline() == NULL:  newslock() */
  809. --- 475,481 ----
  810.               fputs(line, new);
  811.               putc('\n', new);
  812.           }
  813. +         if (line != NULL)
  814. +             free(line);
  815.       }
  816.       /* side effect of readline() == NULL:  newslock() */
  817. ***************
  818. *** 475,504 ****
  819.   
  820.       (void) close(old);
  821. !     eufclose(new, "history.n");
  822.   
  823.       if (testing)
  824.           return;
  825. !     cd(ctlfile((char *)NULL));
  826. !     (void) unlink("history.o");
  827. !     if (link("history", "history.o") < 0)
  828. !         fail("can't move history", "");
  829. !     if (unlink("history") < 0)
  830. !         fail("can't finish moving history", "");
  831. !     if (link("history.n", "history") < 0)
  832. !         fail("disaster -- can't reinstate history!", "");
  833. !     if (unlink("history.n") < 0)
  834. !         fail("disaster -- can't unlink history.n!", "");
  835. !     if (unlink("history.dir") < 0)
  836. !         fail("disaster -- can't unlink history.dir!", "");
  837. !     if (unlink("history.pag") < 0)
  838. !         fail("disaster -- can't unlink history.pag!", "");
  839. !     if (link("history.n.dir", "history.dir") < 0)
  840. !         fail("disaster -- can't reinstate history.dir!", "");
  841. !     if (link("history.n.pag", "history.pag") < 0)
  842. !         fail("disaster -- can't reinstate history.pag!", "");
  843. !     if (unlink("history.n.dir") < 0)
  844. !         fail("disaster -- can't unlink history.n.dir!", "");
  845. !     if (unlink("history.n.pag") < 0)
  846. !         fail("disaster -- can't unlink history.n.pag!", "");
  847.   }
  848.   
  849. --- 482,514 ----
  850.   
  851.       (void) close(old);
  852. !     if (rebuild)
  853. !         eufclose(new, "history.n");
  854.   
  855.       if (testing)
  856.           return;
  857. !     if (rebuild) {
  858. !         cd(ctlfile((char *)NULL));
  859. !         (void) unlink("history.o");
  860. !         if (link("history", "history.o") < 0)
  861. !             fail("can't move history", "");
  862. !         if (unlink("history") < 0)
  863. !             fail("can't finish moving history", "");
  864. !         if (link("history.n", "history") < 0)
  865. !             fail("disaster -- can't reinstate history!", "");
  866. !         if (unlink("history.n") < 0)
  867. !             fail("disaster -- can't unlink history.n!", "");
  868. !         if (unlink("history.dir") < 0)
  869. !             fail("disaster -- can't unlink history.dir!", "");
  870. !         if (unlink("history.pag") < 0)
  871. !             fail("disaster -- can't unlink history.pag!", "");
  872. !         if (link("history.n.dir", "history.dir") < 0)
  873. !             fail("disaster -- can't reinstate history.dir!", "");
  874. !         if (link("history.n.pag", "history.pag") < 0)
  875. !             fail("disaster -- can't reinstate history.pag!", "");
  876. !         if (unlink("history.n.dir") < 0)
  877. !             fail("disaster -- can't unlink history.n.dir!", "");
  878. !         if (unlink("history.n.pag") < 0)
  879. !             fail("disaster -- can't unlink history.n.pag!", "");
  880. !     }
  881.   }
  882.   
  883.  
  884. *** cnpatch/tmp.file    Tue Aug 22 14:06:42 1989
  885. --- expire/histinfo.c    Tue Aug 22 13:48:05 1989
  886. ***************
  887. *** 67,71 ****
  888.   char *inname;
  889.   {
  890. !     char *nl, *files;
  891.       char line[MAXLINE], msgid[MAXLINE], expiry[MAXLINE];
  892.       char datercv[30];
  893. --- 67,71 ----
  894.   char *inname;
  895.   {
  896. !     char *nl, *name;
  897.       char line[MAXLINE], msgid[MAXLINE], expiry[MAXLINE];
  898.       char datercv[30];
  899. ***************
  900. *** 74,77 ****
  901. --- 74,78 ----
  902.       static char expnm[] =    "Expires: ";
  903.       register char *p;
  904. +     static char trash[] = "<swill@trash>";
  905.       extern char *strrchr();
  906.       extern char *strchr();
  907. ***************
  908. *** 80,84 ****
  909.       /* set defaults */
  910.       (void) strcpy(expiry, "-");
  911. !     (void) strcpy(msgid, "<swill@trash>");
  912.   
  913.       /* read until EOF or blank line (end of headers) */
  914. --- 81,85 ----
  915.       /* set defaults */
  916.       (void) strcpy(expiry, "-");
  917. !     (void) strcpy(msgid, trash);
  918.   
  919.       /* read until EOF or blank line (end of headers) */
  920. ***************
  921. *** 93,100 ****
  922.   
  923.       /* generate the file name */
  924. !     files = inname;
  925. !     if (strncmp(files, spdir, spdirlen) == 0 &&
  926. !         files[spdirlen] == '/')
  927. !         files += spdirlen + 1;    /* skip spool dir. & slash */
  928.   
  929.       /* generate the date received */
  930. --- 94,101 ----
  931.   
  932.       /* generate the file name */
  933. !     name = inname;
  934. !     if (strncmp(name, spdir, spdirlen) == 0 &&
  935. !         name[spdirlen] == '/')
  936. !         name += spdirlen + 1;    /* skip spool dir. & slash */
  937.   
  938.       /* generate the date received */
  939. ***************
  940. *** 106,109 ****
  941. --- 107,116 ----
  942.           *p = ' ';
  943.   
  944. +     /* deal with empty and trash articles */
  945. +     if (strcmp(msgid, trash) == 0) {
  946. +         (void) sprintf(msgid, "<%s@trash>", name);
  947. +         (void) sprintf(datercv, "0");        /* expire at once */
  948. +     }
  949. + 
  950.       /* whomp out the history line */
  951.       (void) fputs(msgid, stdout);
  952. ***************
  953. *** 113,117 ****
  954.       (void) fputs(expiry, stdout);
  955.       (void) putchar('\t');
  956. !     (void) fputs(files, stdout);
  957.       (void) putchar('\n');
  958.       (void) fflush(stdout);
  959. --- 120,124 ----
  960.       (void) fputs(expiry, stdout);
  961.       (void) putchar('\t');
  962. !     (void) fputs(name, stdout);
  963.       (void) putchar('\n');
  964.       (void) fflush(stdout);
  965.  
  966. *** cnpatch/tmp.file    Tue Aug 22 14:06:46 1989
  967. --- expire/mkdbm.c    Sun Aug 20 00:45:54 1989
  968. ***************
  969. *** 25,29 ****
  970.       close(creat("hist.dir", 0666));
  971.       close(creat("hist.pag", 0666));
  972. !     dbminit("hist");
  973.   
  974.       for (;;) {
  975. --- 25,30 ----
  976.       close(creat("hist.dir", 0666));
  977.       close(creat("hist.pag", 0666));
  978. !     if (dbminit("hist") < 0)
  979. !         error("unable to do dbminit(\"hist\")", "");
  980.   
  981.       for (;;) {
  982.  
  983. *** cnpatch/tmp.file    Tue Aug 22 14:06:47 1989
  984. --- expire/mkhistory    Tue Aug 22 14:04:51 1989
  985. ***************
  986. *** 27,35 ****
  987.   
  988.   cd $NEWSCTL
  989. ! if egrep '^<swill@trash>    ' history.n >/dev/null
  990.   then
  991. !     echo "$0: <swill@trash> found in history.n -- aborting" >&2
  992. !     echo "$0: (some article lacks a Message-ID)" >&2
  993. !     exit 1
  994.   fi
  995.   mkdbm <history.n
  996. --- 27,34 ----
  997.   
  998.   cd $NEWSCTL
  999. ! if egrep '^<[^>]*@trash>    ' history.n >/dev/null
  1000.   then
  1001. !     echo "$0: (warning) empty/trash articles found, will expire at once" >&2
  1002. !     echo "$0:     (grep history file for '@trash' to see them)" >&2
  1003.   fi
  1004.   mkdbm <history.n
  1005.  
  1006. *** cnpatch/tmp.file    Tue Aug 22 14:06:51 1989
  1007. --- expire/upact    Sun Aug 20 00:37:04 1989
  1008. ***************
  1009. *** 39,47 ****
  1010.       if test -d $NEWSARTS/$dir
  1011.       then
  1012. -         # min=`lowest $NEWSARTS/$dir`
  1013.           min=`ls $NEWSARTS/$dir | egrep '^[0-9]+$' | sort -nr | tail -1`
  1014.       fi
  1015. !     case "$min" in        # no files, so
  1016. !     "")    min=$max ;;    # use maximum
  1017.       esac
  1018.       case "$min" in
  1019. --- 39,46 ----
  1020.       if test -d $NEWSARTS/$dir
  1021.       then
  1022.           min=`ls $NEWSARTS/$dir | egrep '^[0-9]+$' | sort -nr | tail -1`
  1023.       fi
  1024. !     case "$min" in        # no files, so use max+1
  1025. !     "")    min=`awk "END{ print $max + 1 }" /dev/null`    ;;
  1026.       esac
  1027.       case "$min" in
  1028.  
  1029. *** cnpatch/tmp.file    Tue Aug 22 14:07:03 1989
  1030. --- input/Makefile    Tue Aug  8 12:24:05 1989
  1031. ***************
  1032. *** 25,32 ****
  1033.       rnews.8 bdecode.c recenews recpnews
  1034.   
  1035. ! all:    $(THEM) rnews
  1036. !     chmod +x $(THEM) rnews
  1037.   
  1038. ! bininstall:    $(THEM) rnews
  1039.       -if test ! -d $(NEWSBIN)/input ; then mkdir $(NEWSBIN)/input ; fi
  1040.       rm -f $(NEWSBIN)/input/newsspool
  1041. --- 25,32 ----
  1042.       rnews.8 bdecode.c recenews recpnews
  1043.   
  1044. ! all:    $(THEM)
  1045. !     chmod +x $(THEM)
  1046.   
  1047. ! bininstall:    $(THEM)
  1048.       -if test ! -d $(NEWSBIN)/input ; then mkdir $(NEWSBIN)/input ; fi
  1049.       rm -f $(NEWSBIN)/input/newsspool
  1050. ***************
  1051. *** 35,38 ****
  1052. --- 35,44 ----
  1053.       cp rnews $(RBIN)/cunbatch
  1054.       : "and newsspool needs to be made setuid-news"
  1055. + 
  1056. + cmp:    $(THEM)
  1057. +     for f in $(THEM) ; do cmp $(NEWSBIN)/input/$$f $$f ; done
  1058. +     cmp rnews $(RBIN)/rnews
  1059. +     cmp rnews $(RBIN)/cunbatch
  1060. +     ls -lg $(NEWSBIN)/input/newsspool | egrep -s '^-rwsrwsr-x  1 news     news'
  1061.   
  1062.   newsinstall:
  1063.  
  1064. *** cnpatch/tmp.file    Tue Aug 22 14:07:06 1989
  1065. --- input/newsrun    Wed Aug  9 16:01:45 1989
  1066. ***************
  1067. *** 35,39 ****
  1068.       server=`cat $NEWSCTL/server`
  1069.   else
  1070. !     me=me            # don't need actual name
  1071.       server="$me"        # no server file --> we're it
  1072.   fi
  1073. --- 35,39 ----
  1074.       server=`cat $NEWSCTL/server`
  1075.   else
  1076. !     me=thishost        # don't need actual name
  1077.       server="$me"        # no server file --> we're it
  1078.   fi
  1079. ***************
  1080. *** 62,65 ****
  1081. --- 62,66 ----
  1082.   
  1083.       # Do it.
  1084. +     tmp=nruntmp.$$
  1085.       rmlist=
  1086.       for f in $them
  1087. ***************
  1088. *** 68,89 ****
  1089.           if test -r stop
  1090.           then
  1091. !             rm -f $rmlist
  1092.               exit 0
  1093.           fi
  1094.   
  1095. -         # Check for empty.
  1096. -         if test ! -s $f
  1097. -         then
  1098. -             rm -f $f
  1099. -             continue            # NOTE CONTINUE
  1100. -         fi
  1101. - 
  1102.           # Space check, if we're close.
  1103.           if test " $muchroom" != " y"
  1104.           then
  1105.               batchsize=`sizeof $f`
  1106.               if test " `spacefor $batchsize articles`" -le 0
  1107.               then
  1108. !                 rm -f $rmlist
  1109.                   exit 0
  1110.               fi
  1111. --- 69,85 ----
  1112.           if test -r stop
  1113.           then
  1114. !             rm -f $tmp $rmlist
  1115.               exit 0
  1116.           fi
  1117.   
  1118.           # Space check, if we're close.
  1119.           if test " $muchroom" != " y"
  1120.           then
  1121. +             rm -f $tmp $rmlist    # free up what we can
  1122. +             rmlist=
  1123.               batchsize=`sizeof $f`
  1124.               if test " `spacefor $batchsize articles`" -le 0
  1125.               then
  1126. !                 # already removed $tmp $rmlist
  1127.                   exit 0
  1128.               fi
  1129. ***************
  1130. *** 93,109 ****
  1131.           # uncompressed batches and never use c7 encoding might
  1132.           # want to remove the c7decode attempt to speed things up.
  1133. !         text=nruntmp.$$
  1134.           if compress -d <$f >$text 2>/dev/null
  1135.           then
  1136. !             rmlist="$rmlist $f $text"
  1137.           elif c7decode <$f 2>/dev/null | compress -d >$text 2>/dev/null
  1138.           then
  1139. !             rmlist="$rmlist $f $text"
  1140.           else
  1141. -             rm -f $text
  1142.               text=$f
  1143. -             rmlist="$rmlist $f"
  1144.           fi
  1145.   
  1146.           # Do it.  -r redirects stdout and stderr into logs.  -n makes
  1147.           # history entries for refused articles; this is right for
  1148. --- 89,110 ----
  1149.           # uncompressed batches and never use c7 encoding might
  1150.           # want to remove the c7decode attempt to speed things up.
  1151. !         text=$tmp
  1152.           if compress -d <$f >$text 2>/dev/null
  1153.           then
  1154. !             : okay
  1155.           elif c7decode <$f 2>/dev/null | compress -d >$text 2>/dev/null
  1156.           then
  1157. !             : okay
  1158.           else
  1159.               text=$f
  1160.           fi
  1161. +         rmlist="$rmlist $f"
  1162.   
  1163. +         # Check for empty.
  1164. +         if test ! -s $text
  1165. +         then
  1166. +             continue            # NOTE CONTINUE
  1167. +         fi
  1168. + 
  1169.           # Do it.  -r redirects stdout and stderr into logs.  -n makes
  1170.           # history entries for refused articles; this is right for
  1171. ***************
  1172. *** 138,142 ****
  1173.                   mv $f $bad    # Not $text, save the ORIGINAL!
  1174.               fi
  1175. !             echo "$server $consumer \`$bad' failed, status $st" |
  1176.                               mail "$NEWSMASTER"
  1177.           fi
  1178. --- 139,143 ----
  1179.                   mv $f $bad    # Not $text, save the ORIGINAL!
  1180.               fi
  1181. !             echo "$server relaynews \`$bad' failed, status $st" |
  1182.                               mail "$NEWSMASTER"
  1183.           fi
  1184. ***************
  1185. *** 143,147 ****
  1186.   
  1187.       done
  1188. !     rm -f $rmlist
  1189.   done
  1190.   
  1191. --- 144,148 ----
  1192.   
  1193.       done
  1194. !     rm -f $tmp $rmlist
  1195.   done
  1196.   
  1197.  
  1198. *** cnpatch/tmp.file    Tue Aug 22 14:07:08 1989
  1199. --- input/newsspool.c    Sun Aug 20 00:43:48 1989
  1200. ***************
  1201. *** 197,202 ****
  1202.       extern int errno;
  1203.   
  1204. !     if (fclose(f) == EOF)
  1205. !         error("fclose error on file `%s'", tmpname);
  1206.   
  1207.       p = fullartfile("in.coming/");
  1208. --- 197,202 ----
  1209.       extern int errno;
  1210.   
  1211. !     if (nfclose(f) == EOF)
  1212. !         error("close error on file `%s'", tmpname);
  1213.   
  1214.       p = fullartfile("in.coming/");
  1215.  
  1216. *** cnpatch/tmp.file    Tue Aug 22 14:07:49 1989
  1217. --- man/inews.1    Sun Aug  6 00:42:31 1989
  1218. ***************
  1219. *** 7,11 ****
  1220.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1221.   .ds m usenet
  1222. ! .TH INEWS 1 "6 July 1989" "C News"
  1223.   .SH NAME
  1224.   inews \- `user-friendly' news-posting front-end for relaynews
  1225. --- 7,11 ----
  1226.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1227.   .ds m usenet
  1228. ! .TH INEWS 1 "6 Aug 1989" "C News"
  1229.   .SH NAME
  1230.   inews \- `user-friendly' news-posting front-end for relaynews
  1231. ***************
  1232. *** 177,185 ****
  1233.   and
  1234.   .B \-C
  1235. ! generates
  1236. ! .BI "Control: newgroup" " newsgroup"
  1237. ! and
  1238. ! .BI "Newsgroups:" " newsgroup"
  1239. ! headers.
  1240.   .SH FILES
  1241.   .PD 0
  1242. --- 177,186 ----
  1243.   and
  1244.   .B \-C
  1245. ! tells you to use
  1246. ! .I addgroup
  1247. ! for local group creations
  1248. ! and tells you what to feed to
  1249. ! .B "inews -h"
  1250. ! for global ones.
  1251.   .SH FILES
  1252.   .PD 0
  1253. ***************
  1254. *** 213,217 ****
  1255.   .SH "SEE ALSO"
  1256.   .IR mail (1),
  1257. ! .IR rnews (1)
  1258.   .SH DIAGNOSTICS
  1259.   .I inews
  1260. --- 214,219 ----
  1261.   .SH "SEE ALSO"
  1262.   .IR mail (1),
  1263. ! .IR rnews (1),
  1264. ! .IR newsaux (8)
  1265.   .SH DIAGNOSTICS
  1266.   .I inews
  1267.  
  1268. *** cnpatch/tmp.file    Tue Aug 22 14:07:51 1989
  1269. --- man/newsaux.8    Sat Aug 19 23:10:27 1989
  1270. ***************
  1271. *** 7,11 ****
  1272.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1273.   .ds m usenet
  1274. ! .TH NEWSAUX 8 "4 July 1989" "C News"
  1275.   .SH NAME
  1276.   spacefor \- check available space for news
  1277. --- 7,11 ----
  1278.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1279.   .ds m usenet
  1280. ! .TH NEWSAUX 8 "19 Aug 1989" "C News"
  1281.   .SH NAME
  1282.   spacefor \- check available space for news
  1283. ***************
  1284. *** 34,37 ****
  1285. --- 34,39 ----
  1286.   .br
  1287.   addgroup, delgroup \- add and delete newsgroups, locally only
  1288. + .br
  1289. + adddirs \- make any missing directories for active newsgroups
  1290.   .SH SYNOPSIS
  1291.   .B \*b/spacefor
  1292. ***************
  1293. *** 79,82 ****
  1294. --- 81,86 ----
  1295.   .B \*b/maint/delgroup
  1296.   group
  1297. + .br
  1298. + .B \*b/maint/adddirs
  1299.   .SH DESCRIPTION
  1300.   These programs are minor utilities used by various parts of C News.
  1301. ***************
  1302. *** 180,183 ****
  1303. --- 184,197 ----
  1304.   The effect is purely local; no control message (to propagate the
  1305.   change to other machines) is sent.
  1306. + .PP
  1307. + .I Adddirs
  1308. + sweeps through the \fIactive\fR file checking that directories exist for
  1309. + all newsgroups.
  1310. + (\fIRelaynews\fR
  1311. + will create directories as needed, but some
  1312. + user-interface software gets upset if a newsgroup exists but its directory
  1313. + does not.)
  1314. + This is mostly useful when adding groups in bulk, based on another site's
  1315. + \fIactive\fR file.
  1316.   .SH FILES
  1317.   .ta 6c
  1318. ***************
  1319. *** 217,220 ****
  1320. --- 231,238 ----
  1321.   are unfortunately somewhat system-specific, since \fIdf\fR output and
  1322.   \fIuucp\fR file layout vary between different versions.
  1323. + .PP
  1324. + .I Queuelen
  1325. + probably ought to count bytes rather than batches, but that would make
  1326. + its system-dependency even worse.
  1327.   .PP
  1328.   The need for \fIsizeof\fR and \fInewslock\fR is a botch.
  1329.  
  1330. *** cnpatch/tmp.file    Tue Aug 22 14:07:52 1989
  1331. --- man/newsbatch.8    Sun Aug 20 03:24:09 1989
  1332. ***************
  1333. *** 7,11 ****
  1334.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1335.   .ds m usenet
  1336. ! .TH NEWSBATCH 8 "17 July 1989" "C News"
  1337.   .SH NAME
  1338.   sendbatches, batchsplit \- news batching to other sites
  1339. --- 7,11 ----
  1340.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1341.   .ds m usenet
  1342. ! .TH NEWSBATCH 8 "19 Aug 1989" "C News"
  1343.   .SH NAME
  1344.   sendbatches, batchsplit \- news batching to other sites
  1345. ***************
  1346. *** 17,21 ****
  1347.   c7encode, bencode \- compressed-news-batch encoding
  1348.   .br
  1349. ! viauux, viainews, viamail, viapmail \- news-batch transmission
  1350.   .SH SYNOPSIS
  1351.   .B \*b/batch/sendbatches
  1352. --- 17,23 ----
  1353.   c7encode, bencode \- compressed-news-batch encoding
  1354.   .br
  1355. ! viauux, viauuxz, viainews \- news-batch transmission
  1356. ! .br
  1357. ! viamail, viaemail, viapmail \- news-batch transmission via mail
  1358.   .SH SYNOPSIS
  1359.   .B \*b/batch/sendbatches
  1360. ***************
  1361. *** 63,66 ****
  1362. --- 65,71 ----
  1363.   .B \&.../viauux
  1364.   site
  1365. + .br    
  1366. + .B \&.../viauuxz
  1367. + site
  1368.   .br
  1369.   .B \&.../viainews
  1370. ***************
  1371. *** 70,73 ****
  1372. --- 75,81 ----
  1373.   site
  1374.   .br
  1375. + .B \&.../viaemail
  1376. + site
  1377. + .br
  1378.   .B \&.../viapmail
  1379.   site
  1380. ***************
  1381. *** 202,205 ****
  1382. --- 210,216 ----
  1383.   .IP viauux 9
  1384.   normal transmission via UUCP
  1385. + .IP viauuxz
  1386. + like \fIviauux\fR except with \fB\-z\fR option given to \fIuux\fR
  1387. + (for old UUCPs where don't-report-result-on-zero-status is not default)
  1388.   .IP viainews
  1389.   feed the batch back to \fIinews\fR, ignoring the \fIsite\fR argument
  1390. ***************
  1391. *** 207,210 ****
  1392. --- 218,223 ----
  1393.   .IP viamail
  1394.   mail the batch to \fIsite\fB!rnews\fR
  1395. + .IP viaemail
  1396. + mail the batch to \fIsite\fB!enews\fR
  1397.   .IP viapmail
  1398.   mail the batch to \fIsite\fB!rnews\fR, attempting to
  1399. ***************
  1400. *** 266,268 ****
  1401.   .PP
  1402.   \fIViapmail\fR is obsolescent;
  1403. ! \fIviamail\fR with a batch encoded with \fIbencode\fR is vastly superior.
  1404. --- 279,281 ----
  1405.   .PP
  1406.   \fIViapmail\fR is obsolescent;
  1407. ! \fIviaemail\fR with a batch encoded with \fIbencode\fR is vastly superior.
  1408.  
  1409. *** cnpatch/tmp.file    Tue Aug 22 14:07:56 1989
  1410. --- misc/Makefile    Sat Aug 19 20:43:05 1989
  1411. ***************
  1412. *** 12,16 ****
  1413.   
  1414.   MAINTBIN=newshist
  1415. ! MAINT = $(MAINTBIN) newsdaily newswatch newsboot locknews addgroup delgroup
  1416.   UTILBIN = gngp newslock ctime getdate
  1417.   UTILS = $(UTILBIN) sizeof newshostname
  1418. --- 12,16 ----
  1419.   
  1420.   MAINTBIN=newshist
  1421. ! MAINT = $(MAINTBIN) newsdaily newswatch newsboot locknews addgroup delgroup adddirs
  1422.   UTILBIN = gngp newslock ctime getdate
  1423.   UTILS = $(UTILBIN) sizeof newshostname
  1424. ***************
  1425. *** 26,29 ****
  1426. --- 26,33 ----
  1427.       cp $(MAINT) $(NEWSBIN)/maint
  1428.       cp $(UTILS) $(NEWSBIN)
  1429. + 
  1430. + cmp:    $(THEM)
  1431. +     for f in $(MAINT) ; do cmp $(NEWSBIN)/maint/$$f $$f ; done
  1432. +     for f in $(UTILS) ; do cmp $(NEWSBIN)/$$f $$f ; done
  1433.   
  1434.   newsinstall:
  1435.  
  1436. *** cnpatch/tmp.file    Tue Aug 22 14:08:00 1989
  1437. --- misc/addgroup    Wed Aug 16 15:52:50 1989
  1438. ***************
  1439. *** 48,52 ****
  1440.   done
  1441.   
  1442. ! echo "$1 0000000000 0000000000 $2" >>$NEWSCTL/active
  1443.   mkpdir $NEWSARTS/`echo $1 | tr . /`
  1444.   
  1445. --- 48,52 ----
  1446.   done
  1447.   
  1448. ! echo "$1 0000000000 0000000001 $2" >>$NEWSCTL/active
  1449.   mkpdir $NEWSARTS/`echo $1 | tr . /`
  1450.   
  1451.  
  1452. *** cnpatch/tmp.file    Tue Aug 22 14:08:04 1989
  1453. --- misc/newsdaily    Sat Aug 19 20:34:19 1989
  1454. ***************
  1455. *** 53,70 ****
  1456.   # look for input anomalies
  1457.   cd $NEWSARTS/in.coming
  1458. ! them="`ls | egrep -v '^bad$'`"
  1459. ! if test " $them" != " "
  1460.   then
  1461. !     find $them -mtime +1 -print >$tmp    # old non-bad files lying about
  1462. !     if test -s $tmp
  1463. !     then
  1464. !         (
  1465. !             echo 'old input files:'
  1466. !             cat $tmp
  1467. !             echo
  1468. !         ) >>$gripes
  1469. !     fi
  1470.   fi
  1471. ! find bad -type f -mtime -2 -print >$tmp        # recent bad batches
  1472.   if test -s $tmp
  1473.   then
  1474. --- 53,66 ----
  1475.   # look for input anomalies
  1476.   cd $NEWSARTS/in.coming
  1477. ! find . -type f -mtime +1 -print | sed 's;^\./;;' | egrep -v '^bad/' >$tmp
  1478. ! if test -s $tmp        # old non-bad files lying about
  1479.   then
  1480. !     (
  1481. !         echo 'old input files:'
  1482. !         cat $tmp
  1483. !         echo
  1484. !     ) >>$gripes
  1485.   fi
  1486. ! find bad -type f -name '[0-9]*' -mtime -2 -print >$tmp    # recent bad batches
  1487.   if test -s $tmp
  1488.   then
  1489. ***************
  1490. *** 75,83 ****
  1491.       ) >>$gripes
  1492.   fi
  1493. ! find bad -type f -mtime +7 -exec rm -f '{}' ';'
  1494.   
  1495.   # look for output anomalies
  1496.   cd $NEWSARTS/out.going
  1497. ! find * -type f -name 'togo*' -size +0 -mtime +1 -print >$tmp
  1498.   if test -s $tmp
  1499.   then
  1500. --- 71,79 ----
  1501.       ) >>$gripes
  1502.   fi
  1503. ! find bad -type f -name '[0-9]*' -mtime +7 -exec rm -f '{}' ';'
  1504.   
  1505.   # look for output anomalies
  1506.   cd $NEWSARTS/out.going
  1507. ! find . -type f -name 'togo*' -size +0 -mtime +1 -print >$tmp
  1508.   if test -s $tmp
  1509.   then
  1510. ***************
  1511. *** 84,88 ****
  1512.       (
  1513.           echo 'batching possibly stalled for sites:'
  1514. !         sed 's;/.*;;' $tmp | sort -u
  1515.           echo
  1516.       ) >>$gripes
  1517. --- 80,97 ----
  1518.       (
  1519.           echo 'batching possibly stalled for sites:'
  1520. !         sed 's;^\./\([^/]*\)/.*;\1;' $tmp | sort -u
  1521. !         echo
  1522. !     ) >>$gripes
  1523. ! fi
  1524. ! 
  1525. ! # look for unknown newsgroups on input (misses cross-posted articles)
  1526. ! cd $NEWSCTL
  1527. ! egrep '`' log.o | egrep junked | sed 's/.*`\(.*\)'"'"'.*/\1/' | sort |
  1528. !     uniq -c | sort -nr | sed 5q >$tmp
  1529. ! if test -s $tmp
  1530. ! then
  1531. !     (
  1532. !         echo 'leading five unknown newsgroups by number of articles:'
  1533. !         cat $tmp
  1534.           echo
  1535.       ) >>$gripes
  1536.  
  1537. *** cnpatch/tmp.file    Tue Aug 22 14:08:19 1989
  1538. --- relay/README    Mon Aug 21 18:45:01 1989
  1539. ***************
  1540. *** 11,15 ****
  1541.   ctl    control-message shell files
  1542.   altctl    alternative, not recommended, versions of rmgroup and sendgroups
  1543. ! sh    shell files, including inews and postnews and their flunkies
  1544.   regress    regression-test facilities for relaynews
  1545.   
  1546. --- 11,15 ----
  1547.   ctl    control-message shell files
  1548.   altctl    alternative, not recommended, versions of rmgroup and sendgroups
  1549. ! sh    shell files, including inews and its flunkies
  1550.   regress    regression-test facilities for relaynews
  1551.   
  1552.  
  1553. *** cnpatch/tmp.file    Tue Aug 22 14:08:32 1989
  1554. --- relay/control.c    Sat Aug  5 23:32:52 1989
  1555. ***************
  1556. *** 186,189 ****
  1557. --- 186,190 ----
  1558.           (void) fprintf(stderr,
  1559.               "%s: control `%s' looks unsafe to execute\n", progname, ctlcmd);
  1560. +         (void) fflush(stderr);
  1561.           _exit(1);
  1562.       }
  1563. ***************
  1564. *** 193,196 ****
  1565. --- 194,198 ----
  1566.       if (cmd == NULL) {
  1567.           warning("can't allocate memory in runctlmsg", "");
  1568. +         (void) fflush(stderr);
  1569.           _exit(1);
  1570.       }
  1571. ***************
  1572. *** 228,231 ****
  1573. --- 230,234 ----
  1574.       if (mailcmd == NULL) {
  1575.           warning("can't allocate memory in bombctlmsg", "");
  1576. +         (void) fflush(stderr);
  1577.           _exit(1);
  1578.       }
  1579. ***************
  1580. *** 237,240 ****
  1581. --- 240,244 ----
  1582.           "%s: control message `%s' exited with status 0%o\n",
  1583.           progname, cmd, cmdstat);
  1584. +     (void) fflush(mailf);
  1585.       if (mailf != stderr)
  1586.           (void) pclose(mailf);
  1587.  
  1588. *** cnpatch/tmp.file    Tue Aug 22 14:08:35 1989
  1589. --- relay/ctl/newgroup    Wed Aug 16 15:53:05 1989
  1590. ***************
  1591. *** 47,51 ****
  1592.       *)        flag=y ;;
  1593.       esac
  1594. !     echo "$1 0000000000 0000000000 $flag" >>$NEWSCTL/active
  1595.       (echo "$1 `getdate now` $SENDER" >>$NEWSCTL/active.times)  # rn hook
  1596.       # make the directory since rn will bitch if it's missing
  1597. --- 47,51 ----
  1598.       *)        flag=y ;;
  1599.       esac
  1600. !     echo "$1 0000000000 0000000001 $flag" >>$NEWSCTL/active
  1601.       (echo "$1 `getdate now` $SENDER" >>$NEWSCTL/active.times)  # rn hook
  1602.       # make the directory since rn will bitch if it's missing
  1603.  
  1604. *** cnpatch/tmp.file    Tue Aug 22 14:08:44 1989
  1605. --- relay/makefile    Mon Aug 21 17:31:00 1989
  1606. ***************
  1607. *** 75,80 ****
  1608.       cp ctl/* $(NEWSBIN)/ctl
  1609.       cp aux/* $(NEWSBIN)/relay
  1610. !     ln $(NEWSBIN)/inject/postnews $(BIN)/postnews || cp sh/postnews $(BIN)
  1611.       ln $(NEWSBIN)/inject/inews $(BIN)/inews || cp sh/inews $(BIN)
  1612.   
  1613.   TODO.grep: TODO
  1614. --- 75,88 ----
  1615.       cp ctl/* $(NEWSBIN)/ctl
  1616.       cp aux/* $(NEWSBIN)/relay
  1617. !     rm -f $(BIN)/inews
  1618.       ln $(NEWSBIN)/inject/inews $(BIN)/inews || cp sh/inews $(BIN)
  1619. + 
  1620. + cmp:    relaynews
  1621. +     cmp $(NEWSBIN)/relay/relaynews relaynews
  1622. +     ls -lg $(NEWSBIN)/relay/relaynews | egrep -s '^-rwsrwsr-x  1 news     news'
  1623. +     for f in `ls sh` ; do cmp $(NEWSBIN)/inject/$$f sh/$$f ; done
  1624. +     for f in `ls ctl` ; do cmp $(NEWSBIN)/ctl/$$f ctl/$$f ; done
  1625. +     for f in `ls aux` ; do cmp $(NEWSBIN)/relay/$$f aux/$$f ; done
  1626. +     cmp $(BIN)/inews sh/inews
  1627.   
  1628.   TODO.grep: TODO
  1629.  
  1630. *** cnpatch/tmp.file    Tue Aug 22 14:09:04 1989
  1631. --- relay/sh/defhdrs.awk    Mon Aug  7 01:49:14 1989
  1632. ***************
  1633. *** 25,28 ****
  1634. --- 25,33 ----
  1635.       sendername = "Sender:"
  1636.   
  1637. +     # nullify headers with empty contents
  1638. +     for (i in hdrval)
  1639. +         if (hdrval[i] ~ /^[^\t ]*:[\t ]*$/)
  1640. +             hdrval[i] = ""
  1641. + 
  1642.       # fill in missing headers
  1643.       if (hdrval[typoname] != "") {    # spelling hack
  1644. ***************
  1645. *** 36,47 ****
  1646.               hdrval[msgidname] = hdrval[msgidname] " " fields[i]
  1647.       }
  1648.       if (hdrval[msgidname] == "")
  1649.           hdrval[msgidname] = msgidname " " defmsgid
  1650.       if (hdrval[orgname] == "")
  1651.           hdrval[orgname] = orgname " " deforg
  1652. - 
  1653. -     # replace users headers (if any)
  1654. -     hdrval[datename] = datename " " defdate
  1655. -     hdrval[pathname] = pathname " " defpath
  1656.       if (hdrval[fromname] == "")
  1657.           hdrval[fromname] = fromname " " deffrom
  1658. --- 41,52 ----
  1659.               hdrval[msgidname] = hdrval[msgidname] " " fields[i]
  1660.       }
  1661. +     if (hdrval[pathname] == "")
  1662. +         hdrval[pathname] = pathname " " defpath
  1663.       if (hdrval[msgidname] == "")
  1664.           hdrval[msgidname] = msgidname " " defmsgid
  1665. +     if (hdrval[datename] == "")
  1666. +         hdrval[datename] = datename " " defdate
  1667.       if (hdrval[orgname] == "")
  1668.           hdrval[orgname] = orgname " " deforg
  1669.       if (hdrval[fromname] == "")
  1670.           hdrval[fromname] = fromname " " deffrom
  1671. ***************
  1672. *** 48,51 ****
  1673. --- 53,58 ----
  1674.       else if (hdrval[sendername] == "")
  1675.           hdrval[sendername] = sendername " " deffrom
  1676. + 
  1677. +     # replace user's headers (if any) [this is not currently done]
  1678.   
  1679.       # snuff some headers
  1680.  
  1681. *** cnpatch/tmp.file    Tue Aug 22 14:09:05 1989
  1682. --- relay/sh/inews    Mon Aug  7 01:50:19 1989
  1683. ***************
  1684. *** 22,26 ****
  1685.   relayopts=-i            # redirect stdout to log
  1686.   
  1687. - whoami=/tmp/in$$who        # just created to determine effective uid
  1688.   input=/tmp/in$$in        # uncensored input
  1689.   inhdrs=/tmp/in$$hdr        # generated by tear: headers
  1690. --- 22,25 ----
  1691. ***************
  1692. *** 31,36 ****
  1693.   exitflag=/tmp/in$$exit        # exit status, if present
  1694.   outfile=/tmp/in$$out        # relaynews stdout
  1695.   grpok=/tmp/in$$grp        # flag file: groups okay if present
  1696. - rmlist="$inhdrs $inbody $input $censart $nglist $modroute $exitflag $outfile $grpok"
  1697.   
  1698.   umask $NEWSUMASK
  1699. --- 30,35 ----
  1700.   exitflag=/tmp/in$$exit        # exit status, if present
  1701.   outfile=/tmp/in$$out        # relaynews stdout
  1702. + rmlist="$inhdrs $inbody $input $censart $nglist $modroute $exitflag $outfile"
  1703.   grpok=/tmp/in$$grp        # flag file: groups okay if present
  1704.   
  1705.   umask $NEWSUMASK
  1706. ***************
  1707. *** 87,108 ****
  1708.       -o)    shift; ORGANIZATION="$1"; export ORGANIZATION ;;
  1709.   
  1710. !     -C)    # megakludge-o-rama
  1711. !         # first, permit only to super-users
  1712. !         >$whoami
  1713. !         case "`ls -l $whoami | awk '{print $3}'`" in
  1714. !         root)    : a winner ;;
  1715. !         *)
  1716. !             echo "$0: only super-users may create news groups" >&2
  1717. !             exit 1
  1718. !             ;;
  1719. !         esac
  1720. !         rm -f $whoami
  1721. !         shift            # skip -C to get ng as $1
  1722. !         cat <<! >>$input    # generate a control message
  1723. ! Newsgroups: $1
  1724. ! Control: newgroup $1
  1725. ! Subject: newgroup $1
  1726. ! Approved: above-user@above-host
  1727.   !
  1728.           ;;
  1729.       -*)
  1730. --- 86,103 ----
  1731.       -o)    shift; ORGANIZATION="$1"; export ORGANIZATION ;;
  1732.   
  1733. !     -C)
  1734. !         echo "$0: you either want to use addgroup (see newsaux(8)) to make" >&2
  1735. !         echo "$0: $2 locally or this to make it network-wide:" >&2
  1736. !         cat <<eg
  1737. ! inews -h <<'!'
  1738. ! Control: newgroup $2
  1739. ! Subject: newgroup $2
  1740. ! Newsgroups: $2
  1741. ! Approved: you@hostname
  1742. ! 
  1743. ! Non-empty.
  1744.   !
  1745. + eg
  1746. +         exit 1
  1747.           ;;
  1748.       -*)
  1749. ***************
  1750. *** 219,223 ****
  1751.   # n, x and (unapproved) m flags are dealt with on the spot; if none are
  1752.   # seen, the article is posted normally.
  1753. ! # escape egrep metacharacters.  In theory one could add " ' ` \
  1754.   egreppat="^(` sed -e 's/[.+*()|[]/\\\\&/g' -e 's/,/|/g' <$nglist `) "
  1755.   egrep "$egreppat" $NEWSCTL/active >/dev/null || {
  1756. --- 214,218 ----
  1757.   # n, x and (unapproved) m flags are dealt with on the spot; if none are
  1758.   # seen, the article is posted normally.
  1759. ! # escape egrep metacharacters.  In theory one could add " ' ` \ to the list.
  1760.   egreppat="^(` sed -e 's/[.+*()|[]/\\\\&/g' -e 's/,/|/g' <$nglist `) "
  1761.   egrep "$egreppat" $NEWSCTL/active >/dev/null || {
  1762. ***************
  1763. *** 233,238 ****
  1764.           [nx])
  1765.               echo "$0: sorry, $ng may not be posted to locally." >&2
  1766.               echo 1 >$exitflag
  1767. -             trap 0        # this is a child process - no cleanup
  1768.               exit 1        # dregs in /tmp/in$$*
  1769.               ;;
  1770. --- 228,233 ----
  1771.           [nx])
  1772.               echo "$0: sorry, $ng may not be posted to locally." >&2
  1773. +             trap 0        # this is a child process - no cleanup here
  1774.               echo 1 >$exitflag
  1775.               exit 1        # dregs in /tmp/in$$*
  1776.               ;;
  1777. ***************
  1778. *** 267,273 ****
  1779.                   echo "$0: mailing your article to $moderator" >&2
  1780.                   mail $moderator <$censart
  1781. !                 rm -f $rmlist
  1782.                   echo 0 >$exitflag
  1783. -                 trap 0    # this is a child process - did cleanup
  1784.                   exit 0
  1785.               fi
  1786. --- 262,267 ----
  1787.                   echo "$0: mailing your article to $moderator" >&2
  1788.                   mail $moderator <$censart
  1789. !                 trap 0    # this is a child process - no cleanup here
  1790.                   echo 0 >$exitflag
  1791.                   exit 0
  1792.               fi
  1793. ***************
  1794. *** 288,297 ****
  1795.       exit 1            # abnormal exit - cleans up, makes dead.article
  1796.   fi
  1797.   if test -f $exitflag; then
  1798.       exitstatus="`cat $exitflag`"
  1799.       case "$exitstatus" in
  1800. !     0)    trap 0 ;;    # normal exit - cleanup done, no dead.article
  1801.       esac
  1802. !     exit $exitstatus    # trap 0 will cleanup, make dead.article
  1803.   fi
  1804.   
  1805. --- 282,292 ----
  1806.       exit 1            # abnormal exit - cleans up, makes dead.article
  1807.   fi
  1808. + rm -f $grpok
  1809.   if test -f $exitflag; then
  1810.       exitstatus="`cat $exitflag`"
  1811.       case "$exitstatus" in
  1812. !     0)    rm -f $rmlist; trap 0 ;; # normal exit - cleanup, no dead.article
  1813.       esac
  1814. !     exit $exitstatus    # trap 0 may cleanup, make dead.article
  1815.   fi
  1816.   
  1817.  
  1818. *** cnpatch/tmp.file    Tue Aug 22 14:09:19 1989
  1819. --- rna/makefile    Mon Aug 21 19:31:57 1989
  1820. ***************
  1821. *** 24,28 ****
  1822.   FILES = help
  1823.   LCOMMANDS = postnews.lint uurec.lint readnews.lint uusend.lint expire.lint
  1824. ! PFILES = header.c postnews.c funcs.c active.c history.c maketime.c mtempnam.c
  1825.   RFILES = header.c readnews.c funcs.c active.c newsrc.c history.c maketime.c
  1826.   ROFILES= header.o readnews.o funcs.o active.o newsrc.o history.o maketime.o
  1827. --- 24,29 ----
  1828.   FILES = help
  1829.   LCOMMANDS = postnews.lint uurec.lint readnews.lint uusend.lint expire.lint
  1830. ! # PFILES = header.c postnews.c funcs.c active.c history.c maketime.c mtempnam.c
  1831. ! PFILES = header.c funcs.c active.c history.c maketime.c mtempnam.c
  1832.   RFILES = header.c readnews.c funcs.c active.c newsrc.c history.c maketime.c
  1833.   ROFILES= header.o readnews.o funcs.o active.o newsrc.o history.o maketime.o
  1834. ***************
  1835. *** 39,44 ****
  1836.       $(INSTALL) -c $*.sh bin 755 $@
  1837.   
  1838. ! all: readnews checknews
  1839. !     chmod +x checknews
  1840.       : warning, defs.h may not be right for your system
  1841.   
  1842. --- 40,45 ----
  1843.       $(INSTALL) -c $*.sh bin 755 $@
  1844.   
  1845. ! all: readnews checknews postnews
  1846. !     chmod +x checknews postnews
  1847.       : warning, defs.h may not be right for your system
  1848.   
  1849. ***************
  1850. *** 52,56 ****
  1851.   # bininstall: make directories, install programs
  1852.   bininstall: install
  1853. ! install: $(BINDIR)/readnews $(BINDIR)/checknews
  1854.   $(BINDIR)/readnews: readnews
  1855.       cp readnews $(BINDIR)
  1856. --- 53,57 ----
  1857.   # bininstall: make directories, install programs
  1858.   bininstall: install
  1859. ! install: $(BINDIR)/readnews $(BINDIR)/checknews $(BINDIR)/postnews
  1860.   $(BINDIR)/readnews: readnews
  1861.       cp readnews $(BINDIR)
  1862. ***************
  1863. *** 58,62 ****
  1864. --- 59,70 ----
  1865.   $(BINDIR)/checknews:    checknews
  1866.       cp checknews $(BINDIR)
  1867. + $(BINDIR)/postnews:    postnews
  1868. +     cp postnews $(BINDIR)
  1869.   
  1870. + cmp:    readnews checknews postnews
  1871. +     cmp $(BINDIR)/readnews readnews
  1872. +     cmp $(BINDIR)/checknews checknews
  1873. +     cmp $(BINDIR)/postnews postnews
  1874. + 
  1875.   defs.h:    at.h # $C
  1876.       touch defs.h
  1877. ***************
  1878. *** 74,81 ****
  1879.   $(ROFILES): defs.h
  1880.   
  1881. ! postnews: $(BINDIR)/postnews
  1882. ! $(BINDIR)/postnews: $(PFILES) defs.h
  1883. !     $(CC) $(CFLAGS) $(PFILES) -o postnews
  1884. !     $(INSTALL) - postnews news 6711 $(BINDIR)/postnews
  1885.   
  1886.   postgroup: $(BINDIR)/postgroup
  1887. --- 82,89 ----
  1888.   $(ROFILES): defs.h
  1889.   
  1890. ! # postnews: $(BINDIR)/postnews
  1891. ! # $(BINDIR)/postnews: $(PFILES) defs.h
  1892. ! #     $(CC) $(CFLAGS) $(PFILES) -o postnews
  1893. ! #     $(INSTALL) - postnews news 6711 $(BINDIR)/postnews
  1894.   
  1895.   postgroup: $(BINDIR)/postgroup
  1896.  
  1897. Files that are new:
  1898.  
  1899. new expire/updatemin.c (patch can't create, so diff against null):
  1900. Index: expire/updatemin.c
  1901. *** cnpatch/tmp.preposterously.long.name.to.make.patch.behave.right    Tue Aug 22 14:05:42 1989
  1902. --- expire/updatemin.c    Sun Aug 20 00:53:41 1989
  1903. ***************
  1904. *** 0 ****
  1905. --- 1,211 ----
  1906. + /*
  1907. +  * updatemin - update the "min" fields in the active file
  1908. +  */
  1909. + 
  1910. + #include <stdio.h>
  1911. + #include <sys/types.h>
  1912. + #include <string.h>
  1913. + #include <signal.h>
  1914. + 
  1915. + #ifndef BERKDIR
  1916. + #include <dirent.h>
  1917. + #else
  1918. + #include <sys/dir.h>
  1919. + #define    dirent    direct
  1920. + #endif
  1921. + 
  1922. + #include "config.h"
  1923. + #include "fgetmfs.h"
  1924. + #include "alloc.h"
  1925. + 
  1926. + void fail();
  1927. + void catch();
  1928. + void slash();
  1929. + long lowest();
  1930. + 
  1931. + char newname[] = "active.new";
  1932. + 
  1933. + char *progname;
  1934. + 
  1935. + extern long atol();
  1936. + 
  1937. + /*
  1938. +  - main - parse arguments and handle options
  1939. +  */
  1940. + main(argc, argv)
  1941. + int argc;
  1942. + char *argv[];
  1943. + {
  1944. +     DIR *d;
  1945. +     register FILE *a;
  1946. +     register FILE *new;
  1947. +     char *line;
  1948. + #    define    NF    4
  1949. +     char *field[NF];
  1950. +     register int nf;
  1951. +     register long min;
  1952. +     register char *name;
  1953. +     char minstr[6];
  1954. + 
  1955. +     progname = argv[0];
  1956. + 
  1957. +     cd(ctlfile((char *)NULL));
  1958. +     (void) umask(newsumask());
  1959. + 
  1960. +     catch(SIGINT);
  1961. +     catch(SIGQUIT);
  1962. +     catch(SIGHUP);
  1963. +     catch(SIGTERM);
  1964. +     newslock();
  1965. + 
  1966. +     a = fopen("active", "r");
  1967. +     if (a == NULL)
  1968. +         fail("cannot open `%s'", ctlfile("active"));
  1969. +     new = fopen(newname, "w");
  1970. +     if (new == NULL)
  1971. +         fail("cannot create `%s'", ctlfile(newname));
  1972. + 
  1973. +     cd(fullartfile((char *)NULL));
  1974. +     while ((line = fgetms(a)) != NULL) {
  1975. +         nf = split(line, field, NF, " \t\n");
  1976. +         if (nf != NF)
  1977. +             fail("bad number of fields in `%s ...'", field[0]);
  1978. +         name = strsave(field[0]);
  1979. +         slash(name);
  1980. +         d = opendir(artfile(name));
  1981. +         if (d != NULL) {
  1982. +             min = lowest(d);
  1983. +             if (min < 0)        /* no articles */
  1984. +                 min = atol(field[1])+1;
  1985. +             closedir(d);
  1986. +         } else                /* no directory */
  1987. +             min = atol(field[2]);
  1988. +         fprintf(new, "%s %s ", field[0], field[1]);
  1989. +         if (min < 10000) {    /* insist on at least five digits */
  1990. +             sprintf(minstr, "%ld", min);
  1991. +             fprintf(new, "%s", "00000"+strlen(minstr));
  1992. +         }
  1993. +         fprintf(new, "%ld %s\n", min, field[3]);
  1994. +         free(name);
  1995. +         free(line);
  1996. +     }
  1997. + 
  1998. +     if (nfclose(new) == EOF)
  1999. +         fail("close failed on `%s'", ctlfile(newname));
  2000. +     cd(ctlfile((char *)NULL));
  2001. +     (void) unlink("active.old");
  2002. +     if (link("active", "active.old") < 0)
  2003. +         fail("can't link `active' to `active.old'", "");
  2004. +     if (unlink("active") < 0)
  2005. +         fail("can't unlink `active'", "");
  2006. +     if (link(newname, "active") < 0) {
  2007. +         if (link("active.old", "active") < 0)
  2008. +             fail("disaster -- cannot recover `active'!!", "");
  2009. +         else
  2010. +             fail("can't link in new `active' -- old one used", "");
  2011. +     }
  2012. +     newsunlock();
  2013. + 
  2014. +     exit(0);
  2015. + }
  2016. + 
  2017. + /*
  2018. +  - lowest - find numerically-lowest name in directory
  2019. +  */
  2020. + long                /* lowest; -1 if none */
  2021. + lowest(d)
  2022. + register DIR *d;
  2023. + {
  2024. +     register struct dirent *dp;
  2025. +     register long this;
  2026. +     register long min = -1;
  2027. +     register int any = 0;
  2028. + 
  2029. +     while ((dp = readdir(d)) != NULL) {
  2030. +         if (strspn(dp->d_name, "0123456789") == strlen(dp->d_name)) {
  2031. +             this = atol(dp->d_name);
  2032. +             if (this < min || !any) {
  2033. +                 min = this;
  2034. +                 any = 1;
  2035. +             }
  2036. +         }
  2037. +     }
  2038. + 
  2039. +     return(min);
  2040. + }
  2041. + 
  2042. + /*
  2043. +  - split - divide a line into fields, like awk split()
  2044. +  */
  2045. + int                /* number of fields */
  2046. + split(line, fields, nfmax, sep)
  2047. + char *line;
  2048. + char *fields[];
  2049. + int nfmax;
  2050. + char *sep;
  2051. + {
  2052. +     register int i;
  2053. +     register char *p;
  2054. + 
  2055. +     i = 0;
  2056. +     for (p = strtok(line, sep); p != NULL; p = strtok((char *)NULL, sep)) {
  2057. +         if (i < nfmax)
  2058. +             fields[i] = p;
  2059. +         i++;
  2060. +     }
  2061. + 
  2062. +     return(i);
  2063. + }
  2064. + 
  2065. + /*
  2066. +  - slash - convert dots to slashes in string
  2067. +  */
  2068. + void
  2069. + slash(s)
  2070. + char *s;
  2071. + {
  2072. +     register char *p = s;
  2073. + 
  2074. +     while ((p = strchr(p, '.')) != NULL)
  2075. +         *p = '/';
  2076. + }
  2077. + 
  2078. + /*
  2079. +  - interrupt - signal handler
  2080. +  */
  2081. + void
  2082. + interrupt()
  2083. + {
  2084. +     fail("interrupted", "");
  2085. + }
  2086. + 
  2087. + /*
  2088. +  - catch - set up to catch a signal
  2089. +  */
  2090. + void
  2091. + catch(sig)
  2092. + int sig;
  2093. + {
  2094. +     if (signal(sig, SIG_IGN) != SIG_IGN)
  2095. +         (void) signal(sig, interrupt);
  2096. + }
  2097. + 
  2098. + /*
  2099. +  - fail - some sort of error occurred
  2100. +  */
  2101. + void
  2102. + fail(s1, s2)
  2103. + char *s1;
  2104. + char *s2;
  2105. + {
  2106. +     /* possibly should rm newname, but it may be important evidence */
  2107. +     errunlock(s1, s2);
  2108. + }
  2109. + 
  2110. + /*
  2111. +  - unprivileged - keep the configuration stuff happy
  2112. +  */
  2113. + void
  2114. + unprivileged()
  2115. + {
  2116. + }
  2117.  
  2118. new man/Makefile (patch can't create, so diff against null):
  2119. Index: man/Makefile
  2120. *** cnpatch/tmp.preposterously.long.name.to.make.patch.behave.right    Tue Aug 22 14:05:42 1989
  2121. --- man/Makefile    Sat Aug 19 20:47:51 1989
  2122. ***************
  2123. *** 0 ****
  2124. --- 1,4 ----
  2125. + cmp:
  2126. +     -for f in *.1 ; do echo --- $$f --- ; diff /usr/man/man1 $$f ; done
  2127. +     -for f in *.5 ; do echo --- $$f --- ; diff /usr/man/man5 $$f ; done
  2128. +     -for f in *.8 ; do echo --- $$f --- ; diff /usr/man/man8 $$f ; done
  2129.  
  2130. new misc/adddirs (patch can't create, so diff against null):
  2131. Index: misc/adddirs
  2132. *** cnpatch/tmp.preposterously.long.name.to.make.patch.behave.right    Tue Aug 22 14:05:42 1989
  2133. --- misc/adddirs    Sat Aug 19 20:41:27 1989
  2134. ***************
  2135. *** 0 ****
  2136. --- 1,17 ----
  2137. + #! /bin/sh
  2138. + # adddirs - add any directories needed for newsgroups in active file
  2139. + 
  2140. + # =()<. ${NEWSCONFIG-@<NEWSCONFIG>@}>()=
  2141. + . ${NEWSCONFIG-/usr/lib/news/bin/config}
  2142. + 
  2143. + PATH=$NEWSCTL/bin:$NEWSBIN/maint:$NEWSBIN/relay:$NEWSBIN:$NEWSPATH ; export PATH
  2144. + umask $NEWSUMASK
  2145. + 
  2146. + for dir in `sed 's/[     ].*//' $NEWSCTL/active | tr . /`
  2147. + do
  2148. +     if test ! -d $NEWSARTS/$dir
  2149. +     then
  2150. +         echo "making $dir (and parents if needed...)"
  2151. +         : mkpdir $NEWSARTS/$dir
  2152. +     fi
  2153. + done
  2154.  
  2155.  
  2156. end of patch 22-Aug-1989
  2157.  
  2158.  
  2159.