scummvm/mp3_cd.cpp
James Brown 1fce722b72 More cd_mp3 fixes....
svn-id: r3871
2002-04-05 05:05:42 +00:00

296 lines
6.6 KiB
C++
Executable File

/* ScummVM - Scumm Interpreter
* Copyright (C) 2002 The ScummVM project
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
* $Header$
*/
#include "stdafx.h"
#include "scumm.h"
#include <SDL.H>
#ifdef COMPRESSED_SOUND_FILE
#include "mp3_cd.h"
int _current_mp3_cd_track;
struct xing _vbr_header;
struct mad_header _mad_header;
long _mp3_size;
FILE *_mp3_track;
MixerChannel *_mc;
// From xing.c in MAD
int xing_parse(struct xing *xing, struct mad_bitptr ptr, unsigned int bitlen)
{
xing->flags = 0;
if (bitlen < 64 || mad_bit_read(&ptr, 32) != XING_MAGIC)
goto fail;
xing->flags = mad_bit_read(&ptr, 32);
bitlen -= 64;
if (xing->flags & XING_FRAMES) {
if (bitlen < 32)
goto fail;
xing->frames = mad_bit_read(&ptr, 32);
bitlen -= 32;
}
if (xing->flags & XING_BYTES) {
if (bitlen < 32)
goto fail;
xing->bytes = mad_bit_read(&ptr, 32);
bitlen -= 32;
}
if (xing->flags & XING_TOC) {
int i;
if (bitlen < 800)
goto fail;
for (i = 0; i < 100; ++i)
xing->toc[i] = (unsigned char)mad_bit_read(&ptr, 8);
bitlen -= 800;
}
if (xing->flags & XING_SCALE) {
if (bitlen < 32)
goto fail;
xing->scale = mad_bit_read(&ptr, 32);
bitlen -= 32;
}
return 0;
fail:
xing->flags = 0;
return -1;
}
// Borrowed from Winamp plugin in_mad.c
bool parse_xing_vbr_tag()
{
struct mad_stream stream;
struct mad_frame frame;
unsigned char buffer[8192];
unsigned int buflen = 0;
int count = 0, result = 0;
_vbr_header.flags = 0;
mad_stream_init(&stream);
mad_frame_init(&frame);
fseek(_mp3_track, 0, SEEK_SET);
while (1) {
if (buflen < sizeof(buffer)) {
uint16 bytes;
bytes = fread(buffer + buflen, 1, sizeof(buffer) - buflen, _mp3_track);
if (bytes <= 0) {
if (bytes == -1)
result = -1;
break;
}
buflen += bytes;
}
mad_stream_buffer(&stream, buffer, buflen);
while (1) {
if (mad_frame_decode(&frame, &stream) == -1) {
if (!MAD_RECOVERABLE(stream.error))
break;
if (stream.error != MAD_ERROR_BADCRC)
continue;
}
if (count++ ||
xing_parse(&_vbr_header, stream.anc_ptr, stream.anc_bitlen)
== -1)
break;
}
if (count || stream.error != MAD_ERROR_BUFLEN)
break;
memmove(buffer, stream.next_frame,
buflen = &buffer[buflen] - stream.next_frame);
}
if (count)
memcpy(&_mad_header, &frame.header, sizeof(mad_header));
else
result = -1;
mad_frame_finish(&frame);
mad_stream_finish(&stream);
return (result != -1);
}
uint32 calc_cd_file_offset(int start_frame) {
long offset;
if (!_vbr_header.flags) {
float frame_size;
//mad_timer_t timer; - recode with timer
/* Constant bit rate - perhaps not fully accurate */
frame_size = (float)144 * _mad_header.bitrate / _mad_header.samplerate;
offset = (long)((float)start_frame / (float)CD_FPS * 1000 /
(float)((float)1152 / (float)_mad_header.samplerate * 1000) *
(float)(frame_size + 0.5));
}
else {
/* DOES NOT WORK AT THE MOMENT */
/* see Xing SDK */
long a;
float fa, fb, fx;
float percent = (float)start_frame / (float)CD_FPS * 1000 /
((float)((float)1152 / (float)_mad_header.samplerate * 1000) * _vbr_header.frames) *
100;
if( percent < 0.0f ) percent = 0.0f;
if( percent > 100.0f ) percent = 100.0f;
a = (int)percent;
if( a > 99 ) a = 99;
fa = _vbr_header.toc[a];
if( a < 99 ) {
fb = _vbr_header.toc[a+1];
}
else {
fb = 256.0f;
}
fx = fa + (fb-fa)*(percent-a);
offset = (int)((1.0f/256.0f)*fx*_vbr_header.bytes);
}
return offset;
}
bool mp3_cd_play(Scumm *s, int track, int num_loops, int start_frame, int end_frame) {
// See if we are already playing this track, else try to open it
if (_current_mp3_cd_track != track) {
char track_name[1024];
sprintf(track_name, "%strack%d.mp3", s->_gameDataPath, track);
_mp3_track = fopen(track_name, "rb");
if (!_mp3_track) {
warning("No CD and track %d not available in mp3 format", track);
return false;
}
if (!parse_xing_vbr_tag()) {
warning("Error parsing file header - ignoring file",
track);
fclose(_mp3_track);
return false;
}
if (_vbr_header.flags) {
if (!(
(_vbr_header.flags & XING_TOC) &&
(_vbr_header.flags & XING_BYTES) &&
(_vbr_header.flags & XING_FRAMES)
)) {
warning("Missing required part of VBR header - ignoring file");
fclose(_mp3_track);
_vbr_header.flags = 0;
return false;
}
}
// Allocate the music mixer if necessary
if (!_mc) {
_mc = s->allocateMixer();
if (!_mc) {
warning("No mixer channel available for MP3 music");
return false;
}
}
fseek(_mp3_track, 0, SEEK_END);
_mp3_size = ftell(_mp3_track);
fseek(_mp3_track, 0, SEEK_SET);
_mc->type = MIXER_MP3_CDMUSIC;
_mc->sound_data.mp3_cdmusic.file = _mp3_track;
_mc->sound_data.mp3_cdmusic.playing = false;
_mc->sound_data.mp3_cdmusic.buffer_size = 200000;
_mc->_sfx_sound = malloc(_mc->sound_data.mp3_cdmusic.buffer_size);
/* see if it's enough */
mad_stream_init(&_mc->sound_data.mp3.stream);
if (_mad_header.samplerate == 44100)
mad_stream_options((mad_stream*)&_mc->sound_data.mp3.stream,
MAD_OPTION_HALFSAMPLERATE);
mad_frame_init(&_mc->sound_data.mp3.frame);
mad_synth_init(&_mc->sound_data.mp3.synth);
_current_mp3_cd_track = track;
}
if (_current_mp3_cd_track == track) {
uint32 where;
// See where we want to go
where = calc_cd_file_offset(start_frame);
if (start_frame < 0 || end_frame < 0) {
warning("Negative index in frame");
return false;
}
mad_timer_set(&_mc->sound_data.mp3_cdmusic.duration,
0,
end_frame,
CD_FPS);
fseek(_mp3_track, where, SEEK_SET);
_mc->sound_data.mp3_cdmusic.playing = true;
return true;
}
return false;
}
#endif