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