pad.c revision 1.4 1 /* $NetBSD: pad.c,v 1.4 2007/12/09 20:28:04 jmcneill 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 * 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.4 2007/12/09 20:28:04 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, "outputs: 44100Hz, 16-bit, stereo\n");
258
259 sc->sc_open = 0;
260 if (auconv_create_encodings(pad_formats, PAD_NFORMATS,
261 &sc->sc_encodings) != 0) {
262 aprint_error_dev(self, "couldn't create encodings\n");
263 return;
264 }
265
266 cv_init(&sc->sc_condvar, device_xname(self));
267 mutex_init(&sc->sc_mutex, MUTEX_DEFAULT, IPL_SCHED);
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 int
281 pad_open(dev_t dev, int flags, int fmt, struct lwp *l)
282 {
283 pad_softc_t *sc;
284
285 sc = pad_find_softc(dev);
286 if (sc == NULL)
287 return ENODEV;
288
289 if (sc->sc_open++) {
290 sc->sc_open--;
291 return EBUSY;
292 }
293
294 return 0;
295 }
296
297 int
298 pad_close(dev_t dev, int flags, int fmt, struct lwp *l)
299 {
300 pad_softc_t *sc;
301
302 sc = pad_find_softc(dev);
303 if (sc == NULL)
304 return ENODEV;
305
306 KASSERT(sc->sc_open > 0);
307 sc->sc_open--;
308
309 return 0;
310 }
311
312 int
313 pad_read(dev_t dev, struct uio *uio, int flags)
314 {
315 pad_softc_t *sc;
316 pad_block_t pb;
317 void (*intr)(void *);
318 void *intrarg;
319 int err;
320
321 sc = pad_find_softc(dev);
322 if (sc == NULL)
323 return ENODEV;
324
325 err = 0;
326
327 intr = sc->sc_intr;
328 intrarg = sc->sc_intrarg;
329
330 while (uio->uio_resid > 0 && !err) {
331 err = pad_get_block(sc, &pb, min(uio->uio_resid, PAD_BLKSIZE));
332 if (!err)
333 err = uiomove(pb.pb_ptr, pb.pb_len, uio);
334 else {
335 if (intr) {
336 (*intr)(intrarg);
337 intr = sc->sc_intr;
338 intrarg = sc->sc_intrarg;
339 err = 0;
340 continue;
341 }
342
343 mutex_enter(&sc->sc_mutex);
344 err = cv_timedwait_sig(&sc->sc_condvar, &sc->sc_mutex,
345 hz/100);
346 if (err != 0 && err != EWOULDBLOCK) {
347 mutex_exit(&sc->sc_mutex);
348 aprint_error_dev(&sc->sc_dev,
349 "cv_timedwait_sig returned %d\n", err);
350 return EINTR;
351 }
352 intr = sc->sc_intr;
353 intrarg = sc->sc_intrarg;
354 mutex_exit(&sc->sc_mutex);
355 err = 0;
356 }
357 }
358
359 if (intr)
360 (*intr)(intrarg);
361
362 return err;
363 }
364
365 static int
366 pad_query_encoding(void *opaque, struct audio_encoding *ae)
367 {
368 pad_softc_t *sc;
369
370 sc = (pad_softc_t *)opaque;
371
372 return auconv_query_encoding(sc->sc_encodings, ae);
373 }
374
375 static int
376 pad_set_params(void *opaque, int setmode, int usemode,
377 audio_params_t *play, audio_params_t *rec,
378 stream_filter_list_t *pfil, stream_filter_list_t *rfil)
379 {
380 pad_softc_t *sc;
381
382 sc = (pad_softc_t *)opaque;
383
384 if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_PLAY,
385 play, true, pfil) < 0)
386 return EINVAL;
387 if (auconv_set_converter(pad_formats, PAD_NFORMATS, AUMODE_RECORD,
388 rec, true, rfil) < 0)
389 return EINVAL;
390
391 if (pfil->req_size > 0)
392 play = &pfil->filters[0].param;
393 switch (play->encoding) {
394 case AUDIO_ENCODING_SLINEAR_LE:
395 if (play->precision == 16 && play->validbits == 16)
396 pfil->prepend(pfil, pad_vol_slinear16_le, play);
397 break;
398 case AUDIO_ENCODING_SLINEAR_BE:
399 if (play->precision == 16 && play->validbits == 16)
400 pfil->prepend(pfil, pad_vol_slinear16_be, play);
401 break;
402 default:
403 break;
404 }
405
406 return 0;
407 }
408
409 static int
410 pad_start_output(void *opaque, void *block, int blksize,
411 void (*intr)(void *), void *intrarg)
412 {
413 pad_softc_t *sc;
414 int err;
415
416 sc = (pad_softc_t *)opaque;
417
418 mutex_enter(&sc->sc_mutex);
419
420 sc->sc_intr = intr;
421 sc->sc_intrarg = intrarg;
422 sc->sc_blksize = blksize;
423
424 err = pad_add_block(sc, block, blksize);
425
426 cv_signal(&sc->sc_condvar);
427
428 mutex_exit(&sc->sc_mutex);
429
430 return err;
431 }
432
433 static int
434 pad_start_input(void *opaque, void *block, int blksize,
435 void (*intr)(void *), void *intrarg)
436 {
437 return EINVAL;
438 }
439
440 static int
441 pad_halt_output(void *opaque)
442 {
443 pad_softc_t *sc;
444
445 sc = (pad_softc_t *)opaque;
446 sc->sc_intr = NULL;
447 sc->sc_intrarg = NULL;
448 sc->sc_buflen = 0;
449 sc->sc_rpos = sc->sc_wpos = 0;
450
451 return 0;
452 }
453
454 static int
455 pad_halt_input(void *opaque)
456 {
457 return 0;
458 }
459
460 static int
461 pad_getdev(void *opaque, struct audio_device *ret)
462 {
463
464 *ret = pad_device;
465
466 return 0;
467 }
468
469 static int
470 pad_set_port(void *opaque, mixer_ctrl_t *mc)
471 {
472 pad_softc_t *sc;
473
474 sc = (pad_softc_t *)opaque;
475
476 switch (mc->dev) {
477 case PAD_OUTPUT_MASTER_VOLUME:
478 case PAD_INPUT_DAC_VOLUME:
479 sc->sc_swvol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO];
480 return 0;
481 }
482
483 return ENXIO;
484 }
485
486 static int
487 pad_get_port(void *opaque, mixer_ctrl_t *mc)
488 {
489 pad_softc_t *sc;
490
491 sc = (pad_softc_t *)opaque;
492
493 switch (mc->dev) {
494 case PAD_OUTPUT_MASTER_VOLUME:
495 case PAD_INPUT_DAC_VOLUME:
496 mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_swvol;
497 return 0;
498 }
499
500 return ENXIO;
501 }
502
503 static int
504 pad_query_devinfo(void *opaque, mixer_devinfo_t *di)
505 {
506 pad_softc_t *sc;
507
508 sc = (pad_softc_t *)opaque;
509
510 switch (di->index) {
511 case PAD_OUTPUT_CLASS:
512 di->mixer_class = PAD_OUTPUT_CLASS;
513 strcpy(di->label.name, AudioCoutputs);
514 di->type = AUDIO_MIXER_CLASS;
515 di->next = di->prev = AUDIO_MIXER_LAST;
516 return 0;
517 case PAD_INPUT_CLASS:
518 di->mixer_class = PAD_INPUT_CLASS;
519 strcpy(di->label.name, AudioCinputs);
520 di->type = AUDIO_MIXER_CLASS;
521 di->next = di->prev = AUDIO_MIXER_LAST;
522 return 0;
523 case PAD_OUTPUT_MASTER_VOLUME:
524 di->mixer_class = PAD_OUTPUT_CLASS;
525 strcpy(di->label.name, AudioNmaster);
526 di->type = AUDIO_MIXER_VALUE;
527 di->next = di->prev = AUDIO_MIXER_LAST;
528 di->un.v.num_channels = 1;
529 strcpy(di->un.v.units.name, AudioNvolume);
530 return 0;
531 case PAD_INPUT_DAC_VOLUME:
532 di->mixer_class = PAD_INPUT_CLASS;
533 strcpy(di->label.name, AudioNdac);
534 di->type = AUDIO_MIXER_VALUE;
535 di->next = di->prev = AUDIO_MIXER_LAST;
536 di->un.v.num_channels = 1;
537 strcpy(di->un.v.units.name, AudioNvolume);
538 return 0;
539 }
540
541 return ENXIO;
542 }
543
544 static int
545 pad_get_props(void *opaque)
546 {
547 return 0;
548 }
549
550 static int
551 pad_round_blocksize(void *opaque, int blksize, int mode,
552 const audio_params_t *p)
553 {
554 return PAD_BLKSIZE;
555 }
556