home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume19 / cnews2 / pch25may90 < prev    next >
Internet Message Format  |  1990-06-07  |  60KB
  1. From @uunet.uu.net:henry@zoo.toronto.edu Sat May 26 10:24:24 1990
  2. Received: from BBN.COM by pineapple.bbn.com id <AA11849@pineapple.bbn.com>; Sat, 26 May 90 10:24:05 -0400
  3. Received: from uunet.UU.NET by BBN.COM id aa10359; 26 May 90 10:23 EDT
  4. Received: from zoo.utoronto.ca by uunet.uu.net (5.61/1.14) with SMTP 
  5.     id AA11159; Fri, 25 May 90 15:33:38 -0400
  6. Message-Id: <9005251933.AA11159@uunet.uu.net>
  7. From: henry@zoo.toronto.edu
  8. Date: Fri, 25 May 90 15:33:22 EDT
  9. To: uunet!source-patches@uunet.uu.net
  10. Subject: C News patch of 25-May-1990
  11. Status: R
  12.  
  13. There are a few fixes for real bugs here.  Relaynews now complains when
  14. dbminit() fails, instead of relying on dbminit() to do it -- dbm did [barf]
  15. but dbz does not.  Message-IDs in control-message commands are now checked
  16. as stringently as the message-ID of the articles themselves -- null IDs in
  17. commands used to mess up history.  Relaynews now balks if the history
  18. files are unwritable -- it used to try to carry on, causing great confusion.
  19. Inews (one of its helpers, actually) used to get slightly confused when
  20. an entire article body consisted of lines with leading white space -- it
  21. took them all as headers! -- and this is now fixed.  A rare bug in handling
  22. of multiple sys lines for the same site has been fixed.  And the problem
  23. with "doit.news" needing write permissions in the source directories to
  24. build "explist.no" has been fixed.
  25.  
  26. Also...  "Viauuxcun" to send batches to sites that still want to see
  27. "cunbatch" rather than "rnews".  Ihave/sendme batching no longer assumes
  28. that inews is in NEWSPATH.  The batcher does much less locking, reducing
  29. conflicts with relaynews.  Dbz's Makefile has been fixed to avoid some
  30. unportable assumptions.  Expire now takes a -h option, telling it to expire
  31. articles that are to be removed but hang onto ones that would be archived.
  32. Doexpire uses -h if archiving space is short.  Doexpire notices if it was
  33. invoked with -r, and doesn't bother with rebuild-space checks in that case.
  34. Build's question-asking stuff now implements shell escapes.  Build now
  35. standardizes its PATH to avoid funny local software.  Build is fussier
  36. about quoting in its saved-answers file, to avoid trouble with sites that
  37. have shell metacharacters (!) in their organization names.  Subst tempfile
  38. names changed to avoid problems on systems with 14-character filenames.
  39. NEWSCTL/active.times is documented, and active.to.times (which builds it)
  40. is supplied.  And proper use of white space in the sys file is documented.
  41. Plus usual minor cleanup work.
  42.  
  43. start of patch 25-May-1990
  44. (suggested archive name: `pch25May90.Z')
  45. this should be run with   patch -p0 <thisfile
  46.  
  47. Please do the following (there is no easy way we can convince
  48. patch to do this automatically):
  49. rm contrib/dbz
  50. rm expire/superkludge
  51.  
  52. The following is a complete list of patches to date.
  53.  
  54. Prereq: 23-Jun-1989
  55. Prereq: 7-Jul-1989
  56. Prereq: 23-Jul-1989
  57. Prereq: 22-Aug-1989
  58. Prereq: 24-Aug-1989
  59. Prereq: 14-Sep-1989
  60. Prereq: 13-Nov-1989
  61. Prereq: 10-Jan-1990
  62. Prereq: 16-Jan-1990
  63. Prereq: 17-Jan-1990
  64. Prereq: 18-Jan-1990
  65. Prereq: 12-Mar-1990
  66. Prereq: 14-Apr-1990
  67. Prereq: 15-Apr-1990
  68. Prereq: 16-Apr-1990
  69. *** PATCHDATES.old    Fri May 25 00:13:20 1990
  70. --- PATCHDATES    Fri May 25 00:13:20 1990
  71. ***************
  72. *** 1,15 ****
  73. --- 1,16 ----
  74.   23-Jun-1989
  75.   7-Jul-1989
  76.   23-Jul-1989
  77.   22-Aug-1989
  78.   24-Aug-1989
  79.   14-Sep-1989
  80.   13-Nov-1989
  81.   10-Jan-1990
  82.   16-Jan-1990
  83.   17-Jan-1990
  84.   18-Jan-1990
  85.   12-Mar-1990
  86.   14-Apr-1990
  87.   15-Apr-1990
  88.   16-Apr-1990
  89. + 25-May-1990
  90.  
  91. Changed files, if any:
  92.  
  93. *** cnpatch/old/README    Sat Apr 14 21:13:14 1990
  94. --- README    Mon Apr 23 15:47:14 1990
  95. ***************
  96. *** 1,3 ****
  97. ! This is C News, superseding assorted preliminary releases.  9 June 1989
  98.   
  99.   C News is a reimplementation of the transport and storage subsystems of the
  100. --- 1,3 ----
  101. ! This is C News, superseding assorted preliminary releases.  23 April 1990
  102.   
  103.   C News is a reimplementation of the transport and storage subsystems of the
  104. ***************
  105. *** 29,36 ****
  106.   C News's files are fully compatible with those of B News for any program
  107.   that does not read log files and does not inspect the middle field of the
  108. ! history file closely.  (The one major program that does is "nntp"; we include
  109. ! diffs for NNTP 1.5 which handle our middle-field format, interface it to
  110. ! our input subsystem, and generally make it quite a bit faster than the
  111. ! original.)  C News complies fully with RFC 1036 (nee RFC 850), the official
  112.   definition of news interchange format.
  113.   
  114. --- 29,35 ----
  115.   C News's files are fully compatible with those of B News for any program
  116.   that does not read log files and does not inspect the middle field of the
  117. ! history file closely.  (The one major program that does is "nntp"; current
  118. ! versions (1.5.8 and later) include our C News support, including a significant
  119. ! speedup.)  C News complies fully with RFC 1036 (nee RFC 850), the official
  120.   definition of news interchange format.
  121.   
  122. ***************
  123. *** 121,126 ****
  124.   these overrides.
  125.   
  126. ! Be warned that the nntp stuff in nntpdiffs, and the simple news reader in
  127. ! rna, have not been gone over very well to make sure that they use the
  128.   standard configuration mechanisms.  Hardwired pathnames may be present there,
  129.   and in general the stuff there is not well fitted into our automatic-install
  130. --- 120,125 ----
  131.   these overrides.
  132.   
  133. ! Be warned that the simple news reader in
  134. ! rna has not been gone over very well to make sure that it uses the
  135.   standard configuration mechanisms.  Hardwired pathnames may be present there,
  136.   and in general the stuff there is not well fitted into our automatic-install
  137.  
  138. *** cnpatch/old/ROADMAP    Wed Jan 10 19:10:13 1990
  139. --- ROADMAP    Mon Apr 23 15:47:11 1990
  140. ***************
  141. *** 5,8 ****
  142. --- 5,10 ----
  143.   contrib    Software from other contributors, possibly useful but not really
  144.       an official part of C News.
  145. + dbz    a faster replacement for dbm for news programs which generates smaller
  146. +     database files than dbm.
  147.   doc    User documentation, including "install" which discusses how to
  148.       install C News.  Although the documentation is supplied as troff
  149. ***************
  150. *** 38,43 ****
  151.   man    Manual pages.
  152.   misc    Miscellaneous internal utilities and maintenance programs.
  153. - nntpdiffs    Amendments to NNTP version 1.5, for Internet users, to work
  154. -     with C News history-file format and to be a good deal faster.
  155.   notebook    The C News Implementor's Notebook -- pieces of documentation
  156.       aimed more at gurus than novices.
  157. --- 40,43 ----
  158.  
  159. *** cnpatch/old/batch/Makefile    Tue Jan 16 17:58:26 1990
  160. --- batch/Makefile    Sat May 12 23:13:50 1990
  161. ***************
  162. *** 17,21 ****
  163.   PGMS=batcher batchih batchsm batchsplit comp compcun nocomp viainews viauux \
  164.       sendbatches compc7 c7encode viamail viapmail bencode compb viauuxz \
  165. !     viaemail viarsh viauuxl
  166.   ALL = $(PGMS) batchparms
  167.   
  168. --- 17,21 ----
  169.   PGMS=batcher batchih batchsm batchsplit comp compcun nocomp viainews viauux \
  170.       sendbatches compc7 c7encode viamail viapmail bencode compb viauuxz \
  171. !     viaemail viarsh viauuxl viauuxcun
  172.   ALL = $(PGMS) batchparms
  173.   
  174. ***************
  175. *** 67,70 ****
  176. --- 67,73 ----
  177.       sed '$$s/-r/-r -z/' viauux >$@
  178.   
  179. + viauuxcun:    viauux
  180. +     sed '$$s/rnews/cunbatch/' viauux >$@
  181. + 
  182.   viaemail:    viamail
  183.       sed '$$s/rnews/enews/' viamail >$@
  184. ***************
  185. *** 171,174 ****
  186.   clean:
  187.       rm -rf out.going bin
  188. !     rm -f *.o test.* togo togo.* batchparms batcher batchsm 
  189.       rm -f batchlog batchlog.* c7encode bencode viauuxz viaemail
  190. --- 174,177 ----
  191.   clean:
  192.       rm -rf out.going bin
  193. !     rm -f *.o test.* togo togo.* batchparms batcher batchsm viauuxcun
  194.       rm -f batchlog batchlog.* c7encode bencode viauuxz viaemail
  195.  
  196. *** cnpatch/old/batch/batchih    Sun Jul 23 00:48:08 1989
  197. --- batch/batchih    Sat May 12 22:51:25 1990
  198. ***************
  199. *** 5,9 ****
  200.   . ${NEWSCONFIG-/usr/lib/news/bin/config}
  201.   
  202. ! PATH=$NEWSCTL/bin:$NEWSBIN/batch:$NEWSBIN:$NEWSPATH ; export PATH
  203.   umask $NEWSUMASK
  204.   
  205. --- 5,9 ----
  206.   . ${NEWSCONFIG-/usr/lib/news/bin/config}
  207.   
  208. ! PATH=$NEWSCTL/bin:$NEWSBIN/batch:$NEWSBIN/inject:$NEWSBIN:$NEWSPATH ; export PATH
  209.   umask $NEWSUMASK
  210.   
  211.  
  212. *** cnpatch/old/batch/batchsplit    Tue Jan 16 17:58:26 1990
  213. --- batch/batchsplit    Fri Apr 27 16:52:26 1990
  214. ***************
  215. *** 29,48 ****
  216.   umask $NEWSUMASK
  217.   
  218. ! # Locking.
  219. ! lock="$NEWSCTL/LOCK"
  220. ! ltemp="$NEWSCTL/L.$$"
  221. ! echo $$ >$ltemp
  222. ! trap "rm -f $ltemp ; exit 0" 0 1 2 15
  223. ! while true
  224. ! do
  225. !     if newslock $ltemp $lock
  226. !     then
  227. !         trap "rm -f $ltemp $lock ; exit 0" 0 1 2 15
  228. !         break
  229. !     fi
  230. !     sleep 30
  231. ! done
  232. ! 
  233. ! # pick an input file, shuffling togo aside if needed, and unlock
  234.   if test -s togo.next
  235.   then
  236. --- 29,33 ----
  237.   umask $NEWSUMASK
  238.   
  239. ! # pick an input file, shuffling togo aside (with locking) if needed
  240.   if test -s togo.next
  241.   then
  242. ***************
  243. *** 52,55 ****
  244. --- 37,56 ----
  245.       input=togo.more
  246.   else
  247. +     # Locking.
  248. +     lock="$NEWSCTL/LOCK"
  249. +     ltemp="$NEWSCTL/L.$$"
  250. +     echo $$ >$ltemp
  251. +     trap "rm -f $ltemp ; exit 0" 0 1 2 15
  252. +     while true
  253. +     do
  254. +         if newslock $ltemp $lock
  255. +         then
  256. +             trap "rm -f $ltemp $lock ; exit 0" 0 1 2 15
  257. +             break
  258. +         fi
  259. +         sleep 30
  260. +     done
  261. + 
  262. +     # Do it.
  263.       rm -f togo.more
  264.       mv togo togo.more
  265. ***************
  266. *** 56,62 ****
  267.       >togo
  268.       input=togo.more
  269.   fi
  270. - trap 0 1 2 15
  271. - rm -f $ltemp $lock
  272.   
  273.   # main processing
  274. --- 57,65 ----
  275.       >togo
  276.       input=togo.more
  277. + 
  278. +     # Unlock.
  279. +     trap 0 1 2 15
  280. +     rm -f $ltemp $lock
  281.   fi
  282.   
  283.   # main processing
  284.  
  285. *** cnpatch/old/conf/ask    Tue Jan 16 17:58:23 1990
  286. --- conf/ask    Fri Apr 27 17:59:13 1990
  287. ***************
  288. *** 1,6 ****
  289.   #! /bin/sh
  290. - echo "$1 [$2]? " | tr -d '\012' >/dev/tty    # echo -n, sort of portably
  291.   default="$2"
  292. ! read answer
  293.   case "$answer" in
  294.   '')    answer="$default"    ;;
  295. --- 1,18 ----
  296.   #! /bin/sh
  297.   default="$2"
  298. ! while :
  299. ! do
  300. !     echo "$1 [$2]? " | tr -d '\012' >/dev/tty    # echo -n, semiportably
  301. !     read answer
  302. !     case "$answer" in
  303. !     !*)    cmd="`expr \"$answer\" : '!\(.*\)'`"
  304. !         trap : 2
  305. !         ${SHELL-/bin/sh} -c "$cmd"
  306. !         trap 2
  307. !         echo '!'
  308. !         ;;
  309. !     *)    break    ;;    # NOTE BREAK OUT
  310. !     esac
  311. ! done
  312.   case "$answer" in
  313.   '')    answer="$default"    ;;
  314.  
  315. *** cnpatch/old/conf/build    Sat Apr 14 21:13:15 1990
  316. --- conf/build    Sat May 12 23:06:37 1990
  317. ***************
  318. *** 1,4 ****
  319.   #! /bin/sh
  320. ! PATH=:$PATH
  321.   
  322.   # configuration variables to remember for next time
  323. --- 1,4 ----
  324.   #! /bin/sh
  325. ! PATH=:/bin:/usr/bin
  326.   
  327.   # configuration variables to remember for next time
  328. ***************
  329. *** 837,841 ****
  330.       echo "cp sys.proto sys"
  331.       echo "cd ../expire"
  332. !     echo "make explist.$archive && cp explist.$archive explist"
  333.       echo "cd ../conf"
  334.       case "$archive" in
  335. --- 837,841 ----
  336.       echo "cp sys.proto sys"
  337.       echo "cd ../expire"
  338. !     echo "make explists && cp explist.$archive explist"
  339.       echo "cd ../conf"
  340.       case "$archive" in
  341. ***************
  342. *** 977,981 ****
  343.           do
  344.               echo "$warn"
  345. !             eval "echo $v=\\\"\$$v\\\""
  346.           done
  347.       ) >>$memory
  348. --- 977,981 ----
  349.           do
  350.               echo "$warn"
  351. !             eval "echo $v=\\\"\"\$$v\"\\\""
  352.           done
  353.       ) >>$memory
  354.  
  355. *** cnpatch/old/conf/setnewsids.c    Fri Jun 23 14:45:43 1989
  356. --- conf/setnewsids.c    Sat Apr 21 21:50:04 1990
  357. ***************
  358. *** 1,5 ****
  359.   /*
  360. !  * setnewsids - sets ids to news/news, execs relay/relaynews.  Should be setuid-root.
  361. !  *    also add NEWSPERMS to the environment.
  362.    */
  363.   
  364. --- 1,5 ----
  365.   /*
  366. !  * setnewsids - sets ids to news/news, execs relay/relaynews.  Should be
  367. !  *    setuid-root.  also add NEWSPERMS to the environment.
  368.    */
  369.   
  370. ***************
  371. *** 41,45 ****
  372.   
  373.       /* setuid daemon prelude; various precautions */
  374. !     (void) umask(2);    /* undo silly umasks, ignore newsumask() */
  375.       (void) alarm(0);    /* cancel any pending alarm */
  376.       /*
  377. --- 41,45 ----
  378.   
  379.       /* setuid daemon prelude; various precautions */
  380. !     (void) umask(newsumask());
  381.       (void) alarm(0);    /* cancel any pending alarm */
  382.       /*
  383.  
  384. *** cnpatch/old/conf/subst    Tue Mar 13 13:41:17 1990
  385. --- conf/subst    Sat May 12 23:09:30 1990
  386. ***************
  387. *** 27,37 ****
  388.           file="`expr \"$f\" : '.*/\\([^/]*\\)'`"
  389.           dir="`expr \"$f\" : '\\(.*\\)/[^/]*'`"
  390. !         new="$dir/n.$file"
  391. !         old="$dir/o.$file"
  392.           ;;
  393.   
  394.           *)
  395. !         new="n.$f"
  396. !         old="o.$f"
  397.           ;;
  398.       esac
  399. --- 27,37 ----
  400.           file="`expr \"$f\" : '.*/\\([^/]*\\)'`"
  401.           dir="`expr \"$f\" : '\\(.*\\)/[^/]*'`"
  402. !         new="$dir/substtmp.new"
  403. !         old="$dir/substtmp.old"
  404.           ;;
  405.   
  406.           *)
  407. !         new="substtmp.new"
  408. !         old="substtmp.old"
  409.           ;;
  410.       esac
  411.  
  412. *** cnpatch/old/conf/subst.gc    Tue Aug 22 14:47:44 1989
  413. --- conf/subst.gc    Tue May  8 17:56:47 1990
  414. ***************
  415. *** 17,18 ****
  416. --- 17,20 ----
  417.   rna/makefile
  418.   rna/postnews
  419. + man/active.times.5
  420. + misc/act.to.times
  421.  
  422. *** cnpatch/old/conf/subst.hs    Tue Jan 16 17:58:28 1990
  423. --- conf/subst.hs    Sat May 19 20:27:37 1990
  424. ***************
  425. *** 13,17 ****
  426.   expire/doexpire
  427.   expire/mkhistory
  428. - expire/superkludge
  429.   expire/upact
  430.   input/Makefile
  431. --- 13,16 ----
  432. ***************
  433. *** 46,47 ****
  434. --- 45,47 ----
  435.   expire/recovact
  436.   misc/adddirs
  437. + batch/viauuxl
  438.  
  439. *** cnpatch/old/conf/yesno    Tue Jan 16 17:58:24 1990
  440. --- conf/yesno    Fri Apr 27 17:59:44 1990
  441. ***************
  442. *** 13,16 ****
  443. --- 13,22 ----
  444.       esac
  445.       case "$answer" in
  446. +     !*)    cmd="`expr \"$answer\" : '!\(.*\)'`"
  447. +         trap : 2
  448. +         ${SHELL-/bin/sh} -c "$cmd"
  449. +         trap 2
  450. +         echo '!'
  451. +         ;;
  452.       yes|no)    break        ;;    # NOTE BREAK OUT
  453.       *)    echo '???' >/dev/tty    ;;
  454.  
  455. *** cnpatch/old/dbz/Makefile    Sat Apr 14 21:13:09 1990
  456. --- dbz/Makefile    Tue May  1 13:50:07 1990
  457. ***************
  458. *** 8,11 ****
  459. --- 8,13 ----
  460.   LINTFLAGS = -h $(FLAGS) $(DEBUG) $(RFC)
  461.   LDFLAGS =
  462. + # workaround for System V make bug
  463. + SHELL = /bin/sh
  464.   
  465.   # database sizes for performance tests, regression, and regression prime-find
  466. ***************
  467. *** 63,73 ****
  468.   
  469.   hist10:    fake
  470. !     fake -t -e 75 10000 >$@
  471.   
  472.   hist3.3:    fake
  473. !     fake -t -e 75 3300 >$@
  474.   
  475.   hist13:    fake
  476. !     fake -t -e 75 13000 >$@
  477.   
  478.   r:    rdbz $(RHIST) $(R2HIST) byteflip getmap revbytes altbytes
  479. --- 65,75 ----
  480.   
  481.   hist10:    fake
  482. !     ./fake -t -e 75 10000 >$@
  483.   
  484.   hist3.3:    fake
  485. !     ./fake -t -e 75 3300 >$@
  486.   
  487.   hist13:    fake
  488. !     ./fake -t -e 75 13000 >$@
  489.   
  490.   r:    rdbz $(RHIST) $(R2HIST) byteflip getmap revbytes altbytes
  491. ***************
  492. *** 83,87 ****
  493.       mkdir xx
  494.       chmod -w xx
  495. !     rdbz -E 1000 -0 -M -i -S -u -U -C xx dbase
  496.       rmdir xx
  497.       sed '/>    0/d' $(RHIST) >dbase.used
  498. --- 85,89 ----
  499.       mkdir xx
  500.       chmod -w xx
  501. !     ./rdbz -E 1000 -0 -M -i -S -u -U -C xx dbase
  502.       rmdir xx
  503.       sed '/>    0/d' $(RHIST) >dbase.used
  504. ***************
  505. *** 88,92 ****
  506.       test "`cat dbase.used | wc -l`" -eq "`sed -n '2s/ .*//p' dbase.dir`" ;
  507.       cp $(RHIST) dbase2
  508. !     rdbz -E 1000 -0 -p $(RPSIZE) -t '    ' dbase2
  509.       cmp $(RHIST) dbase
  510.       cmp dbase dbase2
  511. --- 90,94 ----
  512.       test "`cat dbase.used | wc -l`" -eq "`sed -n '2s/ .*//p' dbase.dir`" ;
  513.       cp $(RHIST) dbase2
  514. !     ./rdbz -E 1000 -0 -p $(RPSIZE) -t '    ' dbase2
  515.       cmp $(RHIST) dbase
  516.       cmp dbase dbase2
  517. ***************
  518. *** 93,103 ****
  519.       cmp dbase.dir dbase2.dir
  520.       cmp dbase.pag dbase2.pag
  521. !     rdbz -E 1000 -0 -c dbase
  522. !     rdbz -E 1000 -0 -c -i -q -M -U dbase
  523.       : build a database and then add to it
  524.       sed 1000q $(RHIST) >dbase2
  525.       sed 1,1000d $(RHIST) >dbase2.add
  526. !     rdbz -E 1000 -0 dbase2
  527. !     rdbz -E 1000 -0 -a dbase2 dbase2.add
  528.       cmp dbase dbase2
  529.       cmp dbase.dir dbase2.dir
  530. --- 95,105 ----
  531.       cmp dbase.dir dbase2.dir
  532.       cmp dbase.pag dbase2.pag
  533. !     ./rdbz -E 1000 -0 -c dbase
  534. !     ./rdbz -E 1000 -0 -c -i -q -M -U dbase
  535.       : build a database and then add to it
  536.       sed 1000q $(RHIST) >dbase2
  537.       sed 1,1000d $(RHIST) >dbase2.add
  538. !     ./rdbz -E 1000 -0 dbase2
  539. !     ./rdbz -E 1000 -0 -a dbase2 dbase2.add
  540.       cmp dbase dbase2
  541.       cmp dbase.dir dbase2.dir
  542. ***************
  543. *** 104,125 ****
  544.       cmp dbase.pag dbase2.pag
  545.       : build based on existing one, test extraction and readonly files
  546. !     rdbz -E 1000 -0 -f dbase dbase2
  547.       test "`cat dbase.used | wc -l`" -eq "`awk 'NR==2{print $$1}' dbase2.dir`" ;
  548.       test "`cat dbase.used | wc -l`" -eq "`awk 'NR==2{print $$2}' dbase2.dir`" ;
  549.       chmod -w dbase2.dir dbase2.pag
  550. !     rdbz -E 1000 -x dbase2 dbase >dbase.temp
  551.       cmp dbase.used dbase.temp
  552.       : try some small case perversions
  553.       sed 's/\(@[^     ]*\)A/\1a/' dbase >dbase.ick
  554. !     rdbz -E 1000 -x dbase2 dbase.ick >dbase.temp
  555.       cmp dbase.used dbase.temp
  556.       sed -n 's/A\([^     ]*@\)/a\1/p' dbase >dbase.ick
  557. !     rdbz -x dbase2 dbase.ick >dbase.temp
  558.       test ! -s dbase.temp ;
  559.       rm -f dbase2.dir dbase2.pag
  560.       : try it without tags, case-insensitive, with case perversions
  561. !     rdbz -E 1000 -0 -p '0 b 1' dbase2
  562.       tr '[A-M][n-z]' '[a-m][N-Z]' <dbase2 >dbase.ick
  563. !     rdbz -E 1000 -x dbase2 dbase.ick >dbase.temp
  564.       cmp dbase.used dbase.temp
  565.       rm -f dbase.temp dbase.ick
  566. --- 106,127 ----
  567.       cmp dbase.pag dbase2.pag
  568.       : build based on existing one, test extraction and readonly files
  569. !     ./rdbz -E 1000 -0 -f dbase dbase2
  570.       test "`cat dbase.used | wc -l`" -eq "`awk 'NR==2{print $$1}' dbase2.dir`" ;
  571.       test "`cat dbase.used | wc -l`" -eq "`awk 'NR==2{print $$2}' dbase2.dir`" ;
  572.       chmod -w dbase2.dir dbase2.pag
  573. !     ./rdbz -E 1000 -x dbase2 dbase >dbase.temp
  574.       cmp dbase.used dbase.temp
  575.       : try some small case perversions
  576.       sed 's/\(@[^     ]*\)A/\1a/' dbase >dbase.ick
  577. !     ./rdbz -E 1000 -x dbase2 dbase.ick >dbase.temp
  578.       cmp dbase.used dbase.temp
  579.       sed -n 's/A\([^     ]*@\)/a\1/p' dbase >dbase.ick
  580. !     ./rdbz -x dbase2 dbase.ick >dbase.temp
  581.       test ! -s dbase.temp ;
  582.       rm -f dbase2.dir dbase2.pag
  583.       : try it without tags, case-insensitive, with case perversions
  584. !     ./rdbz -E 1000 -0 -p '0 b 1' dbase2
  585.       tr '[A-M][n-z]' '[a-m][N-Z]' <dbase2 >dbase.ick
  586. !     ./rdbz -E 1000 -x dbase2 dbase.ick >dbase.temp
  587.       cmp dbase.used dbase.temp
  588.       rm -f dbase.temp dbase.ick
  589. ***************
  590. *** 127,146 ****
  591.       awk -f revbytes dbase.dir >dbase2.dir
  592.       chmod +x getmap
  593. !     byteflip `getmap dbase.dir` `getmap dbase2.dir` <dbase.pag >dbase2.pag
  594.       cp dbase dbase2
  595. !     rdbz -E 1000 -0 -c dbase2
  596.       awk -f altbytes dbase.dir >dbase2.dir
  597.       dd conv=swab <dbase.pag >dbase2.pag
  598. !     rdbz -E 1000 -0 -c dbase2
  599.       cp dbase2 dbase3
  600. !     rdbz -E 1000 -0 -f dbase2 dbase3
  601. !     rdbz -E 1000 -0 -c dbase3
  602. !     test " `getmap dbase2.dir`" = " `getmap dbase3.dir`" ;
  603.       : test massive overflow, throw in case sensitivity and tag mask
  604.       cp $(R2HIST) dbase
  605. !     rdbz -E 1000 -0 -p '0 0 7ff00000' dbase
  606. !     rdbz -E 1000 -0 -cq dbase
  607.       sed 100q dbase | egrep '[aA].*    ' | tr aA Aa >dbase.ick
  608. !     rdbz -x dbase dbase.ick >dbase.temp
  609.       test ! -s dbase.temp ;
  610.       : success!
  611. --- 129,148 ----
  612.       awk -f revbytes dbase.dir >dbase2.dir
  613.       chmod +x getmap
  614. !     ./byteflip `./getmap dbase.dir` `./getmap dbase2.dir` <dbase.pag >dbase2.pag
  615.       cp dbase dbase2
  616. !     ./rdbz -E 1000 -0 -c dbase2
  617.       awk -f altbytes dbase.dir >dbase2.dir
  618.       dd conv=swab <dbase.pag >dbase2.pag
  619. !     ./rdbz -E 1000 -0 -c dbase2
  620.       cp dbase2 dbase3
  621. !     ./rdbz -E 1000 -0 -f dbase2 dbase3
  622. !     ./rdbz -E 1000 -0 -c dbase3
  623. !     test " `./getmap dbase2.dir`" = " `./getmap dbase3.dir`" ;
  624.       : test massive overflow, throw in case sensitivity and tag mask
  625.       cp $(R2HIST) dbase
  626. !     ./rdbz -E 1000 -0 -p '0 0 7ff00000' dbase
  627. !     ./rdbz -E 1000 -0 -cq dbase
  628.       sed 100q dbase | egrep '[aA].*    ' | tr aA Aa >dbase.ick
  629. !     ./rdbz -x dbase dbase.ick >dbase.temp
  630.       test ! -s dbase.temp ;
  631.       : success!
  632.  
  633. *** cnpatch/old/expire/Makefile    Sat Apr 14 21:13:15 1990
  634. --- expire/Makefile    Sat May 12 23:06:09 1990
  635. ***************
  636. *** 9,13 ****
  637.       upact doexpire mkadir recovact
  638.   DTR = README Makefile dircheck doexpire expire.c histdups histinfo.c \
  639. !     histslash.c mkdbm.c mkhistory pgood superkludge tgood upact \
  640.       mkadir updatemin.c recovact
  641.   UPACT=upact
  642. --- 9,13 ----
  643.       upact doexpire mkadir recovact
  644.   DTR = README Makefile dircheck doexpire expire.c histdups histinfo.c \
  645. !     histslash.c mkdbm.c mkhistory pgood tgood upact \
  646.       mkadir updatemin.c recovact
  647.   UPACT=upact
  648. ***************
  649. *** 28,31 ****
  650. --- 28,33 ----
  651.       cp $(THEM) $(NEWSBIN)/expire
  652.   
  653. + explists:    explist.no explist.yes
  654. + 
  655.   cmp:    $(THEM)
  656.       for f in $(THEM) ; do cmp $(NEWSBIN)/expire/$$f $$f ; done
  657. ***************
  658. *** 198,202 ****
  659.   
  660.   # the regression test proper
  661. ! r:    $(THEM) $(UPACT) dircheck setup tgood pgood superkludge
  662.       chmod +x dircheck $(THEM)
  663.       $(RUN) -c explist
  664. --- 200,204 ----
  665.   
  666.   # the regression test proper
  667. ! r:    $(THEM) $(UPACT) dircheck setup tgood pgood
  668.       chmod +x dircheck $(THEM)
  669.       $(RUN) -c explist
  670. ***************
  671. *** 240,249 ****
  672.       test -r history.pag ;
  673.       test -r history.dir ;
  674. -     : "and that's mkhistory done, finally try superkludge"
  675. -     test -r arts/foo/1 ;
  676. -     test -r arts/foo/10 ;
  677. -     $(D) ./superkludge foo
  678. -     test ! -r arts/foo/1 ;
  679. -     test -r arts/foo/10 ;
  680.       : "success!"
  681.   
  682. --- 242,245 ----
  683. ***************
  684. *** 269,274 ****
  685.   
  686.   tidy:
  687. !     rm -f junk history history.pag history.dir history.o active
  688. !     rm -f history.n* mon.out history.proto history.after test.out doit
  689.       rm -f active.old active.new explist lint active.after test.stderr
  690.       rm -rf arts arch arch2 arch3 nbin
  691. --- 265,270 ----
  692.   
  693.   tidy:
  694. !     rm -f junk history history.pag history.dir history.o active active.tmp
  695. !     rm -f history.n* *mon.out history.proto history.after test.out doit
  696.       rm -f active.old active.new explist lint active.after test.stderr
  697.       rm -rf arts arch arch2 arch3 nbin
  698.  
  699. *** cnpatch/old/expire/README    Tue Mar 13 13:41:17 1990
  700. --- expire/README    Wed Apr 18 14:27:58 1990
  701. ***************
  702. *** 18,22 ****
  703.   "make r" will compile everything and run a complex set of regression tests,
  704.   checking the results automatically.  If nothing screams, there is a high
  705. ! probability that expire, upact, mkhistory, and superkludge are working.
  706.   
  707.   dircheck checks the results of expire regression testing.
  708. --- 18,22 ----
  709.   "make r" will compile everything and run a complex set of regression tests,
  710.   checking the results automatically.  If nothing screams, there is a high
  711. ! probability that expire, upact, and mkhistory are working.
  712.   
  713.   dircheck checks the results of expire regression testing.
  714. ***************
  715. *** 30,33 ****
  716.   pgood and tgood are regression-test output-should-look-like-this files.
  717.   mkadir is what expire invokes to create archiving subdirectories.
  718. - superkludge is an old implementation of the Supersedes header, now
  719. -     superseded :-) by the full implementation in relaynews.
  720. --- 30,31 ----
  721.  
  722. *** cnpatch/old/expire/doexpire    Tue Mar 13 13:41:18 1990
  723. --- expire/doexpire    Sun May 13 01:28:34 1990
  724. ***************
  725. *** 20,54 ****
  726.   fi
  727.   
  728.   if test " `spacefor 1 archive`" -le 0
  729.   then
  730. !     echo "$0: not enough space for archiving" | mail "$NEWSMASTER"
  731. !     exit 1
  732.   fi
  733.   
  734.   cd $NEWSCTL
  735. ! ropt=-r
  736. ! for counter in x x x x        # four tries
  737.   do
  738. !     size="`sizeof history history.pag history.dir`"
  739. !     if test " `spacefor $size control`" -gt 0
  740.       then
  741.           ropt=
  742. -         break
  743.       fi
  744. -     sleep 600        # and hope it will improve
  745.   done
  746. ! if test " $ropt" = " -r"
  747. ! then
  748. !     (
  749. !         echo "$0:"
  750. !         echo "    SEVERE SPACE SHORTAGE in $NEWSCTL !"
  751. !         echo "    Unable to rebuild history files due to insufficient"
  752. !         echo "    space for temporaries -- resorting to \`expire -r'."
  753. !         echo "    Growth of the history files will make things worse;"
  754. !         echo "    if shortage persists, human action is urgently needed."
  755. !     ) | mail "$NEWSMASTER"
  756. ! fi
  757.   
  758. ! expire $ropt $* $NEWSCTL/explist 2>/tmp/doex$$
  759.   if test -s /tmp/doex$$
  760.   then
  761. --- 20,73 ----
  762.   fi
  763.   
  764. + hopt=
  765.   if test " `spacefor 1 archive`" -le 0
  766.   then
  767. !     (
  768. !         echo "$0:"
  769. !         echo "    Space shortage in archiving area!"
  770. !         echo "    Unable to archive old articles -- holding them in"
  771. !         echo "    current directories using \`expire -h'.  If shortage"
  772. !         echo "    persists, human action is urgently needed."
  773. !     ) | mail "$NEWSMASTER"
  774. !     hopt=-h
  775.   fi
  776.   
  777.   cd $NEWSCTL
  778. ! forcer=no
  779. ! for o
  780.   do
  781. !     if test " $o" = " -r"
  782.       then
  783. +         forcer=yes
  784.           ropt=
  785.       fi
  786.   done
  787. ! case "$forcer" in
  788. ! no)    ropt=-r
  789. !     for counter in x x x x        # four tries
  790. !     do
  791. !         size="`sizeof history history.pag history.dir`"
  792. !         if test " `spacefor $size control`" -gt 0
  793. !         then
  794. !             ropt=
  795. !             break
  796. !         fi
  797. !         sleep 600        # and hope it will improve
  798. !     done
  799. !     if test " $ropt" = " -r"
  800. !     then
  801. !         (
  802. !             echo "$0:"
  803. !             echo "    SEVERE SPACE SHORTAGE in $NEWSCTL !"
  804. !             echo "    Unable to rebuild history files due to insufficient"
  805. !             echo "    space for temporaries -- resorting to \`expire -r'."
  806. !             echo "    Growth of the history files will make things worse;"
  807. !             echo "    if shortage persists, human action is urgently needed."
  808. !         ) | mail "$NEWSMASTER"
  809. !     fi
  810. !     ;;
  811. ! esac
  812.   
  813. ! expire $ropt $hopt $* $NEWSCTL/explist 2>/tmp/doex$$
  814.   if test -s /tmp/doex$$
  815.   then
  816.  
  817. *** cnpatch/old/expire/expire.c    Sat Apr 14 21:13:16 1990
  818. --- expire/expire.c    Mon Apr 30 15:15:02 1990
  819. ***************
  820. *** 71,74 ****
  821. --- 71,75 ----
  822.   int verbose = 0;        /* report statistics */
  823.   int rebuild = 1;        /* rebuild history files */
  824. + int holdarch = 0;        /* hold rather than archiving */
  825.   int getdgrump = 0;        /* report un-getdate()able expiry dates */
  826.   
  827. ***************
  828. *** 162,166 ****
  829.       ftime(&ftnow);
  830.   
  831. !     while ((c = getopt(argc, argv, "pa:sF:cn:tlvrVgd")) != EOF)
  832.           switch (c) {
  833.           case 'p':    /* print info line for archived articles */
  834. --- 163,167 ----
  835.       ftime(&ftnow);
  836.   
  837. !     while ((c = getopt(argc, argv, "pa:sF:cn:tlvrhgd")) != EOF)
  838.           switch (c) {
  839.           case 'p':    /* print info line for archived articles */
  840. ***************
  841. *** 194,197 ****
  842. --- 195,201 ----
  843.               rebuild = 0;
  844.               break;
  845. +         case 'h':    /* hold all files meant to be archived */
  846. +             holdarch = 1;
  847. +             break;
  848.           case 'g':    /* report getdate() failures on expiry dates */
  849.               getdgrump = 1;
  850. ***************
  851. *** 757,764 ****
  852.   
  853.       /* and decide */
  854. !     if (shouldgo(recdate, expdate, ct))
  855. !         return(ct->dir);
  856. !     else
  857.           return(dont);
  858.   }
  859.   
  860. --- 761,768 ----
  861.   
  862.       /* and decide */
  863. !     if (!shouldgo(recdate, expdate, ct) || (holdarch && ct->dir != NULL))
  864.           return(dont);
  865. +     else
  866. +         return(ct->dir);
  867.   }
  868.   
  869.  
  870. *** cnpatch/old/h/news.h    Tue Mar 13 13:41:19 1990
  871. --- h/news.h    Thu May 10 16:44:47 1990
  872. ***************
  873. *** 55,58 ****
  874. --- 55,59 ----
  875.   #define ST_DISKFULL    (1<<5)    /* disk full - give up */
  876.   #define ST_JUNKED    (1<<6)    /* article was accepted, but junked */
  877. + #define ST_NEEDATTN    (1<<7)    /* news system needs human attention - give up */
  878.   
  879.   /* newsgroup specific definitions */
  880.  
  881. *** cnpatch/old/man/expire.8    Tue Mar 13 13:41:22 1990
  882. --- man/expire.8    Sun May 13 01:33:41 1990
  883. ***************
  884. *** 7,11 ****
  885.   .\" =()<.ds m @<NEWSMASTER>@>()=
  886.   .ds m usenet
  887. ! .TH EXPIRE 8 "12 Jan 1990"
  888.   .BY "C News"
  889.   .SH NAME
  890. --- 7,11 ----
  891.   .\" =()<.ds m @<NEWSMASTER>@>()=
  892.   .ds m usenet
  893. ! .TH EXPIRE 8 "12 May 1990"
  894.   .BY "C News"
  895.   .SH NAME
  896. ***************
  897. *** 46,49 ****
  898. --- 46,51 ----
  899.   ] [
  900.   .B \-g
  901. + ] [
  902. + .B \-h
  903.   ]
  904.   [ controlfile ]
  905. ***************
  906. *** 199,202 ****
  907. --- 201,210 ----
  908.   temporary storage.)
  909.   .TP
  910. + .BR \-h
  911. + do not expire any article which would be archived if it were expired.
  912. + Mostly for emergencies, so that \fIexpire\fR can be run
  913. + (to delete articles in non-archived groups)
  914. + even if space is short in archiving areas.
  915. + .TP
  916.   .BR \-v
  917.   verbose:
  918. ***************
  919. *** 225,229 ****
  920.   .I Doexpire
  921.   checks whether another \fIdoexpire\fR is running,
  922. ! checks that there is enough disk space for expiry and archiving,
  923.   invokes \fIexpire\fR with any \fIexpireoptions\fR given and with
  924.   \fI\*c/explist\fR as the control file,
  925. --- 233,237 ----
  926.   .I Doexpire
  927.   checks whether another \fIdoexpire\fR is running,
  928. ! checks that there is enough disk space,
  929.   invokes \fIexpire\fR with any \fIexpireoptions\fR given and with
  930.   \fI\*c/explist\fR as the control file,
  931. ***************
  932. *** 230,236 ****
  933.   and reports any difficulties by sending mail to \fI\*m\fR.
  934.   This is usually better than just running \fIexpire\fR directly.
  935. ! If space is adequate for archiving but persistently inadequate for the
  936.   temporaries needed for history rebuilding, \fIdoexpire\fR reports this
  937. ! and invokes \fIexpire\fR with the \fB\-r\fR option.
  938.   .PP
  939.   .I Mkhistory
  940. --- 238,247 ----
  941.   and reports any difficulties by sending mail to \fI\*m\fR.
  942.   This is usually better than just running \fIexpire\fR directly.
  943. ! If space is not adequate for archiving, \fIdoexpire\fR reports this
  944. ! and invokes \fIexpire\fR with the \fB\-h\fR option.
  945. ! If \fB\-r\fR is not among the \fIexpireoptions\fR,
  946. ! and disk space is persistently inadequate for the
  947.   temporaries needed for history rebuilding, \fIdoexpire\fR reports this
  948. ! and invokes \fIexpire\fR with the \fB\-r\fR option anyway.
  949.   .PP
  950.   .I Mkhistory
  951. ***************
  952. *** 285,288 ****
  953. --- 296,302 ----
  954.   with the `=' feature, since the article numbers will collide with each
  955.   other and expire doesn't do anything about this.
  956. + Note that archiving a newsgroup which has subgroups into
  957. + an `=' directory puts all the subgroups in the same directory as the parent!
  958. + (Specifying the group as `foo.bar,!foo.bar.all' will avoid this.)
  959.   .PP
  960.   .I Mkhistory
  961.  
  962. *** cnpatch/old/man/news.5    Tue Mar 13 13:41:23 1990
  963. --- man/news.5    Tue May 22 13:20:27 1990
  964. ***************
  965. *** 169,173 ****
  966.   putting a
  967.   .B \e
  968. ! at the end of the line.
  969.   .PP
  970.   Of the \fIsys\fR fields,
  971. --- 169,185 ----
  972.   putting a
  973.   .B \e
  974. ! at the end of the current physical line.
  975. ! Spaces are permitted in
  976. ! .I sys
  977. ! only in
  978. ! comments,
  979. ! .I "transmission command"
  980. ! when it really is a command and not a filename,
  981. ! and,
  982. ! for B news compatibility,
  983. ! at the start of a continuation line
  984. ! (after a
  985. ! .B \e
  986. ! and a newline).
  987.   .PP
  988.   Of the \fIsys\fR fields,
  989.  
  990. *** cnpatch/old/man/newsbatch.8    Sat Apr 14 21:13:17 1990
  991. --- man/newsbatch.8    Sat May 12 23:17:00 1990
  992. ***************
  993. *** 7,11 ****
  994.   .\" =()<.ds m @<NEWSMASTER>@>()=
  995.   .ds m usenet
  996. ! .TH NEWSBATCH 8 "14 April 1990"
  997.   .BY "C News"
  998.   .SH NAME
  999. --- 7,11 ----
  1000.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1001.   .ds m usenet
  1002. ! .TH NEWSBATCH 8 "12 May 1990"
  1003.   .BY "C News"
  1004.   .SH NAME
  1005. ***************
  1006. *** 18,24 ****
  1007.   c7encode, bencode \- compressed-news-batch encoding
  1008.   .br
  1009. ! viauux, viauuxz, viauuxl, viainews, viarsh \- news-batch transmission
  1010.   .br
  1011.   viamail, viaemail, viapmail \- news-batch transmission via mail
  1012.   .SH SYNOPSIS
  1013.   .B \*b/batch/sendbatches
  1014. --- 18,26 ----
  1015.   c7encode, bencode \- compressed-news-batch encoding
  1016.   .br
  1017. ! viauux, viauuxz, viauuxcun, viauuxl \- news-batch transmission via uucp
  1018.   .br
  1019.   viamail, viaemail, viapmail \- news-batch transmission via mail
  1020. + .br
  1021. + viainews, viarsh \- news-batch transmission by misc. means
  1022.   .SH SYNOPSIS
  1023.   .B \*b/batch/sendbatches
  1024. ***************
  1025. *** 70,89 ****
  1026.   site
  1027.   .br    
  1028.   .B \&.../viauuxl
  1029.   group
  1030.   .br
  1031. ! .B \&.../viainews
  1032.   site
  1033.   .br
  1034. ! .B \&.../viarsh
  1035.   site
  1036.   .br
  1037. ! .B \&.../viamail
  1038.   site
  1039.   .br
  1040. ! .B \&.../viaemail
  1041.   site
  1042.   .br
  1043. ! .B \&.../viapmail
  1044.   site
  1045.   .SH DESCRIPTION
  1046. --- 72,94 ----
  1047.   site
  1048.   .br    
  1049. + .B \&.../viauuxcun
  1050. + site
  1051. + .br    
  1052.   .B \&.../viauuxl
  1053.   group
  1054.   .br
  1055. ! .B \&.../viamail
  1056.   site
  1057.   .br
  1058. ! .B \&.../viaemail
  1059.   site
  1060.   .br
  1061. ! .B \&.../viapmail
  1062.   site
  1063.   .br
  1064. ! .B \&.../viainews
  1065.   site
  1066.   .br
  1067. ! .B \&.../viarsh
  1068.   site
  1069.   .SH DESCRIPTION
  1070. ***************
  1071. *** 215,219 ****
  1072.   Batch transmitters in the standard distribution are:
  1073.   .RS
  1074. ! .IP viauux 9
  1075.   normal transmission via UUCP
  1076.   .IP viauuxz
  1077. --- 220,224 ----
  1078.   Batch transmitters in the standard distribution are:
  1079.   .RS
  1080. ! .IP viauux 10
  1081.   normal transmission via UUCP
  1082.   .IP viauuxz
  1083. ***************
  1084. *** 220,223 ****
  1085. --- 225,231 ----
  1086.   like \fIviauux\fR except with \fB\-z\fR option given to \fIuux\fR
  1087.   (for old UUCPs where don't-report-result-on-zero-status is not default)
  1088. + .IP viauuxcun
  1089. + like \fIviauux\fR except it invokes \fIcunbatch\fR rather than \fIrnews\fR
  1090. + at the other end (for some very old news sites)
  1091.   .IP viauuxl
  1092.   multicast transmission using the \fB\-l\fR option of \fIuux\fR (not found
  1093. ***************
  1094. *** 224,227 ****
  1095. --- 232,242 ----
  1096.   on all systems) to send the same batch to all systems listed in the
  1097.   file `\*c/sites.\fIgroup\fR'
  1098. + .IP viamail
  1099. + mail the batch to \fIsite\fB!rnews\fR
  1100. + .IP viaemail
  1101. + mail the batch to \fIsite\fB!enews\fR
  1102. + .IP viapmail
  1103. + mail the batch to \fIsite\fB!rnews\fR, attempting to
  1104. + protect an unencoded batch against the vagaries of mailers
  1105.   .IP viainews
  1106.   feed the batch back to \fIinews\fR, ignoring the \fIsite\fR argument
  1107. ***************
  1108. *** 232,242 ****
  1109.   (the directory containing \fIrnews\fR
  1110.   must be in the default PATH on \fIsite\fR)
  1111. - .IP viamail
  1112. - mail the batch to \fIsite\fB!rnews\fR
  1113. - .IP viaemail
  1114. - mail the batch to \fIsite\fB!enews\fR
  1115. - .IP viapmail
  1116. - mail the batch to \fIsite\fB!rnews\fR, attempting to
  1117. - protect an unencoded batch against the vagaries of mailers
  1118.   .RE
  1119.   .PP
  1120. --- 247,250 ----
  1121.  
  1122. *** cnpatch/old/man/newsmaint.8    Tue Mar 13 13:41:24 1990
  1123. --- man/newsmaint.8    Tue May  8 18:00:00 1990
  1124. ***************
  1125. *** 7,11 ****
  1126.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1127.   .ds m usenet
  1128. ! .TH NEWSMAINT 8 "16 Jan 1990"
  1129.   .BY "C News"
  1130.   .SH NAME
  1131. --- 7,11 ----
  1132.   .\" =()<.ds m @<NEWSMASTER>@>()=
  1133.   .ds m usenet
  1134. ! .TH NEWSMAINT 8 "8 May 1990"
  1135.   .BY "C News"
  1136.   .SH NAME
  1137. ***************
  1138. *** 25,28 ****
  1139. --- 25,30 ----
  1140.   .br
  1141.   addfeed \- add a news feed
  1142. + .br
  1143. + act.to.times \- create active.times file for news readers
  1144.   .SH SYNOPSIS
  1145.   .B \*b/maint/newshist
  1146. ***************
  1147. *** 52,55 ****
  1148. --- 54,60 ----
  1149.   ]
  1150.   site groups
  1151. + .br
  1152. + .B \*b/maint/act.to.times
  1153. + activefile
  1154.   .SH DESCRIPTION
  1155.   These programs are utilities useful in maintaining a C News
  1156. ***************
  1157. *** 119,122 ****
  1158. --- 124,137 ----
  1159.   this specifies the same groups as those fed to site `\fIname\fR',
  1160.   with the exception that `to.\fIname\fR' is rewritten to `to.\fIsite\fR'.
  1161. + .PP
  1162. + .I Act.to.times
  1163. + emits (on standard output) a new
  1164. + .I active.times
  1165. + file (see
  1166. + .IR active.times (5))
  1167. + based on the contents of
  1168. + .IR activefile ,
  1169. + which should normally be
  1170. + .IR \*c/active .
  1171.   .SH FILES
  1172.   .ta 6c
  1173.  
  1174. *** cnpatch/old/misc/Makefile    Sat Apr 14 21:13:18 1990
  1175. --- misc/Makefile    Tue May  8 17:56:09 1990
  1176. ***************
  1177. *** 12,16 ****
  1178.   
  1179.   MAINTBIN=newshist
  1180. ! MAINT = $(MAINTBIN) newsdaily newswatch newsboot locknews addgroup delgroup adddirs addfeed
  1181.   UTILBIN = gngp newslock ctime getdate canonhdr
  1182.   UTILS = $(UTILBIN) sizeof newshostname
  1183. --- 12,16 ----
  1184.   
  1185.   MAINTBIN=newshist
  1186. ! MAINT = $(MAINTBIN) newsdaily newswatch newsboot locknews addgroup delgroup adddirs addfeed act.to.times
  1187.   UTILBIN = gngp newslock ctime getdate canonhdr
  1188.   UTILS = $(UTILBIN) sizeof newshostname
  1189.  
  1190. *** cnpatch/old/misc/newshist.c    Wed Jan 10 19:10:48 1990
  1191. --- misc/newshist.c    Thu May 24 23:53:49 1990
  1192. ***************
  1193. *** 5,15 ****
  1194.   #include <stdio.h>
  1195.   #include "news.h"
  1196.   #include "history.h"
  1197.   
  1198.   char *progname;
  1199.   int debug;
  1200. - static char *histfile;        /* unused */
  1201.   int remote;            /* to satisfy rnews code */
  1202.   
  1203.   /*
  1204.    * main - parse arguments and handle options
  1205. --- 5,20 ----
  1206.   #include <stdio.h>
  1207.   #include "news.h"
  1208. + #include "headers.h"
  1209. + #include "article.h"
  1210.   #include "history.h"
  1211.   
  1212. + /* exports */
  1213.   char *progname;
  1214.   int debug;
  1215.   int remote;            /* to satisfy rnews code */
  1216. + boolean okrefusal = YES;    /* .. */
  1217.   
  1218. + static char *histfile;        /* unused */
  1219. + 
  1220.   /*
  1221.    * main - parse arguments and handle options
  1222. ***************
  1223. *** 77,79 ****
  1224. --- 82,90 ----
  1225.   unprivileged()
  1226.   {
  1227. + }
  1228. + 
  1229. + prefuse(art)
  1230. + struct article *art;
  1231. + {
  1232. +     /* temporary hack until the cleanup release */
  1233.   }
  1234.  
  1235. *** cnpatch/old/notebook/problems    Tue Mar 13 13:41:26 1990
  1236. --- notebook/problems    Sun May 13 01:23:18 1990
  1237. ***************
  1238. *** 1,3 ****
  1239. ! .DA "8 March 1990"
  1240.   .TL
  1241.   Known Porting Problems With C News
  1242. --- 1,3 ----
  1243. ! .DA "12 May 1990"
  1244.   .TL
  1245.   Known Porting Problems With C News
  1246. ***************
  1247. *** 220,223 ****
  1248. --- 220,228 ----
  1249.   A short-term solution is to use the ``null'' variant, sacrificing space
  1250.   checking for the sake of getting something working.
  1251. + .PP
  1252. + We're told that HP-UX 7.0 users are best advised to
  1253. + choose the ``bsd'' variant of spacefor, and edit it to
  1254. + call \fIbdf\fR instead of \fIdf\fR.
  1255. + Similar approaches may be useful on other hybrid SysV/BSD systems.
  1256.   .SH
  1257.   Floating Point
  1258. ***************
  1259. *** 236,239 ****
  1260. --- 241,246 ----
  1261.   badly enough to cripple it, without producing any error messages.
  1262.   The only fix is to compile \fIdbz\fR without \fB\-O\fR.
  1263. + .PP
  1264. + SCO Xenix/386 2.3 has the same problem.
  1265.   .SH
  1266.   nnafree and nnfree
  1267. ***************
  1268. *** 375,376 ****
  1269. --- 382,440 ----
  1270.   .DE
  1271.   or so we are told.
  1272. + .SH
  1273. + Binary-Mode Fopen
  1274. + .PP
  1275. + In several places, the new
  1276. + \fIdbz\fR
  1277. + uses ANSI C ``binary mode'' fopen codes, e.g.
  1278. + `fopen(...,\ "r+b")'.
  1279. + The text/binary distinction involved is meaningless
  1280. + under Unix, and most Unix implementations just ignore trailing nonsense in
  1281. + the second argument of
  1282. + \fIfopen\fR,
  1283. + so it all works out nicely.
  1284. + .PP
  1285. + Unfortunately... at least one version of DEC's Ultrix objects to the `b's,
  1286. + we are told.
  1287. + Sigh.
  1288. + DEC will have to fix this to make their systems ANSI
  1289. + compatible, but heaven only knows how long that will take.
  1290. + .PP
  1291. + Meanwhile, the fix is to delete the `b's in the second arguments of the
  1292. + \fIfopen\fRs
  1293. + in three places in
  1294. + \fIdbminit()\fR
  1295. + in
  1296. + \fIdbz/dbz.c\fR,
  1297. + if your system has
  1298. + this particular bit of brain damage.
  1299. + .SH
  1300. + size_t
  1301. + .PP
  1302. + Some systems, notably from Microport, do not define the
  1303. + \fIsize_t\fR type in the \fI<sys/types.h>\fR header.
  1304. + Worse, the \fIsize_t\fR in that header doesn't necessarily bear any
  1305. + relationship to the ANSI C \fIsize_t\fR.
  1306. + This causes trouble in the \fIdbz\fR library in particular.
  1307. + The proper type for \fIsize_t\fR is whatever the C \fIsizeof\fR
  1308. + operator returns, nominally an unsigned type which is large enough to
  1309. + contain the size of any memory object.
  1310. + We think nothing relies too heavily on it being unsigned.
  1311. + Note that \fIsize_t\fR must also be suitable for use in the two middle
  1312. + arguments of \fIfread\fR and \fIfwrite\fR, the last argument of
  1313. + \fImemcpy\fR, \fImemchr\fR, and \fImemcmp\fR,
  1314. + and the argument of \fImalloc\fR.
  1315. + .SH
  1316. + Background Processes vs. csh
  1317. + .PP
  1318. + \fIInews\fR runs much of its processing in the background.
  1319. + We are told that this can hit problems, in some circumstances,
  1320. + with \fIcsh\fR's manipulations of signals, terminal modes, etc etc.
  1321. + We prefer a standard shell, and have made no attempt to understand the
  1322. + C shell's weirdnesses.
  1323. + We're aware that well-written programs can fail
  1324. + under the C shell due to bizarre problems with weird signals, etc., but
  1325. + we class this as the fault of the C shell and its co-conspirators and
  1326. + decline to contort our programs to compensate for its failings.
  1327. + We do
  1328. + sympathize with people victimized by it, but can be of no practical help.
  1329.  
  1330. *** cnpatch/old/relay/history.c    Tue Mar 13 13:41:28 1990
  1331. --- relay/history.c    Thu May 24 23:53:56 1990
  1332. ***************
  1333. *** 62,68 ****
  1334. --- 62,72 ----
  1335.   extern datum fetch();
  1336.   
  1337. + /* other imports */
  1338. + extern boolean okrefusal;    /* flag from command line */
  1339. + 
  1340.   /* forward decls */
  1341.   FORWARD datum getposhist();
  1342.   FORWARD void mkhistent(), sanitise(), subsanitise();
  1343. + void decline();
  1344.   
  1345.   STATIC void
  1346. ***************
  1347. *** 89,96 ****
  1348.           /* else fp==NULL and fopenwclex just complained */
  1349.   
  1350.           if (fp != NULL && dbminit(filename) < 0) {
  1351. !             /* no luck. dbminit will have just honked */
  1352.               (void) nfclose(fp);    /* close ascii file */
  1353. !             fp = NULL;        /* and mark it */
  1354.           }
  1355.       }
  1356. --- 93,107 ----
  1357.           /* else fp==NULL and fopenwclex just complained */
  1358.   
  1359. +         errno = 0;
  1360.           if (fp != NULL && dbminit(filename) < 0) {
  1361. !             /*
  1362. !              * no luck.  dbm's dbminit will have just honked (on
  1363. !              * stdout, alas) but dbz's won't have, so bitch.
  1364. !              */
  1365. !             warning(
  1366. !         "database files for `%s' incomprehensible or unavailable",
  1367. !                 filename);
  1368.               (void) nfclose(fp);    /* close ascii file */
  1369. !             fp = NULL;        /* and mark it closed */
  1370.           }
  1371.       }
  1372. ***************
  1373. *** 143,147 ****
  1374.           if (fseek(fp, pos, SEEK_SET) != -1 &&
  1375.               (histent = fgetms(fp)) != NULL)
  1376. !             return histent;
  1377.       }
  1378.       return NULL;
  1379. --- 154,158 ----
  1380.           if (fseek(fp, pos, SEEK_SET) != -1 &&
  1381.               (histent = fgetms(fp)) != NULL)
  1382. !             return histent;        /* could note move from EOF */
  1383.       }
  1384.       return NULL;
  1385. ***************
  1386. *** 185,188 ****
  1387. --- 196,201 ----
  1388.       time_t now;
  1389.   
  1390. +     if (!msgidok(art))        /* complains in log if unhappy */
  1391. +         return;            /* refuse to corrupt history */
  1392.       msgid = strsave(nullify(art->h.h_msgid));
  1393.       sanitise(msgid);    /* RFC 1036 forbids whitespace in msg-ids */
  1394. ***************
  1395. *** 199,208 ****
  1396.           now = time(&now);
  1397.       if (!openhist())
  1398. !         art->a_status |= ST_DROPPED;    /* fall through and return */
  1399.       else if (!writable) {
  1400.           (void) fprintf(stderr, "%s: no write permission on `%s'\n",
  1401.               progname, filename);
  1402. !         art->a_status |= ST_DROPPED;
  1403.       } else if (fseek(fp, 0L, SEEK_END) == -1) {
  1404.           warning("can't seek to end of `%s'", filename);
  1405.           art->a_status |= ST_DROPPED;
  1406. --- 212,222 ----
  1407.           now = time(&now);
  1408.       if (!openhist())
  1409. !         art->a_status |= ST_DROPPED|ST_NEEDATTN;    /* serious */
  1410.       else if (!writable) {
  1411.           (void) fprintf(stderr, "%s: no write permission on `%s'\n",
  1412.               progname, filename);
  1413. !         art->a_status |= ST_DROPPED|ST_NEEDATTN;    /* serious */
  1414.       } else if (fseek(fp, 0L, SEEK_END) == -1) {
  1415. +         /* could avoid fseek if still at EOF */
  1416.           warning("can't seek to end of `%s'", filename);
  1417.           art->a_status |= ST_DROPPED;
  1418. ***************
  1419. *** 213,216 ****
  1420. --- 227,258 ----
  1421.   }
  1422.   
  1423. + void
  1424. + decline(art)                    /* mark art as undesirable */
  1425. + struct article *art;
  1426. + {
  1427. +     art->a_status |= ST_REFUSED|(okrefusal? 0: ST_DROPPED);
  1428. + }
  1429. + 
  1430. + int
  1431. + msgidok(art)                    /* if bad, complain in log */
  1432. + register struct article *art;
  1433. + {
  1434. +     register char *msgid = art->h.h_msgid;
  1435. + 
  1436. +     if (msgid == NULL || msgid[0] == '\0') {
  1437. +         prefuse(art);
  1438. +         (void) printf("missing Message-ID\n");
  1439. +     } else if (strchr(msgid, ' ') != NULL || strchr(msgid, '\t') != NULL) {
  1440. +         prefuse(art);
  1441. +         (void) printf("whitespace in Message-ID\n");
  1442. +     } else if (msgid[0] != '<' || msgid[strlen(msgid)-1] != '>') {
  1443. +         prefuse(art);
  1444. +         (void) printf("Message-ID not bracketed by <>\n");
  1445. +     } else
  1446. +         return YES;
  1447. +     decline(art);
  1448. +     return NO;
  1449. + }
  1450. + 
  1451.   /*
  1452.    * Internal interface to generate a history file entry,
  1453. ***************
  1454. *** 229,233 ****
  1455.       datum msgidkey, posdatum;
  1456.                                           
  1457. !     pos = ftell(fp);            /* get seek ptr for dbm */
  1458.       if (fprintf(fp, "%s%c%ld%c%s", msgid, FIELDSEP, now, SUBFIELDSEP, expiry)
  1459.           == EOF)
  1460. --- 271,275 ----
  1461.       datum msgidkey, posdatum;
  1462.                                           
  1463. !     pos = ftell(fp);  /* get seek ptr for dbm; could keep track instead */
  1464.       if (fprintf(fp, "%s%c%ld%c%s", msgid, FIELDSEP, now, SUBFIELDSEP, expiry)
  1465.           == EOF)
  1466.  
  1467. *** cnpatch/old/relay/makefile    Tue Jan 16 17:58:41 1990
  1468. --- relay/makefile    Mon May 14 14:13:32 1990
  1469. ***************
  1470. *** 19,27 ****
  1471.   COPTS= -O # -pg -g
  1472.   CFLAGS=$(DEFINES) $(COPTS)
  1473. ! DBM = -ldbm
  1474.   LIBS= $(DBM)
  1475.   LINT=lint
  1476.   LINTFLAGS=-haz $(DEFINES)
  1477. ! LLIBS=-llocal
  1478.   # I wish I could make lint shut the fk up about some things.  Grrr!
  1479.   LINTFILT=egrep -v '(possible pointer|long assign|nnfree|getdate|:$$)'
  1480. --- 19,27 ----
  1481.   COPTS= -O # -pg -g
  1482.   CFLAGS=$(DEFINES) $(COPTS)
  1483. ! DBM = # -ldbm
  1484.   LIBS= $(DBM)
  1485.   LINT=lint
  1486.   LINTFLAGS=-haz $(DEFINES)
  1487. ! LLIBS=-llocal -lmalloc
  1488.   # I wish I could make lint shut the fk up about some things.  Grrr!
  1489.   LINTFILT=egrep -v '(possible pointer|long assign|nnfree|getdate|:$$)'
  1490. ***************
  1491. *** 98,106 ****
  1492.       -egrep TODO ../lib*/*.[ch] | tr -s " \11" " " >>$@
  1493.   
  1494. - v7 v8 v9 usg bsd42:
  1495. -     test -d libos && exit 1
  1496. -     mv lib$@ libos # or ln -s lib$@ libos
  1497. -     make
  1498. - 
  1499.   print: printc printnonc
  1500.       touch $@
  1501. --- 98,101 ----
  1502. ***************
  1503. *** 111,117 ****
  1504.       pr $(PROPTS) $? | $P
  1505.       touch $@
  1506. - distr: $(FILES)
  1507. -     (echo relaynews update of `date`; echo ""; bundle $?) | /bin/mail cnews-updates
  1508. -     touch $@
  1509.   clean:
  1510.       rm -f core a.out relaynews *.o    
  1511. --- 106,109 ----
  1512. ***************
  1513. *** 120,124 ****
  1514.   r:    relaynews
  1515.       chmod +x regress/regress
  1516. !     cd regress; ./regress
  1517.       
  1518.   # header dependencies follow
  1519. --- 112,116 ----
  1520.   r:    relaynews
  1521.       chmod +x regress/regress
  1522. !     (cd regress; ./regress)
  1523.       
  1524.   # header dependencies follow
  1525.  
  1526. *** cnpatch/old/relay/msgs.c    Tue Jun 20 19:01:26 1989
  1527. --- relay/msgs.c    Thu May 10 16:45:00 1990
  1528. ***************
  1529. *** 11,15 ****
  1530.   
  1531.   void
  1532. ! fulldisk(art, file)        /* complain once & set ST_DISKFULL */
  1533.   register struct article *art;
  1534.   char *file;
  1535. --- 11,15 ----
  1536.   
  1537.   void
  1538. ! fulldisk(art, file)            /* complain once & set status bits */
  1539.   register struct article *art;
  1540.   char *file;
  1541. ***************
  1542. *** 20,27 ****
  1543.   
  1544.   statust
  1545. ! prfulldisk(file)        /* complain once & return bad status */
  1546.   char *file;
  1547.   {
  1548.       warning("error writing `%s', probably the disk filled", file);
  1549. !     return ST_DISKFULL|ST_DROPPED;
  1550.   }
  1551. --- 20,27 ----
  1552.   
  1553.   statust
  1554. ! prfulldisk(file)            /* complain & return bad status */
  1555.   char *file;
  1556.   {
  1557.       warning("error writing `%s', probably the disk filled", file);
  1558. !     return ST_DISKFULL|ST_NEEDATTN|ST_DROPPED;
  1559.   }
  1560.  
  1561. *** cnpatch/old/relay/procart.c    Sat Apr 14 21:13:19 1990
  1562. --- relay/procart.c    Thu May 24 23:53:53 1990
  1563. ***************
  1564. *** 32,37 ****
  1565.   
  1566.   extern char *exclude;        /* for erik */
  1567. - extern boolean okrefusal;    /* flag from command line */
  1568.   
  1569.   /* forwards */
  1570.   extern void tossorfile(), surveydamage(), reject(), prefuse(), uninsart();
  1571. --- 32,39 ----
  1572.   
  1573.   extern char *exclude;        /* for erik */
  1574.   
  1575. + /* imports */
  1576. + extern void decline();
  1577. + 
  1578.   /* forwards */
  1579.   extern void tossorfile(), surveydamage(), reject(), prefuse(), uninsart();
  1580. ***************
  1581. *** 64,68 ****
  1582.       /*
  1583.        * copyart() may reject() the article, and may fill the disk.
  1584. !      * it calls fileart and logs rejected articles.
  1585.        */
  1586.       copyart(artp, in, inname);
  1587. --- 66,70 ----
  1588.       /*
  1589.        * copyart() may reject() the article, and may fill the disk.
  1590. !      * it calls fileart and logs rejected articles.  it may call uninsart.
  1591.        */
  1592.       copyart(artp, in, inname);
  1593. ***************
  1594. *** 211,215 ****
  1595.           art->a_charswritten += bodylen;
  1596.       }
  1597. !     for (; art->a_unread > 0 && !(art->a_status&ST_DISKFULL) && !feof(in) &&
  1598.           (readcnt=fread(block, 1, (int)min(art->a_unread, COPYSIZE), in)) > 0;
  1599.           art->a_unread -= readcnt, art->a_charswritten += readcnt)
  1600. --- 213,217 ----
  1601.           art->a_charswritten += bodylen;
  1602.       }
  1603. !     for (; art->a_unread > 0 && !(art->a_status&ST_NEEDATTN) && !feof(in) &&
  1604.           (readcnt=fread(block, 1, (int)min(art->a_unread, COPYSIZE), in)) > 0;
  1605.           art->a_unread -= readcnt, art->a_charswritten += readcnt)
  1606. ***************
  1607. *** 222,228 ****
  1608.   
  1609.   /*
  1610. !  * If not yet uninstalled, and the disk filled, uninstall this article
  1611. !  * to remove any zero-length links and decrement the active article number.
  1612. !  * The ST_DISKFULL status will prevent a history entry from being generated.
  1613.    */
  1614.   void
  1615. --- 224,231 ----
  1616.   
  1617.   /*
  1618. !  * If not yet uninstalled, and the disk filled (or the news system was found
  1619. !  * to be otherwise unwell), uninstall this article
  1620. !  * to remove any (zero-length) links and decrement the active article number.
  1621. !  * The ST_NEEDATTN status will prevent a history entry being generated later.
  1622.    */
  1623.   void
  1624. ***************
  1625. *** 237,241 ****
  1626.           art->a_status |= ST_SHORT;    /* NB.: don't uninstall this art. */
  1627.       }
  1628. !     if (*installedp && art->a_status&ST_DISKFULL) {
  1629.           uninsart(art);
  1630.           *installedp = NO;
  1631. --- 240,244 ----
  1632.           art->a_status |= ST_SHORT;    /* NB.: don't uninstall this art. */
  1633.       }
  1634. !     if (*installedp && art->a_status&ST_NEEDATTN) {
  1635.           uninsart(art);
  1636.           *installedp = NO;
  1637. ***************
  1638. *** 253,257 ****
  1639.   
  1640.   /*
  1641. !  * Install the article on art->a_tmpf or art->a_files:
  1642.    * The article should have been accepted and filed in copyart().
  1643.    * Add history entries for the article.  Log arrival.
  1644. --- 256,261 ----
  1645.   
  1646.   /*
  1647. !  * If nothing has gone wrong yet,
  1648. !  * install the article on art->a_tmpf or art->a_files:
  1649.    * The article should have been accepted and filed in copyart().
  1650.    * Add history entries for the article.  Log arrival.
  1651. ***************
  1652. *** 264,278 ****
  1653.   register struct article *art;
  1654.   {
  1655. !     if (!(art->a_status&(ST_DROPPED|ST_REFUSED|ST_DISKFULL))) {
  1656.           if (!art->a_filed)            /* paranoia */
  1657.               (void) fprintf(stderr, "%s: %s not filed by copyart!\n",
  1658.                   progname, art->h.h_msgid);
  1659. !         history(art, STARTLOG);
  1660. !         transmit(art, exclude);        /* writes systems on stdout */
  1661. !         (void) putchar('\n');        /* ends the log line */
  1662. !         ctlmsg(art);
  1663. ! #ifdef notdef                    /* it's only a log file! */
  1664. !         (void) fflush(stdout);        /* crash-proofness */
  1665.   #endif
  1666.       }
  1667.       art->a_status &= ~ST_REFUSED;    /* refusal is quite casual & common */
  1668. --- 268,286 ----
  1669.   register struct article *art;
  1670.   {
  1671. !     if (!(art->a_status&(ST_DROPPED|ST_REFUSED|ST_NEEDATTN))) {
  1672.           if (!art->a_filed)            /* paranoia */
  1673.               (void) fprintf(stderr, "%s: %s not filed by copyart!\n",
  1674.                   progname, art->h.h_msgid);
  1675. !         history(art, STARTLOG);        /* history may be unwritable */
  1676. !         if (art->a_status&(ST_DROPPED|ST_REFUSED|ST_NEEDATTN))
  1677. !             uninsart(art);        /* it was; can't keep the article */
  1678. !         else {
  1679. !             transmit(art, exclude);    /* writes systems on stdout */
  1680. !             (void) putchar('\n');    /* ends the log line */
  1681. !             ctlmsg(art);        /* NCMP */
  1682. ! #ifdef FLUSHLOG
  1683. !             (void) fflush(stdout);    /* crash-proofness */
  1684.   #endif
  1685. +         }
  1686.       }
  1687.       art->a_status &= ~ST_REFUSED;    /* refusal is quite casual & common */
  1688. ***************
  1689. *** 297,311 ****
  1690.           prefuse(art);
  1691.           (void) printf("no Path: header\n");
  1692. !     } else if (msgid == NULL || msgid[0] == '\0') {
  1693.           prefuse(art);
  1694. -         (void) printf("missing Message-ID\n");
  1695. -     } else if (strchr(msgid, ' ') != NULL || strchr(msgid, '\t') != NULL) {
  1696. -         prefuse(art);
  1697. -         (void) printf("whitespace in Message-ID\n");
  1698. -     } else if (msgid[0] != '<' || msgid[strlen(msgid)-1] != '>') {
  1699. -         prefuse(art);
  1700. -         (void) printf("Message-ID not bracketed by <>\n");
  1701. -     } else if (alreadyseen(msgid)) {
  1702. -         prefuse(art);
  1703.           (void) printf("duplicate\n");
  1704.       } else if (path != NULL && hopcount(path) > 0 &&
  1705. --- 305,312 ----
  1706.           prefuse(art);
  1707.           (void) printf("no Path: header\n");
  1708. !     } else if (!msgidok(art))
  1709. !         /* already complained */ ;
  1710. !     else if (alreadyseen(msgid)) {
  1711.           prefuse(art);
  1712.           (void) printf("duplicate\n");
  1713.       } else if (path != NULL && hopcount(path) > 0 &&
  1714. ***************
  1715. *** 328,334 ****
  1716.       } else
  1717.           return;            /* art was accepted */
  1718. !     art->a_status |= ST_REFUSED;
  1719. !     if (!okrefusal)
  1720. !         art->a_status |= ST_DROPPED;
  1721.   }
  1722.   
  1723. --- 329,333 ----
  1724.       } else
  1725.           return;            /* art was accepted */
  1726. !     decline(art);
  1727.   }
  1728.   
  1729. ***************
  1730. *** 349,354 ****
  1731.    * a_tmpf (temporary name if a_unlink set), and return assigned article #'s.
  1732.    * If a_unlink isn't set, a_tmpf is a copy of the first link in art->a_files.
  1733. !  * Must be called before history() is called, else there will be a
  1734. !  * history entry for the article, but no spool files.
  1735.    */
  1736.   void
  1737. --- 348,354 ----
  1738.    * a_tmpf (temporary name if a_unlink set), and return assigned article #'s.
  1739.    * If a_unlink isn't set, a_tmpf is a copy of the first link in art->a_files.
  1740. !  * Must be called before history() is called (or after it has failed),
  1741. !  * else there will be a history entry for the article, but no spool files.
  1742. !  * insart() need not be called first.
  1743.    */
  1744.   void
  1745.  
  1746. *** cnpatch/old/relay/relaynews.c    Sat Apr 14 21:13:20 1990
  1747. --- relay/relaynews.c    Thu May 10 16:45:02 1990
  1748. ***************
  1749. *** 26,34 ****
  1750.    * too wasteful; use the batched form instead (see the ihave sys flag
  1751.    * ("I") instead).
  1752. -  *
  1753. -  * Portability vs SystemV.  relaynews uses dbm(3) and makes no apologies
  1754. -  * for so doing.  Imitation UNIX (registered trademark of AT&T in the
  1755. -  * United States) brand operating systems that lack dbm are going to
  1756. -  * have to use my incredibly slow dbm simulation, or another.
  1757.    */
  1758.   
  1759. --- 26,29 ----
  1760. ***************
  1761. *** 147,151 ****
  1762.       register char *newpath;
  1763.   
  1764. !     (void) umask(2);        /* undo silly umasks, ignore newsumask() */
  1765.       (void) alarm(0);        /* cancel any pending alarm */
  1766.       newpath = malloc((unsigned)(STRLEN("PATH=")+strlen(newspath())+SIZENUL));
  1767. --- 142,146 ----
  1768.       register char *newpath;
  1769.   
  1770. !     (void) umask(newsumask());
  1771.       (void) alarm(0);        /* cancel any pending alarm */
  1772.       newpath = malloc((unsigned)(STRLEN("PATH=")+strlen(newspath())+SIZENUL));
  1773. ***************
  1774. *** 462,466 ****
  1775.       long charcnt;
  1776.   
  1777. !     while (!(status&ST_DISKFULL) && (c = getc(in)) != EOF) {
  1778.           (void) ungetc(c, in);
  1779.           while ((line = fgetms(in)) != NULL &&
  1780. --- 457,461 ----
  1781.       long charcnt;
  1782.   
  1783. !     while (!(status&ST_NEEDATTN) && (c = getc(in)) != EOF) {
  1784.           (void) ungetc(c, in);
  1785.           while ((line = fgetms(in)) != NULL &&
  1786.  
  1787. *** cnpatch/old/relay/sh/inews    Sat Apr 14 21:13:20 1990
  1788. --- relay/sh/inews    Mon Apr 23 15:51:08 1990
  1789. ***************
  1790. *** 88,94 ****
  1791.   
  1792.       -C)
  1793. !         echo "$0: you either want to use addgroup (see newsaux(8)) to make" >&2
  1794. !         echo "$0: $2 locally or this to make it network-wide:" >&2
  1795. !         cat <<eg
  1796.   inews -h <<'!'
  1797.   Control: newgroup $2
  1798. --- 88,94 ----
  1799.   
  1800.       -C)
  1801. !         cat <<eg >&2
  1802. ! $0: you either want to use addgroup (see newsaux(8)) to make
  1803. ! $0: $2 locally, or this to make it network-wide:
  1804.   inews -h <<'!'
  1805.   Control: newgroup $2
  1806. ***************
  1807. *** 199,202 ****
  1808. --- 199,204 ----
  1809.    fi) >$censart
  1810.   
  1811. + ### the article is fully assembled now in $censart ###
  1812. + 
  1813.   # to post or to mail? that is the question; whether 'tis nobler in the mind
  1814.   # to suffer the slings and arrows of outrageous mailers - Bill Shakespeare
  1815. ***************
  1816. *** 252,255 ****
  1817. --- 254,258 ----
  1818.                           >$modroute
  1819.                   moderator="`cat $modroute `"
  1820. +                 # TODO: next line confuses nn; change to stdout?
  1821.                   echo "$0: mailing your article to $moderator" >&2
  1822.                   mail "$moderator" <$censart
  1823. ***************
  1824. *** 282,285 ****
  1825. --- 285,290 ----
  1826.       exit $exitstatus    # trap 0 may cleanup, make dead.article
  1827.   fi
  1828. + 
  1829. + ### if the article was mailed, that happened above; posting will happen below ###
  1830.   
  1831.   # deal with inadequate free space
  1832.  
  1833. *** cnpatch/old/relay/sh/tear    Tue Jun 20 19:01:37 1989
  1834. --- relay/sh/tear    Sun May 13 01:15:45 1990
  1835. ***************
  1836. *** 21,25 ****
  1837.   *)    args="$@" ;;
  1838.   esac
  1839. ! exec awk 'inbody == 0 && $0 ~ /^([ \t]|[^ \t]*:)/ { print >hdr; next }
  1840.                       { inbody = 1; print >body }
  1841.   ' hdr="$hdr" body="$body" $args
  1842. --- 21,25 ----
  1843.   *)    args="$@" ;;
  1844.   esac
  1845. ! exec awk 'inbody == 0 && ($0 ~ /^[^ \t]*:/ || ($0 ~ /^[ \t]/ && NR > 1)) { print >hdr; next }
  1846.                       { inbody = 1; print >body }
  1847.   ' hdr="$hdr" body="$body" $args
  1848.  
  1849. *** cnpatch/old/relay/sys.c    Tue Jan 16 17:58:42 1990
  1850. --- relay/sys.c    Thu May 10 16:43:51 1990
  1851. ***************
  1852. *** 25,29 ****
  1853.   /* forward decls */
  1854.   FORWARD char *parsecolon(), *reparse();
  1855. ! FORWARD void readsys(), parsesysln(), parse(), parseflags();
  1856.   
  1857.   /* exports */
  1858. --- 25,29 ----
  1859.   /* forward decls */
  1860.   FORWARD char *parsecolon(), *reparse();
  1861. ! FORWARD void readsys(), parsesysln(), parse(), parseflags(), newartfile();
  1862.   
  1863.   /* exports */
  1864. ***************
  1865. *** 176,184 ****
  1866.           (void) strcat(deffile, sysp->sy_name);
  1867.           (void) strcat(deffile, BTCHSFX);
  1868. !         free(sysp->sy_cmd);    /* malloced by parse */
  1869. !         sysp->sy_cmd = strsave(fullartfile(deffile));
  1870. !         free(deffile);
  1871. !     }
  1872. !     if (sysp->sy_flags&FLG_BATCH && sysp->sy_cmd[0] != FNDELIM) {
  1873.           register char *absfile = nemalloc((unsigned) STRLEN(BTCHDIR) +
  1874.               strlen(sysp->sy_cmd) + SIZENUL);
  1875. --- 176,182 ----
  1876.           (void) strcat(deffile, sysp->sy_name);
  1877.           (void) strcat(deffile, BTCHSFX);
  1878. !         /* frees old sysp->sy_cmd, deffile */
  1879. !         newartfile(sysp, deffile);
  1880. !     } else if (sysp->sy_flags&FLG_BATCH && sysp->sy_cmd[0] != FNDELIM) {
  1881.           register char *absfile = nemalloc((unsigned) STRLEN(BTCHDIR) +
  1882.               strlen(sysp->sy_cmd) + SIZENUL);
  1883. ***************
  1884. *** 186,195 ****
  1885.           (void) strcpy(absfile, BTCHDIR);
  1886.           (void) strcat(absfile, sysp->sy_cmd);
  1887.           free(sysp->sy_cmd);    /* malloced by parse */
  1888. -         sysp->sy_cmd = strsave(artfile(absfile));
  1889. -         free(absfile);
  1890. -     }
  1891. -     if (!(sysp->sy_flags&FLG_BATCH) && sysp->sy_cmd[0] == '\0') {
  1892. -         free(sysp->sy_cmd);    /* malloced by parse */
  1893.           sysp->sy_cmd = nemalloc((unsigned) STRLEN(CMDPFX) +
  1894.               strlen(sysp->sy_name) + STRLEN(CMDSFX) + SIZENUL);
  1895. --- 184,191 ----
  1896.           (void) strcpy(absfile, BTCHDIR);
  1897.           (void) strcat(absfile, sysp->sy_cmd);
  1898. +         /* frees old sysp->sy_cmd, absfile */
  1899. +         newartfile(sysp, absfile);
  1900. +     } else if (!(sysp->sy_flags&FLG_BATCH) && sysp->sy_cmd[0] == '\0') {
  1901.           free(sysp->sy_cmd);    /* malloced by parse */
  1902.           sysp->sy_cmd = nemalloc((unsigned) STRLEN(CMDPFX) +
  1903.               strlen(sysp->sy_name) + STRLEN(CMDSFX) + SIZENUL);
  1904. ***************
  1905. *** 198,201 ****
  1906. --- 194,207 ----
  1907.           (void) strcat(sysp->sy_cmd, CMDSFX);
  1908.       }
  1909. + }
  1910. + 
  1911. + STATIC void
  1912. + newartfile(sysp, file)        /* replace sysp->sy_cmd with artfile(file) */
  1913. + register struct system *sysp;
  1914. + register char *file;
  1915. + {
  1916. +     free(sysp->sy_cmd);        /* malloced by parse */
  1917. +     sysp->sy_cmd = strsave(artfile(file));
  1918. +     free(file);
  1919.   }
  1920.   
  1921.  
  1922. *** cnpatch/old/relay/trbatch.c    Tue Mar 13 13:41:30 1990
  1923. --- relay/trbatch.c    Fri May  4 14:42:10 1990
  1924. ***************
  1925. *** 97,102 ****
  1926.   }
  1927.   
  1928.   statust
  1929. ! bffkclose(ord)                /* close ord's batchfile, if fake */
  1930.   int ord;
  1931.   {
  1932. --- 97,103 ----
  1933.   }
  1934.   
  1935. + /* ARGSUSED ord */
  1936.   statust
  1937. ! bffkclose(ord)            /* close current (ord's) batchfile, if fake */
  1938.   int ord;
  1939.   {
  1940. ***************
  1941. *** 103,107 ****
  1942.       register statust status = ST_OKAY;
  1943.   
  1944. !     if (ord >= NOPENBFS)
  1945.           status |= bfclose(&fakebatf);
  1946.       return status;
  1947. --- 104,108 ----
  1948.       register statust status = ST_OKAY;
  1949.   
  1950. !     if (fakebatf.bf_str != NULL)
  1951.           status |= bfclose(&fakebatf);
  1952.       return status;
  1953.  
  1954. Files that are new:
  1955.  
  1956. new man/active.times.5 (patch can't create, so diff against null):
  1957. Index: man/active.times.5
  1958. *** cnpatch/old/man/active.times.5    Fri May 25 00:18:01 1990
  1959. --- man/active.times.5    Tue May  8 18:00:10 1990
  1960. ***************
  1961. *** 0 ****
  1962. --- 1,82 ----
  1963. + .\" =()<.ds a @<NEWSARTS>@>()=
  1964. + .ds a /usr/spool/news
  1965. + .\" =()<.ds b @<NEWSBIN>@>()=
  1966. + .ds b /usr/lib/newsbin
  1967. + .\" =()<.ds c @<NEWSCTL>@>()=
  1968. + .ds c /usr/lib/news
  1969. + .\" =()<.ds m @<NEWSMASTER>@>()=
  1970. + .ds m usenet
  1971. + .TH ACTIVE.TIMES 5 "8 May 1990"
  1972. + .BY "C News"
  1973. + .SH NAME
  1974. + active.times \- newsgroup creation times and creators
  1975. + .SH DESCRIPTION
  1976. + The
  1977. + .I active.times
  1978. + file records the arrival of new newsgroups by time and creator.
  1979. + This provides a quick
  1980. + way for newsreaders to tell when new groups have arrived,
  1981. + without weird heuristics and time/space expensive schemes
  1982. + like storing old lists of
  1983. + newsgroups and comparing them to the
  1984. + .I active
  1985. + file.
  1986. + .PP
  1987. + When a new newsgroup is created by C News,
  1988. + via
  1989. + .I \*b/ctl/newgroup
  1990. + or
  1991. + .IR \*b/maint/addgroup ,
  1992. + the group name, time of group creation, and identity of the creator
  1993. + are appended to the
  1994. + .I \*c/active.times
  1995. + file.
  1996. + The time is that returned by 
  1997. + .I \*b/maint/getdate
  1998. + and on Unix systems
  1999. + is the number of seconds since January 1, 1970,
  2000. + 00:00, GMT.
  2001. + The identity of the creator is taken from the
  2002. + .B Sender:
  2003. + or
  2004. + .B From:
  2005. + headers in the control message for groups added with
  2006. + .IR \*b/ctl/newgroup ,
  2007. + and from the environment variable USER
  2008. + (if any; the default identity is ``unknown'')
  2009. + for groups created with
  2010. + .IR \*b/maint/addgroup .
  2011. + .PP
  2012. + Each line in the file is of the form
  2013. + .PP
  2014. + .nf
  2015. + .in +0.5i
  2016. + .ft B
  2017. + newsgroup creation-time creator
  2018. + .ft R
  2019. + .in -0.5i
  2020. + .fi
  2021. + .PP
  2022. + The file must always be sorted in increasing order of the creation-time field.
  2023. + The scripts only append to the file, which normally suffices to ensure this.
  2024. + (It is assumed that time on the machine does not jump backward!)
  2025. + .PP
  2026. + An initial version of
  2027. + .I active.times
  2028. + for already existing newsgroups,
  2029. + with all times equal to the time of its creation
  2030. + and all creators ``unknown'',
  2031. + can be built using
  2032. + .I \*b/maint/act.to.times
  2033. + (see
  2034. + .IR newsmaint (8)).
  2035. + .SH FILES
  2036. + .nf
  2037. + \*c/active.times
  2038. + \*b/maint/addgroup
  2039. + \*b/maint/act.to.times
  2040. + \*b/ctl/newgroup
  2041. + .fi
  2042. + .SH HISTORY
  2043. + Conceived and implemented
  2044. + by Mark Moraes and Geoff Collyer as part of the C News project.
  2045.  
  2046. new misc/act.to.times (patch can't create, so diff against null):
  2047. Index: misc/act.to.times
  2048. *** cnpatch/old/misc/act.to.times    Fri May 25 00:18:01 1990
  2049. --- misc/act.to.times    Tue May  8 17:44:38 1990
  2050. ***************
  2051. *** 0 ****
  2052. --- 1,9 ----
  2053. + # act.to.times [file...] - turn an active file into a active.times file inaccurately
  2054. + # =()<. ${NEWSCONFIG-@<NEWSCONFIG>@}>()=
  2055. + . ${NEWSCONFIG-/usr/lib/news/bin/config}
  2056. + # export NEWSCTL NEWSBIN NEWSARTS
  2057. + PATH=$NEWSCTL/bin:$NEWSBIN:$NEWSPATH ; export PATH
  2058. + umask $NEWSUMASK
  2059. + 
  2060. + now=`getdate now`
  2061. + cat $* | sed "s/ .*/ $now unknown/"
  2062.  
  2063.  
  2064. end of patch 25-May-1990
  2065.  
  2066.