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