home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume17 / pax / patch01 / text0000.txt < prev   
Encoding:
Text File  |  1989-02-14  |  53.9 KB  |  2,151 lines
  1. This is the first of three official patches to Pax, a freely distributable 
  2. portable archive interchange.  These patches brings the software upto 
  3. release 1.2.  These patches fix a number of bugs and portability problems 
  4. with the initial release of the software.  These three patches (split to
  5. avoid article size limitations) constitute a single logical patch to pax.
  6.  
  7. I would like to thank all those people who reported bug, suggested fixes, 
  8. provided patches and suggested other extensions to pax.  I appologize to 
  9. that I was not able to respond to all the mail that I got about pax, but 
  10. all of the problems that were reported have either been fixed, or are 
  11. still under consideration.
  12.  
  13. Please, if you have any problems with pax, let me know so that they can be
  14. fixed.  Remember, if you find a problem, chances are that others will run
  15. into the same problem as well.  Reporting the problems will allow them to
  16. be fixed to avoid future difficulties and effort.
  17.  
  18. These items were not fixed in the patch, but are scheduled for a future
  19. patch release:
  20.  
  21.     * Put the software configuration under control of a "Configure" script ala
  22.       less and rn.
  23.     * Bring source into line with new POSIX 1003.2 description of pax.
  24.     * Add support for undocumented -C flag to cpio.
  25.     * MS-DOS support
  26.     * MINIX support
  27.     * Add missing tar.5 cpio.5 man pages
  28.  
  29. These items were fixed in these patches:
  30.  
  31.     * Changed misspelling of MERCHANTABILITY.
  32.     * Changed name of syserr to strerror, warn.c.
  33.     * Removed the references to "public domain" in the software.  The 
  34.       software is copyrighted, not public domain.
  35.     * Files are chmod'ed before being moved into the installation 
  36.       directories.  Files are also copied, then linked in the target 
  37.       directory.
  38.     * The variable "min" in regexp.c was changed to "minimum".  It would 
  39.       seem that some copilers define min to be a macro...
  40.     * In buffer.c there was an integer which was getting assigned NULL, 
  41.       rather than 0.
  42.     * If pax was given the -l option, it only successfully linked the 
  43.       from-file and the to-file together if the from-file is already linked 
  44.       to something else.
  45.     * Changed the verbose output file for tar to use stderr, rather than
  46.       stdout.  The verbose output was being interspersed with the archive,
  47.       causing the archive to be unreadable.
  48.     * The LDFLAGS macro is now used in the makefile.  There are also macros 
  49.       for additional libraries which may be needed and one for SHELL which 
  50.       fixes some problems when using the "make lint" facility.
  51.     * Fixed the stupid typo which caused pax/tar/cpio to run out of file
  52.       descriptors on very deep directory trees.
  53.     * Removed all line continuations "\" in preprocessor directives and
  54.       strings.  These were causing problems on certain compilers.
  55.     * Rename two variable which were colloding on compilers that did not
  56.       understand varaiables that were not unique in the first six
  57.       characters.
  58.     * Change the name of openi().  This causes a lot of problems on some
  59.       machines, especially those with shared libraries...
  60.     * Added some changes required for XENIX 286.
  61.     * All references to NULL are now properly cast.
  62.     * Man pages directories are now more compatible with BSD and USG
  63.       installation
  64.     * Other miscellaneous cleanups.
  65.  
  66. Mark H. Colburn                  "Look into a child's eye;
  67. Minnetech Consulting, Inc.        there's no hate and there's no lie;
  68. mark@jhereg.mn.org                there's no black and there's no white."
  69. --------------------------------- CUT HERE ---------------------------------
  70.  
  71. Index: append.c
  72. *** /tmp/,RCSt1a17023    Sun Feb 12 14:05:27 1989
  73. --- append.c    Sun Feb 12 14:01:57 1989
  74. ***************
  75. *** 1,6
  76.   /* $Source: /u/mark/src/pax/RCS/append.c,v $
  77.    *
  78. !  * $Revision: 1.1 $
  79.    *
  80.    * append.c - append to a tape archive. 
  81.    *
  82.  
  83. --- 1,6 -----
  84.   /* $Source: /u/mark/src/pax/RCS/append.c,v $
  85.    *
  86. !  * $Revision: 1.2 $
  87.    *
  88.    * append.c - append to a tape archive. 
  89.    *
  90. ***************
  91. *** 27,33
  92.    *
  93.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  94.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  95. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  96.    *
  97.    * $Log:    append.c,v $
  98.    * Revision 1.1  88/12/23  18:02:00  mark
  99.  
  100. --- 27,33 -----
  101.    *
  102.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  103.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  104. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  105.    *
  106.    * $Log:    append.c,v $
  107.    * Revision 1.2  89/02/12  10:03:58  mark
  108. ***************
  109. *** 30,35
  110.    * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  111.    *
  112.    * $Log:    append.c,v $
  113.    * Revision 1.1  88/12/23  18:02:00  mark
  114.    * Initial revision
  115.    * 
  116.  
  117. --- 30,38 -----
  118.    * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  119.    *
  120.    * $Log:    append.c,v $
  121. +  * Revision 1.2  89/02/12  10:03:58  mark
  122. +  * 1.2 release fixes
  123. +  * 
  124.    * Revision 1.1  88/12/23  18:02:00  mark
  125.    * Initial revision
  126.    * 
  127. ***************
  128. *** 36,42
  129.    */
  130.   
  131.   #ifndef lint
  132. ! static char *ident = "$Id: append.c,v 1.1 88/12/23 18:02:00 mark Rel $";
  133.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  134.   #endif /* ! lint */
  135.   
  136.  
  137. --- 39,45 -----
  138.    */
  139.   
  140.   #ifndef lint
  141. ! static char *ident = "$Id: append.c,v 1.2 89/02/12 10:03:58 mark Exp $";
  142.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  143.   #endif /* ! lint */
  144.   
  145. Index: buffer.c
  146. *** /tmp/,RCSt1a17028    Sun Feb 12 14:05:34 1989
  147. --- buffer.c    Sun Feb 12 14:02:00 1989
  148. ***************
  149. *** 1,6
  150.   /* $Source: /u/mark/src/pax/RCS/buffer.c,v $
  151.    *
  152. !  * $Revision: 1.1 $
  153.    *
  154.    * buffer.c - Buffer management functions
  155.    *
  156.  
  157. --- 1,6 -----
  158.   /* $Source: /u/mark/src/pax/RCS/buffer.c,v $
  159.    *
  160. !  * $Revision: 1.2 $
  161.    *
  162.    * buffer.c - Buffer management functions
  163.    *
  164. ***************
  165. *** 30,36
  166.    *
  167.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  168.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  169. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  170.    *
  171.    * $Log:    buffer.c,v $
  172.    * Revision 1.1  88/12/23  18:02:01  mark
  173.  
  174. --- 30,36 -----
  175.    *
  176.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  177.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  178. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  179.    *
  180.    * $Log:    buffer.c,v $
  181.    * Revision 1.2  89/02/12  10:04:02  mark
  182. ***************
  183. *** 33,38
  184.    * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  185.    *
  186.    * $Log:    buffer.c,v $
  187.    * Revision 1.1  88/12/23  18:02:01  mark
  188.    * Initial revision
  189.    * 
  190.  
  191. --- 33,41 -----
  192.    * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  193.    *
  194.    * $Log:    buffer.c,v $
  195. +  * Revision 1.2  89/02/12  10:04:02  mark
  196. +  * 1.2 release fixes
  197. +  * 
  198.    * Revision 1.1  88/12/23  18:02:01  mark
  199.    * Initial revision
  200.    * 
  201. ***************
  202. *** 39,45
  203.    */
  204.   
  205.   #ifndef lint
  206. ! static char *ident = "$Id: buffer.c,v 1.1 88/12/23 18:02:01 mark Rel $";
  207.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  208.   #endif /* ! lint */
  209.   
  210.  
  211. --- 42,48 -----
  212.    */
  213.   
  214.   #ifndef lint
  215. ! static char *ident = "$Id: buffer.c,v 1.2 89/02/12 10:04:02 mark Exp $";
  216.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  217.   #endif /* ! lint */
  218.   
  219. ***************
  220. *** 114,121
  221.       int             ofd;
  222.       time_t          tstamp[2];
  223.   
  224. !     if ((ofd = openo(name, asb, linkp = linkfrom(name, asb), 0)) > 0) {
  225. !     if (asb->sb_size || linkp == NULL || linkp->l_size == 0) {
  226.           close(indata(ofd, asb->sb_size, name));
  227.       } else if ((ifd = open(linkp->l_path->p_name, O_RDONLY)) < 0) {
  228.           warn(linkp->l_path->p_name, syserr());
  229.  
  230. --- 117,124 -----
  231.       int             ofd;
  232.       time_t          tstamp[2];
  233.   
  234. !     if ((ofd = openout(name, asb, linkp = linkfrom(name, asb), 0)) > 0) {
  235. !     if (asb->sb_size || linkp == (Link *)NULL || linkp->l_size == 0) {
  236.           close(indata(ofd, asb->sb_size, name));
  237.       } else if ((ifd = open(linkp->l_path->p_name, O_RDONLY)) < 0) {
  238.           warn(linkp->l_path->p_name, strerror());
  239. ***************
  240. *** 118,124
  241.       if (asb->sb_size || linkp == NULL || linkp->l_size == 0) {
  242.           close(indata(ofd, asb->sb_size, name));
  243.       } else if ((ifd = open(linkp->l_path->p_name, O_RDONLY)) < 0) {
  244. !         warn(linkp->l_path->p_name, syserr());
  245.       } else {
  246.           passdata(linkp->l_path->p_name, ifd, name, ofd);
  247.           close(ifd);
  248.  
  249. --- 121,127 -----
  250.       if (asb->sb_size || linkp == (Link *)NULL || linkp->l_size == 0) {
  251.           close(indata(ofd, asb->sb_size, name));
  252.       } else if ((ifd = open(linkp->l_path->p_name, O_RDONLY)) < 0) {
  253. !         warn(linkp->l_path->p_name, strerror());
  254.       } else {
  255.           passdata(linkp->l_path->p_name, ifd, name, ofd);
  256.           close(ifd);
  257. ***************
  258. *** 128,134
  259.       return(buf_skip((OFFSET) asb->sb_size) >= 0);
  260.       }
  261.       tstamp[0] = (!f_pass && f_access_time) ? asb->sb_atime : time((time_t *) 0);
  262. !     tstamp[1] = f_modification_time ? asb->sb_mtime : time((time_t *) 0);
  263.       utime(name, tstamp);
  264.       return (0);
  265.   }
  266.  
  267. --- 131,137 -----
  268.       return(buf_skip((OFFSET) asb->sb_size) >= 0);
  269.       }
  270.       tstamp[0] = (!f_pass && f_access_time) ? asb->sb_atime : time((time_t *) 0);
  271. !     tstamp[1] = f_mtime ? asb->sb_mtime : time((time_t *) 0);
  272.       utime(name, tstamp);
  273.       return (0);
  274.   }
  275. ***************
  276. *** 181,187
  277.       size -= (chunk = size < avail ? (uint) size : avail);
  278.       if (oops == 0 && (got = read(fd, buf, (unsigned int) chunk)) < 0) {
  279.           oops = -1;
  280. !         warn(name, syserr());
  281.           got = 0;
  282.       }
  283.       if (got < chunk) {
  284.  
  285. --- 184,190 -----
  286.       size -= (chunk = size < avail ? (uint) size : avail);
  287.       if (oops == 0 && (got = read(fd, buf, (unsigned int) chunk)) < 0) {
  288.           oops = -1;
  289. !         warn(name, strerror());
  290.           got = 0;
  291.       }
  292.       if (got < chunk) {
  293. ***************
  294. *** 185,191
  295.           got = 0;
  296.       }
  297.       if (got < chunk) {
  298. !         if (oops == NULL) {
  299.           oops = -1;
  300.           }
  301.           warn(name, "Early EOF");
  302.  
  303. --- 188,194 -----
  304.           got = 0;
  305.       }
  306.       if (got < chunk) {
  307. !         if (oops == 0) {
  308.           oops = -1;
  309.           }
  310.           warn(name, "Early EOF");
  311. ***************
  312. *** 296,302
  313.    * DESCRIPTION
  314.    *
  315.    *    Copies a file from one place to another.  Doesn't believe in input 
  316. !  *    file descriptor zero (see description of kludge in openi() comments). 
  317.    *    Closes the provided output file descriptor. 
  318.    *
  319.    * PARAMETERS
  320.  
  321. --- 299,305 -----
  322.    * DESCRIPTION
  323.    *
  324.    *    Copies a file from one place to another.  Doesn't believe in input 
  325. !  *    file descriptor zero (see description of kludge in openin() comments). 
  326.    *    Closes the provided output file descriptor. 
  327.    *
  328.    * PARAMETERS
  329. ***************
  330. *** 333,339
  331.           total += got;
  332.       }
  333.       if (got) {
  334. !         warn(got < 0 ? from : to, syserr());
  335.       } else if (sparse > 0
  336.            && (lseek(ofd, (OFFSET)(-sparse), 1) < 0
  337.                || write(ofd, block, (uint) sparse) != sparse)) {
  338.  
  339. --- 336,342 -----
  340.           total += got;
  341.       }
  342.       if (got) {
  343. !         warn(got < 0 ? from : to, strerror());
  344.       } else if (sparse > 0
  345.            && (lseek(ofd, (OFFSET)(-sparse), 1) < 0
  346.                || write(ofd, block, (uint) sparse) != sparse)) {
  347. ***************
  348. *** 337,343
  349.       } else if (sparse > 0
  350.            && (lseek(ofd, (OFFSET)(-sparse), 1) < 0
  351.                || write(ofd, block, (uint) sparse) != sparse)) {
  352. !         warn(to, syserr());
  353.       }
  354.       }
  355.       close(ofd);
  356.  
  357. --- 340,346 -----
  358.       } else if (sparse > 0
  359.            && (lseek(ofd, (OFFSET)(-sparse), 1) < 0
  360.                || write(ofd, block, (uint) sparse) != sparse)) {
  361. !         warn(to, strerror());
  362.       }
  363.       }
  364.       close(ofd);
  365. ***************
  366. *** 377,384
  367.   
  368.   #endif
  369.   {
  370. -     extern char *malloc();
  371. -     
  372.       if (size <= 0) {
  373.       fatal("invalid value for blocksize");
  374.       }
  375.  
  376. --- 380,385 -----
  377.   
  378.   #endif
  379.   {
  380.       if (size <= 0) {
  381.       fatal("invalid value for blocksize");
  382.       }
  383. ***************
  384. *** 382,388
  385.       if (size <= 0) {
  386.       fatal("invalid value for blocksize");
  387.       }
  388. !     if ((bufstart = malloc((unsigned) size)) == NULL) {
  389.       fatal("Cannot allocate I/O buffer");
  390.       }
  391.       bufend = bufidx = bufstart;
  392.  
  393. --- 383,389 -----
  394.       if (size <= 0) {
  395.       fatal("invalid value for blocksize");
  396.       }
  397. !     if ((bufstart = malloc((unsigned) size)) == (char *)NULL) {
  398.       fatal("Cannot allocate I/O buffer");
  399.       }
  400.       bufend = bufidx = bufstart;
  401. ***************
  402. *** 534,540
  403.       uint            avail;
  404.   
  405.       corrupt = sparse = 0;
  406. !     oops = NULL;
  407.       while (size) {
  408.       corrupt |= buf_in_avail(&buf, &avail);
  409.       size -= (chunk = size < avail ? (uint) size : avail);
  410.  
  411. --- 535,541 -----
  412.       uint            avail;
  413.   
  414.       corrupt = sparse = 0;
  415. !     oops = (char *)NULL;
  416.       while (size) {
  417.       corrupt |= buf_in_avail(&buf, &avail);
  418.       size -= (chunk = size < avail ? (uint) size : avail);
  419. ***************
  420. *** 538,545
  421.       while (size) {
  422.       corrupt |= buf_in_avail(&buf, &avail);
  423.       size -= (chunk = size < avail ? (uint) size : avail);
  424. !     if (oops == NULL && (sparse = ar_write(fd, buf, chunk)) < 0) {
  425. !         oops = syserr();
  426.       }
  427.       buf_use(chunk);
  428.       }
  429.  
  430. --- 539,546 -----
  431.       while (size) {
  432.       corrupt |= buf_in_avail(&buf, &avail);
  433.       size -= (chunk = size < avail ? (uint) size : avail);
  434. !     if (oops == (char *)NULL && (sparse = ar_write(fd, buf, chunk)) < 0) {
  435. !         oops = strerror();
  436.       }
  437.       buf_use(chunk);
  438.       }
  439. ***************
  440. *** 550,556
  441.       warn(name, oops);
  442.       } else if (sparse > 0 && (lseek(fd, (OFFSET) - 1, 1) < 0
  443.                     || write(fd, "", 1) != 1)) {
  444. !     warn(name, syserr());
  445.       }
  446.       return (fd);
  447.   }
  448.  
  449. --- 551,557 -----
  450.       warn(name, oops);
  451.       } else if (sparse > 0 && (lseek(fd, (OFFSET) - 1, 1) < 0
  452.                     || write(fd, "", 1) != 1)) {
  453. !     warn(name, strerror());
  454.       }
  455.       return (fd);
  456.   }
  457. ***************
  458. *** 630,636
  459.           bufend += got;
  460.           } else if (got < 0) {
  461.           failed = -1;
  462. !         warnarch(syserr(), (OFFSET) 0 - (bufend - bufidx));
  463.           } else {
  464.           ++areof;
  465.           }
  466.  
  467. --- 631,637 -----
  468.           bufend += got;
  469.           } else if (got < 0) {
  470.           failed = -1;
  471. !         warnarch(strerror(), (OFFSET) 0 - (bufend - bufidx));
  472.           } else {
  473.           ++areof;
  474.           }
  475. Index: config.h
  476. *** /tmp/,RCSt1a17033    Sun Feb 12 14:05:47 1989
  477. --- config.h    Sun Feb 12 14:02:01 1989
  478. ***************
  479. *** 1,6
  480.   /* $Source: /u/mark/src/pax/RCS/config.h,v $
  481.    *
  482. !  * $Revision: 1.1 $
  483.    *
  484.    * config.h - configuration options for PAX
  485.    *
  486.  
  487. --- 1,6 -----
  488.   /* $Source: /u/mark/src/pax/RCS/config.h,v $
  489.    *
  490. !  * $Revision: 1.2 $
  491.    *
  492.    * config.h - configuration options for PAX
  493.    *
  494. ***************
  495. *** 28,34
  496.    *
  497.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  498.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  499. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  500.    */
  501.   
  502.   #ifndef _PAX_CONFIG_H
  503.  
  504. --- 28,34 -----
  505.    *
  506.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  507.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  508. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  509.    */
  510.   
  511.   #ifndef _PAX_CONFIG_H
  512. ***************
  513. *** 36,41
  514.   
  515.   /* Defines */
  516.   
  517.   /*
  518.    * USG - USG (Unix System V) specific modifications
  519.    *
  520.  
  521. --- 36,52 -----
  522.   
  523.   /* Defines */
  524.   
  525. + /* XENIX_286 (SCO ugh, Xenix system V(?) 286, USG with changes...
  526. +  * You will get a warning about DIRSIZ being redefined, ignore it,
  527. +  * complain to SCO about include files that are messed up or send 
  528. +  * mail to doug@lentni.UUCP, who can provide some patches to fix 
  529. +  * your include files.
  530. +  *
  531. +  * Defining XENIX_286 will automatically define USG.
  532. +  *
  533. +  */
  534. + #define XENIX_286    /* Running on a XENIX 286 system */
  535. + 
  536.   /*
  537.    * USG - USG (Unix System V) specific modifications
  538.    *
  539. ***************
  540. *** 130,135
  541.   /* #define STRCSPN    /* implementation does not have strcspn() */
  542.   
  543.   /*
  544.    * END OF CONFIGURATION SECTION
  545.    *
  546.    * Nothing beyond this point should need to be changed
  547.  
  548. --- 141,157 -----
  549.   /* #define STRCSPN    /* implementation does not have strcspn() */
  550.   
  551.   /*
  552. +  * STRERROR - use the strerror function included with pax
  553. +  *
  554. +  * Non-Ansi systems do not have the strerror() function in their C libraries.
  555. +  * For those system define STRERROR and the one provided in misc.c will 
  556. +  * be used instead.
  557. +  */
  558. + #define STRERROR    /* implementation does not have strerror() */
  559. + 
  560. + /*
  561. + 
  562. + /*
  563.    * END OF CONFIGURATION SECTION
  564.    *
  565.    * Nothing beyond this point should need to be changed
  566. ***************
  567. *** 148,152
  568.   #    define DIRENT
  569.   #  endif
  570.   #endif
  571.   
  572.   #endif /* _PAX_CONFIG_H */
  573.  
  574. --- 170,178 -----
  575.   #    define DIRENT
  576.   #  endif
  577.   #endif
  578. + 
  579. + #ifdef XENIX_286
  580. + #  define USG
  581. + #endif /* XENIX_286 */
  582.   
  583.   #endif /* _PAX_CONFIG_H */
  584. Index: cpio.1
  585. *** /tmp/,RCSt1a17038    Sun Feb 12 14:05:54 1989
  586. --- cpio.1    Sun Feb 12 14:02:02 1989
  587. ***************
  588. *** 1,4
  589. ! .\" $Id: cpio.1,v 1.1 88/12/23 18:02:04 mark Rel $
  590.   .TH CPIO 1 "USENIX Association" ""
  591.   .SH NAME
  592.   cpio \- copy file archives in and out
  593.  
  594. --- 1,4 -----
  595. ! .\" $Id: cpio.1,v 1.2 89/02/12 10:08:42 mark Exp $
  596.   .TH CPIO 1 "USENIX Association" ""
  597.   .SH NAME
  598.   cpio \- copy file archives in and out
  599. ***************
  600. *** 254,260
  601.   .PP
  602.   THE SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  603.   IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  604. ! WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  605.   .SH AUTHOR
  606.   Mark H. Colburn
  607.   .br
  608.  
  609. --- 254,260 -----
  610.   .PP
  611.   THE SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  612.   IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  613. ! WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  614.   .SH AUTHOR
  615.   Mark H. Colburn
  616.   .br
  617. Index: cpio.c
  618. *** /tmp/,RCSt1a17043    Sun Feb 12 14:06:01 1989
  619. --- cpio.c    Sun Feb 12 14:02:03 1989
  620. ***************
  621. *** 1,6
  622.   /* $Source: /u/mark/src/pax/RCS/cpio.c,v $
  623.    *
  624. !  * $Revision: 1.1 $
  625.    *
  626.    * cpio.c - Cpio specific functions for archive handling
  627.    *
  628.  
  629. --- 1,6 -----
  630.   /* $Source: /u/mark/src/pax/RCS/cpio.c,v $
  631.    *
  632. !  * $Revision: 1.2 $
  633.    *
  634.    * cpio.c - Cpio specific functions for archive handling
  635.    *
  636. ***************
  637. *** 27,33
  638.    *
  639.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  640.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  641. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  642.    *
  643.    * $Log:    cpio.c,v $
  644.    * Revision 1.1  88/12/23  18:02:05  mark
  645.  
  646. --- 27,33 -----
  647.    *
  648.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  649.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  650. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  651.    *
  652.    * $Log:    cpio.c,v $
  653.    * Revision 1.2  89/02/12  10:04:13  mark
  654. ***************
  655. *** 30,35
  656.    * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  657.    *
  658.    * $Log:    cpio.c,v $
  659.    * Revision 1.1  88/12/23  18:02:05  mark
  660.    * Initial revision
  661.    * 
  662.  
  663. --- 30,38 -----
  664.    * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  665.    *
  666.    * $Log:    cpio.c,v $
  667. +  * Revision 1.2  89/02/12  10:04:13  mark
  668. +  * 1.2 release fixes
  669. +  * 
  670.    * Revision 1.1  88/12/23  18:02:05  mark
  671.    * Initial revision
  672.    * 
  673. ***************
  674. *** 36,42
  675.    */
  676.   
  677.   #ifndef lint
  678. ! static char *ident = "$Id: cpio.c,v 1.1 88/12/23 18:02:05 mark Rel $";
  679.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  680.   #endif /* ! lint */
  681.   
  682.  
  683. --- 39,45 -----
  684.    */
  685.   
  686.   #ifndef lint
  687. ! static char *ident = "$Id: cpio.c,v 1.2 89/02/12 10:04:13 mark Exp $";
  688.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  689.   #endif /* ! lint */
  690.   
  691. ***************
  692. *** 113,119
  693.   
  694.           /* check to make sure that the argument is a directory */
  695.           if (LSTAT(dirname, &st) < 0) {
  696. !         fatal(syserr());
  697.           }
  698.           if ((st.sb_mode & S_IFMT) != S_IFDIR) {
  699.           fatal("Not a directory");
  700.  
  701. --- 116,122 -----
  702.   
  703.           /* check to make sure that the argument is a directory */
  704.           if (LSTAT(dirname, &st) < 0) {
  705. !         fatal(strerror());
  706.           }
  707.           if ((st.sb_mode & S_IFMT) != S_IFDIR) {
  708.           fatal("Not a directory");
  709. ***************
  710. *** 131,137
  711.           ar_file = optarg;
  712.           break;
  713.       case 'd':
  714. !         f_create_dirs = 1;
  715.           break;
  716.       case 'f':
  717.           f_reverse_match = 1;
  718.  
  719. --- 134,140 -----
  720.           ar_file = optarg;
  721.           break;
  722.       case 'd':
  723. !         f_dir_create = 1;
  724.           break;
  725.       case 'f':
  726.           f_reverse_match = 1;
  727. ***************
  728. *** 140,146
  729.           f_link = 1;
  730.           break;
  731.       case 'm':
  732. !         f_modification_time = 1;
  733.           break;
  734.       case 'r':
  735.           f_interactive = 1;
  736.  
  737. --- 143,149 -----
  738.           f_link = 1;
  739.           break;
  740.       case 'm':
  741. !         f_mtime = 1;
  742.           break;
  743.       case 'r':
  744.           f_interactive = 1;
  745. ***************
  746. *** 176,182
  747.       }
  748.   
  749.       /* print out the total block count transfered */
  750. !     fprintf(stderr, "%d Blocks\n", ROUNDUP(total, BLOCKSIZE) / BLOCKSIZE);
  751.       
  752.       exit(0);
  753.       /* NOTREACHED */
  754.  
  755. --- 179,185 -----
  756.       }
  757.   
  758.       /* print out the total block count transfered */
  759. !     fprintf(stderr, "%ld Blocks\n", ROUNDUP(total, BLOCKSIZE) / BLOCKSIZE);
  760.       
  761.       exit(0);
  762.       /* NOTREACHED */
  763. ***************
  764. *** 207,217
  765.   
  766.   #endif
  767.   {
  768. !     fprintf(stderr, "\
  769. ! Usage: %s -o[Bacv]\n", myname);
  770. !     fprintf(stderr, "\
  771. !        %s -i[Bcdmrtuvf] [pattern...]\n", myname);
  772. !     fprintf(stderr, "\
  773. !        %s -p[adlmruv] directory\n", myname);
  774.       exit(1);
  775.   }
  776.  
  777. --- 210,217 -----
  778.   
  779.   #endif
  780.   {
  781. !     fprintf(stderr, "Usage: %s -o[Bacv]\n", myname);
  782. !     fprintf(stderr, "       %s -i[Bcdmrtuvf] [pattern...]\n", myname);
  783. !     fprintf(stderr, "       %s -p[adlmruv] directory\n", myname);
  784.       exit(1);
  785.   }
  786. Index: create.c
  787. *** /tmp/,RCSt1a17048    Sun Feb 12 14:06:10 1989
  788. --- create.c    Sun Feb 12 14:02:05 1989
  789. ***************
  790. *** 1,6
  791.   /* $Source: /u/mark/src/pax/RCS/create.c,v $
  792.    *
  793. !  * $Revision: 1.1 $
  794.    *
  795.    * create.c - Create a tape archive. 
  796.    *
  797.  
  798. --- 1,6 -----
  799.   /* $Source: /u/mark/src/pax/RCS/create.c,v $
  800.    *
  801. !  * $Revision: 1.3 $
  802.    *
  803.    * create.c - Create a tape archive. 
  804.    *
  805. ***************
  806. *** 27,33
  807.    *
  808.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  809.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  810. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  811.    *
  812.    * $Log:    create.c,v $
  813.    * Revision 1.1  88/12/23  18:02:06  mark
  814.  
  815. --- 27,33 -----
  816.    *
  817.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  818.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  819. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  820.    *
  821.    * $Log:    create.c,v $
  822.    * Revision 1.3  89/02/12  10:29:37  mark
  823. ***************
  824. *** 30,35
  825.    * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  826.    *
  827.    * $Log:    create.c,v $
  828.    * Revision 1.1  88/12/23  18:02:06  mark
  829.    * Initial revision
  830.    * 
  831.  
  832. --- 30,41 -----
  833.    * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  834.    *
  835.    * $Log:    create.c,v $
  836. +  * Revision 1.3  89/02/12  10:29:37  mark
  837. +  * Fixed misspelling of Replstr
  838. +  * 
  839. +  * Revision 1.2  89/02/12  10:04:17  mark
  840. +  * 1.2 release fixes
  841. +  * 
  842.    * Revision 1.1  88/12/23  18:02:06  mark
  843.    * Initial revision
  844.    * 
  845. ***************
  846. *** 36,42
  847.    */
  848.   
  849.   #ifndef lint
  850. ! static char *ident = "$Id: create.c,v 1.1 88/12/23 18:02:06 mark Rel $";
  851.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  852.   #endif /* ! lint */
  853.   
  854.  
  855. --- 42,48 -----
  856.    */
  857.   
  858.   #ifndef lint
  859. ! static char *ident = "$Id: create.c,v 1.3 89/02/12 10:29:37 mark Exp Locker: mark $";
  860.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  861.   #endif /* ! lint */
  862.   
  863. ***************
  864. *** 93,99
  865.       int             fd;
  866.   
  867.       while (name_next(name, &sb) != -1) {
  868. !     if ((fd = openi(name, &sb)) < 0) {
  869.           /* FIXME: pax wants to exit here??? */
  870.           continue;
  871.       }
  872.  
  873. --- 99,105 -----
  874.       int             fd;
  875.   
  876.       while (name_next(name, &sb) != -1) {
  877. !     if ((fd = openin(name, &sb)) < 0) {
  878.           /* FIXME: pax wants to exit here??? */
  879.           continue;
  880.       }
  881. ***************
  882. *** 98,104
  883.           continue;
  884.       }
  885.   
  886. !     if (rplhead != NULL) {
  887.           rpl_name(name);
  888.           if (strlen(name) == 0) {
  889.           continue;
  890.  
  891. --- 104,110 -----
  892.           continue;
  893.       }
  894.   
  895. !     if (rplhead != (Replstr *)NULL) {
  896.           rpl_name(name);
  897.           if (strlen(name) == 0) {
  898.           continue;
  899. ***************
  900. *** 185,191
  901.   #endif
  902.   {
  903.       char       *p;
  904. !     char           *prefix = NULL;
  905.       int             i;
  906.       int             sum;
  907.       char            hdr[BLOCKSIZE];
  908.  
  909. --- 191,197 -----
  910.   #endif
  911.   {
  912.       char       *p;
  913. !     char           *prefix = (char *)NULL;
  914.       int             i;
  915.       int             sum;
  916.       char            hdr[BLOCKSIZE];
  917. ***************
  918. *** 230,236
  919.       sprintf(&hdr[136], "%011lo ", (long) asb->sb_mtime);
  920.       strncpy(&hdr[148], "        ", 8);
  921.       hdr[156] = tartype(asb->sb_mode);
  922. !     if (asb->sb_nlink > 1 && (from = linkfrom(name, asb)) != NULL) {
  923.       strcpy(&hdr[157], from->l_name);
  924.       hdr[156] = LNKTYPE;
  925.       }
  926.  
  927. --- 236,242 -----
  928.       sprintf(&hdr[136], "%011lo ", (long) asb->sb_mtime);
  929.       strncpy(&hdr[148], "        ", 8);
  930.       hdr[156] = tartype(asb->sb_mode);
  931. !     if (asb->sb_nlink > 1 && (from = linkfrom(name, asb)) != (Link *)NULL) {
  932.       strcpy(&hdr[157], from->l_name);
  933.       hdr[156] = LNKTYPE;
  934.       }
  935. ***************
  936. *** 240,246
  937.       strcpy(&hdr[297], findgname((int) asb->sb_gid));
  938.       sprintf(&hdr[329], "%06o \0", major(asb->sb_rdev));
  939.       sprintf(&hdr[337], "%06o \0", minor(asb->sb_rdev));
  940. !     if (prefix != NULL) {
  941.       strncpy(&hdr[345], prefix, 155);
  942.       }
  943.   
  944.  
  945. --- 246,252 -----
  946.       strcpy(&hdr[297], findgname((int) asb->sb_gid));
  947.       sprintf(&hdr[329], "%06o \0", major(asb->sb_rdev));
  948.       sprintf(&hdr[337], "%06o \0", minor(asb->sb_rdev));
  949. !     if (prefix != (char *)NULL) {
  950.       strncpy(&hdr[345], prefix, 155);
  951.       }
  952.   
  953. ***************
  954. *** 358,364
  955.           USH(asb->sb_uid), USH(asb->sb_gid));
  956.       sprintf(header + M_STRLEN + 30, "%06o%06o%011lo%06o%011lo",
  957.           USH(asb->sb_nlink), USH(asb->sb_rdev),
  958. !         f_modification_time ? asb->sb_mtime : time((time_t *) 0),
  959.           namelen, asb->sb_size);
  960.       outwrite(header, M_STRLEN + H_STRLEN);
  961.       outwrite(name, namelen);
  962.  
  963. --- 364,370 -----
  964.           USH(asb->sb_uid), USH(asb->sb_gid));
  965.       sprintf(header + M_STRLEN + 30, "%06o%06o%011lo%06o%011lo",
  966.           USH(asb->sb_nlink), USH(asb->sb_rdev),
  967. !         f_mtime ? asb->sb_mtime : time((time_t *) 0),
  968.           namelen, asb->sb_size);
  969.       outwrite(header, M_STRLEN + H_STRLEN);
  970.       outwrite(name, namelen);
  971. Index: extract.c
  972. *** /tmp/,RCSt1a17053    Sun Feb 12 14:06:20 1989
  973. --- extract.c    Sun Feb 12 14:02:07 1989
  974. ***************
  975. *** 1,6
  976.   /* $Source: /u/mark/src/pax/RCS/extract.c,v $
  977.    *
  978. !  * $Revision: 1.1 $
  979.    *
  980.    * extract.c - Extract files from a tar archive. 
  981.    *
  982.  
  983. --- 1,6 -----
  984.   /* $Source: /u/mark/src/pax/RCS/extract.c,v $
  985.    *
  986. !  * $Revision: 1.3 $
  987.    *
  988.    * extract.c - Extract files from a tar archive. 
  989.    *
  990. ***************
  991. *** 24,30
  992.    *
  993.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  994.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  995. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  996.    *
  997.    * $Log:    extract.c,v $
  998.    * Revision 1.1  88/12/23  18:02:07  mark
  999.  
  1000. --- 24,30 -----
  1001.    *
  1002.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1003.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1004. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1005.    *
  1006.    * $Log:    extract.c,v $
  1007.    * Revision 1.3  89/02/12  10:29:43  mark
  1008. ***************
  1009. *** 27,32
  1010.    * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1011.    *
  1012.    * $Log:    extract.c,v $
  1013.    * Revision 1.1  88/12/23  18:02:07  mark
  1014.    * Initial revision
  1015.    * 
  1016.  
  1017. --- 27,38 -----
  1018.    * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1019.    *
  1020.    * $Log:    extract.c,v $
  1021. +  * Revision 1.3  89/02/12  10:29:43  mark
  1022. +  * Fixed misspelling of Replstr
  1023. +  * 
  1024. +  * Revision 1.2  89/02/12  10:04:24  mark
  1025. +  * 1.2 release fixes
  1026. +  * 
  1027.    * Revision 1.1  88/12/23  18:02:07  mark
  1028.    * Initial revision
  1029.    * 
  1030. ***************
  1031. *** 33,39
  1032.    */
  1033.   
  1034.   #ifndef lint
  1035. ! static char *ident = "$Id: extract.c,v 1.1 88/12/23 18:02:07 mark Rel $";
  1036.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  1037.   #endif /* ! lint */
  1038.   
  1039.  
  1040. --- 39,45 -----
  1041.    */
  1042.   
  1043.   #ifndef lint
  1044. ! static char *ident = "$Id: extract.c,v 1.3 89/02/12 10:29:43 mark Exp Locker: mark $";
  1045.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  1046.   #endif /* ! lint */
  1047.   
  1048. ***************
  1049. *** 113,119
  1050.           warn(name, "File data is corrupt");
  1051.           }
  1052.       } else if (match) {
  1053. !         if (rplhead != NULL) {
  1054.           rpl_name(name);
  1055.           if (strlen(name) == 0) {
  1056.               continue;
  1057.  
  1058. --- 119,125 -----
  1059.           warn(name, "File data is corrupt");
  1060.           }
  1061.       } else if (match) {
  1062. !         if (rplhead != (Replstr *)NULL) {
  1063.           rpl_name(name);
  1064.           if (strlen(name) == 0) {
  1065.               continue;
  1066. Index: fileio.c
  1067. *** /tmp/,RCSt1a17058    Sun Feb 12 14:06:30 1989
  1068. --- fileio.c    Sun Feb 12 14:02:08 1989
  1069. ***************
  1070. *** 1,6
  1071.   /* $Source: /u/mark/src/pax/RCS/fileio.c,v $
  1072.    *
  1073. !  * $Revision: 1.1 $
  1074.    *
  1075.    * fileio.c - file I/O functions for all archive interfaces
  1076.    *
  1077.  
  1078. --- 1,6 -----
  1079.   /* $Source: /u/mark/src/pax/RCS/fileio.c,v $
  1080.    *
  1081. !  * $Revision: 1.2 $
  1082.    *
  1083.    * fileio.c - file I/O functions for all archive interfaces
  1084.    *
  1085. ***************
  1086. *** 27,33
  1087.    *
  1088.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1089.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1090. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1091.    *
  1092.    * $Log:    fileio.c,v $
  1093.    * Revision 1.1  88/12/23  18:02:09  mark
  1094.  
  1095. --- 27,33 -----
  1096.    *
  1097.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1098.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1099. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1100.    *
  1101.    * $Log:    fileio.c,v $
  1102.    * Revision 1.2  89/02/12  10:04:31  mark
  1103. ***************
  1104. *** 30,35
  1105.    * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1106.    *
  1107.    * $Log:    fileio.c,v $
  1108.    * Revision 1.1  88/12/23  18:02:09  mark
  1109.    * Initial revision
  1110.    * 
  1111.  
  1112. --- 30,38 -----
  1113.    * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1114.    *
  1115.    * $Log:    fileio.c,v $
  1116. +  * Revision 1.2  89/02/12  10:04:31  mark
  1117. +  * 1.2 release fixes
  1118. +  * 
  1119.    * Revision 1.1  88/12/23  18:02:09  mark
  1120.    * Initial revision
  1121.    * 
  1122. ***************
  1123. *** 36,42
  1124.    */
  1125.   
  1126.   #ifndef lint
  1127. ! static char *ident = "$Id: fileio.c,v 1.1 88/12/23 18:02:09 mark Rel $";
  1128.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  1129.   #endif /* ! lint */
  1130.   
  1131.  
  1132. --- 39,45 -----
  1133.    */
  1134.   
  1135.   #ifndef lint
  1136. ! static char *ident = "$Id: fileio.c,v 1.2 89/02/12 10:04:31 mark Exp $";
  1137.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  1138.   #endif /* ! lint */
  1139.   
  1140. ***************
  1141. *** 94,100
  1142.       }
  1143.   
  1144.       if (archivefd < 0) {
  1145. !     warnarch(syserr(), (OFFSET) 0);
  1146.       return (-1);
  1147.       }
  1148.       ++arvolume;
  1149.  
  1150. --- 97,103 -----
  1151.       }
  1152.   
  1153.       if (archivefd < 0) {
  1154. !     warnarch(strerror(), (OFFSET) 0);
  1155.       return (-1);
  1156.       }
  1157.       ++arvolume;
  1158. ***************
  1159. *** 127,133
  1160.   }
  1161.   
  1162.   
  1163. ! /* openo - open an output file
  1164.    *
  1165.    * DESCRIPTION
  1166.    *
  1167.  
  1168. --- 130,136 -----
  1169.   }
  1170.   
  1171.   
  1172. ! /* openout - open an output file
  1173.    *
  1174.    * DESCRIPTION
  1175.    *
  1176. ***************
  1177. *** 153,159
  1178.   
  1179.   #ifdef __STDC__
  1180.   
  1181. ! int openo(char *name, Stat *asb, Link *linkp, int ispass)
  1182.   
  1183.   #else
  1184.       
  1185.  
  1186. --- 156,162 -----
  1187.   
  1188.   #ifdef __STDC__
  1189.   
  1190. ! int openout(char *name, Stat *asb, Link *linkp, int ispass)
  1191.   
  1192.   #else
  1193.       
  1194. ***************
  1195. *** 157,163
  1196.   
  1197.   #else
  1198.       
  1199. ! int openo(name, asb, linkp, ispass)
  1200.   char           *name;
  1201.   Stat           *asb;
  1202.   Link           *linkp;
  1203.  
  1204. --- 160,166 -----
  1205.   
  1206.   #else
  1207.       
  1208. ! int openout(name, asb, linkp, ispass)
  1209.   char           *name;
  1210.   Stat           *asb;
  1211.   Link           *linkp;
  1212. ***************
  1213. *** 182,188
  1214.       } else if ((osb.sb_mode & S_IFMT) == (asb->sb_mode & S_IFMT)) {
  1215.           operm = osb.sb_mode & S_IPERM;
  1216.       } else if (REMOVE(name, &osb) < 0) {
  1217. !         warn(name, syserr());
  1218.           return (-1);
  1219.       } else {
  1220.           exists = 0;
  1221.  
  1222. --- 185,191 -----
  1223.       } else if ((osb.sb_mode & S_IFMT) == (asb->sb_mode & S_IFMT)) {
  1224.           operm = osb.sb_mode & S_IPERM;
  1225.       } else if (REMOVE(name, &osb) < 0) {
  1226. !         warn(name, strerror());
  1227.           return (-1);
  1228.       } else {
  1229.           exists = 0;
  1230. ***************
  1231. *** 193,199
  1232.           if (asb->sb_ino == osb.sb_ino && asb->sb_dev == osb.sb_dev) {
  1233.           return (0);
  1234.           } else if (unlink(name) < 0) {
  1235. !         warn(name, syserr());
  1236.           return (-1);
  1237.           } else {
  1238.           exists = 0;
  1239.  
  1240. --- 196,202 -----
  1241.           if (asb->sb_ino == osb.sb_ino && asb->sb_dev == osb.sb_dev) {
  1242.           return (0);
  1243.           } else if (unlink(name) < 0) {
  1244. !         warn(name, strerror());
  1245.           return (-1);
  1246.           } else {
  1247.           exists = 0;
  1248. ***************
  1249. *** 201,207
  1250.       }
  1251.       if (link(linkp->l_name, name) != 0) {
  1252.           if (errno == ENOENT) {
  1253. !         if (f_create_dirs) {
  1254.               if (dirneed(name) != 0 ||
  1255.                   link(linkp->l_name, name) != 0) {
  1256.                   warn(name, syserr());
  1257.  
  1258. --- 204,210 -----
  1259.       }
  1260.       if (link(linkp->l_name, name) != 0) {
  1261.           if (errno == ENOENT) {
  1262. !         if (f_dir_create) {
  1263.               if (dirneed(name) != 0 ||
  1264.                   link(linkp->l_name, name) != 0) {
  1265.                   warn(name, strerror());
  1266. ***************
  1267. *** 204,210
  1268.           if (f_create_dirs) {
  1269.               if (dirneed(name) != 0 ||
  1270.                   link(linkp->l_name, name) != 0) {
  1271. !                 warn(name, syserr());
  1272.               return (-1);
  1273.               }
  1274.           } else {
  1275.  
  1276. --- 207,213 -----
  1277.           if (f_dir_create) {
  1278.               if (dirneed(name) != 0 ||
  1279.                   link(linkp->l_name, name) != 0) {
  1280. !                 warn(name, strerror());
  1281.               return (-1);
  1282.               }
  1283.           } else {
  1284. ***************
  1285. *** 213,219
  1286.           }
  1287.           return(0);
  1288.           } else if (errno != EXDEV) {
  1289. !         warn(name, syserr());
  1290.           return (-1);
  1291.           }
  1292.       } else {
  1293.  
  1294. --- 216,222 -----
  1295.           }
  1296.           return(0);
  1297.           } else if (errno != EXDEV) {
  1298. !         warn(name, strerror());
  1299.           return (-1);
  1300.           }
  1301.       } else {
  1302. ***************
  1303. *** 228,234
  1304.       if (exists) {
  1305.           if (asb->sb_rdev == osb.sb_rdev) {
  1306.           if (perm != operm && chmod(name, (int) perm) < 0) {
  1307. !             warn(name, syserr());
  1308.               return (-1);
  1309.           } else {
  1310.               break;
  1311.  
  1312. --- 231,237 -----
  1313.       if (exists) {
  1314.           if (asb->sb_rdev == osb.sb_rdev) {
  1315.           if (perm != operm && chmod(name, (int) perm) < 0) {
  1316. !             warn(name, strerror());
  1317.               return (-1);
  1318.           } else {
  1319.               break;
  1320. ***************
  1321. *** 234,240
  1322.               break;
  1323.           }
  1324.           } else if (REMOVE(name, &osb) < 0) {
  1325. !         warn(name, syserr());
  1326.           return (-1);
  1327.           } else {
  1328.           exists = 0;
  1329.  
  1330. --- 237,243 -----
  1331.               break;
  1332.           }
  1333.           } else if (REMOVE(name, &osb) < 0) {
  1334. !         warn(name, strerror());
  1335.           return (-1);
  1336.           } else {
  1337.           exists = 0;
  1338. ***************
  1339. *** 242,248
  1340.       }
  1341.       if (mknod(name, (int) asb->sb_mode, (int) asb->sb_rdev) < 0) {
  1342.           if (errno == ENOENT) {
  1343. !         if (f_create_dirs) {
  1344.               if (dirneed(name) < 0 || mknod(name, (int) asb->sb_mode, 
  1345.                  (int) asb->sb_rdev) < 0) {
  1346.               warn(name, syserr());
  1347.  
  1348. --- 245,251 -----
  1349.       }
  1350.       if (mknod(name, (int) asb->sb_mode, (int) asb->sb_rdev) < 0) {
  1351.           if (errno == ENOENT) {
  1352. !         if (f_dir_create) {
  1353.               if (dirneed(name) < 0 || mknod(name, (int) asb->sb_mode, 
  1354.                  (int) asb->sb_rdev) < 0) {
  1355.               warn(name, strerror());
  1356. ***************
  1357. *** 245,251
  1358.           if (f_create_dirs) {
  1359.               if (dirneed(name) < 0 || mknod(name, (int) asb->sb_mode, 
  1360.                  (int) asb->sb_rdev) < 0) {
  1361. !             warn(name, syserr());
  1362.               return (-1);
  1363.               }
  1364.           } else {
  1365.  
  1366. --- 248,254 -----
  1367.           if (f_dir_create) {
  1368.               if (dirneed(name) < 0 || mknod(name, (int) asb->sb_mode, 
  1369.                  (int) asb->sb_rdev) < 0) {
  1370. !             warn(name, strerror());
  1371.               return (-1);
  1372.               }
  1373.           } else {
  1374. ***************
  1375. *** 252,258
  1376.               warn(name, "Directories are not being created (-d option)");
  1377.           }
  1378.           } else {
  1379. !         warn(name, syserr());
  1380.           return (-1);
  1381.           }
  1382.       }
  1383.  
  1384. --- 255,261 -----
  1385.               warn(name, "Directories are not being created (-d option)");
  1386.           }
  1387.           } else {
  1388. !         warn(name, strerror());
  1389.           return (-1);
  1390.           }
  1391.       }
  1392. ***************
  1393. *** 261,267
  1394.       case S_IFDIR:
  1395.       if (exists) {
  1396.           if (perm != operm && chmod(name, (int) perm) < 0) {
  1397. !         warn(name, syserr());
  1398.           return (-1);
  1399.           }
  1400.       } else if (f_create_dirs) {
  1401.  
  1402. --- 264,270 -----
  1403.       case S_IFDIR:
  1404.       if (exists) {
  1405.           if (perm != operm && chmod(name, (int) perm) < 0) {
  1406. !         warn(name, strerror());
  1407.           return (-1);
  1408.           }
  1409.       } else if (f_dir_create) {
  1410. ***************
  1411. *** 264,270
  1412.           warn(name, syserr());
  1413.           return (-1);
  1414.           }
  1415. !     } else if (f_create_dirs) {
  1416.           if (dirmake(name, asb) < 0 || dirneed(name) < 0) {
  1417.           warn(name, syserr());
  1418.           return (-1);
  1419.  
  1420. --- 267,273 -----
  1421.           warn(name, strerror());
  1422.           return (-1);
  1423.           }
  1424. !     } else if (f_dir_create) {
  1425.           if (dirmake(name, asb) < 0 || dirneed(name) < 0) {
  1426.           warn(name, strerror());
  1427.           return (-1);
  1428. ***************
  1429. *** 266,272
  1430.           }
  1431.       } else if (f_create_dirs) {
  1432.           if (dirmake(name, asb) < 0 || dirneed(name) < 0) {
  1433. !         warn(name, syserr());
  1434.           return (-1);
  1435.           }
  1436.       } else {
  1437.  
  1438. --- 269,275 -----
  1439.           }
  1440.       } else if (f_dir_create) {
  1441.           if (dirmake(name, asb) < 0 || dirneed(name) < 0) {
  1442. !         warn(name, strerror());
  1443.           return (-1);
  1444.           }
  1445.       } else {
  1446. ***************
  1447. *** 278,284
  1448.       fd = 0;
  1449.       if (exists) {
  1450.           if (perm != operm && chmod(name, (int) perm) < 0) {
  1451. !         warn(name, syserr());
  1452.           return (-1);
  1453.           }
  1454.       } else if (mknod(name, (int) asb->sb_mode, 0) < 0) {
  1455.  
  1456. --- 281,287 -----
  1457.       fd = 0;
  1458.       if (exists) {
  1459.           if (perm != operm && chmod(name, (int) perm) < 0) {
  1460. !         warn(name, strerror());
  1461.           return (-1);
  1462.           }
  1463.       } else if (mknod(name, (int) asb->sb_mode, 0) < 0) {
  1464. ***************
  1465. *** 283,289
  1466.           }
  1467.       } else if (mknod(name, (int) asb->sb_mode, 0) < 0) {
  1468.           if (errno == ENOENT) {
  1469. !         if (f_create_dirs) {
  1470.               if (dirneed(name) < 0
  1471.                  || mknod(name, (int) asb->sb_mode, 0) < 0) {
  1472.               warn(name, syserr());
  1473.  
  1474. --- 286,292 -----
  1475.           }
  1476.       } else if (mknod(name, (int) asb->sb_mode, 0) < 0) {
  1477.           if (errno == ENOENT) {
  1478. !         if (f_dir_create) {
  1479.               if (dirneed(name) < 0
  1480.                  || mknod(name, (int) asb->sb_mode, 0) < 0) {
  1481.               warn(name, strerror());
  1482. ***************
  1483. *** 286,292
  1484.           if (f_create_dirs) {
  1485.               if (dirneed(name) < 0
  1486.                  || mknod(name, (int) asb->sb_mode, 0) < 0) {
  1487. !             warn(name, syserr());
  1488.               return (-1);
  1489.               }
  1490.           } else {
  1491.  
  1492. --- 289,295 -----
  1493.           if (f_dir_create) {
  1494.               if (dirneed(name) < 0
  1495.                  || mknod(name, (int) asb->sb_mode, 0) < 0) {
  1496. !             warn(name, strerror());
  1497.               return (-1);
  1498.               }
  1499.           } else {
  1500. ***************
  1501. *** 293,299
  1502.               warn(name, "Directories are not being created (-d option)");
  1503.           }
  1504.           } else {
  1505. !         warn(name, syserr());
  1506.           return (-1);
  1507.           }
  1508.       }
  1509.  
  1510. --- 296,302 -----
  1511.               warn(name, "Directories are not being created (-d option)");
  1512.           }
  1513.           } else {
  1514. !         warn(name, strerror());
  1515.           return (-1);
  1516.           }
  1517.       }
  1518. ***************
  1519. *** 304,310
  1520.       case S_IFLNK:
  1521.       if (exists) {
  1522.           if ((ssize = readlink(name, sname, sizeof(sname))) < 0) {
  1523. !         warn(name, syserr());
  1524.           return (-1);
  1525.           } else if (strncmp(sname, asb->sb_link, ssize) == 0) {
  1526.           return (0);
  1527.  
  1528. --- 307,313 -----
  1529.       case S_IFLNK:
  1530.       if (exists) {
  1531.           if ((ssize = readlink(name, sname, sizeof(sname))) < 0) {
  1532. !         warn(name, strerror());
  1533.           return (-1);
  1534.           } else if (strncmp(sname, asb->sb_link, ssize) == 0) {
  1535.           return (0);
  1536. ***************
  1537. *** 309,315
  1538.           } else if (strncmp(sname, asb->sb_link, ssize) == 0) {
  1539.           return (0);
  1540.           } else if (REMOVE(name, &osb) < 0) {
  1541. !         warn(name, syserr());
  1542.           return (-1);
  1543.           } else {
  1544.           exists = 0;
  1545.  
  1546. --- 312,318 -----
  1547.           } else if (strncmp(sname, asb->sb_link, ssize) == 0) {
  1548.           return (0);
  1549.           } else if (REMOVE(name, &osb) < 0) {
  1550. !         warn(name, strerror());
  1551.           return (-1);
  1552.           } else {
  1553.           exists = 0;
  1554. ***************
  1555. *** 317,323
  1556.       }
  1557.       if (symlink(asb->sb_link, name) < 0) {
  1558.           if (errno == ENOENT) {
  1559. !         if (f_create_dirs) {
  1560.               if (dirneed(name) < 0 || symlink(asb->sb_link, name) < 0) {
  1561.               warn(name, syserr());
  1562.               return (-1);
  1563.  
  1564. --- 320,326 -----
  1565.       }
  1566.       if (symlink(asb->sb_link, name) < 0) {
  1567.           if (errno == ENOENT) {
  1568. !         if (f_dir_create) {
  1569.               if (dirneed(name) < 0 || symlink(asb->sb_link, name) < 0) {
  1570.               warn(name, strerror());
  1571.               return (-1);
  1572. ***************
  1573. *** 319,325
  1574.           if (errno == ENOENT) {
  1575.           if (f_create_dirs) {
  1576.               if (dirneed(name) < 0 || symlink(asb->sb_link, name) < 0) {
  1577. !             warn(name, syserr());
  1578.               return (-1);
  1579.               }
  1580.           } else {
  1581.  
  1582. --- 322,328 -----
  1583.           if (errno == ENOENT) {
  1584.           if (f_dir_create) {
  1585.               if (dirneed(name) < 0 || symlink(asb->sb_link, name) < 0) {
  1586. !             warn(name, strerror());
  1587.               return (-1);
  1588.               }
  1589.           } else {
  1590. ***************
  1591. *** 326,332
  1592.               warn(name, "Directories are not being created (-d option)");
  1593.           }
  1594.           } else {
  1595. !         warn(name, syserr());
  1596.           return (-1);
  1597.           }
  1598.       }
  1599.  
  1600. --- 329,335 -----
  1601.               warn(name, "Directories are not being created (-d option)");
  1602.           }
  1603.           } else {
  1604. !         warn(name, strerror());
  1605.           return (-1);
  1606.           }
  1607.       }
  1608. ***************
  1609. *** 338,344
  1610.           warn(name, "Newer file exists");
  1611.           return (-1);
  1612.           } else if (unlink(name) < 0) {
  1613. !         warn(name, syserr());
  1614.           return (-1);
  1615.           } else {
  1616.           exists = 0;
  1617.  
  1618. --- 341,347 -----
  1619.           warn(name, "Newer file exists");
  1620.           return (-1);
  1621.           } else if (unlink(name) < 0) {
  1622. !         warn(name, strerror());
  1623.           return (-1);
  1624.           } else {
  1625.           exists = 0;
  1626. ***************
  1627. *** 346,352
  1628.       }
  1629.       if ((fd = creat(name, (int) perm)) < 0) {
  1630.           if (errno == ENOENT) {
  1631. !         if (f_create_dirs) {
  1632.               if (dirneed(name) < 0 || 
  1633.                   (fd = creat(name, (int) perm)) < 0) {
  1634.               warn(name, syserr());
  1635.  
  1636. --- 349,355 -----
  1637.       }
  1638.       if ((fd = creat(name, (int) perm)) < 0) {
  1639.           if (errno == ENOENT) {
  1640. !         if (f_dir_create) {
  1641.               if (dirneed(name) < 0 || 
  1642.                   (fd = creat(name, (int) perm)) < 0) {
  1643.               warn(name, strerror());
  1644. ***************
  1645. *** 349,355
  1646.           if (f_create_dirs) {
  1647.               if (dirneed(name) < 0 || 
  1648.                   (fd = creat(name, (int) perm)) < 0) {
  1649. !             warn(name, syserr());
  1650.               return (-1);
  1651.               }
  1652.           } else {
  1653.  
  1654. --- 352,358 -----
  1655.           if (f_dir_create) {
  1656.               if (dirneed(name) < 0 || 
  1657.                   (fd = creat(name, (int) perm)) < 0) {
  1658. !             warn(name, strerror());
  1659.               return (-1);
  1660.               }
  1661.           } else {
  1662. ***************
  1663. *** 362,368
  1664.               return(0);
  1665.           }
  1666.           } else {
  1667. !         warn(name, syserr());
  1668.           return (-1);
  1669.           }
  1670.       }
  1671.  
  1672. --- 365,371 -----
  1673.               return(0);
  1674.           }
  1675.           } else {
  1676. !         warn(name, strerror());
  1677.           return (-1);
  1678.           }
  1679.       }
  1680. ***************
  1681. *** 380,386
  1682.   }
  1683.   
  1684.   
  1685. ! /* openi - open the next input file
  1686.    *
  1687.    * DESCRIPTION
  1688.    *
  1689.  
  1690. --- 383,389 -----
  1691.   }
  1692.   
  1693.   
  1694. ! /* openin - open the next input file
  1695.    *
  1696.    * DESCRIPTION
  1697.    *
  1698. ***************
  1699. *** 407,413
  1700.   
  1701.   #ifdef __STDC__
  1702.   
  1703. ! int openi(char *name, Stat *asb)
  1704.   
  1705.   #else
  1706.       
  1707.  
  1708. --- 410,416 -----
  1709.   
  1710.   #ifdef __STDC__
  1711.   
  1712. ! int openin(char *name, Stat *asb)
  1713.   
  1714.   #else
  1715.       
  1716. ***************
  1717. *** 411,417
  1718.   
  1719.   #else
  1720.       
  1721. ! int openi(name, asb)
  1722.   char           *name;        /* name of file to open */
  1723.   Stat           *asb;        /* pointer to stat structure for file */
  1724.   
  1725.  
  1726. --- 414,420 -----
  1727.   
  1728.   #else
  1729.       
  1730. ! int openin(name, asb)
  1731.   char           *name;        /* name of file to open */
  1732.   Stat           *asb;        /* pointer to stat structure for file */
  1733.   
  1734. ***************
  1735. *** 428,434
  1736.       case S_IFLNK:
  1737.       if ((asb->sb_size = readlink(name,
  1738.                    asb->sb_link, sizeof(asb->sb_link) - 1)) < 0) {
  1739. !         warn(name, syserr());
  1740.           return(0);
  1741.       }
  1742.       asb->sb_link[asb->sb_size] = '\0';
  1743.  
  1744. --- 431,437 -----
  1745.       case S_IFLNK:
  1746.       if ((asb->sb_size = readlink(name,
  1747.                    asb->sb_link, sizeof(asb->sb_link) - 1)) < 0) {
  1748. !         warn(name, strerror());
  1749.           return(0);
  1750.       }
  1751.       asb->sb_link[asb->sb_size] = '\0';
  1752. ***************
  1753. *** 439,445
  1754.           return (0);
  1755.       }
  1756.       if ((fd = open(name, O_RDONLY | O_BINARY)) < 0) {
  1757. !         warn(name, syserr());
  1758.       }
  1759.       return (fd);
  1760.       default:
  1761.  
  1762. --- 442,448 -----
  1763.           return (0);
  1764.       }
  1765.       if ((fd = open(name, O_RDONLY | O_BINARY)) < 0) {
  1766. !         warn(name, strerror());
  1767.       }
  1768.       return (fd);
  1769.       default:
  1770. Index: func.h
  1771. *** /tmp/,RCSt1a17063    Sun Feb 12 14:06:40 1989
  1772. --- func.h    Sun Feb 12 14:02:09 1989
  1773. ***************
  1774. *** 1,6
  1775.   /* $Source: /u/mark/src/pax/RCS/func.h,v $
  1776.    *
  1777. !  * $Revision: 1.1 $
  1778.    *
  1779.    * func.h - function type and argument declarations
  1780.    *
  1781.  
  1782. --- 1,6 -----
  1783.   /* $Source: /u/mark/src/pax/RCS/func.h,v $
  1784.    *
  1785. !  * $Revision: 1.3 $
  1786.    *
  1787.    * func.h - function type and argument declarations
  1788.    *
  1789. ***************
  1790. *** 27,33
  1791.    *
  1792.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1793.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1794. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1795.    */
  1796.   
  1797.   #ifndef _PAX_FUNC_H
  1798.  
  1799. --- 27,33 -----
  1800.    *
  1801.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1802.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1803. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1804.    */
  1805.   
  1806.   #ifndef _PAX_FUNC_H
  1807. ***************
  1808. *** 41,47
  1809.   extern Link               *linkto(char *, Stat *);
  1810.   extern char               *mem_get(uint);
  1811.   extern char               *mem_str(char *);
  1812. ! extern char               *syserr(void);
  1813.   extern int          ar_read(void);
  1814.   extern int          buf_read(char *, uint);
  1815.   extern int          buf_skip(OFFSET);
  1816.  
  1817. --- 41,47 -----
  1818.   extern Link               *linkto(char *, Stat *);
  1819.   extern char               *mem_get(uint);
  1820.   extern char               *mem_str(char *);
  1821. ! extern char               *strerror(void);
  1822.   extern int          ar_read(void);
  1823.   extern int          buf_read(char *, uint);
  1824.   extern int          buf_skip(OFFSET);
  1825. ***************
  1826. *** 55,62
  1827.   extern int          nameopt(char *);
  1828.   extern int          open_archive(int);
  1829.   extern int          open_tty(void);
  1830. ! extern int          openi(char *, Stat *);
  1831. ! extern int          openo(char *, Stat *, Link *, int);
  1832.   extern int          pass(char *);
  1833.   extern int          passitem(char *, Stat *, int, char *);
  1834.   extern int          read_header(char *, Stat *);
  1835.  
  1836. --- 55,62 -----
  1837.   extern int          nameopt(char *);
  1838.   extern int          open_archive(int);
  1839.   extern int          open_tty(void);
  1840. ! extern int          openin(char *, Stat *);
  1841. ! extern int          openout(char *, Stat *, Link *, int);
  1842.   extern int          pass(char *);
  1843.   extern int          passitem(char *, Stat *, int, char *);
  1844.   extern int          read_header(char *, Stat *);
  1845. ***************
  1846. *** 86,91
  1847.   extern char            *finduname(int);
  1848.   extern char            *findgname(int);
  1849.   extern int        findgid(char *gname);
  1850.   
  1851.   #else /* !__STDC__ */
  1852.   
  1853.  
  1854. --- 86,92 -----
  1855.   extern char            *finduname(int);
  1856.   extern char            *findgname(int);
  1857.   extern int        findgid(char *gname);
  1858. + extern char               *malloc();
  1859.   
  1860.   #else /* !__STDC__ */
  1861.   
  1862. ***************
  1863. *** 93,99
  1864.   extern Link               *linkto();
  1865.   extern char               *mem_get();
  1866.   extern char               *mem_str();
  1867. ! extern char               *syserr();
  1868.   extern int          ar_read();
  1869.   extern int          buf_read();
  1870.   extern int          buf_skip();
  1871.  
  1872. --- 94,100 -----
  1873.   extern Link               *linkto();
  1874.   extern char               *mem_get();
  1875.   extern char               *mem_str();
  1876. ! extern char               *strerror();
  1877.   extern int          ar_read();
  1878.   extern int          buf_read();
  1879.   extern int          buf_skip();
  1880. ***************
  1881. *** 107,114
  1882.   extern int          nameopt();
  1883.   extern int          open_archive();
  1884.   extern int          open_tty();
  1885. ! extern int          openi();
  1886. ! extern int          openo();
  1887.   extern int          pass();
  1888.   extern int          passitem();
  1889.   extern int              read_header();
  1890.  
  1891. --- 108,115 -----
  1892.   extern int          nameopt();
  1893.   extern int          open_archive();
  1894.   extern int          open_tty();
  1895. ! extern int          openin();
  1896. ! extern int          openout();
  1897.   extern int          pass();
  1898.   extern int          passitem();
  1899.   extern int              read_header();
  1900. Index: limits.h
  1901. *** /tmp/,RCSt1a17068    Sun Feb 12 14:06:46 1989
  1902. --- limits.h    Sun Feb 12 14:02:10 1989
  1903. ***************
  1904. *** 1,6
  1905.   /* $Source: /u/mark/src/pax/RCS/limits.h,v $
  1906.    *
  1907. !  * $Revision: 1.1 $
  1908.    *
  1909.    *     limits.h - POSIX compatible defnitions for some of <limits.h>
  1910.    *
  1911.  
  1912. --- 1,6 -----
  1913.   /* $Source: /u/mark/src/pax/RCS/limits.h,v $
  1914.    *
  1915. !  * $Revision: 1.2 $
  1916.    *
  1917.    *     limits.h - POSIX compatible defnitions for some of <limits.h>
  1918.    *
  1919. ***************
  1920. *** 37,43
  1921.    *
  1922.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1923.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1924. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1925.    */
  1926.   
  1927.   #ifndef _PAX_LIMITS_H
  1928.  
  1929. --- 37,43 -----
  1930.    *
  1931.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1932.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1933. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1934.    */
  1935.   
  1936.   #ifndef _PAX_LIMITS_H
  1937. Index: link.c
  1938. *** /tmp/,RCSt1a17073    Sun Feb 12 14:06:52 1989
  1939. --- link.c    Sun Feb 12 14:02:11 1989
  1940. ***************
  1941. *** 1,6
  1942.   /* $Source: /u/mark/src/pax/RCS/link.c,v $
  1943.    *
  1944. !  * $Revision: 1.1 $
  1945.    *
  1946.    * link.c - functions for handling multiple file links 
  1947.    *
  1948.  
  1949. --- 1,6 -----
  1950.   /* $Source: /u/mark/src/pax/RCS/link.c,v $
  1951.    *
  1952. !  * $Revision: 1.2 $
  1953.    *
  1954.    * link.c - functions for handling multiple file links 
  1955.    *
  1956. ***************
  1957. *** 27,33
  1958.    *
  1959.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1960.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1961. !  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1962.    *
  1963.    * $Log:    link.c,v $
  1964.    * Revision 1.1  88/12/23  18:02:12  mark
  1965.  
  1966. --- 27,33 -----
  1967.    *
  1968.    * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  1969.    * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  1970. !  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1971.    *
  1972.    * $Log:    link.c,v $
  1973.    * Revision 1.2  89/02/12  10:04:38  mark
  1974. ***************
  1975. *** 30,35
  1976.    * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1977.    *
  1978.    * $Log:    link.c,v $
  1979.    * Revision 1.1  88/12/23  18:02:12  mark
  1980.    * Initial revision
  1981.    * 
  1982.  
  1983. --- 30,38 -----
  1984.    * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  1985.    *
  1986.    * $Log:    link.c,v $
  1987. +  * Revision 1.2  89/02/12  10:04:38  mark
  1988. +  * 1.2 release fixes
  1989. +  * 
  1990.    * Revision 1.1  88/12/23  18:02:12  mark
  1991.    * Initial revision
  1992.    * 
  1993. ***************
  1994. *** 36,42
  1995.    */
  1996.   
  1997.   #ifndef lint
  1998. ! static char *ident = "$Id: link.c,v 1.1 88/12/23 18:02:12 mark Rel $";
  1999.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  2000.   #endif /* ! lint */
  2001.   
  2002.  
  2003. --- 39,45 -----
  2004.    */
  2005.   
  2006.   #ifndef lint
  2007. ! static char *ident = "$Id: link.c,v 1.2 89/02/12 10:04:38 mark Exp $";
  2008.   static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
  2009.   #endif /* ! lint */
  2010.   
  2011. ***************
  2012. *** 116,122
  2013.           linkp->l_back->l_forw = linkp->l_forw;
  2014.           }
  2015.           free((char *) linkp);
  2016. !         *abase = (Link *) NULL;
  2017.       } else if (linkp->l_ino == asb->sb_ino && linkp->l_dev == asb->sb_dev) {
  2018.           /* 
  2019.            * check to see if a file with the name "name" exists in the 
  2020.  
  2021. --- 119,125 -----
  2022.           linkp->l_back->l_forw = linkp->l_forw;
  2023.           }
  2024.           free((char *) linkp);
  2025. !         *abase = (Link *)NULL;
  2026.       } else if (linkp->l_ino == asb->sb_ino && linkp->l_dev == asb->sb_dev) {
  2027.           /* 
  2028.            * check to see if a file with the name "name" exists in the 
  2029. ***************
  2030. *** 191,197
  2031.       for (linkp = *(LINKHASH(asb->sb_ino)); linkp; linkp = linknext) {
  2032.       if (linkp->l_ino == asb->sb_ino && linkp->l_dev == asb->sb_dev) {
  2033.           if (strcmp(name, linkp->l_name) == 0) {
  2034. !         return ((Link *) NULL);
  2035.           } 
  2036.           return (linkp);
  2037.       } else {
  2038.  
  2039. --- 194,200 -----
  2040.       for (linkp = *(LINKHASH(asb->sb_ino)); linkp; linkp = linknext) {
  2041.       if (linkp->l_ino == asb->sb_ino && linkp->l_dev == asb->sb_dev) {
  2042.           if (strcmp(name, linkp->l_name) == 0) {
  2043. !         return ((Link *)NULL);
  2044.           } 
  2045.           return (linkp);
  2046.       } else {
  2047. ***************
  2048. *** 243,251
  2049.   
  2050.       for (linkp = *(LINKHASH(asb->sb_ino)); linkp; linkp = linknext) {
  2051.       if (linkp->l_ino == asb->sb_ino && linkp->l_dev == asb->sb_dev) {
  2052. !         if ((path = (Path *) mem_get(sizeof(Path))) == (Path *) NULL || 
  2053. !         (path->p_name = mem_str(name)) == (char *) NULL) {
  2054. !         return((Link *) NULL);
  2055.           }
  2056.           if (path->p_forw = linkp->l_path) {
  2057.           if (linkp->l_path->p_forw) {
  2058.  
  2059. --- 246,254 -----
  2060.   
  2061.       for (linkp = *(LINKHASH(asb->sb_ino)); linkp; linkp = linknext) {
  2062.       if (linkp->l_ino == asb->sb_ino && linkp->l_dev == asb->sb_dev) {
  2063. !         if ((path = (Path *) mem_get(sizeof(Path))) == (Path *)NULL || 
  2064. !         (path->p_name = mem_str(name)) == (char *)NULL) {
  2065. !         return((Link *)NULL);
  2066.           }
  2067.           if (path->p_forw = linkp->l_path) {
  2068.           if (linkp->l_path->p_forw) {
  2069. ***************
  2070. *** 254,260
  2071.           } else {
  2072.           linkp->l_path = path;
  2073.           }
  2074. !         path->p_back = (Path *) NULL;
  2075.           return(linkp);
  2076.       } else {
  2077.           linknext = linkp->l_forw;
  2078.  
  2079. --- 257,263 -----
  2080.           } else {
  2081.           linkp->l_path = path;
  2082.           }
  2083. !         path->p_back = (Path *)NULL;
  2084.           return(linkp);
  2085.       } else {
  2086.           linknext = linkp->l_forw;
  2087. ***************
  2088. *** 265,273
  2089.        */
  2090.   
  2091.       if ((asb->sb_mode & S_IFMT) == S_IFDIR
  2092. !     || (linkp = (Link *) mem_get(sizeof(Link))) == NULL
  2093. !     || (linkp->l_name = mem_str(name)) == NULL) {
  2094. !     return ((Link *) NULL);
  2095.       }
  2096.       linkp->l_dev = asb->sb_dev;
  2097.       linkp->l_ino = asb->sb_ino;
  2098.  
  2099. --- 268,276 -----
  2100.        */
  2101.   
  2102.       if ((asb->sb_mode & S_IFMT) == S_IFDIR
  2103. !     || (linkp = (Link *) mem_get(sizeof(Link))) == (Link *)NULL
  2104. !     || (linkp->l_name = mem_str(name)) == (char *)NULL) {
  2105. !     return ((Link *)NULL);
  2106.       }
  2107.       linkp->l_dev = asb->sb_dev;
  2108.       linkp->l_ino = asb->sb_ino;
  2109. ***************
  2110. *** 273,279
  2111.       linkp->l_ino = asb->sb_ino;
  2112.       linkp->l_nlink = asb->sb_nlink - 1;
  2113.       linkp->l_size = asb->sb_size;
  2114. !     linkp->l_path = (Path *) NULL;
  2115.       if (linkp->l_forw = *(abase = LINKHASH(asb->sb_ino))) {
  2116.       linkp->l_forw->l_back = linkp;
  2117.       } else {
  2118.  
  2119. --- 276,282 -----
  2120.       linkp->l_ino = asb->sb_ino;
  2121.       linkp->l_nlink = asb->sb_nlink - 1;
  2122.       linkp->l_size = asb->sb_size;
  2123. !     linkp->l_path = (Path *)NULL;
  2124.       if (linkp->l_forw = *(abase = LINKHASH(asb->sb_ino))) {
  2125.       linkp->l_forw->l_back = linkp;
  2126.       } else {
  2127. ***************
  2128. *** 279,285
  2129.       } else {
  2130.       *abase = linkp;
  2131.       }
  2132. !     linkp->l_back = NULL;
  2133.       return (linkp);
  2134.   }
  2135.   
  2136.  
  2137. --- 282,288 -----
  2138.       } else {
  2139.       *abase = linkp;
  2140.       }
  2141. !     linkp->l_back = (Link *)NULL;
  2142.       return (linkp);
  2143.   }
  2144.   
  2145. -- 
  2146. Mark H. Colburn                  "Look into a child's eye;
  2147. Minnetech Consulting, Inc.        there's no hate and there's no lie;
  2148. mark@jhereg.mn.org                there's no black and there's no white."
  2149.  
  2150.  
  2151.