home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 1 / 1466 < prev    next >
Internet Message Format  |  1990-12-28  |  49KB
  1. From: sob@lib.tmc.edu (Stan Barber)
  2. Newsgroups: alt.sources
  3. Subject: rrn/rn combo kit part 9 of 9
  4. Message-ID: <435@lib.tmc.edu>
  5. Date: 14 Jun 90 03:29:56 GMT
  6.  
  7. #! /bin/sh
  8.  
  9. # Make a new directory for the rn sources, cd to it, and run kits 1 thru 9 
  10. # through sh.  When all 9 kits have been run, read README.
  11.  
  12. echo "This is rn kit 9 (of 9).  If kit 9 is complete, the line"
  13. echo '"'"End of kit 9 (of 9)"'" will echo at the end.'
  14. echo ""
  15. export PATH || (echo "You didn't use sh, you clunch." ; kill $$)
  16. echo Extracting only.c
  17. cat >only.c <<'!STUFFY!FUNK!'
  18. /* $Header: only.c,v 4.3 85/05/01 11:45:21 lwall Exp $
  19.  *
  20.  * $Log:    only.c,v $
  21.  * Revision 4.3  85/05/01  11:45:21  lwall
  22.  * Baseline for release with 4.3bsd.
  23.  * 
  24.  */
  25.  
  26. #include "EXTERN.h"
  27. #include "common.h"
  28. #include "search.h"
  29. #include "util.h"
  30. #include "final.h"
  31. #include "ngsrch.h"
  32. #include "INTERN.h"
  33. #include "only.h"
  34.  
  35. void
  36. only_init()
  37. {
  38.     ;
  39. }
  40.  
  41. void
  42. setngtodo(pat)
  43. char *pat;
  44. {
  45.     char *s;
  46.  
  47. #ifdef ONLY
  48.     if (!*pat)
  49.     return;
  50.     if (maxngtodo < NGMAX) {
  51.     ngtodo[maxngtodo] = savestr(pat);
  52. #ifdef SPEEDOVERMEM
  53. #ifndef lint
  54.     compextodo[maxngtodo] = (COMPEX*)safemalloc(sizeof(COMPEX));
  55. #endif lint
  56.     init_compex(compextodo[maxngtodo]);
  57.     compile(compextodo[maxngtodo],pat,TRUE,TRUE);
  58.     if ((s = ng_comp(compextodo[maxngtodo],pat,TRUE,TRUE)) != Nullch) {
  59.                         /* compile regular expression */
  60.         printf("\n%s\n",s) FLUSH;
  61.         finalize(1);
  62.     }
  63. #endif
  64.     maxngtodo++;
  65.     }
  66. #else
  67.     notincl("o");
  68. #endif
  69. }
  70.  
  71. /* if command line list is non-null, is this newsgroup wanted? */
  72.  
  73. bool
  74. inlist(ngnam)
  75. char *ngnam;
  76. {
  77. #ifdef ONLY
  78.     register int i;
  79. #ifdef SPEEDOVERMEM
  80.  
  81.     if (maxngtodo == 0)
  82.     return TRUE;
  83.     for (i=0; i<maxngtodo; i++) {
  84.     if (execute(compextodo[i],ngnam))
  85.         return TRUE;
  86.     }
  87.     return FALSE;
  88. #else
  89.     COMPEX ilcompex;
  90.     char *s;
  91.  
  92.     if (maxngtodo == 0)
  93.     return TRUE;
  94.     init_compex(&ilcompex);
  95.     for (i=0; i<maxngtodo; i++) {
  96.     if ((s = ng_comp(&ilcompex,ngtodo[i],TRUE,TRUE)) != Nullch) {
  97.                         /* compile regular expression */
  98.         printf("\n%s\n",s) FLUSH;
  99.         finalize(1);
  100.     }
  101.     
  102.     if (execute(&ilcompex,ngnam) != Nullch) {
  103.         free_compex(&ilcompex);
  104.         return TRUE;
  105.     }
  106.     }
  107.     free_compex(&ilcompex);
  108.     return FALSE;
  109. #endif
  110. #else
  111.     return TRUE;
  112. #endif
  113. }
  114.  
  115. #ifdef ONLY
  116. void
  117. end_only()
  118. {
  119.     if (maxngtodo) {            /* did they specify newsgroup(s) */
  120.     int whicharg;
  121.  
  122. #ifdef VERBOSE
  123.     IF(verbose)
  124.         printf("\nRestriction %s%s removed.\n",ngtodo[0],
  125.         maxngtodo > 1 ? ", etc." : nullstr) FLUSH;
  126.     ELSE
  127. #endif
  128. #ifdef TERSE
  129.         fputs("\nExiting \"only\".\n",stdout) FLUSH;
  130. #endif
  131.     for (whicharg = 0; whicharg < maxngtodo; whicharg++) {
  132.         free(ngtodo[whicharg]);
  133. #ifdef SPEEDOVERMEM
  134.         free_compex(compextodo[whicharg]);
  135. #ifndef lint
  136.         free((char*)compextodo[whicharg]);
  137. #endif lint
  138. #endif
  139.     }
  140.     maxngtodo = 0;
  141.     }
  142. }
  143. #endif
  144. !STUFFY!FUNK!
  145. echo Extracting ndir.c
  146. cat >ndir.c <<'!STUFFY!FUNK!'
  147. /* $Header: ndir.c,v 4.3.1.5 90/03/22 23:04:47 sob Exp $
  148.  *
  149.  * $Log:    ndir.c,v $
  150.  * Revision 4.3.1.5  90/03/22  23:04:47  sob
  151.  * Fixes provided by Wayne Davison <drivax!davison>
  152.  * 
  153.  * Revision 4.3.1.3  85/05/23  11:19:24  lwall
  154.  * Oops, shouldn't have included sys/types.h again.
  155.  * 
  156.  * Revision 4.3.1.2  85/05/15  14:46:00  lwall
  157.  * Changed short to ino_t, which may be ushort on some systems.
  158.  * 
  159.  * Revision 4.3.1.1  85/05/10  11:35:34  lwall
  160.  * Branch for patches.
  161.  * 
  162.  * Revision 4.3  85/05/01  11:42:55  lwall
  163.  * Baseline for release with 4.3bsd.
  164.  * 
  165.  */
  166.  
  167. #include "EXTERN.h"
  168. #include "common.h"
  169. #include "INTERN.h"
  170. #include "ndir.h"
  171.  
  172. #ifdef USENDIR
  173. /*
  174.  * support for Berkeley directory reading routine on a V7 file system
  175.  */
  176.  
  177. /*
  178.  * open a directory.
  179.  */
  180. DIR *
  181. opendir(name)
  182. char *name;
  183. {
  184.     register DIR *dirp;
  185.     register int fd;
  186.     char *malloc();
  187.  
  188.     if ((fd = open(name, 0)) == -1)
  189.         return NULL;
  190.     if ((dirp = (DIR *)malloc(sizeof(DIR))) == NULL) {
  191.         close (fd);
  192.         return NULL;
  193.     }
  194.     dirp->dd_fd = fd;
  195.     dirp->dd_loc = 0;
  196.     return dirp;
  197. }
  198.  
  199. /*
  200.  * read an old style directory entry and present it as a new one
  201.  */
  202. #ifndef pyr
  203. #define    ODIRSIZ    14
  204.  
  205. struct    olddirect {
  206.     ino_t    od_ino;
  207.     char    od_name[ODIRSIZ];
  208. };
  209. #else    an Pyramid in the ATT universe
  210. #define    ODIRSIZ    248
  211.  
  212. struct    olddirect {
  213.     long    od_ino;
  214.     short    od_fill1, od_fill2;
  215.     char    od_name[ODIRSIZ];
  216. };
  217. #endif
  218.  
  219. /*
  220.  * get next entry in a directory.
  221.  */
  222. struct direct *
  223. readdir(dirp)
  224. register DIR *dirp;
  225. {
  226.     register struct olddirect *dp;
  227.     static struct direct dir;
  228.  
  229.     for (;;) {
  230.         if (dirp->dd_loc == 0) {
  231.             dirp->dd_size = read(dirp->dd_fd, dirp->dd_buf,
  232.                 DIRBLKSIZ);
  233.             if (dirp->dd_size <= 0)
  234.                 return NULL;
  235.         }
  236.         if (dirp->dd_loc >= dirp->dd_size) {
  237.             dirp->dd_loc = 0;
  238.             continue;
  239.         }
  240.         dp = (struct olddirect *)(dirp->dd_buf + dirp->dd_loc);
  241.         dirp->dd_loc += sizeof(struct olddirect);
  242.         if (dp->od_ino == 0)
  243.             continue;
  244.         dir.d_ino = dp->od_ino;
  245.         strncpy(dir.d_name, dp->od_name, ODIRSIZ);
  246.         dir.d_name[ODIRSIZ] = '\0'; /* insure null termination */
  247.         dir.d_namlen = strlen(dir.d_name);
  248.         dir.d_reclen = DIRSIZ(&dir);
  249.         return (&dir);
  250.     }
  251. }
  252.  
  253. /*
  254.  * close a directory.
  255.  */
  256. void
  257. closedir(dirp)
  258. register DIR *dirp;
  259. {
  260.     close(dirp->dd_fd);
  261.     dirp->dd_fd = -1;
  262.     dirp->dd_loc = 0;
  263.     free(dirp);
  264. }
  265. #endif USENDIR
  266. !STUFFY!FUNK!
  267. echo Extracting backpage.c
  268. cat >backpage.c <<'!STUFFY!FUNK!'
  269. /* $Header: backpage.c,v 4.3 85/05/01 11:36:03 lwall Exp $
  270.  *
  271.  * $Log:    backpage.c,v $
  272.  * Revision 4.3  85/05/01  11:36:03  lwall
  273.  * Baseline for release with 4.3bsd.
  274.  * 
  275.  */
  276.  
  277. #include "EXTERN.h"
  278. #include "common.h"
  279. #include "intrp.h"
  280. #include "final.h"
  281. #include "INTERN.h"
  282. #include "backpage.h"
  283.  
  284. ART_LINE maxindx = -1;
  285. long lseek();
  286.  
  287. void
  288. backpage_init()
  289. {
  290.     char *varyname;
  291.     
  292.     varyname = filexp(VARYNAME);
  293.     close(creat(varyname,0600));
  294.     varyfd = open(varyname,2);
  295.     UNLINK(varyname);
  296.     if (varyfd < 0) {
  297.     printf(cantopen,varyname) FLUSH;
  298.     sig_catcher(0);
  299.     }
  300.     
  301. }
  302.  
  303. /* virtual array read */
  304.  
  305. ART_POS
  306. vrdary(indx)
  307. ART_LINE indx;
  308. {
  309.     int subindx;
  310.     long offset;
  311.  
  312. #ifdef DEBUGGING
  313.     if (indx > maxindx) {
  314.     printf("vrdary(%ld) > %ld\n",(long)indx, (long)maxindx) FLUSH;
  315.     return 0;
  316.     }
  317. #endif
  318.     if (indx < 0)
  319.     return 0;
  320.     subindx = indx % VARYSIZE;
  321.     offset = (indx - subindx) * sizeof(varybuf[0]);
  322.     if (offset != oldoffset) {
  323.     if (oldoffset >= 0) {
  324. #ifndef lint
  325.         (void)lseek(varyfd,oldoffset,0);
  326.         write(varyfd, (char *)varybuf,sizeof(varybuf));
  327. #endif lint
  328.     }
  329. #ifndef lint
  330.     (void)lseek(varyfd,offset,0);
  331.     read(varyfd,(char *)varybuf,sizeof(varybuf));
  332. #endif lint
  333.     oldoffset = offset;
  334.     }
  335.     return varybuf[subindx];
  336. }
  337.  
  338. /* write to virtual array */
  339.  
  340. void
  341. vwtary(indx,newvalue)
  342. ART_LINE indx;
  343. ART_POS newvalue;
  344. {
  345.     int subindx;
  346.     long offset;
  347.  
  348. #ifdef DEBUGGING
  349.     if (indx < 0)
  350.     printf("vwtary(%ld)\n",(long)indx) FLUSH;
  351.     if (!indx)
  352.     maxindx = 0;
  353.     if (indx > maxindx) {
  354.     if (indx != maxindx + 1)
  355.         printf("indx skipped %d-%d\n",maxindx+1,indx-1) FLUSH;
  356.     maxindx = indx;
  357.     }
  358. #endif
  359.     subindx = indx % VARYSIZE;
  360.     offset = (indx - subindx) * sizeof(varybuf[0]);
  361.     if (offset != oldoffset) {
  362.     if (oldoffset >= 0) {
  363. #ifndef lint
  364.         (void)lseek(varyfd,oldoffset,0);
  365.         write(varyfd,(char *)varybuf,sizeof(varybuf));
  366. #endif lint
  367.     }
  368. #ifndef lint
  369.     (void)lseek(varyfd,offset,0);
  370.     read(varyfd,(char *)varybuf,sizeof(varybuf));
  371. #endif lint
  372.     oldoffset = offset;
  373.     }
  374.     varybuf[subindx] = newvalue;
  375. }
  376.  
  377. !STUFFY!FUNK!
  378. echo Extracting subs.help.SH
  379. cat >subs.help.SH <<'!STUFFY!FUNK!'
  380. case $CONFIG in
  381.     '') . config.sh ;;
  382. esac
  383. echo "Extracting subs.help (with variable substitutions)"
  384. $spitshell >subs.help <<!GROK!THIS!
  385. $startsh
  386. # $Header: subs.help.SH,v 4.3.2.1 89/11/26 18:38:47 sob Locked $
  387. # 
  388. # $Log:    subs.help.SH,v $
  389. # Revision 4.3.2.1  89/11/26  18:38:47  sob
  390. # *** empty log message ***
  391. # 
  392. # Revision 4.3  85/05/01  11:50:50  lwall
  393. # Baseline for release with 4.3bsd.
  394. # 
  395.  
  396. $pager <<'EOT'
  397. Valid substitutions are:
  398.  
  399. a    Current article number
  400. A    Full name of current article (%P/%c/%a)
  401. b    Destination of last save command, often a mailbox
  402. B    Bytes to ignore at beginning of last saved article
  403. c    Current newsgroup, directory form
  404. C    Current newsgroup, dot form
  405. d    Full name of newsgroup directory (%P/%c)
  406. D    Distribution line from current article
  407. f    Who the current article is from
  408. F    Newsgroups to followup to (from Newsgroups and Followup-To)
  409. h    (This help message)
  410. H    Host name (yours)
  411. i    Message-I.D. line from current article, with <>
  412. I    Reference indicator mark (see -F switch)
  413. l    News administrator's login name, if any
  414. L    Login name (yours)
  415. m    Current mode, first letter of (init,newsgroup,article,pager,misc)
  416. M    Number of article marked with M
  417. n    Newsgroups from current article
  418. N    Full name (yours)
  419. o    Organization (yours)
  420. O    Original working directory (where you ran rn from)
  421. p    Your private news directory (from -d)
  422. P    Public news spool directory
  423. r    Last reference (parent article id)
  424. R    References list for followup article
  425. s    Subject, with all Re's and (nf)'s stripped off
  426. S    Subject, with one Re stripped off
  427. t    New To line derived from From and Reply-To (Internet format)
  428. T    New To line derived from Path
  429. u    Number of unread articles
  430. U    Number of unread articles not counting current article
  431. x    News library directory
  432. X    Rn library directory
  433. z    Length of current article in bytes
  434. ~    Your home directory
  435. .    Directory containing . files
  436. $    Current process number
  437. /    Last search string
  438. ESC    Run preceding command through % interpretation
  439. EOT
  440. !GROK!THIS!
  441. $eunicefix subs.help
  442. chmod 755 subs.help
  443. !STUFFY!FUNK!
  444. echo Extracting bits.h
  445. cat >bits.h <<'!STUFFY!FUNK!'
  446. /* $Header: bits.h,v 4.3.1.2 86/11/03 09:49:58 lwall Exp $
  447.  *
  448.  * $Log:    bits.h,v $
  449.  * Revision 4.3.1.2  86/11/03  09:49:58  lwall
  450.  * Added firstbit variable.
  451.  * 
  452.  * Revision 4.3.1.1  85/05/10  11:31:52  lwall
  453.  * Branch for patches.
  454.  * 
  455.  * Revision 4.3  85/05/01  11:36:39  lwall
  456.  * Baseline for release with 4.3bsd.
  457.  * 
  458.  */
  459.  
  460. EXT char *ctlarea INIT(Nullch);    /* one bit for each article in current newsgroup */
  461.             /* with the following interpretation: */
  462.             /*    0 => unread  */
  463.             /*    1 => read    */
  464.  
  465. /* if subscripting is faster than shifting on your machine, define this */
  466. #undef USESUBSCRIPT
  467. #ifdef USESUBSCRIPT
  468. EXT char powerof2[] INIT({1,2,4,8,16,32,64,128});
  469. #define pow2(x) powerof2[x]
  470. #else
  471. #define pow2(x) (1 << (x))
  472. #endif
  473.  
  474. #ifdef lint
  475. EXT bool nonesuch INIT(FALSE);
  476. #define ctl_set(a)
  477. #define ctl_clear(a)
  478. #define ctl_read(a) nonesuch
  479. #define was_read(a) nonesuch
  480. #else
  481. #define ctl_set(a) (ctlarea[(OFFSET(a)) / BITSPERBYTE] |= pow2((OFFSET(a)) % BITSPERBYTE))
  482. #define ctl_clear(a) (ctlarea[(OFFSET(a)) / BITSPERBYTE] &= ~pow2((OFFSET(a)) % BITSPERBYTE))
  483. #define ctl_read(a) ((ctlarea[(OFFSET(a)) / BITSPERBYTE] & pow2((OFFSET(a)) % BITSPERBYTE)) != 0)
  484.  
  485. #define was_read(a) ((a)<firstbit || ctl_read(a))
  486. #endif lint
  487.  
  488. EXT ART_NUM absfirst INIT(0);    /* 1st real article in current newsgroup */
  489. EXT ART_NUM firstart INIT(0);    /* minimum unread article number in newsgroup */
  490. EXT ART_NUM firstbit INIT(0);    /* minimum valid bit, usually == firstart */
  491. EXT ART_NUM lastart INIT(0);    /* maximum article number in newsgroup */
  492.  
  493. #ifdef DELAYMARK
  494. EXT FILE *dmfp INIT(Nullfp);
  495. EXT char *dmname INIT(Nullch);
  496. EXT int dmcount INIT(0);
  497. #endif
  498.  
  499. void    bits_init();
  500. void    checkpoint_rc();
  501. void    restore_ng();
  502. void    onemore();
  503. void    oneless();
  504. void    unmark_as_read();
  505. void    delay_unmark();
  506. void    mark_as_read();
  507. void    check_first();
  508. #ifdef DELAYMARK
  509.     void    yankback();
  510. #endif
  511. int    chase_xrefs();
  512. int    initctl();
  513. void    grow_ctl();
  514. !STUFFY!FUNK!
  515. echo Extracting getactive.c
  516. cat >getactive.c <<'!STUFFY!FUNK!'
  517. /* $Header: getactive.c,v 1.2 89/11/28 01:50:22 sob Locked $
  518.  *
  519.  * $Log:    getactive.c,v $
  520.  * Revision 1.2  89/11/28  01:50:22  sob
  521.  * Changed so that it won't give makedepend problems with SERVER is not defined.
  522.  * 
  523.  * Revision 1.1  89/11/06  00:50:14  sob
  524.  * Initial revision
  525.  * 
  526.  *
  527.  */
  528. #include <stdio.h>
  529. #include "config.h"
  530. #include "EXTERN.h"
  531. #ifdef SERVER
  532. #include "server.h"
  533. #endif
  534.  
  535. main(argc, argv)
  536.     int        argc;
  537.     char         *argv[];
  538. {
  539.     char        ser_line[256];
  540.     int        response;
  541.     register char    *server;
  542.     register FILE    *actfp;
  543.  
  544.     if (argc != 2) {
  545.         fprintf(stderr, "Usage: getactive filename\n");
  546.         exit(1);
  547.     }
  548.  
  549.     server = getserverbyfile(SERVER_FILE);
  550.     if (server == NULL) {
  551.         fprintf(stderr, "Couldn't get name of news server from %s\n",
  552.             SERVER_FILE);
  553.         fprintf(stderr,
  554.       "Either fix this file, or put NNTPSERVER in your environment.\n");
  555.         exit(1);
  556.     }
  557.  
  558.     response = server_init(server);
  559.     if (response < 0) {
  560.         fprintf(stderr,
  561.             "getactive: Can't get active file from server %s.\n",
  562.                 server);
  563.         exit(1);
  564.     }
  565.  
  566.     if (handle_server_response(response, server) < 0)
  567.         exit(1);
  568.  
  569.     put_server("LIST");    /* tell server we want the active file */
  570.     (void) get_server(ser_line, sizeof(ser_line));
  571.     if (*ser_line != CHAR_OK) {        /* and then see if that's ok */
  572.         fprintf(stderr,
  573.             "getactive: Can't get active file from server.\n");
  574.         fprintf(stderr, "Server said: %s\n", ser_line);
  575.         exit(1);
  576.     }
  577.  
  578.     actfp = fopen(argv[1], "w");        /* and get ready */
  579.     if (actfp == NULL) {
  580.         close_server();
  581.         perror(argv[1]);
  582.         exit(1);
  583.     }
  584.  
  585.     while (get_server(ser_line, sizeof(ser_line)) >= 0) {  /* while */
  586.         if (ser_line[0] == '.')        /* there's another line */
  587.             break;            /* get it and write it to */
  588.         if (actfp != NULL) {        /* the temporary active file */
  589.             fputs(ser_line, actfp);
  590.             putc('\n', actfp);
  591.         }
  592.     }
  593.  
  594.     (void) fclose(actfp);
  595.     close_server();
  596. }
  597. !STUFFY!FUNK!
  598. echo Extracting ng.help.SH
  599. cat >ng.help.SH <<'!STUFFY!FUNK!'
  600. case $CONFIG in
  601.     '') . config.sh ;;
  602. esac
  603. echo "Extracting ng.help (with variable substitutions)"
  604. $spitshell >ng.help <<!GROK!THIS!
  605. $startsh
  606. # $Header: ng.help.SH,v 4.3 85/05/01 11:44:34 lwall Exp $
  607. # 
  608. # $Log:    ng.help.SH,v $
  609. # Revision 4.3  85/05/01  11:44:34  lwall
  610. # Baseline for release with 4.3bsd.
  611. # 
  612.  
  613. $pager <<'EOT'
  614. Newsgroup Selection commands:
  615.  
  616. y,SP    Do this newsgroup now.
  617. .cmd    Do this newsgroup, executing cmd as first command.
  618. =    Equivalent to .=<carriage return>.
  619. u    Unsubscribe from this newsgroup.
  620. c    Catch up (mark this newsgroup all read).
  621.  
  622. n    Go to the next newsgroup with unread news.
  623. N    Go to the next newsgroup.
  624. p    Go to the previous newsgroup with unread news.
  625. P    Go to the previous newsgroup.
  626. -    Go to the previously displayed newsgroup.
  627. 1    Go to the first newsgroup.
  628. ^    Go to the first newsgroup with unread news.
  629. $    Go to the last newsgroup.
  630. g name    Go to the named newsgroup.  Subscribe to new newsgroups this way too.
  631. /pat    Search forward for newsgroup matching pattern.
  632. ?pat    Search backward for newsgroup matching pattern.
  633.     (Use * and ? style patterns.  Append r to include read newsgroups.)
  634. l pat    List unsubscribed newsgroups containing pattern.
  635. m name    Move named newsgroup elsewhere (no name moves current newsgroup).
  636. o pat    Only display newsgroups matching pattern.  Omit pat to unrestrict.
  637. a pat    Like o, but also scans for unsubscribed newsgroups matching pattern.
  638. L    List current .newsrc.
  639. &    Print current command-line switch settings.
  640. &switch {switch}
  641.     Set (or unset) more command-line switches.
  642. &&    Print current macro definitions.
  643. &&def    Define a new macro.
  644. !cmd    Shell escape.
  645. q    Quit rn.
  646. ^K    Edit the global KILL file.  Use commands like /pattern/j to suppress
  647.     pattern in every newsgroup.
  648. v    Print version.
  649. EOT
  650. !GROK!THIS!
  651. $eunicefix ng.help
  652. chmod 755 ng.help
  653. !STUFFY!FUNK!
  654. echo Extracting newsgroups.1
  655. cat >newsgroups.1 <<'!STUFFY!FUNK!'
  656. ''' $Header: newsgroups.1,v 4.3 85/05/01 11:43:32 lwall Exp $
  657. ''' 
  658. ''' $Log:    newsgroups.1,v $
  659. ''' Revision 4.3  85/05/01  11:43:32  lwall
  660. ''' Baseline for release with 4.3bsd.
  661. ''' 
  662. ''' 
  663. .de Sh
  664. .br
  665. .ne 5
  666. .PP
  667. \fB\\$1\fR
  668. .PP
  669. ..
  670. .de Sp
  671. .if t .sp .5v
  672. .if n .sp
  673. ..
  674. '''
  675. '''     Set up \*(-- to give an unbreakable dash;
  676. '''     string Tr holds user defined translation string.
  677. '''     Bell System Logo is used as a dummy character.
  678. '''
  679. .ie n \{\
  680. .tr \(bs-\*(Tr
  681. .ds -- \(bs-
  682. .if (\n(.H=4u)&(1m=24u) .ds -- \(bs\h'-12u'\(bs\h'-12u'-\" diablo 10 pitch
  683. .if (\n(.H=4u)&(1m=20u) .ds -- \(bs\h'-12u'\(bs\h'-8u'-\" diablo 12 pitch
  684. .ds L" ""
  685. .ds R" ""
  686. .ds L' '
  687. .ds R' '
  688. 'br\}
  689. .el\{\
  690. .ds -- \(em\|
  691. .tr \*(Tr
  692. .ds L" ``
  693. .ds R" ''
  694. .ds L' `
  695. .ds R' '
  696. 'br\}
  697. .TH NEWSGROUPS 1 LOCAL
  698. .SH NAME
  699. newsgroups - a program to list unsubscribed newsgroups.
  700. .SH SYNOPSIS
  701. .B newsgroups pattern flag
  702. .SH DESCRIPTION
  703. The
  704. .I newsgroups
  705. program compares your .newsrc file with the file of active newsgroups,
  706. and prints a list of unsubscribed newsgroups matching pattern.
  707. If the second argument \*(L"flag\*(R" is present, only newsgroups not
  708. found in your .newsrc are listed, and the display is not paged.
  709. If the second argument is missing, the display is paged, and an additional
  710. list of unsubscribed newsgroups occurring in your .newsrc is printed.
  711. .SH ENVIRONMENT
  712. .IP DOTDIR 8
  713. Where to find your .newsrc, if not in your home directory.
  714. .Sp
  715. Default: $HOME
  716. .IP HOME 8
  717. Your home directory.
  718. .Sp
  719. Default: $LOGDIR
  720. .IP LOGDIR 8
  721. Your home directory if HOME is undefined.
  722. .SH FILES
  723. /usr/lib/news/active or a reasonable facsimile
  724. .br
  725. ${DOTDIR-{$HOME-$LOGDIR}}/.newsrc
  726. .SH SEE ALSO
  727. rn(1), newsrc(5)
  728. .SH DIAGNOSTICS
  729. .SH BUGS
  730. The flag argument is a kludge.
  731. !STUFFY!FUNK!
  732. echo Extracting pager.help.SH
  733. cat >pager.help.SH <<'!STUFFY!FUNK!'
  734. case $CONFIG in
  735.     '') . config.sh ;;
  736. esac
  737. echo "Extracting pager.help (with variable substitutions)"
  738. $spitshell >pager.help <<!GROK!THIS!
  739. $startsh
  740. # $Header: pager.help.SH,v 4.3 85/05/01 11:45:31 lwall Exp $
  741. #
  742. # $Log:    pager.help.SH,v $
  743. # Revision 4.3  85/05/01  11:45:31  lwall
  744. # Baseline for release with 4.3bsd.
  745. # 
  746.  
  747. $pager <<'EOT'
  748. Paging commands:
  749.  
  750. SP    Display the next page.
  751. x    Display the next page decrypted (rot13).
  752. d    Display half a page more.
  753. CR    Display one more line.
  754. ^R,v,^X    Restart the current article (v=verbose header, ^X=rot13).
  755. ^B    Back up one page.
  756. ^L,X    Refresh the screen (X=rot13).
  757. g pat    Go to (search forward within article for) pattern.
  758. G    Search again for current pattern within article.
  759. ^G    Search for next line beginning with \"Subject:\".
  760. TAB    Search for next line beginning with a different character.
  761. q    Quit the pager, go to end of article.  Leave article read or unread.
  762. j    Junk this article (mark it read).  Goes to end of article.
  763.  
  764. The following commands skip the rest of the current article, then behave
  765. just as if typed to the 'What next?' prompt at the end of the article:
  766.  
  767. n    Scan forward for next unread article.
  768. N    Go to next article.
  769. ^N    Scan forward for next unread article with same title.
  770. p,P,^P    Same as n,N,^N, only going backwards.
  771. -    Go to previously displayed article.
  772.  
  773. The following commands also take you to the end of the article.
  774. Type h at end of article for a description of these commands:
  775.  
  776.     # $ & / = ? c C f F k K ^K m M number r R ^R s S u v w W Y ^ |
  777.  
  778. (To return to the middle of the article after one of these commands, type ^L.)
  779. EOT
  780. !GROK!THIS!
  781. $eunicefix pager.help
  782. chmod 755 pager.help
  783. !STUFFY!FUNK!
  784. echo Extracting range.c
  785. cat >range.c <<'!STUFFY!FUNK!'
  786. #ifndef lint
  787. static char * rcsid ="$Header: range.c,v 1.1 89/11/08 03:45:39 sob Locked $";
  788. #endif
  789. /*
  790. ***************************************************************************
  791. This work in its current form is Copyright 1989 Stan Barber
  792. This software may be distributed freely as long as no profit is made from
  793. such distribution and this notice is reproducted in whole.
  794. ***************************************************************************
  795. This software is provided on an "as is" basis with no guarantee of 
  796. usefulness or correctness of operation for any purpose, intended or
  797. otherwise. The author is in no way liable for this software's performance
  798. or any damage it may cause to any data of any kind anywhere.
  799. ***************************************************************************
  800. */
  801. /*
  802.  * $Log:    range.c,v $
  803.  * Revision 1.1  89/11/08  03:45:39  sob
  804.  * Initial revision
  805.  * 
  806.  *
  807.  */
  808.  
  809. #include <stdio.h>
  810. extern char *rindex();
  811. char * progname;
  812.  
  813. main(argc,argv)
  814. char *argv[];
  815. int argc;
  816. {
  817.     int x,y,i;
  818.  
  819.  
  820.     if ((progname = rindex(argv[0],'/'))== NULL)
  821.         progname = argv[0];
  822.     else progname++;
  823.     
  824.  
  825.     if (argc != 3) usage();
  826.     x = atoi(argv[1]);
  827.     y = atoi(argv[2]);
  828.     if (y < x) usage();
  829.     y++;
  830.  
  831.     for (i=x;i < y;i++)
  832.     printf("%d ",i);
  833.     printf("\n");
  834.  
  835.     exit(0);
  836. }
  837.  
  838. usage(){
  839.     fprintf(stderr,"Usage: %s startnumber endnumber\n",progname);
  840.     exit(-1);
  841. }
  842. !STUFFY!FUNK!
  843. echo Extracting newsnews.SH
  844. cat >newsnews.SH <<'!STUFFY!FUNK!'
  845. case $CONFIG in
  846.     '') . config.sh ;;
  847. esac
  848. echo "Extracting newsnews (with variable substitutions)"
  849. cat >newsnews <<!GROK!THIS!
  850.             *** NEWS NEWS ***
  851.  
  852. Welcome to rn.  There are more options to rn than you want to think about, so
  853. we won't list them here.  If you want to find out about them, read the manual
  854. page(s).  There are some important things to remember, though:
  855.  
  856.   * Rn is not a modified readnews.  Don't expect the commands to be identical.
  857.   * Rn runs in cbreak mode.  This means you don't have to type carriage return
  858.     on single character commands.  (There are some multi-character commands.)
  859.   * At ANY prompt in rn, you may type 'h' for help.  There are many different
  860.     help menus, depending on where you are in rn.  Typing <esc>h in the
  861.     middle of a multi-character command will list escape substitutions.
  862.   * Typing a space to any prompt means to do the normal thing.  You could
  863.     spend all day reading news and never hit anything but the space bar.
  864.  
  865. This particular message comes from $rnlib/newsnews.  You will only
  866. see it once.  You news administrator should feel free to substitute his or
  867. her own message whenever something new happens to rn, and then the file
  868. will again be displayed, just once for each person.
  869.  
  870. Larry Wall    lwall@jpl-devvax.jpl.nasa.gov
  871. !GROK!THIS!
  872. $eunicefix newsnews
  873. !STUFFY!FUNK!
  874. echo Extracting last.c
  875. cat >last.c <<'!STUFFY!FUNK!'
  876. /* $Header: last.c,v 4.3.2.1 89/12/20 23:23:07 sob Exp $
  877.  *
  878.  * $Log:    last.c,v $
  879.  * Revision 4.3.2.1  89/12/20  23:23:07  sob
  880.  * .rnlast sometimes is a null file. This gives bogus information when
  881.  * restarting rn following an abnormal termination. This bug was reported
  882.  * by weening@gang-of-four.stanford.edu
  883.  * 
  884.  * Revision 4.3  85/05/01  11:42:16  lwall
  885.  * Baseline for release with 4.3bsd.
  886.  * 
  887.  */
  888.  
  889. #include "EXTERN.h"
  890. #include "common.h"
  891. #include "rn.h"
  892. #include "util.h"
  893. #include "intrp.h"
  894. #include "INTERN.h"
  895. #include "last.h"
  896.  
  897. char *lastname = Nullch;    /* path name of .rnlast file */
  898.  
  899. void
  900. last_init(tcbuf)
  901. char *tcbuf;
  902. {
  903.     lastname = savestr(filexp(LASTNAME));
  904.     if ((tmpfp = fopen(lastname,"r")) != Nullfp &&
  905.     fgets(tcbuf,1024,tmpfp) != Nullch) {
  906.     tcbuf[strlen(tcbuf)-1] = '\0';
  907.     lastngname = savestr(tcbuf);
  908.     fgets(tcbuf,1024,tmpfp);
  909.     lasttime = atol(tcbuf);
  910.     fgets(tcbuf,1024,tmpfp);
  911.     lastactsiz = atol(tcbuf);
  912.     fclose(tmpfp);
  913.     }
  914.     else {
  915.     lastngname = nullstr;
  916.     lasttime = 0;
  917.     lastactsiz = 0;
  918.     }
  919. }
  920.  
  921. /* put out certain values for next run of rn */
  922.  
  923. void
  924. writelast()
  925. {
  926.     if ((tmpfp = fopen(lastname,"w")) != Nullfp) {
  927.     fprintf(tmpfp,"%s\n%ld\n%ld\n",
  928.         (ngname==Nullch?nullstr:ngname),(long)lasttime,(long)lastactsiz);
  929.     fclose(tmpfp);
  930.     }
  931.     else
  932.     printf(cantcreate,lastname) FLUSH;
  933. }
  934. !STUFFY!FUNK!
  935. echo Extracting rcstuff.h
  936. cat >rcstuff.h <<'!STUFFY!FUNK!'
  937. /* $Header: rcstuff.h,v 4.3 85/05/01 11:46:49 lwall Exp $
  938.  *
  939.  * $Log:    rcstuff.h,v $
  940.  * Revision 4.3  85/05/01  11:46:49  lwall
  941.  * Baseline for release with 4.3bsd.
  942.  * 
  943.  */
  944.  
  945. EXT char *rcline[MAXRCLINE];/* pointers to lines of .newsrc */
  946. EXT ART_UNREAD toread[MAXRCLINE];
  947.             /* number of articles to be read in newsgroup */
  948.             /* <0 => invalid or unsubscribed newsgroup */
  949. #define TR_ONE ((ART_UNREAD) 1)
  950. #define TR_NONE ((ART_UNREAD) 0)
  951. #define TR_UNSUB ((ART_UNREAD) -1)
  952.             /* keep this one as -1, some tests use >= TR_UNSUB */
  953. #define TR_BOGUS ((ART_UNREAD) -2)
  954. #define TR_JUNK ((ART_UNREAD) -3)
  955.  
  956. EXT char rcchar[MAXRCLINE]; /* holds the character : or ! while spot is \0 */
  957. EXT char rcnums[MAXRCLINE]; /* offset from rcline to numbers on line */
  958. EXT ACT_POS softptr[MAXRCLINE];
  959.             /* likely ptr to active file entry for newsgroup */
  960. EXT bool paranoid INIT(FALSE);    /* did we detect some inconsistency in .newsrc? */
  961.  
  962. bool    rcstuff_init();
  963. bool    get_ng();    /* return TRUE if newsgroup can be found or added */
  964. NG_NUM    add_newsgroup();
  965. #ifdef RELOCATE
  966.     NG_NUM    relocate_newsgroup();    /* move newsgroup around */
  967. #endif
  968. void    list_newsgroups();
  969. NG_NUM    find_ng();    /* return index of newsgroup */
  970. void    cleanup_rc();
  971. void    sethash();
  972. int    hash();
  973. void    newsrc_check();
  974. void    write_rc();
  975. void    get_old_rc();
  976. !STUFFY!FUNK!
  977. echo Extracting mbox.saver.SH
  978. cat >mbox.saver.SH <<'!STUFFY!FUNK!'
  979. case $CONFIG in
  980.     '') . config.sh ;;
  981. esac
  982. echo "Extracting mbox.saver (with variable substitutions)"
  983. $spitshell >mbox.saver <<!GROK!THIS!
  984. $startsh
  985. # $Header: mbox.saver.SH,v 4.3.2.2 90/03/17 20:44:54 sob Exp $
  986. # 
  987. # $Log:    mbox.saver.SH,v $
  988. # Revision 4.3.2.2  90/03/17  20:44:54  sob
  989. # Modify Article header to place the colon after Article.
  990. # 
  991. # Revision 4.3.2.1  89/11/28  00:05:47  sob
  992. # Branch for RN/RRN combo patches
  993. # 
  994. # Revision 4.3.1.2  85/05/20  15:55:37  lwall
  995. # Turned $5 into \$5.
  996. # 
  997. # Revision 4.3.1.1  85/05/10  11:35:30  lwall
  998. # Branch for patches.
  999. # 
  1000. # Revision 4.3  85/05/01  11:42:51  lwall
  1001. # Baseline for release with 4.3bsd.
  1002. # 
  1003. # 
  1004. #    Arguments:
  1005. #    1 Full name of article (%A)
  1006. #    2 Public news spool directory (%P)
  1007. #    3 Directory of current newsgroup (%c)
  1008. #    4 Article number (%a)
  1009. #    5 Where in article to start (%B)
  1010. #    6 Newsgroup name (%C)
  1011. #    7 Save destination (%b)
  1012. #    8 First line of message, normally From...
  1013. #
  1014. export PATH || (echo "OOPS, this isn't sh.  Desperation time.  I will feed myself to sh."; sh \$0; kill \$\$)
  1015.  
  1016. ( $echo "\$8"
  1017.   case "\$5" in
  1018.   0) $echo "Article: \$4 of \$6" ;;
  1019.   esac
  1020.   $tail +\$5c \$1 | $sed "s/^From />From /"
  1021.   $echo ""
  1022.   $echo "" ) >> \$7
  1023. !GROK!THIS!
  1024. $eunicefix mbox.saver
  1025. chmod 755 mbox.saver
  1026. !STUFFY!FUNK!
  1027. echo Extracting artio.h
  1028. cat >artio.h <<'!STUFFY!FUNK!'
  1029. /* $Header: artio.h,v 4.3.2.2 89/11/27 01:27:53 sob Locked $
  1030.  *
  1031.  * $Log:    artio.h,v $
  1032.  * Revision 4.3.2.2  89/11/27  01:27:53  sob
  1033.  * Altered NNTP code per ideas suggested by Bela Lubkin
  1034.  * <filbo@gorn.santa-cruz.ca.us>
  1035.  * 
  1036.  * Revision 4.3.2.1  89/11/26  22:41:24  sob
  1037.  * Added RRN support
  1038.  * 
  1039.  * Revision 4.3  85/05/01  11:35:43  lwall
  1040.  * Baseline for release with 4.3bsd.
  1041.  * 
  1042.  */
  1043.  
  1044. EXT ART_POS artpos INIT(0);    /* byte position in article file */
  1045.  
  1046. EXT ART_LINE artline INIT(0);        /* current line number in article file */
  1047. EXT FILE *artfp INIT(Nullfp);        /* current article file pointer */
  1048. EXT ART_NUM openart INIT(0);        /* what is the currently open article number? */
  1049. #ifdef LINKART
  1050.     EXT char *linkartname INIT(nullstr);/* real name of article for Eunice */
  1051. #endif
  1052. #ifdef SERVER
  1053. EXT ART_PART openpart INIT(0);    /* how much of that article do we have? */
  1054. FILE    *nntpopen();        /* get an article unless already retrieved */
  1055.  
  1056. void    nntpclose();
  1057. /* MUST be in increasing order of completeness! */
  1058. #define STAT 1                /* test for existence only */
  1059. #define HEAD 2                /* if only header items are desired */
  1060. #define ARTICLE 3            /* retreive full article  */
  1061. #endif
  1062.  
  1063. void    artio_init();
  1064. FILE    *artopen();        /* open an article unless already opened */
  1065. !STUFFY!FUNK!
  1066. echo Extracting kitlists.c
  1067. cat >kitlists.c <<'!STUFFY!FUNK!'
  1068. /* $Header: kitlists.c,v 4.3.2.1 89/11/08 03:19:35 sob Locked $
  1069.  *
  1070.  * $Log:    kitlists.c,v $
  1071.  * Revision 4.3.2.1  89/11/08  03:19:35  sob
  1072.  * Removed some dependencies.
  1073.  * 
  1074.  * Revision 4.3  85/05/01  11:42:08  lwall
  1075.  * Baseline for release with 4.3bsd.
  1076.  * 
  1077.  */
  1078.  
  1079. #include <stdio.h>
  1080.  
  1081. #define MAXKIT 100
  1082. #define MAXKITSIZE 63000
  1083. #define KITOVERHEAD 700
  1084. #define FILEOVERHEAD 80
  1085.  
  1086. long tot[MAXKIT];
  1087. FILE *outfp[MAXKIT];        /* of course, not this many file descriptors */
  1088.  
  1089. main(argc,argv)
  1090. int argc;
  1091. char **argv;
  1092. {
  1093.     FILE *inp, *popen();
  1094.     char buf[1024], filnam[128];
  1095.     char *index();
  1096.     register char *s;
  1097.     register int i, newtot;
  1098.     
  1099.     sprintf(buf,"\
  1100. ls -l `awk '{print $1}' <%s'` | awk '{print $8 \" \" $4}' | sort +1nr\
  1101. ", argc > 1 ? argv[1] : "MANIFEST.new");
  1102.     inp = popen(buf,"r");
  1103.  
  1104.     while (fgets(buf,1024,inp) != (char *)NULL) {
  1105.     s = index(buf,' ');
  1106.     *s++ = '\0';
  1107.     for (i=1;
  1108.       (newtot = tot[i] + atol(s) + FILEOVERHEAD) > MAXKITSIZE-KITOVERHEAD;
  1109.       i++) 
  1110.         ;
  1111.     if (!tot[i]) {
  1112.         sprintf(filnam,"kit%d.list",i);
  1113.         outfp[i] = fopen(filnam,"w");
  1114.     }
  1115.     tot[i] = newtot;
  1116.     printf("Adding %s to kit %d giving %d bytes\n",buf,i,newtot);
  1117.     fprintf(outfp[i],"%s\n",buf);
  1118.     }
  1119. }
  1120. !STUFFY!FUNK!
  1121. echo Extracting artstate.h
  1122. cat >artstate.h <<'!STUFFY!FUNK!'
  1123. /* $Header: artstate.h,v 4.3.1.2 85/05/13 09:30:30 lwall Exp $
  1124.  *
  1125.  * $Log:    artstate.h,v $
  1126.  * Revision 4.3.1.2  85/05/13  09:30:30  lwall
  1127.  * Added CUSTOMLINES option.
  1128.  * 
  1129.  * Revision 4.3.1.1  85/05/10  11:31:32  lwall
  1130.  * Branch for patches.
  1131.  * 
  1132.  * Revision 4.3  85/05/01  11:35:59  lwall
  1133.  * Baseline for release with 4.3bsd.
  1134.  * 
  1135.  */
  1136.  
  1137. EXT bool reread INIT(FALSE);        /* consider current art temporarily */
  1138.                     /* unread? */
  1139. EXT bool do_fseek INIT(FALSE);    /* should we back up in article file? */
  1140.  
  1141. EXT bool oldsubject INIT(FALSE);    /* not 1st art in subject thread */
  1142. EXT ART_LINE topline INIT(-1);        /* top line of current screen */
  1143. EXT bool do_hiding INIT(TRUE);        /* hide header lines with -h? */
  1144. #ifdef ROTATION
  1145. EXT bool rotate INIT(FALSE);        /* has rotation been requested? */
  1146. #endif
  1147. EXT char *prompt;            /* pointer to current prompt */
  1148.  
  1149. EXT char *firstline INIT(Nullch);            /* special first line? */
  1150. #ifdef CUSTOMLINES
  1151. EXT char *hideline INIT(Nullch);        /* custom line hiding? */
  1152. EXT char *pagestop INIT(Nullch);        /* custom page terminator? */
  1153. EXT COMPEX hide_compex;
  1154. EXT COMPEX page_compex;
  1155. #endif
  1156. !STUFFY!FUNK!
  1157. echo Extracting makedir.SH
  1158. cat >makedir.SH <<'!STUFFY!FUNK!'
  1159. case $CONFIG in
  1160.     '') . config.sh ;;
  1161. esac
  1162. echo "Extracting makedir (with variable substitutions)"
  1163. $spitshell >makedir <<!GROK!THIS!
  1164. $startsh
  1165. # $Header: makedir.SH,v 4.3 85/05/01 11:42:31 lwall Exp $
  1166. # 
  1167. # $Log:    makedir.SH,v $
  1168. # Revision 4.3  85/05/01  11:42:31  lwall
  1169. # Baseline for release with 4.3bsd.
  1170. # 
  1171.  
  1172. export PATH || (echo "OOPS, this isn't sh.  Desperation time.  I will feed myself to sh."; sh \$0; kill \$\$)
  1173.  
  1174. case \$# in
  1175.   0)
  1176.     $echo "makedir pathname filenameflag"
  1177.     exit 1
  1178.     ;;
  1179. esac
  1180.  
  1181. : guarantee one slash before 1st component
  1182. case \$1 in
  1183.   /*) ;;
  1184.   *)  set ./\$1 \$2 ;;
  1185. esac
  1186.  
  1187. : strip last component if it is to be a filename
  1188. case X\$2 in
  1189.   X1) set \`$echo \$1 | $sed 's:\(.*\)/[^/]*\$:\1:'\` ;;
  1190.   *)  set \$1 ;;
  1191. esac
  1192.  
  1193. : return reasonable status if nothing to be created
  1194. if $test -d "\$1" ; then
  1195.     exit 0
  1196. fi
  1197.  
  1198. list=''
  1199. while true ; do
  1200.     case \$1 in
  1201.     */*)
  1202.     list="\$1 \$list"
  1203.     set \`echo \$1 | $sed 's:\(.*\)/:\1 :'\`
  1204.     ;;
  1205.     *)
  1206.     break
  1207.     ;;
  1208.     esac
  1209. done
  1210.  
  1211. set \$list
  1212.  
  1213. for dir do
  1214.     $mkdir \$dir >/dev/null 2>&1
  1215. done
  1216. !GROK!THIS!
  1217. $eunicefix makedir
  1218. chmod 755 makedir
  1219. !STUFFY!FUNK!
  1220. echo Extracting search.h
  1221. cat >search.h <<'!STUFFY!FUNK!'
  1222. /* $Header: search.h,v 4.3 85/05/01 11:50:46 lwall Exp $
  1223.  *
  1224.  * $Log:    search.h,v $
  1225.  * Revision 4.3  85/05/01  11:50:46  lwall
  1226.  * Baseline for release with 4.3bsd.
  1227.  * 
  1228.  */
  1229.  
  1230. #ifndef NBRA
  1231. #define    NBRA    10        /* the maximum number of meta-brackets in an
  1232.                    RE -- \( \) */
  1233. #define NALTS    10        /* the maximum number of \|'s */
  1234.  
  1235. typedef struct {    
  1236.     char *expbuf;        /* The compiled search string */
  1237.     int eblen;            /* Length of above buffer */
  1238.     char *alternatives[NALTS];    /* The list of \| seperated alternatives */
  1239.     char *braslist[NBRA];    /* RE meta-bracket start list */
  1240.     char *braelist[NBRA];    /* RE meta-bracket end list */
  1241.     char *brastr;        /* saved match string after execute() */
  1242.     char nbra;            /* The number of meta-brackets int the most
  1243.                    recenlty compiled RE */
  1244.     bool do_folding;        /* fold upper and lower case? */
  1245. } COMPEX;
  1246.  
  1247. void    search_init();
  1248. void    init_compex();
  1249. void    free_compex();
  1250. char    *getbracket();
  1251. void    case_fold();
  1252. char    *compile(); 
  1253. void    grow_eb();
  1254. char    *execute(); 
  1255. bool    advance();
  1256. bool    backref(); 
  1257. bool    cclass(); 
  1258. #endif
  1259. !STUFFY!FUNK!
  1260. echo Extracting norm.saver.SH
  1261. cat >norm.saver.SH <<'!STUFFY!FUNK!'
  1262. case $CONFIG in
  1263.     '') . config.sh ;;
  1264. esac
  1265. echo "Extracting norm.saver (with variable substitutions)"
  1266. $spitshell >norm.saver <<!GROK!THIS!
  1267. $startsh
  1268. # $Header: norm.saver.SH,v 4.3.2.1 89/11/28 00:08:01 sob Locked $
  1269. # 
  1270. # $Log:    norm.saver.SH,v $
  1271. # Revision 4.3.2.1  89/11/28  00:08:01  sob
  1272. # Branch for RN/RRN combo.
  1273. # 
  1274. # Revision 4.3.1.2  85/05/20  15:56:24  lwall
  1275. # Turned $5 into \$5.
  1276. # 
  1277. # Revision 4.3.1.1  85/05/10  11:36:52  lwall
  1278. # Branch for patches.
  1279. # 
  1280. # Revision 4.3  85/05/01  11:45:16  lwall
  1281. # Baseline for release with 4.3bsd.
  1282. # 
  1283. # 
  1284. #    Arguments:
  1285. #    1 Full name of article (%A)
  1286. #    2 Public news spool directory (%P)
  1287. #    3 Directory of current newsgroup (%c)
  1288. #    4 Article number (%a)
  1289. #    5 Where in article to start (%B)
  1290. #    6 Newsgroup name (%C)
  1291. #    7 Save destination (%b)
  1292. #
  1293. export PATH || (echo "OOPS, this isn't sh.  Desperation time.  I will feed myself to sh."; sh \$0; kill \$\$)
  1294.  
  1295. ( case "\$5" in
  1296.   0) $echo "Article \$4 of \$6:" ;;
  1297.   esac
  1298.   $tail +\$5c \$1
  1299.   $echo ""
  1300.   $echo "" ) >> \$7
  1301. !GROK!THIS!
  1302. $eunicefix norm.saver
  1303. chmod 755 norm.saver
  1304. !STUFFY!FUNK!
  1305. echo Extracting ng.h
  1306. cat >ng.h <<'!STUFFY!FUNK!'
  1307. /* $Header: ng.h,v 4.3 85/05/01 11:44:29 lwall Exp $
  1308.  *
  1309.  * $Log:    ng.h,v $
  1310.  * Revision 4.3  85/05/01  11:44:29  lwall
  1311.  * Baseline for release with 4.3bsd.
  1312.  * 
  1313.  */
  1314.  
  1315. EXT ART_NUM art INIT(0);    /* current or prospective article # */
  1316.  
  1317. EXT int checkcount INIT(0);    /* how many articles have we read */
  1318.             /*   in the current newsgroup since */
  1319.             /*   the last checkpoint? */
  1320. EXT int docheckwhen INIT(20);    /* how often to do checkpoint */
  1321.  
  1322. #ifdef MAILCALL
  1323. EXT int mailcount INIT(0);            /* check for mail when 0 mod 10 */
  1324. #endif
  1325. EXT char *mailcall INIT(nullstr);
  1326.  
  1327. EXT bool forcelast INIT(FALSE);            /* ought we show "End of newsgroup"? */
  1328. EXT bool forcegrow INIT(FALSE);        /* do we want to recalculate size */
  1329.                     /* of newsgroup, e.g. after posting? */
  1330.  
  1331. #define NG_ERROR -1
  1332. #define NG_NORM 0
  1333. #define NG_ASK 1
  1334. #define NG_MINUS 2
  1335.  
  1336. void    ng_init();
  1337. int    do_newsgroup();
  1338. int    art_switch();
  1339. #ifdef MAILCALL
  1340.     void    setmail();
  1341. #endif
  1342. void    setdfltcmd();
  1343. !STUFFY!FUNK!
  1344. echo Extracting util.h
  1345. cat >util.h <<'!STUFFY!FUNK!'
  1346. /* $Header: util.h,v 4.3 85/05/01 11:51:58 lwall Exp $
  1347.  *
  1348.  * $Log:    util.h,v $
  1349.  * Revision 4.3  85/05/01  11:51:58  lwall
  1350.  * Baseline for release with 4.3bsd.
  1351.  * 
  1352.  */
  1353.  
  1354. EXT bool waiting INIT(FALSE);        /* are we waiting for subprocess (in doshell)? */
  1355. EXT int len_last_line_got INIT(0);
  1356.             /* strlen of some_buf after */
  1357.             /*  some_buf = get_a_line(bufptr,buffersize,fp) */
  1358.  
  1359. /* is the string for makedir a directory name or a filename? */
  1360.  
  1361. #define MD_DIR 0
  1362. #define MD_FILE 1
  1363.  
  1364. void    util_init();
  1365. int    doshell();
  1366. char    *safemalloc();
  1367. char    *saferealloc();
  1368. char    *safecpy();
  1369. char    *safecat();
  1370. char    *cpytill();
  1371. char    *instr();
  1372. #ifdef SETUIDGID
  1373.     int        eaccess();
  1374. #endif
  1375. char    *getwd();
  1376. void    cat();
  1377. void    prexit();
  1378. char    *get_a_line();
  1379. char    *savestr();
  1380. int    makedir();
  1381. void    setenv();
  1382. int    envix();
  1383. void    notincl();
  1384. char    *getval();
  1385. void    growstr();
  1386. void    setdef();
  1387. !STUFFY!FUNK!
  1388. echo Extracting ngdata.h
  1389. cat >ngdata.h <<'!STUFFY!FUNK!'
  1390. /* $Header: ngdata.h,v 4.3.2.1 89/11/06 00:41:21 sob Locked $
  1391.  *
  1392.  * $Log:    ngdata.h,v $
  1393.  * Revision 4.3.2.1  89/11/06  00:41:21  sob
  1394.  * Added RRN support from NNTP 1.5
  1395.  * 
  1396.  * Revision 4.3  85/05/01  11:44:48  lwall
  1397.  * added to local RCS
  1398.  * 
  1399.  * Revision 4.3  85/05/01  11:44:48  lwall
  1400.  * Baseline for release with 4.3bsd.
  1401.  * 
  1402.  */
  1403.  
  1404. EXT FILE *actfp INIT(Nullfp);    /* the active file */
  1405. EXT bool writesoft INIT(FALSE);    /* rewrite the soft pointer file? */
  1406. EXT int softtries INIT(0), softmisses INIT(0);
  1407.  
  1408. #ifdef SERVER
  1409.     EXT char active_name[256];
  1410. #endif
  1411.  
  1412. #ifdef CACHEFIRST
  1413.     EXT ART_NUM abs1st[MAXRCLINE];    /* 1st real article in newsgroup */
  1414. #else
  1415. # ifdef MININACT
  1416.     EXT ART_NUM abs1st INIT(0);
  1417. # endif
  1418. #endif
  1419.  
  1420. EXT char *moderated;
  1421.  
  1422. void    ngdata_init();
  1423. ART_NUM    getngsize();
  1424. ACT_POS findact();
  1425. ART_NUM    getabsfirst();
  1426. ART_NUM    getngmin();
  1427. !STUFFY!FUNK!
  1428. echo Extracting rn.h
  1429. cat >rn.h <<'!STUFFY!FUNK!'
  1430. /* $Header: rn.h,v 4.3 85/05/01 11:48:19 lwall Exp $
  1431.  *
  1432.  * $Log:    rn.h,v $
  1433.  * Revision 4.3  85/05/01  11:48:19  lwall
  1434.  * Baseline for release with 4.3bsd.
  1435.  * 
  1436.  */
  1437.  
  1438. EXT char *ngname INIT(Nullch);        /* name of current newsgroup */
  1439. EXT int ngnlen INIT(0);            /* current malloced size of ngname */
  1440. EXT char *ngdir INIT(Nullch);        /* same thing in directory name form */
  1441. EXT int ngdlen INIT(0);            /* current malloced size of ngdir */
  1442.  
  1443. EXT NG_NUM ng INIT(0);        /* current newsgroup index into rcline and toread */
  1444. EXT NG_NUM current_ng INIT(0);    /* stable current newsgroup so we can ditz with ng */
  1445. EXT NG_NUM starthere INIT(0);   /* set to the first newsgroup with unread news on startup */
  1446. EXT char *spool INIT(Nullch);        /* public news spool directory */
  1447.  
  1448. void    rn_init();
  1449. void    main();
  1450. void    set_ngname();
  1451. char    *getngdir();
  1452. !STUFFY!FUNK!
  1453. echo Extracting intrp.h
  1454. cat >intrp.h <<'!STUFFY!FUNK!'
  1455. /* $Header: intrp.h,v 4.3 85/05/01 11:41:48 lwall Exp $
  1456.  *
  1457.  * $Log:    intrp.h,v $
  1458.  * Revision 4.3  85/05/01  11:41:48  lwall
  1459.  * Baseline for release with 4.3bsd.
  1460.  * 
  1461.  */
  1462.  
  1463. EXT char *lib INIT(Nullch);        /* news library */
  1464. EXT char *rnlib INIT(Nullch);        /* private news program library */
  1465. EXT char *origdir INIT(Nullch);        /* cwd when rn invoked */
  1466. EXT char *homedir INIT(Nullch);        /* login directory */
  1467. EXT char *dotdir INIT(Nullch);        /* where . files go */
  1468. EXT char *logname INIT(Nullch);        /* login id */
  1469. EXT char *sitename INIT(Nullch);    /* host name */
  1470.  
  1471. #ifdef NEWSADMIN
  1472.     EXT char newsadmin[] INIT(NEWSADMIN);/* news administrator */
  1473.     EXT int newsuid INIT(0);
  1474. #endif
  1475.  
  1476. void    intrp_init();
  1477. char    *filexp();
  1478. char    *dointerp();
  1479. void    interp();
  1480. void    refscpy();
  1481. char    *getrealname();
  1482. !STUFFY!FUNK!
  1483. echo Extracting Wishlist
  1484. cat >Wishlist <<'!STUFFY!FUNK!'
  1485. Generalized article set manipulation
  1486.     Interface to subject listing.
  1487.     Recursive newsgroup visitation.
  1488. Virtual article abstract type to allow the following:
  1489.     Personalized header munging via % subs.
  1490.     Undigestification.
  1491.     Personal archive perusal.
  1492.     Mail handling.
  1493. Parent command (waiting for ARTFILE interface and recursive newsgroups).
  1494. Merge Pnews and postnews.
  1495. Vnews duplicate suppression algorithm for sites that can't do Xref patch.
  1496. Dynamic allocation of stuff currently restricted by MAXRCLINE.
  1497.     (And pull parallel arrays into array of structs).
  1498. Separation of .newsrc functions and newsgroup functions to separate processes
  1499.     communicating via pipes (to make fit on non-separate-I-and-D pdp11,
  1500.     or unreasonable facsimiles thereof).
  1501. Faster!!!
  1502. Smaller!!!
  1503. More general!!!
  1504. Perfect?
  1505. !STUFFY!FUNK!
  1506. echo Extracting makekit
  1507. cat >makekit <<'!STUFFY!FUNK!'
  1508. #!/bin/sh
  1509. # $Header: makekit,v 4.3 85/05/01 11:42:38 lwall Exp $
  1510. #
  1511. # $Log:    makekit,v $
  1512. # Revision 4.3  85/05/01  11:42:38  lwall
  1513. # Baseline for release with 4.3bsd.
  1514. # 
  1515.  
  1516. numkits=$#
  1517. for kitlist in $*; do
  1518.     kit=`basename $kitlist .list`
  1519.     kitnum=`expr "$kit" : 'kit\([0-9][0-9]*\)'`
  1520.     echo "*** Making $kit ***"
  1521.     kitleader "$kit" "$kitnum" "$numkits"
  1522.     for file in `/bin/cat $kitlist`; do
  1523.     echo $file
  1524.     echo "echo Extracting $file" >> $kit
  1525.     if egrep '^\.$' $file; then
  1526.         echo "sed >$file <<'!STUFFY!FUNK!' -e 's/X//'" >> $kit
  1527.         sed <$file >>$kit -e 's/^/X/'
  1528.     else
  1529.         echo "cat >$file <<'!STUFFY!FUNK!'" >> $kit
  1530.         /bin/cat $file >> $kit
  1531.     fi
  1532.     echo "!STUFFY!FUNK!" >> $kit
  1533.     done
  1534.     kittrailer "$kit" "$kitnum" "$numkits"
  1535. done
  1536. !STUFFY!FUNK!
  1537. echo Extracting final.h
  1538. cat >final.h <<'!STUFFY!FUNK!'
  1539. /* $Header: final.h,v 4.3 85/05/01 11:38:17 lwall Exp $
  1540.  * 
  1541.  * $Log:    final.h,v $
  1542.  * Revision 4.3  85/05/01  11:38:17  lwall
  1543.  * Baseline for release with 4.3bsd.
  1544.  * 
  1545.  */
  1546.  
  1547. /* cleanup status for fast exits */
  1548.  
  1549. EXT bool panic INIT(FALSE);        /* we got hung up or something-- */
  1550.                     /*  so leave tty alone */
  1551. EXT bool rc_changed INIT(FALSE);    /* need we rewrite .newsrc? */
  1552. EXT bool doing_ng INIT(FALSE);        /* do we need to reconstitute */
  1553.                     /* current rc line? */
  1554.  
  1555. EXT char int_count INIT(0);        /* how many interrupts we've had */
  1556.  
  1557. /* signal catching routines */
  1558.  
  1559. int    int_catcher();
  1560. int    sig_catcher();
  1561. #ifdef SIGTSTP
  1562.     int    stop_catcher();
  1563.     int    cont_catcher();
  1564. #endif
  1565.  
  1566. void    final_init();
  1567. void    finalize();
  1568. !STUFFY!FUNK!
  1569. echo Extracting manimake
  1570. cat >manimake <<'!STUFFY!FUNK!'
  1571. #!/bin/sh
  1572. # $Header: manimake,v 4.3 85/05/01 11:42:46 lwall Exp $
  1573. #
  1574. # $Log:    manimake,v $
  1575. # Revision 4.3  85/05/01  11:42:46  lwall
  1576. # Baseline for release with 4.3bsd.
  1577. # 
  1578.  
  1579. : make MANIFEST and MANIFEST.new say the same thing
  1580. if test -f MANIFEST.new; then
  1581.     cat <<'EOH' > MANIFEST
  1582. After all the rn kits are run you should have the following files:
  1583.  
  1584. Filename    Kit Description
  1585. --------    --- -----------
  1586. EOH
  1587.     sort MANIFEST.new >.mani
  1588.     grep . kit*.list | sed 's/^kit\(.*\)\.list:\$*\(.*\)$/\2 |\1|/' | \
  1589.     sort | \
  1590.     join -a1 - .mani | \
  1591.     awk -F'|' '{printf "%-16s%2s %s\n",$1,$2,$3}' | \
  1592.     unexpand >> MANIFEST
  1593.     rm .mani
  1594. else
  1595.     echo "You don't have a MANIFEST.new file.  Run manifake."
  1596. fi
  1597. !STUFFY!FUNK!
  1598. echo Extracting kittrailer
  1599. cat >kittrailer <<'!STUFFY!FUNK!'
  1600. #! /bin/sh
  1601. # $Header: kittrailer,v 4.3 85/05/01 11:42:11 lwall Exp $
  1602. #
  1603. # $Log:    kittrailer,v $
  1604. # Revision 4.3  85/05/01  11:42:11  lwall
  1605. # Baseline for release with 4.3bsd.
  1606. # 
  1607.  
  1608. rangelist=`range 1 $3`
  1609. cat >>$1 <<EOT
  1610. echo ""
  1611. echo "End of kit $2 (of $3)"
  1612. cat /dev/null >kit${2}isdone
  1613. config=true
  1614. for iskit in $rangelist; do
  1615.     if test -f kit\${iskit}isdone; then
  1616.     echo "You have run kit \${iskit}."
  1617.     else
  1618.     echo "You still need to run kit \${iskit}."
  1619.     config=false
  1620.     fi
  1621. done
  1622. case \$config in
  1623.     true)
  1624.     echo "You have run all your kits.  Please read README and then type Configure."
  1625.     chmod 755 Configure
  1626.     ;;
  1627. esac
  1628. : I do not append .signature, but someone might mail this.
  1629. exit
  1630. EOT
  1631. !STUFFY!FUNK!
  1632. echo Extracting only.h
  1633. cat >only.h <<'!STUFFY!FUNK!'
  1634. /* $Header: only.h,v 4.3 85/05/01 11:45:27 lwall Exp $
  1635.  *
  1636.  * $Log:    only.h,v $
  1637.  * Revision 4.3  85/05/01  11:45:27  lwall
  1638.  * Baseline for release with 4.3bsd.
  1639.  * 
  1640.  */
  1641.  
  1642. #ifndef NBRA
  1643. #include "search.h"
  1644. #endif
  1645.  
  1646. #ifdef ONLY
  1647.     EXT char *ngtodo[NGMAX];        /* restrictions in effect */
  1648. #   ifdef SPEEDOVERMEM
  1649.     EXT COMPEX *compextodo[NGMAX];    /* restrictions in compiled form */
  1650. #   endif
  1651. #endif
  1652.  
  1653. EXT int maxngtodo INIT(0);            /*  0 => no restrictions */
  1654.                     /* >0 => # of entries in ngtodo */
  1655.  
  1656. void    only_init();
  1657. bool    inlist();    /* return TRUE if ngname is in command line list */
  1658.             /* or if there was no list */
  1659. void    setngtodo();
  1660. #ifdef ONLY
  1661.     void    end_only();
  1662. #endif
  1663. !STUFFY!FUNK!
  1664. echo Extracting kfile.h
  1665. cat >kfile.h <<'!STUFFY!FUNK!'
  1666. /* $Header: kfile.h,v 4.3 85/05/01 11:42:00 lwall Exp $
  1667.  *
  1668.  * $Log:    kfile.h,v $
  1669.  * Revision 4.3  85/05/01  11:42:00  lwall
  1670.  * Baseline for release with 4.3bsd.
  1671.  * 
  1672.  */
  1673.  
  1674. #define KF_GLOBAL 0
  1675. #define KF_LOCAL 1
  1676.  
  1677. #ifdef KILLFILES
  1678. EXT FILE *globkfp INIT(Nullfp);        /* global article killer file */
  1679. EXT FILE *localkfp INIT(Nullfp);    /* local (for this newsgroup) */
  1680.                     /*  article killer file */
  1681. #endif
  1682.  
  1683. void    kfile_init();
  1684. int    do_kfile();
  1685. void    kill_unwanted();
  1686. int    edit_kfile();
  1687. void    open_kfile();
  1688. void    kf_append();
  1689. void    setthru();
  1690.  
  1691. !STUFFY!FUNK!
  1692. echo Extracting backpage.h
  1693. cat >backpage.h <<'!STUFFY!FUNK!'
  1694. /* $Header: backpage.h,v 4.3 85/05/01 11:36:11 lwall Exp $
  1695.  *
  1696.  * $Log:    backpage.h,v $
  1697.  * Revision 4.3  85/05/01  11:36:11  lwall
  1698.  * Baseline for release with 4.3bsd.
  1699.  * 
  1700.  */
  1701.  
  1702. /* things for doing the 'back page' command */
  1703.  
  1704. EXT int varyfd INIT(0);            /* virtual array file for storing  */
  1705.                     /* file offsets */
  1706. EXT ART_POS varybuf[VARYSIZE];        /* current window onto virtual array */
  1707.  
  1708. EXT long oldoffset INIT(-1);        /* offset to block currently in window */
  1709.  
  1710. void    backpage_init();
  1711. ART_POS    vrdary();
  1712. void    vwtary();
  1713. !STUFFY!FUNK!
  1714. echo Extracting ngsrch.h
  1715. cat >ngsrch.h <<'!STUFFY!FUNK!'
  1716. /* $Header: ngsrch.h,v 4.3 85/05/01 11:44:56 lwall Exp $
  1717.  *
  1718.  * $Log:    ngsrch.h,v $
  1719.  * Revision 4.3  85/05/01  11:44:56  lwall
  1720.  * Baseline for release with 4.3bsd.
  1721.  * 
  1722.  */
  1723.  
  1724. #ifdef NGSEARCH
  1725. #define NGS_ABORT 0
  1726. #define NGS_FOUND 1
  1727. #define NGS_INTR 2
  1728. #define NGS_NOTFOUND 3
  1729.  
  1730. EXT bool ng_doread INIT(FALSE);        /* search read newsgroups? */
  1731. #endif
  1732.  
  1733. void    ngsrch_init();
  1734. #ifdef NGSEARCH 
  1735.     int        ng_search();
  1736.     bool    ng_wanted();
  1737. #endif
  1738. #ifdef NGSORONLY
  1739.     char    *ng_comp();
  1740. #endif
  1741. !STUFFY!FUNK!
  1742. echo Extracting manifake
  1743. cat >manifake <<'!STUFFY!FUNK!'
  1744. #!/bin/sh
  1745. # $Header: manifake,v 4.3 85/05/01 11:42:41 lwall Exp $
  1746. #
  1747. # $Log:    manifake,v $
  1748. # Revision 4.3  85/05/01  11:42:41  lwall
  1749. # Baseline for release with 4.3bsd.
  1750. # 
  1751.  
  1752. : make MANIFEST and MANIFEST.new say the same thing
  1753. if test ! -f MANIFEST.new; then
  1754.     if test -f MANIFEST; then
  1755.     sed <MANIFEST >MANIFEST.new \
  1756.         -e '1,/---/d' \
  1757.         -e 's/\([     ][     ]*\)[0-9]*  */\1/'
  1758.     else
  1759.     echo "Make a MANIFEST.new file, with names and descriptions."
  1760.     fi
  1761. fi
  1762. !STUFFY!FUNK!
  1763. echo Extracting respond.h
  1764. cat >respond.h <<'!STUFFY!FUNK!'
  1765. /* $Header: respond.h,v 4.3 85/05/01 11:47:50 lwall Exp $
  1766.  *
  1767.  * $Log:    respond.h,v $
  1768.  * Revision 4.3  85/05/01  11:47:50  lwall
  1769.  * Baseline for release with 4.3bsd.
  1770.  * 
  1771.  */
  1772.  
  1773. EXT char *savedest INIT(Nullch);    /* value of %b */
  1774. EXT ART_POS savefrom INIT(0);        /* value of %B */
  1775. EXT char *headname INIT(Nullch);
  1776.  
  1777. #define SAVE_ABORT 0
  1778. #define SAVE_DONE 1
  1779.  
  1780. void    respond_init();
  1781. int    save_article();
  1782. int    cancel_article();
  1783. void    reply();
  1784. void    followup();
  1785. void    invoke();
  1786. !STUFFY!FUNK!
  1787. echo Extracting cheat.h
  1788. cat >cheat.h <<'!STUFFY!FUNK!'
  1789. /* $Header: cheat.h,v 4.3 85/05/01 11:36:58 lwall Exp $
  1790.  *
  1791.  * $Log:    cheat.h,v $
  1792.  * Revision 4.3  85/05/01  11:36:58  lwall
  1793.  * Baseline for release with 4.3bsd.
  1794.  * 
  1795.  */
  1796.  
  1797. #ifdef ARTSEARCH
  1798. EXT ART_NUM srchahead INIT(0);     /* are we in subject scan mode? */
  1799.                 /* (if so, contains art # found or -1) */
  1800. #endif
  1801.  
  1802. #ifdef PENDING
  1803. #   ifdef CACHESUBJ
  1804.     EXT ART_NUM subj_to_get;
  1805. #   endif
  1806. #endif
  1807.  
  1808. void    cheat_init();
  1809. void    look_ahead();
  1810. void    collect_subjects();
  1811. !STUFFY!FUNK!
  1812. echo Extracting last.h
  1813. cat >last.h <<'!STUFFY!FUNK!'
  1814. /* $Header: last.h,v 4.3 85/05/01 11:42:22 lwall Exp $
  1815.  *
  1816.  * $Log:    last.h,v $
  1817.  * Revision 4.3  85/05/01  11:42:22  lwall
  1818.  * Baseline for release with 4.3bsd.
  1819.  * 
  1820.  */
  1821.  
  1822. EXT char *lastngname INIT(Nullch);    /* last newsgroup read, from .rnlast file */
  1823. EXT long lasttime INIT(0);    /* time last rn was started up */
  1824. EXT long lastactsiz INIT(0);    /* size of active file when rn last started up */
  1825.  
  1826. void    last_init();
  1827. void    writelast();
  1828. !STUFFY!FUNK!
  1829. echo Extracting rcln.h
  1830. cat >rcln.h <<'!STUFFY!FUNK!'
  1831. /* $Header: rcln.h,v 4.3 85/05/01 11:45:52 lwall Exp $
  1832.  *
  1833.  * $Log:    rcln.h,v $
  1834.  * Revision 4.3  85/05/01  11:45:52  lwall
  1835.  * Baseline for release with 4.3bsd.
  1836.  * 
  1837.  */
  1838.  
  1839. #ifdef DEBUGGING
  1840. EXT ART_NUM ngmax[MAXRCLINE];
  1841. #endif
  1842.  
  1843. void    rcln_init();
  1844. #ifdef CATCHUP
  1845.     void    catch_up();
  1846. #endif
  1847. int    addartnum();
  1848. #ifdef MCHASE
  1849.     void    subartnum();
  1850. #endif
  1851. void    prange();
  1852. void    set_toread();
  1853. void    checkexpired();
  1854. !STUFFY!FUNK!
  1855. echo Extracting sw.h
  1856. cat >sw.h <<'!STUFFY!FUNK!'
  1857. /* $Header: sw.h,v 4.3 85/05/01 11:51:07 lwall Exp $
  1858.  *
  1859.  * $Log:    sw.h,v $
  1860.  * Revision 4.3  85/05/01  11:51:07  lwall
  1861.  * Baseline for release with 4.3bsd.
  1862.  * 
  1863.  */
  1864.  
  1865. #ifdef INNERSEARCH
  1866. EXT int gline INIT(0);
  1867. #endif
  1868.  
  1869. void    sw_init();
  1870. void    sw_file();
  1871. void    sw_list();
  1872. void    decode_switch();
  1873. void    pr_switches();
  1874. void    cwd_check();
  1875. !STUFFY!FUNK!
  1876. echo Extracting init.h
  1877. cat >init.h <<'!STUFFY!FUNK!'
  1878. /* $Header: init.h,v 4.3 85/05/01 11:40:46 lwall Exp $
  1879.  *
  1880.  * $Log:    init.h,v $
  1881.  * Revision 4.3  85/05/01  11:40:46  lwall
  1882.  * Baseline for release with 4.3bsd.
  1883.  * 
  1884.  */
  1885.  
  1886. EXT char *lockname INIT(nullstr);
  1887.  
  1888. bool    initialize();
  1889. void    lock_check();
  1890. void    newsnews_check();
  1891. void    version_check();
  1892. !STUFFY!FUNK!
  1893. echo Extracting help.h
  1894. cat >help.h <<'!STUFFY!FUNK!'
  1895. /* $Header: help.h,v 4.3 85/05/01 11:39:19 lwall Exp $
  1896.  *
  1897.  * $Log:    help.h,v $
  1898.  * Revision 4.3  85/05/01  11:39:19  lwall
  1899.  * Baseline for release with 4.3bsd.
  1900.  * 
  1901.  */
  1902.  
  1903. void    help_init();
  1904. int    help_ng();
  1905. int    help_art();
  1906. int    help_page();
  1907. #ifdef ESCSUBS
  1908.     int    help_subs();
  1909. #endif
  1910. !STUFFY!FUNK!
  1911. echo Extracting addng.h
  1912. cat >addng.h <<'!STUFFY!FUNK!'
  1913. /* $Header: addng.h,v 4.3 85/05/01 11:34:48 lwall Exp $
  1914.  *
  1915.  * $Log:    addng.h,v $
  1916.  * Revision 4.3  85/05/01  11:34:48  lwall
  1917.  * Baseline for release with 4.3bsd.
  1918.  * 
  1919.  */
  1920.  
  1921. void    addng_init();
  1922. #ifdef FINDNEWNG
  1923.     bool    newlist();
  1924.     long    birthof();
  1925.     bool    scanactive();
  1926. #endif
  1927. !STUFFY!FUNK!
  1928. echo Extracting EXTERN.h
  1929. cat >EXTERN.h <<'!STUFFY!FUNK!'
  1930. /* $Header: EXTERN.h,v 4.3 85/05/01 11:58:01 lwall Exp $
  1931.  *
  1932.  * $Log:    EXTERN.h,v $
  1933.  * Revision 4.3  85/05/01  11:58:01  lwall
  1934.  * Baseline for release with 4.3bsd.
  1935.  * 
  1936.  */
  1937.  
  1938. #undef EXT
  1939. #define EXT extern
  1940.  
  1941. #undef INIT
  1942. #define INIT(x)
  1943.  
  1944. #undef DOINIT
  1945. !STUFFY!FUNK!
  1946. echo Extracting INTERN.h
  1947. cat >INTERN.h <<'!STUFFY!FUNK!'
  1948. /* $Header: INTERN.h,v 4.3 85/05/01 11:33:16 lwall Exp $
  1949.  *
  1950.  * $Log:    INTERN.h,v $
  1951.  * Revision 4.3  85/05/01  11:33:16  lwall
  1952.  * Baseline for release with 4.3bsd.
  1953.  * 
  1954.  */
  1955.  
  1956. #undef EXT
  1957. #define EXT
  1958.  
  1959. #undef INIT
  1960. #define INIT(x) = x
  1961.  
  1962. #define DOINIT
  1963. !STUFFY!FUNK!
  1964. echo Extracting makedist
  1965. cat >makedist <<'!STUFFY!FUNK!'
  1966. #!/bin/sh
  1967. # $Header: makedist,v 4.3 85/05/01 11:42:35 lwall Exp $
  1968. #
  1969. # $Log:    makedist,v $
  1970. # Revision 4.3  85/05/01  11:42:35  lwall
  1971. # Baseline for release with 4.3bsd.
  1972. # 
  1973.  
  1974. rm -f kit*.list
  1975. manifake
  1976. kitlists
  1977. manimake
  1978. makekit kit*.list
  1979. !STUFFY!FUNK!
  1980. echo ""
  1981. echo "End of kit 9 (of 9)"
  1982. cat /dev/null >kit9isdone
  1983. config=true
  1984. for iskit in 1 2 3 4 5 6 7 8 9 ; do
  1985.     if test -f kit${iskit}isdone; then
  1986.     echo "You have run kit ${iskit}."
  1987.     else
  1988.     echo "You still need to run kit ${iskit}."
  1989.     config=false
  1990.     fi
  1991. done
  1992. case $config in
  1993.     true)
  1994.     echo "You have run all your kits.  Please read README and then type Configure."
  1995.     chmod 755 Configure
  1996.     ;;
  1997. esac
  1998. : I do not append .signature, but someone might mail this.
  1999. exit
  2000.