xref: /openbsd/sys/dev/isa/ad1848.c (revision 5dea098c)
1 /*	$OpenBSD: ad1848.c,v 1.49 2024/04/13 23:44:11 jsg Exp $	*/
2 /*	$NetBSD: ad1848.c,v 1.45 1998/01/30 02:02:38 augustss Exp $	*/
3 
4 /*
5  * Copyright (c) 1994 John Brezak
6  * Copyright (c) 1991-1993 Regents of the University of California.
7  * All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. All advertising materials mentioning features or use of this software
18  *    must display the following acknowledgement:
19  *	This product includes software developed by the Computer Systems
20  *	Engineering Group at Lawrence Berkeley Laboratory.
21  * 4. Neither the name of the University nor of the Laboratory may be used
22  *    to endorse or promote products derived from this software without
23  *    specific prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35  * SUCH DAMAGE.
36  *
37  */
38 
39 /*
40  * Copyright by Hannu Savolainen 1994
41  *
42  * Redistribution and use in source and binary forms, with or without
43  * modification, are permitted provided that the following conditions are
44  * met: 1. Redistributions of source code must retain the above copyright
45  * notice, this list of conditions and the following disclaimer. 2.
46  * Redistributions in binary form must reproduce the above copyright notice,
47  * this list of conditions and the following disclaimer in the documentation
48  * and/or other materials provided with the distribution.
49  *
50  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND ANY
51  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
52  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
53  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
54  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
55  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
56  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
57  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
58  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
59  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
60  * SUCH DAMAGE.
61  *
62  */
63 /*
64  * Portions of this code are from the VOXware support for the ad1848
65  * by Hannu Savolainen <hannu@voxware.pp.fi>
66  *
67  * Portions also supplied from the SoundBlaster driver for NetBSD.
68  */
69 
70 #include <sys/param.h>
71 #include <sys/systm.h>
72 #include <sys/errno.h>
73 #include <sys/ioctl.h>
74 #include <sys/syslog.h>
75 #include <sys/device.h>
76 #include <sys/buf.h>
77 #include <sys/fcntl.h>
78 
79 #include <machine/cpu.h>
80 #include <machine/bus.h>
81 
82 #include <sys/audioio.h>
83 
84 #include <dev/audio_if.h>
85 
86 #include <dev/isa/isavar.h>
87 #include <dev/isa/isadmavar.h>
88 
89 #include <dev/ic/ad1848reg.h>
90 #include <dev/ic/cs4231reg.h>
91 #include <dev/isa/ad1848var.h>
92 #include <dev/isa/cs4231var.h>
93 
94 #ifdef AUDIO_DEBUG
95 #define DPRINTF(x)	do { if (ad1848debug) printf x; } while (0);
96 int	ad1848debug = 0;
97 #else
98 #define DPRINTF(x)
99 #endif
100 
101 /*
102  * Initial values for the indirect registers of CS4248/AD1848.
103  */
104 static int ad1848_init_values[] = {
105 	GAIN_12 | INPUT_MIC_GAIN_ENABLE,	/* Left Input Control */
106 	GAIN_12 | INPUT_MIC_GAIN_ENABLE,	/* Right Input Control */
107 	ATTEN_12,			/* Left Aux #1 Input Control */
108 	ATTEN_12,			/* Right Aux #1 Input Control */
109 	ATTEN_12,			/* Left Aux #2 Input Control */
110 	ATTEN_12,			/* Right Aux #2 Input Control */
111 	/* bits 5-0 are attenuation select */
112 	ATTEN_12,			/* Left DAC output Control */
113 	ATTEN_12,			/* Right DAC output Control */
114 	CLOCK_XTAL1 | FMT_PCM8,		/* Clock and Data Format */
115 	SINGLE_DMA | AUTO_CAL_ENABLE,	/* Interface Config */
116 	INTERRUPT_ENABLE,		/* Pin control */
117 	0x00,				/* Test and Init */
118 	MODE2,				/* Misc control */
119 	ATTEN_0 << 2,			/* Digital Mix Control */
120 	0,				/* Upper base Count */
121 	0,				/* Lower base Count */
122 
123 	/* These are for CS4231 &c. only (additional registers): */
124 	0,				/* Alt feature 1 */
125 	0,				/* Alt feature 2 */
126 	ATTEN_12,			/* Left line in */
127 	ATTEN_12,			/* Right line in */
128 	0,				/* Timer low */
129 	0,				/* Timer high */
130 	0,				/* unused */
131 	0,				/* unused */
132 	0,				/* IRQ status */
133 	0,				/* unused */
134 
135 	/* Mono input (a.k.a speaker) (mic) Control */
136 	MONO_INPUT_MUTE|ATTEN_6,	/* mute speaker by default */
137 	0,				/* unused */
138 	0,				/* record format */
139 	0,				/* Crystal Clock Select */
140 	0,				/* upper record count */
141 	0				/* lower record count */
142 };
143 
144 static struct audio_params ad1848_audio_default =
145 	{48000, AUDIO_ENCODING_SLINEAR_LE, 16, 2, 1, 2};
146 
147 void	ad1848_reset(struct ad1848_softc *);
148 int	ad1848_set_speed(struct ad1848_softc *, u_long *);
149 void	ad1848_mute_monitor(void *, int);
150 
151 /* indirect register access */
152 static int ad_read(struct ad1848_softc *, int);
153 static void ad_write(struct ad1848_softc *, int, int);
154 static void ad_set_MCE(struct ad1848_softc *, int);
155 static void wait_for_calibration(struct ad1848_softc *);
156 
157 /* direct register (AD1848_{IADDR,IDATA,STATUS} only) access */
158 #define ADREAD(sc, addr) bus_space_read_1((sc)->sc_iot, (sc)->sc_ioh, (sc)->sc_iooffs+(addr))
159 #define ADWRITE(sc, addr, data) bus_space_write_1((sc)->sc_iot, (sc)->sc_ioh, (sc)->sc_iooffs+(addr), (data))
160 
161 static int
162 ad_read(struct ad1848_softc *sc, int reg)
163 {
164 	int x;
165 
166 	ADWRITE(sc, AD1848_IADDR, (reg & 0xff) | sc->MCE_bit);
167 	x = ADREAD(sc, AD1848_IDATA);
168 	/*  printf("(%02x<-%02x) ", reg|sc->MCE_bit, x); */
169 
170 	return x;
171 }
172 
173 static void
174 ad_write(struct ad1848_softc *sc, int reg, int data)
175 {
176 	ADWRITE(sc, AD1848_IADDR, (reg & 0xff) | sc->MCE_bit);
177 	ADWRITE(sc, AD1848_IDATA, data & 0xff);
178 	/* printf("(%02x->%02x) ", reg|sc->MCE_bit, data); */
179 }
180 
181 static void
182 ad_set_MCE(struct ad1848_softc *sc, int state)
183 {
184 	if (state)
185 		sc->MCE_bit = MODE_CHANGE_ENABLE;
186 	else
187 		sc->MCE_bit = 0;
188 
189 	ADWRITE(sc, AD1848_IADDR, sc->MCE_bit);
190 }
191 
192 static void
193 wait_for_calibration(struct ad1848_softc *sc)
194 {
195 	int timeout;
196 
197 	DPRINTF(("ad1848: Auto calibration started.\n"));
198 	/*
199 	 * Wait until the auto calibration process has finished.
200 	 *
201 	 * 1) Wait until the chip becomes ready (reads don't return SP_IN_INIT).
202 	 * 2) Wait until the ACI bit of I11 goes hi and then lo.
203 	 *   a) With AD1848 alike, ACI goes hi within 5 sample cycles
204 	 *	  and remains hi for ~384 sample periods.
205 	 *   b) With CS4231 alike, ACI goes hi immediately and remains
206 	 *	  hi for at least 168 sample periods.
207 	 */
208 	timeout = AD1848_TIMO;
209 	while (timeout > 0 && ADREAD(sc, AD1848_IADDR) == SP_IN_INIT)
210 		timeout--;
211 
212 	if (ADREAD(sc, AD1848_IADDR) == SP_IN_INIT)
213 		DPRINTF(("ad1848: Auto calibration timed out(1).\n"));
214 
215 	if (!(sc->sc_flags & AD1848_FLAG_32REGS)) {
216 		timeout = AD1848_TIMO;
217 		while (timeout > 0 &&
218 	 	    !(ad_read(sc, SP_TEST_AND_INIT) & AUTO_CAL_IN_PROG))
219 			timeout--;
220 
221 		if (!(ad_read(sc, SP_TEST_AND_INIT) & AUTO_CAL_IN_PROG)) {
222 			DPRINTF(("ad1848: Auto calibration timed out(2).\n"));
223 		}
224 	}
225 
226 	timeout = AD1848_TIMO;
227 	while (timeout > 0 && ad_read(sc, SP_TEST_AND_INIT) & AUTO_CAL_IN_PROG)
228 		timeout--;
229 	if (ad_read(sc, SP_TEST_AND_INIT) & AUTO_CAL_IN_PROG)
230 		DPRINTF(("ad1848: Auto calibration timed out(3).\n"));
231 }
232 
233 #ifdef AUDIO_DEBUG
234 void ad1848_dump_regs(struct ad1848_softc *);
235 
236 void
237 ad1848_dump_regs(struct ad1848_softc *sc)
238 {
239 	int i;
240 	u_char r;
241 
242 	printf("ad1848 status=%02x", ADREAD(sc, AD1848_STATUS));
243 	printf(" regs: ");
244 	for (i = 0; i < 16; i++) {
245 		r = ad_read(sc, i);
246 		printf("%02x ", r);
247 	}
248 	if (sc->mode == 2) {
249 		for (i = 16; i < 32; i++) {
250 			r = ad_read(sc, i);
251 			printf("%02x ", r);
252 		}
253 	}
254 	printf("\n");
255 }
256 #endif
257 
258 /*
259  * Map and probe for the ad1848 chip
260  */
261 int
262 ad1848_mapprobe(struct ad1848_softc *sc, int iobase)
263 {
264 	if (!AD1848_BASE_VALID(iobase)) {
265 #ifdef AUDIO_DEBUG
266 		printf("ad1848: configured iobase %04x invalid\n", iobase);
267 #endif
268 		return 0;
269 	}
270 
271 	sc->sc_iooffs = 0;
272 	/* Map the AD1848 ports */
273 	if (bus_space_map(sc->sc_iot, iobase, AD1848_NPORT, 0, &sc->sc_ioh))
274 		return 0;
275 
276 	if (!ad1848_probe(sc)) {
277 		bus_space_unmap(sc->sc_iot, sc->sc_ioh, AD1848_NPORT);
278 		return 0;
279 	} else
280 		return 1;
281 }
282 
283 /*
284  * Probe for the ad1848 chip
285  */
286 int
287 ad1848_probe(struct ad1848_softc *sc)
288 {
289 	u_char tmp, tmp1 = 0xff, tmp2 = 0xff;
290 #if 0
291 	int i;
292 #endif
293 
294 	/* Is there an ad1848 chip ? */
295 	sc->MCE_bit = MODE_CHANGE_ENABLE;
296 	sc->mode = 1;	/* MODE 1 = original ad1848/ad1846/cs4248 */
297 	sc->sc_flags = 0;
298 
299 	/*
300 	 * Check that the I/O address is in use.
301 	 *
302 	 * The SP_IN_INIT bit of the base I/O port is known to be 0 after the
303 	 * chip has performed its power-on initialization. Just assume
304 	 * this has happened before the OS is starting.
305 	 *
306 	 * If the I/O address is unused, inb() typically returns 0xff.
307 	 */
308 	tmp = ADREAD(sc, AD1848_IADDR);
309 	if (tmp & SP_IN_INIT) { /* Not a AD1848 */
310 #if 0
311 		DPRINTF(("ad_detect_A %x\n", tmp));
312 #endif
313 		goto bad;
314 	}
315 
316 	/*
317 	 * Test if it's possible to change contents of the indirect registers.
318 	 * Registers 0 and 1 are ADC volume registers. The bit 0x10 is read
319 	 * only so try to avoid using it.
320 	 */
321 	ad_write(sc, 0, 0xaa);
322 	ad_write(sc, 1, 0x45);	/* 0x55 with bit 0x10 clear */
323 
324 	if ((tmp1 = ad_read(sc, 0)) != 0xaa ||
325 	    (tmp2 = ad_read(sc, 1)) != 0x45) {
326 		DPRINTF(("ad_detect_B (%x/%x)\n", tmp1, tmp2));
327 		goto bad;
328 	}
329 
330 	ad_write(sc, 0, 0x45);
331 	ad_write(sc, 1, 0xaa);
332 
333 	if ((tmp1 = ad_read(sc, 0)) != 0x45 ||
334 	    (tmp2 = ad_read(sc, 1)) != 0xaa) {
335 		DPRINTF(("ad_detect_C (%x/%x)\n", tmp1, tmp2));
336 		goto bad;
337 	}
338 
339 	/*
340 	 * The indirect register I12 has some read only bits. Lets
341 	 * try to change them.
342 	 */
343 	tmp = ad_read(sc, SP_MISC_INFO);
344 	ad_write(sc, SP_MISC_INFO, (~tmp) & 0x0f);
345 
346 	if ((tmp & 0x0f) != ((tmp1 = ad_read(sc, SP_MISC_INFO)) & 0x0f)) {
347 		DPRINTF(("ad_detect_D (%x)\n", tmp1));
348 		goto bad;
349 	}
350 
351 	/*
352 	 * MSB and 4 LSBs of the reg I12 tell the chip revision.
353 	 *
354 	 * A preliminary version of the AD1846 data sheet stated that it
355 	 * used an ID field of 0x0B.  The current version, however,
356 	 * states that the AD1846 uses ID 0x0A, just like the AD1848K.
357 	 *
358 	 * this switch statement will need updating as newer clones arrive....
359 	 */
360 	switch (tmp1 & 0x8f) {
361 	case 0x09:
362 		sc->chip_name = "AD1848J";
363 		break;
364 	case 0x0A:
365 		sc->chip_name = "AD1848K";
366 		break;
367 #if 0	/* See above */
368 	case 0x0B:
369 		sc->chip_name = "AD1846";
370 		break;
371 #endif
372 	case 0x81:
373 		sc->chip_name = "CS4248revB"; /* or CS4231 rev B; see below */
374 		break;
375 	case 0x89:
376 		sc->chip_name = "CS4248";
377 		break;
378 	case 0x8A:
379 		sc->chip_name = "broken"; /* CS4231/AD1845; see below */
380 		break;
381 	default:
382 		sc->chip_name = "unknown";
383 		DPRINTF(("ad1848: unknown codec version %#02X\n", (tmp1 & 0x8f)));
384 	}
385 
386 #if 0
387 	/*
388 	 * XXX I don't know why, but this probe fails on an otherwise
389 	 * well-working AW35/pro card, so I'll just take it out for now.
390 	 * [niklas@openbsd.org]
391 	 */
392 
393 	/*
394 	 * The original AD1848/CS4248 has just 16 indirect registers. This
395 	 * means that I0 and I16 should return the same value (etc.).
396 	 * Ensure that the Mode2 enable bit of I12 is 0. Otherwise this test
397 	 * fails with CS4231, AD1845, etc.
398 	 */
399 	ad_write(sc, SP_MISC_INFO, 0);	/* Mode2 = disabled */
400 
401 	for (i = 0; i < 16; i++) {
402 		if ((tmp1 = ad_read(sc, i)) != (tmp2 = ad_read(sc, i + 16))) {
403 			if (i != SP_TEST_AND_INIT) {
404 				DPRINTF(("ad_detect_F(%d/%x/%x)\n", i, tmp1, tmp2));
405 				goto bad;
406 			}
407 		}
408 	}
409 #endif
410 
411 	/*
412 	 * Try to switch the chip to mode2 (CS4231) by setting the MODE2 bit
413 	 * The bit 0x80 is always 1 in CS4248, CS4231, and AD1845.
414 	 */
415 	ad_write(sc, SP_MISC_INFO, MODE2);	/* Set mode2, clear 0x80 */
416 
417 	tmp1 = ad_read(sc, SP_MISC_INFO);
418 	if ((tmp1 & 0xc0) == (0x80 | MODE2)) {
419 		/*
420 		 *	CS4231 or AD1845 detected - is it?
421 		 *
422 		 *	Verify that setting I2 doesn't change I18.
423 		 */
424 		ad_write(sc, 18, 0x88); /* Set I18 to known value */
425 
426 		ad_write(sc, 2, 0x45);
427 		if ((tmp2 = ad_read(sc, 18)) != 0x45) {
428 			/* No change -> CS4231? */
429 			ad_write(sc, 2, 0xaa);
430 			if ((tmp2 = ad_read(sc, 18)) == 0xaa) {
431 				/* Rotten bits? */
432 				DPRINTF(("ad_detect_H(%x)\n", tmp2));
433 				goto bad;
434 			}
435 
436 			/*
437 			 *  It's a CS4231, or another clone with 32 registers.
438 			 *  Let's find out which by checking I25.
439 			 */
440 			if ((tmp1 & 0x8f) == 0x8a) {
441 				tmp1 = ad_read(sc, CS_VERSION_ID);
442 				switch (tmp1 & 0xe7) {
443 				case 0xA0:
444 					sc->chip_name = "CS4231A";
445 					break;
446 				case 0x80:
447 					/* I25 no good, AD1845 same as CS4231 */
448 					sc->chip_name = "CS4231 or AD1845";
449 					break;
450 				case 0x82:
451 					sc->chip_name = "CS4232";
452 					break;
453 				case 0xa2:
454 					sc->chip_name = "CS4232C";
455 					break;
456 				case 0x03:
457 					sc->chip_name = "CS4236/CS4236B";
458 					break;
459 				}
460 			}
461 			sc->mode = 2;
462 			sc->sc_flags |= AD1848_FLAG_32REGS;
463 		}
464 	}
465 
466 	/* Wait for 1848 to init */
467 	while(ADREAD(sc, AD1848_IADDR) & SP_IN_INIT)
468 		;
469 
470 	/* Wait for 1848 to autocal */
471 	ADWRITE(sc, AD1848_IADDR, SP_TEST_AND_INIT);
472 	while(ADREAD(sc, AD1848_IDATA) & AUTO_CAL_IN_PROG)
473 		;
474 
475 	return 1;
476 bad:
477 	return 0;
478 }
479 
480 /* Unmap the I/O ports */
481 void
482 ad1848_unmap(struct ad1848_softc *sc)
483 {
484 	bus_space_unmap(sc->sc_iot, sc->sc_ioh, AD1848_NPORT);
485 }
486 
487 /*
488  * Attach hardware to driver, attach hardware driver to audio
489  * pseudo-device driver .
490  */
491 void
492 ad1848_attach(struct ad1848_softc *sc)
493 {
494 	int i;
495 	struct ad1848_volume vol_mid = {220, 220};
496 	struct ad1848_volume vol_0   = {0, 0};
497 	struct audio_params pparams, rparams;
498 	int timeout;
499 
500 	sc->sc_playrun = 0;
501 	sc->sc_recrun = 0;
502 
503 	if (sc->sc_drq != -1) {
504 		if (isa_dmamap_create(sc->sc_isa, sc->sc_drq, MAX_ISADMA,
505 		    BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW)) {
506 			printf("ad1848_attach: can't create map for drq %d\n",
507 			    sc->sc_drq);
508 			return;
509 		}
510 	}
511 	if (sc->sc_recdrq != -1 && sc->sc_recdrq != sc->sc_drq) {
512 		if (isa_dmamap_create(sc->sc_isa, sc->sc_recdrq, MAX_ISADMA,
513 		    BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW)) {
514 			printf("ad1848_attach: can't create map for second drq %d\n",
515 			    sc->sc_recdrq);
516 			return;
517 		}
518 	}
519 
520 	/* Initialize the ad1848... */
521 	for (i = 0; i < 0x10; i++) {
522 		ad_write(sc, i, ad1848_init_values[i]);
523 		timeout = AD1848_TIMO;
524 		while (timeout > 0 && ADREAD(sc, AD1848_IADDR) & SP_IN_INIT)
525 			timeout--;
526 	}
527 	/* need 2 separate drqs for mode 2 */
528 	if ((sc->mode == 2) &&
529 	    ((sc->sc_recdrq == -1) || (sc->sc_recdrq == sc->sc_drq))) {
530 		ad_write(sc, SP_MISC_INFO, ad_read(sc, SP_MISC_INFO) & ~MODE2);
531 		if (!(ad_read(sc, SP_MISC_INFO) & MODE2))
532 			sc->mode = 1;
533 	}
534 	/* ...and additional CS4231 stuff too */
535 	if (sc->mode == 2) {
536 		ad_write(sc, SP_INTERFACE_CONFIG, 0); /* disable SINGLE_DMA */
537 		for (i = 0x10; i < 0x20; i++) {
538 			if (ad1848_init_values[i] != 0) {
539 				ad_write(sc, i, ad1848_init_values[i]);
540 				timeout = AD1848_TIMO;
541 				while (timeout > 0 &&
542 				    ADREAD(sc, AD1848_IADDR) & SP_IN_INIT)
543 					timeout--;
544 			}
545 		}
546 	}
547 	ad1848_reset(sc);
548 
549 	pparams = ad1848_audio_default;
550 	rparams = ad1848_audio_default;
551 	(void) ad1848_set_params(sc, AUMODE_RECORD|AUMODE_PLAY, 0,
552 	    &pparams, &rparams);
553 
554 	/* Set default gains */
555 	(void) ad1848_set_rec_gain(sc, &vol_mid);
556 	(void) ad1848_set_channel_gain(sc, AD1848_DAC_CHANNEL, &vol_mid);
557 	(void) ad1848_set_channel_gain(sc, AD1848_MONITOR_CHANNEL, &vol_0);
558 	/* CD volume */
559 	(void) ad1848_set_channel_gain(sc, AD1848_AUX1_CHANNEL, &vol_mid);
560 	if (sc->mode == 2) {
561 		 /* CD volume */
562 		(void) ad1848_set_channel_gain(sc, AD1848_AUX2_CHANNEL, &vol_mid);
563 		(void) ad1848_set_channel_gain(sc, AD1848_LINE_CHANNEL, &vol_mid);
564 		(void) ad1848_set_channel_gain(sc, AD1848_MONO_CHANNEL, &vol_0);
565 		sc->mute[AD1848_MONO_CHANNEL] = MUTE_ALL;
566 	} else
567 		(void) ad1848_set_channel_gain(sc, AD1848_AUX2_CHANNEL, &vol_0);
568 
569 	/* Set default port */
570 	(void) ad1848_set_rec_port(sc, MIC_IN_PORT);
571 
572 	if (sc->chip_name)
573 		printf(": %s", sc->chip_name);
574 }
575 
576 /*
577  * Various routines to interface to higher level audio driver
578  */
579 struct ad1848_mixerinfo {
580 	int left_reg;
581 	int right_reg;
582 	int atten_bits;
583 	int atten_mask;
584 } mixer_channel_info[] = {
585 	{ SP_LEFT_AUX2_CONTROL, SP_RIGHT_AUX2_CONTROL, AUX_INPUT_ATTEN_BITS,
586 		AUX_INPUT_ATTEN_MASK },
587 	{ SP_LEFT_AUX1_CONTROL, SP_RIGHT_AUX1_CONTROL, AUX_INPUT_ATTEN_BITS,
588 		AUX_INPUT_ATTEN_MASK },
589 	{ SP_LEFT_OUTPUT_CONTROL, SP_RIGHT_OUTPUT_CONTROL, OUTPUT_ATTEN_BITS,
590 		OUTPUT_ATTEN_MASK },
591 	{ CS_LEFT_LINE_CONTROL, CS_RIGHT_LINE_CONTROL, LINE_INPUT_ATTEN_BITS,
592 		LINE_INPUT_ATTEN_MASK },
593 	{ CS_MONO_IO_CONTROL, 0, MONO_INPUT_ATTEN_BITS, MONO_INPUT_ATTEN_MASK },
594 	{ SP_DIGITAL_MIX, 0, OUTPUT_ATTEN_BITS, MIX_ATTEN_MASK }
595 };
596 
597 /*
598  *  This function doesn't set the mute flags but does use them.
599  *  The mute flags reflect the mutes that have been applied by the user.
600  *  However, the driver occasionally wants to mute devices (e.g. when changing
601  *  sampling rate). These operations should not affect the mute flags.
602  */
603 void
604 ad1848_mute_channel(struct ad1848_softc *sc, int device, int mute)
605 {
606 	u_char reg;
607 
608 	reg = ad_read(sc, mixer_channel_info[device].left_reg);
609 
610 	if (mute & MUTE_LEFT) {
611 		if (device == AD1848_MONITOR_CHANNEL) {
612 			ad_write(sc, mixer_channel_info[device].left_reg,
613 			    reg & 0xFE);
614 		} else {
615 			ad_write(sc, mixer_channel_info[device].left_reg,
616 			    reg | 0x80);
617 		}
618 	} else if (!(sc->mute[device] & MUTE_LEFT)) {
619 		if (device == AD1848_MONITOR_CHANNEL) {
620 			ad_write(sc, mixer_channel_info[device].left_reg,
621 			    reg | 0x01);
622 		} else {
623 			ad_write(sc, mixer_channel_info[device].left_reg,
624 			    reg & ~0x80);
625 		}
626 	}
627 
628 	if (!mixer_channel_info[device].right_reg) {
629 		return;
630   	}
631 
632 	reg = ad_read(sc, mixer_channel_info[device].right_reg);
633 
634 	if (mute & MUTE_RIGHT) {
635 		ad_write(sc, mixer_channel_info[device].right_reg, reg | 0x80);
636 	} else if (!(sc->mute[device] & MUTE_RIGHT)) {
637 		ad_write(sc, mixer_channel_info[device].right_reg, reg & ~0x80);
638 	}
639 }
640 
641 int
642 ad1848_set_channel_gain(struct ad1848_softc *sc, int device,
643     struct ad1848_volume *gp)
644 {
645 	struct ad1848_mixerinfo *info = &mixer_channel_info[device];
646 	u_char reg;
647 	u_int atten;
648 
649 	sc->gains[device] = *gp;
650 
651 	atten = ((AUDIO_MAX_GAIN - gp->left) * info->atten_bits) /
652 	    AUDIO_MAX_GAIN;
653 
654 	reg = ad_read(sc, info->left_reg) & (info->atten_mask);
655 	if (device == AD1848_MONITOR_CHANNEL)
656 		reg |= ((atten & info->atten_bits) << 2);
657 	else
658 		reg |= ((atten & info->atten_bits));
659 
660 	ad_write(sc, info->left_reg, reg);
661 
662 	if (!info->right_reg)
663 		return 0;
664 
665 	atten = ((AUDIO_MAX_GAIN - gp->right) * info->atten_bits) /
666 	    AUDIO_MAX_GAIN;
667 	reg = ad_read(sc, info->right_reg);
668 	reg &= (info->atten_mask);
669 	ad_write(sc, info->right_reg, (atten & info->atten_bits) | reg);
670 
671 	return 0;
672 }
673 
674 int
675 ad1848_get_device_gain(struct ad1848_softc *sc, int device,
676     struct ad1848_volume *gp)
677 {
678 	*gp = sc->gains[device];
679 	return 0;
680 }
681 
682 int
683 ad1848_get_rec_gain(struct ad1848_softc *sc, struct ad1848_volume *gp)
684 {
685 	*gp = sc->rec_gain;
686 	return 0;
687 }
688 
689 int
690 ad1848_set_rec_gain(struct ad1848_softc *sc, struct ad1848_volume *gp)
691 {
692 	u_char reg, gain;
693 
694 	DPRINTF(("ad1848_set_rec_gain: %d:%d\n", gp->left, gp->right));
695 
696 	sc->rec_gain = *gp;
697 
698 	gain = (gp->left * GAIN_22_5) / AUDIO_MAX_GAIN;
699 	reg = ad_read(sc, SP_LEFT_INPUT_CONTROL);
700 	reg &= INPUT_GAIN_MASK;
701 	ad_write(sc, SP_LEFT_INPUT_CONTROL, (gain & 0x0f) | reg);
702 
703 	gain = (gp->right * GAIN_22_5) / AUDIO_MAX_GAIN;
704 	reg = ad_read(sc, SP_RIGHT_INPUT_CONTROL);
705 	reg &= INPUT_GAIN_MASK;
706 	ad_write(sc, SP_RIGHT_INPUT_CONTROL, (gain & 0x0f) | reg);
707 
708 	return 0;
709 }
710 
711 void
712 ad1848_mute_monitor(void *addr, int mute)
713 {
714 	struct ad1848_softc *sc = addr;
715 
716 	DPRINTF(("ad1848_mute_monitor: %smuting\n", mute ? "" : "un"));
717 	if (sc->mode == 2) {
718 		ad1848_mute_channel(sc, AD1848_DAC_CHANNEL,
719 		    mute ? MUTE_ALL : 0);
720 		ad1848_mute_channel(sc, AD1848_MONO_CHANNEL,
721 		    mute ? MUTE_MONO : 0);
722 		ad1848_mute_channel(sc, AD1848_LINE_CHANNEL,
723 		    mute ? MUTE_ALL : 0);
724 	}
725 
726 	ad1848_mute_channel(sc, AD1848_AUX2_CHANNEL, mute ? MUTE_ALL : 0);
727 	ad1848_mute_channel(sc, AD1848_AUX1_CHANNEL, mute ? MUTE_ALL : 0);
728 }
729 
730 int
731 ad1848_set_mic_gain(struct ad1848_softc *sc, struct ad1848_volume *gp)
732 {
733 	u_char reg;
734 
735 	DPRINTF(("cs4231_set_mic_gain: %d\n", gp->left));
736 
737 	if (gp->left > AUDIO_MAX_GAIN / 2) {
738 		sc->mic_gain_on = 1;
739 		reg = ad_read(sc, SP_LEFT_INPUT_CONTROL);
740 		ad_write(sc, SP_LEFT_INPUT_CONTROL,
741 		    reg | INPUT_MIC_GAIN_ENABLE);
742 	} else {
743 		sc->mic_gain_on = 0;
744 		reg = ad_read(sc, SP_LEFT_INPUT_CONTROL);
745 		ad_write(sc, SP_LEFT_INPUT_CONTROL,
746 		    reg & ~INPUT_MIC_GAIN_ENABLE);
747 	}
748 
749 	return 0;
750 }
751 
752 int
753 ad1848_get_mic_gain(struct ad1848_softc *sc, struct ad1848_volume *gp)
754 {
755 	if (sc->mic_gain_on)
756 		gp->left = gp->right = AUDIO_MAX_GAIN;
757 	else
758 		gp->left = gp->right = AUDIO_MIN_GAIN;
759 
760 	return 0;
761 }
762 
763 
764 static ad1848_devmap_t *ad1848_mixer_find_dev(ad1848_devmap_t *, int, mixer_ctrl_t *);
765 
766 static ad1848_devmap_t *
767 ad1848_mixer_find_dev(ad1848_devmap_t *map, int cnt, mixer_ctrl_t *cp)
768 {
769 	int idx;
770 
771 	for (idx = 0; idx < cnt; idx++) {
772 		if (map[idx].id == cp->dev) {
773 			return &map[idx];
774 		}
775   	}
776 	return NULL;
777 }
778 
779 int
780 ad1848_mixer_get_port(struct ad1848_softc *ac, struct ad1848_devmap *map,
781     int cnt, mixer_ctrl_t *cp)
782 {
783 	ad1848_devmap_t *entry;
784 	struct ad1848_volume vol;
785 	int error = EINVAL;
786 	int dev;
787 
788 	if (!(entry = ad1848_mixer_find_dev(map, cnt, cp)))
789 		return (ENXIO);
790 
791 	dev = entry->dev;
792 	mtx_enter(&audio_lock);
793 	switch (entry->kind) {
794 	case AD1848_KIND_LVL:
795 		if (cp->type != AUDIO_MIXER_VALUE)
796 			break;
797 		if (dev < AD1848_AUX2_CHANNEL ||
798 		    dev > AD1848_MONITOR_CHANNEL)
799 	  		break;
800 		if (cp->un.value.num_channels != 1 &&
801 		    mixer_channel_info[dev].right_reg == 0)
802 	  		break;
803 		error = ad1848_get_device_gain(ac, dev, &vol);
804 		if (!error)
805 			ad1848_from_vol(cp, &vol);
806 		break;
807 
808 	case AD1848_KIND_MUTE:
809 		if (cp->type != AUDIO_MIXER_ENUM)
810 			break;
811 		cp->un.ord = ac->mute[dev] ? 1 : 0;
812 		error = 0;
813 		break;
814 
815 	case AD1848_KIND_RECORDGAIN:
816 		if (cp->type != AUDIO_MIXER_VALUE)
817 			break;
818 		error = ad1848_get_rec_gain(ac, &vol);
819 		if (!error)
820 			ad1848_from_vol(cp, &vol);
821 		break;
822 
823 	case AD1848_KIND_MICGAIN:
824 		if (cp->type != AUDIO_MIXER_VALUE)
825 			break;
826 		error = ad1848_get_mic_gain(ac, &vol);
827 		if (!error)
828 			ad1848_from_vol(cp, &vol);
829 		break;
830 
831 	case AD1848_KIND_RECORDSOURCE:
832 		if (cp->type != AUDIO_MIXER_ENUM)
833 			break;
834 		cp->un.ord = ad1848_get_rec_port(ac);
835 		error = 0;
836 		break;
837 
838 	default:
839 		printf("Invalid kind\n");
840 		break;
841 	}
842 	mtx_leave(&audio_lock);
843 	return error;
844 }
845 
846 int
847 ad1848_mixer_set_port(struct ad1848_softc *ac, struct ad1848_devmap *map,
848     int cnt, mixer_ctrl_t *cp)
849 {
850 	ad1848_devmap_t *entry;
851 	struct ad1848_volume vol;
852 	int error = EINVAL;
853 	int dev;
854 
855 	if (!(entry = ad1848_mixer_find_dev(map, cnt, cp)))
856 		return (ENXIO);
857 
858   	dev = entry->dev;
859 	mtx_enter(&audio_lock);
860 	switch (entry->kind) {
861 	case AD1848_KIND_LVL:
862 		if (cp->type != AUDIO_MIXER_VALUE)
863 			break;
864 		if (dev < AD1848_AUX2_CHANNEL ||
865 		    dev > AD1848_MONITOR_CHANNEL)
866 			break;
867 		if (cp->un.value.num_channels != 1 &&
868 		    mixer_channel_info[dev].right_reg == 0)
869 			break;
870 		ad1848_to_vol(cp, &vol);
871 		error = ad1848_set_channel_gain(ac, dev, &vol);
872 		break;
873 
874 	case AD1848_KIND_MUTE:
875 		if (cp->type != AUDIO_MIXER_ENUM)
876 			break;
877 		ac->mute[dev] = (cp->un.ord ? MUTE_ALL : 0);
878 		ad1848_mute_channel(ac, dev, ac->mute[dev]);
879 		error = 0;
880 		break;
881 
882 	case AD1848_KIND_RECORDGAIN:
883 		if (cp->type != AUDIO_MIXER_VALUE)
884 			break;
885 		ad1848_to_vol(cp, &vol);
886 		error = ad1848_set_rec_gain(ac, &vol);
887 		break;
888 
889 	case AD1848_KIND_MICGAIN:
890 		if (cp->type != AUDIO_MIXER_VALUE)
891 			break;
892 		ad1848_to_vol(cp, &vol);
893 		error = ad1848_set_mic_gain(ac, &vol);
894 		break;
895 
896 	case AD1848_KIND_RECORDSOURCE:
897 		if (cp->type != AUDIO_MIXER_ENUM)
898 			break;
899 		error = ad1848_set_rec_port(ac,  cp->un.ord);
900 		break;
901 
902 	default:
903 		printf("Invalid kind\n");
904 		break;
905 	}
906 	mtx_leave(&audio_lock);
907 	return (error);
908 }
909 
910 int
911 ad1848_set_params(void *addr, int setmode, int usemode, struct audio_params *p,
912     struct audio_params *r)
913 {
914 	struct ad1848_softc *sc = addr;
915 	int error, bits, enc;
916 
917 	DPRINTF(("ad1848_set_params: %d %d %d %ld\n",
918 	     p->encoding, p->precision, p->channels, p->sample_rate));
919 
920 	enc = p->encoding;
921 	switch (enc) {
922 	case AUDIO_ENCODING_SLINEAR_LE:
923 		if (p->precision == 8)
924 			return EINVAL;
925 		break;
926 	case AUDIO_ENCODING_SLINEAR_BE:
927 		if (p->precision == 16)
928 			return EINVAL;
929 		break;
930 	case AUDIO_ENCODING_ULINEAR_LE:
931 		if (p->precision == 16)
932 			return EINVAL;
933 		break;
934 	case AUDIO_ENCODING_ULINEAR_BE:
935 		if (p->precision == 16)
936 			return EINVAL;
937 		break;
938 	}
939 	switch (enc) {
940 	case AUDIO_ENCODING_ULAW:
941 		p->precision = 8;
942 		bits = FMT_ULAW;
943 		break;
944 	case AUDIO_ENCODING_ALAW:
945 		p->precision = 8;
946 		bits = FMT_ALAW;
947 		break;
948 	case AUDIO_ENCODING_SLINEAR_LE:
949 		if (p->precision == 16)
950 			bits = FMT_TWOS_COMP;
951 		else
952 			return EINVAL;
953 		break;
954 	case AUDIO_ENCODING_SLINEAR_BE:
955 		if (p->precision == 16)
956 			bits = FMT_TWOS_COMP_BE;
957 		else
958 			return EINVAL;
959 		break;
960 	case AUDIO_ENCODING_ULINEAR_LE:
961 		if (p->precision == 8)
962 			bits = FMT_PCM8;
963 		else
964 			return EINVAL;
965 		break;
966 	default:
967 		return EINVAL;
968 	}
969 
970 	if (p->channels < 1 || p->channels > 2)
971 		return EINVAL;
972 
973 	error = ad1848_set_speed(sc, &p->sample_rate);
974 	if (error)
975 		return error;
976 
977 	p->bps = AUDIO_BPS(p->precision);
978 	r->bps = AUDIO_BPS(r->precision);
979 	p->msb = 1;
980 	r->msb = 1;
981 
982 	sc->format_bits = bits;
983 	sc->channels = p->channels;
984 	sc->precision = p->precision;
985 	sc->need_commit = 1;
986 
987 	DPRINTF(("ad1848_set_params succeeded, bits=%x\n", bits));
988 	return (0);
989 }
990 
991 int
992 ad1848_set_rec_port(struct ad1848_softc *sc, int port)
993 {
994 	u_char inp, reg;
995 
996 	DPRINTF(("ad1848_set_rec_port: 0x%x\n", port));
997 
998 	if (port == MIC_IN_PORT) {
999 		inp = MIC_INPUT;
1000 	} else if (port == LINE_IN_PORT) {
1001 		inp = LINE_INPUT;
1002 	} else if (port == DAC_IN_PORT) {
1003 		inp = MIXED_DAC_INPUT;
1004 	} else if (sc->mode == 2 && port == AUX1_IN_PORT) {
1005 		inp = AUX_INPUT;
1006 	} else
1007 		return EINVAL;
1008 
1009 	reg = ad_read(sc, SP_LEFT_INPUT_CONTROL);
1010 	reg &= INPUT_SOURCE_MASK;
1011 	ad_write(sc, SP_LEFT_INPUT_CONTROL, (inp | reg));
1012 
1013 	reg = ad_read(sc, SP_RIGHT_INPUT_CONTROL);
1014 	reg &= INPUT_SOURCE_MASK;
1015 	ad_write(sc, SP_RIGHT_INPUT_CONTROL, (inp | reg));
1016 
1017 	sc->rec_port = port;
1018 
1019 	return 0;
1020 }
1021 
1022 int
1023 ad1848_get_rec_port(struct ad1848_softc *sc)
1024 {
1025 	return sc->rec_port;
1026 }
1027 
1028 int
1029 ad1848_round_blocksize(void *addr, int blk)
1030 {
1031 	/* Round to a multiple of the biggest sample size. */
1032 	blk = (blk + 3) & -4;
1033 
1034 	return blk;
1035 }
1036 
1037 int
1038 ad1848_open(void *addr, int flags)
1039 {
1040 	struct ad1848_softc *sc = addr;
1041 
1042 	DPRINTF(("ad1848_open: sc=%p\n", sc));
1043 
1044 	if ((flags & (FWRITE | FREAD)) == (FWRITE | FREAD) && sc->mode != 2)
1045 		return ENXIO;
1046 
1047 	sc->sc_pintr = sc->sc_parg = NULL;
1048 	sc->sc_rintr = sc->sc_rarg = NULL;
1049 
1050 	/* Enable interrupts */
1051 	DPRINTF(("ad1848_open: enable intrs\n"));
1052 	ad_write(sc, SP_PIN_CONTROL,
1053 	    INTERRUPT_ENABLE | ad_read(sc, SP_PIN_CONTROL));
1054 
1055 #ifdef AUDIO_DEBUG
1056 	if (ad1848debug > 2)
1057 		ad1848_dump_regs(sc);
1058 #endif
1059 
1060 	return 0;
1061 }
1062 
1063 /*
1064  * Close function is called at splaudio().
1065  */
1066 void
1067 ad1848_close(void *addr)
1068 {
1069 	struct ad1848_softc *sc = addr;
1070 	u_char r;
1071 
1072 	ad1848_halt_output(sc);
1073 	ad1848_halt_input(sc);
1074 
1075 	sc->sc_pintr = NULL;
1076 	sc->sc_rintr = NULL;
1077 
1078 	DPRINTF(("ad1848_close: stop DMA\n"));
1079 
1080 	ad_write(sc, SP_LOWER_BASE_COUNT, (u_char)0);
1081 	ad_write(sc, SP_UPPER_BASE_COUNT, (u_char)0);
1082 
1083 	/* Disable interrupts */
1084 	DPRINTF(("ad1848_close: disable intrs\n"));
1085 	ad_write(sc, SP_PIN_CONTROL,
1086 	    ad_read(sc, SP_PIN_CONTROL) & ~INTERRUPT_ENABLE);
1087 
1088 	DPRINTF(("ad1848_close: disable capture and playback\n"));
1089 	r = ad_read(sc, SP_INTERFACE_CONFIG);
1090 	r &= ~(CAPTURE_ENABLE | PLAYBACK_ENABLE);
1091 	ad_write(sc, SP_INTERFACE_CONFIG, r);
1092 
1093 #ifdef AUDIO_DEBUG
1094 	if (ad1848debug > 2)
1095 		ad1848_dump_regs(sc);
1096 #endif
1097 }
1098 
1099 /*
1100  * Lower-level routines
1101  */
1102 int
1103 ad1848_commit_settings(void *addr)
1104 {
1105 	struct ad1848_softc *sc = addr;
1106 	int timeout;
1107 	u_char fs;
1108 
1109 	if (!sc->need_commit)
1110 		return 0;
1111 
1112 	mtx_enter(&audio_lock);
1113 
1114 	ad1848_mute_monitor(sc, 1);
1115 
1116 	/* Enables changes to the format select reg */
1117 	ad_set_MCE(sc, 1);
1118 
1119 	fs = sc->speed_bits | sc->format_bits;
1120 
1121 	if (sc->channels == 2)
1122 		fs |= FMT_STEREO;
1123 
1124 	ad_write(sc, SP_CLOCK_DATA_FORMAT, fs);
1125 
1126 	/*
1127 	 * If mode == 2 (CS4231), set I28 also. It's the capture format
1128 	 * register.
1129 	 */
1130 	if (sc->mode == 2) {
1131 		/* Gravis Ultrasound MAX SDK sources says something about
1132 		 * errata sheets, with the implication that these inb()s
1133 		 * are necessary.
1134 		 */
1135 		(void)ADREAD(sc, AD1848_IDATA);
1136 		(void)ADREAD(sc, AD1848_IDATA);
1137 
1138 		/*
1139 		 * Write to I8 starts resynchronization. Wait until it
1140 		 * completes.
1141 		 */
1142 		timeout = AD1848_TIMO;
1143 		while (timeout > 0 && ADREAD(sc, AD1848_IADDR) == SP_IN_INIT)
1144 			timeout--;
1145 
1146 		ad_write(sc, CS_REC_FORMAT, fs);
1147 		/* Gravis Ultrasound MAX SDK sources says something about
1148 		 * errata sheets, with the implication that these inb()s
1149 		 * are necessary.
1150 		 */
1151 		(void)ADREAD(sc, AD1848_IDATA);
1152 		(void)ADREAD(sc, AD1848_IDATA);
1153 		/* Now wait for resync for capture side of the house */
1154 	}
1155 	/*
1156 	 * Write to I8 starts resynchronization. Wait until it completes.
1157 	 */
1158 	timeout = AD1848_TIMO;
1159 	while (timeout > 0 && ADREAD(sc, AD1848_IADDR) == SP_IN_INIT)
1160 		timeout--;
1161 
1162 	if (ADREAD(sc, AD1848_IADDR) == SP_IN_INIT)
1163 		printf("ad1848_commit: Auto calibration timed out\n");
1164 
1165 	/*
1166 	 * Starts the calibration process and enters playback mode after it.
1167 	 */
1168 	ad_set_MCE(sc, 0);
1169 	wait_for_calibration(sc);
1170 
1171 	ad1848_mute_monitor(sc, 0);
1172 
1173 	mtx_leave(&audio_lock);
1174 
1175 	sc->need_commit = 0;
1176 
1177 	return 0;
1178 }
1179 
1180 void
1181 ad1848_reset(struct ad1848_softc *sc)
1182 {
1183 	u_char r;
1184 
1185 	DPRINTF(("ad1848_reset\n"));
1186 
1187 	/* Clear the PEN and CEN bits */
1188 	r = ad_read(sc, SP_INTERFACE_CONFIG);
1189 	r &= ~(CAPTURE_ENABLE | PLAYBACK_ENABLE);
1190 	ad_write(sc, SP_INTERFACE_CONFIG, r);
1191 
1192 	/* Clear interrupt status */
1193 	if (sc->mode == 2)
1194 		ad_write(sc, CS_IRQ_STATUS, 0);
1195 	ADWRITE(sc, AD1848_STATUS, 0);
1196 
1197 #ifdef AUDIO_DEBUG
1198 	if (ad1848debug > 2)
1199 		ad1848_dump_regs(sc);
1200 #endif
1201 }
1202 
1203 int
1204 ad1848_set_speed(struct ad1848_softc *sc, u_long *argp)
1205 {
1206 	/*
1207 	 * The sampling speed is encoded in the least significant nible of I8.
1208 	 * The LSB selects the clock source (0=24.576 MHz, 1=16.9344 MHz) and
1209 	 * other three bits select the divisor (indirectly):
1210 	 *
1211 	 * The available speeds are in the following table. Keep the speeds in
1212 	 * the increasing order.
1213 	 */
1214 	typedef struct {
1215 		int	speed;
1216 		u_char	bits;
1217 	} speed_struct;
1218 	u_long arg = *argp;
1219 
1220 	static speed_struct speed_table[] =  {
1221 		{5510, (0 << 1) | 1},
1222 		{5510, (0 << 1) | 1},
1223 		{6620, (7 << 1) | 1},
1224 		{8000, (0 << 1) | 0},
1225 		{9600, (7 << 1) | 0},
1226 		{11025, (1 << 1) | 1},
1227 		{16000, (1 << 1) | 0},
1228 		{18900, (2 << 1) | 1},
1229 		{22050, (3 << 1) | 1},
1230 		{27420, (2 << 1) | 0},
1231 		{32000, (3 << 1) | 0},
1232 		{33075, (6 << 1) | 1},
1233 		{37800, (4 << 1) | 1},
1234 		{44100, (5 << 1) | 1},
1235 		{48000, (6 << 1) | 0}
1236 	};
1237 
1238 	int i, n, selected = -1;
1239 
1240 	n = sizeof(speed_table) / sizeof(speed_struct);
1241 
1242 	if (arg < speed_table[0].speed)
1243 		selected = 0;
1244 	if (arg > speed_table[n - 1].speed)
1245 		selected = n - 1;
1246 
1247 	for (i = 1 /*really*/ ; selected == -1 && i < n; i++) {
1248 		if (speed_table[i].speed == arg)
1249 			selected = i;
1250 		else if (speed_table[i].speed > arg) {
1251 			int diff1, diff2;
1252 
1253 			diff1 = arg - speed_table[i - 1].speed;
1254 			diff2 = speed_table[i].speed - arg;
1255 
1256 			if (diff1 < diff2)
1257 				selected = i - 1;
1258 			else
1259 				selected = i;
1260 		}
1261 	}
1262 
1263 	if (selected == -1) {
1264 		printf("ad1848: Can't find speed???\n");
1265 		selected = 3;
1266 	}
1267 
1268 	sc->speed_bits = speed_table[selected].bits;
1269 	sc->need_commit = 1;
1270 	*argp = speed_table[selected].speed;
1271 
1272 	return 0;
1273 }
1274 
1275 /*
1276  * Halt a DMA in progress.
1277  */
1278 int
1279 ad1848_halt_output(void *addr)
1280 {
1281 	struct ad1848_softc *sc = addr;
1282 	u_char reg;
1283 
1284 	DPRINTF(("ad1848: ad1848_halt_output\n"));
1285 	mtx_enter(&audio_lock);
1286 	reg = ad_read(sc, SP_INTERFACE_CONFIG);
1287 	ad_write(sc, SP_INTERFACE_CONFIG, (reg & ~PLAYBACK_ENABLE));
1288 
1289 	if (sc->sc_playrun == 1) {
1290 		isa_dmaabort(sc->sc_isa, sc->sc_drq);
1291 		sc->sc_playrun = 0;
1292 	}
1293 	mtx_leave(&audio_lock);
1294 	return 0;
1295 }
1296 
1297 int
1298 ad1848_halt_input(void *addr)
1299 {
1300 	struct ad1848_softc *sc = addr;
1301 	u_char reg;
1302 
1303 	DPRINTF(("ad1848: ad1848_halt_input\n"));
1304 	mtx_enter(&audio_lock);
1305 	reg = ad_read(sc, SP_INTERFACE_CONFIG);
1306 	ad_write(sc, SP_INTERFACE_CONFIG, (reg & ~CAPTURE_ENABLE));
1307 
1308 	if (sc->sc_recrun == 1) {
1309 		isa_dmaabort(sc->sc_isa, sc->sc_recdrq);
1310 		sc->sc_recrun = 0;
1311 	}
1312 	mtx_leave(&audio_lock);
1313 	return 0;
1314 }
1315 
1316 int
1317 ad1848_trigger_input(void *addr, void *start, void *end, int blksize,
1318     void (*intr)(void *), void *arg, struct audio_params *param)
1319 {
1320 	struct ad1848_softc *sc = addr;
1321 	u_char reg;
1322 
1323 	if (sc->sc_recdrq == -1) {
1324 		DPRINTF(("ad1848_trigger_input: invalid recording drq\n"));
1325 		return ENXIO;
1326 	}
1327 	mtx_enter(&audio_lock);
1328 	isa_dmastart(sc->sc_isa, sc->sc_recdrq, start,
1329 	    (char *)end - (char *)start, NULL, DMAMODE_READ | DMAMODE_LOOP,
1330 	    BUS_DMA_NOWAIT);
1331 
1332 	sc->sc_recrun = 1;
1333 	sc->sc_rintr = intr;
1334 	sc->sc_rarg = arg;
1335 
1336 	blksize = (blksize * NBBY) / (param->precision * param->channels) - 1;
1337 
1338 	if (sc->mode == 2) {
1339 		ad_write(sc, CS_LOWER_REC_CNT, (blksize & 0xff));
1340 		ad_write(sc, CS_UPPER_REC_CNT, ((blksize >> 8) & 0xff));
1341 	} else {
1342 		ad_write(sc, SP_LOWER_BASE_COUNT, blksize & 0xff);
1343 		ad_write(sc, SP_UPPER_BASE_COUNT, (blksize >> 8) & 0xff);
1344 	}
1345 
1346 	reg = ad_read(sc, SP_INTERFACE_CONFIG);
1347 	ad_write(sc, SP_INTERFACE_CONFIG, (CAPTURE_ENABLE | reg));
1348 
1349 #ifdef AUDIO_DEBUG
1350 	if (ad1848debug > 1)
1351 		printf("ad1848_trigger_input: started capture\n");
1352 #endif
1353 	mtx_leave(&audio_lock);
1354 	return 0;
1355 }
1356 
1357 int
1358 ad1848_trigger_output(void *addr, void *start, void *end, int blksize,
1359     void (*intr)(void *), void *arg, struct audio_params *param)
1360 {
1361 	struct ad1848_softc *sc = addr;
1362 	u_char reg;
1363 
1364 	mtx_enter(&audio_lock);
1365 	isa_dmastart(sc->sc_isa, sc->sc_drq, start,
1366 	    (char *)end - (char *)start, NULL,
1367 	    DMAMODE_WRITE | DMAMODE_LOOP, BUS_DMA_NOWAIT);
1368 
1369 	sc->sc_playrun = 1;
1370 	sc->sc_pintr = intr;
1371 	sc->sc_parg = arg;
1372 
1373 	blksize = (blksize * NBBY) / (param->precision * param->channels) - 1;
1374 
1375 	ad_write(sc, SP_LOWER_BASE_COUNT, blksize & 0xff);
1376 	ad_write(sc, SP_UPPER_BASE_COUNT, (blksize >> 8) & 0xff);
1377 
1378 	reg = ad_read(sc, SP_INTERFACE_CONFIG);
1379 	ad_write(sc, SP_INTERFACE_CONFIG, (PLAYBACK_ENABLE | reg));
1380 
1381 #ifdef AUDIO_DEBUG
1382 	if (ad1848debug > 1)
1383 		printf("ad1848_trigger_output: started playback\n");
1384 #endif
1385 	mtx_leave(&audio_lock);
1386 	return 0;
1387 }
1388 
1389 int
1390 ad1848_intr(void *arg)
1391 {
1392 	struct ad1848_softc *sc = arg;
1393 	int retval = 0;
1394 	u_char status;
1395 
1396 	mtx_enter(&audio_lock);
1397 	/* Get intr status */
1398 	status = ADREAD(sc, AD1848_STATUS);
1399 
1400 #ifdef AUDIO_DEBUG
1401 	if (ad1848debug > 1)
1402 		printf("ad1848_intr: mode=%d pintr=%p prun=%d rintr=%p rrun=%d status=0x%x\n",
1403 		    sc->mode, sc->sc_pintr, sc->sc_playrun, sc->sc_rintr, sc->sc_recrun, status);
1404 #endif
1405 
1406 	/* Handle interrupt */
1407 	if ((status & INTERRUPT_STATUS) != 0) {
1408 		if (sc->mode == 2) {
1409 			status = ad_read(sc, CS_IRQ_STATUS);
1410 #ifdef AUDIO_DEBUG
1411 			if (ad1848debug > 2)
1412 				printf("ad1848_intr: cs_irq_status=0x%x (play=0x%x rec0x%x)\n",
1413 				    status, CS_IRQ_PI, CS_IRQ_CI);
1414 #endif
1415 			if ((status & CS_IRQ_PI) && sc->sc_playrun) {
1416 				(*sc->sc_pintr)(sc->sc_parg);
1417 				retval = 1;
1418 			}
1419 			if ((status & CS_IRQ_CI) && sc->sc_recrun) {
1420 				(*sc->sc_rintr)(sc->sc_rarg);
1421 				retval = 1;
1422 			}
1423 		} else {
1424 			if (sc->sc_playrun) {
1425 				(*sc->sc_pintr)(sc->sc_parg);
1426 				retval = 1;
1427 			} else if (sc->sc_recrun) {
1428 				(*sc->sc_rintr)(sc->sc_rarg);
1429 				retval = 1;
1430 			}
1431 		}
1432 		/* clear interrupt */
1433 		ADWRITE(sc, AD1848_STATUS, 0);
1434 	}
1435 	mtx_leave(&audio_lock);
1436 	return(retval);
1437 }
1438 
1439 void *
1440 ad1848_malloc(void *addr, int direction, size_t size, int pool, int flags)
1441 {
1442 	struct ad1848_softc *sc = addr;
1443 	int drq;
1444 
1445 	if (direction == AUMODE_PLAY)
1446 		drq = sc->sc_drq;
1447 	else
1448 		drq = sc->sc_recdrq;
1449 
1450 	return isa_malloc(sc->sc_isa, drq, size, pool, flags);
1451 }
1452 
1453 void
1454 ad1848_free(void *addr, void *ptr, int pool)
1455 {
1456 	isa_free(ptr, pool);
1457 }
1458 
1459 size_t
1460 ad1848_round(void *addr, int direction, size_t size)
1461 {
1462 	if (size > MAX_ISADMA)
1463 		size = MAX_ISADMA;
1464 	return size;
1465 }
1466