contrib/libarchive/libarchive/test/test_write_filter_lzma.c

   1 /*-
   2  * Copyright (c) 2007-2009 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  *    in this position and unchanged.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
  16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  18  * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
  19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  25  */
  26
  27 #include "test.h"
  28 __FBSDID("$FreeBSD: head/lib/libarchive/test/test_write_compress_lzma.c 191183 2009-04-17 01:06:31Z kientzle $");
  29
  30 /*
  31  * A basic exercise of lzma reading and writing.
  32  *
  33  */
  34
  35 DEFINE_TEST(test_write_filter_lzma)
  36 {
  37         struct archive_entry *ae;
  38         struct archive* a;
  39         char *buff, *data;
  40         size_t buffsize, datasize;
  41         char path[16];
  42         size_t used1, used2;
  43         int i, r;
  44
  45         buffsize = 2000000;
  46         assert(NULL != (buff = (char *)malloc(buffsize)));
  47         if (buff == NULL)
  48                 return;
  49
  50         datasize = 10000;
  51         assert(NULL != (data = (char *)malloc(datasize)));
  52         if (data == NULL) {
  53                 free(buff);
  54                 return;
  55         }
  56         memset(data, 0, datasize);
  57
  58         /*
  59          * Write a 100 files and read them all back.
  60          */
  61         assert((a = archive_write_new()) != NULL);
  62         assertEqualIntA(a, ARCHIVE_OK, archive_write_set_format_ustar(a));
  63         r = archive_write_add_filter_lzma(a);
  64         if (r == ARCHIVE_FATAL) {
  65                 skipping("lzma writing not supported on this platform");
  66                 assertEqualInt(ARCHIVE_OK, archive_write_free(a));
  67                 free(buff);
  68                 free(data);
  69                 return;
  70         }
  71         assertEqualIntA(a, ARCHIVE_OK,
  72             archive_write_set_bytes_per_block(a, 10));
  73         assertEqualInt(ARCHIVE_FILTER_LZMA, archive_filter_code(a, 0));
  74         assertEqualString("lzma", archive_filter_name(a, 0));
  75         assertEqualIntA(a, ARCHIVE_OK,
  76             archive_write_open_memory(a, buff, buffsize, &used1));
  77         assertEqualInt(ARCHIVE_FILTER_LZMA, archive_filter_code(a, 0));
  78         assertEqualString("lzma", archive_filter_name(a, 0));
  79         assert((ae = archive_entry_new()) != NULL);
  80         archive_entry_set_filetype(ae, AE_IFREG);
  81         archive_entry_set_size(ae, datasize);
  82         for (i = 0; i < 100; i++) {
  83                 sprintf(path, "file%03d", i);
  84                 archive_entry_copy_pathname(ae, path);
  85                 assertEqualIntA(a, ARCHIVE_OK, archive_write_header(a, ae));
  86                 assertA(datasize
  87                     == (size_t)archive_write_data(a, data, datasize));
  88         }
  89         archive_entry_free(ae);
  90         assertEqualIntA(a, ARCHIVE_OK, archive_write_close(a));
  91         assertEqualInt(ARCHIVE_OK, archive_write_free(a));
  92
  93         assert((a = archive_read_new()) != NULL);
  94         assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
  95         r = archive_read_support_filter_lzma(a);
  96         if (r == ARCHIVE_WARN) {
  97                 skipping("Can't verify lzma writing by reading back;"
  98                     " lzma reading not fully supported on this platform");
  99         } else {
 100                 assertEqualIntA(a, ARCHIVE_OK,
 101                     archive_read_support_filter_all(a));
 102                 assertEqualIntA(a, ARCHIVE_OK,
 103                     archive_read_open_memory(a, buff, used1));
 104                 for (i = 0; i < 100; i++) {
 105                         sprintf(path, "file%03d", i);
 106                         if (!assertEqualInt(ARCHIVE_OK,
 107                                 archive_read_next_header(a, &ae)))
 108                                 break;
 109                         assertEqualString(path, archive_entry_pathname(ae));
 110                         assertEqualInt((int)datasize, archive_entry_size(ae));
 111                 }
 112                 assertEqualIntA(a, ARCHIVE_OK, archive_read_close(a));
 113         }
 114         assertEqualInt(ARCHIVE_OK, archive_read_free(a));
 115
 116         /*
 117          * Repeat the cycle again, this time setting some compression
 118          * options.
 119          */
 120         assert((a = archive_write_new()) != NULL);
 121         assertEqualIntA(a, ARCHIVE_OK, archive_write_set_format_ustar(a));
 122         assertEqualIntA(a, ARCHIVE_OK,
 123             archive_write_set_bytes_per_block(a, 10));
 124         assertEqualIntA(a, ARCHIVE_OK, archive_write_add_filter_lzma(a));
 125         assertEqualIntA(a, ARCHIVE_FAILED,
 126             archive_write_set_filter_option(a, NULL, "nonexistent-option", "0"));
 127         assertEqualIntA(a, ARCHIVE_FAILED,
 128             archive_write_set_filter_option(a, NULL, "compression-level", "abc"));
 129         assertEqualIntA(a, ARCHIVE_FAILED,
 130             archive_write_set_filter_option(a, NULL, "compression-level", "99"));
 131         assertEqualIntA(a, ARCHIVE_OK,
 132             archive_write_set_filter_option(a, NULL, "compression-level", "9"));
 133         assertEqualIntA(a, ARCHIVE_OK, archive_write_open_memory(a, buff, buffsize, &used2));
 134         for (i = 0; i < 100; i++) {
 135                 sprintf(path, "file%03d", i);
 136                 assert((ae = archive_entry_new()) != NULL);
 137                 archive_entry_copy_pathname(ae, path);
 138                 archive_entry_set_size(ae, datasize);
 139                 archive_entry_set_filetype(ae, AE_IFREG);
 140                 assertEqualIntA(a, ARCHIVE_OK, archive_write_header(a, ae));
 141                 assertA(datasize == (size_t)archive_write_data(a, data, datasize));
 142                 archive_entry_free(ae);
 143         }
 144         assertEqualIntA(a, ARCHIVE_OK, archive_write_close(a));
 145         assertEqualInt(ARCHIVE_OK, archive_write_free(a));
 146
 147
 148         assert((a = archive_read_new()) != NULL);
 149         assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
 150         r = archive_read_support_filter_lzma(a);
 151         if (r == ARCHIVE_WARN) {
 152                 skipping("lzma reading not fully supported on this platform");
 153         } else {
 154                 assertEqualIntA(a, ARCHIVE_OK,
 155                     archive_read_support_filter_all(a));
 156                 assertEqualIntA(a, ARCHIVE_OK,
 157                     archive_read_open_memory(a, buff, used2));
 158                 for (i = 0; i < 100; i++) {
 159                         sprintf(path, "file%03d", i);
 160                         failure("Trying to read %s", path);
 161                         if (!assertEqualIntA(a, ARCHIVE_OK,
 162                                 archive_read_next_header(a, &ae)))
 163                                 break;
 164                         assertEqualString(path, archive_entry_pathname(ae));
 165                         assertEqualInt((int)datasize, archive_entry_size(ae));
 166                 }
 167                 assertEqualIntA(a, ARCHIVE_OK, archive_read_close(a));
 168         }
 169         assertEqualInt(ARCHIVE_OK, archive_read_free(a));
 170
 171         /*
 172          * Repeat again, with much lower compression.
 173          */
 174         assert((a = archive_write_new()) != NULL);
 175         assertEqualIntA(a, ARCHIVE_OK, archive_write_set_format_ustar(a));
 176         assertEqualIntA(a, ARCHIVE_OK,
 177             archive_write_set_bytes_per_block(a, 10));
 178         assertEqualIntA(a, ARCHIVE_OK, archive_write_add_filter_lzma(a));
 179         assertEqualIntA(a, ARCHIVE_OK,
 180             archive_write_set_filter_option(a, NULL, "compression-level", "0"));
 181         assertEqualIntA(a, ARCHIVE_OK, archive_write_open_memory(a, buff, buffsize, &used2));
 182         for (i = 0; i < 100; i++) {
 183                 sprintf(path, "file%03d", i);
 184                 assert((ae = archive_entry_new()) != NULL);
 185                 archive_entry_copy_pathname(ae, path);
 186                 archive_entry_set_size(ae, datasize);
 187                 archive_entry_set_filetype(ae, AE_IFREG);
 188                 assertEqualIntA(a, ARCHIVE_OK, archive_write_header(a, ae));
 189                 failure("Writing file %s", path);
 190                 assertEqualIntA(a, datasize,
 191                     (size_t)archive_write_data(a, data, datasize));
 192                 archive_entry_free(ae);
 193         }
 194         assertEqualIntA(a, ARCHIVE_OK, archive_write_close(a));
 195         assertEqualInt(ARCHIVE_OK, archive_write_free(a));
 196
 197         /* It would be nice to assert that compression-level=0 produced
 198          * consistently larger/smaller results than the default compression,
 199          * but the results here vary a lot depending on the version of liblzma
 200          * being used. */
 201         /*
 202         failure("Compression-level=0 wrote %d bytes; default wrote %d bytes",
 203             (int)used2, (int)used1);
 204         assert(used2 > used1);
 205         */
 206
 207         assert((a = archive_read_new()) != NULL);
 208         assertEqualIntA(a, ARCHIVE_OK, archive_read_support_format_all(a));
 209         assertEqualIntA(a, ARCHIVE_OK, archive_read_support_filter_all(a));
 210         r = archive_read_support_filter_lzma(a);
 211         if (r == ARCHIVE_WARN) {
 212                 skipping("lzma reading not fully supported on this platform");
 213         } else {
 214                 assertEqualIntA(a, ARCHIVE_OK,
 215                     archive_read_open_memory(a, buff, used2));
 216                 for (i = 0; i < 100; i++) {
 217                         sprintf(path, "file%03d", i);
 218                         if (!assertEqualInt(ARCHIVE_OK,
 219                                 archive_read_next_header(a, &ae)))
 220                                 break;
 221                         assertEqualString(path, archive_entry_pathname(ae));
 222                         assertEqualInt((int)datasize, archive_entry_size(ae));
 223                 }
 224                 assertEqualIntA(a, ARCHIVE_OK, archive_read_close(a));
 225         }
 226         assertEqualInt(ARCHIVE_OK, archive_read_free(a));
 227
 228         /*
 229          * Test various premature shutdown scenarios to make sure we
 230          * don't crash or leak memory.
 231          */
 232         assert((a = archive_write_new()) != NULL);
 233         assertEqualIntA(a, ARCHIVE_OK, archive_write_add_filter_lzma(a));
 234         assertEqualInt(ARCHIVE_OK, archive_write_free(a));
 235
 236         assert((a = archive_write_new()) != NULL);
 237         assertEqualIntA(a, ARCHIVE_OK, archive_write_add_filter_lzma(a));
 238         assertEqualInt(ARCHIVE_OK, archive_write_close(a));
 239         assertEqualInt(ARCHIVE_OK, archive_write_free(a));
 240
 241         assert((a = archive_write_new()) != NULL);
 242         assertEqualIntA(a, ARCHIVE_OK, archive_write_set_format_ustar(a));
 243         assertEqualIntA(a, ARCHIVE_OK, archive_write_add_filter_lzma(a));
 244         assertEqualInt(ARCHIVE_OK, archive_write_close(a));
 245         assertEqualInt(ARCHIVE_OK, archive_write_free(a));
 246
 247         assert((a = archive_write_new()) != NULL);
 248         assertEqualIntA(a, ARCHIVE_OK, archive_write_set_format_ustar(a));
 249         assertEqualIntA(a, ARCHIVE_OK, archive_write_add_filter_lzma(a));
 250         assertEqualIntA(a, ARCHIVE_OK, archive_write_open_memory(a, buff, buffsize, &used2));
 251         assertEqualInt(ARCHIVE_OK, archive_write_close(a));
 252         assertEqualInt(ARCHIVE_OK, archive_write_free(a));
 253
 254         /*
 255          * Clean up.
 256          */
 257         free(data);
 258         free(buff);
 259 }