1 /* $NetBSD: if_mec.c,v 1.49 2012/07/22 14:32:53 matt Exp $ */ 2 3 /*- 4 * Copyright (c) 2004, 2008 Izumi Tsutsui. 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 WARRANTIES 17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25 */ 26 27 /* 28 * Copyright (c) 2003 Christopher SEKIYA 29 * All rights reserved. 30 * 31 * Redistribution and use in source and binary forms, with or without 32 * modification, are permitted provided that the following conditions 33 * are met: 34 * 1. Redistributions of source code must retain the above copyright 35 * notice, this list of conditions and the following disclaimer. 36 * 2. Redistributions in binary form must reproduce the above copyright 37 * notice, this list of conditions and the following disclaimer in the 38 * documentation and/or other materials provided with the distribution. 39 * 3. All advertising materials mentioning features or use of this software 40 * must display the following acknowledgement: 41 * This product includes software developed for the 42 * NetBSD Project. See http://www.NetBSD.org/ for 43 * information about NetBSD. 44 * 4. The name of the author may not be used to endorse or promote products 45 * derived from this software without specific prior written permission. 46 * 47 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 48 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 49 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 50 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 51 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 52 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 53 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 54 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 55 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 56 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 57 */ 58 59 /* 60 * MACE MAC-110 Ethernet driver 61 */ 62 63 #include <sys/cdefs.h> 64 __KERNEL_RCSID(0, "$NetBSD: if_mec.c,v 1.49 2012/07/22 14:32:53 matt Exp $"); 65 66 #include "opt_ddb.h" 67 68 #include <sys/param.h> 69 #include <sys/systm.h> 70 #include <sys/device.h> 71 #include <sys/callout.h> 72 #include <sys/mbuf.h> 73 #include <sys/malloc.h> 74 #include <sys/kernel.h> 75 #include <sys/socket.h> 76 #include <sys/ioctl.h> 77 #include <sys/errno.h> 78 79 #include <sys/rnd.h> 80 81 #include <net/if.h> 82 #include <net/if_dl.h> 83 #include <net/if_media.h> 84 #include <net/if_ether.h> 85 86 #include <netinet/in.h> 87 #include <netinet/in_systm.h> 88 #include <netinet/ip.h> 89 #include <netinet/tcp.h> 90 #include <netinet/udp.h> 91 92 #include <net/bpf.h> 93 94 #include <sys/bus.h> 95 #include <machine/intr.h> 96 #include <machine/machtype.h> 97 98 #include <dev/mii/mii.h> 99 #include <dev/mii/miivar.h> 100 101 #include <sgimips/mace/macevar.h> 102 #include <sgimips/mace/if_mecreg.h> 103 104 #include <dev/arcbios/arcbios.h> 105 #include <dev/arcbios/arcbiosvar.h> 106 107 /* #define MEC_DEBUG */ 108 109 #ifdef MEC_DEBUG 110 #define MEC_DEBUG_RESET 0x01 111 #define MEC_DEBUG_START 0x02 112 #define MEC_DEBUG_STOP 0x04 113 #define MEC_DEBUG_INTR 0x08 114 #define MEC_DEBUG_RXINTR 0x10 115 #define MEC_DEBUG_TXINTR 0x20 116 #define MEC_DEBUG_TXSEGS 0x40 117 uint32_t mec_debug = 0; 118 #define DPRINTF(x, y) if (mec_debug & (x)) printf y 119 #else 120 #define DPRINTF(x, y) /* nothing */ 121 #endif 122 123 /* #define MEC_EVENT_COUNTERS */ 124 125 #ifdef MEC_EVENT_COUNTERS 126 #define MEC_EVCNT_INCR(ev) (ev)->ev_count++ 127 #else 128 #define MEC_EVCNT_INCR(ev) do {} while (/* CONSTCOND */ 0) 129 #endif 130 131 /* 132 * Transmit descriptor list size 133 */ 134 #define MEC_NTXDESC 64 135 #define MEC_NTXDESC_MASK (MEC_NTXDESC - 1) 136 #define MEC_NEXTTX(x) (((x) + 1) & MEC_NTXDESC_MASK) 137 #define MEC_NTXDESC_RSVD 4 138 #define MEC_NTXDESC_INTR 8 139 140 /* 141 * software state for TX 142 */ 143 struct mec_txsoft { 144 struct mbuf *txs_mbuf; /* head of our mbuf chain */ 145 bus_dmamap_t txs_dmamap; /* our DMA map */ 146 uint32_t txs_flags; 147 #define MEC_TXS_BUFLEN_MASK 0x0000007f /* data len in txd_buf */ 148 #define MEC_TXS_TXDPTR 0x00000080 /* concat txd_ptr is used */ 149 }; 150 151 /* 152 * Transmit buffer descriptor 153 */ 154 #define MEC_TXDESCSIZE 128 155 #define MEC_NTXPTR 3 156 #define MEC_TXD_BUFOFFSET sizeof(uint64_t) 157 #define MEC_TXD_BUFOFFSET1 \ 158 (sizeof(uint64_t) + sizeof(uint64_t) * MEC_NTXPTR) 159 #define MEC_TXD_BUFSIZE (MEC_TXDESCSIZE - MEC_TXD_BUFOFFSET) 160 #define MEC_TXD_BUFSIZE1 (MEC_TXDESCSIZE - MEC_TXD_BUFOFFSET1) 161 #define MEC_TXD_BUFSTART(len) (MEC_TXD_BUFSIZE - (len)) 162 #define MEC_TXD_ALIGN 8 163 #define MEC_TXD_ALIGNMASK (MEC_TXD_ALIGN - 1) 164 #define MEC_TXD_ROUNDUP(addr) \ 165 (((addr) + MEC_TXD_ALIGNMASK) & ~(uint64_t)MEC_TXD_ALIGNMASK) 166 #define MEC_NTXSEG 16 167 168 struct mec_txdesc { 169 volatile uint64_t txd_cmd; 170 #define MEC_TXCMD_DATALEN 0x000000000000ffff /* data length */ 171 #define MEC_TXCMD_BUFSTART 0x00000000007f0000 /* start byte offset */ 172 #define TXCMD_BUFSTART(x) ((x) << 16) 173 #define MEC_TXCMD_TERMDMA 0x0000000000800000 /* stop DMA on abort */ 174 #define MEC_TXCMD_TXINT 0x0000000001000000 /* INT after TX done */ 175 #define MEC_TXCMD_PTR1 0x0000000002000000 /* valid 1st txd_ptr */ 176 #define MEC_TXCMD_PTR2 0x0000000004000000 /* valid 2nd txd_ptr */ 177 #define MEC_TXCMD_PTR3 0x0000000008000000 /* valid 3rd txd_ptr */ 178 #define MEC_TXCMD_UNUSED 0xfffffffff0000000ULL /* should be zero */ 179 180 #define txd_stat txd_cmd 181 #define MEC_TXSTAT_LEN 0x000000000000ffff /* TX length */ 182 #define MEC_TXSTAT_COLCNT 0x00000000000f0000 /* collision count */ 183 #define MEC_TXSTAT_COLCNT_SHIFT 16 184 #define MEC_TXSTAT_LATE_COL 0x0000000000100000 /* late collision */ 185 #define MEC_TXSTAT_CRCERROR 0x0000000000200000 /* */ 186 #define MEC_TXSTAT_DEFERRED 0x0000000000400000 /* */ 187 #define MEC_TXSTAT_SUCCESS 0x0000000000800000 /* TX complete */ 188 #define MEC_TXSTAT_TOOBIG 0x0000000001000000 /* */ 189 #define MEC_TXSTAT_UNDERRUN 0x0000000002000000 /* */ 190 #define MEC_TXSTAT_COLLISIONS 0x0000000004000000 /* */ 191 #define MEC_TXSTAT_EXDEFERRAL 0x0000000008000000 /* */ 192 #define MEC_TXSTAT_COLLIDED 0x0000000010000000 /* */ 193 #define MEC_TXSTAT_UNUSED 0x7fffffffe0000000ULL /* should be zero */ 194 #define MEC_TXSTAT_SENT 0x8000000000000000ULL /* packet sent */ 195 196 union { 197 uint64_t txptr[MEC_NTXPTR]; 198 #define MEC_TXPTR_UNUSED2 0x0000000000000007 /* should be zero */ 199 #define MEC_TXPTR_DMAADDR 0x00000000fffffff8 /* TX DMA address */ 200 #define MEC_TXPTR_LEN 0x0000ffff00000000ULL /* buffer length */ 201 #define TXPTR_LEN(x) ((uint64_t)(x) << 32) 202 #define MEC_TXPTR_UNUSED1 0xffff000000000000ULL /* should be zero */ 203 204 uint8_t txbuf[MEC_TXD_BUFSIZE]; 205 } txd_data; 206 #define txd_ptr txd_data.txptr 207 #define txd_buf txd_data.txbuf 208 }; 209 210 /* 211 * Receive buffer size 212 */ 213 #define MEC_NRXDESC 16 214 #define MEC_NRXDESC_MASK (MEC_NRXDESC - 1) 215 #define MEC_NEXTRX(x) (((x) + 1) & MEC_NRXDESC_MASK) 216 217 /* 218 * Receive buffer description 219 */ 220 #define MEC_RXDESCSIZE 4096 /* umm, should be 4kbyte aligned */ 221 #define MEC_RXD_NRXPAD 3 222 #define MEC_RXD_DMAOFFSET (1 + MEC_RXD_NRXPAD) 223 #define MEC_RXD_BUFOFFSET (MEC_RXD_DMAOFFSET * sizeof(uint64_t)) 224 #define MEC_RXD_BUFSIZE (MEC_RXDESCSIZE - MEC_RXD_BUFOFFSET) 225 226 struct mec_rxdesc { 227 volatile uint64_t rxd_stat; 228 #define MEC_RXSTAT_LEN 0x000000000000ffff /* data length */ 229 #define MEC_RXSTAT_VIOLATION 0x0000000000010000 /* code violation (?) */ 230 #define MEC_RXSTAT_UNUSED2 0x0000000000020000 /* unknown (?) */ 231 #define MEC_RXSTAT_CRCERROR 0x0000000000040000 /* CRC error */ 232 #define MEC_RXSTAT_MULTICAST 0x0000000000080000 /* multicast packet */ 233 #define MEC_RXSTAT_BROADCAST 0x0000000000100000 /* broadcast packet */ 234 #define MEC_RXSTAT_INVALID 0x0000000000200000 /* invalid preamble */ 235 #define MEC_RXSTAT_LONGEVENT 0x0000000000400000 /* long packet */ 236 #define MEC_RXSTAT_BADPACKET 0x0000000000800000 /* bad packet */ 237 #define MEC_RXSTAT_CAREVENT 0x0000000001000000 /* carrier event */ 238 #define MEC_RXSTAT_MATCHMCAST 0x0000000002000000 /* match multicast */ 239 #define MEC_RXSTAT_MATCHMAC 0x0000000004000000 /* match MAC */ 240 #define MEC_RXSTAT_SEQNUM 0x00000000f8000000 /* sequence number */ 241 #define MEC_RXSTAT_CKSUM 0x0000ffff00000000ULL /* IP checksum */ 242 #define RXSTAT_CKSUM(x) (((uint64_t)(x) & MEC_RXSTAT_CKSUM) >> 32) 243 #define MEC_RXSTAT_UNUSED1 0x7fff000000000000ULL /* should be zero */ 244 #define MEC_RXSTAT_RECEIVED 0x8000000000000000ULL /* set to 1 on RX */ 245 uint64_t rxd_pad1[MEC_RXD_NRXPAD]; 246 uint8_t rxd_buf[MEC_RXD_BUFSIZE]; 247 }; 248 249 /* 250 * control structures for DMA ops 251 */ 252 struct mec_control_data { 253 /* 254 * TX descriptors and buffers 255 */ 256 struct mec_txdesc mcd_txdesc[MEC_NTXDESC]; 257 258 /* 259 * RX descriptors and buffers 260 */ 261 struct mec_rxdesc mcd_rxdesc[MEC_NRXDESC]; 262 }; 263 264 /* 265 * It _seems_ there are some restrictions on descriptor address: 266 * 267 * - Base address of txdescs should be 8kbyte aligned 268 * - Each txdesc should be 128byte aligned 269 * - Each rxdesc should be 4kbyte aligned 270 * 271 * So we should specify 8k align to allocalte txdescs. 272 * In this case, sizeof(struct mec_txdesc) * MEC_NTXDESC is 8192 273 * so rxdescs are also allocated at 4kbyte aligned. 274 */ 275 #define MEC_CONTROL_DATA_ALIGN (8 * 1024) 276 277 #define MEC_CDOFF(x) offsetof(struct mec_control_data, x) 278 #define MEC_CDTXOFF(x) MEC_CDOFF(mcd_txdesc[(x)]) 279 #define MEC_CDRXOFF(x) MEC_CDOFF(mcd_rxdesc[(x)]) 280 281 /* 282 * software state per device 283 */ 284 struct mec_softc { 285 device_t sc_dev; /* generic device structures */ 286 287 bus_space_tag_t sc_st; /* bus_space tag */ 288 bus_space_handle_t sc_sh; /* bus_space handle */ 289 bus_dma_tag_t sc_dmat; /* bus_dma tag */ 290 291 struct ethercom sc_ethercom; /* Ethernet common part */ 292 293 struct mii_data sc_mii; /* MII/media information */ 294 int sc_phyaddr; /* MII address */ 295 struct callout sc_tick_ch; /* tick callout */ 296 297 uint8_t sc_enaddr[ETHER_ADDR_LEN]; /* MAC address */ 298 299 bus_dmamap_t sc_cddmamap; /* bus_dma map for control data */ 300 #define sc_cddma sc_cddmamap->dm_segs[0].ds_addr 301 302 /* pointer to allocated control data */ 303 struct mec_control_data *sc_control_data; 304 #define sc_txdesc sc_control_data->mcd_txdesc 305 #define sc_rxdesc sc_control_data->mcd_rxdesc 306 307 /* software state for TX descs */ 308 struct mec_txsoft sc_txsoft[MEC_NTXDESC]; 309 310 int sc_txpending; /* number of TX requests pending */ 311 int sc_txdirty; /* first dirty TX descriptor */ 312 int sc_txlast; /* last used TX descriptor */ 313 314 int sc_rxptr; /* next ready RX buffer */ 315 316 krndsource_t sc_rnd_source; /* random source */ 317 #ifdef MEC_EVENT_COUNTERS 318 struct evcnt sc_ev_txpkts; /* TX packets queued total */ 319 struct evcnt sc_ev_txdpad; /* TX packets padded in txdesc buf */ 320 struct evcnt sc_ev_txdbuf; /* TX packets copied to txdesc buf */ 321 struct evcnt sc_ev_txptr1; /* TX packets using concat ptr1 */ 322 struct evcnt sc_ev_txptr1a; /* TX packets w/ptr1 ~160bytes */ 323 struct evcnt sc_ev_txptr1b; /* TX packets w/ptr1 ~256bytes */ 324 struct evcnt sc_ev_txptr1c; /* TX packets w/ptr1 ~512bytes */ 325 struct evcnt sc_ev_txptr1d; /* TX packets w/ptr1 ~1024bytes */ 326 struct evcnt sc_ev_txptr1e; /* TX packets w/ptr1 >1024bytes */ 327 struct evcnt sc_ev_txptr2; /* TX packets using concat ptr1,2 */ 328 struct evcnt sc_ev_txptr2a; /* TX packets w/ptr2 ~160bytes */ 329 struct evcnt sc_ev_txptr2b; /* TX packets w/ptr2 ~256bytes */ 330 struct evcnt sc_ev_txptr2c; /* TX packets w/ptr2 ~512bytes */ 331 struct evcnt sc_ev_txptr2d; /* TX packets w/ptr2 ~1024bytes */ 332 struct evcnt sc_ev_txptr2e; /* TX packets w/ptr2 >1024bytes */ 333 struct evcnt sc_ev_txptr3; /* TX packets using concat ptr1,2,3 */ 334 struct evcnt sc_ev_txptr3a; /* TX packets w/ptr3 ~160bytes */ 335 struct evcnt sc_ev_txptr3b; /* TX packets w/ptr3 ~256bytes */ 336 struct evcnt sc_ev_txptr3c; /* TX packets w/ptr3 ~512bytes */ 337 struct evcnt sc_ev_txptr3d; /* TX packets w/ptr3 ~1024bytes */ 338 struct evcnt sc_ev_txptr3e; /* TX packets w/ptr3 >1024bytes */ 339 struct evcnt sc_ev_txmbuf; /* TX packets copied to new mbufs */ 340 struct evcnt sc_ev_txmbufa; /* TX packets w/mbuf ~160bytes */ 341 struct evcnt sc_ev_txmbufb; /* TX packets w/mbuf ~256bytes */ 342 struct evcnt sc_ev_txmbufc; /* TX packets w/mbuf ~512bytes */ 343 struct evcnt sc_ev_txmbufd; /* TX packets w/mbuf ~1024bytes */ 344 struct evcnt sc_ev_txmbufe; /* TX packets w/mbuf >1024bytes */ 345 struct evcnt sc_ev_txptrs; /* TX packets using ptrs total */ 346 struct evcnt sc_ev_txptrc0; /* TX packets w/ptrs no hdr chain */ 347 struct evcnt sc_ev_txptrc1; /* TX packets w/ptrs 1 hdr chain */ 348 struct evcnt sc_ev_txptrc2; /* TX packets w/ptrs 2 hdr chains */ 349 struct evcnt sc_ev_txptrc3; /* TX packets w/ptrs 3 hdr chains */ 350 struct evcnt sc_ev_txptrc4; /* TX packets w/ptrs 4 hdr chains */ 351 struct evcnt sc_ev_txptrc5; /* TX packets w/ptrs 5 hdr chains */ 352 struct evcnt sc_ev_txptrc6; /* TX packets w/ptrs >5 hdr chains */ 353 struct evcnt sc_ev_txptrh0; /* TX packets w/ptrs ~8bytes hdr */ 354 struct evcnt sc_ev_txptrh1; /* TX packets w/ptrs ~16bytes hdr */ 355 struct evcnt sc_ev_txptrh2; /* TX packets w/ptrs ~32bytes hdr */ 356 struct evcnt sc_ev_txptrh3; /* TX packets w/ptrs ~64bytes hdr */ 357 struct evcnt sc_ev_txptrh4; /* TX packets w/ptrs ~80bytes hdr */ 358 struct evcnt sc_ev_txptrh5; /* TX packets w/ptrs ~96bytes hdr */ 359 struct evcnt sc_ev_txdstall; /* TX stalled due to no txdesc */ 360 struct evcnt sc_ev_txempty; /* TX empty interrupts */ 361 struct evcnt sc_ev_txsent; /* TX sent interrupts */ 362 #endif 363 }; 364 365 #define MEC_CDTXADDR(sc, x) ((sc)->sc_cddma + MEC_CDTXOFF(x)) 366 #define MEC_CDRXADDR(sc, x) ((sc)->sc_cddma + MEC_CDRXOFF(x)) 367 368 #define MEC_TXDESCSYNC(sc, x, ops) \ 369 bus_dmamap_sync((sc)->sc_dmat, (sc)->sc_cddmamap, \ 370 MEC_CDTXOFF(x), MEC_TXDESCSIZE, (ops)) 371 #define MEC_TXCMDSYNC(sc, x, ops) \ 372 bus_dmamap_sync((sc)->sc_dmat, (sc)->sc_cddmamap, \ 373 MEC_CDTXOFF(x), sizeof(uint64_t), (ops)) 374 375 #define MEC_RXSTATSYNC(sc, x, ops) \ 376 bus_dmamap_sync((sc)->sc_dmat, (sc)->sc_cddmamap, \ 377 MEC_CDRXOFF(x), sizeof(uint64_t), (ops)) 378 #define MEC_RXBUFSYNC(sc, x, len, ops) \ 379 bus_dmamap_sync((sc)->sc_dmat, (sc)->sc_cddmamap, \ 380 MEC_CDRXOFF(x) + MEC_RXD_BUFOFFSET, \ 381 MEC_ETHER_ALIGN + (len), (ops)) 382 383 /* XXX these values should be moved to <net/if_ether.h> ? */ 384 #define ETHER_PAD_LEN (ETHER_MIN_LEN - ETHER_CRC_LEN) 385 #define MEC_ETHER_ALIGN 2 386 387 static int mec_match(device_t, cfdata_t, void *); 388 static void mec_attach(device_t, device_t, void *); 389 390 static int mec_mii_readreg(device_t, int, int); 391 static void mec_mii_writereg(device_t, int, int, int); 392 static int mec_mii_wait(struct mec_softc *); 393 static void mec_statchg(struct ifnet *); 394 395 static int mec_init(struct ifnet * ifp); 396 static void mec_start(struct ifnet *); 397 static void mec_watchdog(struct ifnet *); 398 static void mec_tick(void *); 399 static int mec_ioctl(struct ifnet *, u_long, void *); 400 static void mec_reset(struct mec_softc *); 401 static void mec_setfilter(struct mec_softc *); 402 static int mec_intr(void *arg); 403 static void mec_stop(struct ifnet *, int); 404 static void mec_rxintr(struct mec_softc *); 405 static void mec_rxcsum(struct mec_softc *, struct mbuf *, uint16_t, 406 uint32_t); 407 static void mec_txintr(struct mec_softc *, uint32_t); 408 static bool mec_shutdown(device_t, int); 409 410 CFATTACH_DECL_NEW(mec, sizeof(struct mec_softc), 411 mec_match, mec_attach, NULL, NULL); 412 413 static int mec_matched = 0; 414 415 static int 416 mec_match(device_t parent, cfdata_t cf, void *aux) 417 { 418 419 /* allow only one device */ 420 if (mec_matched) 421 return 0; 422 423 mec_matched = 1; 424 return 1; 425 } 426 427 static void 428 mec_attach(device_t parent, device_t self, void *aux) 429 { 430 struct mec_softc *sc = device_private(self); 431 struct mace_attach_args *maa = aux; 432 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 433 uint64_t address, command; 434 const char *macaddr; 435 struct mii_softc *child; 436 bus_dma_segment_t seg; 437 int i, err, rseg; 438 bool mac_is_fake; 439 440 sc->sc_dev = self; 441 sc->sc_st = maa->maa_st; 442 if (bus_space_subregion(sc->sc_st, maa->maa_sh, 443 maa->maa_offset, 0, &sc->sc_sh) != 0) { 444 aprint_error(": can't map i/o space\n"); 445 return; 446 } 447 448 /* set up DMA structures */ 449 sc->sc_dmat = maa->maa_dmat; 450 451 /* 452 * Allocate the control data structures, and create and load the 453 * DMA map for it. 454 */ 455 if ((err = bus_dmamem_alloc(sc->sc_dmat, 456 sizeof(struct mec_control_data), MEC_CONTROL_DATA_ALIGN, 0, 457 &seg, 1, &rseg, BUS_DMA_NOWAIT)) != 0) { 458 aprint_error(": unable to allocate control data, error = %d\n", 459 err); 460 goto fail_0; 461 } 462 /* 463 * XXX needs re-think... 464 * control data structures contain whole RX data buffer, so 465 * BUS_DMA_COHERENT (which disables cache) may cause some performance 466 * issue on copying data from the RX buffer to mbuf on normal memory, 467 * though we have to make sure all bus_dmamap_sync(9) ops are called 468 * properly in that case. 469 */ 470 if ((err = bus_dmamem_map(sc->sc_dmat, &seg, rseg, 471 sizeof(struct mec_control_data), 472 (void **)&sc->sc_control_data, /*BUS_DMA_COHERENT*/ 0)) != 0) { 473 aprint_error(": unable to map control data, error = %d\n", err); 474 goto fail_1; 475 } 476 memset(sc->sc_control_data, 0, sizeof(struct mec_control_data)); 477 478 if ((err = bus_dmamap_create(sc->sc_dmat, 479 sizeof(struct mec_control_data), 1, 480 sizeof(struct mec_control_data), 0, 0, &sc->sc_cddmamap)) != 0) { 481 aprint_error(": unable to create control data DMA map," 482 " error = %d\n", err); 483 goto fail_2; 484 } 485 if ((err = bus_dmamap_load(sc->sc_dmat, sc->sc_cddmamap, 486 sc->sc_control_data, sizeof(struct mec_control_data), NULL, 487 BUS_DMA_NOWAIT)) != 0) { 488 aprint_error(": unable to load control data DMA map," 489 " error = %d\n", err); 490 goto fail_3; 491 } 492 493 /* create TX buffer DMA maps */ 494 for (i = 0; i < MEC_NTXDESC; i++) { 495 if ((err = bus_dmamap_create(sc->sc_dmat, 496 MCLBYTES, MEC_NTXSEG, MCLBYTES, PAGE_SIZE, 0, 497 &sc->sc_txsoft[i].txs_dmamap)) != 0) { 498 aprint_error(": unable to create tx DMA map %d," 499 " error = %d\n", i, err); 500 goto fail_4; 501 } 502 } 503 504 callout_init(&sc->sc_tick_ch, 0); 505 506 /* get Ethernet address from ARCBIOS */ 507 if ((macaddr = arcbios_GetEnvironmentVariable("eaddr")) == NULL) { 508 aprint_error(": unable to get MAC address!\n"); 509 goto fail_4; 510 } 511 /* 512 * On some machines the DS2502 chip storing the serial number/ 513 * mac address is on the pci riser board - if this board is 514 * missing, ARCBIOS will not know a good ethernet address (but 515 * otherwise the machine will work fine). 516 */ 517 mac_is_fake = false; 518 if (strcmp(macaddr, "ff:ff:ff:ff:ff:ff") == 0) { 519 uint32_t ui = 0; 520 const char * netaddr = 521 arcbios_GetEnvironmentVariable("netaddr"); 522 523 /* 524 * Create a MAC address by abusing the "netaddr" env var 525 */ 526 sc->sc_enaddr[0] = 0xf2; 527 sc->sc_enaddr[1] = 0x0b; 528 sc->sc_enaddr[2] = 0xa4; 529 if (netaddr) { 530 mac_is_fake = true; 531 while (*netaddr) { 532 int v = 0; 533 while (*netaddr && *netaddr != '.') { 534 if (*netaddr >= '0' && *netaddr <= '9') 535 v = v*10 + (*netaddr - '0'); 536 netaddr++; 537 } 538 ui <<= 8; 539 ui |= v; 540 if (*netaddr == '.') 541 netaddr++; 542 } 543 } 544 memcpy(sc->sc_enaddr+3, ((uint8_t *)&ui)+1, 3); 545 } 546 if (!mac_is_fake) 547 ether_aton_r(sc->sc_enaddr, sizeof(sc->sc_enaddr), macaddr); 548 549 /* set the Ethernet address */ 550 address = 0; 551 for (i = 0; i < ETHER_ADDR_LEN; i++) { 552 address = address << 8; 553 address |= sc->sc_enaddr[i]; 554 } 555 bus_space_write_8(sc->sc_st, sc->sc_sh, MEC_STATION, address); 556 557 /* reset device */ 558 mec_reset(sc); 559 560 command = bus_space_read_8(sc->sc_st, sc->sc_sh, MEC_MAC_CONTROL); 561 562 aprint_normal(": MAC-110 Ethernet, rev %u\n", 563 (u_int)((command & MEC_MAC_REVISION) >> MEC_MAC_REVISION_SHIFT)); 564 565 if (mac_is_fake) 566 aprint_normal_dev(self, 567 "could not get ethernet address from firmware" 568 " - generated one from the \"netaddr\" environment" 569 " variable\n"); 570 aprint_normal_dev(self, "Ethernet address %s\n", 571 ether_sprintf(sc->sc_enaddr)); 572 573 /* Done, now attach everything */ 574 575 sc->sc_mii.mii_ifp = ifp; 576 sc->sc_mii.mii_readreg = mec_mii_readreg; 577 sc->sc_mii.mii_writereg = mec_mii_writereg; 578 sc->sc_mii.mii_statchg = mec_statchg; 579 580 /* Set up PHY properties */ 581 sc->sc_ethercom.ec_mii = &sc->sc_mii; 582 ifmedia_init(&sc->sc_mii.mii_media, 0, ether_mediachange, 583 ether_mediastatus); 584 mii_attach(self, &sc->sc_mii, 0xffffffff, MII_PHY_ANY, 585 MII_OFFSET_ANY, 0); 586 587 child = LIST_FIRST(&sc->sc_mii.mii_phys); 588 if (child == NULL) { 589 /* No PHY attached */ 590 ifmedia_add(&sc->sc_mii.mii_media, IFM_ETHER | IFM_MANUAL, 591 0, NULL); 592 ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER | IFM_MANUAL); 593 } else { 594 ifmedia_set(&sc->sc_mii.mii_media, IFM_ETHER | IFM_AUTO); 595 sc->sc_phyaddr = child->mii_phy; 596 } 597 598 strcpy(ifp->if_xname, device_xname(self)); 599 ifp->if_softc = sc; 600 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST; 601 ifp->if_ioctl = mec_ioctl; 602 ifp->if_start = mec_start; 603 ifp->if_watchdog = mec_watchdog; 604 ifp->if_init = mec_init; 605 ifp->if_stop = mec_stop; 606 ifp->if_mtu = ETHERMTU; 607 IFQ_SET_READY(&ifp->if_snd); 608 609 /* mec has dumb RX cksum support */ 610 ifp->if_capabilities = IFCAP_CSUM_TCPv4_Rx | IFCAP_CSUM_UDPv4_Rx; 611 612 /* We can support 802.1Q VLAN-sized frames. */ 613 sc->sc_ethercom.ec_capabilities |= ETHERCAP_VLAN_MTU; 614 615 /* attach the interface */ 616 if_attach(ifp); 617 ether_ifattach(ifp, sc->sc_enaddr); 618 619 /* establish interrupt */ 620 cpu_intr_establish(maa->maa_intr, maa->maa_intrmask, mec_intr, sc); 621 622 rnd_attach_source(&sc->sc_rnd_source, device_xname(self), 623 RND_TYPE_NET, 0); 624 625 #ifdef MEC_EVENT_COUNTERS 626 evcnt_attach_dynamic(&sc->sc_ev_txpkts , EVCNT_TYPE_MISC, 627 NULL, device_xname(self), "TX pkts queued total"); 628 evcnt_attach_dynamic(&sc->sc_ev_txdpad , EVCNT_TYPE_MISC, 629 NULL, device_xname(self), "TX pkts padded in txdesc buf"); 630 evcnt_attach_dynamic(&sc->sc_ev_txdbuf , EVCNT_TYPE_MISC, 631 NULL, device_xname(self), "TX pkts copied to txdesc buf"); 632 evcnt_attach_dynamic(&sc->sc_ev_txptr1 , EVCNT_TYPE_MISC, 633 NULL, device_xname(self), "TX pkts using concat ptr1"); 634 evcnt_attach_dynamic(&sc->sc_ev_txptr1a , EVCNT_TYPE_MISC, 635 NULL, device_xname(self), "TX pkts w/ptr1 ~160bytes"); 636 evcnt_attach_dynamic(&sc->sc_ev_txptr1b , EVCNT_TYPE_MISC, 637 NULL, device_xname(self), "TX pkts w/ptr1 ~256bytes"); 638 evcnt_attach_dynamic(&sc->sc_ev_txptr1c , EVCNT_TYPE_MISC, 639 NULL, device_xname(self), "TX pkts w/ptr1 ~512bytes"); 640 evcnt_attach_dynamic(&sc->sc_ev_txptr1d , EVCNT_TYPE_MISC, 641 NULL, device_xname(self), "TX pkts w/ptr1 ~1024bytes"); 642 evcnt_attach_dynamic(&sc->sc_ev_txptr1e , EVCNT_TYPE_MISC, 643 NULL, device_xname(self), "TX pkts w/ptr1 >1024bytes"); 644 evcnt_attach_dynamic(&sc->sc_ev_txptr2 , EVCNT_TYPE_MISC, 645 NULL, device_xname(self), "TX pkts using concat ptr1,2"); 646 evcnt_attach_dynamic(&sc->sc_ev_txptr2a , EVCNT_TYPE_MISC, 647 NULL, device_xname(self), "TX pkts w/ptr2 ~160bytes"); 648 evcnt_attach_dynamic(&sc->sc_ev_txptr2b , EVCNT_TYPE_MISC, 649 NULL, device_xname(self), "TX pkts w/ptr2 ~256bytes"); 650 evcnt_attach_dynamic(&sc->sc_ev_txptr2c , EVCNT_TYPE_MISC, 651 NULL, device_xname(self), "TX pkts w/ptr2 ~512bytes"); 652 evcnt_attach_dynamic(&sc->sc_ev_txptr2d , EVCNT_TYPE_MISC, 653 NULL, device_xname(self), "TX pkts w/ptr2 ~1024bytes"); 654 evcnt_attach_dynamic(&sc->sc_ev_txptr2e , EVCNT_TYPE_MISC, 655 NULL, device_xname(self), "TX pkts w/ptr2 >1024bytes"); 656 evcnt_attach_dynamic(&sc->sc_ev_txptr3 , EVCNT_TYPE_MISC, 657 NULL, device_xname(self), "TX pkts using concat ptr1,2,3"); 658 evcnt_attach_dynamic(&sc->sc_ev_txptr3a , EVCNT_TYPE_MISC, 659 NULL, device_xname(self), "TX pkts w/ptr3 ~160bytes"); 660 evcnt_attach_dynamic(&sc->sc_ev_txptr3b , EVCNT_TYPE_MISC, 661 NULL, device_xname(self), "TX pkts w/ptr3 ~256bytes"); 662 evcnt_attach_dynamic(&sc->sc_ev_txptr3c , EVCNT_TYPE_MISC, 663 NULL, device_xname(self), "TX pkts w/ptr3 ~512bytes"); 664 evcnt_attach_dynamic(&sc->sc_ev_txptr3d , EVCNT_TYPE_MISC, 665 NULL, device_xname(self), "TX pkts w/ptr3 ~1024bytes"); 666 evcnt_attach_dynamic(&sc->sc_ev_txptr3e , EVCNT_TYPE_MISC, 667 NULL, device_xname(self), "TX pkts w/ptr3 >1024bytes"); 668 evcnt_attach_dynamic(&sc->sc_ev_txmbuf , EVCNT_TYPE_MISC, 669 NULL, device_xname(self), "TX pkts copied to new mbufs"); 670 evcnt_attach_dynamic(&sc->sc_ev_txmbufa , EVCNT_TYPE_MISC, 671 NULL, device_xname(self), "TX pkts w/mbuf ~160bytes"); 672 evcnt_attach_dynamic(&sc->sc_ev_txmbufb , EVCNT_TYPE_MISC, 673 NULL, device_xname(self), "TX pkts w/mbuf ~256bytes"); 674 evcnt_attach_dynamic(&sc->sc_ev_txmbufc , EVCNT_TYPE_MISC, 675 NULL, device_xname(self), "TX pkts w/mbuf ~512bytes"); 676 evcnt_attach_dynamic(&sc->sc_ev_txmbufd , EVCNT_TYPE_MISC, 677 NULL, device_xname(self), "TX pkts w/mbuf ~1024bytes"); 678 evcnt_attach_dynamic(&sc->sc_ev_txmbufe , EVCNT_TYPE_MISC, 679 NULL, device_xname(self), "TX pkts w/mbuf >1024bytes"); 680 evcnt_attach_dynamic(&sc->sc_ev_txptrs , EVCNT_TYPE_MISC, 681 NULL, device_xname(self), "TX pkts using ptrs total"); 682 evcnt_attach_dynamic(&sc->sc_ev_txptrc0 , EVCNT_TYPE_MISC, 683 NULL, device_xname(self), "TX pkts w/ptrs no hdr chain"); 684 evcnt_attach_dynamic(&sc->sc_ev_txptrc1 , EVCNT_TYPE_MISC, 685 NULL, device_xname(self), "TX pkts w/ptrs 1 hdr chain"); 686 evcnt_attach_dynamic(&sc->sc_ev_txptrc2 , EVCNT_TYPE_MISC, 687 NULL, device_xname(self), "TX pkts w/ptrs 2 hdr chains"); 688 evcnt_attach_dynamic(&sc->sc_ev_txptrc3 , EVCNT_TYPE_MISC, 689 NULL, device_xname(self), "TX pkts w/ptrs 3 hdr chains"); 690 evcnt_attach_dynamic(&sc->sc_ev_txptrc4 , EVCNT_TYPE_MISC, 691 NULL, device_xname(self), "TX pkts w/ptrs 4 hdr chains"); 692 evcnt_attach_dynamic(&sc->sc_ev_txptrc5 , EVCNT_TYPE_MISC, 693 NULL, device_xname(self), "TX pkts w/ptrs 5 hdr chains"); 694 evcnt_attach_dynamic(&sc->sc_ev_txptrc6 , EVCNT_TYPE_MISC, 695 NULL, device_xname(self), "TX pkts w/ptrs >5 hdr chains"); 696 evcnt_attach_dynamic(&sc->sc_ev_txptrh0 , EVCNT_TYPE_MISC, 697 NULL, device_xname(self), "TX pkts w/ptrs ~8bytes hdr"); 698 evcnt_attach_dynamic(&sc->sc_ev_txptrh1 , EVCNT_TYPE_MISC, 699 NULL, device_xname(self), "TX pkts w/ptrs ~16bytes hdr"); 700 evcnt_attach_dynamic(&sc->sc_ev_txptrh2 , EVCNT_TYPE_MISC, 701 NULL, device_xname(self), "TX pkts w/ptrs ~32bytes hdr"); 702 evcnt_attach_dynamic(&sc->sc_ev_txptrh3 , EVCNT_TYPE_MISC, 703 NULL, device_xname(self), "TX pkts w/ptrs ~64bytes hdr"); 704 evcnt_attach_dynamic(&sc->sc_ev_txptrh4 , EVCNT_TYPE_MISC, 705 NULL, device_xname(self), "TX pkts w/ptrs ~80bytes hdr"); 706 evcnt_attach_dynamic(&sc->sc_ev_txptrh5 , EVCNT_TYPE_MISC, 707 NULL, device_xname(self), "TX pkts w/ptrs ~96bytes hdr"); 708 evcnt_attach_dynamic(&sc->sc_ev_txdstall , EVCNT_TYPE_MISC, 709 NULL, device_xname(self), "TX stalled due to no txdesc"); 710 evcnt_attach_dynamic(&sc->sc_ev_txempty , EVCNT_TYPE_MISC, 711 NULL, device_xname(self), "TX empty interrupts"); 712 evcnt_attach_dynamic(&sc->sc_ev_txsent , EVCNT_TYPE_MISC, 713 NULL, device_xname(self), "TX sent interrupts"); 714 #endif 715 716 /* set shutdown hook to reset interface on powerdown */ 717 if (pmf_device_register1(self, NULL, NULL, mec_shutdown)) 718 pmf_class_network_register(self, ifp); 719 else 720 aprint_error_dev(self, "couldn't establish power handler\n"); 721 722 return; 723 724 /* 725 * Free any resources we've allocated during the failed attach 726 * attempt. Do this in reverse order and fall though. 727 */ 728 fail_4: 729 for (i = 0; i < MEC_NTXDESC; i++) { 730 if (sc->sc_txsoft[i].txs_dmamap != NULL) 731 bus_dmamap_destroy(sc->sc_dmat, 732 sc->sc_txsoft[i].txs_dmamap); 733 } 734 bus_dmamap_unload(sc->sc_dmat, sc->sc_cddmamap); 735 fail_3: 736 bus_dmamap_destroy(sc->sc_dmat, sc->sc_cddmamap); 737 fail_2: 738 bus_dmamem_unmap(sc->sc_dmat, (void *)sc->sc_control_data, 739 sizeof(struct mec_control_data)); 740 fail_1: 741 bus_dmamem_free(sc->sc_dmat, &seg, rseg); 742 fail_0: 743 return; 744 } 745 746 static int 747 mec_mii_readreg(device_t self, int phy, int reg) 748 { 749 struct mec_softc *sc = device_private(self); 750 bus_space_tag_t st = sc->sc_st; 751 bus_space_handle_t sh = sc->sc_sh; 752 uint64_t val; 753 int i; 754 755 if (mec_mii_wait(sc) != 0) 756 return 0; 757 758 bus_space_write_8(st, sh, MEC_PHY_ADDRESS, 759 (phy << MEC_PHY_ADDR_DEVSHIFT) | (reg & MEC_PHY_ADDR_REGISTER)); 760 delay(25); 761 bus_space_write_8(st, sh, MEC_PHY_READ_INITIATE, 1); 762 delay(25); 763 mec_mii_wait(sc); 764 765 for (i = 0; i < 20; i++) { 766 delay(30); 767 768 val = bus_space_read_8(st, sh, MEC_PHY_DATA); 769 770 if ((val & MEC_PHY_DATA_BUSY) == 0) 771 return val & MEC_PHY_DATA_VALUE; 772 } 773 return 0; 774 } 775 776 static void 777 mec_mii_writereg(device_t self, int phy, int reg, int val) 778 { 779 struct mec_softc *sc = device_private(self); 780 bus_space_tag_t st = sc->sc_st; 781 bus_space_handle_t sh = sc->sc_sh; 782 783 if (mec_mii_wait(sc) != 0) { 784 printf("timed out writing %x: %x\n", reg, val); 785 return; 786 } 787 788 bus_space_write_8(st, sh, MEC_PHY_ADDRESS, 789 (phy << MEC_PHY_ADDR_DEVSHIFT) | (reg & MEC_PHY_ADDR_REGISTER)); 790 791 delay(60); 792 793 bus_space_write_8(st, sh, MEC_PHY_DATA, val & MEC_PHY_DATA_VALUE); 794 795 delay(60); 796 797 mec_mii_wait(sc); 798 } 799 800 static int 801 mec_mii_wait(struct mec_softc *sc) 802 { 803 uint32_t busy; 804 int i, s; 805 806 for (i = 0; i < 100; i++) { 807 delay(30); 808 809 s = splhigh(); 810 busy = bus_space_read_8(sc->sc_st, sc->sc_sh, MEC_PHY_DATA); 811 splx(s); 812 813 if ((busy & MEC_PHY_DATA_BUSY) == 0) 814 return 0; 815 #if 0 816 if (busy == 0xffff) /* XXX ? */ 817 return 0; 818 #endif 819 } 820 821 printf("%s: MII timed out\n", device_xname(sc->sc_dev)); 822 return 1; 823 } 824 825 static void 826 mec_statchg(struct ifnet *ifp) 827 { 828 struct mec_softc *sc = ifp->if_softc; 829 bus_space_tag_t st = sc->sc_st; 830 bus_space_handle_t sh = sc->sc_sh; 831 uint32_t control; 832 833 control = bus_space_read_8(st, sh, MEC_MAC_CONTROL); 834 control &= ~(MEC_MAC_IPGT | MEC_MAC_IPGR1 | MEC_MAC_IPGR2 | 835 MEC_MAC_FULL_DUPLEX | MEC_MAC_SPEED_SELECT); 836 837 /* must also set IPG here for duplex stuff ... */ 838 if ((sc->sc_mii.mii_media_active & IFM_FDX) != 0) { 839 control |= MEC_MAC_FULL_DUPLEX; 840 } else { 841 /* set IPG */ 842 control |= MEC_MAC_IPG_DEFAULT; 843 } 844 845 bus_space_write_8(st, sh, MEC_MAC_CONTROL, control); 846 } 847 848 static int 849 mec_init(struct ifnet *ifp) 850 { 851 struct mec_softc *sc = ifp->if_softc; 852 bus_space_tag_t st = sc->sc_st; 853 bus_space_handle_t sh = sc->sc_sh; 854 struct mec_rxdesc *rxd; 855 int i, rc; 856 857 /* cancel any pending I/O */ 858 mec_stop(ifp, 0); 859 860 /* reset device */ 861 mec_reset(sc); 862 863 /* setup filter for multicast or promisc mode */ 864 mec_setfilter(sc); 865 866 /* set the TX ring pointer to the base address */ 867 bus_space_write_8(st, sh, MEC_TX_RING_BASE, MEC_CDTXADDR(sc, 0)); 868 869 sc->sc_txpending = 0; 870 sc->sc_txdirty = 0; 871 sc->sc_txlast = MEC_NTXDESC - 1; 872 873 /* put RX buffers into FIFO */ 874 for (i = 0; i < MEC_NRXDESC; i++) { 875 rxd = &sc->sc_rxdesc[i]; 876 rxd->rxd_stat = 0; 877 MEC_RXSTATSYNC(sc, i, BUS_DMASYNC_PREREAD); 878 MEC_RXBUFSYNC(sc, i, ETHER_MAX_LEN, BUS_DMASYNC_PREREAD); 879 bus_space_write_8(st, sh, MEC_MCL_RX_FIFO, MEC_CDRXADDR(sc, i)); 880 } 881 sc->sc_rxptr = 0; 882 883 #if 0 /* XXX no info */ 884 bus_space_write_8(st, sh, MEC_TIMER, 0); 885 #endif 886 887 /* 888 * MEC_DMA_TX_INT_ENABLE will be set later otherwise it causes 889 * spurious interrupts when TX buffers are empty 890 */ 891 bus_space_write_8(st, sh, MEC_DMA_CONTROL, 892 (MEC_RXD_DMAOFFSET << MEC_DMA_RX_DMA_OFFSET_SHIFT) | 893 (MEC_NRXDESC << MEC_DMA_RX_INT_THRESH_SHIFT) | 894 MEC_DMA_TX_DMA_ENABLE | /* MEC_DMA_TX_INT_ENABLE | */ 895 MEC_DMA_RX_DMA_ENABLE | MEC_DMA_RX_INT_ENABLE); 896 897 callout_reset(&sc->sc_tick_ch, hz, mec_tick, sc); 898 899 if ((rc = ether_mediachange(ifp)) != 0) 900 return rc; 901 902 ifp->if_flags |= IFF_RUNNING; 903 ifp->if_flags &= ~IFF_OACTIVE; 904 mec_start(ifp); 905 906 return 0; 907 } 908 909 static void 910 mec_reset(struct mec_softc *sc) 911 { 912 bus_space_tag_t st = sc->sc_st; 913 bus_space_handle_t sh = sc->sc_sh; 914 uint64_t control; 915 916 /* stop DMA first */ 917 bus_space_write_8(st, sh, MEC_DMA_CONTROL, 0); 918 919 /* reset chip */ 920 bus_space_write_8(st, sh, MEC_MAC_CONTROL, MEC_MAC_CORE_RESET); 921 delay(1000); 922 bus_space_write_8(st, sh, MEC_MAC_CONTROL, 0); 923 delay(1000); 924 925 /* Default to 100/half and let auto-negotiation work its magic */ 926 control = MEC_MAC_SPEED_SELECT | MEC_MAC_FILTER_MATCHMULTI | 927 MEC_MAC_IPG_DEFAULT; 928 929 bus_space_write_8(st, sh, MEC_MAC_CONTROL, control); 930 /* stop DMA again for sanity */ 931 bus_space_write_8(st, sh, MEC_DMA_CONTROL, 0); 932 933 DPRINTF(MEC_DEBUG_RESET, ("mec: control now %llx\n", 934 bus_space_read_8(st, sh, MEC_MAC_CONTROL))); 935 } 936 937 static void 938 mec_start(struct ifnet *ifp) 939 { 940 struct mec_softc *sc = ifp->if_softc; 941 struct mbuf *m0, *m; 942 struct mec_txdesc *txd; 943 struct mec_txsoft *txs; 944 bus_dmamap_t dmamap; 945 bus_space_tag_t st = sc->sc_st; 946 bus_space_handle_t sh = sc->sc_sh; 947 int error, firsttx, nexttx, opending; 948 int len, bufoff, buflen, nsegs, align, resid, pseg, nptr, slen, i; 949 uint32_t txdcmd; 950 951 if ((ifp->if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING) 952 return; 953 954 /* 955 * Remember the previous txpending and the first transmit descriptor. 956 */ 957 opending = sc->sc_txpending; 958 firsttx = MEC_NEXTTX(sc->sc_txlast); 959 960 DPRINTF(MEC_DEBUG_START, 961 ("%s: opending = %d, firsttx = %d\n", __func__, opending, firsttx)); 962 963 while (sc->sc_txpending < MEC_NTXDESC - 1) { 964 /* Grab a packet off the queue. */ 965 IFQ_POLL(&ifp->if_snd, m0); 966 if (m0 == NULL) 967 break; 968 m = NULL; 969 970 /* 971 * Get the next available transmit descriptor. 972 */ 973 nexttx = MEC_NEXTTX(sc->sc_txlast); 974 txd = &sc->sc_txdesc[nexttx]; 975 txs = &sc->sc_txsoft[nexttx]; 976 dmamap = txs->txs_dmamap; 977 txs->txs_flags = 0; 978 979 buflen = 0; 980 bufoff = 0; 981 resid = 0; 982 nptr = 0; /* XXX gcc */ 983 pseg = 0; /* XXX gcc */ 984 985 len = m0->m_pkthdr.len; 986 987 DPRINTF(MEC_DEBUG_START, 988 ("%s: len = %d, nexttx = %d, txpending = %d\n", 989 __func__, len, nexttx, sc->sc_txpending)); 990 991 if (len <= MEC_TXD_BUFSIZE) { 992 /* 993 * If a TX packet will fit into small txdesc buffer, 994 * just copy it into there. Maybe it's faster than 995 * checking alignment and calling bus_dma(9) etc. 996 */ 997 DPRINTF(MEC_DEBUG_START, ("%s: short packet\n", 998 __func__)); 999 IFQ_DEQUEUE(&ifp->if_snd, m0); 1000 1001 /* 1002 * I don't know if MEC chip does auto padding, 1003 * but do it manually for safety. 1004 */ 1005 if (len < ETHER_PAD_LEN) { 1006 MEC_EVCNT_INCR(&sc->sc_ev_txdpad); 1007 bufoff = MEC_TXD_BUFSTART(ETHER_PAD_LEN); 1008 m_copydata(m0, 0, len, txd->txd_buf + bufoff); 1009 memset(txd->txd_buf + bufoff + len, 0, 1010 ETHER_PAD_LEN - len); 1011 len = buflen = ETHER_PAD_LEN; 1012 } else { 1013 MEC_EVCNT_INCR(&sc->sc_ev_txdbuf); 1014 bufoff = MEC_TXD_BUFSTART(len); 1015 m_copydata(m0, 0, len, txd->txd_buf + bufoff); 1016 buflen = len; 1017 } 1018 } else { 1019 /* 1020 * If the packet won't fit the static buffer in txdesc, 1021 * we have to use the concatenate pointers to handle it. 1022 */ 1023 DPRINTF(MEC_DEBUG_START, ("%s: long packet\n", 1024 __func__)); 1025 txs->txs_flags = MEC_TXS_TXDPTR; 1026 1027 /* 1028 * Call bus_dmamap_load_mbuf(9) first to see 1029 * how many chains the TX mbuf has. 1030 */ 1031 error = bus_dmamap_load_mbuf(sc->sc_dmat, dmamap, m0, 1032 BUS_DMA_WRITE | BUS_DMA_NOWAIT); 1033 if (error == 0) { 1034 /* 1035 * Check chains which might contain headers. 1036 * They might be so much fragmented and 1037 * it's better to copy them into txdesc buffer 1038 * since they would be small enough. 1039 */ 1040 nsegs = dmamap->dm_nsegs; 1041 for (pseg = 0; pseg < nsegs; pseg++) { 1042 slen = dmamap->dm_segs[pseg].ds_len; 1043 if (buflen + slen > 1044 MEC_TXD_BUFSIZE1 - MEC_TXD_ALIGN) 1045 break; 1046 buflen += slen; 1047 } 1048 /* 1049 * Check if the rest chains can be fit into 1050 * the concatinate pointers. 1051 */ 1052 align = dmamap->dm_segs[pseg].ds_addr & 1053 MEC_TXD_ALIGNMASK; 1054 if (align > 0) { 1055 /* 1056 * If the first chain isn't uint64_t 1057 * aligned, append the unaligned part 1058 * into txdesc buffer too. 1059 */ 1060 resid = MEC_TXD_ALIGN - align; 1061 buflen += resid; 1062 for (; pseg < nsegs; pseg++) { 1063 slen = 1064 dmamap->dm_segs[pseg].ds_len; 1065 if (slen > resid) 1066 break; 1067 resid -= slen; 1068 } 1069 } else if (pseg == 0) { 1070 /* 1071 * In this case, the first chain is 1072 * uint64_t aligned but it's too long 1073 * to put into txdesc buf. 1074 * We have to put some data into 1075 * txdesc buf even in this case, 1076 * so put MEC_TXD_ALIGN bytes there. 1077 */ 1078 buflen = resid = MEC_TXD_ALIGN; 1079 } 1080 nptr = nsegs - pseg; 1081 if (nptr <= MEC_NTXPTR) { 1082 bufoff = MEC_TXD_BUFSTART(buflen); 1083 1084 /* 1085 * Check if all the rest chains are 1086 * uint64_t aligned. 1087 */ 1088 align = 0; 1089 for (i = pseg + 1; i < nsegs; i++) 1090 align |= 1091 dmamap->dm_segs[i].ds_addr 1092 & MEC_TXD_ALIGNMASK; 1093 if (align != 0) { 1094 /* chains are not aligned */ 1095 error = -1; 1096 } 1097 } else { 1098 /* The TX mbuf chains doesn't fit. */ 1099 error = -1; 1100 } 1101 if (error == -1) 1102 bus_dmamap_unload(sc->sc_dmat, dmamap); 1103 } 1104 if (error != 0) { 1105 /* 1106 * The TX mbuf chains can't be put into 1107 * the concatinate buffers. In this case, 1108 * we have to allocate a new contiguous mbuf 1109 * and copy data into it. 1110 * 1111 * Even in this case, the Ethernet header in 1112 * the TX mbuf might be unaligned and trailing 1113 * data might be word aligned, so put 2 byte 1114 * (MEC_ETHER_ALIGN) padding at the top of the 1115 * allocated mbuf and copy TX packets. 1116 * 6 bytes (MEC_ALIGN_BYTES - MEC_ETHER_ALIGN) 1117 * at the top of the new mbuf won't be uint64_t 1118 * alignd, but we have to put some data into 1119 * txdesc buffer anyway even if the buffer 1120 * is uint64_t aligned. 1121 */ 1122 DPRINTF(MEC_DEBUG_START|MEC_DEBUG_TXSEGS, 1123 ("%s: re-allocating mbuf\n", __func__)); 1124 1125 MGETHDR(m, M_DONTWAIT, MT_DATA); 1126 if (m == NULL) { 1127 printf("%s: unable to allocate " 1128 "TX mbuf\n", 1129 device_xname(sc->sc_dev)); 1130 break; 1131 } 1132 if (len > (MHLEN - MEC_ETHER_ALIGN)) { 1133 MCLGET(m, M_DONTWAIT); 1134 if ((m->m_flags & M_EXT) == 0) { 1135 printf("%s: unable to allocate " 1136 "TX cluster\n", 1137 device_xname(sc->sc_dev)); 1138 m_freem(m); 1139 break; 1140 } 1141 } 1142 m->m_data += MEC_ETHER_ALIGN; 1143 1144 /* 1145 * Copy whole data (including unaligned part) 1146 * for following bpf_mtap(). 1147 */ 1148 m_copydata(m0, 0, len, mtod(m, void *)); 1149 m->m_pkthdr.len = m->m_len = len; 1150 error = bus_dmamap_load_mbuf(sc->sc_dmat, 1151 dmamap, m, BUS_DMA_WRITE | BUS_DMA_NOWAIT); 1152 if (dmamap->dm_nsegs > 1) { 1153 /* should not happen, but for sanity */ 1154 bus_dmamap_unload(sc->sc_dmat, dmamap); 1155 error = -1; 1156 } 1157 if (error != 0) { 1158 printf("%s: unable to load TX buffer, " 1159 "error = %d\n", 1160 device_xname(sc->sc_dev), error); 1161 m_freem(m); 1162 break; 1163 } 1164 /* 1165 * Only the first segment should be put into 1166 * the concatinate pointer in this case. 1167 */ 1168 pseg = 0; 1169 nptr = 1; 1170 1171 /* 1172 * Set lenght of unaligned part which will be 1173 * copied into txdesc buffer. 1174 */ 1175 buflen = MEC_TXD_ALIGN - MEC_ETHER_ALIGN; 1176 bufoff = MEC_TXD_BUFSTART(buflen); 1177 resid = buflen; 1178 #ifdef MEC_EVENT_COUNTERS 1179 MEC_EVCNT_INCR(&sc->sc_ev_txmbuf); 1180 if (len <= 160) 1181 MEC_EVCNT_INCR(&sc->sc_ev_txmbufa); 1182 else if (len <= 256) 1183 MEC_EVCNT_INCR(&sc->sc_ev_txmbufb); 1184 else if (len <= 512) 1185 MEC_EVCNT_INCR(&sc->sc_ev_txmbufc); 1186 else if (len <= 1024) 1187 MEC_EVCNT_INCR(&sc->sc_ev_txmbufd); 1188 else 1189 MEC_EVCNT_INCR(&sc->sc_ev_txmbufe); 1190 #endif 1191 } 1192 #ifdef MEC_EVENT_COUNTERS 1193 else { 1194 MEC_EVCNT_INCR(&sc->sc_ev_txptrs); 1195 if (nptr == 1) { 1196 MEC_EVCNT_INCR(&sc->sc_ev_txptr1); 1197 if (len <= 160) 1198 MEC_EVCNT_INCR( 1199 &sc->sc_ev_txptr1a); 1200 else if (len <= 256) 1201 MEC_EVCNT_INCR( 1202 &sc->sc_ev_txptr1b); 1203 else if (len <= 512) 1204 MEC_EVCNT_INCR( 1205 &sc->sc_ev_txptr1c); 1206 else if (len <= 1024) 1207 MEC_EVCNT_INCR( 1208 &sc->sc_ev_txptr1d); 1209 else 1210 MEC_EVCNT_INCR( 1211 &sc->sc_ev_txptr1e); 1212 } else if (nptr == 2) { 1213 MEC_EVCNT_INCR(&sc->sc_ev_txptr2); 1214 if (len <= 160) 1215 MEC_EVCNT_INCR( 1216 &sc->sc_ev_txptr2a); 1217 else if (len <= 256) 1218 MEC_EVCNT_INCR( 1219 &sc->sc_ev_txptr2b); 1220 else if (len <= 512) 1221 MEC_EVCNT_INCR( 1222 &sc->sc_ev_txptr2c); 1223 else if (len <= 1024) 1224 MEC_EVCNT_INCR( 1225 &sc->sc_ev_txptr2d); 1226 else 1227 MEC_EVCNT_INCR( 1228 &sc->sc_ev_txptr2e); 1229 } else if (nptr == 3) { 1230 MEC_EVCNT_INCR(&sc->sc_ev_txptr3); 1231 if (len <= 160) 1232 MEC_EVCNT_INCR( 1233 &sc->sc_ev_txptr3a); 1234 else if (len <= 256) 1235 MEC_EVCNT_INCR( 1236 &sc->sc_ev_txptr3b); 1237 else if (len <= 512) 1238 MEC_EVCNT_INCR( 1239 &sc->sc_ev_txptr3c); 1240 else if (len <= 1024) 1241 MEC_EVCNT_INCR( 1242 &sc->sc_ev_txptr3d); 1243 else 1244 MEC_EVCNT_INCR( 1245 &sc->sc_ev_txptr3e); 1246 } 1247 if (pseg == 0) 1248 MEC_EVCNT_INCR(&sc->sc_ev_txptrc0); 1249 else if (pseg == 1) 1250 MEC_EVCNT_INCR(&sc->sc_ev_txptrc1); 1251 else if (pseg == 2) 1252 MEC_EVCNT_INCR(&sc->sc_ev_txptrc2); 1253 else if (pseg == 3) 1254 MEC_EVCNT_INCR(&sc->sc_ev_txptrc3); 1255 else if (pseg == 4) 1256 MEC_EVCNT_INCR(&sc->sc_ev_txptrc4); 1257 else if (pseg == 5) 1258 MEC_EVCNT_INCR(&sc->sc_ev_txptrc5); 1259 else 1260 MEC_EVCNT_INCR(&sc->sc_ev_txptrc6); 1261 if (buflen <= 8) 1262 MEC_EVCNT_INCR(&sc->sc_ev_txptrh0); 1263 else if (buflen <= 16) 1264 MEC_EVCNT_INCR(&sc->sc_ev_txptrh1); 1265 else if (buflen <= 32) 1266 MEC_EVCNT_INCR(&sc->sc_ev_txptrh2); 1267 else if (buflen <= 64) 1268 MEC_EVCNT_INCR(&sc->sc_ev_txptrh3); 1269 else if (buflen <= 80) 1270 MEC_EVCNT_INCR(&sc->sc_ev_txptrh4); 1271 else 1272 MEC_EVCNT_INCR(&sc->sc_ev_txptrh5); 1273 } 1274 #endif 1275 m_copydata(m0, 0, buflen, txd->txd_buf + bufoff); 1276 1277 IFQ_DEQUEUE(&ifp->if_snd, m0); 1278 if (m != NULL) { 1279 m_freem(m0); 1280 m0 = m; 1281 } 1282 1283 /* 1284 * sync the DMA map for TX mbuf 1285 */ 1286 bus_dmamap_sync(sc->sc_dmat, dmamap, buflen, 1287 len - buflen, BUS_DMASYNC_PREWRITE); 1288 } 1289 1290 /* 1291 * Pass packet to bpf if there is a listener. 1292 */ 1293 bpf_mtap(ifp, m0); 1294 MEC_EVCNT_INCR(&sc->sc_ev_txpkts); 1295 1296 /* 1297 * setup the transmit descriptor. 1298 */ 1299 txdcmd = TXCMD_BUFSTART(MEC_TXDESCSIZE - buflen) | (len - 1); 1300 1301 /* 1302 * Set MEC_TXCMD_TXINT every MEC_NTXDESC_INTR packets 1303 * if more than half txdescs have been queued 1304 * because TX_EMPTY interrupts will rarely happen 1305 * if TX queue is so stacked. 1306 */ 1307 if (sc->sc_txpending > (MEC_NTXDESC / 2) && 1308 (nexttx & (MEC_NTXDESC_INTR - 1)) == 0) 1309 txdcmd |= MEC_TXCMD_TXINT; 1310 1311 if ((txs->txs_flags & MEC_TXS_TXDPTR) != 0) { 1312 bus_dma_segment_t *segs = dmamap->dm_segs; 1313 1314 DPRINTF(MEC_DEBUG_TXSEGS, 1315 ("%s: nsegs = %d, pseg = %d, nptr = %d\n", 1316 __func__, dmamap->dm_nsegs, pseg, nptr)); 1317 1318 switch (nptr) { 1319 case 3: 1320 KASSERT((segs[pseg + 2].ds_addr & 1321 MEC_TXD_ALIGNMASK) == 0); 1322 txdcmd |= MEC_TXCMD_PTR3; 1323 txd->txd_ptr[2] = 1324 TXPTR_LEN(segs[pseg + 2].ds_len - 1) | 1325 segs[pseg + 2].ds_addr; 1326 /* FALLTHROUGH */ 1327 case 2: 1328 KASSERT((segs[pseg + 1].ds_addr & 1329 MEC_TXD_ALIGNMASK) == 0); 1330 txdcmd |= MEC_TXCMD_PTR2; 1331 txd->txd_ptr[1] = 1332 TXPTR_LEN(segs[pseg + 1].ds_len - 1) | 1333 segs[pseg + 1].ds_addr; 1334 /* FALLTHROUGH */ 1335 case 1: 1336 txdcmd |= MEC_TXCMD_PTR1; 1337 txd->txd_ptr[0] = 1338 TXPTR_LEN(segs[pseg].ds_len - resid - 1) | 1339 (segs[pseg].ds_addr + resid); 1340 break; 1341 default: 1342 panic("%s: impossible nptr in %s", 1343 device_xname(sc->sc_dev), __func__); 1344 /* NOTREACHED */ 1345 } 1346 /* 1347 * Store a pointer to the packet so we can 1348 * free it later. 1349 */ 1350 txs->txs_mbuf = m0; 1351 } else { 1352 /* 1353 * In this case all data are copied to buffer in txdesc, 1354 * we can free TX mbuf here. 1355 */ 1356 m_freem(m0); 1357 } 1358 txd->txd_cmd = txdcmd; 1359 1360 DPRINTF(MEC_DEBUG_START, 1361 ("%s: txd_cmd = 0x%016llx\n", 1362 __func__, txd->txd_cmd)); 1363 DPRINTF(MEC_DEBUG_START, 1364 ("%s: txd_ptr[0] = 0x%016llx\n", 1365 __func__, txd->txd_ptr[0])); 1366 DPRINTF(MEC_DEBUG_START, 1367 ("%s: txd_ptr[1] = 0x%016llx\n", 1368 __func__, txd->txd_ptr[1])); 1369 DPRINTF(MEC_DEBUG_START, 1370 ("%s: txd_ptr[2] = 0x%016llx\n", 1371 __func__, txd->txd_ptr[2])); 1372 DPRINTF(MEC_DEBUG_START, 1373 ("%s: len = %d (0x%04x), buflen = %d (0x%02x)\n", 1374 __func__, len, len, buflen, buflen)); 1375 1376 /* sync TX descriptor */ 1377 MEC_TXDESCSYNC(sc, nexttx, 1378 BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE); 1379 1380 /* start TX */ 1381 bus_space_write_8(st, sh, MEC_TX_RING_PTR, MEC_NEXTTX(nexttx)); 1382 1383 /* advance the TX pointer. */ 1384 sc->sc_txpending++; 1385 sc->sc_txlast = nexttx; 1386 } 1387 1388 if (sc->sc_txpending == MEC_NTXDESC - 1) { 1389 /* No more slots; notify upper layer. */ 1390 MEC_EVCNT_INCR(&sc->sc_ev_txdstall); 1391 ifp->if_flags |= IFF_OACTIVE; 1392 } 1393 1394 if (sc->sc_txpending != opending) { 1395 /* 1396 * If the transmitter was idle, 1397 * reset the txdirty pointer and re-enable TX interrupt. 1398 */ 1399 if (opending == 0) { 1400 sc->sc_txdirty = firsttx; 1401 bus_space_write_8(st, sh, MEC_TX_ALIAS, 1402 MEC_TX_ALIAS_INT_ENABLE); 1403 } 1404 1405 /* Set a watchdog timer in case the chip flakes out. */ 1406 ifp->if_timer = 5; 1407 } 1408 } 1409 1410 static void 1411 mec_stop(struct ifnet *ifp, int disable) 1412 { 1413 struct mec_softc *sc = ifp->if_softc; 1414 struct mec_txsoft *txs; 1415 int i; 1416 1417 DPRINTF(MEC_DEBUG_STOP, ("%s\n", __func__)); 1418 1419 ifp->if_timer = 0; 1420 ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE); 1421 1422 callout_stop(&sc->sc_tick_ch); 1423 mii_down(&sc->sc_mii); 1424 1425 /* release any TX buffers */ 1426 for (i = 0; i < MEC_NTXDESC; i++) { 1427 txs = &sc->sc_txsoft[i]; 1428 if ((txs->txs_flags & MEC_TXS_TXDPTR) != 0) { 1429 bus_dmamap_unload(sc->sc_dmat, txs->txs_dmamap); 1430 m_freem(txs->txs_mbuf); 1431 txs->txs_mbuf = NULL; 1432 } 1433 } 1434 } 1435 1436 static int 1437 mec_ioctl(struct ifnet *ifp, u_long cmd, void *data) 1438 { 1439 int s, error; 1440 1441 s = splnet(); 1442 1443 error = ether_ioctl(ifp, cmd, data); 1444 if (error == ENETRESET) { 1445 /* 1446 * Multicast list has changed; set the hardware filter 1447 * accordingly. 1448 */ 1449 if (ifp->if_flags & IFF_RUNNING) 1450 error = mec_init(ifp); 1451 else 1452 error = 0; 1453 } 1454 1455 /* Try to get more packets going. */ 1456 mec_start(ifp); 1457 1458 splx(s); 1459 return error; 1460 } 1461 1462 static void 1463 mec_watchdog(struct ifnet *ifp) 1464 { 1465 struct mec_softc *sc = ifp->if_softc; 1466 1467 printf("%s: device timeout\n", device_xname(sc->sc_dev)); 1468 ifp->if_oerrors++; 1469 1470 mec_init(ifp); 1471 } 1472 1473 static void 1474 mec_tick(void *arg) 1475 { 1476 struct mec_softc *sc = arg; 1477 int s; 1478 1479 s = splnet(); 1480 mii_tick(&sc->sc_mii); 1481 splx(s); 1482 1483 callout_reset(&sc->sc_tick_ch, hz, mec_tick, sc); 1484 } 1485 1486 static void 1487 mec_setfilter(struct mec_softc *sc) 1488 { 1489 struct ethercom *ec = &sc->sc_ethercom; 1490 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 1491 struct ether_multi *enm; 1492 struct ether_multistep step; 1493 bus_space_tag_t st = sc->sc_st; 1494 bus_space_handle_t sh = sc->sc_sh; 1495 uint64_t mchash; 1496 uint32_t control, hash; 1497 int mcnt; 1498 1499 control = bus_space_read_8(st, sh, MEC_MAC_CONTROL); 1500 control &= ~MEC_MAC_FILTER_MASK; 1501 1502 if (ifp->if_flags & IFF_PROMISC) { 1503 control |= MEC_MAC_FILTER_PROMISC; 1504 bus_space_write_8(st, sh, MEC_MULTICAST, 0xffffffffffffffffULL); 1505 bus_space_write_8(st, sh, MEC_MAC_CONTROL, control); 1506 return; 1507 } 1508 1509 mcnt = 0; 1510 mchash = 0; 1511 ETHER_FIRST_MULTI(step, ec, enm); 1512 while (enm != NULL) { 1513 if (memcmp(enm->enm_addrlo, enm->enm_addrhi, ETHER_ADDR_LEN)) { 1514 /* set allmulti for a range of multicast addresses */ 1515 control |= MEC_MAC_FILTER_ALLMULTI; 1516 bus_space_write_8(st, sh, MEC_MULTICAST, 1517 0xffffffffffffffffULL); 1518 bus_space_write_8(st, sh, MEC_MAC_CONTROL, control); 1519 return; 1520 } 1521 1522 #define mec_calchash(addr) (ether_crc32_be((addr), ETHER_ADDR_LEN) >> 26) 1523 1524 hash = mec_calchash(enm->enm_addrlo); 1525 mchash |= 1 << hash; 1526 mcnt++; 1527 ETHER_NEXT_MULTI(step, enm); 1528 } 1529 1530 ifp->if_flags &= ~IFF_ALLMULTI; 1531 1532 if (mcnt > 0) 1533 control |= MEC_MAC_FILTER_MATCHMULTI; 1534 1535 bus_space_write_8(st, sh, MEC_MULTICAST, mchash); 1536 bus_space_write_8(st, sh, MEC_MAC_CONTROL, control); 1537 } 1538 1539 static int 1540 mec_intr(void *arg) 1541 { 1542 struct mec_softc *sc = arg; 1543 bus_space_tag_t st = sc->sc_st; 1544 bus_space_handle_t sh = sc->sc_sh; 1545 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 1546 uint32_t statreg, statack, txptr; 1547 int handled, sent; 1548 1549 DPRINTF(MEC_DEBUG_INTR, ("%s: called\n", __func__)); 1550 1551 handled = sent = 0; 1552 1553 for (;;) { 1554 statreg = bus_space_read_8(st, sh, MEC_INT_STATUS); 1555 1556 DPRINTF(MEC_DEBUG_INTR, 1557 ("%s: INT_STAT = 0x%08x\n", __func__, statreg)); 1558 1559 statack = statreg & MEC_INT_STATUS_MASK; 1560 if (statack == 0) 1561 break; 1562 bus_space_write_8(st, sh, MEC_INT_STATUS, statack); 1563 1564 handled = 1; 1565 1566 if (statack & 1567 (MEC_INT_RX_THRESHOLD | 1568 MEC_INT_RX_FIFO_UNDERFLOW)) { 1569 mec_rxintr(sc); 1570 } 1571 1572 if (statack & 1573 (MEC_INT_TX_EMPTY | 1574 MEC_INT_TX_PACKET_SENT | 1575 MEC_INT_TX_ABORT)) { 1576 txptr = (statreg & MEC_INT_TX_RING_BUFFER_ALIAS) 1577 >> MEC_INT_TX_RING_BUFFER_SHIFT; 1578 mec_txintr(sc, txptr); 1579 sent = 1; 1580 if ((statack & MEC_INT_TX_EMPTY) != 0) { 1581 /* 1582 * disable TX interrupt to stop 1583 * TX empty interrupt 1584 */ 1585 bus_space_write_8(st, sh, MEC_TX_ALIAS, 0); 1586 DPRINTF(MEC_DEBUG_INTR, 1587 ("%s: disable TX_INT\n", __func__)); 1588 } 1589 #ifdef MEC_EVENT_COUNTERS 1590 if ((statack & MEC_INT_TX_EMPTY) != 0) 1591 MEC_EVCNT_INCR(&sc->sc_ev_txempty); 1592 if ((statack & MEC_INT_TX_PACKET_SENT) != 0) 1593 MEC_EVCNT_INCR(&sc->sc_ev_txsent); 1594 #endif 1595 } 1596 1597 if (statack & 1598 (MEC_INT_TX_LINK_FAIL | 1599 MEC_INT_TX_MEM_ERROR | 1600 MEC_INT_TX_ABORT | 1601 MEC_INT_RX_FIFO_UNDERFLOW | 1602 MEC_INT_RX_DMA_UNDERFLOW)) { 1603 printf("%s: %s: interrupt status = 0x%08x\n", 1604 device_xname(sc->sc_dev), __func__, statreg); 1605 mec_init(ifp); 1606 break; 1607 } 1608 } 1609 1610 if (sent && !IFQ_IS_EMPTY(&ifp->if_snd)) { 1611 /* try to get more packets going */ 1612 mec_start(ifp); 1613 } 1614 1615 if (handled) 1616 rnd_add_uint32(&sc->sc_rnd_source, statreg); 1617 1618 return handled; 1619 } 1620 1621 static void 1622 mec_rxintr(struct mec_softc *sc) 1623 { 1624 bus_space_tag_t st = sc->sc_st; 1625 bus_space_handle_t sh = sc->sc_sh; 1626 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 1627 struct mbuf *m; 1628 struct mec_rxdesc *rxd; 1629 uint64_t rxstat; 1630 u_int len; 1631 int i; 1632 uint32_t crc; 1633 1634 DPRINTF(MEC_DEBUG_RXINTR, ("%s: called\n", __func__)); 1635 1636 for (i = sc->sc_rxptr;; i = MEC_NEXTRX(i)) { 1637 rxd = &sc->sc_rxdesc[i]; 1638 1639 MEC_RXSTATSYNC(sc, i, BUS_DMASYNC_POSTREAD); 1640 rxstat = rxd->rxd_stat; 1641 1642 DPRINTF(MEC_DEBUG_RXINTR, 1643 ("%s: rxstat = 0x%016llx, rxptr = %d\n", 1644 __func__, rxstat, i)); 1645 DPRINTF(MEC_DEBUG_RXINTR, ("%s: rxfifo = 0x%08x\n", 1646 __func__, (u_int)bus_space_read_8(st, sh, MEC_RX_FIFO))); 1647 1648 if ((rxstat & MEC_RXSTAT_RECEIVED) == 0) { 1649 MEC_RXSTATSYNC(sc, i, BUS_DMASYNC_PREREAD); 1650 break; 1651 } 1652 1653 len = rxstat & MEC_RXSTAT_LEN; 1654 1655 if (len < ETHER_MIN_LEN || 1656 len > (MCLBYTES - MEC_ETHER_ALIGN)) { 1657 /* invalid length packet; drop it. */ 1658 DPRINTF(MEC_DEBUG_RXINTR, 1659 ("%s: wrong packet\n", __func__)); 1660 dropit: 1661 ifp->if_ierrors++; 1662 rxd->rxd_stat = 0; 1663 MEC_RXSTATSYNC(sc, i, BUS_DMASYNC_PREREAD); 1664 bus_space_write_8(st, sh, MEC_MCL_RX_FIFO, 1665 MEC_CDRXADDR(sc, i)); 1666 continue; 1667 } 1668 1669 /* 1670 * If 802.1Q VLAN MTU is enabled, ignore the bad packet error. 1671 */ 1672 if ((sc->sc_ethercom.ec_capenable & ETHERCAP_VLAN_MTU) != 0) 1673 rxstat &= ~MEC_RXSTAT_BADPACKET; 1674 1675 if (rxstat & 1676 (MEC_RXSTAT_BADPACKET | 1677 MEC_RXSTAT_LONGEVENT | 1678 MEC_RXSTAT_INVALID | 1679 MEC_RXSTAT_CRCERROR | 1680 MEC_RXSTAT_VIOLATION)) { 1681 printf("%s: mec_rxintr: status = 0x%016"PRIx64"\n", 1682 device_xname(sc->sc_dev), rxstat); 1683 goto dropit; 1684 } 1685 1686 /* 1687 * The MEC includes the CRC with every packet. Trim 1688 * it off here. 1689 */ 1690 len -= ETHER_CRC_LEN; 1691 1692 /* 1693 * now allocate an mbuf (and possibly a cluster) to hold 1694 * the received packet. 1695 */ 1696 MGETHDR(m, M_DONTWAIT, MT_DATA); 1697 if (m == NULL) { 1698 printf("%s: unable to allocate RX mbuf\n", 1699 device_xname(sc->sc_dev)); 1700 goto dropit; 1701 } 1702 if (len > (MHLEN - MEC_ETHER_ALIGN)) { 1703 MCLGET(m, M_DONTWAIT); 1704 if ((m->m_flags & M_EXT) == 0) { 1705 printf("%s: unable to allocate RX cluster\n", 1706 device_xname(sc->sc_dev)); 1707 m_freem(m); 1708 m = NULL; 1709 goto dropit; 1710 } 1711 } 1712 1713 /* 1714 * Note MEC chip seems to insert 2 byte padding at the top of 1715 * RX buffer, but we copy whole buffer to avoid unaligned copy. 1716 */ 1717 MEC_RXBUFSYNC(sc, i, len + ETHER_CRC_LEN, BUS_DMASYNC_POSTREAD); 1718 memcpy(mtod(m, void *), rxd->rxd_buf, MEC_ETHER_ALIGN + len); 1719 crc = be32dec(rxd->rxd_buf + MEC_ETHER_ALIGN + len); 1720 MEC_RXBUFSYNC(sc, i, ETHER_MAX_LEN, BUS_DMASYNC_PREREAD); 1721 m->m_data += MEC_ETHER_ALIGN; 1722 1723 /* put RX buffer into FIFO again */ 1724 rxd->rxd_stat = 0; 1725 MEC_RXSTATSYNC(sc, i, BUS_DMASYNC_PREREAD); 1726 bus_space_write_8(st, sh, MEC_MCL_RX_FIFO, MEC_CDRXADDR(sc, i)); 1727 1728 m->m_pkthdr.rcvif = ifp; 1729 m->m_pkthdr.len = m->m_len = len; 1730 if ((ifp->if_csum_flags_rx & (M_CSUM_TCPv4|M_CSUM_UDPv4)) != 0) 1731 mec_rxcsum(sc, m, RXSTAT_CKSUM(rxstat), crc); 1732 1733 ifp->if_ipackets++; 1734 1735 /* 1736 * Pass this up to any BPF listeners, but only 1737 * pass it up the stack if it's for us. 1738 */ 1739 bpf_mtap(ifp, m); 1740 1741 /* Pass it on. */ 1742 (*ifp->if_input)(ifp, m); 1743 } 1744 1745 /* update RX pointer */ 1746 sc->sc_rxptr = i; 1747 } 1748 1749 static void 1750 mec_rxcsum(struct mec_softc *sc, struct mbuf *m, uint16_t rxcsum, uint32_t crc) 1751 { 1752 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 1753 struct ether_header *eh; 1754 struct ip *ip; 1755 struct udphdr *uh; 1756 u_int len, pktlen, hlen; 1757 uint32_t csum_data, dsum; 1758 int csum_flags; 1759 const uint16_t *dp; 1760 1761 csum_data = 0; 1762 csum_flags = 0; 1763 1764 len = m->m_len; 1765 if (len < ETHER_HDR_LEN + sizeof(struct ip)) 1766 goto out; 1767 pktlen = len - ETHER_HDR_LEN; 1768 eh = mtod(m, struct ether_header *); 1769 if (ntohs(eh->ether_type) != ETHERTYPE_IP) 1770 goto out; 1771 ip = (struct ip *)((uint8_t *)eh + ETHER_HDR_LEN); 1772 if (ip->ip_v != IPVERSION) 1773 goto out; 1774 1775 hlen = ip->ip_hl << 2; 1776 if (hlen < sizeof(struct ip)) 1777 goto out; 1778 1779 /* 1780 * Bail if too short, has random trailing garbage, truncated, 1781 * fragment, or has ethernet pad. 1782 */ 1783 if (ntohs(ip->ip_len) < hlen || 1784 ntohs(ip->ip_len) != pktlen || 1785 (ntohs(ip->ip_off) & (IP_MF | IP_OFFMASK)) != 0) 1786 goto out; 1787 1788 switch (ip->ip_p) { 1789 case IPPROTO_TCP: 1790 if ((ifp->if_csum_flags_rx & M_CSUM_TCPv4) == 0 || 1791 pktlen < (hlen + sizeof(struct tcphdr))) 1792 goto out; 1793 csum_flags = M_CSUM_TCPv4 | M_CSUM_DATA | M_CSUM_NO_PSEUDOHDR; 1794 break; 1795 case IPPROTO_UDP: 1796 if ((ifp->if_csum_flags_rx & M_CSUM_UDPv4) == 0 || 1797 pktlen < (hlen + sizeof(struct udphdr))) 1798 goto out; 1799 uh = (struct udphdr *)((uint8_t *)ip + hlen); 1800 if (uh->uh_sum == 0) 1801 goto out; /* no checksum */ 1802 csum_flags = M_CSUM_UDPv4 | M_CSUM_DATA | M_CSUM_NO_PSEUDOHDR; 1803 break; 1804 default: 1805 goto out; 1806 } 1807 1808 /* 1809 * The computed checksum includes Ethernet header, IP headers, 1810 * and CRC, so we have to deduct them. 1811 * Note IP header cksum should be 0xffff so we don't have to 1812 * dedecut them. 1813 */ 1814 dsum = 0; 1815 1816 /* deduct Ethernet header */ 1817 dp = (const uint16_t *)eh; 1818 for (hlen = 0; hlen < (ETHER_HDR_LEN / sizeof(uint16_t)); hlen++) 1819 dsum += ntohs(*dp++); 1820 1821 /* deduct CRC */ 1822 if (len & 1) { 1823 dsum += (crc >> 24) & 0x00ff; 1824 dsum += (crc >> 8) & 0xffff; 1825 dsum += (crc << 8) & 0xff00; 1826 } else { 1827 dsum += (crc >> 16) & 0xffff; 1828 dsum += (crc >> 0) & 0xffff; 1829 } 1830 while (dsum >> 16) 1831 dsum = (dsum >> 16) + (dsum & 0xffff); 1832 1833 csum_data = rxcsum; 1834 csum_data += (uint16_t)~dsum; 1835 1836 while (csum_data >> 16) 1837 csum_data = (csum_data >> 16) + (csum_data & 0xffff); 1838 1839 out: 1840 m->m_pkthdr.csum_flags = csum_flags; 1841 m->m_pkthdr.csum_data = csum_data; 1842 } 1843 1844 static void 1845 mec_txintr(struct mec_softc *sc, uint32_t txptr) 1846 { 1847 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 1848 struct mec_txdesc *txd; 1849 struct mec_txsoft *txs; 1850 bus_dmamap_t dmamap; 1851 uint64_t txstat; 1852 int i; 1853 u_int col; 1854 1855 DPRINTF(MEC_DEBUG_TXINTR, ("%s: called\n", __func__)); 1856 1857 for (i = sc->sc_txdirty; i != txptr && sc->sc_txpending != 0; 1858 i = MEC_NEXTTX(i), sc->sc_txpending--) { 1859 txd = &sc->sc_txdesc[i]; 1860 1861 MEC_TXCMDSYNC(sc, i, 1862 BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE); 1863 1864 txstat = txd->txd_stat; 1865 DPRINTF(MEC_DEBUG_TXINTR, 1866 ("%s: dirty = %d, txstat = 0x%016llx\n", 1867 __func__, i, txstat)); 1868 if ((txstat & MEC_TXSTAT_SENT) == 0) { 1869 MEC_TXCMDSYNC(sc, i, BUS_DMASYNC_PREREAD); 1870 break; 1871 } 1872 1873 txs = &sc->sc_txsoft[i]; 1874 if ((txs->txs_flags & MEC_TXS_TXDPTR) != 0) { 1875 dmamap = txs->txs_dmamap; 1876 bus_dmamap_sync(sc->sc_dmat, dmamap, 0, 1877 dmamap->dm_mapsize, BUS_DMASYNC_POSTWRITE); 1878 bus_dmamap_unload(sc->sc_dmat, dmamap); 1879 m_freem(txs->txs_mbuf); 1880 txs->txs_mbuf = NULL; 1881 } 1882 1883 col = (txstat & MEC_TXSTAT_COLCNT) >> MEC_TXSTAT_COLCNT_SHIFT; 1884 ifp->if_collisions += col; 1885 1886 if ((txstat & MEC_TXSTAT_SUCCESS) == 0) { 1887 printf("%s: TX error: txstat = 0x%016"PRIx64"\n", 1888 device_xname(sc->sc_dev), txstat); 1889 ifp->if_oerrors++; 1890 } else 1891 ifp->if_opackets++; 1892 } 1893 1894 /* update the dirty TX buffer pointer */ 1895 sc->sc_txdirty = i; 1896 DPRINTF(MEC_DEBUG_INTR, 1897 ("%s: sc_txdirty = %2d, sc_txpending = %2d\n", 1898 __func__, sc->sc_txdirty, sc->sc_txpending)); 1899 1900 /* cancel the watchdog timer if there are no pending TX packets */ 1901 if (sc->sc_txpending == 0) 1902 ifp->if_timer = 0; 1903 if (sc->sc_txpending < MEC_NTXDESC - MEC_NTXDESC_RSVD) 1904 ifp->if_flags &= ~IFF_OACTIVE; 1905 } 1906 1907 static bool 1908 mec_shutdown(device_t self, int howto) 1909 { 1910 struct mec_softc *sc = device_private(self); 1911 1912 mec_stop(&sc->sc_ethercom.ec_if, 1); 1913 /* make sure to stop DMA etc. */ 1914 mec_reset(sc); 1915 1916 return true; 1917 } 1918