1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
/* SPDX-License-Identifier: GPL-3.0-or-later */
#include <stdbool.h>
#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include <lzma.h>
#include "internal.h"
typedef struct {
compressor_t base;
size_t block_size;
uint8_t buffer[];
} lzma_compressor_t;
static ssize_t lzma_comp_block(compressor_t *base, uint8_t *block, size_t size)
{
lzma_compressor_t *lzma = (lzma_compressor_t *)base;
lzma_filter filters[5];
lzma_options_lzma opt;
size_t written = 0;
lzma_ret ret;
if (lzma_lzma_preset(&opt, LZMA_PRESET_DEFAULT)) {
fputs("error initializing LZMA options\n", stderr);
return -1;
}
opt.dict_size = lzma->block_size;
filters[0].id = LZMA_FILTER_LZMA2;
filters[0].options = &opt;
filters[1].id = LZMA_VLI_UNKNOWN;
filters[1].options = NULL;
ret = lzma_stream_buffer_encode(filters, LZMA_CHECK_CRC32, NULL,
block, size, lzma->buffer,
&written, lzma->block_size);
if (ret == LZMA_OK) {
if (written >= size)
return 0;
memcpy(block, lzma->buffer, size);
return written;
}
if (ret != LZMA_BUF_ERROR) {
fputs("lzma block compress failed\n", stderr);
return -1;
}
return 0;
}
static ssize_t lzma_uncomp_block(compressor_t *base, uint8_t *block,
size_t size)
{
lzma_compressor_t *lzma = (lzma_compressor_t *)base;
uint64_t memlimit = 32 * 1024 * 1024;
size_t dest_pos = 0;
size_t src_pos = 0;
lzma_ret ret;
ret = lzma_stream_buffer_decode(&memlimit, 0, NULL,
block, &src_pos, size,
lzma->buffer, &dest_pos,
lzma->block_size);
if (ret == LZMA_OK && size == src_pos) {
memcpy(block, lzma->buffer, dest_pos);
return (ssize_t)dest_pos;
}
fputs("lzma block extract failed\n", stderr);
return -1;
}
static void lzma_destroy(compressor_t *base)
{
free(base);
}
compressor_t *create_lzma_compressor(bool compress, size_t block_size)
{
lzma_compressor_t *lzma = calloc(1, sizeof(*lzma) + block_size);
compressor_t *base = (compressor_t *)lzma;
if (lzma == NULL) {
perror("creating lzma stream");
return NULL;
}
lzma->block_size = block_size;
base->destroy = lzma_destroy;
base->do_block = compress ? lzma_comp_block : lzma_uncomp_block;
return base;
}
|