1 /* 2 * Copyright (c) 1997, 1998, 1999 3 * Bill Paul <wpaul@ctr.columbia.edu>. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by Bill Paul. 16 * 4. Neither the name of the author nor the names of any co-contributors 17 * may be used to endorse or promote products derived from this software 18 * without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL Bill Paul OR THE VOICES IN HIS HEAD 24 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 30 * THE POSSIBILITY OF SUCH DAMAGE. 31 * 32 * $FreeBSD: src/sys/pci/if_ste.c,v 1.14.2.9 2003/02/05 22:03:57 mbr Exp $ 33 * $DragonFly: src/sys/dev/netif/ste/if_ste.c,v 1.11 2004/07/02 17:42:19 joerg Exp $ 34 * 35 * $FreeBSD: src/sys/pci/if_ste.c,v 1.14.2.9 2003/02/05 22:03:57 mbr Exp $ 36 */ 37 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 #include <sys/sockio.h> 41 #include <sys/mbuf.h> 42 #include <sys/malloc.h> 43 #include <sys/kernel.h> 44 #include <sys/socket.h> 45 46 #include <net/if.h> 47 #include <net/if_arp.h> 48 #include <net/ethernet.h> 49 #include <net/if_dl.h> 50 #include <net/if_media.h> 51 #include <net/vlan/if_vlan_var.h> 52 53 #include <net/bpf.h> 54 55 #include <vm/vm.h> /* for vtophys */ 56 #include <vm/pmap.h> /* for vtophys */ 57 #include <machine/clock.h> /* for DELAY */ 58 #include <machine/bus_memio.h> 59 #include <machine/bus_pio.h> 60 #include <machine/bus.h> 61 #include <machine/resource.h> 62 #include <sys/bus.h> 63 #include <sys/rman.h> 64 65 #include "../mii_layer/mii.h" 66 #include "../mii_layer/miivar.h" 67 68 #include <bus/pci/pcireg.h> 69 #include <bus/pci/pcivar.h> 70 71 /* "controller miibus0" required. See GENERIC if you get errors here. */ 72 #include "miibus_if.h" 73 74 #define STE_USEIOSPACE 75 76 #include "if_stereg.h" 77 78 /* 79 * Various supported device vendors/types and their names. 80 */ 81 static struct ste_type ste_devs[] = { 82 { ST_VENDORID, ST_DEVICEID_ST201, "Sundance ST201 10/100BaseTX" }, 83 { DL_VENDORID, DL_DEVICEID_550TX, "D-Link DFE-550TX 10/100BaseTX" }, 84 { 0, 0, NULL } 85 }; 86 87 static int ste_probe (device_t); 88 static int ste_attach (device_t); 89 static int ste_detach (device_t); 90 static void ste_init (void *); 91 static void ste_intr (void *); 92 static void ste_rxeof (struct ste_softc *); 93 static void ste_txeoc (struct ste_softc *); 94 static void ste_txeof (struct ste_softc *); 95 static void ste_stats_update (void *); 96 static void ste_stop (struct ste_softc *); 97 static void ste_reset (struct ste_softc *); 98 static int ste_ioctl (struct ifnet *, u_long, caddr_t, 99 struct ucred *); 100 static int ste_encap (struct ste_softc *, struct ste_chain *, 101 struct mbuf *); 102 static void ste_start (struct ifnet *); 103 static void ste_watchdog (struct ifnet *); 104 static void ste_shutdown (device_t); 105 static int ste_newbuf (struct ste_softc *, 106 struct ste_chain_onefrag *, 107 struct mbuf *); 108 static int ste_ifmedia_upd (struct ifnet *); 109 static void ste_ifmedia_sts (struct ifnet *, struct ifmediareq *); 110 111 static void ste_mii_sync (struct ste_softc *); 112 static void ste_mii_send (struct ste_softc *, u_int32_t, int); 113 static int ste_mii_readreg (struct ste_softc *, 114 struct ste_mii_frame *); 115 static int ste_mii_writereg (struct ste_softc *, 116 struct ste_mii_frame *); 117 static int ste_miibus_readreg (device_t, int, int); 118 static int ste_miibus_writereg (device_t, int, int, int); 119 static void ste_miibus_statchg (device_t); 120 121 static int ste_eeprom_wait (struct ste_softc *); 122 static int ste_read_eeprom (struct ste_softc *, caddr_t, int, 123 int, int); 124 static void ste_wait (struct ste_softc *); 125 static u_int8_t ste_calchash (caddr_t); 126 static void ste_setmulti (struct ste_softc *); 127 static int ste_init_rx_list (struct ste_softc *); 128 static void ste_init_tx_list (struct ste_softc *); 129 130 #ifdef STE_USEIOSPACE 131 #define STE_RES SYS_RES_IOPORT 132 #define STE_RID STE_PCI_LOIO 133 #else 134 #define STE_RES SYS_RES_MEMORY 135 #define STE_RID STE_PCI_LOMEM 136 #endif 137 138 static device_method_t ste_methods[] = { 139 /* Device interface */ 140 DEVMETHOD(device_probe, ste_probe), 141 DEVMETHOD(device_attach, ste_attach), 142 DEVMETHOD(device_detach, ste_detach), 143 DEVMETHOD(device_shutdown, ste_shutdown), 144 145 /* bus interface */ 146 DEVMETHOD(bus_print_child, bus_generic_print_child), 147 DEVMETHOD(bus_driver_added, bus_generic_driver_added), 148 149 /* MII interface */ 150 DEVMETHOD(miibus_readreg, ste_miibus_readreg), 151 DEVMETHOD(miibus_writereg, ste_miibus_writereg), 152 DEVMETHOD(miibus_statchg, ste_miibus_statchg), 153 154 { 0, 0 } 155 }; 156 157 static driver_t ste_driver = { 158 "ste", 159 ste_methods, 160 sizeof(struct ste_softc) 161 }; 162 163 static devclass_t ste_devclass; 164 165 DECLARE_DUMMY_MODULE(if_ste); 166 DRIVER_MODULE(if_ste, pci, ste_driver, ste_devclass, 0, 0); 167 DRIVER_MODULE(miibus, ste, miibus_driver, miibus_devclass, 0, 0); 168 169 #define STE_SETBIT4(sc, reg, x) \ 170 CSR_WRITE_4(sc, reg, CSR_READ_4(sc, reg) | x) 171 172 #define STE_CLRBIT4(sc, reg, x) \ 173 CSR_WRITE_4(sc, reg, CSR_READ_4(sc, reg) & ~x) 174 175 #define STE_SETBIT2(sc, reg, x) \ 176 CSR_WRITE_2(sc, reg, CSR_READ_2(sc, reg) | x) 177 178 #define STE_CLRBIT2(sc, reg, x) \ 179 CSR_WRITE_2(sc, reg, CSR_READ_2(sc, reg) & ~x) 180 181 #define STE_SETBIT1(sc, reg, x) \ 182 CSR_WRITE_1(sc, reg, CSR_READ_1(sc, reg) | x) 183 184 #define STE_CLRBIT1(sc, reg, x) \ 185 CSR_WRITE_1(sc, reg, CSR_READ_1(sc, reg) & ~x) 186 187 188 #define MII_SET(x) STE_SETBIT1(sc, STE_PHYCTL, x) 189 #define MII_CLR(x) STE_CLRBIT1(sc, STE_PHYCTL, x) 190 191 /* 192 * Sync the PHYs by setting data bit and strobing the clock 32 times. 193 */ 194 static void ste_mii_sync(sc) 195 struct ste_softc *sc; 196 { 197 int i; 198 199 MII_SET(STE_PHYCTL_MDIR|STE_PHYCTL_MDATA); 200 201 for (i = 0; i < 32; i++) { 202 MII_SET(STE_PHYCTL_MCLK); 203 DELAY(1); 204 MII_CLR(STE_PHYCTL_MCLK); 205 DELAY(1); 206 } 207 208 return; 209 } 210 211 /* 212 * Clock a series of bits through the MII. 213 */ 214 static void ste_mii_send(sc, bits, cnt) 215 struct ste_softc *sc; 216 u_int32_t bits; 217 int cnt; 218 { 219 int i; 220 221 MII_CLR(STE_PHYCTL_MCLK); 222 223 for (i = (0x1 << (cnt - 1)); i; i >>= 1) { 224 if (bits & i) { 225 MII_SET(STE_PHYCTL_MDATA); 226 } else { 227 MII_CLR(STE_PHYCTL_MDATA); 228 } 229 DELAY(1); 230 MII_CLR(STE_PHYCTL_MCLK); 231 DELAY(1); 232 MII_SET(STE_PHYCTL_MCLK); 233 } 234 } 235 236 /* 237 * Read an PHY register through the MII. 238 */ 239 static int ste_mii_readreg(sc, frame) 240 struct ste_softc *sc; 241 struct ste_mii_frame *frame; 242 243 { 244 int i, ack, s; 245 246 s = splimp(); 247 248 /* 249 * Set up frame for RX. 250 */ 251 frame->mii_stdelim = STE_MII_STARTDELIM; 252 frame->mii_opcode = STE_MII_READOP; 253 frame->mii_turnaround = 0; 254 frame->mii_data = 0; 255 256 CSR_WRITE_2(sc, STE_PHYCTL, 0); 257 /* 258 * Turn on data xmit. 259 */ 260 MII_SET(STE_PHYCTL_MDIR); 261 262 ste_mii_sync(sc); 263 264 /* 265 * Send command/address info. 266 */ 267 ste_mii_send(sc, frame->mii_stdelim, 2); 268 ste_mii_send(sc, frame->mii_opcode, 2); 269 ste_mii_send(sc, frame->mii_phyaddr, 5); 270 ste_mii_send(sc, frame->mii_regaddr, 5); 271 272 /* Turn off xmit. */ 273 MII_CLR(STE_PHYCTL_MDIR); 274 275 /* Idle bit */ 276 MII_CLR((STE_PHYCTL_MCLK|STE_PHYCTL_MDATA)); 277 DELAY(1); 278 MII_SET(STE_PHYCTL_MCLK); 279 DELAY(1); 280 281 /* Check for ack */ 282 MII_CLR(STE_PHYCTL_MCLK); 283 DELAY(1); 284 ack = CSR_READ_2(sc, STE_PHYCTL) & STE_PHYCTL_MDATA; 285 MII_SET(STE_PHYCTL_MCLK); 286 DELAY(1); 287 288 /* 289 * Now try reading data bits. If the ack failed, we still 290 * need to clock through 16 cycles to keep the PHY(s) in sync. 291 */ 292 if (ack) { 293 for(i = 0; i < 16; i++) { 294 MII_CLR(STE_PHYCTL_MCLK); 295 DELAY(1); 296 MII_SET(STE_PHYCTL_MCLK); 297 DELAY(1); 298 } 299 goto fail; 300 } 301 302 for (i = 0x8000; i; i >>= 1) { 303 MII_CLR(STE_PHYCTL_MCLK); 304 DELAY(1); 305 if (!ack) { 306 if (CSR_READ_2(sc, STE_PHYCTL) & STE_PHYCTL_MDATA) 307 frame->mii_data |= i; 308 DELAY(1); 309 } 310 MII_SET(STE_PHYCTL_MCLK); 311 DELAY(1); 312 } 313 314 fail: 315 316 MII_CLR(STE_PHYCTL_MCLK); 317 DELAY(1); 318 MII_SET(STE_PHYCTL_MCLK); 319 DELAY(1); 320 321 splx(s); 322 323 if (ack) 324 return(1); 325 return(0); 326 } 327 328 /* 329 * Write to a PHY register through the MII. 330 */ 331 static int ste_mii_writereg(sc, frame) 332 struct ste_softc *sc; 333 struct ste_mii_frame *frame; 334 335 { 336 int s; 337 338 s = splimp(); 339 /* 340 * Set up frame for TX. 341 */ 342 343 frame->mii_stdelim = STE_MII_STARTDELIM; 344 frame->mii_opcode = STE_MII_WRITEOP; 345 frame->mii_turnaround = STE_MII_TURNAROUND; 346 347 /* 348 * Turn on data output. 349 */ 350 MII_SET(STE_PHYCTL_MDIR); 351 352 ste_mii_sync(sc); 353 354 ste_mii_send(sc, frame->mii_stdelim, 2); 355 ste_mii_send(sc, frame->mii_opcode, 2); 356 ste_mii_send(sc, frame->mii_phyaddr, 5); 357 ste_mii_send(sc, frame->mii_regaddr, 5); 358 ste_mii_send(sc, frame->mii_turnaround, 2); 359 ste_mii_send(sc, frame->mii_data, 16); 360 361 /* Idle bit. */ 362 MII_SET(STE_PHYCTL_MCLK); 363 DELAY(1); 364 MII_CLR(STE_PHYCTL_MCLK); 365 DELAY(1); 366 367 /* 368 * Turn off xmit. 369 */ 370 MII_CLR(STE_PHYCTL_MDIR); 371 372 splx(s); 373 374 return(0); 375 } 376 377 static int ste_miibus_readreg(dev, phy, reg) 378 device_t dev; 379 int phy, reg; 380 { 381 struct ste_softc *sc; 382 struct ste_mii_frame frame; 383 384 sc = device_get_softc(dev); 385 386 if ( sc->ste_one_phy && phy != 0 ) 387 return (0); 388 389 bzero((char *)&frame, sizeof(frame)); 390 391 frame.mii_phyaddr = phy; 392 frame.mii_regaddr = reg; 393 ste_mii_readreg(sc, &frame); 394 395 return(frame.mii_data); 396 } 397 398 static int ste_miibus_writereg(dev, phy, reg, data) 399 device_t dev; 400 int phy, reg, data; 401 { 402 struct ste_softc *sc; 403 struct ste_mii_frame frame; 404 405 sc = device_get_softc(dev); 406 bzero((char *)&frame, sizeof(frame)); 407 408 frame.mii_phyaddr = phy; 409 frame.mii_regaddr = reg; 410 frame.mii_data = data; 411 412 ste_mii_writereg(sc, &frame); 413 414 return(0); 415 } 416 417 static void ste_miibus_statchg(dev) 418 device_t dev; 419 { 420 struct ste_softc *sc; 421 struct mii_data *mii; 422 int i; 423 424 sc = device_get_softc(dev); 425 mii = device_get_softc(sc->ste_miibus); 426 427 if ((mii->mii_media_active & IFM_GMASK) == IFM_FDX) { 428 STE_SETBIT2(sc, STE_MACCTL0, STE_MACCTL0_FULLDUPLEX); 429 } else { 430 STE_CLRBIT2(sc, STE_MACCTL0, STE_MACCTL0_FULLDUPLEX); 431 } 432 433 STE_SETBIT4(sc, STE_ASICCTL,STE_ASICCTL_RX_RESET | 434 STE_ASICCTL_TX_RESET); 435 for (i = 0; i < STE_TIMEOUT; i++) { 436 if (!(CSR_READ_4(sc, STE_ASICCTL) & STE_ASICCTL_RESET_BUSY)) 437 break; 438 } 439 if (i == STE_TIMEOUT) 440 printf("ste%d: rx reset never completed\n", sc->ste_unit); 441 442 return; 443 } 444 445 static int ste_ifmedia_upd(ifp) 446 struct ifnet *ifp; 447 { 448 struct ste_softc *sc; 449 struct mii_data *mii; 450 451 sc = ifp->if_softc; 452 mii = device_get_softc(sc->ste_miibus); 453 sc->ste_link = 0; 454 if (mii->mii_instance) { 455 struct mii_softc *miisc; 456 for (miisc = LIST_FIRST(&mii->mii_phys); miisc != NULL; 457 miisc = LIST_NEXT(miisc, mii_list)) 458 mii_phy_reset(miisc); 459 } 460 mii_mediachg(mii); 461 462 return(0); 463 } 464 465 static void ste_ifmedia_sts(ifp, ifmr) 466 struct ifnet *ifp; 467 struct ifmediareq *ifmr; 468 { 469 struct ste_softc *sc; 470 struct mii_data *mii; 471 472 sc = ifp->if_softc; 473 mii = device_get_softc(sc->ste_miibus); 474 475 mii_pollstat(mii); 476 ifmr->ifm_active = mii->mii_media_active; 477 ifmr->ifm_status = mii->mii_media_status; 478 479 return; 480 } 481 482 static void ste_wait(sc) 483 struct ste_softc *sc; 484 { 485 int i; 486 487 for (i = 0; i < STE_TIMEOUT; i++) { 488 if (!(CSR_READ_4(sc, STE_DMACTL) & STE_DMACTL_DMA_HALTINPROG)) 489 break; 490 } 491 492 if (i == STE_TIMEOUT) 493 printf("ste%d: command never completed!\n", sc->ste_unit); 494 495 return; 496 } 497 498 /* 499 * The EEPROM is slow: give it time to come ready after issuing 500 * it a command. 501 */ 502 static int ste_eeprom_wait(sc) 503 struct ste_softc *sc; 504 { 505 int i; 506 507 DELAY(1000); 508 509 for (i = 0; i < 100; i++) { 510 if (CSR_READ_2(sc, STE_EEPROM_CTL) & STE_EECTL_BUSY) 511 DELAY(1000); 512 else 513 break; 514 } 515 516 if (i == 100) { 517 printf("ste%d: eeprom failed to come ready\n", sc->ste_unit); 518 return(1); 519 } 520 521 return(0); 522 } 523 524 /* 525 * Read a sequence of words from the EEPROM. Note that ethernet address 526 * data is stored in the EEPROM in network byte order. 527 */ 528 static int ste_read_eeprom(sc, dest, off, cnt, swap) 529 struct ste_softc *sc; 530 caddr_t dest; 531 int off; 532 int cnt; 533 int swap; 534 { 535 int err = 0, i; 536 u_int16_t word = 0, *ptr; 537 538 if (ste_eeprom_wait(sc)) 539 return(1); 540 541 for (i = 0; i < cnt; i++) { 542 CSR_WRITE_2(sc, STE_EEPROM_CTL, STE_EEOPCODE_READ | (off + i)); 543 err = ste_eeprom_wait(sc); 544 if (err) 545 break; 546 word = CSR_READ_2(sc, STE_EEPROM_DATA); 547 ptr = (u_int16_t *)(dest + (i * 2)); 548 if (swap) 549 *ptr = ntohs(word); 550 else 551 *ptr = word; 552 } 553 554 return(err ? 1 : 0); 555 } 556 557 static u_int8_t ste_calchash(addr) 558 caddr_t addr; 559 { 560 561 u_int32_t crc, carry; 562 int i, j; 563 u_int8_t c; 564 565 /* Compute CRC for the address value. */ 566 crc = 0xFFFFFFFF; /* initial value */ 567 568 for (i = 0; i < 6; i++) { 569 c = *(addr + i); 570 for (j = 0; j < 8; j++) { 571 carry = ((crc & 0x80000000) ? 1 : 0) ^ (c & 0x01); 572 crc <<= 1; 573 c >>= 1; 574 if (carry) 575 crc = (crc ^ 0x04c11db6) | carry; 576 } 577 } 578 579 /* return the filter bit position */ 580 return(crc & 0x0000003F); 581 } 582 583 static void ste_setmulti(sc) 584 struct ste_softc *sc; 585 { 586 struct ifnet *ifp; 587 int h = 0; 588 u_int32_t hashes[2] = { 0, 0 }; 589 struct ifmultiaddr *ifma; 590 591 ifp = &sc->arpcom.ac_if; 592 if (ifp->if_flags & IFF_ALLMULTI || ifp->if_flags & IFF_PROMISC) { 593 STE_SETBIT1(sc, STE_RX_MODE, STE_RXMODE_ALLMULTI); 594 STE_CLRBIT1(sc, STE_RX_MODE, STE_RXMODE_MULTIHASH); 595 return; 596 } 597 598 /* first, zot all the existing hash bits */ 599 CSR_WRITE_2(sc, STE_MAR0, 0); 600 CSR_WRITE_2(sc, STE_MAR1, 0); 601 CSR_WRITE_2(sc, STE_MAR2, 0); 602 CSR_WRITE_2(sc, STE_MAR3, 0); 603 604 /* now program new ones */ 605 for (ifma = ifp->if_multiaddrs.lh_first; ifma != NULL; 606 ifma = ifma->ifma_link.le_next) { 607 if (ifma->ifma_addr->sa_family != AF_LINK) 608 continue; 609 h = ste_calchash(LLADDR((struct sockaddr_dl *)ifma->ifma_addr)); 610 if (h < 32) 611 hashes[0] |= (1 << h); 612 else 613 hashes[1] |= (1 << (h - 32)); 614 } 615 616 CSR_WRITE_2(sc, STE_MAR0, hashes[0] & 0xFFFF); 617 CSR_WRITE_2(sc, STE_MAR1, (hashes[0] >> 16) & 0xFFFF); 618 CSR_WRITE_2(sc, STE_MAR2, hashes[1] & 0xFFFF); 619 CSR_WRITE_2(sc, STE_MAR3, (hashes[1] >> 16) & 0xFFFF); 620 STE_CLRBIT1(sc, STE_RX_MODE, STE_RXMODE_ALLMULTI); 621 STE_SETBIT1(sc, STE_RX_MODE, STE_RXMODE_MULTIHASH); 622 623 return; 624 } 625 626 static void ste_intr(xsc) 627 void *xsc; 628 { 629 struct ste_softc *sc; 630 struct ifnet *ifp; 631 u_int16_t status; 632 633 sc = xsc; 634 ifp = &sc->arpcom.ac_if; 635 636 /* See if this is really our interrupt. */ 637 if (!(CSR_READ_2(sc, STE_ISR) & STE_ISR_INTLATCH)) 638 return; 639 640 for (;;) { 641 status = CSR_READ_2(sc, STE_ISR_ACK); 642 643 if (!(status & STE_INTRS)) 644 break; 645 646 if (status & STE_ISR_RX_DMADONE) 647 ste_rxeof(sc); 648 649 if (status & STE_ISR_TX_DMADONE) 650 ste_txeof(sc); 651 652 if (status & STE_ISR_TX_DONE) 653 ste_txeoc(sc); 654 655 if (status & STE_ISR_STATS_OFLOW) { 656 untimeout(ste_stats_update, sc, sc->ste_stat_ch); 657 ste_stats_update(sc); 658 } 659 660 if (status & STE_ISR_LINKEVENT) 661 mii_pollstat(device_get_softc(sc->ste_miibus)); 662 663 if (status & STE_ISR_HOSTERR) { 664 ste_reset(sc); 665 ste_init(sc); 666 } 667 } 668 669 /* Re-enable interrupts */ 670 CSR_WRITE_2(sc, STE_IMR, STE_INTRS); 671 672 if (ifp->if_snd.ifq_head != NULL) 673 ste_start(ifp); 674 675 return; 676 } 677 678 /* 679 * A frame has been uploaded: pass the resulting mbuf chain up to 680 * the higher level protocols. 681 */ 682 static void ste_rxeof(sc) 683 struct ste_softc *sc; 684 { 685 struct ether_header *eh; 686 struct mbuf *m; 687 struct ifnet *ifp; 688 struct ste_chain_onefrag *cur_rx; 689 int total_len = 0, count=0; 690 u_int32_t rxstat; 691 692 ifp = &sc->arpcom.ac_if; 693 694 while((rxstat = sc->ste_cdata.ste_rx_head->ste_ptr->ste_status) 695 & STE_RXSTAT_DMADONE) { 696 if ((STE_RX_LIST_CNT - count) < 3) { 697 break; 698 } 699 700 cur_rx = sc->ste_cdata.ste_rx_head; 701 sc->ste_cdata.ste_rx_head = cur_rx->ste_next; 702 703 /* 704 * If an error occurs, update stats, clear the 705 * status word and leave the mbuf cluster in place: 706 * it should simply get re-used next time this descriptor 707 * comes up in the ring. 708 */ 709 if (rxstat & STE_RXSTAT_FRAME_ERR) { 710 ifp->if_ierrors++; 711 cur_rx->ste_ptr->ste_status = 0; 712 continue; 713 } 714 715 /* 716 * If there error bit was not set, the upload complete 717 * bit should be set which means we have a valid packet. 718 * If not, something truly strange has happened. 719 */ 720 if (!(rxstat & STE_RXSTAT_DMADONE)) { 721 printf("ste%d: bad receive status -- packet dropped", 722 sc->ste_unit); 723 ifp->if_ierrors++; 724 cur_rx->ste_ptr->ste_status = 0; 725 continue; 726 } 727 728 /* No errors; receive the packet. */ 729 m = cur_rx->ste_mbuf; 730 total_len = cur_rx->ste_ptr->ste_status & STE_RXSTAT_FRAMELEN; 731 732 /* 733 * Try to conjure up a new mbuf cluster. If that 734 * fails, it means we have an out of memory condition and 735 * should leave the buffer in place and continue. This will 736 * result in a lost packet, but there's little else we 737 * can do in this situation. 738 */ 739 if (ste_newbuf(sc, cur_rx, NULL) == ENOBUFS) { 740 ifp->if_ierrors++; 741 cur_rx->ste_ptr->ste_status = 0; 742 continue; 743 } 744 745 ifp->if_ipackets++; 746 eh = mtod(m, struct ether_header *); 747 m->m_pkthdr.rcvif = ifp; 748 m->m_pkthdr.len = m->m_len = total_len; 749 750 /* Remove header from mbuf and pass it on. */ 751 m_adj(m, sizeof(struct ether_header)); 752 ether_input(ifp, eh, m); 753 754 cur_rx->ste_ptr->ste_status = 0; 755 count++; 756 } 757 758 return; 759 } 760 761 static void ste_txeoc(sc) 762 struct ste_softc *sc; 763 { 764 u_int8_t txstat; 765 struct ifnet *ifp; 766 767 ifp = &sc->arpcom.ac_if; 768 769 while ((txstat = CSR_READ_1(sc, STE_TX_STATUS)) & 770 STE_TXSTATUS_TXDONE) { 771 if (txstat & STE_TXSTATUS_UNDERRUN || 772 txstat & STE_TXSTATUS_EXCESSCOLLS || 773 txstat & STE_TXSTATUS_RECLAIMERR) { 774 ifp->if_oerrors++; 775 printf("ste%d: transmission error: %x\n", 776 sc->ste_unit, txstat); 777 778 ste_reset(sc); 779 ste_init(sc); 780 781 if (txstat & STE_TXSTATUS_UNDERRUN && 782 sc->ste_tx_thresh < STE_PACKET_SIZE) { 783 sc->ste_tx_thresh += STE_MIN_FRAMELEN; 784 printf("ste%d: tx underrun, increasing tx" 785 " start threshold to %d bytes\n", 786 sc->ste_unit, sc->ste_tx_thresh); 787 } 788 CSR_WRITE_2(sc, STE_TX_STARTTHRESH, sc->ste_tx_thresh); 789 CSR_WRITE_2(sc, STE_TX_RECLAIM_THRESH, 790 (STE_PACKET_SIZE >> 4)); 791 } 792 ste_init(sc); 793 CSR_WRITE_2(sc, STE_TX_STATUS, txstat); 794 } 795 796 return; 797 } 798 799 static void ste_txeof(sc) 800 struct ste_softc *sc; 801 { 802 struct ste_chain *cur_tx = NULL; 803 struct ifnet *ifp; 804 int idx; 805 806 ifp = &sc->arpcom.ac_if; 807 808 idx = sc->ste_cdata.ste_tx_cons; 809 while(idx != sc->ste_cdata.ste_tx_prod) { 810 cur_tx = &sc->ste_cdata.ste_tx_chain[idx]; 811 812 if (!(cur_tx->ste_ptr->ste_ctl & STE_TXCTL_DMADONE)) 813 break; 814 815 if (cur_tx->ste_mbuf != NULL) { 816 m_freem(cur_tx->ste_mbuf); 817 cur_tx->ste_mbuf = NULL; 818 } 819 820 ifp->if_opackets++; 821 822 sc->ste_cdata.ste_tx_cnt--; 823 STE_INC(idx, STE_TX_LIST_CNT); 824 ifp->if_timer = 0; 825 } 826 827 sc->ste_cdata.ste_tx_cons = idx; 828 829 if (cur_tx != NULL) 830 ifp->if_flags &= ~IFF_OACTIVE; 831 832 return; 833 } 834 835 static void ste_stats_update(xsc) 836 void *xsc; 837 { 838 struct ste_softc *sc; 839 struct ifnet *ifp; 840 struct mii_data *mii; 841 int s; 842 843 s = splimp(); 844 845 sc = xsc; 846 ifp = &sc->arpcom.ac_if; 847 mii = device_get_softc(sc->ste_miibus); 848 849 ifp->if_collisions += CSR_READ_1(sc, STE_LATE_COLLS) 850 + CSR_READ_1(sc, STE_MULTI_COLLS) 851 + CSR_READ_1(sc, STE_SINGLE_COLLS); 852 853 if (!sc->ste_link) { 854 mii_pollstat(mii); 855 if (mii->mii_media_status & IFM_ACTIVE && 856 IFM_SUBTYPE(mii->mii_media_active) != IFM_NONE) { 857 sc->ste_link++; 858 /* 859 * we don't get a call-back on re-init so do it 860 * otherwise we get stuck in the wrong link state 861 */ 862 ste_miibus_statchg(sc->ste_dev); 863 if (ifp->if_snd.ifq_head != NULL) 864 ste_start(ifp); 865 } 866 } 867 868 sc->ste_stat_ch = timeout(ste_stats_update, sc, hz); 869 splx(s); 870 871 return; 872 } 873 874 875 /* 876 * Probe for a Sundance ST201 chip. Check the PCI vendor and device 877 * IDs against our list and return a device name if we find a match. 878 */ 879 static int ste_probe(dev) 880 device_t dev; 881 { 882 struct ste_type *t; 883 884 t = ste_devs; 885 886 while(t->ste_name != NULL) { 887 if ((pci_get_vendor(dev) == t->ste_vid) && 888 (pci_get_device(dev) == t->ste_did)) { 889 device_set_desc(dev, t->ste_name); 890 return(0); 891 } 892 t++; 893 } 894 895 return(ENXIO); 896 } 897 898 /* 899 * Attach the interface. Allocate softc structures, do ifmedia 900 * setup and ethernet/BPF attach. 901 */ 902 static int ste_attach(dev) 903 device_t dev; 904 { 905 int s; 906 u_int32_t command; 907 struct ste_softc *sc; 908 struct ifnet *ifp; 909 int unit, error = 0, rid; 910 911 s = splimp(); 912 913 sc = device_get_softc(dev); 914 unit = device_get_unit(dev); 915 bzero(sc, sizeof(struct ste_softc)); 916 sc->ste_dev = dev; 917 918 /* 919 * Only use one PHY since this chip reports multiple 920 * Note on the DFE-550 the PHY is at 1 on the DFE-580 921 * it is at 0 & 1. It is rev 0x12. 922 */ 923 if (pci_get_vendor(dev) == DL_VENDORID && 924 pci_get_device(dev) == DL_DEVICEID_550TX && 925 pci_get_revid(dev) == 0x12 ) 926 sc->ste_one_phy = 1; 927 928 /* 929 * Handle power management nonsense. 930 */ 931 command = pci_read_config(dev, STE_PCI_CAPID, 4) & 0x000000FF; 932 if (command == 0x01) { 933 934 command = pci_read_config(dev, STE_PCI_PWRMGMTCTRL, 4); 935 if (command & STE_PSTATE_MASK) { 936 u_int32_t iobase, membase, irq; 937 938 /* Save important PCI config data. */ 939 iobase = pci_read_config(dev, STE_PCI_LOIO, 4); 940 membase = pci_read_config(dev, STE_PCI_LOMEM, 4); 941 irq = pci_read_config(dev, STE_PCI_INTLINE, 4); 942 943 /* Reset the power state. */ 944 printf("ste%d: chip is in D%d power mode " 945 "-- setting to D0\n", unit, command & STE_PSTATE_MASK); 946 command &= 0xFFFFFFFC; 947 pci_write_config(dev, STE_PCI_PWRMGMTCTRL, command, 4); 948 949 /* Restore PCI config data. */ 950 pci_write_config(dev, STE_PCI_LOIO, iobase, 4); 951 pci_write_config(dev, STE_PCI_LOMEM, membase, 4); 952 pci_write_config(dev, STE_PCI_INTLINE, irq, 4); 953 } 954 } 955 956 /* 957 * Map control/status registers. 958 */ 959 command = pci_read_config(dev, PCIR_COMMAND, 4); 960 command |= (PCIM_CMD_PORTEN|PCIM_CMD_MEMEN|PCIM_CMD_BUSMASTEREN); 961 pci_write_config(dev, PCIR_COMMAND, command, 4); 962 command = pci_read_config(dev, PCIR_COMMAND, 4); 963 964 #ifdef STE_USEIOSPACE 965 if (!(command & PCIM_CMD_PORTEN)) { 966 printf("ste%d: failed to enable I/O ports!\n", unit); 967 error = ENXIO; 968 goto fail; 969 } 970 #else 971 if (!(command & PCIM_CMD_MEMEN)) { 972 printf("ste%d: failed to enable memory mapping!\n", unit); 973 error = ENXIO; 974 goto fail; 975 } 976 #endif 977 978 rid = STE_RID; 979 sc->ste_res = bus_alloc_resource(dev, STE_RES, &rid, 980 0, ~0, 1, RF_ACTIVE); 981 982 if (sc->ste_res == NULL) { 983 printf ("ste%d: couldn't map ports/memory\n", unit); 984 error = ENXIO; 985 goto fail; 986 } 987 988 sc->ste_btag = rman_get_bustag(sc->ste_res); 989 sc->ste_bhandle = rman_get_bushandle(sc->ste_res); 990 991 rid = 0; 992 sc->ste_irq = bus_alloc_resource(dev, SYS_RES_IRQ, &rid, 0, ~0, 1, 993 RF_SHAREABLE | RF_ACTIVE); 994 995 if (sc->ste_irq == NULL) { 996 printf("ste%d: couldn't map interrupt\n", unit); 997 bus_release_resource(dev, STE_RES, STE_RID, sc->ste_res); 998 error = ENXIO; 999 goto fail; 1000 } 1001 1002 error = bus_setup_intr(dev, sc->ste_irq, INTR_TYPE_NET, 1003 ste_intr, sc, &sc->ste_intrhand); 1004 1005 if (error) { 1006 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->ste_irq); 1007 bus_release_resource(dev, STE_RES, STE_RID, sc->ste_res); 1008 printf("ste%d: couldn't set up irq\n", unit); 1009 goto fail; 1010 } 1011 1012 callout_handle_init(&sc->ste_stat_ch); 1013 1014 /* Reset the adapter. */ 1015 ste_reset(sc); 1016 1017 /* 1018 * Get station address from the EEPROM. 1019 */ 1020 if (ste_read_eeprom(sc, (caddr_t)&sc->arpcom.ac_enaddr, 1021 STE_EEADDR_NODE0, 3, 0)) { 1022 printf("ste%d: failed to read station address\n", unit); 1023 bus_teardown_intr(dev, sc->ste_irq, sc->ste_intrhand); 1024 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->ste_irq); 1025 bus_release_resource(dev, STE_RES, STE_RID, sc->ste_res); 1026 error = ENXIO;; 1027 goto fail; 1028 } 1029 1030 sc->ste_unit = unit; 1031 1032 /* Allocate the descriptor queues. */ 1033 sc->ste_ldata = contigmalloc(sizeof(struct ste_list_data), M_DEVBUF, 1034 M_NOWAIT, 0, 0xffffffff, PAGE_SIZE, 0); 1035 1036 if (sc->ste_ldata == NULL) { 1037 printf("ste%d: no memory for list buffers!\n", unit); 1038 bus_teardown_intr(dev, sc->ste_irq, sc->ste_intrhand); 1039 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->ste_irq); 1040 bus_release_resource(dev, STE_RES, STE_RID, sc->ste_res); 1041 error = ENXIO; 1042 goto fail; 1043 } 1044 1045 bzero(sc->ste_ldata, sizeof(struct ste_list_data)); 1046 1047 /* Do MII setup. */ 1048 if (mii_phy_probe(dev, &sc->ste_miibus, 1049 ste_ifmedia_upd, ste_ifmedia_sts)) { 1050 printf("ste%d: MII without any phy!\n", sc->ste_unit); 1051 bus_teardown_intr(dev, sc->ste_irq, sc->ste_intrhand); 1052 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->ste_irq); 1053 bus_release_resource(dev, STE_RES, STE_RID, sc->ste_res); 1054 contigfree(sc->ste_ldata, 1055 sizeof(struct ste_list_data), M_DEVBUF); 1056 error = ENXIO; 1057 goto fail; 1058 } 1059 1060 ifp = &sc->arpcom.ac_if; 1061 ifp->if_softc = sc; 1062 if_initname(ifp, "ste", unit); 1063 ifp->if_mtu = ETHERMTU; 1064 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST; 1065 ifp->if_ioctl = ste_ioctl; 1066 ifp->if_output = ether_output; 1067 ifp->if_start = ste_start; 1068 ifp->if_watchdog = ste_watchdog; 1069 ifp->if_init = ste_init; 1070 ifp->if_baudrate = 10000000; 1071 ifp->if_snd.ifq_maxlen = STE_TX_LIST_CNT - 1; 1072 1073 sc->ste_tx_thresh = STE_TXSTART_THRESH; 1074 1075 /* 1076 * Call MI attach routine. 1077 */ 1078 ether_ifattach(ifp, sc->arpcom.ac_enaddr); 1079 1080 /* 1081 * Tell the upper layer(s) we support long frames. 1082 */ 1083 ifp->if_data.ifi_hdrlen = sizeof(struct ether_vlan_header); 1084 1085 fail: 1086 splx(s); 1087 return(error); 1088 } 1089 1090 static int ste_detach(dev) 1091 device_t dev; 1092 { 1093 struct ste_softc *sc; 1094 struct ifnet *ifp; 1095 int s; 1096 1097 s = splimp(); 1098 1099 sc = device_get_softc(dev); 1100 ifp = &sc->arpcom.ac_if; 1101 1102 ste_stop(sc); 1103 ether_ifdetach(ifp); 1104 1105 bus_generic_detach(dev); 1106 device_delete_child(dev, sc->ste_miibus); 1107 1108 bus_teardown_intr(dev, sc->ste_irq, sc->ste_intrhand); 1109 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->ste_irq); 1110 bus_release_resource(dev, STE_RES, STE_RID, sc->ste_res); 1111 1112 contigfree(sc->ste_ldata, sizeof(struct ste_list_data), M_DEVBUF); 1113 1114 splx(s); 1115 1116 return(0); 1117 } 1118 1119 static int ste_newbuf(sc, c, m) 1120 struct ste_softc *sc; 1121 struct ste_chain_onefrag *c; 1122 struct mbuf *m; 1123 { 1124 struct mbuf *m_new = NULL; 1125 1126 if (m == NULL) { 1127 MGETHDR(m_new, MB_DONTWAIT, MT_DATA); 1128 if (m_new == NULL) 1129 return(ENOBUFS); 1130 MCLGET(m_new, MB_DONTWAIT); 1131 if (!(m_new->m_flags & M_EXT)) { 1132 m_freem(m_new); 1133 return(ENOBUFS); 1134 } 1135 m_new->m_len = m_new->m_pkthdr.len = MCLBYTES; 1136 } else { 1137 m_new = m; 1138 m_new->m_len = m_new->m_pkthdr.len = MCLBYTES; 1139 m_new->m_data = m_new->m_ext.ext_buf; 1140 } 1141 1142 m_adj(m_new, ETHER_ALIGN); 1143 1144 c->ste_mbuf = m_new; 1145 c->ste_ptr->ste_status = 0; 1146 c->ste_ptr->ste_frag.ste_addr = vtophys(mtod(m_new, caddr_t)); 1147 c->ste_ptr->ste_frag.ste_len = (1536 + EVL_ENCAPLEN) | STE_FRAG_LAST; 1148 1149 return(0); 1150 } 1151 1152 static int ste_init_rx_list(sc) 1153 struct ste_softc *sc; 1154 { 1155 struct ste_chain_data *cd; 1156 struct ste_list_data *ld; 1157 int i; 1158 1159 cd = &sc->ste_cdata; 1160 ld = sc->ste_ldata; 1161 1162 for (i = 0; i < STE_RX_LIST_CNT; i++) { 1163 cd->ste_rx_chain[i].ste_ptr = &ld->ste_rx_list[i]; 1164 if (ste_newbuf(sc, &cd->ste_rx_chain[i], NULL) == ENOBUFS) 1165 return(ENOBUFS); 1166 if (i == (STE_RX_LIST_CNT - 1)) { 1167 cd->ste_rx_chain[i].ste_next = 1168 &cd->ste_rx_chain[0]; 1169 ld->ste_rx_list[i].ste_next = 1170 vtophys(&ld->ste_rx_list[0]); 1171 } else { 1172 cd->ste_rx_chain[i].ste_next = 1173 &cd->ste_rx_chain[i + 1]; 1174 ld->ste_rx_list[i].ste_next = 1175 vtophys(&ld->ste_rx_list[i + 1]); 1176 } 1177 ld->ste_rx_list[i].ste_status = 0; 1178 } 1179 1180 cd->ste_rx_head = &cd->ste_rx_chain[0]; 1181 1182 return(0); 1183 } 1184 1185 static void ste_init_tx_list(sc) 1186 struct ste_softc *sc; 1187 { 1188 struct ste_chain_data *cd; 1189 struct ste_list_data *ld; 1190 int i; 1191 1192 cd = &sc->ste_cdata; 1193 ld = sc->ste_ldata; 1194 for (i = 0; i < STE_TX_LIST_CNT; i++) { 1195 cd->ste_tx_chain[i].ste_ptr = &ld->ste_tx_list[i]; 1196 cd->ste_tx_chain[i].ste_ptr->ste_next = 0; 1197 cd->ste_tx_chain[i].ste_ptr->ste_ctl = 0; 1198 cd->ste_tx_chain[i].ste_phys = vtophys(&ld->ste_tx_list[i]); 1199 if (i == (STE_TX_LIST_CNT - 1)) 1200 cd->ste_tx_chain[i].ste_next = 1201 &cd->ste_tx_chain[0]; 1202 else 1203 cd->ste_tx_chain[i].ste_next = 1204 &cd->ste_tx_chain[i + 1]; 1205 if (i == 0) 1206 cd->ste_tx_chain[i].ste_prev = 1207 &cd->ste_tx_chain[STE_TX_LIST_CNT - 1]; 1208 else 1209 cd->ste_tx_chain[i].ste_prev = 1210 &cd->ste_tx_chain[i - 1]; 1211 } 1212 1213 cd->ste_tx_prod = 0; 1214 cd->ste_tx_cons = 0; 1215 cd->ste_tx_cnt = 0; 1216 1217 return; 1218 } 1219 1220 static void ste_init(xsc) 1221 void *xsc; 1222 { 1223 struct ste_softc *sc; 1224 int i, s; 1225 struct ifnet *ifp; 1226 struct mii_data *mii; 1227 1228 s = splimp(); 1229 1230 sc = xsc; 1231 ifp = &sc->arpcom.ac_if; 1232 mii = device_get_softc(sc->ste_miibus); 1233 1234 ste_stop(sc); 1235 1236 /* Init our MAC address */ 1237 for (i = 0; i < ETHER_ADDR_LEN; i++) { 1238 CSR_WRITE_1(sc, STE_PAR0 + i, sc->arpcom.ac_enaddr[i]); 1239 } 1240 1241 /* Init RX list */ 1242 if (ste_init_rx_list(sc) == ENOBUFS) { 1243 printf("ste%d: initialization failed: no " 1244 "memory for RX buffers\n", sc->ste_unit); 1245 ste_stop(sc); 1246 splx(s); 1247 return; 1248 } 1249 1250 /* Set RX polling interval */ 1251 CSR_WRITE_1(sc, STE_RX_DMAPOLL_PERIOD, 1); 1252 1253 /* Init TX descriptors */ 1254 ste_init_tx_list(sc); 1255 1256 /* Set the TX freethresh value */ 1257 CSR_WRITE_1(sc, STE_TX_DMABURST_THRESH, STE_PACKET_SIZE >> 8); 1258 1259 /* Set the TX start threshold for best performance. */ 1260 CSR_WRITE_2(sc, STE_TX_STARTTHRESH, sc->ste_tx_thresh); 1261 1262 /* Set the TX reclaim threshold. */ 1263 CSR_WRITE_1(sc, STE_TX_RECLAIM_THRESH, (STE_PACKET_SIZE >> 4)); 1264 1265 /* Set up the RX filter. */ 1266 CSR_WRITE_1(sc, STE_RX_MODE, STE_RXMODE_UNICAST); 1267 1268 /* If we want promiscuous mode, set the allframes bit. */ 1269 if (ifp->if_flags & IFF_PROMISC) { 1270 STE_SETBIT1(sc, STE_RX_MODE, STE_RXMODE_PROMISC); 1271 } else { 1272 STE_CLRBIT1(sc, STE_RX_MODE, STE_RXMODE_PROMISC); 1273 } 1274 1275 /* Set capture broadcast bit to accept broadcast frames. */ 1276 if (ifp->if_flags & IFF_BROADCAST) { 1277 STE_SETBIT1(sc, STE_RX_MODE, STE_RXMODE_BROADCAST); 1278 } else { 1279 STE_CLRBIT1(sc, STE_RX_MODE, STE_RXMODE_BROADCAST); 1280 } 1281 1282 ste_setmulti(sc); 1283 1284 /* Load the address of the RX list. */ 1285 STE_SETBIT4(sc, STE_DMACTL, STE_DMACTL_RXDMA_STALL); 1286 ste_wait(sc); 1287 CSR_WRITE_4(sc, STE_RX_DMALIST_PTR, 1288 vtophys(&sc->ste_ldata->ste_rx_list[0])); 1289 STE_SETBIT4(sc, STE_DMACTL, STE_DMACTL_RXDMA_UNSTALL); 1290 STE_SETBIT4(sc, STE_DMACTL, STE_DMACTL_RXDMA_UNSTALL); 1291 1292 /* Set TX polling interval (defer until we TX first packet */ 1293 CSR_WRITE_1(sc, STE_TX_DMAPOLL_PERIOD, 0); 1294 1295 /* Load address of the TX list */ 1296 STE_SETBIT4(sc, STE_DMACTL, STE_DMACTL_TXDMA_STALL); 1297 ste_wait(sc); 1298 CSR_WRITE_4(sc, STE_TX_DMALIST_PTR, 0); 1299 STE_SETBIT4(sc, STE_DMACTL, STE_DMACTL_TXDMA_UNSTALL); 1300 STE_SETBIT4(sc, STE_DMACTL, STE_DMACTL_TXDMA_UNSTALL); 1301 ste_wait(sc); 1302 sc->ste_tx_prev_idx=-1; 1303 1304 /* Enable receiver and transmitter */ 1305 CSR_WRITE_2(sc, STE_MACCTL0, 0); 1306 CSR_WRITE_2(sc, STE_MACCTL1, 0); 1307 STE_SETBIT2(sc, STE_MACCTL1, STE_MACCTL1_TX_ENABLE); 1308 STE_SETBIT2(sc, STE_MACCTL1, STE_MACCTL1_RX_ENABLE); 1309 1310 /* Enable stats counters. */ 1311 STE_SETBIT2(sc, STE_MACCTL1, STE_MACCTL1_STATS_ENABLE); 1312 1313 /* Enable interrupts. */ 1314 CSR_WRITE_2(sc, STE_ISR, 0xFFFF); 1315 CSR_WRITE_2(sc, STE_IMR, STE_INTRS); 1316 1317 /* Accept VLAN length packets */ 1318 CSR_WRITE_2(sc, STE_MAX_FRAMELEN, ETHER_MAX_LEN + EVL_ENCAPLEN); 1319 1320 ste_ifmedia_upd(ifp); 1321 1322 ifp->if_flags |= IFF_RUNNING; 1323 ifp->if_flags &= ~IFF_OACTIVE; 1324 1325 splx(s); 1326 1327 sc->ste_stat_ch = timeout(ste_stats_update, sc, hz); 1328 1329 return; 1330 } 1331 1332 static void ste_stop(sc) 1333 struct ste_softc *sc; 1334 { 1335 int i; 1336 struct ifnet *ifp; 1337 1338 ifp = &sc->arpcom.ac_if; 1339 1340 untimeout(ste_stats_update, sc, sc->ste_stat_ch); 1341 1342 CSR_WRITE_2(sc, STE_IMR, 0); 1343 STE_SETBIT2(sc, STE_MACCTL1, STE_MACCTL1_TX_DISABLE); 1344 STE_SETBIT2(sc, STE_MACCTL1, STE_MACCTL1_RX_DISABLE); 1345 STE_SETBIT2(sc, STE_MACCTL1, STE_MACCTL1_STATS_DISABLE); 1346 STE_SETBIT2(sc, STE_DMACTL, STE_DMACTL_TXDMA_STALL); 1347 STE_SETBIT2(sc, STE_DMACTL, STE_DMACTL_RXDMA_STALL); 1348 ste_wait(sc); 1349 /* 1350 * Try really hard to stop the RX engine or under heavy RX 1351 * data chip will write into de-allocated memory. 1352 */ 1353 ste_reset(sc); 1354 1355 sc->ste_link = 0; 1356 1357 for (i = 0; i < STE_RX_LIST_CNT; i++) { 1358 if (sc->ste_cdata.ste_rx_chain[i].ste_mbuf != NULL) { 1359 m_freem(sc->ste_cdata.ste_rx_chain[i].ste_mbuf); 1360 sc->ste_cdata.ste_rx_chain[i].ste_mbuf = NULL; 1361 } 1362 } 1363 1364 for (i = 0; i < STE_TX_LIST_CNT; i++) { 1365 if (sc->ste_cdata.ste_tx_chain[i].ste_mbuf != NULL) { 1366 m_freem(sc->ste_cdata.ste_tx_chain[i].ste_mbuf); 1367 sc->ste_cdata.ste_tx_chain[i].ste_mbuf = NULL; 1368 } 1369 } 1370 1371 bzero(sc->ste_ldata, sizeof(struct ste_list_data)); 1372 1373 ifp->if_flags &= ~(IFF_RUNNING|IFF_OACTIVE); 1374 1375 return; 1376 } 1377 1378 static void ste_reset(sc) 1379 struct ste_softc *sc; 1380 { 1381 int i; 1382 1383 STE_SETBIT4(sc, STE_ASICCTL, 1384 STE_ASICCTL_GLOBAL_RESET|STE_ASICCTL_RX_RESET| 1385 STE_ASICCTL_TX_RESET|STE_ASICCTL_DMA_RESET| 1386 STE_ASICCTL_FIFO_RESET|STE_ASICCTL_NETWORK_RESET| 1387 STE_ASICCTL_AUTOINIT_RESET|STE_ASICCTL_HOST_RESET| 1388 STE_ASICCTL_EXTRESET_RESET); 1389 1390 DELAY(100000); 1391 1392 for (i = 0; i < STE_TIMEOUT; i++) { 1393 if (!(CSR_READ_4(sc, STE_ASICCTL) & STE_ASICCTL_RESET_BUSY)) 1394 break; 1395 } 1396 1397 if (i == STE_TIMEOUT) 1398 printf("ste%d: global reset never completed\n", sc->ste_unit); 1399 1400 return; 1401 } 1402 1403 static int ste_ioctl(ifp, command, data, cr) 1404 struct ifnet *ifp; 1405 u_long command; 1406 caddr_t data; 1407 struct ucred *cr; 1408 { 1409 struct ste_softc *sc; 1410 struct ifreq *ifr; 1411 struct mii_data *mii; 1412 int error = 0, s; 1413 1414 s = splimp(); 1415 1416 sc = ifp->if_softc; 1417 ifr = (struct ifreq *)data; 1418 1419 switch(command) { 1420 case SIOCSIFADDR: 1421 case SIOCGIFADDR: 1422 case SIOCSIFMTU: 1423 error = ether_ioctl(ifp, command, data); 1424 break; 1425 case SIOCSIFFLAGS: 1426 if (ifp->if_flags & IFF_UP) { 1427 if (ifp->if_flags & IFF_RUNNING && 1428 ifp->if_flags & IFF_PROMISC && 1429 !(sc->ste_if_flags & IFF_PROMISC)) { 1430 STE_SETBIT1(sc, STE_RX_MODE, 1431 STE_RXMODE_PROMISC); 1432 } else if (ifp->if_flags & IFF_RUNNING && 1433 !(ifp->if_flags & IFF_PROMISC) && 1434 sc->ste_if_flags & IFF_PROMISC) { 1435 STE_CLRBIT1(sc, STE_RX_MODE, 1436 STE_RXMODE_PROMISC); 1437 } 1438 if (!(ifp->if_flags & IFF_RUNNING)) { 1439 sc->ste_tx_thresh = STE_TXSTART_THRESH; 1440 ste_init(sc); 1441 } 1442 } else { 1443 if (ifp->if_flags & IFF_RUNNING) 1444 ste_stop(sc); 1445 } 1446 sc->ste_if_flags = ifp->if_flags; 1447 error = 0; 1448 break; 1449 case SIOCADDMULTI: 1450 case SIOCDELMULTI: 1451 ste_setmulti(sc); 1452 error = 0; 1453 break; 1454 case SIOCGIFMEDIA: 1455 case SIOCSIFMEDIA: 1456 mii = device_get_softc(sc->ste_miibus); 1457 error = ifmedia_ioctl(ifp, ifr, &mii->mii_media, command); 1458 break; 1459 default: 1460 error = EINVAL; 1461 break; 1462 } 1463 1464 splx(s); 1465 1466 return(error); 1467 } 1468 1469 static int ste_encap(sc, c, m_head) 1470 struct ste_softc *sc; 1471 struct ste_chain *c; 1472 struct mbuf *m_head; 1473 { 1474 int frag = 0; 1475 struct ste_frag *f = NULL; 1476 struct mbuf *m; 1477 struct ste_desc *d; 1478 int total_len = 0; 1479 1480 d = c->ste_ptr; 1481 d->ste_ctl = 0; 1482 1483 encap_retry: 1484 for (m = m_head, frag = 0; m != NULL; m = m->m_next) { 1485 if (m->m_len != 0) { 1486 if (frag == STE_MAXFRAGS) 1487 break; 1488 total_len += m->m_len; 1489 f = &d->ste_frags[frag]; 1490 f->ste_addr = vtophys(mtod(m, vm_offset_t)); 1491 f->ste_len = m->m_len; 1492 frag++; 1493 } 1494 } 1495 1496 if (m != NULL) { 1497 struct mbuf *mn; 1498 1499 /* 1500 * We ran out of segments. We have to recopy this 1501 * mbuf chain first. Bail out if we can't get the 1502 * new buffers. Code borrowed from if_fxp.c. 1503 */ 1504 MGETHDR(mn, MB_DONTWAIT, MT_DATA); 1505 if (mn == NULL) { 1506 m_freem(m_head); 1507 return ENOMEM; 1508 } 1509 if (m_head->m_pkthdr.len > MHLEN) { 1510 MCLGET(mn, MB_DONTWAIT); 1511 if ((mn->m_flags & M_EXT) == 0) { 1512 m_freem(mn); 1513 m_freem(m_head); 1514 return ENOMEM; 1515 } 1516 } 1517 m_copydata(m_head, 0, m_head->m_pkthdr.len, 1518 mtod(mn, caddr_t)); 1519 mn->m_pkthdr.len = mn->m_len = m_head->m_pkthdr.len; 1520 m_freem(m_head); 1521 m_head = mn; 1522 goto encap_retry; 1523 } 1524 1525 c->ste_mbuf = m_head; 1526 d->ste_frags[frag - 1].ste_len |= STE_FRAG_LAST; 1527 d->ste_ctl = 1; 1528 1529 return(0); 1530 } 1531 1532 static void ste_start(ifp) 1533 struct ifnet *ifp; 1534 { 1535 struct ste_softc *sc; 1536 struct mbuf *m_head = NULL; 1537 struct ste_chain *cur_tx = NULL; 1538 int idx; 1539 1540 sc = ifp->if_softc; 1541 1542 if (!sc->ste_link) 1543 return; 1544 1545 if (ifp->if_flags & IFF_OACTIVE) 1546 return; 1547 1548 idx = sc->ste_cdata.ste_tx_prod; 1549 1550 while(sc->ste_cdata.ste_tx_chain[idx].ste_mbuf == NULL) { 1551 1552 if ((STE_TX_LIST_CNT - sc->ste_cdata.ste_tx_cnt) < 3) { 1553 ifp->if_flags |= IFF_OACTIVE; 1554 break; 1555 } 1556 1557 IF_DEQUEUE(&ifp->if_snd, m_head); 1558 if (m_head == NULL) 1559 break; 1560 1561 cur_tx = &sc->ste_cdata.ste_tx_chain[idx]; 1562 1563 if (ste_encap(sc, cur_tx, m_head) != 0) 1564 break; 1565 1566 cur_tx->ste_ptr->ste_next = 0; 1567 1568 if(sc->ste_tx_prev_idx < 0){ 1569 cur_tx->ste_ptr->ste_ctl = STE_TXCTL_DMAINTR | 1; 1570 /* Load address of the TX list */ 1571 STE_SETBIT4(sc, STE_DMACTL, STE_DMACTL_TXDMA_STALL); 1572 ste_wait(sc); 1573 1574 CSR_WRITE_4(sc, STE_TX_DMALIST_PTR, 1575 vtophys(&sc->ste_ldata->ste_tx_list[0])); 1576 1577 /* Set TX polling interval to start TX engine */ 1578 CSR_WRITE_1(sc, STE_TX_DMAPOLL_PERIOD, 64); 1579 1580 STE_SETBIT4(sc, STE_DMACTL, STE_DMACTL_TXDMA_UNSTALL); 1581 ste_wait(sc); 1582 }else{ 1583 cur_tx->ste_ptr->ste_ctl = STE_TXCTL_DMAINTR | 1; 1584 sc->ste_cdata.ste_tx_chain[ 1585 sc->ste_tx_prev_idx].ste_ptr->ste_next 1586 = cur_tx->ste_phys; 1587 } 1588 1589 sc->ste_tx_prev_idx=idx; 1590 1591 /* 1592 * If there's a BPF listener, bounce a copy of this frame 1593 * to him. 1594 */ 1595 if (ifp->if_bpf) 1596 bpf_mtap(ifp, cur_tx->ste_mbuf); 1597 1598 STE_INC(idx, STE_TX_LIST_CNT); 1599 sc->ste_cdata.ste_tx_cnt++; 1600 ifp->if_timer = 5; 1601 sc->ste_cdata.ste_tx_prod = idx; 1602 } 1603 1604 return; 1605 } 1606 1607 static void ste_watchdog(ifp) 1608 struct ifnet *ifp; 1609 { 1610 struct ste_softc *sc; 1611 1612 sc = ifp->if_softc; 1613 1614 ifp->if_oerrors++; 1615 printf("ste%d: watchdog timeout\n", sc->ste_unit); 1616 1617 ste_txeoc(sc); 1618 ste_txeof(sc); 1619 ste_rxeof(sc); 1620 ste_reset(sc); 1621 ste_init(sc); 1622 1623 if (ifp->if_snd.ifq_head != NULL) 1624 ste_start(ifp); 1625 1626 return; 1627 } 1628 1629 static void ste_shutdown(dev) 1630 device_t dev; 1631 { 1632 struct ste_softc *sc; 1633 1634 sc = device_get_softc(dev); 1635 1636 ste_stop(sc); 1637 1638 return; 1639 } 1640