sbdsp.c revision 1.94 1 /* $NetBSD: sbdsp.c,v 1.94 1999/02/18 15:47:29 mycroft Exp $ */
2
3 /*
4 * Copyright (c) 1991-1993 Regents of the University of California.
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 Computer Systems
18 * Engineering Group at Lawrence Berkeley Laboratory.
19 * 4. Neither the name of the University nor of the Laboratory may be used
20 * to endorse or promote products derived from this software without
21 * specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 *
35 */
36
37 /*
38 * SoundBlaster Pro code provided by John Kohl, based on lots of
39 * information he gleaned from Steve Haehnichen <steve (at) vigra.com>'s
40 * SBlast driver for 386BSD and DOS driver code from Daniel Sachs
41 * <sachs (at) meibm15.cen.uiuc.edu>.
42 * Lots of rewrites by Lennart Augustsson <augustss (at) cs.chalmers.se>
43 * with information from SB "Hardware Programming Guide" and the
44 * Linux drivers.
45 */
46
47 #include "midi.h"
48
49 #include <sys/param.h>
50 #include <sys/systm.h>
51 #include <sys/errno.h>
52 #include <sys/ioctl.h>
53 #include <sys/syslog.h>
54 #include <sys/device.h>
55 #include <sys/proc.h>
56 #include <sys/buf.h>
57 #include <vm/vm.h>
58
59 #include <machine/cpu.h>
60 #include <machine/intr.h>
61 #include <machine/bus.h>
62
63 #include <sys/audioio.h>
64 #include <dev/audio_if.h>
65 #include <dev/midi_if.h>
66 #include <dev/mulaw.h>
67 #include <dev/auconv.h>
68
69 #include <dev/isa/isavar.h>
70 #include <dev/isa/isadmavar.h>
71
72 #include <dev/isa/sbreg.h>
73 #include <dev/isa/sbdspvar.h>
74
75
76 #ifdef AUDIO_DEBUG
77 #define DPRINTF(x) if (sbdspdebug) printf x
78 #define DPRINTFN(n,x) if (sbdspdebug >= (n)) printf x
79 int sbdspdebug = 0;
80 #else
81 #define DPRINTF(x)
82 #define DPRINTFN(n,x)
83 #endif
84
85 #ifndef SBDSP_NPOLL
86 #define SBDSP_NPOLL 3000
87 #endif
88
89 struct {
90 int wdsp;
91 int rdsp;
92 int wmidi;
93 } sberr;
94
95 /*
96 * Time constant routines follow. See SBK, section 12.
97 * Although they don't come out and say it (in the docs),
98 * the card clearly uses a 1MHz countdown timer, as the
99 * low-speed formula (p. 12-4) is:
100 * tc = 256 - 10^6 / sr
101 * In high-speed mode, the constant is the upper byte of a 16-bit counter,
102 * and a 256MHz clock is used:
103 * tc = 65536 - 256 * 10^ 6 / sr
104 * Since we can only use the upper byte of the HS TC, the two formulae
105 * are equivalent. (Why didn't they say so?) E.g.,
106 * (65536 - 256 * 10 ^ 6 / x) >> 8 = 256 - 10^6 / x
107 *
108 * The crossover point (from low- to high-speed modes) is different
109 * for the SBPRO and SB20. The table on p. 12-5 gives the following data:
110 *
111 * SBPRO SB20
112 * ----- --------
113 * input ls min 4 KHz 4 KHz
114 * input ls max 23 KHz 13 KHz
115 * input hs max 44.1 KHz 15 KHz
116 * output ls min 4 KHz 4 KHz
117 * output ls max 23 KHz 23 KHz
118 * output hs max 44.1 KHz 44.1 KHz
119 */
120 /* XXX Should we round the tc?
121 #define SB_RATE_TO_TC(x) (((65536 - 256 * 1000000 / (x)) + 128) >> 8)
122 */
123 #define SB_RATE_TO_TC(x) (256 - 1000000 / (x))
124 #define SB_TC_TO_RATE(tc) (1000000 / (256 - (tc)))
125
126 struct sbmode {
127 short model;
128 u_char channels;
129 u_char precision;
130 u_short lowrate, highrate;
131 u_char cmd;
132 u_char halt, cont;
133 u_char cmdchan;
134 };
135 static struct sbmode sbpmodes[] = {
136 { SB_1, 1, 8, 4000,22727,SB_DSP_WDMA ,SB_DSP_HALT ,SB_DSP_CONT },
137 { SB_20, 1, 8, 4000,22727,SB_DSP_WDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT },
138 { SB_2x, 1, 8, 4000,22727,SB_DSP_WDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT },
139 { SB_2x, 1, 8,22727,45454,SB_DSP_HS_OUTPUT,SB_DSP_HALT ,SB_DSP_CONT },
140 { SB_PRO, 1, 8, 4000,22727,SB_DSP_WDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT },
141 { SB_PRO, 1, 8,22727,45454,SB_DSP_HS_OUTPUT,SB_DSP_HALT ,SB_DSP_CONT },
142 { SB_PRO, 2, 8,11025,22727,SB_DSP_HS_OUTPUT,SB_DSP_HALT ,SB_DSP_CONT },
143 /* Yes, we write the record mode to set 16-bit playback mode. weird, huh? */
144 { SB_JAZZ,1, 8, 4000,22727,SB_DSP_WDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_MONO },
145 { SB_JAZZ,1, 8,22727,45454,SB_DSP_HS_OUTPUT,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_MONO },
146 { SB_JAZZ,2, 8,11025,22727,SB_DSP_HS_OUTPUT,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_STEREO },
147 { SB_JAZZ,1,16, 4000,22727,SB_DSP_WDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT ,JAZZ16_RECORD_MONO },
148 { SB_JAZZ,1,16,22727,45454,SB_DSP_HS_OUTPUT,SB_DSP_HALT ,SB_DSP_CONT ,JAZZ16_RECORD_MONO },
149 { SB_JAZZ,2,16,11025,22727,SB_DSP_HS_OUTPUT,SB_DSP_HALT ,SB_DSP_CONT ,JAZZ16_RECORD_STEREO },
150 { SB_16, 1, 8, 5000,45000,SB_DSP16_WDMA_8 ,SB_DSP_HALT ,SB_DSP_CONT },
151 { SB_16, 2, 8, 5000,45000,SB_DSP16_WDMA_8 ,SB_DSP_HALT ,SB_DSP_CONT },
152 #define PLAY16 15 /* must be the index of the next entry in the table */
153 { SB_16, 1,16, 5000,45000,SB_DSP16_WDMA_16,SB_DSP16_HALT,SB_DSP16_CONT},
154 { SB_16, 2,16, 5000,45000,SB_DSP16_WDMA_16,SB_DSP16_HALT,SB_DSP16_CONT},
155 { -1 }
156 };
157 static struct sbmode sbrmodes[] = {
158 { SB_1, 1, 8, 4000,12987,SB_DSP_RDMA ,SB_DSP_HALT ,SB_DSP_CONT },
159 { SB_20, 1, 8, 4000,12987,SB_DSP_RDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT },
160 { SB_2x, 1, 8, 4000,12987,SB_DSP_RDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT },
161 { SB_2x, 1, 8,12987,14925,SB_DSP_HS_INPUT ,SB_DSP_HALT ,SB_DSP_CONT },
162 { SB_PRO, 1, 8, 4000,22727,SB_DSP_RDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_MONO },
163 { SB_PRO, 1, 8,22727,45454,SB_DSP_HS_INPUT ,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_MONO },
164 { SB_PRO, 2, 8,11025,22727,SB_DSP_HS_INPUT ,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_STEREO },
165 { SB_JAZZ,1, 8, 4000,22727,SB_DSP_RDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_MONO },
166 { SB_JAZZ,1, 8,22727,45454,SB_DSP_HS_INPUT ,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_MONO },
167 { SB_JAZZ,2, 8,11025,22727,SB_DSP_HS_INPUT ,SB_DSP_HALT ,SB_DSP_CONT ,SB_DSP_RECORD_STEREO },
168 { SB_JAZZ,1,16, 4000,22727,SB_DSP_RDMA_LOOP,SB_DSP_HALT ,SB_DSP_CONT ,JAZZ16_RECORD_MONO },
169 { SB_JAZZ,1,16,22727,45454,SB_DSP_HS_INPUT ,SB_DSP_HALT ,SB_DSP_CONT ,JAZZ16_RECORD_MONO },
170 { SB_JAZZ,2,16,11025,22727,SB_DSP_HS_INPUT ,SB_DSP_HALT ,SB_DSP_CONT ,JAZZ16_RECORD_STEREO },
171 { SB_16, 1, 8, 5000,45000,SB_DSP16_RDMA_8 ,SB_DSP_HALT ,SB_DSP_CONT },
172 { SB_16, 2, 8, 5000,45000,SB_DSP16_RDMA_8 ,SB_DSP_HALT ,SB_DSP_CONT },
173 { SB_16, 1,16, 5000,45000,SB_DSP16_RDMA_16,SB_DSP16_HALT,SB_DSP16_CONT},
174 { SB_16, 2,16, 5000,45000,SB_DSP16_RDMA_16,SB_DSP16_HALT,SB_DSP16_CONT},
175 { -1 }
176 };
177
178 void sbversion __P((struct sbdsp_softc *));
179 void sbdsp_jazz16_probe __P((struct sbdsp_softc *));
180 void sbdsp_set_mixer_gain __P((struct sbdsp_softc *sc, int port));
181 void sbdsp_to __P((void *));
182 void sbdsp_pause __P((struct sbdsp_softc *));
183 int sbdsp_set_timeconst __P((struct sbdsp_softc *, int));
184 int sbdsp16_set_rate __P((struct sbdsp_softc *, int, int));
185 int sbdsp_set_in_ports __P((struct sbdsp_softc *, int));
186 void sbdsp_set_ifilter __P((void *, int));
187 int sbdsp_get_ifilter __P((void *));
188
189 int sbdsp_block_output __P((void *));
190 int sbdsp_block_input __P((void *));
191 static int sbdsp_adjust __P((int, int));
192
193 int sbdsp_midi_intr __P((void *));
194
195 #ifdef AUDIO_DEBUG
196 void sb_printsc __P((struct sbdsp_softc *));
197
198 void
199 sb_printsc(sc)
200 struct sbdsp_softc *sc;
201 {
202 int i;
203
204 printf("open %d dmachan %d/%d %d/%d iobase 0x%x irq %d\n",
205 (int)sc->sc_open, sc->sc_i.run, sc->sc_o.run,
206 sc->sc_drq8, sc->sc_drq16,
207 sc->sc_iobase, sc->sc_irq);
208 printf("irate %d itc %x orate %d otc %x\n",
209 sc->sc_i.rate, sc->sc_i.tc,
210 sc->sc_o.rate, sc->sc_o.tc);
211 printf("spkron %u nintr %lu\n",
212 sc->spkr_state, sc->sc_interrupts);
213 printf("intr8 %p intr16 %p\n",
214 sc->sc_intr8, sc->sc_intr16);
215 printf("gain:");
216 for (i = 0; i < SB_NDEVS; i++)
217 printf(" %u,%u", sc->gain[i][SB_LEFT], sc->gain[i][SB_RIGHT]);
218 printf("\n");
219 }
220 #endif /* AUDIO_DEBUG */
221
222 /*
223 * Probe / attach routines.
224 */
225
226 /*
227 * Probe for the soundblaster hardware.
228 */
229 int
230 sbdsp_probe(sc)
231 struct sbdsp_softc *sc;
232 {
233
234 if (sbdsp_reset(sc) < 0) {
235 DPRINTF(("sbdsp: couldn't reset card\n"));
236 return 0;
237 }
238 /* if flags set, go and probe the jazz16 stuff */
239 if (sc->sc_dev.dv_cfdata->cf_flags & 1)
240 sbdsp_jazz16_probe(sc);
241 else
242 sbversion(sc);
243 if (sc->sc_model == SB_UNK) {
244 /* Unknown SB model found. */
245 DPRINTF(("sbdsp: unknown SB model found\n"));
246 return 0;
247 }
248 return 1;
249 }
250
251 /*
252 * Try add-on stuff for Jazz16.
253 */
254 void
255 sbdsp_jazz16_probe(sc)
256 struct sbdsp_softc *sc;
257 {
258 static u_char jazz16_irq_conf[16] = {
259 -1, -1, 0x02, 0x03,
260 -1, 0x01, -1, 0x04,
261 -1, 0x02, 0x05, -1,
262 -1, -1, -1, 0x06};
263 static u_char jazz16_drq_conf[8] = {
264 -1, 0x01, -1, 0x02,
265 -1, 0x03, -1, 0x04};
266
267 bus_space_tag_t iot = sc->sc_iot;
268 bus_space_handle_t ioh;
269
270 sbversion(sc);
271
272 DPRINTF(("jazz16 probe\n"));
273
274 if (bus_space_map(iot, JAZZ16_CONFIG_PORT, 1, 0, &ioh)) {
275 DPRINTF(("bus map failed\n"));
276 return;
277 }
278
279 if (jazz16_drq_conf[sc->sc_drq8] == (u_char)-1 ||
280 jazz16_irq_conf[sc->sc_irq] == (u_char)-1) {
281 DPRINTF(("drq/irq check failed\n"));
282 goto done; /* give up, we can't do it. */
283 }
284
285 bus_space_write_1(iot, ioh, 0, JAZZ16_WAKEUP);
286 delay(10000); /* delay 10 ms */
287 bus_space_write_1(iot, ioh, 0, JAZZ16_SETBASE);
288 bus_space_write_1(iot, ioh, 0, sc->sc_iobase & 0x70);
289
290 if (sbdsp_reset(sc) < 0) {
291 DPRINTF(("sbdsp_reset check failed\n"));
292 goto done; /* XXX? what else could we do? */
293 }
294
295 if (sbdsp_wdsp(sc, JAZZ16_READ_VER)) {
296 DPRINTF(("read16 setup failed\n"));
297 goto done;
298 }
299
300 if (sbdsp_rdsp(sc) != JAZZ16_VER_JAZZ) {
301 DPRINTF(("read16 failed\n"));
302 goto done;
303 }
304
305 /* XXX set both 8 & 16-bit drq to same channel, it works fine. */
306 sc->sc_drq16 = sc->sc_drq8;
307 if (sbdsp_wdsp(sc, JAZZ16_SET_DMAINTR) ||
308 sbdsp_wdsp(sc, (jazz16_drq_conf[sc->sc_drq16] << 4) |
309 jazz16_drq_conf[sc->sc_drq8]) ||
310 sbdsp_wdsp(sc, jazz16_irq_conf[sc->sc_irq])) {
311 DPRINTF(("sbdsp: can't write jazz16 probe stuff\n"));
312 } else {
313 DPRINTF(("jazz16 detected!\n"));
314 sc->sc_model = SB_JAZZ;
315 sc->sc_mixer_model = SBM_CT1345; /* XXX really? */
316 }
317
318 done:
319 bus_space_unmap(iot, ioh, 1);
320 }
321
322 /*
323 * Attach hardware to driver, attach hardware driver to audio
324 * pseudo-device driver .
325 */
326 void
327 sbdsp_attach(sc)
328 struct sbdsp_softc *sc;
329 {
330 struct audio_params pparams, rparams;
331 int i;
332 u_int v;
333
334 /*
335 * Create our DMA maps.
336 */
337 if (sc->sc_drq8 != -1) {
338 if (isa_dmamap_create(sc->sc_ic, sc->sc_drq8,
339 MAX_ISADMA, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW)) {
340 printf("%s: can't create map for drq %d\n",
341 sc->sc_dev.dv_xname, sc->sc_drq8);
342 return;
343 }
344 }
345 if (sc->sc_drq16 != -1 && sc->sc_drq16 != sc->sc_drq8) {
346 if (isa_dmamap_create(sc->sc_ic, sc->sc_drq16,
347 MAX_ISADMA, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW)) {
348 printf("%s: can't create map for drq %d\n",
349 sc->sc_dev.dv_xname, sc->sc_drq16);
350 return;
351 }
352 }
353
354 pparams = audio_default;
355 rparams = audio_default;
356 sbdsp_set_params(sc, AUMODE_RECORD|AUMODE_PLAY, 0, &pparams, &rparams);
357
358 sbdsp_set_in_ports(sc, 1 << SB_MIC_VOL);
359
360 if (sc->sc_mixer_model != SBM_NONE) {
361 /* Reset the mixer.*/
362 sbdsp_mix_write(sc, SBP_MIX_RESET, SBP_MIX_RESET);
363 /* And set our own default values */
364 for (i = 0; i < SB_NDEVS; i++) {
365 switch(i) {
366 case SB_MIC_VOL:
367 case SB_LINE_IN_VOL:
368 v = 0;
369 break;
370 case SB_BASS:
371 case SB_TREBLE:
372 v = SB_ADJUST_GAIN(sc, AUDIO_MAX_GAIN/2);
373 break;
374 case SB_CD_IN_MUTE:
375 case SB_MIC_IN_MUTE:
376 case SB_LINE_IN_MUTE:
377 case SB_MIDI_IN_MUTE:
378 case SB_CD_SWAP:
379 case SB_MIC_SWAP:
380 case SB_LINE_SWAP:
381 case SB_MIDI_SWAP:
382 case SB_CD_OUT_MUTE:
383 case SB_MIC_OUT_MUTE:
384 case SB_LINE_OUT_MUTE:
385 v = 0;
386 break;
387 default:
388 v = SB_ADJUST_GAIN(sc, AUDIO_MAX_GAIN / 2);
389 break;
390 }
391 sc->gain[i][SB_LEFT] = sc->gain[i][SB_RIGHT] = v;
392 sbdsp_set_mixer_gain(sc, i);
393 }
394 sc->in_filter = 0; /* no filters turned on, please */
395 }
396
397 printf(": dsp v%d.%02d%s\n",
398 SBVER_MAJOR(sc->sc_version), SBVER_MINOR(sc->sc_version),
399 sc->sc_model == SB_JAZZ ? ": <Jazz16>" : "");
400
401 sc->sc_fullduplex = ISSB16CLASS(sc) &&
402 sc->sc_drq8 != -1 && sc->sc_drq16 != -1 &&
403 sc->sc_drq8 != sc->sc_drq16;
404 }
405
406 void
407 sbdsp_mix_write(sc, mixerport, val)
408 struct sbdsp_softc *sc;
409 int mixerport;
410 int val;
411 {
412 bus_space_tag_t iot = sc->sc_iot;
413 bus_space_handle_t ioh = sc->sc_ioh;
414 int s;
415
416 s = splaudio();
417 bus_space_write_1(iot, ioh, SBP_MIXER_ADDR, mixerport);
418 delay(20);
419 bus_space_write_1(iot, ioh, SBP_MIXER_DATA, val);
420 delay(30);
421 splx(s);
422 }
423
424 int
425 sbdsp_mix_read(sc, mixerport)
426 struct sbdsp_softc *sc;
427 int mixerport;
428 {
429 bus_space_tag_t iot = sc->sc_iot;
430 bus_space_handle_t ioh = sc->sc_ioh;
431 int val;
432 int s;
433
434 s = splaudio();
435 bus_space_write_1(iot, ioh, SBP_MIXER_ADDR, mixerport);
436 delay(20);
437 val = bus_space_read_1(iot, ioh, SBP_MIXER_DATA);
438 delay(30);
439 splx(s);
440 return val;
441 }
442
443 /*
444 * Various routines to interface to higher level audio driver
445 */
446
447 int
448 sbdsp_query_encoding(addr, fp)
449 void *addr;
450 struct audio_encoding *fp;
451 {
452 struct sbdsp_softc *sc = addr;
453 int emul;
454
455 emul = ISSB16CLASS(sc) ? 0 : AUDIO_ENCODINGFLAG_EMULATED;
456
457 switch (fp->index) {
458 case 0:
459 strcpy(fp->name, AudioEulinear);
460 fp->encoding = AUDIO_ENCODING_ULINEAR;
461 fp->precision = 8;
462 fp->flags = 0;
463 return 0;
464 case 1:
465 strcpy(fp->name, AudioEmulaw);
466 fp->encoding = AUDIO_ENCODING_ULAW;
467 fp->precision = 8;
468 fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
469 return 0;
470 case 2:
471 strcpy(fp->name, AudioEalaw);
472 fp->encoding = AUDIO_ENCODING_ALAW;
473 fp->precision = 8;
474 fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
475 return 0;
476 case 3:
477 strcpy(fp->name, AudioEslinear);
478 fp->encoding = AUDIO_ENCODING_SLINEAR;
479 fp->precision = 8;
480 fp->flags = emul;
481 return 0;
482 }
483 if (!ISSB16CLASS(sc) && sc->sc_model != SB_JAZZ)
484 return EINVAL;
485
486 switch(fp->index) {
487 case 4:
488 strcpy(fp->name, AudioEslinear_le);
489 fp->encoding = AUDIO_ENCODING_SLINEAR_LE;
490 fp->precision = 16;
491 fp->flags = 0;
492 return 0;
493 case 5:
494 strcpy(fp->name, AudioEulinear_le);
495 fp->encoding = AUDIO_ENCODING_ULINEAR_LE;
496 fp->precision = 16;
497 fp->flags = emul;
498 return 0;
499 case 6:
500 strcpy(fp->name, AudioEslinear_be);
501 fp->encoding = AUDIO_ENCODING_SLINEAR_BE;
502 fp->precision = 16;
503 fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
504 return 0;
505 case 7:
506 strcpy(fp->name, AudioEulinear_be);
507 fp->encoding = AUDIO_ENCODING_ULINEAR_BE;
508 fp->precision = 16;
509 fp->flags = AUDIO_ENCODINGFLAG_EMULATED;
510 return 0;
511 default:
512 return EINVAL;
513 }
514 return 0;
515 }
516
517 int
518 sbdsp_set_params(addr, setmode, usemode, play, rec)
519 void *addr;
520 int setmode, usemode;
521 struct audio_params *play, *rec;
522 {
523 struct sbdsp_softc *sc = addr;
524 struct sbmode *m;
525 u_int rate, tc, bmode;
526 void (*swcode) __P((void *, u_char *buf, int cnt));
527 int factor;
528 int model;
529 int chan;
530 struct audio_params *p;
531 int mode;
532
533 if (sc->sc_open == SB_OPEN_MIDI)
534 return EBUSY;
535
536 model = sc->sc_model;
537 if (model > SB_16)
538 model = SB_16; /* later models work like SB16 */
539
540 /*
541 * Prior to the SB16, we have only one clock, so make the sample
542 * rates match.
543 */
544 if (!ISSB16CLASS(sc) &&
545 play->sample_rate != rec->sample_rate &&
546 usemode == (AUMODE_PLAY | AUMODE_RECORD)) {
547 if (setmode == AUMODE_PLAY) {
548 rec->sample_rate = play->sample_rate;
549 setmode |= AUMODE_RECORD;
550 } else if (setmode == AUMODE_RECORD) {
551 play->sample_rate = rec->sample_rate;
552 setmode |= AUMODE_PLAY;
553 } else
554 return (EINVAL);
555 }
556
557 /* Set first record info, then play info */
558 for (mode = AUMODE_RECORD; mode != -1;
559 mode = mode == AUMODE_RECORD ? AUMODE_PLAY : -1) {
560 if ((setmode & mode) == 0)
561 continue;
562
563 p = mode == AUMODE_PLAY ? play : rec;
564 /* Locate proper commands */
565 for(m = mode == AUMODE_PLAY ? sbpmodes : sbrmodes;
566 m->model != -1; m++) {
567 if (model == m->model &&
568 p->channels == m->channels &&
569 p->precision == m->precision &&
570 p->sample_rate >= m->lowrate &&
571 p->sample_rate < m->highrate)
572 break;
573 }
574 if (m->model == -1)
575 return EINVAL;
576 rate = p->sample_rate;
577 swcode = 0;
578 factor = 1;
579 tc = 1;
580 bmode = -1;
581 if (model == SB_16) {
582 switch (p->encoding) {
583 case AUDIO_ENCODING_SLINEAR_BE:
584 if (p->precision == 16)
585 swcode = swap_bytes;
586 /* fall into */
587 case AUDIO_ENCODING_SLINEAR_LE:
588 bmode = SB_BMODE_SIGNED;
589 break;
590 case AUDIO_ENCODING_ULINEAR_BE:
591 if (p->precision == 16)
592 swcode = swap_bytes;
593 /* fall into */
594 case AUDIO_ENCODING_ULINEAR_LE:
595 bmode = SB_BMODE_UNSIGNED;
596 break;
597 case AUDIO_ENCODING_ULAW:
598 if (mode == AUMODE_PLAY) {
599 swcode = mulaw_to_ulinear16;
600 factor = 2;
601 m = &sbpmodes[PLAY16];
602 } else
603 swcode = ulinear8_to_mulaw;
604 bmode = SB_BMODE_UNSIGNED;
605 break;
606 case AUDIO_ENCODING_ALAW:
607 if (mode == AUMODE_PLAY) {
608 swcode = alaw_to_ulinear16;
609 factor = 2;
610 m = &sbpmodes[PLAY16];
611 } else
612 swcode = ulinear8_to_alaw;
613 bmode = SB_BMODE_UNSIGNED;
614 break;
615 default:
616 return EINVAL;
617 }
618 if (p->channels == 2)
619 bmode |= SB_BMODE_STEREO;
620 } else if (m->model == SB_JAZZ && m->precision == 16) {
621 switch (p->encoding) {
622 case AUDIO_ENCODING_SLINEAR_LE:
623 break;
624 case AUDIO_ENCODING_ULINEAR_LE:
625 swcode = change_sign16;
626 break;
627 case AUDIO_ENCODING_SLINEAR_BE:
628 swcode = swap_bytes;
629 break;
630 case AUDIO_ENCODING_ULINEAR_BE:
631 swcode = mode == AUMODE_PLAY ?
632 swap_bytes_change_sign16 : change_sign16_swap_bytes;
633 break;
634 case AUDIO_ENCODING_ULAW:
635 swcode = mode == AUMODE_PLAY ?
636 mulaw_to_ulinear8 : ulinear8_to_mulaw;
637 break;
638 case AUDIO_ENCODING_ALAW:
639 swcode = mode == AUMODE_PLAY ?
640 alaw_to_ulinear8 : ulinear8_to_alaw;
641 break;
642 default:
643 return EINVAL;
644 }
645 tc = SB_RATE_TO_TC(p->sample_rate * p->channels);
646 p->sample_rate = SB_TC_TO_RATE(tc) / p->channels;
647 } else {
648 switch (p->encoding) {
649 case AUDIO_ENCODING_SLINEAR_BE:
650 case AUDIO_ENCODING_SLINEAR_LE:
651 swcode = change_sign8;
652 break;
653 case AUDIO_ENCODING_ULINEAR_BE:
654 case AUDIO_ENCODING_ULINEAR_LE:
655 break;
656 case AUDIO_ENCODING_ULAW:
657 swcode = mode == AUMODE_PLAY ?
658 mulaw_to_ulinear8 : ulinear8_to_mulaw;
659 break;
660 case AUDIO_ENCODING_ALAW:
661 swcode = mode == AUMODE_PLAY ?
662 alaw_to_ulinear8 : ulinear8_to_alaw;
663 break;
664 default:
665 return EINVAL;
666 }
667 tc = SB_RATE_TO_TC(p->sample_rate * p->channels);
668 p->sample_rate = SB_TC_TO_RATE(tc) / p->channels;
669 }
670
671 chan = m->precision == 16 ? sc->sc_drq16 : sc->sc_drq8;
672 if (mode == AUMODE_PLAY) {
673 sc->sc_o.rate = rate;
674 sc->sc_o.tc = tc;
675 sc->sc_o.modep = m;
676 sc->sc_o.bmode = bmode;
677 sc->sc_o.dmachan = chan;
678 } else {
679 sc->sc_i.rate = rate;
680 sc->sc_i.tc = tc;
681 sc->sc_i.modep = m;
682 sc->sc_i.bmode = bmode;
683 sc->sc_i.dmachan = chan;
684 }
685
686 p->sw_code = swcode;
687 p->factor = factor;
688 DPRINTF(("sbdsp_set_params: model=%d, mode=%d, rate=%ld, prec=%d, chan=%d, enc=%d -> tc=%02x, cmd=%02x, bmode=%02x, cmdchan=%02x, swcode=%p, factor=%d\n",
689 sc->sc_model, mode, p->sample_rate, p->precision, p->channels,
690 p->encoding, tc, m->cmd, bmode, m->cmdchan, swcode, factor));
691
692 }
693
694 if (sc->sc_fullduplex &&
695 usemode == (AUMODE_PLAY | AUMODE_RECORD) &&
696 sc->sc_i.dmachan == sc->sc_o.dmachan) {
697 DPRINTF(("sbdsp_set_params: fd=%d, usemode=%d, idma=%d, odma=%d\n", sc->sc_fullduplex, usemode, sc->sc_i.dmachan, sc->sc_o.dmachan));
698 if (sc->sc_o.dmachan == sc->sc_drq8) {
699 /* Use 16 bit DMA for playing by expanding the samples. */
700 play->sw_code = linear8_to_linear16;
701 play->factor = 2;
702 sc->sc_o.modep = &sbpmodes[PLAY16];
703 sc->sc_o.dmachan = sc->sc_drq16;
704 } else {
705 return EINVAL;
706 }
707 }
708 DPRINTF(("sbdsp_set_params ichan=%d, ochan=%d\n",
709 sc->sc_i.dmachan, sc->sc_o.dmachan));
710
711 return (0);
712 }
713
714 void
715 sbdsp_set_ifilter(addr, which)
716 void *addr;
717 int which;
718 {
719 struct sbdsp_softc *sc = addr;
720 int mixval;
721
722 mixval = sbdsp_mix_read(sc, SBP_INFILTER) & ~SBP_IFILTER_MASK;
723 switch (which) {
724 case 0:
725 mixval |= SBP_FILTER_OFF;
726 break;
727 case SB_TREBLE:
728 mixval |= SBP_FILTER_ON | SBP_IFILTER_HIGH;
729 break;
730 case SB_BASS:
731 mixval |= SBP_FILTER_ON | SBP_IFILTER_LOW;
732 break;
733 default:
734 return;
735 }
736 sc->in_filter = mixval & SBP_IFILTER_MASK;
737 sbdsp_mix_write(sc, SBP_INFILTER, mixval);
738 }
739
740 int
741 sbdsp_get_ifilter(addr)
742 void *addr;
743 {
744 struct sbdsp_softc *sc = addr;
745
746 sc->in_filter =
747 sbdsp_mix_read(sc, SBP_INFILTER) & SBP_IFILTER_MASK;
748 switch (sc->in_filter) {
749 case SBP_FILTER_ON|SBP_IFILTER_HIGH:
750 return SB_TREBLE;
751 case SBP_FILTER_ON|SBP_IFILTER_LOW:
752 return SB_BASS;
753 default:
754 return 0;
755 }
756 }
757
758 int
759 sbdsp_set_in_ports(sc, mask)
760 struct sbdsp_softc *sc;
761 int mask;
762 {
763 int bitsl, bitsr;
764 int sbport;
765
766 if (sc->sc_open == SB_OPEN_MIDI)
767 return EBUSY;
768
769 DPRINTF(("sbdsp_set_in_ports: model=%d, mask=%x\n",
770 sc->sc_mixer_model, mask));
771
772 switch(sc->sc_mixer_model) {
773 case SBM_NONE:
774 return EINVAL;
775 case SBM_CT1335:
776 if (mask != (1 << SB_MIC_VOL))
777 return EINVAL;
778 break;
779 case SBM_CT1345:
780 switch (mask) {
781 case 1 << SB_MIC_VOL:
782 sbport = SBP_FROM_MIC;
783 break;
784 case 1 << SB_LINE_IN_VOL:
785 sbport = SBP_FROM_LINE;
786 break;
787 case 1 << SB_CD_VOL:
788 sbport = SBP_FROM_CD;
789 break;
790 default:
791 return (EINVAL);
792 }
793 sbdsp_mix_write(sc, SBP_RECORD_SOURCE, sbport | sc->in_filter);
794 break;
795 case SBM_CT1XX5:
796 case SBM_CT1745:
797 if (mask & ~((1<<SB_MIDI_VOL) | (1<<SB_LINE_IN_VOL) |
798 (1<<SB_CD_VOL) | (1<<SB_MIC_VOL)))
799 return EINVAL;
800 bitsr = 0;
801 if (mask & (1<<SB_MIDI_VOL)) bitsr |= SBP_MIDI_SRC_R;
802 if (mask & (1<<SB_LINE_IN_VOL)) bitsr |= SBP_LINE_SRC_R;
803 if (mask & (1<<SB_CD_VOL)) bitsr |= SBP_CD_SRC_R;
804 bitsl = SB_SRC_R_TO_L(bitsr);
805 if (mask & (1<<SB_MIC_VOL)) {
806 bitsl |= SBP_MIC_SRC;
807 bitsr |= SBP_MIC_SRC;
808 }
809 sbdsp_mix_write(sc, SBP_RECORD_SOURCE_L, bitsl);
810 sbdsp_mix_write(sc, SBP_RECORD_SOURCE_R, bitsr);
811 break;
812 }
813 sc->in_mask = mask;
814
815 return 0;
816 }
817
818 int
819 sbdsp_speaker_ctl(addr, newstate)
820 void *addr;
821 int newstate;
822 {
823 struct sbdsp_softc *sc = addr;
824
825 if (sc->sc_open == SB_OPEN_MIDI)
826 return EBUSY;
827
828 if ((newstate == SPKR_ON) &&
829 (sc->spkr_state == SPKR_OFF)) {
830 sbdsp_spkron(sc);
831 sc->spkr_state = SPKR_ON;
832 }
833 if ((newstate == SPKR_OFF) &&
834 (sc->spkr_state == SPKR_ON)) {
835 sbdsp_spkroff(sc);
836 sc->spkr_state = SPKR_OFF;
837 }
838 return 0;
839 }
840
841 int
842 sbdsp_round_blocksize(addr, blk)
843 void *addr;
844 int blk;
845 {
846 return blk & -4; /* round to biggest sample size */
847 }
848
849 int
850 sbdsp_open(addr, flags)
851 void *addr;
852 int flags;
853 {
854 struct sbdsp_softc *sc = addr;
855
856 DPRINTF(("sbdsp_open: sc=%p\n", sc));
857
858 if (sc->sc_open != SB_CLOSED)
859 return EBUSY;
860 if (sbdsp_reset(sc) != 0)
861 return EIO;
862
863 sc->sc_open = SB_OPEN_AUDIO;
864 sc->sc_openflags = flags;
865
866 if (ISSBPRO(sc) &&
867 sbdsp_wdsp(sc, SB_DSP_RECORD_MONO) < 0) {
868 DPRINTF(("sbdsp_open: can't set mono mode\n"));
869 /* we'll readjust when it's time for DMA. */
870 }
871
872 /*
873 * Leave most things as they were; users must change things if
874 * the previous process didn't leave it they way they wanted.
875 * Looked at another way, it's easy to set up a configuration
876 * in one program and leave it for another to inherit.
877 */
878 DPRINTF(("sbdsp_open: opened\n"));
879
880 return 0;
881 }
882
883 void
884 sbdsp_close(addr)
885 void *addr;
886 {
887 struct sbdsp_softc *sc = addr;
888
889 DPRINTF(("sbdsp_close: sc=%p\n", sc));
890
891 sbdsp_spkroff(sc);
892 sc->spkr_state = SPKR_OFF;
893
894 sbdsp_halt_output(sc);
895 sbdsp_halt_input(sc);
896
897 sc->sc_intr8 = 0;
898 sc->sc_intr16 = 0;
899 sc->sc_open = SB_CLOSED;
900
901 DPRINTF(("sbdsp_close: closed\n"));
902 }
903
904 /*
905 * Lower-level routines
906 */
907
908 /*
909 * Reset the card.
910 * Return non-zero if the card isn't detected.
911 */
912 int
913 sbdsp_reset(sc)
914 struct sbdsp_softc *sc;
915 {
916 bus_space_tag_t iot = sc->sc_iot;
917 bus_space_handle_t ioh = sc->sc_ioh;
918
919 sc->sc_intr8 = 0;
920 sc->sc_intr16 = 0;
921 sc->sc_intrm = 0;
922
923 /*
924 * See SBK, section 11.3.
925 * We pulse a reset signal into the card.
926 * Gee, what a brilliant hardware design.
927 */
928 bus_space_write_1(iot, ioh, SBP_DSP_RESET, 1);
929 delay(10);
930 bus_space_write_1(iot, ioh, SBP_DSP_RESET, 0);
931 delay(30);
932 if (sbdsp_rdsp(sc) != SB_MAGIC)
933 return -1;
934
935 return 0;
936 }
937
938 /*
939 * Write a byte to the dsp.
940 * We are at the mercy of the card as we use a
941 * polling loop and wait until it can take the byte.
942 */
943 int
944 sbdsp_wdsp(sc, v)
945 struct sbdsp_softc *sc;
946 int v;
947 {
948 bus_space_tag_t iot = sc->sc_iot;
949 bus_space_handle_t ioh = sc->sc_ioh;
950 int i;
951 u_char x;
952
953 for (i = SBDSP_NPOLL; --i >= 0; ) {
954 x = bus_space_read_1(iot, ioh, SBP_DSP_WSTAT);
955 delay(10);
956 if ((x & SB_DSP_BUSY) == 0) {
957 bus_space_write_1(iot, ioh, SBP_DSP_WRITE, v);
958 delay(10);
959 return 0;
960 }
961 }
962 ++sberr.wdsp;
963 return -1;
964 }
965
966 /*
967 * Read a byte from the DSP, using polling.
968 */
969 int
970 sbdsp_rdsp(sc)
971 struct sbdsp_softc *sc;
972 {
973 bus_space_tag_t iot = sc->sc_iot;
974 bus_space_handle_t ioh = sc->sc_ioh;
975 int i;
976 u_char x;
977
978 for (i = SBDSP_NPOLL; --i >= 0; ) {
979 x = bus_space_read_1(iot, ioh, SBP_DSP_RSTAT);
980 delay(10);
981 if (x & SB_DSP_READY) {
982 x = bus_space_read_1(iot, ioh, SBP_DSP_READ);
983 delay(10);
984 return x;
985 }
986 }
987 ++sberr.rdsp;
988 return -1;
989 }
990
991 /*
992 * Doing certain things (like toggling the speaker) make
993 * the SB hardware go away for a while, so pause a little.
994 */
995 void
996 sbdsp_to(arg)
997 void *arg;
998 {
999 wakeup(arg);
1000 }
1001
1002 void
1003 sbdsp_pause(sc)
1004 struct sbdsp_softc *sc;
1005 {
1006 extern int hz;
1007
1008 timeout(sbdsp_to, sbdsp_to, hz/8);
1009 (void)tsleep(sbdsp_to, PWAIT, "sbpause", 0);
1010 }
1011
1012 /*
1013 * Turn on the speaker. The SBK documention says this operation
1014 * can take up to 1/10 of a second. Higher level layers should
1015 * probably let the task sleep for this amount of time after
1016 * calling here. Otherwise, things might not work (because
1017 * sbdsp_wdsp() and sbdsp_rdsp() will probably timeout.)
1018 *
1019 * These engineers had their heads up their ass when
1020 * they designed this card.
1021 */
1022 void
1023 sbdsp_spkron(sc)
1024 struct sbdsp_softc *sc;
1025 {
1026 (void)sbdsp_wdsp(sc, SB_DSP_SPKR_ON);
1027 sbdsp_pause(sc);
1028 }
1029
1030 /*
1031 * Turn off the speaker; see comment above.
1032 */
1033 void
1034 sbdsp_spkroff(sc)
1035 struct sbdsp_softc *sc;
1036 {
1037 (void)sbdsp_wdsp(sc, SB_DSP_SPKR_OFF);
1038 sbdsp_pause(sc);
1039 }
1040
1041 /*
1042 * Read the version number out of the card.
1043 * Store version information in the softc.
1044 */
1045 void
1046 sbversion(sc)
1047 struct sbdsp_softc *sc;
1048 {
1049 int v;
1050
1051 sc->sc_model = SB_UNK;
1052 sc->sc_version = 0;
1053 if (sbdsp_wdsp(sc, SB_DSP_VERSION) < 0)
1054 return;
1055 v = sbdsp_rdsp(sc) << 8;
1056 v |= sbdsp_rdsp(sc);
1057 if (v < 0)
1058 return;
1059 sc->sc_version = v;
1060 switch(SBVER_MAJOR(v)) {
1061 case 1:
1062 sc->sc_mixer_model = SBM_NONE;
1063 sc->sc_model = SB_1;
1064 break;
1065 case 2:
1066 /* Some SB2 have a mixer, some don't. */
1067 sbdsp_mix_write(sc, SBP_1335_MASTER_VOL, 0x04);
1068 sbdsp_mix_write(sc, SBP_1335_MIDI_VOL, 0x06);
1069 /* Check if we can read back the mixer values. */
1070 if ((sbdsp_mix_read(sc, SBP_1335_MASTER_VOL) & 0x0e) == 0x04 &&
1071 (sbdsp_mix_read(sc, SBP_1335_MIDI_VOL) & 0x0e) == 0x06)
1072 sc->sc_mixer_model = SBM_CT1335;
1073 else
1074 sc->sc_mixer_model = SBM_NONE;
1075 if (SBVER_MINOR(v) == 0)
1076 sc->sc_model = SB_20;
1077 else
1078 sc->sc_model = SB_2x;
1079 break;
1080 case 3:
1081 sc->sc_mixer_model = SBM_CT1345;
1082 sc->sc_model = SB_PRO;
1083 break;
1084 case 4:
1085 #if 0
1086 /* XXX This does not work */
1087 /* Most SB16 have a tone controls, but some don't. */
1088 sbdsp_mix_write(sc, SB16P_TREBLE_L, 0x80);
1089 /* Check if we can read back the mixer value. */
1090 if ((sbdsp_mix_read(sc, SB16P_TREBLE_L) & 0xf0) == 0x80)
1091 sc->sc_mixer_model = SBM_CT1745;
1092 else
1093 sc->sc_mixer_model = SBM_CT1XX5;
1094 #else
1095 sc->sc_mixer_model = SBM_CT1745;
1096 #endif
1097 #if 0
1098 /* XXX figure out a good way of determining the model */
1099 /* XXX what about SB_32 */
1100 if (SBVER_MINOR(v) == 16)
1101 sc->sc_model = SB_64;
1102 else
1103 #endif
1104 sc->sc_model = SB_16;
1105 break;
1106 }
1107 }
1108
1109 int
1110 sbdsp_set_timeconst(sc, tc)
1111 struct sbdsp_softc *sc;
1112 int tc;
1113 {
1114 DPRINTF(("sbdsp_set_timeconst: sc=%p tc=%d\n", sc, tc));
1115
1116 if (sbdsp_wdsp(sc, SB_DSP_TIMECONST) < 0 ||
1117 sbdsp_wdsp(sc, tc) < 0)
1118 return EIO;
1119
1120 return 0;
1121 }
1122
1123 int
1124 sbdsp16_set_rate(sc, cmd, rate)
1125 struct sbdsp_softc *sc;
1126 int cmd, rate;
1127 {
1128 DPRINTF(("sbdsp16_set_rate: sc=%p cmd=0x%02x rate=%d\n", sc, cmd, rate));
1129
1130 if (sbdsp_wdsp(sc, cmd) < 0 ||
1131 sbdsp_wdsp(sc, rate >> 8) < 0 ||
1132 sbdsp_wdsp(sc, rate) < 0)
1133 return EIO;
1134 return 0;
1135 }
1136
1137 int
1138 sbdsp_trigger_input(addr, start, end, blksize, intr, arg, param)
1139 void *addr;
1140 void *start, *end;
1141 int blksize;
1142 void (*intr) __P((void *));
1143 void *arg;
1144 struct audio_params *param;
1145 {
1146 struct sbdsp_softc *sc = addr;
1147 int stereo = param->channels == 2;
1148 int width = param->precision * param->factor;
1149 int filter;
1150
1151 #ifdef DIAGNOSTIC
1152 if (stereo && (blksize & 1)) {
1153 DPRINTF(("stereo record odd bytes (%d)\n", blksize));
1154 return (EIO);
1155 }
1156 if (sc->sc_i.run != SB_NOTRUNNING)
1157 printf("sbdsp_trigger_input: already running\n");
1158 #endif
1159
1160 sc->sc_intrr = intr;
1161 sc->sc_argr = arg;
1162
1163 if (width == 8) {
1164 #ifdef DIAGNOSTIC
1165 if (sc->sc_i.dmachan != sc->sc_drq8) {
1166 printf("sbdsp_trigger_input: width=%d bad chan %d\n",
1167 width, sc->sc_i.dmachan);
1168 return (EIO);
1169 }
1170 #endif
1171 sc->sc_intr8 = sbdsp_block_input;
1172 } else {
1173 #ifdef DIAGNOSTIC
1174 if (sc->sc_i.dmachan != sc->sc_drq16) {
1175 printf("sbdsp_trigger_input: width=%d bad chan %d\n",
1176 width, sc->sc_i.dmachan);
1177 return (EIO);
1178 }
1179 #endif
1180 sc->sc_intr16 = sbdsp_block_input;
1181 }
1182
1183 if ((sc->sc_model == SB_JAZZ) ? (sc->sc_i.dmachan > 3) : (width == 16))
1184 blksize >>= 1;
1185 --blksize;
1186 sc->sc_i.blksize = blksize;
1187
1188 if (ISSBPRO(sc)) {
1189 if (sbdsp_wdsp(sc, sc->sc_i.modep->cmdchan) < 0)
1190 return (EIO);
1191 filter = stereo ? SBP_FILTER_OFF : sc->in_filter;
1192 sbdsp_mix_write(sc, SBP_INFILTER,
1193 (sbdsp_mix_read(sc, SBP_INFILTER) & ~SBP_IFILTER_MASK) |
1194 filter);
1195 }
1196
1197 if (ISSB16CLASS(sc)) {
1198 if (sbdsp16_set_rate(sc, SB_DSP16_INPUTRATE, sc->sc_i.rate)) {
1199 DPRINTF(("sbdsp_trigger_input: rate=%d set failed\n",
1200 sc->sc_i.rate));
1201 return (EIO);
1202 }
1203 } else {
1204 if (sbdsp_set_timeconst(sc, sc->sc_i.tc)) {
1205 DPRINTF(("sbdsp_trigger_input: tc=%d set failed\n",
1206 sc->sc_i.rate));
1207 return (EIO);
1208 }
1209 }
1210
1211 DPRINTF(("sbdsp: dma start loop input start=%p end=%p chan=%d\n",
1212 start, end, sc->sc_i.dmachan));
1213 isa_dmastart(sc->sc_ic, sc->sc_i.dmachan, start,
1214 (char *)end - (char *)start, NULL,
1215 DMAMODE_READ | DMAMODE_LOOP, BUS_DMA_NOWAIT);
1216
1217 return sbdsp_block_input(addr);
1218 }
1219
1220 int
1221 sbdsp_block_input(addr)
1222 void *addr;
1223 {
1224 struct sbdsp_softc *sc = addr;
1225 int cc = sc->sc_i.blksize;
1226
1227 DPRINTFN(2, ("sbdsp_block_input: sc=%p cc=%d\n", addr, cc));
1228
1229 if (sc->sc_i.run != SB_NOTRUNNING)
1230 sc->sc_intrr(sc->sc_argr);
1231
1232 if (sc->sc_model == SB_1) {
1233 /* Non-looping mode, start DMA */
1234 if (sbdsp_wdsp(sc, sc->sc_i.modep->cmd) < 0 ||
1235 sbdsp_wdsp(sc, cc) < 0 ||
1236 sbdsp_wdsp(sc, cc >> 8) < 0) {
1237 DPRINTF(("sbdsp_block_input: SB1 DMA start failed\n"));
1238 return (EIO);
1239 }
1240 sc->sc_i.run = SB_RUNNING;
1241 } else if (sc->sc_i.run == SB_NOTRUNNING) {
1242 /* Initialize looping PCM */
1243 if (ISSB16CLASS(sc)) {
1244 DPRINTFN(3, ("sbdsp16 input command cmd=0x%02x bmode=0x%02x cc=%d\n",
1245 sc->sc_i.modep->cmd, sc->sc_i.bmode, cc));
1246 if (sbdsp_wdsp(sc, sc->sc_i.modep->cmd) < 0 ||
1247 sbdsp_wdsp(sc, sc->sc_i.bmode) < 0 ||
1248 sbdsp_wdsp(sc, cc) < 0 ||
1249 sbdsp_wdsp(sc, cc >> 8) < 0) {
1250 DPRINTF(("sbdsp_block_input: SB16 DMA start failed\n"));
1251 return (EIO);
1252 }
1253 } else {
1254 DPRINTF(("sbdsp_block_input: set blocksize=%d\n", cc));
1255 if (sbdsp_wdsp(sc, SB_DSP_BLOCKSIZE) < 0 ||
1256 sbdsp_wdsp(sc, cc) < 0 ||
1257 sbdsp_wdsp(sc, cc >> 8) < 0) {
1258 DPRINTF(("sbdsp_block_input: SB2 DMA blocksize failed\n"));
1259 return (EIO);
1260 }
1261 if (sbdsp_wdsp(sc, sc->sc_i.modep->cmd) < 0) {
1262 DPRINTF(("sbdsp_block_input: SB2 DMA start failed\n"));
1263 return (EIO);
1264 }
1265 }
1266 sc->sc_i.run = SB_LOOPING;
1267 }
1268
1269 return (0);
1270 }
1271
1272 int
1273 sbdsp_trigger_output(addr, start, end, blksize, intr, arg, param)
1274 void *addr;
1275 void *start, *end;
1276 int blksize;
1277 void (*intr) __P((void *));
1278 void *arg;
1279 struct audio_params *param;
1280 {
1281 struct sbdsp_softc *sc = addr;
1282 int stereo = param->channels == 2;
1283 int width = param->precision * param->factor;
1284 int cmd;
1285
1286 #ifdef DIAGNOSTIC
1287 if (stereo && (blksize & 1)) {
1288 DPRINTF(("stereo playback odd bytes (%d)\n", blksize));
1289 return (EIO);
1290 }
1291 if (sc->sc_o.run != SB_NOTRUNNING)
1292 printf("sbdsp_trigger_output: already running\n");
1293 #endif
1294
1295 sc->sc_intrp = intr;
1296 sc->sc_argp = arg;
1297
1298 if (width == 8) {
1299 #ifdef DIAGNOSTIC
1300 if (sc->sc_o.dmachan != sc->sc_drq8) {
1301 printf("sbdsp_trigger_output: width=%d bad chan %d\n",
1302 width, sc->sc_o.dmachan);
1303 return (EIO);
1304 }
1305 #endif
1306 sc->sc_intr8 = sbdsp_block_output;
1307 } else {
1308 #ifdef DIAGNOSTIC
1309 if (sc->sc_o.dmachan != sc->sc_drq16) {
1310 printf("sbdsp_trigger_output: width=%d bad chan %d\n",
1311 width, sc->sc_o.dmachan);
1312 return (EIO);
1313 }
1314 #endif
1315 sc->sc_intr16 = sbdsp_block_output;
1316 }
1317
1318 if ((sc->sc_model == SB_JAZZ) ? (sc->sc_o.dmachan > 3) : (width == 16))
1319 blksize >>= 1;
1320 --blksize;
1321 sc->sc_o.blksize = blksize;
1322
1323 if (ISSBPRO(sc)) {
1324 /* make sure we re-set stereo mixer bit when we start output. */
1325 sbdsp_mix_write(sc, SBP_STEREO,
1326 (sbdsp_mix_read(sc, SBP_STEREO) & ~SBP_PLAYMODE_MASK) |
1327 (stereo ? SBP_PLAYMODE_STEREO : SBP_PLAYMODE_MONO));
1328 cmd = sc->sc_o.modep->cmdchan;
1329 if (cmd && sbdsp_wdsp(sc, cmd) < 0)
1330 return (EIO);
1331 }
1332
1333 if (ISSB16CLASS(sc)) {
1334 if (sbdsp16_set_rate(sc, SB_DSP16_OUTPUTRATE, sc->sc_o.rate)) {
1335 DPRINTF(("sbdsp_trigger_output: rate=%d set failed\n",
1336 sc->sc_o.rate));
1337 return (EIO);
1338 }
1339 } else {
1340 if (sbdsp_set_timeconst(sc, sc->sc_o.tc)) {
1341 DPRINTF(("sbdsp_trigger_output: tc=%d set failed\n",
1342 sc->sc_o.rate));
1343 return (EIO);
1344 }
1345 }
1346
1347 DPRINTF(("sbdsp: dma start loop output start=%p end=%p chan=%d\n",
1348 start, end, sc->sc_o.dmachan));
1349 isa_dmastart(sc->sc_ic, sc->sc_o.dmachan, start,
1350 (char *)end - (char *)start, NULL,
1351 DMAMODE_WRITE | DMAMODE_LOOP, BUS_DMA_NOWAIT);
1352
1353 return sbdsp_block_output(addr);
1354 }
1355
1356 int
1357 sbdsp_block_output(addr)
1358 void *addr;
1359 {
1360 struct sbdsp_softc *sc = addr;
1361 int cc = sc->sc_o.blksize;
1362
1363 DPRINTFN(2, ("sbdsp_block_output: sc=%p cc=%d\n", addr, cc));
1364
1365 if (sc->sc_o.run != SB_NOTRUNNING)
1366 sc->sc_intrp(sc->sc_argp);
1367
1368 if (sc->sc_model == SB_1) {
1369 /* Non-looping mode, initialized. Start DMA and PCM */
1370 if (sbdsp_wdsp(sc, sc->sc_o.modep->cmd) < 0 ||
1371 sbdsp_wdsp(sc, cc) < 0 ||
1372 sbdsp_wdsp(sc, cc >> 8) < 0) {
1373 DPRINTF(("sbdsp_block_output: SB1 DMA start failed\n"));
1374 return (EIO);
1375 }
1376 sc->sc_o.run = SB_RUNNING;
1377 } else if (sc->sc_o.run == SB_NOTRUNNING) {
1378 /* Initialize looping PCM */
1379 if (ISSB16CLASS(sc)) {
1380 DPRINTF(("sbdsp_block_output: SB16 cmd=0x%02x bmode=0x%02x cc=%d\n",
1381 sc->sc_o.modep->cmd,sc->sc_o.bmode, cc));
1382 if (sbdsp_wdsp(sc, sc->sc_o.modep->cmd) < 0 ||
1383 sbdsp_wdsp(sc, sc->sc_o.bmode) < 0 ||
1384 sbdsp_wdsp(sc, cc) < 0 ||
1385 sbdsp_wdsp(sc, cc >> 8) < 0) {
1386 DPRINTF(("sbdsp_block_output: SB16 DMA start failed\n"));
1387 return (EIO);
1388 }
1389 } else {
1390 DPRINTF(("sbdsp_block_output: set blocksize=%d\n", cc));
1391 if (sbdsp_wdsp(sc, SB_DSP_BLOCKSIZE) < 0 ||
1392 sbdsp_wdsp(sc, cc) < 0 ||
1393 sbdsp_wdsp(sc, cc >> 8) < 0) {
1394 DPRINTF(("sbdsp_block_output: SB2 DMA blocksize failed\n"));
1395 return (EIO);
1396 }
1397 if (sbdsp_wdsp(sc, sc->sc_o.modep->cmd) < 0) {
1398 DPRINTF(("sbdsp_block_output: SB2 DMA start failed\n"));
1399 return (EIO);
1400 }
1401 }
1402 sc->sc_o.run = SB_LOOPING;
1403 }
1404
1405 return (0);
1406 }
1407
1408 int
1409 sbdsp_halt_output(addr)
1410 void *addr;
1411 {
1412 struct sbdsp_softc *sc = addr;
1413
1414 if (sc->sc_o.run != SB_NOTRUNNING) {
1415 if (sbdsp_wdsp(sc, sc->sc_o.modep->halt) < 0)
1416 printf("sbdsp_halt_output: failed to halt\n");
1417 isa_dmaabort(sc->sc_ic, sc->sc_o.dmachan);
1418 sc->sc_o.run = SB_NOTRUNNING;
1419 }
1420
1421 return (0);
1422 }
1423
1424 int
1425 sbdsp_halt_input(addr)
1426 void *addr;
1427 {
1428 struct sbdsp_softc *sc = addr;
1429
1430 if (sc->sc_i.run != SB_NOTRUNNING) {
1431 if (sbdsp_wdsp(sc, sc->sc_i.modep->halt) < 0)
1432 printf("sbdsp_halt_input: failed to halt\n");
1433 isa_dmaabort(sc->sc_ic, sc->sc_i.dmachan);
1434 sc->sc_i.run = SB_NOTRUNNING;
1435 }
1436
1437 return (0);
1438 }
1439
1440 /*
1441 * Only the DSP unit on the sound blaster generates interrupts.
1442 * There are three cases of interrupt: reception of a midi byte
1443 * (when mode is enabled), completion of dma transmission, or
1444 * completion of a dma reception.
1445 *
1446 * If there is interrupt sharing or a spurious interrupt occurs
1447 * there is no way to distinguish this on an SB2. So if you have
1448 * an SB2 and experience problems, buy an SB16 (it's only $40).
1449 */
1450 int
1451 sbdsp_intr(arg)
1452 void *arg;
1453 {
1454 struct sbdsp_softc *sc = arg;
1455 u_char irq;
1456
1457 DPRINTFN(2, ("sbdsp_intr: intr8=%p, intr16=%p\n",
1458 sc->sc_intr8, sc->sc_intr16));
1459 if (ISSB16CLASS(sc)) {
1460 irq = sbdsp_mix_read(sc, SBP_IRQ_STATUS);
1461 if ((irq & (SBP_IRQ_DMA8 | SBP_IRQ_DMA16 | SBP_IRQ_MPU401)) == 0) {
1462 DPRINTF(("sbdsp_intr: Spurious interrupt 0x%x\n", irq));
1463 return 0;
1464 }
1465 } else {
1466 /* XXXX CHECK FOR INTERRUPT */
1467 irq = SBP_IRQ_DMA8;
1468 }
1469
1470 sc->sc_interrupts++;
1471 delay(10); /* XXX why? */
1472
1473 /* clear interrupt */
1474 if (irq & SBP_IRQ_DMA8) {
1475 bus_space_read_1(sc->sc_iot, sc->sc_ioh, SBP_DSP_IRQACK8);
1476 if (sc->sc_intr8)
1477 sc->sc_intr8(arg);
1478 }
1479 if (irq & SBP_IRQ_DMA16) {
1480 bus_space_read_1(sc->sc_iot, sc->sc_ioh, SBP_DSP_IRQACK16);
1481 if (sc->sc_intr16)
1482 sc->sc_intr16(arg);
1483 }
1484 #if NMIDI > 0
1485 if ((irq & SBP_IRQ_MPU401) && sc->sc_hasmpu) {
1486 mpu401_intr(&sc->sc_mpu_sc);
1487 }
1488 #endif
1489 return 1;
1490 }
1491
1492 /* Like val & mask, but make sure the result is correctly rounded. */
1493 #define MAXVAL 256
1494 static int
1495 sbdsp_adjust(val, mask)
1496 int val, mask;
1497 {
1498 val += (MAXVAL - mask) >> 1;
1499 if (val >= MAXVAL)
1500 val = MAXVAL-1;
1501 return val & mask;
1502 }
1503
1504 void
1505 sbdsp_set_mixer_gain(sc, port)
1506 struct sbdsp_softc *sc;
1507 int port;
1508 {
1509 int src, gain;
1510
1511 switch(sc->sc_mixer_model) {
1512 case SBM_NONE:
1513 return;
1514 case SBM_CT1335:
1515 gain = SB_1335_GAIN(sc->gain[port][SB_LEFT]);
1516 switch(port) {
1517 case SB_MASTER_VOL:
1518 src = SBP_1335_MASTER_VOL;
1519 break;
1520 case SB_MIDI_VOL:
1521 src = SBP_1335_MIDI_VOL;
1522 break;
1523 case SB_CD_VOL:
1524 src = SBP_1335_CD_VOL;
1525 break;
1526 case SB_VOICE_VOL:
1527 src = SBP_1335_VOICE_VOL;
1528 gain = SB_1335_MASTER_GAIN(sc->gain[port][SB_LEFT]);
1529 break;
1530 default:
1531 return;
1532 }
1533 sbdsp_mix_write(sc, src, gain);
1534 break;
1535 case SBM_CT1345:
1536 gain = SB_STEREO_GAIN(sc->gain[port][SB_LEFT],
1537 sc->gain[port][SB_RIGHT]);
1538 switch (port) {
1539 case SB_MIC_VOL:
1540 src = SBP_MIC_VOL;
1541 gain = SB_MIC_GAIN(sc->gain[port][SB_LEFT]);
1542 break;
1543 case SB_MASTER_VOL:
1544 src = SBP_MASTER_VOL;
1545 break;
1546 case SB_LINE_IN_VOL:
1547 src = SBP_LINE_VOL;
1548 break;
1549 case SB_VOICE_VOL:
1550 src = SBP_VOICE_VOL;
1551 break;
1552 case SB_MIDI_VOL:
1553 src = SBP_MIDI_VOL;
1554 break;
1555 case SB_CD_VOL:
1556 src = SBP_CD_VOL;
1557 break;
1558 default:
1559 return;
1560 }
1561 sbdsp_mix_write(sc, src, gain);
1562 break;
1563 case SBM_CT1XX5:
1564 case SBM_CT1745:
1565 switch (port) {
1566 case SB_MIC_VOL:
1567 src = SB16P_MIC_L;
1568 break;
1569 case SB_MASTER_VOL:
1570 src = SB16P_MASTER_L;
1571 break;
1572 case SB_LINE_IN_VOL:
1573 src = SB16P_LINE_L;
1574 break;
1575 case SB_VOICE_VOL:
1576 src = SB16P_VOICE_L;
1577 break;
1578 case SB_MIDI_VOL:
1579 src = SB16P_MIDI_L;
1580 break;
1581 case SB_CD_VOL:
1582 src = SB16P_CD_L;
1583 break;
1584 case SB_INPUT_GAIN:
1585 src = SB16P_INPUT_GAIN_L;
1586 break;
1587 case SB_OUTPUT_GAIN:
1588 src = SB16P_OUTPUT_GAIN_L;
1589 break;
1590 case SB_TREBLE:
1591 src = SB16P_TREBLE_L;
1592 break;
1593 case SB_BASS:
1594 src = SB16P_BASS_L;
1595 break;
1596 case SB_PCSPEAKER:
1597 sbdsp_mix_write(sc, SB16P_PCSPEAKER, sc->gain[port][SB_LEFT]);
1598 return;
1599 default:
1600 return;
1601 }
1602 sbdsp_mix_write(sc, src, sc->gain[port][SB_LEFT]);
1603 sbdsp_mix_write(sc, SB16P_L_TO_R(src), sc->gain[port][SB_RIGHT]);
1604 break;
1605 }
1606 }
1607
1608 int
1609 sbdsp_mixer_set_port(addr, cp)
1610 void *addr;
1611 mixer_ctrl_t *cp;
1612 {
1613 struct sbdsp_softc *sc = addr;
1614 int lgain, rgain;
1615 int mask, bits;
1616 int lmask, rmask, lbits, rbits;
1617 int mute, swap;
1618
1619 if (sc->sc_open == SB_OPEN_MIDI)
1620 return EBUSY;
1621
1622 DPRINTF(("sbdsp_mixer_set_port: port=%d num_channels=%d\n", cp->dev,
1623 cp->un.value.num_channels));
1624
1625 if (sc->sc_mixer_model == SBM_NONE)
1626 return EINVAL;
1627
1628 switch (cp->dev) {
1629 case SB_TREBLE:
1630 case SB_BASS:
1631 if (sc->sc_mixer_model == SBM_CT1345 ||
1632 sc->sc_mixer_model == SBM_CT1XX5) {
1633 if (cp->type != AUDIO_MIXER_ENUM)
1634 return EINVAL;
1635 switch (cp->dev) {
1636 case SB_TREBLE:
1637 sbdsp_set_ifilter(addr, cp->un.ord ? SB_TREBLE : 0);
1638 return 0;
1639 case SB_BASS:
1640 sbdsp_set_ifilter(addr, cp->un.ord ? SB_BASS : 0);
1641 return 0;
1642 }
1643 }
1644 case SB_PCSPEAKER:
1645 case SB_INPUT_GAIN:
1646 case SB_OUTPUT_GAIN:
1647 if (!ISSBM1745(sc))
1648 return EINVAL;
1649 case SB_MIC_VOL:
1650 case SB_LINE_IN_VOL:
1651 if (sc->sc_mixer_model == SBM_CT1335)
1652 return EINVAL;
1653 case SB_VOICE_VOL:
1654 case SB_MIDI_VOL:
1655 case SB_CD_VOL:
1656 case SB_MASTER_VOL:
1657 if (cp->type != AUDIO_MIXER_VALUE)
1658 return EINVAL;
1659
1660 /*
1661 * All the mixer ports are stereo except for the microphone.
1662 * If we get a single-channel gain value passed in, then we
1663 * duplicate it to both left and right channels.
1664 */
1665
1666 switch (cp->dev) {
1667 case SB_MIC_VOL:
1668 if (cp->un.value.num_channels != 1)
1669 return EINVAL;
1670
1671 lgain = rgain = SB_ADJUST_MIC_GAIN(sc,
1672 cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]);
1673 break;
1674 case SB_PCSPEAKER:
1675 if (cp->un.value.num_channels != 1)
1676 return EINVAL;
1677 /* fall into */
1678 case SB_INPUT_GAIN:
1679 case SB_OUTPUT_GAIN:
1680 lgain = rgain = SB_ADJUST_2_GAIN(sc,
1681 cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]);
1682 break;
1683 default:
1684 switch (cp->un.value.num_channels) {
1685 case 1:
1686 lgain = rgain = SB_ADJUST_GAIN(sc,
1687 cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]);
1688 break;
1689 case 2:
1690 if (sc->sc_mixer_model == SBM_CT1335)
1691 return EINVAL;
1692 lgain = SB_ADJUST_GAIN(sc,
1693 cp->un.value.level[AUDIO_MIXER_LEVEL_LEFT]);
1694 rgain = SB_ADJUST_GAIN(sc,
1695 cp->un.value.level[AUDIO_MIXER_LEVEL_RIGHT]);
1696 break;
1697 default:
1698 return EINVAL;
1699 }
1700 break;
1701 }
1702 sc->gain[cp->dev][SB_LEFT] = lgain;
1703 sc->gain[cp->dev][SB_RIGHT] = rgain;
1704
1705 sbdsp_set_mixer_gain(sc, cp->dev);
1706 break;
1707
1708 case SB_RECORD_SOURCE:
1709 if (ISSBM1745(sc)) {
1710 if (cp->type != AUDIO_MIXER_SET)
1711 return EINVAL;
1712 return sbdsp_set_in_ports(sc, cp->un.mask);
1713 } else {
1714 if (cp->type != AUDIO_MIXER_ENUM)
1715 return EINVAL;
1716 sc->in_port = cp->un.ord;
1717 return sbdsp_set_in_ports(sc, 1 << cp->un.ord);
1718 }
1719 break;
1720
1721 case SB_AGC:
1722 if (!ISSBM1745(sc) || cp->type != AUDIO_MIXER_ENUM)
1723 return EINVAL;
1724 sbdsp_mix_write(sc, SB16P_AGC, cp->un.ord & 1);
1725 break;
1726
1727 case SB_CD_OUT_MUTE:
1728 mask = SB16P_SW_CD;
1729 goto omute;
1730 case SB_MIC_OUT_MUTE:
1731 mask = SB16P_SW_MIC;
1732 goto omute;
1733 case SB_LINE_OUT_MUTE:
1734 mask = SB16P_SW_LINE;
1735 omute:
1736 if (cp->type != AUDIO_MIXER_ENUM)
1737 return EINVAL;
1738 bits = sbdsp_mix_read(sc, SB16P_OSWITCH);
1739 sc->gain[cp->dev][SB_LR] = cp->un.ord != 0;
1740 if (cp->un.ord)
1741 bits = bits & ~mask;
1742 else
1743 bits = bits | mask;
1744 sbdsp_mix_write(sc, SB16P_OSWITCH, bits);
1745 break;
1746
1747 case SB_MIC_IN_MUTE:
1748 case SB_MIC_SWAP:
1749 lmask = rmask = SB16P_SW_MIC;
1750 goto imute;
1751 case SB_CD_IN_MUTE:
1752 case SB_CD_SWAP:
1753 lmask = SB16P_SW_CD_L;
1754 rmask = SB16P_SW_CD_R;
1755 goto imute;
1756 case SB_LINE_IN_MUTE:
1757 case SB_LINE_SWAP:
1758 lmask = SB16P_SW_LINE_L;
1759 rmask = SB16P_SW_LINE_R;
1760 goto imute;
1761 case SB_MIDI_IN_MUTE:
1762 case SB_MIDI_SWAP:
1763 lmask = SB16P_SW_MIDI_L;
1764 rmask = SB16P_SW_MIDI_R;
1765 imute:
1766 if (cp->type != AUDIO_MIXER_ENUM)
1767 return EINVAL;
1768 mask = lmask | rmask;
1769 lbits = sbdsp_mix_read(sc, SB16P_ISWITCH_L) & ~mask;
1770 rbits = sbdsp_mix_read(sc, SB16P_ISWITCH_R) & ~mask;
1771 sc->gain[cp->dev][SB_LR] = cp->un.ord != 0;
1772 if (SB_IS_IN_MUTE(cp->dev)) {
1773 mute = cp->dev;
1774 swap = mute - SB_CD_IN_MUTE + SB_CD_SWAP;
1775 } else {
1776 swap = cp->dev;
1777 mute = swap + SB_CD_IN_MUTE - SB_CD_SWAP;
1778 }
1779 if (sc->gain[swap][SB_LR]) {
1780 mask = lmask;
1781 lmask = rmask;
1782 rmask = mask;
1783 }
1784 if (!sc->gain[mute][SB_LR]) {
1785 lbits = lbits | lmask;
1786 rbits = rbits | rmask;
1787 }
1788 sbdsp_mix_write(sc, SB16P_ISWITCH_L, lbits);
1789 sbdsp_mix_write(sc, SB16P_ISWITCH_L, rbits);
1790 break;
1791
1792 default:
1793 return EINVAL;
1794 }
1795
1796 return 0;
1797 }
1798
1799 int
1800 sbdsp_mixer_get_port(addr, cp)
1801 void *addr;
1802 mixer_ctrl_t *cp;
1803 {
1804 struct sbdsp_softc *sc = addr;
1805
1806 if (sc->sc_open == SB_OPEN_MIDI)
1807 return EBUSY;
1808
1809 DPRINTF(("sbdsp_mixer_get_port: port=%d\n", cp->dev));
1810
1811 if (sc->sc_mixer_model == SBM_NONE)
1812 return EINVAL;
1813
1814 switch (cp->dev) {
1815 case SB_TREBLE:
1816 case SB_BASS:
1817 if (sc->sc_mixer_model == SBM_CT1345 ||
1818 sc->sc_mixer_model == SBM_CT1XX5) {
1819 switch (cp->dev) {
1820 case SB_TREBLE:
1821 cp->un.ord = sbdsp_get_ifilter(addr) == SB_TREBLE;
1822 return 0;
1823 case SB_BASS:
1824 cp->un.ord = sbdsp_get_ifilter(addr) == SB_BASS;
1825 return 0;
1826 }
1827 }
1828 case SB_PCSPEAKER:
1829 case SB_INPUT_GAIN:
1830 case SB_OUTPUT_GAIN:
1831 if (!ISSBM1745(sc))
1832 return EINVAL;
1833 case SB_MIC_VOL:
1834 case SB_LINE_IN_VOL:
1835 if (sc->sc_mixer_model == SBM_CT1335)
1836 return EINVAL;
1837 case SB_VOICE_VOL:
1838 case SB_MIDI_VOL:
1839 case SB_CD_VOL:
1840 case SB_MASTER_VOL:
1841 switch (cp->dev) {
1842 case SB_MIC_VOL:
1843 case SB_PCSPEAKER:
1844 if (cp->un.value.num_channels != 1)
1845 return EINVAL;
1846 /* fall into */
1847 default:
1848 switch (cp->un.value.num_channels) {
1849 case 1:
1850 cp->un.value.level[AUDIO_MIXER_LEVEL_MONO] =
1851 sc->gain[cp->dev][SB_LEFT];
1852 break;
1853 case 2:
1854 cp->un.value.level[AUDIO_MIXER_LEVEL_LEFT] =
1855 sc->gain[cp->dev][SB_LEFT];
1856 cp->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] =
1857 sc->gain[cp->dev][SB_RIGHT];
1858 break;
1859 default:
1860 return EINVAL;
1861 }
1862 break;
1863 }
1864 break;
1865
1866 case SB_RECORD_SOURCE:
1867 if (ISSBM1745(sc))
1868 cp->un.mask = sc->in_mask;
1869 else
1870 cp->un.ord = sc->in_port;
1871 break;
1872
1873 case SB_AGC:
1874 if (!ISSBM1745(sc))
1875 return EINVAL;
1876 cp->un.ord = sbdsp_mix_read(sc, SB16P_AGC);
1877 break;
1878
1879 case SB_CD_IN_MUTE:
1880 case SB_MIC_IN_MUTE:
1881 case SB_LINE_IN_MUTE:
1882 case SB_MIDI_IN_MUTE:
1883 case SB_CD_SWAP:
1884 case SB_MIC_SWAP:
1885 case SB_LINE_SWAP:
1886 case SB_MIDI_SWAP:
1887 case SB_CD_OUT_MUTE:
1888 case SB_MIC_OUT_MUTE:
1889 case SB_LINE_OUT_MUTE:
1890 cp->un.ord = sc->gain[cp->dev][SB_LR];
1891 break;
1892
1893 default:
1894 return EINVAL;
1895 }
1896
1897 return 0;
1898 }
1899
1900 int
1901 sbdsp_mixer_query_devinfo(addr, dip)
1902 void *addr;
1903 mixer_devinfo_t *dip;
1904 {
1905 struct sbdsp_softc *sc = addr;
1906 int chan, class, is1745;
1907
1908 DPRINTF(("sbdsp_mixer_query_devinfo: model=%d index=%d\n",
1909 sc->sc_mixer_model, dip->index));
1910
1911 if (sc->sc_mixer_model == SBM_NONE)
1912 return ENXIO;
1913
1914 chan = sc->sc_mixer_model == SBM_CT1335 ? 1 : 2;
1915 is1745 = ISSBM1745(sc);
1916 class = is1745 ? SB_INPUT_CLASS : SB_OUTPUT_CLASS;
1917
1918 switch (dip->index) {
1919 case SB_MASTER_VOL:
1920 dip->type = AUDIO_MIXER_VALUE;
1921 dip->mixer_class = SB_OUTPUT_CLASS;
1922 dip->prev = dip->next = AUDIO_MIXER_LAST;
1923 strcpy(dip->label.name, AudioNmaster);
1924 dip->un.v.num_channels = chan;
1925 strcpy(dip->un.v.units.name, AudioNvolume);
1926 return 0;
1927 case SB_MIDI_VOL:
1928 dip->type = AUDIO_MIXER_VALUE;
1929 dip->mixer_class = class;
1930 dip->prev = AUDIO_MIXER_LAST;
1931 dip->next = is1745 ? SB_MIDI_IN_MUTE : AUDIO_MIXER_LAST;
1932 strcpy(dip->label.name, AudioNfmsynth);
1933 dip->un.v.num_channels = chan;
1934 strcpy(dip->un.v.units.name, AudioNvolume);
1935 return 0;
1936 case SB_CD_VOL:
1937 dip->type = AUDIO_MIXER_VALUE;
1938 dip->mixer_class = class;
1939 dip->prev = AUDIO_MIXER_LAST;
1940 dip->next = is1745 ? SB_CD_IN_MUTE : AUDIO_MIXER_LAST;
1941 strcpy(dip->label.name, AudioNcd);
1942 dip->un.v.num_channels = chan;
1943 strcpy(dip->un.v.units.name, AudioNvolume);
1944 return 0;
1945 case SB_VOICE_VOL:
1946 dip->type = AUDIO_MIXER_VALUE;
1947 dip->mixer_class = class;
1948 dip->prev = AUDIO_MIXER_LAST;
1949 dip->next = AUDIO_MIXER_LAST;
1950 strcpy(dip->label.name, AudioNdac);
1951 dip->un.v.num_channels = chan;
1952 strcpy(dip->un.v.units.name, AudioNvolume);
1953 return 0;
1954 case SB_OUTPUT_CLASS:
1955 dip->type = AUDIO_MIXER_CLASS;
1956 dip->mixer_class = SB_OUTPUT_CLASS;
1957 dip->next = dip->prev = AUDIO_MIXER_LAST;
1958 strcpy(dip->label.name, AudioCoutputs);
1959 return 0;
1960 }
1961
1962 if (sc->sc_mixer_model == SBM_CT1335)
1963 return ENXIO;
1964
1965 switch (dip->index) {
1966 case SB_MIC_VOL:
1967 dip->type = AUDIO_MIXER_VALUE;
1968 dip->mixer_class = class;
1969 dip->prev = AUDIO_MIXER_LAST;
1970 dip->next = is1745 ? SB_MIC_IN_MUTE : AUDIO_MIXER_LAST;
1971 strcpy(dip->label.name, AudioNmicrophone);
1972 dip->un.v.num_channels = 1;
1973 strcpy(dip->un.v.units.name, AudioNvolume);
1974 return 0;
1975
1976 case SB_LINE_IN_VOL:
1977 dip->type = AUDIO_MIXER_VALUE;
1978 dip->mixer_class = class;
1979 dip->prev = AUDIO_MIXER_LAST;
1980 dip->next = is1745 ? SB_LINE_IN_MUTE : AUDIO_MIXER_LAST;
1981 strcpy(dip->label.name, AudioNline);
1982 dip->un.v.num_channels = 2;
1983 strcpy(dip->un.v.units.name, AudioNvolume);
1984 return 0;
1985
1986 case SB_RECORD_SOURCE:
1987 dip->mixer_class = SB_RECORD_CLASS;
1988 dip->prev = dip->next = AUDIO_MIXER_LAST;
1989 strcpy(dip->label.name, AudioNsource);
1990 if (ISSBM1745(sc)) {
1991 dip->type = AUDIO_MIXER_SET;
1992 dip->un.s.num_mem = 4;
1993 strcpy(dip->un.s.member[0].label.name, AudioNmicrophone);
1994 dip->un.s.member[0].mask = 1 << SB_MIC_VOL;
1995 strcpy(dip->un.s.member[1].label.name, AudioNcd);
1996 dip->un.s.member[1].mask = 1 << SB_CD_VOL;
1997 strcpy(dip->un.s.member[2].label.name, AudioNline);
1998 dip->un.s.member[2].mask = 1 << SB_LINE_IN_VOL;
1999 strcpy(dip->un.s.member[3].label.name, AudioNfmsynth);
2000 dip->un.s.member[3].mask = 1 << SB_MIDI_VOL;
2001 } else {
2002 dip->type = AUDIO_MIXER_ENUM;
2003 dip->un.e.num_mem = 3;
2004 strcpy(dip->un.e.member[0].label.name, AudioNmicrophone);
2005 dip->un.e.member[0].ord = SB_MIC_VOL;
2006 strcpy(dip->un.e.member[1].label.name, AudioNcd);
2007 dip->un.e.member[1].ord = SB_CD_VOL;
2008 strcpy(dip->un.e.member[2].label.name, AudioNline);
2009 dip->un.e.member[2].ord = SB_LINE_IN_VOL;
2010 }
2011 return 0;
2012
2013 case SB_BASS:
2014 dip->prev = dip->next = AUDIO_MIXER_LAST;
2015 strcpy(dip->label.name, AudioNbass);
2016 if (sc->sc_mixer_model == SBM_CT1745) {
2017 dip->type = AUDIO_MIXER_VALUE;
2018 dip->mixer_class = SB_EQUALIZATION_CLASS;
2019 dip->un.v.num_channels = 2;
2020 strcpy(dip->un.v.units.name, AudioNbass);
2021 } else {
2022 dip->type = AUDIO_MIXER_ENUM;
2023 dip->mixer_class = SB_INPUT_CLASS;
2024 dip->un.e.num_mem = 2;
2025 strcpy(dip->un.e.member[0].label.name, AudioNoff);
2026 dip->un.e.member[0].ord = 0;
2027 strcpy(dip->un.e.member[1].label.name, AudioNon);
2028 dip->un.e.member[1].ord = 1;
2029 }
2030 return 0;
2031
2032 case SB_TREBLE:
2033 dip->prev = dip->next = AUDIO_MIXER_LAST;
2034 strcpy(dip->label.name, AudioNtreble);
2035 if (sc->sc_mixer_model == SBM_CT1745) {
2036 dip->type = AUDIO_MIXER_VALUE;
2037 dip->mixer_class = SB_EQUALIZATION_CLASS;
2038 dip->un.v.num_channels = 2;
2039 strcpy(dip->un.v.units.name, AudioNtreble);
2040 } else {
2041 dip->type = AUDIO_MIXER_ENUM;
2042 dip->mixer_class = SB_INPUT_CLASS;
2043 dip->un.e.num_mem = 2;
2044 strcpy(dip->un.e.member[0].label.name, AudioNoff);
2045 dip->un.e.member[0].ord = 0;
2046 strcpy(dip->un.e.member[1].label.name, AudioNon);
2047 dip->un.e.member[1].ord = 1;
2048 }
2049 return 0;
2050
2051 case SB_RECORD_CLASS: /* record source class */
2052 dip->type = AUDIO_MIXER_CLASS;
2053 dip->mixer_class = SB_RECORD_CLASS;
2054 dip->next = dip->prev = AUDIO_MIXER_LAST;
2055 strcpy(dip->label.name, AudioCrecord);
2056 return 0;
2057
2058 case SB_INPUT_CLASS:
2059 dip->type = AUDIO_MIXER_CLASS;
2060 dip->mixer_class = SB_INPUT_CLASS;
2061 dip->next = dip->prev = AUDIO_MIXER_LAST;
2062 strcpy(dip->label.name, AudioCinputs);
2063 return 0;
2064
2065 }
2066
2067 if (sc->sc_mixer_model == SBM_CT1345)
2068 return ENXIO;
2069
2070 switch(dip->index) {
2071 case SB_PCSPEAKER:
2072 dip->type = AUDIO_MIXER_VALUE;
2073 dip->mixer_class = SB_INPUT_CLASS;
2074 dip->prev = dip->next = AUDIO_MIXER_LAST;
2075 strcpy(dip->label.name, "pc_speaker");
2076 dip->un.v.num_channels = 1;
2077 strcpy(dip->un.v.units.name, AudioNvolume);
2078 return 0;
2079
2080 case SB_INPUT_GAIN:
2081 dip->type = AUDIO_MIXER_VALUE;
2082 dip->mixer_class = SB_INPUT_CLASS;
2083 dip->prev = dip->next = AUDIO_MIXER_LAST;
2084 strcpy(dip->label.name, AudioNinput);
2085 dip->un.v.num_channels = 2;
2086 strcpy(dip->un.v.units.name, AudioNvolume);
2087 return 0;
2088
2089 case SB_OUTPUT_GAIN:
2090 dip->type = AUDIO_MIXER_VALUE;
2091 dip->mixer_class = SB_OUTPUT_CLASS;
2092 dip->prev = dip->next = AUDIO_MIXER_LAST;
2093 strcpy(dip->label.name, AudioNoutput);
2094 dip->un.v.num_channels = 2;
2095 strcpy(dip->un.v.units.name, AudioNvolume);
2096 return 0;
2097
2098 case SB_AGC:
2099 dip->type = AUDIO_MIXER_ENUM;
2100 dip->mixer_class = SB_INPUT_CLASS;
2101 dip->prev = dip->next = AUDIO_MIXER_LAST;
2102 strcpy(dip->label.name, "agc");
2103 dip->un.e.num_mem = 2;
2104 strcpy(dip->un.e.member[0].label.name, AudioNoff);
2105 dip->un.e.member[0].ord = 0;
2106 strcpy(dip->un.e.member[1].label.name, AudioNon);
2107 dip->un.e.member[1].ord = 1;
2108 return 0;
2109
2110 case SB_EQUALIZATION_CLASS:
2111 dip->type = AUDIO_MIXER_CLASS;
2112 dip->mixer_class = SB_EQUALIZATION_CLASS;
2113 dip->next = dip->prev = AUDIO_MIXER_LAST;
2114 strcpy(dip->label.name, AudioCequalization);
2115 return 0;
2116
2117 case SB_CD_IN_MUTE:
2118 dip->prev = SB_CD_VOL;
2119 dip->next = SB_CD_SWAP;
2120 dip->mixer_class = SB_INPUT_CLASS;
2121 goto mute;
2122
2123 case SB_MIC_IN_MUTE:
2124 dip->prev = SB_MIC_VOL;
2125 dip->next = SB_MIC_SWAP;
2126 dip->mixer_class = SB_INPUT_CLASS;
2127 goto mute;
2128
2129 case SB_LINE_IN_MUTE:
2130 dip->prev = SB_LINE_IN_VOL;
2131 dip->next = SB_LINE_SWAP;
2132 dip->mixer_class = SB_INPUT_CLASS;
2133 goto mute;
2134
2135 case SB_MIDI_IN_MUTE:
2136 dip->prev = SB_MIDI_VOL;
2137 dip->next = SB_MIDI_SWAP;
2138 dip->mixer_class = SB_INPUT_CLASS;
2139 goto mute;
2140
2141 case SB_CD_SWAP:
2142 dip->prev = SB_CD_IN_MUTE;
2143 dip->next = SB_CD_OUT_MUTE;
2144 goto swap;
2145
2146 case SB_MIC_SWAP:
2147 dip->prev = SB_MIC_IN_MUTE;
2148 dip->next = SB_MIC_OUT_MUTE;
2149 goto swap;
2150
2151 case SB_LINE_SWAP:
2152 dip->prev = SB_LINE_IN_MUTE;
2153 dip->next = SB_LINE_OUT_MUTE;
2154 goto swap;
2155
2156 case SB_MIDI_SWAP:
2157 dip->prev = SB_MIDI_IN_MUTE;
2158 dip->next = AUDIO_MIXER_LAST;
2159 swap:
2160 dip->mixer_class = SB_INPUT_CLASS;
2161 strcpy(dip->label.name, AudioNswap);
2162 goto mute1;
2163
2164 case SB_CD_OUT_MUTE:
2165 dip->prev = SB_CD_SWAP;
2166 dip->next = AUDIO_MIXER_LAST;
2167 dip->mixer_class = SB_OUTPUT_CLASS;
2168 goto mute;
2169
2170 case SB_MIC_OUT_MUTE:
2171 dip->prev = SB_MIC_SWAP;
2172 dip->next = AUDIO_MIXER_LAST;
2173 dip->mixer_class = SB_OUTPUT_CLASS;
2174 goto mute;
2175
2176 case SB_LINE_OUT_MUTE:
2177 dip->prev = SB_LINE_SWAP;
2178 dip->next = AUDIO_MIXER_LAST;
2179 dip->mixer_class = SB_OUTPUT_CLASS;
2180 mute:
2181 strcpy(dip->label.name, AudioNmute);
2182 mute1:
2183 dip->type = AUDIO_MIXER_ENUM;
2184 dip->un.e.num_mem = 2;
2185 strcpy(dip->un.e.member[0].label.name, AudioNoff);
2186 dip->un.e.member[0].ord = 0;
2187 strcpy(dip->un.e.member[1].label.name, AudioNon);
2188 dip->un.e.member[1].ord = 1;
2189 return 0;
2190
2191 }
2192
2193 return ENXIO;
2194 }
2195
2196 void *
2197 sb_malloc(addr, direction, size, pool, flags)
2198 void *addr;
2199 int direction;
2200 size_t size;
2201 int pool, flags;
2202 {
2203 struct sbdsp_softc *sc = addr;
2204 int drq;
2205
2206 if (sc->sc_drq8 != -1)
2207 drq = sc->sc_drq8;
2208 else
2209 drq = sc->sc_drq16;
2210 return (isa_malloc(sc->sc_ic, drq, size, pool, flags));
2211 }
2212
2213 void
2214 sb_free(addr, ptr, pool)
2215 void *addr;
2216 void *ptr;
2217 int pool;
2218 {
2219 isa_free(ptr, pool);
2220 }
2221
2222 size_t
2223 sb_round_buffersize(addr, direction, size)
2224 void *addr;
2225 int direction;
2226 size_t size;
2227 {
2228 if (size > MAX_ISADMA)
2229 size = MAX_ISADMA;
2230 return (size);
2231 }
2232
2233 int
2234 sb_mappage(addr, mem, off, prot)
2235 void *addr;
2236 void *mem;
2237 int off;
2238 int prot;
2239 {
2240 return isa_mappage(mem, off, prot);
2241 }
2242
2243 int
2244 sbdsp_get_props(addr)
2245 void *addr;
2246 {
2247 struct sbdsp_softc *sc = addr;
2248 return AUDIO_PROP_MMAP | AUDIO_PROP_INDEPENDENT |
2249 (sc->sc_fullduplex ? AUDIO_PROP_FULLDUPLEX : 0);
2250 }
2251
2252 #if NMIDI > 0
2253 /*
2254 * MIDI related routines.
2255 */
2256
2257 int
2258 sbdsp_midi_open(addr, flags, iintr, ointr, arg)
2259 void *addr;
2260 int flags;
2261 void (*iintr)__P((void *, int));
2262 void (*ointr)__P((void *));
2263 void *arg;
2264 {
2265 struct sbdsp_softc *sc = addr;
2266
2267 DPRINTF(("sbdsp_midi_open: sc=%p\n", sc));
2268
2269 if (sc->sc_open != SB_CLOSED)
2270 return EBUSY;
2271 if (sbdsp_reset(sc) != 0)
2272 return EIO;
2273
2274 sc->sc_open = SB_OPEN_MIDI;
2275 sc->sc_openflags = flags;
2276
2277 if (sc->sc_model >= SB_20)
2278 if (sbdsp_wdsp(sc, SB_MIDI_UART_INTR)) /* enter UART mode */
2279 return EIO;
2280
2281 sc->sc_intr8 = sbdsp_midi_intr;
2282 sc->sc_intrm = iintr;
2283 sc->sc_argm = arg;
2284
2285 return 0;
2286 }
2287
2288 void
2289 sbdsp_midi_close(addr)
2290 void *addr;
2291 {
2292 struct sbdsp_softc *sc = addr;
2293
2294 DPRINTF(("sbdsp_midi_close: sc=%p\n", sc));
2295
2296 if (sc->sc_model >= SB_20)
2297 sbdsp_reset(sc); /* exit UART mode */
2298
2299 sc->sc_intrm = 0;
2300 sc->sc_open = SB_CLOSED;
2301 }
2302
2303 int
2304 sbdsp_midi_output(addr, d)
2305 void *addr;
2306 int d;
2307 {
2308 struct sbdsp_softc *sc = addr;
2309
2310 if (sc->sc_model < SB_20 && sbdsp_wdsp(sc, SB_MIDI_WRITE))
2311 return EIO;
2312 if (sbdsp_wdsp(sc, d))
2313 return EIO;
2314 return 0;
2315 }
2316
2317 void
2318 sbdsp_midi_getinfo(addr, mi)
2319 void *addr;
2320 struct midi_info *mi;
2321 {
2322 struct sbdsp_softc *sc = addr;
2323
2324 mi->name = sc->sc_model < SB_20 ? "SB MIDI cmd" : "SB MIDI UART";
2325 mi->props = MIDI_PROP_CAN_INPUT;
2326 }
2327
2328 int
2329 sbdsp_midi_intr(addr)
2330 void *addr;
2331 {
2332 struct sbdsp_softc *sc = addr;
2333
2334 sc->sc_intrm(sc->sc_argm, sbdsp_rdsp(sc));
2335 return (0);
2336 }
2337
2338 #endif
2339
2340