/* Program to load a wave file and loop playing it using SDL sound */

/* loopwaves.c is much more robust in handling WAVE files -- 

	This is only for simple WAVEs

*/

#include "SDL_config.h"

#include <stdio.h>

#include <stdlib.h>

#if HAVE_SIGNAL_H

#include <signal.h>

#endif

#include "SDL.h"

#include "SDL_audio.h"

struct {

	SDL_AudioSpec spec;

	Uint8   *sound;			/* Pointer to wave data */

	Uint32   soundlen;		/* Length of wave data */

	int      soundpos;		/* Current play position */

} wave;

/* Call this instead of exit(), so we can clean up SDL: atexit() is evil. */

static void quit(int rc)

{

	SDL_Quit();

	exit(rc);

}

void SDLCALL fillerup(void *unused, Uint8 *stream, int len)

{

	Uint8 *waveptr;

	int    waveleft;

	/* Set up the pointers */

	waveptr = wave.sound + wave.soundpos;

	waveleft = wave.soundlen - wave.soundpos;

	/* Go! */

	while ( waveleft <= len ) {

		SDL_MixAudio(stream, waveptr, waveleft, SDL_MIX_MAXVOLUME);

		stream += waveleft;

		len -= waveleft;

		waveptr = wave.sound;

		waveleft = wave.soundlen;

		wave.soundpos = 0;

	}

	SDL_MixAudio(stream, waveptr, len, SDL_MIX_MAXVOLUME);

	wave.soundpos += len;

}

static int done = 0;

void poked(int sig)

{

	done = 1;

}

int main(int argc, char *argv[])

{

	int i, n;

	/* Print available audio drivers */

	n = SDL_GetNumAudioDrivers();

	if ( n == 0 ) {

		printf("No built-in audio drivers\n");

	} else {

		printf("Built-in audio drivers:");

		for ( i = 0; i < n; ++i ) {

			if ( i > 0 ) {

				printf(",");

			}

			printf(" %s", SDL_GetAudioDriver(i));

		}

		printf("\n");

	}

	/* Load the SDL library */

	if ( SDL_Init(SDL_INIT_AUDIO) < 0 ) {

		fprintf(stderr, "Couldn't initialize SDL: %s\n",SDL_GetError());

		return(1);

	}

	if ( argv[1] == NULL ) {

		argv[1] = "sample.wav";

	}

	/* Load the wave file into memory */

	if ( SDL_LoadWAV(argv[1],

			&wave.spec, &wave.sound, &wave.soundlen) == NULL ) {

		fprintf(stderr, "Couldn't load %s: %s\n",

						argv[1], SDL_GetError());

		quit(1);

	}

	wave.spec.callback = fillerup;

#if HAVE_SIGNAL_H

	/* Set the signals */

#ifdef SIGHUP

	signal(SIGHUP, poked);

#endif

	signal(SIGINT, poked);

#ifdef SIGQUIT

	signal(SIGQUIT, poked);

#endif

	signal(SIGTERM, poked);

#endif /* HAVE_SIGNAL_H */

	/* Initialize fillerup() variables */

	if ( SDL_OpenAudio(&wave.spec, NULL) < 0 ) {

		fprintf(stderr, "Couldn't open audio: %s\n", SDL_GetError());

		SDL_FreeWAV(wave.sound);

		quit(2);

	}

	SDL_PauseAudio(0);

	/* Let the audio run */

	printf("Using audio driver: %s\n", SDL_GetCurrentAudioDriver());

	while ( ! done && (SDL_GetAudioStatus() == SDL_AUDIO_PLAYING) )

		SDL_Delay(1000);

	/* Clean up on signal */

	SDL_CloseAudio();

	SDL_FreeWAV(wave.sound);

	SDL_Quit();

	return(0);

}