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