pad.c revision 1.20 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 (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.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