1 /* 2 * QEMU ALSA audio driver 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 #include "qemu/osdep.h" 25 #include <alsa/asoundlib.h> 26 #include "qemu-common.h" 27 #include "qemu/main-loop.h" 28 #include "audio.h" 29 #include "trace.h" 30 31 #if QEMU_GNUC_PREREQ(4, 3) 32 #pragma GCC diagnostic ignored "-Waddress" 33 #endif 34 35 #define AUDIO_CAP "alsa" 36 #include "audio_int.h" 37 38 typedef struct ALSAConf { 39 int size_in_usec_in; 40 int size_in_usec_out; 41 const char *pcm_name_in; 42 const char *pcm_name_out; 43 unsigned int buffer_size_in; 44 unsigned int period_size_in; 45 unsigned int buffer_size_out; 46 unsigned int period_size_out; 47 unsigned int threshold; 48 49 int buffer_size_in_overridden; 50 int period_size_in_overridden; 51 52 int buffer_size_out_overridden; 53 int period_size_out_overridden; 54 } ALSAConf; 55 56 struct pollhlp { 57 snd_pcm_t *handle; 58 struct pollfd *pfds; 59 ALSAConf *conf; 60 int count; 61 int mask; 62 }; 63 64 typedef struct ALSAVoiceOut { 65 HWVoiceOut hw; 66 int wpos; 67 int pending; 68 void *pcm_buf; 69 snd_pcm_t *handle; 70 struct pollhlp pollhlp; 71 } ALSAVoiceOut; 72 73 typedef struct ALSAVoiceIn { 74 HWVoiceIn hw; 75 snd_pcm_t *handle; 76 void *pcm_buf; 77 struct pollhlp pollhlp; 78 } ALSAVoiceIn; 79 80 struct alsa_params_req { 81 int freq; 82 snd_pcm_format_t fmt; 83 int nchannels; 84 int size_in_usec; 85 int override_mask; 86 unsigned int buffer_size; 87 unsigned int period_size; 88 }; 89 90 struct alsa_params_obt { 91 int freq; 92 audfmt_e fmt; 93 int endianness; 94 int nchannels; 95 snd_pcm_uframes_t samples; 96 }; 97 98 static void GCC_FMT_ATTR (2, 3) alsa_logerr (int err, const char *fmt, ...) 99 { 100 va_list ap; 101 102 va_start (ap, fmt); 103 AUD_vlog (AUDIO_CAP, fmt, ap); 104 va_end (ap); 105 106 AUD_log (AUDIO_CAP, "Reason: %s\n", snd_strerror (err)); 107 } 108 109 static void GCC_FMT_ATTR (3, 4) alsa_logerr2 ( 110 int err, 111 const char *typ, 112 const char *fmt, 113 ... 114 ) 115 { 116 va_list ap; 117 118 AUD_log (AUDIO_CAP, "Could not initialize %s\n", typ); 119 120 va_start (ap, fmt); 121 AUD_vlog (AUDIO_CAP, fmt, ap); 122 va_end (ap); 123 124 AUD_log (AUDIO_CAP, "Reason: %s\n", snd_strerror (err)); 125 } 126 127 static void alsa_fini_poll (struct pollhlp *hlp) 128 { 129 int i; 130 struct pollfd *pfds = hlp->pfds; 131 132 if (pfds) { 133 for (i = 0; i < hlp->count; ++i) { 134 qemu_set_fd_handler (pfds[i].fd, NULL, NULL, NULL); 135 } 136 g_free (pfds); 137 } 138 hlp->pfds = NULL; 139 hlp->count = 0; 140 hlp->handle = NULL; 141 } 142 143 static void alsa_anal_close1 (snd_pcm_t **handlep) 144 { 145 int err = snd_pcm_close (*handlep); 146 if (err) { 147 alsa_logerr (err, "Failed to close PCM handle %p\n", *handlep); 148 } 149 *handlep = NULL; 150 } 151 152 static void alsa_anal_close (snd_pcm_t **handlep, struct pollhlp *hlp) 153 { 154 alsa_fini_poll (hlp); 155 alsa_anal_close1 (handlep); 156 } 157 158 static int alsa_recover (snd_pcm_t *handle) 159 { 160 int err = snd_pcm_prepare (handle); 161 if (err < 0) { 162 alsa_logerr (err, "Failed to prepare handle %p\n", handle); 163 return -1; 164 } 165 return 0; 166 } 167 168 static int alsa_resume (snd_pcm_t *handle) 169 { 170 int err = snd_pcm_resume (handle); 171 if (err < 0) { 172 alsa_logerr (err, "Failed to resume handle %p\n", handle); 173 return -1; 174 } 175 return 0; 176 } 177 178 static void alsa_poll_handler (void *opaque) 179 { 180 int err, count; 181 snd_pcm_state_t state; 182 struct pollhlp *hlp = opaque; 183 unsigned short revents; 184 185 count = poll (hlp->pfds, hlp->count, 0); 186 if (count < 0) { 187 dolog ("alsa_poll_handler: poll %s\n", strerror (errno)); 188 return; 189 } 190 191 if (!count) { 192 return; 193 } 194 195 /* XXX: ALSA example uses initial count, not the one returned by 196 poll, correct? */ 197 err = snd_pcm_poll_descriptors_revents (hlp->handle, hlp->pfds, 198 hlp->count, &revents); 199 if (err < 0) { 200 alsa_logerr (err, "snd_pcm_poll_descriptors_revents"); 201 return; 202 } 203 204 if (!(revents & hlp->mask)) { 205 trace_alsa_revents(revents); 206 return; 207 } 208 209 state = snd_pcm_state (hlp->handle); 210 switch (state) { 211 case SND_PCM_STATE_SETUP: 212 alsa_recover (hlp->handle); 213 break; 214 215 case SND_PCM_STATE_XRUN: 216 alsa_recover (hlp->handle); 217 break; 218 219 case SND_PCM_STATE_SUSPENDED: 220 alsa_resume (hlp->handle); 221 break; 222 223 case SND_PCM_STATE_PREPARED: 224 audio_run ("alsa run (prepared)"); 225 break; 226 227 case SND_PCM_STATE_RUNNING: 228 audio_run ("alsa run (running)"); 229 break; 230 231 default: 232 dolog ("Unexpected state %d\n", state); 233 } 234 } 235 236 static int alsa_poll_helper (snd_pcm_t *handle, struct pollhlp *hlp, int mask) 237 { 238 int i, count, err; 239 struct pollfd *pfds; 240 241 count = snd_pcm_poll_descriptors_count (handle); 242 if (count <= 0) { 243 dolog ("Could not initialize poll mode\n" 244 "Invalid number of poll descriptors %d\n", count); 245 return -1; 246 } 247 248 pfds = audio_calloc ("alsa_poll_helper", count, sizeof (*pfds)); 249 if (!pfds) { 250 dolog ("Could not initialize poll mode\n"); 251 return -1; 252 } 253 254 err = snd_pcm_poll_descriptors (handle, pfds, count); 255 if (err < 0) { 256 alsa_logerr (err, "Could not initialize poll mode\n" 257 "Could not obtain poll descriptors\n"); 258 g_free (pfds); 259 return -1; 260 } 261 262 for (i = 0; i < count; ++i) { 263 if (pfds[i].events & POLLIN) { 264 qemu_set_fd_handler (pfds[i].fd, alsa_poll_handler, NULL, hlp); 265 } 266 if (pfds[i].events & POLLOUT) { 267 trace_alsa_pollout(i, pfds[i].fd); 268 qemu_set_fd_handler (pfds[i].fd, NULL, alsa_poll_handler, hlp); 269 } 270 trace_alsa_set_handler(pfds[i].events, i, pfds[i].fd, err); 271 272 } 273 hlp->pfds = pfds; 274 hlp->count = count; 275 hlp->handle = handle; 276 hlp->mask = mask; 277 return 0; 278 } 279 280 static int alsa_poll_out (HWVoiceOut *hw) 281 { 282 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw; 283 284 return alsa_poll_helper (alsa->handle, &alsa->pollhlp, POLLOUT); 285 } 286 287 static int alsa_poll_in (HWVoiceIn *hw) 288 { 289 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw; 290 291 return alsa_poll_helper (alsa->handle, &alsa->pollhlp, POLLIN); 292 } 293 294 static int alsa_write (SWVoiceOut *sw, void *buf, int len) 295 { 296 return audio_pcm_sw_write (sw, buf, len); 297 } 298 299 static snd_pcm_format_t aud_to_alsafmt (audfmt_e fmt, int endianness) 300 { 301 switch (fmt) { 302 case AUD_FMT_S8: 303 return SND_PCM_FORMAT_S8; 304 305 case AUD_FMT_U8: 306 return SND_PCM_FORMAT_U8; 307 308 case AUD_FMT_S16: 309 if (endianness) { 310 return SND_PCM_FORMAT_S16_BE; 311 } 312 else { 313 return SND_PCM_FORMAT_S16_LE; 314 } 315 316 case AUD_FMT_U16: 317 if (endianness) { 318 return SND_PCM_FORMAT_U16_BE; 319 } 320 else { 321 return SND_PCM_FORMAT_U16_LE; 322 } 323 324 case AUD_FMT_S32: 325 if (endianness) { 326 return SND_PCM_FORMAT_S32_BE; 327 } 328 else { 329 return SND_PCM_FORMAT_S32_LE; 330 } 331 332 case AUD_FMT_U32: 333 if (endianness) { 334 return SND_PCM_FORMAT_U32_BE; 335 } 336 else { 337 return SND_PCM_FORMAT_U32_LE; 338 } 339 340 default: 341 dolog ("Internal logic error: Bad audio format %d\n", fmt); 342 #ifdef DEBUG_AUDIO 343 abort (); 344 #endif 345 return SND_PCM_FORMAT_U8; 346 } 347 } 348 349 static int alsa_to_audfmt (snd_pcm_format_t alsafmt, audfmt_e *fmt, 350 int *endianness) 351 { 352 switch (alsafmt) { 353 case SND_PCM_FORMAT_S8: 354 *endianness = 0; 355 *fmt = AUD_FMT_S8; 356 break; 357 358 case SND_PCM_FORMAT_U8: 359 *endianness = 0; 360 *fmt = AUD_FMT_U8; 361 break; 362 363 case SND_PCM_FORMAT_S16_LE: 364 *endianness = 0; 365 *fmt = AUD_FMT_S16; 366 break; 367 368 case SND_PCM_FORMAT_U16_LE: 369 *endianness = 0; 370 *fmt = AUD_FMT_U16; 371 break; 372 373 case SND_PCM_FORMAT_S16_BE: 374 *endianness = 1; 375 *fmt = AUD_FMT_S16; 376 break; 377 378 case SND_PCM_FORMAT_U16_BE: 379 *endianness = 1; 380 *fmt = AUD_FMT_U16; 381 break; 382 383 case SND_PCM_FORMAT_S32_LE: 384 *endianness = 0; 385 *fmt = AUD_FMT_S32; 386 break; 387 388 case SND_PCM_FORMAT_U32_LE: 389 *endianness = 0; 390 *fmt = AUD_FMT_U32; 391 break; 392 393 case SND_PCM_FORMAT_S32_BE: 394 *endianness = 1; 395 *fmt = AUD_FMT_S32; 396 break; 397 398 case SND_PCM_FORMAT_U32_BE: 399 *endianness = 1; 400 *fmt = AUD_FMT_U32; 401 break; 402 403 default: 404 dolog ("Unrecognized audio format %d\n", alsafmt); 405 return -1; 406 } 407 408 return 0; 409 } 410 411 static void alsa_dump_info (struct alsa_params_req *req, 412 struct alsa_params_obt *obt, 413 snd_pcm_format_t obtfmt) 414 { 415 dolog ("parameter | requested value | obtained value\n"); 416 dolog ("format | %10d | %10d\n", req->fmt, obtfmt); 417 dolog ("channels | %10d | %10d\n", 418 req->nchannels, obt->nchannels); 419 dolog ("frequency | %10d | %10d\n", req->freq, obt->freq); 420 dolog ("============================================\n"); 421 dolog ("requested: buffer size %d period size %d\n", 422 req->buffer_size, req->period_size); 423 dolog ("obtained: samples %ld\n", obt->samples); 424 } 425 426 static void alsa_set_threshold (snd_pcm_t *handle, snd_pcm_uframes_t threshold) 427 { 428 int err; 429 snd_pcm_sw_params_t *sw_params; 430 431 snd_pcm_sw_params_alloca (&sw_params); 432 433 err = snd_pcm_sw_params_current (handle, sw_params); 434 if (err < 0) { 435 dolog ("Could not fully initialize DAC\n"); 436 alsa_logerr (err, "Failed to get current software parameters\n"); 437 return; 438 } 439 440 err = snd_pcm_sw_params_set_start_threshold (handle, sw_params, threshold); 441 if (err < 0) { 442 dolog ("Could not fully initialize DAC\n"); 443 alsa_logerr (err, "Failed to set software threshold to %ld\n", 444 threshold); 445 return; 446 } 447 448 err = snd_pcm_sw_params (handle, sw_params); 449 if (err < 0) { 450 dolog ("Could not fully initialize DAC\n"); 451 alsa_logerr (err, "Failed to set software parameters\n"); 452 return; 453 } 454 } 455 456 static int alsa_open (int in, struct alsa_params_req *req, 457 struct alsa_params_obt *obt, snd_pcm_t **handlep, 458 ALSAConf *conf) 459 { 460 snd_pcm_t *handle; 461 snd_pcm_hw_params_t *hw_params; 462 int err; 463 int size_in_usec; 464 unsigned int freq, nchannels; 465 const char *pcm_name = in ? conf->pcm_name_in : conf->pcm_name_out; 466 snd_pcm_uframes_t obt_buffer_size; 467 const char *typ = in ? "ADC" : "DAC"; 468 snd_pcm_format_t obtfmt; 469 470 freq = req->freq; 471 nchannels = req->nchannels; 472 size_in_usec = req->size_in_usec; 473 474 snd_pcm_hw_params_alloca (&hw_params); 475 476 err = snd_pcm_open ( 477 &handle, 478 pcm_name, 479 in ? SND_PCM_STREAM_CAPTURE : SND_PCM_STREAM_PLAYBACK, 480 SND_PCM_NONBLOCK 481 ); 482 if (err < 0) { 483 alsa_logerr2 (err, typ, "Failed to open `%s':\n", pcm_name); 484 return -1; 485 } 486 487 err = snd_pcm_hw_params_any (handle, hw_params); 488 if (err < 0) { 489 alsa_logerr2 (err, typ, "Failed to initialize hardware parameters\n"); 490 goto err; 491 } 492 493 err = snd_pcm_hw_params_set_access ( 494 handle, 495 hw_params, 496 SND_PCM_ACCESS_RW_INTERLEAVED 497 ); 498 if (err < 0) { 499 alsa_logerr2 (err, typ, "Failed to set access type\n"); 500 goto err; 501 } 502 503 err = snd_pcm_hw_params_set_format (handle, hw_params, req->fmt); 504 if (err < 0) { 505 alsa_logerr2 (err, typ, "Failed to set format %d\n", req->fmt); 506 } 507 508 err = snd_pcm_hw_params_set_rate_near (handle, hw_params, &freq, 0); 509 if (err < 0) { 510 alsa_logerr2 (err, typ, "Failed to set frequency %d\n", req->freq); 511 goto err; 512 } 513 514 err = snd_pcm_hw_params_set_channels_near ( 515 handle, 516 hw_params, 517 &nchannels 518 ); 519 if (err < 0) { 520 alsa_logerr2 (err, typ, "Failed to set number of channels %d\n", 521 req->nchannels); 522 goto err; 523 } 524 525 if (nchannels != 1 && nchannels != 2) { 526 alsa_logerr2 (err, typ, 527 "Can not handle obtained number of channels %d\n", 528 nchannels); 529 goto err; 530 } 531 532 if (req->buffer_size) { 533 unsigned long obt; 534 535 if (size_in_usec) { 536 int dir = 0; 537 unsigned int btime = req->buffer_size; 538 539 err = snd_pcm_hw_params_set_buffer_time_near ( 540 handle, 541 hw_params, 542 &btime, 543 &dir 544 ); 545 obt = btime; 546 } 547 else { 548 snd_pcm_uframes_t bsize = req->buffer_size; 549 550 err = snd_pcm_hw_params_set_buffer_size_near ( 551 handle, 552 hw_params, 553 &bsize 554 ); 555 obt = bsize; 556 } 557 if (err < 0) { 558 alsa_logerr2 (err, typ, "Failed to set buffer %s to %d\n", 559 size_in_usec ? "time" : "size", req->buffer_size); 560 goto err; 561 } 562 563 if ((req->override_mask & 2) && (obt - req->buffer_size)) 564 dolog ("Requested buffer %s %u was rejected, using %lu\n", 565 size_in_usec ? "time" : "size", req->buffer_size, obt); 566 } 567 568 if (req->period_size) { 569 unsigned long obt; 570 571 if (size_in_usec) { 572 int dir = 0; 573 unsigned int ptime = req->period_size; 574 575 err = snd_pcm_hw_params_set_period_time_near ( 576 handle, 577 hw_params, 578 &ptime, 579 &dir 580 ); 581 obt = ptime; 582 } 583 else { 584 int dir = 0; 585 snd_pcm_uframes_t psize = req->period_size; 586 587 err = snd_pcm_hw_params_set_period_size_near ( 588 handle, 589 hw_params, 590 &psize, 591 &dir 592 ); 593 obt = psize; 594 } 595 596 if (err < 0) { 597 alsa_logerr2 (err, typ, "Failed to set period %s to %d\n", 598 size_in_usec ? "time" : "size", req->period_size); 599 goto err; 600 } 601 602 if (((req->override_mask & 1) && (obt - req->period_size))) 603 dolog ("Requested period %s %u was rejected, using %lu\n", 604 size_in_usec ? "time" : "size", req->period_size, obt); 605 } 606 607 err = snd_pcm_hw_params (handle, hw_params); 608 if (err < 0) { 609 alsa_logerr2 (err, typ, "Failed to apply audio parameters\n"); 610 goto err; 611 } 612 613 err = snd_pcm_hw_params_get_buffer_size (hw_params, &obt_buffer_size); 614 if (err < 0) { 615 alsa_logerr2 (err, typ, "Failed to get buffer size\n"); 616 goto err; 617 } 618 619 err = snd_pcm_hw_params_get_format (hw_params, &obtfmt); 620 if (err < 0) { 621 alsa_logerr2 (err, typ, "Failed to get format\n"); 622 goto err; 623 } 624 625 if (alsa_to_audfmt (obtfmt, &obt->fmt, &obt->endianness)) { 626 dolog ("Invalid format was returned %d\n", obtfmt); 627 goto err; 628 } 629 630 err = snd_pcm_prepare (handle); 631 if (err < 0) { 632 alsa_logerr2 (err, typ, "Could not prepare handle %p\n", handle); 633 goto err; 634 } 635 636 if (!in && conf->threshold) { 637 snd_pcm_uframes_t threshold; 638 int bytes_per_sec; 639 640 bytes_per_sec = freq << (nchannels == 2); 641 642 switch (obt->fmt) { 643 case AUD_FMT_S8: 644 case AUD_FMT_U8: 645 break; 646 647 case AUD_FMT_S16: 648 case AUD_FMT_U16: 649 bytes_per_sec <<= 1; 650 break; 651 652 case AUD_FMT_S32: 653 case AUD_FMT_U32: 654 bytes_per_sec <<= 2; 655 break; 656 } 657 658 threshold = (conf->threshold * bytes_per_sec) / 1000; 659 alsa_set_threshold (handle, threshold); 660 } 661 662 obt->nchannels = nchannels; 663 obt->freq = freq; 664 obt->samples = obt_buffer_size; 665 666 *handlep = handle; 667 668 if (obtfmt != req->fmt || 669 obt->nchannels != req->nchannels || 670 obt->freq != req->freq) { 671 dolog ("Audio parameters for %s\n", typ); 672 alsa_dump_info (req, obt, obtfmt); 673 } 674 675 #ifdef DEBUG 676 alsa_dump_info (req, obt, obtfmt); 677 #endif 678 return 0; 679 680 err: 681 alsa_anal_close1 (&handle); 682 return -1; 683 } 684 685 static snd_pcm_sframes_t alsa_get_avail (snd_pcm_t *handle) 686 { 687 snd_pcm_sframes_t avail; 688 689 avail = snd_pcm_avail_update (handle); 690 if (avail < 0) { 691 if (avail == -EPIPE) { 692 if (!alsa_recover (handle)) { 693 avail = snd_pcm_avail_update (handle); 694 } 695 } 696 697 if (avail < 0) { 698 alsa_logerr (avail, 699 "Could not obtain number of available frames\n"); 700 return -1; 701 } 702 } 703 704 return avail; 705 } 706 707 static void alsa_write_pending (ALSAVoiceOut *alsa) 708 { 709 HWVoiceOut *hw = &alsa->hw; 710 711 while (alsa->pending) { 712 int left_till_end_samples = hw->samples - alsa->wpos; 713 int len = audio_MIN (alsa->pending, left_till_end_samples); 714 char *src = advance (alsa->pcm_buf, alsa->wpos << hw->info.shift); 715 716 while (len) { 717 snd_pcm_sframes_t written; 718 719 written = snd_pcm_writei (alsa->handle, src, len); 720 721 if (written <= 0) { 722 switch (written) { 723 case 0: 724 trace_alsa_wrote_zero(len); 725 return; 726 727 case -EPIPE: 728 if (alsa_recover (alsa->handle)) { 729 alsa_logerr (written, "Failed to write %d frames\n", 730 len); 731 return; 732 } 733 trace_alsa_xrun_out(); 734 continue; 735 736 case -ESTRPIPE: 737 /* stream is suspended and waiting for an 738 application recovery */ 739 if (alsa_resume (alsa->handle)) { 740 alsa_logerr (written, "Failed to write %d frames\n", 741 len); 742 return; 743 } 744 trace_alsa_resume_out(); 745 continue; 746 747 case -EAGAIN: 748 return; 749 750 default: 751 alsa_logerr (written, "Failed to write %d frames from %p\n", 752 len, src); 753 return; 754 } 755 } 756 757 alsa->wpos = (alsa->wpos + written) % hw->samples; 758 alsa->pending -= written; 759 len -= written; 760 } 761 } 762 } 763 764 static int alsa_run_out (HWVoiceOut *hw, int live) 765 { 766 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw; 767 int decr; 768 snd_pcm_sframes_t avail; 769 770 avail = alsa_get_avail (alsa->handle); 771 if (avail < 0) { 772 dolog ("Could not get number of available playback frames\n"); 773 return 0; 774 } 775 776 decr = audio_MIN (live, avail); 777 decr = audio_pcm_hw_clip_out (hw, alsa->pcm_buf, decr, alsa->pending); 778 alsa->pending += decr; 779 alsa_write_pending (alsa); 780 return decr; 781 } 782 783 static void alsa_fini_out (HWVoiceOut *hw) 784 { 785 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw; 786 787 ldebug ("alsa_fini\n"); 788 alsa_anal_close (&alsa->handle, &alsa->pollhlp); 789 790 g_free(alsa->pcm_buf); 791 alsa->pcm_buf = NULL; 792 } 793 794 static int alsa_init_out(HWVoiceOut *hw, struct audsettings *as, 795 void *drv_opaque) 796 { 797 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw; 798 struct alsa_params_req req; 799 struct alsa_params_obt obt; 800 snd_pcm_t *handle; 801 struct audsettings obt_as; 802 ALSAConf *conf = drv_opaque; 803 804 req.fmt = aud_to_alsafmt (as->fmt, as->endianness); 805 req.freq = as->freq; 806 req.nchannels = as->nchannels; 807 req.period_size = conf->period_size_out; 808 req.buffer_size = conf->buffer_size_out; 809 req.size_in_usec = conf->size_in_usec_out; 810 req.override_mask = 811 (conf->period_size_out_overridden ? 1 : 0) | 812 (conf->buffer_size_out_overridden ? 2 : 0); 813 814 if (alsa_open (0, &req, &obt, &handle, conf)) { 815 return -1; 816 } 817 818 obt_as.freq = obt.freq; 819 obt_as.nchannels = obt.nchannels; 820 obt_as.fmt = obt.fmt; 821 obt_as.endianness = obt.endianness; 822 823 audio_pcm_init_info (&hw->info, &obt_as); 824 hw->samples = obt.samples; 825 826 alsa->pcm_buf = audio_calloc(__func__, obt.samples, 1 << hw->info.shift); 827 if (!alsa->pcm_buf) { 828 dolog ("Could not allocate DAC buffer (%d samples, each %d bytes)\n", 829 hw->samples, 1 << hw->info.shift); 830 alsa_anal_close1 (&handle); 831 return -1; 832 } 833 834 alsa->handle = handle; 835 alsa->pollhlp.conf = conf; 836 return 0; 837 } 838 839 #define VOICE_CTL_PAUSE 0 840 #define VOICE_CTL_PREPARE 1 841 #define VOICE_CTL_START 2 842 843 static int alsa_voice_ctl (snd_pcm_t *handle, const char *typ, int ctl) 844 { 845 int err; 846 847 if (ctl == VOICE_CTL_PAUSE) { 848 err = snd_pcm_drop (handle); 849 if (err < 0) { 850 alsa_logerr (err, "Could not stop %s\n", typ); 851 return -1; 852 } 853 } 854 else { 855 err = snd_pcm_prepare (handle); 856 if (err < 0) { 857 alsa_logerr (err, "Could not prepare handle for %s\n", typ); 858 return -1; 859 } 860 if (ctl == VOICE_CTL_START) { 861 err = snd_pcm_start(handle); 862 if (err < 0) { 863 alsa_logerr (err, "Could not start handle for %s\n", typ); 864 return -1; 865 } 866 } 867 } 868 869 return 0; 870 } 871 872 static int alsa_ctl_out (HWVoiceOut *hw, int cmd, ...) 873 { 874 ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw; 875 876 switch (cmd) { 877 case VOICE_ENABLE: 878 { 879 va_list ap; 880 int poll_mode; 881 882 va_start (ap, cmd); 883 poll_mode = va_arg (ap, int); 884 va_end (ap); 885 886 ldebug ("enabling voice\n"); 887 if (poll_mode && alsa_poll_out (hw)) { 888 poll_mode = 0; 889 } 890 hw->poll_mode = poll_mode; 891 return alsa_voice_ctl (alsa->handle, "playback", VOICE_CTL_PREPARE); 892 } 893 894 case VOICE_DISABLE: 895 ldebug ("disabling voice\n"); 896 if (hw->poll_mode) { 897 hw->poll_mode = 0; 898 alsa_fini_poll (&alsa->pollhlp); 899 } 900 return alsa_voice_ctl (alsa->handle, "playback", VOICE_CTL_PAUSE); 901 } 902 903 return -1; 904 } 905 906 static int alsa_init_in(HWVoiceIn *hw, struct audsettings *as, void *drv_opaque) 907 { 908 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw; 909 struct alsa_params_req req; 910 struct alsa_params_obt obt; 911 snd_pcm_t *handle; 912 struct audsettings obt_as; 913 ALSAConf *conf = drv_opaque; 914 915 req.fmt = aud_to_alsafmt (as->fmt, as->endianness); 916 req.freq = as->freq; 917 req.nchannels = as->nchannels; 918 req.period_size = conf->period_size_in; 919 req.buffer_size = conf->buffer_size_in; 920 req.size_in_usec = conf->size_in_usec_in; 921 req.override_mask = 922 (conf->period_size_in_overridden ? 1 : 0) | 923 (conf->buffer_size_in_overridden ? 2 : 0); 924 925 if (alsa_open (1, &req, &obt, &handle, conf)) { 926 return -1; 927 } 928 929 obt_as.freq = obt.freq; 930 obt_as.nchannels = obt.nchannels; 931 obt_as.fmt = obt.fmt; 932 obt_as.endianness = obt.endianness; 933 934 audio_pcm_init_info (&hw->info, &obt_as); 935 hw->samples = obt.samples; 936 937 alsa->pcm_buf = audio_calloc(__func__, hw->samples, 1 << hw->info.shift); 938 if (!alsa->pcm_buf) { 939 dolog ("Could not allocate ADC buffer (%d samples, each %d bytes)\n", 940 hw->samples, 1 << hw->info.shift); 941 alsa_anal_close1 (&handle); 942 return -1; 943 } 944 945 alsa->handle = handle; 946 alsa->pollhlp.conf = conf; 947 return 0; 948 } 949 950 static void alsa_fini_in (HWVoiceIn *hw) 951 { 952 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw; 953 954 alsa_anal_close (&alsa->handle, &alsa->pollhlp); 955 956 g_free(alsa->pcm_buf); 957 alsa->pcm_buf = NULL; 958 } 959 960 static int alsa_run_in (HWVoiceIn *hw) 961 { 962 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw; 963 int hwshift = hw->info.shift; 964 int i; 965 int live = audio_pcm_hw_get_live_in (hw); 966 int dead = hw->samples - live; 967 int decr; 968 struct { 969 int add; 970 int len; 971 } bufs[2] = { 972 { .add = hw->wpos, .len = 0 }, 973 { .add = 0, .len = 0 } 974 }; 975 snd_pcm_sframes_t avail; 976 snd_pcm_uframes_t read_samples = 0; 977 978 if (!dead) { 979 return 0; 980 } 981 982 avail = alsa_get_avail (alsa->handle); 983 if (avail < 0) { 984 dolog ("Could not get number of captured frames\n"); 985 return 0; 986 } 987 988 if (!avail) { 989 snd_pcm_state_t state; 990 991 state = snd_pcm_state (alsa->handle); 992 switch (state) { 993 case SND_PCM_STATE_PREPARED: 994 avail = hw->samples; 995 break; 996 case SND_PCM_STATE_SUSPENDED: 997 /* stream is suspended and waiting for an application recovery */ 998 if (alsa_resume (alsa->handle)) { 999 dolog ("Failed to resume suspended input stream\n"); 1000 return 0; 1001 } 1002 trace_alsa_resume_in(); 1003 break; 1004 default: 1005 trace_alsa_no_frames(state); 1006 return 0; 1007 } 1008 } 1009 1010 decr = audio_MIN (dead, avail); 1011 if (!decr) { 1012 return 0; 1013 } 1014 1015 if (hw->wpos + decr > hw->samples) { 1016 bufs[0].len = (hw->samples - hw->wpos); 1017 bufs[1].len = (decr - (hw->samples - hw->wpos)); 1018 } 1019 else { 1020 bufs[0].len = decr; 1021 } 1022 1023 for (i = 0; i < 2; ++i) { 1024 void *src; 1025 struct st_sample *dst; 1026 snd_pcm_sframes_t nread; 1027 snd_pcm_uframes_t len; 1028 1029 len = bufs[i].len; 1030 1031 src = advance (alsa->pcm_buf, bufs[i].add << hwshift); 1032 dst = hw->conv_buf + bufs[i].add; 1033 1034 while (len) { 1035 nread = snd_pcm_readi (alsa->handle, src, len); 1036 1037 if (nread <= 0) { 1038 switch (nread) { 1039 case 0: 1040 trace_alsa_read_zero(len); 1041 goto exit; 1042 1043 case -EPIPE: 1044 if (alsa_recover (alsa->handle)) { 1045 alsa_logerr (nread, "Failed to read %ld frames\n", len); 1046 goto exit; 1047 } 1048 trace_alsa_xrun_in(); 1049 continue; 1050 1051 case -EAGAIN: 1052 goto exit; 1053 1054 default: 1055 alsa_logerr ( 1056 nread, 1057 "Failed to read %ld frames from %p\n", 1058 len, 1059 src 1060 ); 1061 goto exit; 1062 } 1063 } 1064 1065 hw->conv (dst, src, nread); 1066 1067 src = advance (src, nread << hwshift); 1068 dst += nread; 1069 1070 read_samples += nread; 1071 len -= nread; 1072 } 1073 } 1074 1075 exit: 1076 hw->wpos = (hw->wpos + read_samples) % hw->samples; 1077 return read_samples; 1078 } 1079 1080 static int alsa_read (SWVoiceIn *sw, void *buf, int size) 1081 { 1082 return audio_pcm_sw_read (sw, buf, size); 1083 } 1084 1085 static int alsa_ctl_in (HWVoiceIn *hw, int cmd, ...) 1086 { 1087 ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw; 1088 1089 switch (cmd) { 1090 case VOICE_ENABLE: 1091 { 1092 va_list ap; 1093 int poll_mode; 1094 1095 va_start (ap, cmd); 1096 poll_mode = va_arg (ap, int); 1097 va_end (ap); 1098 1099 ldebug ("enabling voice\n"); 1100 if (poll_mode && alsa_poll_in (hw)) { 1101 poll_mode = 0; 1102 } 1103 hw->poll_mode = poll_mode; 1104 1105 return alsa_voice_ctl (alsa->handle, "capture", VOICE_CTL_START); 1106 } 1107 1108 case VOICE_DISABLE: 1109 ldebug ("disabling voice\n"); 1110 if (hw->poll_mode) { 1111 hw->poll_mode = 0; 1112 alsa_fini_poll (&alsa->pollhlp); 1113 } 1114 return alsa_voice_ctl (alsa->handle, "capture", VOICE_CTL_PAUSE); 1115 } 1116 1117 return -1; 1118 } 1119 1120 static ALSAConf glob_conf = { 1121 .buffer_size_out = 4096, 1122 .period_size_out = 1024, 1123 .pcm_name_out = "default", 1124 .pcm_name_in = "default", 1125 }; 1126 1127 static void *alsa_audio_init (void) 1128 { 1129 ALSAConf *conf = g_malloc(sizeof(ALSAConf)); 1130 *conf = glob_conf; 1131 return conf; 1132 } 1133 1134 static void alsa_audio_fini (void *opaque) 1135 { 1136 g_free(opaque); 1137 } 1138 1139 static struct audio_option alsa_options[] = { 1140 { 1141 .name = "DAC_SIZE_IN_USEC", 1142 .tag = AUD_OPT_BOOL, 1143 .valp = &glob_conf.size_in_usec_out, 1144 .descr = "DAC period/buffer size in microseconds (otherwise in frames)" 1145 }, 1146 { 1147 .name = "DAC_PERIOD_SIZE", 1148 .tag = AUD_OPT_INT, 1149 .valp = &glob_conf.period_size_out, 1150 .descr = "DAC period size (0 to go with system default)", 1151 .overriddenp = &glob_conf.period_size_out_overridden 1152 }, 1153 { 1154 .name = "DAC_BUFFER_SIZE", 1155 .tag = AUD_OPT_INT, 1156 .valp = &glob_conf.buffer_size_out, 1157 .descr = "DAC buffer size (0 to go with system default)", 1158 .overriddenp = &glob_conf.buffer_size_out_overridden 1159 }, 1160 { 1161 .name = "ADC_SIZE_IN_USEC", 1162 .tag = AUD_OPT_BOOL, 1163 .valp = &glob_conf.size_in_usec_in, 1164 .descr = 1165 "ADC period/buffer size in microseconds (otherwise in frames)" 1166 }, 1167 { 1168 .name = "ADC_PERIOD_SIZE", 1169 .tag = AUD_OPT_INT, 1170 .valp = &glob_conf.period_size_in, 1171 .descr = "ADC period size (0 to go with system default)", 1172 .overriddenp = &glob_conf.period_size_in_overridden 1173 }, 1174 { 1175 .name = "ADC_BUFFER_SIZE", 1176 .tag = AUD_OPT_INT, 1177 .valp = &glob_conf.buffer_size_in, 1178 .descr = "ADC buffer size (0 to go with system default)", 1179 .overriddenp = &glob_conf.buffer_size_in_overridden 1180 }, 1181 { 1182 .name = "THRESHOLD", 1183 .tag = AUD_OPT_INT, 1184 .valp = &glob_conf.threshold, 1185 .descr = "(undocumented)" 1186 }, 1187 { 1188 .name = "DAC_DEV", 1189 .tag = AUD_OPT_STR, 1190 .valp = &glob_conf.pcm_name_out, 1191 .descr = "DAC device name (for instance dmix)" 1192 }, 1193 { 1194 .name = "ADC_DEV", 1195 .tag = AUD_OPT_STR, 1196 .valp = &glob_conf.pcm_name_in, 1197 .descr = "ADC device name" 1198 }, 1199 { /* End of list */ } 1200 }; 1201 1202 static struct audio_pcm_ops alsa_pcm_ops = { 1203 .init_out = alsa_init_out, 1204 .fini_out = alsa_fini_out, 1205 .run_out = alsa_run_out, 1206 .write = alsa_write, 1207 .ctl_out = alsa_ctl_out, 1208 1209 .init_in = alsa_init_in, 1210 .fini_in = alsa_fini_in, 1211 .run_in = alsa_run_in, 1212 .read = alsa_read, 1213 .ctl_in = alsa_ctl_in, 1214 }; 1215 1216 static struct audio_driver alsa_audio_driver = { 1217 .name = "alsa", 1218 .descr = "ALSA http://www.alsa-project.org", 1219 .options = alsa_options, 1220 .init = alsa_audio_init, 1221 .fini = alsa_audio_fini, 1222 .pcm_ops = &alsa_pcm_ops, 1223 .can_be_default = 1, 1224 .max_voices_out = INT_MAX, 1225 .max_voices_in = INT_MAX, 1226 .voice_size_out = sizeof (ALSAVoiceOut), 1227 .voice_size_in = sizeof (ALSAVoiceIn) 1228 }; 1229 1230 static void register_audio_alsa(void) 1231 { 1232 audio_driver_register(&alsa_audio_driver); 1233 } 1234 type_init(register_audio_alsa); 1235