/* 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);

}