summaryrefslogtreecommitdiff
path: root/sys/arch/hp300/stand/common/if_le.c
diff options
context:
space:
mode:
Diffstat (limited to 'sys/arch/hp300/stand/common/if_le.c')
-rw-r--r--sys/arch/hp300/stand/common/if_le.c681
1 files changed, 681 insertions, 0 deletions
diff --git a/sys/arch/hp300/stand/common/if_le.c b/sys/arch/hp300/stand/common/if_le.c
new file mode 100644
index 00000000000..802722993b6
--- /dev/null
+++ b/sys/arch/hp300/stand/common/if_le.c
@@ -0,0 +1,681 @@
+/* $OpenBSD: if_le.c,v 1.1 1997/07/14 08:14:16 downsj Exp $ */
+/* $NetBSD: if_le.c,v 1.9 1997/01/30 10:32:54 thorpej Exp $ */
+
+/*
+ * Copyright (c) 1993 Adam Glass
+ * 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 Adam Glass.
+ * 4. The name of the Author may not be used to endorse or promote products
+ * derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY Adam Glass ``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 REGENTS OR CONTRIBUTORS 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 <sys/param.h>
+#include <sys/types.h>
+
+#include <netinet/in.h>
+#include <netinet/in_systm.h>
+
+#include <lib/libsa/stand.h>
+#include <lib/libsa/netif.h>
+
+#include "device.h"
+#include "if_lereg.h"
+
+#include "samachdep.h"
+
+#ifndef NLE
+#define NLE 1
+#endif
+
+#ifdef LE_DEBUG
+int le_debug = 0;
+#endif
+
+#define ETHER_MIN_LEN 64
+#define ETHER_MAX_LEN 1518
+#define ETHER_ADDR_LEN 6
+
+int le_probe();
+int le_match();
+void le_init();
+int le_get();
+int le_put();
+void le_end();
+
+struct le_sel {
+ int le_id;
+ int le_regs;
+ int le_mem;
+ int le_nvram;
+ int le_heat;
+ int le_bonus;
+} le0conf[] = {
+/* offsets for: ID REGS MEM NVRAM le_heat le_bonus*/
+{ 0, 0x4000, 0x8000, 0xC008, 1, 10 }
+};
+
+extern struct netif_stats le_stats[];
+
+struct netif_dif le_ifs[] = {
+/* dif_unit dif_nsel dif_stats dif_private */
+{ 0, NENTS(le0conf), &le_stats[0], le0conf, },
+};
+
+struct netif_stats le_stats[NENTS(le_ifs)];
+
+struct netif_driver le_driver = {
+ "le", /* netif_bname */
+ le_match, /* netif_match */
+ le_probe, /* netif_probe */
+ le_init, /* netif_init */
+ le_get, /* netif_get */
+ le_put, /* netif_put */
+ le_end, /* netif_end */
+ le_ifs, /* netif_ifs */
+ NENTS(le_ifs) /* netif_nifs */
+};
+
+struct le_softc {
+ struct lereg0 *sc_r0; /* DIO registers */
+ struct lereg1 *sc_r1; /* LANCE registers */
+ void *sc_mem;
+ struct init_block *sc_init;
+ struct mds *sc_rd, *sc_td;
+ u_char *sc_rbuf, *sc_tbuf;
+ int sc_next_rd, sc_next_td;
+ u_char sc_addr[ETHER_ADDR_LEN];
+} le_softc[NLE];
+
+static inline void
+lewrcsr(sc, port, val)
+ struct le_softc *sc;
+ register u_short port;
+ register u_short val;
+{
+ register struct lereg0 *ler0 = sc->sc_r0;
+ register struct lereg1 *ler1 = sc->sc_r1;
+
+ do {
+ ler1->ler1_rap = port;
+ } while ((ler0->ler0_status & LE_ACK) == 0);
+ do {
+ ler1->ler1_rdp = val;
+ } while ((ler0->ler0_status & LE_ACK) == 0);
+}
+
+static inline u_short
+lerdcsr(sc, port)
+ struct le_softc *sc;
+ register u_short port;
+{
+ register struct lereg0 *ler0 = sc->sc_r0;
+ register struct lereg1 *ler1 = sc->sc_r1;
+ register u_short val;
+
+ do {
+ ler1->ler1_rap = port;
+ } while ((ler0->ler0_status & LE_ACK) == 0);
+ do {
+ val = ler1->ler1_rdp;
+ } while ((ler0->ler0_status & LE_ACK) == 0);
+ return (val);
+}
+
+leinit()
+{
+ extern struct hp_hw sc_table[];
+ register struct hp_hw *hw;
+ struct le_softc *sc;
+ struct le_sel *sels;
+ register int i, n;
+ char *cp;
+
+ i = 0;
+
+ for (hw = sc_table; i < NLE && hw < &sc_table[MAXCTLRS]; hw++) {
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("found type %x\n", hw->hw_type);
+#endif
+
+#if 0
+ if (!HW_ISDEV(hw, D_LAN))
+ continue;
+#endif
+
+ sels = (struct le_sel *)le_ifs[i].dif_private;
+
+ sc = &le_softc[i];
+ sc->sc_r0 = (struct lereg0 *)(sels->le_id + (int)hw->hw_kva);
+
+ if (sc->sc_r0->ler0_id != LEID)
+ continue;
+
+ sc->sc_r1 = (struct lereg1 *)(sels->le_regs + (int)hw->hw_kva);
+ sc->sc_mem = (struct lereg2 *)(sels->le_mem + (int)hw->hw_kva);
+
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d: DIO=%x regs=%x mem=%x\n",
+ i, sc->sc_r0, sc->sc_r1, sc->sc_mem);
+#endif
+
+ /*
+ * Read the ethernet address off the board, one nibble at a time.
+ */
+ cp = (char *)(sels->le_nvram + (int)hw->hw_kva);
+ for (n = 0; n < sizeof(sc->sc_addr); n++) {
+ sc->sc_addr[n] = (*++cp & 0xF) << 4;
+ cp++;
+ sc->sc_addr[n] |= *++cp & 0xF;
+ cp++;
+ }
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d at sc%d physical address %s\n",
+ i, hw->hw_sc, ether_sprintf(sc->sc_addr));
+#endif
+ hw->hw_pa = (caddr_t) i; /* XXX for autoconfig */
+ i++;
+ }
+}
+
+int
+le_match(nif, machdep_hint)
+ struct netif *nif;
+ void *machdep_hint;
+{
+ struct le_sel *sels;
+ char *name = machdep_hint;
+ int rv = 0;
+
+ if (nif->nif_sel < le_ifs[nif->nif_unit].dif_nsel) {
+ sels = (struct le_sel *)le_ifs[nif->nif_unit].dif_private;
+ rv = sels[nif->nif_sel].le_heat;
+ if (name && !strncmp(le_driver.netif_bname, name, 2))
+ rv += sels[nif->nif_sel].le_bonus;
+ }
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d: sel %d --> %d\n", nif->nif_unit, nif->nif_sel,
+ rv);
+#endif
+ return rv;
+}
+
+le_probe(nif, machdep_hint)
+ struct netif *nif;
+ void *machdep_hint;
+{
+ char *cp;
+ int i;
+
+ /* the set unit is the current unit */
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d.%d: le_probe called\n", nif->nif_unit, nif->nif_sel);
+#endif
+ /* XXX reset controller */
+ return 0;
+}
+
+#ifdef MEM_SUMMARY
+void le_mem_summary(unit)
+{
+ struct lereg1 *ler1 = le_softc.sc_r1;
+ struct lereg2 *ler2 = le_softc.sc_r2;
+ register int i;
+
+ printf("le%d: ler1 = %x\n", unit, ler1);
+ printf("le%d: ler2 = %x\n", unit, ler2);
+
+#if 0
+ ler1->ler1_rap = LE_CSR0;
+ ler1->ler1_rdp = LE_STOP;
+ printf("le%d: csr0 = %x\n", unit, ler1->ler1_rdp);
+ ler1->ler1_rap = LE_CSR1;
+ printf("le%d: csr1 = %x\n", unit, ler1->ler1_rdp);
+ ler1->ler1_rap = LE_CSR2;
+ printf("le%d: csr2 = %x\n", unit, ler1->ler1_rdp);
+ ler1->ler1_rap = LE_CSR3;
+ printf("le%d: csr3 = %x\n", unit, ler1->ler1_rdp);
+#endif
+ printf("le%d: ladrf[0] = %x\n", unit, ler2->ler2_ladrf[0]);
+ printf("le%d: ladrf[1] = %x\n", unit, ler2->ler2_ladrf[1]);
+ printf("le%d: ler2_rdra = %x\n", unit, ler2->ler2_rdra);
+ printf("le%d: ler2_rlen = %x\n", unit, ler2->ler2_rlen);
+ printf("le%d: ler2_tdra = %x\n", unit, ler2->ler2_tdra);
+ printf("le%d: ler2_tlen = %x\n", unit, ler2->ler2_tlen);
+
+ for (i = 0; i < LERBUF; i++) {
+ printf("le%d: ler2_rmd[%d].rmd0 (ladr) = %x\n", unit, i,
+ ler2->ler2_rmd[i].rmd0);
+ printf("le%d: ler2_rmd[%d].rmd1 = %x\n", unit, i,
+ ler2->ler2_rmd[i].rmd1);
+ printf("le%d: ler2_rmd[%d].rmd2 (-bcnt) = %x\n", unit, i,
+ ler2->ler2_rmd[i].rmd2);
+ printf("le%d: ler2_rmd[%d].rmd3 (mcnt) = %x\n", unit, i,
+ ler2->ler2_rmd[i].rmd3);
+ printf("le%d: ler2_rbuf[%d] addr = %x\n", unit, i,
+ &ler2->ler2_rbuf[i]);
+ }
+ for (i = 0; i < LETBUF; i++) {
+ printf("le%d: ler2_tmd[%d].tmd0 = %x\n", unit, i,
+ ler2->ler2_tmd[i].tmd0);
+ printf("le%d: ler2_tmd[%d].tmd1 = %x\n", unit, i,
+ ler2->ler2_tmd[i].tmd1);
+ printf("le%d: ler2_tmd[%d].tmd2 (bcnt) = %x\n", unit, i,
+ ler2->ler2_tmd[i].tmd2);
+ printf("le%d: ler2_tmd[%d].tmd3 = %x\n", unit, i,
+ ler2->ler2_tmd[i].tmd3);
+ printf("le%d: ler2_tbuf[%d] addr = %x\n", unit, i,
+ &ler2->ler2_tbuf[i]);
+ }
+}
+#else
+#define le_mem_summary(u)
+#endif
+
+void
+le_error(unit, str, stat)
+ int unit;
+ char *str;
+ u_short stat;
+{
+
+ if (stat & LE_BABL)
+ panic("le%d: been babbling, found by '%s'\n", unit, str);
+ if (stat & LE_CERR)
+ le_stats[unit].collision_error++;
+ if (stat & LE_MISS)
+ le_stats[unit].missed++;
+ if (stat & LE_MERR) {
+ printf("le%d: memory error in '%s'\n", unit, str);
+ le_mem_summary(unit);
+ panic("bye");
+ }
+}
+
+#define LANCE_ADDR(sc, a) \
+ ((u_long)(a) - (u_long)sc->sc_mem)
+
+/* LANCE initialization block set up. */
+void
+lememinit(sc)
+ register struct le_softc *sc;
+{
+ int i;
+ void *mem;
+ u_long a;
+
+ /*
+ * At this point we assume that the memory allocated to the Lance is
+ * quadword aligned. If it isn't then the initialisation is going
+ * fail later on.
+ */
+ mem = sc->sc_mem;
+
+ sc->sc_init = mem;
+ sc->sc_init->mode = LE_NORMAL;
+ for (i = 0; i < ETHER_ADDR_LEN; i++)
+ sc->sc_init->padr[i] = sc->sc_addr[i^1];
+ sc->sc_init->ladrf[0] = sc->sc_init->ladrf[1] = 0;
+ mem += sizeof(struct init_block);
+
+ sc->sc_rd = mem;
+ a = LANCE_ADDR(sc, mem);
+ sc->sc_init->rdra = a;
+ sc->sc_init->rlen = ((a >> 16) & 0xff) | (RLEN << 13);
+ mem += NRBUF * sizeof(struct mds);
+
+ sc->sc_td = mem;
+ a = LANCE_ADDR(sc, mem);
+ sc->sc_init->tdra = a;
+ sc->sc_init->tlen = ((a >> 16) & 0xff) | (TLEN << 13);
+ mem += NTBUF * sizeof(struct mds);
+
+ /*
+ * Set up receive ring descriptors.
+ */
+ sc->sc_rbuf = mem;
+ for (i = 0; i < NRBUF; i++) {
+ a = LANCE_ADDR(sc, mem);
+ sc->sc_rd[i].addr = a;
+ sc->sc_rd[i].flags = ((a >> 16) & 0xff) | LE_OWN;
+ sc->sc_rd[i].bcnt = -BUFSIZE;
+ sc->sc_rd[i].mcnt = 0;
+ mem += BUFSIZE;
+ }
+
+ /*
+ * Set up transmit ring descriptors.
+ */
+ sc->sc_tbuf = mem;
+ for (i = 0; i < NTBUF; i++) {
+ a = LANCE_ADDR(sc, mem);
+ sc->sc_td[i].addr = a;
+ sc->sc_td[i].flags = ((a >> 16) & 0xff);
+ sc->sc_td[i].bcnt = 0xf000;
+ sc->sc_td[i].mcnt = 0;
+ mem += BUFSIZE;
+ }
+}
+
+void
+le_reset(unit, myea)
+ int unit;
+ u_char *myea;
+{
+ struct le_softc *sc = &le_softc[unit];
+ u_long a;
+ int timo = 100000, stat, i;
+
+#ifdef LE_DEBUG
+ if (le_debug) {
+ printf("le%d: le_reset called\n", unit);
+ printf(" r0=%x, r1=%x, mem=%x, addr=%x:%x:%x:%x:%x:%x\n",
+ sc->sc_r0, sc->sc_r1, sc->sc_mem,
+ sc->sc_addr[0], sc->sc_addr[1], sc->sc_addr[2],
+ sc->sc_addr[3], sc->sc_addr[4], sc->sc_addr[5]);
+ }
+#endif
+ lewrcsr(sc, 0, LE_STOP);
+ for (timo = 1000; timo; timo--);
+
+ sc->sc_next_rd = sc->sc_next_td = 0;
+
+ /* Set up LANCE init block. */
+ lememinit(sc);
+
+ if (myea)
+ bcopy(sc->sc_addr, myea, ETHER_ADDR_LEN);
+
+ /* Turn on byte swapping. */
+ lewrcsr(sc, 3, LE_BSWP);
+
+ /* Give LANCE the physical address of its init block. */
+ a = LANCE_ADDR(sc, sc->sc_init);
+ lewrcsr(sc, 1, a);
+ lewrcsr(sc, 2, (a >> 16) & 0xff);
+
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d: before init\n", unit);
+#endif
+
+ /* Try to initialize the LANCE. */
+ lewrcsr(sc, 0, LE_INIT);
+
+ /* Wait for initialization to finish. */
+ for (timo = 100000; timo; timo--)
+ if (lerdcsr(sc, 0) & LE_IDON)
+ break;
+
+ if (lerdcsr(sc, 0) & LE_IDON) {
+ /* Start the LANCE. */
+ lewrcsr(sc, 0, LE_INEA | LE_STRT | LE_IDON);
+ } else
+ printf("le%d: card failed to initialize\n", unit);
+
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d: after init\n", unit);
+#endif
+
+ le_mem_summary(unit);
+}
+
+int
+le_poll(desc, pkt, len)
+ struct iodesc *desc;
+ void *pkt;
+ int len;
+{
+ struct netif *nif = desc->io_netif;
+ int unit = /*nif->nif_unit*/0;
+ struct le_softc *sc = &le_softc[unit];
+ volatile struct lereg0 *ler0 = sc->sc_r0;
+ volatile struct lereg1 *ler1 = sc->sc_r1;
+ int length;
+ volatile struct mds *cdm;
+ register int stat;
+
+#ifdef LE_DEBUG
+ if (/*le_debug*/0)
+ printf("le%d: le_poll called. next_rd=%d\n", unit, sc->sc_next_rd);
+#endif
+ stat = lerdcsr(sc, 0);
+ lewrcsr(sc, 0, stat & (LE_BABL | LE_MISS | LE_MERR | LE_RINT));
+ cdm = &sc->sc_rd[sc->sc_next_rd];
+ if (cdm->flags & LE_OWN)
+ return 0;
+#ifdef LE_DEBUG
+ if (le_debug) {
+ printf("next_rd %d\n", sc->sc_next_rd);
+ printf("cdm->flags %x\n", cdm->flags);
+ printf("cdm->bcnt %x, cdm->mcnt %x\n", cdm->bcnt, cdm->mcnt);
+ printf("cdm->rbuf msg %d buf %d\n", cdm->mcnt, -cdm->bcnt );
+ }
+#endif
+ if (stat & (LE_BABL | LE_CERR | LE_MISS | LE_MERR))
+ le_error(unit, "le_poll", stat);
+ if (cdm->flags & (LE_FRAM | LE_OFLO | LE_CRC | LE_RBUFF)) {
+ printf("le%d_poll: rmd status 0x%x\n", unit, cdm->flags);
+ length = 0;
+ goto cleanup;
+ }
+ if ((cdm->flags & (LE_STP|LE_ENP)) != (LE_STP|LE_ENP))
+ panic("le_poll: chained packet\n");
+
+ length = cdm->mcnt;
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le_poll: length %d\n", length);
+#endif
+ if (length >= BUFSIZE) {
+ length = 0;
+ panic("csr0 when bad things happen: %x\n", stat);
+ goto cleanup;
+ }
+ if (!length)
+ goto cleanup;
+ length -= 4;
+
+ if (length > 0) {
+ /*
+ * If the length of the packet is greater than the size of the
+ * buffer, we have to truncate it, to avoid Bad Things.
+ * XXX Is this the right thing to do?
+ */
+ if (length > len)
+ length = len;
+
+ bcopy(sc->sc_rbuf + (BUFSIZE * sc->sc_next_rd), pkt, length);
+ }
+
+cleanup:
+ cdm->mcnt = 0;
+ cdm->flags |= LE_OWN;
+ if (++sc->sc_next_rd >= NRBUF)
+ sc->sc_next_rd = 0;
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("new next_rd %d\n", sc->sc_next_rd);
+#endif
+
+ return length;
+}
+
+int
+le_put(desc, pkt, len)
+ struct iodesc *desc;
+ void *pkt;
+ int len;
+{
+ struct netif *nif = desc->io_netif;
+ int unit = /*nif->nif_unit*/0;
+ struct le_softc *sc = &le_softc[unit];
+ volatile struct lereg0 *ler0 = sc->sc_r0;
+ volatile struct lereg1 *ler1 = sc->sc_r1;
+ volatile struct mds *cdm;
+ int timo, i, stat;
+
+ le_put_loop:
+ timo = 100000;
+
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d: le_put called. next_td=%d\n", unit, sc->sc_next_td);
+#endif
+ stat = lerdcsr(sc, 0);
+ lewrcsr(sc, 0, stat & (LE_BABL | LE_MISS | LE_MERR | LE_TINT));
+ if (stat & (LE_BABL | LE_CERR | LE_MISS | LE_MERR))
+ le_error(unit, "le_put(way before xmit)", stat);
+ cdm = &sc->sc_td[sc->sc_next_td];
+ i = 0;
+#if 0
+ while (cdm->flags & LE_OWN) {
+ if ((i % 100) == 0)
+ printf("le%d: output buffer busy - flags=%x\n",
+ unit, cdm->flags);
+ if (i++ > 500) break;
+ }
+ if (cdm->flags & LE_OWN)
+ getchar();
+#else
+ while (cdm->flags & LE_OWN);
+#endif
+ bcopy(pkt, sc->sc_tbuf + (BUFSIZE * sc->sc_next_td), len);
+ if (len < ETHER_MIN_LEN)
+ cdm->bcnt = -ETHER_MIN_LEN;
+ else
+ cdm->bcnt = -len;
+ cdm->mcnt = 0;
+ cdm->flags |= LE_OWN | LE_STP | LE_ENP;
+ stat = lerdcsr(sc, 0);
+ if (stat & (LE_BABL | LE_CERR | LE_MISS | LE_MERR))
+ le_error(unit, "le_put(before xmit)", stat);
+ lewrcsr(sc, 0, LE_TDMD);
+ stat = lerdcsr(sc, 0);
+ if (stat & (LE_BABL | LE_CERR | LE_MISS | LE_MERR))
+ le_error(unit, "le_put(after xmit)", stat);
+ do {
+ if (--timo == 0) {
+ printf("le%d: transmit timeout, stat = 0x%x\n",
+ unit, stat);
+ if (stat & LE_SERR)
+ le_error(unit, "le_put(timeout)", stat);
+ if (stat & LE_INIT) {
+ printf("le%d: reset and retry packet\n");
+ lewrcsr(sc, 0, LE_TINT); /* sanity */
+ le_init();
+ goto le_put_loop;
+ }
+ break;
+ }
+ stat = lerdcsr(sc, 0);
+ } while ((stat & LE_TINT) == 0);
+ lewrcsr(sc, 0, LE_TINT);
+ if (stat & (LE_BABL |/* LE_CERR |*/ LE_MISS | LE_MERR)) {
+ printf("le_put: xmit error, buf %d\n", sc->sc_next_td);
+ le_error(unit, "le_put(xmit error)", stat);
+ }
+ if (++sc->sc_next_td >= NTBUF)
+ sc->sc_next_td = 0;
+ if (cdm->flags & LE_DEF)
+ le_stats[unit].deferred++;
+ if (cdm->flags & LE_ONE)
+ le_stats[unit].collisions++;
+ if (cdm->flags & LE_MORE)
+ le_stats[unit].collisions+=2;
+ if (cdm->flags & LE_ERR) {
+ printf("le%d: transmit error, error = 0x%x\n", unit,
+ cdm->mcnt);
+ return -1;
+ }
+#ifdef LE_DEBUG
+ if (le_debug) {
+ printf("le%d: le_put() successful: sent %d\n", unit, len);
+ printf("le%d: le_put(): flags: %x mcnt: %x\n", unit,
+ (unsigned int) cdm->flags,
+ (unsigned int) cdm->mcnt);
+ }
+#endif
+ return len;
+}
+
+
+int
+le_get(desc, pkt, len, timeout)
+ struct iodesc *desc;
+ void *pkt;
+ int len;
+ time_t timeout;
+{
+ time_t t;
+ int cc;
+
+ t = getsecs();
+ cc = 0;
+ while (((getsecs() - t) < timeout) && !cc) {
+ cc = le_poll(desc, pkt, len);
+ }
+ return cc;
+}
+
+void
+le_init(desc, machdep_hint)
+ struct iodesc *desc;
+ void *machdep_hint;
+{
+ struct netif *nif = desc->io_netif;
+ int unit = nif->nif_unit;
+
+ /* Get machine's common ethernet interface. This is done in leinit() */
+ /* machdep_common_ether(myea); */
+ leinit();
+
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d: le_init called\n", unit);
+#endif
+ unit = 0;
+ le_reset(unit, desc->myea);
+}
+
+void
+le_end(nif)
+ struct netif *nif;
+{
+ int unit = nif->nif_unit;
+
+#ifdef LE_DEBUG
+ if (le_debug)
+ printf("le%d: le_end called\n", unit);
+#endif
+
+ lewrcsr(&le_softc[unit], 0, LE_STOP);
+}