/***********************************************************
* Artsoft Retro-Game Library *
*----------------------------------------------------------*
-* (c) 1994-2000 Artsoft Entertainment *
+* (c) 1994-2001 Artsoft Entertainment *
* Holger Schemel *
* Detmolder Strasse 189 *
* 33604 Bielefeld *
#include <unistd.h>
#include <fcntl.h>
#include <dirent.h>
+#include <signal.h>
#include "system.h"
#include "sound.h"
#include "misc.h"
-static int num_sounds = 0, num_music = 0, num_mods = 0;
+static int num_sounds = 0, num_music = 0;
static struct SampleInfo *Sound = NULL;
+#if defined(TARGET_SDL)
+static int num_mods = 0;
static struct SampleInfo *Mod = NULL;
+#endif
-/*** THE STUFF BELOW IS ONLY USED BY THE SOUND SERVER CHILD PROCESS ***/
+/* ========================================================================= */
+/* THE STUFF BELOW IS ONLY USED BY THE SOUND SERVER CHILD PROCESS */
static int playing_sounds = 0;
static struct SoundControl playlist[MAX_SOUNDS_PLAYING];
static int ulaw_to_linear(unsigned char);
#endif
-#if defined(PLATFORM_HPUX)
-static void HPUX_Audio_Control();
-#endif
-
-#if defined(PLATFORM_MSDOS)
+#if defined(AUDIO_LINUX_IOCTL)
+static boolean InitAudioDevice_Linux();
+#elif defined(PLATFORM_NETBSD)
+static boolean InitAudioDevice_NetBSD();
+#elif defined(PLATFORM_HPUX)
+static boolean InitAudioDevice_HPUX();
+#elif defined(PLATFORM_MSDOS)
static void SoundServer_InsertNewSound(struct SoundControl);
static void SoundServer_StopSound(int);
static void SoundServer_StopAllSounds();
#endif
#if defined(PLATFORM_UNIX)
-int OpenAudioDevice(char *audio_device_name)
+static int OpenAudioDevice(char *audio_device_name)
{
int audio_fd;
return audio_fd;
}
-void UnixOpenAudio(void)
+static boolean TestAudioDevices(void)
{
static char *audio_device_name[] =
{
if (audio_fd < 0)
{
- Error(ERR_WARN, "cannot open audio device - no sound");
- return;
+ Error(ERR_WARN, "cannot open audio device -- no sound");
+ return FALSE;
}
close(audio_fd);
audio.device_name = audio_device_name[i];
+
+ return TRUE;
+}
+
+#if !defined(TARGET_SDL)
+static boolean ForkAudioProcess(void)
+{
+ if (pipe(audio.soundserver_pipe) < 0)
+ {
+ Error(ERR_WARN, "cannot create pipe -- no sounds");
+ return FALSE;
+ }
+
+ if ((audio.soundserver_pid = fork()) < 0)
+ {
+ Error(ERR_WARN, "cannot create sound server process -- no sounds");
+ return FALSE;
+ }
+
+ if (audio.soundserver_pid == 0) /* we are child */
+ {
+ SoundServer();
+
+ /* never reached */
+ exit(0);
+ }
+ else /* we are parent */
+ close(audio.soundserver_pipe[0]); /* no reading from pipe needed */
+
+ return TRUE;
+}
+#endif
+
+void UnixOpenAudio(void)
+{
+ if (!TestAudioDevices())
+ return;
+
audio.sound_available = TRUE;
audio.sound_enabled = TRUE;
{
if (audio.device_fd)
close(audio.device_fd);
-}
+ if (audio.soundserver_pid)
+ kill(audio.soundserver_pid, SIGTERM);
+}
#endif /* PLATFORM_UNIX */
-void SoundServer()
+void InitPlaylist(void)
{
int i;
+
+ for(i=0;i<MAX_SOUNDS_PLAYING;i++)
+ playlist[i] = emptySoundControl;
+ playing_sounds = 0;
+}
+
+void StartSoundserver(void)
+{
+ if (!audio.sound_available)
+ return;
+
+#if defined(PLATFORM_UNIX) && !defined(TARGET_SDL)
+ if (!ForkAudioProcess())
+ audio.sound_available = FALSE;
+#endif
+}
+
#if defined(PLATFORM_UNIX)
+void SoundServer(void)
+{
+ int i;
+
struct SoundControl snd_ctrl;
fd_set sound_fdset;
close(audio.soundserver_pipe[1]); /* no writing into pipe needed */
-#endif
- for(i=0;i<MAX_SOUNDS_PLAYING;i++)
- playlist[i] = emptySoundControl;
- playing_sounds = 0;
+ InitPlaylist();
-#if defined(PLATFORM_UNIX)
stereo_volume[PSND_MAX_LEFT2RIGHT] = 0;
for(i=0;i<PSND_MAX_LEFT2RIGHT;i++)
stereo_volume[i] =
(int)sqrt((float)(PSND_MAX_LEFT2RIGHT*PSND_MAX_LEFT2RIGHT-i*i));
#if defined(PLATFORM_HPUX)
- HPUX_Audio_Control();
+ InitAudioDevice_HPUX();
#endif
FD_ZERO(&sound_fdset);
continue;
if (read(audio.soundserver_pipe[0], &snd_ctrl, sizeof(snd_ctrl))
!= sizeof(snd_ctrl))
- Error(ERR_EXIT_SOUND_SERVER, "broken pipe - no sounds");
+ Error(ERR_EXIT_SOUND_SERVER, "broken pipe -- no sounds");
#if defined(AUDIO_STREAMING_DSP)
static long max_sample_size = 0;
static long fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
int sample_rate = DEFAULT_AUDIO_SAMPLE_RATE;
- int stereo = TRUE;
- /* 'ioctl()' expects pointer to integer value for stereo flag
- (boolean is defined as 'char', which will not work here) */
+ boolean stereo = TRUE;
if (playing_sounds ||
(audio.device_fd = OpenAudioDevice(audio.device_name)) >= 0)
{
if (!playing_sounds) /* we just opened the audio device */
{
- unsigned long fragment_spec = 0;
-
- /* determine logarithm (log2) of the fragment size */
- for (fragment_spec=0; (1 << fragment_spec) < fragment_size;
- fragment_spec++);
-
- /* use two fragments (play one fragment, prepare the other);
- one fragment would result in interrupted audio output, more
- than two fragments would raise audio output latency to much */
- fragment_spec |= 0x00020000;
-
- /* Example for fragment specification:
- - 2 buffers / 512 bytes (giving 1/16 second resolution for 8 kHz)
- - (with stereo the effective buffer size will shrink to 256)
- => fragment_size = 0x00020009 */
-
- if (ioctl(audio.device_fd,SNDCTL_DSP_SETFRAGMENT,&fragment_spec) < 0)
- Error(ERR_EXIT_SOUND_SERVER,
- "cannot set fragment size of /dev/dsp - no sounds");
-
- /* try if we can use stereo sound */
- if (ioctl(audio.device_fd, SNDCTL_DSP_STEREO, &stereo) < 0)
- {
-#ifdef DEBUG
- static boolean reported = FALSE;
-
- if (!reported)
- {
- Error(ERR_RETURN, "cannot get stereo sound on /dev/dsp");
- reported = TRUE;
- }
+#if defined(AUDIO_LINUX_IOCTL)
+ stereo = InitAudioDevice_Linux(fragment_size, sample_rate);
+#elif defined(PLATFORM_NETBSD)
+ stereo = InitAudioDevice_NetBSD(fragment_size, sample_rate);
#endif
- stereo = FALSE;
- }
-
- if (ioctl(audio.device_fd, SNDCTL_DSP_SPEED, &sample_rate) < 0)
- Error(ERR_EXIT_SOUND_SERVER,
- "cannot set sample rate of /dev/dsp - no sounds");
-
- /* get the real fragmentation size; this should return 512 */
- if (ioctl(audio.device_fd, SNDCTL_DSP_GETBLKSIZE,&fragment_size) < 0)
- Error(ERR_EXIT_SOUND_SERVER,
- "cannot get fragment size of /dev/dsp - no sounds");
-
max_sample_size = fragment_size / (stereo ? 2 : 1);
}
/* decrease volume if sound is fading out */
if (playlist[i].fade_sound &&
- playlist[i].volume>=PSND_MAX_VOLUME/10)
- playlist[i].volume-=PSND_MAX_VOLUME/20;
+ playlist[i].volume >= SOUND_FADING_VOLUME_THRESHOLD)
+ playlist[i].volume -= SOUND_FADING_VOLUME_STEP;
/* adjust volume of actual sound sample */
if (playlist[i].volume != PSND_MAX_VOLUME)
playing_sounds--;
}
}
- else if (playlist[i].volume <= PSND_MAX_VOLUME/10)
+ else if (playlist[i].volume <= SOUND_FADING_VOLUME_THRESHOLD)
{
playlist[i] = emptySoundControl;
playing_sounds--;
/* fill the first mixing buffer with original sample */
memcpy(premix_first_buffer,sample_ptr,sample_size);
-
/* adjust volume of actual sound sample */
if (snd_ctrl.volume != PSND_MAX_VOLUME)
for(i=0;i<sample_size;i++)
close(audio.device_fd);
}
}
-
#endif /* !AUDIO_STREAMING_DSP */
-
}
-
-#endif /* PLATFORM_UNIX */
-
}
+#endif /* PLATFORM_UNIX */
#if defined(PLATFORM_MSDOS)
static void sound_handler(struct SoundControl snd_ctrl)
#endif /* PLATFORM_MSDOS */
#endif /* !PLATFORM_WIN32 */
+
+/* ------------------------------------------------------------------------- */
+/* platform dependant audio initialization code */
+/* ------------------------------------------------------------------------- */
+
+#if defined(AUDIO_LINUX_IOCTL)
+static boolean InitAudioDevice_Linux(long fragment_size, int sample_rate)
+{
+ /* "ioctl()" expects pointer to 'int' value for stereo flag
+ (boolean is defined as 'char', which will not work here) */
+ int stereo = TRUE;
+ unsigned long fragment_spec = 0;
+
+ /* determine logarithm (log2) of the fragment size */
+ for (fragment_spec=0; (1 << fragment_spec) < fragment_size;
+ fragment_spec++);
+
+ /* use two fragments (play one fragment, prepare the other);
+ one fragment would result in interrupted audio output, more
+ than two fragments would raise audio output latency to much */
+ fragment_spec |= 0x00020000;
+
+ /* Example for fragment specification:
+ - 2 buffers / 512 bytes (giving 1/16 second resolution for 8 kHz)
+ - (with stereo the effective buffer size will shrink to 256)
+ => fragment_size = 0x00020009 */
+
+ if (ioctl(audio.device_fd, SNDCTL_DSP_SETFRAGMENT, &fragment_spec) < 0)
+ Error(ERR_EXIT_SOUND_SERVER,
+ "cannot set fragment size of /dev/dsp -- no sounds");
+
+ /* try if we can use stereo sound */
+ if (ioctl(audio.device_fd, SNDCTL_DSP_STEREO, &stereo) < 0)
+ {
+#ifdef DEBUG
+ static boolean reported = FALSE;
+
+ if (!reported)
+ {
+ Error(ERR_RETURN, "cannot get stereo sound on /dev/dsp");
+ reported = TRUE;
+ }
+#endif
+ stereo = FALSE;
+ }
+
+ if (ioctl(audio.device_fd, SNDCTL_DSP_SPEED, &sample_rate) < 0)
+ Error(ERR_EXIT_SOUND_SERVER,
+ "cannot set sample rate of /dev/dsp -- no sounds");
+
+ /* get the real fragmentation size; this should return 512 */
+ if (ioctl(audio.device_fd, SNDCTL_DSP_GETBLKSIZE, &fragment_size) < 0)
+ Error(ERR_EXIT_SOUND_SERVER,
+ "cannot get fragment size of /dev/dsp -- no sounds");
+
+ return (boolean)stereo;
+}
+#endif /* AUDIO_LINUX_IOCTL */
+
+#if defined(PLATFORM_NETBSD)
+static boolean InitAudioDevice_NetBSD(long fragment_size, int sample_rate)
+{
+ audio_info_t a_info;
+ boolean stereo = TRUE;
+
+ AUDIO_INITINFO(&a_info);
+ a_info.play.encoding = AUDIO_ENCODING_LINEAR8;
+ a_info.play.precision = 8;
+ a_info.play.channels = 2;
+ a_info.play.sample_rate = sample_rate;
+ a_info.blocksize = fragment_size;
+
+ if (ioctl(audio.device_fd, AUDIO_SETINFO, &a_info) < 0)
+ {
+ /* try to disable stereo */
+ a_info.play.channels = 1;
+ stereo = FALSE;
+
+ if (ioctl(audio.device_fd, AUDIO_SETINFO, &a_info) < 0)
+ Error(ERR_EXIT_SOUND_SERVER,
+ "cannot set sample rate of /dev/audio -- no sounds");
+ }
+
+ return stereo;
+}
+#endif /* PLATFORM_NETBSD */
+
#if defined(PLATFORM_HPUX)
-static void HPUX_Audio_Control()
+static boolean InitAudioDevice_HPUX()
{
struct audio_describe ainfo;
int audio_ctl;
audio_ctl = open("/dev/audioCtl", O_WRONLY | O_NDELAY);
if (audio_ctl == -1)
- Error(ERR_EXIT_SOUND_SERVER, "cannot open /dev/audioCtl - no sounds");
+ Error(ERR_EXIT_SOUND_SERVER, "cannot open /dev/audioCtl -- no sounds");
if (ioctl(audio_ctl, AUDIO_DESCRIBE, &ainfo) == -1)
- Error(ERR_EXIT_SOUND_SERVER, "no audio info - no sounds");
+ Error(ERR_EXIT_SOUND_SERVER, "no audio info -- no sounds");
if (ioctl(audio_ctl, AUDIO_SET_DATA_FORMAT, AUDIO_FORMAT_ULAW) == -1)
- Error(ERR_EXIT_SOUND_SERVER, "ulaw audio not available - no sounds");
+ Error(ERR_EXIT_SOUND_SERVER, "ulaw audio not available -- no sounds");
ioctl(audio_ctl, AUDIO_SET_CHANNELS, 1);
ioctl(audio_ctl, AUDIO_SET_SAMPLE_RATE, 8000);
close(audio_ctl);
+
+ return TRUE; /* to provide common interface for InitAudioDevice_...() */
}
#endif /* PLATFORM_HPUX */
}
#endif /* PLATFORM_UNIX && !AUDIO_STREAMING_DSP */
-/*** THE STUFF ABOVE IS ONLY USED BY THE SOUND SERVER CHILD PROCESS ***/
-/*===========================================================================*/
+/* THE STUFF ABOVE IS ONLY USED BY THE SOUND SERVER CHILD PROCESS */
+/* ========================================================================= */
+/* THE STUFF BELOW IS ONLY USED BY THE MAIN PROCESS */
-/*** THE STUFF BELOW IS ONLY USED BY THE MAIN PROCESS ***/
#define CHUNK_ID_LEN 4 /* IFF style chunk id length */
#define WAV_HEADER_SIZE 20 /* size of WAV file header */
static boolean LoadSoundExt(char *sound_name, boolean is_music)
{
struct SampleInfo *snd_info;
- char filename[256];
+ char *filename;
#if !defined(TARGET_SDL) && !defined(PLATFORM_MSDOS)
byte sound_header_buffer[WAV_HEADER_SIZE];
char chunk[CHUNK_ID_LEN + 1];
- int chunk_length, dummy;
+ int chunk_size, dummy;
FILE *file;
int i;
#endif
+ if (!audio.sound_available)
+ return FALSE;
+
num_sounds++;
Sound = checked_realloc(Sound, num_sounds * sizeof(struct SampleInfo));
snd_info = &Sound[num_sounds - 1];
snd_info->name = sound_name;
- sprintf(filename, "%s/%s/%s", options.ro_base_directory,
- (is_music ? MUSIC_DIRECTORY : SOUNDS_DIRECTORY), snd_info->name);
+ filename = getPath2((is_music ? options.music_directory :
+ options.sounds_directory), snd_info->name);
#if defined(TARGET_SDL)
if ((snd_info->mix_chunk = Mix_LoadWAV(filename)) == NULL)
{
- Error(ERR_WARN, "cannot read sound file '%s' - no sounds", filename);
+ Error(ERR_WARN, "cannot read sound file '%s' -- no sounds", filename);
+ free(filename);
return FALSE;
}
if ((file = fopen(filename, MODE_READ)) == NULL)
{
- Error(ERR_WARN, "cannot open sound file '%s' - no sounds", filename);
+ Error(ERR_WARN, "cannot open sound file '%s' -- no sounds", filename);
+ free(filename);
return FALSE;
}
/* read chunk "RIFF" */
- getFileChunk(file, chunk, &chunk_length, BYTE_ORDER_LITTLE_ENDIAN);
+ getFileChunk(file, chunk, &chunk_size, BYTE_ORDER_LITTLE_ENDIAN);
if (strcmp(chunk, "RIFF") != 0)
{
Error(ERR_WARN, "missing 'RIFF' chunk of sound file '%s'", filename);
fclose(file);
+ free(filename);
return FALSE;
}
{
Error(ERR_WARN, "missing 'WAVE' chunk of sound file '%s'", filename);
fclose(file);
+ free(filename);
return FALSE;
}
sound_header_buffer[i] = fgetc(file);
/* read chunk "data" */
- getFileChunk(file, chunk, &chunk_length, BYTE_ORDER_LITTLE_ENDIAN);
+ getFileChunk(file, chunk, &chunk_size, BYTE_ORDER_LITTLE_ENDIAN);
if (strcmp(chunk, "data") != 0)
{
Error(ERR_WARN, "missing 'data' chunk of sound file '%s'", filename);
fclose(file);
+ free(filename);
return FALSE;
}
- snd_info->data_len = chunk_length;
+ snd_info->data_len = chunk_size;
snd_info->data_ptr = checked_malloc(snd_info->data_len);
/* read sound data */
if (fread(snd_info->data_ptr, 1, snd_info->data_len, file) !=
snd_info->data_len)
{
- Error(ERR_WARN, "cannot read sound file '%s' - no sounds", filename);
+ Error(ERR_WARN, "cannot read sound file '%s' -- no sounds", filename);
fclose(file);
+ free(filename);
return FALSE;
}
snd_info->sample_ptr = load_sample(filename);
if (!snd_info->sample_ptr)
{
- Error(ERR_WARN, "cannot read sound file '%s' - no sounds", filename);
+ Error(ERR_WARN, "cannot read sound file '%s' -- no sounds", filename);
return FALSE;
}
#endif
+ free(filename);
+
return TRUE;
}
boolean LoadMod(char *mod_name)
{
+#if defined(TARGET_SDL)
struct SampleInfo *mod_info;
- char filename[256];
+ char *filename;
num_mods++;
Mod = checked_realloc(Mod, num_mods * sizeof(struct SampleInfo));
mod_info = &Mod[num_mods - 1];
mod_info->name = mod_name;
- sprintf(filename, "%s/%s/%s", options.ro_base_directory,
- MUSIC_DIRECTORY, mod_info->name);
+ filename = getPath2(options.music_directory, mod_info->name);
-#if defined(TARGET_SDL)
if ((mod_info->mix_music = Mix_LoadMUS(filename)) == NULL)
{
- Error(ERR_WARN, "cannot read music file '%s' - no sounds", filename);
+ Error(ERR_WARN, "cannot read music file '%s' -- no music", filename);
+ free(filename);
return FALSE;
}
-#endif
- audio.mods_available = TRUE;
+ free(filename);
return TRUE;
+#else
+ return FALSE;
+#endif
}
int LoadMusic(void)
{
DIR *dir;
struct dirent *dir_entry;
- char *music_directory = getPath2(options.ro_base_directory, MUSIC_DIRECTORY);
+ int num_wav_music = 0;
+ int num_mod_music = 0;
- num_music = 0;
+ if (!audio.sound_available)
+ return 0;
- if ((dir = opendir(music_directory)) == NULL)
+ if ((dir = opendir(options.music_directory)) == NULL)
{
- Error(ERR_WARN, "cannot read music directory '%s'", music_directory);
+ Error(ERR_WARN, "cannot read music directory '%s'",
+ options.music_directory);
audio.music_available = FALSE;
- free(music_directory);
return 0;
}
if (strlen(filename) > 4 &&
strcmp(&filename[strlen(filename) - 4], ".wav") == 0)
{
- if (!LoadSoundExt(filename, TRUE))
- {
- audio.music_available = FALSE;
- free(music_directory);
- return num_music;
- }
-
- num_music++;
+ if (LoadSoundExt(filename, TRUE))
+ num_wav_music++;
}
else if (strlen(filename) > 4 &&
(strcmp(&filename[strlen(filename) - 4], ".mod") == 0 ||
strncmp(filename, "mod.", 4) == 0 ||
strncmp(filename, "MOD.", 4) == 0))
{
- if (!LoadMod(filename))
- {
- audio.music_available = FALSE;
- free(music_directory);
- return num_music;
- }
-
- num_music++;
+ if (LoadMod(filename))
+ num_mod_music++;
}
}
closedir(dir);
- if (num_music == 0)
+ if (num_wav_music == 0 && num_mod_music == 0)
Error(ERR_WARN, "cannot find any valid music files in directory '%s'",
- music_directory);
+ options.music_directory);
- free(music_directory);
+ num_music = (num_mod_music > 0 ? num_mod_music : num_wav_music);
- if (num_mods > 0)
- num_music = num_mods;
+ audio.mods_available = (num_mod_music > 0);
+ audio.music_available = (num_music > 0);
return num_music;
}
if (!audio.music_available)
return;
- if (num_mods == 0)
+ if (!audio.mods_available)
nr = num_sounds - num_music + nr;
#if defined(TARGET_SDL)
- if (audio.mods_available)
+ if (audio.mods_available) /* play MOD music */
{
- Mix_VolumeMusic(SOUND_MAX_VOLUME);
Mix_PlayMusic(Mod[nr].mix_music, -1);
+ Mix_VolumeMusic(SOUND_MAX_VOLUME); /* must be _after_ Mix_PlayMusic()! */
}
- else /* play music loop */
+ else /* play WAV music loop */
{
Mix_Volume(audio.music_channel, SOUND_MAX_VOLUME);
Mix_PlayChannel(audio.music_channel, Sound[nr].mix_chunk, -1);
#elif defined(PLATFORM_UNIX)
if (write(audio.soundserver_pipe[1], &snd_ctrl, sizeof(snd_ctrl)) < 0)
{
- Error(ERR_WARN, "cannot pipe to child process - no sounds");
+ Error(ERR_WARN, "cannot pipe to child process -- no sounds");
audio.sound_available = audio.sound_enabled = FALSE;
return;
}
void FadeMusic(void)
{
#if defined(TARGET_SDL)
+ if (!audio.sound_available)
+ return;
+
if (audio.mods_available)
Mix_FadeOutMusic(SOUND_FADING_INTERVAL);
else
void FadeSounds()
{
+ FadeMusic();
StopSoundExt(-1, SSND_FADE_ALL_SOUNDS);
}
void StopMusic(void)
{
#if defined(TARGET_SDL)
+ if (!audio.sound_available)
+ return;
+
if (audio.mods_available)
Mix_HaltMusic();
else
#if !defined(PLATFORM_MSDOS)
if (write(audio.soundserver_pipe[1], &snd_ctrl, sizeof(snd_ctrl)) < 0)
{
- Error(ERR_WARN, "cannot pipe to child process - no sounds");
+ Error(ERR_WARN, "cannot pipe to child process -- no sounds");
audio.sound_available = audio.sound_enabled = FALSE;
return;
}
#endif
}
-/*** THE STUFF ABOVE IS ONLY USED BY THE MAIN PROCESS ***/
+/* THE STUFF ABOVE IS ONLY USED BY THE MAIN PROCESS */
+/* ========================================================================= */