contrib/libarchive/libarchive/test/test_write_format_cpio_odc.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
  29 static int
  30 is_octal(const char *p, size_t l)
  31 {
  32         while (l > 0) {
  33                 if (*p < '0' || *p > '7')
  34                         return (0);
  35                 --l;
  36                 ++p;
  37         }
  38         return (1);
  39 }
  40
  41 /*
  42  * Detailed verification that cpio 'odc' archives are written with
  43  * the correct format.
  44  */
  45 DEFINE_TEST(test_write_format_cpio_odc)
  46 {
  47         struct archive *a;
  48         struct archive_entry *entry;
  49         char *buff, *e, *file;
  50         size_t buffsize = 100000;
  51         size_t used;
  52
  53         buff = malloc(buffsize);
  54
  55         /* Create a new archive in memory. */
  56         assert((a = archive_write_new()) != NULL);
  57         assertEqualIntA(a, 0, archive_write_set_format_cpio(a));
  58         assertEqualIntA(a, 0, archive_write_set_compression_none(a));
  59         assertEqualIntA(a, 0, archive_write_open_memory(a, buff, buffsize, &used));
  60
  61         /*
  62          * Add various files to it.
  63          * TODO: Extend this to cover more filetypes.
  64          */
  65
  66         /* "file" with 10 bytes of content */
  67         assert((entry = archive_entry_new()) != NULL);
  68         archive_entry_set_mtime(entry, 1, 10);
  69         archive_entry_set_pathname(entry, "file");
  70         archive_entry_set_mode(entry, S_IFREG | 0664);
  71         archive_entry_set_size(entry, 10);
  72         archive_entry_set_uid(entry, 80);
  73         archive_entry_set_gid(entry, 90);
  74         archive_entry_set_dev(entry, 12);
  75         archive_entry_set_ino(entry, 89);
  76         archive_entry_set_nlink(entry, 2);
  77         assertEqualIntA(a, 0, archive_write_header(a, entry));
  78         archive_entry_free(entry);
  79         assertEqualIntA(a, 10, archive_write_data(a, "1234567890", 10));
  80
  81         /* Hardlink to "file" with 10 bytes of content */
  82         assert((entry = archive_entry_new()) != NULL);
  83         archive_entry_set_mtime(entry, 1, 10);
  84         archive_entry_set_pathname(entry, "linkfile");
  85         archive_entry_set_mode(entry, S_IFREG | 0664);
  86         archive_entry_set_size(entry, 10);
  87         archive_entry_set_uid(entry, 80);
  88         archive_entry_set_gid(entry, 90);
  89         archive_entry_set_dev(entry, 12);
  90         archive_entry_set_ino(entry, 89);
  91         archive_entry_set_nlink(entry, 2);
  92         assertEqualIntA(a, 0, archive_write_header(a, entry));
  93         archive_entry_free(entry);
  94         assertEqualIntA(a, 10, archive_write_data(a, "1234567890", 10));
  95
  96         /* "dir" */
  97         assert((entry = archive_entry_new()) != NULL);
  98         archive_entry_set_mtime(entry, 2, 20);
  99         archive_entry_set_pathname(entry, "dir");
 100         archive_entry_set_mode(entry, S_IFDIR | 0775);
 101         archive_entry_set_size(entry, 10);
 102         archive_entry_set_nlink(entry, 2);
 103         assertEqualIntA(a, 0, archive_write_header(a, entry));
 104         archive_entry_free(entry);
 105         /* Write of data to dir should fail == zero bytes get written. */
 106         assertEqualIntA(a, 0, archive_write_data(a, "1234567890", 10));
 107
 108         /* "symlink" pointing to "file" */
 109         assert((entry = archive_entry_new()) != NULL);
 110         archive_entry_set_mtime(entry, 3, 30);
 111         archive_entry_set_pathname(entry, "symlink");
 112         archive_entry_set_mode(entry, 0664);
 113         archive_entry_set_filetype(entry, AE_IFLNK);
 114         archive_entry_set_symlink(entry,"file");
 115         archive_entry_set_size(entry, 0);
 116         archive_entry_set_uid(entry, 88);
 117         archive_entry_set_gid(entry, 98);
 118         archive_entry_set_dev(entry, 12);
 119         archive_entry_set_ino(entry, 90);
 120         archive_entry_set_nlink(entry, 1);
 121         assertEqualIntA(a, 0, archive_write_header(a, entry));
 122         archive_entry_free(entry);
 123         /* Write of data to symlink should fail == zero bytes get written. */
 124         assertEqualIntA(a, 0, archive_write_data(a, "1234567890", 10));
 125
 126 #if ARCHIVE_VERSION_NUMBER < 2000000
 127         archive_write_finish(a);
 128 #else
 129         assert(0 == archive_write_finish(a));
 130 #endif
 131
 132         /*
 133          * Verify the archive format.
 134          *
 135          * Notes on the ino validation: cpio does not actually require
 136          * that the ino values written to the archive match those read
 137          * from disk.  It really requires that:
 138          *   * matching non-zero ino values be written as matching
 139          *     non-zero values
 140          *   * non-matching non-zero ino values be written as non-matching
 141          *     non-zero values
 142          * Libarchive further ensures that zero ino values get written
 143          * as zeroes.  This allows the cpio writer to generate
 144          * synthetic ino values for the archive that may be different
 145          * than those on disk in order to avoid problems due to truncation.
 146          * This is especially needed for odc (POSIX format) that
 147          * only supports 18-bit ino values.
 148          */
 149         e = buff;
 150
 151         /* "file" */
 152         file = e; /* Remember where this starts... */
 153         assert(is_octal(e, 76)); /* Entire header is octal digits. */
 154         assertEqualMem(e + 0, "070707", 6); /* Magic */
 155         assertEqualMem(e + 6, "000014", 6); /* dev */
 156         assert(memcmp(e + 12, "000000", 6) != 0); /* ino must be != 0 */
 157         assertEqualMem(e + 18, "100664", 6); /* Mode */
 158         assertEqualMem(e + 24, "000120", 6); /* uid */
 159         assertEqualMem(e + 30, "000132", 6); /* gid */
 160         assertEqualMem(e + 36, "000002", 6); /* nlink */
 161         assertEqualMem(e + 42, "000000", 6); /* rdev */
 162         assertEqualMem(e + 48, "00000000001", 11); /* mtime */
 163         assertEqualMem(e + 59, "000005", 6); /* Name size */
 164         assertEqualMem(e + 65, "00000000012", 11); /* File size */
 165         assertEqualMem(e + 76, "file\0", 5); /* Name contents */
 166         assertEqualMem(e + 81, "1234567890", 10); /* File contents */
 167         e += 91;
 168
 169         /* hardlink to "file" */
 170         assert(is_octal(e, 76)); /* Entire header is octal digits. */
 171         assertEqualMem(e + 0, "070707", 6); /* Magic */
 172         assertEqualMem(e + 6, "000014", 6); /* dev */
 173         assertEqualMem(e + 12, file + 12, 6); /* ino must match above */
 174         assertEqualMem(e + 18, "100664", 6); /* Mode */
 175         assertEqualMem(e + 24, "000120", 6); /* uid */
 176         assertEqualMem(e + 30, "000132", 6); /* gid */
 177         assertEqualMem(e + 36, "000002", 6); /* nlink */
 178         assertEqualMem(e + 42, "000000", 6); /* rdev */
 179         assertEqualMem(e + 48, "00000000001", 11); /* mtime */
 180         assertEqualMem(e + 59, "000011", 6); /* Name size */
 181         assertEqualMem(e + 65, "00000000012", 11); /* File size */
 182         assertEqualMem(e + 76, "linkfile\0", 9); /* Name contents */
 183         assertEqualMem(e + 85, "1234567890", 10); /* File contents */
 184         e += 95;
 185
 186         /* "dir" */
 187         assert(is_octal(e, 76));
 188         assertEqualMem(e + 0, "070707", 6); /* Magic */
 189         assertEqualMem(e + 6, "000000", 6); /* dev */
 190         assertEqualMem(e + 12, "000000", 6); /* ino */
 191         assertEqualMem(e + 18, "040775", 6); /* Mode */
 192         assertEqualMem(e + 24, "000000", 6); /* uid */
 193         assertEqualMem(e + 30, "000000", 6); /* gid */
 194         assertEqualMem(e + 36, "000002", 6); /* Nlink */
 195         assertEqualMem(e + 42, "000000", 6); /* rdev */
 196         assertEqualMem(e + 48, "00000000002", 11); /* mtime */
 197         assertEqualMem(e + 59, "000004", 6); /* Name size */
 198         assertEqualMem(e + 65, "00000000000", 11); /* File size */
 199         assertEqualMem(e + 76, "dir\0", 4); /* name */
 200         e += 80;
 201
 202         /* "symlink" pointing to "file" */
 203         assert(is_octal(e, 76)); /* Entire header is octal digits. */
 204         assertEqualMem(e + 0, "070707", 6); /* Magic */
 205         assertEqualMem(e + 6, "000014", 6); /* dev */
 206         assert(memcmp(e + 12, file + 12, 6) != 0); /* ino must != file ino */
 207         assert(memcmp(e + 12, "000000", 6) != 0); /* ino must != 0 */
 208         assertEqualMem(e + 18, "120664", 6); /* Mode */
 209         assertEqualMem(e + 24, "000130", 6); /* uid */
 210         assertEqualMem(e + 30, "000142", 6); /* gid */
 211         assertEqualMem(e + 36, "000001", 6); /* nlink */
 212         assertEqualMem(e + 42, "000000", 6); /* rdev */
 213         assertEqualMem(e + 48, "00000000003", 11); /* mtime */
 214         assertEqualMem(e + 59, "000010", 6); /* Name size */
 215         assertEqualMem(e + 65, "00000000004", 11); /* File size */
 216         assertEqualMem(e + 76, "symlink\0", 8); /* Name contents */
 217         assertEqualMem(e + 84, "file", 4); /* File contents == link target */
 218         e += 88;
 219
 220         /* TODO: Verify other types of entries. */
 221
 222         /* Last entry is end-of-archive marker. */
 223         assert(is_octal(e, 76));
 224         assertEqualMem(e + 0, "070707", 6); /* Magic */
 225         assertEqualMem(e + 6, "000000", 6); /* dev */
 226         assertEqualMem(e + 12, "000000", 6); /* ino */
 227         assertEqualMem(e + 18, "000000", 6); /* Mode */
 228         assertEqualMem(e + 24, "000000", 6); /* uid */
 229         assertEqualMem(e + 30, "000000", 6); /* gid */
 230         assertEqualMem(e + 36, "000001", 6); /* Nlink */
 231         assertEqualMem(e + 42, "000000", 6); /* rdev */
 232         assertEqualMem(e + 48, "00000000000", 11); /* mtime */
 233         assertEqualMem(e + 59, "000013", 6); /* Name size */
 234         assertEqualMem(e + 65, "00000000000", 11); /* File size */
 235         assertEqualMem(e + 76, "TRAILER!!!\0", 11); /* Name */
 236         e += 87;
 237
 238         assertEqualInt((int)used, e - buff);
 239
 240         free(buff);
 241 }