Home | History | Annotate | Line # | Download | only in mca
if_we_mca.c revision 1.4.2.2
      1 /*	$NetBSD: if_we_mca.c,v 1.4.2.2 2002/10/10 18:40:04 jdolecek 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.4.2.2 2002/10/10 18:40:04 jdolecek 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 CFATTACH_DECL(we_mca, sizeof(struct we_softc),
     95     we_mca_probe, we_mca_attach, NULL, NULL);
     96 
     97 /*
     98  * The types for some cards may not be correct; hopefully it's close
     99  * enough.
    100  */
    101 static const struct we_mca_product {
    102 	u_int32_t we_id;
    103 	const char *we_name;
    104 	int we_flag;
    105 	int we_type;
    106 	const char *we_typestr;
    107 } we_mca_products[] = {
    108 	{ MCA_PRODUCT_WD_8013EP, "EtherCard PLUS Elite/A (8013EP/A)",
    109 		WD_ELITE,	WE_TYPE_WD8013EP, "WD8013EP/A" },
    110 	{ MCA_PRODUCT_WD_8013WP, "EtherCard PLUS Elite 10T/A (8013WP/A)",
    111 		WD_ELITE,	WE_TYPE_WD8013EP, "WD8013WP/A" }, /* XXX */
    112 	{ MCA_PRODUCT_IBM_WD_2,"IBM PS/2 Adapter/A for Ethernet Networks (UTP)",
    113 		WD_ELITE, WE_TYPE_WD8013EP, "WD8013WP/A"}, /* XXX */
    114 	{ MCA_PRODUCT_IBM_WD_T,"IBM PS/2 Adapter/A for Ethernet Networks (BNC)",
    115 		WD_ELITE, WE_TYPE_WD8013EP, "WD8013WP/A"}, /* XXX */
    116 	{ MCA_PRODUCT_WD_8003E,	"WD EtherCard PLUS/A (WD8003E/A or WD8003ET/A)",
    117 		WD_8003,	WE_TYPE_WD8003E, "WD8003E/A or WD8003ET/A" },
    118 	{ MCA_PRODUCT_WD_8003ST,"WD StarCard PLUS/A (WD8003ST/A)",
    119 		WD_8003,	WE_TYPE_WD8003W, "WD8003ST/A" }, /* XXX */
    120 	{ MCA_PRODUCT_WD_8003W,	"WD EtherCard PLUS 10T/A (WD8003W/A)",
    121 		WD_8003,	WE_TYPE_WD8003W, "WD8003W/A" },
    122 	{ MCA_PRODUCT_IBM_WD_O, "IBM PS/2 Adapter/A for Ethernet Networks",
    123 		WD_8003,	WE_TYPE_WD8003W, "IBM PS/2 Adapter/A" },/*XXX*/
    124 	{ 0x0000,			NULL },
    125 };
    126 
    127 /* see POS description in we_mca_attach() */
    128 static const int we_mca_irq[] = {
    129 	3, 4, 10, 15,
    130 };
    131 
    132 /* memory position and shared RAM sizes for WD8013-type of cards */
    133 static const struct {
    134 	u_int8_t id;
    135 	int maddr;
    136 	int memsize;
    137 } we_mca_elite_mem[] = {
    138 	{ 0x10,	0x0C0000, 16384 },
    139 	{ 0x12,	0x0C4000, 16384 },
    140 	{ 0x14,	0x0C8000, 16384 },
    141 	{ 0x16,	0x0CC000, 16384 },
    142 	{ 0x18,	0x0D0000, 16384 },
    143 	{ 0x1A,	0x0D4000, 16384 },
    144 	{ 0x1C,	0x0D8000, 16384 },
    145 	{ 0x1E,	0x0DC000, 16384 },
    146 	{ 0x90,	0xFC0000, 16384 },
    147 	{ 0x94,	0xFC8000, 16384 },
    148 	{ 0x98,	0xFD0000, 16384 },
    149 	{ 0x9C,	0x0C0000, 16384 },
    150 	{ 0x00,	0x0C0000, 8192 },
    151 	{ 0x01,	0x0C2000, 8192 },
    152 	{ 0x10,	0x0C4000, 8192 },
    153 	{ 0x11,	0x0C6000, 8192 },
    154 	{ 0x00, 0x000000, 0    },
    155 };
    156 
    157 
    158 static const struct we_mca_product *we_mca_lookup __P((int));
    159 
    160 static const struct we_mca_product *
    161 we_mca_lookup(id)
    162 	int id;
    163 {
    164 	const struct we_mca_product *wep;
    165 
    166 	for(wep = we_mca_products; wep->we_name; wep++)
    167 		if (wep->we_id == id)
    168 			return (wep);
    169 
    170 	return (NULL);
    171 }
    172 
    173 int
    174 we_mca_probe(parent, cf, aux)
    175 	struct device *parent;
    176 	struct cfdata *cf;
    177 	void *aux;
    178 {
    179 	struct mca_attach_args *ma = aux;
    180 
    181 	return (we_mca_lookup(ma->ma_id) != NULL);
    182 }
    183 
    184 void
    185 we_mca_attach(parent, self, aux)
    186 	struct device *parent, *self;
    187 	void *aux;
    188 {
    189 	struct we_softc *wsc = (struct we_softc *)self;
    190 	struct dp8390_softc *sc = &wsc->sc_dp8390;
    191 	struct mca_attach_args *ma = aux;
    192 	const struct we_mca_product *wep;
    193 	bus_space_tag_t nict, asict, memt;
    194 	bus_space_handle_t nich, asich, memh;
    195 	const char *typestr;
    196 	int irq, iobase, maddr;
    197 	int pos2, pos3, pos5;
    198 
    199 	pos2 = mca_conf_read(ma->ma_mc, ma->ma_slot, 2);
    200 	pos3 = mca_conf_read(ma->ma_mc, ma->ma_slot, 3);
    201 	pos5 = mca_conf_read(ma->ma_mc, ma->ma_slot, 5);
    202 
    203 	/*
    204 	 * POS registers differ much between 8003 and 8013, so they are
    205 	 * divided to two sections.
    206 	 *
    207 	 * 8003: POS register 2: (adf pos0)
    208 	 * 7 6 5 4 3 2 1 0
    209 	 * 0 0 1  \___/  \__ enable: 0=adapter disabled, 1=adapter enabled
    210 	 *            \_____ Adapter IO Space: 0x200-0x29F + XX*0x20
    211 	 *
    212 	 * 8003: POS register 3: (adf pos1)
    213 	 * 7 6 5 4 3 2 1 0
    214 	 * 1 1 0  \__/ 1 X
    215 	 *           \______ Shared Ram Space (16K Bytes):
    216 	 *                     0xC0000-0xC3FFF + XX * 0x4000
    217 	 *
    218 	 * 8003: POS register 5: (adf pos3)
    219 	 * 7 6 5 4 3 2 1 0
    220 	 *             \_/
    221 	 *               \__ Interrupt Level: 00=3 01=4 10=10 11=15
    222 	 *
    223 	 * -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    224 	 *
    225 	 * 8013: POS register 2: (adf pos0)
    226 	 * 7 6 5 4 3 2 1 0
    227 	 * \____/        \__ enable: 0=adapter disabled, 1=adapter enabled
    228 	 *      \___________ Adapter I/O Space: 0x0800-0x081F + XX * 0x1000
    229 	 *
    230 	 * 8013: POS register 3: (adf pos1)
    231 	 * 7 6 5 4 3 2 1 0
    232 	 *   X 0             Shared Ram Base Address - mask 0x9f
    233 	 *                     see wd_elite_mem[] array for details
    234 	 *
    235 	 * 8013: POS register 5: (adf pos3)
    236 	 * 7 6 5 4 3 2 1 0
    237 	 *         \_/ \_/
    238 	 *           \   \__ Media Select: 00=TwPr (no link) 10=BNC
    239 	 *            \          01=AUI|AUI or 10BaseT
    240 	 *             \____ Interrupt Level: 00=3 01=4 10=10 11=14
    241 	 */
    242 
    243 	wep = we_mca_lookup(ma->ma_id);
    244 #ifdef DIAGNOSTIC
    245 	if (wep == NULL) {
    246 		printf("\n%s: where did the card go?\n", sc->sc_dev.dv_xname);
    247 		return;
    248 	}
    249 #endif
    250 
    251 	if (wep->we_flag & WD_8003) {
    252 		/* WD8003 based */
    253 		iobase = 0x200 + (((pos2 & 0x0e) >> 1) * 0x020);
    254 		maddr  = 0xC0000 + (((pos3 & 0x1c) >> 2) * 0x04000);
    255 		irq = we_mca_irq[(pos5 & 0x03)];
    256 		sc->mem_size = WD_MEMSIZE;
    257 	} else {
    258 		/* SMC Elite */
    259 		int i, id;
    260 
    261 		iobase = 0x800 + (((pos2 & 0xf0) >> 4) * 0x1000);
    262 		irq = we_mca_irq[(pos5 & 0x06) >> 2];
    263 
    264 		/* find location of shared mem and it's size */
    265 		id = (pos3 & 0x9f);
    266 		for(i=0; we_mca_elite_mem[i].maddr; i++)
    267 			if (we_mca_elite_mem[i].id == id)
    268 				break;
    269 		if (we_mca_elite_mem[i].maddr == 0) {
    270 			printf("\n%s: cannot find Shared Ram Base Address\n",
    271 				sc->sc_dev.dv_xname);
    272 			return;
    273 		}
    274 
    275 		maddr = we_mca_elite_mem[i].maddr;
    276 		sc->mem_size = we_mca_elite_mem[i].memsize;
    277 	}
    278 
    279 	nict = asict = ma->ma_iot;
    280 	memt = ma->ma_memt;
    281 
    282 	printf(" slot %d irq %d: %s\n", ma->ma_slot + 1, irq, wep->we_name);
    283 
    284 	/* Map the device. */
    285 	if (bus_space_map(asict, iobase, WE_NPORTS, 0, &asich)) {
    286 		printf("%s: can't map nic i/o space\n",
    287 		    sc->sc_dev.dv_xname);
    288 		return;
    289 	}
    290 
    291 	if (bus_space_subregion(asict, asich, WE_NIC_OFFSET, WE_NIC_NPORTS,
    292 	    &nich)) {
    293 		printf("%s: can't subregion i/o space\n",
    294 		    sc->sc_dev.dv_xname);
    295 		return;
    296 	}
    297 
    298 	wsc->sc_type = wep->we_type;
    299 	wsc->sc_16bitp = 1;		/* all cards we support are 16bit */
    300 	sc->is790 = 0;
    301 	typestr = wep->we_typestr;
    302 
    303 	/*
    304 	 * Map memory space.
    305 	 */
    306 	if (bus_space_map(memt, maddr, sc->mem_size, 0, &memh)) {
    307 		printf("%s: can't map shared memory\n",
    308 		    sc->sc_dev.dv_xname);
    309 		return;
    310 	}
    311 
    312 	wsc->sc_asict = asict;
    313 	wsc->sc_asich = asich;
    314 
    315 	sc->sc_regt = nict;
    316 	sc->sc_regh = nich;
    317 
    318 	sc->sc_buft = memt;
    319 	sc->sc_bufh = memh;
    320 
    321 	wsc->sc_maddr = maddr;
    322 
    323 	/* Interface is always enabled. */
    324 	sc->sc_enabled = 1;
    325 
    326 	wsc->sc_init_hook = we_mca_init_hook;
    327 
    328 	if (we_config(self, wsc, typestr))
    329 		return;
    330 
    331 	/* Map and establish the interrupt. */
    332 	wsc->sc_ih = mca_intr_establish(ma->ma_mc, irq,
    333 			    IPL_NET, dp8390_intr, sc);
    334 	if (wsc->sc_ih == NULL) {
    335 		printf("%s: can't establish interrupt\n", sc->sc_dev.dv_xname);
    336 		return;
    337 	}
    338 }
    339 
    340 void
    341 we_mca_init_hook(wsc)
    342 	struct we_softc *wsc;
    343 {
    344 	/*
    345 	 * This quirk really needs to be here, at least for WD8003W/A. Without
    346 	 * this, the card doesn't send any interrupts in 16bit mode. The quirk
    347 	 * was taken from Linux smc-mca.c driver.
    348 	 * I do not know why it's necessary. I don't want to know. It works
    349 	 * and that is enough for me.
    350 	 */
    351 	bus_space_write_1(wsc->sc_asict, wsc->sc_asich, WE_LAAR, 0x04);
    352 	wsc->sc_laar_proto |= 0x04;
    353 }
    354