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 */
37 /* #define DEBUG_POLL */
39 #define SW_NAME(sw) (sw)->name ? (sw)->name : "unknown"
42 /* Order of CONFIG_AUDIO_DRIVERS is import.
43 The 1st one is the one used by default, that is the reason
44 that we generate the list.
46 static struct audio_driver
*drvtab
[] = {
55 struct fixed_settings
{
59 struct audsettings settings
;
63 struct fixed_settings fixed_out
;
64 struct fixed_settings fixed_in
;
74 .fixed_out
= { /* DAC fixed settings */
82 .endianness
= AUDIO_HOST_ENDIANNESS
,
86 .fixed_in
= { /* ADC fixed settings */
94 .endianness
= AUDIO_HOST_ENDIANNESS
,
98 .period
= { .hertz
= 250 },
105 static AudioState glob_audio_state
;
107 const struct mixeng_volume nominal_volume
= {
118 #ifdef AUDIO_IS_FLAWLESS_AND_NO_CHECKS_ARE_REQURIED
121 static void audio_print_options (const char *prefix
,
122 struct audio_option
*opt
);
124 int audio_bug (const char *funcname
, int cond
)
129 AUD_log (NULL
, "A bug was just triggered in %s\n", funcname
);
131 struct audio_driver
*d
;
134 AUD_log (NULL
, "Save all your work and restart without audio\n");
135 AUD_log (NULL
, "Please send bug report to av1474@comtv.ru\n");
136 AUD_log (NULL
, "I am sorry\n");
137 d
= glob_audio_state
.drv
;
139 audio_print_options (d
->name
, d
->options
);
142 AUD_log (NULL
, "Context:\n");
144 #if defined AUDIO_BREAKPOINT_ON_BUG
145 # if defined HOST_I386
146 # if defined __GNUC__
148 # elif defined _MSC_VER
163 static inline int audio_bits_to_index (int bits
)
176 audio_bug ("bits_to_index", 1);
177 AUD_log (NULL
, "invalid bits %d\n", bits
);
182 void *audio_calloc (const char *funcname
, int nmemb
, size_t size
)
188 cond
= !nmemb
|| !size
;
192 if (audio_bug ("audio_calloc", cond
)) {
193 AUD_log (NULL
, "%s passed invalid arguments to audio_calloc\n",
195 AUD_log (NULL
, "nmemb=%d size=%zu (len=%zu)\n", nmemb
, size
, len
);
199 return g_malloc0 (len
);
202 static char *audio_alloc_prefix (const char *s
)
204 const char qemu_prefix
[] = "QEMU_";
213 r
= g_malloc (len
+ sizeof (qemu_prefix
));
215 u
= r
+ sizeof (qemu_prefix
) - 1;
217 pstrcpy (r
, len
+ sizeof (qemu_prefix
), qemu_prefix
);
218 pstrcat (r
, len
+ sizeof (qemu_prefix
), s
);
220 for (i
= 0; i
< len
; ++i
) {
221 u
[i
] = qemu_toupper(u
[i
]);
227 static const char *audio_audfmt_to_string (audfmt_e fmt
)
249 dolog ("Bogus audfmt %d returning S16\n", fmt
);
253 static audfmt_e
audio_string_to_audfmt (const char *s
, audfmt_e defval
,
256 if (!strcasecmp (s
, "u8")) {
260 else if (!strcasecmp (s
, "u16")) {
264 else if (!strcasecmp (s
, "u32")) {
268 else if (!strcasecmp (s
, "s8")) {
272 else if (!strcasecmp (s
, "s16")) {
276 else if (!strcasecmp (s
, "s32")) {
281 dolog ("Bogus audio format `%s' using %s\n",
282 s
, audio_audfmt_to_string (defval
));
288 static audfmt_e
audio_get_conf_fmt (const char *envname
,
292 const char *var
= getenv (envname
);
297 return audio_string_to_audfmt (var
, defval
, defaultp
);
300 static int audio_get_conf_int (const char *key
, int defval
, int *defaultp
)
305 strval
= getenv (key
);
317 static const char *audio_get_conf_str (const char *key
,
321 const char *val
= getenv (key
);
332 void AUD_vlog (const char *cap
, const char *fmt
, va_list ap
)
334 if (conf
.log_to_monitor
) {
336 monitor_printf(default_mon
, "%s: ", cap
);
339 monitor_vprintf(default_mon
, fmt
, ap
);
343 fprintf (stderr
, "%s: ", cap
);
346 vfprintf (stderr
, fmt
, ap
);
350 void AUD_log (const char *cap
, const char *fmt
, ...)
355 AUD_vlog (cap
, fmt
, ap
);
359 static void audio_print_options (const char *prefix
,
360 struct audio_option
*opt
)
365 dolog ("No prefix specified\n");
370 dolog ("No options\n");
374 uprefix
= audio_alloc_prefix (prefix
);
376 for (; opt
->name
; opt
++) {
377 const char *state
= "default";
378 printf (" %s_%s: ", uprefix
, opt
->name
);
380 if (opt
->overriddenp
&& *opt
->overriddenp
) {
387 int *intp
= opt
->valp
;
388 printf ("boolean, %s = %d\n", state
, *intp
? 1 : 0);
394 int *intp
= opt
->valp
;
395 printf ("integer, %s = %d\n", state
, *intp
);
401 audfmt_e
*fmtp
= opt
->valp
;
403 "format, %s = %s, (one of: U8 S8 U16 S16 U32 S32)\n",
405 audio_audfmt_to_string (*fmtp
)
412 const char **strp
= opt
->valp
;
413 printf ("string, %s = %s\n",
415 *strp
? *strp
: "(not set)");
421 dolog ("Bad value tag for option %s_%s %d\n",
422 uprefix
, opt
->name
, opt
->tag
);
425 printf (" %s\n", opt
->descr
);
431 static void audio_process_options (const char *prefix
,
432 struct audio_option
*opt
)
435 const char qemu_prefix
[] = "QEMU_";
436 size_t preflen
, optlen
;
438 if (audio_bug (AUDIO_FUNC
, !prefix
)) {
439 dolog ("prefix = NULL\n");
443 if (audio_bug (AUDIO_FUNC
, !opt
)) {
444 dolog ("opt = NULL\n");
448 preflen
= strlen (prefix
);
450 for (; opt
->name
; opt
++) {
455 dolog ("Option value pointer for `%s' is not set\n",
460 len
= strlen (opt
->name
);
461 /* len of opt->name + len of prefix + size of qemu_prefix
462 * (includes trailing zero) + zero + underscore (on behalf of
464 optlen
= len
+ preflen
+ sizeof (qemu_prefix
) + 1;
465 optname
= g_malloc (optlen
);
467 pstrcpy (optname
, optlen
, qemu_prefix
);
469 /* copy while upper-casing, including trailing zero */
470 for (i
= 0; i
<= preflen
; ++i
) {
471 optname
[i
+ sizeof (qemu_prefix
) - 1] = qemu_toupper(prefix
[i
]);
473 pstrcat (optname
, optlen
, "_");
474 pstrcat (optname
, optlen
, opt
->name
);
481 int *intp
= opt
->valp
;
482 *intp
= audio_get_conf_int (optname
, *intp
, &def
);
488 audfmt_e
*fmtp
= opt
->valp
;
489 *fmtp
= audio_get_conf_fmt (optname
, *fmtp
, &def
);
495 const char **strp
= opt
->valp
;
496 *strp
= audio_get_conf_str (optname
, *strp
, &def
);
501 dolog ("Bad value tag for option `%s' - %d\n",
506 if (!opt
->overriddenp
) {
507 opt
->overriddenp
= &opt
->overridden
;
509 *opt
->overriddenp
= !def
;
514 static void audio_print_settings (struct audsettings
*as
)
516 dolog ("frequency=%d nchannels=%d fmt=", as
->freq
, as
->nchannels
);
520 AUD_log (NULL
, "S8");
523 AUD_log (NULL
, "U8");
526 AUD_log (NULL
, "S16");
529 AUD_log (NULL
, "U16");
532 AUD_log (NULL
, "S32");
535 AUD_log (NULL
, "U32");
538 AUD_log (NULL
, "invalid(%d)", as
->fmt
);
542 AUD_log (NULL
, " endianness=");
543 switch (as
->endianness
) {
545 AUD_log (NULL
, "little");
548 AUD_log (NULL
, "big");
551 AUD_log (NULL
, "invalid");
554 AUD_log (NULL
, "\n");
557 static int audio_validate_settings (struct audsettings
*as
)
561 invalid
= as
->nchannels
!= 1 && as
->nchannels
!= 2;
562 invalid
|= as
->endianness
!= 0 && as
->endianness
!= 1;
577 invalid
|= as
->freq
<= 0;
578 return invalid
? -1 : 0;
581 static int audio_pcm_info_eq (struct audio_pcm_info
*info
, struct audsettings
*as
)
583 int bits
= 8, sign
= 0;
606 return info
->freq
== as
->freq
607 && info
->nchannels
== as
->nchannels
608 && info
->sign
== sign
609 && info
->bits
== bits
610 && info
->swap_endianness
== (as
->endianness
!= AUDIO_HOST_ENDIANNESS
);
613 void audio_pcm_init_info (struct audio_pcm_info
*info
, struct audsettings
*as
)
615 int bits
= 8, sign
= 0, shift
= 0;
638 info
->freq
= as
->freq
;
641 info
->nchannels
= as
->nchannels
;
642 info
->shift
= (as
->nchannels
== 2) + shift
;
643 info
->align
= (1 << info
->shift
) - 1;
644 info
->bytes_per_second
= info
->freq
<< info
->shift
;
645 info
->swap_endianness
= (as
->endianness
!= AUDIO_HOST_ENDIANNESS
);
648 void audio_pcm_info_clear_buf (struct audio_pcm_info
*info
, void *buf
, int len
)
655 memset (buf
, 0x00, len
<< info
->shift
);
658 switch (info
->bits
) {
660 memset (buf
, 0x80, len
<< info
->shift
);
667 int shift
= info
->nchannels
- 1;
670 if (info
->swap_endianness
) {
674 for (i
= 0; i
< len
<< shift
; i
++) {
684 int shift
= info
->nchannels
- 1;
685 int32_t s
= INT32_MAX
;
687 if (info
->swap_endianness
) {
691 for (i
= 0; i
< len
<< shift
; i
++) {
698 AUD_log (NULL
, "audio_pcm_info_clear_buf: invalid bits %d\n",
708 static void noop_conv (struct st_sample
*dst
, const void *src
, int samples
)
715 static CaptureVoiceOut
*audio_pcm_capture_find_specific (
716 struct audsettings
*as
719 CaptureVoiceOut
*cap
;
720 AudioState
*s
= &glob_audio_state
;
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 QLIST_REMOVE (sw
, entries
);
783 QLIST_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 (HWVoiceOut
*hw
)
797 AudioState
*s
= &glob_audio_state
;
798 CaptureVoiceOut
*cap
;
800 audio_detach_capture (hw
);
801 for (cap
= s
->cap_head
.lh_first
; cap
; cap
= cap
->entries
.le_next
) {
804 HWVoiceOut
*hw_cap
= &cap
->hw
;
806 sc
= audio_calloc (AUDIO_FUNC
, 1, sizeof (*sc
));
808 dolog ("Could not allocate soft capture voice (%zu bytes)\n",
818 sw
->active
= hw
->enabled
;
819 sw
->conv
= noop_conv
;
820 sw
->ratio
= ((int64_t) hw_cap
->info
.freq
<< 32) / sw
->info
.freq
;
821 sw
->rate
= st_rate_start (sw
->info
.freq
, hw_cap
->info
.freq
);
823 dolog ("Could not start rate conversion for `%s'\n", SW_NAME (sw
));
827 QLIST_INSERT_HEAD (&hw_cap
->sw_head
, sw
, entries
);
828 QLIST_INSERT_HEAD (&hw
->cap_head
, sc
, entries
);
830 asprintf (&sw
->name
, "for %p %d,%d,%d",
831 hw
, sw
->info
.freq
, sw
->info
.bits
, sw
->info
.nchannels
);
832 dolog ("Added %s active = %d\n", sw
->name
, sw
->active
);
835 audio_capture_maybe_changed (cap
, 1);
842 * Hard voice (capture)
844 static int audio_pcm_hw_find_min_in (HWVoiceIn
*hw
)
847 int m
= hw
->total_samples_captured
;
849 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
851 m
= audio_MIN (m
, sw
->total_hw_samples_acquired
);
857 int audio_pcm_hw_get_live_in (HWVoiceIn
*hw
)
859 int live
= hw
->total_samples_captured
- audio_pcm_hw_find_min_in (hw
);
860 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
861 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
867 int audio_pcm_hw_clip_out (HWVoiceOut
*hw
, void *pcm_buf
,
868 int live
, int pending
)
870 int left
= hw
->samples
- pending
;
871 int len
= audio_MIN (left
, live
);
875 struct st_sample
*src
= hw
->mix_buf
+ hw
->rpos
;
876 uint8_t *dst
= advance (pcm_buf
, hw
->rpos
<< hw
->info
.shift
);
877 int samples_till_end_of_buf
= hw
->samples
- hw
->rpos
;
878 int samples_to_clip
= audio_MIN (len
, samples_till_end_of_buf
);
880 hw
->clip (dst
, src
, samples_to_clip
);
882 hw
->rpos
= (hw
->rpos
+ samples_to_clip
) % hw
->samples
;
883 len
-= samples_to_clip
;
884 clipped
+= samples_to_clip
;
890 * Soft voice (capture)
892 static int audio_pcm_sw_get_rpos_in (SWVoiceIn
*sw
)
894 HWVoiceIn
*hw
= sw
->hw
;
895 int live
= hw
->total_samples_captured
- sw
->total_hw_samples_acquired
;
898 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
899 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
903 rpos
= hw
->wpos
- live
;
908 return hw
->samples
+ rpos
;
912 int audio_pcm_sw_read (SWVoiceIn
*sw
, void *buf
, int size
)
914 HWVoiceIn
*hw
= sw
->hw
;
915 int samples
, live
, ret
= 0, swlim
, isamp
, osamp
, rpos
, total
= 0;
916 struct st_sample
*src
, *dst
= sw
->buf
;
918 rpos
= audio_pcm_sw_get_rpos_in (sw
) % hw
->samples
;
920 live
= hw
->total_samples_captured
- sw
->total_hw_samples_acquired
;
921 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
922 dolog ("live_in=%d hw->samples=%d\n", live
, hw
->samples
);
926 samples
= size
>> sw
->info
.shift
;
931 swlim
= (live
* sw
->ratio
) >> 32;
932 swlim
= audio_MIN (swlim
, samples
);
935 src
= hw
->conv_buf
+ rpos
;
936 isamp
= hw
->wpos
- rpos
;
939 isamp
= hw
->samples
- rpos
;
947 if (audio_bug (AUDIO_FUNC
, osamp
< 0)) {
948 dolog ("osamp=%d\n", osamp
);
952 st_rate_flow (sw
->rate
, src
, dst
, &isamp
, &osamp
);
954 rpos
= (rpos
+ isamp
) % hw
->samples
;
960 mixeng_volume (sw
->buf
, ret
, &sw
->vol
);
962 sw
->clip (buf
, sw
->buf
, ret
);
963 sw
->total_hw_samples_acquired
+= total
;
964 return ret
<< sw
->info
.shift
;
968 * Hard voice (playback)
970 static int audio_pcm_hw_find_min_out (HWVoiceOut
*hw
, int *nb_livep
)
976 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
977 if (sw
->active
|| !sw
->empty
) {
978 m
= audio_MIN (m
, sw
->total_hw_samples_mixed
);
987 static int audio_pcm_hw_get_live_out (HWVoiceOut
*hw
, int *nb_live
)
992 smin
= audio_pcm_hw_find_min_out (hw
, &nb_live1
);
1000 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
1001 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
1010 * Soft voice (playback)
1012 int audio_pcm_sw_write (SWVoiceOut
*sw
, void *buf
, int size
)
1014 int hwsamples
, samples
, isamp
, osamp
, wpos
, live
, dead
, left
, swlim
, blck
;
1015 int ret
= 0, pos
= 0, total
= 0;
1021 hwsamples
= sw
->hw
->samples
;
1023 live
= sw
->total_hw_samples_mixed
;
1024 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hwsamples
)){
1025 dolog ("live=%d hw->samples=%d\n", live
, hwsamples
);
1029 if (live
== hwsamples
) {
1031 dolog ("%s is full %d\n", sw
->name
, live
);
1036 wpos
= (sw
->hw
->rpos
+ live
) % hwsamples
;
1037 samples
= size
>> sw
->info
.shift
;
1039 dead
= hwsamples
- live
;
1040 swlim
= ((int64_t) dead
<< 32) / sw
->ratio
;
1041 swlim
= audio_MIN (swlim
, samples
);
1043 sw
->conv (sw
->buf
, buf
, swlim
);
1044 mixeng_volume (sw
->buf
, swlim
, &sw
->vol
);
1048 dead
= hwsamples
- live
;
1049 left
= hwsamples
- wpos
;
1050 blck
= audio_MIN (dead
, left
);
1059 sw
->hw
->mix_buf
+ wpos
,
1067 wpos
= (wpos
+ osamp
) % hwsamples
;
1071 sw
->total_hw_samples_mixed
+= total
;
1072 sw
->empty
= sw
->total_hw_samples_mixed
== 0;
1076 "%s: write size %d ret %d total sw %d\n",
1078 size
>> sw
->info
.shift
,
1080 sw
->total_hw_samples_mixed
1084 return ret
<< sw
->info
.shift
;
1088 static void audio_pcm_print_info (const char *cap
, struct audio_pcm_info
*info
)
1090 dolog ("%s: bits %d, sign %d, freq %d, nchan %d\n",
1091 cap
, info
->bits
, info
->sign
, info
->freq
, info
->nchannels
);
1096 #include "audio_template.h"
1098 #include "audio_template.h"
1103 static int audio_is_timer_needed (void)
1105 HWVoiceIn
*hwi
= NULL
;
1106 HWVoiceOut
*hwo
= NULL
;
1108 while ((hwo
= audio_pcm_hw_find_any_enabled_out (hwo
))) {
1109 if (!hwo
->poll_mode
) return 1;
1111 while ((hwi
= audio_pcm_hw_find_any_enabled_in (hwi
))) {
1112 if (!hwi
->poll_mode
) return 1;
1117 static void audio_reset_timer (AudioState
*s
)
1119 if (audio_is_timer_needed ()) {
1120 qemu_mod_timer (s
->ts
, qemu_get_clock_ns (vm_clock
) + 1);
1123 qemu_del_timer (s
->ts
);
1127 static void audio_timer (void *opaque
)
1129 audio_run ("timer");
1130 audio_reset_timer (opaque
);
1136 int AUD_write (SWVoiceOut
*sw
, void *buf
, int size
)
1141 /* XXX: Consider options */
1145 if (!sw
->hw
->enabled
) {
1146 dolog ("Writing to disabled voice %s\n", SW_NAME (sw
));
1150 bytes
= sw
->hw
->pcm_ops
->write (sw
, buf
, size
);
1154 int AUD_read (SWVoiceIn
*sw
, void *buf
, int size
)
1159 /* XXX: Consider options */
1163 if (!sw
->hw
->enabled
) {
1164 dolog ("Reading from disabled voice %s\n", SW_NAME (sw
));
1168 bytes
= sw
->hw
->pcm_ops
->read (sw
, buf
, size
);
1172 int AUD_get_buffer_size_out (SWVoiceOut
*sw
)
1174 return sw
->hw
->samples
<< sw
->hw
->info
.shift
;
1177 void AUD_set_active_out (SWVoiceOut
*sw
, int on
)
1186 if (sw
->active
!= on
) {
1187 AudioState
*s
= &glob_audio_state
;
1188 SWVoiceOut
*temp_sw
;
1192 hw
->pending_disable
= 0;
1195 if (s
->vm_running
) {
1196 hw
->pcm_ops
->ctl_out (hw
, VOICE_ENABLE
, conf
.try_poll_out
);
1197 audio_reset_timer (s
);
1205 for (temp_sw
= hw
->sw_head
.lh_first
; temp_sw
;
1206 temp_sw
= temp_sw
->entries
.le_next
) {
1207 nb_active
+= temp_sw
->active
!= 0;
1210 hw
->pending_disable
= nb_active
== 1;
1214 for (sc
= hw
->cap_head
.lh_first
; sc
; sc
= sc
->entries
.le_next
) {
1215 sc
->sw
.active
= hw
->enabled
;
1217 audio_capture_maybe_changed (sc
->cap
, 1);
1224 void AUD_set_active_in (SWVoiceIn
*sw
, int on
)
1233 if (sw
->active
!= on
) {
1234 AudioState
*s
= &glob_audio_state
;
1240 if (s
->vm_running
) {
1241 hw
->pcm_ops
->ctl_in (hw
, VOICE_ENABLE
, conf
.try_poll_in
);
1242 audio_reset_timer (s
);
1245 sw
->total_hw_samples_acquired
= hw
->total_samples_captured
;
1251 for (temp_sw
= hw
->sw_head
.lh_first
; temp_sw
;
1252 temp_sw
= temp_sw
->entries
.le_next
) {
1253 nb_active
+= temp_sw
->active
!= 0;
1256 if (nb_active
== 1) {
1258 hw
->pcm_ops
->ctl_in (hw
, VOICE_DISABLE
);
1266 static int audio_get_avail (SWVoiceIn
*sw
)
1274 live
= sw
->hw
->total_samples_captured
- sw
->total_hw_samples_acquired
;
1275 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> sw
->hw
->samples
)) {
1276 dolog ("live=%d sw->hw->samples=%d\n", live
, sw
->hw
->samples
);
1281 "%s: get_avail live %d ret %" PRId64
"\n",
1283 live
, (((int64_t) live
<< 32) / sw
->ratio
) << sw
->info
.shift
1286 return (((int64_t) live
<< 32) / sw
->ratio
) << sw
->info
.shift
;
1289 static int audio_get_free (SWVoiceOut
*sw
)
1297 live
= sw
->total_hw_samples_mixed
;
1299 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> sw
->hw
->samples
)) {
1300 dolog ("live=%d sw->hw->samples=%d\n", live
, sw
->hw
->samples
);
1304 dead
= sw
->hw
->samples
- live
;
1307 dolog ("%s: get_free live %d dead %d ret %" PRId64
"\n",
1309 live
, dead
, (((int64_t) dead
<< 32) / sw
->ratio
) << sw
->info
.shift
);
1312 return (((int64_t) dead
<< 32) / sw
->ratio
) << sw
->info
.shift
;
1315 static void audio_capture_mix_and_clear (HWVoiceOut
*hw
, int rpos
, int samples
)
1322 for (sc
= hw
->cap_head
.lh_first
; sc
; sc
= sc
->entries
.le_next
) {
1323 SWVoiceOut
*sw
= &sc
->sw
;
1328 int till_end_of_hw
= hw
->samples
- rpos2
;
1329 int to_write
= audio_MIN (till_end_of_hw
, n
);
1330 int bytes
= to_write
<< hw
->info
.shift
;
1333 sw
->buf
= hw
->mix_buf
+ rpos2
;
1334 written
= audio_pcm_sw_write (sw
, NULL
, bytes
);
1335 if (written
- bytes
) {
1336 dolog ("Could not mix %d bytes into a capture "
1337 "buffer, mixed %d\n",
1342 rpos2
= (rpos2
+ to_write
) % hw
->samples
;
1347 n
= audio_MIN (samples
, hw
->samples
- rpos
);
1348 mixeng_clear (hw
->mix_buf
+ rpos
, n
);
1349 mixeng_clear (hw
->mix_buf
, samples
- n
);
1352 static void audio_run_out (AudioState
*s
)
1354 HWVoiceOut
*hw
= NULL
;
1357 while ((hw
= audio_pcm_hw_find_any_enabled_out (hw
))) {
1359 int live
, free
, nb_live
, cleanup_required
, prev_rpos
;
1361 live
= audio_pcm_hw_get_live_out (hw
, &nb_live
);
1366 if (audio_bug (AUDIO_FUNC
, live
< 0 || live
> hw
->samples
)) {
1367 dolog ("live=%d hw->samples=%d\n", live
, hw
->samples
);
1371 if (hw
->pending_disable
&& !nb_live
) {
1374 dolog ("Disabling voice\n");
1377 hw
->pending_disable
= 0;
1378 hw
->pcm_ops
->ctl_out (hw
, VOICE_DISABLE
);
1379 for (sc
= hw
->cap_head
.lh_first
; sc
; sc
= sc
->entries
.le_next
) {
1381 audio_recalc_and_notify_capture (sc
->cap
);
1387 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
1389 free
= audio_get_free (sw
);
1391 sw
->callback
.fn (sw
->callback
.opaque
, free
);
1398 prev_rpos
= hw
->rpos
;
1399 played
= hw
->pcm_ops
->run_out (hw
, live
);
1400 if (audio_bug (AUDIO_FUNC
, hw
->rpos
>= hw
->samples
)) {
1401 dolog ("hw->rpos=%d hw->samples=%d played=%d\n",
1402 hw
->rpos
, hw
->samples
, played
);
1407 dolog ("played=%d\n", played
);
1411 hw
->ts_helper
+= played
;
1412 audio_capture_mix_and_clear (hw
, prev_rpos
, played
);
1415 cleanup_required
= 0;
1416 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
1417 if (!sw
->active
&& sw
->empty
) {
1421 if (audio_bug (AUDIO_FUNC
, played
> sw
->total_hw_samples_mixed
)) {
1422 dolog ("played=%d sw->total_hw_samples_mixed=%d\n",
1423 played
, sw
->total_hw_samples_mixed
);
1424 played
= sw
->total_hw_samples_mixed
;
1427 sw
->total_hw_samples_mixed
-= played
;
1429 if (!sw
->total_hw_samples_mixed
) {
1431 cleanup_required
|= !sw
->active
&& !sw
->callback
.fn
;
1435 free
= audio_get_free (sw
);
1437 sw
->callback
.fn (sw
->callback
.opaque
, free
);
1442 if (cleanup_required
) {
1445 sw
= hw
->sw_head
.lh_first
;
1447 sw1
= sw
->entries
.le_next
;
1448 if (!sw
->active
&& !sw
->callback
.fn
) {
1450 dolog ("Finishing with old voice\n");
1452 audio_close_out (sw
);
1460 static void audio_run_in (AudioState
*s
)
1462 HWVoiceIn
*hw
= NULL
;
1464 while ((hw
= audio_pcm_hw_find_any_enabled_in (hw
))) {
1468 captured
= hw
->pcm_ops
->run_in (hw
);
1470 min
= audio_pcm_hw_find_min_in (hw
);
1471 hw
->total_samples_captured
+= captured
- min
;
1472 hw
->ts_helper
+= captured
;
1474 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
1475 sw
->total_hw_samples_acquired
-= min
;
1480 avail
= audio_get_avail (sw
);
1482 sw
->callback
.fn (sw
->callback
.opaque
, avail
);
1489 static void audio_run_capture (AudioState
*s
)
1491 CaptureVoiceOut
*cap
;
1493 for (cap
= s
->cap_head
.lh_first
; cap
; cap
= cap
->entries
.le_next
) {
1494 int live
, rpos
, captured
;
1495 HWVoiceOut
*hw
= &cap
->hw
;
1498 captured
= live
= audio_pcm_hw_get_live_out (hw
, NULL
);
1501 int left
= hw
->samples
- rpos
;
1502 int to_capture
= audio_MIN (live
, left
);
1503 struct st_sample
*src
;
1504 struct capture_callback
*cb
;
1506 src
= hw
->mix_buf
+ rpos
;
1507 hw
->clip (cap
->buf
, src
, to_capture
);
1508 mixeng_clear (src
, to_capture
);
1510 for (cb
= cap
->cb_head
.lh_first
; cb
; cb
= cb
->entries
.le_next
) {
1511 cb
->ops
.capture (cb
->opaque
, cap
->buf
,
1512 to_capture
<< hw
->info
.shift
);
1514 rpos
= (rpos
+ to_capture
) % hw
->samples
;
1519 for (sw
= hw
->sw_head
.lh_first
; sw
; sw
= sw
->entries
.le_next
) {
1520 if (!sw
->active
&& sw
->empty
) {
1524 if (audio_bug (AUDIO_FUNC
, captured
> sw
->total_hw_samples_mixed
)) {
1525 dolog ("captured=%d sw->total_hw_samples_mixed=%d\n",
1526 captured
, sw
->total_hw_samples_mixed
);
1527 captured
= sw
->total_hw_samples_mixed
;
1530 sw
->total_hw_samples_mixed
-= captured
;
1531 sw
->empty
= sw
->total_hw_samples_mixed
== 0;
1536 void audio_run (const char *msg
)
1538 AudioState
*s
= &glob_audio_state
;
1542 audio_run_capture (s
);
1545 static double prevtime
;
1549 if (gettimeofday (&tv
, NULL
)) {
1550 perror ("audio_run: gettimeofday");
1554 currtime
= tv
.tv_sec
+ tv
.tv_usec
* 1e-6;
1555 dolog ("Elapsed since last %s: %f\n", msg
, currtime
- prevtime
);
1556 prevtime
= currtime
;
1561 static struct audio_option audio_options
[] = {
1564 .name
= "DAC_FIXED_SETTINGS",
1565 .tag
= AUD_OPT_BOOL
,
1566 .valp
= &conf
.fixed_out
.enabled
,
1567 .descr
= "Use fixed settings for host DAC"
1570 .name
= "DAC_FIXED_FREQ",
1572 .valp
= &conf
.fixed_out
.settings
.freq
,
1573 .descr
= "Frequency for fixed host DAC"
1576 .name
= "DAC_FIXED_FMT",
1578 .valp
= &conf
.fixed_out
.settings
.fmt
,
1579 .descr
= "Format for fixed host DAC"
1582 .name
= "DAC_FIXED_CHANNELS",
1584 .valp
= &conf
.fixed_out
.settings
.nchannels
,
1585 .descr
= "Number of channels for fixed DAC (1 - mono, 2 - stereo)"
1588 .name
= "DAC_VOICES",
1590 .valp
= &conf
.fixed_out
.nb_voices
,
1591 .descr
= "Number of voices for DAC"
1594 .name
= "DAC_TRY_POLL",
1595 .tag
= AUD_OPT_BOOL
,
1596 .valp
= &conf
.try_poll_out
,
1597 .descr
= "Attempt using poll mode for DAC"
1601 .name
= "ADC_FIXED_SETTINGS",
1602 .tag
= AUD_OPT_BOOL
,
1603 .valp
= &conf
.fixed_in
.enabled
,
1604 .descr
= "Use fixed settings for host ADC"
1607 .name
= "ADC_FIXED_FREQ",
1609 .valp
= &conf
.fixed_in
.settings
.freq
,
1610 .descr
= "Frequency for fixed host ADC"
1613 .name
= "ADC_FIXED_FMT",
1615 .valp
= &conf
.fixed_in
.settings
.fmt
,
1616 .descr
= "Format for fixed host ADC"
1619 .name
= "ADC_FIXED_CHANNELS",
1621 .valp
= &conf
.fixed_in
.settings
.nchannels
,
1622 .descr
= "Number of channels for fixed ADC (1 - mono, 2 - stereo)"
1625 .name
= "ADC_VOICES",
1627 .valp
= &conf
.fixed_in
.nb_voices
,
1628 .descr
= "Number of voices for ADC"
1631 .name
= "ADC_TRY_POLL",
1632 .tag
= AUD_OPT_BOOL
,
1633 .valp
= &conf
.try_poll_in
,
1634 .descr
= "Attempt using poll mode for ADC"
1638 .name
= "TIMER_PERIOD",
1640 .valp
= &conf
.period
.hertz
,
1641 .descr
= "Timer period in HZ (0 - use lowest possible)"
1645 .tag
= AUD_OPT_BOOL
,
1646 .valp
= &conf
.plive
,
1647 .descr
= "(undocumented)"
1650 .name
= "LOG_TO_MONITOR",
1651 .tag
= AUD_OPT_BOOL
,
1652 .valp
= &conf
.log_to_monitor
,
1653 .descr
= "Print logging messages to monitor instead of stderr"
1655 { /* End of list */ }
1658 static void audio_pp_nb_voices (const char *typ
, int nb
)
1662 printf ("Does not support %s\n", typ
);
1665 printf ("One %s voice\n", typ
);
1668 printf ("Theoretically supports many %s voices\n", typ
);
1671 printf ("Theoretically supports up to %d %s voices\n", nb
, typ
);
1677 void AUD_help (void)
1681 audio_process_options ("AUDIO", audio_options
);
1682 for (i
= 0; i
< ARRAY_SIZE (drvtab
); i
++) {
1683 struct audio_driver
*d
= drvtab
[i
];
1685 audio_process_options (d
->name
, d
->options
);
1689 printf ("Audio options:\n");
1690 audio_print_options ("AUDIO", audio_options
);
1693 printf ("Available drivers:\n");
1695 for (i
= 0; i
< ARRAY_SIZE (drvtab
); i
++) {
1696 struct audio_driver
*d
= drvtab
[i
];
1698 printf ("Name: %s\n", d
->name
);
1699 printf ("Description: %s\n", d
->descr
);
1701 audio_pp_nb_voices ("playback", d
->max_voices_out
);
1702 audio_pp_nb_voices ("capture", d
->max_voices_in
);
1705 printf ("Options:\n");
1706 audio_print_options (d
->name
, d
->options
);
1709 printf ("No options\n");
1715 "Options are settable through environment variables.\n"
1718 " set QEMU_AUDIO_DRV=wav\n"
1719 " set QEMU_WAV_PATH=c:\\tune.wav\n"
1721 " export QEMU_AUDIO_DRV=wav\n"
1722 " export QEMU_WAV_PATH=$HOME/tune.wav\n"
1723 "(for csh replace export with setenv in the above)\n"
1729 static int audio_driver_init (AudioState
*s
, struct audio_driver
*drv
)
1732 audio_process_options (drv
->name
, drv
->options
);
1734 s
->drv_opaque
= drv
->init ();
1736 if (s
->drv_opaque
) {
1737 audio_init_nb_voices_out (drv
);
1738 audio_init_nb_voices_in (drv
);
1743 dolog ("Could not init `%s' audio driver\n", drv
->name
);
1748 static void audio_vm_change_state_handler (void *opaque
, int running
,
1751 AudioState
*s
= opaque
;
1752 HWVoiceOut
*hwo
= NULL
;
1753 HWVoiceIn
*hwi
= NULL
;
1754 int op
= running
? VOICE_ENABLE
: VOICE_DISABLE
;
1756 s
->vm_running
= running
;
1757 while ((hwo
= audio_pcm_hw_find_any_enabled_out (hwo
))) {
1758 hwo
->pcm_ops
->ctl_out (hwo
, op
, conf
.try_poll_out
);
1761 while ((hwi
= audio_pcm_hw_find_any_enabled_in (hwi
))) {
1762 hwi
->pcm_ops
->ctl_in (hwi
, op
, conf
.try_poll_in
);
1764 audio_reset_timer (s
);
1767 static void audio_atexit (void)
1769 AudioState
*s
= &glob_audio_state
;
1770 HWVoiceOut
*hwo
= NULL
;
1771 HWVoiceIn
*hwi
= NULL
;
1773 while ((hwo
= audio_pcm_hw_find_any_enabled_out (hwo
))) {
1776 hwo
->pcm_ops
->ctl_out (hwo
, VOICE_DISABLE
);
1777 hwo
->pcm_ops
->fini_out (hwo
);
1779 for (sc
= hwo
->cap_head
.lh_first
; sc
; sc
= sc
->entries
.le_next
) {
1780 CaptureVoiceOut
*cap
= sc
->cap
;
1781 struct capture_callback
*cb
;
1783 for (cb
= cap
->cb_head
.lh_first
; cb
; cb
= cb
->entries
.le_next
) {
1784 cb
->ops
.destroy (cb
->opaque
);
1789 while ((hwi
= audio_pcm_hw_find_any_enabled_in (hwi
))) {
1790 hwi
->pcm_ops
->ctl_in (hwi
, VOICE_DISABLE
);
1791 hwi
->pcm_ops
->fini_in (hwi
);
1795 s
->drv
->fini (s
->drv_opaque
);
1799 static const VMStateDescription vmstate_audio
= {
1802 .minimum_version_id
= 1,
1803 .minimum_version_id_old
= 1,
1804 .fields
= (VMStateField
[]) {
1805 VMSTATE_END_OF_LIST()
1809 static void audio_init (void)
1813 const char *drvname
;
1814 VMChangeStateEntry
*e
;
1815 AudioState
*s
= &glob_audio_state
;
1821 QLIST_INIT (&s
->hw_head_out
);
1822 QLIST_INIT (&s
->hw_head_in
);
1823 QLIST_INIT (&s
->cap_head
);
1824 atexit (audio_atexit
);
1826 s
->ts
= qemu_new_timer_ns (vm_clock
, audio_timer
, s
);
1828 hw_error("Could not create audio timer\n");
1831 audio_process_options ("AUDIO", audio_options
);
1833 s
->nb_hw_voices_out
= conf
.fixed_out
.nb_voices
;
1834 s
->nb_hw_voices_in
= conf
.fixed_in
.nb_voices
;
1836 if (s
->nb_hw_voices_out
<= 0) {
1837 dolog ("Bogus number of playback voices %d, setting to 1\n",
1838 s
->nb_hw_voices_out
);
1839 s
->nb_hw_voices_out
= 1;
1842 if (s
->nb_hw_voices_in
<= 0) {
1843 dolog ("Bogus number of capture voices %d, setting to 0\n",
1844 s
->nb_hw_voices_in
);
1845 s
->nb_hw_voices_in
= 0;
1850 drvname
= audio_get_conf_str ("QEMU_AUDIO_DRV", NULL
, &def
);
1856 for (i
= 0; i
< ARRAY_SIZE (drvtab
); i
++) {
1857 if (!strcmp (drvname
, drvtab
[i
]->name
)) {
1858 done
= !audio_driver_init (s
, drvtab
[i
]);
1865 dolog ("Unknown audio driver `%s'\n", drvname
);
1866 dolog ("Run with -audio-help to list available drivers\n");
1871 for (i
= 0; !done
&& i
< ARRAY_SIZE (drvtab
); i
++) {
1872 if (drvtab
[i
]->can_be_default
) {
1873 done
= !audio_driver_init (s
, drvtab
[i
]);
1879 done
= !audio_driver_init (s
, &no_audio_driver
);
1881 hw_error("Could not initialize audio subsystem\n");
1884 dolog ("warning: Using timer based audio emulation\n");
1888 if (conf
.period
.hertz
<= 0) {
1889 if (conf
.period
.hertz
< 0) {
1890 dolog ("warning: Timer period is negative - %d "
1891 "treating as zero\n",
1894 conf
.period
.ticks
= 1;
1897 muldiv64 (1, get_ticks_per_sec (), conf
.period
.hertz
);
1900 e
= qemu_add_vm_change_state_handler (audio_vm_change_state_handler
, s
);
1902 dolog ("warning: Could not register change state handler\n"
1903 "(Audio can continue looping even after stopping the VM)\n");
1906 QLIST_INIT (&s
->card_head
);
1907 vmstate_register (NULL
, 0, &vmstate_audio
, s
);
1910 void AUD_register_card (const char *name
, QEMUSoundCard
*card
)
1913 card
->name
= g_strdup (name
);
1914 memset (&card
->entries
, 0, sizeof (card
->entries
));
1915 QLIST_INSERT_HEAD (&glob_audio_state
.card_head
, card
, entries
);
1918 void AUD_remove_card (QEMUSoundCard
*card
)
1920 QLIST_REMOVE (card
, entries
);
1921 g_free (card
->name
);
1925 CaptureVoiceOut
*AUD_add_capture (
1926 struct audsettings
*as
,
1927 struct audio_capture_ops
*ops
,
1931 AudioState
*s
= &glob_audio_state
;
1932 CaptureVoiceOut
*cap
;
1933 struct capture_callback
*cb
;
1935 if (audio_validate_settings (as
)) {
1936 dolog ("Invalid settings were passed when trying to add capture\n");
1937 audio_print_settings (as
);
1941 cb
= audio_calloc (AUDIO_FUNC
, 1, sizeof (*cb
));
1943 dolog ("Could not allocate capture callback information, size %zu\n",
1948 cb
->opaque
= cb_opaque
;
1950 cap
= audio_pcm_capture_find_specific (as
);
1952 QLIST_INSERT_HEAD (&cap
->cb_head
, cb
, entries
);
1957 CaptureVoiceOut
*cap
;
1959 cap
= audio_calloc (AUDIO_FUNC
, 1, sizeof (*cap
));
1961 dolog ("Could not allocate capture voice, size %zu\n",
1967 QLIST_INIT (&hw
->sw_head
);
1968 QLIST_INIT (&cap
->cb_head
);
1970 /* XXX find a more elegant way */
1971 hw
->samples
= 4096 * 4;
1972 hw
->mix_buf
= audio_calloc (AUDIO_FUNC
, hw
->samples
,
1973 sizeof (struct st_sample
));
1975 dolog ("Could not allocate capture mix buffer (%d samples)\n",
1980 audio_pcm_init_info (&hw
->info
, as
);
1982 cap
->buf
= audio_calloc (AUDIO_FUNC
, hw
->samples
, 1 << hw
->info
.shift
);
1984 dolog ("Could not allocate capture buffer "
1985 "(%d samples, each %d bytes)\n",
1986 hw
->samples
, 1 << hw
->info
.shift
);
1990 hw
->clip
= mixeng_clip
1991 [hw
->info
.nchannels
== 2]
1993 [hw
->info
.swap_endianness
]
1994 [audio_bits_to_index (hw
->info
.bits
)];
1996 QLIST_INSERT_HEAD (&s
->cap_head
, cap
, entries
);
1997 QLIST_INSERT_HEAD (&cap
->cb_head
, cb
, entries
);
2000 while ((hw
= audio_pcm_hw_find_any_out (hw
))) {
2001 audio_attach_capture (hw
);
2006 g_free (cap
->hw
.mix_buf
);
2016 void AUD_del_capture (CaptureVoiceOut
*cap
, void *cb_opaque
)
2018 struct capture_callback
*cb
;
2020 for (cb
= cap
->cb_head
.lh_first
; cb
; cb
= cb
->entries
.le_next
) {
2021 if (cb
->opaque
== cb_opaque
) {
2022 cb
->ops
.destroy (cb_opaque
);
2023 QLIST_REMOVE (cb
, entries
);
2026 if (!cap
->cb_head
.lh_first
) {
2027 SWVoiceOut
*sw
= cap
->hw
.sw_head
.lh_first
, *sw1
;
2030 SWVoiceCap
*sc
= (SWVoiceCap
*) sw
;
2031 #ifdef DEBUG_CAPTURE
2032 dolog ("freeing %s\n", sw
->name
);
2035 sw1
= sw
->entries
.le_next
;
2037 st_rate_stop (sw
->rate
);
2040 QLIST_REMOVE (sw
, entries
);
2041 QLIST_REMOVE (sc
, entries
);
2045 QLIST_REMOVE (cap
, entries
);
2053 void AUD_set_volume_out (SWVoiceOut
*sw
, int mute
, uint8_t lvol
, uint8_t rvol
)
2056 sw
->vol
.mute
= mute
;
2057 sw
->vol
.l
= nominal_volume
.l
* lvol
/ 255;
2058 sw
->vol
.r
= nominal_volume
.r
* rvol
/ 255;
2062 void AUD_set_volume_in (SWVoiceIn
*sw
, int mute
, uint8_t lvol
, uint8_t rvol
)
2065 sw
->vol
.mute
= mute
;
2066 sw
->vol
.l
= nominal_volume
.l
* lvol
/ 255;
2067 sw
->vol
.r
= nominal_volume
.r
* rvol
/ 255;