|  | /* | 
|  | * QEMU SDL audio driver | 
|  | * | 
|  | * Copyright (c) 2004-2005 Vassili Karpov (malc) | 
|  | * | 
|  | * Permission is hereby granted, free of charge, to any person obtaining a copy | 
|  | * of this software and associated documentation files (the "Software"), to deal | 
|  | * in the Software without restriction, including without limitation the rights | 
|  | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | 
|  | * copies of the Software, and to permit persons to whom the Software is | 
|  | * furnished to do so, subject to the following conditions: | 
|  | * | 
|  | * The above copyright notice and this permission notice shall be included in | 
|  | * all copies or substantial portions of the Software. | 
|  | * | 
|  | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | 
|  | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | 
|  | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL | 
|  | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER | 
|  | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, | 
|  | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN | 
|  | * THE SOFTWARE. | 
|  | */ | 
|  | #include <SDL.h> | 
|  | #include <SDL_thread.h> | 
|  | #include "qemu-common.h" | 
|  | #include "audio.h" | 
|  |  | 
|  | #ifndef _WIN32 | 
|  | #ifdef __sun__ | 
|  | #define _POSIX_PTHREAD_SEMANTICS 1 | 
|  | #elif defined(__OpenBSD__) || defined(__FreeBSD__) || defined(__DragonFly__) | 
|  | #include <pthread.h> | 
|  | #endif | 
|  | #endif | 
|  |  | 
|  | #define AUDIO_CAP "sdl" | 
|  | #include "audio_int.h" | 
|  |  | 
|  | typedef struct SDLVoiceOut { | 
|  | HWVoiceOut hw; | 
|  | int live; | 
|  | int rpos; | 
|  | int decr; | 
|  | } SDLVoiceOut; | 
|  |  | 
|  | static struct { | 
|  | int nb_samples; | 
|  | } conf = { | 
|  | .nb_samples = 1024 | 
|  | }; | 
|  |  | 
|  | static struct SDLAudioState { | 
|  | int exit; | 
|  | SDL_mutex *mutex; | 
|  | SDL_sem *sem; | 
|  | int initialized; | 
|  | bool driver_created; | 
|  | } glob_sdl; | 
|  | typedef struct SDLAudioState SDLAudioState; | 
|  |  | 
|  | static void GCC_FMT_ATTR (1, 2) sdl_logerr (const char *fmt, ...) | 
|  | { | 
|  | va_list ap; | 
|  |  | 
|  | va_start (ap, fmt); | 
|  | AUD_vlog (AUDIO_CAP, fmt, ap); | 
|  | va_end (ap); | 
|  |  | 
|  | AUD_log (AUDIO_CAP, "Reason: %s\n", SDL_GetError ()); | 
|  | } | 
|  |  | 
|  | static int sdl_lock (SDLAudioState *s, const char *forfn) | 
|  | { | 
|  | if (SDL_LockMutex (s->mutex)) { | 
|  | sdl_logerr ("SDL_LockMutex for %s failed\n", forfn); | 
|  | return -1; | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int sdl_unlock (SDLAudioState *s, const char *forfn) | 
|  | { | 
|  | if (SDL_UnlockMutex (s->mutex)) { | 
|  | sdl_logerr ("SDL_UnlockMutex for %s failed\n", forfn); | 
|  | return -1; | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int sdl_post (SDLAudioState *s, const char *forfn) | 
|  | { | 
|  | if (SDL_SemPost (s->sem)) { | 
|  | sdl_logerr ("SDL_SemPost for %s failed\n", forfn); | 
|  | return -1; | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int sdl_wait (SDLAudioState *s, const char *forfn) | 
|  | { | 
|  | if (SDL_SemWait (s->sem)) { | 
|  | sdl_logerr ("SDL_SemWait for %s failed\n", forfn); | 
|  | return -1; | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int sdl_unlock_and_post (SDLAudioState *s, const char *forfn) | 
|  | { | 
|  | if (sdl_unlock (s, forfn)) { | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | return sdl_post (s, forfn); | 
|  | } | 
|  |  | 
|  | static int aud_to_sdlfmt (audfmt_e fmt) | 
|  | { | 
|  | switch (fmt) { | 
|  | case AUD_FMT_S8: | 
|  | return AUDIO_S8; | 
|  |  | 
|  | case AUD_FMT_U8: | 
|  | return AUDIO_U8; | 
|  |  | 
|  | case AUD_FMT_S16: | 
|  | return AUDIO_S16LSB; | 
|  |  | 
|  | case AUD_FMT_U16: | 
|  | return AUDIO_U16LSB; | 
|  |  | 
|  | default: | 
|  | dolog ("Internal logic error: Bad audio format %d\n", fmt); | 
|  | #ifdef DEBUG_AUDIO | 
|  | abort (); | 
|  | #endif | 
|  | return AUDIO_U8; | 
|  | } | 
|  | } | 
|  |  | 
|  | static int sdl_to_audfmt(int sdlfmt, audfmt_e *fmt, int *endianness) | 
|  | { | 
|  | switch (sdlfmt) { | 
|  | case AUDIO_S8: | 
|  | *endianness = 0; | 
|  | *fmt = AUD_FMT_S8; | 
|  | break; | 
|  |  | 
|  | case AUDIO_U8: | 
|  | *endianness = 0; | 
|  | *fmt = AUD_FMT_U8; | 
|  | break; | 
|  |  | 
|  | case AUDIO_S16LSB: | 
|  | *endianness = 0; | 
|  | *fmt = AUD_FMT_S16; | 
|  | break; | 
|  |  | 
|  | case AUDIO_U16LSB: | 
|  | *endianness = 0; | 
|  | *fmt = AUD_FMT_U16; | 
|  | break; | 
|  |  | 
|  | case AUDIO_S16MSB: | 
|  | *endianness = 1; | 
|  | *fmt = AUD_FMT_S16; | 
|  | break; | 
|  |  | 
|  | case AUDIO_U16MSB: | 
|  | *endianness = 1; | 
|  | *fmt = AUD_FMT_U16; | 
|  | break; | 
|  |  | 
|  | default: | 
|  | dolog ("Unrecognized SDL audio format %d\n", sdlfmt); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int sdl_open (SDL_AudioSpec *req, SDL_AudioSpec *obt) | 
|  | { | 
|  | int status; | 
|  | #ifndef _WIN32 | 
|  | int err; | 
|  | sigset_t new, old; | 
|  |  | 
|  | /* Make sure potential threads created by SDL don't hog signals.  */ | 
|  | err = sigfillset (&new); | 
|  | if (err) { | 
|  | dolog ("sdl_open: sigfillset failed: %s\n", strerror (errno)); | 
|  | return -1; | 
|  | } | 
|  | err = pthread_sigmask (SIG_BLOCK, &new, &old); | 
|  | if (err) { | 
|  | dolog ("sdl_open: pthread_sigmask failed: %s\n", strerror (err)); | 
|  | return -1; | 
|  | } | 
|  | #endif | 
|  |  | 
|  | status = SDL_OpenAudio (req, obt); | 
|  | if (status) { | 
|  | sdl_logerr ("SDL_OpenAudio failed\n"); | 
|  | } | 
|  |  | 
|  | #ifndef _WIN32 | 
|  | err = pthread_sigmask (SIG_SETMASK, &old, NULL); | 
|  | if (err) { | 
|  | dolog ("sdl_open: pthread_sigmask (restore) failed: %s\n", | 
|  | strerror (errno)); | 
|  | /* We have failed to restore original signal mask, all bets are off, | 
|  | so exit the process */ | 
|  | exit (EXIT_FAILURE); | 
|  | } | 
|  | #endif | 
|  | return status; | 
|  | } | 
|  |  | 
|  | static void sdl_close (SDLAudioState *s) | 
|  | { | 
|  | if (s->initialized) { | 
|  | sdl_lock (s, "sdl_close"); | 
|  | s->exit = 1; | 
|  | sdl_unlock_and_post (s, "sdl_close"); | 
|  | SDL_PauseAudio (1); | 
|  | SDL_CloseAudio (); | 
|  | s->initialized = 0; | 
|  | } | 
|  | } | 
|  |  | 
|  | static void sdl_callback (void *opaque, Uint8 *buf, int len) | 
|  | { | 
|  | SDLVoiceOut *sdl = opaque; | 
|  | SDLAudioState *s = &glob_sdl; | 
|  | HWVoiceOut *hw = &sdl->hw; | 
|  | int samples = len >> hw->info.shift; | 
|  |  | 
|  | if (s->exit) { | 
|  | return; | 
|  | } | 
|  |  | 
|  | while (samples) { | 
|  | int to_mix, decr; | 
|  |  | 
|  | /* dolog ("in callback samples=%d\n", samples); */ | 
|  | sdl_wait (s, "sdl_callback"); | 
|  | if (s->exit) { | 
|  | return; | 
|  | } | 
|  |  | 
|  | if (sdl_lock (s, "sdl_callback")) { | 
|  | return; | 
|  | } | 
|  |  | 
|  | if (audio_bug (AUDIO_FUNC, sdl->live < 0 || sdl->live > hw->samples)) { | 
|  | dolog ("sdl->live=%d hw->samples=%d\n", | 
|  | sdl->live, hw->samples); | 
|  | return; | 
|  | } | 
|  |  | 
|  | if (!sdl->live) { | 
|  | goto again; | 
|  | } | 
|  |  | 
|  | /* dolog ("in callback live=%d\n", live); */ | 
|  | to_mix = audio_MIN (samples, sdl->live); | 
|  | decr = to_mix; | 
|  | while (to_mix) { | 
|  | int chunk = audio_MIN (to_mix, hw->samples - hw->rpos); | 
|  | struct st_sample *src = hw->mix_buf + hw->rpos; | 
|  |  | 
|  | /* dolog ("in callback to_mix %d, chunk %d\n", to_mix, chunk); */ | 
|  | hw->clip (buf, src, chunk); | 
|  | sdl->rpos = (sdl->rpos + chunk) % hw->samples; | 
|  | to_mix -= chunk; | 
|  | buf += chunk << hw->info.shift; | 
|  | } | 
|  | samples -= decr; | 
|  | sdl->live -= decr; | 
|  | sdl->decr += decr; | 
|  |  | 
|  | again: | 
|  | if (sdl_unlock (s, "sdl_callback")) { | 
|  | return; | 
|  | } | 
|  | } | 
|  | /* dolog ("done len=%d\n", len); */ | 
|  | } | 
|  |  | 
|  | static int sdl_write_out (SWVoiceOut *sw, void *buf, int len) | 
|  | { | 
|  | return audio_pcm_sw_write (sw, buf, len); | 
|  | } | 
|  |  | 
|  | static int sdl_run_out (HWVoiceOut *hw, int live) | 
|  | { | 
|  | int decr; | 
|  | SDLVoiceOut *sdl = (SDLVoiceOut *) hw; | 
|  | SDLAudioState *s = &glob_sdl; | 
|  |  | 
|  | if (sdl_lock (s, "sdl_run_out")) { | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | if (sdl->decr > live) { | 
|  | ldebug ("sdl->decr %d live %d sdl->live %d\n", | 
|  | sdl->decr, | 
|  | live, | 
|  | sdl->live); | 
|  | } | 
|  |  | 
|  | decr = audio_MIN (sdl->decr, live); | 
|  | sdl->decr -= decr; | 
|  |  | 
|  | sdl->live = live - decr; | 
|  | hw->rpos = sdl->rpos; | 
|  |  | 
|  | if (sdl->live > 0) { | 
|  | sdl_unlock_and_post (s, "sdl_run_out"); | 
|  | } | 
|  | else { | 
|  | sdl_unlock (s, "sdl_run_out"); | 
|  | } | 
|  | return decr; | 
|  | } | 
|  |  | 
|  | static void sdl_fini_out (HWVoiceOut *hw) | 
|  | { | 
|  | (void) hw; | 
|  |  | 
|  | sdl_close (&glob_sdl); | 
|  | } | 
|  |  | 
|  | static int sdl_init_out(HWVoiceOut *hw, struct audsettings *as, | 
|  | void *drv_opaque) | 
|  | { | 
|  | SDLVoiceOut *sdl = (SDLVoiceOut *) hw; | 
|  | SDLAudioState *s = &glob_sdl; | 
|  | SDL_AudioSpec req, obt; | 
|  | int endianness; | 
|  | int err; | 
|  | audfmt_e effective_fmt; | 
|  | struct audsettings obt_as; | 
|  |  | 
|  | req.freq = as->freq; | 
|  | req.format = aud_to_sdlfmt (as->fmt); | 
|  | req.channels = as->nchannels; | 
|  | req.samples = conf.nb_samples; | 
|  | req.callback = sdl_callback; | 
|  | req.userdata = sdl; | 
|  |  | 
|  | if (sdl_open (&req, &obt)) { | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | err = sdl_to_audfmt(obt.format, &effective_fmt, &endianness); | 
|  | if (err) { | 
|  | sdl_close (s); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | obt_as.freq = obt.freq; | 
|  | obt_as.nchannels = obt.channels; | 
|  | obt_as.fmt = effective_fmt; | 
|  | obt_as.endianness = endianness; | 
|  |  | 
|  | audio_pcm_init_info (&hw->info, &obt_as); | 
|  | hw->samples = obt.samples; | 
|  |  | 
|  | s->initialized = 1; | 
|  | s->exit = 0; | 
|  | SDL_PauseAudio (0); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int sdl_ctl_out (HWVoiceOut *hw, int cmd, ...) | 
|  | { | 
|  | (void) hw; | 
|  |  | 
|  | switch (cmd) { | 
|  | case VOICE_ENABLE: | 
|  | SDL_PauseAudio (0); | 
|  | break; | 
|  |  | 
|  | case VOICE_DISABLE: | 
|  | SDL_PauseAudio (1); | 
|  | break; | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static void *sdl_audio_init (void) | 
|  | { | 
|  | SDLAudioState *s = &glob_sdl; | 
|  | if (s->driver_created) { | 
|  | sdl_logerr("Can't create multiple sdl backends\n"); | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | if (SDL_InitSubSystem (SDL_INIT_AUDIO)) { | 
|  | sdl_logerr ("SDL failed to initialize audio subsystem\n"); | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | s->mutex = SDL_CreateMutex (); | 
|  | if (!s->mutex) { | 
|  | sdl_logerr ("Failed to create SDL mutex\n"); | 
|  | SDL_QuitSubSystem (SDL_INIT_AUDIO); | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | s->sem = SDL_CreateSemaphore (0); | 
|  | if (!s->sem) { | 
|  | sdl_logerr ("Failed to create SDL semaphore\n"); | 
|  | SDL_DestroyMutex (s->mutex); | 
|  | SDL_QuitSubSystem (SDL_INIT_AUDIO); | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | s->driver_created = true; | 
|  | return s; | 
|  | } | 
|  |  | 
|  | static void sdl_audio_fini (void *opaque) | 
|  | { | 
|  | SDLAudioState *s = opaque; | 
|  | sdl_close (s); | 
|  | SDL_DestroySemaphore (s->sem); | 
|  | SDL_DestroyMutex (s->mutex); | 
|  | SDL_QuitSubSystem (SDL_INIT_AUDIO); | 
|  | s->driver_created = false; | 
|  | } | 
|  |  | 
|  | static struct audio_option sdl_options[] = { | 
|  | { | 
|  | .name  = "SAMPLES", | 
|  | .tag   = AUD_OPT_INT, | 
|  | .valp  = &conf.nb_samples, | 
|  | .descr = "Size of SDL buffer in samples" | 
|  | }, | 
|  | { /* End of list */ } | 
|  | }; | 
|  |  | 
|  | static struct audio_pcm_ops sdl_pcm_ops = { | 
|  | .init_out = sdl_init_out, | 
|  | .fini_out = sdl_fini_out, | 
|  | .run_out  = sdl_run_out, | 
|  | .write    = sdl_write_out, | 
|  | .ctl_out  = sdl_ctl_out, | 
|  | }; | 
|  |  | 
|  | struct audio_driver sdl_audio_driver = { | 
|  | .name           = "sdl", | 
|  | .descr          = "SDL http://www.libsdl.org", | 
|  | .options        = sdl_options, | 
|  | .init           = sdl_audio_init, | 
|  | .fini           = sdl_audio_fini, | 
|  | .pcm_ops        = &sdl_pcm_ops, | 
|  | .can_be_default = 1, | 
|  | .max_voices_out = 1, | 
|  | .max_voices_in  = 0, | 
|  | .voice_size_out = sizeof (SDLVoiceOut), | 
|  | .voice_size_in  = 0 | 
|  | }; |