xref: /netbsd-src/sys/dev/pad/pad.c (revision d42b5bde34fd80fed26e8cd70189ad5bb8ce33b3)
1 /* $NetBSD: pad.c,v 1.85 2023/05/27 14:51:47 nat 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  *
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.85 2023/05/27 14:51:47 nat Exp $");
31 
32 #include <sys/param.h>
33 #include <sys/types.h>
34 
35 #include <sys/audioio.h>
36 #include <sys/buf.h>
37 #include <sys/condvar.h>
38 #include <sys/conf.h>
39 #include <sys/device.h>
40 #include <sys/file.h>
41 #include <sys/filedesc.h>
42 #include <sys/kauth.h>
43 #include <sys/kernel.h>
44 #include <sys/kmem.h>
45 #include <sys/module.h>
46 #include <sys/poll.h>
47 #include <sys/proc.h>
48 #include <sys/select.h>
49 #include <sys/stat.h>
50 #include <sys/vnode.h>
51 
52 #include <dev/audio/audio_if.h>
53 #include <dev/audio/audiovar.h>
54 
55 #include <dev/pad/padvar.h>
56 
57 #include "ioconf.h"
58 
59 /* #define PAD_DEBUG */
60 #ifdef PAD_DEBUG
61 #define DPRINTF(fmt...)	printf(fmt)
62 #else
63 #define DPRINTF(fmt...) /**/
64 #endif
65 
66 #define PADFREQ		44100
67 #define PADCHAN		2
68 #define PADPREC		16
69 
70 typedef struct pad_block {
71 	uint8_t		*pb_ptr;
72 	int		pb_len;
73 } pad_block_t;
74 
75 enum {
76 	PAD_OUTPUT_CLASS,
77 	PAD_INPUT_CLASS,
78 	PAD_OUTPUT_MASTER_VOLUME,
79 	PAD_INPUT_DAC_VOLUME,
80 	PAD_ENUM_LAST,
81 };
82 
83 static int	pad_match(device_t, cfdata_t, void *);
84 static void	pad_attach(device_t, device_t, void *);
85 static int	pad_detach(device_t, int);
86 static void	pad_childdet(device_t, device_t);
87 
88 static int	pad_query_format(void *, audio_format_query_t *);
89 static int	pad_set_format(void *, int,
90 		    const audio_params_t *, const audio_params_t *,
91 		    audio_filter_reg_t *, audio_filter_reg_t *);
92 static int	pad_start_output(void *, void *, int,
93 		    void (*)(void *), void *);
94 static int	pad_halt_output(void *);
95 static int	pad_getdev(void *, struct audio_device *);
96 static int	pad_set_port(void *, mixer_ctrl_t *);
97 static int	pad_get_port(void *, mixer_ctrl_t *);
98 static int	pad_query_devinfo(void *, mixer_devinfo_t *);
99 static int	pad_get_props(void *);
100 static void	pad_get_locks(void *, kmutex_t **, kmutex_t **);
101 
102 static void	pad_done_output(void *);
103 static void	pad_swvol_codec(audio_filter_arg_t *);
104 
105 static void	pad_close(struct pad_softc *);
106 static int	pad_read(struct pad_softc *, off_t *, struct uio *,
107 		    kauth_cred_t, int);
108 
109 static int	fops_pad_close(struct file *);
110 static int	fops_pad_read(struct file *, off_t *, struct uio *,
111 		    kauth_cred_t, int);
112 static int	fops_pad_write(struct file *, off_t *, struct uio *,
113 		    kauth_cred_t, int);
114 static int	fops_pad_ioctl(struct file *, u_long, void *);
115 static int	fops_pad_kqfilter(struct file *, struct knote *);
116 static int	fops_pad_poll(struct file *, int);
117 static int	fops_pad_stat(struct file *, struct stat *);
118 static int	fops_pad_mmap(struct file *, off_t *, size_t, int, int *, int *,
119 		    struct uvm_object **, int *);
120 
121 static const struct audio_hw_if pad_hw_if = {
122 	.query_format	= pad_query_format,
123 	.set_format	= pad_set_format,
124 	.start_output	= pad_start_output,
125 	.halt_output	= pad_halt_output,
126 	.getdev		= pad_getdev,
127 	.set_port	= pad_set_port,
128 	.get_port	= pad_get_port,
129 	.query_devinfo	= pad_query_devinfo,
130 	.get_props	= pad_get_props,
131 	.get_locks	= pad_get_locks,
132 };
133 
134 #define PAD_NFORMATS	1
135 static const struct audio_format pad_formats[PAD_NFORMATS] = {
136 	{
137 		.mode		= AUMODE_PLAY,
138 		.encoding	= AUDIO_ENCODING_SLINEAR_LE,
139 		.validbits	= PADPREC,
140 		.precision	= PADPREC,
141 		.channels	= PADCHAN,
142 		.channel_mask	= AUFMT_STEREO,
143 		.frequency_type	= 1,
144 		.frequency	= { PADFREQ },
145 	},
146 };
147 
148 extern void	padattach(int);
149 
150 static int	pad_add_block(struct pad_softc *, uint8_t *, int);
151 static int	pad_get_block(struct pad_softc *, pad_block_t *, int, int);
152 
153 static dev_type_open(pad_open);
154 
155 const struct cdevsw pad_cdevsw = {
156 	.d_open		= pad_open,
157 	.d_close	= noclose,
158 	.d_read		= noread,
159 	.d_write	= nowrite,
160 	.d_ioctl	= noioctl,
161 	.d_stop		= nostop,
162 	.d_tty		= notty,
163 	.d_poll		= nopoll,
164 	.d_mmap		= nommap,
165 	.d_kqfilter	= nokqfilter,
166 	.d_discard	= nodiscard,
167 	.d_flag		= D_OTHER | D_MPSAFE,
168 };
169 
170 const struct fileops pad_fileops = {
171 	.fo_name	= "pad",
172 	.fo_read	= fops_pad_read,
173 	.fo_write	= fops_pad_write,
174 	.fo_ioctl	= fops_pad_ioctl,
175 	.fo_fcntl	= fnullop_fcntl,
176 	.fo_stat	= fops_pad_stat,
177 	.fo_poll	= fops_pad_poll,
178 	.fo_close	= fops_pad_close,
179 	.fo_mmap	= fops_pad_mmap,
180 	.fo_kqfilter	= fops_pad_kqfilter,
181 	.fo_restart	= fnullop_restart
182 };
183 
184 CFATTACH_DECL2_NEW(pad, sizeof(struct pad_softc),
185     pad_match, pad_attach, pad_detach,
186     NULL, NULL, pad_childdet);
187 
188 void
padattach(int n)189 padattach(int n)
190 {
191 	int error;
192 
193 	error = config_cfattach_attach(pad_cd.cd_name, &pad_ca);
194 	if (error) {
195 		aprint_error("%s: couldn't register cfattach: %d\n",
196 		    pad_cd.cd_name, error);
197 		config_cfdriver_detach(&pad_cd);
198 		return;
199 	}
200 }
201 
202 static int
pad_match(device_t parent,cfdata_t data,void * opaque)203 pad_match(device_t parent, cfdata_t data, void *opaque)
204 {
205 
206 	return 1;
207 }
208 
209 static void
pad_attach(device_t parent,device_t self,void * opaque)210 pad_attach(device_t parent, device_t self, void *opaque)
211 {
212 	struct pad_softc *sc = device_private(self);
213 
214 	KASSERT(KERNEL_LOCKED_P());
215 
216 	aprint_normal_dev(self, "outputs: 44100Hz, 16-bit, stereo\n");
217 
218 	sc->sc_dev = self;
219 
220 	cv_init(&sc->sc_condvar, device_xname(sc->sc_dev));
221 	mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
222 	mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_SOFTCLOCK);
223 	callout_init(&sc->sc_pcallout, CALLOUT_MPSAFE);
224 	callout_setfunc(&sc->sc_pcallout, pad_done_output, sc);
225 
226 	sc->sc_swvol = 255;
227 	sc->sc_buflen = 0;
228 	sc->sc_rpos = sc->sc_wpos = 0;
229 	sc->sc_audiodev = audio_attach_mi(&pad_hw_if, sc, sc->sc_dev);
230 
231 	if (!pmf_device_register(sc->sc_dev, NULL, NULL))
232 		aprint_error_dev(sc->sc_dev,
233 		    "couldn't establish power handler\n");
234 
235 	sc->sc_open = 1;
236 }
237 
238 static int
pad_detach(device_t self,int flags)239 pad_detach(device_t self, int flags)
240 {
241 	struct pad_softc *sc = device_private(self);
242 	int cmaj, mn;
243 	int error;
244 
245 	KASSERT(KERNEL_LOCKED_P());
246 
247 	/* Prevent detach without going through close -- e.g., drvctl.  */
248 	if (sc->sc_open)
249 		return EBUSY;
250 
251 	error = config_detach_children(self, flags);
252 	if (error)
253 		return error;
254 
255 	cmaj = cdevsw_lookup_major(&pad_cdevsw);
256 	mn = device_unit(sc->sc_dev);
257 	vdevgone(cmaj, mn, mn, VCHR);
258 
259 	pmf_device_deregister(sc->sc_dev);
260 
261 	callout_destroy(&sc->sc_pcallout);
262 	mutex_destroy(&sc->sc_lock);
263 	mutex_destroy(&sc->sc_intr_lock);
264 	cv_destroy(&sc->sc_condvar);
265 
266 	return 0;
267 }
268 
269 static void
pad_childdet(device_t self,device_t child)270 pad_childdet(device_t self, device_t child)
271 {
272 	struct pad_softc *sc = device_private(self);
273 
274 	KASSERT(KERNEL_LOCKED_P());
275 
276 	if (child == sc->sc_audiodev)
277 		sc->sc_audiodev = NULL;
278 }
279 
280 static int
pad_add_block(struct pad_softc * sc,uint8_t * blk,int blksize)281 pad_add_block(struct pad_softc *sc, uint8_t *blk, int blksize)
282 {
283 	int foff, flen, tlen;
284 
285 	KASSERT(blksize >= 0);
286 	KASSERT(mutex_owned(&sc->sc_intr_lock));
287 
288 	if (blksize > PAD_BUFSIZE ||
289 	    sc->sc_buflen > PAD_BUFSIZE - (unsigned)blksize)
290 		return ENOBUFS;
291 
292 	foff = sc->sc_wpos;
293 	if (sc->sc_wpos + blksize <= PAD_BUFSIZE) {
294 		flen = blksize;
295 		tlen = 0;
296 	} else {
297 		flen = PAD_BUFSIZE - sc->sc_wpos;
298 		tlen = blksize - flen;
299 	}
300 
301 	sc->sc_wpos = foff + blksize;
302 	if (sc->sc_wpos >= PAD_BUFSIZE)
303 		sc->sc_wpos -= PAD_BUFSIZE;
304 
305 	/*
306 	 * release interrupt lock for bulk copy to audio buffer
307 	 */
308 	mutex_exit(&sc->sc_intr_lock);
309 	memcpy(sc->sc_audiobuf + foff, blk, flen);
310 	memcpy(sc->sc_audiobuf, blk + flen, tlen);
311 	mutex_enter(&sc->sc_intr_lock);
312 
313 	sc->sc_buflen += blksize;
314 	cv_broadcast(&sc->sc_condvar);
315 
316 	return 0;
317 }
318 
319 static int
pad_get_block(struct pad_softc * sc,pad_block_t * pb,int maxblksize,int dowait)320 pad_get_block(struct pad_softc *sc, pad_block_t *pb, int maxblksize, int dowait)
321 {
322 	int l, blksize, error;
323 
324 	KASSERT(maxblksize > 0);
325 	KASSERT(mutex_owned(&sc->sc_intr_lock));
326 
327 	if (sc->sc_buflen == 0 && !dowait)
328 		return EAGAIN;
329 
330 	while (sc->sc_buflen == 0) {
331 		DPRINTF("%s: wait\n", __func__);
332 		error = cv_wait_sig(&sc->sc_condvar, &sc->sc_intr_lock);
333 		DPRINTF("%s: wake up %d\n", __func__, err);
334 		if (error)
335 			return error;
336 	}
337 	blksize = uimin(maxblksize, sc->sc_buflen);
338 
339 	pb->pb_ptr = (sc->sc_audiobuf + sc->sc_rpos);
340 	if (sc->sc_rpos + blksize < PAD_BUFSIZE) {
341 		pb->pb_len = blksize;
342 		sc->sc_rpos += blksize;
343 	} else {
344 		l = PAD_BUFSIZE - sc->sc_rpos;
345 		pb->pb_len = l;
346 		sc->sc_rpos = 0;
347 	}
348 	sc->sc_buflen -= pb->pb_len;
349 
350 	return 0;
351 }
352 
353 static int
pad_open(dev_t dev,int flags,int fmt,struct lwp * l)354 pad_open(dev_t dev, int flags, int fmt, struct lwp *l)
355 {
356 	struct file *fp = NULL;
357 	device_t self;
358 	struct pad_softc *sc = NULL;
359 	cfdata_t cf = NULL;
360 	int error, fd;
361 
362 	error = fd_allocfile(&fp, &fd);
363 	if (error)
364 		goto out;
365 
366 	cf = kmem_alloc(sizeof(*cf), KM_SLEEP);
367 	cf->cf_name = pad_cd.cd_name;
368 	cf->cf_atname = pad_cd.cd_name;
369 	cf->cf_unit = 0;
370 	cf->cf_fstate = FSTATE_STAR;
371 
372 	self = config_attach_pseudo(cf);
373 	if (self == NULL) {
374 		error = ENXIO;
375 		goto out;
376 	}
377 	sc = device_private(self);
378 	KASSERT(sc->sc_dev == self);
379 	cf = NULL;
380 
381 	error = fd_clone(fp, fd, flags, &pad_fileops, sc);
382 	KASSERT(error == EMOVEFD);
383 	fp = NULL;
384 	sc = NULL;
385 
386 out:	if (sc)
387 		pad_close(sc);
388 	if (cf)
389 		kmem_free(cf, sizeof(*cf));
390 	if (fp)
391 		fd_abort(curproc, fp, fd);
392 	return error;
393 }
394 
395 static void
pad_close(struct pad_softc * sc)396 pad_close(struct pad_softc *sc)
397 {
398 	device_t self = sc->sc_dev;
399 	cfdata_t cf = device_cfdata(self);
400 
401 	/*
402 	 * XXX This is not quite enough to prevent racing with drvctl
403 	 * detach.  What can happen:
404 	 *
405 	 *	cpu0				cpu1
406 	 *
407 	 *	pad_close
408 	 *	take kernel lock
409 	 *	sc->sc_open = 0
410 	 *	drop kernel lock
411 	 *	wait for config_misc_lock
412 	 *					drvctl detach
413 	 *					take kernel lock
414 	 *					drop kernel lock
415 	 *					wait for config_misc_lock
416 	 *					retake kernel lock
417 	 *					drop config_misc_lock
418 	 *	take config_misc_lock
419 	 *	wait for kernel lock
420 	 *					pad_detach (sc_open=0 already)
421 	 *					free device
422 	 *					drop kernel lock
423 	 *	use device after free
424 	 *
425 	 * We need a way to grab a reference to the device so it won't
426 	 * be freed until we're done -- it's OK if we config_detach
427 	 * twice as long as it's idempotent, but not OK if the first
428 	 * config_detach frees the struct device before the second one
429 	 * has finished handling it.
430 	 */
431 	KERNEL_LOCK(1, NULL);
432 	KASSERT(sc->sc_open);
433 	sc->sc_open = 0;
434 	(void)config_detach(self, DETACH_FORCE);
435 	KERNEL_UNLOCK_ONE(NULL);
436 
437 	kmem_free(cf, sizeof(*cf));
438 }
439 
440 static int
fops_pad_close(struct file * fp)441 fops_pad_close(struct file *fp)
442 {
443 	struct pad_softc *sc = fp->f_pad;
444 
445 	pad_close(sc);
446 
447 	return 0;
448 }
449 
450 static int
fops_pad_poll(struct file * fp,int events)451 fops_pad_poll(struct file *fp, int events)
452 {
453 
454 	return POLLERR;
455 }
456 
457 static int
fops_pad_kqfilter(struct file * fp,struct knote * kn)458 fops_pad_kqfilter(struct file *fp, struct knote *kn)
459 {
460 	struct pad_softc *sc = fp->f_pad;
461 	dev_t dev;
462 
463 	dev = makedev(cdevsw_lookup_major(&pad_cdevsw),
464 	    device_unit(sc->sc_dev));
465 
466 	return seltrue_kqfilter(dev, kn);
467 }
468 
469 static int
fops_pad_ioctl(struct file * fp,u_long cmd,void * data)470 fops_pad_ioctl(struct file *fp, u_long cmd, void *data)
471 {
472 
473 	return ENODEV;
474 }
475 
476 static int
fops_pad_stat(struct file * fp,struct stat * st)477 fops_pad_stat(struct file *fp, struct stat *st)
478 {
479 	struct pad_softc *sc = fp->f_pad;
480 
481 	memset(st, 0, sizeof(*st));
482 
483 	st->st_dev = makedev(cdevsw_lookup_major(&pad_cdevsw),
484 	    device_unit(sc->sc_dev));
485 
486 	st->st_uid = kauth_cred_geteuid(fp->f_cred);
487 	st->st_gid = kauth_cred_getegid(fp->f_cred);
488 	st->st_mode = S_IFCHR;
489 
490 	return 0;
491 }
492 
493 static int
fops_pad_mmap(struct file * fp,off_t * offp,size_t len,int prot,int * flagsp,int * advicep,struct uvm_object ** uobjp,int * maxprotp)494 fops_pad_mmap(struct file *fp, off_t *offp, size_t len, int prot, int *flagsp,
495     int *advicep, struct uvm_object **uobjp, int *maxprotp)
496 {
497 
498 	return 1;
499 }
500 
501 static int
fops_pad_read(struct file * fp,off_t * offp,struct uio * uio,kauth_cred_t cred,int ioflag)502 fops_pad_read(struct file *fp, off_t *offp, struct uio *uio, kauth_cred_t cred,
503     int ioflag)
504 {
505 	struct pad_softc *sc = fp->f_pad;
506 
507 	return pad_read(sc, offp, uio, cred, ioflag);
508 }
509 
510 static int
pad_read(struct pad_softc * sc,off_t * offp,struct uio * uio,kauth_cred_t cred,int ioflag)511 pad_read(struct pad_softc *sc, off_t *offp, struct uio *uio, kauth_cred_t cred,
512     int ioflag)
513 {
514 	pad_block_t pb;
515 	int err, first;
516 
517 	err = 0;
518 	first = 1;
519 	DPRINTF("%s: resid=%zu\n", __func__, uio->uio_resid);
520 	while (uio->uio_resid > 0) {
521 		mutex_enter(&sc->sc_intr_lock);
522 		err = pad_get_block(sc, &pb, MIN(uio->uio_resid, INT_MAX), first);
523 		mutex_exit(&sc->sc_intr_lock);
524 		first = 0;
525 		if (err == EAGAIN) {
526 			err = 0;
527 			break;
528 		}
529 		if (err)
530 			break;
531 
532 		DPRINTF("%s: move %d\n", __func__, pb.pb_len);
533 		err = uiomove(pb.pb_ptr, pb.pb_len, uio);
534 		if (err)
535 			break;
536 	}
537 
538 	return err;
539 }
540 
541 static int
fops_pad_write(struct file * fp,off_t * offp,struct uio * uio,kauth_cred_t cred,int ioflag)542 fops_pad_write(struct file *fp, off_t *offp, struct uio *uio, kauth_cred_t cred,
543     int ioflag)
544 {
545 
546 	return EOPNOTSUPP;
547 }
548 
549 static int
pad_query_format(void * opaque,audio_format_query_t * afp)550 pad_query_format(void *opaque, audio_format_query_t *afp)
551 {
552 
553 	return audio_query_format(pad_formats, PAD_NFORMATS, afp);
554 }
555 
556 static int
pad_set_format(void * opaque,int setmode,const audio_params_t * play,const audio_params_t * rec,audio_filter_reg_t * pfil,audio_filter_reg_t * rfil)557 pad_set_format(void *opaque, int setmode,
558     const audio_params_t *play, const audio_params_t *rec,
559     audio_filter_reg_t *pfil, audio_filter_reg_t *rfil)
560 {
561 	struct pad_softc *sc = opaque;
562 
563 	KASSERT(mutex_owned(&sc->sc_lock));
564 
565 	/* XXX playback only */
566 	pfil->codec = pad_swvol_codec;
567 	pfil->context = sc;
568 
569 	return 0;
570 }
571 
572 static int
pad_start_output(void * opaque,void * block,int blksize,void (* intr)(void *),void * intrarg)573 pad_start_output(void *opaque, void *block, int blksize,
574     void (*intr)(void *), void *intrarg)
575 {
576 	struct pad_softc *sc = opaque;
577 	int err;
578 	u_int framesize;
579 	int ticks;
580 
581 	KASSERT(mutex_owned(&sc->sc_intr_lock));
582 
583 	sc->sc_intr = intr;
584 	sc->sc_intrarg = intrarg;
585 
586 	DPRINTF("%s: blksize=%d\n", __func__, blksize);
587 	err = pad_add_block(sc, block, blksize);
588 	if (err) {
589 		DPRINTF("%s: failed: %d\n", __func__, err);
590 		/* "Silently" drop overflows, but keep pace */
591 		err = 0;
592 	}
593 
594 	framesize = PADCHAN * (PADPREC / NBBY) * PADFREQ;
595 
596 	sc->sc_resid += blksize;
597 	ticks = mstohz(sc->sc_resid * 1000 / framesize);
598 	sc->sc_resid -= hztoms(ticks) * framesize / 1000;
599 
600 	DPRINTF("%s: callout ms=%d\n", __func__, ms);
601 	callout_schedule(&sc->sc_pcallout, ticks);
602 
603 	return err;
604 }
605 
606 static int
pad_halt_output(void * opaque)607 pad_halt_output(void *opaque)
608 {
609 	struct pad_softc *sc = opaque;
610 
611 	DPRINTF("%s\n", __func__);
612 	KASSERT(mutex_owned(&sc->sc_intr_lock));
613 
614 	callout_halt(&sc->sc_pcallout, &sc->sc_intr_lock);
615 
616 	sc->sc_intr = NULL;
617 	sc->sc_intrarg = NULL;
618 	sc->sc_buflen = 0;
619 	sc->sc_resid = 0;
620 	sc->sc_rpos = sc->sc_wpos = 0;
621 
622 	return 0;
623 }
624 
625 static void
pad_done_output(void * arg)626 pad_done_output(void *arg)
627 {
628 	struct pad_softc *sc = arg;
629 
630 	DPRINTF("%s\n", __func__);
631 
632 	mutex_enter(&sc->sc_intr_lock);
633 	(*sc->sc_intr)(sc->sc_intrarg);
634 	mutex_exit(&sc->sc_intr_lock);
635 }
636 
637 static int
pad_getdev(void * opaque,struct audio_device * ret)638 pad_getdev(void *opaque, struct audio_device *ret)
639 {
640 
641 	strlcpy(ret->name, "Virtual Audio", sizeof(ret->name));
642 	strlcpy(ret->version, osrelease, sizeof(ret->version));
643 	strlcpy(ret->config, "pad", sizeof(ret->config));
644 
645 	return 0;
646 }
647 
648 static int
pad_set_port(void * opaque,mixer_ctrl_t * mc)649 pad_set_port(void *opaque, mixer_ctrl_t *mc)
650 {
651 	struct pad_softc *sc = opaque;
652 
653 	KASSERT(mutex_owned(&sc->sc_lock));
654 
655 	switch (mc->dev) {
656 	case PAD_OUTPUT_MASTER_VOLUME:
657 	case PAD_INPUT_DAC_VOLUME:
658 		if (mc->un.value.num_channels != 1)
659 			return EINVAL;
660 		sc->sc_swvol = mc->un.value.level[AUDIO_MIXER_LEVEL_MONO];
661 		return 0;
662 	}
663 
664 	return ENXIO;
665 }
666 
667 static int
pad_get_port(void * opaque,mixer_ctrl_t * mc)668 pad_get_port(void *opaque, mixer_ctrl_t *mc)
669 {
670 	struct pad_softc *sc = opaque;
671 
672 	KASSERT(mutex_owned(&sc->sc_lock));
673 
674 	switch (mc->dev) {
675 	case PAD_OUTPUT_MASTER_VOLUME:
676 	case PAD_INPUT_DAC_VOLUME:
677 		if (mc->un.value.num_channels != 1)
678 			return EINVAL;
679 		mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_swvol;
680 		return 0;
681 	}
682 
683 	return ENXIO;
684 }
685 
686 static int
pad_query_devinfo(void * opaque,mixer_devinfo_t * di)687 pad_query_devinfo(void *opaque, mixer_devinfo_t *di)
688 {
689 	struct pad_softc *sc __diagused = opaque;
690 
691 	KASSERT(mutex_owned(&sc->sc_lock));
692 
693 	switch (di->index) {
694 	case PAD_OUTPUT_CLASS:
695 		di->mixer_class = PAD_OUTPUT_CLASS;
696 		strcpy(di->label.name, AudioCoutputs);
697 		di->type = AUDIO_MIXER_CLASS;
698 		di->next = di->prev = AUDIO_MIXER_LAST;
699 		return 0;
700 	case PAD_INPUT_CLASS:
701 		di->mixer_class = PAD_INPUT_CLASS;
702 		strcpy(di->label.name, AudioCinputs);
703 		di->type = AUDIO_MIXER_CLASS;
704 		di->next = di->prev = AUDIO_MIXER_LAST;
705 		return 0;
706 	case PAD_OUTPUT_MASTER_VOLUME:
707 		di->mixer_class = PAD_OUTPUT_CLASS;
708 		strcpy(di->label.name, AudioNmaster);
709 		di->type = AUDIO_MIXER_VALUE;
710 		di->next = di->prev = AUDIO_MIXER_LAST;
711 		di->un.v.num_channels = 1;
712 		strcpy(di->un.v.units.name, AudioNvolume);
713 		return 0;
714 	case PAD_INPUT_DAC_VOLUME:
715 		di->mixer_class = PAD_INPUT_CLASS;
716 		strcpy(di->label.name, AudioNdac);
717 		di->type = AUDIO_MIXER_VALUE;
718 		di->next = di->prev = AUDIO_MIXER_LAST;
719 		di->un.v.num_channels = 1;
720 		strcpy(di->un.v.units.name, AudioNvolume);
721 		return 0;
722 	}
723 
724 	return ENXIO;
725 }
726 
727 static int
pad_get_props(void * opaque)728 pad_get_props(void *opaque)
729 {
730 
731 	return AUDIO_PROP_PLAYBACK;
732 }
733 
734 static void
pad_get_locks(void * opaque,kmutex_t ** intr,kmutex_t ** thread)735 pad_get_locks(void *opaque, kmutex_t **intr, kmutex_t **thread)
736 {
737 	struct pad_softc *sc = opaque;
738 
739 	*intr = &sc->sc_intr_lock;
740 	*thread = &sc->sc_lock;
741 }
742 
743 static void
pad_swvol_codec(audio_filter_arg_t * arg)744 pad_swvol_codec(audio_filter_arg_t *arg)
745 {
746 	struct pad_softc *sc = arg->context;
747 	const uint8_t *src;
748 	uint8_t *dst;
749 	u_int sample_count;
750 	u_int i;
751 	u_int bits;
752 
753 	src = arg->src;
754 	dst = arg->dst;
755 	sample_count = arg->count * arg->srcfmt->channels;
756 	bits = arg->srcfmt->precision;
757 
758 	for (i = 0; i < sample_count; i++) {
759 		int64_t v;
760 
761 		switch (howmany(bits, NBBY)) {
762 		case 2: /* AUDIO_INTERNAL_BITS == 16 */
763 			v = *(const int16_t *)src;
764 			src += sizeof(int16_t);
765 			break;
766 		case 4: /* AUDIO_INTERNAL_BITS == 32 */
767 			v = *(const int32_t *)src;
768 			src += sizeof(int32_t);
769 			break;
770 		default:
771 			v = 0;
772 			break;
773 		}
774 
775 		v = v * sc->sc_swvol / 255;
776 
777 		if (PADPREC > bits)
778 			v = v << (PADPREC - bits);
779 		else if (PADPREC < bits)
780 			v = v >> (bits - PADPREC);
781 
782 		/* AUDIO_ENCODING_SLINEAR_LE */
783 #if PADPREC > 0
784 		*dst++ = v;
785 #endif
786 #if PADPREC > 8
787 		v >>= 8;
788 		*dst++ = v;
789 #endif
790 #if PADPREC > 16
791 		v >>= 8;
792 		*dst++ = v;
793 #endif
794 #if PADPREC > 24
795 		v >>= 8;
796 		*dst++ = v;
797 #endif
798 	}
799 }
800 
801 MODULE(MODULE_CLASS_DRIVER, pad, "audio");
802 
803 #ifdef _MODULE
804 
805 #include "ioconf.c"
806 
807 devmajor_t cmajor = NODEVMAJOR, bmajor = NODEVMAJOR;
808 
809 /*
810  * We need our own version of cfattach since config(1)'s ioconf does not
811  * generate what we need
812  */
813 
814 static struct cfattach *pad_cfattachinit[] = { &pad_ca, NULL };
815 
816 static struct cfattachinit pad_cfattach[] = {
817 	{ "pad", pad_cfattachinit },
818 	{ NULL, NULL }
819 };
820 #endif
821 
822 static int
pad_modcmd(modcmd_t cmd,void * arg)823 pad_modcmd(modcmd_t cmd, void *arg)
824 {
825 	int error = 0;
826 
827 	switch (cmd) {
828 	case MODULE_CMD_INIT:
829 #ifdef _MODULE
830 		error = devsw_attach(pad_cd.cd_name, NULL, &bmajor,
831 			    &pad_cdevsw, &cmajor);
832 		if (error)
833 			break;
834 
835 		pad_cfattach[1] = cfattach_ioconf_pad[0];
836 		error = config_init_component(cfdriver_ioconf_pad,
837 		    pad_cfattach, cfdata_ioconf_pad);
838 		if (error) {
839 			devsw_detach(NULL, &pad_cdevsw);
840 			break;
841 		}
842 #endif
843 		break;
844 
845 	case MODULE_CMD_FINI:
846 #ifdef _MODULE
847 		error = config_fini_component(cfdriver_ioconf_pad,
848 		    pad_cfattach, cfdata_ioconf_pad);
849 		if (error == 0)
850 			devsw_detach(NULL, &pad_cdevsw);
851 #endif
852 		break;
853 
854 	default:
855 		error = ENOTTY;
856 	}
857 
858 	return error;
859 }
860