ad1848_isa.c revision 1.14 1 1.14 thorpej /* $NetBSD: ad1848_isa.c,v 1.14 2000/02/07 22:07:30 thorpej 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.1 pk
104 1.1 pk #include <sys/param.h>
105 1.1 pk #include <sys/systm.h>
106 1.1 pk #include <sys/errno.h>
107 1.1 pk #include <sys/ioctl.h>
108 1.1 pk #include <sys/syslog.h>
109 1.1 pk #include <sys/device.h>
110 1.1 pk #include <sys/proc.h>
111 1.1 pk #include <sys/buf.h>
112 1.1 pk
113 1.1 pk #include <machine/cpu.h>
114 1.1 pk #include <machine/bus.h>
115 1.1 pk
116 1.1 pk #include <sys/audioio.h>
117 1.1 pk #include <vm/vm.h>
118 1.1 pk
119 1.1 pk #include <dev/audio_if.h>
120 1.1 pk #include <dev/auconv.h>
121 1.1 pk
122 1.1 pk #include <dev/isa/isavar.h>
123 1.1 pk #include <dev/isa/isadmavar.h>
124 1.1 pk
125 1.1 pk #include <dev/ic/ad1848reg.h>
126 1.1 pk #include <dev/ic/cs4231reg.h>
127 1.12 rh #include <dev/ic/cs4237reg.h>
128 1.1 pk #include <dev/isa/ad1848var.h>
129 1.1 pk #include <dev/isa/cs4231var.h>
130 1.1 pk
131 1.1 pk #ifdef AUDIO_DEBUG
132 1.1 pk #define DPRINTF(x) if (ad1848debug) printf x
133 1.1 pk extern int ad1848debug;
134 1.1 pk #else
135 1.1 pk #define DPRINTF(x)
136 1.1 pk #endif
137 1.1 pk
138 1.1 pk static int ad1848_isa_read __P(( struct ad1848_softc *, int));
139 1.1 pk static void ad1848_isa_write __P(( struct ad1848_softc *, int, int));
140 1.1 pk
141 1.1 pk int
142 1.1 pk ad1848_isa_read(sc, index)
143 1.1 pk struct ad1848_softc *sc;
144 1.1 pk int index;
145 1.1 pk {
146 1.11 mycroft return (bus_space_read_1(sc->sc_iot, sc->sc_ioh, index));
147 1.1 pk }
148 1.1 pk
149 1.1 pk void
150 1.1 pk ad1848_isa_write(sc, index, value)
151 1.1 pk struct ad1848_softc *sc;
152 1.1 pk int index;
153 1.1 pk int value;
154 1.1 pk {
155 1.11 mycroft bus_space_write_1(sc->sc_iot, sc->sc_ioh, index, value);
156 1.1 pk }
157 1.1 pk
158 1.1 pk /*
159 1.1 pk * Map and probe for the ad1848 chip
160 1.1 pk */
161 1.1 pk int
162 1.1 pk ad1848_isa_mapprobe(isc, iobase)
163 1.1 pk struct ad1848_isa_softc *isc;
164 1.1 pk int iobase;
165 1.1 pk {
166 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
167 1.1 pk
168 1.1 pk if (!AD1848_BASE_VALID(iobase)) {
169 1.1 pk #ifdef AUDIO_DEBUG
170 1.1 pk printf("ad1848: configured iobase %04x invalid\n", iobase);
171 1.1 pk #endif
172 1.1 pk return 0;
173 1.1 pk }
174 1.1 pk
175 1.1 pk /* Map the AD1848 ports */
176 1.1 pk if (bus_space_map(sc->sc_iot, iobase, AD1848_NPORT, 0, &sc->sc_ioh))
177 1.1 pk return 0;
178 1.1 pk
179 1.1 pk if (!ad1848_isa_probe(isc)) {
180 1.1 pk bus_space_unmap(sc->sc_iot, sc->sc_ioh, AD1848_NPORT);
181 1.1 pk return 0;
182 1.1 pk } else
183 1.1 pk return 1;
184 1.1 pk }
185 1.1 pk
186 1.1 pk /*
187 1.1 pk * Probe for the ad1848 chip
188 1.1 pk */
189 1.1 pk int
190 1.1 pk ad1848_isa_probe(isc)
191 1.1 pk struct ad1848_isa_softc *isc;
192 1.1 pk {
193 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
194 1.1 pk u_char tmp, tmp1 = 0xff, tmp2 = 0xff;
195 1.1 pk int i;
196 1.1 pk
197 1.1 pk sc->sc_readreg = ad1848_isa_read;
198 1.1 pk sc->sc_writereg = ad1848_isa_write;
199 1.1 pk
200 1.1 pk /* Is there an ad1848 chip ? */
201 1.1 pk sc->MCE_bit = MODE_CHANGE_ENABLE;
202 1.1 pk sc->mode = 1; /* MODE 1 = original ad1848/ad1846/cs4248 */
203 1.1 pk
204 1.1 pk /*
205 1.1 pk * Check that the I/O address is in use.
206 1.1 pk *
207 1.1 pk * The SP_IN_INIT bit of the base I/O port is known to be 0 after the
208 1.1 pk * chip has performed its power-on initialization. Just assume
209 1.1 pk * this has happened before the OS is starting.
210 1.1 pk *
211 1.1 pk * If the I/O address is unused, inb() typically returns 0xff.
212 1.1 pk */
213 1.1 pk tmp = ADREAD(sc, AD1848_IADDR);
214 1.1 pk if (tmp & SP_IN_INIT) { /* Not a AD1848 */
215 1.1 pk DPRINTF(("ad_detect_A %x\n", tmp));
216 1.1 pk goto bad;
217 1.1 pk }
218 1.1 pk
219 1.1 pk /*
220 1.1 pk * Test if it's possible to change contents of the indirect registers.
221 1.9 mycroft * Registers 0 and 1 are ADC volume registers. The bit 0x10 is read
222 1.9 mycroft * only so try to avoid using it. The bit 0x20 is the mic preamp
223 1.9 mycroft * enable; on some chips it is always the same in both registers, so
224 1.9 mycroft * we avoid tests where they are different.
225 1.1 pk */
226 1.9 mycroft ad_write(sc, 0, 0x8a);
227 1.1 pk ad_write(sc, 1, 0x45); /* 0x55 with bit 0x10 clear */
228 1.9 mycroft tmp1 = ad_read(sc, 0);
229 1.9 mycroft tmp2 = ad_read(sc, 1);
230 1.1 pk
231 1.9 mycroft if (tmp1 != 0x8a || tmp2 != 0x45) {
232 1.1 pk DPRINTF(("ad_detect_B (%x/%x)\n", tmp1, tmp2));
233 1.1 pk goto bad;
234 1.1 pk }
235 1.1 pk
236 1.9 mycroft ad_write(sc, 0, 0x65);
237 1.1 pk ad_write(sc, 1, 0xaa);
238 1.9 mycroft tmp1 = ad_read(sc, 0);
239 1.9 mycroft tmp2 = ad_read(sc, 1);
240 1.1 pk
241 1.9 mycroft if (tmp1 != 0x65 || tmp2 != 0xaa) {
242 1.1 pk DPRINTF(("ad_detect_C (%x/%x)\n", tmp1, tmp2));
243 1.1 pk goto bad;
244 1.1 pk }
245 1.1 pk
246 1.1 pk /*
247 1.1 pk * The indirect register I12 has some read only bits. Lets
248 1.1 pk * try to change them.
249 1.1 pk */
250 1.1 pk tmp = ad_read(sc, SP_MISC_INFO);
251 1.1 pk ad_write(sc, SP_MISC_INFO, (~tmp) & 0x0f);
252 1.1 pk
253 1.1 pk if ((tmp & 0x0f) != ((tmp1 = ad_read(sc, SP_MISC_INFO)) & 0x0f)) {
254 1.1 pk DPRINTF(("ad_detect_D (%x)\n", tmp1));
255 1.1 pk goto bad;
256 1.1 pk }
257 1.1 pk
258 1.1 pk /*
259 1.1 pk * MSB and 4 LSBs of the reg I12 tell the chip revision.
260 1.1 pk *
261 1.1 pk * A preliminary version of the AD1846 data sheet stated that it
262 1.1 pk * used an ID field of 0x0B. The current version, however,
263 1.1 pk * states that the AD1846 uses ID 0x0A, just like the AD1848K.
264 1.1 pk *
265 1.1 pk * this switch statement will need updating as newer clones arrive....
266 1.1 pk */
267 1.1 pk switch (tmp1 & 0x8f) {
268 1.1 pk case 0x09:
269 1.1 pk sc->chip_name = "AD1848J";
270 1.1 pk break;
271 1.1 pk case 0x0A:
272 1.1 pk sc->chip_name = "AD1848K";
273 1.1 pk break;
274 1.1 pk #if 0 /* See above */
275 1.1 pk case 0x0B:
276 1.1 pk sc->chip_name = "AD1846";
277 1.1 pk break;
278 1.1 pk #endif
279 1.1 pk case 0x81:
280 1.1 pk sc->chip_name = "CS4248revB"; /* or CS4231 rev B; see below */
281 1.1 pk break;
282 1.1 pk case 0x89:
283 1.1 pk sc->chip_name = "CS4248";
284 1.1 pk break;
285 1.1 pk case 0x8A:
286 1.1 pk sc->chip_name = "broken"; /* CS4231/AD1845; see below */
287 1.1 pk break;
288 1.1 pk default:
289 1.1 pk sc->chip_name = "unknown";
290 1.1 pk DPRINTF(("ad1848: unknown codec version 0x%02x\n",
291 1.1 pk tmp1 & 0x8f));
292 1.1 pk break;
293 1.1 pk }
294 1.1 pk
295 1.1 pk /*
296 1.1 pk * The original AD1848/CS4248 has just 16 indirect registers. This
297 1.1 pk * means that I0 and I16 should return the same value (etc.).
298 1.1 pk * Ensure that the Mode2 enable bit of I12 is 0. Otherwise this test
299 1.1 pk * fails with CS4231, AD1845, etc.
300 1.1 pk */
301 1.1 pk ad_write(sc, SP_MISC_INFO, 0); /* Mode2 = disabled */
302 1.1 pk
303 1.1 pk for (i = 0; i < 16; i++)
304 1.1 pk if ((tmp1 = ad_read(sc, i)) != (tmp2 = ad_read(sc, i + 16))) {
305 1.9 mycroft if (i != SP_TEST_AND_INIT) {
306 1.9 mycroft DPRINTF(("ad_detect_F(%d/%x/%x)\n", i, tmp1, tmp2));
307 1.9 mycroft goto bad;
308 1.9 mycroft }
309 1.1 pk }
310 1.1 pk
311 1.1 pk /*
312 1.1 pk * Try to switch the chip to mode2 (CS4231) by setting the MODE2 bit
313 1.1 pk * The bit 0x80 is always 1 in CS4248, CS4231, and AD1845.
314 1.1 pk */
315 1.1 pk ad_write(sc, SP_MISC_INFO, MODE2); /* Set mode2, clear 0x80 */
316 1.1 pk
317 1.1 pk tmp1 = ad_read(sc, SP_MISC_INFO);
318 1.1 pk if ((tmp1 & 0xc0) == (0x80 | MODE2)) {
319 1.1 pk /*
320 1.1 pk * CS4231 or AD1845 detected - is it?
321 1.1 pk *
322 1.1 pk * Verify that setting I2 doesn't change I18.
323 1.1 pk */
324 1.1 pk ad_write(sc, 18, 0x88); /* Set I18 to known value */
325 1.1 pk
326 1.1 pk ad_write(sc, 2, 0x45);
327 1.1 pk if ((tmp2 = ad_read(sc, 18)) != 0x45) { /* No change -> CS4231? */
328 1.1 pk ad_write(sc, 2, 0xaa);
329 1.1 pk if ((tmp2 = ad_read(sc, 18)) == 0xaa) { /* Rotten bits? */
330 1.1 pk DPRINTF(("ad_detect_H(%x)\n", tmp2));
331 1.1 pk goto bad;
332 1.1 pk }
333 1.1 pk
334 1.12 rh sc->mode = 2;
335 1.12 rh
336 1.1 pk /*
337 1.1 pk * It's a CS4231, or another clone with 32 registers.
338 1.1 pk * Let's find out which by checking I25.
339 1.1 pk */
340 1.1 pk if ((tmp1 & 0x8f) == 0x8a) {
341 1.1 pk tmp1 = ad_read(sc, CS_VERSION_ID);
342 1.1 pk switch (tmp1 & 0xe7) {
343 1.1 pk case 0xA0:
344 1.1 pk sc->chip_name = "CS4231A";
345 1.1 pk break;
346 1.1 pk case 0x80:
347 1.1 pk /* XXX I25 no good, AD1845 same as CS4231 */
348 1.1 pk sc->chip_name = "CS4231 or AD1845";
349 1.1 pk break;
350 1.1 pk case 0x82:
351 1.1 pk sc->chip_name = "CS4232";
352 1.1 pk break;
353 1.1 pk case 0x03:
354 1.4 hannken case 0x83:
355 1.12 rh sc->chip_name = "CS4236";
356 1.12 rh
357 1.12 rh /*
358 1.12 rh * Try to switch to mode3 (CS4236B or
359 1.12 rh * CS4237B) by setting CMS to 3. A
360 1.12 rh * plain CS4236 will not react to
361 1.12 rh * LLBM settings.
362 1.12 rh */
363 1.12 rh ad_write(sc, SP_MISC_INFO, MODE3);
364 1.12 rh
365 1.12 rh tmp1 = ad_read(sc, CS_LEFT_LINE_CONTROL);
366 1.12 rh ad_write(sc, CS_LEFT_LINE_CONTROL, 0xe0);
367 1.12 rh tmp2 = ad_read(sc, CS_LEFT_LINE_CONTROL);
368 1.12 rh if (tmp2 == 0xe0) {
369 1.12 rh /*
370 1.12 rh * it's a CS4237B or another
371 1.12 rh * clone supporting mode 3.
372 1.12 rh * Let's determine which by
373 1.12 rh * enabling extended registers
374 1.12 rh * and checking X25.
375 1.12 rh */
376 1.12 rh tmp2 = ad_xread(sc, CS_X_CHIP_VERSION);
377 1.12 rh switch (tmp2 & X_CHIP_VERSIONF_CID) {
378 1.12 rh case X_CHIP_CID_CS4236BB:
379 1.12 rh sc->chip_name = "CS4236BrevB";
380 1.12 rh break;
381 1.12 rh case X_CHIP_CID_CS4236B:
382 1.12 rh sc->chip_name = "CS4236B";
383 1.12 rh break;
384 1.12 rh case X_CHIP_CID_CS4237B:
385 1.12 rh sc->chip_name = "CS4237B";
386 1.12 rh break;
387 1.12 rh default:
388 1.12 rh sc->chip_name = "CS4236B compatible";
389 1.12 rh DPRINTF(("cs4236: unknown mode 3 compatible codec, version 0x%02x\n", tmp2));
390 1.12 rh break;
391 1.12 rh }
392 1.12 rh sc->mode = 3;
393 1.12 rh }
394 1.12 rh
395 1.12 rh /* restore volume control information */
396 1.12 rh ad_write(sc, CS_LEFT_LINE_CONTROL, tmp1);
397 1.1 pk break;
398 1.1 pk }
399 1.1 pk }
400 1.1 pk }
401 1.1 pk }
402 1.1 pk
403 1.1 pk /* Wait for 1848 to init */
404 1.1 pk while(ADREAD(sc, AD1848_IADDR) & SP_IN_INIT)
405 1.1 pk ;
406 1.1 pk
407 1.1 pk /* Wait for 1848 to autocal */
408 1.1 pk ADWRITE(sc, AD1848_IADDR, SP_TEST_AND_INIT);
409 1.1 pk while(ADREAD(sc, AD1848_IDATA) & AUTO_CAL_IN_PROG)
410 1.1 pk ;
411 1.1 pk
412 1.1 pk return 1;
413 1.9 mycroft bad:
414 1.1 pk return 0;
415 1.1 pk }
416 1.1 pk
417 1.1 pk /* Unmap the I/O ports */
418 1.1 pk void
419 1.1 pk ad1848_isa_unmap(isc)
420 1.1 pk struct ad1848_isa_softc *isc;
421 1.1 pk {
422 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
423 1.1 pk bus_space_unmap(sc->sc_iot, sc->sc_ioh, AD1848_NPORT);
424 1.1 pk }
425 1.1 pk
426 1.1 pk /*
427 1.1 pk * Attach hardware to driver, attach hardware driver to audio
428 1.1 pk * pseudo-device driver .
429 1.1 pk */
430 1.1 pk void
431 1.1 pk ad1848_isa_attach(isc)
432 1.1 pk struct ad1848_isa_softc *isc;
433 1.1 pk {
434 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
435 1.1 pk
436 1.1 pk sc->sc_readreg = ad1848_isa_read;
437 1.1 pk sc->sc_writereg = ad1848_isa_write;
438 1.1 pk
439 1.14 thorpej if (isc->sc_playdrq != -1)
440 1.14 thorpej isc->sc_play_maxsize = isa_dmamaxsize(isc->sc_ic,
441 1.14 thorpej isc->sc_playdrq);
442 1.14 thorpej if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq)
443 1.14 thorpej isc->sc_rec_maxsize = isa_dmamaxsize(isc->sc_ic,
444 1.14 thorpej isc->sc_recdrq);
445 1.14 thorpej
446 1.11 mycroft ad1848_attach(sc);
447 1.11 mycroft }
448 1.11 mycroft
449 1.11 mycroft int
450 1.11 mycroft ad1848_isa_open(addr, flags)
451 1.11 mycroft void *addr;
452 1.11 mycroft int flags;
453 1.11 mycroft {
454 1.11 mycroft struct ad1848_isa_softc *isc = addr;
455 1.11 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
456 1.11 mycroft int error, state;
457 1.11 mycroft
458 1.11 mycroft DPRINTF(("ad1848_isa_open: sc=%p\n", isc));
459 1.11 mycroft state = 0;
460 1.1 pk
461 1.6 mycroft if (isc->sc_playdrq != -1) {
462 1.11 mycroft error = isa_dmamap_create(isc->sc_ic, isc->sc_playdrq,
463 1.14 thorpej isc->sc_play_maxsize, BUS_DMA_NOWAIT);
464 1.11 mycroft if (error) {
465 1.11 mycroft printf("%s: can't create map for drq %d\n",
466 1.11 mycroft sc->sc_dev.dv_xname, isc->sc_playdrq);
467 1.11 mycroft goto bad;
468 1.1 pk }
469 1.11 mycroft state |= 1;
470 1.1 pk }
471 1.6 mycroft if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq) {
472 1.11 mycroft error = isa_dmamap_create(isc->sc_ic, isc->sc_recdrq,
473 1.14 thorpej isc->sc_rec_maxsize, BUS_DMA_NOWAIT);
474 1.11 mycroft if (error) {
475 1.11 mycroft printf("%s: can't create map for drq %d\n",
476 1.11 mycroft sc->sc_dev.dv_xname, isc->sc_recdrq);
477 1.11 mycroft goto bad;
478 1.1 pk }
479 1.11 mycroft state |= 2;
480 1.1 pk }
481 1.1 pk
482 1.13 itohy #ifndef AUDIO_NO_POWER_CTL
483 1.13 itohy /* Power-up chip */
484 1.13 itohy if (isc->powerctl)
485 1.13 itohy isc->powerctl(isc->powerarg, flags);
486 1.13 itohy #endif
487 1.13 itohy
488 1.13 itohy /* Init and mute wave output */
489 1.13 itohy ad1848_mute_wave_output(sc, WAVE_MUTE2_INIT, 1);
490 1.13 itohy
491 1.11 mycroft error = ad1848_open(sc, flags);
492 1.13 itohy if (error) {
493 1.13 itohy #ifndef AUDIO_NO_POWER_CTL
494 1.13 itohy if (isc->powerctl)
495 1.13 itohy isc->powerctl(isc->powerarg, 0);
496 1.13 itohy #endif
497 1.11 mycroft goto bad;
498 1.13 itohy }
499 1.1 pk
500 1.11 mycroft DPRINTF(("ad1848_isa_open: opened\n"));
501 1.11 mycroft return (0);
502 1.1 pk
503 1.11 mycroft bad:
504 1.11 mycroft if (state & 1)
505 1.11 mycroft isa_dmamap_destroy(isc->sc_ic, isc->sc_playdrq);
506 1.11 mycroft if (state & 2)
507 1.11 mycroft isa_dmamap_destroy(isc->sc_ic, isc->sc_recdrq);
508 1.1 pk
509 1.11 mycroft return (error);
510 1.1 pk }
511 1.1 pk
512 1.1 pk /*
513 1.1 pk * Close function is called at splaudio().
514 1.1 pk */
515 1.1 pk void
516 1.1 pk ad1848_isa_close(addr)
517 1.1 pk void *addr;
518 1.1 pk {
519 1.11 mycroft struct ad1848_isa_softc *isc = addr;
520 1.11 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
521 1.11 mycroft
522 1.11 mycroft ad1848_isa_halt_output(isc);
523 1.11 mycroft ad1848_isa_halt_input(isc);
524 1.1 pk
525 1.11 mycroft isc->sc_intr = 0;
526 1.7 mycroft
527 1.11 mycroft if (isc->sc_playdrq != -1)
528 1.11 mycroft isa_dmamap_destroy(isc->sc_ic, isc->sc_playdrq);
529 1.11 mycroft if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq)
530 1.11 mycroft isa_dmamap_destroy(isc->sc_ic, isc->sc_recdrq);
531 1.1 pk
532 1.1 pk DPRINTF(("ad1848_isa_close: stop DMA\n"));
533 1.11 mycroft ad1848_close(sc);
534 1.13 itohy
535 1.13 itohy #ifndef AUDIO_NO_POWER_CTL
536 1.13 itohy /* Power-down chip */
537 1.13 itohy if (isc->powerctl)
538 1.13 itohy isc->powerctl(isc->powerarg, 0);
539 1.13 itohy #endif
540 1.1 pk }
541 1.1 pk
542 1.1 pk int
543 1.6 mycroft ad1848_isa_trigger_input(addr, start, end, blksize, intr, arg, param)
544 1.1 pk void *addr;
545 1.6 mycroft void *start, *end;
546 1.6 mycroft int blksize;
547 1.1 pk void (*intr) __P((void *));
548 1.1 pk void *arg;
549 1.6 mycroft struct audio_params *param;
550 1.1 pk {
551 1.1 pk struct ad1848_isa_softc *isc = addr;
552 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
553 1.6 mycroft u_int8_t reg;
554 1.1 pk
555 1.6 mycroft isa_dmastart(isc->sc_ic, isc->sc_recdrq, start,
556 1.8 mycroft (char *)end - (char *)start, NULL,
557 1.8 mycroft DMAMODE_READ | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
558 1.1 pk
559 1.6 mycroft isc->sc_recrun = 1;
560 1.1 pk isc->sc_intr = intr;
561 1.1 pk isc->sc_arg = arg;
562 1.1 pk
563 1.6 mycroft blksize = (blksize * 8) / (param->precision * param->factor * param->channels) - 1;
564 1.1 pk
565 1.12 rh if (sc->mode >= 2) {
566 1.6 mycroft ad_write(sc, CS_LOWER_REC_CNT, blksize & 0xff);
567 1.6 mycroft ad_write(sc, CS_UPPER_REC_CNT, blksize >> 8);
568 1.6 mycroft } else {
569 1.6 mycroft ad_write(sc, SP_LOWER_BASE_COUNT, blksize & 0xff);
570 1.6 mycroft ad_write(sc, SP_UPPER_BASE_COUNT, blksize >> 8);
571 1.1 pk }
572 1.1 pk
573 1.6 mycroft reg = ad_read(sc, SP_INTERFACE_CONFIG);
574 1.6 mycroft ad_write(sc, SP_INTERFACE_CONFIG, CAPTURE_ENABLE|reg);
575 1.1 pk
576 1.6 mycroft return (0);
577 1.1 pk }
578 1.1 pk
579 1.1 pk int
580 1.6 mycroft ad1848_isa_trigger_output(addr, start, end, blksize, intr, arg, param)
581 1.1 pk void *addr;
582 1.6 mycroft void *start, *end;
583 1.6 mycroft int blksize;
584 1.1 pk void (*intr) __P((void *));
585 1.1 pk void *arg;
586 1.6 mycroft struct audio_params *param;
587 1.1 pk {
588 1.1 pk struct ad1848_isa_softc *isc = addr;
589 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
590 1.6 mycroft u_int8_t reg;
591 1.1 pk
592 1.6 mycroft isa_dmastart(isc->sc_ic, isc->sc_playdrq, start,
593 1.8 mycroft (char *)end - (char *)start, NULL,
594 1.8 mycroft DMAMODE_WRITE | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
595 1.1 pk
596 1.6 mycroft isc->sc_playrun = 1;
597 1.1 pk isc->sc_intr = intr;
598 1.1 pk isc->sc_arg = arg;
599 1.1 pk
600 1.6 mycroft blksize = (blksize * 8) / (param->precision * param->factor * param->channels) - 1;
601 1.1 pk
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.13 itohy /* Unmute wave output */
606 1.13 itohy ad1848_mute_wave_output(sc, WAVE_MUTE2, 0);
607 1.13 itohy
608 1.6 mycroft reg = ad_read(sc, SP_INTERFACE_CONFIG);
609 1.6 mycroft ad_write(sc, SP_INTERFACE_CONFIG, PLAYBACK_ENABLE|reg);
610 1.7 mycroft
611 1.7 mycroft return (0);
612 1.7 mycroft }
613 1.7 mycroft
614 1.7 mycroft int
615 1.7 mycroft ad1848_isa_halt_input(addr)
616 1.7 mycroft void *addr;
617 1.7 mycroft {
618 1.7 mycroft struct ad1848_isa_softc *isc = addr;
619 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
620 1.7 mycroft
621 1.7 mycroft if (isc->sc_recrun) {
622 1.7 mycroft ad1848_halt_input(sc);
623 1.7 mycroft isa_dmaabort(isc->sc_ic, isc->sc_recdrq);
624 1.7 mycroft isc->sc_recrun = 0;
625 1.7 mycroft }
626 1.7 mycroft
627 1.7 mycroft return (0);
628 1.7 mycroft }
629 1.7 mycroft
630 1.7 mycroft int
631 1.7 mycroft ad1848_isa_halt_output(addr)
632 1.7 mycroft void *addr;
633 1.7 mycroft {
634 1.7 mycroft struct ad1848_isa_softc *isc = addr;
635 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
636 1.7 mycroft
637 1.7 mycroft if (isc->sc_playrun) {
638 1.13 itohy /* Mute wave output */
639 1.13 itohy ad1848_mute_wave_output(sc, WAVE_MUTE2, 1);
640 1.13 itohy
641 1.7 mycroft ad1848_halt_output(sc);
642 1.7 mycroft isa_dmaabort(isc->sc_ic, isc->sc_playdrq);
643 1.7 mycroft isc->sc_playrun = 0;
644 1.7 mycroft }
645 1.1 pk
646 1.6 mycroft return (0);
647 1.1 pk }
648 1.1 pk
649 1.1 pk int
650 1.1 pk ad1848_isa_intr(arg)
651 1.1 pk void *arg;
652 1.1 pk {
653 1.1 pk struct ad1848_isa_softc *isc = arg;
654 1.10 mycroft struct ad1848_softc *sc = &isc->sc_ad1848;
655 1.1 pk int retval = 0;
656 1.1 pk u_char status;
657 1.1 pk
658 1.1 pk /* Get intr status */
659 1.1 pk status = ADREAD(sc, AD1848_STATUS);
660 1.1 pk
661 1.1 pk #ifdef AUDIO_DEBUG
662 1.1 pk if (ad1848debug > 1)
663 1.2 jtk printf("ad1848_isa_intr: intr=%p status=%x\n", isc->sc_intr, status);
664 1.1 pk #endif
665 1.1 pk isc->sc_interrupts++;
666 1.1 pk
667 1.1 pk /* Handle interrupt */
668 1.1 pk if (isc->sc_intr && (status & INTERRUPT_STATUS)) {
669 1.1 pk (*isc->sc_intr)(isc->sc_arg);
670 1.1 pk retval = 1;
671 1.1 pk }
672 1.1 pk
673 1.1 pk /* clear interrupt */
674 1.1 pk if (status & INTERRUPT_STATUS)
675 1.1 pk ADWRITE(sc, AD1848_STATUS, 0);
676 1.1 pk
677 1.1 pk return(retval);
678 1.1 pk }
679 1.1 pk
680 1.1 pk void *
681 1.5 mycroft ad1848_isa_malloc(addr, direction, size, pool, flags)
682 1.1 pk void *addr;
683 1.5 mycroft int direction;
684 1.5 mycroft size_t size;
685 1.5 mycroft int pool, flags;
686 1.1 pk {
687 1.1 pk struct ad1848_isa_softc *isc = addr;
688 1.5 mycroft int drq;
689 1.1 pk
690 1.5 mycroft if (direction == AUMODE_PLAY)
691 1.6 mycroft drq = isc->sc_playdrq;
692 1.5 mycroft else
693 1.5 mycroft drq = isc->sc_recdrq;
694 1.5 mycroft return (isa_malloc(isc->sc_ic, drq, size, pool, flags));
695 1.1 pk }
696 1.1 pk
697 1.1 pk void
698 1.1 pk ad1848_isa_free(addr, ptr, pool)
699 1.1 pk void *addr;
700 1.1 pk void *ptr;
701 1.1 pk int pool;
702 1.1 pk {
703 1.1 pk isa_free(ptr, pool);
704 1.1 pk }
705 1.1 pk
706 1.5 mycroft size_t
707 1.5 mycroft ad1848_isa_round_buffersize(addr, direction, size)
708 1.1 pk void *addr;
709 1.5 mycroft int direction;
710 1.5 mycroft size_t size;
711 1.1 pk {
712 1.14 thorpej struct ad1848_isa_softc *isc = addr;
713 1.14 thorpej bus_size_t maxsize;
714 1.14 thorpej
715 1.14 thorpej if (direction == AUMODE_PLAY)
716 1.14 thorpej maxsize = isc->sc_play_maxsize;
717 1.14 thorpej else if (isc->sc_recdrq == isc->sc_playdrq)
718 1.14 thorpej maxsize = isc->sc_play_maxsize;
719 1.14 thorpej else
720 1.14 thorpej maxsize = isc->sc_rec_maxsize;
721 1.14 thorpej
722 1.14 thorpej if (size > maxsize)
723 1.14 thorpej size = maxsize;
724 1.5 mycroft return (size);
725 1.1 pk }
726 1.1 pk
727 1.1 pk int
728 1.1 pk ad1848_isa_mappage(addr, mem, off, prot)
729 1.1 pk void *addr;
730 1.1 pk void *mem;
731 1.1 pk int off;
732 1.1 pk int prot;
733 1.1 pk {
734 1.1 pk return isa_mappage(mem, off, prot);
735 1.1 pk }
736 1.1 pk
737 1.1 pk int
738 1.1 pk ad1848_isa_get_props(addr)
739 1.1 pk void *addr;
740 1.1 pk {
741 1.1 pk struct ad1848_isa_softc *isc = addr;
742 1.1 pk
743 1.1 pk return (AUDIO_PROP_MMAP |
744 1.6 mycroft (isc->sc_playdrq != isc->sc_recdrq ? AUDIO_PROP_FULLDUPLEX : 0));
745 1.1 pk }
746