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