usr.bin/ar/misc.c

   1 /*-
   2  * Copyright (c) 1990, 1993, 1994
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * This code is derived from software contributed to Berkeley by
   6  * Hugh Smith at The University of Guelph.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. All advertising materials mentioning features or use of this software
  17  *    must display the following acknowledgement:
  18  *      This product includes software developed by the University of
  19  *      California, Berkeley and its contributors.
  20  * 4. Neither the name of the University nor the names of its contributors
  21  *    may be used to endorse or promote products derived from this software
  22  *    without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  34  * SUCH DAMAGE.
  35  */
  36
  37 #if 0
  38 #ifndef lint
  39 static char sccsid[] = "@(#)misc.c      8.3 (Berkeley) 4/2/94";
  40 #endif
  41 #endif
  42
  43 #include <sys/cdefs.h>
  44 __FBSDID("$FreeBSD$");
  45
  46 #include <sys/param.h>
  47
  48 #include <dirent.h>
  49 #include <err.h>
  50 #include <errno.h>
  51 #include <libgen.h>
  52 #include <signal.h>
  53 #include <stdio.h>
  54 #include <stdlib.h>
  55 #include <string.h>
  56 #include <unistd.h>
  57
  58 #include "archive.h"
  59 #include "extern.h"
  60 #include "pathnames.h"
  61
  62 const char *tname = "temporary file";           /* temporary file "name" */
  63
  64 int
  65 tmp()
  66 {
  67         extern char *envtmp;
  68         sigset_t set, oset;
  69         static int first;
  70         int fd;
  71         char path[MAXPATHLEN];
  72
  73         if (!first && !envtmp) {
  74                 envtmp = getenv("TMPDIR");
  75                 first = 1;
  76         }
  77
  78         if (envtmp)
  79                 (void)snprintf(path, sizeof(path), "%s/%s", envtmp,
  80                     _NAME_ARTMP);
  81         else
  82                 strlcpy(path, _PATH_ARTMP, sizeof(path));
  83
  84         sigfillset(&set);
  85         (void)sigprocmask(SIG_BLOCK, &set, &oset);
  86         if ((fd = mkstemp(path)) == -1)
  87                 error(tname);
  88         (void)unlink(path);
  89         (void)sigprocmask(SIG_SETMASK, &oset, NULL);
  90         return (fd);
  91 }
  92
  93 /*
  94  * files --
  95  *      See if the current file matches any file in the argument list; if it
  96  *      does, remove it from the argument list.
  97  */
  98 char *
  99 files(argv)
 100         char **argv;
 101 {
 102         char **list, *p;
 103
 104         for (list = argv; *list; ++list)
 105                 if (compare(*list)) {
 106                         p = *list;
 107                         for (; (list[0] = list[1]); ++list)
 108                                 continue;
 109                         return (p);
 110                 }
 111         return (NULL);
 112 }
 113
 114 void
 115 orphans(argv)
 116         char **argv;
 117 {
 118
 119         for (; *argv; ++argv)
 120                 warnx("%s: not found in archive", *argv);
 121 }
 122
 123 int
 124 compare(dest)
 125         char *dest;
 126 {
 127         int maxname = (options & AR_TR) ? OLDARMAXNAME : MAXNAMLEN;
 128         return (!strncmp(chdr.name, basename(dest), maxname));
 129 }
 130
 131 void
 132 badfmt()
 133 {
 134
 135         errx(1, "%s: %s", archive, strerror(EFTYPE));
 136 }
 137
 138 void
 139 error(name)
 140         const char *name;
 141 {
 142
 143         err(1, "%s", name);
 144 }