Home | History | Annotate | Line # | Download | only in dev
am79c950.c revision 1.11
      1  1.11       wiz /*	$NetBSD: am79c950.c,v 1.11 2001/07/22 11:29:46 wiz Exp $	*/
      2   1.1    tsubai 
      3   1.1    tsubai /*-
      4   1.1    tsubai  * Copyright (c) 1997 David Huang <khym (at) bga.com>
      5   1.1    tsubai  * All rights reserved.
      6   1.1    tsubai  *
      7   1.1    tsubai  * Portions of this code are based on code by Denton Gentry <denny1 (at) home.com>,
      8   1.1    tsubai  * Charles M. Hannum, Yanagisawa Takeshi <yanagisw (at) aa.ap.titech.ac.jp>, and
      9   1.1    tsubai  * Jason R. Thorpe.
     10   1.1    tsubai  *
     11   1.1    tsubai  * Redistribution and use in source and binary forms, with or without
     12   1.1    tsubai  * modification, are permitted provided that the following conditions
     13   1.1    tsubai  * are met:
     14   1.1    tsubai  * 1. Redistributions of source code must retain the above copyright
     15   1.1    tsubai  *    notice, this list of conditions and the following disclaimer.
     16   1.1    tsubai  * 2. The name of the author may not be used to endorse or promote products
     17   1.1    tsubai  *    derived from this software without specific prior written permission
     18   1.1    tsubai  *
     19   1.1    tsubai  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     20   1.1    tsubai  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     21   1.1    tsubai  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     22   1.1    tsubai  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     23   1.1    tsubai  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     24   1.1    tsubai  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     25   1.1    tsubai  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     26   1.1    tsubai  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     27   1.1    tsubai  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     28   1.1    tsubai  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     29   1.1    tsubai  *
     30   1.1    tsubai  */
     31   1.1    tsubai 
     32   1.1    tsubai /*
     33   1.1    tsubai  * Driver for the AMD Am79C940 (MACE) ethernet chip, used for onboard
     34   1.1    tsubai  * ethernet on the Centris/Quadra 660av and Quadra 840av.
     35   1.1    tsubai  */
     36   1.2  jonathan #include "opt_inet.h"
     37   1.3  jonathan #include "opt_ccitt.h"
     38   1.4  jonathan #include "opt_llc.h"
     39   1.5  jonathan #include "opt_ns.h"
     40   1.1    tsubai 
     41   1.1    tsubai #include <sys/param.h>
     42   1.1    tsubai #include <sys/systm.h>
     43   1.1    tsubai #include <sys/mbuf.h>
     44   1.1    tsubai #include <sys/buf.h>
     45   1.1    tsubai #include <sys/protosw.h>
     46   1.1    tsubai #include <sys/socket.h>
     47   1.1    tsubai #include <sys/syslog.h>
     48   1.1    tsubai #include <sys/ioctl.h>
     49   1.1    tsubai #include <sys/errno.h>
     50   1.1    tsubai #include <sys/device.h>
     51   1.1    tsubai 
     52   1.1    tsubai #include <net/if.h>
     53   1.1    tsubai #include <net/if_dl.h>
     54   1.1    tsubai #include <net/if_ether.h>
     55   1.1    tsubai #include <net/if_media.h>
     56   1.1    tsubai 
     57   1.1    tsubai #ifdef INET
     58   1.1    tsubai #include <netinet/in.h>
     59   1.1    tsubai #include <netinet/if_inarp.h>
     60   1.1    tsubai #include <netinet/in_systm.h>
     61   1.1    tsubai #include <netinet/in_var.h>
     62   1.1    tsubai #include <netinet/ip.h>
     63   1.1    tsubai #endif
     64   1.1    tsubai 
     65   1.1    tsubai #ifdef NS
     66   1.1    tsubai #include <netns/ns.h>
     67   1.1    tsubai #include <netns/ns_if.h>
     68   1.1    tsubai #endif
     69   1.1    tsubai 
     70   1.1    tsubai #if defined(CCITT) && defined(LLC)
     71   1.1    tsubai #include <sys/socketvar.h>
     72   1.1    tsubai #include <netccitt/x25.h>
     73   1.1    tsubai #include <netccitt/pk.h>
     74   1.1    tsubai #include <netccitt/pk_var.h>
     75   1.1    tsubai #include <netccitt/pk_extern.h>
     76   1.1    tsubai #endif
     77   1.1    tsubai 
     78   1.8       mrg #include <uvm/uvm_extern.h>
     79   1.1    tsubai 
     80   1.1    tsubai #include "bpfilter.h"
     81   1.1    tsubai #if NBPFILTER > 0
     82   1.1    tsubai #include <net/bpf.h>
     83   1.1    tsubai #include <net/bpfdesc.h>
     84   1.1    tsubai #endif
     85   1.1    tsubai 
     86   1.1    tsubai #include <machine/pio.h>
     87   1.1    tsubai #include <machine/bus.h>
     88   1.1    tsubai 
     89   1.1    tsubai #include <macppc/dev/am79c950reg.h>
     90   1.1    tsubai #include <macppc/dev/if_mcvar.h>
     91   1.1    tsubai 
     92   1.1    tsubai hide void	mcwatchdog __P((struct ifnet *));
     93   1.1    tsubai hide int	mcinit __P((struct mc_softc *sc));
     94   1.1    tsubai hide int	mcstop __P((struct mc_softc *sc));
     95   1.1    tsubai hide int	mcioctl __P((struct ifnet *ifp, u_long cmd, caddr_t data));
     96   1.1    tsubai hide void	mcstart __P((struct ifnet *ifp));
     97   1.1    tsubai hide void	mcreset __P((struct mc_softc *sc));
     98   1.1    tsubai 
     99   1.1    tsubai integrate u_int	maceput __P((struct mc_softc *sc, struct mbuf *m0));
    100   1.1    tsubai integrate void	mc_tint __P((struct mc_softc *sc));
    101   1.1    tsubai integrate void	mace_read __P((struct mc_softc *, caddr_t, int));
    102   1.1    tsubai integrate struct mbuf *mace_get __P((struct mc_softc *, caddr_t, int));
    103   1.1    tsubai static void mace_calcladrf __P((struct ethercom *ac, u_int8_t *af));
    104   1.1    tsubai static inline u_int16_t ether_cmp __P((void *, void *));
    105   1.1    tsubai static int mc_mediachange __P((struct ifnet *));
    106   1.1    tsubai static void mc_mediastatus __P((struct ifnet *, struct ifmediareq *));
    107   1.1    tsubai 
    108   1.1    tsubai /*
    109   1.1    tsubai  * Compare two Ether/802 addresses for equality, inlined and
    110  1.11       wiz  * unrolled for speed.  Use this like memcmp().
    111   1.1    tsubai  *
    112   1.1    tsubai  * XXX: Add <machine/inlines.h> for stuff like this?
    113   1.1    tsubai  * XXX: or maybe add it to libkern.h instead?
    114   1.1    tsubai  *
    115   1.1    tsubai  * "I'd love to have an inline assembler version of this."
    116   1.1    tsubai  * XXX: Who wanted that? mycroft?  I wrote one, but this
    117   1.1    tsubai  * version in C is as good as hand-coded assembly. -gwr
    118   1.1    tsubai  *
    119   1.1    tsubai  * Please do NOT tweak this without looking at the actual
    120   1.1    tsubai  * assembly code generated before and after your tweaks!
    121   1.1    tsubai  */
    122   1.1    tsubai static inline u_int16_t
    123   1.1    tsubai ether_cmp(one, two)
    124   1.1    tsubai 	void *one, *two;
    125   1.1    tsubai {
    126   1.1    tsubai 	register u_int16_t *a = (u_short *) one;
    127   1.1    tsubai 	register u_int16_t *b = (u_short *) two;
    128   1.1    tsubai 	register u_int16_t diff;
    129   1.1    tsubai 
    130   1.1    tsubai #ifdef	m68k
    131   1.1    tsubai 	/*
    132   1.1    tsubai 	 * The post-increment-pointer form produces the best
    133   1.1    tsubai 	 * machine code for m68k.  This was carefully tuned
    134   1.1    tsubai 	 * so it compiles to just 8 short (2-byte) op-codes!
    135   1.1    tsubai 	 */
    136   1.1    tsubai 	diff  = *a++ - *b++;
    137   1.1    tsubai 	diff |= *a++ - *b++;
    138   1.1    tsubai 	diff |= *a++ - *b++;
    139   1.1    tsubai #else
    140   1.1    tsubai 	/*
    141   1.1    tsubai 	 * Most modern CPUs do better with a single expresion.
    142   1.1    tsubai 	 * Note that short-cut evaluation is NOT helpful here,
    143   1.1    tsubai 	 * because it just makes the code longer, not faster!
    144   1.1    tsubai 	 */
    145   1.1    tsubai 	diff = (a[0] - b[0]) | (a[1] - b[1]) | (a[2] - b[2]);
    146   1.1    tsubai #endif
    147   1.1    tsubai 
    148   1.1    tsubai 	return (diff);
    149   1.1    tsubai }
    150   1.1    tsubai 
    151   1.1    tsubai #define ETHER_CMP	ether_cmp
    152   1.1    tsubai 
    153   1.1    tsubai /*
    154   1.1    tsubai  * Interface exists: make available by filling in network interface
    155   1.1    tsubai  * record.  System will initialize the interface when it is ready
    156   1.1    tsubai  * to accept packets.
    157   1.1    tsubai  */
    158   1.1    tsubai int
    159   1.1    tsubai mcsetup(sc, lladdr)
    160   1.1    tsubai 	struct mc_softc	*sc;
    161   1.1    tsubai 	u_int8_t *lladdr;
    162   1.1    tsubai {
    163   1.1    tsubai 	struct ifnet *ifp = &sc->sc_if;
    164   1.1    tsubai 
    165   1.1    tsubai 	/* reset the chip and disable all interrupts */
    166   1.1    tsubai 	NIC_PUT(sc, MACE_BIUCC, SWRST);
    167   1.1    tsubai 	DELAY(100);
    168   1.1    tsubai 	NIC_PUT(sc, MACE_IMR, ~0);
    169   1.1    tsubai 
    170  1.11       wiz 	memcpy(sc->sc_enaddr, lladdr, ETHER_ADDR_LEN);
    171   1.1    tsubai 	printf(": address %s\n", ether_sprintf(lladdr));
    172   1.1    tsubai 
    173  1.11       wiz 	memcpy(ifp->if_xname, sc->sc_dev.dv_xname, IFNAMSIZ);
    174   1.1    tsubai 	ifp->if_softc = sc;
    175   1.1    tsubai 	ifp->if_ioctl = mcioctl;
    176   1.1    tsubai 	ifp->if_start = mcstart;
    177   1.1    tsubai 	ifp->if_flags =
    178   1.1    tsubai 	    IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS | IFF_MULTICAST;
    179   1.1    tsubai 	ifp->if_watchdog = mcwatchdog;
    180   1.1    tsubai 
    181   1.1    tsubai 	/* initialize ifmedia structures */
    182   1.1    tsubai 	ifmedia_init(&sc->sc_media, 0, mc_mediachange, mc_mediastatus);
    183   1.1    tsubai 	ifmedia_add(&sc->sc_media, IFM_ETHER|IFM_MANUAL, 0, NULL);
    184   1.1    tsubai 	ifmedia_set(&sc->sc_media, IFM_ETHER|IFM_MANUAL);
    185   1.1    tsubai 
    186   1.1    tsubai 	if_attach(ifp);
    187   1.1    tsubai 	ether_ifattach(ifp, lladdr);
    188   1.1    tsubai 
    189   1.1    tsubai 	return (0);
    190   1.1    tsubai }
    191   1.1    tsubai 
    192   1.1    tsubai hide int
    193   1.1    tsubai mcioctl(ifp, cmd, data)
    194   1.1    tsubai 	struct ifnet *ifp;
    195   1.1    tsubai 	u_long cmd;
    196   1.1    tsubai 	caddr_t data;
    197   1.1    tsubai {
    198   1.1    tsubai 	struct mc_softc *sc = ifp->if_softc;
    199   1.1    tsubai 	struct ifaddr *ifa;
    200   1.1    tsubai 	struct ifreq *ifr;
    201   1.1    tsubai 
    202   1.1    tsubai 	int	s = splnet(), err = 0;
    203   1.1    tsubai 	int	temp;
    204   1.1    tsubai 
    205   1.1    tsubai 	switch (cmd) {
    206   1.1    tsubai 
    207   1.1    tsubai 	case SIOCSIFADDR:
    208   1.1    tsubai 		ifa = (struct ifaddr *)data;
    209   1.1    tsubai 		ifp->if_flags |= IFF_UP;
    210   1.1    tsubai 		switch (ifa->ifa_addr->sa_family) {
    211   1.1    tsubai #ifdef INET
    212   1.1    tsubai 		case AF_INET:
    213   1.1    tsubai 			mcinit(sc);
    214   1.1    tsubai 			arp_ifinit(ifp, ifa);
    215   1.1    tsubai 			break;
    216   1.1    tsubai #endif
    217   1.1    tsubai #ifdef NS
    218   1.1    tsubai 		case AF_NS:
    219   1.1    tsubai 		    {
    220   1.1    tsubai 			register struct ns_addr *ina = &IA_SNS(ifa)->sns_addr;
    221   1.1    tsubai 
    222   1.1    tsubai 			if (ns_nullhost(*ina))
    223   1.1    tsubai 				ina->x_host =
    224   1.1    tsubai 				    *(union ns_host *)LLADDR(ifp->if_sadl);
    225   1.1    tsubai 			else {
    226  1.11       wiz 				memcpy(LLADDR(ifp->if_sadl),
    227  1.11       wiz 				    ina->x_host.c_host,
    228   1.1    tsubai 				    sizeof(sc->sc_enaddr));
    229   1.1    tsubai 			}
    230   1.1    tsubai 			/* Set new address. */
    231   1.1    tsubai 			mcinit(sc);
    232   1.1    tsubai 			break;
    233   1.1    tsubai 		    }
    234   1.1    tsubai #endif
    235   1.1    tsubai 		default:
    236   1.1    tsubai 			mcinit(sc);
    237   1.1    tsubai 			break;
    238   1.1    tsubai 		}
    239   1.1    tsubai 		break;
    240   1.1    tsubai 
    241   1.1    tsubai 	case SIOCSIFFLAGS:
    242   1.1    tsubai 		if ((ifp->if_flags & IFF_UP) == 0 &&
    243   1.1    tsubai 		    (ifp->if_flags & IFF_RUNNING) != 0) {
    244   1.1    tsubai 			/*
    245   1.1    tsubai 			 * If interface is marked down and it is running,
    246   1.1    tsubai 			 * then stop it.
    247   1.1    tsubai 			 */
    248   1.1    tsubai 			mcstop(sc);
    249   1.1    tsubai 			ifp->if_flags &= ~IFF_RUNNING;
    250   1.1    tsubai 		} else if ((ifp->if_flags & IFF_UP) != 0 &&
    251   1.1    tsubai 		    (ifp->if_flags & IFF_RUNNING) == 0) {
    252   1.1    tsubai 			/*
    253   1.1    tsubai 			 * If interface is marked up and it is stopped,
    254   1.1    tsubai 			 * then start it.
    255   1.1    tsubai 			 */
    256   1.1    tsubai 			(void)mcinit(sc);
    257   1.1    tsubai 		} else {
    258   1.1    tsubai 			/*
    259   1.1    tsubai 			 * reset the interface to pick up any other changes
    260   1.1    tsubai 			 * in flags
    261   1.1    tsubai 			 */
    262   1.1    tsubai 			temp = ifp->if_flags & IFF_UP;
    263   1.1    tsubai 			mcreset(sc);
    264   1.1    tsubai 			ifp->if_flags |= temp;
    265   1.1    tsubai 			mcstart(ifp);
    266   1.1    tsubai 		}
    267   1.1    tsubai 		break;
    268   1.1    tsubai 
    269   1.1    tsubai 	case SIOCADDMULTI:
    270   1.1    tsubai 	case SIOCDELMULTI:
    271   1.1    tsubai 		ifr = (struct ifreq *) data;
    272   1.1    tsubai 		err = (cmd == SIOCADDMULTI) ?
    273   1.1    tsubai 		    ether_addmulti(ifr, &sc->sc_ethercom) :
    274   1.1    tsubai 		    ether_delmulti(ifr, &sc->sc_ethercom);
    275   1.1    tsubai 
    276   1.1    tsubai 		if (err == ENETRESET) {
    277   1.1    tsubai 			/*
    278   1.1    tsubai 			 * Multicast list has changed; set the hardware
    279   1.1    tsubai 			 * filter accordingly. But remember UP flag!
    280   1.1    tsubai 			 */
    281   1.1    tsubai 			temp = ifp->if_flags & IFF_UP;
    282   1.1    tsubai 			mcreset(sc);
    283   1.1    tsubai 			ifp->if_flags |= temp;
    284   1.1    tsubai 			err = 0;
    285   1.1    tsubai 		}
    286   1.1    tsubai 		break;
    287   1.1    tsubai 
    288   1.1    tsubai 	case SIOCGIFMEDIA:
    289   1.1    tsubai 	case SIOCSIFMEDIA:
    290   1.1    tsubai 		ifr = (struct ifreq *) data;
    291   1.1    tsubai 		err = ifmedia_ioctl(ifp, ifr, &sc->sc_media, cmd);
    292   1.1    tsubai 		break;
    293   1.1    tsubai 
    294   1.1    tsubai 	default:
    295   1.1    tsubai 		err = EINVAL;
    296   1.1    tsubai 	}
    297   1.1    tsubai 	splx(s);
    298   1.1    tsubai 	return (err);
    299   1.1    tsubai }
    300   1.1    tsubai 
    301   1.1    tsubai /*
    302   1.1    tsubai  * Encapsulate a packet of type family for the local net.
    303   1.1    tsubai  */
    304   1.1    tsubai hide void
    305   1.1    tsubai mcstart(ifp)
    306   1.1    tsubai 	struct ifnet *ifp;
    307   1.1    tsubai {
    308   1.1    tsubai 	struct mc_softc	*sc = ifp->if_softc;
    309   1.1    tsubai 	struct mbuf	*m;
    310   1.1    tsubai 
    311   1.1    tsubai 	if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE)) != IFF_RUNNING)
    312   1.1    tsubai 		return;
    313   1.1    tsubai 
    314   1.1    tsubai 	while (1) {
    315   1.1    tsubai 		if (ifp->if_flags & IFF_OACTIVE)
    316   1.1    tsubai 			return;
    317   1.1    tsubai 
    318   1.1    tsubai 		IF_DEQUEUE(&ifp->if_snd, m);
    319   1.1    tsubai 		if (m == 0)
    320   1.1    tsubai 			return;
    321   1.1    tsubai 
    322   1.1    tsubai #if NBPFILTER > 0
    323   1.1    tsubai 		/*
    324   1.1    tsubai 		 * If bpf is listening on this interface, let it
    325   1.1    tsubai 		 * see the packet before we commit it to the wire.
    326   1.1    tsubai 		 */
    327   1.1    tsubai 		if (ifp->if_bpf)
    328   1.1    tsubai 			bpf_mtap(ifp->if_bpf, m);
    329   1.1    tsubai #endif
    330   1.1    tsubai 
    331   1.1    tsubai 		/*
    332   1.1    tsubai 		 * Copy the mbuf chain into the transmit buffer.
    333   1.1    tsubai 		 */
    334   1.1    tsubai 		ifp->if_flags |= IFF_OACTIVE;
    335   1.1    tsubai 		maceput(sc, m);
    336   1.1    tsubai 
    337   1.1    tsubai 		ifp->if_opackets++;		/* # of pkts */
    338   1.1    tsubai 	}
    339   1.1    tsubai }
    340   1.1    tsubai 
    341   1.1    tsubai /*
    342   1.1    tsubai  * reset and restart the MACE.  Called in case of fatal
    343   1.1    tsubai  * hardware/software errors.
    344   1.1    tsubai  */
    345   1.1    tsubai hide void
    346   1.1    tsubai mcreset(sc)
    347   1.1    tsubai 	struct mc_softc *sc;
    348   1.1    tsubai {
    349   1.1    tsubai 	mcstop(sc);
    350   1.1    tsubai 	mcinit(sc);
    351   1.1    tsubai }
    352   1.1    tsubai 
    353   1.1    tsubai hide int
    354   1.1    tsubai mcinit(sc)
    355   1.1    tsubai 	struct mc_softc *sc;
    356   1.1    tsubai {
    357   1.1    tsubai 	int s;
    358   1.1    tsubai 	u_int8_t maccc, ladrf[8];
    359   1.1    tsubai 
    360   1.1    tsubai 	if (sc->sc_if.if_flags & IFF_RUNNING)
    361   1.1    tsubai 		/* already running */
    362   1.1    tsubai 		return (0);
    363   1.1    tsubai 
    364   1.1    tsubai 	s = splnet();
    365   1.1    tsubai 
    366   1.1    tsubai 	NIC_PUT(sc, MACE_BIUCC, sc->sc_biucc);
    367   1.1    tsubai 	NIC_PUT(sc, MACE_FIFOCC, sc->sc_fifocc);
    368   1.1    tsubai 	NIC_PUT(sc, MACE_IMR, ~0); /* disable all interrupts */
    369   1.1    tsubai 	NIC_PUT(sc, MACE_PLSCC, sc->sc_plscc);
    370   1.1    tsubai 
    371   1.1    tsubai 	NIC_PUT(sc, MACE_UTR, RTRD); /* disable reserved test registers */
    372   1.1    tsubai 
    373   1.1    tsubai 	/* set MAC address */
    374   1.1    tsubai 	NIC_PUT(sc, MACE_IAC, ADDRCHG);
    375   1.1    tsubai 	while (NIC_GET(sc, MACE_IAC) & ADDRCHG)
    376   1.1    tsubai 		;
    377   1.1    tsubai 	NIC_PUT(sc, MACE_IAC, PHYADDR);
    378   1.1    tsubai 	bus_space_write_multi_1(sc->sc_regt, sc->sc_regh, MACE_REG(MACE_PADR),
    379   1.1    tsubai 	    sc->sc_enaddr, ETHER_ADDR_LEN);
    380   1.1    tsubai 
    381   1.1    tsubai 	/* set logical address filter */
    382   1.1    tsubai 	mace_calcladrf(&sc->sc_ethercom, ladrf);
    383   1.1    tsubai 
    384   1.1    tsubai 	NIC_PUT(sc, MACE_IAC, ADDRCHG);
    385   1.1    tsubai 	while (NIC_GET(sc, MACE_IAC) & ADDRCHG)
    386   1.1    tsubai 		;
    387   1.1    tsubai 	NIC_PUT(sc, MACE_IAC, LOGADDR);
    388   1.1    tsubai 	bus_space_write_multi_1(sc->sc_regt, sc->sc_regh, MACE_REG(MACE_LADRF),
    389   1.1    tsubai 	    ladrf, 8);
    390   1.1    tsubai 
    391   1.1    tsubai 	NIC_PUT(sc, MACE_XMTFC, APADXMT);
    392   1.1    tsubai 	/*
    393   1.1    tsubai 	 * No need to autostrip padding on receive... Ethernet frames
    394   1.1    tsubai 	 * don't have a length field, unlike 802.3 frames, so the MACE
    395   1.1    tsubai 	 * can't figure out the length of the packet anyways.
    396   1.1    tsubai 	 */
    397   1.1    tsubai 	NIC_PUT(sc, MACE_RCVFC, 0);
    398   1.1    tsubai 
    399   1.1    tsubai 	maccc = ENXMT | ENRCV;
    400   1.1    tsubai 	if (sc->sc_if.if_flags & IFF_PROMISC)
    401   1.1    tsubai 		maccc |= PROM;
    402   1.1    tsubai 
    403   1.1    tsubai 	NIC_PUT(sc, MACE_MACCC, maccc);
    404   1.1    tsubai 
    405   1.1    tsubai 	if (sc->sc_bus_init)
    406   1.1    tsubai 		(*sc->sc_bus_init)(sc);
    407   1.1    tsubai 
    408   1.1    tsubai 	/*
    409   1.1    tsubai 	 * Enable all interrupts except receive, since we use the DMA
    410   1.1    tsubai 	 * completion interrupt for that.
    411   1.1    tsubai 	 */
    412   1.1    tsubai 	NIC_PUT(sc, MACE_IMR, RCVINTM);
    413   1.1    tsubai 
    414   1.1    tsubai 	/* flag interface as "running" */
    415   1.1    tsubai 	sc->sc_if.if_flags |= IFF_RUNNING;
    416   1.1    tsubai 	sc->sc_if.if_flags &= ~IFF_OACTIVE;
    417   1.1    tsubai 
    418   1.1    tsubai 	splx(s);
    419   1.1    tsubai 	return (0);
    420   1.1    tsubai }
    421   1.1    tsubai 
    422   1.1    tsubai /*
    423   1.1    tsubai  * close down an interface and free its buffers
    424   1.1    tsubai  * Called on final close of device, or if mcinit() fails
    425   1.1    tsubai  * part way through.
    426   1.1    tsubai  */
    427   1.1    tsubai hide int
    428   1.1    tsubai mcstop(sc)
    429   1.1    tsubai 	struct mc_softc *sc;
    430   1.1    tsubai {
    431   1.1    tsubai 	int	s = splnet();
    432   1.1    tsubai 
    433   1.1    tsubai 	NIC_PUT(sc, MACE_BIUCC, SWRST);
    434   1.1    tsubai 	DELAY(100);
    435   1.1    tsubai 
    436   1.1    tsubai 	sc->sc_if.if_timer = 0;
    437   1.1    tsubai 	sc->sc_if.if_flags &= ~(IFF_RUNNING | IFF_UP);
    438   1.1    tsubai 
    439   1.1    tsubai 	splx(s);
    440   1.1    tsubai 	return (0);
    441   1.1    tsubai }
    442   1.1    tsubai 
    443   1.1    tsubai /*
    444   1.1    tsubai  * Called if any Tx packets remain unsent after 5 seconds,
    445   1.1    tsubai  * In all cases we just reset the chip, and any retransmission
    446   1.1    tsubai  * will be handled by higher level protocol timeouts.
    447   1.1    tsubai  */
    448   1.1    tsubai hide void
    449   1.1    tsubai mcwatchdog(ifp)
    450   1.1    tsubai 	struct ifnet *ifp;
    451   1.1    tsubai {
    452   1.1    tsubai 	struct mc_softc *sc = ifp->if_softc;
    453   1.1    tsubai 	int temp;
    454   1.1    tsubai 
    455   1.1    tsubai 	printf("mcwatchdog: resetting chip\n");
    456   1.1    tsubai 	temp = ifp->if_flags & IFF_UP;
    457   1.1    tsubai 	mcreset(sc);
    458   1.1    tsubai 	ifp->if_flags |= temp;
    459   1.1    tsubai }
    460   1.1    tsubai 
    461   1.1    tsubai /*
    462   1.1    tsubai  * stuff packet into MACE (at splnet)
    463   1.1    tsubai  */
    464   1.1    tsubai integrate u_int
    465   1.1    tsubai maceput(sc, m)
    466   1.1    tsubai 	struct mc_softc *sc;
    467   1.1    tsubai 	struct mbuf *m;
    468   1.1    tsubai {
    469   1.1    tsubai 	struct mbuf *n;
    470   1.1    tsubai 	u_int len, totlen = 0;
    471   1.1    tsubai 	u_char *buff;
    472   1.1    tsubai 
    473   1.1    tsubai 	buff = sc->sc_txbuf;
    474   1.1    tsubai 
    475   1.1    tsubai 	for (; m; m = n) {
    476   1.1    tsubai 		u_char *data = mtod(m, u_char *);
    477   1.1    tsubai 		len = m->m_len;
    478   1.1    tsubai 		totlen += len;
    479  1.11       wiz 		memcpy(buff, data, len);
    480   1.1    tsubai 		buff += len;
    481   1.1    tsubai 		MFREE(m, n);
    482   1.1    tsubai 	}
    483   1.1    tsubai 
    484   1.1    tsubai 	if (totlen > NBPG)
    485   1.1    tsubai 		panic("%s: maceput: packet overflow", sc->sc_dev.dv_xname);
    486   1.1    tsubai 
    487   1.1    tsubai #if 0
    488   1.1    tsubai 	if (totlen < ETHERMIN + sizeof(struct ether_header)) {
    489   1.1    tsubai 		int pad = ETHERMIN + sizeof(struct ether_header) - totlen;
    490  1.11       wiz 		memset(sc->sc_txbuf + totlen, 0, pad);
    491   1.1    tsubai 		totlen = ETHERMIN + sizeof(struct ether_header);
    492   1.1    tsubai 	}
    493   1.1    tsubai #endif
    494   1.1    tsubai 
    495   1.1    tsubai 	(*sc->sc_putpacket)(sc, totlen);
    496   1.1    tsubai 
    497   1.1    tsubai 	sc->sc_if.if_timer = 5;	/* 5 seconds to watch for failing to transmit */
    498   1.1    tsubai 	return (totlen);
    499   1.1    tsubai }
    500   1.1    tsubai 
    501   1.6    tsubai int
    502   1.1    tsubai mcintr(arg)
    503   1.1    tsubai 	void *arg;
    504   1.1    tsubai {
    505   1.1    tsubai 	struct mc_softc *sc = arg;
    506   1.1    tsubai 	u_int8_t ir;
    507   1.1    tsubai 
    508   1.1    tsubai 	ir = NIC_GET(sc, MACE_IR) & ~NIC_GET(sc, MACE_IMR);
    509   1.6    tsubai 	if (ir == 0)
    510   1.6    tsubai 		return 0;
    511   1.6    tsubai 
    512   1.1    tsubai 	if (ir & JAB) {
    513   1.1    tsubai #ifdef MCDEBUG
    514   1.1    tsubai 		printf("%s: jabber error\n", sc->sc_dev.dv_xname);
    515   1.1    tsubai #endif
    516   1.1    tsubai 		sc->sc_if.if_oerrors++;
    517   1.1    tsubai 	}
    518   1.1    tsubai 
    519   1.1    tsubai 	if (ir & BABL) {
    520   1.1    tsubai #ifdef MCDEBUG
    521   1.1    tsubai 		printf("%s: babble\n", sc->sc_dev.dv_xname);
    522   1.1    tsubai #endif
    523   1.1    tsubai 		sc->sc_if.if_oerrors++;
    524   1.1    tsubai 	}
    525   1.1    tsubai 
    526   1.1    tsubai 	if (ir & CERR) {
    527   1.1    tsubai 		printf("%s: collision error\n", sc->sc_dev.dv_xname);
    528   1.1    tsubai 		sc->sc_if.if_collisions++;
    529   1.1    tsubai 	}
    530   1.1    tsubai 
    531   1.1    tsubai 	/*
    532   1.1    tsubai 	 * Pretend we have carrier; if we don't this will be cleared
    533   1.1    tsubai 	 * shortly.
    534   1.1    tsubai 	 */
    535   1.1    tsubai 	sc->sc_havecarrier = 1;
    536   1.1    tsubai 
    537   1.1    tsubai 	if (ir & XMTINT)
    538   1.1    tsubai 		mc_tint(sc);
    539   1.1    tsubai 
    540   1.1    tsubai 	if (ir & RCVINT)
    541   1.1    tsubai 		mc_rint(sc);
    542   1.6    tsubai 
    543   1.6    tsubai 	return 1;
    544   1.1    tsubai }
    545   1.1    tsubai 
    546   1.1    tsubai integrate void
    547   1.1    tsubai mc_tint(sc)
    548   1.1    tsubai 	struct mc_softc *sc;
    549   1.1    tsubai {
    550   1.1    tsubai 	u_int8_t xmtrc, xmtfs;
    551   1.1    tsubai 
    552   1.1    tsubai 	xmtrc = NIC_GET(sc, MACE_XMTRC);
    553   1.1    tsubai 	xmtfs = NIC_GET(sc, MACE_XMTFS);
    554   1.1    tsubai 
    555   1.1    tsubai 	if ((xmtfs & XMTSV) == 0)
    556   1.1    tsubai 		return;
    557   1.1    tsubai 
    558   1.1    tsubai 	if (xmtfs & UFLO) {
    559   1.1    tsubai 		printf("%s: underflow\n", sc->sc_dev.dv_xname);
    560   1.1    tsubai 		mcreset(sc);
    561   1.1    tsubai 		return;
    562   1.1    tsubai 	}
    563   1.1    tsubai 
    564   1.1    tsubai 	if (xmtfs & LCOL) {
    565   1.1    tsubai 		printf("%s: late collision\n", sc->sc_dev.dv_xname);
    566   1.1    tsubai 		sc->sc_if.if_oerrors++;
    567   1.1    tsubai 		sc->sc_if.if_collisions++;
    568   1.1    tsubai 	}
    569   1.1    tsubai 
    570   1.1    tsubai 	if (xmtfs & MORE)
    571   1.1    tsubai 		/* Real number is unknown. */
    572   1.1    tsubai 		sc->sc_if.if_collisions += 2;
    573   1.1    tsubai 	else if (xmtfs & ONE)
    574   1.1    tsubai 		sc->sc_if.if_collisions++;
    575   1.1    tsubai 	else if (xmtfs & RTRY) {
    576   1.1    tsubai 		sc->sc_if.if_collisions += 16;
    577   1.1    tsubai 		sc->sc_if.if_oerrors++;
    578   1.1    tsubai 	}
    579   1.1    tsubai 
    580   1.1    tsubai 	if (xmtfs & LCAR) {
    581   1.1    tsubai 		sc->sc_havecarrier = 0;
    582   1.1    tsubai 		printf("%s: lost carrier\n", sc->sc_dev.dv_xname);
    583   1.1    tsubai 		sc->sc_if.if_oerrors++;
    584   1.1    tsubai 	}
    585   1.1    tsubai 
    586   1.1    tsubai 	sc->sc_if.if_flags &= ~IFF_OACTIVE;
    587   1.1    tsubai 	sc->sc_if.if_timer = 0;
    588   1.1    tsubai 	mcstart(&sc->sc_if);
    589   1.1    tsubai }
    590   1.1    tsubai 
    591   1.1    tsubai void
    592   1.1    tsubai mc_rint(sc)
    593   1.1    tsubai 	struct mc_softc *sc;
    594   1.1    tsubai {
    595   1.1    tsubai #define	rxf	sc->sc_rxframe
    596   1.1    tsubai 	u_int len;
    597   1.1    tsubai 
    598   1.1    tsubai 	len = (rxf.rx_rcvcnt | ((rxf.rx_rcvsts & 0xf) << 8)) - 4;
    599   1.1    tsubai 
    600   1.1    tsubai #ifdef MCDEBUG
    601   1.1    tsubai 	if (rxf.rx_rcvsts & 0xf0)
    602   1.1    tsubai 		printf("%s: rcvcnt %02x rcvsts %02x rntpc 0x%02x rcvcc 0x%02x\n",
    603   1.1    tsubai 		    sc->sc_dev.dv_xname, rxf.rx_rcvcnt, rxf.rx_rcvsts,
    604   1.1    tsubai 		    rxf.rx_rntpc, rxf.rx_rcvcc);
    605   1.1    tsubai #endif
    606   1.1    tsubai 
    607   1.1    tsubai 	if (rxf.rx_rcvsts & OFLO) {
    608   1.1    tsubai 		printf("%s: receive FIFO overflow\n", sc->sc_dev.dv_xname);
    609   1.1    tsubai 		sc->sc_if.if_ierrors++;
    610   1.1    tsubai 		return;
    611   1.1    tsubai 	}
    612   1.1    tsubai 
    613   1.1    tsubai 	if (rxf.rx_rcvsts & CLSN)
    614   1.1    tsubai 		sc->sc_if.if_collisions++;
    615   1.1    tsubai 
    616   1.1    tsubai 	if (rxf.rx_rcvsts & FRAM) {
    617   1.1    tsubai #ifdef MCDEBUG
    618   1.1    tsubai 		printf("%s: framing error\n", sc->sc_dev.dv_xname);
    619   1.1    tsubai #endif
    620   1.1    tsubai 		sc->sc_if.if_ierrors++;
    621   1.1    tsubai 		return;
    622   1.1    tsubai 	}
    623   1.1    tsubai 
    624   1.1    tsubai 	if (rxf.rx_rcvsts & FCS) {
    625   1.1    tsubai #ifdef MCDEBUG
    626   1.1    tsubai 		printf("%s: frame control checksum error\n", sc->sc_dev.dv_xname);
    627   1.1    tsubai #endif
    628   1.1    tsubai 		sc->sc_if.if_ierrors++;
    629   1.1    tsubai 		return;
    630   1.1    tsubai 	}
    631   1.1    tsubai 
    632   1.1    tsubai 	mace_read(sc, rxf.rx_frame, len);
    633   1.1    tsubai #undef	rxf
    634   1.1    tsubai }
    635   1.1    tsubai 
    636   1.1    tsubai integrate void
    637   1.1    tsubai mace_read(sc, pkt, len)
    638   1.1    tsubai 	struct mc_softc *sc;
    639   1.1    tsubai 	caddr_t pkt;
    640   1.1    tsubai 	int len;
    641   1.1    tsubai {
    642   1.1    tsubai 	struct ifnet *ifp = &sc->sc_if;
    643   1.1    tsubai 	struct mbuf *m;
    644   1.1    tsubai 
    645   1.1    tsubai 	if (len <= sizeof(struct ether_header) ||
    646   1.1    tsubai 	    len > ETHERMTU + sizeof(struct ether_header)) {
    647   1.1    tsubai #ifdef MCDEBUG
    648   1.1    tsubai 		printf("%s: invalid packet size %d; dropping\n",
    649   1.1    tsubai 		    sc->sc_dev.dv_xname, len);
    650   1.1    tsubai #endif
    651   1.1    tsubai 		ifp->if_ierrors++;
    652   1.1    tsubai 		return;
    653   1.1    tsubai 	}
    654   1.1    tsubai 
    655   1.1    tsubai #if NBPFILTER > 0
    656   1.1    tsubai 	/*
    657   1.1    tsubai 	 * Check if there's a bpf filter listening on this interface.
    658   1.1    tsubai 	 * If so, hand off the raw packet to enet, then discard things
    659   1.1    tsubai 	 * not destined for us (but be sure to keep broadcast/multicast).
    660   1.1    tsubai 	 */
    661   1.9   thorpej 	if (ifp->if_bpf)
    662   1.1    tsubai 		bpf_tap(ifp->if_bpf, pkt, len);
    663   1.1    tsubai #endif
    664   1.1    tsubai 	m = mace_get(sc, pkt, len);
    665   1.1    tsubai 	if (m == NULL) {
    666   1.1    tsubai 		ifp->if_ierrors++;
    667   1.1    tsubai 		return;
    668   1.1    tsubai 	}
    669   1.1    tsubai 
    670   1.1    tsubai 	ifp->if_ipackets++;
    671   1.1    tsubai 
    672   1.7   thorpej 	/* Pass the packet up. */
    673   1.7   thorpej 	(*ifp->if_input)(ifp, m);
    674   1.1    tsubai }
    675   1.1    tsubai 
    676   1.1    tsubai /*
    677   1.1    tsubai  * Pull data off an interface.
    678   1.1    tsubai  * Len is length of data, with local net header stripped.
    679   1.1    tsubai  * We copy the data into mbufs.  When full cluster sized units are present
    680   1.1    tsubai  * we copy into clusters.
    681   1.1    tsubai  */
    682   1.1    tsubai integrate struct mbuf *
    683   1.1    tsubai mace_get(sc, pkt, totlen)
    684   1.1    tsubai 	struct mc_softc *sc;
    685   1.1    tsubai 	caddr_t pkt;
    686   1.1    tsubai 	int totlen;
    687   1.1    tsubai {
    688   1.1    tsubai 	register struct mbuf *m;
    689   1.1    tsubai 	struct mbuf *top, **mp;
    690   1.1    tsubai 	int len;
    691   1.1    tsubai 
    692   1.1    tsubai 	MGETHDR(m, M_DONTWAIT, MT_DATA);
    693   1.1    tsubai 	if (m == 0)
    694   1.1    tsubai 		return (0);
    695   1.1    tsubai 	m->m_pkthdr.rcvif = &sc->sc_if;
    696   1.1    tsubai 	m->m_pkthdr.len = totlen;
    697   1.1    tsubai 	len = MHLEN;
    698   1.1    tsubai 	top = 0;
    699   1.1    tsubai 	mp = &top;
    700   1.1    tsubai 
    701   1.1    tsubai 	while (totlen > 0) {
    702   1.1    tsubai 		if (top) {
    703   1.1    tsubai 			MGET(m, M_DONTWAIT, MT_DATA);
    704   1.1    tsubai 			if (m == 0) {
    705   1.1    tsubai 				m_freem(top);
    706   1.1    tsubai 				return 0;
    707   1.1    tsubai 			}
    708   1.1    tsubai 			len = MLEN;
    709   1.1    tsubai 		}
    710   1.1    tsubai 		if (totlen >= MINCLSIZE) {
    711   1.1    tsubai 			MCLGET(m, M_DONTWAIT);
    712   1.1    tsubai 			if ((m->m_flags & M_EXT) == 0) {
    713   1.1    tsubai 				m_free(m);
    714   1.1    tsubai 				m_freem(top);
    715   1.1    tsubai 				return 0;
    716   1.1    tsubai 			}
    717   1.1    tsubai 			len = MCLBYTES;
    718   1.1    tsubai 		}
    719   1.1    tsubai 		m->m_len = len = min(totlen, len);
    720  1.11       wiz 		memcpy(mtod(m, caddr_t), pkt, len);
    721   1.1    tsubai 		pkt += len;
    722   1.1    tsubai 		totlen -= len;
    723   1.1    tsubai 		*mp = m;
    724   1.1    tsubai 		mp = &m->m_next;
    725   1.1    tsubai 	}
    726   1.1    tsubai 
    727   1.1    tsubai 	return (top);
    728   1.1    tsubai }
    729   1.1    tsubai 
    730   1.1    tsubai /*
    731   1.1    tsubai  * Go through the list of multicast addresses and calculate the logical
    732   1.1    tsubai  * address filter.
    733   1.1    tsubai  */
    734   1.1    tsubai void
    735   1.1    tsubai mace_calcladrf(ac, af)
    736   1.1    tsubai 	struct ethercom *ac;
    737   1.1    tsubai 	u_int8_t *af;
    738   1.1    tsubai {
    739   1.1    tsubai 	struct ifnet *ifp = &ac->ec_if;
    740   1.1    tsubai 	struct ether_multi *enm;
    741   1.1    tsubai 	register u_char *cp, c;
    742   1.1    tsubai 	register u_int32_t crc;
    743   1.1    tsubai 	register int i, len;
    744   1.1    tsubai 	struct ether_multistep step;
    745   1.1    tsubai 
    746   1.1    tsubai 	/*
    747   1.1    tsubai 	 * Set up multicast address filter by passing all multicast addresses
    748   1.1    tsubai 	 * through a crc generator, and then using the high order 6 bits as an
    749   1.1    tsubai 	 * index into the 64 bit logical address filter.  The high order bit
    750   1.1    tsubai 	 * selects the word, while the rest of the bits select the bit within
    751   1.1    tsubai 	 * the word.
    752   1.1    tsubai 	 */
    753   1.1    tsubai 
    754   1.1    tsubai 	*((u_int32_t *)af) = *((u_int32_t *)af + 1) = 0;
    755   1.1    tsubai 
    756   1.1    tsubai 	ETHER_FIRST_MULTI(step, ac, enm);
    757   1.1    tsubai 	while (enm != NULL) {
    758   1.1    tsubai 		if (ETHER_CMP(enm->enm_addrlo, enm->enm_addrhi)) {
    759   1.1    tsubai 			/*
    760   1.1    tsubai 			 * We must listen to a range of multicast addresses.
    761   1.1    tsubai 			 * For now, just accept all multicasts, rather than
    762   1.1    tsubai 			 * trying to set only those filter bits needed to match
    763   1.1    tsubai 			 * the range.  (At this time, the only use of address
    764   1.1    tsubai 			 * ranges is for IP multicast routing, for which the
    765   1.1    tsubai 			 * range is big enough to require all bits set.)
    766   1.1    tsubai 			 */
    767   1.1    tsubai 			goto allmulti;
    768   1.1    tsubai 		}
    769   1.1    tsubai 
    770   1.1    tsubai 		cp = enm->enm_addrlo;
    771   1.1    tsubai 		crc = 0xffffffff;
    772   1.1    tsubai 		for (len = sizeof(enm->enm_addrlo); --len >= 0;) {
    773   1.1    tsubai 			c = *cp++;
    774   1.1    tsubai 			for (i = 8; --i >= 0;) {
    775   1.1    tsubai 				if ((crc & 0x01) ^ (c & 0x01)) {
    776   1.1    tsubai 					crc >>= 1;
    777   1.1    tsubai 					crc ^= 0xedb88320;
    778   1.1    tsubai 				} else
    779   1.1    tsubai 					crc >>= 1;
    780   1.1    tsubai 				c >>= 1;
    781   1.1    tsubai 			}
    782   1.1    tsubai 		}
    783   1.1    tsubai 		/* Just want the 6 most significant bits. */
    784   1.1    tsubai 		crc >>= 26;
    785   1.1    tsubai 
    786   1.1    tsubai 		/* Set the corresponding bit in the filter. */
    787   1.1    tsubai 		af[crc >> 3] |= 1 << (crc & 7);
    788   1.1    tsubai 
    789   1.1    tsubai 		ETHER_NEXT_MULTI(step, enm);
    790   1.1    tsubai 	}
    791   1.1    tsubai 	ifp->if_flags &= ~IFF_ALLMULTI;
    792   1.1    tsubai 	return;
    793   1.1    tsubai 
    794   1.1    tsubai allmulti:
    795   1.1    tsubai 	ifp->if_flags |= IFF_ALLMULTI;
    796   1.1    tsubai 	*((u_int32_t *)af) = *((u_int32_t *)af + 1) = 0xffffffff;
    797   1.1    tsubai }
    798   1.1    tsubai 
    799   1.1    tsubai int
    800   1.1    tsubai mc_mediachange(ifp)
    801   1.1    tsubai 	struct ifnet *ifp;
    802   1.1    tsubai {
    803   1.1    tsubai 	return EINVAL;
    804   1.1    tsubai }
    805   1.1    tsubai 
    806   1.1    tsubai void
    807   1.1    tsubai mc_mediastatus(ifp, ifmr)
    808   1.1    tsubai 	struct ifnet *ifp;
    809   1.1    tsubai 	struct ifmediareq *ifmr;
    810   1.1    tsubai {
    811   1.1    tsubai 	struct mc_softc *sc = ifp->if_softc;
    812   1.1    tsubai 
    813   1.1    tsubai 	if ((ifp->if_flags & IFF_UP) == 0)
    814   1.1    tsubai 		return;
    815   1.1    tsubai 
    816   1.1    tsubai 	if (sc->sc_havecarrier)
    817   1.1    tsubai 		ifmr->ifm_status |= IFM_ACTIVE;
    818   1.1    tsubai }
    819