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