1 /* $NetBSD: lance.c,v 1.62 2024/11/17 09:28:34 hannken Exp $ */ 2 3 /*- 4 * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Charles M. Hannum and by Jason R. Thorpe of the Numerical Aerospace 9 * Simulation Facility, NASA Ames Research Center. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 21 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 22 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 23 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 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 THE 30 * POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 /*- 34 * Copyright (c) 1992, 1993 35 * The Regents of the University of California. All rights reserved. 36 * 37 * This code is derived from software contributed to Berkeley by 38 * Ralph Campbell and Rick Macklem. 39 * 40 * Redistribution and use in source and binary forms, with or without 41 * modification, are permitted provided that the following conditions 42 * are met: 43 * 1. Redistributions of source code must retain the above copyright 44 * notice, this list of conditions and the following disclaimer. 45 * 2. Redistributions in binary form must reproduce the above copyright 46 * notice, this list of conditions and the following disclaimer in the 47 * documentation and/or other materials provided with the distribution. 48 * 3. Neither the name of the University nor the names of its contributors 49 * may be used to endorse or promote products derived from this software 50 * without specific prior written permission. 51 * 52 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 53 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 54 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 55 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 56 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 57 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 58 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 59 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 60 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 61 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 62 * SUCH DAMAGE. 63 * 64 * @(#)if_le.c 8.2 (Berkeley) 11/16/93 65 */ 66 67 #include <sys/cdefs.h> 68 __KERNEL_RCSID(0, "$NetBSD: lance.c,v 1.62 2024/11/17 09:28:34 hannken Exp $"); 69 70 #include <sys/param.h> 71 #include <sys/systm.h> 72 #include <sys/mbuf.h> 73 #include <sys/syslog.h> 74 #include <sys/socket.h> 75 #include <sys/device.h> 76 #include <sys/malloc.h> 77 #include <sys/ioctl.h> 78 #include <sys/errno.h> 79 #include <sys/rndsource.h> 80 81 #include <net/if.h> 82 #include <net/if_dl.h> 83 #include <net/if_ether.h> 84 #include <net/if_media.h> 85 #include <net/bpf.h> 86 87 #include <dev/ic/lancereg.h> 88 #include <dev/ic/lancevar.h> 89 90 #if defined(_KERNEL_OPT) 91 #include "opt_ddb.h" 92 #endif 93 94 #ifdef DDB 95 #define integrate 96 #define hide 97 #else 98 #define integrate static inline 99 #define hide static 100 #endif 101 102 integrate struct mbuf *lance_get(struct lance_softc *, int, int); 103 104 hide bool lance_shutdown(device_t, int); 105 106 int lance_mediachange(struct ifnet *); 107 void lance_mediastatus(struct ifnet *, struct ifmediareq *); 108 109 static inline uint16_t ether_cmp(void *, void *); 110 111 void lance_stop(struct ifnet *, int); 112 int lance_ioctl(struct ifnet *, u_long, void *); 113 void lance_watchdog(struct ifnet *); 114 115 /* 116 * Compare two Ether/802 addresses for equality, inlined and 117 * unrolled for speed. Use this like memcmp(). 118 * 119 * XXX: Add <machine/inlines.h> for stuff like this? 120 * XXX: or maybe add it to libkern.h instead? 121 * 122 * "I'd love to have an inline assembler version of this." 123 * XXX: Who wanted that? mycroft? I wrote one, but this 124 * version in C is as good as hand-coded assembly. -gwr 125 * 126 * Please do NOT tweak this without looking at the actual 127 * assembly code generated before and after your tweaks! 128 */ 129 static inline uint16_t 130 ether_cmp(void *one, void *two) 131 { 132 uint16_t *a = (uint16_t *)one; 133 uint16_t *b = (uint16_t *)two; 134 uint16_t diff; 135 136 #ifdef m68k 137 /* 138 * The post-increment-pointer form produces the best 139 * machine code for m68k. This was carefully tuned 140 * so it compiles to just 8 short (2-byte) op-codes! 141 */ 142 diff = *a++ - *b++; 143 diff |= *a++ - *b++; 144 diff |= *a++ - *b++; 145 #else 146 /* 147 * Most modern CPUs do better with a single expression. 148 * Note that short-cut evaluation is NOT helpful here, 149 * because it just makes the code longer, not faster! 150 */ 151 diff = (a[0] - b[0]) | (a[1] - b[1]) | (a[2] - b[2]); 152 #endif 153 154 return (diff); 155 } 156 157 #define ETHER_CMP ether_cmp 158 159 #ifdef LANCE_REVC_BUG 160 /* Make sure this is short-aligned, for ether_cmp(). */ 161 static uint16_t bcast_enaddr[3] = { ~0, ~0, ~0 }; 162 #endif 163 164 void 165 lance_config(struct lance_softc *sc) 166 { 167 int i, nbuf; 168 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 169 170 /* Initialize ifnet structure. */ 171 strcpy(ifp->if_xname, device_xname(sc->sc_dev)); 172 ifp->if_softc = sc; 173 ifp->if_start = sc->sc_start; 174 ifp->if_ioctl = lance_ioctl; 175 ifp->if_watchdog = lance_watchdog; 176 ifp->if_init = lance_init; 177 ifp->if_stop = lance_stop; 178 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST; 179 #ifdef LANCE_REVC_BUG 180 ifp->if_flags &= ~IFF_MULTICAST; 181 #endif 182 IFQ_SET_READY(&ifp->if_snd); 183 184 /* Initialize ifmedia structures. */ 185 sc->sc_ethercom.ec_ifmedia = &sc->sc_media; 186 ifmedia_init(&sc->sc_media, 0, lance_mediachange, lance_mediastatus); 187 if (sc->sc_supmedia != NULL) { 188 for (i = 0; i < sc->sc_nsupmedia; i++) 189 ifmedia_add(&sc->sc_media, sc->sc_supmedia[i], 190 0, NULL); 191 ifmedia_set(&sc->sc_media, sc->sc_defaultmedia); 192 } else { 193 ifmedia_add(&sc->sc_media, IFM_ETHER | IFM_MANUAL, 0, NULL); 194 ifmedia_set(&sc->sc_media, IFM_ETHER | IFM_MANUAL); 195 } 196 197 switch (sc->sc_memsize) { 198 case 8192: 199 sc->sc_nrbuf = 4; 200 sc->sc_ntbuf = 1; 201 break; 202 case 16384: 203 sc->sc_nrbuf = 8; 204 sc->sc_ntbuf = 2; 205 break; 206 case 32768: 207 sc->sc_nrbuf = 16; 208 sc->sc_ntbuf = 4; 209 break; 210 case 65536: 211 sc->sc_nrbuf = 32; 212 sc->sc_ntbuf = 8; 213 break; 214 case 131072: 215 sc->sc_nrbuf = 64; 216 sc->sc_ntbuf = 16; 217 break; 218 case 262144: 219 sc->sc_nrbuf = 128; 220 sc->sc_ntbuf = 32; 221 break; 222 default: 223 /* weird memory size; cope with it */ 224 nbuf = sc->sc_memsize / LEBLEN; 225 sc->sc_ntbuf = nbuf / 5; 226 sc->sc_nrbuf = nbuf - sc->sc_ntbuf; 227 } 228 229 aprint_normal(": address %s\n", ether_sprintf(sc->sc_enaddr)); 230 aprint_normal_dev(sc->sc_dev, 231 "%d receive buffers, %d transmit buffers\n", 232 sc->sc_nrbuf, sc->sc_ntbuf); 233 234 /* Make sure the chip is stopped. */ 235 lance_stop(ifp, 0); 236 237 /* claim 802.1q capability */ 238 sc->sc_ethercom.ec_capabilities |= ETHERCAP_VLAN_MTU; 239 /* Attach the interface. */ 240 if_attach(ifp); 241 ether_ifattach(ifp, sc->sc_enaddr); 242 243 if (pmf_device_register1(sc->sc_dev, NULL, NULL, lance_shutdown)) 244 pmf_class_network_register(sc->sc_dev, ifp); 245 else 246 aprint_error_dev(sc->sc_dev, 247 "couldn't establish power handler\n"); 248 249 sc->sc_rbufaddr = malloc(sc->sc_nrbuf * sizeof(int), M_DEVBUF, 250 M_WAITOK); 251 sc->sc_tbufaddr = malloc(sc->sc_ntbuf * sizeof(int), M_DEVBUF, 252 M_WAITOK); 253 254 rnd_attach_source(&sc->rnd_source, device_xname(sc->sc_dev), 255 RND_TYPE_NET, RND_FLAG_DEFAULT); 256 } 257 258 void 259 lance_reset(struct lance_softc *sc) 260 { 261 int s; 262 263 s = splnet(); 264 lance_init(&sc->sc_ethercom.ec_if); 265 splx(s); 266 } 267 268 void 269 lance_stop(struct ifnet *ifp, int disable) 270 { 271 struct lance_softc *sc = ifp->if_softc; 272 273 (*sc->sc_wrcsr)(sc, LE_CSR0, LE_C0_STOP); 274 } 275 276 /* 277 * Initialization of interface; set up initialization block 278 * and transmit/receive descriptor rings. 279 */ 280 int 281 lance_init(struct ifnet *ifp) 282 { 283 struct lance_softc *sc = ifp->if_softc; 284 int timo; 285 u_long a; 286 287 (*sc->sc_wrcsr)(sc, LE_CSR0, LE_C0_STOP); 288 DELAY(100); 289 290 /* Newer LANCE chips have a reset register */ 291 if (sc->sc_hwreset) 292 (*sc->sc_hwreset)(sc); 293 294 /* Set the correct byte swapping mode, etc. */ 295 (*sc->sc_wrcsr)(sc, LE_CSR3, sc->sc_conf3); 296 297 /* Set up LANCE init block. */ 298 (*sc->sc_meminit)(sc); 299 300 /* Give LANCE the physical address of its init block. */ 301 a = sc->sc_addr + LE_INITADDR(sc); 302 (*sc->sc_wrcsr)(sc, LE_CSR1, a); 303 (*sc->sc_wrcsr)(sc, LE_CSR2, a >> 16); 304 305 /* Try to initialize the LANCE. */ 306 DELAY(100); 307 (*sc->sc_wrcsr)(sc, LE_CSR0, LE_C0_INIT); 308 309 /* Wait for initialization to finish. */ 310 for (timo = 100000; timo; timo--) 311 if ((*sc->sc_rdcsr)(sc, LE_CSR0) & LE_C0_IDON) 312 break; 313 314 if ((*sc->sc_rdcsr)(sc, LE_CSR0) & LE_C0_IDON) { 315 /* Start the LANCE. */ 316 (*sc->sc_wrcsr)(sc, LE_CSR0, LE_C0_INEA | LE_C0_STRT); 317 ifp->if_flags |= IFF_RUNNING; 318 ifp->if_flags &= ~IFF_OACTIVE; 319 ifp->if_timer = 0; 320 (*sc->sc_start)(ifp); 321 } else 322 printf("%s: controller failed to initialize\n", 323 device_xname(sc->sc_dev)); 324 if (sc->sc_hwinit) 325 (*sc->sc_hwinit)(sc); 326 327 return (0); 328 } 329 330 /* 331 * Routine to copy from mbuf chain to transmit buffer in 332 * network buffer memory. 333 */ 334 int 335 lance_put(struct lance_softc *sc, int boff, struct mbuf *m) 336 { 337 struct mbuf *n; 338 int len, tlen = 0; 339 340 for (; m; m = n) { 341 len = m->m_len; 342 if (len == 0) { 343 n = m_free(m); 344 continue; 345 } 346 (*sc->sc_copytobuf)(sc, mtod(m, void *), boff, len); 347 boff += len; 348 tlen += len; 349 n = m_free(m); 350 } 351 if (tlen < LEMINSIZE) { 352 (*sc->sc_zerobuf)(sc, boff, LEMINSIZE - tlen); 353 tlen = LEMINSIZE; 354 } 355 return (tlen); 356 } 357 358 /* 359 * Pull data off an interface. 360 * Len is length of data, with local net header stripped. 361 * We copy the data into mbufs. When full cluster sized units are present 362 * we copy into clusters. 363 */ 364 integrate struct mbuf * 365 lance_get(struct lance_softc *sc, int boff, int totlen) 366 { 367 struct mbuf *m, *m0, *newm; 368 int len; 369 370 MGETHDR(m0, M_DONTWAIT, MT_DATA); 371 if (m0 == 0) 372 return (0); 373 MCLAIM(m0, &sc->sc_ethercom.ec_rx_mowner); 374 m_set_rcvif(m0, &sc->sc_ethercom.ec_if); 375 m0->m_pkthdr.len = totlen; 376 len = MHLEN; 377 m = m0; 378 379 while (totlen > 0) { 380 if (totlen >= MINCLSIZE) { 381 MCLGET(m, M_DONTWAIT); 382 if ((m->m_flags & M_EXT) == 0) 383 goto bad; 384 len = MCLBYTES; 385 } 386 387 if (m == m0) { 388 char *newdata = (char *) 389 ALIGN(m->m_data + sizeof(struct ether_header)) - 390 sizeof(struct ether_header); 391 len -= newdata - m->m_data; 392 m->m_data = newdata; 393 } 394 395 m->m_len = len = uimin(totlen, len); 396 (*sc->sc_copyfrombuf)(sc, mtod(m, void *), boff, len); 397 boff += len; 398 399 totlen -= len; 400 if (totlen > 0) { 401 MGET(newm, M_DONTWAIT, MT_DATA); 402 if (newm == 0) 403 goto bad; 404 MCLAIM(newm, &sc->sc_ethercom.ec_rx_mowner); 405 len = MLEN; 406 m = m->m_next = newm; 407 } 408 } 409 410 return (m0); 411 412 bad: 413 m_freem(m0); 414 return (0); 415 } 416 417 /* 418 * Pass a packet to the higher levels. 419 */ 420 void 421 lance_read(struct lance_softc *sc, int boff, int len) 422 { 423 struct mbuf *m; 424 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 425 struct ether_header *eh; 426 427 if (len <= sizeof(struct ether_header) || 428 len > ((sc->sc_ethercom.ec_capenable & ETHERCAP_VLAN_MTU) ? 429 ETHER_VLAN_ENCAP_LEN + ETHERMTU + sizeof(struct ether_header) : 430 ETHERMTU + sizeof(struct ether_header))) { 431 #ifdef LEDEBUG 432 printf("%s: invalid packet size %d; dropping\n", 433 device_xname(sc->sc_dev), len); 434 #endif 435 if_statinc(ifp, if_ierrors); 436 return; 437 } 438 439 /* Pull packet off interface. */ 440 m = lance_get(sc, boff, len); 441 if (m == 0) { 442 if_statinc(ifp, if_ierrors); 443 return; 444 } 445 446 eh = mtod(m, struct ether_header *); 447 448 #ifdef LANCE_REVC_BUG 449 /* 450 * The old LANCE (Rev. C) chips have a bug which causes 451 * garbage to be inserted in front of the received packet. 452 * The work-around is to ignore packets with an invalid 453 * destination address (garbage will usually not match). 454 * Of course, this precludes multicast support... 455 */ 456 if (ETHER_CMP(eh->ether_dhost, sc->sc_enaddr) && 457 ETHER_CMP(eh->ether_dhost, bcast_enaddr)) { 458 m_freem(m); 459 return; 460 } 461 #endif 462 463 /* 464 * Some lance device does not present IFF_SIMPLEX behavior on multicast 465 * packets. Make sure to drop it if it is from ourselves. 466 */ 467 if (!ETHER_CMP(eh->ether_shost, sc->sc_enaddr)) { 468 m_freem(m); 469 return; 470 } 471 472 /* Pass the packet up. */ 473 if_percpuq_enqueue(ifp->if_percpuq, m); 474 } 475 476 #undef ifp 477 478 void 479 lance_watchdog(struct ifnet *ifp) 480 { 481 struct lance_softc *sc = ifp->if_softc; 482 483 log(LOG_ERR, "%s: device timeout\n", device_xname(sc->sc_dev)); 484 if_statinc(ifp, if_oerrors); 485 486 lance_reset(sc); 487 } 488 489 int 490 lance_mediachange(struct ifnet *ifp) 491 { 492 struct lance_softc *sc = ifp->if_softc; 493 494 if (sc->sc_mediachange) 495 return ((*sc->sc_mediachange)(sc)); 496 return (0); 497 } 498 499 void 500 lance_mediastatus(struct ifnet *ifp, struct ifmediareq *ifmr) 501 { 502 struct lance_softc *sc = ifp->if_softc; 503 504 if ((ifp->if_flags & IFF_UP) == 0) 505 return; 506 507 ifmr->ifm_status = IFM_AVALID; 508 if (sc->sc_havecarrier) 509 ifmr->ifm_status |= IFM_ACTIVE; 510 511 if (sc->sc_mediastatus) 512 (*sc->sc_mediastatus)(sc, ifmr); 513 } 514 515 /* 516 * Process an ioctl request. 517 */ 518 int 519 lance_ioctl(struct ifnet *ifp, u_long cmd, void *data) 520 { 521 struct lance_softc *sc = ifp->if_softc; 522 int s, error = 0; 523 524 s = splnet(); 525 526 switch (cmd) { 527 default: 528 if ((error = ether_ioctl(ifp, cmd, data)) != ENETRESET) 529 break; 530 error = 0; 531 if (cmd != SIOCADDMULTI && cmd != SIOCDELMULTI) 532 break; 533 if (ifp->if_flags & IFF_RUNNING) { 534 /* 535 * Multicast list has changed; set the hardware filter 536 * accordingly. 537 */ 538 lance_reset(sc); 539 } 540 break; 541 542 } 543 544 splx(s); 545 return (error); 546 } 547 548 hide bool 549 lance_shutdown(device_t self, int howto) 550 { 551 struct lance_softc *sc = device_private(self); 552 struct ifnet *ifp = &sc->sc_ethercom.ec_if; 553 554 lance_stop(ifp, 0); 555 556 return true; 557 } 558 559 /* 560 * Set up the logical address filter. 561 */ 562 void 563 lance_setladrf(struct ethercom *ec, uint16_t *af) 564 { 565 struct ifnet *ifp = &ec->ec_if; 566 struct ether_multi *enm; 567 uint32_t crc; 568 struct ether_multistep step; 569 570 /* 571 * Set up multicast address filter by passing all multicast addresses 572 * through a crc generator, and then using the high order 6 bits as an 573 * index into the 64 bit logical address filter. The high order bit 574 * selects the word, while the rest of the bits select the bit within 575 * the word. 576 */ 577 578 if (ifp->if_flags & IFF_PROMISC) 579 goto allmulti; 580 581 af[0] = af[1] = af[2] = af[3] = 0x0000; 582 583 ETHER_LOCK(ec); 584 ETHER_FIRST_MULTI(step, ec, enm); 585 while (enm != NULL) { 586 if (ETHER_CMP(enm->enm_addrlo, enm->enm_addrhi)) { 587 /* 588 * We must listen to a range of multicast addresses. 589 * For now, just accept all multicasts, rather than 590 * trying to set only those filter bits needed to match 591 * the range. (At this time, the only use of address 592 * ranges is for IP multicast routing, for which the 593 * range is big enough to require all bits set.) 594 */ 595 ETHER_UNLOCK(ec); 596 goto allmulti; 597 } 598 599 crc = ether_crc32_le(enm->enm_addrlo, ETHER_ADDR_LEN); 600 601 /* Just want the 6 most significant bits. */ 602 crc >>= 26; 603 604 /* Set the corresponding bit in the filter. */ 605 af[crc >> 4] |= 1 << (crc & 0xf); 606 607 ETHER_NEXT_MULTI(step, enm); 608 } 609 ETHER_UNLOCK(ec); 610 ifp->if_flags &= ~IFF_ALLMULTI; 611 return; 612 613 allmulti: 614 ifp->if_flags |= IFF_ALLMULTI; 615 af[0] = af[1] = af[2] = af[3] = 0xffff; 616 } 617 618 /* 619 * Routines for accessing the transmit and receive buffers. 620 * The various CPU and adapter configurations supported by this 621 * driver require three different access methods for buffers 622 * and descriptors: 623 * (1) contig (contiguous data; no padding), 624 * (2) gap2 (two bytes of data followed by two bytes of padding), 625 * (3) gap16 (16 bytes of data followed by 16 bytes of padding). 626 */ 627 628 /* 629 * contig: contiguous data with no padding. 630 * 631 * Buffers may have any alignment. 632 */ 633 634 void 635 lance_copytobuf_contig(struct lance_softc *sc, void *from, int boff, int len) 636 { 637 uint8_t *buf = sc->sc_mem; 638 639 /* 640 * Just call memcpy() to do the work. 641 */ 642 memcpy(buf + boff, from, len); 643 } 644 645 void 646 lance_copyfrombuf_contig(struct lance_softc *sc, void *to, int boff, int len) 647 { 648 uint8_t *buf = sc->sc_mem; 649 650 /* 651 * Just call memcpy() to do the work. 652 */ 653 memcpy(to, buf + boff, len); 654 } 655 656 void 657 lance_zerobuf_contig(struct lance_softc *sc, int boff, int len) 658 { 659 uint8_t *buf = sc->sc_mem; 660 661 /* 662 * Just let memset() do the work 663 */ 664 memset(buf + boff, 0, len); 665 } 666 667 #if 0 668 /* 669 * Examples only; duplicate these and tweak (if necessary) in 670 * machine-specific front-ends. 671 */ 672 673 /* 674 * gap2: two bytes of data followed by two bytes of pad. 675 * 676 * Buffers must be 4-byte aligned. The code doesn't worry about 677 * doing an extra byte. 678 */ 679 680 void 681 lance_copytobuf_gap2(struct lance_softc *sc, void *fromv, int boff, int len) 682 { 683 volatile void *buf = sc->sc_mem; 684 void *from = fromv; 685 volatile uint16_t *bptr; 686 687 if (boff & 0x1) { 688 /* handle unaligned first byte */ 689 bptr = ((volatile uint16_t *)buf) + (boff - 1); 690 *bptr = (*from++ << 8) | (*bptr & 0xff); 691 bptr += 2; 692 len--; 693 } else 694 bptr = ((volatile uint16_t *)buf) + boff; 695 while (len > 1) { 696 *bptr = (from[1] << 8) | (from[0] & 0xff); 697 bptr += 2; 698 from += 2; 699 len -= 2; 700 } 701 if (len == 1) 702 *bptr = (uint16_t)*from; 703 } 704 705 void 706 lance_copyfrombuf_gap2(struct lance_softc *sc, void *tov, int boff, int len) 707 { 708 volatile void *buf = sc->sc_mem; 709 void *to = tov; 710 volatile uint16_t *bptr; 711 uint16_t tmp; 712 713 if (boff & 0x1) { 714 /* handle unaligned first byte */ 715 bptr = ((volatile uint16_t *)buf) + (boff - 1); 716 *to++ = (*bptr >> 8) & 0xff; 717 bptr += 2; 718 len--; 719 } else 720 bptr = ((volatile uint16_t *)buf) + boff; 721 while (len > 1) { 722 tmp = *bptr; 723 *to++ = tmp & 0xff; 724 *to++ = (tmp >> 8) & 0xff; 725 bptr += 2; 726 len -= 2; 727 } 728 if (len == 1) 729 *to = *bptr & 0xff; 730 } 731 732 void 733 lance_zerobuf_gap2(struct lance_softc *sc, int boff, int len) 734 { 735 volatile void *buf = sc->sc_mem; 736 volatile uint16_t *bptr; 737 738 if ((unsigned int)boff & 0x1) { 739 bptr = ((volatile uint16_t *)buf) + (boff - 1); 740 *bptr &= 0xff; 741 bptr += 2; 742 len--; 743 } else 744 bptr = ((volatile uint16_t *)buf) + boff; 745 while (len > 0) { 746 *bptr = 0; 747 bptr += 2; 748 len -= 2; 749 } 750 } 751 752 /* 753 * gap16: 16 bytes of data followed by 16 bytes of pad. 754 * 755 * Buffers must be 32-byte aligned. 756 */ 757 758 void 759 lance_copytobuf_gap16(struct lance_softc *sc, void *fromv, int boff, int len) 760 { 761 volatile uint8_t *buf = sc->sc_mem; 762 void *from = fromv; 763 uint8_t *bptr; 764 int xfer; 765 766 bptr = buf + ((boff << 1) & ~0x1f); 767 boff &= 0xf; 768 xfer = uimin(len, 16 - boff); 769 while (len > 0) { 770 memcpy(bptr + boff, from, xfer); 771 from += xfer; 772 bptr += 32; 773 boff = 0; 774 len -= xfer; 775 xfer = uimin(len, 16); 776 } 777 } 778 779 void 780 lance_copyfrombuf_gap16(struct lance_softc *sc, void *tov, int boff, int len) 781 { 782 volatile uint8_t *buf = sc->sc_mem; 783 void *to = tov; 784 uint8_t *bptr; 785 int xfer; 786 787 bptr = buf + ((boff << 1) & ~0x1f); 788 boff &= 0xf; 789 xfer = uimin(len, 16 - boff); 790 while (len > 0) { 791 memcpy(to, bptr + boff, xfer); 792 to += xfer; 793 bptr += 32; 794 boff = 0; 795 len -= xfer; 796 xfer = uimin(len, 16); 797 } 798 } 799 800 void 801 lance_zerobuf_gap16(struct lance_softc *sc, int boff, int len) 802 { 803 volatile uint8_t *buf = sc->sc_mem; 804 uint8_t *bptr; 805 int xfer; 806 807 bptr = buf + ((boff << 1) & ~0x1f); 808 boff &= 0xf; 809 xfer = uimin(len, 16 - boff); 810 while (len > 0) { 811 memset(bptr + boff, 0, xfer); 812 bptr += 32; 813 boff = 0; 814 len -= xfer; 815 xfer = uimin(len, 16); 816 } 817 } 818 #endif /* Example only */ 819