1 // SPDX-License-Identifier: 0BSD
2 
3 ///////////////////////////////////////////////////////////////////////////////
4 //
5 /// \file       filter_decoder.c
6 /// \brief      Filter ID mapping to filter-specific functions
7 //
8 //  Author:     Lasse Collin
9 //
10 ///////////////////////////////////////////////////////////////////////////////
11 
12 #include "filter_encoder.h"
13 #include "filter_common.h"
14 #include "lzma_encoder.h"
15 #include "lzma2_encoder.h"
16 #include "simple_encoder.h"
17 #include "delta_encoder.h"
18 
19 
20 typedef struct {
21 	/// Filter ID
22 	lzma_vli id;
23 
24 	/// Initializes the filter encoder and calls lzma_next_filter_init()
25 	/// for filters + 1.
26 	lzma_init_function init;
27 
28 	/// Calculates memory usage of the encoder. If the options are
29 	/// invalid, UINT64_MAX is returned.
30 	uint64_t (*memusage)(const void *options);
31 
32 	/// Calculates the recommended Uncompressed Size for .xz Blocks to
33 	/// which the input data can be split to make multithreaded
34 	/// encoding possible. If this is NULL, it is assumed that
35 	/// the encoder is fast enough with single thread. If the options
36 	/// are invalid, UINT64_MAX is returned.
37 	uint64_t (*block_size)(const void *options);
38 
39 	/// Tells the size of the Filter Properties field. If options are
40 	/// invalid, LZMA_OPTIONS_ERROR is returned and size is set to
41 	/// UINT32_MAX.
42 	lzma_ret (*props_size_get)(uint32_t *size, const void *options);
43 
44 	/// Some filters will always have the same size Filter Properties
45 	/// field. If props_size_get is NULL, this value is used.
46 	uint32_t props_size_fixed;
47 
48 	/// Encodes Filter Properties.
49 	///
50 	/// \return     - LZMA_OK: Properties encoded successfully.
51 	///             - LZMA_OPTIONS_ERROR: Unsupported options
52 	///             - LZMA_PROG_ERROR: Invalid options or not enough
53 	///               output space
54 	lzma_ret (*props_encode)(const void *options, uint8_t *out);
55 
56 } lzma_filter_encoder;
57 
58 
59 static const lzma_filter_encoder encoders[] = {
60 #ifdef HAVE_ENCODER_LZMA1
61 	{
62 		.id = LZMA_FILTER_LZMA1,
63 		.init = &lzma_lzma_encoder_init,
64 		.memusage = &lzma_lzma_encoder_memusage,
65 		.block_size = NULL, // Not needed for LZMA1
66 		.props_size_get = NULL,
67 		.props_size_fixed = 5,
68 		.props_encode = &lzma_lzma_props_encode,
69 	},
70 	{
71 		.id = LZMA_FILTER_LZMA1EXT,
72 		.init = &lzma_lzma_encoder_init,
73 		.memusage = &lzma_lzma_encoder_memusage,
74 		.block_size = NULL, // Not needed for LZMA1
75 		.props_size_get = NULL,
76 		.props_size_fixed = 5,
77 		.props_encode = &lzma_lzma_props_encode,
78 	},
79 #endif
80 #ifdef HAVE_ENCODER_LZMA2
81 	{
82 		.id = LZMA_FILTER_LZMA2,
83 		.init = &lzma_lzma2_encoder_init,
84 		.memusage = &lzma_lzma2_encoder_memusage,
85 		.block_size = &lzma_lzma2_block_size,
86 		.props_size_get = NULL,
87 		.props_size_fixed = 1,
88 		.props_encode = &lzma_lzma2_props_encode,
89 	},
90 #endif
91 #ifdef HAVE_ENCODER_X86
92 	{
93 		.id = LZMA_FILTER_X86,
94 		.init = &lzma_simple_x86_encoder_init,
95 		.memusage = NULL,
96 		.block_size = NULL,
97 		.props_size_get = &lzma_simple_props_size,
98 		.props_encode = &lzma_simple_props_encode,
99 	},
100 #endif
101 #ifdef HAVE_ENCODER_POWERPC
102 	{
103 		.id = LZMA_FILTER_POWERPC,
104 		.init = &lzma_simple_powerpc_encoder_init,
105 		.memusage = NULL,
106 		.block_size = NULL,
107 		.props_size_get = &lzma_simple_props_size,
108 		.props_encode = &lzma_simple_props_encode,
109 	},
110 #endif
111 #ifdef HAVE_ENCODER_IA64
112 	{
113 		.id = LZMA_FILTER_IA64,
114 		.init = &lzma_simple_ia64_encoder_init,
115 		.memusage = NULL,
116 		.block_size = NULL,
117 		.props_size_get = &lzma_simple_props_size,
118 		.props_encode = &lzma_simple_props_encode,
119 	},
120 #endif
121 #ifdef HAVE_ENCODER_ARM
122 	{
123 		.id = LZMA_FILTER_ARM,
124 		.init = &lzma_simple_arm_encoder_init,
125 		.memusage = NULL,
126 		.block_size = NULL,
127 		.props_size_get = &lzma_simple_props_size,
128 		.props_encode = &lzma_simple_props_encode,
129 	},
130 #endif
131 #ifdef HAVE_ENCODER_ARMTHUMB
132 	{
133 		.id = LZMA_FILTER_ARMTHUMB,
134 		.init = &lzma_simple_armthumb_encoder_init,
135 		.memusage = NULL,
136 		.block_size = NULL,
137 		.props_size_get = &lzma_simple_props_size,
138 		.props_encode = &lzma_simple_props_encode,
139 	},
140 #endif
141 #ifdef HAVE_ENCODER_ARM64
142 	{
143 		.id = LZMA_FILTER_ARM64,
144 		.init = &lzma_simple_arm64_encoder_init,
145 		.memusage = NULL,
146 		.block_size = NULL,
147 		.props_size_get = &lzma_simple_props_size,
148 		.props_encode = &lzma_simple_props_encode,
149 	},
150 #endif
151 #ifdef HAVE_ENCODER_SPARC
152 	{
153 		.id = LZMA_FILTER_SPARC,
154 		.init = &lzma_simple_sparc_encoder_init,
155 		.memusage = NULL,
156 		.block_size = NULL,
157 		.props_size_get = &lzma_simple_props_size,
158 		.props_encode = &lzma_simple_props_encode,
159 	},
160 #endif
161 #ifdef HAVE_ENCODER_RISCV
162 	{
163 		.id = LZMA_FILTER_RISCV,
164 		.init = &lzma_simple_riscv_encoder_init,
165 		.memusage = NULL,
166 		.block_size = NULL,
167 		.props_size_get = &lzma_simple_props_size,
168 		.props_encode = &lzma_simple_props_encode,
169 	},
170 #endif
171 #ifdef HAVE_ENCODER_DELTA
172 	{
173 		.id = LZMA_FILTER_DELTA,
174 		.init = &lzma_delta_encoder_init,
175 		.memusage = &lzma_delta_coder_memusage,
176 		.block_size = NULL,
177 		.props_size_get = NULL,
178 		.props_size_fixed = 1,
179 		.props_encode = &lzma_delta_props_encode,
180 	},
181 #endif
182 };
183 
184 
185 static const lzma_filter_encoder *
186 encoder_find(lzma_vli id)
187 {
188 	for (size_t i = 0; i < ARRAY_SIZE(encoders); ++i)
189 		if (encoders[i].id == id)
190 			return encoders + i;
191 
192 	return NULL;
193 }
194 
195 
196 extern LZMA_API(lzma_bool)
197 lzma_filter_encoder_is_supported(lzma_vli id)
198 {
199 	return encoder_find(id) != NULL;
200 }
201 
202 
203 extern LZMA_API(lzma_ret)
204 lzma_filters_update(lzma_stream *strm, const lzma_filter *filters)
205 {
206 	if (strm->internal->next.update == NULL)
207 		return LZMA_PROG_ERROR;
208 
209 	// Validate the filter chain.
210 	if (lzma_raw_encoder_memusage(filters) == UINT64_MAX)
211 		return LZMA_OPTIONS_ERROR;
212 
213 	// The actual filter chain in the encoder is reversed. Some things
214 	// still want the normal order chain, so we provide both.
215 	size_t count = 1;
216 	while (filters[count].id != LZMA_VLI_UNKNOWN)
217 		++count;
218 
219 	lzma_filter reversed_filters[LZMA_FILTERS_MAX + 1];
220 	for (size_t i = 0; i < count; ++i)
221 		reversed_filters[count - i - 1] = filters[i];
222 
223 	reversed_filters[count].id = LZMA_VLI_UNKNOWN;
224 
225 	return strm->internal->next.update(strm->internal->next.coder,
226 			strm->allocator, filters, reversed_filters);
227 }
228 
229 
230 extern lzma_ret
231 lzma_raw_encoder_init(lzma_next_coder *next, const lzma_allocator *allocator,
232 		const lzma_filter *filters)
233 {
234 	return lzma_raw_coder_init(next, allocator,
235 			filters, (lzma_filter_find)(&encoder_find), true);
236 }
237 
238 
239 extern LZMA_API(lzma_ret)
240 lzma_raw_encoder(lzma_stream *strm, const lzma_filter *filters)
241 {
242 	lzma_next_strm_init(lzma_raw_coder_init, strm, filters,
243 			(lzma_filter_find)(&encoder_find), true);
244 
245 	strm->internal->supported_actions[LZMA_RUN] = true;
246 	strm->internal->supported_actions[LZMA_SYNC_FLUSH] = true;
247 	strm->internal->supported_actions[LZMA_FINISH] = true;
248 
249 	return LZMA_OK;
250 }
251 
252 
253 extern LZMA_API(uint64_t)
254 lzma_raw_encoder_memusage(const lzma_filter *filters)
255 {
256 	return lzma_raw_coder_memusage(
257 			(lzma_filter_find)(&encoder_find), filters);
258 }
259 
260 
261 extern LZMA_API(uint64_t)
262 lzma_mt_block_size(const lzma_filter *filters)
263 {
264 	if (filters == NULL)
265 		return UINT64_MAX;
266 
267 	uint64_t max = 0;
268 
269 	for (size_t i = 0; filters[i].id != LZMA_VLI_UNKNOWN; ++i) {
270 		const lzma_filter_encoder *const fe
271 				= encoder_find(filters[i].id);
272 		if (fe == NULL)
273 			return UINT64_MAX;
274 
275 		if (fe->block_size != NULL) {
276 			const uint64_t size
277 					= fe->block_size(filters[i].options);
278 			if (size > max)
279 				max = size;
280 		}
281 	}
282 
283 	return max == 0 ? UINT64_MAX : max;
284 }
285 
286 
287 extern LZMA_API(lzma_ret)
288 lzma_properties_size(uint32_t *size, const lzma_filter *filter)
289 {
290 	const lzma_filter_encoder *const fe = encoder_find(filter->id);
291 	if (fe == NULL) {
292 		// Unknown filter - if the Filter ID is a proper VLI,
293 		// return LZMA_OPTIONS_ERROR instead of LZMA_PROG_ERROR,
294 		// because it's possible that we just don't have support
295 		// compiled in for the requested filter.
296 		return filter->id <= LZMA_VLI_MAX
297 				? LZMA_OPTIONS_ERROR : LZMA_PROG_ERROR;
298 	}
299 
300 	if (fe->props_size_get == NULL) {
301 		// No props_size_get() function, use props_size_fixed.
302 		*size = fe->props_size_fixed;
303 		return LZMA_OK;
304 	}
305 
306 	return fe->props_size_get(size, filter->options);
307 }
308 
309 
310 extern LZMA_API(lzma_ret)
311 lzma_properties_encode(const lzma_filter *filter, uint8_t *props)
312 {
313 	const lzma_filter_encoder *const fe = encoder_find(filter->id);
314 	if (fe == NULL)
315 		return LZMA_PROG_ERROR;
316 
317 	if (fe->props_encode == NULL)
318 		return LZMA_OK;
319 
320 	return fe->props_encode(filter->options, props);
321 }
322