mirror of
https://github.com/libretro/scummvm.git
synced 2024-12-26 11:46:54 +00:00
348 lines
9.1 KiB
C++
348 lines
9.1 KiB
C++
/* ScummVM - Scumm Interpreter
|
|
* Copyright (C) 2002-2006 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
*
|
|
* $URL$
|
|
* $Id$
|
|
*
|
|
*/
|
|
|
|
#include "common/stdafx.h"
|
|
#include "scumm/scumm.h"
|
|
#include "scumm/smush/channel.h"
|
|
#include "scumm/smush/chunk.h"
|
|
#include "scumm/smush/chunk_type.h"
|
|
|
|
namespace Scumm {
|
|
|
|
ImuseChannel::ImuseChannel(int32 track, int32 freq) :
|
|
_track(track),
|
|
_tbuffer(0),
|
|
_tbufferSize(0),
|
|
_sbuffer(0),
|
|
_sbufferSize(0),
|
|
_frequency(freq),
|
|
_dataSize(-1),
|
|
_inData(false) {
|
|
}
|
|
|
|
ImuseChannel::~ImuseChannel() {
|
|
if (_tbuffer) {
|
|
delete []_tbuffer;
|
|
}
|
|
if (_sbuffer) {
|
|
warning("_sbuffer should be 0 !!!");
|
|
delete []_sbuffer;
|
|
}
|
|
}
|
|
|
|
bool ImuseChannel::isTerminated() const {
|
|
return (_dataSize <= 0 && _sbuffer == 0);
|
|
}
|
|
|
|
bool ImuseChannel::setParameters(int32 nb, int32 size, int32 flags, int32 unk1, int32) {
|
|
if ((flags == 1) || (flags == 2) || (flags == 3)) {
|
|
_volume = 127;
|
|
} else if ((flags >= 100) && (flags <= 163)) {
|
|
_volume = flags * 2 - 200;
|
|
} else if ((flags >= 200) && (flags <= 263)) {
|
|
_volume = flags * 2 - 400;
|
|
} else if ((flags >= 300) && (flags <= 363)) {
|
|
_volume = flags * 2 - 600;
|
|
} else {
|
|
error("ImuseChannel::setParameters(): bad flags: %d", flags);
|
|
}
|
|
_pan = 0;
|
|
return true;
|
|
}
|
|
|
|
bool ImuseChannel::checkParameters(int32 index, int32 nbframes, int32 size, int32 track_flags, int32 unk1) {
|
|
return true;
|
|
}
|
|
|
|
bool ImuseChannel::appendData(Chunk &b, int32 size) {
|
|
if (_dataSize == -1) {
|
|
assert(size > 8);
|
|
Chunk::type imus_type = b.getDword(); imus_type = SWAP_BYTES_32(imus_type);
|
|
uint32 imus_size = b.getDword(); imus_size = SWAP_BYTES_32(imus_size);
|
|
if (imus_type != TYPE_iMUS)
|
|
error("Invalid Chunk for imuse_channel");
|
|
size -= 8;
|
|
_tbufferSize = size;
|
|
assert(_tbufferSize);
|
|
_tbuffer = new byte[_tbufferSize];
|
|
if (!_tbuffer)
|
|
error("imuse_channel failed to allocate memory");
|
|
b.read(_tbuffer, size);
|
|
_dataSize = -2;
|
|
} else {
|
|
if (_tbuffer) {
|
|
byte *old = _tbuffer;
|
|
int32 new_size = size + _tbufferSize;
|
|
_tbuffer = new byte[new_size];
|
|
if (!_tbuffer)
|
|
error("imuse_channel failed to allocate memory");
|
|
memcpy(_tbuffer, old, _tbufferSize);
|
|
delete []old;
|
|
b.read(_tbuffer + _tbufferSize, size);
|
|
_tbufferSize += size;
|
|
} else {
|
|
_tbufferSize = size;
|
|
_tbuffer = new byte[_tbufferSize];
|
|
if (!_tbuffer)
|
|
error("imuse_channel failed to allocate memory");
|
|
b.read(_tbuffer, size);
|
|
}
|
|
}
|
|
return processBuffer();
|
|
}
|
|
|
|
bool ImuseChannel::handleFormat(Chunk &src) {
|
|
if (src.getSize() != 20) error("invalid size for FRMT Chunk");
|
|
uint32 imuse_start = src.getDword();
|
|
imuse_start = SWAP_BYTES_32(imuse_start);
|
|
src.seek(4);
|
|
_bitsize = src.getDword();
|
|
_bitsize = SWAP_BYTES_32(_bitsize);
|
|
_rate = src.getDword();
|
|
_rate = SWAP_BYTES_32(_rate);
|
|
_channels = src.getDword();
|
|
_channels = SWAP_BYTES_32(_channels);
|
|
assert(_channels == 1 || _channels == 2);
|
|
return true;
|
|
}
|
|
|
|
bool ImuseChannel::handleRegion(Chunk &src) {
|
|
if (src.getSize() != 8)
|
|
error("invalid size for REGN Chunk");
|
|
return true;
|
|
}
|
|
|
|
bool ImuseChannel::handleStop(Chunk &src) {
|
|
if (src.getSize() != 4)
|
|
error("invalid size for STOP Chunk");
|
|
return true;
|
|
}
|
|
|
|
bool ImuseChannel::handleMap(Chunk &map) {
|
|
while (!map.eof()) {
|
|
Chunk *sub = map.subBlock();
|
|
switch(sub->getType()) {
|
|
case TYPE_FRMT:
|
|
handleFormat(*sub);
|
|
break;
|
|
case TYPE_TEXT:
|
|
break;
|
|
case TYPE_REGN:
|
|
handleRegion(*sub);
|
|
break;
|
|
case TYPE_STOP:
|
|
handleStop(*sub);
|
|
break;
|
|
default:
|
|
error("Unknown iMUS subChunk found : %s, %d", Chunk::ChunkString(sub->getType()), sub->getSize());
|
|
}
|
|
delete sub;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
void ImuseChannel::decode() {
|
|
int remaining_size = _sbufferSize % 3;
|
|
if (remaining_size) {
|
|
_srbufferSize -= remaining_size;
|
|
assert(_inData);
|
|
if (_tbuffer == 0) {
|
|
_tbuffer = new byte[remaining_size];
|
|
memcpy(_tbuffer, _sbuffer + _sbufferSize - remaining_size, remaining_size);
|
|
_tbufferSize = remaining_size;
|
|
_sbufferSize -= remaining_size;
|
|
} else {
|
|
debugC(DEBUG_SMUSH, "impossible ! : %p, %d, %d, %p(%d), %p(%d, %d)",
|
|
this, _dataSize, _inData, _tbuffer, _tbufferSize, _sbuffer, _sbufferSize, _srbufferSize);
|
|
byte *old = _tbuffer;
|
|
int new_size = remaining_size + _tbufferSize;
|
|
_tbuffer = new byte[new_size];
|
|
if (!_tbuffer) error("imuse_channel failed to allocate memory");
|
|
memcpy(_tbuffer, old, _tbufferSize);
|
|
delete []old;
|
|
memcpy(_tbuffer + _tbufferSize, _sbuffer + _sbufferSize - remaining_size, remaining_size);
|
|
_tbufferSize += remaining_size;
|
|
}
|
|
}
|
|
|
|
// FIXME: Code duplication! See decode12BitsSample() in scumm/imuse_digi.cpp
|
|
|
|
int loop_size = _sbufferSize / 3;
|
|
int new_size = loop_size * 4;
|
|
byte *keep, *decoded;
|
|
uint32 value;
|
|
keep = decoded = new byte[new_size];
|
|
assert(keep);
|
|
unsigned char * source = _sbuffer;
|
|
|
|
while (loop_size--) {
|
|
byte v1 = *source++;
|
|
byte v2 = *source++;
|
|
byte v3 = *source++;
|
|
value = ((((v2 & 0x0f) << 8) | v1) << 4) - 0x8000;
|
|
WRITE_BE_UINT16(decoded, value); decoded += 2;
|
|
value = ((((v2 & 0xf0) << 4) | v3) << 4) - 0x8000;
|
|
WRITE_BE_UINT16(decoded, value); decoded += 2;
|
|
}
|
|
delete []_sbuffer;
|
|
_sbuffer = (byte *)keep;
|
|
_sbufferSize = new_size;
|
|
}
|
|
|
|
bool ImuseChannel::handleSubTags(int32 &offset) {
|
|
if (_tbufferSize - offset >= 8) {
|
|
Chunk::type type = READ_BE_UINT32(_tbuffer + offset);
|
|
uint32 size = READ_BE_UINT32(_tbuffer + offset + 4);
|
|
uint32 available_size = _tbufferSize - offset;
|
|
switch(type) {
|
|
case TYPE_MAP_:
|
|
_inData = false;
|
|
if (available_size >= (size + 8)) {
|
|
MemoryChunk c((byte *)_tbuffer + offset);
|
|
handleMap(c);
|
|
}
|
|
break;
|
|
case TYPE_DATA:
|
|
_inData = true;
|
|
_dataSize = size;
|
|
offset += 8;
|
|
{
|
|
int reqsize = 1;
|
|
if (_channels == 2)
|
|
reqsize *= 2;
|
|
if (_bitsize == 16)
|
|
reqsize *= 2;
|
|
else if (_bitsize == 12) {
|
|
if (reqsize > 1)
|
|
reqsize = reqsize * 3 / 2;
|
|
else reqsize = 3;
|
|
}
|
|
if ((size % reqsize) != 0) {
|
|
debugC(DEBUG_SMUSH, "Invalid iMUS sound data size : (%d %% %d) != 0, correcting...", size, reqsize);
|
|
size += 3 - (size % reqsize);
|
|
}
|
|
}
|
|
return false;
|
|
default:
|
|
error("unknown Chunk in iMUS track : %s ", Chunk::ChunkString(type));
|
|
}
|
|
offset += size + 8;
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
bool ImuseChannel::processBuffer() {
|
|
assert(_tbuffer != 0);
|
|
assert(_tbufferSize != 0);
|
|
assert(_sbuffer == 0);
|
|
assert(_sbufferSize == 0);
|
|
|
|
if (_inData) {
|
|
if (_dataSize < _tbufferSize) {
|
|
int32 offset= _dataSize;
|
|
while (handleSubTags(offset));
|
|
_sbufferSize = _dataSize;
|
|
_sbuffer = _tbuffer;
|
|
if (offset < _tbufferSize) {
|
|
int32 new_size = _tbufferSize - offset;
|
|
_tbuffer = new byte[new_size];
|
|
if (!_tbuffer) error("imuse_channel failed to allocate memory");
|
|
memcpy(_tbuffer, _sbuffer + offset, new_size);
|
|
_tbufferSize = new_size;
|
|
} else {
|
|
_tbuffer = 0;
|
|
_tbufferSize = 0;
|
|
}
|
|
if (_sbufferSize == 0) {
|
|
delete []_sbuffer;
|
|
_sbuffer = 0;
|
|
}
|
|
} else {
|
|
_sbufferSize = _tbufferSize;
|
|
_sbuffer = _tbuffer;
|
|
_tbufferSize = 0;
|
|
_tbuffer = 0;
|
|
}
|
|
} else {
|
|
int32 offset = 0;
|
|
while (handleSubTags(offset));
|
|
if (_inData) {
|
|
_sbufferSize = _tbufferSize - offset;
|
|
assert(_sbufferSize);
|
|
_sbuffer = new byte[_sbufferSize];
|
|
if (!_sbuffer) error("imuse_channel failed to allocate memory");
|
|
memcpy(_sbuffer, _tbuffer + offset, _sbufferSize);
|
|
delete []_tbuffer;
|
|
_tbuffer = 0;
|
|
_tbufferSize = 0;
|
|
} else {
|
|
if (offset) {
|
|
byte * old = _tbuffer;
|
|
int32 new_size = _tbufferSize - offset;
|
|
_tbuffer = new byte[new_size];
|
|
if (!_tbuffer) error("imuse_channel failed to allocate memory");
|
|
memcpy(_tbuffer, old + offset, new_size);
|
|
_tbufferSize = new_size;
|
|
delete []old;
|
|
}
|
|
}
|
|
}
|
|
_srbufferSize = _sbufferSize;
|
|
if (_sbuffer && _bitsize == 12) decode();
|
|
return true;
|
|
}
|
|
|
|
int32 ImuseChannel::availableSoundData(void) const {
|
|
int32 ret = _sbufferSize;
|
|
if (_channels == 2) ret /= 2;
|
|
if (_bitsize > 8) ret /= 2;
|
|
return ret;
|
|
}
|
|
|
|
void ImuseChannel::getSoundData(int16 *snd, int32 size) {
|
|
if (_dataSize <= 0 || _bitsize <= 8) error("invalid call to imuse_channel::read_sound_data()");
|
|
if (_channels == 2) size *= 2;
|
|
|
|
memcpy(snd, _sbuffer, size * 2);
|
|
|
|
delete []_sbuffer;
|
|
assert(_sbufferSize == 2 * size);
|
|
_sbuffer = 0;
|
|
_sbufferSize = 0;
|
|
_dataSize -= _srbufferSize;
|
|
}
|
|
|
|
void ImuseChannel::getSoundData(int8 *snd, int32 size) {
|
|
if (_dataSize <= 0 || _bitsize > 8) error("invalid call to imuse_channel::read_sound_data()");
|
|
if (_channels == 2) size *= 2;
|
|
|
|
memcpy(snd, _sbuffer, size);
|
|
|
|
delete []_sbuffer;
|
|
_sbuffer = 0;
|
|
_sbufferSize = 0;
|
|
_dataSize -= _srbufferSize;
|
|
}
|
|
|
|
} // End of namespace Scumm
|