/* Copyright (c) 2013-2016 Jeffrey Pfau * * This Source Code Form is subject to the terms of the Mozilla Public * License, v. 2.0. If a copy of the MPL was not distributed with this * file, You can obtain one at http://mozilla.org/MPL/2.0/. */ #include #include #include #include #include #include #include #include #include #define MP2K_LOCK_MAX 8 #ifdef _3DS #define blip_add_delta blip_add_delta_fast #endif mLOG_DEFINE_CATEGORY(GBA_AUDIO, "GBA Audio", "gba.audio"); const unsigned GBA_AUDIO_SAMPLES = 2048; const unsigned GBA_AUDIO_FIFO_SIZE = 8 * sizeof(int32_t); const int GBA_AUDIO_VOLUME_MAX = 0x100; static const int CLOCKS_PER_FRAME = 0x800; static int _applyBias(struct GBAAudio* audio, int sample); static void _sample(struct mTiming* timing, void* user, uint32_t cyclesLate); void GBAAudioInit(struct GBAAudio* audio, size_t samples) { audio->sampleEvent.context = audio; audio->sampleEvent.name = "GBA Audio Sample"; audio->sampleEvent.callback = _sample; audio->sampleEvent.priority = 0x18; audio->psg.p = NULL; uint8_t* nr52 = (uint8_t*) &audio->p->memory.io[REG_SOUNDCNT_X >> 1]; #ifdef __BIG_ENDIAN__ ++nr52; #endif GBAudioInit(&audio->psg, 0, nr52, GB_AUDIO_GBA); audio->psg.timing = &audio->p->timing; audio->psg.clockRate = GBA_ARM7TDMI_FREQUENCY; audio->samples = samples; // Guess too large; we hang producing extra samples if we guess too low blip_set_rates(audio->psg.left, GBA_ARM7TDMI_FREQUENCY, 96000); blip_set_rates(audio->psg.right, GBA_ARM7TDMI_FREQUENCY, 96000); CircleBufferInit(&audio->chA.fifo, GBA_AUDIO_FIFO_SIZE); CircleBufferInit(&audio->chB.fifo, GBA_AUDIO_FIFO_SIZE); audio->externalMixing = false; audio->forceDisableChA = false; audio->forceDisableChB = false; audio->masterVolume = GBA_AUDIO_VOLUME_MAX; audio->mixer = NULL; } void GBAAudioReset(struct GBAAudio* audio) { GBAudioReset(&audio->psg); mTimingDeschedule(&audio->p->timing, &audio->sampleEvent); mTimingSchedule(&audio->p->timing, &audio->sampleEvent, 0); audio->chA.dmaSource = 1; audio->chB.dmaSource = 2; audio->chA.sample = 0; audio->chB.sample = 0; audio->sampleRate = 0x8000; audio->soundbias = 0x200; audio->volume = 0; audio->volumeChA = false; audio->volumeChB = false; audio->chARight = false; audio->chALeft = false; audio->chATimer = false; audio->chBRight = false; audio->chBLeft = false; audio->chBTimer = false; audio->enable = false; audio->sampleInterval = GBA_ARM7TDMI_FREQUENCY / audio->sampleRate; audio->psg.sampleInterval = audio->sampleInterval; blip_clear(audio->psg.left); blip_clear(audio->psg.right); audio->clock = 0; CircleBufferClear(&audio->chA.fifo); CircleBufferClear(&audio->chB.fifo); } void GBAAudioDeinit(struct GBAAudio* audio) { GBAudioDeinit(&audio->psg); CircleBufferDeinit(&audio->chA.fifo); CircleBufferDeinit(&audio->chB.fifo); } void GBAAudioResizeBuffer(struct GBAAudio* audio, size_t samples) { mCoreSyncLockAudio(audio->p->sync); audio->samples = samples; blip_clear(audio->psg.left); blip_clear(audio->psg.right); audio->clock = 0; mCoreSyncConsumeAudio(audio->p->sync); } void GBAAudioScheduleFifoDma(struct GBAAudio* audio, int number, struct GBADMA* info) { info->reg = GBADMARegisterSetDestControl(info->reg, GBA_DMA_FIXED); info->reg = GBADMARegisterSetWidth(info->reg, 1); switch (info->dest) { case BASE_IO | REG_FIFO_A_LO: audio->chA.dmaSource = number; break; case BASE_IO | REG_FIFO_B_LO: audio->chB.dmaSource = number; break; default: mLOG(GBA_AUDIO, GAME_ERROR, "Invalid FIFO destination: 0x%08X", info->dest); return; } uint32_t source = info->source; uint32_t magic[2] = { audio->p->cpu->memory.load32(audio->p->cpu, source - 0x350, NULL), audio->p->cpu->memory.load32(audio->p->cpu, source - 0x980, NULL) }; if (audio->mixer) { if (magic[0] - MP2K_MAGIC <= MP2K_LOCK_MAX) { audio->mixer->engage(audio->mixer, source - 0x350); } else if (magic[1] - MP2K_MAGIC <= MP2K_LOCK_MAX) { audio->mixer->engage(audio->mixer, source - 0x980); } else { audio->externalMixing = false; } } } void GBAAudioWriteSOUND1CNT_LO(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR10(&audio->psg, value); } void GBAAudioWriteSOUND1CNT_HI(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR11(&audio->psg, value); GBAudioWriteNR12(&audio->psg, value >> 8); } void GBAAudioWriteSOUND1CNT_X(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR13(&audio->psg, value); GBAudioWriteNR14(&audio->psg, value >> 8); } void GBAAudioWriteSOUND2CNT_LO(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR21(&audio->psg, value); GBAudioWriteNR22(&audio->psg, value >> 8); } void GBAAudioWriteSOUND2CNT_HI(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR23(&audio->psg, value); GBAudioWriteNR24(&audio->psg, value >> 8); } void GBAAudioWriteSOUND3CNT_LO(struct GBAAudio* audio, uint16_t value) { audio->psg.ch3.size = GBAudioRegisterBankGetSize(value); audio->psg.ch3.bank = GBAudioRegisterBankGetBank(value); GBAudioWriteNR30(&audio->psg, value); } void GBAAudioWriteSOUND3CNT_HI(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR31(&audio->psg, value); audio->psg.ch3.volume = GBAudioRegisterBankVolumeGetVolumeGBA(value >> 8); } void GBAAudioWriteSOUND3CNT_X(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR33(&audio->psg, value); GBAudioWriteNR34(&audio->psg, value >> 8); } void GBAAudioWriteSOUND4CNT_LO(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR41(&audio->psg, value); GBAudioWriteNR42(&audio->psg, value >> 8); } void GBAAudioWriteSOUND4CNT_HI(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR43(&audio->psg, value); GBAudioWriteNR44(&audio->psg, value >> 8); } void GBAAudioWriteSOUNDCNT_LO(struct GBAAudio* audio, uint16_t value) { GBAudioWriteNR50(&audio->psg, value); GBAudioWriteNR51(&audio->psg, value >> 8); } void GBAAudioWriteSOUNDCNT_HI(struct GBAAudio* audio, uint16_t value) { audio->volume = GBARegisterSOUNDCNT_HIGetVolume(value); audio->volumeChA = GBARegisterSOUNDCNT_HIGetVolumeChA(value); audio->volumeChB = GBARegisterSOUNDCNT_HIGetVolumeChB(value); audio->chARight = GBARegisterSOUNDCNT_HIGetChARight(value); audio->chALeft = GBARegisterSOUNDCNT_HIGetChALeft(value); audio->chATimer = GBARegisterSOUNDCNT_HIGetChATimer(value); audio->chBRight = GBARegisterSOUNDCNT_HIGetChBRight(value); audio->chBLeft = GBARegisterSOUNDCNT_HIGetChBLeft(value); audio->chBTimer = GBARegisterSOUNDCNT_HIGetChBTimer(value); if (GBARegisterSOUNDCNT_HIIsChAReset(value)) { CircleBufferClear(&audio->chA.fifo); } if (GBARegisterSOUNDCNT_HIIsChBReset(value)) { CircleBufferClear(&audio->chB.fifo); } } void GBAAudioWriteSOUNDCNT_X(struct GBAAudio* audio, uint16_t value) { audio->enable = GBAudioEnableGetEnable(value); GBAudioWriteNR52(&audio->psg, value); } void GBAAudioWriteSOUNDBIAS(struct GBAAudio* audio, uint16_t value) { audio->soundbias = value; } void GBAAudioWriteWaveRAM(struct GBAAudio* audio, int address, uint32_t value) { audio->psg.ch3.wavedata32[address | (!audio->psg.ch3.bank * 4)] = value; } void GBAAudioWriteFIFO(struct GBAAudio* audio, int address, uint32_t value) { struct CircleBuffer* fifo; switch (address) { case REG_FIFO_A_LO: fifo = &audio->chA.fifo; break; case REG_FIFO_B_LO: fifo = &audio->chB.fifo; break; default: mLOG(GBA_AUDIO, ERROR, "Bad FIFO write to address 0x%03x", address); return; } int i; for (i = 0; i < 4; ++i) { while (!CircleBufferWrite8(fifo, value >> (8 * i))) { int8_t dummy; CircleBufferRead8(fifo, &dummy); } } } void GBAAudioSampleFIFO(struct GBAAudio* audio, int fifoId, int32_t cycles) { struct GBAAudioFIFO* channel; if (fifoId == 0) { channel = &audio->chA; } else if (fifoId == 1) { channel = &audio->chB; } else { mLOG(GBA_AUDIO, ERROR, "Bad FIFO write to address 0x%03x", fifoId); return; } if (CircleBufferSize(&channel->fifo) <= 4 * sizeof(int32_t) && channel->dmaSource > 0) { struct GBADMA* dma = &audio->p->memory.dma[channel->dmaSource]; if (GBADMARegisterGetTiming(dma->reg) == GBA_DMA_TIMING_CUSTOM) { dma->when = mTimingCurrentTime(&audio->p->timing) - cycles; dma->nextCount = 4; GBADMASchedule(audio->p, channel->dmaSource, dma); } else { channel->dmaSource = 0; } } CircleBufferRead8(&channel->fifo, (int8_t*) &channel->sample); } static int _applyBias(struct GBAAudio* audio, int sample) { sample += GBARegisterSOUNDBIASGetBias(audio->soundbias); if (sample >= 0x400) { sample = 0x3FF; } else if (sample < 0) { sample = 0; } return ((sample - GBARegisterSOUNDBIASGetBias(audio->soundbias)) * audio->masterVolume * 3) >> 4; } static void _sample(struct mTiming* timing, void* user, uint32_t cyclesLate) { struct GBAAudio* audio = user; int16_t sampleLeft = 0; int16_t sampleRight = 0; int psgShift = 4 - audio->volume; GBAudioSamplePSG(&audio->psg, &sampleLeft, &sampleRight); sampleLeft >>= psgShift; sampleRight >>= psgShift; if (audio->mixer) { audio->mixer->step(audio->mixer); } if (!audio->externalMixing) { if (!audio->forceDisableChA) { if (audio->chALeft) { sampleLeft += (audio->chA.sample << 2) >> !audio->volumeChA; } if (audio->chARight) { sampleRight += (audio->chA.sample << 2) >> !audio->volumeChA; } } if (!audio->forceDisableChB) { if (audio->chBLeft) { sampleLeft += (audio->chB.sample << 2) >> !audio->volumeChB; } if (audio->chBRight) { sampleRight += (audio->chB.sample << 2) >> !audio->volumeChB; } } } sampleLeft = _applyBias(audio, sampleLeft); sampleRight = _applyBias(audio, sampleRight); mCoreSyncLockAudio(audio->p->sync); unsigned produced; if ((size_t) blip_samples_avail(audio->psg.left) < audio->samples) { blip_add_delta(audio->psg.left, audio->clock, sampleLeft - audio->lastLeft); blip_add_delta(audio->psg.right, audio->clock, sampleRight - audio->lastRight); audio->lastLeft = sampleLeft; audio->lastRight = sampleRight; audio->clock += audio->sampleInterval; if (audio->clock >= CLOCKS_PER_FRAME) { blip_end_frame(audio->psg.left, CLOCKS_PER_FRAME); blip_end_frame(audio->psg.right, CLOCKS_PER_FRAME); audio->clock -= CLOCKS_PER_FRAME; } } produced = blip_samples_avail(audio->psg.left); if (audio->p->stream && audio->p->stream->postAudioFrame) { audio->p->stream->postAudioFrame(audio->p->stream, sampleLeft, sampleRight); } bool wait = produced >= audio->samples; if (!mCoreSyncProduceAudio(audio->p->sync, audio->psg.left, audio->samples)) { // Interrupted audio->p->earlyExit = true; } if (wait && audio->p->stream && audio->p->stream->postAudioBuffer) { audio->p->stream->postAudioBuffer(audio->p->stream, audio->psg.left, audio->psg.right); } mTimingSchedule(timing, &audio->sampleEvent, audio->sampleInterval - cyclesLate); } void GBAAudioSerialize(const struct GBAAudio* audio, struct GBASerializedState* state) { GBAudioPSGSerialize(&audio->psg, &state->audio.psg, &state->audio.flags); CircleBufferDump(&audio->chA.fifo, state->audio.fifoA, sizeof(state->audio.fifoA)); CircleBufferDump(&audio->chB.fifo, state->audio.fifoB, sizeof(state->audio.fifoB)); uint32_t fifoSize = CircleBufferSize(&audio->chA.fifo); STORE_32(fifoSize, 0, &state->audio.fifoSizeA); fifoSize = CircleBufferSize(&audio->chB.fifo); STORE_32(fifoSize, 0, &state->audio.fifoSizeB); STORE_32(audio->sampleEvent.when - mTimingCurrentTime(&audio->p->timing), 0, &state->audio.nextSample); } void GBAAudioDeserialize(struct GBAAudio* audio, const struct GBASerializedState* state) { GBAudioPSGDeserialize(&audio->psg, &state->audio.psg, &state->audio.flags); CircleBufferClear(&audio->chA.fifo); CircleBufferClear(&audio->chB.fifo); uint32_t fifoSize; LOAD_32(fifoSize, 0, &state->audio.fifoSizeA); if (fifoSize > CircleBufferCapacity(&audio->chA.fifo)) { fifoSize = CircleBufferCapacity(&audio->chA.fifo); } size_t i; for (i = 0; i < fifoSize; ++i) { CircleBufferWrite8(&audio->chA.fifo, state->audio.fifoA[i]); } LOAD_32(fifoSize, 0, &state->audio.fifoSizeB); if (fifoSize > CircleBufferCapacity(&audio->chB.fifo)) { fifoSize = CircleBufferCapacity(&audio->chB.fifo); } for (i = 0; i < fifoSize; ++i) { CircleBufferWrite8(&audio->chB.fifo, state->audio.fifoB[i]); } uint32_t when; LOAD_32(when, 0, &state->audio.nextSample); mTimingSchedule(&audio->p->timing, &audio->sampleEvent, when); } float GBAAudioCalculateRatio(float inputSampleRate, float desiredFPS, float desiredSampleRate) { return desiredSampleRate * GBA_ARM7TDMI_FREQUENCY / (VIDEO_TOTAL_LENGTH * desiredFPS * inputSampleRate); }