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 #ifndef lint
  38 static const char sccsid[] = "@(#)misc.c        8.3 (Berkeley) 4/2/94";
  39 static const char rcsid[] =
  40   "$FreeBSD: src/usr.bin/ar/misc.c,v 1.6.6.1 2001/08/02 00:51:00 obrien Exp $";
  41 #endif /* not lint */
  42
  43 #include <sys/param.h>
  44
  45 #include <dirent.h>
  46 #include <err.h>
  47 #include <errno.h>
  48 #include <libgen.h>
  49 #include <signal.h>
  50 #include <stdio.h>
  51 #include <stdlib.h>
  52 #include <string.h>
  53 #include <unistd.h>
  54
  55 #include "archive.h"
  56 #include "extern.h"
  57 #include "pathnames.h"
  58
  59 char *tname = "temporary file";         /* temporary file "name" */
  60
  61 int
  62 tmp()
  63 {
  64         extern char *envtmp;
  65         sigset_t set, oset;
  66         static int first;
  67         int fd;
  68         char path[MAXPATHLEN];
  69
  70         if (!first && !envtmp) {
  71                 envtmp = getenv("TMPDIR");
  72                 first = 1;
  73         }
  74
  75         if (envtmp)
  76                 (void)sprintf(path, "%s/%s", envtmp, _NAME_ARTMP);
  77         else
  78                 strcpy(path, _PATH_ARTMP);
  79
  80         sigfillset(&set);
  81         (void)sigprocmask(SIG_BLOCK, &set, &oset);
  82         if ((fd = mkstemp(path)) == -1)
  83                 error(tname);
  84         (void)unlink(path);
  85         (void)sigprocmask(SIG_SETMASK, &oset, NULL);
  86         return (fd);
  87 }
  88
  89 /*
  90  * files --
  91  *      See if the current file matches any file in the argument list; if it
  92  *      does, remove it from the argument list.
  93  */
  94 char *
  95 files(argv)
  96         char **argv;
  97 {
  98         char **list, *p;
  99
 100         for (list = argv; *list; ++list)
 101                 if (compare(*list)) {
 102                         p = *list;
 103                         for (; (list[0] = list[1]); ++list)
 104                                 continue;
 105                         return (p);
 106                 }
 107         return (NULL);
 108 }
 109
 110 void
 111 orphans(argv)
 112         char **argv;
 113 {
 114
 115         for (; *argv; ++argv)
 116                 warnx("%s: not found in archive", *argv);
 117 }
 118
 119 int
 120 compare(dest)
 121         char *dest;
 122 {
 123         int maxname = (options & AR_TR) ? OLDARMAXNAME : MAXNAMLEN;
 124         return (!strncmp(chdr.name, basename(dest), maxname));
 125 }
 126
 127 void
 128 badfmt()
 129 {
 130
 131         errx(1, "%s: %s", archive, strerror(EFTYPE));
 132 }
 133
 134 void
 135 error(name)
 136         char *name;
 137 {
 138
 139         err(1, "%s", name);
 140 }