/*
	snd_sdl.c

	Sound code taken from SDLQuake and modified to work with Quake2
	Robert B�ml 2001-12-25

	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:

		Free Software Foundation, Inc.
		59 Temple Place - Suite 330
		Boston, MA  02111-1307, USA

	$Id: snd_sdl.c,v 1.2 2002/02/09 20:29:38 relnev Exp $
*/

#include "SDL.h"

#include "../client/client.h"
#include "../client/snd_loc.h"

int  snd_inited = 0;

struct sndinfo * si;

static void
paint_audio (void *unused, Uint8 * stream, int len)
{
	if (snd_inited) {
		si->dma->buffer = stream;
		si->dma->samplepos += len / (si->dma->samplebits / 4);
		// Check for samplepos overflow?
		si->S_PaintChannels (si->dma->samplepos);
	}
}

qboolean
SNDDMA_Init (struct sndinfo * s)
{
	SDL_AudioSpec desired, obtained;
	int desired_bits, freq;
	char	drivername[128];
	
	if (SDL_WasInit(SDL_INIT_EVERYTHING) == 0) {
		if (SDL_Init(SDL_INIT_AUDIO) < 0) {
			si->Com_Printf ("Couldn't init SDL audio: %s\n", SDL_GetError ());
			return 0;
		}
	} else if (SDL_WasInit(SDL_INIT_AUDIO) == 0) {
		if (SDL_InitSubSystem(SDL_INIT_AUDIO) < 0) {
			si->Com_Printf ("Couldn't init SDL audio: %s\n", SDL_GetError ());
			return 0;
		}
	}

	si = s;
	desired_bits = si->sndbits->value;
		
	/* Set up the desired format */
	freq = si->s_khz->value;
	if (freq == 48)      desired.freq = 48000;
	else if (freq == 44) desired.freq = 44100;
	else if (freq == 22) desired.freq = 22050;
	else if (freq == 11) desired.freq = 11025;
	else                 desired.freq = 44100;
	
	switch (desired_bits) {
		case 8:
			desired.format = AUDIO_U8;
			break;
		case 16:
			if (SDL_BYTEORDER == SDL_BIG_ENDIAN)
				desired.format = AUDIO_S16MSB;
			else
				desired.format = AUDIO_S16LSB;
			break;
		default:
			si->Com_Printf ("Unknown number of audio bits: %d\n", desired_bits);
			return 0;
	}
        
	desired.channels = si->sndchannels->value;
        
	if (desired.freq == 48000)      desired.samples = 4096;
	else if (desired.freq == 44100) desired.samples = 2048;
	else if (desired.freq == 22050) desired.samples = 1024;
	else if (desired.freq == 11025) desired.samples = 512;
	else                            desired.samples = 2048;
		
	desired.callback = paint_audio;
	
	/* Open the audio device */
	if (SDL_OpenAudio (&desired, &obtained) < 0) {
		si->Com_Printf ("Couldn't open SDL audio: %s\n", SDL_GetError ());
		return 0;
	}

	/* Make sure we can support the audio format */
	switch (obtained.format) {
		case AUDIO_U8:
			/* Supported */
			break;
		case AUDIO_S16LSB:
		case AUDIO_S16MSB:
			if (((obtained.format == AUDIO_S16LSB) &&
				 (SDL_BYTEORDER == SDL_LIL_ENDIAN)) ||
				((obtained.format == AUDIO_S16MSB) &&
				 (SDL_BYTEORDER == SDL_BIG_ENDIAN))) {
				/* Supported */
				break;
			}
		default:
			/* Not supported -- force SDL to do our bidding */
			SDL_CloseAudio ();
			if (SDL_OpenAudio (&desired, NULL) < 0) {
				si->Com_Printf ("Couldn't open SDL audio: %s\n", SDL_GetError ());
				return 0;
			}
			memcpy (&obtained, &desired, sizeof (desired));
			break;
	}
	SDL_PauseAudio (0);

	/* Fill the audio DMA information block */
	si->dma->samplebits = (obtained.format & 0xFF);
	si->dma->speed = obtained.freq;
	si->dma->channels = obtained.channels;
	si->dma->samples = obtained.samples * si->dma->channels;
	si->dma->samplepos = 0;
	si->dma->submission_chunk = 1;
	si->dma->buffer = NULL;

	if (SDL_AudioDriverName(drivername, sizeof (drivername)) == NULL)
		strcpy(drivername, "(UNKNOWN)");

	si->Com_Printf("Initializing SDL Sound System\n");
	si->Com_Printf("Audio driver: %s\n", drivername);
	si->Com_Printf("DMA buffer address: 0x%x \n", (int) si->dma->buffer);
	si->Com_Printf("Channels: %5d\n", MAX_CHANNELS);

	snd_inited = 1;
	return 1;
}

int
SNDDMA_GetDMAPos (void)
{
	return si->dma->samplepos;
}

void
SNDDMA_Shutdown (void)
{
	si->Com_Printf("SNDDMA_Shutdown\n");
	if (snd_inited) {
		SDL_CloseAudio ();
		snd_inited = 0;
	}

	if (SDL_WasInit(SDL_INIT_EVERYTHING) == SDL_INIT_AUDIO)
		SDL_Quit();
	else
		SDL_QuitSubSystem(SDL_INIT_AUDIO);
}

/*
SNDDMA_Submit
Send sound to device if buffer isn't really the dma buffer
*/
void
SNDDMA_Submit (void)
{
}


void SNDDMA_BeginPainting(void)
{    
}