160 lines
4.2 KiB
C
160 lines
4.2 KiB
C
#include "meta.h"
|
|
#include "../coding/coding.h"
|
|
#include "ahx_keys.h"
|
|
#include "../util/cri_keys.h"
|
|
|
|
#ifdef VGM_USE_MPEG
|
|
static int find_ahx_key(STREAMFILE* sf, off_t offset, crikey_t* crikey);
|
|
#endif
|
|
|
|
|
|
/* AHX - CRI voice format */
|
|
VGMSTREAM* init_vgmstream_ahx(STREAMFILE* sf) {
|
|
VGMSTREAM* vgmstream = NULL;
|
|
uint32_t start_offset;
|
|
int channels = 1, loop_flag = 0, type;
|
|
|
|
/* checks */
|
|
if (read_u16be(0x00,sf) != 0x8000)
|
|
goto fail;
|
|
|
|
if (!check_extensions(sf, "ahx") )
|
|
goto fail;
|
|
|
|
start_offset = read_u16be(0x02,sf) + 0x04;
|
|
if (read_u16be(start_offset - 0x06,sf) != 0x2863 || /* "(c" */
|
|
read_u32be(start_offset - 0x04,sf) != 0x29435249) /* ")CRI" */
|
|
goto fail;
|
|
|
|
/* types: 0x10 = AHX for DC with fixed MPEG frame bits (bigger frames), 0x11 = standard AHX, 0x0N = ADX */
|
|
type = read_u8(0x04,sf);
|
|
if (type != 0x10 && type != 0x11) goto fail;
|
|
|
|
/* frame size (0 for AHX) */
|
|
if (read_u8(0x05,sf) != 0) goto fail;
|
|
|
|
/* check for bits per sample? (0 for AHX) */
|
|
if (read_u8(0x06,sf) != 0) goto fail;
|
|
|
|
/* check channel count (only mono AHXs can be created by the encoder) */
|
|
if (read_u8(0x07,sf) != 1) goto fail;
|
|
|
|
/* check version signature */
|
|
if (read_u8(0x12,sf) != 0x06) goto fail;
|
|
|
|
|
|
/* build the VGMSTREAM */
|
|
vgmstream = allocate_vgmstream(channels, loop_flag);
|
|
if (!vgmstream) goto fail;
|
|
|
|
vgmstream->sample_rate = read_s32be(0x08,sf); /* real sample rate */
|
|
vgmstream->num_samples = read_s32be(0x0c,sf); /* doesn't include encoder_delay (handled in decoder) */
|
|
|
|
vgmstream->meta_type = meta_AHX;
|
|
|
|
{
|
|
#ifdef VGM_USE_MPEG
|
|
mpeg_custom_config cfg = {0};
|
|
crikey_t* crikey = &cfg.crikey;
|
|
|
|
cfg.encryption = read_u8(0x13,sf); /* only type 0x08 is known */
|
|
crikey->type = cfg.encryption;
|
|
|
|
if (cfg.encryption) {
|
|
find_ahx_key(sf, start_offset, crikey);
|
|
}
|
|
|
|
vgmstream->layout_type = layout_none;
|
|
vgmstream->codec_data = init_mpeg_custom(sf, start_offset, &vgmstream->coding_type, channels, MPEG_AHX, &cfg);
|
|
if (!vgmstream->codec_data) goto fail;
|
|
#else
|
|
goto fail;
|
|
#endif
|
|
}
|
|
|
|
if (!vgmstream_open_stream(vgmstream, sf, start_offset))
|
|
goto fail;
|
|
return vgmstream;
|
|
|
|
fail:
|
|
close_vgmstream(vgmstream);
|
|
return NULL;
|
|
}
|
|
|
|
#ifdef VGM_USE_MPEG
|
|
static int find_ahx_keyfile(STREAMFILE* sf, crikey_t* crikey) {
|
|
uint8_t keybuf[0x10+1] = {0}; /* approximate max for keystrings, +1 extra null for keystrings */
|
|
size_t key_size;
|
|
int is_keystring = 0;
|
|
|
|
key_size = read_key_file(keybuf, sizeof(keybuf) - 1, sf);
|
|
if (key_size <= 0)
|
|
goto fail;
|
|
|
|
|
|
if (crikey->type == 8) {
|
|
is_keystring = cri_key8_valid_keystring(keybuf, key_size);
|
|
}
|
|
|
|
if (key_size == 0x06 && !is_keystring) {
|
|
crikey->key1 = get_u16be(keybuf + 0x00);
|
|
crikey->key2 = get_u16be(keybuf + 0x02);
|
|
crikey->key3 = get_u16be(keybuf + 0x04);
|
|
}
|
|
else if (crikey->type == 8 && is_keystring) {
|
|
const char* keystring = (const char*)keybuf;
|
|
cri_key8_derive(keystring, &crikey->key1, &crikey->key2, &crikey->key3);
|
|
}
|
|
else {
|
|
goto fail;
|
|
}
|
|
|
|
return 1;
|
|
fail:
|
|
return 0;
|
|
}
|
|
|
|
static int find_ahx_keylist(STREAMFILE* sf, off_t offset, crikey_t* crikey) {
|
|
int i;
|
|
int keycount = ahxkey8_list_count;
|
|
const ahxkey_info* keys = ahxkey8_list;
|
|
|
|
|
|
for (i = 0; i < keycount; i++) {
|
|
if (crikey->type == 0x08) {
|
|
cri_key8_derive(keys[i].key8, &crikey->key1, &crikey->key2, &crikey->key3);
|
|
//;VGM_LOG("AHX: testing %s [%04x %04x %04x]\n", keys[i].key8, crikey->key1, crikey->key2, crikey->key3);
|
|
}
|
|
else {
|
|
continue;
|
|
}
|
|
|
|
if (test_ahx_key(sf, offset, crikey)) {
|
|
//;VGM_LOG("AHX key found\n");
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int find_ahx_key(STREAMFILE* sf, off_t offset, crikey_t* crikey) {
|
|
int ok;
|
|
|
|
ok = find_ahx_keyfile(sf, crikey);
|
|
if (ok)
|
|
return 1;
|
|
|
|
ok = find_ahx_keylist(sf, offset, crikey);
|
|
if (ok)
|
|
return 1;
|
|
|
|
|
|
crikey->key1 = 0;
|
|
crikey->key2 = 0;
|
|
crikey->key3 = 0;
|
|
vgm_logi("AHX: decryption key not found\n");
|
|
return 0;
|
|
}
|
|
#endif
|