Home | History | Annotate | Line # | Download | only in ic
tulip.c revision 1.167
      1 /*	$NetBSD: tulip.c,v 1.167 2009/04/17 10:20:33 cegger Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1998, 1999, 2000, 2002 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 by Charles M. Hannum.
     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  *
     20  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     22  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     23  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     30  * POSSIBILITY OF SUCH DAMAGE.
     31  */
     32 
     33 /*
     34  * Device driver for the Digital Semiconductor ``Tulip'' (21x4x)
     35  * Ethernet controller family, and a variety of clone chips.
     36  */
     37 
     38 #include <sys/cdefs.h>
     39 __KERNEL_RCSID(0, "$NetBSD: tulip.c,v 1.167 2009/04/17 10:20:33 cegger Exp $");
     40 
     41 #include "bpfilter.h"
     42 
     43 #include <sys/param.h>
     44 #include <sys/systm.h>
     45 #include <sys/callout.h>
     46 #include <sys/mbuf.h>
     47 #include <sys/malloc.h>
     48 #include <sys/kernel.h>
     49 #include <sys/socket.h>
     50 #include <sys/ioctl.h>
     51 #include <sys/errno.h>
     52 #include <sys/device.h>
     53 
     54 #include <machine/endian.h>
     55 
     56 #include <uvm/uvm_extern.h>
     57 
     58 #include <net/if.h>
     59 #include <net/if_dl.h>
     60 #include <net/if_media.h>
     61 #include <net/if_ether.h>
     62 
     63 #if NBPFILTER > 0
     64 #include <net/bpf.h>
     65 #endif
     66 
     67 #include <sys/bus.h>
     68 #include <sys/intr.h>
     69 
     70 #include <dev/mii/mii.h>
     71 #include <dev/mii/miivar.h>
     72 #include <dev/mii/mii_bitbang.h>
     73 
     74 #include <dev/ic/tulipreg.h>
     75 #include <dev/ic/tulipvar.h>
     76 
     77 const char * const tlp_chip_names[] = TULIP_CHIP_NAMES;
     78 
     79 static const struct tulip_txthresh_tab tlp_10_txthresh_tab[] =
     80     TLP_TXTHRESH_TAB_10;
     81 
     82 static const struct tulip_txthresh_tab tlp_10_100_txthresh_tab[] =
     83     TLP_TXTHRESH_TAB_10_100;
     84 
     85 static const struct tulip_txthresh_tab tlp_winb_txthresh_tab[] =
     86     TLP_TXTHRESH_TAB_WINB;
     87 
     88 static const struct tulip_txthresh_tab tlp_dm9102_txthresh_tab[] =
     89     TLP_TXTHRESH_TAB_DM9102;
     90 
     91 static void	tlp_start(struct ifnet *);
     92 static void	tlp_watchdog(struct ifnet *);
     93 static int	tlp_ioctl(struct ifnet *, u_long, void *);
     94 static int	tlp_init(struct ifnet *);
     95 static void	tlp_stop(struct ifnet *, int);
     96 static int	tlp_ifflags_cb(struct ethercom *);
     97 
     98 static void	tlp_rxdrain(struct tulip_softc *);
     99 static int	tlp_add_rxbuf(struct tulip_softc *, int);
    100 static void	tlp_srom_idle(struct tulip_softc *);
    101 static int	tlp_srom_size(struct tulip_softc *);
    102 
    103 static int	tlp_enable(struct tulip_softc *);
    104 static void	tlp_disable(struct tulip_softc *);
    105 
    106 static void	tlp_filter_setup(struct tulip_softc *);
    107 static void	tlp_winb_filter_setup(struct tulip_softc *);
    108 static void	tlp_al981_filter_setup(struct tulip_softc *);
    109 static void	tlp_asix_filter_setup(struct tulip_softc *);
    110 
    111 static void	tlp_rxintr(struct tulip_softc *);
    112 static void	tlp_txintr(struct tulip_softc *);
    113 
    114 static void	tlp_mii_tick(void *);
    115 static void	tlp_mii_statchg(device_t);
    116 static void	tlp_winb_mii_statchg(device_t);
    117 static void	tlp_dm9102_mii_statchg(device_t);
    118 
    119 static void	tlp_mii_getmedia(struct tulip_softc *, struct ifmediareq *);
    120 static int	tlp_mii_setmedia(struct tulip_softc *);
    121 
    122 static int	tlp_bitbang_mii_readreg(device_t, int, int);
    123 static void	tlp_bitbang_mii_writereg(device_t, int, int, int);
    124 
    125 static int	tlp_pnic_mii_readreg(device_t, int, int);
    126 static void	tlp_pnic_mii_writereg(device_t, int, int, int);
    127 
    128 static int	tlp_al981_mii_readreg(device_t, int, int);
    129 static void	tlp_al981_mii_writereg(device_t, int, int, int);
    130 
    131 static void	tlp_2114x_preinit(struct tulip_softc *);
    132 static void	tlp_2114x_mii_preinit(struct tulip_softc *);
    133 static void	tlp_pnic_preinit(struct tulip_softc *);
    134 static void	tlp_dm9102_preinit(struct tulip_softc *);
    135 static void	tlp_asix_preinit(struct tulip_softc *);
    136 
    137 static void	tlp_21140_reset(struct tulip_softc *);
    138 static void	tlp_21142_reset(struct tulip_softc *);
    139 static void	tlp_pmac_reset(struct tulip_softc *);
    140 #if 0
    141 static void	tlp_dm9102_reset(struct tulip_softc *);
    142 #endif
    143 
    144 static void	tlp_2114x_nway_tick(void *);
    145 
    146 #define	tlp_mchash(addr, sz)						\
    147 	(ether_crc32_le((addr), ETHER_ADDR_LEN) & ((sz) - 1))
    148 
    149 /*
    150  * MII bit-bang glue.
    151  */
    152 static uint32_t tlp_sio_mii_bitbang_read(device_t);
    153 static void	tlp_sio_mii_bitbang_write(device_t, uint32_t);
    154 
    155 static const struct mii_bitbang_ops tlp_sio_mii_bitbang_ops = {
    156 	tlp_sio_mii_bitbang_read,
    157 	tlp_sio_mii_bitbang_write,
    158 	{
    159 		MIIROM_MDO,		/* MII_BIT_MDO */
    160 		MIIROM_MDI,		/* MII_BIT_MDI */
    161 		MIIROM_MDC,		/* MII_BIT_MDC */
    162 		0,			/* MII_BIT_DIR_HOST_PHY */
    163 		MIIROM_MIIDIR,		/* MII_BIT_DIR_PHY_HOST */
    164 	}
    165 };
    166 
    167 #ifdef TLP_DEBUG
    168 #define	DPRINTF(sc, x)	if ((sc)->sc_ethercom.ec_if.if_flags & IFF_DEBUG) \
    169 				printf x
    170 #else
    171 #define	DPRINTF(sc, x)	/* nothing */
    172 #endif
    173 
    174 #ifdef TLP_STATS
    175 static void	tlp_print_stats(struct tulip_softc *);
    176 #endif
    177 
    178 /*
    179  * Can be used to debug the SROM-related things, including contents.
    180  * Initialized so that it's patchable.
    181  */
    182 int	tlp_srom_debug = 0;
    183 
    184 /*
    185  * tlp_attach:
    186  *
    187  *	Attach a Tulip interface to the system.
    188  */
    189 void
    190 tlp_attach(struct tulip_softc *sc, const uint8_t *enaddr)
    191 {
    192 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    193 	device_t self = sc->sc_dev;
    194 	int i, error;
    195 
    196 	callout_init(&sc->sc_nway_callout, 0);
    197 	callout_init(&sc->sc_tick_callout, 0);
    198 
    199 	/*
    200 	 * NOTE: WE EXPECT THE FRONT-END TO INITIALIZE sc_regshift!
    201 	 */
    202 
    203 	/*
    204 	 * Setup the transmit threshold table.
    205 	 */
    206 	switch (sc->sc_chip) {
    207 	case TULIP_CHIP_DE425:
    208 	case TULIP_CHIP_21040:
    209 	case TULIP_CHIP_21041:
    210 		sc->sc_txth = tlp_10_txthresh_tab;
    211 		break;
    212 
    213 	case TULIP_CHIP_DM9102:
    214 	case TULIP_CHIP_DM9102A:
    215 		sc->sc_txth = tlp_dm9102_txthresh_tab;
    216 		break;
    217 
    218 	default:
    219 		sc->sc_txth = tlp_10_100_txthresh_tab;
    220 		break;
    221 	}
    222 
    223 	/*
    224 	 * Setup the filter setup function.
    225 	 */
    226 	switch (sc->sc_chip) {
    227 	case TULIP_CHIP_WB89C840F:
    228 		sc->sc_filter_setup = tlp_winb_filter_setup;
    229 		break;
    230 
    231 	case TULIP_CHIP_AL981:
    232 	case TULIP_CHIP_AN983:
    233 	case TULIP_CHIP_AN985:
    234 		sc->sc_filter_setup = tlp_al981_filter_setup;
    235 		break;
    236 
    237 	case TULIP_CHIP_AX88140:
    238 	case TULIP_CHIP_AX88141:
    239 		sc->sc_filter_setup = tlp_asix_filter_setup;
    240 		break;
    241 
    242 	default:
    243 		sc->sc_filter_setup = tlp_filter_setup;
    244 		break;
    245 	}
    246 
    247 	/*
    248 	 * Set up the media status change function.
    249 	 */
    250 	switch (sc->sc_chip) {
    251 	case TULIP_CHIP_WB89C840F:
    252 		sc->sc_statchg = tlp_winb_mii_statchg;
    253 		break;
    254 
    255 	case TULIP_CHIP_DM9102:
    256 	case TULIP_CHIP_DM9102A:
    257 		sc->sc_statchg = tlp_dm9102_mii_statchg;
    258 		break;
    259 
    260 	default:
    261 		/*
    262 		 * We may override this if we have special media
    263 		 * handling requirements (e.g. flipping GPIO pins).
    264 		 *
    265 		 * The pure-MII statchg function covers the basics.
    266 		 */
    267 		sc->sc_statchg = tlp_mii_statchg;
    268 		break;
    269 	}
    270 
    271 	/*
    272 	 * Default to no FS|LS in setup packet descriptors.  They're
    273 	 * supposed to be zero according to the 21040 and 21143
    274 	 * manuals, and some chips fall over badly if they're
    275 	 * included.  Yet, other chips seem to require them.  Sigh.
    276 	 */
    277 	switch (sc->sc_chip) {
    278 	case TULIP_CHIP_X3201_3:
    279 		sc->sc_setup_fsls = TDCTL_Tx_FS|TDCTL_Tx_LS;
    280 		break;
    281 
    282 	default:
    283 		sc->sc_setup_fsls = 0;
    284 	}
    285 
    286 	/*
    287 	 * Set up various chip-specific quirks.
    288 	 *
    289 	 * Note that wherever we can, we use the "ring" option for
    290 	 * transmit and receive descriptors.  This is because some
    291 	 * clone chips apparently have problems when using chaining,
    292 	 * although some *only* support chaining.
    293 	 *
    294 	 * What we do is always program the "next" pointer, and then
    295 	 * conditionally set the TDCTL_CH and TDCTL_ER bits in the
    296 	 * appropriate places.
    297 	 */
    298 	switch (sc->sc_chip) {
    299 	case TULIP_CHIP_21140:
    300 	case TULIP_CHIP_21140A:
    301 	case TULIP_CHIP_21142:
    302 	case TULIP_CHIP_21143:
    303 	case TULIP_CHIP_82C115:		/* 21143-like */
    304 	case TULIP_CHIP_MX98713:	/* 21140-like */
    305 	case TULIP_CHIP_MX98713A:	/* 21143-like */
    306 	case TULIP_CHIP_MX98715:	/* 21143-like */
    307 	case TULIP_CHIP_MX98715A:	/* 21143-like */
    308 	case TULIP_CHIP_MX98715AEC_X:	/* 21143-like */
    309 	case TULIP_CHIP_MX98725:	/* 21143-like */
    310 	case TULIP_CHIP_RS7112:		/* 21143-like */
    311 		/*
    312 		 * Run these chips in ring mode.
    313 		 */
    314 		sc->sc_tdctl_ch = 0;
    315 		sc->sc_tdctl_er = TDCTL_ER;
    316 		sc->sc_preinit = tlp_2114x_preinit;
    317 		break;
    318 
    319 	case TULIP_CHIP_82C168:
    320 	case TULIP_CHIP_82C169:
    321 		/*
    322 		 * Run these chips in ring mode.
    323 		 */
    324 		sc->sc_tdctl_ch = 0;
    325 		sc->sc_tdctl_er = TDCTL_ER;
    326 		sc->sc_preinit = tlp_pnic_preinit;
    327 
    328 		/*
    329 		 * These chips seem to have busted DMA engines; just put them
    330 		 * in Store-and-Forward mode from the get-go.
    331 		 */
    332 		sc->sc_txthresh = TXTH_SF;
    333 		break;
    334 
    335 	case TULIP_CHIP_WB89C840F:
    336 		/*
    337 		 * Run this chip in chained mode.
    338 		 */
    339 		sc->sc_tdctl_ch = TDCTL_CH;
    340 		sc->sc_tdctl_er = 0;
    341 		sc->sc_flags |= TULIPF_IC_FS;
    342 		break;
    343 
    344 	case TULIP_CHIP_DM9102:
    345 	case TULIP_CHIP_DM9102A:
    346 		/*
    347 		 * Run these chips in chained mode.
    348 		 */
    349 		sc->sc_tdctl_ch = TDCTL_CH;
    350 		sc->sc_tdctl_er = 0;
    351 		sc->sc_preinit = tlp_dm9102_preinit;
    352 
    353 		/*
    354 		 * These chips have a broken bus interface, so we
    355 		 * can't use any optimized bus commands.  For this
    356 		 * reason, we tend to underrun pretty quickly, so
    357 		 * just to Store-and-Forward mode from the get-go.
    358 		 */
    359 		sc->sc_txthresh = TXTH_DM9102_SF;
    360 		break;
    361 
    362 	case TULIP_CHIP_AX88140:
    363 	case TULIP_CHIP_AX88141:
    364 		/*
    365 		 * Run these chips in ring mode.
    366 		 */
    367 		sc->sc_tdctl_ch = 0;
    368 		sc->sc_tdctl_er = TDCTL_ER;
    369 		sc->sc_preinit = tlp_asix_preinit;
    370 		break;
    371 
    372 	default:
    373 		/*
    374 		 * Default to running in ring mode.
    375 		 */
    376 		sc->sc_tdctl_ch = 0;
    377 		sc->sc_tdctl_er = TDCTL_ER;
    378 	}
    379 
    380 	/*
    381 	 * Set up the MII bit-bang operations.
    382 	 */
    383 	switch (sc->sc_chip) {
    384 	case TULIP_CHIP_WB89C840F:	/* XXX direction bit different? */
    385 		sc->sc_bitbang_ops = &tlp_sio_mii_bitbang_ops;
    386 		break;
    387 
    388 	default:
    389 		sc->sc_bitbang_ops = &tlp_sio_mii_bitbang_ops;
    390 	}
    391 
    392 	SIMPLEQ_INIT(&sc->sc_txfreeq);
    393 	SIMPLEQ_INIT(&sc->sc_txdirtyq);
    394 
    395 	/*
    396 	 * Allocate the control data structures, and create and load the
    397 	 * DMA map for it.
    398 	 */
    399 	if ((error = bus_dmamem_alloc(sc->sc_dmat,
    400 	    sizeof(struct tulip_control_data), PAGE_SIZE, 0, &sc->sc_cdseg,
    401 	    1, &sc->sc_cdnseg, 0)) != 0) {
    402 		aprint_error_dev(self, "unable to allocate control data, error = %d\n",
    403 		    error);
    404 		goto fail_0;
    405 	}
    406 
    407 	if ((error = bus_dmamem_map(sc->sc_dmat, &sc->sc_cdseg, sc->sc_cdnseg,
    408 	    sizeof(struct tulip_control_data), (void **)&sc->sc_control_data,
    409 	    BUS_DMA_COHERENT)) != 0) {
    410 		aprint_error_dev(self, "unable to map control data, error = %d\n",
    411 		    error);
    412 		goto fail_1;
    413 	}
    414 
    415 	if ((error = bus_dmamap_create(sc->sc_dmat,
    416 	    sizeof(struct tulip_control_data), 1,
    417 	    sizeof(struct tulip_control_data), 0, 0, &sc->sc_cddmamap)) != 0) {
    418 		aprint_error_dev(self, "unable to create control data DMA map, "
    419 		    "error = %d\n", error);
    420 		goto fail_2;
    421 	}
    422 
    423 	if ((error = bus_dmamap_load(sc->sc_dmat, sc->sc_cddmamap,
    424 	    sc->sc_control_data, sizeof(struct tulip_control_data), NULL,
    425 	    0)) != 0) {
    426 		aprint_error_dev(self, "unable to load control data DMA map, error = %d\n",
    427 		    error);
    428 		goto fail_3;
    429 	}
    430 
    431 	/*
    432 	 * Create the transmit buffer DMA maps.
    433 	 *
    434 	 * Note that on the Xircom clone, transmit buffers must be
    435 	 * 4-byte aligned.  We're almost guaranteed to have to copy
    436 	 * the packet in that case, so we just limit ourselves to
    437 	 * one segment.
    438 	 *
    439 	 * On the DM9102, the transmit logic can only handle one
    440 	 * DMA segment.
    441 	 */
    442 	switch (sc->sc_chip) {
    443 	case TULIP_CHIP_X3201_3:
    444 	case TULIP_CHIP_DM9102:
    445 	case TULIP_CHIP_DM9102A:
    446 	case TULIP_CHIP_AX88140:
    447 	case TULIP_CHIP_AX88141:
    448 		sc->sc_ntxsegs = 1;
    449 		break;
    450 
    451 	default:
    452 		sc->sc_ntxsegs = TULIP_NTXSEGS;
    453 	}
    454 	for (i = 0; i < TULIP_TXQUEUELEN; i++) {
    455 		if ((error = bus_dmamap_create(sc->sc_dmat, MCLBYTES,
    456 		    sc->sc_ntxsegs, MCLBYTES, 0, 0,
    457 		    &sc->sc_txsoft[i].txs_dmamap)) != 0) {
    458 			aprint_error_dev(self, "unable to create tx DMA map %d, "
    459 			    "error = %d\n", i, error);
    460 			goto fail_4;
    461 		}
    462 	}
    463 
    464 	/*
    465 	 * Create the receive buffer DMA maps.
    466 	 */
    467 	for (i = 0; i < TULIP_NRXDESC; i++) {
    468 		if ((error = bus_dmamap_create(sc->sc_dmat, MCLBYTES, 1,
    469 		    MCLBYTES, 0, 0, &sc->sc_rxsoft[i].rxs_dmamap)) != 0) {
    470 			aprint_error_dev(self, "unable to create rx DMA map %d, "
    471 			    "error = %d\n", i, error);
    472 			goto fail_5;
    473 		}
    474 		sc->sc_rxsoft[i].rxs_mbuf = NULL;
    475 	}
    476 
    477 	/*
    478 	 * From this point forward, the attachment cannot fail.  A failure
    479 	 * before this point releases all resources that may have been
    480 	 * allocated.
    481 	 */
    482 	sc->sc_flags |= TULIPF_ATTACHED;
    483 
    484 	/*
    485 	 * Reset the chip to a known state.
    486 	 */
    487 	tlp_reset(sc);
    488 
    489 	/* Announce ourselves. */
    490 	printf("%s: %s%sEthernet address %s\n", device_xname(self),
    491 	    sc->sc_name[0] != '\0' ? sc->sc_name : "",
    492 	    sc->sc_name[0] != '\0' ? ", " : "",
    493 	    ether_sprintf(enaddr));
    494 
    495 	/*
    496 	 * Check to see if we're the simulated Ethernet on Connectix
    497 	 * Virtual PC.
    498 	 */
    499 	if (enaddr[0] == 0x00 && enaddr[1] == 0x03 && enaddr[2] == 0xff)
    500 		sc->sc_flags |= TULIPF_VPC;
    501 
    502 	/*
    503 	 * Initialize our media structures.  This may probe the MII, if
    504 	 * present.
    505 	 */
    506 	(*sc->sc_mediasw->tmsw_init)(sc);
    507 
    508 	strlcpy(ifp->if_xname, device_xname(self), IFNAMSIZ);
    509 	ifp->if_softc = sc;
    510 	ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
    511 	sc->sc_if_flags = ifp->if_flags;
    512 	ifp->if_ioctl = tlp_ioctl;
    513 	ifp->if_start = tlp_start;
    514 	ifp->if_watchdog = tlp_watchdog;
    515 	ifp->if_init = tlp_init;
    516 	ifp->if_stop = tlp_stop;
    517 	IFQ_SET_READY(&ifp->if_snd);
    518 
    519 	/*
    520 	 * We can support 802.1Q VLAN-sized frames.
    521 	 */
    522 	sc->sc_ethercom.ec_capabilities |= ETHERCAP_VLAN_MTU;
    523 
    524 	/*
    525 	 * Attach the interface.
    526 	 */
    527 	if_attach(ifp);
    528 	ether_ifattach(ifp, enaddr);
    529 	ether_set_ifflags_cb(&sc->sc_ethercom, tlp_ifflags_cb);
    530 #if NRND > 0
    531 	rnd_attach_source(&sc->sc_rnd_source, device_xname(self),
    532 	    RND_TYPE_NET, 0);
    533 #endif
    534 
    535 	if (!pmf_device_register(self, NULL, NULL))
    536 		aprint_error_dev(self, "couldn't establish power handler\n");
    537 	else
    538 		pmf_class_network_register(self, ifp);
    539 
    540 	return;
    541 
    542 	/*
    543 	 * Free any resources we've allocated during the failed attach
    544 	 * attempt.  Do this in reverse order and fall through.
    545 	 */
    546  fail_5:
    547 	for (i = 0; i < TULIP_NRXDESC; i++) {
    548 		if (sc->sc_rxsoft[i].rxs_dmamap != NULL)
    549 			bus_dmamap_destroy(sc->sc_dmat,
    550 			    sc->sc_rxsoft[i].rxs_dmamap);
    551 	}
    552  fail_4:
    553 	for (i = 0; i < TULIP_TXQUEUELEN; i++) {
    554 		if (sc->sc_txsoft[i].txs_dmamap != NULL)
    555 			bus_dmamap_destroy(sc->sc_dmat,
    556 			    sc->sc_txsoft[i].txs_dmamap);
    557 	}
    558 	bus_dmamap_unload(sc->sc_dmat, sc->sc_cddmamap);
    559  fail_3:
    560 	bus_dmamap_destroy(sc->sc_dmat, sc->sc_cddmamap);
    561  fail_2:
    562 	bus_dmamem_unmap(sc->sc_dmat, (void *)sc->sc_control_data,
    563 	    sizeof(struct tulip_control_data));
    564  fail_1:
    565 	bus_dmamem_free(sc->sc_dmat, &sc->sc_cdseg, sc->sc_cdnseg);
    566  fail_0:
    567 	return;
    568 }
    569 
    570 /*
    571  * tlp_activate:
    572  *
    573  *	Handle device activation/deactivation requests.
    574  */
    575 int
    576 tlp_activate(device_t self, enum devact act)
    577 {
    578 	struct tulip_softc *sc = device_private(self);
    579 	int s, error = 0;
    580 
    581 	s = splnet();
    582 	switch (act) {
    583 	case DVACT_ACTIVATE:
    584 		error = EOPNOTSUPP;
    585 		break;
    586 
    587 	case DVACT_DEACTIVATE:
    588 		if (sc->sc_flags & TULIPF_HAS_MII)
    589 			mii_activate(&sc->sc_mii, act, MII_PHY_ANY,
    590 			    MII_OFFSET_ANY);
    591 		if_deactivate(&sc->sc_ethercom.ec_if);
    592 		break;
    593 	}
    594 	splx(s);
    595 
    596 	return (error);
    597 }
    598 
    599 /*
    600  * tlp_detach:
    601  *
    602  *	Detach a Tulip interface.
    603  */
    604 int
    605 tlp_detach(struct tulip_softc *sc)
    606 {
    607 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    608 	struct tulip_rxsoft *rxs;
    609 	struct tulip_txsoft *txs;
    610 	device_t self = sc->sc_dev;
    611 	int i;
    612 
    613 	/*
    614 	 * Succeed now if there isn't any work to do.
    615 	 */
    616 	if ((sc->sc_flags & TULIPF_ATTACHED) == 0)
    617 		return (0);
    618 
    619 	/* Unhook our tick handler. */
    620 	if (sc->sc_tick)
    621 		callout_stop(&sc->sc_tick_callout);
    622 
    623 	if (sc->sc_flags & TULIPF_HAS_MII) {
    624 		/* Detach all PHYs */
    625 		mii_detach(&sc->sc_mii, MII_PHY_ANY, MII_OFFSET_ANY);
    626 	}
    627 
    628 	/* Delete all remaining media. */
    629 	ifmedia_delete_instance(&sc->sc_mii.mii_media, IFM_INST_ANY);
    630 
    631 #if NRND > 0
    632 	rnd_detach_source(&sc->sc_rnd_source);
    633 #endif
    634 	ether_ifdetach(ifp);
    635 	if_detach(ifp);
    636 
    637 	for (i = 0; i < TULIP_NRXDESC; i++) {
    638 		rxs = &sc->sc_rxsoft[i];
    639 		if (rxs->rxs_mbuf != NULL) {
    640 			bus_dmamap_unload(sc->sc_dmat, rxs->rxs_dmamap);
    641 			m_freem(rxs->rxs_mbuf);
    642 			rxs->rxs_mbuf = NULL;
    643 		}
    644 		bus_dmamap_destroy(sc->sc_dmat, rxs->rxs_dmamap);
    645 	}
    646 	for (i = 0; i < TULIP_TXQUEUELEN; i++) {
    647 		txs = &sc->sc_txsoft[i];
    648 		if (txs->txs_mbuf != NULL) {
    649 			bus_dmamap_unload(sc->sc_dmat, txs->txs_dmamap);
    650 			m_freem(txs->txs_mbuf);
    651 			txs->txs_mbuf = NULL;
    652 		}
    653 		bus_dmamap_destroy(sc->sc_dmat, txs->txs_dmamap);
    654 	}
    655 	bus_dmamap_unload(sc->sc_dmat, sc->sc_cddmamap);
    656 	bus_dmamap_destroy(sc->sc_dmat, sc->sc_cddmamap);
    657 	bus_dmamem_unmap(sc->sc_dmat, (void *)sc->sc_control_data,
    658 	    sizeof(struct tulip_control_data));
    659 	bus_dmamem_free(sc->sc_dmat, &sc->sc_cdseg, sc->sc_cdnseg);
    660 
    661 	pmf_device_deregister(self);
    662 
    663 	if (sc->sc_srom)
    664 		free(sc->sc_srom, M_DEVBUF);
    665 
    666 	return (0);
    667 }
    668 
    669 /*
    670  * tlp_start:		[ifnet interface function]
    671  *
    672  *	Start packet transmission on the interface.
    673  */
    674 static void
    675 tlp_start(struct ifnet *ifp)
    676 {
    677 	struct tulip_softc *sc = ifp->if_softc;
    678 	struct mbuf *m0, *m;
    679 	struct tulip_txsoft *txs, *last_txs = NULL;
    680 	bus_dmamap_t dmamap;
    681 	int error, firsttx, nexttx, lasttx = 1, ofree, seg;
    682 
    683 	DPRINTF(sc, ("%s: tlp_start: sc_flags 0x%08x, if_flags 0x%08x\n",
    684 	    device_xname(sc->sc_dev), sc->sc_flags, ifp->if_flags));
    685 
    686 	/*
    687 	 * If we want a filter setup, it means no more descriptors were
    688 	 * available for the setup routine.  Let it get a chance to wedge
    689 	 * itself into the ring.
    690 	 */
    691 	if (sc->sc_flags & TULIPF_WANT_SETUP)
    692 		ifp->if_flags |= IFF_OACTIVE;
    693 
    694 	if ((ifp->if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING)
    695 		return;
    696 
    697 	if (sc->sc_tick == tlp_2114x_nway_tick &&
    698 	    (sc->sc_flags & TULIPF_LINK_UP) == 0 && ifp->if_snd.ifq_len < 10)
    699 		return;
    700 
    701 	/*
    702 	 * Remember the previous number of free descriptors and
    703 	 * the first descriptor we'll use.
    704 	 */
    705 	ofree = sc->sc_txfree;
    706 	firsttx = sc->sc_txnext;
    707 
    708 	DPRINTF(sc, ("%s: tlp_start: txfree %d, txnext %d\n",
    709 	    device_xname(sc->sc_dev), ofree, firsttx));
    710 
    711 	/*
    712 	 * Loop through the send queue, setting up transmit descriptors
    713 	 * until we drain the queue, or use up all available transmit
    714 	 * descriptors.
    715 	 */
    716 	while ((txs = SIMPLEQ_FIRST(&sc->sc_txfreeq)) != NULL &&
    717 	       sc->sc_txfree != 0) {
    718 		/*
    719 		 * Grab a packet off the queue.
    720 		 */
    721 		IFQ_POLL(&ifp->if_snd, m0);
    722 		if (m0 == NULL)
    723 			break;
    724 		m = NULL;
    725 
    726 		dmamap = txs->txs_dmamap;
    727 
    728 		/*
    729 		 * Load the DMA map.  If this fails, the packet either
    730 		 * didn't fit in the alloted number of segments, or we were
    731 		 * short on resources.  In this case, we'll copy and try
    732 		 * again.
    733 		 *
    734 		 * Note that if we're only allowed 1 Tx segment, we
    735 		 * have an alignment restriction.  Do this test before
    736 		 * attempting to load the DMA map, because it's more
    737 		 * likely we'll trip the alignment test than the
    738 		 * more-than-one-segment test.
    739 		 */
    740 		if ((sc->sc_ntxsegs == 1 && (mtod(m0, uintptr_t) & 3) != 0) ||
    741 		    bus_dmamap_load_mbuf(sc->sc_dmat, dmamap, m0,
    742 		      BUS_DMA_WRITE|BUS_DMA_NOWAIT) != 0) {
    743 			MGETHDR(m, M_DONTWAIT, MT_DATA);
    744 			if (m == NULL) {
    745 				aprint_error_dev(sc->sc_dev, "unable to allocate Tx mbuf\n");
    746 				break;
    747 			}
    748 			MCLAIM(m, &sc->sc_ethercom.ec_tx_mowner);
    749 			if (m0->m_pkthdr.len > MHLEN) {
    750 				MCLGET(m, M_DONTWAIT);
    751 				if ((m->m_flags & M_EXT) == 0) {
    752 					printf("%s: unable to allocate Tx "
    753 					    "cluster\n", device_xname(sc->sc_dev));
    754 					m_freem(m);
    755 					break;
    756 				}
    757 			}
    758 			m_copydata(m0, 0, m0->m_pkthdr.len, mtod(m, void *));
    759 			m->m_pkthdr.len = m->m_len = m0->m_pkthdr.len;
    760 			error = bus_dmamap_load_mbuf(sc->sc_dmat, dmamap,
    761 			    m, BUS_DMA_WRITE|BUS_DMA_NOWAIT);
    762 			if (error) {
    763 				printf("%s: unable to load Tx buffer, "
    764 				    "error = %d\n", device_xname(sc->sc_dev), error);
    765 				break;
    766 			}
    767 		}
    768 
    769 		/*
    770 		 * Ensure we have enough descriptors free to describe
    771 		 * the packet.
    772 		 */
    773 		if (dmamap->dm_nsegs > sc->sc_txfree) {
    774 			/*
    775 			 * Not enough free descriptors to transmit this
    776 			 * packet.  We haven't committed to anything yet,
    777 			 * so just unload the DMA map, put the packet
    778 			 * back on the queue, and punt.  Notify the upper
    779 			 * layer that there are no more slots left.
    780 			 *
    781 			 * XXX We could allocate an mbuf and copy, but
    782 			 * XXX it is worth it?
    783 			 */
    784 			ifp->if_flags |= IFF_OACTIVE;
    785 			bus_dmamap_unload(sc->sc_dmat, dmamap);
    786 			if (m != NULL)
    787 				m_freem(m);
    788 			break;
    789 		}
    790 
    791 		IFQ_DEQUEUE(&ifp->if_snd, m0);
    792 		if (m != NULL) {
    793 			m_freem(m0);
    794 			m0 = m;
    795 		}
    796 
    797 		/*
    798 		 * WE ARE NOW COMMITTED TO TRANSMITTING THE PACKET.
    799 		 */
    800 
    801 		/* Sync the DMA map. */
    802 		bus_dmamap_sync(sc->sc_dmat, dmamap, 0, dmamap->dm_mapsize,
    803 		    BUS_DMASYNC_PREWRITE);
    804 
    805 		/*
    806 		 * Initialize the transmit descriptors.
    807 		 */
    808 		for (nexttx = sc->sc_txnext, seg = 0;
    809 		     seg < dmamap->dm_nsegs;
    810 		     seg++, nexttx = TULIP_NEXTTX(nexttx)) {
    811 			/*
    812 			 * If this is the first descriptor we're
    813 			 * enqueueing, don't set the OWN bit just
    814 			 * yet.  That could cause a race condition.
    815 			 * We'll do it below.
    816 			 */
    817 			sc->sc_txdescs[nexttx].td_status =
    818 			    (nexttx == firsttx) ? 0 : htole32(TDSTAT_OWN);
    819 			sc->sc_txdescs[nexttx].td_bufaddr1 =
    820 			    htole32(dmamap->dm_segs[seg].ds_addr);
    821 			sc->sc_txdescs[nexttx].td_ctl =
    822 			    htole32((dmamap->dm_segs[seg].ds_len <<
    823 			        TDCTL_SIZE1_SHIFT) | sc->sc_tdctl_ch |
    824 				(nexttx == (TULIP_NTXDESC - 1) ?
    825 				 sc->sc_tdctl_er : 0));
    826 			lasttx = nexttx;
    827 		}
    828 
    829 		KASSERT(lasttx != -1);
    830 
    831 		/* Set `first segment' and `last segment' appropriately. */
    832 		sc->sc_txdescs[sc->sc_txnext].td_ctl |= htole32(TDCTL_Tx_FS);
    833 		sc->sc_txdescs[lasttx].td_ctl |= htole32(TDCTL_Tx_LS);
    834 
    835 #ifdef TLP_DEBUG
    836 		if (ifp->if_flags & IFF_DEBUG) {
    837 			printf("     txsoft %p transmit chain:\n", txs);
    838 			for (seg = sc->sc_txnext;; seg = TULIP_NEXTTX(seg)) {
    839 				printf("     descriptor %d:\n", seg);
    840 				printf("       td_status:   0x%08x\n",
    841 				    le32toh(sc->sc_txdescs[seg].td_status));
    842 				printf("       td_ctl:      0x%08x\n",
    843 				    le32toh(sc->sc_txdescs[seg].td_ctl));
    844 				printf("       td_bufaddr1: 0x%08x\n",
    845 				    le32toh(sc->sc_txdescs[seg].td_bufaddr1));
    846 				printf("       td_bufaddr2: 0x%08x\n",
    847 				    le32toh(sc->sc_txdescs[seg].td_bufaddr2));
    848 				if (seg == lasttx)
    849 					break;
    850 			}
    851 		}
    852 #endif
    853 
    854 		/* Sync the descriptors we're using. */
    855 		TULIP_CDTXSYNC(sc, sc->sc_txnext, dmamap->dm_nsegs,
    856 		    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
    857 
    858 		/*
    859 		 * Store a pointer to the packet so we can free it later,
    860 		 * and remember what txdirty will be once the packet is
    861 		 * done.
    862 		 */
    863 		txs->txs_mbuf = m0;
    864 		txs->txs_firstdesc = sc->sc_txnext;
    865 		txs->txs_lastdesc = lasttx;
    866 		txs->txs_ndescs = dmamap->dm_nsegs;
    867 
    868 		/* Advance the tx pointer. */
    869 		sc->sc_txfree -= dmamap->dm_nsegs;
    870 		sc->sc_txnext = nexttx;
    871 
    872 		SIMPLEQ_REMOVE_HEAD(&sc->sc_txfreeq, txs_q);
    873 		SIMPLEQ_INSERT_TAIL(&sc->sc_txdirtyq, txs, txs_q);
    874 
    875 		last_txs = txs;
    876 
    877 #if NBPFILTER > 0
    878 		/*
    879 		 * Pass the packet to any BPF listeners.
    880 		 */
    881 		if (ifp->if_bpf)
    882 			bpf_mtap(ifp->if_bpf, m0);
    883 #endif /* NBPFILTER > 0 */
    884 	}
    885 
    886 	if (txs == NULL || sc->sc_txfree == 0) {
    887 		/* No more slots left; notify upper layer. */
    888 		ifp->if_flags |= IFF_OACTIVE;
    889 	}
    890 
    891 	if (sc->sc_txfree != ofree) {
    892 		DPRINTF(sc, ("%s: packets enqueued, IC on %d, OWN on %d\n",
    893 		    device_xname(sc->sc_dev), lasttx, firsttx));
    894 		/*
    895 		 * Cause a transmit interrupt to happen on the
    896 		 * last packet we enqueued.
    897 		 */
    898 		sc->sc_txdescs[lasttx].td_ctl |= htole32(TDCTL_Tx_IC);
    899 		TULIP_CDTXSYNC(sc, lasttx, 1,
    900 		    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
    901 
    902 		/*
    903 		 * Some clone chips want IC on the *first* segment in
    904 		 * the packet.  Appease them.
    905 		 */
    906 		KASSERT(last_txs != NULL);
    907 		if ((sc->sc_flags & TULIPF_IC_FS) != 0 &&
    908 		    last_txs->txs_firstdesc != lasttx) {
    909 			sc->sc_txdescs[last_txs->txs_firstdesc].td_ctl |=
    910 			    htole32(TDCTL_Tx_IC);
    911 			TULIP_CDTXSYNC(sc, last_txs->txs_firstdesc, 1,
    912 			    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
    913 		}
    914 
    915 		/*
    916 		 * The entire packet chain is set up.  Give the
    917 		 * first descriptor to the chip now.
    918 		 */
    919 		sc->sc_txdescs[firsttx].td_status |= htole32(TDSTAT_OWN);
    920 		TULIP_CDTXSYNC(sc, firsttx, 1,
    921 		    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
    922 
    923 		/* Wake up the transmitter. */
    924 		/* XXX USE AUTOPOLLING? */
    925 		TULIP_WRITE(sc, CSR_TXPOLL, TXPOLL_TPD);
    926 
    927 		/* Set a watchdog timer in case the chip flakes out. */
    928 		ifp->if_timer = 5;
    929 	}
    930 }
    931 
    932 /*
    933  * tlp_watchdog:	[ifnet interface function]
    934  *
    935  *	Watchdog timer handler.
    936  */
    937 static void
    938 tlp_watchdog(struct ifnet *ifp)
    939 {
    940 	struct tulip_softc *sc = ifp->if_softc;
    941 	int doing_setup, doing_transmit;
    942 
    943 	doing_setup = (sc->sc_flags & TULIPF_DOING_SETUP);
    944 	doing_transmit = (! SIMPLEQ_EMPTY(&sc->sc_txdirtyq));
    945 
    946 	if (doing_setup && doing_transmit) {
    947 		printf("%s: filter setup and transmit timeout\n", device_xname(sc->sc_dev));
    948 		ifp->if_oerrors++;
    949 	} else if (doing_transmit) {
    950 		printf("%s: transmit timeout\n", device_xname(sc->sc_dev));
    951 		ifp->if_oerrors++;
    952 	} else if (doing_setup)
    953 		printf("%s: filter setup timeout\n", device_xname(sc->sc_dev));
    954 	else
    955 		printf("%s: spurious watchdog timeout\n", device_xname(sc->sc_dev));
    956 
    957 	(void) tlp_init(ifp);
    958 
    959 	/* Try to get more packets going. */
    960 	tlp_start(ifp);
    961 }
    962 
    963 /* If the interface is up and running, only modify the receive
    964  * filter when setting promiscuous or debug mode.  Otherwise fall
    965  * through to ether_ioctl, which will reset the chip.
    966  */
    967 static int
    968 tlp_ifflags_cb(struct ethercom *ec)
    969 {
    970 	struct ifnet *ifp = &ec->ec_if;
    971 	struct tulip_softc *sc = ifp->if_softc;
    972 	int change = ifp->if_flags ^ sc->sc_if_flags;
    973 
    974 	if ((change & ~(IFF_CANTCHANGE|IFF_DEBUG)) != 0)
    975 		return ENETRESET;
    976 	if ((change & IFF_PROMISC) != 0)
    977 		(*sc->sc_filter_setup)(sc);
    978 	return 0;
    979 }
    980 
    981 /*
    982  * tlp_ioctl:		[ifnet interface function]
    983  *
    984  *	Handle control requests from the operator.
    985  */
    986 static int
    987 tlp_ioctl(struct ifnet *ifp, u_long cmd, void *data)
    988 {
    989 	struct tulip_softc *sc = ifp->if_softc;
    990 	struct ifreq *ifr = (struct ifreq *)data;
    991 	int s, error;
    992 
    993 	s = splnet();
    994 
    995 	switch (cmd) {
    996 	case SIOCSIFMEDIA:
    997 	case SIOCGIFMEDIA:
    998 		error = ifmedia_ioctl(ifp, ifr, &sc->sc_mii.mii_media, cmd);
    999 		break;
   1000 	default:
   1001 		error = ether_ioctl(ifp, cmd, data);
   1002 		if (error == ENETRESET) {
   1003 			if (ifp->if_flags & IFF_RUNNING) {
   1004 				/*
   1005 				 * Multicast list has changed.  Set the
   1006 				 * hardware filter accordingly.
   1007 				 */
   1008 				(*sc->sc_filter_setup)(sc);
   1009 			}
   1010 			error = 0;
   1011 		}
   1012 		break;
   1013 	}
   1014 
   1015 	/* Try to get more packets going. */
   1016 	if (TULIP_IS_ENABLED(sc))
   1017 		tlp_start(ifp);
   1018 
   1019 	sc->sc_if_flags = ifp->if_flags;
   1020 	splx(s);
   1021 	return (error);
   1022 }
   1023 
   1024 /*
   1025  * tlp_intr:
   1026  *
   1027  *	Interrupt service routine.
   1028  */
   1029 int
   1030 tlp_intr(void *arg)
   1031 {
   1032 	struct tulip_softc *sc = arg;
   1033 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1034 	uint32_t status, rxstatus, txstatus;
   1035 	int handled = 0, txthresh;
   1036 
   1037 	DPRINTF(sc, ("%s: tlp_intr\n", device_xname(sc->sc_dev)));
   1038 
   1039 #ifdef DEBUG
   1040 	if (TULIP_IS_ENABLED(sc) == 0)
   1041 		panic("%s: tlp_intr: not enabled", device_xname(sc->sc_dev));
   1042 #endif
   1043 
   1044 	/*
   1045 	 * If the interface isn't running, the interrupt couldn't
   1046 	 * possibly have come from us.
   1047 	 */
   1048 	if ((ifp->if_flags & IFF_RUNNING) == 0 ||
   1049 	    !device_is_active(sc->sc_dev))
   1050 		return (0);
   1051 
   1052 	/* Disable interrupts on the DM9102 (interrupt edge bug). */
   1053 	switch (sc->sc_chip) {
   1054 	case TULIP_CHIP_DM9102:
   1055 	case TULIP_CHIP_DM9102A:
   1056 		TULIP_WRITE(sc, CSR_INTEN, 0);
   1057 		break;
   1058 
   1059 	default:
   1060 		/* Nothing. */
   1061 		break;
   1062 	}
   1063 
   1064 	for (;;) {
   1065 		status = TULIP_READ(sc, CSR_STATUS);
   1066 		if (status)
   1067 			TULIP_WRITE(sc, CSR_STATUS, status);
   1068 
   1069 		if ((status & sc->sc_inten) == 0)
   1070 			break;
   1071 
   1072 		handled = 1;
   1073 
   1074 		rxstatus = status & sc->sc_rxint_mask;
   1075 		txstatus = status & sc->sc_txint_mask;
   1076 
   1077 		if (rxstatus) {
   1078 			/* Grab new any new packets. */
   1079 			tlp_rxintr(sc);
   1080 
   1081 			if (rxstatus & STATUS_RWT)
   1082 				printf("%s: receive watchdog timeout\n",
   1083 				    device_xname(sc->sc_dev));
   1084 
   1085 			if (rxstatus & STATUS_RU) {
   1086 				printf("%s: receive ring overrun\n",
   1087 				    device_xname(sc->sc_dev));
   1088 				/* Get the receive process going again. */
   1089 				if (sc->sc_tdctl_er != TDCTL_ER) {
   1090 					tlp_idle(sc, OPMODE_SR);
   1091 					TULIP_WRITE(sc, CSR_RXLIST,
   1092 					    TULIP_CDRXADDR(sc, sc->sc_rxptr));
   1093 					TULIP_WRITE(sc, CSR_OPMODE,
   1094 					    sc->sc_opmode);
   1095 				}
   1096 				TULIP_WRITE(sc, CSR_RXPOLL, RXPOLL_RPD);
   1097 				break;
   1098 			}
   1099 		}
   1100 
   1101 		if (txstatus) {
   1102 			/* Sweep up transmit descriptors. */
   1103 			tlp_txintr(sc);
   1104 
   1105 			if (txstatus & STATUS_TJT)
   1106 				printf("%s: transmit jabber timeout\n",
   1107 				    device_xname(sc->sc_dev));
   1108 
   1109 			if (txstatus & STATUS_UNF) {
   1110 				/*
   1111 				 * Increase our transmit threshold if
   1112 				 * another is available.
   1113 				 */
   1114 				txthresh = sc->sc_txthresh + 1;
   1115 				if (sc->sc_txth[txthresh].txth_name != NULL) {
   1116 					/* Idle the transmit process. */
   1117 					tlp_idle(sc, OPMODE_ST);
   1118 
   1119 					sc->sc_txthresh = txthresh;
   1120 					sc->sc_opmode &= ~(OPMODE_TR|OPMODE_SF);
   1121 					sc->sc_opmode |=
   1122 					    sc->sc_txth[txthresh].txth_opmode;
   1123 					printf("%s: transmit underrun; new "
   1124 					    "threshold: %s\n",
   1125 					    device_xname(sc->sc_dev),
   1126 					    sc->sc_txth[txthresh].txth_name);
   1127 
   1128 					/*
   1129 					 * Set the new threshold and restart
   1130 					 * the transmit process.
   1131 					 */
   1132 					TULIP_WRITE(sc, CSR_OPMODE,
   1133 					    sc->sc_opmode);
   1134 				}
   1135 					/*
   1136 					 * XXX Log every Nth underrun from
   1137 					 * XXX now on?
   1138 					 */
   1139 			}
   1140 		}
   1141 
   1142 		if (status & (STATUS_TPS|STATUS_RPS)) {
   1143 			if (status & STATUS_TPS)
   1144 				printf("%s: transmit process stopped\n",
   1145 				    device_xname(sc->sc_dev));
   1146 			if (status & STATUS_RPS)
   1147 				printf("%s: receive process stopped\n",
   1148 				    device_xname(sc->sc_dev));
   1149 			(void) tlp_init(ifp);
   1150 			break;
   1151 		}
   1152 
   1153 		if (status & STATUS_SE) {
   1154 			const char *str;
   1155 			switch (status & STATUS_EB) {
   1156 			case STATUS_EB_PARITY:
   1157 				str = "parity error";
   1158 				break;
   1159 
   1160 			case STATUS_EB_MABT:
   1161 				str = "master abort";
   1162 				break;
   1163 
   1164 			case STATUS_EB_TABT:
   1165 				str = "target abort";
   1166 				break;
   1167 
   1168 			default:
   1169 				str = "unknown error";
   1170 				break;
   1171 			}
   1172 			aprint_error_dev(sc->sc_dev, "fatal system error: %s\n",
   1173 			    str);
   1174 			(void) tlp_init(ifp);
   1175 			break;
   1176 		}
   1177 
   1178 		/*
   1179 		 * Not handled:
   1180 		 *
   1181 		 *	Transmit buffer unavailable -- normal
   1182 		 *	condition, nothing to do, really.
   1183 		 *
   1184 		 *	General purpose timer experied -- we don't
   1185 		 *	use the general purpose timer.
   1186 		 *
   1187 		 *	Early receive interrupt -- not available on
   1188 		 *	all chips, we just use RI.  We also only
   1189 		 *	use single-segment receive DMA, so this
   1190 		 *	is mostly useless.
   1191 		 */
   1192 	}
   1193 
   1194 	/* Bring interrupts back up on the DM9102. */
   1195 	switch (sc->sc_chip) {
   1196 	case TULIP_CHIP_DM9102:
   1197 	case TULIP_CHIP_DM9102A:
   1198 		TULIP_WRITE(sc, CSR_INTEN, sc->sc_inten);
   1199 		break;
   1200 
   1201 	default:
   1202 		/* Nothing. */
   1203 		break;
   1204 	}
   1205 
   1206 	/* Try to get more packets going. */
   1207 	tlp_start(ifp);
   1208 
   1209 #if NRND > 0
   1210 	if (handled)
   1211 		rnd_add_uint32(&sc->sc_rnd_source, status);
   1212 #endif
   1213 	return (handled);
   1214 }
   1215 
   1216 /*
   1217  * tlp_rxintr:
   1218  *
   1219  *	Helper; handle receive interrupts.
   1220  */
   1221 static void
   1222 tlp_rxintr(struct tulip_softc *sc)
   1223 {
   1224 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1225 	struct ether_header *eh;
   1226 	struct tulip_rxsoft *rxs;
   1227 	struct mbuf *m;
   1228 	uint32_t rxstat, errors;
   1229 	int i, len;
   1230 
   1231 	for (i = sc->sc_rxptr;; i = TULIP_NEXTRX(i)) {
   1232 		rxs = &sc->sc_rxsoft[i];
   1233 
   1234 		TULIP_CDRXSYNC(sc, i,
   1235 		    BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
   1236 
   1237 		rxstat = le32toh(sc->sc_rxdescs[i].td_status);
   1238 
   1239 		if (rxstat & TDSTAT_OWN) {
   1240 			/*
   1241 			 * We have processed all of the receive buffers.
   1242 			 */
   1243 			break;
   1244 		}
   1245 
   1246 		/*
   1247 		 * Make sure the packet fit in one buffer.  This should
   1248 		 * always be the case.  But the Lite-On PNIC, rev 33
   1249 		 * has an awful receive engine bug, which may require
   1250 		 * a very icky work-around.
   1251 		 */
   1252 		if ((rxstat & (TDSTAT_Rx_FS|TDSTAT_Rx_LS)) !=
   1253 		    (TDSTAT_Rx_FS|TDSTAT_Rx_LS)) {
   1254 			printf("%s: incoming packet spilled, resetting\n",
   1255 			    device_xname(sc->sc_dev));
   1256 			(void) tlp_init(ifp);
   1257 			return;
   1258 		}
   1259 
   1260 		/*
   1261 		 * If any collisions were seen on the wire, count one.
   1262 		 */
   1263 		if (rxstat & TDSTAT_Rx_CS)
   1264 			ifp->if_collisions++;
   1265 
   1266 		/*
   1267 		 * If an error occurred, update stats, clear the status
   1268 		 * word, and leave the packet buffer in place.  It will
   1269 		 * simply be reused the next time the ring comes around.
   1270 		 */
   1271 		errors = TDSTAT_Rx_DE | TDSTAT_Rx_RF | TDSTAT_Rx_TL |
   1272 		    TDSTAT_Rx_CS | TDSTAT_Rx_RE | TDSTAT_Rx_DB | TDSTAT_Rx_CE;
   1273 		/*
   1274 	 	 * If 802.1Q VLAN MTU is enabled, ignore the Frame Too Long
   1275 		 * error.
   1276 		 */
   1277 		if ((sc->sc_ethercom.ec_capenable & ETHERCAP_VLAN_MTU) != 0)
   1278 			errors &= ~TDSTAT_Rx_TL;
   1279 		/*
   1280 		 * If chip doesn't have MII, ignore the MII error bit.
   1281 		 */
   1282 		if ((sc->sc_flags & TULIPF_HAS_MII) == 0)
   1283 			errors &= ~TDSTAT_Rx_RE;
   1284 
   1285 		if ((rxstat & TDSTAT_ES) != 0 &&
   1286 		    (rxstat & errors) != 0) {
   1287 			rxstat &= errors;
   1288 #define	PRINTERR(bit, str)						\
   1289 			if (rxstat & (bit))				\
   1290 				aprint_error_dev(sc->sc_dev, "receive error: %s\n",	\
   1291 				    str)
   1292 			ifp->if_ierrors++;
   1293 			PRINTERR(TDSTAT_Rx_DE, "descriptor error");
   1294 			PRINTERR(TDSTAT_Rx_RF, "runt frame");
   1295 			PRINTERR(TDSTAT_Rx_TL, "frame too long");
   1296 			PRINTERR(TDSTAT_Rx_RE, "MII error");
   1297 			PRINTERR(TDSTAT_Rx_DB, "dribbling bit");
   1298 			PRINTERR(TDSTAT_Rx_CE, "CRC error");
   1299 #undef PRINTERR
   1300 			TULIP_INIT_RXDESC(sc, i);
   1301 			continue;
   1302 		}
   1303 
   1304 		bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1305 		    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_POSTREAD);
   1306 
   1307 		/*
   1308 		 * No errors; receive the packet.  Note the Tulip
   1309 		 * includes the CRC with every packet.
   1310 		 */
   1311 		len = TDSTAT_Rx_LENGTH(rxstat) - ETHER_CRC_LEN;
   1312 
   1313 #ifdef __NO_STRICT_ALIGNMENT
   1314 		/*
   1315 		 * Allocate a new mbuf cluster.  If that fails, we are
   1316 		 * out of memory, and must drop the packet and recycle
   1317 		 * the buffer that's already attached to this descriptor.
   1318 		 */
   1319 		m = rxs->rxs_mbuf;
   1320 		if (tlp_add_rxbuf(sc, i) != 0) {
   1321 			ifp->if_ierrors++;
   1322 			TULIP_INIT_RXDESC(sc, i);
   1323 			bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1324 			    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
   1325 			continue;
   1326 		}
   1327 #else
   1328 		/*
   1329 		 * The Tulip's receive buffers must be 4-byte aligned.
   1330 		 * But this means that the data after the Ethernet header
   1331 		 * is misaligned.  We must allocate a new buffer and
   1332 		 * copy the data, shifted forward 2 bytes.
   1333 		 */
   1334 		MGETHDR(m, M_DONTWAIT, MT_DATA);
   1335 		if (m == NULL) {
   1336  dropit:
   1337 			ifp->if_ierrors++;
   1338 			TULIP_INIT_RXDESC(sc, i);
   1339 			bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1340 			    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
   1341 			continue;
   1342 		}
   1343 		MCLAIM(m, &sc->sc_ethercom.ec_rx_mowner);
   1344 		if (len > (MHLEN - 2)) {
   1345 			MCLGET(m, M_DONTWAIT);
   1346 			if ((m->m_flags & M_EXT) == 0) {
   1347 				m_freem(m);
   1348 				goto dropit;
   1349 			}
   1350 		}
   1351 		m->m_data += 2;
   1352 
   1353 		/*
   1354 		 * Note that we use clusters for incoming frames, so the
   1355 		 * buffer is virtually contiguous.
   1356 		 */
   1357 		memcpy(mtod(m, void *), mtod(rxs->rxs_mbuf, void *), len);
   1358 
   1359 		/* Allow the receive descriptor to continue using its mbuf. */
   1360 		TULIP_INIT_RXDESC(sc, i);
   1361 		bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1362 		    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
   1363 #endif /* __NO_STRICT_ALIGNMENT */
   1364 
   1365 		ifp->if_ipackets++;
   1366 		eh = mtod(m, struct ether_header *);
   1367 		m->m_pkthdr.rcvif = ifp;
   1368 		m->m_pkthdr.len = m->m_len = len;
   1369 
   1370 		/*
   1371 		 * XXX Work-around for a weird problem with the emulated
   1372 		 * 21041 on Connectix Virtual PC:
   1373 		 *
   1374 		 * When we receive a full-size TCP segment, we seem to get
   1375 		 * a packet there the Rx status says 1522 bytes, yet we do
   1376 		 * not get a frame-too-long error from the chip.  The extra
   1377 		 * bytes seem to always be zeros.  Perhaps Virtual PC is
   1378 		 * inserting 4 bytes of zeros after every packet.  In any
   1379 		 * case, let's try and detect this condition and truncate
   1380 		 * the length so that it will pass up the stack.
   1381 		 */
   1382 		if (__predict_false((sc->sc_flags & TULIPF_VPC) != 0)) {
   1383 			uint16_t etype = ntohs(eh->ether_type);
   1384 
   1385 			if (len > ETHER_MAX_FRAME(ifp, etype, 0))
   1386 				m->m_pkthdr.len = m->m_len = len =
   1387 				    ETHER_MAX_FRAME(ifp, etype, 0);
   1388 		}
   1389 
   1390 #if NBPFILTER > 0
   1391 		/*
   1392 		 * Pass this up to any BPF listeners, but only
   1393 		 * pass it up the stack if it's for us.
   1394 		 */
   1395 		if (ifp->if_bpf)
   1396 			bpf_mtap(ifp->if_bpf, m);
   1397 #endif /* NBPFILTER > 0 */
   1398 
   1399 		/*
   1400 		 * We sometimes have to run the 21140 in Hash-Only
   1401 		 * mode.  If we're in that mode, and not in promiscuous
   1402 		 * mode, and we have a unicast packet that isn't for
   1403 		 * us, then drop it.
   1404 		 */
   1405 		if (sc->sc_filtmode == TDCTL_Tx_FT_HASHONLY &&
   1406 		    (ifp->if_flags & IFF_PROMISC) == 0 &&
   1407 		    ETHER_IS_MULTICAST(eh->ether_dhost) == 0 &&
   1408 		    memcmp(CLLADDR(ifp->if_sadl), eh->ether_dhost,
   1409 			   ETHER_ADDR_LEN) != 0) {
   1410 			m_freem(m);
   1411 			continue;
   1412 		}
   1413 
   1414 		/* Pass it on. */
   1415 		(*ifp->if_input)(ifp, m);
   1416 	}
   1417 
   1418 	/* Update the receive pointer. */
   1419 	sc->sc_rxptr = i;
   1420 }
   1421 
   1422 /*
   1423  * tlp_txintr:
   1424  *
   1425  *	Helper; handle transmit interrupts.
   1426  */
   1427 static void
   1428 tlp_txintr(struct tulip_softc *sc)
   1429 {
   1430 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1431 	struct tulip_txsoft *txs;
   1432 	uint32_t txstat;
   1433 
   1434 	DPRINTF(sc, ("%s: tlp_txintr: sc_flags 0x%08x\n",
   1435 	    device_xname(sc->sc_dev), sc->sc_flags));
   1436 
   1437 	ifp->if_flags &= ~IFF_OACTIVE;
   1438 
   1439 	/*
   1440 	 * Go through our Tx list and free mbufs for those
   1441 	 * frames that have been transmitted.
   1442 	 */
   1443 	while ((txs = SIMPLEQ_FIRST(&sc->sc_txdirtyq)) != NULL) {
   1444 		TULIP_CDTXSYNC(sc, txs->txs_lastdesc,
   1445 		    txs->txs_ndescs,
   1446 		    BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
   1447 
   1448 #ifdef TLP_DEBUG
   1449 		if (ifp->if_flags & IFF_DEBUG) {
   1450 			int i;
   1451 			printf("    txsoft %p transmit chain:\n", txs);
   1452 			for (i = txs->txs_firstdesc;; i = TULIP_NEXTTX(i)) {
   1453 				printf("     descriptor %d:\n", i);
   1454 				printf("       td_status:   0x%08x\n",
   1455 				    le32toh(sc->sc_txdescs[i].td_status));
   1456 				printf("       td_ctl:      0x%08x\n",
   1457 				    le32toh(sc->sc_txdescs[i].td_ctl));
   1458 				printf("       td_bufaddr1: 0x%08x\n",
   1459 				    le32toh(sc->sc_txdescs[i].td_bufaddr1));
   1460 				printf("       td_bufaddr2: 0x%08x\n",
   1461 				    le32toh(sc->sc_txdescs[i].td_bufaddr2));
   1462 				if (i == txs->txs_lastdesc)
   1463 					break;
   1464 			}
   1465 		}
   1466 #endif
   1467 
   1468 		txstat = le32toh(sc->sc_txdescs[txs->txs_lastdesc].td_status);
   1469 		if (txstat & TDSTAT_OWN)
   1470 			break;
   1471 
   1472 		SIMPLEQ_REMOVE_HEAD(&sc->sc_txdirtyq, txs_q);
   1473 
   1474 		sc->sc_txfree += txs->txs_ndescs;
   1475 
   1476 		if (txs->txs_mbuf == NULL) {
   1477 			/*
   1478 			 * If we didn't have an mbuf, it was the setup
   1479 			 * packet.
   1480 			 */
   1481 #ifdef DIAGNOSTIC
   1482 			if ((sc->sc_flags & TULIPF_DOING_SETUP) == 0)
   1483 				panic("tlp_txintr: null mbuf, not doing setup");
   1484 #endif
   1485 			TULIP_CDSPSYNC(sc, BUS_DMASYNC_POSTWRITE);
   1486 			sc->sc_flags &= ~TULIPF_DOING_SETUP;
   1487 			SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
   1488 			continue;
   1489 		}
   1490 
   1491 		bus_dmamap_sync(sc->sc_dmat, txs->txs_dmamap,
   1492 		    0, txs->txs_dmamap->dm_mapsize,
   1493 		    BUS_DMASYNC_POSTWRITE);
   1494 		bus_dmamap_unload(sc->sc_dmat, txs->txs_dmamap);
   1495 		m_freem(txs->txs_mbuf);
   1496 		txs->txs_mbuf = NULL;
   1497 
   1498 		SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
   1499 
   1500 		/*
   1501 		 * Check for errors and collisions.
   1502 		 */
   1503 #ifdef TLP_STATS
   1504 		if (txstat & TDSTAT_Tx_UF)
   1505 			sc->sc_stats.ts_tx_uf++;
   1506 		if (txstat & TDSTAT_Tx_TO)
   1507 			sc->sc_stats.ts_tx_to++;
   1508 		if (txstat & TDSTAT_Tx_EC)
   1509 			sc->sc_stats.ts_tx_ec++;
   1510 		if (txstat & TDSTAT_Tx_LC)
   1511 			sc->sc_stats.ts_tx_lc++;
   1512 #endif
   1513 
   1514 		if (txstat & (TDSTAT_Tx_UF|TDSTAT_Tx_TO))
   1515 			ifp->if_oerrors++;
   1516 
   1517 		if (txstat & TDSTAT_Tx_EC)
   1518 			ifp->if_collisions += 16;
   1519 		else
   1520 			ifp->if_collisions += TDSTAT_Tx_COLLISIONS(txstat);
   1521 		if (txstat & TDSTAT_Tx_LC)
   1522 			ifp->if_collisions++;
   1523 
   1524 		ifp->if_opackets++;
   1525 	}
   1526 
   1527 	/*
   1528 	 * If there are no more pending transmissions, cancel the watchdog
   1529 	 * timer.
   1530 	 */
   1531 	if (txs == NULL && (sc->sc_flags & TULIPF_DOING_SETUP) == 0)
   1532 		ifp->if_timer = 0;
   1533 
   1534 	/*
   1535 	 * If we have a receive filter setup pending, do it now.
   1536 	 */
   1537 	if (sc->sc_flags & TULIPF_WANT_SETUP)
   1538 		(*sc->sc_filter_setup)(sc);
   1539 }
   1540 
   1541 #ifdef TLP_STATS
   1542 void
   1543 tlp_print_stats(struct tulip_softc *sc)
   1544 {
   1545 
   1546 	printf("%s: tx_uf %lu, tx_to %lu, tx_ec %lu, tx_lc %lu\n",
   1547 	    device_xname(sc->sc_dev),
   1548 	    sc->sc_stats.ts_tx_uf, sc->sc_stats.ts_tx_to,
   1549 	    sc->sc_stats.ts_tx_ec, sc->sc_stats.ts_tx_lc);
   1550 }
   1551 #endif
   1552 
   1553 /*
   1554  * tlp_reset:
   1555  *
   1556  *	Perform a soft reset on the Tulip.
   1557  */
   1558 void
   1559 tlp_reset(struct tulip_softc *sc)
   1560 {
   1561 	int i;
   1562 
   1563 	TULIP_WRITE(sc, CSR_BUSMODE, BUSMODE_SWR);
   1564 
   1565 	/*
   1566 	 * Xircom, ASIX and Conexant clones don't bring themselves
   1567 	 * out of reset automatically.
   1568 	 * Instead, we have to wait at least 50 PCI cycles, and then
   1569 	 * clear SWR.
   1570 	 */
   1571 	switch (sc->sc_chip) {
   1572 		case TULIP_CHIP_X3201_3:
   1573 		case TULIP_CHIP_AX88140:
   1574 		case TULIP_CHIP_AX88141:
   1575 		case TULIP_CHIP_RS7112:
   1576 			delay(10);
   1577 			TULIP_WRITE(sc, CSR_BUSMODE, 0);
   1578 			break;
   1579 		default:
   1580 			break;
   1581 	}
   1582 
   1583 	for (i = 0; i < 1000; i++) {
   1584 		/*
   1585 		 * Wait at least 50 PCI cycles for the reset to
   1586 		 * complete before peeking at the Tulip again.
   1587 		 * 10 uSec is a bit longer than 50 PCI cycles
   1588 		 * (at 33MHz), but it doesn't hurt have the extra
   1589 		 * wait.
   1590 		 */
   1591 		delay(10);
   1592 		if (TULIP_ISSET(sc, CSR_BUSMODE, BUSMODE_SWR) == 0)
   1593 			break;
   1594 	}
   1595 
   1596 	if (TULIP_ISSET(sc, CSR_BUSMODE, BUSMODE_SWR))
   1597 		aprint_error_dev(sc->sc_dev, "reset failed to complete\n");
   1598 
   1599 	delay(1000);
   1600 
   1601 	/*
   1602 	 * If the board has any GPIO reset sequences to issue, do them now.
   1603 	 */
   1604 	if (sc->sc_reset != NULL)
   1605 		(*sc->sc_reset)(sc);
   1606 }
   1607 
   1608 /*
   1609  * tlp_init:		[ ifnet interface function ]
   1610  *
   1611  *	Initialize the interface.  Must be called at splnet().
   1612  */
   1613 static int
   1614 tlp_init(struct ifnet *ifp)
   1615 {
   1616 	struct tulip_softc *sc = ifp->if_softc;
   1617 	struct tulip_txsoft *txs;
   1618 	struct tulip_rxsoft *rxs;
   1619 	int i, error = 0;
   1620 
   1621 	if ((error = tlp_enable(sc)) != 0)
   1622 		goto out;
   1623 
   1624 	/*
   1625 	 * Cancel any pending I/O.
   1626 	 */
   1627 	tlp_stop(ifp, 0);
   1628 
   1629 	/*
   1630 	 * Initialize `opmode' to 0, and call the pre-init routine, if
   1631 	 * any.  This is required because the 2114x and some of the
   1632 	 * clones require that the media-related bits in `opmode' be
   1633 	 * set before performing a soft-reset in order to get internal
   1634 	 * chip pathways are correct.  Yay!
   1635 	 */
   1636 	sc->sc_opmode = 0;
   1637 	if (sc->sc_preinit != NULL)
   1638 		(*sc->sc_preinit)(sc);
   1639 
   1640 	/*
   1641 	 * Reset the Tulip to a known state.
   1642 	 */
   1643 	tlp_reset(sc);
   1644 
   1645 	/*
   1646 	 * Initialize the BUSMODE register.
   1647 	 */
   1648 	sc->sc_busmode = BUSMODE_BAR;
   1649 	switch (sc->sc_chip) {
   1650 	case TULIP_CHIP_21140:
   1651 	case TULIP_CHIP_21140A:
   1652 	case TULIP_CHIP_21142:
   1653 	case TULIP_CHIP_21143:
   1654 	case TULIP_CHIP_82C115:
   1655 	case TULIP_CHIP_MX98725:
   1656 		/*
   1657 		 * If we're allowed to do so, use Memory Read Line
   1658 		 * and Memory Read Multiple.
   1659 		 *
   1660 		 * XXX Should we use Memory Write and Invalidate?
   1661 		 */
   1662 		if (sc->sc_flags & TULIPF_MRL)
   1663 			sc->sc_busmode |= BUSMODE_RLE;
   1664 		if (sc->sc_flags & TULIPF_MRM)
   1665 			sc->sc_busmode |= BUSMODE_RME;
   1666 #if 0
   1667 		if (sc->sc_flags & TULIPF_MWI)
   1668 			sc->sc_busmode |= BUSMODE_WLE;
   1669 #endif
   1670 		break;
   1671 
   1672 	case TULIP_CHIP_82C168:
   1673 	case TULIP_CHIP_82C169:
   1674 		sc->sc_busmode |= BUSMODE_PNIC_MBO;
   1675 		if (sc->sc_maxburst == 0)
   1676 			sc->sc_maxburst = 16;
   1677 		break;
   1678 
   1679 	case TULIP_CHIP_AX88140:
   1680 	case TULIP_CHIP_AX88141:
   1681 		if (sc->sc_maxburst == 0)
   1682 			sc->sc_maxburst = 16;
   1683 		break;
   1684 
   1685 	default:
   1686 		/* Nothing. */
   1687 		break;
   1688 	}
   1689 	switch (sc->sc_cacheline) {
   1690 	default:
   1691 		/*
   1692 		 * Note: We must *always* set these bits; a cache
   1693 		 * alignment of 0 is RESERVED.
   1694 		 */
   1695 	case 8:
   1696 		sc->sc_busmode |= BUSMODE_CAL_8LW;
   1697 		break;
   1698 	case 16:
   1699 		sc->sc_busmode |= BUSMODE_CAL_16LW;
   1700 		break;
   1701 	case 32:
   1702 		sc->sc_busmode |= BUSMODE_CAL_32LW;
   1703 		break;
   1704 	}
   1705 	switch (sc->sc_maxburst) {
   1706 	case 1:
   1707 		sc->sc_busmode |= BUSMODE_PBL_1LW;
   1708 		break;
   1709 	case 2:
   1710 		sc->sc_busmode |= BUSMODE_PBL_2LW;
   1711 		break;
   1712 	case 4:
   1713 		sc->sc_busmode |= BUSMODE_PBL_4LW;
   1714 		break;
   1715 	case 8:
   1716 		sc->sc_busmode |= BUSMODE_PBL_8LW;
   1717 		break;
   1718 	case 16:
   1719 		sc->sc_busmode |= BUSMODE_PBL_16LW;
   1720 		break;
   1721 	case 32:
   1722 		sc->sc_busmode |= BUSMODE_PBL_32LW;
   1723 		break;
   1724 	default:
   1725 		sc->sc_busmode |= BUSMODE_PBL_DEFAULT;
   1726 		break;
   1727 	}
   1728 #if BYTE_ORDER == BIG_ENDIAN
   1729 	/*
   1730 	 * Can't use BUSMODE_BLE or BUSMODE_DBO; not all chips
   1731 	 * support them, and even on ones that do, it doesn't
   1732 	 * always work.  So we always access descriptors with
   1733 	 * little endian via htole32/le32toh.
   1734 	 */
   1735 #endif
   1736 	/*
   1737 	 * Big-endian bus requires BUSMODE_BLE anyway.
   1738 	 * Also, BUSMODE_DBO is needed because we assume
   1739 	 * descriptors are little endian.
   1740 	 */
   1741 	if (sc->sc_flags & TULIPF_BLE)
   1742 		sc->sc_busmode |= BUSMODE_BLE;
   1743 	if (sc->sc_flags & TULIPF_DBO)
   1744 		sc->sc_busmode |= BUSMODE_DBO;
   1745 
   1746 	/*
   1747 	 * Some chips have a broken bus interface.
   1748 	 */
   1749 	switch (sc->sc_chip) {
   1750 	case TULIP_CHIP_DM9102:
   1751 	case TULIP_CHIP_DM9102A:
   1752 		sc->sc_busmode = 0;
   1753 		break;
   1754 
   1755 	default:
   1756 		/* Nothing. */
   1757 		break;
   1758 	}
   1759 
   1760 	TULIP_WRITE(sc, CSR_BUSMODE, sc->sc_busmode);
   1761 
   1762 	/*
   1763 	 * Initialize the OPMODE register.  We don't write it until
   1764 	 * we're ready to begin the transmit and receive processes.
   1765 	 *
   1766 	 * Media-related OPMODE bits are set in the media callbacks
   1767 	 * for each specific chip/board.
   1768 	 */
   1769 	sc->sc_opmode |= OPMODE_SR | OPMODE_ST |
   1770 	    sc->sc_txth[sc->sc_txthresh].txth_opmode;
   1771 
   1772 	/*
   1773 	 * Magical mystery initialization on the Macronix chips.
   1774 	 * The MX98713 uses its own magic value, the rest share
   1775 	 * a common one.
   1776 	 */
   1777 	switch (sc->sc_chip) {
   1778 	case TULIP_CHIP_MX98713:
   1779 		TULIP_WRITE(sc, CSR_PMAC_TOR, PMAC_TOR_98713);
   1780 		break;
   1781 
   1782 	case TULIP_CHIP_MX98713A:
   1783 	case TULIP_CHIP_MX98715:
   1784 	case TULIP_CHIP_MX98715A:
   1785 	case TULIP_CHIP_MX98715AEC_X:
   1786 	case TULIP_CHIP_MX98725:
   1787 		TULIP_WRITE(sc, CSR_PMAC_TOR, PMAC_TOR_98715);
   1788 		break;
   1789 
   1790 	default:
   1791 		/* Nothing. */
   1792 		break;
   1793 	}
   1794 
   1795 	/*
   1796 	 * Initialize the transmit descriptor ring.
   1797 	 */
   1798 	memset(sc->sc_txdescs, 0, sizeof(sc->sc_txdescs));
   1799 	for (i = 0; i < TULIP_NTXDESC; i++) {
   1800 		sc->sc_txdescs[i].td_ctl = htole32(sc->sc_tdctl_ch);
   1801 		sc->sc_txdescs[i].td_bufaddr2 =
   1802 		    htole32(TULIP_CDTXADDR(sc, TULIP_NEXTTX(i)));
   1803 	}
   1804 	sc->sc_txdescs[TULIP_NTXDESC - 1].td_ctl |= htole32(sc->sc_tdctl_er);
   1805 	TULIP_CDTXSYNC(sc, 0, TULIP_NTXDESC,
   1806 	    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
   1807 	sc->sc_txfree = TULIP_NTXDESC;
   1808 	sc->sc_txnext = 0;
   1809 
   1810 	/*
   1811 	 * Initialize the transmit job descriptors.
   1812 	 */
   1813 	SIMPLEQ_INIT(&sc->sc_txfreeq);
   1814 	SIMPLEQ_INIT(&sc->sc_txdirtyq);
   1815 	for (i = 0; i < TULIP_TXQUEUELEN; i++) {
   1816 		txs = &sc->sc_txsoft[i];
   1817 		txs->txs_mbuf = NULL;
   1818 		SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
   1819 	}
   1820 
   1821 	/*
   1822 	 * Initialize the receive descriptor and receive job
   1823 	 * descriptor rings.
   1824 	 */
   1825 	for (i = 0; i < TULIP_NRXDESC; i++) {
   1826 		rxs = &sc->sc_rxsoft[i];
   1827 		if (rxs->rxs_mbuf == NULL) {
   1828 			if ((error = tlp_add_rxbuf(sc, i)) != 0) {
   1829 				aprint_error_dev(sc->sc_dev, "unable to allocate or map rx "
   1830 				    "buffer %d, error = %d\n",
   1831 				    i, error);
   1832 				/*
   1833 				 * XXX Should attempt to run with fewer receive
   1834 				 * XXX buffers instead of just failing.
   1835 				 */
   1836 				tlp_rxdrain(sc);
   1837 				goto out;
   1838 			}
   1839 		} else
   1840 			TULIP_INIT_RXDESC(sc, i);
   1841 	}
   1842 	sc->sc_rxptr = 0;
   1843 
   1844 	/*
   1845 	 * Initialize the interrupt mask and enable interrupts.
   1846 	 */
   1847 	/* normal interrupts */
   1848 	sc->sc_inten =  STATUS_TI | STATUS_TU | STATUS_RI | STATUS_NIS;
   1849 
   1850 	/* abnormal interrupts */
   1851 	sc->sc_inten |= STATUS_TPS | STATUS_TJT | STATUS_UNF |
   1852 	    STATUS_RU | STATUS_RPS | STATUS_RWT | STATUS_SE | STATUS_AIS;
   1853 
   1854 	sc->sc_rxint_mask = STATUS_RI|STATUS_RU|STATUS_RWT;
   1855 	sc->sc_txint_mask = STATUS_TI|STATUS_UNF|STATUS_TJT;
   1856 
   1857 	switch (sc->sc_chip) {
   1858 	case TULIP_CHIP_WB89C840F:
   1859 		/*
   1860 		 * Clear bits that we don't want that happen to
   1861 		 * overlap or don't exist.
   1862 		 */
   1863 		sc->sc_inten &= ~(STATUS_WINB_REI|STATUS_RWT);
   1864 		break;
   1865 
   1866 	default:
   1867 		/* Nothing. */
   1868 		break;
   1869 	}
   1870 
   1871 	sc->sc_rxint_mask &= sc->sc_inten;
   1872 	sc->sc_txint_mask &= sc->sc_inten;
   1873 
   1874 	TULIP_WRITE(sc, CSR_INTEN, sc->sc_inten);
   1875 	TULIP_WRITE(sc, CSR_STATUS, 0xffffffff);
   1876 
   1877 	/*
   1878 	 * Give the transmit and receive rings to the Tulip.
   1879 	 */
   1880 	TULIP_WRITE(sc, CSR_TXLIST, TULIP_CDTXADDR(sc, sc->sc_txnext));
   1881 	TULIP_WRITE(sc, CSR_RXLIST, TULIP_CDRXADDR(sc, sc->sc_rxptr));
   1882 
   1883 	/*
   1884 	 * On chips that do this differently, set the station address.
   1885 	 */
   1886 	switch (sc->sc_chip) {
   1887 	case TULIP_CHIP_WB89C840F:
   1888 	    {
   1889 		/* XXX Do this with stream writes? */
   1890 		bus_addr_t cpa = TULIP_CSR_OFFSET(sc, CSR_WINB_CPA0);
   1891 
   1892 		for (i = 0; i < ETHER_ADDR_LEN; i++) {
   1893 			bus_space_write_1(sc->sc_st, sc->sc_sh,
   1894 			    cpa + i, CLLADDR(ifp->if_sadl)[i]);
   1895 		}
   1896 		break;
   1897 	    }
   1898 
   1899 	case TULIP_CHIP_AL981:
   1900 	case TULIP_CHIP_AN983:
   1901 	case TULIP_CHIP_AN985:
   1902 	    {
   1903 		uint32_t reg;
   1904 		const uint8_t *enaddr = CLLADDR(ifp->if_sadl);
   1905 
   1906 		reg = enaddr[0] |
   1907 		      (enaddr[1] << 8) |
   1908 		      (enaddr[2] << 16) |
   1909 		      (enaddr[3] << 24);
   1910 		bus_space_write_4(sc->sc_st, sc->sc_sh, CSR_ADM_PAR0, reg);
   1911 
   1912 		reg = enaddr[4] |
   1913 		      (enaddr[5] << 8);
   1914 		bus_space_write_4(sc->sc_st, sc->sc_sh, CSR_ADM_PAR1, reg);
   1915 		break;
   1916 	    }
   1917 
   1918 	case TULIP_CHIP_AX88140:
   1919 	case TULIP_CHIP_AX88141:
   1920 	    {
   1921 		uint32_t reg;
   1922 		const uint8_t *enaddr = CLLADDR(ifp->if_sadl);
   1923 
   1924 		reg = enaddr[0] |
   1925 		      (enaddr[1] << 8) |
   1926 		      (enaddr[2] << 16) |
   1927 		      (enaddr[3] << 24);
   1928 		TULIP_WRITE(sc, CSR_AX_FILTIDX, AX_FILTIDX_PAR0);
   1929 		TULIP_WRITE(sc, CSR_AX_FILTDATA, reg);
   1930 
   1931 		reg = enaddr[4] | (enaddr[5] << 8);
   1932 		TULIP_WRITE(sc, CSR_AX_FILTIDX, AX_FILTIDX_PAR1);
   1933 		TULIP_WRITE(sc, CSR_AX_FILTDATA, reg);
   1934 		break;
   1935 	    }
   1936 
   1937 	default:
   1938 		/* Nothing. */
   1939 		break;
   1940 	}
   1941 
   1942 	/*
   1943 	 * Set the receive filter.  This will start the transmit and
   1944 	 * receive processes.
   1945 	 */
   1946 	(*sc->sc_filter_setup)(sc);
   1947 
   1948 	/*
   1949 	 * Set the current media.
   1950 	 */
   1951 	(void) (*sc->sc_mediasw->tmsw_set)(sc);
   1952 
   1953 	/*
   1954 	 * Start the receive process.
   1955 	 */
   1956 	TULIP_WRITE(sc, CSR_RXPOLL, RXPOLL_RPD);
   1957 
   1958 	if (sc->sc_tick != NULL) {
   1959 		/* Start the one second clock. */
   1960 		callout_reset(&sc->sc_tick_callout, hz >> 3, sc->sc_tick, sc);
   1961 	}
   1962 
   1963 	/*
   1964 	 * Note that the interface is now running.
   1965 	 */
   1966 	ifp->if_flags |= IFF_RUNNING;
   1967 	ifp->if_flags &= ~IFF_OACTIVE;
   1968 	sc->sc_if_flags = ifp->if_flags;
   1969 
   1970  out:
   1971 	if (error) {
   1972 		ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
   1973 		ifp->if_timer = 0;
   1974 		printf("%s: interface not running\n", device_xname(sc->sc_dev));
   1975 	}
   1976 	return (error);
   1977 }
   1978 
   1979 /*
   1980  * tlp_enable:
   1981  *
   1982  *	Enable the Tulip chip.
   1983  */
   1984 static int
   1985 tlp_enable(struct tulip_softc *sc)
   1986 {
   1987 
   1988 	if (TULIP_IS_ENABLED(sc) == 0 && sc->sc_enable != NULL) {
   1989 		if ((*sc->sc_enable)(sc) != 0) {
   1990 			aprint_error_dev(sc->sc_dev, "device enable failed\n");
   1991 			return (EIO);
   1992 		}
   1993 		sc->sc_flags |= TULIPF_ENABLED;
   1994 	}
   1995 	return (0);
   1996 }
   1997 
   1998 /*
   1999  * tlp_disable:
   2000  *
   2001  *	Disable the Tulip chip.
   2002  */
   2003 static void
   2004 tlp_disable(struct tulip_softc *sc)
   2005 {
   2006 
   2007 	if (TULIP_IS_ENABLED(sc) && sc->sc_disable != NULL) {
   2008 		(*sc->sc_disable)(sc);
   2009 		sc->sc_flags &= ~TULIPF_ENABLED;
   2010 	}
   2011 }
   2012 
   2013 /*
   2014  * tlp_rxdrain:
   2015  *
   2016  *	Drain the receive queue.
   2017  */
   2018 static void
   2019 tlp_rxdrain(struct tulip_softc *sc)
   2020 {
   2021 	struct tulip_rxsoft *rxs;
   2022 	int i;
   2023 
   2024 	for (i = 0; i < TULIP_NRXDESC; i++) {
   2025 		rxs = &sc->sc_rxsoft[i];
   2026 		if (rxs->rxs_mbuf != NULL) {
   2027 			bus_dmamap_unload(sc->sc_dmat, rxs->rxs_dmamap);
   2028 			m_freem(rxs->rxs_mbuf);
   2029 			rxs->rxs_mbuf = NULL;
   2030 		}
   2031 	}
   2032 }
   2033 
   2034 /*
   2035  * tlp_stop:		[ ifnet interface function ]
   2036  *
   2037  *	Stop transmission on the interface.
   2038  */
   2039 static void
   2040 tlp_stop(struct ifnet *ifp, int disable)
   2041 {
   2042 	struct tulip_softc *sc = ifp->if_softc;
   2043 	struct tulip_txsoft *txs;
   2044 
   2045 	if (sc->sc_tick != NULL) {
   2046 		/* Stop the one second clock. */
   2047 		callout_stop(&sc->sc_tick_callout);
   2048 	}
   2049 
   2050 	if (sc->sc_flags & TULIPF_HAS_MII) {
   2051 		/* Down the MII. */
   2052 		mii_down(&sc->sc_mii);
   2053 	}
   2054 
   2055 	/* Disable interrupts. */
   2056 	TULIP_WRITE(sc, CSR_INTEN, 0);
   2057 
   2058 	/* Stop the transmit and receive processes. */
   2059 	sc->sc_opmode = 0;
   2060 	TULIP_WRITE(sc, CSR_OPMODE, 0);
   2061 	TULIP_WRITE(sc, CSR_RXLIST, 0);
   2062 	TULIP_WRITE(sc, CSR_TXLIST, 0);
   2063 
   2064 	/*
   2065 	 * Release any queued transmit buffers.
   2066 	 */
   2067 	while ((txs = SIMPLEQ_FIRST(&sc->sc_txdirtyq)) != NULL) {
   2068 		SIMPLEQ_REMOVE_HEAD(&sc->sc_txdirtyq, txs_q);
   2069 		if (txs->txs_mbuf != NULL) {
   2070 			bus_dmamap_unload(sc->sc_dmat, txs->txs_dmamap);
   2071 			m_freem(txs->txs_mbuf);
   2072 			txs->txs_mbuf = NULL;
   2073 		}
   2074 		SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
   2075 	}
   2076 
   2077 	sc->sc_flags &= ~(TULIPF_WANT_SETUP|TULIPF_DOING_SETUP);
   2078 
   2079 	/*
   2080 	 * Mark the interface down and cancel the watchdog timer.
   2081 	 */
   2082 	ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
   2083 	sc->sc_if_flags = ifp->if_flags;
   2084 	ifp->if_timer = 0;
   2085 
   2086 	/*
   2087 	 * Reset the chip (needed on some flavors to actually disable it).
   2088 	 */
   2089 	tlp_reset(sc);
   2090 
   2091 	if (disable) {
   2092 		tlp_rxdrain(sc);
   2093 		tlp_disable(sc);
   2094 	}
   2095 }
   2096 
   2097 #define	SROM_EMIT(sc, x)						\
   2098 do {									\
   2099 	TULIP_WRITE((sc), CSR_MIIROM, (x));				\
   2100 	delay(2);							\
   2101 } while (0)
   2102 
   2103 /*
   2104  * tlp_srom_idle:
   2105  *
   2106  *	Put the SROM in idle state.
   2107  */
   2108 static void
   2109 tlp_srom_idle(struct tulip_softc *sc)
   2110 {
   2111 	uint32_t miirom;
   2112 	int i;
   2113 
   2114 	miirom = MIIROM_SR;
   2115 	SROM_EMIT(sc, miirom);
   2116 
   2117 	miirom |= MIIROM_RD;
   2118 	SROM_EMIT(sc, miirom);
   2119 
   2120 	miirom |= MIIROM_SROMCS;
   2121 	SROM_EMIT(sc, miirom);
   2122 
   2123 	SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   2124 
   2125 	/* Strobe the clock 32 times. */
   2126 	for (i = 0; i < 32; i++) {
   2127 		SROM_EMIT(sc, miirom);
   2128 		SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   2129 	}
   2130 
   2131 	SROM_EMIT(sc, miirom);
   2132 
   2133 	miirom &= ~MIIROM_SROMCS;
   2134 	SROM_EMIT(sc, miirom);
   2135 
   2136 	SROM_EMIT(sc, 0);
   2137 }
   2138 
   2139 /*
   2140  * tlp_srom_size:
   2141  *
   2142  *	Determine the number of address bits in the SROM.
   2143  */
   2144 static int
   2145 tlp_srom_size(struct tulip_softc *sc)
   2146 {
   2147 	uint32_t miirom;
   2148 	int x;
   2149 
   2150 	/* Select the SROM. */
   2151 	miirom = MIIROM_SR;
   2152 	SROM_EMIT(sc, miirom);
   2153 
   2154 	miirom |= MIIROM_RD;
   2155 	SROM_EMIT(sc, miirom);
   2156 
   2157 	/* Send CHIP SELECT for one clock tick. */
   2158 	miirom |= MIIROM_SROMCS;
   2159 	SROM_EMIT(sc, miirom);
   2160 
   2161 	/* Shift in the READ opcode. */
   2162 	for (x = 3; x > 0; x--) {
   2163 		if (TULIP_SROM_OPC_READ & (1 << (x - 1)))
   2164 			miirom |= MIIROM_SROMDI;
   2165 		else
   2166 			miirom &= ~MIIROM_SROMDI;
   2167 		SROM_EMIT(sc, miirom);
   2168 		SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   2169 		SROM_EMIT(sc, miirom);
   2170 	}
   2171 
   2172 	/* Shift in address and look for dummy 0 bit. */
   2173 	for (x = 1; x <= 12; x++) {
   2174 		miirom &= ~MIIROM_SROMDI;
   2175 		SROM_EMIT(sc, miirom);
   2176 		SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   2177 		if (!TULIP_ISSET(sc, CSR_MIIROM, MIIROM_SROMDO))
   2178 			break;
   2179 		SROM_EMIT(sc, miirom);
   2180 	}
   2181 
   2182 	/* Clear CHIP SELECT. */
   2183 	miirom &= ~MIIROM_SROMCS;
   2184 	SROM_EMIT(sc, miirom);
   2185 
   2186 	/* Deselect the SROM. */
   2187 	SROM_EMIT(sc, 0);
   2188 
   2189 	if (x < 4 || x > 12) {
   2190 		aprint_debug_dev(sc->sc_dev, "broken MicroWire interface detected; "
   2191 		    "setting SROM size to 1Kb\n");
   2192 		return (6);
   2193 	} else {
   2194 		if (tlp_srom_debug)
   2195 			printf("%s: SROM size is 2^%d*16 bits (%d bytes)\n",
   2196 			    device_xname(sc->sc_dev), x, (1 << (x + 4)) >> 3);
   2197 		return (x);
   2198 	}
   2199 }
   2200 
   2201 /*
   2202  * tlp_read_srom:
   2203  *
   2204  *	Read the Tulip SROM.
   2205  */
   2206 int
   2207 tlp_read_srom(struct tulip_softc *sc)
   2208 {
   2209 	int size;
   2210 	uint32_t miirom;
   2211 	uint16_t datain;
   2212 	int i, x;
   2213 
   2214 	tlp_srom_idle(sc);
   2215 
   2216 	sc->sc_srom_addrbits = tlp_srom_size(sc);
   2217 	if (sc->sc_srom_addrbits == 0)
   2218 		return (0);
   2219 	size = TULIP_ROM_SIZE(sc->sc_srom_addrbits);
   2220 	sc->sc_srom = malloc(size, M_DEVBUF, M_NOWAIT);
   2221 
   2222 	/* Select the SROM. */
   2223 	miirom = MIIROM_SR;
   2224 	SROM_EMIT(sc, miirom);
   2225 
   2226 	miirom |= MIIROM_RD;
   2227 	SROM_EMIT(sc, miirom);
   2228 
   2229 	for (i = 0; i < size; i += 2) {
   2230 		/* Send CHIP SELECT for one clock tick. */
   2231 		miirom |= MIIROM_SROMCS;
   2232 		SROM_EMIT(sc, miirom);
   2233 
   2234 		/* Shift in the READ opcode. */
   2235 		for (x = 3; x > 0; x--) {
   2236 			if (TULIP_SROM_OPC_READ & (1 << (x - 1)))
   2237 				miirom |= MIIROM_SROMDI;
   2238 			else
   2239 				miirom &= ~MIIROM_SROMDI;
   2240 			SROM_EMIT(sc, miirom);
   2241 			SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   2242 			SROM_EMIT(sc, miirom);
   2243 		}
   2244 
   2245 		/* Shift in address. */
   2246 		for (x = sc->sc_srom_addrbits; x > 0; x--) {
   2247 			if (i & (1 << x))
   2248 				miirom |= MIIROM_SROMDI;
   2249 			else
   2250 				miirom &= ~MIIROM_SROMDI;
   2251 			SROM_EMIT(sc, miirom);
   2252 			SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   2253 			SROM_EMIT(sc, miirom);
   2254 		}
   2255 
   2256 		/* Shift out data. */
   2257 		miirom &= ~MIIROM_SROMDI;
   2258 		datain = 0;
   2259 		for (x = 16; x > 0; x--) {
   2260 			SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   2261 			if (TULIP_ISSET(sc, CSR_MIIROM, MIIROM_SROMDO))
   2262 				datain |= (1 << (x - 1));
   2263 			SROM_EMIT(sc, miirom);
   2264 		}
   2265 		sc->sc_srom[i] = datain & 0xff;
   2266 		sc->sc_srom[i + 1] = datain >> 8;
   2267 
   2268 		/* Clear CHIP SELECT. */
   2269 		miirom &= ~MIIROM_SROMCS;
   2270 		SROM_EMIT(sc, miirom);
   2271 	}
   2272 
   2273 	/* Deselect the SROM. */
   2274 	SROM_EMIT(sc, 0);
   2275 
   2276 	/* ...and idle it. */
   2277 	tlp_srom_idle(sc);
   2278 
   2279 	if (tlp_srom_debug) {
   2280 		printf("SROM CONTENTS:");
   2281 		for (i = 0; i < size; i++) {
   2282 			if ((i % 8) == 0)
   2283 				printf("\n\t");
   2284 			printf("0x%02x ", sc->sc_srom[i]);
   2285 		}
   2286 		printf("\n");
   2287 	}
   2288 
   2289 	return (1);
   2290 }
   2291 
   2292 #undef SROM_EMIT
   2293 
   2294 /*
   2295  * tlp_add_rxbuf:
   2296  *
   2297  *	Add a receive buffer to the indicated descriptor.
   2298  */
   2299 static int
   2300 tlp_add_rxbuf(struct tulip_softc *sc, int idx)
   2301 {
   2302 	struct tulip_rxsoft *rxs = &sc->sc_rxsoft[idx];
   2303 	struct mbuf *m;
   2304 	int error;
   2305 
   2306 	MGETHDR(m, M_DONTWAIT, MT_DATA);
   2307 	if (m == NULL)
   2308 		return (ENOBUFS);
   2309 
   2310 	MCLAIM(m, &sc->sc_ethercom.ec_rx_mowner);
   2311 	MCLGET(m, M_DONTWAIT);
   2312 	if ((m->m_flags & M_EXT) == 0) {
   2313 		m_freem(m);
   2314 		return (ENOBUFS);
   2315 	}
   2316 
   2317 	if (rxs->rxs_mbuf != NULL)
   2318 		bus_dmamap_unload(sc->sc_dmat, rxs->rxs_dmamap);
   2319 
   2320 	rxs->rxs_mbuf = m;
   2321 
   2322 	error = bus_dmamap_load(sc->sc_dmat, rxs->rxs_dmamap,
   2323 	    m->m_ext.ext_buf, m->m_ext.ext_size, NULL,
   2324 	    BUS_DMA_READ|BUS_DMA_NOWAIT);
   2325 	if (error) {
   2326 		aprint_error_dev(sc->sc_dev, "can't load rx DMA map %d, error = %d\n",
   2327 		    idx, error);
   2328 		panic("tlp_add_rxbuf");	/* XXX */
   2329 	}
   2330 
   2331 	bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   2332 	    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
   2333 
   2334 	TULIP_INIT_RXDESC(sc, idx);
   2335 
   2336 	return (0);
   2337 }
   2338 
   2339 /*
   2340  * tlp_srom_crcok:
   2341  *
   2342  *	Check the CRC of the Tulip SROM.
   2343  */
   2344 int
   2345 tlp_srom_crcok(const uint8_t *romdata)
   2346 {
   2347 	uint32_t crc;
   2348 
   2349 	crc = ether_crc32_le(romdata, TULIP_ROM_CRC32_CHECKSUM);
   2350 	crc = (crc & 0xffff) ^ 0xffff;
   2351 	if (crc == TULIP_ROM_GETW(romdata, TULIP_ROM_CRC32_CHECKSUM))
   2352 		return (1);
   2353 
   2354 	/*
   2355 	 * Try an alternate checksum.
   2356 	 */
   2357 	crc = ether_crc32_le(romdata, TULIP_ROM_CRC32_CHECKSUM1);
   2358 	crc = (crc & 0xffff) ^ 0xffff;
   2359 	if (crc == TULIP_ROM_GETW(romdata, TULIP_ROM_CRC32_CHECKSUM1))
   2360 		return (1);
   2361 
   2362 	return (0);
   2363 }
   2364 
   2365 /*
   2366  * tlp_isv_srom:
   2367  *
   2368  *	Check to see if the SROM is in the new standardized format.
   2369  */
   2370 int
   2371 tlp_isv_srom(const uint8_t *romdata)
   2372 {
   2373 	int i;
   2374 	uint16_t cksum;
   2375 
   2376 	if (tlp_srom_crcok(romdata)) {
   2377 		/*
   2378 		 * SROM CRC checks out; must be in the new format.
   2379 		 */
   2380 		return (1);
   2381 	}
   2382 
   2383 	cksum = TULIP_ROM_GETW(romdata, TULIP_ROM_CRC32_CHECKSUM);
   2384 	if (cksum == 0xffff || cksum == 0) {
   2385 		/*
   2386 		 * No checksum present.  Check the SROM ID; 18 bytes of 0
   2387 		 * followed by 1 (version) followed by the number of
   2388 		 * adapters which use this SROM (should be non-zero).
   2389 		 */
   2390 		for (i = 0; i < TULIP_ROM_SROM_FORMAT_VERION; i++) {
   2391 			if (romdata[i] != 0)
   2392 				return (0);
   2393 		}
   2394 		if (romdata[TULIP_ROM_SROM_FORMAT_VERION] != 1)
   2395 			return (0);
   2396 		if (romdata[TULIP_ROM_CHIP_COUNT] == 0)
   2397 			return (0);
   2398 		return (1);
   2399 	}
   2400 
   2401 	return (0);
   2402 }
   2403 
   2404 /*
   2405  * tlp_isv_srom_enaddr:
   2406  *
   2407  *	Get the Ethernet address from an ISV SROM.
   2408  */
   2409 int
   2410 tlp_isv_srom_enaddr(struct tulip_softc *sc, uint8_t *enaddr)
   2411 {
   2412 	int i, devcnt;
   2413 
   2414 	if (tlp_isv_srom(sc->sc_srom) == 0)
   2415 		return (0);
   2416 
   2417 	devcnt = sc->sc_srom[TULIP_ROM_CHIP_COUNT];
   2418 	for (i = 0; i < devcnt; i++) {
   2419 		if (sc->sc_srom[TULIP_ROM_CHIP_COUNT] == 1)
   2420 			break;
   2421 		if (sc->sc_srom[TULIP_ROM_CHIPn_DEVICE_NUMBER(i)] ==
   2422 		    sc->sc_devno)
   2423 			break;
   2424 	}
   2425 
   2426 	if (i == devcnt)
   2427 		return (0);
   2428 
   2429 	memcpy(enaddr, &sc->sc_srom[TULIP_ROM_IEEE_NETWORK_ADDRESS],
   2430 	    ETHER_ADDR_LEN);
   2431 	enaddr[5] += i;
   2432 
   2433 	return (1);
   2434 }
   2435 
   2436 /*
   2437  * tlp_parse_old_srom:
   2438  *
   2439  *	Parse old-format SROMs.
   2440  *
   2441  *	This routine is largely lifted from Matt Thomas's `de' driver.
   2442  */
   2443 int
   2444 tlp_parse_old_srom(struct tulip_softc *sc, uint8_t *enaddr)
   2445 {
   2446 	static const uint8_t testpat[] =
   2447 	    { 0xff, 0, 0x55, 0xaa, 0xff, 0, 0x55, 0xaa };
   2448 	int i;
   2449 	uint32_t cksum;
   2450 
   2451 	if (memcmp(&sc->sc_srom[0], &sc->sc_srom[16], 8) != 0) {
   2452 		/*
   2453 		 * Phobos G100 interfaces have the address at
   2454 		 * offsets 0 and 20, but each pair of bytes is
   2455 		 * swapped.
   2456 		 */
   2457 		if (sc->sc_srom_addrbits == 6 &&
   2458 		    sc->sc_srom[1] == 0x00 &&
   2459 		    sc->sc_srom[0] == 0x60 &&
   2460 		    sc->sc_srom[3] == 0xf5 &&
   2461 		    memcmp(&sc->sc_srom[0], &sc->sc_srom[20], 6) == 0) {
   2462 			for (i = 0; i < 6; i += 2) {
   2463 				enaddr[i] = sc->sc_srom[i + 1];
   2464 				enaddr[i + 1] = sc->sc_srom[i];
   2465 			}
   2466 			return (1);
   2467 		}
   2468 
   2469 		/*
   2470 		 * Phobos G130/G160 interfaces have the address at
   2471 		 * offsets 20 and 84, but each pair of bytes is
   2472 		 * swapped.
   2473 		 */
   2474 		if (sc->sc_srom_addrbits == 6 &&
   2475 		    sc->sc_srom[21] == 0x00 &&
   2476 		    sc->sc_srom[20] == 0x60 &&
   2477 		    sc->sc_srom[23] == 0xf5 &&
   2478 		    memcmp(&sc->sc_srom[20], &sc->sc_srom[84], 6) == 0) {
   2479 			for (i = 0; i < 6; i += 2) {
   2480 				enaddr[i] = sc->sc_srom[20 + i + 1];
   2481 				enaddr[i + 1] = sc->sc_srom[20 + i];
   2482 			}
   2483 			return (1);
   2484 		}
   2485 
   2486 		/*
   2487 		 * Cobalt Networks interfaces simply have the address
   2488 		 * in the first six bytes. The rest is zeroed out
   2489 		 * on some models, but others contain unknown data.
   2490 		 */
   2491 		if (sc->sc_srom[0] == 0x00 &&
   2492 		    sc->sc_srom[1] == 0x10 &&
   2493 		    sc->sc_srom[2] == 0xe0) {
   2494 			memcpy(enaddr, sc->sc_srom, ETHER_ADDR_LEN);
   2495 			return (1);
   2496 		}
   2497 
   2498 		/*
   2499 		 * Some vendors (e.g. ZNYX) don't use the standard
   2500 		 * DEC Address ROM format, but rather just have an
   2501 		 * Ethernet address in the first 6 bytes, maybe a
   2502 		 * 2 byte checksum, and then all 0xff's.
   2503 		 */
   2504 		for (i = 8; i < 32; i++) {
   2505 			if (sc->sc_srom[i] != 0xff &&
   2506 			    sc->sc_srom[i] != 0)
   2507 				return (0);
   2508 		}
   2509 
   2510 		/*
   2511 		 * Sanity check the Ethernet address:
   2512 		 *
   2513 		 *	- Make sure it's not multicast or locally
   2514 		 *	  assigned
   2515 		 *	- Make sure it has a non-0 OUI
   2516 		 */
   2517 		if (sc->sc_srom[0] & 3)
   2518 			return (0);
   2519 		if (sc->sc_srom[0] == 0 && sc->sc_srom[1] == 0 &&
   2520 		    sc->sc_srom[2] == 0)
   2521 			return (0);
   2522 
   2523 		memcpy(enaddr, sc->sc_srom, ETHER_ADDR_LEN);
   2524 		return (1);
   2525 	}
   2526 
   2527 	/*
   2528 	 * Standard DEC Address ROM test.
   2529 	 */
   2530 
   2531 	if (memcmp(&sc->sc_srom[24], testpat, 8) != 0)
   2532 		return (0);
   2533 
   2534 	for (i = 0; i < 8; i++) {
   2535 		if (sc->sc_srom[i] != sc->sc_srom[15 - i])
   2536 			return (0);
   2537 	}
   2538 
   2539 	memcpy(enaddr, sc->sc_srom, ETHER_ADDR_LEN);
   2540 
   2541 	cksum = *(uint16_t *) &enaddr[0];
   2542 
   2543 	cksum <<= 1;
   2544 	if (cksum > 0xffff)
   2545 		cksum -= 0xffff;
   2546 
   2547 	cksum += *(uint16_t *) &enaddr[2];
   2548 	if (cksum > 0xffff)
   2549 		cksum -= 0xffff;
   2550 
   2551 	cksum <<= 1;
   2552 	if (cksum > 0xffff)
   2553 		cksum -= 0xffff;
   2554 
   2555 	cksum += *(uint16_t *) &enaddr[4];
   2556 	if (cksum >= 0xffff)
   2557 		cksum -= 0xffff;
   2558 
   2559 	if (cksum != *(uint16_t *) &sc->sc_srom[6])
   2560 		return (0);
   2561 
   2562 	return (1);
   2563 }
   2564 
   2565 /*
   2566  * tlp_filter_setup:
   2567  *
   2568  *	Set the Tulip's receive filter.
   2569  */
   2570 static void
   2571 tlp_filter_setup(struct tulip_softc *sc)
   2572 {
   2573 	struct ethercom *ec = &sc->sc_ethercom;
   2574 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2575 	struct ether_multi *enm;
   2576 	struct ether_multistep step;
   2577 	volatile uint32_t *sp;
   2578 	struct tulip_txsoft *txs;
   2579 	uint8_t enaddr[ETHER_ADDR_LEN];
   2580 	uint32_t hash, hashsize;
   2581 	int cnt, nexttx;
   2582 
   2583 	DPRINTF(sc, ("%s: tlp_filter_setup: sc_flags 0x%08x\n",
   2584 	    device_xname(sc->sc_dev), sc->sc_flags));
   2585 
   2586 	memcpy(enaddr, CLLADDR(ifp->if_sadl), ETHER_ADDR_LEN);
   2587 
   2588 	/*
   2589 	 * If there are transmissions pending, wait until they have
   2590 	 * completed.
   2591 	 */
   2592 	if (! SIMPLEQ_EMPTY(&sc->sc_txdirtyq) ||
   2593 	    (sc->sc_flags & TULIPF_DOING_SETUP) != 0) {
   2594 		sc->sc_flags |= TULIPF_WANT_SETUP;
   2595 		DPRINTF(sc, ("%s: tlp_filter_setup: deferring\n",
   2596 		    device_xname(sc->sc_dev)));
   2597 		return;
   2598 	}
   2599 	sc->sc_flags &= ~TULIPF_WANT_SETUP;
   2600 
   2601 	switch (sc->sc_chip) {
   2602 	case TULIP_CHIP_82C115:
   2603 		hashsize = TULIP_PNICII_HASHSIZE;
   2604 		break;
   2605 
   2606 	default:
   2607 		hashsize = TULIP_MCHASHSIZE;
   2608 	}
   2609 
   2610 	/*
   2611 	 * If we're running, idle the transmit and receive engines.  If
   2612 	 * we're NOT running, we're being called from tlp_init(), and our
   2613 	 * writing OPMODE will start the transmit and receive processes
   2614 	 * in motion.
   2615 	 */
   2616 	if (ifp->if_flags & IFF_RUNNING)
   2617 		tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   2618 
   2619 	sc->sc_opmode &= ~(OPMODE_PR|OPMODE_PM);
   2620 
   2621 	if (ifp->if_flags & IFF_PROMISC) {
   2622 		sc->sc_opmode |= OPMODE_PR;
   2623 		goto allmulti;
   2624 	}
   2625 
   2626 	/*
   2627 	 * Try Perfect filtering first.
   2628 	 */
   2629 
   2630 	sc->sc_filtmode = TDCTL_Tx_FT_PERFECT;
   2631 	sp = TULIP_CDSP(sc);
   2632 	memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
   2633 	cnt = 0;
   2634 	ETHER_FIRST_MULTI(step, ec, enm);
   2635 	while (enm != NULL) {
   2636 		if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
   2637 			/*
   2638 			 * We must listen to a range of multicast addresses.
   2639 			 * For now, just accept all multicasts, rather than
   2640 			 * trying to set only those filter bits needed to match
   2641 			 * the range.  (At this time, the only use of address
   2642 			 * ranges is for IP multicast routing, for which the
   2643 			 * range is big enough to require all bits set.)
   2644 			 */
   2645 			goto allmulti;
   2646 		}
   2647 		if (cnt == (TULIP_MAXADDRS - 2)) {
   2648 			/*
   2649 			 * We already have our multicast limit (still need
   2650 			 * our station address and broadcast).  Go to
   2651 			 * Hash-Perfect mode.
   2652 			 */
   2653 			goto hashperfect;
   2654 		}
   2655 		cnt++;
   2656 		*sp++ = htole32(TULIP_SP_FIELD(enm->enm_addrlo, 0));
   2657 		*sp++ = htole32(TULIP_SP_FIELD(enm->enm_addrlo, 1));
   2658 		*sp++ = htole32(TULIP_SP_FIELD(enm->enm_addrlo, 2));
   2659 		ETHER_NEXT_MULTI(step, enm);
   2660 	}
   2661 
   2662 	if (ifp->if_flags & IFF_BROADCAST) {
   2663 		/* ...and the broadcast address. */
   2664 		cnt++;
   2665 		*sp++ = htole32(TULIP_SP_FIELD_C(0xff, 0xff));
   2666 		*sp++ = htole32(TULIP_SP_FIELD_C(0xff, 0xff));
   2667 		*sp++ = htole32(TULIP_SP_FIELD_C(0xff, 0xff));
   2668 	}
   2669 
   2670 	/* Pad the rest with our station address. */
   2671 	for (; cnt < TULIP_MAXADDRS; cnt++) {
   2672 		*sp++ = htole32(TULIP_SP_FIELD(enaddr, 0));
   2673 		*sp++ = htole32(TULIP_SP_FIELD(enaddr, 1));
   2674 		*sp++ = htole32(TULIP_SP_FIELD(enaddr, 2));
   2675 	}
   2676 	ifp->if_flags &= ~IFF_ALLMULTI;
   2677 	goto setit;
   2678 
   2679  hashperfect:
   2680 	/*
   2681 	 * Try Hash-Perfect mode.
   2682 	 */
   2683 
   2684 	/*
   2685 	 * Some 21140 chips have broken Hash-Perfect modes.  On these
   2686 	 * chips, we simply use Hash-Only mode, and put our station
   2687 	 * address into the filter.
   2688 	 */
   2689 	if (sc->sc_chip == TULIP_CHIP_21140)
   2690 		sc->sc_filtmode = TDCTL_Tx_FT_HASHONLY;
   2691 	else
   2692 		sc->sc_filtmode = TDCTL_Tx_FT_HASH;
   2693 	sp = TULIP_CDSP(sc);
   2694 	memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
   2695 	ETHER_FIRST_MULTI(step, ec, enm);
   2696 	while (enm != NULL) {
   2697 		if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
   2698 			/*
   2699 			 * We must listen to a range of multicast addresses.
   2700 			 * For now, just accept all multicasts, rather than
   2701 			 * trying to set only those filter bits needed to match
   2702 			 * the range.  (At this time, the only use of address
   2703 			 * ranges is for IP multicast routing, for which the
   2704 			 * range is big enough to require all bits set.)
   2705 			 */
   2706 			goto allmulti;
   2707 		}
   2708 		hash = tlp_mchash(enm->enm_addrlo, hashsize);
   2709 		sp[hash >> 4] |= htole32(1 << (hash & 0xf));
   2710 		ETHER_NEXT_MULTI(step, enm);
   2711 	}
   2712 
   2713 	if (ifp->if_flags & IFF_BROADCAST) {
   2714 		/* ...and the broadcast address. */
   2715 		hash = tlp_mchash(etherbroadcastaddr, hashsize);
   2716 		sp[hash >> 4] |= htole32(1 << (hash & 0xf));
   2717 	}
   2718 
   2719 	if (sc->sc_filtmode == TDCTL_Tx_FT_HASHONLY) {
   2720 		/* ...and our station address. */
   2721 		hash = tlp_mchash(enaddr, hashsize);
   2722 		sp[hash >> 4] |= htole32(1 << (hash & 0xf));
   2723 	} else {
   2724 		/*
   2725 		 * Hash-Perfect mode; put our station address after
   2726 		 * the hash table.
   2727 		 */
   2728 		sp[39] = htole32(TULIP_SP_FIELD(enaddr, 0));
   2729 		sp[40] = htole32(TULIP_SP_FIELD(enaddr, 1));
   2730 		sp[41] = htole32(TULIP_SP_FIELD(enaddr, 2));
   2731 	}
   2732 	ifp->if_flags &= ~IFF_ALLMULTI;
   2733 	goto setit;
   2734 
   2735  allmulti:
   2736 	/*
   2737 	 * Use Perfect filter mode.  First address is the broadcast address,
   2738 	 * and pad the rest with our station address.  We'll set Pass-all-
   2739 	 * multicast in OPMODE below.
   2740 	 */
   2741 	sc->sc_filtmode = TDCTL_Tx_FT_PERFECT;
   2742 	sp = TULIP_CDSP(sc);
   2743 	memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
   2744 	cnt = 0;
   2745 	if (ifp->if_flags & IFF_BROADCAST) {
   2746 		cnt++;
   2747 		*sp++ = htole32(TULIP_SP_FIELD_C(0xff, 0xff));
   2748 		*sp++ = htole32(TULIP_SP_FIELD_C(0xff, 0xff));
   2749 		*sp++ = htole32(TULIP_SP_FIELD_C(0xff, 0xff));
   2750 	}
   2751 	for (; cnt < TULIP_MAXADDRS; cnt++) {
   2752 		*sp++ = htole32(TULIP_SP_FIELD(enaddr, 0));
   2753 		*sp++ = htole32(TULIP_SP_FIELD(enaddr, 1));
   2754 		*sp++ = htole32(TULIP_SP_FIELD(enaddr, 2));
   2755 	}
   2756 	ifp->if_flags |= IFF_ALLMULTI;
   2757 
   2758  setit:
   2759 	if (ifp->if_flags & IFF_ALLMULTI)
   2760 		sc->sc_opmode |= OPMODE_PM;
   2761 
   2762 	/* Sync the setup packet buffer. */
   2763 	TULIP_CDSPSYNC(sc, BUS_DMASYNC_PREWRITE);
   2764 
   2765 	/*
   2766 	 * Fill in the setup packet descriptor.
   2767 	 */
   2768 	txs = SIMPLEQ_FIRST(&sc->sc_txfreeq);
   2769 
   2770 	txs->txs_firstdesc = sc->sc_txnext;
   2771 	txs->txs_lastdesc = sc->sc_txnext;
   2772 	txs->txs_ndescs = 1;
   2773 	txs->txs_mbuf = NULL;
   2774 
   2775 	nexttx = sc->sc_txnext;
   2776 	sc->sc_txdescs[nexttx].td_status = 0;
   2777 	sc->sc_txdescs[nexttx].td_bufaddr1 = htole32(TULIP_CDSPADDR(sc));
   2778 	sc->sc_txdescs[nexttx].td_ctl =
   2779 	    htole32((TULIP_SETUP_PACKET_LEN << TDCTL_SIZE1_SHIFT) |
   2780 	    sc->sc_filtmode | TDCTL_Tx_SET | sc->sc_setup_fsls |
   2781 	    TDCTL_Tx_IC | sc->sc_tdctl_ch |
   2782 	    (nexttx == (TULIP_NTXDESC - 1) ? sc->sc_tdctl_er : 0));
   2783 	TULIP_CDTXSYNC(sc, nexttx, 1,
   2784 	    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
   2785 
   2786 #ifdef TLP_DEBUG
   2787 	if (ifp->if_flags & IFF_DEBUG) {
   2788 		printf("     filter_setup %p transmit chain:\n", txs);
   2789 		printf("     descriptor %d:\n", nexttx);
   2790 		printf("       td_status:   0x%08x\n",
   2791 		    le32toh(sc->sc_txdescs[nexttx].td_status));
   2792 		printf("       td_ctl:      0x%08x\n",
   2793 		    le32toh(sc->sc_txdescs[nexttx].td_ctl));
   2794 		printf("       td_bufaddr1: 0x%08x\n",
   2795 		    le32toh(sc->sc_txdescs[nexttx].td_bufaddr1));
   2796 		printf("       td_bufaddr2: 0x%08x\n",
   2797 		    le32toh(sc->sc_txdescs[nexttx].td_bufaddr2));
   2798 	}
   2799 #endif
   2800 
   2801 	sc->sc_txdescs[nexttx].td_status = htole32(TDSTAT_OWN);
   2802 	TULIP_CDTXSYNC(sc, nexttx, 1,
   2803 	    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
   2804 
   2805 	/* Advance the tx pointer. */
   2806 	sc->sc_txfree -= 1;
   2807 	sc->sc_txnext = TULIP_NEXTTX(nexttx);
   2808 
   2809 	SIMPLEQ_REMOVE_HEAD(&sc->sc_txfreeq, txs_q);
   2810 	SIMPLEQ_INSERT_TAIL(&sc->sc_txdirtyq, txs, txs_q);
   2811 
   2812 	/*
   2813 	 * Set the OPMODE register.  This will also resume the
   2814 	 * transmit process we idled above.
   2815 	 */
   2816 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   2817 
   2818 	sc->sc_flags |= TULIPF_DOING_SETUP;
   2819 
   2820 	/*
   2821 	 * Kick the transmitter; this will cause the Tulip to
   2822 	 * read the setup descriptor.
   2823 	 */
   2824 	/* XXX USE AUTOPOLLING? */
   2825 	TULIP_WRITE(sc, CSR_TXPOLL, TXPOLL_TPD);
   2826 
   2827 	/* Set up a watchdog timer in case the chip flakes out. */
   2828 	ifp->if_timer = 5;
   2829 
   2830 	DPRINTF(sc, ("%s: tlp_filter_setup: returning\n", device_xname(sc->sc_dev)));
   2831 }
   2832 
   2833 /*
   2834  * tlp_winb_filter_setup:
   2835  *
   2836  *	Set the Winbond 89C840F's receive filter.
   2837  */
   2838 static void
   2839 tlp_winb_filter_setup(struct tulip_softc *sc)
   2840 {
   2841 	struct ethercom *ec = &sc->sc_ethercom;
   2842 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2843 	struct ether_multi *enm;
   2844 	struct ether_multistep step;
   2845 	uint32_t hash, mchash[2];
   2846 
   2847 	DPRINTF(sc, ("%s: tlp_winb_filter_setup: sc_flags 0x%08x\n",
   2848 	    device_xname(sc->sc_dev), sc->sc_flags));
   2849 
   2850 	sc->sc_opmode &= ~(OPMODE_WINB_APP|OPMODE_WINB_AMP|OPMODE_WINB_ABP);
   2851 
   2852 	if (ifp->if_flags & IFF_MULTICAST)
   2853 		sc->sc_opmode |= OPMODE_WINB_AMP;
   2854 
   2855 	if (ifp->if_flags & IFF_BROADCAST)
   2856 		sc->sc_opmode |= OPMODE_WINB_ABP;
   2857 
   2858 	if (ifp->if_flags & IFF_PROMISC) {
   2859 		sc->sc_opmode |= OPMODE_WINB_APP;
   2860 		goto allmulti;
   2861 	}
   2862 
   2863 	mchash[0] = mchash[1] = 0;
   2864 
   2865 	ETHER_FIRST_MULTI(step, ec, enm);
   2866 	while (enm != NULL) {
   2867 		if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
   2868 			/*
   2869 			 * We must listen to a range of multicast addresses.
   2870 			 * For now, just accept all multicasts, rather than
   2871 			 * trying to set only those filter bits needed to match
   2872 			 * the range.  (At this time, the only use of address
   2873 			 * ranges is for IP multicast routing, for which the
   2874 			 * range is big enough to require all bits set.)
   2875 			 */
   2876 			goto allmulti;
   2877 		}
   2878 
   2879 		/*
   2880 		 * According to the FreeBSD `wb' driver, yes, you
   2881 		 * really do invert the hash.
   2882 		 */
   2883 		hash =
   2884 		    (~(ether_crc32_le(enm->enm_addrlo, ETHER_ADDR_LEN) >> 26))
   2885 		    & 0x3f;
   2886 		mchash[hash >> 5] |= 1 << (hash & 0x1f);
   2887 		ETHER_NEXT_MULTI(step, enm);
   2888 	}
   2889 	ifp->if_flags &= ~IFF_ALLMULTI;
   2890 	goto setit;
   2891 
   2892  allmulti:
   2893 	ifp->if_flags |= IFF_ALLMULTI;
   2894 	mchash[0] = mchash[1] = 0xffffffff;
   2895 
   2896  setit:
   2897 	TULIP_WRITE(sc, CSR_WINB_CMA0, mchash[0]);
   2898 	TULIP_WRITE(sc, CSR_WINB_CMA1, mchash[1]);
   2899 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   2900 	DPRINTF(sc, ("%s: tlp_winb_filter_setup: returning\n",
   2901 	    device_xname(sc->sc_dev)));
   2902 }
   2903 
   2904 /*
   2905  * tlp_al981_filter_setup:
   2906  *
   2907  *	Set the ADMtek AL981's receive filter.
   2908  */
   2909 static void
   2910 tlp_al981_filter_setup(struct tulip_softc *sc)
   2911 {
   2912 	struct ethercom *ec = &sc->sc_ethercom;
   2913 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2914 	struct ether_multi *enm;
   2915 	struct ether_multistep step;
   2916 	uint32_t hash, mchash[2];
   2917 
   2918 	/*
   2919 	 * If the chip is running, we need to reset the interface,
   2920 	 * and will revisit here (with IFF_RUNNING) clear.  The
   2921 	 * chip seems to really not like to have its multicast
   2922 	 * filter programmed without a reset.
   2923 	 */
   2924 	if (ifp->if_flags & IFF_RUNNING) {
   2925 		(void) tlp_init(ifp);
   2926 		return;
   2927 	}
   2928 
   2929 	DPRINTF(sc, ("%s: tlp_al981_filter_setup: sc_flags 0x%08x\n",
   2930 	    device_xname(sc->sc_dev), sc->sc_flags));
   2931 
   2932 	sc->sc_opmode &= ~(OPMODE_PR|OPMODE_PM);
   2933 
   2934 	if (ifp->if_flags & IFF_PROMISC) {
   2935 		sc->sc_opmode |= OPMODE_PR;
   2936 		goto allmulti;
   2937 	}
   2938 
   2939 	mchash[0] = mchash[1] = 0;
   2940 
   2941 	ETHER_FIRST_MULTI(step, ec, enm);
   2942 	while (enm != NULL) {
   2943 		if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
   2944 			/*
   2945 			 * We must listen to a range of multicast addresses.
   2946 			 * For now, just accept all multicasts, rather than
   2947 			 * trying to set only those filter bits needed to match
   2948 			 * the range.  (At this time, the only use of address
   2949 			 * ranges is for IP multicast routing, for which the
   2950 			 * range is big enough to require all bits set.)
   2951 			 */
   2952 			goto allmulti;
   2953 		}
   2954 
   2955 		hash = ether_crc32_le(enm->enm_addrlo, ETHER_ADDR_LEN) & 0x3f;
   2956 		mchash[hash >> 5] |= 1 << (hash & 0x1f);
   2957 		ETHER_NEXT_MULTI(step, enm);
   2958 	}
   2959 	ifp->if_flags &= ~IFF_ALLMULTI;
   2960 	goto setit;
   2961 
   2962  allmulti:
   2963 	ifp->if_flags |= IFF_ALLMULTI;
   2964 	mchash[0] = mchash[1] = 0xffffffff;
   2965 
   2966  setit:
   2967 	bus_space_write_4(sc->sc_st, sc->sc_sh, CSR_ADM_MAR0, mchash[0]);
   2968 	bus_space_write_4(sc->sc_st, sc->sc_sh, CSR_ADM_MAR1, mchash[1]);
   2969 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   2970 	DPRINTF(sc, ("%s: tlp_al981_filter_setup: returning\n",
   2971 	    device_xname(sc->sc_dev)));
   2972 }
   2973 
   2974 /*
   2975  * tlp_asix_filter_setup:
   2976  *
   2977  * 	Set the ASIX AX8814x recieve filter.
   2978  */
   2979 static void
   2980 tlp_asix_filter_setup(struct tulip_softc *sc)
   2981 {
   2982 	struct ethercom *ec = &sc->sc_ethercom;
   2983 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2984 	struct ether_multi *enm;
   2985 	struct ether_multistep step;
   2986 	uint32_t hash, mchash[2];
   2987 
   2988 	DPRINTF(sc, ("%s: tlp_asix_filter_setup: sc_flags 0x%08x\n",
   2989 		device_xname(sc->sc_dev), sc->sc_flags));
   2990 
   2991 	sc->sc_opmode &= ~(OPMODE_PM|OPMODE_AX_RB|OPMODE_PR);
   2992 
   2993 	if (ifp->if_flags & IFF_MULTICAST)
   2994 		sc->sc_opmode |= OPMODE_PM;
   2995 
   2996 	if (ifp->if_flags & IFF_BROADCAST)
   2997 		sc->sc_opmode |= OPMODE_AX_RB;
   2998 
   2999 	if (ifp->if_flags & IFF_PROMISC) {
   3000 		sc->sc_opmode |= OPMODE_PR;
   3001 		goto allmulti;
   3002 	}
   3003 
   3004 	mchash[0] = mchash[1] = 0;
   3005 
   3006 	ETHER_FIRST_MULTI(step, ec, enm);
   3007 	while (enm != NULL) {
   3008 		if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
   3009 			/*
   3010 			 * We must listen to a range of multicast addresses.
   3011 			 * For now, just accept all multicasts, rather than
   3012 			 * trying to set only those filter bits needed to match
   3013 			 * the range.  (At this time, the only use of address
   3014 			 * ranges is for IP multicast routing, for which the
   3015 			 * range is big enough to require all bits set.)
   3016 			 */
   3017 			goto allmulti;
   3018 		}
   3019 		hash = (ether_crc32_be(enm->enm_addrlo, ETHER_ADDR_LEN) >> 26)
   3020 		       & 0x3f;
   3021 		if (hash < 32)
   3022 			mchash[0] |= (1 << hash);
   3023 		else
   3024 			mchash[1] |= (1 << (hash - 32));
   3025 		ETHER_NEXT_MULTI(step, enm);
   3026 	}
   3027 	ifp->if_flags &= ~IFF_ALLMULTI;
   3028 	goto setit;
   3029 
   3030 allmulti:
   3031 	ifp->if_flags |= IFF_ALLMULTI;
   3032 	mchash[0] = mchash[1] = 0xffffffff;
   3033 
   3034 setit:
   3035 	TULIP_WRITE(sc, CSR_AX_FILTIDX, AX_FILTIDX_MAR0);
   3036 	TULIP_WRITE(sc, CSR_AX_FILTDATA, mchash[0]);
   3037 	TULIP_WRITE(sc, CSR_AX_FILTIDX, AX_FILTIDX_MAR1);
   3038 	TULIP_WRITE(sc, CSR_AX_FILTDATA, mchash[1]);
   3039 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3040 	DPRINTF(sc, ("%s: tlp_asix_filter_setup: returning\n",
   3041 		device_xname(sc->sc_dev)));
   3042 }
   3043 
   3044 
   3045 /*
   3046  * tlp_idle:
   3047  *
   3048  *	Cause the transmit and/or receive processes to go idle.
   3049  */
   3050 void
   3051 tlp_idle(struct tulip_softc *sc, uint32_t bits)
   3052 {
   3053 	static const char * const tlp_tx_state_names[] = {
   3054 		"STOPPED",
   3055 		"RUNNING - FETCH",
   3056 		"RUNNING - WAIT",
   3057 		"RUNNING - READING",
   3058 		"-- RESERVED --",
   3059 		"RUNNING - SETUP",
   3060 		"SUSPENDED",
   3061 		"RUNNING - CLOSE",
   3062 	};
   3063 	static const char * const tlp_rx_state_names[] = {
   3064 		"STOPPED",
   3065 		"RUNNING - FETCH",
   3066 		"RUNNING - CHECK",
   3067 		"RUNNING - WAIT",
   3068 		"SUSPENDED",
   3069 		"RUNNING - CLOSE",
   3070 		"RUNNING - FLUSH",
   3071 		"RUNNING - QUEUE",
   3072 	};
   3073 	static const char * const dm9102_tx_state_names[] = {
   3074 		"STOPPED",
   3075 		"RUNNING - FETCH",
   3076 		"RUNNING - SETUP",
   3077 		"RUNNING - READING",
   3078 		"RUNNING - CLOSE - CLEAR OWNER",
   3079 		"RUNNING - WAIT",
   3080 		"RUNNING - CLOSE - WRITE STATUS",
   3081 		"SUSPENDED",
   3082 	};
   3083 	static const char * const dm9102_rx_state_names[] = {
   3084 		"STOPPED",
   3085 		"RUNNING - FETCH",
   3086 		"RUNNING - WAIT",
   3087 		"RUNNING - QUEUE",
   3088 		"RUNNING - CLOSE - CLEAR OWNER",
   3089 		"RUNNING - CLOSE - WRITE STATUS",
   3090 		"SUSPENDED",
   3091 		"RUNNING - FLUSH",
   3092 	};
   3093 
   3094 	const char * const *tx_state_names, * const *rx_state_names;
   3095 	uint32_t csr, ackmask = 0;
   3096 	int i;
   3097 
   3098 	switch (sc->sc_chip) {
   3099 	case TULIP_CHIP_DM9102:
   3100 	case TULIP_CHIP_DM9102A:
   3101 		tx_state_names = dm9102_tx_state_names;
   3102 		rx_state_names = dm9102_rx_state_names;
   3103 		break;
   3104 
   3105 	default:
   3106 		tx_state_names = tlp_tx_state_names;
   3107 		rx_state_names = tlp_rx_state_names;
   3108 		break;
   3109 	}
   3110 
   3111 	if (bits & OPMODE_ST)
   3112 		ackmask |= STATUS_TPS;
   3113 
   3114 	if (bits & OPMODE_SR)
   3115 		ackmask |= STATUS_RPS;
   3116 
   3117 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode & ~bits);
   3118 
   3119 	for (i = 0; i < 1000; i++) {
   3120 		if (TULIP_ISSET(sc, CSR_STATUS, ackmask) == ackmask)
   3121 			break;
   3122 		delay(10);
   3123 	}
   3124 
   3125 	csr = TULIP_READ(sc, CSR_STATUS);
   3126 	if ((csr & ackmask) != ackmask) {
   3127 		if ((bits & OPMODE_ST) != 0 && (csr & STATUS_TPS) == 0 &&
   3128 		    (csr & STATUS_TS) != STATUS_TS_STOPPED) {
   3129 			switch (sc->sc_chip) {
   3130 			case TULIP_CHIP_AX88140:
   3131 			case TULIP_CHIP_AX88141:
   3132 				/*
   3133 				 * Filter the message out on noisy chips.
   3134 				 */
   3135 				break;
   3136 			default:
   3137 				printf("%s: transmit process failed to idle: "
   3138 				    "state %s\n", device_xname(sc->sc_dev),
   3139 				    tx_state_names[(csr & STATUS_TS) >> 20]);
   3140 			}
   3141 		}
   3142 		if ((bits & OPMODE_SR) != 0 && (csr & STATUS_RPS) == 0 &&
   3143 		    (csr & STATUS_RS) != STATUS_RS_STOPPED) {
   3144 			switch (sc->sc_chip) {
   3145 			case TULIP_CHIP_AN983:
   3146 			case TULIP_CHIP_AN985:
   3147 			case TULIP_CHIP_DM9102A:
   3148 			case TULIP_CHIP_RS7112:
   3149 				/*
   3150 				 * Filter the message out on noisy chips.
   3151 				 */
   3152 				break;
   3153 			default:
   3154 				printf("%s: receive process failed to idle: "
   3155 				    "state %s\n", device_xname(sc->sc_dev),
   3156 				    rx_state_names[(csr & STATUS_RS) >> 17]);
   3157 			}
   3158 		}
   3159 	}
   3160 	TULIP_WRITE(sc, CSR_STATUS, ackmask);
   3161 }
   3162 
   3163 /*****************************************************************************
   3164  * Generic media support functions.
   3165  *****************************************************************************/
   3166 
   3167 /*
   3168  * tlp_mediastatus:	[ifmedia interface function]
   3169  *
   3170  *	Query the current media.
   3171  */
   3172 void
   3173 tlp_mediastatus(struct ifnet *ifp, struct ifmediareq *ifmr)
   3174 {
   3175 	struct tulip_softc *sc = ifp->if_softc;
   3176 
   3177 	if (TULIP_IS_ENABLED(sc) == 0) {
   3178 		ifmr->ifm_active = IFM_ETHER | IFM_NONE;
   3179 		ifmr->ifm_status = 0;
   3180 		return;
   3181 	}
   3182 
   3183 	(*sc->sc_mediasw->tmsw_get)(sc, ifmr);
   3184 }
   3185 
   3186 /*
   3187  * tlp_mediachange:	[ifmedia interface function]
   3188  *
   3189  *	Update the current media.
   3190  */
   3191 int
   3192 tlp_mediachange(struct ifnet *ifp)
   3193 {
   3194 	struct tulip_softc *sc = ifp->if_softc;
   3195 
   3196 	if ((ifp->if_flags & IFF_UP) == 0)
   3197 		return (0);
   3198 	return ((*sc->sc_mediasw->tmsw_set)(sc));
   3199 }
   3200 
   3201 /*****************************************************************************
   3202  * Support functions for MII-attached media.
   3203  *****************************************************************************/
   3204 
   3205 /*
   3206  * tlp_mii_tick:
   3207  *
   3208  *	One second timer, used to tick the MII.
   3209  */
   3210 static void
   3211 tlp_mii_tick(void *arg)
   3212 {
   3213 	struct tulip_softc *sc = arg;
   3214 	int s;
   3215 
   3216 	if (!device_is_active(sc->sc_dev))
   3217 		return;
   3218 
   3219 	s = splnet();
   3220 	mii_tick(&sc->sc_mii);
   3221 	splx(s);
   3222 
   3223 	callout_reset(&sc->sc_tick_callout, hz, sc->sc_tick, sc);
   3224 }
   3225 
   3226 /*
   3227  * tlp_mii_statchg:	[mii interface function]
   3228  *
   3229  *	Callback from PHY when media changes.
   3230  */
   3231 static void
   3232 tlp_mii_statchg(device_t self)
   3233 {
   3234 	struct tulip_softc *sc = device_private(self);
   3235 
   3236 	/* Idle the transmit and receive processes. */
   3237 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   3238 
   3239 	sc->sc_opmode &= ~(OPMODE_TTM|OPMODE_FD|OPMODE_HBD);
   3240 
   3241 	if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_10_T)
   3242 		sc->sc_opmode |= OPMODE_TTM;
   3243 	else
   3244 		sc->sc_opmode |= OPMODE_HBD;
   3245 
   3246 	if (sc->sc_mii.mii_media_active & IFM_FDX)
   3247 		sc->sc_opmode |= OPMODE_FD|OPMODE_HBD;
   3248 
   3249 	/*
   3250 	 * Write new OPMODE bits.  This also restarts the transmit
   3251 	 * and receive processes.
   3252 	 */
   3253 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3254 }
   3255 
   3256 /*
   3257  * tlp_winb_mii_statchg: [mii interface function]
   3258  *
   3259  *	Callback from PHY when media changes.  This version is
   3260  *	for the Winbond 89C840F, which has different OPMODE bits.
   3261  */
   3262 static void
   3263 tlp_winb_mii_statchg(device_t self)
   3264 {
   3265 	struct tulip_softc *sc = device_private(self);
   3266 
   3267 	/* Idle the transmit and receive processes. */
   3268 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   3269 
   3270 	sc->sc_opmode &= ~(OPMODE_WINB_FES|OPMODE_FD);
   3271 
   3272 	if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_100_TX)
   3273 		sc->sc_opmode |= OPMODE_WINB_FES;
   3274 
   3275 	if (sc->sc_mii.mii_media_active & IFM_FDX)
   3276 		sc->sc_opmode |= OPMODE_FD;
   3277 
   3278 	/*
   3279 	 * Write new OPMODE bits.  This also restarts the transmit
   3280 	 * and receive processes.
   3281 	 */
   3282 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3283 }
   3284 
   3285 /*
   3286  * tlp_dm9102_mii_statchg: [mii interface function]
   3287  *
   3288  *	Callback from PHY when media changes.  This version is
   3289  *	for the DM9102.
   3290  */
   3291 static void
   3292 tlp_dm9102_mii_statchg(device_t self)
   3293 {
   3294 	struct tulip_softc *sc = device_private(self);
   3295 
   3296 	/*
   3297 	 * Don't idle the transmit and receive processes, here.  It
   3298 	 * seems to fail, and just causes excess noise.
   3299 	 */
   3300 	sc->sc_opmode &= ~(OPMODE_TTM|OPMODE_FD);
   3301 
   3302 	if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) != IFM_100_TX)
   3303 		sc->sc_opmode |= OPMODE_TTM;
   3304 
   3305 	if (sc->sc_mii.mii_media_active & IFM_FDX)
   3306 		sc->sc_opmode |= OPMODE_FD;
   3307 
   3308 	/*
   3309 	 * Write new OPMODE bits.
   3310 	 */
   3311 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3312 }
   3313 
   3314 /*
   3315  * tlp_mii_getmedia:
   3316  *
   3317  *	Callback from ifmedia to request current media status.
   3318  */
   3319 static void
   3320 tlp_mii_getmedia(struct tulip_softc *sc, struct ifmediareq *ifmr)
   3321 {
   3322 
   3323 	mii_pollstat(&sc->sc_mii);
   3324 	ifmr->ifm_status = sc->sc_mii.mii_media_status;
   3325 	ifmr->ifm_active = sc->sc_mii.mii_media_active;
   3326 }
   3327 
   3328 /*
   3329  * tlp_mii_setmedia:
   3330  *
   3331  *	Callback from ifmedia to request new media setting.
   3332  */
   3333 static int
   3334 tlp_mii_setmedia(struct tulip_softc *sc)
   3335 {
   3336 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   3337 	int rc;
   3338 
   3339 	if ((ifp->if_flags & IFF_UP) == 0)
   3340 		return 0;
   3341 	switch (sc->sc_chip) {
   3342 	case TULIP_CHIP_21142:
   3343 	case TULIP_CHIP_21143:
   3344 		/* Disable the internal Nway engine. */
   3345 		TULIP_WRITE(sc, CSR_SIATXRX, 0);
   3346 		break;
   3347 
   3348 	default:
   3349 		/* Nothing. */
   3350 		break;
   3351 	}
   3352 	if ((rc = mii_mediachg(&sc->sc_mii)) == ENXIO)
   3353 		return 0;
   3354 	return rc;
   3355 }
   3356 
   3357 /*
   3358  * tlp_bitbang_mii_readreg:
   3359  *
   3360  *	Read a PHY register via bit-bang'ing the MII.
   3361  */
   3362 static int
   3363 tlp_bitbang_mii_readreg(device_t self, int phy, int reg)
   3364 {
   3365 	struct tulip_softc *sc = device_private(self);
   3366 
   3367 	return (mii_bitbang_readreg(self, sc->sc_bitbang_ops, phy, reg));
   3368 }
   3369 
   3370 /*
   3371  * tlp_bitbang_mii_writereg:
   3372  *
   3373  *	Write a PHY register via bit-bang'ing the MII.
   3374  */
   3375 static void
   3376 tlp_bitbang_mii_writereg(device_t self, int phy, int reg, int val)
   3377 {
   3378 	struct tulip_softc *sc = device_private(self);
   3379 
   3380 	mii_bitbang_writereg(self, sc->sc_bitbang_ops, phy, reg, val);
   3381 }
   3382 
   3383 /*
   3384  * tlp_sio_mii_bitbang_read:
   3385  *
   3386  *	Read the MII serial port for the MII bit-bang module.
   3387  */
   3388 static uint32_t
   3389 tlp_sio_mii_bitbang_read(device_t self)
   3390 {
   3391 	struct tulip_softc *sc = device_private(self);
   3392 
   3393 	return (TULIP_READ(sc, CSR_MIIROM));
   3394 }
   3395 
   3396 /*
   3397  * tlp_sio_mii_bitbang_write:
   3398  *
   3399  *	Write the MII serial port for the MII bit-bang module.
   3400  */
   3401 static void
   3402 tlp_sio_mii_bitbang_write(device_t self, uint32_t val)
   3403 {
   3404 	struct tulip_softc *sc = device_private(self);
   3405 
   3406 	TULIP_WRITE(sc, CSR_MIIROM, val);
   3407 }
   3408 
   3409 /*
   3410  * tlp_pnic_mii_readreg:
   3411  *
   3412  *	Read a PHY register on the Lite-On PNIC.
   3413  */
   3414 static int
   3415 tlp_pnic_mii_readreg(device_t self, int phy, int reg)
   3416 {
   3417 	struct tulip_softc *sc = device_private(self);
   3418 	uint32_t val;
   3419 	int i;
   3420 
   3421 	TULIP_WRITE(sc, CSR_PNIC_MII,
   3422 	    PNIC_MII_MBO | PNIC_MII_RESERVED |
   3423 	    PNIC_MII_READ | (phy << PNIC_MII_PHYSHIFT) |
   3424 	    (reg << PNIC_MII_REGSHIFT));
   3425 
   3426 	for (i = 0; i < 1000; i++) {
   3427 		delay(10);
   3428 		val = TULIP_READ(sc, CSR_PNIC_MII);
   3429 		if ((val & PNIC_MII_BUSY) == 0) {
   3430 			if ((val & PNIC_MII_DATA) == PNIC_MII_DATA)
   3431 				return (0);
   3432 			else
   3433 				return (val & PNIC_MII_DATA);
   3434 		}
   3435 	}
   3436 	printf("%s: MII read timed out\n", device_xname(sc->sc_dev));
   3437 	return (0);
   3438 }
   3439 
   3440 /*
   3441  * tlp_pnic_mii_writereg:
   3442  *
   3443  *	Write a PHY register on the Lite-On PNIC.
   3444  */
   3445 static void
   3446 tlp_pnic_mii_writereg(device_t self, int phy, int reg, int val)
   3447 {
   3448 	struct tulip_softc *sc = device_private(self);
   3449 	int i;
   3450 
   3451 	TULIP_WRITE(sc, CSR_PNIC_MII,
   3452 	    PNIC_MII_MBO | PNIC_MII_RESERVED |
   3453 	    PNIC_MII_WRITE | (phy << PNIC_MII_PHYSHIFT) |
   3454 	    (reg << PNIC_MII_REGSHIFT) | val);
   3455 
   3456 	for (i = 0; i < 1000; i++) {
   3457 		delay(10);
   3458 		if (TULIP_ISSET(sc, CSR_PNIC_MII, PNIC_MII_BUSY) == 0)
   3459 			return;
   3460 	}
   3461 	printf("%s: MII write timed out\n", device_xname(sc->sc_dev));
   3462 }
   3463 
   3464 static const bus_addr_t tlp_al981_phy_regmap[] = {
   3465 	CSR_ADM_BMCR,
   3466 	CSR_ADM_BMSR,
   3467 	CSR_ADM_PHYIDR1,
   3468 	CSR_ADM_PHYIDR2,
   3469 	CSR_ADM_ANAR,
   3470 	CSR_ADM_ANLPAR,
   3471 	CSR_ADM_ANER,
   3472 
   3473 	CSR_ADM_XMC,
   3474 	CSR_ADM_XCIIS,
   3475 	CSR_ADM_XIE,
   3476 	CSR_ADM_100CTR,
   3477 };
   3478 static const int tlp_al981_phy_regmap_size = sizeof(tlp_al981_phy_regmap) /
   3479     sizeof(tlp_al981_phy_regmap[0]);
   3480 
   3481 /*
   3482  * tlp_al981_mii_readreg:
   3483  *
   3484  *	Read a PHY register on the ADMtek AL981.
   3485  */
   3486 static int
   3487 tlp_al981_mii_readreg(device_t self, int phy, int reg)
   3488 {
   3489 	struct tulip_softc *sc = device_private(self);
   3490 
   3491 	/* AL981 only has an internal PHY. */
   3492 	if (phy != 0)
   3493 		return (0);
   3494 
   3495 	if (reg >= tlp_al981_phy_regmap_size)
   3496 		return (0);
   3497 
   3498 	return (bus_space_read_4(sc->sc_st, sc->sc_sh,
   3499 	    tlp_al981_phy_regmap[reg]) & 0xffff);
   3500 }
   3501 
   3502 /*
   3503  * tlp_al981_mii_writereg:
   3504  *
   3505  *	Write a PHY register on the ADMtek AL981.
   3506  */
   3507 static void
   3508 tlp_al981_mii_writereg(device_t self, int phy, int reg, int val)
   3509 {
   3510 	struct tulip_softc *sc = device_private(self);
   3511 
   3512 	/* AL981 only has an internal PHY. */
   3513 	if (phy != 0)
   3514 		return;
   3515 
   3516 	if (reg >= tlp_al981_phy_regmap_size)
   3517 		return;
   3518 
   3519 	bus_space_write_4(sc->sc_st, sc->sc_sh,
   3520 	    tlp_al981_phy_regmap[reg], val);
   3521 }
   3522 
   3523 /*****************************************************************************
   3524  * Chip-specific pre-init and reset functions.
   3525  *****************************************************************************/
   3526 
   3527 /*
   3528  * tlp_2114x_preinit:
   3529  *
   3530  *	Pre-init function shared by DECchip 21140, 21140A, 21142, and 21143.
   3531  */
   3532 static void
   3533 tlp_2114x_preinit(struct tulip_softc *sc)
   3534 {
   3535 	struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
   3536 	struct tulip_21x4x_media *tm = ife->ifm_aux;
   3537 
   3538 	/*
   3539 	 * Whether or not we're in MII or SIA/SYM mode, the media info
   3540 	 * contains the appropriate OPMODE bits.
   3541 	 *
   3542 	 * Also, we always set the Must-Be-One bit.
   3543 	 */
   3544 	sc->sc_opmode |= OPMODE_MBO | tm->tm_opmode;
   3545 
   3546 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3547 }
   3548 
   3549 /*
   3550  * tlp_2114x_mii_preinit:
   3551  *
   3552  *	Pre-init function shared by DECchip 21140, 21140A, 21142, and 21143.
   3553  *	This version is used by boards which only have MII and don't have
   3554  *	an ISV SROM.
   3555  */
   3556 static void
   3557 tlp_2114x_mii_preinit(struct tulip_softc *sc)
   3558 {
   3559 
   3560 	/*
   3561 	 * Always set the Must-Be-One bit, and Port Select (to select MII).
   3562 	 * We'll never be called during a media change.
   3563 	 */
   3564 	sc->sc_opmode |= OPMODE_MBO|OPMODE_PS;
   3565 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3566 }
   3567 
   3568 /*
   3569  * tlp_pnic_preinit:
   3570  *
   3571  *	Pre-init function for the Lite-On 82c168 and 82c169.
   3572  */
   3573 static void
   3574 tlp_pnic_preinit(struct tulip_softc *sc)
   3575 {
   3576 
   3577 	if (sc->sc_flags & TULIPF_HAS_MII) {
   3578 		/*
   3579 		 * MII case: just set the port-select bit; we will never
   3580 		 * be called during a media change.
   3581 		 */
   3582 		sc->sc_opmode |= OPMODE_PS;
   3583 	} else {
   3584 		/*
   3585 		 * ENDEC/PCS/Nway mode; enable the Tx backoff counter.
   3586 		 */
   3587 		sc->sc_opmode |= OPMODE_PNIC_TBEN;
   3588 	}
   3589 }
   3590 
   3591 /*
   3592  * tlp_asix_preinit:
   3593  *
   3594  * 	Pre-init function for the ASIX chipsets.
   3595  */
   3596 static void
   3597 tlp_asix_preinit(struct tulip_softc *sc)
   3598 {
   3599 
   3600 	switch (sc->sc_chip) {
   3601 		case TULIP_CHIP_AX88140:
   3602 		case TULIP_CHIP_AX88141:
   3603 			/* XXX Handle PHY. */
   3604 			sc->sc_opmode |= OPMODE_HBD|OPMODE_PS;
   3605 			break;
   3606 		default:
   3607 			/* Nothing */
   3608 			break;
   3609 	}
   3610 
   3611 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3612 }
   3613 
   3614 /*
   3615  * tlp_dm9102_preinit:
   3616  *
   3617  *	Pre-init function for the Davicom DM9102.
   3618  */
   3619 static void
   3620 tlp_dm9102_preinit(struct tulip_softc *sc)
   3621 {
   3622 
   3623 	switch (sc->sc_chip) {
   3624 	case TULIP_CHIP_DM9102:
   3625 		sc->sc_opmode |= OPMODE_MBO|OPMODE_HBD|OPMODE_PS;
   3626 		break;
   3627 
   3628 	case TULIP_CHIP_DM9102A:
   3629 		/*
   3630 		 * XXX Figure out how to actually deal with the HomePNA
   3631 		 * XXX portion of the DM9102A.
   3632 		 */
   3633 		sc->sc_opmode |= OPMODE_MBO|OPMODE_HBD;
   3634 		break;
   3635 
   3636 	default:
   3637 		/* Nothing. */
   3638 		break;
   3639 	}
   3640 
   3641 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3642 }
   3643 
   3644 /*
   3645  * tlp_21140_reset:
   3646  *
   3647  *	Issue a reset sequence on the 21140 via the GPIO facility.
   3648  */
   3649 static void
   3650 tlp_21140_reset(struct tulip_softc *sc)
   3651 {
   3652 	struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
   3653 	struct tulip_21x4x_media *tm = ife->ifm_aux;
   3654 	int i;
   3655 
   3656 	/* First, set the direction on the GPIO pins. */
   3657 	TULIP_WRITE(sc, CSR_GPP, GPP_GPC|sc->sc_gp_dir);
   3658 
   3659 	/* Now, issue the reset sequence. */
   3660 	for (i = 0; i < tm->tm_reset_length; i++) {
   3661 		delay(10);
   3662 		TULIP_WRITE(sc, CSR_GPP, sc->sc_srom[tm->tm_reset_offset + i]);
   3663 	}
   3664 
   3665 	/* Now, issue the selection sequence. */
   3666 	for (i = 0; i < tm->tm_gp_length; i++) {
   3667 		delay(10);
   3668 		TULIP_WRITE(sc, CSR_GPP, sc->sc_srom[tm->tm_gp_offset + i]);
   3669 	}
   3670 
   3671 	/* If there were no sequences, just lower the pins. */
   3672 	if (tm->tm_reset_length == 0 && tm->tm_gp_length == 0) {
   3673 		delay(10);
   3674 		TULIP_WRITE(sc, CSR_GPP, 0);
   3675 	}
   3676 }
   3677 
   3678 /*
   3679  * tlp_21142_reset:
   3680  *
   3681  *	Issue a reset sequence on the 21142 via the GPIO facility.
   3682  */
   3683 static void
   3684 tlp_21142_reset(struct tulip_softc *sc)
   3685 {
   3686 	struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
   3687 	struct tulip_21x4x_media *tm = ife->ifm_aux;
   3688 	const uint8_t *cp;
   3689 	int i;
   3690 
   3691 	cp = &sc->sc_srom[tm->tm_reset_offset];
   3692 	for (i = 0; i < tm->tm_reset_length; i++, cp += 2) {
   3693 		delay(10);
   3694 		TULIP_WRITE(sc, CSR_SIAGEN, TULIP_ROM_GETW(cp, 0) << 16);
   3695 	}
   3696 
   3697 	cp = &sc->sc_srom[tm->tm_gp_offset];
   3698 	for (i = 0; i < tm->tm_gp_length; i++, cp += 2) {
   3699 		delay(10);
   3700 		TULIP_WRITE(sc, CSR_SIAGEN, TULIP_ROM_GETW(cp, 0) << 16);
   3701 	}
   3702 
   3703 	/* If there were no sequences, just lower the pins. */
   3704 	if (tm->tm_reset_length == 0 && tm->tm_gp_length == 0) {
   3705 		delay(10);
   3706 		TULIP_WRITE(sc, CSR_SIAGEN, 0);
   3707 	}
   3708 }
   3709 
   3710 /*
   3711  * tlp_pmac_reset:
   3712  *
   3713  *	Reset routine for Macronix chips.
   3714  */
   3715 static void
   3716 tlp_pmac_reset(struct tulip_softc *sc)
   3717 {
   3718 
   3719 	switch (sc->sc_chip) {
   3720 	case TULIP_CHIP_82C115:
   3721 	case TULIP_CHIP_MX98715:
   3722 	case TULIP_CHIP_MX98715A:
   3723 	case TULIP_CHIP_MX98725:
   3724 		/*
   3725 		 * Set the LED operating mode.  This information is located
   3726 		 * in the EEPROM at byte offset 0x77, per the MX98715A and
   3727 		 * MX98725 application notes.
   3728 		 */
   3729 		TULIP_WRITE(sc, CSR_MIIROM, sc->sc_srom[0x77] << 24);
   3730 		break;
   3731 	case TULIP_CHIP_MX98715AEC_X:
   3732 		/*
   3733 		 * Set the LED operating mode.  This information is located
   3734 		 * in the EEPROM at byte offset 0x76, per the MX98715AEC
   3735 		 * application note.
   3736 		 */
   3737 		TULIP_WRITE(sc, CSR_MIIROM, ((0xf & sc->sc_srom[0x76]) << 28)
   3738 		    | ((0xf0 & sc->sc_srom[0x76]) << 20));
   3739 		break;
   3740 
   3741 	default:
   3742 		/* Nothing. */
   3743 		break;
   3744 	}
   3745 }
   3746 
   3747 #if 0
   3748 /*
   3749  * tlp_dm9102_reset:
   3750  *
   3751  *	Reset routine for the Davicom DM9102.
   3752  */
   3753 static void
   3754 tlp_dm9102_reset(struct tulip_softc *sc)
   3755 {
   3756 
   3757 	TULIP_WRITE(sc, CSR_DM_PHYSTAT, DM_PHYSTAT_GEPC|DM_PHYSTAT_GPED);
   3758 	delay(100);
   3759 	TULIP_WRITE(sc, CSR_DM_PHYSTAT, 0);
   3760 }
   3761 #endif
   3762 
   3763 /*****************************************************************************
   3764  * Chip/board-specific media switches.  The ones here are ones that
   3765  * are potentially common to multiple front-ends.
   3766  *****************************************************************************/
   3767 
   3768 /*
   3769  * This table is a common place for all sorts of media information,
   3770  * keyed off of the SROM media code for that media.
   3771  *
   3772  * Note that we explicitly configure the 21142/21143 to always advertise
   3773  * NWay capabilities when using the UTP port.
   3774  * XXX Actually, we don't yet.
   3775  */
   3776 static const struct tulip_srom_to_ifmedia tulip_srom_to_ifmedia_table[] = {
   3777 	{ TULIP_ROM_MB_MEDIA_TP,	IFM_10_T,	0,
   3778 	  "10baseT",
   3779 	  OPMODE_TTM,
   3780 	  BMSR_10THDX,
   3781 	  { SIACONN_21040_10BASET,
   3782 	    SIATXRX_21040_10BASET,
   3783 	    SIAGEN_21040_10BASET },
   3784 
   3785 	  { SIACONN_21041_10BASET,
   3786 	    SIATXRX_21041_10BASET,
   3787 	    SIAGEN_21041_10BASET },
   3788 
   3789 	  { SIACONN_21142_10BASET,
   3790 	    SIATXRX_21142_10BASET,
   3791 	    SIAGEN_21142_10BASET } },
   3792 
   3793 	{ TULIP_ROM_MB_MEDIA_BNC,	IFM_10_2,	0,
   3794 	  "10base2",
   3795 	  0,
   3796 	  0,
   3797 	  { 0,
   3798 	    0,
   3799 	    0 },
   3800 
   3801 	  { SIACONN_21041_BNC,
   3802 	    SIATXRX_21041_BNC,
   3803 	    SIAGEN_21041_BNC },
   3804 
   3805 	  { SIACONN_21142_BNC,
   3806 	    SIATXRX_21142_BNC,
   3807 	    SIAGEN_21142_BNC } },
   3808 
   3809 	{ TULIP_ROM_MB_MEDIA_AUI,	IFM_10_5,	0,
   3810 	  "10base5",
   3811 	  0,
   3812 	  0,
   3813 	  { SIACONN_21040_AUI,
   3814 	    SIATXRX_21040_AUI,
   3815 	    SIAGEN_21040_AUI },
   3816 
   3817 	  { SIACONN_21041_AUI,
   3818 	    SIATXRX_21041_AUI,
   3819 	    SIAGEN_21041_AUI },
   3820 
   3821 	  { SIACONN_21142_AUI,
   3822 	    SIATXRX_21142_AUI,
   3823 	    SIAGEN_21142_AUI } },
   3824 
   3825 	{ TULIP_ROM_MB_MEDIA_100TX,	IFM_100_TX,	0,
   3826 	  "100baseTX",
   3827 	  OPMODE_PS|OPMODE_PCS|OPMODE_SCR|OPMODE_HBD,
   3828 	  BMSR_100TXHDX,
   3829 	  { 0,
   3830 	    0,
   3831 	    0 },
   3832 
   3833 	  { 0,
   3834 	    0,
   3835 	    0 },
   3836 
   3837 	  { 0,
   3838 	    0,
   3839 	    SIAGEN_ABM } },
   3840 
   3841 	{ TULIP_ROM_MB_MEDIA_TP_FDX,	IFM_10_T,	IFM_FDX,
   3842 	  "10baseT-FDX",
   3843 	  OPMODE_TTM|OPMODE_FD|OPMODE_HBD,
   3844 	  BMSR_10TFDX,
   3845 	  { SIACONN_21040_10BASET_FDX,
   3846 	    SIATXRX_21040_10BASET_FDX,
   3847 	    SIAGEN_21040_10BASET_FDX },
   3848 
   3849 	  { SIACONN_21041_10BASET_FDX,
   3850 	    SIATXRX_21041_10BASET_FDX,
   3851 	    SIAGEN_21041_10BASET_FDX },
   3852 
   3853 	  { SIACONN_21142_10BASET_FDX,
   3854 	    SIATXRX_21142_10BASET_FDX,
   3855 	    SIAGEN_21142_10BASET_FDX } },
   3856 
   3857 	{ TULIP_ROM_MB_MEDIA_100TX_FDX,	IFM_100_TX,	IFM_FDX,
   3858 	  "100baseTX-FDX",
   3859 	  OPMODE_PS|OPMODE_PCS|OPMODE_SCR|OPMODE_FD|OPMODE_HBD,
   3860 	  BMSR_100TXFDX,
   3861 	  { 0,
   3862 	    0,
   3863 	    0 },
   3864 
   3865 	  { 0,
   3866 	    0,
   3867 	    0 },
   3868 
   3869 	  { 0,
   3870 	    0,
   3871 	    SIAGEN_ABM } },
   3872 
   3873 	{ TULIP_ROM_MB_MEDIA_100T4,	IFM_100_T4,	0,
   3874 	  "100baseT4",
   3875 	  OPMODE_PS|OPMODE_PCS|OPMODE_SCR|OPMODE_HBD,
   3876 	  BMSR_100T4,
   3877 	  { 0,
   3878 	    0,
   3879 	    0 },
   3880 
   3881 	  { 0,
   3882 	    0,
   3883 	    0 },
   3884 
   3885 	  { 0,
   3886 	    0,
   3887 	    SIAGEN_ABM } },
   3888 
   3889 	{ TULIP_ROM_MB_MEDIA_100FX,	IFM_100_FX,	0,
   3890 	  "100baseFX",
   3891 	  OPMODE_PS|OPMODE_PCS|OPMODE_HBD,
   3892 	  0,
   3893 	  { 0,
   3894 	    0,
   3895 	    0 },
   3896 
   3897 	  { 0,
   3898 	    0,
   3899 	    0 },
   3900 
   3901 	  { 0,
   3902 	    0,
   3903 	    SIAGEN_ABM } },
   3904 
   3905 	{ TULIP_ROM_MB_MEDIA_100FX_FDX,	IFM_100_FX,	IFM_FDX,
   3906 	  "100baseFX-FDX",
   3907 	  OPMODE_PS|OPMODE_PCS|OPMODE_FD|OPMODE_HBD,
   3908 	  0,
   3909 	  { 0,
   3910 	    0,
   3911 	    0 },
   3912 
   3913 	  { 0,
   3914 	    0,
   3915 	    0 },
   3916 
   3917 	  { 0,
   3918 	    0,
   3919 	    SIAGEN_ABM } },
   3920 
   3921 	{ 0,				0,		0,
   3922 	  NULL,
   3923 	  0,
   3924 	  0,
   3925 	  { 0,
   3926 	    0,
   3927 	    0 },
   3928 
   3929 	  { 0,
   3930 	    0,
   3931 	    0 },
   3932 
   3933 	  { 0,
   3934 	    0,
   3935 	    0 } },
   3936 };
   3937 
   3938 static const struct tulip_srom_to_ifmedia *tlp_srom_to_ifmedia(uint8_t);
   3939 static void	tlp_srom_media_info(struct tulip_softc *,
   3940 		    const struct tulip_srom_to_ifmedia *,
   3941 		    struct tulip_21x4x_media *);
   3942 static void	tlp_add_srom_media(struct tulip_softc *, int,
   3943 		    void (*)(struct tulip_softc *, struct ifmediareq *),
   3944 		    int (*)(struct tulip_softc *), const uint8_t *, int);
   3945 static void	tlp_print_media(struct tulip_softc *);
   3946 static void	tlp_nway_activate(struct tulip_softc *, int);
   3947 static void	tlp_get_minst(struct tulip_softc *);
   3948 
   3949 static const struct tulip_srom_to_ifmedia *
   3950 tlp_srom_to_ifmedia(uint8_t sm)
   3951 {
   3952 	const struct tulip_srom_to_ifmedia *tsti;
   3953 
   3954 	for (tsti = tulip_srom_to_ifmedia_table;
   3955 	     tsti->tsti_name != NULL; tsti++) {
   3956 		if (tsti->tsti_srom == sm)
   3957 			return (tsti);
   3958 	}
   3959 
   3960 	return (NULL);
   3961 }
   3962 
   3963 static void
   3964 tlp_srom_media_info(struct tulip_softc *sc,
   3965     const struct tulip_srom_to_ifmedia *tsti, struct tulip_21x4x_media *tm)
   3966 {
   3967 
   3968 	tm->tm_name = tsti->tsti_name;
   3969 	tm->tm_opmode = tsti->tsti_opmode;
   3970 
   3971 	sc->sc_sia_cap |= tsti->tsti_sia_cap;
   3972 
   3973 	switch (sc->sc_chip) {
   3974 	case TULIP_CHIP_DE425:
   3975 	case TULIP_CHIP_21040:
   3976 		tm->tm_sia = tsti->tsti_21040;	/* struct assignment */
   3977 		break;
   3978 
   3979 	case TULIP_CHIP_21041:
   3980 		tm->tm_sia = tsti->tsti_21041;	/* struct assignment */
   3981 		break;
   3982 
   3983 	case TULIP_CHIP_21142:
   3984 	case TULIP_CHIP_21143:
   3985 	case TULIP_CHIP_82C115:
   3986 	case TULIP_CHIP_MX98715:
   3987 	case TULIP_CHIP_MX98715A:
   3988 	case TULIP_CHIP_MX98715AEC_X:
   3989 	case TULIP_CHIP_MX98725:
   3990 		tm->tm_sia = tsti->tsti_21142;	/* struct assignment */
   3991 		break;
   3992 
   3993 	default:
   3994 		/* Nothing. */
   3995 		break;
   3996 	}
   3997 }
   3998 
   3999 static void
   4000 tlp_add_srom_media(struct tulip_softc *sc, int type,
   4001     void (*get)(struct tulip_softc *, struct ifmediareq *),
   4002     int (*set)(struct tulip_softc *), const uint8_t *list,
   4003     int cnt)
   4004 {
   4005 	struct tulip_21x4x_media *tm;
   4006 	const struct tulip_srom_to_ifmedia *tsti;
   4007 	int i;
   4008 
   4009 	for (i = 0; i < cnt; i++) {
   4010 		tsti = tlp_srom_to_ifmedia(list[i]);
   4011 		tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   4012 		tlp_srom_media_info(sc, tsti, tm);
   4013 		tm->tm_type = type;
   4014 		tm->tm_get = get;
   4015 		tm->tm_set = set;
   4016 
   4017 		ifmedia_add(&sc->sc_mii.mii_media,
   4018 		    IFM_MAKEWORD(IFM_ETHER, tsti->tsti_subtype,
   4019 		    tsti->tsti_options, sc->sc_tlp_minst), 0, tm);
   4020 	}
   4021 }
   4022 
   4023 static void
   4024 tlp_print_media(struct tulip_softc *sc)
   4025 {
   4026 	struct ifmedia_entry *ife;
   4027 	struct tulip_21x4x_media *tm;
   4028 	const char *sep = "";
   4029 
   4030 #define	PRINT(str)	printf("%s%s", sep, str); sep = ", "
   4031 
   4032 	printf("%s: ", device_xname(sc->sc_dev));
   4033 	for (ife = TAILQ_FIRST(&sc->sc_mii.mii_media.ifm_list);
   4034 	     ife != NULL; ife = TAILQ_NEXT(ife, ifm_list)) {
   4035 		tm = ife->ifm_aux;
   4036 		if (tm == NULL) {
   4037 #ifdef DIAGNOSTIC
   4038 			if (IFM_SUBTYPE(ife->ifm_media) != IFM_AUTO)
   4039 				panic("tlp_print_media");
   4040 #endif
   4041 			PRINT("auto");
   4042 		} else if (tm->tm_type != TULIP_ROM_MB_21140_MII &&
   4043 			   tm->tm_type != TULIP_ROM_MB_21142_MII) {
   4044 			PRINT(tm->tm_name);
   4045 		}
   4046 	}
   4047 	printf("\n");
   4048 
   4049 #undef PRINT
   4050 }
   4051 
   4052 static void
   4053 tlp_nway_activate(struct tulip_softc *sc, int media)
   4054 {
   4055 	struct ifmedia_entry *ife;
   4056 
   4057 	ife = ifmedia_match(&sc->sc_mii.mii_media, media, 0);
   4058 #ifdef DIAGNOSTIC
   4059 	if (ife == NULL)
   4060 		panic("tlp_nway_activate");
   4061 #endif
   4062 	sc->sc_nway_active = ife;
   4063 }
   4064 
   4065 static void
   4066 tlp_get_minst(struct tulip_softc *sc)
   4067 {
   4068 
   4069 	if ((sc->sc_media_seen &
   4070 	    ~((1 << TULIP_ROM_MB_21140_MII) |
   4071 	      (1 << TULIP_ROM_MB_21142_MII))) == 0) {
   4072 		/*
   4073 		 * We have not yet seen any SIA/SYM media (but are
   4074 		 * about to; that's why we're called!), so assign
   4075 		 * the current media instance to be the `internal media'
   4076 		 * instance, and advance it so any MII media gets a
   4077 		 * fresh one (used to selecting/isolating a PHY).
   4078 		 */
   4079 		sc->sc_tlp_minst = sc->sc_mii.mii_instance++;
   4080 	}
   4081 }
   4082 
   4083 /*
   4084  * SIA Utility functions.
   4085  */
   4086 static void	tlp_sia_update_link(struct tulip_softc *);
   4087 static void	tlp_sia_get(struct tulip_softc *, struct ifmediareq *);
   4088 static int	tlp_sia_set(struct tulip_softc *);
   4089 static int	tlp_sia_media(struct tulip_softc *, struct ifmedia_entry *);
   4090 static void	tlp_sia_fixup(struct tulip_softc *);
   4091 
   4092 static void
   4093 tlp_sia_update_link(struct tulip_softc *sc)
   4094 {
   4095 	struct ifmedia_entry *ife;
   4096 	struct tulip_21x4x_media *tm;
   4097 	uint32_t siastat;
   4098 
   4099 	ife = TULIP_CURRENT_MEDIA(sc);
   4100 	tm = ife->ifm_aux;
   4101 
   4102 	sc->sc_flags &= ~(TULIPF_LINK_UP|TULIPF_LINK_VALID);
   4103 
   4104 	siastat = TULIP_READ(sc, CSR_SIASTAT);
   4105 
   4106 	/*
   4107 	 * Note that when we do SIA link tests, we are assuming that
   4108 	 * the chip is really in the mode that the current media setting
   4109 	 * reflects.  If we're not, then the link tests will not be
   4110 	 * accurate!
   4111 	 */
   4112 	switch (IFM_SUBTYPE(ife->ifm_media)) {
   4113 	case IFM_10_T:
   4114 		sc->sc_flags |= TULIPF_LINK_VALID;
   4115 		if ((siastat & SIASTAT_LS10) == 0)
   4116 			sc->sc_flags |= TULIPF_LINK_UP;
   4117 		break;
   4118 
   4119 	case IFM_100_TX:
   4120 	case IFM_100_T4:
   4121 		sc->sc_flags |= TULIPF_LINK_VALID;
   4122 		if ((siastat & SIASTAT_LS100) == 0)
   4123 			sc->sc_flags |= TULIPF_LINK_UP;
   4124 		break;
   4125 	}
   4126 
   4127 	switch (sc->sc_chip) {
   4128 	case TULIP_CHIP_21142:
   4129 	case TULIP_CHIP_21143:
   4130 		/*
   4131 		 * On these chips, we can tell more information about
   4132 		 * AUI/BNC.  Note that the AUI/BNC selection is made
   4133 		 * in a different register; for our purpose, it's all
   4134 		 * AUI.
   4135 		 */
   4136 		switch (IFM_SUBTYPE(ife->ifm_media)) {
   4137 		case IFM_10_2:
   4138 		case IFM_10_5:
   4139 			sc->sc_flags |= TULIPF_LINK_VALID;
   4140 			if (siastat & SIASTAT_ARA) {
   4141 				TULIP_WRITE(sc, CSR_SIASTAT, SIASTAT_ARA);
   4142 				sc->sc_flags |= TULIPF_LINK_UP;
   4143 			}
   4144 			break;
   4145 
   4146 		default:
   4147 			/*
   4148 			 * If we're SYM media and can detect the link
   4149 			 * via the GPIO facility, prefer that status
   4150 			 * over LS100.
   4151 			 */
   4152 			if (tm->tm_type == TULIP_ROM_MB_21143_SYM &&
   4153 			    tm->tm_actmask != 0) {
   4154 				sc->sc_flags = (sc->sc_flags &
   4155 				    ~TULIPF_LINK_UP) | TULIPF_LINK_VALID;
   4156 				if (TULIP_ISSET(sc, CSR_SIAGEN,
   4157 				    tm->tm_actmask) == tm->tm_actdata)
   4158 					sc->sc_flags |= TULIPF_LINK_UP;
   4159 			}
   4160 		}
   4161 		break;
   4162 
   4163 	default:
   4164 		/* Nothing. */
   4165 		break;
   4166 	}
   4167 }
   4168 
   4169 static void
   4170 tlp_sia_get(struct tulip_softc *sc, struct ifmediareq *ifmr)
   4171 {
   4172 	struct ifmedia_entry *ife;
   4173 
   4174 	ifmr->ifm_status = 0;
   4175 
   4176 	tlp_sia_update_link(sc);
   4177 
   4178 	ife = TULIP_CURRENT_MEDIA(sc);
   4179 
   4180 	if (sc->sc_flags & TULIPF_LINK_VALID)
   4181 		ifmr->ifm_status |= IFM_AVALID;
   4182 	if (sc->sc_flags & TULIPF_LINK_UP)
   4183 		ifmr->ifm_status |= IFM_ACTIVE;
   4184 	ifmr->ifm_active = ife->ifm_media;
   4185 }
   4186 
   4187 static void
   4188 tlp_sia_fixup(struct tulip_softc *sc)
   4189 {
   4190 	struct ifmedia_entry *ife;
   4191 	struct tulip_21x4x_media *tm;
   4192 	uint32_t siaconn, siatxrx, siagen;
   4193 
   4194 	switch (sc->sc_chip) {
   4195 	case TULIP_CHIP_82C115:
   4196 	case TULIP_CHIP_MX98713A:
   4197 	case TULIP_CHIP_MX98715:
   4198 	case TULIP_CHIP_MX98715A:
   4199 	case TULIP_CHIP_MX98715AEC_X:
   4200 	case TULIP_CHIP_MX98725:
   4201 		siaconn = PMAC_SIACONN_MASK;
   4202 		siatxrx = PMAC_SIATXRX_MASK;
   4203 		siagen  = PMAC_SIAGEN_MASK;
   4204 		break;
   4205 
   4206 	default:
   4207 		/* No fixups required on any other chips. */
   4208 		return;
   4209 	}
   4210 
   4211 	for (ife = TAILQ_FIRST(&sc->sc_mii.mii_media.ifm_list);
   4212 	     ife != NULL; ife = TAILQ_NEXT(ife, ifm_list)) {
   4213 		tm = ife->ifm_aux;
   4214 		if (tm == NULL)
   4215 			continue;
   4216 
   4217 		tm->tm_siaconn &= siaconn;
   4218 		tm->tm_siatxrx &= siatxrx;
   4219 		tm->tm_siagen  &= siagen;
   4220 	}
   4221 }
   4222 
   4223 static int
   4224 tlp_sia_set(struct tulip_softc *sc)
   4225 {
   4226 
   4227 	return (tlp_sia_media(sc, TULIP_CURRENT_MEDIA(sc)));
   4228 }
   4229 
   4230 static int
   4231 tlp_sia_media(struct tulip_softc *sc, struct ifmedia_entry *ife)
   4232 {
   4233 	struct tulip_21x4x_media *tm;
   4234 
   4235 	tm = ife->ifm_aux;
   4236 
   4237 	/*
   4238 	 * XXX This appears to be necessary on a bunch of the clone chips.
   4239 	 */
   4240 	delay(20000);
   4241 
   4242 	/*
   4243 	 * Idle the chip.
   4244 	 */
   4245 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   4246 
   4247 	/*
   4248 	 * Program the SIA.  It's important to write in this order,
   4249 	 * resetting the SIA first.
   4250 	 */
   4251 	TULIP_WRITE(sc, CSR_SIACONN, 0);		/* SRL bit clear */
   4252 	delay(1000);
   4253 
   4254 	TULIP_WRITE(sc, CSR_SIATXRX, tm->tm_siatxrx);
   4255 
   4256 	switch (sc->sc_chip) {
   4257 	case TULIP_CHIP_21142:
   4258 	case TULIP_CHIP_21143:
   4259 		TULIP_WRITE(sc, CSR_SIAGEN, tm->tm_siagen | tm->tm_gpctl);
   4260 		TULIP_WRITE(sc, CSR_SIAGEN, tm->tm_siagen | tm->tm_gpdata);
   4261 		break;
   4262 	default:
   4263 		TULIP_WRITE(sc, CSR_SIAGEN, tm->tm_siagen);
   4264 	}
   4265 
   4266 	TULIP_WRITE(sc, CSR_SIACONN, tm->tm_siaconn);
   4267 
   4268 	/*
   4269 	 * Set the OPMODE bits for this media and write OPMODE.
   4270 	 * This will resume the transmit and receive processes.
   4271 	 */
   4272 	sc->sc_opmode = (sc->sc_opmode & ~OPMODE_MEDIA_BITS) | tm->tm_opmode;
   4273 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   4274 
   4275 	return (0);
   4276 }
   4277 
   4278 /*
   4279  * 21140 GPIO utility functions.
   4280  */
   4281 static void	tlp_21140_gpio_update_link(struct tulip_softc *);
   4282 
   4283 static void
   4284 tlp_21140_gpio_update_link(struct tulip_softc *sc)
   4285 {
   4286 	struct ifmedia_entry *ife;
   4287 	struct tulip_21x4x_media *tm;
   4288 
   4289 	ife = TULIP_CURRENT_MEDIA(sc);
   4290 	tm = ife->ifm_aux;
   4291 
   4292 	sc->sc_flags &= ~(TULIPF_LINK_UP|TULIPF_LINK_VALID);
   4293 
   4294 	if (tm->tm_actmask != 0) {
   4295 		sc->sc_flags |= TULIPF_LINK_VALID;
   4296 		if (TULIP_ISSET(sc, CSR_GPP, tm->tm_actmask) ==
   4297 		    tm->tm_actdata)
   4298 			sc->sc_flags |= TULIPF_LINK_UP;
   4299 	}
   4300 }
   4301 
   4302 void
   4303 tlp_21140_gpio_get(struct tulip_softc *sc, struct ifmediareq *ifmr)
   4304 {
   4305 	struct ifmedia_entry *ife;
   4306 
   4307 	ifmr->ifm_status = 0;
   4308 
   4309 	tlp_21140_gpio_update_link(sc);
   4310 
   4311 	ife = TULIP_CURRENT_MEDIA(sc);
   4312 
   4313 	if (sc->sc_flags & TULIPF_LINK_VALID)
   4314 		ifmr->ifm_status |= IFM_AVALID;
   4315 	if (sc->sc_flags & TULIPF_LINK_UP)
   4316 		ifmr->ifm_status |= IFM_ACTIVE;
   4317 	ifmr->ifm_active = ife->ifm_media;
   4318 }
   4319 
   4320 int
   4321 tlp_21140_gpio_set(struct tulip_softc *sc)
   4322 {
   4323 	struct ifmedia_entry *ife;
   4324 	struct tulip_21x4x_media *tm;
   4325 
   4326 	ife = TULIP_CURRENT_MEDIA(sc);
   4327 	tm = ife->ifm_aux;
   4328 
   4329 	/*
   4330 	 * Idle the chip.
   4331 	 */
   4332 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   4333 
   4334 	/*
   4335 	 * Set the GPIO pins for this media, to flip any
   4336 	 * relays, etc.
   4337 	 */
   4338 	TULIP_WRITE(sc, CSR_GPP, GPP_GPC|sc->sc_gp_dir);
   4339 	delay(10);
   4340 	TULIP_WRITE(sc, CSR_GPP, tm->tm_gpdata);
   4341 
   4342 	/*
   4343 	 * Set the OPMODE bits for this media and write OPMODE.
   4344 	 * This will resume the transmit and receive processes.
   4345 	 */
   4346 	sc->sc_opmode = (sc->sc_opmode & ~OPMODE_MEDIA_BITS) | tm->tm_opmode;
   4347 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   4348 
   4349 	return (0);
   4350 }
   4351 
   4352 /*
   4353  * 21040 and 21041 media switches.
   4354  */
   4355 static void	tlp_21040_tmsw_init(struct tulip_softc *);
   4356 static void	tlp_21040_tp_tmsw_init(struct tulip_softc *);
   4357 static void	tlp_21040_auibnc_tmsw_init(struct tulip_softc *);
   4358 static void	tlp_21041_tmsw_init(struct tulip_softc *);
   4359 
   4360 const struct tulip_mediasw tlp_21040_mediasw = {
   4361 	tlp_21040_tmsw_init, tlp_sia_get, tlp_sia_set
   4362 };
   4363 
   4364 const struct tulip_mediasw tlp_21040_tp_mediasw = {
   4365 	tlp_21040_tp_tmsw_init, tlp_sia_get, tlp_sia_set
   4366 };
   4367 
   4368 const struct tulip_mediasw tlp_21040_auibnc_mediasw = {
   4369 	tlp_21040_auibnc_tmsw_init, tlp_sia_get, tlp_sia_set
   4370 };
   4371 
   4372 const struct tulip_mediasw tlp_21041_mediasw = {
   4373 	tlp_21041_tmsw_init, tlp_sia_get, tlp_sia_set
   4374 };
   4375 
   4376 static void
   4377 tlp_21040_tmsw_init(struct tulip_softc *sc)
   4378 {
   4379 	static const uint8_t media[] = {
   4380 		TULIP_ROM_MB_MEDIA_TP,
   4381 		TULIP_ROM_MB_MEDIA_TP_FDX,
   4382 		TULIP_ROM_MB_MEDIA_AUI,
   4383 	};
   4384 	struct tulip_21x4x_media *tm;
   4385 
   4386 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   4387 	    tlp_mediastatus);
   4388 
   4389 	tlp_add_srom_media(sc, 0, NULL, NULL, media, 3);
   4390 
   4391 	/*
   4392 	 * No SROM type for External SIA.
   4393 	 */
   4394 	tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   4395 	tm->tm_name = "manual";
   4396 	tm->tm_opmode = 0;
   4397 	tm->tm_siaconn = SIACONN_21040_EXTSIA;
   4398 	tm->tm_siatxrx = SIATXRX_21040_EXTSIA;
   4399 	tm->tm_siagen  = SIAGEN_21040_EXTSIA;
   4400 	ifmedia_add(&sc->sc_mii.mii_media,
   4401 	    IFM_MAKEWORD(IFM_ETHER, IFM_MANUAL, 0, sc->sc_tlp_minst), 0, tm);
   4402 
   4403 	/*
   4404 	 * XXX Autosense not yet supported.
   4405 	 */
   4406 
   4407 	/* XXX This should be auto-sense. */
   4408 	ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
   4409 
   4410 	tlp_print_media(sc);
   4411 }
   4412 
   4413 static void
   4414 tlp_21040_tp_tmsw_init(struct tulip_softc *sc)
   4415 {
   4416 	static const uint8_t media[] = {
   4417 		TULIP_ROM_MB_MEDIA_TP,
   4418 		TULIP_ROM_MB_MEDIA_TP_FDX,
   4419 	};
   4420 
   4421 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   4422 	    tlp_mediastatus);
   4423 
   4424 	tlp_add_srom_media(sc, 0, NULL, NULL, media, 2);
   4425 
   4426 	ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
   4427 
   4428 	tlp_print_media(sc);
   4429 }
   4430 
   4431 static void
   4432 tlp_21040_auibnc_tmsw_init(struct tulip_softc *sc)
   4433 {
   4434 	static const uint8_t media[] = {
   4435 		TULIP_ROM_MB_MEDIA_AUI,
   4436 	};
   4437 
   4438 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   4439 	    tlp_mediastatus);
   4440 
   4441 	tlp_add_srom_media(sc, 0, NULL, NULL, media, 1);
   4442 
   4443 	ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_5);
   4444 
   4445 	tlp_print_media(sc);
   4446 }
   4447 
   4448 static void
   4449 tlp_21041_tmsw_init(struct tulip_softc *sc)
   4450 {
   4451 	static const uint8_t media[] = {
   4452 		TULIP_ROM_MB_MEDIA_TP,
   4453 		TULIP_ROM_MB_MEDIA_TP_FDX,
   4454 		TULIP_ROM_MB_MEDIA_BNC,
   4455 		TULIP_ROM_MB_MEDIA_AUI,
   4456 	};
   4457 	int i, defmedia, devcnt, leaf_offset, mb_offset, m_cnt;
   4458 	const struct tulip_srom_to_ifmedia *tsti;
   4459 	struct tulip_21x4x_media *tm;
   4460 	uint16_t romdef;
   4461 	uint8_t mb;
   4462 
   4463 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   4464 	    tlp_mediastatus);
   4465 
   4466 	if (tlp_isv_srom(sc->sc_srom) == 0) {
   4467  not_isv_srom:
   4468 		/*
   4469 		 * If we have a board without the standard 21041 SROM format,
   4470 		 * we just assume all media are present and try and pick a
   4471 		 * reasonable default.
   4472 		 */
   4473 		tlp_add_srom_media(sc, 0, NULL, NULL, media, 4);
   4474 
   4475 		/*
   4476 		 * XXX Autosense not yet supported.
   4477 		 */
   4478 
   4479 		/* XXX This should be auto-sense. */
   4480 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
   4481 
   4482 		tlp_print_media(sc);
   4483 		return;
   4484 	}
   4485 
   4486 	devcnt = sc->sc_srom[TULIP_ROM_CHIP_COUNT];
   4487 	for (i = 0; i < devcnt; i++) {
   4488 		if (sc->sc_srom[TULIP_ROM_CHIP_COUNT] == 1)
   4489 			break;
   4490 		if (sc->sc_srom[TULIP_ROM_CHIPn_DEVICE_NUMBER(i)] ==
   4491 		    sc->sc_devno)
   4492 			break;
   4493 	}
   4494 
   4495 	if (i == devcnt)
   4496 		goto not_isv_srom;
   4497 
   4498 	leaf_offset = TULIP_ROM_GETW(sc->sc_srom,
   4499 	    TULIP_ROM_CHIPn_INFO_LEAF_OFFSET(i));
   4500 	mb_offset = leaf_offset + TULIP_ROM_IL_MEDIAn_BLOCK_BASE;
   4501 	m_cnt = sc->sc_srom[leaf_offset + TULIP_ROM_IL_MEDIA_COUNT];
   4502 
   4503 	for (; m_cnt != 0;
   4504 	     m_cnt--, mb_offset += TULIP_ROM_MB_SIZE(mb)) {
   4505 		mb = sc->sc_srom[mb_offset];
   4506 		tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   4507 		switch (mb & TULIP_ROM_MB_MEDIA_CODE) {
   4508 		case TULIP_ROM_MB_MEDIA_TP_FDX:
   4509 		case TULIP_ROM_MB_MEDIA_TP:
   4510 		case TULIP_ROM_MB_MEDIA_BNC:
   4511 		case TULIP_ROM_MB_MEDIA_AUI:
   4512 			tsti = tlp_srom_to_ifmedia(mb &
   4513 			    TULIP_ROM_MB_MEDIA_CODE);
   4514 
   4515 			tlp_srom_media_info(sc, tsti, tm);
   4516 
   4517 			/*
   4518 			 * Override our default SIA settings if the
   4519 			 * SROM contains its own.
   4520 			 */
   4521 			if (mb & TULIP_ROM_MB_EXT) {
   4522 				tm->tm_siaconn = TULIP_ROM_GETW(sc->sc_srom,
   4523 				    mb_offset + TULIP_ROM_MB_CSR13);
   4524 				tm->tm_siatxrx = TULIP_ROM_GETW(sc->sc_srom,
   4525 				    mb_offset + TULIP_ROM_MB_CSR14);
   4526 				tm->tm_siagen = TULIP_ROM_GETW(sc->sc_srom,
   4527 				    mb_offset + TULIP_ROM_MB_CSR15);
   4528 			}
   4529 
   4530 			ifmedia_add(&sc->sc_mii.mii_media,
   4531 			    IFM_MAKEWORD(IFM_ETHER, tsti->tsti_subtype,
   4532 			    tsti->tsti_options, sc->sc_tlp_minst), 0, tm);
   4533 			break;
   4534 
   4535 		default:
   4536 			printf("%s: unknown media code 0x%02x\n",
   4537 			    device_xname(sc->sc_dev),
   4538 			    mb & TULIP_ROM_MB_MEDIA_CODE);
   4539 			free(tm, M_DEVBUF);
   4540 		}
   4541 	}
   4542 
   4543 	/*
   4544 	 * XXX Autosense not yet supported.
   4545 	 */
   4546 
   4547 	romdef = TULIP_ROM_GETW(sc->sc_srom, leaf_offset +
   4548 	    TULIP_ROM_IL_SELECT_CONN_TYPE);
   4549 	switch (romdef) {
   4550 	case SELECT_CONN_TYPE_TP:
   4551 	case SELECT_CONN_TYPE_TP_AUTONEG:
   4552 	case SELECT_CONN_TYPE_TP_NOLINKPASS:
   4553 		defmedia = IFM_ETHER|IFM_10_T;
   4554 		break;
   4555 
   4556 	case SELECT_CONN_TYPE_TP_FDX:
   4557 		defmedia = IFM_ETHER|IFM_10_T|IFM_FDX;
   4558 		break;
   4559 
   4560 	case SELECT_CONN_TYPE_BNC:
   4561 		defmedia = IFM_ETHER|IFM_10_2;
   4562 		break;
   4563 
   4564 	case SELECT_CONN_TYPE_AUI:
   4565 		defmedia = IFM_ETHER|IFM_10_5;
   4566 		break;
   4567 #if 0 /* XXX */
   4568 	case SELECT_CONN_TYPE_ASENSE:
   4569 	case SELECT_CONN_TYPE_ASENSE_AUTONEG:
   4570 		defmedia = IFM_ETHER|IFM_AUTO;
   4571 		break;
   4572 #endif
   4573 	default:
   4574 		defmedia = 0;
   4575 	}
   4576 
   4577 	if (defmedia == 0) {
   4578 		/*
   4579 		 * XXX We should default to auto-sense.
   4580 		 */
   4581 		defmedia = IFM_ETHER|IFM_10_T;
   4582 	}
   4583 
   4584 	ifmedia_set(&sc->sc_mii.mii_media, defmedia);
   4585 
   4586 	tlp_print_media(sc);
   4587 }
   4588 
   4589 /*
   4590  * DECchip 2114x ISV media switch.
   4591  */
   4592 static void	tlp_2114x_isv_tmsw_init(struct tulip_softc *);
   4593 static void	tlp_2114x_isv_tmsw_get(struct tulip_softc *,
   4594 		    struct ifmediareq *);
   4595 static int	tlp_2114x_isv_tmsw_set(struct tulip_softc *);
   4596 
   4597 const struct tulip_mediasw tlp_2114x_isv_mediasw = {
   4598 	tlp_2114x_isv_tmsw_init, tlp_2114x_isv_tmsw_get, tlp_2114x_isv_tmsw_set
   4599 };
   4600 
   4601 static void	tlp_2114x_nway_get(struct tulip_softc *, struct ifmediareq *);
   4602 static int	tlp_2114x_nway_set(struct tulip_softc *);
   4603 
   4604 static void	tlp_2114x_nway_statchg(device_t);
   4605 static int	tlp_2114x_nway_service(struct tulip_softc *, int);
   4606 static void	tlp_2114x_nway_auto(struct tulip_softc *);
   4607 static void	tlp_2114x_nway_status(struct tulip_softc *);
   4608 
   4609 static void
   4610 tlp_2114x_isv_tmsw_init(struct tulip_softc *sc)
   4611 {
   4612 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   4613 	struct ifmedia_entry *ife;
   4614 	struct mii_softc *phy;
   4615 	struct tulip_21x4x_media *tm;
   4616 	const struct tulip_srom_to_ifmedia *tsti;
   4617 	int i, devcnt, leaf_offset, m_cnt, type, length;
   4618 	int defmedia, miidef;
   4619 	uint16_t word;
   4620 	uint8_t *cp, *ncp;
   4621 
   4622 	defmedia = miidef = 0;
   4623 
   4624 	sc->sc_mii.mii_ifp = ifp;
   4625 	sc->sc_mii.mii_readreg = tlp_bitbang_mii_readreg;
   4626 	sc->sc_mii.mii_writereg = tlp_bitbang_mii_writereg;
   4627 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   4628 
   4629 	/*
   4630 	 * Ignore `instance'; we may get a mixture of SIA and MII
   4631 	 * media, and `instance' is used to isolate or select the
   4632 	 * PHY on the MII as appropriate.  Note that duplicate media
   4633 	 * are disallowed, so ignoring `instance' is safe.
   4634 	 */
   4635 	ifmedia_init(&sc->sc_mii.mii_media, IFM_IMASK, tlp_mediachange,
   4636 	    tlp_mediastatus);
   4637 
   4638 	devcnt = sc->sc_srom[TULIP_ROM_CHIP_COUNT];
   4639 	for (i = 0; i < devcnt; i++) {
   4640 		if (sc->sc_srom[TULIP_ROM_CHIP_COUNT] == 1)
   4641 			break;
   4642 		if (sc->sc_srom[TULIP_ROM_CHIPn_DEVICE_NUMBER(i)] ==
   4643 		    sc->sc_devno)
   4644 			break;
   4645 	}
   4646 
   4647 	if (i == devcnt) {
   4648 		aprint_error_dev(sc->sc_dev, "unable to locate info leaf in SROM\n");
   4649 		return;
   4650 	}
   4651 
   4652 	leaf_offset = TULIP_ROM_GETW(sc->sc_srom,
   4653 	    TULIP_ROM_CHIPn_INFO_LEAF_OFFSET(i));
   4654 
   4655 	/* XXX SELECT CONN TYPE */
   4656 
   4657 	cp = &sc->sc_srom[leaf_offset + TULIP_ROM_IL_MEDIA_COUNT];
   4658 
   4659 	/*
   4660 	 * On some chips, the first thing in the Info Leaf is the
   4661 	 * GPIO pin direction data.
   4662 	 */
   4663 	switch (sc->sc_chip) {
   4664 	case TULIP_CHIP_21140:
   4665 	case TULIP_CHIP_21140A:
   4666 	case TULIP_CHIP_MX98713:
   4667 	case TULIP_CHIP_AX88140:
   4668 	case TULIP_CHIP_AX88141:
   4669 		sc->sc_gp_dir = *cp++;
   4670 		break;
   4671 
   4672 	default:
   4673 		/* Nothing. */
   4674 		break;
   4675 	}
   4676 
   4677 	/* Get the media count. */
   4678 	m_cnt = *cp++;
   4679 
   4680 	if (m_cnt == 0) {
   4681 		sc->sc_mediasw = &tlp_sio_mii_mediasw;
   4682 		(*sc->sc_mediasw->tmsw_init)(sc);
   4683 		return;
   4684 	}
   4685 
   4686 	for (; m_cnt != 0; cp = ncp, m_cnt--) {
   4687 		/*
   4688 		 * Determine the type and length of this media block.
   4689 		 * The 21143 is spec'd to always use extended format blocks,
   4690 		 * but some cards don't set the bit to indicate this.
   4691 		 * Hopefully there are no cards which really don't use
   4692 		 * extended format blocks.
   4693 		 */
   4694 		if ((*cp & 0x80) == 0 && sc->sc_chip != TULIP_CHIP_21143) {
   4695 			length = 4;
   4696 			type = TULIP_ROM_MB_21140_GPR;
   4697 		} else {
   4698 			length = (*cp++ & 0x7f) - 1;
   4699 			type = *cp++ & 0x3f;
   4700 		}
   4701 
   4702 		/* Compute the start of the next block. */
   4703 		ncp = cp + length;
   4704 
   4705 		/* Now, parse the block. */
   4706 		switch (type) {
   4707 		case TULIP_ROM_MB_21140_GPR:
   4708 			tlp_get_minst(sc);
   4709 			sc->sc_media_seen |= 1 << TULIP_ROM_MB_21140_GPR;
   4710 
   4711 			tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   4712 
   4713 			tm->tm_type = TULIP_ROM_MB_21140_GPR;
   4714 			tm->tm_get = tlp_21140_gpio_get;
   4715 			tm->tm_set = tlp_21140_gpio_set;
   4716 
   4717 			/* First is the media type code. */
   4718 			tsti = tlp_srom_to_ifmedia(cp[0] &
   4719 			    TULIP_ROM_MB_MEDIA_CODE);
   4720 			if (tsti == NULL) {
   4721 				/* Invalid media code. */
   4722 				free(tm, M_DEVBUF);
   4723 				break;
   4724 			}
   4725 
   4726 			/* Get defaults. */
   4727 			tlp_srom_media_info(sc, tsti, tm);
   4728 
   4729 			/* Next is any GPIO info for this media. */
   4730 			tm->tm_gpdata = cp[1];
   4731 
   4732 			/*
   4733 			 * Next is a word containing OPMODE information
   4734 			 * and info on how to detect if this media is
   4735 			 * active.
   4736 			 */
   4737 			word = TULIP_ROM_GETW(cp, 2);
   4738 			tm->tm_opmode &= OPMODE_FD;
   4739 			tm->tm_opmode |= TULIP_ROM_MB_OPMODE(word);
   4740 			if ((word & TULIP_ROM_MB_NOINDICATOR) == 0) {
   4741 				tm->tm_actmask =
   4742 				    TULIP_ROM_MB_BITPOS(word);
   4743 				tm->tm_actdata =
   4744 				    (word & TULIP_ROM_MB_POLARITY) ?
   4745 				    0 : tm->tm_actmask;
   4746 			}
   4747 
   4748 			ifmedia_add(&sc->sc_mii.mii_media,
   4749 			    IFM_MAKEWORD(IFM_ETHER, tsti->tsti_subtype,
   4750 			    tsti->tsti_options, sc->sc_tlp_minst), 0, tm);
   4751 			break;
   4752 
   4753 		case TULIP_ROM_MB_21140_MII:
   4754 			sc->sc_media_seen |= 1 << TULIP_ROM_MB_21140_MII;
   4755 
   4756 			tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   4757 
   4758 			tm->tm_type = TULIP_ROM_MB_21140_MII;
   4759 			tm->tm_get = tlp_mii_getmedia;
   4760 			tm->tm_set = tlp_mii_setmedia;
   4761 			tm->tm_opmode = OPMODE_PS;
   4762 
   4763 			if (sc->sc_reset == NULL)
   4764 				sc->sc_reset = tlp_21140_reset;
   4765 
   4766 			/* First is the PHY number. */
   4767 			tm->tm_phyno = *cp++;
   4768 
   4769 			/* Next is the MII select sequence length and offset. */
   4770 			tm->tm_gp_length = *cp++;
   4771 			tm->tm_gp_offset = cp - &sc->sc_srom[0];
   4772 			cp += tm->tm_gp_length;
   4773 
   4774 			/* Next is the MII reset sequence length and offset. */
   4775 			tm->tm_reset_length = *cp++;
   4776 			tm->tm_reset_offset = cp - &sc->sc_srom[0];
   4777 			cp += tm->tm_reset_length;
   4778 
   4779 			/*
   4780 			 * The following items are left in the media block
   4781 			 * that we don't particularly care about:
   4782 			 *
   4783 			 *	capabilities		W
   4784 			 *	advertisement		W
   4785 			 *	full duplex		W
   4786 			 *	tx threshold		W
   4787 			 *
   4788 			 * These appear to be bits in the PHY registers,
   4789 			 * which our MII code handles on its own.
   4790 			 */
   4791 
   4792 			/*
   4793 			 * Before we probe the MII bus, we need to reset
   4794 			 * it and issue the selection sequence.
   4795 			 */
   4796 
   4797 			/* Set the direction of the pins... */
   4798 			TULIP_WRITE(sc, CSR_GPP, GPP_GPC|sc->sc_gp_dir);
   4799 
   4800 			for (i = 0; i < tm->tm_reset_length; i++) {
   4801 				delay(10);
   4802 				TULIP_WRITE(sc, CSR_GPP,
   4803 				    sc->sc_srom[tm->tm_reset_offset + i]);
   4804 			}
   4805 
   4806 			for (i = 0; i < tm->tm_gp_length; i++) {
   4807 				delay(10);
   4808 				TULIP_WRITE(sc, CSR_GPP,
   4809 				    sc->sc_srom[tm->tm_gp_offset + i]);
   4810 			}
   4811 
   4812 			/* If there were no sequences, just lower the pins. */
   4813 			if (tm->tm_reset_length == 0 && tm->tm_gp_length == 0) {
   4814 				delay(10);
   4815 				TULIP_WRITE(sc, CSR_GPP, 0);
   4816 			}
   4817 
   4818 			/*
   4819 			 * Now, probe the MII for the PHY.  Note, we know
   4820 			 * the location of the PHY on the bus, but we don't
   4821 			 * particularly care; the MII code just likes to
   4822 			 * search the whole thing anyhow.
   4823 			 */
   4824 			mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff,
   4825 			    MII_PHY_ANY, tm->tm_phyno, 0);
   4826 
   4827 			/*
   4828 			 * Now, search for the PHY we hopefully just
   4829 			 * configured.  If it's not configured into the
   4830 			 * kernel, we lose.  The PHY's default media always
   4831 			 * takes priority.
   4832 			 */
   4833 			for (phy = LIST_FIRST(&sc->sc_mii.mii_phys);
   4834 			     phy != NULL;
   4835 			     phy = LIST_NEXT(phy, mii_list))
   4836 				if (phy->mii_offset == tm->tm_phyno)
   4837 					break;
   4838 			if (phy == NULL) {
   4839 				aprint_error_dev(sc->sc_dev, "unable to configure MII\n");
   4840 				break;
   4841 			}
   4842 
   4843 			sc->sc_flags |= TULIPF_HAS_MII;
   4844 			sc->sc_tick = tlp_mii_tick;
   4845 			miidef = IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0,
   4846 			    phy->mii_inst);
   4847 
   4848 			/*
   4849 			 * Okay, now that we've found the PHY and the MII
   4850 			 * layer has added all of the media associated
   4851 			 * with that PHY, we need to traverse the media
   4852 			 * list, and add our `tm' to each entry's `aux'
   4853 			 * pointer.
   4854 			 *
   4855 			 * We do this by looking for media with our
   4856 			 * PHY's `instance'.
   4857 			 */
   4858 			for (ife = TAILQ_FIRST(&sc->sc_mii.mii_media.ifm_list);
   4859 			     ife != NULL;
   4860 			     ife = TAILQ_NEXT(ife, ifm_list)) {
   4861 				if (IFM_INST(ife->ifm_media) != phy->mii_inst)
   4862 					continue;
   4863 				ife->ifm_aux = tm;
   4864 			}
   4865 			break;
   4866 
   4867 		case TULIP_ROM_MB_21142_SIA:
   4868 			tlp_get_minst(sc);
   4869 			sc->sc_media_seen |= 1 << TULIP_ROM_MB_21142_SIA;
   4870 
   4871 			tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   4872 
   4873 			tm->tm_type = TULIP_ROM_MB_21142_SIA;
   4874 			tm->tm_get = tlp_sia_get;
   4875 			tm->tm_set = tlp_sia_set;
   4876 
   4877 			/* First is the media type code. */
   4878 			tsti = tlp_srom_to_ifmedia(cp[0] &
   4879 			    TULIP_ROM_MB_MEDIA_CODE);
   4880 			if (tsti == NULL) {
   4881 				/* Invalid media code. */
   4882 				free(tm, M_DEVBUF);
   4883 				break;
   4884 			}
   4885 
   4886 			/* Get defaults. */
   4887 			tlp_srom_media_info(sc, tsti, tm);
   4888 
   4889 			/*
   4890 			 * Override our default SIA settings if the
   4891 			 * SROM contains its own.
   4892 			 */
   4893 			if (cp[0] & 0x40) {
   4894 				tm->tm_siaconn = TULIP_ROM_GETW(cp, 1);
   4895 				tm->tm_siatxrx = TULIP_ROM_GETW(cp, 3);
   4896 				tm->tm_siagen  = TULIP_ROM_GETW(cp, 5);
   4897 				cp += 7;
   4898 			} else
   4899 				cp++;
   4900 
   4901 			/* Next is GPIO control/data. */
   4902 			tm->tm_gpctl  = TULIP_ROM_GETW(cp, 0) << 16;
   4903 			tm->tm_gpdata = TULIP_ROM_GETW(cp, 2) << 16;
   4904 
   4905 			ifmedia_add(&sc->sc_mii.mii_media,
   4906 			    IFM_MAKEWORD(IFM_ETHER, tsti->tsti_subtype,
   4907 			    tsti->tsti_options, sc->sc_tlp_minst), 0, tm);
   4908 			break;
   4909 
   4910 		case TULIP_ROM_MB_21142_MII:
   4911 			sc->sc_media_seen |= 1 << TULIP_ROM_MB_21142_MII;
   4912 
   4913 			tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   4914 
   4915 			tm->tm_type = TULIP_ROM_MB_21142_MII;
   4916 			tm->tm_get = tlp_mii_getmedia;
   4917 			tm->tm_set = tlp_mii_setmedia;
   4918 			tm->tm_opmode = OPMODE_PS;
   4919 
   4920 			if (sc->sc_reset == NULL)
   4921 				sc->sc_reset = tlp_21142_reset;
   4922 
   4923 			/* First is the PHY number. */
   4924 			tm->tm_phyno = *cp++;
   4925 
   4926 			/* Next is the MII select sequence length and offset. */
   4927 			tm->tm_gp_length = *cp++;
   4928 			tm->tm_gp_offset = cp - &sc->sc_srom[0];
   4929 			cp += tm->tm_gp_length * 2;
   4930 
   4931 			/* Next is the MII reset sequence length and offset. */
   4932 			tm->tm_reset_length = *cp++;
   4933 			tm->tm_reset_offset = cp - &sc->sc_srom[0];
   4934 			cp += tm->tm_reset_length * 2;
   4935 
   4936 			/*
   4937 			 * The following items are left in the media block
   4938 			 * that we don't particularly care about:
   4939 			 *
   4940 			 *	capabilities		W
   4941 			 *	advertisement		W
   4942 			 *	full duplex		W
   4943 			 *	tx threshold		W
   4944 			 *	MII interrupt		W
   4945 			 *
   4946 			 * These appear to be bits in the PHY registers,
   4947 			 * which our MII code handles on its own.
   4948 			 */
   4949 
   4950 			/*
   4951 			 * Before we probe the MII bus, we need to reset
   4952 			 * it and issue the selection sequence.
   4953 			 */
   4954 
   4955 			cp = &sc->sc_srom[tm->tm_reset_offset];
   4956 			for (i = 0; i < tm->tm_reset_length; i++, cp += 2) {
   4957 				delay(10);
   4958 				TULIP_WRITE(sc, CSR_SIAGEN,
   4959 				    TULIP_ROM_GETW(cp, 0) << 16);
   4960 			}
   4961 
   4962 			cp = &sc->sc_srom[tm->tm_gp_offset];
   4963 			for (i = 0; i < tm->tm_gp_length; i++, cp += 2) {
   4964 				delay(10);
   4965 				TULIP_WRITE(sc, CSR_SIAGEN,
   4966 				    TULIP_ROM_GETW(cp, 0) << 16);
   4967 			}
   4968 
   4969 			/* If there were no sequences, just lower the pins. */
   4970 			if (tm->tm_reset_length == 0 && tm->tm_gp_length == 0) {
   4971 				delay(10);
   4972 				TULIP_WRITE(sc, CSR_SIAGEN, 0);
   4973 			}
   4974 
   4975 			/*
   4976 			 * Now, probe the MII for the PHY.  Note, we know
   4977 			 * the location of the PHY on the bus, but we don't
   4978 			 * particularly care; the MII code just likes to
   4979 			 * search the whole thing anyhow.
   4980 			 */
   4981 			mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff,
   4982 			    MII_PHY_ANY, tm->tm_phyno, 0);
   4983 
   4984 			/*
   4985 			 * Now, search for the PHY we hopefully just
   4986 			 * configured.  If it's not configured into the
   4987 			 * kernel, we lose.  The PHY's default media always
   4988 			 * takes priority.
   4989 			 */
   4990 			for (phy = LIST_FIRST(&sc->sc_mii.mii_phys);
   4991 			     phy != NULL;
   4992 			     phy = LIST_NEXT(phy, mii_list))
   4993 				if (phy->mii_offset == tm->tm_phyno)
   4994 					break;
   4995 			if (phy == NULL) {
   4996 				aprint_error_dev(sc->sc_dev, "unable to configure MII\n");
   4997 				break;
   4998 			}
   4999 
   5000 			sc->sc_flags |= TULIPF_HAS_MII;
   5001 			sc->sc_tick = tlp_mii_tick;
   5002 			miidef = IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0,
   5003 			    phy->mii_inst);
   5004 
   5005 			/*
   5006 			 * Okay, now that we've found the PHY and the MII
   5007 			 * layer has added all of the media associated
   5008 			 * with that PHY, we need to traverse the media
   5009 			 * list, and add our `tm' to each entry's `aux'
   5010 			 * pointer.
   5011 			 *
   5012 			 * We do this by looking for media with our
   5013 			 * PHY's `instance'.
   5014 			 */
   5015 			for (ife = TAILQ_FIRST(&sc->sc_mii.mii_media.ifm_list);
   5016 			     ife != NULL;
   5017 			     ife = TAILQ_NEXT(ife, ifm_list)) {
   5018 				if (IFM_INST(ife->ifm_media) != phy->mii_inst)
   5019 					continue;
   5020 				ife->ifm_aux = tm;
   5021 			}
   5022 			break;
   5023 
   5024 		case TULIP_ROM_MB_21143_SYM:
   5025 			tlp_get_minst(sc);
   5026 			sc->sc_media_seen |= 1 << TULIP_ROM_MB_21143_SYM;
   5027 
   5028 			tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   5029 
   5030 			tm->tm_type = TULIP_ROM_MB_21143_SYM;
   5031 			tm->tm_get = tlp_sia_get;
   5032 			tm->tm_set = tlp_sia_set;
   5033 
   5034 			/* First is the media type code. */
   5035 			tsti = tlp_srom_to_ifmedia(cp[0] &
   5036 			    TULIP_ROM_MB_MEDIA_CODE);
   5037 			if (tsti == NULL) {
   5038 				/* Invalid media code. */
   5039 				free(tm, M_DEVBUF);
   5040 				break;
   5041 			}
   5042 
   5043 			/* Get defaults. */
   5044 			tlp_srom_media_info(sc, tsti, tm);
   5045 
   5046 			/* Next is GPIO control/data. */
   5047 			tm->tm_gpctl  = TULIP_ROM_GETW(cp, 1) << 16;
   5048 			tm->tm_gpdata = TULIP_ROM_GETW(cp, 3) << 16;
   5049 
   5050 			/*
   5051 			 * Next is a word containing OPMODE information
   5052 			 * and info on how to detect if this media is
   5053 			 * active.
   5054 			 */
   5055 			word = TULIP_ROM_GETW(cp, 5);
   5056 			tm->tm_opmode &= OPMODE_FD;
   5057 			tm->tm_opmode |= TULIP_ROM_MB_OPMODE(word);
   5058 			if ((word & TULIP_ROM_MB_NOINDICATOR) == 0) {
   5059 				tm->tm_actmask =
   5060 				    TULIP_ROM_MB_BITPOS(word);
   5061 				tm->tm_actdata =
   5062 				    (word & TULIP_ROM_MB_POLARITY) ?
   5063 				    0 : tm->tm_actmask;
   5064 			}
   5065 
   5066 			ifmedia_add(&sc->sc_mii.mii_media,
   5067 			    IFM_MAKEWORD(IFM_ETHER, tsti->tsti_subtype,
   5068 			    tsti->tsti_options, sc->sc_tlp_minst), 0, tm);
   5069 			break;
   5070 
   5071 		case TULIP_ROM_MB_21143_RESET:
   5072 			printf("%s: 21143 reset block\n", device_xname(sc->sc_dev));
   5073 			break;
   5074 
   5075 		default:
   5076 			printf("%s: unknown ISV media block type 0x%02x\n",
   5077 			    device_xname(sc->sc_dev), type);
   5078 		}
   5079 	}
   5080 
   5081 	/*
   5082 	 * Deal with the case where no media is configured.
   5083 	 */
   5084 	if (TAILQ_FIRST(&sc->sc_mii.mii_media.ifm_list) == NULL) {
   5085 		printf("%s: no media found!\n", device_xname(sc->sc_dev));
   5086 		ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
   5087 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
   5088 		return;
   5089 	}
   5090 
   5091 	/*
   5092 	 * Pick the default media.
   5093 	 */
   5094 	if (miidef != 0)
   5095 		defmedia = miidef;
   5096 	else {
   5097 		switch (sc->sc_chip) {
   5098 		case TULIP_CHIP_21140:
   5099 		case TULIP_CHIP_21140A:
   5100 			/* XXX should come from SROM */
   5101 			defmedia = IFM_MAKEWORD(IFM_ETHER, IFM_10_T, 0, 0);
   5102 			if (ifmedia_match(&sc->sc_mii.mii_media, defmedia,
   5103 				sc->sc_mii.mii_media.ifm_mask) == NULL) {
   5104 				/*
   5105 				 * There is not a 10baseT media.
   5106 				 * Fall back to the first found one.
   5107 				 */
   5108 				ife = TAILQ_FIRST(&sc->sc_mii.mii_media.ifm_list);
   5109 				defmedia = ife->ifm_media;
   5110 			}
   5111 			break;
   5112 
   5113 		case TULIP_CHIP_21142:
   5114 		case TULIP_CHIP_21143:
   5115 		case TULIP_CHIP_MX98713A:
   5116 		case TULIP_CHIP_MX98715:
   5117 		case TULIP_CHIP_MX98715A:
   5118 		case TULIP_CHIP_MX98715AEC_X:
   5119 		case TULIP_CHIP_MX98725:
   5120 			tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   5121 			tm->tm_name = "auto";
   5122 			tm->tm_get = tlp_2114x_nway_get;
   5123 			tm->tm_set = tlp_2114x_nway_set;
   5124 
   5125 			defmedia = IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0, 0);
   5126 			ifmedia_add(&sc->sc_mii.mii_media, defmedia, 0, tm);
   5127 
   5128 			sc->sc_statchg = tlp_2114x_nway_statchg;
   5129 			sc->sc_tick = tlp_2114x_nway_tick;
   5130 			break;
   5131 
   5132 		default:
   5133 			defmedia = IFM_MAKEWORD(IFM_ETHER, IFM_10_T, 0, 0);
   5134 			break;
   5135 		}
   5136 	}
   5137 
   5138 	ifmedia_set(&sc->sc_mii.mii_media, defmedia);
   5139 
   5140 	/*
   5141 	 * Display any non-MII media we've located.
   5142 	 */
   5143 	if (sc->sc_media_seen &
   5144 	    ~((1 << TULIP_ROM_MB_21140_MII) | (1 << TULIP_ROM_MB_21142_MII)))
   5145 		tlp_print_media(sc);
   5146 
   5147 	tlp_sia_fixup(sc);
   5148 }
   5149 
   5150 static void
   5151 tlp_2114x_nway_get(struct tulip_softc *sc, struct ifmediareq *ifmr)
   5152 {
   5153 
   5154 	(void) tlp_2114x_nway_service(sc, MII_POLLSTAT);
   5155 	ifmr->ifm_status = sc->sc_mii.mii_media_status;
   5156 	ifmr->ifm_active = sc->sc_mii.mii_media_active;
   5157 }
   5158 
   5159 static int
   5160 tlp_2114x_nway_set(struct tulip_softc *sc)
   5161 {
   5162 
   5163 	return (tlp_2114x_nway_service(sc, MII_MEDIACHG));
   5164 }
   5165 
   5166 static void
   5167 tlp_2114x_nway_statchg(device_t self)
   5168 {
   5169 	struct tulip_softc *sc = device_private(self);
   5170 	struct mii_data *mii = &sc->sc_mii;
   5171 	struct ifmedia_entry *ife;
   5172 
   5173 	if (IFM_SUBTYPE(mii->mii_media_active) == IFM_NONE)
   5174 		return;
   5175 
   5176 	if ((ife = ifmedia_match(&mii->mii_media, mii->mii_media_active,
   5177 	    mii->mii_media.ifm_mask)) == NULL) {
   5178 		printf("tlp_2114x_nway_statchg: no match for media 0x%x/0x%x\n",
   5179 		    mii->mii_media_active, ~mii->mii_media.ifm_mask);
   5180 		panic("tlp_2114x_nway_statchg");
   5181 	}
   5182 
   5183 	tlp_sia_media(sc, ife);
   5184 }
   5185 
   5186 static void
   5187 tlp_2114x_nway_tick(void *arg)
   5188 {
   5189 	struct tulip_softc *sc = arg;
   5190 	struct mii_data *mii = &sc->sc_mii;
   5191 	int s, ticks;
   5192 
   5193 	if (!device_is_active(sc->sc_dev))
   5194 		return;
   5195 
   5196 	s = splnet();
   5197 	tlp_2114x_nway_service(sc, MII_TICK);
   5198 	if ((sc->sc_flags & TULIPF_LINK_UP) == 0 &&
   5199 	    (mii->mii_media_status & IFM_ACTIVE) != 0 &&
   5200 	    IFM_SUBTYPE(mii->mii_media_active) != IFM_NONE) {
   5201 		sc->sc_flags |= TULIPF_LINK_UP;
   5202 		tlp_start(&sc->sc_ethercom.ec_if);
   5203 	} else if ((sc->sc_flags & TULIPF_LINK_UP) != 0 &&
   5204 	    (mii->mii_media_status & IFM_ACTIVE) == 0) {
   5205 		sc->sc_flags &= ~TULIPF_LINK_UP;
   5206 	}
   5207 	splx(s);
   5208 
   5209 	if ((sc->sc_flags & TULIPF_LINK_UP) == 0)
   5210 		ticks = hz >> 3;
   5211 	else
   5212 		ticks = hz;
   5213 	callout_reset(&sc->sc_tick_callout, ticks, tlp_2114x_nway_tick, sc);
   5214 }
   5215 
   5216 /*
   5217  * Support for the 2114X internal NWay block.  This is constructed
   5218  * somewhat like a PHY driver for simplicity.
   5219  */
   5220 
   5221 static int
   5222 tlp_2114x_nway_service(struct tulip_softc *sc, int cmd)
   5223 {
   5224 	struct mii_data *mii = &sc->sc_mii;
   5225 	struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
   5226 
   5227 	if ((mii->mii_ifp->if_flags & IFF_UP) == 0)
   5228 		return (0);
   5229 
   5230 	switch (cmd) {
   5231 	case MII_POLLSTAT:
   5232 		/* Nothing special to do here. */
   5233 		break;
   5234 
   5235 	case MII_MEDIACHG:
   5236 		switch (IFM_SUBTYPE(ife->ifm_media)) {
   5237 		case IFM_AUTO:
   5238 			goto restart;
   5239 		default:
   5240 			/* Manual setting doesn't go through here. */
   5241 			printf("tlp_2114x_nway_service: oops!\n");
   5242 			return (EINVAL);
   5243 		}
   5244 		break;
   5245 
   5246 	case MII_TICK:
   5247 		/*
   5248 		 * Only used for autonegotiation.
   5249 		 */
   5250 		if (IFM_SUBTYPE(ife->ifm_media) != IFM_AUTO)
   5251 			break;
   5252 
   5253 		/*
   5254 		 * Check to see if we have link.  If we do, we don't
   5255 		 * need to restart the autonegotiation process.
   5256 		 */
   5257 #if 0
   5258 		if (mii->mii_media_status & IFM_ACTIVE)
   5259 #else
   5260 		if (sc->sc_flags & TULIPF_LINK_UP)
   5261 #endif
   5262 			break;
   5263 
   5264 		/*
   5265 		 * Only retry autonegotiation every 5 seconds.
   5266 		 */
   5267 		if (++sc->sc_nway_ticks != (5 << 3))
   5268 			break;
   5269 
   5270 	restart:
   5271 		sc->sc_nway_ticks = 0;
   5272 		ife->ifm_data = IFM_NONE;
   5273 		tlp_2114x_nway_auto(sc);
   5274 		break;
   5275 	}
   5276 
   5277 	/* Update the media status. */
   5278 	tlp_2114x_nway_status(sc);
   5279 
   5280 	/*
   5281 	 * Callback if something changed.  Manually configuration goes through
   5282 	 * tlp_sia_set() anyway, so ignore that here.
   5283 	 */
   5284 	if (IFM_SUBTYPE(ife->ifm_media) == IFM_AUTO &&
   5285 	    ife->ifm_data != mii->mii_media_active) {
   5286 		(*sc->sc_statchg)(sc->sc_dev);
   5287 		ife->ifm_data = mii->mii_media_active;
   5288 	}
   5289 	return (0);
   5290 }
   5291 
   5292 static void
   5293 tlp_2114x_nway_auto(struct tulip_softc *sc)
   5294 {
   5295 	uint32_t siastat, siatxrx;
   5296 
   5297 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   5298 
   5299 	sc->sc_opmode &= ~(OPMODE_PS|OPMODE_PCS|OPMODE_SCR|OPMODE_FD);
   5300 	sc->sc_opmode |= OPMODE_TTM|OPMODE_HBD;
   5301 	siatxrx = 0xffbf;		/* XXX magic number */
   5302 
   5303 	/* Compute the link code word to advertise. */
   5304 	if (sc->sc_sia_cap & BMSR_100T4)
   5305 		siatxrx |= SIATXRX_T4;
   5306 	if (sc->sc_sia_cap & BMSR_100TXFDX)
   5307 		siatxrx |= SIATXRX_TXF;
   5308 	if (sc->sc_sia_cap & BMSR_100TXHDX)
   5309 		siatxrx |= SIATXRX_THX;
   5310 	if (sc->sc_sia_cap & BMSR_10TFDX)
   5311 		sc->sc_opmode |= OPMODE_FD;
   5312 	if (sc->sc_sia_cap & BMSR_10THDX)
   5313 		siatxrx |= SIATXRX_TH;
   5314 
   5315 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   5316 
   5317 	TULIP_WRITE(sc, CSR_SIACONN, 0);
   5318 	delay(1000);
   5319 	TULIP_WRITE(sc, CSR_SIATXRX, siatxrx);
   5320 	TULIP_WRITE(sc, CSR_SIACONN, SIACONN_SRL);
   5321 
   5322 	siastat = TULIP_READ(sc, CSR_SIASTAT);
   5323 	siastat &= ~(SIASTAT_ANS|SIASTAT_LPC|SIASTAT_TRA|SIASTAT_ARA|
   5324 		     SIASTAT_LS100|SIASTAT_LS10|SIASTAT_MRA);
   5325 	siastat |= SIASTAT_ANS_TXDIS;
   5326 	TULIP_WRITE(sc, CSR_SIASTAT, siastat);
   5327 }
   5328 
   5329 static void
   5330 tlp_2114x_nway_status(struct tulip_softc *sc)
   5331 {
   5332 	struct mii_data *mii = &sc->sc_mii;
   5333 	uint32_t siatxrx, siastat, anlpar;
   5334 
   5335 	mii->mii_media_status = IFM_AVALID;
   5336 	mii->mii_media_active = IFM_ETHER;
   5337 
   5338 	if ((mii->mii_ifp->if_flags & IFF_UP) == 0)
   5339 		return;
   5340 
   5341 	siastat = TULIP_READ(sc, CSR_SIASTAT);
   5342 	siatxrx = TULIP_READ(sc, CSR_SIATXRX);
   5343 
   5344 	if (siatxrx & SIATXRX_ANE) {
   5345 		if ((siastat & SIASTAT_ANS) != SIASTAT_ANS_FLPGOOD) {
   5346 			/* Erg, still trying, I guess... */
   5347 			mii->mii_media_active |= IFM_NONE;
   5348 			return;
   5349 		}
   5350 
   5351 		if (~siastat & (SIASTAT_LS10 | SIASTAT_LS100))
   5352 			mii->mii_media_status |= IFM_ACTIVE;
   5353 
   5354 		if (siastat & SIASTAT_LPN) {
   5355 			anlpar = SIASTAT_GETLPC(siastat);
   5356 			if (anlpar & ANLPAR_T4 &&
   5357 			    sc->sc_sia_cap & BMSR_100T4)
   5358 				mii->mii_media_active |= IFM_100_T4;
   5359 			else if (anlpar & ANLPAR_TX_FD &&
   5360 				 sc->sc_sia_cap & BMSR_100TXFDX)
   5361 				mii->mii_media_active |= IFM_100_TX|IFM_FDX;
   5362 			else if (anlpar & ANLPAR_TX &&
   5363 				 sc->sc_sia_cap & BMSR_100TXHDX)
   5364 				mii->mii_media_active |= IFM_100_TX;
   5365 			else if (anlpar & ANLPAR_10_FD &&
   5366 				 sc->sc_sia_cap & BMSR_10TFDX)
   5367 				mii->mii_media_active |= IFM_10_T|IFM_FDX;
   5368 			else if (anlpar & ANLPAR_10 &&
   5369 				 sc->sc_sia_cap & BMSR_10THDX)
   5370 				mii->mii_media_active |= IFM_10_T;
   5371 			else
   5372 				mii->mii_media_active |= IFM_NONE;
   5373 		} else {
   5374 			/*
   5375 			 * If the other side doesn't support NWAY, then the
   5376 			 * best we can do is determine if we have a 10Mbps or
   5377 			 * 100Mbps link. There's no way to know if the link
   5378 			 * is full or half duplex, so we default to half duplex
   5379 			 * and hope that the user is clever enough to manually
   5380 			 * change the media settings if we're wrong.
   5381 			 */
   5382 			if ((siastat & SIASTAT_LS100) == 0)
   5383 				mii->mii_media_active |= IFM_100_TX;
   5384 			else if ((siastat & SIASTAT_LS10) == 0)
   5385 				mii->mii_media_active |= IFM_10_T;
   5386 			else
   5387 				mii->mii_media_active |= IFM_NONE;
   5388 		}
   5389 	} else {
   5390 		if (~siastat & (SIASTAT_LS10 | SIASTAT_LS100))
   5391 			mii->mii_media_status |= IFM_ACTIVE;
   5392 
   5393 		if (sc->sc_opmode & OPMODE_TTM)
   5394 			mii->mii_media_active |= IFM_10_T;
   5395 		else
   5396 			mii->mii_media_active |= IFM_100_TX;
   5397 		if (sc->sc_opmode & OPMODE_FD)
   5398 			mii->mii_media_active |= IFM_FDX;
   5399 	}
   5400 }
   5401 
   5402 static void
   5403 tlp_2114x_isv_tmsw_get(struct tulip_softc *sc, struct ifmediareq *ifmr)
   5404 {
   5405 	struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
   5406 	struct tulip_21x4x_media *tm = ife->ifm_aux;
   5407 
   5408 	(*tm->tm_get)(sc, ifmr);
   5409 }
   5410 
   5411 static int
   5412 tlp_2114x_isv_tmsw_set(struct tulip_softc *sc)
   5413 {
   5414 	struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
   5415 	struct tulip_21x4x_media *tm = ife->ifm_aux;
   5416 
   5417 	/*
   5418 	 * Check to see if we need to reset the chip, and do it.  The
   5419 	 * reset path will get the OPMODE register right the next
   5420 	 * time through.
   5421 	 */
   5422 	if (TULIP_MEDIA_NEEDSRESET(sc, tm->tm_opmode))
   5423 		return (tlp_init(&sc->sc_ethercom.ec_if));
   5424 
   5425 	return ((*tm->tm_set)(sc));
   5426 }
   5427 
   5428 /*
   5429  * MII-on-SIO media switch.  Handles only MII attached to the SIO.
   5430  */
   5431 static void	tlp_sio_mii_tmsw_init(struct tulip_softc *);
   5432 
   5433 const struct tulip_mediasw tlp_sio_mii_mediasw = {
   5434 	tlp_sio_mii_tmsw_init, tlp_mii_getmedia, tlp_mii_setmedia
   5435 };
   5436 
   5437 static void
   5438 tlp_sio_mii_tmsw_init(struct tulip_softc *sc)
   5439 {
   5440 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   5441 
   5442 	/*
   5443 	 * We don't attach any media info structures to the ifmedia
   5444 	 * entries, so if we're using a pre-init function that needs
   5445 	 * that info, override it to one that doesn't.
   5446 	 */
   5447 	if (sc->sc_preinit == tlp_2114x_preinit)
   5448 		sc->sc_preinit = tlp_2114x_mii_preinit;
   5449 
   5450 	sc->sc_mii.mii_ifp = ifp;
   5451 	sc->sc_mii.mii_readreg = tlp_bitbang_mii_readreg;
   5452 	sc->sc_mii.mii_writereg = tlp_bitbang_mii_writereg;
   5453 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   5454 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   5455 	    tlp_mediastatus);
   5456 	mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff, MII_PHY_ANY,
   5457 	    MII_OFFSET_ANY, 0);
   5458 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   5459 		ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
   5460 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
   5461 	} else {
   5462 		sc->sc_flags |= TULIPF_HAS_MII;
   5463 		sc->sc_tick = tlp_mii_tick;
   5464 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   5465 	}
   5466 }
   5467 
   5468 /*
   5469  * Lite-On PNIC media switch.  Must handle MII or internal NWAY.
   5470  */
   5471 static void	tlp_pnic_tmsw_init(struct tulip_softc *);
   5472 static void	tlp_pnic_tmsw_get(struct tulip_softc *, struct ifmediareq *);
   5473 static int	tlp_pnic_tmsw_set(struct tulip_softc *);
   5474 
   5475 const struct tulip_mediasw tlp_pnic_mediasw = {
   5476 	tlp_pnic_tmsw_init, tlp_pnic_tmsw_get, tlp_pnic_tmsw_set
   5477 };
   5478 
   5479 static void	tlp_pnic_nway_statchg(device_t);
   5480 static void	tlp_pnic_nway_tick(void *);
   5481 static int	tlp_pnic_nway_service(struct tulip_softc *, int);
   5482 static void	tlp_pnic_nway_reset(struct tulip_softc *);
   5483 static int	tlp_pnic_nway_auto(struct tulip_softc *, int);
   5484 static void	tlp_pnic_nway_auto_timeout(void *);
   5485 static void	tlp_pnic_nway_status(struct tulip_softc *);
   5486 static void	tlp_pnic_nway_acomp(struct tulip_softc *);
   5487 
   5488 static void
   5489 tlp_pnic_tmsw_init(struct tulip_softc *sc)
   5490 {
   5491 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   5492 	const char *sep = "";
   5493 
   5494 #define	ADD(m, c)	ifmedia_add(&sc->sc_mii.mii_media, (m), (c), NULL)
   5495 #define	PRINT(str)	printf("%s%s", sep, str); sep = ", "
   5496 
   5497 	sc->sc_mii.mii_ifp = ifp;
   5498 	sc->sc_mii.mii_readreg = tlp_pnic_mii_readreg;
   5499 	sc->sc_mii.mii_writereg = tlp_pnic_mii_writereg;
   5500 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   5501 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   5502 	    tlp_mediastatus);
   5503 	mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff, MII_PHY_ANY,
   5504 	    MII_OFFSET_ANY, 0);
   5505 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   5506 		/* XXX What about AUI/BNC support? */
   5507 		printf("%s: ", device_xname(sc->sc_dev));
   5508 
   5509 		tlp_pnic_nway_reset(sc);
   5510 
   5511 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_10_T, 0, 0),
   5512 		    PNIC_NWAY_TW|PNIC_NWAY_CAP10T);
   5513 		PRINT("10baseT");
   5514 
   5515 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_10_T, IFM_FDX, 0),
   5516 		    PNIC_NWAY_TW|PNIC_NWAY_FD|PNIC_NWAY_CAP10TFDX);
   5517 		PRINT("10baseT-FDX");
   5518 
   5519 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_100_TX, 0, 0),
   5520 		    PNIC_NWAY_TW|PNIC_NWAY_100|PNIC_NWAY_CAP100TX);
   5521 		PRINT("100baseTX");
   5522 
   5523 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_100_TX, IFM_FDX, 0),
   5524 		    PNIC_NWAY_TW|PNIC_NWAY_100|PNIC_NWAY_FD|
   5525 		    PNIC_NWAY_CAP100TXFDX);
   5526 		PRINT("100baseTX-FDX");
   5527 
   5528 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0, 0),
   5529 		    PNIC_NWAY_TW|PNIC_NWAY_RN|PNIC_NWAY_NW|
   5530 		    PNIC_NWAY_CAP10T|PNIC_NWAY_CAP10TFDX|
   5531 		    PNIC_NWAY_CAP100TXFDX|PNIC_NWAY_CAP100TX);
   5532 		PRINT("auto");
   5533 
   5534 		printf("\n");
   5535 
   5536 		sc->sc_statchg = tlp_pnic_nway_statchg;
   5537 		sc->sc_tick = tlp_pnic_nway_tick;
   5538 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   5539 	} else {
   5540 		sc->sc_flags |= TULIPF_HAS_MII;
   5541 		sc->sc_tick = tlp_mii_tick;
   5542 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   5543 	}
   5544 
   5545 #undef ADD
   5546 #undef PRINT
   5547 }
   5548 
   5549 static void
   5550 tlp_pnic_tmsw_get(struct tulip_softc *sc, struct ifmediareq *ifmr)
   5551 {
   5552 	struct mii_data *mii = &sc->sc_mii;
   5553 
   5554 	if (sc->sc_flags & TULIPF_HAS_MII)
   5555 		tlp_mii_getmedia(sc, ifmr);
   5556 	else {
   5557 		mii->mii_media_status = 0;
   5558 		mii->mii_media_active = IFM_NONE;
   5559 		tlp_pnic_nway_service(sc, MII_POLLSTAT);
   5560 		ifmr->ifm_status = sc->sc_mii.mii_media_status;
   5561 		ifmr->ifm_active = sc->sc_mii.mii_media_active;
   5562 	}
   5563 }
   5564 
   5565 static int
   5566 tlp_pnic_tmsw_set(struct tulip_softc *sc)
   5567 {
   5568 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   5569 	struct mii_data *mii = &sc->sc_mii;
   5570 
   5571 	if (sc->sc_flags & TULIPF_HAS_MII) {
   5572 		/*
   5573 		 * Make sure the built-in Tx jabber timer is disabled.
   5574 		 */
   5575 		TULIP_WRITE(sc, CSR_PNIC_ENDEC, PNIC_ENDEC_JDIS);
   5576 
   5577 		return (tlp_mii_setmedia(sc));
   5578 	}
   5579 
   5580 	if (ifp->if_flags & IFF_UP) {
   5581 		mii->mii_media_status = 0;
   5582 		mii->mii_media_active = IFM_NONE;
   5583 		return (tlp_pnic_nway_service(sc, MII_MEDIACHG));
   5584 	}
   5585 
   5586 	return (0);
   5587 }
   5588 
   5589 static void
   5590 tlp_pnic_nway_statchg(device_t self)
   5591 {
   5592 	struct tulip_softc *sc = device_private(self);
   5593 
   5594 	/* Idle the transmit and receive processes. */
   5595 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   5596 
   5597 	sc->sc_opmode &= ~(OPMODE_TTM|OPMODE_FD|OPMODE_PS|OPMODE_PCS|
   5598 	    OPMODE_SCR|OPMODE_HBD);
   5599 
   5600 	if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_10_T) {
   5601 		sc->sc_opmode |= OPMODE_TTM;
   5602 		TULIP_WRITE(sc, CSR_GPP,
   5603 		    GPP_PNIC_OUT(GPP_PNIC_PIN_SPEED_RLY, 0) |
   5604 		    GPP_PNIC_OUT(GPP_PNIC_PIN_100M_LPKB, 1));
   5605 	} else {
   5606 		sc->sc_opmode |= OPMODE_PS|OPMODE_PCS|OPMODE_SCR|OPMODE_HBD;
   5607 		TULIP_WRITE(sc, CSR_GPP,
   5608 		    GPP_PNIC_OUT(GPP_PNIC_PIN_SPEED_RLY, 1) |
   5609 		    GPP_PNIC_OUT(GPP_PNIC_PIN_100M_LPKB, 1));
   5610 	}
   5611 
   5612 	if (sc->sc_mii.mii_media_active & IFM_FDX)
   5613 		sc->sc_opmode |= OPMODE_FD|OPMODE_HBD;
   5614 
   5615 	/*
   5616 	 * Write new OPMODE bits.  This also restarts the transmit
   5617 	 * and receive processes.
   5618 	 */
   5619 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   5620 }
   5621 
   5622 static void
   5623 tlp_pnic_nway_tick(void *arg)
   5624 {
   5625 	struct tulip_softc *sc = arg;
   5626 	int s;
   5627 
   5628 	if (!device_is_active(sc->sc_dev))
   5629 		return;
   5630 
   5631 	s = splnet();
   5632 	tlp_pnic_nway_service(sc, MII_TICK);
   5633 	splx(s);
   5634 
   5635 	callout_reset(&sc->sc_tick_callout, hz, tlp_pnic_nway_tick, sc);
   5636 }
   5637 
   5638 /*
   5639  * Support for the Lite-On PNIC internal NWay block.  This is constructed
   5640  * somewhat like a PHY driver for simplicity.
   5641  */
   5642 
   5643 static int
   5644 tlp_pnic_nway_service(struct tulip_softc *sc, int cmd)
   5645 {
   5646 	struct mii_data *mii = &sc->sc_mii;
   5647 	struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
   5648 
   5649 	if ((mii->mii_ifp->if_flags & IFF_UP) == 0)
   5650 		return (0);
   5651 
   5652 	switch (cmd) {
   5653 	case MII_POLLSTAT:
   5654 		/* Nothing special to do here. */
   5655 		break;
   5656 
   5657 	case MII_MEDIACHG:
   5658 		switch (IFM_SUBTYPE(ife->ifm_media)) {
   5659 		case IFM_AUTO:
   5660 			(void) tlp_pnic_nway_auto(sc, 1);
   5661 			break;
   5662 		case IFM_100_T4:
   5663 			/*
   5664 			 * XXX Not supported as a manual setting right now.
   5665 			 */
   5666 			return (EINVAL);
   5667 		default:
   5668 			/*
   5669 			 * NWAY register data is stored in the ifmedia entry.
   5670 			 */
   5671 			TULIP_WRITE(sc, CSR_PNIC_NWAY, ife->ifm_data);
   5672 		}
   5673 		break;
   5674 
   5675 	case MII_TICK:
   5676 		/*
   5677 		 * Only used for autonegotiation.
   5678 		 */
   5679 		if (IFM_SUBTYPE(ife->ifm_media) != IFM_AUTO)
   5680 			return (0);
   5681 
   5682 		/*
   5683 		 * Check to see if we have link.  If we do, we don't
   5684 		 * need to restart the autonegotiation process.
   5685 		 */
   5686 		if (sc->sc_flags & TULIPF_LINK_UP)
   5687 			return (0);
   5688 
   5689 		/*
   5690 		 * Only retry autonegotiation every 5 seconds.
   5691 		 */
   5692 		if (++sc->sc_nway_ticks != 5)
   5693 			return (0);
   5694 
   5695 		sc->sc_nway_ticks = 0;
   5696 		tlp_pnic_nway_reset(sc);
   5697 		if (tlp_pnic_nway_auto(sc, 0) == EJUSTRETURN)
   5698 			return (0);
   5699 		break;
   5700 	}
   5701 
   5702 	/* Update the media status. */
   5703 	tlp_pnic_nway_status(sc);
   5704 
   5705 	/* Callback if something changed. */
   5706 	if ((sc->sc_nway_active == NULL ||
   5707 	     sc->sc_nway_active->ifm_media != mii->mii_media_active) ||
   5708 	    cmd == MII_MEDIACHG) {
   5709 		(*sc->sc_statchg)(sc->sc_dev);
   5710 		tlp_nway_activate(sc, mii->mii_media_active);
   5711 	}
   5712 	return (0);
   5713 }
   5714 
   5715 static void
   5716 tlp_pnic_nway_reset(struct tulip_softc *sc)
   5717 {
   5718 
   5719 	TULIP_WRITE(sc, CSR_PNIC_NWAY, PNIC_NWAY_RS);
   5720 	delay(100);
   5721 	TULIP_WRITE(sc, CSR_PNIC_NWAY, 0);
   5722 }
   5723 
   5724 static int
   5725 tlp_pnic_nway_auto(struct tulip_softc *sc, int waitfor)
   5726 {
   5727 	struct mii_data *mii = &sc->sc_mii;
   5728 	struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
   5729 	uint32_t reg;
   5730 	int i;
   5731 
   5732 	if ((sc->sc_flags & TULIPF_DOINGAUTO) == 0)
   5733 		TULIP_WRITE(sc, CSR_PNIC_NWAY, ife->ifm_data);
   5734 
   5735 	if (waitfor) {
   5736 		/* Wait 500ms for it to complete. */
   5737 		for (i = 0; i < 500; i++) {
   5738 			reg = TULIP_READ(sc, CSR_PNIC_NWAY);
   5739 			if (reg & PNIC_NWAY_LPAR_MASK) {
   5740 				tlp_pnic_nway_acomp(sc);
   5741 				return (0);
   5742 			}
   5743 			delay(1000);
   5744 		}
   5745 #if 0
   5746 		if ((reg & PNIC_NWAY_LPAR_MASK) == 0)
   5747 			aprint_error_dev(sc->sc_dev, "autonegotiation failed to complete\n");
   5748 #endif
   5749 
   5750 		/*
   5751 		 * Don't need to worry about clearing DOINGAUTO.
   5752 		 * If that's set, a timeout is pending, and it will
   5753 		 * clear the flag.
   5754 		 */
   5755 		return (EIO);
   5756 	}
   5757 
   5758 	/*
   5759 	 * Just let it finish asynchronously.  This is for the benefit of
   5760 	 * the tick handler driving autonegotiation.  Don't want 500ms
   5761 	 * delays all the time while the system is running!
   5762 	 */
   5763 	if ((sc->sc_flags & TULIPF_DOINGAUTO) == 0) {
   5764 		sc->sc_flags |= TULIPF_DOINGAUTO;
   5765 		callout_reset(&sc->sc_nway_callout, hz >> 1,
   5766 		    tlp_pnic_nway_auto_timeout, sc);
   5767 	}
   5768 	return (EJUSTRETURN);
   5769 }
   5770 
   5771 static void
   5772 tlp_pnic_nway_auto_timeout(void *arg)
   5773 {
   5774 	struct tulip_softc *sc = arg;
   5775 	uint32_t reg;
   5776 	int s;
   5777 
   5778 	s = splnet();
   5779 	sc->sc_flags &= ~TULIPF_DOINGAUTO;
   5780 	reg = TULIP_READ(sc, CSR_PNIC_NWAY);
   5781 #if 0
   5782 	if ((reg & PNIC_NWAY_LPAR_MASK) == 0)
   5783 		aprint_error_dev(sc->sc_dev, "autonegotiation failed to complete\n");
   5784 #endif
   5785 
   5786 	tlp_pnic_nway_acomp(sc);
   5787 
   5788 	/* Update the media status. */
   5789 	(void) tlp_pnic_nway_service(sc, MII_POLLSTAT);
   5790 	splx(s);
   5791 }
   5792 
   5793 static void
   5794 tlp_pnic_nway_status(struct tulip_softc *sc)
   5795 {
   5796 	struct mii_data *mii = &sc->sc_mii;
   5797 	uint32_t reg;
   5798 
   5799 	mii->mii_media_status = IFM_AVALID;
   5800 	mii->mii_media_active = IFM_ETHER;
   5801 
   5802 	reg = TULIP_READ(sc, CSR_PNIC_NWAY);
   5803 
   5804 	if (sc->sc_flags & TULIPF_LINK_UP)
   5805 		mii->mii_media_status |= IFM_ACTIVE;
   5806 
   5807 	if (reg & PNIC_NWAY_NW) {
   5808 		if ((reg & PNIC_NWAY_LPAR_MASK) == 0) {
   5809 			/* Erg, still trying, I guess... */
   5810 			mii->mii_media_active |= IFM_NONE;
   5811 			return;
   5812 		}
   5813 
   5814 #if 0
   5815 		if (reg & PNIC_NWAY_LPAR100T4)
   5816 			mii->mii_media_active |= IFM_100_T4;
   5817 		else
   5818 #endif
   5819 		if (reg & PNIC_NWAY_LPAR100TXFDX)
   5820 			mii->mii_media_active |= IFM_100_TX|IFM_FDX;
   5821 		else if (reg & PNIC_NWAY_LPAR100TX)
   5822 			mii->mii_media_active |= IFM_100_TX;
   5823 		else if (reg & PNIC_NWAY_LPAR10TFDX)
   5824 			mii->mii_media_active |= IFM_10_T|IFM_FDX;
   5825 		else if (reg & PNIC_NWAY_LPAR10T)
   5826 			mii->mii_media_active |= IFM_10_T;
   5827 		else
   5828 			mii->mii_media_active |= IFM_NONE;
   5829 	} else {
   5830 		if (reg & PNIC_NWAY_100)
   5831 			mii->mii_media_active |= IFM_100_TX;
   5832 		else
   5833 			mii->mii_media_active |= IFM_10_T;
   5834 		if (reg & PNIC_NWAY_FD)
   5835 			mii->mii_media_active |= IFM_FDX;
   5836 	}
   5837 }
   5838 
   5839 static void
   5840 tlp_pnic_nway_acomp(struct tulip_softc *sc)
   5841 {
   5842 	uint32_t reg;
   5843 
   5844 	reg = TULIP_READ(sc, CSR_PNIC_NWAY);
   5845 	reg &= ~(PNIC_NWAY_FD|PNIC_NWAY_100|PNIC_NWAY_RN);
   5846 
   5847 	if (reg & (PNIC_NWAY_LPAR100TXFDX|PNIC_NWAY_LPAR100TX))
   5848 		reg |= PNIC_NWAY_100;
   5849 	if (reg & (PNIC_NWAY_LPAR10TFDX|PNIC_NWAY_LPAR100TXFDX))
   5850 		reg |= PNIC_NWAY_FD;
   5851 
   5852 	TULIP_WRITE(sc, CSR_PNIC_NWAY, reg);
   5853 }
   5854 
   5855 /*
   5856  * Macronix PMAC and Lite-On PNIC-II media switch:
   5857  *
   5858  *	MX98713 and MX98713A		21140-like MII or GPIO media.
   5859  *
   5860  *	MX98713A			21143-like MII or SIA/SYM media.
   5861  *
   5862  *	MX98715, MX98715A, MX98725,	21143-like SIA/SYM media.
   5863  *	82C115, MX98715AEC-C, -E
   5864  *
   5865  * So, what we do here is fake MII-on-SIO or ISV media info, and
   5866  * use the ISV media switch get/set functions to handle the rest.
   5867  */
   5868 
   5869 static void	tlp_pmac_tmsw_init(struct tulip_softc *);
   5870 
   5871 const struct tulip_mediasw tlp_pmac_mediasw = {
   5872 	tlp_pmac_tmsw_init, tlp_2114x_isv_tmsw_get, tlp_2114x_isv_tmsw_set
   5873 };
   5874 
   5875 const struct tulip_mediasw tlp_pmac_mii_mediasw = {
   5876 	tlp_pmac_tmsw_init, tlp_mii_getmedia, tlp_mii_setmedia
   5877 };
   5878 
   5879 static void
   5880 tlp_pmac_tmsw_init(struct tulip_softc *sc)
   5881 {
   5882 	static const uint8_t media[] = {
   5883 		TULIP_ROM_MB_MEDIA_TP,
   5884 		TULIP_ROM_MB_MEDIA_TP_FDX,
   5885 		TULIP_ROM_MB_MEDIA_100TX,
   5886 		TULIP_ROM_MB_MEDIA_100TX_FDX,
   5887 	};
   5888 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   5889 	struct tulip_21x4x_media *tm;
   5890 
   5891 	sc->sc_mii.mii_ifp = ifp;
   5892 	sc->sc_mii.mii_readreg = tlp_bitbang_mii_readreg;
   5893 	sc->sc_mii.mii_writereg = tlp_bitbang_mii_writereg;
   5894 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   5895 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   5896 	    tlp_mediastatus);
   5897 	if (sc->sc_chip == TULIP_CHIP_MX98713 ||
   5898 	    sc->sc_chip == TULIP_CHIP_MX98713A) {
   5899 		mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff,
   5900 		    MII_PHY_ANY, MII_OFFSET_ANY, 0);
   5901 		if (LIST_FIRST(&sc->sc_mii.mii_phys) != NULL) {
   5902 			sc->sc_flags |= TULIPF_HAS_MII;
   5903 			sc->sc_tick = tlp_mii_tick;
   5904 			sc->sc_preinit = tlp_2114x_mii_preinit;
   5905 			sc->sc_mediasw = &tlp_pmac_mii_mediasw;
   5906 			ifmedia_set(&sc->sc_mii.mii_media,
   5907 			    IFM_ETHER|IFM_AUTO);
   5908 			return;
   5909 		}
   5910 	}
   5911 
   5912 	switch (sc->sc_chip) {
   5913 	case TULIP_CHIP_MX98713:
   5914 		tlp_add_srom_media(sc, TULIP_ROM_MB_21140_GPR,
   5915 		    tlp_21140_gpio_get, tlp_21140_gpio_set, media, 4);
   5916 
   5917 		/*
   5918 		 * XXX Should implement auto-sense for this someday,
   5919 		 * XXX when we do the same for the 21140.
   5920 		 */
   5921 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
   5922 		break;
   5923 
   5924 	default:
   5925 		tlp_add_srom_media(sc, TULIP_ROM_MB_21142_SIA,
   5926 		    tlp_sia_get, tlp_sia_set, media, 2);
   5927 		tlp_add_srom_media(sc, TULIP_ROM_MB_21143_SYM,
   5928 		    tlp_sia_get, tlp_sia_set, media + 2, 2);
   5929 
   5930 		tm = malloc(sizeof(*tm), M_DEVBUF, M_WAITOK|M_ZERO);
   5931 		tm->tm_name = "auto";
   5932 		tm->tm_get = tlp_2114x_nway_get;
   5933 		tm->tm_set = tlp_2114x_nway_set;
   5934 		ifmedia_add(&sc->sc_mii.mii_media,
   5935 		    IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0, 0), 0, tm);
   5936 
   5937 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   5938 		sc->sc_statchg = tlp_2114x_nway_statchg;
   5939 		sc->sc_tick = tlp_2114x_nway_tick;
   5940 		break;
   5941 	}
   5942 
   5943 	tlp_print_media(sc);
   5944 	tlp_sia_fixup(sc);
   5945 
   5946 	/* Set the LED modes. */
   5947 	tlp_pmac_reset(sc);
   5948 
   5949 	sc->sc_reset = tlp_pmac_reset;
   5950 }
   5951 
   5952 /*
   5953  * ADMtek AL981 media switch.  Only has internal PHY.
   5954  */
   5955 static void	tlp_al981_tmsw_init(struct tulip_softc *);
   5956 
   5957 const struct tulip_mediasw tlp_al981_mediasw = {
   5958 	tlp_al981_tmsw_init, tlp_mii_getmedia, tlp_mii_setmedia
   5959 };
   5960 
   5961 static void
   5962 tlp_al981_tmsw_init(struct tulip_softc *sc)
   5963 {
   5964 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   5965 
   5966 	sc->sc_mii.mii_ifp = ifp;
   5967 	sc->sc_mii.mii_readreg = tlp_al981_mii_readreg;
   5968 	sc->sc_mii.mii_writereg = tlp_al981_mii_writereg;
   5969 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   5970 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   5971 	    tlp_mediastatus);
   5972 	mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff, MII_PHY_ANY,
   5973 	    MII_OFFSET_ANY, 0);
   5974 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   5975 		ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
   5976 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
   5977 	} else {
   5978 		sc->sc_flags |= TULIPF_HAS_MII;
   5979 		sc->sc_tick = tlp_mii_tick;
   5980 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   5981 	}
   5982 }
   5983 
   5984 /*
   5985  * ADMtek AN983/985 media switch.  Only has internal PHY, but
   5986  * on an SIO-like interface.  Unfortunately, we can't use the
   5987  * standard SIO media switch, because the AN985 "ghosts" the
   5988  * singly PHY at every address.
   5989  */
   5990 static void	tlp_an985_tmsw_init(struct tulip_softc *);
   5991 
   5992 const struct tulip_mediasw tlp_an985_mediasw = {
   5993 	tlp_an985_tmsw_init, tlp_mii_getmedia, tlp_mii_setmedia
   5994 };
   5995 
   5996 static void
   5997 tlp_an985_tmsw_init(struct tulip_softc *sc)
   5998 {
   5999 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   6000 
   6001 	sc->sc_mii.mii_ifp = ifp;
   6002 	sc->sc_mii.mii_readreg = tlp_bitbang_mii_readreg;
   6003 	sc->sc_mii.mii_writereg = tlp_bitbang_mii_writereg;
   6004 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   6005 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   6006 	    tlp_mediastatus);
   6007 	mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff, 1,
   6008 	    MII_OFFSET_ANY, 0);
   6009 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   6010 		ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
   6011 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
   6012 	} else {
   6013 		sc->sc_flags |= TULIPF_HAS_MII;
   6014 		sc->sc_tick = tlp_mii_tick;
   6015 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   6016 	}
   6017 }
   6018 
   6019 /*
   6020  * Davicom DM9102 media switch.  Internal PHY and possibly HomePNA.
   6021  */
   6022 static void	tlp_dm9102_tmsw_init(struct tulip_softc *);
   6023 static void	tlp_dm9102_tmsw_getmedia(struct tulip_softc *,
   6024 		    struct ifmediareq *);
   6025 static int	tlp_dm9102_tmsw_setmedia(struct tulip_softc *);
   6026 
   6027 const struct tulip_mediasw tlp_dm9102_mediasw = {
   6028 	tlp_dm9102_tmsw_init, tlp_dm9102_tmsw_getmedia,
   6029 	    tlp_dm9102_tmsw_setmedia
   6030 };
   6031 
   6032 static void
   6033 tlp_dm9102_tmsw_init(struct tulip_softc *sc)
   6034 {
   6035 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   6036 	uint32_t opmode;
   6037 
   6038 	sc->sc_mii.mii_ifp = ifp;
   6039 	sc->sc_mii.mii_readreg = tlp_bitbang_mii_readreg;
   6040 	sc->sc_mii.mii_writereg = tlp_bitbang_mii_writereg;
   6041 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   6042 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   6043 	    tlp_mediastatus);
   6044 
   6045 	/* PHY block already reset via tlp_reset(). */
   6046 
   6047 	/*
   6048 	 * Configure OPMODE properly for the internal MII interface.
   6049 	 */
   6050 	switch (sc->sc_chip) {
   6051 	case TULIP_CHIP_DM9102:
   6052 		opmode = OPMODE_MBO|OPMODE_HBD|OPMODE_PS;
   6053 		break;
   6054 
   6055 	case TULIP_CHIP_DM9102A:
   6056 		opmode = OPMODE_MBO|OPMODE_HBD;
   6057 		break;
   6058 
   6059 	default:
   6060 		opmode = 0;
   6061 		break;
   6062 	}
   6063 
   6064 	TULIP_WRITE(sc, CSR_OPMODE, opmode);
   6065 
   6066 	/* Now, probe the internal MII for the internal PHY. */
   6067 	mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff, MII_PHY_ANY,
   6068 	    MII_OFFSET_ANY, 0);
   6069 
   6070 	/*
   6071 	 * XXX Figure out what to do about the HomePNA portion
   6072 	 * XXX of the DM9102A.
   6073 	 */
   6074 
   6075 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   6076 		ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
   6077 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
   6078 	} else {
   6079 		sc->sc_flags |= TULIPF_HAS_MII;
   6080 		sc->sc_tick = tlp_mii_tick;
   6081 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   6082 	}
   6083 }
   6084 
   6085 static void
   6086 tlp_dm9102_tmsw_getmedia(struct tulip_softc *sc, struct ifmediareq *ifmr)
   6087 {
   6088 
   6089 	/* XXX HomePNA on DM9102A. */
   6090 	tlp_mii_getmedia(sc, ifmr);
   6091 }
   6092 
   6093 static int
   6094 tlp_dm9102_tmsw_setmedia(struct tulip_softc *sc)
   6095 {
   6096 
   6097 	/* XXX HomePNA on DM9102A. */
   6098 	return (tlp_mii_setmedia(sc));
   6099 }
   6100 
   6101 /*
   6102  * ASIX AX88140A/AX88141 media switch. Internal PHY or MII.
   6103  */
   6104 
   6105 static void	tlp_asix_tmsw_init(struct tulip_softc *);
   6106 static void	tlp_asix_tmsw_getmedia(struct tulip_softc *,
   6107 		    struct ifmediareq *);
   6108 static int	tlp_asix_tmsw_setmedia(struct tulip_softc *);
   6109 
   6110 const struct tulip_mediasw tlp_asix_mediasw = {
   6111 	tlp_asix_tmsw_init, tlp_asix_tmsw_getmedia,
   6112 	tlp_asix_tmsw_setmedia
   6113 };
   6114 
   6115 static void
   6116 tlp_asix_tmsw_init(struct tulip_softc *sc)
   6117 {
   6118 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   6119 	uint32_t opmode;
   6120 
   6121 	sc->sc_mii.mii_ifp = ifp;
   6122         sc->sc_mii.mii_readreg = tlp_bitbang_mii_readreg;
   6123         sc->sc_mii.mii_writereg = tlp_bitbang_mii_writereg;
   6124 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   6125 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   6126             tlp_mediastatus);
   6127 
   6128 	/*
   6129 	 * Configure OPMODE properly for the internal MII interface.
   6130 	 */
   6131 	switch (sc->sc_chip) {
   6132 	case TULIP_CHIP_AX88140:
   6133 	case TULIP_CHIP_AX88141:
   6134 		opmode = OPMODE_HBD|OPMODE_PS;
   6135 		break;
   6136         default:
   6137                 opmode = 0;
   6138                 break;
   6139         }
   6140 
   6141 	TULIP_WRITE(sc, CSR_OPMODE, opmode);
   6142 
   6143 	/* Now, probe the internal MII for the internal PHY. */
   6144 	mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff, MII_PHY_ANY,
   6145 	    MII_OFFSET_ANY, 0);
   6146 
   6147 	/* XXX Figure how to handle the PHY. */
   6148 
   6149 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   6150 		ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
   6151 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
   6152 	} else {
   6153 		sc->sc_flags |= TULIPF_HAS_MII;
   6154 		sc->sc_tick = tlp_mii_tick;
   6155 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   6156 	}
   6157 
   6158 
   6159 }
   6160 
   6161 static void
   6162 tlp_asix_tmsw_getmedia(struct tulip_softc *sc, struct ifmediareq *ifmr)
   6163 {
   6164 
   6165 	/* XXX PHY handling. */
   6166 	tlp_mii_getmedia(sc, ifmr);
   6167 }
   6168 
   6169 static int
   6170 tlp_asix_tmsw_setmedia(struct tulip_softc *sc)
   6171 {
   6172 
   6173 	/* XXX PHY handling. */
   6174 	return (tlp_mii_setmedia(sc));
   6175 }
   6176 
   6177 /*
   6178  * RS7112 media switch.  Handles only MII attached to the SIO.
   6179  * We only have a PHY at 1.
   6180  */
   6181 void   tlp_rs7112_tmsw_init(struct tulip_softc *);
   6182 
   6183 const struct tulip_mediasw tlp_rs7112_mediasw = {
   6184 	tlp_rs7112_tmsw_init, tlp_mii_getmedia, tlp_mii_setmedia
   6185 };
   6186 
   6187 void
   6188 tlp_rs7112_tmsw_init(struct tulip_softc *sc)
   6189 {
   6190 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   6191 
   6192 	/*
   6193 	 * We don't attach any media info structures to the ifmedia
   6194 	 * entries, so if we're using a pre-init function that needs
   6195 	 * that info, override it to one that doesn't.
   6196 	 */
   6197 	if (sc->sc_preinit == tlp_2114x_preinit)
   6198 		sc->sc_preinit = tlp_2114x_mii_preinit;
   6199 
   6200 	sc->sc_mii.mii_ifp = ifp;
   6201 	sc->sc_mii.mii_readreg = tlp_bitbang_mii_readreg;
   6202 	sc->sc_mii.mii_writereg = tlp_bitbang_mii_writereg;
   6203 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   6204 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   6205 	    tlp_mediastatus);
   6206 
   6207 	/*
   6208 	 * The RS7112 reports a PHY at 0 (possibly HomePNA?)
   6209 	 * and 1 (ethernet). We attach ethernet only.
   6210 	 */
   6211 	mii_attach(sc->sc_dev, &sc->sc_mii, 0xffffffff, 1,
   6212 	    MII_OFFSET_ANY, 0);
   6213 
   6214 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   6215 		ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
   6216 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
   6217 	} else {
   6218 		sc->sc_flags |= TULIPF_HAS_MII;
   6219 		sc->sc_tick = tlp_mii_tick;
   6220 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   6221 	}
   6222 }
   6223