mirror of
https://github.com/vgmstream/vgmstream.git
synced 2024-12-15 16:11:16 +01:00
440 lines
14 KiB
C
440 lines
14 KiB
C
#include "../vgmstream.h"
|
|
|
|
#ifdef VGM_USE_VORBIS
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include "meta.h"
|
|
#include "../util.h"
|
|
#include <vorbis/vorbisfile.h>
|
|
|
|
|
|
#define DEFAULT_BITSTREAM 0
|
|
|
|
static size_t read_func(void *ptr, size_t size, size_t nmemb, void * datasource)
|
|
{
|
|
ogg_vorbis_streamfile * const ov_streamfile = datasource;
|
|
size_t items_read;
|
|
|
|
size_t bytes_read;
|
|
|
|
bytes_read = read_streamfile(ptr, ov_streamfile->offset + ov_streamfile->other_header_bytes, size * nmemb,
|
|
ov_streamfile->streamfile);
|
|
|
|
items_read = bytes_read / size;
|
|
|
|
ov_streamfile->offset += items_read * size;
|
|
|
|
return items_read;
|
|
}
|
|
|
|
static size_t read_func_um3(void *ptr, size_t size, size_t nmemb, void * datasource)
|
|
{
|
|
ogg_vorbis_streamfile * const ov_streamfile = datasource;
|
|
size_t items_read;
|
|
|
|
size_t bytes_read;
|
|
|
|
bytes_read = read_streamfile(ptr, ov_streamfile->offset + ov_streamfile->other_header_bytes, size * nmemb,
|
|
ov_streamfile->streamfile);
|
|
|
|
items_read = bytes_read / size;
|
|
|
|
/* first 0x800 bytes of um3 are xor'd with 0xff */
|
|
if (ov_streamfile->offset < 0x800) {
|
|
int num_crypt = 0x800-ov_streamfile->offset;
|
|
int i;
|
|
|
|
if (num_crypt > bytes_read) num_crypt=bytes_read;
|
|
for (i=0;i<num_crypt;i++)
|
|
((uint8_t*)ptr)[i] ^= 0xff;
|
|
}
|
|
|
|
ov_streamfile->offset += items_read * size;
|
|
|
|
return items_read;
|
|
}
|
|
|
|
static size_t read_func_kovs(void *ptr, size_t size, size_t nmemb, void * datasource)
|
|
{
|
|
ogg_vorbis_streamfile * const ov_streamfile = datasource;
|
|
size_t items_read;
|
|
|
|
size_t bytes_read;
|
|
|
|
bytes_read = read_streamfile(ptr, ov_streamfile->offset+ov_streamfile->other_header_bytes, size * nmemb,
|
|
ov_streamfile->streamfile);
|
|
|
|
items_read = bytes_read / size;
|
|
|
|
/* first 0x100 bytes of KOVS are xor'd with offset */
|
|
if (ov_streamfile->offset < 0x100) {
|
|
int i;
|
|
|
|
for (i=ov_streamfile->offset;i<0x100;i++)
|
|
((uint8_t*)ptr)[i-ov_streamfile->offset] ^= i;
|
|
}
|
|
|
|
ov_streamfile->offset += items_read * size;
|
|
|
|
return items_read;
|
|
}
|
|
|
|
static size_t read_func_scd(void *ptr, size_t size, size_t nmemb, void * datasource)
|
|
{
|
|
ogg_vorbis_streamfile * const ov_streamfile = datasource;
|
|
size_t items_read;
|
|
|
|
size_t bytes_read;
|
|
|
|
bytes_read = read_streamfile(ptr, ov_streamfile->offset + ov_streamfile->other_header_bytes, size * nmemb,
|
|
ov_streamfile->streamfile);
|
|
|
|
items_read = bytes_read / size;
|
|
|
|
/* first bytes are xor'd with a constant byte */
|
|
if (ov_streamfile->offset < ov_streamfile->scd_xor_len) {
|
|
int num_crypt = ov_streamfile->scd_xor_len-ov_streamfile->offset;
|
|
int i;
|
|
|
|
if (num_crypt > bytes_read) num_crypt=bytes_read;
|
|
for (i=0;i<num_crypt;i++)
|
|
((uint8_t*)ptr)[i] ^= ov_streamfile->scd_xor;
|
|
}
|
|
|
|
ov_streamfile->offset += items_read * size;
|
|
|
|
return items_read;
|
|
}
|
|
|
|
static size_t read_func_psych(void *ptr, size_t size, size_t nmemb, void * datasource)
|
|
{
|
|
ogg_vorbis_streamfile * const ov_streamfile = datasource;
|
|
size_t items_read;
|
|
|
|
size_t bytes_read;
|
|
size_t i;
|
|
|
|
bytes_read = read_streamfile(ptr, ov_streamfile->offset + ov_streamfile->other_header_bytes, size * nmemb,
|
|
ov_streamfile->streamfile);
|
|
|
|
/* add 0x23 ('#') */
|
|
for (i=0;i<bytes_read;i++)
|
|
((uint8_t*)ptr)[i] += 0x23;
|
|
|
|
items_read = bytes_read / size;
|
|
|
|
ov_streamfile->offset += items_read * size;
|
|
|
|
return items_read;
|
|
}
|
|
|
|
static int seek_func(void *datasource, ogg_int64_t offset, int whence) {
|
|
ogg_vorbis_streamfile * const ov_streamfile = datasource;
|
|
ogg_int64_t base_offset;
|
|
ogg_int64_t new_offset;
|
|
|
|
switch (whence) {
|
|
case SEEK_SET:
|
|
base_offset = 0;
|
|
break;
|
|
case SEEK_CUR:
|
|
base_offset = ov_streamfile->offset;
|
|
break;
|
|
case SEEK_END:
|
|
base_offset = ov_streamfile->size - ov_streamfile->other_header_bytes;
|
|
break;
|
|
default:
|
|
return -1;
|
|
break;
|
|
}
|
|
|
|
new_offset = base_offset + offset;
|
|
if (new_offset < 0 || new_offset > (ov_streamfile->size - ov_streamfile->other_header_bytes)) {
|
|
return -1;
|
|
} else {
|
|
ov_streamfile->offset = new_offset;
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
static long tell_func(void * datasource) {
|
|
ogg_vorbis_streamfile * const ov_streamfile = datasource;
|
|
return ov_streamfile->offset;
|
|
}
|
|
|
|
/* setting close_func in ov_callbacks to NULL doesn't seem to work */
|
|
static int close_func(void * datasource) {
|
|
return 0;
|
|
}
|
|
|
|
/* Ogg Vorbis, by way of libvorbisfile */
|
|
|
|
VGMSTREAM * init_vgmstream_ogg_vorbis(STREAMFILE *streamFile) {
|
|
char filename[PATH_LIMIT];
|
|
|
|
ov_callbacks callbacks;
|
|
|
|
off_t other_header_bytes = 0;
|
|
int um3_ogg = 0;
|
|
int kovs_ogg = 0;
|
|
int psych_ogg = 0;
|
|
|
|
vgm_vorbis_info_t inf;
|
|
memset(&inf, 0, sizeof(inf));
|
|
|
|
/* check extension, case insensitive */
|
|
streamFile->get_name(streamFile,filename,sizeof(filename));
|
|
|
|
/* It is only interesting to use oggs with vgmstream if they are looped.
|
|
To prevent such files from being played by other plugins and such they
|
|
may be renamed to .logg. This meta reader should still support .ogg,
|
|
though. */
|
|
if (strcasecmp("logg",filename_extension(filename)) &&
|
|
strcasecmp("ogg",filename_extension(filename))) {
|
|
if (!strcasecmp("um3",filename_extension(filename))) {
|
|
um3_ogg = 1;
|
|
} else if (!strcasecmp("kovs",filename_extension(filename))) {
|
|
kovs_ogg = 1;
|
|
} else {
|
|
goto fail;
|
|
}
|
|
}
|
|
|
|
/* not all um3-ogg are crypted */
|
|
if (um3_ogg && read_32bitBE(0x0,streamFile)==0x4f676753) {
|
|
um3_ogg = 0;
|
|
}
|
|
|
|
/* use KOVS header */
|
|
if (kovs_ogg) {
|
|
if (read_32bitBE(0x0,streamFile)!=0x4b4f5653) { /* "KOVS" */
|
|
goto fail;
|
|
}
|
|
if (read_32bitLE(0x8,streamFile)!=0) {
|
|
inf.loop_start = read_32bitLE(0x8,streamFile);
|
|
inf.loop_flag = 1;
|
|
}
|
|
|
|
other_header_bytes = 0x20;
|
|
}
|
|
|
|
/* detect Psychic Software obfuscation (as seen in "Darkwind") */
|
|
if (read_32bitBE(0x0,streamFile)==0x2c444430) {
|
|
psych_ogg = 1;
|
|
}
|
|
|
|
if (um3_ogg) {
|
|
callbacks.read_func = read_func_um3;
|
|
} else if (kovs_ogg) {
|
|
callbacks.read_func = read_func_kovs;
|
|
} else if (psych_ogg) {
|
|
callbacks.read_func = read_func_psych;
|
|
} else {
|
|
callbacks.read_func = read_func;
|
|
}
|
|
callbacks.seek_func = seek_func;
|
|
callbacks.close_func = close_func;
|
|
callbacks.tell_func = tell_func;
|
|
|
|
if (um3_ogg) {
|
|
inf.meta_type = meta_um3_ogg;
|
|
} else if (kovs_ogg) {
|
|
inf.meta_type = meta_KOVS_ogg;
|
|
} else if (psych_ogg) {
|
|
inf.meta_type = meta_psych_ogg;
|
|
} else {
|
|
inf.meta_type = meta_ogg_vorbis;
|
|
}
|
|
|
|
inf.layout_type = layout_ogg_vorbis;
|
|
|
|
return init_vgmstream_ogg_vorbis_callbacks(streamFile, filename, &callbacks, other_header_bytes, &inf);
|
|
|
|
fail:
|
|
return NULL;
|
|
}
|
|
|
|
VGMSTREAM * init_vgmstream_ogg_vorbis_callbacks(STREAMFILE *streamFile, const char * filename, ov_callbacks *callbacks_p, off_t other_header_bytes, const vgm_vorbis_info_t *vgm_inf) {
|
|
VGMSTREAM * vgmstream = NULL;
|
|
|
|
OggVorbis_File temp_ovf;
|
|
ogg_vorbis_streamfile temp_streamfile;
|
|
|
|
ogg_vorbis_codec_data * data = NULL;
|
|
OggVorbis_File *ovf;
|
|
int inited_ovf = 0;
|
|
vorbis_info *info;
|
|
|
|
int loop_flag = vgm_inf->loop_flag;
|
|
int32_t loop_start = vgm_inf->loop_start;
|
|
int loop_length_found = vgm_inf->loop_length_found;
|
|
int32_t loop_length = vgm_inf->loop_length;
|
|
int loop_end_found = vgm_inf->loop_end_found;
|
|
int32_t loop_end = vgm_inf->loop_end;
|
|
|
|
ov_callbacks default_callbacks;
|
|
|
|
if (!callbacks_p) {
|
|
default_callbacks.read_func = read_func;
|
|
default_callbacks.seek_func = seek_func;
|
|
default_callbacks.close_func = close_func;
|
|
default_callbacks.tell_func = tell_func;
|
|
|
|
if (vgm_inf->scd_xor != 0) {
|
|
default_callbacks.read_func = read_func_scd;
|
|
}
|
|
|
|
callbacks_p = &default_callbacks;
|
|
}
|
|
|
|
temp_streamfile.streamfile = streamFile;
|
|
temp_streamfile.offset = 0;
|
|
temp_streamfile.size = get_streamfile_size(temp_streamfile.streamfile);
|
|
temp_streamfile.other_header_bytes = other_header_bytes;
|
|
temp_streamfile.scd_xor = vgm_inf->scd_xor;
|
|
temp_streamfile.scd_xor_len = vgm_inf->scd_xor_len;
|
|
|
|
/* can we open this as a proper ogg vorbis file? */
|
|
memset(&temp_ovf, 0, sizeof(temp_ovf));
|
|
if (ov_test_callbacks(&temp_streamfile, &temp_ovf, NULL,
|
|
0, *callbacks_p)) goto fail;
|
|
|
|
/* we have to close this as it has the init_vgmstream meta-reading
|
|
STREAMFILE */
|
|
ov_clear(&temp_ovf);
|
|
|
|
/* proceed to open a STREAMFILE just for this stream */
|
|
data = calloc(1,sizeof(ogg_vorbis_codec_data));
|
|
if (!data) goto fail;
|
|
|
|
data->ov_streamfile.streamfile = streamFile->open(streamFile,filename,
|
|
STREAMFILE_DEFAULT_BUFFER_SIZE);
|
|
if (!data->ov_streamfile.streamfile) goto fail;
|
|
data->ov_streamfile.offset = 0;
|
|
data->ov_streamfile.size = get_streamfile_size(data->ov_streamfile.streamfile);
|
|
data->ov_streamfile.other_header_bytes = other_header_bytes;
|
|
data->ov_streamfile.scd_xor = vgm_inf->scd_xor;
|
|
data->ov_streamfile.scd_xor_len = vgm_inf->scd_xor_len;
|
|
|
|
/* open the ogg vorbis file for real */
|
|
if (ov_open_callbacks(&data->ov_streamfile, &data->ogg_vorbis_file, NULL,
|
|
0, *callbacks_p)) goto fail;
|
|
ovf = &data->ogg_vorbis_file;
|
|
inited_ovf = 1;
|
|
|
|
data->bitstream = DEFAULT_BITSTREAM;
|
|
|
|
info = ov_info(ovf,DEFAULT_BITSTREAM);
|
|
|
|
/* grab the comments */
|
|
{
|
|
int i;
|
|
vorbis_comment *comment;
|
|
|
|
comment = ov_comment(ovf,DEFAULT_BITSTREAM);
|
|
|
|
/* search for a "loop_start" comment */
|
|
for (i=0;i<comment->comments;i++) {
|
|
if (strstr(comment->user_comments[i],"loop_start=")==
|
|
comment->user_comments[i] ||
|
|
strstr(comment->user_comments[i],"LOOP_START=")==
|
|
comment->user_comments[i] ||
|
|
strstr(comment->user_comments[i],"COMMENT=LOOPPOINT=")==
|
|
comment->user_comments[i] ||
|
|
strstr(comment->user_comments[i],"LOOPSTART=")==
|
|
comment->user_comments[i] ||
|
|
strstr(comment->user_comments[i],"um3.stream.looppoint.start=")==
|
|
comment->user_comments[i] ||
|
|
strstr(comment->user_comments[i],"LoopStart=")==
|
|
comment->user_comments[i]
|
|
) {
|
|
loop_start=atol(strrchr(comment->user_comments[i],'=')+1);
|
|
if (loop_start >= 0)
|
|
loop_flag=1;
|
|
}
|
|
else if (strstr(comment->user_comments[i],"LOOPLENGTH=")==
|
|
comment->user_comments[i]) {
|
|
loop_length=atol(strrchr(comment->user_comments[i],'=')+1);
|
|
loop_length_found=1;
|
|
}
|
|
else if (strstr(comment->user_comments[i],"title=-lps")==
|
|
comment->user_comments[i]) {
|
|
loop_start=atol(comment->user_comments[i]+10);
|
|
if (loop_start >= 0)
|
|
loop_flag=1;
|
|
}
|
|
else if (strstr(comment->user_comments[i],"album=-lpe")==
|
|
comment->user_comments[i]) {
|
|
loop_end=atol(comment->user_comments[i]+10);
|
|
loop_flag=1;
|
|
loop_end_found=1;
|
|
}
|
|
else if (strstr(comment->user_comments[i],"LoopEnd=")==
|
|
comment->user_comments[i]) {
|
|
if(loop_flag) {
|
|
loop_length=atol(strrchr(comment->user_comments[i],'=')+1)-loop_start;
|
|
loop_length_found=1;
|
|
}
|
|
}
|
|
else if (strstr(comment->user_comments[i],"lp=")==
|
|
comment->user_comments[i]) {
|
|
sscanf(strrchr(comment->user_comments[i],'=')+1,"%d,%d",
|
|
&loop_start,&loop_end);
|
|
loop_flag=1;
|
|
loop_end_found=1;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* build the VGMSTREAM */
|
|
vgmstream = allocate_vgmstream(info->channels,loop_flag);
|
|
if (!vgmstream) goto fail;
|
|
|
|
/* store our fun extra datas */
|
|
vgmstream->codec_data = data;
|
|
|
|
/* fill in the vital statistics */
|
|
vgmstream->channels = info->channels;
|
|
vgmstream->sample_rate = info->rate;
|
|
|
|
/* let's play the whole file */
|
|
vgmstream->num_samples = ov_pcm_total(ovf,-1);
|
|
|
|
if (loop_flag) {
|
|
vgmstream->loop_start_sample = loop_start;
|
|
if (loop_length_found)
|
|
vgmstream->loop_end_sample = loop_start+loop_length;
|
|
else if (loop_end_found)
|
|
vgmstream->loop_end_sample = loop_end;
|
|
else
|
|
vgmstream->loop_end_sample = vgmstream->num_samples;
|
|
vgmstream->loop_flag = loop_flag;
|
|
|
|
if (vgmstream->loop_end_sample > vgmstream->num_samples)
|
|
vgmstream->loop_end_sample = vgmstream->num_samples;
|
|
}
|
|
vgmstream->coding_type = coding_ogg_vorbis;
|
|
vgmstream->layout_type = vgm_inf->layout_type;
|
|
vgmstream->meta_type = vgm_inf->meta_type;
|
|
|
|
return vgmstream;
|
|
|
|
/* clean up anything we may have opened */
|
|
fail:
|
|
if (data) {
|
|
if (inited_ovf)
|
|
ov_clear(&data->ogg_vorbis_file);
|
|
if (data->ov_streamfile.streamfile)
|
|
close_streamfile(data->ov_streamfile.streamfile);
|
|
free(data);
|
|
}
|
|
if (vgmstream) {
|
|
vgmstream->codec_data = NULL;
|
|
close_vgmstream(vgmstream);
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
#endif
|