bin/pax/dumptar.c

   1 /*      $NetBSD: dumptar.c,v 1.1 2004/06/16 14:28:21 christos Exp $     */
   2
   3 /*-
   4  * Copyright (c) 2004 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * This code is derived from software contributed to The NetBSD Foundation
   8  * by Christos Zoulas.
   9  *
  10  * Redistribution and use in source and binary forms, with or without
  11  * modification, are permitted provided that the following conditions
  12  * are met:
  13  * 1. Redistributions of source code must retain the above copyright
  14  *    notice, this list of conditions and the following disclaimer.
  15  * 2. Redistributions in binary form must reproduce the above copyright
  16  *    notice, this list of conditions and the following disclaimer in the
  17  *    documentation and/or other materials provided with the distribution.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  29  * POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #include <stdio.h>
  33 #include <err.h>
  34 #include <fcntl.h>
  35 #include <sys/stat.h>
  36 #include <sys/mman.h>
  37
  38 #include "tar.h"
  39
  40 #define ussum(a) 1
  41
  42 static char *
  43 buf(const char *p, size_t s)
  44 {
  45         static char buf[1024];
  46         (void)snprintf(buf, sizeof(buf), "%s", p);
  47         buf[s] = '\0';
  48         return buf;
  49 }
  50
  51 int
  52 intarg(const char *p, size_t s)
  53 {
  54         char *ep, *b = buf(p, s);
  55         int r = (int)strtol(p, &ep, 8);
  56         return r;
  57 }
  58
  59 static int
  60 usdump(void *p)
  61 {
  62         HD_USTAR *t = p;
  63         int size = intarg(t->size, sizeof(t->size));
  64         size = ((size + 511) / 512) * 512 + 512;
  65
  66         (void)fprintf(stdout, "*****\n");
  67 #define PR(a) \
  68         (void)fprintf(stdout, #a "=%s\n", buf(t->a, sizeof(t->a)));
  69 #define IPR(a) \
  70         (void)fprintf(stdout, #a "=%d\n", intarg(t->a, sizeof(t->a)));
  71 #define OPR(a) \
  72         (void)fprintf(stdout, #a "=%o\n", intarg(t->a, sizeof(t->a)));
  73         PR(name);
  74         OPR(mode);
  75         IPR(uid);
  76         IPR(gid);
  77         IPR(size);
  78         OPR(mtime);
  79         OPR(chksum);
  80         (void)fprintf(stdout, "typeflag=%c\n", t->typeflag);
  81         PR(linkname);
  82         PR(magic);
  83         PR(version);
  84         PR(uname);
  85         PR(gname);
  86         OPR(devmajor);
  87         OPR(devminor);
  88         PR(prefix);
  89         return size;
  90 }
  91
  92 int
  93 main(int argc, char *argv[])
  94 {
  95         int fd;
  96         struct stat st;
  97         char *p, *ep;
  98
  99         if (argc != 2) {
 100                 (void)fprintf(stderr, "Usage: %s <filename>\n", getprogname());
 101                 return 1;
 102         }
 103
 104         if ((fd = open(argv[1], O_RDONLY)) == -1)
 105                 err(1, "Cannot open `%s'", argv[1]);
 106
 107         if (fstat(fd, &st) == -1)
 108                 err(1, "Cannot fstat `%s'", argv[1]);
 109
 110         if ((p = mmap(NULL, (size_t)st.st_size, PROT_READ,
 111             MAP_FILE|MAP_PRIVATE, fd, (off_t)0)) == MAP_FAILED)
 112                 err(1, "Cannot mmap `%s'", argv[1]);
 113         (void)close(fd);
 114
 115         ep = (char *)p + (size_t)st.st_size;
 116
 117         for (; p < ep + sizeof(HD_USTAR);) {
 118                 if (ussum(p))
 119                         p += usdump(p);
 120         }
 121         return 0;
 122 }