Home | History | Annotate | Line # | Download | only in isa
if_ai.c revision 1.26.16.1
      1 /*	$NetBSD: if_ai.c,v 1.26.16.1 2008/06/02 13:23:31 mjf Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1998 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Rafal K. Boni.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 __KERNEL_RCSID(0, "$NetBSD: if_ai.c,v 1.26.16.1 2008/06/02 13:23:31 mjf Exp $");
     34 
     35 #include <sys/param.h>
     36 #include <sys/systm.h>
     37 #include <sys/mbuf.h>
     38 #include <sys/errno.h>
     39 #include <sys/device.h>
     40 #include <sys/protosw.h>
     41 #include <sys/socket.h>
     42 
     43 #include <net/if.h>
     44 #include <net/if_dl.h>
     45 #include <net/if_types.h>
     46 #include <net/if_media.h>
     47 #include <net/if_ether.h>
     48 
     49 #include <sys/cpu.h>
     50 #include <sys/bus.h>
     51 #include <sys/intr.h>
     52 
     53 #include <dev/isa/isareg.h>
     54 #include <dev/isa/isavar.h>
     55 
     56 #include <dev/ic/i82586reg.h>
     57 #include <dev/ic/i82586var.h>
     58 #include <dev/isa/if_aireg.h>
     59 
     60 #ifdef AI_DEBUG
     61 #define DPRINTF(x)	printf x
     62 #else
     63 #define DPRINTF(x)
     64 #endif
     65 
     66 struct ai_softc {
     67 	struct ie_softc sc_ie;
     68 
     69 	bus_space_tag_t sc_regt;	/* space tag for registers */
     70 	bus_space_handle_t sc_regh;	/* space handle for registers */
     71 
     72 	u_int8_t	card_rev;
     73 	u_int8_t	card_type;
     74 
     75 	void		*sc_ih;		/* interrupt handle */
     76 };
     77 
     78 const char *ai_names[] = {
     79         "StarLAN 10",
     80         "EN100",
     81         "StarLAN Fiber",
     82 };
     83 
     84 /* Functions required by the i82586 MI driver */
     85 static void 	ai_reset(struct ie_softc *, int);
     86 static void 	ai_atten(struct ie_softc *, int);
     87 
     88 static void	ai_copyin(struct ie_softc *, void *, int, size_t);
     89 static void	ai_copyout(struct ie_softc *, const void *, int, size_t);
     90 
     91 static u_int16_t ai_read_16(struct ie_softc *, int);
     92 static void	ai_write_16(struct ie_softc *, int, u_int16_t);
     93 static void	ai_write_24(struct ie_softc *, int, int);
     94 
     95 /* Local support functions */
     96 static int 	check_ie_present(struct ie_softc*, bus_space_tag_t,
     97 					bus_space_handle_t, bus_size_t);
     98 static int	ai_find_mem_size(struct ai_softc*, bus_space_tag_t,
     99 					bus_size_t);
    100 
    101 int ai_match(struct device *, struct cfdata *, void *);
    102 void ai_attach(struct device *, struct device *, void *);
    103 
    104 /*
    105  * AT&T StarLan support routines
    106  */
    107 static void
    108 ai_reset(sc, why)
    109 	struct ie_softc *sc;
    110 	int why;
    111 {
    112 	struct ai_softc* asc = (struct ai_softc *) sc;
    113 
    114 	switch (why) {
    115 	case CHIP_PROBE:
    116 		/* reset to chip to see if it responds */
    117 		bus_space_write_1(asc->sc_regt, asc->sc_regh, AI_RESET, 0);
    118 		DELAY(100);
    119 		break;
    120 
    121 	case CARD_RESET:
    122 		/*
    123 		 * this takes around 10sec, and we can get
    124 		 * by quite well w/out it...
    125 		 */
    126 		break;
    127 	}
    128 }
    129 
    130 static void
    131 ai_atten(struct ie_softc *sc, int why)
    132 {
    133     struct ai_softc* asc = (struct ai_softc *) sc;
    134     bus_space_write_1(asc->sc_regt, asc->sc_regh, AI_ATTN, 0);
    135 }
    136 
    137 static void
    138 ai_copyin (sc, dst, offset, size)
    139         struct ie_softc *sc;
    140         void *dst;
    141         int offset;
    142         size_t size;
    143 {
    144 	int dribble;
    145 	u_int8_t* bptr = dst;
    146 
    147 	bus_space_barrier(sc->bt, sc->bh, offset, size,
    148 			  BUS_SPACE_BARRIER_READ);
    149 
    150 	if (offset % 2) {
    151 		*bptr = bus_space_read_1(sc->bt, sc->bh, offset);
    152 		offset++; bptr++; size--;
    153 	}
    154 
    155 	dribble = size % 2;
    156 	bus_space_read_region_2(sc->bt, sc->bh, offset, (u_int16_t *) bptr,
    157 				size >> 1);
    158 
    159 	if (dribble) {
    160 		bptr += size - 1;
    161 		offset += size - 1;
    162 		*bptr = bus_space_read_1(sc->bt, sc->bh, offset);
    163 	}
    164 }
    165 
    166 static void
    167 ai_copyout (sc, src, offset, size)
    168         struct ie_softc *sc;
    169         const void *src;
    170         int offset;
    171         size_t size;
    172 {
    173 	int dribble;
    174 	int osize = size;
    175 	int ooffset = offset;
    176 	const u_int8_t* bptr = src;
    177 
    178 	if (offset % 2) {
    179 		bus_space_write_1(sc->bt, sc->bh, offset, *bptr);
    180 		offset++; bptr++; size--;
    181 	}
    182 
    183 	dribble = size % 2;
    184 	bus_space_write_region_2(sc->bt, sc->bh, offset,
    185 	    (const u_int16_t *)bptr, size >> 1);
    186 	if (dribble) {
    187 		bptr += size - 1;
    188 		offset += size - 1;
    189 		bus_space_write_1(sc->bt, sc->bh, offset, *bptr);
    190 	}
    191 
    192 	bus_space_barrier(sc->bt, sc->bh, ooffset, osize,
    193 			  BUS_SPACE_BARRIER_WRITE);
    194 }
    195 
    196 static u_int16_t
    197 ai_read_16 (sc, offset)
    198         struct ie_softc *sc;
    199         int offset;
    200 {
    201 	bus_space_barrier(sc->bt, sc->bh, offset, 2, BUS_SPACE_BARRIER_READ);
    202         return bus_space_read_2(sc->bt, sc->bh, offset);
    203 }
    204 
    205 static void
    206 ai_write_16 (sc, offset, value)
    207         struct ie_softc *sc;
    208         int offset;
    209         u_int16_t value;
    210 {
    211         bus_space_write_2(sc->bt, sc->bh, offset, value);
    212 	bus_space_barrier(sc->bt, sc->bh, offset, 2, BUS_SPACE_BARRIER_WRITE);
    213 }
    214 
    215 static void
    216 ai_write_24 (sc, offset, addr)
    217         struct ie_softc *sc;
    218         int offset, addr;
    219 {
    220         bus_space_write_4(sc->bt, sc->bh, offset, addr +
    221                                 (u_long) sc->sc_maddr - (u_long) sc->sc_iobase);
    222 	bus_space_barrier(sc->bt, sc->bh, offset, 4, BUS_SPACE_BARRIER_WRITE);
    223 }
    224 
    225 int
    226 ai_match(struct device *parent, struct cfdata *cf, void *aux)
    227 {
    228 	int rv = 0;
    229 	u_int8_t val, type;
    230 	bus_size_t memsize;
    231 	bus_space_tag_t iot;
    232 	bus_space_handle_t ioh;
    233 	struct isa_attach_args * const ia = aux;
    234 	struct ai_softc asc;
    235 
    236 	if (ia->ia_nio < 1)
    237 		return (0);
    238 	if (ia->ia_niomem < 1)
    239 		return (0);
    240 	if (ia->ia_nirq < 1)
    241 		return (0);
    242 
    243 	if (ISA_DIRECT_CONFIG(ia))
    244 		return (0);
    245 
    246 	/* Punt if wildcarded port, IRQ or memory address */
    247 	if (ia->ia_io[0].ir_addr == ISA_UNKNOWN_PORT ||
    248 	    ia->ia_iomem[0].ir_addr == ISA_UNKNOWN_IOMEM ||
    249 	    ia->ia_irq[0].ir_irq == ISA_UNKNOWN_IRQ) {
    250 		DPRINTF((
    251 		 "ai_match: wildcarded IRQ, IOAddr, or memAddr, skipping\n"));
    252 		return (0);
    253 	}
    254 
    255 	iot = ia->ia_iot;
    256 
    257 	/*
    258 	 * This probe is horribly bad, but I have no info on this card other
    259 	 * than the former driver, and it was just as bad!
    260 	 */
    261 	if (bus_space_map(iot, ia->ia_io[0].ir_addr,
    262 			  AI_IOSIZE, 0, &ioh) != 0) {
    263 
    264 		DPRINTF(("ai_match: cannot map %d IO ports @ 0x%x\n",
    265 			 AI_IOSIZE, ia->ia_iobase));
    266 		return (0);
    267 	}
    268 
    269 	val = bus_space_read_1(iot, ioh, AI_REVISION);
    270 
    271 	type = SL_BOARD(val);
    272 	if (type != SL10_BOARD && type != EN100_BOARD &&
    273 	    type != SLFIBER_BOARD) {
    274 		DPRINTF(("ai_match: unknown board code 0x%02x @ 0x%x\n",
    275 			 type, ia->ia_iobase));
    276 		goto out;
    277 	}
    278 
    279 	/*
    280 	 * Fill in just about enough of our local `ai_softc' for
    281 	 * ai_find_mem_size() to do its job.
    282 	 */
    283 	memset(&asc, 0, sizeof asc);
    284 	asc.sc_regt = iot;
    285 	asc.sc_regh = ioh;
    286 
    287 	if ((memsize = ai_find_mem_size(&asc, ia->ia_memt,
    288 	     ia->ia_iomem[0].ir_addr)) == 0) {
    289 		DPRINTF(("ai_match: cannot size memory of board @ 0x%x\n",
    290 			 ia->ia_io[0].ir_addr));
    291 		goto out;
    292 	}
    293 
    294 	if (ia->ia_iomem[0].ir_size != 0 &&
    295 	    ia->ia_iomem[0].ir_size != memsize) {
    296 		DPRINTF((
    297 		   "ai_match: memsize of board @ 0x%x doesn't match config\n",
    298 		   ia->ia_iobase));
    299 		goto out;
    300 	}
    301 
    302 	rv = 1;
    303 
    304 	ia->ia_nio = 1;
    305 	ia->ia_io[0].ir_size = AI_IOSIZE;
    306 
    307 	ia->ia_niomem = 1;
    308 	ia->ia_iomem[0].ir_size = memsize;
    309 
    310 	ia->ia_nirq = 1;
    311 
    312 	ia->ia_ndrq = 0;
    313 
    314 	DPRINTF(("ai_match: found board @ 0x%x\n", ia->ia_iobase));
    315 
    316 out:
    317 	bus_space_unmap(iot, ioh, AI_IOSIZE);
    318 	return rv;
    319 }
    320 
    321 void
    322 ai_attach(struct device *parent, struct device *self, void *aux)
    323 {
    324 	struct ai_softc *asc = (void *)self;
    325 	struct ie_softc *sc = &asc->sc_ie;
    326 	struct isa_attach_args *ia = aux;
    327 
    328 	u_int8_t val = 0;
    329 	bus_space_handle_t ioh, memh;
    330 	u_int8_t ethaddr[ETHER_ADDR_LEN];
    331 	char name[80];
    332 
    333 	if (bus_space_map(ia->ia_iot, ia->ia_io[0].ir_addr,
    334 			  ia->ia_io[0].ir_size, 0, &ioh) != 0) {
    335 		DPRINTF(("\n%s: can't map i/o space 0x%x-0x%x\n",
    336 			 device_xname(&sc->sc_dev),
    337 		         ia->ia_io[0].ir_addr, ia->ia_io[0].ir_addr +
    338 		         ia->ia_io[0].ir_size - 1));
    339 		return;
    340 	}
    341 
    342 	if (bus_space_map(ia->ia_memt, ia->ia_iomem[0].ir_addr,
    343 			  ia->ia_iomem[0].ir_size, 0, &memh) != 0) {
    344 		DPRINTF(("\n%s: can't map iomem space 0x%x-0x%x\n",
    345 			 device_xname(&sc->sc_dev),
    346 			 ia->ia_iomem[0].ir_addr, ia->ia_iomem[0].ir_addr +
    347 			 ia->ia_iomem[0].ir_size - 1));
    348 		bus_space_unmap(ia->ia_iot, ioh, ia->ia_io[0].ir_size);
    349 		return;
    350 	}
    351 
    352 	asc->sc_regt = ia->ia_iot;
    353 	asc->sc_regh = ioh;
    354 
    355 	sc->hwinit = NULL;
    356 	sc->intrhook = NULL;
    357 	sc->hwreset = ai_reset;
    358 	sc->chan_attn = ai_atten;
    359 
    360 	sc->ie_bus_barrier = NULL;
    361 
    362 	sc->memcopyin = ai_copyin;
    363 	sc->memcopyout = ai_copyout;
    364 	sc->ie_bus_read16 = ai_read_16;
    365 	sc->ie_bus_write16 = ai_write_16;
    366 	sc->ie_bus_write24 = ai_write_24;
    367 
    368 	sc->do_xmitnopchain = 0;
    369 
    370 	sc->sc_mediachange = NULL;
    371 	sc->sc_mediastatus = NULL;
    372 
    373 	sc->bt = ia->ia_memt;
    374 	sc->bh = memh;
    375 
    376 	/* Map i/o space. */
    377 	sc->sc_msize = ia->ia_iomem[0].ir_size;
    378 	sc->sc_maddr = (void *)memh;
    379 	sc->sc_iobase = (char *)sc->sc_maddr + sc->sc_msize - (1 << 24);
    380 
    381 	/* set up pointers to important on-card control structures */
    382 	sc->iscp = 0;
    383 	sc->scb = IE_ISCP_SZ;
    384 	sc->scp = sc->sc_msize + IE_SCP_ADDR - (1 << 24);
    385 
    386 	sc->buf_area = sc->scb + IE_SCB_SZ;
    387 	sc->buf_area_sz = sc->sc_msize - IE_ISCP_SZ - IE_SCB_SZ - IE_SCP_SZ;
    388 
    389 	/* zero card memory */
    390 	bus_space_set_region_1(sc->bt, sc->bh, 0, 0, sc->sc_msize);
    391 
    392 	/* set card to 16-bit bus mode */
    393 	bus_space_write_1(sc->bt, sc->bh, IE_SCP_BUS_USE((u_long)sc->scp),
    394 			  IE_SYSBUS_16BIT);
    395 
    396 	/* set up pointers to key structures */
    397 	ai_write_24(sc, IE_SCP_ISCP((u_long)sc->scp), (u_long) sc->iscp);
    398 	ai_write_16(sc, IE_ISCP_SCB((u_long)sc->iscp), (u_long) sc->scb);
    399 	ai_write_24(sc, IE_ISCP_BASE((u_long)sc->iscp), (u_long) sc->iscp);
    400 
    401 	/* flush setup of pointers, check if chip answers */
    402 	bus_space_barrier(sc->bt, sc->bh, 0, sc->sc_msize,
    403 			  BUS_SPACE_BARRIER_WRITE);
    404 	if (!i82586_proberam(sc)) {
    405 		DPRINTF(("\n%s: can't talk to i82586!\n",
    406 			device_xname(&sc->sc_dev)));
    407 		bus_space_unmap(ia->ia_iot, ioh, ia->ia_io[0].ir_size);
    408 		bus_space_unmap(ia->ia_memt, memh, ia->ia_iomem[0].ir_size);
    409 		return;
    410 	}
    411 
    412 	val = bus_space_read_1(asc->sc_regt, asc->sc_regh, AI_REVISION);
    413 	asc->card_rev = SL_REV(val);
    414 	asc->card_type = SL_BOARD(val) - 1;
    415 	snprintf(name, sizeof(name), "%s, rev. %d",
    416 	    ai_names[asc->card_type], asc->card_rev);
    417 
    418 	i82586_attach(sc, name, ethaddr, NULL, 0, 0);
    419 
    420 	asc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq[0].ir_irq,
    421 	    IST_EDGE, IPL_NET, i82586_intr, sc);
    422 	if (asc->sc_ih == NULL) {
    423 		DPRINTF(("\n%s: can't establish interrupt\n",
    424 			device_xname(&sc->sc_dev)));
    425 	}
    426 }
    427 
    428 /*
    429  * Divine the memory size of this board.
    430  * Better hope there's nothing important hiding just below the card...
    431  */
    432 static int
    433 ai_find_mem_size(asc, memt, maddr)
    434 	struct ai_softc* asc;
    435 	bus_space_tag_t memt;
    436 	bus_size_t maddr;
    437 {
    438 	int size;
    439 	bus_space_handle_t memh;
    440 	struct ie_softc* sc = &asc->sc_ie;
    441 
    442 	for (size = 65536; size >= 16384; size -= 16384) {
    443 		if (bus_space_map(memt, maddr, size, 0, &memh) == 0) {
    444 			size = check_ie_present(sc, memt, maddr, size);
    445 			bus_space_unmap(memt, memh, size);
    446 
    447 			if (size != 0)
    448 				return size;
    449 		}
    450 	}
    451 
    452 	return (0);
    453 }
    454 
    455 /*
    456  * Check to see if there's an 82586 out there.
    457  */
    458 static int
    459 check_ie_present(sc, memt, memh, size)
    460 	struct ie_softc* sc;
    461 	bus_space_tag_t memt;
    462 	bus_space_handle_t memh;
    463 	bus_size_t size;
    464 {
    465 	sc->hwreset = ai_reset;
    466 	sc->chan_attn = ai_atten;
    467 	sc->ie_bus_read16 = ai_read_16;
    468 	sc->ie_bus_write16 = ai_write_16;
    469 
    470 	sc->bt = memt;
    471 	sc->bh = memh;
    472 	sc->sc_iobase = (char *)memh + size - (1 << 24);
    473 
    474 	sc->scp = size + IE_SCP_ADDR - (1 << 24);
    475 	bus_space_set_region_1(memt, memh, (u_long) sc->scp, 0, IE_SCP_SZ);
    476 
    477 	sc->iscp = 0;
    478 	bus_space_set_region_1(memt, memh, (u_long) sc->iscp, 0, IE_ISCP_SZ);
    479 
    480 	sc->scb = IE_ISCP_SZ;
    481 	bus_space_set_region_1(memt, memh, sc->scb, 0, IE_SCB_SZ);
    482 
    483 	/* set card to 16-bit bus mode */
    484 	bus_space_write_1(sc->bt, sc->bh, IE_SCP_BUS_USE((u_long)sc->scp),
    485 			  IE_SYSBUS_16BIT);
    486 
    487 	/* set up pointers to key structures */
    488 	ai_write_24(sc, IE_SCP_ISCP((u_long)sc->scp), (u_long) sc->iscp);
    489 	ai_write_16(sc, IE_ISCP_SCB((u_long)sc->iscp), (u_long) sc->scb);
    490 	ai_write_24(sc, IE_ISCP_BASE((u_long)sc->iscp), (u_long) sc->iscp);
    491 
    492 	/* flush setup of pointers, check if chip answers */
    493 	bus_space_barrier(sc->bt, sc->bh, 0, sc->sc_msize,
    494 			  BUS_SPACE_BARRIER_WRITE);
    495 
    496 	if (!i82586_proberam(sc))
    497 		return (0);
    498 
    499 	return (size);
    500 }
    501 
    502 CFATTACH_DECL(ai, sizeof(struct ai_softc),
    503     ai_match, ai_attach, NULL, NULL);
    504