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.4 2005/01/13 18:57:56 okumoto 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 const *tname = "temporary file";           /* temporary file "name" */
  58
  59 int
  60 tmp(void)
  61 {
  62         sigset_t set, oset;
  63         static int first;
  64         int fd;
  65         char path[MAXPATHLEN];
  66
  67         if (!first && !envtmp) {
  68                 envtmp = getenv("TMPDIR");
  69                 first = 1;
  70         }
  71
  72         if (envtmp)
  73                 sprintf(path, "%s/%s", envtmp, _NAME_ARTMP);
  74         else
  75                 strcpy(path, _PATH_ARTMP);
  76
  77         sigfillset(&set);
  78         sigprocmask(SIG_BLOCK, &set, &oset);
  79         if ((fd = mkstemp(path)) == -1)
  80                 error(tname);
  81         unlink(path);
  82         sigprocmask(SIG_SETMASK, &oset, NULL);
  83         return (fd);
  84 }
  85
  86 /*
  87  * files --
  88  *      See if the current file matches any file in the argument list; if it
  89  *      does, remove it from the argument list.
  90  */
  91 char *
  92 files(char **argv)
  93 {
  94         char **list, *p;
  95
  96         for (list = argv; *list; ++list)
  97                 if (compare(*list)) {
  98                         p = *list;
  99                         for (; (list[0] = list[1]); ++list)
 100                                 continue;
 101                         return (p);
 102                 }
 103         return (NULL);
 104 }
 105
 106 void
 107 orphans(char **argv)
 108 {
 109
 110         for (; *argv; ++argv)
 111                 warnx("%s: not found in archive", *argv);
 112 }
 113
 114 int
 115 compare(char *dest)
 116 {
 117         int maxname = (options & AR_TR) ? OLDARMAXNAME : MAXNAMLEN;
 118         return (!strncmp(chdr.name, basename(dest), maxname));
 119 }
 120
 121 void
 122 badfmt(void)
 123 {
 124
 125         errx(1, "%s: %s", archive, strerror(EFTYPE));
 126 }
 127
 128 void
 129 error(char const *name)
 130 {
 131
 132         err(1, "%s", name);
 133 }