--- /dev/null
+/* $OpenBSD: if_ep.c,v 1.14 1996/05/05 13:38:29 mickey Exp $ */
+/* $NetBSD: if_ep.c,v 1.90 1996/04/11 22:29:15 cgd Exp $ */
+
+/*
+ * Copyright (c) 1994 Herb Peyerl <hpeyerl@novatel.ca>
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ * must display the following acknowledgement:
+ * This product includes software developed by Herb Peyerl.
+ * 4. The name of Herb Peyerl may not be used to endorse or promote products
+ * derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+ * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+ * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+ * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+ * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+ * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+ * 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.
+ */
+
+#include "pcmcia.h"
+#include "bpfilter.h"
+#include "ep.h"
+
+#include <sys/param.h>
+#include <sys/mbuf.h>
+#include <sys/socket.h>
+#include <sys/ioctl.h>
+#include <sys/errno.h>
+#include <sys/syslog.h>
+#include <sys/select.h>
+#include <sys/device.h>
+#include <sys/systm.h>
+
+#include <net/if.h>
+#include <net/netisr.h>
+#include <net/if_dl.h>
+#include <net/if_types.h>
+#include <net/netisr.h>
+
+#ifdef INET
+#include <netinet/in.h>
+#include <netinet/in_systm.h>
+#include <netinet/in_var.h>
+#include <netinet/ip.h>
+#include <netinet/if_ether.h>
+#endif
+
+#if NBPFILTER > 0
+#include <net/bpf.h>
+#include <net/bpfdesc.h>
+#endif
+
+#include "pci.h"
+
+#include <machine/cpu.h>
+#include <machine/pio.h>
+
+#include <dev/isa/isavar.h>
+#include <dev/isa/if_epreg.h>
+#include <dev/isa/elink.h>
+
+#include <dev/pci/pcivar.h>
+#include <dev/pci/pcireg.h>
+#include <dev/pci/pcidevs.h>
+
+/* PCI constants */
+#define PCI_VENDORID(x) ((x) & 0xFFFF)
+#define PCI_CHIPID(x) (((x) >> 16) & 0xFFFF)
+#define PCI_CONN 0x48 /* Connector type */
+#define PCI_CBMA 0x10 /* Configuration Base Memory Address */
+
+
+#define ETHER_MIN_LEN 64
+#define ETHER_MAX_LEN 1518
+#define ETHER_ADDR_LEN 6
+/*
+ * Ethernet software status per interface.
+ */
+struct ep_softc {
+ struct device sc_dev;
+ void *sc_ih;
+
+ struct arpcom sc_arpcom; /* Ethernet common part */
+ int ep_iobase; /* i/o bus address */
+ char ep_connectors; /* Connectors on this card. */
+#define MAX_MBS 8 /* # of mbufs we keep around */
+ struct mbuf *mb[MAX_MBS]; /* spare mbuf storage. */
+ int next_mb; /* Which mbuf to use next. */
+ int last_mb; /* Last mbuf. */
+ int tx_start_thresh; /* Current TX_start_thresh. */
+ int tx_succ_ok; /* # packets sent in sequence */
+ /* w/o underrun */
+ u_char bustype;
+#define EP_BUS_ISA 0x0
+#define EP_BUS_PCMCIA 0x1
+#define EP_BUS_EISA 0x2
+#define EP_BUS_PCI 0x3
+
+#define EP_IS_BUS_32(a) ((a) & 0x2)
+
+ u_char pcmcia_flags;
+#define EP_REATTACH 0x01
+#define EP_ABSENT 0x02
+};
+
+static int epprobe __P((struct device *, void *, void *));
+static void epattach __P((struct device *, struct device *, void *));
+
+/* XXX the following two structs should be different. */
+#if NEP_ISA > 0
+struct cfattach ep_isa_ca = {
+ sizeof(struct ep_softc), epprobe, epattach
+};
+#endif
+
+#if NEP_PCI > 0
+struct cfattach ep_pci_ca = {
+ sizeof(struct ep_softc), epprobe, epattach
+};
+#endif
+
+
+struct cfdriver ep_cd = {
+ NULL, "ep", DV_IFNET
+};
+
+int epintr __P((void *));
+static int epstatus __P((struct ep_softc *));
+void epinit __P((struct ep_softc *));
+int epioctl __P((struct ifnet *, u_long, caddr_t));
+void epstart __P((struct ifnet *));
+void epwatchdog __P((int));
+void epreset __P((struct ep_softc *));
+void epread __P((struct ep_softc *));
+struct mbuf *epget __P((struct ep_softc *, int));
+void epmbuffill __P((void *));
+void epmbufempty __P((struct ep_softc *));
+void epstop __P((struct ep_softc *));
+void epsetfilter __P((struct ep_softc *));
+void epsetlink __P((struct ep_softc *));
+static void epconfig __P((struct ep_softc *, u_int));
+
+static u_short epreadeeprom __P((int id_port, int offset));
+static int epbusyeeprom __P((struct ep_softc *));
+
+#define MAXEPCARDS 20 /* if you have 21 cards in your machine... you lose */
+
+static struct epcard {
+ int iobase;
+ int irq;
+ char available;
+ char bustype;
+} epcards[MAXEPCARDS];
+static int nepcards;
+
+static void
+epaddcard(iobase, irq, bustype)
+ int iobase;
+ int irq;
+ char bustype;
+{
+
+ if (nepcards >= MAXEPCARDS)
+ return;
+ epcards[nepcards].iobase = iobase;
+ epcards[nepcards].irq = (irq == 2) ? 9 : irq;
+ epcards[nepcards].available = 1;
+ epcards[nepcards].bustype = bustype;
+ nepcards++;
+}
+
+#if NEP_PCMCIA > 0
+#include <dev/pcmcia/pcmciavar.h>
+
+int ep_pcmcia_match __P((struct device *, void *, void *));
+void ep_pcmcia_attach __P((struct device *, struct device *, void *));
+int ep_pcmcia_detach __P((struct device *));
+
+static int ep_pcmcia_isa_attach __P((struct device *, void *,
+ void *, struct pcmcia_link *));
+static int epmod __P((struct pcmcia_link *, struct device *,
+ struct pcmcia_conf *, struct cfdata * cf));
+static int ep_remove __P((struct pcmcia_link *, struct device *));
+
+struct cfattach ep_pcmcia_ca = {
+ sizeof(struct ep_softc), ep_pcmcia_match, epattach, ep_pcmcia_detach
+};
+
+/* additional setup needed for pcmcia devices */
+static int
+ep_pcmcia_isa_attach(parent, match, aux, pc_link)
+ struct device *parent;
+ void *match;
+ void *aux;
+ struct pcmcia_link *pc_link;
+{
+ struct ep_softc *sc = (void *) match;
+/* struct cfdata *cf = sc->sc_dev.dv_cfdata;*/
+ struct isa_attach_args *ia = aux;
+/* struct pcmciadevs *dev = pc_link->device;*/
+ struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+ int i;
+ extern int ifqmaxlen;
+
+ outw(ia->ia_iobase + EP_COMMAND, WINDOW_SELECT | 0);
+ outw(ia->ia_iobase + EP_W0_CONFIG_CTRL, ENABLE_DRQ_IRQ);
+ outw(ia->ia_iobase + EP_W0_RESOURCE_CFG, 0x3f00);
+
+ /*
+ * ok til here. Now try to figure out which link we have.
+ * try coax first...
+ */
+#ifdef EP_COAX_DEFAULT
+ outw(ia->ia_iobase + EP_W0_ADDRESS_CFG, 0xC000);
+#else
+ /* COAX as default is reported to be a problem */
+ outw(ia->ia_iobase + EP_W0_ADDRESS_CFG, 0x0000);
+#endif
+ ifp->if_snd.ifq_maxlen = ifqmaxlen;
+
+ epaddcard(ia->ia_iobase, ia->ia_irq, EP_BUS_PCMCIA);
+
+ for (i = 0; i < nepcards; i++) {
+ if (epcards[i].available == 0)
+ continue;
+ if (ia->ia_iobase != IOBASEUNK &&
+ ia->ia_iobase != epcards[i].iobase)
+ continue;
+ if (ia->ia_irq != IRQUNK &&
+ ia->ia_irq != epcards[i].irq)
+ continue;
+ goto good;
+ }
+ return 0;
+
+good:
+
+ epcards[i].available = 0;
+ ia->ia_iobase = epcards[i].iobase;
+ ia->ia_irq = epcards[i].irq;
+ ia->ia_iosize = 0x10;
+ ia->ia_msize = 0;
+
+ sc->bustype = epcards[i].bustype;
+ sc->pcmcia_flags = (pc_link->flags & PCMCIA_REATTACH) ? EP_REATTACH:0;
+ return 1;
+}
+
+/* modify config entry */
+static int
+epmod(pc_link, self, pc_cf, cf)
+ struct pcmcia_link *pc_link;
+ struct device *self;
+ struct pcmcia_conf *pc_cf;
+ struct cfdata *cf;
+{
+ int err;
+/* struct pcmciadevs *dev = pc_link->device;*/
+/* struct ep_softc *sc = (void *) self;*/
+
+ if ((err = PCMCIA_BUS_CONFIG(pc_link->adapter, pc_link, self,
+ pc_cf, cf)) != 0) {
+ printf("bus_config failed %d\n", err);
+ return err;
+ }
+
+ if (pc_cf->io[0].len > 0x10)
+ pc_cf->io[0].len = 0x10;
+#if 0
+ pc_cf->cfgtype = DOSRESET;
+#endif
+ pc_cf->cfgtype = 1;
+
+ return 0;
+}
+
+static int
+ep_remove(pc_link, self)
+ struct pcmcia_link *pc_link;
+ struct device *self;
+{
+ struct ep_softc *sc = (void *) self;
+ struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+ if_down(ifp);
+ epstop(sc);
+ ifp->if_flags &= ~(IFF_RUNNING | IFF_UP);
+ sc->pcmcia_flags = EP_ABSENT;
+ return PCMCIA_BUS_UNCONFIG(pc_link->adapter, pc_link);
+}
+
+static struct pcmcia_3com {
+ struct pcmcia_device pcd;
+} pcmcia_3com = {
+ {"PCMCIA 3COM 3C589", epmod, ep_pcmcia_isa_attach, NULL, ep_remove}
+};
+
+struct pcmciadevs pcmcia_ep_devs[] = {
+ {
+ "ep", 0, "3Com Corporation", "3C589",
+#if 0
+ "TP/BNC LAN Card Ver. 1a", "000001",
+#else
+ NULL, NULL,
+#endif
+ (void *) -1, (void *) &pcmcia_3com
+ },
+#if 0
+ {
+ "ep", 0, "3Com Corporation", "3C589", "TP/BNC LAN Card Ver. 2a", "000002",
+ (void *) -1, (void *) &pcmcia_3com
+ },
+#endif
+ { NULL }
+};
+#define nep_pcmcia_devs sizeof(pcmcia_ep_devs)/sizeof(pcmcia_ep_devs[0])
+
+int
+ep_pcmcia_match(parent, match, aux)
+ struct device *parent;
+ void *match, *aux;
+{
+ return pcmcia_slave_match(parent, match, aux, pcmcia_ep_devs,
+ nep_pcmcia_devs);
+}
+
+void
+ep_pcmcia_attach(parent, self, aux)
+ struct device *parent, *self;
+ void *aux;
+{
+ struct pcmcia_attach_args *paa = aux;
+
+ printf("ep_pcmcia_attach %p %p %p\n", parent, self, aux);
+ delay(2000000);
+ if (!pcmcia_configure(parent, self, paa->paa_link)) {
+ struct ep_softc *sc = (void *)self;
+ sc->pcmcia_flags |= EP_ABSENT;
+ printf(": not attached\n");
+ }
+}
+
+/*
+ * No detach; network devices are too well linked into the rest of the
+ * kernel.
+ */
+int
+ep_pcmcia_detach(self)
+ struct device *self;
+{
+ return EBUSY;
+}
+
+#endif
+
+
+/*
+ * 3c579 cards on the EISA bus are probed by their slot number. 3c509
+ * cards on the ISA bus are probed in ethernet address order. The probe
+ * sequence requires careful orchestration, and we'd like like to allow
+ * the irq and base address to be wildcarded. So, we probe all the cards
+ * the first time epprobe() is called. On subsequent calls we look for
+ * matching cards.
+ */
+int
+epprobe(parent, match, aux)
+ struct device *parent;
+ void *match, *aux;
+{
+ struct ep_softc *sc = match;
+ struct isa_attach_args *ia = aux;
+ static int probed;
+ int slot, iobase, i;
+ u_short vendor, model;
+ int k, k2;
+
+#if NPCI > 0
+ extern struct cfdriver pci_cd;
+
+ if (parent->dv_cfdata->cf_driver == &pci_cd) {
+ struct pci_attach_args *pa = (struct pci_attach_args *) aux;
+
+ if (PCI_VENDORID(pa->pa_id) != PCI_VENDOR_3COM)
+ return 0;
+
+ switch (PCI_CHIPID(pa->pa_id)) {
+ case PCI_PRODUCT_3COM_3C590:
+ case PCI_PRODUCT_3COM_3C595:
+ break;
+ default:
+ return 0;
+ }
+
+ if (nepcards >= MAXEPCARDS)
+ return 0;
+
+ epcards[nepcards++].available = 0;
+ return 1;
+ }
+#endif
+
+ if (!probed) {
+ probed = 1;
+
+ /* find all EISA cards */
+ for (slot = 1; slot < 16; slot++) {
+ iobase = 0x1000 * slot;
+
+ vendor = htons(inw(iobase + EISA_VENDOR));
+ if (vendor != MFG_ID)
+ continue;
+
+ model = htons(inw(iobase + EISA_MODEL));
+ if ((model & 0xfff0) != PROD_ID) {
+#ifndef trusted
+ printf("epprobe: ignoring model %04x\n", model);
+#endif
+ continue;
+ }
+
+ outb(iobase + EISA_CONTROL, EISA_ENABLE | EISA_RESET);
+ delay(10);
+ outb(iobase + EISA_CONTROL, EISA_ENABLE);
+ /* Wait for reset? */
+ delay(1000);
+
+ k = inw(iobase + EP_W0_ADDRESS_CFG);
+ k = (k & 0x1f) * 0x10 + 0x200;
+
+ k2 = inw(iobase + EP_W0_RESOURCE_CFG);
+ k2 >>= 12;
+ epaddcard(iobase, k2, EP_BUS_EISA);
+ }
+
+ for (slot = 0; slot < 10; slot++) {
+ elink_reset();
+ elink_idseq(ELINK_509_POLY);
+
+ /* Untag all the adapters so they will talk to us. */
+ if (slot == 0)
+ outb(ELINK_ID_PORT, TAG_ADAPTER + 0);
+
+ vendor =
+ htons(epreadeeprom(ELINK_ID_PORT, EEPROM_MFG_ID));
+ if (vendor != MFG_ID)
+ continue;
+
+ model =
+ htons(epreadeeprom(ELINK_ID_PORT, EEPROM_PROD_ID));
+ if ((model & 0xfff0) != PROD_ID) {
+#ifndef trusted
+ printf("epprobe: ignoring model %04x\n", model);
+#endif
+ continue;
+ }
+
+ k = epreadeeprom(ELINK_ID_PORT, EEPROM_ADDR_CFG);
+ k = (k & 0x1f) * 0x10 + 0x200;
+
+ k2 = epreadeeprom(ELINK_ID_PORT, EEPROM_RESOURCE_CFG);
+ k2 >>= 12;
+ epaddcard(k, k2, EP_BUS_ISA);
+
+ /* so card will not respond to contention again */
+ outb(ELINK_ID_PORT, TAG_ADAPTER + 1);
+
+ /*
+ * XXX: this should probably not be done here
+ * because it enables the drq/irq lines from
+ * the board. Perhaps it should be done after
+ * we have checked for irq/drq collisions?
+ */
+ outb(ELINK_ID_PORT, ACTIVATE_ADAPTER_TO_CONFIG);
+ }
+ /* XXX should we sort by ethernet address? */
+ }
+
+ for (i = 0; i < nepcards; i++) {
+ if (epcards[i].available == 0)
+ continue;
+ if (ia->ia_iobase != IOBASEUNK &&
+ ia->ia_iobase != epcards[i].iobase)
+ continue;
+ if (ia->ia_irq != IRQUNK &&
+ ia->ia_irq != epcards[i].irq)
+ continue;
+ goto good;
+ }
+ return 0;
+
+good:
+ epcards[i].available = 0;
+ sc->bustype = epcards[i].bustype;
+ ia->ia_iobase = epcards[i].iobase;
+ ia->ia_irq = epcards[i].irq;
+ ia->ia_iosize = 0x10;
+ ia->ia_msize = 0;
+ return 1;
+}
+
+static void
+epconfig(sc, conn)
+ struct ep_softc *sc;
+ u_int conn;
+{
+ u_short i;
+
+ struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+
+ sc->ep_connectors = 0;
+ printf(": ");
+ if (conn & IS_AUI) {
+ printf("aui");
+ sc->ep_connectors |= AUI;
+ }
+ if (conn & IS_BNC) {
+ if (sc->ep_connectors)
+ printf("/");
+ printf("bnc");
+ sc->ep_connectors |= BNC;
+ }
+ if (conn & IS_UTP) {
+ if (sc->ep_connectors)
+ printf("/");
+ printf("utp");
+ sc->ep_connectors |= UTP;
+ }
+ if (!sc->ep_connectors)
+ printf("no connectors!");
+
+ /*
+ * Read the station address from the eeprom
+ */
+ for (i = 0; i < 3; i++) {
+ u_short x;
+ if (epbusyeeprom(sc))
+ return;
+ outw(BASE + EP_W0_EEPROM_COMMAND, READ_EEPROM | i);
+ if (epbusyeeprom(sc))
+ return;
+ x = inw(BASE + EP_W0_EEPROM_DATA);
+ sc->sc_arpcom.ac_enaddr[(i << 1)] = x >> 8;
+ sc->sc_arpcom.ac_enaddr[(i << 1) + 1] = x;
+ }
+
+ printf(" address %s\n", ether_sprintf(sc->sc_arpcom.ac_enaddr));
+
+ ifp->if_unit = sc->sc_dev.dv_unit;
+ ifp->if_name = ep_cd.cd_name;
+ ifp->if_start = epstart;
+ ifp->if_ioctl = epioctl;
+ ifp->if_watchdog = epwatchdog;
+ ifp->if_flags =
+ IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS | IFF_MULTICAST;
+
+ if ((sc->pcmcia_flags & EP_REATTACH) == 0) {
+ if_attach(ifp);
+ ether_ifattach(ifp);
+
+#if NBPFILTER > 0
+ bpfattach(&sc->sc_arpcom.ac_if.if_bpf, ifp, DLT_EN10MB,
+ sizeof(struct ether_header));
+#endif
+ }
+ sc->tx_start_thresh = 20; /* probably a good starting point. */
+}
+
+static void
+epattach(parent, self, aux)
+ struct device *parent, *self;
+ void *aux;
+{
+ struct ep_softc *sc = (void *)self;
+ u_short conn = 0;
+#if NPCI > 0
+ extern struct cfdriver pci_cd;
+
+ if (parent->dv_cfdata->cf_driver == &pci_cd) {
+ struct pci_attach_args *pa = aux;
+ int iobase;
+ u_short i;
+
+ if (pci_map_io(pa->pa_tag, PCI_CBMA, &iobase)) {
+ printf("%s: couldn't map io\n", sc->sc_dev.dv_xname);
+ return;
+ }
+ sc->bustype = EP_BUS_PCI;
+ sc->ep_iobase = iobase; /* & 0xfffffff0 */
+ i = pci_conf_read(pa->pa_bc, pa->pa_tag, PCI_CONN);
+
+ /*
+ * Bits 13,12,9 of the isa adapter are the same as bits
+ * 5,4,3 of the pci adapter
+ */
+ if (i & IS_PCI_AUI)
+ conn |= IS_AUI;
+ if (i & IS_PCI_BNC)
+ conn |= IS_BNC;
+ if (i & IS_PCI_UTP)
+ conn |= IS_UTP;
+
+ GO_WINDOW(0);
+ }
+ else
+#endif
+ {
+ struct isa_attach_args *ia = aux;
+
+ sc->ep_iobase = ia->ia_iobase;
+ GO_WINDOW(0);
+ conn = inw(ia->ia_iobase + EP_W0_CONFIG_CTRL);
+ }
+
+ epconfig(sc, conn);
+
+
+#if NPCI > 0
+ if (parent->dv_cfdata->cf_driver == &pci_cd) {
+ struct pci_attach_args *pa = aux;
+
+ pci_conf_write(pa->pa_bc, pa->pa_tag, PCI_COMMAND_STATUS_REG,
+ pci_conf_read(pa->pa_bc, pa->pa_tag,
+ PCI_COMMAND_STATUS_REG) |
+ PCI_COMMAND_MASTER_ENABLE);
+
+ sc->sc_ih = pci_map_int(pa->pa_tag, IPL_NET, epintr, sc);
+ if (sc->sc_ih == NULL) {
+ printf("%s: couldn't map interrupt\n",
+ sc->sc_dev.dv_xname);
+ return;
+ }
+ epstop(sc);
+ }
+ else
+#endif
+ {
+ struct isa_attach_args *ia = aux;
+ sc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq,
+ IST_EDGE, IPL_NET, epintr, sc, sc->sc_dev.dv_xname);
+ }
+}
+
+/*
+ * The order in here seems important. Otherwise we may not receive
+ * interrupts. ?!
+ */
+void
+epinit(sc)
+ register struct ep_softc *sc;
+{
+ register struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+ int i;
+
+ while (inw(BASE + EP_STATUS) & S_COMMAND_IN_PROGRESS)
+ ;
+
+ if (sc->bustype != EP_BUS_PCI) {
+ GO_WINDOW(0);
+ outw(BASE + EP_W0_CONFIG_CTRL, 0);
+ outw(BASE + EP_W0_CONFIG_CTRL, ENABLE_DRQ_IRQ);
+ }
+
+ if (sc->bustype == EP_BUS_PCMCIA) {
+#ifdef EP_COAX_DEFAULT
+ outw(BASE + EP_W0_ADDRESS_CFG,3<<14);
+#else
+ outw(BASE + EP_W0_ADDRESS_CFG,0<<14);
+#endif
+ outw(BASE + EP_W0_RESOURCE_CFG, 0x3f00);
+ }
+
+ GO_WINDOW(2);
+ for (i = 0; i < 6; i++) /* Reload the ether_addr. */
+ outb(BASE + EP_W2_ADDR_0 + i, sc->sc_arpcom.ac_enaddr[i]);
+
+ outw(BASE + EP_COMMAND, RX_RESET);
+ outw(BASE + EP_COMMAND, TX_RESET);
+
+ GO_WINDOW(1); /* Window 1 is operating window */
+ for (i = 0; i < 31; i++)
+ inb(BASE + EP_W1_TX_STATUS);
+
+ outw(BASE + EP_COMMAND, SET_RD_0_MASK | S_CARD_FAILURE |
+ S_RX_COMPLETE | S_TX_COMPLETE | S_TX_AVAIL);
+ outw(BASE + EP_COMMAND, SET_INTR_MASK | S_CARD_FAILURE |
+ S_RX_COMPLETE | S_TX_COMPLETE | S_TX_AVAIL);
+
+ /*
+ * Attempt to get rid of any stray interrupts that occured during
+ * configuration. On the i386 this isn't possible because one may
+ * already be queued. However, a single stray interrupt is
+ * unimportant.
+ */
+ outw(BASE + EP_COMMAND, ACK_INTR | 0xff);
+
+ epsetfilter(sc);
+ epsetlink(sc);
+
+ outw(BASE + EP_COMMAND, RX_ENABLE);
+ outw(BASE + EP_COMMAND, TX_ENABLE);
+
+ epmbuffill(sc);
+
+ /* Interface is now `running', with no output active. */
+ ifp->if_flags |= IFF_RUNNING;
+ ifp->if_flags &= ~IFF_OACTIVE;
+
+ /* Attempt to start output, if any. */
+ epstart(ifp);
+}
+
+void
+epsetfilter(sc)
+ register struct ep_softc *sc;
+{
+ register struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+
+ GO_WINDOW(1); /* Window 1 is operating window */
+ outw(BASE + EP_COMMAND, SET_RX_FILTER |
+ FIL_INDIVIDUAL | FIL_BRDCST |
+ ((ifp->if_flags & IFF_MULTICAST) ? FIL_MULTICAST : 0 ) |
+ ((ifp->if_flags & IFF_PROMISC) ? FIL_PROMISC : 0 ));
+}
+
+void
+epsetlink(sc)
+ register struct ep_softc *sc;
+{
+ register struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+
+ /*
+ * you can `ifconfig (link0|-link0) ep0' to get the following
+ * behaviour:
+ * -link0 disable AUI/UTP. enable BNC.
+ * link0 disable BNC. enable AUI.
+ * link1 if the card has a UTP connector, and link0 is
+ * set too, then you get the UTP port.
+ */
+ GO_WINDOW(4);
+ outw(BASE + EP_W4_MEDIA_TYPE, DISABLE_UTP);
+ if (!(ifp->if_flags & IFF_LINK0) && (sc->ep_connectors & BNC)) {
+ if (sc->bustype == EP_BUS_PCMCIA) {
+ GO_WINDOW(0);
+ outw(BASE + EP_W0_ADDRESS_CFG,3<<14);
+ GO_WINDOW(1);
+ }
+ outw(BASE + EP_COMMAND, START_TRANSCEIVER);
+ delay(1000);
+ }
+ if (ifp->if_flags & IFF_LINK0) {
+ outw(BASE + EP_COMMAND, STOP_TRANSCEIVER);
+ delay(1000);
+ if ((ifp->if_flags & IFF_LINK1) && (sc->ep_connectors & UTP)) {
+ if (sc->bustype == EP_BUS_PCMCIA) {
+ GO_WINDOW(0);
+ outw(BASE + EP_W0_ADDRESS_CFG,0<<14);
+ GO_WINDOW(4);
+ }
+ outw(BASE + EP_W4_MEDIA_TYPE, ENABLE_UTP);
+ }
+ }
+ GO_WINDOW(1);
+}
+
+/*
+ * Start outputting on the interface.
+ * Always called as splnet().
+ */
+void
+epstart(ifp)
+ struct ifnet *ifp;
+{
+ register struct ep_softc *sc = ep_cd.cd_devs[ifp->if_unit];
+ struct mbuf *m, *m0;
+ int sh, len, pad;
+
+ /* Don't transmit if interface is busy or not running */
+ if ((ifp->if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING)
+ return;
+
+startagain:
+ /* Sneak a peek at the next packet */
+ m0 = ifp->if_snd.ifq_head;
+ if (m0 == 0)
+ return;
+
+ /* We need to use m->m_pkthdr.len, so require the header */
+ if ((m0->m_flags & M_PKTHDR) == 0)
+ panic("epstart: no header mbuf");
+ len = m0->m_pkthdr.len;
+
+ pad = (4 - len) & 3;
+
+ /*
+ * The 3c509 automatically pads short packets to minimum ethernet
+ * length, but we drop packets that are too large. Perhaps we should
+ * truncate them instead?
+ */
+ if (len + pad > ETHER_MAX_LEN) {
+ /* packet is obviously too large: toss it */
+ ++ifp->if_oerrors;
+ IF_DEQUEUE(&ifp->if_snd, m0);
+ m_freem(m0);
+ goto readcheck;
+ }
+
+ if (inw(BASE + EP_W1_FREE_TX) < len + pad + 4) {
+ outw(BASE + EP_COMMAND, SET_TX_AVAIL_THRESH | (len + pad + 4));
+ /* not enough room in FIFO */
+ ifp->if_flags |= IFF_OACTIVE;
+ return;
+ } else {
+ outw(BASE + EP_COMMAND, SET_TX_AVAIL_THRESH | 2044);
+ }
+
+ IF_DEQUEUE(&ifp->if_snd, m0);
+ if (m0 == 0) /* not really needed */
+ return;
+
+ outw(BASE + EP_COMMAND, SET_TX_START_THRESH |
+ (len / 4 + sc->tx_start_thresh));
+
+#if NBPFILTER > 0
+ if (ifp->if_bpf)
+ bpf_mtap(ifp->if_bpf, m0);
+#endif
+
+ /*
+ * Do the output at splhigh() so that an interrupt from another device
+ * won't cause a FIFO underrun.
+ */
+ sh = splhigh();
+
+ outw(BASE + EP_W1_TX_PIO_WR_1, len);
+ outw(BASE + EP_W1_TX_PIO_WR_1, 0xffff); /* Second dword meaningless */
+ if (EP_IS_BUS_32(sc->bustype)) {
+ for (m = m0; m; ) {
+ if (m->m_len > 3)
+ outsl(BASE + EP_W1_TX_PIO_WR_1,
+ mtod(m, caddr_t), m->m_len / 4);
+ if (m->m_len & 3)
+ outsb(BASE + EP_W1_TX_PIO_WR_1,
+ mtod(m, caddr_t) + (m->m_len & ~3),
+ m->m_len & 3);
+ MFREE(m, m0);
+ m = m0;
+ }
+ } else {
+ for (m = m0; m; ) {
+ if (m->m_len > 1)
+ outsw(BASE + EP_W1_TX_PIO_WR_1,
+ mtod(m, caddr_t), m->m_len / 2);
+ if (m->m_len & 1)
+ outb(BASE + EP_W1_TX_PIO_WR_1,
+ *(mtod(m, caddr_t) + m->m_len - 1));
+ MFREE(m, m0);
+ m = m0;
+ }
+ }
+ while (pad--)
+ outb(BASE + EP_W1_TX_PIO_WR_1, 0);
+
+ splx(sh);
+
+ ++ifp->if_opackets;
+
+readcheck:
+ if ((inw(BASE + EP_W1_RX_STATUS) & ERR_INCOMPLETE) == 0) {
+ /* We received a complete packet. */
+ u_short status = inw(BASE + EP_STATUS);
+
+ if ((status & S_INTR_LATCH) == 0) {
+ /*
+ * No interrupt, read the packet and continue
+ * Is this supposed to happen? Is my motherboard
+ * completely busted?
+ */
+ epread(sc);
+ }
+ else
+ /* Got an interrupt, return so that it gets serviced. */
+ return;
+ }
+ else {
+ /* Check if we are stuck and reset [see XXX comment] */
+ if (epstatus(sc)) {
+ if (ifp->if_flags & IFF_DEBUG)
+ printf("%s: adapter reset\n",
+ sc->sc_dev.dv_xname);
+ epreset(sc);
+ }
+ }
+
+ goto startagain;
+}
+
+
+/*
+ * XXX: The 3c509 card can get in a mode where both the fifo status bit
+ * FIFOS_RX_OVERRUN and the status bit ERR_INCOMPLETE are set
+ * We detect this situation and we reset the adapter.
+ * It happens at times when there is a lot of broadcast traffic
+ * on the cable (once in a blue moon).
+ */
+static int
+epstatus(sc)
+ register struct ep_softc *sc;
+{
+ u_short fifost;
+
+ /*
+ * Check the FIFO status and act accordingly
+ */
+ GO_WINDOW(4);
+ fifost = inw(BASE + EP_W4_FIFO_DIAG);
+ GO_WINDOW(1);
+
+ if (fifost & FIFOS_RX_UNDERRUN) {
+ if (sc->sc_arpcom.ac_if.if_flags & IFF_DEBUG)
+ printf("%s: RX underrun\n", sc->sc_dev.dv_xname);
+ epreset(sc);
+ return 0;
+ }
+
+ if (fifost & FIFOS_RX_STATUS_OVERRUN) {
+ if (sc->sc_arpcom.ac_if.if_flags & IFF_DEBUG)
+ printf("%s: RX Status overrun\n", sc->sc_dev.dv_xname);
+ return 1;
+ }
+
+ if (fifost & FIFOS_RX_OVERRUN) {
+ if (sc->sc_arpcom.ac_if.if_flags & IFF_DEBUG)
+ printf("%s: RX overrun\n", sc->sc_dev.dv_xname);
+ return 1;
+ }
+
+ if (fifost & FIFOS_TX_OVERRUN) {
+ if (sc->sc_arpcom.ac_if.if_flags & IFF_DEBUG)
+ printf("%s: TX overrun\n", sc->sc_dev.dv_xname);
+ epreset(sc);
+ return 0;
+ }
+
+ return 0;
+}
+
+
+static void
+eptxstat(sc)
+ register struct ep_softc *sc;
+{
+ int i;
+
+ /*
+ * We need to read+write TX_STATUS until we get a 0 status
+ * in order to turn off the interrupt flag.
+ */
+ while ((i = inb(BASE + EP_W1_TX_STATUS)) & TXS_COMPLETE) {
+ outb(BASE + EP_W1_TX_STATUS, 0x0);
+
+ if (i & TXS_JABBER) {
+ ++sc->sc_arpcom.ac_if.if_oerrors;
+ if (sc->sc_arpcom.ac_if.if_flags & IFF_DEBUG)
+ printf("%s: jabber (%x)\n",
+ sc->sc_dev.dv_xname, i);
+ epreset(sc);
+ } else if (i & TXS_UNDERRUN) {
+ ++sc->sc_arpcom.ac_if.if_oerrors;
+ if (sc->sc_arpcom.ac_if.if_flags & IFF_DEBUG)
+ printf("%s: fifo underrun (%x) @%d\n",
+ sc->sc_dev.dv_xname, i,
+ sc->tx_start_thresh);
+ if (sc->tx_succ_ok < 100)
+ sc->tx_start_thresh = min(ETHER_MAX_LEN,
+ sc->tx_start_thresh + 20);
+ sc->tx_succ_ok = 0;
+ epreset(sc);
+ } else if (i & TXS_MAX_COLLISION) {
+ ++sc->sc_arpcom.ac_if.if_collisions;
+ outw(BASE + EP_COMMAND, TX_ENABLE);
+ sc->sc_arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
+ } else
+ sc->tx_succ_ok = (sc->tx_succ_ok+1) & 127;
+
+ }
+}
+
+int
+epintr(arg)
+ void *arg;
+{
+ register struct ep_softc *sc = arg;
+ struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+ u_short status;
+ int ret = 0;
+
+ for (;;) {
+ outw(BASE + EP_COMMAND, C_INTR_LATCH);
+
+ status = inw(BASE + EP_STATUS);
+
+ if ((status & (S_TX_COMPLETE | S_TX_AVAIL |
+ S_RX_COMPLETE | S_CARD_FAILURE)) == 0)
+ break;
+
+ ret = 1;
+
+ /*
+ * Acknowledge any interrupts. It's important that we do this
+ * first, since there would otherwise be a race condition.
+ * Due to the i386 interrupt queueing, we may get spurious
+ * interrupts occasionally.
+ */
+ outw(BASE + EP_COMMAND, ACK_INTR | status);
+
+ if (status & S_RX_COMPLETE)
+ epread(sc);
+ if (status & S_TX_AVAIL) {
+ sc->sc_arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
+ epstart(&sc->sc_arpcom.ac_if);
+ }
+ if (status & S_CARD_FAILURE) {
+ printf("%s: adapter failure (%x)\n",
+ sc->sc_dev.dv_xname, status);
+ epreset(sc);
+ return (1);
+ }
+ if (status & S_TX_COMPLETE) {
+ eptxstat(sc);
+ epstart(ifp);
+ }
+ }
+
+ /* no more interrupts */
+ return (ret);
+}
+
+void
+epread(sc)
+ register struct ep_softc *sc;
+{
+ struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+ struct mbuf *m;
+ struct ether_header *eh;
+ int len;
+
+ len = inw(BASE + EP_W1_RX_STATUS);
+
+again:
+ if (ifp->if_flags & IFF_DEBUG) {
+ int err = len & ERR_MASK;
+ char *s = NULL;
+
+ if (len & ERR_INCOMPLETE)
+ s = "incomplete packet";
+ else if (err == ERR_OVERRUN)
+ s = "packet overrun";
+ else if (err == ERR_RUNT)
+ s = "runt packet";
+ else if (err == ERR_ALIGNMENT)
+ s = "bad alignment";
+ else if (err == ERR_CRC)
+ s = "bad crc";
+ else if (err == ERR_OVERSIZE)
+ s = "oversized packet";
+ else if (err == ERR_DRIBBLE)
+ s = "dribble bits";
+
+ if (s)
+ printf("%s: %s\n", sc->sc_dev.dv_xname, s);
+ }
+
+ if (len & ERR_INCOMPLETE)
+ return;
+
+ if (len & ERR_RX) {
+ ++ifp->if_ierrors;
+ goto abort;
+ }
+
+ len &= RX_BYTES_MASK; /* Lower 11 bits = RX bytes. */
+
+ /* Pull packet off interface. */
+ m = epget(sc, len);
+ if (m == 0) {
+ ifp->if_ierrors++;
+ goto abort;
+ }
+
+ ++ifp->if_ipackets;
+
+ /* We assume the header fit entirely in one mbuf. */
+ eh = mtod(m, struct ether_header *);
+
+#if NBPFILTER > 0
+ /*
+ * Check if there's a BPF listener on this interface.
+ * If so, hand off the raw packet to BPF.
+ */
+ if (ifp->if_bpf) {
+ bpf_mtap(ifp->if_bpf, m);
+
+ /*
+ * Note that the interface cannot be in promiscuous mode if
+ * there are no BPF listeners. And if we are in promiscuous
+ * mode, we have to check if this packet is really ours.
+ */
+ if ((ifp->if_flags & IFF_PROMISC) &&
+ (eh->ether_dhost[0] & 1) == 0 && /* !mcast and !bcast */
+ bcmp(eh->ether_dhost, sc->sc_arpcom.ac_enaddr,
+ sizeof(eh->ether_dhost)) != 0) {
+ m_freem(m);
+ return;
+ }
+ }
+#endif
+
+ /* We assume the header fit entirely in one mbuf. */
+ m_adj(m, sizeof(struct ether_header));
+ ether_input(ifp, eh, m);
+
+ /*
+ * In periods of high traffic we can actually receive enough
+ * packets so that the fifo overrun bit will be set at this point,
+ * even though we just read a packet. In this case we
+ * are not going to receive any more interrupts. We check for
+ * this condition and read again until the fifo is not full.
+ * We could simplify this test by not using epstatus(), but
+ * rechecking the RX_STATUS register directly. This test could
+ * result in unnecessary looping in cases where there is a new
+ * packet but the fifo is not full, but it will not fix the
+ * stuck behavior.
+ *
+ * Even with this improvement, we still get packet overrun errors
+ * which are hurting performance. Maybe when I get some more time
+ * I'll modify epread() so that it can handle RX_EARLY interrupts.
+ */
+ if (epstatus(sc)) {
+ len = inw(BASE + EP_W1_RX_STATUS);
+ /* Check if we are stuck and reset [see XXX comment] */
+ if (len & ERR_INCOMPLETE) {
+ if (ifp->if_flags & IFF_DEBUG)
+ printf("%s: adapter reset\n",
+ sc->sc_dev.dv_xname);
+ epreset(sc);
+ return;
+ }
+ goto again;
+ }
+
+ return;
+
+abort:
+ outw(BASE + EP_COMMAND, RX_DISCARD_TOP_PACK);
+ while (inw(BASE + EP_STATUS) & S_COMMAND_IN_PROGRESS)
+ ;
+}
+
+struct mbuf *
+epget(sc, totlen)
+ struct ep_softc *sc;
+ int totlen;
+{
+ struct ifnet *ifp = &sc->sc_arpcom.ac_if;
+ struct mbuf *top, **mp, *m;
+ int len;
+ int sh;
+
+ m = sc->mb[sc->next_mb];
+ sc->mb[sc->next_mb] = 0;
+ if (m == 0) {
+ MGETHDR(m, M_DONTWAIT, MT_DATA);
+ if (m == 0)
+ return 0;
+ } else {
+ /* If the queue is no longer full, refill. */
+ if (sc->last_mb == sc->next_mb)
+ timeout(epmbuffill, sc, 1);
+ /* Convert one of our saved mbuf's. */
+ sc->next_mb = (sc->next_mb + 1) % MAX_MBS;
+ m->m_data = m->m_pktdat;
+ m->m_flags = M_PKTHDR;
+ }
+ m->m_pkthdr.rcvif = ifp;
+ m->m_pkthdr.len = totlen;
+ len = MHLEN;
+ top = 0;
+ mp = ⊤
+
+ /*
+ * We read the packet at splhigh() so that an interrupt from another
+ * device doesn't cause the card's buffer to overflow while we're
+ * reading it. We may still lose packets at other times.
+ */
+ sh = splhigh();
+
+ while (totlen > 0) {
+ if (top) {
+ m = sc->mb[sc->next_mb];
+ sc->mb[sc->next_mb] = 0;
+ if (m == 0) {
+ MGET(m, M_DONTWAIT, MT_DATA);
+ if (m == 0) {
+ splx(sh);
+ m_freem(top);
+ return 0;
+ }
+ } else {
+ sc->next_mb = (sc->next_mb + 1) % MAX_MBS;
+ }
+ len = MLEN;
+ }
+ if (totlen >= MINCLSIZE) {
+ MCLGET(m, M_DONTWAIT);
+ if (m->m_flags & M_EXT)
+ len = MCLBYTES;
+ }
+ len = min(totlen, len);
+ if (EP_IS_BUS_32(sc->bustype)) {
+ if (len > 3) {
+ len &= ~3;
+ insl(BASE + EP_W1_RX_PIO_RD_1,
+ mtod(m, caddr_t), len / 4);
+ } else
+ insb(BASE + EP_W1_RX_PIO_RD_1,
+ mtod(m, caddr_t), len);
+ } else {
+ if (len > 1) {
+ len &= ~1;
+ insw(BASE + EP_W1_RX_PIO_RD_1,
+ mtod(m, caddr_t), len / 2);
+ } else
+ *(mtod(m, caddr_t)) =
+ inb(BASE + EP_W1_RX_PIO_RD_1);
+ }
+ m->m_len = len;
+ totlen -= len;
+ *mp = m;
+ mp = &m->m_next;
+ }
+
+ outw(BASE + EP_COMMAND, RX_DISCARD_TOP_PACK);
+ while (inw(BASE + EP_STATUS) & S_COMMAND_IN_PROGRESS)
+ ;
+
+ splx(sh);
+
+ return top;
+}
+
+int
+epioctl(ifp, cmd, data)
+ register struct ifnet *ifp;
+ u_long cmd;
+ caddr_t data;
+{
+ struct ep_softc *sc = ep_cd.cd_devs[ifp->if_unit];
+ struct ifaddr *ifa = (struct ifaddr *)data;
+ struct ifreq *ifr = (struct ifreq *)data;
+ int s, error = 0;
+
+ s = splnet();
+
+ if (sc->bustype == EP_BUS_PCMCIA &&
+ (sc->pcmcia_flags & EP_ABSENT)) {
+ if_down(ifp);
+ printf("%s: device offline\n", sc->sc_dev.dv_xname);
+ splx(s);
+ return ENXIO;
+ }
+
+ if ((error = ether_ioctl(ifp, &sc->sc_arpcom, 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:
+ epinit(sc);
+ arp_ifinit(&sc->sc_arpcom, ifa);
+ break;
+#endif
+ default:
+ epinit(sc);
+ break;
+ }
+ break;
+
+ case SIOCSIFFLAGS:
+ if ((ifp->if_flags & IFF_UP) == 0 &&
+ (ifp->if_flags & IFF_RUNNING) != 0) {
+ /*
+ * If interface is marked down and it is running, then
+ * stop it.
+ */
+ epstop(sc);
+ ifp->if_flags &= ~IFF_RUNNING;
+ } else if ((ifp->if_flags & IFF_UP) != 0 &&
+ (ifp->if_flags & IFF_RUNNING) == 0) {
+ /*
+ * If interface is marked up and it is stopped, then
+ * start it.
+ */
+ epinit(sc);
+ } else {
+ /*
+ * deal with flags changes:
+ * IFF_MULTICAST, IFF_PROMISC,
+ * IFF_LINK0, IFF_LINK1,
+ */
+ epsetfilter(sc);
+ epsetlink(sc);
+ }
+ break;
+
+ case SIOCADDMULTI:
+ case SIOCDELMULTI:
+ error = (cmd == SIOCADDMULTI) ?
+ ether_addmulti(ifr, &sc->sc_arpcom) :
+ ether_delmulti(ifr, &sc->sc_arpcom);
+
+ if (error == ENETRESET) {
+ /*
+ * Multicast list has changed; set the hardware filter
+ * accordingly.
+ */
+ epreset(sc);
+ error = 0;
+ }
+ break;
+
+ default:
+ error = EINVAL;
+ break;
+ }
+
+ splx(s);
+ return (error);
+}
+
+void
+epreset(sc)
+ struct ep_softc *sc;
+{
+ int s;
+
+ s = splnet();
+ epstop(sc);
+ epinit(sc);
+ splx(s);
+}
+
+void
+epwatchdog(unit)
+ int unit;
+{
+ struct ep_softc *sc = ep_cd.cd_devs[unit];
+
+ log(LOG_ERR, "%s: device timeout\n", sc->sc_dev.dv_xname);
+ ++sc->sc_arpcom.ac_if.if_oerrors;
+
+ epreset(sc);
+}
+
+void
+epstop(sc)
+ register struct ep_softc *sc;
+{
+
+ outw(BASE + EP_COMMAND, RX_DISABLE);
+ outw(BASE + EP_COMMAND, RX_DISCARD_TOP_PACK);
+ while (inw(BASE + EP_STATUS) & S_COMMAND_IN_PROGRESS)
+ ;
+ outw(BASE + EP_COMMAND, TX_DISABLE);
+ outw(BASE + EP_COMMAND, STOP_TRANSCEIVER);
+ outw(BASE + EP_COMMAND, RX_RESET);
+ outw(BASE + EP_COMMAND, TX_RESET);
+ outw(BASE + EP_COMMAND, C_INTR_LATCH);
+ outw(BASE + EP_COMMAND, SET_RD_0_MASK);
+ outw(BASE + EP_COMMAND, SET_INTR_MASK);
+ outw(BASE + EP_COMMAND, SET_RX_FILTER);
+
+ epmbufempty(sc);
+}
+
+/*
+ * We get eeprom data from the id_port given an offset into the
+ * eeprom. Basically; after the ID_sequence is sent to all of
+ * the cards; they enter the ID_CMD state where they will accept
+ * command requests. 0x80-0xbf loads the eeprom data. We then
+ * read the port 16 times and with every read; the cards check
+ * for contention (ie: if one card writes a 0 bit and another
+ * writes a 1 bit then the host sees a 0. At the end of the cycle;
+ * each card compares the data on the bus; if there is a difference
+ * then that card goes into ID_WAIT state again). In the meantime;
+ * one bit of data is returned in the AX register which is conveniently
+ * returned to us by inb(). Hence; we read 16 times getting one
+ * bit of data with each read.
+ */
+static u_short
+epreadeeprom(id_port, offset)
+ int id_port;
+ int offset;
+{
+ int i, data = 0;
+
+ outb(id_port, 0x80 + offset);
+ delay(1000);
+ for (i = 0; i < 16; i++)
+ data = (data << 1) | (inw(id_port) & 1);
+ return (data);
+}
+
+static int
+epbusyeeprom(sc)
+ struct ep_softc *sc;
+{
+ int i = 100, j;
+
+ if (sc->bustype == EP_BUS_PCMCIA) {
+ delay(1000);
+ return 0;
+ }
+
+ while (i--) {
+ j = inw(BASE + EP_W0_EEPROM_COMMAND);
+ if (j & EEPROM_BUSY)
+ delay(100);
+ else
+ break;
+ }
+ if (!i) {
+ printf("\n%s: eeprom failed to come ready\n",
+ sc->sc_dev.dv_xname);
+ return (1);
+ }
+ if (j & EEPROM_TST_MODE) {
+ printf("\n%s: erase pencil mark, or disable plug-n-play mode!\n",
+ sc->sc_dev.dv_xname);
+ return (1);
+ }
+ return (0);
+}
+
+void
+epmbuffill(arg)
+ void *arg;
+{
+ struct ep_softc *sc = arg;
+ int s, i;
+
+ s = splnet();
+ i = sc->last_mb;
+ do {
+ if (sc->mb[i] == NULL)
+ MGET(sc->mb[i], M_DONTWAIT, MT_DATA);
+ if (sc->mb[i] == NULL)
+ break;
+ i = (i + 1) % MAX_MBS;
+ } while (i != sc->next_mb);
+ sc->last_mb = i;
+ /* If the queue was not filled, try again. */
+ if (sc->last_mb != sc->next_mb)
+ timeout(epmbuffill, sc, 1);
+ splx(s);
+}
+
+void
+epmbufempty(sc)
+ struct ep_softc *sc;
+{
+ int s, i;
+
+ s = splnet();
+ for (i = 0; i<MAX_MBS; i++) {
+ if (sc->mb[i]) {
+ m_freem(sc->mb[i]);
+ sc->mb[i] = NULL;
+ }
+ }
+ sc->last_mb = sc->next_mb = 0;
+ untimeout(epmbuffill, sc);
+ splx(s);
+}
projects / openbsd / commitdiff