1 ///////////////////////////////////////////////////////////////////////////////
4 /// \brief lzmainfo tool for compatibility with LZMA Utils
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 ///////////////////////////////////////////////////////////////////////////////
19 #include "tuklib_gettext.h"
20 #include "tuklib_progname.h"
21 #include "tuklib_exit.h"
29 static void lzma_attribute((noreturn))
33 _("Usage: %s [--help] [--version] [FILE]...\n"
34 "Show information stored in the .lzma file header"), progname);
37 "\nWith no FILE, or when FILE is -, read standard input.\n"));
40 printf(_("Report bugs to <%s> (in English or Finnish).\n"),
42 printf(_("%s home page: <%s>\n"), PACKAGE_NAME, PACKAGE_URL);
44 tuklib_exit(EXIT_SUCCESS, EXIT_FAILURE, true);
48 static void lzma_attribute((noreturn))
51 puts("lzmainfo (" PACKAGE_NAME ") " LZMA_VERSION_STRING);
52 tuklib_exit(EXIT_SUCCESS, EXIT_FAILURE, true);
56 /// Parse command line options.
58 parse_args(int argc, char **argv)
65 static const struct option long_opts[] = {
66 { "help", no_argument, NULL, OPT_HELP },
67 { "version", no_argument, NULL, OPT_VERSION },
72 while ((c = getopt_long(argc, argv, "", long_opts, NULL)) != -1) {
89 /// Primitive base-2 logarithm for integers
94 for (e = 0; n > 1; ++e, n /= 2) ;
99 /// Parse the .lzma header and display information about it.
101 lzmainfo(const char *name, FILE *f)
104 const size_t size = fread(buf, 1, sizeof(buf), f);
106 fprintf(stderr, "%s: %s: %s\n", progname, name,
107 ferror(f) ? strerror(errno)
108 : _("File is too small to be a .lzma file"));
112 lzma_filter filter = { .id = LZMA_FILTER_LZMA1 };
114 // Parse the first five bytes.
115 switch (lzma_properties_decode(&filter, NULL, buf, 5)) {
119 case LZMA_OPTIONS_ERROR:
120 fprintf(stderr, "%s: %s: %s\n", progname, name,
121 _("Not a .lzma file"));
125 fprintf(stderr, "%s: %s\n", progname, strerror(ENOMEM));
129 fprintf(stderr, "%s: %s\n", progname,
130 _("Internal error (bug)"));
135 uint64_t uncompressed_size = 0;
136 for (size_t i = 0; i < 8; ++i)
137 uncompressed_size |= (uint64_t)(buf[5 + i]) << (i * 8);
139 // Display the results. We don't want to translate these and also
140 // will use MB instead of MiB, because someone could be parsing
141 // this output and we don't want to break that when people move
142 // from LZMA Utils to XZ Utils.
144 printf("%s\n", name);
146 printf("Uncompressed size: ");
147 if (uncompressed_size == UINT64_MAX)
150 printf("%" PRIu64 " MB (%" PRIu64 " bytes)",
151 (uncompressed_size + 512 * 1024)
155 lzma_options_lzma *opt = filter.options;
157 printf("\nDictionary size: "
158 "%" PRIu32 " MB (2^%" PRIu32 " bytes)\n"
159 "Literal context bits (lc): %" PRIu32 "\n"
160 "Literal pos bits (lp): %" PRIu32 "\n"
161 "Number of pos bits (pb): %" PRIu32 "\n",
162 (opt->dict_size + 512 * 1024) / (1024 * 1024),
163 my_log2(opt->dict_size), opt->lc, opt->lp, opt->pb);
172 main(int argc, char **argv)
174 tuklib_progname_init(argv);
175 tuklib_gettext_init(PACKAGE, LOCALEDIR);
177 parse_args(argc, argv);
179 #ifdef TUKLIB_DOSLIKE
180 setmode(fileno(stdin), O_BINARY);
183 int ret = EXIT_SUCCESS;
185 // We print empty lines around the output only when reading from
186 // files specified on the command line. This is due to how
187 // LZMA Utils did it.
188 if (optind == argc) {
189 if (lzmainfo("(stdin)", stdin))
195 if (strcmp(argv[optind], "-") == 0) {
196 if (lzmainfo("(stdin)", stdin))
199 FILE *f = fopen(argv[optind], "r");
202 fprintf(stderr, "%s: %s: %s\n",
209 if (lzmainfo(argv[optind], f))
215 } while (++optind < argc);
218 tuklib_exit(ret, EXIT_FAILURE, true);