mirror of
https://github.com/libretro/scummvm.git
synced 2025-03-05 01:38:36 +00:00
Add support for samples > 32kb to Paula chip emulation code.
In addition, the code got simplified considerably. Its behavior changed slightly due to this, but I think the old behavior was wrong. In any case, this may fix some bugs, or introduce regressions, or both. We'll see ;). svn-id: r48058
This commit is contained in:
parent
b7ae950130
commit
dd5518d3c5
@ -57,7 +57,7 @@ void Paula::clearVoice(byte voice) {
|
||||
_voice[voice].lengthRepeat = 0;
|
||||
_voice[voice].period = 0;
|
||||
_voice[voice].volume = 0;
|
||||
_voice[voice].offset = 0;
|
||||
_voice[voice].offset = Offset(0);
|
||||
_voice[voice].dmaCount = 0;
|
||||
}
|
||||
|
||||
@ -77,17 +77,25 @@ int Paula::readBuffer(int16 *buffer, const int numSamples) {
|
||||
|
||||
|
||||
template<bool stereo>
|
||||
inline void mixBuffer(int16 *&buf, const int8 *data, frac_t &offset, frac_t rate, int end, byte volume, byte panning) {
|
||||
for (int i = 0; i < end; i++) {
|
||||
const int32 tmp = ((int32) data[fracToInt(offset)]) * volume;
|
||||
inline int mixBuffer(int16 *&buf, const int8 *data, Paula::Offset &offset, frac_t rate, int neededSamples, uint bufSize, byte volume, byte panning) {
|
||||
int samples;
|
||||
for (samples = 0; samples < neededSamples && offset.int_off < bufSize; ++samples) {
|
||||
const int32 tmp = ((int32) data[offset.int_off]) * volume;
|
||||
if (stereo) {
|
||||
*buf++ += (tmp * (255 - panning)) >> 7;
|
||||
*buf++ += (tmp * (panning)) >> 7;
|
||||
} else
|
||||
*buf++ += tmp;
|
||||
|
||||
offset += rate;
|
||||
// Step to next source sample
|
||||
offset.rem_off += rate;
|
||||
if (offset.rem_off >= FRAC_ONE) {
|
||||
offset.int_off += fracToInt(offset.rem_off);
|
||||
offset.rem_off &= FRAC_LO_MASK;
|
||||
}
|
||||
}
|
||||
|
||||
return samples;
|
||||
}
|
||||
|
||||
template<bool stereo>
|
||||
@ -112,78 +120,55 @@ int Paula::readBufferIntern(int16 *buffer, const int numSamples) {
|
||||
if (!_voice[voice].data || (_voice[voice].period <= 0))
|
||||
continue;
|
||||
|
||||
// The Paula chip apparently run at 7.0937892 MHz. We combine this with
|
||||
// the requested output sampling rate (typicall 44.1 kHz or 22.05 kHz)
|
||||
// as well as the "period" of the channel we are processing right now,
|
||||
// to compute the correct output 'rate'.
|
||||
// The Paula chip apparently run at 7.0937892 MHz in the PAL
|
||||
// version and at 7.1590905 MHz in the NTSC version. We divide this
|
||||
// by the requested the requested output sampling rate _rate
|
||||
// (typically 44.1 kHz or 22.05 kHz) obtaining the value _periodScale.
|
||||
// This is then divided by the "period" of the channel we are
|
||||
// processing, to obtain the correct output 'rate'.
|
||||
frac_t rate = doubleToFrac(_periodScale / _voice[voice].period);
|
||||
|
||||
// Cap the volume
|
||||
_voice[voice].volume = MIN((byte) 0x40, _voice[voice].volume);
|
||||
|
||||
// Cache some data (helps the compiler to optimize the code, by
|
||||
// indirectly telling it that no data aliasing can occur).
|
||||
frac_t offset = _voice[voice].offset;
|
||||
frac_t sLen = intToFrac(_voice[voice].length);
|
||||
const int8 *data = _voice[voice].data;
|
||||
int dmaCount = _voice[voice].dmaCount;
|
||||
|
||||
Channel &ch = _voice[voice];
|
||||
int16 *p = buffer;
|
||||
int end = 0;
|
||||
int neededSamples = nSamples;
|
||||
assert(offset < sLen);
|
||||
assert(ch.offset.int_off < ch.length);
|
||||
|
||||
// Compute the number of samples to generate; that is, either generate
|
||||
// just as many as were requested, or until the buffer is used up.
|
||||
// Note that dividing two frac_t yields an integer (as the denominators
|
||||
// cancel out each other).
|
||||
// Note that 'end' could be 0 here. No harm in that :-).
|
||||
const int leftSamples = (int)((sLen - offset + rate - 1) / rate);
|
||||
end = MIN(neededSamples, leftSamples);
|
||||
mixBuffer<stereo>(p, data, offset, rate, end, _voice[voice].volume, _voice[voice].panning);
|
||||
neededSamples -= end;
|
||||
// Mix the generated samples into the output buffer
|
||||
neededSamples -= mixBuffer<stereo>(p, ch.data, ch.offset, rate, neededSamples, ch.length, ch.volume, ch.panning);
|
||||
|
||||
if (leftSamples > 0 && end == leftSamples) {
|
||||
dmaCount++;
|
||||
data = _voice[voice].data = _voice[voice].dataRepeat;
|
||||
_voice[voice].length = _voice[voice].lengthRepeat;
|
||||
// TODO: offset -= sLen; but make sure there is no way offset >= 2*sLen
|
||||
offset &= FRAC_LO_MASK;
|
||||
// Wrap around if necessary
|
||||
if (ch.offset.int_off >= ch.length) {
|
||||
// Important: Wrap around the offset *before* updating the voice length.
|
||||
// Otherwise, if length != lengthRepeat we would wrap incorrectly.
|
||||
// Note: If offset >= 2*len ever occurs, the following would be wrong;
|
||||
// instead of subtracting, we then should compute the modulus using "%=".
|
||||
// Since that requires a division and is slow, and shouldn't be necessary
|
||||
// in practice anyway, we only use subtraction.
|
||||
ch.offset.int_off -= ch.length;
|
||||
ch.dmaCount++;
|
||||
|
||||
ch.data = ch.dataRepeat;
|
||||
ch.length = ch.lengthRepeat;
|
||||
}
|
||||
|
||||
// If we have not yet generated enough samples, and looping is active: loop!
|
||||
if (neededSamples > 0 && _voice[voice].length > 2) {
|
||||
sLen = intToFrac(_voice[voice].length);
|
||||
|
||||
// If the "rate" exceeds the sample rate, we would have to perform constant
|
||||
// wrap arounds. So, apply the first step of the euclidean algorithm to
|
||||
// achieve the same more efficiently: Take rate modulo sLen
|
||||
// TODO: This messes up dmaCount and shouldnt happen?
|
||||
if (sLen < rate)
|
||||
warning("Paula: length %d is lesser than rate", _voice[voice].length);
|
||||
// rate %= sLen;
|
||||
|
||||
if (neededSamples > 0 && ch.length > 2) {
|
||||
// Repeat as long as necessary.
|
||||
while (neededSamples > 0) {
|
||||
// TODO: offset -= sLen; but make sure there is no way offset >= 2*sLen
|
||||
offset &= FRAC_LO_MASK;
|
||||
dmaCount++;
|
||||
// Compute the number of samples to generate (see above) and mix 'em.
|
||||
end = MIN(neededSamples, (int)((sLen - offset + rate - 1) / rate));
|
||||
mixBuffer<stereo>(p, data, offset, rate, end, _voice[voice].volume, _voice[voice].panning);
|
||||
neededSamples -= end;
|
||||
// Mix the generated samples into the output buffer
|
||||
neededSamples -= mixBuffer<stereo>(p, ch.data, ch.offset, rate, neededSamples, ch.length, ch.volume, ch.panning);
|
||||
|
||||
if (ch.offset.int_off >= ch.length) {
|
||||
// Wrap around. See also the note above.
|
||||
ch.offset.int_off -= ch.length;
|
||||
ch.dmaCount++;
|
||||
}
|
||||
}
|
||||
|
||||
if (offset < sLen)
|
||||
dmaCount--;
|
||||
else
|
||||
offset &= FRAC_LO_MASK;
|
||||
|
||||
}
|
||||
|
||||
// Write back the cached data
|
||||
_voice[voice].offset = offset;
|
||||
_voice[voice].dmaCount = dmaCount;
|
||||
|
||||
}
|
||||
buffer += _stereo ? nSamples * 2 : nSamples;
|
||||
_curInt -= nSamples;
|
||||
|
@ -49,6 +49,14 @@ public:
|
||||
kNtscPauleClock = kNtscSystemClock / 2
|
||||
};
|
||||
|
||||
/* TODO: Document this */
|
||||
struct Offset {
|
||||
uint int_off; // integral part of the offset
|
||||
frac_t rem_off; // fractional part of the offset, at least 0 and less than 1
|
||||
|
||||
explicit Offset(int off = 0) : int_off(off), rem_off(0) {}
|
||||
};
|
||||
|
||||
Paula(bool stereo = false, int rate = 44100, uint interruptFreq = 0);
|
||||
~Paula();
|
||||
|
||||
@ -83,7 +91,7 @@ protected:
|
||||
uint32 lengthRepeat;
|
||||
int16 period;
|
||||
byte volume;
|
||||
frac_t offset;
|
||||
Offset offset;
|
||||
byte panning; // For stereo mixing: 0 = far left, 255 = far right
|
||||
int dmaCount;
|
||||
};
|
||||
@ -119,7 +127,7 @@ protected:
|
||||
ch.data = ch.dataRepeat;
|
||||
ch.length = ch.lengthRepeat;
|
||||
// actually first 2 bytes are dropped?
|
||||
ch.offset = intToFrac(0);
|
||||
ch.offset = Offset(0);
|
||||
// ch.period = ch.periodRepeat;
|
||||
}
|
||||
|
||||
@ -147,30 +155,23 @@ protected:
|
||||
void setChannelData(uint8 channel, const int8 *data, const int8 *dataRepeat, uint32 length, uint32 lengthRepeat, int32 offset = 0) {
|
||||
assert(channel < NUM_VOICES);
|
||||
|
||||
// For now, we only support 32k samples, as we use 16bit fixed point arithmetics.
|
||||
// If this ever turns out to be a problem, we can still enhance this code.
|
||||
assert(0 <= offset && offset < 32768);
|
||||
assert(length < 32768);
|
||||
assert(lengthRepeat < 32768);
|
||||
|
||||
Channel &ch = _voice[channel];
|
||||
|
||||
ch.dataRepeat = data;
|
||||
ch.lengthRepeat = length;
|
||||
enableChannel(channel);
|
||||
ch.offset = intToFrac(offset);
|
||||
ch.offset = Offset(offset);
|
||||
|
||||
ch.dataRepeat = dataRepeat;
|
||||
ch.lengthRepeat = lengthRepeat;
|
||||
}
|
||||
|
||||
void setChannelOffset(byte channel, frac_t offset) {
|
||||
void setChannelOffset(byte channel, Offset offset) {
|
||||
assert(channel < NUM_VOICES);
|
||||
assert(0 <= offset);
|
||||
_voice[channel].offset = offset;
|
||||
}
|
||||
|
||||
frac_t getChannelOffset(byte channel) {
|
||||
Offset getChannelOffset(byte channel) {
|
||||
assert(channel < NUM_VOICES);
|
||||
return _voice[channel].offset;
|
||||
}
|
||||
|
@ -63,7 +63,7 @@ private:
|
||||
struct {
|
||||
byte sample;
|
||||
uint16 period;
|
||||
frac_t offset;
|
||||
Offset offset;
|
||||
|
||||
byte vol;
|
||||
byte finetune;
|
||||
@ -195,7 +195,7 @@ void ProtrackerStream::updateRow() {
|
||||
_track[track].period = _module.noteToPeriod(note.note, _track[track].finetune);
|
||||
else
|
||||
_track[track].period = note.period;
|
||||
_track[track].offset = 0;
|
||||
_track[track].offset = Offset(0);
|
||||
}
|
||||
}
|
||||
|
||||
@ -241,7 +241,7 @@ void ProtrackerStream::updateRow() {
|
||||
break;
|
||||
case 0x9: // Set sample offset
|
||||
if (exy) {
|
||||
_track[track].offset = intToFrac(exy * 256);
|
||||
_track[track].offset = Offset(exy * 256);
|
||||
setChannelOffset(track, _track[track].offset);
|
||||
}
|
||||
break;
|
||||
@ -382,12 +382,12 @@ void ProtrackerStream::updateEffects() {
|
||||
break; // Pattern loop
|
||||
case 0x9: // Retrigger note
|
||||
if (ey && (_tick % ey) == 0)
|
||||
_track[track].offset = 0;
|
||||
_track[track].offset = Offset(0);
|
||||
break;
|
||||
case 0xD: // Delay sample
|
||||
if (_tick == _track[track].delaySampleTick) {
|
||||
_track[track].sample = _track[track].delaySample;
|
||||
_track[track].offset = 0;
|
||||
_track[track].offset = Offset(0);
|
||||
if (_track[track].sample)
|
||||
_track[track].vol = _module.sample[_track[track].sample - 1].vol;
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user