Home | History | Annotate | Line # | Download | only in ic
tulip.c revision 1.11
      1  1.11  thorpej /*	$NetBSD: tulip.c,v 1.11 1999/09/17 21:57:36 thorpej Exp $	*/
      2   1.1  thorpej 
      3   1.1  thorpej /*-
      4   1.1  thorpej  * Copyright (c) 1998, 1999 The NetBSD Foundation, Inc.
      5   1.1  thorpej  * All rights reserved.
      6   1.1  thorpej  *
      7   1.1  thorpej  * This code is derived from software contributed to The NetBSD Foundation
      8   1.1  thorpej  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
      9   1.1  thorpej  * NASA Ames Research Center.
     10   1.1  thorpej  *
     11   1.1  thorpej  * Redistribution and use in source and binary forms, with or without
     12   1.1  thorpej  * modification, are permitted provided that the following conditions
     13   1.1  thorpej  * are met:
     14   1.1  thorpej  * 1. Redistributions of source code must retain the above copyright
     15   1.1  thorpej  *    notice, this list of conditions and the following disclaimer.
     16   1.1  thorpej  * 2. Redistributions in binary form must reproduce the above copyright
     17   1.1  thorpej  *    notice, this list of conditions and the following disclaimer in the
     18   1.1  thorpej  *    documentation and/or other materials provided with the distribution.
     19   1.1  thorpej  * 3. All advertising materials mentioning features or use of this software
     20   1.1  thorpej  *    must display the following acknowledgement:
     21   1.1  thorpej  *	This product includes software developed by the NetBSD
     22   1.1  thorpej  *	Foundation, Inc. and its contributors.
     23   1.1  thorpej  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24   1.1  thorpej  *    contributors may be used to endorse or promote products derived
     25   1.1  thorpej  *    from this software without specific prior written permission.
     26   1.1  thorpej  *
     27   1.1  thorpej  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28   1.1  thorpej  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29   1.1  thorpej  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30   1.1  thorpej  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31   1.1  thorpej  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32   1.1  thorpej  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33   1.1  thorpej  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34   1.1  thorpej  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35   1.1  thorpej  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36   1.1  thorpej  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37   1.1  thorpej  * POSSIBILITY OF SUCH DAMAGE.
     38   1.1  thorpej  */
     39   1.1  thorpej 
     40   1.1  thorpej /*
     41   1.1  thorpej  * Device driver for the Digital Semiconductor ``Tulip'' (21x4x)
     42   1.1  thorpej  * Ethernet controller family, and a variety of clone chips.
     43   1.1  thorpej  */
     44   1.1  thorpej 
     45   1.1  thorpej #include "opt_inet.h"
     46   1.1  thorpej #include "opt_ns.h"
     47   1.1  thorpej #include "bpfilter.h"
     48   1.1  thorpej 
     49   1.1  thorpej #include <sys/param.h>
     50   1.1  thorpej #include <sys/systm.h>
     51   1.1  thorpej #include <sys/mbuf.h>
     52   1.1  thorpej #include <sys/malloc.h>
     53   1.1  thorpej #include <sys/kernel.h>
     54   1.1  thorpej #include <sys/socket.h>
     55   1.1  thorpej #include <sys/ioctl.h>
     56   1.1  thorpej #include <sys/errno.h>
     57   1.1  thorpej #include <sys/device.h>
     58   1.1  thorpej 
     59   1.1  thorpej #include <vm/vm.h>		/* for PAGE_SIZE */
     60   1.1  thorpej 
     61   1.1  thorpej #include <net/if.h>
     62   1.1  thorpej #include <net/if_dl.h>
     63   1.1  thorpej #include <net/if_media.h>
     64   1.1  thorpej #include <net/if_ether.h>
     65   1.1  thorpej 
     66   1.1  thorpej #if NBPFILTER > 0
     67   1.1  thorpej #include <net/bpf.h>
     68   1.1  thorpej #endif
     69   1.1  thorpej 
     70   1.1  thorpej #ifdef INET
     71   1.1  thorpej #include <netinet/in.h>
     72   1.1  thorpej #include <netinet/if_inarp.h>
     73   1.1  thorpej #endif
     74   1.1  thorpej 
     75   1.1  thorpej #ifdef NS
     76   1.1  thorpej #include <netns/ns.h>
     77   1.1  thorpej #include <netns/ns_if.h>
     78   1.1  thorpej #endif
     79   1.1  thorpej 
     80   1.1  thorpej #include <machine/bus.h>
     81   1.1  thorpej #include <machine/intr.h>
     82   1.1  thorpej 
     83   1.1  thorpej #include <dev/mii/mii.h>
     84   1.1  thorpej #include <dev/mii/miivar.h>
     85   1.1  thorpej 
     86   1.1  thorpej #include <dev/ic/tulipreg.h>
     87   1.1  thorpej #include <dev/ic/tulipvar.h>
     88   1.1  thorpej 
     89   1.1  thorpej /*
     90   1.1  thorpej  * The following tables compute the transmit threshold mode.  We start
     91   1.1  thorpej  * at index 0.  When ever we get a transmit underrun, we increment our
     92   1.1  thorpej  * index, falling back if we encounter the NULL terminator.
     93   1.1  thorpej  *
     94   1.1  thorpej  * Note: Store and forward mode is only available on the 100mbps chips
     95   1.1  thorpej  * (21140 and higher).
     96   1.1  thorpej  */
     97   1.1  thorpej const struct tulip_txthresh_tab tlp_10_txthresh_tab[] = {
     98   1.1  thorpej 	{ OPMODE_TR_72,		"72 bytes" },
     99   1.1  thorpej 	{ OPMODE_TR_96,		"96 bytes" },
    100   1.1  thorpej 	{ OPMODE_TR_128,	"128 bytes" },
    101   1.1  thorpej 	{ OPMODE_TR_160,	"160 bytes" },
    102   1.1  thorpej 	{ 0,			NULL },
    103   1.1  thorpej };
    104   1.1  thorpej 
    105   1.1  thorpej const struct tulip_txthresh_tab tlp_10_100_txthresh_tab[] = {
    106   1.1  thorpej 	{ OPMODE_TR_72,		"72/128 bytes" },
    107   1.1  thorpej 	{ OPMODE_TR_96,		"96/256 bytes" },
    108   1.1  thorpej 	{ OPMODE_TR_128,	"128/512 bytes" },
    109   1.1  thorpej 	{ OPMODE_TR_160,	"160/1024 bytes" },
    110   1.1  thorpej 	{ OPMODE_SF,		"store and forward mode" },
    111   1.1  thorpej 	{ 0,			NULL },
    112   1.1  thorpej };
    113   1.1  thorpej 
    114   1.3  thorpej #define	TXTH_72		0
    115   1.3  thorpej #define	TXTH_96		1
    116   1.3  thorpej #define	TXTH_128	2
    117   1.3  thorpej #define	TXTH_160	3
    118   1.3  thorpej #define	TXTH_SF		4
    119   1.3  thorpej 
    120   1.5  thorpej /*
    121   1.5  thorpej  * The Winbond 89C840F does transmit threshold control totally
    122   1.5  thorpej  * differently.  It simply has a 7-bit field which indicates
    123   1.5  thorpej  * the threshold:
    124   1.5  thorpej  *
    125   1.5  thorpej  *	txth = ((OPMODE & OPMODE_WINB_TTH) >> OPMODE_WINB_TTH_SHIFT) * 16;
    126   1.5  thorpej  *
    127   1.5  thorpej  * However, we just do Store-and-Forward mode on these chips, since
    128   1.5  thorpej  * the DMA engines seem to be flaky.
    129   1.5  thorpej  */
    130   1.5  thorpej const struct tulip_txthresh_tab tlp_winb_txthresh_tab[] = {
    131   1.5  thorpej 	{ 0,			"store and forward mode" },
    132   1.5  thorpej 	{ 0,			NULL },
    133   1.5  thorpej };
    134   1.5  thorpej 
    135   1.5  thorpej #define	TXTH_WINB_SF	0
    136   1.5  thorpej 
    137   1.1  thorpej void	tlp_start __P((struct ifnet *));
    138   1.1  thorpej void	tlp_watchdog __P((struct ifnet *));
    139   1.1  thorpej int	tlp_ioctl __P((struct ifnet *, u_long, caddr_t));
    140   1.1  thorpej 
    141   1.1  thorpej void	tlp_shutdown __P((void *));
    142   1.1  thorpej 
    143   1.1  thorpej void	tlp_reset __P((struct tulip_softc *));
    144   1.1  thorpej int	tlp_init __P((struct tulip_softc *));
    145   1.1  thorpej void	tlp_rxdrain __P((struct tulip_softc *));
    146   1.1  thorpej void	tlp_stop __P((struct tulip_softc *, int));
    147   1.1  thorpej int	tlp_add_rxbuf __P((struct tulip_softc *, int));
    148   1.1  thorpej void	tlp_idle __P((struct tulip_softc *, u_int32_t));
    149   1.1  thorpej void	tlp_srom_idle __P((struct tulip_softc *));
    150   1.1  thorpej 
    151   1.1  thorpej void	tlp_filter_setup __P((struct tulip_softc *));
    152   1.1  thorpej void	tlp_winb_filter_setup __P((struct tulip_softc *));
    153   1.1  thorpej 
    154   1.1  thorpej void	tlp_rxintr __P((struct tulip_softc *));
    155   1.1  thorpej void	tlp_txintr __P((struct tulip_softc *));
    156   1.1  thorpej 
    157   1.1  thorpej void	tlp_mii_tick __P((void *));
    158   1.1  thorpej void	tlp_mii_statchg __P((struct device *));
    159   1.5  thorpej void	tlp_winb_mii_statchg __P((struct device *));
    160   1.1  thorpej 
    161   1.1  thorpej void	tlp_mii_getmedia __P((struct tulip_softc *, struct ifmediareq *));
    162   1.1  thorpej int	tlp_mii_setmedia __P((struct tulip_softc *));
    163   1.1  thorpej 
    164   1.1  thorpej void	tlp_sio_mii_sync __P((struct tulip_softc *));
    165   1.1  thorpej void	tlp_sio_mii_sendbits __P((struct tulip_softc *, u_int32_t, int));
    166   1.1  thorpej int	tlp_sio_mii_readreg __P((struct device *, int, int));
    167   1.1  thorpej void	tlp_sio_mii_writereg __P((struct device *, int, int, int));
    168   1.1  thorpej 
    169   1.1  thorpej int	tlp_pnic_mii_readreg __P((struct device *, int, int));
    170   1.1  thorpej void	tlp_pnic_mii_writereg __P((struct device *, int, int, int));
    171   1.1  thorpej 
    172   1.1  thorpej u_int32_t tlp_crc32 __P((const u_int8_t *, size_t));
    173   1.1  thorpej #define	tlp_mchash(addr)	(tlp_crc32((addr), ETHER_ADDR_LEN) &	\
    174   1.1  thorpej 				 (TULIP_MCHASHSIZE - 1))
    175   1.1  thorpej 
    176   1.1  thorpej #ifdef TLP_DEBUG
    177   1.5  thorpej #define	DPRINTF(sc, x)	if ((sc)->sc_ethercom.ec_if.if_flags & IFF_DEBUG) \
    178   1.5  thorpej 				printf x
    179   1.1  thorpej #else
    180   1.5  thorpej #define	DPRINTF(sc, x)	/* nothing */
    181   1.1  thorpej #endif
    182   1.1  thorpej 
    183   1.1  thorpej /*
    184   1.1  thorpej  * tlp_attach:
    185   1.1  thorpej  *
    186   1.1  thorpej  *	Attach a Tulip interface to the system.
    187   1.1  thorpej  */
    188   1.1  thorpej void
    189   1.9  thorpej tlp_attach(sc, enaddr)
    190   1.1  thorpej 	struct tulip_softc *sc;
    191   1.1  thorpej 	const u_int8_t *enaddr;
    192   1.1  thorpej {
    193   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    194   1.1  thorpej 	int i, rseg, error;
    195   1.1  thorpej 	bus_dma_segment_t seg;
    196   1.1  thorpej 
    197   1.1  thorpej 	/*
    198   1.1  thorpej 	 * NOTE: WE EXPECT THE FRONT-END TO INITIALIZE sc_regshift!
    199   1.1  thorpej 	 */
    200   1.1  thorpej 
    201   1.1  thorpej 	/*
    202   1.1  thorpej 	 * Setup the transmit threshold table.
    203   1.1  thorpej 	 */
    204   1.1  thorpej 	switch (sc->sc_chip) {
    205   1.1  thorpej 	case TULIP_CHIP_DE425:
    206   1.1  thorpej 	case TULIP_CHIP_21040:
    207   1.1  thorpej 	case TULIP_CHIP_21041:
    208   1.1  thorpej 		sc->sc_txth = tlp_10_txthresh_tab;
    209   1.1  thorpej 		break;
    210   1.1  thorpej 
    211   1.1  thorpej 	default:
    212   1.1  thorpej 		sc->sc_txth = tlp_10_100_txthresh_tab;
    213   1.1  thorpej 		break;
    214   1.1  thorpej 	}
    215   1.1  thorpej 
    216   1.1  thorpej 	/*
    217   1.1  thorpej 	 * Setup the filter setup function.
    218   1.1  thorpej 	 */
    219   1.1  thorpej 	switch (sc->sc_chip) {
    220   1.1  thorpej 	case TULIP_CHIP_WB89C840F:
    221   1.1  thorpej 		sc->sc_filter_setup = tlp_winb_filter_setup;
    222   1.1  thorpej 		break;
    223   1.1  thorpej 
    224   1.1  thorpej 	default:
    225   1.1  thorpej 		sc->sc_filter_setup = tlp_filter_setup;
    226   1.1  thorpej 		break;
    227   1.1  thorpej 	}
    228   1.1  thorpej 
    229   1.2  thorpej 	/*
    230   1.5  thorpej 	 * Set up the media status change function.
    231   1.5  thorpej 	 */
    232   1.5  thorpej 	switch (sc->sc_chip) {
    233   1.5  thorpej 	case TULIP_CHIP_WB89C840F:
    234   1.5  thorpej 		sc->sc_statchg = tlp_winb_mii_statchg;
    235   1.5  thorpej 		break;
    236   1.5  thorpej 
    237   1.5  thorpej 	default:
    238   1.7  thorpej 		/*
    239   1.7  thorpej 		 * We may override this if we have special media
    240   1.7  thorpej 		 * handling requirements (e.g. flipping GPIO pins).
    241   1.7  thorpej 		 *
    242   1.7  thorpej 		 * The pure-MII statchg function covers the basics.
    243   1.7  thorpej 		 */
    244   1.5  thorpej 		sc->sc_statchg = tlp_mii_statchg;
    245   1.5  thorpej 		break;
    246   1.5  thorpej 	}
    247   1.5  thorpej 
    248   1.5  thorpej 	/*
    249   1.2  thorpej 	 * Set up various chip-specific quirks.
    250   1.2  thorpej 	 */
    251   1.2  thorpej 	switch (sc->sc_chip) {
    252   1.3  thorpej 	case TULIP_CHIP_82C168:
    253   1.3  thorpej 	case TULIP_CHIP_82C169:
    254   1.3  thorpej 		/*
    255   1.3  thorpej 		 * These chips seem to have busted DMA engines; just put them
    256   1.3  thorpej 		 * in Store-and-Forward mode from the get-go.
    257   1.3  thorpej 		 */
    258   1.3  thorpej 		sc->sc_txthresh = TXTH_SF;
    259   1.3  thorpej 		break;
    260   1.3  thorpej 
    261   1.2  thorpej 	case TULIP_CHIP_WB89C840F:
    262   1.2  thorpej 		sc->sc_flags |= TULIPF_IC_FS;
    263   1.2  thorpej 		break;
    264   1.2  thorpej 
    265   1.2  thorpej 	default:
    266   1.2  thorpej 		/* Nothing. */
    267   1.2  thorpej 	}
    268   1.2  thorpej 
    269   1.1  thorpej 	SIMPLEQ_INIT(&sc->sc_txfreeq);
    270   1.1  thorpej 	SIMPLEQ_INIT(&sc->sc_txdirtyq);
    271   1.1  thorpej 
    272   1.1  thorpej 	/*
    273   1.1  thorpej 	 * Allocate the control data structures, and create and load the
    274   1.1  thorpej 	 * DMA map for it.
    275   1.1  thorpej 	 */
    276   1.1  thorpej 	if ((error = bus_dmamem_alloc(sc->sc_dmat,
    277   1.1  thorpej 	    sizeof(struct tulip_control_data), PAGE_SIZE, 0, &seg, 1, &rseg,
    278   1.1  thorpej 	    0)) != 0) {
    279   1.1  thorpej 		printf("%s: unable to allocate control data, error = %d\n",
    280   1.1  thorpej 		    sc->sc_dev.dv_xname, error);
    281   1.1  thorpej 		goto fail_0;
    282   1.1  thorpej 	}
    283   1.1  thorpej 
    284   1.1  thorpej 	if ((error = bus_dmamem_map(sc->sc_dmat, &seg, rseg,
    285   1.1  thorpej 	    sizeof(struct tulip_control_data), (caddr_t *)&sc->sc_control_data,
    286   1.1  thorpej 	    BUS_DMA_COHERENT)) != 0) {
    287   1.1  thorpej 		printf("%s: unable to map control data, error = %d\n",
    288   1.1  thorpej 		    sc->sc_dev.dv_xname, error);
    289   1.1  thorpej 		goto fail_1;
    290   1.1  thorpej 	}
    291   1.1  thorpej 
    292   1.1  thorpej 	if ((error = bus_dmamap_create(sc->sc_dmat,
    293   1.1  thorpej 	    sizeof(struct tulip_control_data), 1,
    294   1.1  thorpej 	    sizeof(struct tulip_control_data), 0, 0, &sc->sc_cddmamap)) != 0) {
    295   1.1  thorpej 		printf("%s: unable to create control data DMA map, "
    296   1.1  thorpej 		    "error = %d\n", sc->sc_dev.dv_xname, error);
    297   1.1  thorpej 		goto fail_2;
    298   1.1  thorpej 	}
    299   1.1  thorpej 
    300   1.1  thorpej 	if ((error = bus_dmamap_load(sc->sc_dmat, sc->sc_cddmamap,
    301   1.1  thorpej 	    sc->sc_control_data, sizeof(struct tulip_control_data), NULL,
    302   1.1  thorpej 	    0)) != 0) {
    303   1.1  thorpej 		printf("%s: unable to load control data DMA map, error = %d\n",
    304   1.1  thorpej 		    sc->sc_dev.dv_xname, error);
    305   1.1  thorpej 		goto fail_3;
    306   1.1  thorpej 	}
    307   1.1  thorpej 
    308   1.1  thorpej 	/*
    309   1.1  thorpej 	 * Create the transmit buffer DMA maps.
    310   1.1  thorpej 	 */
    311   1.1  thorpej 	for (i = 0; i < TULIP_TXQUEUELEN; i++) {
    312   1.1  thorpej 		if ((error = bus_dmamap_create(sc->sc_dmat, MCLBYTES,
    313   1.1  thorpej 		    TULIP_NTXSEGS, MCLBYTES, 0, 0,
    314   1.1  thorpej 		    &sc->sc_txsoft[i].txs_dmamap)) != 0) {
    315   1.1  thorpej 			printf("%s: unable to create tx DMA map %d, "
    316   1.1  thorpej 			    "error = %d\n", sc->sc_dev.dv_xname, i, error);
    317   1.1  thorpej 			goto fail_4;
    318   1.1  thorpej 		}
    319   1.1  thorpej 	}
    320   1.1  thorpej 
    321   1.1  thorpej 	/*
    322   1.1  thorpej 	 * Create the recieve buffer DMA maps.
    323   1.1  thorpej 	 */
    324   1.1  thorpej 	for (i = 0; i < TULIP_NRXDESC; i++) {
    325   1.1  thorpej 		if ((error = bus_dmamap_create(sc->sc_dmat, MCLBYTES, 1,
    326   1.1  thorpej 		    MCLBYTES, 0, 0, &sc->sc_rxsoft[i].rxs_dmamap)) != 0) {
    327   1.1  thorpej 			printf("%s: unable to create rx DMA map %d, "
    328   1.1  thorpej 			    "error = %d\n", sc->sc_dev.dv_xname, i, error);
    329   1.1  thorpej 			goto fail_5;
    330   1.1  thorpej 		}
    331   1.1  thorpej 		sc->sc_rxsoft[i].rxs_mbuf = NULL;
    332   1.1  thorpej 	}
    333   1.1  thorpej 
    334   1.1  thorpej 	/*
    335   1.1  thorpej 	 * Reset the chip to a known state.
    336   1.1  thorpej 	 */
    337   1.1  thorpej 	tlp_reset(sc);
    338   1.1  thorpej 
    339   1.1  thorpej 	/* Announce ourselves. */
    340   1.1  thorpej 	printf("%s: %s%sEthernet address %s\n", sc->sc_dev.dv_xname,
    341   1.9  thorpej 	    sc->sc_name[0] != '\0' ? sc->sc_name : "",
    342   1.9  thorpej 	    sc->sc_name[0] != '\0' ? ", " : "",
    343   1.1  thorpej 	    ether_sprintf(enaddr));
    344   1.1  thorpej 
    345   1.1  thorpej 	/*
    346   1.1  thorpej 	 * Initialize our media structures.  This may probe the MII, if
    347   1.1  thorpej 	 * present.
    348   1.1  thorpej 	 */
    349   1.1  thorpej 	(*sc->sc_mediasw->tmsw_init)(sc);
    350   1.1  thorpej 
    351   1.1  thorpej 	ifp = &sc->sc_ethercom.ec_if;
    352   1.1  thorpej 	strcpy(ifp->if_xname, sc->sc_dev.dv_xname);
    353   1.1  thorpej 	ifp->if_softc = sc;
    354   1.1  thorpej 	ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
    355   1.1  thorpej 	ifp->if_ioctl = tlp_ioctl;
    356   1.1  thorpej 	ifp->if_start = tlp_start;
    357   1.1  thorpej 	ifp->if_watchdog = tlp_watchdog;
    358   1.1  thorpej 
    359   1.1  thorpej 	/*
    360   1.1  thorpej 	 * Attach the interface.
    361   1.1  thorpej 	 */
    362   1.1  thorpej 	if_attach(ifp);
    363   1.1  thorpej 	ether_ifattach(ifp, enaddr);
    364   1.1  thorpej #if NBPFILTER > 0
    365   1.1  thorpej 	bpfattach(&sc->sc_ethercom.ec_if.if_bpf, ifp, DLT_EN10MB,
    366   1.1  thorpej 	    sizeof(struct ether_header));
    367   1.1  thorpej #endif
    368   1.1  thorpej 
    369   1.1  thorpej 	/*
    370   1.1  thorpej 	 * Make sure the interface is shutdown during reboot.
    371   1.1  thorpej 	 */
    372   1.1  thorpej 	sc->sc_sdhook = shutdownhook_establish(tlp_shutdown, sc);
    373   1.1  thorpej 	if (sc->sc_sdhook == NULL)
    374   1.1  thorpej 		printf("%s: WARNING: unable to establish shutdown hook\n",
    375   1.1  thorpej 		    sc->sc_dev.dv_xname);
    376   1.1  thorpej 	return;
    377   1.1  thorpej 
    378   1.1  thorpej 	/*
    379   1.1  thorpej 	 * Free any resources we've allocated during the failed attach
    380   1.1  thorpej 	 * attempt.  Do this in reverse order and fall through.
    381   1.1  thorpej 	 */
    382   1.1  thorpej  fail_5:
    383   1.1  thorpej 	for (i = 0; i < TULIP_NRXDESC; i++) {
    384   1.1  thorpej 		if (sc->sc_rxsoft[i].rxs_dmamap != NULL)
    385   1.1  thorpej 			bus_dmamap_destroy(sc->sc_dmat,
    386   1.1  thorpej 			    sc->sc_rxsoft[i].rxs_dmamap);
    387   1.1  thorpej 	}
    388   1.1  thorpej  fail_4:
    389   1.1  thorpej 	for (i = 0; i < TULIP_TXQUEUELEN; i++) {
    390   1.1  thorpej 		if (sc->sc_txsoft[i].txs_dmamap != NULL)
    391   1.1  thorpej 			bus_dmamap_destroy(sc->sc_dmat,
    392   1.1  thorpej 			    sc->sc_txsoft[i].txs_dmamap);
    393   1.1  thorpej 	}
    394   1.1  thorpej 	bus_dmamap_unload(sc->sc_dmat, sc->sc_cddmamap);
    395   1.1  thorpej  fail_3:
    396   1.1  thorpej 	bus_dmamap_destroy(sc->sc_dmat, sc->sc_cddmamap);
    397   1.1  thorpej  fail_2:
    398   1.1  thorpej 	bus_dmamem_unmap(sc->sc_dmat, (caddr_t)sc->sc_control_data,
    399   1.1  thorpej 	    sizeof(struct tulip_control_data));
    400   1.1  thorpej  fail_1:
    401   1.1  thorpej 	bus_dmamem_free(sc->sc_dmat, &seg, rseg);
    402   1.1  thorpej  fail_0:
    403   1.1  thorpej 	return;
    404   1.1  thorpej }
    405   1.1  thorpej 
    406   1.1  thorpej /*
    407   1.1  thorpej  * tlp_shutdown:
    408   1.1  thorpej  *
    409   1.1  thorpej  *	Make sure the interface is stopped at reboot time.
    410   1.1  thorpej  */
    411   1.1  thorpej void
    412   1.1  thorpej tlp_shutdown(arg)
    413   1.1  thorpej 	void *arg;
    414   1.1  thorpej {
    415   1.1  thorpej 	struct tulip_softc *sc = arg;
    416   1.1  thorpej 
    417   1.1  thorpej 	tlp_stop(sc, 1);
    418   1.1  thorpej }
    419   1.1  thorpej 
    420   1.1  thorpej /*
    421   1.1  thorpej  * tlp_start:		[ifnet interface function]
    422   1.1  thorpej  *
    423   1.1  thorpej  *	Start packet transmission on the interface.
    424   1.1  thorpej  */
    425   1.1  thorpej void
    426   1.1  thorpej tlp_start(ifp)
    427   1.1  thorpej 	struct ifnet *ifp;
    428   1.1  thorpej {
    429   1.1  thorpej 	struct tulip_softc *sc = ifp->if_softc;
    430   1.1  thorpej 	struct mbuf *m0, *m;
    431   1.2  thorpej 	struct tulip_txsoft *txs, *last_txs;
    432   1.1  thorpej 	bus_dmamap_t dmamap;
    433   1.1  thorpej 	int error, firsttx, nexttx, lasttx, ofree, seg;
    434   1.1  thorpej 
    435   1.5  thorpej 	DPRINTF(sc, ("%s: tlp_start: sc_flags 0x%08x, if_flags 0x%08x\n",
    436   1.1  thorpej 	    sc->sc_dev.dv_xname, sc->sc_flags, ifp->if_flags));
    437   1.1  thorpej 
    438   1.1  thorpej 	/*
    439   1.1  thorpej 	 * If we want a filter setup, it means no more descriptors were
    440   1.1  thorpej 	 * available for the setup routine.  Let it get a chance to wedge
    441   1.1  thorpej 	 * itself into the ring.
    442   1.1  thorpej 	 */
    443   1.1  thorpej 	if (sc->sc_flags & TULIPF_WANT_SETUP)
    444   1.1  thorpej 		ifp->if_flags |= IFF_OACTIVE;
    445   1.1  thorpej 
    446   1.1  thorpej 	if ((ifp->if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING)
    447   1.1  thorpej 		return;
    448   1.1  thorpej 
    449   1.1  thorpej 	/*
    450   1.1  thorpej 	 * Remember the previous number of free descriptors and
    451   1.1  thorpej 	 * the first descriptor we'll use.
    452   1.1  thorpej 	 */
    453   1.1  thorpej 	ofree = sc->sc_txfree;
    454   1.1  thorpej 	firsttx = sc->sc_txnext;
    455   1.1  thorpej 
    456   1.5  thorpej 	DPRINTF(sc, ("%s: tlp_start: txfree %d, txnext %d\n",
    457   1.1  thorpej 	    sc->sc_dev.dv_xname, ofree, firsttx));
    458   1.1  thorpej 
    459   1.1  thorpej 	/*
    460   1.1  thorpej 	 * Loop through the send queue, setting up transmit descriptors
    461   1.1  thorpej 	 * until we drain the queue, or use up all available transmit
    462   1.1  thorpej 	 * descriptors.
    463   1.1  thorpej 	 */
    464   1.1  thorpej 	while ((txs = SIMPLEQ_FIRST(&sc->sc_txfreeq)) != NULL &&
    465   1.1  thorpej 	       sc->sc_txfree != 0) {
    466   1.1  thorpej 		/*
    467   1.1  thorpej 		 * Grab a packet off the queue.
    468   1.1  thorpej 		 */
    469   1.1  thorpej 		IF_DEQUEUE(&ifp->if_snd, m0);
    470   1.1  thorpej 		if (m0 == NULL)
    471   1.1  thorpej 			break;
    472   1.1  thorpej 
    473   1.1  thorpej 		dmamap = txs->txs_dmamap;
    474   1.1  thorpej 
    475   1.1  thorpej 		/*
    476   1.1  thorpej 		 * Load the DMA map.  If this fails, the packet either
    477   1.1  thorpej 		 * didn't fit in the alloted number of segments, or we were
    478   1.1  thorpej 		 * short on resources.  In this case, we'll copy and try
    479   1.1  thorpej 		 * again.
    480   1.1  thorpej 		 */
    481   1.1  thorpej 		if (bus_dmamap_load_mbuf(sc->sc_dmat, dmamap, m0,
    482   1.1  thorpej 		    BUS_DMA_NOWAIT) != 0) {
    483   1.1  thorpej 			MGETHDR(m, M_DONTWAIT, MT_DATA);
    484   1.1  thorpej 			if (m == NULL) {
    485   1.1  thorpej 				printf("%s: unable to allocate Tx mbuf\n",
    486   1.1  thorpej 				    sc->sc_dev.dv_xname);
    487   1.1  thorpej 				IF_PREPEND(&ifp->if_snd, m0);
    488   1.1  thorpej 				break;
    489   1.1  thorpej 			}
    490   1.1  thorpej 			if (m0->m_pkthdr.len > MHLEN) {
    491   1.1  thorpej 				MCLGET(m, M_DONTWAIT);
    492   1.1  thorpej 				if ((m->m_flags & M_EXT) == 0) {
    493   1.1  thorpej 					printf("%s: unable to allocate Tx "
    494   1.1  thorpej 					    "cluster\n", sc->sc_dev.dv_xname);
    495   1.1  thorpej 					m_freem(m);
    496   1.1  thorpej 					IF_PREPEND(&ifp->if_snd, m0);
    497   1.1  thorpej 					break;
    498   1.1  thorpej 				}
    499   1.1  thorpej 			}
    500   1.1  thorpej 			m_copydata(m0, 0, m0->m_pkthdr.len, mtod(m, caddr_t));
    501   1.1  thorpej 			m->m_pkthdr.len = m->m_len = m0->m_pkthdr.len;
    502   1.1  thorpej 			m_freem(m0);
    503   1.1  thorpej 			m0 = m;
    504   1.1  thorpej 			error = bus_dmamap_load_mbuf(sc->sc_dmat, dmamap,
    505   1.1  thorpej 			    m0, BUS_DMA_NOWAIT);
    506   1.1  thorpej 			if (error) {
    507   1.1  thorpej 				printf("%s: unable to load Tx buffer, "
    508   1.1  thorpej 				    "error = %d\n", sc->sc_dev.dv_xname, error);
    509   1.1  thorpej 				IF_PREPEND(&ifp->if_snd, m0);
    510   1.1  thorpej 				break;
    511   1.1  thorpej 			}
    512   1.1  thorpej 		}
    513   1.1  thorpej 
    514   1.1  thorpej 		/*
    515   1.1  thorpej 		 * Ensure we have enough descriptors free to describe
    516   1.1  thorpej 		 * the packet.
    517   1.1  thorpej 		 */
    518   1.1  thorpej 		if (dmamap->dm_nsegs > sc->sc_txfree) {
    519   1.1  thorpej 			/*
    520   1.1  thorpej 			 * Not enough free descriptors to transmit this
    521   1.1  thorpej 			 * packet.  We haven't committed to anything yet,
    522   1.1  thorpej 			 * so just unload the DMA map, put the packet
    523   1.1  thorpej 			 * back on the queue, and punt.  Notify the upper
    524   1.1  thorpej 			 * layer that there are no more slots left.
    525   1.1  thorpej 			 *
    526   1.1  thorpej 			 * XXX We could allocate an mbuf and copy, but
    527   1.1  thorpej 			 * XXX it is worth it?
    528   1.1  thorpej 			 */
    529   1.1  thorpej 			ifp->if_flags |= IFF_OACTIVE;
    530   1.1  thorpej 			bus_dmamap_unload(sc->sc_dmat, dmamap);
    531   1.1  thorpej 			IF_PREPEND(&ifp->if_snd, m0);
    532   1.1  thorpej 			break;
    533   1.1  thorpej 		}
    534   1.1  thorpej 
    535   1.1  thorpej 		/*
    536   1.1  thorpej 		 * WE ARE NOW COMMITTED TO TRANSMITTING THE PACKET.
    537   1.1  thorpej 		 */
    538   1.1  thorpej 
    539   1.1  thorpej 		/* Sync the DMA map. */
    540   1.1  thorpej 		bus_dmamap_sync(sc->sc_dmat, dmamap, 0, dmamap->dm_mapsize,
    541   1.1  thorpej 		    BUS_DMASYNC_PREWRITE);
    542   1.1  thorpej 
    543   1.1  thorpej 		/*
    544   1.1  thorpej 		 * Initialize the transmit descriptors.
    545   1.1  thorpej 		 */
    546   1.1  thorpej 		for (nexttx = sc->sc_txnext, seg = 0;
    547   1.1  thorpej 		     seg < dmamap->dm_nsegs;
    548   1.1  thorpej 		     seg++, nexttx = TULIP_NEXTTX(nexttx)) {
    549   1.1  thorpej 			/*
    550   1.1  thorpej 			 * If this is the first descriptor we're
    551   1.1  thorpej 			 * enqueueing, don't set the OWN bit just
    552   1.1  thorpej 			 * yet.  That could cause a race condition.
    553   1.1  thorpej 			 * We'll do it below.
    554   1.1  thorpej 			 */
    555   1.1  thorpej 			sc->sc_txdescs[nexttx].td_status =
    556   1.1  thorpej 			    (nexttx == firsttx) ? 0 : TDSTAT_OWN;
    557   1.1  thorpej 			sc->sc_txdescs[nexttx].td_bufaddr1 =
    558   1.1  thorpej 			    dmamap->dm_segs[seg].ds_addr;
    559   1.1  thorpej 			sc->sc_txdescs[nexttx].td_ctl =
    560   1.1  thorpej 			    (dmamap->dm_segs[seg].ds_len << TDCTL_SIZE1_SHIFT) |
    561   1.1  thorpej 			    TDCTL_CH;
    562   1.1  thorpej 			lasttx = nexttx;
    563   1.1  thorpej 		}
    564   1.1  thorpej 
    565   1.1  thorpej 		/* Set `first segment' and `last segment' appropriately. */
    566   1.1  thorpej 		sc->sc_txdescs[sc->sc_txnext].td_ctl |= TDCTL_Tx_FS;
    567   1.1  thorpej 		sc->sc_txdescs[lasttx].td_ctl |= TDCTL_Tx_LS;
    568   1.1  thorpej 
    569   1.1  thorpej #ifdef TLP_DEBUG
    570   1.5  thorpej 		if (ifp->if_flags & IFF_DEBUG) {
    571   1.5  thorpej 			printf("     txsoft %p trainsmit chain:\n", txs);
    572   1.5  thorpej 			for (seg = sc->sc_txnext;; seg = TULIP_NEXTTX(seg)) {
    573   1.5  thorpej 				printf("     descriptor %d:\n", seg);
    574   1.5  thorpej 				printf("       td_status:   0x%08x\n",
    575   1.5  thorpej 				    sc->sc_txdescs[seg].td_status);
    576   1.5  thorpej 				printf("       td_ctl:      0x%08x\n",
    577   1.5  thorpej 				    sc->sc_txdescs[seg].td_ctl);
    578   1.5  thorpej 				printf("       td_bufaddr1: 0x%08x\n",
    579   1.5  thorpej 				    sc->sc_txdescs[seg].td_bufaddr1);
    580   1.5  thorpej 				printf("       td_bufaddr2: 0x%08x\n",
    581   1.5  thorpej 				    sc->sc_txdescs[seg].td_bufaddr2);
    582   1.5  thorpej 				if (seg == lasttx)
    583   1.5  thorpej 					break;
    584   1.5  thorpej 			}
    585   1.1  thorpej 		}
    586   1.1  thorpej #endif
    587   1.1  thorpej 
    588   1.1  thorpej 		/* Sync the descriptors we're using. */
    589   1.1  thorpej 		TULIP_CDTXSYNC(sc, sc->sc_txnext, dmamap->dm_nsegs,
    590   1.1  thorpej 		    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
    591   1.1  thorpej 
    592   1.1  thorpej 		/*
    593   1.1  thorpej 		 * Store a pointer to the packet so we can free it later,
    594   1.1  thorpej 		 * and remember what txdirty will be once the packet is
    595   1.1  thorpej 		 * done.
    596   1.1  thorpej 		 */
    597   1.1  thorpej 		txs->txs_mbuf = m0;
    598   1.1  thorpej 		txs->txs_firstdesc = sc->sc_txnext;
    599   1.1  thorpej 		txs->txs_lastdesc = lasttx;
    600   1.1  thorpej 
    601   1.1  thorpej 		/* Advance the tx pointer. */
    602   1.1  thorpej 		sc->sc_txfree -= dmamap->dm_nsegs;
    603   1.1  thorpej 		sc->sc_txnext = nexttx;
    604   1.1  thorpej 
    605   1.1  thorpej 		SIMPLEQ_REMOVE_HEAD(&sc->sc_txfreeq, txs, txs_q);
    606   1.1  thorpej 		SIMPLEQ_INSERT_TAIL(&sc->sc_txdirtyq, txs, txs_q);
    607   1.1  thorpej 
    608   1.2  thorpej 		last_txs = txs;
    609   1.2  thorpej 
    610   1.1  thorpej #if NBPFILTER > 0
    611   1.1  thorpej 		/*
    612   1.1  thorpej 		 * Pass the packet to any BPF listeners.
    613   1.1  thorpej 		 */
    614   1.1  thorpej 		if (ifp->if_bpf)
    615   1.1  thorpej 			bpf_mtap(ifp->if_bpf, m0);
    616   1.1  thorpej #endif /* NBPFILTER > 0 */
    617   1.1  thorpej 	}
    618   1.1  thorpej 
    619   1.1  thorpej 	if (txs == NULL || sc->sc_txfree == 0) {
    620   1.1  thorpej 		/* No more slots left; notify upper layer. */
    621   1.1  thorpej 		ifp->if_flags |= IFF_OACTIVE;
    622   1.1  thorpej 	}
    623   1.1  thorpej 
    624   1.1  thorpej 	if (sc->sc_txfree != ofree) {
    625   1.5  thorpej 		DPRINTF(sc, ("%s: packets enqueued, IC on %d, OWN on %d\n",
    626   1.1  thorpej 		    sc->sc_dev.dv_xname, lasttx, firsttx));
    627   1.1  thorpej 		/*
    628   1.1  thorpej 		 * Cause a transmit interrupt to happen on the
    629   1.1  thorpej 		 * last packet we enqueued.
    630   1.1  thorpej 		 */
    631   1.1  thorpej 		sc->sc_txdescs[lasttx].td_ctl |= TDCTL_Tx_IC;
    632   1.1  thorpej 		TULIP_CDTXSYNC(sc, lasttx, 1,
    633   1.1  thorpej 		    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
    634   1.2  thorpej 
    635   1.2  thorpej 		/*
    636   1.2  thorpej 		 * Some clone chips want IC on the *first* segment in
    637   1.2  thorpej 		 * the packet.  Appease them.
    638   1.2  thorpej 		 */
    639   1.2  thorpej 		if ((sc->sc_flags & TULIPF_IC_FS) != 0 &&
    640   1.2  thorpej 		    last_txs->txs_firstdesc != lasttx) {
    641   1.2  thorpej 			sc->sc_txdescs[last_txs->txs_firstdesc].td_ctl |=
    642   1.2  thorpej 			    TDCTL_Tx_IC;
    643   1.2  thorpej 			TULIP_CDTXSYNC(sc, last_txs->txs_firstdesc, 1,
    644   1.2  thorpej 			    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
    645   1.2  thorpej 		}
    646   1.1  thorpej 
    647   1.1  thorpej 		/*
    648   1.1  thorpej 		 * The entire packet chain is set up.  Give the
    649   1.1  thorpej 		 * first descriptor to the chip now.
    650   1.1  thorpej 		 */
    651   1.1  thorpej 		sc->sc_txdescs[firsttx].td_status |= TDSTAT_OWN;
    652   1.1  thorpej 		TULIP_CDTXSYNC(sc, firsttx, 1,
    653   1.1  thorpej 		    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
    654   1.1  thorpej 
    655   1.1  thorpej 		/* Wake up the transmitter. */
    656   1.1  thorpej 		/* XXX USE AUTOPOLLING? */
    657   1.1  thorpej 		TULIP_WRITE(sc, CSR_TXPOLL, TXPOLL_TPD);
    658   1.1  thorpej 
    659   1.1  thorpej 		/* Set a watchdog timer in case the chip flakes out. */
    660   1.1  thorpej 		ifp->if_timer = 5;
    661   1.1  thorpej 	}
    662   1.1  thorpej }
    663   1.1  thorpej 
    664   1.1  thorpej /*
    665   1.1  thorpej  * tlp_watchdog:	[ifnet interface function]
    666   1.1  thorpej  *
    667   1.1  thorpej  *	Watchdog timer handler.
    668   1.1  thorpej  */
    669   1.1  thorpej void
    670   1.1  thorpej tlp_watchdog(ifp)
    671   1.1  thorpej 	struct ifnet *ifp;
    672   1.1  thorpej {
    673   1.1  thorpej 	struct tulip_softc *sc = ifp->if_softc;
    674   1.4  thorpej 	int doing_setup, doing_transmit;
    675   1.4  thorpej 
    676   1.4  thorpej 	doing_setup = (sc->sc_flags & TULIPF_DOING_SETUP);
    677   1.4  thorpej 	doing_transmit = (SIMPLEQ_FIRST(&sc->sc_txdirtyq) != NULL);
    678   1.4  thorpej 
    679   1.4  thorpej 	if (doing_setup && doing_transmit) {
    680   1.4  thorpej 		printf("%s: filter setup and transmit timeout\n",
    681   1.4  thorpej 		    sc->sc_dev.dv_xname);
    682   1.4  thorpej 		ifp->if_oerrors++;
    683   1.4  thorpej 	} else if (doing_transmit) {
    684   1.4  thorpej 		printf("%s: transmit timeout\n", sc->sc_dev.dv_xname);
    685   1.4  thorpej 		ifp->if_oerrors++;
    686   1.4  thorpej 	} else if (doing_setup)
    687   1.4  thorpej 		printf("%s: filter setup timeout\n", sc->sc_dev.dv_xname);
    688   1.4  thorpej 	else
    689   1.4  thorpej 		printf("%s: spurious watchdog timeout\n", sc->sc_dev.dv_xname);
    690   1.1  thorpej 
    691   1.1  thorpej 	(void) tlp_init(sc);
    692   1.1  thorpej 
    693   1.1  thorpej 	/* Try to get more packets going. */
    694   1.1  thorpej 	tlp_start(ifp);
    695   1.1  thorpej }
    696   1.1  thorpej 
    697   1.1  thorpej /*
    698   1.1  thorpej  * tlp_ioctl:		[ifnet interface function]
    699   1.1  thorpej  *
    700   1.1  thorpej  *	Handle control requests from the operator.
    701   1.1  thorpej  */
    702   1.1  thorpej int
    703   1.1  thorpej tlp_ioctl(ifp, cmd, data)
    704   1.1  thorpej 	struct ifnet *ifp;
    705   1.1  thorpej 	u_long cmd;
    706   1.1  thorpej 	caddr_t data;
    707   1.1  thorpej {
    708   1.1  thorpej 	struct tulip_softc *sc = ifp->if_softc;
    709   1.1  thorpej 	struct ifreq *ifr = (struct ifreq *)data;
    710   1.1  thorpej 	struct ifaddr *ifa = (struct ifaddr *)data;
    711   1.1  thorpej 	int s, error = 0;
    712   1.1  thorpej 
    713   1.1  thorpej 	s = splnet();
    714   1.1  thorpej 
    715   1.1  thorpej 	switch (cmd) {
    716   1.1  thorpej 	case SIOCSIFADDR:
    717   1.1  thorpej 		ifp->if_flags |= IFF_UP;
    718   1.1  thorpej 
    719   1.1  thorpej 		switch (ifa->ifa_addr->sa_family) {
    720   1.1  thorpej #ifdef INET
    721   1.1  thorpej 		case AF_INET:
    722   1.1  thorpej 			if ((error = tlp_init(sc)) != 0)
    723   1.1  thorpej 				break;
    724   1.1  thorpej 			arp_ifinit(ifp, ifa);
    725   1.1  thorpej 			break;
    726   1.1  thorpej #endif /* INET */
    727   1.1  thorpej #ifdef NS
    728   1.1  thorpej 		case AF_NS:
    729   1.1  thorpej 		    {
    730   1.1  thorpej 			struct ns_addr *ina = &IA_SNS(ifa)->sns_addr;
    731   1.1  thorpej 
    732   1.1  thorpej 			if (ns_nullhost(*ina))
    733   1.1  thorpej 				ina->x_host = *(union ns_host *)
    734   1.1  thorpej 				    LLADDR(ifp->if_sadl);
    735   1.1  thorpej 			else
    736   1.1  thorpej 				bcopy(ina->x_host.c_host, LLADDR(ifp->if_sadl),
    737   1.1  thorpej 				    ifp->if_addrlen);
    738   1.1  thorpej 			/* Set new address. */
    739   1.1  thorpej 			error = tlp_init(sc);
    740   1.1  thorpej 			break;
    741   1.1  thorpej 		    }
    742   1.1  thorpej #endif /* NS */
    743   1.1  thorpej 		default:
    744   1.1  thorpej 			error = tlp_init(sc);
    745   1.1  thorpej 			break;
    746   1.1  thorpej 		}
    747   1.1  thorpej 		break;
    748   1.1  thorpej 
    749   1.1  thorpej 	case SIOCSIFMTU:
    750   1.1  thorpej 		if (ifr->ifr_mtu > ETHERMTU)
    751   1.1  thorpej 			error = EINVAL;
    752   1.1  thorpej 		else
    753   1.1  thorpej 			ifp->if_mtu = ifr->ifr_mtu;
    754   1.1  thorpej 		break;
    755   1.1  thorpej 
    756   1.1  thorpej 	case SIOCSIFFLAGS:
    757   1.1  thorpej 		if ((ifp->if_flags & IFF_UP) == 0 &&
    758   1.1  thorpej 		    (ifp->if_flags & IFF_RUNNING) != 0) {
    759   1.1  thorpej 			/*
    760   1.1  thorpej 			 * If interface is marked down and it is running, then
    761   1.1  thorpej 			 * stop it.
    762   1.1  thorpej 			 */
    763   1.1  thorpej 			tlp_stop(sc, 1);
    764   1.1  thorpej 		} else if ((ifp->if_flags & IFF_UP) != 0 &&
    765   1.1  thorpej 			   (ifp->if_flags & IFF_RUNNING) == 0) {
    766   1.1  thorpej 			/*
    767   1.1  thorpej 			 * If interfase it marked up and it is stopped, then
    768   1.1  thorpej 			 * start it.
    769   1.1  thorpej 			 */
    770   1.1  thorpej 			error = tlp_init(sc);
    771   1.1  thorpej 		} else if ((ifp->if_flags & IFF_UP) != 0) {
    772   1.1  thorpej 			/*
    773   1.1  thorpej 			 * Reset the interface to pick up changes in any other
    774   1.1  thorpej 			 * flags that affect the hardware state.
    775   1.1  thorpej 			 */
    776   1.1  thorpej 			error = tlp_init(sc);
    777   1.1  thorpej 		}
    778   1.1  thorpej 		break;
    779   1.1  thorpej 
    780   1.1  thorpej 	case SIOCADDMULTI:
    781   1.1  thorpej 	case SIOCDELMULTI:
    782   1.1  thorpej 		error = (cmd == SIOCADDMULTI) ?
    783   1.1  thorpej 		    ether_addmulti(ifr, &sc->sc_ethercom) :
    784   1.1  thorpej 		    ether_delmulti(ifr, &sc->sc_ethercom);
    785   1.1  thorpej 
    786   1.1  thorpej 		if (error == ENETRESET) {
    787   1.1  thorpej 			/*
    788   1.1  thorpej 			 * Multicast list has changed.  Set the filter
    789   1.1  thorpej 			 * accordingly.
    790   1.1  thorpej 			 */
    791   1.1  thorpej 			(*sc->sc_filter_setup)(sc);
    792   1.1  thorpej 			error = 0;
    793   1.1  thorpej 		}
    794   1.1  thorpej 		break;
    795   1.1  thorpej 
    796   1.1  thorpej 	case SIOCSIFMEDIA:
    797   1.1  thorpej 	case SIOCGIFMEDIA:
    798   1.1  thorpej 		error = ifmedia_ioctl(ifp, ifr, &sc->sc_mii.mii_media, cmd);
    799   1.1  thorpej 		break;
    800   1.1  thorpej 
    801   1.1  thorpej 	default:
    802   1.1  thorpej 		error = EINVAL;
    803   1.1  thorpej 		break;
    804   1.1  thorpej 	}
    805   1.1  thorpej 
    806   1.1  thorpej 	/* Try to get more packets going. */
    807   1.1  thorpej 	tlp_start(ifp);
    808   1.1  thorpej 
    809   1.1  thorpej 	splx(s);
    810   1.1  thorpej 	return (error);
    811   1.1  thorpej }
    812   1.1  thorpej 
    813   1.1  thorpej /*
    814   1.1  thorpej  * tlp_intr:
    815   1.1  thorpej  *
    816   1.1  thorpej  *	Interrupt service routine.
    817   1.1  thorpej  */
    818   1.1  thorpej int
    819   1.1  thorpej tlp_intr(arg)
    820   1.1  thorpej 	void *arg;
    821   1.1  thorpej {
    822   1.1  thorpej 	struct tulip_softc *sc = arg;
    823   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    824   1.5  thorpej 	u_int32_t status, rxstatus, txstatus;
    825   1.1  thorpej 	int handled = 0, txthresh;
    826   1.1  thorpej 
    827   1.5  thorpej 	DPRINTF(sc, ("%s: tlp_intr\n", sc->sc_dev.dv_xname));
    828  1.11  thorpej 
    829  1.11  thorpej 	/*
    830  1.11  thorpej 	 * If the interface isn't running, the interrupt couldn't
    831  1.11  thorpej 	 * possibly have come from us.
    832  1.11  thorpej 	 */
    833  1.11  thorpej 	if ((ifp->if_flags & IFF_RUNNING) == 0)
    834  1.11  thorpej 		return (0);
    835   1.1  thorpej 
    836   1.1  thorpej 	for (;;) {
    837   1.1  thorpej 		status = TULIP_READ(sc, CSR_STATUS);
    838   1.1  thorpej 		if (status)
    839   1.1  thorpej 			TULIP_WRITE(sc, CSR_STATUS, status);
    840   1.1  thorpej 
    841   1.1  thorpej 		if ((status & sc->sc_inten) == 0)
    842   1.1  thorpej 			break;
    843   1.1  thorpej 
    844   1.1  thorpej 		handled = 1;
    845   1.1  thorpej 
    846   1.5  thorpej 		rxstatus = status & sc->sc_rxint_mask;
    847   1.5  thorpej 		txstatus = status & sc->sc_txint_mask;
    848   1.5  thorpej 
    849   1.5  thorpej 		if (rxstatus) {
    850   1.1  thorpej 			/* Grab new any new packets. */
    851   1.1  thorpej 			tlp_rxintr(sc);
    852   1.1  thorpej 
    853   1.5  thorpej 			if (rxstatus & STATUS_RWT)
    854   1.1  thorpej 				printf("%s: receive watchdog timeout\n",
    855   1.1  thorpej 				    sc->sc_dev.dv_xname);
    856   1.1  thorpej 
    857   1.5  thorpej 			if (rxstatus & STATUS_RU) {
    858   1.1  thorpej 				printf("%s: receive ring overrun\n",
    859   1.1  thorpej 				    sc->sc_dev.dv_xname);
    860   1.1  thorpej 				/* Get the receive process going again. */
    861   1.1  thorpej 				tlp_idle(sc, OPMODE_SR);
    862   1.1  thorpej 				TULIP_WRITE(sc, CSR_RXLIST,
    863   1.1  thorpej 				    TULIP_CDRXADDR(sc, sc->sc_rxptr));
    864   1.1  thorpej 				TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
    865   1.1  thorpej 				TULIP_WRITE(sc, CSR_RXPOLL, RXPOLL_RPD);
    866   1.1  thorpej 				break;
    867   1.1  thorpej 			}
    868   1.1  thorpej 		}
    869   1.1  thorpej 
    870   1.5  thorpej 		if (txstatus) {
    871   1.1  thorpej 			/* Sweep up transmit descriptors. */
    872   1.1  thorpej 			tlp_txintr(sc);
    873   1.1  thorpej 
    874   1.5  thorpej 			if (txstatus & STATUS_TJT)
    875   1.1  thorpej 				printf("%s: transmit jabber timeout\n",
    876   1.1  thorpej 				    sc->sc_dev.dv_xname);
    877   1.1  thorpej 
    878   1.5  thorpej 			if (txstatus & STATUS_UNF) {
    879   1.1  thorpej 				/*
    880   1.1  thorpej 				 * Increase our transmit threshold if
    881   1.1  thorpej 				 * another is available.
    882   1.1  thorpej 				 */
    883   1.1  thorpej 				txthresh = sc->sc_txthresh + 1;
    884   1.1  thorpej 				if (sc->sc_txth[txthresh].txth_name != NULL) {
    885   1.1  thorpej 					/* Idle the transmit process. */
    886   1.1  thorpej 					tlp_idle(sc, OPMODE_ST);
    887   1.1  thorpej 
    888   1.1  thorpej 					sc->sc_txthresh = txthresh;
    889   1.1  thorpej 					sc->sc_opmode &= ~(OPMODE_TR|OPMODE_SF);
    890   1.1  thorpej 					sc->sc_opmode |=
    891   1.1  thorpej 					    sc->sc_txth[txthresh].txth_opmode;
    892   1.1  thorpej 					printf("%s: transmit underrun; new "
    893   1.1  thorpej 					    "threshold: %s\n",
    894   1.1  thorpej 					    sc->sc_dev.dv_xname,
    895   1.1  thorpej 					    sc->sc_txth[txthresh].txth_name);
    896   1.1  thorpej 
    897   1.1  thorpej 					/*
    898   1.1  thorpej 					 * Set the new threshold and restart
    899   1.1  thorpej 					 * the transmit process.
    900   1.1  thorpej 					 */
    901   1.1  thorpej 					TULIP_WRITE(sc, CSR_OPMODE,
    902   1.1  thorpej 					    sc->sc_opmode);
    903   1.1  thorpej 				}
    904   1.1  thorpej 					/*
    905   1.1  thorpej 					 * XXX Log every Nth underrun from
    906   1.1  thorpej 					 * XXX now on?
    907   1.1  thorpej 					 */
    908   1.1  thorpej 			}
    909   1.1  thorpej 		}
    910   1.1  thorpej 
    911   1.1  thorpej 		if (status & (STATUS_TPS|STATUS_RPS)) {
    912   1.1  thorpej 			if (status & STATUS_TPS)
    913   1.1  thorpej 				printf("%s: transmit process stopped\n",
    914   1.1  thorpej 				    sc->sc_dev.dv_xname);
    915   1.1  thorpej 			if (status & STATUS_RPS)
    916   1.1  thorpej 				printf("%s: receive process stopped\n",
    917   1.1  thorpej 				    sc->sc_dev.dv_xname);
    918   1.1  thorpej 			(void) tlp_init(sc);
    919   1.1  thorpej 			break;
    920   1.1  thorpej 		}
    921   1.1  thorpej 
    922   1.1  thorpej 		if (status & STATUS_SE) {
    923   1.1  thorpej 			const char *str;
    924   1.1  thorpej 			switch (status & STATUS_EB) {
    925   1.1  thorpej 			case STATUS_EB_PARITY:
    926   1.1  thorpej 				str = "parity error";
    927   1.1  thorpej 				break;
    928   1.1  thorpej 
    929   1.1  thorpej 			case STATUS_EB_MABT:
    930   1.1  thorpej 				str = "master abort";
    931   1.1  thorpej 				break;
    932   1.1  thorpej 
    933   1.1  thorpej 			case STATUS_EB_TABT:
    934   1.1  thorpej 				str = "target abort";
    935   1.1  thorpej 				break;
    936   1.1  thorpej 
    937   1.1  thorpej 			default:
    938   1.1  thorpej 				str = "unknown error";
    939   1.1  thorpej 				break;
    940   1.1  thorpej 			}
    941   1.1  thorpej 			printf("%s: fatal system error: %s\n",
    942   1.1  thorpej 			    sc->sc_dev.dv_xname, str);
    943   1.1  thorpej 			(void) tlp_init(sc);
    944   1.1  thorpej 			break;
    945   1.1  thorpej 		}
    946   1.1  thorpej 
    947   1.1  thorpej 		/*
    948   1.1  thorpej 		 * Not handled:
    949   1.1  thorpej 		 *
    950   1.1  thorpej 		 *	Transmit buffer unavailable -- normal
    951   1.1  thorpej 		 *	condition, nothing to do, really.
    952   1.1  thorpej 		 *
    953   1.1  thorpej 		 *	General purpose timer experied -- we don't
    954   1.1  thorpej 		 *	use the general purpose timer.
    955   1.1  thorpej 		 *
    956   1.1  thorpej 		 *	Early receive interrupt -- not available on
    957   1.1  thorpej 		 *	all chips, we just use RI.  We also only
    958   1.1  thorpej 		 *	use single-segment receive DMA, so this
    959   1.1  thorpej 		 *	is mostly useless.
    960   1.1  thorpej 		 */
    961   1.1  thorpej 	}
    962   1.1  thorpej 
    963   1.1  thorpej 	/* Try to get more packets going. */
    964   1.1  thorpej 	tlp_start(ifp);
    965   1.1  thorpej 
    966   1.1  thorpej 	return (handled);
    967   1.1  thorpej }
    968   1.1  thorpej 
    969   1.1  thorpej /*
    970   1.1  thorpej  * tlp_rxintr:
    971   1.1  thorpej  *
    972   1.1  thorpej  *	Helper; handle receive interrupts.
    973   1.1  thorpej  */
    974   1.1  thorpej void
    975   1.1  thorpej tlp_rxintr(sc)
    976   1.1  thorpej 	struct tulip_softc *sc;
    977   1.1  thorpej {
    978   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    979   1.1  thorpej 	struct ether_header *eh;
    980   1.1  thorpej 	struct tulip_rxsoft *rxs;
    981   1.1  thorpej 	struct mbuf *m;
    982   1.1  thorpej 	u_int32_t rxstat;
    983   1.1  thorpej 	int i, len;
    984   1.1  thorpej 
    985   1.1  thorpej 	for (i = sc->sc_rxptr;; i = TULIP_NEXTRX(i)) {
    986   1.1  thorpej 		rxs = &sc->sc_rxsoft[i];
    987   1.1  thorpej 
    988   1.1  thorpej 		TULIP_CDRXSYNC(sc, i,
    989   1.1  thorpej 		    BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
    990   1.1  thorpej 
    991   1.1  thorpej 		rxstat = sc->sc_rxdescs[i].td_status;
    992   1.1  thorpej 
    993   1.1  thorpej 		if (rxstat & TDSTAT_OWN) {
    994   1.1  thorpej 			/*
    995   1.1  thorpej 			 * We have processed all of the receive buffers.
    996   1.1  thorpej 			 */
    997   1.1  thorpej 			break;
    998   1.1  thorpej 		}
    999   1.1  thorpej 
   1000   1.1  thorpej 		/*
   1001   1.1  thorpej 		 * Make sure the packet fit in one buffer.  This should
   1002   1.1  thorpej 		 * always be the case.  But the Lite-On PNIC, rev 33
   1003   1.1  thorpej 		 * has an awful receive engine bug, which may require
   1004   1.1  thorpej 		 * a very icky work-around.
   1005   1.1  thorpej 		 */
   1006   1.1  thorpej 		if ((rxstat & (TDSTAT_Rx_FS|TDSTAT_Rx_LS)) !=
   1007   1.1  thorpej 		    (TDSTAT_Rx_FS|TDSTAT_Rx_LS)) {
   1008   1.1  thorpej 			printf("%s: incoming packet spilled, resetting\n",
   1009   1.1  thorpej 			    sc->sc_dev.dv_xname);
   1010   1.1  thorpej 			(void) tlp_init(sc);
   1011   1.1  thorpej 			return;
   1012   1.1  thorpej 		}
   1013   1.1  thorpej 
   1014   1.1  thorpej 		/*
   1015   1.1  thorpej 		 * If any collisions were seen on the wire, count one.
   1016   1.1  thorpej 		 */
   1017   1.1  thorpej 		if (rxstat & TDSTAT_Rx_CS)
   1018   1.1  thorpej 			ifp->if_collisions++;
   1019   1.1  thorpej 
   1020   1.1  thorpej 		/*
   1021   1.1  thorpej 		 * If an error occured, update stats, clear the status
   1022   1.1  thorpej 		 * word, and leave the packet buffer in place.  It will
   1023   1.1  thorpej 		 * simply be reused the next time the ring comes around.
   1024   1.1  thorpej 		 */
   1025   1.1  thorpej 		if (rxstat & TDSTAT_ES) {
   1026   1.1  thorpej #define	PRINTERR(bit, str)						\
   1027   1.1  thorpej 			if (rxstat & (bit))				\
   1028   1.1  thorpej 				printf("%s: receive error: %s\n",	\
   1029   1.1  thorpej 				    sc->sc_dev.dv_xname, str)
   1030   1.1  thorpej 			ifp->if_ierrors++;
   1031   1.1  thorpej 			PRINTERR(TDSTAT_Rx_DE, "descriptor error");
   1032   1.1  thorpej 			PRINTERR(TDSTAT_Rx_RF, "runt frame");
   1033   1.1  thorpej 			PRINTERR(TDSTAT_Rx_TL, "frame too long");
   1034   1.1  thorpej 			PRINTERR(TDSTAT_Rx_RE, "MII error");
   1035   1.1  thorpej 			PRINTERR(TDSTAT_Rx_DB, "dribbling bit");
   1036   1.1  thorpej 			PRINTERR(TDSTAT_Rx_CE, "CRC error");
   1037   1.1  thorpej #undef PRINTERR
   1038   1.1  thorpej 			TULIP_INIT_RXDESC(sc, i);
   1039   1.1  thorpej 			continue;
   1040   1.1  thorpej 		}
   1041   1.1  thorpej 
   1042   1.1  thorpej 		bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1043   1.1  thorpej 		    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_POSTREAD);
   1044   1.1  thorpej 
   1045   1.1  thorpej 		/*
   1046   1.1  thorpej 		 * No errors; receive the packet.  Note the Tulip
   1047   1.1  thorpej 		 * includes the CRC with every packet; trim it.
   1048   1.1  thorpej 		 */
   1049   1.1  thorpej 		len = TDSTAT_Rx_LENGTH(rxstat) - ETHER_CRC_LEN;
   1050   1.1  thorpej 
   1051   1.1  thorpej #ifdef __NO_STRICT_ALIGNMENT
   1052   1.1  thorpej 		/*
   1053   1.1  thorpej 		 * Allocate a new mbuf cluster.  If that fails, we are
   1054   1.1  thorpej 		 * out of memory, and must drop the packet and recycle
   1055   1.1  thorpej 		 * the buffer that's already attached to this descriptor.
   1056   1.1  thorpej 		 */
   1057   1.1  thorpej 		m = rxs->rxs_mbuf;
   1058   1.1  thorpej 		if (tlp_add_rxbuf(sc, i) != 0) {
   1059   1.1  thorpej 			ifp->if_ierrors++;
   1060   1.1  thorpej 			TULIP_INIT_RXDESC(sc, i);
   1061   1.1  thorpej 			bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1062   1.1  thorpej 			    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
   1063   1.1  thorpej 			continue;
   1064   1.1  thorpej 		}
   1065   1.1  thorpej #else
   1066   1.1  thorpej 		/*
   1067   1.1  thorpej 		 * The Tulip's receive buffers must be 4-byte aligned.
   1068   1.1  thorpej 		 * But this means that the data after the Ethernet header
   1069   1.1  thorpej 		 * is misaligned.  We must allocate a new buffer and
   1070   1.1  thorpej 		 * copy the data, shifted forward 2 bytes.
   1071   1.1  thorpej 		 */
   1072   1.1  thorpej 		MGETHDR(m, M_DONTWAIT, MT_DATA);
   1073   1.1  thorpej 		if (m == NULL) {
   1074   1.1  thorpej  dropit:
   1075   1.1  thorpej 			ifp->if_ierrors++;
   1076   1.1  thorpej 			TULIP_INIT_RXDESC(sc, i);
   1077   1.1  thorpej 			bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1078   1.1  thorpej 			    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
   1079   1.1  thorpej 			continue;
   1080   1.1  thorpej 		}
   1081   1.1  thorpej 		if (len > (MHLEN - 2)) {
   1082   1.1  thorpej 			MCLGET(m, M_DONTWAIT);
   1083   1.1  thorpej 			if ((m->m_flags & M_EXT) == 0) {
   1084   1.1  thorpej 				m_freem(m);
   1085   1.1  thorpej 				goto dropit;
   1086   1.1  thorpej 			}
   1087   1.1  thorpej 		}
   1088   1.1  thorpej 		m->m_data += 2;
   1089   1.1  thorpej 
   1090   1.1  thorpej 		/*
   1091   1.1  thorpej 		 * Note that we use clusters for incoming frames, so the
   1092   1.1  thorpej 		 * buffer is virtually contiguous.
   1093   1.1  thorpej 		 */
   1094   1.1  thorpej 		memcpy(mtod(m, caddr_t), mtod(rxs->rxs_mbuf, caddr_t), len);
   1095   1.1  thorpej 
   1096   1.1  thorpej 		/* Allow the receive descriptor to continue using its mbuf. */
   1097   1.1  thorpej 		TULIP_INIT_RXDESC(sc, i);
   1098   1.1  thorpej 		bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1099   1.1  thorpej 		    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
   1100   1.1  thorpej #endif /* __NO_STRICT_ALIGNMENT */
   1101   1.1  thorpej 
   1102   1.1  thorpej 		ifp->if_ipackets++;
   1103   1.1  thorpej 		eh = mtod(m, struct ether_header *);
   1104   1.1  thorpej 		m->m_pkthdr.rcvif = ifp;
   1105   1.1  thorpej 		m->m_pkthdr.len = m->m_len = len;
   1106   1.1  thorpej 
   1107   1.1  thorpej #if NBPFILTER > 0
   1108   1.1  thorpej 		/*
   1109   1.1  thorpej 		 * Pass this up to any BPF listeners, but only
   1110   1.1  thorpej 		 * pass it up the stack if its for us.
   1111   1.1  thorpej 		 */
   1112   1.1  thorpej 		if (ifp->if_bpf)
   1113   1.1  thorpej 			bpf_mtap(ifp->if_bpf, m);
   1114   1.1  thorpej #endif /* NPBFILTER > 0 */
   1115   1.1  thorpej 
   1116   1.1  thorpej 		/*
   1117   1.1  thorpej 		 * This test is outside the NBPFILTER block because
   1118   1.1  thorpej 		 * on the 21140 we have to use Hash-Only mode due to
   1119   1.1  thorpej 		 * a bug in the filter logic.
   1120   1.1  thorpej 		 */
   1121   1.1  thorpej 		if ((ifp->if_flags & IFF_PROMISC) != 0 ||
   1122   1.1  thorpej 		    sc->sc_filtmode == TDCTL_Tx_FT_HASHONLY) {
   1123   1.1  thorpej 			if (memcmp(LLADDR(ifp->if_sadl), eh->ether_dhost,
   1124   1.1  thorpej 				 ETHER_ADDR_LEN) != 0 &&
   1125   1.1  thorpej 			    ETHER_IS_MULTICAST(eh->ether_dhost) == 0) {
   1126   1.1  thorpej 				m_freem(m);
   1127   1.1  thorpej 				continue;
   1128   1.1  thorpej 			}
   1129   1.1  thorpej 		}
   1130   1.1  thorpej 
   1131   1.1  thorpej 		/* Pass it on. */
   1132   1.1  thorpej 		(*ifp->if_input)(ifp, m);
   1133   1.1  thorpej 	}
   1134   1.1  thorpej 
   1135   1.1  thorpej 	/* Update the recieve pointer. */
   1136   1.1  thorpej 	sc->sc_rxptr = i;
   1137   1.1  thorpej }
   1138   1.1  thorpej 
   1139   1.1  thorpej /*
   1140   1.1  thorpej  * tlp_txintr:
   1141   1.1  thorpej  *
   1142   1.1  thorpej  *	Helper; handle transmit interrupts.
   1143   1.1  thorpej  */
   1144   1.1  thorpej void
   1145   1.1  thorpej tlp_txintr(sc)
   1146   1.1  thorpej 	struct tulip_softc *sc;
   1147   1.1  thorpej {
   1148   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1149   1.1  thorpej 	struct tulip_txsoft *txs;
   1150   1.1  thorpej 	u_int32_t txstat;
   1151   1.1  thorpej 
   1152   1.5  thorpej 	DPRINTF(sc, ("%s: tlp_txintr: sc_flags 0x%08x\n",
   1153   1.1  thorpej 	    sc->sc_dev.dv_xname, sc->sc_flags));
   1154   1.1  thorpej 
   1155   1.1  thorpej 	ifp->if_flags &= ~IFF_OACTIVE;
   1156   1.1  thorpej 
   1157   1.1  thorpej 	/*
   1158   1.4  thorpej 	 * If we were doing a filter setup, check to see if it completed.
   1159   1.4  thorpej 	 */
   1160   1.4  thorpej 	if (sc->sc_flags & TULIPF_DOING_SETUP) {
   1161   1.4  thorpej 		TULIP_CDSDSYNC(sc, BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
   1162   1.4  thorpej 		if ((sc->sc_setup_desc.td_status & TDSTAT_OWN) == 0)
   1163   1.4  thorpej 			sc->sc_flags &= ~TULIPF_DOING_SETUP;
   1164   1.4  thorpej 	}
   1165   1.4  thorpej 
   1166   1.4  thorpej 	/*
   1167   1.1  thorpej 	 * Go through our Tx list and free mbufs for those
   1168   1.1  thorpej 	 * frames that have been transmitted.
   1169   1.1  thorpej 	 */
   1170   1.1  thorpej 	while ((txs = SIMPLEQ_FIRST(&sc->sc_txdirtyq)) != NULL) {
   1171   1.1  thorpej 		TULIP_CDTXSYNC(sc, txs->txs_firstdesc,
   1172   1.1  thorpej 		    txs->txs_dmamap->dm_nsegs,
   1173   1.1  thorpej 		    BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
   1174   1.1  thorpej 
   1175   1.1  thorpej #ifdef TLP_DEBUG
   1176   1.5  thorpej 		if (ifp->if_flags & IFF_DEBUG) {
   1177   1.5  thorpej 			int i;
   1178   1.5  thorpej 			printf("    txsoft %p trainsmit chain:\n", txs);
   1179   1.5  thorpej 			for (i = txs->txs_firstdesc;; i = TULIP_NEXTTX(i)) {
   1180   1.5  thorpej 				printf("     descriptor %d:\n", i);
   1181   1.5  thorpej 				printf("       td_status:   0x%08x\n",
   1182   1.5  thorpej 				    sc->sc_txdescs[i].td_status);
   1183   1.5  thorpej 				printf("       td_ctl:      0x%08x\n",
   1184   1.5  thorpej 				    sc->sc_txdescs[i].td_ctl);
   1185   1.5  thorpej 				printf("       td_bufaddr1: 0x%08x\n",
   1186   1.5  thorpej 				    sc->sc_txdescs[i].td_bufaddr1);
   1187   1.5  thorpej 				printf("       td_bufaddr2: 0x%08x\n",
   1188   1.5  thorpej 				    sc->sc_txdescs[i].td_bufaddr2);
   1189   1.5  thorpej 				if (i == txs->txs_lastdesc)
   1190   1.5  thorpej 					break;
   1191   1.5  thorpej 			}
   1192   1.5  thorpej 		}
   1193   1.1  thorpej #endif
   1194   1.1  thorpej 
   1195   1.1  thorpej 		txstat = sc->sc_txdescs[txs->txs_firstdesc].td_status;
   1196   1.1  thorpej 		if (txstat & TDSTAT_OWN)
   1197   1.1  thorpej 			break;
   1198   1.1  thorpej 
   1199   1.1  thorpej 		SIMPLEQ_REMOVE_HEAD(&sc->sc_txdirtyq, txs, txs_q);
   1200   1.1  thorpej 
   1201   1.1  thorpej 		sc->sc_txfree += txs->txs_dmamap->dm_nsegs;
   1202   1.1  thorpej 
   1203   1.1  thorpej 		bus_dmamap_sync(sc->sc_dmat, txs->txs_dmamap,
   1204   1.1  thorpej 		    0, txs->txs_dmamap->dm_mapsize,
   1205   1.1  thorpej 		    BUS_DMASYNC_POSTWRITE);
   1206   1.1  thorpej 		bus_dmamap_unload(sc->sc_dmat, txs->txs_dmamap);
   1207   1.1  thorpej 		m_freem(txs->txs_mbuf);
   1208   1.1  thorpej 		txs->txs_mbuf = NULL;
   1209   1.1  thorpej 
   1210   1.1  thorpej 		SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
   1211   1.1  thorpej 
   1212   1.1  thorpej 		/*
   1213   1.1  thorpej 		 * Check for errors and collisions.
   1214   1.1  thorpej 		 */
   1215  1.10  thorpej 		if (txstat &
   1216  1.10  thorpej 		    (TDSTAT_Tx_UF|TDSTAT_Tx_NC|TDSTAT_Tx_LO|TDSTAT_Tx_TO)) {
   1217   1.1  thorpej 			ifp->if_oerrors++;
   1218  1.10  thorpej #if 0
   1219  1.10  thorpej 			/*
   1220  1.10  thorpej 			 * XXX Can't check for late or excessive collisions;
   1221  1.10  thorpej 			 * XXX Some 21040s seem to register those even on
   1222  1.10  thorpej 			 * XXX successful transmissions!
   1223  1.10  thorpej 			 */
   1224   1.1  thorpej 			if (txstat & TDSTAT_Tx_EC)
   1225   1.1  thorpej 				ifp->if_collisions += 16;
   1226   1.1  thorpej 			if (txstat & TDSTAT_Tx_LC)
   1227   1.1  thorpej 				ifp->if_collisions++;
   1228  1.10  thorpej #endif
   1229   1.1  thorpej 		} else {
   1230   1.1  thorpej 			/* Packet was transmitted successfully. */
   1231   1.1  thorpej 			ifp->if_opackets++;
   1232   1.1  thorpej 			ifp->if_collisions += TDSTAT_Tx_COLLISIONS(txstat);
   1233   1.1  thorpej 		}
   1234   1.1  thorpej 	}
   1235   1.1  thorpej 
   1236   1.1  thorpej 	/*
   1237   1.1  thorpej 	 * If there are no more pending transmissions, cancel the watchdog
   1238   1.1  thorpej 	 * timer.
   1239   1.1  thorpej 	 */
   1240   1.4  thorpej 	if (txs == NULL && (sc->sc_flags & TULIPF_DOING_SETUP) == 0)
   1241   1.1  thorpej 		ifp->if_timer = 0;
   1242   1.1  thorpej 
   1243   1.1  thorpej 	/*
   1244   1.1  thorpej 	 * If we have a receive filter setup pending, do it now.
   1245   1.1  thorpej 	 */
   1246   1.1  thorpej 	if (sc->sc_flags & TULIPF_WANT_SETUP)
   1247   1.1  thorpej 		(*sc->sc_filter_setup)(sc);
   1248   1.1  thorpej }
   1249   1.1  thorpej 
   1250   1.1  thorpej /*
   1251   1.1  thorpej  * tlp_reset:
   1252   1.1  thorpej  *
   1253   1.1  thorpej  *	Perform a soft reset on the Tulip.
   1254   1.1  thorpej  */
   1255   1.1  thorpej void
   1256   1.1  thorpej tlp_reset(sc)
   1257   1.1  thorpej 	struct tulip_softc *sc;
   1258   1.1  thorpej {
   1259   1.1  thorpej 	int i;
   1260   1.1  thorpej 
   1261   1.1  thorpej 	TULIP_WRITE(sc, CSR_BUSMODE, BUSMODE_SWR);
   1262   1.1  thorpej 
   1263   1.1  thorpej 	for (i = 0; i < 1000; i++) {
   1264   1.1  thorpej 		if (TULIP_ISSET(sc, CSR_BUSMODE, BUSMODE_SWR) == 0)
   1265   1.1  thorpej 			break;
   1266   1.1  thorpej 		delay(10);
   1267   1.1  thorpej 	}
   1268   1.1  thorpej 
   1269   1.1  thorpej 	if (TULIP_ISSET(sc, CSR_BUSMODE, BUSMODE_SWR))
   1270   1.1  thorpej 		printf("%s: reset failed to complete\n", sc->sc_dev.dv_xname);
   1271   1.1  thorpej 
   1272   1.1  thorpej 	delay(1000);
   1273   1.1  thorpej }
   1274   1.1  thorpej 
   1275   1.1  thorpej /*
   1276   1.1  thorpej  * tlp_init:
   1277   1.1  thorpej  *
   1278   1.1  thorpej  *	Initialize the interface.  Must be called at splnet().
   1279   1.1  thorpej  */
   1280   1.1  thorpej int
   1281   1.1  thorpej tlp_init(sc)
   1282   1.1  thorpej 	struct tulip_softc *sc;
   1283   1.1  thorpej {
   1284   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1285   1.1  thorpej 	struct tulip_txsoft *txs;
   1286   1.1  thorpej 	struct tulip_rxsoft *rxs;
   1287   1.1  thorpej 	int i, error = 0;
   1288   1.1  thorpej 
   1289   1.1  thorpej 	/*
   1290   1.1  thorpej 	 * Cancel any pending I/O.
   1291   1.1  thorpej 	 */
   1292   1.1  thorpej 	tlp_stop(sc, 0);
   1293   1.1  thorpej 
   1294   1.1  thorpej 	/*
   1295   1.1  thorpej 	 * Reset the Tulip to a known state.
   1296   1.1  thorpej 	 */
   1297   1.1  thorpej 	tlp_reset(sc);
   1298   1.1  thorpej 
   1299   1.1  thorpej 	/*
   1300   1.1  thorpej 	 * Initialize the BUSMODE register.
   1301   1.1  thorpej 	 *
   1302   1.1  thorpej 	 * XXX What about read-multiple/read-line/write-line on
   1303   1.1  thorpej 	 * XXX the 21140 and up?
   1304   1.1  thorpej 	 */
   1305   1.1  thorpej 	sc->sc_busmode = BUSMODE_BAR | BUSMODE_PBL_DEFAULT;
   1306   1.1  thorpej 	switch (sc->sc_cacheline) {
   1307   1.1  thorpej 	default:
   1308   1.1  thorpej 		/*
   1309   1.1  thorpej 		 * Note: We must *always* set these bits; a cache
   1310   1.1  thorpej 		 * alignment of 0 is RESERVED.
   1311   1.1  thorpej 		 */
   1312   1.1  thorpej 	case 8:
   1313   1.1  thorpej 		sc->sc_busmode |= BUSMODE_CAL_8LW;
   1314   1.1  thorpej 		break;
   1315   1.1  thorpej 	case 16:
   1316   1.1  thorpej 		sc->sc_busmode |= BUSMODE_CAL_16LW;
   1317   1.1  thorpej 		break;
   1318   1.1  thorpej 	case 32:
   1319   1.1  thorpej 		sc->sc_busmode |= BUSMODE_CAL_32LW;
   1320   1.1  thorpej 		break;
   1321   1.1  thorpej 	}
   1322   1.1  thorpej 	switch (sc->sc_chip) {
   1323   1.1  thorpej 	case TULIP_CHIP_82C168:
   1324   1.1  thorpej 	case TULIP_CHIP_82C169:
   1325   1.1  thorpej 		sc->sc_busmode |= BUSMODE_PNIC_MBO;
   1326   1.1  thorpej 		break;
   1327   1.1  thorpej 	default:
   1328   1.1  thorpej 		/* Nothing. */
   1329   1.1  thorpej 		break;
   1330   1.1  thorpej 	}
   1331   1.1  thorpej #if BYTE_ORDER == BIG_ENDIAN
   1332   1.1  thorpej 	/*
   1333   1.1  thorpej 	 * XXX There are reports that this doesn't work properly
   1334   1.1  thorpej 	 * in the old Tulip driver, but BUSMODE_DBO does.  However,
   1335   1.1  thorpej 	 * BUSMODE_DBO is not available on the 21040, and requires
   1336   1.1  thorpej 	 * us to byte-swap the setup packet.  What to do?
   1337   1.1  thorpej 	 */
   1338   1.1  thorpej 	sc->sc_busmode |= BUSMODE_BLE;
   1339   1.1  thorpej #endif
   1340   1.1  thorpej 	TULIP_WRITE(sc, CSR_BUSMODE, sc->sc_busmode);
   1341   1.1  thorpej 
   1342   1.1  thorpej 	/*
   1343   1.1  thorpej 	 * Initialize the OPMODE register.  We don't write it until
   1344   1.1  thorpej 	 * we're ready to begin the transmit and receive processes.
   1345   1.1  thorpej 	 *
   1346   1.1  thorpej 	 * Media-related OPMODE bits are set in the media callbacks
   1347   1.1  thorpej 	 * for each specific chip/board.
   1348   1.1  thorpej 	 */
   1349   1.1  thorpej 	sc->sc_opmode = OPMODE_SR | OPMODE_ST |
   1350   1.1  thorpej 	    sc->sc_txth[sc->sc_txthresh].txth_opmode;
   1351   1.1  thorpej 	switch (sc->sc_chip) {
   1352   1.1  thorpej 	case TULIP_CHIP_21140:
   1353   1.1  thorpej 	case TULIP_CHIP_21140A:
   1354   1.1  thorpej 	case TULIP_CHIP_21142:
   1355   1.1  thorpej 	case TULIP_CHIP_21143:
   1356   1.1  thorpej 		sc->sc_opmode |= OPMODE_MBO;
   1357   1.1  thorpej 		break;
   1358   1.1  thorpej 
   1359   1.1  thorpej 	default:
   1360   1.1  thorpej 		/* Nothing. */
   1361   1.1  thorpej 	}
   1362   1.1  thorpej 
   1363   1.1  thorpej 	if (sc->sc_flags & TULIPF_HAS_MII) {
   1364   1.1  thorpej 		switch (sc->sc_chip) {
   1365   1.1  thorpej 		case TULIP_CHIP_82C168:
   1366   1.1  thorpej 		case TULIP_CHIP_82C169:
   1367   1.5  thorpej 			/* Enable the MII port. */
   1368   1.5  thorpej 			sc->sc_opmode |= OPMODE_PS;
   1369   1.5  thorpej 
   1370   1.6  thorpej 			TULIP_WRITE(sc, CSR_PNIC_ENDEC, PNIC_ENDEC_JDIS);
   1371   1.1  thorpej 			break;
   1372   1.1  thorpej 
   1373   1.5  thorpej 		case TULIP_CHIP_WB89C840F:
   1374   1.5  thorpej 			/* Nothing. */
   1375   1.5  thorpej 			break;
   1376   1.5  thorpej 
   1377   1.1  thorpej 		default:
   1378   1.5  thorpej 			/* Enable the MII port. */
   1379   1.5  thorpej 			sc->sc_opmode |= OPMODE_PS;
   1380   1.5  thorpej 			break;
   1381   1.1  thorpej 		}
   1382   1.7  thorpej 	} else {
   1383   1.7  thorpej 		switch (sc->sc_chip) {
   1384   1.7  thorpej 		case TULIP_CHIP_82C168:
   1385   1.7  thorpej 		case TULIP_CHIP_82C169:
   1386   1.7  thorpej 			sc->sc_opmode |= OPMODE_PNIC_TBEN;
   1387   1.7  thorpej 			break;
   1388   1.7  thorpej 
   1389   1.7  thorpej 		default:
   1390   1.7  thorpej 			/* Nothing. */
   1391   1.7  thorpej 		}
   1392   1.1  thorpej 	}
   1393   1.1  thorpej 
   1394   1.1  thorpej 	/*
   1395   1.1  thorpej 	 * Magical mystery initialization on the Macronix chips.
   1396   1.1  thorpej 	 * The MX98713 uses its own magic value, the rest share
   1397   1.1  thorpej 	 * a common one.
   1398   1.1  thorpej 	 */
   1399   1.1  thorpej 	switch (sc->sc_chip) {
   1400   1.1  thorpej 	case TULIP_CHIP_MX98713:
   1401   1.1  thorpej 		TULIP_WRITE(sc, CSR_PMAC_TOR, PMAC_TOR_98713);
   1402   1.1  thorpej 		break;
   1403   1.1  thorpej 
   1404   1.1  thorpej 	case TULIP_CHIP_MX98713A:
   1405   1.1  thorpej 	case TULIP_CHIP_MX98715:
   1406   1.1  thorpej 	case TULIP_CHIP_MX98725:
   1407   1.1  thorpej 		TULIP_WRITE(sc, CSR_PMAC_TOR, PMAC_TOR_98715);
   1408   1.1  thorpej 		break;
   1409   1.1  thorpej 
   1410   1.1  thorpej 	default:
   1411   1.1  thorpej 		/* Nothing. */
   1412   1.1  thorpej 	}
   1413   1.1  thorpej 
   1414   1.1  thorpej 	/*
   1415   1.1  thorpej 	 * Initialize the transmit descriptor ring.
   1416   1.1  thorpej 	 */
   1417   1.1  thorpej 	memset(sc->sc_txdescs, 0, sizeof(sc->sc_txdescs));
   1418   1.1  thorpej 	for (i = 0; i < TULIP_NTXDESC; i++) {
   1419   1.1  thorpej 		sc->sc_txdescs[i].td_ctl = TDCTL_CH;
   1420   1.1  thorpej 		sc->sc_txdescs[i].td_bufaddr2 =
   1421   1.1  thorpej 		    TULIP_CDTXADDR(sc, TULIP_NEXTTX(i));
   1422   1.1  thorpej 	}
   1423   1.1  thorpej 	TULIP_CDTXSYNC(sc, 0, TULIP_NTXDESC,
   1424   1.1  thorpej 	    BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
   1425   1.1  thorpej 	sc->sc_txfree = TULIP_NTXDESC;
   1426   1.1  thorpej 	sc->sc_txnext = 0;
   1427   1.1  thorpej 
   1428   1.1  thorpej 	/*
   1429   1.1  thorpej 	 * Initialize the transmit job descriptors.
   1430   1.1  thorpej 	 */
   1431   1.1  thorpej 	SIMPLEQ_INIT(&sc->sc_txfreeq);
   1432   1.1  thorpej 	SIMPLEQ_INIT(&sc->sc_txdirtyq);
   1433   1.1  thorpej 	for (i = 0; i < TULIP_TXQUEUELEN; i++) {
   1434   1.1  thorpej 		txs = &sc->sc_txsoft[i];
   1435   1.1  thorpej 		txs->txs_mbuf = NULL;
   1436   1.1  thorpej 		SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
   1437   1.1  thorpej 	}
   1438   1.1  thorpej 
   1439   1.1  thorpej 	/*
   1440   1.1  thorpej 	 * Initialize the receive descriptor and receive job
   1441   1.1  thorpej 	 * descriptor rings.
   1442   1.1  thorpej 	 */
   1443   1.1  thorpej 	for (i = 0; i < TULIP_NRXDESC; i++) {
   1444   1.1  thorpej 		rxs = &sc->sc_rxsoft[i];
   1445   1.1  thorpej 		if (rxs->rxs_mbuf == NULL) {
   1446   1.1  thorpej 			if ((error = tlp_add_rxbuf(sc, i)) != 0) {
   1447   1.1  thorpej 				printf("%s: unable to allocate or map rx "
   1448   1.1  thorpej 				    "buffer %d, error = %d\n",
   1449   1.1  thorpej 				    sc->sc_dev.dv_xname, i, error);
   1450   1.1  thorpej 				/*
   1451   1.1  thorpej 				 * XXX Should attempt to run with fewer receive
   1452   1.1  thorpej 				 * XXX buffers instead of just failing.
   1453   1.1  thorpej 				 */
   1454   1.1  thorpej 				tlp_rxdrain(sc);
   1455   1.1  thorpej 				goto out;
   1456   1.1  thorpej 			}
   1457   1.1  thorpej 		}
   1458   1.1  thorpej 	}
   1459   1.1  thorpej 	sc->sc_rxptr = 0;
   1460   1.1  thorpej 
   1461   1.1  thorpej 	/*
   1462   1.1  thorpej 	 * Initialize the interrupt mask and enable interrupts.
   1463   1.1  thorpej 	 */
   1464   1.1  thorpej 	/* normal interrupts */
   1465   1.1  thorpej 	sc->sc_inten =  STATUS_TI | STATUS_TU | STATUS_RI | STATUS_NIS;
   1466   1.5  thorpej 
   1467   1.1  thorpej 	/* abnormal interrupts */
   1468   1.1  thorpej 	sc->sc_inten |= STATUS_TPS | STATUS_TJT | STATUS_UNF |
   1469   1.1  thorpej 	    STATUS_RU | STATUS_RPS | STATUS_RWT | STATUS_SE | STATUS_AIS;
   1470   1.1  thorpej 
   1471   1.5  thorpej 	sc->sc_rxint_mask = STATUS_RI|STATUS_RU|STATUS_RWT;
   1472   1.5  thorpej 	sc->sc_txint_mask = STATUS_TI|STATUS_UNF|STATUS_TJT;
   1473   1.5  thorpej 
   1474   1.5  thorpej 	switch (sc->sc_chip) {
   1475   1.5  thorpej 	case TULIP_CHIP_WB89C840F:
   1476   1.5  thorpej 		/*
   1477   1.5  thorpej 		 * Clear bits that we don't want that happen to
   1478   1.5  thorpej 		 * overlap or don't exist.
   1479   1.5  thorpej 		 */
   1480   1.5  thorpej 		sc->sc_inten &= ~(STATUS_WINB_REI|STATUS_RWT);
   1481   1.5  thorpej 		break;
   1482   1.5  thorpej 
   1483   1.5  thorpej 	default:
   1484   1.5  thorpej 		/* Nothing. */
   1485   1.5  thorpej 	}
   1486   1.5  thorpej 
   1487   1.5  thorpej 	sc->sc_rxint_mask &= sc->sc_inten;
   1488   1.5  thorpej 	sc->sc_txint_mask &= sc->sc_inten;
   1489   1.5  thorpej 
   1490   1.1  thorpej 	TULIP_WRITE(sc, CSR_INTEN, sc->sc_inten);
   1491   1.1  thorpej 	TULIP_WRITE(sc, CSR_STATUS, 0xffffffff);
   1492   1.1  thorpej 
   1493   1.1  thorpej 	/*
   1494   1.1  thorpej 	 * Give the transmit and receive rings to the Tulip.
   1495   1.1  thorpej 	 */
   1496   1.1  thorpej 	TULIP_WRITE(sc, CSR_TXLIST, TULIP_CDTXADDR(sc, sc->sc_txnext));
   1497   1.1  thorpej 	TULIP_WRITE(sc, CSR_RXLIST, TULIP_CDRXADDR(sc, sc->sc_rxptr));
   1498   1.1  thorpej 
   1499   1.1  thorpej 	/*
   1500   1.1  thorpej 	 * On chips that do this differently, set the station address.
   1501   1.1  thorpej 	 */
   1502   1.1  thorpej 	switch (sc->sc_chip) {
   1503   1.1  thorpej 	case TULIP_CHIP_WB89C840F:
   1504   1.8  thorpej 	    {
   1505   1.1  thorpej 		/* XXX Do this with stream writes? */
   1506   1.8  thorpej 		bus_addr_t cpa = TULIP_CSR_OFFSET(sc, CSR_WINB_CPA0);
   1507   1.8  thorpej 
   1508   1.1  thorpej 		for (i = 0; i < ETHER_ADDR_LEN; i++) {
   1509   1.1  thorpej 			bus_space_write_1(sc->sc_st, sc->sc_sh,
   1510   1.8  thorpej 			    cpa + i, LLADDR(ifp->if_sadl)[i]);
   1511   1.1  thorpej 		}
   1512   1.1  thorpej 		break;
   1513   1.8  thorpej 	    }
   1514   1.1  thorpej 
   1515   1.1  thorpej 	default:
   1516   1.1  thorpej 		/* Nothing. */
   1517   1.1  thorpej 	}
   1518   1.1  thorpej 
   1519   1.1  thorpej 	/*
   1520   1.1  thorpej 	 * Set the receive filter.  This will start the transmit and
   1521   1.1  thorpej 	 * receive processes.
   1522   1.1  thorpej 	 */
   1523   1.1  thorpej 	(*sc->sc_filter_setup)(sc);
   1524   1.1  thorpej 
   1525   1.1  thorpej 	/*
   1526   1.1  thorpej 	 * Start the receive process.
   1527   1.1  thorpej 	 */
   1528   1.1  thorpej 	TULIP_WRITE(sc, CSR_RXPOLL, RXPOLL_RPD);
   1529   1.1  thorpej 
   1530   1.6  thorpej 	if (sc->sc_tick != NULL) {
   1531   1.1  thorpej 		/* Start the one second clock. */
   1532   1.6  thorpej 		timeout(sc->sc_tick, sc, hz);
   1533   1.1  thorpej 	}
   1534   1.1  thorpej 
   1535   1.1  thorpej 	/*
   1536   1.1  thorpej 	 * Note that the interface is now running.
   1537   1.1  thorpej 	 */
   1538   1.1  thorpej 	ifp->if_flags |= IFF_RUNNING;
   1539   1.1  thorpej 	ifp->if_flags &= ~IFF_OACTIVE;
   1540   1.1  thorpej 
   1541   1.1  thorpej 	/*
   1542   1.1  thorpej 	 * Set the media.  We must do this after the transmit process is
   1543   1.1  thorpej 	 * running, since we may actually have to transmit packets on
   1544   1.1  thorpej 	 * our board to test link integrity.
   1545   1.1  thorpej 	 */
   1546   1.1  thorpej 	(void) (*sc->sc_mediasw->tmsw_set)(sc);
   1547   1.1  thorpej 
   1548   1.1  thorpej  out:
   1549   1.1  thorpej 	if (error)
   1550   1.1  thorpej 		printf("%s: interface not running\n", sc->sc_dev.dv_xname);
   1551   1.1  thorpej 	return (error);
   1552   1.1  thorpej }
   1553   1.1  thorpej 
   1554   1.1  thorpej /*
   1555   1.1  thorpej  * tlp_rxdrain:
   1556   1.1  thorpej  *
   1557   1.1  thorpej  *	Drain the receive queue.
   1558   1.1  thorpej  */
   1559   1.1  thorpej void
   1560   1.1  thorpej tlp_rxdrain(sc)
   1561   1.1  thorpej 	struct tulip_softc *sc;
   1562   1.1  thorpej {
   1563   1.1  thorpej 	struct tulip_rxsoft *rxs;
   1564   1.1  thorpej 	int i;
   1565   1.1  thorpej 
   1566   1.1  thorpej 	for (i = 0; i < TULIP_NRXDESC; i++) {
   1567   1.1  thorpej 		rxs = &sc->sc_rxsoft[i];
   1568   1.1  thorpej 		if (rxs->rxs_mbuf != NULL) {
   1569   1.1  thorpej 			bus_dmamap_unload(sc->sc_dmat, rxs->rxs_dmamap);
   1570   1.1  thorpej 			m_freem(rxs->rxs_mbuf);
   1571   1.1  thorpej 			rxs->rxs_mbuf = NULL;
   1572   1.1  thorpej 		}
   1573   1.1  thorpej 	}
   1574   1.1  thorpej }
   1575   1.1  thorpej 
   1576   1.1  thorpej /*
   1577   1.1  thorpej  * tlp_stop:
   1578   1.1  thorpej  *
   1579   1.1  thorpej  *	Stop transmission on the interface.
   1580   1.1  thorpej  */
   1581   1.1  thorpej void
   1582   1.1  thorpej tlp_stop(sc, drain)
   1583   1.1  thorpej 	struct tulip_softc *sc;
   1584   1.1  thorpej 	int drain;
   1585   1.1  thorpej {
   1586   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1587   1.1  thorpej 	struct tulip_txsoft *txs;
   1588   1.1  thorpej 
   1589   1.6  thorpej 	if (sc->sc_tick != NULL) {
   1590   1.1  thorpej 		/* Stop the one second clock. */
   1591   1.6  thorpej 		untimeout(sc->sc_tick, sc);
   1592   1.1  thorpej 	}
   1593   1.1  thorpej 
   1594   1.1  thorpej 	/* Disable interrupts. */
   1595   1.1  thorpej 	TULIP_WRITE(sc, CSR_INTEN, 0);
   1596   1.1  thorpej 
   1597   1.1  thorpej 	/* Stop the transmit and receive processes. */
   1598   1.1  thorpej 	TULIP_WRITE(sc, CSR_OPMODE, 0);
   1599   1.1  thorpej 	TULIP_WRITE(sc, CSR_RXLIST, 0);
   1600   1.1  thorpej 	TULIP_WRITE(sc, CSR_TXLIST, 0);
   1601   1.1  thorpej 
   1602   1.1  thorpej 	/*
   1603   1.1  thorpej 	 * Release any queued transmit buffers.
   1604   1.1  thorpej 	 */
   1605   1.1  thorpej 	while ((txs = SIMPLEQ_FIRST(&sc->sc_txdirtyq)) != NULL) {
   1606   1.1  thorpej 		SIMPLEQ_REMOVE_HEAD(&sc->sc_txdirtyq, txs, txs_q);
   1607   1.1  thorpej 		if (txs->txs_mbuf != NULL) {
   1608   1.1  thorpej 			bus_dmamap_unload(sc->sc_dmat, txs->txs_dmamap);
   1609   1.1  thorpej 			m_freem(txs->txs_mbuf);
   1610   1.1  thorpej 			txs->txs_mbuf = NULL;
   1611   1.1  thorpej 		}
   1612   1.1  thorpej 		SIMPLEQ_INSERT_TAIL(&sc->sc_txfreeq, txs, txs_q);
   1613   1.1  thorpej 	}
   1614   1.1  thorpej 
   1615   1.1  thorpej 	if (drain) {
   1616   1.1  thorpej 		/*
   1617   1.1  thorpej 		 * Release the receive buffers.
   1618   1.1  thorpej 		 */
   1619   1.1  thorpej 		tlp_rxdrain(sc);
   1620   1.1  thorpej 	}
   1621   1.1  thorpej 
   1622   1.4  thorpej 	sc->sc_flags &= ~(TULIPF_WANT_SETUP|TULIPF_DOING_SETUP);
   1623   1.1  thorpej 
   1624   1.1  thorpej 	/*
   1625   1.1  thorpej 	 * Mark the interface down and cancel the watchdog timer.
   1626   1.1  thorpej 	 */
   1627   1.1  thorpej 	ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
   1628   1.1  thorpej 	ifp->if_timer = 0;
   1629   1.1  thorpej }
   1630   1.1  thorpej 
   1631   1.1  thorpej #define	SROM_EMIT(sc, x)						\
   1632   1.1  thorpej do {									\
   1633   1.1  thorpej 	TULIP_WRITE((sc), CSR_MIIROM, (x));				\
   1634   1.1  thorpej 	delay(1);							\
   1635   1.1  thorpej } while (0)
   1636   1.1  thorpej 
   1637   1.1  thorpej /*
   1638   1.1  thorpej  * tlp_srom_idle:
   1639   1.1  thorpej  *
   1640   1.1  thorpej  *	Put the SROM in idle state.
   1641   1.1  thorpej  */
   1642   1.1  thorpej void
   1643   1.1  thorpej tlp_srom_idle(sc)
   1644   1.1  thorpej 	struct tulip_softc *sc;
   1645   1.1  thorpej {
   1646   1.1  thorpej 	u_int32_t miirom;
   1647   1.1  thorpej 	int i;
   1648   1.1  thorpej 
   1649   1.1  thorpej 	miirom = MIIROM_SR;
   1650   1.1  thorpej 	SROM_EMIT(sc, miirom);
   1651   1.1  thorpej 
   1652   1.1  thorpej 	miirom |= MIIROM_RD;
   1653   1.1  thorpej 	SROM_EMIT(sc, miirom);
   1654   1.1  thorpej 
   1655   1.1  thorpej 	miirom |= MIIROM_SROMCS;
   1656   1.1  thorpej 	SROM_EMIT(sc, miirom);
   1657   1.1  thorpej 
   1658   1.1  thorpej 	SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   1659   1.1  thorpej 
   1660   1.1  thorpej 	/* Strobe the clock 25 times. */
   1661   1.1  thorpej 	for (i = 0; i < 25; i++) {
   1662   1.1  thorpej 		SROM_EMIT(sc, miirom);
   1663   1.1  thorpej 		SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   1664   1.1  thorpej 	}
   1665   1.1  thorpej 
   1666   1.1  thorpej 	SROM_EMIT(sc, miirom);
   1667   1.1  thorpej 
   1668   1.1  thorpej 	miirom &= ~MIIROM_SROMCS;
   1669   1.1  thorpej 	SROM_EMIT(sc, miirom);
   1670   1.1  thorpej 
   1671   1.1  thorpej 	SROM_EMIT(sc, 0);
   1672   1.1  thorpej }
   1673   1.1  thorpej 
   1674   1.1  thorpej /*
   1675   1.1  thorpej  * tlp_read_srom:
   1676   1.1  thorpej  *
   1677   1.1  thorpej  *	Read the Tulip SROM.
   1678   1.1  thorpej  */
   1679   1.1  thorpej void
   1680   1.1  thorpej tlp_read_srom(sc, word, wordcnt, data)
   1681   1.1  thorpej 	struct tulip_softc *sc;
   1682   1.1  thorpej 	int word, wordcnt;
   1683   1.1  thorpej 	u_int16_t *data;
   1684   1.1  thorpej {
   1685   1.1  thorpej 	u_int32_t miirom;
   1686   1.1  thorpej 	int i, x;
   1687   1.1  thorpej 
   1688   1.1  thorpej 	tlp_srom_idle(sc);
   1689   1.1  thorpej 
   1690   1.1  thorpej 	/* Select the SROM. */
   1691   1.1  thorpej 	miirom = MIIROM_SR;
   1692   1.1  thorpej 	SROM_EMIT(sc, miirom);
   1693   1.1  thorpej 
   1694   1.1  thorpej 	miirom |= MIIROM_RD;
   1695   1.1  thorpej 	SROM_EMIT(sc, miirom);
   1696   1.1  thorpej 
   1697   1.1  thorpej 	for (i = 0; i < wordcnt; i++) {
   1698   1.1  thorpej 		/* Send CHIP SELECT for one clock tick. */
   1699   1.1  thorpej 		miirom |= MIIROM_SROMCS;
   1700   1.1  thorpej 		SROM_EMIT(sc, miirom);
   1701   1.1  thorpej 
   1702   1.1  thorpej 		/* Shift in the READ opcode. */
   1703   1.1  thorpej 		for (x = 3; x > 0; x--) {
   1704   1.1  thorpej 			if (TULIP_SROM_OPC_READ & (1 << (x - 1)))
   1705   1.1  thorpej 				miirom |= MIIROM_SROMDI;
   1706   1.1  thorpej 			else
   1707   1.1  thorpej 				miirom &= ~MIIROM_SROMDI;
   1708   1.1  thorpej 			SROM_EMIT(sc, miirom);
   1709   1.1  thorpej 			SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   1710   1.1  thorpej 			SROM_EMIT(sc, miirom);
   1711   1.1  thorpej 		}
   1712   1.1  thorpej 
   1713   1.1  thorpej 		/* Shift in address. */
   1714   1.1  thorpej 		for (x = 6; x > 0; x--) {
   1715   1.1  thorpej 			if ((word + i) & (1 << (x - 1)))
   1716   1.1  thorpej 				miirom |= MIIROM_SROMDI;
   1717   1.1  thorpej 			else
   1718   1.1  thorpej 				miirom &= ~MIIROM_SROMDI;
   1719   1.1  thorpej 			SROM_EMIT(sc, miirom);
   1720   1.1  thorpej 			SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   1721   1.1  thorpej 			SROM_EMIT(sc, miirom);
   1722   1.1  thorpej 		}
   1723   1.1  thorpej 
   1724   1.1  thorpej 		/* Shift out data. */
   1725   1.1  thorpej 		miirom &= ~MIIROM_SROMDI;
   1726   1.1  thorpej 		data[i] = 0;
   1727   1.1  thorpej 		for (x = 16; x > 0; x--) {
   1728   1.1  thorpej 			SROM_EMIT(sc, miirom|MIIROM_SROMSK);
   1729   1.1  thorpej 			if (TULIP_ISSET(sc, CSR_MIIROM, MIIROM_SROMDO))
   1730   1.1  thorpej 				data[i] |= (1 << (x - 1));
   1731   1.1  thorpej 			SROM_EMIT(sc, miirom);
   1732   1.1  thorpej 		}
   1733   1.1  thorpej 
   1734   1.1  thorpej 		/* Clear CHIP SELECT. */
   1735   1.1  thorpej 		miirom &= ~MIIROM_SROMCS;
   1736   1.1  thorpej 		SROM_EMIT(sc, miirom);
   1737   1.1  thorpej 	}
   1738   1.1  thorpej 
   1739   1.1  thorpej 	/* Deselect the SROM. */
   1740   1.1  thorpej 	SROM_EMIT(sc, 0);
   1741   1.1  thorpej 
   1742   1.1  thorpej 	/* ...and idle it. */
   1743   1.1  thorpej 	tlp_srom_idle(sc);
   1744   1.1  thorpej }
   1745   1.1  thorpej 
   1746   1.1  thorpej #undef SROM_EMIT
   1747   1.1  thorpej 
   1748   1.1  thorpej /*
   1749   1.1  thorpej  * tlp_add_rxbuf:
   1750   1.1  thorpej  *
   1751   1.1  thorpej  *	Add a receive buffer to the indicated descriptor.
   1752   1.1  thorpej  */
   1753   1.1  thorpej int
   1754   1.1  thorpej tlp_add_rxbuf(sc, idx)
   1755   1.1  thorpej 	struct tulip_softc *sc;
   1756   1.1  thorpej 	int idx;
   1757   1.1  thorpej {
   1758   1.1  thorpej 	struct tulip_rxsoft *rxs = &sc->sc_rxsoft[idx];
   1759   1.1  thorpej 	struct mbuf *m;
   1760   1.1  thorpej 	int error;
   1761   1.1  thorpej 
   1762   1.1  thorpej 	MGETHDR(m, M_DONTWAIT, MT_DATA);
   1763   1.1  thorpej 	if (m == NULL)
   1764   1.1  thorpej 		return (ENOBUFS);
   1765   1.1  thorpej 
   1766   1.1  thorpej 	MCLGET(m, M_DONTWAIT);
   1767   1.1  thorpej 	if ((m->m_flags & M_EXT) == 0) {
   1768   1.1  thorpej 		m_freem(m);
   1769   1.1  thorpej 		return (ENOBUFS);
   1770   1.1  thorpej 	}
   1771   1.1  thorpej 
   1772   1.1  thorpej 	if (rxs->rxs_mbuf != NULL)
   1773   1.1  thorpej 		bus_dmamap_unload(sc->sc_dmat, rxs->rxs_dmamap);
   1774   1.1  thorpej 
   1775   1.1  thorpej 	rxs->rxs_mbuf = m;
   1776   1.1  thorpej 
   1777   1.1  thorpej 	error = bus_dmamap_load(sc->sc_dmat, rxs->rxs_dmamap,
   1778   1.1  thorpej 	    m->m_ext.ext_buf, m->m_ext.ext_size, NULL, BUS_DMA_NOWAIT);
   1779   1.1  thorpej 	if (error) {
   1780   1.1  thorpej 		printf("%s: can't load rx DMA map %d, error = %d\n",
   1781   1.1  thorpej 		    sc->sc_dev.dv_xname, idx, error);
   1782   1.1  thorpej 		panic("tlp_add_rxbuf");	/* XXX */
   1783   1.1  thorpej 	}
   1784   1.1  thorpej 
   1785   1.1  thorpej 	bus_dmamap_sync(sc->sc_dmat, rxs->rxs_dmamap, 0,
   1786   1.1  thorpej 	    rxs->rxs_dmamap->dm_mapsize, BUS_DMASYNC_PREREAD);
   1787   1.1  thorpej 
   1788   1.1  thorpej 	TULIP_INIT_RXDESC(sc, idx);
   1789   1.1  thorpej 
   1790   1.1  thorpej 	return (0);
   1791   1.1  thorpej }
   1792   1.1  thorpej 
   1793   1.1  thorpej /*
   1794   1.1  thorpej  * tlp_crc32:
   1795   1.1  thorpej  *
   1796   1.1  thorpej  *	Compute the 32-bit CRC of the provided buffer.
   1797   1.1  thorpej  */
   1798   1.1  thorpej u_int32_t
   1799   1.1  thorpej tlp_crc32(buf, len)
   1800   1.1  thorpej 	const u_int8_t *buf;
   1801   1.1  thorpej 	size_t len;
   1802   1.1  thorpej {
   1803   1.1  thorpej 	static const u_int32_t crctab[] = {
   1804   1.1  thorpej 		0x00000000, 0x1db71064, 0x3b6e20c8, 0x26d930ac,
   1805   1.1  thorpej 		0x76dc4190, 0x6b6b51f4, 0x4db26158, 0x5005713c,
   1806   1.1  thorpej 		0xedb88320, 0xf00f9344, 0xd6d6a3e8, 0xcb61b38c,
   1807   1.1  thorpej 		0x9b64c2b0, 0x86d3d2d4, 0xa00ae278, 0xbdbdf21c
   1808   1.1  thorpej 	};
   1809   1.1  thorpej 	u_int32_t crc;
   1810   1.1  thorpej 	int i;
   1811   1.1  thorpej 
   1812   1.1  thorpej 	crc = 0xffffffff;
   1813   1.1  thorpej 	for (i = 0; i < len; i++) {
   1814   1.1  thorpej 		crc ^= buf[i];
   1815   1.1  thorpej 		crc = (crc >> 4) ^ crctab[crc & 0xf];
   1816   1.1  thorpej 		crc = (crc >> 4) ^ crctab[crc & 0xf];
   1817   1.1  thorpej 	}
   1818   1.1  thorpej 	return (crc);
   1819   1.1  thorpej }
   1820   1.1  thorpej 
   1821   1.1  thorpej /*
   1822   1.1  thorpej  * tlp_srom_crcok:
   1823   1.1  thorpej  *
   1824   1.1  thorpej  *	Check the CRC of the Tulip SROM.
   1825   1.1  thorpej  */
   1826   1.1  thorpej int
   1827   1.1  thorpej tlp_srom_crcok(romdata)
   1828   1.1  thorpej 	u_int8_t *romdata;
   1829   1.1  thorpej {
   1830   1.1  thorpej 	u_int32_t crc;
   1831   1.1  thorpej 
   1832   1.7  thorpej 	crc = tlp_crc32(romdata, TULIP_ROM_CRC32_CHECKSUM);
   1833   1.7  thorpej 	crc = (crc & 0xffff) ^ 0xffff;
   1834   1.7  thorpej 	if (crc == TULIP_ROM_GETW(romdata, TULIP_ROM_CRC32_CHECKSUM))
   1835   1.1  thorpej 		return (1);
   1836   1.1  thorpej 	return (0);
   1837   1.1  thorpej }
   1838   1.1  thorpej 
   1839   1.1  thorpej /*
   1840   1.7  thorpej  * tlp_parse_old_srom:
   1841   1.7  thorpej  *
   1842   1.7  thorpej  *	Parse old-format SROMs.
   1843   1.7  thorpej  *
   1844   1.7  thorpej  *	This routine is largely lifted from Matt Thomas's `de' driver.
   1845   1.7  thorpej  */
   1846   1.7  thorpej int
   1847   1.7  thorpej tlp_parse_old_srom(sc, enaddr)
   1848   1.7  thorpej 	struct tulip_softc *sc;
   1849   1.7  thorpej 	u_int8_t *enaddr;
   1850   1.7  thorpej {
   1851   1.7  thorpej 	static const u_int8_t testpat[] =
   1852   1.7  thorpej 	    { 0xff, 0, 0x55, 0xaa, 0xff, 0, 0x55, 0xaa };
   1853   1.7  thorpej 	int i;
   1854   1.7  thorpej 	u_int32_t cksum;
   1855   1.7  thorpej 
   1856   1.7  thorpej 	if (memcmp(&sc->sc_srom[0], &sc->sc_srom[16], 8) != 0) {
   1857   1.7  thorpej 		/*
   1858   1.7  thorpej 		 * Some vendors (e.g. ZNYX) don't use the standard
   1859   1.7  thorpej 		 * DEC Address ROM format, but rather just have an
   1860   1.7  thorpej 		 * Ethernet address in the first 6 bytes, maybe a
   1861   1.7  thorpej 		 * 2 byte checksum, and then all 0xff's.
   1862   1.7  thorpej 		 */
   1863   1.7  thorpej 		for (i = 8; i < 32; i++) {
   1864   1.7  thorpej 			if (sc->sc_srom[i] != 0xff)
   1865   1.7  thorpej 				return (0);
   1866   1.7  thorpej 		}
   1867   1.7  thorpej 
   1868   1.7  thorpej 		/*
   1869   1.7  thorpej 		 * Sanity check the Ethernet address:
   1870   1.7  thorpej 		 *
   1871   1.7  thorpej 		 *	- Make sure it's not multicast or locally
   1872   1.7  thorpej 		 *	  assigned
   1873   1.7  thorpej 		 *	- Make sure it has a non-0 OUI
   1874   1.7  thorpej 		 */
   1875   1.7  thorpej 		if (sc->sc_srom[0] & 3)
   1876   1.7  thorpej 			return (0);
   1877   1.7  thorpej 		if (sc->sc_srom[0] == 0 && sc->sc_srom[1] == 0 &&
   1878   1.7  thorpej 		    sc->sc_srom[2] == 0)
   1879   1.7  thorpej 			return (0);
   1880   1.7  thorpej 
   1881   1.7  thorpej 		memcpy(enaddr, sc->sc_srom, ETHER_ADDR_LEN);
   1882   1.7  thorpej 		return (1);
   1883   1.7  thorpej 	}
   1884   1.7  thorpej 
   1885   1.7  thorpej 	/*
   1886   1.7  thorpej 	 * Standard DEC Address ROM test.
   1887   1.7  thorpej 	 */
   1888   1.7  thorpej 
   1889   1.7  thorpej 	if (memcmp(&sc->sc_srom[24], testpat, 8) != 0)
   1890   1.7  thorpej 		return (0);
   1891   1.7  thorpej 
   1892   1.7  thorpej 	for (i = 0; i < 8; i++) {
   1893   1.7  thorpej 		if (sc->sc_srom[i] != sc->sc_srom[15 - i])
   1894   1.7  thorpej 			return (0);
   1895   1.7  thorpej 	}
   1896   1.7  thorpej 
   1897   1.7  thorpej 	memcpy(enaddr, sc->sc_srom, ETHER_ADDR_LEN);
   1898   1.7  thorpej 
   1899   1.7  thorpej 	cksum = *(u_int16_t *) &enaddr[0];
   1900   1.7  thorpej 
   1901   1.7  thorpej 	cksum <<= 1;
   1902   1.7  thorpej 	if (cksum > 0xffff)
   1903   1.7  thorpej 		cksum -= 0xffff;
   1904   1.7  thorpej 
   1905   1.7  thorpej 	cksum += *(u_int16_t *) &enaddr[2];
   1906   1.7  thorpej 	if (cksum > 0xffff)
   1907   1.7  thorpej 		cksum -= 0xffff;
   1908   1.7  thorpej 
   1909   1.7  thorpej 	cksum <<= 1;
   1910   1.7  thorpej 	if (cksum > 0xffff)
   1911   1.7  thorpej 		cksum -= 0xffff;
   1912   1.7  thorpej 
   1913   1.7  thorpej 	cksum += *(u_int16_t *) &enaddr[4];
   1914   1.7  thorpej 	if (cksum >= 0xffff)
   1915   1.7  thorpej 		cksum -= 0xffff;
   1916   1.7  thorpej 
   1917   1.7  thorpej 	if (cksum != *(u_int16_t *) &sc->sc_srom[6])
   1918   1.7  thorpej 		return (0);
   1919   1.7  thorpej 
   1920   1.7  thorpej 	return (1);
   1921   1.7  thorpej }
   1922   1.7  thorpej 
   1923   1.7  thorpej /*
   1924   1.1  thorpej  * tlp_filter_setup:
   1925   1.1  thorpej  *
   1926   1.1  thorpej  *	Set the Tulip's receive filter.
   1927   1.1  thorpej  */
   1928   1.1  thorpej void
   1929   1.1  thorpej tlp_filter_setup(sc)
   1930   1.1  thorpej 	struct tulip_softc *sc;
   1931   1.1  thorpej {
   1932   1.1  thorpej 	struct ethercom *ec = &sc->sc_ethercom;
   1933   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1934   1.1  thorpej 	struct ether_multi *enm;
   1935   1.1  thorpej 	struct ether_multistep step;
   1936   1.1  thorpej 	__volatile u_int32_t *sp;
   1937   1.1  thorpej 	u_int8_t enaddr[ETHER_ADDR_LEN];
   1938   1.1  thorpej 	u_int32_t hash;
   1939   1.1  thorpej 	int cnt;
   1940   1.1  thorpej 
   1941   1.5  thorpej 	DPRINTF(sc, ("%s: tlp_filter_setup: sc_flags 0x%08x\n",
   1942   1.1  thorpej 	    sc->sc_dev.dv_xname, sc->sc_flags));
   1943   1.1  thorpej 
   1944   1.1  thorpej 	memcpy(enaddr, LLADDR(ifp->if_sadl), ETHER_ADDR_LEN);
   1945   1.1  thorpej 
   1946   1.1  thorpej 	/*
   1947   1.1  thorpej 	 * If there are transmissions pending, wait until they have
   1948   1.1  thorpej 	 * completed.
   1949   1.1  thorpej 	 */
   1950   1.4  thorpej 	if (SIMPLEQ_FIRST(&sc->sc_txdirtyq) != NULL ||
   1951   1.4  thorpej 	    (sc->sc_flags & TULIPF_DOING_SETUP) != 0) {
   1952   1.1  thorpej 		sc->sc_flags |= TULIPF_WANT_SETUP;
   1953   1.5  thorpej 		DPRINTF(sc, ("%s: tlp_filter_setup: deferring\n",
   1954   1.1  thorpej 		    sc->sc_dev.dv_xname));
   1955   1.1  thorpej 		return;
   1956   1.1  thorpej 	}
   1957   1.1  thorpej 	sc->sc_flags &= ~TULIPF_WANT_SETUP;
   1958   1.1  thorpej 
   1959   1.1  thorpej 	/*
   1960   1.1  thorpej 	 * If we're running, idle the transmit and receive engines.  If
   1961   1.1  thorpej 	 * we're NOT running, we're being called from tlp_init(), and our
   1962   1.1  thorpej 	 * writing OPMODE will start the transmit and receive processes
   1963   1.1  thorpej 	 * in motion.
   1964   1.1  thorpej 	 */
   1965   1.1  thorpej 	if (ifp->if_flags & IFF_RUNNING)
   1966   1.1  thorpej 		tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   1967   1.1  thorpej 
   1968   1.1  thorpej 	sc->sc_opmode &= ~(OPMODE_PR|OPMODE_PM);
   1969   1.1  thorpej 
   1970   1.1  thorpej 	if (ifp->if_flags & IFF_PROMISC) {
   1971   1.1  thorpej 		sc->sc_opmode |= OPMODE_PR;
   1972   1.1  thorpej 		goto allmulti;
   1973   1.1  thorpej 	}
   1974   1.1  thorpej 
   1975   1.1  thorpej 	/*
   1976   1.1  thorpej 	 * Try Perfect filtering first.
   1977   1.1  thorpej 	 */
   1978   1.1  thorpej 
   1979   1.1  thorpej 	sc->sc_filtmode = TDCTL_Tx_FT_PERFECT;
   1980   1.1  thorpej 	sp = TULIP_CDSP(sc);
   1981   1.1  thorpej 	memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
   1982   1.1  thorpej 	cnt = 0;
   1983   1.1  thorpej 	ETHER_FIRST_MULTI(step, ec, enm);
   1984   1.1  thorpej 	while (enm != NULL) {
   1985   1.1  thorpej 		if (bcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
   1986   1.1  thorpej 			/*
   1987   1.1  thorpej 			 * We must listen to a range of multicast addresses.
   1988   1.1  thorpej 			 * For now, just accept all multicasts, rather than
   1989   1.1  thorpej 			 * trying to set only those filter bits needed to match
   1990   1.1  thorpej 			 * the range.  (At this time, the only use of address
   1991   1.1  thorpej 			 * ranges is for IP multicast routing, for which the
   1992   1.1  thorpej 			 * range is big enough to require all bits set.)
   1993   1.1  thorpej 			 */
   1994   1.1  thorpej 			goto allmulti;
   1995   1.1  thorpej 		}
   1996   1.1  thorpej 		if (cnt == (TULIP_MAXADDRS - 2)) {
   1997   1.1  thorpej 			/*
   1998   1.1  thorpej 			 * We already have our multicast limit (still need
   1999   1.1  thorpej 			 * our station address and broadcast).  Go to
   2000   1.1  thorpej 			 * Hash-Perfect mode.
   2001   1.1  thorpej 			 */
   2002   1.1  thorpej 			goto hashperfect;
   2003   1.1  thorpej 		}
   2004   1.1  thorpej 		*sp++ = ((u_int16_t *) enm->enm_addrlo)[0];
   2005   1.1  thorpej 		*sp++ = ((u_int16_t *) enm->enm_addrlo)[1];
   2006   1.1  thorpej 		*sp++ = ((u_int16_t *) enm->enm_addrlo)[2];
   2007   1.1  thorpej 		ETHER_NEXT_MULTI(step, enm);
   2008   1.1  thorpej 	}
   2009   1.1  thorpej 
   2010   1.1  thorpej 	if (ifp->if_flags & IFF_BROADCAST) {
   2011   1.1  thorpej 		/* ...and the broadcast address. */
   2012   1.1  thorpej 		cnt++;
   2013   1.1  thorpej 		*sp++ = 0xffff;
   2014   1.1  thorpej 		*sp++ = 0xffff;
   2015   1.1  thorpej 		*sp++ = 0xffff;
   2016   1.1  thorpej 	}
   2017   1.1  thorpej 
   2018   1.1  thorpej 	/* Pad the rest with our station address. */
   2019   1.1  thorpej 	for (; cnt < TULIP_MAXADDRS; cnt++) {
   2020   1.1  thorpej 		*sp++ = ((u_int16_t *) enaddr)[0];
   2021   1.1  thorpej 		*sp++ = ((u_int16_t *) enaddr)[1];
   2022   1.1  thorpej 		*sp++ = ((u_int16_t *) enaddr)[2];
   2023   1.1  thorpej 	}
   2024   1.1  thorpej 	ifp->if_flags &= ~IFF_ALLMULTI;
   2025   1.1  thorpej 	goto setit;
   2026   1.1  thorpej 
   2027   1.1  thorpej  hashperfect:
   2028   1.1  thorpej 	/*
   2029   1.1  thorpej 	 * Try Hash-Perfect mode.
   2030   1.1  thorpej 	 */
   2031   1.1  thorpej 
   2032   1.1  thorpej 	/*
   2033   1.1  thorpej 	 * Some 21140 chips have broken Hash-Perfect modes.  On these
   2034   1.1  thorpej 	 * chips, we simply use Hash-Only mode, and put our station
   2035   1.1  thorpej 	 * address into the filter.
   2036   1.1  thorpej 	 */
   2037   1.1  thorpej 	if (sc->sc_chip == TULIP_CHIP_21140)
   2038   1.1  thorpej 		sc->sc_filtmode = TDCTL_Tx_FT_HASHONLY;
   2039   1.1  thorpej 	else
   2040   1.1  thorpej 		sc->sc_filtmode = TDCTL_Tx_FT_HASH;
   2041   1.1  thorpej 	sp = TULIP_CDSP(sc);
   2042   1.1  thorpej 	memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
   2043   1.1  thorpej 	ETHER_FIRST_MULTI(step, ec, enm);
   2044   1.1  thorpej 	while (enm != NULL) {
   2045   1.1  thorpej 		if (bcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
   2046   1.1  thorpej 			/*
   2047   1.1  thorpej 			 * We must listen to a range of multicast addresses.
   2048   1.1  thorpej 			 * For now, just accept all multicasts, rather than
   2049   1.1  thorpej 			 * trying to set only those filter bits needed to match
   2050   1.1  thorpej 			 * the range.  (At this time, the only use of address
   2051   1.1  thorpej 			 * ranges is for IP multicast routing, for which the
   2052   1.1  thorpej 			 * range is big enough to require all bits set.)
   2053   1.1  thorpej 			 */
   2054   1.1  thorpej 			goto allmulti;
   2055   1.1  thorpej 		}
   2056   1.1  thorpej 		hash = tlp_mchash(enm->enm_addrlo);
   2057   1.1  thorpej 		sp[hash >> 4] |= 1 << (hash & 0xf);
   2058   1.1  thorpej 		ETHER_NEXT_MULTI(step, enm);
   2059   1.1  thorpej 	}
   2060   1.1  thorpej 
   2061   1.1  thorpej 	if (ifp->if_flags & IFF_BROADCAST) {
   2062   1.1  thorpej 		/* ...and the broadcast address. */
   2063   1.1  thorpej 		hash = tlp_mchash(etherbroadcastaddr);
   2064   1.1  thorpej 		sp[hash >> 4] |= 1 << (hash & 0xf);
   2065   1.1  thorpej 	}
   2066   1.1  thorpej 
   2067   1.1  thorpej 	if (sc->sc_filtmode == TDCTL_Tx_FT_HASHONLY) {
   2068   1.1  thorpej 		/* ...and our station address. */
   2069   1.1  thorpej 		hash = tlp_mchash(enaddr);
   2070   1.1  thorpej 		sp[hash >> 4] |= 1 << (hash & 0xf);
   2071   1.1  thorpej 	} else {
   2072   1.1  thorpej 		/*
   2073   1.1  thorpej 		 * Hash-Perfect mode; put our station address after
   2074   1.1  thorpej 		 * the hash table.
   2075   1.1  thorpej 		 */
   2076   1.1  thorpej 		sp[39] = ((u_int16_t *) enaddr)[0];
   2077   1.1  thorpej 		sp[40] = ((u_int16_t *) enaddr)[1];
   2078   1.1  thorpej 		sp[41] = ((u_int16_t *) enaddr)[2];
   2079   1.1  thorpej 	}
   2080   1.1  thorpej 	ifp->if_flags &= ~IFF_ALLMULTI;
   2081   1.1  thorpej 	goto setit;
   2082   1.1  thorpej 
   2083   1.1  thorpej  allmulti:
   2084   1.1  thorpej 	/*
   2085   1.1  thorpej 	 * Use Perfect filter mode.  First address is the broadcast address,
   2086   1.1  thorpej 	 * and pad the rest with our station address.  We'll set Pass-all-
   2087   1.1  thorpej 	 * multicast in OPMODE below.
   2088   1.1  thorpej 	 */
   2089   1.1  thorpej 	sc->sc_filtmode = TDCTL_Tx_FT_PERFECT;
   2090   1.1  thorpej 	sp = TULIP_CDSP(sc);
   2091   1.1  thorpej 	memset(TULIP_CDSP(sc), 0, TULIP_SETUP_PACKET_LEN);
   2092   1.1  thorpej 	cnt = 0;
   2093   1.1  thorpej 	if (ifp->if_flags & IFF_BROADCAST) {
   2094   1.1  thorpej 		cnt++;
   2095   1.1  thorpej 		*sp++ = 0xffff;
   2096   1.1  thorpej 		*sp++ = 0xffff;
   2097   1.1  thorpej 		*sp++ = 0xffff;
   2098   1.1  thorpej 	}
   2099   1.1  thorpej 	for (; cnt < TULIP_MAXADDRS; cnt++) {
   2100   1.1  thorpej 		*sp++ = ((u_int16_t *) enaddr)[0];
   2101   1.1  thorpej 		*sp++ = ((u_int16_t *) enaddr)[1];
   2102   1.1  thorpej 		*sp++ = ((u_int16_t *) enaddr)[2];
   2103   1.1  thorpej 	}
   2104   1.1  thorpej 	ifp->if_flags |= IFF_ALLMULTI;
   2105   1.1  thorpej 
   2106   1.1  thorpej  setit:
   2107   1.1  thorpej 	if (ifp->if_flags & IFF_ALLMULTI)
   2108   1.1  thorpej 		sc->sc_opmode |= OPMODE_PM;
   2109   1.1  thorpej 
   2110   1.1  thorpej 	/* Sync the setup packet buffer. */
   2111   1.1  thorpej 	TULIP_CDSPSYNC(sc, BUS_DMASYNC_PREWRITE);
   2112   1.1  thorpej 
   2113   1.1  thorpej 	/*
   2114   1.1  thorpej 	 * Fill in the setup packet descriptor.
   2115   1.1  thorpej 	 */
   2116   1.1  thorpej 	sc->sc_setup_desc.td_bufaddr1 = TULIP_CDSPADDR(sc);
   2117   1.1  thorpej 	sc->sc_setup_desc.td_bufaddr2 = TULIP_CDTXADDR(sc, sc->sc_txnext);
   2118   1.1  thorpej 	sc->sc_setup_desc.td_ctl =
   2119   1.1  thorpej 	    (TULIP_SETUP_PACKET_LEN << TDCTL_SIZE1_SHIFT) |
   2120   1.1  thorpej 	    sc->sc_filtmode | TDCTL_Tx_SET | TDCTL_Tx_FS | TDCTL_Tx_LS |
   2121   1.4  thorpej 	    TDCTL_Tx_IC | TDCTL_CH;
   2122   1.1  thorpej 	sc->sc_setup_desc.td_status = TDSTAT_OWN;
   2123   1.1  thorpej 	TULIP_CDSDSYNC(sc, BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
   2124   1.1  thorpej 
   2125   1.1  thorpej 	/*
   2126   1.1  thorpej 	 * Write the address of the setup descriptor.  This also has
   2127   1.1  thorpej 	 * the side effect of giving the transmit ring to the chip,
   2128   1.1  thorpej 	 * since the setup descriptor points to the next available
   2129   1.1  thorpej 	 * descriptor in the ring.
   2130   1.1  thorpej 	 */
   2131   1.1  thorpej 	TULIP_WRITE(sc, CSR_TXLIST, TULIP_CDSDADDR(sc));
   2132   1.1  thorpej 
   2133   1.1  thorpej 	/*
   2134   1.1  thorpej 	 * Set the OPMODE register.  This will also resume the
   2135   1.1  thorpej 	 * transmit transmit process we idled above.
   2136   1.1  thorpej 	 */
   2137   1.1  thorpej 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   2138   1.1  thorpej 
   2139   1.4  thorpej 	sc->sc_flags |= TULIPF_DOING_SETUP;
   2140   1.4  thorpej 
   2141   1.1  thorpej 	/*
   2142   1.1  thorpej 	 * Kick the transmitter; this will cause the Tulip to
   2143   1.1  thorpej 	 * read the setup descriptor.
   2144   1.1  thorpej 	 */
   2145   1.1  thorpej 	/* XXX USE AUTOPOLLING? */
   2146   1.1  thorpej 	TULIP_WRITE(sc, CSR_TXPOLL, TXPOLL_TPD);
   2147   1.1  thorpej 
   2148   1.4  thorpej 	/* Set up a watchdog timer in case the chip flakes out. */
   2149   1.4  thorpej 	ifp->if_timer = 5;
   2150   1.4  thorpej 
   2151   1.5  thorpej 	DPRINTF(sc, ("%s: tlp_filter_setup: returning\n", sc->sc_dev.dv_xname));
   2152   1.1  thorpej }
   2153   1.1  thorpej 
   2154   1.1  thorpej /*
   2155   1.1  thorpej  * tlp_winb_filter_setup:
   2156   1.1  thorpej  *
   2157   1.1  thorpej  *	Set the Winbond 89C840F's receive filter.
   2158   1.1  thorpej  */
   2159   1.1  thorpej void
   2160   1.1  thorpej tlp_winb_filter_setup(sc)
   2161   1.1  thorpej 	struct tulip_softc *sc;
   2162   1.1  thorpej {
   2163   1.1  thorpej 	struct ethercom *ec = &sc->sc_ethercom;
   2164   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2165   1.1  thorpej 	struct ether_multi *enm;
   2166   1.1  thorpej 	struct ether_multistep step;
   2167   1.1  thorpej 	u_int32_t hash, mchash[2];
   2168   1.1  thorpej 
   2169   1.5  thorpej 	DPRINTF(sc, ("%s: tlp_winb_filter_setup: sc_flags 0x%08x\n",
   2170   1.1  thorpej 	    sc->sc_dev.dv_xname, sc->sc_flags));
   2171   1.1  thorpej 
   2172   1.5  thorpej 	sc->sc_opmode &= ~(OPMODE_WINB_APP|OPMODE_WINB_AMP|OPMODE_WINB_ABP);
   2173   1.5  thorpej 
   2174   1.5  thorpej 	if (ifp->if_flags & IFF_MULTICAST)
   2175   1.5  thorpej 		sc->sc_opmode |= OPMODE_WINB_AMP;
   2176   1.5  thorpej 
   2177   1.5  thorpej 	if (ifp->if_flags & IFF_BROADCAST)
   2178   1.5  thorpej 		sc->sc_opmode |= OPMODE_WINB_ABP;
   2179   1.1  thorpej 
   2180   1.1  thorpej 	if (ifp->if_flags & IFF_PROMISC) {
   2181   1.5  thorpej 		sc->sc_opmode |= OPMODE_WINB_APP;
   2182   1.1  thorpej 		goto allmulti;
   2183   1.1  thorpej 	}
   2184   1.1  thorpej 
   2185   1.1  thorpej 	mchash[0] = mchash[1] = 0;
   2186   1.1  thorpej 
   2187   1.1  thorpej 	ETHER_FIRST_MULTI(step, ec, enm);
   2188   1.1  thorpej 	while (enm != NULL) {
   2189   1.1  thorpej 		if (bcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
   2190   1.1  thorpej 			/*
   2191   1.1  thorpej 			 * We must listen to a range of multicast addresses.
   2192   1.1  thorpej 			 * For now, just accept all multicasts, rather than
   2193   1.1  thorpej 			 * trying to set only those filter bits needed to match
   2194   1.1  thorpej 			 * the range.  (At this time, the only use of address
   2195   1.1  thorpej 			 * ranges is for IP multicast routing, for which the
   2196   1.1  thorpej 			 * range is big enough to require all bits set.)
   2197   1.1  thorpej 			 */
   2198   1.1  thorpej 			goto allmulti;
   2199   1.1  thorpej 		}
   2200   1.1  thorpej 
   2201   1.1  thorpej 		/*
   2202   1.1  thorpej 		 * According to the FreeBSD `wb' driver, yes, you
   2203   1.1  thorpej 		 * really do invert the hash.
   2204   1.1  thorpej 		 */
   2205   1.1  thorpej 		hash = (~(tlp_crc32(enm->enm_addrlo, ETHER_ADDR_LEN) >> 26))
   2206   1.1  thorpej 		    & 0x3f;
   2207   1.1  thorpej 		mchash[hash >> 5] |= 1 << (hash & 0x1f);
   2208   1.1  thorpej 		ETHER_NEXT_MULTI(step, enm);
   2209   1.1  thorpej 	}
   2210   1.1  thorpej 	ifp->if_flags &= ~IFF_ALLMULTI;
   2211   1.1  thorpej 	goto setit;
   2212   1.1  thorpej 
   2213   1.1  thorpej  allmulti:
   2214   1.1  thorpej 	ifp->if_flags |= IFF_ALLMULTI;
   2215   1.1  thorpej 	mchash[0] = mchash[1] = 0xffffffff;
   2216   1.1  thorpej 
   2217   1.1  thorpej  setit:
   2218   1.5  thorpej 	TULIP_WRITE(sc, CSR_WINB_CMA0, mchash[0]);
   2219   1.5  thorpej 	TULIP_WRITE(sc, CSR_WINB_CMA1, mchash[1]);
   2220   1.1  thorpej 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   2221   1.5  thorpej 	DPRINTF(sc, ("%s: tlp_winb_filter_setup: returning\n",
   2222   1.1  thorpej 	    sc->sc_dev.dv_xname));
   2223   1.1  thorpej }
   2224   1.1  thorpej 
   2225   1.1  thorpej /*
   2226   1.1  thorpej  * tlp_idle:
   2227   1.1  thorpej  *
   2228   1.1  thorpej  *	Cause the transmit and/or receive processes to go idle.
   2229   1.1  thorpej  */
   2230   1.1  thorpej void
   2231   1.1  thorpej tlp_idle(sc, bits)
   2232   1.1  thorpej 	struct tulip_softc *sc;
   2233   1.1  thorpej 	u_int32_t bits;
   2234   1.1  thorpej {
   2235   1.1  thorpej 	static const char *tx_state_names[] = {
   2236   1.1  thorpej 		"STOPPED",
   2237   1.1  thorpej 		"RUNNING - FETCH",
   2238   1.1  thorpej 		"RUNNING - WAIT",
   2239   1.1  thorpej 		"RUNNING - READING",
   2240   1.1  thorpej 		"-- RESERVED --",
   2241   1.1  thorpej 		"RUNNING - SETUP",
   2242   1.1  thorpej 		"SUSPENDED",
   2243   1.1  thorpej 		"RUNNING - CLOSE",
   2244   1.1  thorpej 	};
   2245   1.1  thorpej 	static const char *rx_state_names[] = {
   2246   1.1  thorpej 		"STOPPED",
   2247   1.1  thorpej 		"RUNNING - FETCH",
   2248   1.1  thorpej 		"RUNNING - CHECK",
   2249   1.1  thorpej 		"RUNNING - WAIT",
   2250   1.1  thorpej 		"SUSPENDED",
   2251   1.1  thorpej 		"RUNNING - CLOSE",
   2252   1.1  thorpej 		"RUNNING - FLUSH",
   2253   1.1  thorpej 		"RUNNING - QUEUE",
   2254   1.1  thorpej 	};
   2255   1.1  thorpej 	u_int32_t csr, ackmask = 0;
   2256   1.1  thorpej 	int i;
   2257   1.1  thorpej 
   2258   1.1  thorpej 	if (bits & OPMODE_ST)
   2259   1.1  thorpej 		ackmask |= STATUS_TPS;
   2260   1.1  thorpej 
   2261   1.1  thorpej 	if (bits & OPMODE_SR)
   2262   1.1  thorpej 		ackmask |= STATUS_RPS;
   2263   1.1  thorpej 
   2264   1.1  thorpej 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode & ~bits);
   2265   1.1  thorpej 
   2266   1.1  thorpej 	for (i = 0; i < 1000; i++) {
   2267   1.1  thorpej 		if (TULIP_ISSET(sc, CSR_STATUS, ackmask) == ackmask)
   2268   1.1  thorpej 			break;
   2269   1.1  thorpej 		delay(10);
   2270   1.1  thorpej 	}
   2271   1.1  thorpej 
   2272   1.1  thorpej 	csr = TULIP_READ(sc, CSR_STATUS);
   2273   1.1  thorpej 	if ((csr & ackmask) != ackmask) {
   2274   1.1  thorpej 		if ((bits & OPMODE_ST) != 0 && (csr & STATUS_TPS) == 0 &&
   2275   1.1  thorpej 		    (csr & STATUS_TS) != STATUS_TS_STOPPED)
   2276   1.1  thorpej 			printf("%s: transmit process failed to idle: "
   2277   1.1  thorpej 			    "state %s\n", sc->sc_dev.dv_xname,
   2278   1.1  thorpej 			    tx_state_names[(csr & STATUS_TS) >> 20]);
   2279   1.1  thorpej 		if ((bits & OPMODE_SR) != 0 && (csr & STATUS_RPS) == 0 &&
   2280   1.1  thorpej 		    (csr & STATUS_RS) != STATUS_RS_STOPPED)
   2281   1.1  thorpej 			printf("%s: receive process failed to idle: "
   2282   1.1  thorpej 			    "state %s\n", sc->sc_dev.dv_xname,
   2283   1.1  thorpej 			    rx_state_names[(csr & STATUS_RS) >> 17]);
   2284   1.1  thorpej 	}
   2285   1.1  thorpej 	TULIP_WRITE(sc, CSR_STATUS, ackmask);
   2286   1.1  thorpej }
   2287   1.1  thorpej 
   2288   1.1  thorpej /*****************************************************************************
   2289   1.1  thorpej  * Generic media support functions.
   2290   1.1  thorpej  *****************************************************************************/
   2291   1.1  thorpej 
   2292   1.1  thorpej /*
   2293   1.1  thorpej  * tlp_mediastatus:	[ifmedia interface function]
   2294   1.1  thorpej  *
   2295   1.1  thorpej  *	Query the current media.
   2296   1.1  thorpej  */
   2297   1.1  thorpej void
   2298   1.1  thorpej tlp_mediastatus(ifp, ifmr)
   2299   1.1  thorpej 	struct ifnet *ifp;
   2300   1.1  thorpej 	struct ifmediareq *ifmr;
   2301   1.1  thorpej {
   2302   1.1  thorpej 	struct tulip_softc *sc = ifp->if_softc;
   2303   1.1  thorpej 
   2304   1.1  thorpej 	(*sc->sc_mediasw->tmsw_get)(sc, ifmr);
   2305   1.1  thorpej }
   2306   1.1  thorpej 
   2307   1.1  thorpej /*
   2308   1.1  thorpej  * tlp_mediachange:	[ifmedia interface function]
   2309   1.1  thorpej  *
   2310   1.1  thorpej  *	Update the current media.
   2311   1.1  thorpej  */
   2312   1.1  thorpej int
   2313   1.1  thorpej tlp_mediachange(ifp)
   2314   1.1  thorpej 	struct ifnet *ifp;
   2315   1.1  thorpej {
   2316   1.1  thorpej 	struct tulip_softc *sc = ifp->if_softc;
   2317   1.1  thorpej 
   2318   1.1  thorpej 	return ((*sc->sc_mediasw->tmsw_set)(sc));
   2319   1.1  thorpej }
   2320   1.1  thorpej 
   2321   1.1  thorpej /*****************************************************************************
   2322   1.1  thorpej  * Support functions for MII-attached media.
   2323   1.1  thorpej  *****************************************************************************/
   2324   1.1  thorpej 
   2325   1.1  thorpej /*
   2326   1.1  thorpej  * tlp_mii_tick:
   2327   1.1  thorpej  *
   2328   1.1  thorpej  *	One second timer, used to tick the MII.
   2329   1.1  thorpej  */
   2330   1.1  thorpej void
   2331   1.1  thorpej tlp_mii_tick(arg)
   2332   1.1  thorpej 	void *arg;
   2333   1.1  thorpej {
   2334   1.1  thorpej 	struct tulip_softc *sc = arg;
   2335   1.1  thorpej 	int s;
   2336   1.1  thorpej 
   2337   1.1  thorpej 	s = splnet();
   2338   1.1  thorpej 	mii_tick(&sc->sc_mii);
   2339   1.1  thorpej 	splx(s);
   2340   1.1  thorpej 
   2341   1.6  thorpej 	timeout(sc->sc_tick, sc, hz);
   2342   1.1  thorpej }
   2343   1.1  thorpej 
   2344   1.1  thorpej /*
   2345   1.1  thorpej  * tlp_mii_statchg:	[mii interface function]
   2346   1.1  thorpej  *
   2347   1.1  thorpej  *	Callback from PHY when media changes.
   2348   1.1  thorpej  */
   2349   1.1  thorpej void
   2350   1.1  thorpej tlp_mii_statchg(self)
   2351   1.1  thorpej 	struct device *self;
   2352   1.1  thorpej {
   2353   1.1  thorpej 	struct tulip_softc *sc = (struct tulip_softc *)self;
   2354   1.1  thorpej 
   2355   1.1  thorpej 	/* Idle the transmit and receive processes. */
   2356   1.1  thorpej 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   2357   1.1  thorpej 
   2358   1.1  thorpej 	/*
   2359   1.1  thorpej 	 * XXX What about Heartbeat Disable?  Is it magically frobbed
   2360   1.1  thorpej 	 * XXX by the PHY?  I hope so...
   2361   1.1  thorpej 	 */
   2362   1.1  thorpej 
   2363   1.7  thorpej 	sc->sc_opmode &= ~(OPMODE_TTM|OPMODE_FD);
   2364   1.7  thorpej 
   2365   1.1  thorpej 	if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_10_T)
   2366   1.1  thorpej 		sc->sc_opmode |= OPMODE_TTM;
   2367   1.1  thorpej 
   2368   1.1  thorpej 	if (sc->sc_mii.mii_media_active & IFM_FDX)
   2369   1.1  thorpej 		sc->sc_opmode |= OPMODE_FD;
   2370   1.1  thorpej 
   2371   1.1  thorpej 	/*
   2372   1.1  thorpej 	 * Write new OPMODE bits.  This also restarts the transmit
   2373   1.1  thorpej 	 * and receive processes.
   2374   1.1  thorpej 	 */
   2375   1.1  thorpej 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   2376   1.1  thorpej 
   2377   1.1  thorpej 	/* XXX Update ifp->if_baudrate */
   2378   1.1  thorpej }
   2379   1.1  thorpej 
   2380   1.1  thorpej /*
   2381   1.5  thorpej  * tlp_winb_mii_statchg: [mii interface function]
   2382   1.5  thorpej  *
   2383   1.5  thorpej  *	Callback from PHY when media changes.  This version is
   2384   1.5  thorpej  *	for the Winbond 89C840F, which has different OPMODE bits.
   2385   1.5  thorpej  */
   2386   1.5  thorpej void
   2387   1.5  thorpej tlp_winb_mii_statchg(self)
   2388   1.5  thorpej 	struct device *self;
   2389   1.5  thorpej {
   2390   1.5  thorpej 	struct tulip_softc *sc = (struct tulip_softc *)self;
   2391   1.5  thorpej 
   2392   1.5  thorpej 	/* Idle the transmit and receive processes. */
   2393   1.5  thorpej 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   2394   1.5  thorpej 
   2395   1.5  thorpej 	/*
   2396   1.5  thorpej 	 * XXX What about Heartbeat Disable?  Is it magically frobbed
   2397   1.5  thorpej 	 * XXX by the PHY?  I hope so...
   2398   1.5  thorpej 	 */
   2399   1.5  thorpej 
   2400   1.7  thorpej 	sc->sc_opmode &= ~(OPMODE_WINB_FES|OPMODE_FD);
   2401   1.7  thorpej 
   2402   1.5  thorpej 	if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_100_TX)
   2403   1.5  thorpej 		sc->sc_opmode |= OPMODE_WINB_FES;
   2404   1.5  thorpej 
   2405   1.5  thorpej 	if (sc->sc_mii.mii_media_active & IFM_FDX)
   2406   1.5  thorpej 		sc->sc_opmode |= OPMODE_FD;
   2407   1.5  thorpej 
   2408   1.5  thorpej 	/*
   2409   1.5  thorpej 	 * Write new OPMODE bits.  This also restarts the transmit
   2410   1.5  thorpej 	 * and receive processes.
   2411   1.5  thorpej 	 */
   2412   1.5  thorpej 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   2413   1.5  thorpej 
   2414   1.5  thorpej 	/* XXX Update ifp->if_baudrate */
   2415   1.5  thorpej }
   2416   1.5  thorpej 
   2417   1.5  thorpej /*
   2418   1.1  thorpej  * tlp_mii_getmedia:
   2419   1.1  thorpej  *
   2420   1.1  thorpej  *	Callback from ifmedia to request current media status.
   2421   1.1  thorpej  */
   2422   1.1  thorpej void
   2423   1.1  thorpej tlp_mii_getmedia(sc, ifmr)
   2424   1.1  thorpej 	struct tulip_softc *sc;
   2425   1.1  thorpej 	struct ifmediareq *ifmr;
   2426   1.1  thorpej {
   2427   1.1  thorpej 
   2428   1.1  thorpej 	mii_pollstat(&sc->sc_mii);
   2429   1.1  thorpej 	ifmr->ifm_status = sc->sc_mii.mii_media_status;
   2430   1.1  thorpej 	ifmr->ifm_active = sc->sc_mii.mii_media_active;
   2431   1.1  thorpej }
   2432   1.1  thorpej 
   2433   1.1  thorpej /*
   2434   1.1  thorpej  * tlp_mii_setmedia:
   2435   1.1  thorpej  *
   2436   1.1  thorpej  *	Callback from ifmedia to request new media setting.
   2437   1.1  thorpej  */
   2438   1.1  thorpej int
   2439   1.1  thorpej tlp_mii_setmedia(sc)
   2440   1.1  thorpej 	struct tulip_softc *sc;
   2441   1.1  thorpej {
   2442   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2443   1.1  thorpej 
   2444   1.1  thorpej 	if (ifp->if_flags & IFF_UP)
   2445   1.1  thorpej 		mii_mediachg(&sc->sc_mii);
   2446   1.1  thorpej 	return (0);
   2447   1.1  thorpej }
   2448   1.1  thorpej 
   2449   1.1  thorpej #define	MII_EMIT(sc, x)							\
   2450   1.1  thorpej do {									\
   2451   1.1  thorpej 	TULIP_WRITE((sc), CSR_MIIROM, (x));				\
   2452   1.1  thorpej 	delay(1);							\
   2453   1.1  thorpej } while (0)
   2454   1.1  thorpej 
   2455   1.1  thorpej /*
   2456   1.1  thorpej  * tlp_sio_mii_sync:
   2457   1.1  thorpej  *
   2458   1.1  thorpej  *	Synchronize the SIO-attached MII.
   2459   1.1  thorpej  */
   2460   1.1  thorpej void
   2461   1.1  thorpej tlp_sio_mii_sync(sc)
   2462   1.1  thorpej 	struct tulip_softc *sc;
   2463   1.1  thorpej {
   2464   1.1  thorpej 	u_int32_t miirom;
   2465   1.1  thorpej 	int i;
   2466   1.1  thorpej 
   2467   1.1  thorpej 	miirom = MIIROM_MIIDIR|MIIROM_MDO;
   2468   1.1  thorpej 
   2469   1.1  thorpej 	MII_EMIT(sc, miirom);
   2470   1.1  thorpej 	for (i = 0; i < 32; i++) {
   2471   1.1  thorpej 		MII_EMIT(sc, miirom | MIIROM_MDC);
   2472   1.1  thorpej 		MII_EMIT(sc, miirom);
   2473   1.1  thorpej 	}
   2474   1.1  thorpej }
   2475   1.1  thorpej 
   2476   1.1  thorpej /*
   2477   1.1  thorpej  * tlp_sio_mii_sendbits:
   2478   1.1  thorpej  *
   2479   1.1  thorpej  *	Send a series of bits out the SIO to the MII.
   2480   1.1  thorpej  */
   2481   1.1  thorpej void
   2482   1.1  thorpej tlp_sio_mii_sendbits(sc, data, nbits)
   2483   1.1  thorpej 	struct tulip_softc *sc;
   2484   1.1  thorpej 	u_int32_t data;
   2485   1.1  thorpej 	int nbits;
   2486   1.1  thorpej {
   2487   1.1  thorpej 	u_int32_t miirom, i;
   2488   1.1  thorpej 
   2489   1.1  thorpej 	miirom = MIIROM_MIIDIR;
   2490   1.1  thorpej 	MII_EMIT(sc, miirom);
   2491   1.1  thorpej 
   2492   1.1  thorpej 	for (i = 1 << (nbits - 1); i != 0; i >>= 1) {
   2493   1.1  thorpej 		if (data & i)
   2494   1.1  thorpej 			miirom |= MIIROM_MDO;
   2495   1.1  thorpej 		else
   2496   1.1  thorpej 			miirom &= ~MIIROM_MDO;
   2497   1.1  thorpej 		MII_EMIT(sc, miirom);
   2498   1.1  thorpej 		MII_EMIT(sc, miirom|MIIROM_MDC);
   2499   1.1  thorpej 		MII_EMIT(sc, miirom);
   2500   1.1  thorpej 	}
   2501   1.1  thorpej }
   2502   1.1  thorpej 
   2503   1.1  thorpej /*
   2504   1.1  thorpej  * tlp_sio_mii_readreg:
   2505   1.1  thorpej  *
   2506   1.1  thorpej  *	Read a PHY register via SIO-attached MII.
   2507   1.1  thorpej  */
   2508   1.1  thorpej int
   2509   1.1  thorpej tlp_sio_mii_readreg(self, phy, reg)
   2510   1.1  thorpej 	struct device *self;
   2511   1.1  thorpej 	int phy, reg;
   2512   1.1  thorpej {
   2513   1.1  thorpej 	struct tulip_softc *sc = (void *) self;
   2514   1.1  thorpej 	int val = 0, err = 0, i;
   2515   1.1  thorpej 
   2516   1.1  thorpej 	tlp_sio_mii_sync(sc);
   2517   1.1  thorpej 
   2518   1.1  thorpej 	tlp_sio_mii_sendbits(sc, MII_COMMAND_START, 2);
   2519   1.1  thorpej 	tlp_sio_mii_sendbits(sc, MII_COMMAND_READ, 2);
   2520   1.1  thorpej 	tlp_sio_mii_sendbits(sc, phy, 5);
   2521   1.1  thorpej 	tlp_sio_mii_sendbits(sc, reg, 5);
   2522   1.1  thorpej 
   2523   1.1  thorpej 	MII_EMIT(sc, MIIROM_MIIDIR);
   2524   1.1  thorpej 	MII_EMIT(sc, MIIROM_MIIDIR|MIIROM_MDC);
   2525   1.1  thorpej 
   2526   1.1  thorpej 	MII_EMIT(sc, 0);
   2527   1.1  thorpej 	MII_EMIT(sc, MIIROM_MDC);
   2528   1.1  thorpej 
   2529   1.1  thorpej 	err = TULIP_ISSET(sc, CSR_MIIROM, MIIROM_MDI);
   2530   1.1  thorpej 
   2531   1.1  thorpej 	MII_EMIT(sc, 0);
   2532   1.1  thorpej 	MII_EMIT(sc, MIIROM_MDC);
   2533   1.1  thorpej 
   2534   1.1  thorpej 	for (i = 0; i < 16; i++) {
   2535   1.1  thorpej 		val <<= 1;
   2536   1.1  thorpej 		MII_EMIT(sc, 0);
   2537   1.1  thorpej 		if (err == 0 && TULIP_ISSET(sc, CSR_MIIROM, MIIROM_MDI))
   2538   1.1  thorpej 			val |= 1;
   2539   1.1  thorpej 		MII_EMIT(sc, MIIROM_MDC);
   2540   1.1  thorpej 	}
   2541   1.1  thorpej 
   2542   1.1  thorpej 	MII_EMIT(sc, 0);
   2543   1.1  thorpej 
   2544   1.1  thorpej 	return (err ? 0 : val);
   2545   1.1  thorpej }
   2546   1.1  thorpej 
   2547   1.1  thorpej /*
   2548   1.1  thorpej  * tlp_sio_mii_writereg:
   2549   1.1  thorpej  *
   2550   1.1  thorpej  *	Write a PHY register via SIO-attached MII.
   2551   1.1  thorpej  */
   2552   1.1  thorpej void
   2553   1.1  thorpej tlp_sio_mii_writereg(self, phy, reg, val)
   2554   1.1  thorpej 	struct device *self;
   2555   1.1  thorpej 	int phy, reg, val;
   2556   1.1  thorpej {
   2557   1.1  thorpej 	struct tulip_softc *sc = (void *) self;
   2558   1.1  thorpej 
   2559   1.1  thorpej 	tlp_sio_mii_sync(sc);
   2560   1.1  thorpej 
   2561   1.1  thorpej 	tlp_sio_mii_sendbits(sc, MII_COMMAND_START, 2);
   2562   1.1  thorpej 	tlp_sio_mii_sendbits(sc, MII_COMMAND_WRITE, 2);
   2563   1.1  thorpej 	tlp_sio_mii_sendbits(sc, phy, 5);
   2564   1.1  thorpej 	tlp_sio_mii_sendbits(sc, reg, 5);
   2565   1.1  thorpej 	tlp_sio_mii_sendbits(sc, MII_COMMAND_ACK, 2);
   2566   1.1  thorpej 	tlp_sio_mii_sendbits(sc, val, 16);
   2567   1.1  thorpej 
   2568   1.1  thorpej 	MII_EMIT(sc, 0);
   2569   1.1  thorpej }
   2570   1.1  thorpej 
   2571   1.1  thorpej #undef MII_EMIT
   2572   1.1  thorpej 
   2573   1.1  thorpej /*
   2574   1.1  thorpej  * tlp_pnic_mii_readreg:
   2575   1.1  thorpej  *
   2576   1.1  thorpej  *	Read a PHY register on the Lite-On PNIC.
   2577   1.1  thorpej  */
   2578   1.1  thorpej int
   2579   1.1  thorpej tlp_pnic_mii_readreg(self, phy, reg)
   2580   1.1  thorpej 	struct device *self;
   2581   1.1  thorpej 	int phy, reg;
   2582   1.1  thorpej {
   2583   1.1  thorpej 	struct tulip_softc *sc = (void *) self;
   2584   1.1  thorpej 	u_int32_t val;
   2585   1.1  thorpej 	int i;
   2586   1.1  thorpej 
   2587   1.1  thorpej 	TULIP_WRITE(sc, CSR_PNIC_MII,
   2588   1.6  thorpej 	    PNIC_MII_MBO | PNIC_MII_RESERVED |
   2589   1.1  thorpej 	    PNIC_MII_READ | (phy << PNIC_MII_PHYSHIFT) |
   2590   1.1  thorpej 	    (reg << PNIC_MII_REGSHIFT));
   2591   1.1  thorpej 
   2592   1.1  thorpej 	for (i = 0; i < 1000; i++) {
   2593   1.1  thorpej 		delay(10);
   2594   1.1  thorpej 		val = TULIP_READ(sc, CSR_PNIC_MII);
   2595   1.1  thorpej 		if ((val & PNIC_MII_BUSY) == 0) {
   2596   1.1  thorpej 			if ((val & PNIC_MII_DATA) == PNIC_MII_DATA)
   2597   1.1  thorpej 				return (0);
   2598   1.1  thorpej 			else
   2599   1.1  thorpej 				return (val & PNIC_MII_DATA);
   2600   1.1  thorpej 		}
   2601   1.1  thorpej 	}
   2602   1.1  thorpej 	printf("%s: MII read timed out\n", sc->sc_dev.dv_xname);
   2603   1.1  thorpej 	return (0);
   2604   1.1  thorpej }
   2605   1.1  thorpej 
   2606   1.1  thorpej /*
   2607   1.1  thorpej  * tlp_pnic_mii_writereg:
   2608   1.1  thorpej  *
   2609   1.1  thorpej  *	Write a PHY register on the Lite-On PNIC.
   2610   1.1  thorpej  */
   2611   1.1  thorpej void
   2612   1.1  thorpej tlp_pnic_mii_writereg(self, phy, reg, val)
   2613   1.1  thorpej 	struct device *self;
   2614   1.1  thorpej 	int phy, reg, val;
   2615   1.1  thorpej {
   2616   1.1  thorpej 	struct tulip_softc *sc = (void *) self;
   2617   1.1  thorpej 	int i;
   2618   1.1  thorpej 
   2619   1.1  thorpej 	TULIP_WRITE(sc, CSR_PNIC_MII,
   2620   1.6  thorpej 	    PNIC_MII_MBO | PNIC_MII_RESERVED |
   2621   1.1  thorpej 	    PNIC_MII_WRITE | (phy << PNIC_MII_PHYSHIFT) |
   2622   1.1  thorpej 	    (reg << PNIC_MII_REGSHIFT) | val);
   2623   1.1  thorpej 
   2624   1.1  thorpej 	for (i = 0; i < 1000; i++) {
   2625   1.1  thorpej 		delay(10);
   2626   1.1  thorpej 		if (TULIP_ISSET(sc, CSR_PNIC_MII, PNIC_MII_BUSY) == 0)
   2627   1.1  thorpej 			return;
   2628   1.1  thorpej 	}
   2629   1.1  thorpej 	printf("%s: MII write timed out\n", sc->sc_dev.dv_xname);
   2630   1.1  thorpej }
   2631   1.1  thorpej 
   2632   1.1  thorpej /*****************************************************************************
   2633   1.1  thorpej  * Chip/board-specific media switches.  The ones here are ones that
   2634   1.1  thorpej  * are potentially common to multiple front-ends.
   2635   1.1  thorpej  *****************************************************************************/
   2636   1.1  thorpej 
   2637   1.1  thorpej /*
   2638   1.7  thorpej  * 21040 and 21041 media switches.
   2639   1.7  thorpej  */
   2640   1.7  thorpej void	tlp_21040_tmsw_init __P((struct tulip_softc *));
   2641   1.7  thorpej void	tlp_21040_tp_tmsw_init __P((struct tulip_softc *));
   2642   1.7  thorpej void	tlp_21040_auibnc_tmsw_init __P((struct tulip_softc *));
   2643   1.7  thorpej void	tlp_21040_21041_tmsw_get __P((struct tulip_softc *,
   2644   1.7  thorpej 	    struct ifmediareq *));
   2645   1.7  thorpej int	tlp_21040_21041_tmsw_set __P((struct tulip_softc *));
   2646   1.7  thorpej 
   2647   1.7  thorpej const struct tulip_mediasw tlp_21040_mediasw = {
   2648   1.7  thorpej 	tlp_21040_tmsw_init, tlp_21040_21041_tmsw_get, tlp_21040_21041_tmsw_set
   2649   1.7  thorpej };
   2650   1.7  thorpej 
   2651   1.7  thorpej const struct tulip_mediasw tlp_21040_tp_mediasw = {
   2652   1.7  thorpej 	tlp_21040_tp_tmsw_init, tlp_21040_21041_tmsw_get,
   2653   1.7  thorpej 	    tlp_21040_21041_tmsw_set
   2654   1.7  thorpej };
   2655   1.7  thorpej 
   2656   1.7  thorpej const struct tulip_mediasw tlp_21040_auibnc_mediasw = {
   2657   1.7  thorpej 	tlp_21040_auibnc_tmsw_init, tlp_21040_21041_tmsw_get,
   2658   1.7  thorpej 	    tlp_21040_21041_tmsw_set
   2659   1.7  thorpej };
   2660   1.7  thorpej 
   2661   1.7  thorpej #define	ADD(m, t)	ifmedia_add(&sc->sc_mii.mii_media, (m), 0, (t))
   2662   1.7  thorpej #define	PRINT(s)	printf("%s%s", sep, s); sep = ", "
   2663   1.7  thorpej 
   2664   1.7  thorpej void
   2665   1.7  thorpej tlp_21040_tmsw_init(sc)
   2666   1.7  thorpej 	struct tulip_softc *sc;
   2667   1.7  thorpej {
   2668   1.7  thorpej 	struct tulip_21040_21041_sia_media *tsm;
   2669   1.7  thorpej 	const char *sep = "";
   2670   1.7  thorpej 
   2671   1.7  thorpej 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   2672   1.7  thorpej 	    tlp_mediastatus);
   2673   1.7  thorpej 
   2674   1.7  thorpej 	printf("%s: ", sc->sc_dev.dv_xname);
   2675   1.7  thorpej 
   2676   1.7  thorpej 	tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
   2677   1.7  thorpej 	    M_WAITOK);
   2678   1.7  thorpej 	tsm->tsm_siaconn = SIACONN_21040_10BASET;
   2679   1.7  thorpej 	tsm->tsm_siatxrx = SIATXRX_21040_10BASET;
   2680   1.7  thorpej 	tsm->tsm_siagen  = SIAGEN_21040_10BASET;
   2681   1.7  thorpej 	ADD(IFM_ETHER|IFM_10_T, tsm);
   2682   1.7  thorpej 	PRINT("10baseT");
   2683   1.7  thorpej 
   2684   1.7  thorpej 	tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
   2685   1.7  thorpej 	    M_WAITOK);
   2686   1.7  thorpej 	tsm->tsm_siaconn = SIACONN_21040_10BASET_FDX;
   2687   1.7  thorpej 	tsm->tsm_siatxrx = SIATXRX_21040_10BASET_FDX;
   2688   1.7  thorpej 	tsm->tsm_siagen  = SIAGEN_21040_10BASET_FDX;
   2689   1.7  thorpej 	ADD(IFM_ETHER|IFM_10_T|IFM_FDX, tsm);
   2690   1.7  thorpej 	PRINT("10baseT-FDX");
   2691   1.7  thorpej 
   2692   1.7  thorpej 	tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
   2693   1.7  thorpej 	    M_WAITOK);
   2694   1.7  thorpej 	tsm->tsm_siaconn = SIACONN_21040_AUI;
   2695   1.7  thorpej 	tsm->tsm_siatxrx = SIATXRX_21040_AUI;
   2696   1.7  thorpej 	tsm->tsm_siagen  = SIAGEN_21040_AUI;
   2697   1.7  thorpej 	ADD(IFM_ETHER|IFM_10_5, tsm);
   2698   1.7  thorpej 	PRINT("10base5");
   2699   1.7  thorpej 
   2700   1.7  thorpej 	tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
   2701   1.7  thorpej 	    M_WAITOK);
   2702   1.7  thorpej 	tsm->tsm_siaconn = SIACONN_21040_EXTSIA;
   2703   1.7  thorpej 	tsm->tsm_siatxrx = SIATXRX_21040_EXTSIA;
   2704   1.7  thorpej 	tsm->tsm_siagen  = SIAGEN_21040_EXTSIA;
   2705   1.7  thorpej 	ADD(IFM_ETHER|IFM_MANUAL, tsm);
   2706   1.7  thorpej 	PRINT("manual");
   2707   1.7  thorpej 
   2708   1.7  thorpej 	/*
   2709   1.7  thorpej 	 * XXX Autosense not yet supported.
   2710   1.7  thorpej 	 */
   2711   1.7  thorpej 
   2712   1.7  thorpej 	/* XXX This should be auto-sense. */
   2713   1.7  thorpej 	ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
   2714   1.7  thorpej 	printf(", default 10baseT");
   2715   1.7  thorpej 
   2716   1.7  thorpej 	printf("\n");
   2717   1.7  thorpej }
   2718   1.7  thorpej 
   2719   1.7  thorpej void
   2720   1.7  thorpej tlp_21040_tp_tmsw_init(sc)
   2721   1.7  thorpej 	struct tulip_softc *sc;
   2722   1.7  thorpej {
   2723   1.7  thorpej 	struct tulip_21040_21041_sia_media *tsm;
   2724   1.7  thorpej 	const char *sep = "";
   2725   1.7  thorpej 
   2726   1.7  thorpej 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   2727   1.7  thorpej 	    tlp_mediastatus);
   2728   1.7  thorpej 
   2729   1.7  thorpej 	printf("%s: ", sc->sc_dev.dv_xname);
   2730   1.7  thorpej 
   2731   1.7  thorpej 	tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
   2732   1.7  thorpej 	    M_WAITOK);
   2733   1.7  thorpej 	tsm->tsm_siaconn = SIACONN_21040_10BASET;
   2734   1.7  thorpej 	tsm->tsm_siatxrx = SIATXRX_21040_10BASET;
   2735   1.7  thorpej 	tsm->tsm_siagen  = SIAGEN_21040_10BASET;
   2736   1.7  thorpej 	ADD(IFM_ETHER|IFM_10_T, tsm);
   2737   1.7  thorpej 	PRINT("10baseT");
   2738   1.7  thorpej 
   2739   1.7  thorpej 	tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
   2740   1.7  thorpej 	    M_WAITOK);
   2741   1.7  thorpej 	tsm->tsm_siaconn = SIACONN_21040_10BASET_FDX;
   2742   1.7  thorpej 	tsm->tsm_siatxrx = SIATXRX_21040_10BASET_FDX;
   2743   1.7  thorpej 	tsm->tsm_siagen  = SIAGEN_21040_10BASET_FDX;
   2744   1.7  thorpej 	ADD(IFM_ETHER|IFM_10_T|IFM_FDX, tsm);
   2745   1.7  thorpej 	PRINT("10baseT-FDX");
   2746   1.7  thorpej 
   2747   1.7  thorpej 	ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_T);
   2748   1.7  thorpej 	printf(", default 10baseT");
   2749   1.7  thorpej 
   2750   1.7  thorpej 	printf("\n");
   2751   1.7  thorpej }
   2752   1.7  thorpej 
   2753   1.7  thorpej void
   2754   1.7  thorpej tlp_21040_auibnc_tmsw_init(sc)
   2755   1.7  thorpej 	struct tulip_softc *sc;
   2756   1.7  thorpej {
   2757   1.7  thorpej 	struct tulip_21040_21041_sia_media *tsm;
   2758   1.7  thorpej 	const char *sep = "";
   2759   1.7  thorpej 
   2760   1.7  thorpej 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   2761   1.7  thorpej 	    tlp_mediastatus);
   2762   1.7  thorpej 
   2763   1.7  thorpej 	printf("%s: ", sc->sc_dev.dv_xname);
   2764   1.7  thorpej 
   2765   1.7  thorpej 	tsm = malloc(sizeof(struct tulip_21040_21041_sia_media), M_DEVBUF,
   2766   1.7  thorpej 	    M_WAITOK);
   2767   1.7  thorpej 	tsm->tsm_siaconn = SIACONN_21040_AUI;
   2768   1.7  thorpej 	tsm->tsm_siatxrx = SIATXRX_21040_AUI;
   2769   1.7  thorpej 	tsm->tsm_siagen  = SIAGEN_21040_AUI;
   2770   1.7  thorpej 	ADD(IFM_ETHER|IFM_10_5, tsm);
   2771   1.7  thorpej 	PRINT("10base5");
   2772   1.7  thorpej 
   2773   1.7  thorpej 	ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_10_5);
   2774   1.7  thorpej 
   2775   1.7  thorpej 	printf("\n");
   2776   1.7  thorpej }
   2777   1.7  thorpej 
   2778   1.7  thorpej #undef ADD
   2779   1.7  thorpej #undef PRINT
   2780   1.7  thorpej 
   2781   1.7  thorpej void
   2782   1.7  thorpej tlp_21040_21041_tmsw_get(sc, ifmr)
   2783   1.7  thorpej 	struct tulip_softc *sc;
   2784   1.7  thorpej 	struct ifmediareq *ifmr;
   2785   1.7  thorpej {
   2786   1.7  thorpej 	struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
   2787   1.7  thorpej 
   2788   1.7  thorpej 	ifmr->ifm_status = 0;
   2789   1.7  thorpej 
   2790   1.7  thorpej 	switch (IFM_SUBTYPE(ife->ifm_media)) {
   2791   1.7  thorpej 	case IFM_AUTO:
   2792   1.7  thorpej 		/*
   2793   1.7  thorpej 		 * XXX Implement autosensing case.
   2794   1.7  thorpej 		 */
   2795   1.7  thorpej 		break;
   2796   1.7  thorpej 
   2797   1.7  thorpej 	case IFM_10_T:
   2798   1.7  thorpej 		/*
   2799   1.7  thorpej 		 * We're able to detect link directly on twisted pair.
   2800   1.7  thorpej 		 */
   2801   1.7  thorpej 		ifmr->ifm_status = IFM_AVALID;
   2802   1.7  thorpej 		if (TULIP_ISSET(sc, CSR_SIASTAT, SIASTAT_LKF) == 0)
   2803   1.7  thorpej 			ifmr->ifm_status |= IFM_ACTIVE;
   2804   1.7  thorpej 		/* FALLTHROUGH */
   2805   1.7  thorpej 	default:
   2806   1.7  thorpej 		/*
   2807   1.7  thorpej 		 * If not autosensing, active media is the currently
   2808   1.7  thorpej 		 * selected media.
   2809   1.7  thorpej 		 */
   2810   1.7  thorpej 		ifmr->ifm_active = ife->ifm_media;
   2811   1.7  thorpej 	}
   2812   1.7  thorpej }
   2813   1.7  thorpej 
   2814   1.7  thorpej int
   2815   1.7  thorpej tlp_21040_21041_tmsw_set(sc)
   2816   1.7  thorpej 	struct tulip_softc *sc;
   2817   1.7  thorpej {
   2818   1.7  thorpej 	struct ifmedia_entry *ife = sc->sc_mii.mii_media.ifm_cur;
   2819   1.7  thorpej 	struct tulip_21040_21041_sia_media *tsm;
   2820   1.7  thorpej 
   2821   1.7  thorpej 	if (IFM_SUBTYPE(ife->ifm_media) != IFM_AUTO) {
   2822   1.7  thorpej 		/*
   2823   1.7  thorpej 		 * If not autosensing, just pull the SIA settings out
   2824   1.7  thorpej 		 * of the media entry.
   2825   1.7  thorpej 		 */
   2826   1.7  thorpej 		tsm = ife->ifm_aux;
   2827   1.7  thorpej 		TULIP_WRITE(sc, CSR_SIACONN, SIACONN_SRL);
   2828   1.7  thorpej 		TULIP_WRITE(sc, CSR_SIATXRX, tsm->tsm_siatxrx);
   2829   1.7  thorpej 		TULIP_WRITE(sc, CSR_SIAGEN,  tsm->tsm_siagen);
   2830   1.7  thorpej 		TULIP_WRITE(sc, CSR_SIACONN, tsm->tsm_siaconn);
   2831   1.7  thorpej 
   2832   1.7  thorpej 		tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   2833   1.7  thorpej 		sc->sc_opmode &= ~OPMODE_FD;
   2834   1.7  thorpej 		if (ife->ifm_media & IFM_FDX)
   2835   1.7  thorpej 			sc->sc_opmode |= OPMODE_FD;
   2836   1.7  thorpej 		TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   2837   1.7  thorpej 	} else {
   2838   1.7  thorpej 		/*
   2839   1.7  thorpej 		 * XXX Implement autosensing case.
   2840   1.7  thorpej 		 */
   2841   1.7  thorpej 	}
   2842   1.7  thorpej 
   2843   1.7  thorpej 	return (0);
   2844   1.7  thorpej }
   2845   1.7  thorpej 
   2846   1.7  thorpej /*
   2847   1.1  thorpej  * MII-on-SIO media switch.  Handles only MII attached to the SIO.
   2848   1.1  thorpej  */
   2849   1.1  thorpej void	tlp_sio_mii_tmsw_init __P((struct tulip_softc *));
   2850   1.1  thorpej 
   2851   1.1  thorpej const struct tulip_mediasw tlp_sio_mii_mediasw = {
   2852   1.1  thorpej 	tlp_sio_mii_tmsw_init, tlp_mii_getmedia, tlp_mii_setmedia
   2853   1.1  thorpej };
   2854   1.1  thorpej 
   2855   1.1  thorpej void
   2856   1.1  thorpej tlp_sio_mii_tmsw_init(sc)
   2857   1.1  thorpej 	struct tulip_softc *sc;
   2858   1.1  thorpej {
   2859   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2860   1.1  thorpej 
   2861   1.1  thorpej 	sc->sc_mii.mii_ifp = ifp;
   2862   1.1  thorpej 	sc->sc_mii.mii_readreg = tlp_sio_mii_readreg;
   2863   1.1  thorpej 	sc->sc_mii.mii_writereg = tlp_sio_mii_writereg;
   2864   1.5  thorpej 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   2865   1.1  thorpej 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   2866   1.1  thorpej 	    tlp_mediastatus);
   2867   1.1  thorpej 	mii_phy_probe(&sc->sc_dev, &sc->sc_mii, 0xffffffff);
   2868   1.1  thorpej 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   2869   1.1  thorpej 		ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE, 0, NULL);
   2870   1.1  thorpej 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_NONE);
   2871   1.1  thorpej 	} else {
   2872   1.1  thorpej 		sc->sc_flags |= TULIPF_HAS_MII;
   2873   1.6  thorpej 		sc->sc_tick = tlp_mii_tick;
   2874   1.1  thorpej 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   2875   1.1  thorpej 	}
   2876   1.1  thorpej }
   2877   1.1  thorpej 
   2878   1.1  thorpej /*
   2879   1.1  thorpej  * Lite-On PNIC media switch.  Must handle MII or internal NWAY.
   2880   1.1  thorpej  */
   2881   1.1  thorpej void	tlp_pnic_tmsw_init __P((struct tulip_softc *));
   2882   1.1  thorpej void	tlp_pnic_tmsw_get __P((struct tulip_softc *, struct ifmediareq *));
   2883   1.1  thorpej int	tlp_pnic_tmsw_set __P((struct tulip_softc *));
   2884   1.1  thorpej 
   2885   1.1  thorpej const struct tulip_mediasw tlp_pnic_mediasw = {
   2886   1.1  thorpej 	tlp_pnic_tmsw_init, tlp_pnic_tmsw_get, tlp_pnic_tmsw_set
   2887   1.1  thorpej };
   2888   1.1  thorpej 
   2889   1.7  thorpej void	tlp_pnic_nway_statchg __P((struct device *));
   2890   1.6  thorpej void	tlp_pnic_nway_tick __P((void *));
   2891   1.6  thorpej int	tlp_pnic_nway_service __P((struct tulip_softc *, int));
   2892   1.6  thorpej void	tlp_pnic_nway_reset __P((struct tulip_softc *));
   2893   1.6  thorpej int	tlp_pnic_nway_auto __P((struct tulip_softc *, int));
   2894   1.6  thorpej void	tlp_pnic_nway_auto_timeout __P((void *));
   2895   1.6  thorpej void	tlp_pnic_nway_status __P((struct tulip_softc *));
   2896   1.6  thorpej void	tlp_pnic_nway_acomp __P((struct tulip_softc *));
   2897   1.6  thorpej 
   2898   1.1  thorpej void
   2899   1.1  thorpej tlp_pnic_tmsw_init(sc)
   2900   1.1  thorpej 	struct tulip_softc *sc;
   2901   1.1  thorpej {
   2902   1.1  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2903   1.6  thorpej 	const char *sep = "";
   2904   1.6  thorpej 
   2905   1.6  thorpej #define	ADD(m, c)	ifmedia_add(&sc->sc_mii.mii_media, (m), (c), NULL)
   2906   1.6  thorpej #define	PRINT(s)	printf("%s%s", sep, s); sep = ", "
   2907   1.1  thorpej 
   2908   1.1  thorpej 	sc->sc_mii.mii_ifp = ifp;
   2909   1.1  thorpej 	sc->sc_mii.mii_readreg = tlp_pnic_mii_readreg;
   2910   1.1  thorpej 	sc->sc_mii.mii_writereg = tlp_pnic_mii_writereg;
   2911   1.5  thorpej 	sc->sc_mii.mii_statchg = sc->sc_statchg;
   2912   1.1  thorpej 	ifmedia_init(&sc->sc_mii.mii_media, 0, tlp_mediachange,
   2913   1.1  thorpej 	    tlp_mediastatus);
   2914   1.1  thorpej 	mii_phy_probe(&sc->sc_dev, &sc->sc_mii, 0xffffffff);
   2915   1.1  thorpej 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
   2916   1.6  thorpej 		/* XXX What about AUI/BNC support? */
   2917   1.6  thorpej 		printf("%s: ", sc->sc_dev.dv_xname);
   2918   1.6  thorpej 
   2919   1.6  thorpej 		tlp_pnic_nway_reset(sc);
   2920   1.6  thorpej 
   2921   1.6  thorpej 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_10_T, 0, 0),
   2922   1.6  thorpej 		    PNIC_NWAY_TW|PNIC_NWAY_CAP10T);
   2923   1.6  thorpej 		PRINT("10baseT");
   2924   1.6  thorpej 
   2925   1.6  thorpej 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_10_T, IFM_FDX, 0),
   2926   1.6  thorpej 		    PNIC_NWAY_TW|PNIC_NWAY_FD|PNIC_NWAY_CAP10TFDX);
   2927   1.6  thorpej 		PRINT("10baseT-FDX");
   2928   1.6  thorpej 
   2929   1.6  thorpej 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_100_TX, 0, 0),
   2930   1.6  thorpej 		    PNIC_NWAY_TW|PNIC_NWAY_100|PNIC_NWAY_CAP100TX);
   2931   1.6  thorpej 		PRINT("100baseTX");
   2932   1.6  thorpej 
   2933   1.6  thorpej 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_100_TX, IFM_FDX, 0),
   2934   1.6  thorpej 		    PNIC_NWAY_TW|PNIC_NWAY_100|PNIC_NWAY_FD|
   2935   1.6  thorpej 		    PNIC_NWAY_CAP100TXFDX);
   2936   1.6  thorpej 		PRINT("100baseTX-FDX");
   2937   1.6  thorpej 
   2938   1.6  thorpej 		ADD(IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0, 0),
   2939   1.6  thorpej 		    PNIC_NWAY_TW|PNIC_NWAY_RN|PNIC_NWAY_NW|
   2940   1.6  thorpej 		    PNIC_NWAY_CAP10T|PNIC_NWAY_CAP10TFDX|
   2941   1.6  thorpej 		    PNIC_NWAY_CAP100TXFDX|PNIC_NWAY_CAP100TX);
   2942   1.6  thorpej 		PRINT("auto");
   2943   1.6  thorpej 
   2944   1.7  thorpej 		printf("\n");
   2945   1.7  thorpej 
   2946   1.7  thorpej 		sc->sc_statchg = tlp_pnic_nway_statchg;
   2947   1.6  thorpej 		sc->sc_tick = tlp_pnic_nway_tick;
   2948   1.6  thorpej 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   2949   1.1  thorpej 	} else {
   2950   1.1  thorpej 		sc->sc_flags |= TULIPF_HAS_MII;
   2951   1.6  thorpej 		sc->sc_tick = tlp_mii_tick;
   2952   1.1  thorpej 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
   2953   1.1  thorpej 	}
   2954   1.6  thorpej 
   2955   1.6  thorpej #undef ADD
   2956   1.6  thorpej #undef PRINT
   2957   1.1  thorpej }
   2958   1.1  thorpej 
   2959   1.1  thorpej void
   2960   1.1  thorpej tlp_pnic_tmsw_get(sc, ifmr)
   2961   1.1  thorpej 	struct tulip_softc *sc;
   2962   1.1  thorpej 	struct ifmediareq *ifmr;
   2963   1.1  thorpej {
   2964   1.6  thorpej 	struct mii_data *mii = &sc->sc_mii;
   2965   1.1  thorpej 
   2966   1.1  thorpej 	if (sc->sc_flags & TULIPF_HAS_MII)
   2967   1.1  thorpej 		tlp_mii_getmedia(sc, ifmr);
   2968   1.1  thorpej 	else {
   2969   1.6  thorpej 		mii->mii_media_status = 0;
   2970   1.6  thorpej 		mii->mii_media_active = IFM_NONE;
   2971   1.6  thorpej 		tlp_pnic_nway_service(sc, MII_POLLSTAT);
   2972   1.6  thorpej 		ifmr->ifm_status = sc->sc_mii.mii_media_status;
   2973   1.6  thorpej 		ifmr->ifm_active = sc->sc_mii.mii_media_active;
   2974   1.1  thorpej 	}
   2975   1.1  thorpej }
   2976   1.1  thorpej 
   2977   1.1  thorpej int
   2978   1.1  thorpej tlp_pnic_tmsw_set(sc)
   2979   1.1  thorpej 	struct tulip_softc *sc;
   2980   1.1  thorpej {
   2981   1.6  thorpej 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   2982   1.6  thorpej 	struct mii_data *mii = &sc->sc_mii;
   2983   1.1  thorpej 
   2984   1.1  thorpej 	if (sc->sc_flags & TULIPF_HAS_MII)
   2985   1.1  thorpej 		return (tlp_mii_setmedia(sc));
   2986   1.1  thorpej 
   2987   1.6  thorpej 	if (ifp->if_flags & IFF_UP) {
   2988   1.6  thorpej 		mii->mii_media_status = 0;
   2989   1.6  thorpej 		mii->mii_media_active = IFM_NONE;
   2990   1.6  thorpej 		return (tlp_pnic_nway_service(sc, MII_MEDIACHG));
   2991   1.6  thorpej 	}
   2992   1.6  thorpej 
   2993   1.6  thorpej 	return (0);
   2994   1.7  thorpej }
   2995   1.7  thorpej 
   2996   1.7  thorpej void
   2997   1.7  thorpej tlp_pnic_nway_statchg(self)
   2998   1.7  thorpej 	struct device *self;
   2999   1.7  thorpej {
   3000   1.7  thorpej 	struct tulip_softc *sc = (struct tulip_softc *)self;
   3001   1.7  thorpej 
   3002   1.7  thorpej 	/* Idle the transmit and receive processes. */
   3003   1.7  thorpej 	tlp_idle(sc, OPMODE_ST|OPMODE_SR);
   3004   1.7  thorpej 
   3005   1.7  thorpej 	/*
   3006   1.7  thorpej 	 * XXX What about Heartbeat Disable?  Is it magically frobbed
   3007   1.7  thorpej 	 * XXX by the PHY?  I hope so...
   3008   1.7  thorpej 	 */
   3009   1.7  thorpej 
   3010   1.7  thorpej 	sc->sc_opmode &= ~(OPMODE_TTM|OPMODE_FD|OPMODE_PS|OPMODE_PCS|
   3011   1.7  thorpej 	    OPMODE_SCR);
   3012   1.7  thorpej 
   3013   1.7  thorpej 	if (IFM_SUBTYPE(sc->sc_mii.mii_media_active) == IFM_10_T) {
   3014   1.7  thorpej 		sc->sc_opmode |= OPMODE_TTM;
   3015   1.7  thorpej 		TULIP_WRITE(sc, CSR_GPP,
   3016   1.7  thorpej 		    GPP_PNIC_OUT(GPP_PNIC_PIN_SPEED_RLY, 0) |
   3017   1.7  thorpej 		    GPP_PNIC_OUT(GPP_PNIC_PIN_100M_LPKB, 1));
   3018   1.7  thorpej 	} else {
   3019   1.7  thorpej 		sc->sc_opmode |= OPMODE_PS|OPMODE_PCS|OPMODE_SCR;
   3020   1.7  thorpej 		TULIP_WRITE(sc, CSR_GPP,
   3021   1.7  thorpej 		    GPP_PNIC_OUT(GPP_PNIC_PIN_SPEED_RLY, 1) |
   3022   1.7  thorpej 		    GPP_PNIC_OUT(GPP_PNIC_PIN_100M_LPKB, 1));
   3023   1.7  thorpej 	}
   3024   1.7  thorpej 
   3025   1.7  thorpej 	if (sc->sc_mii.mii_media_active & IFM_FDX)
   3026   1.7  thorpej 		sc->sc_opmode |= OPMODE_FD;
   3027   1.7  thorpej 
   3028   1.7  thorpej 	/*
   3029   1.7  thorpej 	 * Write new OPMODE bits.  This also restarts the transmit
   3030   1.7  thorpej 	 * and receive processes.
   3031   1.7  thorpej 	 */
   3032   1.7  thorpej 	TULIP_WRITE(sc, CSR_OPMODE, sc->sc_opmode);
   3033   1.7  thorpej 
   3034   1.7  thorpej 	/* XXX Update ifp->if_baudrate */
   3035   1.6  thorpej }
   3036   1.6  thorpej 
   3037   1.6  thorpej void
   3038   1.6  thorpej tlp_pnic_nway_tick(arg)
   3039   1.6  thorpej 	void *arg;
   3040   1.6  thorpej {
   3041   1.6  thorpej 	struct tulip_softc *sc = arg;
   3042   1.6  thorpej 	int s;
   3043   1.6  thorpej 
   3044   1.6  thorpej 	s = splnet();
   3045   1.6  thorpej 	tlp_pnic_nway_service(sc, MII_TICK);
   3046   1.6  thorpej 	splx(s);
   3047   1.6  thorpej 
   3048   1.6  thorpej 	timeout(tlp_pnic_nway_tick, sc, hz);
   3049   1.6  thorpej }
   3050   1.6  thorpej 
   3051   1.6  thorpej /*
   3052   1.6  thorpej  * Support for the Lite-On PNIC internal NWay block.  This is constructed
   3053   1.6  thorpej  * somewhat like a PHY driver for simplicity.
   3054   1.6  thorpej  */
   3055   1.6  thorpej 
   3056   1.6  thorpej int
   3057   1.6  thorpej tlp_pnic_nway_service(sc, cmd)
   3058   1.6  thorpej 	struct tulip_softc *sc;
   3059   1.6  thorpej 	int cmd;
   3060   1.6  thorpej {
   3061   1.6  thorpej 	struct mii_data *mii = &sc->sc_mii;
   3062   1.6  thorpej 	struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
   3063   1.6  thorpej 
   3064   1.6  thorpej 	if ((mii->mii_ifp->if_flags & IFF_UP) == 0)
   3065   1.6  thorpej 		return (0);
   3066   1.6  thorpej 
   3067   1.6  thorpej 	switch (cmd) {
   3068   1.6  thorpej 	case MII_POLLSTAT:
   3069   1.6  thorpej 		/* Nothing special to do here. */
   3070   1.6  thorpej 		break;
   3071   1.6  thorpej 
   3072   1.6  thorpej 	case MII_MEDIACHG:
   3073   1.6  thorpej 		switch (IFM_SUBTYPE(ife->ifm_media)) {
   3074   1.6  thorpej 		case IFM_AUTO:
   3075   1.6  thorpej 			(void) tlp_pnic_nway_auto(sc, 1);
   3076   1.6  thorpej 			break;
   3077   1.6  thorpej 		case IFM_100_T4:
   3078   1.6  thorpej 			/*
   3079   1.6  thorpej 			 * XXX Not supported as a manual setting right now.
   3080   1.6  thorpej 			 */
   3081   1.6  thorpej 			return (EINVAL);
   3082   1.6  thorpej 		default:
   3083   1.6  thorpej 			/*
   3084   1.6  thorpej 			 * NWAY register data is stored in the ifmedia entry.
   3085   1.6  thorpej 			 */
   3086   1.6  thorpej 			TULIP_WRITE(sc, CSR_PNIC_NWAY, ife->ifm_data);
   3087   1.6  thorpej 		}
   3088   1.6  thorpej 		break;
   3089   1.6  thorpej 
   3090   1.6  thorpej 	case MII_TICK:
   3091   1.6  thorpej 		/*
   3092   1.6  thorpej 		 * Only used for autonegotiation.
   3093   1.6  thorpej 		 */
   3094   1.6  thorpej 		if (IFM_SUBTYPE(ife->ifm_media) != IFM_AUTO)
   3095   1.6  thorpej 			return (0);
   3096   1.6  thorpej 
   3097   1.6  thorpej 		/*
   3098   1.6  thorpej 		 * Check to see if we have link.  If we do, we don't
   3099   1.6  thorpej 		 * need to restart the autonegotiation process.
   3100   1.6  thorpej 		 */
   3101   1.6  thorpej 		if (sc->sc_flags & TULIPF_LINK_UP)
   3102   1.6  thorpej 			return (0);
   3103   1.6  thorpej 
   3104   1.6  thorpej 		/*
   3105   1.6  thorpej 		 * Only retry autonegotiation every 5 seconds.
   3106   1.6  thorpej 		 */
   3107   1.6  thorpej 		if (++sc->sc_nway_ticks != 5)
   3108   1.6  thorpej 			return (0);
   3109   1.6  thorpej 
   3110   1.6  thorpej 		sc->sc_nway_ticks = 0;
   3111   1.6  thorpej 		tlp_pnic_nway_reset(sc);
   3112   1.6  thorpej 		if (tlp_pnic_nway_auto(sc, 0) == EJUSTRETURN)
   3113   1.6  thorpej 			return (0);
   3114   1.6  thorpej 		break;
   3115   1.6  thorpej 	}
   3116   1.6  thorpej 
   3117   1.6  thorpej 	/* Update the media status. */
   3118   1.6  thorpej 	tlp_pnic_nway_status(sc);
   3119   1.6  thorpej 
   3120   1.6  thorpej 	/* Callback if something changed. */
   3121   1.6  thorpej 	if (sc->sc_nway_active != mii->mii_media_active ||
   3122   1.6  thorpej 	    cmd == MII_MEDIACHG) {
   3123   1.6  thorpej 		(*sc->sc_statchg)(&sc->sc_dev);
   3124   1.6  thorpej 		sc->sc_nway_active = mii->mii_media_active;
   3125   1.6  thorpej 	}
   3126   1.6  thorpej 	return (0);
   3127   1.6  thorpej }
   3128   1.6  thorpej 
   3129   1.6  thorpej void
   3130   1.6  thorpej tlp_pnic_nway_reset(sc)
   3131   1.6  thorpej 	struct tulip_softc *sc;
   3132   1.6  thorpej {
   3133   1.6  thorpej 
   3134   1.6  thorpej 	TULIP_WRITE(sc, CSR_PNIC_NWAY, PNIC_NWAY_RS);
   3135   1.6  thorpej 	delay(100);
   3136   1.6  thorpej 	TULIP_WRITE(sc, CSR_PNIC_NWAY, 0);
   3137   1.6  thorpej }
   3138   1.6  thorpej 
   3139   1.6  thorpej int
   3140   1.6  thorpej tlp_pnic_nway_auto(sc, waitfor)
   3141   1.6  thorpej 	struct tulip_softc *sc;
   3142   1.6  thorpej 	int waitfor;
   3143   1.6  thorpej {
   3144   1.6  thorpej 	struct mii_data *mii = &sc->sc_mii;
   3145   1.6  thorpej 	struct ifmedia_entry *ife = mii->mii_media.ifm_cur;
   3146   1.6  thorpej 	u_int32_t reg;
   3147   1.6  thorpej 	int i;
   3148   1.6  thorpej 
   3149   1.6  thorpej 	if ((sc->sc_flags & TULIPF_DOINGAUTO) == 0)
   3150   1.6  thorpej 		TULIP_WRITE(sc, CSR_PNIC_NWAY, ife->ifm_data);
   3151   1.6  thorpej 
   3152   1.6  thorpej 	if (waitfor) {
   3153   1.6  thorpej 		/* Wait 500ms for it to complete. */
   3154   1.6  thorpej 		for (i = 0; i < 500; i++) {
   3155   1.6  thorpej 			reg = TULIP_READ(sc, CSR_PNIC_NWAY);
   3156   1.6  thorpej 			if (reg & PNIC_NWAY_LPAR_MASK) {
   3157   1.6  thorpej 				tlp_pnic_nway_acomp(sc);
   3158   1.6  thorpej 				return (0);
   3159   1.6  thorpej 			}
   3160   1.6  thorpej 			delay(1000);
   3161   1.6  thorpej 		}
   3162   1.6  thorpej #if 0
   3163   1.6  thorpej 		if ((reg & PNIC_NWAY_LPAR_MASK) == 0)
   3164   1.6  thorpej 			printf("%s: autonegotiation failed to complete\n",
   3165   1.6  thorpej 			    sc->sc_dev.dv_xname);
   3166   1.6  thorpej #endif
   3167   1.6  thorpej 
   3168   1.6  thorpej 		/*
   3169   1.6  thorpej 		 * Don't need to worry about clearing DOINGAUTO.
   3170   1.6  thorpej 		 * If that's set, a timeout is pending, and it will
   3171   1.6  thorpej 		 * clear the flag.
   3172   1.6  thorpej 		 */
   3173   1.6  thorpej 		return (EIO);
   3174   1.6  thorpej 	}
   3175   1.6  thorpej 
   3176   1.6  thorpej 	/*
   3177   1.6  thorpej 	 * Just let it finish asynchronously.  This is for the benefit of
   3178   1.6  thorpej 	 * the tick handler driving autonegotiation.  Don't want 500ms
   3179   1.6  thorpej 	 * delays all the time while the system is running!
   3180   1.6  thorpej 	 */
   3181   1.6  thorpej 	if ((sc->sc_flags & TULIPF_DOINGAUTO) == 0) {
   3182   1.6  thorpej 		sc->sc_flags |= TULIPF_DOINGAUTO;
   3183   1.6  thorpej 		timeout(tlp_pnic_nway_auto_timeout, sc, hz >> 1);
   3184   1.6  thorpej 	}
   3185   1.6  thorpej 	return (EJUSTRETURN);
   3186   1.6  thorpej }
   3187   1.6  thorpej 
   3188   1.6  thorpej void
   3189   1.6  thorpej tlp_pnic_nway_auto_timeout(arg)
   3190   1.6  thorpej 	void *arg;
   3191   1.6  thorpej {
   3192   1.6  thorpej 	struct tulip_softc *sc = arg;
   3193   1.6  thorpej 	u_int32_t reg;
   3194   1.6  thorpej 	int s;
   3195   1.6  thorpej 
   3196   1.6  thorpej 	s = splnet();
   3197   1.6  thorpej 	sc->sc_flags &= ~TULIPF_DOINGAUTO;
   3198   1.6  thorpej 	reg = TULIP_READ(sc, CSR_PNIC_NWAY);
   3199   1.6  thorpej #if 0
   3200   1.6  thorpej 	if ((reg & PNIC_NWAY_LPAR_MASK) == 0)
   3201   1.6  thorpej 		printf("%s: autonegotiation failed to complete\n",
   3202   1.6  thorpej 		    sc->sc_dev.dv_xname);
   3203   1.6  thorpej #endif
   3204   1.6  thorpej 
   3205   1.6  thorpej 	tlp_pnic_nway_acomp(sc);
   3206   1.6  thorpej 
   3207   1.6  thorpej 	/* Update the media status. */
   3208   1.6  thorpej 	(void) tlp_pnic_nway_service(sc, MII_POLLSTAT);
   3209   1.6  thorpej 	splx(s);
   3210   1.6  thorpej }
   3211   1.6  thorpej 
   3212   1.6  thorpej void
   3213   1.6  thorpej tlp_pnic_nway_status(sc)
   3214   1.6  thorpej 	struct tulip_softc *sc;
   3215   1.6  thorpej {
   3216   1.6  thorpej 	struct mii_data *mii = &sc->sc_mii;
   3217   1.6  thorpej 	u_int32_t reg;
   3218   1.6  thorpej 
   3219   1.6  thorpej 	mii->mii_media_status = IFM_AVALID;
   3220   1.6  thorpej 	mii->mii_media_active = IFM_ETHER;
   3221   1.6  thorpej 
   3222   1.6  thorpej 	reg = TULIP_READ(sc, CSR_PNIC_NWAY);
   3223   1.6  thorpej 
   3224   1.6  thorpej 	if (sc->sc_flags & TULIPF_LINK_UP)
   3225   1.6  thorpej 		mii->mii_media_status |= IFM_ACTIVE;
   3226   1.6  thorpej 
   3227   1.6  thorpej 	if (reg & PNIC_NWAY_NW) {
   3228   1.6  thorpej 		if ((reg & PNIC_NWAY_LPAR_MASK) == 0) {
   3229   1.6  thorpej 			/* Erg, still trying, I guess... */
   3230   1.6  thorpej 			mii->mii_media_active |= IFM_NONE;
   3231   1.6  thorpej 			return;
   3232   1.6  thorpej 		}
   3233   1.6  thorpej 
   3234   1.6  thorpej #if 0
   3235   1.6  thorpej 		if (reg & PNIC_NWAY_LPAR100T4)
   3236   1.6  thorpej 			mii->mii_media_active |= IFM_100_T4;
   3237   1.6  thorpej 		else
   3238   1.6  thorpej #endif
   3239   1.6  thorpej 		if (reg & PNIC_NWAY_LPAR100TXFDX)
   3240   1.6  thorpej 			mii->mii_media_active |= IFM_100_TX|IFM_FDX;
   3241   1.6  thorpej 		else if (reg & PNIC_NWAY_LPAR100TX)
   3242   1.6  thorpej 			mii->mii_media_active |= IFM_100_TX;
   3243   1.6  thorpej 		else if (reg & PNIC_NWAY_LPAR10TFDX)
   3244   1.6  thorpej 			mii->mii_media_active |= IFM_10_T|IFM_FDX;
   3245   1.6  thorpej 		else if (reg & PNIC_NWAY_LPAR10T)
   3246   1.6  thorpej 			mii->mii_media_active |= IFM_10_T;
   3247   1.6  thorpej 		else
   3248   1.6  thorpej 			mii->mii_media_active |= IFM_NONE;
   3249   1.6  thorpej 	} else {
   3250   1.6  thorpej 		if (reg & PNIC_NWAY_100)
   3251   1.6  thorpej 			mii->mii_media_active |= IFM_100_TX;
   3252   1.6  thorpej 		else
   3253   1.6  thorpej 			mii->mii_media_active |= IFM_10_T;
   3254   1.6  thorpej 		if (reg & PNIC_NWAY_FD)
   3255   1.6  thorpej 			mii->mii_media_active |= IFM_FDX;
   3256   1.6  thorpej 	}
   3257   1.6  thorpej }
   3258   1.6  thorpej 
   3259   1.6  thorpej void
   3260   1.6  thorpej tlp_pnic_nway_acomp(sc)
   3261   1.6  thorpej 	struct tulip_softc *sc;
   3262   1.6  thorpej {
   3263   1.6  thorpej 	u_int32_t reg;
   3264   1.6  thorpej 
   3265   1.6  thorpej 	reg = TULIP_READ(sc, CSR_PNIC_NWAY);
   3266   1.6  thorpej 	reg &= ~(PNIC_NWAY_FD|PNIC_NWAY_100|PNIC_NWAY_RN);
   3267   1.6  thorpej 
   3268   1.6  thorpej 	if (reg & (PNIC_NWAY_LPAR100TXFDX|PNIC_NWAY_LPAR100TX))
   3269   1.6  thorpej 		reg |= PNIC_NWAY_100;
   3270   1.6  thorpej 	if (reg & (PNIC_NWAY_LPAR10TFDX|PNIC_NWAY_LPAR100TXFDX))
   3271   1.6  thorpej 		reg |= PNIC_NWAY_FD;
   3272   1.6  thorpej 
   3273   1.6  thorpej 	TULIP_WRITE(sc, CSR_PNIC_NWAY, reg);
   3274   1.1  thorpej }
   3275