1 /* $NetBSD: pad.c,v 1.20 2013/11/02 00:37:12 christos Exp $ */ 2 3 /*- 4 * Copyright (c) 2007 Jared D. McNeill <jmcneill@invisible.ca> 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 17 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 26 * POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __KERNEL_RCSID(0, "$NetBSD: pad.c,v 1.20 2013/11/02 00:37:12 christos Exp $"); 31 32 #include <sys/types.h> 33 #include <sys/param.h> 34 #include <sys/conf.h> 35 #include <sys/buf.h> 36 #include <sys/kmem.h> 37 #include <sys/kernel.h> 38 #include <sys/device.h> 39 #include <sys/proc.h> 40 #include <sys/condvar.h> 41 #include <sys/select.h> 42 #include <sys/audioio.h> 43 #include <sys/vnode.h> 44 #include <sys/module.h> 45 #include <sys/atomic.h> 46 47 #include <dev/audio_if.h> 48 #include <dev/audiovar.h> 49 #include <dev/auconv.h> 50 51 #include <dev/pad/padvar.h> 52 #include <dev/pad/padvol.h> 53 54 #define PADUNIT(x) minor(x) 55 56 extern struct cfdriver pad_cd; 57 58 typedef struct pad_block { 59 uint8_t *pb_ptr; 60 int pb_len; 61 } pad_block_t; 62 63 enum { 64 PAD_OUTPUT_CLASS, 65 PAD_INPUT_CLASS, 66 PAD_OUTPUT_MASTER_VOLUME, 67 PAD_INPUT_DAC_VOLUME, 68 PAD_ENUM_LAST, 69 }; 70 71 static int pad_match(device_t, cfdata_t, void *); 72 static void pad_attach(device_t, device_t, void *); 73 static int pad_detach(device_t, int); 74 static void pad_childdet(device_t, device_t); 75 76 static int pad_query_encoding(void *, struct audio_encoding *); 77 static int pad_set_params(void *, int, int, 78 audio_params_t *, audio_params_t *, 79 stream_filter_list_t *, stream_filter_list_t *); 80 static int pad_start_output(void *, void *, int, 81 void (*)(void *), void *); 82 static int pad_start_input(void *, void *, int, 83 void (*)(void *), void *); 84 static int pad_halt_output(void *); 85 static int pad_halt_input(void *); 86 static int pad_getdev(void *, struct audio_device *); 87 static int pad_set_port(void *, mixer_ctrl_t *); 88 static int pad_get_port(void *, mixer_ctrl_t *); 89 static int pad_query_devinfo(void *, mixer_devinfo_t *); 90 static int pad_get_props(void *); 91 static int pad_round_blocksize(void *, int, int, const audio_params_t *); 92 static void pad_get_locks(void *, kmutex_t **, kmutex_t **); 93 94 static const struct audio_hw_if pad_hw_if = { 95 .query_encoding = pad_query_encoding, 96 .set_params = pad_set_params, 97 .start_output = pad_start_output, 98 .start_input = pad_start_input, 99 .halt_output = pad_halt_output, 100 .halt_input = pad_halt_input, 101 .getdev = pad_getdev, 102 .set_port = pad_set_port, 103 .get_port = pad_get_port, 104 .query_devinfo = pad_query_devinfo, 105 .get_props = pad_get_props, 106 .round_blocksize = pad_round_blocksize, 107 .get_locks = pad_get_locks, 108 }; 109 110 #define PAD_NFORMATS 1 111 static const struct audio_format pad_formats[PAD_NFORMATS] = { 112 { NULL, AUMODE_PLAY|AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 16, 16, 113 2, AUFMT_STEREO, 1, { 44100 } }, 114 }; 115 116 extern void padattach(int); 117 118 static int pad_add_block(pad_softc_t *, uint8_t *, int); 119 static int pad_get_block(pad_softc_t *, pad_block_t *, int); 120 121 dev_type_open(pad_open); 122 dev_type_close(pad_close); 123 dev_type_read(pad_read); 124 125 const struct cdevsw pad_cdevsw = { 126 .d_open = pad_open, 127 .d_close = pad_close, 128 .d_read = pad_read, 129 .d_write = nowrite, 130 .d_ioctl = noioctl, 131 .d_stop = nostop, 132 .d_tty = notty, 133 .d_poll = nopoll, 134 .d_mmap = nommap, 135 .d_kqfilter = nokqfilter, 136 .d_flag = D_OTHER | D_MPSAFE, 137 }; 138 139 CFATTACH_DECL2_NEW(pad, sizeof(pad_softc_t), pad_match, pad_attach, pad_detach, 140 NULL, NULL, pad_childdet); 141 142 void 143 padattach(int n) 144 { 145 int i, err; 146 cfdata_t cf; 147 148 aprint_debug("pad: requested %d units\n", n); 149 150 err = config_cfattach_attach(pad_cd.cd_name, &pad_ca); 151 if (err) { 152 aprint_error("%s: couldn't register cfattach: %d\n", 153 pad_cd.cd_name, err); 154 config_cfdriver_detach(&pad_cd); 155 return; 156 } 157 158 for (i = 0; i < n; i++) { 159 cf = kmem_alloc(sizeof(struct cfdata), KM_SLEEP); 160 if (cf == NULL) { 161 aprint_error("%s: couldn't allocate cfdata\n", 162 pad_cd.cd_name); 163 continue; 164 } 165 cf->cf_name = pad_cd.cd_name; 166 cf->cf_atname = pad_cd.cd_name; 167 cf->cf_unit = i; 168 cf->cf_fstate = FSTATE_STAR; 169 170 (void)config_attach_pseudo(cf); 171 } 172 173 return; 174 } 175 176 static int 177 pad_add_block(pad_softc_t *sc, uint8_t *blk, int blksize) 178 { 179 int l; 180 181 if (sc->sc_open == 0) 182 return EIO; 183 184 KASSERT(mutex_owned(&sc->sc_lock)); 185 186 if (sc->sc_buflen + blksize > PAD_BUFSIZE) 187 return ENOBUFS; 188 189 if (sc->sc_wpos + blksize <= PAD_BUFSIZE) 190 memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, blksize); 191 else { 192 l = PAD_BUFSIZE - sc->sc_wpos; 193 memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, l); 194 memcpy(sc->sc_audiobuf, blk + l, blksize - l); 195 } 196 197 sc->sc_wpos += blksize; 198 if (sc->sc_wpos > PAD_BUFSIZE) 199 sc->sc_wpos -= PAD_BUFSIZE; 200 201 sc->sc_buflen += blksize; 202 203 return 0; 204 } 205 206 static int 207 pad_get_block(pad_softc_t *sc, pad_block_t *pb, int blksize) 208 { 209 int l; 210 211 KASSERT(mutex_owned(&sc->sc_lock)); 212 KASSERT(pb != NULL); 213 214 if (sc->sc_buflen < blksize) 215 return ERESTART; 216 217 pb->pb_ptr = (sc->sc_audiobuf + sc->sc_rpos); 218 if (sc->sc_rpos + blksize < PAD_BUFSIZE) { 219 pb->pb_len = blksize; 220 sc->sc_rpos += blksize; 221 } else { 222 l = PAD_BUFSIZE - sc->sc_rpos; 223 pb->pb_len = l; 224 sc->sc_rpos = 0; 225 } 226 sc->sc_buflen -= pb->pb_len; 227 228 return 0; 229 } 230 231 static int 232 pad_match(device_t parent, cfdata_t data, void *opaque) 233 { 234 235 return 1; 236 } 237 238 static void 239 pad_childdet(device_t self, device_t child) 240 { 241 pad_softc_t *sc = device_private(self); 242 243 sc->sc_audiodev = NULL; 244 } 245 246 static void 247 pad_attach(device_t parent, device_t self, void *opaque) 248 { 249 pad_softc_t *sc = device_private(self); 250 251 aprint_normal_dev(self, "outputs: 44100Hz, 16-bit, stereo\n"); 252 253 sc->sc_dev = self; 254 sc->sc_open = 0; 255 if (auconv_create_encodings(pad_formats, PAD_NFORMATS, 256 &sc->sc_encodings) != 0) { 257 aprint_error_dev(self, "couldn't create encodings\n"); 258 return; 259 } 260 261 cv_init(&sc->sc_condvar, device_xname(self)); 262 mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE); 263 mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_NONE); 264 265 sc->sc_swvol = 255; 266 sc->sc_buflen = 0; 267 sc->sc_rpos = sc->sc_wpos = 0; 268 sc->sc_audiodev = (void *)audio_attach_mi(&pad_hw_if, sc, sc->sc_dev); 269 270 if (!pmf_device_register(self, NULL, NULL)) 271 aprint_error_dev(self, "couldn't establish power handler\n"); 272 273 return; 274 } 275 276 static int 277 pad_detach(device_t self, int flags) 278 { 279 pad_softc_t *sc = device_private(self); 280 int cmaj, mn, rc; 281 282 cmaj = cdevsw_lookup_major(&pad_cdevsw); 283 mn = device_unit(self); 284 vdevgone(cmaj, mn, mn, VCHR); 285 286 if ((rc = config_detach_children(self, flags)) != 0) 287 return rc; 288 289 pmf_device_deregister(self); 290 291 mutex_destroy(&sc->sc_lock); 292 mutex_destroy(&sc->sc_intr_lock); 293 cv_destroy(&sc->sc_condvar); 294 295 auconv_delete_encodings(sc->sc_encodings); 296 297 return 0; 298 } 299 300 int 301 pad_open(dev_t dev, int flags, int fmt, struct lwp *l) 302 { 303 pad_softc_t *sc; 304 305 sc = device_lookup_private(&pad_cd, PADUNIT(dev)); 306 if (sc == NULL) 307 return ENXIO; 308 309 if (atomic_swap_uint(&sc->sc_open, 1) != 0) { 310 return EBUSY; 311 } 312 313 return 0; 314 } 315 316 int 317 pad_close(dev_t dev, int flags, int fmt, struct lwp *l) 318 { 319 pad_softc_t *sc; 320 321 sc = device_lookup_private(&pad_cd, PADUNIT(dev)); 322 if (sc == NULL) 323 return ENXIO; 324 325 KASSERT(sc->sc_open > 0); 326 sc->sc_open = 0; 327 328 return 0; 329 } 330 331 int 332 pad_read(dev_t dev, struct uio *uio, int flags) 333 { 334 pad_softc_t *sc; 335 pad_block_t pb; 336 void (*intr)(void *); 337 void *intrarg; 338 int err; 339 340 sc = device_lookup_private(&pad_cd, PADUNIT(dev)); 341 if (sc == NULL) 342 return ENXIO; 343 344 err = 0; 345 346 mutex_enter(&sc->sc_lock); 347 intr = sc->sc_intr; 348 intrarg = sc->sc_intrarg; 349 350 while (uio->uio_resid > 0 && !err) { 351 err = pad_get_block(sc, &pb, min(uio->uio_resid, PAD_BLKSIZE)); 352 if (!err) { 353 mutex_exit(&sc->sc_lock); 354 err = uiomove(pb.pb_ptr, pb.pb_len, uio); 355 mutex_enter(&sc->sc_lock); 356 continue; 357 } 358 359 if (intr) { 360 mutex_enter(&sc->sc_intr_lock); 361 (*intr)(intrarg); 362 mutex_exit(&sc->sc_intr_lock); 363 intr = sc->sc_intr; 364 intrarg = sc->sc_intrarg; 365 err = 0; 366 continue; 367 } 368 err = cv_wait_sig(&sc->sc_condvar, &sc->sc_lock); 369 if (err != 0) { 370 mutex_exit(&sc->sc_lock); 371 return err; 372 } 373 intr = sc->sc_intr; 374 intrarg = sc->sc_intrarg; 375 } 376 377 if (intr) { 378 mutex_enter(&sc->sc_intr_lock); 379 (*intr)(intrarg); 380 mutex_exit(&sc->sc_intr_lock); 381 } 382 mutex_exit(&sc->sc_lock); 383 384 return err; 385 } 386 387 static int 388 pad_query_encoding(void *opaque, struct audio_encoding *ae) 389 { 390 pad_softc_t *sc; 391 392 sc = (pad_softc_t *)opaque; 393 394 KASSERT(mutex_owned(&sc->sc_lock)); 395 396 return auconv_query_encoding(sc->sc_encodings, ae); 397 } 398 399 static int 400 pad_set_params(void *opaque, int setmode, int usemode, 401 audio_params_t *play, audio_params_t *rec, 402 stream_filter_list_t *pfil, stream_filter_list_t *rfil) 403 { 404 pad_softc_t *sc __diagused; 405 406 sc = (pad_softc_t *)opaque; 407 408 KASSERT(mutex_owned(&sc->sc_lock)); 409 410 if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_PLAY, 411 play, true, pfil) < 0) 412 return EINVAL; 413 if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_RECORD, 414 rec, true, rfil) < 0) 415 return EINVAL; 416 417 if (pfil->req_size > 0) 418 play = &pfil->filters[0].param; 419 switch (play->encoding) { 420 case AUDIO_ENCODING_SLINEAR_LE: 421 if (play->precision == 16 && play->validbits == 16) 422 pfil->prepend(pfil, pad_vol_slinear16_le, play); 423 break; 424 case AUDIO_ENCODING_SLINEAR_BE: 425 if (play->precision == 16 && play->validbits == 16) 426 pfil->prepend(pfil, pad_vol_slinear16_be, play); 427 break; 428 default: 429 break; 430 } 431 432 return 0; 433 } 434 435 static int 436 pad_start_output(void *opaque, void *block, int blksize, 437 void (*intr)(void *), void *intrarg) 438 { 439 pad_softc_t *sc; 440 int err; 441 442 sc = (pad_softc_t *)opaque; 443 444 KASSERT(mutex_owned(&sc->sc_lock)); 445 446 sc->sc_intr = intr; 447 sc->sc_intrarg = intrarg; 448 sc->sc_blksize = blksize; 449 450 err = pad_add_block(sc, block, blksize); 451 452 cv_broadcast(&sc->sc_condvar); 453 454 return err; 455 } 456 457 static int 458 pad_start_input(void *opaque, void *block, int blksize, 459 void (*intr)(void *), void *intrarg) 460 { 461 pad_softc_t *sc __diagused; 462 463 sc = (pad_softc_t *)opaque; 464 465 KASSERT(mutex_owned(&sc->sc_lock)); 466 467 return EOPNOTSUPP; 468 } 469 470 static int 471 pad_halt_output(void *opaque) 472 { 473 pad_softc_t *sc; 474 475 sc = (pad_softc_t *)opaque; 476 477 KASSERT(mutex_owned(&sc->sc_lock)); 478 479 sc->sc_intr = NULL; 480 sc->sc_intrarg = NULL; 481 sc->sc_buflen = 0; 482 sc->sc_rpos = sc->sc_wpos = 0; 483 484 return 0; 485 } 486 487 static int 488 pad_halt_input(void *opaque) 489 { 490 pad_softc_t *sc __diagused; 491 492 sc = (pad_softc_t *)opaque; 493 494 KASSERT(mutex_owned(&sc->sc_lock)); 495 496 return 0; 497 } 498 499 static int 500 pad_getdev(void *opaque, struct audio_device *ret) 501 { 502 strlcpy(ret->name, "Virtual Audio", sizeof(ret->name)); 503 strlcpy(ret->version, osrelease, sizeof(ret->version)); 504 strlcpy(ret->config, "pad", sizeof(ret->config)); 505 506 return 0; 507 } 508 509 static int 510 pad_set_port(void *opaque, mixer_ctrl_t *mc) 511 { 512 pad_softc_t *sc; 513 514 sc = (pad_softc_t *)opaque; 515 516 KASSERT(mutex_owned(&sc->sc_lock)); 517 518 switch (mc->dev) { 519 case PAD_OUTPUT_MASTER_VOLUME: 520 case PAD_INPUT_DAC_VOLUME: 521 sc->sc_swvol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO]; 522 return 0; 523 } 524 525 return ENXIO; 526 } 527 528 static int 529 pad_get_port(void *opaque, mixer_ctrl_t *mc) 530 { 531 pad_softc_t *sc; 532 533 sc = (pad_softc_t *)opaque; 534 535 KASSERT(mutex_owned(&sc->sc_lock)); 536 537 switch (mc->dev) { 538 case PAD_OUTPUT_MASTER_VOLUME: 539 case PAD_INPUT_DAC_VOLUME: 540 mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_swvol; 541 return 0; 542 } 543 544 return ENXIO; 545 } 546 547 static int 548 pad_query_devinfo(void *opaque, mixer_devinfo_t *di) 549 { 550 pad_softc_t *sc __diagused; 551 552 sc = (pad_softc_t *)opaque; 553 554 KASSERT(mutex_owned(&sc->sc_lock)); 555 556 switch (di->index) { 557 case PAD_OUTPUT_CLASS: 558 di->mixer_class = PAD_OUTPUT_CLASS; 559 strcpy(di->label.name, AudioCoutputs); 560 di->type = AUDIO_MIXER_CLASS; 561 di->next = di->prev = AUDIO_MIXER_LAST; 562 return 0; 563 case PAD_INPUT_CLASS: 564 di->mixer_class = PAD_INPUT_CLASS; 565 strcpy(di->label.name, AudioCinputs); 566 di->type = AUDIO_MIXER_CLASS; 567 di->next = di->prev = AUDIO_MIXER_LAST; 568 return 0; 569 case PAD_OUTPUT_MASTER_VOLUME: 570 di->mixer_class = PAD_OUTPUT_CLASS; 571 strcpy(di->label.name, AudioNmaster); 572 di->type = AUDIO_MIXER_VALUE; 573 di->next = di->prev = AUDIO_MIXER_LAST; 574 di->un.v.num_channels = 1; 575 strcpy(di->un.v.units.name, AudioNvolume); 576 return 0; 577 case PAD_INPUT_DAC_VOLUME: 578 di->mixer_class = PAD_INPUT_CLASS; 579 strcpy(di->label.name, AudioNdac); 580 di->type = AUDIO_MIXER_VALUE; 581 di->next = di->prev = AUDIO_MIXER_LAST; 582 di->un.v.num_channels = 1; 583 strcpy(di->un.v.units.name, AudioNvolume); 584 return 0; 585 } 586 587 return ENXIO; 588 } 589 590 static int 591 pad_get_props(void *opaque) 592 { 593 pad_softc_t *sc __diagused; 594 595 sc = (pad_softc_t *)opaque; 596 597 KASSERT(mutex_owned(&sc->sc_lock)); 598 599 return 0; 600 } 601 602 static int 603 pad_round_blocksize(void *opaque, int blksize, int mode, 604 const audio_params_t *p) 605 { 606 pad_softc_t *sc __diagused; 607 608 sc = (pad_softc_t *)opaque; 609 KASSERT(mutex_owned(&sc->sc_lock)); 610 611 return PAD_BLKSIZE; 612 } 613 614 static void 615 pad_get_locks(void *opaque, kmutex_t **intr, kmutex_t **thread) 616 { 617 pad_softc_t *sc; 618 619 sc = (pad_softc_t *)opaque; 620 621 *intr = &sc->sc_intr_lock; 622 *thread = &sc->sc_lock; 623 } 624 625 #ifdef _MODULE 626 627 MODULE(MODULE_CLASS_DRIVER, pad, NULL); 628 629 static const struct cfiattrdata audiobuscf_iattrdata = { 630 "audiobus", 0, { { NULL, NULL, 0 }, } 631 }; 632 static const struct cfiattrdata * const pad_attrs[] = { 633 &audiobuscf_iattrdata, NULL 634 }; 635 636 CFDRIVER_DECL(pad, DV_DULL, pad_attrs); 637 extern struct cfattach pad_ca; 638 static int padloc[] = { -1, -1 }; 639 640 static struct cfdata pad_cfdata[] = { 641 { 642 .cf_name = "pad", 643 .cf_atname = "pad", 644 .cf_unit = 0, 645 .cf_fstate = FSTATE_STAR, 646 .cf_loc = padloc, 647 .cf_flags = 0, 648 .cf_pspec = NULL, 649 }, 650 { NULL, NULL, 0, 0, NULL, 0, NULL } 651 }; 652 653 static int 654 pad_modcmd(modcmd_t cmd, void *arg) 655 { 656 devmajor_t cmajor = NODEVMAJOR, bmajor = NODEVMAJOR; 657 int error; 658 659 switch (cmd) { 660 case MODULE_CMD_INIT: 661 error = config_cfdriver_attach(&pad_cd); 662 if (error) { 663 return error; 664 } 665 666 error = config_cfattach_attach(pad_cd.cd_name, &pad_ca); 667 if (error) { 668 config_cfdriver_detach(&pad_cd); 669 aprint_error("%s: unable to register cfattach\n", 670 pad_cd.cd_name); 671 672 return error; 673 } 674 675 error = config_cfdata_attach(pad_cfdata, 1); 676 if (error) { 677 config_cfattach_detach(pad_cd.cd_name, &pad_ca); 678 config_cfdriver_detach(&pad_cd); 679 aprint_error("%s: unable to register cfdata\n", 680 pad_cd.cd_name); 681 682 return error; 683 } 684 685 error = devsw_attach(pad_cd.cd_name, NULL, &bmajor, &pad_cdevsw, &cmajor); 686 if (error) { 687 error = config_cfdata_detach(pad_cfdata); 688 if (error) { 689 return error; 690 } 691 config_cfattach_detach(pad_cd.cd_name, &pad_ca); 692 config_cfdriver_detach(&pad_cd); 693 aprint_error("%s: unable to register devsw\n", 694 pad_cd.cd_name); 695 696 return error; 697 } 698 699 (void)config_attach_pseudo(pad_cfdata); 700 701 return 0; 702 case MODULE_CMD_FINI: 703 error = config_cfdata_detach(pad_cfdata); 704 if (error) { 705 return error; 706 } 707 708 config_cfattach_detach(pad_cd.cd_name, &pad_ca); 709 config_cfdriver_detach(&pad_cd); 710 devsw_detach(NULL, &pad_cdevsw); 711 712 return 0; 713 default: 714 return ENOTTY; 715 } 716 } 717 718 #endif 719