1 /* 2 * Copyright (c) 1986 Regents of the University of California. 3 * All rights reserved. The Berkeley software License Agreement 4 * specifies the terms and conditions for redistribution. 5 * 6 * @(#)if_ix.c 7.1 (Berkeley) 06/05/86 7 */ 8 9 #include "np.h" 10 #if NNP > 0 11 12 /* 13 * Interlan NP100 Ethernet Communications Controller interface 14 */ 15 #include "../machine/pte.h" 16 17 #include "param.h" 18 #include "systm.h" 19 #include "mbuf.h" 20 #include "buf.h" 21 #include "protosw.h" 22 #include "socket.h" 23 #include "vmmac.h" 24 #include "ioctl.h" 25 #include "errno.h" 26 27 #include "../net/if.h" 28 #include "../net/netisr.h" 29 #include "../net/route.h" 30 31 #ifdef INET 32 #include "../netinet/in.h" 33 #include "../netinet/in_systm.h" 34 #include "../netinet/in_var.h" 35 #include "../netinet/ip.h" 36 #include "../netinet/if_ether.h" 37 #endif 38 39 #ifdef NS 40 #include "../netns/ns.h" 41 #include "../netns/ns_if.h" 42 #endif 43 44 #include "../vax/cpu.h" 45 #include "../vax/mtpr.h" 46 #include "../vaxif/if_uba.h" 47 #include "../vaxuba/ubareg.h" 48 #include "../vaxuba/ubavar.h" 49 #include "../vaxuba/npreg.h" 50 #include "../vaxif/if_ix.h" 51 52 int ixattach(), ixrint(), ixcint(); 53 #define ILUNIT(x) minor(x) 54 int ixinit(), ixoutput(), ixioctl(), ixreset(), ixwatch(); 55 int (*IxAttach)() = ixattach; 56 int (*IxReset)() = ixreset; 57 58 /* 59 * Ethernet software status per interface. 60 * 61 * Each interface is referenced by a network interface structure, 62 * ix_if, which the routing code uses to locate the interface. 63 * This structure contains the output queue for the interface, its address, ... 64 * We also have, for each interface, a UBA interface structure, which 65 * contains information about the UNIBUS resources held by the interface: 66 * map registers, buffered data paths, etc. Information is cached in this 67 * structure for use by the if_uba.c routines in running the interface 68 * efficiently. 69 */ 70 struct ix_softc { 71 struct arpcom ix_ac; /* Ethernet common part */ 72 #define ix_if ix_ac.ac_if /* network-visible interface */ 73 #define ix_addr ix_ac.ac_enaddr /* hardware Ethernet address */ 74 int ix_flags; 75 #define IXF_OACTIVE 0x1 /* output is active */ 76 #define IXF_RCVPENDING 0x2 /* start rcv in ilcint */ 77 #define IXF_GOTUBA 0x4 /* unibus resources mapped */ 78 #define IXF_RUNNING 0x8 /* board is running */ 79 #define IXF_SETADDR 0x10 /* physical address is changed */ 80 #define IXF_STATPENDING 0x20 /* stat cmd pending */ 81 #define IXF_GOTCQE 0x40 /* np resources available */ 82 struct ifuba ix_ifuba; /* unibus resources */ 83 u_short ix_aid; /* Access Id returned by open DDL */ 84 u_short ix_badcqe; 85 struct npmaster *ix_mp; /* Board physio request header */ 86 struct npreq *ix_rrp; /* Cached npreq for recv */ 87 struct npreq *ix_wrp; /* Cached npreq for xmit */ 88 short ix_scaninterval; /* interval of stat collection */ 89 #define IXWATCHINTERVAL 60 /* once every 60 seconds */ 90 union ix_stats ix_stats; /* holds on-board statistics */ 91 int ix_ubaddr; /* mapping registers of ix_stats */ 92 } ix_softc[NNP]; 93 extern struct uba_device *npdinfo[]; 94 95 /* 96 * Interface exists: make available by filling in network interface 97 * record. System will initialize the interface when it is ready 98 * to accept packets. We can't even get the ethernet address 99 * or other interesting data until the board has been downloaded. 100 * running ifconfig will attempt to start unit. 101 */ 102 ixattach(ui) 103 struct uba_device *ui; 104 { 105 register struct ix_softc *ix = &ix_softc[ui->ui_unit]; 106 register struct ifnet *ifp = &ix->ix_if; 107 extern struct npmaster npmasters[]; 108 109 ifp->if_unit = ui->ui_unit; 110 ifp->if_name = "ix"; 111 ifp->if_mtu = ETHERMTU; 112 ifp->if_flags = IFF_BROADCAST; 113 114 ifp->if_init = ixinit; 115 ifp->if_output = ixoutput; 116 ifp->if_ioctl = ixioctl; 117 ifp->if_reset = ixreset; 118 119 ix->ix_mp = npmasters + ui->ui_unit; 120 ix->ix_ifuba.ifu_flags = UBA_CANTWAIT; 121 122 if_attach(ifp); 123 } 124 125 struct npreq * 126 ix_GetReq(mp, addr, len) 127 struct npmaster *mp; 128 caddr_t addr; 129 { 130 int unit = mp->unit; 131 register struct npreq *rp; 132 register struct CQE *ep; 133 struct ix_softc *ix = ix_softc + unit; 134 extern struct npreq *NpGetReq(); 135 136 while ((rp = NpGetReq(mp->reqtab)) == NULL) { 137 mp->reqtab->flags |= WANTREQ; 138 sleep((caddr_t)(mp->reqtab), PZERO - 1); 139 } 140 rp->flags = KERNREQ; /* Clear flags */ 141 142 ep = rp->element; /* Associated CQE */ 143 ep->cqe_famid = (unsign32)ix; /* Process ID */ 144 ep->cqe_wind = 0; /* Amount of buffer mapped */ 145 ep->cqe_nbuf = 1; /* Must be 1, no buffer chain */ 146 ep->cqe_char = 1; /* Driver owns this CQE */ 147 ep->cqe_prot = NPDLA; /* Data Link Access protocol */ 148 ep->cqe_bcnt = len; /* Byte count */ 149 rp->bufaddr = (caddr_t) (UBADDRMASK & (int) addr);/* mapped buffer */ 150 ep->cqe_dma[0] = (unsign16)LOWORD(rp->bufaddr); 151 ep->cqe_dma[1] = (unsign16)HIWORD(rp->bufaddr); 152 return (rp); 153 } 154 155 ix_DoReq(mp, rp, cmd, addr, len, rpb, routine) 156 struct npmaster *mp; 157 register struct npreq *rp; 158 u_short cmd; 159 caddr_t addr; 160 int len; 161 register u_short *rpb; 162 int (*routine)(); 163 { 164 register struct CQE *ep = rp->element; 165 register u_short *p = &ep->rpb1; 166 u_short cnt = *rpb++; 167 extern long NpDebug; 168 int pri; 169 170 ep->cqe_ust0 = ep->cqe_ust1 = NPCLEAR; /* Clear status */ 171 ep->cqe_bcnt = len; /* Byte count */ 172 rp->flags = KERNREQ; /* Clear flags */ 173 rp->bufaddr = (caddr_t) (UBADDRMASK & (int) addr);/* mapped buffer */ 174 rp->intr = routine; 175 rp->user = (caddr_t) (ep->cqe_func = cmd);/* In case pissed on in CQE */ 176 ep->cqe_dma[0] = (unsign16)LOWORD(rp->bufaddr); 177 ep->cqe_dma[1] = (unsign16)HIWORD(rp->bufaddr); 178 ep->cqe_lenrpb = cnt + cnt; 179 for (; cnt > 0; cnt--) *p++ = *rpb++; 180 181 if (NpDebug & DEBCQE) 182 printf("Function is %x ep %x reqid %x\n", ep->cqe_func, ep, ep->cqe_reqid); 183 if (NpDebug & DEBCQE) 184 printf("irp len = %x rp = %x\n", ep->cqe_lenrpb, rp); 185 if (routine == 0) { 186 NpAddReq(mp->reqtab, rp); /* Queue onto active list */ 187 while (!(rp->flags & REQDONE)) { 188 pri = spl4(); 189 NpAddCQE(ep, &mp->shmemp->devcq, mp); 190 sleep((caddr_t)rp, PZERO - 1); 191 splx(pri); 192 } 193 if (rp->flags & IOABORT || ep->cqe_sts != NPDONE 194 || ep->cqe_ust0 != NPDONE 195 || ep->cqe_ust1 != NPOK) { 196 struct ix_softc *ix = (struct ix_softc *)ep->cqe_famid; 197 printf("ix%d: Req failed, cmd %x, stat %x, ", 198 ix->ix_if.if_unit, rp->user, ep->cqe_sts); 199 printf("ust error %x,%x\n", ep->cqe_ust0, ep->cqe_ust1); 200 } 201 NpRemReq(rp); /* Clear request */ 202 } else { 203 pri = spl4(); 204 NpAddCQE(ep, &mp->shmemp->devcq, mp); 205 splx(pri); 206 } 207 } 208 209 /* 210 * Ethernet output routine. 211 * Encapsulate a packet of type family for the local net. 212 * Use trailer local net encapsulation if enough data in first 213 * packet leaves a multiple of 512 bytes of data in remainder. 214 */ 215 ixoutput(ifp, m0, dst) 216 struct ifnet *ifp; 217 struct mbuf *m0; 218 struct sockaddr *dst; 219 { 220 int type, s, error; 221 u_char edst[6]; 222 struct in_addr idst; 223 register struct ix_softc *ix = &ix_softc[ifp->if_unit]; 224 register struct mbuf *m = m0; 225 register struct ether_header *il; 226 register int off; 227 int usetrailers; 228 229 if ((ifp->if_flags & (IFF_UP|IFF_RUNNING)) != (IFF_UP|IFF_RUNNING)) { 230 error = ENETDOWN; 231 goto bad; 232 } 233 switch (dst->sa_family) { 234 235 #ifdef INET 236 case AF_INET: 237 idst = ((struct sockaddr_in *)dst)->sin_addr; 238 if (!arpresolve(&ix->ix_ac, m, &idst, edst, &usetrailers)) 239 return (0); /* if not yet resolved */ 240 off = ntohs((u_short)mtod(m, struct ip *)->ip_len) - m->m_len; 241 if (usetrailers && off > 0 && (off & 0x1ff) == 0 && 242 m->m_off >= MMINOFF + 2 * sizeof (u_short)) { 243 type = ETHERTYPE_TRAIL + (off>>9); 244 m->m_off -= 2 * sizeof (u_short); 245 m->m_len += 2 * sizeof (u_short); 246 *mtod(m, u_short *) = htons((u_short)ETHERTYPE_IP); 247 *(mtod(m, u_short *) + 1) = htons((u_short)m->m_len); 248 goto gottrailertype; 249 } 250 type = ETHERTYPE_IP; 251 off = 0; 252 goto gottype; 253 #endif 254 #ifdef NS 255 case AF_NS: 256 type = ETHERTYPE_NS; 257 bcopy((caddr_t)&(((struct sockaddr_ns *)dst)->sns_addr.x_host), 258 (caddr_t)edst, sizeof (edst)); 259 off = 0; 260 goto gottype; 261 #endif 262 263 case AF_UNSPEC: 264 il = (struct ether_header *)dst->sa_data; 265 bcopy((caddr_t)il->ether_dhost, (caddr_t)edst, sizeof (edst)); 266 type = il->ether_type; 267 goto gottype; 268 269 default: 270 printf("ix%d: can't handle af%d\n", ifp->if_unit, 271 dst->sa_family); 272 error = EAFNOSUPPORT; 273 goto bad; 274 } 275 276 gottrailertype: 277 /* 278 * Packet to be sent as trailer: move first packet 279 * (control information) to end of chain. 280 */ 281 while (m->m_next) 282 m = m->m_next; 283 m->m_next = m0; 284 m = m0->m_next; 285 m0->m_next = 0; 286 m0 = m; 287 288 gottype: 289 /* 290 * Add local net header. If no space in first mbuf, 291 * allocate another. 292 */ 293 if (m->m_off > MMAXOFF || 294 MMINOFF + sizeof (struct ether_header) > m->m_off) { 295 m = m_get(M_DONTWAIT, MT_HEADER); 296 if (m == 0) { 297 error = ENOBUFS; 298 goto bad; 299 } 300 m->m_next = m0; 301 m->m_off = MMINOFF; 302 m->m_len = sizeof (struct ether_header); 303 } else { 304 m->m_off -= sizeof (struct ether_header); 305 m->m_len += sizeof (struct ether_header); 306 } 307 il = mtod(m, struct ether_header *); 308 il->ether_type = htons((u_short)type); 309 bcopy((caddr_t)edst, (caddr_t)il->ether_dhost, sizeof (edst)); 310 bcopy((caddr_t)ix->ix_addr, (caddr_t)il->ether_shost, 311 sizeof(il->ether_shost)); 312 313 /* 314 * Queue message on interface, and start output if interface 315 * not yet active. 316 */ 317 s = splimp(); 318 if (IF_QFULL(&ifp->if_snd)) { 319 IF_DROP(&ifp->if_snd); 320 splx(s); 321 m_freem(m); 322 return (ENOBUFS); 323 } 324 IF_ENQUEUE(&ifp->if_snd, m); 325 if ((ix->ix_flags & IXF_OACTIVE) == 0) 326 ixstart(ifp->if_unit); 327 splx(s); 328 return (0); 329 330 bad: 331 m_freem(m0); 332 return (error); 333 } 334 /* 335 * Reset of interface after UNIBUS reset. 336 * If interface is on specified uba, reset its state. 337 */ 338 ixreset(unit, uban, softp) 339 int unit, uban; 340 caddr_t softp; 341 { 342 register struct uba_device *ui; 343 int mask = IXF_SETADDR; /* Only remember new physaddr */ 344 345 if (unit >= NNP || (ui = npdinfo[unit]) == 0 || ui->ui_alive == 0 || 346 ui->ui_ubanum != uban) 347 return; 348 printf(" ix%d reset", unit); 349 if (softp) 350 mask |= IXF_GOTUBA; /* UBA mapping regs still valid; */ 351 ix_softc[unit].ix_if.if_flags &= ~IFF_RUNNING; 352 ix_softc[unit].ix_flags &= mask; 353 } 354 355 356 /* 357 * Initialization of interface; clear recorded pending 358 * operations, and reinitialize UNIBUS usage. 359 */ 360 ixinit(unit) 361 int unit; 362 { 363 register struct ix_softc *ix = &ix_softc[unit]; 364 struct uba_device *ui = npdinfo[unit]; 365 register struct ifnet *ifp = &ix->ix_if; 366 register struct CQE *ep; 367 struct npreq *rp; 368 struct npmaster *mp = ix->ix_mp; 369 register u_short *dpmp = & mp->shmemp->statblock.sb_dpm; 370 u_short rpb[7]; 371 int s; 372 373 /* not yet, if address still unknown */ 374 if (ifp->if_addrlist == (struct ifaddr *)0) 375 return; 376 if (ix->ix_flags & IXF_RUNNING) 377 return; 378 if ((mp->flags & AVAILABLE) == 0 || (*dpmp & PROTOMASK(NPDLA)) == 0) { 379 ifp->if_flags &= ~IFF_UP; 380 return; 381 } 382 if ((ix->ix_flags & IXF_GOTUBA) == 0) { 383 ix->ix_ifuba.ifu_flags = UBA_CANTWAIT; 384 if (if_ubainit(&ix->ix_ifuba, ui->ui_ubanum, 385 sizeof (struct ether_header), (int)btoc(ETHERMTU)) == 0) { 386 printf("ix%d: can't initialize\n", unit); 387 ix->ix_if.if_flags &= ~IFF_UP; 388 return; 389 } 390 ix->ix_ubaddr = uballoc(ui->ui_ubanum, (caddr_t)&ix->ix_stats, 391 sizeof (union ix_stats), 0); 392 ix->ix_flags |= IXF_GOTUBA; 393 } 394 if ((ix->ix_flags & IXF_GOTCQE) == 0) { 395 ix->ix_rrp = ix_GetReq(mp, ix->ix_ifuba.ifu_r.ifrw_info, 396 ETHERMTU); 397 ix->ix_wrp = ix_GetReq(mp, 0, 0); 398 ix->ix_flags |= IXF_GOTCQE; 399 } 400 401 rp = ix->ix_wrp; 402 ep = rp->element; 403 404 /* Changing the ethernet address resets the dla module, 405 so must do it before opening the channel */ 406 if (ix->ix_flags & IXF_SETADDR) { 407 register char *cp = (char *) &ix->ix_stats; 408 int spincount; 409 int x; 410 *cp++ = 1; 411 bcopy(ix->ix_addr, (caddr_t)cp, 6); 412 rpb[0] = 1; /* RPB length */ 413 ix_DoReq(mp, rp, IXC_LDPA, ix->ix_ubaddr, 7, rpb, 0); 414 #ifndef TheyFinallyFixedTheBoard 415 /* Board requires some time to reinitialize its protocols */ 416 x = spl1(); 417 spincount = 2000000; 418 while (((*dpmp & PROTOMASK(NPDLA))==0) && spincount > 0) 419 spincount--; 420 if (spincount==0) { 421 printf("ix%d: failed to reinitialize DLA module\n", 422 unit); 423 splx(x); 424 } 425 splx(x); 426 #endif 427 } 428 rpb[0] = 6; /* RPB length */ 429 rpb[2] = 0x10; /* Share with any smart users */ 430 rpb[3] = 0; /* Take (a copy of) all frames */ 431 rpb[5] = 8; /* On board rcv queue length */ 432 rpb[6] = 0; /* XMT packets as is */ 433 ix_DoReq(mp, rp, IXC_OPEN, 0, 0, rpb, 0); 434 435 ix->ix_aid = ep->rpb1; 436 437 /* Here we request our ethernet address, if we didn't reset it*/ 438 if ((ix->ix_flags & IXF_SETADDR)==0) { 439 rpb[0] = 2; 440 rpb[1] = ix->ix_aid; 441 rpb[2] = 0; /* get all stats */ 442 ix_DoReq(mp, rp, IXC_GSTAT, /* Get Stats */ 443 (caddr_t) ix->ix_ubaddr, sizeof(ix->ix_stats) - 8, 444 rpb, 0); 445 bcopy((caddr_t) &ix->ix_stats, (caddr_t) ix->ix_addr, 6); 446 } 447 ix->ix_if.if_flags |= IFF_RUNNING; 448 ix->ix_flags |= IXF_RUNNING; 449 ifp->if_watchdog = ixwatch; 450 ifp->if_timer = ix->ix_scaninterval = IXWATCHINTERVAL; 451 ixrint(mp, 0); 452 } 453 454 /* 455 * Start output on interface. 456 * Get another datagram to send off of the interface queue, 457 * and map it to the interface before starting the output. 458 */ 459 ixstart(dev) 460 dev_t dev; 461 { 462 int len = 0; 463 int unit = minor(dev); 464 register struct ix_softc *ix = &ix_softc[unit]; 465 register struct mbuf *n; 466 struct mbuf *m; 467 int s, error = 0; 468 struct npmaster *mp = ix->ix_mp; 469 struct npreq *rp = ix->ix_wrp; 470 struct CQE *ep; 471 u_short rpb[8]; 472 473 IF_DEQUEUE(&ix->ix_if.if_snd, m); 474 if (m == 0) { 475 if (ix->ix_flags & IXF_STATPENDING) { 476 ix->ix_flags |= IXF_OACTIVE; 477 rpb[0] = 2; 478 rpb[1] = ix->ix_aid; 479 rpb[2] = 0; /* get all stats */ 480 ix_DoReq(mp, rp, IXC_GSTAT, /* general Stats */ 481 (caddr_t) ix->ix_ubaddr, sizeof(ix->ix_stats) - 8, 482 rpb, ixcint); 483 } 484 return; 485 } 486 /* 487 * Ensure minimum packet length. 488 * This makes the safe assumtion that there are no virtual holes 489 * after the data. 490 * For security, it might be wise to zero out the added bytes, 491 * but we're mainly interested in speed at the moment. 492 */ 493 len = if_wubaput(&ix->ix_ifuba, m); 494 if (len - sizeof(struct ether_header) < ETHERMIN) 495 len = ETHERMIN + sizeof(struct ether_header); 496 497 ix->ix_flags |= IXF_OACTIVE; 498 499 /* Now setup to call np driver */ 500 rpb[0] = 8; 501 rpb[1] = ix->ix_aid; 502 ix_DoReq(mp, rp, IXC_XMIT, /* send frame */ 503 ix->ix_ifuba.ifu_w.ifrw_info, len, rpb, ixcint); 504 } 505 506 /* 507 * Command done interrupt. (almost) 508 */ 509 ixcint(mp, rp) 510 struct npmaster *mp; 511 struct npreq *rp; 512 { 513 struct CQE *ep; 514 register struct ix_softc *ix; 515 int s = splimp(); 516 517 ep = rp->element; 518 ix = (struct ix_softc *)ep->cqe_famid; 519 if ((ix->ix_flags & IXF_OACTIVE) == 0) { 520 printf("ix%d: stray xmit interrupt, npreq=%x\n", 521 ix->ix_if.if_unit, rp); 522 } 523 ix->ix_flags &= ~IXF_OACTIVE; 524 525 switch (ep->cqe_func) { 526 527 case IXC_XMIT: 528 if (ep->cqe_sts == 1) 529 ix->ix_if.if_opackets++; 530 else 531 ix->ix_if.if_oerrors++; 532 break; 533 534 case IXC_GSTAT: 535 if (ep->cqe_sts == 1) 536 ix->ix_if.if_collisions = ix->ix_stats.ixg.macg_xrty; 537 break; 538 } 539 if (ix->ix_ifuba.ifu_xtofree) { 540 m_freem(ix->ix_ifuba.ifu_xtofree); 541 ix->ix_ifuba.ifu_xtofree = 0; 542 } 543 done: 544 ixstart(ix->ix_if.if_unit); 545 splx(s); 546 } 547 548 /* 549 * Ethernet interface receiver interrupt. 550 * If input error just drop packet. 551 * Otherwise purge input buffered data path and examine 552 * packet to determine type. If can't determine length 553 * from type, then have to drop packet. Othewise decapsulate 554 * packet based on type and pass to type specific higher-level 555 * input routine. 556 */ 557 ixrint(mp, rp) 558 struct npmaster *mp; 559 struct npreq *rp; 560 { 561 struct CQE *ep; 562 register struct ix_softc *ix = ix_softc + mp->unit; 563 register struct ether_header *il; 564 struct mbuf *m; 565 int len, off, resid, s; 566 register struct ifqueue *inq; 567 568 if ((ix->ix_flags & IXF_RUNNING) == 0) 569 return; 570 if (rp == 0) 571 goto setup; 572 ix->ix_flags &= ~IXF_RCVPENDING; 573 ep = rp->element; 574 ix->ix_if.if_ipackets++; 575 if (ix->ix_ifuba.ifu_flags & UBA_NEEDBDP) 576 UBAPURGE(ix->ix_ifuba.ifu_uba, ix->ix_ifuba.ifu_r.ifrw_bdp); 577 il = (struct ether_header *)(ix->ix_ifuba.ifu_r.ifrw_addr); 578 len = ep->cqe_bcnt - sizeof (struct ether_header); 579 if (ep->cqe_sts != NPDONE 580 || ep->cqe_ust0 != NPDONE 581 || ep->cqe_ust1 != NPOK) { 582 printf("ixrint: cqe error %x, %x, %x\n", 583 ep->cqe_sts, ep->cqe_ust0, ep->cqe_ust1); 584 if (++ix->ix_badcqe > 100) { 585 ix->ix_badcqe = 0; 586 printf("ixrint: shutting down unix dla\n"); 587 ix->ix_if.if_flags &= ~IFF_UP; 588 return; 589 } 590 goto setup; 591 } 592 593 if ( len < 46 || len > ETHERMTU) { 594 ix->ix_if.if_ierrors++; 595 #ifdef notdef 596 if (ix->ix_if.if_ierrors % 100 == 0) 597 printf("ix%d: += 100 input errors\n", unit); 598 #endif 599 goto setup; 600 } 601 602 /* 603 * Deal with trailer protocol: if type is trailer type 604 * get true type from first 16-bit word past data. 605 * Remember that type was trailer by setting off. 606 */ 607 il->ether_type = ntohs((u_short)il->ether_type); 608 #define ildataaddr(il, off, type) ((type)(((caddr_t)((il)+1)+(off)))) 609 if (il->ether_type >= ETHERTYPE_TRAIL && 610 il->ether_type < ETHERTYPE_TRAIL+ETHERTYPE_NTRAILER) { 611 off = (il->ether_type - ETHERTYPE_TRAIL) * 512; 612 if (off >= ETHERMTU) 613 goto setup; /* sanity */ 614 il->ether_type = ntohs(*ildataaddr(il, off, u_short *)); 615 resid = ntohs(*(ildataaddr(il, off+2, u_short *))); 616 if (off + resid > len) 617 goto setup; /* sanity */ 618 len = off + resid; 619 } else 620 off = 0; 621 if (len == 0) 622 goto setup; 623 624 /* 625 * Pull packet off interface. Off is nonzero if packet 626 * has trailing header; ilget will then force this header 627 * information to be at the front, but we still have to drop 628 * the type and length which are at the front of any trailer data. 629 */ 630 m = if_rubaget(&ix->ix_ifuba, len, off, &ix->ix_if); 631 if (m == 0) 632 goto setup; 633 if (off) { 634 struct ifnet *ifp; 635 636 ifp = *(mtod(m, struct ifnet **)); 637 m->m_off += 2 * sizeof (u_short); 638 m->m_len -= 2 * sizeof (u_short); 639 *(mtod(m, struct ifnet **)) = ifp; 640 } 641 switch (il->ether_type) { 642 643 #ifdef INET 644 case ETHERTYPE_IP: 645 schednetisr(NETISR_IP); 646 inq = &ipintrq; 647 break; 648 649 case ETHERTYPE_ARP: 650 arpinput(&ix->ix_ac, m); 651 goto setup; 652 #endif 653 #ifdef NS 654 case ETHERTYPE_NS: 655 schednetisr(NETISR_NS); 656 inq = &nsintrq; 657 break; 658 659 #endif 660 default: 661 m_freem(m); 662 goto setup; 663 } 664 665 s = splimp(); 666 if (IF_QFULL(inq)) { 667 IF_DROP(inq); 668 m_freem(m); 669 } else 670 IF_ENQUEUE(inq, m); 671 splx(s); 672 673 setup: 674 /* 675 * Reset for next packet if possible. 676 * If waiting for transmit command completion, set flag 677 * and wait until command completes. 678 */ 679 if (rp == 0) { 680 rp = ix->ix_rrp; 681 rp->intr = ixrint; 682 ep = rp->element; 683 } 684 len = ETHERMTU + sizeof(struct ether_header); 685 686 /* Now setup to call np driver */ 687 /* Initializations of request structure */ 688 689 ep->cqe_func = IXC_RECV; /* get frame */ 690 ep->cqe_ust0 = ep->cqe_ust1 = NPCLEAR; /* Clear status */ 691 ep->cqe_bcnt = len; /* Byte count */ 692 ep->cqe_lenrpb = 10; /* RPB length */ 693 ep->rpb1 = ix->ix_aid; /* which channel */ 694 ep->rpb2 = 65535; /* Timeout */ 695 696 ix->ix_flags |= IXF_RCVPENDING; 697 698 s = spl4(); 699 NpAddCQE(ep, &mp->shmemp->devcq, mp); /* Add CQE to device's queue */ 700 splx(s); 701 } 702 703 704 /* 705 * Watchdog routine, request statistics from board. 706 */ 707 ixwatch(unit) 708 int unit; 709 { 710 register struct ix_softc *ix = &ix_softc[unit]; 711 register struct ifnet *ifp = &ix->ix_if; 712 int s; 713 714 if (ix->ix_flags & IXF_STATPENDING) { 715 ifp->if_timer = ix->ix_scaninterval; 716 return; 717 } 718 s = splimp(); 719 ix->ix_flags |= IXF_STATPENDING; 720 if ((ix->ix_flags & IXF_OACTIVE) == 0) 721 ixstart(ifp->if_unit); 722 splx(s); 723 ifp->if_timer = ix->ix_scaninterval; 724 } 725 /* 726 * Process an ioctl request. 727 */ 728 ixioctl(ifp, cmd, data) 729 register struct ifnet *ifp; 730 int cmd; 731 caddr_t data; 732 { 733 register struct ifaddr *ifa = (struct ifaddr *)data; 734 register struct ix_softc *ix = &ix_softc[ifp->if_unit]; 735 int s = splimp(), error = 0; 736 737 switch (cmd) { 738 739 case SIOCSIFADDR: 740 ifp->if_flags |= IFF_UP; 741 ixinit(ifp->if_unit); 742 if ((ifp->if_flags & IFF_UP) == 0) 743 return (EBUSY); 744 745 switch (ifa->ifa_addr.sa_family) { 746 #ifdef INET 747 case AF_INET: 748 ((struct arpcom *)ifp)->ac_ipaddr = 749 IA_SIN(ifa)->sin_addr; 750 arpwhohas((struct arpcom *)ifp, &IA_SIN(ifa)->sin_addr); 751 break; 752 #endif 753 #ifdef NS 754 case AF_NS: 755 { 756 register struct ns_addr *ina = &(IA_SNS(ifa)->sns_addr); 757 758 if (ns_nullhost(*ina)) { 759 ina->x_host = * (union ns_host *) 760 (ix_softc[ifp->if_unit].ix_addr); 761 } else { 762 return 763 ix_setaddr(ina->x_host.c_host, ifp->if_unit); 764 } 765 break; 766 } 767 #endif 768 } 769 break; 770 771 case SIOCSIFFLAGS: 772 if ((ifp->if_flags & IFF_UP) == 0 && 773 ix->ix_flags & IXF_RUNNING) { 774 ix->ix_flags &= ~IXF_RUNNING; 775 NpReset(ix->ix_mp, 0); 776 } else if (ifp->if_flags & IFF_UP && 777 (ix->ix_flags & IXF_RUNNING) == 0) 778 ixinit(ifp->if_unit); 779 break; 780 781 default: 782 error = EINVAL; 783 } 784 splx(s); 785 return (error); 786 } 787 788 /* 789 * set ethernet address for unit 790 */ 791 ix_setaddr(physaddr, unit) 792 u_char *physaddr; 793 int unit; 794 { 795 register struct ix_softc *ix = &ix_softc[unit]; 796 797 if (! (ix->ix_flags & IXF_RUNNING)) 798 return (EBUSY); 799 800 /* The following is a big cop out due to the fact that 801 Changing the ethernet address resets the dla module, 802 so must re-open the channel, anyway. */ 803 804 805 bcopy((caddr_t)physaddr, (caddr_t)ix->ix_addr, sizeof ix->ix_addr); 806 ix->ix_flags &= ~IXF_RUNNING; 807 ix->ix_flags |= IXF_SETADDR; 808 ixinit(unit); 809 NpKill(ix->ix_mp, ix->ix_rrp); 810 } 811 #endif 812