1 /* pcm.c 2 ** 3 ** Copyright 2011, The Android Open Source Project 4 ** 5 ** Redistribution and use in source and binary forms, with or without 6 ** modification, are permitted provided that the following conditions are met: 7 ** * Redistributions of source code must retain the above copyright 8 ** notice, this list of conditions and the following disclaimer. 9 ** * Redistributions in binary form must reproduce the above copyright 10 ** notice, this list of conditions and the following disclaimer in the 11 ** documentation and/or other materials provided with the distribution. 12 ** * Neither the name of The Android Open Source Project nor the names of 13 ** its contributors may be used to endorse or promote products derived 14 ** from this software without specific prior written permission. 15 ** 16 ** THIS SOFTWARE IS PROVIDED BY The Android Open Source Project ``AS IS'' AND 17 ** ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 ** IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 ** ARE DISCLAIMED. IN NO EVENT SHALL The Android Open Source Project BE LIABLE 20 ** FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 ** DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 22 ** SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER 23 ** CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 ** LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 ** OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH 26 ** DAMAGE. 27 */ 28 29 #include <stdio.h> 30 #include <stdlib.h> 31 #include <fcntl.h> 32 #include <stdarg.h> 33 #include <string.h> 34 #include <errno.h> 35 #include <unistd.h> 36 #include <poll.h> 37 38 #include <sys/ioctl.h> 39 #include <sys/mman.h> 40 #include <sys/time.h> 41 #include <limits.h> 42 43 #include <linux/ioctl.h> 44 #define __force 45 #define __bitwise 46 #define __user 47 #include <sound/asound.h> 48 49 #include <tinyalsa/asoundlib.h> 50 51 #define PARAM_MAX SNDRV_PCM_HW_PARAM_LAST_INTERVAL 52 #define SNDRV_PCM_HW_PARAMS_NO_PERIOD_WAKEUP (1<<2) 53 54 static inline int param_is_mask(int p) 55 { 56 return (p >= SNDRV_PCM_HW_PARAM_FIRST_MASK) && 57 (p <= SNDRV_PCM_HW_PARAM_LAST_MASK); 58 } 59 60 static inline int param_is_interval(int p) 61 { 62 return (p >= SNDRV_PCM_HW_PARAM_FIRST_INTERVAL) && 63 (p <= SNDRV_PCM_HW_PARAM_LAST_INTERVAL); 64 } 65 66 static inline struct snd_interval *param_to_interval(struct snd_pcm_hw_params *p, int n) 67 { 68 return &(p->intervals[n - SNDRV_PCM_HW_PARAM_FIRST_INTERVAL]); 69 } 70 71 static inline struct snd_mask *param_to_mask(struct snd_pcm_hw_params *p, int n) 72 { 73 return &(p->masks[n - SNDRV_PCM_HW_PARAM_FIRST_MASK]); 74 } 75 76 static void param_set_mask(struct snd_pcm_hw_params *p, int n, unsigned int bit) 77 { 78 if (bit >= SNDRV_MASK_MAX) 79 return; 80 if (param_is_mask(n)) { 81 struct snd_mask *m = param_to_mask(p, n); 82 m->bits[0] = 0; 83 m->bits[1] = 0; 84 m->bits[bit >> 5] |= (1 << (bit & 31)); 85 } 86 } 87 88 static void param_set_min(struct snd_pcm_hw_params *p, int n, unsigned int val) 89 { 90 if (param_is_interval(n)) { 91 struct snd_interval *i = param_to_interval(p, n); 92 i->min = val; 93 } 94 } 95 96 static void param_set_max(struct snd_pcm_hw_params *p, int n, unsigned int val) 97 { 98 if (param_is_interval(n)) { 99 struct snd_interval *i = param_to_interval(p, n); 100 i->max = val; 101 } 102 } 103 104 static void param_set_int(struct snd_pcm_hw_params *p, int n, unsigned int val) 105 { 106 if (param_is_interval(n)) { 107 struct snd_interval *i = param_to_interval(p, n); 108 i->min = val; 109 i->max = val; 110 i->integer = 1; 111 } 112 } 113 114 static unsigned int param_get_int(struct snd_pcm_hw_params *p, int n) 115 { 116 if (param_is_interval(n)) { 117 struct snd_interval *i = param_to_interval(p, n); 118 if (i->integer) 119 return i->max; 120 } 121 return 0; 122 } 123 124 static void param_init(struct snd_pcm_hw_params *p) 125 { 126 int n; 127 128 memset(p, 0, sizeof(*p)); 129 for (n = SNDRV_PCM_HW_PARAM_FIRST_MASK; 130 n <= SNDRV_PCM_HW_PARAM_LAST_MASK; n++) { 131 struct snd_mask *m = param_to_mask(p, n); 132 m->bits[0] = ~0; 133 m->bits[1] = ~0; 134 } 135 for (n = SNDRV_PCM_HW_PARAM_FIRST_INTERVAL; 136 n <= SNDRV_PCM_HW_PARAM_LAST_INTERVAL; n++) { 137 struct snd_interval *i = param_to_interval(p, n); 138 i->min = 0; 139 i->max = ~0; 140 } 141 } 142 143 #define PCM_ERROR_MAX 128 144 145 struct pcm { 146 int fd; 147 unsigned int flags; 148 int running:1; 149 int underruns; 150 unsigned int buffer_size; 151 unsigned int boundary; 152 char error[PCM_ERROR_MAX]; 153 struct pcm_config config; 154 struct snd_pcm_mmap_status *mmap_status; 155 struct snd_pcm_mmap_control *mmap_control; 156 struct snd_pcm_sync_ptr *sync_ptr; 157 void *mmap_buffer; 158 unsigned int noirq_frames_per_msec; 159 int wait_for_avail_min; 160 }; 161 162 unsigned int pcm_get_buffer_size(struct pcm *pcm) 163 { 164 return pcm->buffer_size; 165 } 166 167 const char* pcm_get_error(struct pcm *pcm) 168 { 169 return pcm->error; 170 } 171 172 static int oops(struct pcm *pcm, int e, const char *fmt, ...) 173 { 174 va_list ap; 175 int sz; 176 177 va_start(ap, fmt); 178 vsnprintf(pcm->error, PCM_ERROR_MAX, fmt, ap); 179 va_end(ap); 180 sz = strlen(pcm->error); 181 182 if (errno) 183 snprintf(pcm->error + sz, PCM_ERROR_MAX - sz, 184 ": %s", strerror(e)); 185 return -1; 186 } 187 188 static unsigned int pcm_format_to_alsa(enum pcm_format format) 189 { 190 switch (format) { 191 case PCM_FORMAT_S32_LE: 192 return SNDRV_PCM_FORMAT_S32_LE; 193 default: 194 case PCM_FORMAT_S16_LE: 195 return SNDRV_PCM_FORMAT_S16_LE; 196 }; 197 } 198 199 static unsigned int pcm_format_to_bits(enum pcm_format format) 200 { 201 switch (format) { 202 case PCM_FORMAT_S32_LE: 203 return 32; 204 default: 205 case PCM_FORMAT_S16_LE: 206 return 16; 207 }; 208 } 209 210 unsigned int pcm_bytes_to_frames(struct pcm *pcm, unsigned int bytes) 211 { 212 return bytes / (pcm->config.channels * 213 (pcm_format_to_bits(pcm->config.format) >> 3)); 214 } 215 216 unsigned int pcm_frames_to_bytes(struct pcm *pcm, unsigned int frames) 217 { 218 return frames * pcm->config.channels * 219 (pcm_format_to_bits(pcm->config.format) >> 3); 220 } 221 222 static int pcm_sync_ptr(struct pcm *pcm, int flags) { 223 if (pcm->sync_ptr) { 224 pcm->sync_ptr->flags = flags; 225 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_SYNC_PTR, pcm->sync_ptr) < 0) 226 return -1; 227 } 228 return 0; 229 } 230 231 static int pcm_hw_mmap_status(struct pcm *pcm) { 232 233 if (pcm->sync_ptr) 234 return 0; 235 236 int page_size = sysconf(_SC_PAGE_SIZE); 237 pcm->mmap_status = mmap(NULL, page_size, PROT_READ, MAP_FILE | MAP_SHARED, 238 pcm->fd, SNDRV_PCM_MMAP_OFFSET_STATUS); 239 if (pcm->mmap_status == MAP_FAILED) 240 pcm->mmap_status = NULL; 241 if (!pcm->mmap_status) 242 goto mmap_error; 243 244 pcm->mmap_control = mmap(NULL, page_size, PROT_READ | PROT_WRITE, 245 MAP_FILE | MAP_SHARED, pcm->fd, SNDRV_PCM_MMAP_OFFSET_CONTROL); 246 if (pcm->mmap_control == MAP_FAILED) 247 pcm->mmap_control = NULL; 248 if (!pcm->mmap_control) { 249 munmap(pcm->mmap_status, page_size); 250 pcm->mmap_status = NULL; 251 goto mmap_error; 252 } 253 if (pcm->flags & PCM_MMAP) 254 pcm->mmap_control->avail_min = pcm->config.avail_min; 255 else 256 pcm->mmap_control->avail_min = 1; 257 258 return 0; 259 260 mmap_error: 261 262 pcm->sync_ptr = calloc(1, sizeof(*pcm->sync_ptr)); 263 if (!pcm->sync_ptr) 264 return -ENOMEM; 265 pcm->mmap_status = &pcm->sync_ptr->s.status; 266 pcm->mmap_control = &pcm->sync_ptr->c.control; 267 if (pcm->flags & PCM_MMAP) 268 pcm->mmap_control->avail_min = pcm->config.avail_min; 269 else 270 pcm->mmap_control->avail_min = 1; 271 272 pcm_sync_ptr(pcm, 0); 273 274 return 0; 275 } 276 277 static void pcm_hw_munmap_status(struct pcm *pcm) { 278 if (pcm->sync_ptr) { 279 free(pcm->sync_ptr); 280 pcm->sync_ptr = NULL; 281 } else { 282 int page_size = sysconf(_SC_PAGE_SIZE); 283 if (pcm->mmap_status) 284 munmap(pcm->mmap_status, page_size); 285 if (pcm->mmap_control) 286 munmap(pcm->mmap_control, page_size); 287 } 288 pcm->mmap_status = NULL; 289 pcm->mmap_control = NULL; 290 } 291 292 static int pcm_areas_copy(struct pcm *pcm, unsigned int pcm_offset, 293 const char *src, unsigned int src_offset, 294 unsigned int frames) 295 { 296 int size_bytes = pcm_frames_to_bytes(pcm, frames); 297 int pcm_offset_bytes = pcm_frames_to_bytes(pcm, pcm_offset); 298 int src_offset_bytes = pcm_frames_to_bytes(pcm, src_offset); 299 300 /* interleaved only atm */ 301 memcpy((char*)pcm->mmap_buffer + pcm_offset_bytes, 302 src + src_offset_bytes, size_bytes); 303 return 0; 304 } 305 306 static int pcm_mmap_write_areas(struct pcm *pcm, const char *src, 307 unsigned int offset, unsigned int size) 308 { 309 void *pcm_areas; 310 int commit; 311 unsigned int pcm_offset, frames, count = 0; 312 313 while (size > 0) { 314 frames = size; 315 pcm_mmap_begin(pcm, &pcm_areas, &pcm_offset, &frames); 316 pcm_areas_copy(pcm, pcm_offset, src, offset, frames); 317 commit = pcm_mmap_commit(pcm, pcm_offset, frames); 318 if (commit < 0) { 319 oops(pcm, commit, "failed to commit %d frames\n", frames); 320 return commit; 321 } 322 323 offset += commit; 324 count += commit; 325 size -= commit; 326 } 327 return count; 328 } 329 330 int pcm_get_htimestamp(struct pcm *pcm, unsigned int *avail, 331 struct timespec *tstamp) 332 { 333 int frames; 334 int rc; 335 snd_pcm_uframes_t hw_ptr; 336 337 if (!pcm_is_ready(pcm)) 338 return -1; 339 340 rc = pcm_sync_ptr(pcm, SNDRV_PCM_SYNC_PTR_APPL|SNDRV_PCM_SYNC_PTR_HWSYNC); 341 if (rc < 0) 342 return -1; 343 344 if ((pcm->mmap_status->state != PCM_STATE_RUNNING) && 345 (pcm->mmap_status->state != PCM_STATE_DRAINING)) 346 return -1; 347 348 *tstamp = pcm->mmap_status->tstamp; 349 if (tstamp->tv_sec == 0 && tstamp->tv_nsec == 0) 350 return -1; 351 352 hw_ptr = pcm->mmap_status->hw_ptr; 353 if (pcm->flags & PCM_IN) 354 frames = hw_ptr - pcm->mmap_control->appl_ptr; 355 else 356 frames = hw_ptr + pcm->buffer_size - pcm->mmap_control->appl_ptr; 357 358 if (frames < 0) 359 frames += pcm->boundary; 360 else if (frames > (int)pcm->boundary) 361 frames -= pcm->boundary; 362 363 *avail = (unsigned int)frames; 364 365 return 0; 366 } 367 368 int pcm_write(struct pcm *pcm, const void *data, unsigned int count) 369 { 370 struct snd_xferi x; 371 372 if (pcm->flags & PCM_IN) 373 return -EINVAL; 374 375 x.buf = (void*)data; 376 x.frames = count / (pcm->config.channels * 377 pcm_format_to_bits(pcm->config.format) / 8); 378 379 for (;;) { 380 if (!pcm->running) { 381 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_PREPARE)) 382 return oops(pcm, errno, "cannot prepare channel"); 383 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_WRITEI_FRAMES, &x)) 384 return oops(pcm, errno, "cannot write initial data"); 385 pcm->running = 1; 386 return 0; 387 } 388 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_WRITEI_FRAMES, &x)) { 389 pcm->running = 0; 390 if (errno == EPIPE) { 391 /* we failed to make our window -- try to restart if we are 392 * allowed to do so. Otherwise, simply allow the EPIPE error to 393 * propagate up to the app level */ 394 pcm->underruns++; 395 if (pcm->flags & PCM_NORESTART) 396 return -EPIPE; 397 continue; 398 } 399 return oops(pcm, errno, "cannot write stream data"); 400 } 401 return 0; 402 } 403 } 404 405 int pcm_read(struct pcm *pcm, void *data, unsigned int count) 406 { 407 struct snd_xferi x; 408 409 if (!(pcm->flags & PCM_IN)) 410 return -EINVAL; 411 412 x.buf = data; 413 x.frames = count / (pcm->config.channels * 414 pcm_format_to_bits(pcm->config.format) / 8); 415 416 for (;;) { 417 if (!pcm->running) { 418 pcm_start(pcm); 419 } 420 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_READI_FRAMES, &x)) { 421 pcm->running = 0; 422 if (errno == EPIPE) { 423 /* we failed to make our window -- try to restart */ 424 pcm->underruns++; 425 continue; 426 } 427 return oops(pcm, errno, "cannot read stream data"); 428 } 429 return 0; 430 } 431 } 432 433 static struct pcm bad_pcm = { 434 .fd = -1, 435 }; 436 437 int pcm_close(struct pcm *pcm) 438 { 439 if (pcm == &bad_pcm) 440 return 0; 441 442 pcm_hw_munmap_status(pcm); 443 444 if (pcm->flags & PCM_MMAP) { 445 pcm_stop(pcm); 446 munmap(pcm->mmap_buffer, pcm_frames_to_bytes(pcm, pcm->buffer_size)); 447 } 448 449 if (pcm->fd >= 0) 450 close(pcm->fd); 451 pcm->running = 0; 452 pcm->buffer_size = 0; 453 pcm->fd = -1; 454 free(pcm); 455 return 0; 456 } 457 458 struct pcm *pcm_open(unsigned int card, unsigned int device, 459 unsigned int flags, struct pcm_config *config) 460 { 461 struct pcm *pcm; 462 struct snd_pcm_info info; 463 struct snd_pcm_hw_params params; 464 struct snd_pcm_sw_params sparams; 465 char fn[256]; 466 int rc; 467 468 pcm = calloc(1, sizeof(struct pcm)); 469 if (!pcm || !config) 470 return &bad_pcm; /* TODO: could support default config here */ 471 472 pcm->config = *config; 473 474 snprintf(fn, sizeof(fn), "/dev/snd/pcmC%uD%u%c", card, device, 475 flags & PCM_IN ? 'c' : 'p'); 476 477 pcm->flags = flags; 478 pcm->fd = open(fn, O_RDWR); 479 if (pcm->fd < 0) { 480 oops(pcm, errno, "cannot open device '%s'", fn); 481 return pcm; 482 } 483 484 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_INFO, &info)) { 485 oops(pcm, errno, "cannot get info"); 486 goto fail_close; 487 } 488 489 param_init(¶ms); 490 param_set_mask(¶ms, SNDRV_PCM_HW_PARAM_FORMAT, 491 pcm_format_to_alsa(config->format)); 492 param_set_mask(¶ms, SNDRV_PCM_HW_PARAM_SUBFORMAT, 493 SNDRV_PCM_SUBFORMAT_STD); 494 param_set_min(¶ms, SNDRV_PCM_HW_PARAM_PERIOD_SIZE, config->period_size); 495 param_set_int(¶ms, SNDRV_PCM_HW_PARAM_SAMPLE_BITS, 496 pcm_format_to_bits(config->format)); 497 param_set_int(¶ms, SNDRV_PCM_HW_PARAM_FRAME_BITS, 498 pcm_format_to_bits(config->format) * config->channels); 499 param_set_int(¶ms, SNDRV_PCM_HW_PARAM_CHANNELS, 500 config->channels); 501 param_set_int(¶ms, SNDRV_PCM_HW_PARAM_PERIODS, config->period_count); 502 param_set_int(¶ms, SNDRV_PCM_HW_PARAM_RATE, config->rate); 503 504 if (flags & PCM_NOIRQ) { 505 506 if (!(flags & PCM_MMAP)) { 507 oops(pcm, -EINVAL, "noirq only currently supported with mmap()."); 508 goto fail; 509 } 510 511 params.flags |= SNDRV_PCM_HW_PARAMS_NO_PERIOD_WAKEUP; 512 pcm->noirq_frames_per_msec = config->rate / 1000; 513 } 514 515 if (flags & PCM_MMAP) 516 param_set_mask(¶ms, SNDRV_PCM_HW_PARAM_ACCESS, 517 SNDRV_PCM_ACCESS_MMAP_INTERLEAVED); 518 else 519 param_set_mask(¶ms, SNDRV_PCM_HW_PARAM_ACCESS, 520 SNDRV_PCM_ACCESS_RW_INTERLEAVED); 521 522 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_HW_PARAMS, ¶ms)) { 523 oops(pcm, errno, "cannot set hw params"); 524 goto fail_close; 525 } 526 527 /* get our refined hw_params */ 528 config->period_size = param_get_int(¶ms, SNDRV_PCM_HW_PARAM_PERIOD_SIZE); 529 config->period_count = param_get_int(¶ms, SNDRV_PCM_HW_PARAM_PERIODS); 530 pcm->buffer_size = config->period_count * config->period_size; 531 532 if (flags & PCM_MMAP) { 533 pcm->mmap_buffer = mmap(NULL, pcm_frames_to_bytes(pcm, pcm->buffer_size), 534 PROT_READ | PROT_WRITE, MAP_FILE | MAP_SHARED, pcm->fd, 0); 535 if (pcm->mmap_buffer == MAP_FAILED) { 536 oops(pcm, -errno, "failed to mmap buffer %d bytes\n", 537 pcm_frames_to_bytes(pcm, pcm->buffer_size)); 538 goto fail_close; 539 } 540 } 541 542 543 memset(&sparams, 0, sizeof(sparams)); 544 sparams.tstamp_mode = SNDRV_PCM_TSTAMP_ENABLE; 545 sparams.period_step = 1; 546 547 if (!config->start_threshold) 548 pcm->config.start_threshold = sparams.start_threshold = 549 config->period_count * config->period_size / 2; 550 else 551 sparams.start_threshold = config->start_threshold; 552 553 /* pick a high stop threshold - todo: does this need further tuning */ 554 if (!config->stop_threshold) { 555 if (pcm->flags & PCM_IN) 556 pcm->config.stop_threshold = sparams.stop_threshold = 557 config->period_count * config->period_size * 10; 558 else 559 pcm->config.stop_threshold = sparams.stop_threshold = 560 config->period_count * config->period_size; 561 } 562 else 563 sparams.stop_threshold = config->stop_threshold; 564 565 if (!pcm->config.avail_min) { 566 if (pcm->flags & PCM_MMAP) 567 pcm->config.avail_min = sparams.avail_min = pcm->config.period_size; 568 else 569 pcm->config.avail_min = sparams.avail_min = 1; 570 } else 571 sparams.avail_min = config->avail_min; 572 573 sparams.xfer_align = config->period_size / 2; /* needed for old kernels */ 574 sparams.silence_size = 0; 575 sparams.silence_threshold = config->silence_threshold; 576 pcm->boundary = sparams.boundary = pcm->buffer_size; 577 578 while (pcm->boundary * 2 <= INT_MAX - pcm->buffer_size) 579 pcm->boundary *= 2; 580 581 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_SW_PARAMS, &sparams)) { 582 oops(pcm, errno, "cannot set sw params"); 583 goto fail; 584 } 585 586 rc = pcm_hw_mmap_status(pcm); 587 if (rc < 0) { 588 oops(pcm, rc, "mmap status failed"); 589 goto fail; 590 } 591 592 pcm->underruns = 0; 593 return pcm; 594 595 fail: 596 if (flags & PCM_MMAP) 597 munmap(pcm->mmap_buffer, pcm_frames_to_bytes(pcm, pcm->buffer_size)); 598 fail_close: 599 close(pcm->fd); 600 pcm->fd = -1; 601 return pcm; 602 } 603 604 int pcm_is_ready(struct pcm *pcm) 605 { 606 return pcm->fd >= 0; 607 } 608 609 int pcm_start(struct pcm *pcm) 610 { 611 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_PREPARE) < 0) 612 return oops(pcm, errno, "cannot prepare channel"); 613 614 if (pcm->flags & PCM_MMAP) 615 pcm_sync_ptr(pcm, 0); 616 617 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_START) < 0) 618 return oops(pcm, errno, "cannot start channel"); 619 620 pcm->running = 1; 621 return 0; 622 } 623 624 int pcm_stop(struct pcm *pcm) 625 { 626 if (ioctl(pcm->fd, SNDRV_PCM_IOCTL_DROP) < 0) 627 return oops(pcm, errno, "cannot stop channel"); 628 629 pcm->running = 0; 630 return 0; 631 } 632 633 static inline int pcm_mmap_playback_avail(struct pcm *pcm) 634 { 635 int avail; 636 637 avail = pcm->mmap_status->hw_ptr + pcm->buffer_size - pcm->mmap_control->appl_ptr; 638 639 if (avail < 0) 640 avail += pcm->boundary; 641 else if (avail > (int)pcm->boundary) 642 avail -= pcm->boundary; 643 644 return avail; 645 } 646 647 static inline int pcm_mmap_capture_avail(struct pcm *pcm) 648 { 649 int avail = pcm->mmap_status->hw_ptr - pcm->mmap_control->appl_ptr; 650 if (avail < 0) 651 avail += pcm->boundary; 652 return avail; 653 } 654 655 static inline int pcm_mmap_avail(struct pcm *pcm) 656 { 657 pcm_sync_ptr(pcm, SNDRV_PCM_SYNC_PTR_HWSYNC); 658 if (pcm->flags & PCM_IN) 659 return pcm_mmap_capture_avail(pcm); 660 else 661 return pcm_mmap_playback_avail(pcm); 662 } 663 664 static void pcm_mmap_appl_forward(struct pcm *pcm, int frames) 665 { 666 unsigned int appl_ptr = pcm->mmap_control->appl_ptr; 667 appl_ptr += frames; 668 669 /* check for boundary wrap */ 670 if (appl_ptr > pcm->boundary) 671 appl_ptr -= pcm->boundary; 672 pcm->mmap_control->appl_ptr = appl_ptr; 673 } 674 675 int pcm_mmap_begin(struct pcm *pcm, void **areas, unsigned int *offset, 676 unsigned int *frames) 677 { 678 unsigned int continuous, copy_frames, avail; 679 680 /* return the mmap buffer */ 681 *areas = pcm->mmap_buffer; 682 683 /* and the application offset in frames */ 684 *offset = pcm->mmap_control->appl_ptr % pcm->buffer_size; 685 686 avail = pcm_mmap_avail(pcm); 687 if (avail > pcm->buffer_size) 688 avail = pcm->buffer_size; 689 continuous = pcm->buffer_size - *offset; 690 691 /* we can only copy frames if the are availabale and continuos */ 692 copy_frames = *frames; 693 if (copy_frames > avail) 694 copy_frames = avail; 695 if (copy_frames > continuous) 696 copy_frames = continuous; 697 *frames = copy_frames; 698 699 return 0; 700 } 701 702 int pcm_mmap_commit(struct pcm *pcm, unsigned int offset, unsigned int frames) 703 { 704 /* update the application pointer in userspace and kernel */ 705 pcm_mmap_appl_forward(pcm, frames); 706 pcm_sync_ptr(pcm, 0); 707 708 return frames; 709 } 710 711 int pcm_avail_update(struct pcm *pcm) 712 { 713 pcm_sync_ptr(pcm, 0); 714 return pcm_mmap_avail(pcm); 715 } 716 717 int pcm_state(struct pcm *pcm) 718 { 719 int err = pcm_sync_ptr(pcm, 0); 720 if (err < 0) 721 return err; 722 723 return pcm->mmap_status->state; 724 } 725 726 int pcm_set_avail_min(struct pcm *pcm, int avail_min) 727 { 728 if ((~pcm->flags) & (PCM_MMAP | PCM_NOIRQ)) 729 return -ENOSYS; 730 731 pcm->config.avail_min = avail_min; 732 return 0; 733 } 734 735 int pcm_wait(struct pcm *pcm, int timeout) 736 { 737 struct pollfd pfd; 738 unsigned short revents = 0; 739 int err; 740 741 pfd.fd = pcm->fd; 742 pfd.events = POLLOUT | POLLERR | POLLNVAL; 743 744 do { 745 /* let's wait for avail or timeout */ 746 err = poll(&pfd, 1, timeout); 747 if (err < 0) 748 return -errno; 749 750 /* timeout ? */ 751 if (err == 0) 752 return 0; 753 754 /* have we been interrupted ? */ 755 if (errno == -EINTR) 756 continue; 757 758 /* check for any errors */ 759 if (pfd.revents & (POLLERR | POLLNVAL)) { 760 switch (pcm_state(pcm)) { 761 case PCM_STATE_XRUN: 762 return -EPIPE; 763 case PCM_STATE_SUSPENDED: 764 return -ESTRPIPE; 765 case PCM_STATE_DISCONNECTED: 766 return -ENODEV; 767 default: 768 return -EIO; 769 } 770 } 771 /* poll again if fd not ready for IO */ 772 } while (!(pfd.revents & (POLLIN | POLLOUT))); 773 774 return 1; 775 } 776 777 int pcm_mmap_write(struct pcm *pcm, const void *buffer, unsigned int bytes) 778 { 779 int err = 0, frames, avail; 780 unsigned int offset = 0, count; 781 782 if (bytes == 0) 783 return 0; 784 785 count = pcm_bytes_to_frames(pcm, bytes); 786 787 while (count > 0) { 788 789 /* get the available space for writing new frames */ 790 avail = pcm_avail_update(pcm); 791 if (avail < 0) { 792 fprintf(stderr, "cannot determine available mmap frames"); 793 return err; 794 } 795 796 /* start the audio if we reach the threshold */ 797 if (!pcm->running && 798 (pcm->buffer_size - avail) >= pcm->config.start_threshold) { 799 if (pcm_start(pcm) < 0) { 800 fprintf(stderr, "start error: hw 0x%x app 0x%x avail 0x%x\n", 801 (unsigned int)pcm->mmap_status->hw_ptr, 802 (unsigned int)pcm->mmap_control->appl_ptr, 803 avail); 804 return -errno; 805 } 806 pcm->wait_for_avail_min = 0; 807 } 808 809 /* sleep until we have space to write new frames */ 810 if (pcm->running) { 811 /* enable waiting for avail_min threshold when less frames than we have to write 812 * are available. */ 813 if (!pcm->wait_for_avail_min && (count > (unsigned int)avail)) 814 pcm->wait_for_avail_min = 1; 815 816 if (pcm->wait_for_avail_min && (avail < pcm->config.avail_min)) { 817 int time = -1; 818 819 /* disable waiting for avail_min threshold to allow small amounts of data to be 820 * written without waiting as long as there is enough room in buffer. */ 821 pcm->wait_for_avail_min = 0; 822 823 if (pcm->flags & PCM_NOIRQ) 824 time = (pcm->config.avail_min - avail) / pcm->noirq_frames_per_msec; 825 826 err = pcm_wait(pcm, time); 827 if (err < 0) { 828 pcm->running = 0; 829 oops(pcm, err, "wait error: hw 0x%x app 0x%x avail 0x%x\n", 830 (unsigned int)pcm->mmap_status->hw_ptr, 831 (unsigned int)pcm->mmap_control->appl_ptr, 832 avail); 833 pcm->mmap_control->appl_ptr = 0; 834 return err; 835 } 836 continue; 837 } 838 } 839 840 frames = count; 841 if (frames > avail) 842 frames = avail; 843 844 if (!frames) 845 break; 846 847 /* copy frames from buffer */ 848 frames = pcm_mmap_write_areas(pcm, buffer, offset, frames); 849 if (frames < 0) { 850 fprintf(stderr, "write error: hw 0x%x app 0x%x avail 0x%x\n", 851 (unsigned int)pcm->mmap_status->hw_ptr, 852 (unsigned int)pcm->mmap_control->appl_ptr, 853 avail); 854 return frames; 855 } 856 857 offset += frames; 858 count -= frames; 859 } 860 861 _end: 862 return 0; 863 } 864