1 /* $NetBSD: pad.c,v 1.2 2007/11/11 19:53:38 jmcneill 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 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Jared D. McNeill. 18 * 4. Neither the name of The NetBSD Foundation nor the names of its 19 * contributors may be used to endorse or promote products derived 20 * from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 23 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 24 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 25 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 26 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 32 * POSSIBILITY OF SUCH DAMAGE. 33 */ 34 35 #include <sys/cdefs.h> 36 __KERNEL_RCSID(0, "$NetBSD: pad.c,v 1.2 2007/11/11 19:53:38 jmcneill Exp $"); 37 38 #include <sys/types.h> 39 #include <sys/param.h> 40 #include <sys/conf.h> 41 #include <sys/buf.h> 42 #include <sys/kmem.h> 43 #include <sys/kernel.h> 44 #include <sys/device.h> 45 #include <sys/proc.h> 46 #include <sys/condvar.h> 47 #include <sys/select.h> 48 #include <sys/audioio.h> 49 50 #include <dev/audio_if.h> 51 #include <dev/audiovar.h> 52 #include <dev/auconv.h> 53 54 #include <dev/pad/padvar.h> 55 #include <dev/pad/padvol.h> 56 57 #define PADUNIT(x) minor(x) 58 59 extern struct cfdriver pad_cd; 60 61 static struct audio_device pad_device = { 62 "Pseudo Audio", 63 "1.0", 64 "pad", 65 }; 66 67 typedef struct pad_block { 68 uint8_t *pb_ptr; 69 int pb_len; 70 } pad_block_t; 71 72 enum { 73 PAD_OUTPUT_CLASS, 74 PAD_INPUT_CLASS, 75 PAD_OUTPUT_MASTER_VOLUME, 76 PAD_INPUT_DAC_VOLUME, 77 PAD_ENUM_LAST, 78 }; 79 80 static int pad_match(struct device *, struct cfdata *, void *); 81 static void pad_attach(struct device *, struct device *, void *); 82 83 static int pad_query_encoding(void *, struct audio_encoding *); 84 static int pad_set_params(void *, int, int, 85 audio_params_t *, audio_params_t *, 86 stream_filter_list_t *, stream_filter_list_t *); 87 static int pad_start_output(void *, void *, int, 88 void (*)(void *), void *); 89 static int pad_start_input(void *, void *, int, 90 void (*)(void *), void *); 91 static int pad_halt_output(void *); 92 static int pad_halt_input(void *); 93 static int pad_getdev(void *, struct audio_device *); 94 static int pad_set_port(void *, mixer_ctrl_t *); 95 static int pad_get_port(void *, mixer_ctrl_t *); 96 static int pad_query_devinfo(void *, mixer_devinfo_t *); 97 static int pad_get_props(void *); 98 static int pad_round_blocksize(void *, int, int, const audio_params_t *); 99 100 static const struct audio_hw_if pad_hw_if = { 101 .query_encoding = pad_query_encoding, 102 .set_params = pad_set_params, 103 .start_output = pad_start_output, 104 .start_input = pad_start_input, 105 .halt_output = pad_halt_output, 106 .halt_input = pad_halt_input, 107 .getdev = pad_getdev, 108 .set_port = pad_set_port, 109 .get_port = pad_get_port, 110 .query_devinfo = pad_query_devinfo, 111 .get_props = pad_get_props, 112 .round_blocksize = pad_round_blocksize, 113 }; 114 115 #define PAD_NFORMATS 1 116 static const struct audio_format pad_formats[PAD_NFORMATS] = { 117 { NULL, AUMODE_PLAY|AUMODE_RECORD, AUDIO_ENCODING_SLINEAR_LE, 16, 16, 118 2, AUFMT_STEREO, 1, { 44100 } }, 119 }; 120 121 extern void padattach(int); 122 123 static pad_softc_t * pad_find_softc(dev_t); 124 static int pad_add_block(pad_softc_t *, uint8_t *, int); 125 static int pad_get_block(pad_softc_t *, pad_block_t *, int); 126 127 dev_type_open(pad_open); 128 dev_type_close(pad_close); 129 dev_type_read(pad_read); 130 131 const struct cdevsw pad_cdevsw = { 132 .d_open = pad_open, 133 .d_close = pad_close, 134 .d_read = pad_read, 135 .d_write = nowrite, 136 .d_ioctl = noioctl, 137 .d_stop = nostop, 138 .d_tty = notty, 139 .d_poll = nopoll, 140 .d_mmap = nommap, 141 .d_kqfilter = nokqfilter, 142 .d_flag = D_OTHER, 143 }; 144 145 CFATTACH_DECL(pad, sizeof(pad_softc_t), pad_match, pad_attach, NULL, NULL); 146 147 void 148 padattach(int n) 149 { 150 int i, err; 151 struct cfdata *cf; 152 153 #ifdef DEBUG 154 printf("pad: requested %d units\n", n); 155 #endif 156 157 err = config_cfattach_attach(pad_cd.cd_name, &pad_ca); 158 if (err) { 159 aprint_error("%s: couldn't register cfattach: %d\n", 160 pad_cd.cd_name, err); 161 config_cfdriver_detach(&pad_cd); 162 return; 163 } 164 165 for (i = 0; i < n; i++) { 166 cf = kmem_alloc(sizeof(struct cfdata), KM_NOSLEEP); 167 if (cf == NULL) { 168 aprint_error("%s: couldn't allocate cfdata\n", 169 pad_cd.cd_name); 170 continue; 171 } 172 cf->cf_name = pad_cd.cd_name; 173 cf->cf_atname = pad_cd.cd_name; 174 cf->cf_unit = i; 175 cf->cf_fstate = FSTATE_STAR; 176 177 (void)config_attach_pseudo(cf); 178 } 179 180 return; 181 } 182 183 static pad_softc_t * 184 pad_find_softc(dev_t dev) 185 { 186 int unit; 187 188 unit = PADUNIT(dev); 189 if (unit >= pad_cd.cd_ndevs) 190 return NULL; 191 192 return pad_cd.cd_devs[unit]; 193 } 194 195 static int 196 pad_add_block(pad_softc_t *sc, uint8_t *blk, int blksize) 197 { 198 int l; 199 200 if (sc->sc_buflen + blksize > PAD_BUFSIZE) 201 return ENOBUFS; 202 203 if (sc->sc_wpos + blksize <= PAD_BUFSIZE) 204 memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, blksize); 205 else { 206 l = PAD_BUFSIZE - sc->sc_wpos; 207 memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, l); 208 memcpy(sc->sc_audiobuf, blk + l, blksize - l); 209 } 210 211 sc->sc_wpos += blksize; 212 if (sc->sc_wpos > PAD_BUFSIZE) 213 sc->sc_wpos -= PAD_BUFSIZE; 214 215 sc->sc_buflen += blksize; 216 217 return 0; 218 } 219 220 static int 221 pad_get_block(pad_softc_t *sc, pad_block_t *pb, int blksize) 222 { 223 int l; 224 225 KASSERT(pb != NULL); 226 227 if (sc->sc_buflen < blksize) 228 return ERESTART; 229 230 pb->pb_ptr = (sc->sc_audiobuf + sc->sc_rpos); 231 if (sc->sc_rpos + blksize < PAD_BUFSIZE) { 232 pb->pb_len = blksize; 233 sc->sc_rpos += blksize; 234 } else { 235 l = PAD_BUFSIZE - sc->sc_rpos; 236 pb->pb_len = l; 237 sc->sc_rpos = 0; 238 } 239 sc->sc_buflen -= pb->pb_len; 240 241 return 0; 242 } 243 244 static int 245 pad_match(struct device *parent, struct cfdata *data, void *opaque) 246 { 247 return 1; 248 } 249 250 static void 251 pad_attach(struct device *parent, struct device *self, void *opaque) 252 { 253 pad_softc_t *sc; 254 255 sc = (pad_softc_t *)self; 256 257 aprint_normal_dev(self, "Pseudo Audio Device\n"); 258 aprint_normal_dev(self, "outputs: 44100Hz, 16-bit, stereo\n"); 259 260 sc->sc_open = 0; 261 if (auconv_create_encodings(pad_formats, PAD_NFORMATS, 262 &sc->sc_encodings) != 0) { 263 aprint_error_dev(self, "couldn't create encodings\n"); 264 return; 265 } 266 267 cv_init(&sc->sc_condvar, device_xname(self)); 268 mutex_init(&sc->sc_mutex, MUTEX_DRIVER, IPL_AUDIO); 269 270 sc->sc_swvol = 255; 271 sc->sc_buflen = 0; 272 sc->sc_rpos = sc->sc_wpos = 0; 273 sc->sc_audiodev = (void *)audio_attach_mi(&pad_hw_if, sc, &sc->sc_dev); 274 275 return; 276 } 277 278 int 279 pad_open(dev_t dev, int flags, int fmt, struct lwp *l) 280 { 281 pad_softc_t *sc; 282 283 sc = pad_find_softc(dev); 284 if (sc == NULL) 285 return ENODEV; 286 287 if (sc->sc_open++) { 288 sc->sc_open--; 289 return EBUSY; 290 } 291 292 return 0; 293 } 294 295 int 296 pad_close(dev_t dev, int flags, int fmt, struct lwp *l) 297 { 298 pad_softc_t *sc; 299 300 sc = pad_find_softc(dev); 301 if (sc == NULL) 302 return ENODEV; 303 304 KASSERT(sc->sc_open > 0); 305 sc->sc_open--; 306 307 return 0; 308 } 309 310 int 311 pad_read(dev_t dev, struct uio *uio, int flags) 312 { 313 pad_softc_t *sc; 314 pad_block_t pb; 315 void (*intr)(void *); 316 void *intrarg; 317 int err; 318 319 sc = pad_find_softc(dev); 320 if (sc == NULL) 321 return ENODEV; 322 323 err = 0; 324 325 intr = sc->sc_intr; 326 intrarg = sc->sc_intrarg; 327 328 while (uio->uio_resid > 0 && !err) { 329 err = pad_get_block(sc, &pb, min(uio->uio_resid, PAD_BLKSIZE)); 330 if (!err) 331 err = uiomove(pb.pb_ptr, pb.pb_len, uio); 332 else { 333 if (intr) { 334 (*intr)(intrarg); 335 intr = sc->sc_intr; 336 intrarg = sc->sc_intrarg; 337 err = 0; 338 continue; 339 } 340 341 mutex_enter(&sc->sc_mutex); 342 err = cv_timedwait_sig(&sc->sc_condvar, &sc->sc_mutex, 343 hz/100); 344 if (err != 0 && err != EWOULDBLOCK) { 345 mutex_exit(&sc->sc_mutex); 346 aprint_error_dev(&sc->sc_dev, 347 "cv_timedwait_sig returned %d\n", err); 348 return EINTR; 349 } 350 intr = sc->sc_intr; 351 intrarg = sc->sc_intrarg; 352 mutex_exit(&sc->sc_mutex); 353 err = 0; 354 } 355 } 356 357 if (intr) 358 (*intr)(intrarg); 359 360 return err; 361 } 362 363 static int 364 pad_query_encoding(void *opaque, struct audio_encoding *ae) 365 { 366 pad_softc_t *sc; 367 368 sc = (pad_softc_t *)opaque; 369 370 return auconv_query_encoding(sc->sc_encodings, ae); 371 } 372 373 static int 374 pad_set_params(void *opaque, int setmode, int usemode, 375 audio_params_t *play, audio_params_t *rec, 376 stream_filter_list_t *pfil, stream_filter_list_t *rfil) 377 { 378 pad_softc_t *sc; 379 380 sc = (pad_softc_t *)opaque; 381 382 if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_PLAY, 383 play, true, pfil) < 0) 384 return EINVAL; 385 if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_RECORD, 386 rec, true, rfil) < 0) 387 return EINVAL; 388 389 if (pfil->req_size > 0) 390 play = &pfil->filters[0].param; 391 switch (play->encoding) { 392 case AUDIO_ENCODING_SLINEAR_LE: 393 if (play->precision == 16 && play->validbits == 16) 394 pfil->prepend(pfil, pad_vol_slinear16_le, play); 395 break; 396 case AUDIO_ENCODING_SLINEAR_BE: 397 if (play->precision == 16 && play->validbits == 16) 398 pfil->prepend(pfil, pad_vol_slinear16_be, play); 399 break; 400 default: 401 break; 402 } 403 404 return 0; 405 } 406 407 static int 408 pad_start_output(void *opaque, void *block, int blksize, 409 void (*intr)(void *), void *intrarg) 410 { 411 pad_softc_t *sc; 412 int err; 413 414 sc = (pad_softc_t *)opaque; 415 416 mutex_enter(&sc->sc_mutex); 417 418 sc->sc_intr = intr; 419 sc->sc_intrarg = intrarg; 420 sc->sc_blksize = blksize; 421 422 err = pad_add_block(sc, block, blksize); 423 424 cv_signal(&sc->sc_condvar); 425 426 mutex_exit(&sc->sc_mutex); 427 428 return err; 429 } 430 431 static int 432 pad_start_input(void *opaque, void *block, int blksize, 433 void (*intr)(void *), void *intrarg) 434 { 435 return EINVAL; 436 } 437 438 static int 439 pad_halt_output(void *opaque) 440 { 441 pad_softc_t *sc; 442 443 sc = (pad_softc_t *)opaque; 444 sc->sc_intr = NULL; 445 sc->sc_intrarg = NULL; 446 sc->sc_buflen = 0; 447 sc->sc_rpos = sc->sc_wpos = 0; 448 449 return 0; 450 } 451 452 static int 453 pad_halt_input(void *opaque) 454 { 455 return 0; 456 } 457 458 static int 459 pad_getdev(void *opaque, struct audio_device *ret) 460 { 461 462 *ret = pad_device; 463 464 return 0; 465 } 466 467 static int 468 pad_set_port(void *opaque, mixer_ctrl_t *mc) 469 { 470 pad_softc_t *sc; 471 472 sc = (pad_softc_t *)opaque; 473 474 switch (mc->dev) { 475 case PAD_OUTPUT_MASTER_VOLUME: 476 case PAD_INPUT_DAC_VOLUME: 477 sc->sc_swvol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO]; 478 return 0; 479 } 480 481 return ENXIO; 482 } 483 484 static int 485 pad_get_port(void *opaque, mixer_ctrl_t *mc) 486 { 487 pad_softc_t *sc; 488 489 sc = (pad_softc_t *)opaque; 490 491 switch (mc->dev) { 492 case PAD_OUTPUT_MASTER_VOLUME: 493 case PAD_INPUT_DAC_VOLUME: 494 mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_swvol; 495 return 0; 496 } 497 498 return ENXIO; 499 } 500 501 static int 502 pad_query_devinfo(void *opaque, mixer_devinfo_t *di) 503 { 504 pad_softc_t *sc; 505 506 sc = (pad_softc_t *)opaque; 507 508 switch (di->index) { 509 case PAD_OUTPUT_CLASS: 510 di->mixer_class = PAD_OUTPUT_CLASS; 511 strcpy(di->label.name, AudioCoutputs); 512 di->type = AUDIO_MIXER_CLASS; 513 di->next = di->prev = AUDIO_MIXER_LAST; 514 return 0; 515 case PAD_INPUT_CLASS: 516 di->mixer_class = PAD_INPUT_CLASS; 517 strcpy(di->label.name, AudioCinputs); 518 di->type = AUDIO_MIXER_CLASS; 519 di->next = di->prev = AUDIO_MIXER_LAST; 520 return 0; 521 case PAD_OUTPUT_MASTER_VOLUME: 522 di->mixer_class = PAD_OUTPUT_CLASS; 523 strcpy(di->label.name, AudioNmaster); 524 di->type = AUDIO_MIXER_VALUE; 525 di->next = di->prev = AUDIO_MIXER_LAST; 526 di->un.v.num_channels = 1; 527 strcpy(di->un.v.units.name, AudioNvolume); 528 return 0; 529 case PAD_INPUT_DAC_VOLUME: 530 di->mixer_class = PAD_INPUT_CLASS; 531 strcpy(di->label.name, AudioNdac); 532 di->type = AUDIO_MIXER_VALUE; 533 di->next = di->prev = AUDIO_MIXER_LAST; 534 di->un.v.num_channels = 1; 535 strcpy(di->un.v.units.name, AudioNvolume); 536 return 0; 537 } 538 539 return ENXIO; 540 } 541 542 static int 543 pad_get_props(void *opaque) 544 { 545 return 0; 546 } 547 548 static int 549 pad_round_blocksize(void *opaque, int blksize, int mode, 550 const audio_params_t *p) 551 { 552 return PAD_BLKSIZE; 553 } 554