1 ///////////////////////////////////////////////////////////////////////////////
4 /// \brief Simple single-threaded tool to uncompress .xz or .lzma files
6 // Author: Lasse Collin
8 // This file has been put into the public domain.
9 // You can do whatever you want with this file.
11 ///////////////////////////////////////////////////////////////////////////////
22 #include "tuklib_progname.h"
23 #include "tuklib_exit.h"
32 # define TOOL_FORMAT "lzma"
34 # define TOOL_FORMAT "xz"
38 /// Number of bytes to use memory at maximum
39 static uint64_t memlimit;
41 /// Total amount of physical RAM
42 static uint64_t total_ram;
44 /// Error messages are suppressed if this is zero, which is the case when
45 /// --quiet has been given at least twice.
46 static unsigned int display_errors = 2;
49 static void lzma_attribute((format(printf, 1, 2)))
50 my_errorf(const char *fmt, ...)
56 fprintf(stderr, "%s: ", progname);
57 vfprintf(stderr, fmt, ap);
58 fprintf(stderr, "\n");
66 static void lzma_attribute((noreturn))
69 // Round up to the next MiB and do it correctly also with UINT64_MAX.
70 const uint64_t mem_mib = (memlimit >> 20)
71 + ((memlimit & ((UINT32_C(1) << 20) - 1)) != 0);
74 "Usage: %s [OPTION]... [FILE]...\n"
75 "Uncompress files in the ." TOOL_FORMAT " format to the standard output.\n"
77 " -c, --stdout (ignored)\n"
78 " -d, --decompress (ignored)\n"
79 " -k, --keep (ignored)\n"
80 " -M, --memory=NUM use NUM bytes of memory at maximum (0 means default)\n"
81 " -q, --quiet specify *twice* to suppress errors\n"
82 " -Q, --no-warn (ignored)\n"
83 " -h, --help display this help and exit\n"
84 " -V, --version display the version number and exit\n"
86 "With no FILE, or when FILE is -, read standard input.\n"
88 "On this system and configuration, this program will use a maximum of roughly\n"
89 "%" PRIu64 " MiB RAM.\n"
91 "Report bugs to <" PACKAGE_BUGREPORT "> (in English or Finnish).\n"
92 PACKAGE_NAME " home page: <" PACKAGE_URL ">\n", progname, mem_mib);
93 tuklib_exit(EXIT_SUCCESS, EXIT_FAILURE, display_errors);
97 static void lzma_attribute((noreturn))
100 printf(TOOL_FORMAT "dec (" PACKAGE_NAME ") " LZMA_VERSION_STRING "\n"
101 "liblzma %s\n", lzma_version_string());
103 tuklib_exit(EXIT_SUCCESS, EXIT_FAILURE, display_errors);
107 /// Find out the amount of physical memory (RAM) in the system, and set
108 /// the memory usage limit to the given percentage of RAM.
110 memlimit_set_percentage(uint32_t percentage)
112 memlimit = percentage * total_ram / 100;
117 /// Set the memory usage limit to give number of bytes. Zero is a special
118 /// value to indicate the default limit.
120 memlimit_set(uint64_t new_memlimit)
122 if (new_memlimit != 0) {
123 memlimit = new_memlimit;
125 memlimit = 40 * total_ram / 100;
126 if (memlimit < UINT64_C(80) * 1024 * 1024) {
127 memlimit = 80 * total_ram / 100;
128 if (memlimit > UINT64_C(80) * 1024 * 1024)
129 memlimit = UINT64_C(80) * 1024 * 1024;
137 /// Get the total amount of physical RAM and set the memory usage limit
138 /// to the default value.
142 // If we cannot determine the amount of RAM, use the assumption
143 // defined by the configure script.
144 total_ram = lzma_physmem();
146 total_ram = (uint64_t)(ASSUME_RAM) * 1024 * 1024;
153 /// \brief Convert a string to uint64_t
155 /// This is rudely copied from src/xz/util.c and modified a little. :-(
157 /// \param max Return value when the string "max" was specified.
160 str_to_uint64(const char *value, uint64_t max)
164 // Accept special value "max".
165 if (strcmp(value, "max") == 0)
168 if (*value < '0' || *value > '9') {
169 my_errorf("%s: Value is not a non-negative decimal integer",
176 if (result > (UINT64_MAX - 9) / 10)
180 result += *value - '0';
182 } while (*value >= '0' && *value <= '9');
184 if (*value != '\0') {
186 static const struct {
195 { "GB", 1000000000 },
200 { "Gi", 1073741824 },
201 { "GiB", 1073741824 }
204 uint32_t multiplier = 0;
205 for (size_t i = 0; i < ARRAY_SIZE(suffixes); ++i) {
206 if (strcmp(value, suffixes[i].name) == 0) {
207 multiplier = suffixes[i].multiplier;
212 if (multiplier == 0) {
213 my_errorf("%s: Invalid suffix", value);
217 // Don't overflow here either.
218 if (result > UINT64_MAX / multiplier)
221 result *= multiplier;
228 /// Parses command line options.
230 parse_options(int argc, char **argv)
232 static const char short_opts[] = "cdkM:hqQV";
233 static const struct option long_opts[] = {
234 { "stdout", no_argument, NULL, 'c' },
235 { "to-stdout", no_argument, NULL, 'c' },
236 { "decompress", no_argument, NULL, 'd' },
237 { "uncompress", no_argument, NULL, 'd' },
238 { "keep", no_argument, NULL, 'k' },
239 { "memory", required_argument, NULL, 'M' },
240 { "quiet", no_argument, NULL, 'q' },
241 { "no-warn", no_argument, NULL, 'Q' },
242 { "help", no_argument, NULL, 'h' },
243 { "version", no_argument, NULL, 'V' },
249 while ((c = getopt_long(argc, argv, short_opts, long_opts, NULL))
259 // Support specifying the limit as a percentage of
260 // installed physical RAM.
261 const size_t len = strlen(optarg);
262 if (len > 0 && optarg[len - 1] == '%') {
263 // Memory limit is a percentage of total
265 optarg[len - 1] = '\0';
266 const uint64_t percentage
267 = str_to_uint64(optarg, 100);
268 if (percentage < 1 || percentage > 100) {
269 my_errorf("Percentage must be in "
270 "the range [1, 100]");
274 memlimit_set_percentage(percentage);
276 memlimit_set(str_to_uint64(
277 optarg, UINT64_MAX));
284 if (display_errors > 0)
305 uncompress(lzma_stream *strm, FILE *file, const char *filename)
309 // Initialize the decoder
311 ret = lzma_alone_decoder(strm, memlimit);
313 ret = lzma_stream_decoder(strm, memlimit, LZMA_CONCATENATED);
316 // The only reasonable error here is LZMA_MEM_ERROR.
317 // FIXME: Maybe also LZMA_MEMLIMIT_ERROR in future?
318 if (ret != LZMA_OK) {
319 my_errorf("%s", ret == LZMA_MEM_ERROR ? strerror(ENOMEM)
320 : "Internal error (bug)");
324 // Input and output buffers
325 uint8_t in_buf[BUFSIZ];
326 uint8_t out_buf[BUFSIZ];
329 strm->next_out = out_buf;
330 strm->avail_out = BUFSIZ;
332 lzma_action action = LZMA_RUN;
335 if (strm->avail_in == 0) {
336 strm->next_in = in_buf;
337 strm->avail_in = fread(in_buf, 1, BUFSIZ, file);
340 // POSIX says that fread() sets errno if
341 // an error occurred. ferror() doesn't
343 my_errorf("%s: Error reading input file: %s",
344 filename, strerror(errno));
349 // When using LZMA_CONCATENATED, we need to tell
350 // liblzma when it has got all the input.
352 action = LZMA_FINISH;
356 ret = lzma_code(strm, action);
358 // Write and check write error before checking decoder error.
359 // This way as much data as possible gets written to output
360 // even if decoder detected an error.
361 if (strm->avail_out == 0 || ret != LZMA_OK) {
362 const size_t write_size = BUFSIZ - strm->avail_out;
364 if (fwrite(out_buf, 1, write_size, stdout)
366 // Wouldn't be a surprise if writing to stderr
367 // would fail too but at least try to show an
369 my_errorf("Cannot write to standard output: "
370 "%s", strerror(errno));
374 strm->next_out = out_buf;
375 strm->avail_out = BUFSIZ;
378 if (ret != LZMA_OK) {
379 if (ret == LZMA_STREAM_END) {
381 // Check that there's no trailing garbage.
382 if (strm->avail_in != 0
383 || fread(in_buf, 1, 1, file)
386 ret = LZMA_DATA_ERROR;
390 // lzma_stream_decoder() already guarantees
391 // that there's no trailing garbage.
392 assert(strm->avail_in == 0);
393 assert(action == LZMA_FINISH);
402 msg = strerror(ENOMEM);
405 case LZMA_MEMLIMIT_ERROR:
406 msg = "Memory usage limit reached";
409 case LZMA_FORMAT_ERROR:
410 msg = "File format not recognized";
413 case LZMA_OPTIONS_ERROR:
414 // FIXME: Better message?
415 msg = "Unsupported compression options";
418 case LZMA_DATA_ERROR:
419 msg = "File is corrupt";
423 msg = "Unexpected end of input";
427 msg = "Internal error (bug)";
431 my_errorf("%s: %s", filename, msg);
439 main(int argc, char **argv)
441 // Initialize progname which we will be used in error messages.
442 tuklib_progname_init(argv);
444 // Set the default memory usage limit. This is needed before parsing
445 // the command line arguments.
448 // Parse the command line options.
449 parse_options(argc, argv);
451 // The same lzma_stream is used for all files that we decode. This way
452 // we don't need to reallocate memory for every file if they use same
453 // compression settings.
454 lzma_stream strm = LZMA_STREAM_INIT;
456 // Some systems require setting stdin and stdout to binary mode.
457 #ifdef TUKLIB_DOSLIKE
458 setmode(fileno(stdin), O_BINARY);
459 setmode(fileno(stdout), O_BINARY);
462 if (optind == argc) {
463 // No filenames given, decode from stdin.
464 uncompress(&strm, stdin, "(stdin)");
466 // Loop through the filenames given on the command line.
468 // "-" indicates stdin.
469 if (strcmp(argv[optind], "-") == 0) {
470 uncompress(&strm, stdin, "(stdin)");
472 FILE *file = fopen(argv[optind], "rb");
474 my_errorf("%s: %s", argv[optind],
479 uncompress(&strm, file, argv[optind]);
482 } while (++optind < argc);
486 // Free the memory only when debugging. Freeing wastes some time,
487 // but allows detecting possible memory leaks with Valgrind.
491 tuklib_exit(EXIT_SUCCESS, EXIT_FAILURE, display_errors);