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         lzma_init_encoder();
  72
  73         file_in = argc > 1 ? fopen(argv[1], "rb") : stdin;
  74
  75
  76         // Config
  77         lzma_options_lzma opt_lzma;
  78         if (lzma_lzma_preset(&opt_lzma, 1)) {
  79                 fprintf(stderr, "preset failed\n");
  80                 exit(1);
  81         }
  82         lzma_filter filters[LZMA_FILTERS_MAX + 1];
  83         filters[0].id = LZMA_FILTER_LZMA2;
  84         filters[0].options = &opt_lzma;
  85         filters[1].id = LZMA_VLI_UNKNOWN;
  86
  87         // Init
  88         if (lzma_stream_encoder(&strm, filters, LZMA_CHECK_CRC32) != LZMA_OK) {
  89                 fprintf(stderr, "init failed\n");
  90                 exit(1);
  91         }
  92
  93 //      if (lzma_easy_encoder(&strm, 1)) {
  94 //              fprintf(stderr, "init failed\n");
  95 //              exit(1);
  96 //      }
  97
  98         // Encoding
  99         encode(0, LZMA_FULL_FLUSH);
 100         encode(6, LZMA_FULL_FLUSH);
 101         encode(0, LZMA_FULL_FLUSH);
 102         encode(7, LZMA_FULL_FLUSH);
 103         encode(0, LZMA_FULL_FLUSH);
 104         encode(0, LZMA_FINISH);
 105
 106         // Clean up
 107         lzma_end(&strm);
 108
 109         return 0;
 110 }