ad1848_isa.c revision 1.27 1 1.27 kent /* $NetBSD: ad1848_isa.c,v 1.27 2005/01/10 22:01:37 kent Exp $ */
2 1.1 pk
3 1.7 mycroft /*-
4 1.7 mycroft * Copyright (c) 1999 The NetBSD Foundation, Inc.
5 1.7 mycroft * All rights reserved.
6 1.7 mycroft *
7 1.7 mycroft * This code is derived from software contributed to The NetBSD Foundation
8 1.7 mycroft * by Ken Hornstein and John Kohl.
9 1.7 mycroft *
10 1.7 mycroft * Redistribution and use in source and binary forms, with or without
11 1.7 mycroft * modification, are permitted provided that the following conditions
12 1.7 mycroft * are met:
13 1.7 mycroft * 1. Redistributions of source code must retain the above copyright
14 1.7 mycroft * notice, this list of conditions and the following disclaimer.
15 1.7 mycroft * 2. Redistributions in binary form must reproduce the above copyright
16 1.7 mycroft * notice, this list of conditions and the following disclaimer in the
17 1.7 mycroft * documentation and/or other materials provided with the distribution.
18 1.7 mycroft * 3. All advertising materials mentioning features or use of this software
19 1.7 mycroft * must display the following acknowledgement:
20 1.7 mycroft * This product includes software developed by the NetBSD
21 1.7 mycroft * Foundation, Inc. and its contributors.
22 1.7 mycroft * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.7 mycroft * contributors may be used to endorse or promote products derived
24 1.7 mycroft * from this software without specific prior written permission.
25 1.7 mycroft *
26 1.7 mycroft * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.7 mycroft * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.7 mycroft * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.7 mycroft * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.7 mycroft * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.7 mycroft * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.7 mycroft * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.7 mycroft * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.7 mycroft * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.7 mycroft * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.7 mycroft * POSSIBILITY OF SUCH DAMAGE.
37 1.7 mycroft */
38 1.1 pk /*
39 1.1 pk * Copyright (c) 1994 John Brezak
40 1.1 pk * Copyright (c) 1991-1993 Regents of the University of California.
41 1.1 pk * All rights reserved.
42 1.1 pk *
43 1.1 pk * Redistribution and use in source and binary forms, with or without
44 1.1 pk * modification, are permitted provided that the following conditions
45 1.1 pk * are met:
46 1.1 pk * 1. Redistributions of source code must retain the above copyright
47 1.1 pk * notice, this list of conditions and the following disclaimer.
48 1.1 pk * 2. Redistributions in binary form must reproduce the above copyright
49 1.1 pk * notice, this list of conditions and the following disclaimer in the
50 1.1 pk * documentation and/or other materials provided with the distribution.
51 1.1 pk * 3. All advertising materials mentioning features or use of this software
52 1.1 pk * must display the following acknowledgement:
53 1.1 pk * This product includes software developed by the Computer Systems
54 1.1 pk * Engineering Group at Lawrence Berkeley Laboratory.
55 1.1 pk * 4. Neither the name of the University nor of the Laboratory may be used
56 1.1 pk * to endorse or promote products derived from this software without
57 1.1 pk * specific prior written permission.
58 1.1 pk *
59 1.1 pk * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
60 1.1 pk * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
61 1.1 pk * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
62 1.1 pk * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
63 1.1 pk * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
64 1.1 pk * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
65 1.1 pk * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
66 1.1 pk * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
67 1.1 pk * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
68 1.1 pk * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
69 1.1 pk * SUCH DAMAGE.
70 1.1 pk *
71 1.1 pk */
72 1.1 pk
73 1.1 pk /*
74 1.1 pk * Copyright by Hannu Savolainen 1994
75 1.1 pk *
76 1.1 pk * Redistribution and use in source and binary forms, with or without
77 1.1 pk * modification, are permitted provided that the following conditions are
78 1.1 pk * met: 1. Redistributions of source code must retain the above copyright
79 1.1 pk * notice, this list of conditions and the following disclaimer. 2.
80 1.1 pk * Redistributions in binary form must reproduce the above copyright notice,
81 1.1 pk * this list of conditions and the following disclaimer in the documentation
82 1.1 pk * and/or other materials provided with the distribution.
83 1.1 pk *
84 1.1 pk * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND ANY
85 1.1 pk * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
86 1.1 pk * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
87 1.1 pk * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
88 1.1 pk * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
89 1.1 pk * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
90 1.1 pk * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
91 1.1 pk * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
92 1.1 pk * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
93 1.1 pk * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
94 1.1 pk * SUCH DAMAGE.
95 1.1 pk *
96 1.1 pk */
97 1.1 pk /*
98 1.1 pk * Portions of this code are from the VOXware support for the ad1848
99 1.1 pk * by Hannu Savolainen <hannu (at) voxware.pp.fi>
100 1.1 pk *
101 1.1 pk * Portions also supplied from the SoundBlaster driver for NetBSD.
102 1.1 pk */
103 1.20 lukem
104 1.20 lukem #include <sys/cdefs.h>
105 1.27 kent __KERNEL_RCSID(0, "$NetBSD: ad1848_isa.c,v 1.27 2005/01/10 22:01:37 kent Exp $");
106 1.1 pk
107 1.1 pk #include <sys/param.h>
108 1.1 pk #include <sys/systm.h>
109 1.1 pk #include <sys/errno.h>
110 1.1 pk #include <sys/ioctl.h>
111 1.1 pk #include <sys/syslog.h>
112 1.1 pk #include <sys/device.h>
113 1.1 pk #include <sys/proc.h>
114 1.1 pk #include <sys/buf.h>
115 1.1 pk
116 1.1 pk #include <machine/cpu.h>
117 1.1 pk #include <machine/bus.h>
118 1.1 pk
119 1.1 pk #include <sys/audioio.h>
120 1.1 pk
121 1.1 pk #include <dev/audio_if.h>
122 1.1 pk #include <dev/auconv.h>
123 1.1 pk
124 1.1 pk #include <dev/isa/isavar.h>
125 1.1 pk #include <dev/isa/isadmavar.h>
126 1.1 pk
127 1.1 pk #include <dev/ic/ad1848reg.h>
128 1.1 pk #include <dev/ic/cs4231reg.h>
129 1.12 rh #include <dev/ic/cs4237reg.h>
130 1.1 pk #include <dev/isa/ad1848var.h>
131 1.1 pk #include <dev/isa/cs4231var.h>
132 1.1 pk
133 1.1 pk #ifdef AUDIO_DEBUG
134 1.1 pk #define DPRINTF(x) if (ad1848debug) printf x
135 1.1 pk extern int ad1848debug;
136 1.1 pk #else
137 1.1 pk #define DPRINTF(x)
138 1.1 pk #endif
139 1.1 pk
140 1.1 pk static int ad1848_isa_read __P(( struct ad1848_softc *, int));
141 1.1 pk static void ad1848_isa_write __P(( struct ad1848_softc *, int, int));
142 1.1 pk
143 1.1 pk int
144 1.1 pk ad1848_isa_read(sc, index)
145 1.1 pk struct ad1848_softc *sc;
146 1.1 pk int index;
147 1.1 pk {
148 1.11 mycroft return (bus_space_read_1(sc->sc_iot, sc->sc_ioh, index));
149 1.1 pk }
150 1.1 pk
151 1.1 pk void
152 1.1 pk ad1848_isa_write(sc, index, value)
153 1.1 pk struct ad1848_softc *sc;
154 1.1 pk int index;
155 1.1 pk int value;
156 1.1 pk {
157 1.11 mycroft bus_space_write_1(sc->sc_iot, sc->sc_ioh, index, value);
158 1.1 pk }
159 1.1 pk
160 1.1 pk /*
161 1.1 pk * Map and probe for the ad1848 chip
162 1.1 pk */
163 1.1 pk int
164 1.1 pk ad1848_isa_mapprobe(isc, iobase)
165 1.1 pk struct ad1848_isa_softc *isc;
166 1.1 pk int iobase;
167 1.1 pk {
168 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
169 1.1 pk
170 1.1 pk if (!AD1848_BASE_VALID(iobase)) {
171 1.1 pk #ifdef AUDIO_DEBUG
172 1.1 pk printf("ad1848: configured iobase %04x invalid\n", iobase);
173 1.1 pk #endif
174 1.1 pk return 0;
175 1.1 pk }
176 1.1 pk
177 1.1 pk /* Map the AD1848 ports */
178 1.1 pk if (bus_space_map(sc->sc_iot, iobase, AD1848_NPORT, 0, &sc->sc_ioh))
179 1.1 pk return 0;
180 1.1 pk
181 1.1 pk if (!ad1848_isa_probe(isc)) {
182 1.1 pk bus_space_unmap(sc->sc_iot, sc->sc_ioh, AD1848_NPORT);
183 1.1 pk return 0;
184 1.1 pk } else
185 1.1 pk return 1;
186 1.1 pk }
187 1.1 pk
188 1.1 pk /*
189 1.1 pk * Probe for the ad1848 chip
190 1.1 pk */
191 1.1 pk int
192 1.1 pk ad1848_isa_probe(isc)
193 1.1 pk struct ad1848_isa_softc *isc;
194 1.1 pk {
195 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
196 1.1 pk u_char tmp, tmp1 = 0xff, tmp2 = 0xff;
197 1.19 itohy int i, t;
198 1.1 pk
199 1.1 pk sc->sc_readreg = ad1848_isa_read;
200 1.1 pk sc->sc_writereg = ad1848_isa_write;
201 1.1 pk
202 1.1 pk /* Is there an ad1848 chip ? */
203 1.1 pk sc->MCE_bit = MODE_CHANGE_ENABLE;
204 1.1 pk sc->mode = 1; /* MODE 1 = original ad1848/ad1846/cs4248 */
205 1.1 pk
206 1.1 pk /*
207 1.1 pk * Check that the I/O address is in use.
208 1.1 pk *
209 1.1 pk * The SP_IN_INIT bit of the base I/O port is known to be 0 after the
210 1.1 pk * chip has performed its power-on initialization. Just assume
211 1.1 pk * this has happened before the OS is starting.
212 1.1 pk *
213 1.1 pk * If the I/O address is unused, inb() typically returns 0xff.
214 1.1 pk */
215 1.1 pk tmp = ADREAD(sc, AD1848_IADDR);
216 1.1 pk if (tmp & SP_IN_INIT) { /* Not a AD1848 */
217 1.1 pk DPRINTF(("ad_detect_A %x\n", tmp));
218 1.1 pk goto bad;
219 1.1 pk }
220 1.1 pk
221 1.1 pk /*
222 1.1 pk * Test if it's possible to change contents of the indirect registers.
223 1.9 mycroft * Registers 0 and 1 are ADC volume registers. The bit 0x10 is read
224 1.9 mycroft * only so try to avoid using it. The bit 0x20 is the mic preamp
225 1.9 mycroft * enable; on some chips it is always the same in both registers, so
226 1.9 mycroft * we avoid tests where they are different.
227 1.1 pk */
228 1.9 mycroft ad_write(sc, 0, 0x8a);
229 1.1 pk ad_write(sc, 1, 0x45); /* 0x55 with bit 0x10 clear */
230 1.9 mycroft tmp1 = ad_read(sc, 0);
231 1.9 mycroft tmp2 = ad_read(sc, 1);
232 1.1 pk
233 1.9 mycroft if (tmp1 != 0x8a || tmp2 != 0x45) {
234 1.1 pk DPRINTF(("ad_detect_B (%x/%x)\n", tmp1, tmp2));
235 1.1 pk goto bad;
236 1.1 pk }
237 1.1 pk
238 1.9 mycroft ad_write(sc, 0, 0x65);
239 1.1 pk ad_write(sc, 1, 0xaa);
240 1.9 mycroft tmp1 = ad_read(sc, 0);
241 1.9 mycroft tmp2 = ad_read(sc, 1);
242 1.1 pk
243 1.9 mycroft if (tmp1 != 0x65 || tmp2 != 0xaa) {
244 1.1 pk DPRINTF(("ad_detect_C (%x/%x)\n", tmp1, tmp2));
245 1.1 pk goto bad;
246 1.1 pk }
247 1.1 pk
248 1.1 pk /*
249 1.1 pk * The indirect register I12 has some read only bits. Lets
250 1.1 pk * try to change them.
251 1.1 pk */
252 1.1 pk tmp = ad_read(sc, SP_MISC_INFO);
253 1.1 pk ad_write(sc, SP_MISC_INFO, (~tmp) & 0x0f);
254 1.1 pk
255 1.19 itohy /* Here, AD1845 may sometimes be busy. Wait til it becomes ready. */
256 1.19 itohy for (t = 0; t < 100000 && ADREAD(sc, AD1848_IADDR) & SP_IN_INIT; t++)
257 1.19 itohy ;
258 1.19 itohy #ifdef AUDIO_DEBUG
259 1.19 itohy if (t)
260 1.19 itohy DPRINTF(("ad1848_isa_probe: t %d\n", t));
261 1.19 itohy #endif
262 1.19 itohy
263 1.1 pk if ((tmp & 0x0f) != ((tmp1 = ad_read(sc, SP_MISC_INFO)) & 0x0f)) {
264 1.1 pk DPRINTF(("ad_detect_D (%x)\n", tmp1));
265 1.1 pk goto bad;
266 1.1 pk }
267 1.1 pk
268 1.1 pk /*
269 1.1 pk * MSB and 4 LSBs of the reg I12 tell the chip revision.
270 1.1 pk *
271 1.1 pk * A preliminary version of the AD1846 data sheet stated that it
272 1.1 pk * used an ID field of 0x0B. The current version, however,
273 1.1 pk * states that the AD1846 uses ID 0x0A, just like the AD1848K.
274 1.1 pk *
275 1.1 pk * this switch statement will need updating as newer clones arrive....
276 1.1 pk */
277 1.1 pk switch (tmp1 & 0x8f) {
278 1.1 pk case 0x09:
279 1.1 pk sc->chip_name = "AD1848J";
280 1.1 pk break;
281 1.1 pk case 0x0A:
282 1.1 pk sc->chip_name = "AD1848K";
283 1.1 pk break;
284 1.1 pk #if 0 /* See above */
285 1.1 pk case 0x0B:
286 1.1 pk sc->chip_name = "AD1846";
287 1.1 pk break;
288 1.1 pk #endif
289 1.1 pk case 0x81:
290 1.1 pk sc->chip_name = "CS4248revB"; /* or CS4231 rev B; see below */
291 1.1 pk break;
292 1.1 pk case 0x89:
293 1.1 pk sc->chip_name = "CS4248";
294 1.1 pk break;
295 1.1 pk case 0x8A:
296 1.1 pk sc->chip_name = "broken"; /* CS4231/AD1845; see below */
297 1.1 pk break;
298 1.1 pk default:
299 1.1 pk sc->chip_name = "unknown";
300 1.1 pk DPRINTF(("ad1848: unknown codec version 0x%02x\n",
301 1.1 pk tmp1 & 0x8f));
302 1.1 pk break;
303 1.1 pk }
304 1.1 pk
305 1.1 pk /*
306 1.1 pk * The original AD1848/CS4248 has just 16 indirect registers. This
307 1.1 pk * means that I0 and I16 should return the same value (etc.).
308 1.1 pk * Ensure that the Mode2 enable bit of I12 is 0. Otherwise this test
309 1.1 pk * fails with CS4231, AD1845, etc.
310 1.1 pk */
311 1.1 pk ad_write(sc, SP_MISC_INFO, 0); /* Mode2 = disabled */
312 1.1 pk
313 1.1 pk for (i = 0; i < 16; i++)
314 1.1 pk if ((tmp1 = ad_read(sc, i)) != (tmp2 = ad_read(sc, i + 16))) {
315 1.9 mycroft if (i != SP_TEST_AND_INIT) {
316 1.9 mycroft DPRINTF(("ad_detect_F(%d/%x/%x)\n", i, tmp1, tmp2));
317 1.9 mycroft goto bad;
318 1.9 mycroft }
319 1.1 pk }
320 1.1 pk
321 1.1 pk /*
322 1.1 pk * Try to switch the chip to mode2 (CS4231) by setting the MODE2 bit
323 1.1 pk * The bit 0x80 is always 1 in CS4248, CS4231, and AD1845.
324 1.1 pk */
325 1.1 pk ad_write(sc, SP_MISC_INFO, MODE2); /* Set mode2, clear 0x80 */
326 1.1 pk
327 1.1 pk tmp1 = ad_read(sc, SP_MISC_INFO);
328 1.1 pk if ((tmp1 & 0xc0) == (0x80 | MODE2)) {
329 1.1 pk /*
330 1.1 pk * CS4231 or AD1845 detected - is it?
331 1.1 pk *
332 1.1 pk * Verify that setting I2 doesn't change I18.
333 1.1 pk */
334 1.1 pk ad_write(sc, 18, 0x88); /* Set I18 to known value */
335 1.1 pk
336 1.1 pk ad_write(sc, 2, 0x45);
337 1.1 pk if ((tmp2 = ad_read(sc, 18)) != 0x45) { /* No change -> CS4231? */
338 1.1 pk ad_write(sc, 2, 0xaa);
339 1.1 pk if ((tmp2 = ad_read(sc, 18)) == 0xaa) { /* Rotten bits? */
340 1.1 pk DPRINTF(("ad_detect_H(%x)\n", tmp2));
341 1.1 pk goto bad;
342 1.1 pk }
343 1.1 pk
344 1.12 rh sc->mode = 2;
345 1.12 rh
346 1.1 pk /*
347 1.1 pk * It's a CS4231, or another clone with 32 registers.
348 1.1 pk * Let's find out which by checking I25.
349 1.1 pk */
350 1.1 pk if ((tmp1 & 0x8f) == 0x8a) {
351 1.1 pk tmp1 = ad_read(sc, CS_VERSION_ID);
352 1.1 pk switch (tmp1 & 0xe7) {
353 1.1 pk case 0xA0:
354 1.1 pk sc->chip_name = "CS4231A";
355 1.1 pk break;
356 1.1 pk case 0x80:
357 1.1 pk /* XXX I25 no good, AD1845 same as CS4231 */
358 1.19 itohy /*
359 1.19 itohy * XXX
360 1.19 itohy * This test is correct only after reset
361 1.19 itohy */
362 1.19 itohy if (ad_read(sc, 17) & 0xf0) {
363 1.19 itohy sc->chip_name = "AD1845";
364 1.19 itohy sc->is_ad1845 = 1;
365 1.19 itohy } else
366 1.19 itohy sc->chip_name = "CS4231";
367 1.1 pk break;
368 1.1 pk case 0x82:
369 1.1 pk sc->chip_name = "CS4232";
370 1.1 pk break;
371 1.1 pk case 0x03:
372 1.4 hannken case 0x83:
373 1.12 rh sc->chip_name = "CS4236";
374 1.12 rh
375 1.12 rh /*
376 1.12 rh * Try to switch to mode3 (CS4236B or
377 1.12 rh * CS4237B) by setting CMS to 3. A
378 1.12 rh * plain CS4236 will not react to
379 1.12 rh * LLBM settings.
380 1.12 rh */
381 1.12 rh ad_write(sc, SP_MISC_INFO, MODE3);
382 1.12 rh
383 1.12 rh tmp1 = ad_read(sc, CS_LEFT_LINE_CONTROL);
384 1.12 rh ad_write(sc, CS_LEFT_LINE_CONTROL, 0xe0);
385 1.12 rh tmp2 = ad_read(sc, CS_LEFT_LINE_CONTROL);
386 1.12 rh if (tmp2 == 0xe0) {
387 1.12 rh /*
388 1.12 rh * it's a CS4237B or another
389 1.12 rh * clone supporting mode 3.
390 1.12 rh * Let's determine which by
391 1.12 rh * enabling extended registers
392 1.12 rh * and checking X25.
393 1.12 rh */
394 1.12 rh tmp2 = ad_xread(sc, CS_X_CHIP_VERSION);
395 1.12 rh switch (tmp2 & X_CHIP_VERSIONF_CID) {
396 1.12 rh case X_CHIP_CID_CS4236BB:
397 1.12 rh sc->chip_name = "CS4236BrevB";
398 1.12 rh break;
399 1.12 rh case X_CHIP_CID_CS4236B:
400 1.12 rh sc->chip_name = "CS4236B";
401 1.12 rh break;
402 1.12 rh case X_CHIP_CID_CS4237B:
403 1.12 rh sc->chip_name = "CS4237B";
404 1.12 rh break;
405 1.12 rh default:
406 1.12 rh sc->chip_name = "CS4236B compatible";
407 1.12 rh DPRINTF(("cs4236: unknown mode 3 compatible codec, version 0x%02x\n", tmp2));
408 1.12 rh break;
409 1.12 rh }
410 1.12 rh sc->mode = 3;
411 1.12 rh }
412 1.12 rh
413 1.12 rh /* restore volume control information */
414 1.12 rh ad_write(sc, CS_LEFT_LINE_CONTROL, tmp1);
415 1.1 pk break;
416 1.1 pk }
417 1.1 pk }
418 1.1 pk }
419 1.1 pk }
420 1.1 pk
421 1.1 pk /* Wait for 1848 to init */
422 1.1 pk while(ADREAD(sc, AD1848_IADDR) & SP_IN_INIT)
423 1.1 pk ;
424 1.1 pk
425 1.1 pk /* Wait for 1848 to autocal */
426 1.1 pk ADWRITE(sc, AD1848_IADDR, SP_TEST_AND_INIT);
427 1.1 pk while(ADREAD(sc, AD1848_IDATA) & AUTO_CAL_IN_PROG)
428 1.1 pk ;
429 1.1 pk
430 1.1 pk return 1;
431 1.9 mycroft bad:
432 1.1 pk return 0;
433 1.1 pk }
434 1.1 pk
435 1.1 pk /* Unmap the I/O ports */
436 1.1 pk void
437 1.1 pk ad1848_isa_unmap(isc)
438 1.1 pk struct ad1848_isa_softc *isc;
439 1.1 pk {
440 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
441 1.1 pk bus_space_unmap(sc->sc_iot, sc->sc_ioh, AD1848_NPORT);
442 1.1 pk }
443 1.1 pk
444 1.1 pk /*
445 1.1 pk * Attach hardware to driver, attach hardware driver to audio
446 1.1 pk * pseudo-device driver .
447 1.1 pk */
448 1.1 pk void
449 1.1 pk ad1848_isa_attach(isc)
450 1.1 pk struct ad1848_isa_softc *isc;
451 1.1 pk {
452 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
453 1.23 fvdl int error;
454 1.1 pk
455 1.1 pk sc->sc_readreg = ad1848_isa_read;
456 1.1 pk sc->sc_writereg = ad1848_isa_write;
457 1.1 pk
458 1.23 fvdl if (isc->sc_playdrq != -1) {
459 1.14 thorpej isc->sc_play_maxsize = isa_dmamaxsize(isc->sc_ic,
460 1.14 thorpej isc->sc_playdrq);
461 1.23 fvdl error = isa_dmamap_create(isc->sc_ic, isc->sc_playdrq,
462 1.23 fvdl isc->sc_play_maxsize, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW);
463 1.23 fvdl if (error) {
464 1.23 fvdl printf("%s: can't create map for drq %d\n",
465 1.23 fvdl sc->sc_dev.dv_xname, isc->sc_playdrq);
466 1.23 fvdl return;
467 1.23 fvdl }
468 1.23 fvdl }
469 1.23 fvdl if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq) {
470 1.14 thorpej isc->sc_rec_maxsize = isa_dmamaxsize(isc->sc_ic,
471 1.14 thorpej isc->sc_recdrq);
472 1.23 fvdl error = isa_dmamap_create(isc->sc_ic, isc->sc_recdrq,
473 1.23 fvdl isc->sc_rec_maxsize, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW);
474 1.23 fvdl if (error) {
475 1.23 fvdl printf("%s: can't create map for drq %d\n",
476 1.23 fvdl sc->sc_dev.dv_xname, isc->sc_recdrq);
477 1.23 fvdl isa_dmamap_destroy(isc->sc_ic, isc->sc_playdrq);
478 1.23 fvdl return;
479 1.23 fvdl }
480 1.23 fvdl }
481 1.14 thorpej
482 1.11 mycroft ad1848_attach(sc);
483 1.11 mycroft }
484 1.11 mycroft
485 1.11 mycroft int
486 1.11 mycroft ad1848_isa_open(addr, flags)
487 1.11 mycroft void *addr;
488 1.11 mycroft int flags;
489 1.11 mycroft {
490 1.11 mycroft struct ad1848_isa_softc *isc = addr;
491 1.11 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
492 1.11 mycroft int error, state;
493 1.11 mycroft
494 1.11 mycroft DPRINTF(("ad1848_isa_open: sc=%p\n", isc));
495 1.11 mycroft state = 0;
496 1.1 pk
497 1.6 mycroft if (isc->sc_playdrq != -1) {
498 1.23 fvdl error = isa_drq_alloc(isc->sc_ic, isc->sc_playdrq);
499 1.23 fvdl if (error != 0)
500 1.23 fvdl return EBUSY;
501 1.11 mycroft state |= 1;
502 1.1 pk }
503 1.6 mycroft if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq) {
504 1.23 fvdl error = isa_drq_alloc(isc->sc_ic, isc->sc_recdrq);
505 1.23 fvdl if (error != 0)
506 1.11 mycroft goto bad;
507 1.11 mycroft state |= 2;
508 1.1 pk }
509 1.1 pk
510 1.13 itohy #ifndef AUDIO_NO_POWER_CTL
511 1.13 itohy /* Power-up chip */
512 1.13 itohy if (isc->powerctl)
513 1.13 itohy isc->powerctl(isc->powerarg, flags);
514 1.13 itohy #endif
515 1.13 itohy
516 1.13 itohy /* Init and mute wave output */
517 1.13 itohy ad1848_mute_wave_output(sc, WAVE_MUTE2_INIT, 1);
518 1.13 itohy
519 1.11 mycroft error = ad1848_open(sc, flags);
520 1.13 itohy if (error) {
521 1.13 itohy #ifndef AUDIO_NO_POWER_CTL
522 1.13 itohy if (isc->powerctl)
523 1.13 itohy isc->powerctl(isc->powerarg, 0);
524 1.13 itohy #endif
525 1.11 mycroft goto bad;
526 1.13 itohy }
527 1.1 pk
528 1.11 mycroft DPRINTF(("ad1848_isa_open: opened\n"));
529 1.11 mycroft return (0);
530 1.1 pk
531 1.11 mycroft bad:
532 1.11 mycroft if (state & 1)
533 1.23 fvdl isa_drq_free(isc->sc_ic, isc->sc_playdrq);
534 1.11 mycroft if (state & 2)
535 1.23 fvdl isa_drq_free(isc->sc_ic, isc->sc_recdrq);
536 1.1 pk
537 1.11 mycroft return (error);
538 1.1 pk }
539 1.1 pk
540 1.1 pk /*
541 1.1 pk * Close function is called at splaudio().
542 1.1 pk */
543 1.1 pk void
544 1.1 pk ad1848_isa_close(addr)
545 1.1 pk void *addr;
546 1.1 pk {
547 1.11 mycroft struct ad1848_isa_softc *isc = addr;
548 1.11 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
549 1.11 mycroft
550 1.1 pk DPRINTF(("ad1848_isa_close: stop DMA\n"));
551 1.11 mycroft ad1848_close(sc);
552 1.13 itohy
553 1.13 itohy #ifndef AUDIO_NO_POWER_CTL
554 1.13 itohy /* Power-down chip */
555 1.13 itohy if (isc->powerctl)
556 1.13 itohy isc->powerctl(isc->powerarg, 0);
557 1.13 itohy #endif
558 1.26 mycroft
559 1.26 mycroft if (isc->sc_playdrq != -1)
560 1.26 mycroft isa_drq_free(isc->sc_ic, isc->sc_playdrq);
561 1.26 mycroft if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq)
562 1.26 mycroft isa_drq_free(isc->sc_ic, isc->sc_recdrq);
563 1.1 pk }
564 1.1 pk
565 1.1 pk int
566 1.6 mycroft ad1848_isa_trigger_input(addr, start, end, blksize, intr, arg, param)
567 1.1 pk void *addr;
568 1.6 mycroft void *start, *end;
569 1.6 mycroft int blksize;
570 1.1 pk void (*intr) __P((void *));
571 1.1 pk void *arg;
572 1.27 kent const audio_params_t *param;
573 1.1 pk {
574 1.1 pk struct ad1848_isa_softc *isc = addr;
575 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
576 1.6 mycroft u_int8_t reg;
577 1.1 pk
578 1.6 mycroft isa_dmastart(isc->sc_ic, isc->sc_recdrq, start,
579 1.8 mycroft (char *)end - (char *)start, NULL,
580 1.8 mycroft DMAMODE_READ | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
581 1.1 pk
582 1.6 mycroft isc->sc_recrun = 1;
583 1.17 thorpej if (sc->mode == 2 && isc->sc_playdrq != isc->sc_recdrq) {
584 1.17 thorpej isc->sc_rintr = intr;
585 1.17 thorpej isc->sc_rarg = arg;
586 1.17 thorpej } else {
587 1.17 thorpej isc->sc_pintr = intr;
588 1.17 thorpej isc->sc_parg = arg;
589 1.17 thorpej }
590 1.1 pk
591 1.27 kent /*
592 1.21 itohy * Calculate number of transfers.
593 1.21 itohy * Note that ADPCM is always transferred 4 bytes at at a time.
594 1.21 itohy */
595 1.21 itohy blksize = (param->encoding == AUDIO_ENCODING_ADPCM) ? blksize / 4 - 1 :
596 1.27 kent (blksize * 8) / (param->precision * param->channels) - 1;
597 1.1 pk
598 1.12 rh if (sc->mode >= 2) {
599 1.6 mycroft ad_write(sc, CS_LOWER_REC_CNT, blksize & 0xff);
600 1.6 mycroft ad_write(sc, CS_UPPER_REC_CNT, blksize >> 8);
601 1.6 mycroft } else {
602 1.6 mycroft ad_write(sc, SP_LOWER_BASE_COUNT, blksize & 0xff);
603 1.6 mycroft ad_write(sc, SP_UPPER_BASE_COUNT, blksize >> 8);
604 1.1 pk }
605 1.1 pk
606 1.6 mycroft reg = ad_read(sc, SP_INTERFACE_CONFIG);
607 1.6 mycroft ad_write(sc, SP_INTERFACE_CONFIG, CAPTURE_ENABLE|reg);
608 1.1 pk
609 1.6 mycroft return (0);
610 1.1 pk }
611 1.1 pk
612 1.1 pk int
613 1.6 mycroft ad1848_isa_trigger_output(addr, start, end, blksize, intr, arg, param)
614 1.1 pk void *addr;
615 1.6 mycroft void *start, *end;
616 1.6 mycroft int blksize;
617 1.1 pk void (*intr) __P((void *));
618 1.1 pk void *arg;
619 1.27 kent const audio_params_t *param;
620 1.1 pk {
621 1.1 pk struct ad1848_isa_softc *isc = addr;
622 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
623 1.6 mycroft u_int8_t reg;
624 1.1 pk
625 1.6 mycroft isa_dmastart(isc->sc_ic, isc->sc_playdrq, start,
626 1.8 mycroft (char *)end - (char *)start, NULL,
627 1.8 mycroft DMAMODE_WRITE | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
628 1.1 pk
629 1.6 mycroft isc->sc_playrun = 1;
630 1.17 thorpej isc->sc_pintr = intr;
631 1.17 thorpej isc->sc_parg = arg;
632 1.1 pk
633 1.27 kent /*
634 1.21 itohy * Calculate number of transfers.
635 1.21 itohy * Note that ADPCM is always transferred 4 bytes at at a time.
636 1.21 itohy */
637 1.21 itohy blksize = (param->encoding == AUDIO_ENCODING_ADPCM) ? blksize / 4 - 1 :
638 1.27 kent (blksize * 8) / (param->precision * param->channels) - 1;
639 1.1 pk
640 1.6 mycroft ad_write(sc, SP_LOWER_BASE_COUNT, blksize & 0xff);
641 1.6 mycroft ad_write(sc, SP_UPPER_BASE_COUNT, blksize >> 8);
642 1.1 pk
643 1.13 itohy /* Unmute wave output */
644 1.13 itohy ad1848_mute_wave_output(sc, WAVE_MUTE2, 0);
645 1.13 itohy
646 1.6 mycroft reg = ad_read(sc, SP_INTERFACE_CONFIG);
647 1.6 mycroft ad_write(sc, SP_INTERFACE_CONFIG, PLAYBACK_ENABLE|reg);
648 1.7 mycroft
649 1.7 mycroft return (0);
650 1.7 mycroft }
651 1.7 mycroft
652 1.7 mycroft int
653 1.7 mycroft ad1848_isa_halt_input(addr)
654 1.7 mycroft void *addr;
655 1.7 mycroft {
656 1.7 mycroft struct ad1848_isa_softc *isc = addr;
657 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
658 1.7 mycroft
659 1.7 mycroft if (isc->sc_recrun) {
660 1.7 mycroft ad1848_halt_input(sc);
661 1.7 mycroft isa_dmaabort(isc->sc_ic, isc->sc_recdrq);
662 1.7 mycroft isc->sc_recrun = 0;
663 1.7 mycroft }
664 1.7 mycroft
665 1.7 mycroft return (0);
666 1.7 mycroft }
667 1.7 mycroft
668 1.7 mycroft int
669 1.7 mycroft ad1848_isa_halt_output(addr)
670 1.7 mycroft void *addr;
671 1.7 mycroft {
672 1.7 mycroft struct ad1848_isa_softc *isc = addr;
673 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
674 1.7 mycroft
675 1.7 mycroft if (isc->sc_playrun) {
676 1.13 itohy /* Mute wave output */
677 1.13 itohy ad1848_mute_wave_output(sc, WAVE_MUTE2, 1);
678 1.13 itohy
679 1.7 mycroft ad1848_halt_output(sc);
680 1.7 mycroft isa_dmaabort(isc->sc_ic, isc->sc_playdrq);
681 1.7 mycroft isc->sc_playrun = 0;
682 1.7 mycroft }
683 1.1 pk
684 1.6 mycroft return (0);
685 1.1 pk }
686 1.1 pk
687 1.1 pk int
688 1.1 pk ad1848_isa_intr(arg)
689 1.1 pk void *arg;
690 1.1 pk {
691 1.1 pk struct ad1848_isa_softc *isc = arg;
692 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
693 1.1 pk int retval = 0;
694 1.1 pk u_char status;
695 1.1 pk
696 1.1 pk /* Get intr status */
697 1.1 pk status = ADREAD(sc, AD1848_STATUS);
698 1.1 pk
699 1.1 pk #ifdef AUDIO_DEBUG
700 1.1 pk if (ad1848debug > 1)
701 1.18 thorpej printf("ad1848_isa_intr: pintr=%p rintr=%p status=%x\n",
702 1.18 thorpej isc->sc_pintr, isc->sc_rintr, status);
703 1.1 pk #endif
704 1.1 pk isc->sc_interrupts++;
705 1.1 pk
706 1.1 pk /* Handle interrupt */
707 1.17 thorpej if ((status & INTERRUPT_STATUS) != 0) {
708 1.17 thorpej if (sc->mode == 2 && isc->sc_playdrq != isc->sc_recdrq) {
709 1.17 thorpej status = ad_read(sc, CS_IRQ_STATUS);
710 1.25 mycroft if ((status & CS_IRQ_PI) && isc->sc_playrun) {
711 1.17 thorpej (*isc->sc_pintr)(isc->sc_parg);
712 1.17 thorpej retval = 1;
713 1.17 thorpej }
714 1.25 mycroft if ((status & CS_IRQ_CI) && isc->sc_recrun) {
715 1.17 thorpej (*isc->sc_rintr)(isc->sc_rarg);
716 1.17 thorpej retval = 1;
717 1.17 thorpej }
718 1.17 thorpej } else {
719 1.25 mycroft if (isc->sc_playrun) {
720 1.17 thorpej (*isc->sc_pintr)(isc->sc_parg);
721 1.17 thorpej retval = 1;
722 1.17 thorpej }
723 1.17 thorpej }
724 1.1 pk
725 1.17 thorpej /* Clear interrupt */
726 1.1 pk ADWRITE(sc, AD1848_STATUS, 0);
727 1.17 thorpej }
728 1.1 pk return(retval);
729 1.1 pk }
730 1.1 pk
731 1.1 pk void *
732 1.5 mycroft ad1848_isa_malloc(addr, direction, size, pool, flags)
733 1.1 pk void *addr;
734 1.5 mycroft int direction;
735 1.5 mycroft size_t size;
736 1.22 thorpej struct malloc_type *pool;
737 1.22 thorpej int flags;
738 1.1 pk {
739 1.1 pk struct ad1848_isa_softc *isc = addr;
740 1.5 mycroft int drq;
741 1.1 pk
742 1.5 mycroft if (direction == AUMODE_PLAY)
743 1.6 mycroft drq = isc->sc_playdrq;
744 1.5 mycroft else
745 1.5 mycroft drq = isc->sc_recdrq;
746 1.5 mycroft return (isa_malloc(isc->sc_ic, drq, size, pool, flags));
747 1.1 pk }
748 1.1 pk
749 1.1 pk void
750 1.1 pk ad1848_isa_free(addr, ptr, pool)
751 1.1 pk void *addr;
752 1.1 pk void *ptr;
753 1.22 thorpej struct malloc_type *pool;
754 1.1 pk {
755 1.1 pk isa_free(ptr, pool);
756 1.1 pk }
757 1.1 pk
758 1.5 mycroft size_t
759 1.5 mycroft ad1848_isa_round_buffersize(addr, direction, size)
760 1.1 pk void *addr;
761 1.5 mycroft int direction;
762 1.5 mycroft size_t size;
763 1.1 pk {
764 1.14 thorpej struct ad1848_isa_softc *isc = addr;
765 1.14 thorpej bus_size_t maxsize;
766 1.14 thorpej
767 1.14 thorpej if (direction == AUMODE_PLAY)
768 1.14 thorpej maxsize = isc->sc_play_maxsize;
769 1.14 thorpej else if (isc->sc_recdrq == isc->sc_playdrq)
770 1.14 thorpej maxsize = isc->sc_play_maxsize;
771 1.14 thorpej else
772 1.14 thorpej maxsize = isc->sc_rec_maxsize;
773 1.14 thorpej
774 1.14 thorpej if (size > maxsize)
775 1.14 thorpej size = maxsize;
776 1.5 mycroft return (size);
777 1.1 pk }
778 1.1 pk
779 1.15 simonb paddr_t
780 1.1 pk ad1848_isa_mappage(addr, mem, off, prot)
781 1.1 pk void *addr;
782 1.1 pk void *mem;
783 1.15 simonb off_t off;
784 1.1 pk int prot;
785 1.1 pk {
786 1.1 pk return isa_mappage(mem, off, prot);
787 1.1 pk }
788 1.1 pk
789 1.1 pk int
790 1.1 pk ad1848_isa_get_props(addr)
791 1.1 pk void *addr;
792 1.1 pk {
793 1.1 pk struct ad1848_isa_softc *isc = addr;
794 1.1 pk
795 1.1 pk return (AUDIO_PROP_MMAP |
796 1.6 mycroft (isc->sc_playdrq != isc->sc_recdrq ? AUDIO_PROP_FULLDUPLEX : 0));
797 1.1 pk }
798