2 * QEMU OSS Audio output driver
4 * Copyright (c) 2003 Vassili Karpov (malc)
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
31 /* TODO: Graceful error handling */
37 #define MIN(a, b) ((a)>(b)?(b):(a))
38 #define MAX(a, b) ((a)<(b)?(b):(a))
40 #define DEREF(x) (void)x
41 #define dolog(...) fprintf (stderr, "audio: " __VA_ARGS__)
42 #define ERRFail(...) do { \
44 fprintf (stderr, "audio: " __VA_ARGS__); \
45 fprintf (stderr, "\nsystem error: %s\n", strerror (_errno)); \
48 #define Fail(...) do { \
49 fprintf (stderr, "audio: " __VA_ARGS__); \
50 fprintf (stderr, "\n"); \
55 #define lwarn(...) fprintf (stderr, "audio: " __VA_ARGS__)
56 #define linfo(...) fprintf (stderr, "audio: " __VA_ARGS__)
57 #define ldebug(...) fprintf (stderr, "audio: " __VA_ARGS__)
64 static int get_conf_val (const char *key, int defval)
69 strval = getenv (key);
77 static void copy_no_conversion (void *dst, void *src, int size)
79 memcpy (dst, src, size);
82 static void copy_u16_to_s16 (void *dst, void *src, int size)
90 for (i = 0; i < size / 2; i++) {
91 out[i] = in[i] + 0x8000;
97 #include <SDL/SDL_thread.h>
105 typedef struct AudioState {
113 int bytes_per_second;
121 void (*copy_fn)(void *, void *, int);
124 static AudioState sdl_audio;
130 static void own (AudioState *s)
132 /* SDL_LockAudio (); */
133 if (SDL_mutexP (s->mutex))
134 dolog ("SDL_mutexP: %s\n", SDL_GetError ());
137 static void disown (AudioState *s)
139 /* SDL_UnlockAudio (); */
140 if (SDL_mutexV (s->mutex))
141 dolog ("SDL_mutexV: %s\n", SDL_GetError ());
144 static void sem_wait (AudioState *s)
146 if (SDL_SemWait (s->sem))
147 dolog ("SDL_SemWait: %s\n", SDL_GetError ());
150 static void sem_post (AudioState *s)
152 if (SDL_SemPost (s->sem))
153 dolog ("SDL_SemPost: %s\n", SDL_GetError ());
156 static void audio_callback (void *data, Uint8 *stream, int len)
159 AudioState *s = data;
166 to_mix = MIN (len, s->live);
168 /* printf ("to_mix=%d len=%d live=%d\n", to_mix, len, s->live); */
170 int chunk = MIN (to_mix, s->bufsize - s->rpos);
171 /* SDL_MixAudio (stream, buf, chunk, SDL_MIX_MAXVOLUME); */
172 memcpy (stream, s->buf + s->rpos, chunk);
180 if (s->rpos == s->bufsize) s->rpos = 0;
186 static void sem_zero (AudioState *s)
191 res = SDL_SemTryWait (s->sem);
193 dolog ("SDL_SemTryWait: %s\n", SDL_GetError ());
196 } while (res != SDL_MUTEX_TIMEDOUT);
199 static void do_open (AudioState *s)
202 SDL_AudioSpec obtained;
215 s->bytes_per_second = (s->spec.freq << (s->spec.channels >> 1)) << s->bits16;
216 s->spec.samples = conf.samples;
217 s->spec.userdata = s;
218 s->spec.callback = audio_callback;
220 status = SDL_OpenAudio (&s->spec, &obtained);
222 dolog ("SDL_OpenAudio: %s\n", SDL_GetError ());
226 if (obtained.freq != s->spec.freq ||
227 obtained.channels != s->spec.channels ||
228 obtained.format != s->spec.format) {
229 dolog ("Audio spec mismatch requested obtained\n"
233 s->spec.freq, obtained.freq,
234 s->spec.channels, obtained.channels,
235 s->spec.format, obtained.format
239 s->bufsize = obtained.size;
240 s->buf = qemu_mallocz (s->bufsize);
242 dolog ("qemu_mallocz(%d)\n", s->bufsize);
253 int AUD_write (void *in_buf, int size)
255 AudioState *s = &sdl_audio;
260 to_copy = MIN (s->bufsize - s->live, size);
270 copy = MIN (temp, s->bufsize - s->wpos);
271 s->copy_fn (out + s->wpos, in, copy);
274 if (s->wpos == s->bufsize) {
288 static void maybe_open (AudioState *s, int req_freq, int req_nchannels,
289 audfmt_e req_fmt, int force_open)
297 s->copy_fn = copy_no_conversion;
301 fprintf (stderr, "audio: can not play 8bit signed\n");
307 s->copy_fn = copy_no_conversion;
313 s->copy_fn = copy_u16_to_s16;
322 || (sdl_fmt != s->spec.format)
323 || (req_nchannels != s->spec.channels)
324 || (req_freq != s->spec.freq)
325 || (bits16 != s->bits16)) {
327 s->spec.format = sdl_fmt;
328 s->spec.channels = req_nchannels;
329 s->spec.freq = req_freq;
335 void AUD_reset (int req_freq, int req_nchannels, audfmt_e req_fmt)
337 AudioState *s = &sdl_audio;
339 maybe_open (s, req_freq, req_nchannels, req_fmt, 0);
343 void AUD_open (int req_freq, int req_nchannels, audfmt_e req_fmt)
345 AudioState *s = &sdl_audio;
347 maybe_open (s, req_freq, req_nchannels, req_fmt, 1);
351 void AUD_adjust_estimate (int leftover)
353 AudioState *s = &sdl_audio;
355 s->leftover = leftover;
359 int AUD_get_free (void)
362 uint64_t ticks, delta;
365 AudioState *s = &sdl_audio;
368 free = s->bufsize - s->live;
376 ticks = qemu_get_clock(rt_clock);
377 delta = ticks - s->old_ticks;
378 s->old_ticks = ticks;
380 ua_elapsed = (delta * s->bytes_per_second) / 1000;
381 al_elapsed = ua_elapsed & ~3ULL;
383 ldebug ("tid elapsed %llu bytes\n", ua_elapsed);
385 if (al_elapsed > (uint64_t) INT_MAX)
388 elapsed = al_elapsed;
390 elapsed += s->leftover;
393 if (elapsed > free) {
394 lwarn ("audio can not keep up elapsed %d free %d\n", elapsed, free);
402 int AUD_get_live (void)
405 AudioState *s = &sdl_audio;
413 int AUD_get_buffer_size (void)
416 AudioState *s = &sdl_audio;
419 bufsize = s->bufsize;
424 #define QC_SDL_NSAMPLES "QEMU_SDL_NSAMPLES"
426 static void cleanup (void)
428 AudioState *s = &sdl_audio;
437 AudioState *s = &sdl_audio;
440 SDL_InitSubSystem (SDL_INIT_AUDIO);
441 s->mutex = SDL_CreateMutex ();
443 dolog ("SDL_CreateMutex: %s\n", SDL_GetError ());
447 s->sem = SDL_CreateSemaphore (0);
449 dolog ("SDL_CreateSemaphore: %s\n", SDL_GetError ());
453 conf.samples = get_conf_val (QC_SDL_NSAMPLES, conf.samples);
456 #elif !defined(_WIN32) && !defined(__APPLE__)
461 #include <sys/mman.h>
462 #include <sys/types.h>
463 #include <sys/ioctl.h>
464 #include <sys/soundcard.h>
466 /* http://www.df.lth.se/~john_e/gems/gem002d.html */
467 /* http://www.multi-platforms.com/Tips/PopCount.htm */
468 static inline uint32_t popcount (uint32_t u)
470 u = ((u&0x55555555) + ((u>>1)&0x55555555));
471 u = ((u&0x33333333) + ((u>>2)&0x33333333));
472 u = ((u&0x0f0f0f0f) + ((u>>4)&0x0f0f0f0f));
473 u = ((u&0x00ff00ff) + ((u>>8)&0x00ff00ff));
474 u = ( u&0x0000ffff) + (u>>16);
478 static inline uint32_t lsbindex (uint32_t u)
480 return popcount ((u&-u)-1);
483 #define IOCTL(args) do { \
484 int ret = ioctl args; \
488 ldebug ("ioctl " #args " = %d\n", ret); \
491 typedef struct AudioState {
500 int bytes_per_second;
509 void (*copy_fn)(void *, void *, int);
512 static AudioState oss_audio = { .fd = -1 };
524 static enum {DONT, DSP, TID} est = DONT;
526 static void pab (AudioState *s, struct audio_buf_info *abinfo)
530 ldebug ("fragments %d, fragstotal %d, fragsize %d, bytes %d\n"
531 "rpos %d, wpos %d, live %d\n",
536 s->rpos, s->wpos, s->live);
539 static void do_open (AudioState *s)
542 audio_buf_info abinfo;
543 int fmt, freq, nchannels;
547 if (-1 == munmap (s->buf, s->bufsize)) {
548 ERRFail ("failed to unmap audio buffer %p %d",
561 s->fd = open ("/dev/dsp", O_RDWR | O_NONBLOCK);
563 ERRFail ("can not open /dev/dsp");
568 nchannels = s->nchannels;
570 IOCTL ((s->fd, SNDCTL_DSP_RESET, 1));
571 IOCTL ((s->fd, SNDCTL_DSP_SAMPLESIZE, &fmt));
572 IOCTL ((s->fd, SNDCTL_DSP_CHANNELS, &nchannels));
573 IOCTL ((s->fd, SNDCTL_DSP_SPEED, &freq));
574 IOCTL ((s->fd, SNDCTL_DSP_NONBLOCK));
576 mmmmssss = (conf.nfrags << 16) | conf.fragsize;
577 IOCTL ((s->fd, SNDCTL_DSP_SETFRAGMENT, &mmmmssss));
579 if ((s->oss_fmt != fmt)
580 || (s->nchannels != nchannels)
581 || (s->freq != freq)) {
582 Fail ("failed to set audio parameters\n"
583 "parameter | requested value | obtained value\n"
584 "format | %10d | %10d\n"
585 "channels | %10d | %10d\n"
586 "frequency | %10d | %10d\n",
588 s->nchannels, nchannels,
592 IOCTL ((s->fd, SNDCTL_DSP_GETOSPACE, &abinfo));
594 s->nfrags = abinfo.fragstotal;
595 s->fragsize = abinfo.fragsize;
596 s->bufsize = s->nfrags * s->fragsize;
599 s->bytes_per_second = (freq << (nchannels >> 1)) << s->bits16;
601 linfo ("bytes per second %d\n", s->bytes_per_second);
603 linfo ("fragments %d, fragstotal %d, fragsize %d, bytes %d, bufsize %d\n",
614 s->buf = mmap (NULL, s->bufsize, PROT_WRITE, MAP_SHARED, s->fd, 0);
615 if (MAP_FAILED == s->buf) {
619 dolog ("failed to mmap audio, size %d, fd %d\n"
621 s->bufsize, s->fd, strerror (err));
629 if (MAP_FAILED == s->buf) {
631 s->buf = qemu_mallocz (s->bufsize);
633 ERRFail ("audio buf malloc failed, size %d", s->bufsize);
645 IOCTL ((s->fd, SNDCTL_DSP_SETTRIGGER, &trig));
646 trig = PCM_ENABLE_OUTPUT;
647 IOCTL ((s->fd, SNDCTL_DSP_SETTRIGGER, &trig));
651 static void maybe_open (AudioState *s, int req_freq, int req_nchannels,
652 audfmt_e req_fmt, int force_open)
660 s->copy_fn = copy_no_conversion;
664 Fail ("can not play 8bit signed");
668 oss_fmt = AFMT_S16_LE;
669 s->copy_fn = copy_no_conversion;
674 oss_fmt = AFMT_S16_LE;
675 s->copy_fn = copy_u16_to_s16;
684 || (oss_fmt != s->oss_fmt)
685 || (req_nchannels != s->nchannels)
686 || (req_freq != s->freq)
687 || (bits16 != s->bits16)) {
688 s->oss_fmt = oss_fmt;
689 s->nchannels = req_nchannels;
696 void AUD_reset (int req_freq, int req_nchannels, audfmt_e req_fmt)
698 AudioState *s = &oss_audio;
699 maybe_open (s, req_freq, req_nchannels, req_fmt, 0);
702 void AUD_open (int req_freq, int req_nchannels, audfmt_e req_fmt)
704 AudioState *s = &oss_audio;
705 maybe_open (s, req_freq, req_nchannels, req_fmt, 1);
708 int AUD_write (void *in_buf, int size)
710 AudioState *s = &oss_audio;
714 to_copy = MIN (s->bufsize - s->live, size);
724 copy = MIN (temp, s->bufsize - s->wpos);
725 s->copy_fn (out + s->wpos, in, copy);
728 if (s->wpos == s->bufsize) {
744 struct audio_buf_info abinfo;
745 AudioState *s = &oss_audio;
753 res = ioctl (s->fd, SNDCTL_DSP_GETOPTR, &info);
758 lwarn ("SNDCTL_DSP_GETOPTR failed with %s\n", strerror (err));
762 if (info.ptr > s->old_optr) {
763 bytes = info.ptr - s->old_optr;
766 bytes = s->bufsize + info.ptr - s->old_optr;
769 s->old_optr = info.ptr;
774 res = ioctl (s->fd, SNDCTL_DSP_GETOSPACE, &abinfo);
780 lwarn ("SNDCTL_DSP_GETOSPACE failed with %s\n", strerror (err));
784 bytes = abinfo.bytes;
785 bytes = MIN (s->live, bytes);
787 bytes = (bytes / fragsize) * fragsize;
791 int left, play, written;
793 left = s->bufsize - s->rpos;
794 play = MIN (left, bytes);
795 written = write (s->fd, (uint8_t *)s->buf + s->rpos, play);
798 if (EAGAIN == errno || EINTR == errno) {
802 ERRFail ("write audio");
811 if (s->rpos == s->bufsize) {
817 static int get_dsp_bytes (void)
820 struct count_info info;
821 AudioState *s = &oss_audio;
823 res = ioctl (s->fd, SNDCTL_DSP_GETOPTR, &info);
828 lwarn ("SNDCTL_DSP_GETOPTR failed with %s\n", strerror (err));
832 ldebug ("bytes %d\n", info.bytes);
837 void AUD_adjust_estimate (int leftover)
839 AudioState *s = &oss_audio;
840 s->leftover = leftover;
843 int AUD_get_free (void)
846 AudioState *s = &oss_audio;
848 free = s->bufsize - s->live;
860 static int old_bytes;
863 bytes = get_dsp_bytes ();
867 elapsed = bytes - old_bytes;
869 ldebug ("dsp elapsed %d bytes\n", elapsed);
875 uint64_t ticks, delta;
879 ticks = qemu_get_clock(rt_clock);
880 delta = ticks - s->old_ticks;
881 s->old_ticks = ticks;
883 ua_elapsed = (delta * s->bytes_per_second) / 1000;
884 al_elapsed = ua_elapsed & ~3ULL;
886 ldebug ("tid elapsed %llu bytes\n", ua_elapsed);
888 if (al_elapsed > (uint64_t) INT_MAX)
891 elapsed = al_elapsed;
893 elapsed += s->leftover;
897 if (elapsed > free) {
898 lwarn ("audio can not keep up elapsed %d free %d\n", elapsed, free);
906 int AUD_get_live (void)
908 AudioState *s = &oss_audio;
912 int AUD_get_buffer_size (void)
914 AudioState *s = &oss_audio;
918 #define QC_OSS_FRAGSIZE "QEMU_OSS_FRAGSIZE"
919 #define QC_OSS_NFRAGS "QEMU_OSS_NFRAGS"
920 #define QC_OSS_MMAP "QEMU_OSS_MMAP"
928 conf.fragsize = get_conf_val (QC_OSS_FRAGSIZE, conf.fragsize);
929 conf.nfrags = get_conf_val (QC_OSS_NFRAGS, conf.nfrags);
930 conf.try_mmap = get_conf_val (QC_OSS_MMAP, conf.try_mmap);
933 if (0 != (fsp & (fsp - 1))) {
934 Fail ("fragment size %d is not power of 2", fsp);
937 conf.fragsize = lsbindex (fsp);
946 int AUD_write (void *in_buf, int size)
951 void AUD_reset (int rfreq, int rnchannels, audfmt_e rfmt)
955 void AUD_adjust_estimate (int _leftover)
959 int AUD_get_free (void)
964 int AUD_get_live (void)
969 int AUD_get_buffer_size (void)