1 /* $NetBSD: if_iy.c,v 1.32 1999/02/28 17:09:26 explorer Exp $ */ 2 /* #define IYDEBUG */ 3 /* #define IYMEMDEBUG */ 4 5 /*- 6 * Copyright (c) 1996 The NetBSD Foundation, Inc. 7 * All rights reserved. 8 * 9 * This code is derived from software contributed to The NetBSD Foundation 10 * by Ignatios Souvatzis. 11 * 12 * Redistribution and use in source and binary forms, with or without 13 * modification, are permitted provided that the following conditions 14 * are met: 15 * 1. Redistributions of source code must retain the above copyright 16 * notice, this list of conditions and the following disclaimer. 17 * 2. Redistributions in binary form must reproduce the above copyright 18 * notice, this list of conditions and the following disclaimer in the 19 * documentation and/or other materials provided with the distribution. 20 * 3. All advertising materials mentioning features or use of this software 21 * must display the following acknowledgement: 22 * This product includes software developed by the NetBSD 23 * Foundation, Inc. and its contributors. 24 * 4. Neither the name of The NetBSD Foundation nor the names of its 25 * contributors may be used to endorse or promote products derived 26 * from this software without specific prior written permission. 27 * 28 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 29 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 30 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 31 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 32 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 33 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 34 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 35 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 36 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 37 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 38 * POSSIBILITY OF SUCH DAMAGE. 39 */ 40 41 /* 42 * Supported hardware: 43 * 44 * - Intel EtherExpress Pro/10. 45 * - possibly other boards using the i82595 chip and no special tweaks. 46 */ 47 48 #include "opt_inet.h" 49 #include "opt_ns.h" 50 #include "bpfilter.h" 51 #include "rnd.h" 52 53 #include <sys/param.h> 54 #include <sys/systm.h> 55 #include <sys/mbuf.h> 56 #include <sys/buf.h> 57 #include <sys/protosw.h> 58 #include <sys/socket.h> 59 #include <sys/ioctl.h> 60 #include <sys/errno.h> 61 #include <sys/syslog.h> 62 #include <sys/device.h> 63 #if NRND > 0 64 #include <sys/rnd.h> 65 #endif 66 67 #include <net/if.h> 68 #include <net/if_types.h> 69 #include <net/if_dl.h> 70 71 #include <net/if_ether.h> 72 73 #if NBPFILTER > 0 74 #include <net/bpf.h> 75 #include <net/bpfdesc.h> 76 #endif 77 78 #ifdef INET 79 #include <netinet/in.h> 80 #include <netinet/in_systm.h> 81 #include <netinet/in_var.h> 82 #include <netinet/ip.h> 83 #include <netinet/if_inarp.h> 84 #endif 85 86 #ifdef NS 87 #include <netns/ns.h> 88 #include <netns/ns_if.h> 89 #endif 90 91 #if defined(SIOCSIFMEDIA) 92 #include <net/if_media.h> 93 #endif 94 95 #include <vm/vm.h> 96 97 #include <machine/cpu.h> 98 #include <machine/bus.h> 99 #include <machine/intr.h> 100 101 #include <dev/isa/isareg.h> 102 #include <dev/isa/isavar.h> 103 #include <dev/ic/i82595reg.h> 104 105 #define ETHER_MIN_LEN (ETHERMIN + sizeof(struct ether_header) + 4) 106 #define ETHER_MAX_LEN (ETHERMTU + sizeof(struct ether_header) + 4) 107 108 /* 109 * Ethernet status, per interface. 110 */ 111 struct iy_softc { 112 struct device sc_dev; 113 void *sc_ih; 114 115 bus_space_tag_t sc_iot; 116 bus_space_handle_t sc_ioh; 117 118 struct ethercom sc_ethercom; 119 120 struct ifmedia iy_ifmedia; 121 int iy_media; 122 123 int mappedirq; 124 125 int hard_vers; 126 127 int promisc; 128 129 int sram, tx_size, rx_size; 130 131 int tx_start, tx_end, tx_last; 132 int rx_start; 133 134 int doing_mc_setup; 135 #ifdef IYDEBUG 136 int sc_debug; 137 #endif 138 139 #if NRND > 0 140 rndsource_element_t rnd_source; 141 #endif 142 }; 143 144 void iywatchdog __P((struct ifnet *)); 145 int iyioctl __P((struct ifnet *, u_long, caddr_t)); 146 int iyintr __P((void *)); 147 void iyinit __P((struct iy_softc *)); 148 void iystop __P((struct iy_softc *)); 149 void iystart __P((struct ifnet *)); 150 151 void iy_intr_rx __P((struct iy_softc *)); 152 void iy_intr_tx __P((struct iy_softc *)); 153 154 void iyreset __P((struct iy_softc *)); 155 void iy_readframe __P((struct iy_softc *, int)); 156 void iy_drop_packet_buffer __P((struct iy_softc *)); 157 void iy_find_mem_size __P((struct iy_softc *)); 158 void iyrint __P((struct iy_softc *)); 159 void iytint __P((struct iy_softc *)); 160 void iyxmit __P((struct iy_softc *)); 161 static void iy_mc_setup __P((struct iy_softc *)); 162 static void iy_mc_reset __P((struct iy_softc *)); 163 void iyget __P((struct iy_softc *, bus_space_tag_t, bus_space_handle_t, int)); 164 void iyprobemem __P((struct iy_softc *)); 165 static __inline void eepromwritebit __P((bus_space_tag_t, bus_space_handle_t, 166 int)); 167 static __inline int eepromreadbit __P((bus_space_tag_t, bus_space_handle_t)); 168 169 #ifdef IYDEBUGX 170 void print_rbd __P((volatile struct iy_recv_buf_desc *)); 171 172 int in_ifrint = 0; 173 int in_iftint = 0; 174 #endif 175 176 int iy_mediachange __P((struct ifnet *)); 177 void iy_mediastatus __P((struct ifnet *, struct ifmediareq *)); 178 179 int iyprobe __P((struct device *, struct cfdata *, void *)); 180 void iyattach __P((struct device *, struct device *, void *)); 181 182 static u_int16_t eepromread __P((bus_space_tag_t, bus_space_handle_t, int)); 183 184 static int eepromreadall __P((bus_space_tag_t, bus_space_handle_t, u_int16_t *, 185 int)); 186 187 struct cfattach iy_ca = { 188 sizeof(struct iy_softc), iyprobe, iyattach 189 }; 190 191 static u_int8_t eepro_irqmap[] = EEPP_INTMAP; 192 static u_int8_t eepro_revirqmap[] = EEPP_RINTMAP; 193 194 int 195 iyprobe(parent, match, aux) 196 struct device *parent; 197 struct cfdata *match; 198 void *aux; 199 { 200 struct isa_attach_args *ia = aux; 201 u_int16_t eaddr[8]; 202 203 bus_space_tag_t iot; 204 bus_space_handle_t ioh; 205 206 u_int8_t c, d; 207 208 iot = ia->ia_iot; 209 210 if (ia->ia_iobase == IOBASEUNK) 211 return 0; 212 213 if (bus_space_map(iot, ia->ia_iobase, 16, 0, &ioh)) 214 return 0; 215 216 /* try to find the round robin sig: */ 217 218 c = bus_space_read_1(iot, ioh, ID_REG); 219 if ((c & ID_REG_MASK) != ID_REG_SIG) 220 goto out; 221 222 d = bus_space_read_1(iot, ioh, ID_REG); 223 if ((d & ID_REG_MASK) != ID_REG_SIG) 224 goto out; 225 226 if (((d-c) & R_ROBIN_BITS) != 0x40) 227 goto out; 228 229 d = bus_space_read_1(iot, ioh, ID_REG); 230 if ((d & ID_REG_MASK) != ID_REG_SIG) 231 goto out; 232 233 if (((d-c) & R_ROBIN_BITS) != 0x80) 234 goto out; 235 236 d = bus_space_read_1(iot, ioh, ID_REG); 237 if ((d & ID_REG_MASK) != ID_REG_SIG) 238 goto out; 239 240 if (((d-c) & R_ROBIN_BITS) != 0xC0) 241 goto out; 242 243 d = bus_space_read_1(iot, ioh, ID_REG); 244 if ((d & ID_REG_MASK) != ID_REG_SIG) 245 goto out; 246 247 if (((d-c) & R_ROBIN_BITS) != 0x00) 248 goto out; 249 250 #ifdef IYDEBUG 251 printf("iyprobe verified working ID reg.\n"); 252 #endif 253 254 if (eepromreadall(iot, ioh, eaddr, 8)) 255 goto out; 256 257 if (ia->ia_irq == IRQUNK) 258 ia->ia_irq = eepro_irqmap[eaddr[EEPPW1] & EEPP_Int]; 259 260 if (ia->ia_irq >= sizeof(eepro_revirqmap)) 261 goto out; 262 263 if (eepro_revirqmap[ia->ia_irq] == 0xff) 264 goto out; 265 266 /* now lets reset the chip */ 267 268 bus_space_write_1(iot, ioh, COMMAND_REG, RESET_CMD); 269 delay(200); 270 271 ia->ia_iosize = 16; 272 273 bus_space_unmap(iot, ioh, 16); 274 return 1; /* found */ 275 out: 276 bus_space_unmap(iot, ioh, 16); 277 return 0; 278 } 279 280 void 281 iyattach(parent, self, aux) 282 struct device *parent, *self; 283 void *aux; 284 { 285 struct iy_softc *sc = (void *)self; 286 struct isa_attach_args *ia = aux; 287 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 288 bus_space_tag_t iot; 289 bus_space_handle_t ioh; 290 unsigned temp; 291 u_int16_t eaddr[8]; 292 u_int8_t myaddr[ETHER_ADDR_LEN]; 293 int eirq; 294 295 iot = ia->ia_iot; 296 297 if (bus_space_map(iot, ia->ia_iobase, 16, 0, &ioh)) { 298 printf(": can't map i/o space\n"); 299 return; 300 } 301 302 sc->sc_iot = iot; 303 sc->sc_ioh = ioh; 304 305 sc->mappedirq = eepro_revirqmap[ia->ia_irq]; 306 307 /* now let's reset the chip */ 308 309 bus_space_write_1(iot, ioh, COMMAND_REG, RESET_CMD); 310 delay(200); 311 312 iyprobemem(sc); 313 314 bcopy(sc->sc_dev.dv_xname, ifp->if_xname, IFNAMSIZ); 315 ifp->if_softc = sc; 316 ifp->if_start = iystart; 317 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS 318 | IFF_MULTICAST; 319 320 sc->doing_mc_setup = 0; 321 322 ifp->if_ioctl = iyioctl; 323 ifp->if_watchdog = iywatchdog; 324 325 (void)eepromreadall(iot, ioh, eaddr, 8); 326 sc->hard_vers = eaddr[EEPW6] & EEPP_BoardRev; 327 328 #ifdef DIAGNOSTICS 329 if ((eaddr[EEPPEther0] != 330 eepromread(iot, ioh, EEPPEther0a)) && 331 (eaddr[EEPPEther1] != 332 eepromread(iot, ioh, EEPPEther1a)) && 333 (eaddr[EEPPEther2] != 334 eepromread(iot, ioh, EEPPEther2a))) 335 336 printf("EEPROM Ethernet address differs from copy\n"); 337 #endif 338 339 myaddr[1] = eaddr[EEPPEther0] & 0xFF; 340 myaddr[0] = eaddr[EEPPEther0] >> 8; 341 myaddr[3] = eaddr[EEPPEther1] & 0xFF; 342 myaddr[2] = eaddr[EEPPEther1] >> 8; 343 myaddr[5] = eaddr[EEPPEther2] & 0xFF; 344 myaddr[4] = eaddr[EEPPEther2] >> 8; 345 346 ifmedia_init(&sc->iy_ifmedia, 0, iy_mediachange, iy_mediastatus); 347 ifmedia_add(&sc->iy_ifmedia, IFM_ETHER | IFM_10_2, 0, NULL); 348 ifmedia_add(&sc->iy_ifmedia, IFM_ETHER | IFM_10_5, 0, NULL); 349 ifmedia_add(&sc->iy_ifmedia, IFM_ETHER | IFM_10_T, 0, NULL); 350 ifmedia_add(&sc->iy_ifmedia, IFM_ETHER | IFM_AUTO, 0, NULL); 351 ifmedia_set(&sc->iy_ifmedia, IFM_ETHER | IFM_AUTO); 352 /* Attach the interface. */ 353 if_attach(ifp); 354 ether_ifattach(ifp, myaddr); 355 printf(": address %s, rev. %d, %d kB\n", 356 ether_sprintf(myaddr), 357 sc->hard_vers, sc->sram/1024); 358 359 eirq = eepro_irqmap[eaddr[EEPPW1] & EEPP_Int]; 360 if (eirq != ia->ia_irq) 361 printf("%s: EEPROM irq setting %d ignored\n", 362 sc->sc_dev.dv_xname, eirq); 363 364 #if NBPFILTER > 0 365 bpfattach(&ifp->if_bpf, ifp, DLT_EN10MB, sizeof(struct ether_header)); 366 #endif 367 368 sc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq, IST_EDGE, 369 IPL_NET, iyintr, sc); 370 371 #if NRND > 0 372 rnd_attach_source(&sc->rnd_source, sc->sc_dev.dv_xname, 373 RND_TYPE_NET, 0); 374 #endif 375 376 temp = bus_space_read_1(iot, ioh, INT_NO_REG); 377 bus_space_write_1(iot, ioh, INT_NO_REG, (temp & 0xf8) | sc->mappedirq); 378 } 379 380 void 381 iystop(sc) 382 struct iy_softc *sc; 383 { 384 bus_space_tag_t iot; 385 bus_space_handle_t ioh; 386 #ifdef IYDEBUG 387 u_int p, v; 388 #endif 389 390 iot = sc->sc_iot; 391 ioh = sc->sc_ioh; 392 393 bus_space_write_1(iot, ioh, COMMAND_REG, RCV_DISABLE_CMD); 394 395 bus_space_write_1(iot, ioh, INT_MASK_REG, ALL_INTS); 396 bus_space_write_1(iot, ioh, STATUS_REG, ALL_INTS); 397 398 bus_space_write_1(iot, ioh, COMMAND_REG, RESET_CMD); 399 delay(200); 400 #ifdef IYDEBUG 401 printf("%s: dumping tx chain (st 0x%x end 0x%x last 0x%x)\n", 402 sc->sc_dev.dv_xname, sc->tx_start, sc->tx_end, sc->tx_last); 403 p = sc->tx_last; 404 if (!p) 405 p = sc->tx_start; 406 do { 407 bus_space_write_2(iot, ioh, HOST_ADDR_REG, p); 408 v = bus_space_read_2(iot, ioh, MEM_PORT_REG); 409 printf("0x%04x: %b ", p, v, "\020\006Ab\010Dn"); 410 v = bus_space_read_2(iot, ioh, MEM_PORT_REG); 411 printf("0x%b", v, "\020\6MAX_COL\7HRT_BEAT\010TX_DEF\011UND_RUN\012JERR\013LST_CRS\014LTCOL\016TX_OK\020COLL"); 412 p = bus_space_read_2(iot, ioh, MEM_PORT_REG); 413 printf(" 0x%04x", p); 414 v = bus_space_read_2(iot, ioh, MEM_PORT_REG); 415 printf(" 0x%b\n", v, "\020\020Ch"); 416 417 } while (v & 0x8000); 418 #endif 419 sc->tx_start = sc->tx_end = sc->rx_size; 420 sc->tx_last = 0; 421 sc->sc_ethercom.ec_if.if_flags &= ~(IFF_RUNNING|IFF_OACTIVE); 422 } 423 424 void 425 iyreset(sc) 426 struct iy_softc *sc; 427 { 428 int s; 429 s = splnet(); 430 iystop(sc); 431 iyinit(sc); 432 splx(s); 433 } 434 435 void 436 iyinit(sc) 437 struct iy_softc *sc; 438 { 439 int i; 440 unsigned temp; 441 struct ifnet *ifp; 442 bus_space_tag_t iot; 443 bus_space_handle_t ioh; 444 445 iot = sc->sc_iot; 446 ioh = sc->sc_ioh; 447 448 ifp = &sc->sc_ethercom.ec_if; 449 #ifdef IYDEBUG 450 printf("ifp is %p\n", ifp); 451 #endif 452 453 bus_space_write_1(iot, ioh, 0, BANK_SEL(2)); 454 455 temp = bus_space_read_1(iot, ioh, EEPROM_REG); 456 if (temp & 0x10) 457 bus_space_write_1(iot, ioh, EEPROM_REG, temp & ~0x10); 458 459 for (i=0; i<6; ++i) { 460 bus_space_write_1(iot, ioh, I_ADD(i), LLADDR(ifp->if_sadl)[i]); 461 } 462 463 temp = bus_space_read_1(iot, ioh, REG1); 464 bus_space_write_1(iot, ioh, REG1, 465 temp | XMT_CHAIN_INT | XMT_CHAIN_ERRSTOP | RCV_DISCARD_BAD); 466 467 if (ifp->if_flags & (IFF_PROMISC|IFF_ALLMULTI)) { 468 temp = MATCH_ALL; 469 } else if (sc->sc_ethercom.ec_multicnt) { 470 temp = MATCH_MULTI; 471 } else 472 temp = MATCH_ID; 473 474 bus_space_write_1(iot, ioh, RECV_MODES_REG, temp); 475 476 #ifdef IYDEBUG 477 printf("%s: RECV_MODES set to %b\n", sc->sc_dev.dv_xname, 478 temp, "\020\1PRMSC\2NOBRDST\3SEECRC\4LENGTH\5NOSaIns\6MultiIA"); 479 #endif 480 /* XXX VOODOO */ 481 temp = bus_space_read_1(iot, ioh, MEDIA_SELECT); 482 bus_space_write_1(iot, ioh, MEDIA_SELECT, temp); 483 /* XXX END OF VOODOO */ 484 485 486 delay(500000); /* for the hardware to test for the connector */ 487 488 temp = bus_space_read_1(iot, ioh, MEDIA_SELECT); 489 #ifdef IYDEBUG 490 printf("%s: media select was 0x%b ", sc->sc_dev.dv_xname, 491 temp, "\020\1LnkInDis\2PolCor\3TPE\4JabberDis\5NoAport\6BNC"); 492 #endif 493 temp = (temp & TEST_MODE_MASK); 494 495 switch(IFM_SUBTYPE(sc->iy_ifmedia.ifm_media)) { 496 case IFM_10_5: 497 temp &= ~ (BNC_BIT | TPE_BIT); 498 break; 499 500 case IFM_10_2: 501 temp = (temp & ~TPE_BIT) | BNC_BIT; 502 break; 503 504 case IFM_10_T: 505 temp = (temp & ~BNC_BIT) | TPE_BIT; 506 break; 507 default: 508 /* nothing; leave as it is */ 509 } 510 switch (temp & (BNC_BIT | TPE_BIT)) { 511 case BNC_BIT: 512 sc->iy_media = IFM_ETHER | IFM_10_2; 513 break; 514 case TPE_BIT: 515 sc->iy_media = IFM_ETHER | IFM_10_T; 516 break; 517 default: 518 sc->iy_media = IFM_ETHER | IFM_10_5; 519 } 520 521 bus_space_write_1(iot, ioh, MEDIA_SELECT, temp); 522 #ifdef IYDEBUG 523 printf("changed to 0x%b\n", 524 temp, "\020\1LnkInDis\2PolCor\3TPE\4JabberDis\5NoAport\6BNC"); 525 #endif 526 527 bus_space_write_1(iot, ioh, 0, BANK_SEL(0)); 528 bus_space_write_1(iot, ioh, INT_MASK_REG, ALL_INTS); 529 bus_space_write_1(iot, ioh, 0, BANK_SEL(1)); 530 531 temp = bus_space_read_1(iot, ioh, INT_NO_REG); 532 bus_space_write_1(iot, ioh, INT_NO_REG, (temp & 0xf8) | sc->mappedirq); 533 534 #ifdef IYDEBUG 535 printf("%s: int no was %b\n", sc->sc_dev.dv_xname, 536 temp, "\020\4bad_irq\010flash/boot present"); 537 temp = bus_space_read_1(iot, ioh, INT_NO_REG); 538 printf("%s: int no now 0x%02x\n", sc->sc_dev.dv_xname, 539 temp, "\020\4BAD IRQ\010flash/boot present"); 540 #endif 541 542 543 bus_space_write_1(iot, ioh, RCV_LOWER_LIMIT_REG, 0); 544 bus_space_write_1(iot, ioh, RCV_UPPER_LIMIT_REG, (sc->rx_size - 2) >> 8); 545 bus_space_write_1(iot, ioh, XMT_LOWER_LIMIT_REG, sc->rx_size >> 8); 546 bus_space_write_1(iot, ioh, XMT_UPPER_LIMIT_REG, sc->sram >> 8); 547 548 temp = bus_space_read_1(iot, ioh, REG1); 549 #ifdef IYDEBUG 550 printf("%s: HW access is %b\n", sc->sc_dev.dv_xname, 551 temp, "\020\2WORD_WIDTH\010INT_ENABLE"); 552 #endif 553 bus_space_write_1(iot, ioh, REG1, temp | INT_ENABLE); /* XXX what about WORD_WIDTH? */ 554 555 #ifdef IYDEBUG 556 temp = bus_space_read_1(iot, ioh, REG1); 557 printf("%s: HW access is %b\n", sc->sc_dev.dv_xname, 558 temp, "\020\2WORD_WIDTH\010INT_ENABLE"); 559 #endif 560 561 bus_space_write_1(iot, ioh, 0, BANK_SEL(0)); 562 563 bus_space_write_1(iot, ioh, INT_MASK_REG, ALL_INTS & ~(RX_BIT|TX_BIT)); 564 bus_space_write_1(iot, ioh, STATUS_REG, ALL_INTS); /* clear ints */ 565 566 bus_space_write_2(iot, ioh, RCV_START_LOW, 0); 567 bus_space_write_2(iot, ioh, RCV_STOP_LOW, sc->rx_size - 2); 568 sc->rx_start = 0; 569 570 bus_space_write_1(iot, ioh, 0, SEL_RESET_CMD); 571 delay(200); 572 573 bus_space_write_2(iot, ioh, XMT_ADDR_REG, sc->rx_size); 574 575 sc->tx_start = sc->tx_end = sc->rx_size; 576 sc->tx_last = 0; 577 578 bus_space_write_1(iot, ioh, 0, RCV_ENABLE_CMD); 579 580 ifp->if_flags |= IFF_RUNNING; 581 ifp->if_flags &= ~IFF_OACTIVE; 582 } 583 584 void 585 iystart(ifp) 586 struct ifnet *ifp; 587 { 588 struct iy_softc *sc; 589 590 591 struct mbuf *m0, *m; 592 u_int len, pad, last, end; 593 u_int llen, residual; 594 int avail; 595 caddr_t data; 596 u_int16_t resval, stat; 597 bus_space_tag_t iot; 598 bus_space_handle_t ioh; 599 600 #ifdef IYDEBUG 601 printf("iystart called\n"); 602 #endif 603 sc = ifp->if_softc; 604 605 if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE)) != IFF_RUNNING) 606 return; 607 608 iot = sc->sc_iot; 609 ioh = sc->sc_ioh; 610 611 while ((m0 = ifp->if_snd.ifq_head) != NULL) { 612 #ifdef IYDEBUG 613 printf("%s: trying to write another packet to the hardware\n", 614 sc->sc_dev.dv_xname); 615 #endif 616 617 /* We need to use m->m_pkthdr.len, so require the header */ 618 if ((m0->m_flags & M_PKTHDR) == 0) 619 panic("iystart: no header mbuf"); 620 621 len = m0->m_pkthdr.len; 622 pad = len & 1; 623 624 #ifdef IYDEBUG 625 printf("%s: length is %d.\n", sc->sc_dev.dv_xname, len); 626 #endif 627 if (len < ETHER_MIN_LEN) { 628 pad = ETHER_MIN_LEN - len; 629 } 630 631 if (len + pad > ETHER_MAX_LEN) { 632 /* packet is obviously too large: toss it */ 633 ++ifp->if_oerrors; 634 IF_DEQUEUE(&ifp->if_snd, m0); 635 m_freem(m0); 636 continue; 637 } 638 639 #if NBPFILTER > 0 640 if (ifp->if_bpf) 641 bpf_mtap(ifp->if_bpf, m0); 642 #endif 643 644 avail = sc->tx_start - sc->tx_end; 645 if (avail <= 0) 646 avail += sc->tx_size; 647 648 #ifdef IYDEBUG 649 printf("%s: avail is %d.\n", sc->sc_dev.dv_xname, avail); 650 #endif 651 /* 652 * we MUST RUN at splnet here --- 653 * XXX todo: or even turn off the boards ints ??? hm... 654 */ 655 656 /* See if there is room to put another packet in the buffer. */ 657 658 if ((len+pad+2*I595_XMT_HDRLEN) > avail) { 659 #ifdef IYDEBUG 660 printf("%s: len = %d, avail = %d, setting OACTIVE\n", 661 sc->sc_dev.dv_xname, len, avail); 662 #endif 663 ifp->if_flags |= IFF_OACTIVE; 664 return; 665 } 666 667 /* we know it fits in the hardware now, so dequeue it */ 668 IF_DEQUEUE(&ifp->if_snd, m0); 669 670 last = sc->tx_end; 671 end = last + pad + len + I595_XMT_HDRLEN; 672 673 if (end >= sc->sram) { 674 if ((sc->sram - last) <= I595_XMT_HDRLEN) { 675 /* keep header in one piece */ 676 last = sc->rx_size; 677 end = last + pad + len + I595_XMT_HDRLEN; 678 } else 679 end -= sc->tx_size; 680 } 681 682 bus_space_write_2(iot, ioh, HOST_ADDR_REG, last); 683 bus_space_write_2(iot, ioh, MEM_PORT_REG, XMT_CMD); 684 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0); 685 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0); 686 bus_space_write_2(iot, ioh, MEM_PORT_REG, len + pad); 687 688 residual = resval = 0; 689 690 while ((m = m0)!=0) { 691 data = mtod(m, caddr_t); 692 llen = m->m_len; 693 if (residual) { 694 #ifdef IYDEBUG 695 printf("%s: merging residual with next mbuf.\n", 696 sc->sc_dev.dv_xname); 697 #endif 698 resval |= *data << 8; 699 bus_space_write_2(iot, ioh, MEM_PORT_REG, resval); 700 --llen; 701 ++data; 702 } 703 if (llen > 1) 704 bus_space_write_multi_2(iot, ioh, MEM_PORT_REG, 705 data, llen>>1); 706 residual = llen & 1; 707 if (residual) { 708 resval = *(data + llen - 1); 709 #ifdef IYDEBUG 710 printf("%s: got odd mbuf to send.\n", 711 sc->sc_dev.dv_xname); 712 #endif 713 } 714 715 MFREE(m, m0); 716 } 717 718 if (residual) 719 bus_space_write_2(iot, ioh, MEM_PORT_REG, resval); 720 721 pad >>= 1; 722 while (pad-- > 0) 723 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0); 724 725 #ifdef IYDEBUG 726 printf("%s: new last = 0x%x, end = 0x%x.\n", 727 sc->sc_dev.dv_xname, last, end); 728 printf("%s: old start = 0x%x, end = 0x%x, last = 0x%x\n", 729 sc->sc_dev.dv_xname, sc->tx_start, sc->tx_end, sc->tx_last); 730 #endif 731 732 if (sc->tx_start != sc->tx_end) { 733 bus_space_write_2(iot, ioh, HOST_ADDR_REG, sc->tx_last + XMT_COUNT); 734 stat = bus_space_read_2(iot, ioh, MEM_PORT_REG); 735 736 bus_space_write_2(iot, ioh, HOST_ADDR_REG, sc->tx_last + XMT_CHAIN); 737 bus_space_write_2(iot, ioh, MEM_PORT_REG, last); 738 bus_space_write_2(iot, ioh, MEM_PORT_REG, stat | CHAIN); 739 #ifdef IYDEBUG 740 printf("%s: setting 0x%x to 0x%x\n", 741 sc->sc_dev.dv_xname, sc->tx_last + XMT_COUNT, 742 stat | CHAIN); 743 #endif 744 } 745 stat = bus_space_read_2(iot, ioh, MEM_PORT_REG); /* dummy read */ 746 747 /* XXX todo: enable ints here if disabled */ 748 749 ++ifp->if_opackets; 750 751 if (sc->tx_start == sc->tx_end) { 752 bus_space_write_2(iot, ioh, XMT_ADDR_REG, last); 753 bus_space_write_1(iot, ioh, 0, XMT_CMD); 754 sc->tx_start = last; 755 #ifdef IYDEBUG 756 printf("%s: writing 0x%x to XAR and giving XCMD\n", 757 sc->sc_dev.dv_xname, last); 758 #endif 759 } else { 760 bus_space_write_1(iot, ioh, 0, RESUME_XMT_CMD); 761 #ifdef IYDEBUG 762 printf("%s: giving RESUME_XCMD\n", 763 sc->sc_dev.dv_xname); 764 #endif 765 } 766 sc->tx_last = last; 767 sc->tx_end = end; 768 } 769 } 770 771 772 static __inline void 773 eepromwritebit(iot, ioh, what) 774 bus_space_tag_t iot; 775 bus_space_handle_t ioh; 776 int what; 777 { 778 bus_space_write_1(iot, ioh, EEPROM_REG, what); 779 delay(1); 780 bus_space_write_1(iot, ioh, EEPROM_REG, what|EESK); 781 delay(1); 782 bus_space_write_1(iot, ioh, EEPROM_REG, what); 783 delay(1); 784 } 785 786 static __inline int 787 eepromreadbit(iot, ioh) 788 bus_space_tag_t iot; 789 bus_space_handle_t ioh; 790 { 791 int b; 792 793 bus_space_write_1(iot, ioh, EEPROM_REG, EECS|EESK); 794 delay(1); 795 b = bus_space_read_1(iot, ioh, EEPROM_REG); 796 bus_space_write_1(iot, ioh, EEPROM_REG, EECS); 797 delay(1); 798 799 return ((b & EEDO) != 0); 800 } 801 802 static u_int16_t 803 eepromread(iot, ioh, offset) 804 bus_space_tag_t iot; 805 bus_space_handle_t ioh; 806 int offset; 807 { 808 volatile int i; 809 volatile int j; 810 volatile u_int16_t readval; 811 812 bus_space_write_1(iot, ioh, 0, BANK_SEL(2)); 813 delay(1); 814 bus_space_write_1(iot, ioh, EEPROM_REG, EECS); /* XXXX??? */ 815 delay(1); 816 817 eepromwritebit(iot, ioh, EECS|EEDI); 818 eepromwritebit(iot, ioh, EECS|EEDI); 819 eepromwritebit(iot, ioh, EECS); 820 821 for (j=5; j>=0; --j) { 822 if ((offset>>j) & 1) 823 eepromwritebit(iot, ioh, EECS|EEDI); 824 else 825 eepromwritebit(iot, ioh, EECS); 826 } 827 828 for (readval=0, i=0; i<16; ++i) { 829 readval<<=1; 830 readval |= eepromreadbit(iot, ioh); 831 } 832 833 bus_space_write_1(iot, ioh, EEPROM_REG, 0|EESK); 834 delay(1); 835 bus_space_write_1(iot, ioh, EEPROM_REG, 0); 836 837 bus_space_write_1(iot, ioh, COMMAND_REG, BANK_SEL(0)); 838 839 return readval; 840 } 841 842 /* 843 * Device timeout/watchdog routine. Entered if the device neglects to generate 844 * an interrupt after a transmit has been started on it. 845 */ 846 void 847 iywatchdog(ifp) 848 struct ifnet *ifp; 849 { 850 struct iy_softc *sc = ifp->if_softc; 851 852 log(LOG_ERR, "%s: device timeout\n", sc->sc_dev.dv_xname); 853 ++sc->sc_ethercom.ec_if.if_oerrors; 854 iyreset(sc); 855 } 856 857 /* 858 * What to do upon receipt of an interrupt. 859 */ 860 int 861 iyintr(arg) 862 void *arg; 863 { 864 struct iy_softc *sc = arg; 865 bus_space_tag_t iot; 866 bus_space_handle_t ioh; 867 868 register u_short status; 869 870 iot = sc->sc_iot; 871 ioh = sc->sc_ioh; 872 873 status = bus_space_read_1(iot, ioh, STATUS_REG); 874 #ifdef IYDEBUG 875 if (status & ALL_INTS) { 876 printf("%s: got interupt %b", sc->sc_dev.dv_xname, status, 877 "\020\1RX_STP\2RX\3TX\4EXEC"); 878 if (status & EXEC_INT) 879 printf(" event %b\n", bus_space_read_1(iot, ioh, 0), 880 "\020\6ABORT"); 881 else 882 printf("\n"); 883 } 884 #endif 885 if ((status & (RX_INT | TX_INT)) == 0) 886 return 0; 887 888 if (status & RX_INT) { 889 iy_intr_rx(sc); 890 bus_space_write_1(iot, ioh, STATUS_REG, RX_INT); 891 } 892 if (status & TX_INT) { 893 iy_intr_tx(sc); 894 bus_space_write_1(iot, ioh, STATUS_REG, TX_INT); 895 } 896 897 #if NRND > 0 898 rnd_add_uint32(&sc->rnd_source, status); 899 #endif 900 901 return 1; 902 } 903 904 void 905 iyget(sc, iot, ioh, rxlen) 906 struct iy_softc *sc; 907 bus_space_tag_t iot; 908 bus_space_handle_t ioh; 909 int rxlen; 910 { 911 struct mbuf *m, *top, **mp; 912 struct ether_header *eh; 913 struct ifnet *ifp; 914 int len; 915 916 ifp = &sc->sc_ethercom.ec_if; 917 918 MGETHDR(m, M_DONTWAIT, MT_DATA); 919 if (m == 0) 920 goto dropped; 921 m->m_pkthdr.rcvif = ifp; 922 m->m_pkthdr.len = rxlen; 923 len = MHLEN; 924 top = 0; 925 mp = ⊤ 926 927 while (rxlen > 0) { 928 if (top) { 929 MGET(m, M_DONTWAIT, MT_DATA); 930 if (m == 0) { 931 m_freem(top); 932 goto dropped; 933 } 934 len = MLEN; 935 } 936 if (rxlen >= MINCLSIZE) { 937 MCLGET(m, M_DONTWAIT); 938 if ((m->m_flags & M_EXT) == 0) { 939 m_free(m); 940 m_freem(top); 941 goto dropped; 942 } 943 len = MCLBYTES; 944 } 945 len = min(rxlen, len); 946 if (len > 1) { 947 len &= ~1; 948 949 bus_space_read_multi_2(iot, ioh, MEM_PORT_REG, 950 mtod(m, caddr_t), len/2); 951 } else { 952 #ifdef IYDEBUG 953 printf("%s: received odd mbuf\n", sc->sc_dev.dv_xname); 954 #endif 955 *(mtod(m, caddr_t)) = bus_space_read_2(iot, ioh, 956 MEM_PORT_REG); 957 } 958 m->m_len = len; 959 rxlen -= len; 960 *mp = m; 961 mp = &m->m_next; 962 } 963 /* XXX receive the top here */ 964 ++ifp->if_ipackets; 965 966 eh = mtod(top, struct ether_header *); 967 968 #if NBPFILTER > 0 969 if (ifp->if_bpf) { 970 bpf_mtap(ifp->if_bpf, top); 971 if ((ifp->if_flags & IFF_PROMISC) && 972 (eh->ether_dhost[0] & 1) == 0 && 973 bcmp(eh->ether_dhost, 974 LLADDR(sc->sc_ethercom.ec_if.if_sadl), 975 sizeof(eh->ether_dhost)) != 0) { 976 977 m_freem(top); 978 return; 979 } 980 } 981 #endif 982 m_adj(top, sizeof(struct ether_header)); 983 ether_input(ifp, eh, top); 984 return; 985 986 dropped: 987 ++ifp->if_ierrors; 988 return; 989 } 990 991 void 992 iy_intr_rx(sc) 993 struct iy_softc *sc; 994 { 995 struct ifnet *ifp; 996 bus_space_tag_t iot; 997 bus_space_handle_t ioh; 998 999 u_int rxadrs, rxevnt, rxstatus, rxnext, rxlen; 1000 1001 iot = sc->sc_iot; 1002 ioh = sc->sc_ioh; 1003 ifp = &sc->sc_ethercom.ec_if; 1004 1005 rxadrs = sc->rx_start; 1006 bus_space_write_2(iot, ioh, HOST_ADDR_REG, rxadrs); 1007 rxevnt = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1008 rxnext = 0; 1009 1010 while (rxevnt == RCV_DONE) { 1011 rxstatus = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1012 rxnext = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1013 rxlen = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1014 #ifdef IYDEBUG 1015 printf("%s: pck at 0x%04x stat %b next 0x%x len 0x%x\n", 1016 sc->sc_dev.dv_xname, rxadrs, rxstatus, 1017 "\020\1RCLD\2IA_MCH\010SHORT\011OVRN\013ALGERR" 1018 "\014CRCERR\015LENERR\016RCVOK\020TYP", 1019 rxnext, rxlen); 1020 #endif 1021 iyget(sc, iot, ioh, rxlen); 1022 1023 /* move stop address */ 1024 bus_space_write_2(iot, ioh, RCV_STOP_LOW, 1025 rxnext == 0 ? sc->rx_size - 2 : rxnext - 2); 1026 1027 bus_space_write_2(iot, ioh, HOST_ADDR_REG, rxnext); 1028 rxadrs = rxnext; 1029 rxevnt = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1030 } 1031 sc->rx_start = rxnext; 1032 } 1033 1034 void 1035 iy_intr_tx(sc) 1036 struct iy_softc *sc; 1037 { 1038 bus_space_tag_t iot; 1039 bus_space_handle_t ioh; 1040 struct ifnet *ifp; 1041 u_int txstatus, txstat2, txlen, txnext; 1042 1043 ifp = &sc->sc_ethercom.ec_if; 1044 iot = sc->sc_iot; 1045 ioh = sc->sc_ioh; 1046 1047 while (sc->tx_start != sc->tx_end) { 1048 bus_space_write_2(iot, ioh, HOST_ADDR_REG, sc->tx_start); 1049 txstatus = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1050 if ((txstatus & (TX_DONE|CMD_MASK)) != (TX_DONE|XMT_CMD)) 1051 break; 1052 1053 txstat2 = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1054 txnext = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1055 txlen = bus_space_read_2(iot, ioh, MEM_PORT_REG); 1056 #ifdef IYDEBUG 1057 printf("txstat 0x%x stat2 0x%b next 0x%x len 0x%x\n", 1058 txstatus, txstat2, "\020\6MAX_COL\7HRT_BEAT\010TX_DEF" 1059 "\011UND_RUN\012JERR\013LST_CRS\014LTCOL\016TX_OK\020COLL", 1060 txnext, txlen); 1061 #endif 1062 if (txlen & CHAIN) 1063 sc->tx_start = txnext; 1064 else 1065 sc->tx_start = sc->tx_end; 1066 ifp->if_flags &= ~IFF_OACTIVE; 1067 1068 if ((txstat2 & 0x2000) == 0) 1069 ++ifp->if_oerrors; 1070 if (txstat2 & 0x000f) 1071 ifp->if_oerrors += txstat2 & 0x000f; 1072 } 1073 ifp->if_flags &= ~IFF_OACTIVE; 1074 } 1075 1076 int 1077 iyioctl(ifp, cmd, data) 1078 register struct ifnet *ifp; 1079 u_long cmd; 1080 caddr_t data; 1081 { 1082 struct iy_softc *sc; 1083 struct ifaddr *ifa; 1084 struct ifreq *ifr; 1085 int s, error = 0; 1086 1087 sc = ifp->if_softc; 1088 ifa = (struct ifaddr *)data; 1089 ifr = (struct ifreq *)data; 1090 1091 #ifdef IYDEBUG 1092 printf("iyioctl called with ifp 0x%p (%s) cmd 0x%x data 0x%p\n", 1093 ifp, ifp->if_xname, cmd, data); 1094 #endif 1095 1096 s = splnet(); 1097 1098 switch (cmd) { 1099 1100 case SIOCSIFADDR: 1101 ifp->if_flags |= IFF_UP; 1102 1103 switch (ifa->ifa_addr->sa_family) { 1104 #ifdef INET 1105 case AF_INET: 1106 iyinit(sc); 1107 arp_ifinit(ifp, ifa); 1108 break; 1109 #endif 1110 #ifdef NS 1111 /* XXX - This code is probably wrong. */ 1112 case AF_NS: 1113 { 1114 struct ns_addr *ina = &IA_SNS(ifa)->sns_addr; 1115 1116 if (ns_nullhost(*ina)) 1117 ina->x_host = *(union ns_host *) 1118 LLADDR(sc->sc_ethercom.ec_if.if_sadl); 1119 else 1120 bcopy(ina->x_host.c_host, 1121 LLADDR(sc->sc_ethercom.ec_if.if_sadl), 1122 ETHER_ADDR_LEN); 1123 /* Set new address. */ 1124 iyinit(sc); 1125 break; 1126 } 1127 #endif /* NS */ 1128 default: 1129 iyinit(sc); 1130 break; 1131 } 1132 break; 1133 1134 case SIOCSIFFLAGS: 1135 sc->promisc = ifp->if_flags & (IFF_PROMISC | IFF_ALLMULTI); 1136 if ((ifp->if_flags & IFF_UP) == 0 && 1137 (ifp->if_flags & IFF_RUNNING) != 0) { 1138 /* 1139 * If interface is marked down and it is running, then 1140 * stop it. 1141 */ 1142 iystop(sc); 1143 ifp->if_flags &= ~IFF_RUNNING; 1144 } else if ((ifp->if_flags & IFF_UP) != 0 && 1145 (ifp->if_flags & IFF_RUNNING) == 0) { 1146 /* 1147 * If interface is marked up and it is stopped, then 1148 * start it. 1149 */ 1150 iyinit(sc); 1151 } else { 1152 /* 1153 * Reset the interface to pick up changes in any other 1154 * flags that affect hardware registers. 1155 */ 1156 iystop(sc); 1157 iyinit(sc); 1158 } 1159 #ifdef IYDEBUGX 1160 if (ifp->if_flags & IFF_DEBUG) 1161 sc->sc_debug = IFY_ALL; 1162 else 1163 sc->sc_debug = 0; 1164 #endif 1165 break; 1166 1167 case SIOCADDMULTI: 1168 case SIOCDELMULTI: 1169 error = (cmd == SIOCADDMULTI) ? 1170 ether_addmulti(ifr, &sc->sc_ethercom): 1171 ether_delmulti(ifr, &sc->sc_ethercom); 1172 1173 if (error == ENETRESET) { 1174 /* 1175 * Multicast list has changed; set the hardware filter 1176 * accordingly. 1177 */ 1178 iyreset(sc); /* XXX can't make it work otherwise */ 1179 iy_mc_reset(sc); 1180 error = 0; 1181 } 1182 break; 1183 1184 case SIOCSIFMEDIA: 1185 case SIOCGIFMEDIA: 1186 error = ifmedia_ioctl(ifp, ifr, &sc->iy_ifmedia, cmd); 1187 break; 1188 default: 1189 error = EINVAL; 1190 } 1191 splx(s); 1192 return error; 1193 } 1194 1195 int 1196 iy_mediachange(ifp) 1197 struct ifnet *ifp; 1198 { 1199 struct iy_softc *sc = ifp->if_softc; 1200 1201 if (IFM_TYPE(sc->iy_ifmedia.ifm_media) != IFM_ETHER) 1202 return EINVAL; 1203 switch(IFM_SUBTYPE(sc->iy_ifmedia.ifm_media)) { 1204 case IFM_10_5: 1205 case IFM_10_2: 1206 case IFM_10_T: 1207 case IFM_AUTO: 1208 iystop(sc); 1209 iyinit(sc); 1210 return 0; 1211 default: 1212 return EINVAL; 1213 } 1214 } 1215 1216 void 1217 iy_mediastatus(ifp, ifmr) 1218 struct ifnet *ifp; 1219 struct ifmediareq *ifmr; 1220 { 1221 struct iy_softc *sc = ifp->if_softc; 1222 1223 ifmr->ifm_active = sc->iy_media; 1224 ifmr->ifm_status = IFM_AVALID | IFM_ACTIVE; 1225 } 1226 1227 1228 static void 1229 iy_mc_setup(sc) 1230 struct iy_softc *sc; 1231 { 1232 struct ether_multi *enm; 1233 struct ether_multistep step; 1234 struct ethercom *ecp; 1235 struct ifnet *ifp; 1236 bus_space_tag_t iot; 1237 bus_space_handle_t ioh; 1238 int avail, last /*, end*/ , len; 1239 int timeout; 1240 u_int8_t temp; 1241 1242 1243 ecp = &sc->sc_ethercom; 1244 ifp = &ecp->ec_if; 1245 1246 iot = sc->sc_iot; 1247 ioh = sc->sc_ioh; 1248 1249 len = 6 * ecp->ec_multicnt + 6; 1250 1251 avail = sc->tx_start - sc->tx_end; 1252 if (avail <= 0) 1253 avail += sc->tx_size; 1254 printf("iy_mc_setup called, %d addresses, %d/%d bytes needed/avail\n", 1255 ecp->ec_multicnt, len + I595_XMT_HDRLEN, avail); 1256 1257 last = sc->rx_size; 1258 1259 bus_space_write_1(iot, ioh, 0, BANK_SEL(2)); 1260 bus_space_write_1(iot, ioh, RECV_MODES_REG, MATCH_MULTI); 1261 /* XXX VOODOO */ 1262 temp = bus_space_read_1(iot, ioh, MEDIA_SELECT); 1263 bus_space_write_1(iot, ioh, MEDIA_SELECT, temp); 1264 /* XXX END OF VOODOO */ 1265 bus_space_write_1(iot, ioh, 0, BANK_SEL(0)); 1266 bus_space_write_2(iot, ioh, HOST_ADDR_REG, last); 1267 bus_space_write_2(iot, ioh, MEM_PORT_REG, MC_SETUP_CMD); 1268 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0); 1269 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0); 1270 bus_space_write_2(iot, ioh, MEM_PORT_REG, len); 1271 1272 bus_space_write_multi_2(iot, ioh, MEM_PORT_REG, 1273 LLADDR(ifp->if_sadl), 3); 1274 1275 ETHER_FIRST_MULTI(step, ecp, enm); 1276 while(enm) { 1277 bus_space_write_multi_2(iot, ioh, MEM_PORT_REG, 1278 enm->enm_addrlo, 3); 1279 1280 ETHER_NEXT_MULTI(step, enm); 1281 } 1282 bus_space_write_2(iot, ioh, XMT_ADDR_REG, last); 1283 bus_space_write_1(iot, ioh, 0, MC_SETUP_CMD); 1284 1285 1286 sc->tx_start = sc->rx_size; 1287 sc->tx_end = sc->rx_size + I595_XMT_HDRLEN + len; 1288 1289 for (timeout=0; timeout<100; timeout++) { 1290 DELAY(2); 1291 if ((bus_space_read_1(iot, ioh, STATUS_REG) & EXEC_INT) == 0) 1292 continue; 1293 1294 temp = bus_space_read_1(iot, ioh, 0); 1295 bus_space_write_1(iot, ioh, STATUS_REG, EXEC_INT); 1296 #ifdef DIAGNOSTIC 1297 if (temp & 0x20) { 1298 printf("%s: mc setup failed, %d usec\n", 1299 sc->sc_dev.dv_xname, timeout * 2); 1300 } else if ((temp & 0x0f) == 0x03) { 1301 printf("%s: mc setup done, %d usec\n", 1302 sc->sc_dev.dv_xname, timeout * 2); 1303 } 1304 #endif 1305 break; 1306 } 1307 sc->tx_start = sc->tx_end; 1308 sc->sc_ethercom.ec_if.if_flags &= ~IFF_OACTIVE; 1309 1310 } 1311 1312 static void 1313 iy_mc_reset(sc) 1314 struct iy_softc *sc; 1315 { 1316 struct ether_multi *enm; 1317 struct ether_multistep step; 1318 struct ethercom *ecp; 1319 struct ifnet *ifp; 1320 bus_space_tag_t iot; 1321 bus_space_handle_t ioh; 1322 u_int16_t temp; 1323 1324 ecp = &sc->sc_ethercom; 1325 ifp = &ecp->ec_if; 1326 1327 iot = sc->sc_iot; 1328 ioh = sc->sc_ioh; 1329 1330 if (ecp->ec_multicnt > 63) { 1331 ifp->if_flags |= IFF_ALLMULTI; 1332 1333 } else if (ecp->ec_multicnt > 0) { 1334 /* 1335 * Step through the list of addresses. 1336 */ 1337 ETHER_FIRST_MULTI(step, ecp, enm); 1338 while(enm) { 1339 if (bcmp(enm->enm_addrlo, enm->enm_addrhi, 6) != 0) { 1340 ifp->if_flags |= IFF_ALLMULTI; 1341 goto setupmulti; 1342 } 1343 ETHER_NEXT_MULTI(step, enm); 1344 } 1345 /* OK, we really need to do it now: */ 1346 #if 0 1347 if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE)) 1348 != IFF_RUNNING) { 1349 ifp->if_flags |= IFF_OACTIVE; 1350 sc->want_mc_setup = 1; 1351 return; 1352 } 1353 #endif 1354 iy_mc_setup(sc); 1355 } else { 1356 ifp->if_flags &= ~IFF_ALLMULTI; 1357 } 1358 1359 setupmulti: 1360 bus_space_write_1(iot, ioh, 0, BANK_SEL(2)); 1361 if (ifp->if_flags & (IFF_PROMISC|IFF_ALLMULTI)) { 1362 temp = MATCH_ALL; 1363 } else if (sc->sc_ethercom.ec_multicnt) { 1364 temp = MATCH_MULTI; 1365 } else 1366 temp = MATCH_ID; 1367 1368 bus_space_write_1(iot, ioh, RECV_MODES_REG, temp); 1369 /* XXX VOODOO */ 1370 temp = bus_space_read_1(iot, ioh, MEDIA_SELECT); 1371 bus_space_write_1(iot, ioh, MEDIA_SELECT, temp); 1372 /* XXX END OF VOODOO */ 1373 1374 /* XXX TBD: setup hardware for all multicasts */ 1375 bus_space_write_1(iot, ioh, 0, BANK_SEL(0)); 1376 return; 1377 } 1378 1379 #ifdef IYDEBUG 1380 void 1381 print_rbd(rbd) 1382 volatile struct ie_recv_buf_desc *rbd; 1383 { 1384 1385 printf("RBD at %08lx:\nactual %04x, next %04x, buffer %08x\n" 1386 "length %04x, mbz %04x\n", (u_long)rbd, rbd->ie_rbd_actual, 1387 rbd->ie_rbd_next, rbd->ie_rbd_buffer, rbd->ie_rbd_length, 1388 rbd->mbz); 1389 } 1390 #endif 1391 1392 void 1393 iyprobemem(sc) 1394 struct iy_softc *sc; 1395 { 1396 bus_space_tag_t iot; 1397 bus_space_handle_t ioh; 1398 int testing; 1399 1400 iot = sc->sc_iot; 1401 ioh = sc->sc_ioh; 1402 1403 bus_space_write_1(iot, ioh, COMMAND_REG, BANK_SEL(0)); 1404 delay(1); 1405 bus_space_write_2(iot, ioh, HOST_ADDR_REG, 4096-2); 1406 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0); 1407 1408 for (testing=65536; testing >= 4096; testing >>= 1) { 1409 bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing-2); 1410 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0xdead); 1411 bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing-2); 1412 if (bus_space_read_2(iot, ioh, MEM_PORT_REG) != 0xdead) { 1413 #ifdef IYMEMDEBUG 1414 printf("%s: Didn't keep 0xdead at 0x%x\n", 1415 sc->sc_dev.dv_xname, testing-2); 1416 #endif 1417 continue; 1418 } 1419 1420 bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing-2); 1421 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0xbeef); 1422 bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing-2); 1423 if (bus_space_read_2(iot, ioh, MEM_PORT_REG) != 0xbeef) { 1424 #ifdef IYMEMDEBUG 1425 printf("%s: Didn't keep 0xbeef at 0x%x\n", 1426 sc->sc_dev.dv_xname, testing-2); 1427 #endif 1428 continue; 1429 } 1430 1431 bus_space_write_2(iot, ioh, HOST_ADDR_REG, 0); 1432 bus_space_write_2(iot, ioh, MEM_PORT_REG, 0); 1433 bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing >> 1); 1434 bus_space_write_2(iot, ioh, MEM_PORT_REG, testing >> 1); 1435 bus_space_write_2(iot, ioh, HOST_ADDR_REG, 0); 1436 if (bus_space_read_2(iot, ioh, MEM_PORT_REG) == (testing >> 1)) { 1437 #ifdef IYMEMDEBUG 1438 printf("%s: 0x%x alias of 0x0\n", 1439 sc->sc_dev.dv_xname, testing >> 1); 1440 #endif 1441 continue; 1442 } 1443 1444 break; 1445 } 1446 1447 sc->sram = testing; 1448 1449 switch(testing) { 1450 case 65536: 1451 /* 4 NFS packets + overhead RX, 2 NFS + overhead TX */ 1452 sc->rx_size = 44*1024; 1453 break; 1454 1455 case 32768: 1456 /* 2 NFS packets + overhead RX, 1 NFS + overhead TX */ 1457 sc->rx_size = 22*1024; 1458 break; 1459 1460 case 16384: 1461 /* 1 NFS packet + overhead RX, 4 big packets TX */ 1462 sc->rx_size = 10*1024; 1463 break; 1464 default: 1465 sc->rx_size = testing/2; 1466 break; 1467 } 1468 sc->tx_size = testing - sc->rx_size; 1469 } 1470 1471 static int 1472 eepromreadall(iot, ioh, wordp, maxi) 1473 bus_space_tag_t iot; 1474 bus_space_handle_t ioh; 1475 u_int16_t *wordp; 1476 int maxi; 1477 { 1478 int i; 1479 u_int16_t checksum, tmp; 1480 1481 checksum = 0; 1482 1483 for (i=0; i<EEPP_LENGTH; ++i) { 1484 tmp = eepromread(iot, ioh, i); 1485 checksum += tmp; 1486 if (i<maxi) 1487 wordp[i] = tmp; 1488 } 1489 1490 if (checksum != EEPP_CHKSUM) { 1491 #ifdef IYDEBUG 1492 printf("wrong EEPROM checksum 0x%x should be 0x%x\n", 1493 checksum, EEPP_CHKSUM); 1494 #endif 1495 return 1; 1496 } 1497 return 0; 1498 } 1499