Home | History | Annotate | Line # | Download | only in dev
if_bm.c revision 1.20.2.5
      1 /*	$NetBSD: if_bm.c,v 1.20.2.5 2005/02/04 11:44:33 skrll Exp $	*/
      2 
      3 /*-
      4  * Copyright (C) 1998, 1999, 2000 Tsubai Masanari.  All rights reserved.
      5  *
      6  * Redistribution and use in source and binary forms, with or without
      7  * modification, are permitted provided that the following conditions
      8  * are met:
      9  * 1. Redistributions of source code must retain the above copyright
     10  *    notice, this list of conditions and the following disclaimer.
     11  * 2. Redistributions in binary form must reproduce the above copyright
     12  *    notice, this list of conditions and the following disclaimer in the
     13  *    documentation and/or other materials provided with the distribution.
     14  * 3. The name of the author may not be used to endorse or promote products
     15  *    derived from this software without specific prior written permission.
     16  *
     17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     26  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     27  */
     28 
     29 #include <sys/cdefs.h>
     30 __KERNEL_RCSID(0, "$NetBSD: if_bm.c,v 1.20.2.5 2005/02/04 11:44:33 skrll Exp $");
     31 
     32 #include "opt_inet.h"
     33 #include "opt_ns.h"
     34 #include "bpfilter.h"
     35 
     36 #include <sys/param.h>
     37 #include <sys/device.h>
     38 #include <sys/ioctl.h>
     39 #include <sys/kernel.h>
     40 #include <sys/mbuf.h>
     41 #include <sys/socket.h>
     42 #include <sys/systm.h>
     43 #include <sys/callout.h>
     44 
     45 #include <uvm/uvm_extern.h>
     46 
     47 #include <net/if.h>
     48 #include <net/if_dl.h>
     49 #include <net/if_ether.h>
     50 #include <net/if_media.h>
     51 
     52 #if NBPFILTER > 0
     53 #include <net/bpf.h>
     54 #endif
     55 
     56 #ifdef INET
     57 #include <netinet/in.h>
     58 #include <netinet/if_inarp.h>
     59 #endif
     60 
     61 #ifdef NS
     62 #include <netns/ns.h>
     63 #include <netns/ns_if.h>
     64 #endif
     65 
     66 #include <dev/ofw/openfirm.h>
     67 
     68 #include <dev/mii/mii.h>
     69 #include <dev/mii/miivar.h>
     70 #include <dev/mii/mii_bitbang.h>
     71 
     72 #include <powerpc/spr.h>
     73 
     74 #include <machine/autoconf.h>
     75 #include <machine/pio.h>
     76 
     77 #include <macppc/dev/dbdma.h>
     78 #include <macppc/dev/if_bmreg.h>
     79 
     80 #define BMAC_TXBUFS 2
     81 #define BMAC_RXBUFS 16
     82 #define BMAC_BUFLEN 2048
     83 
     84 struct bmac_softc {
     85 	struct device sc_dev;
     86 	struct ethercom sc_ethercom;
     87 #define sc_if sc_ethercom.ec_if
     88 	struct callout sc_tick_ch;
     89 	vaddr_t sc_regs;
     90 	dbdma_regmap_t *sc_txdma;
     91 	dbdma_regmap_t *sc_rxdma;
     92 	dbdma_command_t *sc_txcmd;
     93 	dbdma_command_t *sc_rxcmd;
     94 	caddr_t sc_txbuf;
     95 	caddr_t sc_rxbuf;
     96 	int sc_rxlast;
     97 	int sc_flags;
     98 	struct mii_data sc_mii;
     99 	u_char sc_enaddr[6];
    100 };
    101 
    102 #define BMAC_BMACPLUS	0x01
    103 #define BMAC_DEBUGFLAG	0x02
    104 
    105 extern u_int *heathrow_FCR;
    106 
    107 static __inline int bmac_read_reg __P((struct bmac_softc *, int));
    108 static __inline void bmac_write_reg __P((struct bmac_softc *, int, int));
    109 static __inline void bmac_set_bits __P((struct bmac_softc *, int, int));
    110 static __inline void bmac_reset_bits __P((struct bmac_softc *, int, int));
    111 
    112 int bmac_match __P((struct device *, struct cfdata *, void *));
    113 void bmac_attach __P((struct device *, struct device *, void *));
    114 void bmac_reset_chip __P((struct bmac_softc *));
    115 void bmac_init __P((struct bmac_softc *));
    116 void bmac_init_dma __P((struct bmac_softc *));
    117 int bmac_intr __P((void *));
    118 int bmac_rint __P((void *));
    119 void bmac_reset __P((struct bmac_softc *));
    120 void bmac_stop __P((struct bmac_softc *));
    121 void bmac_start __P((struct ifnet *));
    122 void bmac_transmit_packet __P((struct bmac_softc *, void *, int));
    123 int bmac_put __P((struct bmac_softc *, caddr_t, struct mbuf *));
    124 struct mbuf *bmac_get __P((struct bmac_softc *, caddr_t, int));
    125 void bmac_watchdog __P((struct ifnet *));
    126 int bmac_ioctl __P((struct ifnet *, u_long, caddr_t));
    127 int bmac_mediachange __P((struct ifnet *));
    128 void bmac_mediastatus __P((struct ifnet *, struct ifmediareq *));
    129 void bmac_setladrf __P((struct bmac_softc *));
    130 
    131 int bmac_mii_readreg __P((struct device *, int, int));
    132 void bmac_mii_writereg __P((struct device *, int, int, int));
    133 void bmac_mii_statchg __P((struct device *));
    134 void bmac_mii_tick __P((void *));
    135 u_int32_t bmac_mbo_read __P((struct device *));
    136 void bmac_mbo_write __P((struct device *, u_int32_t));
    137 
    138 CFATTACH_DECL(bm, sizeof(struct bmac_softc),
    139     bmac_match, bmac_attach, NULL, NULL);
    140 
    141 struct mii_bitbang_ops bmac_mbo = {
    142 	bmac_mbo_read, bmac_mbo_write,
    143 	{ MIFDO, MIFDI, MIFDC, MIFDIR, 0 }
    144 };
    145 
    146 int
    147 bmac_read_reg(sc, off)
    148 	struct bmac_softc *sc;
    149 	int off;
    150 {
    151 	return in16rb(sc->sc_regs + off);
    152 }
    153 
    154 void
    155 bmac_write_reg(sc, off, val)
    156 	struct bmac_softc *sc;
    157 	int off, val;
    158 {
    159 	out16rb(sc->sc_regs + off, val);
    160 }
    161 
    162 void
    163 bmac_set_bits(sc, off, val)
    164 	struct bmac_softc *sc;
    165 	int off, val;
    166 {
    167 	val |= bmac_read_reg(sc, off);
    168 	bmac_write_reg(sc, off, val);
    169 }
    170 
    171 void
    172 bmac_reset_bits(sc, off, val)
    173 	struct bmac_softc *sc;
    174 	int off, val;
    175 {
    176 	bmac_write_reg(sc, off, bmac_read_reg(sc, off) & ~val);
    177 }
    178 
    179 int
    180 bmac_match(parent, cf, aux)
    181 	struct device *parent;
    182 	struct cfdata *cf;
    183 	void *aux;
    184 {
    185 	struct confargs *ca = aux;
    186 
    187 	if (ca->ca_nreg < 24 || ca->ca_nintr < 12)
    188 		return 0;
    189 
    190 	if (strcmp(ca->ca_name, "bmac") == 0)		/* bmac */
    191 		return 1;
    192 	if (strcmp(ca->ca_name, "ethernet") == 0)	/* bmac+ */
    193 		return 1;
    194 
    195 	return 0;
    196 }
    197 
    198 void
    199 bmac_attach(parent, self, aux)
    200 	struct device *parent, *self;
    201 	void *aux;
    202 {
    203 	struct confargs *ca = aux;
    204 	struct bmac_softc *sc = (void *)self;
    205 	struct ifnet *ifp = &sc->sc_if;
    206 	struct mii_data *mii = &sc->sc_mii;
    207 	u_char laddr[6];
    208 
    209 	callout_init(&sc->sc_tick_ch);
    210 
    211 	sc->sc_flags =0;
    212 	if (strcmp(ca->ca_name, "ethernet") == 0) {
    213 		char name[64];
    214 
    215 		memset(name, 0, 64);
    216 		OF_package_to_path(ca->ca_node, name, sizeof(name));
    217 		OF_open(name);
    218 		sc->sc_flags |= BMAC_BMACPLUS;
    219 	}
    220 
    221 	ca->ca_reg[0] += ca->ca_baseaddr;
    222 	ca->ca_reg[2] += ca->ca_baseaddr;
    223 	ca->ca_reg[4] += ca->ca_baseaddr;
    224 
    225 	sc->sc_regs = (vaddr_t)mapiodev(ca->ca_reg[0], PAGE_SIZE);
    226 
    227 	bmac_write_reg(sc, INTDISABLE, NoEventsMask);
    228 
    229 	if (OF_getprop(ca->ca_node, "local-mac-address", laddr, 6) == -1 &&
    230 	    OF_getprop(ca->ca_node, "mac-address", laddr, 6) == -1) {
    231 		printf(": cannot get mac-address\n");
    232 		return;
    233 	}
    234 	memcpy(sc->sc_enaddr, laddr, 6);
    235 
    236 	sc->sc_txdma = mapiodev(ca->ca_reg[2], PAGE_SIZE);
    237 	sc->sc_rxdma = mapiodev(ca->ca_reg[4], PAGE_SIZE);
    238 	sc->sc_txcmd = dbdma_alloc(BMAC_TXBUFS * sizeof(dbdma_command_t));
    239 	sc->sc_rxcmd = dbdma_alloc((BMAC_RXBUFS + 1) * sizeof(dbdma_command_t));
    240 	sc->sc_txbuf = malloc(BMAC_BUFLEN * BMAC_TXBUFS, M_DEVBUF, M_NOWAIT);
    241 	sc->sc_rxbuf = malloc(BMAC_BUFLEN * BMAC_RXBUFS, M_DEVBUF, M_NOWAIT);
    242 	if (sc->sc_txbuf == NULL || sc->sc_rxbuf == NULL ||
    243 	    sc->sc_txcmd == NULL || sc->sc_rxcmd == NULL) {
    244 		printf("cannot allocate memory\n");
    245 		return;
    246 	}
    247 
    248 	printf(" irq %d,%d: address %s\n", ca->ca_intr[0], ca->ca_intr[2],
    249 		ether_sprintf(laddr));
    250 
    251 	intr_establish(ca->ca_intr[0], IST_LEVEL, IPL_NET, bmac_intr, sc);
    252 	intr_establish(ca->ca_intr[2], IST_LEVEL, IPL_NET, bmac_rint, sc);
    253 
    254 	memcpy(ifp->if_xname, sc->sc_dev.dv_xname, IFNAMSIZ);
    255 	ifp->if_softc = sc;
    256 	ifp->if_ioctl = bmac_ioctl;
    257 	ifp->if_start = bmac_start;
    258 	ifp->if_flags =
    259 		IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS | IFF_MULTICAST;
    260 	ifp->if_watchdog = bmac_watchdog;
    261 	IFQ_SET_READY(&ifp->if_snd);
    262 
    263 	mii->mii_ifp = ifp;
    264 	mii->mii_readreg = bmac_mii_readreg;
    265 	mii->mii_writereg = bmac_mii_writereg;
    266 	mii->mii_statchg = bmac_mii_statchg;
    267 
    268 	ifmedia_init(&mii->mii_media, 0, bmac_mediachange, bmac_mediastatus);
    269 	mii_attach(&sc->sc_dev, mii, 0xffffffff, MII_PHY_ANY,
    270 		      MII_OFFSET_ANY, 0);
    271 
    272 	/* Choose a default media. */
    273 	if (LIST_FIRST(&mii->mii_phys) == NULL) {
    274 		ifmedia_add(&mii->mii_media, IFM_ETHER|IFM_10_T, 0, NULL);
    275 		ifmedia_set(&mii->mii_media, IFM_ETHER|IFM_10_T);
    276 	} else
    277 		ifmedia_set(&mii->mii_media, IFM_ETHER|IFM_AUTO);
    278 
    279 	bmac_reset_chip(sc);
    280 
    281 	if_attach(ifp);
    282 	ether_ifattach(ifp, sc->sc_enaddr);
    283 }
    284 
    285 /*
    286  * Reset and enable bmac by heathrow FCR.
    287  */
    288 void
    289 bmac_reset_chip(sc)
    290 	struct bmac_softc *sc;
    291 {
    292 	u_int v;
    293 
    294 	dbdma_reset(sc->sc_txdma);
    295 	dbdma_reset(sc->sc_rxdma);
    296 
    297 	v = in32rb(heathrow_FCR);
    298 
    299 	v |= EnetEnable;
    300 	out32rb(heathrow_FCR, v);
    301 	delay(50000);
    302 
    303 	v |= ResetEnetCell;
    304 	out32rb(heathrow_FCR, v);
    305 	delay(50000);
    306 
    307 	v &= ~ResetEnetCell;
    308 	out32rb(heathrow_FCR, v);
    309 	delay(50000);
    310 
    311 	out32rb(heathrow_FCR, v);
    312 }
    313 
    314 void
    315 bmac_init(sc)
    316 	struct bmac_softc *sc;
    317 {
    318 	struct ifnet *ifp = &sc->sc_if;
    319 	struct ether_header *eh;
    320 	caddr_t data;
    321 	int i, tb, bmcr;
    322 	u_short *p;
    323 
    324 	bmac_reset_chip(sc);
    325 
    326 	/* XXX */
    327 	bmcr = bmac_mii_readreg((struct device *)sc, 0, MII_BMCR);
    328 	bmcr &= ~BMCR_ISO;
    329 	bmac_mii_writereg((struct device *)sc, 0, MII_BMCR, bmcr);
    330 
    331 	bmac_write_reg(sc, RXRST, RxResetValue);
    332 	bmac_write_reg(sc, TXRST, TxResetBit);
    333 
    334 	/* Wait for reset completion. */
    335 	for (i = 1000; i > 0; i -= 10) {
    336 		if ((bmac_read_reg(sc, TXRST) & TxResetBit) == 0)
    337 			break;
    338 		delay(10);
    339 	}
    340 	if (i <= 0)
    341 		printf("%s: reset timeout\n", ifp->if_xname);
    342 
    343 	if (! (sc->sc_flags & BMAC_BMACPLUS))
    344 		bmac_set_bits(sc, XCVRIF, ClkBit|SerialMode|COLActiveLow);
    345 
    346 	if ((mfpvr() >> 16) == MPC601)
    347 		tb = mfrtcl();
    348 	else
    349 		tb = mftbl();
    350 	bmac_write_reg(sc, RSEED, tb);
    351 	bmac_set_bits(sc, XIFC, TxOutputEnable);
    352 	bmac_read_reg(sc, PAREG);
    353 
    354 	/* Reset various counters. */
    355 	bmac_write_reg(sc, NCCNT, 0);
    356 	bmac_write_reg(sc, NTCNT, 0);
    357 	bmac_write_reg(sc, EXCNT, 0);
    358 	bmac_write_reg(sc, LTCNT, 0);
    359 	bmac_write_reg(sc, FRCNT, 0);
    360 	bmac_write_reg(sc, LECNT, 0);
    361 	bmac_write_reg(sc, AECNT, 0);
    362 	bmac_write_reg(sc, FECNT, 0);
    363 	bmac_write_reg(sc, RXCV, 0);
    364 
    365 	/* Set tx fifo information. */
    366 	bmac_write_reg(sc, TXTH, 4);	/* 4 octets before tx starts */
    367 
    368 	bmac_write_reg(sc, TXFIFOCSR, 0);
    369 	bmac_write_reg(sc, TXFIFOCSR, TxFIFOEnable);
    370 
    371 	/* Set rx fifo information. */
    372 	bmac_write_reg(sc, RXFIFOCSR, 0);
    373 	bmac_write_reg(sc, RXFIFOCSR, RxFIFOEnable);
    374 
    375 	/* Clear status register. */
    376 	bmac_read_reg(sc, STATUS);
    377 
    378 	bmac_write_reg(sc, HASH3, 0);
    379 	bmac_write_reg(sc, HASH2, 0);
    380 	bmac_write_reg(sc, HASH1, 0);
    381 	bmac_write_reg(sc, HASH0, 0);
    382 
    383 	/* Set MAC address. */
    384 	p = (u_short *)sc->sc_enaddr;
    385 	bmac_write_reg(sc, MADD0, *p++);
    386 	bmac_write_reg(sc, MADD1, *p++);
    387 	bmac_write_reg(sc, MADD2, *p);
    388 
    389 	bmac_write_reg(sc, RXCFG,
    390 		RxCRCEnable | RxHashFilterEnable | RxRejectOwnPackets);
    391 
    392 	if (ifp->if_flags & IFF_PROMISC)
    393 		bmac_set_bits(sc, RXCFG, RxPromiscEnable);
    394 
    395 	bmac_init_dma(sc);
    396 
    397 	/* Enable TX/RX */
    398 	bmac_set_bits(sc, RXCFG, RxMACEnable);
    399 	bmac_set_bits(sc, TXCFG, TxMACEnable);
    400 
    401 	bmac_write_reg(sc, INTDISABLE, NormalIntEvents);
    402 
    403 	ifp->if_flags |= IFF_RUNNING;
    404 	ifp->if_flags &= ~IFF_OACTIVE;
    405 	ifp->if_timer = 0;
    406 
    407 	data = sc->sc_txbuf;
    408 	eh = (struct ether_header *)data;
    409 
    410 	memset(data, 0, sizeof(eh) + ETHERMIN);
    411 	memcpy(eh->ether_dhost, sc->sc_enaddr, ETHER_ADDR_LEN);
    412 	memcpy(eh->ether_shost, sc->sc_enaddr, ETHER_ADDR_LEN);
    413 	bmac_transmit_packet(sc, data, sizeof(eh) + ETHERMIN);
    414 
    415 	bmac_start(ifp);
    416 
    417 	callout_reset(&sc->sc_tick_ch, hz, bmac_mii_tick, sc);
    418 }
    419 
    420 void
    421 bmac_init_dma(sc)
    422 	struct bmac_softc *sc;
    423 {
    424 	dbdma_command_t *cmd = sc->sc_rxcmd;
    425 	int i;
    426 
    427 	dbdma_reset(sc->sc_txdma);
    428 	dbdma_reset(sc->sc_rxdma);
    429 
    430 	memset(sc->sc_txcmd, 0, BMAC_TXBUFS * sizeof(dbdma_command_t));
    431 	memset(sc->sc_rxcmd, 0, (BMAC_RXBUFS + 1) * sizeof(dbdma_command_t));
    432 
    433 	for (i = 0; i < BMAC_RXBUFS; i++) {
    434 		DBDMA_BUILD(cmd, DBDMA_CMD_IN_LAST, 0, BMAC_BUFLEN,
    435 			vtophys((vaddr_t)sc->sc_rxbuf + BMAC_BUFLEN * i),
    436 			DBDMA_INT_ALWAYS, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    437 		cmd++;
    438 	}
    439 	DBDMA_BUILD(cmd, DBDMA_CMD_NOP, 0, 0, 0,
    440 		DBDMA_INT_NEVER, DBDMA_WAIT_NEVER, DBDMA_BRANCH_ALWAYS);
    441 	dbdma_st32(&cmd->d_cmddep, vtophys((vaddr_t)sc->sc_rxcmd));
    442 
    443 	sc->sc_rxlast = 0;
    444 
    445 	dbdma_start(sc->sc_rxdma, sc->sc_rxcmd);
    446 }
    447 
    448 int
    449 bmac_intr(v)
    450 	void *v;
    451 {
    452 	struct bmac_softc *sc = v;
    453 	int stat;
    454 
    455 	stat = bmac_read_reg(sc, STATUS);
    456 	if (stat == 0)
    457 		return 0;
    458 
    459 #ifdef BMAC_DEBUG
    460 	printf("bmac_intr status = 0x%x\n", stat);
    461 #endif
    462 
    463 	if (stat & IntFrameSent) {
    464 		sc->sc_if.if_flags &= ~IFF_OACTIVE;
    465 		sc->sc_if.if_timer = 0;
    466 		sc->sc_if.if_opackets++;
    467 		bmac_start(&sc->sc_if);
    468 	}
    469 
    470 	/* XXX should do more! */
    471 
    472 	return 1;
    473 }
    474 
    475 int
    476 bmac_rint(v)
    477 	void *v;
    478 {
    479 	struct bmac_softc *sc = v;
    480 	struct ifnet *ifp = &sc->sc_if;
    481 	struct mbuf *m;
    482 	dbdma_command_t *cmd;
    483 	int status, resid, count, datalen;
    484 	int i, n;
    485 	void *data;
    486 
    487 	i = sc->sc_rxlast;
    488 	for (n = 0; n < BMAC_RXBUFS; n++, i++) {
    489 		if (i == BMAC_RXBUFS)
    490 			i = 0;
    491 		cmd = &sc->sc_rxcmd[i];
    492 		status = dbdma_ld16(&cmd->d_status);
    493 		resid = dbdma_ld16(&cmd->d_resid);
    494 
    495 #ifdef BMAC_DEBUG
    496 		if (status != 0 && status != 0x8440 && status != 0x9440)
    497 			printf("bmac_rint status = 0x%x\n", status);
    498 #endif
    499 
    500 		if ((status & DBDMA_CNTRL_ACTIVE) == 0)	/* 0x9440 | 0x8440 */
    501 			continue;
    502 		count = dbdma_ld16(&cmd->d_count);
    503 		datalen = count - resid - 2;		/* 2 == framelen */
    504 		if (datalen < sizeof(struct ether_header)) {
    505 			printf("%s: short packet len = %d\n",
    506 				ifp->if_xname, datalen);
    507 			goto next;
    508 		}
    509 		DBDMA_BUILD_CMD(cmd, DBDMA_CMD_STOP, 0, 0, 0, 0);
    510 		data = sc->sc_rxbuf + BMAC_BUFLEN * i;
    511 
    512 		/* XXX Sometimes bmac reads one extra byte. */
    513 		if (datalen == ETHER_MAX_LEN + 1)
    514 			datalen--;
    515 
    516 		/* Trim the CRC. */
    517 		datalen -= ETHER_CRC_LEN;
    518 
    519 		m = bmac_get(sc, data, datalen);
    520 		if (m == NULL) {
    521 			ifp->if_ierrors++;
    522 			goto next;
    523 		}
    524 
    525 #if NBPFILTER > 0
    526 		/*
    527 		 * Check if there's a BPF listener on this interface.
    528 		 * If so, hand off the raw packet to BPF.
    529 		 */
    530 		if (ifp->if_bpf)
    531 			bpf_mtap(ifp->if_bpf, m);
    532 #endif
    533 		(*ifp->if_input)(ifp, m);
    534 		ifp->if_ipackets++;
    535 
    536 next:
    537 		DBDMA_BUILD_CMD(cmd, DBDMA_CMD_IN_LAST, 0, DBDMA_INT_ALWAYS,
    538 			DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    539 
    540 		cmd->d_status = 0;
    541 		cmd->d_resid = 0;
    542 		sc->sc_rxlast = i + 1;
    543 	}
    544 	dbdma_continue(sc->sc_rxdma);
    545 
    546 	return 1;
    547 }
    548 
    549 void
    550 bmac_reset(sc)
    551 	struct bmac_softc *sc;
    552 {
    553 	int s;
    554 
    555 	s = splnet();
    556 	bmac_init(sc);
    557 	splx(s);
    558 }
    559 
    560 void
    561 bmac_stop(sc)
    562 	struct bmac_softc *sc;
    563 {
    564 	struct ifnet *ifp = &sc->sc_if;
    565 	int s;
    566 
    567 	s = splnet();
    568 
    569 	callout_stop(&sc->sc_tick_ch);
    570 	mii_down(&sc->sc_mii);
    571 
    572 	/* Disable TX/RX. */
    573 	bmac_reset_bits(sc, TXCFG, TxMACEnable);
    574 	bmac_reset_bits(sc, RXCFG, RxMACEnable);
    575 
    576 	/* Disable all interrupts. */
    577 	bmac_write_reg(sc, INTDISABLE, NoEventsMask);
    578 
    579 	dbdma_stop(sc->sc_txdma);
    580 	dbdma_stop(sc->sc_rxdma);
    581 
    582 	ifp->if_flags &= ~(IFF_UP | IFF_RUNNING);
    583 	ifp->if_timer = 0;
    584 
    585 	splx(s);
    586 }
    587 
    588 void
    589 bmac_start(ifp)
    590 	struct ifnet *ifp;
    591 {
    592 	struct bmac_softc *sc = ifp->if_softc;
    593 	struct mbuf *m;
    594 	int tlen;
    595 
    596 	if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE)) != IFF_RUNNING)
    597 		return;
    598 
    599 	while (1) {
    600 		if (ifp->if_flags & IFF_OACTIVE)
    601 			return;
    602 
    603 		IFQ_DEQUEUE(&ifp->if_snd, m);
    604 		if (m == 0)
    605 			break;
    606 #if NBPFILTER > 0
    607 		/*
    608 		 * If BPF is listening on this interface, let it see the
    609 		 * packet before we commit it to the wire.
    610 		 */
    611 		if (ifp->if_bpf)
    612 			bpf_mtap(ifp->if_bpf, m);
    613 #endif
    614 
    615 		ifp->if_flags |= IFF_OACTIVE;
    616 		tlen = bmac_put(sc, sc->sc_txbuf, m);
    617 
    618 		/* 5 seconds to watch for failing to transmit */
    619 		ifp->if_timer = 5;
    620 		ifp->if_opackets++;		/* # of pkts */
    621 
    622 		bmac_transmit_packet(sc, sc->sc_txbuf, tlen);
    623 	}
    624 }
    625 
    626 void
    627 bmac_transmit_packet(sc, buff, len)
    628 	struct bmac_softc *sc;
    629 	void *buff;
    630 	int len;
    631 {
    632 	dbdma_command_t *cmd = sc->sc_txcmd;
    633 	vaddr_t va = (vaddr_t)buff;
    634 
    635 #ifdef BMAC_DEBUG
    636 	if (vtophys(va) + len - 1 != vtophys(va + len - 1))
    637 		panic("bmac_transmit_packet");
    638 #endif
    639 
    640 	DBDMA_BUILD(cmd, DBDMA_CMD_OUT_LAST, 0, len, vtophys(va),
    641 		DBDMA_INT_NEVER, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    642 	cmd++;
    643 	DBDMA_BUILD(cmd, DBDMA_CMD_STOP, 0, 0, 0,
    644 		DBDMA_INT_ALWAYS, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    645 
    646 	dbdma_start(sc->sc_txdma, sc->sc_txcmd);
    647 }
    648 
    649 int
    650 bmac_put(sc, buff, m)
    651 	struct bmac_softc *sc;
    652 	caddr_t buff;
    653 	struct mbuf *m;
    654 {
    655 	struct mbuf *n;
    656 	int len, tlen = 0;
    657 
    658 	for (; m; m = n) {
    659 		len = m->m_len;
    660 		if (len == 0) {
    661 			MFREE(m, n);
    662 			continue;
    663 		}
    664 		memcpy(buff, mtod(m, caddr_t), len);
    665 		buff += len;
    666 		tlen += len;
    667 		MFREE(m, n);
    668 	}
    669 	if (tlen > PAGE_SIZE)
    670 		panic("%s: putpacket packet overflow", sc->sc_dev.dv_xname);
    671 
    672 	return tlen;
    673 }
    674 
    675 struct mbuf *
    676 bmac_get(sc, pkt, totlen)
    677 	struct bmac_softc *sc;
    678 	caddr_t pkt;
    679 	int totlen;
    680 {
    681 	struct mbuf *m;
    682 	struct mbuf *top, **mp;
    683 	int len;
    684 
    685 	MGETHDR(m, M_DONTWAIT, MT_DATA);
    686 	if (m == 0)
    687 		return 0;
    688 	m->m_pkthdr.rcvif = &sc->sc_if;
    689 	m->m_pkthdr.len = totlen;
    690 	len = MHLEN;
    691 	top = 0;
    692 	mp = &top;
    693 
    694 	while (totlen > 0) {
    695 		if (top) {
    696 			MGET(m, M_DONTWAIT, MT_DATA);
    697 			if (m == 0) {
    698 				m_freem(top);
    699 				return 0;
    700 			}
    701 			len = MLEN;
    702 		}
    703 		if (totlen >= MINCLSIZE) {
    704 			MCLGET(m, M_DONTWAIT);
    705 			if ((m->m_flags & M_EXT) == 0) {
    706 				m_free(m);
    707 				m_freem(top);
    708 				return 0;
    709 			}
    710 			len = MCLBYTES;
    711 		}
    712 		m->m_len = len = min(totlen, len);
    713 		memcpy(mtod(m, caddr_t), pkt, len);
    714 		pkt += len;
    715 		totlen -= len;
    716 		*mp = m;
    717 		mp = &m->m_next;
    718 	}
    719 
    720 	return top;
    721 }
    722 
    723 void
    724 bmac_watchdog(ifp)
    725 	struct ifnet *ifp;
    726 {
    727 	struct bmac_softc *sc = ifp->if_softc;
    728 
    729 	bmac_reset_bits(sc, RXCFG, RxMACEnable);
    730 	bmac_reset_bits(sc, TXCFG, TxMACEnable);
    731 
    732 	printf("%s: device timeout\n", ifp->if_xname);
    733 	ifp->if_oerrors++;
    734 
    735 	bmac_reset(sc);
    736 }
    737 
    738 int
    739 bmac_ioctl(ifp, cmd, data)
    740 	struct ifnet *ifp;
    741 	u_long cmd;
    742 	caddr_t data;
    743 {
    744 	struct bmac_softc *sc = ifp->if_softc;
    745 	struct ifaddr *ifa = (struct ifaddr *)data;
    746 	struct ifreq *ifr = (struct ifreq *)data;
    747 	int s, error = 0;
    748 
    749 	s = splnet();
    750 
    751 	switch (cmd) {
    752 
    753 	case SIOCSIFADDR:
    754 		ifp->if_flags |= IFF_UP;
    755 
    756 		switch (ifa->ifa_addr->sa_family) {
    757 #ifdef INET
    758 		case AF_INET:
    759 			bmac_init(sc);
    760 			arp_ifinit(ifp, ifa);
    761 			break;
    762 #endif
    763 #ifdef NS
    764 		case AF_NS:
    765 		    {
    766 			struct ns_addr *ina = &IA_SNS(ifa)->sns_addr;
    767 
    768 			if (ns_nullhost(*ina))
    769 				ina->x_host =
    770 				    *(union ns_host *)LLADDR(ifp->if_sadl);
    771 			else {
    772 				memcpy(LLADDR(ifp->if_sadl),
    773 				    ina->x_host.c_host,
    774 				    sizeof(sc->sc_enaddr));
    775 			}
    776 			/* Set new address. */
    777 			bmac_init(sc);
    778 			break;
    779 		    }
    780 #endif
    781 		default:
    782 			bmac_init(sc);
    783 			break;
    784 		}
    785 		break;
    786 
    787 	case SIOCSIFFLAGS:
    788 		if ((ifp->if_flags & IFF_UP) == 0 &&
    789 		    (ifp->if_flags & IFF_RUNNING) != 0) {
    790 			/*
    791 			 * If interface is marked down and it is running, then
    792 			 * stop it.
    793 			 */
    794 			bmac_stop(sc);
    795 			ifp->if_flags &= ~IFF_RUNNING;
    796 		} else if ((ifp->if_flags & IFF_UP) != 0 &&
    797 		    (ifp->if_flags & IFF_RUNNING) == 0) {
    798 			/*
    799 			 * If interface is marked up and it is stopped, then
    800 			 * start it.
    801 			 */
    802 			bmac_init(sc);
    803 		} else {
    804 			/*
    805 			 * Reset the interface to pick up changes in any other
    806 			 * flags that affect hardware registers.
    807 			 */
    808 			/*bmac_stop(sc);*/
    809 			bmac_init(sc);
    810 		}
    811 #ifdef BMAC_DEBUG
    812 		if (ifp->if_flags & IFF_DEBUG)
    813 			sc->sc_flags |= BMAC_DEBUGFLAG;
    814 #endif
    815 		break;
    816 
    817 	case SIOCADDMULTI:
    818 	case SIOCDELMULTI:
    819 		error = (cmd == SIOCADDMULTI) ?
    820 		    ether_addmulti(ifr, &sc->sc_ethercom) :
    821 		    ether_delmulti(ifr, &sc->sc_ethercom);
    822 
    823 		if (error == ENETRESET) {
    824 			/*
    825 			 * Multicast list has changed; set the hardware filter
    826 			 * accordingly.
    827 			 */
    828 			if (ifp->if_flags & IFF_RUNNING) {
    829 				bmac_init(sc);
    830 				bmac_setladrf(sc);
    831 			}
    832 			error = 0;
    833 		}
    834 		break;
    835 
    836 	case SIOCGIFMEDIA:
    837 	case SIOCSIFMEDIA:
    838 		error = ifmedia_ioctl(ifp, ifr, &sc->sc_mii.mii_media, cmd);
    839 		break;
    840 
    841 	default:
    842 		error = EINVAL;
    843 	}
    844 
    845 	splx(s);
    846 	return error;
    847 }
    848 
    849 int
    850 bmac_mediachange(ifp)
    851 	struct ifnet *ifp;
    852 {
    853 	struct bmac_softc *sc = ifp->if_softc;
    854 
    855 	return mii_mediachg(&sc->sc_mii);
    856 }
    857 
    858 void
    859 bmac_mediastatus(ifp, ifmr)
    860 	struct ifnet *ifp;
    861 	struct ifmediareq *ifmr;
    862 {
    863 	struct bmac_softc *sc = ifp->if_softc;
    864 
    865 	mii_pollstat(&sc->sc_mii);
    866 
    867 	ifmr->ifm_status = sc->sc_mii.mii_media_status;
    868 	ifmr->ifm_active = sc->sc_mii.mii_media_active;
    869 }
    870 
    871 /*
    872  * Set up the logical address filter.
    873  */
    874 void
    875 bmac_setladrf(sc)
    876 	struct bmac_softc *sc;
    877 {
    878 	struct ifnet *ifp = &sc->sc_if;
    879 	struct ether_multi *enm;
    880 	struct ether_multistep step;
    881 	u_int32_t crc;
    882 	u_int16_t hash[4];
    883 	int x;
    884 
    885 	/*
    886 	 * Set up multicast address filter by passing all multicast addresses
    887 	 * through a crc generator, and then using the high order 6 bits as an
    888 	 * index into the 64 bit logical address filter.  The high order bit
    889 	 * selects the word, while the rest of the bits select the bit within
    890 	 * the word.
    891 	 */
    892 
    893 	if (ifp->if_flags & IFF_PROMISC) {
    894 		bmac_set_bits(sc, RXCFG, RxPromiscEnable);
    895 		return;
    896 	}
    897 
    898 	if (ifp->if_flags & IFF_ALLMULTI) {
    899 		hash[3] = hash[2] = hash[1] = hash[0] = 0xffff;
    900 		goto chipit;
    901 	}
    902 
    903 	hash[3] = hash[2] = hash[1] = hash[0] = 0;
    904 
    905 	ETHER_FIRST_MULTI(step, &sc->sc_ethercom, enm);
    906 	while (enm != NULL) {
    907 		if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
    908 			/*
    909 			 * We must listen to a range of multicast addresses.
    910 			 * For now, just accept all multicasts, rather than
    911 			 * trying to set only those filter bits needed to match
    912 			 * the range.  (At this time, the only use of address
    913 			 * ranges is for IP multicast routing, for which the
    914 			 * range is big enough to require all bits set.)
    915 			 */
    916 			hash[3] = hash[2] = hash[1] = hash[0] = 0xffff;
    917 			ifp->if_flags |= IFF_ALLMULTI;
    918 			goto chipit;
    919 		}
    920 
    921 		crc = ether_crc32_le(enm->enm_addrlo, ETHER_ADDR_LEN);
    922 
    923 		/* Just want the 6 most significant bits. */
    924 		crc >>= 26;
    925 
    926 		/* Set the corresponding bit in the filter. */
    927 		hash[crc >> 4] |= 1 << (crc & 0xf);
    928 
    929 		ETHER_NEXT_MULTI(step, enm);
    930 	}
    931 
    932 	ifp->if_flags &= ~IFF_ALLMULTI;
    933 
    934 chipit:
    935 	bmac_write_reg(sc, HASH0, hash[0]);
    936 	bmac_write_reg(sc, HASH1, hash[1]);
    937 	bmac_write_reg(sc, HASH2, hash[2]);
    938 	bmac_write_reg(sc, HASH3, hash[3]);
    939 	x = bmac_read_reg(sc, RXCFG);
    940 	x &= ~RxPromiscEnable;
    941 	x |= RxHashFilterEnable;
    942 	bmac_write_reg(sc, RXCFG, x);
    943 }
    944 
    945 int
    946 bmac_mii_readreg(dev, phy, reg)
    947 	struct device *dev;
    948 	int phy, reg;
    949 {
    950 	return mii_bitbang_readreg(dev, &bmac_mbo, phy, reg);
    951 }
    952 
    953 void
    954 bmac_mii_writereg(dev, phy, reg, val)
    955 	struct device *dev;
    956 	int phy, reg, val;
    957 {
    958 	mii_bitbang_writereg(dev, &bmac_mbo, phy, reg, val);
    959 }
    960 
    961 u_int32_t
    962 bmac_mbo_read(dev)
    963 	struct device *dev;
    964 {
    965 	struct bmac_softc *sc = (void *)dev;
    966 
    967 	return bmac_read_reg(sc, MIFCSR);
    968 }
    969 
    970 void
    971 bmac_mbo_write(dev, val)
    972 	struct device *dev;
    973 	u_int32_t val;
    974 {
    975 	struct bmac_softc *sc = (void *)dev;
    976 
    977 	bmac_write_reg(sc, MIFCSR, val);
    978 }
    979 
    980 void
    981 bmac_mii_statchg(dev)
    982 	struct device *dev;
    983 {
    984 	struct bmac_softc *sc = (void *)dev;
    985 	int x;
    986 
    987 	/* Update duplex mode in TX configuration */
    988 	x = bmac_read_reg(sc, TXCFG);
    989 	if ((IFM_OPTIONS(sc->sc_mii.mii_media_active) & IFM_FDX) != 0)
    990 		x |= TxFullDuplex;
    991 	else
    992 		x &= ~TxFullDuplex;
    993 	bmac_write_reg(sc, TXCFG, x);
    994 
    995 #ifdef BMAC_DEBUG
    996 	printf("bmac_mii_statchg 0x%x\n",
    997 		IFM_OPTIONS(sc->sc_mii.mii_media_active));
    998 #endif
    999 }
   1000 
   1001 void
   1002 bmac_mii_tick(v)
   1003 	void *v;
   1004 {
   1005 	struct bmac_softc *sc = v;
   1006 	int s;
   1007 
   1008 	s = splnet();
   1009 	mii_tick(&sc->sc_mii);
   1010 	splx(s);
   1011 
   1012 	callout_reset(&sc->sc_tick_ch, hz, bmac_mii_tick, sc);
   1013 }
   1014