debug/full_flush.c

   1 ///////////////////////////////////////////////////////////////////////////////
   2 //
   3 /// \file       full_flush.c
   4 /// \brief      Encode files using LZMA_FULL_FLUSH
   5 //
   6 //  Copyright (C) 2008 Lasse Collin
   7 //
   8 //  This library is free software; you can redistribute it and/or
   9 //  modify it under the terms of the GNU Lesser General Public
  10 //  License as published by the Free Software Foundation; either
  11 //  version 2.1 of the License, or (at your option) any later version.
  12 //
  13 //  This library is distributed in the hope that it will be useful,
  14 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16 //  Lesser General Public License for more details.
  17 //
  18 ///////////////////////////////////////////////////////////////////////////////
  19
  20 #include "sysdefs.h"
  21 #include <stdio.h>
  22
  23
  24 static lzma_stream strm = LZMA_STREAM_INIT;
  25 static FILE *file_in;
  26
  27
  28 static void
  29 encode(size_t size, lzma_action action)
  30 {
  31         static const size_t CHUNK = 64;
  32         uint8_t in[CHUNK];
  33         uint8_t out[CHUNK];
  34         lzma_ret ret;
  35
  36         do {
  37                 if (strm.avail_in == 0 && size > 0) {
  38                         const size_t amount = MIN(size, CHUNK);
  39                         strm.avail_in = fread(in, 1, amount, file_in);
  40                         strm.next_in = in;
  41                         size -= amount; // Intentionally not using avail_in.
  42                 }
  43
  44                 strm.next_out = out;
  45                 strm.avail_out = CHUNK;
  46
  47                 ret = lzma_code(&strm, size == 0 ? action : LZMA_RUN);
  48
  49                 if (ret != LZMA_OK && ret != LZMA_STREAM_END) {
  50                         fprintf(stderr, "%s:%u: %s: ret == %d\n",
  51                                         __FILE__, __LINE__, __func__, ret);
  52                         exit(1);
  53                 }
  54
  55                 fwrite(out, 1, CHUNK - strm.avail_out, stdout);
  56
  57         } while (size > 0 || strm.avail_out == 0);
  58
  59         if ((action == LZMA_RUN && ret != LZMA_OK)
  60                         || (action != LZMA_RUN && ret != LZMA_STREAM_END)) {
  61                 fprintf(stderr, "%s:%u: %s: ret == %d\n",
  62                                 __FILE__, __LINE__, __func__, ret);
  63                 exit(1);
  64         }
  65 }
  66
  67
  68 int
  69 main(int argc, char **argv)
  70 {
  71         file_in = argc > 1 ? fopen(argv[1], "rb") : stdin;
  72
  73
  74         // Config
  75         lzma_options_lzma opt_lzma;
  76         if (lzma_lzma_preset(&opt_lzma, 1)) {
  77                 fprintf(stderr, "preset failed\n");
  78                 exit(1);
  79         }
  80         lzma_filter filters[LZMA_FILTERS_MAX + 1];
  81         filters[0].id = LZMA_FILTER_LZMA2;
  82         filters[0].options = &opt_lzma;
  83         filters[1].id = LZMA_VLI_UNKNOWN;
  84
  85         // Init
  86         if (lzma_stream_encoder(&strm, filters, LZMA_CHECK_CRC32) != LZMA_OK) {
  87                 fprintf(stderr, "init failed\n");
  88                 exit(1);
  89         }
  90
  91 //      if (lzma_easy_encoder(&strm, 1)) {
  92 //              fprintf(stderr, "init failed\n");
  93 //              exit(1);
  94 //      }
  95
  96         // Encoding
  97         encode(0, LZMA_FULL_FLUSH);
  98         encode(6, LZMA_FULL_FLUSH);
  99         encode(0, LZMA_FULL_FLUSH);
 100         encode(7, LZMA_FULL_FLUSH);
 101         encode(0, LZMA_FULL_FLUSH);
 102         encode(0, LZMA_FINISH);
 103
 104         // Clean up
 105         lzma_end(&strm);
 106
 107         return 0;
 108 }