OpenRaider/src/Sound.cpp

/*!
 * \file Sound.cpp
 * \brief This is the audio manager Implementation
 *
 * Defining UNIT_TEST_SOUND builds Sound class as a console unit test
 *
 * \author Mongoose
 * \author xythobuz
 */

#ifdef USING_OPENAL
#ifdef __APPLE__
#include <OpenAL/al.h>
#include <OpenAL/alc.h>
#include <AL/alut.h>
#else
#include <AL/al.h>
#include <AL/alc.h>
#include <AL/alut.h>
#endif
#else
#warning "No OpenAL support. Won't play sound!"
#endif

#include <time.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/time.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <unistd.h>

#include <Sound.h>

#ifdef DEBUG_MEMORY
#include <memory_test.h>
#endif



Sound::Sound()
{
	mSource[0] = 0;
	mBuffer[0] = 0;
	mNextBuffer = 0;
	mNextSource = 0;
	mInit = false;
}


Sound::~Sound()
{
	if (mInit)
	{
#ifdef USING_OPENAL
		alutExit();
#endif
	}
}


int Sound::init()
{
#ifndef __APPLE__
	int fd;

	fd = open("/dev/dsp", O_RDWR);

	if (fd < 0)
	{
		perror("Sound::Init> Could not open /dev/dsp : ");
		return -1;
	}

	close(fd);
#endif

#ifdef USING_OPENAL
	alutInit(NULL, 0);

	mInit = true;
	printf("Created OpenAL Context\n");
#else
	printf("Couldn't create sound Context!\n");
#endif

	return 0;
}


void Sound::listenAt(float pos[3], float angle[3])
{
	if (!mInit)
		return;

#ifdef USING_OPENAL
	alListenerfv(AL_POSITION, pos);
	alListenerfv(AL_ORIENTATION, angle);
#endif
}


void Sound::sourceAt(int source, float pos[3])
{
	if (!mInit || source < 0)
		return;

#ifdef USING_OPENAL
	alSourcefv(mSource[source-1], AL_POSITION, pos);
#endif
}


//! \fixme Seperate sourcing and buffering, Mongoose 2002.01.04
int Sound::addFile(char *filename, int *source, unsigned int flags)
{
#ifdef USING_OPENAL
   ALsizei size;
   ALfloat freq;
   ALenum format;
   ALvoid *data;
#endif


	if (!mInit || !filename || !source)
	{
		printf("Sound::AddFile> ERROR pre condition assertion failed\n");
		return -1000;
	}

	*source = -1;

#ifdef USING_OPENAL
   alGetError();

	alGenBuffers(1, &mBuffer[mNextBuffer]);

	if (alGetError() != AL_NO_ERROR)
   {
		fprintf(stderr, "Sound::AddFile> alGenBuffers call failed\n");
		return -1;
	}

   alGetError();

   alGenSources(1, &mSource[mNextSource]);

	if (alGetError() != AL_NO_ERROR)
   {
		fprintf(stderr, "Sound::AddFile> alGenSources call failed\n");
		return -2;
	}

   // err = alutLoadWAV(filename, &data, &format, &size, &bits, &freq);
   // is deprecated!
   data = alutLoadMemoryFromFile(filename, &format, &size, &freq);

   if (alGetError() != AL_NO_ERROR)
	{
	   fprintf(stderr, "Could not load %s\n", filename);
	   return -3;
   }

   alBufferData(mBuffer[mNextBuffer], format, data, size, freq);

   alSourcei(mSource[mNextSource], AL_BUFFER, mBuffer[mNextBuffer]);

	if (flags & SoundFlagsLoop)
	{
		alSourcei(mSource[mNextSource], AL_LOOPING, 1);
	}

   ++mNextBuffer;
   ++mNextSource;

	*source = mNextBuffer;

   return 0;
#else
	return -1;
#endif
}

int Sound::addWave(unsigned char *wav, unsigned int length, int *source, unsigned int flags)
{
#ifdef USING_OPENAL
   ALsizei size;
   ALfloat freq;
   ALenum format;
   ALvoid *data;
#endif

	if (!mInit || !wav || !source)
	{
		printf("Sound::AddWave> ERROR pre condition assertion failed\n");
		return -1000;
	}

	*source = -1;

#ifdef USING_OPENAL
	data = wav;

   alGetError();

	alGenBuffers(1, &mBuffer[mNextBuffer]);

	if (alGetError() != AL_NO_ERROR)
   {
		fprintf(stderr, "Sound::AddWave> alGenBuffers call failed\n");
		return -1;
	}

   alGetError();

   alGenSources(1, &mSource[mNextSource]);

	if (alGetError() != AL_NO_ERROR)
   {
		fprintf(stderr, "Sound::AddWave> alGenSources call failed\n");
		return -2;
	}

    //AL_FORMAT_WAVE_EXT does not exist on Mac!"
    // alBufferData(mBuffer[mNextBuffer], AL_FORMAT_WAVE_EXT, data, size, freq);
    // Idea: Fill Buffer with
    // alutLoadMemoryFromFileImage
    //     (const ALvoid *data, ALsizei length, ALenum *format, ALsizei *size, ALfloat *frequency)

    data = alutLoadMemoryFromFileImage(wav, length, &format, &size, &freq);

    if ((alGetError() != AL_NO_ERROR) || (data == NULL)) {
	   fprintf(stderr, "Could not load wav buffer\n");
	   return -3;
    }


   alBufferData(mBuffer[mNextBuffer], format, data, size, freq);

   alSourcei(mSource[mNextSource], AL_BUFFER, mBuffer[mNextBuffer]);

	if (flags & SoundFlagsLoop)
	{
		alSourcei(mSource[mNextSource], AL_LOOPING, 1);
	}

   ++mNextBuffer;
   ++mNextSource;

	*source = mNextBuffer;

   return 0;
#else
	return -1;
#endif
}


void Sound::play(int source)
{
	if (!mInit)
	{
		printf("Sound::Play> ERROR: Sound not initialized\n");
		return;
	}

	if (source < 0)
	{
		printf("Sound::Play> ERROR: Source Id invalid\n");
		return;
	}

#ifdef USING_OPENAL
	alSourcePlay(mSource[source-1]);
#endif
}


void Sound::stop(int source)
{
	if (!mInit || source < 0)
	{
		printf("Sound::Stop> ERROR pre condition assertion failed\n");
		return;
	}

#ifdef USING_OPENAL
	alSourceStop(mSource[source-1]);
#endif
}


///////////////////////////////////////////////////////


#ifdef UNIT_TEST_SOUND
/*!
 * \brief Sound Unit Test
 * \param argc Number of arguments. Has to be > 1
 * \param argv Argument array. argv[1] will be played as wav file
 * \returns always zero
 */
int main(int argc, char* argv[])
{
	Sound snd;
	FILE *f;
	unsigned int l;
	unsigned char *buf;
   int id, ret;


	if (argc > 1)
	{
		snd.init();
		printf("Loading %s\n", argv[1]);
		ret = snd.addFile(argv[1], &id, snd.SoundFlagsNone);
		printf("Load returned %i\n", ret);
		printf("Playing %u::%s\n", id, argv[1]);
		snd.play(id);

		printf("Waiting...\n");
		sleep(1);

		f = fopen(argv[1], "rb");

		if (f)
		{
			fseek(f, 0, SEEK_END);
			l = ftell(f);
			fseek(f, 0, SEEK_SET);

			buf = new unsigned char[l];
			fread(buf, l, 1, f);

			fclose(f);

			printf("Loading buffer of %s\n", argv[1]);
			ret = snd.addWave(buf, l, &id, snd.SoundFlagsNone);
			printf("Load returned %i\n", ret);
			printf("Playing buffer of %u::%s\n", id, argv[1]);
			snd.play(id);

			delete [] buf;
			printf("Waiting...\n");
			sleep(1);
		}
	}
	else
	{
		printf("%s filename.wav\n", argv[0]);
	}

	return 0;
}
#endif