59f448cf15
off_t is a really weird type as it is usually 64bit these days (at least in sane programs), but could theoretically be 32bit. We don't support off_t as 32bit builds though, but still constantly deal with safely converting from off_t to other types and back for no point. Hence, never use the type anymore. Always use uint64_t instead. This has various benefits, including that we can expose these values directly as D-Bus properties, and also that the values parse the same in all cases.
658 lines
20 KiB
C
658 lines
20 KiB
C
/*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/
|
|
|
|
/***
|
|
This file is part of systemd.
|
|
|
|
Copyright 2011 Lennart Poettering
|
|
|
|
systemd is free software; you can redistribute it and/or modify it
|
|
under the terms of the GNU Lesser General Public License as published by
|
|
the Free Software Foundation; either version 2.1 of the License, or
|
|
(at your option) any later version.
|
|
|
|
systemd is distributed in the hope that it will be useful, but
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public License
|
|
along with systemd; If not, see <http://www.gnu.org/licenses/>.
|
|
***/
|
|
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#ifdef HAVE_XZ
|
|
# include <lzma.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_LZ4
|
|
# include <lz4.h>
|
|
#endif
|
|
|
|
#include "compress.h"
|
|
#include "macro.h"
|
|
#include "util.h"
|
|
#include "sparse-endian.h"
|
|
#include "journal-def.h"
|
|
|
|
#define ALIGN_8(l) ALIGN_TO(l, sizeof(size_t))
|
|
|
|
static const char* const object_compressed_table[_OBJECT_COMPRESSED_MAX] = {
|
|
[OBJECT_COMPRESSED_XZ] = "XZ",
|
|
[OBJECT_COMPRESSED_LZ4] = "LZ4",
|
|
};
|
|
|
|
DEFINE_STRING_TABLE_LOOKUP(object_compressed, int);
|
|
|
|
int compress_blob_xz(const void *src, uint64_t src_size, void *dst, size_t *dst_size) {
|
|
#ifdef HAVE_XZ
|
|
static const lzma_options_lzma opt = {
|
|
1u << 20u, NULL, 0, LZMA_LC_DEFAULT, LZMA_LP_DEFAULT,
|
|
LZMA_PB_DEFAULT, LZMA_MODE_FAST, 128, LZMA_MF_HC3, 4};
|
|
static const lzma_filter filters[2] = {
|
|
{LZMA_FILTER_LZMA2, (lzma_options_lzma*) &opt},
|
|
{LZMA_VLI_UNKNOWN, NULL}
|
|
};
|
|
lzma_ret ret;
|
|
size_t out_pos = 0;
|
|
|
|
assert(src);
|
|
assert(src_size > 0);
|
|
assert(dst);
|
|
assert(dst_size);
|
|
|
|
/* Returns < 0 if we couldn't compress the data or the
|
|
* compressed result is longer than the original */
|
|
|
|
if (src_size < 80)
|
|
return -ENOBUFS;
|
|
|
|
ret = lzma_stream_buffer_encode((lzma_filter*) filters, LZMA_CHECK_NONE, NULL,
|
|
src, src_size, dst, &out_pos, src_size - 1);
|
|
if (ret != LZMA_OK)
|
|
return -ENOBUFS;
|
|
|
|
*dst_size = out_pos;
|
|
return 0;
|
|
#else
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
int compress_blob_lz4(const void *src, uint64_t src_size, void *dst, size_t *dst_size) {
|
|
#ifdef HAVE_LZ4
|
|
int r;
|
|
|
|
assert(src);
|
|
assert(src_size > 0);
|
|
assert(dst);
|
|
assert(dst_size);
|
|
|
|
/* Returns < 0 if we couldn't compress the data or the
|
|
* compressed result is longer than the original */
|
|
|
|
if (src_size < 9)
|
|
return -ENOBUFS;
|
|
|
|
r = LZ4_compress_limitedOutput(src, dst + 8, src_size, src_size - 8 - 1);
|
|
if (r <= 0)
|
|
return -ENOBUFS;
|
|
|
|
*(le64_t*) dst = htole64(src_size);
|
|
*dst_size = r + 8;
|
|
|
|
return 0;
|
|
#else
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
|
|
int decompress_blob_xz(const void *src, uint64_t src_size,
|
|
void **dst, size_t *dst_alloc_size, size_t* dst_size, size_t dst_max) {
|
|
|
|
#ifdef HAVE_XZ
|
|
_cleanup_(lzma_end) lzma_stream s = LZMA_STREAM_INIT;
|
|
lzma_ret ret;
|
|
size_t space;
|
|
|
|
assert(src);
|
|
assert(src_size > 0);
|
|
assert(dst);
|
|
assert(dst_alloc_size);
|
|
assert(dst_size);
|
|
assert(*dst_alloc_size == 0 || *dst);
|
|
|
|
ret = lzma_stream_decoder(&s, UINT64_MAX, 0);
|
|
if (ret != LZMA_OK)
|
|
return -ENOMEM;
|
|
|
|
space = MIN(src_size * 2, dst_max ?: (size_t) -1);
|
|
if (!greedy_realloc(dst, dst_alloc_size, space, 1))
|
|
return -ENOMEM;
|
|
|
|
s.next_in = src;
|
|
s.avail_in = src_size;
|
|
|
|
s.next_out = *dst;
|
|
s.avail_out = space;
|
|
|
|
for (;;) {
|
|
size_t used;
|
|
|
|
ret = lzma_code(&s, LZMA_FINISH);
|
|
|
|
if (ret == LZMA_STREAM_END)
|
|
break;
|
|
else if (ret != LZMA_OK)
|
|
return -ENOMEM;
|
|
|
|
if (dst_max > 0 && (space - s.avail_out) >= dst_max)
|
|
break;
|
|
else if (dst_max > 0 && space == dst_max)
|
|
return -ENOBUFS;
|
|
|
|
used = space - s.avail_out;
|
|
space = MIN(2 * space, dst_max ?: (size_t) -1);
|
|
if (!greedy_realloc(dst, dst_alloc_size, space, 1))
|
|
return -ENOMEM;
|
|
|
|
s.avail_out = space - used;
|
|
s.next_out = *dst + used;
|
|
}
|
|
|
|
*dst_size = space - s.avail_out;
|
|
return 0;
|
|
#else
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
int decompress_blob_lz4(const void *src, uint64_t src_size,
|
|
void **dst, size_t *dst_alloc_size, size_t* dst_size, size_t dst_max) {
|
|
|
|
#ifdef HAVE_LZ4
|
|
char* out;
|
|
int r, size; /* LZ4 uses int for size */
|
|
|
|
assert(src);
|
|
assert(src_size > 0);
|
|
assert(dst);
|
|
assert(dst_alloc_size);
|
|
assert(dst_size);
|
|
assert(*dst_alloc_size == 0 || *dst);
|
|
|
|
if (src_size <= 8)
|
|
return -EBADMSG;
|
|
|
|
size = le64toh( *(le64_t*)src );
|
|
if (size < 0 || (le64_t) size != *(le64_t*)src)
|
|
return -EFBIG;
|
|
if ((size_t) size > *dst_alloc_size) {
|
|
out = realloc(*dst, size);
|
|
if (!out)
|
|
return -ENOMEM;
|
|
*dst = out;
|
|
*dst_alloc_size = size;
|
|
} else
|
|
out = *dst;
|
|
|
|
r = LZ4_decompress_safe(src + 8, out, src_size - 8, size);
|
|
if (r < 0 || r != size)
|
|
return -EBADMSG;
|
|
|
|
*dst_size = size;
|
|
return 0;
|
|
#else
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
int decompress_blob(int compression,
|
|
const void *src, uint64_t src_size,
|
|
void **dst, size_t *dst_alloc_size, size_t* dst_size, size_t dst_max) {
|
|
if (compression == OBJECT_COMPRESSED_XZ)
|
|
return decompress_blob_xz(src, src_size,
|
|
dst, dst_alloc_size, dst_size, dst_max);
|
|
else if (compression == OBJECT_COMPRESSED_LZ4)
|
|
return decompress_blob_lz4(src, src_size,
|
|
dst, dst_alloc_size, dst_size, dst_max);
|
|
else
|
|
return -EBADMSG;
|
|
}
|
|
|
|
|
|
int decompress_startswith_xz(const void *src, uint64_t src_size,
|
|
void **buffer, size_t *buffer_size,
|
|
const void *prefix, size_t prefix_len,
|
|
uint8_t extra) {
|
|
|
|
#ifdef HAVE_XZ
|
|
_cleanup_(lzma_end) lzma_stream s = LZMA_STREAM_INIT;
|
|
lzma_ret ret;
|
|
|
|
/* Checks whether the decompressed blob starts with the
|
|
* mentioned prefix. The byte extra needs to follow the
|
|
* prefix */
|
|
|
|
assert(src);
|
|
assert(src_size > 0);
|
|
assert(buffer);
|
|
assert(buffer_size);
|
|
assert(prefix);
|
|
assert(*buffer_size == 0 || *buffer);
|
|
|
|
ret = lzma_stream_decoder(&s, UINT64_MAX, 0);
|
|
if (ret != LZMA_OK)
|
|
return -EBADMSG;
|
|
|
|
if (!(greedy_realloc(buffer, buffer_size, ALIGN_8(prefix_len + 1), 1)))
|
|
return -ENOMEM;
|
|
|
|
s.next_in = src;
|
|
s.avail_in = src_size;
|
|
|
|
s.next_out = *buffer;
|
|
s.avail_out = *buffer_size;
|
|
|
|
for (;;) {
|
|
ret = lzma_code(&s, LZMA_FINISH);
|
|
|
|
if (ret != LZMA_STREAM_END && ret != LZMA_OK)
|
|
return -EBADMSG;
|
|
|
|
if (*buffer_size - s.avail_out >= prefix_len + 1)
|
|
return memcmp(*buffer, prefix, prefix_len) == 0 &&
|
|
((const uint8_t*) *buffer)[prefix_len] == extra;
|
|
|
|
if (ret == LZMA_STREAM_END)
|
|
return 0;
|
|
|
|
s.avail_out += *buffer_size;
|
|
|
|
if (!(greedy_realloc(buffer, buffer_size, *buffer_size * 2, 1)))
|
|
return -ENOMEM;
|
|
|
|
s.next_out = *buffer + *buffer_size - s.avail_out;
|
|
}
|
|
|
|
#else
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
int decompress_startswith_lz4(const void *src, uint64_t src_size,
|
|
void **buffer, size_t *buffer_size,
|
|
const void *prefix, size_t prefix_len,
|
|
uint8_t extra) {
|
|
#ifdef HAVE_LZ4
|
|
/* Checks whether the decompressed blob starts with the
|
|
* mentioned prefix. The byte extra needs to follow the
|
|
* prefix */
|
|
|
|
int r;
|
|
|
|
assert(src);
|
|
assert(src_size > 0);
|
|
assert(buffer);
|
|
assert(buffer_size);
|
|
assert(prefix);
|
|
assert(*buffer_size == 0 || *buffer);
|
|
|
|
if (src_size <= 8)
|
|
return -EBADMSG;
|
|
|
|
if (!(greedy_realloc(buffer, buffer_size, ALIGN_8(prefix_len + 1), 1)))
|
|
return -ENOMEM;
|
|
|
|
r = LZ4_decompress_safe_partial(src + 8, *buffer, src_size - 8,
|
|
prefix_len + 1, *buffer_size);
|
|
|
|
if (r < 0)
|
|
return -EBADMSG;
|
|
if ((unsigned) r >= prefix_len + 1)
|
|
return memcmp(*buffer, prefix, prefix_len) == 0 &&
|
|
((const uint8_t*) *buffer)[prefix_len] == extra;
|
|
else
|
|
return 0;
|
|
|
|
#else
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
int decompress_startswith(int compression,
|
|
const void *src, uint64_t src_size,
|
|
void **buffer, size_t *buffer_size,
|
|
const void *prefix, size_t prefix_len,
|
|
uint8_t extra) {
|
|
if (compression == OBJECT_COMPRESSED_XZ)
|
|
return decompress_startswith_xz(src, src_size,
|
|
buffer, buffer_size,
|
|
prefix, prefix_len,
|
|
extra);
|
|
else if (compression == OBJECT_COMPRESSED_LZ4)
|
|
return decompress_startswith_lz4(src, src_size,
|
|
buffer, buffer_size,
|
|
prefix, prefix_len,
|
|
extra);
|
|
else
|
|
return -EBADMSG;
|
|
}
|
|
|
|
int compress_stream_xz(int fdf, int fdt, uint64_t max_bytes) {
|
|
#ifdef HAVE_XZ
|
|
_cleanup_(lzma_end) lzma_stream s = LZMA_STREAM_INIT;
|
|
lzma_ret ret;
|
|
uint8_t buf[BUFSIZ], out[BUFSIZ];
|
|
lzma_action action = LZMA_RUN;
|
|
|
|
assert(fdf >= 0);
|
|
assert(fdt >= 0);
|
|
|
|
ret = lzma_easy_encoder(&s, LZMA_PRESET_DEFAULT, LZMA_CHECK_CRC64);
|
|
if (ret != LZMA_OK) {
|
|
log_error("Failed to initialize XZ encoder: code %u", ret);
|
|
return -EINVAL;
|
|
}
|
|
|
|
for (;;) {
|
|
if (s.avail_in == 0 && action == LZMA_RUN) {
|
|
size_t m = sizeof(buf);
|
|
ssize_t n;
|
|
|
|
if (max_bytes != (uint64_t) -1 && (uint64_t) m > max_bytes)
|
|
m = (size_t) max_bytes;
|
|
|
|
n = read(fdf, buf, m);
|
|
if (n < 0)
|
|
return -errno;
|
|
if (n == 0)
|
|
action = LZMA_FINISH;
|
|
else {
|
|
s.next_in = buf;
|
|
s.avail_in = n;
|
|
|
|
if (max_bytes != (uint64_t) -1) {
|
|
assert(max_bytes >= (uint64_t) n);
|
|
max_bytes -= n;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (s.avail_out == 0) {
|
|
s.next_out = out;
|
|
s.avail_out = sizeof(out);
|
|
}
|
|
|
|
ret = lzma_code(&s, action);
|
|
if (ret != LZMA_OK && ret != LZMA_STREAM_END) {
|
|
log_error("Compression failed: code %u", ret);
|
|
return -EBADMSG;
|
|
}
|
|
|
|
if (s.avail_out == 0 || ret == LZMA_STREAM_END) {
|
|
ssize_t n, k;
|
|
|
|
n = sizeof(out) - s.avail_out;
|
|
|
|
k = loop_write(fdt, out, n, false);
|
|
if (k < 0)
|
|
return k;
|
|
|
|
if (ret == LZMA_STREAM_END) {
|
|
log_debug("XZ compression finished (%"PRIu64" -> %"PRIu64" bytes, %.1f%%)",
|
|
s.total_in, s.total_out,
|
|
(double) s.total_out / s.total_in * 100);
|
|
|
|
return 0;
|
|
}
|
|
}
|
|
}
|
|
#else
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
#define LZ4_BUFSIZE (512*1024)
|
|
|
|
int compress_stream_lz4(int fdf, int fdt, uint64_t max_bytes) {
|
|
|
|
#ifdef HAVE_LZ4
|
|
|
|
_cleanup_free_ char *buf1 = NULL, *buf2 = NULL, *out = NULL;
|
|
char *buf;
|
|
LZ4_stream_t lz4_data = {};
|
|
le32_t header;
|
|
size_t total_in = 0, total_out = sizeof(header);
|
|
ssize_t n;
|
|
|
|
assert(fdf >= 0);
|
|
assert(fdt >= 0);
|
|
|
|
buf1 = malloc(LZ4_BUFSIZE);
|
|
buf2 = malloc(LZ4_BUFSIZE);
|
|
out = malloc(LZ4_COMPRESSBOUND(LZ4_BUFSIZE));
|
|
if (!buf1 || !buf2 || !out)
|
|
return log_oom();
|
|
|
|
buf = buf1;
|
|
for (;;) {
|
|
size_t m;
|
|
int r;
|
|
|
|
m = LZ4_BUFSIZE;
|
|
if (max_bytes != (uint64_t) -1 && (uint64_t) m > (max_bytes - total_in))
|
|
m = (size_t) (max_bytes - total_in);
|
|
|
|
n = read(fdf, buf, m);
|
|
if (n < 0)
|
|
return -errno;
|
|
if (n == 0)
|
|
break;
|
|
|
|
total_in += n;
|
|
|
|
r = LZ4_compress_continue(&lz4_data, buf, out, n);
|
|
if (r == 0) {
|
|
log_error("LZ4 compression failed.");
|
|
return -EBADMSG;
|
|
}
|
|
|
|
header = htole32(r);
|
|
errno = 0;
|
|
|
|
n = write(fdt, &header, sizeof(header));
|
|
if (n < 0)
|
|
return -errno;
|
|
if (n != sizeof(header))
|
|
return errno ? -errno : -EIO;
|
|
|
|
n = loop_write(fdt, out, r, false);
|
|
if (n < 0)
|
|
return n;
|
|
|
|
total_out += sizeof(header) + r;
|
|
|
|
buf = buf == buf1 ? buf2 : buf1;
|
|
}
|
|
|
|
header = htole32(0);
|
|
n = write(fdt, &header, sizeof(header));
|
|
if (n < 0)
|
|
return -errno;
|
|
if (n != sizeof(header))
|
|
return errno ? -errno : -EIO;
|
|
|
|
log_debug("LZ4 compression finished (%zu -> %zu bytes, %.1f%%)",
|
|
total_in, total_out,
|
|
(double) total_out / total_in * 100);
|
|
|
|
return 0;
|
|
#else
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
int decompress_stream_xz(int fdf, int fdt, uint64_t max_bytes) {
|
|
|
|
#ifdef HAVE_XZ
|
|
_cleanup_(lzma_end) lzma_stream s = LZMA_STREAM_INIT;
|
|
lzma_ret ret;
|
|
|
|
uint8_t buf[BUFSIZ], out[BUFSIZ];
|
|
lzma_action action = LZMA_RUN;
|
|
|
|
assert(fdf >= 0);
|
|
assert(fdt >= 0);
|
|
|
|
ret = lzma_stream_decoder(&s, UINT64_MAX, 0);
|
|
if (ret != LZMA_OK) {
|
|
log_error("Failed to initialize XZ decoder: code %u", ret);
|
|
return -ENOMEM;
|
|
}
|
|
|
|
for (;;) {
|
|
if (s.avail_in == 0 && action == LZMA_RUN) {
|
|
ssize_t n;
|
|
|
|
n = read(fdf, buf, sizeof(buf));
|
|
if (n < 0)
|
|
return -errno;
|
|
if (n == 0)
|
|
action = LZMA_FINISH;
|
|
else {
|
|
s.next_in = buf;
|
|
s.avail_in = n;
|
|
}
|
|
}
|
|
|
|
if (s.avail_out == 0) {
|
|
s.next_out = out;
|
|
s.avail_out = sizeof(out);
|
|
}
|
|
|
|
ret = lzma_code(&s, action);
|
|
if (ret != LZMA_OK && ret != LZMA_STREAM_END) {
|
|
log_error("Decompression failed: code %u", ret);
|
|
return -EBADMSG;
|
|
}
|
|
|
|
if (s.avail_out == 0 || ret == LZMA_STREAM_END) {
|
|
ssize_t n, k;
|
|
|
|
n = sizeof(out) - s.avail_out;
|
|
|
|
if (max_bytes != (uint64_t) -1) {
|
|
if (max_bytes < (uint64_t) n)
|
|
return -EFBIG;
|
|
|
|
max_bytes -= n;
|
|
}
|
|
|
|
k = loop_write(fdt, out, n, false);
|
|
if (k < 0)
|
|
return k;
|
|
|
|
if (ret == LZMA_STREAM_END) {
|
|
log_debug("XZ decompression finished (%"PRIu64" -> %"PRIu64" bytes, %.1f%%)",
|
|
s.total_in, s.total_out,
|
|
(double) s.total_out / s.total_in * 100);
|
|
|
|
return 0;
|
|
}
|
|
}
|
|
}
|
|
#else
|
|
log_error("Cannot decompress file. Compiled without XZ support.");
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
int decompress_stream_lz4(int fdf, int fdt, uint64_t max_bytes) {
|
|
|
|
#ifdef HAVE_LZ4
|
|
_cleanup_free_ char *buf = NULL, *out = NULL;
|
|
size_t buf_size = 0;
|
|
LZ4_streamDecode_t lz4_data = {};
|
|
le32_t header;
|
|
size_t total_in = sizeof(header), total_out = 0;
|
|
|
|
assert(fdf >= 0);
|
|
assert(fdt >= 0);
|
|
|
|
out = malloc(4*LZ4_BUFSIZE);
|
|
if (!out)
|
|
return log_oom();
|
|
|
|
for (;;) {
|
|
ssize_t m;
|
|
int r;
|
|
|
|
r = loop_read_exact(fdf, &header, sizeof(header), false);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
m = le32toh(header);
|
|
if (m == 0)
|
|
break;
|
|
|
|
/* We refuse to use a bigger decompression buffer than
|
|
* the one used for compression by 4 times. This means
|
|
* that compression buffer size can be enlarged 4
|
|
* times. This can be changed, but old binaries might
|
|
* not accept buffers compressed by newer binaries then.
|
|
*/
|
|
if (m > LZ4_COMPRESSBOUND(LZ4_BUFSIZE * 4)) {
|
|
log_error("Compressed stream block too big: %zd bytes", m);
|
|
return -EBADMSG;
|
|
}
|
|
|
|
total_in += sizeof(header) + m;
|
|
|
|
if (!GREEDY_REALLOC(buf, buf_size, m))
|
|
return log_oom();
|
|
|
|
r = loop_read_exact(fdf, buf, m, false);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
r = LZ4_decompress_safe_continue(&lz4_data, buf, out, m, 4*LZ4_BUFSIZE);
|
|
if (r <= 0)
|
|
log_error("LZ4 decompression failed.");
|
|
|
|
total_out += r;
|
|
|
|
if (max_bytes != (uint64_t) -1 && (uint64_t) total_out > max_bytes) {
|
|
log_debug("Decompressed stream longer than %" PRIu64 " bytes", max_bytes);
|
|
return -EFBIG;
|
|
}
|
|
|
|
r = loop_write(fdt, out, r, false);
|
|
if (r < 0)
|
|
return r;
|
|
}
|
|
|
|
log_debug("LZ4 decompression finished (%zu -> %zu bytes, %.1f%%)",
|
|
total_in, total_out,
|
|
(double) total_out / total_in * 100);
|
|
|
|
return 0;
|
|
#else
|
|
log_error("Cannot decompress file. Compiled without LZ4 support.");
|
|
return -EPROTONOSUPPORT;
|
|
#endif
|
|
}
|
|
|
|
int decompress_stream(const char *filename, int fdf, int fdt, uint64_t max_bytes) {
|
|
|
|
if (endswith(filename, ".lz4"))
|
|
return decompress_stream_lz4(fdf, fdt, max_bytes);
|
|
else if (endswith(filename, ".xz"))
|
|
return decompress_stream_xz(fdf, fdt, max_bytes);
|
|
else
|
|
return -EPROTONOSUPPORT;
|
|
}
|