Home | History | Annotate | Line # | Download | only in isa
ad1848_isa.c revision 1.18.2.2
      1  1.18.2.2  nathanw /*	$NetBSD: ad1848_isa.c,v 1.18.2.2 2002/04/01 07:45:51 nathanw 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.18.2.1  nathanw #include <sys/cdefs.h>
    105  1.18.2.1  nathanw __KERNEL_RCSID(0, "$NetBSD: ad1848_isa.c,v 1.18.2.2 2002/04/01 07:45:51 nathanw Exp $");
    106  1.18.2.1  nathanw 
    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.18.2.1  nathanw 	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.18.2.1  nathanw 	/* Here, AD1845 may sometimes be busy.  Wait til it becomes ready. */
    256  1.18.2.1  nathanw 	for (t = 0; t < 100000 && ADREAD(sc, AD1848_IADDR) & SP_IN_INIT; t++)
    257  1.18.2.1  nathanw 		;
    258  1.18.2.1  nathanw #ifdef AUDIO_DEBUG
    259  1.18.2.1  nathanw 	if (t)
    260  1.18.2.1  nathanw 		DPRINTF(("ad1848_isa_probe: t %d\n", t));
    261  1.18.2.1  nathanw #endif
    262  1.18.2.1  nathanw 
    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.18.2.1  nathanw 					/*
    359  1.18.2.1  nathanw 					 * XXX
    360  1.18.2.1  nathanw 					 * This test is correct only after reset
    361  1.18.2.1  nathanw 					 */
    362  1.18.2.1  nathanw 					if (ad_read(sc, 17) & 0xf0) {
    363  1.18.2.1  nathanw 						sc->chip_name = "AD1845";
    364  1.18.2.1  nathanw 						sc->is_ad1845 = 1;
    365  1.18.2.1  nathanw 					} else
    366  1.18.2.1  nathanw 						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.1       pk 
    454       1.1       pk 	sc->sc_readreg = ad1848_isa_read;
    455       1.1       pk 	sc->sc_writereg = ad1848_isa_write;
    456       1.1       pk 
    457      1.14  thorpej 	if (isc->sc_playdrq != -1)
    458      1.14  thorpej 		isc->sc_play_maxsize = isa_dmamaxsize(isc->sc_ic,
    459      1.14  thorpej 		    isc->sc_playdrq);
    460      1.14  thorpej 	if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq)
    461      1.14  thorpej 		isc->sc_rec_maxsize = isa_dmamaxsize(isc->sc_ic,
    462      1.14  thorpej 		    isc->sc_recdrq);
    463      1.14  thorpej 
    464      1.11  mycroft 	ad1848_attach(sc);
    465      1.11  mycroft }
    466      1.11  mycroft 
    467      1.11  mycroft int
    468      1.11  mycroft ad1848_isa_open(addr, flags)
    469      1.11  mycroft 	void *addr;
    470      1.11  mycroft 	int flags;
    471      1.11  mycroft {
    472      1.11  mycroft 	struct ad1848_isa_softc *isc = addr;
    473      1.11  mycroft 	struct ad1848_softc *sc = &isc->sc_ad1848;
    474      1.11  mycroft 	int error, state;
    475      1.11  mycroft 
    476      1.11  mycroft 	DPRINTF(("ad1848_isa_open: sc=%p\n", isc));
    477      1.11  mycroft 	state = 0;
    478       1.1       pk 
    479       1.6  mycroft 	if (isc->sc_playdrq != -1) {
    480      1.11  mycroft 		error = isa_dmamap_create(isc->sc_ic, isc->sc_playdrq,
    481      1.14  thorpej 		    isc->sc_play_maxsize, BUS_DMA_NOWAIT);
    482      1.11  mycroft 		if (error) {
    483      1.11  mycroft 			printf("%s: can't create map for drq %d\n",
    484      1.11  mycroft 			    sc->sc_dev.dv_xname, isc->sc_playdrq);
    485      1.11  mycroft 			goto bad;
    486       1.1       pk 		}
    487      1.11  mycroft 		state |= 1;
    488       1.1       pk 	}
    489       1.6  mycroft 	if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq) {
    490      1.11  mycroft 		error = isa_dmamap_create(isc->sc_ic, isc->sc_recdrq,
    491      1.14  thorpej 		    isc->sc_rec_maxsize, BUS_DMA_NOWAIT);
    492      1.11  mycroft 		if (error) {
    493      1.11  mycroft 			printf("%s: can't create map for drq %d\n",
    494      1.11  mycroft 			    sc->sc_dev.dv_xname, isc->sc_recdrq);
    495      1.11  mycroft 			goto bad;
    496       1.1       pk 		}
    497      1.11  mycroft 		state |= 2;
    498       1.1       pk 	}
    499       1.1       pk 
    500      1.13    itohy #ifndef AUDIO_NO_POWER_CTL
    501      1.13    itohy 	/* Power-up chip */
    502      1.13    itohy 	if (isc->powerctl)
    503      1.13    itohy 		isc->powerctl(isc->powerarg, flags);
    504      1.13    itohy #endif
    505      1.13    itohy 
    506      1.13    itohy 	/* Init and mute wave output */
    507      1.13    itohy 	ad1848_mute_wave_output(sc, WAVE_MUTE2_INIT, 1);
    508      1.13    itohy 
    509      1.11  mycroft 	error = ad1848_open(sc, flags);
    510      1.13    itohy 	if (error) {
    511      1.13    itohy #ifndef AUDIO_NO_POWER_CTL
    512      1.13    itohy 		if (isc->powerctl)
    513      1.13    itohy 			isc->powerctl(isc->powerarg, 0);
    514      1.13    itohy #endif
    515      1.11  mycroft 		goto bad;
    516      1.13    itohy 	}
    517       1.1       pk 
    518      1.11  mycroft 	DPRINTF(("ad1848_isa_open: opened\n"));
    519      1.11  mycroft 	return (0);
    520       1.1       pk 
    521      1.11  mycroft bad:
    522      1.11  mycroft 	if (state & 1)
    523      1.11  mycroft 		isa_dmamap_destroy(isc->sc_ic, isc->sc_playdrq);
    524      1.11  mycroft 	if (state & 2)
    525      1.11  mycroft 		isa_dmamap_destroy(isc->sc_ic, isc->sc_recdrq);
    526       1.1       pk 
    527      1.11  mycroft 	return (error);
    528       1.1       pk }
    529       1.1       pk 
    530       1.1       pk /*
    531       1.1       pk  * Close function is called at splaudio().
    532       1.1       pk  */
    533       1.1       pk void
    534       1.1       pk ad1848_isa_close(addr)
    535       1.1       pk 	void *addr;
    536       1.1       pk {
    537      1.11  mycroft 	struct ad1848_isa_softc *isc = addr;
    538      1.11  mycroft 	struct ad1848_softc *sc = &isc->sc_ad1848;
    539      1.11  mycroft 
    540      1.11  mycroft 	ad1848_isa_halt_output(isc);
    541      1.11  mycroft 	ad1848_isa_halt_input(isc);
    542       1.1       pk 
    543      1.17  thorpej 	isc->sc_pintr = isc->sc_rintr = NULL;
    544       1.7  mycroft 
    545      1.11  mycroft 	if (isc->sc_playdrq != -1)
    546      1.11  mycroft 		isa_dmamap_destroy(isc->sc_ic, isc->sc_playdrq);
    547      1.11  mycroft 	if (isc->sc_recdrq != -1 && isc->sc_recdrq != isc->sc_playdrq)
    548      1.11  mycroft 		isa_dmamap_destroy(isc->sc_ic, isc->sc_recdrq);
    549       1.1       pk 
    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.1       pk }
    559       1.1       pk 
    560       1.1       pk int
    561       1.6  mycroft ad1848_isa_trigger_input(addr, start, end, blksize, intr, arg, param)
    562       1.1       pk 	void *addr;
    563       1.6  mycroft 	void *start, *end;
    564       1.6  mycroft 	int blksize;
    565       1.1       pk 	void (*intr) __P((void *));
    566       1.1       pk 	void *arg;
    567       1.6  mycroft 	struct audio_params *param;
    568       1.1       pk {
    569       1.1       pk 	struct ad1848_isa_softc *isc = addr;
    570      1.10  mycroft 	struct ad1848_softc *sc = &isc->sc_ad1848;
    571       1.6  mycroft 	u_int8_t reg;
    572       1.1       pk 
    573       1.6  mycroft 	isa_dmastart(isc->sc_ic, isc->sc_recdrq, start,
    574       1.8  mycroft 	    (char *)end - (char *)start, NULL,
    575       1.8  mycroft 	    DMAMODE_READ | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
    576       1.1       pk 
    577       1.6  mycroft 	isc->sc_recrun = 1;
    578      1.17  thorpej 	if (sc->mode == 2 && isc->sc_playdrq != isc->sc_recdrq) {
    579      1.17  thorpej 		isc->sc_rintr = intr;
    580      1.17  thorpej 		isc->sc_rarg = arg;
    581      1.17  thorpej 	} else {
    582      1.17  thorpej 		isc->sc_pintr = intr;
    583      1.17  thorpej 		isc->sc_parg = arg;
    584      1.17  thorpej 	}
    585       1.1       pk 
    586  1.18.2.2  nathanw 
    587  1.18.2.2  nathanw 	/*
    588  1.18.2.2  nathanw 	 * Calculate number of transfers.
    589  1.18.2.2  nathanw 	 * Note that ADPCM is always transferred 4 bytes at at a time.
    590  1.18.2.2  nathanw 	 */
    591  1.18.2.2  nathanw 	blksize = (param->encoding == AUDIO_ENCODING_ADPCM) ? blksize / 4 - 1 :
    592  1.18.2.2  nathanw 	    (blksize * 8) / (param->precision * param->factor * param->channels) - 1;
    593       1.1       pk 
    594      1.12       rh 	if (sc->mode >= 2) {
    595       1.6  mycroft 		ad_write(sc, CS_LOWER_REC_CNT, blksize & 0xff);
    596       1.6  mycroft 		ad_write(sc, CS_UPPER_REC_CNT, blksize >> 8);
    597       1.6  mycroft 	} else {
    598       1.6  mycroft 		ad_write(sc, SP_LOWER_BASE_COUNT, blksize & 0xff);
    599       1.6  mycroft 		ad_write(sc, SP_UPPER_BASE_COUNT, blksize >> 8);
    600       1.1       pk 	}
    601       1.1       pk 
    602       1.6  mycroft 	reg = ad_read(sc, SP_INTERFACE_CONFIG);
    603       1.6  mycroft 	ad_write(sc, SP_INTERFACE_CONFIG, CAPTURE_ENABLE|reg);
    604       1.1       pk 
    605       1.6  mycroft 	return (0);
    606       1.1       pk }
    607       1.1       pk 
    608       1.1       pk int
    609       1.6  mycroft ad1848_isa_trigger_output(addr, start, end, blksize, intr, arg, param)
    610       1.1       pk 	void *addr;
    611       1.6  mycroft 	void *start, *end;
    612       1.6  mycroft 	int blksize;
    613       1.1       pk 	void (*intr) __P((void *));
    614       1.1       pk 	void *arg;
    615       1.6  mycroft 	struct audio_params *param;
    616       1.1       pk {
    617       1.1       pk 	struct ad1848_isa_softc *isc = addr;
    618      1.10  mycroft 	struct ad1848_softc *sc = &isc->sc_ad1848;
    619       1.6  mycroft 	u_int8_t reg;
    620       1.1       pk 
    621       1.6  mycroft 	isa_dmastart(isc->sc_ic, isc->sc_playdrq, start,
    622       1.8  mycroft 	    (char *)end - (char *)start, NULL,
    623       1.8  mycroft 	    DMAMODE_WRITE | DMAMODE_LOOPDEMAND, BUS_DMA_NOWAIT);
    624       1.1       pk 
    625       1.6  mycroft 	isc->sc_playrun = 1;
    626      1.17  thorpej 	isc->sc_pintr = intr;
    627      1.17  thorpej 	isc->sc_parg = arg;
    628       1.1       pk 
    629  1.18.2.2  nathanw 	/*
    630  1.18.2.2  nathanw 	 * Calculate number of transfers.
    631  1.18.2.2  nathanw 	 * Note that ADPCM is always transferred 4 bytes at at a time.
    632  1.18.2.2  nathanw 	 */
    633  1.18.2.2  nathanw 	blksize = (param->encoding == AUDIO_ENCODING_ADPCM) ? blksize / 4 - 1 :
    634  1.18.2.2  nathanw 	    (blksize * 8) / (param->precision * param->factor * param->channels) - 1;
    635       1.1       pk 
    636       1.6  mycroft 	ad_write(sc, SP_LOWER_BASE_COUNT, blksize & 0xff);
    637       1.6  mycroft 	ad_write(sc, SP_UPPER_BASE_COUNT, blksize >> 8);
    638       1.1       pk 
    639      1.13    itohy 	/* Unmute wave output */
    640      1.13    itohy 	ad1848_mute_wave_output(sc, WAVE_MUTE2, 0);
    641      1.13    itohy 
    642       1.6  mycroft 	reg = ad_read(sc, SP_INTERFACE_CONFIG);
    643       1.6  mycroft 	ad_write(sc, SP_INTERFACE_CONFIG, PLAYBACK_ENABLE|reg);
    644       1.7  mycroft 
    645       1.7  mycroft 	return (0);
    646       1.7  mycroft }
    647       1.7  mycroft 
    648       1.7  mycroft int
    649       1.7  mycroft ad1848_isa_halt_input(addr)
    650       1.7  mycroft 	void *addr;
    651       1.7  mycroft {
    652       1.7  mycroft 	struct ad1848_isa_softc *isc = addr;
    653      1.10  mycroft 	struct ad1848_softc *sc = &isc->sc_ad1848;
    654       1.7  mycroft 
    655       1.7  mycroft 	if (isc->sc_recrun) {
    656       1.7  mycroft 		ad1848_halt_input(sc);
    657       1.7  mycroft 		isa_dmaabort(isc->sc_ic, isc->sc_recdrq);
    658       1.7  mycroft 		isc->sc_recrun = 0;
    659       1.7  mycroft 	}
    660       1.7  mycroft 
    661       1.7  mycroft 	return (0);
    662       1.7  mycroft }
    663       1.7  mycroft 
    664       1.7  mycroft int
    665       1.7  mycroft ad1848_isa_halt_output(addr)
    666       1.7  mycroft 	void *addr;
    667       1.7  mycroft {
    668       1.7  mycroft 	struct ad1848_isa_softc *isc = addr;
    669      1.10  mycroft 	struct ad1848_softc *sc = &isc->sc_ad1848;
    670       1.7  mycroft 
    671       1.7  mycroft 	if (isc->sc_playrun) {
    672      1.13    itohy 		/* Mute wave output */
    673      1.13    itohy 		ad1848_mute_wave_output(sc, WAVE_MUTE2, 1);
    674      1.13    itohy 
    675       1.7  mycroft 		ad1848_halt_output(sc);
    676       1.7  mycroft 		isa_dmaabort(isc->sc_ic, isc->sc_playdrq);
    677       1.7  mycroft 		isc->sc_playrun = 0;
    678       1.7  mycroft 	}
    679       1.1       pk 
    680       1.6  mycroft 	return (0);
    681       1.1       pk }
    682       1.1       pk 
    683       1.1       pk int
    684       1.1       pk ad1848_isa_intr(arg)
    685       1.1       pk 	void *arg;
    686       1.1       pk {
    687       1.1       pk 	struct ad1848_isa_softc *isc = arg;
    688      1.10  mycroft 	struct ad1848_softc *sc = &isc->sc_ad1848;
    689       1.1       pk 	int retval = 0;
    690       1.1       pk 	u_char status;
    691       1.1       pk 
    692       1.1       pk 	/* Get intr status */
    693       1.1       pk 	status = ADREAD(sc, AD1848_STATUS);
    694       1.1       pk 
    695       1.1       pk #ifdef AUDIO_DEBUG
    696       1.1       pk 	if (ad1848debug > 1)
    697      1.18  thorpej 		printf("ad1848_isa_intr: pintr=%p rintr=%p status=%x\n",
    698      1.18  thorpej 		    isc->sc_pintr, isc->sc_rintr, status);
    699       1.1       pk #endif
    700       1.1       pk 	isc->sc_interrupts++;
    701       1.1       pk 
    702       1.1       pk 	/* Handle interrupt */
    703      1.17  thorpej 	if ((status & INTERRUPT_STATUS) != 0) {
    704      1.17  thorpej 		if (sc->mode == 2 && isc->sc_playdrq != isc->sc_recdrq) {
    705      1.17  thorpej 			status = ad_read(sc, CS_IRQ_STATUS);
    706      1.17  thorpej 			if ((status & CS_IRQ_PI) && isc->sc_pintr != NULL) {
    707      1.17  thorpej 				(*isc->sc_pintr)(isc->sc_parg);
    708      1.17  thorpej 				retval = 1;
    709      1.17  thorpej 			}
    710      1.17  thorpej 			if ((status & CS_IRQ_CI) && isc->sc_rintr != NULL) {
    711      1.17  thorpej 				(*isc->sc_rintr)(isc->sc_rarg);
    712      1.17  thorpej 				retval = 1;
    713      1.17  thorpej 			}
    714      1.17  thorpej 		} else {
    715      1.17  thorpej 			if (isc->sc_pintr != NULL) {
    716      1.17  thorpej 				(*isc->sc_pintr)(isc->sc_parg);
    717      1.17  thorpej 				retval = 1;
    718      1.17  thorpej 			}
    719      1.17  thorpej 		}
    720       1.1       pk 
    721      1.17  thorpej 		/* Clear interrupt */
    722       1.1       pk 		ADWRITE(sc, AD1848_STATUS, 0);
    723      1.17  thorpej 	}
    724       1.1       pk 	return(retval);
    725       1.1       pk }
    726       1.1       pk 
    727       1.1       pk void *
    728       1.5  mycroft ad1848_isa_malloc(addr, direction, size, pool, flags)
    729       1.1       pk 	void *addr;
    730       1.5  mycroft 	int direction;
    731       1.5  mycroft 	size_t size;
    732       1.5  mycroft 	int pool, flags;
    733       1.1       pk {
    734       1.1       pk 	struct ad1848_isa_softc *isc = addr;
    735       1.5  mycroft 	int drq;
    736       1.1       pk 
    737       1.5  mycroft 	if (direction == AUMODE_PLAY)
    738       1.6  mycroft 		drq = isc->sc_playdrq;
    739       1.5  mycroft 	else
    740       1.5  mycroft 		drq = isc->sc_recdrq;
    741       1.5  mycroft 	return (isa_malloc(isc->sc_ic, drq, size, pool, flags));
    742       1.1       pk }
    743       1.1       pk 
    744       1.1       pk void
    745       1.1       pk ad1848_isa_free(addr, ptr, pool)
    746       1.1       pk 	void *addr;
    747       1.1       pk 	void *ptr;
    748       1.1       pk 	int pool;
    749       1.1       pk {
    750       1.1       pk 	isa_free(ptr, pool);
    751       1.1       pk }
    752       1.1       pk 
    753       1.5  mycroft size_t
    754       1.5  mycroft ad1848_isa_round_buffersize(addr, direction, size)
    755       1.1       pk 	void *addr;
    756       1.5  mycroft 	int direction;
    757       1.5  mycroft 	size_t size;
    758       1.1       pk {
    759      1.14  thorpej 	struct ad1848_isa_softc *isc = addr;
    760      1.14  thorpej 	bus_size_t maxsize;
    761      1.14  thorpej 
    762      1.14  thorpej 	if (direction == AUMODE_PLAY)
    763      1.14  thorpej 		maxsize = isc->sc_play_maxsize;
    764      1.14  thorpej 	else if (isc->sc_recdrq == isc->sc_playdrq)
    765      1.14  thorpej 		maxsize = isc->sc_play_maxsize;
    766      1.14  thorpej 	else
    767      1.14  thorpej 		maxsize = isc->sc_rec_maxsize;
    768      1.14  thorpej 
    769      1.14  thorpej 	if (size > maxsize)
    770      1.14  thorpej 		size = maxsize;
    771       1.5  mycroft 	return (size);
    772       1.1       pk }
    773       1.1       pk 
    774      1.15   simonb paddr_t
    775       1.1       pk ad1848_isa_mappage(addr, mem, off, prot)
    776       1.1       pk 	void *addr;
    777       1.1       pk         void *mem;
    778      1.15   simonb         off_t off;
    779       1.1       pk 	int prot;
    780       1.1       pk {
    781       1.1       pk 	return isa_mappage(mem, off, prot);
    782       1.1       pk }
    783       1.1       pk 
    784       1.1       pk int
    785       1.1       pk ad1848_isa_get_props(addr)
    786       1.1       pk 	void *addr;
    787       1.1       pk {
    788       1.1       pk 	struct ad1848_isa_softc *isc = addr;
    789       1.1       pk 
    790       1.1       pk 	return (AUDIO_PROP_MMAP |
    791       1.6  mycroft 		(isc->sc_playdrq != isc->sc_recdrq ? AUDIO_PROP_FULLDUPLEX : 0));
    792       1.1       pk }
    793