archival/bbunzip.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  *  Modified for busybox by Glenn McGrath <bug1@iinet.net.au>
   4  *  Added support output to stdout by Thomas Lundquist <thomasez@zelow.no>
   5  *
   6  *  Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
   7  */
   8
   9 #include "busybox.h"
  10 #include "unarchive.h"
  11
  12 enum {
  13         OPT_STDOUT = 1,
  14         OPT_FORCE = 2,
  15 /* gunzip only: */
  16         OPT_TEST = 4,
  17         OPT_DECOMPRESS = 8,
  18         OPT_VERBOSE = 0x10,
  19 };
  20
  21 static
  22 int open_to_or_warn(int to_fd, const char *filename, int flags, int mode)
  23 {
  24         int fd = open(filename, flags, mode);
  25         if (fd < 0) {
  26                 bb_perror_msg("%s", filename);
  27                 return 1;
  28         }
  29         if (fd != to_fd) {
  30                 if (dup2(fd, to_fd) < 0)
  31                         bb_perror_msg_and_die("cannot dup");
  32                 close(fd);
  33         }
  34         return 0;
  35 }
  36
  37 static
  38 int unpack(char **argv,
  39         char* (*make_new_name)(char *filename),
  40         USE_DESKTOP(long long) int (*unpacker)(void)
  41 )
  42 {
  43         struct stat stat_buf;
  44         USE_DESKTOP(long long) int status;
  45         char *filename, *new_name;
  46         smallint exitcode = 0;
  47
  48         do {
  49                 /* NB: new_name is *maybe* malloc'ed! */
  50                 new_name = NULL;
  51                 filename = *argv; /* can be NULL - 'streaming' bunzip2 */
  52
  53                 if (filename && LONE_DASH(filename))
  54                         filename = NULL;
  55
  56                 /* Open src */
  57                 if (filename) {
  58                         if (stat(filename, &stat_buf) != 0) {
  59                                 bb_perror_msg("%s", filename);
  60  err:
  61                                 exitcode = 1;
  62                                 goto free_name;
  63                         }
  64                         if (open_to_or_warn(STDIN_FILENO, filename, O_RDONLY, 0))
  65                                 goto err;
  66                 }
  67
  68                 /* Special cases: test, stdout */
  69                 if (option_mask32 & (OPT_STDOUT|OPT_TEST)) {
  70                         if (option_mask32 & OPT_TEST)
  71                                 if (open_to_or_warn(STDOUT_FILENO, bb_dev_null, O_WRONLY, 0))
  72                                         goto err;
  73                         filename = NULL;
  74                 }
  75
  76                 /* Open dst if we are going to unpack to file */
  77                 if (filename) {
  78                         new_name = make_new_name(filename);
  79                         if (!new_name) {
  80                                 bb_error_msg("%s: unknown suffix - ignored", filename);
  81                                 goto err;
  82                         }
  83                         /* O_EXCL: "real" bunzip2 doesn't overwrite files */
  84                         /* GNU gunzip goes not bail out, but goes to next file */
  85                         if (open_to_or_warn(STDOUT_FILENO, new_name, O_WRONLY | O_CREAT | O_EXCL,
  86                                         stat_buf.st_mode))
  87                                 goto err;
  88                 }
  89
  90                 /* Check that the input is sane */
  91                 if (isatty(STDIN_FILENO) && (option_mask32 & OPT_FORCE) == 0) {
  92                         bb_error_msg_and_die("compressed data not read from terminal, "
  93                                         "use -f to force it");
  94                 }
  95
  96                 status = unpacker();
  97                 if (status < 0)
  98                         exitcode = 1;
  99
 100                 if (filename) {
 101                         char *del = new_name;
 102                         if (status >= 0) {
 103                                 /* TODO: restore user/group/times here? */
 104                                 /* Delete _compressed_ file */
 105                                 del = filename;
 106                                 /* restore extension (unless tgz -> tar case) */
 107                                 if (new_name == filename)
 108                                         filename[strlen(filename)] = '.';
 109                         }
 110                         if (unlink(del) < 0)
 111                                 bb_perror_msg_and_die("cannot remove %s", del);
 112
 113 #if 0 /* Currently buggy - wrong name: "a.gz: 261% - replaced with a.gz" */
 114                         /* Extreme bloat for gunzip compat */
 115                         if (ENABLE_DESKTOP && (option_mask32 & OPT_VERBOSE) && status >= 0) {
 116                                 fprintf(stderr, "%s: %u%% - replaced with %s\n",
 117                                         filename, (unsigned)(stat_buf.st_size*100 / (status+1)), new_name);
 118                         }
 119 #endif
 120
 121  free_name:
 122                         if (new_name != filename)
 123                                 free(new_name);
 124                 }
 125         } while (*argv && *++argv);
 126
 127         return exitcode;
 128 }
 129
 130 static
 131 char* make_new_name_generic(char *filename, const char *expected_ext)
 132 {
 133         char *extension = strrchr(filename, '.');
 134         if (!extension || strcmp(extension + 1, expected_ext) != 0) {
 135                 /* Mimic GNU gunzip - "real" bunzip2 tries to */
 136                 /* unpack file anyway, to file.out */
 137                 return NULL;
 138         }
 139         *extension = '\0';
 140         return filename;
 141 }
 142
 143 #if ENABLE_BUNZIP2
 144
 145 static
 146 char* make_new_name_bunzip2(char *filename)
 147 {
 148         return make_new_name_generic(filename, "bz2");
 149 }
 150
 151 static
 152 USE_DESKTOP(long long) int unpack_bunzip2(void)
 153 {
 154         return uncompressStream(STDIN_FILENO, STDOUT_FILENO);
 155 }
 156
 157 int bunzip2_main(int argc, char **argv);
 158 int bunzip2_main(int argc, char **argv)
 159 {
 160         getopt32(argc, argv, "cf");
 161         argv += optind;
 162         if (applet_name[2] == 'c')
 163                 option_mask32 |= OPT_STDOUT;
 164
 165         return unpack(argv, make_new_name_bunzip2, unpack_bunzip2);
 166 }
 167
 168 #endif
 169
 170
 171 /*
 172  * Gzip implementation for busybox
 173  *
 174  * Based on GNU gzip v1.2.4 Copyright (C) 1992-1993 Jean-loup Gailly.
 175  *
 176  * Originally adjusted for busybox by Sven Rudolph <sr1@inf.tu-dresden.de>
 177  * based on gzip sources
 178  *
 179  * Adjusted further by Erik Andersen <andersen@codepoet.org> to support files as
 180  * well as stdin/stdout, and to generally behave itself wrt command line
 181  * handling.
 182  *
 183  * General cleanup to better adhere to the style guide and make use of standard
 184  * busybox functions by Glenn McGrath <bug1@iinet.net.au>
 185  *
 186  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
 187  *
 188  * gzip (GNU zip) -- compress files with zip algorithm and 'compress' interface
 189  * Copyright (C) 1992-1993 Jean-loup Gailly
 190  * The unzip code was written and put in the public domain by Mark Adler.
 191  * Portions of the lzw code are derived from the public domain 'compress'
 192  * written by Spencer Thomas, Joe Orost, James Woods, Jim McKie, Steve Davies,
 193  * Ken Turkowski, Dave Mack and Peter Jannesen.
 194  *
 195  * See the license_msg below and the file COPYING for the software license.
 196  * See the file algorithm.doc for the compression algorithms and file formats.
 197  */
 198
 199 #if ENABLE_GUNZIP
 200
 201 static
 202 char* make_new_name_gunzip(char *filename)
 203 {
 204         char *extension = strrchr(filename, '.');
 205
 206         if (!extension)
 207                 return NULL;
 208
 209         extension++;
 210         if (strcmp(extension, "tgz" + 1) == 0
 211 #ifdef CONFIG_FEATURE_GUNZIP_UNCOMPRESS
 212          || strcmp(extension, "Z") == 0
 213 #endif
 214         ) {
 215                 extension[-1] = '\0';
 216         } else if(strcmp(extension, "tgz") == 0) {
 217                 filename = xstrdup(filename);
 218                 extension = strrchr(filename, '.');
 219                 extension[2] = 'a';
 220                 extension[3] = 'r';
 221         } else {
 222                 return NULL;
 223         }
 224         return filename;
 225 }
 226
 227 static
 228 USE_DESKTOP(long long) int unpack_gunzip(void)
 229 {
 230         USE_DESKTOP(long long) int status = -1;
 231
 232         /* do the decompression, and cleanup */
 233         if (xread_char(STDIN_FILENO) == 0x1f) {
 234                 unsigned char magic2;
 235
 236                 magic2 = xread_char(STDIN_FILENO);
 237                 if (ENABLE_FEATURE_GUNZIP_UNCOMPRESS && magic2 == 0x9d) {
 238                         status = uncompress(STDIN_FILENO, STDOUT_FILENO);
 239                 } else if (magic2 == 0x8b) {
 240                         check_header_gzip_or_die(STDIN_FILENO);
 241                         status = inflate_gunzip(STDIN_FILENO, STDOUT_FILENO);
 242                 } else {
 243                         goto bad_magic;
 244                 }
 245                 if (status < 0) {
 246                         bb_error_msg("error inflating");
 247                 }
 248         } else {
 249  bad_magic:
 250                 bb_error_msg("invalid magic");
 251                 /* status is still == -1 */
 252         }
 253         return status;
 254 }
 255
 256 int gunzip_main(int argc, char **argv);
 257 int gunzip_main(int argc, char **argv)
 258 {
 259         getopt32(argc, argv, "cftdv");
 260         argv += optind;
 261         /* if called as zcat */
 262         if (applet_name[1] == 'c')
 263                 option_mask32 |= OPT_STDOUT;
 264
 265         return unpack(argv, make_new_name_gunzip, unpack_gunzip);
 266 }
 267
 268 #endif
 269
 270
 271 /*
 272  * Small lzma deflate implementation.
 273  * Copyright (C) 2006  Aurelien Jacobs <aurel@gnuage.org>
 274  *
 275  * Based on bunzip.c from busybox
 276  *
 277  * Licensed under GPL v2, see file LICENSE in this tarball for details.
 278  */
 279
 280 #if ENABLE_UNLZMA
 281
 282 static
 283 char* make_new_name_unlzma(char *filename)
 284 {
 285         return make_new_name_generic(filename, "lzma");
 286 }
 287
 288 static
 289 USE_DESKTOP(long long) int unpack_unlzma(void)
 290 {
 291         return unlzma(STDIN_FILENO, STDOUT_FILENO);
 292 }
 293
 294 int unlzma_main(int argc, char **argv);
 295 int unlzma_main(int argc, char **argv)
 296 {
 297         getopt32(argc, argv, "c");
 298         argv += optind;
 299         /* lzmacat? */
 300         if (applet_name[4] == 'c')
 301                 option_mask32 |= OPT_STDOUT;
 302
 303         return unpack(argv, make_new_name_unlzma, unpack_unlzma);
 304 }
 305
 306 #endif
 307
 308
 309 /* vi: set sw=4 ts=4: */
 310 /*
 311  *      Uncompress applet for busybox (c) 2002 Glenn McGrath
 312  *
 313  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
 314  */
 315
 316 #if ENABLE_UNCOMPRESS
 317
 318 static
 319 char* make_new_name_uncompress(char *filename)
 320 {
 321         return make_new_name_generic(filename, "Z");
 322 }
 323
 324 static
 325 USE_DESKTOP(long long) int unpack_uncompress(void)
 326 {
 327         USE_DESKTOP(long long) int status = -1;
 328
 329         if ((xread_char(STDIN_FILENO) != 0x1f) || (xread_char(STDIN_FILENO) != 0x9d)) {
 330                 bb_error_msg("invalid magic");
 331         } else {
 332                 status = uncompress(STDIN_FILENO, STDOUT_FILENO);
 333         }
 334         return status;
 335 }
 336
 337 int uncompress_main(int argc, char **argv);
 338 int uncompress_main(int argc, char **argv)
 339 {
 340         getopt32(argc, argv, "cf");
 341         argv += optind;
 342
 343         return unpack(argv, make_new_name_uncompress, unpack_uncompress);
 344 }
 345
 346 #endif