1 /* 2 * Copyright (c) 2004, 2005 The DragonFly Project. All rights reserved. 3 * 4 * This code is derived from software contributed to The DragonFly Project 5 * by Jeffrey M. Hsu. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. Neither the name of The DragonFly Project nor the names of its 16 * contributors may be used to endorse or promote products derived 17 * from this software without specific, prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 21 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 22 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE 23 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, 24 * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING, 25 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 26 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED 27 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, 28 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT 29 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 */ 32 33 /* 34 * Copyright (c) 2004, 2005 Jeffrey M. Hsu. All rights reserved. 35 * 36 * License terms: all terms for the DragonFly license above plus the following: 37 * 38 * 4. All advertising materials mentioning features or use of this software 39 * must display the following acknowledgement: 40 * 41 * This product includes software developed by Jeffrey M. Hsu 42 * for the DragonFly Project. 43 * 44 * This requirement may be waived with permission from Jeffrey Hsu. 45 * Permission will be granted to any DragonFly user for free. 46 * This requirement will sunset and may be removed on Jan 31, 2006, 47 * after which the standard DragonFly license (as shown above) will 48 * apply. 49 */ 50 51 /* 52 * Copyright (c) 1988, 1991, 1993 53 * The Regents of the University of California. All rights reserved. 54 * 55 * Redistribution and use in source and binary forms, with or without 56 * modification, are permitted provided that the following conditions 57 * are met: 58 * 1. Redistributions of source code must retain the above copyright 59 * notice, this list of conditions and the following disclaimer. 60 * 2. Redistributions in binary form must reproduce the above copyright 61 * notice, this list of conditions and the following disclaimer in the 62 * documentation and/or other materials provided with the distribution. 63 * 3. All advertising materials mentioning features or use of this software 64 * must display the following acknowledgement: 65 * This product includes software developed by the University of 66 * California, Berkeley and its contributors. 67 * 4. Neither the name of the University nor the names of its contributors 68 * may be used to endorse or promote products derived from this software 69 * without specific prior written permission. 70 * 71 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 72 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 73 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 74 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 75 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 76 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 77 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 78 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 79 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 80 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 81 * SUCH DAMAGE. 82 * 83 * @(#)rtsock.c 8.7 (Berkeley) 10/12/95 84 * $FreeBSD: src/sys/net/rtsock.c,v 1.44.2.11 2002/12/04 14:05:41 ru Exp $ 85 * $DragonFly: src/sys/net/rtsock.c,v 1.27 2005/05/29 10:08:36 hsu Exp $ 86 */ 87 88 #include <sys/param.h> 89 #include <sys/systm.h> 90 #include <sys/kernel.h> 91 #include <sys/sysctl.h> 92 #include <sys/proc.h> 93 #include <sys/malloc.h> 94 #include <sys/mbuf.h> 95 #include <sys/protosw.h> 96 #include <sys/socket.h> 97 #include <sys/socketvar.h> 98 #include <sys/domain.h> 99 100 #include <machine/stdarg.h> 101 102 #include <net/if.h> 103 #include <net/route.h> 104 #include <net/raw_cb.h> 105 106 MALLOC_DEFINE(M_RTABLE, "routetbl", "routing tables"); 107 108 static struct route_cb { 109 int ip_count; 110 int ip6_count; 111 int ipx_count; 112 int ns_count; 113 int any_count; 114 } route_cb; 115 116 static const struct sockaddr route_src = { 2, PF_ROUTE, }; 117 118 struct walkarg { 119 int w_tmemsize; 120 int w_op, w_arg; 121 void *w_tmem; 122 struct sysctl_req *w_req; 123 }; 124 125 static struct mbuf * 126 rt_msg_mbuf (int, struct rt_addrinfo *); 127 static void rt_msg_buffer (int, struct rt_addrinfo *, void *buf, int len); 128 static int rt_msgsize (int type, struct rt_addrinfo *rtinfo); 129 static int rt_xaddrs (char *, char *, struct rt_addrinfo *); 130 static int sysctl_dumpentry (struct radix_node *rn, void *vw); 131 static int sysctl_iflist (int af, struct walkarg *w); 132 static int route_output(struct mbuf *, struct socket *, ...); 133 static void rt_setmetrics (u_long, struct rt_metrics *, 134 struct rt_metrics *); 135 136 /* 137 * It really doesn't make any sense at all for this code to share much 138 * with raw_usrreq.c, since its functionality is so restricted. XXX 139 */ 140 static int 141 rts_abort(struct socket *so) 142 { 143 int s, error; 144 145 s = splnet(); 146 error = raw_usrreqs.pru_abort(so); 147 splx(s); 148 return error; 149 } 150 151 /* pru_accept is EOPNOTSUPP */ 152 153 static int 154 rts_attach(struct socket *so, int proto, struct pru_attach_info *ai) 155 { 156 struct rawcb *rp; 157 int s, error; 158 159 if (sotorawcb(so) != NULL) 160 return EISCONN; /* XXX panic? */ 161 162 rp = malloc(sizeof *rp, M_PCB, M_WAITOK | M_ZERO); 163 if (rp == NULL) 164 return ENOBUFS; 165 166 /* 167 * The splnet() is necessary to block protocols from sending 168 * error notifications (like RTM_REDIRECT or RTM_LOSING) while 169 * this PCB is extant but incompletely initialized. 170 * Probably we should try to do more of this work beforehand and 171 * eliminate the spl. 172 */ 173 s = splnet(); 174 so->so_pcb = rp; 175 error = raw_attach(so, proto, ai->sb_rlimit); 176 rp = sotorawcb(so); 177 if (error) { 178 splx(s); 179 free(rp, M_PCB); 180 return error; 181 } 182 switch(rp->rcb_proto.sp_protocol) { 183 case AF_INET: 184 route_cb.ip_count++; 185 break; 186 case AF_INET6: 187 route_cb.ip6_count++; 188 break; 189 case AF_IPX: 190 route_cb.ipx_count++; 191 break; 192 case AF_NS: 193 route_cb.ns_count++; 194 break; 195 } 196 rp->rcb_faddr = &route_src; 197 route_cb.any_count++; 198 soisconnected(so); 199 so->so_options |= SO_USELOOPBACK; 200 splx(s); 201 return 0; 202 } 203 204 static int 205 rts_bind(struct socket *so, struct sockaddr *nam, struct thread *td) 206 { 207 int s, error; 208 209 s = splnet(); 210 error = raw_usrreqs.pru_bind(so, nam, td); /* xxx just EINVAL */ 211 splx(s); 212 return error; 213 } 214 215 static int 216 rts_connect(struct socket *so, struct sockaddr *nam, struct thread *td) 217 { 218 int s, error; 219 220 s = splnet(); 221 error = raw_usrreqs.pru_connect(so, nam, td); /* XXX just EINVAL */ 222 splx(s); 223 return error; 224 } 225 226 /* pru_connect2 is EOPNOTSUPP */ 227 /* pru_control is EOPNOTSUPP */ 228 229 static int 230 rts_detach(struct socket *so) 231 { 232 struct rawcb *rp = sotorawcb(so); 233 int s, error; 234 235 s = splnet(); 236 if (rp != NULL) { 237 switch(rp->rcb_proto.sp_protocol) { 238 case AF_INET: 239 route_cb.ip_count--; 240 break; 241 case AF_INET6: 242 route_cb.ip6_count--; 243 break; 244 case AF_IPX: 245 route_cb.ipx_count--; 246 break; 247 case AF_NS: 248 route_cb.ns_count--; 249 break; 250 } 251 route_cb.any_count--; 252 } 253 error = raw_usrreqs.pru_detach(so); 254 splx(s); 255 return error; 256 } 257 258 static int 259 rts_disconnect(struct socket *so) 260 { 261 int s, error; 262 263 s = splnet(); 264 error = raw_usrreqs.pru_disconnect(so); 265 splx(s); 266 return error; 267 } 268 269 /* pru_listen is EOPNOTSUPP */ 270 271 static int 272 rts_peeraddr(struct socket *so, struct sockaddr **nam) 273 { 274 int s, error; 275 276 s = splnet(); 277 error = raw_usrreqs.pru_peeraddr(so, nam); 278 splx(s); 279 return error; 280 } 281 282 /* pru_rcvd is EOPNOTSUPP */ 283 /* pru_rcvoob is EOPNOTSUPP */ 284 285 static int 286 rts_send(struct socket *so, int flags, struct mbuf *m, struct sockaddr *nam, 287 struct mbuf *control, struct thread *td) 288 { 289 int s, error; 290 291 s = splnet(); 292 error = raw_usrreqs.pru_send(so, flags, m, nam, control, td); 293 splx(s); 294 return error; 295 } 296 297 /* pru_sense is null */ 298 299 static int 300 rts_shutdown(struct socket *so) 301 { 302 int s, error; 303 304 s = splnet(); 305 error = raw_usrreqs.pru_shutdown(so); 306 splx(s); 307 return error; 308 } 309 310 static int 311 rts_sockaddr(struct socket *so, struct sockaddr **nam) 312 { 313 int s, error; 314 315 s = splnet(); 316 error = raw_usrreqs.pru_sockaddr(so, nam); 317 splx(s); 318 return error; 319 } 320 321 static struct pr_usrreqs route_usrreqs = { 322 rts_abort, pru_accept_notsupp, rts_attach, rts_bind, rts_connect, 323 pru_connect2_notsupp, pru_control_notsupp, rts_detach, rts_disconnect, 324 pru_listen_notsupp, rts_peeraddr, pru_rcvd_notsupp, pru_rcvoob_notsupp, 325 rts_send, pru_sense_null, rts_shutdown, rts_sockaddr, 326 sosend, soreceive, sopoll 327 }; 328 329 static __inline sa_family_t 330 familyof(struct sockaddr *sa) 331 { 332 return (sa != NULL ? sa->sa_family : 0); 333 } 334 335 static void 336 rts_input(struct mbuf *m, sa_family_t family) 337 { 338 static const struct sockaddr route_dst = { 2, PF_ROUTE, }; 339 struct sockproto route_proto = { PF_ROUTE, family }; 340 341 raw_input(m, &route_proto, &route_src, &route_dst); 342 } 343 344 static void * 345 reallocbuf(void *ptr, size_t len, size_t olen) 346 { 347 void *newptr; 348 349 newptr = malloc(len, M_RTABLE, M_INTWAIT | M_NULLOK); 350 if (newptr == NULL) 351 return NULL; 352 bcopy(ptr, newptr, olen); 353 free(ptr, M_RTABLE); 354 return (newptr); 355 } 356 357 /* 358 * Internal helper routine for route_output(). 359 */ 360 static int 361 fillrtmsg(struct rt_msghdr **prtm, struct rtentry *rt, 362 struct rt_addrinfo *rtinfo) 363 { 364 int msglen; 365 struct rt_msghdr *rtm = *prtm; 366 367 /* Fill in rt_addrinfo for call to rt_msg_buffer(). */ 368 rtinfo->rti_dst = rt_key(rt); 369 rtinfo->rti_gateway = rt->rt_gateway; 370 rtinfo->rti_netmask = rt_mask(rt); /* might be NULL */ 371 rtinfo->rti_genmask = rt->rt_genmask; /* might be NULL */ 372 if (rtm->rtm_addrs & (RTA_IFP | RTA_IFA)) { 373 if (rt->rt_ifp != NULL) { 374 rtinfo->rti_ifpaddr = 375 TAILQ_FIRST(&rt->rt_ifp->if_addrhead)->ifa_addr; 376 rtinfo->rti_ifaaddr = rt->rt_ifa->ifa_addr; 377 if (rt->rt_ifp->if_flags & IFF_POINTOPOINT) 378 rtinfo->rti_bcastaddr = rt->rt_ifa->ifa_dstaddr; 379 rtm->rtm_index = rt->rt_ifp->if_index; 380 } else { 381 rtinfo->rti_ifpaddr = NULL; 382 rtinfo->rti_ifaaddr = NULL; 383 } 384 } 385 386 msglen = rt_msgsize(rtm->rtm_type, rtinfo); 387 if (rtm->rtm_msglen < msglen) { 388 rtm = reallocbuf(rtm, msglen, rtm->rtm_msglen); 389 if (rtm == NULL) 390 return (ENOBUFS); 391 *prtm = rtm; 392 } 393 rt_msg_buffer(rtm->rtm_type, rtinfo, rtm, msglen); 394 395 rtm->rtm_flags = rt->rt_flags; 396 rtm->rtm_rmx = rt->rt_rmx; 397 rtm->rtm_addrs = rtinfo->rti_addrs; 398 399 return (0); 400 } 401 402 /*ARGSUSED*/ 403 static int 404 route_output(struct mbuf *m, struct socket *so, ...) 405 { 406 struct rt_msghdr *rtm = NULL; 407 struct rtentry *rt = NULL; 408 struct rtentry *saved_nrt = NULL; 409 struct radix_node_head *rnh; 410 struct ifaddr *ifa = NULL; 411 struct rawcb *rp = NULL; 412 struct pr_output_info *oi; 413 struct rt_addrinfo rtinfo; 414 int len, error = 0; 415 __va_list ap; 416 417 __va_start(ap, so); 418 oi = __va_arg(ap, struct pr_output_info *); 419 __va_end(ap); 420 421 #define gotoerr(e) { error = e; goto flush;} 422 423 if (m == NULL || 424 (m->m_len < sizeof(long) && 425 (m = m_pullup(m, sizeof(long))) == NULL)) 426 return (ENOBUFS); 427 if (!(m->m_flags & M_PKTHDR)) 428 panic("route_output"); 429 len = m->m_pkthdr.len; 430 if (len < sizeof(struct rt_msghdr) || 431 len != mtod(m, struct rt_msghdr *)->rtm_msglen) { 432 rtinfo.rti_dst = NULL; 433 gotoerr(EINVAL); 434 } 435 rtm = malloc(len, M_RTABLE, M_INTWAIT | M_NULLOK); 436 if (rtm == NULL) { 437 rtinfo.rti_dst = NULL; 438 gotoerr(ENOBUFS); 439 } 440 m_copydata(m, 0, len, (caddr_t)rtm); 441 if (rtm->rtm_version != RTM_VERSION) { 442 rtinfo.rti_dst = NULL; 443 gotoerr(EPROTONOSUPPORT); 444 } 445 rtm->rtm_pid = oi->p_pid; 446 bzero(&rtinfo, sizeof(struct rt_addrinfo)); 447 rtinfo.rti_addrs = rtm->rtm_addrs; 448 if (rt_xaddrs((char *)(rtm + 1), (char *)rtm + len, &rtinfo) != 0) { 449 rtinfo.rti_dst = NULL; 450 gotoerr(EINVAL); 451 } 452 rtinfo.rti_flags = rtm->rtm_flags; 453 if (rtinfo.rti_dst == NULL || rtinfo.rti_dst->sa_family >= AF_MAX || 454 (rtinfo.rti_gateway && rtinfo.rti_gateway->sa_family >= AF_MAX)) 455 gotoerr(EINVAL); 456 457 if (rtinfo.rti_genmask != NULL) { 458 struct radix_node *n; 459 460 #define clen(s) (*(u_char *)(s)) 461 n = rn_addmask((char *)rtinfo.rti_genmask, TRUE, 1); 462 if (n != NULL && 463 rtinfo.rti_genmask->sa_len >= clen(n->rn_key) && 464 bcmp((char *)rtinfo.rti_genmask + 1, 465 (char *)n->rn_key + 1, clen(n->rn_key) - 1) == 0) 466 rtinfo.rti_genmask = (struct sockaddr *)n->rn_key; 467 else 468 gotoerr(ENOBUFS); 469 } 470 471 /* 472 * Verify that the caller has the appropriate privilege; RTM_GET 473 * is the only operation the non-superuser is allowed. 474 */ 475 if (rtm->rtm_type != RTM_GET && suser_cred(so->so_cred, 0) != 0) 476 gotoerr(EPERM); 477 478 switch (rtm->rtm_type) { 479 case RTM_ADD: 480 if (rtinfo.rti_gateway == NULL) 481 gotoerr(EINVAL); 482 error = rtrequest1(RTM_ADD, &rtinfo, &saved_nrt); 483 if (error == 0 && saved_nrt != NULL) { 484 rt_setmetrics(rtm->rtm_inits, &rtm->rtm_rmx, 485 &saved_nrt->rt_rmx); 486 saved_nrt->rt_rmx.rmx_locks &= ~(rtm->rtm_inits); 487 saved_nrt->rt_rmx.rmx_locks |= 488 (rtm->rtm_inits & rtm->rtm_rmx.rmx_locks); 489 --saved_nrt->rt_refcnt; 490 saved_nrt->rt_genmask = rtinfo.rti_genmask; 491 } 492 break; 493 case RTM_DELETE: 494 error = rtrequest1(RTM_DELETE, &rtinfo, &saved_nrt); 495 if (error == 0) { 496 if ((rt = saved_nrt)) 497 rt->rt_refcnt++; 498 if (fillrtmsg(&rtm, rt, &rtinfo) != 0) 499 gotoerr(ENOBUFS); 500 } 501 break; 502 case RTM_GET: 503 case RTM_CHANGE: 504 case RTM_LOCK: 505 if ((rnh = rt_tables[rtinfo.rti_dst->sa_family]) == NULL) 506 gotoerr(EAFNOSUPPORT); 507 rt = (struct rtentry *) 508 rnh->rnh_lookup((char *)rtinfo.rti_dst, 509 (char *)rtinfo.rti_netmask, rnh); 510 if (rt == NULL) 511 gotoerr(ESRCH); 512 rt->rt_refcnt++; 513 514 switch(rtm->rtm_type) { 515 case RTM_GET: 516 if (fillrtmsg(&rtm, rt, &rtinfo) != 0) 517 gotoerr(ENOBUFS); 518 break; 519 case RTM_CHANGE: 520 /* 521 * new gateway could require new ifaddr, ifp; 522 * flags may also be different; ifp may be specified 523 * by ll sockaddr when protocol address is ambiguous 524 */ 525 if (((rt->rt_flags & RTF_GATEWAY) && 526 rtinfo.rti_gateway != NULL) || 527 rtinfo.rti_ifpaddr != NULL || 528 (rtinfo.rti_ifaaddr != NULL && 529 sa_equal(rtinfo.rti_ifaaddr, 530 rt->rt_ifa->ifa_addr))) { 531 error = rt_getifa(&rtinfo); 532 if (error != 0) 533 gotoerr(error); 534 } 535 if (rtinfo.rti_gateway != NULL) { 536 error = rt_setgate(rt, rt_key(rt), 537 rtinfo.rti_gateway); 538 if (error != 0) 539 gotoerr(error); 540 } 541 if ((ifa = rtinfo.rti_ifa) != NULL) { 542 struct ifaddr *oifa = rt->rt_ifa; 543 544 if (oifa != ifa) { 545 if (oifa && oifa->ifa_rtrequest) 546 oifa->ifa_rtrequest(RTM_DELETE, 547 rt, &rtinfo); 548 IFAFREE(rt->rt_ifa); 549 IFAREF(ifa); 550 rt->rt_ifa = ifa; 551 rt->rt_ifp = rtinfo.rti_ifp; 552 } 553 } 554 rt_setmetrics(rtm->rtm_inits, &rtm->rtm_rmx, 555 &rt->rt_rmx); 556 if (rt->rt_ifa && rt->rt_ifa->ifa_rtrequest) 557 rt->rt_ifa->ifa_rtrequest(RTM_ADD, rt, &rtinfo); 558 if (rtinfo.rti_genmask != NULL) 559 rt->rt_genmask = rtinfo.rti_genmask; 560 /* 561 * Fall into 562 */ 563 case RTM_LOCK: 564 rt->rt_rmx.rmx_locks &= ~(rtm->rtm_inits); 565 rt->rt_rmx.rmx_locks |= 566 (rtm->rtm_inits & rtm->rtm_rmx.rmx_locks); 567 break; 568 } 569 570 break; 571 default: 572 gotoerr(EOPNOTSUPP); 573 } 574 575 flush: 576 if (rtm != NULL) { 577 if (error != 0) 578 rtm->rtm_errno = error; 579 else 580 rtm->rtm_flags |= RTF_DONE; 581 } 582 if (rt != NULL) 583 rtfree(rt); 584 /* 585 * Check to see if we don't want our own messages. 586 */ 587 if (!(so->so_options & SO_USELOOPBACK)) { 588 if (route_cb.any_count <= 1) { 589 if (rtm != NULL) 590 free(rtm, M_RTABLE); 591 m_freem(m); 592 return (error); 593 } 594 /* There is another listener, so construct message */ 595 rp = sotorawcb(so); 596 } 597 if (rtm != NULL) { 598 m_copyback(m, 0, rtm->rtm_msglen, (caddr_t)rtm); 599 if (m->m_pkthdr.len < rtm->rtm_msglen) { 600 m_freem(m); 601 m = NULL; 602 } else if (m->m_pkthdr.len > rtm->rtm_msglen) 603 m_adj(m, rtm->rtm_msglen - m->m_pkthdr.len); 604 free(rtm, M_RTABLE); 605 } 606 if (rp != NULL) 607 rp->rcb_proto.sp_family = 0; /* Avoid us */ 608 if (m != NULL) 609 rts_input(m, familyof(rtinfo.rti_dst)); 610 if (rp != NULL) 611 rp->rcb_proto.sp_family = PF_ROUTE; 612 return (error); 613 } 614 615 static void 616 rt_setmetrics(u_long which, struct rt_metrics *in, struct rt_metrics *out) 617 { 618 #define setmetric(flag, elt) if (which & (flag)) out->elt = in->elt; 619 setmetric(RTV_RPIPE, rmx_recvpipe); 620 setmetric(RTV_SPIPE, rmx_sendpipe); 621 setmetric(RTV_SSTHRESH, rmx_ssthresh); 622 setmetric(RTV_RTT, rmx_rtt); 623 setmetric(RTV_RTTVAR, rmx_rttvar); 624 setmetric(RTV_HOPCOUNT, rmx_hopcount); 625 setmetric(RTV_MTU, rmx_mtu); 626 setmetric(RTV_EXPIRE, rmx_expire); 627 #undef setmetric 628 } 629 630 #define ROUNDUP(a) \ 631 ((a) > 0 ? (1 + (((a) - 1) | (sizeof(long) - 1))) : sizeof(long)) 632 633 /* 634 * Extract the addresses of the passed sockaddrs. 635 * Do a little sanity checking so as to avoid bad memory references. 636 * This data is derived straight from userland. 637 */ 638 static int 639 rt_xaddrs(char *cp, char *cplim, struct rt_addrinfo *rtinfo) 640 { 641 struct sockaddr *sa; 642 int i; 643 644 for (i = 0; (i < RTAX_MAX) && (cp < cplim); i++) { 645 if ((rtinfo->rti_addrs & (1 << i)) == 0) 646 continue; 647 sa = (struct sockaddr *)cp; 648 /* 649 * It won't fit. 650 */ 651 if ((cp + sa->sa_len) > cplim) { 652 return (EINVAL); 653 } 654 655 /* 656 * There are no more... Quit now. 657 * If there are more bits, they are in error. 658 * I've seen this. route(1) can evidently generate these. 659 * This causes kernel to core dump. 660 * For compatibility, if we see this, point to a safe address. 661 */ 662 if (sa->sa_len == 0) { 663 static struct sockaddr sa_zero = { 664 sizeof sa_zero, AF_INET, 665 }; 666 667 rtinfo->rti_info[i] = &sa_zero; 668 return (0); /* should be EINVAL but for compat */ 669 } 670 671 /* Accept the sockaddr. */ 672 rtinfo->rti_info[i] = sa; 673 cp += ROUNDUP(sa->sa_len); 674 } 675 return (0); 676 } 677 678 static int 679 rt_msghdrsize(int type) 680 { 681 switch (type) { 682 case RTM_DELADDR: 683 case RTM_NEWADDR: 684 return sizeof(struct ifa_msghdr); 685 case RTM_DELMADDR: 686 case RTM_NEWMADDR: 687 return sizeof(struct ifma_msghdr); 688 case RTM_IFINFO: 689 return sizeof(struct if_msghdr); 690 case RTM_IFANNOUNCE: 691 return sizeof(struct if_announcemsghdr); 692 default: 693 return sizeof(struct rt_msghdr); 694 } 695 } 696 697 static int 698 rt_msgsize(int type, struct rt_addrinfo *rtinfo) 699 { 700 int len, i; 701 702 len = rt_msghdrsize(type); 703 for (i = 0; i < RTAX_MAX; i++) { 704 if (rtinfo->rti_info[i] != NULL) 705 len += ROUNDUP(rtinfo->rti_info[i]->sa_len); 706 } 707 len = ALIGN(len); 708 return len; 709 } 710 711 /* 712 * Build a routing message in a buffer. 713 * Copy the addresses in the rtinfo->rti_info[] sockaddr array 714 * to the end of the buffer after the message header. 715 * 716 * Set the rtinfo->rti_addrs bitmask of addresses present in rtinfo->rti_info[]. 717 * This side-effect can be avoided if we reorder the addrs bitmask field in all 718 * the route messages to line up so we can set it here instead of back in the 719 * calling routine. 720 */ 721 static void 722 rt_msg_buffer(int type, struct rt_addrinfo *rtinfo, void *buf, int msglen) 723 { 724 struct rt_msghdr *rtm; 725 char *cp; 726 int dlen, i; 727 728 rtm = (struct rt_msghdr *) buf; 729 rtm->rtm_version = RTM_VERSION; 730 rtm->rtm_type = type; 731 rtm->rtm_msglen = msglen; 732 733 cp = (char *)buf + rt_msghdrsize(type); 734 rtinfo->rti_addrs = 0; 735 for (i = 0; i < RTAX_MAX; i++) { 736 struct sockaddr *sa; 737 738 if ((sa = rtinfo->rti_info[i]) == NULL) 739 continue; 740 rtinfo->rti_addrs |= (1 << i); 741 dlen = ROUNDUP(sa->sa_len); 742 bcopy(sa, cp, dlen); 743 cp += dlen; 744 } 745 } 746 747 /* 748 * Build a routing message in a mbuf chain. 749 * Copy the addresses in the rtinfo->rti_info[] sockaddr array 750 * to the end of the mbuf after the message header. 751 * 752 * Set the rtinfo->rti_addrs bitmask of addresses present in rtinfo->rti_info[]. 753 * This side-effect can be avoided if we reorder the addrs bitmask field in all 754 * the route messages to line up so we can set it here instead of back in the 755 * calling routine. 756 */ 757 static struct mbuf * 758 rt_msg_mbuf(int type, struct rt_addrinfo *rtinfo) 759 { 760 struct mbuf *m; 761 struct rt_msghdr *rtm; 762 int hlen, len; 763 int i; 764 765 hlen = rt_msghdrsize(type); 766 KASSERT(hlen <= MCLBYTES, ("rt_msg_mbuf: hlen %d doesn't fit", hlen)); 767 768 m = m_getl(hlen, MB_DONTWAIT, MT_DATA, M_PKTHDR, NULL); 769 if (m == NULL) 770 return (NULL); 771 m->m_pkthdr.len = m->m_len = hlen; 772 m->m_pkthdr.rcvif = NULL; 773 rtinfo->rti_addrs = 0; 774 len = hlen; 775 for (i = 0; i < RTAX_MAX; i++) { 776 struct sockaddr *sa; 777 int dlen; 778 779 if ((sa = rtinfo->rti_info[i]) == NULL) 780 continue; 781 rtinfo->rti_addrs |= (1 << i); 782 dlen = ROUNDUP(sa->sa_len); 783 m_copyback(m, len, dlen, (caddr_t)sa); /* can grow mbuf chain */ 784 len += dlen; 785 } 786 if (m->m_pkthdr.len != len) { /* one of the m_copyback() calls failed */ 787 m_freem(m); 788 return (NULL); 789 } 790 rtm = mtod(m, struct rt_msghdr *); 791 bzero(rtm, hlen); 792 rtm->rtm_msglen = len; 793 rtm->rtm_version = RTM_VERSION; 794 rtm->rtm_type = type; 795 return (m); 796 } 797 798 /* 799 * This routine is called to generate a message from the routing 800 * socket indicating that a redirect has occurred, a routing lookup 801 * has failed, or that a protocol has detected timeouts to a particular 802 * destination. 803 */ 804 void 805 rt_missmsg(int type, struct rt_addrinfo *rtinfo, int flags, int error) 806 { 807 struct sockaddr *dst = rtinfo->rti_info[RTAX_DST]; 808 struct rt_msghdr *rtm; 809 struct mbuf *m; 810 811 if (route_cb.any_count == 0) 812 return; 813 m = rt_msg_mbuf(type, rtinfo); 814 if (m == NULL) 815 return; 816 rtm = mtod(m, struct rt_msghdr *); 817 rtm->rtm_flags = RTF_DONE | flags; 818 rtm->rtm_errno = error; 819 rtm->rtm_addrs = rtinfo->rti_addrs; 820 rts_input(m, familyof(dst)); 821 } 822 823 void 824 rt_dstmsg(int type, struct sockaddr *dst, int error) 825 { 826 struct rt_msghdr *rtm; 827 struct rt_addrinfo addrs; 828 struct mbuf *m; 829 830 if (route_cb.any_count == 0) 831 return; 832 bzero(&addrs, sizeof(struct rt_addrinfo)); 833 addrs.rti_info[RTAX_DST] = dst; 834 m = rt_msg_mbuf(type, &addrs); 835 if (m == NULL) 836 return; 837 rtm = mtod(m, struct rt_msghdr *); 838 rtm->rtm_flags = RTF_DONE; 839 rtm->rtm_errno = error; 840 rtm->rtm_addrs = addrs.rti_addrs; 841 rts_input(m, familyof(dst)); 842 } 843 844 /* 845 * This routine is called to generate a message from the routing 846 * socket indicating that the status of a network interface has changed. 847 */ 848 void 849 rt_ifmsg(struct ifnet *ifp) 850 { 851 struct if_msghdr *ifm; 852 struct mbuf *m; 853 struct rt_addrinfo rtinfo; 854 855 if (route_cb.any_count == 0) 856 return; 857 bzero(&rtinfo, sizeof(struct rt_addrinfo)); 858 m = rt_msg_mbuf(RTM_IFINFO, &rtinfo); 859 if (m == NULL) 860 return; 861 ifm = mtod(m, struct if_msghdr *); 862 ifm->ifm_index = ifp->if_index; 863 ifm->ifm_flags = ifp->if_flags; 864 ifm->ifm_data = ifp->if_data; 865 ifm->ifm_addrs = 0; 866 rts_input(m, 0); 867 } 868 869 static void 870 rt_ifamsg(int cmd, struct ifaddr *ifa) 871 { 872 struct ifa_msghdr *ifam; 873 struct rt_addrinfo rtinfo; 874 struct mbuf *m; 875 struct ifnet *ifp = ifa->ifa_ifp; 876 877 bzero(&rtinfo, sizeof(struct rt_addrinfo)); 878 rtinfo.rti_ifaaddr = ifa->ifa_addr; 879 rtinfo.rti_ifpaddr = TAILQ_FIRST(&ifp->if_addrhead)->ifa_addr; 880 rtinfo.rti_netmask = ifa->ifa_netmask; 881 rtinfo.rti_bcastaddr = ifa->ifa_dstaddr; 882 883 m = rt_msg_mbuf(cmd, &rtinfo); 884 if (m == NULL) 885 return; 886 887 ifam = mtod(m, struct ifa_msghdr *); 888 ifam->ifam_index = ifp->if_index; 889 ifam->ifam_metric = ifa->ifa_metric; 890 ifam->ifam_flags = ifa->ifa_flags; 891 ifam->ifam_addrs = rtinfo.rti_addrs; 892 893 rts_input(m, familyof(ifa->ifa_addr)); 894 } 895 896 void 897 rt_rtmsg(int cmd, struct rtentry *rt, struct ifnet *ifp, int error) 898 { 899 struct rt_msghdr *rtm; 900 struct rt_addrinfo rtinfo; 901 struct mbuf *m; 902 struct sockaddr *dst; 903 904 if (rt == NULL) 905 return; 906 907 bzero(&rtinfo, sizeof(struct rt_addrinfo)); 908 rtinfo.rti_dst = dst = rt_key(rt); 909 rtinfo.rti_gateway = rt->rt_gateway; 910 rtinfo.rti_netmask = rt_mask(rt); 911 if (ifp != NULL) 912 rtinfo.rti_ifpaddr = TAILQ_FIRST(&ifp->if_addrhead)->ifa_addr; 913 rtinfo.rti_ifaaddr = rt->rt_ifa->ifa_addr; 914 915 m = rt_msg_mbuf(cmd, &rtinfo); 916 if (m == NULL) 917 return; 918 919 rtm = mtod(m, struct rt_msghdr *); 920 if (ifp != NULL) 921 rtm->rtm_index = ifp->if_index; 922 rtm->rtm_flags |= rt->rt_flags; 923 rtm->rtm_errno = error; 924 rtm->rtm_addrs = rtinfo.rti_addrs; 925 926 rts_input(m, familyof(dst)); 927 } 928 929 /* 930 * This is called to generate messages from the routing socket 931 * indicating a network interface has had addresses associated with it. 932 * if we ever reverse the logic and replace messages TO the routing 933 * socket indicate a request to configure interfaces, then it will 934 * be unnecessary as the routing socket will automatically generate 935 * copies of it. 936 */ 937 void 938 rt_newaddrmsg(int cmd, struct ifaddr *ifa, int error, struct rtentry *rt) 939 { 940 if (route_cb.any_count == 0) 941 return; 942 943 if (cmd == RTM_ADD) { 944 rt_ifamsg(RTM_NEWADDR, ifa); 945 rt_rtmsg(RTM_ADD, rt, ifa->ifa_ifp, error); 946 } else { 947 KASSERT((cmd == RTM_DELETE), ("unknown cmd %d", cmd)); 948 rt_rtmsg(RTM_DELETE, rt, ifa->ifa_ifp, error); 949 rt_ifamsg(RTM_DELADDR, ifa); 950 } 951 } 952 953 /* 954 * This is the analogue to the rt_newaddrmsg which performs the same 955 * function but for multicast group memberhips. This is easier since 956 * there is no route state to worry about. 957 */ 958 void 959 rt_newmaddrmsg(int cmd, struct ifmultiaddr *ifma) 960 { 961 struct rt_addrinfo rtinfo; 962 struct mbuf *m = NULL; 963 struct ifnet *ifp = ifma->ifma_ifp; 964 struct ifma_msghdr *ifmam; 965 966 if (route_cb.any_count == 0) 967 return; 968 969 bzero(&rtinfo, sizeof(struct rt_addrinfo)); 970 rtinfo.rti_ifaaddr = ifma->ifma_addr; 971 if (ifp != NULL && !TAILQ_EMPTY(&ifp->if_addrhead)) 972 rtinfo.rti_ifpaddr = TAILQ_FIRST(&ifp->if_addrhead)->ifa_addr; 973 /* 974 * If a link-layer address is present, present it as a ``gateway'' 975 * (similarly to how ARP entries, e.g., are presented). 976 */ 977 rtinfo.rti_gateway = ifma->ifma_lladdr; 978 979 m = rt_msg_mbuf(cmd, &rtinfo); 980 if (m == NULL) 981 return; 982 983 ifmam = mtod(m, struct ifma_msghdr *); 984 ifmam->ifmam_index = ifp->if_index; 985 ifmam->ifmam_addrs = rtinfo.rti_addrs; 986 987 rts_input(m, familyof(ifma->ifma_addr)); 988 } 989 990 /* 991 * This is called to generate routing socket messages indicating 992 * network interface arrival and departure. 993 */ 994 void 995 rt_ifannouncemsg(struct ifnet *ifp, int what) 996 { 997 struct rt_addrinfo addrinfo; 998 struct mbuf *m; 999 struct if_announcemsghdr *ifan; 1000 1001 if (route_cb.any_count == 0) 1002 return; 1003 1004 bzero(&addrinfo, sizeof addrinfo); 1005 m = rt_msg_mbuf(RTM_IFANNOUNCE, &addrinfo); 1006 if (m == NULL) 1007 return; 1008 1009 ifan = mtod(m, struct if_announcemsghdr *); 1010 ifan->ifan_index = ifp->if_index; 1011 strlcpy(ifan->ifan_name, ifp->if_xname, sizeof ifan->ifan_name); 1012 ifan->ifan_what = what; 1013 1014 rts_input(m, 0); 1015 } 1016 1017 static int 1018 resizewalkarg(struct walkarg *w, int len) 1019 { 1020 void *newptr; 1021 1022 newptr = malloc(len, M_RTABLE, M_INTWAIT | M_NULLOK); 1023 if (newptr == NULL) 1024 return (ENOMEM); 1025 if (w->w_tmem != NULL) 1026 free(w->w_tmem, M_RTABLE); 1027 w->w_tmem = newptr; 1028 w->w_tmemsize = len; 1029 return (0); 1030 } 1031 1032 /* 1033 * This is used in dumping the kernel table via sysctl(). 1034 */ 1035 int 1036 sysctl_dumpentry(struct radix_node *rn, void *vw) 1037 { 1038 struct walkarg *w = vw; 1039 struct rtentry *rt = (struct rtentry *)rn; 1040 struct rt_addrinfo rtinfo; 1041 int error, msglen; 1042 1043 if (w->w_op == NET_RT_FLAGS && !(rt->rt_flags & w->w_arg)) 1044 return 0; 1045 1046 bzero(&rtinfo, sizeof(struct rt_addrinfo)); 1047 rtinfo.rti_dst = rt_key(rt); 1048 rtinfo.rti_gateway = rt->rt_gateway; 1049 rtinfo.rti_netmask = rt_mask(rt); 1050 rtinfo.rti_genmask = rt->rt_genmask; 1051 if (rt->rt_ifp != NULL) { 1052 rtinfo.rti_ifpaddr = 1053 TAILQ_FIRST(&rt->rt_ifp->if_addrhead)->ifa_addr; 1054 rtinfo.rti_ifaaddr = rt->rt_ifa->ifa_addr; 1055 if (rt->rt_ifp->if_flags & IFF_POINTOPOINT) 1056 rtinfo.rti_bcastaddr = rt->rt_ifa->ifa_dstaddr; 1057 } 1058 msglen = rt_msgsize(RTM_GET, &rtinfo); 1059 if (w->w_tmemsize < msglen && resizewalkarg(w, msglen) != 0) 1060 return (ENOMEM); 1061 rt_msg_buffer(RTM_GET, &rtinfo, w->w_tmem, msglen); 1062 if (w->w_req != NULL) { 1063 struct rt_msghdr *rtm = w->w_tmem; 1064 1065 rtm->rtm_flags = rt->rt_flags; 1066 rtm->rtm_use = rt->rt_use; 1067 rtm->rtm_rmx = rt->rt_rmx; 1068 rtm->rtm_index = rt->rt_ifp->if_index; 1069 rtm->rtm_errno = rtm->rtm_pid = rtm->rtm_seq = 0; 1070 rtm->rtm_addrs = rtinfo.rti_addrs; 1071 error = SYSCTL_OUT(w->w_req, rtm, msglen); 1072 return (error); 1073 } 1074 return (0); 1075 } 1076 1077 static int 1078 sysctl_iflist(int af, struct walkarg *w) 1079 { 1080 struct ifnet *ifp; 1081 struct ifaddr *ifa; 1082 struct rt_addrinfo rtinfo; 1083 int msglen, error; 1084 1085 bzero(&rtinfo, sizeof(struct rt_addrinfo)); 1086 TAILQ_FOREACH(ifp, &ifnet, if_link) { 1087 if (w->w_arg && w->w_arg != ifp->if_index) 1088 continue; 1089 ifa = TAILQ_FIRST(&ifp->if_addrhead); 1090 rtinfo.rti_ifpaddr = ifa->ifa_addr; 1091 msglen = rt_msgsize(RTM_IFINFO, &rtinfo); 1092 if (w->w_tmemsize < msglen && resizewalkarg(w, msglen) != 0) 1093 return (ENOMEM); 1094 rt_msg_buffer(RTM_IFINFO, &rtinfo, w->w_tmem, msglen); 1095 rtinfo.rti_ifpaddr = NULL; 1096 if (w->w_req != NULL && w->w_tmem != NULL) { 1097 struct if_msghdr *ifm = w->w_tmem; 1098 1099 ifm->ifm_index = ifp->if_index; 1100 ifm->ifm_flags = ifp->if_flags; 1101 ifm->ifm_data = ifp->if_data; 1102 ifm->ifm_addrs = rtinfo.rti_addrs; 1103 error = SYSCTL_OUT(w->w_req, ifm, msglen); 1104 if (error) 1105 return (error); 1106 } 1107 while ((ifa = TAILQ_NEXT(ifa, ifa_link)) != NULL) { 1108 if (af && af != ifa->ifa_addr->sa_family) 1109 continue; 1110 if (curproc->p_ucred->cr_prison && 1111 prison_if(curthread, ifa->ifa_addr)) 1112 continue; 1113 rtinfo.rti_ifaaddr = ifa->ifa_addr; 1114 rtinfo.rti_netmask = ifa->ifa_netmask; 1115 rtinfo.rti_bcastaddr = ifa->ifa_dstaddr; 1116 msglen = rt_msgsize(RTM_NEWADDR, &rtinfo); 1117 if (w->w_tmemsize < msglen && 1118 resizewalkarg(w, msglen) != 0) 1119 return (ENOMEM); 1120 rt_msg_buffer(RTM_NEWADDR, &rtinfo, w->w_tmem, msglen); 1121 if (w->w_req != NULL) { 1122 struct ifa_msghdr *ifam = w->w_tmem; 1123 1124 ifam->ifam_index = ifa->ifa_ifp->if_index; 1125 ifam->ifam_flags = ifa->ifa_flags; 1126 ifam->ifam_metric = ifa->ifa_metric; 1127 ifam->ifam_addrs = rtinfo.rti_addrs; 1128 error = SYSCTL_OUT(w->w_req, w->w_tmem, msglen); 1129 if (error) 1130 return (error); 1131 } 1132 } 1133 rtinfo.rti_netmask = NULL; 1134 rtinfo.rti_ifaaddr = NULL; 1135 rtinfo.rti_bcastaddr = NULL; 1136 } 1137 return (0); 1138 } 1139 1140 static int 1141 sysctl_rtsock(SYSCTL_HANDLER_ARGS) 1142 { 1143 int *name = (int *)arg1; 1144 u_int namelen = arg2; 1145 struct radix_node_head *rnh; 1146 int i, s, error = EINVAL; 1147 u_char af; 1148 struct walkarg w; 1149 1150 name ++; 1151 namelen--; 1152 if (req->newptr) 1153 return (EPERM); 1154 if (namelen != 3) 1155 return (EINVAL); 1156 af = name[0]; 1157 bzero(&w, sizeof w); 1158 w.w_op = name[1]; 1159 w.w_arg = name[2]; 1160 w.w_req = req; 1161 1162 s = splnet(); 1163 switch (w.w_op) { 1164 1165 case NET_RT_DUMP: 1166 case NET_RT_FLAGS: 1167 for (i = 1; i <= AF_MAX; i++) 1168 if ((rnh = rt_tables[i]) && (af == 0 || af == i) && 1169 (error = rnh->rnh_walktree(rnh, 1170 sysctl_dumpentry, &w))) 1171 break; 1172 break; 1173 1174 case NET_RT_IFLIST: 1175 error = sysctl_iflist(af, &w); 1176 } 1177 splx(s); 1178 if (w.w_tmem != NULL) 1179 free(w.w_tmem, M_RTABLE); 1180 return (error); 1181 } 1182 1183 SYSCTL_NODE(_net, PF_ROUTE, routetable, CTLFLAG_RD, sysctl_rtsock, ""); 1184 1185 /* 1186 * Definitions of protocols supported in the ROUTE domain. 1187 */ 1188 1189 extern struct domain routedomain; /* or at least forward */ 1190 1191 static struct protosw routesw[] = { 1192 { SOCK_RAW, &routedomain, 0, PR_ATOMIC|PR_ADDR, 1193 0, route_output, raw_ctlinput, 0, 1194 cpu0_soport, 1195 raw_init, 0, 0, 0, 1196 &route_usrreqs 1197 } 1198 }; 1199 1200 static struct domain routedomain = { 1201 PF_ROUTE, "route", NULL, NULL, NULL, 1202 routesw, &routesw[(sizeof routesw)/(sizeof routesw[0])], 1203 }; 1204 1205 DOMAIN_SET(route); 1206