/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * 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.
 */

#include <malloc.h>

#include "osystem.h"

#define SFX_THREAD_STACKSIZE (1024 * 128)
#define SFX_THREAD_PRIO 80
#define SFX_THREAD_FRAG_SIZE 4096

static lwpq_t sfx_queue;
static lwp_t sfx_thread;
static u8 *sfx_stack;
static bool sfx_thread_running = false;
static bool sfx_thread_quit = false;

static u8 sb = 0;
static u8 *sound_buffer[2];

static OSystem_Wii::SoundProc sound_proc = NULL;
static void *proc_param = NULL;

static void audio_switch_buffers() {
	AUDIO_StopDMA();
	AUDIO_InitDMA((u32) sound_buffer[sb], SFX_THREAD_FRAG_SIZE);
	AUDIO_StartDMA();

	LWP_ThreadSignal(sfx_queue);
}

static void * sfx_thread_func(void *arg) {
	u8 next_sb;

	while (true) {
		LWP_ThreadSleep(sfx_queue);

		if (sfx_thread_quit)
			break;

		next_sb = sb ^ 1;
		sound_proc(proc_param, sound_buffer[next_sb], SFX_THREAD_FRAG_SIZE);
		DCFlushRange(sound_buffer[next_sb], SFX_THREAD_FRAG_SIZE);

		sb = next_sb;
	}

	return NULL;
}

void OSystem_Wii::initSfx() {
	sfx_thread_running = false;
	sfx_thread_quit = false;

	sfx_stack = (u8 *) memalign(32, SFX_THREAD_STACKSIZE);
	memset(sfx_stack, 0, SFX_THREAD_STACKSIZE);

	LWP_InitQueue(&sfx_queue);

	s32 res = LWP_CreateThread(&sfx_thread, sfx_thread_func, NULL, sfx_stack,
								SFX_THREAD_STACKSIZE, SFX_THREAD_PRIO);

	if (res) {
		printf("ERROR creating sfx thread: %d\n", res);
		LWP_CloseQueue(sfx_queue);
		return;
	}

	sfx_thread_running = true;

	sound_buffer[0] = (u8 *) memalign(32, SFX_THREAD_FRAG_SIZE);
	sound_buffer[1] = (u8 *) memalign(32, SFX_THREAD_FRAG_SIZE);

	memset(sound_buffer[0], 0, SFX_THREAD_FRAG_SIZE);
	memset(sound_buffer[1], 0, SFX_THREAD_FRAG_SIZE);

	DCFlushRange(sound_buffer[0], SFX_THREAD_FRAG_SIZE);
	DCFlushRange(sound_buffer[1], SFX_THREAD_FRAG_SIZE);

	sound_proc = Audio::Mixer::mixCallback;
	proc_param = _mixer;

	_mixer->setReady(true);

	AUDIO_SetDSPSampleRate(AI_SAMPLERATE_48KHZ);
	AUDIO_RegisterDMACallback(audio_switch_buffers);

	audio_switch_buffers();
}

void OSystem_Wii::deinitSfx() {
	if (_mixer)
		_mixer->setReady(false);

	AUDIO_StopDMA();
	AUDIO_RegisterDMACallback(NULL);

	if (sfx_thread_running) {
		sfx_thread_quit = true;
		LWP_ThreadBroadcast(sfx_queue);

		LWP_JoinThread(sfx_thread, NULL);
		LWP_CloseQueue(sfx_queue);

		sfx_thread_running = false;

		free(sound_buffer[0]);
		free(sound_buffer[1]);
	}
}

int OSystem_Wii::getOutputSampleRate() const {
	return 48000;
}