xref: /netbsd-src/sys/compat/ossaudio/ossaudio.c (revision 7330f729ccf0bd976a06f95fad452fe774fc7fd1)
1 /*	$NetBSD: ossaudio.c,v 1.78 2019/11/03 11:13:46 isaki Exp $	*/
2 
3 /*-
4  * Copyright (c) 1997, 2008 The NetBSD Foundation, Inc.
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: ossaudio.c,v 1.78 2019/11/03 11:13:46 isaki Exp $");
31 
32 #include <sys/param.h>
33 #include <sys/proc.h>
34 #include <sys/systm.h>
35 #include <sys/file.h>
36 #include <sys/vnode.h>
37 #include <sys/filedesc.h>
38 #include <sys/ioctl.h>
39 #include <sys/mount.h>
40 #include <sys/kernel.h>
41 #include <sys/audioio.h>
42 #include <sys/midiio.h>
43 #include <sys/kauth.h>
44 #include <sys/syscallargs.h>
45 #include <sys/module.h>
46 
47 #include <compat/ossaudio/ossaudio.h>
48 #include <compat/ossaudio/ossaudiovar.h>
49 
50 MODULE(MODULE_CLASS_EXEC, compat_ossaudio, NULL);
51 
52 #ifdef AUDIO_DEBUG
53 #define DPRINTF(x) if (ossdebug) printf x
54 int ossdebug = 0;
55 #else
56 #define DPRINTF(x)
57 #endif
58 
59 #define TO_OSSVOL(x)	(((x) * 100 + 127) / 255)
60 #define FROM_OSSVOL(x)	((((x) > 100 ? 100 : (x)) * 255 + 50) / 100)
61 
62 #define GETPRINFO(info, name)	\
63 	(((info)->mode == AUMODE_RECORD) \
64 	    ? (info)->record.name : (info)->play.name)
65 
66 static struct audiodevinfo *getdevinfo(file_t *);
67 static int opaque_to_enum(struct audiodevinfo *di, audio_mixer_name_t *label, int opq);
68 static int enum_to_ord(struct audiodevinfo *di, int enm);
69 static int enum_to_mask(struct audiodevinfo *di, int enm);
70 
71 static void setblocksize(file_t *, struct audio_info *);
72 
73 #ifdef AUDIO_DEBUG
74 static const char *
75 compat_ossaudio_getcmd(u_long cmd)
76 {
77 	static char buf[64];
78 	switch (cmd) {
79 #define _DO(_a) \
80 	case _a: \
81 		return # _a;
82 _DO(OSS_SNDCTL_DSP_RESET)
83 _DO(OSS_SNDCTL_DSP_SYNC)
84 _DO(OSS_SNDCTL_DSP_SPEED)
85 _DO(OSS_SOUND_PCM_READ_RATE)
86 _DO(OSS_SNDCTL_DSP_STEREO)
87 _DO(OSS_SNDCTL_DSP_GETBLKSIZE)
88 _DO(OSS_SNDCTL_DSP_SETFMT)
89 _DO(OSS_SOUND_PCM_READ_BITS)
90 _DO(OSS_SNDCTL_DSP_CHANNELS)
91 _DO(OSS_SOUND_PCM_READ_CHANNELS)
92 _DO(OSS_SOUND_PCM_WRITE_FILTER)
93 _DO(OSS_SOUND_PCM_READ_FILTER)
94 _DO(OSS_SNDCTL_DSP_POST)
95 _DO(OSS_SNDCTL_DSP_SUBDIVIDE)
96 _DO(OSS_SNDCTL_DSP_SETFRAGMENT)
97 _DO(OSS_SNDCTL_DSP_GETFMTS)
98 _DO(OSS_SNDCTL_DSP_GETOSPACE)
99 _DO(OSS_SNDCTL_DSP_GETISPACE)
100 _DO(OSS_SNDCTL_DSP_NONBLOCK)
101 _DO(OSS_SNDCTL_DSP_GETCAPS)
102 _DO(OSS_SNDCTL_DSP_GETTRIGGER)
103 _DO(OSS_SNDCTL_DSP_SETTRIGGER)
104 _DO(OSS_SNDCTL_DSP_GETIPTR)
105 _DO(OSS_SNDCTL_DSP_GETOPTR)
106 _DO(OSS_SNDCTL_DSP_MAPINBUF)
107 _DO(OSS_SNDCTL_DSP_MAPOUTBUF)
108 _DO(OSS_SNDCTL_DSP_SETSYNCRO)
109 _DO(OSS_SNDCTL_DSP_SETDUPLEX)
110 _DO(OSS_SNDCTL_DSP_GETODELAY)
111 _DO(OSS_SNDCTL_DSP_PROFILE)
112 _DO(OSS_SOUND_MIXER_INFO)
113 _DO(OSS_SOUND_OLD_MIXER_INFO)
114 _DO(OSS_GET_VERSION)
115 _DO(OSS_SEQ_RESET)
116 _DO(OSS_SEQ_SYNC)
117 _DO(OSS_SYNTH_INFO)
118 _DO(OSS_SEQ_CTRLRATE)
119 _DO(OSS_SEQ_GETOUTCOUNT)
120 _DO(OSS_SEQ_GETINCOUNT)
121 _DO(OSS_SEQ_PERCMODE)
122 _DO(OSS_SEQ_TESTMIDI)
123 _DO(OSS_SEQ_RESETSAMPLES)
124 _DO(OSS_SEQ_NRSYNTHS)
125 _DO(OSS_SEQ_NRMIDIS)
126 #ifdef notyet
127 _DO(OSS_MIDI_INFO)
128 #endif
129 _DO(OSS_SEQ_THRESHOLD)
130 _DO(OSS_MEMAVL)
131 _DO(OSS_FM_4OP_ENABLE)
132 _DO(OSS_SEQ_PANIC)
133 _DO(OSS_SEQ_OUTOFBAND)
134 _DO(OSS_SEQ_GETTIME)
135 _DO(OSS_ID)
136 _DO(OSS_CONTROL)
137 _DO(OSS_REMOVESAMPLE)
138 _DO(OSS_TMR_TIMEBASE)
139 _DO(OSS_TMR_START)
140 _DO(OSS_TMR_STOP)
141 _DO(OSS_TMR_CONTINUE)
142 _DO(OSS_TMR_TEMPO)
143 _DO(OSS_TMR_SOURCE)
144 _DO(OSS_TMR_METRONOME)
145 _DO(OSS_TMR_SELECT)
146 #undef _DO
147 	default:
148 		(void)snprintf(buf, sizeof(buf), "*0x%lx*", cmd);
149 		return buf;
150 	}
151 }
152 #endif
153 
154 
155 static int
156 compat_ossaudio_modcmd(modcmd_t cmd, void *arg)
157 {
158 
159 	switch (cmd) {
160 	case MODULE_CMD_INIT:
161 	case MODULE_CMD_FINI:
162 		return 0;
163 	default:
164 		return ENOTTY;
165 	}
166 }
167 
168 int
169 oss_ioctl_audio(struct lwp *l, const struct oss_sys_ioctl_args *uap, register_t *retval)
170 {
171 	/* {
172 		syscallarg(int) fd;
173 		syscallarg(u_long) com;
174 		syscallarg(void *) data;
175 	} */
176 	file_t *fp;
177 	u_long com;
178 	struct audio_info tmpinfo;
179 	struct audio_offset tmpoffs;
180 	struct oss_audio_buf_info bufinfo;
181 	struct oss_count_info cntinfo;
182 	struct audio_encoding tmpenc;
183 	u_int u;
184 	u_int encoding;
185 	u_int precision;
186 	int idat, idata;
187 	int error = 0;
188 	int (*ioctlf)(file_t *, u_long, void *);
189 
190 	if ((fp = fd_getfile(SCARG(uap, fd))) == NULL)
191 		return (EBADF);
192 
193 	if ((fp->f_flag & (FREAD | FWRITE)) == 0) {
194 		error = EBADF;
195 		goto out;
196 	}
197 
198 	com = SCARG(uap, com);
199 	DPRINTF(("%s: com=%s\n", __func__, compat_ossaudio_getcmd(com)));
200 
201 	retval[0] = 0;
202 
203 	ioctlf = fp->f_ops->fo_ioctl;
204 	switch (com) {
205 	case OSS_SNDCTL_DSP_RESET:
206 		error = ioctlf(fp, AUDIO_FLUSH, NULL);
207 		if (error) {
208 			DPRINTF(("%s: AUDIO_FLUSH %d\n", __func__, error));
209 			goto out;
210 		}
211 		break;
212 	case OSS_SNDCTL_DSP_SYNC:
213 		error = ioctlf(fp, AUDIO_DRAIN, NULL);
214 		if (error) {
215 			DPRINTF(("%s: AUDIO_DRAIN %d\n", __func__, error));
216 			goto out;
217 		}
218 		break;
219 	case OSS_SNDCTL_DSP_POST:
220 		/* This call is merely advisory, and may be a nop. */
221 		break;
222 	case OSS_SNDCTL_DSP_SPEED:
223 		AUDIO_INITINFO(&tmpinfo);
224 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
225 		if (error) {
226 			DPRINTF(("%s: SNDCTL_DSP_SPEED %d\n",
227 			     __func__, error));
228 			goto out;
229 		}
230 		tmpinfo.play.sample_rate =
231 		tmpinfo.record.sample_rate = idat;
232 		DPRINTF(("%s: SNDCTL_DSP_SPEED > %d\n", __func__, idat));
233 		error = ioctlf(fp, AUDIO_SETINFO, &tmpinfo);
234 		if (error) {
235 			DPRINTF(("%s: SNDCTL_DSP_SPEED %d = %d\n",
236 			     __func__, idat, error));
237 			goto out;
238 		}
239 		/* FALLTHROUGH */
240 	case OSS_SOUND_PCM_READ_RATE:
241 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
242 		if (error) {
243 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
244 			 __func__, error));
245 			goto out;
246 		}
247 		idat = GETPRINFO(&tmpinfo, sample_rate);
248 		DPRINTF(("%s: SNDCTL_PCM_READ_RATE < %d\n", __func__, idat));
249 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
250 		if (error) {
251 			DPRINTF(("%s: SOUND_PCM_READ_RATE %d = %d\n",
252 			     __func__, idat, error));
253 			goto out;
254 		}
255 		break;
256 	case OSS_SNDCTL_DSP_STEREO:
257 		AUDIO_INITINFO(&tmpinfo);
258 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
259 		if (error) {
260 			DPRINTF(("%s: SNDCTL_DSP_STEREO %d\n",
261 			     __func__, error));
262 			goto out;
263 		}
264 		tmpinfo.play.channels =
265 		tmpinfo.record.channels = idat ? 2 : 1;
266 		error = ioctlf(fp, AUDIO_SETINFO, &tmpinfo);
267 		if (error) {
268 			DPRINTF(("%s: AUDIO_SETINFO %d\n",
269 			     __func__, error));
270 			goto out;
271 		}
272 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
273 		if (error) {
274 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
275 			     __func__, error));
276 			goto out;
277 		}
278 		idat = GETPRINFO(&tmpinfo, channels) - 1;
279 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
280 		if (error) {
281 			DPRINTF(("%s: SNDCTL_DSP_STEREO %d = %d\n",
282 			     __func__, idat, error));
283 			goto out;
284 		}
285 		break;
286 	case OSS_SNDCTL_DSP_GETBLKSIZE:
287 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
288 		if (error) {
289 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
290 			     __func__, error));
291 			goto out;
292 		}
293 		setblocksize(fp, &tmpinfo);
294 		idat = tmpinfo.blocksize;
295 		DPRINTF(("%s: SNDCTL_DSP_GETBLKSIZE < %d\n",
296 		     __func__, idat));
297 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
298 		if (error) {
299 			DPRINTF(("%s: SNDCTL_DSP_GETBLKSIZE %d = %d\n",
300 			     __func__, idat, error));
301 			goto out;
302 		}
303 		break;
304 	case OSS_SNDCTL_DSP_SETFMT:
305 		AUDIO_INITINFO(&tmpinfo);
306 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
307 		if (error) {
308 			DPRINTF(("%s: SNDCTL_DSP_SETFMT %d\n",
309 			     __func__, error));
310 			goto out;
311 		}
312 		switch (idat) {
313 		case OSS_AFMT_MU_LAW:
314 			tmpinfo.play.precision =
315 			tmpinfo.record.precision = 8;
316 			tmpinfo.play.encoding =
317 			tmpinfo.record.encoding = AUDIO_ENCODING_ULAW;
318 			break;
319 		case OSS_AFMT_A_LAW:
320 			tmpinfo.play.precision =
321 			tmpinfo.record.precision = 8;
322 			tmpinfo.play.encoding =
323 			tmpinfo.record.encoding = AUDIO_ENCODING_ALAW;
324 			break;
325 		case OSS_AFMT_U8:
326 			tmpinfo.play.precision =
327 			tmpinfo.record.precision = 8;
328 			tmpinfo.play.encoding =
329 			tmpinfo.record.encoding = AUDIO_ENCODING_ULINEAR;
330 			break;
331 		case OSS_AFMT_S8:
332 			tmpinfo.play.precision =
333 			tmpinfo.record.precision = 8;
334 			tmpinfo.play.encoding =
335 			tmpinfo.record.encoding = AUDIO_ENCODING_SLINEAR;
336 			break;
337 		case OSS_AFMT_S16_LE:
338 			tmpinfo.play.precision =
339 			tmpinfo.record.precision = 16;
340 			tmpinfo.play.encoding =
341 			tmpinfo.record.encoding = AUDIO_ENCODING_SLINEAR_LE;
342 			break;
343 		case OSS_AFMT_S16_BE:
344 			tmpinfo.play.precision =
345 			tmpinfo.record.precision = 16;
346 			tmpinfo.play.encoding =
347 			tmpinfo.record.encoding = AUDIO_ENCODING_SLINEAR_BE;
348 			break;
349 		case OSS_AFMT_U16_LE:
350 			tmpinfo.play.precision =
351 			tmpinfo.record.precision = 16;
352 			tmpinfo.play.encoding =
353 			tmpinfo.record.encoding = AUDIO_ENCODING_ULINEAR_LE;
354 			break;
355 		case OSS_AFMT_U16_BE:
356 			tmpinfo.play.precision =
357 			tmpinfo.record.precision = 16;
358 			tmpinfo.play.encoding =
359 			tmpinfo.record.encoding = AUDIO_ENCODING_ULINEAR_BE;
360 			break;
361 		case OSS_AFMT_AC3:
362 			tmpinfo.play.precision =
363 			tmpinfo.record.precision = 16;
364 			tmpinfo.play.encoding =
365 			tmpinfo.record.encoding = AUDIO_ENCODING_AC3;
366 			break;
367 		default:
368 			DPRINTF(("%s: SNDCTL_DSP_SETFMT bad fmt %d\n",
369 			     __func__, idat));
370 			error = EINVAL;
371 			goto out;
372 		}
373 		DPRINTF(("%s: SNDCTL_DSP_SETFMT > 0x%x\n",
374 		    __func__, idat));
375 		error = ioctlf(fp, AUDIO_SETINFO, &tmpinfo);
376 		if (error) {
377 			DPRINTF(("%s: AUDIO_SETINFO %d\n",
378 			     __func__, error));
379 			goto out;
380 		}
381 		/* FALLTHROUGH */
382 	case OSS_SOUND_PCM_READ_BITS:
383 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
384 		if (error) {
385 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
386 			     __func__, error));
387 			goto out;
388 		}
389 		encoding = GETPRINFO(&tmpinfo, encoding);
390 		precision = GETPRINFO(&tmpinfo, precision);
391 		switch (encoding) {
392 		case AUDIO_ENCODING_ULAW:
393 			idat = OSS_AFMT_MU_LAW;
394 			break;
395 		case AUDIO_ENCODING_ALAW:
396 			idat = OSS_AFMT_A_LAW;
397 			break;
398 		case AUDIO_ENCODING_SLINEAR_LE:
399 			if (precision == 16)
400 				idat = OSS_AFMT_S16_LE;
401 			else
402 				idat = OSS_AFMT_S8;
403 			break;
404 		case AUDIO_ENCODING_SLINEAR_BE:
405 			if (precision == 16)
406 				idat = OSS_AFMT_S16_BE;
407 			else
408 				idat = OSS_AFMT_S8;
409 			break;
410 		case AUDIO_ENCODING_ULINEAR_LE:
411 			if (precision == 16)
412 				idat = OSS_AFMT_U16_LE;
413 			else
414 				idat = OSS_AFMT_U8;
415 			break;
416 		case AUDIO_ENCODING_ULINEAR_BE:
417 			if (precision == 16)
418 				idat = OSS_AFMT_U16_BE;
419 			else
420 				idat = OSS_AFMT_U8;
421 			break;
422 		case AUDIO_ENCODING_ADPCM:
423 			idat = OSS_AFMT_IMA_ADPCM;
424 			break;
425 		case AUDIO_ENCODING_AC3:
426 			idat = OSS_AFMT_AC3;
427 			break;
428 		default:
429 			DPRINTF(("%s: SOUND_PCM_READ_BITS bad encoding %d\n",
430 			     __func__, tmpinfo.play.encoding));
431 			error = EINVAL;
432 			goto out;
433 		}
434 		DPRINTF(("%s: SOUND_PCM_READ_BITS < 0x%x\n",
435 		    __func__, idat));
436 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
437 		if (error) {
438 			DPRINTF(("%s: SOUND_PCM_READ_BITS %d = %d\n",
439 			     __func__, idat, error));
440 			goto out;
441 		}
442 		break;
443 	case OSS_SNDCTL_DSP_CHANNELS:
444 		AUDIO_INITINFO(&tmpinfo);
445 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
446 		if (error) {
447 			DPRINTF(("%s: SNDCTL_DSP_CHANNELS %d\n",
448 			     __func__, error));
449 			goto out;
450 		}
451 		tmpinfo.play.channels =
452 		tmpinfo.record.channels = idat;
453 		DPRINTF(("%s: SNDCTL_DSP_CHANNELS > %d\n", __func__, idat));
454 		error = ioctlf(fp, AUDIO_SETINFO, &tmpinfo);
455 		if (error) {
456 			DPRINTF(("%s: AUDIO_SETINFO %d\n",
457 			     __func__, error));
458 			goto out;
459 		}
460 		/* FALLTHROUGH */
461 	case OSS_SOUND_PCM_READ_CHANNELS:
462 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
463 		if (error) {
464 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
465 			     __func__, error));
466 			goto out;
467 		}
468 		idat = GETPRINFO(&tmpinfo, channels);
469 		DPRINTF(("%s: SOUND_PCM_READ_CHANNELS < %d\n", __func__, idat));
470 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
471 		if (error) {
472 			DPRINTF(("%s: SOUND_PCM_READ_CHANNELS %d = %d\n",
473 			     __func__, idat, error));
474 			goto out;
475 		}
476 		break;
477 	case OSS_SOUND_PCM_WRITE_FILTER:
478 	case OSS_SOUND_PCM_READ_FILTER:
479 		error = EINVAL; /* XXX unimplemented */
480 		DPRINTF(("%s: SOUND_PCM_{READ,WRITE}_FILTER filter\n",
481 		     __func__));
482 		goto out;
483 	case OSS_SNDCTL_DSP_SUBDIVIDE:
484 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
485 		if (error) {
486 			DPRINTF(("%s: SNDCTL_DSP_SUBDIVIDE %d\n",
487 			     __func__, error));
488 			goto out;
489 		}
490 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
491 		if (error) {
492 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
493 			     __func__, error));
494 			goto out;
495 		}
496 		setblocksize(fp, &tmpinfo);
497 		if (idat == 0)
498 			idat = tmpinfo.play.buffer_size / tmpinfo.blocksize;
499 		idat = (tmpinfo.play.buffer_size / idat) & -4;
500 		AUDIO_INITINFO(&tmpinfo);
501 		tmpinfo.blocksize = idat;
502 		error = ioctlf(fp, AUDIO_SETINFO, &tmpinfo);
503 		if (error) {
504 			DPRINTF(("%s: AUDIO_SETINFO %d\n",
505 			     __func__, error));
506 			goto out;
507 		}
508 		idat = tmpinfo.play.buffer_size / tmpinfo.blocksize;
509 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
510 		if (error) {
511 			DPRINTF(("%s: SNDCTL_DSP_SUBDIVIDE %d = %d\n",
512 			     __func__, idat, error));
513 			goto out;
514 		}
515 		break;
516 	case OSS_SNDCTL_DSP_SETFRAGMENT:
517 		AUDIO_INITINFO(&tmpinfo);
518 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
519 		if (error) {
520 			DPRINTF(("%s: SNDCTL_DSP_SETFRAGMENT %d\n",
521 			     __func__, error));
522 			goto out;
523 		}
524 		if ((idat & 0xffff) < 4 || (idat & 0xffff) > 17) {
525 			DPRINTF(("%s: SNDCTL_DSP_SETFRAGMENT bad ival%d\n",
526 			     __func__, idat));
527 			error = EINVAL;
528 			goto out;
529 		}
530 		tmpinfo.blocksize = 1 << (idat & 0xffff);
531 		tmpinfo.hiwat = (idat >> 16) & 0x7fff;
532 		DPRINTF(("%s: SNDCTL_DSP_SETFRAGMENT blksize=%d, "
533 		    "hiwat=%d\n", __func__, tmpinfo.blocksize, tmpinfo.hiwat));
534 		if (tmpinfo.hiwat == 0)	/* 0 means set to max */
535 			tmpinfo.hiwat = 65536;
536 		error = ioctlf(fp, AUDIO_SETINFO, &tmpinfo);
537 		if (error) {
538 			DPRINTF(("%s: AUDIO_SETINFO %d\n",
539 			     __func__, error));
540 			goto out;
541 		}
542 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
543 		if (error) {
544 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
545 			     __func__, error));
546 			goto out;
547 		}
548 		u = tmpinfo.blocksize;
549 		for(idat = 0; u > 1; idat++, u >>= 1)
550 			;
551 		idat |= (tmpinfo.hiwat & 0x7fff) << 16;
552 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
553 		if (error) {
554 			DPRINTF(("%s: SNDCTL_DSP_SETFRAGMENT  %d = %d\n",
555 			     __func__, idat, error));
556 			goto out;
557 		}
558 		break;
559 	case OSS_SNDCTL_DSP_GETFMTS:
560 		for (idat = 0, tmpenc.index = 0;
561 		    ioctlf(fp, AUDIO_GETENC, &tmpenc) == 0;
562 		    tmpenc.index++) {
563 			switch(tmpenc.encoding) {
564 			case AUDIO_ENCODING_ULAW:
565 				idat |= OSS_AFMT_MU_LAW;
566 				break;
567 			case AUDIO_ENCODING_ALAW:
568 				idat |= OSS_AFMT_A_LAW;
569 				break;
570 			case AUDIO_ENCODING_SLINEAR:
571 				idat |= OSS_AFMT_S8;
572 				break;
573 			case AUDIO_ENCODING_SLINEAR_LE:
574 				if (tmpenc.precision == 16)
575 					idat |= OSS_AFMT_S16_LE;
576 				else
577 					idat |= OSS_AFMT_S8;
578 				break;
579 			case AUDIO_ENCODING_SLINEAR_BE:
580 				if (tmpenc.precision == 16)
581 					idat |= OSS_AFMT_S16_BE;
582 				else
583 					idat |= OSS_AFMT_S8;
584 				break;
585 			case AUDIO_ENCODING_ULINEAR:
586 				idat |= OSS_AFMT_U8;
587 				break;
588 			case AUDIO_ENCODING_ULINEAR_LE:
589 				if (tmpenc.precision == 16)
590 					idat |= OSS_AFMT_U16_LE;
591 				else
592 					idat |= OSS_AFMT_U8;
593 				break;
594 			case AUDIO_ENCODING_ULINEAR_BE:
595 				if (tmpenc.precision == 16)
596 					idat |= OSS_AFMT_U16_BE;
597 				else
598 					idat |= OSS_AFMT_U8;
599 				break;
600 			case AUDIO_ENCODING_ADPCM:
601 				idat |= OSS_AFMT_IMA_ADPCM;
602 				break;
603 			case AUDIO_ENCODING_AC3:
604 				idat |= OSS_AFMT_AC3;
605 				break;
606 			default:
607 				DPRINTF(("%s: SNDCTL_DSP_GETFMTS unknown %d\n",
608 				    __func__, tmpenc.encoding));
609 				break;
610 			}
611 		}
612 		DPRINTF(("%s: SNDCTL_DSP_GETFMTS < 0x%x\n",
613 		    __func__, idat));
614 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
615 		if (error) {
616 			DPRINTF(("%s: SNDCTL_DSP_GETFMTS = %x = %d\n",
617 			    __func__, idat, error));
618 			goto out;
619 		}
620 		break;
621 	case OSS_SNDCTL_DSP_GETOSPACE:
622 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
623 		if (error) {
624 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
625 			     __func__, error));
626 			goto out;
627 		}
628 		setblocksize(fp, &tmpinfo);
629 		bufinfo.fragsize = tmpinfo.blocksize;
630 		bufinfo.fragments = tmpinfo.hiwat -
631 		    (tmpinfo.play.seek + tmpinfo.blocksize - 1) /
632 		    tmpinfo.blocksize;
633 		bufinfo.fragstotal = tmpinfo.hiwat;
634 		bufinfo.bytes =
635 		    tmpinfo.hiwat * tmpinfo.blocksize - tmpinfo.play.seek;
636 		error = copyout(&bufinfo, SCARG(uap, data), sizeof bufinfo);
637 		if (error) {
638 			DPRINTF(("%s: SNDCTL_DSP_GETOSPACE = %d\n",
639 			    __func__, error));
640 			goto out;
641 		}
642 		break;
643 	case OSS_SNDCTL_DSP_GETISPACE:
644 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
645 		if (error) {
646 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
647 			     __func__, error));
648 			goto out;
649 		}
650 		setblocksize(fp, &tmpinfo);
651 		bufinfo.fragsize = tmpinfo.blocksize;
652 		bufinfo.fragments = tmpinfo.record.seek / tmpinfo.blocksize;
653 		bufinfo.fragstotal =
654 		    tmpinfo.record.buffer_size / tmpinfo.blocksize;
655 		bufinfo.bytes = tmpinfo.record.seek;
656 		error = copyout(&bufinfo, SCARG(uap, data), sizeof bufinfo);
657 		if (error) {
658 			DPRINTF(("%s: SNDCTL_DSP_GETISPACE %d %d %d %d = %d\n",
659 			     __func__, bufinfo.fragsize, bufinfo.fragments,
660 			     bufinfo.fragstotal, bufinfo.bytes, error));
661 			goto out;
662 		}
663 		break;
664 	case OSS_SNDCTL_DSP_NONBLOCK:
665 		idat = 1;
666 		error = ioctlf(fp, FIONBIO, &idat);
667 		if (error) {
668 			DPRINTF(("%s: FIONBIO %d\n",
669 			     __func__, error));
670 			goto out;
671 		}
672 		break;
673 	case OSS_SNDCTL_DSP_GETCAPS:
674 		error = ioctlf(fp, AUDIO_GETPROPS, &idata);
675 		if (error) {
676 			DPRINTF(("%s: AUDIO_GETPROPS %d\n",
677 			     __func__, error));
678 			goto out;
679 		}
680 		idat = OSS_DSP_CAP_TRIGGER; /* pretend we have trigger */
681 		if (idata & AUDIO_PROP_FULLDUPLEX)
682 			idat |= OSS_DSP_CAP_DUPLEX;
683 		if (idata & AUDIO_PROP_MMAP)
684 			idat |= OSS_DSP_CAP_MMAP;
685 		DPRINTF(("%s: SNDCL_DSP_GETCAPS %s duplex, %smmap\n",
686 		     __func__, (idat & OSS_DSP_CAP_DUPLEX) ? "full" : "half",
687 		     (idat & OSS_DSP_CAP_MMAP) ? "" : "no "));
688 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
689 		if (error) {
690 			DPRINTF(("%s: SNDCTL_DSP_GETCAPS %x = %d\n", __func__,
691 			    idat, error));
692 			goto out;
693 		}
694 		break;
695 #if 0
696 	case OSS_SNDCTL_DSP_GETTRIGGER:
697 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
698 		if (error) {
699 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
700 			     __func__, error));
701 			goto out;
702 		}
703 		idat = (tmpinfo.play.pause ? 0 : OSS_PCM_ENABLE_OUTPUT) |
704 		       (tmpinfo.record.pause ? 0 : OSS_PCM_ENABLE_INPUT);
705 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
706 		if (error) {
707 			DPRINTF(("%s: SNDCTL_DSP_SETRIGGER %x = %d\n",
708 			    __func__, idat, error));
709 			goto out;
710 		}
711 		break;
712 	case OSS_SNDCTL_DSP_SETTRIGGER:
713 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo, p);
714 		if (error) {
715 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
716 			     __func__, error));
717 			goto out;
718 		}
719 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
720 		if (error) {
721 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
722 			     __func__, error));
723 			goto out;
724 		}
725 		tmpinfo.play.pause = (idat & OSS_PCM_ENABLE_OUTPUT) == 0;
726 		tmpinfo.record.pause = (idat & OSS_PCM_ENABLE_INPUT) == 0;
727 		error = ioctlf(fp, AUDIO_SETINFO, &tmpinfo);
728 		if (error) {
729 			DPRINTF(("%s: AUDIO_SETINFO %d\n",
730 			     __func__, error));
731 			goto out;
732 		}
733 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
734 		if (error) {
735 			DPRINTF(("%s: SNDCTL_DSP_SETRIGGER %x = %d\n",
736 			    __func__, idat, error));
737 			goto out;
738 		}
739 		break;
740 #else
741 	case OSS_SNDCTL_DSP_GETTRIGGER:
742 	case OSS_SNDCTL_DSP_SETTRIGGER:
743 		/* XXX Do nothing for now. */
744 		idat = OSS_PCM_ENABLE_OUTPUT;
745 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
746 		if (error) {
747 			DPRINTF(("%s: SNDCTL_DSP_{GET,SET}RIGGER %x = %d\n",
748 			    __func__, idat, error));
749 			goto out;
750 		}
751 		break;
752 #endif
753 	case OSS_SNDCTL_DSP_GETIPTR:
754 		error = ioctlf(fp, AUDIO_GETIOFFS, &tmpoffs);
755 		if (error) {
756 			DPRINTF(("%s: AUDIO_GETIOFFS %d\n",
757 			     __func__, error));
758 			goto out;
759 		}
760 		cntinfo.bytes = tmpoffs.samples;
761 		cntinfo.blocks = tmpoffs.deltablks;
762 		cntinfo.ptr = tmpoffs.offset;
763 		error = copyout(&cntinfo, SCARG(uap, data), sizeof cntinfo);
764 		if (error) {
765 			DPRINTF(("%s: SNDCTL_DSP_GETIPTR %d\n",
766 			    __func__, error));
767 			goto out;
768 		}
769 		break;
770 	case OSS_SNDCTL_DSP_GETOPTR:
771 		error = ioctlf(fp, AUDIO_GETOOFFS, &tmpoffs);
772 		if (error) {
773 			DPRINTF(("%s: AUDIO_GETOOFFS %d\n",
774 			     __func__, error));
775 			goto out;
776 		}
777 		cntinfo.bytes = tmpoffs.samples;
778 		cntinfo.blocks = tmpoffs.deltablks;
779 		cntinfo.ptr = tmpoffs.offset;
780 		error = copyout(&cntinfo, SCARG(uap, data), sizeof cntinfo);
781 		if (error) {
782 			DPRINTF(("%s: SNDCTL_DSP_GETOPTR %d\n",
783 			    __func__, error));
784 			goto out;
785 		}
786 		break;
787 	case OSS_SNDCTL_DSP_SETDUPLEX:
788 		idat = 1;
789 		error = ioctlf(fp, AUDIO_SETFD, &idat);
790 		if (error) {
791 			DPRINTF(("%s: AUDIO_SETFD %d = %d\n",
792 			    __func__, idat, error));
793 			goto out;
794 		}
795 		break;
796 	case OSS_SNDCTL_DSP_MAPINBUF:
797 		DPRINTF(("%s: Unimplemented SNDCTL_DSP_MAPINBUF\n",
798 		    __func__));
799 		error = EINVAL;
800 		goto out;
801 	case OSS_SNDCTL_DSP_MAPOUTBUF:
802 		DPRINTF(("%s: Unimplemented SNDCTL_DSP_MAPOUTBUF\n",
803 		    __func__));
804 		error = EINVAL;
805 		goto out;
806 	case OSS_SNDCTL_DSP_SETSYNCRO:
807 		DPRINTF(("%s: Unimplemented SNDCTL_DSP_GETSYNCHRO\n",
808 		    __func__));
809 		error = EINVAL;
810 		goto out;
811 	case OSS_SNDCTL_DSP_GETODELAY:
812 		error = ioctlf(fp, AUDIO_GETBUFINFO, &tmpinfo);
813 		if (error) {
814 			DPRINTF(("%s: AUDIO_GETBUFINFO %d\n",
815 			    __func__, error));
816 			goto out;
817 		}
818 		idat = tmpinfo.play.seek + tmpinfo.blocksize / 2;
819 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
820 		if (error) {
821 			DPRINTF(("%s: SNDCTL_DSP_GETODELAY %d\n",
822 			    __func__, error));
823 			goto out;
824 		}
825 		break;
826 	case OSS_SNDCTL_DSP_PROFILE:
827 		/* This gives just a hint to the driver,
828 		 * implementing it as a NOP is ok
829 		 */
830 		DPRINTF(("%s: SNDCTL_DSP_PROFILE\n", __func__));
831 		break;
832 	default:
833 		DPRINTF(("%s: Unimplemented 0x%lx\n", __func__, com));
834 		error = EINVAL;
835 		goto out;
836 	}
837 
838  out:
839  	fd_putfile(SCARG(uap, fd));
840 	return error;
841 }
842 
843 /* If the NetBSD mixer device should have more than 32 devices
844  * some will not be available to Linux */
845 #define NETBSD_MAXDEVS 64
846 struct audiodevinfo {
847 	int done;
848 	dev_t dev;
849 	int16_t devmap[OSS_SOUND_MIXER_NRDEVICES],
850 	        rdevmap[NETBSD_MAXDEVS];
851 	char names[NETBSD_MAXDEVS][MAX_AUDIO_DEV_LEN];
852 	int enum2opaque[NETBSD_MAXDEVS];
853         u_long devmask, recmask, stereomask;
854 	u_long caps, source;
855 };
856 
857 static int
858 opaque_to_enum(struct audiodevinfo *di, audio_mixer_name_t *label, int opq)
859 {
860 	int i, o;
861 
862 	for (i = 0; i < NETBSD_MAXDEVS; i++) {
863 		o = di->enum2opaque[i];
864 		if (o == opq)
865 			break;
866 		if (o == -1 && label != NULL &&
867 		    !strncmp(di->names[i], label->name, sizeof di->names[i])) {
868 			di->enum2opaque[i] = opq;
869 			break;
870 		}
871 	}
872 	if (i >= NETBSD_MAXDEVS)
873 		i = -1;
874 	/*printf("opq_to_enum %s %d -> %d\n", label->name, opq, i);*/
875 	return (i);
876 }
877 
878 static int
879 enum_to_ord(struct audiodevinfo *di, int enm)
880 {
881 	if (enm >= NETBSD_MAXDEVS)
882 		return (-1);
883 
884 	/*printf("enum_to_ord %d -> %d\n", enm, di->enum2opaque[enm]);*/
885 	return (di->enum2opaque[enm]);
886 }
887 
888 static int
889 enum_to_mask(struct audiodevinfo *di, int enm)
890 {
891 	int m;
892 	if (enm >= NETBSD_MAXDEVS)
893 		return (0);
894 
895 	m = di->enum2opaque[enm];
896 	if (m == -1)
897 		m = 0;
898 	/*printf("enum_to_mask %d -> %d\n", enm, di->enum2opaque[enm]);*/
899 	return (m);
900 }
901 
902 /*
903  * Collect the audio device information to allow faster
904  * emulation of the Linux mixer ioctls.  Cache the information
905  * to eliminate the overhead of repeating all the ioctls needed
906  * to collect the information.
907  */
908 static struct audiodevinfo *
909 getdevinfo(file_t *fp)
910 {
911 	mixer_devinfo_t mi;
912 	int i, j, e;
913 	static const struct {
914 		const char *name;
915 		int code;
916 	} *dp, devs[] = {
917 		{ AudioNmicrophone,	OSS_SOUND_MIXER_MIC },
918 		{ AudioNline,		OSS_SOUND_MIXER_LINE },
919 		{ AudioNcd,		OSS_SOUND_MIXER_CD },
920 		{ AudioNdac,		OSS_SOUND_MIXER_PCM },
921 		{ AudioNaux,		OSS_SOUND_MIXER_LINE1 },
922 		{ AudioNrecord,		OSS_SOUND_MIXER_IMIX },
923 		{ AudioNmaster,		OSS_SOUND_MIXER_VOLUME },
924 		{ AudioNtreble,		OSS_SOUND_MIXER_TREBLE },
925 		{ AudioNbass,		OSS_SOUND_MIXER_BASS },
926 		{ AudioNspeaker,	OSS_SOUND_MIXER_SPEAKER },
927 /*		{ AudioNheadphone,	?? },*/
928 		{ AudioNoutput,		OSS_SOUND_MIXER_OGAIN },
929 		{ AudioNinput,		OSS_SOUND_MIXER_IGAIN },
930 /*		{ AudioNmaster,		OSS_SOUND_MIXER_SPEAKER },*/
931 /*		{ AudioNstereo,		?? },*/
932 /*		{ AudioNmono,		?? },*/
933 		{ AudioNfmsynth,	OSS_SOUND_MIXER_SYNTH },
934 /*		{ AudioNwave,		OSS_SOUND_MIXER_PCM },*/
935 		{ AudioNmidi,		OSS_SOUND_MIXER_SYNTH },
936 /*		{ AudioNmixerout,	?? },*/
937 		{ 0, -1 }
938 	};
939 	int (*ioctlf)(file_t *, u_long, void *) = fp->f_ops->fo_ioctl;
940 	struct vnode *vp;
941 	struct vattr va;
942 	static struct audiodevinfo devcache;
943 	struct audiodevinfo *di = &devcache;
944 	int error, mlen, dlen;
945 
946 	/*
947 	 * Figure out what device it is so we can check if the
948 	 * cached data is valid.
949 	 */
950 	vp = fp->f_vnode;
951 	if (vp->v_type != VCHR)
952 		return 0;
953 	vn_lock(vp, LK_SHARED | LK_RETRY);
954 	error = VOP_GETATTR(vp, &va, kauth_cred_get());
955 	VOP_UNLOCK(vp);
956 	if (error)
957 		return 0;
958 	if (di->done && di->dev == va.va_rdev)
959 		return di;
960 
961 	di->done = 1;
962 	di->dev = va.va_rdev;
963 	di->devmask = 0;
964 	di->recmask = 0;
965 	di->stereomask = 0;
966 	di->source = ~0;
967 	di->caps = 0;
968 	for(i = 0; i < OSS_SOUND_MIXER_NRDEVICES; i++)
969 		di->devmap[i] = -1;
970 	for(i = 0; i < NETBSD_MAXDEVS; i++) {
971 		di->rdevmap[i] = -1;
972 		di->names[i][0] = '\0';
973 		di->enum2opaque[i] = -1;
974 	}
975 	for(i = 0; i < NETBSD_MAXDEVS; i++) {
976 		mi.index = i;
977 		if (ioctlf(fp, AUDIO_MIXER_DEVINFO, &mi) != 0)
978 			break;
979 		switch(mi.type) {
980 		case AUDIO_MIXER_VALUE:
981 			for(dp = devs; dp->name; dp++) {
982 				if (strcmp(dp->name, mi.label.name) == 0)
983 					break;
984 				dlen = strlen(dp->name);
985 				mlen = strlen(mi.label.name);
986 				if (dlen < mlen
987 				    && mi.label.name[mlen-dlen-1] == '.'
988 				    && strcmp(dp->name, mi.label.name + mlen - dlen) == 0)
989 					break;
990 			}
991 			if (dp->code >= 0) {
992 				di->devmap[dp->code] = i;
993 				di->rdevmap[i] = dp->code;
994 				di->devmask |= 1 << dp->code;
995 				if (mi.un.v.num_channels == 2)
996 					di->stereomask |= 1 << dp->code;
997 				strncpy(di->names[i], mi.label.name,
998 					sizeof di->names[i]);
999 			}
1000 			break;
1001 		}
1002 	}
1003 	for(i = 0; i < NETBSD_MAXDEVS; i++) {
1004 		mi.index = i;
1005 		if (ioctlf(fp, AUDIO_MIXER_DEVINFO, &mi) != 0)
1006 			break;
1007 		if (strcmp(mi.label.name, AudioNsource) != 0)
1008 			continue;
1009 		di->source = i;
1010 		switch(mi.type) {
1011 		case AUDIO_MIXER_ENUM:
1012 			for(j = 0; j < mi.un.e.num_mem; j++) {
1013 				e = opaque_to_enum(di,
1014 						   &mi.un.e.member[j].label,
1015 						   mi.un.e.member[j].ord);
1016 				if (e >= 0)
1017 					di->recmask |= 1 << di->rdevmap[e];
1018 			}
1019 			di->caps = OSS_SOUND_CAP_EXCL_INPUT;
1020 			break;
1021 		case AUDIO_MIXER_SET:
1022 			for(j = 0; j < mi.un.s.num_mem; j++) {
1023 				e = opaque_to_enum(di,
1024 						   &mi.un.s.member[j].label,
1025 						   mi.un.s.member[j].mask);
1026 				if (e >= 0)
1027 					di->recmask |= 1 << di->rdevmap[e];
1028 			}
1029 			break;
1030 		}
1031 	}
1032 	return di;
1033 }
1034 
1035 int
1036 oss_ioctl_mixer(struct lwp *lwp, const struct oss_sys_ioctl_args *uap, register_t *retval)
1037 {
1038 	/* {
1039 		syscallarg(int) fd;
1040 		syscallarg(u_long) com;
1041 		syscallarg(void *) data;
1042 	} */
1043 	file_t *fp;
1044 	u_long com;
1045 	struct audiodevinfo *di;
1046 	mixer_ctrl_t mc;
1047 	struct oss_mixer_info omi;
1048 	struct audio_device adev;
1049 	int idat;
1050 	int i;
1051 	int error;
1052 	int l, r, n, e;
1053 	int (*ioctlf)(file_t *, u_long, void *);
1054 
1055 	if ((error = fd_getvnode(SCARG(uap, fd), &fp)) != 0)
1056 		return error;
1057 
1058 	if ((fp->f_flag & (FREAD | FWRITE)) == 0) {
1059 		error = EBADF;
1060 		goto out;
1061 	}
1062 
1063 	com = SCARG(uap, com);
1064 	DPRINTF(("%s: com=%s\n", __func__, compat_ossaudio_getcmd(com)));
1065 
1066 	retval[0] = 0;
1067 
1068 	di = getdevinfo(fp);
1069 	if (di == 0) {
1070 		error = EINVAL;
1071 		goto out;
1072 	}
1073 
1074 	ioctlf = fp->f_ops->fo_ioctl;
1075 	switch (com) {
1076 	case OSS_GET_VERSION:
1077 		idat = OSS_SOUND_VERSION;
1078 		break;
1079 	case OSS_SOUND_MIXER_INFO:
1080 	case OSS_SOUND_OLD_MIXER_INFO:
1081 		error = ioctlf(fp, AUDIO_GETDEV, &adev);
1082 		if (error) {
1083 			DPRINTF(("%s: AUDIO_GETDEV %d\n",
1084 			    __func__, error));
1085 			goto out;
1086 		}
1087 		omi.modify_counter = 1;
1088 		strncpy(omi.id, adev.name, sizeof omi.id);
1089 		strncpy(omi.name, adev.name, sizeof omi.name);
1090 		error = copyout(&omi, SCARG(uap, data), OSS_IOCTL_SIZE(com));
1091 		if (error) {
1092 			DPRINTF(("%s: OSS_SOUND_MIXER_INFO %d\n",
1093 			    __func__, error));
1094 			goto out;
1095 		}
1096 		break;
1097 	case OSS_SOUND_MIXER_READ_RECSRC:
1098 		if (di->source == (u_long)-1) {
1099 			DPRINTF(("%s: OSS_SOUND_MIXER_READ_RECSRC bad source\n",
1100 			    __func__));
1101 			error = EINVAL;
1102 			goto out;
1103 		}
1104 		mc.dev = di->source;
1105 		if (di->caps & OSS_SOUND_CAP_EXCL_INPUT) {
1106 			mc.type = AUDIO_MIXER_ENUM;
1107 			error = ioctlf(fp, AUDIO_MIXER_READ, &mc);
1108 			if (error) {
1109 				DPRINTF(("%s: AUDIO_MIXER_READ %d\n",
1110 				    __func__, error));
1111 				goto out;
1112 			}
1113 			e = opaque_to_enum(di, NULL, mc.un.ord);
1114 			if (e >= 0)
1115 				idat = 1 << di->rdevmap[e];
1116 		} else {
1117 			mc.type = AUDIO_MIXER_SET;
1118 			error = ioctlf(fp, AUDIO_MIXER_READ, &mc);
1119 			if (error) {
1120 				DPRINTF(("%s: AUDIO_MIXER_READ %d\n",
1121 				    __func__, error));
1122 				goto out;
1123 			}
1124 			e = opaque_to_enum(di, NULL, mc.un.mask);
1125 			if (e >= 0)
1126 				idat = 1 << di->rdevmap[e];
1127 		}
1128 		break;
1129 	case OSS_SOUND_MIXER_READ_DEVMASK:
1130 		idat = di->devmask;
1131 		break;
1132 	case OSS_SOUND_MIXER_READ_RECMASK:
1133 		idat = di->recmask;
1134 		break;
1135 	case OSS_SOUND_MIXER_READ_STEREODEVS:
1136 		idat = di->stereomask;
1137 		break;
1138 	case OSS_SOUND_MIXER_READ_CAPS:
1139 		idat = di->caps;
1140 		break;
1141 	case OSS_SOUND_MIXER_WRITE_RECSRC:
1142 	case OSS_SOUND_MIXER_WRITE_R_RECSRC:
1143 		if (di->source == (u_long)-1) {
1144 			DPRINTF(("%s: OSS_SOUND_MIXER_WRITE_RECSRC bad "
1145 			    "source\n", __func__));
1146 			error = EINVAL;
1147 			goto out;
1148 		}
1149 		mc.dev = di->source;
1150 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
1151 		if (error) {
1152 			DPRINTF(("%s: OSS_SOUND_MIXER_WRITE_RECSRC %d\n",
1153 			    __func__, error));
1154 			goto out;
1155 		}
1156 		if (di->caps & OSS_SOUND_CAP_EXCL_INPUT) {
1157 			mc.type = AUDIO_MIXER_ENUM;
1158 			for(i = 0; i < OSS_SOUND_MIXER_NRDEVICES; i++)
1159 				if (idat & (1 << i))
1160 					break;
1161 			if (i >= OSS_SOUND_MIXER_NRDEVICES ||
1162 			    di->devmap[i] == -1) {
1163 				error = EINVAL;
1164 				DPRINTF(("%s: OSS_SOUND_MIXER_WRITE_RECSRC "
1165 				    "bad index %d\n", __func__, i));
1166 				goto out;
1167 			}
1168 			mc.un.ord = enum_to_ord(di, di->devmap[i]);
1169 		} else {
1170 			mc.type = AUDIO_MIXER_SET;
1171 			mc.un.mask = 0;
1172 			for(i = 0; i < OSS_SOUND_MIXER_NRDEVICES; i++) {
1173 				if (idat & (1 << i)) {
1174 					if (di->devmap[i] == -1) {
1175 						DPRINTF(("%s: OSS_SOUND_MIXER_"
1176 						    "WRITE_RECSRC bad devmap "
1177 						    "%d\n", __func__, i));
1178 						error = EINVAL;
1179 						goto out;
1180 					}
1181 					mc.un.mask |= enum_to_mask(di,
1182 					    di->devmap[i]);
1183 				}
1184 			}
1185 		}
1186 		error = ioctlf(fp, AUDIO_MIXER_WRITE, &mc);
1187 		if (error) {
1188 			DPRINTF(("%s: AUDIO_MIXER_WRITE %d\n",
1189 			    __func__, error));
1190 			goto out;
1191 		}
1192 		goto out;
1193 	default:
1194 		if (OSS_MIXER_READ(OSS_SOUND_MIXER_FIRST) <= com &&
1195 		    com < OSS_MIXER_READ(OSS_SOUND_MIXER_NRDEVICES)) {
1196 			n = OSS_GET_DEV(com);
1197 			if (di->devmap[n] == -1) {
1198 				DPRINTF(("%s: 0x%lx bad devmap %d\n",
1199 				    __func__, com, n));
1200 				error = EINVAL;
1201 				goto out;
1202 			}
1203 		    doread:
1204 			mc.dev = di->devmap[n];
1205 			mc.type = AUDIO_MIXER_VALUE;
1206 			mc.un.value.num_channels = di->stereomask &
1207 			    (1 << n) ? 2 : 1;
1208 			error = ioctlf(fp, AUDIO_MIXER_READ, &mc);
1209 			if (error) {
1210 				DPRINTF(("%s: AUDIO_MIXER_READ %d\n",
1211 				    __func__, error));
1212 				goto out;
1213 			}
1214 			if (mc.un.value.num_channels != 2) {
1215 				l = r =
1216 				    mc.un.value.level[AUDIO_MIXER_LEVEL_MONO];
1217 			} else {
1218 				l = mc.un.value.level[AUDIO_MIXER_LEVEL_LEFT];
1219 				r = mc.un.value.level[AUDIO_MIXER_LEVEL_RIGHT];
1220 			}
1221 			idat = TO_OSSVOL(l) | (TO_OSSVOL(r) << 8);
1222 			DPRINTF(("%s: n=%d (dev=%d) l=%d, r=%d, idat=%04x\n",
1223 				 __func__, n, di->devmap[n], l, r, idat));
1224 			break;
1225 		} else if ((OSS_MIXER_WRITE_R(OSS_SOUND_MIXER_FIRST) <= com &&
1226 		    com < OSS_MIXER_WRITE_R(OSS_SOUND_MIXER_NRDEVICES)) ||
1227 		    (OSS_MIXER_WRITE(OSS_SOUND_MIXER_FIRST) <= com &&
1228 		    com < OSS_MIXER_WRITE(OSS_SOUND_MIXER_NRDEVICES))) {
1229 			n = OSS_GET_DEV(com);
1230 			if (di->devmap[n] == -1) {
1231 				DPRINTF(("%s: 0x%lx bad devmap %d\n",
1232 				    __func__, com, n));
1233 				error = EINVAL;
1234 				goto out;
1235 			}
1236 			error = copyin(SCARG(uap, data), &idat, sizeof idat);
1237 			if (error) {
1238 				DPRINTF(("%s: 0x%lx error %d\n",
1239 				    __func__, com, error));
1240 				goto out;
1241 			}
1242 			l = FROM_OSSVOL( idat       & 0xff);
1243 			r = FROM_OSSVOL((idat >> 8) & 0xff);
1244 			mc.dev = di->devmap[n];
1245 			mc.type = AUDIO_MIXER_VALUE;
1246 			if (di->stereomask & (1 << n)) {
1247 				mc.un.value.num_channels = 2;
1248 				mc.un.value.level[AUDIO_MIXER_LEVEL_LEFT] = l;
1249 				mc.un.value.level[AUDIO_MIXER_LEVEL_RIGHT] = r;
1250 			} else {
1251 				mc.un.value.num_channels = 1;
1252 				mc.un.value.level[AUDIO_MIXER_LEVEL_MONO] =
1253 				    (l + r) / 2;
1254 			}
1255 			DPRINTF(("%s: n=%d (dev=%d) l=%d, r=%d, idat=%04x\n",
1256 			     __func__, n, di->devmap[n], l, r, idat));
1257 			error = ioctlf(fp, AUDIO_MIXER_WRITE, &mc);
1258 			if (error) {
1259 				DPRINTF(("%s: AUDIO_MIXER_WRITE %d\n",
1260 				    __func__, error));
1261 				goto out;
1262 			}
1263 			if (OSS_MIXER_WRITE(OSS_SOUND_MIXER_FIRST) <= com &&
1264 			   com < OSS_MIXER_WRITE(OSS_SOUND_MIXER_NRDEVICES)) {
1265 				error = 0;
1266 				goto out;
1267 			}
1268 			goto doread;
1269 		} else {
1270 			DPRINTF(("%s: Unknown mixer ioctl 0x%lx\n", __func__,
1271 			    com));
1272 			error = EINVAL;
1273 			goto out;
1274 		}
1275 	}
1276 	error = copyout(&idat, SCARG(uap, data), sizeof idat);
1277  out:
1278  	fd_putfile(SCARG(uap, fd));
1279 	return error;
1280 }
1281 
1282 /* Sequencer emulation */
1283 int
1284 oss_ioctl_sequencer(struct lwp *l, const struct oss_sys_ioctl_args *uap, register_t *retval)
1285 {
1286 	/* {
1287 		syscallarg(int) fd;
1288 		syscallarg(u_long) com;
1289 		syscallarg(void *) data;
1290 	} */
1291 	file_t *fp;
1292 	u_long com;
1293 	int idat, idat1;
1294 	struct synth_info si;
1295 	struct oss_synth_info osi;
1296 	struct oss_seq_event_rec oser;
1297 	int error;
1298 	int (*ioctlf)(file_t *, u_long, void *);
1299 
1300 	if ((fp = fd_getfile(SCARG(uap, fd))) == NULL)
1301 		return (EBADF);
1302 
1303 	if ((fp->f_flag & (FREAD | FWRITE)) == 0) {
1304 		error = EBADF;
1305 		goto out;
1306 	}
1307 
1308 	com = SCARG(uap, com);
1309 	DPRINTF(("%s: com=%s\n", __func__, compat_ossaudio_getcmd(com)));
1310 
1311 	retval[0] = 0;
1312 
1313 	ioctlf = fp->f_ops->fo_ioctl;
1314 	switch (com) {
1315 	case OSS_SEQ_RESET:
1316 		error = ioctlf(fp, SEQUENCER_RESET, &idat);
1317 		goto out;
1318 	case OSS_SEQ_SYNC:
1319 		error = ioctlf(fp, SEQUENCER_SYNC, &idat);
1320 		goto out;
1321 	case OSS_SYNTH_INFO:
1322 		error = copyin(SCARG(uap, data), &osi, sizeof osi);
1323 		if (error)
1324 			goto out;
1325 		si.device = osi.device;
1326 		error = ioctlf(fp, SEQUENCER_INFO, &si);
1327 		if (error)
1328 			goto out;
1329 		strncpy(osi.name, si.name, sizeof osi.name);
1330 		osi.device = si.device;
1331 		switch(si.synth_type) {
1332 		case SYNTH_TYPE_FM:
1333 			osi.synth_type = OSS_SYNTH_TYPE_FM; break;
1334 		case SYNTH_TYPE_SAMPLE:
1335 			osi.synth_type = OSS_SYNTH_TYPE_SAMPLE; break;
1336 		case SYNTH_TYPE_MIDI:
1337 			osi.synth_type = OSS_SYNTH_TYPE_MIDI; break;
1338 		default:
1339 			osi.synth_type = 0; break;
1340 		}
1341 		switch(si.synth_subtype) {
1342 		case SYNTH_SUB_FM_TYPE_ADLIB:
1343 			osi.synth_subtype = OSS_FM_TYPE_ADLIB; break;
1344 		case SYNTH_SUB_FM_TYPE_OPL3:
1345 			osi.synth_subtype = OSS_FM_TYPE_OPL3; break;
1346 		case SYNTH_SUB_MIDI_TYPE_MPU401:
1347 			osi.synth_subtype = OSS_MIDI_TYPE_MPU401; break;
1348 		case SYNTH_SUB_SAMPLE_TYPE_BASIC:
1349 			osi.synth_subtype = OSS_SAMPLE_TYPE_BASIC; break;
1350 		default:
1351 			osi.synth_subtype = 0; break;
1352 		}
1353 		osi.perc_mode = 0;
1354 		osi.nr_voices = si.nr_voices;
1355 		osi.nr_drums = 0;
1356 		osi.instr_bank_size = si.instr_bank_size;
1357 		osi.capabilities = 0;
1358 		if (si.capabilities & SYNTH_CAP_OPL3)
1359 			osi.capabilities |= OSS_SYNTH_CAP_OPL3;
1360 		if (si.capabilities & SYNTH_CAP_INPUT)
1361 			osi.capabilities |= OSS_SYNTH_CAP_INPUT;
1362 		error = copyout(&osi, SCARG(uap, data), sizeof osi);
1363 		goto out;
1364 	case OSS_SEQ_CTRLRATE:
1365 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
1366 		if (error)
1367 			goto out;
1368 		error = ioctlf(fp, SEQUENCER_CTRLRATE, &idat);
1369 		if (error)
1370 			goto out;
1371 		retval[0] = idat;
1372 		break;
1373 	case OSS_SEQ_GETOUTCOUNT:
1374 		error = ioctlf(fp, SEQUENCER_GETOUTCOUNT, &idat);
1375 		if (error)
1376 			goto out;
1377 		retval[0] = idat;
1378 		break;
1379 	case OSS_SEQ_GETINCOUNT:
1380 		error = ioctlf(fp, SEQUENCER_GETINCOUNT, &idat);
1381 		if (error)
1382 			goto out;
1383 		retval[0] = idat;
1384 		break;
1385 	case OSS_SEQ_NRSYNTHS:
1386 		error = ioctlf(fp, SEQUENCER_NRSYNTHS, &idat);
1387 		if (error)
1388 			goto out;
1389 		retval[0] = idat;
1390 		break;
1391 	case OSS_SEQ_NRMIDIS:
1392 		error = ioctlf(fp, SEQUENCER_NRMIDIS, &idat);
1393 		if (error)
1394 			goto out;
1395 		retval[0] = idat;
1396 		break;
1397 	case OSS_SEQ_THRESHOLD:
1398 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
1399 		if (error)
1400 			goto out;
1401 		error = ioctlf(fp, SEQUENCER_THRESHOLD, &idat);
1402 		goto out;
1403 	case OSS_MEMAVL:
1404 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
1405 		if (error)
1406 			goto out;
1407 		error = ioctlf(fp, SEQUENCER_MEMAVL, &idat);
1408 		if (error)
1409 			goto out;
1410 		retval[0] = idat;
1411 		break;
1412 	case OSS_SEQ_PANIC:
1413 		error = ioctlf(fp, SEQUENCER_PANIC, &idat);
1414 		goto out;
1415 	case OSS_SEQ_OUTOFBAND:
1416 		error = copyin(SCARG(uap, data), &oser, sizeof oser);
1417 		if (error)
1418 			goto out;
1419 		error = ioctlf(fp, SEQUENCER_OUTOFBAND, &oser);
1420 		if (error)
1421 			goto out;
1422 		break;
1423 	case OSS_SEQ_GETTIME:
1424 		error = ioctlf(fp, SEQUENCER_GETTIME, &idat);
1425 		if (error)
1426 			goto out;
1427 		retval[0] = idat;
1428 		break;
1429 	case OSS_TMR_TIMEBASE:
1430 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
1431 		if (error)
1432 			goto out;
1433 		error = ioctlf(fp, SEQUENCER_TMR_TIMEBASE, &idat);
1434 		if (error)
1435 			goto out;
1436 		retval[0] = idat;
1437 		break;
1438 	case OSS_TMR_START:
1439 		error = ioctlf(fp, SEQUENCER_TMR_START, &idat);
1440 		goto out;
1441 	case OSS_TMR_STOP:
1442 		error = ioctlf(fp, SEQUENCER_TMR_STOP, &idat);
1443 		goto out;
1444 	case OSS_TMR_CONTINUE:
1445 		error = ioctlf(fp, SEQUENCER_TMR_CONTINUE, &idat);
1446 		goto out;
1447 	case OSS_TMR_TEMPO:
1448 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
1449 		if (error)
1450 			goto out;
1451 		error = ioctlf(fp, SEQUENCER_TMR_TEMPO, &idat);
1452 		if (error)
1453 			goto out;
1454 		retval[0] = idat;
1455 		break;
1456 	case OSS_TMR_SOURCE:
1457 		error = copyin(SCARG(uap, data), &idat1, sizeof idat);
1458 		if (error)
1459 			goto out;
1460 		idat = 0;
1461 		if (idat1 & OSS_TMR_INTERNAL) idat |= SEQUENCER_TMR_INTERNAL;
1462 		error = ioctlf(fp, SEQUENCER_TMR_SOURCE, &idat);
1463 		if (error)
1464 			goto out;
1465 		idat1 = idat;
1466 		if (idat1 & SEQUENCER_TMR_INTERNAL) idat |= OSS_TMR_INTERNAL;
1467 		retval[0] = idat;
1468 		break;
1469 	case OSS_TMR_METRONOME:
1470 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
1471 		if (error)
1472 			goto out;
1473 		error = ioctlf(fp, SEQUENCER_TMR_METRONOME, &idat);
1474 		goto out;
1475 	case OSS_TMR_SELECT:
1476 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
1477 		if (error)
1478 			goto out;
1479 		retval[0] = idat;
1480 		error = ioctlf(fp, SEQUENCER_TMR_SELECT, &idat);
1481 		goto out;
1482 	default:
1483 		DPRINTF(("%s: Unknown sequencer command 0x%lx\n", __func__,
1484 		    com));
1485 		error = EINVAL;
1486 		goto out;
1487 	}
1488 
1489 	error = copyout(&idat, SCARG(uap, data), sizeof idat);
1490  out:
1491 	fd_putfile(SCARG(uap, fd));
1492 	return error;
1493 }
1494 
1495 /*
1496  * Check that the blocksize is a power of 2 as OSS wants.
1497  * If not, set it to be.
1498  */
1499 static void
1500 setblocksize(file_t *fp, struct audio_info *info)
1501 {
1502 	struct audio_info set;
1503 	u_int s;
1504 
1505 	 if (info->blocksize & (info->blocksize - 1)) {
1506 		for(s = 32; s < info->blocksize; s <<= 1)
1507 			continue;
1508 		AUDIO_INITINFO(&set);
1509 		set.blocksize = s;
1510 		fp->f_ops->fo_ioctl(fp, AUDIO_SETINFO, &set);
1511 		fp->f_ops->fo_ioctl(fp, AUDIO_GETBUFINFO, info);
1512 	}
1513 }
1514