2007-05-29 03:06:33 +00:00
|
|
|
//
|
|
|
|
// Sound Interface
|
|
|
|
//
|
2013-09-28 23:15:54 +00:00
|
|
|
// by James Hammons
|
2007-05-29 03:06:33 +00:00
|
|
|
// (C) 2005 Underground Software
|
|
|
|
//
|
2013-09-28 23:15:54 +00:00
|
|
|
// JLH = James Hammons <jlhamm@acm.org>
|
2007-05-29 03:06:33 +00:00
|
|
|
//
|
|
|
|
// WHO WHEN WHAT
|
|
|
|
// --- ---------- ------------------------------------------------------------
|
|
|
|
// JLH 12/02/2005 Fixed a problem with sound callback thread signaling the
|
|
|
|
// main thread
|
|
|
|
// JLH 12/03/2005 Fixed sound callback dropping samples when the sample buffer
|
|
|
|
// is shorter than the callback sample buffer
|
|
|
|
//
|
|
|
|
|
|
|
|
// STILL TO DO:
|
|
|
|
//
|
|
|
|
// - Figure out why it's losing samples (Bard's Tale) [DONE]
|
2013-09-24 14:09:40 +00:00
|
|
|
// - Figure out why it's playing too fast [DONE]
|
2007-05-29 03:06:33 +00:00
|
|
|
//
|
|
|
|
|
|
|
|
#include "sound.h"
|
|
|
|
|
|
|
|
#include <string.h> // For memset, memcpy
|
2013-09-09 02:18:23 +00:00
|
|
|
#include <SDL2/SDL.h>
|
2007-05-29 03:06:33 +00:00
|
|
|
#include "log.h"
|
|
|
|
|
2009-02-16 16:22:33 +00:00
|
|
|
// Useful defines
|
|
|
|
|
|
|
|
//#define DEBUG
|
2009-02-24 15:32:01 +00:00
|
|
|
//#define WRITE_OUT_WAVE
|
2009-01-19 16:09:37 +00:00
|
|
|
|
2009-07-09 01:37:07 +00:00
|
|
|
//#define SAMPLE_RATE (44100.0)
|
|
|
|
#define SAMPLE_RATE (48000.0)
|
2009-01-19 20:00:34 +00:00
|
|
|
#define SAMPLES_PER_FRAME (SAMPLE_RATE / 60.0)
|
2009-07-09 01:37:07 +00:00
|
|
|
#define CYCLES_PER_SAMPLE (1024000.0 / SAMPLE_RATE)
|
2009-02-16 16:22:33 +00:00
|
|
|
//#define SOUND_BUFFER_SIZE (8192)
|
2017-05-18 04:17:17 +00:00
|
|
|
// 32K ought to be enough for anybody
|
2009-02-24 15:32:01 +00:00
|
|
|
#define SOUND_BUFFER_SIZE (32768)
|
2007-05-29 03:06:33 +00:00
|
|
|
|
|
|
|
// Global variables
|
|
|
|
|
|
|
|
|
|
|
|
// Local variables
|
|
|
|
|
2009-07-09 01:37:07 +00:00
|
|
|
static SDL_AudioSpec desired, obtained;
|
2013-09-11 15:00:36 +00:00
|
|
|
static SDL_AudioDeviceID device;
|
2007-05-29 03:06:33 +00:00
|
|
|
static bool soundInitialized = false;
|
2009-01-22 22:12:49 +00:00
|
|
|
static bool speakerState = false;
|
2013-09-09 02:18:23 +00:00
|
|
|
static int16_t soundBuffer[SOUND_BUFFER_SIZE];
|
|
|
|
static uint32_t soundBufferPos;
|
|
|
|
static uint64_t lastToggleCycles;
|
2007-05-29 03:06:33 +00:00
|
|
|
static SDL_cond * conditional = NULL;
|
|
|
|
static SDL_mutex * mutex = NULL;
|
2009-01-22 22:12:49 +00:00
|
|
|
static SDL_mutex * mutex2 = NULL;
|
2013-09-09 02:18:23 +00:00
|
|
|
static int16_t sample;
|
2013-09-11 15:00:36 +00:00
|
|
|
static uint8_t ampPtr = 12; // Start with -2047 - +2047
|
2013-09-09 02:18:23 +00:00
|
|
|
static int16_t amplitude[17] = { 0, 1, 2, 3, 7, 15, 31, 63, 127, 255, 511, 1023, 2047,
|
2009-02-24 15:32:01 +00:00
|
|
|
4095, 8191, 16383, 32767 };
|
|
|
|
#ifdef WRITE_OUT_WAVE
|
|
|
|
static FILE * fp = NULL;
|
|
|
|
#endif
|
2007-05-29 03:06:33 +00:00
|
|
|
|
|
|
|
// Private function prototypes
|
|
|
|
|
|
|
|
static void SDLSoundCallback(void * userdata, Uint8 * buffer, int length);
|
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
|
2007-05-29 03:06:33 +00:00
|
|
|
//
|
|
|
|
// Initialize the SDL sound system
|
|
|
|
//
|
|
|
|
void SoundInit(void)
|
|
|
|
{
|
2009-02-16 16:22:33 +00:00
|
|
|
#if 0
|
2009-01-30 15:17:27 +00:00
|
|
|
// To weed out problems for now...
|
2007-05-29 03:06:33 +00:00
|
|
|
return;
|
|
|
|
#endif
|
2013-09-11 15:00:36 +00:00
|
|
|
SDL_zero(desired);
|
2009-01-19 20:00:34 +00:00
|
|
|
desired.freq = SAMPLE_RATE; // SDL will do conversion on the fly, if it can't get the exact rate. Nice!
|
2009-02-24 15:32:01 +00:00
|
|
|
desired.format = AUDIO_S16SYS; // This uses the native endian (for portability)...
|
2007-05-29 03:06:33 +00:00
|
|
|
desired.channels = 1;
|
2011-10-31 15:43:49 +00:00
|
|
|
desired.samples = 512; // Let's try a 1/2K buffer (can always go lower)
|
2007-05-29 03:06:33 +00:00
|
|
|
desired.callback = SDLSoundCallback;
|
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
device = SDL_OpenAudioDevice(NULL, 0, &desired, &obtained, 0);
|
|
|
|
|
|
|
|
if (device == 0)
|
2007-05-29 03:06:33 +00:00
|
|
|
{
|
|
|
|
WriteLog("Sound: Failed to initialize SDL sound.\n");
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
conditional = SDL_CreateCond();
|
|
|
|
mutex = SDL_CreateMutex();
|
2009-01-22 22:12:49 +00:00
|
|
|
mutex2 = SDL_CreateMutex();// Let's try real signalling...
|
2007-05-29 03:06:33 +00:00
|
|
|
soundBufferPos = 0;
|
2009-02-06 04:25:53 +00:00
|
|
|
lastToggleCycles = 0;
|
2009-02-16 16:22:33 +00:00
|
|
|
sample = desired.silence; // ? wilwok ? yes
|
2007-05-29 03:06:33 +00:00
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
SDL_PauseAudioDevice(device, 0); // Start playback!
|
2007-05-29 03:06:33 +00:00
|
|
|
soundInitialized = true;
|
|
|
|
WriteLog("Sound: Successfully initialized.\n");
|
2009-02-24 15:32:01 +00:00
|
|
|
|
|
|
|
#ifdef WRITE_OUT_WAVE
|
|
|
|
fp = fopen("./apple2.wav", "wb");
|
|
|
|
#endif
|
2007-05-29 03:06:33 +00:00
|
|
|
}
|
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
|
2007-05-29 03:06:33 +00:00
|
|
|
//
|
|
|
|
// Close down the SDL sound subsystem
|
|
|
|
//
|
|
|
|
void SoundDone(void)
|
|
|
|
{
|
|
|
|
if (soundInitialized)
|
|
|
|
{
|
2013-09-11 15:00:36 +00:00
|
|
|
SDL_PauseAudioDevice(device, 1);
|
|
|
|
SDL_CloseAudioDevice(device);
|
2007-05-29 03:06:33 +00:00
|
|
|
SDL_DestroyCond(conditional);
|
|
|
|
SDL_DestroyMutex(mutex);
|
2009-01-22 22:12:49 +00:00
|
|
|
SDL_DestroyMutex(mutex2);
|
2007-05-29 03:06:33 +00:00
|
|
|
WriteLog("Sound: Done.\n");
|
2009-02-24 15:32:01 +00:00
|
|
|
|
|
|
|
#ifdef WRITE_OUT_WAVE
|
|
|
|
fclose(fp);
|
|
|
|
#endif
|
2007-05-29 03:06:33 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
|
2013-09-23 16:05:10 +00:00
|
|
|
void SoundPause(void)
|
|
|
|
{
|
|
|
|
if (soundInitialized)
|
|
|
|
SDL_PauseAudioDevice(device, 1);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void SoundResume(void)
|
|
|
|
{
|
|
|
|
if (soundInitialized)
|
|
|
|
SDL_PauseAudioDevice(device, 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2007-05-29 03:06:33 +00:00
|
|
|
//
|
|
|
|
// Sound card callback handler
|
|
|
|
//
|
2013-09-11 15:00:36 +00:00
|
|
|
static void SDLSoundCallback(void * /*userdata*/, Uint8 * buffer8, int length8)
|
2007-05-29 03:06:33 +00:00
|
|
|
{
|
2013-09-11 15:00:36 +00:00
|
|
|
//WriteLog("SDLSoundCallback(): begin (soundBufferPos=%i)\n", soundBufferPos);
|
2007-05-29 03:06:33 +00:00
|
|
|
// The sound buffer should only starve when starting which will cause it to
|
|
|
|
// lag behind the emulation at most by around 1 frame...
|
2009-01-19 16:09:37 +00:00
|
|
|
// (Actually, this should never happen since we fill the buffer beforehand.)
|
|
|
|
// (But, then again, if the sound hasn't been toggled for a while, then this
|
|
|
|
// makes perfect sense as the buffer won't have been filled at all!)
|
2009-02-16 16:22:33 +00:00
|
|
|
// (Should NOT starve now, now that we properly handle frame edges...)
|
2007-05-29 03:06:33 +00:00
|
|
|
|
2009-01-22 22:12:49 +00:00
|
|
|
// Let's try using a mutex for shared resource consumption...
|
2009-02-24 15:32:01 +00:00
|
|
|
//Actually, I think Lock/UnlockAudio() does this already...
|
2013-09-19 00:03:09 +00:00
|
|
|
//WriteLog("SDLSoundCallback: soundBufferPos = %i\n", soundBufferPos);
|
2009-01-22 22:12:49 +00:00
|
|
|
SDL_mutexP(mutex2);
|
|
|
|
|
2009-02-24 15:32:01 +00:00
|
|
|
// Recast this as a 16-bit type...
|
2013-09-09 02:18:23 +00:00
|
|
|
int16_t * buffer = (int16_t *)buffer8;
|
|
|
|
uint32_t length = (uint32_t)length8 / 2;
|
2009-02-24 15:32:01 +00:00
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
//WriteLog("SDLSoundCallback(): filling buffer...\n");
|
2013-09-24 14:09:40 +00:00
|
|
|
if (soundBufferPos < length)
|
2007-05-29 03:06:33 +00:00
|
|
|
{
|
2013-09-24 14:09:40 +00:00
|
|
|
// The sound buffer is starved...
|
2013-09-09 02:18:23 +00:00
|
|
|
for(uint32_t i=0; i<soundBufferPos; i++)
|
2007-05-29 03:06:33 +00:00
|
|
|
buffer[i] = soundBuffer[i];
|
2009-01-19 16:09:37 +00:00
|
|
|
|
2007-05-29 03:06:33 +00:00
|
|
|
// Fill buffer with last value
|
2013-09-09 02:18:23 +00:00
|
|
|
for(uint32_t i=soundBufferPos; i<length; i++)
|
2013-09-11 15:00:36 +00:00
|
|
|
buffer[i] = sample;
|
|
|
|
|
2013-09-24 14:09:40 +00:00
|
|
|
// Reset soundBufferPos to start of buffer...
|
|
|
|
soundBufferPos = 0;
|
2007-05-29 03:06:33 +00:00
|
|
|
}
|
2009-01-22 22:12:49 +00:00
|
|
|
else
|
|
|
|
{
|
|
|
|
// Fill sound buffer with frame buffered sound
|
2013-09-09 02:18:23 +00:00
|
|
|
for(uint32_t i=0; i<length; i++)
|
2009-02-24 15:32:01 +00:00
|
|
|
buffer[i] = soundBuffer[i];
|
2013-09-11 15:00:36 +00:00
|
|
|
|
2009-01-22 22:12:49 +00:00
|
|
|
soundBufferPos -= length;
|
2007-05-29 03:06:33 +00:00
|
|
|
|
2009-01-22 22:12:49 +00:00
|
|
|
// Move current buffer down to start
|
2013-09-09 02:18:23 +00:00
|
|
|
for(uint32_t i=0; i<soundBufferPos; i++)
|
2009-01-22 22:12:49 +00:00
|
|
|
soundBuffer[i] = soundBuffer[length + i];
|
|
|
|
}
|
2007-05-29 03:06:33 +00:00
|
|
|
|
2009-01-22 22:12:49 +00:00
|
|
|
// Free the mutex...
|
2013-09-11 15:00:36 +00:00
|
|
|
//WriteLog("SDLSoundCallback(): SDL_mutexV(mutex2)\n");
|
2009-01-22 22:12:49 +00:00
|
|
|
SDL_mutexV(mutex2);
|
|
|
|
// Wake up any threads waiting for the buffer to drain...
|
2009-02-06 04:25:53 +00:00
|
|
|
SDL_CondSignal(conditional);
|
2013-09-11 15:00:36 +00:00
|
|
|
//WriteLog("SDLSoundCallback(): end\n");
|
2007-05-29 03:06:33 +00:00
|
|
|
}
|
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
|
|
|
|
// This is called by the main CPU thread every ~21.333 cycles.
|
|
|
|
void WriteSampleToBuffer(void)
|
|
|
|
{
|
|
|
|
//WriteLog("WriteSampleToBuffer(): SDL_mutexP(mutex2)\n");
|
|
|
|
SDL_mutexP(mutex2);
|
|
|
|
|
2013-09-24 14:09:40 +00:00
|
|
|
// This should almost never happen, but, if it does...
|
2013-09-11 15:00:36 +00:00
|
|
|
while (soundBufferPos >= (SOUND_BUFFER_SIZE - 1))
|
|
|
|
{
|
|
|
|
//WriteLog("WriteSampleToBuffer(): Waiting for sound thread. soundBufferPos=%i, SOUNDBUFFERSIZE-1=%i\n", soundBufferPos, SOUND_BUFFER_SIZE-1);
|
|
|
|
SDL_mutexV(mutex2); // Release it so sound thread can get it,
|
|
|
|
SDL_mutexP(mutex); // Must lock the mutex for the cond to work properly...
|
|
|
|
SDL_CondWait(conditional, mutex); // Sleep/wait for the sound thread
|
|
|
|
SDL_mutexV(mutex); // Must unlock the mutex for the cond to work properly...
|
|
|
|
SDL_mutexP(mutex2); // Re-lock it until we're done with it...
|
|
|
|
}
|
|
|
|
|
|
|
|
soundBuffer[soundBufferPos++] = sample;
|
|
|
|
//WriteLog("WriteSampleToBuffer(): SDL_mutexV(mutex2)\n");
|
|
|
|
SDL_mutexV(mutex2);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2013-09-24 14:09:40 +00:00
|
|
|
void ToggleSpeaker(void)
|
2007-05-29 03:06:33 +00:00
|
|
|
{
|
|
|
|
if (!soundInitialized)
|
|
|
|
return;
|
|
|
|
|
2009-02-24 15:32:01 +00:00
|
|
|
speakerState = !speakerState;
|
|
|
|
sample = (speakerState ? amplitude[ampPtr] : -amplitude[ampPtr]);
|
2007-05-29 03:06:33 +00:00
|
|
|
}
|
2009-01-19 20:00:34 +00:00
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
|
2009-02-06 04:25:53 +00:00
|
|
|
void VolumeUp(void)
|
|
|
|
{
|
2013-09-11 15:00:36 +00:00
|
|
|
// Currently set for 16-bit samples
|
2009-02-24 15:32:01 +00:00
|
|
|
if (ampPtr < 16)
|
2009-02-06 04:25:53 +00:00
|
|
|
ampPtr++;
|
|
|
|
}
|
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
|
2009-02-06 04:25:53 +00:00
|
|
|
void VolumeDown(void)
|
|
|
|
{
|
|
|
|
if (ampPtr > 0)
|
|
|
|
ampPtr--;
|
|
|
|
}
|
|
|
|
|
2013-09-11 15:00:36 +00:00
|
|
|
|
2013-09-09 02:18:23 +00:00
|
|
|
uint8_t GetVolume(void)
|
2009-02-06 04:25:53 +00:00
|
|
|
{
|
|
|
|
return ampPtr;
|
|
|
|
}
|
|
|
|
|