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