Home | History | Annotate | Line # | Download | only in dev
if_ie.c revision 1.52
      1  1.52    dyoung /*	$NetBSD: if_ie.c,v 1.52 2008/11/07 00:20:02 dyoung Exp $ */
      2   1.1       gwr 
      3   1.1       gwr /*-
      4  1.27   mycroft  * Copyright (c) 1993, 1994, 1995 Charles M. Hannum.
      5   1.1       gwr  * Copyright (c) 1992, 1993, University of Vermont and State
      6   1.1       gwr  *  Agricultural College.
      7   1.1       gwr  * Copyright (c) 1992, 1993, Garrett A. Wollman.
      8   1.1       gwr  *
      9   1.1       gwr  * Portions:
     10   1.3       gwr  * Copyright (c) 1994, 1995, Rafal K. Boni
     11   1.1       gwr  * Copyright (c) 1990, 1991, William F. Jolitz
     12   1.1       gwr  * Copyright (c) 1990, The Regents of the University of California
     13   1.1       gwr  *
     14   1.1       gwr  * All rights reserved.
     15   1.1       gwr  *
     16   1.1       gwr  * Redistribution and use in source and binary forms, with or without
     17   1.1       gwr  * modification, are permitted provided that the following conditions
     18   1.1       gwr  * are met:
     19   1.1       gwr  * 1. Redistributions of source code must retain the above copyright
     20   1.1       gwr  *    notice, this list of conditions and the following disclaimer.
     21   1.1       gwr  * 2. Redistributions in binary form must reproduce the above copyright
     22   1.1       gwr  *    notice, this list of conditions and the following disclaimer in the
     23   1.1       gwr  *    documentation and/or other materials provided with the distribution.
     24   1.1       gwr  * 3. All advertising materials mentioning features or use of this software
     25   1.1       gwr  *    must display the following acknowledgement:
     26  1.27   mycroft  *	This product includes software developed by Charles M. Hannum, by the
     27   1.1       gwr  *	University of Vermont and State Agricultural College and Garrett A.
     28   1.1       gwr  *	Wollman, by William F. Jolitz, and by the University of California,
     29   1.1       gwr  *	Berkeley, Lawrence Berkeley Laboratory, and its contributors.
     30   1.1       gwr  * 4. Neither the names of the Universities nor the names of the authors
     31   1.1       gwr  *    may be used to endorse or promote products derived from this software
     32   1.1       gwr  *    without specific prior written permission.
     33   1.1       gwr  *
     34   1.1       gwr  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     35   1.1       gwr  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     36   1.1       gwr  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     37   1.1       gwr  * ARE DISCLAIMED.  IN NO EVENT SHALL THE UNIVERSITY OR AUTHORS BE LIABLE
     38   1.1       gwr  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     39   1.1       gwr  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     40   1.1       gwr  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     41   1.1       gwr  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     42   1.1       gwr  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     43   1.1       gwr  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     44   1.1       gwr  * SUCH DAMAGE.
     45   1.1       gwr  */
     46   1.1       gwr 
     47   1.1       gwr /*
     48   1.1       gwr  * Intel 82586 Ethernet chip
     49   1.1       gwr  * Register, bit, and structure definitions.
     50   1.1       gwr  *
     51   1.1       gwr  * Original StarLAN driver written by Garrett Wollman with reference to the
     52   1.1       gwr  * Clarkson Packet Driver code for this chip written by Russ Nelson and others.
     53   1.1       gwr  *
     54   1.1       gwr  * BPF support code taken from hpdev/if_le.c, supplied with tcpdump.
     55   1.1       gwr  *
     56   1.1       gwr  * 3C507 support is loosely based on code donated to NetBSD by Rafal Boni.
     57   1.1       gwr  *
     58   1.1       gwr  * Majorly cleaned up and 3C507 code merged by Charles Hannum.
     59   1.1       gwr  *
     60   1.3       gwr  * Converted to SUN ie driver by Charles D. Cranor,
     61   1.3       gwr  *		October 1994, January 1995.
     62   1.3       gwr  * This sun version based on i386 version 1.30.
     63  1.17       gwr  * [ see sys/dev/isa/if_ie.c ]
     64   1.1       gwr  */
     65   1.1       gwr 
     66   1.1       gwr /*
     67   1.1       gwr  * The i82586 is a very painful chip, found in sun3's, sun-4/100's
     68   1.1       gwr  * sun-4/200's, and VME based suns.  The byte order is all wrong for a
     69   1.1       gwr  * SUN, making life difficult.  Programming this chip is mostly the same,
     70   1.1       gwr  * but certain details differ from system to system.  This driver is
     71   1.1       gwr  * written so that different "ie" interfaces can be controled by the same
     72   1.1       gwr  * driver.
     73   1.1       gwr  */
     74   1.1       gwr 
     75   1.1       gwr /*
     76   1.1       gwr    Mode of operation:
     77   1.1       gwr 
     78   1.1       gwr    We run the 82586 in a standard Ethernet mode.  We keep NFRAMES
     79   1.1       gwr    received frame descriptors around for the receiver to use, and
     80   1.1       gwr    NRXBUF associated receive buffer descriptors, both in a circular
     81   1.1       gwr    list.  Whenever a frame is received, we rotate both lists as
     82   1.1       gwr    necessary.  (The 586 treats both lists as a simple queue.)  We also
     83   1.1       gwr    keep a transmit command around so that packets can be sent off
     84   1.1       gwr    quickly.
     85   1.3       gwr 
     86   1.1       gwr    We configure the adapter in AL-LOC = 1 mode, which means that the
     87   1.1       gwr    Ethernet/802.3 MAC header is placed at the beginning of the receive
     88   1.1       gwr    buffer rather than being split off into various fields in the RFD.
     89   1.1       gwr    This also means that we must include this header in the transmit
     90   1.1       gwr    buffer as well.
     91   1.3       gwr 
     92   1.1       gwr    By convention, all transmit commands, and only transmit commands,
     93   1.1       gwr    shall have the I (IE_CMD_INTR) bit set in the command.  This way,
     94   1.1       gwr    when an interrupt arrives at ieintr(), it is immediately possible
     95   1.1       gwr    to tell what precisely caused it.  ANY OTHER command-sending
     96   1.6   mycroft    routines should run at splnet(), and should post an acknowledgement
     97   1.1       gwr    to every interrupt they generate.
     98   1.1       gwr */
     99  1.39     lukem 
    100  1.39     lukem #include <sys/cdefs.h>
    101  1.52    dyoung __KERNEL_RCSID(0, "$NetBSD: if_ie.c,v 1.52 2008/11/07 00:20:02 dyoung Exp $");
    102   1.1       gwr 
    103  1.25  jonathan #include "opt_inet.h"
    104  1.26  jonathan #include "opt_ns.h"
    105   1.1       gwr #include "bpfilter.h"
    106   1.1       gwr 
    107   1.1       gwr #include <sys/param.h>
    108   1.1       gwr #include <sys/systm.h>
    109   1.1       gwr #include <sys/mbuf.h>
    110   1.1       gwr #include <sys/buf.h>
    111   1.1       gwr #include <sys/protosw.h>
    112   1.1       gwr #include <sys/socket.h>
    113   1.1       gwr #include <sys/ioctl.h>
    114   1.3       gwr #include <sys/errno.h>
    115   1.1       gwr #include <sys/syslog.h>
    116   1.3       gwr #include <sys/device.h>
    117   1.1       gwr 
    118   1.1       gwr #include <net/if.h>
    119   1.1       gwr #include <net/if_types.h>
    120   1.1       gwr #include <net/if_dl.h>
    121  1.20        is #include <net/if_ether.h>
    122   1.1       gwr 
    123   1.1       gwr #if NBPFILTER > 0
    124   1.1       gwr #include <net/bpf.h>
    125   1.1       gwr #include <net/bpfdesc.h>
    126   1.1       gwr #endif
    127   1.1       gwr 
    128   1.1       gwr #ifdef INET
    129   1.1       gwr #include <netinet/in.h>
    130   1.1       gwr #include <netinet/in_systm.h>
    131   1.1       gwr #include <netinet/in_var.h>
    132   1.1       gwr #include <netinet/ip.h>
    133  1.20        is #include <netinet/if_inarp.h>
    134   1.1       gwr #endif
    135   1.1       gwr 
    136   1.1       gwr #ifdef NS
    137   1.1       gwr #include <netns/ns.h>
    138   1.1       gwr #include <netns/ns_if.h>
    139   1.1       gwr #endif
    140   1.1       gwr 
    141  1.33       mrg #include <uvm/uvm_extern.h>
    142   1.1       gwr 
    143  1.16       gwr #include <machine/autoconf.h>
    144  1.16       gwr #include <machine/cpu.h>
    145  1.16       gwr #include <machine/pmap.h>
    146  1.16       gwr 
    147   1.1       gwr /*
    148   1.1       gwr  * ugly byte-order hack for SUNs
    149   1.1       gwr  */
    150   1.1       gwr 
    151  1.51   tsutsui #define XSWAP(y)	( (((y) & 0xff00) >> 8) | (((y) & 0xff) << 8) )
    152   1.1       gwr #define SWAP(x)		((u_short)(XSWAP((u_short)(x))))
    153   1.1       gwr 
    154   1.1       gwr #include "i82586.h"
    155  1.10       gwr #include "if_iereg.h"
    156  1.10       gwr #include "if_ievar.h"
    157   1.1       gwr 
    158  1.18       gwr /* #define	IEDEBUG	XXX */
    159   1.1       gwr 
    160   1.1       gwr /*
    161   1.1       gwr  * IED: ie debug flags
    162   1.1       gwr  */
    163   1.1       gwr 
    164   1.1       gwr #define	IED_RINT	0x01
    165   1.1       gwr #define	IED_TINT	0x02
    166   1.1       gwr #define	IED_RNR		0x04
    167   1.1       gwr #define	IED_CNA		0x08
    168   1.1       gwr #define	IED_READFRAME	0x10
    169  1.17       gwr #define	IED_ENQ		0x20
    170  1.17       gwr #define	IED_XMIT	0x40
    171  1.17       gwr #define	IED_ALL		0x7f
    172   1.1       gwr 
    173  1.17       gwr #ifdef	IEDEBUG
    174  1.17       gwr #define	inline	/* not */
    175  1.41       chs void print_rbd(volatile struct ie_recv_buf_desc *);
    176  1.17       gwr int     in_ierint = 0;
    177  1.17       gwr int     in_ietint = 0;
    178  1.17       gwr int     ie_debug_flags = 0;
    179  1.17       gwr #endif
    180  1.17       gwr 
    181  1.18       gwr /* XXX - Skip TDR for now - it always complains... */
    182  1.18       gwr int 	ie_run_tdr = 0;
    183  1.18       gwr 
    184  1.41       chs static void iewatchdog(struct ifnet *);
    185  1.41       chs static int ieinit(struct ie_softc *);
    186  1.45  christos static int ieioctl(struct ifnet *, u_long, void *);
    187  1.41       chs static void iestart(struct ifnet *);
    188  1.41       chs static void iereset(struct ie_softc *);
    189  1.41       chs static int ie_setupram(struct ie_softc *);
    190  1.41       chs 
    191  1.41       chs static int cmd_and_wait(struct ie_softc *, int, void *, int);
    192  1.41       chs 
    193  1.41       chs static void ie_drop_packet_buffer(struct ie_softc *);
    194  1.41       chs static void ie_readframe(struct ie_softc *, int);
    195  1.41       chs static inline void ie_setup_config(struct ie_config_cmd *, int, int);
    196  1.41       chs 
    197  1.41       chs static void ierint(struct ie_softc *);
    198  1.41       chs static void iestop(struct ie_softc *);
    199  1.41       chs static void ietint(struct ie_softc *);
    200  1.41       chs static void iexmit(struct ie_softc *);
    201  1.41       chs 
    202  1.41       chs static int mc_setup(struct ie_softc *, void *);
    203  1.41       chs static void mc_reset(struct ie_softc *);
    204  1.41       chs static void run_tdr(struct ie_softc *, struct ie_tdr_cmd *);
    205  1.41       chs static void iememinit(struct ie_softc *);
    206  1.41       chs 
    207  1.51   tsutsui static inline uint8_t *Align(char *);
    208  1.41       chs static inline u_int Swap32(u_int);
    209  1.41       chs static inline u_int vtop24(struct ie_softc *, void *);
    210  1.51   tsutsui static inline uint16_t vtop16sw(struct ie_softc *, void *);
    211  1.41       chs 
    212  1.41       chs static inline void ie_ack(struct ie_softc *, u_int);
    213  1.51   tsutsui static inline u_short ether_cmp(u_char *, uint8_t *);
    214  1.41       chs static inline int check_eh(struct ie_softc *, struct ether_header *, int *);
    215  1.41       chs static inline int ie_buflen(struct ie_softc *, int);
    216  1.41       chs static inline int ie_packet_len(struct ie_softc *);
    217  1.41       chs static inline struct mbuf * ieget(struct ie_softc *, int *);
    218   1.1       gwr 
    219   1.1       gwr 
    220   1.1       gwr /*
    221   1.1       gwr  * Here are a few useful functions.  We could have done these as macros,
    222   1.1       gwr  * but since we have the inline facility, it makes sense to use that
    223   1.1       gwr  * instead.
    224   1.1       gwr  */
    225  1.17       gwr 
    226  1.17       gwr /* KVA to 24 bit device address */
    227  1.41       chs static inline u_int
    228  1.41       chs vtop24(struct ie_softc *sc, void *ptr)
    229  1.17       gwr {
    230  1.17       gwr 	u_int pa;
    231  1.17       gwr 
    232  1.46   tsutsui 	pa = (vaddr_t)ptr - (vaddr_t)sc->sc_iobase;
    233  1.17       gwr #ifdef	IEDEBUG
    234  1.17       gwr 	if (pa & ~0xffFFff)
    235  1.17       gwr 		panic("ie:vtop24");
    236  1.17       gwr #endif
    237  1.51   tsutsui 	return pa;
    238  1.17       gwr }
    239  1.17       gwr 
    240  1.17       gwr /* KVA to 16 bit offset, swapped */
    241  1.41       chs static inline u_short
    242  1.41       chs vtop16sw(struct ie_softc *sc, void *ptr)
    243  1.17       gwr {
    244  1.17       gwr 	u_int pa;
    245  1.17       gwr 
    246  1.46   tsutsui 	pa = (vaddr_t)ptr - (vaddr_t)sc->sc_maddr;
    247  1.17       gwr #ifdef	IEDEBUG
    248  1.17       gwr 	if (pa & ~0xFFff)
    249  1.17       gwr 		panic("ie:vtop16");
    250  1.17       gwr #endif
    251  1.17       gwr 
    252  1.51   tsutsui 	return SWAP(pa);
    253  1.17       gwr }
    254  1.17       gwr 
    255  1.41       chs static inline u_int
    256  1.41       chs Swap32(u_int x)
    257   1.1       gwr {
    258  1.17       gwr 	u_int y;
    259  1.17       gwr 
    260  1.17       gwr 	y = x & 0xFF;
    261  1.17       gwr 	y <<= 8; x >>= 8;
    262  1.17       gwr 	y |= x & 0xFF;
    263  1.17       gwr 	y <<= 8; x >>= 8;
    264  1.17       gwr 	y |= x & 0xFF;
    265  1.17       gwr 	y <<= 8; x >>= 8;
    266  1.17       gwr 	y |= x & 0xFF;
    267   1.1       gwr 
    268  1.51   tsutsui 	return y;
    269   1.1       gwr }
    270   1.1       gwr 
    271  1.51   tsutsui static inline uint8_t *
    272  1.46   tsutsui Align(char *ptr)
    273   1.1       gwr {
    274   1.1       gwr 	u_long  l = (u_long)ptr;
    275   1.1       gwr 
    276   1.1       gwr 	l = (l + 3) & ~3L;
    277  1.51   tsutsui 	return (uint8_t *)l;
    278   1.1       gwr }
    279   1.1       gwr 
    280  1.17       gwr 
    281  1.41       chs static inline void
    282  1.41       chs ie_ack(struct ie_softc *sc, u_int mask)
    283   1.1       gwr {
    284   1.1       gwr 	volatile struct ie_sys_ctl_block *scb = sc->scb;
    285   1.1       gwr 
    286  1.16       gwr 	cmd_and_wait(sc, scb->ie_status & mask, 0, 0);
    287   1.1       gwr }
    288   1.1       gwr 
    289   1.1       gwr 
    290   1.1       gwr /*
    291   1.1       gwr  * Taken almost exactly from Bill's if_is.c,
    292   1.1       gwr  * then modified beyond recognition...
    293   1.1       gwr  */
    294  1.41       chs void
    295  1.41       chs ie_attach(struct ie_softc *sc)
    296   1.1       gwr {
    297   1.1       gwr 	struct ifnet *ifp = &sc->sc_if;
    298   1.1       gwr 
    299   1.9       gwr 	/* MD code has done its part before calling this. */
    300  1.17       gwr 	printf(": macaddr %s\n", ether_sprintf(sc->sc_addr));
    301   1.1       gwr 
    302  1.17       gwr 	/*
    303  1.17       gwr 	 * Compute number of transmit and receive buffers.
    304  1.17       gwr 	 * Tx buffers take 1536 bytes, and fixed in number.
    305  1.17       gwr 	 * Rx buffers are 512 bytes each, variable number.
    306  1.17       gwr 	 * Need at least 1 frame for each 3 rx buffers.
    307  1.17       gwr 	 * The ratio 3bufs:2frames is a compromise.
    308  1.17       gwr 	 */
    309  1.17       gwr 	sc->ntxbuf = NTXBUF;	/* XXX - Fix me... */
    310  1.17       gwr 	switch (sc->sc_msize) {
    311  1.17       gwr 	case 16384:
    312  1.17       gwr 		sc->nframes = 8 * 4;
    313  1.17       gwr 		sc->nrxbuf  = 8 * 6;
    314  1.17       gwr 		break;
    315  1.17       gwr 	case 32768:
    316  1.17       gwr 		sc->nframes = 16 * 4;
    317  1.17       gwr 		sc->nrxbuf  = 16 * 6;
    318  1.17       gwr 		break;
    319  1.17       gwr 	case 65536:
    320  1.17       gwr 		sc->nframes = 32 * 4;
    321  1.17       gwr 		sc->nrxbuf  = 32 * 6;
    322  1.17       gwr 		break;
    323  1.17       gwr 	default:
    324  1.17       gwr 		sc->nframes = 0;
    325  1.17       gwr 	}
    326  1.17       gwr 	if (sc->nframes > MXFRAMES)
    327  1.17       gwr 		sc->nframes = MXFRAMES;
    328  1.17       gwr 	if (sc->nrxbuf > MXRXBUF)
    329  1.17       gwr 		sc->nrxbuf = MXRXBUF;
    330   1.9       gwr 
    331  1.18       gwr #ifdef	IEDEBUG
    332  1.51   tsutsui 	aprint_debug_dev(sc->sc_dev,
    333  1.51   tsutsui 	    "%dK memory, %d tx frames, %d rx frames, %d rx bufs\n",
    334  1.51   tsutsui 	    (sc->sc_msize >> 10), sc->ntxbuf, sc->nframes, sc->nrxbuf);
    335  1.18       gwr #endif
    336   1.9       gwr 
    337  1.17       gwr 	if ((sc->nframes <= 0) || (sc->nrxbuf <= 0))
    338  1.51   tsutsui 		panic("%s: weird memory size", __func__);
    339   1.9       gwr 
    340   1.1       gwr 	/*
    341   1.9       gwr 	 * Setup RAM for transmit/receive
    342   1.1       gwr 	 */
    343   1.1       gwr 	if (ie_setupram(sc) == 0) {
    344  1.51   tsutsui 		aprint_error(": RAM CONFIG FAILED!\n");
    345   1.1       gwr 		/* XXX should reclaim resources? */
    346   1.1       gwr 		return;
    347   1.1       gwr 	}
    348   1.1       gwr 
    349   1.1       gwr 	/*
    350   1.1       gwr 	 * Initialize and attach S/W interface
    351   1.1       gwr 	 */
    352  1.51   tsutsui 	strcpy(ifp->if_xname, device_xname(sc->sc_dev));
    353  1.11   thorpej 	ifp->if_softc = sc;
    354   1.1       gwr 	ifp->if_start = iestart;
    355   1.1       gwr 	ifp->if_ioctl = ieioctl;
    356   1.1       gwr 	ifp->if_watchdog = iewatchdog;
    357   1.5   mycroft 	ifp->if_flags =
    358   1.5   mycroft 	    IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS | IFF_MULTICAST;
    359   1.1       gwr 
    360   1.1       gwr 	/* Attach the interface. */
    361   1.1       gwr 	if_attach(ifp);
    362  1.20        is 	ether_ifattach(ifp, sc->sc_addr);
    363   1.1       gwr }
    364   1.1       gwr 
    365   1.1       gwr /*
    366  1.17       gwr  * Setup IE's ram space.
    367  1.17       gwr  */
    368  1.17       gwr static int
    369  1.41       chs ie_setupram(struct ie_softc *sc)
    370  1.17       gwr {
    371  1.17       gwr 	volatile struct ie_sys_conf_ptr *scp;
    372  1.17       gwr 	volatile struct ie_int_sys_conf_ptr *iscp;
    373  1.17       gwr 	volatile struct ie_sys_ctl_block *scb;
    374  1.17       gwr 	int off;
    375  1.17       gwr 
    376  1.17       gwr 	/*
    377  1.17       gwr 	 * Allocate from end of buffer space for
    378  1.17       gwr 	 * ISCP, SCB, and other small stuff.
    379  1.17       gwr 	 */
    380  1.17       gwr 	off = sc->buf_area_sz;
    381  1.17       gwr 	off &= ~3;
    382  1.17       gwr 
    383  1.17       gwr 	/* SCP (address already chosen). */
    384  1.17       gwr 	scp = sc->scp;
    385  1.43   tsutsui 	(sc->sc_memset)(__UNVOLATILE(scp), 0, sizeof(*scp));
    386  1.17       gwr 
    387  1.17       gwr 	/* ISCP */
    388  1.17       gwr 	off -= sizeof(*iscp);
    389  1.51   tsutsui 	iscp = (volatile void *)(sc->buf_area + off);
    390  1.43   tsutsui 	(sc->sc_memset)(__UNVOLATILE(iscp), 0, sizeof(*iscp));
    391  1.17       gwr 	sc->iscp = iscp;
    392  1.17       gwr 
    393  1.17       gwr 	/* SCB */
    394  1.17       gwr 	off -= sizeof(*scb);
    395  1.51   tsutsui 	scb  = (volatile void *)(sc->buf_area + off);
    396  1.43   tsutsui 	(sc->sc_memset)(__UNVOLATILE(scb), 0, sizeof(*scb));
    397  1.17       gwr 	sc->scb = scb;
    398  1.17       gwr 
    399  1.17       gwr 	/* Remainder is for buffers, etc. */
    400  1.17       gwr 	sc->buf_area_sz = off;
    401  1.17       gwr 
    402  1.17       gwr 	/*
    403  1.17       gwr 	 * Now fill in the structures we just allocated.
    404  1.17       gwr 	 */
    405  1.17       gwr 
    406  1.17       gwr 	/* SCP: main thing is 24-bit ptr to ISCP */
    407  1.17       gwr 	scp->ie_bus_use = 0;	/* 16-bit */
    408  1.43   tsutsui 	scp->ie_iscp_ptr = Swap32(vtop24(sc, __UNVOLATILE(iscp)));
    409  1.17       gwr 
    410  1.17       gwr 	/* ISCP */
    411  1.17       gwr 	iscp->ie_busy = 1;	/* ie_busy == char */
    412  1.43   tsutsui 	iscp->ie_scb_offset = vtop16sw(sc, __UNVOLATILE(scb));
    413  1.17       gwr 	iscp->ie_base = Swap32(vtop24(sc, sc->sc_maddr));
    414  1.17       gwr 
    415  1.17       gwr 	/* SCB */
    416  1.17       gwr 	scb->ie_command_list = SWAP(0xffff);
    417  1.17       gwr 	scb->ie_recv_list    = SWAP(0xffff);
    418  1.17       gwr 
    419  1.17       gwr 	/* Other stuff is done in ieinit() */
    420  1.51   tsutsui 	(sc->reset_586)(sc);
    421  1.51   tsutsui 	(sc->chan_attn)(sc);
    422  1.17       gwr 
    423  1.17       gwr 	delay(100);		/* wait a while... */
    424  1.17       gwr 
    425  1.17       gwr 	if (iscp->ie_busy) {
    426  1.17       gwr 		return 0;
    427  1.17       gwr 	}
    428  1.17       gwr 	/*
    429  1.17       gwr 	 * Acknowledge any interrupts we may have caused...
    430  1.17       gwr 	 */
    431  1.17       gwr 	ie_ack(sc, IE_ST_WHENCE);
    432  1.17       gwr 
    433  1.17       gwr 	return 1;
    434  1.17       gwr }
    435  1.17       gwr 
    436  1.17       gwr /*
    437   1.1       gwr  * Device timeout/watchdog routine.  Entered if the device neglects to
    438   1.1       gwr  * generate an interrupt after a transmit has been started on it.
    439   1.1       gwr  */
    440  1.41       chs static void
    441  1.41       chs iewatchdog(struct ifnet *ifp)
    442   1.1       gwr {
    443  1.12   thorpej 	struct ie_softc *sc = ifp->if_softc;
    444   1.1       gwr 
    445  1.51   tsutsui 	log(LOG_ERR, "%s: device timeout\n", device_xname(sc->sc_dev));
    446  1.20        is 	++ifp->if_oerrors;
    447   1.1       gwr 	iereset(sc);
    448   1.1       gwr }
    449   1.1       gwr 
    450   1.1       gwr /*
    451   1.1       gwr  * What to do upon receipt of an interrupt.
    452   1.1       gwr  */
    453  1.41       chs int
    454  1.41       chs ie_intr(void *arg)
    455   1.1       gwr {
    456  1.17       gwr 	struct ie_softc *sc = arg;
    457  1.51   tsutsui 	uint16_t status;
    458  1.17       gwr 	int loopcnt;
    459   1.1       gwr 
    460   1.1       gwr 	/*
    461   1.1       gwr 	 * check for parity error
    462   1.1       gwr 	 */
    463   1.1       gwr 	if (sc->hard_type == IE_VME) {
    464  1.51   tsutsui 		volatile struct ievme *iev =
    465  1.51   tsutsui 		    (volatile struct ievme *)sc->sc_reg;
    466  1.51   tsutsui 
    467   1.1       gwr 		if (iev->status & IEVME_PERR) {
    468  1.21      fair 			printf("%s: parity error (ctrl 0x%x @ 0x%02x%04x)\n",
    469  1.51   tsutsui 			    device_xname(sc->sc_dev), iev->pectrl,
    470  1.16       gwr 			    iev->pectrl & IEVME_HADDR, iev->peaddr);
    471   1.1       gwr 			iev->pectrl = iev->pectrl | IEVME_PARACK;
    472   1.1       gwr 		}
    473   1.1       gwr 	}
    474   1.3       gwr 
    475  1.22       gwr 	status = sc->scb->ie_status;
    476  1.22       gwr 	if ((status & IE_ST_WHENCE) == 0)
    477  1.17       gwr 		return 0;
    478  1.17       gwr 
    479  1.22       gwr 	loopcnt = sc->nframes;
    480  1.51   tsutsui  loop:
    481   1.3       gwr 	/* Ack interrupts FIRST in case we receive more during the ISR. */
    482  1.22       gwr 	ie_ack(sc, IE_ST_WHENCE & status);
    483   1.3       gwr 
    484   1.1       gwr 	if (status & (IE_ST_RECV | IE_ST_RNR)) {
    485   1.1       gwr #ifdef IEDEBUG
    486   1.1       gwr 		in_ierint++;
    487   1.1       gwr 		if (sc->sc_debug & IED_RINT)
    488  1.51   tsutsui 			printf("%s: rint\n", device_xname(sc->sc_dev));
    489   1.1       gwr #endif
    490   1.1       gwr 		ierint(sc);
    491   1.1       gwr #ifdef IEDEBUG
    492   1.1       gwr 		in_ierint--;
    493   1.1       gwr #endif
    494   1.1       gwr 	}
    495   1.3       gwr 
    496   1.1       gwr 	if (status & IE_ST_DONE) {
    497   1.1       gwr #ifdef IEDEBUG
    498   1.1       gwr 		in_ietint++;
    499   1.1       gwr 		if (sc->sc_debug & IED_TINT)
    500  1.51   tsutsui 			printf("%s: tint\n", device_xname(sc->sc_dev));
    501   1.1       gwr #endif
    502   1.1       gwr 		ietint(sc);
    503   1.1       gwr #ifdef IEDEBUG
    504   1.1       gwr 		in_ietint--;
    505   1.1       gwr #endif
    506   1.1       gwr 	}
    507   1.3       gwr 
    508  1.17       gwr 	/*
    509  1.18       gwr 	 * Receiver not ready (RNR) just means it has
    510  1.18       gwr 	 * run out of resources (buffers or frames).
    511  1.18       gwr 	 * One can easily cause this with (i.e.) spray.
    512  1.19       gwr 	 * This is not a serious error, so be silent.
    513  1.17       gwr 	 */
    514   1.1       gwr 	if (status & IE_ST_RNR) {
    515  1.18       gwr #ifdef IEDEBUG
    516  1.51   tsutsui 		printf("%s: receiver not ready\n", device_xname(sc->sc_dev));
    517  1.18       gwr #endif
    518  1.19       gwr 		sc->sc_if.if_ierrors++;
    519   1.3       gwr 		iereset(sc);
    520   1.1       gwr 	}
    521   1.3       gwr 
    522   1.1       gwr #ifdef IEDEBUG
    523   1.1       gwr 	if ((status & IE_ST_ALLDONE) && (sc->sc_debug & IED_CNA))
    524  1.51   tsutsui 		printf("%s: cna\n", device_xname(sc->sc_dev));
    525   1.1       gwr #endif
    526   1.1       gwr 
    527  1.22       gwr 	status = sc->scb->ie_status;
    528  1.22       gwr 	if (status & IE_ST_WHENCE) {
    529  1.22       gwr 		/* It still wants service... */
    530  1.17       gwr 		if (--loopcnt > 0)
    531  1.17       gwr 			goto loop;
    532  1.22       gwr 		/* ... but we've been here long enough. */
    533  1.22       gwr 		log(LOG_ERR, "%s: interrupt stuck?\n",
    534  1.51   tsutsui 		    device_xname(sc->sc_dev));
    535  1.17       gwr 		iereset(sc);
    536  1.17       gwr 	}
    537   1.1       gwr 	return 1;
    538   1.1       gwr }
    539   1.1       gwr 
    540   1.1       gwr /*
    541   1.1       gwr  * Process a received-frame interrupt.
    542   1.1       gwr  */
    543  1.41       chs void
    544  1.41       chs ierint(struct ie_softc *sc)
    545   1.1       gwr {
    546   1.1       gwr 	volatile struct ie_sys_ctl_block *scb = sc->scb;
    547  1.17       gwr 	int i, status;
    548   1.1       gwr 	static int timesthru = 1024;
    549   1.1       gwr 
    550   1.1       gwr 	i = sc->rfhead;
    551   1.1       gwr 	for (;;) {
    552   1.1       gwr 		status = sc->rframes[i]->ie_fd_status;
    553   1.1       gwr 
    554   1.1       gwr 		if ((status & IE_FD_COMPLETE) && (status & IE_FD_OK)) {
    555   1.1       gwr 			if (!--timesthru) {
    556  1.19       gwr 				sc->sc_if.if_ierrors +=
    557   1.1       gwr 				    SWAP(scb->ie_err_crc) +
    558   1.1       gwr 				    SWAP(scb->ie_err_align) +
    559   1.1       gwr 				    SWAP(scb->ie_err_resource) +
    560   1.1       gwr 				    SWAP(scb->ie_err_overrun);
    561   1.3       gwr 				scb->ie_err_crc = 0;
    562   1.3       gwr 				scb->ie_err_align = 0;
    563   1.1       gwr 				scb->ie_err_resource = 0;
    564   1.1       gwr 				scb->ie_err_overrun = 0;
    565   1.1       gwr 				timesthru = 1024;
    566   1.1       gwr 			}
    567   1.1       gwr 			ie_readframe(sc, i);
    568   1.1       gwr 		} else {
    569   1.1       gwr 			if ((status & IE_FD_RNR) != 0 &&
    570   1.1       gwr 			    (scb->ie_status & IE_RU_READY) == 0) {
    571  1.43   tsutsui 				sc->rframes[0]->ie_fd_buf_desc = vtop16sw(sc,
    572  1.43   tsutsui 				    __UNVOLATILE(sc->rbuffs[0]));
    573  1.43   tsutsui 				scb->ie_recv_list = vtop16sw(sc,
    574  1.43   tsutsui 				    __UNVOLATILE(sc->rframes[0]));
    575  1.16       gwr 				cmd_and_wait(sc, IE_RU_START, 0, 0);
    576   1.1       gwr 			}
    577   1.1       gwr 			break;
    578   1.1       gwr 		}
    579   1.1       gwr 		i = (i + 1) % sc->nframes;
    580   1.1       gwr 	}
    581   1.1       gwr }
    582   1.1       gwr 
    583   1.1       gwr /*
    584  1.17       gwr  * Process a command-complete interrupt.  These are only generated by the
    585  1.17       gwr  * transmission of frames.  This routine is deceptively simple, since most
    586  1.17       gwr  * of the real work is done by iestart().
    587   1.1       gwr  */
    588  1.41       chs void
    589  1.41       chs ietint(struct ie_softc *sc)
    590   1.1       gwr {
    591  1.20        is 	struct ifnet *ifp;
    592  1.17       gwr 	int status;
    593   1.1       gwr 
    594  1.20        is 	ifp = &sc->sc_if;
    595  1.20        is 
    596  1.17       gwr 	ifp->if_timer = 0;
    597  1.17       gwr 	ifp->if_flags &= ~IFF_OACTIVE;
    598   1.1       gwr 
    599   1.3       gwr 	status = sc->xmit_cmds[sc->xctail]->ie_xmit_status;
    600   1.1       gwr 
    601   1.3       gwr 	if (!(status & IE_STAT_COMPL) || (status & IE_STAT_BUSY))
    602  1.51   tsutsui 		printf("%s: command still busy!\n", __func__);
    603   1.3       gwr 
    604   1.3       gwr 	if (status & IE_STAT_OK) {
    605  1.17       gwr 		ifp->if_opackets++;
    606  1.17       gwr 		ifp->if_collisions +=
    607   1.3       gwr 		  SWAP(status & IE_XS_MAXCOLL);
    608  1.17       gwr 	} else {
    609  1.17       gwr 		ifp->if_oerrors++;
    610  1.17       gwr 		/*
    611  1.17       gwr 		 * XXX
    612  1.17       gwr 		 * Check SQE and DEFERRED?
    613  1.17       gwr 		 * What if more than one bit is set?
    614  1.17       gwr 		 */
    615  1.17       gwr 		if (status & IE_STAT_ABORT)
    616  1.51   tsutsui 			printf("%s: send aborted\n", device_xname(sc->sc_dev));
    617  1.17       gwr 		if (status & IE_XS_LATECOLL)
    618  1.51   tsutsui 			printf("%s: late collision\n",
    619  1.51   tsutsui 			    device_xname(sc->sc_dev));
    620  1.17       gwr 		if (status & IE_XS_NOCARRIER)
    621  1.51   tsutsui 			printf("%s: no carrier\n", device_xname(sc->sc_dev));
    622  1.17       gwr 		if (status & IE_XS_LOSTCTS)
    623  1.51   tsutsui 			printf("%s: lost CTS\n", device_xname(sc->sc_dev));
    624  1.17       gwr 		if (status & IE_XS_UNDERRUN)
    625  1.51   tsutsui 			printf("%s: DMA underrun\n", device_xname(sc->sc_dev));
    626  1.17       gwr 		if (status & IE_XS_EXCMAX) {
    627  1.23       gwr 			/* Do not print this one (too noisy). */
    628  1.17       gwr 			ifp->if_collisions += 16;
    629  1.17       gwr 		}
    630   1.1       gwr 	}
    631   1.1       gwr 
    632   1.1       gwr 	/*
    633   1.1       gwr 	 * If multicast addresses were added or deleted while we
    634   1.1       gwr 	 * were transmitting, mc_reset() set the want_mcsetup flag
    635   1.1       gwr 	 * indicating that we should do it.
    636   1.1       gwr 	 */
    637   1.1       gwr 	if (sc->want_mcsetup) {
    638  1.45  christos 		mc_setup(sc, (void *)sc->xmit_cbuffs[sc->xctail]);
    639   1.1       gwr 		sc->want_mcsetup = 0;
    640   1.1       gwr 	}
    641   1.3       gwr 
    642   1.3       gwr 	/* Done with the buffer. */
    643  1.17       gwr 	sc->xmit_busy--;
    644   1.3       gwr 	sc->xctail = (sc->xctail + 1) % NTXBUF;
    645   1.1       gwr 
    646  1.17       gwr 	/* Start the next packet, if any, transmitting. */
    647  1.17       gwr 	if (sc->xmit_busy > 0)
    648  1.17       gwr 		iexmit(sc);
    649  1.17       gwr 
    650  1.17       gwr 	iestart(ifp);
    651   1.1       gwr }
    652   1.1       gwr 
    653   1.1       gwr /*
    654   1.1       gwr  * Compare two Ether/802 addresses for equality, inlined and
    655   1.1       gwr  * unrolled for speed.  I'd love to have an inline assembler
    656   1.9       gwr  * version of this...   XXX: Who wanted that? mycroft?
    657   1.9       gwr  * I wrote one, but the following is just as efficient.
    658   1.9       gwr  * This expands to 10 short m68k instructions! -gwr
    659   1.9       gwr  * Note: use this like bcmp()
    660   1.1       gwr  */
    661  1.51   tsutsui static inline uint16_t
    662  1.51   tsutsui ether_cmp(uint8_t *one, uint8_t *two)
    663   1.1       gwr {
    664  1.51   tsutsui 	uint16_t *a = (uint16_t *)one;
    665  1.51   tsutsui 	uint16_t *b = (uint16_t *)two;
    666  1.51   tsutsui 	uint16_t diff;
    667   1.9       gwr 
    668   1.9       gwr 	diff  = *a++ - *b++;
    669   1.9       gwr 	diff |= *a++ - *b++;
    670   1.9       gwr 	diff |= *a++ - *b++;
    671   1.1       gwr 
    672  1.51   tsutsui 	return diff;
    673   1.1       gwr }
    674   1.9       gwr #define	ether_equal !ether_cmp
    675   1.1       gwr 
    676   1.1       gwr /*
    677   1.1       gwr  * Check for a valid address.  to_bpf is filled in with one of the following:
    678   1.1       gwr  *   0 -> BPF doesn't get this packet
    679   1.1       gwr  *   1 -> BPF does get this packet
    680   1.1       gwr  *   2 -> BPF does get this packet, but we don't
    681   1.1       gwr  * Return value is true if the packet is for us, and false otherwise.
    682   1.1       gwr  *
    683   1.1       gwr  * This routine is a mess, but it's also critical that it be as fast
    684   1.1       gwr  * as possible.  It could be made cleaner if we can assume that the
    685   1.1       gwr  * only client which will fiddle with IFF_PROMISC is BPF.  This is
    686   1.1       gwr  * probably a good assumption, but we do not make it here.  (Yet.)
    687   1.1       gwr  */
    688  1.41       chs static inline int
    689  1.41       chs check_eh(struct ie_softc *sc, struct ether_header *eh, int *to_bpf)
    690   1.1       gwr {
    691  1.42   tsutsui #if NBPFILTER > 0
    692  1.20        is 	struct ifnet *ifp;
    693   1.1       gwr 
    694  1.20        is 	ifp = &sc->sc_if;
    695  1.34   thorpej 	*to_bpf = (ifp->if_bpf != 0);
    696   1.1       gwr #endif
    697   1.1       gwr 
    698  1.34   thorpej 	/*
    699  1.34   thorpej 	 * This is all handled at a higher level now.
    700  1.34   thorpej 	 */
    701  1.34   thorpej 	return 1;
    702   1.1       gwr }
    703   1.1       gwr 
    704   1.1       gwr /*
    705   1.1       gwr  * We want to isolate the bits that have meaning...  This assumes that
    706   1.1       gwr  * IE_RBUF_SIZE is an even power of two.  If somehow the act_len exceeds
    707   1.1       gwr  * the size of the buffer, then we are screwed anyway.
    708   1.1       gwr  */
    709  1.41       chs static inline int
    710  1.41       chs ie_buflen(struct ie_softc *sc, int head)
    711   1.1       gwr {
    712  1.36   tsutsui 	int len;
    713   1.1       gwr 
    714  1.17       gwr 	len = SWAP(sc->rbuffs[head]->ie_rbd_actual);
    715  1.17       gwr 	len &= (IE_RBUF_SIZE | (IE_RBUF_SIZE - 1));
    716  1.51   tsutsui 	return len;
    717   1.1       gwr }
    718   1.1       gwr 
    719  1.41       chs static inline int
    720  1.41       chs ie_packet_len(struct ie_softc *sc)
    721   1.1       gwr {
    722  1.17       gwr 	int i;
    723  1.17       gwr 	int head = sc->rbhead;
    724  1.17       gwr 	int acc = 0;
    725   1.1       gwr 
    726   1.1       gwr 	do {
    727  1.51   tsutsui 		if ((sc->rbuffs[sc->rbhead]->ie_rbd_actual & IE_RBD_USED)
    728  1.51   tsutsui 		    == 0) {
    729   1.1       gwr #ifdef IEDEBUG
    730   1.1       gwr 			print_rbd(sc->rbuffs[sc->rbhead]);
    731   1.1       gwr #endif
    732  1.51   tsutsui 			log(LOG_ERR,
    733  1.51   tsutsui 			    "%s: receive descriptors out of sync at %d\n",
    734  1.51   tsutsui 			    device_xname(sc->sc_dev), sc->rbhead);
    735   1.1       gwr 			iereset(sc);
    736   1.1       gwr 			return -1;
    737   1.1       gwr 		}
    738   1.3       gwr 
    739   1.1       gwr 		i = sc->rbuffs[head]->ie_rbd_actual & IE_RBD_LAST;
    740   1.1       gwr 
    741   1.1       gwr 		acc += ie_buflen(sc, head);
    742   1.1       gwr 		head = (head + 1) % sc->nrxbuf;
    743  1.51   tsutsui 	} while (i == 0);
    744   1.1       gwr 
    745   1.1       gwr 	return acc;
    746   1.1       gwr }
    747   1.1       gwr 
    748   1.1       gwr /*
    749   1.3       gwr  * Setup all necessary artifacts for an XMIT command, and then pass the XMIT
    750   1.3       gwr  * command to the chip to be executed.  On the way, if we have a BPF listener
    751   1.3       gwr  * also give him a copy.
    752   1.3       gwr  */
    753  1.41       chs static void
    754  1.41       chs iexmit(struct ie_softc *sc)
    755   1.3       gwr {
    756  1.20        is 	struct ifnet *ifp;
    757  1.20        is 
    758  1.20        is 	ifp = &sc->sc_if;
    759   1.3       gwr 
    760  1.17       gwr #ifdef IEDEBUG
    761  1.17       gwr 	if (sc->sc_debug & IED_XMIT)
    762  1.51   tsutsui 		printf("%s: xmit buffer %d\n", device_xname(sc->sc_dev),
    763  1.17       gwr 		    sc->xctail);
    764  1.17       gwr #endif
    765  1.17       gwr 
    766   1.3       gwr #if NBPFILTER > 0
    767   1.3       gwr 	/*
    768   1.3       gwr 	 * If BPF is listening on this interface, let it see the packet before
    769   1.3       gwr 	 * we push it on the wire.
    770   1.3       gwr 	 */
    771  1.20        is 	if (ifp->if_bpf)
    772  1.20        is 		bpf_tap(ifp->if_bpf,
    773   1.3       gwr 		    sc->xmit_cbuffs[sc->xctail],
    774   1.3       gwr 		    SWAP(sc->xmit_buffs[sc->xctail]->ie_xmit_flags));
    775   1.3       gwr #endif
    776   1.3       gwr 
    777   1.3       gwr 	sc->xmit_buffs[sc->xctail]->ie_xmit_flags |= IE_XMIT_LAST;
    778   1.3       gwr 	sc->xmit_buffs[sc->xctail]->ie_xmit_next = SWAP(0xffff);
    779  1.17       gwr 	sc->xmit_buffs[sc->xctail]->ie_xmit_buf =
    780  1.17       gwr 	    Swap32(vtop24(sc, sc->xmit_cbuffs[sc->xctail]));
    781   1.3       gwr 
    782   1.3       gwr 	sc->xmit_cmds[sc->xctail]->com.ie_cmd_link = SWAP(0xffff);
    783   1.3       gwr 	sc->xmit_cmds[sc->xctail]->com.ie_cmd_cmd =
    784  1.17       gwr 	    IE_CMD_XMIT | IE_CMD_INTR | IE_CMD_LAST;
    785   1.3       gwr 
    786   1.3       gwr 	sc->xmit_cmds[sc->xctail]->ie_xmit_status = SWAP(0);
    787   1.3       gwr 	sc->xmit_cmds[sc->xctail]->ie_xmit_desc =
    788  1.43   tsutsui 	    vtop16sw(sc, __UNVOLATILE(sc->xmit_buffs[sc->xctail]));
    789   1.3       gwr 
    790   1.3       gwr 	sc->scb->ie_command_list =
    791  1.43   tsutsui 	    vtop16sw(sc, __UNVOLATILE(sc->xmit_cmds[sc->xctail]));
    792  1.16       gwr 	cmd_and_wait(sc, IE_CU_START, 0, 0);
    793   1.3       gwr 
    794  1.20        is 	ifp->if_timer = 5;
    795   1.3       gwr }
    796   1.3       gwr 
    797   1.3       gwr /*
    798   1.1       gwr  * Read data off the interface, and turn it into an mbuf chain.
    799   1.1       gwr  *
    800   1.1       gwr  * This code is DRAMATICALLY different from the previous version; this
    801   1.1       gwr  * version tries to allocate the entire mbuf chain up front, given the
    802   1.1       gwr  * length of the data available.  This enables us to allocate mbuf
    803   1.1       gwr  * clusters in many situations where before we would have had a long
    804   1.1       gwr  * chain of partially-full mbufs.  This should help to speed up the
    805   1.1       gwr  * operation considerably.  (Provided that it works, of course.)
    806   1.1       gwr  */
    807  1.17       gwr static inline struct mbuf *
    808  1.41       chs ieget(struct ie_softc *sc, int *to_bpf)
    809   1.1       gwr {
    810  1.17       gwr 	struct mbuf *top, **mp, *m;
    811  1.17       gwr 	int len, totlen, resid;
    812  1.17       gwr 	int thisrboff, thismboff;
    813  1.17       gwr 	int head;
    814  1.30   thorpej 	struct ether_header eh;
    815   1.1       gwr 
    816   1.1       gwr 	totlen = ie_packet_len(sc);
    817   1.1       gwr 	if (totlen <= 0)
    818  1.17       gwr 		return 0;
    819   1.1       gwr 
    820  1.17       gwr 	head = sc->rbhead;
    821   1.1       gwr 
    822   1.1       gwr 	/*
    823   1.1       gwr 	 * Snarf the Ethernet header.
    824   1.1       gwr 	 */
    825  1.45  christos 	(sc->sc_memcpy)((void *)&eh, (void *)sc->cbuffs[head],
    826  1.30   thorpej 	    sizeof(struct ether_header));
    827   1.1       gwr 
    828   1.1       gwr 	/*
    829   1.1       gwr 	 * As quickly as possible, check if this packet is for us.
    830   1.1       gwr 	 * If not, don't waste a single cycle copying the rest of the
    831   1.1       gwr 	 * packet in.
    832   1.1       gwr 	 * This is only a consideration when FILTER is defined; i.e., when
    833   1.1       gwr 	 * we are either running BPF or doing multicasting.
    834   1.1       gwr 	 */
    835  1.51   tsutsui 	if (check_eh(sc, &eh, to_bpf) == 0) {
    836   1.3       gwr 		/* just this case, it's not an error */
    837  1.19       gwr 		sc->sc_if.if_ierrors--;
    838  1.17       gwr 		return 0;
    839   1.1       gwr 	}
    840   1.1       gwr 
    841  1.30   thorpej 	resid = totlen;
    842  1.17       gwr 
    843  1.17       gwr 	MGETHDR(m, M_DONTWAIT, MT_DATA);
    844  1.17       gwr 	if (m == 0)
    845  1.17       gwr 		return 0;
    846   1.3       gwr 
    847  1.19       gwr 	m->m_pkthdr.rcvif = &sc->sc_if;
    848  1.17       gwr 	m->m_pkthdr.len = totlen;
    849  1.17       gwr 	len = MHLEN;
    850   1.1       gwr 	top = 0;
    851  1.17       gwr 	mp = &top;
    852   1.1       gwr 
    853   1.1       gwr 	/*
    854   1.1       gwr 	 * This loop goes through and allocates mbufs for all the data we will
    855   1.1       gwr 	 * be copying in.  It does not actually do the copying yet.
    856   1.1       gwr 	 */
    857  1.17       gwr 	while (totlen > 0) {
    858   1.1       gwr 		if (top) {
    859   1.1       gwr 			MGET(m, M_DONTWAIT, MT_DATA);
    860  1.17       gwr 			if (m == 0) {
    861   1.1       gwr 				m_freem(top);
    862  1.17       gwr 				return 0;
    863   1.1       gwr 			}
    864  1.17       gwr 			len = MLEN;
    865   1.1       gwr 		}
    866  1.17       gwr 		if (totlen >= MINCLSIZE) {
    867   1.1       gwr 			MCLGET(m, M_DONTWAIT);
    868   1.1       gwr 			if (m->m_flags & M_EXT)
    869  1.17       gwr 				len = MCLBYTES;
    870   1.1       gwr 		}
    871  1.31   thorpej 
    872  1.31   thorpej 		if (mp == &top) {
    873  1.46   tsutsui 			char *newdata = (char *)
    874  1.31   thorpej 			    ALIGN(m->m_data + sizeof(struct ether_header)) -
    875  1.31   thorpej 			    sizeof(struct ether_header);
    876  1.31   thorpej 			len -= newdata - m->m_data;
    877  1.31   thorpej 			m->m_data = newdata;
    878  1.31   thorpej 		}
    879  1.31   thorpej 
    880  1.17       gwr 		m->m_len = len = min(totlen, len);
    881  1.31   thorpej 
    882  1.17       gwr 		totlen -= len;
    883  1.17       gwr 		*mp = m;
    884  1.17       gwr 		mp = &m->m_next;
    885  1.17       gwr 	}
    886   1.1       gwr 
    887   1.1       gwr 	m = top;
    888   1.1       gwr 	thismboff = 0;
    889   1.1       gwr 
    890   1.1       gwr 	/*
    891  1.30   thorpej 	 * Copy the Ethernet header into the mbuf chain.
    892  1.30   thorpej 	 */
    893  1.45  christos 	memcpy(mtod(m, void *), &eh, sizeof(struct ether_header));
    894  1.30   thorpej 	thismboff = sizeof(struct ether_header);
    895  1.30   thorpej 	thisrboff = sizeof(struct ether_header);
    896  1.30   thorpej 	resid -= sizeof(struct ether_header);
    897  1.30   thorpej 
    898  1.30   thorpej 	/*
    899   1.1       gwr 	 * Now we take the mbuf chain (hopefully only one mbuf most of the
    900   1.1       gwr 	 * time) and stuff the data into it.  There are no possible failures
    901   1.1       gwr 	 * at or after this point.
    902   1.1       gwr 	 */
    903  1.17       gwr 	while (resid > 0) {
    904  1.17       gwr 		int thisrblen = ie_buflen(sc, head) - thisrboff;
    905  1.17       gwr 		int thismblen = m->m_len - thismboff;
    906  1.17       gwr 
    907  1.17       gwr 		len = min(thisrblen, thismblen);
    908  1.46   tsutsui 		(sc->sc_memcpy)(mtod(m, char *) + thismboff,
    909  1.45  christos 		    (void *)(sc->cbuffs[head] + thisrboff),
    910  1.28   thorpej 		    (u_int)len);
    911  1.17       gwr 		resid -= len;
    912   1.1       gwr 
    913  1.17       gwr 		if (len == thismblen) {
    914   1.1       gwr 			m = m->m_next;
    915  1.17       gwr 			thismboff = 0;
    916  1.17       gwr 		} else
    917  1.17       gwr 			thismboff += len;
    918  1.17       gwr 
    919  1.17       gwr 		if (len == thisrblen) {
    920  1.17       gwr 			head = (head + 1) % sc->nrxbuf;
    921  1.17       gwr 			thisrboff = 0;
    922  1.17       gwr 		} else
    923  1.17       gwr 			thisrboff += len;
    924   1.1       gwr 	}
    925   1.1       gwr 
    926   1.1       gwr 	/*
    927   1.1       gwr 	 * Unless something changed strangely while we were doing the copy,
    928   1.1       gwr 	 * we have now copied everything in from the shared memory.
    929   1.1       gwr 	 * This means that we are done.
    930   1.1       gwr 	 */
    931  1.17       gwr 	return top;
    932   1.1       gwr }
    933   1.1       gwr 
    934   1.1       gwr /*
    935   1.1       gwr  * Read frame NUM from unit UNIT (pre-cached as IE).
    936   1.1       gwr  *
    937   1.1       gwr  * This routine reads the RFD at NUM, and copies in the buffers from
    938   1.1       gwr  * the list of RBD, then rotates the RBD and RFD lists so that the receiver
    939   1.1       gwr  * doesn't start complaining.  Trailers are DROPPED---there's no point
    940   1.1       gwr  * in wasting time on confusing code to deal with them.  Hopefully,
    941   1.1       gwr  * this machine will never ARP for trailers anyway.
    942   1.1       gwr  */
    943  1.41       chs static void
    944  1.41       chs ie_readframe(struct ie_softc *sc, int num)
    945   1.1       gwr {
    946   1.3       gwr 	int status;
    947   1.1       gwr 	struct mbuf *m = 0;
    948   1.1       gwr #if NBPFILTER > 0
    949  1.17       gwr 	int bpf_gets_it = 0;
    950   1.1       gwr #endif
    951   1.1       gwr 
    952   1.3       gwr 	status = sc->rframes[num]->ie_fd_status;
    953   1.1       gwr 
    954  1.17       gwr 	/* Advance the RFD list, since we're done with this descriptor. */
    955   1.1       gwr 	sc->rframes[num]->ie_fd_status = SWAP(0);
    956   1.1       gwr 	sc->rframes[num]->ie_fd_last |= IE_FD_LAST;
    957   1.1       gwr 	sc->rframes[sc->rftail]->ie_fd_last &= ~IE_FD_LAST;
    958   1.1       gwr 	sc->rftail = (sc->rftail + 1) % sc->nframes;
    959   1.1       gwr 	sc->rfhead = (sc->rfhead + 1) % sc->nframes;
    960   1.1       gwr 
    961   1.3       gwr 	if (status & IE_FD_OK) {
    962   1.1       gwr #if NBPFILTER > 0
    963  1.30   thorpej 		m = ieget(sc, &bpf_gets_it);
    964   1.1       gwr #else
    965  1.42   tsutsui 		m = ieget(sc, NULL);
    966   1.1       gwr #endif
    967  1.17       gwr 		ie_drop_packet_buffer(sc);
    968  1.17       gwr 	}
    969  1.17       gwr 	if (m == 0) {
    970  1.19       gwr 		sc->sc_if.if_ierrors++;
    971  1.17       gwr 		return;
    972   1.1       gwr 	}
    973   1.3       gwr 
    974   1.1       gwr #ifdef IEDEBUG
    975  1.30   thorpej 	if (sc->sc_debug & IED_READFRAME) {
    976  1.30   thorpej 		struct ether_header *eh = mtod(m, struct ether_header *);
    977  1.30   thorpej 
    978  1.21      fair 		printf("%s: frame from ether %s type 0x%x\n",
    979  1.51   tsutsui 		    device_xname(sc->sc_dev),
    980  1.30   thorpej 		    ether_sprintf(eh->ether_shost), (u_int)eh->ether_type);
    981  1.30   thorpej 	}
    982   1.1       gwr #endif
    983   1.1       gwr 
    984   1.1       gwr #if NBPFILTER > 0
    985   1.1       gwr 	/*
    986   1.1       gwr 	 * Check for a BPF filter; if so, hand it up.
    987   1.1       gwr 	 * Note that we have to stick an extra mbuf up front, because
    988   1.1       gwr 	 * bpf_mtap expects to have the ether header at the front.
    989   1.1       gwr 	 * It doesn't matter that this results in an ill-formatted mbuf chain,
    990   1.1       gwr 	 * since BPF just looks at the data.  (It doesn't try to free the mbuf,
    991   1.1       gwr 	 * tho' it will make a copy for tcpdump.)
    992   1.1       gwr 	 */
    993   1.1       gwr 	if (bpf_gets_it) {
    994  1.17       gwr 		/* Pass it up. */
    995  1.30   thorpej 		bpf_mtap(sc->sc_if.if_bpf, m);
    996  1.17       gwr 
    997  1.17       gwr 		/*
    998  1.17       gwr 		 * A signal passed up from the filtering code indicating that
    999  1.17       gwr 		 * the packet is intended for BPF but not for the protocol
   1000  1.17       gwr 		 * machinery.  We can save a few cycles by not handing it off
   1001  1.17       gwr 		 * to them.
   1002  1.17       gwr 		 */
   1003  1.17       gwr 		if (bpf_gets_it == 2) {
   1004  1.17       gwr 			m_freem(m);
   1005  1.17       gwr 			return;
   1006  1.17       gwr 		}
   1007   1.1       gwr 	}
   1008   1.3       gwr #endif	/* NBPFILTER > 0 */
   1009   1.1       gwr 
   1010   1.1       gwr 	/*
   1011   1.1       gwr 	 * In here there used to be code to check destination addresses upon
   1012   1.1       gwr 	 * receipt of a packet.  We have deleted that code, and replaced it
   1013   1.1       gwr 	 * with code to check the address much earlier in the cycle, before
   1014   1.1       gwr 	 * copying the data in; this saves us valuable cycles when operating
   1015   1.1       gwr 	 * as a multicast router or when using BPF.
   1016   1.1       gwr 	 */
   1017   1.1       gwr 
   1018   1.1       gwr 	/*
   1019   1.1       gwr 	 * Finally pass this packet up to higher layers.
   1020   1.1       gwr 	 */
   1021  1.32       chs 	(*sc->sc_if.if_input)(&sc->sc_if, m);
   1022  1.19       gwr 	sc->sc_if.if_ipackets++;
   1023   1.1       gwr }
   1024   1.1       gwr 
   1025  1.41       chs static void
   1026  1.41       chs ie_drop_packet_buffer(struct ie_softc *sc)
   1027   1.1       gwr {
   1028   1.3       gwr 	int i;
   1029   1.1       gwr 
   1030   1.1       gwr 	do {
   1031   1.1       gwr 		/*
   1032   1.1       gwr 		 * This means we are somehow out of sync.  So, we reset the
   1033   1.1       gwr 		 * adapter.
   1034   1.1       gwr 		 */
   1035  1.51   tsutsui 		if ((sc->rbuffs[sc->rbhead]->ie_rbd_actual & IE_RBD_USED)
   1036  1.51   tsutsui 		    == 0) {
   1037   1.1       gwr #ifdef IEDEBUG
   1038   1.1       gwr 			print_rbd(sc->rbuffs[sc->rbhead]);
   1039   1.1       gwr #endif
   1040  1.51   tsutsui 			log(LOG_ERR,
   1041  1.51   tsutsui 			    "%s: receive descriptors out of sync at %d\n",
   1042  1.51   tsutsui 			    device_xname(sc->sc_dev), sc->rbhead);
   1043   1.1       gwr 			iereset(sc);
   1044   1.1       gwr 			return;
   1045   1.1       gwr 		}
   1046   1.3       gwr 
   1047   1.1       gwr 		i = sc->rbuffs[sc->rbhead]->ie_rbd_actual & IE_RBD_LAST;
   1048   1.1       gwr 
   1049   1.1       gwr 		sc->rbuffs[sc->rbhead]->ie_rbd_length |= IE_RBD_LAST;
   1050   1.1       gwr 		sc->rbuffs[sc->rbhead]->ie_rbd_actual = SWAP(0);
   1051   1.1       gwr 		sc->rbhead = (sc->rbhead + 1) % sc->nrxbuf;
   1052   1.1       gwr 		sc->rbuffs[sc->rbtail]->ie_rbd_length &= ~IE_RBD_LAST;
   1053   1.1       gwr 		sc->rbtail = (sc->rbtail + 1) % sc->nrxbuf;
   1054  1.51   tsutsui 	} while (i == 0);
   1055   1.1       gwr }
   1056   1.1       gwr 
   1057   1.1       gwr /*
   1058   1.1       gwr  * Start transmission on an interface.
   1059   1.1       gwr  */
   1060  1.41       chs static void
   1061  1.41       chs iestart(struct ifnet *ifp)
   1062   1.1       gwr {
   1063  1.11   thorpej 	struct ie_softc *sc = ifp->if_softc;
   1064   1.1       gwr 	struct mbuf *m0, *m;
   1065  1.51   tsutsui 	uint8_t *buffer;
   1066  1.51   tsutsui 	uint16_t len;
   1067   1.1       gwr 
   1068  1.17       gwr 	if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE)) != IFF_RUNNING)
   1069   1.4       gwr 		return;
   1070   1.1       gwr 
   1071  1.17       gwr 	for (;;) {
   1072  1.17       gwr 		if (sc->xmit_busy == sc->ntxbuf) {
   1073  1.17       gwr 			ifp->if_flags |= IFF_OACTIVE;
   1074  1.17       gwr 			break;
   1075  1.17       gwr 		}
   1076   1.3       gwr 
   1077  1.17       gwr 		IF_DEQUEUE(&ifp->if_snd, m0);
   1078  1.17       gwr 		if (m0 == 0)
   1079   1.1       gwr 			break;
   1080   1.1       gwr 
   1081  1.17       gwr 		/* We need to use m->m_pkthdr.len, so require the header */
   1082  1.17       gwr 		if ((m0->m_flags & M_PKTHDR) == 0)
   1083  1.51   tsutsui 			panic("%s: no header mbuf", __func__);
   1084  1.17       gwr 
   1085  1.17       gwr #if NBPFILTER > 0
   1086  1.17       gwr 		/* Tap off here if there is a BPF listener. */
   1087  1.17       gwr 		if (ifp->if_bpf)
   1088  1.17       gwr 			bpf_mtap(ifp->if_bpf, m0);
   1089  1.17       gwr #endif
   1090  1.17       gwr 
   1091  1.17       gwr #ifdef IEDEBUG
   1092  1.17       gwr 		if (sc->sc_debug & IED_ENQ)
   1093  1.51   tsutsui 			printf("%s: fill buffer %d\n", device_xname(sc->sc_dev),
   1094  1.17       gwr 			    sc->xchead);
   1095  1.17       gwr #endif
   1096  1.17       gwr 
   1097   1.3       gwr 		buffer = sc->xmit_cbuffs[sc->xchead];
   1098  1.17       gwr 		for (m = m0; m != 0; m = m->m_next) {
   1099  1.45  christos 			(sc->sc_memcpy)(buffer, mtod(m, void *), m->m_len);
   1100   1.1       gwr 			buffer += m->m_len;
   1101   1.1       gwr 		}
   1102  1.38    bouyer 		if (m0->m_pkthdr.len < ETHER_MIN_LEN - ETHER_CRC_LEN) {
   1103  1.38    bouyer 			sc->sc_memset(buffer, 0,
   1104  1.38    bouyer 			    ETHER_MIN_LEN - ETHER_CRC_LEN - m0->m_pkthdr.len);
   1105  1.38    bouyer 			len = ETHER_MIN_LEN - ETHER_CRC_LEN;
   1106  1.38    bouyer 		} else
   1107  1.38    bouyer 			len = m0->m_pkthdr.len;
   1108   1.1       gwr 
   1109   1.1       gwr 		m_freem(m0);
   1110   1.3       gwr 		sc->xmit_buffs[sc->xchead]->ie_xmit_flags = SWAP(len);
   1111   1.1       gwr 
   1112  1.17       gwr 		/* Start the first packet transmitting. */
   1113  1.17       gwr 		if (sc->xmit_busy == 0)
   1114  1.17       gwr 			iexmit(sc);
   1115   1.1       gwr 
   1116  1.17       gwr 		sc->xchead = (sc->xchead + 1) % sc->ntxbuf;
   1117  1.17       gwr 		sc->xmit_busy++;
   1118   1.1       gwr 	}
   1119   1.1       gwr }
   1120   1.1       gwr 
   1121  1.41       chs static void
   1122  1.41       chs iereset(struct ie_softc *sc)
   1123   1.1       gwr {
   1124  1.41       chs 	int s;
   1125  1.41       chs 
   1126  1.41       chs 	s = splnet();
   1127   1.1       gwr 
   1128  1.18       gwr 	/* No message here.  The caller does that. */
   1129  1.17       gwr 	iestop(sc);
   1130   1.1       gwr 
   1131   1.1       gwr 	/*
   1132   1.1       gwr 	 * Stop i82586 dead in its tracks.
   1133   1.1       gwr 	 */
   1134  1.16       gwr 	if (cmd_and_wait(sc, IE_RU_ABORT | IE_CU_ABORT, 0, 0))
   1135  1.51   tsutsui 		printf("%s: abort commands timed out\n",
   1136  1.51   tsutsui 		    device_xname(sc->sc_dev));
   1137   1.1       gwr 
   1138  1.16       gwr 	if (cmd_and_wait(sc, IE_RU_DISABLE | IE_CU_STOP, 0, 0))
   1139  1.51   tsutsui 		printf("%s: disable commands timed out\n",
   1140  1.51   tsutsui 		    device_xname(sc->sc_dev));
   1141   1.1       gwr 
   1142  1.17       gwr 	ieinit(sc);
   1143   1.1       gwr 
   1144   1.1       gwr 	splx(s);
   1145   1.1       gwr }
   1146   1.1       gwr 
   1147   1.1       gwr /*
   1148   1.1       gwr  * Send a command to the controller and wait for it to either
   1149   1.1       gwr  * complete or be accepted, depending on the command.  If the
   1150   1.1       gwr  * command pointer is null, then pretend that the command is
   1151   1.1       gwr  * not an action command.  If the command pointer is not null,
   1152   1.1       gwr  * and the command is an action command, wait for
   1153   1.1       gwr  * ((volatile struct ie_cmd_common *)pcmd)->ie_cmd_status & MASK
   1154   1.1       gwr  * to become true.
   1155   1.1       gwr  */
   1156  1.41       chs static int
   1157  1.41       chs cmd_and_wait(struct ie_softc *sc, int cmd, void *pcmd, int mask)
   1158   1.1       gwr {
   1159   1.1       gwr 	volatile struct ie_cmd_common *cc = pcmd;
   1160   1.1       gwr 	volatile struct ie_sys_ctl_block *scb = sc->scb;
   1161  1.17       gwr 	int tmo;
   1162   1.1       gwr 
   1163  1.51   tsutsui 	scb->ie_command = (uint16_t)cmd;
   1164  1.17       gwr 	(sc->chan_attn)(sc);
   1165  1.17       gwr 
   1166  1.17       gwr 	/* Wait for the command to be accepted by the CU. */
   1167  1.17       gwr 	tmo = 10;
   1168  1.17       gwr 	while (scb->ie_command && --tmo)
   1169  1.17       gwr 		delay(10);
   1170  1.17       gwr 	if (scb->ie_command) {
   1171  1.17       gwr #ifdef	IEDEBUG
   1172  1.17       gwr 		printf("%s: cmd_and_wait, CU stuck (1)\n",
   1173  1.51   tsutsui 		    device_xname(sc->sc_dev));
   1174  1.17       gwr #endif
   1175  1.17       gwr 		return -1;	/* timed out */
   1176  1.17       gwr 	}
   1177   1.1       gwr 
   1178  1.17       gwr 	/*
   1179  1.17       gwr 	 * If asked, also wait for it to finish.
   1180  1.17       gwr 	 */
   1181   1.1       gwr 	if (IE_ACTION_COMMAND(cmd) && pcmd) {
   1182   1.1       gwr 
   1183   1.1       gwr 		/*
   1184  1.17       gwr 		 * According to the packet driver, the minimum timeout should
   1185  1.17       gwr 		 * be .369 seconds, which we round up to .4.
   1186   1.1       gwr 		 */
   1187  1.17       gwr 		tmo = 36900;
   1188   1.1       gwr 
   1189   1.1       gwr 		/*
   1190   1.1       gwr 		 * Now spin-lock waiting for status.  This is not a very nice
   1191   1.1       gwr 		 * thing to do, but I haven't figured out how, or indeed if, we
   1192   1.1       gwr 		 * can put the process waiting for action to sleep.  (We may
   1193   1.1       gwr 		 * be getting called through some other timeout running in the
   1194   1.1       gwr 		 * kernel.)
   1195   1.1       gwr 		 */
   1196  1.17       gwr 		while (((cc->ie_cmd_status & mask) == 0) && --tmo)
   1197  1.17       gwr 			delay(10);
   1198   1.1       gwr 
   1199  1.17       gwr 		if ((cc->ie_cmd_status & mask) == 0) {
   1200  1.17       gwr #ifdef	IEDEBUG
   1201  1.17       gwr 			printf("%s: cmd_and_wait, CU stuck (2)\n",
   1202  1.51   tsutsui 			    device_xname(sc->sc_dev));
   1203  1.17       gwr #endif
   1204  1.17       gwr 			return -1;	/* timed out */
   1205  1.17       gwr 		}
   1206   1.1       gwr 	}
   1207  1.17       gwr 	return 0;
   1208   1.1       gwr }
   1209   1.1       gwr 
   1210   1.1       gwr /*
   1211  1.17       gwr  * Run the time-domain reflectometer.
   1212   1.1       gwr  */
   1213  1.41       chs static void
   1214  1.41       chs run_tdr(struct ie_softc *sc, struct ie_tdr_cmd *cmd)
   1215   1.1       gwr {
   1216   1.3       gwr 	int result;
   1217   1.1       gwr 
   1218   1.1       gwr 	cmd->com.ie_cmd_status = SWAP(0);
   1219   1.1       gwr 	cmd->com.ie_cmd_cmd = IE_CMD_TDR | IE_CMD_LAST;
   1220   1.1       gwr 	cmd->com.ie_cmd_link = SWAP(0xffff);
   1221   1.1       gwr 
   1222  1.17       gwr 	sc->scb->ie_command_list = vtop16sw(sc, cmd);
   1223   1.1       gwr 	cmd->ie_tdr_time = SWAP(0);
   1224   1.1       gwr 
   1225  1.16       gwr 	if (cmd_and_wait(sc, IE_CU_START, cmd, IE_STAT_COMPL) ||
   1226  1.51   tsutsui 	    (cmd->com.ie_cmd_status & IE_STAT_OK) == 0)
   1227  1.17       gwr 		result = 0x10000;	/* impossible value */
   1228   1.1       gwr 	else
   1229   1.1       gwr 		result = cmd->ie_tdr_time;
   1230   1.1       gwr 
   1231   1.1       gwr 	ie_ack(sc, IE_ST_WHENCE);
   1232   1.1       gwr 
   1233   1.1       gwr 	if (result & IE_TDR_SUCCESS)
   1234   1.1       gwr 		return;
   1235   1.1       gwr 
   1236   1.1       gwr 	if (result & 0x10000) {
   1237  1.51   tsutsui 		printf("%s: TDR command failed\n", device_xname(sc->sc_dev));
   1238   1.1       gwr 	} else if (result & IE_TDR_XCVR) {
   1239  1.51   tsutsui 		printf("%s: transceiver problem\n", device_xname(sc->sc_dev));
   1240   1.1       gwr 	} else if (result & IE_TDR_OPEN) {
   1241  1.14  christos 		printf("%s: TDR detected an open %d clocks away\n",
   1242  1.51   tsutsui 		    device_xname(sc->sc_dev), SWAP(result & IE_TDR_TIME));
   1243   1.1       gwr 	} else if (result & IE_TDR_SHORT) {
   1244  1.14  christos 		printf("%s: TDR detected a short %d clocks away\n",
   1245  1.51   tsutsui 		    device_xname(sc->sc_dev), SWAP(result & IE_TDR_TIME));
   1246   1.1       gwr 	} else {
   1247  1.21      fair 		printf("%s: TDR returned unknown status 0x%x\n",
   1248  1.51   tsutsui 		    device_xname(sc->sc_dev), result);
   1249   1.1       gwr 	}
   1250   1.1       gwr }
   1251   1.1       gwr 
   1252   1.1       gwr /*
   1253  1.17       gwr  * iememinit: set up the buffers
   1254   1.1       gwr  *
   1255   1.1       gwr  * we have a block of KVA at sc->buf_area which is of size sc->buf_area_sz.
   1256   1.1       gwr  * this is to be used for the buffers.  the chip indexs its control data
   1257   1.1       gwr  * structures with 16 bit offsets, and it indexes actual buffers with
   1258   1.1       gwr  * 24 bit addresses.   so we should allocate control buffers first so that
   1259   1.1       gwr  * we don't overflow the 16 bit offset field.   The number of transmit
   1260   1.1       gwr  * buffers is fixed at compile time.
   1261   1.1       gwr  *
   1262   1.1       gwr  * note: this function was written to be easy to understand, rather than
   1263   1.1       gwr  *       highly efficient (it isn't in the critical path).
   1264  1.17       gwr  *
   1265  1.17       gwr  * The memory layout is: tbufs, rbufs, (gap), control blocks
   1266  1.17       gwr  * [tbuf0, tbuf1] [rbuf0,...rbufN] gap [rframes] [tframes]
   1267  1.17       gwr  * XXX - This needs review...
   1268   1.1       gwr  */
   1269   1.1       gwr static void
   1270  1.41       chs iememinit(struct ie_softc *sc)
   1271   1.1       gwr {
   1272  1.51   tsutsui 	uint8_t *ptr;
   1273  1.17       gwr 	int i;
   1274  1.51   tsutsui 	uint16_t nxt;
   1275   1.1       gwr 
   1276  1.17       gwr 	/* First, zero all the memory. */
   1277  1.17       gwr 	ptr = sc->buf_area;
   1278  1.28   thorpej 	(sc->sc_memset)(ptr, 0, sc->buf_area_sz);
   1279   1.1       gwr 
   1280  1.17       gwr 	/* Allocate tx/rx buffers. */
   1281  1.17       gwr 	for (i = 0; i < NTXBUF; i++) {
   1282  1.17       gwr 		sc->xmit_cbuffs[i] = ptr;
   1283  1.17       gwr 		ptr += IE_TBUF_SIZE;
   1284  1.17       gwr 	}
   1285  1.17       gwr 	for (i = 0; i < sc->nrxbuf; i++) {
   1286  1.17       gwr 		sc->cbuffs[i] = ptr;
   1287  1.17       gwr 		ptr += IE_RBUF_SIZE;
   1288  1.17       gwr 	}
   1289  1.17       gwr 
   1290  1.17       gwr 	/* Small pad (Don't trust the chip...) */
   1291  1.17       gwr 	ptr += 16;
   1292  1.17       gwr 
   1293  1.17       gwr 	/* Allocate and fill in xmit buffer descriptors. */
   1294  1.17       gwr 	for (i = 0; i < NTXBUF; i++) {
   1295  1.51   tsutsui 		sc->xmit_buffs[i] = (volatile void *)ptr;
   1296  1.17       gwr 		ptr = Align(ptr + sizeof(*sc->xmit_buffs[i]));
   1297  1.17       gwr 		sc->xmit_buffs[i]->ie_xmit_buf =
   1298  1.17       gwr 		    Swap32(vtop24(sc, sc->xmit_cbuffs[i]));
   1299  1.17       gwr 		sc->xmit_buffs[i]->ie_xmit_next = SWAP(0xffff);
   1300  1.17       gwr 	}
   1301  1.17       gwr 
   1302  1.17       gwr 	/* Allocate and fill in recv buffer descriptors. */
   1303  1.17       gwr 	for (i = 0; i < sc->nrxbuf; i++) {
   1304  1.51   tsutsui 		sc->rbuffs[i] = (volatile void *)ptr;
   1305  1.17       gwr 		ptr = Align(ptr + sizeof(*sc->rbuffs[i]));
   1306  1.17       gwr 		sc->rbuffs[i]->ie_rbd_buffer =
   1307  1.51   tsutsui 		    Swap32(vtop24(sc, sc->cbuffs[i]));
   1308  1.17       gwr 		sc->rbuffs[i]->ie_rbd_length = SWAP(IE_RBUF_SIZE);
   1309  1.17       gwr 	}
   1310  1.17       gwr 
   1311  1.17       gwr 	/* link together recv bufs and set EOL on last */
   1312  1.17       gwr 	i = sc->nrxbuf - 1;
   1313  1.17       gwr 	sc->rbuffs[i]->ie_rbd_length |= IE_RBD_LAST;
   1314  1.43   tsutsui 	nxt = vtop16sw(sc, __UNVOLATILE(sc->rbuffs[0]));
   1315  1.17       gwr 	do {
   1316  1.17       gwr 		sc->rbuffs[i]->ie_rbd_next = nxt;
   1317  1.43   tsutsui 		nxt = vtop16sw(sc, __UNVOLATILE(sc->rbuffs[i]));
   1318  1.17       gwr 	} while (--i >= 0);
   1319  1.17       gwr 
   1320  1.17       gwr 	/* Allocate transmit commands. */
   1321  1.17       gwr 	for (i = 0; i < NTXBUF; i++) {
   1322  1.51   tsutsui 		sc->xmit_cmds[i] = (volatile void *)ptr;
   1323  1.17       gwr 		ptr = Align(ptr + sizeof(*sc->xmit_cmds[i]));
   1324  1.17       gwr 		sc->xmit_cmds[i]->com.ie_cmd_link = SWAP(0xffff);
   1325  1.17       gwr 	}
   1326  1.17       gwr 
   1327  1.17       gwr 	/* Allocate receive frames. */
   1328  1.17       gwr 	for (i = 0; i < sc->nframes; i++) {
   1329  1.51   tsutsui 		sc->rframes[i] = (volatile void *)ptr;
   1330  1.17       gwr 		ptr = Align(ptr + sizeof(*sc->rframes[i]));
   1331  1.17       gwr 	}
   1332  1.17       gwr 
   1333  1.17       gwr 	/* Link together recv frames and set EOL on last */
   1334  1.17       gwr 	i = sc->nframes - 1;
   1335  1.17       gwr 	sc->rframes[i]->ie_fd_last |= IE_FD_LAST;
   1336  1.43   tsutsui 	nxt = vtop16sw(sc, __UNVOLATILE(sc->rframes[0]));
   1337  1.17       gwr 	do {
   1338  1.17       gwr 		sc->rframes[i]->ie_fd_next = nxt;
   1339  1.43   tsutsui 		nxt = vtop16sw(sc, __UNVOLATILE(sc->rframes[i]));
   1340  1.17       gwr 	} while (--i >= 0);
   1341   1.1       gwr 
   1342   1.1       gwr 
   1343   1.3       gwr 	/* Pointers to last packet sent and next available transmit buffer. */
   1344   1.3       gwr 	sc->xchead = sc->xctail = 0;
   1345   1.3       gwr 
   1346  1.17       gwr 	/* Clear transmit-busy flag. */
   1347   1.3       gwr 	sc->xmit_busy = 0;
   1348   1.1       gwr 
   1349   1.1       gwr 	/*
   1350  1.17       gwr 	 * Set the head and tail pointers on receive to keep track of
   1351  1.17       gwr 	 * the order in which RFDs and RBDs are used.   link the
   1352  1.17       gwr 	 * recv frames and buffer into the scb.
   1353   1.1       gwr 	 */
   1354   1.1       gwr 	sc->rfhead = 0;
   1355   1.1       gwr 	sc->rftail = sc->nframes - 1;
   1356   1.1       gwr 	sc->rbhead = 0;
   1357   1.1       gwr 	sc->rbtail = sc->nrxbuf - 1;
   1358   1.1       gwr 
   1359  1.17       gwr 	sc->scb->ie_recv_list =
   1360  1.43   tsutsui 	    vtop16sw(sc, __UNVOLATILE(sc->rframes[0]));
   1361  1.17       gwr 	sc->rframes[0]->ie_fd_buf_desc =
   1362  1.43   tsutsui 	    vtop16sw(sc, __UNVOLATILE(sc->rbuffs[0]));
   1363   1.1       gwr 
   1364  1.17       gwr 	i = (ptr - sc->buf_area);
   1365   1.1       gwr #ifdef IEDEBUG
   1366  1.17       gwr 	printf("IE_DEBUG: used %d of %d bytes\n", i, sc->buf_area_sz);
   1367   1.1       gwr #endif
   1368  1.17       gwr 	if (i > sc->buf_area_sz)
   1369  1.17       gwr 		panic("ie: iememinit, out of space");
   1370   1.1       gwr }
   1371   1.1       gwr 
   1372   1.1       gwr /*
   1373   1.1       gwr  * Run the multicast setup command.
   1374   1.6   mycroft  * Called at splnet().
   1375   1.1       gwr  */
   1376  1.41       chs static int
   1377  1.41       chs mc_setup(struct ie_softc *sc, void *ptr)
   1378   1.1       gwr {
   1379  1.17       gwr 	struct ie_mcast_cmd *cmd = ptr;	/* XXX - Was volatile */
   1380   1.1       gwr 
   1381   1.1       gwr 	cmd->com.ie_cmd_status = SWAP(0);
   1382   1.1       gwr 	cmd->com.ie_cmd_cmd = IE_CMD_MCAST | IE_CMD_LAST;
   1383   1.1       gwr 	cmd->com.ie_cmd_link = SWAP(0xffff);
   1384   1.1       gwr 
   1385  1.45  christos 	(sc->sc_memcpy)((void *)cmd->ie_mcast_addrs,
   1386  1.45  christos 	    (void *)sc->mcast_addrs,
   1387   1.1       gwr 	    sc->mcast_count * sizeof *sc->mcast_addrs);
   1388   1.1       gwr 
   1389   1.1       gwr 	cmd->ie_mcast_bytes =
   1390  1.51   tsutsui 	    SWAP(sc->mcast_count * ETHER_ADDR_LEN);	/* grrr... */
   1391   1.1       gwr 
   1392  1.17       gwr 	sc->scb->ie_command_list = vtop16sw(sc, cmd);
   1393  1.16       gwr 	if (cmd_and_wait(sc, IE_CU_START, cmd, IE_STAT_COMPL) ||
   1394  1.51   tsutsui 	    (cmd->com.ie_cmd_status & IE_STAT_OK) == 0) {
   1395  1.14  christos 		printf("%s: multicast address setup command failed\n",
   1396  1.51   tsutsui 		    device_xname(sc->sc_dev));
   1397   1.1       gwr 		return 0;
   1398   1.1       gwr 	}
   1399   1.1       gwr 	return 1;
   1400   1.1       gwr }
   1401   1.1       gwr 
   1402  1.41       chs static inline void
   1403  1.41       chs ie_setup_config(struct ie_config_cmd *cmd, int promiscuous, int manchester)
   1404  1.17       gwr {
   1405  1.17       gwr 
   1406  1.17       gwr 	/*
   1407  1.17       gwr 	 * these are all char's so no need to byte-swap
   1408  1.17       gwr 	 */
   1409  1.17       gwr 	cmd->ie_config_count = 0x0c;
   1410  1.17       gwr 	cmd->ie_fifo = 8;
   1411  1.17       gwr 	cmd->ie_save_bad = 0x40;
   1412  1.17       gwr 	cmd->ie_addr_len = 0x2e;
   1413  1.17       gwr 	cmd->ie_priority = 0;
   1414  1.17       gwr 	cmd->ie_ifs = 0x60;
   1415  1.17       gwr 	cmd->ie_slot_low = 0;
   1416  1.17       gwr 	cmd->ie_slot_high = 0xf2;
   1417  1.17       gwr 	cmd->ie_promisc = promiscuous | manchester << 2;
   1418  1.17       gwr 	cmd->ie_crs_cdt = 0;
   1419  1.17       gwr 	cmd->ie_min_len = 64;
   1420  1.17       gwr 	cmd->ie_junk = 0xff;
   1421  1.17       gwr }
   1422  1.17       gwr 
   1423   1.1       gwr /*
   1424   1.1       gwr  * This routine inits the ie.
   1425   1.1       gwr  * This includes executing the CONFIGURE, IA-SETUP, and MC-SETUP commands,
   1426   1.1       gwr  * starting the receiver unit, and clearing interrupts.
   1427   1.1       gwr  *
   1428   1.6   mycroft  * THIS ROUTINE MUST BE CALLED AT splnet() OR HIGHER.
   1429   1.1       gwr  */
   1430  1.41       chs static int
   1431  1.41       chs ieinit(struct ie_softc *sc)
   1432   1.1       gwr {
   1433   1.1       gwr 	volatile struct ie_sys_ctl_block *scb = sc->scb;
   1434   1.3       gwr 	void *ptr;
   1435  1.20        is 	struct ifnet *ifp;
   1436   1.1       gwr 
   1437  1.20        is 	ifp = &sc->sc_if;
   1438  1.17       gwr 	ptr = sc->buf_area;	/* XXX - Use scb instead? */
   1439   1.1       gwr 
   1440   1.1       gwr 	/*
   1441   1.1       gwr 	 * Send the configure command first.
   1442   1.1       gwr 	 */
   1443   1.1       gwr 	{
   1444  1.17       gwr 		struct ie_config_cmd *cmd = ptr;	/* XXX - Was volatile */
   1445   1.1       gwr 
   1446  1.17       gwr 		scb->ie_command_list = vtop16sw(sc, cmd);
   1447   1.1       gwr 		cmd->com.ie_cmd_status = SWAP(0);
   1448   1.1       gwr 		cmd->com.ie_cmd_cmd = IE_CMD_CONFIG | IE_CMD_LAST;
   1449   1.1       gwr 		cmd->com.ie_cmd_link = SWAP(0xffff);
   1450   1.1       gwr 
   1451  1.17       gwr 		ie_setup_config(cmd, (sc->promisc != 0), 0);
   1452   1.1       gwr 
   1453  1.16       gwr 		if (cmd_and_wait(sc, IE_CU_START, cmd, IE_STAT_COMPL) ||
   1454  1.51   tsutsui 		    (cmd->com.ie_cmd_status & IE_STAT_OK) == 0) {
   1455  1.14  christos 			printf("%s: configure command failed\n",
   1456  1.51   tsutsui 			    device_xname(sc->sc_dev));
   1457   1.1       gwr 			return 0;
   1458   1.1       gwr 		}
   1459   1.1       gwr 	}
   1460   1.3       gwr 
   1461   1.1       gwr 	/*
   1462   1.1       gwr 	 * Now send the Individual Address Setup command.
   1463   1.1       gwr 	 */
   1464   1.1       gwr 	{
   1465  1.17       gwr 		struct ie_iasetup_cmd *cmd = ptr;	/* XXX - Was volatile */
   1466   1.1       gwr 
   1467  1.17       gwr 		scb->ie_command_list = vtop16sw(sc, cmd);
   1468   1.1       gwr 		cmd->com.ie_cmd_status = SWAP(0);
   1469   1.1       gwr 		cmd->com.ie_cmd_cmd = IE_CMD_IASETUP | IE_CMD_LAST;
   1470   1.1       gwr 		cmd->com.ie_cmd_link = SWAP(0xffff);
   1471   1.1       gwr 
   1472  1.45  christos 		(sc->sc_memcpy)((void *)&cmd->ie_address,
   1473  1.47    dyoung 		    CLLADDR(ifp->if_sadl), sizeof(cmd->ie_address));
   1474   1.1       gwr 
   1475  1.16       gwr 		if (cmd_and_wait(sc, IE_CU_START, cmd, IE_STAT_COMPL) ||
   1476  1.51   tsutsui 		    (cmd->com.ie_cmd_status & IE_STAT_OK) == 0) {
   1477  1.14  christos 			printf("%s: individual address setup command failed\n",
   1478  1.51   tsutsui 			    device_xname(sc->sc_dev));
   1479   1.1       gwr 			return 0;
   1480   1.1       gwr 		}
   1481   1.1       gwr 	}
   1482   1.1       gwr 
   1483   1.1       gwr 	/*
   1484   1.1       gwr 	 * Now run the time-domain reflectometer.
   1485   1.1       gwr 	 */
   1486  1.18       gwr 	if (ie_run_tdr)
   1487  1.18       gwr 		run_tdr(sc, ptr);
   1488   1.1       gwr 
   1489   1.1       gwr 	/*
   1490   1.1       gwr 	 * Acknowledge any interrupts we have generated thus far.
   1491   1.1       gwr 	 */
   1492   1.1       gwr 	ie_ack(sc, IE_ST_WHENCE);
   1493   1.1       gwr 
   1494   1.1       gwr 	/*
   1495   1.1       gwr 	 * Set up the transmit and recv buffers.
   1496   1.1       gwr 	 */
   1497  1.17       gwr 	iememinit(sc);
   1498   1.1       gwr 
   1499   1.3       gwr 	/* tell higher levels that we are here */
   1500  1.20        is 	ifp->if_flags |= IFF_RUNNING;
   1501  1.20        is 	ifp->if_flags &= ~IFF_OACTIVE;
   1502   1.3       gwr 
   1503  1.17       gwr 	sc->scb->ie_recv_list =
   1504  1.43   tsutsui 	    vtop16sw(sc, __UNVOLATILE(sc->rframes[0]));
   1505  1.16       gwr 	cmd_and_wait(sc, IE_RU_START, 0, 0);
   1506   1.1       gwr 
   1507   1.3       gwr 	ie_ack(sc, IE_ST_WHENCE);
   1508   1.1       gwr 
   1509   1.1       gwr 	if (sc->run_586)
   1510   1.3       gwr 		(sc->run_586)(sc);
   1511   1.1       gwr 
   1512   1.1       gwr 	return 0;
   1513   1.1       gwr }
   1514   1.1       gwr 
   1515  1.41       chs static void
   1516  1.41       chs iestop(struct ie_softc *sc)
   1517   1.1       gwr {
   1518   1.1       gwr 
   1519  1.16       gwr 	cmd_and_wait(sc, IE_RU_DISABLE, 0, 0);
   1520   1.1       gwr }
   1521   1.1       gwr 
   1522  1.41       chs static int
   1523  1.45  christos ieioctl(struct ifnet *ifp, u_long cmd, void *data)
   1524   1.1       gwr {
   1525  1.11   thorpej 	struct ie_softc *sc = ifp->if_softc;
   1526  1.17       gwr 	struct ifaddr *ifa = (struct ifaddr *)data;
   1527  1.17       gwr 	int s, error = 0;
   1528   1.1       gwr 
   1529   1.6   mycroft 	s = splnet();
   1530   1.1       gwr 
   1531   1.1       gwr 	switch (cmd) {
   1532   1.1       gwr 
   1533  1.52    dyoung 	case SIOCINITIFADDR:
   1534   1.1       gwr 		ifp->if_flags |= IFF_UP;
   1535   1.1       gwr 
   1536   1.1       gwr 		switch (ifa->ifa_addr->sa_family) {
   1537   1.1       gwr #ifdef INET
   1538   1.1       gwr 		case AF_INET:
   1539   1.1       gwr 			ieinit(sc);
   1540  1.20        is 			arp_ifinit(ifp, ifa);
   1541   1.1       gwr 			break;
   1542   1.1       gwr #endif
   1543   1.1       gwr #ifdef NS
   1544   1.1       gwr 		/* XXX - This code is probably wrong. */
   1545   1.1       gwr 		case AF_NS:
   1546   1.1       gwr 		    {
   1547   1.1       gwr 			struct ns_addr *ina = &IA_SNS(ifa)->sns_addr;
   1548   1.1       gwr 
   1549   1.1       gwr 			if (ns_nullhost(*ina))
   1550   1.1       gwr 				ina->x_host =
   1551  1.20        is 				    *(union ns_host *)LLADDR(ifp->if_sadl);
   1552   1.1       gwr 			else
   1553  1.37   tsutsui 				memcpy(LLADDR(ifp->if_sadl),
   1554  1.37   tsutsui 				    ina->x_host.c_host, ETHER_ADDR_LEN);
   1555   1.1       gwr 			/* Set new address. */
   1556   1.1       gwr 			ieinit(sc);
   1557   1.1       gwr 			break;
   1558   1.1       gwr 		    }
   1559   1.1       gwr #endif /* NS */
   1560   1.1       gwr 		default:
   1561   1.1       gwr 			ieinit(sc);
   1562   1.1       gwr 			break;
   1563   1.1       gwr 		}
   1564   1.1       gwr 		break;
   1565   1.1       gwr 
   1566   1.1       gwr 	case SIOCSIFFLAGS:
   1567  1.52    dyoung 		if ((error = ifioctl_common(ifp, cmd, data)) != 0)
   1568  1.52    dyoung 			break;
   1569   1.1       gwr 		sc->promisc = ifp->if_flags & (IFF_PROMISC | IFF_ALLMULTI);
   1570   1.1       gwr 
   1571  1.52    dyoung 		switch (ifp->if_flags & (IFF_UP|IFF_RUNNING)) {
   1572  1.52    dyoung 		case IFF_RUNNING:
   1573   1.1       gwr 			/*
   1574   1.1       gwr 			 * If interface is marked down and it is running, then
   1575   1.1       gwr 			 * stop it.
   1576   1.1       gwr 			 */
   1577   1.1       gwr 			iestop(sc);
   1578   1.1       gwr 			ifp->if_flags &= ~IFF_RUNNING;
   1579  1.52    dyoung 			break;
   1580  1.52    dyoung 		case IFF_UP:
   1581   1.1       gwr 			/*
   1582   1.1       gwr 			 * If interface is marked up and it is stopped, then
   1583   1.1       gwr 			 * start it.
   1584   1.1       gwr 			 */
   1585   1.1       gwr 			ieinit(sc);
   1586  1.52    dyoung 			break;
   1587  1.52    dyoung 		default:
   1588   1.1       gwr 			/*
   1589   1.1       gwr 			 * Reset the interface to pick up changes in any other
   1590   1.1       gwr 			 * flags that affect hardware registers.
   1591   1.1       gwr 			 */
   1592   1.1       gwr 			iestop(sc);
   1593   1.1       gwr 			ieinit(sc);
   1594  1.52    dyoung 			break;
   1595   1.1       gwr 		}
   1596   1.1       gwr #ifdef IEDEBUG
   1597   1.1       gwr 		if (ifp->if_flags & IFF_DEBUG)
   1598   1.1       gwr 			sc->sc_debug = IED_ALL;
   1599   1.1       gwr 		else
   1600  1.17       gwr 			sc->sc_debug = ie_debug_flags;
   1601   1.1       gwr #endif
   1602   1.1       gwr 		break;
   1603   1.1       gwr 
   1604   1.1       gwr 	case SIOCADDMULTI:
   1605   1.1       gwr 	case SIOCDELMULTI:
   1606  1.48    dyoung 		if ((error = ether_ioctl(ifp, cmd, data)) == ENETRESET) {
   1607   1.1       gwr 			/*
   1608   1.1       gwr 			 * Multicast list has changed; set the hardware filter
   1609   1.1       gwr 			 * accordingly.
   1610   1.1       gwr 			 */
   1611  1.40   thorpej 			if (ifp->if_flags & IFF_RUNNING)
   1612  1.40   thorpej 				mc_reset(sc);
   1613   1.1       gwr 			error = 0;
   1614   1.1       gwr 		}
   1615   1.1       gwr 		break;
   1616   1.1       gwr 
   1617   1.1       gwr 	default:
   1618  1.52    dyoung 		error = ether_ioctl(ifp, cmd, data);
   1619  1.52    dyoung 		break;
   1620   1.1       gwr 	}
   1621   1.1       gwr 	splx(s);
   1622   1.1       gwr 	return error;
   1623   1.1       gwr }
   1624   1.1       gwr 
   1625  1.41       chs static void
   1626  1.41       chs mc_reset(struct ie_softc *sc)
   1627   1.1       gwr {
   1628   1.1       gwr 	struct ether_multi *enm;
   1629   1.1       gwr 	struct ether_multistep step;
   1630  1.20        is 	struct ifnet *ifp;
   1631  1.20        is 
   1632  1.20        is 	ifp = &sc->sc_if;
   1633   1.1       gwr 
   1634   1.1       gwr 	/*
   1635   1.1       gwr 	 * Step through the list of addresses.
   1636   1.1       gwr 	 */
   1637   1.1       gwr 	sc->mcast_count = 0;
   1638  1.20        is 	ETHER_FIRST_MULTI(step, &sc->sc_ethercom, enm);
   1639   1.1       gwr 	while (enm) {
   1640   1.1       gwr 		if (sc->mcast_count >= MAXMCAST ||
   1641  1.37   tsutsui 		    ether_cmp(enm->enm_addrlo, enm->enm_addrhi) != 0) {
   1642  1.20        is 			ifp->if_flags |= IFF_ALLMULTI;
   1643  1.51   tsutsui 			ieioctl(ifp, SIOCSIFFLAGS, NULL);
   1644   1.1       gwr 			goto setflag;
   1645   1.1       gwr 		}
   1646  1.37   tsutsui 		memcpy(&sc->mcast_addrs[sc->mcast_count], enm->enm_addrlo,
   1647  1.37   tsutsui 		    ETHER_ADDR_LEN);
   1648   1.1       gwr 		sc->mcast_count++;
   1649   1.1       gwr 		ETHER_NEXT_MULTI(step, enm);
   1650   1.1       gwr 	}
   1651   1.1       gwr setflag:
   1652   1.1       gwr 	sc->want_mcsetup = 1;
   1653   1.1       gwr }
   1654   1.1       gwr 
   1655   1.1       gwr #ifdef IEDEBUG
   1656  1.41       chs void
   1657  1.41       chs print_rbd(volatile struct ie_recv_buf_desc *rbd)
   1658   1.1       gwr {
   1659   1.1       gwr 
   1660  1.14  christos 	printf("RBD at %08lx:\nactual %04x, next %04x, buffer %08x\n"
   1661   1.1       gwr 	    "length %04x, mbz %04x\n", (u_long)rbd, rbd->ie_rbd_actual,
   1662   1.1       gwr 	    rbd->ie_rbd_next, rbd->ie_rbd_buffer, rbd->ie_rbd_length,
   1663   1.1       gwr 	    rbd->mbz);
   1664   1.1       gwr }
   1665   1.1       gwr #endif
   1666