File: [local] / sys / dev / isa / if_ex.c (download)
Revision 1.1, Tue Mar 4 16:11:18 2008 UTC (16 years, 5 months ago) by nbrk
Branch point for: MAIN
Initial revision
|
/* $OpenBSD: if_ex.c,v 1.16 2007/06/06 09:44:30 henning Exp $ */
/*
* Copyright (c) 1997, Donald A. Schmidt
* Copyright (c) 1996, Javier Martín Rueda (jmrueda@diatel.upm.es)
* 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 unmodified, 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.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``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 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.
*/
/*
* Intel EtherExpress Pro/10 Ethernet driver
*
* Revision history:
*
* 30-Oct-1996: first beta version. Inet and BPF supported, but no multicast.
*/
#include "ex.h"
#if NEX > 0
#include "bpfilter.h"
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/conf.h>
#include <sys/sockio.h>
#include <sys/mbuf.h>
#include <sys/socket.h>
#include <sys/device.h>
#include <net/if.h>
#ifdef INET
#include <netinet/in.h>
#include <netinet/if_ether.h>
#endif
#if NBPFILTER > 0
#include <net/bpf.h>
#endif
#include <machine/cpu.h>
#include <machine/bus.h>
#include <dev/isa/isavar.h>
#include <dev/isa/if_exreg.h>
#ifdef EXDEBUG
#define Start_End 1
#define Rcvd_Pkts 2
#define Sent_Pkts 4
#define Status 8
static int debug_mask = 0;
static int exintr_count = 0;
#define DODEBUG(level, action) if (level & debug_mask) action
#else
#define DODEBUG(level, action)
#endif
#define Conn_BNC 1
#define Conn_TPE 2
#define Conn_AUI 3
struct ex_softc {
struct arpcom arpcom; /* Ethernet common data */
int iobase; /* I/O base address. */
u_short connector; /* Connector type. */
u_short irq_no; /* IRQ number. */
u_int mem_size; /* Total memory size, in bytes. */
u_int rx_mem_size; /* Rx memory size (by default, first 3/4 of
total memory). */
u_int rx_lower_limit,
rx_upper_limit; /* Lower and upper limits of receive buffer. */
u_int rx_head; /* Head of receive ring buffer. */
u_int tx_mem_size; /* Tx memory size (by default, last quarter of
total memory). */
u_int tx_lower_limit,
tx_upper_limit; /* Lower and upper limits of transmit buffer. */
u_int tx_head, tx_tail; /* Head and tail of transmit ring buffer. */
u_int tx_last; /* Pointer to beginning of last frame in the
chain. */
bus_space_tag_t sc_iot; /* ISA i/o space tag */
bus_space_handle_t sc_ioh; /* ISA i/o space handle */
void *sc_ih; /* Device interrupt handler */
};
/* static struct ex_softc ex_sc[NEX]; XXX would it be better to malloc(3)
the memory? */
static char irq2eemap[] = { -1, -1, 0, 1, -1, 2, -1, -1, -1, 0, 3, 4, -1, -1,
-1, -1 };
static u_char ee2irqmap[] = { 9, 3, 5, 10, 11, 0, 0, 0 };
static int ex_probe(struct device *, void *, void *);
static void ex_attach(struct device *, struct device *, void *);
static void ex_init(struct ex_softc *);
static void ex_start(struct ifnet *);
static void ex_stop(struct ex_softc *);
static int ex_ioctl(struct ifnet *, u_long, caddr_t);
static void ex_reset(struct ex_softc *);
static void ex_watchdog(struct ifnet *);
static u_short eeprom_read(struct ex_softc *, int);
static int look_for_card(struct isa_attach_args *, struct ex_softc *sc);
static int exintr(void *);
static void ex_tx_intr(struct ex_softc *);
static void ex_rx_intr(struct ex_softc *);
struct cfattach ex_ca = {
sizeof(struct ex_softc), ex_probe, ex_attach
};
struct cfdriver ex_cd = {
NULL, "ex", DV_IFNET
};
#define BANK_SEL(X) bus_space_write_1(sc->sc_iot, sc->sc_ioh, CMD_REG, \
(X))
#define ISA_GET(offset) bus_space_read_1(sc->sc_iot, sc->sc_ioh, (offset))
#define ISA_PUT(offset, value) bus_space_write_1(sc->sc_iot, sc->sc_ioh, \
(offset), (value))
#define ISA_GET_2(offset) bus_space_read_2(sc->sc_iot, sc->sc_ioh, \
(offset))
#define ISA_PUT_2(offset, value) bus_space_write_2(sc->sc_iot, sc->sc_ioh, \
(offset), (value))
#define ISA_GET_2_MULTI(offset, addr, count) bus_space_read_multi_2( \
sc->sc_iot, sc->sc_ioh, (offset), (addr), (count))
#define ISA_PUT_2_MULTI(offset, addr, count) bus_space_write_multi_2( \
sc->sc_iot, sc->sc_ioh, (offset), (addr), (count))
static int
look_for_card(ia, sc)
struct isa_attach_args *ia;
struct ex_softc *sc;
{
int count1, count2;
/*
* Check for the i82595 signature, and check that the round robin
* counter actually advances.
*/
if (((count1 = ISA_GET(ID_REG)) & Id_Mask) != Id_Sig)
return(0);
count2 = ISA_GET(ID_REG);
count2 = ISA_GET(ID_REG);
count2 = ISA_GET(ID_REG);
if ((count2 & Counter_bits) == ((count1 + 0xc0) & Counter_bits))
return(1);
else
return(0);
}
int
ex_probe(parent, match, aux)
struct device *parent;
void *match, *aux;
{
struct ex_softc *sc = match;
struct isa_attach_args *ia = aux;
u_short eaddr_tmp;
int tmp;
DODEBUG(Start_End, printf("ex_probe: start\n"););
if ((ia->ia_iobase >= 0x200) && (ia->ia_iobase <= 0x3a0)) {
sc->sc_iot = ia->ia_iot;
if(bus_space_map(sc->sc_iot, ia->ia_iobase, EX_IOSIZE, 0,
&sc->sc_ioh))
return(0);
if (!look_for_card(ia, sc)) {
bus_space_unmap(sc->sc_iot, sc->sc_ioh, EX_IOSIZE);
return(0);
}
} else
return(0);
ia->ia_iosize = EX_IOSIZE;
/*
* Reset the card.
*/
ISA_PUT(CMD_REG, Reset_CMD);
delay(200);
/*
* Fill in several fields of the softc structure:
* - I/O base address.
* - Hardware Ethernet address.
* - IRQ number (if not supplied in config file, read it from
* EEPROM).
* - Connector type.
*/
sc->iobase = ia->ia_iobase;
eaddr_tmp = eeprom_read(sc, EE_Eth_Addr_Lo);
sc->arpcom.ac_enaddr[5] = eaddr_tmp & 0xff;
sc->arpcom.ac_enaddr[4] = eaddr_tmp >> 8;
eaddr_tmp = eeprom_read(sc, EE_Eth_Addr_Mid);
sc->arpcom.ac_enaddr[3] = eaddr_tmp & 0xff;
sc->arpcom.ac_enaddr[2] = eaddr_tmp >> 8;
eaddr_tmp = eeprom_read(sc, EE_Eth_Addr_Hi);
sc->arpcom.ac_enaddr[1] = eaddr_tmp & 0xff;
sc->arpcom.ac_enaddr[0] = eaddr_tmp >> 8;
tmp = eeprom_read(sc, EE_IRQ_No) & IRQ_No_Mask;
if (ia->ia_irq > 0) {
if (ee2irqmap[tmp] != ia->ia_irq)
printf("ex: WARING: board's EEPROM is configured for IRQ %d, using %d\n", ee2irqmap[tmp], ia->ia_irq);
sc->irq_no = ia->ia_irq;
}
else {
sc->irq_no = ee2irqmap[tmp];
ia->ia_irq = sc->irq_no;
}
if (sc->irq_no == 0) {
printf("ex: invalid IRQ.\n");
return(0);
}
BANK_SEL(Bank2_Sel);
tmp = ISA_GET(REG3);
if (tmp & TPE_bit)
sc->connector = Conn_TPE;
else if (tmp & BNC_bit)
sc->connector = Conn_BNC;
else
sc->connector = Conn_AUI;
sc->mem_size = CARD_RAM_SIZE; /* XXX This should be read from the card
itself. */
BANK_SEL(Bank0_Sel);
DODEBUG(Start_End, printf("ex_probe: finish\n"););
return(1);
}
void
ex_attach(parent, self, aux)
struct device *parent, *self;
void *aux;
{
struct ex_softc *sc = (void *)self;
struct isa_attach_args *ia = aux;
struct ifnet *ifp = &sc->arpcom.ac_if;
/* struct ifaddr *ifa; XXX what are these for? */
/* struct sockaddr_dl *sdl; */
DODEBUG(Start_End, printf("ex_attach: start\n"););
/*
* Initialize the ifnet structure.
*/
ifp->if_softc = sc;
bcopy(self->dv_xname, ifp->if_xname, IFNAMSIZ);
ifp->if_start = ex_start;
ifp->if_ioctl = ex_ioctl;
ifp->if_watchdog = ex_watchdog;
ifp->if_flags = IFF_SIMPLEX | IFF_BROADCAST; /* XXX not done yet.
| IFF_MULTICAST */
IFQ_SET_READY(&ifp->if_snd);
/*
* Attach the interface.
*/
if_attach(ifp);
ether_ifattach(ifp);
printf(": address %s, connecter ",
ether_sprintf(sc->arpcom.ac_enaddr));
switch(sc->connector) {
case Conn_TPE: printf("TPE\n"); break;
case Conn_BNC: printf("BNC\n"); break;
case Conn_AUI: printf("AUI\n"); break;
default: printf("???\n");
}
sc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq, IST_EDGE,
IPL_NET, exintr, sc, self->dv_xname);
ex_init(sc);
DODEBUG(Start_End, printf("ex_attach: finish\n"););
}
void
ex_init(sc)
struct ex_softc *sc;
{
struct ifnet *ifp = &sc->arpcom.ac_if;
int s, i;
unsigned short temp_reg;
DODEBUG(Start_End, printf("ex_init: start\n"););
if (TAILQ_EMPTY(&ifp->if_addrlist))
return;
s = splnet();
sc->arpcom.ac_if.if_timer = 0;
/*
* Load the ethernet address into the card.
*/
BANK_SEL(Bank2_Sel);
temp_reg = ISA_GET(EEPROM_REG);
if (temp_reg & Trnoff_Enable)
ISA_PUT(EEPROM_REG, temp_reg & ~Trnoff_Enable);
for (i = 0; i < ETHER_ADDR_LEN; i++)
ISA_PUT(I_ADDR_REG0 + i, sc->arpcom.ac_enaddr[i]);
/*
* - Setup transmit chaining and discard bad received frames.
* - Match broadcast.
* - Clear test mode.
* - Set receiving mode.
* - Set IRQ number.
*/
ISA_PUT(REG1, ISA_GET(REG1) | Tx_Chn_Int_Md | Tx_Chn_ErStp |
Disc_Bad_Fr);
ISA_PUT(REG2, ISA_GET(REG2) | No_SA_Ins | RX_CRC_InMem);
ISA_PUT(REG3, (ISA_GET(REG3) & 0x3f));
BANK_SEL(Bank1_Sel);
ISA_PUT(INT_NO_REG, (ISA_GET(INT_NO_REG) & 0xf8) |
irq2eemap[sc->irq_no]);
/*
* Divide the available memory in the card into rcv and xmt buffers.
* By default, I use the first 3/4 of the memory for the rcv buffer,
* and the remaining 1/4 of the memory for the xmt buffer.
*/
sc->rx_mem_size = sc->mem_size * 3 / 4;
sc->tx_mem_size = sc->mem_size - sc->rx_mem_size;
sc->rx_lower_limit = 0x0000;
sc->rx_upper_limit = sc->rx_mem_size - 2;
sc->tx_lower_limit = sc->rx_mem_size;
sc->tx_upper_limit = sc->mem_size - 2;
ISA_PUT(RCV_LOWER_LIMIT_REG, sc->rx_lower_limit >> 8);
ISA_PUT(RCV_UPPER_LIMIT_REG, sc->rx_upper_limit >> 8);
ISA_PUT(XMT_LOWER_LIMIT_REG, sc->tx_lower_limit >> 8);
ISA_PUT(XMT_UPPER_LIMIT_REG, sc->tx_upper_limit >> 8);
/*
* Enable receive and transmit interrupts, and clear any pending int.
*/
ISA_PUT(REG1, ISA_GET(REG1) | TriST_INT);
BANK_SEL(Bank0_Sel);
ISA_PUT(MASK_REG, All_Int & ~(Rx_Int | Tx_Int));
ISA_PUT(STATUS_REG, All_Int);
/*
* Initialize receive and transmit ring buffers.
*/
ISA_PUT_2(RCV_BAR, sc->rx_lower_limit);
sc->rx_head = sc->rx_lower_limit;
ISA_PUT_2(RCV_STOP_REG, sc->rx_upper_limit | 0xfe);
ISA_PUT_2(XMT_BAR, sc->tx_lower_limit);
sc->tx_head = sc->tx_tail = sc->tx_lower_limit;
ifp->if_flags |= IFF_RUNNING;
ifp->if_flags &= ~IFF_OACTIVE;
DODEBUG(Status, printf("OIDLE init\n"););
/*
* Final reset of the board, and enable operation.
*/
ISA_PUT(CMD_REG, Sel_Reset_CMD);
delay(2);
ISA_PUT(CMD_REG, Rcv_Enable_CMD);
ex_start(ifp);
splx(s);
DODEBUG(Start_End, printf("ex_init: finish\n"););
}
void
ex_start(ifp)
struct ifnet *ifp;
{
register struct ex_softc *sc = ifp->if_softc;
int i, s, len, data_len, avail, dest, next;
unsigned char tmp16[2];
struct mbuf *opkt;
register struct mbuf *m;
DODEBUG(Start_End, printf("ex_start: start\n"););
s = splnet();
/*
* Main loop: send outgoing packets to network card until there are no
* more packets left, or the card cannot accept any more yet.
*/
while (!(ifp->if_flags & IFF_OACTIVE)) {
IFQ_POLL(&ifp->if_snd, opkt);
if (opkt == NULL)
break;
/*
* Ensure there is enough free transmit buffer space for this
* packet, including its header. Note: the header cannot wrap
* around the end of the transmit buffer and must be kept
* together, so we allow space for twice the length of the
* header, just in case.
*/
for (len = 0, m = opkt; m != NULL; m = m->m_next)
len += m->m_len;
data_len = len;
DODEBUG(Sent_Pkts, printf("1. Sending packet with %d data bytes. ", data_len););
if (len & 1)
len += XMT_HEADER_LEN + 1;
else
len += XMT_HEADER_LEN;
if ((i = sc->tx_tail - sc->tx_head) >= 0)
avail = sc->tx_mem_size - i;
else
avail = -i;
DODEBUG(Sent_Pkts, printf("i=%d, avail=%d\n", i, avail););
if (avail >= len + XMT_HEADER_LEN) {
IFQ_DEQUEUE(&ifp->if_snd, opkt);
#ifdef EX_PSA_INTR
/*
* Disable rx and tx interrupts, to avoid corruption of
* the host address register by interrupt service
* routines. XXX Is this necessary with splnet()
* enabled?
*/
ISA_WRITE(MASK_REG, All_Int);
#endif
/*
* Compute the start and end addresses of this frame
* in the tx buffer.
*/
dest = sc->tx_tail;
next = dest + len;
if (next > sc->tx_upper_limit) {
if ((sc->tx_upper_limit + 2 - sc->tx_tail) <=
XMT_HEADER_LEN) {
dest = sc->tx_lower_limit;
next = dest + len;
} else
next = sc->tx_lower_limit + next -
sc->tx_upper_limit - 2;
}
/* Build the packet frame in the card's ring buffer. */
DODEBUG(Sent_Pkts, printf("2. dest=%d, next=%d. ", dest, next););
ISA_PUT_2(HOST_ADDR_REG, dest);
ISA_PUT_2(IO_PORT_REG, Transmit_CMD);
ISA_PUT_2(IO_PORT_REG, 0);
ISA_PUT_2(IO_PORT_REG, next);
ISA_PUT_2(IO_PORT_REG, data_len);
/*
* Output the packet data to the card. Ensure all
* transfers are 16-bit wide, even if individual mbufs
* have odd length.
*/
for (m = opkt, i = 0; m != NULL; m = m->m_next) {
DODEBUG(Sent_Pkts, printf("[%d]", m->m_len););
if (i) {
tmp16[1] = *(mtod(m, caddr_t));
ISA_PUT_2_MULTI(IO_PORT_REG, tmp16, 1);
}
ISA_PUT_2_MULTI(IO_PORT_REG, mtod(m, caddr_t)
+ i, (m->m_len - i) / 2);
if ((i = (m->m_len - i) & 1))
tmp16[0] = *(mtod(m, caddr_t) +
m->m_len - 1);
}
if (i)
ISA_PUT_2_MULTI(IO_PORT_REG, tmp16, 1);
/*
* If there were other frames chained, update the
* chain in the last one.
*/
if (sc->tx_head != sc->tx_tail) {
if (sc->tx_tail != dest) {
ISA_PUT_2(HOST_ADDR_REG,
sc->tx_last + XMT_Chain_Point);
ISA_PUT_2(IO_PORT_REG, dest);
}
ISA_PUT_2(HOST_ADDR_REG, sc->tx_last +
XMT_Byte_Count);
i = ISA_GET_2(IO_PORT_REG);
ISA_PUT_2(HOST_ADDR_REG, sc->tx_last +
XMT_Byte_Count);
ISA_PUT_2(IO_PORT_REG, i | Ch_bit);
}
/*
* Resume normal operation of the card:
* -Make a dummy read to flush the DRAM write pipeline.
* -Enable receive and transmit interrupts.
* -Send Transmit or Resume_XMT command, as appropriate.
*/
ISA_GET_2(IO_PORT_REG);
#ifdef EX_PSA_INTR
ISA_PUT_2(MASK_REG, All_Int & ~(Rx_Int | Tx_Int));
#endif
if (sc->tx_head == sc->tx_tail) {
ISA_PUT_2(XMT_BAR, dest);
ISA_PUT(CMD_REG, Transmit_CMD);
sc->tx_head = dest;
DODEBUG(Sent_Pkts, printf("Transmit\n"););
} else {
ISA_PUT(CMD_REG, Resume_XMT_List_CMD);
DODEBUG(Sent_Pkts, printf("Resume\n"););
}
sc->tx_last = dest;
sc->tx_tail = next;
#if NBPFILTER > 0
if (ifp->if_bpf != NULL)
bpf_mtap(ifp->if_bpf, opkt,
BPF_DIRECTION_OUT);
#endif
ifp->if_timer = 2;
ifp->if_opackets++;
m_freem(opkt);
} else {
ifp->if_flags |= IFF_OACTIVE;
DODEBUG(Status, printf("OACTIVE start\n"););
}
}
splx(s);
DODEBUG(Start_End, printf("ex_start: finish\n"););
}
void
ex_stop(sc)
struct ex_softc *sc;
{
DODEBUG(Start_End, printf("ex_stop: start\n"););
/*
* Disable card operation:
* - Disable the interrupt line.
* - Flush transmission and disable reception.
* - Mask and clear all interrupts.
* - Reset the 82595.
*/
BANK_SEL(Bank1_Sel);
ISA_PUT(REG1, ISA_GET(REG1) & ~TriST_INT);
BANK_SEL(Bank0_Sel);
ISA_PUT(CMD_REG, Rcv_Stop);
sc->tx_head = sc->tx_tail = sc->tx_lower_limit;
sc->tx_last = 0; /* XXX I think these two lines are not necessary,
because ex_init will always be called again
to reinit the interface. */
ISA_PUT(MASK_REG, All_Int);
ISA_PUT(STATUS_REG, All_Int);
ISA_PUT(CMD_REG, Reset_CMD);
delay(200);
DODEBUG(Start_End, printf("ex_stop: finish\n"););
}
int
exintr(arg)
void *arg;
{
struct ex_softc *sc = arg;
struct ifnet *ifp = &sc->arpcom.ac_if;
int int_status, send_pkts;
int handled;
DODEBUG(Start_End, printf("exintr: start\n"););
#ifdef EXDEBUG
if (++exintr_count != 1)
printf("WARNING: nested interrupt (%d). Mail the author.\n",
exintr_count);
#endif
send_pkts = 0;
while ((int_status = ISA_GET(STATUS_REG)) & (Tx_Int | Rx_Int)) {
if (int_status & Rx_Int) {
ISA_PUT(STATUS_REG, Rx_Int);
handled = 1;
ex_rx_intr(sc);
} else if (int_status & Tx_Int) {
ISA_PUT(STATUS_REG, Tx_Int);
handled = 1;
ex_tx_intr(sc);
send_pkts = 1;
} else
handled = 0;
}
/*
* If any packet has been transmitted, and there are queued packets to
* be sent, attempt to send more packets to the network card.
*/
if (send_pkts && IFQ_IS_EMPTY(&ifp->if_snd) == 0)
ex_start(ifp);
#ifdef EXDEBUG
exintr_count--;
#endif
DODEBUG(Start_End, printf("exintr: finish\n"););
return handled;
}
void
ex_tx_intr(sc)
struct ex_softc *sc;
{
register struct ifnet *ifp = &sc->arpcom.ac_if;
int tx_status;
DODEBUG(Start_End, printf("ex_tx_intr: start\n"););
/*
* - Cancel the watchdog.
* For all packets transmitted since last transmit interrupt:
* - Advance chain pointer to next queued packet.
* - Update statistics.
*/
ifp->if_timer = 0;
while (sc->tx_head != sc->tx_tail) {
ISA_PUT_2(HOST_ADDR_REG, sc->tx_head);
if (! ISA_GET_2(IO_PORT_REG) & Done_bit)
break;
tx_status = ISA_GET_2(IO_PORT_REG);
sc->tx_head = ISA_GET_2(IO_PORT_REG);
if (tx_status & TX_OK_bit)
ifp->if_opackets++;
else
ifp->if_oerrors++;
ifp->if_collisions += tx_status & No_Collisions_bits;
}
/* The card should be ready to accept more packets now. */
ifp->if_flags &= ~IFF_OACTIVE;
DODEBUG(Status, printf("OIDLE tx_intr\n"););
DODEBUG(Start_End, printf("ex_tx_intr: finish\n"););
}
void
ex_rx_intr(sc)
struct ex_softc *sc;
{
register struct ifnet *ifp = &sc->arpcom.ac_if;
int rx_status, pkt_len, QQQ;
register struct mbuf *m, *ipkt;
DODEBUG(Start_End, printf("ex_rx_intr: start\n"););
/*
* For all packets received since last receive interrupt:
* - If packet ok, read it into a new mbuf and queue it to interface,
* updating statistics.
* - If packet bad, just discard it, and update statistics.
* Finally, advance receive stop limit in card's memory to new location.
*/
ISA_PUT_2(HOST_ADDR_REG, sc->rx_head);
while (ISA_GET_2(IO_PORT_REG) == RCV_Done) {
rx_status = ISA_GET_2(IO_PORT_REG);
sc->rx_head = ISA_GET_2(IO_PORT_REG);
QQQ = pkt_len = ISA_GET_2(IO_PORT_REG);
if (rx_status & RCV_OK_bit) {
MGETHDR(m, M_DONTWAIT, MT_DATA);
ipkt = m;
if (ipkt == NULL)
ifp->if_iqdrops++;
else {
ipkt->m_pkthdr.rcvif = ifp;
ipkt->m_pkthdr.len = pkt_len;
ipkt->m_len = MHLEN;
while (pkt_len > 0) {
if (pkt_len > MINCLSIZE) {
MCLGET(m, M_DONTWAIT);
if (m->m_flags & M_EXT)
m->m_len = MCLBYTES;
else {
m_freem(ipkt);
ifp->if_iqdrops++;
goto rx_another;
}
}
m->m_len = min(m->m_len, pkt_len);
/*
* NOTE: I'm assuming that all mbufs
* allocated are of even length, except
* for the last one in an odd-length
* packet.
*/
ISA_GET_2_MULTI(IO_PORT_REG,
mtod(m, caddr_t), m->m_len / 2);
if (m->m_len & 1)
*(mtod(m, caddr_t) +
m->m_len - 1) =
ISA_GET(IO_PORT_REG);
pkt_len -= m->m_len;
if (pkt_len > 0) {
MGET(m->m_next, M_DONTWAIT,
MT_DATA);
if (m->m_next == NULL) {
m_freem(ipkt);
ifp->if_iqdrops++;
goto rx_another;
}
m = m->m_next;
m->m_len = MLEN;
}
}
#ifdef EXDEBUG
if (debug_mask & Rcvd_Pkts) {
if ((eh->ether_dhost[5] != 0xff) ||
(eh->ether_dhost[0] != 0xff)) {
printf("Receive packet with %d data bytes: %6D -> ", QQQ, eh->ether_shost, ":");
printf("%6D\n", eh->ether_dhost, ":");
} /* QQQ */
}
#endif
#if NBPFILTER > 0
if (ifp->if_bpf != NULL)
bpf_mtap(ifp->if_bpf, ipkt,
BPF_DIRECTION_IN);
#endif
ether_input_mbuf(ifp, ipkt);
ifp->if_ipackets++;
}
} else
ifp->if_ierrors++;
ISA_PUT_2(HOST_ADDR_REG, sc->rx_head);
rx_another: ;
}
if (sc->rx_head < sc->rx_lower_limit + 2)
ISA_PUT_2(RCV_STOP_REG, sc->rx_upper_limit);
else
ISA_PUT_2(RCV_STOP_REG, sc->rx_head - 2);
DODEBUG(Start_End, printf("ex_rx_intr: finish\n"););
}
int
ex_ioctl(ifp, cmd, data)
register struct ifnet *ifp;
u_long cmd;
caddr_t data;
{
register struct ifaddr *ifa = (struct ifaddr *) data;
struct ex_softc *sc = ifp->if_softc;
struct ifreq *ifr = (struct ifreq *) data;
int s, error = 0;
DODEBUG(Start_End, printf("ex_ioctl: start "););
s = splnet();
switch(cmd) {
case SIOCSIFADDR:
DODEBUG(Start_End, printf("SIOCSIFADDR"););
ifp->if_flags |= IFF_UP;
switch(ifa->ifa_addr->sa_family) {
#ifdef INET
case AF_INET:
ex_init(sc);
arp_ifinit((struct arpcom *) ifp, ifa);
break;
#endif
default:
ex_init(sc);
break;
}
break;
case SIOCGIFADDR:
{
struct sockaddr *sa;
DODEBUG(Start_End, printf("SIOCGIFADDR"););
sa = (struct sockaddr *) &ifr->ifr_data;
bcopy((caddr_t) sc->arpcom.ac_enaddr, (caddr_t) sa->sa_data,
ETHER_ADDR_LEN);
}
break;
case SIOCSIFFLAGS:
DODEBUG(Start_End, printf("SIOCSIFFLAGS"););
if ((ifp->if_flags & IFF_UP) == 0 && ifp->if_flags & IFF_RUNNING) {
ifp->if_flags &= ~IFF_RUNNING;
ex_stop(sc);
}
else
ex_init(sc);
break;
#ifdef NODEF
case SIOCGHWADDR:
DODEBUG(Start_End, printf("SIOCGHWADDR"););
bcopy((caddr_t) sc->sc_addr, (caddr_t) &ifr->ifr_data, sizeof(sc->sc_addr));
break;
#endif
case SIOCSIFMTU:
DODEBUG(Start_End, printf("SIOCSIFMTU"););
if (ifr->ifr_mtu > ETHERMTU || ifr->ifr_mtu < ETHERMIN) {
error = EINVAL;
} else if (ifp->if_mtu != ifr->ifr_mtu) {
ifp->if_mtu = ifr->ifr_mtu;
}
break;
case SIOCADDMULTI:
DODEBUG(Start_End, printf("SIOCADDMULTI"););
case SIOCDELMULTI:
DODEBUG(Start_End, printf("SIOCDELMULTI"););
/* XXX Support not done yet. */
error = EINVAL;
break;
default:
DODEBUG(Start_End, printf("unknown"););
error = EINVAL;
}
splx(s);
DODEBUG(Start_End, printf("\nex_ioctl: finish\n"););
return(error);
}
void
ex_reset(sc)
struct ex_softc *sc;
{
int s;
DODEBUG(Start_End, printf("ex_reset: start\n"););
s = splnet();
ex_stop(sc);
ex_init(sc);
splx(s);
DODEBUG(Start_End, printf("ex_reset: finish\n"););
}
void
ex_watchdog(ifp)
struct ifnet *ifp;
{
struct ex_softc *sc = ifp->if_softc;
DODEBUG(Start_End, printf("ex_watchdog: start\n"););
ifp->if_flags &= ~IFF_OACTIVE;
DODEBUG(Status, printf("OIDLE watchdog\n"););
ifp->if_oerrors++;
ex_reset(sc);
ex_start(ifp);
DODEBUG(Start_End, printf("ex_watchdog: finish\n"););
}
static u_short
eeprom_read(sc, location)
struct ex_softc *sc;
int location;
{
int i;
u_short data = 0;
int read_cmd = location | EE_READ_CMD;
short ctrl_val = EECS;
BANK_SEL(Bank2_Sel);
ISA_PUT(EEPROM_REG, EECS);
for (i = 8; i >= 0; i--) {
short outval = (read_cmd & (1 << i)) ? ctrl_val | EEDI :
ctrl_val;
ISA_PUT(EEPROM_REG, outval);
ISA_PUT(EEPROM_REG, outval | EESK);
delay(3);
ISA_PUT(EEPROM_REG, outval);
delay(2);
}
ISA_PUT(EEPROM_REG, ctrl_val);
for (i = 16; i > 0; i--) {
ISA_PUT(EEPROM_REG, ctrl_val | EESK);
delay(3);
data = (data << 1) | ((ISA_GET(EEPROM_REG) & EEDO) ? 1 : 0);
ISA_PUT(EEPROM_REG, ctrl_val);
delay(2);
}
ctrl_val &= ~EECS;
ISA_PUT(EEPROM_REG, ctrl_val | EESK);
delay(3);
ISA_PUT(EEPROM_REG, ctrl_val);
delay(2);
BANK_SEL(Bank0_Sel);
return(data);
}
#endif /* NEX > 0 */