pad.c revision 1.10.6.1 1 /* $NetBSD: pad.c,v 1.10.6.1 2008/12/11 19:49:30 ad 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.10.6.1 2008/12/11 19:49:30 ad 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/atomic.h>
45
46 #include <dev/audio_if.h>
47 #include <dev/audiovar.h>
48 #include <dev/auconv.h>
49
50 #include <dev/pad/padvar.h>
51 #include <dev/pad/padvol.h>
52
53 #define PADUNIT(x) minor(x)
54
55 extern struct cfdriver pad_cd;
56
57 static struct audio_device pad_device = {
58 "Pseudo Audio",
59 "1.0",
60 "pad",
61 };
62
63 typedef struct pad_block {
64 uint8_t *pb_ptr;
65 int pb_len;
66 } pad_block_t;
67
68 enum {
69 PAD_OUTPUT_CLASS,
70 PAD_INPUT_CLASS,
71 PAD_OUTPUT_MASTER_VOLUME,
72 PAD_INPUT_DAC_VOLUME,
73 PAD_ENUM_LAST,
74 };
75
76 static int pad_match(device_t, cfdata_t, void *);
77 static void pad_attach(device_t, device_t, void *);
78 static int pad_detach(device_t, int);
79 static void pad_childdet(device_t, device_t);
80
81 static int pad_query_encoding(void *, struct audio_encoding *);
82 static int pad_set_params(void *, int, int,
83 audio_params_t *, audio_params_t *,
84 stream_filter_list_t *, stream_filter_list_t *);
85 static int pad_start_output(void *, void *, int,
86 void (*)(void *), void *);
87 static int pad_start_input(void *, void *, int,
88 void (*)(void *), void *);
89 static int pad_halt_output(void *);
90 static int pad_halt_input(void *);
91 static int pad_getdev(void *, struct audio_device *);
92 static int pad_set_port(void *, mixer_ctrl_t *);
93 static int pad_get_port(void *, mixer_ctrl_t *);
94 static int pad_query_devinfo(void *, mixer_devinfo_t *);
95 static int pad_get_props(void *);
96 static int pad_round_blocksize(void *, int, int, const audio_params_t *);
97 static void pad_get_locks(void *, kmutex_t **, kmutex_t **);
98
99 static const struct audio_hw_if pad_hw_if = {
100 .query_encoding = pad_query_encoding,
101 .set_params = pad_set_params,
102 .start_output = pad_start_output,
103 .start_input = pad_start_input,
104 .halt_output = pad_halt_output,
105 .halt_input = pad_halt_input,
106 .getdev = pad_getdev,
107 .set_port = pad_set_port,
108 .get_port = pad_get_port,
109 .query_devinfo = pad_query_devinfo,
110 .get_props = pad_get_props,
111 .round_blocksize = pad_round_blocksize,
112 .get_locks = pad_get_locks,
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 int pad_add_block(pad_softc_t *, uint8_t *, int);
124 static int pad_get_block(pad_softc_t *, pad_block_t *, int);
125
126 dev_type_open(pad_open);
127 dev_type_close(pad_close);
128 dev_type_read(pad_read);
129
130 const struct cdevsw pad_cdevsw = {
131 .d_open = pad_open,
132 .d_close = pad_close,
133 .d_read = pad_read,
134 .d_write = nowrite,
135 .d_ioctl = noioctl,
136 .d_stop = nostop,
137 .d_tty = notty,
138 .d_poll = nopoll,
139 .d_mmap = nommap,
140 .d_kqfilter = nokqfilter,
141 .d_flag = D_OTHER | D_MPSAFE,
142 };
143
144 CFATTACH_DECL2_NEW(pad, sizeof(pad_softc_t), pad_match, pad_attach, pad_detach,
145 NULL, NULL, pad_childdet);
146
147 void
148 padattach(int n)
149 {
150 int i, err;
151 cfdata_t 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_SLEEP);
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 int
184 pad_add_block(pad_softc_t *sc, uint8_t *blk, int blksize)
185 {
186 int l;
187
188 KASSERT(mutex_owned(&sc->sc_lock));
189
190 if (sc->sc_buflen + blksize > PAD_BUFSIZE)
191 return ENOBUFS;
192
193 if (sc->sc_wpos + blksize <= PAD_BUFSIZE)
194 memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, blksize);
195 else {
196 l = PAD_BUFSIZE - sc->sc_wpos;
197 memcpy(sc->sc_audiobuf + sc->sc_wpos, blk, l);
198 memcpy(sc->sc_audiobuf, blk + l, blksize - l);
199 }
200
201 sc->sc_wpos += blksize;
202 if (sc->sc_wpos > PAD_BUFSIZE)
203 sc->sc_wpos -= PAD_BUFSIZE;
204
205 sc->sc_buflen += blksize;
206
207 return 0;
208 }
209
210 static int
211 pad_get_block(pad_softc_t *sc, pad_block_t *pb, int blksize)
212 {
213 int l;
214
215 KASSERT(mutex_owned(&sc->sc_lock));
216 KASSERT(pb != NULL);
217
218 if (sc->sc_buflen < blksize)
219 return ERESTART;
220
221 pb->pb_ptr = (sc->sc_audiobuf + sc->sc_rpos);
222 if (sc->sc_rpos + blksize < PAD_BUFSIZE) {
223 pb->pb_len = blksize;
224 sc->sc_rpos += blksize;
225 } else {
226 l = PAD_BUFSIZE - sc->sc_rpos;
227 pb->pb_len = l;
228 sc->sc_rpos = 0;
229 }
230 sc->sc_buflen -= pb->pb_len;
231
232 return 0;
233 }
234
235 static int
236 pad_match(device_t parent, cfdata_t data, void *opaque)
237 {
238
239 return 1;
240 }
241
242 static void
243 pad_childdet(device_t self, device_t child)
244 {
245 pad_softc_t *sc = device_private(self);
246
247 sc->sc_audiodev = NULL;
248 }
249
250 static void
251 pad_attach(device_t parent, device_t self, void *opaque)
252 {
253 pad_softc_t *sc = device_private(self);
254
255 aprint_normal_dev(self, "outputs: 44100Hz, 16-bit, stereo\n");
256
257 sc->sc_dev = self;
258 sc->sc_open = 0;
259 if (auconv_create_encodings(pad_formats, PAD_NFORMATS,
260 &sc->sc_encodings) != 0) {
261 aprint_error_dev(self, "couldn't create encodings\n");
262 return;
263 }
264
265 cv_init(&sc->sc_condvar, device_xname(self));
266 mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
267 mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_NONE);
268
269 sc->sc_swvol = 255;
270 sc->sc_buflen = 0;
271 sc->sc_rpos = sc->sc_wpos = 0;
272 sc->sc_audiodev = (void *)audio_attach_mi(&pad_hw_if, sc, sc->sc_dev);
273
274 if (!pmf_device_register(self, NULL, NULL))
275 aprint_error_dev(self, "couldn't establish power handler\n");
276
277 return;
278 }
279
280 static int
281 pad_detach(device_t self, int flags)
282 {
283 pad_softc_t *sc = device_private(self);
284 int cmaj, mn, rc;
285
286 cmaj = cdevsw_lookup_major(&pad_cdevsw);
287 mn = device_unit(self);
288 vdevgone(cmaj, mn, mn, VCHR);
289
290 if ((rc = config_detach_children(self, flags)) != 0)
291 return rc;
292
293 pmf_device_deregister(self);
294
295 mutex_destroy(&sc->sc_lock);
296 mutex_destroy(&sc->sc_intr_lock);
297 cv_destroy(&sc->sc_condvar);
298
299 auconv_delete_encodings(sc->sc_encodings);
300
301 return 0;
302 }
303
304 int
305 pad_open(dev_t dev, int flags, int fmt, struct lwp *l)
306 {
307 pad_softc_t *sc;
308
309 sc = device_lookup_private(&pad_cd, PADUNIT(dev));
310 if (sc == NULL)
311 return ENODEV;
312
313 if (atomic_swap_uint(&sc->sc_open, 1) != 0) {
314 return EBUSY;
315 }
316
317 return 0;
318 }
319
320 int
321 pad_close(dev_t dev, int flags, int fmt, struct lwp *l)
322 {
323 pad_softc_t *sc;
324
325 sc = device_lookup_private(&pad_cd, PADUNIT(dev));
326 if (sc == NULL)
327 return ENODEV;
328
329 KASSERT(sc->sc_open > 0);
330 sc->sc_open = 0;
331
332 return 0;
333 }
334
335 int
336 pad_read(dev_t dev, struct uio *uio, int flags)
337 {
338 pad_softc_t *sc;
339 pad_block_t pb;
340 void (*intr)(void *);
341 void *intrarg;
342 int err;
343
344 sc = device_lookup_private(&pad_cd, PADUNIT(dev));
345 if (sc == NULL)
346 return ENODEV;
347
348 err = 0;
349
350 mutex_enter(&sc->sc_lock);
351 intr = sc->sc_intr;
352 intrarg = sc->sc_intrarg;
353 while (uio->uio_resid > 0 && !err) {
354 err = pad_get_block(sc, &pb, min(uio->uio_resid, PAD_BLKSIZE));
355 if (!err) {
356 mutex_exit(&sc->sc_lock);
357 err = uiomove(pb.pb_ptr, pb.pb_len, uio);
358 mutex_enter(&sc->sc_lock);
359 continue;
360 }
361 if (intr) {
362 mutex_enter(&sc->sc_intr_lock);
363 (*intr)(intrarg);
364 mutex_exit(&sc->sc_intr_lock);
365 intr = sc->sc_intr;
366 intrarg = sc->sc_intrarg;
367 err = 0;
368 continue;
369 }
370 err = cv_wait_sig(&sc->sc_condvar, &sc->sc_lock);
371 if (err != 0) {
372 mutex_exit(&sc->sc_lock);
373 return err;
374 }
375 intr = sc->sc_intr;
376 intrarg = sc->sc_intrarg;
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;
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;
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;
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 pad_softc_t *sc;
504
505 sc = (pad_softc_t *)opaque;
506
507 KASSERT(mutex_owned(&sc->sc_lock));
508
509 *ret = pad_device;
510
511 return 0;
512 }
513
514 static int
515 pad_set_port(void *opaque, mixer_ctrl_t *mc)
516 {
517 pad_softc_t *sc;
518
519 sc = (pad_softc_t *)opaque;
520
521 KASSERT(mutex_owned(&sc->sc_lock));
522
523 switch (mc->dev) {
524 case PAD_OUTPUT_MASTER_VOLUME:
525 case PAD_INPUT_DAC_VOLUME:
526 sc->sc_swvol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO];
527 return 0;
528 }
529
530 return ENXIO;
531 }
532
533 static int
534 pad_get_port(void *opaque, mixer_ctrl_t *mc)
535 {
536 pad_softc_t *sc;
537
538 sc = (pad_softc_t *)opaque;
539
540 KASSERT(mutex_owned(&sc->sc_lock));
541
542 switch (mc->dev) {
543 case PAD_OUTPUT_MASTER_VOLUME:
544 case PAD_INPUT_DAC_VOLUME:
545 mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_swvol;
546 return 0;
547 }
548
549 return ENXIO;
550 }
551
552 static int
553 pad_query_devinfo(void *opaque, mixer_devinfo_t *di)
554 {
555 pad_softc_t *sc;
556
557 sc = (pad_softc_t *)opaque;
558
559 KASSERT(mutex_owned(&sc->sc_lock));
560
561 switch (di->index) {
562 case PAD_OUTPUT_CLASS:
563 di->mixer_class = PAD_OUTPUT_CLASS;
564 strcpy(di->label.name, AudioCoutputs);
565 di->type = AUDIO_MIXER_CLASS;
566 di->next = di->prev = AUDIO_MIXER_LAST;
567 return 0;
568 case PAD_INPUT_CLASS:
569 di->mixer_class = PAD_INPUT_CLASS;
570 strcpy(di->label.name, AudioCinputs);
571 di->type = AUDIO_MIXER_CLASS;
572 di->next = di->prev = AUDIO_MIXER_LAST;
573 return 0;
574 case PAD_OUTPUT_MASTER_VOLUME:
575 di->mixer_class = PAD_OUTPUT_CLASS;
576 strcpy(di->label.name, AudioNmaster);
577 di->type = AUDIO_MIXER_VALUE;
578 di->next = di->prev = AUDIO_MIXER_LAST;
579 di->un.v.num_channels = 1;
580 strcpy(di->un.v.units.name, AudioNvolume);
581 return 0;
582 case PAD_INPUT_DAC_VOLUME:
583 di->mixer_class = PAD_INPUT_CLASS;
584 strcpy(di->label.name, AudioNdac);
585 di->type = AUDIO_MIXER_VALUE;
586 di->next = di->prev = AUDIO_MIXER_LAST;
587 di->un.v.num_channels = 1;
588 strcpy(di->un.v.units.name, AudioNvolume);
589 return 0;
590 }
591
592 return ENXIO;
593 }
594
595 static int
596 pad_get_props(void *opaque)
597 {
598 pad_softc_t *sc;
599
600 sc = (pad_softc_t *)opaque;
601
602 KASSERT(mutex_owned(&sc->sc_lock));
603
604 return 0;
605 }
606
607 static int
608 pad_round_blocksize(void *opaque, int blksize, int mode,
609 const audio_params_t *p)
610 {
611 pad_softc_t *sc;
612
613 sc = (pad_softc_t *)opaque;
614
615 KASSERT(mutex_owned(&sc->sc_lock));
616
617 return PAD_BLKSIZE;
618 }
619
620 static void
621 pad_get_locks(void *opaque, kmutex_t **intr, kmutex_t **thread)
622 {
623 struct pad_softc *sc;
624
625 sc = (pad_softc_t *)opaque;
626
627 *intr = &sc->sc_intr_lock;
628 *thread = &sc->sc_lock;
629 }
630