diff options
Diffstat (limited to 'sys/dev/pci/if_de.c')
| -rw-r--r-- | sys/dev/pci/if_de.c | 5652 |
1 files changed, 4092 insertions, 1560 deletions
diff --git a/sys/dev/pci/if_de.c b/sys/dev/pci/if_de.c index dc072bf491c..c58d871f694 100644 --- a/sys/dev/pci/if_de.c +++ b/sys/dev/pci/if_de.c @@ -1,8 +1,7 @@ -/* $OpenBSD: if_de.c,v 1.18 1997/04/10 16:51:35 pefo Exp $ */ -/* $NetBSD: if_de.c,v 1.29 1996/10/25 21:33:30 cgd Exp $ */ +/* $NetBSD: if_de.c,v 1.45 1997/06/09 00:34:18 thorpej Exp $ */ /*- - * Copyright (c) 1994, 1995 Matt Thomas (matt@lkg.dec.com) + * Copyright (c) 1994-1997 Matt Thomas (matt@3am-software.com) * All rights reserved. * * Redistribution and use in source and binary forms, with or without @@ -23,22 +22,21 @@ * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + * Id: if_de.c,v 1.89 1997/06/03 19:19:55 thomas Exp + * */ /* - * DEC DC21040 PCI Ethernet Controller + * DEC 21040 PCI Ethernet Controller * * Written by Matt Thomas * BPF support code stolen directly from if_ec.c * * This driver supports the DEC DE435 or any other PCI - * board which support DC21040, DC21041, or DC21140 (mostly). + * board which support 21040, 21041, or 21140 (mostly). */ - -#if defined(__FreeBSD__) -#include "de.h" -#endif -#if NDE > 0 || !defined(__FreeBSD__) +#define TULIP_HDR_DATA #include <sys/param.h> #include <sys/systm.h> @@ -51,16 +49,24 @@ #include <sys/kernel.h> #include <sys/proc.h> /* only for declaration of wakeup() used by vm.h */ #if defined(__FreeBSD__) -#include <sys/devconf.h> #include <machine/clock.h> #elif defined(__bsdi__) || defined(__NetBSD__) || defined(__OpenBSD__) #include <sys/device.h> #endif #include <net/if.h> +#if defined(SIOCSIFMEDIA) && !defined(TULIP_NOIFMEDIA) +#include <net/if_media.h> +#endif #include <net/if_types.h> #include <net/if_dl.h> #include <net/route.h> +#include <net/netisr.h> + +#if defined(__bsdi__) && _BSDI_VERSION >= 199701 +#include <dev/mii/mii.h> +#include <dev/mii/miivar.h> +#endif #include "bpfilter.h" #if NBPFILTER > 0 @@ -73,903 +79,3027 @@ #include <netinet/in_systm.h> #include <netinet/in_var.h> #include <netinet/ip.h> -#include <netinet/if_ether.h> +#endif + +#ifdef NS +#include <netns/ns.h> +#include <netns/ns_if.h> #endif #include <vm/vm.h> -#include <vm/vm_kern.h> #include <vm/vm_param.h> +#include <vm/vm_kern.h> #if defined(__FreeBSD__) +#include <vm/pmap.h> #include <pci.h> +#include <netinet/if_ether.h> #if NPCI > 0 #include <pci/pcivar.h> -#include <pci/dc21040.h> +#include <pci/dc21040reg.h> +#define DEVAR_INCLUDE "pci/if_devar.h" #endif #endif /* __FreeBSD__ */ #if defined(__bsdi__) -#include <i386/pci/pci.h> -#include <i386/pci/ic/dc21040.h> +#include <netinet/if_ether.h> +#include <i386/pci/ic/dc21040reg.h> #include <i386/isa/isa.h> #include <i386/isa/icu.h> #include <i386/isa/dma.h> #include <i386/isa/isavar.h> +#include <i386/pci/pci.h> +#if _BSDI_VERSION < 199510 #include <eisa.h> -#if NEISA > 0 +#else +#define NEISA 0 +#endif +#if NEISA > 0 && _BSDI_VERSION >= 199401 #include <i386/eisa/eisa.h> #define TULIP_EISA #endif +#define DEVAR_INCLUDE "i386/pci/if_devar.h" #endif /* __bsdi__ */ +#if defined(__NetBSD__) +#include <net/if_ether.h> +#if defined(INET) +#include <netinet/if_inarp.h> +#endif +#endif + +#if defined(__OpenBSD__) +#include <netinet/if_ether.h> +#endif + #if defined(__NetBSD__) || defined(__OpenBSD__) #include <machine/bus.h> +#if defined(__alpha__) #include <machine/intr.h> - +#endif #include <dev/pci/pcireg.h> #include <dev/pci/pcivar.h> #include <dev/ic/dc21040reg.h> +#define DEVAR_INCLUDE "dev/pci/if_devar.h" #endif /* __NetBSD__ */ /* * Intel CPUs should use I/O mapped access. */ -#if defined(__i386__) +#if defined(__i386__) || defined(TULIP_EISA) #define TULIP_IOMAPPED #endif +#if 0 /* - * This module supports - * the DEC DC21040 PCI Ethernet Controller. - * the DEC DC21041 PCI Ethernet Controller. - * the DEC DC21140 PCI Fast Ethernet Controller. + * This turns on all sort of debugging stuff and make the + * driver much larger. */ +#define TULIP_DEBUG +#endif + +#if 0 +#define TULIP_USE_SOFTINTR +#endif -typedef struct { - tulip_desc_t *ri_first; - tulip_desc_t *ri_last; - tulip_desc_t *ri_nextin; - tulip_desc_t *ri_nextout; - int ri_max; - int ri_free; -} tulip_ringinfo_t; +#define TULIP_HZ 10 -#if defined(__NetBSD__) || defined(__OpenBSD__) +#include DEVAR_INCLUDE /* - * These macros are the same for NetBSD regardless of TULIP_IOMAPPED. + * This module supports + * the DEC 21040 PCI Ethernet Controller. + * the DEC 21041 PCI Ethernet Controller. + * the DEC 21140 PCI Fast Ethernet Controller. */ -typedef bus_size_t tulip_csrptr_t; - -#define TULIP_READ_CSR(sc, csr) \ - bus_space_read_4((sc)->tulip_bst, (sc)->tulip_bsh, (sc)->tulip_csrs.csr) -#define TULIP_WRITE_CSR(sc, csr, val) \ - bus_space_write_4((sc)->tulip_bst, (sc)->tulip_bsh, (sc)->tulip_csrs.csr, \ - (val)) - -#define TULIP_READ_CSRBYTE(sc, csr) \ - bus_space_read_1((sc)->tulip_bst, (sc)->tulip_bsh, (sc)->tulip_csrs.csr) -#define TULIP_WRITE_CSRBYTE(sc, csr, val) \ - bus_space_write_1((sc)->tulip_bst, (sc)->tulip_bsh, (sc)->tulip_csrs.csr, \ - (val)) -#endif /* __NetBSD__ */ +static void tulip_mii_autonegotiate(tulip_softc_t * const sc, const unsigned phyaddr); +static tulip_intrfunc_t tulip_intr_shared(void *arg); +static tulip_intrfunc_t tulip_intr_normal(void *arg); +static void tulip_init(tulip_softc_t * const sc); +static void tulip_reset(tulip_softc_t * const sc); +static ifnet_ret_t tulip_ifstart(struct ifnet *ifp); +static void tulip_rx_intr(tulip_softc_t * const sc); +static void tulip_addr_filter(tulip_softc_t * const sc); +static unsigned tulip_mii_readreg(tulip_softc_t * const sc, unsigned devaddr, unsigned regno); +static void tulip_mii_writereg(tulip_softc_t * const sc, unsigned devaddr, unsigned regno, unsigned data); +static int tulip_mii_map_abilities(tulip_softc_t * const sc, unsigned abilities); +static tulip_media_t tulip_mii_phy_readspecific(tulip_softc_t * const sc); +static int tulip_srom_decode(tulip_softc_t * const sc); +#if defined(IFM_ETHER) +static int tulip_ifmedia_change(struct ifnet * const ifp); +static void tulip_ifmedia_status(struct ifnet * const ifp, struct ifmediareq *req); +#endif +/* static void tulip_21140_map_media(tulip_softc_t *sc); */ -#ifdef TULIP_IOMAPPED -#define TULIP_EISA_CSRSIZE 16 -#define TULIP_PCI_CSRSIZE 8 +static void +tulip_timeout_callback( + void *arg) +{ + tulip_softc_t * const sc = arg; + tulip_spl_t s = TULIP_RAISESPL(); -#if !defined(__NetBSD__) && !defined(__OpenBSD__) -typedef tulip_uint16_t tulip_csrptr_t; + sc->tulip_flags &= ~TULIP_TIMEOUTPENDING; + sc->tulip_probe_timeout -= 1000 / TULIP_HZ; + (sc->tulip_boardsw->bd_media_poll)(sc, TULIP_MEDIAPOLL_TIMER); + TULIP_RESTORESPL(s); +} -#define TULIP_READ_CSR(sc, csr) (inl((sc)->tulip_csrs.csr)) -#define TULIP_WRITE_CSR(sc, csr, val) outl((sc)->tulip_csrs.csr, val) +static void +tulip_timeout( + tulip_softc_t * const sc) +{ + if (sc->tulip_flags & TULIP_TIMEOUTPENDING) + return; + sc->tulip_flags |= TULIP_TIMEOUTPENDING; + timeout(tulip_timeout_callback, sc, (hz + TULIP_HZ / 2) / TULIP_HZ); +} -#define TULIP_READ_CSRBYTE(sc, csr) (inb((sc)->tulip_csrs.csr)) -#define TULIP_WRITE_CSRBYTE(sc, csr, val) outb((sc)->tulip_csrs.csr, val) -#endif /* ! __NetBSD__ */ +#if defined(TULIP_NEED_FASTTIMEOUT) +static void +tulip_fasttimeout_callback( + void *arg) +{ + tulip_softc_t * const sc = arg; + tulip_spl_t s = TULIP_RAISESPL(); -#else /* TULIP_IOMAPPED */ + sc->tulip_flags &= ~TULIP_FASTTIMEOUTPENDING; + (sc->tulip_boardsw->bd_media_poll)(sc, TULIP_MEDIAPOLL_FASTTIMER); + TULIP_RESTORESPL(s); +} -#define TULIP_PCI_CSRSIZE 8 +static void +tulip_fasttimeout( + tulip_softc_t * const sc) +{ + if (sc->tulip_flags & TULIP_FASTTIMEOUTPENDING) + return; + sc->tulip_flags |= TULIP_FASTTIMEOUTPENDING; + timeout(tulip_fasttimeout_callback, sc, 1); +} +#endif -#if !defined(__NetBSD__) && !defined(__OpenBSD__) -typedef volatile tulip_uint32_t *tulip_csrptr_t; -/* - * macros to read and write CSRs. Note that the "0 +" in - * READ_CSR is to prevent the macro from being an lvalue - * and WRITE_CSR shouldn't be assigned from. - */ -#define TULIP_READ_CSR(sc, csr) (0 + *(sc)->tulip_csrs.csr) -#define TULIP_WRITE_CSR(sc, csr, val) \ - ((void)(*(sc)->tulip_csrs.csr = (val))) -#endif /* ! __NetBSD__ */ +static int +tulip_txprobe( + tulip_softc_t * const sc) +{ + struct mbuf *m; + /* + * Before we are sure this is the right media we need + * to send a small packet to make sure there's carrier. + * Strangely, BNC and AUI will 'see" receive data if + * either is connected so the transmit is the only way + * to verify the connectivity. + */ + MGETHDR(m, M_DONTWAIT, MT_DATA); + if (m == NULL) + return 0; + /* + * Construct a LLC TEST message which will point to ourselves. + */ + bcopy(sc->tulip_enaddr, mtod(m, struct ether_header *)->ether_dhost, 6); + bcopy(sc->tulip_enaddr, mtod(m, struct ether_header *)->ether_shost, 6); + mtod(m, struct ether_header *)->ether_type = htons(3); + mtod(m, unsigned char *)[14] = 0; + mtod(m, unsigned char *)[15] = 0; + mtod(m, unsigned char *)[16] = 0xE3; /* LLC Class1 TEST (no poll) */ + m->m_len = m->m_pkthdr.len = sizeof(struct ether_header) + 3; + /* + * send it! + */ + sc->tulip_cmdmode |= TULIP_CMD_TXRUN; + sc->tulip_flags |= TULIP_TXPROBE_ACTIVE; + TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode); + IF_PREPEND(&sc->tulip_if.if_snd, m); + tulip_ifstart(&sc->tulip_if); + sc->tulip_probe.probe_txprobes++; + return 1; +} -#endif /* TULIP_IOMAPPED */ -typedef struct { - tulip_csrptr_t csr_busmode; /* CSR0 */ - tulip_csrptr_t csr_txpoll; /* CSR1 */ - tulip_csrptr_t csr_rxpoll; /* CSR2 */ - tulip_csrptr_t csr_rxlist; /* CSR3 */ - tulip_csrptr_t csr_txlist; /* CSR4 */ - tulip_csrptr_t csr_status; /* CSR5 */ - tulip_csrptr_t csr_command; /* CSR6 */ - tulip_csrptr_t csr_intr; /* CSR7 */ - tulip_csrptr_t csr_missed_frame; /* CSR8 */ +#ifdef BIG_PACKET +#define TULIP_SIAGEN_WATCHDOG (sc->tulip_if.if_mtu > ETHERMTU ? TULIP_WATCHDOG_RXDISABLE|TULIP_WATCHDOG_TXDISABLE : 0) +#else +#define TULIP_SIAGEN_WATCHDOG 0 +#endif + +static void +tulip_media_set( + tulip_softc_t * const sc, + tulip_media_t media) +{ + const tulip_media_info_t *mi = sc->tulip_mediums[media]; + + if (mi == NULL) + return; + + /* + * If we are switching media, make sure we don't think there's + * any stale RX activity + */ + sc->tulip_flags &= ~TULIP_RXACT; + if (mi->mi_type == TULIP_MEDIAINFO_SIA) { + TULIP_CSR_WRITE(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); + TULIP_CSR_WRITE(sc, csr_sia_tx_rx, mi->mi_sia_tx_rx); + if (sc->tulip_features & TULIP_HAVE_SIAGP) { + TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_sia_gp_control|mi->mi_sia_general|TULIP_SIAGEN_WATCHDOG); + TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_sia_gp_data|mi->mi_sia_general|TULIP_SIAGEN_WATCHDOG); + } else { + TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_sia_general|TULIP_SIAGEN_WATCHDOG); + } + TULIP_CSR_WRITE(sc, csr_sia_connectivity, mi->mi_sia_connectivity); + } else if (mi->mi_type == TULIP_MEDIAINFO_GPR) { +#define TULIP_GPR_CMDBITS (TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER|TULIP_CMD_TXTHRSHLDCTL) + /* + * If the cmdmode bits don't match the currently operating mode, + * set the cmdmode appropriately and reset the chip. + */ + if (((mi->mi_cmdmode ^ TULIP_CSR_READ(sc, csr_command)) & TULIP_GPR_CMDBITS) != 0) { + sc->tulip_cmdmode &= ~TULIP_GPR_CMDBITS; + sc->tulip_cmdmode |= mi->mi_cmdmode; + tulip_reset(sc); + } + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_PINSET|sc->tulip_gpinit); + DELAY(10); + TULIP_CSR_WRITE(sc, csr_gp, (u_int8_t) mi->mi_gpdata); + } else if (mi->mi_type == TULIP_MEDIAINFO_SYM) { + /* + * If the cmdmode bits don't match the currently operating mode, + * set the cmdmode appropriately and reset the chip. + */ + if (((mi->mi_cmdmode ^ TULIP_CSR_READ(sc, csr_command)) & TULIP_GPR_CMDBITS) != 0) { + sc->tulip_cmdmode &= ~TULIP_GPR_CMDBITS; + sc->tulip_cmdmode |= mi->mi_cmdmode; + tulip_reset(sc); + } + TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_gpcontrol); + TULIP_CSR_WRITE(sc, csr_sia_general, mi->mi_gpdata); + } else if (mi->mi_type == TULIP_MEDIAINFO_MII + && sc->tulip_probe_state != TULIP_PROBE_INACTIVE) { + int idx; + if (sc->tulip_features & TULIP_HAVE_SIAGP) { + const u_int8_t *dp; + dp = &sc->tulip_rombuf[mi->mi_reset_offset]; + for (idx = 0; idx < mi->mi_reset_length; idx++, dp += 2) { + DELAY(10); + TULIP_CSR_WRITE(sc, csr_sia_general, (dp[0] + 256 * dp[1]) << 16); + } + sc->tulip_phyaddr = mi->mi_phyaddr; + dp = &sc->tulip_rombuf[mi->mi_gpr_offset]; + for (idx = 0; idx < mi->mi_gpr_length; idx++, dp += 2) { + DELAY(10); + TULIP_CSR_WRITE(sc, csr_sia_general, (dp[0] + 256 * dp[1]) << 16); + } + } else { + for (idx = 0; idx < mi->mi_reset_length; idx++) { + DELAY(10); + TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_rombuf[mi->mi_reset_offset + idx]); + } + sc->tulip_phyaddr = mi->mi_phyaddr; + for (idx = 0; idx < mi->mi_gpr_length; idx++) { + DELAY(10); + TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_rombuf[mi->mi_gpr_offset + idx]); + } + } + if (sc->tulip_flags & TULIP_TRYNWAY) { + tulip_mii_autonegotiate(sc, sc->tulip_phyaddr); + } else if ((sc->tulip_flags & TULIP_DIDNWAY) == 0) { + u_int32_t data = tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_CONTROL); + data &= ~(PHYCTL_SELECT_100MB|PHYCTL_FULL_DUPLEX|PHYCTL_AUTONEG_ENABLE); + sc->tulip_flags &= ~TULIP_DIDNWAY; + if (TULIP_IS_MEDIA_FD(media)) + data |= PHYCTL_FULL_DUPLEX; + if (TULIP_IS_MEDIA_100MB(media)) + data |= PHYCTL_SELECT_100MB; + tulip_mii_writereg(sc, sc->tulip_phyaddr, PHYREG_CONTROL, data); + } + } +} + - /* DC21040 specific registers */ +static void +tulip_linkup( + tulip_softc_t * const sc, + tulip_media_t media) +{ + if ((sc->tulip_flags & TULIP_LINKUP) == 0) + sc->tulip_flags |= TULIP_PRINTLINKUP; + sc->tulip_flags |= TULIP_LINKUP; + sc->tulip_if.if_flags &= ~IFF_OACTIVE; +#if 0 /* XXX how does with work with ifmedia? */ + if ((sc->tulip_flags & TULIP_DIDNWAY) == 0) { + if (sc->tulip_if.if_flags & IFF_FULLDUPLEX) { + if (TULIP_CAN_MEDIA_FD(media) + && sc->tulip_mediums[TULIP_FD_MEDIA_OF(media)] != NULL) + media = TULIP_FD_MEDIA_OF(media); + } else { + if (TULIP_IS_MEDIA_FD(media) + && sc->tulip_mediums[TULIP_HD_MEDIA_OF(media)] != NULL) + media = TULIP_HD_MEDIA_OF(media); + } + } +#endif + if (sc->tulip_media != media) { +#ifdef TULIP_DEBUG + sc->tulip_dbg.dbg_last_media = sc->tulip_media; +#endif + sc->tulip_media = media; + sc->tulip_flags |= TULIP_PRINTMEDIA; + if (TULIP_IS_MEDIA_FD(sc->tulip_media)) { + sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX; + } else if (sc->tulip_chipid != TULIP_21041 || (sc->tulip_flags & TULIP_DIDNWAY) == 0) { + sc->tulip_cmdmode &= ~TULIP_CMD_FULLDUPLEX; + } + } + /* + * We could set probe_timeout to 0 but setting to 3000 puts this + * in one central place and the only matters is tulip_link is + * followed by a tulip_timeout. Therefore setting it should not + * result in aberrant behavour. + */ + sc->tulip_probe_timeout = 3000; + sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + sc->tulip_flags &= ~(TULIP_TXPROBE_ACTIVE|TULIP_TRYNWAY); + if (sc->tulip_flags & TULIP_INRESET) { + tulip_media_set(sc, sc->tulip_media); + } else { + tulip_reset(sc); + tulip_init(sc); + } +} + + +static void +tulip_media_print( + tulip_softc_t * const sc) +{ + if ((sc->tulip_flags & TULIP_LINKUP) == 0) + return; + if (sc->tulip_flags & TULIP_PRINTMEDIA) { + printf(TULIP_PRINTF_FMT ": enabling %s port\n", + TULIP_PRINTF_ARGS, + tulip_mediums[sc->tulip_media]); + sc->tulip_flags &= ~(TULIP_PRINTMEDIA|TULIP_PRINTLINKUP); + } else if (sc->tulip_flags & TULIP_PRINTLINKUP) { + printf(TULIP_PRINTF_FMT ": link up\n", TULIP_PRINTF_ARGS); + sc->tulip_flags &= ~TULIP_PRINTLINKUP; + } +} - tulip_csrptr_t csr_enetrom; /* CSR9 */ - tulip_csrptr_t csr_reserved; /* CSR10 */ - tulip_csrptr_t csr_full_duplex; /* CSR11 */ - /* DC21040/DC21041 common registers */ +#if defined(TULIP_DO_GPR_SENSE) +static tulip_media_t +tulip_21140_gpr_media_sense( + tulip_softc_t * const sc) +{ + tulip_media_t maybe_media = TULIP_MEDIA_UNKNOWN; + tulip_media_t last_media = TULIP_MEDIA_UNKNOWN; + tulip_media_t media; - tulip_csrptr_t csr_sia_status; /* CSR12 */ - tulip_csrptr_t csr_sia_connectivity; /* CSR13 */ - tulip_csrptr_t csr_sia_tx_rx; /* CSR14 */ - tulip_csrptr_t csr_sia_general; /* CSR15 */ + /* + * If one of the media blocks contained a default media flag, + * use that. + */ + for (media = TULIP_MEDIA_UNKNOWN; media < TULIP_MEDIA_MAX; media++) { + const tulip_media_info_t *mi; + /* + * Media is not supported (or is full-duplex). + */ + if ((mi = sc->tulip_mediums[media]) == NULL || TULIP_IS_MEDIA_FD(media)) + continue; + if (mi->mi_type != TULIP_MEDIAINFO_GPR) + continue; - /* DC21140/DC21041 common registers */ + /* + * Remember the media is this is the "default" media. + */ + if (mi->mi_default && maybe_media == TULIP_MEDIA_UNKNOWN) + maybe_media = media; - tulip_csrptr_t csr_srom_mii; /* CSR9 */ - tulip_csrptr_t csr_gp_timer; /* CSR11 */ + /* + * No activity mask? Can't see if it is active if there's no mask. + */ + if (mi->mi_actmask == 0) + continue; - /* DC21140 specific registers */ + /* + * Does the activity data match? + */ + if ((TULIP_CSR_READ(sc, csr_gp) & mi->mi_actmask) != mi->mi_actdata) + continue; - tulip_csrptr_t csr_gp; /* CSR12 */ - tulip_csrptr_t csr_watchdog; /* CSR15 */ +#if defined(TULIP_DEBUG) + printf(TULIP_PRINTF_FMT ": gpr_media_sense: %s: 0x%02x & 0x%02x == 0x%02x\n", + TULIP_PRINTF_ARGS, tulip_mediums[media], + TULIP_CSR_READ(sc, csr_gp) & 0xFF, + mi->mi_actmask, mi->mi_actdata); +#endif + /* + * It does! If this is the first media we detected, then + * remember this media. If isn't the first, then there were + * multiple matches which we equate to no match (since we don't + * which to select (if any). + */ + if (last_media == TULIP_MEDIA_UNKNOWN) { + last_media = media; + } else if (last_media != media) { + last_media = TULIP_MEDIA_UNKNOWN; + } + } + return (last_media != TULIP_MEDIA_UNKNOWN) ? last_media : maybe_media; +} +#endif /* TULIP_DO_GPR_SENSE */ - /* DC21041 specific registers */ - tulip_csrptr_t csr_bootrom; /* CSR10 */ -} tulip_regfile_t; +static tulip_link_status_t +tulip_media_link_monitor( + tulip_softc_t * const sc) +{ + const tulip_media_info_t * const mi = sc->tulip_mediums[sc->tulip_media]; + tulip_link_status_t linkup = TULIP_LINK_DOWN; -/* - * The DC21040 has a stupid restriction in that the receive - * buffers must be longword aligned. But since Ethernet - * headers are not a multiple of longwords in size this forces - * the data to non-longword aligned. Since IP requires the - * data to be longword aligned, we need to copy it after it has - * been DMA'ed in our memory. - * - * Since we have to copy it anyways, we might as well as allocate - * dedicated receive space for the input. This allows to use a - * small receive buffer size and more ring entries to be able to - * better keep with a flood of tiny Ethernet packets. - * - * The receive space MUST ALWAYS be a multiple of the page size. - * And the number of receive descriptors multiplied by the size - * of the receive buffers must equal the recevive space. This - * is so that we can manipulate the page tables so that even if a - * packet wraps around the end of the receive space, we can - * treat it as virtually contiguous. - * - * The above used to be true (the stupid restriction is still true) - * but we gone to directly DMA'ing into MBUFs because with 100Mb - * cards the copying is just too much of a hit. - */ -#if defined(__alpha__) -#define TULIP_COPY_RXDATA 1 -#endif - -#define TULIP_RXDESCS 16 -#define TULIP_TXDESCS 128 -#define TULIP_RXQ_TARGET 16 -#define TULIP_RX_BUFLEN ((MCLBYTES < 2048 ? MCLBYTES : 2048) - 16) - -typedef enum { - TULIP_DC21040_GENERIC, - TULIP_DC21040_ZX314_MASTER, - TULIP_DC21040_ZX314_SLAVE, - TULIP_DC21140_DEC_EB, - TULIP_DC21140_DEC_DE500, - TULIP_DC21140_COGENT_EM100, - TULIP_DC21140_ZNYX_ZX34X, - TULIP_DC21041_GENERIC, - TULIP_DC21041_DE450 -} tulip_board_t; - -typedef struct _tulip_softc_t tulip_softc_t; - -typedef struct { - tulip_board_t bd_type; - const char *bd_description; - int (*bd_media_probe)(tulip_softc_t *sc); - void (*bd_media_select)(tulip_softc_t *sc); -} tulip_boardsw_t; - -typedef enum { - TULIP_DC21040, TULIP_DC21140, - TULIP_DC21041, TULIP_DE425, - TULIP_CHIPID_UNKNOWN -} tulip_chipid_t; - -typedef enum { - TULIP_PROBE_INACTIVE, TULIP_PROBE_10BASET, TULIP_PROBE_AUI, - TULIP_PROBE_BNC -} tulip_probe_state_t; - -typedef enum { - TULIP_MEDIA_UNKNOWN, TULIP_MEDIA_10BASET, - TULIP_MEDIA_BNC, TULIP_MEDIA_AUI, - TULIP_MEDIA_BNCAUI, TULIP_MEDIA_100BASET -} tulip_media_t; - -struct _tulip_softc_t { -#if defined(__bsdi__) - struct device tulip_dev; /* base device */ - struct isadev tulip_id; /* ISA device */ - struct intrhand tulip_ih; /* intrrupt vectoring */ - struct atshutdown tulip_ats; /* shutdown hook */ + if (mi == NULL) { +#if defined(DIAGNOSTIC) || defined(TULIP_DEBUG) + panic("tulip_media_link_monitor: %s: botch at line %d\n", + tulip_mediums[sc->tulip_media],__LINE__); #endif -#if defined(__NetBSD__) || defined(__OpenBSD__) - struct device tulip_dev; /* base device */ - void *tulip_ih; /* intrrupt vectoring */ - void *tulip_ats; /* shutdown hook */ - pci_chipset_tag_t tulip_pc; /* PCI chipset cookie */ - bus_space_tag_t tulip_bst; /* bus space tag */ - bus_space_handle_t tulip_bsh; /* bus space handle */ -#endif - char tulip_xname[IFNAMSIZ]; /* name + unit number */ - struct arpcom tulip_ac; - tulip_regfile_t tulip_csrs; - unsigned tulip_flags; -#define TULIP_WANTSETUP 0x0001 -#define TULIP_WANTHASH 0x0002 -#define TULIP_DOINGSETUP 0x0004 -#define TULIP_ALTPHYS 0x0008 /* use AUI */ -#define TULIP_TXPROBE_ACTIVE 0x0010 -#define TULIP_TXPROBE_OK 0x0020 -#define TULIP_INRESET 0x0040 -#define TULIP_WANTRXACT 0x0080 -#define TULIP_SLAVEDROM 0x0100 -#define TULIP_ROMOK 0x0200 - unsigned char tulip_rombuf[128]; - tulip_uint32_t tulip_setupbuf[192/sizeof(tulip_uint32_t)]; - tulip_uint32_t tulip_setupdata[192/sizeof(tulip_uint32_t)]; - tulip_uint32_t tulip_intrmask; - tulip_uint32_t tulip_cmdmode; - tulip_uint32_t tulip_revinfo; - tulip_uint32_t tulip_gpticks; - /* tulip_uint32_t tulip_bus; XXX */ - tulip_media_t tulip_media; - tulip_probe_state_t tulip_probe_state; - tulip_chipid_t tulip_chipid; - const tulip_boardsw_t *tulip_boardsw; - tulip_softc_t *tulip_slaves; - struct ifqueue tulip_txq; - struct ifqueue tulip_rxq; - tulip_ringinfo_t tulip_rxinfo; - tulip_ringinfo_t tulip_txinfo; -}; + return TULIP_LINK_UNKNOWN; + } + + + /* + * Have we seen some packets? If so, the link must be good. + */ + if ((sc->tulip_flags & (TULIP_RXACT|TULIP_LINKUP)) == (TULIP_RXACT|TULIP_LINKUP)) { + sc->tulip_flags &= ~TULIP_RXACT; + sc->tulip_probe_timeout = 3000; + return TULIP_LINK_UP; + } -#ifndef IFF_ALTPHYS -#define IFF_ALTPHYS IFF_LINK0 /* In case it isn't defined */ + sc->tulip_flags &= ~TULIP_RXACT; + if (mi->mi_type == TULIP_MEDIAINFO_MII) { + u_int32_t status; + /* + * Read the PHY status register. + */ + status = tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_STATUS); + if (status & PHYSTS_AUTONEG_DONE) { + /* + * If the PHY has completed autonegotiation, see the if the + * remote systems abilities have changed. If so, upgrade or + * downgrade as appropriate. + */ + u_int32_t abilities = tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_AUTONEG_ABILITIES); + abilities = (abilities << 6) & status; + if (abilities != sc->tulip_abilities) { +#if defined(TULIP_DEBUG) + loudprintf(TULIP_PRINTF_FMT "(phy%d): autonegotiation changed: 0x%04x -> 0x%04x\n", + TULIP_PRINTF_ARGS, sc->tulip_phyaddr, + sc->tulip_abilities, abilities); #endif -static const char *tulip_chipdescs[] = { - "DC21040 [10Mb/s]", - "DC21140 [10-100Mb/s]", - "DC21041 [10Mb/s]", -#if defined(TULIP_EISA) - "DE425 [10Mb/s]" + if (tulip_mii_map_abilities(sc, abilities)) { + tulip_linkup(sc, sc->tulip_probe_media); + return TULIP_LINK_UP; + } + /* + * if we had selected media because of autonegotiation, + * we need to probe for the new media. + */ + sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + if (sc->tulip_flags & TULIP_DIDNWAY) + return TULIP_LINK_DOWN; + } + } + /* + * The link is now up. If was down, say its back up. + */ + if ((status & (PHYSTS_LINK_UP|PHYSTS_REMOTE_FAULT)) == PHYSTS_LINK_UP) + linkup = TULIP_LINK_UP; + } else if (mi->mi_type == TULIP_MEDIAINFO_GPR) { + /* + * No activity sensor? Assume all's well. + */ + if (mi->mi_actmask == 0) + return TULIP_LINK_UNKNOWN; + /* + * Does the activity data match? + */ + if ((TULIP_CSR_READ(sc, csr_gp) & mi->mi_actmask) == mi->mi_actdata) + linkup = TULIP_LINK_UP; + } else if (mi->mi_type == TULIP_MEDIAINFO_SIA) { + /* + * Assume non TP ok for now. + */ + if (!TULIP_IS_MEDIA_TP(sc->tulip_media)) + return TULIP_LINK_UNKNOWN; + if ((TULIP_CSR_READ(sc, csr_sia_status) & TULIP_SIASTS_LINKFAIL) == 0) + linkup = TULIP_LINK_UP; + } else if (mi->mi_type == TULIP_MEDIAINFO_SYM) { + return TULIP_LINK_UNKNOWN; + } + /* + * We will wait for 3 seconds until the link goes into suspect mode. + */ + if (sc->tulip_flags & TULIP_LINKUP) { + if (linkup == TULIP_LINK_UP) + sc->tulip_probe_timeout = 3000; + if (sc->tulip_probe_timeout > 0) + return TULIP_LINK_UP; + + sc->tulip_flags &= ~TULIP_LINKUP; + printf(TULIP_PRINTF_FMT ": link down: cable problem?\n", TULIP_PRINTF_ARGS); + } +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_link_downed++; #endif -}; + return TULIP_LINK_DOWN; +} -#if defined(__FreeBSD__) -typedef void ifnet_ret_t; -typedef int ioctl_cmd_t; -tulip_softc_t *tulips[NDE]; -#define TULIP_UNIT_TO_SOFTC(unit) (tulips[unit]) -#define TULIP_IFP_TO_SOFTC(ifp) (TULIP_UNIT_TO_SOFTC((ifp)->if_unit)) -#define TULIP_BURSTSIZE(unit) pci_max_burst_len + +static void +tulip_media_poll( + tulip_softc_t * const sc, + tulip_mediapoll_event_t event) +{ +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_events[event]++; #endif -#if defined(__bsdi__) -typedef int ifnet_ret_t; -typedef int ioctl_cmd_t; -extern struct cfdriver decd; -#define TULIP_UNIT_TO_SOFTC(unit) ((tulip_softc_t *) decd.cd_devs[unit]) -#define TULIP_IFP_TO_SOFTC(ifp) (TULIP_UNIT_TO_SOFTC((ifp)->if_unit)) -#define TULIP_BURSTSIZE(unit) log2_burst_size + if (sc->tulip_probe_state == TULIP_PROBE_INACTIVE + && event == TULIP_MEDIAPOLL_TIMER) { + switch (tulip_media_link_monitor(sc)) { + case TULIP_LINK_DOWN: { + /* + * Link Monitor failed. Probe for new media. + */ + event = TULIP_MEDIAPOLL_LINKFAIL; + break; + } + case TULIP_LINK_UP: { + /* + * Check again soon. + */ + tulip_timeout(sc); + return; + } + case TULIP_LINK_UNKNOWN: { + /* + * We can't tell so don't bother. + */ + return; + } + } + } + + if (event == TULIP_MEDIAPOLL_LINKFAIL) { + if (sc->tulip_probe_state == TULIP_PROBE_INACTIVE) { + if (TULIP_DO_AUTOSENSE(sc)) { +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_link_failures++; #endif -#if defined(__NetBSD__) || defined(__OpenBSD__) -typedef void ifnet_ret_t; -typedef u_long ioctl_cmd_t; -extern struct cfattach de_ca; -extern struct cfdriver de_cd; -#define TULIP_UNIT_TO_SOFTC(unit) ((tulip_softc_t *) de_cd.cd_devs[unit]) -#define TULIP_IFP_TO_SOFTC(ifp) ((tulip_softc_t *)((ifp)->if_softc)) + sc->tulip_media = TULIP_MEDIA_UNKNOWN; + tulip_reset(sc); /* restart probe */ + } + return; + } +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_link_pollintrs++; +#endif + } + + if (event == TULIP_MEDIAPOLL_START) { + sc->tulip_if.if_flags |= IFF_OACTIVE; + if (sc->tulip_probe_state != TULIP_PROBE_INACTIVE) + return; + sc->tulip_probe_mediamask = 0; + sc->tulip_probe_passes = 0; +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_media_probes++; #endif + /* + * If the SROM contained an explicit media to use, use it. + */ + sc->tulip_cmdmode &= ~(TULIP_CMD_RXRUN|TULIP_CMD_FULLDUPLEX); + sc->tulip_flags |= TULIP_TRYNWAY|TULIP_PROBE1STPASS; + sc->tulip_flags &= ~(TULIP_DIDNWAY|TULIP_PRINTMEDIA|TULIP_PRINTLINKUP); + /* + * connidx is defaulted to a media_unknown type. + */ + sc->tulip_probe_media = tulip_srom_conninfo[sc->tulip_connidx].sc_media; + if (sc->tulip_probe_media != TULIP_MEDIA_UNKNOWN) { + tulip_linkup(sc, sc->tulip_probe_media); + tulip_timeout(sc); + return; + } -#ifndef TULIP_BURSTSIZE -#define TULIP_BURSTSIZE(unit) 3 + if (sc->tulip_features & TULIP_HAVE_GPR) { + sc->tulip_probe_state = TULIP_PROBE_GPRTEST; + sc->tulip_probe_timeout = 2000; + } else { + sc->tulip_probe_media = TULIP_MEDIA_MAX; + sc->tulip_probe_timeout = 0; + sc->tulip_probe_state = TULIP_PROBE_MEDIATEST; + } + } + + /* + * Ignore txprobe failures or spurious callbacks. + */ + if (event == TULIP_MEDIAPOLL_TXPROBE_FAILED + && sc->tulip_probe_state != TULIP_PROBE_MEDIATEST) { + sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE; + return; + } + + /* + * If we really transmitted a packet, then that's the media we'll use. + */ + if (event == TULIP_MEDIAPOLL_TXPROBE_OK || event == TULIP_MEDIAPOLL_LINKPASS) { + if (event == TULIP_MEDIAPOLL_LINKPASS) + sc->tulip_probe_media = TULIP_MEDIA_10BASET; +#if defined(TULIP_DEBUG) + else + sc->tulip_dbg.dbg_txprobes_ok[sc->tulip_probe_media]++; #endif + tulip_linkup(sc, sc->tulip_probe_media); + tulip_timeout(sc); + return; + } -#define tulip_if tulip_ac.ac_if -#if defined(__NetBSD__) || defined(__OpenBSD__) -#define tulip_unit tulip_dev.dv_unit -#define tulip_name tulip_dev.dv_cfdata->cf_driver->cd_name -#else -#define tulip_unit tulip_ac.ac_if.if_unit -#define tulip_name tulip_ac.ac_if.if_name + if (sc->tulip_probe_state == TULIP_PROBE_GPRTEST) { +#if defined(TULIP_DO_GPR_SENSE) + /* + * Check for media via the general purpose register. + * + * Try to sense the media via the GPR. If the same value + * occurs 3 times in a row then just use that. + */ + if (sc->tulip_probe_timeout > 0) { + tulip_media_t new_probe_media = tulip_21140_gpr_media_sense(sc); +#if defined(TULIP_DEBUG) + printf(TULIP_PRINTF_FMT ": media_poll: gpr sensing = %s\n", + TULIP_PRINTF_ARGS, tulip_mediums[new_probe_media]); #endif -#define tulip_bpf tulip_ac.ac_if.if_bpf -#define tulip_hwaddr tulip_ac.ac_enaddr + if (new_probe_media != TULIP_MEDIA_UNKNOWN) { + if (new_probe_media == sc->tulip_probe_media) { + if (--sc->tulip_probe_count == 0) + tulip_linkup(sc, sc->tulip_probe_media); + } else { + sc->tulip_probe_count = 10; + } + } + sc->tulip_probe_media = new_probe_media; + tulip_timeout(sc); + return; + } +#endif /* TULIP_DO_GPR_SENSE */ + /* + * Brute force. We cycle through each of the media types + * and try to transmit a packet. + */ + sc->tulip_probe_state = TULIP_PROBE_MEDIATEST; + sc->tulip_probe_media = TULIP_MEDIA_MAX; + sc->tulip_probe_timeout = 0; + tulip_timeout(sc); + return; + } -#define TULIP_CRC32_POLY 0xEDB88320UL /* CRC-32 Poly -- Little Endian */ -#define TULIP_CHECK_RXCRC 0 -#define TULIP_MAX_TXSEG 30 + if (sc->tulip_probe_state != TULIP_PROBE_MEDIATEST + && (sc->tulip_features & TULIP_HAVE_MII)) { + tulip_media_t old_media = sc->tulip_probe_media; + tulip_mii_autonegotiate(sc, sc->tulip_phyaddr); + switch (sc->tulip_probe_state) { + case TULIP_PROBE_FAILED: + case TULIP_PROBE_MEDIATEST: { + /* + * Try the next media. + */ + sc->tulip_probe_mediamask |= sc->tulip_mediums[sc->tulip_probe_media]->mi_mediamask; + sc->tulip_probe_timeout = 0; +#ifdef notyet + if (sc->tulip_probe_state == TULIP_PROBE_FAILED) + break; + if (sc->tulip_probe_media != tulip_mii_phy_readspecific(sc)) + break; + sc->tulip_probe_timeout = TULIP_IS_MEDIA_TP(sc->tulip_probe_media) ? 2500 : 300; +#endif + break; + } + case TULIP_PROBE_PHYAUTONEG: { + return; + } + case TULIP_PROBE_INACTIVE: { + /* + * Only probe if we autonegotiated a media that hasn't failed. + */ + sc->tulip_probe_timeout = 0; + if (sc->tulip_probe_mediamask & TULIP_BIT(sc->tulip_probe_media)) { + sc->tulip_probe_media = old_media; + break; + } + tulip_linkup(sc, sc->tulip_probe_media); + tulip_timeout(sc); + return; + } + default: { +#if defined(DIAGNOSTIC) || defined(TULIP_DEBUG) + panic("tulip_media_poll: botch at line %d\n", __LINE__); +#endif + break; + } + } + } -#define TULIP_ADDREQUAL(a1, a2) \ - (((u_short *)a1)[0] == ((u_short *)a2)[0] \ - && ((u_short *)a1)[1] == ((u_short *)a2)[1] \ - && ((u_short *)a1)[2] == ((u_short *)a2)[2]) -#define TULIP_ADDRBRDCST(a1) \ - (((u_short *)a1)[0] == 0xFFFFU \ - && ((u_short *)a1)[1] == 0xFFFFU \ - && ((u_short *)a1)[2] == 0xFFFFU) + if (event == TULIP_MEDIAPOLL_TXPROBE_FAILED) { +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_txprobes_failed[sc->tulip_probe_media]++; +#endif + sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE; + return; + } -static ifnet_ret_t tulip_start(struct ifnet *ifp); -static void tulip_rx_intr(tulip_softc_t *sc); -static void tulip_addr_filter(tulip_softc_t *sc); + /* + * switch to another media if we tried this one enough. + */ + if (/* event == TULIP_MEDIAPOLL_TXPROBE_FAILED || */ sc->tulip_probe_timeout <= 0) { +#if defined(TULIP_DEBUG) + if (sc->tulip_probe_media == TULIP_MEDIA_UNKNOWN) { + printf(TULIP_PRINTF_FMT ": poll media unknown!\n", + TULIP_PRINTF_ARGS); + sc->tulip_probe_media = TULIP_MEDIA_MAX; + } +#endif + /* + * Find the next media type to check for. Full Duplex + * types are not allowed. + */ + do { + sc->tulip_probe_media -= 1; + if (sc->tulip_probe_media == TULIP_MEDIA_UNKNOWN) { + if (++sc->tulip_probe_passes == 3) { + printf(TULIP_PRINTF_FMT ": autosense failed: cable problem?\n", + TULIP_PRINTF_ARGS); + if ((sc->tulip_if.if_flags & IFF_UP) == 0) { + sc->tulip_if.if_flags &= ~IFF_RUNNING; + sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + return; + } + } + sc->tulip_flags ^= TULIP_TRYNWAY; /* XXX */ + sc->tulip_probe_mediamask = 0; + sc->tulip_probe_media = TULIP_MEDIA_MAX - 1; + } + } while (sc->tulip_mediums[sc->tulip_probe_media] == NULL + || (sc->tulip_probe_mediamask & TULIP_BIT(sc->tulip_probe_media)) + || TULIP_IS_MEDIA_FD(sc->tulip_probe_media)); + +#if defined(TULIP_DEBUG) + printf(TULIP_PRINTF_FMT ": %s: probing %s\n", TULIP_PRINTF_ARGS, + event == TULIP_MEDIAPOLL_TXPROBE_FAILED ? "txprobe failed" : "timeout", + tulip_mediums[sc->tulip_probe_media]); +#endif + sc->tulip_probe_timeout = TULIP_IS_MEDIA_TP(sc->tulip_probe_media) ? 2500 : 1000; + sc->tulip_probe_state = TULIP_PROBE_MEDIATEST; + sc->tulip_probe.probe_txprobes = 0; + tulip_reset(sc); + tulip_media_set(sc, sc->tulip_probe_media); + sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE; + } + tulip_timeout(sc); -#if (defined(__NetBSD__) || defined(__OpenBSD__)) && defined(__alpha__) -/* XXX XXX NEED REAL DMA MAPPING SUPPORT XXX XXX */ -#undef vtophys -#define vtophys(va) alpha_XXX_dmamap((vm_offset_t)(va)) + /* + * If this is hanging off a phy, we know are doing NWAY and we have + * forced the phy to a specific speed. Wait for link up before + * before sending a packet. + */ + switch (sc->tulip_mediums[sc->tulip_probe_media]->mi_type) { + case TULIP_MEDIAINFO_MII: { + if (sc->tulip_probe_media != tulip_mii_phy_readspecific(sc)) + return; + break; + } + case TULIP_MEDIAINFO_SIA: { + if (TULIP_IS_MEDIA_TP(sc->tulip_probe_media)) { + if (TULIP_CSR_READ(sc, csr_sia_status) & TULIP_SIASTS_LINKFAIL) + return; + tulip_linkup(sc, sc->tulip_probe_media); +#ifdef notyet + if (sc->tulip_features & TULIP_HAVE_MII) + tulip_timeout(sc); #endif + return; + } + break; + } + case TULIP_MEDIAINFO_RESET: + case TULIP_MEDIAINFO_SYM: + case TULIP_MEDIAINFO_GPR: { + break; + } + } + /* + * Try to send a packet. + */ + tulip_txprobe(sc); +} - -static int -tulip_dc21040_media_probe( + +static void +tulip_media_select( tulip_softc_t * const sc) { - int cnt; + if (sc->tulip_features & TULIP_HAVE_GPR) { + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_PINSET|sc->tulip_gpinit); + DELAY(10); + TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_gpdata); + } + /* + * If this board has no media, just return + */ + if (sc->tulip_features & TULIP_HAVE_NOMEDIA) + return; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, 0); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_10BASET); - for (cnt = 0; cnt < 2400; cnt++) { - if ((TULIP_READ_CSR(sc, csr_sia_status) & TULIP_SIASTS_LINKFAIL) == 0) - break; - DELAY(1000); + if (sc->tulip_media == TULIP_MEDIA_UNKNOWN) { + TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask); + (*sc->tulip_boardsw->bd_media_poll)(sc, TULIP_MEDIAPOLL_START); + } else { + tulip_media_set(sc, sc->tulip_media); } - return (TULIP_READ_CSR(sc, csr_sia_status) & TULIP_SIASTS_LINKFAIL) != 0; } + static void -tulip_dc21040_media_select( - tulip_softc_t * const sc) +tulip_21040_mediainfo_init( + tulip_softc_t * const sc, + tulip_media_t media) { sc->tulip_cmdmode |= TULIP_CMD_CAPTREFFCT|TULIP_CMD_THRSHLD160 |TULIP_CMD_BACKOFFCTR; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - if (sc->tulip_if.if_flags & IFF_ALTPHYS) { - if ((sc->tulip_flags & TULIP_ALTPHYS) == 0) - printf("%s: enabling Thinwire/AUI port\n", sc->tulip_xname); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_AUI); - sc->tulip_flags |= TULIP_ALTPHYS; - } else { - if (sc->tulip_flags & TULIP_ALTPHYS) - printf("%s: enabling 10baseT/UTP port\n", sc->tulip_xname); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_10BASET); - sc->tulip_flags &= ~TULIP_ALTPHYS; - sc->tulip_media = TULIP_MEDIA_10BASET; + sc->tulip_if.if_baudrate = 10000000; + + if (media == TULIP_MEDIA_10BASET || media == TULIP_MEDIA_UNKNOWN) { + TULIP_MEDIAINFO_SIA_INIT(sc, &sc->tulip_mediainfo[0], 21040, 10BASET); + TULIP_MEDIAINFO_SIA_INIT(sc, &sc->tulip_mediainfo[1], 21040, 10BASET_FD); + } + + if (media == TULIP_MEDIA_AUIBNC || media == TULIP_MEDIA_UNKNOWN) { + TULIP_MEDIAINFO_SIA_INIT(sc, &sc->tulip_mediainfo[2], 21040, AUIBNC); + } + + if (media == TULIP_MEDIA_UNKNOWN) { + TULIP_MEDIAINFO_SIA_INIT(sc, &sc->tulip_mediainfo[3], 21040, EXTSIA); } } -static const tulip_boardsw_t tulip_dc21040_boardsw = { - TULIP_DC21040_GENERIC, - "", - tulip_dc21040_media_probe, - tulip_dc21040_media_select -}; - -static int -tulip_zx314_media_probe( +static void +tulip_21040_media_probe( tulip_softc_t * const sc) { - TULIP_WRITE_CSR(sc, csr_sia_connectivity, 0); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_10BASET); - return 0; + tulip_21040_mediainfo_init(sc, TULIP_MEDIA_UNKNOWN); + return; } static void -tulip_zx314_media_select( +tulip_21040_10baset_only_media_probe( tulip_softc_t * const sc) { - sc->tulip_cmdmode |= TULIP_CMD_CAPTREFFCT|TULIP_CMD_THRSHLD160 - |TULIP_CMD_BACKOFFCTR; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - if (sc->tulip_flags & TULIP_ALTPHYS) - printf("%s: enabling 10baseT/UTP port\n", sc->tulip_xname); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_10BASET); - sc->tulip_flags &= ~TULIP_ALTPHYS; + tulip_21040_mediainfo_init(sc, TULIP_MEDIA_10BASET); + tulip_media_set(sc, TULIP_MEDIA_10BASET); sc->tulip_media = TULIP_MEDIA_10BASET; } +static void +tulip_21040_10baset_only_media_select( + tulip_softc_t * const sc) +{ + sc->tulip_flags |= TULIP_LINKUP; + if (sc->tulip_media == TULIP_MEDIA_10BASET_FD) { + sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX; + sc->tulip_flags &= ~TULIP_SQETEST; + } else { + sc->tulip_cmdmode &= ~TULIP_CMD_FULLDUPLEX; + sc->tulip_flags |= TULIP_SQETEST; + } + tulip_media_set(sc, sc->tulip_media); +} + +static void +tulip_21040_auibnc_only_media_probe( + tulip_softc_t * const sc) +{ + tulip_21040_mediainfo_init(sc, TULIP_MEDIA_AUIBNC); + sc->tulip_flags |= TULIP_SQETEST|TULIP_LINKUP; + tulip_media_set(sc, TULIP_MEDIA_AUIBNC); + sc->tulip_media = TULIP_MEDIA_AUIBNC; +} + +static void +tulip_21040_auibnc_only_media_select( + tulip_softc_t * const sc) +{ + tulip_media_set(sc, TULIP_MEDIA_AUIBNC); + sc->tulip_cmdmode &= ~TULIP_CMD_FULLDUPLEX; +} -static const tulip_boardsw_t tulip_dc21040_zx314_master_boardsw = { - TULIP_DC21040_ZX314_MASTER, - "ZNYX ZX314 ", - tulip_zx314_media_probe, - tulip_zx314_media_select +static const tulip_boardsw_t tulip_21040_boardsw = { + TULIP_21040_GENERIC, + tulip_21040_media_probe, + tulip_media_select, + tulip_media_poll, }; -static const tulip_boardsw_t tulip_dc21040_zx314_slave_boardsw = { - TULIP_DC21040_ZX314_SLAVE, - "ZNYX ZX314 ", - tulip_zx314_media_probe, - tulip_zx314_media_select +static const tulip_boardsw_t tulip_21040_10baset_only_boardsw = { + TULIP_21040_GENERIC, + tulip_21040_10baset_only_media_probe, + tulip_21040_10baset_only_media_select, + NULL, }; - -static int -tulip_dc21140_evalboard_media_probe( + +static const tulip_boardsw_t tulip_21040_auibnc_only_boardsw = { + TULIP_21040_GENERIC, + tulip_21040_auibnc_only_media_probe, + tulip_21040_auibnc_only_media_select, + NULL, +}; + + +static void +tulip_21041_mediainfo_init( tulip_softc_t * const sc) { - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_EB_PINS); - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_EB_INIT); - TULIP_WRITE_CSR(sc, csr_command, - TULIP_READ_CSR(sc, csr_command) | TULIP_CMD_PORTSELECT | - TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE); - TULIP_WRITE_CSR(sc, csr_command, - TULIP_READ_CSR(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL); - DELAY(1000000); - return (TULIP_READ_CSR(sc, csr_gp) & TULIP_GP_EB_OK100) != 0; + tulip_media_info_t * const mi = sc->tulip_mediainfo; + +#ifdef notyet + if (sc->tulip_revinfo >= 0x20) { + TULIP_MEDIAINFO_SIA_INIT(sc, &mi[0], 21041P2, 10BASET); + TULIP_MEDIAINFO_SIA_INIT(sc, &mi[1], 21041P2, 10BASET_FD); + TULIP_MEDIAINFO_SIA_INIT(sc, &mi[0], 21041P2, AUI); + TULIP_MEDIAINFO_SIA_INIT(sc, &mi[1], 21041P2, BNC); + return; + } +#endif + TULIP_MEDIAINFO_SIA_INIT(sc, &mi[0], 21041, 10BASET); + TULIP_MEDIAINFO_SIA_INIT(sc, &mi[1], 21041, 10BASET_FD); + TULIP_MEDIAINFO_SIA_INIT(sc, &mi[2], 21041, AUI); + TULIP_MEDIAINFO_SIA_INIT(sc, &mi[3], 21041, BNC); } + static void -tulip_dc21140_evalboard_media_select( +tulip_21041_media_probe( tulip_softc_t * const sc) { - sc->tulip_cmdmode |= TULIP_CMD_STOREFWD|TULIP_CMD_MUSTBEONE - |TULIP_CMD_BACKOFFCTR; - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_EB_PINS); - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_EB_INIT); - if (sc->tulip_if.if_flags & IFF_ALTPHYS) { - if ((sc->tulip_flags & TULIP_ALTPHYS) == 0) - printf("%s: enabling 100baseTX UTP port\n", sc->tulip_xname); - sc->tulip_cmdmode |= TULIP_CMD_PORTSELECT - |TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER; - sc->tulip_cmdmode &= ~TULIP_CMD_TXTHRSHLDCTL; - sc->tulip_flags |= TULIP_ALTPHYS; - sc->tulip_media = TULIP_MEDIA_100BASET; - } else { - if (sc->tulip_flags & TULIP_ALTPHYS) - printf("%s: enabling 10baseT UTP port\n", sc->tulip_xname); - sc->tulip_cmdmode &= ~(TULIP_CMD_PORTSELECT - |TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER); - sc->tulip_cmdmode |= TULIP_CMD_TXTHRSHLDCTL; - sc->tulip_flags &= ~TULIP_ALTPHYS; - sc->tulip_media = TULIP_MEDIA_10BASET; + sc->tulip_if.if_baudrate = 10000000; + sc->tulip_cmdmode |= TULIP_CMD_CAPTREFFCT|TULIP_CMD_ENHCAPTEFFCT + |TULIP_CMD_THRSHLD160|TULIP_CMD_BACKOFFCTR; + sc->tulip_intrmask |= TULIP_STS_LINKPASS; + tulip_21041_mediainfo_init(sc); +} + +static void +tulip_21041_media_poll( + tulip_softc_t * const sc, + const tulip_mediapoll_event_t event) +{ + u_int32_t sia_status; + +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_events[event]++; +#endif + + if (event == TULIP_MEDIAPOLL_LINKFAIL) { + if (sc->tulip_probe_state != TULIP_PROBE_INACTIVE + || !TULIP_DO_AUTOSENSE(sc)) + return; + sc->tulip_media = TULIP_MEDIA_UNKNOWN; + tulip_reset(sc); /* start probe */ + return; } -#ifdef BIG_PACKET - if (sc->tulip_if.if_mtu > ETHERMTU) { - TULIP_WRITE_CSR(sc, csr_watchdog, TULIP_WATCHDOG_RXDISABLE|TULIP_WATCHDOG_TXDISABLE); + + /* + * If we've been been asked to start a poll or link change interrupt + * restart the probe (and reset the tulip to a known state). + */ + if (event == TULIP_MEDIAPOLL_START) { + sc->tulip_if.if_flags |= IFF_OACTIVE; + sc->tulip_cmdmode &= ~(TULIP_CMD_FULLDUPLEX|TULIP_CMD_RXRUN); +#ifdef notyet + if (sc->tulip_revinfo >= 0x20) { + sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX; + sc->tulip_flags |= TULIP_DIDNWAY; + } +#endif + TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode); + sc->tulip_probe_state = TULIP_PROBE_MEDIATEST; + sc->tulip_probe_media = TULIP_MEDIA_10BASET; + sc->tulip_probe_timeout = TULIP_21041_PROBE_10BASET_TIMEOUT; + tulip_media_set(sc, TULIP_MEDIA_10BASET); + tulip_timeout(sc); + return; } + + if (sc->tulip_probe_state == TULIP_PROBE_INACTIVE) + return; + + if (event == TULIP_MEDIAPOLL_TXPROBE_OK) { +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_txprobes_ok[sc->tulip_probe_media]++; #endif + tulip_linkup(sc, sc->tulip_probe_media); + return; + } + + sia_status = TULIP_CSR_READ(sc, csr_sia_status); + TULIP_CSR_WRITE(sc, csr_sia_status, sia_status); + if ((sia_status & TULIP_SIASTS_LINKFAIL) == 0) { + if (sc->tulip_revinfo >= 0x20) { + if (sia_status & (PHYSTS_10BASET_FD << (16 - 6))) + sc->tulip_probe_media = TULIP_MEDIA_10BASET_FD; + } + /* + * If the link has passed LinkPass, 10baseT is the + * proper media to use. + */ + tulip_linkup(sc, sc->tulip_probe_media); + return; + } + + /* + * wait for up to 2.4 seconds for the link to reach pass state. + * Only then start scanning the other media for activity. + * choose media with receive activity over those without. + */ + if (sc->tulip_probe_media == TULIP_MEDIA_10BASET) { + if (event != TULIP_MEDIAPOLL_TIMER) + return; + if (sc->tulip_probe_timeout > 0 + && (sia_status & TULIP_SIASTS_OTHERRXACTIVITY) == 0) { + tulip_timeout(sc); + return; + } + sc->tulip_probe_timeout = TULIP_21041_PROBE_AUIBNC_TIMEOUT; + sc->tulip_flags |= TULIP_WANTRXACT; + if (sia_status & TULIP_SIASTS_OTHERRXACTIVITY) { + sc->tulip_probe_media = TULIP_MEDIA_BNC; + } else { + sc->tulip_probe_media = TULIP_MEDIA_AUI; + } + tulip_media_set(sc, sc->tulip_probe_media); + tulip_timeout(sc); + return; + } + + /* + * If we failed, clear the txprobe active flag. + */ + if (event == TULIP_MEDIAPOLL_TXPROBE_FAILED) + sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE; + + + if (event == TULIP_MEDIAPOLL_TIMER) { + /* + * If we've received something, then that's our link! + */ + if (sc->tulip_flags & TULIP_RXACT) { + tulip_linkup(sc, sc->tulip_probe_media); + return; + } + /* + * if no txprobe active + */ + if ((sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0 + && ((sc->tulip_flags & TULIP_WANTRXACT) == 0 + || (sia_status & TULIP_SIASTS_RXACTIVITY))) { + sc->tulip_probe_timeout = TULIP_21041_PROBE_AUIBNC_TIMEOUT; + tulip_txprobe(sc); + tulip_timeout(sc); + return; + } + /* + * Take 2 passes through before deciding to not + * wait for receive activity. Then take another + * two passes before spitting out a warning. + */ + if (sc->tulip_probe_timeout <= 0) { + if (sc->tulip_flags & TULIP_WANTRXACT) { + sc->tulip_flags &= ~TULIP_WANTRXACT; + sc->tulip_probe_timeout = TULIP_21041_PROBE_AUIBNC_TIMEOUT; + } else { + printf(TULIP_PRINTF_FMT ": autosense failed: cable problem?\n", + TULIP_PRINTF_ARGS); + if ((sc->tulip_if.if_flags & IFF_UP) == 0) { + sc->tulip_if.if_flags &= ~IFF_RUNNING; + sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + return; + } + } + } + } + + /* + * Since this media failed to probe, try the other one. + */ + sc->tulip_probe_timeout = TULIP_21041_PROBE_AUIBNC_TIMEOUT; + if (sc->tulip_probe_media == TULIP_MEDIA_AUI) { + sc->tulip_probe_media = TULIP_MEDIA_BNC; + } else { + sc->tulip_probe_media = TULIP_MEDIA_AUI; + } + tulip_media_set(sc, sc->tulip_probe_media); + sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE; + tulip_timeout(sc); } -static const tulip_boardsw_t tulip_dc21140_eb_boardsw = { - TULIP_DC21140_DEC_EB, - "", - tulip_dc21140_evalboard_media_probe, - tulip_dc21140_evalboard_media_select +static const tulip_boardsw_t tulip_21041_boardsw = { + TULIP_21041_GENERIC, + tulip_21041_media_probe, + tulip_media_select, + tulip_21041_media_poll }; - -static int -tulip_dc21140_cogent_em100_media_probe( + + +static const tulip_phy_attr_t tulip_mii_phy_attrlist[] = { + { 0x20005c00, 0, /* 08-00-17 */ + { + { 0x19, 0x0040, 0x0040 }, /* 10TX */ + { 0x19, 0x0040, 0x0000 }, /* 100TX */ + }, +#if defined(TULIP_DEBUG) + "NS DP83840", +#endif + }, + { 0x0281F400, 0, /* 00-A0-7D */ + { + { 0x12, 0x0010, 0x0000 }, /* 10T */ + { }, /* 100TX */ + { 0x12, 0x0010, 0x0010 }, /* 100T4 */ + { 0x12, 0x0008, 0x0008 }, /* FULL_DUPLEX */ + }, +#if defined(TULIP_DEBUG) + "Seeq 80C240" +#endif + }, +#if 0 + { 0x0015F420, 0, /* 00-A0-7D */ + { + { 0x12, 0x0010, 0x0000 }, /* 10T */ + { }, /* 100TX */ + { 0x12, 0x0010, 0x0010 }, /* 100T4 */ + { 0x12, 0x0008, 0x0008 }, /* FULL_DUPLEX */ + }, +#if defined(TULIP_DEBUG) + "Broadcom BCM5000" +#endif + }, +#endif + { 0x0281F400, 0, /* 00-A0-BE */ + { + { 0x11, 0x8000, 0x0000 }, /* 10T */ + { 0x11, 0x8000, 0x8000 }, /* 100TX */ + { }, /* 100T4 */ + { 0x11, 0x4000, 0x4000 }, /* FULL_DUPLEX */ + }, +#if defined(TULIP_DEBUG) + "ICS 1890" +#endif + }, + { 0 } +}; + + +static tulip_media_t +tulip_mii_phy_readspecific( tulip_softc_t * const sc) { - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_EM100_PINS); - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_EM100_INIT); - TULIP_WRITE_CSR(sc, csr_command, - TULIP_READ_CSR(sc, csr_command) | TULIP_CMD_PORTSELECT | - TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE); - TULIP_WRITE_CSR(sc, csr_command, - TULIP_READ_CSR(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL); + const tulip_phy_attr_t *attr; + u_int16_t data; + u_int32_t id; + unsigned idx = 0; + static const tulip_media_t table[] = { + TULIP_MEDIA_UNKNOWN, + TULIP_MEDIA_10BASET, + TULIP_MEDIA_100BASETX, + TULIP_MEDIA_100BASET4, + TULIP_MEDIA_UNKNOWN, + TULIP_MEDIA_10BASET_FD, + TULIP_MEDIA_100BASETX_FD, + TULIP_MEDIA_UNKNOWN + }; + + /* + * Don't read phy specific registers if link is not up. + */ + data = tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_STATUS); + if ((data & (PHYSTS_LINK_UP|PHYSTS_EXTENDED_REGS)) != (PHYSTS_LINK_UP|PHYSTS_EXTENDED_REGS)) + return TULIP_MEDIA_UNKNOWN; + + id = (tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_IDLOW) << 16) | + tulip_mii_readreg(sc, sc->tulip_phyaddr, PHYREG_IDHIGH); + for (attr = tulip_mii_phy_attrlist;; attr++) { + if (attr->attr_id == 0) + return TULIP_MEDIA_UNKNOWN; + if ((id & ~0x0F) == attr->attr_id) + break; + } + + if (attr->attr_modes[PHY_MODE_100TX].pm_regno) { + const tulip_phy_modedata_t * const pm = &attr->attr_modes[PHY_MODE_100TX]; + data = tulip_mii_readreg(sc, sc->tulip_phyaddr, pm->pm_regno); + if ((data & pm->pm_mask) == pm->pm_value) + idx = 2; + } + if (idx == 0 && attr->attr_modes[PHY_MODE_100T4].pm_regno) { + const tulip_phy_modedata_t * const pm = &attr->attr_modes[PHY_MODE_100T4]; + data = tulip_mii_readreg(sc, sc->tulip_phyaddr, pm->pm_regno); + if ((data & pm->pm_mask) == pm->pm_value) + idx = 3; + } + if (idx == 0 && attr->attr_modes[PHY_MODE_10T].pm_regno) { + const tulip_phy_modedata_t * const pm = &attr->attr_modes[PHY_MODE_10T]; + data = tulip_mii_readreg(sc, sc->tulip_phyaddr, pm->pm_regno); + if ((data & pm->pm_mask) == pm->pm_value) + idx = 1; + } + if (idx != 0 && attr->attr_modes[PHY_MODE_FULLDUPLEX].pm_regno) { + const tulip_phy_modedata_t * const pm = &attr->attr_modes[PHY_MODE_FULLDUPLEX]; + data = tulip_mii_readreg(sc, sc->tulip_phyaddr, pm->pm_regno); + idx += ((data & pm->pm_mask) == pm->pm_value ? 4 : 0); + } + return table[idx]; +} + + +static unsigned +tulip_mii_get_phyaddr( + tulip_softc_t * const sc, + unsigned offset) +{ + unsigned phyaddr; + + for (phyaddr = 1; phyaddr < 32; phyaddr++) { + unsigned status = tulip_mii_readreg(sc, phyaddr, PHYREG_STATUS); + if (status == 0 || status == 0xFFFF || status < PHYSTS_10BASET) + continue; + if (offset == 0) + return phyaddr; + offset--; + } + if (offset == 0) { + unsigned status = tulip_mii_readreg(sc, 0, PHYREG_STATUS); + if (status == 0 || status == 0xFFFF || status < PHYSTS_10BASET) + return TULIP_MII_NOPHY; + return 0; + } + return TULIP_MII_NOPHY; +} + + +static int +tulip_mii_map_abilities( + tulip_softc_t * const sc, + unsigned abilities) +{ + sc->tulip_abilities = abilities; + if (abilities & PHYSTS_100BASETX_FD) { + sc->tulip_probe_media = TULIP_MEDIA_100BASETX_FD; + } else if (abilities & PHYSTS_100BASET4) { + sc->tulip_probe_media = TULIP_MEDIA_100BASET4; + } else if (abilities & PHYSTS_100BASETX) { + sc->tulip_probe_media = TULIP_MEDIA_100BASETX; + } else if (abilities & PHYSTS_10BASET_FD) { + sc->tulip_probe_media = TULIP_MEDIA_10BASET_FD; + } else if (abilities & PHYSTS_10BASET) { + sc->tulip_probe_media = TULIP_MEDIA_10BASET; + } else { + sc->tulip_probe_state = TULIP_PROBE_MEDIATEST; + return 0; + } + sc->tulip_probe_state = TULIP_PROBE_INACTIVE; return 1; } static void -tulip_dc21140_cogent_em100_media_select( +tulip_mii_autonegotiate( + tulip_softc_t * const sc, + const unsigned phyaddr) +{ + switch (sc->tulip_probe_state) { + case TULIP_PROBE_MEDIATEST: + case TULIP_PROBE_INACTIVE: { + sc->tulip_flags |= TULIP_DIDNWAY; + tulip_mii_writereg(sc, phyaddr, PHYREG_CONTROL, PHYCTL_RESET); + sc->tulip_probe_timeout = 3000; + sc->tulip_intrmask |= TULIP_STS_ABNRMLINTR|TULIP_STS_NORMALINTR; + sc->tulip_probe_state = TULIP_PROBE_PHYRESET; + /* FALL THROUGH */ + } + case TULIP_PROBE_PHYRESET: { + u_int32_t status; + u_int32_t data = tulip_mii_readreg(sc, phyaddr, PHYREG_CONTROL); + if (data & PHYCTL_RESET) { + if (sc->tulip_probe_timeout > 0) { + tulip_timeout(sc); + return; + } + printf(TULIP_PRINTF_FMT "(phy%d): error: reset of PHY never completed!\n", + TULIP_PRINTF_ARGS, phyaddr); + sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE; + sc->tulip_probe_state = TULIP_PROBE_FAILED; + sc->tulip_if.if_flags &= ~(IFF_UP|IFF_RUNNING); + return; + } + status = tulip_mii_readreg(sc, phyaddr, PHYREG_STATUS); + if ((status & PHYSTS_CAN_AUTONEG) == 0) { +#if defined(TULIP_DEBUG) + loudprintf(TULIP_PRINTF_FMT "(phy%d): autonegotiation disabled\n", + TULIP_PRINTF_ARGS, phyaddr); +#endif + sc->tulip_flags &= ~TULIP_DIDNWAY; + sc->tulip_probe_state = TULIP_PROBE_MEDIATEST; + return; + } + if (tulip_mii_readreg(sc, phyaddr, PHYREG_AUTONEG_ADVERTISEMENT) != ((status >> 6) | 0x01)) + tulip_mii_writereg(sc, phyaddr, PHYREG_AUTONEG_ADVERTISEMENT, (status >> 6) | 0x01); + tulip_mii_writereg(sc, phyaddr, PHYREG_CONTROL, data|PHYCTL_AUTONEG_RESTART|PHYCTL_AUTONEG_ENABLE); + data = tulip_mii_readreg(sc, phyaddr, PHYREG_CONTROL); +#if defined(TULIP_DEBUG) + if ((data & PHYCTL_AUTONEG_ENABLE) == 0) + loudprintf(TULIP_PRINTF_FMT "(phy%d): oops: enable autonegotiation failed: 0x%04x\n", + TULIP_PRINTF_ARGS, phyaddr, data); + else + loudprintf(TULIP_PRINTF_FMT "(phy%d): autonegotiation restarted: 0x%04x\n", + TULIP_PRINTF_ARGS, phyaddr, data); + sc->tulip_dbg.dbg_nway_starts++; +#endif + sc->tulip_probe_state = TULIP_PROBE_PHYAUTONEG; + sc->tulip_probe_timeout = 3000; + /* FALL THROUGH */ + } + case TULIP_PROBE_PHYAUTONEG: { + u_int32_t status = tulip_mii_readreg(sc, phyaddr, PHYREG_STATUS); + u_int32_t data; + if ((status & PHYSTS_AUTONEG_DONE) == 0) { + if (sc->tulip_probe_timeout > 0) { + tulip_timeout(sc); + return; + } +#if defined(TULIP_DEBUG) + loudprintf(TULIP_PRINTF_FMT "(phy%d): autonegotiation timeout: sts=0x%04x, ctl=0x%04x\n", + TULIP_PRINTF_ARGS, phyaddr, status, + tulip_mii_readreg(sc, phyaddr, PHYREG_CONTROL)); +#endif + sc->tulip_flags &= ~TULIP_DIDNWAY; + sc->tulip_probe_state = TULIP_PROBE_MEDIATEST; + return; + } + data = tulip_mii_readreg(sc, phyaddr, PHYREG_AUTONEG_ABILITIES); +#if defined(TULIP_DEBUG) + loudprintf(TULIP_PRINTF_FMT "(phy%d): autonegotiation complete: 0x%04x\n", + TULIP_PRINTF_ARGS, phyaddr, data); +#endif + data = (data << 6) & status; + if (!tulip_mii_map_abilities(sc, data)) + sc->tulip_flags &= ~TULIP_DIDNWAY; + return; + } + default: { +#if defined(DIAGNOSTIC) + panic("tulip_media_poll: botch at line %d\n", __LINE__); +#endif + break; + } + } +#if defined(TULIP_DEBUG) + loudprintf(TULIP_PRINTF_FMT "(phy%d): autonegotiation failure: state = %d\n", + TULIP_PRINTF_ARGS, phyaddr, sc->tulip_probe_state); + sc->tulip_dbg.dbg_nway_failures++; +#endif +} + + +static void +tulip_2114x_media_preset( tulip_softc_t * const sc) { - sc->tulip_cmdmode |= TULIP_CMD_STOREFWD|TULIP_CMD_MUSTBEONE - |TULIP_CMD_BACKOFFCTR; - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_EM100_PINS); - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_EM100_INIT); - if ((sc->tulip_flags & TULIP_ALTPHYS) == 0) - printf("%s: enabling 100baseTX UTP port\n", sc->tulip_xname); - sc->tulip_cmdmode |= TULIP_CMD_PORTSELECT - |TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER; - sc->tulip_cmdmode &= ~TULIP_CMD_TXTHRSHLDCTL; - sc->tulip_flags |= TULIP_ALTPHYS; - sc->tulip_media = TULIP_MEDIA_100BASET; -#ifdef BIG_PACKET - if (sc->tulip_if.if_mtu > ETHERMTU) { - TULIP_WRITE_CSR(sc, csr_watchdog, TULIP_WATCHDOG_RXDISABLE|TULIP_WATCHDOG_TXDISABLE); + const tulip_media_info_t *mi = NULL; + tulip_media_t media = sc->tulip_media; + + if (sc->tulip_probe_state == TULIP_PROBE_INACTIVE) + media = sc->tulip_media; + else + media = sc->tulip_probe_media; + + sc->tulip_cmdmode &= ~TULIP_CMD_PORTSELECT; + sc->tulip_flags &= ~TULIP_SQETEST; + if (media != TULIP_MEDIA_UNKNOWN) { +#if defined(TULIP_DEBUG) + if (media < TULIP_MEDIA_MAX && sc->tulip_mediums[media] != NULL) { +#endif + mi = sc->tulip_mediums[media]; + if (mi->mi_type == TULIP_MEDIAINFO_MII) { + sc->tulip_cmdmode |= TULIP_CMD_PORTSELECT; + } else if (mi->mi_type == TULIP_MEDIAINFO_GPR + || mi->mi_type == TULIP_MEDIAINFO_SYM) { + sc->tulip_cmdmode &= ~TULIP_GPR_CMDBITS; + sc->tulip_cmdmode |= mi->mi_cmdmode; + } else if (mi->mi_type == TULIP_MEDIAINFO_SIA) { + TULIP_CSR_WRITE(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); + } +#if defined(TULIP_DEBUG) + } else { + printf(TULIP_PRINTF_FMT ": preset: bad media %d!\n", + TULIP_PRINTF_ARGS, media); + } +#endif } + switch (media) { + case TULIP_MEDIA_BNC: + case TULIP_MEDIA_AUI: + case TULIP_MEDIA_10BASET: { + sc->tulip_cmdmode &= ~TULIP_CMD_FULLDUPLEX; + sc->tulip_cmdmode |= TULIP_CMD_TXTHRSHLDCTL; + sc->tulip_if.if_baudrate = 10000000; + sc->tulip_flags |= TULIP_SQETEST; + break; + } + case TULIP_MEDIA_10BASET_FD: { + sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX|TULIP_CMD_TXTHRSHLDCTL; + sc->tulip_if.if_baudrate = 10000000; + break; + } + case TULIP_MEDIA_100BASEFX: + case TULIP_MEDIA_100BASET4: + case TULIP_MEDIA_100BASETX: { + sc->tulip_cmdmode &= ~(TULIP_CMD_FULLDUPLEX|TULIP_CMD_TXTHRSHLDCTL); + sc->tulip_cmdmode |= TULIP_CMD_PORTSELECT; + sc->tulip_if.if_baudrate = 100000000; + break; + } + case TULIP_MEDIA_100BASEFX_FD: + case TULIP_MEDIA_100BASETX_FD: { + sc->tulip_cmdmode |= TULIP_CMD_FULLDUPLEX|TULIP_CMD_PORTSELECT; + sc->tulip_cmdmode &= ~TULIP_CMD_TXTHRSHLDCTL; + sc->tulip_if.if_baudrate = 100000000; + break; + } + default: { + break; + } + } + TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode); +} + + +/* + ******************************************************************** + * Start of 21140/21140A support which does not use the MII interface + */ + + +static void +tulip_null_media_poll( + tulip_softc_t * const sc, + tulip_mediapoll_event_t event) +{ +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_events[event]++; +#endif +#if defined(DIAGNOSTIC) + printf(TULIP_PRINTF_FMT ": botch(media_poll) at line %d\n", + TULIP_PRINTF_ARGS, __LINE__); #endif } -static const tulip_boardsw_t tulip_dc21140_cogent_em100_boardsw = { - TULIP_DC21140_COGENT_EM100, - "Cogent EM100 ", - tulip_dc21140_cogent_em100_media_probe, - tulip_dc21140_cogent_em100_media_select -}; - +__inline__ static void +tulip_21140_mediainit( + tulip_softc_t * const sc, + tulip_media_info_t * const mip, + tulip_media_t const media, + unsigned gpdata, + unsigned cmdmode) +{ + sc->tulip_mediums[media] = mip; + mip->mi_type = TULIP_MEDIAINFO_GPR; + mip->mi_cmdmode = cmdmode; + mip->mi_gpdata = gpdata; +} -static int -tulip_dc21140_znyx_zx34x_media_probe( + +static void +tulip_21140_evalboard_media_probe( tulip_softc_t * const sc) { - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_ZX34X_PINS); - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_ZX34X_INIT); - TULIP_WRITE_CSR(sc, csr_command, - TULIP_READ_CSR(sc, csr_command) | TULIP_CMD_PORTSELECT | + tulip_media_info_t *mip = sc->tulip_mediainfo; + + sc->tulip_gpinit = TULIP_GP_EB_PINS; + sc->tulip_gpdata = TULIP_GP_EB_INIT; + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EB_PINS); + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EB_INIT); + TULIP_CSR_WRITE(sc, csr_command, + TULIP_CSR_READ(sc, csr_command) | TULIP_CMD_PORTSELECT | TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE); - TULIP_WRITE_CSR(sc, csr_command, - TULIP_READ_CSR(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL); + TULIP_CSR_WRITE(sc, csr_command, + TULIP_CSR_READ(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL); DELAY(1000000); + if ((TULIP_CSR_READ(sc, csr_gp) & TULIP_GP_EB_OK100) != 0) { + sc->tulip_media = TULIP_MEDIA_10BASET; + } else { + sc->tulip_media = TULIP_MEDIA_100BASETX; + } + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET, + TULIP_GP_EB_INIT, + TULIP_CMD_TXTHRSHLDCTL); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET_FD, + TULIP_GP_EB_INIT, + TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_FULLDUPLEX); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX, + TULIP_GP_EB_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_SCRAMBLER); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD, + TULIP_GP_EB_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX); +} - return (TULIP_READ_CSR(sc, csr_gp) & TULIP_GP_ZX34X_OK10); +static const tulip_boardsw_t tulip_21140_eb_boardsw = { + TULIP_21140_DEC_EB, + tulip_21140_evalboard_media_probe, + tulip_media_select, + tulip_null_media_poll, + tulip_2114x_media_preset, +}; + + +static void +tulip_21140_smc9332_media_probe( + tulip_softc_t * const sc) +{ + tulip_media_info_t *mip = sc->tulip_mediainfo; + int idx, cnt = 0; + + TULIP_CSR_WRITE(sc, csr_command, TULIP_CMD_PORTSELECT|TULIP_CMD_MUSTBEONE); + TULIP_CSR_WRITE(sc, csr_busmode, TULIP_BUSMODE_SWRESET); + DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at + 33MHz that comes to two microseconds but wait a + bit longer anyways) */ + TULIP_CSR_WRITE(sc, csr_command, TULIP_CMD_PORTSELECT | + TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE); + sc->tulip_gpinit = TULIP_GP_SMC_9332_PINS; + sc->tulip_gpdata = TULIP_GP_SMC_9332_INIT; + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_SMC_9332_PINS|TULIP_GP_PINSET); + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_SMC_9332_INIT); + DELAY(200000); + for (idx = 1000; idx > 0; idx--) { + u_int32_t csr = TULIP_CSR_READ(sc, csr_gp); + if ((csr & (TULIP_GP_SMC_9332_OK10|TULIP_GP_SMC_9332_OK100)) == (TULIP_GP_SMC_9332_OK10|TULIP_GP_SMC_9332_OK100)) { + if (++cnt > 100) + break; + } else if ((csr & TULIP_GP_SMC_9332_OK10) == 0) { + break; + } else { + cnt = 0; + } + DELAY(1000); + } + sc->tulip_media = cnt > 100 ? TULIP_MEDIA_100BASETX : TULIP_MEDIA_10BASET; + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX, + TULIP_GP_SMC_9332_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_SCRAMBLER); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD, + TULIP_GP_SMC_9332_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET, + TULIP_GP_SMC_9332_INIT, + TULIP_CMD_TXTHRSHLDCTL); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET_FD, + TULIP_GP_SMC_9332_INIT, + TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_FULLDUPLEX); } + +static const tulip_boardsw_t tulip_21140_smc9332_boardsw = { + TULIP_21140_SMC_9332, + tulip_21140_smc9332_media_probe, + tulip_media_select, + tulip_null_media_poll, + tulip_2114x_media_preset, +}; + static void -tulip_dc21140_znyx_zx34x_media_select( +tulip_21140_cogent_em100_media_probe( tulip_softc_t * const sc) { - sc->tulip_cmdmode |= TULIP_CMD_STOREFWD|TULIP_CMD_MUSTBEONE - |TULIP_CMD_BACKOFFCTR; - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_ZX34X_PINS); - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_ZX34X_INIT); - if (sc->tulip_if.if_flags & IFF_ALTPHYS) { - if ((sc->tulip_flags & TULIP_ALTPHYS) == 0) - printf("%s: enabling 100baseTX UTP port\n", sc->tulip_xname); - sc->tulip_cmdmode |= TULIP_CMD_PORTSELECT - |TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER; - sc->tulip_cmdmode &= ~TULIP_CMD_TXTHRSHLDCTL; - sc->tulip_flags |= TULIP_ALTPHYS; - sc->tulip_media = TULIP_MEDIA_100BASET; + tulip_media_info_t *mip = sc->tulip_mediainfo; + u_int32_t cmdmode = TULIP_CSR_READ(sc, csr_command); + + sc->tulip_gpinit = TULIP_GP_EM100_PINS; + sc->tulip_gpdata = TULIP_GP_EM100_INIT; + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EM100_PINS); + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_EM100_INIT); + + cmdmode = TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION|TULIP_CMD_MUSTBEONE; + cmdmode &= ~(TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_SCRAMBLER); + if (sc->tulip_rombuf[32] == TULIP_COGENT_EM100FX_ID) { + TULIP_CSR_WRITE(sc, csr_command, cmdmode); + sc->tulip_media = TULIP_MEDIA_100BASEFX; + + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASEFX, + TULIP_GP_EM100_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASEFX_FD, + TULIP_GP_EM100_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_FULLDUPLEX); } else { - if (sc->tulip_flags & TULIP_ALTPHYS) - printf("%s: enabling 10baseT UTP port\n", sc->tulip_xname); - sc->tulip_cmdmode &= ~(TULIP_CMD_PORTSELECT - |TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER); - sc->tulip_cmdmode |= TULIP_CMD_TXTHRSHLDCTL; - sc->tulip_flags &= ~TULIP_ALTPHYS; - sc->tulip_media = TULIP_MEDIA_10BASET; - } -#ifdef BIG_PACKET - if (sc->tulip_if.if_mtu > ETHERMTU) { - TULIP_WRITE_CSR(sc, csr_watchdog, TULIP_WATCHDOG_RXDISABLE|TULIP_WATCHDOG_TXDISABLE); + TULIP_CSR_WRITE(sc, csr_command, cmdmode|TULIP_CMD_SCRAMBLER); + sc->tulip_media = TULIP_MEDIA_100BASETX; + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX, + TULIP_GP_EM100_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_SCRAMBLER); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD, + TULIP_GP_EM100_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX); } -#endif } -static const tulip_boardsw_t tulip_dc21140_znyx_zx34x_boardsw = { - TULIP_DC21140_ZNYX_ZX34X, - "ZNYX ZX34X ", - tulip_dc21140_znyx_zx34x_media_probe, - tulip_dc21140_znyx_zx34x_media_select +static const tulip_boardsw_t tulip_21140_cogent_em100_boardsw = { + TULIP_21140_COGENT_EM100, + tulip_21140_cogent_em100_media_probe, + tulip_media_select, + tulip_null_media_poll, + tulip_2114x_media_preset }; - -static int -tulip_dc21140_de500_media_probe( + + +static void +tulip_21140_znyx_zx34x_media_probe( tulip_softc_t * const sc) { - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_DE500_PINS); - DELAY(1000); - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_DE500_HALFDUPLEX); - if ((TULIP_READ_CSR(sc, csr_gp) & - (TULIP_GP_DE500_NOTOK_100|TULIP_GP_DE500_NOTOK_10)) != - (TULIP_GP_DE500_NOTOK_100|TULIP_GP_DE500_NOTOK_10)) - return (TULIP_READ_CSR(sc, csr_gp) & TULIP_GP_DE500_NOTOK_100) == 0; - TULIP_WRITE_CSR(sc, csr_gp, - TULIP_GP_DE500_HALFDUPLEX|TULIP_GP_DE500_FORCE_100); - TULIP_WRITE_CSR(sc, csr_command, - TULIP_READ_CSR(sc, csr_command) | TULIP_CMD_PORTSELECT | + tulip_media_info_t *mip = sc->tulip_mediainfo; + int cnt10 = 0, cnt100 = 0, idx; + + sc->tulip_gpinit = TULIP_GP_ZX34X_PINS; + sc->tulip_gpdata = TULIP_GP_ZX34X_INIT; + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_ZX34X_PINS); + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_ZX34X_INIT); + TULIP_CSR_WRITE(sc, csr_command, + TULIP_CSR_READ(sc, csr_command) | TULIP_CMD_PORTSELECT | TULIP_CMD_PCSFUNCTION | TULIP_CMD_SCRAMBLER | TULIP_CMD_MUSTBEONE); - TULIP_WRITE_CSR(sc, csr_command, - TULIP_READ_CSR(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL); - DELAY(1000000); - return (TULIP_READ_CSR(sc, csr_gp) & TULIP_GP_DE500_NOTOK_100) == 0; + TULIP_CSR_WRITE(sc, csr_command, + TULIP_CSR_READ(sc, csr_command) & ~TULIP_CMD_TXTHRSHLDCTL); + + DELAY(200000); + for (idx = 1000; idx > 0; idx--) { + u_int32_t csr = TULIP_CSR_READ(sc, csr_gp); + if ((csr & (TULIP_GP_ZX34X_LNKFAIL|TULIP_GP_ZX34X_SYMDET|TULIP_GP_ZX34X_SIGDET)) == (TULIP_GP_ZX34X_LNKFAIL|TULIP_GP_ZX34X_SYMDET|TULIP_GP_ZX34X_SIGDET)) { + if (++cnt100 > 100) + break; + } else if ((csr & TULIP_GP_ZX34X_LNKFAIL) == 0) { + if (++cnt10 > 100) + break; + } else { + cnt10 = 0; + cnt100 = 0; + } + DELAY(1000); + } + sc->tulip_media = cnt100 > 100 ? TULIP_MEDIA_100BASETX : TULIP_MEDIA_10BASET; + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET, + TULIP_GP_ZX34X_INIT, + TULIP_CMD_TXTHRSHLDCTL); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_10BASET_FD, + TULIP_GP_ZX34X_INIT, + TULIP_CMD_TXTHRSHLDCTL|TULIP_CMD_FULLDUPLEX); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX, + TULIP_GP_ZX34X_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_SCRAMBLER); + tulip_21140_mediainit(sc, mip++, TULIP_MEDIA_100BASETX_FD, + TULIP_GP_ZX34X_INIT, + TULIP_CMD_PORTSELECT|TULIP_CMD_PCSFUNCTION + |TULIP_CMD_SCRAMBLER|TULIP_CMD_FULLDUPLEX); } +static const tulip_boardsw_t tulip_21140_znyx_zx34x_boardsw = { + TULIP_21140_ZNYX_ZX34X, + tulip_21140_znyx_zx34x_media_probe, + tulip_media_select, + tulip_null_media_poll, + tulip_2114x_media_preset, +}; + + static void -tulip_dc21140_de500_media_select( +tulip_2114x_media_probe( tulip_softc_t * const sc) { - sc->tulip_cmdmode |= TULIP_CMD_STOREFWD|TULIP_CMD_MUSTBEONE - |TULIP_CMD_BACKOFFCTR; - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_DE500_PINS); - if (sc->tulip_if.if_flags & IFF_ALTPHYS) { - if ((sc->tulip_flags & TULIP_ALTPHYS) == 0) - printf("%s: enabling 100baseTX UTP port\n", sc->tulip_xname); - sc->tulip_cmdmode |= TULIP_CMD_PORTSELECT - |TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER; - sc->tulip_cmdmode &= ~TULIP_CMD_TXTHRSHLDCTL; - sc->tulip_flags |= TULIP_ALTPHYS; - sc->tulip_media = TULIP_MEDIA_100BASET; - TULIP_WRITE_CSR(sc, csr_gp, - TULIP_GP_DE500_HALFDUPLEX|TULIP_GP_DE500_FORCE_100); + sc->tulip_cmdmode |= TULIP_CMD_MUSTBEONE + |TULIP_CMD_BACKOFFCTR|TULIP_CMD_THRSHLD72; +} + +static const tulip_boardsw_t tulip_2114x_isv_boardsw = { + TULIP_21140_ISV, + tulip_2114x_media_probe, + tulip_media_select, + tulip_media_poll, + tulip_2114x_media_preset, +}; + + +/* + * ******** END of chip-specific handlers. *********** + */ + + +/* + * Code the read the SROM and MII bit streams (I2C) + */ +static void +tulip_delay_300ns( + tulip_softc_t * const sc) +{ + int idx; + for (idx = (300 / 33) + 1; idx > 0; idx--) + (void) TULIP_CSR_READ(sc, csr_busmode); +} + + +#define EMIT do { TULIP_CSR_WRITE(sc, csr_srom_mii, csr); tulip_delay_300ns(sc); } while (0) + +static void +tulip_srom_idle( + tulip_softc_t * const sc) +{ + unsigned bit, csr; + + csr = SROMSEL ; EMIT; + csr = SROMSEL | SROMRD; EMIT; + csr ^= SROMCS; EMIT; + csr ^= SROMCLKON; EMIT; + + /* + * Write 25 cycles of 0 which will force the SROM to be idle. + */ + for (bit = 3 + SROM_BITWIDTH + 16; bit > 0; bit--) { + csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */ + csr ^= SROMCLKON; EMIT; /* clock high; data valid */ + } + csr ^= SROMCLKOFF; EMIT; + csr ^= SROMCS; EMIT; + csr = 0; EMIT; +} + + +static void +tulip_srom_read( + tulip_softc_t * const sc) +{ + int idx; + const unsigned bitwidth = SROM_BITWIDTH; + const unsigned cmdmask = (SROMCMD_RD << bitwidth); + const unsigned msb = 1 << (bitwidth + 3 - 1); + unsigned lastidx = (1 << bitwidth) - 1; + + tulip_srom_idle(sc); + + for (idx = 0; idx <= lastidx; idx++) { + unsigned lastbit, data, bits, bit, csr; + csr = SROMSEL ; EMIT; + csr = SROMSEL | SROMRD; EMIT; + csr ^= SROMCSON; EMIT; + csr ^= SROMCLKON; EMIT; + + lastbit = 0; + for (bits = idx|cmdmask, bit = bitwidth + 3; bit > 0; bit--, bits <<= 1) { + const unsigned thisbit = bits & msb; + csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */ + if (thisbit != lastbit) { + csr ^= SROMDOUT; EMIT; /* clock low; invert data */ + } else { + EMIT; + } + csr ^= SROMCLKON; EMIT; /* clock high; data valid */ + lastbit = thisbit; + } + csr ^= SROMCLKOFF; EMIT; + + for (data = 0, bits = 0; bits < 16; bits++) { + data <<= 1; + csr ^= SROMCLKON; EMIT; /* clock high; data valid */ + data |= TULIP_CSR_READ(sc, csr_srom_mii) & SROMDIN ? 1 : 0; + csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */ + } + sc->tulip_rombuf[idx*2] = data & 0xFF; + sc->tulip_rombuf[idx*2+1] = data >> 8; + csr = SROMSEL | SROMRD; EMIT; + csr = 0; EMIT; + } + tulip_srom_idle(sc); +} + + +#define MII_EMIT do { TULIP_CSR_WRITE(sc, csr_srom_mii, csr); tulip_delay_300ns(sc); } while (0) + +static void +tulip_mii_writebits( + tulip_softc_t * const sc, + unsigned data, + unsigned bits) +{ + unsigned msb = 1 << (bits - 1); + unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK); + unsigned lastbit = (csr & MII_DOUT) ? msb : 0; + + csr |= MII_WR; MII_EMIT; /* clock low; assert write */ + + for (; bits > 0; bits--, data <<= 1) { + const unsigned thisbit = data & msb; + if (thisbit != lastbit) { + csr ^= MII_DOUT; MII_EMIT; /* clock low; invert data */ + } + csr ^= MII_CLKON; MII_EMIT; /* clock high; data valid */ + lastbit = thisbit; + csr ^= MII_CLKOFF; MII_EMIT; /* clock low; data not valid */ + } +} + +static void +tulip_mii_turnaround( + tulip_softc_t * const sc, + unsigned cmd) +{ + unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK); + + if (cmd == MII_WRCMD) { + csr |= MII_DOUT; MII_EMIT; /* clock low; change data */ + csr ^= MII_CLKON; MII_EMIT; /* clock high; data valid */ + csr ^= MII_CLKOFF; MII_EMIT; /* clock low; data not valid */ + csr ^= MII_DOUT; MII_EMIT; /* clock low; change data */ } else { - if (sc->tulip_flags & TULIP_ALTPHYS) - printf("%s: enabling 10baseT UTP port\n", sc->tulip_xname); - sc->tulip_cmdmode &= ~(TULIP_CMD_PORTSELECT - |TULIP_CMD_PCSFUNCTION|TULIP_CMD_SCRAMBLER); - sc->tulip_cmdmode |= TULIP_CMD_TXTHRSHLDCTL; - sc->tulip_flags &= ~TULIP_ALTPHYS; - sc->tulip_media = TULIP_MEDIA_10BASET; - TULIP_WRITE_CSR(sc, csr_gp, TULIP_GP_DE500_HALFDUPLEX); + csr |= MII_RD; MII_EMIT; /* clock low; switch to read */ } -#ifdef BIG_PACKET - if (sc->tulip_if.if_mtu > ETHERMTU) { - TULIP_WRITE_CSR(sc, csr_watchdog, TULIP_WATCHDOG_RXDISABLE|TULIP_WATCHDOG_TXDISABLE); + csr ^= MII_CLKON; MII_EMIT; /* clock high; data valid */ + csr ^= MII_CLKOFF; MII_EMIT; /* clock low; data not valid */ +} + +static unsigned +tulip_mii_readbits( + tulip_softc_t * const sc) +{ + unsigned data; + unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK); + int idx; + + for (idx = 0, data = 0; idx < 16; idx++) { + data <<= 1; /* this is NOOP on the first pass through */ + csr ^= MII_CLKON; MII_EMIT; /* clock high; data valid */ + if (TULIP_CSR_READ(sc, csr_srom_mii) & MII_DIN) + data |= 1; + csr ^= MII_CLKOFF; MII_EMIT; /* clock low; data not valid */ } + csr ^= MII_RD; MII_EMIT; /* clock low; turn off read */ + + return data; +} + +static unsigned +tulip_mii_readreg( + tulip_softc_t * const sc, + unsigned devaddr, + unsigned regno) +{ + unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK); + unsigned data; + + csr &= ~(MII_RD|MII_CLK); MII_EMIT; + tulip_mii_writebits(sc, MII_PREAMBLE, 32); + tulip_mii_writebits(sc, MII_RDCMD, 8); + tulip_mii_writebits(sc, devaddr, 5); + tulip_mii_writebits(sc, regno, 5); + tulip_mii_turnaround(sc, MII_RDCMD); + + data = tulip_mii_readbits(sc); +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_phyregs[regno][0] = data; + sc->tulip_dbg.dbg_phyregs[regno][1]++; #endif + return data; } -static const tulip_boardsw_t tulip_dc21140_de500_boardsw = { - TULIP_DC21140_DEC_DE500, "Digital DE500 ", - tulip_dc21140_de500_media_probe, - tulip_dc21140_de500_media_select -}; - -static int -tulip_dc21041_media_probe( +static void +tulip_mii_writereg( + tulip_softc_t * const sc, + unsigned devaddr, + unsigned regno, + unsigned data) +{ + unsigned csr = TULIP_CSR_READ(sc, csr_srom_mii) & (MII_RD|MII_DOUT|MII_CLK); + csr &= ~(MII_RD|MII_CLK); MII_EMIT; + tulip_mii_writebits(sc, MII_PREAMBLE, 32); + tulip_mii_writebits(sc, MII_WRCMD, 8); + tulip_mii_writebits(sc, devaddr, 5); + tulip_mii_writebits(sc, regno, 5); + tulip_mii_turnaround(sc, MII_WRCMD); + tulip_mii_writebits(sc, data, 16); +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_phyregs[regno][2] = data; + sc->tulip_dbg.dbg_phyregs[regno][3]++; +#endif +} + + +#define tulip_mchash(mca) (tulip_crc32(mca, 6) & 0x1FF) +#define tulip_srom_crcok(databuf) ( \ + ((tulip_crc32(databuf, 126) & 0xFFFF) ^ 0xFFFF)== \ + ((databuf)[126] | ((databuf)[127] << 8))) + +static unsigned +tulip_crc32( + const unsigned char *databuf, + size_t datalen) +{ + u_int idx, bit, data, crc = 0xFFFFFFFFUL; + + for (idx = 0; idx < datalen; idx++) + for (data = *databuf++, bit = 0; bit < 8; bit++, data >>= 1) + crc = (crc >> 1) ^ (((crc ^ data) & 1) ? TULIP_CRC32_POLY : 0); + return crc; +} + + +static void +tulip_identify_dec_nic( tulip_softc_t * const sc) { - return 0; + strcpy(sc->tulip_boardid, "DEC "); +#define D0 4 + if (sc->tulip_chipid <= TULIP_DE425) + return; + if (bcmp(sc->tulip_rombuf + 29, "DE500", 5) == 0 + || bcmp(sc->tulip_rombuf + 29, "DE450", 5) == 0) { + bcopy(sc->tulip_rombuf + 29, &sc->tulip_boardid[D0], 8); + sc->tulip_boardid[D0+8] = ' '; + } +#undef D0 } -#ifdef BIG_PACKET -#define TULIP_DC21041_SIAGEN_WATCHDOG (sc->tulip_if.if_mtu > ETHERMTU ? TULIP_WATCHDOG_RXDISABLE|TULIP_WATCHDOG_TXDISABLE : 0) -#else -#define TULIP_DC21041_SIAGEN_WATCHDOG 0 -#endif static void -tulip_dc21041_media_select( +tulip_identify_znyx_nic( tulip_softc_t * const sc) { - sc->tulip_cmdmode |= TULIP_CMD_CAPTREFFCT|TULIP_CMD_ENHCAPTEFFCT - /* |TULIP_CMD_FULLDUPLEX */ |TULIP_CMD_THRSHLD160|TULIP_CMD_BACKOFFCTR; - sc->tulip_intrmask |= TULIP_STS_NORMALINTR|TULIP_STS_GPTIMEOUT - |TULIP_STS_ABNRMLINTR|TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL; - if (sc->tulip_if.if_flags & IFF_ALTPHYS) { - if ((sc->tulip_flags & TULIP_ALTPHYS) == 0) { - sc->tulip_media = TULIP_MEDIA_UNKNOWN; - sc->tulip_flags &= ~(TULIP_TXPROBE_OK|TULIP_TXPROBE_ACTIVE); - sc->tulip_flags |= TULIP_ALTPHYS|TULIP_WANTRXACT; - sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + unsigned id = 0; + strcpy(sc->tulip_boardid, "ZNYX ZX3XX "); + if (sc->tulip_chipid == TULIP_21140 || sc->tulip_chipid == TULIP_21140A) { + unsigned znyx_ptr; + sc->tulip_boardid[8] = '4'; + znyx_ptr = sc->tulip_rombuf[124] + 256 * sc->tulip_rombuf[125]; + if (znyx_ptr < 26 || znyx_ptr > 116) { + sc->tulip_boardsw = &tulip_21140_znyx_zx34x_boardsw; + return; } - } else { - if (sc->tulip_flags & TULIP_ALTPHYS) { - sc->tulip_media = TULIP_MEDIA_UNKNOWN; - sc->tulip_flags &= ~(TULIP_TXPROBE_OK|TULIP_TXPROBE_ACTIVE|TULIP_ALTPHYS); - sc->tulip_flags |= TULIP_WANTRXACT; - sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + /* ZX344 = 0010 .. 0013FF + */ + if (sc->tulip_rombuf[znyx_ptr] == 0x4A + && sc->tulip_rombuf[znyx_ptr + 1] == 0x52 + && sc->tulip_rombuf[znyx_ptr + 2] == 0x01) { + id = sc->tulip_rombuf[znyx_ptr + 5] + 256 * sc->tulip_rombuf[znyx_ptr + 4]; + if ((id >> 8) == (TULIP_ZNYX_ID_ZX342 >> 8)) { + sc->tulip_boardid[9] = '2'; + if (id == TULIP_ZNYX_ID_ZX342B) { + sc->tulip_boardid[10] = 'B'; + sc->tulip_boardid[11] = ' '; + } + sc->tulip_boardsw = &tulip_21140_znyx_zx34x_boardsw; + } else if (id == TULIP_ZNYX_ID_ZX344) { + sc->tulip_boardid[10] = '4'; + sc->tulip_boardsw = &tulip_21140_znyx_zx34x_boardsw; + } else if (id == TULIP_ZNYX_ID_ZX345) { + sc->tulip_boardid[9] = (sc->tulip_rombuf[19] > 1) ? '8' : '5'; + } else if (id == TULIP_ZNYX_ID_ZX346) { + sc->tulip_boardid[9] = '6'; + } else if (id == TULIP_ZNYX_ID_ZX351) { + sc->tulip_boardid[8] = '5'; + sc->tulip_boardid[9] = '1'; + } } + if (id == 0) { + /* + * Assume it's a ZX342... + */ + sc->tulip_boardsw = &tulip_21140_znyx_zx34x_boardsw; + } + return; } + sc->tulip_boardid[8] = '1'; + if (sc->tulip_chipid == TULIP_21041) { + sc->tulip_boardid[10] = '1'; + return; + } + if (sc->tulip_rombuf[32] == 0x4A && sc->tulip_rombuf[33] == 0x52) { + id = sc->tulip_rombuf[37] + 256 * sc->tulip_rombuf[36]; + if (id == TULIP_ZNYX_ID_ZX312T) { + sc->tulip_boardid[9] = '2'; + sc->tulip_boardid[10] = 'T'; + sc->tulip_boardid[11] = ' '; + sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw; + } else if (id == TULIP_ZNYX_ID_ZX314_INTA) { + sc->tulip_boardid[9] = '4'; + sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw; + sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM; + } else if (id == TULIP_ZNYX_ID_ZX314) { + sc->tulip_boardid[9] = '4'; + sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw; + sc->tulip_features |= TULIP_HAVE_BASEROM; + } else if (id == TULIP_ZNYX_ID_ZX315_INTA) { + sc->tulip_boardid[9] = '5'; + sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM; + } else if (id == TULIP_ZNYX_ID_ZX315) { + sc->tulip_boardid[9] = '5'; + sc->tulip_features |= TULIP_HAVE_BASEROM; + } else { + id = 0; + } + } + if (id == 0) { + if ((sc->tulip_enaddr[3] & ~3) == 0xF0 && (sc->tulip_enaddr[5] & 3) == 0) { + sc->tulip_boardid[9] = '4'; + sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw; + sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM; + } else if ((sc->tulip_enaddr[3] & ~3) == 0xF4 && (sc->tulip_enaddr[5] & 1) == 0) { + sc->tulip_boardid[9] = '5'; + sc->tulip_boardsw = &tulip_21040_boardsw; + sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM; + } else if ((sc->tulip_enaddr[3] & ~3) == 0xEC) { + sc->tulip_boardid[9] = '2'; + sc->tulip_boardsw = &tulip_21040_boardsw; + } + } +} - if (TULIP_READ_CSR(sc, csr_sia_status) & TULIP_SIASTS_LINKFAIL) { - if (sc->tulip_media == TULIP_MEDIA_10BASET) { - sc->tulip_media = TULIP_MEDIA_UNKNOWN; - } else if (sc->tulip_media == TULIP_MEDIA_BNC) { - sc->tulip_intrmask &= ~TULIP_STS_GPTIMEOUT; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_DC21041_SIACONN_BNC); - TULIP_WRITE_CSR(sc, csr_sia_tx_rx, TULIP_DC21041_SIATXRX_BNC); - TULIP_WRITE_CSR(sc, csr_sia_general, TULIP_DC21041_SIAGEN_BNC|TULIP_DC21041_SIAGEN_WATCHDOG); - return; - } else if (sc->tulip_media == TULIP_MEDIA_AUI) { - sc->tulip_intrmask &= ~TULIP_STS_GPTIMEOUT; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_DC21041_SIACONN_AUI); - TULIP_WRITE_CSR(sc, csr_sia_tx_rx, TULIP_DC21041_SIATXRX_AUI); - TULIP_WRITE_CSR(sc, csr_sia_general, TULIP_DC21041_SIAGEN_AUI|TULIP_DC21041_SIAGEN_WATCHDOG); + +static void +tulip_identify_smc_nic( + tulip_softc_t * const sc) +{ + u_int32_t id1, id2, ei; + int auibnc = 0, utp = 0; + char *cp; + + strcpy(sc->tulip_boardid, "SMC "); + if (sc->tulip_chipid == TULIP_21041) + return; + if (sc->tulip_chipid != TULIP_21040) { + if (sc->tulip_boardsw != &tulip_2114x_isv_boardsw) { + strcpy(&sc->tulip_boardid[4], "9332DST "); + sc->tulip_boardsw = &tulip_21140_smc9332_boardsw; + } else if (sc->tulip_features & (TULIP_HAVE_BASEROM|TULIP_HAVE_SLAVEDROM)) { + strcpy(&sc->tulip_boardid[4], "9332BDT "); + } else { + strcpy(&sc->tulip_boardid[4], "9334BDT "); + } + return; + } + id1 = sc->tulip_rombuf[0x60] | (sc->tulip_rombuf[0x61] << 8); + id2 = sc->tulip_rombuf[0x62] | (sc->tulip_rombuf[0x63] << 8); + ei = sc->tulip_rombuf[0x66] | (sc->tulip_rombuf[0x67] << 8); + + strcpy(&sc->tulip_boardid[4], "8432"); + cp = &sc->tulip_boardid[8]; + if ((id1 & 1) == 0) + *cp++ = 'B', auibnc = 1; + if ((id1 & 0xFF) > 0x32) + *cp++ = 'T', utp = 1; + if ((id1 & 0x4000) == 0) + *cp++ = 'A', auibnc = 1; + if (id2 == 0x15) { + sc->tulip_boardid[7] = '4'; + *cp++ = '-'; + *cp++ = 'C'; + *cp++ = 'H'; + *cp++ = (ei ? '2' : '1'); + } + *cp++ = ' '; + *cp = '\0'; + if (utp && !auibnc) + sc->tulip_boardsw = &tulip_21040_10baset_only_boardsw; + else if (!utp && auibnc) + sc->tulip_boardsw = &tulip_21040_auibnc_only_boardsw; +} + + +static void +tulip_identify_cogent_nic( + tulip_softc_t * const sc) +{ + strcpy(sc->tulip_boardid, "Cogent "); + if (sc->tulip_chipid == TULIP_21140 || sc->tulip_chipid == TULIP_21140A) { + if (sc->tulip_rombuf[32] == TULIP_COGENT_EM100TX_ID) { + strcat(sc->tulip_boardid, "EM100FX "); + sc->tulip_boardsw = &tulip_21140_cogent_em100_boardsw; + } else if (sc->tulip_rombuf[32] == TULIP_COGENT_EM100FX_ID) { + strcat(sc->tulip_boardid, "EM100FX "); + sc->tulip_boardsw = &tulip_21140_cogent_em100_boardsw; + } + /* + * Magic number (0x24001109U) is the SubVendor (0x2400) and + * SubDevId (0x1109) for the ANA6944TX (EM440TX). + */ + if (*(u_int32_t *) sc->tulip_rombuf == 0x24001109U + && (sc->tulip_features & TULIP_HAVE_BASEROM)) { + /* + * Cogent (Adaptec) is still mapping all INTs to INTA of + * first 21140. Dumb! Dumb! + */ + strcat(sc->tulip_boardid, "EM440TX "); + sc->tulip_features |= TULIP_HAVE_SHAREDINTR; + } + } else if (sc->tulip_chipid == TULIP_21040) { + sc->tulip_features |= TULIP_HAVE_SHAREDINTR|TULIP_HAVE_BASEROM; + } +} + + +static void +tulip_identify_asante_nic( + tulip_softc_t * const sc) +{ + strcpy(sc->tulip_boardid, "Asante "); + if ((sc->tulip_chipid == TULIP_21140 || sc->tulip_chipid == TULIP_21140A) + && sc->tulip_boardsw != &tulip_2114x_isv_boardsw) { + tulip_media_info_t *mi = sc->tulip_mediainfo; + int idx; + /* + * The Asante Fast Ethernet doesn't always ship with a valid + * new format SROM. So if isn't in the new format, we cheat + * set it up as if we had. + */ + + sc->tulip_gpinit = TULIP_GP_ASANTE_PINS; + sc->tulip_gpdata = 0; + + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_ASANTE_PINS|TULIP_GP_PINSET); + TULIP_CSR_WRITE(sc, csr_gp, TULIP_GP_ASANTE_PHYRESET); + DELAY(100); + TULIP_CSR_WRITE(sc, csr_gp, 0); + + mi->mi_type = TULIP_MEDIAINFO_MII; + mi->mi_gpr_length = 0; + mi->mi_gpr_offset = 0; + mi->mi_reset_length = 0; + mi->mi_reset_offset = 0;; + + mi->mi_phyaddr = TULIP_MII_NOPHY; + for (idx = 20; idx > 0 && mi->mi_phyaddr == TULIP_MII_NOPHY; idx--) { + DELAY(10000); + mi->mi_phyaddr = tulip_mii_get_phyaddr(sc, 0); + } + if (mi->mi_phyaddr == TULIP_MII_NOPHY) { + printf(TULIP_PRINTF_FMT ": can't find phy 0\n", TULIP_PRINTF_ARGS); return; } - switch (sc->tulip_probe_state) { - case TULIP_PROBE_INACTIVE: { - TULIP_WRITE_CSR(sc, csr_command, sc->tulip_cmdmode); - sc->tulip_if.if_flags |= IFF_OACTIVE; - sc->tulip_gpticks = 200; - sc->tulip_probe_state = TULIP_PROBE_10BASET; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_DC21041_SIACONN_10BASET); - TULIP_WRITE_CSR(sc, csr_sia_tx_rx, TULIP_DC21041_SIATXRX_10BASET); - TULIP_WRITE_CSR(sc, csr_sia_general, TULIP_DC21041_SIAGEN_10BASET|TULIP_DC21041_SIAGEN_WATCHDOG); - TULIP_WRITE_CSR(sc, csr_gp_timer, 12000000 / 204800); /* 120 ms */ - break; + sc->tulip_features |= TULIP_HAVE_MII; + mi->mi_capabilities = PHYSTS_10BASET|PHYSTS_10BASET_FD|PHYSTS_100BASETX|PHYSTS_100BASETX_FD; + mi->mi_advertisement = PHYSTS_10BASET|PHYSTS_10BASET_FD|PHYSTS_100BASETX|PHYSTS_100BASETX_FD; + mi->mi_full_duplex = PHYSTS_10BASET_FD|PHYSTS_100BASETX_FD; + mi->mi_tx_threshold = PHYSTS_10BASET|PHYSTS_10BASET_FD; + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX_FD); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASET4); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET_FD); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET); + mi->mi_phyid = (tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDLOW) << 16) | + tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDHIGH); + + sc->tulip_boardsw = &tulip_2114x_isv_boardsw; + } +} + + +static int +tulip_srom_decode( + tulip_softc_t * const sc) +{ + int idx1, idx2, idx3; + + const tulip_srom_header_t *shp = (tulip_srom_header_t *) &sc->tulip_rombuf[0]; + const tulip_srom_adapter_info_t *saip = (tulip_srom_adapter_info_t *) (shp + 1); + tulip_srom_media_t srom_media; + tulip_media_info_t *mi = sc->tulip_mediainfo; + const u_int8_t *dp; + u_int32_t leaf_offset, blocks, data; + + for (idx1 = 0; idx1 < shp->sh_adapter_count; idx1++, saip++) { + if (shp->sh_adapter_count == 1) + break; + if (saip->sai_device == sc->tulip_pci_devno) + break; + } + /* + * Didn't find the right media block for this card. + */ + if (idx1 == shp->sh_adapter_count) + return 0; + + /* + * Save the hardware address. + */ + bcopy((caddr_t) shp->sh_ieee802_address, (caddr_t) sc->tulip_enaddr, 6); + /* + * If this is a multiple port card, add the adapter index to the last + * byte of the hardware address. (if it isn't multiport, adding 0 + * won't hurt. + */ + sc->tulip_enaddr[5] += idx1; + + leaf_offset = saip->sai_leaf_offset_lowbyte + + saip->sai_leaf_offset_highbyte * 256; + dp = sc->tulip_rombuf + leaf_offset; + + sc->tulip_conntype = (tulip_srom_connection_t) (dp[0] + dp[1] * 256); dp += 2; + + for (idx2 = 0;; idx2++) { + if (tulip_srom_conninfo[idx2].sc_type == sc->tulip_conntype + || tulip_srom_conninfo[idx2].sc_type == TULIP_SROM_CONNTYPE_NOT_USED) + break; + } + sc->tulip_connidx = idx2; + + if (sc->tulip_chipid == TULIP_21041) { + blocks = *dp++; + for (idx2 = 0; idx2 < blocks; idx2++) { + tulip_media_t media; + data = *dp++; + srom_media = (tulip_srom_media_t) (data & 0x3F); + for (idx3 = 0; tulip_srom_mediums[idx3].sm_type != TULIP_MEDIA_UNKNOWN; idx3++) { + if (tulip_srom_mediums[idx3].sm_srom_type == srom_media) + break; } - case TULIP_PROBE_10BASET: { - if (--sc->tulip_gpticks > 0) { - if ((TULIP_READ_CSR(sc, csr_sia_status) & TULIP_SIASTS_OTHERRXACTIVITY) == 0) { - TULIP_WRITE_CSR(sc, csr_gp_timer, 12000000 / 204800); /* 120 ms */ - TULIP_WRITE_CSR(sc, csr_intr, sc->tulip_intrmask); - break; - } - } - sc->tulip_gpticks = 4; - if (TULIP_READ_CSR(sc, csr_sia_status) & TULIP_SIASTS_OTHERRXACTIVITY) { - sc->tulip_probe_state = TULIP_PROBE_BNC; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_DC21041_SIACONN_BNC); - TULIP_WRITE_CSR(sc, csr_sia_tx_rx, TULIP_DC21041_SIATXRX_BNC); - TULIP_WRITE_CSR(sc, csr_sia_general, TULIP_DC21041_SIAGEN_BNC|TULIP_DC21041_SIAGEN_WATCHDOG); - TULIP_WRITE_CSR(sc, csr_gp_timer, 100000000 / 204800); /* 100 ms */ + media = tulip_srom_mediums[idx3].sm_type; + if (media != TULIP_MEDIA_UNKNOWN) { + if (data & TULIP_SROM_21041_EXTENDED) { + mi->mi_type = TULIP_MEDIAINFO_SIA; + sc->tulip_mediums[media] = mi; + mi->mi_sia_connectivity = dp[0] + dp[1] * 256; + mi->mi_sia_tx_rx = dp[2] + dp[3] * 256; + mi->mi_sia_general = dp[4] + dp[5] * 256; + mi++; } else { - sc->tulip_probe_state = TULIP_PROBE_AUI; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_DC21041_SIACONN_AUI); - TULIP_WRITE_CSR(sc, csr_sia_tx_rx, TULIP_DC21041_SIATXRX_AUI); - TULIP_WRITE_CSR(sc, csr_sia_general, TULIP_DC21041_SIAGEN_AUI|TULIP_DC21041_SIAGEN_WATCHDOG); - TULIP_WRITE_CSR(sc, csr_gp_timer, 100000000 / 204800); /* 100 ms */ + switch (media) { + case TULIP_MEDIA_BNC: { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, BNC); + mi++; + break; + } + case TULIP_MEDIA_AUI: { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, AUI); + mi++; + break; + } + case TULIP_MEDIA_10BASET: { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, 10BASET); + mi++; + break; + } + case TULIP_MEDIA_10BASET_FD: { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, 10BASET_FD); + mi++; + break; + } + default: { + break; + } + } } - break; } - case TULIP_PROBE_BNC: - case TULIP_PROBE_AUI: { - if (sc->tulip_flags & TULIP_TXPROBE_OK) { - sc->tulip_intrmask &= ~TULIP_STS_GPTIMEOUT; - sc->tulip_flags &= ~(TULIP_TXPROBE_OK|TULIP_TXPROBE_ACTIVE); - TULIP_WRITE_CSR(sc, csr_gp_timer, 0); /* disable */ - if ((sc->tulip_probe_state == TULIP_PROBE_AUI - && sc->tulip_media != TULIP_MEDIA_AUI) - || (sc->tulip_probe_state == TULIP_PROBE_BNC - && sc->tulip_media != TULIP_MEDIA_AUI)) { - printf("%s: enabling %s port\n", sc->tulip_xname, - sc->tulip_probe_state == TULIP_PROBE_BNC - ? "Thinwire/BNC" : "AUI"); - if (sc->tulip_probe_state == TULIP_PROBE_AUI) - sc->tulip_media = TULIP_MEDIA_AUI; - else if (sc->tulip_probe_state == TULIP_PROBE_BNC) - sc->tulip_media = TULIP_MEDIA_BNC; + if (data & TULIP_SROM_21041_EXTENDED) + dp += 6; + } +#ifdef notdef + if (blocks == 0) { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, BNC); mi++; + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, AUI); mi++; + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, 10BASET); mi++; + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21041, 10BASET_FD); mi++; + } +#endif + } else { + unsigned length, type; + tulip_media_t gp_media = TULIP_MEDIA_UNKNOWN; + if (sc->tulip_features & TULIP_HAVE_GPR) + sc->tulip_gpinit = *dp++; + blocks = *dp++; + for (idx2 = 0; idx2 < blocks; idx2++) { + const u_int8_t *ep; + if ((*dp & 0x80) == 0) { + length = 4; + type = 0; + } else { + length = (*dp++ & 0x7f) - 1; + type = *dp++ & 0x3f; + } + ep = dp + length; + switch (type & 0x3f) { + case 0: { /* 21140[A] GPR block */ + tulip_media_t media; + srom_media = (tulip_srom_media_t) dp[0]; + for (idx3 = 0; tulip_srom_mediums[idx3].sm_type != TULIP_MEDIA_UNKNOWN; idx3++) { + if (tulip_srom_mediums[idx3].sm_srom_type == srom_media) + break; } - sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + media = tulip_srom_mediums[idx3].sm_type; + if (media == TULIP_MEDIA_UNKNOWN) + break; + mi->mi_type = TULIP_MEDIAINFO_GPR; + sc->tulip_mediums[media] = mi; + mi->mi_gpdata = dp[1]; + if (media > gp_media && !TULIP_IS_MEDIA_FD(media)) { + sc->tulip_gpdata = mi->mi_gpdata; + gp_media = media; + } + data = dp[2] + dp[3] * 256; + mi->mi_cmdmode = TULIP_SROM_2114X_CMDBITS(data); + if (data & TULIP_SROM_2114X_NOINDICATOR) { + mi->mi_actmask = 0; + } else { +#if 0 + mi->mi_default = (data & TULIP_SROM_2114X_DEFAULT) != 0; +#endif + mi->mi_actmask = TULIP_SROM_2114X_BITPOS(data); + mi->mi_actdata = (data & TULIP_SROM_2114X_POLARITY) ? 0 : mi->mi_actmask; + } + mi++; break; } - if ((sc->tulip_flags & TULIP_WANTRXACT) == 0 - || (TULIP_READ_CSR(sc, csr_sia_status) & TULIP_SIASTS_RXACTIVITY)) { - if ((sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0) { - struct mbuf *m; - /* - * Before we are sure this is the right media we need - * to send a small packet to make sure there's carrier. - * Strangely, BNC and AUI will 'see" receive data if - * either is connected so the transmit is the only way - * to verify the connectivity. - */ - MGETHDR(m, M_DONTWAIT, MT_DATA); - if (m == NULL) { - TULIP_WRITE_CSR(sc, csr_gp_timer, 100000000 / 204800); /* 100 ms */ + case 1: { /* 21140[A] MII block */ + const unsigned phyno = *dp++; + mi->mi_type = TULIP_MEDIAINFO_MII; + mi->mi_gpr_length = *dp++; + mi->mi_gpr_offset = dp - sc->tulip_rombuf; + dp += mi->mi_gpr_length; + mi->mi_reset_length = *dp++; + mi->mi_reset_offset = dp - sc->tulip_rombuf; + dp += mi->mi_reset_length; + + /* + * Before we probe for a PHY, use the GPR information + * to select it. If we don't, it may be inaccessible. + */ + TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_gpinit|TULIP_GP_PINSET); + for (idx3 = 0; idx3 < mi->mi_reset_length; idx3++) { + DELAY(10); + TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_rombuf[mi->mi_reset_offset + idx3]); + } + sc->tulip_phyaddr = mi->mi_phyaddr; + for (idx3 = 0; idx3 < mi->mi_gpr_length; idx3++) { + DELAY(10); + TULIP_CSR_WRITE(sc, csr_gp, sc->tulip_rombuf[mi->mi_gpr_offset + idx3]); + } + + /* + * At least write something! + */ + if (mi->mi_reset_length == 0 && mi->mi_gpr_length == 0) + TULIP_CSR_WRITE(sc, csr_gp, 0); + + mi->mi_phyaddr = TULIP_MII_NOPHY; + for (idx3 = 20; idx3 > 0 && mi->mi_phyaddr == TULIP_MII_NOPHY; idx3--) { + DELAY(10000); + mi->mi_phyaddr = tulip_mii_get_phyaddr(sc, phyno); + } + if (mi->mi_phyaddr == TULIP_MII_NOPHY) { + printf(TULIP_PRINTF_FMT ": can't find phy %d\n", + TULIP_PRINTF_ARGS, phyno); + break; + } + sc->tulip_features |= TULIP_HAVE_MII; + mi->mi_capabilities = dp[0] + dp[1] * 256; dp += 2; + mi->mi_advertisement = dp[0] + dp[1] * 256; dp += 2; + mi->mi_full_duplex = dp[0] + dp[1] * 256; dp += 2; + mi->mi_tx_threshold = dp[0] + dp[1] * 256; dp += 2; + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX_FD); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASET4); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET_FD); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET); + mi->mi_phyid = (tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDLOW) << 16) | + tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDHIGH); + mi++; + break; + } + case 2: { /* 2114[23] SIA block */ + tulip_media_t media; + srom_media = (tulip_srom_media_t) dp[0]; + for (idx3 = 0; tulip_srom_mediums[idx3].sm_type != TULIP_MEDIA_UNKNOWN; idx3++) { + if (tulip_srom_mediums[idx3].sm_srom_type == srom_media) break; + } + media = tulip_srom_mediums[idx3].sm_type; + if (media == TULIP_MEDIA_UNKNOWN) + break; + mi->mi_type = TULIP_MEDIAINFO_SIA; + sc->tulip_mediums[media] = mi; + if (type & 0x40) { + mi->mi_sia_connectivity = dp[0] + dp[1] * 256; + mi->mi_sia_tx_rx = dp[2] + dp[3] * 256; + mi->mi_sia_general = dp[4] + dp[5] * 256; + dp += 6; + } else { + switch (media) { + case TULIP_MEDIA_BNC: { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21142, BNC); + break; + } + case TULIP_MEDIA_AUI: { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21142, AUI); + break; + } + case TULIP_MEDIA_10BASET: { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21142, 10BASET); + break; + } + case TULIP_MEDIA_10BASET_FD: { + TULIP_MEDIAINFO_SIA_INIT(sc, mi, 21142, 10BASET_FD); + break; + } + default: { + goto bad_media; + } } - /* - * Construct a LLC TEST message which will point to ourselves. - */ - bcopy(sc->tulip_hwaddr, mtod(m, struct ether_header *)->ether_dhost, 6); - bcopy(sc->tulip_hwaddr, mtod(m, struct ether_header *)->ether_shost, 6); - mtod(m, struct ether_header *)->ether_type = htons(3); - mtod(m, unsigned char *)[14] = 0; - mtod(m, unsigned char *)[15] = 0; - mtod(m, unsigned char *)[16] = 0xE3; /* LLC Class1 TEST (no poll) */ - m->m_len = m->m_pkthdr.len = sizeof(struct ether_header) + 3; - /* - * send it! - */ - sc->tulip_flags |= TULIP_TXPROBE_ACTIVE; - sc->tulip_flags &= ~TULIP_TXPROBE_OK; - sc->tulip_cmdmode |= TULIP_CMD_TXRUN; - TULIP_WRITE_CSR(sc, csr_command, sc->tulip_cmdmode); - IF_PREPEND(&sc->tulip_if.if_snd, m); - tulip_start(&sc->tulip_if); + } + mi->mi_sia_gp_control = (dp[0] + dp[1] * 256) << 16; + mi->mi_sia_gp_data = (dp[2] + dp[3] * 256) << 16; + mi++; + bad_media: + break; + } + case 3: { /* 2114[23] MII PHY block */ + const unsigned phyno = *dp++; + const u_int8_t *dp0; + mi->mi_type = TULIP_MEDIAINFO_MII; + mi->mi_gpr_length = *dp++; + mi->mi_gpr_offset = dp - sc->tulip_rombuf; + dp += 2 * mi->mi_gpr_length; + mi->mi_reset_length = *dp++; + mi->mi_reset_offset = dp - sc->tulip_rombuf; + dp += 2 * mi->mi_reset_length; + + dp0 = &sc->tulip_rombuf[mi->mi_reset_offset]; + for (idx3 = 0; idx3 < mi->mi_reset_length; idx3++, dp0 += 2) { + DELAY(10); + TULIP_CSR_WRITE(sc, csr_sia_general, (dp0[0] + 256 * dp0[1]) << 16); + } + sc->tulip_phyaddr = mi->mi_phyaddr; + dp0 = &sc->tulip_rombuf[mi->mi_gpr_offset]; + for (idx3 = 0; idx3 < mi->mi_gpr_length; idx3++, dp0 += 2) { + DELAY(10); + TULIP_CSR_WRITE(sc, csr_sia_general, (dp0[0] + 256 * dp0[1]) << 16); + } + + if (mi->mi_reset_length == 0 && mi->mi_gpr_length == 0) + TULIP_CSR_WRITE(sc, csr_sia_general, 0); + + mi->mi_phyaddr = TULIP_MII_NOPHY; + for (idx3 = 20; idx3 > 0 && mi->mi_phyaddr == TULIP_MII_NOPHY; idx3--) { + DELAY(10000); + mi->mi_phyaddr = tulip_mii_get_phyaddr(sc, phyno); + } + if (mi->mi_phyaddr == TULIP_MII_NOPHY) { + printf(TULIP_PRINTF_FMT ": can't find phy %d\n", + TULIP_PRINTF_ARGS, phyno); break; } - sc->tulip_flags &= ~TULIP_TXPROBE_ACTIVE; + sc->tulip_features |= TULIP_HAVE_MII; + mi->mi_capabilities = dp[0] + dp[1] * 256; dp += 2; + mi->mi_advertisement = dp[0] + dp[1] * 256; dp += 2; + mi->mi_full_duplex = dp[0] + dp[1] * 256; dp += 2; + mi->mi_tx_threshold = dp[0] + dp[1] * 256; dp += 2; + mi->mi_mii_interrupt = dp[0] + dp[1] * 256; dp += 2; + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX_FD); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASETX); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 100BASET4); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET_FD); + TULIP_MEDIAINFO_ADD_CAPABILITY(sc, mi, 10BASET); + mi->mi_phyid = (tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDLOW) << 16) | + tulip_mii_readreg(sc, mi->mi_phyaddr, PHYREG_IDHIGH); + mi++; + break; } - /* - * Take 2 passes through before deciding to not - * wait for receive activity. Then take another - * two passes before spitting out a warning. - */ - if (sc->tulip_gpticks > 0 && --sc->tulip_gpticks == 0) { - if (sc->tulip_flags & TULIP_WANTRXACT) { - sc->tulip_flags &= ~TULIP_WANTRXACT; - sc->tulip_gpticks = 4; + case 4: { /* 21143 SYM block */ + tulip_media_t media; + srom_media = (tulip_srom_media_t) dp[0]; + for (idx3 = 0; tulip_srom_mediums[idx3].sm_type != TULIP_MEDIA_UNKNOWN; idx3++) { + if (tulip_srom_mediums[idx3].sm_srom_type == srom_media) + break; + } + media = tulip_srom_mediums[idx3].sm_type; + if (media == TULIP_MEDIA_UNKNOWN) + break; + mi->mi_type = TULIP_MEDIAINFO_SYM; + sc->tulip_mediums[media] = mi; + mi->mi_gpcontrol = (dp[1] + dp[2] * 256) << 16; + mi->mi_gpdata = (dp[3] + dp[4] * 256) << 16; + data = dp[5] + dp[6] * 256; + mi->mi_cmdmode = TULIP_SROM_2114X_CMDBITS(data); + if (data & TULIP_SROM_2114X_NOINDICATOR) { + mi->mi_actmask = 0; } else { - printf("%s: autosense failed: cable problem?\n", - sc->tulip_xname); + mi->mi_default = (data & TULIP_SROM_2114X_DEFAULT) != 0; + mi->mi_actmask = TULIP_SROM_2114X_BITPOS(data); + mi->mi_actdata = (data & TULIP_SROM_2114X_POLARITY) ? 0 : mi->mi_actmask; } + mi++; + break; + } +#if 0 + case 5: { /* 21143 Reset block */ + mi->mi_type = TULIP_MEDIAINFO_RESET; + mi->mi_reset_length = *dp++; + mi->mi_reset_offset = dp - sc->tulip_rombuf; + dp += 2 * mi->mi_reset_length; + mi++; + break; + } +#endif + default: { + } + } + dp = ep; + } + } + return mi - sc->tulip_mediainfo; +} + + +static const struct { + void (*vendor_identify_nic)(tulip_softc_t * const sc); + unsigned char vendor_oui[3]; +} tulip_vendors[] = { + { tulip_identify_dec_nic, { 0x08, 0x00, 0x2B } }, + { tulip_identify_dec_nic, { 0x00, 0x00, 0xF8 } }, + { tulip_identify_smc_nic, { 0x00, 0x00, 0xC0 } }, + { tulip_identify_smc_nic, { 0x00, 0xE0, 0x29 } }, + { tulip_identify_znyx_nic, { 0x00, 0xC0, 0x95 } }, + { tulip_identify_cogent_nic, { 0x00, 0x00, 0x92 } }, + { tulip_identify_asante_nic, { 0x00, 0x00, 0x94 } }, + { NULL } +}; + +/* + * This deals with the vagaries of the address roms and the + * brain-deadness that various vendors commit in using them. + */ +static int +tulip_read_macaddr( + tulip_softc_t * const sc) +{ + int cksum, rom_cksum, idx; + u_int32_t csr; + unsigned char tmpbuf[8]; + static const u_char testpat[] = { 0xFF, 0, 0x55, 0xAA, 0xFF, 0, 0x55, 0xAA }; + + sc->tulip_connidx = TULIP_SROM_LASTCONNIDX; + + if (sc->tulip_chipid == TULIP_21040) { + TULIP_CSR_WRITE(sc, csr_enetrom, 1); + for (idx = 0; idx < sizeof(sc->tulip_rombuf); idx++) { + int cnt = 0; + while (((csr = TULIP_CSR_READ(sc, csr_enetrom)) & 0x80000000L) && cnt < 10000) + cnt++; + sc->tulip_rombuf[idx] = csr & 0xFF; + } + sc->tulip_boardsw = &tulip_21040_boardsw; +#if defined(TULIP_EISA) + } else if (sc->tulip_chipid == TULIP_DE425) { + int cnt; + for (idx = 0, cnt = 0; idx < sizeof(testpat) && cnt < 32; cnt++) { + tmpbuf[idx] = TULIP_CSR_READBYTE(sc, csr_enetrom); + if (tmpbuf[idx] == testpat[idx]) + ++idx; + else + idx = 0; + } + for (idx = 0; idx < 32; idx++) + sc->tulip_rombuf[idx] = TULIP_CSR_READBYTE(sc, csr_enetrom); + sc->tulip_boardsw = &tulip_21040_boardsw; +#endif /* TULIP_EISA */ + } else { + if (sc->tulip_chipid == TULIP_21041) { + /* + * Thankfully all 21041's act the same. + */ + sc->tulip_boardsw = &tulip_21041_boardsw; + } else { + /* + * Assume all 21140 board are compatible with the + * DEC 10/100 evaluation board. Not really valid but + * it's the best we can do until every one switches to + * the new SROM format. + */ + + sc->tulip_boardsw = &tulip_21140_eb_boardsw; + } + tulip_srom_read(sc); + if (tulip_srom_crcok(sc->tulip_rombuf)) { + /* + * SROM CRC is valid therefore it must be in the + * new format. + */ + sc->tulip_features |= TULIP_HAVE_ISVSROM; + } else if (sc->tulip_rombuf[126] == 0xff && sc->tulip_rombuf[127] == 0xFF) { + /* + * No checksum is present. See if the SROM id checks out; + * the first 18 bytes should be 0 followed by a 1 followed + * by the number of adapters (which we don't deal with yet). + */ + for (idx = 0; idx < 18; idx++) { + if (sc->tulip_rombuf[idx] != 0) + break; + } + if (idx == 18 && sc->tulip_rombuf[18] == 1 && sc->tulip_rombuf[19] != 0) + sc->tulip_features |= TULIP_HAVE_ISVSROM; + } + if ((sc->tulip_features & TULIP_HAVE_ISVSROM) && tulip_srom_decode(sc)) { + if (sc->tulip_chipid != TULIP_21041) + sc->tulip_boardsw = &tulip_2114x_isv_boardsw; + + /* + * If the SROM specifies more than one adapter, tag this as a + * BASE rom. + */ + if (sc->tulip_rombuf[19] > 1) + sc->tulip_features |= TULIP_HAVE_BASEROM; + if (sc->tulip_boardsw == NULL) + return -6; + goto check_oui; + } + } + + + if (bcmp(&sc->tulip_rombuf[0], &sc->tulip_rombuf[16], 8) != 0) { + /* + * Some folks don't use the standard ethernet rom format + * but instead just put the address in the first 6 bytes + * of the rom and let the rest be all 0xffs. (Can we say + * ZNYX???) (well sometimes they put in a checksum so we'll + * start at 8). + */ + for (idx = 8; idx < 32; idx++) { + if (sc->tulip_rombuf[idx] != 0xFF) + return -4; + } + /* + * Make sure the address is not multicast or locally assigned + * that the OUI is not 00-00-00. + */ + if ((sc->tulip_rombuf[0] & 3) != 0) + return -4; + if (sc->tulip_rombuf[0] == 0 && sc->tulip_rombuf[1] == 0 + && sc->tulip_rombuf[2] == 0) + return -4; + bcopy(sc->tulip_rombuf, sc->tulip_enaddr, 6); + sc->tulip_features |= TULIP_HAVE_OKROM; + goto check_oui; + } else { + /* + * A number of makers of multiport boards (ZNYX and Cogent) + * only put on one address ROM on their 21040 boards. So + * if the ROM is all zeros (or all 0xFFs), look at the + * previous configured boards (as long as they are on the same + * PCI bus and the bus number is non-zero) until we find the + * master board with address ROM. We then use its address ROM + * as the base for this board. (we add our relative board + * to the last byte of its address). + */ + for (idx = 0; idx < sizeof(sc->tulip_rombuf); idx++) { + if (sc->tulip_rombuf[idx] != 0 && sc->tulip_rombuf[idx] != 0xFF) + break; + } + if (idx == sizeof(sc->tulip_rombuf)) { + int root_unit; + tulip_softc_t *root_sc = NULL; + for (root_unit = sc->tulip_unit - 1; root_unit >= 0; root_unit--) { + root_sc = TULIP_UNIT_TO_SOFTC(root_unit); + if (root_sc == NULL || (root_sc->tulip_features & (TULIP_HAVE_OKROM|TULIP_HAVE_SLAVEDROM)) == TULIP_HAVE_OKROM) + break; + root_sc = NULL; + } + if (root_sc != NULL && (root_sc->tulip_features & TULIP_HAVE_BASEROM) + && root_sc->tulip_chipid == sc->tulip_chipid + && root_sc->tulip_pci_busno == sc->tulip_pci_busno) { + sc->tulip_features |= TULIP_HAVE_SLAVEDROM; + sc->tulip_boardsw = root_sc->tulip_boardsw; + strcpy(sc->tulip_boardid, root_sc->tulip_boardid); + if (sc->tulip_boardsw->bd_type == TULIP_21140_ISV) { + bcopy(root_sc->tulip_rombuf, sc->tulip_rombuf, + sizeof(sc->tulip_rombuf)); + if (!tulip_srom_decode(sc)) + return -5; + } else { + bcopy(root_sc->tulip_enaddr, sc->tulip_enaddr, 6); + sc->tulip_enaddr[5] += sc->tulip_unit - root_sc->tulip_unit; } /* - * Since this media failed to probe, try the other one. + * Now for a truly disgusting kludge: all 4 21040s on + * the ZX314 share the same INTA line so the mapping + * setup by the BIOS on the PCI bridge is worthless. + * Rather than reprogramming the value in the config + * register, we will handle this internally. */ - if (sc->tulip_probe_state == TULIP_PROBE_AUI) { - sc->tulip_probe_state = TULIP_PROBE_BNC; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_DC21041_SIACONN_BNC); - TULIP_WRITE_CSR(sc, csr_sia_tx_rx, TULIP_DC21041_SIATXRX_BNC); - TULIP_WRITE_CSR(sc, csr_sia_general, TULIP_DC21041_SIAGEN_BNC|TULIP_DC21041_SIAGEN_WATCHDOG); - TULIP_WRITE_CSR(sc, csr_gp_timer, 100000000 / 204800); /* 100 ms */ - } else { - sc->tulip_probe_state = TULIP_PROBE_AUI; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_DC21041_SIACONN_AUI); - TULIP_WRITE_CSR(sc, csr_sia_tx_rx, TULIP_DC21041_SIATXRX_AUI); - TULIP_WRITE_CSR(sc, csr_sia_general, TULIP_DC21041_SIAGEN_AUI|TULIP_DC21041_SIAGEN_WATCHDOG); - TULIP_WRITE_CSR(sc, csr_gp_timer, 100000000 / 204800); /* 100 ms */ + if (root_sc->tulip_features & TULIP_HAVE_SHAREDINTR) { + sc->tulip_slaves = root_sc->tulip_slaves; + root_sc->tulip_slaves = sc; + sc->tulip_features |= TULIP_HAVE_SLAVEDINTR; } - TULIP_WRITE_CSR(sc, csr_intr, sc->tulip_intrmask); - break; + return 0; } } + } + + /* + * This is the standard DEC address ROM test. + */ + + if (bcmp(&sc->tulip_rombuf[24], testpat, 8) != 0) + return -3; + + tmpbuf[0] = sc->tulip_rombuf[15]; tmpbuf[1] = sc->tulip_rombuf[14]; + tmpbuf[2] = sc->tulip_rombuf[13]; tmpbuf[3] = sc->tulip_rombuf[12]; + tmpbuf[4] = sc->tulip_rombuf[11]; tmpbuf[5] = sc->tulip_rombuf[10]; + tmpbuf[6] = sc->tulip_rombuf[9]; tmpbuf[7] = sc->tulip_rombuf[8]; + if (bcmp(&sc->tulip_rombuf[0], tmpbuf, 8) != 0) + return -2; + + bcopy(sc->tulip_rombuf, sc->tulip_enaddr, 6); + + cksum = *(u_int16_t *) &sc->tulip_enaddr[0]; + cksum *= 2; + if (cksum > 65535) cksum -= 65535; + cksum += *(u_int16_t *) &sc->tulip_enaddr[2]; + if (cksum > 65535) cksum -= 65535; + cksum *= 2; + if (cksum > 65535) cksum -= 65535; + cksum += *(u_int16_t *) &sc->tulip_enaddr[4]; + if (cksum >= 65535) cksum -= 65535; + + rom_cksum = *(u_int16_t *) &sc->tulip_rombuf[6]; + + if (cksum != rom_cksum) + return -1; + + check_oui: + /* + * Check for various boards based on OUI. Did I say braindead? + */ + for (idx = 0; tulip_vendors[idx].vendor_identify_nic != NULL; idx++) { + if (bcmp((caddr_t) sc->tulip_enaddr, + (caddr_t) tulip_vendors[idx].vendor_oui, 3) == 0) { + (*tulip_vendors[idx].vendor_identify_nic)(sc); + break; + } + } + + sc->tulip_features |= TULIP_HAVE_OKROM; + return 0; +} + + +#if defined(IFM_ETHER) +static void +tulip_ifmedia_add( + tulip_softc_t * const sc) +{ + tulip_media_t media; + int medias = 0; + + for (media = TULIP_MEDIA_UNKNOWN; media < TULIP_MEDIA_MAX; media++) { + if (sc->tulip_mediums[media] != NULL) { + ifmedia_add(&sc->tulip_ifmedia, tulip_media_to_ifmedia[media], + 0, 0); + medias++; + } + } + if (medias == 0) { + sc->tulip_features |= TULIP_HAVE_NOMEDIA; + ifmedia_add(&sc->tulip_ifmedia, IFM_ETHER | IFM_NONE, 0, 0); + ifmedia_set(&sc->tulip_ifmedia, IFM_ETHER | IFM_NONE); + } else if (sc->tulip_media == TULIP_MEDIA_UNKNOWN) { + ifmedia_add(&sc->tulip_ifmedia, IFM_ETHER | IFM_AUTO, 0, 0); + ifmedia_set(&sc->tulip_ifmedia, IFM_ETHER | IFM_AUTO); } else { + ifmedia_set(&sc->tulip_ifmedia, tulip_media_to_ifmedia[sc->tulip_media]); + sc->tulip_flags |= TULIP_PRINTMEDIA; + tulip_linkup(sc, sc->tulip_media); + } +} + +static int +tulip_ifmedia_change( + struct ifnet * const ifp) +{ + tulip_softc_t * const sc = TULIP_IFP_TO_SOFTC(ifp); + + sc->tulip_flags |= TULIP_NEEDRESET; + sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + sc->tulip_media = TULIP_MEDIA_UNKNOWN; + if (IFM_SUBTYPE(sc->tulip_ifmedia.ifm_media) != IFM_AUTO) { + tulip_media_t media; + for (media = TULIP_MEDIA_UNKNOWN; media < TULIP_MEDIA_MAX; media++) { + if (sc->tulip_mediums[media] != NULL + && sc->tulip_ifmedia.ifm_media == tulip_media_to_ifmedia[media]) { + sc->tulip_flags |= TULIP_PRINTMEDIA; + sc->tulip_flags &= ~TULIP_DIDNWAY; + tulip_linkup(sc, media); + return 0; + } + } + } + sc->tulip_flags &= ~(TULIP_TXPROBE_ACTIVE|TULIP_WANTRXACT); + tulip_reset(sc); + tulip_init(sc); + return 0; +} + + +/* + * Media status callback + */ +static void +tulip_ifmedia_status( + struct ifnet * const ifp, + struct ifmediareq *req) +{ + tulip_softc_t *sc = TULIP_IFP_TO_SOFTC(ifp); + +#if defined(__bsdi__) + if (sc->tulip_mii.mii_instance != 0) { + mii_pollstat(&sc->tulip_mii); + req->ifm_active = sc->tulip_mii.mii_media_active; + req->ifm_status = sc->tulip_mii.mii_media_status; + return; + } +#endif + if (sc->tulip_media == TULIP_MEDIA_UNKNOWN) + return; + + req->ifm_status = IFM_AVALID; + if (sc->tulip_flags & TULIP_LINKUP) + req->ifm_status |= IFM_ACTIVE; + + req->ifm_active = tulip_media_to_ifmedia[sc->tulip_media]; +} +#endif + + +static void +tulip_addr_filter( + tulip_softc_t * const sc) +{ + struct ether_multistep step; + struct ether_multi *enm; + + sc->tulip_flags &= ~(TULIP_WANTHASHPERFECT|TULIP_WANTHASHONLY|TULIP_ALLMULTI); + sc->tulip_flags |= TULIP_WANTSETUP; + sc->tulip_cmdmode &= ~TULIP_CMD_RXRUN; + sc->tulip_intrmask &= ~TULIP_STS_RXSTOPPED; +#if defined(IFF_ALLMULTI) + sc->tulip_if.if_flags &= ~IFF_ALLMULTI; +#endif + if (sc->tulip_multicnt > 14) { + u_int32_t *sp = sc->tulip_setupdata; + unsigned hash; /* - * If the link has passed LinkPass, 10baseT is the - * proper media to use. + * Some early passes of the 21140 have broken implementations of + * hash-perfect mode. When we get too many multicasts for perfect + * filtering with these chips, we need to switch into hash-only + * mode (this is better than all-multicast on network with lots + * of multicast traffic). */ - if (sc->tulip_media != TULIP_MEDIA_10BASET) - printf("%s: enabling 10baseT/UTP port\n", sc->tulip_xname); - if (sc->tulip_media != TULIP_MEDIA_10BASET - || (sc->tulip_flags & TULIP_INRESET)) { - sc->tulip_media = TULIP_MEDIA_10BASET; - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_SIACONN_RESET); - TULIP_WRITE_CSR(sc, csr_sia_connectivity, TULIP_DC21041_SIACONN_10BASET); - TULIP_WRITE_CSR(sc, csr_sia_tx_rx, TULIP_DC21041_SIATXRX_10BASET); - TULIP_WRITE_CSR(sc, csr_sia_general, TULIP_DC21041_SIAGEN_10BASET|TULIP_DC21041_SIAGEN_WATCHDOG); - } - TULIP_WRITE_CSR(sc, csr_gp_timer, 0); /* disable */ - sc->tulip_gpticks = 1; - sc->tulip_probe_state = TULIP_PROBE_10BASET; - sc->tulip_intrmask &= ~TULIP_STS_GPTIMEOUT; - sc->tulip_if.if_flags &= ~IFF_OACTIVE; + if (sc->tulip_features & TULIP_HAVE_BROKEN_HASH) + sc->tulip_flags |= TULIP_WANTHASHONLY; + else + sc->tulip_flags |= TULIP_WANTHASHPERFECT; + /* + * If we have more than 14 multicasts, we have + * go into hash perfect mode (512 bit multicast + * hash and one perfect hardware). + */ + bzero(sc->tulip_setupdata, sizeof(sc->tulip_setupdata)); + ETHER_FIRST_MULTI(step, TULIP_ETHERCOM(sc), enm); + while (enm != NULL) { + if (bcmp(enm->enm_addrlo, enm->enm_addrhi, 6) == 0) { + hash = tulip_mchash(enm->enm_addrlo); + sp[hash >> 4] |= 1 << (hash & 0xF); + } else { + sc->tulip_flags |= TULIP_ALLMULTI; + sc->tulip_flags &= ~(TULIP_WANTHASHONLY|TULIP_WANTHASHPERFECT); + break; + } + ETHER_NEXT_MULTI(step, enm); + } + /* + * No reason to use a hash if we are going to be + * receiving every multicast. + */ + if ((sc->tulip_flags & TULIP_ALLMULTI) == 0) { + hash = tulip_mchash(etherbroadcastaddr); + sp[hash >> 4] |= 1 << (hash & 0xF); + if (sc->tulip_flags & TULIP_WANTHASHONLY) { + hash = tulip_mchash(sc->tulip_enaddr); + sp[hash >> 4] |= 1 << (hash & 0xF); + } else { + sp[39] = ((u_int16_t *) sc->tulip_enaddr)[0]; + sp[40] = ((u_int16_t *) sc->tulip_enaddr)[1]; + sp[41] = ((u_int16_t *) sc->tulip_enaddr)[2]; + } + } } - TULIP_WRITE_CSR(sc, csr_intr, sc->tulip_intrmask); + if ((sc->tulip_flags & (TULIP_WANTHASHPERFECT|TULIP_WANTHASHONLY)) == 0) { + u_int32_t *sp = sc->tulip_setupdata; + int idx = 0; + if ((sc->tulip_flags & TULIP_ALLMULTI) == 0) { + /* + * Else can get perfect filtering for 16 addresses. + */ + ETHER_FIRST_MULTI(step, TULIP_ETHERCOM(sc), enm); + for (; enm != NULL; idx++) { + if (bcmp(enm->enm_addrlo, enm->enm_addrhi, 6) == 0) { + *sp++ = ((u_int16_t *) enm->enm_addrlo)[0]; + *sp++ = ((u_int16_t *) enm->enm_addrlo)[1]; + *sp++ = ((u_int16_t *) enm->enm_addrlo)[2]; + } else { + sc->tulip_flags |= TULIP_ALLMULTI; + break; + } + ETHER_NEXT_MULTI(step, enm); + } + /* + * Add the broadcast address. + */ + idx++; + *sp++ = 0xFFFF; + *sp++ = 0xFFFF; + *sp++ = 0xFFFF; + } + /* + * Pad the rest with our hardware address + */ + for (; idx < 16; idx++) { + *sp++ = ((u_int16_t *) sc->tulip_enaddr)[0]; + *sp++ = ((u_int16_t *) sc->tulip_enaddr)[1]; + *sp++ = ((u_int16_t *) sc->tulip_enaddr)[2]; + } + } +#if defined(IFF_ALLMULTI) + if (sc->tulip_flags & TULIP_ALLMULTI) + sc->tulip_if.if_flags |= IFF_ALLMULTI; +#endif } -static const tulip_boardsw_t tulip_dc21041_boardsw = { - TULIP_DC21041_GENERIC, - "", - tulip_dc21041_media_probe, - tulip_dc21041_media_select -}; -static const tulip_boardsw_t tulip_dc21041_de450_boardsw = { - TULIP_DC21041_DE450, - "Digital DE450 ", - tulip_dc21041_media_probe, - tulip_dc21041_media_select -}; - static void tulip_reset( tulip_softc_t * const sc) { tulip_ringinfo_t *ri; tulip_desc_t *di; + u_int32_t inreset = (sc->tulip_flags & TULIP_INRESET); + + /* + * Brilliant. Simply brilliant. When switching modes/speeds + * on a 2114*, you need to set the appriopriate MII/PCS/SCL/PS + * bits in CSR6 and then do a software reset to get the 21140 + * to properly reset its internal pathways to the right places. + * Grrrr. + */ + if (sc->tulip_boardsw->bd_media_preset != NULL) + (*sc->tulip_boardsw->bd_media_preset)(sc); - TULIP_WRITE_CSR(sc, csr_busmode, TULIP_BUSMODE_SWRESET); + TULIP_CSR_WRITE(sc, csr_busmode, TULIP_BUSMODE_SWRESET); DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at 33MHz that comes to two microseconds but wait a bit longer anyways) */ - sc->tulip_flags |= TULIP_INRESET; - sc->tulip_intrmask = 0; - TULIP_WRITE_CSR(sc, csr_intr, sc->tulip_intrmask); + if (!inreset) { + sc->tulip_flags |= TULIP_INRESET; + sc->tulip_flags &= ~(TULIP_NEEDRESET|TULIP_RXBUFSLOW); + sc->tulip_if.if_flags &= ~IFF_OACTIVE; + } - TULIP_WRITE_CSR(sc, csr_txlist, vtophys(&sc->tulip_txinfo.ri_first[0])); - TULIP_WRITE_CSR(sc, csr_rxlist, vtophys(&sc->tulip_rxinfo.ri_first[0])); - TULIP_WRITE_CSR(sc, csr_busmode, - (1 << (TULIP_BURSTSIZE(sc->tulip_unit) + 8)) - |TULIP_BUSMODE_CACHE_ALIGN8 - |(BYTE_ORDER != LITTLE_ENDIAN ? TULIP_BUSMODE_BIGENDIAN : 0)); + TULIP_CSR_WRITE(sc, csr_txlist, TULIP_KVATOPHYS(sc, &sc->tulip_txinfo.ri_first[0])); + TULIP_CSR_WRITE(sc, csr_rxlist, TULIP_KVATOPHYS(sc, &sc->tulip_rxinfo.ri_first[0])); + TULIP_CSR_WRITE(sc, csr_busmode, + (1 << (TULIP_BURSTSIZE(sc->tulip_unit) + 8)) + |TULIP_BUSMODE_CACHE_ALIGN8 + |TULIP_BUSMODE_READMULTIPLE + |(BYTE_ORDER != LITTLE_ENDIAN ? TULIP_BUSMODE_BIGENDIAN : 0)); + sc->tulip_txtimer = 0; sc->tulip_txq.ifq_maxlen = TULIP_TXDESCS; /* * Free all the mbufs that were on the transmit ring. @@ -1010,54 +3140,87 @@ tulip_reset( m_freem(m); } - (*sc->tulip_boardsw->bd_media_select)(sc); + /* + * If tulip_reset is being called recurisvely, exit quickly knowing + * that when the outer tulip_reset returns all the right stuff will + * have happened. + */ + if (inreset) + return; sc->tulip_intrmask |= TULIP_STS_NORMALINTR|TULIP_STS_RXINTR|TULIP_STS_TXINTR |TULIP_STS_ABNRMLINTR|TULIP_STS_SYSERROR|TULIP_STS_TXSTOPPED |TULIP_STS_TXBABBLE|TULIP_STS_LINKFAIL|TULIP_STS_RXSTOPPED; - sc->tulip_flags &= ~(TULIP_DOINGSETUP|TULIP_WANTSETUP|TULIP_INRESET); + + if ((sc->tulip_flags & TULIP_DEVICEPROBE) == 0) + (*sc->tulip_boardsw->bd_media_select)(sc); +#if defined(TULIP_DEBUG) + if ((sc->tulip_flags & TULIP_NEEDRESET) == TULIP_NEEDRESET) + printf(TULIP_PRINTF_FMT ": tulip_reset: additional reset needed?!?\n", + TULIP_PRINTF_ARGS); +#endif + tulip_media_print(sc); + if (sc->tulip_features & TULIP_HAVE_DUALSENSE) + TULIP_CSR_WRITE(sc, csr_sia_status, TULIP_CSR_READ(sc, csr_sia_status)); + + sc->tulip_flags &= ~(TULIP_DOINGSETUP|TULIP_WANTSETUP|TULIP_INRESET + |TULIP_RXACT|TULIP_TXINTPENDING); tulip_addr_filter(sc); } - + + static void tulip_init( tulip_softc_t * const sc) { if (sc->tulip_if.if_flags & IFF_UP) { + if ((sc->tulip_if.if_flags & IFF_RUNNING) == 0) { + /* initialize the media */ + tulip_reset(sc); + } sc->tulip_if.if_flags |= IFF_RUNNING; if (sc->tulip_if.if_flags & IFF_PROMISC) { + sc->tulip_flags |= TULIP_PROMISC; sc->tulip_cmdmode |= TULIP_CMD_PROMISCUOUS; } else { + sc->tulip_flags &= ~TULIP_PROMISC; sc->tulip_cmdmode &= ~TULIP_CMD_PROMISCUOUS; - if (sc->tulip_if.if_flags & IFF_ALLMULTI) { + if (sc->tulip_flags & TULIP_ALLMULTI) { sc->tulip_cmdmode |= TULIP_CMD_ALLMULTI; } else { sc->tulip_cmdmode &= ~TULIP_CMD_ALLMULTI; } } sc->tulip_cmdmode |= TULIP_CMD_TXRUN; - if ((sc->tulip_flags & TULIP_WANTSETUP) == 0) { + if ((sc->tulip_flags & (TULIP_TXPROBE_ACTIVE|TULIP_WANTSETUP)) == 0) { tulip_rx_intr(sc); sc->tulip_cmdmode |= TULIP_CMD_RXRUN; sc->tulip_intrmask |= TULIP_STS_RXSTOPPED; } else { + sc->tulip_if.if_flags |= IFF_OACTIVE; + sc->tulip_cmdmode &= ~TULIP_CMD_RXRUN; sc->tulip_intrmask &= ~TULIP_STS_RXSTOPPED; - tulip_start(&sc->tulip_if); } - TULIP_WRITE_CSR(sc, csr_intr, sc->tulip_intrmask); - TULIP_WRITE_CSR(sc, csr_command, sc->tulip_cmdmode); + TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask); + TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode); + tulip_ifstart(&sc->tulip_if); } else { - tulip_reset(sc); sc->tulip_if.if_flags &= ~IFF_RUNNING; + tulip_reset(sc); } } - + + static void tulip_rx_intr( tulip_softc_t * const sc) { tulip_ringinfo_t * const ri = &sc->tulip_rxinfo; struct ifnet * const ifp = &sc->tulip_if; + int fillok = 1; +#if defined(TULIP_DEBUG) + int cnt = 0; +#endif for (;;) { struct ether_header eh; @@ -1066,73 +3229,132 @@ tulip_rx_intr( struct mbuf *ms = NULL, *me = NULL; int accept = 0; - if (sc->tulip_rxq.ifq_len < TULIP_RXQ_TARGET) + if (fillok && sc->tulip_rxq.ifq_len < TULIP_RXQ_TARGET) goto queue_mbuf; - if (((volatile tulip_desc_t *) eop)->d_status & TULIP_DSTS_OWNER) - return; - +#if defined(TULIP_DEBUG) + if (cnt == ri->ri_max) + break; +#endif + /* + * If the TULIP has no descriptors, there can't be any receive + * descriptors to process. + */ + if (eop == ri->ri_nextout) + break; + /* - * It is possible (though improbable unless the BIG_PACKET support - * is enabled) for a received packet to cross more than one receive - * descriptor. + * 90% of the packets will fit in one descriptor. So we optimize + * for that case. */ - while ((((volatile tulip_desc_t *) eop)->d_status & TULIP_DSTS_RxLASTDESC) == 0) { - if (++eop == ri->ri_last) - eop = ri->ri_first; + if ((((volatile tulip_desc_t *) eop)->d_status & (TULIP_DSTS_OWNER|TULIP_DSTS_RxFIRSTDESC|TULIP_DSTS_RxLASTDESC)) == (TULIP_DSTS_RxFIRSTDESC|TULIP_DSTS_RxLASTDESC)) { + IF_DEQUEUE(&sc->tulip_rxq, ms); + me = ms; + } else { + /* + * If still owned by the TULIP, don't touch it. + */ if (((volatile tulip_desc_t *) eop)->d_status & TULIP_DSTS_OWNER) - return; - total_len++; - } + break; - /* - * Dequeue the first buffer for the start of the packet. Hopefully this - * will be the only one we need to dequeue. However, if the packet consumed - * multiple descriptors, then we need to dequeue those buffers and chain to - * the starting mbuf. All buffers but the last buffer have the same length - * so we can set that now. (we add to last_offset instead of multiplying - * since we normally won't go into the loop and thereby saving a ourselves - * from doing a multiplication by 0 in the normal case). - */ - IF_DEQUEUE(&sc->tulip_rxq, ms); - for (me = ms; total_len > 0; total_len--) { - me->m_len = TULIP_RX_BUFLEN; - last_offset += TULIP_RX_BUFLEN; - IF_DEQUEUE(&sc->tulip_rxq, me->m_next); - me = me->m_next; + /* + * It is possible (though improbable unless the BIG_PACKET support + * is enabled or MCLBYTES < 1518) for a received packet to cross + * more than one receive descriptor. + */ + while ((((volatile tulip_desc_t *) eop)->d_status & TULIP_DSTS_RxLASTDESC) == 0) { + if (++eop == ri->ri_last) + eop = ri->ri_first; + if (eop == ri->ri_nextout || ((((volatile tulip_desc_t *) eop)->d_status & TULIP_DSTS_OWNER))) { +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_rxintrs++; + sc->tulip_dbg.dbg_rxpktsperintr[cnt]++; +#endif + return; + } + total_len++; + } + + /* + * Dequeue the first buffer for the start of the packet. Hopefully + * this will be the only one we need to dequeue. However, if the + * packet consumed multiple descriptors, then we need to dequeue + * those buffers and chain to the starting mbuf. All buffers but + * the last buffer have the same length so we can set that now. + * (we add to last_offset instead of multiplying since we normally + * won't go into the loop and thereby saving a ourselves from + * doing a multiplication by 0 in the normal case). + */ + IF_DEQUEUE(&sc->tulip_rxq, ms); + for (me = ms; total_len > 0; total_len--) { + me->m_len = TULIP_RX_BUFLEN; + last_offset += TULIP_RX_BUFLEN; + IF_DEQUEUE(&sc->tulip_rxq, me->m_next); + me = me->m_next; + } } /* - * Now get the size of received packet. + * Now get the size of received packet (minus the CRC). */ total_len = ((eop->d_status >> 16) & 0x7FFF) - 4; - if ((eop->d_status & TULIP_DSTS_ERRSUM) == 0 + if ((sc->tulip_flags & TULIP_RXIGNORE) == 0 + && ((eop->d_status & TULIP_DSTS_ERRSUM) == 0 #ifdef BIG_PACKET - || (total_len <= sc->tulip_if.if_mtu + sizeof(struct ether_header) && - (eop->d_status & (TULIP_DSTS_RxBADLENGTH|TULIP_DSTS_RxRUNT| - TULIP_DSTS_RxCOLLSEEN|TULIP_DSTS_RxBADCRC| - TULIP_DSTS_RxOVERFLOW))) + || (total_len <= sc->tulip_if.if_mtu + sizeof(struct ether_header) && + (eop->d_status & (TULIP_DSTS_RxBADLENGTH|TULIP_DSTS_RxRUNT| + TULIP_DSTS_RxCOLLSEEN|TULIP_DSTS_RxBADCRC| + TULIP_DSTS_RxOVERFLOW)) == 0) #endif - ) { + )) { me->m_len = total_len - last_offset; eh = *mtod(ms, struct ether_header *); #if NBPFILTER > 0 if (sc->tulip_bpf != NULL) if (me == ms) - bpf_tap(sc->tulip_bpf, mtod(ms, caddr_t), total_len); + TULIP_BPF_TAP(sc, mtod(ms, caddr_t), total_len); else - bpf_mtap(sc->tulip_bpf, ms); + TULIP_BPF_MTAP(sc, ms); #endif - if ((sc->tulip_if.if_flags & IFF_PROMISC) + sc->tulip_flags |= TULIP_RXACT; + if ((sc->tulip_flags & (TULIP_PROMISC|TULIP_HASHONLY)) && (eh.ether_dhost[0] & 1) == 0 - && !TULIP_ADDREQUAL(eh.ether_dhost, sc->tulip_ac.ac_enaddr)) + && !TULIP_ADDREQUAL(eh.ether_dhost, sc->tulip_enaddr)) goto next; accept = 1; total_len -= sizeof(struct ether_header); } else { ifp->if_ierrors++; + if (eop->d_status & (TULIP_DSTS_RxBADLENGTH|TULIP_DSTS_RxOVERFLOW|TULIP_DSTS_RxWATCHDOG)) { + sc->tulip_dot3stats.dot3StatsInternalMacReceiveErrors++; + } else { + const char *error = NULL; + if (eop->d_status & TULIP_DSTS_RxTOOLONG) { + sc->tulip_dot3stats.dot3StatsFrameTooLongs++; + error = "frame too long"; + } + if (eop->d_status & TULIP_DSTS_RxBADCRC) { + if (eop->d_status & TULIP_DSTS_RxDRBBLBIT) { + sc->tulip_dot3stats.dot3StatsAlignmentErrors++; + error = "alignment error"; + } else { + sc->tulip_dot3stats.dot3StatsFCSErrors++; + error = "bad crc"; + } + } + if (error != NULL && (sc->tulip_flags & TULIP_NOMESSAGES) == 0) { + printf(TULIP_PRINTF_FMT ": receive: " TULIP_EADDR_FMT ": %s\n", + TULIP_PRINTF_ARGS, + TULIP_EADDR_ARGS(mtod(ms, u_char *) + 6), + error); + sc->tulip_flags |= TULIP_NOMESSAGES; + } + } } next: +#if defined(TULIP_DEBUG) + cnt++; +#endif ifp->if_ipackets++; if (++eop == ri->ri_last) eop = ri->ri_first; @@ -1142,10 +3364,13 @@ tulip_rx_intr( * Either we are priming the TULIP with mbufs (m == NULL) * or we are about to accept an mbuf for the upper layers * so we need to allocate an mbuf to replace it. If we - * can't replace, then count it as an input error and reuse - * the mbuf. *** Note that if this packet crossed multiple - * descriptors we don't even try to reallocate all the mbufs - * here. Instead we rely on the test of the beginning of + * can't replace it, send up it anyways. This may cause + * us to drop packets in the future but that's better than + * being caught in livelock. + * + * Note that if this packet crossed multiple descriptors + * we don't even try to reallocate all the mbufs here. + * Instead we rely on the test of the beginning of * the loop to refill for the extra consumed mbufs. */ if (accept || ms == NULL) { @@ -1164,47 +3389,56 @@ tulip_rx_intr( } #endif } - if (accept) { - if (m0 != NULL) { + if (accept +#if defined(TULIP_COPY_RXDATA) + && m0 != NULL +#endif + ) { #if defined(__bsdi__) - eh.ether_type = ntohs(eh.ether_type); + eh.ether_type = ntohs(eh.ether_type); #endif #if !defined(TULIP_COPY_RXDATA) - ms->m_data += sizeof(struct ether_header); - ms->m_len -= sizeof(struct ether_header); - ms->m_pkthdr.len = total_len; - ms->m_pkthdr.rcvif = ifp; - ether_input(ifp, &eh, ms); - ms = m0; + ms->m_data += sizeof(struct ether_header); + ms->m_len -= sizeof(struct ether_header); + ms->m_pkthdr.len = total_len; + ms->m_pkthdr.rcvif = ifp; + ether_input(ifp, &eh, ms); #else #ifdef BIG_PACKET #error BIG_PACKET is incompatible with TULIP_COPY_RXDATA #endif - if (ms == me) -/*XXX?*/ bcopy(mtod(ms, caddr_t) + sizeof(struct ether_header), - mtod(m0, caddr_t), total_len); - else -/*XXX?*/ m_copydata(ms, 0, total_len, mtod(m0, caddr_t)); - m0->m_len = m0->m_pkthdr.len = total_len; - m0->m_pkthdr.rcvif = ifp; - ether_input(ifp, &eh, m0); + if (ms == me) + bcopy(mtod(ms, caddr_t) + sizeof(struct ether_header), + mtod(m0, caddr_t), total_len); + else + m_copydata(ms, 0, total_len, mtod(m0, caddr_t)); + m0->m_len = m0->m_pkthdr.len = total_len; + m0->m_pkthdr.rcvif = ifp; + ether_input(ifp, &eh, m0); + m0 = ms; #endif - } else { - ifp->if_ierrors++; - } - } else { - ms = m0; } + ms = m0; + } + if (ms == NULL) { + /* + * Couldn't allocate a new buffer. Don't bother + * trying to replenish the receive queue. + */ + fillok = 0; + sc->tulip_flags |= TULIP_RXBUFSLOW; +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_rxlowbufs++; +#endif + continue; } - if (ms == NULL) - return; /* * Now give the buffer(s) to the TULIP and save in our * receive queue. */ do { ri->ri_nextout->d_length1 = TULIP_RX_BUFLEN; - ri->ri_nextout->d_addr1 = vtophys(mtod(ms, caddr_t)); + ri->ri_nextout->d_addr1 = TULIP_KVATOPHYS(sc, mtod(ms, caddr_t)); ri->ri_nextout->d_status = TULIP_DSTS_OWNER; if (++ri->ri_nextout == ri->ri_last) ri->ri_nextout = ri->ri_first; @@ -1212,9 +3446,18 @@ tulip_rx_intr( ms->m_next = NULL; IF_ENQUEUE(&sc->tulip_rxq, ms); } while ((ms = me) != NULL); + + if (sc->tulip_rxq.ifq_len >= TULIP_RXQ_TARGET) + sc->tulip_flags &= ~TULIP_RXBUFSLOW; } + +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_rxintrs++; + sc->tulip_dbg.dbg_rxpktsperintr[cnt]++; +#endif } - + + static int tulip_tx_intr( tulip_softc_t * const sc) @@ -1222,64 +3465,575 @@ tulip_tx_intr( tulip_ringinfo_t * const ri = &sc->tulip_txinfo; struct mbuf *m; int xmits = 0; + int descs = 0; while (ri->ri_free < ri->ri_max) { + u_int32_t d_flag; if (((volatile tulip_desc_t *) ri->ri_nextin)->d_status & TULIP_DSTS_OWNER) break; - if (ri->ri_nextin->d_flag & TULIP_DFLAG_TxLASTSEG) { - if (ri->ri_nextin->d_flag & TULIP_DFLAG_TxSETUPPKT) { + d_flag = ri->ri_nextin->d_flag; + if (d_flag & TULIP_DFLAG_TxLASTSEG) { + if (d_flag & TULIP_DFLAG_TxSETUPPKT) { /* * We've just finished processing a setup packet. - * Mark that we can finished it. If there's not + * Mark that we finished it. If there's not * another pending, startup the TULIP receiver. * Make sure we ack the RXSTOPPED so we won't get * an abormal interrupt indication. */ - sc->tulip_flags &= ~TULIP_DOINGSETUP; - if ((sc->tulip_flags & TULIP_WANTSETUP) == 0) { + sc->tulip_flags &= ~(TULIP_DOINGSETUP|TULIP_HASHONLY); + if (ri->ri_nextin->d_flag & TULIP_DFLAG_TxINVRSFILT) + sc->tulip_flags |= TULIP_HASHONLY; + if ((sc->tulip_flags & (TULIP_WANTSETUP|TULIP_TXPROBE_ACTIVE)) == 0) { tulip_rx_intr(sc); sc->tulip_cmdmode |= TULIP_CMD_RXRUN; sc->tulip_intrmask |= TULIP_STS_RXSTOPPED; - TULIP_WRITE_CSR(sc, csr_status, TULIP_STS_RXSTOPPED); - TULIP_WRITE_CSR(sc, csr_command, sc->tulip_cmdmode); - TULIP_WRITE_CSR(sc, csr_intr, sc->tulip_intrmask); + TULIP_CSR_WRITE(sc, csr_status, TULIP_STS_RXSTOPPED); + TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask); + TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode); } - } else { + } else { + const u_int32_t d_status = ri->ri_nextin->d_status; IF_DEQUEUE(&sc->tulip_txq, m); m_freem(m); - xmits++; + if (d_flag & TULIP_DFLAG_TxWANTINTR) { + sc->tulip_flags &= ~TULIP_TXINTPENDING; + } if (sc->tulip_flags & TULIP_TXPROBE_ACTIVE) { - if ((ri->ri_nextin->d_status & (TULIP_DSTS_TxNOCARR|TULIP_DSTS_TxEXCCOLL)) == 0) - sc->tulip_flags |= TULIP_TXPROBE_OK; - (*sc->tulip_boardsw->bd_media_select)(sc); + tulip_mediapoll_event_t event = TULIP_MEDIAPOLL_TXPROBE_OK; + if (d_status & (TULIP_DSTS_TxNOCARR|TULIP_DSTS_TxEXCCOLL)) { +#if defined(TULIP_DEBUG) + if (d_status & TULIP_DSTS_TxNOCARR) + sc->tulip_dbg.dbg_txprobe_nocarr++; + if (d_status & TULIP_DSTS_TxEXCCOLL) + sc->tulip_dbg.dbg_txprobe_exccoll++; +#endif + event = TULIP_MEDIAPOLL_TXPROBE_FAILED; + } + (*sc->tulip_boardsw->bd_media_poll)(sc, event); + /* + * Escape from the loop before media poll has reset the TULIP! + */ + break; } else { - sc->tulip_if.if_collisions += - (ri->ri_nextin->d_status & TULIP_DSTS_TxCOLLMASK) - >> TULIP_DSTS_V_TxCOLLCNT; - if (ri->ri_nextin->d_status & TULIP_DSTS_ERRSUM) + xmits++; + if (d_status & TULIP_DSTS_ERRSUM) { sc->tulip_if.if_oerrors++; + if (d_status & TULIP_DSTS_TxEXCCOLL) + sc->tulip_dot3stats.dot3StatsExcessiveCollisions++; + if (d_status & TULIP_DSTS_TxLATECOLL) + sc->tulip_dot3stats.dot3StatsLateCollisions++; + if (d_status & (TULIP_DSTS_TxNOCARR|TULIP_DSTS_TxCARRLOSS)) + sc->tulip_dot3stats.dot3StatsCarrierSenseErrors++; + if (d_status & (TULIP_DSTS_TxUNDERFLOW|TULIP_DSTS_TxBABBLE)) + sc->tulip_dot3stats.dot3StatsInternalMacTransmitErrors++; + } else { + u_int32_t collisions = + (d_status & TULIP_DSTS_TxCOLLMASK) + >> TULIP_DSTS_V_TxCOLLCNT; + sc->tulip_if.if_collisions += collisions; + if (collisions == 1) + sc->tulip_dot3stats.dot3StatsSingleCollisionFrames++; + else if (collisions > 1) + sc->tulip_dot3stats.dot3StatsMultipleCollisionFrames++; + else if (d_status & TULIP_DSTS_TxDEFERRED) + sc->tulip_dot3stats.dot3StatsDeferredTransmissions++; + /* + * SQE is only valid for 10baseT/BNC/AUI when not + * running in full-duplex. In order to speed up the + * test, the corresponding bit in tulip_flags needs to + * set as well to get us to count SQE Test Errors. + */ + if (d_status & TULIP_DSTS_TxNOHRTBT & sc->tulip_flags) + sc->tulip_dot3stats.dot3StatsSQETestErrors++; + } } } } if (++ri->ri_nextin == ri->ri_last) ri->ri_nextin = ri->ri_first; + ri->ri_free++; - sc->tulip_if.if_flags &= ~IFF_OACTIVE; + descs++; + if ((sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0) + sc->tulip_if.if_flags &= ~IFF_OACTIVE; } + /* + * If nothing left to transmit, disable the timer. + * Else if progress, reset the timer back to 2 ticks. + */ + if (ri->ri_free == ri->ri_max || (sc->tulip_flags & TULIP_TXPROBE_ACTIVE)) + sc->tulip_txtimer = 0; + else if (xmits > 0) + sc->tulip_txtimer = TULIP_TXTIMER; sc->tulip_if.if_opackets += xmits; - return xmits; + return descs; +} + + +static void +tulip_print_abnormal_interrupt( + tulip_softc_t * const sc, + u_int32_t csr) +{ + const char * const *msgp = tulip_status_bits; + const char *sep; + u_int32_t mask; + const char thrsh[] = "72|128\0\0\096|256\0\0\0128|512\0\0160|1024\0"; + + csr &= (1 << (sizeof(tulip_status_bits)/sizeof(tulip_status_bits[0]))) - 1; + printf(TULIP_PRINTF_FMT ": abnormal interrupt:", TULIP_PRINTF_ARGS); + for (sep = " ", mask = 1; mask >= csr; mask <<= 1, msgp++) { + if ((csr & mask) && *msgp != NULL) { + printf("%s%s", sep, *msgp); + if (mask == TULIP_STS_TXUNDERFLOW && (sc->tulip_flags & TULIP_NEWTXTHRESH)) { + sc->tulip_flags &= ~TULIP_NEWTXTHRESH; + if (sc->tulip_cmdmode & TULIP_CMD_STOREFWD) { + printf(" (switching to store-and-forward mode)"); + } else { + printf(" (raising TX threshold to %s)", + &thrsh[9 * ((sc->tulip_cmdmode & TULIP_CMD_THRESHOLDCTL) >> 14)]); + } + } + sep = ", "; + } + } + printf("\n"); } - + +static void +tulip_intr_handler( + tulip_softc_t * const sc, + int *progress_p) +{ + u_int32_t csr; + + while ((csr = TULIP_CSR_READ(sc, csr_status)) & sc->tulip_intrmask) { + *progress_p = 1; + TULIP_CSR_WRITE(sc, csr_status, csr); + + if (csr & TULIP_STS_SYSERROR) { + sc->tulip_last_system_error = (csr & TULIP_STS_ERRORMASK) >> TULIP_STS_ERR_SHIFT; + if (sc->tulip_flags & TULIP_NOMESSAGES) { + sc->tulip_flags |= TULIP_SYSTEMERROR; + } else { + printf(TULIP_PRINTF_FMT ": system error: %s\n", + TULIP_PRINTF_ARGS, + tulip_system_errors[sc->tulip_last_system_error]); + } + sc->tulip_flags |= TULIP_NEEDRESET; + sc->tulip_system_errors++; + break; + } + if (csr & (TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL)) { +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_link_intrs++; +#endif + if (sc->tulip_boardsw->bd_media_poll != NULL) { + (*sc->tulip_boardsw->bd_media_poll)(sc, csr & TULIP_STS_LINKFAIL + ? TULIP_MEDIAPOLL_LINKFAIL + : TULIP_MEDIAPOLL_LINKPASS); + csr &= ~TULIP_STS_ABNRMLINTR; + } + tulip_media_print(sc); + } + if (csr & (TULIP_STS_RXINTR|TULIP_STS_RXNOBUF)) { + u_int32_t misses = TULIP_CSR_READ(sc, csr_missed_frames); + if (csr & TULIP_STS_RXNOBUF) + sc->tulip_dot3stats.dot3StatsMissedFrames += misses & 0xFFFF; + /* + * Pass 2.[012] of the 21140A-A[CDE] may hang and/or corrupt data + * on receive overflows. + */ + if ((misses & 0x0FFE0000) && (sc->tulip_features & TULIP_HAVE_RXBADOVRFLW)) { + sc->tulip_dot3stats.dot3StatsInternalMacReceiveErrors++; + /* + * Stop the receiver process and spin until it's stopped. + * Tell rx_intr to drop the packets it dequeues. + */ + TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode & ~TULIP_CMD_RXRUN); + while ((TULIP_CSR_READ(sc, csr_status) & TULIP_STS_RXSTOPPED) == 0) + ; + TULIP_CSR_WRITE(sc, csr_status, TULIP_STS_RXSTOPPED); + sc->tulip_flags |= TULIP_RXIGNORE; + } + tulip_rx_intr(sc); + if (sc->tulip_flags & TULIP_RXIGNORE) { + /* + * Restart the receiver. + */ + sc->tulip_flags &= ~TULIP_RXIGNORE; + TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode); + } + } + if (csr & TULIP_STS_ABNRMLINTR) { + u_int32_t tmp = csr & sc->tulip_intrmask + & ~(TULIP_STS_NORMALINTR|TULIP_STS_ABNRMLINTR); + if (csr & TULIP_STS_TXUNDERFLOW) { + if ((sc->tulip_cmdmode & TULIP_CMD_THRESHOLDCTL) != TULIP_CMD_THRSHLD160) { + sc->tulip_cmdmode += TULIP_CMD_THRSHLD96; + sc->tulip_flags |= TULIP_NEWTXTHRESH; + } else if (sc->tulip_features & TULIP_HAVE_STOREFWD) { + sc->tulip_cmdmode |= TULIP_CMD_STOREFWD; + sc->tulip_flags |= TULIP_NEWTXTHRESH; + } + } + if (sc->tulip_flags & TULIP_NOMESSAGES) { + sc->tulip_statusbits |= tmp; + } else { + tulip_print_abnormal_interrupt(sc, tmp); + sc->tulip_flags |= TULIP_NOMESSAGES; + } + TULIP_CSR_WRITE(sc, csr_command, sc->tulip_cmdmode); + } + if (sc->tulip_txinfo.ri_free < sc->tulip_txinfo.ri_max) { + tulip_tx_intr(sc); + if ((sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0) + tulip_ifstart(&sc->tulip_if); + } + } + if (sc->tulip_flags & TULIP_NEEDRESET) { + tulip_reset(sc); + tulip_init(sc); + } +} + +#if defined(TULIP_USE_SOFTINTR) +/* + * This is a experimental idea to alleviate problems due to interrupt + * livelock. What is interrupt livelock? It's when you spend all your + * time servicing device interrupts and never drop below device ipl + * to do "useful" work. + * + * So what we do here is see if the device needs service and if so, + * disable interrupts (dismiss the interrupt), place it in a list of devices + * needing service, and issue a network software interrupt. + * + * When our network software interrupt routine gets called, we simply + * walk done the list of devices that we have created and deal with them + * at splnet/splsoftnet. + * + */ +static void +tulip_hardintr_handler( + tulip_softc_t * const sc, + int *progress_p) +{ + if (TULIP_CSR_READ(sc, csr_status) & (TULIP_STS_NORMALINTR|TULIP_STS_ABNRMLINTR) == 0) + return; + *progress_p = 1; + /* + * disable interrupts + */ + TULIP_CSR_WRITE(sc, csr_intr, 0); + /* + * mark it as needing a software interrupt + */ + tulip_softintr_mask |= (1U << sc->tulip_unit); +} + +static void +tulip_softintr( + void) +{ + u_int32_t softintr_mask, mask; + int progress = 0; + int unit; + tulip_spl_t s; + + /* + * Copy mask to local copy and reset global one to 0. + */ + s = TULIP_RAISESPL(); + softintr_mask = tulip_softintr_mask; + tulip_softintr_mask = 0; + TULIP_RESTORESPL(s); + + /* + * Optimize for the single unit case. + */ + if (tulip_softintr_max_unit == 0) { + if (softintr_mask & 1) { + tulip_softc_t * const sc = TULIP_UNIT_TO_SOFTC(0); + /* + * Handle the "interrupt" and then reenable interrupts + */ + softintr_mask = 0; + tulip_intr_handler(sc, &progress); + TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask); + } + return; + } + + /* + * Handle all "queued" interrupts in a round robin fashion. + * This is done so as not to favor a particular interface. + */ + unit = tulip_softintr_last_unit; + mask = (1U << unit); + while (softintr_mask != 0) { + if (tulip_softintr_max_unit == unit) { + unit = 0; mask = 1; + } else { + unit += 1; mask <<= 1; + } + if (softintr_mask & mask) { + tulip_softc_t * const sc = TULIP_UNIT_TO_SOFTC(unit); + /* + * Handle the "interrupt" and then reenable interrupts + */ + softintr_mask ^= mask; + tulip_intr_handler(sc, &progress); + TULIP_CSR_WRITE(sc, csr_intr, sc->tulip_intrmask); + } + } + + /* + * Save where we ending up. + */ + tulip_softintr_last_unit = unit; +} +#endif /* TULIP_USE_SOFTINTR */ + +static tulip_intrfunc_t +tulip_intr_shared( + void *arg) +{ + tulip_softc_t * sc; + int progress = 0; + + for (sc = (tulip_softc_t *) arg; sc != NULL; sc = sc->tulip_slaves) { +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_intrs++; +#endif +#if defined(TULIP_USE_SOFTINTR) + tulip_hardintr_handler(sc, &progress); +#else + tulip_intr_handler(sc, &progress); +#endif + } +#if defined(TULIP_USE_SOFTINTR) + if (progress) + schednetisr(NETISR_DE); +#endif +#if !defined(TULIP_VOID_INTRFUNC) + return progress; +#endif +} + +static tulip_intrfunc_t +tulip_intr_normal( + void *arg) +{ + tulip_softc_t * sc = (tulip_softc_t *) arg; + int progress = 0; + +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_intrs++; +#endif +#if defined(TULIP_USE_SOFTINTR) + tulip_hardintr_handler(sc, &progress); + if (progress) + schednetisr(NETISR_DE); +#else + tulip_intr_handler(sc, &progress); +#endif +#if !defined(TULIP_VOID_INTRFUNC) + return progress; +#endif +} + + +/* + * This routine is entered at splnet() (splsoftnet() on NetBSD) + * and thereby imposes no problems when TULIP_USE_SOFTINTR is + * defined or not. + */ +static int +tulip_ifioctl( + struct ifnet * const ifp, + ioctl_cmd_t cmd, + caddr_t data) +{ + tulip_softc_t * const sc = TULIP_IFP_TO_SOFTC(ifp); + struct ifaddr *ifa = (struct ifaddr *)data; + struct ifreq *ifr = (struct ifreq *) data; + tulip_spl_t s; + int error = 0; + +#if defined(TULIP_USE_SOFTINTR) + s = TULIP_RAISESOFTSPL(); +#else + s = TULIP_RAISESPL(); +#endif + switch (cmd) { + case SIOCSIFADDR: { + ifp->if_flags |= IFF_UP; + switch(ifa->ifa_addr->sa_family) { +#ifdef INET + case AF_INET: { + tulip_init(sc); + TULIP_ARP_IFINIT(sc, ifa); + break; + } +#endif /* INET */ + +#ifdef NS + /* + * This magic copied from if_is.c; I don't use XNS, + * so I have no way of telling if this actually + * works or not. + */ + case AF_NS: { + struct ns_addr *ina = &(IA_SNS(ifa)->sns_addr); + if (ns_nullhost(*ina)) { + ina->x_host = *(union ns_host *)(sc->tulip_enaddr); + } else { + ifp->if_flags &= ~IFF_RUNNING; + bcopy((caddr_t)ina->x_host.c_host, + (caddr_t)sc->tulip_enaddr, + sizeof(sc->tulip_enaddr)); + } + tulip_init(sc); + break; + } +#endif /* NS */ + + default: { + tulip_init(sc); + break; + } + } + break; + } + case SIOCGIFADDR: { + bcopy((caddr_t) sc->tulip_enaddr, + (caddr_t) ((struct sockaddr *)&ifr->ifr_data)->sa_data, + 6); + break; + } + + case SIOCSIFFLAGS: { +#if !defined(IFM_ETHER) + int flags = 0; + if (ifp->if_flags & IFF_LINK0) flags |= 1; + if (ifp->if_flags & IFF_LINK1) flags |= 2; + if (ifp->if_flags & IFF_LINK2) flags |= 4; + if (flags == 7) { + ifp->if_flags &= ~(IFF_LINK0|IFF_LINK1|IFF_LINK2); + sc->tulip_media = TULIP_MEDIA_UNKNOWN; + sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + sc->tulip_flags &= ~(TULIP_WANTRXACT|TULIP_LINKUP|TULIP_NOAUTOSENSE); + tulip_reset(sc); + } else if (flags) { + tulip_media_t media; + for (media = TULIP_MEDIA_UNKNOWN; media < TULIP_MEDIA_MAX; media++) { + if (sc->tulip_mediums[media] != NULL && --flags == 0) { + sc->tulip_flags |= TULIP_NOAUTOSENSE; + if (sc->tulip_media != media || (sc->tulip_flags & TULIP_DIDNWAY)) { + sc->tulip_flags &= ~TULIP_DIDNWAY; + tulip_linkup(sc, media); + } + break; + } + } + if (flags) + printf(TULIP_PRINTF_FMT ": ignored invalid media request\n"); + } +#endif + tulip_init(sc); + break; + } + +#if defined(SIOCSIFMEDIA) + case SIOCSIFMEDIA: + case SIOCGIFMEDIA: { + error = ifmedia_ioctl(ifp, ifr, &sc->tulip_ifmedia, cmd); + break; + } +#endif + + case SIOCADDMULTI: + case SIOCDELMULTI: { + /* + * Update multicast listeners + */ + if (cmd == SIOCADDMULTI) + error = ether_addmulti(ifr, TULIP_ETHERCOM(sc)); + else + error = ether_delmulti(ifr, TULIP_ETHERCOM(sc)); + + if (error == ENETRESET) { + tulip_addr_filter(sc); /* reset multicast filtering */ + tulip_init(sc); + error = 0; + } + break; + } +#if defined(SIOCSIFMTU) +#if !defined(ifr_mtu) +#define ifr_mtu ifr_metric +#endif + case SIOCSIFMTU: + /* + * Set the interface MTU. + */ + if (ifr->ifr_mtu > ETHERMTU +#ifdef BIG_PACKET + && sc->tulip_chipid != TULIP_21140 + && sc->tulip_chipid != TULIP_21140A + && sc->tulip_chipid != TULIP_21041 +#endif + ) { + error = EINVAL; + break; + } + ifp->if_mtu = ifr->ifr_mtu; +#ifdef BIG_PACKET + tulip_reset(sc); + tulip_init(sc); +#endif + break; +#endif /* SIOCSIFMTU */ + +#ifdef SIOCGADDRROM + case SIOCGADDRROM: { + error = copyout(sc->tulip_rombuf, ifr->ifr_data, sizeof(sc->tulip_rombuf)); + break; + } +#endif +#ifdef SIOCGCHIPID + case SIOCGCHIPID: { + ifr->ifr_metric = (int) sc->tulip_chipid; + break; + } +#endif + default: { + error = EINVAL; + break; + } + } + + TULIP_RESTORESPL(s); + return error; +} + + +/* + * This routine gets called at device spl (from ether_output). This might + * pose a problem for TULIP_USE_SOFTINTR if ether_output is called at + * device spl from another driver. + */ + static ifnet_ret_t -tulip_start( +tulip_ifstart( struct ifnet * const ifp) { tulip_softc_t * const sc = TULIP_IFP_TO_SOFTC(ifp); struct ifqueue * const ifq = &ifp->if_snd; tulip_ringinfo_t * const ri = &sc->tulip_txinfo; - struct mbuf *m, *m0, *next_m0; if ((ifp->if_flags & IFF_RUNNING) == 0 && (sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0) @@ -1288,9 +4042,18 @@ tulip_start( for (;;) { tulip_desc_t *eop, *nextout; int segcnt, free, recopy; - tulip_uint32_t d_status; - - if (sc->tulip_flags & TULIP_WANTSETUP) { + u_int32_t d_status; + struct mbuf *m, *m0, *next_m0; + + if ((sc->tulip_flags & (TULIP_WANTSETUP|TULIP_TXPROBE_ACTIVE)) == TULIP_WANTSETUP) { +#if defined(TULIP_DEBUG) + if ((sc->tulip_cmdmode & TULIP_CMD_TXRUN) == 0) { + printf(TULIP_PRINTF_FMT ": ifstart: tx not running\n", + TULIP_PRINTF_ARGS); + ifp->if_flags |= IFF_OACTIVE; + return; + } +#endif if ((sc->tulip_flags & TULIP_DOINGSETUP) || ri->ri_free == 1) { ifp->if_flags |= IFF_OACTIVE; return; @@ -1300,17 +4063,18 @@ tulip_start( sc->tulip_flags &= ~TULIP_WANTSETUP; sc->tulip_flags |= TULIP_DOINGSETUP; ri->ri_free--; - ri->ri_nextout->d_flag &= TULIP_DFLAG_ENDRING|TULIP_DFLAG_CHAIN; - ri->ri_nextout->d_flag |= TULIP_DFLAG_TxFIRSTSEG|TULIP_DFLAG_TxLASTSEG + nextout = ri->ri_nextout; + nextout->d_flag &= TULIP_DFLAG_ENDRING|TULIP_DFLAG_CHAIN; + nextout->d_flag |= TULIP_DFLAG_TxFIRSTSEG|TULIP_DFLAG_TxLASTSEG |TULIP_DFLAG_TxSETUPPKT|TULIP_DFLAG_TxWANTINTR; - if (sc->tulip_flags & TULIP_WANTHASH) - ri->ri_nextout->d_flag |= TULIP_DFLAG_TxHASHFILT; - ri->ri_nextout->d_length1 = sizeof(sc->tulip_setupbuf); - ri->ri_nextout->d_addr1 = vtophys(sc->tulip_setupbuf); - ri->ri_nextout->d_length2 = 0; - ri->ri_nextout->d_addr2 = 0; - ri->ri_nextout->d_status = TULIP_DSTS_OWNER; - TULIP_WRITE_CSR(sc, csr_txpoll, 1); + if (sc->tulip_flags & TULIP_WANTHASHPERFECT) + nextout->d_flag |= TULIP_DFLAG_TxHASHFILT; + else if (sc->tulip_flags & TULIP_WANTHASHONLY) + nextout->d_flag |= TULIP_DFLAG_TxHASHFILT|TULIP_DFLAG_TxINVRSFILT; + nextout->d_length1 = sizeof(sc->tulip_setupbuf); + nextout->d_addr1 = TULIP_KVATOPHYS(sc, sc->tulip_setupbuf); + nextout->d_length2 = 0; + nextout->d_addr2 = 0; /* * Advance the ring for the next transmit packet. */ @@ -1322,11 +4086,24 @@ tulip_start( * ring. */ ri->ri_nextout->d_status = 0; + nextout->d_status = TULIP_DSTS_OWNER; + TULIP_CSR_WRITE(sc, csr_txpoll, 1); } IF_DEQUEUE(ifq, m); if (m == NULL) - break; + return; + +#if defined(TULIP_DEBUG) + if ((sc->tulip_cmdmode & TULIP_CMD_TXRUN) == 0) { + printf(TULIP_PRINTF_FMT ": ifstart%s: tx not running\n", + TULIP_PRINTF_ARGS, + (sc->tulip_flags & TULIP_TXPROBE_ACTIVE) ? "(probe)" : ""); + ifp->if_flags |= IFF_OACTIVE; + IF_PREPEND(ifq, m); + return; + } +#endif /* * Now we try to fill in our transmit descriptors. This is @@ -1359,7 +4136,11 @@ tulip_start( next_m0 = m0->m_next; while (len > 0) { unsigned slen = min(len, clsize); - +#ifdef BIG_PACKET + int partial = 0; + if (slen >= 2048) + slen = 2040, partial = 1; +#endif segcnt++; if (segcnt > TULIP_MAX_TXSEG) { recopy = 1; @@ -1369,30 +4150,42 @@ tulip_start( if (segcnt & 1) { if (--free == 0) { /* - * There's no more room but since nothing - * has been committed at this point, just - * show output is active, put back the - * mbuf and return. + * See if there's any unclaimed space in the + * transmit ring. */ - ifp->if_flags |= IFF_OACTIVE; - IF_PREPEND(ifq, m); - return; + if ((free += tulip_tx_intr(sc)) == 0) { + /* + * There's no more room but since nothing + * has been committed at this point, just + * show output is active, put back the + * mbuf and return. + */ + IF_PREPEND(ifq, m); + ifp->if_flags |= IFF_OACTIVE; + return; + } } eop = nextout; if (++nextout == ri->ri_last) nextout = ri->ri_first; eop->d_flag &= TULIP_DFLAG_ENDRING|TULIP_DFLAG_CHAIN; eop->d_status = d_status; - eop->d_addr1 = vtophys(addr); eop->d_length1 = slen; + eop->d_addr1 = TULIP_KVATOPHYS(sc, addr); + eop->d_length1 = slen; } else { /* * Fill in second half of descriptor */ - eop->d_addr2 = vtophys(addr); eop->d_length2 = slen; + eop->d_addr2 = TULIP_KVATOPHYS(sc, addr); + eop->d_length2 = slen; } d_status = TULIP_DSTS_OWNER; len -= slen; addr += slen; +#ifdef BIG_PACKET + if (partial) + continue; +#endif clsize = CLBYTES; } } while ((m0 = next_m0) != NULL); @@ -1403,6 +4196,7 @@ tulip_start( * recopy it into one mbuf and then try again. */ if (recopy) { +#if MCLBYTES >= ETHERMTU + 18 MGETHDR(m0, M_DONTWAIT, MT_DATA); if (m0 != NULL) { if (m->m_pkthdr.len > MHLEN) { @@ -1415,8 +4209,43 @@ tulip_start( } m_copydata(m, 0, m->m_pkthdr.len, mtod(m0, caddr_t)); m0->m_pkthdr.len = m0->m_len = m->m_pkthdr.len; - IF_PREPEND(ifq, m0); } +#else + int mlen = MHLEN; + int len = m->m_pkthdr.len; + struct mbuf **mp = &m0; + + while (len > 0) { + if (mlen == MHLEN) { + MGETHDR(*mp, M_DONTWAIT, MT_DATA); + } else { + MGET(*mp, M_DONTWAIT, MT_DATA); + } + if (*mp == NULL) { + m_freem(m0); + m0 = NULL; + break; + } + if (len > MLEN) { + MCLGET(*mp, M_DONTWAIT); + if (((*mp)->m_flags & M_EXT) == 0) { + m_freem(m0); + m0 = NULL; + break; + } + (*mp)->m_len = len <= MCLBYTES ? len : MCLBYTES; + } else { + (*mp)->m_len = len <= mlen ? len : mlen; + } + m_copydata(m, m->m_pkthdr.len - len, + (*mp)->m_len, mtod((*mp), caddr_t)); + len -= (*mp)->m_len; + mp = &(*mp)->m_next; + mlen = MLEN; + } +#endif + if (m0 != NULL) + IF_PREPEND(ifq, m0); m_freem(m); continue; } @@ -1427,7 +4256,7 @@ tulip_start( */ #if NBPFILTER > 0 if (sc->tulip_bpf != NULL) - bpf_mtap(sc->tulip_bpf, m); + TULIP_BPF_MTAP(sc, m); #endif IF_ENQUEUE(&sc->tulip_txq, m); @@ -1449,10 +4278,24 @@ tulip_start( /* * Mark the last and first segments, indicate we want a transmit - * complete interrupt, give the descriptors to the TULIP, and tell - * it to transmit! + * complete interrupt if there isn't one queued, give the + * descriptors to the TULIP, and tell it to transmit! */ - eop->d_flag |= TULIP_DFLAG_TxLASTSEG|TULIP_DFLAG_TxWANTINTR; + if (sc->tulip_flags & TULIP_TXINTPENDING) { + eop->d_flag |= TULIP_DFLAG_TxLASTSEG; +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_txpipe++; +#endif + } else { + eop->d_flag |= TULIP_DFLAG_TxLASTSEG|TULIP_DFLAG_TxWANTINTR; + if ((sc->tulip_flags & TULIP_TXPROBE_ACTIVE) == 0) { + sc->tulip_flags |= TULIP_TXINTPENDING; +#if defined(TULIP_DEBUG) + sc->tulip_dbg.dbg_txpipestats[sc->tulip_dbg.dbg_txpipe]++; + sc->tulip_dbg.dbg_txpipe = 0; +#endif + } + } /* * Note that ri->ri_nextout is still the start of the packet @@ -1468,561 +4311,97 @@ tulip_start( ri->ri_nextout = nextout; ri->ri_free = free; - TULIP_WRITE_CSR(sc, csr_txpoll, 1); - } - if (m != NULL) { - ifp->if_flags |= IFF_OACTIVE; - IF_PREPEND(ifq, m); + TULIP_CSR_WRITE(sc, csr_txpoll, 1); + + if (sc->tulip_flags & TULIP_TXPROBE_ACTIVE) { + ifp->if_flags |= IFF_OACTIVE; + return; + } + if (sc->tulip_txtimer == 0) + sc->tulip_txtimer = TULIP_TXTIMER; } } - -static int -tulip_intr( - void *arg) -{ - tulip_softc_t * sc = (tulip_softc_t *) arg; - tulip_uint32_t csr; -#if defined(__bsdi__) - int progress = 1; -#else - int progress = 0; -#endif - do { - while ((csr = TULIP_READ_CSR(sc, csr_status)) & (TULIP_STS_NORMALINTR|TULIP_STS_ABNRMLINTR)) { - progress = 1; - TULIP_WRITE_CSR(sc, csr_status, csr & sc->tulip_intrmask); - if (csr & TULIP_STS_SYSERROR) { - if ((csr & TULIP_STS_ERRORMASK) == TULIP_STS_ERR_PARITY) { - tulip_reset(sc); - tulip_init(sc); - break; - } - } - if (csr & (TULIP_STS_GPTIMEOUT|TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL)) { - if (sc->tulip_chipid == TULIP_DC21041) { - (*sc->tulip_boardsw->bd_media_select)(sc); - if (csr & (TULIP_STS_LINKPASS|TULIP_STS_LINKFAIL)) - csr &= ~TULIP_STS_ABNRMLINTR; - } - } - if (csr & TULIP_STS_ABNRMLINTR) { - printf("%s: abnormal interrupt: 0x%05x [0x%05x]\n", - sc->tulip_xname, csr, csr & sc->tulip_intrmask); - TULIP_WRITE_CSR(sc, csr_command, sc->tulip_cmdmode); - } - if (csr & TULIP_STS_RXINTR) - tulip_rx_intr(sc); - if (sc->tulip_txinfo.ri_free < sc->tulip_txinfo.ri_max) { - tulip_tx_intr(sc); - tulip_start(&sc->tulip_if); - } - } - } while ((sc = sc->tulip_slaves) != NULL); - return progress; -} - /* - * + * Even though this routine runs at device spl, it does not break + * our use of splnet (splsoftnet under NetBSD) for the majority + * of this driver (if TULIP_USE_SOFTINTR defined) since + * if_watcbog is called from if_watchdog which is called from + * splsoftclock which is below spl[soft]net. */ - static void -tulip_delay_300ns( - tulip_softc_t * const sc) +tulip_ifwatchdog( + struct ifnet *ifp) { - TULIP_READ_CSR(sc, csr_busmode); TULIP_READ_CSR(sc, csr_busmode); - TULIP_READ_CSR(sc, csr_busmode); TULIP_READ_CSR(sc, csr_busmode); - - TULIP_READ_CSR(sc, csr_busmode); TULIP_READ_CSR(sc, csr_busmode); - TULIP_READ_CSR(sc, csr_busmode); TULIP_READ_CSR(sc, csr_busmode); - - TULIP_READ_CSR(sc, csr_busmode); TULIP_READ_CSR(sc, csr_busmode); - TULIP_READ_CSR(sc, csr_busmode); TULIP_READ_CSR(sc, csr_busmode); -} - -#define EMIT do { TULIP_WRITE_CSR(sc, csr_srom_mii, csr); tulip_delay_300ns(sc); } while (0) + tulip_softc_t * const sc = TULIP_IFP_TO_SOFTC(ifp); -static void -tulip_idle_srom( - tulip_softc_t * const sc) -{ - unsigned bit, csr; - - csr = SROMSEL | SROMRD; EMIT; - csr ^= SROMCS; EMIT; - csr ^= SROMCLKON; EMIT; +#if defined(TULIP_DEBUG) + u_int32_t rxintrs = sc->tulip_dbg.dbg_rxintrs - sc->tulip_dbg.dbg_last_rxintrs; + if (rxintrs > sc->tulip_dbg.dbg_high_rxintrs_hz) + sc->tulip_dbg.dbg_high_rxintrs_hz = rxintrs; + sc->tulip_dbg.dbg_last_rxintrs = sc->tulip_dbg.dbg_rxintrs; +#endif /* TULIP_DEBUG */ + sc->tulip_if.if_timer = 1; /* - * Write 25 cycles of 0 which will force the SROM to be idle. + * These should be rare so do a bulk test up front so we can just skip + * them if needed. */ - for (bit = 3 + SROM_BITWIDTH + 16; bit > 0; bit--) { - csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */ - csr ^= SROMCLKON; EMIT; /* clock high; data valid */ - } - csr ^= SROMCLKOFF; EMIT; - csr ^= SROMCS; EMIT; EMIT; - csr = 0; EMIT; -} - - -static void -tulip_read_srom( - tulip_softc_t * const sc) -{ - int idx; - const unsigned bitwidth = SROM_BITWIDTH; - const unsigned cmdmask = (SROMCMD_RD << bitwidth); - const unsigned msb = 1 << (bitwidth + 3 - 1); - unsigned lastidx = (1 << bitwidth) - 1; - - tulip_idle_srom(sc); - - for (idx = 0; idx <= lastidx; idx++) { - unsigned lastbit, data, bits, bit, csr; - csr = SROMSEL | SROMRD; EMIT; - csr ^= SROMCSON; EMIT; - csr ^= SROMCLKON; EMIT; - - lastbit = 0; - for (bits = idx|cmdmask, bit = bitwidth + 3; bit > 0; bit--, bits <<= 1) { - const unsigned thisbit = bits & msb; - csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */ - if (thisbit != lastbit) { - csr ^= SROMDOUT; EMIT; /* clock low; invert data */ - } - csr ^= SROMCLKON; EMIT; /* clock high; data valid */ - lastbit = thisbit; - } - csr ^= SROMCLKOFF; EMIT; - - for (data = 0, bits = 0; bits < 16; bits++) { - data <<= 1; - csr ^= SROMCLKON; EMIT; /* clock high; data valid */ - data |= TULIP_READ_CSR(sc, csr_srom_mii) & SROMDIN ? 1 : 0; - csr ^= SROMCLKOFF; EMIT; /* clock low; data not valid */ - } - sc->tulip_rombuf[idx*2] = data & 0xFF; - sc->tulip_rombuf[idx*2+1] = data >> 8; - csr = SROMSEL | SROMRD; EMIT; - csr = 0; EMIT; - } -} - -#define tulip_mchash(mca) (tulip_crc32(mca, 6) & 0x1FF) -#define tulip_srom_crcok(databuf) ( \ - ((tulip_crc32(databuf, 126) & 0xFFFF) ^ 0xFFFF)== \ - ((databuf)[126] | ((databuf)[127] << 8))) - -static unsigned -tulip_crc32( - const unsigned char *databuf, - size_t datalen) -{ - u_int idx, bit, data, crc = 0xFFFFFFFFUL; - - for (idx = 0; idx < datalen; idx++) - for (data = *databuf++, bit = 0; bit < 8; bit++, data >>= 1) - crc = (crc >> 1) ^ (((crc ^ data) & 1) ? TULIP_CRC32_POLY : 0); - return crc; -} - - -/* - * This deals with the vagaries of the address roms and the - * brain-deadness that various vendors commit in using them. - */ -static int -tulip_read_macaddr( - tulip_softc_t *sc) -{ - int cksum, rom_cksum, idx; - tulip_uint32_t csr; - unsigned char tmpbuf[8]; - static const u_char testpat[] = { 0xFF, 0, 0x55, 0xAA, 0xFF, 0, 0x55, 0xAA }; - - if (sc->tulip_chipid == TULIP_DC21040) { - TULIP_WRITE_CSR(sc, csr_enetrom, 1); - for (idx = 0; idx < 32; idx++) { - int cnt = 0; - while (((csr = TULIP_READ_CSR(sc, csr_enetrom)) & 0x80000000L) && cnt < 10000) - cnt++; - sc->tulip_rombuf[idx] = csr & 0xFF; - } - sc->tulip_boardsw = &tulip_dc21040_boardsw; -#if defined(TULIP_EISA) - } else if (sc->tulip_chipid == TULIP_DE425) { - int cnt; - for (idx = 0, cnt = 0; idx < sizeof(testpat) && cnt < 32; cnt++) { - tmpbuf[idx] = TULIP_READ_CSRBYTE(sc, csr_enetrom); - if (tmpbuf[idx] == testpat[idx]) - ++idx; - else - idx = 0; - } - for (idx = 0; idx < 32; idx++) - sc->tulip_rombuf[idx] = TULIP_READ_CSRBYTE(sc, csr_enetrom); - sc->tulip_boardsw = &tulip_dc21040_boardsw; -#endif /* TULIP_EISA */ - } else { - int new_srom_fmt = 0; + if (sc->tulip_flags & (TULIP_SYSTEMERROR|TULIP_RXBUFSLOW|TULIP_NOMESSAGES)) { /* - * Assume all DC21140 board are compatible with the - * DEC 10/100 evaluation board. Not really valid but - * it's the best we can do until every one switches to - * the new SROM format. + * If the number of receive buffer is low, try to refill */ - if (sc->tulip_chipid == TULIP_DC21140) - sc->tulip_boardsw = &tulip_dc21140_eb_boardsw; - /* - * Thankfully all DC21041's act the same. - */ - if (sc->tulip_chipid == TULIP_DC21041) - sc->tulip_boardsw = &tulip_dc21041_boardsw; - tulip_read_srom(sc); - if (tulip_srom_crcok(sc->tulip_rombuf)) { - /* - * SROM CRC is valid therefore it must be in the - * new format. - */ - new_srom_fmt = 1; - } else if (sc->tulip_rombuf[126] == 0xff && sc->tulip_rombuf[127] == 0xFF) { - /* - * No checksum is present. See if the SROM id checks out; - * the first 18 bytes should be 0 followed by a 1 followed - * by the number of adapters (which we don't deal with yet). - */ - for (idx = 0; idx < 18; idx++) { - if (sc->tulip_rombuf[idx] != 0) - break; - } - if (idx == 18 && sc->tulip_rombuf[18] == 1 && sc->tulip_rombuf[19] != 0) - new_srom_fmt = 2; - } - if (new_srom_fmt) { - /* - * New SROM format. Copy out the Ethernet address. - * If it contains a DE500-XA string, then it must be - * a DE500-XA. - */ - bcopy(sc->tulip_rombuf + 20, sc->tulip_hwaddr, 6); - if (bcmp(sc->tulip_rombuf + 29, "DE500-XA", 8) == 0) - sc->tulip_boardsw = &tulip_dc21140_de500_boardsw; - if (bcmp(sc->tulip_rombuf + 29, "DE450", 5) == 0) - sc->tulip_boardsw = &tulip_dc21041_de450_boardsw; - if (sc->tulip_boardsw == NULL) - return -6; - sc->tulip_flags |= TULIP_ROMOK; - return 0; - } - } - + if (sc->tulip_flags & TULIP_RXBUFSLOW) + tulip_rx_intr(sc); - if (bcmp(&sc->tulip_rombuf[0], &sc->tulip_rombuf[16], 8) != 0) { - /* - * Some folks don't use the standard ethernet rom format - * but instead just put the address in the first 6 bytes - * of the rom and let the rest be all 0xffs. (Can we say - * ZNYX???) (well sometimes they put in a checksum so we'll - * start at 8). - */ - for (idx = 8; idx < 32; idx++) { - if (sc->tulip_rombuf[idx] != 0xFF) - return -4; + if (sc->tulip_flags & TULIP_SYSTEMERROR) { + printf(TULIP_PRINTF_FMT ": %d system errors: last was %s\n", + TULIP_PRINTF_ARGS, sc->tulip_system_errors, + tulip_system_errors[sc->tulip_last_system_error]); } - /* - * Make sure the address is not multicast or locally assigned - * that the OUI is not 00-00-00. - */ - if ((sc->tulip_rombuf[0] & 3) != 0) - return -4; - if (sc->tulip_rombuf[0] == 0 && sc->tulip_rombuf[1] == 0 - && sc->tulip_rombuf[2] == 0) - return -4; - bcopy(sc->tulip_rombuf, sc->tulip_hwaddr, 6); - sc->tulip_flags |= TULIP_ROMOK; - if (sc->tulip_hwaddr[0] == TULIP_OUI_ZNYX_0 - && sc->tulip_hwaddr[1] == TULIP_OUI_ZNYX_1 - && sc->tulip_hwaddr[2] == TULIP_OUI_ZNYX_2 - && (sc->tulip_hwaddr[3] & ~3) == 0xF0) { - /* - * Now if the OUI is ZNYX and hwaddr[3] == 0xF0 .. 0xF3 - * then it's a ZX314 Master port. - */ - sc->tulip_boardsw = &tulip_dc21040_zx314_master_boardsw; - } - return 0; - } else { - /* - * A number of makers of multiport boards (ZNYX and Cogent) - * only put on one address ROM on their DC21040 boards. So - * if the ROM is all zeros and this is a DC21040, look at the - * previous configured boards (as long as they are on the same - * PCI bus and the bus number is non-zero) until we find the - * master board with address ROM. We then use its address ROM - * as the base for this board. (we add our relative board - * to the last byte of its address). - */ - if (sc->tulip_chipid == TULIP_DC21040 /* && sc->tulip_bus != 0 XXX */) { - for (idx = 0; idx < 32; idx++) { - if (sc->tulip_rombuf[idx] != 0) - break; - } - if (idx == 32) { - int root_unit; - tulip_softc_t *root_sc = NULL; - for (root_unit = sc->tulip_unit - 1; root_unit >= 0; root_unit--) { - root_sc = TULIP_UNIT_TO_SOFTC(root_unit); - if (root_sc == NULL || (root_sc->tulip_flags & (TULIP_ROMOK|TULIP_SLAVEDROM)) == TULIP_ROMOK) - break; - root_sc = NULL; - } - if (root_sc != NULL - /* && root_sc->tulip_bus == sc->tulip_bus XXX */) { - bcopy(root_sc->tulip_hwaddr, sc->tulip_hwaddr, 6); - sc->tulip_hwaddr[5] += sc->tulip_unit - root_sc->tulip_unit; - sc->tulip_flags |= TULIP_SLAVEDROM; - if (root_sc->tulip_boardsw->bd_type == TULIP_DC21040_ZX314_MASTER) { - sc->tulip_boardsw = &tulip_dc21040_zx314_slave_boardsw; - /* - * Now for a truly disgusting kludge: all 4 DC21040s on - * the ZX314 share the same INTA line so the mapping - * setup by the BIOS on the PCI bridge is worthless. - * Rather than reprogramming the value in the config - * register, we will handle this internally. - */ - sc->tulip_slaves = root_sc->tulip_slaves; - root_sc->tulip_slaves = sc; - } - return 0; - } - } + if (sc->tulip_statusbits) { + tulip_print_abnormal_interrupt(sc, sc->tulip_statusbits); + sc->tulip_statusbits = 0; } - } - - /* - * This is the standard DEC address ROM test. - */ - - if (bcmp(&sc->tulip_rombuf[24], testpat, 8) != 0) - return -3; - - tmpbuf[0] = sc->tulip_rombuf[15]; tmpbuf[1] = sc->tulip_rombuf[14]; - tmpbuf[2] = sc->tulip_rombuf[13]; tmpbuf[3] = sc->tulip_rombuf[12]; - tmpbuf[4] = sc->tulip_rombuf[11]; tmpbuf[5] = sc->tulip_rombuf[10]; - tmpbuf[6] = sc->tulip_rombuf[9]; tmpbuf[7] = sc->tulip_rombuf[8]; - if (bcmp(&sc->tulip_rombuf[0], tmpbuf, 8) != 0) - return -2; - - bcopy(sc->tulip_rombuf, sc->tulip_hwaddr, 6); - - cksum = *(u_short *) &sc->tulip_hwaddr[0]; - cksum *= 2; - if (cksum > 65535) cksum -= 65535; - cksum += *(u_short *) &sc->tulip_hwaddr[2]; - if (cksum > 65535) cksum -= 65535; - cksum *= 2; - if (cksum > 65535) cksum -= 65535; - cksum += *(u_short *) &sc->tulip_hwaddr[4]; - if (cksum >= 65535) cksum -= 65535; - - rom_cksum = *(u_short *) &sc->tulip_rombuf[6]; - - if (cksum != rom_cksum) - return -1; - - /* - * Check for various boards based on OUI. Did I say braindead? - */ - if (sc->tulip_chipid == TULIP_DC21140) { - if (sc->tulip_hwaddr[0] == TULIP_OUI_COGENT_0 - && sc->tulip_hwaddr[1] == TULIP_OUI_COGENT_1 - && sc->tulip_hwaddr[2] == TULIP_OUI_COGENT_2) { - if (sc->tulip_rombuf[32] == TULIP_COGENT_EM100_ID) - sc->tulip_boardsw = &tulip_dc21140_cogent_em100_boardsw; - } - if (sc->tulip_hwaddr[0] == TULIP_OUI_ZNYX_0 - && sc->tulip_hwaddr[1] == TULIP_OUI_ZNYX_1 - && sc->tulip_hwaddr[2] == TULIP_OUI_ZNYX_2) { - /* this at least works for the zx342 from Znyx */ - sc->tulip_boardsw = &tulip_dc21140_znyx_zx34x_boardsw; - } + sc->tulip_flags &= ~(TULIP_NOMESSAGES|TULIP_SYSTEMERROR); } - sc->tulip_flags |= TULIP_ROMOK; - return 0; -} - -static void -tulip_addr_filter( - tulip_softc_t * const sc) -{ - tulip_uint32_t *sp = sc->tulip_setupdata; - struct ether_multistep step; - struct ether_multi *enm; - int i; - - sc->tulip_flags &= ~TULIP_WANTHASH; - sc->tulip_flags |= TULIP_WANTSETUP; - sc->tulip_cmdmode &= ~TULIP_CMD_RXRUN; - sc->tulip_intrmask &= ~TULIP_STS_RXSTOPPED; - if (sc->tulip_ac.ac_multicnt > 14) { - unsigned hash; - /* - * If we have more than 14 multicasts, we have - * go into hash perfect mode (512 bit multicast - * hash and one perfect hardware). - */ - - bzero(sc->tulip_setupdata, sizeof(sc->tulip_setupdata)); - hash = tulip_mchash(etherbroadcastaddr); - sp[hash >> 4] |= 1 << (hash & 0xF); - ETHER_FIRST_MULTI(step, &sc->tulip_ac, enm); - while (enm != NULL) { - hash = tulip_mchash(enm->enm_addrlo); - sp[hash >> 4] |= 1 << (hash & 0xF); - ETHER_NEXT_MULTI(step, enm); - } - sc->tulip_flags |= TULIP_WANTHASH; - sp[39] = ((u_short *) sc->tulip_ac.ac_enaddr)[0]; - sp[40] = ((u_short *) sc->tulip_ac.ac_enaddr)[1]; - sp[41] = ((u_short *) sc->tulip_ac.ac_enaddr)[2]; - } else { - /* - * Else can get perfect filtering for 16 addresses. - */ - i = 0; - ETHER_FIRST_MULTI(step, &sc->tulip_ac, enm); - for (; enm != NULL; i++) { - *sp++ = ((u_short *) enm->enm_addrlo)[0]; - *sp++ = ((u_short *) enm->enm_addrlo)[1]; - *sp++ = ((u_short *) enm->enm_addrlo)[2]; - ETHER_NEXT_MULTI(step, enm); - } - /* - * Add the broadcast address. - */ - i++; - *sp++ = 0xFFFF; - *sp++ = 0xFFFF; - *sp++ = 0xFFFF; - /* - * Pad the rest with our hardware address - */ - for (; i < 16; i++) { - *sp++ = ((u_short *) sc->tulip_ac.ac_enaddr)[0]; - *sp++ = ((u_short *) sc->tulip_ac.ac_enaddr)[1]; - *sp++ = ((u_short *) sc->tulip_ac.ac_enaddr)[2]; + if (sc->tulip_txtimer) + tulip_tx_intr(sc); + if (sc->tulip_txtimer && --sc->tulip_txtimer == 0) { + printf(TULIP_PRINTF_FMT ": transmission timeout\n", TULIP_PRINTF_ARGS); + if (TULIP_DO_AUTOSENSE(sc)) { + sc->tulip_media = TULIP_MEDIA_UNKNOWN; + sc->tulip_probe_state = TULIP_PROBE_INACTIVE; + sc->tulip_flags &= ~(TULIP_WANTRXACT|TULIP_LINKUP); } + tulip_reset(sc); + tulip_init(sc); } } - -static int -tulip_ioctl( - struct ifnet * const ifp, - ioctl_cmd_t cmd, - caddr_t data) +#if defined(__bsdi__) || (defined(__FreeBSD__) && BSD < 199506) +static ifnet_ret_t +tulip_ifwatchdog_wrapper( + int unit) { - tulip_softc_t * const sc = TULIP_IFP_TO_SOFTC(ifp); - struct ifaddr *ifa = (struct ifaddr *)data; - struct ifreq *ifr = (struct ifreq *) data; - int s, error = 0; - - s = splnet(); - - if ((error = ether_ioctl(ifp, &sc->tulip_ac, cmd, data)) > 0) { - splx(s); - return error; - } - - switch (cmd) { - case SIOCSIFADDR: { - ifp->if_flags |= IFF_UP; - switch(ifa->ifa_addr->sa_family) { -#ifdef INET - case AF_INET: { - tulip_init(sc); - arp_ifinit(&sc->tulip_ac, ifa); - break; - } -#endif /* INET */ - - default: { - tulip_init(sc); - break; - } - } - break; - } - - case SIOCSIFFLAGS: { - /* - * Changing the connection forces a reset. - */ - if (sc->tulip_flags & TULIP_ALTPHYS) { - if ((ifp->if_flags & IFF_ALTPHYS) == 0) - tulip_reset(sc); - } else { - if (ifp->if_flags & IFF_ALTPHYS) - tulip_reset(sc); - } - tulip_init(sc); - break; - } + tulip_ifwatchdog(&TULIP_UNIT_TO_SOFTC(unit)->tulip_if); +} +#define tulip_ifwatchdog tulip_ifwatchdog_wrapper +#endif - case SIOCADDMULTI: - case SIOCDELMULTI: { - /* - * Update multicast listeners - */ - if (cmd == SIOCADDMULTI) - error = ether_addmulti(ifr, &sc->tulip_ac); - else - error = ether_delmulti(ifr, &sc->tulip_ac); - if (error == ENETRESET) { - tulip_addr_filter(sc); /* reset multicast filtering */ - tulip_init(sc); - error = 0; - } - break; - } -#if defined(SIOCSIFMTU) -#if !defined(ifr_mtu) -#define ifr_mtu ifr_metric +/* + * All printf's are real as of now! + */ +#ifdef printf +#undef printf #endif - case SIOCSIFMTU: - /* - * Set the interface MTU. - */ - if (ifr->ifr_mtu > ETHERMTU -#ifndef BIG_PACKET - && sc->tulip_chipid != TULIP_DC21140 - && sc->tulip_chipid != TULIP_DC21041 +#if !defined(IFF_NOTRAILERS) +#define IFF_NOTRAILERS 0 #endif - ) { - error = EINVAL; - break; - } - ifp->if_mtu = ifr->ifr_mtu; -#ifdef BIG_PACKET - tulip_reset(sc); - tulip_init(sc); -#endif - break; -#endif /* SIOCSIFMTU */ - default: { - error = EINVAL; - break; - } - } - - splx(s); - return error; -} - static void tulip_attach( tulip_softc_t * const sc) @@ -2030,47 +4409,100 @@ tulip_attach( struct ifnet * const ifp = &sc->tulip_if; ifp->if_flags = IFF_BROADCAST|IFF_SIMPLEX|IFF_NOTRAILERS|IFF_MULTICAST; - ifp->if_ioctl = tulip_ioctl; + ifp->if_ioctl = tulip_ifioctl; + ifp->if_start = tulip_ifstart; + ifp->if_watchdog = tulip_ifwatchdog; + ifp->if_timer = 1; +#if !defined(__bsdi__) || _BSDI_VERSION < 199401 ifp->if_output = ether_output; - ifp->if_start = tulip_start; - -#if defined(__FreeBSD__) - printf("%s", sc->tulip_xname); -#elif defined(__bsdi__) - printf("\n%s", sc->tulip_xname); #endif -#if defined(__NetBSD__) || defined(__OpenBSD__) - printf(": %s%s pass %d.%d\n%s: Ethernet address %s\n", +#if defined(__bsdi__) && _BSDI_VERSION < 199401 + ifp->if_mtu = ETHERMTU; +#endif + +#if defined(__bsdi__) && _BSDI_VERSION >= 199510 + aprint_naive(": DEC Ethernet"); + aprint_normal(": %s%s", sc->tulip_boardid, + tulip_chipdescs[sc->tulip_chipid]); + aprint_verbose(" pass %d.%d", (sc->tulip_revinfo & 0xF0) >> 4, + sc->tulip_revinfo & 0x0F); + printf("\n"); + sc->tulip_pf = aprint_normal; + aprint_normal(TULIP_PRINTF_FMT ": address " TULIP_EADDR_FMT "\n", + TULIP_PRINTF_ARGS, + TULIP_EADDR_ARGS(sc->tulip_enaddr)); #else - printf(": %s%s pass %d.%d Ethernet address %s\n", + printf( +#if defined(__bsdi__) + "\n" #endif - sc->tulip_boardsw->bd_description, + TULIP_PRINTF_FMT ": %s%s pass %d.%d\n", + TULIP_PRINTF_ARGS, + sc->tulip_boardid, tulip_chipdescs[sc->tulip_chipid], (sc->tulip_revinfo & 0xF0) >> 4, - sc->tulip_revinfo & 0x0F, -#if defined(__NetBSD__) || defined(__OpenBSD__) - sc->tulip_dev.dv_xname, + sc->tulip_revinfo & 0x0F); + printf(TULIP_PRINTF_FMT ": address " TULIP_EADDR_FMT "\n", + TULIP_PRINTF_ARGS, + TULIP_EADDR_ARGS(sc->tulip_enaddr)); #endif - ether_sprintf(sc->tulip_hwaddr)); - if ((*sc->tulip_boardsw->bd_media_probe)(sc)) { - ifp->if_flags |= IFF_ALTPHYS; - } else { - sc->tulip_flags |= TULIP_ALTPHYS; +#if defined(__alpha__) + /* + * In case the SRM console told us about a bogus media, + * we need to check to be safe. + */ + if (sc->tulip_mediums[sc->tulip_media] == NULL) + sc->tulip_media = TULIP_MEDIA_UNKNOWN; +#endif + + (*sc->tulip_boardsw->bd_media_probe)(sc); +#if defined(IFM_ETHER) + ifmedia_init(&sc->tulip_ifmedia, 0, + tulip_ifmedia_change, + tulip_ifmedia_status); +#else + { + tulip_media_t media; + int cnt; + printf(TULIP_PRINTF_FMT ": media:", TULIP_PRINTF_ARGS); + for (media = TULIP_MEDIA_UNKNOWN, cnt = 1; cnt < 7 && media < TULIP_MEDIA_MAX; media++) { + if (sc->tulip_mediums[media] != NULL) { + printf(" %d=\"%s\"", cnt, tulip_mediums[media]); + cnt++; + } + } + if (cnt == 1) { + sc->tulip_features |= TULIP_HAVE_NOMEDIA; + printf(" none\n"); + } else { + printf("\n"); + } } +#endif + sc->tulip_flags &= ~TULIP_DEVICEPROBE; +#if defined(IFM_ETHER) + tulip_ifmedia_add(sc); +#endif tulip_reset(sc); +#if defined(__bsdi__) && _BSDI_VERSION >= 199510 + sc->tulip_pf = printf; + TULIP_ETHER_IFATTACH(sc); +#else if_attach(ifp); -#if defined(__NetBSD__) || defined(__OpenBSD__) - ether_ifattach(ifp); +#if defined(__NetBSD__) || defined(__OpenBSD__) || (defined(__FreeBSD__) && BSD >= 199506) + TULIP_ETHER_IFATTACH(sc); #endif +#endif /* __bsdi__ */ #if NBPFILTER > 0 - bpfattach(&sc->tulip_bpf, ifp, DLT_EN10MB, sizeof(struct ether_header)); + TULIP_BPF_ATTACH(sc); #endif } - + + static void tulip_initcsrs( tulip_softc_t * const sc, @@ -2085,41 +4517,20 @@ tulip_initcsrs( sc->tulip_csrs.csr_status = csr_base + 5 * csr_size; sc->tulip_csrs.csr_command = csr_base + 6 * csr_size; sc->tulip_csrs.csr_intr = csr_base + 7 * csr_size; - sc->tulip_csrs.csr_missed_frame = csr_base + 8 * csr_size; - if (sc->tulip_chipid == TULIP_DC21040) { - sc->tulip_csrs.csr_enetrom = csr_base + 9 * csr_size; - sc->tulip_csrs.csr_reserved = csr_base + 10 * csr_size; - sc->tulip_csrs.csr_full_duplex = csr_base + 11 * csr_size; - sc->tulip_csrs.csr_sia_status = csr_base + 12 * csr_size; - sc->tulip_csrs.csr_sia_connectivity = csr_base + 13 * csr_size; - sc->tulip_csrs.csr_sia_tx_rx = csr_base + 14 * csr_size; - sc->tulip_csrs.csr_sia_general = csr_base + 15 * csr_size; + sc->tulip_csrs.csr_missed_frames = csr_base + 8 * csr_size; + sc->tulip_csrs.csr_9 = csr_base + 9 * csr_size; + sc->tulip_csrs.csr_10 = csr_base + 10 * csr_size; + sc->tulip_csrs.csr_11 = csr_base + 11 * csr_size; + sc->tulip_csrs.csr_12 = csr_base + 12 * csr_size; + sc->tulip_csrs.csr_13 = csr_base + 13 * csr_size; + sc->tulip_csrs.csr_14 = csr_base + 14 * csr_size; + sc->tulip_csrs.csr_15 = csr_base + 15 * csr_size; #if defined(TULIP_EISA) - } else if (sc->tulip_chipid == TULIP_DE425) { - sc->tulip_csrs.csr_enetrom = csr_base + DE425_ENETROM_OFFSET; - sc->tulip_csrs.csr_reserved = csr_base + 10 * csr_size; - sc->tulip_csrs.csr_full_duplex = csr_base + 11 * csr_size; - sc->tulip_csrs.csr_sia_status = csr_base + 12 * csr_size; - sc->tulip_csrs.csr_sia_connectivity = csr_base + 13 * csr_size; - sc->tulip_csrs.csr_sia_tx_rx = csr_base + 14 * csr_size; - sc->tulip_csrs.csr_sia_general = csr_base + 15 * csr_size; -#endif /* TULIP_EISA */ - } else if (sc->tulip_chipid == TULIP_DC21140) { - sc->tulip_csrs.csr_srom_mii = csr_base + 9 * csr_size; - sc->tulip_csrs.csr_gp_timer = csr_base + 11 * csr_size; - sc->tulip_csrs.csr_gp = csr_base + 12 * csr_size; - sc->tulip_csrs.csr_watchdog = csr_base + 15 * csr_size; - } else if (sc->tulip_chipid == TULIP_DC21041) { - sc->tulip_csrs.csr_srom_mii = csr_base + 9 * csr_size; - sc->tulip_csrs.csr_bootrom = csr_base + 10 * csr_size; - sc->tulip_csrs.csr_gp_timer = csr_base + 11 * csr_size; - sc->tulip_csrs.csr_sia_status = csr_base + 12 * csr_size; - sc->tulip_csrs.csr_sia_connectivity = csr_base + 13 * csr_size; - sc->tulip_csrs.csr_sia_tx_rx = csr_base + 14 * csr_size; - sc->tulip_csrs.csr_sia_general = csr_base + 15 * csr_size; - } -} - + sc->tulip_csrs.csr_enetrom = csr_base + DE425_ENETROM_OFFSET; +#endif +} + + static void tulip_initring( tulip_softc_t * const sc, @@ -2133,11 +4544,12 @@ tulip_initring( bzero((caddr_t) ri->ri_first, sizeof(ri->ri_first[0]) * ri->ri_max); ri->ri_last[-1].d_flag = TULIP_DFLAG_ENDRING; } - + + /* - * This is the PCI configuration support. Since the DC21040 is available + * This is the PCI configuration support. Since the 21040 is available * on both EISA and PCI boards, one must be careful in how defines the - * DC21040 in the config file. + * 21040 in the config file. */ #define PCI_CFID 0x00 /* Configuration ID */ @@ -2156,22 +4568,25 @@ static const int tulip_eisa_irqs[4] = { IRQ5, IRQ9, IRQ10, IRQ11 }; #if defined(__FreeBSD__) #define TULIP_PCI_ATTACH_ARGS pcici_t config_id, int unit +#define TULIP_SHUTDOWN_ARGS int howto, void * arg + +#if defined(TULIP_DEVCONF) +static void tulip_shutdown(TULIP_SHUTDOWN_ARGS); static int tulip_pci_shutdown( struct kern_devconf * const kdc, int force) { - if (kdc->kdc_unit < NDE) { + if (kdc->kdc_unit < TULIP_MAX_DEVICES) { tulip_softc_t * const sc = TULIP_UNIT_TO_SOFTC(kdc->kdc_unit); - TULIP_WRITE_CSR(sc, csr_busmode, TULIP_BUSMODE_SWRESET); - DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at - 33MHz that comes to two microseconds but wait a - bit longer anyways) */ + if (sc != NULL) + tulip_shutdown(0, sc); } (void) dev_detach(kdc); return 0; } +#endif static char* tulip_pci_probe( @@ -2180,12 +4595,24 @@ tulip_pci_probe( { if (PCI_VENDORID(device_id) != DEC_VENDORID) return NULL; - if (PCI_CHIPID(device_id) == DC21040_CHIPID) - return "Digital DC21040 Ethernet"; - if (PCI_CHIPID(device_id) == DC21041_CHIPID) - return "Digital DC21041 Ethernet"; - if (PCI_CHIPID(device_id) == DC21140_CHIPID) - return "Digital DC21140 Fast Ethernet"; + if (PCI_CHIPID(device_id) == CHIPID_21040) + return "Digital 21040 Ethernet"; + if (PCI_CHIPID(device_id) == CHIPID_21041) + return "Digital 21041 Ethernet"; + if (PCI_CHIPID(device_id) == CHIPID_21140) { + u_int32_t revinfo = pci_conf_read(config_id, PCI_CFRV) & 0xFF; + if (revinfo >= 0x20) + return "Digital 21140A Fast Ethernet"; + else + return "Digital 21140 Fast Ethernet"; + } + if (PCI_CHIPID(device_id) == CHIPID_21142) { + u_int32_t revinfo = pci_conf_read(config_id, PCI_CFRV) & 0xFF; + if (revinfo >= 0x20) + return "Digital 21143 Fast Ethernet"; + else + return "Digital 21142 Fast Ethernet"; + } return NULL; } @@ -2197,25 +4624,18 @@ struct pci_device dedevice = { tulip_pci_probe, tulip_pci_attach, &tulip_pci_count, +#if defined(TULIP_DEVCONF) tulip_pci_shutdown, +#endif }; DATA_SET (pcidevice_set, dedevice); #endif /* __FreeBSD__ */ - + + #if defined(__bsdi__) #define TULIP_PCI_ATTACH_ARGS struct device * const parent, struct device * const self, void * const aux - -static void -tulip_shutdown( - void *arg) -{ - tulip_softc_t * const sc = (tulip_softc_t *) arg; - TULIP_WRITE_CSR(sc, csr_busmode, TULIP_BUSMODE_SWRESET); - DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at - 33MHz that comes to two microseconds but wait a - bit longer anyways) */ -} +#define TULIP_SHUTDOWN_ARGS void *arg static int tulip_pci_match( @@ -2228,7 +4648,8 @@ tulip_pci_match( if (PCI_VENDORID(id) != DEC_VENDORID) return 0; id = PCI_CHIPID(id); - if (id != DC21040_CHIPID && id != DC21041_CHIPID && id != DC21140_CHIPID) + if (id != CHIPID_21040 && id != CHIPID_21041 + && id != CHIPID_21140 && id != CHIPID_21142) return 0; irq = pci_inl(pa, PCI_I_LINE) & 0xFF; if (irq == 0 || irq >= 16) { @@ -2248,8 +4669,10 @@ tulip_probe( unsigned irq, slot; pci_devaddr_t *pa; +#if _BSDI_VERSION >= 199401 switch (ia->ia_bustype) { case BUS_PCI: +#endif pa = pci_scan(tulip_pci_match); if (pa == NULL) return 0; @@ -2280,6 +4703,7 @@ tulip_probe( #endif /* TULIP_IOMAPPED */ ia->ia_aux = (void *) pa; +#if _BSDI_VERSION >= 199401 break; #if defined(TULIP_EISA) @@ -2309,10 +4733,10 @@ tulip_probe( break; } #endif /* TULIP_EISA */ - default: return 0; } +#endif /* PCI bus masters don't use host DMA channels */ ia->ia_drq = DRQNONE; @@ -2326,7 +4750,9 @@ tulip_probe( } if (ia->ia_irq == IRQUNK) ia->ia_irq = irq; +#ifdef IRQSHARE ia->ia_irq |= IRQSHARE; +#endif return 1; } @@ -2340,41 +4766,40 @@ static char *tulip_eisa_ids[] = { #endif struct cfdriver decd = { - 0, "de", tulip_probe, tulip_pci_attach, DV_IFNET, sizeof(tulip_softc_t), + 0, "de", tulip_probe, tulip_pci_attach, +#if _BSDI_VERSION >= 199401 + DV_IFNET, +#endif + sizeof(tulip_softc_t), #if defined(TULIP_EISA) tulip_eisa_ids #endif }; #endif /* __bsdi__ */ - -#if defined(__NetBSD__) || defined(__OpenBSD__) -#define TULIP_PCI_ATTACH_ARGS struct device * const parent, struct device * const self, void * const aux -static void -tulip_pci_shutdown( - void *arg) -{ - tulip_softc_t * const sc = (tulip_softc_t *) arg; - TULIP_WRITE_CSR(sc, csr_busmode, TULIP_BUSMODE_SWRESET); - DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at - 33MHz that comes to two microseconds but wait a - bit longer anyways) */ -} +#if defined(__NetBSD__) || defined(__OpenBSD__) +#define TULIP_PCI_ATTACH_ARGS struct device * const parent, struct device * const self, void * const aux +#define TULIP_SHUTDOWN_ARGS void *arg static int tulip_pci_probe( struct device *parent, +#ifdef __BROKEN_INDIRECT_CONFIG void *match, +#else + struct cfdata *match, +#endif void *aux) { struct pci_attach_args *pa = (struct pci_attach_args *) aux; if (PCI_VENDORID(pa->pa_id) != DEC_VENDORID) return 0; - if (PCI_CHIPID(pa->pa_id) == DC21040_CHIPID - || PCI_CHIPID(pa->pa_id) == DC21041_CHIPID - || PCI_CHIPID(pa->pa_id) == DC21140_CHIPID) + if (PCI_CHIPID(pa->pa_id) == CHIPID_21040 + || PCI_CHIPID(pa->pa_id) == CHIPID_21041 + || PCI_CHIPID(pa->pa_id) == CHIPID_21140 + || PCI_CHIPID(pa->pa_id) == CHIPID_21142) return 1; return 0; @@ -2391,91 +4816,128 @@ struct cfdriver de_cd = { }; #endif /* __NetBSD__ */ - + + +static void +tulip_shutdown( + TULIP_SHUTDOWN_ARGS) +{ + tulip_softc_t * const sc = arg; + TULIP_CSR_WRITE(sc, csr_busmode, TULIP_BUSMODE_SWRESET); + DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at + 33MHz that comes to two microseconds but wait a + bit longer anyways) */ +} + static void tulip_pci_attach( TULIP_PCI_ATTACH_ARGS) { #if defined(__FreeBSD__) tulip_softc_t *sc; +#define PCI_CONF_WRITE(r, v) pci_conf_write(config_id, (r), (v)) +#define PCI_CONF_READ(r) pci_conf_read(config_id, (r)) +#define PCI_GETBUSDEVINFO(sc) ((void)((sc)->tulip_pci_busno = ((config_id.cfg1 >> 16) & 0xFF), /* XXX */ \ + (sc)->tulip_pci_devno = ((config_id.cfg1 >> 11) & 0x1F))) /* XXX */ #endif #if defined(__bsdi__) tulip_softc_t * const sc = (tulip_softc_t *) self; struct isa_attach_args * const ia = (struct isa_attach_args *) aux; pci_devaddr_t *pa = (pci_devaddr_t *) ia->ia_aux; - int unit = sc->tulip_dev.dv_unit; + const int unit = sc->tulip_dev.dv_unit; +#define PCI_CONF_WRITE(r, v) pci_outl(pa, (r), (v)) +#define PCI_CONF_READ(r) pci_inl(pa, (r)) +#define PCI_GETBUSDEVINFO(sc) ((void)((sc)->tulip_pci_busno = pa->d_bus, \ + (sc)->tulip_pci_devno = pa->d_agent)) #endif #if defined(__NetBSD__) || defined(__OpenBSD__) tulip_softc_t * const sc = (tulip_softc_t *) self; struct pci_attach_args * const pa = (struct pci_attach_args *) aux; + const int unit = sc->tulip_dev.dv_unit; + bus_space_tag_t iot, memt; + bus_space_handle_t ioh, memh; + int ioh_valid, memh_valid; +#define PCI_CONF_WRITE(r, v) pci_conf_write(pa->pa_pc, pa->pa_tag, (r), (v)) +#define PCI_CONF_READ(r) pci_conf_read(pa->pa_pc, pa->pa_tag, (r)) +#define PCI_GETBUSDEVINFO(sc) do { \ + int busno, devno, funcno; \ + pci_decompose_tag(pa->pa_pc, pa->pa_tag, &busno, &devno, &funcno); \ + (sc)->tulip_pci_busno = busno; \ + (sc)->tulip_pci_devno = devno; \ + } while (0) +#endif /* __NetBSD__ */ + +#if defined(__OpenBSD__) pci_chipset_tag_t pc = pa->pa_pc; bus_addr_t tulipbase; bus_size_t tulipsize; -#if defined(__FreeBSD__) - int unit = sc->tulip_dev.dv_unit; -#endif - const char *intrstr = NULL; #endif - int retval, idx, revinfo, id; -#if !defined(TULIP_IOMAPPED) && !defined(__bsdi__) && \ - !defined(__NetBSD__) && !defined(__OpenBSD__) + + int retval, idx; + u_int32_t revinfo, cfdainfo, id; +#if !defined(TULIP_IOMAPPED) && defined(__FreeBSD__) vm_offset_t pa_csrs; #endif + unsigned csroffset = TULIP_PCI_CSROFFSET; unsigned csrsize = TULIP_PCI_CSRSIZE; - tulip_csrptr_t csr_base; - tulip_desc_t *rxdescs, *txdescs; + tulip_csrptr_t csr_base; tulip_chipid_t chipid = TULIP_CHIPID_UNKNOWN; -#if defined(__FreeBSD__) - if (unit >= NDE) { - printf("de%d: not configured; kernel is built for only %d device%s.\n", - unit, NDE, NDE == 1 ? "" : "s"); + if (unit >= TULIP_MAX_DEVICES) { +#ifdef __FreeBSD__ + printf("de%d", unit); +#endif + printf(": not configured; limit of %d reached or exceeded\n", + TULIP_MAX_DEVICES); return; } -#endif -#if defined(__FreeBSD__) - revinfo = pci_conf_read(config_id, PCI_CFRV) & 0xFF; - id = pci_conf_read(config_id, PCI_CFID); -#endif #if defined(__bsdi__) if (pa != NULL) { revinfo = pci_inl(pa, PCI_CFRV) & 0xFF; id = pci_inl(pa, PCI_CFID); + cfdainfo = pci_inl(pa, PCI_CFDA); #if defined(TULIP_EISA) } else { revinfo = inl(ia->ia_iobase + DE425_CFRV) & 0xFF; + csroffset = TULIP_EISA_CSROFFSET; csrsize = TULIP_EISA_CSRSIZE; chipid = TULIP_DE425; -#endif + cfdainfo = 0; +#endif /* TULIP_EISA */ } -#endif -#if defined(__NetBSD__) || defined(__OpenBSD__) - revinfo = pci_conf_read(pc, pa->pa_tag, PCI_CFRV) & 0xFF; - id = pa->pa_id; -#endif +#else /* __bsdi__ */ + revinfo = PCI_CONF_READ(PCI_CFRV) & 0xFF; + id = PCI_CONF_READ(PCI_CFID); + cfdainfo = PCI_CONF_READ(PCI_CFDA); +#endif /* __bsdi__ */ if (PCI_VENDORID(id) == DEC_VENDORID) { - if (PCI_CHIPID(id) == DC21040_CHIPID) chipid = TULIP_DC21040; - else if (PCI_CHIPID(id) == DC21140_CHIPID) chipid = TULIP_DC21140; - else if (PCI_CHIPID(id) == DC21041_CHIPID) chipid = TULIP_DC21041; + if (PCI_CHIPID(id) == CHIPID_21040) chipid = TULIP_21040; + else if (PCI_CHIPID(id) == CHIPID_21140) { + chipid = (revinfo >= 0x20) ? TULIP_21140A : TULIP_21140; + } else if (PCI_CHIPID(id) == CHIPID_21142) { + chipid = (revinfo >= 0x20) ? TULIP_21143 : TULIP_21142; + } + else if (PCI_CHIPID(id) == CHIPID_21041) chipid = TULIP_21041; + else if (PCI_CHIPID(id) == CHIPID_21142) chipid = TULIP_21142; } if (chipid == TULIP_CHIPID_UNKNOWN) return; - if ((chipid == TULIP_DC21040 || chipid == TULIP_DE425) && revinfo < 0x20) { + if ((chipid == TULIP_21040 || chipid == TULIP_DE425) && revinfo < 0x20) { #ifdef __FreeBSD__ printf("de%d", unit); #endif - printf(": not configured; DC21040 pass 2.0 required (%d.%d found)\n", + printf(": not configured; 21040 pass 2.0 required (%d.%d found)\n", revinfo >> 4, revinfo & 0x0f); return; - } else if (chipid == TULIP_DC21140 && revinfo < 0x11) { -#ifdef __FreeBSD__ - printf("de%d", unit); + } else if (chipid == TULIP_21140 && revinfo < 0x11) { +#ifndef __FreeBSD__ + printf("\n"); #endif - printf(": not configured; DC21140 pass 1.1 required (%d.%d found)\n", - revinfo >> 4, revinfo & 0x0f); + printf("de%d: not configured; 21140 pass 1.1 required (%d.%d found)\n", + unit, revinfo >> 4, revinfo & 0x0f); return; } @@ -2486,48 +4948,67 @@ tulip_pci_attach( bzero(sc, sizeof(*sc)); /* Zero out the softc*/ #endif - rxdescs = (tulip_desc_t *) - malloc(sizeof(tulip_desc_t) * TULIP_RXDESCS, M_DEVBUF, M_NOWAIT); - if (rxdescs == NULL) { -#if defined(__FreeBSD__) - free((caddr_t) sc, M_DEVBUF); -#endif - return; + PCI_GETBUSDEVINFO(sc); + sc->tulip_chipid = chipid; + sc->tulip_flags |= TULIP_DEVICEPROBE; + if (chipid == TULIP_21140 || chipid == TULIP_21140A) + sc->tulip_features |= TULIP_HAVE_GPR|TULIP_HAVE_STOREFWD; + if (chipid == TULIP_21140A && revinfo <= 0x22) + sc->tulip_features |= TULIP_HAVE_RXBADOVRFLW; + if (chipid == TULIP_21140) + sc->tulip_features |= TULIP_HAVE_BROKEN_HASH; + if (chipid != TULIP_21040 && chipid != TULIP_DE425 && chipid != TULIP_21140) + sc->tulip_features |= TULIP_HAVE_POWERMGMT; + if (chipid == TULIP_21041 || chipid == TULIP_21142 || chipid == TULIP_21143) { + sc->tulip_features |= TULIP_HAVE_DUALSENSE; + if (chipid != TULIP_21041 || sc->tulip_revinfo >= 0x20) + sc->tulip_features |= TULIP_HAVE_SIANWAY; + if (chipid != TULIP_21041) + sc->tulip_features |= TULIP_HAVE_SIAGP|TULIP_HAVE_RXBADOVRFLW|TULIP_HAVE_STOREFWD; } - txdescs = (tulip_desc_t *) - malloc(sizeof(tulip_desc_t) * TULIP_TXDESCS, M_DEVBUF, M_NOWAIT); - if (txdescs == NULL) { - free((caddr_t) rxdescs, M_DEVBUF); -#if defined(__FreeBSD__) - free((caddr_t) sc, M_DEVBUF); -#endif - return; + if (sc->tulip_features & TULIP_HAVE_POWERMGMT + && (cfdainfo & (TULIP_CFDA_SLEEP|TULIP_CFDA_SNOOZE))) { + cfdainfo &= ~(TULIP_CFDA_SLEEP|TULIP_CFDA_SNOOZE); + PCI_CONF_WRITE(PCI_CFDA, cfdainfo); + DELAY(11*1000); } +#if defined(__alpha__) + /* + * The Alpha SRM console encodes a console set media in the driver + * part of the CFDA register. Note that the Multia presents a + * problem in that its BNC mode is really EXTSIA. So in that case + * force a probe. + */ + switch ((cfdainfo >> 8) & 0xff) { + case 1: sc->tulip_media = chipid > TULIP_DE425 ? TULIP_MEDIA_AUI : TULIP_MEDIA_AUIBNC; + case 2: sc->tulip_media = chipid > TULIP_DE425 ? TULIP_MEDIA_BNC : TULIP_MEDIA_UNKNOWN; + case 3: sc->tulip_media = TULIP_MEDIA_10BASET; + case 4: sc->tulip_media = TULIP_MEDIA_10BASET_FD; + case 5: sc->tulip_media = TULIP_MEDIA_100BASETX; + case 6: sc->tulip_media = TULIP_MEDIA_100BASETX_FD; + } +#endif - sc->tulip_chipid = chipid; #if defined(__NetBSD__) || defined(__OpenBSD__) bcopy(self->dv_xname, sc->tulip_if.if_xname, IFNAMSIZ); sc->tulip_if.if_softc = sc; + sc->tulip_pc = pa->pa_pc; #else sc->tulip_unit = unit; sc->tulip_name = "de"; #endif sc->tulip_revinfo = revinfo; - - /* Set up human-readable name. */ - bzero(sc->tulip_xname, sizeof(sc->tulip_xname)); - sprintf(sc->tulip_xname, "%s%d", sc->tulip_name, sc->tulip_unit); - #if defined(__FreeBSD__) +#if BSD >= 199506 + sc->tulip_if.if_softc = sc; +#endif #if defined(TULIP_IOMAPPED) retval = pci_map_port(config_id, PCI_CBIO, &csr_base); #else retval = pci_map_mem(config_id, PCI_CBMA, (vm_offset_t *) &csr_base, &pa_csrs); #endif if (!retval) { - free((caddr_t) txdescs, M_DEVBUF); - free((caddr_t) rxdescs, M_DEVBUF); free((caddr_t) sc, M_DEVBUF); return; } @@ -2535,6 +5016,7 @@ tulip_pci_attach( #endif /* __FreeBSD__ */ #if defined(__bsdi__) + sc->tulip_pf = printf; #if defined(TULIP_IOMAPPED) csr_base = ia->ia_iobase; #else @@ -2542,94 +5024,142 @@ tulip_pci_attach( #endif #endif /* __bsdi__ */ -#if defined(__NetBSD__) || defined(__OpenBSD__) - sc->tulip_pc = pc; -#if defined(TULIP_IOMAPPED) - sc->tulip_bst = pa->pa_iot; +#if defined(__NetBSD__) + csr_base = 0; + + ioh_valid = (pci_mapreg_map(pa, PCI_CBIO, PCI_MAPREG_TYPE_IO, 0, + &iot, &ioh, NULL, NULL) == 0); + memh_valid = (pci_mapreg_map(pa, PCI_CBMA, + PCI_MAPREG_TYPE_MEM | PCI_MAPREG_MEM_TYPE_32BIT, 0, + &memt, &memh, NULL, NULL) == 0); +#endif + +#if defined(__OpenBSD__) + ioh_valid = 0; + memh_valid = 0; + csr_base = 0; + +#if defined(TULIP_IO_MAPPED) + iot = pa->pa_iot; retval = pci_io_find(pc, pa->pa_tag, PCI_CBIO, &tulipbase, &tulipsize); - if (!retval) + if (!retval) retval = bus_space_map(pa->pa_iot, tulipbase, tulipsize, 0, - &sc->tulip_bsh); + &ioh); + + ioh_valid = (retval == 0); #else - sc->tulip_bst = pa->pa_memt; + memt = pa->pa_memt; retval = pci_mem_find(pc, pa->pa_tag, PCI_CBMA, &tulipbase, &tulipsize, NULL); if (!retval) retval = bus_space_map(pa->pa_memt, tulipbase, tulipsize, 0, - &sc->tulip_bsh); + &memh); + + memh_valid = (retval == 0); #endif - csr_base = 0; - if (retval) { - free((caddr_t) txdescs, M_DEVBUF); - free((caddr_t) rxdescs, M_DEVBUF); - return; + +#endif + +#if defined(__OpenBSD__) || defined(__NetBSD__) +#if defined(TULIP_IOMAPPED) + if (ioh_valid) { + sc->tulip_bustag = iot; + sc->tulip_bushandle = ioh; + } else if (memh_valid) { + sc->tulip_bustag = memt; + sc->tulip_bushandle = memh; + } +#else /* defined(TULIP_IOMAPPED) */ + if (memh_valid) { + sc->tulip_bustag = memt; + sc->tulip_bushandle = memh; + } else if (ioh_valid) { + sc->tulip_bustag = iot; + sc->tulip_bushandle = ioh; + } +#endif /* TULIP_IOMAPPED */ + else { + printf(": unable to map device registers\n"); + return; } #endif /* __NetBSD__ */ - tulip_initcsrs(sc, csr_base, csrsize); - tulip_initring(sc, &sc->tulip_rxinfo, rxdescs, TULIP_RXDESCS); - tulip_initring(sc, &sc->tulip_txinfo, txdescs, TULIP_TXDESCS); + tulip_initcsrs(sc, csr_base + csroffset, csrsize); + tulip_initring(sc, &sc->tulip_rxinfo, sc->tulip_rxdescs, TULIP_RXDESCS); + tulip_initring(sc, &sc->tulip_txinfo, sc->tulip_txdescs, TULIP_TXDESCS); + + /* + * Make sure there won't be any interrupts or such... + */ + TULIP_CSR_WRITE(sc, csr_busmode, TULIP_BUSMODE_SWRESET); + DELAY(100); /* Wait 10 microseconds (actually 50 PCI cycles but at + 33MHz that comes to two microseconds but wait a + bit longer anyways) */ + if ((retval = tulip_read_macaddr(sc)) < 0) { -#ifdef __FreeBSD__ - printf("%s", sc->tulip_xname); +#if defined(__FreeBSD__) + printf(TULIP_PRINTF_FMT, TULIP_PRINTF_ARGS); #endif printf(": can't read ENET ROM (why=%d) (", retval); for (idx = 0; idx < 32; idx++) printf("%02x", sc->tulip_rombuf[idx]); printf("\n"); - printf("%s: %s%s pass %d.%d Ethernet address %s\n", - sc->tulip_xname, - (sc->tulip_boardsw != NULL ? sc->tulip_boardsw->bd_description : ""), - tulip_chipdescs[sc->tulip_chipid], - (sc->tulip_revinfo & 0xF0) >> 4, sc->tulip_revinfo & 0x0F, - "unknown"); + printf(TULIP_PRINTF_FMT ": %s%s pass %d.%d\n", + TULIP_PRINTF_ARGS, + sc->tulip_boardid, tulip_chipdescs[sc->tulip_chipid], + (sc->tulip_revinfo & 0xF0) >> 4, sc->tulip_revinfo & 0x0F); + printf(TULIP_PRINTF_FMT ": address unknown\n", TULIP_PRINTF_ARGS); } else { - /* - * Make sure there won't be any interrupts or such... - */ - TULIP_WRITE_CSR(sc, csr_busmode, TULIP_BUSMODE_SWRESET); - DELAY(10); /* Wait 10 microseconds (actually 50 PCI cycles but at - 33MHz that comes to two microseconds but wait a - bit longer anyways) */ + tulip_spl_t s; + tulip_intrfunc_t (*intr_rtn)(void *) = tulip_intr_normal; + + if (sc->tulip_features & TULIP_HAVE_SHAREDINTR) + intr_rtn = tulip_intr_shared; + #if defined(__NetBSD__) || defined(__OpenBSD__) - if (sc->tulip_boardsw->bd_type != TULIP_DC21040_ZX314_SLAVE) { + if ((sc->tulip_features & TULIP_HAVE_SLAVEDINTR) == 0) { pci_intr_handle_t intrhandle; + const char *intrstr; - if (pci_intr_map(pc, pa->pa_intrtag, pa->pa_intrpin, - pa->pa_intrline, &intrhandle)) { + if (pci_intr_map(pa->pa_pc, pa->pa_intrtag, pa->pa_intrpin, + pa->pa_intrline, &intrhandle)) { printf(": couldn't map interrupt\n"); return; } - intrstr = pci_intr_string(pc, intrhandle); - sc->tulip_ih = pci_intr_establish(pc, intrhandle, IPL_NET, - tulip_intr, sc, self->dv_xname); - if (sc->tulip_ih == NULL) { + intrstr = pci_intr_string(pa->pa_pc, intrhandle); + sc->tulip_ih = pci_intr_establish(pa->pa_pc, intrhandle, IPL_NET, + intr_rtn, sc, self->dv_xname); + if (sc->tulip_ih == NULL) printf(": couldn't establish interrupt"); - if (intrstr != NULL) - printf(" at %s", intrstr); - printf("\n"); + if (intrstr != NULL) + printf(" at %s", intrstr); + printf("\n"); + if (sc->tulip_ih == NULL) return; - } } - sc->tulip_ats = shutdownhook_establish(tulip_pci_shutdown, sc); + sc->tulip_ats = shutdownhook_establish(tulip_shutdown, sc); if (sc->tulip_ats == NULL) - printf("\n%s: warning: couldn't establish shutdown hook", + printf("\n%s: warning: couldn't establish shutdown hook\n", sc->tulip_xname); #endif #if defined(__FreeBSD__) - if (sc->tulip_boardsw->bd_type != TULIP_DC21040_ZX314_SLAVE) { - if (!pci_map_int (config_id, tulip_intr, (void*) sc, &net_imask)) { - printf("%s: couldn't map interrupt\n", sc->tulip_xname); + if ((sc->tulip_features & TULIP_HAVE_SLAVEDINTR) == 0) { + if (!pci_map_int (config_id, intr_rtn, (void*) sc, &net_imask)) { + printf(TULIP_PRINTF_FMT ": couldn't map interrupt\n", + TULIP_PRINTF_ARGS); return; } } +#if !defined(TULIP_DEVCONF) + at_shutdown(tulip_shutdown, sc, SHUTDOWN_POST_SYNC); +#endif #endif #if defined(__bsdi__) - if (sc->tulip_boardsw->bd_type != TULIP_DC21040_ZX314_SLAVE) { + if ((sc->tulip_features & TULIP_HAVE_SLAVEDINTR) == 0) { isa_establish(&sc->tulip_id, &sc->tulip_dev); - sc->tulip_ih.ih_fun = tulip_intr; - sc->tulip_ih.ih_arg = (void *)sc; + sc->tulip_ih.ih_fun = intr_rtn; + sc->tulip_ih.ih_arg = (void *) sc; intr_establish(ia->ia_irq, &sc->tulip_ih, DV_NET); } @@ -2637,12 +5167,14 @@ tulip_pci_attach( sc->tulip_ats.arg = (void *) sc; atshutdown(&sc->tulip_ats, ATSH_ADD); #endif +#if defined(TULIP_USE_SOFTINTR) + if (sc->tulip_unit > tulip_softintr_max_unit) + tulip_softintr_max_unit = sc->tulip_unit; +#endif + + s = TULIP_RAISESPL(); tulip_reset(sc); tulip_attach(sc); -#if defined(__NetBSD__) || defined(__OpenBSD__) - if (intrstr != NULL) - printf("%s: interrupting at %s\n", self->dv_xname, intrstr); -#endif + TULIP_RESTORESPL(s); } } -#endif /* NDE > 0 */ |