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