blob: 986b7b191b06491a29b97c6d1b1be3c7e65f3bd0
1 | /* |
2 | * This file uses XZ Embedded library code which is written |
3 | * by Lasse Collin <lasse.collin@tukaani.org> |
4 | * and Igor Pavlov <http://7-zip.org/> |
5 | * |
6 | * See README file in unxz/ directory for more information. |
7 | * |
8 | * This file is: |
9 | * Copyright (C) 2010 Denys Vlasenko <vda.linux@googlemail.com> |
10 | * Licensed under GPLv2, see file LICENSE in this source tree. |
11 | */ |
12 | #include "libbb.h" |
13 | #include "bb_archive.h" |
14 | |
15 | #define XZ_FUNC FAST_FUNC |
16 | #define XZ_EXTERN static |
17 | |
18 | #define XZ_DEC_DYNALLOC |
19 | |
20 | /* Skip check (rather than fail) of unsupported hash functions */ |
21 | #define XZ_DEC_ANY_CHECK 1 |
22 | |
23 | /* We use our own crc32 function */ |
24 | #define XZ_INTERNAL_CRC32 0 |
25 | static uint32_t xz_crc32(const uint8_t *buf, size_t size, uint32_t crc) |
26 | { |
27 | return ~crc32_block_endian0(~crc, buf, size, global_crc32_table); |
28 | } |
29 | |
30 | /* We use arch-optimized unaligned accessors */ |
31 | #define get_unaligned_le32(buf) ({ uint32_t v; move_from_unaligned32(v, buf); SWAP_LE32(v); }) |
32 | #define get_unaligned_be32(buf) ({ uint32_t v; move_from_unaligned32(v, buf); SWAP_BE32(v); }) |
33 | #define put_unaligned_le32(val, buf) move_to_unaligned32(buf, SWAP_LE32(val)) |
34 | #define put_unaligned_be32(val, buf) move_to_unaligned32(buf, SWAP_BE32(val)) |
35 | |
36 | #include "unxz/xz_dec_bcj.c" |
37 | #include "unxz/xz_dec_lzma2.c" |
38 | #include "unxz/xz_dec_stream.c" |
39 | |
40 | IF_DESKTOP(long long) int FAST_FUNC |
41 | unpack_xz_stream(transformer_aux_data_t *aux, int src_fd, int dst_fd) |
42 | { |
43 | enum xz_ret xz_result; |
44 | struct xz_buf iobuf; |
45 | struct xz_dec *state; |
46 | unsigned char *membuf; |
47 | IF_DESKTOP(long long) int total = 0; |
48 | |
49 | if (!global_crc32_table) |
50 | global_crc32_table = crc32_filltable(NULL, /*endian:*/ 0); |
51 | |
52 | memset(&iobuf, 0, sizeof(iobuf)); |
53 | membuf = xmalloc(2 * BUFSIZ); |
54 | iobuf.in = membuf; |
55 | iobuf.out = membuf + BUFSIZ; |
56 | iobuf.out_size = BUFSIZ; |
57 | |
58 | if (!aux || aux->check_signature == 0) { |
59 | /* Preload XZ file signature */ |
60 | strcpy((char*)membuf, HEADER_MAGIC); |
61 | iobuf.in_size = HEADER_MAGIC_SIZE; |
62 | } /* else: let xz code read & check it */ |
63 | |
64 | /* Limit memory usage to about 64 MiB. */ |
65 | state = xz_dec_init(XZ_DYNALLOC, 64*1024*1024); |
66 | |
67 | xz_result = X_OK; |
68 | while (1) { |
69 | if (iobuf.in_pos == iobuf.in_size) { |
70 | int rd = safe_read(src_fd, membuf, BUFSIZ); |
71 | if (rd < 0) { |
72 | bb_error_msg(bb_msg_read_error); |
73 | total = -1; |
74 | break; |
75 | } |
76 | if (rd == 0 && xz_result == XZ_STREAM_END) |
77 | break; |
78 | iobuf.in_size = rd; |
79 | iobuf.in_pos = 0; |
80 | } |
81 | if (xz_result == XZ_STREAM_END) { |
82 | /* |
83 | * Try to start decoding next concatenated stream. |
84 | * Stream padding must always be a multiple of four |
85 | * bytes to preserve four-byte alignment. To keep the |
86 | * code slightly smaller, we aren't as strict here as |
87 | * the .xz spec requires. We just skip all zero-bytes |
88 | * without checking the alignment and thus can accept |
89 | * files that aren't valid, e.g. the XZ utils test |
90 | * files bad-0pad-empty.xz and bad-0catpad-empty.xz. |
91 | */ |
92 | do { |
93 | if (membuf[iobuf.in_pos] != 0) { |
94 | xz_dec_reset(state); |
95 | goto do_run; |
96 | } |
97 | iobuf.in_pos++; |
98 | } while (iobuf.in_pos < iobuf.in_size); |
99 | } |
100 | do_run: |
101 | // bb_error_msg(">in pos:%d size:%d out pos:%d size:%d", |
102 | // iobuf.in_pos, iobuf.in_size, iobuf.out_pos, iobuf.out_size); |
103 | xz_result = xz_dec_run(state, &iobuf); |
104 | // bb_error_msg("<in pos:%d size:%d out pos:%d size:%d r:%d", |
105 | // iobuf.in_pos, iobuf.in_size, iobuf.out_pos, iobuf.out_size, xz_result); |
106 | if (iobuf.out_pos) { |
107 | xwrite(dst_fd, iobuf.out, iobuf.out_pos); |
108 | IF_DESKTOP(total += iobuf.out_pos;) |
109 | iobuf.out_pos = 0; |
110 | } |
111 | if (xz_result == XZ_STREAM_END) { |
112 | /* |
113 | * Can just "break;" here, if not for concatenated |
114 | * .xz streams. |
115 | * Checking for padding may require buffer |
116 | * replenishment. Can't do it here. |
117 | */ |
118 | continue; |
119 | } |
120 | if (xz_result != XZ_OK && xz_result != XZ_UNSUPPORTED_CHECK) { |
121 | bb_error_msg("corrupted data"); |
122 | total = -1; |
123 | break; |
124 | } |
125 | } |
126 | |
127 | xz_dec_end(state); |
128 | free(membuf); |
129 | |
130 | return total; |
131 | } |
132 |