Home | History | Annotate | Line # | Download | only in dev
      1 /*	$NetBSD: if_bm.c,v 1.66 2025/10/04 04:44:20 thorpej 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.66 2025/10/04 04:44:20 thorpej Exp $");
     31 
     32 #include "opt_inet.h"
     33 
     34 #include <sys/param.h>
     35 #include <sys/device.h>
     36 #include <sys/ioctl.h>
     37 #include <sys/kernel.h>
     38 #include <sys/mbuf.h>
     39 #include <sys/socket.h>
     40 #include <sys/systm.h>
     41 #include <sys/callout.h>
     42 
     43 #include <uvm/uvm_extern.h>
     44 
     45 #include <net/if.h>
     46 #include <net/if_dl.h>
     47 #include <net/if_ether.h>
     48 #include <net/if_media.h>
     49 
     50 #include <net/bpf.h>
     51 
     52 #ifdef INET
     53 #include <netinet/in.h>
     54 #include <netinet/if_inarp.h>
     55 #endif
     56 
     57 
     58 #include <dev/ofw/openfirm.h>
     59 
     60 #include <dev/mii/mii.h>
     61 #include <dev/mii/miivar.h>
     62 #include <dev/mii/mii_bitbang.h>
     63 
     64 #include <powerpc/spr.h>
     65 #include <powerpc/oea/spr.h>
     66 
     67 #include <machine/autoconf.h>
     68 #include <machine/pio.h>
     69 
     70 #include <macppc/dev/dbdma.h>
     71 #include <macppc/dev/if_bmreg.h>
     72 #include <macppc/dev/obiovar.h>
     73 
     74 #define BMAC_TXBUFS 2
     75 #define BMAC_RXBUFS 16
     76 #define BMAC_BUFLEN 2048
     77 
     78 struct bmac_softc {
     79 	device_t sc_dev;
     80 	struct ethercom sc_ethercom;
     81 #define sc_if sc_ethercom.ec_if
     82 	struct callout sc_tick_ch;
     83 	bus_space_tag_t sc_iot;
     84 	bus_space_handle_t sc_ioh;
     85 	dbdma_regmap_t *sc_txdma;
     86 	dbdma_regmap_t *sc_rxdma;
     87 	dbdma_command_t *sc_txcmd;
     88 	dbdma_command_t *sc_rxcmd;
     89 	void *sc_txbuf;
     90 	void *sc_rxbuf;
     91 	int sc_rxlast;
     92 	int sc_flags;
     93 	bool sc_txbusy;
     94 	struct mii_data sc_mii;
     95 	u_char sc_enaddr[6];
     96 };
     97 
     98 #define BMAC_BMACPLUS	0x01
     99 #define BMAC_DEBUGFLAG	0x02
    100 
    101 int bmac_match(device_t, cfdata_t, void *);
    102 void bmac_attach(device_t, device_t, void *);
    103 void bmac_reset_chip(struct bmac_softc *);
    104 void bmac_init(struct bmac_softc *);
    105 void bmac_init_dma(struct bmac_softc *);
    106 int bmac_intr(void *);
    107 int bmac_rint(void *);
    108 void bmac_reset(struct bmac_softc *);
    109 void bmac_stop(struct bmac_softc *);
    110 void bmac_start(struct ifnet *);
    111 void bmac_transmit_packet(struct bmac_softc *, void *, int);
    112 int bmac_put(struct bmac_softc *, void *, struct mbuf *);
    113 struct mbuf *bmac_get(struct bmac_softc *, void *, int);
    114 void bmac_watchdog(struct ifnet *);
    115 int bmac_ioctl(struct ifnet *, u_long, void *);
    116 void bmac_setladrf(struct bmac_softc *);
    117 
    118 int bmac_mii_readreg(device_t, int, int, uint16_t *);
    119 int bmac_mii_writereg(device_t, int, int, uint16_t);
    120 void bmac_mii_statchg(struct ifnet *);
    121 void bmac_mii_tick(void *);
    122 uint32_t bmac_mbo_read(device_t);
    123 void bmac_mbo_write(device_t, uint32_t);
    124 
    125 CFATTACH_DECL_NEW(bm, sizeof(struct bmac_softc),
    126     bmac_match, bmac_attach, NULL, NULL);
    127 
    128 const struct mii_bitbang_ops bmac_mbo = {
    129 	bmac_mbo_read, bmac_mbo_write,
    130 	{ MIFDO, MIFDI, MIFDC, MIFDIR, 0 }
    131 };
    132 
    133 static inline uint16_t
    134 bmac_read_reg(struct bmac_softc *sc, bus_size_t off)
    135 {
    136 	return bus_space_read_2(sc->sc_iot, sc->sc_ioh, off);
    137 }
    138 
    139 static inline void
    140 bmac_write_reg(struct bmac_softc *sc, bus_size_t off, uint16_t val)
    141 {
    142 	bus_space_write_2(sc->sc_iot, sc->sc_ioh, off, val);
    143 }
    144 
    145 static inline void
    146 bmac_set_bits(struct bmac_softc *sc, bus_size_t off, uint16_t val)
    147 {
    148 	val |= bmac_read_reg(sc, off);
    149 	bmac_write_reg(sc, off, val);
    150 }
    151 
    152 static inline void
    153 bmac_reset_bits(struct bmac_softc *sc, bus_size_t off, uint16_t val)
    154 {
    155 	bmac_write_reg(sc, off, bmac_read_reg(sc, off) & ~val);
    156 }
    157 
    158 int
    159 bmac_match(device_t parent, cfdata_t cf, void *aux)
    160 {
    161 	struct confargs *ca = aux;
    162 
    163 	if (ca->ca_nreg < 24 || ca->ca_nintr < 12)
    164 		return 0;
    165 
    166 	if (strcmp(ca->ca_name, "bmac") == 0)		/* bmac */
    167 		return 1;
    168 	if (strcmp(ca->ca_name, "ethernet") == 0)	/* bmac+ */
    169 		return 1;
    170 
    171 	return 0;
    172 }
    173 
    174 void
    175 bmac_attach(device_t parent, device_t self, void *aux)
    176 {
    177 	struct confargs *ca = aux;
    178 	struct bmac_softc *sc = device_private(self);
    179 	struct ifnet *ifp = &sc->sc_if;
    180 	struct mii_data *mii = &sc->sc_mii;
    181 	u_char laddr[6];
    182 	char intr_xname[INTRDEVNAMEBUF];
    183 
    184 	callout_init(&sc->sc_tick_ch, 0);
    185 
    186 	sc->sc_dev = self;
    187 	sc->sc_flags = 0;
    188 	if (strcmp(ca->ca_name, "ethernet") == 0) {
    189 		char name[64];
    190 
    191 		memset(name, 0, 64);
    192 		OF_package_to_path(ca->ca_node, name, sizeof(name));
    193 		OF_open(name);
    194 		sc->sc_flags |= BMAC_BMACPLUS;
    195 	}
    196 
    197 	ca->ca_reg[0] += ca->ca_baseaddr;
    198 	ca->ca_reg[2] += ca->ca_baseaddr;
    199 	ca->ca_reg[4] += ca->ca_baseaddr;
    200 
    201 	sc->sc_iot = ca->ca_tag;
    202 	if (bus_space_map(sc->sc_iot, ca->ca_reg[0], ca->ca_reg[1], 0,
    203 	    &sc->sc_ioh) != 0) {
    204 		aprint_error(": couldn't map %#x", ca->ca_reg[0]);
    205 		return;
    206 	}
    207 
    208 	bmac_write_reg(sc, INTDISABLE, NoEventsMask);
    209 
    210 	if (! ether_getaddr(self, laddr)) {
    211 		aprint_error(": cannot get mac-address\n");
    212 		return;
    213 	}
    214 	memcpy(sc->sc_enaddr, laddr, 6);
    215 
    216 	sc->sc_txdma = mapiodev(ca->ca_reg[2], PAGE_SIZE, false);
    217 	sc->sc_rxdma = mapiodev(ca->ca_reg[4], PAGE_SIZE, false);
    218 	sc->sc_txcmd = dbdma_alloc(BMAC_TXBUFS * sizeof(dbdma_command_t), NULL);
    219 	sc->sc_rxcmd = dbdma_alloc((BMAC_RXBUFS + 1) * sizeof(dbdma_command_t),
    220 	    NULL);
    221 	sc->sc_txbuf = malloc(BMAC_BUFLEN * BMAC_TXBUFS, M_DEVBUF, M_WAITOK);
    222 	sc->sc_rxbuf = malloc(BMAC_BUFLEN * BMAC_RXBUFS, M_DEVBUF, M_WAITOK);
    223 
    224 	aprint_normal(" irq %d,%d: address %s\n",
    225 	    ca->ca_intr[0], ca->ca_intr[2],
    226 	    ether_sprintf(laddr));
    227 
    228 	snprintf(intr_xname, sizeof(intr_xname), "%s tx", device_xname(self));
    229 	intr_establish_xname(ca->ca_intr[0], IST_EDGE, IPL_NET, bmac_intr, sc,
    230 	    intr_xname);
    231 
    232 	snprintf(intr_xname, sizeof(intr_xname), "%s rx", device_xname(self));
    233 	intr_establish_xname(ca->ca_intr[2], IST_EDGE, IPL_NET, bmac_rint, sc,
    234 	    intr_xname);
    235 
    236 	memcpy(ifp->if_xname, device_xname(sc->sc_dev), IFNAMSIZ);
    237 	ifp->if_softc = sc;
    238 	ifp->if_ioctl = bmac_ioctl;
    239 	ifp->if_start = bmac_start;
    240 	ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
    241 	ifp->if_watchdog = bmac_watchdog;
    242 	IFQ_SET_READY(&ifp->if_snd);
    243 
    244 	mii->mii_ifp = ifp;
    245 	mii->mii_readreg = bmac_mii_readreg;
    246 	mii->mii_writereg = bmac_mii_writereg;
    247 	mii->mii_statchg = bmac_mii_statchg;
    248 
    249 	sc->sc_ethercom.ec_mii = mii;
    250 	ifmedia_init(&mii->mii_media, 0, ether_mediachange, ether_mediastatus);
    251 	mii_attach(sc->sc_dev, mii, 0xffffffff, MII_PHY_ANY, MII_OFFSET_ANY, 0);
    252 
    253 	/* Choose a default media. */
    254 	if (LIST_FIRST(&mii->mii_phys) == NULL) {
    255 		ifmedia_add(&mii->mii_media, IFM_ETHER | IFM_10_T, 0, NULL);
    256 		ifmedia_set(&mii->mii_media, IFM_ETHER | IFM_10_T);
    257 	} else
    258 		ifmedia_set(&mii->mii_media, IFM_ETHER | IFM_AUTO);
    259 
    260 	bmac_reset_chip(sc);
    261 
    262 	if_attach(ifp);
    263 	if_deferred_start_init(ifp, NULL);
    264 	ether_ifattach(ifp, sc->sc_enaddr);
    265 }
    266 
    267 /*
    268  * Reset and enable bmac by heathrow FCR.
    269  */
    270 void
    271 bmac_reset_chip(struct bmac_softc *sc)
    272 {
    273 	u_int v;
    274 
    275 	dbdma_reset(sc->sc_txdma);
    276 	dbdma_reset(sc->sc_rxdma);
    277 
    278 	v = obio_read_4(HEATHROW_FCR);
    279 
    280 	v |= EnetEnable;
    281 	obio_write_4(HEATHROW_FCR, v);
    282 	delay(50000);
    283 
    284 	v |= ResetEnetCell;
    285 	obio_write_4(HEATHROW_FCR, v);
    286 	delay(50000);
    287 
    288 	v &= ~ResetEnetCell;
    289 	obio_write_4(HEATHROW_FCR, v);
    290 	delay(50000);
    291 
    292 	obio_write_4(HEATHROW_FCR, v);
    293 }
    294 
    295 void
    296 bmac_init(struct bmac_softc *sc)
    297 {
    298 	struct ifnet *ifp = &sc->sc_if;
    299 	struct ether_header *eh;
    300 	void *data;
    301 	int i, tb;
    302 	uint16_t bmcr;
    303 	u_short *p;
    304 
    305 	bmac_reset_chip(sc);
    306 
    307 	/* XXX */
    308 	bmac_mii_readreg(sc->sc_dev, 0, MII_BMCR, &bmcr);
    309 	bmcr &= ~BMCR_ISO;
    310 	bmac_mii_writereg(sc->sc_dev, 0, MII_BMCR, bmcr);
    311 
    312 	bmac_write_reg(sc, RXRST, RxResetValue);
    313 	bmac_write_reg(sc, TXRST, TxResetBit);
    314 
    315 	/* Wait for reset completion. */
    316 	for (i = 1000; i > 0; i -= 10) {
    317 		if ((bmac_read_reg(sc, TXRST) & TxResetBit) == 0)
    318 			break;
    319 		delay(10);
    320 	}
    321 	if (i <= 0)
    322 		printf("%s: reset timeout\n", ifp->if_xname);
    323 
    324 	if (! (sc->sc_flags & BMAC_BMACPLUS))
    325 		bmac_set_bits(sc, XCVRIF, ClkBit | SerialMode | COLActiveLow);
    326 
    327 	if ((mfpvr() >> 16) == MPC601)
    328 		tb = mfrtcl();
    329 	else
    330 		tb = mftbl();
    331 	bmac_write_reg(sc, RSEED, tb);
    332 	bmac_set_bits(sc, XIFC, TxOutputEnable);
    333 	bmac_read_reg(sc, PAREG);
    334 
    335 	/* Reset various counters. */
    336 	bmac_write_reg(sc, NCCNT, 0);
    337 	bmac_write_reg(sc, NTCNT, 0);
    338 	bmac_write_reg(sc, EXCNT, 0);
    339 	bmac_write_reg(sc, LTCNT, 0);
    340 	bmac_write_reg(sc, FRCNT, 0);
    341 	bmac_write_reg(sc, LECNT, 0);
    342 	bmac_write_reg(sc, AECNT, 0);
    343 	bmac_write_reg(sc, FECNT, 0);
    344 	bmac_write_reg(sc, RXCV, 0);
    345 
    346 	/* Set tx fifo information. */
    347 	bmac_write_reg(sc, TXTH, 4);	/* 4 octets before tx starts */
    348 
    349 	bmac_write_reg(sc, TXFIFOCSR, 0);
    350 	bmac_write_reg(sc, TXFIFOCSR, TxFIFOEnable);
    351 
    352 	/* Set rx fifo information. */
    353 	bmac_write_reg(sc, RXFIFOCSR, 0);
    354 	bmac_write_reg(sc, RXFIFOCSR, RxFIFOEnable);
    355 
    356 	/* Clear status register. */
    357 	bmac_read_reg(sc, STATUS);
    358 
    359 	bmac_write_reg(sc, HASH3, 0);
    360 	bmac_write_reg(sc, HASH2, 0);
    361 	bmac_write_reg(sc, HASH1, 0);
    362 	bmac_write_reg(sc, HASH0, 0);
    363 
    364 	/* Set MAC address. */
    365 	p = (u_short *)sc->sc_enaddr;
    366 	bmac_write_reg(sc, MADD0, *p++);
    367 	bmac_write_reg(sc, MADD1, *p++);
    368 	bmac_write_reg(sc, MADD2, *p);
    369 
    370 	bmac_write_reg(sc, RXCFG,
    371 		RxCRCEnable | RxHashFilterEnable | RxRejectOwnPackets);
    372 
    373 	if (ifp->if_flags & IFF_PROMISC)
    374 		bmac_set_bits(sc, RXCFG, RxPromiscEnable);
    375 
    376 	bmac_init_dma(sc);
    377 
    378 	/* Enable TX/RX */
    379 	bmac_set_bits(sc, RXCFG, RxMACEnable);
    380 	bmac_set_bits(sc, TXCFG, TxMACEnable);
    381 
    382 	bmac_write_reg(sc, INTDISABLE, NormalIntEvents);
    383 
    384 	ifp->if_flags |= IFF_RUNNING;
    385 	sc->sc_txbusy = false;
    386 	ifp->if_timer = 0;
    387 
    388 	data = sc->sc_txbuf;
    389 	eh = (struct ether_header *)data;
    390 
    391 	memset(data, 0, sizeof(eh) + ETHERMIN);
    392 	memcpy(eh->ether_dhost, sc->sc_enaddr, ETHER_ADDR_LEN);
    393 	memcpy(eh->ether_shost, sc->sc_enaddr, ETHER_ADDR_LEN);
    394 	bmac_transmit_packet(sc, data, sizeof(eh) + ETHERMIN);
    395 
    396 	bmac_start(ifp);
    397 
    398 	callout_reset(&sc->sc_tick_ch, hz, bmac_mii_tick, sc);
    399 }
    400 
    401 void
    402 bmac_init_dma(struct bmac_softc *sc)
    403 {
    404 	dbdma_command_t *cmd = sc->sc_rxcmd;
    405 	int i;
    406 
    407 	dbdma_reset(sc->sc_txdma);
    408 	dbdma_reset(sc->sc_rxdma);
    409 
    410 	memset(sc->sc_txcmd, 0, BMAC_TXBUFS * sizeof(dbdma_command_t));
    411 	memset(sc->sc_rxcmd, 0, (BMAC_RXBUFS + 1) * sizeof(dbdma_command_t));
    412 
    413 	for (i = 0; i < BMAC_RXBUFS; i++) {
    414 		DBDMA_BUILD(cmd, DBDMA_CMD_IN_LAST, 0, BMAC_BUFLEN,
    415 			vtophys((vaddr_t)sc->sc_rxbuf + BMAC_BUFLEN * i),
    416 			DBDMA_INT_ALWAYS, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    417 		cmd++;
    418 	}
    419 	DBDMA_BUILD(cmd, DBDMA_CMD_NOP, 0, 0, 0,
    420 		DBDMA_INT_NEVER, DBDMA_WAIT_NEVER, DBDMA_BRANCH_ALWAYS);
    421 	out32rb(&cmd->d_cmddep, vtophys((vaddr_t)sc->sc_rxcmd));
    422 
    423 	sc->sc_rxlast = 0;
    424 
    425 	dbdma_start(sc->sc_rxdma, sc->sc_rxcmd);
    426 }
    427 
    428 int
    429 bmac_intr(void *v)
    430 {
    431 	struct bmac_softc *sc = v;
    432 	int stat;
    433 
    434 	stat = bmac_read_reg(sc, STATUS);
    435 	if (stat == 0)
    436 		return 0;
    437 
    438 #ifdef BMAC_DEBUG
    439 	printf("bmac_intr status = 0x%x\n", stat);
    440 #endif
    441 
    442 	if (stat & IntFrameSent) {
    443 		sc->sc_txbusy = false;
    444 		sc->sc_if.if_timer = 0;
    445 		if_statinc(&sc->sc_if, if_opackets);
    446 		if_schedule_deferred_start(&sc->sc_if);
    447 	}
    448 
    449 	/* XXX should do more! */
    450 
    451 	return 1;
    452 }
    453 
    454 int
    455 bmac_rint(void *v)
    456 {
    457 	struct bmac_softc *sc = v;
    458 	struct ifnet *ifp = &sc->sc_if;
    459 	struct mbuf *m;
    460 	dbdma_command_t *cmd;
    461 	int status, resid, count, datalen;
    462 	int i, n;
    463 	void *data;
    464 
    465 	i = sc->sc_rxlast;
    466 	for (n = 0; n < BMAC_RXBUFS; n++, i++) {
    467 		if (i == BMAC_RXBUFS)
    468 			i = 0;
    469 		cmd = &sc->sc_rxcmd[i];
    470 		status = in16rb(&cmd->d_status);
    471 		resid = in16rb(&cmd->d_resid);
    472 
    473 #ifdef BMAC_DEBUG
    474 		if (status != 0 && status != 0x8440 && status != 0x9440)
    475 			printf("bmac_rint status = 0x%x\n", status);
    476 #endif
    477 
    478 		if ((status & DBDMA_CNTRL_ACTIVE) == 0)	/* 0x9440 | 0x8440 */
    479 			continue;
    480 		count = in16rb(&cmd->d_count);
    481 		datalen = count - resid - 2;		/* 2 == framelen */
    482 		if (datalen < sizeof(struct ether_header)) {
    483 			printf("%s: short packet len = %d\n",
    484 				ifp->if_xname, datalen);
    485 			goto next;
    486 		}
    487 		DBDMA_BUILD_CMD(cmd, DBDMA_CMD_STOP, 0, 0, 0, 0);
    488 		data = (char *)sc->sc_rxbuf + BMAC_BUFLEN * i;
    489 
    490 		/* XXX Sometimes bmac reads one extra byte. */
    491 		if (datalen == ETHER_MAX_LEN + 1)
    492 			datalen--;
    493 
    494 		/* Trim the CRC. */
    495 		datalen -= ETHER_CRC_LEN;
    496 
    497 		m = bmac_get(sc, data, datalen);
    498 		if (m == NULL) {
    499 			if_statinc(ifp, if_ierrors);
    500 			goto next;
    501 		}
    502 
    503 		if_percpuq_enqueue(ifp->if_percpuq, m);
    504 
    505 next:
    506 		DBDMA_BUILD_CMD(cmd, DBDMA_CMD_IN_LAST, 0, DBDMA_INT_ALWAYS,
    507 			DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    508 
    509 		cmd->d_status = 0;
    510 		cmd->d_resid = 0;
    511 		sc->sc_rxlast = i + 1;
    512 	}
    513 	ether_mediachange(ifp);
    514 
    515 	dbdma_continue(sc->sc_rxdma);
    516 
    517 	return 1;
    518 }
    519 
    520 void
    521 bmac_reset(struct bmac_softc *sc)
    522 {
    523 	int s;
    524 
    525 	s = splnet();
    526 	bmac_init(sc);
    527 	splx(s);
    528 }
    529 
    530 void
    531 bmac_stop(struct bmac_softc *sc)
    532 {
    533 	struct ifnet *ifp = &sc->sc_if;
    534 	int s;
    535 
    536 	s = splnet();
    537 
    538 	callout_stop(&sc->sc_tick_ch);
    539 	mii_down(&sc->sc_mii);
    540 
    541 	/* Disable TX/RX. */
    542 	bmac_reset_bits(sc, TXCFG, TxMACEnable);
    543 	bmac_reset_bits(sc, RXCFG, RxMACEnable);
    544 
    545 	/* Disable all interrupts. */
    546 	bmac_write_reg(sc, INTDISABLE, NoEventsMask);
    547 
    548 	dbdma_stop(sc->sc_txdma);
    549 	dbdma_stop(sc->sc_rxdma);
    550 
    551 	ifp->if_flags &= ~(IFF_UP | IFF_RUNNING);
    552 	ifp->if_timer = 0;
    553 
    554 	splx(s);
    555 }
    556 
    557 void
    558 bmac_start(struct ifnet *ifp)
    559 {
    560 	struct bmac_softc *sc = ifp->if_softc;
    561 	struct mbuf *m;
    562 	int tlen;
    563 
    564 	if ((ifp->if_flags & IFF_RUNNING) == 0)
    565 		return;
    566 
    567 	while (!sc->sc_txbusy) {
    568 		IFQ_DEQUEUE(&ifp->if_snd, m);
    569 		if (m == 0)
    570 			break;
    571 		/*
    572 		 * If BPF is listening on this interface, let it see the
    573 		 * packet before we commit it to the wire.
    574 		 */
    575 		bpf_mtap(ifp, m, BPF_D_OUT);
    576 
    577 		sc->sc_txbusy = true;
    578 		tlen = bmac_put(sc, sc->sc_txbuf, m);
    579 
    580 		/* 5 seconds to watch for failing to transmit */
    581 		ifp->if_timer = 5;
    582 		if_statinc(ifp, if_opackets);		/* # of pkts */
    583 
    584 		bmac_transmit_packet(sc, sc->sc_txbuf, tlen);
    585 	}
    586 }
    587 
    588 void
    589 bmac_transmit_packet(struct bmac_softc *sc, void *buff, int len)
    590 {
    591 	dbdma_command_t *cmd = sc->sc_txcmd;
    592 	vaddr_t va = (vaddr_t)buff;
    593 
    594 #ifdef BMAC_DEBUG
    595 	if (vtophys(va) + len - 1 != vtophys(va + len - 1))
    596 		panic("bmac_transmit_packet");
    597 #endif
    598 
    599 	DBDMA_BUILD(cmd, DBDMA_CMD_OUT_LAST, 0, len, vtophys(va),
    600 		DBDMA_INT_NEVER, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    601 	cmd++;
    602 	DBDMA_BUILD(cmd, DBDMA_CMD_STOP, 0, 0, 0,
    603 		DBDMA_INT_ALWAYS, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    604 
    605 	dbdma_start(sc->sc_txdma, sc->sc_txcmd);
    606 }
    607 
    608 int
    609 bmac_put(struct bmac_softc *sc, void *buff, struct mbuf *m)
    610 {
    611 	struct mbuf *n;
    612 	int len, tlen = 0;
    613 
    614 	for (; m; m = n) {
    615 		len = m->m_len;
    616 		if (len == 0) {
    617 			n = m_free(m);
    618 			continue;
    619 		}
    620 		memcpy(buff, mtod(m, void *), len);
    621 		buff = (char *)buff + len;
    622 		tlen += len;
    623 		n = m_free(m);
    624 	}
    625 	if (tlen > PAGE_SIZE)
    626 		panic("%s: putpacket packet overflow",
    627 		    device_xname(sc->sc_dev));
    628 
    629 	return tlen;
    630 }
    631 
    632 struct mbuf *
    633 bmac_get(struct bmac_softc *sc, void *pkt, int totlen)
    634 {
    635 	struct mbuf *m;
    636 	struct mbuf *top, **mp;
    637 	int len;
    638 
    639 	MGETHDR(m, M_DONTWAIT, MT_DATA);
    640 	if (m == 0)
    641 		return 0;
    642 	m_set_rcvif(m, &sc->sc_if);
    643 	m->m_pkthdr.len = totlen;
    644 	len = MHLEN;
    645 	top = 0;
    646 	mp = &top;
    647 
    648 	while (totlen > 0) {
    649 		if (top) {
    650 			MGET(m, M_DONTWAIT, MT_DATA);
    651 			if (m == 0) {
    652 				m_freem(top);
    653 				return 0;
    654 			}
    655 			len = MLEN;
    656 		}
    657 		if (totlen >= MINCLSIZE) {
    658 			MCLGET(m, M_DONTWAIT);
    659 			if ((m->m_flags & M_EXT) == 0) {
    660 				m_free(m);
    661 				m_freem(top);
    662 				return 0;
    663 			}
    664 			len = MCLBYTES;
    665 		}
    666 		m->m_len = len = uimin(totlen, len);
    667 		memcpy(mtod(m, void *), pkt, len);
    668 		pkt = (char *)pkt + len;
    669 		totlen -= len;
    670 		*mp = m;
    671 		mp = &m->m_next;
    672 	}
    673 
    674 	return top;
    675 }
    676 
    677 void
    678 bmac_watchdog(struct ifnet *ifp)
    679 {
    680 	struct bmac_softc *sc = ifp->if_softc;
    681 
    682 	bmac_reset_bits(sc, RXCFG, RxMACEnable);
    683 	bmac_reset_bits(sc, TXCFG, TxMACEnable);
    684 
    685 	printf("%s: device timeout\n", ifp->if_xname);
    686 	if_statinc(ifp, if_oerrors);
    687 
    688 	bmac_reset(sc);
    689 }
    690 
    691 int
    692 bmac_ioctl(struct ifnet *ifp, unsigned long cmd, void *data)
    693 {
    694 	struct bmac_softc *sc = ifp->if_softc;
    695 	struct ifaddr *ifa = (struct ifaddr *)data;
    696 	int s, error = 0;
    697 
    698 	s = splnet();
    699 
    700 	switch (cmd) {
    701 
    702 	case SIOCINITIFADDR:
    703 		ifp->if_flags |= IFF_UP;
    704 
    705 		bmac_init(sc);
    706 		switch (ifa->ifa_addr->sa_family) {
    707 #ifdef INET
    708 		case AF_INET:
    709 			arp_ifinit(ifp, ifa);
    710 			break;
    711 #endif
    712 		default:
    713 			break;
    714 		}
    715 		break;
    716 
    717 	case SIOCSIFFLAGS:
    718 		if ((error = ifioctl_common(ifp, cmd, data)) != 0)
    719 			break;
    720 		/* XXX see the comment in ed_ioctl() about code re-use */
    721 		if ((ifp->if_flags & IFF_UP) == 0 &&
    722 		    (ifp->if_flags & IFF_RUNNING) != 0) {
    723 			/*
    724 			 * If interface is marked down and it is running, then
    725 			 * stop it.
    726 			 */
    727 			bmac_stop(sc);
    728 			ifp->if_flags &= ~IFF_RUNNING;
    729 		} else if ((ifp->if_flags & IFF_UP) != 0 &&
    730 		    (ifp->if_flags & IFF_RUNNING) == 0) {
    731 			/*
    732 			 * If interface is marked up and it is stopped, then
    733 			 * start it.
    734 			 */
    735 			bmac_init(sc);
    736 		} else {
    737 			/*
    738 			 * Reset the interface to pick up changes in any other
    739 			 * flags that affect hardware registers.
    740 			 */
    741 			/*bmac_stop(sc);*/
    742 			bmac_init(sc);
    743 		}
    744 #ifdef BMAC_DEBUG
    745 		if (ifp->if_flags & IFF_DEBUG)
    746 			sc->sc_flags |= BMAC_DEBUGFLAG;
    747 #endif
    748 		break;
    749 
    750 	default:
    751 		if ((error = ether_ioctl(ifp, cmd, data)) == ENETRESET) {
    752 			/*
    753 			 * Multicast list has changed; set the hardware filter
    754 			 * accordingly.
    755 			 */
    756 			if (ifp->if_flags & IFF_RUNNING) {
    757 				bmac_init(sc);
    758 				bmac_setladrf(sc);
    759 			}
    760 			error = 0;
    761 		}
    762 		break;
    763 	}
    764 
    765 	splx(s);
    766 	return error;
    767 }
    768 
    769 /*
    770  * Set up the logical address filter.
    771  */
    772 void
    773 bmac_setladrf(struct bmac_softc *sc)
    774 {
    775 	struct ethercom *ec = &sc->sc_ethercom;
    776 	struct ifnet *ifp = &sc->sc_if;
    777 	struct ether_multi *enm;
    778 	struct ether_multistep step;
    779 	uint32_t crc;
    780 	uint16_t hash[4];
    781 	int x;
    782 
    783 	/*
    784 	 * Set up multicast address filter by passing all multicast addresses
    785 	 * through a crc generator, and then using the high order 6 bits as an
    786 	 * index into the 64 bit logical address filter.  The high order bit
    787 	 * selects the word, while the rest of the bits select the bit within
    788 	 * the word.
    789 	 */
    790 
    791 	if (ifp->if_flags & IFF_PROMISC) {
    792 		bmac_set_bits(sc, RXCFG, RxPromiscEnable);
    793 		return;
    794 	}
    795 
    796 	if (ifp->if_flags & IFF_ALLMULTI) {
    797 		hash[3] = hash[2] = hash[1] = hash[0] = 0xffff;
    798 		goto chipit;
    799 	}
    800 
    801 	hash[3] = hash[2] = hash[1] = hash[0] = 0;
    802 
    803 	ETHER_LOCK(ec);
    804 	ETHER_FIRST_MULTI(step, ec, enm);
    805 	while (enm != NULL) {
    806 		if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) {
    807 			/*
    808 			 * We must listen to a range of multicast addresses.
    809 			 * For now, just accept all multicasts, rather than
    810 			 * trying to set only those filter bits needed to match
    811 			 * the range.  (At this time, the only use of address
    812 			 * ranges is for IP multicast routing, for which the
    813 			 * range is big enough to require all bits set.)
    814 			 */
    815 			hash[3] = hash[2] = hash[1] = hash[0] = 0xffff;
    816 			ifp->if_flags |= IFF_ALLMULTI;
    817 			ETHER_UNLOCK(ec);
    818 			goto chipit;
    819 		}
    820 
    821 		crc = ether_crc32_le(enm->enm_addrlo, ETHER_ADDR_LEN);
    822 
    823 		/* Just want the 6 most significant bits. */
    824 		crc >>= 26;
    825 
    826 		/* Set the corresponding bit in the filter. */
    827 		hash[crc >> 4] |= 1 << (crc & 0xf);
    828 
    829 		ETHER_NEXT_MULTI(step, enm);
    830 	}
    831 	ETHER_UNLOCK(ec);
    832 
    833 	ifp->if_flags &= ~IFF_ALLMULTI;
    834 
    835 chipit:
    836 	bmac_write_reg(sc, HASH0, hash[0]);
    837 	bmac_write_reg(sc, HASH1, hash[1]);
    838 	bmac_write_reg(sc, HASH2, hash[2]);
    839 	bmac_write_reg(sc, HASH3, hash[3]);
    840 	x = bmac_read_reg(sc, RXCFG);
    841 	x &= ~RxPromiscEnable;
    842 	x |= RxHashFilterEnable;
    843 	bmac_write_reg(sc, RXCFG, x);
    844 }
    845 
    846 int
    847 bmac_mii_readreg(device_t self, int phy, int reg, uint16_t *val)
    848 {
    849 	return mii_bitbang_readreg(self, &bmac_mbo, phy, reg, val);
    850 }
    851 
    852 int
    853 bmac_mii_writereg(device_t self, int phy, int reg, uint16_t val)
    854 {
    855 	return mii_bitbang_writereg(self, &bmac_mbo, phy, reg, val);
    856 }
    857 
    858 uint32_t
    859 bmac_mbo_read(device_t self)
    860 {
    861 	struct bmac_softc *sc = device_private(self);
    862 
    863 	return bmac_read_reg(sc, MIFCSR);
    864 }
    865 
    866 void
    867 bmac_mbo_write(device_t self, uint32_t val)
    868 {
    869 	struct bmac_softc *sc = device_private(self);
    870 
    871 	bmac_write_reg(sc, MIFCSR, val);
    872 }
    873 
    874 void
    875 bmac_mii_statchg(struct ifnet *ifp)
    876 {
    877 	struct bmac_softc *sc = ifp->if_softc;
    878 	int x;
    879 
    880 	/* Update duplex mode in TX configuration */
    881 	x = bmac_read_reg(sc, TXCFG);
    882 	if ((IFM_OPTIONS(sc->sc_mii.mii_media_active) & IFM_FDX) != 0)
    883 		x |= TxFullDuplex;
    884 	else
    885 		x &= ~TxFullDuplex;
    886 	bmac_write_reg(sc, TXCFG, x);
    887 
    888 #ifdef BMAC_DEBUG
    889 	printf("bmac_mii_statchg 0x%x\n",
    890 		IFM_OPTIONS(sc->sc_mii.mii_media_active));
    891 #endif
    892 }
    893 
    894 void
    895 bmac_mii_tick(void *v)
    896 {
    897 	struct bmac_softc *sc = v;
    898 	int s;
    899 
    900 	s = splnet();
    901 	mii_tick(&sc->sc_mii);
    902 	splx(s);
    903 
    904 	callout_reset(&sc->sc_tick_ch, hz, bmac_mii_tick, sc);
    905 }
    906