4 * Copyright (c) 2003-2005 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
27 #include "qemu-timer.h"
30 #define AUDIO_CAP "audio"
31 #include "audio_int.h"
33 /* #define DEBUG_PLIVE */
34 /* #define DEBUG_LIVE */
35 /* #define DEBUG_OUT */
36 /* #define DEBUG_CAPTURE */
38 #define SW_NAME(sw) (sw)->name ? (sw)->name : "unknown"
40 static struct audio_driver
*drvtab
[] = {
46 struct fixed_settings
{
50 audsettings_t settings
;
54 struct fixed_settings fixed_out
;
55 struct fixed_settings fixed_in
;
63 { /* DAC fixed settings */
70 AUD_FMT_S16
, /* fmt */
75 { /* ADC fixed settings */
82 AUD_FMT_S16
, /* fmt */
89 0 /* log_to_monitor */
92 static AudioState glob_audio_state
;
94 volume_t nominal_volume
= {
105 /* http://www.df.lth.se/~john_e/gems/gem002d.html */
106 /* http://www.multi-platforms.com/Tips/PopCount.htm */
107 uint32_t popcount (uint32_t u
)
109 u
= ((u
&0x55555555) + ((u
>>1)&0x55555555));
110 u
= ((u
&0x33333333) + ((u
>>2)&0x33333333));
111 u
= ((u
&0x0f0f0f0f) + ((u
>>4)&0x0f0f0f0f));
112 u
= ((u
&0x00ff00ff) + ((u
>>8)&0x00ff00ff));
113 u
= ( u
&0x0000ffff) + (u
>>16);
117 inline uint32_t lsbindex (uint32_t u
)
119 return popcount ((u
&-u
)-1);
122 #ifdef AUDIO_IS_FLAWLESS_AND_NO_CHECKS_ARE_REQURIED
125 int audio_bug (const char *funcname
, int cond
)
130 AUD_log (NULL
, "A bug was just triggered in %s\n", funcname
);
133 AUD_log (NULL
, "Save all your work and restart without audio\n");
134 AUD_log (NULL
, "Please send bug report to malc@pulsesoft.com\n");
135 AUD_log (NULL
, "I am sorry\n");
137 AUD_log (NULL
, "Context:\n");
139 #if defined AUDIO_BREAKPOINT_ON_BUG
140 # if defined HOST_I386
141 # if defined __GNUC__
143 # elif defined _MSC_VER
158 static inline int audio_bits_to_index (int bits
)
171 audio_bug ("bits_to_index", 1);
172 AUD_log (NULL
, "invalid bits %d\n", bits
);
177 void *audio_calloc (const char *funcname
, int nmemb
, size_t size
)
183 cond
= !nmemb
|| !size
;
187 if (audio_bug ("audio_calloc", cond
)) {
188 AUD_log (NULL
, "%s passed invalid arguments to audio_calloc\n",
190 AUD_log (NULL
, "nmemb=%d size=%zu (len=%zu)\n", nmemb
, size
, len
);
194 return qemu_mallocz (len
);
197 static char *audio_alloc_prefix (const char *s
)
199 const char qemu_prefix
[] = "QEMU_";
208 r
= qemu_malloc (len
+ sizeof (qemu_prefix
));
212 char *u
= r
+ sizeof (qemu_prefix
) - 1;
214 strcpy (r
, qemu_prefix
);
217 for (i
= 0; i
< len
; ++i
) {
218 u
[i
] = toupper (u
[i
]);
224 static const char *audio_audfmt_to_string (audfmt_e fmt
)
246 dolog ("Bogus audfmt %d returning S16\n", fmt
);
250 static audfmt_e
audio_string_to_audfmt (const char *s
, audfmt_e defval
,
253 if (!strcasecmp (s
, "u8")) {
257 else if (!strcasecmp (s
, "u16")) {
261 else if (!strcasecmp (s
, "u32")) {
265 else if (!strcasecmp (s
, "s8")) {
269 else if (!strcasecmp (s
, "s16")) {
273 else if (!strcasecmp (s
, "s32")) {
278 dolog ("Bogus audio format `%s' using %s\n",
279 s
, audio_audfmt_to_string (defval
));
285 static audfmt_e
audio_get_conf_fmt (const char *envname
,
289 const char *var
= getenv (envname
);
294 return audio_string_to_audfmt (var
, defval
, defaultp
);
297 static int audio_get_conf_int (const char *key
, int defval
, int *defaultp
)
302 strval
= getenv (key
);
314 static const char *audio_get_conf_str (const char *key
,
318 const char *val
= getenv (key
);
329 void AUD_vlog (const char *cap
, const char *fmt
, va_list ap
)
331 if (conf
.log_to_monitor
) {
333 term_printf ("%s: ", cap
);
336 term_vprintf (fmt
, ap
);
340 fprintf (stderr
, "%s: ", cap
);
343 vfprintf (stderr
, fmt
, ap
);
347 void AUD_log (const char *cap
, const char *fmt
, ...)
352 AUD_vlog (cap
, fmt
, ap
);
356 static void audio_print_options (const char *prefix
,
357 struct audio_option
*opt
)
362 dolog ("No prefix specified\n");
367 dolog ("No options\n");
371 uprefix
= audio_alloc_prefix (prefix
);
373 for (; opt
->name
; opt
++) {
374 const char *state
= "default";
375 printf (" %s_%s: ", uprefix
, opt
->name
);
377 if (opt
->overriddenp
&& *opt
->overriddenp
) {
384 int *intp
= opt
->valp
;
385 printf ("boolean, %s = %d\n", state
, *intp
? 1 : 0);
391 int *intp
= opt
->valp
;
392 printf ("integer, %s = %d\n", state
, *intp
);
398 audfmt_e
*fmtp
= opt
->valp
;
400 "format, %s = %s, (one of: U8 S8 U16 S16 U32 S32)\n",
402 audio_audfmt_to_string (*fmtp
)
409 const char **strp
= opt
->valp
;
410 printf ("string, %s = %s\n",
412 *strp
? *strp
: "(not set)");
418 dolog ("Bad value tag for option %s_%s %d\n",
419 uprefix
, opt
->name
, opt
->tag
);
422 printf (" %s\n", opt
->descr
);
428 static void audio_process_options (const char *prefix
,
429 struct audio_option
*opt
)
432 const char qemu_prefix
[] = "QEMU_";
435 if (audio_bug (AUDIO_FUNC
, !prefix
)) {
436 dolog ("prefix = NULL\n");
440 if (audio_bug (AUDIO_FUNC
, !opt
)) {
441 dolog ("opt = NULL\n");
445 preflen
= strlen (prefix
);
447 for (; opt
->name
; opt
++) {
452 dolog ("Option value pointer for `%s' is not set\n",
457 len
= strlen (opt
->name
);
458 /* len of opt->name + len of prefix + size of qemu_prefix
459 * (includes trailing zero) + zero + underscore (on behalf of
461 optname
= qemu_malloc (len
+ preflen
+ sizeof (qemu_prefix
) + 1);
463 dolog ("Could not allocate memory for option name `%s'\n",
468 strcpy (optname
, qemu_prefix
);
470 /* copy while upper-casing, including trailing zero */
471 for (i
= 0; i
<= preflen
; ++i
) {
472 optname
[i
+ sizeof (qemu_prefix
) - 1] = toupper (prefix
[i
]);
474 strcat (optname
, "_");
475 strcat (optname
, opt
->name
);
482 int *intp
= opt
->valp
;
483 *intp
= audio_get_conf_int (optname
, *intp
, &def
);
489 audfmt_e
*fmtp
= opt
->valp
;
490 *fmtp
= audio_get_conf_fmt (optname
, *fmtp
, &def
);
496 const char **strp
= opt
->valp
;
497 *strp
= audio_get_conf_str (optname
, *strp
, &def
);
502 dolog ("Bad value tag for option `%s' - %d\n",
507 if (!opt
->overriddenp
) {
508 opt
->overriddenp
= &opt
->overridden
;
510 *opt
->overriddenp
= !def
;
515 static void audio_print_settings (audsettings_t
*as
)
517 dolog ("frequency=%d nchannels=%d fmt=", as
->freq
, as
->nchannels
);
521 AUD_log (NULL
, "S8");
524 AUD_log (NULL
, "U8");
527 AUD_log (NULL
, "S16");
530 AUD_log (NULL
, "U16");
533 AUD_log (NULL
, "S32");
536 AUD_log (NULL
, "U32");
539 AUD_log (NULL
, "invalid(%d)", as
->fmt
);
543 AUD_log (NULL
, " endianness=");
544 switch (as
->endianness
) {
546 AUD_log (NULL
, "little");
549 AUD_log (NULL
, "big");
552 AUD_log (NULL
, "invalid");
555 AUD_log (NULL
, "\n");
558 static int audio_validate_settings (audsettings_t
*as
)
562 invalid
= as
->nchannels
!= 1 && as
->nchannels
!= 2;
563 invalid
|= as
->endianness
!= 0 && as
->endianness
!= 1;
578 invalid
|= as
->freq
<= 0;
579 return invalid
? -1 : 0;
582 static int audio_pcm_info_eq (struct audio_pcm_info
*info
, audsettings_t
*as
)
584 int bits
= 8, sign
= 0;
604 return info
->freq
== as
->freq
605 && info
->nchannels
== as
->nchannels
606 && info
->sign
== sign
607 && info
->bits
== bits
608 && info
->swap_endianness
== (as
->endianness
!= AUDIO_HOST_ENDIANNESS
);
611 void audio_pcm_init_info (struct audio_pcm_info
*info
, audsettings_t
*as
)
613 int bits
= 8, sign
= 0, shift
= 0;
636 info
->freq
= as
->freq
;
639 info
->nchannels
= as
->nchannels
;
640 info
->shift
= (as
->nchannels
== 2) + shift
;
641 info
->align
= (1 << info
->shift
) - 1;
642 info
->bytes_per_second
= info
->freq
<< info
->shift
;
643 info
->swap_endianness
= (as
->endianness
!= AUDIO_HOST_ENDIANNESS
);
646 void audio_pcm_info_clear_buf (struct audio_pcm_info
*info
, void *buf
, int len
)
653 memset (buf
, 0x00, len
<< info
->shift
);
656 switch (info
->bits
) {
658 memset (buf
, 0x80, len
<< info
->shift
);
665 int shift
= info
->nchannels
- 1;
668 if (info
->swap_endianness
) {
672 for (i
= 0; i
< len
<< shift
; i
++) {
682 int shift
= info
->nchannels
- 1;
683 int32_t s
= INT32_MAX
;
685 if (info
->swap_endianness
) {
689 for (i
= 0; i
< len
<< shift
; i
++) {
696 AUD_log (NULL
, "audio_pcm_info_clear_buf: invalid bits %d\n",
706 static void noop_conv (st_sample_t
*dst
, const void *src
,
707 int samples
, volume_t
*vol
)
715 static CaptureVoiceOut
*audio_pcm_capture_find_specific (
720 CaptureVoiceOut
*cap
;
722 for (cap
= s
->cap_head
.lh_first
; cap
; cap
= cap
->entries
.le_next
) {
723 if (audio_pcm_info_eq (&cap
->hw
.info
, as
)) {
730 static void audio_notify_capture (CaptureVoiceOut
*cap
, audcnotification_e cmd
)
732 struct capture_callback
*cb
;
735 dolog ("notification %d sent\n", cmd
);
737 for (cb
= cap
->cb_head
.lh_first
; cb
; cb
= cb
->entries
.le_next
) {
738 cb
->ops
.notify (cb
->opaque
, cmd
);
742 static void audio_capture_maybe_changed (CaptureVoiceOut
*cap
, int enabled
)
744 if (cap
->hw
.enabled
!= enabled
) {
745 audcnotification_e cmd
;
746 cap
->hw
.enabled
= enabled
;
747 cmd
= enabled
? AUD_CNOTIFY_ENABLE
: AUD_CNOTIFY_DISABLE
;
748 audio_notify_capture (cap
, cmd
);
752 static void audio_recalc_and_notify_capture (CaptureVoiceOut
*cap
)
754 HWVoiceOut
*hw
= &cap
->hw
;
758 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
764 audio_capture_maybe_changed (cap
, enabled
);
767 static void audio_detach_capture (HWVoiceOut
*hw
)
769 SWVoiceCap
*sc
= hw
->cap_head
.lh_first
;
772 SWVoiceCap
*sc1
= sc
->entries
.le_next
;
773 SWVoiceOut
*sw
= &sc
->sw
;
774 CaptureVoiceOut
*cap
= sc
->cap
;
775 int was_active
= sw
->active
;
778 st_rate_stop (sw
->rate
);
782 LIST_REMOVE (sw
, entries
);
783 LIST_REMOVE (sc
, entries
);
786 /* We have removed soft voice from the capture:
787 this might have changed the overall status of the capture
788 since this might have been the only active voice */
789 audio_recalc_and_notify_capture (cap
);
795 static int audio_attach_capture (AudioState
*s
, HWVoiceOut
*hw
)
797 CaptureVoiceOut
*cap
;
799 audio_detach_capture (hw
);
800 for (cap
= s
->cap_head
.lh_first
; cap
; cap
= cap
->entries
.le_next
) {
803 HWVoiceOut
*hw_cap
= &cap
->hw
;
805 sc
= audio_calloc (AUDIO_FUNC
, 1, sizeof (*sc
));
807 dolog ("Could not allocate soft capture voice (%zu bytes)\n",
817 sw
->active
= hw
->enabled
;
818 sw
->conv
= noop_conv
;
819 sw
->ratio
= ((int64_t) hw_cap
->info
.freq
<< 32) / sw
->info
.freq
;
820 sw
->rate
= st_rate_start (sw
->info
.freq
, hw_cap
->info
.freq
);
822 dolog ("Could not start rate conversion for `%s'\n", SW_NAME (sw
));
826 LIST_INSERT_HEAD (&hw_cap
->sw_head
, sw
, entries
);
827 LIST_INSERT_HEAD (&hw
->cap_head
, sc
, entries
);
829 asprintf (&sw
->name
, "for %p %d,%d,%d",
830 hw
, sw
->info
.freq
, sw
->info
.bits
, sw
->info
.nchannels
);
831 dolog ("Added %s active = %d\n", sw
->name
, sw
->active
);
834 audio_capture_maybe_changed (cap
, 1);
841 * Hard voice (capture)
843 static int audio_pcm_hw_find_min_in (HWVoiceIn
*hw
)
846 int m
= hw
->total_samples_captured
;
848 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
850 m
= audio_MIN (m
, sw
->total_hw_samples_acquired
);
856 int audio_pcm_hw_get_live_in (HWVoiceIn
*hw
)
858 int live
= hw
->total_samples_captured
- audio_pcm_hw_find_min_in (hw
);
859 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
860 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
867 * Soft voice (capture)
869 static int audio_pcm_sw_get_rpos_in (SWVoiceIn
*sw
)
871 HWVoiceIn
*hw
= sw
->hw
;
872 int live
= hw
->total_samples_captured
- sw
->total_hw_samples_acquired
;
875 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
876 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
880 rpos
= hw
->wpos
- live
;
885 return hw
->samples
+ rpos
;
889 int audio_pcm_sw_read (SWVoiceIn
*sw
, void *buf
, int size
)
891 HWVoiceIn
*hw
= sw
->hw
;
892 int samples
, live
, ret
= 0, swlim
, isamp
, osamp
, rpos
, total
= 0;
893 st_sample_t
*src
, *dst
= sw
->buf
;
895 rpos
= audio_pcm_sw_get_rpos_in (sw
) % hw
->samples
;
897 live
= hw
->total_samples_captured
- sw
->total_hw_samples_acquired
;
898 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
899 dolog ("live_in=%d hw->samples=%d\n", live
, hw
->samples
);
903 samples
= size
>> sw
->info
.shift
;
908 swlim
= (live
* sw
->ratio
) >> 32;
909 swlim
= audio_MIN (swlim
, samples
);
912 src
= hw
->conv_buf
+ rpos
;
913 isamp
= hw
->wpos
- rpos
;
916 isamp
= hw
->samples
- rpos
;
924 if (audio_bug (AUDIO_FUNC
, osamp
< 0)) {
925 dolog ("osamp=%d\n", osamp
);
929 st_rate_flow (sw
->rate
, src
, dst
, &isamp
, &osamp
);
931 rpos
= (rpos
+ isamp
) % hw
->samples
;
937 sw
->clip (buf
, sw
->buf
, ret
);
938 sw
->total_hw_samples_acquired
+= total
;
939 return ret
<< sw
->info
.shift
;
943 * Hard voice (playback)
945 static int audio_pcm_hw_find_min_out (HWVoiceOut
*hw
, int *nb_livep
)
951 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
952 if (sw
->active
|| !sw
->empty
) {
953 m
= audio_MIN (m
, sw
->total_hw_samples_mixed
);
962 int audio_pcm_hw_get_live_out2 (HWVoiceOut
*hw
, int *nb_live
)
966 smin
= audio_pcm_hw_find_min_out (hw
, nb_live
);
974 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
975 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
982 int audio_pcm_hw_get_live_out (HWVoiceOut
*hw
)
987 live
= audio_pcm_hw_get_live_out2 (hw
, &nb_live
);
988 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
989 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
996 * Soft voice (playback)
998 int audio_pcm_sw_write (SWVoiceOut
*sw
, void *buf
, int size
)
1000 int hwsamples
, samples
, isamp
, osamp
, wpos
, live
, dead
, left
, swlim
, blck
;
1001 int ret
= 0, pos
= 0, total
= 0;
1007 hwsamples
= sw
->hw
->samples
;
1009 live
= sw
->total_hw_samples_mixed
;
1010 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hwsamples
)){
1011 dolog ("live=%d hw->samples=%d\n", live
, hwsamples
);
1015 if (live
== hwsamples
) {
1017 dolog ("%s is full %d\n", sw
->name
, live
);
1022 wpos
= (sw
->hw
->rpos
+ live
) % hwsamples
;
1023 samples
= size
>> sw
->info
.shift
;
1025 dead
= hwsamples
- live
;
1026 swlim
= ((int64_t) dead
<< 32) / sw
->ratio
;
1027 swlim
= audio_MIN (swlim
, samples
);
1029 sw
->conv (sw
->buf
, buf
, swlim
, &sw
->vol
);
1033 dead
= hwsamples
- live
;
1034 left
= hwsamples
- wpos
;
1035 blck
= audio_MIN (dead
, left
);
1044 sw
->hw
->mix_buf
+ wpos
,
1052 wpos
= (wpos
+ osamp
) % hwsamples
;
1056 sw
->total_hw_samples_mixed
+= total
;
1057 sw
->empty
= sw
->total_hw_samples_mixed
== 0;
1061 "%s: write size %d ret %d total sw %d\n",
1063 size
>> sw
->info
.shift
,
1065 sw
->total_hw_samples_mixed
1069 return ret
<< sw
->info
.shift
;
1073 static void audio_pcm_print_info (const char *cap
, struct audio_pcm_info
*info
)
1075 dolog ("%s: bits %d, sign %d, freq %d, nchan %d\n",
1076 cap
, info
->bits
, info
->sign
, info
->freq
, info
->nchannels
);
1081 #include "audio_template.h"
1083 #include "audio_template.h"
1085 int AUD_write (SWVoiceOut
*sw
, void *buf
, int size
)
1090 /* XXX: Consider options */
1094 if (!sw
->hw
->enabled
) {
1095 dolog ("Writing to disabled voice %s\n", SW_NAME (sw
));
1099 bytes
= sw
->hw
->pcm_ops
->write (sw
, buf
, size
);
1103 int AUD_read (SWVoiceIn
*sw
, void *buf
, int size
)
1108 /* XXX: Consider options */
1112 if (!sw
->hw
->enabled
) {
1113 dolog ("Reading from disabled voice %s\n", SW_NAME (sw
));
1117 bytes
= sw
->hw
->pcm_ops
->read (sw
, buf
, size
);
1121 int AUD_get_buffer_size_out (SWVoiceOut
*sw
)
1123 return sw
->hw
->samples
<< sw
->hw
->info
.shift
;
1126 void AUD_set_active_out (SWVoiceOut
*sw
, int on
)
1135 if (sw
->active
!= on
) {
1136 SWVoiceOut
*temp_sw
;
1140 hw
->pending_disable
= 0;
1143 hw
->pcm_ops
->ctl_out (hw
, VOICE_ENABLE
);
1150 for (temp_sw
= hw
->sw_head
.lh_first
; temp_sw
;
1151 temp_sw
= temp_sw
->entries
.le_next
) {
1152 nb_active
+= temp_sw
->active
!= 0;
1155 hw
->pending_disable
= nb_active
== 1;
1159 for (sc
= hw
->cap_head
.lh_first
; sc
; sc
= sc
->entries
.le_next
) {
1160 sc
->sw
.active
= hw
->enabled
;
1162 audio_capture_maybe_changed (sc
->cap
, 1);
1169 void AUD_set_active_in (SWVoiceIn
*sw
, int on
)
1178 if (sw
->active
!= on
) {
1184 hw
->pcm_ops
->ctl_in (hw
, VOICE_ENABLE
);
1186 sw
->total_hw_samples_acquired
= hw
->total_samples_captured
;
1192 for (temp_sw
= hw
->sw_head
.lh_first
; temp_sw
;
1193 temp_sw
= temp_sw
->entries
.le_next
) {
1194 nb_active
+= temp_sw
->active
!= 0;
1197 if (nb_active
== 1) {
1199 hw
->pcm_ops
->ctl_in (hw
, VOICE_DISABLE
);
1207 static int audio_get_avail (SWVoiceIn
*sw
)
1215 live
= sw
->hw
->total_samples_captured
- sw
->total_hw_samples_acquired
;
1216 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> sw
->hw
->samples
)) {
1217 dolog ("live=%d sw->hw->samples=%d\n", live
, sw
->hw
->samples
);
1222 "%s: get_avail live %d ret %" PRId64
"\n",
1224 live
, (((int64_t) live
<< 32) / sw
->ratio
) << sw
->info
.shift
1227 return (((int64_t) live
<< 32) / sw
->ratio
) << sw
->info
.shift
;
1230 static int audio_get_free (SWVoiceOut
*sw
)
1238 live
= sw
->total_hw_samples_mixed
;
1240 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> sw
->hw
->samples
)) {
1241 dolog ("live=%d sw->hw->samples=%d\n", live
, sw
->hw
->samples
);
1245 dead
= sw
->hw
->samples
- live
;
1248 dolog ("%s: get_free live %d dead %d ret %" PRId64
"\n",
1250 live
, dead
, (((int64_t) dead
<< 32) / sw
->ratio
) << sw
->info
.shift
);
1253 return (((int64_t) dead
<< 32) / sw
->ratio
) << sw
->info
.shift
;
1256 static void audio_capture_mix_and_clear (HWVoiceOut
*hw
, int rpos
, int samples
)
1263 for (sc
= hw
->cap_head
.lh_first
; sc
; sc
= sc
->entries
.le_next
) {
1264 SWVoiceOut
*sw
= &sc
->sw
;
1269 int till_end_of_hw
= hw
->samples
- rpos2
;
1270 int to_write
= audio_MIN (till_end_of_hw
, n
);
1271 int bytes
= to_write
<< hw
->info
.shift
;
1274 sw
->buf
= hw
->mix_buf
+ rpos2
;
1275 written
= audio_pcm_sw_write (sw
, NULL
, bytes
);
1276 if (written
- bytes
) {
1277 dolog ("Could not mix %d bytes into a capture "
1278 "buffer, mixed %d\n",
1283 rpos2
= (rpos2
+ to_write
) % hw
->samples
;
1288 n
= audio_MIN (samples
, hw
->samples
- rpos
);
1289 mixeng_clear (hw
->mix_buf
+ rpos
, n
);
1290 mixeng_clear (hw
->mix_buf
, samples
- n
);
1293 static void audio_run_out (AudioState
*s
)
1295 HWVoiceOut
*hw
= NULL
;
1298 while ((hw
= audio_pcm_hw_find_any_enabled_out (s
, hw
))) {
1300 int live
, free
, nb_live
, cleanup_required
, prev_rpos
;
1302 live
= audio_pcm_hw_get_live_out2 (hw
, &nb_live
);
1307 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
1308 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
1312 if (hw
->pending_disable
&& !nb_live
) {
1315 dolog ("Disabling voice\n");
1318 hw
->pending_disable
= 0;
1319 hw
->pcm_ops
->ctl_out (hw
, VOICE_DISABLE
);
1320 for (sc
= hw
->cap_head
.lh_first
; sc
; sc
= sc
->entries
.le_next
) {
1322 audio_recalc_and_notify_capture (sc
->cap
);
1328 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
1330 free
= audio_get_free (sw
);
1332 sw
->callback
.fn (sw
->callback
.opaque
, free
);
1339 prev_rpos
= hw
->rpos
;
1340 played
= hw
->pcm_ops
->run_out (hw
);
1341 if (audio_bug (AUDIO_FUNC
, hw
->rpos
>= hw
->samples
)) {
1342 dolog ("hw->rpos=%d hw->samples=%d played=%d\n",
1343 hw
->rpos
, hw
->samples
, played
);
1348 dolog ("played=%d\n", played
);
1352 hw
->ts_helper
+= played
;
1353 audio_capture_mix_and_clear (hw
, prev_rpos
, played
);
1356 cleanup_required
= 0;
1357 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
1358 if (!sw
->active
&& sw
->empty
) {
1362 if (audio_bug (AUDIO_FUNC
, played
> sw
->total_hw_samples_mixed
)) {
1363 dolog ("played=%d sw->total_hw_samples_mixed=%d\n",
1364 played
, sw
->total_hw_samples_mixed
);
1365 played
= sw
->total_hw_samples_mixed
;
1368 sw
->total_hw_samples_mixed
-= played
;
1370 if (!sw
->total_hw_samples_mixed
) {
1372 cleanup_required
|= !sw
->active
&& !sw
->callback
.fn
;
1376 free
= audio_get_free (sw
);
1378 sw
->callback
.fn (sw
->callback
.opaque
, free
);
1383 if (cleanup_required
) {
1386 sw
= hw
->sw_head
.lh_first
;
1388 sw1
= sw
->entries
.le_next
;
1389 if (!sw
->active
&& !sw
->callback
.fn
) {
1391 dolog ("Finishing with old voice\n");
1393 audio_close_out (s
, sw
);
1401 static void audio_run_in (AudioState
*s
)
1403 HWVoiceIn
*hw
= NULL
;
1405 while ((hw
= audio_pcm_hw_find_any_enabled_in (s
, hw
))) {
1409 captured
= hw
->pcm_ops
->run_in (hw
);
1411 min
= audio_pcm_hw_find_min_in (hw
);
1412 hw
->total_samples_captured
+= captured
- min
;
1413 hw
->ts_helper
+= captured
;
1415 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
1416 sw
->total_hw_samples_acquired
-= min
;
1421 avail
= audio_get_avail (sw
);
1423 sw
->callback
.fn (sw
->callback
.opaque
, avail
);
1430 static void audio_run_capture (AudioState
*s
)
1432 CaptureVoiceOut
*cap
;
1434 for (cap
= s
->cap_head
.lh_first
; cap
; cap
= cap
->entries
.le_next
) {
1435 int live
, rpos
, captured
;
1436 HWVoiceOut
*hw
= &cap
->hw
;
1439 captured
= live
= audio_pcm_hw_get_live_out (hw
);
1442 int left
= hw
->samples
- rpos
;
1443 int to_capture
= audio_MIN (live
, left
);
1445 struct capture_callback
*cb
;
1447 src
= hw
->mix_buf
+ rpos
;
1448 hw
->clip (cap
->buf
, src
, to_capture
);
1449 mixeng_clear (src
, to_capture
);
1451 for (cb
= cap
->cb_head
.lh_first
; cb
; cb
= cb
->entries
.le_next
) {
1452 cb
->ops
.capture (cb
->opaque
, cap
->buf
,
1453 to_capture
<< hw
->info
.shift
);
1455 rpos
= (rpos
+ to_capture
) % hw
->samples
;
1460 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
1461 if (!sw
->active
&& sw
->empty
) {
1465 if (audio_bug (AUDIO_FUNC
, captured
> sw
->total_hw_samples_mixed
)) {
1466 dolog ("captured=%d sw->total_hw_samples_mixed=%d\n",
1467 captured
, sw
->total_hw_samples_mixed
);
1468 captured
= sw
->total_hw_samples_mixed
;
1471 sw
->total_hw_samples_mixed
-= captured
;
1472 sw
->empty
= sw
->total_hw_samples_mixed
== 0;
1477 static void audio_timer (void *opaque
)
1479 AudioState
*s
= opaque
;
1483 audio_run_capture (s
);
1485 qemu_mod_timer (s
->ts
, qemu_get_clock (vm_clock
) + conf
.period
.ticks
);
1488 static struct audio_option audio_options
[] = {
1490 {"DAC_FIXED_SETTINGS", AUD_OPT_BOOL
, &conf
.fixed_out
.enabled
,
1491 "Use fixed settings for host DAC", NULL
, 0},
1493 {"DAC_FIXED_FREQ", AUD_OPT_INT
, &conf
.fixed_out
.settings
.freq
,
1494 "Frequency for fixed host DAC", NULL
, 0},
1496 {"DAC_FIXED_FMT", AUD_OPT_FMT
, &conf
.fixed_out
.settings
.fmt
,
1497 "Format for fixed host DAC", NULL
, 0},
1499 {"DAC_FIXED_CHANNELS", AUD_OPT_INT
, &conf
.fixed_out
.settings
.nchannels
,
1500 "Number of channels for fixed DAC (1 - mono, 2 - stereo)", NULL
, 0},
1502 {"DAC_VOICES", AUD_OPT_INT
, &conf
.fixed_out
.nb_voices
,
1503 "Number of voices for DAC", NULL
, 0},
1506 {"ADC_FIXED_SETTINGS", AUD_OPT_BOOL
, &conf
.fixed_in
.enabled
,
1507 "Use fixed settings for host ADC", NULL
, 0},
1509 {"ADC_FIXED_FREQ", AUD_OPT_INT
, &conf
.fixed_in
.settings
.freq
,
1510 "Frequency for fixed host ADC", NULL
, 0},
1512 {"ADC_FIXED_FMT", AUD_OPT_FMT
, &conf
.fixed_in
.settings
.fmt
,
1513 "Format for fixed host ADC", NULL
, 0},
1515 {"ADC_FIXED_CHANNELS", AUD_OPT_INT
, &conf
.fixed_in
.settings
.nchannels
,
1516 "Number of channels for fixed ADC (1 - mono, 2 - stereo)", NULL
, 0},
1518 {"ADC_VOICES", AUD_OPT_INT
, &conf
.fixed_in
.nb_voices
,
1519 "Number of voices for ADC", NULL
, 0},
1522 {"TIMER_PERIOD", AUD_OPT_INT
, &conf
.period
.hz
,
1523 "Timer period in HZ (0 - use lowest possible)", NULL
, 0},
1525 {"PLIVE", AUD_OPT_BOOL
, &conf
.plive
,
1526 "(undocumented)", NULL
, 0},
1528 {"LOG_TO_MONITOR", AUD_OPT_BOOL
, &conf
.log_to_monitor
,
1529 "print logging messages to monitor instead of stderr", NULL
, 0},
1531 {NULL
, 0, NULL
, NULL
, NULL
, 0}
1534 static void audio_pp_nb_voices (const char *typ
, int nb
)
1538 printf ("Does not support %s\n", typ
);
1541 printf ("One %s voice\n", typ
);
1544 printf ("Theoretically supports many %s voices\n", typ
);
1547 printf ("Theoretically supports upto %d %s voices\n", nb
, typ
);
1553 void AUD_help (void)
1557 audio_process_options ("AUDIO", audio_options
);
1558 for (i
= 0; i
< sizeof (drvtab
) / sizeof (drvtab
[0]); i
++) {
1559 struct audio_driver
*d
= drvtab
[i
];
1561 audio_process_options (d
->name
, d
->options
);
1565 printf ("Audio options:\n");
1566 audio_print_options ("AUDIO", audio_options
);
1569 printf ("Available drivers:\n");
1571 for (i
= 0; i
< sizeof (drvtab
) / sizeof (drvtab
[0]); i
++) {
1572 struct audio_driver
*d
= drvtab
[i
];
1574 printf ("Name: %s\n", d
->name
);
1575 printf ("Description: %s\n", d
->descr
);
1577 audio_pp_nb_voices ("playback", d
->max_voices_out
);
1578 audio_pp_nb_voices ("capture", d
->max_voices_in
);
1581 printf ("Options:\n");
1582 audio_print_options (d
->name
, d
->options
);
1585 printf ("No options\n");
1591 "Options are settable through environment variables.\n"
1594 " set QEMU_AUDIO_DRV=wav\n"
1595 " set QEMU_WAV_PATH=c:\\tune.wav\n"
1597 " export QEMU_AUDIO_DRV=wav\n"
1598 " export QEMU_WAV_PATH=$HOME/tune.wav\n"
1599 "(for csh replace export with setenv in the above)\n"
1605 static int audio_driver_init (AudioState
*s
, struct audio_driver
*drv
)
1608 audio_process_options (drv
->name
, drv
->options
);
1610 s
->drv_opaque
= drv
->init ();
1612 if (s
->drv_opaque
) {
1613 audio_init_nb_voices_out (s
, drv
);
1614 audio_init_nb_voices_in (s
, drv
);
1619 dolog ("Could not init `%s' audio driver\n", drv
->name
);
1624 static void audio_vm_change_state_handler (void *opaque
, int running
)
1626 AudioState
*s
= opaque
;
1627 HWVoiceOut
*hwo
= NULL
;
1628 HWVoiceIn
*hwi
= NULL
;
1629 int op
= running
? VOICE_ENABLE
: VOICE_DISABLE
;
1631 while ((hwo
= audio_pcm_hw_find_any_enabled_out (s
, hwo
))) {
1632 hwo
->pcm_ops
->ctl_out (hwo
, op
);
1635 while ((hwi
= audio_pcm_hw_find_any_enabled_in (s
, hwi
))) {
1636 hwi
->pcm_ops
->ctl_in (hwi
, op
);
1640 static void audio_atexit (void)
1642 AudioState
*s
= &glob_audio_state
;
1643 HWVoiceOut
*hwo
= NULL
;
1644 HWVoiceIn
*hwi
= NULL
;
1646 while ((hwo
= audio_pcm_hw_find_any_enabled_out (s
, hwo
))) {
1649 hwo
->pcm_ops
->ctl_out (hwo
, VOICE_DISABLE
);
1650 hwo
->pcm_ops
->fini_out (hwo
);
1652 for (sc
= hwo
->cap_head
.lh_first
; sc
; sc
= sc
->entries
.le_next
) {
1653 CaptureVoiceOut
*cap
= sc
->cap
;
1654 struct capture_callback
*cb
;
1656 for (cb
= cap
->cb_head
.lh_first
; cb
; cb
= cb
->entries
.le_next
) {
1657 cb
->ops
.destroy (cb
->opaque
);
1662 while ((hwi
= audio_pcm_hw_find_any_enabled_in (s
, hwi
))) {
1663 hwi
->pcm_ops
->ctl_in (hwi
, VOICE_DISABLE
);
1664 hwi
->pcm_ops
->fini_in (hwi
);
1668 s
->drv
->fini (s
->drv_opaque
);
1672 static void audio_save (QEMUFile
*f
, void *opaque
)
1678 static int audio_load (QEMUFile
*f
, void *opaque
, int version_id
)
1683 if (version_id
!= 1) {
1690 void AUD_register_card (AudioState
*s
, const char *name
, QEMUSoundCard
*card
)
1693 card
->name
= qemu_strdup (name
);
1694 memset (&card
->entries
, 0, sizeof (card
->entries
));
1695 LIST_INSERT_HEAD (&s
->card_head
, card
, entries
);
1698 void AUD_remove_card (QEMUSoundCard
*card
)
1700 LIST_REMOVE (card
, entries
);
1702 qemu_free (card
->name
);
1705 AudioState
*AUD_init (void)
1709 const char *drvname
;
1710 AudioState
*s
= &glob_audio_state
;
1712 LIST_INIT (&s
->hw_head_out
);
1713 LIST_INIT (&s
->hw_head_in
);
1714 LIST_INIT (&s
->cap_head
);
1715 atexit (audio_atexit
);
1717 s
->ts
= qemu_new_timer (vm_clock
, audio_timer
, s
);
1719 dolog ("Could not create audio timer\n");
1723 audio_process_options ("AUDIO", audio_options
);
1725 s
->nb_hw_voices_out
= conf
.fixed_out
.nb_voices
;
1726 s
->nb_hw_voices_in
= conf
.fixed_in
.nb_voices
;
1728 if (s
->nb_hw_voices_out
<= 0) {
1729 dolog ("Bogus number of playback voices %d, setting to 1\n",
1730 s
->nb_hw_voices_out
);
1731 s
->nb_hw_voices_out
= 1;
1734 if (s
->nb_hw_voices_in
<= 0) {
1735 dolog ("Bogus number of capture voices %d, setting to 0\n",
1736 s
->nb_hw_voices_in
);
1737 s
->nb_hw_voices_in
= 0;
1742 drvname
= audio_get_conf_str ("QEMU_AUDIO_DRV", NULL
, &def
);
1748 for (i
= 0; i
< sizeof (drvtab
) / sizeof (drvtab
[0]); i
++) {
1749 if (!strcmp (drvname
, drvtab
[i
]->name
)) {
1750 done
= !audio_driver_init (s
, drvtab
[i
]);
1757 dolog ("Unknown audio driver `%s'\n", drvname
);
1758 dolog ("Run with -audio-help to list available drivers\n");
1763 for (i
= 0; !done
&& i
< sizeof (drvtab
) / sizeof (drvtab
[0]); i
++) {
1764 if (drvtab
[i
]->can_be_default
) {
1765 done
= !audio_driver_init (s
, drvtab
[i
]);
1771 done
= !audio_driver_init (s
, &no_audio_driver
);
1773 dolog ("Could not initialize audio subsystem\n");
1776 dolog ("warning: Using timer based audio emulation\n");
1781 VMChangeStateEntry
*e
;
1783 if (conf
.period
.hz
<= 0) {
1784 if (conf
.period
.hz
< 0) {
1785 dolog ("warning: Timer period is negative - %d "
1786 "treating as zero\n",
1789 conf
.period
.ticks
= 1;
1792 conf
.period
.ticks
= ticks_per_sec
/ conf
.period
.hz
;
1795 e
= qemu_add_vm_change_state_handler (audio_vm_change_state_handler
, s
);
1797 dolog ("warning: Could not register change state handler\n"
1798 "(Audio can continue looping even after stopping the VM)\n");
1802 qemu_del_timer (s
->ts
);
1806 LIST_INIT (&s
->card_head
);
1807 register_savevm ("audio", 0, 1, audio_save
, audio_load
, s
);
1808 qemu_mod_timer (s
->ts
, qemu_get_clock (vm_clock
) + conf
.period
.ticks
);
1812 CaptureVoiceOut
*AUD_add_capture (
1815 struct audio_capture_ops
*ops
,
1819 CaptureVoiceOut
*cap
;
1820 struct capture_callback
*cb
;
1824 s
= &glob_audio_state
;
1827 if (audio_validate_settings (as
)) {
1828 dolog ("Invalid settings were passed when trying to add capture\n");
1829 audio_print_settings (as
);
1833 cb
= audio_calloc (AUDIO_FUNC
, 1, sizeof (*cb
));
1835 dolog ("Could not allocate capture callback information, size %zu\n",
1840 cb
->opaque
= cb_opaque
;
1842 cap
= audio_pcm_capture_find_specific (s
, as
);
1844 LIST_INSERT_HEAD (&cap
->cb_head
, cb
, entries
);
1849 CaptureVoiceOut
*cap
;
1851 cap
= audio_calloc (AUDIO_FUNC
, 1, sizeof (*cap
));
1853 dolog ("Could not allocate capture voice, size %zu\n",
1859 LIST_INIT (&hw
->sw_head
);
1860 LIST_INIT (&cap
->cb_head
);
1862 /* XXX find a more elegant way */
1863 hw
->samples
= 4096 * 4;
1864 hw
->mix_buf
= audio_calloc (AUDIO_FUNC
, hw
->samples
,
1865 sizeof (st_sample_t
));
1867 dolog ("Could not allocate capture mix buffer (%d samples)\n",
1872 audio_pcm_init_info (&hw
->info
, as
);
1874 cap
->buf
= audio_calloc (AUDIO_FUNC
, hw
->samples
, 1 << hw
->info
.shift
);
1876 dolog ("Could not allocate capture buffer "
1877 "(%d samples, each %d bytes)\n",
1878 hw
->samples
, 1 << hw
->info
.shift
);
1882 hw
->clip
= mixeng_clip
1883 [hw
->info
.nchannels
== 2]
1885 [hw
->info
.swap_endianness
]
1886 [audio_bits_to_index (hw
->info
.bits
)];
1888 LIST_INSERT_HEAD (&s
->cap_head
, cap
, entries
);
1889 LIST_INSERT_HEAD (&cap
->cb_head
, cb
, entries
);
1892 while ((hw
= audio_pcm_hw_find_any_out (s
, hw
))) {
1893 audio_attach_capture (s
, hw
);
1898 qemu_free (cap
->hw
.mix_buf
);
1908 void AUD_del_capture (CaptureVoiceOut
*cap
, void *cb_opaque
)
1910 struct capture_callback
*cb
;
1912 for (cb
= cap
->cb_head
.lh_first
; cb
; cb
= cb
->entries
.le_next
) {
1913 if (cb
->opaque
== cb_opaque
) {
1914 cb
->ops
.destroy (cb_opaque
);
1915 LIST_REMOVE (cb
, entries
);
1918 if (!cap
->cb_head
.lh_first
) {
1919 SWVoiceOut
*sw
= cap
->hw
.sw_head
.lh_first
, *sw1
;
1922 SWVoiceCap
*sc
= (SWVoiceCap
*) sw
;
1923 #ifdef DEBUG_CAPTURE
1924 dolog ("freeing %s\n", sw
->name
);
1927 sw1
= sw
->entries
.le_next
;
1929 st_rate_stop (sw
->rate
);
1932 LIST_REMOVE (sw
, entries
);
1933 LIST_REMOVE (sc
, entries
);
1937 LIST_REMOVE (cap
, entries
);
1945 void AUD_set_volume_out (SWVoiceOut
*sw
, int mute
, uint8_t lvol
, uint8_t rvol
)
1948 sw
->vol
.mute
= mute
;
1949 sw
->vol
.l
= nominal_volume
.l
* lvol
/ 255;
1950 sw
->vol
.r
= nominal_volume
.r
* rvol
/ 255;
1954 void AUD_set_volume_in (SWVoiceIn
*sw
, int mute
, uint8_t lvol
, uint8_t rvol
)
1957 sw
->vol
.mute
= mute
;
1958 sw
->vol
.l
= nominal_volume
.l
* lvol
/ 255;
1959 sw
->vol
.r
= nominal_volume
.r
* rvol
/ 255;