|
1 /* |
|
2 * QEMU Audio subsystem header |
|
3 * |
|
4 * Copyright (c) 2005 Vassili Karpov (malc) |
|
5 * |
|
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: |
|
12 * |
|
13 * The above copyright notice and this permission notice shall be included in |
|
14 * all copies or substantial portions of the Software. |
|
15 * |
|
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 |
|
22 * THE SOFTWARE. |
|
23 */ |
|
24 |
|
25 #ifdef DAC |
|
26 #define NAME "playback" |
|
27 #define HWBUF hw->mix_buf |
|
28 #define TYPE out |
|
29 #define HW HWVoiceOut |
|
30 #define SW SWVoiceOut |
|
31 #else |
|
32 #define NAME "capture" |
|
33 #define TYPE in |
|
34 #define HW HWVoiceIn |
|
35 #define SW SWVoiceIn |
|
36 #define HWBUF hw->conv_buf |
|
37 #endif |
|
38 |
|
39 static void glue (audio_init_nb_voices_, TYPE) ( |
|
40 AudioState *s, |
|
41 struct audio_driver *drv |
|
42 ) |
|
43 { |
|
44 int max_voices = glue (drv->max_voices_, TYPE); |
|
45 int voice_size = glue (drv->voice_size_, TYPE); |
|
46 |
|
47 if (glue (s->nb_hw_voices_, TYPE) > max_voices) { |
|
48 if (!max_voices) { |
|
49 #ifdef DAC |
|
50 dolog ("Driver `%s' does not support " NAME "\n", drv->name); |
|
51 #endif |
|
52 } |
|
53 else { |
|
54 dolog ("Driver `%s' does not support %d " NAME " voices, max %d\n", |
|
55 drv->name, |
|
56 glue (s->nb_hw_voices_, TYPE), |
|
57 max_voices); |
|
58 } |
|
59 glue (s->nb_hw_voices_, TYPE) = max_voices; |
|
60 } |
|
61 |
|
62 if (audio_bug (AUDIO_FUNC, !voice_size && max_voices)) { |
|
63 dolog ("drv=`%s' voice_size=0 max_voices=%d\n", |
|
64 drv->name, max_voices); |
|
65 glue (s->nb_hw_voices_, TYPE) = 0; |
|
66 } |
|
67 |
|
68 if (audio_bug (AUDIO_FUNC, voice_size && !max_voices)) { |
|
69 dolog ("drv=`%s' voice_size=%d max_voices=0\n", |
|
70 drv->name, voice_size); |
|
71 } |
|
72 } |
|
73 |
|
74 static void glue (audio_pcm_hw_free_resources_, TYPE) (HW *hw) |
|
75 { |
|
76 if (HWBUF) { |
|
77 qemu_free (HWBUF); |
|
78 } |
|
79 |
|
80 HWBUF = NULL; |
|
81 } |
|
82 |
|
83 static int glue (audio_pcm_hw_alloc_resources_, TYPE) (HW *hw) |
|
84 { |
|
85 HWBUF = audio_calloc (AUDIO_FUNC, hw->samples, sizeof (struct st_sample)); |
|
86 if (!HWBUF) { |
|
87 dolog ("Could not allocate " NAME " buffer (%d samples)\n", |
|
88 hw->samples); |
|
89 return -1; |
|
90 } |
|
91 |
|
92 return 0; |
|
93 } |
|
94 |
|
95 static void glue (audio_pcm_sw_free_resources_, TYPE) (SW *sw) |
|
96 { |
|
97 if (sw->buf) { |
|
98 qemu_free (sw->buf); |
|
99 } |
|
100 |
|
101 if (sw->rate) { |
|
102 st_rate_stop (sw->rate); |
|
103 } |
|
104 |
|
105 sw->buf = NULL; |
|
106 sw->rate = NULL; |
|
107 } |
|
108 |
|
109 static int glue (audio_pcm_sw_alloc_resources_, TYPE) (SW *sw) |
|
110 { |
|
111 int samples; |
|
112 |
|
113 #ifdef DAC |
|
114 samples = sw->hw->samples; |
|
115 #else |
|
116 samples = ((int64_t) sw->hw->samples << 32) / sw->ratio; |
|
117 #endif |
|
118 |
|
119 sw->buf = audio_calloc (AUDIO_FUNC, samples, sizeof (struct st_sample)); |
|
120 if (!sw->buf) { |
|
121 dolog ("Could not allocate buffer for `%s' (%d samples)\n", |
|
122 SW_NAME (sw), samples); |
|
123 return -1; |
|
124 } |
|
125 |
|
126 #ifdef DAC |
|
127 sw->rate = st_rate_start (sw->info.freq, sw->hw->info.freq); |
|
128 #else |
|
129 sw->rate = st_rate_start (sw->hw->info.freq, sw->info.freq); |
|
130 #endif |
|
131 if (!sw->rate) { |
|
132 qemu_free (sw->buf); |
|
133 sw->buf = NULL; |
|
134 return -1; |
|
135 } |
|
136 return 0; |
|
137 } |
|
138 |
|
139 static int glue (audio_pcm_sw_init_, TYPE) ( |
|
140 SW *sw, |
|
141 HW *hw, |
|
142 const char *name, |
|
143 struct audsettings *as |
|
144 ) |
|
145 { |
|
146 int err; |
|
147 |
|
148 audio_pcm_init_info (&sw->info, as); |
|
149 sw->hw = hw; |
|
150 sw->active = 0; |
|
151 #ifdef DAC |
|
152 sw->ratio = ((int64_t) sw->hw->info.freq << 32) / sw->info.freq; |
|
153 sw->total_hw_samples_mixed = 0; |
|
154 sw->empty = 1; |
|
155 #else |
|
156 sw->ratio = ((int64_t) sw->info.freq << 32) / sw->hw->info.freq; |
|
157 #endif |
|
158 |
|
159 #ifdef DAC |
|
160 sw->conv = mixeng_conv |
|
161 #else |
|
162 sw->clip = mixeng_clip |
|
163 #endif |
|
164 [sw->info.nchannels == 2] |
|
165 [sw->info.sign] |
|
166 [sw->info.swap_endianness] |
|
167 [audio_bits_to_index (sw->info.bits)]; |
|
168 |
|
169 sw->name = qemu_strdup (name); |
|
170 err = glue (audio_pcm_sw_alloc_resources_, TYPE) (sw); |
|
171 if (err) { |
|
172 qemu_free (sw->name); |
|
173 sw->name = NULL; |
|
174 } |
|
175 return err; |
|
176 } |
|
177 |
|
178 static void glue (audio_pcm_sw_fini_, TYPE) (SW *sw) |
|
179 { |
|
180 glue (audio_pcm_sw_free_resources_, TYPE) (sw); |
|
181 if (sw->name) { |
|
182 qemu_free (sw->name); |
|
183 sw->name = NULL; |
|
184 } |
|
185 } |
|
186 |
|
187 static void glue (audio_pcm_hw_add_sw_, TYPE) (HW *hw, SW *sw) |
|
188 { |
|
189 LIST_INSERT_HEAD (&hw->sw_head, sw, entries); |
|
190 } |
|
191 |
|
192 static void glue (audio_pcm_hw_del_sw_, TYPE) (SW *sw) |
|
193 { |
|
194 LIST_REMOVE (sw, entries); |
|
195 } |
|
196 |
|
197 static void glue (audio_pcm_hw_gc_, TYPE) (AudioState *s, HW **hwp) |
|
198 { |
|
199 HW *hw = *hwp; |
|
200 |
|
201 if (!hw->sw_head.lh_first) { |
|
202 #ifdef DAC |
|
203 audio_detach_capture (hw); |
|
204 #endif |
|
205 LIST_REMOVE (hw, entries); |
|
206 glue (s->nb_hw_voices_, TYPE) += 1; |
|
207 glue (audio_pcm_hw_free_resources_ ,TYPE) (hw); |
|
208 glue (hw->pcm_ops->fini_, TYPE) (hw); |
|
209 qemu_free (hw); |
|
210 *hwp = NULL; |
|
211 } |
|
212 } |
|
213 |
|
214 static HW *glue (audio_pcm_hw_find_any_, TYPE) (AudioState *s, HW *hw) |
|
215 { |
|
216 return hw ? hw->entries.le_next : s->glue (hw_head_, TYPE).lh_first; |
|
217 } |
|
218 |
|
219 static HW *glue (audio_pcm_hw_find_any_enabled_, TYPE) (AudioState *s, HW *hw) |
|
220 { |
|
221 while ((hw = glue (audio_pcm_hw_find_any_, TYPE) (s, hw))) { |
|
222 if (hw->enabled) { |
|
223 return hw; |
|
224 } |
|
225 } |
|
226 return NULL; |
|
227 } |
|
228 |
|
229 static HW *glue (audio_pcm_hw_find_specific_, TYPE) ( |
|
230 AudioState *s, |
|
231 HW *hw, |
|
232 struct audsettings *as |
|
233 ) |
|
234 { |
|
235 while ((hw = glue (audio_pcm_hw_find_any_, TYPE) (s, hw))) { |
|
236 if (audio_pcm_info_eq (&hw->info, as)) { |
|
237 return hw; |
|
238 } |
|
239 } |
|
240 return NULL; |
|
241 } |
|
242 |
|
243 static HW *glue (audio_pcm_hw_add_new_, TYPE) (AudioState *s, |
|
244 struct audsettings *as) |
|
245 { |
|
246 HW *hw; |
|
247 struct audio_driver *drv = s->drv; |
|
248 |
|
249 if (!glue (s->nb_hw_voices_, TYPE)) { |
|
250 return NULL; |
|
251 } |
|
252 |
|
253 if (audio_bug (AUDIO_FUNC, !drv)) { |
|
254 dolog ("No host audio driver\n"); |
|
255 return NULL; |
|
256 } |
|
257 |
|
258 if (audio_bug (AUDIO_FUNC, !drv->pcm_ops)) { |
|
259 dolog ("Host audio driver without pcm_ops\n"); |
|
260 return NULL; |
|
261 } |
|
262 |
|
263 hw = audio_calloc (AUDIO_FUNC, 1, glue (drv->voice_size_, TYPE)); |
|
264 if (!hw) { |
|
265 dolog ("Can not allocate voice `%s' size %d\n", |
|
266 drv->name, glue (drv->voice_size_, TYPE)); |
|
267 return NULL; |
|
268 } |
|
269 |
|
270 hw->pcm_ops = drv->pcm_ops; |
|
271 LIST_INIT (&hw->sw_head); |
|
272 #ifdef DAC |
|
273 LIST_INIT (&hw->cap_head); |
|
274 #endif |
|
275 if (glue (hw->pcm_ops->init_, TYPE) (hw, as)) { |
|
276 goto err0; |
|
277 } |
|
278 |
|
279 if (audio_bug (AUDIO_FUNC, hw->samples <= 0)) { |
|
280 dolog ("hw->samples=%d\n", hw->samples); |
|
281 goto err1; |
|
282 } |
|
283 |
|
284 #ifdef DAC |
|
285 hw->clip = mixeng_clip |
|
286 #else |
|
287 hw->conv = mixeng_conv |
|
288 #endif |
|
289 [hw->info.nchannels == 2] |
|
290 [hw->info.sign] |
|
291 [hw->info.swap_endianness] |
|
292 [audio_bits_to_index (hw->info.bits)]; |
|
293 |
|
294 if (glue (audio_pcm_hw_alloc_resources_, TYPE) (hw)) { |
|
295 goto err1; |
|
296 } |
|
297 |
|
298 LIST_INSERT_HEAD (&s->glue (hw_head_, TYPE), hw, entries); |
|
299 glue (s->nb_hw_voices_, TYPE) -= 1; |
|
300 #ifdef DAC |
|
301 audio_attach_capture (s, hw); |
|
302 #endif |
|
303 return hw; |
|
304 |
|
305 err1: |
|
306 glue (hw->pcm_ops->fini_, TYPE) (hw); |
|
307 err0: |
|
308 qemu_free (hw); |
|
309 return NULL; |
|
310 } |
|
311 |
|
312 static HW *glue (audio_pcm_hw_add_, TYPE) (AudioState *s, |
|
313 struct audsettings *as) |
|
314 { |
|
315 HW *hw; |
|
316 |
|
317 if (glue (conf.fixed_, TYPE).enabled && glue (conf.fixed_, TYPE).greedy) { |
|
318 hw = glue (audio_pcm_hw_add_new_, TYPE) (s, as); |
|
319 if (hw) { |
|
320 return hw; |
|
321 } |
|
322 } |
|
323 |
|
324 hw = glue (audio_pcm_hw_find_specific_, TYPE) (s, NULL, as); |
|
325 if (hw) { |
|
326 return hw; |
|
327 } |
|
328 |
|
329 hw = glue (audio_pcm_hw_add_new_, TYPE) (s, as); |
|
330 if (hw) { |
|
331 return hw; |
|
332 } |
|
333 |
|
334 return glue (audio_pcm_hw_find_any_, TYPE) (s, NULL); |
|
335 } |
|
336 |
|
337 static SW *glue (audio_pcm_create_voice_pair_, TYPE) ( |
|
338 AudioState *s, |
|
339 const char *sw_name, |
|
340 struct audsettings *as |
|
341 ) |
|
342 { |
|
343 SW *sw; |
|
344 HW *hw; |
|
345 struct audsettings hw_as; |
|
346 |
|
347 if (glue (conf.fixed_, TYPE).enabled) { |
|
348 hw_as = glue (conf.fixed_, TYPE).settings; |
|
349 } |
|
350 else { |
|
351 hw_as = *as; |
|
352 } |
|
353 |
|
354 sw = audio_calloc (AUDIO_FUNC, 1, sizeof (*sw)); |
|
355 if (!sw) { |
|
356 dolog ("Could not allocate soft voice `%s' (%zu bytes)\n", |
|
357 sw_name ? sw_name : "unknown", sizeof (*sw)); |
|
358 goto err1; |
|
359 } |
|
360 |
|
361 hw = glue (audio_pcm_hw_add_, TYPE) (s, &hw_as); |
|
362 if (!hw) { |
|
363 goto err2; |
|
364 } |
|
365 |
|
366 glue (audio_pcm_hw_add_sw_, TYPE) (hw, sw); |
|
367 |
|
368 if (glue (audio_pcm_sw_init_, TYPE) (sw, hw, sw_name, as)) { |
|
369 goto err3; |
|
370 } |
|
371 |
|
372 return sw; |
|
373 |
|
374 err3: |
|
375 glue (audio_pcm_hw_del_sw_, TYPE) (sw); |
|
376 glue (audio_pcm_hw_gc_, TYPE) (s, &hw); |
|
377 err2: |
|
378 qemu_free (sw); |
|
379 err1: |
|
380 return NULL; |
|
381 } |
|
382 |
|
383 static void glue (audio_close_, TYPE) (AudioState *s, SW *sw) |
|
384 { |
|
385 glue (audio_pcm_sw_fini_, TYPE) (sw); |
|
386 glue (audio_pcm_hw_del_sw_, TYPE) (sw); |
|
387 glue (audio_pcm_hw_gc_, TYPE) (s, &sw->hw); |
|
388 qemu_free (sw); |
|
389 } |
|
390 |
|
391 void glue (AUD_close_, TYPE) (QEMUSoundCard *card, SW *sw) |
|
392 { |
|
393 if (sw) { |
|
394 if (audio_bug (AUDIO_FUNC, !card || !card->audio)) { |
|
395 dolog ("card=%p card->audio=%p\n", |
|
396 card, card ? card->audio : NULL); |
|
397 return; |
|
398 } |
|
399 |
|
400 glue (audio_close_, TYPE) (card->audio, sw); |
|
401 } |
|
402 } |
|
403 |
|
404 SW *glue (AUD_open_, TYPE) ( |
|
405 QEMUSoundCard *card, |
|
406 SW *sw, |
|
407 const char *name, |
|
408 void *callback_opaque , |
|
409 audio_callback_fn_t callback_fn, |
|
410 struct audsettings *as |
|
411 ) |
|
412 { |
|
413 AudioState *s; |
|
414 #ifdef DAC |
|
415 int live = 0; |
|
416 SW *old_sw = NULL; |
|
417 #endif |
|
418 |
|
419 ldebug ("open %s, freq %d, nchannels %d, fmt %d\n", |
|
420 name, as->freq, as->nchannels, as->fmt); |
|
421 |
|
422 if (audio_bug (AUDIO_FUNC, |
|
423 !card || !card->audio || !name || !callback_fn || !as)) { |
|
424 dolog ("card=%p card->audio=%p name=%p callback_fn=%p as=%p\n", |
|
425 card, card ? card->audio : NULL, name, callback_fn, as); |
|
426 goto fail; |
|
427 } |
|
428 |
|
429 s = card->audio; |
|
430 |
|
431 if (audio_bug (AUDIO_FUNC, audio_validate_settings (as))) { |
|
432 audio_print_settings (as); |
|
433 goto fail; |
|
434 } |
|
435 |
|
436 if (audio_bug (AUDIO_FUNC, !s->drv)) { |
|
437 dolog ("Can not open `%s' (no host audio driver)\n", name); |
|
438 goto fail; |
|
439 } |
|
440 |
|
441 if (sw && audio_pcm_info_eq (&sw->info, as)) { |
|
442 return sw; |
|
443 } |
|
444 |
|
445 #ifdef DAC |
|
446 if (conf.plive && sw && (!sw->active && !sw->empty)) { |
|
447 live = sw->total_hw_samples_mixed; |
|
448 |
|
449 #ifdef DEBUG_PLIVE |
|
450 dolog ("Replacing voice %s with %d live samples\n", SW_NAME (sw), live); |
|
451 dolog ("Old %s freq %d, bits %d, channels %d\n", |
|
452 SW_NAME (sw), sw->info.freq, sw->info.bits, sw->info.nchannels); |
|
453 dolog ("New %s freq %d, bits %d, channels %d\n", |
|
454 name, |
|
455 freq, |
|
456 (fmt == AUD_FMT_S16 || fmt == AUD_FMT_U16) ? 16 : 8, |
|
457 nchannels); |
|
458 #endif |
|
459 |
|
460 if (live) { |
|
461 old_sw = sw; |
|
462 old_sw->callback.fn = NULL; |
|
463 sw = NULL; |
|
464 } |
|
465 } |
|
466 #endif |
|
467 |
|
468 if (!glue (conf.fixed_, TYPE).enabled && sw) { |
|
469 glue (AUD_close_, TYPE) (card, sw); |
|
470 sw = NULL; |
|
471 } |
|
472 |
|
473 if (sw) { |
|
474 HW *hw = sw->hw; |
|
475 |
|
476 if (!hw) { |
|
477 dolog ("Internal logic error voice `%s' has no hardware store\n", |
|
478 SW_NAME (sw)); |
|
479 goto fail; |
|
480 } |
|
481 |
|
482 glue (audio_pcm_sw_fini_, TYPE) (sw); |
|
483 if (glue (audio_pcm_sw_init_, TYPE) (sw, hw, name, as)) { |
|
484 goto fail; |
|
485 } |
|
486 } |
|
487 else { |
|
488 sw = glue (audio_pcm_create_voice_pair_, TYPE) (s, name, as); |
|
489 if (!sw) { |
|
490 dolog ("Failed to create voice `%s'\n", name); |
|
491 return NULL; |
|
492 } |
|
493 } |
|
494 |
|
495 if (sw) { |
|
496 sw->vol = nominal_volume; |
|
497 sw->callback.fn = callback_fn; |
|
498 sw->callback.opaque = callback_opaque; |
|
499 |
|
500 #ifdef DAC |
|
501 if (live) { |
|
502 int mixed = |
|
503 (live << old_sw->info.shift) |
|
504 * old_sw->info.bytes_per_second |
|
505 / sw->info.bytes_per_second; |
|
506 |
|
507 #ifdef DEBUG_PLIVE |
|
508 dolog ("Silence will be mixed %d\n", mixed); |
|
509 #endif |
|
510 sw->total_hw_samples_mixed += mixed; |
|
511 } |
|
512 #endif |
|
513 |
|
514 #ifdef DEBUG_AUDIO |
|
515 dolog ("%s\n", name); |
|
516 audio_pcm_print_info ("hw", &sw->hw->info); |
|
517 audio_pcm_print_info ("sw", &sw->info); |
|
518 #endif |
|
519 } |
|
520 |
|
521 return sw; |
|
522 |
|
523 fail: |
|
524 glue (AUD_close_, TYPE) (card, sw); |
|
525 return NULL; |
|
526 } |
|
527 |
|
528 int glue (AUD_is_active_, TYPE) (SW *sw) |
|
529 { |
|
530 return sw ? sw->active : 0; |
|
531 } |
|
532 |
|
533 void glue (AUD_init_time_stamp_, TYPE) (SW *sw, QEMUAudioTimeStamp *ts) |
|
534 { |
|
535 if (!sw) { |
|
536 return; |
|
537 } |
|
538 |
|
539 ts->old_ts = sw->hw->ts_helper; |
|
540 } |
|
541 |
|
542 uint64_t glue (AUD_get_elapsed_usec_, TYPE) (SW *sw, QEMUAudioTimeStamp *ts) |
|
543 { |
|
544 uint64_t delta, cur_ts, old_ts; |
|
545 |
|
546 if (!sw) { |
|
547 return 0; |
|
548 } |
|
549 |
|
550 cur_ts = sw->hw->ts_helper; |
|
551 old_ts = ts->old_ts; |
|
552 /* dolog ("cur %lld old %lld\n", cur_ts, old_ts); */ |
|
553 |
|
554 if (cur_ts >= old_ts) { |
|
555 delta = cur_ts - old_ts; |
|
556 } |
|
557 else { |
|
558 delta = UINT64_MAX - old_ts + cur_ts; |
|
559 } |
|
560 |
|
561 if (!delta) { |
|
562 return 0; |
|
563 } |
|
564 |
|
565 return (delta * sw->hw->info.freq) / 1000000; |
|
566 } |
|
567 |
|
568 #undef TYPE |
|
569 #undef HW |
|
570 #undef SW |
|
571 #undef HWBUF |
|
572 #undef NAME |