Files
korenkonder_ReDIVA/src/KKdLib/database/texture.cpp
T

469 lines
13 KiB
C++

/*
by korenkonder
GitHub/GitLab: korenkonder
*/
#include "texture.hpp"
#include "../f2/struct.hpp"
#include "../io/path.hpp"
#include "../io/stream.hpp"
#include "../hash.hpp"
#include "../sort.hpp"
#include "../str_utils.hpp"
static void texture_database_classic_read_inner(texture_database* tex_db, stream& s);
static void texture_database_classic_write_inner(texture_database* tex_db, stream& s);
static void texture_database_modern_read_inner(texture_database* tex_db, stream& s, uint32_t header_length);
static void texture_database_modern_write_inner(texture_database* tex_db, stream& s);
static int64_t texture_database_strings_get_string_offset(std::vector<std::string>& vec,
std::vector<int64_t>& vec_off, std::string& str);
static void texture_database_strings_push_back_check(std::vector<std::string>& vec, std::string& str);
texture_database::texture_database() : ready(), modern(), is_x() {
}
texture_database::~texture_database() {
}
void texture_database::read(const char* path, bool modern) {
if (!path)
return;
if (!modern) {
char* path_bin = str_utils_add(path, ".bin");
if (path_check_file_exists(path_bin)) {
stream s;
s.open(path_bin, "rb");
if (s.io.stream) {
uint8_t* data = force_malloc_s(uint8_t, s.length);
s.read(data, s.length);
stream s_bin;
s_bin.open(data, s.length);
texture_database_classic_read_inner(this, s_bin);
free(data);
}
}
free(path_bin);
}
else {
char* path_txi = str_utils_add(path, ".txi");
if (path_check_file_exists(path_txi)) {
f2_struct st;
st.read(path_txi);
if (st.header.signature == reverse_endianness_uint32_t('MTXI')) {
stream s_mtxi;
s_mtxi.open(st.data);
s_mtxi.is_big_endian = st.header.use_big_endian;
texture_database_modern_read_inner(this, s_mtxi, st.header.length);
}
}
free(path_txi);
}
}
void texture_database::read(const wchar_t* path, bool modern) {
if (!path)
return;
if (!modern) {
wchar_t* path_bin = str_utils_add(path, L".bin");
if (path_check_file_exists(path_bin)) {
stream s;
s.open(path_bin, L"rb");
if (s.io.stream) {
uint8_t* data = force_malloc_s(uint8_t, s.length);
s.read(data, s.length);
stream s_bin;
s_bin.open(data, s.length);
texture_database_classic_read_inner(this, s_bin);
free(data);
}
}
free(path_bin);
}
else {
wchar_t* path_txi = str_utils_add(path, L".txi");
if (path_check_file_exists(path_txi)) {
f2_struct st;
st.read(path_txi);
if (st.header.signature == reverse_endianness_uint32_t('MTXI')) {
stream s_mtxi;
s_mtxi.open(st.data);
s_mtxi.is_big_endian = st.header.use_big_endian;
texture_database_modern_read_inner(this, s_mtxi, st.header.length);
}
}
free(path_txi);
}
}
void texture_database::read(const void* data, size_t size, bool modern) {
if (!data || !size)
return;
if (!modern) {
stream s;
s.open(data, size);
texture_database_classic_read_inner(this, s);
}
else {
f2_struct st;
st.read(data, size);
if (st.header.signature == reverse_endianness_uint32_t('MTXI')) {
stream s_mtxi;
s_mtxi.open(st.data);
s_mtxi.is_big_endian = st.header.use_big_endian;
texture_database_modern_read_inner(this, s_mtxi, st.header.length);
}
}
}
void texture_database::write(const char* path) {
if (!path || !ready)
return;
if (!modern) {
char* path_bin = str_utils_add(path, ".bin");
stream s;
s.open(path_bin, "wb");
if (s.io.stream)
texture_database_classic_write_inner(this, s);
free(path_bin);
}
else {
char* path_txi = str_utils_add(path, ".txi");
stream s;
s.open(path_txi, "wb");
if (s.io.stream)
texture_database_modern_write_inner(this, s);
free(path_txi);
}
}
void texture_database::write(const wchar_t* path) {
if (!path || !ready)
return;
if (!modern) {
wchar_t* path_bin = str_utils_add(path, L".bin");
stream s;
s.open(path_bin, L"wb");
if (s.io.stream)
texture_database_classic_write_inner(this, s);
free(path_bin);
}
else {
wchar_t* path_txi = str_utils_add(path, L".txi");
stream s;
s.open(path_txi, L"wb");
if (s.io.stream)
texture_database_modern_write_inner(this, s);
free(path_txi);
}
}
void texture_database::write(void** data, size_t* size) {
if (!data || !size || !ready)
return;
stream s;
s.open();
if (!modern)
texture_database_classic_write_inner(this, s);
else
texture_database_modern_write_inner(this, s);
s.align_write(0x10);
s.copy(data, size);
}
void texture_database::merge_mdata(texture_database* base_tex_db,
texture_database* mdata_tex_db) {
if (!base_tex_db || !mdata_tex_db
|| !base_tex_db->ready || !mdata_tex_db->ready)
return;
if (this != base_tex_db)
texture = base_tex_db->texture;
for (texture_info& i : mdata_tex_db->texture) {
uint32_t id = i.id;
texture_info* info = 0;
for (texture_info& j : texture)
if (id == j.id) {
info = &j;
break;
}
if (info)
*info = i;
else
texture.push_back(i);
}
if (this != base_tex_db) {
ready = true;
modern = base_tex_db->modern;
is_x = base_tex_db->is_x;
}
}
void texture_database::split_mdata(texture_database* base_tex_db,
texture_database* mdata_tex_db) {
if (!base_tex_db || !mdata_tex_db
|| !ready || !mdata_tex_db->ready)
return;
}
uint32_t texture_database::get_texture_id(const char* name) {
if (!name)
return -1;
uint32_t name_hash = hash_utf8_murmurhash(name);
for (texture_info& i : texture)
if (name_hash == i.name_hash)
return i.id;
return -1;
}
const char* texture_database::get_texture_name(uint32_t id) {
if (id == -1)
return 0;
for (texture_info& i : texture)
if (id == i.id)
return i.name.c_str();
return 0;
}
bool texture_database::load_file(void* data, const char* path, const char* file, uint32_t hash) {
size_t file_len = utf8_length(file);
const char* t = strrchr(file, '.');
if (t)
file_len = t - file;
std::string s = path + std::string(file, file_len);
texture_database* tex_db = (texture_database*)data;
tex_db->read(s.c_str(), tex_db->modern);
return tex_db->ready;
}
texture_info::texture_info() : name_hash(hash_murmurhash_empty), id((uint32_t)-1) {
}
texture_info::~texture_info() {
}
static void texture_database_classic_read_inner(texture_database* tex_db, stream& s) {
uint32_t textures_count = s.read_uint32_t();
uint32_t textures_offset = s.read_uint32_t();
tex_db->texture.resize(textures_count);
s.position_push(textures_offset, SEEK_SET);
for (uint32_t i = 0; i < textures_count; i++) {
texture_info& info = tex_db->texture[i];
info.id = s.read_uint32_t();
info.name = s.read_string_null_terminated_offset(s.read_uint32_t());
info.name_hash = hash_string_murmurhash(&info.name);
}
s.position_pop();
tex_db->is_x = false;
tex_db->modern = false;
tex_db->ready = true;
}
static void texture_database_classic_write_inner(texture_database* tex_db, stream& s) {
s.write_uint32_t(0x90669066);
s.write_uint32_t(0x90669066);
s.write_uint32_t(0x90669066);
s.write_uint32_t(0x90669066);
s.write_uint32_t(0x90669066);
s.write_uint32_t(0x90669066);
s.write_uint32_t(0x90669066);
s.write_uint32_t(0x90669066);
s.align_write(0x20);
uint32_t textures_count = (uint32_t)tex_db->texture.size();
std::vector<int64_t> string_offsets;
string_offsets.reserve(textures_count);
for (texture_info& i : tex_db->texture) {
string_offsets.push_back(s.get_position());
s.write_string_null_terminated(i.name);
}
s.align_write(0x20);
int64_t textures_offset = s.get_position();
if (string_offsets.size()) {
size_t off_idx = 0;
for (texture_info& i : tex_db->texture) {
s.write_uint32_t(i.id);
s.write_uint32_t((uint32_t)string_offsets[off_idx++]);
}
}
s.align_write(0x20);
s.position_push(0x00, SEEK_SET);
s.write_uint32_t(textures_count);
s.write_uint32_t((uint32_t)textures_offset);
s.position_pop();
}
static void texture_database_modern_read_inner(texture_database* tex_db, stream& s, uint32_t header_length) {
bool is_x = true;
s.set_position(0x04, SEEK_SET);
is_x &= s.read_uint32_t_reverse_endianness() == 0;
s.set_position(0x00, SEEK_SET);
uint32_t textures_count = s.read_uint32_t_reverse_endianness();
int64_t textures_offset = s.read_offset(header_length, is_x);
tex_db->texture.resize(textures_count);
s.position_push(textures_offset, SEEK_SET);
if (!is_x)
for (uint32_t i = 0; i < textures_count; i++) {
texture_info& info = tex_db->texture[i];
info.id = s.read_uint32_t_reverse_endianness();
info.name = s.read_string_null_terminated_offset(s.read_offset_f2(header_length));
info.name_hash = hash_string_murmurhash(&info.name);
}
else
for (uint32_t i = 0; i < textures_count; i++) {
texture_info& info = tex_db->texture[i];
info.id = s.read_uint32_t_reverse_endianness();
info.name = s.read_string_null_terminated_offset(s.read_offset_x());
info.name_hash = hash_string_murmurhash(&info.name);
}
s.position_pop();
tex_db->is_x = is_x;
tex_db->modern = true;
tex_db->ready = true;
}
static void texture_database_modern_write_inner(texture_database* tex_db, stream& s) {
stream s_mtxi;
s_mtxi.open();
uint32_t off;
enrs e;
enrs_entry ee;
pof pof;
bool is_x = tex_db->is_x;
uint32_t textures_count = (uint32_t)tex_db->texture.size();
if (!is_x) {
ee = { 0, 2, 8, textures_count };
ee.append(0, 9, ENRS_DWORD);
e.vec.push_back(ee);
off = 8;
off = align_val(off, 0x10);
ee = { off, 2, 8, textures_count };
ee.append(0, 2, ENRS_DWORD);
e.vec.push_back(ee);
off = (uint32_t)(textures_count * 16ULL);
}
else {
textures_count++;
ee = { 0, 2, 16, textures_count };
ee.append(0, 1, ENRS_DWORD);
ee.append(4, 1, ENRS_QWORD);
e.vec.push_back(ee);
off = (uint32_t)(textures_count * 16ULL);
textures_count--;
}
s_mtxi.write_int32_t(0);
s_mtxi.write_offset(0, 0x20, is_x);
s_mtxi.align_write(0x10);
int64_t textures_offset = s_mtxi.get_position();
s_mtxi.write(textures_count * (is_x ? 0x10ULL : 0x08ULL));
s_mtxi.align_write(0x10);
std::vector<std::string> strings;
std::vector<int64_t> string_offsets;
strings.reserve(textures_count);
for (texture_info& i : tex_db->texture)
texture_database_strings_push_back_check(strings, i.name);
quicksort_string(strings.data(), strings.size());
string_offsets.reserve(strings.size());
for (std::string& i : strings) {
string_offsets.push_back(s_mtxi.get_position());
s_mtxi.write_string_null_terminated(i);
}
s_mtxi.align_write(0x10);
s_mtxi.position_push(0x00, SEEK_SET);
s_mtxi.write_uint32_t(textures_count);
io_write_offset_pof_add(s_mtxi, textures_offset, 0x20, is_x, &pof);
s_mtxi.align_write(0x10);
if (!is_x)
for (texture_info& i : tex_db->texture) {
s_mtxi.write_uint32_t(i.id);
int64_t offset = texture_database_strings_get_string_offset(strings,
string_offsets, i.name);
io_write_offset_f2_pof_add(s_mtxi, offset, 0x20, &pof);
}
else
for (texture_info& i : tex_db->texture) {
s_mtxi.write_uint32_t(i.id);
int64_t offset = texture_database_strings_get_string_offset(strings,
string_offsets, i.name);
io_write_offset_x_pof_add(s_mtxi, offset, &pof);
}
s_mtxi.position_pop();
f2_struct st;
s_mtxi.align_write(0x10);
s_mtxi.copy(st.data);
s_mtxi.close();
st.enrs = e;
st.pof = pof;
st.header.signature = reverse_endianness_uint32_t('MTXI');
st.header.length = 0x20;
st.header.use_big_endian = false;
st.header.use_section_size = true;
st.write(s, true, tex_db->is_x);
}
inline static int64_t texture_database_strings_get_string_offset(std::vector<std::string>& vec,
std::vector<int64_t>& vec_off, std::string& str) {
for (std::string& i : vec)
if (str == i)
return vec_off[&i - vec.data()];
return 0;
}
inline static void texture_database_strings_push_back_check(std::vector<std::string>& vec, std::string& str) {
for (std::string& i : vec)
if (str == i)
return;
vec.push_back(str);
}