rtsock.c revision 1.1.1.3
1 /* 2 * Copyright (c) 1988, 1991, 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 * @(#)rtsock.c 8.6 (Berkeley) 2/11/95 34 */ 35 36 #include <sys/param.h> 37 #include <sys/systm.h> 38 #include <sys/proc.h> 39 #include <sys/mbuf.h> 40 #include <sys/socket.h> 41 #include <sys/socketvar.h> 42 #include <sys/domain.h> 43 #include <sys/protosw.h> 44 45 #include <net/if.h> 46 #include <net/route.h> 47 #include <net/raw_cb.h> 48 49 struct sockaddr route_dst = { 2, PF_ROUTE, }; 50 struct sockaddr route_src = { 2, PF_ROUTE, }; 51 struct sockproto route_proto = { PF_ROUTE, }; 52 53 struct walkarg { 54 int w_op, w_arg, w_given, w_needed, w_tmemsize; 55 caddr_t w_where, w_tmem; 56 }; 57 58 static struct mbuf * 59 rt_msg1 __P((int, struct rt_addrinfo *)); 60 static int rt_msg2 __P((int, 61 struct rt_addrinfo *, caddr_t, struct walkarg *)); 62 static void rt_xaddrs __P((caddr_t, caddr_t, struct rt_addrinfo *)); 63 64 /* Sleazy use of local variables throughout file, warning!!!! */ 65 #define dst info.rti_info[RTAX_DST] 66 #define gate info.rti_info[RTAX_GATEWAY] 67 #define netmask info.rti_info[RTAX_NETMASK] 68 #define genmask info.rti_info[RTAX_GENMASK] 69 #define ifpaddr info.rti_info[RTAX_IFP] 70 #define ifaaddr info.rti_info[RTAX_IFA] 71 #define brdaddr info.rti_info[RTAX_BRD] 72 73 /*ARGSUSED*/ 74 int 75 route_usrreq(so, req, m, nam, control) 76 register struct socket *so; 77 int req; 78 struct mbuf *m, *nam, *control; 79 { 80 register int error = 0; 81 register struct rawcb *rp = sotorawcb(so); 82 int s; 83 84 if (req == PRU_ATTACH) { 85 MALLOC(rp, struct rawcb *, sizeof(*rp), M_PCB, M_WAITOK); 86 if (so->so_pcb = (caddr_t)rp) 87 bzero(so->so_pcb, sizeof(*rp)); 88 89 } 90 if (req == PRU_DETACH && rp) { 91 int af = rp->rcb_proto.sp_protocol; 92 if (af == AF_INET) 93 route_cb.ip_count--; 94 else if (af == AF_NS) 95 route_cb.ns_count--; 96 else if (af == AF_ISO) 97 route_cb.iso_count--; 98 route_cb.any_count--; 99 } 100 s = splnet(); 101 error = raw_usrreq(so, req, m, nam, control); 102 rp = sotorawcb(so); 103 if (req == PRU_ATTACH && rp) { 104 int af = rp->rcb_proto.sp_protocol; 105 if (error) { 106 free((caddr_t)rp, M_PCB); 107 splx(s); 108 return (error); 109 } 110 if (af == AF_INET) 111 route_cb.ip_count++; 112 else if (af == AF_NS) 113 route_cb.ns_count++; 114 else if (af == AF_ISO) 115 route_cb.iso_count++; 116 rp->rcb_faddr = &route_src; 117 route_cb.any_count++; 118 soisconnected(so); 119 so->so_options |= SO_USELOOPBACK; 120 } 121 splx(s); 122 return (error); 123 } 124 125 /*ARGSUSED*/ 126 int 127 route_output(m, so) 128 register struct mbuf *m; 129 struct socket *so; 130 { 131 register struct rt_msghdr *rtm = 0; 132 register struct rtentry *rt = 0; 133 struct rtentry *saved_nrt = 0; 134 struct radix_node_head *rnh; 135 struct rt_addrinfo info; 136 int len, error = 0; 137 struct ifnet *ifp = 0; 138 struct ifaddr *ifa = 0; 139 140 #define senderr(e) { error = e; goto flush;} 141 if (m == 0 || ((m->m_len < sizeof(long)) && 142 (m = m_pullup(m, sizeof(long))) == 0)) 143 return (ENOBUFS); 144 if ((m->m_flags & M_PKTHDR) == 0) 145 panic("route_output"); 146 len = m->m_pkthdr.len; 147 if (len < sizeof(*rtm) || 148 len != mtod(m, struct rt_msghdr *)->rtm_msglen) { 149 dst = 0; 150 senderr(EINVAL); 151 } 152 R_Malloc(rtm, struct rt_msghdr *, len); 153 if (rtm == 0) { 154 dst = 0; 155 senderr(ENOBUFS); 156 } 157 m_copydata(m, 0, len, (caddr_t)rtm); 158 if (rtm->rtm_version != RTM_VERSION) { 159 dst = 0; 160 senderr(EPROTONOSUPPORT); 161 } 162 rtm->rtm_pid = curproc->p_pid; 163 info.rti_addrs = rtm->rtm_addrs; 164 rt_xaddrs((caddr_t)(rtm + 1), len + (caddr_t)rtm, &info); 165 if (dst == 0) 166 senderr(EINVAL); 167 if (genmask) { 168 struct radix_node *t; 169 t = rn_addmask((caddr_t)genmask, 0, 1); 170 if (t && Bcmp(genmask, t->rn_key, *(u_char *)genmask) == 0) 171 genmask = (struct sockaddr *)(t->rn_key); 172 else 173 senderr(ENOBUFS); 174 } 175 switch (rtm->rtm_type) { 176 177 case RTM_ADD: 178 if (gate == 0) 179 senderr(EINVAL); 180 error = rtrequest(RTM_ADD, dst, gate, netmask, 181 rtm->rtm_flags, &saved_nrt); 182 if (error == 0 && saved_nrt) { 183 rt_setmetrics(rtm->rtm_inits, 184 &rtm->rtm_rmx, &saved_nrt->rt_rmx); 185 saved_nrt->rt_refcnt--; 186 saved_nrt->rt_genmask = genmask; 187 } 188 break; 189 190 case RTM_DELETE: 191 error = rtrequest(RTM_DELETE, dst, gate, netmask, 192 rtm->rtm_flags, &saved_nrt); 193 if (error == 0) { 194 (rt = saved_nrt)->rt_refcnt++; 195 goto report; 196 } 197 break; 198 199 case RTM_GET: 200 case RTM_CHANGE: 201 case RTM_LOCK: 202 if ((rnh = rt_tables[dst->sa_family]) == 0) { 203 senderr(EAFNOSUPPORT); 204 } else if (rt = (struct rtentry *) 205 rnh->rnh_lookup(dst, netmask, rnh)) 206 rt->rt_refcnt++; 207 else 208 senderr(ESRCH); 209 switch(rtm->rtm_type) { 210 211 case RTM_GET: 212 report: 213 dst = rt_key(rt); 214 gate = rt->rt_gateway; 215 netmask = rt_mask(rt); 216 genmask = rt->rt_genmask; 217 if (rtm->rtm_addrs & (RTA_IFP | RTA_IFA)) { 218 if (ifp = rt->rt_ifp) { 219 ifpaddr = ifp->if_addrlist->ifa_addr; 220 ifaaddr = rt->rt_ifa->ifa_addr; 221 if (ifp->if_flags & IFF_POINTOPOINT) 222 brdaddr = rt->rt_ifa->ifa_dstaddr; 223 else 224 brdaddr = 0; 225 rtm->rtm_index = ifp->if_index; 226 } else { 227 ifpaddr = 0; 228 ifaaddr = 0; 229 } 230 } 231 len = rt_msg2(rtm->rtm_type, &info, (caddr_t)0, 232 (struct walkarg *)0); 233 if (len > rtm->rtm_msglen) { 234 struct rt_msghdr *new_rtm; 235 R_Malloc(new_rtm, struct rt_msghdr *, len); 236 if (new_rtm == 0) 237 senderr(ENOBUFS); 238 Bcopy(rtm, new_rtm, rtm->rtm_msglen); 239 Free(rtm); rtm = new_rtm; 240 } 241 (void)rt_msg2(rtm->rtm_type, &info, (caddr_t)rtm, 242 (struct walkarg *)0); 243 rtm->rtm_flags = rt->rt_flags; 244 rtm->rtm_rmx = rt->rt_rmx; 245 rtm->rtm_addrs = info.rti_addrs; 246 break; 247 248 case RTM_CHANGE: 249 if (gate && rt_setgate(rt, rt_key(rt), gate)) 250 senderr(EDQUOT); 251 /* new gateway could require new ifaddr, ifp; 252 flags may also be different; ifp may be specified 253 by ll sockaddr when protocol address is ambiguous */ 254 if (ifpaddr && (ifa = ifa_ifwithnet(ifpaddr)) && 255 (ifp = ifa->ifa_ifp)) 256 ifa = ifaof_ifpforaddr(ifaaddr ? ifaaddr : gate, 257 ifp); 258 else if ((ifaaddr && (ifa = ifa_ifwithaddr(ifaaddr))) || 259 (ifa = ifa_ifwithroute(rt->rt_flags, 260 rt_key(rt), gate))) 261 ifp = ifa->ifa_ifp; 262 if (ifa) { 263 register struct ifaddr *oifa = rt->rt_ifa; 264 if (oifa != ifa) { 265 if (oifa && oifa->ifa_rtrequest) 266 oifa->ifa_rtrequest(RTM_DELETE, 267 rt, gate); 268 IFAFREE(rt->rt_ifa); 269 rt->rt_ifa = ifa; 270 ifa->ifa_refcnt++; 271 rt->rt_ifp = ifp; 272 } 273 } 274 rt_setmetrics(rtm->rtm_inits, &rtm->rtm_rmx, 275 &rt->rt_rmx); 276 if (rt->rt_ifa && rt->rt_ifa->ifa_rtrequest) 277 rt->rt_ifa->ifa_rtrequest(RTM_ADD, rt, gate); 278 if (genmask) 279 rt->rt_genmask = genmask; 280 /* 281 * Fall into 282 */ 283 case RTM_LOCK: 284 rt->rt_rmx.rmx_locks &= ~(rtm->rtm_inits); 285 rt->rt_rmx.rmx_locks |= 286 (rtm->rtm_inits & rtm->rtm_rmx.rmx_locks); 287 break; 288 } 289 break; 290 291 default: 292 senderr(EOPNOTSUPP); 293 } 294 295 flush: 296 if (rtm) { 297 if (error) 298 rtm->rtm_errno = error; 299 else 300 rtm->rtm_flags |= RTF_DONE; 301 } 302 if (rt) 303 rtfree(rt); 304 { 305 register struct rawcb *rp = 0; 306 /* 307 * Check to see if we don't want our own messages. 308 */ 309 if ((so->so_options & SO_USELOOPBACK) == 0) { 310 if (route_cb.any_count <= 1) { 311 if (rtm) 312 Free(rtm); 313 m_freem(m); 314 return (error); 315 } 316 /* There is another listener, so construct message */ 317 rp = sotorawcb(so); 318 } 319 if (rtm) { 320 m_copyback(m, 0, rtm->rtm_msglen, (caddr_t)rtm); 321 Free(rtm); 322 } 323 if (rp) 324 rp->rcb_proto.sp_family = 0; /* Avoid us */ 325 if (dst) 326 route_proto.sp_protocol = dst->sa_family; 327 raw_input(m, &route_proto, &route_src, &route_dst); 328 if (rp) 329 rp->rcb_proto.sp_family = PF_ROUTE; 330 } 331 return (error); 332 } 333 334 void 335 rt_setmetrics(which, in, out) 336 u_long which; 337 register struct rt_metrics *in, *out; 338 { 339 #define metric(f, e) if (which & (f)) out->e = in->e; 340 metric(RTV_RPIPE, rmx_recvpipe); 341 metric(RTV_SPIPE, rmx_sendpipe); 342 metric(RTV_SSTHRESH, rmx_ssthresh); 343 metric(RTV_RTT, rmx_rtt); 344 metric(RTV_RTTVAR, rmx_rttvar); 345 metric(RTV_HOPCOUNT, rmx_hopcount); 346 metric(RTV_MTU, rmx_mtu); 347 metric(RTV_EXPIRE, rmx_expire); 348 #undef metric 349 } 350 351 #define ROUNDUP(a) \ 352 ((a) > 0 ? (1 + (((a) - 1) | (sizeof(long) - 1))) : sizeof(long)) 353 #define ADVANCE(x, n) (x += ROUNDUP((n)->sa_len)) 354 355 static void 356 rt_xaddrs(cp, cplim, rtinfo) 357 register caddr_t cp, cplim; 358 register struct rt_addrinfo *rtinfo; 359 { 360 register struct sockaddr *sa; 361 register int i; 362 363 bzero(rtinfo->rti_info, sizeof(rtinfo->rti_info)); 364 for (i = 0; (i < RTAX_MAX) && (cp < cplim); i++) { 365 if ((rtinfo->rti_addrs & (1 << i)) == 0) 366 continue; 367 rtinfo->rti_info[i] = sa = (struct sockaddr *)cp; 368 ADVANCE(cp, sa); 369 } 370 } 371 372 /* 373 * Copy data from a buffer back into the indicated mbuf chain, 374 * starting "off" bytes from the beginning, extending the mbuf 375 * chain if necessary. 376 */ 377 void 378 m_copyback(m0, off, len, cp) 379 struct mbuf *m0; 380 register int off; 381 register int len; 382 caddr_t cp; 383 { 384 register int mlen; 385 register struct mbuf *m = m0, *n; 386 int totlen = 0; 387 388 if (m0 == 0) 389 return; 390 while (off > (mlen = m->m_len)) { 391 off -= mlen; 392 totlen += mlen; 393 if (m->m_next == 0) { 394 n = m_getclr(M_DONTWAIT, m->m_type); 395 if (n == 0) 396 goto out; 397 n->m_len = min(MLEN, len + off); 398 m->m_next = n; 399 } 400 m = m->m_next; 401 } 402 while (len > 0) { 403 mlen = min (m->m_len - off, len); 404 bcopy(cp, off + mtod(m, caddr_t), (unsigned)mlen); 405 cp += mlen; 406 len -= mlen; 407 mlen += off; 408 off = 0; 409 totlen += mlen; 410 if (len == 0) 411 break; 412 if (m->m_next == 0) { 413 n = m_get(M_DONTWAIT, m->m_type); 414 if (n == 0) 415 break; 416 n->m_len = min(MLEN, len); 417 m->m_next = n; 418 } 419 m = m->m_next; 420 } 421 out: if (((m = m0)->m_flags & M_PKTHDR) && (m->m_pkthdr.len < totlen)) 422 m->m_pkthdr.len = totlen; 423 } 424 425 static struct mbuf * 426 rt_msg1(type, rtinfo) 427 int type; 428 register struct rt_addrinfo *rtinfo; 429 { 430 register struct rt_msghdr *rtm; 431 register struct mbuf *m; 432 register int i; 433 register struct sockaddr *sa; 434 int len, dlen; 435 436 m = m_gethdr(M_DONTWAIT, MT_DATA); 437 if (m == 0) 438 return (m); 439 switch (type) { 440 441 case RTM_DELADDR: 442 case RTM_NEWADDR: 443 len = sizeof(struct ifa_msghdr); 444 break; 445 446 case RTM_IFINFO: 447 len = sizeof(struct if_msghdr); 448 break; 449 450 default: 451 len = sizeof(struct rt_msghdr); 452 } 453 if (len > MHLEN) 454 panic("rt_msg1"); 455 m->m_pkthdr.len = m->m_len = len; 456 m->m_pkthdr.rcvif = 0; 457 rtm = mtod(m, struct rt_msghdr *); 458 bzero((caddr_t)rtm, len); 459 for (i = 0; i < RTAX_MAX; i++) { 460 if ((sa = rtinfo->rti_info[i]) == NULL) 461 continue; 462 rtinfo->rti_addrs |= (1 << i); 463 dlen = ROUNDUP(sa->sa_len); 464 m_copyback(m, len, dlen, (caddr_t)sa); 465 len += dlen; 466 } 467 if (m->m_pkthdr.len != len) { 468 m_freem(m); 469 return (NULL); 470 } 471 rtm->rtm_msglen = len; 472 rtm->rtm_version = RTM_VERSION; 473 rtm->rtm_type = type; 474 return (m); 475 } 476 477 static int 478 rt_msg2(type, rtinfo, cp, w) 479 int type; 480 register struct rt_addrinfo *rtinfo; 481 caddr_t cp; 482 struct walkarg *w; 483 { 484 register int i; 485 int len, dlen, second_time = 0; 486 caddr_t cp0; 487 488 rtinfo->rti_addrs = 0; 489 again: 490 switch (type) { 491 492 case RTM_DELADDR: 493 case RTM_NEWADDR: 494 len = sizeof(struct ifa_msghdr); 495 break; 496 497 case RTM_IFINFO: 498 len = sizeof(struct if_msghdr); 499 break; 500 501 default: 502 len = sizeof(struct rt_msghdr); 503 } 504 if (cp0 = cp) 505 cp += len; 506 for (i = 0; i < RTAX_MAX; i++) { 507 register struct sockaddr *sa; 508 509 if ((sa = rtinfo->rti_info[i]) == 0) 510 continue; 511 rtinfo->rti_addrs |= (1 << i); 512 dlen = ROUNDUP(sa->sa_len); 513 if (cp) { 514 bcopy((caddr_t)sa, cp, (unsigned)dlen); 515 cp += dlen; 516 } 517 len += dlen; 518 } 519 if (cp == 0 && w != NULL && !second_time) { 520 register struct walkarg *rw = w; 521 522 rw->w_needed += len; 523 if (rw->w_needed <= 0 && rw->w_where) { 524 if (rw->w_tmemsize < len) { 525 if (rw->w_tmem) 526 free(rw->w_tmem, M_RTABLE); 527 if (rw->w_tmem = (caddr_t) 528 malloc(len, M_RTABLE, M_NOWAIT)) 529 rw->w_tmemsize = len; 530 } 531 if (rw->w_tmem) { 532 cp = rw->w_tmem; 533 second_time = 1; 534 goto again; 535 } else 536 rw->w_where = 0; 537 } 538 } 539 if (cp) { 540 register struct rt_msghdr *rtm = (struct rt_msghdr *)cp0; 541 542 rtm->rtm_version = RTM_VERSION; 543 rtm->rtm_type = type; 544 rtm->rtm_msglen = len; 545 } 546 return (len); 547 } 548 549 /* 550 * This routine is called to generate a message from the routing 551 * socket indicating that a redirect has occured, a routing lookup 552 * has failed, or that a protocol has detected timeouts to a particular 553 * destination. 554 */ 555 void 556 rt_missmsg(type, rtinfo, flags, error) 557 int type, flags, error; 558 register struct rt_addrinfo *rtinfo; 559 { 560 register struct rt_msghdr *rtm; 561 register struct mbuf *m; 562 struct sockaddr *sa = rtinfo->rti_info[RTAX_DST]; 563 564 if (route_cb.any_count == 0) 565 return; 566 m = rt_msg1(type, rtinfo); 567 if (m == 0) 568 return; 569 rtm = mtod(m, struct rt_msghdr *); 570 rtm->rtm_flags = RTF_DONE | flags; 571 rtm->rtm_errno = error; 572 rtm->rtm_addrs = rtinfo->rti_addrs; 573 route_proto.sp_protocol = sa ? sa->sa_family : 0; 574 raw_input(m, &route_proto, &route_src, &route_dst); 575 } 576 577 /* 578 * This routine is called to generate a message from the routing 579 * socket indicating that the status of a network interface has changed. 580 */ 581 void 582 rt_ifmsg(ifp) 583 register struct ifnet *ifp; 584 { 585 register struct if_msghdr *ifm; 586 struct mbuf *m; 587 struct rt_addrinfo info; 588 589 if (route_cb.any_count == 0) 590 return; 591 bzero((caddr_t)&info, sizeof(info)); 592 m = rt_msg1(RTM_IFINFO, &info); 593 if (m == 0) 594 return; 595 ifm = mtod(m, struct if_msghdr *); 596 ifm->ifm_index = ifp->if_index; 597 ifm->ifm_flags = ifp->if_flags; 598 ifm->ifm_data = ifp->if_data; 599 ifm->ifm_addrs = 0; 600 route_proto.sp_protocol = 0; 601 raw_input(m, &route_proto, &route_src, &route_dst); 602 } 603 604 /* 605 * This is called to generate messages from the routing socket 606 * indicating a network interface has had addresses associated with it. 607 * if we ever reverse the logic and replace messages TO the routing 608 * socket indicate a request to configure interfaces, then it will 609 * be unnecessary as the routing socket will automatically generate 610 * copies of it. 611 */ 612 void 613 rt_newaddrmsg(cmd, ifa, error, rt) 614 int cmd, error; 615 register struct ifaddr *ifa; 616 register struct rtentry *rt; 617 { 618 struct rt_addrinfo info; 619 struct sockaddr *sa; 620 int pass; 621 struct mbuf *m; 622 struct ifnet *ifp = ifa->ifa_ifp; 623 624 if (route_cb.any_count == 0) 625 return; 626 for (pass = 1; pass < 3; pass++) { 627 bzero((caddr_t)&info, sizeof(info)); 628 if ((cmd == RTM_ADD && pass == 1) || 629 (cmd == RTM_DELETE && pass == 2)) { 630 register struct ifa_msghdr *ifam; 631 int ncmd = cmd == RTM_ADD ? RTM_NEWADDR : RTM_DELADDR; 632 633 ifaaddr = sa = ifa->ifa_addr; 634 ifpaddr = ifp->if_addrlist->ifa_addr; 635 netmask = ifa->ifa_netmask; 636 brdaddr = ifa->ifa_dstaddr; 637 if ((m = rt_msg1(ncmd, &info)) == NULL) 638 continue; 639 ifam = mtod(m, struct ifa_msghdr *); 640 ifam->ifam_index = ifp->if_index; 641 ifam->ifam_metric = ifa->ifa_metric; 642 ifam->ifam_flags = ifa->ifa_flags; 643 ifam->ifam_addrs = info.rti_addrs; 644 } 645 if ((cmd == RTM_ADD && pass == 2) || 646 (cmd == RTM_DELETE && pass == 1)) { 647 register struct rt_msghdr *rtm; 648 649 if (rt == 0) 650 continue; 651 netmask = rt_mask(rt); 652 dst = sa = rt_key(rt); 653 gate = rt->rt_gateway; 654 if ((m = rt_msg1(cmd, &info)) == NULL) 655 continue; 656 rtm = mtod(m, struct rt_msghdr *); 657 rtm->rtm_index = ifp->if_index; 658 rtm->rtm_flags |= rt->rt_flags; 659 rtm->rtm_errno = error; 660 rtm->rtm_addrs = info.rti_addrs; 661 } 662 route_proto.sp_protocol = sa ? sa->sa_family : 0; 663 raw_input(m, &route_proto, &route_src, &route_dst); 664 } 665 } 666 667 /* 668 * This is used in dumping the kernel table via sysctl(). 669 */ 670 int 671 sysctl_dumpentry(rn, w) 672 struct radix_node *rn; 673 register struct walkarg *w; 674 { 675 register struct rtentry *rt = (struct rtentry *)rn; 676 int error = 0, size; 677 struct rt_addrinfo info; 678 679 if (w->w_op == NET_RT_FLAGS && !(rt->rt_flags & w->w_arg)) 680 return 0; 681 bzero((caddr_t)&info, sizeof(info)); 682 dst = rt_key(rt); 683 gate = rt->rt_gateway; 684 netmask = rt_mask(rt); 685 genmask = rt->rt_genmask; 686 if (rt->rt_ifp) { 687 ifpaddr = rt->rt_ifp->if_addrlist->ifa_addr; 688 ifaaddr = rt->rt_ifa->ifa_addr; 689 if (rt->rt_ifp->if_flags & IFF_POINTOPOINT) 690 brdaddr = rt->rt_ifa->ifa_dstaddr; 691 } 692 size = rt_msg2(RTM_GET, &info, 0, w); 693 if (w->w_where && w->w_tmem) { 694 register struct rt_msghdr *rtm = (struct rt_msghdr *)w->w_tmem; 695 696 rtm->rtm_flags = rt->rt_flags; 697 rtm->rtm_use = rt->rt_use; 698 rtm->rtm_rmx = rt->rt_rmx; 699 rtm->rtm_index = rt->rt_ifp->if_index; 700 rtm->rtm_errno = rtm->rtm_pid = rtm->rtm_seq = 0; 701 rtm->rtm_addrs = info.rti_addrs; 702 if (error = copyout((caddr_t)rtm, w->w_where, size)) 703 w->w_where = NULL; 704 else 705 w->w_where += size; 706 } 707 return (error); 708 } 709 710 int 711 sysctl_iflist(af, w) 712 int af; 713 register struct walkarg *w; 714 { 715 register struct ifnet *ifp; 716 register struct ifaddr *ifa; 717 struct rt_addrinfo info; 718 int len, error = 0; 719 720 bzero((caddr_t)&info, sizeof(info)); 721 for (ifp = ifnet; ifp; ifp = ifp->if_next) { 722 if (w->w_arg && w->w_arg != ifp->if_index) 723 continue; 724 ifa = ifp->if_addrlist; 725 ifpaddr = ifa->ifa_addr; 726 len = rt_msg2(RTM_IFINFO, &info, (caddr_t)0, w); 727 ifpaddr = 0; 728 if (w->w_where && w->w_tmem) { 729 register struct if_msghdr *ifm; 730 731 ifm = (struct if_msghdr *)w->w_tmem; 732 ifm->ifm_index = ifp->if_index; 733 ifm->ifm_flags = ifp->if_flags; 734 ifm->ifm_data = ifp->if_data; 735 ifm->ifm_addrs = info.rti_addrs; 736 if (error = copyout((caddr_t)ifm, w->w_where, len)) 737 return (error); 738 w->w_where += len; 739 } 740 while (ifa = ifa->ifa_next) { 741 if (af && af != ifa->ifa_addr->sa_family) 742 continue; 743 ifaaddr = ifa->ifa_addr; 744 netmask = ifa->ifa_netmask; 745 brdaddr = ifa->ifa_dstaddr; 746 len = rt_msg2(RTM_NEWADDR, &info, 0, w); 747 if (w->w_where && w->w_tmem) { 748 register struct ifa_msghdr *ifam; 749 750 ifam = (struct ifa_msghdr *)w->w_tmem; 751 ifam->ifam_index = ifa->ifa_ifp->if_index; 752 ifam->ifam_flags = ifa->ifa_flags; 753 ifam->ifam_metric = ifa->ifa_metric; 754 ifam->ifam_addrs = info.rti_addrs; 755 if (error = copyout(w->w_tmem, w->w_where, len)) 756 return (error); 757 w->w_where += len; 758 } 759 } 760 ifaaddr = netmask = brdaddr = 0; 761 } 762 return (0); 763 } 764 765 int 766 sysctl_rtable(name, namelen, where, given, new, newlen) 767 int *name; 768 int namelen; 769 caddr_t where; 770 size_t *given; 771 caddr_t *new; 772 size_t newlen; 773 { 774 register struct radix_node_head *rnh; 775 int i, s, error = EINVAL; 776 u_char af; 777 struct walkarg w; 778 779 if (new) 780 return (EPERM); 781 if (namelen != 3) 782 return (EINVAL); 783 af = name[0]; 784 Bzero(&w, sizeof(w)); 785 w.w_where = where; 786 w.w_given = *given; 787 w.w_needed = 0 - w.w_given; 788 w.w_op = name[1]; 789 w.w_arg = name[2]; 790 791 s = splnet(); 792 switch (w.w_op) { 793 794 case NET_RT_DUMP: 795 case NET_RT_FLAGS: 796 for (i = 1; i <= AF_MAX; i++) 797 if ((rnh = rt_tables[i]) && (af == 0 || af == i) && 798 (error = rnh->rnh_walktree(rnh, 799 sysctl_dumpentry, &w))) 800 break; 801 break; 802 803 case NET_RT_IFLIST: 804 error = sysctl_iflist(af, &w); 805 } 806 splx(s); 807 if (w.w_tmem) 808 free(w.w_tmem, M_RTABLE); 809 w.w_needed += w.w_given; 810 if (where) { 811 *given = w.w_where - where; 812 if (*given < w.w_needed) 813 return (ENOMEM); 814 } else { 815 *given = (11 * w.w_needed) / 10; 816 } 817 return (error); 818 } 819 820 /* 821 * Definitions of protocols supported in the ROUTE domain. 822 */ 823 824 extern struct domain routedomain; /* or at least forward */ 825 826 struct protosw routesw[] = { 827 { SOCK_RAW, &routedomain, 0, PR_ATOMIC|PR_ADDR, 828 raw_input, route_output, raw_ctlinput, 0, 829 route_usrreq, 830 raw_init, 0, 0, 0, 831 sysctl_rtable, 832 } 833 }; 834 835 struct domain routedomain = 836 { PF_ROUTE, "route", route_init, 0, 0, 837 routesw, &routesw[sizeof(routesw)/sizeof(routesw[0])] }; 838
Indexes created Fri Oct 03 02:09:57 GMT 2025