ossaudio.c revision 1.26 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