sbdsp.c revision 1.32 1 1.32 christos /* $NetBSD: sbdsp.c,v 1.32 1997/03/03 21:40:01 christos Exp $ */
2 1.1 brezak
3 1.1 brezak /*
4 1.1 brezak * Copyright (c) 1991-1993 Regents of the University of California.
5 1.1 brezak * All rights reserved.
6 1.1 brezak *
7 1.1 brezak * Redistribution and use in source and binary forms, with or without
8 1.1 brezak * modification, are permitted provided that the following conditions
9 1.1 brezak * are met:
10 1.1 brezak * 1. Redistributions of source code must retain the above copyright
11 1.1 brezak * notice, this list of conditions and the following disclaimer.
12 1.1 brezak * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 brezak * notice, this list of conditions and the following disclaimer in the
14 1.1 brezak * documentation and/or other materials provided with the distribution.
15 1.1 brezak * 3. All advertising materials mentioning features or use of this software
16 1.1 brezak * must display the following acknowledgement:
17 1.1 brezak * This product includes software developed by the Computer Systems
18 1.1 brezak * Engineering Group at Lawrence Berkeley Laboratory.
19 1.1 brezak * 4. Neither the name of the University nor of the Laboratory may be used
20 1.1 brezak * to endorse or promote products derived from this software without
21 1.1 brezak * specific prior written permission.
22 1.1 brezak *
23 1.1 brezak * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 brezak * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 brezak * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 brezak * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 brezak * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 brezak * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 brezak * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 brezak * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 brezak * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 brezak * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 brezak * SUCH DAMAGE.
34 1.1 brezak *
35 1.1 brezak */
36 1.1 brezak /*
37 1.1 brezak * SoundBlaster Pro code provided by John Kohl, based on lots of
38 1.1 brezak * information he gleaned from Steve Haehnichen <steve (at) vigra.com>'s
39 1.1 brezak * SBlast driver for 386BSD and DOS driver code from Daniel Sachs
40 1.1 brezak * <sachs (at) meibm15.cen.uiuc.edu>.
41 1.1 brezak */
42 1.1 brezak
43 1.1 brezak #include <sys/param.h>
44 1.1 brezak #include <sys/systm.h>
45 1.1 brezak #include <sys/errno.h>
46 1.1 brezak #include <sys/ioctl.h>
47 1.1 brezak #include <sys/syslog.h>
48 1.1 brezak #include <sys/device.h>
49 1.1 brezak #include <sys/proc.h>
50 1.1 brezak #include <sys/buf.h>
51 1.1 brezak #include <vm/vm.h>
52 1.1 brezak
53 1.1 brezak #include <machine/cpu.h>
54 1.26 mycroft #include <machine/intr.h>
55 1.1 brezak #include <machine/pio.h>
56 1.1 brezak
57 1.1 brezak #include <sys/audioio.h>
58 1.1 brezak #include <dev/audio_if.h>
59 1.1 brezak
60 1.6 cgd #include <dev/isa/isavar.h>
61 1.6 cgd #include <dev/isa/isadmavar.h>
62 1.7 cgd #include <i386/isa/icu.h> /* XXX BROKEN; WHY? */
63 1.1 brezak
64 1.7 cgd #include <dev/isa/sbreg.h>
65 1.7 cgd #include <dev/isa/sbdspvar.h>
66 1.1 brezak
67 1.12 brezak #ifdef AUDIO_DEBUG
68 1.1 brezak extern void Dprintf __P((const char *, ...));
69 1.12 brezak #define DPRINTF(x) if (sbdspdebug) Dprintf x
70 1.1 brezak int sbdspdebug = 0;
71 1.1 brezak #else
72 1.1 brezak #define DPRINTF(x)
73 1.1 brezak #endif
74 1.1 brezak
75 1.1 brezak #ifndef SBDSP_NPOLL
76 1.1 brezak #define SBDSP_NPOLL 3000
77 1.1 brezak #endif
78 1.1 brezak
79 1.1 brezak struct {
80 1.1 brezak int wdsp;
81 1.1 brezak int rdsp;
82 1.1 brezak int wmidi;
83 1.1 brezak } sberr;
84 1.1 brezak
85 1.24 jtk int sbdsp_srtotc __P((struct sbdsp_softc *sc, int sr, int isdac,
86 1.24 jtk int *tcp, int *modep));
87 1.24 jtk u_int sbdsp_jazz16_probe __P((struct sbdsp_softc *));
88 1.24 jtk
89 1.16 mycroft /*
90 1.16 mycroft * Time constant routines follow. See SBK, section 12.
91 1.16 mycroft * Although they don't come out and say it (in the docs),
92 1.16 mycroft * the card clearly uses a 1MHz countdown timer, as the
93 1.16 mycroft * low-speed formula (p. 12-4) is:
94 1.16 mycroft * tc = 256 - 10^6 / sr
95 1.16 mycroft * In high-speed mode, the constant is the upper byte of a 16-bit counter,
96 1.16 mycroft * and a 256MHz clock is used:
97 1.16 mycroft * tc = 65536 - 256 * 10^ 6 / sr
98 1.16 mycroft * Since we can only use the upper byte of the HS TC, the two formulae
99 1.16 mycroft * are equivalent. (Why didn't they say so?) E.g.,
100 1.16 mycroft * (65536 - 256 * 10 ^ 6 / x) >> 8 = 256 - 10^6 / x
101 1.16 mycroft *
102 1.16 mycroft * The crossover point (from low- to high-speed modes) is different
103 1.16 mycroft * for the SBPRO and SB20. The table on p. 12-5 gives the following data:
104 1.16 mycroft *
105 1.16 mycroft * SBPRO SB20
106 1.16 mycroft * ----- --------
107 1.16 mycroft * input ls min 4 KHz 4 KHz
108 1.16 mycroft * input ls max 23 KHz 13 KHz
109 1.16 mycroft * input hs max 44.1 KHz 15 KHz
110 1.16 mycroft * output ls min 4 KHz 4 KHz
111 1.16 mycroft * output ls max 23 KHz 23 KHz
112 1.16 mycroft * output hs max 44.1 KHz 44.1 KHz
113 1.16 mycroft */
114 1.16 mycroft #define SB_LS_MIN 0x06 /* 4000 Hz */
115 1.16 mycroft #define SB_8K 0x83 /* 8000 Hz */
116 1.16 mycroft #define SBPRO_ADC_LS_MAX 0xd4 /* 22727 Hz */
117 1.16 mycroft #define SBPRO_ADC_HS_MAX 0xea /* 45454 Hz */
118 1.16 mycroft #define SBCLA_ADC_LS_MAX 0xb3 /* 12987 Hz */
119 1.16 mycroft #define SBCLA_ADC_HS_MAX 0xbd /* 14925 Hz */
120 1.16 mycroft #define SB_DAC_LS_MAX 0xd4 /* 22727 Hz */
121 1.16 mycroft #define SB_DAC_HS_MAX 0xea /* 45454 Hz */
122 1.16 mycroft
123 1.31 christos int sbdsp16_wait __P((struct sbdsp_softc *));
124 1.25 christos void sbdsp_to __P((void *));
125 1.25 christos void sbdsp_pause __P((struct sbdsp_softc *));
126 1.25 christos int sbdsp_setrate __P((struct sbdsp_softc *, int, int, int *));
127 1.25 christos int sbdsp_tctosr __P((struct sbdsp_softc *, int));
128 1.25 christos int sbdsp_set_timeconst __P((struct sbdsp_softc *, int));
129 1.25 christos
130 1.25 christos #ifdef AUDIO_DEBUG
131 1.25 christos void sb_printsc __P((struct sbdsp_softc *));
132 1.25 christos #endif
133 1.25 christos
134 1.12 brezak #ifdef AUDIO_DEBUG
135 1.1 brezak void
136 1.25 christos sb_printsc(sc)
137 1.25 christos struct sbdsp_softc *sc;
138 1.1 brezak {
139 1.1 brezak int i;
140 1.1 brezak
141 1.28 christos printf("open %d dmachan %d iobase %x\n",
142 1.16 mycroft sc->sc_open, sc->sc_drq, sc->sc_iobase);
143 1.28 christos printf("irate %d itc %d imode %d orate %d otc %d omode %d encoding %x\n",
144 1.23 mycroft sc->sc_irate, sc->sc_itc, sc->sc_imode,
145 1.23 mycroft sc->sc_orate, sc->sc_otc, sc->sc_omode, sc->encoding);
146 1.29 jtk printf("outport %d inport %d spkron %d nintr %lu\n",
147 1.16 mycroft sc->out_port, sc->in_port, sc->spkr_state, sc->sc_interrupts);
148 1.29 jtk printf("precision %d channels %d intr %p arg %p\n",
149 1.23 mycroft sc->sc_precision, sc->sc_channels, sc->sc_intr, sc->sc_arg);
150 1.28 christos printf("gain: ");
151 1.1 brezak for (i = 0; i < SB_NDEVS; i++)
152 1.28 christos printf("%d ", sc->gain[i]);
153 1.28 christos printf("\n");
154 1.1 brezak }
155 1.1 brezak #endif
156 1.1 brezak
157 1.1 brezak /*
158 1.1 brezak * Probe / attach routines.
159 1.1 brezak */
160 1.1 brezak
161 1.1 brezak /*
162 1.1 brezak * Probe for the soundblaster hardware.
163 1.1 brezak */
164 1.1 brezak int
165 1.1 brezak sbdsp_probe(sc)
166 1.1 brezak struct sbdsp_softc *sc;
167 1.1 brezak {
168 1.1 brezak
169 1.1 brezak if (sbdsp_reset(sc) < 0) {
170 1.1 brezak DPRINTF(("sbdsp: couldn't reset card\n"));
171 1.1 brezak return 0;
172 1.1 brezak }
173 1.24 jtk /* if flags set, go and probe the jazz16 stuff */
174 1.24 jtk if (sc->sc_dev.dv_cfdata->cf_flags != 0)
175 1.24 jtk sc->sc_model = sbdsp_jazz16_probe(sc);
176 1.24 jtk else
177 1.24 jtk sc->sc_model = sbversion(sc);
178 1.1 brezak
179 1.1 brezak return 1;
180 1.1 brezak }
181 1.1 brezak
182 1.1 brezak /*
183 1.24 jtk * Try add-on stuff for Jazz16.
184 1.24 jtk */
185 1.24 jtk u_int
186 1.24 jtk sbdsp_jazz16_probe(sc)
187 1.24 jtk struct sbdsp_softc *sc;
188 1.24 jtk {
189 1.24 jtk static u_char jazz16_irq_conf[16] = {
190 1.24 jtk -1, -1, 0x02, 0x03,
191 1.24 jtk -1, 0x01, -1, 0x04,
192 1.24 jtk -1, 0x02, 0x05, -1,
193 1.24 jtk -1, -1, -1, 0x06};
194 1.24 jtk static u_char jazz16_drq_conf[8] = {
195 1.24 jtk -1, 0x01, -1, 0x02,
196 1.24 jtk -1, 0x03, -1, 0x04};
197 1.24 jtk
198 1.24 jtk u_int rval = sbversion(sc);
199 1.31 christos bus_space_tag_t iot = sc->sc_iot;
200 1.31 christos bus_space_handle_t ioh;
201 1.31 christos
202 1.31 christos if (bus_space_map(iot, JAZZ16_CONFIG_PORT, 1, 0, &ioh))
203 1.31 christos return rval;
204 1.24 jtk
205 1.24 jtk if (jazz16_drq_conf[sc->sc_drq] == (u_char)-1 ||
206 1.24 jtk jazz16_irq_conf[sc->sc_irq] == (u_char)-1)
207 1.31 christos goto done; /* give up, we can't do it. */
208 1.31 christos
209 1.31 christos bus_space_write_1(iot, ioh, 0, JAZZ16_WAKEUP);
210 1.24 jtk delay(10000); /* delay 10 ms */
211 1.31 christos bus_space_write_1(iot, ioh, 0, JAZZ16_SETBASE);
212 1.31 christos bus_space_write_1(iot, ioh, 0, sc->sc_iobase & 0x70);
213 1.24 jtk
214 1.24 jtk if (sbdsp_reset(sc) < 0)
215 1.31 christos goto done; /* XXX? what else could we do? */
216 1.24 jtk
217 1.31 christos if (sbdsp_wdsp(sc, JAZZ16_READ_VER))
218 1.31 christos goto done;
219 1.31 christos
220 1.31 christos if (sbdsp_rdsp(sc) != JAZZ16_VER_JAZZ)
221 1.31 christos goto done;
222 1.24 jtk
223 1.31 christos if (sbdsp_wdsp(sc, JAZZ16_SET_DMAINTR) ||
224 1.24 jtk /* set both 8 & 16-bit drq to same channel, it works fine. */
225 1.31 christos sbdsp_wdsp(sc, (jazz16_drq_conf[sc->sc_drq] << 4) |
226 1.31 christos jazz16_drq_conf[sc->sc_drq]) ||
227 1.31 christos sbdsp_wdsp(sc, jazz16_irq_conf[sc->sc_irq]))
228 1.24 jtk DPRINTF(("sbdsp: can't write jazz16 probe stuff"));
229 1.31 christos else
230 1.31 christos rval |= MODEL_JAZZ16;
231 1.31 christos
232 1.31 christos done:
233 1.31 christos bus_space_unmap(iot, ioh, 1);
234 1.32 christos return rval;
235 1.24 jtk }
236 1.24 jtk
237 1.24 jtk /*
238 1.1 brezak * Attach hardware to driver, attach hardware driver to audio
239 1.1 brezak * pseudo-device driver .
240 1.1 brezak */
241 1.1 brezak void
242 1.1 brezak sbdsp_attach(sc)
243 1.1 brezak struct sbdsp_softc *sc;
244 1.1 brezak {
245 1.1 brezak
246 1.1 brezak /* Set defaults */
247 1.23 mycroft if (ISSB16CLASS(sc))
248 1.23 mycroft sc->sc_irate = sc->sc_orate = 8000;
249 1.23 mycroft else if (ISSBPROCLASS(sc))
250 1.23 mycroft sc->sc_itc = sc->sc_otc = SB_8K;
251 1.1 brezak else
252 1.23 mycroft sc->sc_itc = sc->sc_otc = SB_8K;
253 1.23 mycroft sc->sc_precision = 8;
254 1.23 mycroft sc->sc_channels = 1;
255 1.23 mycroft sc->encoding = AUDIO_ENCODING_ULAW;
256 1.1 brezak
257 1.5 mycroft (void) sbdsp_set_in_port(sc, SB_MIC_PORT);
258 1.5 mycroft (void) sbdsp_set_out_port(sc, SB_SPEAKER);
259 1.1 brezak
260 1.1 brezak if (ISSBPROCLASS(sc)) {
261 1.1 brezak int i;
262 1.1 brezak
263 1.1 brezak /* set mixer to default levels, by sending a mixer
264 1.1 brezak reset command. */
265 1.1 brezak sbdsp_mix_write(sc, SBP_MIX_RESET, SBP_MIX_RESET);
266 1.1 brezak /* then some adjustments :) */
267 1.1 brezak sbdsp_mix_write(sc, SBP_CD_VOL,
268 1.1 brezak sbdsp_stereo_vol(SBP_MAXVOL, SBP_MAXVOL));
269 1.1 brezak sbdsp_mix_write(sc, SBP_DAC_VOL,
270 1.1 brezak sbdsp_stereo_vol(SBP_MAXVOL, SBP_MAXVOL));
271 1.1 brezak sbdsp_mix_write(sc, SBP_MASTER_VOL,
272 1.17 jtk sbdsp_stereo_vol(SBP_MAXVOL/2, SBP_MAXVOL/2));
273 1.1 brezak sbdsp_mix_write(sc, SBP_LINE_VOL,
274 1.1 brezak sbdsp_stereo_vol(SBP_MAXVOL, SBP_MAXVOL));
275 1.1 brezak for (i = 0; i < SB_NDEVS; i++)
276 1.16 mycroft sc->gain[i] = sbdsp_stereo_vol(SBP_MAXVOL, SBP_MAXVOL);
277 1.17 jtk sc->in_filter = 0; /* no filters turned on, please */
278 1.1 brezak }
279 1.16 mycroft
280 1.28 christos printf(": dsp v%d.%02d%s\n",
281 1.24 jtk SBVER_MAJOR(sc->sc_model), SBVER_MINOR(sc->sc_model),
282 1.24 jtk ISJAZZ16(sc) ? ": <Jazz16>" : "");
283 1.23 mycroft
284 1.23 mycroft #ifdef notyet
285 1.23 mycroft sbdsp_mix_write(sc, SBP_SET_IRQ, 0x04);
286 1.23 mycroft sbdsp_mix_write(sc, SBP_SET_DRQ, 0x22);
287 1.23 mycroft
288 1.28 christos printf("sbdsp_attach: irq=%02x, drq=%02x\n",
289 1.23 mycroft sbdsp_mix_read(sc, SBP_SET_IRQ),
290 1.23 mycroft sbdsp_mix_read(sc, SBP_SET_DRQ));
291 1.23 mycroft #else
292 1.23 mycroft if (ISSB16CLASS(sc))
293 1.23 mycroft sc->sc_model = 0x0300;
294 1.23 mycroft #endif
295 1.1 brezak }
296 1.1 brezak
297 1.1 brezak /*
298 1.1 brezak * Various routines to interface to higher level audio driver
299 1.1 brezak */
300 1.1 brezak
301 1.1 brezak void
302 1.1 brezak sbdsp_mix_write(sc, mixerport, val)
303 1.1 brezak struct sbdsp_softc *sc;
304 1.1 brezak int mixerport;
305 1.1 brezak int val;
306 1.1 brezak {
307 1.31 christos bus_space_tag_t iot = sc->sc_iot;
308 1.31 christos bus_space_handle_t ioh = sc->sc_ioh;
309 1.31 christos
310 1.31 christos bus_space_write_1(iot, ioh, SBP_MIXER_ADDR, mixerport);
311 1.1 brezak delay(10);
312 1.31 christos bus_space_write_1(iot, ioh, SBP_MIXER_DATA, val);
313 1.1 brezak delay(30);
314 1.1 brezak }
315 1.1 brezak
316 1.1 brezak int
317 1.1 brezak sbdsp_mix_read(sc, mixerport)
318 1.1 brezak struct sbdsp_softc *sc;
319 1.1 brezak int mixerport;
320 1.1 brezak {
321 1.31 christos bus_space_tag_t iot = sc->sc_iot;
322 1.31 christos bus_space_handle_t ioh = sc->sc_ioh;
323 1.31 christos
324 1.31 christos bus_space_write_1(iot, ioh, SBP_MIXER_ADDR, mixerport);
325 1.1 brezak delay(10);
326 1.31 christos return bus_space_read_1(iot, ioh, SBP_MIXER_DATA);
327 1.1 brezak }
328 1.1 brezak
329 1.1 brezak int
330 1.1 brezak sbdsp_set_in_sr(addr, sr)
331 1.5 mycroft void *addr;
332 1.1 brezak u_long sr;
333 1.1 brezak {
334 1.5 mycroft register struct sbdsp_softc *sc = addr;
335 1.1 brezak
336 1.23 mycroft if (ISSB16CLASS(sc))
337 1.23 mycroft return (sbdsp_setrate(sc, sr, SB_INPUT_RATE, &sc->sc_irate));
338 1.23 mycroft else
339 1.23 mycroft return (sbdsp_srtotc(sc, sr, SB_INPUT_RATE, &sc->sc_itc, &sc->sc_imode));
340 1.1 brezak }
341 1.1 brezak
342 1.1 brezak u_long
343 1.1 brezak sbdsp_get_in_sr(addr)
344 1.5 mycroft void *addr;
345 1.1 brezak {
346 1.5 mycroft register struct sbdsp_softc *sc = addr;
347 1.1 brezak
348 1.23 mycroft if (ISSB16CLASS(sc))
349 1.23 mycroft return (sc->sc_irate);
350 1.23 mycroft else
351 1.23 mycroft return (sbdsp_tctosr(sc, sc->sc_itc));
352 1.1 brezak }
353 1.1 brezak
354 1.1 brezak int
355 1.1 brezak sbdsp_set_out_sr(addr, sr)
356 1.5 mycroft void *addr;
357 1.1 brezak u_long sr;
358 1.1 brezak {
359 1.5 mycroft register struct sbdsp_softc *sc = addr;
360 1.1 brezak
361 1.23 mycroft if (ISSB16CLASS(sc))
362 1.23 mycroft return (sbdsp_setrate(sc, sr, SB_OUTPUT_RATE, &sc->sc_orate));
363 1.23 mycroft else
364 1.23 mycroft return (sbdsp_srtotc(sc, sr, SB_OUTPUT_RATE, &sc->sc_otc, &sc->sc_omode));
365 1.1 brezak }
366 1.1 brezak
367 1.1 brezak u_long
368 1.1 brezak sbdsp_get_out_sr(addr)
369 1.5 mycroft void *addr;
370 1.1 brezak {
371 1.5 mycroft register struct sbdsp_softc *sc = addr;
372 1.1 brezak
373 1.23 mycroft if (ISSB16CLASS(sc))
374 1.23 mycroft return (sc->sc_orate);
375 1.23 mycroft else
376 1.23 mycroft return (sbdsp_tctosr(sc, sc->sc_otc));
377 1.1 brezak }
378 1.1 brezak
379 1.1 brezak int
380 1.1 brezak sbdsp_query_encoding(addr, fp)
381 1.16 mycroft void *addr;
382 1.16 mycroft struct audio_encoding *fp;
383 1.1 brezak {
384 1.16 mycroft switch (fp->index) {
385 1.16 mycroft case 0:
386 1.16 mycroft strcpy(fp->name, AudioEmulaw);
387 1.16 mycroft fp->format_id = AUDIO_ENCODING_ULAW;
388 1.16 mycroft break;
389 1.16 mycroft case 1:
390 1.16 mycroft strcpy(fp->name, AudioEpcm16);
391 1.16 mycroft fp->format_id = AUDIO_ENCODING_PCM16;
392 1.16 mycroft break;
393 1.16 mycroft default:
394 1.16 mycroft return (EINVAL);
395 1.16 mycroft }
396 1.16 mycroft return (0);
397 1.1 brezak }
398 1.1 brezak
399 1.1 brezak int
400 1.23 mycroft sbdsp_set_encoding(addr, encoding)
401 1.5 mycroft void *addr;
402 1.23 mycroft u_int encoding;
403 1.1 brezak {
404 1.5 mycroft register struct sbdsp_softc *sc = addr;
405 1.1 brezak
406 1.23 mycroft switch (encoding) {
407 1.1 brezak case AUDIO_ENCODING_ULAW:
408 1.1 brezak sc->encoding = AUDIO_ENCODING_ULAW;
409 1.1 brezak break;
410 1.1 brezak case AUDIO_ENCODING_LINEAR:
411 1.1 brezak sc->encoding = AUDIO_ENCODING_LINEAR;
412 1.1 brezak break;
413 1.1 brezak default:
414 1.1 brezak return (EINVAL);
415 1.1 brezak }
416 1.23 mycroft
417 1.1 brezak return (0);
418 1.1 brezak }
419 1.1 brezak
420 1.1 brezak int
421 1.1 brezak sbdsp_get_encoding(addr)
422 1.5 mycroft void *addr;
423 1.1 brezak {
424 1.5 mycroft register struct sbdsp_softc *sc = addr;
425 1.1 brezak
426 1.16 mycroft return (sc->encoding);
427 1.1 brezak }
428 1.1 brezak
429 1.1 brezak int
430 1.23 mycroft sbdsp_set_precision(addr, precision)
431 1.5 mycroft void *addr;
432 1.23 mycroft u_int precision;
433 1.1 brezak {
434 1.23 mycroft register struct sbdsp_softc *sc = addr;
435 1.23 mycroft
436 1.24 jtk if (ISSB16CLASS(sc) || ISJAZZ16(sc)) {
437 1.23 mycroft if (precision != 16 && precision != 8)
438 1.23 mycroft return (EINVAL);
439 1.23 mycroft sc->sc_precision = precision;
440 1.23 mycroft } else {
441 1.23 mycroft if (precision != 8)
442 1.23 mycroft return (EINVAL);
443 1.23 mycroft sc->sc_precision = precision;
444 1.23 mycroft }
445 1.1 brezak
446 1.16 mycroft return (0);
447 1.1 brezak }
448 1.1 brezak
449 1.1 brezak int
450 1.1 brezak sbdsp_get_precision(addr)
451 1.5 mycroft void *addr;
452 1.1 brezak {
453 1.23 mycroft register struct sbdsp_softc *sc = addr;
454 1.23 mycroft
455 1.23 mycroft return (sc->sc_precision);
456 1.1 brezak }
457 1.1 brezak
458 1.1 brezak int
459 1.23 mycroft sbdsp_set_channels(addr, channels)
460 1.5 mycroft void *addr;
461 1.23 mycroft int channels;
462 1.1 brezak {
463 1.5 mycroft register struct sbdsp_softc *sc = addr;
464 1.1 brezak
465 1.1 brezak if (ISSBPROCLASS(sc)) {
466 1.23 mycroft if (channels != 1 && channels != 2)
467 1.16 mycroft return (EINVAL);
468 1.23 mycroft sc->sc_channels = channels;
469 1.23 mycroft sc->sc_dmadir = SB_DMA_NONE;
470 1.23 mycroft /*
471 1.23 mycroft * XXXX
472 1.23 mycroft * With 2 channels, SBPro can't do more than 22kHz.
473 1.23 mycroft * No framework to check this.
474 1.23 mycroft */
475 1.16 mycroft } else {
476 1.23 mycroft if (channels != 1)
477 1.16 mycroft return (EINVAL);
478 1.23 mycroft sc->sc_channels = channels;
479 1.1 brezak }
480 1.1 brezak
481 1.16 mycroft return (0);
482 1.1 brezak }
483 1.1 brezak
484 1.1 brezak int
485 1.1 brezak sbdsp_get_channels(addr)
486 1.5 mycroft void *addr;
487 1.1 brezak {
488 1.5 mycroft register struct sbdsp_softc *sc = addr;
489 1.1 brezak
490 1.23 mycroft return (sc->sc_channels);
491 1.1 brezak }
492 1.1 brezak
493 1.1 brezak int
494 1.17 jtk sbdsp_set_ifilter(addr, which)
495 1.17 jtk void *addr;
496 1.17 jtk int which;
497 1.17 jtk {
498 1.17 jtk register struct sbdsp_softc *sc = addr;
499 1.25 christos int mixval;
500 1.17 jtk
501 1.17 jtk if (ISSBPROCLASS(sc)) {
502 1.17 jtk mixval = sbdsp_mix_read(sc, SBP_INFILTER) & ~SBP_IFILTER_MASK;
503 1.17 jtk switch (which) {
504 1.17 jtk case 0:
505 1.18 mycroft mixval |= SBP_FILTER_OFF;
506 1.18 mycroft break;
507 1.17 jtk case SBP_TREBLE_EQ:
508 1.18 mycroft mixval |= SBP_FILTER_ON | SBP_IFILTER_HIGH;
509 1.18 mycroft break;
510 1.17 jtk case SBP_BASS_EQ:
511 1.18 mycroft mixval |= SBP_FILTER_ON | SBP_IFILTER_LOW;
512 1.18 mycroft break;
513 1.18 mycroft default:
514 1.18 mycroft return (EINVAL);
515 1.17 jtk }
516 1.17 jtk sc->in_filter = mixval & SBP_IFILTER_MASK;
517 1.17 jtk sbdsp_mix_write(sc, SBP_INFILTER, mixval);
518 1.18 mycroft return (0);
519 1.18 mycroft } else
520 1.18 mycroft return (EINVAL);
521 1.17 jtk }
522 1.17 jtk
523 1.17 jtk int
524 1.17 jtk sbdsp_get_ifilter(addr)
525 1.17 jtk void *addr;
526 1.17 jtk {
527 1.17 jtk register struct sbdsp_softc *sc = addr;
528 1.17 jtk
529 1.17 jtk if (ISSBPROCLASS(sc)) {
530 1.18 mycroft sc->in_filter =
531 1.18 mycroft sbdsp_mix_read(sc, SBP_INFILTER) & SBP_IFILTER_MASK;
532 1.18 mycroft switch (sc->in_filter) {
533 1.18 mycroft case SBP_FILTER_ON|SBP_IFILTER_HIGH:
534 1.18 mycroft return (SBP_TREBLE_EQ);
535 1.18 mycroft case SBP_FILTER_ON|SBP_IFILTER_LOW:
536 1.18 mycroft return (SBP_BASS_EQ);
537 1.18 mycroft case SBP_FILTER_OFF:
538 1.18 mycroft default:
539 1.18 mycroft return (0);
540 1.18 mycroft }
541 1.17 jtk } else
542 1.18 mycroft return (0);
543 1.17 jtk }
544 1.17 jtk
545 1.17 jtk int
546 1.1 brezak sbdsp_set_out_port(addr, port)
547 1.5 mycroft void *addr;
548 1.1 brezak int port;
549 1.1 brezak {
550 1.5 mycroft register struct sbdsp_softc *sc = addr;
551 1.1 brezak
552 1.1 brezak sc->out_port = port; /* Just record it */
553 1.1 brezak
554 1.16 mycroft return (0);
555 1.1 brezak }
556 1.1 brezak
557 1.1 brezak int
558 1.1 brezak sbdsp_get_out_port(addr)
559 1.5 mycroft void *addr;
560 1.1 brezak {
561 1.5 mycroft register struct sbdsp_softc *sc = addr;
562 1.1 brezak
563 1.16 mycroft return (sc->out_port);
564 1.1 brezak }
565 1.1 brezak
566 1.1 brezak
567 1.1 brezak int
568 1.1 brezak sbdsp_set_in_port(addr, port)
569 1.5 mycroft void *addr;
570 1.1 brezak int port;
571 1.1 brezak {
572 1.5 mycroft register struct sbdsp_softc *sc = addr;
573 1.1 brezak int mixport, sbport;
574 1.1 brezak
575 1.1 brezak if (ISSBPROCLASS(sc)) {
576 1.16 mycroft switch (port) {
577 1.16 mycroft case SB_MIC_PORT:
578 1.16 mycroft sbport = SBP_FROM_MIC;
579 1.16 mycroft mixport = SBP_MIC_VOL;
580 1.16 mycroft break;
581 1.16 mycroft case SB_LINE_IN_PORT:
582 1.16 mycroft sbport = SBP_FROM_LINE;
583 1.16 mycroft mixport = SBP_LINE_VOL;
584 1.16 mycroft break;
585 1.16 mycroft case SB_CD_PORT:
586 1.16 mycroft sbport = SBP_FROM_CD;
587 1.16 mycroft mixport = SBP_CD_VOL;
588 1.16 mycroft break;
589 1.16 mycroft case SB_DAC_PORT:
590 1.16 mycroft case SB_FM_PORT:
591 1.16 mycroft default:
592 1.16 mycroft return (EINVAL);
593 1.16 mycroft }
594 1.16 mycroft } else {
595 1.16 mycroft switch (port) {
596 1.16 mycroft case SB_MIC_PORT:
597 1.16 mycroft sbport = SBP_FROM_MIC;
598 1.16 mycroft mixport = SBP_MIC_VOL;
599 1.16 mycroft break;
600 1.16 mycroft default:
601 1.16 mycroft return (EINVAL);
602 1.16 mycroft }
603 1.1 brezak }
604 1.1 brezak
605 1.1 brezak sc->in_port = port; /* Just record it */
606 1.1 brezak
607 1.1 brezak if (ISSBPROCLASS(sc)) {
608 1.1 brezak /* record from that port */
609 1.1 brezak sbdsp_mix_write(sc, SBP_RECORD_SOURCE,
610 1.18 mycroft SBP_RECORD_FROM(sbport, SBP_FILTER_OFF, SBP_IFILTER_HIGH));
611 1.1 brezak /* fetch gain from that port */
612 1.1 brezak sc->gain[port] = sbdsp_mix_read(sc, mixport);
613 1.1 brezak }
614 1.1 brezak
615 1.16 mycroft return (0);
616 1.1 brezak }
617 1.1 brezak
618 1.1 brezak int
619 1.1 brezak sbdsp_get_in_port(addr)
620 1.5 mycroft void *addr;
621 1.1 brezak {
622 1.5 mycroft register struct sbdsp_softc *sc = addr;
623 1.1 brezak
624 1.16 mycroft return (sc->in_port);
625 1.1 brezak }
626 1.1 brezak
627 1.1 brezak
628 1.1 brezak int
629 1.1 brezak sbdsp_speaker_ctl(addr, newstate)
630 1.5 mycroft void *addr;
631 1.1 brezak int newstate;
632 1.1 brezak {
633 1.5 mycroft register struct sbdsp_softc *sc = addr;
634 1.1 brezak
635 1.1 brezak if ((newstate == SPKR_ON) &&
636 1.1 brezak (sc->spkr_state == SPKR_OFF)) {
637 1.1 brezak sbdsp_spkron(sc);
638 1.1 brezak sc->spkr_state = SPKR_ON;
639 1.1 brezak }
640 1.1 brezak if ((newstate == SPKR_OFF) &&
641 1.1 brezak (sc->spkr_state == SPKR_ON)) {
642 1.1 brezak sbdsp_spkroff(sc);
643 1.1 brezak sc->spkr_state = SPKR_OFF;
644 1.1 brezak }
645 1.1 brezak return(0);
646 1.1 brezak }
647 1.1 brezak
648 1.1 brezak int
649 1.1 brezak sbdsp_round_blocksize(addr, blk)
650 1.5 mycroft void *addr;
651 1.1 brezak int blk;
652 1.1 brezak {
653 1.5 mycroft register struct sbdsp_softc *sc = addr;
654 1.1 brezak
655 1.15 mycroft sc->sc_last_hs_size = 0;
656 1.1 brezak
657 1.1 brezak /* Higher speeds need bigger blocks to avoid popping and silence gaps. */
658 1.23 mycroft if (blk < NBPG/4 || blk > NBPG/2) {
659 1.23 mycroft if (ISSB16CLASS(sc)) {
660 1.23 mycroft if (sc->sc_orate > 8000 || sc->sc_irate > 8000)
661 1.23 mycroft blk = NBPG/2;
662 1.23 mycroft } else {
663 1.23 mycroft if (sc->sc_otc > SB_8K || sc->sc_itc < SB_8K)
664 1.23 mycroft blk = NBPG/2;
665 1.23 mycroft }
666 1.23 mycroft }
667 1.1 brezak /* don't try to DMA too much at once, though. */
668 1.16 mycroft if (blk > NBPG)
669 1.16 mycroft blk = NBPG;
670 1.23 mycroft if (sc->sc_channels == 2)
671 1.1 brezak return (blk & ~1); /* must be even to preserve stereo separation */
672 1.1 brezak else
673 1.16 mycroft return (blk); /* Anything goes :-) */
674 1.1 brezak }
675 1.1 brezak
676 1.1 brezak int
677 1.1 brezak sbdsp_commit_settings(addr)
678 1.5 mycroft void *addr;
679 1.1 brezak {
680 1.16 mycroft register struct sbdsp_softc *sc = addr;
681 1.16 mycroft
682 1.1 brezak /* due to potentially unfortunate ordering in the above layers,
683 1.1 brezak re-do a few sets which may be important--input gains
684 1.1 brezak (adjust the proper channels), number of input channels (hit the
685 1.1 brezak record rate and set mode) */
686 1.1 brezak
687 1.24 jtk if (ISSBPRO(sc)) {
688 1.24 jtk /*
689 1.24 jtk * With 2 channels, SBPro can't do more than 22kHz.
690 1.24 jtk * Whack the rates down to speed if necessary.
691 1.24 jtk * Reset the time constant anyway
692 1.24 jtk * because it may have been adjusted with a different number
693 1.24 jtk * of channels, which means it might have computed the wrong
694 1.24 jtk * mode (low/high speed).
695 1.24 jtk */
696 1.24 jtk if (sc->sc_channels == 2 &&
697 1.24 jtk sbdsp_tctosr(sc, sc->sc_itc) > 22727) {
698 1.24 jtk sbdsp_srtotc(sc, 22727, SB_INPUT_RATE,
699 1.24 jtk &sc->sc_itc, &sc->sc_imode);
700 1.24 jtk } else
701 1.24 jtk sbdsp_srtotc(sc, sbdsp_tctosr(sc, sc->sc_itc),
702 1.24 jtk SB_INPUT_RATE, &sc->sc_itc,
703 1.24 jtk &sc->sc_imode);
704 1.24 jtk
705 1.24 jtk if (sc->sc_channels == 2 &&
706 1.24 jtk sbdsp_tctosr(sc, sc->sc_otc) > 22727) {
707 1.24 jtk sbdsp_srtotc(sc, 22727, SB_OUTPUT_RATE,
708 1.24 jtk &sc->sc_otc, &sc->sc_omode);
709 1.24 jtk } else
710 1.24 jtk sbdsp_srtotc(sc, sbdsp_tctosr(sc, sc->sc_otc),
711 1.24 jtk SB_OUTPUT_RATE, &sc->sc_otc,
712 1.24 jtk &sc->sc_omode);
713 1.24 jtk }
714 1.24 jtk if (ISSB16CLASS(sc) || ISJAZZ16(sc)) {
715 1.24 jtk if (sc->encoding == AUDIO_ENCODING_ULAW &&
716 1.24 jtk sc->sc_precision == 16) {
717 1.24 jtk sc->sc_precision = 8;
718 1.24 jtk return EINVAL; /* XXX what should we really do? */
719 1.24 jtk }
720 1.24 jtk }
721 1.16 mycroft /*
722 1.16 mycroft * XXX
723 1.16 mycroft * Should wait for chip to be idle.
724 1.16 mycroft */
725 1.16 mycroft sc->sc_dmadir = SB_DMA_NONE;
726 1.3 brezak
727 1.15 mycroft return 0;
728 1.1 brezak }
729 1.1 brezak
730 1.1 brezak
731 1.1 brezak int
732 1.1 brezak sbdsp_open(sc, dev, flags)
733 1.1 brezak register struct sbdsp_softc *sc;
734 1.1 brezak dev_t dev;
735 1.1 brezak int flags;
736 1.1 brezak {
737 1.1 brezak DPRINTF(("sbdsp_open: sc=0x%x\n", sc));
738 1.1 brezak
739 1.1 brezak if (sc->sc_open != 0 || sbdsp_reset(sc) != 0)
740 1.1 brezak return ENXIO;
741 1.1 brezak
742 1.1 brezak sc->sc_open = 1;
743 1.1 brezak sc->sc_mintr = 0;
744 1.1 brezak if (ISSBPROCLASS(sc) &&
745 1.31 christos sbdsp_wdsp(sc, SB_DSP_RECORD_MONO) < 0) {
746 1.1 brezak DPRINTF(("sbdsp_open: can't set mono mode\n"));
747 1.1 brezak /* we'll readjust when it's time for DMA. */
748 1.1 brezak }
749 1.1 brezak
750 1.1 brezak /*
751 1.1 brezak * Leave most things as they were; users must change things if
752 1.1 brezak * the previous process didn't leave it they way they wanted.
753 1.1 brezak * Looked at another way, it's easy to set up a configuration
754 1.1 brezak * in one program and leave it for another to inherit.
755 1.1 brezak */
756 1.1 brezak DPRINTF(("sbdsp_open: opened\n"));
757 1.1 brezak
758 1.1 brezak return 0;
759 1.1 brezak }
760 1.1 brezak
761 1.1 brezak void
762 1.1 brezak sbdsp_close(addr)
763 1.5 mycroft void *addr;
764 1.1 brezak {
765 1.5 mycroft struct sbdsp_softc *sc = addr;
766 1.1 brezak
767 1.1 brezak DPRINTF(("sbdsp_close: sc=0x%x\n", sc));
768 1.1 brezak
769 1.1 brezak sc->sc_open = 0;
770 1.1 brezak sbdsp_spkroff(sc);
771 1.1 brezak sc->spkr_state = SPKR_OFF;
772 1.1 brezak sc->sc_mintr = 0;
773 1.15 mycroft sbdsp_haltdma(sc);
774 1.1 brezak
775 1.1 brezak DPRINTF(("sbdsp_close: closed\n"));
776 1.1 brezak }
777 1.1 brezak
778 1.1 brezak /*
779 1.1 brezak * Lower-level routines
780 1.1 brezak */
781 1.1 brezak
782 1.1 brezak /*
783 1.1 brezak * Reset the card.
784 1.1 brezak * Return non-zero if the card isn't detected.
785 1.1 brezak */
786 1.1 brezak int
787 1.1 brezak sbdsp_reset(sc)
788 1.1 brezak register struct sbdsp_softc *sc;
789 1.1 brezak {
790 1.31 christos bus_space_tag_t iot = sc->sc_iot;
791 1.31 christos bus_space_handle_t ioh = sc->sc_ioh;
792 1.1 brezak
793 1.15 mycroft sc->sc_intr = 0;
794 1.16 mycroft if (sc->sc_dmadir != SB_DMA_NONE) {
795 1.15 mycroft isa_dmaabort(sc->sc_drq);
796 1.16 mycroft sc->sc_dmadir = SB_DMA_NONE;
797 1.15 mycroft }
798 1.15 mycroft sc->sc_last_hs_size = 0;
799 1.15 mycroft
800 1.1 brezak /*
801 1.1 brezak * See SBK, section 11.3.
802 1.1 brezak * We pulse a reset signal into the card.
803 1.1 brezak * Gee, what a brilliant hardware design.
804 1.1 brezak */
805 1.31 christos bus_space_write_1(iot, ioh, SBP_DSP_RESET, 1);
806 1.15 mycroft delay(10);
807 1.31 christos bus_space_write_1(iot, ioh, SBP_DSP_RESET, 0);
808 1.15 mycroft delay(30);
809 1.31 christos if (sbdsp_rdsp(sc) != SB_MAGIC)
810 1.1 brezak return -1;
811 1.15 mycroft
812 1.1 brezak return 0;
813 1.1 brezak }
814 1.1 brezak
815 1.23 mycroft int
816 1.31 christos sbdsp16_wait(sc)
817 1.31 christos struct sbdsp_softc *sc;
818 1.23 mycroft {
819 1.31 christos bus_space_tag_t iot = sc->sc_iot;
820 1.31 christos bus_space_handle_t ioh = sc->sc_ioh;
821 1.23 mycroft register int i;
822 1.23 mycroft
823 1.23 mycroft for (i = SBDSP_NPOLL; --i >= 0; ) {
824 1.23 mycroft register u_char x;
825 1.31 christos x = bus_space_read_1(iot, ioh, SBP_DSP_WSTAT);
826 1.23 mycroft delay(10);
827 1.23 mycroft if ((x & SB_DSP_BUSY) == 0)
828 1.23 mycroft continue;
829 1.23 mycroft return 0;
830 1.23 mycroft }
831 1.23 mycroft ++sberr.wdsp;
832 1.23 mycroft return -1;
833 1.23 mycroft }
834 1.23 mycroft
835 1.1 brezak /*
836 1.1 brezak * Write a byte to the dsp.
837 1.1 brezak * XXX We are at the mercy of the card as we use a
838 1.1 brezak * polling loop and wait until it can take the byte.
839 1.1 brezak */
840 1.1 brezak int
841 1.31 christos sbdsp_wdsp(sc, v)
842 1.31 christos struct sbdsp_softc *sc;
843 1.31 christos int v;
844 1.1 brezak {
845 1.31 christos bus_space_tag_t iot = sc->sc_iot;
846 1.31 christos bus_space_handle_t ioh = sc->sc_ioh;
847 1.1 brezak register int i;
848 1.1 brezak
849 1.1 brezak for (i = SBDSP_NPOLL; --i >= 0; ) {
850 1.15 mycroft register u_char x;
851 1.31 christos x = bus_space_read_1(iot, ioh, SBP_DSP_WSTAT);
852 1.15 mycroft delay(10);
853 1.15 mycroft if ((x & SB_DSP_BUSY) != 0)
854 1.15 mycroft continue;
855 1.31 christos bus_space_write_1(iot, ioh, SBP_DSP_WRITE, v);
856 1.15 mycroft delay(10);
857 1.1 brezak return 0;
858 1.1 brezak }
859 1.1 brezak ++sberr.wdsp;
860 1.1 brezak return -1;
861 1.1 brezak }
862 1.1 brezak
863 1.1 brezak /*
864 1.1 brezak * Read a byte from the DSP, using polling.
865 1.1 brezak */
866 1.1 brezak int
867 1.31 christos sbdsp_rdsp(sc)
868 1.31 christos struct sbdsp_softc *sc;
869 1.1 brezak {
870 1.31 christos bus_space_tag_t iot = sc->sc_iot;
871 1.31 christos bus_space_handle_t ioh = sc->sc_ioh;
872 1.1 brezak register int i;
873 1.1 brezak
874 1.1 brezak for (i = SBDSP_NPOLL; --i >= 0; ) {
875 1.15 mycroft register u_char x;
876 1.31 christos x = bus_space_read_1(iot, ioh, SBP_DSP_RSTAT);
877 1.15 mycroft delay(10);
878 1.15 mycroft if ((x & SB_DSP_READY) == 0)
879 1.1 brezak continue;
880 1.31 christos x = bus_space_read_1(iot, ioh, SBP_DSP_READ);
881 1.15 mycroft delay(10);
882 1.15 mycroft return x;
883 1.1 brezak }
884 1.1 brezak ++sberr.rdsp;
885 1.1 brezak return -1;
886 1.1 brezak }
887 1.1 brezak
888 1.1 brezak /*
889 1.1 brezak * Doing certain things (like toggling the speaker) make
890 1.1 brezak * the SB hardware go away for a while, so pause a little.
891 1.1 brezak */
892 1.1 brezak void
893 1.1 brezak sbdsp_to(arg)
894 1.1 brezak void *arg;
895 1.1 brezak {
896 1.1 brezak wakeup(arg);
897 1.1 brezak }
898 1.1 brezak
899 1.1 brezak void
900 1.1 brezak sbdsp_pause(sc)
901 1.1 brezak struct sbdsp_softc *sc;
902 1.1 brezak {
903 1.1 brezak extern int hz;
904 1.1 brezak
905 1.1 brezak timeout(sbdsp_to, sbdsp_to, hz/8);
906 1.5 mycroft (void)tsleep(sbdsp_to, PWAIT, "sbpause", 0);
907 1.1 brezak }
908 1.1 brezak
909 1.1 brezak /*
910 1.1 brezak * Turn on the speaker. The SBK documention says this operation
911 1.1 brezak * can take up to 1/10 of a second. Higher level layers should
912 1.1 brezak * probably let the task sleep for this amount of time after
913 1.1 brezak * calling here. Otherwise, things might not work (because
914 1.1 brezak * sbdsp_wdsp() and sbdsp_rdsp() will probably timeout.)
915 1.1 brezak *
916 1.1 brezak * These engineers had their heads up their ass when
917 1.1 brezak * they designed this card.
918 1.1 brezak */
919 1.1 brezak void
920 1.1 brezak sbdsp_spkron(sc)
921 1.1 brezak struct sbdsp_softc *sc;
922 1.1 brezak {
923 1.31 christos (void)sbdsp_wdsp(sc, SB_DSP_SPKR_ON);
924 1.1 brezak sbdsp_pause(sc);
925 1.1 brezak }
926 1.1 brezak
927 1.1 brezak /*
928 1.1 brezak * Turn off the speaker; see comment above.
929 1.1 brezak */
930 1.1 brezak void
931 1.1 brezak sbdsp_spkroff(sc)
932 1.1 brezak struct sbdsp_softc *sc;
933 1.1 brezak {
934 1.31 christos (void)sbdsp_wdsp(sc, SB_DSP_SPKR_OFF);
935 1.1 brezak sbdsp_pause(sc);
936 1.1 brezak }
937 1.1 brezak
938 1.1 brezak /*
939 1.1 brezak * Read the version number out of the card. Return major code
940 1.1 brezak * in high byte, and minor code in low byte.
941 1.1 brezak */
942 1.1 brezak short
943 1.1 brezak sbversion(sc)
944 1.1 brezak struct sbdsp_softc *sc;
945 1.1 brezak {
946 1.1 brezak short v;
947 1.1 brezak
948 1.31 christos if (sbdsp_wdsp(sc, SB_DSP_VERSION) < 0)
949 1.1 brezak return 0;
950 1.31 christos v = sbdsp_rdsp(sc) << 8;
951 1.31 christos v |= sbdsp_rdsp(sc);
952 1.1 brezak return ((v >= 0) ? v : 0);
953 1.1 brezak }
954 1.1 brezak
955 1.1 brezak /*
956 1.1 brezak * Halt a DMA in progress. A low-speed transfer can be
957 1.1 brezak * resumed with sbdsp_contdma().
958 1.1 brezak */
959 1.1 brezak int
960 1.1 brezak sbdsp_haltdma(addr)
961 1.5 mycroft void *addr;
962 1.1 brezak {
963 1.5 mycroft register struct sbdsp_softc *sc = addr;
964 1.1 brezak
965 1.1 brezak DPRINTF(("sbdsp_haltdma: sc=0x%x\n", sc));
966 1.1 brezak
967 1.15 mycroft sbdsp_reset(sc);
968 1.15 mycroft return 0;
969 1.1 brezak }
970 1.1 brezak
971 1.1 brezak int
972 1.1 brezak sbdsp_contdma(addr)
973 1.5 mycroft void *addr;
974 1.1 brezak {
975 1.5 mycroft register struct sbdsp_softc *sc = addr;
976 1.1 brezak
977 1.1 brezak DPRINTF(("sbdsp_contdma: sc=0x%x\n", sc));
978 1.1 brezak
979 1.1 brezak /* XXX how do we reinitialize the DMA controller state? do we care? */
980 1.31 christos (void)sbdsp_wdsp(sc, SB_DSP_CONT);
981 1.1 brezak return(0);
982 1.1 brezak }
983 1.1 brezak
984 1.23 mycroft int
985 1.23 mycroft sbdsp_setrate(sc, sr, isdac, ratep)
986 1.23 mycroft register struct sbdsp_softc *sc;
987 1.23 mycroft int sr;
988 1.23 mycroft int isdac;
989 1.23 mycroft int *ratep;
990 1.23 mycroft {
991 1.23 mycroft
992 1.23 mycroft /*
993 1.23 mycroft * XXXX
994 1.23 mycroft * More checks here?
995 1.23 mycroft */
996 1.23 mycroft if (sr < 5000 || sr > 44100)
997 1.23 mycroft return (EINVAL);
998 1.23 mycroft *ratep = sr;
999 1.23 mycroft return (0);
1000 1.23 mycroft }
1001 1.23 mycroft
1002 1.1 brezak /*
1003 1.1 brezak * Convert a linear sampling rate into the DAC time constant.
1004 1.1 brezak * Set *mode to indicate the high/low-speed DMA operation.
1005 1.1 brezak * Because of limitations of the card, not all rates are possible.
1006 1.1 brezak * We return the time constant of the closest possible rate.
1007 1.1 brezak * The sampling rate limits are different for the DAC and ADC,
1008 1.1 brezak * so isdac indicates output, and !isdac indicates input.
1009 1.1 brezak */
1010 1.1 brezak int
1011 1.16 mycroft sbdsp_srtotc(sc, sr, isdac, tcp, modep)
1012 1.1 brezak register struct sbdsp_softc *sc;
1013 1.1 brezak int sr;
1014 1.1 brezak int isdac;
1015 1.16 mycroft int *tcp, *modep;
1016 1.1 brezak {
1017 1.24 jtk int tc, realtc, mode;
1018 1.1 brezak
1019 1.24 jtk /*
1020 1.24 jtk * Don't forget to compute which mode we'll be in based on whether
1021 1.24 jtk * we need to double the rate for stereo on SBPRO.
1022 1.24 jtk */
1023 1.24 jtk
1024 1.1 brezak if (sr == 0) {
1025 1.16 mycroft tc = SB_LS_MIN;
1026 1.16 mycroft mode = SB_ADAC_LS;
1027 1.16 mycroft goto out;
1028 1.1 brezak }
1029 1.16 mycroft
1030 1.16 mycroft tc = 256 - (1000000 / sr);
1031 1.24 jtk
1032 1.24 jtk if (sc->sc_channels == 2 && ISSBPRO(sc))
1033 1.24 jtk /* compute based on 2x sample rate when needed */
1034 1.24 jtk realtc = 256 - ( 500000 / sr);
1035 1.24 jtk else
1036 1.24 jtk realtc = tc;
1037 1.1 brezak
1038 1.1 brezak if (tc < SB_LS_MIN) {
1039 1.1 brezak tc = SB_LS_MIN;
1040 1.24 jtk mode = SB_ADAC_LS; /* NB: 2x minimum speed is still low
1041 1.24 jtk * speed mode. */
1042 1.16 mycroft goto out;
1043 1.1 brezak } else if (isdac) {
1044 1.24 jtk if (realtc <= SB_DAC_LS_MAX)
1045 1.16 mycroft mode = SB_ADAC_LS;
1046 1.1 brezak else {
1047 1.16 mycroft mode = SB_ADAC_HS;
1048 1.1 brezak if (tc > SB_DAC_HS_MAX)
1049 1.1 brezak tc = SB_DAC_HS_MAX;
1050 1.1 brezak }
1051 1.1 brezak } else {
1052 1.16 mycroft int adc_ls_max, adc_hs_max;
1053 1.16 mycroft
1054 1.16 mycroft /* XXX use better rounding--compare distance to nearest tc on both
1055 1.16 mycroft sides of requested speed */
1056 1.16 mycroft if (ISSBPROCLASS(sc)) {
1057 1.16 mycroft adc_ls_max = SBPRO_ADC_LS_MAX;
1058 1.16 mycroft adc_hs_max = SBPRO_ADC_HS_MAX;
1059 1.16 mycroft } else {
1060 1.16 mycroft adc_ls_max = SBCLA_ADC_LS_MAX;
1061 1.16 mycroft adc_hs_max = SBCLA_ADC_HS_MAX;
1062 1.16 mycroft }
1063 1.16 mycroft
1064 1.24 jtk if (realtc <= adc_ls_max)
1065 1.16 mycroft mode = SB_ADAC_LS;
1066 1.1 brezak else {
1067 1.16 mycroft mode = SB_ADAC_HS;
1068 1.1 brezak if (tc > adc_hs_max)
1069 1.1 brezak tc = adc_hs_max;
1070 1.1 brezak }
1071 1.1 brezak }
1072 1.16 mycroft
1073 1.16 mycroft out:
1074 1.16 mycroft *tcp = tc;
1075 1.16 mycroft *modep = mode;
1076 1.16 mycroft return (0);
1077 1.1 brezak }
1078 1.1 brezak
1079 1.1 brezak /*
1080 1.1 brezak * Convert a DAC time constant to a sampling rate.
1081 1.1 brezak * See SBK, section 12.
1082 1.1 brezak */
1083 1.1 brezak int
1084 1.1 brezak sbdsp_tctosr(sc, tc)
1085 1.1 brezak register struct sbdsp_softc *sc;
1086 1.1 brezak int tc;
1087 1.1 brezak {
1088 1.1 brezak int adc;
1089 1.1 brezak
1090 1.1 brezak if (ISSBPROCLASS(sc))
1091 1.1 brezak adc = SBPRO_ADC_HS_MAX;
1092 1.1 brezak else
1093 1.1 brezak adc = SBCLA_ADC_HS_MAX;
1094 1.1 brezak
1095 1.1 brezak if (tc > adc)
1096 1.1 brezak tc = adc;
1097 1.1 brezak
1098 1.1 brezak return (1000000 / (256 - tc));
1099 1.1 brezak }
1100 1.1 brezak
1101 1.1 brezak int
1102 1.23 mycroft sbdsp_set_timeconst(sc, tc)
1103 1.1 brezak register struct sbdsp_softc *sc;
1104 1.16 mycroft int tc;
1105 1.1 brezak {
1106 1.1 brezak /*
1107 1.1 brezak * A SBPro in stereo mode uses time constants at double the
1108 1.1 brezak * actual rate.
1109 1.1 brezak */
1110 1.23 mycroft if (ISSBPRO(sc) && sc->sc_channels == 2)
1111 1.16 mycroft tc = 256 - ((256 - tc) / 2);
1112 1.1 brezak
1113 1.23 mycroft DPRINTF(("sbdsp_set_timeconst: sc=%p tc=%d\n", sc, tc));
1114 1.1 brezak
1115 1.31 christos if (sbdsp_wdsp(sc, SB_DSP_TIMECONST) < 0 ||
1116 1.31 christos sbdsp_wdsp(sc, tc) < 0)
1117 1.16 mycroft return (EIO);
1118 1.1 brezak
1119 1.16 mycroft return (0);
1120 1.1 brezak }
1121 1.1 brezak
1122 1.1 brezak int
1123 1.1 brezak sbdsp_dma_input(addr, p, cc, intr, arg)
1124 1.5 mycroft void *addr;
1125 1.1 brezak void *p;
1126 1.1 brezak int cc;
1127 1.25 christos void (*intr) __P((void *));
1128 1.1 brezak void *arg;
1129 1.1 brezak {
1130 1.5 mycroft register struct sbdsp_softc *sc = addr;
1131 1.1 brezak
1132 1.12 brezak #ifdef AUDIO_DEBUG
1133 1.1 brezak if (sbdspdebug > 1)
1134 1.1 brezak Dprintf("sbdsp_dma_input: cc=%d 0x%x (0x%x)\n", cc, intr, arg);
1135 1.1 brezak #endif
1136 1.23 mycroft if (sc->sc_channels == 2 && (cc & 1)) {
1137 1.1 brezak DPRINTF(("sbdsp_dma_input: stereo input, odd bytecnt\n"));
1138 1.1 brezak return EIO;
1139 1.1 brezak }
1140 1.15 mycroft
1141 1.16 mycroft if (sc->sc_dmadir != SB_DMA_IN) {
1142 1.23 mycroft if (ISSBPRO(sc)) {
1143 1.23 mycroft if (sc->sc_channels == 2) {
1144 1.24 jtk if (ISJAZZ16(sc) && sc->sc_precision == 16) {
1145 1.31 christos if (sbdsp_wdsp(sc,
1146 1.24 jtk JAZZ16_RECORD_STEREO) < 0) {
1147 1.24 jtk goto badmode;
1148 1.24 jtk }
1149 1.31 christos } else if (sbdsp_wdsp(sc,
1150 1.24 jtk SB_DSP_RECORD_STEREO) < 0)
1151 1.16 mycroft goto badmode;
1152 1.16 mycroft sbdsp_mix_write(sc, SBP_INFILTER,
1153 1.18 mycroft (sbdsp_mix_read(sc, SBP_INFILTER) &
1154 1.18 mycroft ~SBP_IFILTER_MASK) | SBP_FILTER_OFF);
1155 1.16 mycroft } else {
1156 1.24 jtk if (ISJAZZ16(sc) && sc->sc_precision == 16) {
1157 1.31 christos if (sbdsp_wdsp(sc,
1158 1.24 jtk JAZZ16_RECORD_MONO) < 0)
1159 1.24 jtk {
1160 1.24 jtk goto badmode;
1161 1.24 jtk }
1162 1.31 christos } else if (sbdsp_wdsp(sc, SB_DSP_RECORD_MONO) < 0)
1163 1.16 mycroft goto badmode;
1164 1.17 jtk sbdsp_mix_write(sc, SBP_INFILTER,
1165 1.18 mycroft (sbdsp_mix_read(sc, SBP_INFILTER) &
1166 1.18 mycroft ~SBP_IFILTER_MASK) | sc->in_filter);
1167 1.16 mycroft }
1168 1.1 brezak }
1169 1.16 mycroft
1170 1.23 mycroft if (ISSB16CLASS(sc)) {
1171 1.31 christos if (sbdsp_wdsp(sc, SB_DSP16_INPUTRATE) < 0 ||
1172 1.31 christos sbdsp_wdsp(sc, sc->sc_irate >> 8) < 0 ||
1173 1.31 christos sbdsp_wdsp(sc, sc->sc_irate) < 0)
1174 1.23 mycroft goto giveup;
1175 1.23 mycroft } else
1176 1.23 mycroft sbdsp_set_timeconst(sc, sc->sc_itc);
1177 1.16 mycroft sc->sc_dmadir = SB_DMA_IN;
1178 1.1 brezak }
1179 1.1 brezak
1180 1.23 mycroft isa_dmastart(DMAMODE_READ, p, cc, sc->sc_drq);
1181 1.1 brezak sc->sc_intr = intr;
1182 1.1 brezak sc->sc_arg = arg;
1183 1.23 mycroft sc->dmaflags = DMAMODE_READ;
1184 1.1 brezak sc->dmaaddr = p;
1185 1.23 mycroft sc->dmacnt = cc; /* DMA controller is strange...? */
1186 1.15 mycroft
1187 1.24 jtk if ((ISSB16CLASS(sc) && sc->sc_precision == 16) ||
1188 1.24 jtk (ISJAZZ16(sc) && sc->sc_drq > 3))
1189 1.23 mycroft cc >>= 1;
1190 1.23 mycroft --cc;
1191 1.23 mycroft if (ISSB16CLASS(sc)) {
1192 1.31 christos if (sbdsp_wdsp(sc, sc->sc_precision == 16 ? SB_DSP16_RDMA_16 :
1193 1.23 mycroft SB_DSP16_RDMA_8) < 0 ||
1194 1.31 christos sbdsp_wdsp(sc, (sc->sc_precision == 16 ? 0x10 : 0x00) |
1195 1.23 mycroft (sc->sc_channels == 2 ? 0x20 : 0x00)) < 0 ||
1196 1.31 christos sbdsp16_wait(sc) ||
1197 1.31 christos sbdsp_wdsp(sc, cc) < 0 ||
1198 1.31 christos sbdsp_wdsp(sc, cc >> 8) < 0) {
1199 1.23 mycroft DPRINTF(("sbdsp_dma_input: SB16 DMA start failed\n"));
1200 1.23 mycroft goto giveup;
1201 1.23 mycroft }
1202 1.23 mycroft } else if (sc->sc_imode == SB_ADAC_LS) {
1203 1.31 christos if (sbdsp_wdsp(sc, SB_DSP_RDMA) < 0 ||
1204 1.31 christos sbdsp_wdsp(sc, cc) < 0 ||
1205 1.31 christos sbdsp_wdsp(sc, cc >> 8) < 0) {
1206 1.15 mycroft DPRINTF(("sbdsp_dma_input: LS DMA start failed\n"));
1207 1.1 brezak goto giveup;
1208 1.1 brezak }
1209 1.23 mycroft } else {
1210 1.15 mycroft if (cc != sc->sc_last_hs_size) {
1211 1.31 christos if (sbdsp_wdsp(sc, SB_DSP_BLOCKSIZE) < 0 ||
1212 1.31 christos sbdsp_wdsp(sc, cc) < 0 ||
1213 1.31 christos sbdsp_wdsp(sc, cc >> 8) < 0) {
1214 1.15 mycroft DPRINTF(("sbdsp_dma_input: HS DMA start failed\n"));
1215 1.1 brezak goto giveup;
1216 1.15 mycroft }
1217 1.15 mycroft sc->sc_last_hs_size = cc;
1218 1.1 brezak }
1219 1.31 christos if (sbdsp_wdsp(sc, SB_DSP_HS_INPUT) < 0) {
1220 1.15 mycroft DPRINTF(("sbdsp_dma_input: HS DMA restart failed\n"));
1221 1.1 brezak goto giveup;
1222 1.15 mycroft }
1223 1.1 brezak }
1224 1.1 brezak return 0;
1225 1.1 brezak
1226 1.1 brezak giveup:
1227 1.1 brezak sbdsp_reset(sc);
1228 1.1 brezak return EIO;
1229 1.15 mycroft
1230 1.1 brezak badmode:
1231 1.1 brezak DPRINTF(("sbdsp_dma_input: can't set %s mode\n",
1232 1.23 mycroft sc->sc_channels == 2 ? "stereo" : "mono"));
1233 1.1 brezak return EIO;
1234 1.1 brezak }
1235 1.1 brezak
1236 1.1 brezak int
1237 1.1 brezak sbdsp_dma_output(addr, p, cc, intr, arg)
1238 1.5 mycroft void *addr;
1239 1.1 brezak void *p;
1240 1.1 brezak int cc;
1241 1.25 christos void (*intr) __P((void *));
1242 1.1 brezak void *arg;
1243 1.1 brezak {
1244 1.5 mycroft register struct sbdsp_softc *sc = addr;
1245 1.1 brezak
1246 1.12 brezak #ifdef AUDIO_DEBUG
1247 1.1 brezak if (sbdspdebug > 1)
1248 1.1 brezak Dprintf("sbdsp_dma_output: cc=%d 0x%x (0x%x)\n", cc, intr, arg);
1249 1.1 brezak #endif
1250 1.23 mycroft if (sc->sc_channels == 2 && (cc & 1)) {
1251 1.1 brezak DPRINTF(("stereo playback odd bytes (%d)\n", cc));
1252 1.1 brezak return EIO;
1253 1.1 brezak }
1254 1.1 brezak
1255 1.16 mycroft if (sc->sc_dmadir != SB_DMA_OUT) {
1256 1.23 mycroft if (ISSBPRO(sc)) {
1257 1.16 mycroft /* make sure we re-set stereo mixer bit when we start
1258 1.16 mycroft output. */
1259 1.16 mycroft sbdsp_mix_write(sc, SBP_STEREO,
1260 1.16 mycroft (sbdsp_mix_read(sc, SBP_STEREO) & ~SBP_PLAYMODE_MASK) |
1261 1.23 mycroft (sc->sc_channels == 2 ? SBP_PLAYMODE_STEREO : SBP_PLAYMODE_MONO));
1262 1.24 jtk if (ISJAZZ16(sc)) {
1263 1.24 jtk /* Yes, we write the record mode to set
1264 1.24 jtk 16-bit playback mode. weird, huh? */
1265 1.24 jtk if (sc->sc_precision == 16) {
1266 1.31 christos sbdsp_wdsp(sc,
1267 1.24 jtk sc->sc_channels == 2 ?
1268 1.24 jtk JAZZ16_RECORD_STEREO :
1269 1.24 jtk JAZZ16_RECORD_MONO);
1270 1.24 jtk } else {
1271 1.31 christos sbdsp_wdsp(sc,
1272 1.24 jtk sc->sc_channels == 2 ?
1273 1.24 jtk SB_DSP_RECORD_STEREO :
1274 1.24 jtk SB_DSP_RECORD_MONO);
1275 1.24 jtk }
1276 1.24 jtk }
1277 1.16 mycroft }
1278 1.16 mycroft
1279 1.23 mycroft if (ISSB16CLASS(sc)) {
1280 1.31 christos if (sbdsp_wdsp(sc, SB_DSP16_OUTPUTRATE) < 0 ||
1281 1.31 christos sbdsp_wdsp(sc, sc->sc_orate >> 8) < 0 ||
1282 1.31 christos sbdsp_wdsp(sc, sc->sc_orate) < 0)
1283 1.23 mycroft goto giveup;
1284 1.23 mycroft } else
1285 1.23 mycroft sbdsp_set_timeconst(sc, sc->sc_otc);
1286 1.16 mycroft sc->sc_dmadir = SB_DMA_OUT;
1287 1.1 brezak }
1288 1.15 mycroft
1289 1.23 mycroft isa_dmastart(DMAMODE_WRITE, p, cc, sc->sc_drq);
1290 1.1 brezak sc->sc_intr = intr;
1291 1.1 brezak sc->sc_arg = arg;
1292 1.23 mycroft sc->dmaflags = DMAMODE_WRITE;
1293 1.1 brezak sc->dmaaddr = p;
1294 1.23 mycroft sc->dmacnt = cc; /* a vagary of how DMA works, apparently. */
1295 1.1 brezak
1296 1.24 jtk if ((ISSB16CLASS(sc) && sc->sc_precision == 16) ||
1297 1.24 jtk (ISJAZZ16(sc) && sc->sc_drq > 3))
1298 1.23 mycroft cc >>= 1;
1299 1.23 mycroft --cc;
1300 1.23 mycroft if (ISSB16CLASS(sc)) {
1301 1.31 christos if (sbdsp_wdsp(sc, sc->sc_precision == 16 ? SB_DSP16_WDMA_16 :
1302 1.23 mycroft SB_DSP16_WDMA_8) < 0 ||
1303 1.31 christos sbdsp_wdsp(sc, (sc->sc_precision == 16 ? 0x10 : 0x00) |
1304 1.23 mycroft (sc->sc_channels == 2 ? 0x20 : 0x00)) < 0 ||
1305 1.31 christos sbdsp16_wait(sc) ||
1306 1.31 christos sbdsp_wdsp(sc, cc) < 0 ||
1307 1.31 christos sbdsp_wdsp(sc, cc >> 8) < 0) {
1308 1.23 mycroft DPRINTF(("sbdsp_dma_output: SB16 DMA start failed\n"));
1309 1.23 mycroft goto giveup;
1310 1.23 mycroft }
1311 1.23 mycroft } else if (sc->sc_omode == SB_ADAC_LS) {
1312 1.31 christos if (sbdsp_wdsp(sc, SB_DSP_WDMA) < 0 ||
1313 1.31 christos sbdsp_wdsp(sc, cc) < 0 ||
1314 1.31 christos sbdsp_wdsp(sc, cc >> 8) < 0) {
1315 1.1 brezak DPRINTF(("sbdsp_dma_output: LS DMA start failed\n"));
1316 1.1 brezak goto giveup;
1317 1.1 brezak }
1318 1.23 mycroft } else {
1319 1.15 mycroft if (cc != sc->sc_last_hs_size) {
1320 1.31 christos if (sbdsp_wdsp(sc, SB_DSP_BLOCKSIZE) < 0 ||
1321 1.31 christos sbdsp_wdsp(sc, cc) < 0 ||
1322 1.31 christos sbdsp_wdsp(sc, cc >> 8) < 0) {
1323 1.1 brezak DPRINTF(("sbdsp_dma_output: HS DMA start failed\n"));
1324 1.1 brezak goto giveup;
1325 1.1 brezak }
1326 1.15 mycroft sc->sc_last_hs_size = cc;
1327 1.1 brezak }
1328 1.31 christos if (sbdsp_wdsp(sc, SB_DSP_HS_OUTPUT) < 0) {
1329 1.15 mycroft DPRINTF(("sbdsp_dma_output: HS DMA restart failed\n"));
1330 1.15 mycroft goto giveup;
1331 1.1 brezak }
1332 1.1 brezak }
1333 1.1 brezak return 0;
1334 1.1 brezak
1335 1.15 mycroft giveup:
1336 1.1 brezak sbdsp_reset(sc);
1337 1.1 brezak return EIO;
1338 1.1 brezak }
1339 1.1 brezak
1340 1.1 brezak /*
1341 1.1 brezak * Only the DSP unit on the sound blaster generates interrupts.
1342 1.1 brezak * There are three cases of interrupt: reception of a midi byte
1343 1.1 brezak * (when mode is enabled), completion of dma transmission, or
1344 1.1 brezak * completion of a dma reception. The three modes are mutually
1345 1.1 brezak * exclusive so we know a priori which event has occurred.
1346 1.1 brezak */
1347 1.1 brezak int
1348 1.6 cgd sbdsp_intr(arg)
1349 1.6 cgd void *arg;
1350 1.1 brezak {
1351 1.6 cgd register struct sbdsp_softc *sc = arg;
1352 1.15 mycroft u_char x;
1353 1.1 brezak
1354 1.12 brezak #ifdef AUDIO_DEBUG
1355 1.1 brezak if (sbdspdebug > 1)
1356 1.1 brezak Dprintf("sbdsp_intr: intr=0x%x\n", sc->sc_intr);
1357 1.1 brezak #endif
1358 1.20 mycroft if (!isa_dmafinished(sc->sc_drq)) {
1359 1.30 fvdl #ifdef AUDIO_DEBUG
1360 1.28 christos printf("sbdsp_intr: not finished\n");
1361 1.30 fvdl #endif
1362 1.20 mycroft return 0;
1363 1.20 mycroft }
1364 1.1 brezak sc->sc_interrupts++;
1365 1.1 brezak /* clear interrupt */
1366 1.23 mycroft #ifdef notyet
1367 1.23 mycroft x = sbdsp_mix_read(sc, 0x82);
1368 1.31 christos x = bus_space_read_1(sc->sc_iot, sc->sc_ioh, 15);
1369 1.23 mycroft #endif
1370 1.31 christos x = bus_space_read_1(sc->sc_iot, sc->sc_ioh, SBP_DSP_RSTAT);
1371 1.15 mycroft delay(10);
1372 1.1 brezak #if 0
1373 1.1 brezak if (sc->sc_mintr != 0) {
1374 1.31 christos x = sbdsp_rdsp(sc);
1375 1.15 mycroft (*sc->sc_mintr)(sc->sc_arg, x);
1376 1.1 brezak } else
1377 1.1 brezak #endif
1378 1.1 brezak if (sc->sc_intr != 0) {
1379 1.18 mycroft isa_dmadone(sc->dmaflags, sc->dmaaddr, sc->dmacnt, sc->sc_drq);
1380 1.1 brezak (*sc->sc_intr)(sc->sc_arg);
1381 1.1 brezak }
1382 1.1 brezak else
1383 1.1 brezak return 0;
1384 1.1 brezak return 1;
1385 1.1 brezak }
1386 1.1 brezak
1387 1.1 brezak #if 0
1388 1.1 brezak /*
1389 1.1 brezak * Enter midi uart mode and arrange for read interrupts
1390 1.1 brezak * to vector to `intr'. This puts the card in a mode
1391 1.1 brezak * which allows only midi I/O; the card must be reset
1392 1.1 brezak * to leave this mode. Unfortunately, the card does not
1393 1.1 brezak * use transmit interrupts, so bytes must be output
1394 1.1 brezak * using polling. To keep the polling overhead to a
1395 1.1 brezak * minimum, output should be driven off a timer.
1396 1.1 brezak * This is a little tricky since only 320us separate
1397 1.1 brezak * consecutive midi bytes.
1398 1.1 brezak */
1399 1.1 brezak void
1400 1.1 brezak sbdsp_set_midi_mode(sc, intr, arg)
1401 1.1 brezak struct sbdsp_softc *sc;
1402 1.1 brezak void (*intr)();
1403 1.1 brezak void *arg;
1404 1.1 brezak {
1405 1.1 brezak
1406 1.31 christos sbdsp_wdsp(sc, SB_MIDI_UART_INTR);
1407 1.1 brezak sc->sc_mintr = intr;
1408 1.1 brezak sc->sc_intr = 0;
1409 1.1 brezak sc->sc_arg = arg;
1410 1.1 brezak }
1411 1.1 brezak
1412 1.1 brezak /*
1413 1.1 brezak * Write a byte to the midi port, when in midi uart mode.
1414 1.1 brezak */
1415 1.1 brezak void
1416 1.1 brezak sbdsp_midi_output(sc, v)
1417 1.1 brezak struct sbdsp_softc *sc;
1418 1.1 brezak int v;
1419 1.1 brezak {
1420 1.1 brezak
1421 1.31 christos if (sbdsp_wdsp(sc, v) < 0)
1422 1.1 brezak ++sberr.wmidi;
1423 1.1 brezak }
1424 1.1 brezak #endif
1425 1.1 brezak
1426 1.1 brezak u_int
1427 1.23 mycroft sbdsp_get_silence(encoding)
1428 1.23 mycroft int encoding;
1429 1.1 brezak {
1430 1.1 brezak #define ULAW_SILENCE 0x7f
1431 1.1 brezak #define LINEAR_SILENCE 0
1432 1.18 mycroft u_int auzero;
1433 1.1 brezak
1434 1.23 mycroft switch (encoding) {
1435 1.18 mycroft case AUDIO_ENCODING_ULAW:
1436 1.18 mycroft auzero = ULAW_SILENCE;
1437 1.18 mycroft break;
1438 1.18 mycroft case AUDIO_ENCODING_PCM16:
1439 1.18 mycroft default:
1440 1.18 mycroft auzero = LINEAR_SILENCE;
1441 1.18 mycroft break;
1442 1.18 mycroft }
1443 1.1 brezak
1444 1.18 mycroft return (auzero);
1445 1.1 brezak }
1446 1.1 brezak
1447 1.1 brezak int
1448 1.1 brezak sbdsp_setfd(addr, flag)
1449 1.5 mycroft void *addr;
1450 1.1 brezak int flag;
1451 1.1 brezak {
1452 1.1 brezak /* Can't do full-duplex */
1453 1.1 brezak return(ENOTTY);
1454 1.1 brezak }
1455 1.1 brezak
1456 1.1 brezak int
1457 1.1 brezak sbdsp_mixer_set_port(addr, cp)
1458 1.18 mycroft void *addr;
1459 1.18 mycroft mixer_ctrl_t *cp;
1460 1.1 brezak {
1461 1.18 mycroft register struct sbdsp_softc *sc = addr;
1462 1.18 mycroft int src, gain;
1463 1.1 brezak
1464 1.18 mycroft DPRINTF(("sbdsp_mixer_set_port: port=%d num_channels=%d\n", cp->dev,
1465 1.18 mycroft cp->un.value.num_channels));
1466 1.1 brezak
1467 1.22 mycroft if (!ISSBPROCLASS(sc))
1468 1.22 mycroft return EINVAL;
1469 1.22 mycroft
1470 1.1 brezak /*
1471 1.18 mycroft * Everything is a value except for SBPro BASS/TREBLE and
1472 1.18 mycroft * RECORD_SOURCE
1473 1.1 brezak */
1474 1.18 mycroft switch (cp->dev) {
1475 1.1 brezak case SB_SPEAKER:
1476 1.18 mycroft cp->dev = SB_MASTER_VOL;
1477 1.18 mycroft case SB_MIC_PORT:
1478 1.18 mycroft case SB_LINE_IN_PORT:
1479 1.18 mycroft case SB_DAC_PORT:
1480 1.18 mycroft case SB_FM_PORT:
1481 1.18 mycroft case SB_CD_PORT:
1482 1.18 mycroft case SB_MASTER_VOL:
1483 1.18 mycroft if (cp->type != AUDIO_MIXER_VALUE)
1484 1.18 mycroft return EINVAL;
1485 1.18 mycroft
1486 1.18 mycroft /*
1487 1.18 mycroft * All the mixer ports are stereo except for the microphone.
1488 1.18 mycroft * If we get a single-channel gain value passed in, then we
1489 1.18 mycroft * duplicate it to both left and right channels.
1490 1.18 mycroft */
1491 1.18 mycroft
1492 1.18 mycroft switch (cp->dev) {
1493 1.18 mycroft case SB_MIC_PORT:
1494 1.18 mycroft if (cp->un.value.num_channels != 1)
1495 1.18 mycroft return EINVAL;
1496 1.18 mycroft
1497 1.18 mycroft /* handle funny microphone gain */
1498 1.18 mycroft gain = SBP_AGAIN_TO_MICGAIN(cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]);
1499 1.18 mycroft break;
1500 1.18 mycroft case SB_LINE_IN_PORT:
1501 1.18 mycroft case SB_DAC_PORT:
1502 1.18 mycroft case SB_FM_PORT:
1503 1.18 mycroft case SB_CD_PORT:
1504 1.18 mycroft case SB_MASTER_VOL:
1505 1.18 mycroft switch (cp->un.value.num_channels) {
1506 1.18 mycroft case 1:
1507 1.21 mycroft gain = sbdsp_mono_vol(SBP_AGAIN_TO_SBGAIN(cp->un.value.level[AUDIO_MIXER_LEVEL_MONO]));
1508 1.18 mycroft break;
1509 1.18 mycroft case 2:
1510 1.18 mycroft gain = sbdsp_stereo_vol(SBP_AGAIN_TO_SBGAIN(cp->un.value.level[AUDIO_MIXER_LEVEL_LEFT]),
1511 1.18 mycroft SBP_AGAIN_TO_SBGAIN(cp->un.value.level[AUDIO_MIXER_LEVEL_RIGHT]));
1512 1.18 mycroft break;
1513 1.18 mycroft default:
1514 1.18 mycroft return EINVAL;
1515 1.18 mycroft }
1516 1.18 mycroft break;
1517 1.25 christos default:
1518 1.25 christos return EINVAL;
1519 1.18 mycroft }
1520 1.18 mycroft
1521 1.18 mycroft switch (cp->dev) {
1522 1.18 mycroft case SB_MIC_PORT:
1523 1.18 mycroft src = SBP_MIC_VOL;
1524 1.18 mycroft break;
1525 1.18 mycroft case SB_MASTER_VOL:
1526 1.18 mycroft src = SBP_MASTER_VOL;
1527 1.18 mycroft break;
1528 1.18 mycroft case SB_LINE_IN_PORT:
1529 1.18 mycroft src = SBP_LINE_VOL;
1530 1.18 mycroft break;
1531 1.18 mycroft case SB_DAC_PORT:
1532 1.18 mycroft src = SBP_DAC_VOL;
1533 1.18 mycroft break;
1534 1.18 mycroft case SB_FM_PORT:
1535 1.18 mycroft src = SBP_FM_VOL;
1536 1.18 mycroft break;
1537 1.18 mycroft case SB_CD_PORT:
1538 1.18 mycroft src = SBP_CD_VOL;
1539 1.18 mycroft break;
1540 1.25 christos default:
1541 1.25 christos return EINVAL;
1542 1.18 mycroft }
1543 1.18 mycroft
1544 1.18 mycroft sbdsp_mix_write(sc, src, gain);
1545 1.18 mycroft sc->gain[cp->dev] = gain;
1546 1.18 mycroft break;
1547 1.18 mycroft
1548 1.18 mycroft case SB_TREBLE:
1549 1.18 mycroft case SB_BASS:
1550 1.1 brezak case SB_RECORD_SOURCE:
1551 1.18 mycroft if (cp->type != AUDIO_MIXER_ENUM)
1552 1.18 mycroft return EINVAL;
1553 1.18 mycroft
1554 1.18 mycroft switch (cp->dev) {
1555 1.18 mycroft case SB_TREBLE:
1556 1.18 mycroft return sbdsp_set_ifilter(addr, cp->un.ord ? SBP_TREBLE_EQ : 0);
1557 1.18 mycroft case SB_BASS:
1558 1.18 mycroft return sbdsp_set_ifilter(addr, cp->un.ord ? SBP_BASS_EQ : 0);
1559 1.18 mycroft case SB_RECORD_SOURCE:
1560 1.18 mycroft return sbdsp_set_in_port(addr, cp->un.ord);
1561 1.18 mycroft }
1562 1.1 brezak
1563 1.18 mycroft break;
1564 1.22 mycroft
1565 1.22 mycroft default:
1566 1.22 mycroft return EINVAL;
1567 1.18 mycroft }
1568 1.1 brezak
1569 1.18 mycroft return (0);
1570 1.1 brezak }
1571 1.1 brezak
1572 1.1 brezak int
1573 1.1 brezak sbdsp_mixer_get_port(addr, cp)
1574 1.18 mycroft void *addr;
1575 1.18 mycroft mixer_ctrl_t *cp;
1576 1.1 brezak {
1577 1.18 mycroft register struct sbdsp_softc *sc = addr;
1578 1.19 mycroft int gain;
1579 1.1 brezak
1580 1.18 mycroft DPRINTF(("sbdsp_mixer_get_port: port=%d", cp->dev));
1581 1.1 brezak
1582 1.22 mycroft if (!ISSBPROCLASS(sc))
1583 1.22 mycroft return EINVAL;
1584 1.22 mycroft
1585 1.18 mycroft switch (cp->dev) {
1586 1.18 mycroft case SB_SPEAKER:
1587 1.18 mycroft cp->dev = SB_MASTER_VOL;
1588 1.17 jtk case SB_MIC_PORT:
1589 1.1 brezak case SB_LINE_IN_PORT:
1590 1.18 mycroft case SB_DAC_PORT:
1591 1.18 mycroft case SB_FM_PORT:
1592 1.18 mycroft case SB_CD_PORT:
1593 1.18 mycroft case SB_MASTER_VOL:
1594 1.18 mycroft gain = sc->gain[cp->dev];
1595 1.18 mycroft
1596 1.18 mycroft switch (cp->dev) {
1597 1.18 mycroft case SB_MIC_PORT:
1598 1.18 mycroft if (cp->un.value.num_channels != 1)
1599 1.18 mycroft return EINVAL;
1600 1.18 mycroft
1601 1.18 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_MONO] = SBP_MICGAIN_TO_AGAIN(gain);
1602 1.18 mycroft break;
1603 1.18 mycroft case SB_LINE_IN_PORT:
1604 1.18 mycroft case SB_DAC_PORT:
1605 1.18 mycroft case SB_FM_PORT:
1606 1.18 mycroft case SB_CD_PORT:
1607 1.18 mycroft case SB_MASTER_VOL:
1608 1.18 mycroft switch (cp->un.value.num_channels) {
1609 1.18 mycroft case 1:
1610 1.18 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_MONO] = SBP_SBGAIN_TO_AGAIN(gain);
1611 1.18 mycroft break;
1612 1.18 mycroft case 2:
1613 1.18 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_LEFT] = SBP_LEFTGAIN(gain);
1614 1.18 mycroft cp->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] = SBP_RIGHTGAIN(gain);
1615 1.18 mycroft break;
1616 1.18 mycroft default:
1617 1.18 mycroft return EINVAL;
1618 1.18 mycroft }
1619 1.18 mycroft break;
1620 1.18 mycroft }
1621 1.18 mycroft
1622 1.22 mycroft break;
1623 1.22 mycroft
1624 1.17 jtk case SB_TREBLE:
1625 1.17 jtk case SB_BASS:
1626 1.18 mycroft case SB_RECORD_SOURCE:
1627 1.18 mycroft switch (cp->dev) {
1628 1.18 mycroft case SB_TREBLE:
1629 1.18 mycroft cp->un.ord = sbdsp_get_ifilter(addr) == SBP_TREBLE_EQ;
1630 1.18 mycroft return 0;
1631 1.18 mycroft case SB_BASS:
1632 1.18 mycroft cp->un.ord = sbdsp_get_ifilter(addr) == SBP_BASS_EQ;
1633 1.18 mycroft return 0;
1634 1.18 mycroft case SB_RECORD_SOURCE:
1635 1.18 mycroft cp->un.ord = sbdsp_get_in_port(addr);
1636 1.18 mycroft return 0;
1637 1.18 mycroft }
1638 1.18 mycroft
1639 1.1 brezak break;
1640 1.22 mycroft
1641 1.22 mycroft default:
1642 1.22 mycroft return EINVAL;
1643 1.18 mycroft }
1644 1.18 mycroft
1645 1.18 mycroft return (0);
1646 1.1 brezak }
1647 1.1 brezak
1648 1.1 brezak int
1649 1.1 brezak sbdsp_mixer_query_devinfo(addr, dip)
1650 1.18 mycroft void *addr;
1651 1.18 mycroft register mixer_devinfo_t *dip;
1652 1.1 brezak {
1653 1.18 mycroft register struct sbdsp_softc *sc = addr;
1654 1.18 mycroft
1655 1.18 mycroft DPRINTF(("sbdsp_mixer_query_devinfo: index=%d\n", dip->index));
1656 1.18 mycroft
1657 1.18 mycroft switch (dip->index) {
1658 1.18 mycroft case SB_MIC_PORT:
1659 1.18 mycroft dip->type = AUDIO_MIXER_VALUE;
1660 1.18 mycroft dip->mixer_class = SB_INPUT_CLASS;
1661 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1662 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1663 1.18 mycroft strcpy(dip->label.name, AudioNmicrophone);
1664 1.18 mycroft dip->un.v.num_channels = 1;
1665 1.18 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1666 1.18 mycroft return 0;
1667 1.18 mycroft
1668 1.18 mycroft case SB_SPEAKER:
1669 1.18 mycroft dip->type = AUDIO_MIXER_VALUE;
1670 1.18 mycroft dip->mixer_class = SB_OUTPUT_CLASS;
1671 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1672 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1673 1.18 mycroft strcpy(dip->label.name, AudioNspeaker);
1674 1.18 mycroft dip->un.v.num_channels = 1;
1675 1.18 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1676 1.18 mycroft return 0;
1677 1.18 mycroft
1678 1.18 mycroft case SB_INPUT_CLASS:
1679 1.18 mycroft dip->type = AUDIO_MIXER_CLASS;
1680 1.18 mycroft dip->mixer_class = SB_INPUT_CLASS;
1681 1.18 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1682 1.18 mycroft strcpy(dip->label.name, AudioCInputs);
1683 1.18 mycroft return 0;
1684 1.1 brezak
1685 1.18 mycroft case SB_OUTPUT_CLASS:
1686 1.18 mycroft dip->type = AUDIO_MIXER_CLASS;
1687 1.18 mycroft dip->mixer_class = SB_OUTPUT_CLASS;
1688 1.18 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1689 1.18 mycroft strcpy(dip->label.name, AudioCOutputs);
1690 1.18 mycroft return 0;
1691 1.18 mycroft }
1692 1.18 mycroft
1693 1.18 mycroft if (ISSBPROCLASS(sc)) {
1694 1.18 mycroft switch (dip->index) {
1695 1.18 mycroft case SB_LINE_IN_PORT:
1696 1.18 mycroft dip->type = AUDIO_MIXER_VALUE;
1697 1.18 mycroft dip->mixer_class = SB_INPUT_CLASS;
1698 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1699 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1700 1.18 mycroft strcpy(dip->label.name, AudioNline);
1701 1.18 mycroft dip->un.v.num_channels = 2;
1702 1.18 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1703 1.18 mycroft return 0;
1704 1.1 brezak
1705 1.18 mycroft case SB_DAC_PORT:
1706 1.18 mycroft dip->type = AUDIO_MIXER_VALUE;
1707 1.18 mycroft dip->mixer_class = SB_INPUT_CLASS;
1708 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1709 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1710 1.18 mycroft strcpy(dip->label.name, AudioNdac);
1711 1.18 mycroft dip->un.v.num_channels = 2;
1712 1.18 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1713 1.18 mycroft return 0;
1714 1.17 jtk
1715 1.18 mycroft case SB_CD_PORT:
1716 1.18 mycroft dip->type = AUDIO_MIXER_VALUE;
1717 1.18 mycroft dip->mixer_class = SB_INPUT_CLASS;
1718 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1719 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1720 1.18 mycroft strcpy(dip->label.name, AudioNcd);
1721 1.18 mycroft dip->un.v.num_channels = 2;
1722 1.18 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1723 1.18 mycroft return 0;
1724 1.1 brezak
1725 1.18 mycroft case SB_FM_PORT:
1726 1.18 mycroft dip->type = AUDIO_MIXER_VALUE;
1727 1.18 mycroft dip->mixer_class = SB_INPUT_CLASS;
1728 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1729 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1730 1.18 mycroft strcpy(dip->label.name, AudioNfmsynth);
1731 1.18 mycroft dip->un.v.num_channels = 2;
1732 1.18 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1733 1.18 mycroft return 0;
1734 1.18 mycroft
1735 1.18 mycroft case SB_MASTER_VOL:
1736 1.18 mycroft dip->type = AUDIO_MIXER_VALUE;
1737 1.18 mycroft dip->mixer_class = SB_OUTPUT_CLASS;
1738 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1739 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1740 1.18 mycroft strcpy(dip->label.name, AudioNvolume);
1741 1.18 mycroft dip->un.v.num_channels = 2;
1742 1.18 mycroft strcpy(dip->un.v.units.name, AudioNvolume);
1743 1.18 mycroft return 0;
1744 1.18 mycroft
1745 1.18 mycroft case SB_RECORD_SOURCE:
1746 1.18 mycroft dip->mixer_class = SB_RECORD_CLASS;
1747 1.18 mycroft dip->type = AUDIO_MIXER_ENUM;
1748 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1749 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1750 1.18 mycroft strcpy(dip->label.name, AudioNsource);
1751 1.18 mycroft dip->un.e.num_mem = 3;
1752 1.18 mycroft strcpy(dip->un.e.member[0].label.name, AudioNmicrophone);
1753 1.18 mycroft dip->un.e.member[0].ord = SB_MIC_PORT;
1754 1.18 mycroft strcpy(dip->un.e.member[1].label.name, AudioNcd);
1755 1.18 mycroft dip->un.e.member[1].ord = SB_CD_PORT;
1756 1.18 mycroft strcpy(dip->un.e.member[2].label.name, AudioNline);
1757 1.18 mycroft dip->un.e.member[2].ord = SB_LINE_IN_PORT;
1758 1.18 mycroft return 0;
1759 1.18 mycroft
1760 1.18 mycroft case SB_BASS:
1761 1.18 mycroft dip->type = AUDIO_MIXER_ENUM;
1762 1.18 mycroft dip->mixer_class = SB_INPUT_CLASS;
1763 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1764 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1765 1.18 mycroft strcpy(dip->label.name, AudioNbass);
1766 1.18 mycroft dip->un.e.num_mem = 2;
1767 1.18 mycroft strcpy(dip->un.e.member[0].label.name, AudioNoff);
1768 1.18 mycroft dip->un.e.member[0].ord = 0;
1769 1.18 mycroft strcpy(dip->un.e.member[1].label.name, AudioNon);
1770 1.18 mycroft dip->un.e.member[1].ord = 1;
1771 1.18 mycroft return 0;
1772 1.18 mycroft
1773 1.18 mycroft case SB_TREBLE:
1774 1.18 mycroft dip->type = AUDIO_MIXER_ENUM;
1775 1.18 mycroft dip->mixer_class = SB_INPUT_CLASS;
1776 1.18 mycroft dip->prev = AUDIO_MIXER_LAST;
1777 1.18 mycroft dip->next = AUDIO_MIXER_LAST;
1778 1.18 mycroft strcpy(dip->label.name, AudioNtreble);
1779 1.18 mycroft dip->un.e.num_mem = 2;
1780 1.18 mycroft strcpy(dip->un.e.member[0].label.name, AudioNoff);
1781 1.18 mycroft dip->un.e.member[0].ord = 0;
1782 1.18 mycroft strcpy(dip->un.e.member[1].label.name, AudioNon);
1783 1.18 mycroft dip->un.e.member[1].ord = 1;
1784 1.18 mycroft return 0;
1785 1.18 mycroft
1786 1.18 mycroft case SB_RECORD_CLASS: /* record source class */
1787 1.18 mycroft dip->type = AUDIO_MIXER_CLASS;
1788 1.18 mycroft dip->mixer_class = SB_RECORD_CLASS;
1789 1.18 mycroft dip->next = dip->prev = AUDIO_MIXER_LAST;
1790 1.18 mycroft strcpy(dip->label.name, AudioCRecord);
1791 1.18 mycroft return 0;
1792 1.18 mycroft }
1793 1.18 mycroft }
1794 1.1 brezak
1795 1.18 mycroft return ENXIO;
1796 1.1 brezak }
1797