Home | History | Annotate | Line # | Download | only in marvell
if_mvgbe.c revision 1.2.2.3
      1 /*	$NetBSD: if_mvgbe.c,v 1.2.2.3 2010/10/09 03:32:08 yamt Exp $	*/
      2 /*
      3  * Copyright (c) 2007, 2008 KIYOHARA Takashi
      4  * 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  *
     15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
     17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
     18  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
     19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
     21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
     23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
     24  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     25  * POSSIBILITY OF SUCH DAMAGE.
     26  */
     27 #include <sys/cdefs.h>
     28 __KERNEL_RCSID(0, "$NetBSD: if_mvgbe.c,v 1.2.2.3 2010/10/09 03:32:08 yamt Exp $");
     29 
     30 #include "rnd.h"
     31 
     32 #include <sys/param.h>
     33 #include <sys/bus.h>
     34 #include <sys/device.h>
     35 #include <sys/endian.h>
     36 #include <sys/errno.h>
     37 #include <sys/kmem.h>
     38 #include <sys/mutex.h>
     39 #include <sys/sockio.h>
     40 
     41 #include <dev/marvell/marvellreg.h>
     42 #include <dev/marvell/marvellvar.h>
     43 #include <dev/marvell/mvgbereg.h>
     44 
     45 #include <net/if.h>
     46 #include <net/if_ether.h>
     47 #include <net/if_media.h>
     48 
     49 #include <netinet/in.h>
     50 #include <netinet/in_systm.h>
     51 #include <netinet/ip.h>
     52 
     53 #include <net/bpf.h>
     54 #if NRND > 0
     55 #include <sys/rnd.h>
     56 #endif
     57 
     58 #include <dev/mii/mii.h>
     59 #include <dev/mii/miivar.h>
     60 
     61 #include "locators.h"
     62 
     63 /* #define MVGBE_DEBUG 3 */
     64 #ifdef MVGBE_DEBUG
     65 #define DPRINTF(x)	if (mvgbe_debug) printf x
     66 #define DPRINTFN(n,x)	if (mvgbe_debug >= (n)) printf x
     67 int mvgbe_debug = MVGBE_DEBUG;
     68 #else
     69 #define DPRINTF(x)
     70 #define DPRINTFN(n,x)
     71 #endif
     72 
     73 
     74 #define MVGBE_READ(sc, reg) \
     75 	bus_space_read_4((sc)->sc_iot, (sc)->sc_ioh, (reg))
     76 #define MVGBE_WRITE(sc, reg, val) \
     77 	bus_space_write_4((sc)->sc_iot, (sc)->sc_ioh, (reg), (val))
     78 #define MVGBE_READ_FILTER(sc, reg) \
     79 	bus_space_read_4((sc)->sc_iot, (sc)->sc_dafh, (reg))
     80 #define MVGBE_WRITE_FILTER(sc, reg, val, c) \
     81 	bus_space_set_region_4((sc)->sc_iot, (sc)->sc_dafh, (reg), (val), (c))
     82 
     83 #define MVGBE_TX_RING_CNT	256
     84 #define MVGBE_RX_RING_CNT	256
     85 
     86 #define MVGBE_JSLOTS		384	/* XXXX */
     87 #define MVGBE_JLEN		(MVGBE_MRU + MVGBE_BUF_ALIGN)
     88 #define MVGBE_NTXSEG		30
     89 #define MVGBE_JPAGESZ		PAGE_SIZE
     90 #define MVGBE_RESID \
     91     (MVGBE_JPAGESZ - (MVGBE_JLEN * MVGBE_JSLOTS) % MVGBE_JPAGESZ)
     92 #define MVGBE_JMEM \
     93     ((MVGBE_JLEN * MVGBE_JSLOTS) + MVGBE_RESID)
     94 
     95 #define MVGBE_TX_RING_ADDR(sc, i)		\
     96     ((sc)->sc_ring_map->dm_segs[0].ds_addr +	\
     97 			offsetof(struct mvgbe_ring_data, mvgbe_tx_ring[(i)]))
     98 
     99 #define MVGBE_RX_RING_ADDR(sc, i)		\
    100     ((sc)->sc_ring_map->dm_segs[0].ds_addr +	\
    101 			offsetof(struct mvgbe_ring_data, mvgbe_rx_ring[(i)]))
    102 
    103 #define MVGBE_CDOFF(x)		offsetof(struct mvgbe_ring_data, x)
    104 #define MVGBE_CDTXOFF(x)	MVGBE_CDOFF(mvgbe_tx_ring[(x)])
    105 #define MVGBE_CDRXOFF(x)	MVGBE_CDOFF(mvgbe_rx_ring[(x)])
    106 
    107 #define MVGBE_CDTXSYNC(sc, x, n, ops)					\
    108 do {									\
    109 	int __x, __n;							\
    110 	const int __descsize = sizeof(struct mvgbe_tx_desc);		\
    111 									\
    112 	__x = (x);							\
    113 	__n = (n);							\
    114 									\
    115 	/* If it will wrap around, sync to the end of the ring. */	\
    116 	if ((__x + __n) > MVGBE_TX_RING_CNT) {				\
    117 		bus_dmamap_sync((sc)->sc_dmat,				\
    118 		    (sc)->sc_ring_map, MVGBE_CDTXOFF(__x),		\
    119 		    __descsize * (MVGBE_TX_RING_CNT - __x), (ops));	\
    120 		__n -= (MVGBE_TX_RING_CNT - __x);			\
    121 		__x = 0;						\
    122 	}								\
    123 									\
    124 	/* Now sync whatever is left. */				\
    125 	bus_dmamap_sync((sc)->sc_dmat, (sc)->sc_ring_map,		\
    126 	    MVGBE_CDTXOFF((__x)), __descsize * __n, (ops));		\
    127 } while (0 /*CONSTCOND*/)
    128 
    129 #define MVGBE_CDRXSYNC(sc, x, ops)					\
    130 do {									\
    131 	bus_dmamap_sync((sc)->sc_dmat, (sc)->sc_ring_map,		\
    132 	    MVGBE_CDRXOFF((x)), sizeof(struct mvgbe_rx_desc), (ops));	\
    133 	} while (/*CONSTCOND*/0)
    134 
    135 
    136 struct mvgbe_jpool_entry {
    137 	int slot;
    138 	LIST_ENTRY(mvgbe_jpool_entry) jpool_entries;
    139 };
    140 
    141 struct mvgbe_chain {
    142 	void *mvgbe_desc;
    143 	struct mbuf *mvgbe_mbuf;
    144 	struct mvgbe_chain *mvgbe_next;
    145 };
    146 
    147 struct mvgbe_txmap_entry {
    148 	bus_dmamap_t dmamap;
    149 	SIMPLEQ_ENTRY(mvgbe_txmap_entry) link;
    150 };
    151 
    152 struct mvgbe_chain_data {
    153 	struct mvgbe_chain mvgbe_tx_chain[MVGBE_TX_RING_CNT];
    154 	struct mvgbe_txmap_entry *mvgbe_tx_map[MVGBE_TX_RING_CNT];
    155 	int mvgbe_tx_prod;
    156 	int mvgbe_tx_cons;
    157 	int mvgbe_tx_cnt;
    158 
    159 	struct mvgbe_chain mvgbe_rx_chain[MVGBE_RX_RING_CNT];
    160 	bus_dmamap_t mvgbe_rx_map[MVGBE_RX_RING_CNT];
    161 	bus_dmamap_t mvgbe_rx_jumbo_map;
    162 	int mvgbe_rx_prod;
    163 	int mvgbe_rx_cons;
    164 	int mvgbe_rx_cnt;
    165 
    166 	/* Stick the jumbo mem management stuff here too. */
    167 	void *mvgbe_jslots[MVGBE_JSLOTS];
    168 	void *mvgbe_jumbo_buf;
    169 };
    170 
    171 struct mvgbe_ring_data {
    172 	struct mvgbe_tx_desc mvgbe_tx_ring[MVGBE_TX_RING_CNT];
    173 	struct mvgbe_rx_desc mvgbe_rx_ring[MVGBE_RX_RING_CNT];
    174 };
    175 
    176 struct mvgbec_softc {
    177 	device_t sc_dev;
    178 
    179 	bus_space_tag_t sc_iot;
    180 	bus_space_handle_t sc_ioh;
    181 
    182 	kmutex_t sc_mtx;
    183 
    184 	int sc_fix_tqtb;
    185 };
    186 
    187 struct mvgbe_softc {
    188 	device_t sc_dev;
    189 	int sc_port;
    190 
    191 	bus_space_tag_t sc_iot;
    192 	bus_space_handle_t sc_ioh;
    193 	bus_space_handle_t sc_dafh;		/* dest address filter handle */
    194 	bus_dma_tag_t sc_dmat;
    195 
    196 	struct ethercom sc_ethercom;
    197 	struct mii_data sc_mii;
    198 	u_int8_t sc_enaddr[ETHER_ADDR_LEN];	/* station addr */
    199 
    200 	struct mvgbe_chain_data sc_cdata;
    201 	struct mvgbe_ring_data *sc_rdata;
    202 	bus_dmamap_t sc_ring_map;
    203 	int sc_if_flags;
    204 
    205 	LIST_HEAD(__mvgbe_jfreehead, mvgbe_jpool_entry) sc_jfree_listhead;
    206 	LIST_HEAD(__mvgbe_jinusehead, mvgbe_jpool_entry) sc_jinuse_listhead;
    207 	SIMPLEQ_HEAD(__mvgbe_txmaphead, mvgbe_txmap_entry) sc_txmap_head;
    208 
    209 #if NRND > 0
    210 	rndsource_element_t sc_rnd_source;
    211 #endif
    212 };
    213 
    214 
    215 /* Gigabit Ethernet Unit Global part functions */
    216 
    217 static int mvgbec_match(device_t, struct cfdata *, void *);
    218 static void mvgbec_attach(device_t, device_t, void *);
    219 
    220 static int mvgbec_print(void *, const char *);
    221 static int mvgbec_search(device_t, cfdata_t, const int *, void *);
    222 
    223 /* MII funcstions */
    224 static int mvgbec_miibus_readreg(device_t, int, int);
    225 static void mvgbec_miibus_writereg(device_t, int, int, int);
    226 static void mvgbec_miibus_statchg(device_t);
    227 
    228 static void mvgbec_wininit(struct mvgbec_softc *);
    229 
    230 /* Gigabit Ethernet Port part functions */
    231 
    232 static int mvgbe_match(device_t, struct cfdata *, void *);
    233 static void mvgbe_attach(device_t, device_t, void *);
    234 
    235 static int mvgbe_intr(void *);
    236 
    237 static void mvgbe_start(struct ifnet *);
    238 static int mvgbe_ioctl(struct ifnet *, u_long, void *);
    239 static int mvgbe_init(struct ifnet *);
    240 static void mvgbe_stop(struct ifnet *, int);
    241 static void mvgbe_watchdog(struct ifnet *);
    242 
    243 /* MII funcstions */
    244 static int mvgbe_ifmedia_upd(struct ifnet *);
    245 static void mvgbe_ifmedia_sts(struct ifnet *, struct ifmediareq *);
    246 
    247 static int mvgbe_init_rx_ring(struct mvgbe_softc *);
    248 static int mvgbe_init_tx_ring(struct mvgbe_softc *);
    249 static int mvgbe_newbuf(struct mvgbe_softc *, int, struct mbuf *, bus_dmamap_t);
    250 static int mvgbe_alloc_jumbo_mem(struct mvgbe_softc *);
    251 static void *mvgbe_jalloc(struct mvgbe_softc *);
    252 static void mvgbe_jfree(struct mbuf *, void *, size_t, void *);
    253 static int mvgbe_encap(struct mvgbe_softc *, struct mbuf *, uint32_t *);
    254 static void mvgbe_rxeof(struct mvgbe_softc *);
    255 static void mvgbe_txeof(struct mvgbe_softc *);
    256 static void mvgbe_setmulti(struct mvgbe_softc *);
    257 #ifdef MVGBE_DEBUG
    258 static void mvgbe_dump_txdesc(struct mvgbe_tx_desc *, int);
    259 #endif
    260 
    261 CFATTACH_DECL_NEW(mvgbec_gt, sizeof(struct mvgbec_softc),
    262     mvgbec_match, mvgbec_attach, NULL, NULL);
    263 CFATTACH_DECL_NEW(mvgbec_mbus, sizeof(struct mvgbec_softc),
    264     mvgbec_match, mvgbec_attach, NULL, NULL);
    265 
    266 CFATTACH_DECL_NEW(mvgbe, sizeof(struct mvgbe_softc),
    267     mvgbe_match, mvgbe_attach, NULL, NULL);
    268 
    269 
    270 struct mvgbe_port {
    271 	int model;
    272 	int unit;
    273 	int ports;
    274 	int irqs[3];
    275 	int flags;
    276 #define FLAGS_FIX_TQTB	(1 << 0)
    277 } mvgbe_ports[] = {
    278 	{ MARVELL_DISCOVERY_II,		0, 3, { 32, 33, 34 }, 0 },
    279 	{ MARVELL_DISCOVERY_III,	0, 3, { 32, 33, 34 }, 0 },
    280 #if 0
    281 	{ MARVELL_DISCOVERY_LT,		0, ?, { }, 0 },
    282 	{ MARVELL_DISCOVERY_V,		0, ?, { }, 0 },
    283 	{ MARVELL_DISCOVERY_VI,		0, ?, { }, 0 },
    284 #endif
    285 	{ MARVELL_ORION_1_88F5082,	0, 1, { 21 }, 0 },
    286 	{ MARVELL_ORION_1_88F5180N,	0, 1, { 21 }, 0 },
    287 	{ MARVELL_ORION_1_88F5181,	0, 1, { 21 }, 0 },
    288 	{ MARVELL_ORION_1_88F5182,	0, 1, { 21 }, 0 },
    289 	{ MARVELL_ORION_2_88F5281,	0, 1, { 21 }, 0 },
    290 	{ MARVELL_ORION_1_88F6082,	0, 1, { 21 }, 0 },
    291 	{ MARVELL_ORION_1_88W8660,	0, 1, { 21 }, 0 },
    292 
    293 	{ MARVELL_KIRKWOOD_88F6180,	0, 1, { 11 }, FLAGS_FIX_TQTB },
    294 	{ MARVELL_KIRKWOOD_88F6192,	0, 1, { 11 }, FLAGS_FIX_TQTB },
    295 	{ MARVELL_KIRKWOOD_88F6192,	1, 1, { 14 }, FLAGS_FIX_TQTB },
    296 	{ MARVELL_KIRKWOOD_88F6281,	0, 1, { 11 }, FLAGS_FIX_TQTB },
    297 	{ MARVELL_KIRKWOOD_88F6281,	1, 1, { 14 }, FLAGS_FIX_TQTB },
    298 
    299 	{ MARVELL_MV78XX0_MV78100,	0, 1, { 40 }, FLAGS_FIX_TQTB },
    300 	{ MARVELL_MV78XX0_MV78100,	1, 1, { 44 }, FLAGS_FIX_TQTB },
    301 	{ MARVELL_MV78XX0_MV78200,	0, 1, { 40 }, FLAGS_FIX_TQTB },
    302 	{ MARVELL_MV78XX0_MV78200,	1, 1, { 44 }, FLAGS_FIX_TQTB },
    303 	{ MARVELL_MV78XX0_MV78200,	2, 1, { 48 }, FLAGS_FIX_TQTB },
    304 	{ MARVELL_MV78XX0_MV78200,	3, 1, { 52 }, FLAGS_FIX_TQTB },
    305 };
    306 
    307 
    308 /* ARGSUSED */
    309 static int
    310 mvgbec_match(device_t parent, struct cfdata *match, void *aux)
    311 {
    312 	struct marvell_attach_args *mva = aux;
    313 	int i;
    314 
    315 	if (strcmp(mva->mva_name, match->cf_name) != 0)
    316 		return 0;
    317 	if (mva->mva_offset == MVA_OFFSET_DEFAULT)
    318 		return 0;
    319 
    320 	for (i = 0; i < __arraycount(mvgbe_ports); i++)
    321 		if (mva->mva_model == mvgbe_ports[i].model) {
    322 			mva->mva_size = MVGBE_SIZE;
    323 			return 1;
    324 		}
    325 	return 0;
    326 }
    327 
    328 /* ARGSUSED */
    329 static void
    330 mvgbec_attach(device_t parent, device_t self, void *aux)
    331 {
    332 	struct mvgbec_softc *sc = device_private(self);
    333 	struct marvell_attach_args *mva = aux, gbea;
    334 	struct mvgbe_softc *port;
    335 	struct mii_softc *mii;
    336 	device_t child;
    337 	uint32_t phyaddr;
    338 	int i, j;
    339 
    340 	aprint_naive("\n");
    341 	aprint_normal(": Marvell Gigabit Ethernet Controller\n");
    342 
    343 	sc->sc_dev = self;
    344 	sc->sc_iot = mva->mva_iot;
    345 	if (bus_space_subregion(mva->mva_iot, mva->mva_ioh, mva->mva_offset,
    346 	    mva->mva_size, &sc->sc_ioh)) {
    347 		aprint_error_dev(self, "Cannot map registers\n");
    348 		return;
    349 	}
    350 	phyaddr = 0;
    351 	MVGBE_WRITE(sc, MVGBE_PHYADDR, phyaddr);
    352 
    353 	mutex_init(&sc->sc_mtx, MUTEX_DEFAULT, IPL_NET);
    354 
    355 	/* Disable and clear Gigabit Ethernet Unit interrupts */
    356 	MVGBE_WRITE(sc, MVGBE_EUIM, 0);
    357 	MVGBE_WRITE(sc, MVGBE_EUIC, 0);
    358 
    359 	mvgbec_wininit(sc);
    360 
    361 	memset(&gbea, 0, sizeof(gbea));
    362 	for (i = 0; i < __arraycount(mvgbe_ports); i++) {
    363 		if (mvgbe_ports[i].model != mva->mva_model ||
    364 		    mvgbe_ports[i].unit != mva->mva_unit)
    365 			continue;
    366 
    367 		sc->sc_fix_tqtb = mvgbe_ports[i].flags & FLAGS_FIX_TQTB;
    368 
    369 		for (j = 0; j < mvgbe_ports[i].ports; j++) {
    370 			gbea.mva_name = "mvgbe";
    371 			gbea.mva_model = mva->mva_model;
    372 			gbea.mva_iot = sc->sc_iot;
    373 			gbea.mva_ioh = sc->sc_ioh;
    374 			gbea.mva_unit = j;
    375 			gbea.mva_dmat = mva->mva_dmat;
    376 			gbea.mva_irq = mvgbe_ports[i].irqs[j];
    377 			child = config_found_sm_loc(sc->sc_dev, "mvgbec", NULL,
    378 			    &gbea, mvgbec_print, mvgbec_search);
    379 			if (child) {
    380 				port = device_private(child);
    381 				mii  = LIST_FIRST(&port->sc_mii.mii_phys);
    382 				phyaddr |= MVGBE_PHYADDR_PHYAD(j, mii->mii_phy);
    383 			}
    384 		}
    385 		break;
    386 	}
    387 	MVGBE_WRITE(sc, MVGBE_PHYADDR, phyaddr);
    388 }
    389 
    390 static int
    391 mvgbec_print(void *aux, const char *pnp)
    392 {
    393 	struct marvell_attach_args *gbea = aux;
    394 
    395 	if (pnp)
    396 		aprint_normal("%s at %s port %d",
    397 		    gbea->mva_name, pnp, gbea->mva_unit);
    398 	else {
    399 		if (gbea->mva_unit != MVGBECCF_PORT_DEFAULT)
    400 			aprint_normal(" port %d", gbea->mva_unit);
    401 		if (gbea->mva_irq != MVGBECCF_IRQ_DEFAULT)
    402 			aprint_normal(" irq %d", gbea->mva_irq);
    403 	}
    404 	return UNCONF;
    405 }
    406 
    407 /* ARGSUSED */
    408 static int
    409 mvgbec_search(device_t parent, cfdata_t cf, const int *ldesc, void *aux)
    410 {
    411 	struct marvell_attach_args *gbea = aux;
    412 
    413 	if (cf->cf_loc[MVGBECCF_PORT] == gbea->mva_unit &&
    414 	    cf->cf_loc[MVGBECCF_IRQ] != MVGBECCF_IRQ_DEFAULT)
    415 		gbea->mva_irq = cf->cf_loc[MVGBECCF_IRQ];
    416 
    417 	return config_match(parent, cf, aux);
    418 }
    419 
    420 static int
    421 mvgbec_miibus_readreg(device_t dev, int phy, int reg)
    422 {
    423 	struct mvgbe_softc *sc = device_private(dev);
    424 	struct mvgbec_softc *csc = device_private(device_parent(dev));
    425 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    426 	uint32_t smi, val;
    427 	int i;
    428 
    429 	mutex_enter(&csc->sc_mtx);
    430 
    431 	for (i = 0; i < MVGBE_PHY_TIMEOUT; i++) {
    432 		DELAY(1);
    433 		if (!(MVGBE_READ(csc, MVGBE_SMI) & MVGBE_SMI_BUSY))
    434 			break;
    435 	}
    436 	if (i == MVGBE_PHY_TIMEOUT) {
    437 		aprint_error_ifnet(ifp, "SMI busy timeout\n");
    438 		mutex_exit(&csc->sc_mtx);
    439 		return -1;
    440 	}
    441 
    442 	smi =
    443 	    MVGBE_SMI_PHYAD(phy) | MVGBE_SMI_REGAD(reg) | MVGBE_SMI_OPCODE_READ;
    444 	MVGBE_WRITE(csc, MVGBE_SMI, smi);
    445 
    446 	for (i = 0; i < MVGBE_PHY_TIMEOUT; i++) {
    447 		DELAY(1);
    448 		smi = MVGBE_READ(csc, MVGBE_SMI);
    449 		if (smi & MVGBE_SMI_READVALID)
    450 			break;
    451 	}
    452 
    453 	mutex_exit(&csc->sc_mtx);
    454 
    455 	DPRINTFN(9, ("mvgbec_miibus_readreg: i=%d, timeout=%d\n",
    456 	    i, MVGBE_PHY_TIMEOUT));
    457 
    458 	val = smi & MVGBE_SMI_DATA_MASK;
    459 
    460 	DPRINTFN(9, ("mvgbec_miibus_readreg phy=%d, reg=%#x, val=%#x\n",
    461 	    phy, reg, val));
    462 
    463 	return val;
    464 }
    465 
    466 static void
    467 mvgbec_miibus_writereg(device_t dev, int phy, int reg, int val)
    468 {
    469 	struct mvgbe_softc *sc = device_private(dev);
    470 	struct mvgbec_softc *csc = device_private(device_parent(dev));
    471 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    472 	uint32_t smi;
    473 	int i;
    474 
    475 	DPRINTFN(9, ("mvgbec_miibus_writereg phy=%d reg=%#x val=%#x\n",
    476 	     phy, reg, val));
    477 
    478 	mutex_enter(&csc->sc_mtx);
    479 
    480 	for (i = 0; i < MVGBE_PHY_TIMEOUT; i++) {
    481 		DELAY(1);
    482 		if (!(MVGBE_READ(csc, MVGBE_SMI) & MVGBE_SMI_BUSY))
    483 			break;
    484 	}
    485 	if (i == MVGBE_PHY_TIMEOUT) {
    486 		aprint_error_ifnet(ifp, "SMI busy timeout\n");
    487 		mutex_exit(&csc->sc_mtx);
    488 		return;
    489 	}
    490 
    491 	smi = MVGBE_SMI_PHYAD(phy) | MVGBE_SMI_REGAD(reg) |
    492 	    MVGBE_SMI_OPCODE_WRITE | (val & MVGBE_SMI_DATA_MASK);
    493 	MVGBE_WRITE(csc, MVGBE_SMI, smi);
    494 
    495 	for (i = 0; i < MVGBE_PHY_TIMEOUT; i++) {
    496 		DELAY(1);
    497 		if (!(MVGBE_READ(csc, MVGBE_SMI) & MVGBE_SMI_BUSY))
    498 			break;
    499 	}
    500 
    501 	mutex_exit(&csc->sc_mtx);
    502 
    503 	if (i == MVGBE_PHY_TIMEOUT)
    504 		aprint_error_ifnet(ifp, "phy write timed out\n");
    505 }
    506 
    507 static void
    508 mvgbec_miibus_statchg(device_t dev)
    509 {
    510 
    511 	/* nothing to do */
    512 }
    513 
    514 
    515 static void
    516 mvgbec_wininit(struct mvgbec_softc *sc)
    517 {
    518 	device_t pdev = device_parent(sc->sc_dev);
    519 	uint64_t base;
    520 	uint32_t en, ac, size;
    521 	int window, target, attr, rv, i;
    522 	static int tags[] = {
    523 		MARVELL_TAG_SDRAM_CS0,
    524 		MARVELL_TAG_SDRAM_CS1,
    525 		MARVELL_TAG_SDRAM_CS2,
    526 		MARVELL_TAG_SDRAM_CS3,
    527 
    528 		MARVELL_TAG_UNDEFINED,
    529 	};
    530 
    531 	/* First disable all address decode windows */
    532 	en = MVGBE_BARE_EN_MASK;
    533 	MVGBE_WRITE(sc, MVGBE_BARE, en);
    534 
    535 	ac = 0;
    536 	for (window = 0, i = 0;
    537 	    tags[i] != MARVELL_TAG_UNDEFINED && window < MVGBE_NWINDOW; i++) {
    538 		rv = marvell_winparams_by_tag(pdev, tags[i],
    539 		    &target, &attr, &base, &size);
    540 		if (rv != 0 || size == 0)
    541 			continue;
    542 
    543 		if (base > 0xffffffffULL) {
    544 			if (window >= MVGBE_NREMAP) {
    545 				aprint_error_dev(sc->sc_dev,
    546 				    "can't remap window %d\n", window);
    547 				continue;
    548 			}
    549 			MVGBE_WRITE(sc, MVGBE_HA(window),
    550 			    (base >> 32) & 0xffffffff);
    551 		}
    552 
    553 		MVGBE_WRITE(sc, MVGBE_BASEADDR(window),
    554 		    MVGBE_BASEADDR_TARGET(target)	|
    555 		    MVGBE_BASEADDR_ATTR(attr)		|
    556 		    MVGBE_BASEADDR_BASE(base));
    557 		MVGBE_WRITE(sc, MVGBE_S(window), MVGBE_S_SIZE(size));
    558 
    559 		en &= ~(1 << window);
    560 		/* set full access (r/w) */
    561 		ac |= MVGBE_EPAP_EPAR(window, MVGBE_EPAP_AC_FA);
    562 		window++;
    563 	}
    564 	/* allow to access decode window */
    565 	MVGBE_WRITE(sc, MVGBE_EPAP, ac);
    566 
    567 	MVGBE_WRITE(sc, MVGBE_BARE, en);
    568 }
    569 
    570 
    571 /* ARGSUSED */
    572 static int
    573 mvgbe_match(device_t parent, struct cfdata *match, void *aux)
    574 {
    575 	struct marvell_attach_args *mva = aux;
    576 	uint32_t pbase, maddrh, maddrl;
    577 
    578 	pbase = MVGBE_PORTR_BASE + mva->mva_unit * MVGBE_PORTR_SIZE;
    579 	maddrh =
    580 	    bus_space_read_4(mva->mva_iot, mva->mva_ioh, pbase + MVGBE_MACAH);
    581 	maddrl =
    582 	    bus_space_read_4(mva->mva_iot, mva->mva_ioh, pbase + MVGBE_MACAL);
    583 	if ((maddrh | maddrl) == 0)
    584 		return 0;
    585 
    586 	return 1;
    587 }
    588 
    589 /* ARGSUSED */
    590 static void
    591 mvgbe_attach(device_t parent, device_t self, void *aux)
    592 {
    593 	struct mvgbe_softc *sc = device_private(self);
    594 	struct marvell_attach_args *mva = aux;
    595 	struct mvgbe_txmap_entry *entry;
    596 	struct ifnet *ifp;
    597 	bus_dma_segment_t seg;
    598 	bus_dmamap_t dmamap;
    599 	int rseg, i;
    600 	uint32_t maddrh, maddrl;
    601 	void *kva;
    602 
    603 	aprint_naive("\n");
    604 	aprint_normal("\n");
    605 
    606 	sc->sc_dev = self;
    607 	sc->sc_port = mva->mva_unit;
    608 	sc->sc_iot = mva->mva_iot;
    609 	if (bus_space_subregion(mva->mva_iot, mva->mva_ioh,
    610 	    MVGBE_PORTR_BASE + mva->mva_unit * MVGBE_PORTR_SIZE,
    611 	    MVGBE_PORTR_SIZE, &sc->sc_ioh)) {
    612 		aprint_error_dev(self, "Cannot map registers\n");
    613 		return;
    614 	}
    615 	if (bus_space_subregion(mva->mva_iot, mva->mva_ioh,
    616 	    MVGBE_PORTDAFR_BASE + mva->mva_unit * MVGBE_PORTDAFR_SIZE,
    617 	    MVGBE_PORTDAFR_SIZE, &sc->sc_dafh)) {
    618 		aprint_error_dev(self,
    619 		    "Cannot map destination address filter registers\n");
    620 		return;
    621 	}
    622 	sc->sc_dmat = mva->mva_dmat;
    623 
    624 	maddrh = MVGBE_READ(sc, MVGBE_MACAH);
    625 	maddrl = MVGBE_READ(sc, MVGBE_MACAL);
    626 	sc->sc_enaddr[0] = maddrh >> 24;
    627 	sc->sc_enaddr[1] = maddrh >> 16;
    628 	sc->sc_enaddr[2] = maddrh >> 8;
    629 	sc->sc_enaddr[3] = maddrh >> 0;
    630 	sc->sc_enaddr[4] = maddrl >> 8;
    631 	sc->sc_enaddr[5] = maddrl >> 0;
    632 	aprint_normal_dev(self, "Ethernet address %s\n",
    633 	    ether_sprintf(sc->sc_enaddr));
    634 
    635 	/* clear all ethernet port interrupts */
    636 	MVGBE_WRITE(sc, MVGBE_IC, 0);
    637 	MVGBE_WRITE(sc, MVGBE_ICE, 0);
    638 
    639 	marvell_intr_establish(mva->mva_irq, IPL_NET, mvgbe_intr, sc);
    640 
    641 	/* Allocate the descriptor queues. */
    642 	if (bus_dmamem_alloc(sc->sc_dmat, sizeof(struct mvgbe_ring_data),
    643 	    PAGE_SIZE, 0, &seg, 1, &rseg, BUS_DMA_NOWAIT)) {
    644 		aprint_error_dev(self, "can't alloc rx buffers\n");
    645 		return;
    646 	}
    647 	if (bus_dmamem_map(sc->sc_dmat, &seg, rseg,
    648 	    sizeof(struct mvgbe_ring_data), &kva, BUS_DMA_NOWAIT)) {
    649 		aprint_error_dev(self, "can't map dma buffers (%lu bytes)\n",
    650 		    (u_long)sizeof(struct mvgbe_ring_data));
    651 		goto fail1;
    652 	}
    653 	if (bus_dmamap_create(sc->sc_dmat, sizeof(struct mvgbe_ring_data), 1,
    654 	    sizeof(struct mvgbe_ring_data), 0, BUS_DMA_NOWAIT,
    655 	    &sc->sc_ring_map)) {
    656 		aprint_error_dev(self, "can't create dma map\n");
    657 		goto fail2;
    658 	}
    659 	if (bus_dmamap_load(sc->sc_dmat, sc->sc_ring_map, kva,
    660 	    sizeof(struct mvgbe_ring_data), NULL, BUS_DMA_NOWAIT)) {
    661 		aprint_error_dev(self, "can't load dma map\n");
    662 		goto fail3;
    663 	}
    664 	for (i = 0; i < MVGBE_RX_RING_CNT; i++)
    665 		sc->sc_cdata.mvgbe_rx_chain[i].mvgbe_mbuf = NULL;
    666 
    667 	SIMPLEQ_INIT(&sc->sc_txmap_head);
    668 	for (i = 0; i < MVGBE_TX_RING_CNT; i++) {
    669 		sc->sc_cdata.mvgbe_tx_chain[i].mvgbe_mbuf = NULL;
    670 
    671 		if (bus_dmamap_create(sc->sc_dmat,
    672 		    MVGBE_JLEN, MVGBE_NTXSEG, MVGBE_JLEN, 0,
    673 		    BUS_DMA_NOWAIT, &dmamap)) {
    674 			aprint_error_dev(self, "Can't create TX dmamap\n");
    675 			goto fail4;
    676 		}
    677 
    678 		entry = kmem_alloc(sizeof(*entry), KM_SLEEP);
    679 		if (!entry) {
    680 			aprint_error_dev(self, "Can't alloc txmap entry\n");
    681 			bus_dmamap_destroy(sc->sc_dmat, dmamap);
    682 			goto fail4;
    683 		}
    684 		entry->dmamap = dmamap;
    685 		SIMPLEQ_INSERT_HEAD(&sc->sc_txmap_head, entry, link);
    686 	}
    687 
    688 	sc->sc_rdata = (struct mvgbe_ring_data *)kva;
    689 	memset(sc->sc_rdata, 0, sizeof(struct mvgbe_ring_data));
    690 
    691 #if 0
    692 	/*
    693 	 * We can support 802.1Q VLAN-sized frames and jumbo
    694 	 * Ethernet frames.
    695 	 */
    696 	sc->sc_ethercom.ec_capabilities |=
    697 	    ETHERCAP_VLAN_MTU | ETHERCAP_VLAN_HWTAGGING | ETHERCAP_JUMBO_MTU;
    698 #else
    699 	/* XXXX: We don't know the usage of VLAN. */
    700 	sc->sc_ethercom.ec_capabilities |= ETHERCAP_JUMBO_MTU;
    701 #endif
    702 
    703 	/* Try to allocate memory for jumbo buffers. */
    704 	if (mvgbe_alloc_jumbo_mem(sc)) {
    705 		aprint_error_dev(self, "jumbo buffer allocation failed\n");
    706 		goto fail4;
    707 	}
    708 
    709 	ifp = &sc->sc_ethercom.ec_if;
    710 	ifp->if_softc = sc;
    711 	ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
    712 	ifp->if_start = mvgbe_start;
    713 	ifp->if_ioctl = mvgbe_ioctl;
    714 	ifp->if_init = mvgbe_init;
    715 	ifp->if_stop = mvgbe_stop;
    716 	ifp->if_watchdog = mvgbe_watchdog;
    717 	/*
    718 	 * We can do IPv4/TCPv4/UDPv4 checksums in hardware.
    719 	 */
    720 	sc->sc_ethercom.ec_if.if_capabilities |=
    721 	    IFCAP_CSUM_IPv4_Tx | IFCAP_CSUM_IPv4_Rx |
    722 	    IFCAP_CSUM_TCPv4_Tx | IFCAP_CSUM_TCPv4_Rx |
    723 	    IFCAP_CSUM_UDPv4_Tx | IFCAP_CSUM_UDPv4_Rx;
    724 	IFQ_SET_MAXLEN(&ifp->if_snd, max(MVGBE_TX_RING_CNT - 1, IFQ_MAXLEN));
    725 	IFQ_SET_READY(&ifp->if_snd);
    726 	strcpy(ifp->if_xname, device_xname(sc->sc_dev));
    727 
    728 	mvgbe_stop(ifp, 0);
    729 
    730 	/*
    731 	 * Do MII setup.
    732 	 */
    733 	sc->sc_mii.mii_ifp = ifp;
    734 	sc->sc_mii.mii_readreg = mvgbec_miibus_readreg;
    735 	sc->sc_mii.mii_writereg = mvgbec_miibus_writereg;
    736 	sc->sc_mii.mii_statchg = mvgbec_miibus_statchg;
    737 
    738 	sc->sc_ethercom.ec_mii = &sc->sc_mii;
    739 	ifmedia_init(&sc->sc_mii.mii_media, 0,
    740 	    mvgbe_ifmedia_upd, mvgbe_ifmedia_sts);
    741 	mii_attach(self, &sc->sc_mii, 0xffffffff,
    742 	    MII_PHY_ANY, MII_OFFSET_ANY, 0);
    743 	if (LIST_FIRST(&sc->sc_mii.mii_phys) == NULL) {
    744 		aprint_error_dev(self, "no PHY found!\n");
    745 		ifmedia_add(&sc->sc_mii.mii_media,
    746 		    IFM_ETHER|IFM_MANUAL, 0, NULL);
    747 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_MANUAL);
    748 	} else
    749 		ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER|IFM_AUTO);
    750 
    751 	/*
    752 	 * Call MI attach routines.
    753 	 */
    754 	if_attach(ifp);
    755 
    756 	ether_ifattach(ifp, sc->sc_enaddr);
    757 
    758 #if NRND > 0
    759 	rnd_attach_source(&sc->sc_rnd_source, device_xname(sc->sc_dev),
    760 	    RND_TYPE_NET, 0);
    761 #endif
    762 
    763 	return;
    764 
    765 fail4:
    766 	while ((entry = SIMPLEQ_FIRST(&sc->sc_txmap_head)) != NULL) {
    767 		SIMPLEQ_REMOVE_HEAD(&sc->sc_txmap_head, link);
    768 		bus_dmamap_destroy(sc->sc_dmat, entry->dmamap);
    769 	}
    770 	bus_dmamap_unload(sc->sc_dmat, sc->sc_ring_map);
    771 fail3:
    772 	bus_dmamap_destroy(sc->sc_dmat, sc->sc_ring_map);
    773 fail2:
    774 	bus_dmamem_unmap(sc->sc_dmat, kva, sizeof(struct mvgbe_ring_data));
    775 fail1:
    776 	bus_dmamem_free(sc->sc_dmat, &seg, rseg);
    777 	return;
    778 }
    779 
    780 
    781 static int
    782 mvgbe_intr(void *arg)
    783 {
    784 	struct mvgbe_softc *sc = arg;
    785 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    786 	uint32_t ic, ice, datum = 0;
    787 	int claimed = 0;
    788 
    789 	for (;;) {
    790 		ice = MVGBE_READ(sc, MVGBE_ICE);
    791 		ic = MVGBE_READ(sc, MVGBE_IC);
    792 
    793 		DPRINTFN(3, ("mvgbe_intr: ic=%#x, ice=%#x\n", ic, ice));
    794 		if (ic == 0 && ice == 0)
    795 			break;
    796 
    797 		datum = datum ^ ic ^ ice;
    798 
    799 		MVGBE_WRITE(sc, MVGBE_IC, ~ic);
    800 		MVGBE_WRITE(sc, MVGBE_ICE, ~ice);
    801 
    802 		claimed = 1;
    803 
    804 		if (ice & MVGBE_ICE_LINKCHG) {
    805 			if (MVGBE_READ(sc, MVGBE_PS) & MVGBE_PS_LINKUP) {
    806 				/* Enable port RX and TX. */
    807 				MVGBE_WRITE(sc, MVGBE_RQC, MVGBE_RQC_ENQ(0));
    808 				MVGBE_WRITE(sc, MVGBE_TQC, MVGBE_TQC_ENQ);
    809 			} else {
    810 				MVGBE_WRITE(sc, MVGBE_RQC, MVGBE_RQC_DISQ(0));
    811 				MVGBE_WRITE(sc, MVGBE_TQC, MVGBE_TQC_DISQ);
    812 			}
    813 		}
    814 
    815 		if (ic & (MVGBE_IC_RXBUF | MVGBE_IC_RXERROR))
    816 			mvgbe_rxeof(sc);
    817 
    818 		if (ice & (MVGBE_ICE_TXBUF | MVGBE_ICE_TXERR))
    819 			mvgbe_txeof(sc);
    820 	}
    821 
    822 	if (!IFQ_IS_EMPTY(&ifp->if_snd))
    823 		mvgbe_start(ifp);
    824 
    825 #if NRND > 0
    826 	if (RND_ENABLED(&sc->sc_rnd_source))
    827 		rnd_add_uint32(&sc->sc_rnd_source, datum);
    828 #endif
    829 
    830 	return claimed;
    831 }
    832 
    833 static void
    834 mvgbe_start(struct ifnet *ifp)
    835 {
    836 	struct mvgbe_softc *sc = ifp->if_softc;
    837 	struct mbuf *m_head = NULL;
    838 	uint32_t idx = sc->sc_cdata.mvgbe_tx_prod;
    839 	int pkts = 0;
    840 
    841 	DPRINTFN(3, ("mvgbe_start (idx %d, tx_chain[idx] %p)\n", idx,
    842 	    sc->sc_cdata.mvgbe_tx_chain[idx].mvgbe_mbuf));
    843 
    844 	if ((ifp->if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING)
    845 		return;
    846 	/* If Link is DOWN, can't start TX */
    847 	if (!(MVGBE_READ(sc, MVGBE_PS) & MVGBE_PS_LINKUP))
    848 		return;
    849 
    850 	while (sc->sc_cdata.mvgbe_tx_chain[idx].mvgbe_mbuf == NULL) {
    851 		IFQ_POLL(&ifp->if_snd, m_head);
    852 		if (m_head == NULL)
    853 			break;
    854 
    855 		/*
    856 		 * Pack the data into the transmit ring. If we
    857 		 * don't have room, set the OACTIVE flag and wait
    858 		 * for the NIC to drain the ring.
    859 		 */
    860 		if (mvgbe_encap(sc, m_head, &idx)) {
    861 			ifp->if_flags |= IFF_OACTIVE;
    862 			break;
    863 		}
    864 
    865 		/* now we are committed to transmit the packet */
    866 		IFQ_DEQUEUE(&ifp->if_snd, m_head);
    867 		pkts++;
    868 
    869 		/*
    870 		 * If there's a BPF listener, bounce a copy of this frame
    871 		 * to him.
    872 		 */
    873 		if (ifp->if_bpf)
    874 			bpf_ops->bpf_mtap(ifp->if_bpf, m_head);
    875 	}
    876 	if (pkts == 0)
    877 		return;
    878 
    879 	/* Transmit at Queue 0 */
    880 	if (idx != sc->sc_cdata.mvgbe_tx_prod) {
    881 		sc->sc_cdata.mvgbe_tx_prod = idx;
    882 		MVGBE_WRITE(sc, MVGBE_TQC, MVGBE_TQC_ENQ);
    883 
    884 		/*
    885 		 * Set a timeout in case the chip goes out to lunch.
    886 		 */
    887 		ifp->if_timer = 5;
    888 	}
    889 }
    890 
    891 static int
    892 mvgbe_ioctl(struct ifnet *ifp, u_long command, void *data)
    893 {
    894 	struct mvgbe_softc *sc = ifp->if_softc;
    895 	struct ifreq *ifr = data;
    896 	struct mii_data *mii;
    897 	int s, error = 0;
    898 
    899 	s = splnet();
    900 
    901 	switch (command) {
    902 	case SIOCSIFFLAGS:
    903 		DPRINTFN(2, ("mvgbe_ioctl IFFLAGS\n"));
    904 		if (ifp->if_flags & IFF_UP)
    905 			mvgbe_init(ifp);
    906 		else
    907 			if (ifp->if_flags & IFF_RUNNING)
    908 				mvgbe_stop(ifp, 0);
    909 		sc->sc_if_flags = ifp->if_flags;
    910 		error = 0;
    911 		break;
    912 
    913 	case SIOCGIFMEDIA:
    914 	case SIOCSIFMEDIA:
    915 		DPRINTFN(2, ("mvgbe_ioctl MEDIA\n"));
    916 		mii = &sc->sc_mii;
    917 		error = ifmedia_ioctl(ifp, ifr, &mii->mii_media, command);
    918 		break;
    919 
    920 	default:
    921 		DPRINTFN(2, ("mvgbe_ioctl ETHER\n"));
    922 		error = ether_ioctl(ifp, command, data);
    923 		if (error == ENETRESET) {
    924 			if (ifp->if_flags & IFF_RUNNING) {
    925 				mvgbe_setmulti(sc);
    926 				DPRINTFN(2,
    927 				    ("mvgbe_ioctl setmulti called\n"));
    928 			}
    929 			error = 0;
    930 		}
    931 		break;
    932 	}
    933 
    934 	splx(s);
    935 
    936 	return error;
    937 }
    938 
    939 static int
    940 mvgbe_init(struct ifnet *ifp)
    941 {
    942 	struct mvgbe_softc *sc = ifp->if_softc;
    943 	struct mvgbec_softc *csc = device_private(device_parent(sc->sc_dev));
    944 	struct mii_data *mii = &sc->sc_mii;
    945 	uint32_t reg;
    946 	int i, s;
    947 
    948 	DPRINTFN(2, ("mvgbe_init\n"));
    949 
    950 	s = splnet();
    951 
    952 	if (ifp->if_flags & IFF_RUNNING) {
    953 		splx(s);
    954 		return 0;
    955 	}
    956 
    957 	/* Cancel pending I/O and free all RX/TX buffers. */
    958 	mvgbe_stop(ifp, 0);
    959 
    960 	/* clear all ethernet port interrupts */
    961 	MVGBE_WRITE(sc, MVGBE_IC, 0);
    962 	MVGBE_WRITE(sc, MVGBE_ICE, 0);
    963 
    964 	/* Init TX/RX descriptors */
    965 	if (mvgbe_init_tx_ring(sc) == ENOBUFS) {
    966 		aprint_error_ifnet(ifp,
    967 		    "initialization failed: no memory for tx buffers\n");
    968 		splx(s);
    969 		return ENOBUFS;
    970 	}
    971 	if (mvgbe_init_rx_ring(sc) == ENOBUFS) {
    972 		aprint_error_ifnet(ifp,
    973 		    "initialization failed: no memory for rx buffers\n");
    974 		splx(s);
    975 		return ENOBUFS;
    976 	}
    977 
    978 	MVGBE_WRITE(sc, MVGBE_PSC,
    979 	    MVGBE_PSC_ANFC |			/* Enable Auto-Neg Flow Ctrl */
    980 	    MVGBE_PSC_RESERVED |		/* Must be set to 1 */
    981 	    MVGBE_PSC_FLFAIL |			/* Do NOT Force Link Fail */
    982 	    MVGBE_PSC_MRU(MVGBE_PSC_MRU_9700) |	/* Always 9700 OK */
    983 	    MVGBE_PSC_SETFULLDX);		/* Set_FullDx */
    984 	/* XXXX: mvgbe(4) always use RGMII. */
    985 	MVGBE_WRITE(sc, MVGBE_PSC1,
    986 	    MVGBE_READ(sc, MVGBE_PSC1) | MVGBE_PSC1_RGMIIEN);
    987 	/* XXXX: Also always Weighted Round-Robin Priority Mode */
    988 	MVGBE_WRITE(sc, MVGBE_TQFPC, MVGBE_TQFPC_EN(0));
    989 
    990 	MVGBE_WRITE(sc, MVGBE_CRDP(0), MVGBE_RX_RING_ADDR(sc, 0));
    991 	MVGBE_WRITE(sc, MVGBE_TCQDP, MVGBE_TX_RING_ADDR(sc, 0));
    992 
    993 	if (csc->sc_fix_tqtb) {
    994 		/*
    995 		 * Queue 0 (offset 0x72700) must be programmed to 0x3fffffff.
    996 		 * And offset 0x72704 must be programmed to 0x03ffffff.
    997 		 * Queue 1 through 7 must be programmed to 0x0.
    998 		 */
    999 		MVGBE_WRITE(sc, MVGBE_TQTBCOUNT(0), 0x3fffffff);
   1000 		MVGBE_WRITE(sc, MVGBE_TQTBCONFIG(0), 0x03ffffff);
   1001 		for (i = 1; i < 8; i++) {
   1002 			MVGBE_WRITE(sc, MVGBE_TQTBCOUNT(i), 0x0);
   1003 			MVGBE_WRITE(sc, MVGBE_TQTBCONFIG(i), 0x0);
   1004 		}
   1005 	} else
   1006 		for (i = 1; i < 8; i++) {
   1007 			MVGBE_WRITE(sc, MVGBE_TQTBCOUNT(i), 0x3fffffff);
   1008 			MVGBE_WRITE(sc, MVGBE_TQTBCONFIG(i), 0xffff7fff);
   1009 			MVGBE_WRITE(sc, MVGBE_TQAC(i), 0xfc0000ff);
   1010 		}
   1011 
   1012 	MVGBE_WRITE(sc, MVGBE_PXC, MVGBE_PXC_RXCS);
   1013 	MVGBE_WRITE(sc, MVGBE_PXCX, 0);
   1014 	MVGBE_WRITE(sc, MVGBE_SDC,
   1015 	    MVGBE_SDC_RXBSZ_16_64BITWORDS |
   1016 #if BYTE_ORDER == LITTLE_ENDIAN
   1017 	    MVGBE_SDC_BLMR |	/* Big/Litlle Endian Receive Mode: No swap */
   1018 	    MVGBE_SDC_BLMT |	/* Big/Litlle Endian Transmit Mode: No swap */
   1019 #endif
   1020 	    MVGBE_SDC_TXBSZ_16_64BITWORDS);
   1021 
   1022 	mii_mediachg(mii);
   1023 
   1024 	/* Enable port */
   1025 	reg = MVGBE_READ(sc, MVGBE_PSC);
   1026 	MVGBE_WRITE(sc, MVGBE_PSC, reg | MVGBE_PSC_PORTEN);
   1027 
   1028 	/* If Link is UP, Start RX and TX traffic */
   1029 	if (MVGBE_READ(sc, MVGBE_PS) & MVGBE_PS_LINKUP) {
   1030 		/* Enable port RX/TX. */
   1031 		MVGBE_WRITE(sc, MVGBE_RQC, MVGBE_RQC_ENQ(0));
   1032 		MVGBE_WRITE(sc, MVGBE_TQC, MVGBE_TQC_ENQ);
   1033 	}
   1034 
   1035 	/* Enable interrupt masks */
   1036 	MVGBE_WRITE(sc, MVGBE_PIM,
   1037 	    MVGBE_IC_RXBUF |
   1038 	    MVGBE_IC_EXTEND |
   1039 	    MVGBE_IC_RXBUFQ_MASK |
   1040 	    MVGBE_IC_RXERROR |
   1041 	    MVGBE_IC_RXERRQ_MASK);
   1042 	MVGBE_WRITE(sc, MVGBE_PEIM,
   1043 	    MVGBE_ICE_TXBUF |
   1044 	    MVGBE_ICE_TXERR |
   1045 	    MVGBE_ICE_LINKCHG);
   1046 
   1047 	ifp->if_flags |= IFF_RUNNING;
   1048 	ifp->if_flags &= ~IFF_OACTIVE;
   1049 
   1050 	splx(s);
   1051 
   1052 	return 0;
   1053 }
   1054 
   1055 /* ARGSUSED */
   1056 static void
   1057 mvgbe_stop(struct ifnet *ifp, int disable)
   1058 {
   1059 	struct mvgbe_softc *sc = ifp->if_softc;
   1060 	struct mvgbe_chain_data *cdata = &sc->sc_cdata;
   1061 	uint32_t reg;
   1062 	int i, cnt;
   1063 
   1064 	DPRINTFN(2, ("mvgbe_stop\n"));
   1065 
   1066 	/* Stop Rx port activity. Check port Rx activity. */
   1067 	reg = MVGBE_READ(sc, MVGBE_RQC);
   1068 	if (reg & MVGBE_RQC_ENQ_MASK)
   1069 		/* Issue stop command for active channels only */
   1070 		MVGBE_WRITE(sc, MVGBE_RQC, MVGBE_RQC_DISQ_DISABLE(reg));
   1071 
   1072 	/* Stop Tx port activity. Check port Tx activity. */
   1073 	if (MVGBE_READ(sc, MVGBE_TQC) & MVGBE_TQC_ENQ)
   1074 		MVGBE_WRITE(sc, MVGBE_TQC, MVGBE_TQC_DISQ);
   1075 
   1076 	/* Force link down */
   1077 	reg = MVGBE_READ(sc, MVGBE_PSC);
   1078 	MVGBE_WRITE(sc, MVGBE_PSC, reg & ~MVGBE_PSC_FLFAIL);
   1079 
   1080 #define RX_DISABLE_TIMEOUT          0x1000000
   1081 #define TX_FIFO_EMPTY_TIMEOUT       0x1000000
   1082 	/* Wait for all Rx activity to terminate. */
   1083 	cnt = 0;
   1084 	do {
   1085 		if (cnt >= RX_DISABLE_TIMEOUT) {
   1086 			aprint_error_ifnet(ifp,
   1087 			    "timeout for RX stopped. rqc 0x%x\n", reg);
   1088 			break;
   1089 		}
   1090 		cnt++;
   1091 
   1092 		/*
   1093 		 * Check Receive Queue Command register that all Rx queues
   1094 		 * are stopped
   1095 		 */
   1096 		reg = MVGBE_READ(sc, MVGBE_RQC);
   1097 	} while (reg & 0xff);
   1098 
   1099 	/* Double check to verify that TX FIFO is empty */
   1100 	cnt = 0;
   1101 	while (1) {
   1102 		do {
   1103 			if (cnt >= TX_FIFO_EMPTY_TIMEOUT) {
   1104 				aprint_error_ifnet(ifp,
   1105 				    "timeout for TX FIFO empty. status 0x%x\n",
   1106 				    reg);
   1107 				break;
   1108 			}
   1109 			cnt++;
   1110 
   1111 			reg = MVGBE_READ(sc, MVGBE_PS);
   1112 		} while
   1113 		    (!(reg & MVGBE_PS_TXFIFOEMP) || reg & MVGBE_PS_TXINPROG);
   1114 
   1115 		if (cnt >= TX_FIFO_EMPTY_TIMEOUT)
   1116 			break;
   1117 
   1118 		/* Double check */
   1119 		reg = MVGBE_READ(sc, MVGBE_PS);
   1120 		if (reg & MVGBE_PS_TXFIFOEMP && !(reg & MVGBE_PS_TXINPROG))
   1121 			break;
   1122 		else
   1123 			aprint_error_ifnet(ifp,
   1124 			    "TX FIFO empty double check failed."
   1125 			    " %d loops, status 0x%x\n", cnt, reg);
   1126 	}
   1127 
   1128 	/* Reset the Enable bit in the Port Serial Control Register */
   1129 	reg = MVGBE_READ(sc, MVGBE_PSC);
   1130 	MVGBE_WRITE(sc, MVGBE_PSC, reg & ~MVGBE_PSC_PORTEN);
   1131 
   1132 	/* Disable interrupts */
   1133 	MVGBE_WRITE(sc, MVGBE_PIM, 0);
   1134 	MVGBE_WRITE(sc, MVGBE_PEIM, 0);
   1135 
   1136 	/* Free RX and TX mbufs still in the queues. */
   1137 	for (i = 0; i < MVGBE_RX_RING_CNT; i++) {
   1138 		if (cdata->mvgbe_rx_chain[i].mvgbe_mbuf != NULL) {
   1139 			m_freem(cdata->mvgbe_rx_chain[i].mvgbe_mbuf);
   1140 			cdata->mvgbe_rx_chain[i].mvgbe_mbuf = NULL;
   1141 		}
   1142 	}
   1143 	for (i = 0; i < MVGBE_TX_RING_CNT; i++) {
   1144 		if (cdata->mvgbe_tx_chain[i].mvgbe_mbuf != NULL) {
   1145 			m_freem(cdata->mvgbe_tx_chain[i].mvgbe_mbuf);
   1146 			cdata->mvgbe_tx_chain[i].mvgbe_mbuf = NULL;
   1147 		}
   1148 	}
   1149 
   1150 	ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
   1151 }
   1152 
   1153 static void
   1154 mvgbe_watchdog(struct ifnet *ifp)
   1155 {
   1156 	struct mvgbe_softc *sc = ifp->if_softc;
   1157 
   1158 	/*
   1159 	 * Reclaim first as there is a possibility of losing Tx completion
   1160 	 * interrupts.
   1161 	 */
   1162 	mvgbe_txeof(sc);
   1163 	if (sc->sc_cdata.mvgbe_tx_cnt != 0) {
   1164 		aprint_error_ifnet(ifp, "watchdog timeout\n");
   1165 
   1166 		ifp->if_oerrors++;
   1167 
   1168 		mvgbe_init(ifp);
   1169 	}
   1170 }
   1171 
   1172 
   1173 /*
   1174  * Set media options.
   1175  */
   1176 static int
   1177 mvgbe_ifmedia_upd(struct ifnet *ifp)
   1178 {
   1179 	struct mvgbe_softc *sc = ifp->if_softc;
   1180 
   1181 	mii_mediachg(&sc->sc_mii);
   1182 	return 0;
   1183 }
   1184 
   1185 /*
   1186  * Report current media status.
   1187  */
   1188 static void
   1189 mvgbe_ifmedia_sts(struct ifnet *ifp, struct ifmediareq *ifmr)
   1190 {
   1191 	struct mvgbe_softc *sc = ifp->if_softc;
   1192 
   1193 	mii_pollstat(&sc->sc_mii);
   1194 	ifmr->ifm_active = sc->sc_mii.mii_media_active;
   1195 	ifmr->ifm_status = sc->sc_mii.mii_media_status;
   1196 }
   1197 
   1198 
   1199 static int
   1200 mvgbe_init_rx_ring(struct mvgbe_softc *sc)
   1201 {
   1202 	struct mvgbe_chain_data *cd = &sc->sc_cdata;
   1203 	struct mvgbe_ring_data *rd = sc->sc_rdata;
   1204 	int i;
   1205 
   1206 	bzero((char *)rd->mvgbe_rx_ring,
   1207 	    sizeof(struct mvgbe_rx_desc) * MVGBE_RX_RING_CNT);
   1208 
   1209 	for (i = 0; i < MVGBE_RX_RING_CNT; i++) {
   1210 		cd->mvgbe_rx_chain[i].mvgbe_desc =
   1211 		    &rd->mvgbe_rx_ring[i];
   1212 		if (i == MVGBE_RX_RING_CNT - 1) {
   1213 			cd->mvgbe_rx_chain[i].mvgbe_next =
   1214 			    &cd->mvgbe_rx_chain[0];
   1215 			rd->mvgbe_rx_ring[i].nextdescptr =
   1216 			    MVGBE_RX_RING_ADDR(sc, 0);
   1217 		} else {
   1218 			cd->mvgbe_rx_chain[i].mvgbe_next =
   1219 			    &cd->mvgbe_rx_chain[i + 1];
   1220 			rd->mvgbe_rx_ring[i].nextdescptr =
   1221 			    MVGBE_RX_RING_ADDR(sc, i + 1);
   1222 		}
   1223 	}
   1224 
   1225 	for (i = 0; i < MVGBE_RX_RING_CNT; i++) {
   1226 		if (mvgbe_newbuf(sc, i, NULL,
   1227 		    sc->sc_cdata.mvgbe_rx_jumbo_map) == ENOBUFS) {
   1228 			aprint_error_ifnet(&sc->sc_ethercom.ec_if,
   1229 			    "failed alloc of %dth mbuf\n", i);
   1230 			return ENOBUFS;
   1231 		}
   1232 	}
   1233 	sc->sc_cdata.mvgbe_rx_prod = 0;
   1234 	sc->sc_cdata.mvgbe_rx_cons = 0;
   1235 
   1236 	return 0;
   1237 }
   1238 
   1239 static int
   1240 mvgbe_init_tx_ring(struct mvgbe_softc *sc)
   1241 {
   1242 	struct mvgbe_chain_data *cd = &sc->sc_cdata;
   1243 	struct mvgbe_ring_data *rd = sc->sc_rdata;
   1244 	int i;
   1245 
   1246 	bzero((char *)sc->sc_rdata->mvgbe_tx_ring,
   1247 	    sizeof(struct mvgbe_tx_desc) * MVGBE_TX_RING_CNT);
   1248 
   1249 	for (i = 0; i < MVGBE_TX_RING_CNT; i++) {
   1250 		cd->mvgbe_tx_chain[i].mvgbe_desc =
   1251 		    &rd->mvgbe_tx_ring[i];
   1252 		if (i == MVGBE_TX_RING_CNT - 1) {
   1253 			cd->mvgbe_tx_chain[i].mvgbe_next =
   1254 			    &cd->mvgbe_tx_chain[0];
   1255 			rd->mvgbe_tx_ring[i].nextdescptr =
   1256 			    MVGBE_TX_RING_ADDR(sc, 0);
   1257 		} else {
   1258 			cd->mvgbe_tx_chain[i].mvgbe_next =
   1259 			    &cd->mvgbe_tx_chain[i + 1];
   1260 			rd->mvgbe_tx_ring[i].nextdescptr =
   1261 			    MVGBE_TX_RING_ADDR(sc, i + 1);
   1262 		}
   1263 		rd->mvgbe_tx_ring[i].cmdsts = MVGBE_BUFFER_OWNED_BY_HOST;
   1264 	}
   1265 
   1266 	sc->sc_cdata.mvgbe_tx_prod = 0;
   1267 	sc->sc_cdata.mvgbe_tx_cons = 0;
   1268 	sc->sc_cdata.mvgbe_tx_cnt = 0;
   1269 
   1270 	MVGBE_CDTXSYNC(sc, 0, MVGBE_TX_RING_CNT,
   1271 	    BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
   1272 
   1273 	return 0;
   1274 }
   1275 
   1276 static int
   1277 mvgbe_newbuf(struct mvgbe_softc *sc, int i, struct mbuf *m,
   1278 		bus_dmamap_t dmamap)
   1279 {
   1280 	struct mbuf *m_new = NULL;
   1281 	struct mvgbe_chain *c;
   1282 	struct mvgbe_rx_desc *r;
   1283 	int align;
   1284 
   1285 	if (m == NULL) {
   1286 		void *buf = NULL;
   1287 
   1288 		MGETHDR(m_new, M_DONTWAIT, MT_DATA);
   1289 		if (m_new == NULL) {
   1290 			aprint_error_ifnet(&sc->sc_ethercom.ec_if,
   1291 			    "no memory for rx list -- packet dropped!\n");
   1292 			return ENOBUFS;
   1293 		}
   1294 
   1295 		/* Allocate the jumbo buffer */
   1296 		buf = mvgbe_jalloc(sc);
   1297 		if (buf == NULL) {
   1298 			m_freem(m_new);
   1299 			DPRINTFN(1, ("%s jumbo allocation failed -- packet "
   1300 			    "dropped!\n", sc->sc_ethercom.ec_if.if_xname));
   1301 			return ENOBUFS;
   1302 		}
   1303 
   1304 		/* Attach the buffer to the mbuf */
   1305 		m_new->m_len = m_new->m_pkthdr.len = MVGBE_JLEN;
   1306 		MEXTADD(m_new, buf, MVGBE_JLEN, 0, mvgbe_jfree, sc);
   1307 	} else {
   1308 		/*
   1309 		 * We're re-using a previously allocated mbuf;
   1310 		 * be sure to re-init pointers and lengths to
   1311 		 * default values.
   1312 		 */
   1313 		m_new = m;
   1314 		m_new->m_len = m_new->m_pkthdr.len = MVGBE_JLEN;
   1315 		m_new->m_data = m_new->m_ext.ext_buf;
   1316 	}
   1317 	align = (u_long)m_new->m_data & MVGBE_BUF_MASK;
   1318 	if (align != 0)
   1319 		m_adj(m_new,  MVGBE_BUF_ALIGN - align);
   1320 
   1321 	c = &sc->sc_cdata.mvgbe_rx_chain[i];
   1322 	r = c->mvgbe_desc;
   1323 	c->mvgbe_mbuf = m_new;
   1324 	r->bufptr = dmamap->dm_segs[0].ds_addr +
   1325 	    (((vaddr_t)m_new->m_data - (vaddr_t)sc->sc_cdata.mvgbe_jumbo_buf));
   1326 	r->bufsize = MVGBE_JLEN & ~MVGBE_BUF_MASK;
   1327 	r->cmdsts = MVGBE_BUFFER_OWNED_BY_DMA | MVGBE_RX_ENABLE_INTERRUPT;
   1328 
   1329 	MVGBE_CDRXSYNC(sc, i, BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
   1330 
   1331 	return 0;
   1332 }
   1333 
   1334 /*
   1335  * Memory management for jumbo frames.
   1336  */
   1337 
   1338 static int
   1339 mvgbe_alloc_jumbo_mem(struct mvgbe_softc *sc)
   1340 {
   1341 	char *ptr, *kva;
   1342 	bus_dma_segment_t seg;
   1343 	int i, rseg, state, error;
   1344 	struct mvgbe_jpool_entry *entry;
   1345 
   1346 	state = error = 0;
   1347 
   1348 	/* Grab a big chunk o' storage. */
   1349 	if (bus_dmamem_alloc(sc->sc_dmat, MVGBE_JMEM, PAGE_SIZE, 0,
   1350 	    &seg, 1, &rseg, BUS_DMA_NOWAIT)) {
   1351 		aprint_error_dev(sc->sc_dev, "can't alloc rx buffers\n");
   1352 		return ENOBUFS;
   1353 	}
   1354 
   1355 	state = 1;
   1356 	if (bus_dmamem_map(sc->sc_dmat, &seg, rseg, MVGBE_JMEM,
   1357 	    (void **)&kva, BUS_DMA_NOWAIT)) {
   1358 		aprint_error_dev(sc->sc_dev,
   1359 		    "can't map dma buffers (%d bytes)\n", MVGBE_JMEM);
   1360 		error = ENOBUFS;
   1361 		goto out;
   1362 	}
   1363 
   1364 	state = 2;
   1365 	if (bus_dmamap_create(sc->sc_dmat, MVGBE_JMEM, 1, MVGBE_JMEM, 0,
   1366 	    BUS_DMA_NOWAIT, &sc->sc_cdata.mvgbe_rx_jumbo_map)) {
   1367 		aprint_error_dev(sc->sc_dev, "can't create dma map\n");
   1368 		error = ENOBUFS;
   1369 		goto out;
   1370 	}
   1371 
   1372 	state = 3;
   1373 	if (bus_dmamap_load(sc->sc_dmat, sc->sc_cdata.mvgbe_rx_jumbo_map,
   1374 	    kva, MVGBE_JMEM, NULL, BUS_DMA_NOWAIT)) {
   1375 		aprint_error_dev(sc->sc_dev, "can't load dma map\n");
   1376 		error = ENOBUFS;
   1377 		goto out;
   1378 	}
   1379 
   1380 	state = 4;
   1381 	sc->sc_cdata.mvgbe_jumbo_buf = (void *)kva;
   1382 	DPRINTFN(1,("mvgbe_jumbo_buf = 0x%p\n", sc->sc_cdata.mvgbe_jumbo_buf));
   1383 
   1384 	LIST_INIT(&sc->sc_jfree_listhead);
   1385 	LIST_INIT(&sc->sc_jinuse_listhead);
   1386 
   1387 	/*
   1388 	 * Now divide it up into 9K pieces and save the addresses
   1389 	 * in an array.
   1390 	 */
   1391 	ptr = sc->sc_cdata.mvgbe_jumbo_buf;
   1392 	for (i = 0; i < MVGBE_JSLOTS; i++) {
   1393 		sc->sc_cdata.mvgbe_jslots[i] = ptr;
   1394 		ptr += MVGBE_JLEN;
   1395 		entry = kmem_alloc(sizeof(struct mvgbe_jpool_entry), KM_SLEEP);
   1396 		if (entry == NULL) {
   1397 			aprint_error_dev(sc->sc_dev,
   1398 			    "no memory for jumbo buffer queue!\n");
   1399 			error = ENOBUFS;
   1400 			goto out;
   1401 		}
   1402 		entry->slot = i;
   1403 		if (i)
   1404 			LIST_INSERT_HEAD(&sc->sc_jfree_listhead, entry,
   1405 			    jpool_entries);
   1406 		else
   1407 			LIST_INSERT_HEAD(&sc->sc_jinuse_listhead, entry,
   1408 			    jpool_entries);
   1409 	}
   1410 out:
   1411 	if (error != 0) {
   1412 		switch (state) {
   1413 		case 4:
   1414 			bus_dmamap_unload(sc->sc_dmat,
   1415 			    sc->sc_cdata.mvgbe_rx_jumbo_map);
   1416 		case 3:
   1417 			bus_dmamap_destroy(sc->sc_dmat,
   1418 			    sc->sc_cdata.mvgbe_rx_jumbo_map);
   1419 		case 2:
   1420 			bus_dmamem_unmap(sc->sc_dmat, kva, MVGBE_JMEM);
   1421 		case 1:
   1422 			bus_dmamem_free(sc->sc_dmat, &seg, rseg);
   1423 			break;
   1424 		default:
   1425 			break;
   1426 		}
   1427 	}
   1428 
   1429 	return error;
   1430 }
   1431 
   1432 /*
   1433  * Allocate a jumbo buffer.
   1434  */
   1435 static void *
   1436 mvgbe_jalloc(struct mvgbe_softc *sc)
   1437 {
   1438 	struct mvgbe_jpool_entry *entry;
   1439 
   1440 	entry = LIST_FIRST(&sc->sc_jfree_listhead);
   1441 
   1442 	if (entry == NULL)
   1443 		return NULL;
   1444 
   1445 	LIST_REMOVE(entry, jpool_entries);
   1446 	LIST_INSERT_HEAD(&sc->sc_jinuse_listhead, entry, jpool_entries);
   1447 	return sc->sc_cdata.mvgbe_jslots[entry->slot];
   1448 }
   1449 
   1450 /*
   1451  * Release a jumbo buffer.
   1452  */
   1453 static void
   1454 mvgbe_jfree(struct mbuf *m, void *buf, size_t size, void *arg)
   1455 {
   1456 	struct mvgbe_jpool_entry *entry;
   1457 	struct mvgbe_softc *sc;
   1458 	int i, s;
   1459 
   1460 	/* Extract the softc struct pointer. */
   1461 	sc = (struct mvgbe_softc *)arg;
   1462 
   1463 	if (sc == NULL)
   1464 		panic("%s: can't find softc pointer!", __func__);
   1465 
   1466 	/* calculate the slot this buffer belongs to */
   1467 
   1468 	i = ((vaddr_t)buf - (vaddr_t)sc->sc_cdata.mvgbe_jumbo_buf) / MVGBE_JLEN;
   1469 
   1470 	if ((i < 0) || (i >= MVGBE_JSLOTS))
   1471 		panic("%s: asked to free buffer that we don't manage!",
   1472 		    __func__);
   1473 
   1474 	s = splvm();
   1475 	entry = LIST_FIRST(&sc->sc_jinuse_listhead);
   1476 	if (entry == NULL)
   1477 		panic("%s: buffer not in use!", __func__);
   1478 	entry->slot = i;
   1479 	LIST_REMOVE(entry, jpool_entries);
   1480 	LIST_INSERT_HEAD(&sc->sc_jfree_listhead, entry, jpool_entries);
   1481 
   1482 	if (__predict_true(m != NULL))
   1483 		pool_cache_put(mb_cache, m);
   1484 	splx(s);
   1485 }
   1486 
   1487 static int
   1488 mvgbe_encap(struct mvgbe_softc *sc, struct mbuf *m_head,
   1489 	      uint32_t *txidx)
   1490 {
   1491 	struct mvgbe_tx_desc *f = NULL;
   1492 	struct mvgbe_txmap_entry *entry;
   1493 	bus_dma_segment_t *txseg;
   1494 	bus_dmamap_t txmap;
   1495 	uint32_t first, current, last, cmdsts = 0;
   1496 	int m_csumflags, i;
   1497 
   1498 	DPRINTFN(3, ("mvgbe_encap\n"));
   1499 
   1500 	entry = SIMPLEQ_FIRST(&sc->sc_txmap_head);
   1501 	if (entry == NULL) {
   1502 		DPRINTFN(2, ("mvgbe_encap: no txmap available\n"));
   1503 		return ENOBUFS;
   1504 	}
   1505 	txmap = entry->dmamap;
   1506 
   1507 	first = current = last = *txidx;
   1508 
   1509 	/*
   1510 	 * Preserve m_pkthdr.csum_flags here since m_head might be
   1511 	 * updated by m_defrag()
   1512 	 */
   1513 	m_csumflags = m_head->m_pkthdr.csum_flags;
   1514 
   1515 	/*
   1516 	 * Start packing the mbufs in this chain into
   1517 	 * the fragment pointers. Stop when we run out
   1518 	 * of fragments or hit the end of the mbuf chain.
   1519 	 */
   1520 	if (bus_dmamap_load_mbuf(sc->sc_dmat, txmap, m_head, BUS_DMA_NOWAIT)) {
   1521 		DPRINTFN(1, ("mvgbe_encap: dmamap failed\n"));
   1522 		return ENOBUFS;
   1523 	}
   1524 
   1525 	/* Sync the DMA map. */
   1526 	bus_dmamap_sync(sc->sc_dmat, txmap, 0, txmap->dm_mapsize,
   1527 	    BUS_DMASYNC_PREWRITE);
   1528 
   1529 	if (sc->sc_cdata.mvgbe_tx_cnt + txmap->dm_nsegs >=
   1530 	    MVGBE_TX_RING_CNT) {
   1531 		DPRINTFN(2, ("mvgbe_encap: too few descriptors free\n"));
   1532 		bus_dmamap_unload(sc->sc_dmat, txmap);
   1533 		return ENOBUFS;
   1534 	}
   1535 
   1536 	txseg = txmap->dm_segs;
   1537 
   1538 	DPRINTFN(2, ("mvgbe_encap: dm_nsegs=%d\n", txmap->dm_nsegs));
   1539 
   1540 	for (i = 0; i < txmap->dm_nsegs; i++) {
   1541 		f = &sc->sc_rdata->mvgbe_tx_ring[current];
   1542 		f->bufptr = txseg[i].ds_addr;
   1543 		f->bytecnt = txseg[i].ds_len;
   1544 		f->cmdsts = MVGBE_BUFFER_OWNED_BY_DMA;
   1545 		last = current;
   1546 		current = (current + 1) % MVGBE_TX_RING_CNT;
   1547 	}
   1548 
   1549 	if (m_csumflags & M_CSUM_IPv4)
   1550 		cmdsts |= MVGBE_TX_GENERATE_IP_CHKSUM;
   1551 	if (m_csumflags & M_CSUM_TCPv4)
   1552 		cmdsts |=
   1553 		    MVGBE_TX_GENERATE_L4_CHKSUM | MVGBE_TX_L4_TYPE_TCP;
   1554 	if (m_csumflags & M_CSUM_UDPv4)
   1555 		cmdsts |=
   1556 		    MVGBE_TX_GENERATE_L4_CHKSUM | MVGBE_TX_L4_TYPE_UDP;
   1557 	if (m_csumflags & (M_CSUM_IPv4 | M_CSUM_TCPv4 | M_CSUM_UDPv4)) {
   1558 		const int iphdr_unitlen = sizeof(struct ip) / sizeof(uint32_t);
   1559 
   1560 		cmdsts |= MVGBE_TX_IP_NO_FRAG |
   1561 		    MVGBE_TX_IP_HEADER_LEN(iphdr_unitlen);	/* unit is 4B */
   1562 	}
   1563 	if (txmap->dm_nsegs == 1)
   1564 		f->cmdsts = cmdsts		|
   1565 		    MVGBE_BUFFER_OWNED_BY_DMA	|
   1566 		    MVGBE_TX_GENERATE_CRC	|
   1567 		    MVGBE_TX_ENABLE_INTERRUPT	|
   1568 		    MVGBE_TX_ZERO_PADDING	|
   1569 		    MVGBE_TX_FIRST_DESC		|
   1570 		    MVGBE_TX_LAST_DESC;
   1571 	else {
   1572 		f = &sc->sc_rdata->mvgbe_tx_ring[first];
   1573 		f->cmdsts = cmdsts		|
   1574 		    MVGBE_BUFFER_OWNED_BY_DMA	|
   1575 		    MVGBE_TX_GENERATE_CRC	|
   1576 		    MVGBE_TX_FIRST_DESC;
   1577 
   1578 		f = &sc->sc_rdata->mvgbe_tx_ring[last];
   1579 		f->cmdsts =
   1580 		    MVGBE_BUFFER_OWNED_BY_DMA	|
   1581 		    MVGBE_TX_ENABLE_INTERRUPT	|
   1582 		    MVGBE_TX_ZERO_PADDING	|
   1583 		    MVGBE_TX_LAST_DESC;
   1584 	}
   1585 
   1586 	sc->sc_cdata.mvgbe_tx_chain[last].mvgbe_mbuf = m_head;
   1587 	SIMPLEQ_REMOVE_HEAD(&sc->sc_txmap_head, link);
   1588 	sc->sc_cdata.mvgbe_tx_map[last] = entry;
   1589 
   1590 	/* Sync descriptors before handing to chip */
   1591 	MVGBE_CDTXSYNC(sc, *txidx, txmap->dm_nsegs,
   1592 	    BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
   1593 
   1594 	sc->sc_cdata.mvgbe_tx_cnt += i;
   1595 	*txidx = current;
   1596 
   1597 	DPRINTFN(3, ("mvgbe_encap: completed successfully\n"));
   1598 
   1599 	return 0;
   1600 }
   1601 
   1602 static void
   1603 mvgbe_rxeof(struct mvgbe_softc *sc)
   1604 {
   1605 	struct mvgbe_chain_data *cdata = &sc->sc_cdata;
   1606 	struct mvgbe_rx_desc *cur_rx;
   1607 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1608 	struct mbuf *m;
   1609 	bus_dmamap_t dmamap;
   1610 	uint32_t rxstat;
   1611 	int idx, cur, total_len;
   1612 
   1613 	idx = sc->sc_cdata.mvgbe_rx_prod;
   1614 
   1615 	DPRINTFN(3, ("mvgbe_rxeof %d\n", idx));
   1616 
   1617 	for (;;) {
   1618 		cur = idx;
   1619 
   1620 		/* Sync the descriptor */
   1621 		MVGBE_CDRXSYNC(sc, idx,
   1622 		    BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
   1623 
   1624 		cur_rx = &sc->sc_rdata->mvgbe_rx_ring[idx];
   1625 
   1626 		if ((cur_rx->cmdsts & MVGBE_BUFFER_OWNED_MASK) ==
   1627 		    MVGBE_BUFFER_OWNED_BY_DMA) {
   1628 			/* Invalidate the descriptor -- it's not ready yet */
   1629 			MVGBE_CDRXSYNC(sc, idx, BUS_DMASYNC_PREREAD);
   1630 			sc->sc_cdata.mvgbe_rx_prod = idx;
   1631 			break;
   1632 		}
   1633 #ifdef DIAGNOSTIC
   1634 		if ((cur_rx->cmdsts &
   1635 		    (MVGBE_RX_LAST_DESC | MVGBE_RX_FIRST_DESC)) !=
   1636 		    (MVGBE_RX_LAST_DESC | MVGBE_RX_FIRST_DESC))
   1637 			panic(
   1638 			    "mvgbe_rxeof: buffer size is smaller than packet");
   1639 #endif
   1640 
   1641 		dmamap = sc->sc_cdata.mvgbe_rx_jumbo_map;
   1642 
   1643 		bus_dmamap_sync(sc->sc_dmat, dmamap, 0, dmamap->dm_mapsize,
   1644 		    BUS_DMASYNC_POSTREAD);
   1645 
   1646 		m = cdata->mvgbe_rx_chain[idx].mvgbe_mbuf;
   1647 		cdata->mvgbe_rx_chain[idx].mvgbe_mbuf = NULL;
   1648 		total_len = cur_rx->bytecnt;
   1649 		rxstat = cur_rx->cmdsts;
   1650 
   1651 		cdata->mvgbe_rx_map[idx] = NULL;
   1652 
   1653 		idx = (idx + 1) % MVGBE_RX_RING_CNT;
   1654 
   1655 		if (rxstat & MVGBE_ERROR_SUMMARY) {
   1656 #if 0
   1657 			int err = rxstat & MVGBE_RX_ERROR_CODE_MASK;
   1658 
   1659 			if (err == MVGBE_RX_CRC_ERROR)
   1660 				ifp->if_ierrors++;
   1661 			if (err == MVGBE_RX_OVERRUN_ERROR)
   1662 				ifp->if_ierrors++;
   1663 			if (err == MVGBE_RX_MAX_FRAME_LEN_ERROR)
   1664 				ifp->if_ierrors++;
   1665 			if (err == MVGBE_RX_RESOURCE_ERROR)
   1666 				ifp->if_ierrors++;
   1667 #else
   1668 			ifp->if_ierrors++;
   1669 #endif
   1670 			mvgbe_newbuf(sc, cur, m, dmamap);
   1671 			continue;
   1672 		}
   1673 
   1674 		if (total_len > MVGBE_RX_CSUM_MIN_BYTE) {
   1675 			/* Check IP header checksum */
   1676 			if (rxstat & MVGBE_RX_IP_FRAME_TYPE) {
   1677 				m->m_pkthdr.csum_flags |= M_CSUM_IPv4;
   1678 				if (!(rxstat & MVGBE_RX_IP_HEADER_OK))
   1679 					m->m_pkthdr.csum_flags |=
   1680 					    M_CSUM_IPv4_BAD;
   1681 			}
   1682 			/* Check TCP/UDP checksum */
   1683 			if (rxstat & MVGBE_RX_L4_TYPE_TCP)
   1684 				m->m_pkthdr.csum_flags |= M_CSUM_TCPv4;
   1685 			else if (rxstat & MVGBE_RX_L4_TYPE_UDP)
   1686 				m->m_pkthdr.csum_flags |= M_CSUM_UDPv4;
   1687 			if (!(rxstat & MVGBE_RX_L4_CHECKSUM))
   1688 				m->m_pkthdr.csum_flags |= M_CSUM_TCP_UDP_BAD;
   1689 		}
   1690 
   1691 		/*
   1692 		 * Try to allocate a new jumbo buffer. If that
   1693 		 * fails, copy the packet to mbufs and put the
   1694 		 * jumbo buffer back in the ring so it can be
   1695 		 * re-used. If allocating mbufs fails, then we
   1696 		 * have to drop the packet.
   1697 		 */
   1698 		if (mvgbe_newbuf(sc, cur, NULL, dmamap) == ENOBUFS) {
   1699 			struct mbuf *m0;
   1700 
   1701 			m0 = m_devget(mtod(m, char *), total_len, 0, ifp, NULL);
   1702 			mvgbe_newbuf(sc, cur, m, dmamap);
   1703 			if (m0 == NULL) {
   1704 				aprint_error_ifnet(ifp,
   1705 				    "no receive buffers available --"
   1706 				    " packet dropped!\n");
   1707 				ifp->if_ierrors++;
   1708 				continue;
   1709 			}
   1710 			m = m0;
   1711 		} else {
   1712 			m->m_pkthdr.rcvif = ifp;
   1713 			m->m_pkthdr.len = m->m_len = total_len;
   1714 		}
   1715 
   1716 		/* Skip on first 2byte (HW header) */
   1717 		m_adj(m,  MVGBE_HWHEADER_SIZE);
   1718 		m->m_flags |= M_HASFCS;
   1719 
   1720 		ifp->if_ipackets++;
   1721 
   1722 		if (ifp->if_bpf)
   1723 			bpf_ops->bpf_mtap(ifp->if_bpf, m);
   1724 
   1725 		/* pass it on. */
   1726 		(*ifp->if_input)(ifp, m);
   1727 	}
   1728 }
   1729 
   1730 static void
   1731 mvgbe_txeof(struct mvgbe_softc *sc)
   1732 {
   1733 	struct mvgbe_chain_data *cdata = &sc->sc_cdata;
   1734 	struct mvgbe_tx_desc *cur_tx;
   1735 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
   1736 	struct mvgbe_txmap_entry *entry;
   1737 	int idx;
   1738 
   1739 	DPRINTFN(3, ("mvgbe_txeof\n"));
   1740 
   1741 	/*
   1742 	 * Go through our tx ring and free mbufs for those
   1743 	 * frames that have been sent.
   1744 	 */
   1745 	idx = cdata->mvgbe_tx_cons;
   1746 	while (idx != cdata->mvgbe_tx_prod) {
   1747 		MVGBE_CDTXSYNC(sc, idx, 1,
   1748 		    BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
   1749 
   1750 		cur_tx = &sc->sc_rdata->mvgbe_tx_ring[idx];
   1751 #ifdef MVGBE_DEBUG
   1752 		if (mvgbe_debug >= 3)
   1753 			mvgbe_dump_txdesc(cur_tx, idx);
   1754 #endif
   1755 		if ((cur_tx->cmdsts & MVGBE_BUFFER_OWNED_MASK) ==
   1756 		    MVGBE_BUFFER_OWNED_BY_DMA) {
   1757 			MVGBE_CDTXSYNC(sc, idx, 1, BUS_DMASYNC_PREREAD);
   1758 			break;
   1759 		}
   1760 		if (cur_tx->cmdsts & MVGBE_TX_LAST_DESC)
   1761 			ifp->if_opackets++;
   1762 		if (cur_tx->cmdsts & MVGBE_ERROR_SUMMARY) {
   1763 			int err = cur_tx->cmdsts & MVGBE_TX_ERROR_CODE_MASK;
   1764 
   1765 			if (err == MVGBE_TX_LATE_COLLISION_ERROR)
   1766 				ifp->if_collisions++;
   1767 			if (err == MVGBE_TX_UNDERRUN_ERROR)
   1768 				ifp->if_oerrors++;
   1769 			if (err == MVGBE_TX_EXCESSIVE_COLLISION_ERRO)
   1770 				ifp->if_collisions++;
   1771 		}
   1772 		if (cdata->mvgbe_tx_chain[idx].mvgbe_mbuf != NULL) {
   1773 			entry = cdata->mvgbe_tx_map[idx];
   1774 
   1775 			m_freem(cdata->mvgbe_tx_chain[idx].mvgbe_mbuf);
   1776 			cdata->mvgbe_tx_chain[idx].mvgbe_mbuf = NULL;
   1777 
   1778 			bus_dmamap_sync(sc->sc_dmat, entry->dmamap, 0,
   1779 			    entry->dmamap->dm_mapsize, BUS_DMASYNC_POSTWRITE);
   1780 
   1781 			bus_dmamap_unload(sc->sc_dmat, entry->dmamap);
   1782 			SIMPLEQ_INSERT_TAIL(&sc->sc_txmap_head, entry, link);
   1783 			cdata->mvgbe_tx_map[idx] = NULL;
   1784 		}
   1785 		cdata->mvgbe_tx_cnt--;
   1786 		idx = (idx + 1) % MVGBE_TX_RING_CNT;
   1787 	}
   1788 	if (cdata->mvgbe_tx_cnt == 0)
   1789 		ifp->if_timer = 0;
   1790 
   1791 	if (cdata->mvgbe_tx_cnt < MVGBE_TX_RING_CNT - 2)
   1792 		ifp->if_flags &= ~IFF_OACTIVE;
   1793 
   1794 	cdata->mvgbe_tx_cons = idx;
   1795 }
   1796 
   1797 static void
   1798 mvgbe_setmulti(struct mvgbe_softc *sc)
   1799 {
   1800 	struct ifnet *ifp= &sc->sc_ethercom.ec_if;
   1801 	uint32_t pxc, dfut, upm = 0, filter = 0;
   1802 	uint8_t ln = sc->sc_enaddr[5] & 0xf;		/* last nibble */
   1803 
   1804 	if (ifp->if_flags & IFF_PROMISC) {
   1805 		upm = MVGBE_PXC_UPM;
   1806 		filter =
   1807 		    MVGBE_DF(0, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS) |
   1808 		    MVGBE_DF(1, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS) |
   1809 		    MVGBE_DF(2, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS) |
   1810 		    MVGBE_DF(3, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS);
   1811 	} else if (ifp->if_flags & IFF_ALLMULTI) {
   1812 		filter =
   1813 		    MVGBE_DF(0, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS) |
   1814 		    MVGBE_DF(1, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS) |
   1815 		    MVGBE_DF(2, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS) |
   1816 		    MVGBE_DF(3, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS);
   1817 	}
   1818 
   1819 	/* Set Unicast Promiscuous mode */
   1820 	pxc = MVGBE_READ(sc, MVGBE_PXC);
   1821 	pxc &= ~MVGBE_PXC_UPM;
   1822 	pxc |= upm;
   1823 	MVGBE_WRITE(sc, MVGBE_PXC, pxc);
   1824 
   1825 	/* Set Destination Address Filter Multicast Tables */
   1826 	MVGBE_WRITE_FILTER(sc, MVGBE_DFSMT, filter, MVGBE_NDFSMT);
   1827 	MVGBE_WRITE_FILTER(sc, MVGBE_DFOMT, filter, MVGBE_NDFOMT);
   1828 
   1829 	if (ifp->if_flags & IFF_PROMISC) {
   1830 		/* necessary ? */
   1831 		MVGBE_WRITE_FILTER(sc, MVGBE_DFUT, filter, MVGBE_NDFUT);
   1832 		return;
   1833 	}
   1834 
   1835 	/* Set Destination Address Filter Unicast Table */
   1836 	dfut = MVGBE_READ_FILTER(sc, MVGBE_DFUT + (ln & 0x0c));
   1837 	dfut &= ~MVGBE_DF(ln & 0x03, MVGBE_DF_QUEUE_MASK);;
   1838 	dfut |= MVGBE_DF(ln & 0x03, MVGBE_DF_QUEUE(0) | MVGBE_DF_PASS);
   1839 	MVGBE_WRITE_FILTER(sc, MVGBE_DFUT + (ln & 0x0c), dfut, 1);
   1840 }
   1841 
   1842 #ifdef MVGBE_DEBUG
   1843 static void
   1844 mvgbe_dump_txdesc(struct mvgbe_tx_desc *desc, int idx)
   1845 {
   1846 #define DESC_PRINT(X)					\
   1847 	if (X)						\
   1848 		printf("txdesc[%d]." #X "=%#x\n", idx, X);
   1849 
   1850 #if BYTE_ORDER == BIG_ENDIAN
   1851        DESC_PRINT(desc->bytecnt);
   1852        DESC_PRINT(desc->l4ichk);
   1853        DESC_PRINT(desc->cmdsts);
   1854        DESC_PRINT(desc->nextdescptr);
   1855        DESC_PRINT(desc->bufptr);
   1856 #else	/* LITTLE_ENDIAN */
   1857        DESC_PRINT(desc->cmdsts);
   1858        DESC_PRINT(desc->l4ichk);
   1859        DESC_PRINT(desc->bytecnt);
   1860        DESC_PRINT(desc->bufptr);
   1861        DESC_PRINT(desc->nextdescptr);
   1862 #endif
   1863 #undef DESC_PRINT
   1864        printf("txdesc[%d].desc->returninfo=%#lx\n", idx, desc->returninfo);
   1865        printf("txdesc[%d].desc->alignbufptr=%p\n", idx, desc->alignbufptr);
   1866 }
   1867 #endif
   1868