pad.c revision 1.21 1 /* $NetBSD: pad.c,v 1.21 2014/07/25 08:10:38 dholland Exp $ */
2
3 /*-
4 * Copyright (c) 2007 Jared D. McNeill <jmcneill (at) 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.21 2014/07/25 08:10:38 dholland 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_discard = nodiscard,
137 .d_flag = D_OTHER | D_MPSAFE,
138 };
139
140 CFATTACH_DECL2_NEW(pad, sizeof(pad_softc_t), pad_match, pad_attach, pad_detach,
141 NULL, NULL, pad_childdet);
142
143 void
144 padattach(int n)
145 {
146 int i, err;
147 cfdata_t cf;
148
149 aprint_debug("pad: requested %d units\n", n);
150
151 err = config_cfattach_attach(pad_cd.cd_name, &pad_ca);
152 if (err) {
153 aprint_error("%s: couldn't register cfattach: %d\n",
154 pad_cd.cd_name, err);
155 config_cfdriver_detach(&pad_cd);
156 return;
157 }
158
159 for (i = 0; i < n; i++) {
160 cf = kmem_alloc(sizeof(struct cfdata), KM_SLEEP);
161 if (cf == NULL) {
162 aprint_error("%s: couldn't allocate cfdata\n",
163 pad_cd.cd_name);
164 continue;
165 }
166 cf->cf_name = pad_cd.cd_name;
167 cf->cf_atname = pad_cd.cd_name;
168 cf->cf_unit = i;
169 cf->cf_fstate = FSTATE_STAR;
170
171 (void)config_attach_pseudo(cf);
172 }
173
174 return;
175 }
176
177 static int
178 pad_add_block(pad_softc_t *sc, uint8_t *blk, int blksize)
179 {
180 int l;
181
182 if (sc->sc_open == 0)
183 return EIO;
184
185 KASSERT(mutex_owned(&sc->sc_lock));
186
187 if (sc->sc_buflen + blksize > PAD_BUFSIZE)
188 return ENOBUFS;
189
190 if (sc->sc_wpos + blksize <= PAD_BUFSIZE)
191 memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, blksize);
192 else {
193 l = PAD_BUFSIZE - sc->sc_wpos;
194 memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, l);
195 memcpy(sc->sc_audiobuf, blk + l, blksize - l);
196 }
197
198 sc->sc_wpos += blksize;
199 if (sc->sc_wpos > PAD_BUFSIZE)
200 sc->sc_wpos -= PAD_BUFSIZE;
201
202 sc->sc_buflen += blksize;
203
204 return 0;
205 }
206
207 static int
208 pad_get_block(pad_softc_t *sc, pad_block_t *pb, int blksize)
209 {
210 int l;
211
212 KASSERT(mutex_owned(&sc->sc_lock));
213 KASSERT(pb != NULL);
214
215 if (sc->sc_buflen < blksize)
216 return ERESTART;
217
218 pb->pb_ptr = (sc->sc_audiobuf + sc->sc_rpos);
219 if (sc->sc_rpos + blksize < PAD_BUFSIZE) {
220 pb->pb_len = blksize;
221 sc->sc_rpos += blksize;
222 } else {
223 l = PAD_BUFSIZE - sc->sc_rpos;
224 pb->pb_len = l;
225 sc->sc_rpos = 0;
226 }
227 sc->sc_buflen -= pb->pb_len;
228
229 return 0;
230 }
231
232 static int
233 pad_match(device_t parent, cfdata_t data, void *opaque)
234 {
235
236 return 1;
237 }
238
239 static void
240 pad_childdet(device_t self, device_t child)
241 {
242 pad_softc_t *sc = device_private(self);
243
244 sc->sc_audiodev = NULL;
245 }
246
247 static void
248 pad_attach(device_t parent, device_t self, void *opaque)
249 {
250 pad_softc_t *sc = device_private(self);
251
252 aprint_normal_dev(self, "outputs: 44100Hz, 16-bit, stereo\n");
253
254 sc->sc_dev = self;
255 sc->sc_open = 0;
256 if (auconv_create_encodings(pad_formats, PAD_NFORMATS,
257 &sc->sc_encodings) != 0) {
258 aprint_error_dev(self, "couldn't create encodings\n");
259 return;
260 }
261
262 cv_init(&sc->sc_condvar, device_xname(self));
263 mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
264 mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_NONE);
265
266 sc->sc_swvol = 255;
267 sc->sc_buflen = 0;
268 sc->sc_rpos = sc->sc_wpos = 0;
269 sc->sc_audiodev = (void *)audio_attach_mi(&pad_hw_if, sc, sc->sc_dev);
270
271 if (!pmf_device_register(self, NULL, NULL))
272 aprint_error_dev(self, "couldn't establish power handler\n");
273
274 return;
275 }
276
277 static int
278 pad_detach(device_t self, int flags)
279 {
280 pad_softc_t *sc = device_private(self);
281 int cmaj, mn, rc;
282
283 cmaj = cdevsw_lookup_major(&pad_cdevsw);
284 mn = device_unit(self);
285 vdevgone(cmaj, mn, mn, VCHR);
286
287 if ((rc = config_detach_children(self, flags)) != 0)
288 return rc;
289
290 pmf_device_deregister(self);
291
292 mutex_destroy(&sc->sc_lock);
293 mutex_destroy(&sc->sc_intr_lock);
294 cv_destroy(&sc->sc_condvar);
295
296 auconv_delete_encodings(sc->sc_encodings);
297
298 return 0;
299 }
300
301 int
302 pad_open(dev_t dev, int flags, int fmt, struct lwp *l)
303 {
304 pad_softc_t *sc;
305
306 sc = device_lookup_private(&pad_cd, PADUNIT(dev));
307 if (sc == NULL)
308 return ENXIO;
309
310 if (atomic_swap_uint(&sc->sc_open, 1) != 0) {
311 return EBUSY;
312 }
313
314 return 0;
315 }
316
317 int
318 pad_close(dev_t dev, int flags, int fmt, struct lwp *l)
319 {
320 pad_softc_t *sc;
321
322 sc = device_lookup_private(&pad_cd, PADUNIT(dev));
323 if (sc == NULL)
324 return ENXIO;
325
326 KASSERT(sc->sc_open > 0);
327 sc->sc_open = 0;
328
329 return 0;
330 }
331
332 int
333 pad_read(dev_t dev, struct uio *uio, int flags)
334 {
335 pad_softc_t *sc;
336 pad_block_t pb;
337 void (*intr)(void *);
338 void *intrarg;
339 int err;
340
341 sc = device_lookup_private(&pad_cd, PADUNIT(dev));
342 if (sc == NULL)
343 return ENXIO;
344
345 err = 0;
346
347 mutex_enter(&sc->sc_lock);
348 intr = sc->sc_intr;
349 intrarg = sc->sc_intrarg;
350
351 while (uio->uio_resid > 0 && !err) {
352 err = pad_get_block(sc, &pb, min(uio->uio_resid, PAD_BLKSIZE));
353 if (!err) {
354 mutex_exit(&sc->sc_lock);
355 err = uiomove(pb.pb_ptr, pb.pb_len, uio);
356 mutex_enter(&sc->sc_lock);
357 continue;
358 }
359
360 if (intr) {
361 mutex_enter(&sc->sc_intr_lock);
362 (*intr)(intrarg);
363 mutex_exit(&sc->sc_intr_lock);
364 intr = sc->sc_intr;
365 intrarg = sc->sc_intrarg;
366 err = 0;
367 continue;
368 }
369 err = cv_wait_sig(&sc->sc_condvar, &sc->sc_lock);
370 if (err != 0) {
371 mutex_exit(&sc->sc_lock);
372 return err;
373 }
374 intr = sc->sc_intr;
375 intrarg = sc->sc_intrarg;
376 }
377
378 if (intr) {
379 mutex_enter(&sc->sc_intr_lock);
380 (*intr)(intrarg);
381 mutex_exit(&sc->sc_intr_lock);
382 }
383 mutex_exit(&sc->sc_lock);
384
385 return err;
386 }
387
388 static int
389 pad_query_encoding(void *opaque, struct audio_encoding *ae)
390 {
391 pad_softc_t *sc;
392
393 sc = (pad_softc_t *)opaque;
394
395 KASSERT(mutex_owned(&sc->sc_lock));
396
397 return auconv_query_encoding(sc->sc_encodings, ae);
398 }
399
400 static int
401 pad_set_params(void *opaque, int setmode, int usemode,
402 audio_params_t *play, audio_params_t *rec,
403 stream_filter_list_t *pfil, stream_filter_list_t *rfil)
404 {
405 pad_softc_t *sc __diagused;
406
407 sc = (pad_softc_t *)opaque;
408
409 KASSERT(mutex_owned(&sc->sc_lock));
410
411 if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_PLAY,
412 play, true, pfil) < 0)
413 return EINVAL;
414 if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_RECORD,
415 rec, true, rfil) < 0)
416 return EINVAL;
417
418 if (pfil->req_size > 0)
419 play = &pfil->filters[0].param;
420 switch (play->encoding) {
421 case AUDIO_ENCODING_SLINEAR_LE:
422 if (play->precision == 16 && play->validbits == 16)
423 pfil->prepend(pfil, pad_vol_slinear16_le, play);
424 break;
425 case AUDIO_ENCODING_SLINEAR_BE:
426 if (play->precision == 16 && play->validbits == 16)
427 pfil->prepend(pfil, pad_vol_slinear16_be, play);
428 break;
429 default:
430 break;
431 }
432
433 return 0;
434 }
435
436 static int
437 pad_start_output(void *opaque, void *block, int blksize,
438 void (*intr)(void *), void *intrarg)
439 {
440 pad_softc_t *sc;
441 int err;
442
443 sc = (pad_softc_t *)opaque;
444
445 KASSERT(mutex_owned(&sc->sc_lock));
446
447 sc->sc_intr = intr;
448 sc->sc_intrarg = intrarg;
449 sc->sc_blksize = blksize;
450
451 err = pad_add_block(sc, block, blksize);
452
453 cv_broadcast(&sc->sc_condvar);
454
455 return err;
456 }
457
458 static int
459 pad_start_input(void *opaque, void *block, int blksize,
460 void (*intr)(void *), void *intrarg)
461 {
462 pad_softc_t *sc __diagused;
463
464 sc = (pad_softc_t *)opaque;
465
466 KASSERT(mutex_owned(&sc->sc_lock));
467
468 return EOPNOTSUPP;
469 }
470
471 static int
472 pad_halt_output(void *opaque)
473 {
474 pad_softc_t *sc;
475
476 sc = (pad_softc_t *)opaque;
477
478 KASSERT(mutex_owned(&sc->sc_lock));
479
480 sc->sc_intr = NULL;
481 sc->sc_intrarg = NULL;
482 sc->sc_buflen = 0;
483 sc->sc_rpos = sc->sc_wpos = 0;
484
485 return 0;
486 }
487
488 static int
489 pad_halt_input(void *opaque)
490 {
491 pad_softc_t *sc __diagused;
492
493 sc = (pad_softc_t *)opaque;
494
495 KASSERT(mutex_owned(&sc->sc_lock));
496
497 return 0;
498 }
499
500 static int
501 pad_getdev(void *opaque, struct audio_device *ret)
502 {
503 strlcpy(ret->name, "Virtual Audio", sizeof(ret->name));
504 strlcpy(ret->version, osrelease, sizeof(ret->version));
505 strlcpy(ret->config, "pad", sizeof(ret->config));
506
507 return 0;
508 }
509
510 static int
511 pad_set_port(void *opaque, mixer_ctrl_t *mc)
512 {
513 pad_softc_t *sc;
514
515 sc = (pad_softc_t *)opaque;
516
517 KASSERT(mutex_owned(&sc->sc_lock));
518
519 switch (mc->dev) {
520 case PAD_OUTPUT_MASTER_VOLUME:
521 case PAD_INPUT_DAC_VOLUME:
522 sc->sc_swvol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO];
523 return 0;
524 }
525
526 return ENXIO;
527 }
528
529 static int
530 pad_get_port(void *opaque, mixer_ctrl_t *mc)
531 {
532 pad_softc_t *sc;
533
534 sc = (pad_softc_t *)opaque;
535
536 KASSERT(mutex_owned(&sc->sc_lock));
537
538 switch (mc->dev) {
539 case PAD_OUTPUT_MASTER_VOLUME:
540 case PAD_INPUT_DAC_VOLUME:
541 mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_swvol;
542 return 0;
543 }
544
545 return ENXIO;
546 }
547
548 static int
549 pad_query_devinfo(void *opaque, mixer_devinfo_t *di)
550 {
551 pad_softc_t *sc __diagused;
552
553 sc = (pad_softc_t *)opaque;
554
555 KASSERT(mutex_owned(&sc->sc_lock));
556
557 switch (di->index) {
558 case PAD_OUTPUT_CLASS:
559 di->mixer_class = PAD_OUTPUT_CLASS;
560 strcpy(di->label.name, AudioCoutputs);
561 di->type = AUDIO_MIXER_CLASS;
562 di->next = di->prev = AUDIO_MIXER_LAST;
563 return 0;
564 case PAD_INPUT_CLASS:
565 di->mixer_class = PAD_INPUT_CLASS;
566 strcpy(di->label.name, AudioCinputs);
567 di->type = AUDIO_MIXER_CLASS;
568 di->next = di->prev = AUDIO_MIXER_LAST;
569 return 0;
570 case PAD_OUTPUT_MASTER_VOLUME:
571 di->mixer_class = PAD_OUTPUT_CLASS;
572 strcpy(di->label.name, AudioNmaster);
573 di->type = AUDIO_MIXER_VALUE;
574 di->next = di->prev = AUDIO_MIXER_LAST;
575 di->un.v.num_channels = 1;
576 strcpy(di->un.v.units.name, AudioNvolume);
577 return 0;
578 case PAD_INPUT_DAC_VOLUME:
579 di->mixer_class = PAD_INPUT_CLASS;
580 strcpy(di->label.name, AudioNdac);
581 di->type = AUDIO_MIXER_VALUE;
582 di->next = di->prev = AUDIO_MIXER_LAST;
583 di->un.v.num_channels = 1;
584 strcpy(di->un.v.units.name, AudioNvolume);
585 return 0;
586 }
587
588 return ENXIO;
589 }
590
591 static int
592 pad_get_props(void *opaque)
593 {
594 pad_softc_t *sc __diagused;
595
596 sc = (pad_softc_t *)opaque;
597
598 KASSERT(mutex_owned(&sc->sc_lock));
599
600 return 0;
601 }
602
603 static int
604 pad_round_blocksize(void *opaque, int blksize, int mode,
605 const audio_params_t *p)
606 {
607 pad_softc_t *sc __diagused;
608
609 sc = (pad_softc_t *)opaque;
610 KASSERT(mutex_owned(&sc->sc_lock));
611
612 return PAD_BLKSIZE;
613 }
614
615 static void
616 pad_get_locks(void *opaque, kmutex_t **intr, kmutex_t **thread)
617 {
618 pad_softc_t *sc;
619
620 sc = (pad_softc_t *)opaque;
621
622 *intr = &sc->sc_intr_lock;
623 *thread = &sc->sc_lock;
624 }
625
626 #ifdef _MODULE
627
628 MODULE(MODULE_CLASS_DRIVER, pad, NULL);
629
630 static const struct cfiattrdata audiobuscf_iattrdata = {
631 "audiobus", 0, { { NULL, NULL, 0 }, }
632 };
633 static const struct cfiattrdata * const pad_attrs[] = {
634 &audiobuscf_iattrdata, NULL
635 };
636
637 CFDRIVER_DECL(pad, DV_DULL, pad_attrs);
638 extern struct cfattach pad_ca;
639 static int padloc[] = { -1, -1 };
640
641 static struct cfdata pad_cfdata[] = {
642 {
643 .cf_name = "pad",
644 .cf_atname = "pad",
645 .cf_unit = 0,
646 .cf_fstate = FSTATE_STAR,
647 .cf_loc = padloc,
648 .cf_flags = 0,
649 .cf_pspec = NULL,
650 },
651 { NULL, NULL, 0, 0, NULL, 0, NULL }
652 };
653
654 static int
655 pad_modcmd(modcmd_t cmd, void *arg)
656 {
657 devmajor_t cmajor = NODEVMAJOR, bmajor = NODEVMAJOR;
658 int error;
659
660 switch (cmd) {
661 case MODULE_CMD_INIT:
662 error = config_cfdriver_attach(&pad_cd);
663 if (error) {
664 return error;
665 }
666
667 error = config_cfattach_attach(pad_cd.cd_name, &pad_ca);
668 if (error) {
669 config_cfdriver_detach(&pad_cd);
670 aprint_error("%s: unable to register cfattach\n",
671 pad_cd.cd_name);
672
673 return error;
674 }
675
676 error = config_cfdata_attach(pad_cfdata, 1);
677 if (error) {
678 config_cfattach_detach(pad_cd.cd_name, &pad_ca);
679 config_cfdriver_detach(&pad_cd);
680 aprint_error("%s: unable to register cfdata\n",
681 pad_cd.cd_name);
682
683 return error;
684 }
685
686 error = devsw_attach(pad_cd.cd_name, NULL, &bmajor, &pad_cdevsw, &cmajor);
687 if (error) {
688 error = config_cfdata_detach(pad_cfdata);
689 if (error) {
690 return error;
691 }
692 config_cfattach_detach(pad_cd.cd_name, &pad_ca);
693 config_cfdriver_detach(&pad_cd);
694 aprint_error("%s: unable to register devsw\n",
695 pad_cd.cd_name);
696
697 return error;
698 }
699
700 (void)config_attach_pseudo(pad_cfdata);
701
702 return 0;
703 case MODULE_CMD_FINI:
704 error = config_cfdata_detach(pad_cfdata);
705 if (error) {
706 return error;
707 }
708
709 config_cfattach_detach(pad_cd.cd_name, &pad_ca);
710 config_cfdriver_detach(&pad_cd);
711 devsw_detach(NULL, &pad_cdevsw);
712
713 return 0;
714 default:
715 return ENOTTY;
716 }
717 }
718
719 #endif
720