/* snd_sgi.c sound support for sgi Copyright (C) 1996-1997 Id Software, Inc. 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 */ #ifdef HAVE_CONFIG_H # include "config.h" #endif #include #include #include #include #include #include "QF/qargs.h" #include "QF/qtypes.h" #include "QF/sys.h" #include "snd_internal.h" static int snd_inited = 0; static ALconfig alc; static ALport alp; static int tryrates[] = { 11025, 22050, 44100, 8000 }; static unsigned char *dma_buffer, *write_buffer; static int bufsize; static int wbufp; static int framecount; static volatile dma_t sn; static plugin_t plugin_info; static plugin_data_t plugin_info_data; static plugin_funcs_t plugin_info_funcs; static general_data_t plugin_info_general_data; static general_funcs_t plugin_info_general_funcs; static snd_output_data_t plugin_info_snd_output_data; static snd_output_funcs_t plugin_info_snd_output_funcs; static volatile dma_t * SNDDMA_Init (void) { char *s; int i; ALpv alpv; alc = alNewConfig (); if (!alc) { Sys_Printf ("Could not make an new sound config: %s\n", alGetErrorString (oserror ())); return 0; } /* get & probe settings */ /* sample format */ if (alSetSampFmt (alc, AL_SAMPFMT_TWOSCOMP) < 0) { Sys_Printf ("Could not sample format of default output to two's " "complement\n"); alFreeConfig (alc); return 0; } /* sample bits */ s = getenv ("QUAKE_SOUND_SAMPLEBITS"); if (s) sn.samplebits = atoi (s); else if ((i = COM_CheckParm ("-sndbits")) != 0) sn.samplebits = atoi (com_argv[i + 1]); if (sn.samplebits != 16 && sn.samplebits != 8) { alpv.param = AL_WORDSIZE; if (alGetParams (AL_DEFAULT_OUTPUT, &alpv, 1) < 0) { Sys_Printf ("Could not get supported wordsize of default " "output: %s\n", alGetErrorString (oserror ())); return 0; } if (alpv.value.i >= 16) { sn.samplebits = 16; } else { if (alpv.value.i >= 8) sn.samplebits = 8; else { Sys_Printf ("Sound disabled since interface " "doesn't even support 8 bit."); alFreeConfig (alc); return 0; } } } /* sample rate */ s = getenv ("QUAKE_SOUND_SPEED"); if (s) sn.speed = atoi (s); else if ((i = COM_CheckParm ("-sndspeed")) != 0) sn.speed = atoi (com_argv[i + 1]); else { alpv.param = AL_RATE; for (i = 0; i < sizeof (tryrates) / sizeof (int); i++) { alpv.value.ll = alDoubleToFixed (tryrates[i]); if (alSetParams (AL_DEFAULT_OUTPUT, &alpv, 1) >= 0) break; } if (i >= sizeof (tryrates) / sizeof (int)) { Sys_Printf ("Sound disabled since interface doesn't even " "support a sample rate of %d\n", tryrates[i - 1]); alFreeConfig (alc); return 0; } sn.speed = tryrates[i]; } /* channels */ s = getenv ("QUAKE_SOUND_CHANNELS"); if (s) sn.channels = atoi (s); else if ((i = COM_CheckParm ("-sndmono")) != 0) sn.channels = 1; else if ((i = COM_CheckParm ("-sndstereo")) != 0) sn.channels = 2; else sn.channels = 2; /* set 'em */ /* channels */ while (sn.channels > 0) { if (alSetChannels (alc, sn.channels) < 0) { Sys_Printf ("Unable to set number of channels to %d, " "trying half\n", sn.channels); sn.channels /= 2; } else break; } if (sn.channels <= 0) { Sys_Printf ("Sound disabled since interface doesn't even support 1 " "channel\n"); alFreeConfig (alc); return 0; } /* sample rate */ alpv.param = AL_RATE; alpv.value.ll = alDoubleToFixed (sn.speed); if (alSetParams (AL_DEFAULT_OUTPUT, &alpv, 1) < 0) { Sys_Printf ("Could not set samplerate of default output to %d: %s\n", sn.speed, alGetErrorString (oserror ())); alFreeConfig (alc); return 0; } /* set sizes of buffers relative to sizes of those for the 'standard' frequency of 11025 use *huge* buffers since at least my indigo2 has enough to do to get sound on the way anyway */ bufsize = 32768 * (int) ((double) sn.speed / 11025.0); dma_buffer = malloc (bufsize); if (dma_buffer == NULL) { Sys_Printf ("Could not get %d bytes of memory for audio dma buffer\n", bufsize); alFreeConfig (alc); return 0; } write_buffer = malloc (bufsize); if (write_buffer == NULL) { Sys_Printf ("Could not get %d bytes of memory for audio write " "buffer\n", bufsize); free (dma_buffer); alFreeConfig (alc); return 0; } /* sample bits */ switch (sn.samplebits) { case 24: i = AL_SAMPLE_24; break; case 16: i = AL_SAMPLE_16; break; default: i = AL_SAMPLE_8; break; } if (alSetWidth (alc, i) < 0) { Sys_Printf ("Could not set wordsize of default output to %d: %s\n", sn.samplebits, alGetErrorString (oserror ())); free (write_buffer); free (dma_buffer); alFreeConfig (alc); return 0; } alp = alOpenPort ("quakeforge", "w", alc); if (!alp) { Sys_Printf ("Could not open sound port: %s\n", alGetErrorString (oserror ())); free (write_buffer); free (dma_buffer); alFreeConfig (alc); return 0; } sn.samples = bufsize / (sn.samplebits / 8); sn.samplepos = 0; sn.submission_chunk = 1; sn.buffer = dma_buffer; framecount = 0; snd_inited = 1; return &sn; } static void SNDDMA_Init_Cvars (void) { } static int SNDDMA_GetDMAPos (void) { /* Sys_Printf("framecount: %d %d\n", (framecount * sn.channels) % sn.samples, alGetFilled(alp)); */ sn.samplepos = ((framecount - alGetFilled (alp)) * sn.channels) % sn.samples; return sn.samplepos; } static void SNDDMA_shutdown (void) { if (snd_inited) { free (write_buffer); free (dma_buffer); alClosePort (alp); alFreeConfig (alc); snd_inited = 0; } } /* SNDDMA_Submit Send sound to device if buffer isn't really the dma buffer */ static void SNDDMA_Submit (void) { unsigned char *p; int bsize, bytes, idx, b; int stop = *plugin_info_snd_output_data.paintedtime; if (snd_blocked) return; if (*plugin_info_snd_output_data.paintedtime < wbufp) wbufp = 0; // reset bsize = sn.channels * (sn.samplebits / 8); bytes = (*plugin_info_snd_output_data.paintedtime - wbufp) * bsize; if (!bytes) return; if (bytes > bufsize) { bytes = bufsize; stop = wbufp + bytes / bsize; } p = write_buffer; idx = (wbufp * bsize) & (bufsize - 1); for (b = bytes; b; b--) { *p++ = dma_buffer[idx]; idx = (idx + 1) & (bufsize - 1); } wbufp = stop; alWriteFrames (alp, write_buffer, bytes / bsize); framecount += bytes / bsize; } static void SNDDMA_BlockSound (void) { } static void SNDDMA_UnblockSound (void) { } PLUGIN_INFO(snd_output, sgi) { plugin_info.type = qfp_snd_output; plugin_info.api_version = QFPLUGIN_VERSION; plugin_info.plugin_version = "0.1"; plugin_info.description = "SGI IRIX digital output"; plugin_info.copyright = "Copyright (C) 1996-1997 id Software, Inc.\n" "Copyright (C) 1999,2000,2001 contributors of the QuakeForge " "project\n" "Please see the file \"AUTHORS\" for a list of contributors"; plugin_info.functions = &plugin_info_funcs; plugin_info.data = &plugin_info_data; plugin_info_data.general = &plugin_info_general_data; plugin_info_data.input = NULL; plugin_info_data.snd_output = &plugin_info_snd_output_data; plugin_info_funcs.general = &plugin_info_general_funcs; plugin_info_funcs.input = NULL; plugin_info_funcs.snd_output = &plugin_info_snd_output_funcs; plugin_info_general_funcs.p_Init = SNDDMA_Init_Cvars; plugin_info_general_funcs.p_Shutdown = NULL; plugin_info_snd_output_funcs.pS_O_Init = SNDDMA_Init; plugin_info_snd_output_funcs.pS_O_Shutdown = SNDDMA_shutdown; plugin_info_snd_output_funcs.pS_O_GetDMAPos = SNDDMA_GetDMAPos; plugin_info_snd_output_funcs.pS_O_Submit = SNDDMA_Submit; plugin_info_snd_output_funcs.pS_O_BlockSound = SNDDMA_BlockSound; plugin_info_snd_output_funcs.pS_O_UnblockSound = SNDDMA_UnblockSound; return &plugin_info; }