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