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