external/bsd/libarchive/dist/cpio/test/test_option_c.c

   1 /*-
   2  * Copyright (c) 2003-2007 Tim Kientzle
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
  15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  17  * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
  18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  24  */
  25 #include "test.h"
  26 __FBSDID("$FreeBSD$");
  27
  28 static int
  29 is_octal(const char *p, size_t l)
  30 {
  31         while (l > 0) {
  32                 if (*p < '0' || *p > '7')
  33                         return (0);
  34                 --l;
  35                 ++p;
  36         }
  37         return (1);
  38 }
  39
  40 static int
  41 from_octal(const char *p, size_t l)
  42 {
  43         int r = 0;
  44
  45         while (l > 0) {
  46                 r *= 8;
  47                 r += *p - '0';
  48                 --l;
  49                 ++p;
  50         }
  51         return (r);
  52 }
  53
  54 DEFINE_TEST(test_option_c)
  55 {
  56         int fd, filelist;
  57         int r;
  58         int dev, ino, gid;
  59         time_t t, now;
  60         char *p, *e;
  61         size_t s;
  62         mode_t oldmask;
  63
  64         oldmask = umask(0);
  65
  66         /*
  67          * Create an assortment of files.
  68          * TODO: Extend this to cover more filetypes.
  69          */
  70         filelist = open("filelist", O_CREAT | O_WRONLY, 0644);
  71
  72         /* "file" */
  73         fd = open("file", O_CREAT | O_WRONLY, 0644);
  74         assert(fd >= 0);
  75         assertEqualInt(10, write(fd, "123456789", 10));
  76         close(fd);
  77         assertEqualInt(5, write(filelist, "file\n", 5));
  78
  79         /* "symlink" */
  80         assertEqualInt(0, symlink("file", "symlink"));
  81         assertEqualInt(8, write(filelist, "symlink\n", 8));
  82
  83         /* "dir" */
  84         assertEqualInt(0, mkdir("dir", 0775));
  85         /* Record some facts about what we just created: */
  86         now = time(NULL); /* They were all created w/in last two seconds. */
  87         assertEqualInt(4, write(filelist, "dir\n", 4));
  88
  89         /* Use the cpio program to create an archive. */
  90         close(filelist);
  91         r = systemf("%s -oc <filelist >basic.out 2>basic.err", testprog);
  92         /* Verify that nothing went to stderr. */
  93         assertFileContents("1 block\n", 8, "basic.err");
  94
  95         /* Assert that the program finished. */
  96         failure("%s -oc crashed", testprog);
  97         if (!assertEqualInt(r, 0))
  98                 return;
  99
 100         /* Verify that stdout is a well-formed cpio file in "odc" format. */
 101         p = slurpfile(&s, "basic.out");
 102         assertEqualInt(s, 512);
 103         e = p;
 104
 105         /*
 106          * Some of these assertions could be stronger, but it's
 107          * a little tricky because they depend on the local environment.
 108          */
 109
 110         /* First entry is "file" */
 111         assert(is_octal(e, 76)); /* Entire header is octal digits. */
 112         assertEqualMem(e + 0, "070707", 6); /* Magic */
 113         assert(is_octal(e + 6, 6)); /* dev */
 114         dev = from_octal(e + 6, 6);
 115         assert(is_octal(e + 12, 6)); /* ino */
 116         ino = from_octal(e + 12, 6);
 117         assertEqualMem(e + 18, "100644", 6); /* Mode */
 118         assertEqualInt(from_octal(e + 24, 6), getuid()); /* uid */
 119         assert(is_octal(e + 30, 6)); /* gid */
 120         gid = from_octal(e + 30, 6);
 121         assertEqualMem(e + 36, "000001", 6); /* nlink */
 122         failure("file entries should not have rdev set (dev field was 0%o)",
 123             dev);
 124         assertEqualMem(e + 42, "000000", 6); /* rdev */
 125         t = from_octal(e + 48, 11); /* mtime */
 126         assert(t <= now); /* File wasn't created in future. */
 127         assert(t >= now - 2); /* File was created w/in last 2 secs. */
 128         assertEqualMem(e + 59, "000005", 6); /* Name size */
 129         assertEqualMem(e + 65, "00000000012", 11); /* File size */
 130         assertEqualMem(e + 76, "file\0", 5); /* Name contents */
 131         assertEqualMem(e + 81, "123456789\0", 10); /* File contents */
 132         e += 91;
 133
 134         /* Second entry is "symlink" pointing to "file" */
 135         assert(is_octal(e, 76)); /* Entire header is octal digits. */
 136         assertEqualMem(e + 0, "070707", 6); /* Magic */
 137         assertEqualInt(dev, from_octal(e + 6, 6)); /* dev */
 138         assert(dev != from_octal(e + 12, 6)); /* ino */
 139         assertEqualMem(e + 18, "120777", 6); /* Mode */
 140         assertEqualInt(from_octal(e + 24, 6), getuid()); /* uid */
 141         assertEqualInt(gid, from_octal(e + 30, 6)); /* gid */
 142         assertEqualMem(e + 36, "000001", 6); /* nlink */
 143         failure("file entries should have rdev == 0 (dev was 0%o)",
 144             from_octal(e + 6, 6));
 145         assertEqualMem(e + 42, "000000", 6); /* rdev */
 146         t = from_octal(e + 48, 11); /* mtime */
 147         assert(t <= now); /* File wasn't created in future. */
 148         assert(t >= now - 2); /* File was created w/in last 2 secs. */
 149         assertEqualMem(e + 59, "000010", 6); /* Name size */
 150         assertEqualMem(e + 65, "00000000004", 11); /* File size */
 151         assertEqualMem(e + 76, "symlink\0", 8); /* Name contents */
 152         assertEqualMem(e + 84, "file", 4); /* Symlink target. */
 153         e += 88;
 154
 155         /* Second entry is "dir" */
 156         assert(is_octal(e, 76));
 157         assertEqualMem(e + 0, "070707", 6); /* Magic */
 158         /* Dev should be same as first entry. */
 159         assert(is_octal(e + 6, 6)); /* dev */
 160         assertEqualInt(dev, from_octal(e + 6, 6));
 161         /* Ino must be different from first entry. */
 162         assert(is_octal(e + 12, 6)); /* ino */
 163         assert(dev != from_octal(e + 12, 6));
 164         assertEqualMem(e + 18, "040775", 6); /* Mode */
 165         assertEqualInt(from_octal(e + 24, 6), getuid()); /* uid */
 166         /* Gid should be same as first entry. */
 167         assert(is_octal(e + 30, 6)); /* gid */
 168         assertEqualInt(gid, from_octal(e + 30, 6));
 169         assertEqualMem(e + 36, "000002", 6); /* Nlink */
 170         t = from_octal(e + 48, 11); /* mtime */
 171         assert(t <= now); /* File wasn't created in future. */
 172         assert(t >= now - 2); /* File was created w/in last 2 secs. */
 173         assertEqualMem(e + 59, "000004", 6); /* Name size */
 174         assertEqualMem(e + 65, "00000000000", 11); /* File size */
 175         assertEqualMem(e + 76, "dir\0", 4); /* name */
 176         e += 80;
 177
 178         /* TODO: Verify other types of entries. */
 179
 180         /* Last entry is end-of-archive marker. */
 181         assert(is_octal(e, 76));
 182         assertEqualMem(e + 0, "070707", 6); /* Magic */
 183         assertEqualMem(e + 6, "000000", 6); /* dev */
 184         assertEqualMem(e + 12, "000000", 6); /* ino */
 185         assertEqualMem(e + 18, "000000", 6); /* Mode */
 186         assertEqualMem(e + 24, "000000", 6); /* uid */
 187         assertEqualMem(e + 30, "000000", 6); /* gid */
 188         assertEqualMem(e + 36, "000001", 6); /* Nlink */
 189         assertEqualMem(e + 42, "000000", 6); /* rdev */
 190         assertEqualMem(e + 48, "00000000000", 11); /* mtime */
 191         assertEqualMem(e + 59, "000013", 6); /* Name size */
 192         assertEqualMem(e + 65, "00000000000", 11); /* File size */
 193         assertEqualMem(e + 76, "TRAILER!!!\0", 11); /* Name */
 194
 195         free(p);
 196
 197         umask(oldmask);
 198 }