2016-06-28 09:20:37 +02:00
|
|
|
#include "meta.h"
|
2017-09-17 03:41:36 +02:00
|
|
|
#include "hca_keys.h"
|
|
|
|
#include "../coding/coding.h"
|
2016-06-28 09:20:37 +02:00
|
|
|
|
2019-07-07 21:04:56 +02:00
|
|
|
static void find_hca_key(hca_codec_data * hca_data, unsigned long long * out_keycode, uint16_t subkey);
|
2016-06-28 09:20:37 +02:00
|
|
|
|
|
|
|
VGMSTREAM * init_vgmstream_hca(STREAMFILE *streamFile) {
|
2019-07-07 21:04:56 +02:00
|
|
|
return init_vgmstream_hca_subkey(streamFile, 0x0000);
|
|
|
|
}
|
|
|
|
|
|
|
|
VGMSTREAM * init_vgmstream_hca_subkey(STREAMFILE *streamFile, uint16_t subkey) {
|
2017-09-17 03:41:36 +02:00
|
|
|
VGMSTREAM * vgmstream = NULL;
|
2018-09-01 20:28:00 +02:00
|
|
|
hca_codec_data * hca_data = NULL;
|
|
|
|
unsigned long long keycode = 0;
|
2016-06-28 09:20:37 +02:00
|
|
|
|
2019-07-07 21:04:56 +02:00
|
|
|
|
2018-08-29 20:05:31 +02:00
|
|
|
/* checks */
|
|
|
|
if ( !check_extensions(streamFile, "hca"))
|
|
|
|
return NULL;
|
2018-09-01 20:28:00 +02:00
|
|
|
if (((uint32_t)read_32bitBE(0x00,streamFile) & 0x7f7f7f7f) != 0x48434100) /* "HCA\0", possibly masked */
|
2018-08-29 20:05:31 +02:00
|
|
|
goto fail;
|
2016-07-01 00:34:40 +02:00
|
|
|
|
2018-09-01 20:28:00 +02:00
|
|
|
/* init vgmstream and library's context, will validate the HCA */
|
2018-08-29 20:05:31 +02:00
|
|
|
hca_data = init_hca(streamFile);
|
2018-09-01 20:28:00 +02:00
|
|
|
if (!hca_data) goto fail;
|
2016-07-01 00:34:40 +02:00
|
|
|
|
2017-09-17 03:41:36 +02:00
|
|
|
/* find decryption key in external file or preloaded list */
|
2018-09-02 16:00:58 +02:00
|
|
|
if (hca_data->info.encryptionEnabled) {
|
2018-10-13 19:53:25 +02:00
|
|
|
uint8_t keybuf[0x08+0x02];
|
|
|
|
size_t keysize;
|
|
|
|
|
|
|
|
keysize = read_key_file(keybuf, 0x08+0x04, streamFile);
|
|
|
|
if (keysize == 0x08) { /* standard */
|
2018-09-01 20:28:00 +02:00
|
|
|
keycode = (uint64_t)get_64bitBE(keybuf+0x00);
|
2018-10-13 19:53:25 +02:00
|
|
|
}
|
|
|
|
else if (keysize == 0x08+0x02) { /* seed key + AWB subkey */
|
|
|
|
uint64_t key = (uint64_t)get_64bitBE(keybuf+0x00);
|
|
|
|
uint16_t sub = (uint16_t)get_16bitBE(keybuf+0x08);
|
|
|
|
keycode = key * ( ((uint64_t)sub << 16u) | ((uint16_t)~sub + 2u) );
|
|
|
|
}
|
|
|
|
else {
|
2019-07-07 21:04:56 +02:00
|
|
|
find_hca_key(hca_data, &keycode, subkey);
|
2016-12-04 14:12:23 +01:00
|
|
|
}
|
|
|
|
|
2018-09-01 20:28:00 +02:00
|
|
|
clHCA_SetKey(hca_data->handle, keycode); //maybe should be done through hca_decoder.c?
|
|
|
|
}
|
2017-09-17 03:41:36 +02:00
|
|
|
|
|
|
|
|
|
|
|
/* build the VGMSTREAM */
|
|
|
|
vgmstream = allocate_vgmstream(hca_data->info.channelCount, hca_data->info.loopEnabled);
|
|
|
|
if (!vgmstream) goto fail;
|
2016-07-01 00:34:40 +02:00
|
|
|
|
2018-08-29 20:05:31 +02:00
|
|
|
vgmstream->meta_type = meta_HCA;
|
2017-09-17 03:41:36 +02:00
|
|
|
vgmstream->sample_rate = hca_data->info.samplingRate;
|
2018-08-29 23:42:47 +02:00
|
|
|
|
|
|
|
vgmstream->num_samples = hca_data->info.blockCount * hca_data->info.samplesPerBlock -
|
|
|
|
hca_data->info.encoderDelay - hca_data->info.encoderPadding;
|
|
|
|
vgmstream->loop_start_sample = hca_data->info.loopStartBlock * hca_data->info.samplesPerBlock -
|
|
|
|
hca_data->info.encoderDelay + hca_data->info.loopStartDelay;
|
|
|
|
vgmstream->loop_end_sample = hca_data->info.loopEndBlock * hca_data->info.samplesPerBlock -
|
|
|
|
hca_data->info.encoderDelay + (hca_data->info.samplesPerBlock - hca_data->info.loopEndPadding);
|
|
|
|
/* After loop end CRI's encoder removes the rest of the original samples and puts some
|
|
|
|
* garbage in the last frame that should be ignored. Optionally it can encode fully preserving
|
|
|
|
* the file too, but it isn't detectable, so we'll allow the whole thing just in case */
|
|
|
|
//if (vgmstream->loop_end_sample && vgmstream->num_samples > vgmstream->loop_end_sample)
|
|
|
|
// vgmstream->num_samples = vgmstream->loop_end_sample;
|
2016-07-01 00:34:40 +02:00
|
|
|
|
2017-09-17 03:41:36 +02:00
|
|
|
vgmstream->coding_type = coding_CRI_HCA;
|
|
|
|
vgmstream->layout_type = layout_none;
|
|
|
|
vgmstream->codec_data = hca_data;
|
2016-07-01 00:34:40 +02:00
|
|
|
|
2017-09-17 03:41:36 +02:00
|
|
|
return vgmstream;
|
2016-06-28 09:20:37 +02:00
|
|
|
|
2017-09-17 03:41:36 +02:00
|
|
|
fail:
|
2018-08-29 20:05:31 +02:00
|
|
|
free_hca(hca_data);
|
2017-09-17 03:41:36 +02:00
|
|
|
return NULL;
|
|
|
|
}
|
2016-06-28 09:20:37 +02:00
|
|
|
|
|
|
|
|
2018-10-13 19:53:25 +02:00
|
|
|
static inline void test_key(hca_codec_data * hca_data, uint64_t key, uint16_t subkey, int *best_score, uint64_t *best_keycode) {
|
|
|
|
int score;
|
|
|
|
|
|
|
|
if (subkey) {
|
|
|
|
key = key * ( ((uint64_t)subkey << 16u) | ((uint16_t)~subkey + 2u) );
|
|
|
|
}
|
|
|
|
|
|
|
|
score = test_hca_key(hca_data, (unsigned long long)key);
|
|
|
|
|
|
|
|
//;VGM_LOG("HCA: test key=%08x%08x, subkey=%04x, score=%i\n",
|
|
|
|
// (uint32_t)((key >> 32) & 0xFFFFFFFF), (uint32_t)(key & 0xFFFFFFFF), subkey, score);
|
|
|
|
|
|
|
|
/* wrong key */
|
|
|
|
if (score < 0)
|
|
|
|
return;
|
|
|
|
|
2018-12-22 19:44:30 +01:00
|
|
|
/* update if something better is found */
|
|
|
|
if (*best_score <= 0 || (score < *best_score && score > 0)) {
|
2018-10-13 19:53:25 +02:00
|
|
|
*best_score = score;
|
|
|
|
*best_keycode = key;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2018-09-02 16:00:58 +02:00
|
|
|
/* Try to find the decryption key from a list. */
|
2019-07-07 21:04:56 +02:00
|
|
|
static void find_hca_key(hca_codec_data * hca_data, unsigned long long * out_keycode, uint16_t subkey) {
|
2018-09-01 20:28:00 +02:00
|
|
|
const size_t keys_length = sizeof(hcakey_list) / sizeof(hcakey_info);
|
2018-09-02 16:00:58 +02:00
|
|
|
int best_score = -1;
|
2018-10-13 19:53:25 +02:00
|
|
|
int i,j;
|
2016-06-28 09:20:37 +02:00
|
|
|
|
2018-10-13 19:53:25 +02:00
|
|
|
*out_keycode = 0xCC55463930DBE1AB; /* defaults to PSO2 key, most common */
|
2016-06-28 09:20:37 +02:00
|
|
|
|
2017-09-17 03:41:36 +02:00
|
|
|
/* find a candidate key */
|
|
|
|
for (i = 0; i < keys_length; i++) {
|
2018-10-13 19:53:25 +02:00
|
|
|
uint64_t key = hcakey_list[i].key;
|
|
|
|
size_t subkeys_size = hcakey_list[i].subkeys_size;
|
|
|
|
const uint16_t *subkeys = hcakey_list[i].subkeys;
|
|
|
|
|
2019-07-07 21:04:56 +02:00
|
|
|
/* try once with external subkey, if any */
|
|
|
|
test_key(hca_data, key, subkey, &best_score, out_keycode);
|
|
|
|
if (best_score == 1) /* best possible score */
|
|
|
|
goto done;
|
|
|
|
|
|
|
|
/* try subkey list */
|
|
|
|
if (subkeys_size > 0 && subkey == 0) {
|
2018-10-13 19:53:25 +02:00
|
|
|
for (j = 0; j < subkeys_size; j++) {
|
|
|
|
test_key(hca_data, key, subkeys[j], &best_score, out_keycode);
|
|
|
|
if (best_score == 1) /* best possible score */
|
|
|
|
goto done;
|
|
|
|
}
|
2017-09-17 03:41:36 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2018-10-13 19:53:25 +02:00
|
|
|
done:
|
2018-09-02 16:00:58 +02:00
|
|
|
//;VGM_LOG("HCA: best key=%08x%08x (score=%i)\n",
|
2018-10-13 19:53:25 +02:00
|
|
|
// (uint32_t)((*out_keycode >> 32) & 0xFFFFFFFF), (uint32_t)(*out_keycode & 0xFFFFFFFF), best_score);
|
2017-09-17 03:41:36 +02:00
|
|
|
|
2018-09-02 16:00:58 +02:00
|
|
|
VGM_ASSERT(best_score > 1, "HCA: best key=%08x%08x (score=%i)\n",
|
2018-10-13 19:53:25 +02:00
|
|
|
(uint32_t)((*out_keycode >> 32) & 0xFFFFFFFF), (uint32_t)(*out_keycode & 0xFFFFFFFF), best_score);
|
2019-05-17 22:30:49 +02:00
|
|
|
|
|
|
|
VGM_ASSERT(best_score < 0, "HCA: key not found\n");
|
2016-06-28 09:20:37 +02:00
|
|
|
}
|