if_ethersubr.c revision 30813
1/* 2 * Copyright (c) 1982, 1989, 1993 3 * The Regents of the University of California. 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 the University of 16 * California, Berkeley and its contributors. 17 * 4. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 * 33 * @(#)if_ethersubr.c 8.1 (Berkeley) 6/10/93 34 * $Id: if_ethersubr.c,v 1.36 1997/07/15 23:25:32 julian Exp $ 35 */ 36 37#include <sys/param.h> 38#include <sys/systm.h> 39#include <sys/kernel.h> 40#include <sys/malloc.h> 41#include <sys/mbuf.h> 42#include <sys/socket.h> 43#include <sys/sockio.h> 44#include <sys/sysctl.h> 45 46#include <net/if.h> 47#include <net/netisr.h> 48#include <net/route.h> 49#include <net/if_llc.h> 50#include <net/if_dl.h> 51#include <net/if_types.h> 52 53#ifdef INET 54#include <netinet/in.h> 55#include <netinet/in_var.h> 56#endif 57#include <netinet/if_ether.h> 58 59#ifdef IPX 60#include <netipx/ipx.h> 61#include <netipx/ipx_if.h> 62#endif 63 64#ifdef NS 65#include <netns/ns.h> 66#include <netns/ns_if.h> 67ushort ns_nettype; 68int ether_outputdebug = 0; 69int ether_inputdebug = 0; 70#endif 71 72#ifdef ISO 73#include <netiso/argo_debug.h> 74#include <netiso/iso.h> 75#include <netiso/iso_var.h> 76#include <netiso/iso_snpac.h> 77#endif 78 79/*#ifdef LLC 80#include <netccitt/dll.h> 81#include <netccitt/llc_var.h> 82#endif*/ 83 84#if defined(LLC) && defined(CCITT) 85extern struct ifqueue pkintrq; 86#endif 87 88#ifdef NETATALK 89#include <netatalk/at.h> 90#include <netatalk/at_var.h> 91#include <netatalk/at_extern.h> 92 93#define llc_snap_org_code llc_un.type_snap.org_code 94#define llc_snap_ether_type llc_un.type_snap.ether_type 95 96extern u_char at_org_code[ 3 ]; 97extern u_char aarp_org_code[ 3 ]; 98#endif NETATALK 99 100static int ether_resolvemulti __P((struct ifnet *, struct sockaddr **, 101 struct sockaddr *)); 102u_char etherbroadcastaddr[6] = { 0xff, 0xff, 0xff, 0xff, 0xff, 0xff }; 103#define senderr(e) { error = (e); goto bad;} 104 105/* 106 * Ethernet output routine. 107 * Encapsulate a packet of type family for the local net. 108 * Use trailer local net encapsulation if enough data in first 109 * packet leaves a multiple of 512 bytes of data in remainder. 110 * Assumes that ifp is actually pointer to arpcom structure. 111 */ 112int 113ether_output(ifp, m0, dst, rt0) 114 register struct ifnet *ifp; 115 struct mbuf *m0; 116 struct sockaddr *dst; 117 struct rtentry *rt0; 118{ 119 short type; 120 int s, error = 0; 121 u_char *cp, edst[6]; 122 register struct mbuf *m2, *m = m0; 123 register struct rtentry *rt; 124 struct mbuf *mcopy = (struct mbuf *)0; 125 register struct ether_header *eh; 126 int off, len = m->m_pkthdr.len; 127 struct arpcom *ac = (struct arpcom *)ifp; 128 register struct ifqueue *inq; 129#ifdef NETATALK 130 struct at_ifaddr *aa; 131#endif NETATALK 132 133 if ((ifp->if_flags & (IFF_UP|IFF_RUNNING)) != (IFF_UP|IFF_RUNNING)) 134 senderr(ENETDOWN); 135 rt = rt0; 136 if (rt) { 137 if ((rt->rt_flags & RTF_UP) == 0) { 138 rt0 = rt = rtalloc1(dst, 1, 0UL); 139 if (rt0) 140 rt->rt_refcnt--; 141 else 142 senderr(EHOSTUNREACH); 143 } 144 if (rt->rt_flags & RTF_GATEWAY) { 145 if (rt->rt_gwroute == 0) 146 goto lookup; 147 if (((rt = rt->rt_gwroute)->rt_flags & RTF_UP) == 0) { 148 rtfree(rt); rt = rt0; 149 lookup: rt->rt_gwroute = rtalloc1(rt->rt_gateway, 1, 150 0UL); 151 if ((rt = rt->rt_gwroute) == 0) 152 senderr(EHOSTUNREACH); 153 } 154 } 155 if (rt->rt_flags & RTF_REJECT) 156 if (rt->rt_rmx.rmx_expire == 0 || 157 time.tv_sec < rt->rt_rmx.rmx_expire) 158 senderr(rt == rt0 ? EHOSTDOWN : EHOSTUNREACH); 159 } 160 switch (dst->sa_family) { 161 162#ifdef INET 163 case AF_INET: 164 if (!arpresolve(ac, rt, m, dst, edst, rt0)) 165 return (0); /* if not yet resolved */ 166 /* If broadcasting on a simplex interface, loopback a copy */ 167 if ((m->m_flags & M_BCAST) && (ifp->if_flags & IFF_SIMPLEX)) 168 mcopy = m_copy(m, 0, (int)M_COPYALL); 169 off = m->m_pkthdr.len - m->m_len; 170 type = htons(ETHERTYPE_IP); 171 break; 172#endif 173#ifdef IPX 174 case AF_IPX: 175 { 176 struct ifaddr *ia; 177 178 type = htons(ETHERTYPE_IPX); 179 bcopy((caddr_t)&(((struct sockaddr_ipx *)dst)->sipx_addr.x_host), 180 (caddr_t)edst, sizeof (edst)); 181 182 for(ia = ifp->if_addrhead.tqh_first; ia != 0; 183 ia = ia->ifa_link.tqe_next) { 184 if(ia->ifa_addr->sa_family == AF_IPX && 185 !bcmp((caddr_t)edst, 186 (caddr_t)&((struct ipx_ifaddr *)ia)->ia_addr.sipx_addr.x_host, 187 sizeof(edst)) ) 188 return (looutput(ifp, m, dst, rt)); 189 } 190 191 /* If broadcasting on a simplex interface, loopback a copy */ 192 if ((m->m_flags & M_BCAST) && (ifp->if_flags & IFF_SIMPLEX)) 193 mcopy = m_copy(m, 0, (int)M_COPYALL); 194 break; 195 } 196#endif 197#ifdef NETATALK 198 case AF_APPLETALK: 199 if (!aarpresolve(ac, m, (struct sockaddr_at *)dst, edst)) { 200#ifdef NETATALKDEBUG 201 extern char *prsockaddr(struct sockaddr *); 202 printf("aarpresolv: failed for %s\n", prsockaddr(dst)); 203#endif NETATALKDEBUG 204 return (0); 205 } 206 /* 207 * ifaddr is the first thing in at_ifaddr 208 */ 209 if ((aa = (struct at_ifaddr *)at_ifawithnet( 210 (struct sockaddr_at *)dst, &ifp->if_addrhead)) 211 == 0) 212 goto bad; 213 214 /* 215 * In the phase 2 case, we need to prepend an mbuf for the llc header. 216 * Since we must preserve the value of m, which is passed to us by 217 * value, we m_copy() the first mbuf, and use it for our llc header. 218 */ 219 if ( aa->aa_flags & AFA_PHASE2 ) { 220 struct llc llc; 221 222 M_PREPEND(m, sizeof(struct llc), M_WAIT); 223 len += sizeof(struct llc); 224 llc.llc_dsap = llc.llc_ssap = LLC_SNAP_LSAP; 225 llc.llc_control = LLC_UI; 226 bcopy(at_org_code, llc.llc_snap_org_code, sizeof(at_org_code)); 227 llc.llc_snap_ether_type = htons( ETHERTYPE_AT ); 228 bcopy(&llc, mtod(m, caddr_t), sizeof(struct llc)); 229 type = htons(m->m_pkthdr.len); 230 } else { 231 type = htons(ETHERTYPE_AT); 232 } 233 break; 234#endif NETATALK 235#ifdef NS 236 case AF_NS: 237 switch(ns_nettype){ 238 default: 239 case 0x8137: /* Novell Ethernet_II Ethernet TYPE II */ 240 type = 0x8137; 241 break; 242 case 0x0: /* Novell 802.3 */ 243 type = htons( m->m_pkthdr.len); 244 break; 245 case 0xe0e0: /* Novell 802.2 and Token-Ring */ 246 M_PREPEND(m, 3, M_WAIT); 247 type = htons( m->m_pkthdr.len); 248 cp = mtod(m, u_char *); 249 *cp++ = 0xE0; 250 *cp++ = 0xE0; 251 *cp++ = 0x03; 252 break; 253 } 254 bcopy((caddr_t)&(((struct sockaddr_ns *)dst)->sns_addr.x_host), 255 (caddr_t)edst, sizeof (edst)); 256 if (!bcmp((caddr_t)edst, (caddr_t)&ns_thishost, sizeof(edst))){ 257 m->m_pkthdr.rcvif = ifp; 258 schednetisr(NETISR_NS); 259 inq = &nsintrq; 260 s = splimp(); 261 if (IF_QFULL(inq)) { 262 IF_DROP(inq); 263 m_freem(m); 264 } else 265 IF_ENQUEUE(inq, m); 266 splx(s); 267 return (error); 268 } 269 if (!bcmp((caddr_t)edst, (caddr_t)&ns_broadhost, sizeof(edst))){ 270 m2 = m_copy(m, 0, (int)M_COPYALL); 271 m2->m_pkthdr.rcvif = ifp; 272 schednetisr(NETISR_NS); 273 inq = &nsintrq; 274 s = splimp(); 275 if (IF_QFULL(inq)) { 276 IF_DROP(inq); 277 m_freem(m2); 278 } else 279 IF_ENQUEUE(inq, m2); 280 splx(s); 281 } 282 /* If broadcasting on a simplex interface, loopback a copy */ 283 if ((m->m_flags & M_BCAST) && (ifp->if_flags & IFF_SIMPLEX)){ 284 mcopy = m_copy(m, 0, (int)M_COPYALL); 285 } 286 break; 287#endif /* NS */ 288#ifdef ISO 289 case AF_ISO: { 290 int snpalen; 291 struct llc *l; 292 register struct sockaddr_dl *sdl; 293 294 if (rt && (sdl = (struct sockaddr_dl *)rt->rt_gateway) && 295 sdl->sdl_family == AF_LINK && sdl->sdl_alen > 0) { 296 bcopy(LLADDR(sdl), (caddr_t)edst, sizeof(edst)); 297 } else if (error = 298 iso_snparesolve(ifp, (struct sockaddr_iso *)dst, 299 (char *)edst, &snpalen)) 300 goto bad; /* Not Resolved */ 301 /* If broadcasting on a simplex interface, loopback a copy */ 302 if (*edst & 1) 303 m->m_flags |= (M_BCAST|M_MCAST); 304 if ((m->m_flags & M_BCAST) && (ifp->if_flags & IFF_SIMPLEX) && 305 (mcopy = m_copy(m, 0, (int)M_COPYALL))) { 306 M_PREPEND(mcopy, sizeof (*eh), M_DONTWAIT); 307 if (mcopy) { 308 eh = mtod(mcopy, struct ether_header *); 309 bcopy((caddr_t)edst, 310 (caddr_t)eh->ether_dhost, sizeof (edst)); 311 bcopy((caddr_t)ac->ac_enaddr, 312 (caddr_t)eh->ether_shost, sizeof (edst)); 313 } 314 } 315 M_PREPEND(m, 3, M_DONTWAIT); 316 if (m == NULL) 317 return (0); 318 type = htons(m->m_pkthdr.len); 319 l = mtod(m, struct llc *); 320 l->llc_dsap = l->llc_ssap = LLC_ISO_LSAP; 321 l->llc_control = LLC_UI; 322 len += 3; 323 IFDEBUG(D_ETHER) 324 int i; 325 printf("unoutput: sending pkt to: "); 326 for (i=0; i<6; i++) 327 printf("%x ", edst[i] & 0xff); 328 printf("\n"); 329 ENDDEBUG 330 } break; 331#endif /* ISO */ 332#ifdef LLC 333/* case AF_NSAP: */ 334 case AF_CCITT: { 335 register struct sockaddr_dl *sdl = 336 (struct sockaddr_dl *) rt -> rt_gateway; 337 338 if (sdl && sdl->sdl_family == AF_LINK 339 && sdl->sdl_alen > 0) { 340 bcopy(LLADDR(sdl), (char *)edst, 341 sizeof(edst)); 342 } else goto bad; /* Not a link interface ? Funny ... */ 343 if ((ifp->if_flags & IFF_SIMPLEX) && (*edst & 1) && 344 (mcopy = m_copy(m, 0, (int)M_COPYALL))) { 345 M_PREPEND(mcopy, sizeof (*eh), M_DONTWAIT); 346 if (mcopy) { 347 eh = mtod(mcopy, struct ether_header *); 348 bcopy((caddr_t)edst, 349 (caddr_t)eh->ether_dhost, sizeof (edst)); 350 bcopy((caddr_t)ac->ac_enaddr, 351 (caddr_t)eh->ether_shost, sizeof (edst)); 352 } 353 } 354 type = htons(m->m_pkthdr.len); 355#ifdef LLC_DEBUG 356 { 357 int i; 358 register struct llc *l = mtod(m, struct llc *); 359 360 printf("ether_output: sending LLC2 pkt to: "); 361 for (i=0; i<6; i++) 362 printf("%x ", edst[i] & 0xff); 363 printf(" len 0x%x dsap 0x%x ssap 0x%x control 0x%x\n", 364 type & 0xff, l->llc_dsap & 0xff, l->llc_ssap &0xff, 365 l->llc_control & 0xff); 366 367 } 368#endif /* LLC_DEBUG */ 369 } break; 370#endif /* LLC */ 371 372 case AF_UNSPEC: 373 eh = (struct ether_header *)dst->sa_data; 374 (void)memcpy(edst, eh->ether_dhost, sizeof (edst)); 375 type = eh->ether_type; 376 break; 377 378 default: 379 printf("%s%d: can't handle af%d\n", ifp->if_name, ifp->if_unit, 380 dst->sa_family); 381 senderr(EAFNOSUPPORT); 382 } 383 384 385 if (mcopy) 386 (void) looutput(ifp, mcopy, dst, rt); 387 /* 388 * Add local net header. If no space in first mbuf, 389 * allocate another. 390 */ 391 M_PREPEND(m, sizeof (struct ether_header), M_DONTWAIT); 392 if (m == 0) 393 senderr(ENOBUFS); 394 eh = mtod(m, struct ether_header *); 395 (void)memcpy(&eh->ether_type, &type, 396 sizeof(eh->ether_type)); 397 (void)memcpy(eh->ether_dhost, edst, sizeof (edst)); 398 (void)memcpy(eh->ether_shost, ac->ac_enaddr, 399 sizeof(eh->ether_shost)); 400 s = splimp(); 401 /* 402 * Queue message on interface, and start output if interface 403 * not yet active. 404 */ 405 if (IF_QFULL(&ifp->if_snd)) { 406 IF_DROP(&ifp->if_snd); 407 splx(s); 408 senderr(ENOBUFS); 409 } 410 IF_ENQUEUE(&ifp->if_snd, m); 411 if ((ifp->if_flags & IFF_OACTIVE) == 0) 412 (*ifp->if_start)(ifp); 413 splx(s); 414 ifp->if_obytes += len + sizeof (struct ether_header); 415 if (m->m_flags & M_MCAST) 416 ifp->if_omcasts++; 417 return (error); 418 419bad: 420 if (m) 421 m_freem(m); 422 return (error); 423} 424 425/* 426 * Process a received Ethernet packet; 427 * the packet is in the mbuf chain m without 428 * the ether header, which is provided separately. 429 */ 430void 431ether_input(ifp, eh, m) 432 struct ifnet *ifp; 433 register struct ether_header *eh; 434 struct mbuf *m; 435{ 436 register struct ifqueue *inq; 437 u_short ether_type, *checksum; 438 int s; 439#if defined (ISO) || defined (LLC) || defined(NETATALK) 440 register struct llc *l; 441#endif 442 443 if ((ifp->if_flags & IFF_UP) == 0) { 444 m_freem(m); 445 return; 446 } 447 ifp->if_ibytes += m->m_pkthdr.len + sizeof (*eh); 448 if (bcmp((caddr_t)etherbroadcastaddr, (caddr_t)eh->ether_dhost, 449 sizeof(etherbroadcastaddr)) == 0) 450 m->m_flags |= M_BCAST; 451 else if (eh->ether_dhost[0] & 1) 452 m->m_flags |= M_MCAST; 453 if (m->m_flags & (M_BCAST|M_MCAST)) 454 ifp->if_imcasts++; 455 456 ether_type = ntohs(eh->ether_type); 457 458 switch (ether_type) { 459#ifdef INET 460 case ETHERTYPE_IP: 461 schednetisr(NETISR_IP); 462 inq = &ipintrq; 463 break; 464 465 case ETHERTYPE_ARP: 466 schednetisr(NETISR_ARP); 467 inq = &arpintrq; 468 break; 469#endif 470#ifdef IPX 471 case ETHERTYPE_IPX: 472 schednetisr(NETISR_IPX); 473 inq = &ipxintrq; 474 break; 475#endif 476#ifdef NS 477 case 0x8137: /* Novell Ethernet_II Ethernet TYPE II */ 478 schednetisr(NETISR_NS); 479 inq = &nsintrq; 480 break; 481 482#endif /* NS */ 483#ifdef NETATALK 484 case ETHERTYPE_AT: 485 schednetisr(NETISR_ATALK); 486 inq = &atintrq1; 487 break; 488 case ETHERTYPE_AARP: 489 /* probably this should be done with a NETISR as well */ 490 aarpinput((struct arpcom *)ifp, m); /* XXX */ 491 return; 492#endif NETATALK 493 default: 494#ifdef NS 495 checksum = mtod(m, ushort *); 496 /* Novell 802.3 */ 497 if ((ether_type <= ETHERMTU) && 498 ((*checksum == 0xffff) || (*checksum == 0xE0E0))){ 499 if(*checksum == 0xE0E0) { 500 m->m_pkthdr.len -= 3; 501 m->m_len -= 3; 502 m->m_data += 3; 503 } 504 schednetisr(NETISR_NS); 505 inq = &nsintrq; 506 break; 507 } 508#endif /* NS */ 509#if defined (ISO) || defined (LLC) || defined(NETATALK) 510 if (ether_type > ETHERMTU) 511 goto dropanyway; 512 l = mtod(m, struct llc *); 513 switch (l->llc_dsap) { 514#ifdef NETATALK 515 case LLC_SNAP_LSAP: 516 switch (l->llc_control) { 517 case LLC_UI: 518 if (l->llc_ssap != LLC_SNAP_LSAP) 519 goto dropanyway; 520 521 if (Bcmp(&(l->llc_snap_org_code)[0], at_org_code, 522 sizeof(at_org_code)) == 0 && 523 ntohs(l->llc_snap_ether_type) == ETHERTYPE_AT) { 524 inq = &atintrq2; 525 m_adj( m, sizeof( struct llc )); 526 schednetisr(NETISR_ATALK); 527 break; 528 } 529 530 if (Bcmp(&(l->llc_snap_org_code)[0], aarp_org_code, 531 sizeof(aarp_org_code)) == 0 && 532 ntohs(l->llc_snap_ether_type) == ETHERTYPE_AARP) { 533 m_adj( m, sizeof( struct llc )); 534 aarpinput((struct arpcom *)ifp, m); /* XXX */ 535 return; 536 } 537 538 default: 539 goto dropanyway; 540 } 541 break; 542#endif NETATALK 543#ifdef ISO 544 case LLC_ISO_LSAP: 545 switch (l->llc_control) { 546 case LLC_UI: 547 /* LLC_UI_P forbidden in class 1 service */ 548 if ((l->llc_dsap == LLC_ISO_LSAP) && 549 (l->llc_ssap == LLC_ISO_LSAP)) { 550 /* LSAP for ISO */ 551 if (m->m_pkthdr.len > ether_type) 552 m_adj(m, ether_type - m->m_pkthdr.len); 553 m->m_data += 3; /* XXX */ 554 m->m_len -= 3; /* XXX */ 555 m->m_pkthdr.len -= 3; /* XXX */ 556 M_PREPEND(m, sizeof *eh, M_DONTWAIT); 557 if (m == 0) 558 return; 559 *mtod(m, struct ether_header *) = *eh; 560 IFDEBUG(D_ETHER) 561 printf("clnp packet"); 562 ENDDEBUG 563 schednetisr(NETISR_ISO); 564 inq = &clnlintrq; 565 break; 566 } 567 goto dropanyway; 568 569 case LLC_XID: 570 case LLC_XID_P: 571 if(m->m_len < 6) 572 goto dropanyway; 573 l->llc_window = 0; 574 l->llc_fid = 9; 575 l->llc_class = 1; 576 l->llc_dsap = l->llc_ssap = 0; 577 /* Fall through to */ 578 case LLC_TEST: 579 case LLC_TEST_P: 580 { 581 struct sockaddr sa; 582 register struct ether_header *eh2; 583 int i; 584 u_char c = l->llc_dsap; 585 586 l->llc_dsap = l->llc_ssap; 587 l->llc_ssap = c; 588 if (m->m_flags & (M_BCAST | M_MCAST)) 589 bcopy((caddr_t)ac->ac_enaddr, 590 (caddr_t)eh->ether_dhost, 6); 591 sa.sa_family = AF_UNSPEC; 592 sa.sa_len = sizeof(sa); 593 eh2 = (struct ether_header *)sa.sa_data; 594 for (i = 0; i < 6; i++) { 595 eh2->ether_shost[i] = c = eh->ether_dhost[i]; 596 eh2->ether_dhost[i] = 597 eh->ether_dhost[i] = eh->ether_shost[i]; 598 eh->ether_shost[i] = c; 599 } 600 ifp->if_output(ifp, m, &sa, NULL); 601 return; 602 } 603 default: 604 m_freem(m); 605 return; 606 } 607 break; 608#endif /* ISO */ 609#ifdef LLC 610 case LLC_X25_LSAP: 611 { 612 if (m->m_pkthdr.len > ether_type) 613 m_adj(m, ether_type - m->m_pkthdr.len); 614 M_PREPEND(m, sizeof(struct sdl_hdr) , M_DONTWAIT); 615 if (m == 0) 616 return; 617 if ( !sdl_sethdrif(ifp, eh->ether_shost, LLC_X25_LSAP, 618 eh->ether_dhost, LLC_X25_LSAP, 6, 619 mtod(m, struct sdl_hdr *))) 620 panic("ETHER cons addr failure"); 621 mtod(m, struct sdl_hdr *)->sdlhdr_len = ether_type; 622#ifdef LLC_DEBUG 623 printf("llc packet\n"); 624#endif /* LLC_DEBUG */ 625 schednetisr(NETISR_CCITT); 626 inq = &llcintrq; 627 break; 628 } 629#endif /* LLC */ 630 dropanyway: 631 default: 632 m_freem(m); 633 return; 634 } 635#else /* ISO || LLC || NETATALK */ 636 m_freem(m); 637 return; 638#endif /* ISO || LLC || NETATALK */ 639 } 640 641 s = splimp(); 642 if (IF_QFULL(inq)) { 643 IF_DROP(inq); 644 m_freem(m); 645 } else 646 IF_ENQUEUE(inq, m); 647 splx(s); 648} 649 650/* 651 * Perform common duties while attaching to interface list 652 */ 653void 654ether_ifattach(ifp) 655 register struct ifnet *ifp; 656{ 657 register struct ifaddr *ifa; 658 register struct sockaddr_dl *sdl; 659 660 ifp->if_type = IFT_ETHER; 661 ifp->if_addrlen = 6; 662 ifp->if_hdrlen = 14; 663 ifp->if_mtu = ETHERMTU; 664 ifp->if_resolvemulti = ether_resolvemulti; 665 if (ifp->if_baudrate == 0) 666 ifp->if_baudrate = 10000000; 667 ifa = ifnet_addrs[ifp->if_index - 1]; 668 if (ifa == 0) { 669 printf("ether_ifattach: no lladdr!\n"); 670 return; 671 } 672 sdl = (struct sockaddr_dl *)ifa->ifa_addr; 673 sdl->sdl_type = IFT_ETHER; 674 sdl->sdl_alen = ifp->if_addrlen; 675 bcopy(((struct arpcom *)ifp)->ac_enaddr, LLADDR(sdl), ifp->if_addrlen); 676} 677 678SYSCTL_NODE(_net_link, IFT_ETHER, ether, CTLFLAG_RW, 0, "Ethernet"); 679 680int 681ether_ioctl(struct ifnet *ifp, int command, caddr_t data) 682{ 683 struct ifaddr *ifa = (struct ifaddr *) data; 684 struct ifreq *ifr = (struct ifreq *) data; 685 int error = 0; 686 687 switch (command) { 688 case SIOCSIFADDR: 689 ifp->if_flags |= IFF_UP; 690 691 switch (ifa->ifa_addr->sa_family) { 692#ifdef INET 693 case AF_INET: 694 ifp->if_init(ifp->if_softc); /* before arpwhohas */ 695 arp_ifinit((struct arpcom *)ifp, ifa); 696 break; 697#endif 698#ifdef IPX 699 /* 700 * XXX - This code is probably wrong 701 */ 702 case AF_IPX: 703 { 704 register struct ipx_addr *ina = &(IA_SIPX(ifa)->sipx_addr); 705 struct arpcom *ac = (struct arpcom *) (ifp->if_softc); 706 707 if (ipx_nullhost(*ina)) 708 ina->x_host = 709 *(union ipx_host *) 710 ac->ac_enaddr; 711 else { 712 bcopy((caddr_t) ina->x_host.c_host, 713 (caddr_t) ac->ac_enaddr, 714 sizeof(ac->ac_enaddr)); 715 } 716 717 /* 718 * Set new address 719 */ 720 ifp->if_init(ifp->if_softc); 721 break; 722 } 723#endif 724#ifdef NS 725 /* 726 * XXX - This code is probably wrong 727 */ 728 case AF_NS: 729 { 730 register struct ns_addr *ina = &(IA_SNS(ifa)->sns_addr); 731 struct arpcom *ac = (struct arpcom *) (ifp->if_softc); 732 733 if (ns_nullhost(*ina)) 734 ina->x_host = 735 *(union ns_host *) (ac->ac_enaddr); 736 else { 737 bcopy((caddr_t) ina->x_host.c_host, 738 (caddr_t) ac->ac_enaddr, 739 sizeof(ac->ac_enaddr)); 740 } 741 742 /* 743 * Set new address 744 */ 745 ifp->if_init(ifp->if_softc); 746 break; 747 } 748#endif 749 default: 750 ifp->if_init(ifp->if_softc); 751 break; 752 } 753 break; 754 755 case SIOCGIFADDR: 756 { 757 struct sockaddr *sa; 758 759 sa = (struct sockaddr *) & ifr->ifr_data; 760 bcopy(((struct arpcom *)ifp->if_softc)->ac_enaddr, 761 (caddr_t) sa->sa_data, ETHER_ADDR_LEN); 762 } 763 break; 764 765 case SIOCSIFMTU: 766 /* 767 * Set the interface MTU. 768 */ 769 if (ifr->ifr_mtu > ETHERMTU) { 770 error = EINVAL; 771 } else { 772 ifp->if_mtu = ifr->ifr_mtu; 773 } 774 break; 775 } 776 return (error); 777} 778 779int 780ether_resolvemulti(ifp, llsa, sa) 781 struct ifnet *ifp; 782 struct sockaddr **llsa; 783 struct sockaddr *sa; 784{ 785 struct sockaddr_dl *sdl; 786 struct sockaddr_in *sin; 787 u_char *e_addr; 788 789 switch(sa->sa_family) { 790 case AF_LINK: 791 /* 792 * No mapping needed. Just check that it's a valid MC address. 793 */ 794 sdl = (struct sockaddr_dl *)sa; 795 e_addr = LLADDR(sdl); 796 if ((e_addr[0] & 1) != 1) 797 return EADDRNOTAVAIL; 798 *llsa = 0; 799 return 0; 800 801#ifdef INET 802 case AF_INET: 803 sin = (struct sockaddr_in *)sa; 804 if (!IN_MULTICAST(ntohl(sin->sin_addr.s_addr))) 805 return EADDRNOTAVAIL; 806 MALLOC(sdl, struct sockaddr_dl *, sizeof *sdl, M_IFMADDR, 807 M_WAITOK); 808 sdl->sdl_len = sizeof *sdl; 809 sdl->sdl_family = AF_LINK; 810 sdl->sdl_index = ifp->if_index; 811 sdl->sdl_type = IFT_ETHER; 812 sdl->sdl_nlen = 0; 813 sdl->sdl_alen = ETHER_ADDR_LEN; 814 sdl->sdl_slen = 0; 815 e_addr = LLADDR(sdl); 816 ETHER_MAP_IP_MULTICAST(&sin->sin_addr, e_addr); 817 *llsa = (struct sockaddr *)sdl; 818 return 0; 819#endif 820 821 default: 822 /* 823 * Well, the text isn't quite right, but it's the name 824 * that counts... 825 */ 826 return EAFNOSUPPORT; 827 } 828} 829