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