ares-openbsd/nall/beat/single/apply.hpp

89 行
2.7 KiB
C++

#pragma once
namespace nall::Beat::Single {
inline auto apply(array_view<u8> source, array_view<u8> beat, maybe<string&> manifest = {}, maybe<string&> result = {}) -> maybe<vector<u8>> {
#define error(text) { if(result) *result = {"error: ", text}; return {}; }
#define warning(text) { if(result) *result = {"warning: ", text}; return target; }
#define success() { if(result) *result = ""; return target; }
if(beat.size() < 19) error("beat size mismatch");
vector<u8> target;
u32 beatOffset = 0;
auto read = [&]() -> u8 {
return beat[beatOffset++];
};
auto decode = [&]() -> u64 {
u64 data = 0, shift = 1;
while(true) {
u8 x = read();
data += (x & 0x7f) * shift;
if(x & 0x80) break;
shift <<= 7;
data += shift;
}
return data;
};
auto write = [&](u8 data) {
target.append(data);
};
if(read() != 'B') error("beat header invalid");
if(read() != 'P') error("beat header invalid");
if(read() != 'S') error("beat header invalid");
if(read() != '1') error("beat version mismatch");
if(decode() != source.size()) error("source size mismatch");
u32 targetSize = decode();
target.reserve(targetSize);
u32 metadataSize = decode();
for(u32 n : range(metadataSize)) {
auto data = read();
if(manifest) manifest->append((char)data);
}
enum : u32 { SourceRead, TargetRead, SourceCopy, TargetCopy };
u32 sourceRelativeOffset = 0, targetRelativeOffset = 0;
while(beatOffset < beat.size() - 12) {
u32 length = decode();
u32 mode = length & 3;
length = (length >> 2) + 1;
if(mode == SourceRead) {
while(length--) write(source[target.size()]);
} else if(mode == TargetRead) {
while(length--) write(read());
} else {
s32 offset = decode();
offset = offset & 1 ? -(offset >> 1) : (offset >> 1);
if(mode == SourceCopy) {
sourceRelativeOffset += offset;
while(length--) write(source[sourceRelativeOffset++]);
} else {
targetRelativeOffset += offset;
while(length--) write(target[targetRelativeOffset++]);
}
}
}
u32 sourceHash = 0, targetHash = 0, beatHash = 0;
for(u32 shift : range(0, 32, 8)) sourceHash |= read() << shift;
for(u32 shift : range(0, 32, 8)) targetHash |= read() << shift;
for(u32 shift : range(0, 32, 8)) beatHash |= read() << shift;
if(target.size() != targetSize) warning("target size mismatch");
if(sourceHash != Hash::CRC32(source).value()) warning("source hash mismatch");
if(targetHash != Hash::CRC32(target).value()) warning("target hash mismatch");
if(beatHash != Hash::CRC32({beat.data(), beat.size() - 4}).value()) warning("beat hash mismatch");
success();
#undef error
#undef warning
#undef success
}
}