xref: /netbsd-src/sys/compat/ossaudio/ossaudio.c (revision bada23909e740596d0a3785a73bd3583a9807fb8)
1 /*	$NetBSD: ossaudio.c,v 1.26 1998/08/07 00:00:57 augustss Exp $	*/
2 
3 /*
4  * Copyright (c) 1997 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  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *        This product includes software developed by the NetBSD
18  *        Foundation, Inc. and its contributors.
19  * 4. Neither the name of The NetBSD Foundation nor the names of its
20  *    contributors may be used to endorse or promote products derived
21  *    from this software without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
24  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
25  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
26  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
27  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
28  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
29  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
30  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
31  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
32  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33  * POSSIBILITY OF SUCH DAMAGE.
34  */
35 
36 #include <sys/param.h>
37 #include <sys/proc.h>
38 #include <sys/systm.h>
39 #include <sys/file.h>
40 #include <sys/vnode.h>
41 #include <sys/filedesc.h>
42 #include <sys/ioctl.h>
43 #include <sys/mount.h>
44 #include <sys/kernel.h>
45 #include <sys/audioio.h>
46 #include <sys/midiio.h>
47 
48 #include <sys/syscallargs.h>
49 
50 #include <compat/ossaudio/ossaudio.h>
51 #include <compat/ossaudio/ossaudiovar.h>
52 
53 #ifdef AUDIO_DEBUG
54 #define DPRINTF(x) if (ossdebug) printf x
55 int ossdebug = 0;
56 #else
57 #define DPRINTF(x)
58 #endif
59 
60 #define TO_OSSVOL(x) ((x) * 100 / 255)
61 #define FROM_OSSVOL(x) ((x) * 255 / 100)
62 
63 static struct audiodevinfo *getdevinfo __P((struct file *, struct proc *));
64 
65 static void setblocksize __P((struct file *, struct audio_info *, struct proc *));
66 
67 
68 int
69 oss_ioctl_audio(p, uap, retval)
70 	struct proc *p;
71 	struct oss_sys_ioctl_args /* {
72 		syscallarg(int) fd;
73 		syscallarg(u_long) com;
74 		syscallarg(caddr_t) data;
75 	} */ *uap;
76 	register_t *retval;
77 {
78 	struct file *fp;
79 	struct filedesc *fdp;
80 	u_long com;
81 	struct audio_info tmpinfo;
82 	struct audio_offset tmpoffs;
83 	struct oss_audio_buf_info bufinfo;
84 	struct oss_count_info cntinfo;
85 	struct audio_encoding tmpenc;
86 	u_int u;
87 	int idat, idata;
88 	int error;
89 	int (*ioctlf) __P((struct file *, u_long, caddr_t, struct proc *));
90 
91 	fdp = p->p_fd;
92 	if ((u_int)SCARG(uap, fd) >= fdp->fd_nfiles ||
93 	    (fp = fdp->fd_ofiles[SCARG(uap, fd)]) == NULL)
94 		return (EBADF);
95 
96 	if ((fp->f_flag & (FREAD | FWRITE)) == 0)
97 		return (EBADF);
98 
99 	com = SCARG(uap, com);
100 	DPRINTF(("oss_ioctl_audio: com=%08lx\n", com));
101 
102 	retval[0] = 0;
103 
104 	ioctlf = fp->f_ops->fo_ioctl;
105 	switch (com) {
106 	case OSS_SNDCTL_DSP_RESET:
107 		error = ioctlf(fp, AUDIO_FLUSH, (caddr_t)0, p);
108 		if (error)
109 			return error;
110 		break;
111 	case OSS_SNDCTL_DSP_SYNC:
112 	case OSS_SNDCTL_DSP_POST:
113 		error = ioctlf(fp, AUDIO_DRAIN, (caddr_t)0, p);
114 		if (error)
115 			return error;
116 		break;
117 	case OSS_SNDCTL_DSP_SPEED:
118 		AUDIO_INITINFO(&tmpinfo);
119 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
120 		if (error)
121 			return error;
122 		tmpinfo.play.sample_rate =
123 		tmpinfo.record.sample_rate = idat;
124 		error = ioctlf(fp, AUDIO_SETINFO, (caddr_t)&tmpinfo, p);
125 		DPRINTF(("oss_sys_ioctl: SNDCTL_DSP_SPEED %d = %d\n",
126 			 idat, error));
127 		if (error)
128 			return error;
129 		/* fall into ... */
130 	case OSS_SOUND_PCM_READ_RATE:
131 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
132 		if (error)
133 			return error;
134 		idat = tmpinfo.play.sample_rate;
135 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
136 		if (error)
137 			return error;
138 		break;
139 	case OSS_SNDCTL_DSP_STEREO:
140 		AUDIO_INITINFO(&tmpinfo);
141 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
142 		if (error)
143 			return error;
144 		tmpinfo.play.channels =
145 		tmpinfo.record.channels = idat ? 2 : 1;
146 		(void) ioctlf(fp, AUDIO_SETINFO, (caddr_t)&tmpinfo, p);
147 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
148 		if (error)
149 			return error;
150 		idat = tmpinfo.play.channels - 1;
151 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
152 		if (error)
153 			return error;
154 		break;
155 	case OSS_SNDCTL_DSP_GETBLKSIZE:
156 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
157 		if (error)
158 			return error;
159 		setblocksize(fp, &tmpinfo, p);
160 		idat = tmpinfo.blocksize;
161 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
162 		if (error)
163 			return error;
164 		break;
165 	case OSS_SNDCTL_DSP_SETFMT:
166 		AUDIO_INITINFO(&tmpinfo);
167 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
168 		if (error)
169 			return error;
170 		switch (idat) {
171 		case OSS_AFMT_MU_LAW:
172 			tmpinfo.play.precision =
173 			tmpinfo.record.precision = 8;
174 			tmpinfo.play.encoding =
175 			tmpinfo.record.encoding = AUDIO_ENCODING_ULAW;
176 			break;
177 		case OSS_AFMT_A_LAW:
178 			tmpinfo.play.precision =
179 			tmpinfo.record.precision = 8;
180 			tmpinfo.play.encoding =
181 			tmpinfo.record.encoding = AUDIO_ENCODING_ALAW;
182 			break;
183 		case OSS_AFMT_U8:
184 			tmpinfo.play.precision =
185 			tmpinfo.record.precision = 8;
186 			tmpinfo.play.encoding =
187 			tmpinfo.record.encoding = AUDIO_ENCODING_ULINEAR;
188 			break;
189 		case OSS_AFMT_S8:
190 			tmpinfo.play.precision =
191 			tmpinfo.record.precision = 8;
192 			tmpinfo.play.encoding =
193 			tmpinfo.record.encoding = AUDIO_ENCODING_SLINEAR;
194 			break;
195 		case OSS_AFMT_S16_LE:
196 			tmpinfo.play.precision =
197 			tmpinfo.record.precision = 16;
198 			tmpinfo.play.encoding =
199 			tmpinfo.record.encoding = AUDIO_ENCODING_SLINEAR_LE;
200 			break;
201 		case OSS_AFMT_S16_BE:
202 			tmpinfo.play.precision =
203 			tmpinfo.record.precision = 16;
204 			tmpinfo.play.encoding =
205 			tmpinfo.record.encoding = AUDIO_ENCODING_SLINEAR_BE;
206 			break;
207 		case OSS_AFMT_U16_LE:
208 			tmpinfo.play.precision =
209 			tmpinfo.record.precision = 16;
210 			tmpinfo.play.encoding =
211 			tmpinfo.record.encoding = AUDIO_ENCODING_ULINEAR_LE;
212 			break;
213 		case OSS_AFMT_U16_BE:
214 			tmpinfo.play.precision =
215 			tmpinfo.record.precision = 16;
216 			tmpinfo.play.encoding =
217 			tmpinfo.record.encoding = AUDIO_ENCODING_ULINEAR_BE;
218 			break;
219 		default:
220 			return EINVAL;
221 		}
222 		(void) ioctlf(fp, AUDIO_SETINFO, (caddr_t)&tmpinfo, p);
223 		/* fall into ... */
224 	case OSS_SOUND_PCM_READ_BITS:
225 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
226 		if (error)
227 			return error;
228 		switch (tmpinfo.play.encoding) {
229 		case AUDIO_ENCODING_ULAW:
230 			idat = OSS_AFMT_MU_LAW;
231 			break;
232 		case AUDIO_ENCODING_ALAW:
233 			idat = OSS_AFMT_A_LAW;
234 			break;
235 		case AUDIO_ENCODING_SLINEAR_LE:
236 			if (tmpinfo.play.precision == 16)
237 				idat = OSS_AFMT_S16_LE;
238 			else
239 				idat = OSS_AFMT_S8;
240 			break;
241 		case AUDIO_ENCODING_SLINEAR_BE:
242 			if (tmpinfo.play.precision == 16)
243 				idat = OSS_AFMT_S16_BE;
244 			else
245 				idat = OSS_AFMT_S8;
246 			break;
247 		case AUDIO_ENCODING_ULINEAR_LE:
248 			if (tmpinfo.play.precision == 16)
249 				idat = OSS_AFMT_U16_LE;
250 			else
251 				idat = OSS_AFMT_U8;
252 			break;
253 		case AUDIO_ENCODING_ULINEAR_BE:
254 			if (tmpinfo.play.precision == 16)
255 				idat = OSS_AFMT_U16_BE;
256 			else
257 				idat = OSS_AFMT_U8;
258 			break;
259 		case AUDIO_ENCODING_ADPCM:
260 			idat = OSS_AFMT_IMA_ADPCM;
261 			break;
262 		}
263 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
264 		if (error)
265 			return error;
266 		break;
267 	case OSS_SNDCTL_DSP_CHANNELS:
268 		AUDIO_INITINFO(&tmpinfo);
269 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
270 		if (error)
271 			return error;
272 		tmpinfo.play.channels =
273 		tmpinfo.record.channels = idat;
274 		(void) ioctlf(fp, AUDIO_SETINFO, (caddr_t)&tmpinfo, p);
275 		/* fall into ... */
276 	case OSS_SOUND_PCM_READ_CHANNELS:
277 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
278 		if (error)
279 			return error;
280 		idat = tmpinfo.play.channels;
281 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
282 		if (error)
283 			return error;
284 		break;
285 	case OSS_SOUND_PCM_WRITE_FILTER:
286 	case OSS_SOUND_PCM_READ_FILTER:
287 		return EINVAL; /* XXX unimplemented */
288 	case OSS_SNDCTL_DSP_SUBDIVIDE:
289 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
290 		if (error)
291 			return error;
292 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
293 		setblocksize(fp, &tmpinfo, p);
294 		if (error)
295 			return error;
296 		if (idat == 0)
297 			idat = tmpinfo.play.buffer_size / tmpinfo.blocksize;
298 		idat = (tmpinfo.play.buffer_size / idat) & -4;
299 		AUDIO_INITINFO(&tmpinfo);
300 		tmpinfo.blocksize = idat;
301 		error = ioctlf(fp, AUDIO_SETINFO, (caddr_t)&tmpinfo, p);
302 		if (error)
303 			return error;
304 		idat = tmpinfo.play.buffer_size / tmpinfo.blocksize;
305 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
306 		if (error)
307 			return error;
308 		break;
309 	case OSS_SNDCTL_DSP_SETFRAGMENT:
310 		AUDIO_INITINFO(&tmpinfo);
311 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
312 		if (error)
313 			return error;
314 		if ((idat & 0xffff) < 4 || (idat & 0xffff) > 17)
315 			return EINVAL;
316 		tmpinfo.blocksize = 1 << (idat & 0xffff);
317 		tmpinfo.hiwat = (idat >> 16) & 0x7fff;
318 		DPRINTF(("oss_audio: SETFRAGMENT blksize=%d, hiwat=%d\n",
319 			 tmpinfo.blocksize, tmpinfo.hiwat));
320 		if (tmpinfo.hiwat == 0)	/* 0 means set to max */
321 			tmpinfo.hiwat = 65536;
322 		(void) ioctlf(fp, AUDIO_SETINFO, (caddr_t)&tmpinfo, p);
323 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
324 		if (error)
325 			return error;
326 		u = tmpinfo.blocksize;
327 		for(idat = 0; u > 1; idat++, u >>= 1)
328 			;
329 		idat |= (tmpinfo.hiwat & 0x7fff) << 16;
330 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
331 		if (error)
332 			return error;
333 		break;
334 	case OSS_SNDCTL_DSP_GETFMTS:
335 		for(idat = 0, tmpenc.index = 0;
336 		    ioctlf(fp, AUDIO_GETENC, (caddr_t)&tmpenc, p) == 0;
337 		    tmpenc.index++) {
338 			if (tmpenc.flags & AUDIO_ENCODINGFLAG_EMULATED)
339 				continue; /* Don't report emulated modes */
340 			switch(tmpenc.encoding) {
341 			case AUDIO_ENCODING_ULAW:
342 				idat |= OSS_AFMT_MU_LAW;
343 				break;
344 			case AUDIO_ENCODING_ALAW:
345 				idat |= OSS_AFMT_A_LAW;
346 				break;
347 			case AUDIO_ENCODING_SLINEAR:
348 				idat |= OSS_AFMT_S8;
349 				break;
350 			case AUDIO_ENCODING_SLINEAR_LE:
351 				if (tmpenc.precision == 16)
352 					idat |= OSS_AFMT_S16_LE;
353 				else
354 					idat |= OSS_AFMT_S8;
355 				break;
356 			case AUDIO_ENCODING_SLINEAR_BE:
357 				if (tmpenc.precision == 16)
358 					idat |= OSS_AFMT_S16_BE;
359 				else
360 					idat |= OSS_AFMT_S8;
361 				break;
362 			case AUDIO_ENCODING_ULINEAR:
363 				idat |= OSS_AFMT_U8;
364 				break;
365 			case AUDIO_ENCODING_ULINEAR_LE:
366 				if (tmpenc.precision == 16)
367 					idat |= OSS_AFMT_U16_LE;
368 				else
369 					idat |= OSS_AFMT_U8;
370 				break;
371 			case AUDIO_ENCODING_ULINEAR_BE:
372 				if (tmpenc.precision == 16)
373 					idat |= OSS_AFMT_U16_BE;
374 				else
375 					idat |= OSS_AFMT_U8;
376 				break;
377 			case AUDIO_ENCODING_ADPCM:
378 				idat |= OSS_AFMT_IMA_ADPCM;
379 				break;
380 			default:
381 				break;
382 			}
383 		}
384 		DPRINTF(("oss_sys_ioctl: SNDCTL_DSP_GETFMTS = %x\n", idat));
385 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
386 		if (error)
387 			return error;
388 		break;
389 	case OSS_SNDCTL_DSP_GETOSPACE:
390 	case OSS_SNDCTL_DSP_GETISPACE:
391 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
392 		if (error)
393 			return error;
394 		setblocksize(fp, &tmpinfo, p);
395 		bufinfo.fragsize = tmpinfo.blocksize;
396 		bufinfo.fragments = /* XXX */
397 		bufinfo.fragstotal = tmpinfo.play.buffer_size / bufinfo.fragsize;
398 		bufinfo.bytes = tmpinfo.play.buffer_size;
399 		DPRINTF(("oss_sys_ioctl: SNDCTL_DSP_GETxSPACE = %d %d %d %d\n",
400 			 bufinfo.fragsize, bufinfo.fragments,
401 			 bufinfo.fragstotal, bufinfo.bytes));
402 		error = copyout(&bufinfo, SCARG(uap, data), sizeof bufinfo);
403 		if (error)
404 			return error;
405 		break;
406 	case OSS_SNDCTL_DSP_NONBLOCK:
407 		idat = 1;
408 		error = ioctlf(fp, FIONBIO, (caddr_t)&idat, p);
409 		if (error)
410 			return error;
411 		break;
412 	case OSS_SNDCTL_DSP_GETCAPS:
413 		error = ioctlf(fp, AUDIO_GETPROPS, (caddr_t)&idata, p);
414 		if (error)
415 			return error;
416 		idat = OSS_DSP_CAP_TRIGGER; /* pretend we have trigger */
417 		if (idata & AUDIO_PROP_FULLDUPLEX)
418 			idat |= OSS_DSP_CAP_DUPLEX;
419 		if (idata & AUDIO_PROP_MMAP)
420 			idat |= OSS_DSP_CAP_MMAP;
421 		DPRINTF(("oss_sys_ioctl: SNDCTL_DSP_GETCAPS = %x\n", idat));
422 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
423 		if (error)
424 			return error;
425 		break;
426 #if 0
427 	case OSS_SNDCTL_DSP_GETTRIGGER:
428 		error = ioctlf(fp, AUDIO_GETINFO, (caddr_t)&tmpinfo, p);
429 		if (error)
430 			return error;
431 		idat = (tmpinfo.play.pause ? 0 : OSS_PCM_ENABLE_OUTPUT) |
432 		       (tmpinfo.record.pause ? 0 : OSS_PCM_ENABLE_INPUT);
433 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
434 		if (error)
435 			return error;
436 		break;
437 	case OSS_SNDCTL_DSP_SETTRIGGER:
438 		AUDIO_INITINFO(&tmpinfo);
439 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
440 		if (error)
441 			return error;
442 		tmpinfo.play.pause = (idat & OSS_PCM_ENABLE_OUTPUT) == 0;
443 		tmpinfo.record.pause = (idat & OSS_PCM_ENABLE_INPUT) == 0;
444 		(void) ioctlf(fp, AUDIO_SETINFO, (caddr_t)&tmpinfo, p);
445 		error = copyout(&idat, SCARG(uap, data), sizeof idat);
446 		if (error)
447 			return error;
448 		break;
449 #else
450 	case OSS_SNDCTL_DSP_GETTRIGGER:
451 	case OSS_SNDCTL_DSP_SETTRIGGER:
452 		/* XXX Do nothing for now. */
453 		idat = OSS_PCM_ENABLE_OUTPUT;
454 		return copyout(&idat, SCARG(uap, data), sizeof idat);
455 #endif
456 	case OSS_SNDCTL_DSP_GETIPTR:
457 		error = ioctlf(fp, AUDIO_GETIOFFS, (caddr_t)&tmpoffs, p);
458 		if (error)
459 			return error;
460 		cntinfo.bytes = tmpoffs.samples;
461 		cntinfo.blocks = tmpoffs.deltablks;
462 		cntinfo.ptr = tmpoffs.offset;
463 		error = copyout(&cntinfo, SCARG(uap, data), sizeof cntinfo);
464 		if (error)
465 			return error;
466 		break;
467 	case OSS_SNDCTL_DSP_GETOPTR:
468 		error = ioctlf(fp, AUDIO_GETOOFFS, (caddr_t)&tmpoffs, p);
469 		if (error)
470 			return error;
471 		cntinfo.bytes = tmpoffs.samples;
472 		cntinfo.blocks = tmpoffs.deltablks;
473 		cntinfo.ptr = tmpoffs.offset;
474 		error = copyout(&cntinfo, SCARG(uap, data), sizeof cntinfo);
475 		if (error)
476 			return error;
477 		break;
478 	case OSS_SNDCTL_DSP_MAPINBUF:
479 	case OSS_SNDCTL_DSP_MAPOUTBUF:
480 	case OSS_SNDCTL_DSP_SETSYNCRO:
481 	case OSS_SNDCTL_DSP_SETDUPLEX:
482 	case OSS_SNDCTL_DSP_PROFILE:
483 		return EINVAL; /* XXX unimplemented */
484 	default:
485 		return EINVAL;
486 	}
487 
488 	return 0;
489 }
490 
491 /* If the NetBSD mixer device should have more than 32 devices
492  * some will not be available to Linux */
493 #define NETBSD_MAXDEVS 64
494 struct audiodevinfo {
495 	int done;
496 	dev_t dev;
497 	int16_t devmap[OSS_SOUND_MIXER_NRDEVICES],
498 	        rdevmap[NETBSD_MAXDEVS];
499         u_long devmask, recmask, stereomask;
500 	u_long caps, source;
501 };
502 
503 /*
504  * Collect the audio device information to allow faster
505  * emulation of the Linux mixer ioctls.  Cache the information
506  * to eliminate the overhead of repeating all the ioctls needed
507  * to collect the information.
508  */
509 static struct audiodevinfo *
510 getdevinfo(fp, p)
511 	struct file *fp;
512 	struct proc *p;
513 {
514 	mixer_devinfo_t mi;
515 	int i;
516 	static struct {
517 		char *name;
518 		int code;
519 	} *dp, devs[] = {
520 		{ AudioNmicrophone,	OSS_SOUND_MIXER_MIC },
521 		{ AudioNline,		OSS_SOUND_MIXER_LINE },
522 		{ AudioNcd,		OSS_SOUND_MIXER_CD },
523 		{ AudioNdac,		OSS_SOUND_MIXER_PCM },
524 		{ AudioNrecord,		OSS_SOUND_MIXER_IMIX },
525 		{ AudioNmaster,		OSS_SOUND_MIXER_VOLUME },
526 		{ AudioNtreble,		OSS_SOUND_MIXER_TREBLE },
527 		{ AudioNbass,		OSS_SOUND_MIXER_BASS },
528 		{ AudioNspeaker,	OSS_SOUND_MIXER_SPEAKER },
529 /*		{ AudioNheadphone,	?? },*/
530 		{ AudioNoutput,		OSS_SOUND_MIXER_OGAIN },
531 		{ AudioNinput,		OSS_SOUND_MIXER_IGAIN },
532 /*		{ AudioNmaster,		OSS_SOUND_MIXER_SPEAKER },*/
533 /*		{ AudioNstereo,		?? },*/
534 /*		{ AudioNmono,		?? },*/
535 		{ AudioNfmsynth,	OSS_SOUND_MIXER_SYNTH },
536 /*		{ AudioNwave,		OSS_SOUND_MIXER_PCM },*/
537 		{ AudioNmidi,		OSS_SOUND_MIXER_SYNTH },
538 /*		{ AudioNmixerout,	?? },*/
539 		{ 0, -1 }
540 	};
541 	int (*ioctlf) __P((struct file *, u_long, caddr_t, struct proc *)) =
542 	    fp->f_ops->fo_ioctl;
543 	struct vnode *vp;
544 	struct vattr va;
545 	static struct audiodevinfo devcache = { 0 };
546 	struct audiodevinfo *di = &devcache;
547 
548 	/* Figure out what device it is so we can check if the
549 	 * cached data is valid.
550 	 */
551 	vp = (struct vnode *)fp->f_data;
552 	if (vp->v_type != VCHR)
553 		return 0;
554 	if (VOP_GETATTR(vp, &va, p->p_ucred, p))
555 		return 0;
556 	if (di->done && di->dev == va.va_rdev)
557 		return di;
558 
559 	di->done = 1;
560 	di->dev = va.va_rdev;
561 	di->devmask = 0;
562 	di->recmask = 0;
563 	di->stereomask = 0;
564 	di->source = -1;
565 	di->caps = 0;
566 	for(i = 0; i < OSS_SOUND_MIXER_NRDEVICES; i++)
567 		di->devmap[i] = -1;
568 	for(i = 0; i < NETBSD_MAXDEVS; i++)
569 		di->rdevmap[i] = -1;
570 	for(i = 0; i < NETBSD_MAXDEVS; i++) {
571 		mi.index = i;
572 		if (ioctlf(fp, AUDIO_MIXER_DEVINFO, (caddr_t)&mi, p) < 0)
573 			break;
574 		switch(mi.type) {
575 		case AUDIO_MIXER_VALUE:
576 			for(dp = devs; dp->name; dp++)
577 		    		if (strcmp(dp->name, mi.label.name) == 0)
578 					break;
579 			if (dp->code >= 0) {
580 				di->devmap[dp->code] = i;
581 				di->rdevmap[i] = dp->code;
582 				di->devmask |= 1 << dp->code;
583 				if (mi.un.v.num_channels == 2)
584 					di->stereomask |= 1 << dp->code;
585 			}
586 			break;
587 		case AUDIO_MIXER_ENUM:
588 			if (strcmp(mi.label.name, AudioNsource) == 0) {
589 				int j;
590 				di->source = i;
591 				for(j = 0; j < mi.un.e.num_mem; j++)
592 					di->recmask |= 1 << di->rdevmap[mi.un.e.member[j].ord];
593 				di->caps = OSS_SOUND_CAP_EXCL_INPUT;
594 			}
595 			break;
596 		case AUDIO_MIXER_SET:
597 			if (strcmp(mi.label.name, AudioNsource) == 0) {
598 				int j;
599 				di->source = i;
600 				for(j = 0; j < mi.un.s.num_mem; j++) {
601 					int k, mask = mi.un.s.member[j].mask;
602 					if (mask) {
603 						for(k = 0; !(mask & 1); mask >>= 1, k++)
604 							;
605 						di->recmask |= 1 << di->rdevmap[k];
606 					}
607 				}
608 			}
609 			break;
610 		}
611 	}
612 	return di;
613 }
614 
615 int
616 oss_ioctl_mixer(p, uap, retval)
617 	struct proc *p;
618 	struct oss_sys_ioctl_args /* {
619 		syscallarg(int) fd;
620 		syscallarg(u_long) com;
621 		syscallarg(caddr_t) data;
622 	} */ *uap;
623 	register_t *retval;
624 {
625 	struct file *fp;
626 	struct filedesc *fdp;
627 	u_long com;
628 	struct audiodevinfo *di;
629 	mixer_ctrl_t mc;
630 	int idat;
631 	int i;
632 	int error;
633 	int l, r, n;
634 	int (*ioctlf) __P((struct file *, u_long, caddr_t, struct proc *));
635 
636 	fdp = p->p_fd;
637 	if ((u_int)SCARG(uap, fd) >= fdp->fd_nfiles ||
638 	    (fp = fdp->fd_ofiles[SCARG(uap, fd)]) == NULL)
639 		return (EBADF);
640 
641 	if ((fp->f_flag & (FREAD | FWRITE)) == 0)
642 		return (EBADF);
643 
644 	com = SCARG(uap, com);
645 	DPRINTF(("oss_ioctl_mixer: com=%08lx\n", com));
646 
647 	retval[0] = 0;
648 
649 	di = getdevinfo(fp, p);
650 	if (di == 0)
651 		return EINVAL;
652 
653 	ioctlf = fp->f_ops->fo_ioctl;
654 	switch (com) {
655 	case OSS_SOUND_MIXER_READ_RECSRC:
656 		if (di->source == -1)
657 			return EINVAL;
658 		mc.dev = di->source;
659 		if (di->caps & OSS_SOUND_CAP_EXCL_INPUT) {
660 			mc.type = AUDIO_MIXER_ENUM;
661 			error = ioctlf(fp, AUDIO_MIXER_READ, (caddr_t)&mc, p);
662 			if (error)
663 				return error;
664 			idat = 1 << di->rdevmap[mc.un.ord];
665 		} else {
666 			int k;
667 			unsigned int mask;
668 			mc.type = AUDIO_MIXER_SET;
669 			error = ioctlf(fp, AUDIO_MIXER_READ, (caddr_t)&mc, p);
670 			if (error)
671 				return error;
672 			idat = 0;
673 			for(mask = mc.un.mask, k = 0; mask; mask >>= 1, k++)
674 				if (mask & 1)
675 					idat |= 1 << di->rdevmap[k];
676 		}
677 		break;
678 	case OSS_SOUND_MIXER_READ_DEVMASK:
679 		idat = di->devmask;
680 		break;
681 	case OSS_SOUND_MIXER_READ_RECMASK:
682 		idat = di->recmask;
683 		break;
684 	case OSS_SOUND_MIXER_READ_STEREODEVS:
685 		idat = di->stereomask;
686 		break;
687 	case OSS_SOUND_MIXER_READ_CAPS:
688 		idat = di->caps;
689 		break;
690 	case OSS_SOUND_MIXER_WRITE_RECSRC:
691 	case OSS_SOUND_MIXER_WRITE_R_RECSRC:
692 		if (di->source == -1)
693 			return EINVAL;
694 		mc.dev = di->source;
695 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
696 		if (error)
697 			return error;
698 		if (di->caps & OSS_SOUND_CAP_EXCL_INPUT) {
699 			mc.type = AUDIO_MIXER_ENUM;
700 			for(i = 0; i < OSS_SOUND_MIXER_NRDEVICES; i++)
701 				if (idat & (1 << i))
702 					break;
703 			if (i >= OSS_SOUND_MIXER_NRDEVICES ||
704 			    di->devmap[i] == -1)
705 				return EINVAL;
706 			mc.un.ord = di->devmap[i];
707 		} else {
708 			mc.type = AUDIO_MIXER_SET;
709 			mc.un.mask = 0;
710 			for(i = 0; i < OSS_SOUND_MIXER_NRDEVICES; i++) {
711 				if (idat & (1 << i)) {
712 					if (di->devmap[i] == -1)
713 						return EINVAL;
714 					mc.un.mask |= 1 << di->devmap[i];
715 				}
716 			}
717 		}
718 		return ioctlf(fp, AUDIO_MIXER_WRITE, (caddr_t)&mc, p);
719 	default:
720 		if (OSS_MIXER_READ(OSS_SOUND_MIXER_FIRST) <= com &&
721 		    com < OSS_MIXER_READ(OSS_SOUND_MIXER_NRDEVICES)) {
722 			n = OSS_GET_DEV(com);
723 			if (di->devmap[n] == -1)
724 				return EINVAL;
725 		    doread:
726 			mc.dev = di->devmap[n];
727 			mc.type = AUDIO_MIXER_VALUE;
728 			mc.un.value.num_channels = di->stereomask & (1<<n) ? 2 : 1;
729 			error = ioctlf(fp, AUDIO_MIXER_READ, (caddr_t)&mc, p);
730 			if (error)
731 				return error;
732 			if (mc.un.value.num_channels != 2) {
733 				l = r = mc.un.value.level[AUDIO_MIXER_LEVEL_MONO];
734 			} else {
735 				l = mc.un.value.level[AUDIO_MIXER_LEVEL_LEFT];
736 				r = mc.un.value.level[AUDIO_MIXER_LEVEL_RIGHT];
737 			}
738 			idat = TO_OSSVOL(l) | (TO_OSSVOL(r) << 8);
739 			DPRINTF(("OSS_MIXER_READ  n=%d (dev=%d) l=%d, r=%d, idat=%04x\n",
740 				 n, di->devmap[n], l, r, idat));
741 			break;
742 		} else if ((OSS_MIXER_WRITE_R(OSS_SOUND_MIXER_FIRST) <= com &&
743 			   com < OSS_MIXER_WRITE_R(OSS_SOUND_MIXER_NRDEVICES)) ||
744 			   (OSS_MIXER_WRITE(OSS_SOUND_MIXER_FIRST) <= com &&
745 			   com < OSS_MIXER_WRITE(OSS_SOUND_MIXER_NRDEVICES))) {
746 			n = OSS_GET_DEV(com);
747 			if (di->devmap[n] == -1)
748 				return EINVAL;
749 			error = copyin(SCARG(uap, data), &idat, sizeof idat);
750 			if (error)
751 				return error;
752 			l = FROM_OSSVOL( idat       & 0xff);
753 			r = FROM_OSSVOL((idat >> 8) & 0xff);
754 			mc.dev = di->devmap[n];
755 			mc.type = AUDIO_MIXER_VALUE;
756 			if (di->stereomask & (1<<n)) {
757 				mc.un.value.num_channels = 2;
758 				mc.un.value.level[AUDIO_MIXER_LEVEL_LEFT] = l;
759 				mc.un.value.level[AUDIO_MIXER_LEVEL_RIGHT] = r;
760 			} else {
761 				mc.un.value.num_channels = 1;
762 				mc.un.value.level[AUDIO_MIXER_LEVEL_MONO] = (l+r)/2;
763 			}
764 			DPRINTF(("OSS_MIXER_WRITE n=%d (dev=%d) l=%d, r=%d, idat=%04x\n",
765 				 n, di->devmap[n], l, r, idat));
766 			error = ioctlf(fp, AUDIO_MIXER_WRITE, (caddr_t)&mc, p);
767 			if (error)
768 				return error;
769 			if (OSS_MIXER_WRITE(OSS_SOUND_MIXER_FIRST) <= com &&
770 			   com < OSS_MIXER_WRITE(OSS_SOUND_MIXER_NRDEVICES))
771 				return 0;
772 			goto doread;
773 		} else {
774 #ifdef AUDIO_DEBUG
775 			printf("oss_audio: unknown mixer ioctl %04lx\n", com);
776 #endif
777 			return EINVAL;
778 		}
779 	}
780 	return copyout(&idat, SCARG(uap, data), sizeof idat);
781 }
782 
783 /* Sequencer emulation */
784 int
785 oss_ioctl_sequencer(p, uap, retval)
786 	struct proc *p;
787 	struct oss_sys_ioctl_args /* {
788 		syscallarg(int) fd;
789 		syscallarg(u_long) com;
790 		syscallarg(caddr_t) data;
791 	} */ *uap;
792 	register_t *retval;
793 {
794 	struct file *fp;
795 	struct filedesc *fdp;
796 	u_long com;
797 	int idat, idat1;
798 	struct synth_info si;
799 	struct oss_synth_info osi;
800 	struct oss_seq_event_rec oser;
801 	int error;
802 	int (*ioctlf) __P((struct file *, u_long, caddr_t, struct proc *));
803 
804 	fdp = p->p_fd;
805 	if ((u_int)SCARG(uap, fd) >= fdp->fd_nfiles ||
806 	    (fp = fdp->fd_ofiles[SCARG(uap, fd)]) == NULL)
807 		return (EBADF);
808 
809 	if ((fp->f_flag & (FREAD | FWRITE)) == 0)
810 		return (EBADF);
811 
812 	com = SCARG(uap, com);
813 	DPRINTF(("oss_ioctl_sequencer: com=%08lx\n", com));
814 
815 	retval[0] = 0;
816 
817 	ioctlf = fp->f_ops->fo_ioctl;
818 	switch (com) {
819 	case OSS_SEQ_RESET:
820 		return ioctlf(fp, SEQUENCER_RESET, (caddr_t)&idat, p);
821 	case OSS_SEQ_SYNC:
822 		return ioctlf(fp, SEQUENCER_SYNC, (caddr_t)&idat, p);
823 	case OSS_SYNTH_INFO:
824 		error = copyin(SCARG(uap, data), &osi, sizeof osi);
825 		if (error)
826 			return error;
827 		si.device = osi.device;
828 		error = ioctlf(fp, SEQUENCER_INFO, (caddr_t)&si, p);
829 		if (error)
830 			return error;
831 		strncpy(osi.name, si.name, sizeof osi.name);
832 		osi.device = si.device;
833 		switch(si.synth_type) {
834 		case SYNTH_TYPE_FM:
835 			osi.synth_type = OSS_SYNTH_TYPE_FM; break;
836 		case SYNTH_TYPE_SAMPLE:
837 			osi.synth_type = OSS_SYNTH_TYPE_SAMPLE; break;
838 		case SYNTH_TYPE_MIDI:
839 			osi.synth_type = OSS_SYNTH_TYPE_MIDI; break;
840 		default:
841 			osi.synth_type = 0; break;
842 		}
843 		switch(si.synth_subtype) {
844 		case SYNTH_SUB_FM_TYPE_ADLIB:
845 			osi.synth_subtype = OSS_FM_TYPE_ADLIB; break;
846 		case SYNTH_SUB_FM_TYPE_OPL3:
847 			osi.synth_subtype = OSS_FM_TYPE_OPL3; break;
848 		case SYNTH_SUB_MIDI_TYPE_MPU401:
849 			osi.synth_subtype = OSS_MIDI_TYPE_MPU401; break;
850 		case SYNTH_SUB_SAMPLE_TYPE_BASIC:
851 			osi.synth_subtype = OSS_SAMPLE_TYPE_BASIC; break;
852 		default:
853 			osi.synth_subtype = 0; break;
854 		}
855 		osi.perc_mode = 0;
856 		osi.nr_voices = si.nr_voices;
857 		osi.nr_drums = 0;
858 		osi.instr_bank_size = si.instr_bank_size;
859 		osi.capabilities = 0;
860 		if (si.capabilities & SYNTH_CAP_OPL3)
861 			osi.capabilities |= OSS_SYNTH_CAP_OPL3;
862 		if (si.capabilities & SYNTH_CAP_INPUT)
863 			osi.capabilities |= OSS_SYNTH_CAP_INPUT;
864 		return copyout(&osi, SCARG(uap, data), sizeof osi);
865 	case OSS_SEQ_CTRLRATE:
866 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
867 		if (error)
868 			return error;
869 		error = ioctlf(fp, SEQUENCER_CTRLRATE, (caddr_t)&idat, p);
870 		if (error)
871 			return error;
872 		retval[0] = idat;
873 		break;
874 	case OSS_SEQ_GETOUTCOUNT:
875 		error = ioctlf(fp, SEQUENCER_GETOUTCOUNT, (caddr_t)&idat, p);
876 		if (error)
877 			return error;
878 		retval[0] = idat;
879 		break;
880 	case OSS_SEQ_GETINCOUNT:
881 		error = ioctlf(fp, SEQUENCER_GETINCOUNT, (caddr_t)&idat, p);
882 		if (error)
883 			return error;
884 		retval[0] = idat;
885 		break;
886 	case OSS_SEQ_NRSYNTHS:
887 		error = ioctlf(fp, SEQUENCER_NRSYNTHS, (caddr_t)&idat, p);
888 		if (error)
889 			return error;
890 		retval[0] = idat;
891 		break;
892 	case OSS_SEQ_NRMIDIS:
893 		error = ioctlf(fp, SEQUENCER_NRMIDIS, (caddr_t)&idat, p);
894 		if (error)
895 			return error;
896 		retval[0] = idat;
897 		break;
898 	case OSS_SEQ_THRESHOLD:
899 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
900 		if (error)
901 			return error;
902 		return ioctlf(fp, SEQUENCER_THRESHOLD, (caddr_t)&idat, p);
903 	case OSS_MEMAVL:
904 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
905 		if (error)
906 			return error;
907 		error = ioctlf(fp, SEQUENCER_MEMAVL, (caddr_t)&idat, p);
908 		if (error)
909 			return error;
910 		retval[0] = idat;
911 		break;
912 	case OSS_SEQ_PANIC:
913 		return ioctlf(fp, SEQUENCER_PANIC, (caddr_t)&idat, p);
914 	case OSS_SEQ_OUTOFBAND:
915 		error = copyin(SCARG(uap, data), &oser, sizeof oser);
916 		if (error)
917 			return error;
918 		error = ioctlf(fp, SEQUENCER_OUTOFBAND, (caddr_t)&oser, p);
919 		if (error)
920 			return error;
921 		break;
922 	case OSS_SEQ_GETTIME:
923 		error = ioctlf(fp, SEQUENCER_GETTIME, (caddr_t)&idat, p);
924 		if (error)
925 			return error;
926 		retval[0] = idat;
927 		break;
928 	case OSS_TMR_TIMEBASE:
929 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
930 		if (error)
931 			return error;
932 		error = ioctlf(fp, SEQUENCER_TMR_TIMEBASE, (caddr_t)&idat, p);
933 		if (error)
934 			return error;
935 		retval[0] = idat;
936 		break;
937 	case OSS_TMR_START:
938 		return ioctlf(fp, SEQUENCER_TMR_START, (caddr_t)&idat, p);
939 	case OSS_TMR_STOP:
940 		return ioctlf(fp, SEQUENCER_TMR_STOP, (caddr_t)&idat, p);
941 	case OSS_TMR_CONTINUE:
942 		return ioctlf(fp, SEQUENCER_TMR_CONTINUE, (caddr_t)&idat, p);
943 	case OSS_TMR_TEMPO:
944 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
945 		if (error)
946 			return error;
947 		error = ioctlf(fp, SEQUENCER_TMR_TEMPO, (caddr_t)&idat, p);
948 		if (error)
949 			return error;
950 		retval[0] = idat;
951 		break;
952 	case OSS_TMR_SOURCE:
953 		error = copyin(SCARG(uap, data), &idat1, sizeof idat);
954 		if (error)
955 			return error;
956 		idat = 0;
957 		if (idat1 & OSS_TMR_INTERNAL) idat |= SEQUENCER_TMR_INTERNAL;
958 		error = ioctlf(fp, SEQUENCER_TMR_SOURCE, (caddr_t)&idat, p);
959 		if (error)
960 			return error;
961 		idat1 = idat;
962 		if (idat1 & SEQUENCER_TMR_INTERNAL) idat |= OSS_TMR_INTERNAL;
963 		retval[0] = idat;
964 		break;
965 	case OSS_TMR_METRONOME:
966 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
967 		if (error)
968 			return error;
969 		return ioctlf(fp, SEQUENCER_TMR_METRONOME, (caddr_t)&idat, p);
970 	case OSS_TMR_SELECT:
971 		error = copyin(SCARG(uap, data), &idat, sizeof idat);
972 		if (error)
973 			return error;
974 		retval[0] = idat;
975 		return ioctlf(fp, SEQUENCER_TMR_SELECT, (caddr_t)&idat, p);
976 	default:
977 		return EINVAL;
978 	}
979 
980 	return copyout(&idat, SCARG(uap, data), sizeof idat);
981 }
982 
983 /*
984  * Check that the blocksize is a power of 2 as OSS wants.
985  * If not, set it to be.
986  */
987 static void setblocksize(fp, info, p)
988 	struct file *fp;
989 	struct audio_info *info;
990 	struct proc *p;
991 {
992 	struct audio_info set;
993 	int s;
994 
995 	if (info->blocksize & (info->blocksize-1)) {
996 		for(s = 32; s < info->blocksize; s <<= 1)
997 			;
998 		AUDIO_INITINFO(&set);
999 		set.blocksize = s;
1000 		fp->f_ops->fo_ioctl(fp, AUDIO_SETINFO, (caddr_t)&set, p);
1001 		fp->f_ops->fo_ioctl(fp, AUDIO_GETINFO, (caddr_t)info, p);
1002 	}
1003 }
1004