Home | History | Annotate | Line # | Download | only in mca
if_we_mca.c revision 1.6
      1 /*	$NetBSD: if_we_mca.c,v 1.6 2002/09/27 20:39:17 thorpej Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1997, 1998, 2001 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
      9  * NASA Ames Research Center, and Jaromir Dolecek.
     10  *
     11  * Redistribution and use in source and binary forms, with or without
     12  * modification, are permitted provided that the following conditions
     13  * are met:
     14  * 1. Redistributions of source code must retain the above copyright
     15  *    notice, this list of conditions and the following disclaimer.
     16  * 2. Redistributions in binary form must reproduce the above copyright
     17  *    notice, this list of conditions and the following disclaimer in the
     18  *    documentation and/or other materials provided with the distribution.
     19  * 3. All advertising materials mentioning features or use of this software
     20  *    must display the following acknowledgement:
     21  *	This product includes software developed by the NetBSD
     22  *	Foundation, Inc. and its contributors.
     23  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24  *    contributors may be used to endorse or promote products derived
     25  *    from this software without specific prior written permission.
     26  *
     27  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37  * POSSIBILITY OF SUCH DAMAGE.
     38  */
     39 
     40 /*
     41  * Device driver for National Semiconductor DS8390/WD83C690 based ethernet
     42  * adapters.
     43  *
     44  * Copyright (c) 1994, 1995 Charles M. Hannum.  All rights reserved.
     45  *
     46  * Copyright (C) 1993, David Greenman.  This software may be used, modified,
     47  * copied, distributed, and sold, in both source and binary form provided that
     48  * the above copyright and these terms are retained.  Under no circumstances is
     49  * the author responsible for the proper functioning of this software, nor does
     50  * the author assume any responsibility for damages incurred with its use.
     51  */
     52 
     53 /*
     54  * Device driver for the Western Digital/SMC 8003 and 8013 series,
     55  * and the SMC Elite Ultra (8216).
     56  *
     57  * Currently only tested with WD8003W/A. Other WD8003-based cards
     58  * should work without problems, the SMC Elite based ones hopefully too.
     59  */
     60 
     61 #include <sys/cdefs.h>
     62 __KERNEL_RCSID(0, "$NetBSD: if_we_mca.c,v 1.6 2002/09/27 20:39:17 thorpej Exp $");
     63 
     64 #include <sys/param.h>
     65 #include <sys/systm.h>
     66 #include <sys/device.h>
     67 #include <sys/socket.h>
     68 #include <sys/mbuf.h>
     69 
     70 #include <net/if.h>
     71 #include <net/if_types.h>
     72 #include <net/if_media.h>
     73 #include <net/if_ether.h>
     74 
     75 #include <machine/bus.h>
     76 
     77 #include <dev/mca/mcareg.h>
     78 #include <dev/mca/mcavar.h>
     79 #include <dev/mca/mcadevs.h>
     80 
     81 #include <dev/ic/dp8390reg.h>
     82 #include <dev/ic/dp8390var.h>
     83 #include <dev/ic/wereg.h>
     84 #include <dev/ic/wevar.h>
     85 
     86 #define WD_8003		0x01
     87 #define WD_ELITE	0x02
     88 #define WD_MEMSIZE	16384	/* all supported cards have 16K Bytes memory */
     89 
     90 int we_mca_probe __P((struct device *, struct cfdata *, void *));
     91 void we_mca_attach __P((struct device *, struct device *, void *));
     92 void we_mca_init_hook __P((struct we_softc *));
     93 
     94 const struct cfattach we_mca_ca = {
     95 	sizeof(struct we_softc), we_mca_probe, we_mca_attach
     96 };
     97 
     98 /*
     99  * The types for some cards may not be correct; hopefully it's close
    100  * enough.
    101  */
    102 static const struct we_mca_product {
    103 	u_int32_t we_id;
    104 	const char *we_name;
    105 	int we_flag;
    106 	int we_type;
    107 	const char *we_typestr;
    108 } we_mca_products[] = {
    109 	{ MCA_PRODUCT_WD_8013EP, "EtherCard PLUS Elite/A (8013EP/A)",
    110 		WD_ELITE,	WE_TYPE_WD8013EP, "WD8013EP/A" },
    111 	{ MCA_PRODUCT_WD_8013WP, "EtherCard PLUS Elite 10T/A (8013WP/A)",
    112 		WD_ELITE,	WE_TYPE_WD8013EP, "WD8013WP/A" }, /* XXX */
    113 	{ MCA_PRODUCT_IBM_WD_2,"IBM PS/2 Adapter/A for Ethernet Networks (UTP)",
    114 		WD_ELITE, WE_TYPE_WD8013EP, "WD8013WP/A"}, /* XXX */
    115 	{ MCA_PRODUCT_IBM_WD_T,"IBM PS/2 Adapter/A for Ethernet Networks (BNC)",
    116 		WD_ELITE, WE_TYPE_WD8013EP, "WD8013WP/A"}, /* XXX */
    117 	{ MCA_PRODUCT_WD_8003E,	"WD EtherCard PLUS/A (WD8003E/A or WD8003ET/A)",
    118 		WD_8003,	WE_TYPE_WD8003E, "WD8003E/A or WD8003ET/A" },
    119 	{ MCA_PRODUCT_WD_8003ST,"WD StarCard PLUS/A (WD8003ST/A)",
    120 		WD_8003,	WE_TYPE_WD8003W, "WD8003ST/A" }, /* XXX */
    121 	{ MCA_PRODUCT_WD_8003W,	"WD EtherCard PLUS 10T/A (WD8003W/A)",
    122 		WD_8003,	WE_TYPE_WD8003W, "WD8003W/A" },
    123 	{ MCA_PRODUCT_IBM_WD_O, "IBM PS/2 Adapter/A for Ethernet Networks",
    124 		WD_8003,	WE_TYPE_WD8003W, "IBM PS/2 Adapter/A" },/*XXX*/
    125 	{ 0x0000,			NULL },
    126 };
    127 
    128 /* see POS description in we_mca_attach() */
    129 static const int we_mca_irq[] = {
    130 	3, 4, 10, 15,
    131 };
    132 
    133 /* memory position and shared RAM sizes for WD8013-type of cards */
    134 static const struct {
    135 	u_int8_t id;
    136 	int maddr;
    137 	int memsize;
    138 } we_mca_elite_mem[] = {
    139 	{ 0x10,	0x0C0000, 16384 },
    140 	{ 0x12,	0x0C4000, 16384 },
    141 	{ 0x14,	0x0C8000, 16384 },
    142 	{ 0x16,	0x0CC000, 16384 },
    143 	{ 0x18,	0x0D0000, 16384 },
    144 	{ 0x1A,	0x0D4000, 16384 },
    145 	{ 0x1C,	0x0D8000, 16384 },
    146 	{ 0x1E,	0x0DC000, 16384 },
    147 	{ 0x90,	0xFC0000, 16384 },
    148 	{ 0x94,	0xFC8000, 16384 },
    149 	{ 0x98,	0xFD0000, 16384 },
    150 	{ 0x9C,	0x0C0000, 16384 },
    151 	{ 0x00,	0x0C0000, 8192 },
    152 	{ 0x01,	0x0C2000, 8192 },
    153 	{ 0x10,	0x0C4000, 8192 },
    154 	{ 0x11,	0x0C6000, 8192 },
    155 	{ 0x00, 0x000000, 0    },
    156 };
    157 
    158 
    159 static const struct we_mca_product *we_mca_lookup __P((int));
    160 
    161 static const struct we_mca_product *
    162 we_mca_lookup(id)
    163 	int id;
    164 {
    165 	const struct we_mca_product *wep;
    166 
    167 	for(wep = we_mca_products; wep->we_name; wep++)
    168 		if (wep->we_id == id)
    169 			return (wep);
    170 
    171 	return (NULL);
    172 }
    173 
    174 int
    175 we_mca_probe(parent, cf, aux)
    176 	struct device *parent;
    177 	struct cfdata *cf;
    178 	void *aux;
    179 {
    180 	struct mca_attach_args *ma = aux;
    181 
    182 	return (we_mca_lookup(ma->ma_id) != NULL);
    183 }
    184 
    185 void
    186 we_mca_attach(parent, self, aux)
    187 	struct device *parent, *self;
    188 	void *aux;
    189 {
    190 	struct we_softc *wsc = (struct we_softc *)self;
    191 	struct dp8390_softc *sc = &wsc->sc_dp8390;
    192 	struct mca_attach_args *ma = aux;
    193 	const struct we_mca_product *wep;
    194 	bus_space_tag_t nict, asict, memt;
    195 	bus_space_handle_t nich, asich, memh;
    196 	const char *typestr;
    197 	int irq, iobase, maddr;
    198 	int pos2, pos3, pos5;
    199 
    200 	pos2 = mca_conf_read(ma->ma_mc, ma->ma_slot, 2);
    201 	pos3 = mca_conf_read(ma->ma_mc, ma->ma_slot, 3);
    202 	pos5 = mca_conf_read(ma->ma_mc, ma->ma_slot, 5);
    203 
    204 	/*
    205 	 * POS registers differ much between 8003 and 8013, so they are
    206 	 * divided to two sections.
    207 	 *
    208 	 * 8003: POS register 2: (adf pos0)
    209 	 * 7 6 5 4 3 2 1 0
    210 	 * 0 0 1  \___/  \__ enable: 0=adapter disabled, 1=adapter enabled
    211 	 *            \_____ Adapter IO Space: 0x200-0x29F + XX*0x20
    212 	 *
    213 	 * 8003: POS register 3: (adf pos1)
    214 	 * 7 6 5 4 3 2 1 0
    215 	 * 1 1 0  \__/ 1 X
    216 	 *           \______ Shared Ram Space (16K Bytes):
    217 	 *                     0xC0000-0xC3FFF + XX * 0x4000
    218 	 *
    219 	 * 8003: POS register 5: (adf pos3)
    220 	 * 7 6 5 4 3 2 1 0
    221 	 *             \_/
    222 	 *               \__ Interrupt Level: 00=3 01=4 10=10 11=15
    223 	 *
    224 	 * -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    225 	 *
    226 	 * 8013: POS register 2: (adf pos0)
    227 	 * 7 6 5 4 3 2 1 0
    228 	 * \____/        \__ enable: 0=adapter disabled, 1=adapter enabled
    229 	 *      \___________ Adapter I/O Space: 0x0800-0x081F + XX * 0x1000
    230 	 *
    231 	 * 8013: POS register 3: (adf pos1)
    232 	 * 7 6 5 4 3 2 1 0
    233 	 *   X 0             Shared Ram Base Address - mask 0x9f
    234 	 *                     see wd_elite_mem[] array for details
    235 	 *
    236 	 * 8013: POS register 5: (adf pos3)
    237 	 * 7 6 5 4 3 2 1 0
    238 	 *         \_/ \_/
    239 	 *           \   \__ Media Select: 00=TwPr (no link) 10=BNC
    240 	 *            \          01=AUI|AUI or 10BaseT
    241 	 *             \____ Interrupt Level: 00=3 01=4 10=10 11=14
    242 	 */
    243 
    244 	wep = we_mca_lookup(ma->ma_id);
    245 #ifdef DIAGNOSTIC
    246 	if (wep == NULL) {
    247 		printf("\n%s: where did the card go?\n", sc->sc_dev.dv_xname);
    248 		return;
    249 	}
    250 #endif
    251 
    252 	if (wep->we_flag & WD_8003) {
    253 		/* WD8003 based */
    254 		iobase = 0x200 + (((pos2 & 0x0e) >> 1) * 0x020);
    255 		maddr  = 0xC0000 + (((pos3 & 0x1c) >> 2) * 0x04000);
    256 		irq = we_mca_irq[(pos5 & 0x03)];
    257 		sc->mem_size = WD_MEMSIZE;
    258 	} else {
    259 		/* SMC Elite */
    260 		int i, id;
    261 
    262 		iobase = 0x800 + (((pos2 & 0xf0) >> 4) * 0x1000);
    263 		irq = we_mca_irq[(pos5 & 0x06) >> 2];
    264 
    265 		/* find location of shared mem and it's size */
    266 		id = (pos3 & 0x9f);
    267 		for(i=0; we_mca_elite_mem[i].maddr; i++)
    268 			if (we_mca_elite_mem[i].id == id)
    269 				break;
    270 		if (we_mca_elite_mem[i].maddr == 0) {
    271 			printf("\n%s: cannot find Shared Ram Base Address\n",
    272 				sc->sc_dev.dv_xname);
    273 			return;
    274 		}
    275 
    276 		maddr = we_mca_elite_mem[i].maddr;
    277 		sc->mem_size = we_mca_elite_mem[i].memsize;
    278 	}
    279 
    280 	nict = asict = ma->ma_iot;
    281 	memt = ma->ma_memt;
    282 
    283 	printf(" slot %d irq %d: %s\n", ma->ma_slot + 1, irq, wep->we_name);
    284 
    285 	/* Map the device. */
    286 	if (bus_space_map(asict, iobase, WE_NPORTS, 0, &asich)) {
    287 		printf("%s: can't map nic i/o space\n",
    288 		    sc->sc_dev.dv_xname);
    289 		return;
    290 	}
    291 
    292 	if (bus_space_subregion(asict, asich, WE_NIC_OFFSET, WE_NIC_NPORTS,
    293 	    &nich)) {
    294 		printf("%s: can't subregion i/o space\n",
    295 		    sc->sc_dev.dv_xname);
    296 		return;
    297 	}
    298 
    299 	wsc->sc_type = wep->we_type;
    300 	wsc->sc_16bitp = 1;		/* all cards we support are 16bit */
    301 	sc->is790 = 0;
    302 	typestr = wep->we_typestr;
    303 
    304 	/*
    305 	 * Map memory space.
    306 	 */
    307 	if (bus_space_map(memt, maddr, sc->mem_size, 0, &memh)) {
    308 		printf("%s: can't map shared memory\n",
    309 		    sc->sc_dev.dv_xname);
    310 		return;
    311 	}
    312 
    313 	wsc->sc_asict = asict;
    314 	wsc->sc_asich = asich;
    315 
    316 	sc->sc_regt = nict;
    317 	sc->sc_regh = nich;
    318 
    319 	sc->sc_buft = memt;
    320 	sc->sc_bufh = memh;
    321 
    322 	wsc->sc_maddr = maddr;
    323 
    324 	/* Interface is always enabled. */
    325 	sc->sc_enabled = 1;
    326 
    327 	wsc->sc_init_hook = we_mca_init_hook;
    328 
    329 	if (we_config(self, wsc, typestr))
    330 		return;
    331 
    332 	/* Map and establish the interrupt. */
    333 	wsc->sc_ih = mca_intr_establish(ma->ma_mc, irq,
    334 			    IPL_NET, dp8390_intr, sc);
    335 	if (wsc->sc_ih == NULL) {
    336 		printf("%s: can't establish interrupt\n", sc->sc_dev.dv_xname);
    337 		return;
    338 	}
    339 }
    340 
    341 void
    342 we_mca_init_hook(wsc)
    343 	struct we_softc *wsc;
    344 {
    345 	/*
    346 	 * This quirk really needs to be here, at least for WD8003W/A. Without
    347 	 * this, the card doesn't send any interrupts in 16bit mode. The quirk
    348 	 * was taken from Linux smc-mca.c driver.
    349 	 * I do not know why it's necessary. I don't want to know. It works
    350 	 * and that is enough for me.
    351 	 */
    352 	bus_space_write_1(wsc->sc_asict, wsc->sc_asich, WE_LAAR, 0x04);
    353 	wsc->sc_laar_proto |= 0x04;
    354 }
    355