The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/net/rtsock.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    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  * 4. Neither the name of the University nor the names of its contributors
   14  *    may be used to endorse or promote products derived from this software
   15  *    without specific prior written permission.
   16  *
   17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
   18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
   21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   27  * SUCH DAMAGE.
   28  *
   29  *      @(#)rtsock.c    8.7 (Berkeley) 10/12/95
   30  * $FreeBSD: releng/8.2/sys/net/rtsock.c 214552 2010-10-30 11:54:55Z bz $
   31  */
   32 #include "opt_compat.h"
   33 #include "opt_sctp.h"
   34 #include "opt_mpath.h"
   35 #include "opt_inet.h"
   36 #include "opt_inet6.h"
   37 
   38 #include <sys/param.h>
   39 #include <sys/jail.h>
   40 #include <sys/kernel.h>
   41 #include <sys/domain.h>
   42 #include <sys/lock.h>
   43 #include <sys/malloc.h>
   44 #include <sys/mbuf.h>
   45 #include <sys/priv.h>
   46 #include <sys/proc.h>
   47 #include <sys/protosw.h>
   48 #include <sys/rwlock.h>
   49 #include <sys/signalvar.h>
   50 #include <sys/socket.h>
   51 #include <sys/socketvar.h>
   52 #include <sys/sysctl.h>
   53 #include <sys/systm.h>
   54 
   55 #include <net/if.h>
   56 #include <net/if_dl.h>
   57 #include <net/if_llatbl.h>
   58 #include <net/if_types.h>
   59 #include <net/netisr.h>
   60 #include <net/raw_cb.h>
   61 #include <net/route.h>
   62 #include <net/vnet.h>
   63 
   64 #include <netinet/in.h>
   65 #include <netinet/if_ether.h>
   66 #ifdef INET6
   67 #include <netinet6/scope6_var.h>
   68 #endif
   69 
   70 #if defined(INET) || defined(INET6)
   71 #ifdef SCTP
   72 extern void sctp_addr_change(struct ifaddr *ifa, int cmd);
   73 #endif /* SCTP */
   74 #endif
   75 
   76 #ifdef COMPAT_FREEBSD32
   77 #include <sys/mount.h>
   78 #include <compat/freebsd32/freebsd32.h>
   79 
   80 struct if_data32 {
   81         uint8_t ifi_type;
   82         uint8_t ifi_physical;
   83         uint8_t ifi_addrlen;
   84         uint8_t ifi_hdrlen;
   85         uint8_t ifi_link_state;
   86         uint8_t ifi_spare_char1;
   87         uint8_t ifi_spare_char2;
   88         uint8_t ifi_datalen;
   89         uint32_t ifi_mtu;
   90         uint32_t ifi_metric;
   91         uint32_t ifi_baudrate;
   92         uint32_t ifi_ipackets;
   93         uint32_t ifi_ierrors;
   94         uint32_t ifi_opackets;
   95         uint32_t ifi_oerrors;
   96         uint32_t ifi_collisions;
   97         uint32_t ifi_ibytes;
   98         uint32_t ifi_obytes;
   99         uint32_t ifi_imcasts;
  100         uint32_t ifi_omcasts;
  101         uint32_t ifi_iqdrops;
  102         uint32_t ifi_noproto;
  103         uint32_t ifi_hwassist;
  104         int32_t ifi_epoch;
  105         struct  timeval32 ifi_lastchange;
  106 };
  107 
  108 struct if_msghdr32 {
  109         uint16_t ifm_msglen;
  110         uint8_t ifm_version;
  111         uint8_t ifm_type;
  112         int32_t ifm_addrs;
  113         int32_t ifm_flags;
  114         uint16_t ifm_index;
  115         struct  if_data32 ifm_data;
  116 };
  117 #endif
  118 
  119 MALLOC_DEFINE(M_RTABLE, "routetbl", "routing tables");
  120 
  121 /* NB: these are not modified */
  122 static struct   sockaddr route_src = { 2, PF_ROUTE, };
  123 static struct   sockaddr sa_zero   = { sizeof(sa_zero), AF_INET, };
  124 
  125 static struct {
  126         int     ip_count;       /* attached w/ AF_INET */
  127         int     ip6_count;      /* attached w/ AF_INET6 */
  128         int     ipx_count;      /* attached w/ AF_IPX */
  129         int     any_count;      /* total attached */
  130 } route_cb;
  131 
  132 struct mtx rtsock_mtx;
  133 MTX_SYSINIT(rtsock, &rtsock_mtx, "rtsock route_cb lock", MTX_DEF);
  134 
  135 #define RTSOCK_LOCK()   mtx_lock(&rtsock_mtx)
  136 #define RTSOCK_UNLOCK() mtx_unlock(&rtsock_mtx)
  137 #define RTSOCK_LOCK_ASSERT()    mtx_assert(&rtsock_mtx, MA_OWNED)
  138 
  139 SYSCTL_NODE(_net, OID_AUTO, route, CTLFLAG_RD, 0, "");
  140 
  141 struct walkarg {
  142         int     w_tmemsize;
  143         int     w_op, w_arg;
  144         caddr_t w_tmem;
  145         struct sysctl_req *w_req;
  146 };
  147 
  148 static void     rts_input(struct mbuf *m);
  149 static struct mbuf *rt_msg1(int type, struct rt_addrinfo *rtinfo);
  150 static int      rt_msg2(int type, struct rt_addrinfo *rtinfo,
  151                         caddr_t cp, struct walkarg *w);
  152 static int      rt_xaddrs(caddr_t cp, caddr_t cplim,
  153                         struct rt_addrinfo *rtinfo);
  154 static int      sysctl_dumpentry(struct radix_node *rn, void *vw);
  155 static int      sysctl_iflist(int af, struct walkarg *w);
  156 static int      sysctl_ifmalist(int af, struct walkarg *w);
  157 static int      route_output(struct mbuf *m, struct socket *so);
  158 static void     rt_setmetrics(u_long which, const struct rt_metrics *in,
  159                         struct rt_metrics_lite *out);
  160 static void     rt_getmetrics(const struct rt_metrics_lite *in,
  161                         struct rt_metrics *out);
  162 static void     rt_dispatch(struct mbuf *, const struct sockaddr *);
  163 
  164 static struct netisr_handler rtsock_nh = {
  165         .nh_name = "rtsock",
  166         .nh_handler = rts_input,
  167         .nh_proto = NETISR_ROUTE,
  168         .nh_policy = NETISR_POLICY_SOURCE,
  169 };
  170 
  171 static int
  172 sysctl_route_netisr_maxqlen(SYSCTL_HANDLER_ARGS)
  173 {
  174         int error, qlimit;
  175 
  176         netisr_getqlimit(&rtsock_nh, &qlimit);
  177         error = sysctl_handle_int(oidp, &qlimit, 0, req);
  178         if (error || !req->newptr)
  179                 return (error);
  180         if (qlimit < 1)
  181                 return (EINVAL);
  182         return (netisr_setqlimit(&rtsock_nh, qlimit));
  183 }
  184 SYSCTL_PROC(_net_route, OID_AUTO, netisr_maxqlen, CTLTYPE_INT|CTLFLAG_RW,
  185     0, 0, sysctl_route_netisr_maxqlen, "I",
  186     "maximum routing socket dispatch queue length");
  187 
  188 static void
  189 rts_init(void)
  190 {
  191         int tmp;
  192 
  193         if (TUNABLE_INT_FETCH("net.route.netisr_maxqlen", &tmp))
  194                 rtsock_nh.nh_qlimit = tmp;
  195         netisr_register(&rtsock_nh);
  196 }
  197 SYSINIT(rtsock, SI_SUB_PROTO_DOMAIN, SI_ORDER_THIRD, rts_init, 0);
  198 
  199 static void
  200 rts_input(struct mbuf *m)
  201 {
  202         struct sockproto route_proto;
  203         unsigned short *family;
  204         struct m_tag *tag;
  205 
  206         route_proto.sp_family = PF_ROUTE;
  207         tag = m_tag_find(m, PACKET_TAG_RTSOCKFAM, NULL);
  208         if (tag != NULL) {
  209                 family = (unsigned short *)(tag + 1);
  210                 route_proto.sp_protocol = *family;
  211                 m_tag_delete(m, tag);
  212         } else
  213                 route_proto.sp_protocol = 0;
  214 
  215         raw_input(m, &route_proto, &route_src);
  216 }
  217 
  218 /*
  219  * It really doesn't make any sense at all for this code to share much
  220  * with raw_usrreq.c, since its functionality is so restricted.  XXX
  221  */
  222 static void
  223 rts_abort(struct socket *so)
  224 {
  225 
  226         raw_usrreqs.pru_abort(so);
  227 }
  228 
  229 static void
  230 rts_close(struct socket *so)
  231 {
  232 
  233         raw_usrreqs.pru_close(so);
  234 }
  235 
  236 /* pru_accept is EOPNOTSUPP */
  237 
  238 static int
  239 rts_attach(struct socket *so, int proto, struct thread *td)
  240 {
  241         struct rawcb *rp;
  242         int s, error;
  243 
  244         KASSERT(so->so_pcb == NULL, ("rts_attach: so_pcb != NULL"));
  245 
  246         /* XXX */
  247         rp = malloc(sizeof *rp, M_PCB, M_WAITOK | M_ZERO);
  248         if (rp == NULL)
  249                 return ENOBUFS;
  250 
  251         /*
  252          * The splnet() is necessary to block protocols from sending
  253          * error notifications (like RTM_REDIRECT or RTM_LOSING) while
  254          * this PCB is extant but incompletely initialized.
  255          * Probably we should try to do more of this work beforehand and
  256          * eliminate the spl.
  257          */
  258         s = splnet();
  259         so->so_pcb = (caddr_t)rp;
  260         so->so_fibnum = td->td_proc->p_fibnum;
  261         error = raw_attach(so, proto);
  262         rp = sotorawcb(so);
  263         if (error) {
  264                 splx(s);
  265                 so->so_pcb = NULL;
  266                 free(rp, M_PCB);
  267                 return error;
  268         }
  269         RTSOCK_LOCK();
  270         switch(rp->rcb_proto.sp_protocol) {
  271         case AF_INET:
  272                 route_cb.ip_count++;
  273                 break;
  274         case AF_INET6:
  275                 route_cb.ip6_count++;
  276                 break;
  277         case AF_IPX:
  278                 route_cb.ipx_count++;
  279                 break;
  280         }
  281         route_cb.any_count++;
  282         RTSOCK_UNLOCK();
  283         soisconnected(so);
  284         so->so_options |= SO_USELOOPBACK;
  285         splx(s);
  286         return 0;
  287 }
  288 
  289 static int
  290 rts_bind(struct socket *so, struct sockaddr *nam, struct thread *td)
  291 {
  292 
  293         return (raw_usrreqs.pru_bind(so, nam, td)); /* xxx just EINVAL */
  294 }
  295 
  296 static int
  297 rts_connect(struct socket *so, struct sockaddr *nam, struct thread *td)
  298 {
  299 
  300         return (raw_usrreqs.pru_connect(so, nam, td)); /* XXX just EINVAL */
  301 }
  302 
  303 /* pru_connect2 is EOPNOTSUPP */
  304 /* pru_control is EOPNOTSUPP */
  305 
  306 static void
  307 rts_detach(struct socket *so)
  308 {
  309         struct rawcb *rp = sotorawcb(so);
  310 
  311         KASSERT(rp != NULL, ("rts_detach: rp == NULL"));
  312 
  313         RTSOCK_LOCK();
  314         switch(rp->rcb_proto.sp_protocol) {
  315         case AF_INET:
  316                 route_cb.ip_count--;
  317                 break;
  318         case AF_INET6:
  319                 route_cb.ip6_count--;
  320                 break;
  321         case AF_IPX:
  322                 route_cb.ipx_count--;
  323                 break;
  324         }
  325         route_cb.any_count--;
  326         RTSOCK_UNLOCK();
  327         raw_usrreqs.pru_detach(so);
  328 }
  329 
  330 static int
  331 rts_disconnect(struct socket *so)
  332 {
  333 
  334         return (raw_usrreqs.pru_disconnect(so));
  335 }
  336 
  337 /* pru_listen is EOPNOTSUPP */
  338 
  339 static int
  340 rts_peeraddr(struct socket *so, struct sockaddr **nam)
  341 {
  342 
  343         return (raw_usrreqs.pru_peeraddr(so, nam));
  344 }
  345 
  346 /* pru_rcvd is EOPNOTSUPP */
  347 /* pru_rcvoob is EOPNOTSUPP */
  348 
  349 static int
  350 rts_send(struct socket *so, int flags, struct mbuf *m, struct sockaddr *nam,
  351          struct mbuf *control, struct thread *td)
  352 {
  353 
  354         return (raw_usrreqs.pru_send(so, flags, m, nam, control, td));
  355 }
  356 
  357 /* pru_sense is null */
  358 
  359 static int
  360 rts_shutdown(struct socket *so)
  361 {
  362 
  363         return (raw_usrreqs.pru_shutdown(so));
  364 }
  365 
  366 static int
  367 rts_sockaddr(struct socket *so, struct sockaddr **nam)
  368 {
  369 
  370         return (raw_usrreqs.pru_sockaddr(so, nam));
  371 }
  372 
  373 static struct pr_usrreqs route_usrreqs = {
  374         .pru_abort =            rts_abort,
  375         .pru_attach =           rts_attach,
  376         .pru_bind =             rts_bind,
  377         .pru_connect =          rts_connect,
  378         .pru_detach =           rts_detach,
  379         .pru_disconnect =       rts_disconnect,
  380         .pru_peeraddr =         rts_peeraddr,
  381         .pru_send =             rts_send,
  382         .pru_shutdown =         rts_shutdown,
  383         .pru_sockaddr =         rts_sockaddr,
  384         .pru_close =            rts_close,
  385 };
  386 
  387 #ifndef _SOCKADDR_UNION_DEFINED
  388 #define _SOCKADDR_UNION_DEFINED
  389 /*
  390  * The union of all possible address formats we handle.
  391  */
  392 union sockaddr_union {
  393         struct sockaddr         sa;
  394         struct sockaddr_in      sin;
  395         struct sockaddr_in6     sin6;
  396 };
  397 #endif /* _SOCKADDR_UNION_DEFINED */
  398 
  399 static int
  400 rtm_get_jailed(struct rt_addrinfo *info, struct ifnet *ifp,
  401     struct rtentry *rt, union sockaddr_union *saun, struct ucred *cred)
  402 {
  403 
  404         /* First, see if the returned address is part of the jail. */
  405         if (prison_if(cred, rt->rt_ifa->ifa_addr) == 0) {
  406                 info->rti_info[RTAX_IFA] = rt->rt_ifa->ifa_addr;
  407                 return (0);
  408         }
  409 
  410         switch (info->rti_info[RTAX_DST]->sa_family) {
  411 #ifdef INET
  412         case AF_INET:
  413         {
  414                 struct in_addr ia;
  415                 struct ifaddr *ifa;
  416                 int found;
  417 
  418                 found = 0;
  419                 /*
  420                  * Try to find an address on the given outgoing interface
  421                  * that belongs to the jail.
  422                  */
  423                 IF_ADDR_LOCK(ifp);
  424                 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
  425                         struct sockaddr *sa;
  426                         sa = ifa->ifa_addr;
  427                         if (sa->sa_family != AF_INET)
  428                                 continue;
  429                         ia = ((struct sockaddr_in *)sa)->sin_addr;
  430                         if (prison_check_ip4(cred, &ia) == 0) {
  431                                 found = 1;
  432                                 break;
  433                         }
  434                 }
  435                 IF_ADDR_UNLOCK(ifp);
  436                 if (!found) {
  437                         /*
  438                          * As a last resort return the 'default' jail address.
  439                          */
  440                         ia = ((struct sockaddr_in *)rt->rt_ifa->ifa_addr)->
  441                             sin_addr;
  442                         if (prison_get_ip4(cred, &ia) != 0)
  443                                 return (ESRCH);
  444                 }
  445                 bzero(&saun->sin, sizeof(struct sockaddr_in));
  446                 saun->sin.sin_len = sizeof(struct sockaddr_in);
  447                 saun->sin.sin_family = AF_INET;
  448                 saun->sin.sin_addr.s_addr = ia.s_addr;
  449                 info->rti_info[RTAX_IFA] = (struct sockaddr *)&saun->sin;
  450                 break;
  451         }
  452 #endif
  453 #ifdef INET6
  454         case AF_INET6:
  455         {
  456                 struct in6_addr ia6;
  457                 struct ifaddr *ifa;
  458                 int found;
  459 
  460                 found = 0;
  461                 /*
  462                  * Try to find an address on the given outgoing interface
  463                  * that belongs to the jail.
  464                  */
  465                 IF_ADDR_LOCK(ifp);
  466                 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
  467                         struct sockaddr *sa;
  468                         sa = ifa->ifa_addr;
  469                         if (sa->sa_family != AF_INET6)
  470                                 continue;
  471                         bcopy(&((struct sockaddr_in6 *)sa)->sin6_addr,
  472                             &ia6, sizeof(struct in6_addr));
  473                         if (prison_check_ip6(cred, &ia6) == 0) {
  474                                 found = 1;
  475                                 break;
  476                         }
  477                 }
  478                 IF_ADDR_UNLOCK(ifp);
  479                 if (!found) {
  480                         /*
  481                          * As a last resort return the 'default' jail address.
  482                          */
  483                         ia6 = ((struct sockaddr_in6 *)rt->rt_ifa->ifa_addr)->
  484                             sin6_addr;
  485                         if (prison_get_ip6(cred, &ia6) != 0)
  486                                 return (ESRCH);
  487                 }
  488                 bzero(&saun->sin6, sizeof(struct sockaddr_in6));
  489                 saun->sin6.sin6_len = sizeof(struct sockaddr_in6);
  490                 saun->sin6.sin6_family = AF_INET6;
  491                 bcopy(&ia6, &saun->sin6.sin6_addr, sizeof(struct in6_addr));
  492                 if (sa6_recoverscope(&saun->sin6) != 0)
  493                         return (ESRCH);
  494                 info->rti_info[RTAX_IFA] = (struct sockaddr *)&saun->sin6;
  495                 break;
  496         }
  497 #endif
  498         default:
  499                 return (ESRCH);
  500         }
  501         return (0);
  502 }
  503 
  504 /*ARGSUSED*/
  505 static int
  506 route_output(struct mbuf *m, struct socket *so)
  507 {
  508 #define sa_equal(a1, a2) (bcmp((a1), (a2), (a1)->sa_len) == 0)
  509         struct rt_msghdr *rtm = NULL;
  510         struct rtentry *rt = NULL;
  511         struct radix_node_head *rnh;
  512         struct rt_addrinfo info;
  513         int len, error = 0;
  514         struct ifnet *ifp = NULL;
  515         union sockaddr_union saun;
  516 
  517 #define senderr(e) { error = e; goto flush;}
  518         if (m == NULL || ((m->m_len < sizeof(long)) &&
  519                        (m = m_pullup(m, sizeof(long))) == NULL))
  520                 return (ENOBUFS);
  521         if ((m->m_flags & M_PKTHDR) == 0)
  522                 panic("route_output");
  523         len = m->m_pkthdr.len;
  524         if (len < sizeof(*rtm) ||
  525             len != mtod(m, struct rt_msghdr *)->rtm_msglen) {
  526                 info.rti_info[RTAX_DST] = NULL;
  527                 senderr(EINVAL);
  528         }
  529         R_Malloc(rtm, struct rt_msghdr *, len);
  530         if (rtm == NULL) {
  531                 info.rti_info[RTAX_DST] = NULL;
  532                 senderr(ENOBUFS);
  533         }
  534         m_copydata(m, 0, len, (caddr_t)rtm);
  535         if (rtm->rtm_version != RTM_VERSION) {
  536                 info.rti_info[RTAX_DST] = NULL;
  537                 senderr(EPROTONOSUPPORT);
  538         }
  539         rtm->rtm_pid = curproc->p_pid;
  540         bzero(&info, sizeof(info));
  541         info.rti_addrs = rtm->rtm_addrs;
  542         if (rt_xaddrs((caddr_t)(rtm + 1), len + (caddr_t)rtm, &info)) {
  543                 info.rti_info[RTAX_DST] = NULL;
  544                 senderr(EINVAL);
  545         }
  546         info.rti_flags = rtm->rtm_flags;
  547         if (info.rti_info[RTAX_DST] == NULL ||
  548             info.rti_info[RTAX_DST]->sa_family >= AF_MAX ||
  549             (info.rti_info[RTAX_GATEWAY] != NULL &&
  550              info.rti_info[RTAX_GATEWAY]->sa_family >= AF_MAX))
  551                 senderr(EINVAL);
  552         /*
  553          * Verify that the caller has the appropriate privilege; RTM_GET
  554          * is the only operation the non-superuser is allowed.
  555          */
  556         if (rtm->rtm_type != RTM_GET) {
  557                 error = priv_check(curthread, PRIV_NET_ROUTE);
  558                 if (error)
  559                         senderr(error);
  560         }
  561 
  562         /*
  563          * The given gateway address may be an interface address.
  564          * For example, issuing a "route change" command on a route
  565          * entry that was created from a tunnel, and the gateway
  566          * address given is the local end point. In this case the 
  567          * RTF_GATEWAY flag must be cleared or the destination will
  568          * not be reachable even though there is no error message.
  569          */
  570         if (info.rti_info[RTAX_GATEWAY] != NULL &&
  571             info.rti_info[RTAX_GATEWAY]->sa_family != AF_LINK) {
  572                 struct route gw_ro;
  573 
  574                 bzero(&gw_ro, sizeof(gw_ro));
  575                 gw_ro.ro_dst = *info.rti_info[RTAX_GATEWAY];
  576                 rtalloc_ign_fib(&gw_ro, 0, so->so_fibnum);
  577                 /* 
  578                  * A host route through the loopback interface is 
  579                  * installed for each interface adddress. In pre 8.0
  580                  * releases the interface address of a PPP link type
  581                  * is not reachable locally. This behavior is fixed as 
  582                  * part of the new L2/L3 redesign and rewrite work. The
  583                  * signature of this interface address route is the
  584                  * AF_LINK sa_family type of the rt_gateway, and the
  585                  * rt_ifp has the IFF_LOOPBACK flag set.
  586                  */
  587                 if (gw_ro.ro_rt != NULL &&
  588                     gw_ro.ro_rt->rt_gateway->sa_family == AF_LINK &&
  589                     gw_ro.ro_rt->rt_ifp->if_flags & IFF_LOOPBACK)
  590                         info.rti_flags &= ~RTF_GATEWAY;
  591                 if (gw_ro.ro_rt != NULL)
  592                         RTFREE(gw_ro.ro_rt);
  593         }
  594 
  595         switch (rtm->rtm_type) {
  596                 struct rtentry *saved_nrt;
  597 
  598         case RTM_ADD:
  599                 if (info.rti_info[RTAX_GATEWAY] == NULL)
  600                         senderr(EINVAL);
  601                 saved_nrt = NULL;
  602 
  603                 /* support for new ARP code */
  604                 if (info.rti_info[RTAX_GATEWAY]->sa_family == AF_LINK &&
  605                     (rtm->rtm_flags & RTF_LLDATA) != 0) {
  606                         error = lla_rt_output(rtm, &info);
  607                         break;
  608                 }
  609                 error = rtrequest1_fib(RTM_ADD, &info, &saved_nrt,
  610                     so->so_fibnum);
  611                 if (error == 0 && saved_nrt) {
  612                         RT_LOCK(saved_nrt);
  613                         rt_setmetrics(rtm->rtm_inits,
  614                                 &rtm->rtm_rmx, &saved_nrt->rt_rmx);
  615                         rtm->rtm_index = saved_nrt->rt_ifp->if_index;
  616                         RT_REMREF(saved_nrt);
  617                         RT_UNLOCK(saved_nrt);
  618                 }
  619                 break;
  620 
  621         case RTM_DELETE:
  622                 saved_nrt = NULL;
  623                 /* support for new ARP code */
  624                 if (info.rti_info[RTAX_GATEWAY] && 
  625                     (info.rti_info[RTAX_GATEWAY]->sa_family == AF_LINK) &&
  626                     (rtm->rtm_flags & RTF_LLDATA) != 0) {
  627                         error = lla_rt_output(rtm, &info);
  628                         break;
  629                 }
  630                 error = rtrequest1_fib(RTM_DELETE, &info, &saved_nrt,
  631                     so->so_fibnum);
  632                 if (error == 0) {
  633                         RT_LOCK(saved_nrt);
  634                         rt = saved_nrt;
  635                         goto report;
  636                 }
  637                 break;
  638 
  639         case RTM_GET:
  640         case RTM_CHANGE:
  641         case RTM_LOCK:
  642                 rnh = rt_tables_get_rnh(so->so_fibnum,
  643                     info.rti_info[RTAX_DST]->sa_family);
  644                 if (rnh == NULL)
  645                         senderr(EAFNOSUPPORT);
  646                 RADIX_NODE_HEAD_RLOCK(rnh);
  647                 rt = (struct rtentry *) rnh->rnh_lookup(info.rti_info[RTAX_DST],
  648                         info.rti_info[RTAX_NETMASK], rnh);
  649                 if (rt == NULL) {       /* XXX looks bogus */
  650                         RADIX_NODE_HEAD_RUNLOCK(rnh);
  651                         senderr(ESRCH);
  652                 }
  653 #ifdef RADIX_MPATH
  654                 /*
  655                  * for RTM_CHANGE/LOCK, if we got multipath routes,
  656                  * we require users to specify a matching RTAX_GATEWAY.
  657                  *
  658                  * for RTM_GET, gate is optional even with multipath.
  659                  * if gate == NULL the first match is returned.
  660                  * (no need to call rt_mpath_matchgate if gate == NULL)
  661                  */
  662                 if (rn_mpath_capable(rnh) &&
  663                     (rtm->rtm_type != RTM_GET || info.rti_info[RTAX_GATEWAY])) {
  664                         rt = rt_mpath_matchgate(rt, info.rti_info[RTAX_GATEWAY]);
  665                         if (!rt) {
  666                                 RADIX_NODE_HEAD_RUNLOCK(rnh);
  667                                 senderr(ESRCH);
  668                         }
  669                 }
  670 #endif
  671                 /*
  672                  * If performing proxied L2 entry insertion, and
  673                  * the actual PPP host entry is found, perform
  674                  * another search to retrieve the prefix route of
  675                  * the local end point of the PPP link.
  676                  */
  677                 if (rtm->rtm_flags & RTF_ANNOUNCE) {
  678                         struct sockaddr laddr;
  679 
  680                         if (rt->rt_ifp != NULL && 
  681                             rt->rt_ifp->if_type == IFT_PROPVIRTUAL) {
  682                                 struct ifaddr *ifa;
  683 
  684                                 ifa = ifa_ifwithnet(info.rti_info[RTAX_DST], 1);
  685                                 if (ifa != NULL)
  686                                         rt_maskedcopy(ifa->ifa_addr,
  687                                                       &laddr,
  688                                                       ifa->ifa_netmask);
  689                         } else
  690                                 rt_maskedcopy(rt->rt_ifa->ifa_addr,
  691                                               &laddr,
  692                                               rt->rt_ifa->ifa_netmask);
  693                         /* 
  694                          * refactor rt and no lock operation necessary
  695                          */
  696                         rt = (struct rtentry *)rnh->rnh_matchaddr(&laddr, rnh);
  697                         if (rt == NULL) {
  698                                 RADIX_NODE_HEAD_RUNLOCK(rnh);
  699                                 senderr(ESRCH);
  700                         }
  701                 } 
  702                 RT_LOCK(rt);
  703                 RT_ADDREF(rt);
  704                 RADIX_NODE_HEAD_RUNLOCK(rnh);
  705 
  706                 /* 
  707                  * Fix for PR: 82974
  708                  *
  709                  * RTM_CHANGE/LOCK need a perfect match, rn_lookup()
  710                  * returns a perfect match in case a netmask is
  711                  * specified.  For host routes only a longest prefix
  712                  * match is returned so it is necessary to compare the
  713                  * existence of the netmask.  If both have a netmask
  714                  * rnh_lookup() did a perfect match and if none of them
  715                  * have a netmask both are host routes which is also a
  716                  * perfect match.
  717                  */
  718 
  719                 if (rtm->rtm_type != RTM_GET && 
  720                     (!rt_mask(rt) != !info.rti_info[RTAX_NETMASK])) {
  721                         RT_UNLOCK(rt);
  722                         senderr(ESRCH);
  723                 }
  724 
  725                 switch(rtm->rtm_type) {
  726 
  727                 case RTM_GET:
  728                 report:
  729                         RT_LOCK_ASSERT(rt);
  730                         if ((rt->rt_flags & RTF_HOST) == 0
  731                             ? jailed_without_vnet(curthread->td_ucred)
  732                             : prison_if(curthread->td_ucred,
  733                             rt_key(rt)) != 0) {
  734                                 RT_UNLOCK(rt);
  735                                 senderr(ESRCH);
  736                         }
  737                         info.rti_info[RTAX_DST] = rt_key(rt);
  738                         info.rti_info[RTAX_GATEWAY] = rt->rt_gateway;
  739                         info.rti_info[RTAX_NETMASK] = rt_mask(rt);
  740                         info.rti_info[RTAX_GENMASK] = 0;
  741                         if (rtm->rtm_addrs & (RTA_IFP | RTA_IFA)) {
  742                                 ifp = rt->rt_ifp;
  743                                 if (ifp) {
  744                                         info.rti_info[RTAX_IFP] =
  745                                             ifp->if_addr->ifa_addr;
  746                                         error = rtm_get_jailed(&info, ifp, rt,
  747                                             &saun, curthread->td_ucred);
  748                                         if (error != 0) {
  749                                                 RT_UNLOCK(rt);
  750                                                 senderr(error);
  751                                         }
  752                                         if (ifp->if_flags & IFF_POINTOPOINT)
  753                                                 info.rti_info[RTAX_BRD] =
  754                                                     rt->rt_ifa->ifa_dstaddr;
  755                                         rtm->rtm_index = ifp->if_index;
  756                                 } else {
  757                                         info.rti_info[RTAX_IFP] = NULL;
  758                                         info.rti_info[RTAX_IFA] = NULL;
  759                                 }
  760                         } else if ((ifp = rt->rt_ifp) != NULL) {
  761                                 rtm->rtm_index = ifp->if_index;
  762                         }
  763                         len = rt_msg2(rtm->rtm_type, &info, NULL, NULL);
  764                         if (len > rtm->rtm_msglen) {
  765                                 struct rt_msghdr *new_rtm;
  766                                 R_Malloc(new_rtm, struct rt_msghdr *, len);
  767                                 if (new_rtm == NULL) {
  768                                         RT_UNLOCK(rt);
  769                                         senderr(ENOBUFS);
  770                                 }
  771                                 bcopy(rtm, new_rtm, rtm->rtm_msglen);
  772                                 Free(rtm); rtm = new_rtm;
  773                         }
  774                         (void)rt_msg2(rtm->rtm_type, &info, (caddr_t)rtm, NULL);
  775                         rtm->rtm_flags = rt->rt_flags;
  776                         rt_getmetrics(&rt->rt_rmx, &rtm->rtm_rmx);
  777                         rtm->rtm_addrs = info.rti_addrs;
  778                         break;
  779 
  780                 case RTM_CHANGE:
  781                         /*
  782                          * New gateway could require new ifaddr, ifp;
  783                          * flags may also be different; ifp may be specified
  784                          * by ll sockaddr when protocol address is ambiguous
  785                          */
  786                         if (((rt->rt_flags & RTF_GATEWAY) &&
  787                              info.rti_info[RTAX_GATEWAY] != NULL) ||
  788                             info.rti_info[RTAX_IFP] != NULL ||
  789                             (info.rti_info[RTAX_IFA] != NULL &&
  790                              !sa_equal(info.rti_info[RTAX_IFA],
  791                                        rt->rt_ifa->ifa_addr))) {
  792                                 RT_UNLOCK(rt);
  793                                 RADIX_NODE_HEAD_LOCK(rnh);
  794                                 error = rt_getifa_fib(&info, rt->rt_fibnum);
  795                                 /*
  796                                  * XXXRW: Really we should release this
  797                                  * reference later, but this maintains
  798                                  * historical behavior.
  799                                  */
  800                                 if (info.rti_ifa != NULL)
  801                                         ifa_free(info.rti_ifa);
  802                                 RADIX_NODE_HEAD_UNLOCK(rnh);
  803                                 if (error != 0)
  804                                         senderr(error);
  805                                 RT_LOCK(rt);
  806                         }
  807                         if (info.rti_ifa != NULL &&
  808                             info.rti_ifa != rt->rt_ifa &&
  809                             rt->rt_ifa != NULL &&
  810                             rt->rt_ifa->ifa_rtrequest != NULL) {
  811                                 rt->rt_ifa->ifa_rtrequest(RTM_DELETE, rt,
  812                                     &info);
  813                                 ifa_free(rt->rt_ifa);
  814                         }
  815                         if (info.rti_info[RTAX_GATEWAY] != NULL) {
  816                                 RT_UNLOCK(rt);
  817                                 RADIX_NODE_HEAD_LOCK(rnh);
  818                                 RT_LOCK(rt);
  819                                 
  820                                 error = rt_setgate(rt, rt_key(rt),
  821                                     info.rti_info[RTAX_GATEWAY]);
  822                                 RADIX_NODE_HEAD_UNLOCK(rnh);
  823                                 if (error != 0) {
  824                                         RT_UNLOCK(rt);
  825                                         senderr(error);
  826                                 }
  827                                 rt->rt_flags |= (RTF_GATEWAY & info.rti_flags);
  828                         }
  829                         if (info.rti_ifa != NULL &&
  830                             info.rti_ifa != rt->rt_ifa) {
  831                                 ifa_ref(info.rti_ifa);
  832                                 rt->rt_ifa = info.rti_ifa;
  833                                 rt->rt_ifp = info.rti_ifp;
  834                         }
  835                         /* Allow some flags to be toggled on change. */
  836                         rt->rt_flags = (rt->rt_flags & ~RTF_FMASK) |
  837                                     (rtm->rtm_flags & RTF_FMASK);
  838                         rt_setmetrics(rtm->rtm_inits, &rtm->rtm_rmx,
  839                                         &rt->rt_rmx);
  840                         rtm->rtm_index = rt->rt_ifp->if_index;
  841                         if (rt->rt_ifa && rt->rt_ifa->ifa_rtrequest)
  842                                rt->rt_ifa->ifa_rtrequest(RTM_ADD, rt, &info);
  843                         /* FALLTHROUGH */
  844                 case RTM_LOCK:
  845                         /* We don't support locks anymore */
  846                         break;
  847                 }
  848                 RT_UNLOCK(rt);
  849                 break;
  850 
  851         default:
  852                 senderr(EOPNOTSUPP);
  853         }
  854 
  855 flush:
  856         if (rtm) {
  857                 if (error)
  858                         rtm->rtm_errno = error;
  859                 else
  860                         rtm->rtm_flags |= RTF_DONE;
  861         }
  862         if (rt)         /* XXX can this be true? */
  863                 RTFREE(rt);
  864     {
  865         struct rawcb *rp = NULL;
  866         /*
  867          * Check to see if we don't want our own messages.
  868          */
  869         if ((so->so_options & SO_USELOOPBACK) == 0) {
  870                 if (route_cb.any_count <= 1) {
  871                         if (rtm)
  872                                 Free(rtm);
  873                         m_freem(m);
  874                         return (error);
  875                 }
  876                 /* There is another listener, so construct message */
  877                 rp = sotorawcb(so);
  878         }
  879         if (rtm) {
  880                 m_copyback(m, 0, rtm->rtm_msglen, (caddr_t)rtm);
  881                 if (m->m_pkthdr.len < rtm->rtm_msglen) {
  882                         m_freem(m);
  883                         m = NULL;
  884                 } else if (m->m_pkthdr.len > rtm->rtm_msglen)
  885                         m_adj(m, rtm->rtm_msglen - m->m_pkthdr.len);
  886                 Free(rtm);
  887         }
  888         if (m) {
  889                 if (rp) {
  890                         /*
  891                          * XXX insure we don't get a copy by
  892                          * invalidating our protocol
  893                          */
  894                         unsigned short family = rp->rcb_proto.sp_family;
  895                         rp->rcb_proto.sp_family = 0;
  896                         rt_dispatch(m, info.rti_info[RTAX_DST]);
  897                         rp->rcb_proto.sp_family = family;
  898                 } else
  899                         rt_dispatch(m, info.rti_info[RTAX_DST]);
  900         }
  901     }
  902         return (error);
  903 #undef  sa_equal
  904 }
  905 
  906 static void
  907 rt_setmetrics(u_long which, const struct rt_metrics *in,
  908         struct rt_metrics_lite *out)
  909 {
  910 #define metric(f, e) if (which & (f)) out->e = in->e;
  911         /*
  912          * Only these are stored in the routing entry since introduction
  913          * of tcp hostcache. The rest is ignored.
  914          */
  915         metric(RTV_MTU, rmx_mtu);
  916         metric(RTV_WEIGHT, rmx_weight);
  917         /* Userland -> kernel timebase conversion. */
  918         if (which & RTV_EXPIRE)
  919                 out->rmx_expire = in->rmx_expire ?
  920                     in->rmx_expire - time_second + time_uptime : 0;
  921 #undef metric
  922 }
  923 
  924 static void
  925 rt_getmetrics(const struct rt_metrics_lite *in, struct rt_metrics *out)
  926 {
  927 #define metric(e) out->e = in->e;
  928         bzero(out, sizeof(*out));
  929         metric(rmx_mtu);
  930         metric(rmx_weight);
  931         /* Kernel -> userland timebase conversion. */
  932         out->rmx_expire = in->rmx_expire ?
  933             in->rmx_expire - time_uptime + time_second : 0;
  934 #undef metric
  935 }
  936 
  937 /*
  938  * Extract the addresses of the passed sockaddrs.
  939  * Do a little sanity checking so as to avoid bad memory references.
  940  * This data is derived straight from userland.
  941  */
  942 static int
  943 rt_xaddrs(caddr_t cp, caddr_t cplim, struct rt_addrinfo *rtinfo)
  944 {
  945         struct sockaddr *sa;
  946         int i;
  947 
  948         for (i = 0; i < RTAX_MAX && cp < cplim; i++) {
  949                 if ((rtinfo->rti_addrs & (1 << i)) == 0)
  950                         continue;
  951                 sa = (struct sockaddr *)cp;
  952                 /*
  953                  * It won't fit.
  954                  */
  955                 if (cp + sa->sa_len > cplim)
  956                         return (EINVAL);
  957                 /*
  958                  * there are no more.. quit now
  959                  * If there are more bits, they are in error.
  960                  * I've seen this. route(1) can evidently generate these. 
  961                  * This causes kernel to core dump.
  962                  * for compatibility, If we see this, point to a safe address.
  963                  */
  964                 if (sa->sa_len == 0) {
  965                         rtinfo->rti_info[i] = &sa_zero;
  966                         return (0); /* should be EINVAL but for compat */
  967                 }
  968                 /* accept it */
  969                 rtinfo->rti_info[i] = sa;
  970                 cp += SA_SIZE(sa);
  971         }
  972         return (0);
  973 }
  974 
  975 static struct mbuf *
  976 rt_msg1(int type, struct rt_addrinfo *rtinfo)
  977 {
  978         struct rt_msghdr *rtm;
  979         struct mbuf *m;
  980         int i;
  981         struct sockaddr *sa;
  982         int len, dlen;
  983 
  984         switch (type) {
  985 
  986         case RTM_DELADDR:
  987         case RTM_NEWADDR:
  988                 len = sizeof(struct ifa_msghdr);
  989                 break;
  990 
  991         case RTM_DELMADDR:
  992         case RTM_NEWMADDR:
  993                 len = sizeof(struct ifma_msghdr);
  994                 break;
  995 
  996         case RTM_IFINFO:
  997                 len = sizeof(struct if_msghdr);
  998                 break;
  999 
 1000         case RTM_IFANNOUNCE:
 1001         case RTM_IEEE80211:
 1002                 len = sizeof(struct if_announcemsghdr);
 1003                 break;
 1004 
 1005         default:
 1006                 len = sizeof(struct rt_msghdr);
 1007         }
 1008         if (len > MCLBYTES)
 1009                 panic("rt_msg1");
 1010         m = m_gethdr(M_DONTWAIT, MT_DATA);
 1011         if (m && len > MHLEN) {
 1012                 MCLGET(m, M_DONTWAIT);
 1013                 if ((m->m_flags & M_EXT) == 0) {
 1014                         m_free(m);
 1015                         m = NULL;
 1016                 }
 1017         }
 1018         if (m == NULL)
 1019                 return (m);
 1020         m->m_pkthdr.len = m->m_len = len;
 1021         m->m_pkthdr.rcvif = NULL;
 1022         rtm = mtod(m, struct rt_msghdr *);
 1023         bzero((caddr_t)rtm, len);
 1024         for (i = 0; i < RTAX_MAX; i++) {
 1025                 if ((sa = rtinfo->rti_info[i]) == NULL)
 1026                         continue;
 1027                 rtinfo->rti_addrs |= (1 << i);
 1028                 dlen = SA_SIZE(sa);
 1029                 m_copyback(m, len, dlen, (caddr_t)sa);
 1030                 len += dlen;
 1031         }
 1032         if (m->m_pkthdr.len != len) {
 1033                 m_freem(m);
 1034                 return (NULL);
 1035         }
 1036         rtm->rtm_msglen = len;
 1037         rtm->rtm_version = RTM_VERSION;
 1038         rtm->rtm_type = type;
 1039         return (m);
 1040 }
 1041 
 1042 static int
 1043 rt_msg2(int type, struct rt_addrinfo *rtinfo, caddr_t cp, struct walkarg *w)
 1044 {
 1045         int i;
 1046         int len, dlen, second_time = 0;
 1047         caddr_t cp0;
 1048 
 1049         rtinfo->rti_addrs = 0;
 1050 again:
 1051         switch (type) {
 1052 
 1053         case RTM_DELADDR:
 1054         case RTM_NEWADDR:
 1055                 len = sizeof(struct ifa_msghdr);
 1056                 break;
 1057 
 1058         case RTM_IFINFO:
 1059 #ifdef COMPAT_FREEBSD32
 1060                 if (w != NULL && w->w_req->flags & SCTL_MASK32) {
 1061                         len = sizeof(struct if_msghdr32);
 1062                         break;
 1063                 }
 1064 #endif
 1065                 len = sizeof(struct if_msghdr);
 1066                 break;
 1067 
 1068         case RTM_NEWMADDR:
 1069                 len = sizeof(struct ifma_msghdr);
 1070                 break;
 1071 
 1072         default:
 1073                 len = sizeof(struct rt_msghdr);
 1074         }
 1075         cp0 = cp;
 1076         if (cp0)
 1077                 cp += len;
 1078         for (i = 0; i < RTAX_MAX; i++) {
 1079                 struct sockaddr *sa;
 1080 
 1081                 if ((sa = rtinfo->rti_info[i]) == NULL)
 1082                         continue;
 1083                 rtinfo->rti_addrs |= (1 << i);
 1084                 dlen = SA_SIZE(sa);
 1085                 if (cp) {
 1086                         bcopy((caddr_t)sa, cp, (unsigned)dlen);
 1087                         cp += dlen;
 1088                 }
 1089                 len += dlen;
 1090         }
 1091         len = ALIGN(len);
 1092         if (cp == NULL && w != NULL && !second_time) {
 1093                 struct walkarg *rw = w;
 1094 
 1095                 if (rw->w_req) {
 1096                         if (rw->w_tmemsize < len) {
 1097                                 if (rw->w_tmem)
 1098                                         free(rw->w_tmem, M_RTABLE);
 1099                                 rw->w_tmem = (caddr_t)
 1100                                         malloc(len, M_RTABLE, M_NOWAIT);
 1101                                 if (rw->w_tmem)
 1102                                         rw->w_tmemsize = len;
 1103                         }
 1104                         if (rw->w_tmem) {
 1105                                 cp = rw->w_tmem;
 1106                                 second_time = 1;
 1107                                 goto again;
 1108                         }
 1109                 }
 1110         }
 1111         if (cp) {
 1112                 struct rt_msghdr *rtm = (struct rt_msghdr *)cp0;
 1113 
 1114                 rtm->rtm_version = RTM_VERSION;
 1115                 rtm->rtm_type = type;
 1116                 rtm->rtm_msglen = len;
 1117         }
 1118         return (len);
 1119 }
 1120 
 1121 /*
 1122  * This routine is called to generate a message from the routing
 1123  * socket indicating that a redirect has occured, a routing lookup
 1124  * has failed, or that a protocol has detected timeouts to a particular
 1125  * destination.
 1126  */
 1127 void
 1128 rt_missmsg(int type, struct rt_addrinfo *rtinfo, int flags, int error)
 1129 {
 1130         struct rt_msghdr *rtm;
 1131         struct mbuf *m;
 1132         struct sockaddr *sa = rtinfo->rti_info[RTAX_DST];
 1133 
 1134         if (route_cb.any_count == 0)
 1135                 return;
 1136         m = rt_msg1(type, rtinfo);
 1137         if (m == NULL)
 1138                 return;
 1139         rtm = mtod(m, struct rt_msghdr *);
 1140         rtm->rtm_flags = RTF_DONE | flags;
 1141         rtm->rtm_errno = error;
 1142         rtm->rtm_addrs = rtinfo->rti_addrs;
 1143         rt_dispatch(m, sa);
 1144 }
 1145 
 1146 /*
 1147  * This routine is called to generate a message from the routing
 1148  * socket indicating that the status of a network interface has changed.
 1149  */
 1150 void
 1151 rt_ifmsg(struct ifnet *ifp)
 1152 {
 1153         struct if_msghdr *ifm;
 1154         struct mbuf *m;
 1155         struct rt_addrinfo info;
 1156 
 1157         if (route_cb.any_count == 0)
 1158                 return;
 1159         bzero((caddr_t)&info, sizeof(info));
 1160         m = rt_msg1(RTM_IFINFO, &info);
 1161         if (m == NULL)
 1162                 return;
 1163         ifm = mtod(m, struct if_msghdr *);
 1164         ifm->ifm_index = ifp->if_index;
 1165         ifm->ifm_flags = ifp->if_flags | ifp->if_drv_flags;
 1166         ifm->ifm_data = ifp->if_data;
 1167         ifm->ifm_addrs = 0;
 1168         rt_dispatch(m, NULL);
 1169 }
 1170 
 1171 /*
 1172  * This is called to generate messages from the routing socket
 1173  * indicating a network interface has had addresses associated with it.
 1174  * if we ever reverse the logic and replace messages TO the routing
 1175  * socket indicate a request to configure interfaces, then it will
 1176  * be unnecessary as the routing socket will automatically generate
 1177  * copies of it.
 1178  */
 1179 void
 1180 rt_newaddrmsg(int cmd, struct ifaddr *ifa, int error, struct rtentry *rt)
 1181 {
 1182         struct rt_addrinfo info;
 1183         struct sockaddr *sa = NULL;
 1184         int pass;
 1185         struct mbuf *m = NULL;
 1186         struct ifnet *ifp = ifa->ifa_ifp;
 1187 
 1188         KASSERT(cmd == RTM_ADD || cmd == RTM_DELETE,
 1189                 ("unexpected cmd %u", cmd));
 1190 #if defined(INET) || defined(INET6)
 1191 #ifdef SCTP
 1192         /*
 1193          * notify the SCTP stack
 1194          * this will only get called when an address is added/deleted
 1195          * XXX pass the ifaddr struct instead if ifa->ifa_addr...
 1196          */
 1197         sctp_addr_change(ifa, cmd);
 1198 #endif /* SCTP */
 1199 #endif
 1200         if (route_cb.any_count == 0)
 1201                 return;
 1202         for (pass = 1; pass < 3; pass++) {
 1203                 bzero((caddr_t)&info, sizeof(info));
 1204                 if ((cmd == RTM_ADD && pass == 1) ||
 1205                     (cmd == RTM_DELETE && pass == 2)) {
 1206                         struct ifa_msghdr *ifam;
 1207                         int ncmd = cmd == RTM_ADD ? RTM_NEWADDR : RTM_DELADDR;
 1208 
 1209                         info.rti_info[RTAX_IFA] = sa = ifa->ifa_addr;
 1210                         info.rti_info[RTAX_IFP] = ifp->if_addr->ifa_addr;
 1211                         info.rti_info[RTAX_NETMASK] = ifa->ifa_netmask;
 1212                         info.rti_info[RTAX_BRD] = ifa->ifa_dstaddr;
 1213                         if ((m = rt_msg1(ncmd, &info)) == NULL)
 1214                                 continue;
 1215                         ifam = mtod(m, struct ifa_msghdr *);
 1216                         ifam->ifam_index = ifp->if_index;
 1217                         ifam->ifam_metric = ifa->ifa_metric;
 1218                         ifam->ifam_flags = ifa->ifa_flags;
 1219                         ifam->ifam_addrs = info.rti_addrs;
 1220                 }
 1221                 if ((cmd == RTM_ADD && pass == 2) ||
 1222                     (cmd == RTM_DELETE && pass == 1)) {
 1223                         struct rt_msghdr *rtm;
 1224 
 1225                         if (rt == NULL)
 1226                                 continue;
 1227                         info.rti_info[RTAX_NETMASK] = rt_mask(rt);
 1228                         info.rti_info[RTAX_DST] = sa = rt_key(rt);
 1229                         info.rti_info[RTAX_GATEWAY] = rt->rt_gateway;
 1230                         if ((m = rt_msg1(cmd, &info)) == NULL)
 1231                                 continue;
 1232                         rtm = mtod(m, struct rt_msghdr *);
 1233                         rtm->rtm_index = ifp->if_index;
 1234                         rtm->rtm_flags |= rt->rt_flags;
 1235                         rtm->rtm_errno = error;
 1236                         rtm->rtm_addrs = info.rti_addrs;
 1237                 }
 1238                 rt_dispatch(m, sa);
 1239         }
 1240 }
 1241 
 1242 /*
 1243  * This is the analogue to the rt_newaddrmsg which performs the same
 1244  * function but for multicast group memberhips.  This is easier since
 1245  * there is no route state to worry about.
 1246  */
 1247 void
 1248 rt_newmaddrmsg(int cmd, struct ifmultiaddr *ifma)
 1249 {
 1250         struct rt_addrinfo info;
 1251         struct mbuf *m = NULL;
 1252         struct ifnet *ifp = ifma->ifma_ifp;
 1253         struct ifma_msghdr *ifmam;
 1254 
 1255         if (route_cb.any_count == 0)
 1256                 return;
 1257 
 1258         bzero((caddr_t)&info, sizeof(info));
 1259         info.rti_info[RTAX_IFA] = ifma->ifma_addr;
 1260         info.rti_info[RTAX_IFP] = ifp ? ifp->if_addr->ifa_addr : NULL;
 1261         /*
 1262          * If a link-layer address is present, present it as a ``gateway''
 1263          * (similarly to how ARP entries, e.g., are presented).
 1264          */
 1265         info.rti_info[RTAX_GATEWAY] = ifma->ifma_lladdr;
 1266         m = rt_msg1(cmd, &info);
 1267         if (m == NULL)
 1268                 return;
 1269         ifmam = mtod(m, struct ifma_msghdr *);
 1270         KASSERT(ifp != NULL, ("%s: link-layer multicast address w/o ifp\n",
 1271             __func__));
 1272         ifmam->ifmam_index = ifp->if_index;
 1273         ifmam->ifmam_addrs = info.rti_addrs;
 1274         rt_dispatch(m, ifma->ifma_addr);
 1275 }
 1276 
 1277 static struct mbuf *
 1278 rt_makeifannouncemsg(struct ifnet *ifp, int type, int what,
 1279         struct rt_addrinfo *info)
 1280 {
 1281         struct if_announcemsghdr *ifan;
 1282         struct mbuf *m;
 1283 
 1284         if (route_cb.any_count == 0)
 1285                 return NULL;
 1286         bzero((caddr_t)info, sizeof(*info));
 1287         m = rt_msg1(type, info);
 1288         if (m != NULL) {
 1289                 ifan = mtod(m, struct if_announcemsghdr *);
 1290                 ifan->ifan_index = ifp->if_index;
 1291                 strlcpy(ifan->ifan_name, ifp->if_xname,
 1292                         sizeof(ifan->ifan_name));
 1293                 ifan->ifan_what = what;
 1294         }
 1295         return m;
 1296 }
 1297 
 1298 /*
 1299  * This is called to generate routing socket messages indicating
 1300  * IEEE80211 wireless events.
 1301  * XXX we piggyback on the RTM_IFANNOUNCE msg format in a clumsy way.
 1302  */
 1303 void
 1304 rt_ieee80211msg(struct ifnet *ifp, int what, void *data, size_t data_len)
 1305 {
 1306         struct mbuf *m;
 1307         struct rt_addrinfo info;
 1308 
 1309         m = rt_makeifannouncemsg(ifp, RTM_IEEE80211, what, &info);
 1310         if (m != NULL) {
 1311                 /*
 1312                  * Append the ieee80211 data.  Try to stick it in the
 1313                  * mbuf containing the ifannounce msg; otherwise allocate
 1314                  * a new mbuf and append.
 1315                  *
 1316                  * NB: we assume m is a single mbuf.
 1317                  */
 1318                 if (data_len > M_TRAILINGSPACE(m)) {
 1319                         struct mbuf *n = m_get(M_NOWAIT, MT_DATA);
 1320                         if (n == NULL) {
 1321                                 m_freem(m);
 1322                                 return;
 1323                         }
 1324                         bcopy(data, mtod(n, void *), data_len);
 1325                         n->m_len = data_len;
 1326                         m->m_next = n;
 1327                 } else if (data_len > 0) {
 1328                         bcopy(data, mtod(m, u_int8_t *) + m->m_len, data_len);
 1329                         m->m_len += data_len;
 1330                 }
 1331                 if (m->m_flags & M_PKTHDR)
 1332                         m->m_pkthdr.len += data_len;
 1333                 mtod(m, struct if_announcemsghdr *)->ifan_msglen += data_len;
 1334                 rt_dispatch(m, NULL);
 1335         }
 1336 }
 1337 
 1338 /*
 1339  * This is called to generate routing socket messages indicating
 1340  * network interface arrival and departure.
 1341  */
 1342 void
 1343 rt_ifannouncemsg(struct ifnet *ifp, int what)
 1344 {
 1345         struct mbuf *m;
 1346         struct rt_addrinfo info;
 1347 
 1348         m = rt_makeifannouncemsg(ifp, RTM_IFANNOUNCE, what, &info);
 1349         if (m != NULL)
 1350                 rt_dispatch(m, NULL);
 1351 }
 1352 
 1353 static void
 1354 rt_dispatch(struct mbuf *m, const struct sockaddr *sa)
 1355 {
 1356         struct m_tag *tag;
 1357 
 1358         /*
 1359          * Preserve the family from the sockaddr, if any, in an m_tag for
 1360          * use when injecting the mbuf into the routing socket buffer from
 1361          * the netisr.
 1362          */
 1363         if (sa != NULL) {
 1364                 tag = m_tag_get(PACKET_TAG_RTSOCKFAM, sizeof(unsigned short),
 1365                     M_NOWAIT);
 1366                 if (tag == NULL) {
 1367                         m_freem(m);
 1368                         return;
 1369                 }
 1370                 *(unsigned short *)(tag + 1) = sa->sa_family;
 1371                 m_tag_prepend(m, tag);
 1372         }
 1373 #ifdef VIMAGE
 1374         if (V_loif)
 1375                 m->m_pkthdr.rcvif = V_loif;
 1376         else {
 1377                 m_freem(m);
 1378                 return;
 1379         }
 1380 #endif
 1381         netisr_queue(NETISR_ROUTE, m);  /* mbuf is free'd on failure. */
 1382 }
 1383 
 1384 /*
 1385  * This is used in dumping the kernel table via sysctl().
 1386  */
 1387 static int
 1388 sysctl_dumpentry(struct radix_node *rn, void *vw)
 1389 {
 1390         struct walkarg *w = vw;
 1391         struct rtentry *rt = (struct rtentry *)rn;
 1392         int error = 0, size;
 1393         struct rt_addrinfo info;
 1394 
 1395         if (w->w_op == NET_RT_FLAGS && !(rt->rt_flags & w->w_arg))
 1396                 return 0;
 1397         if ((rt->rt_flags & RTF_HOST) == 0
 1398             ? jailed_without_vnet(w->w_req->td->td_ucred)
 1399             : prison_if(w->w_req->td->td_ucred, rt_key(rt)) != 0)
 1400                 return (0);
 1401         bzero((caddr_t)&info, sizeof(info));
 1402         info.rti_info[RTAX_DST] = rt_key(rt);
 1403         info.rti_info[RTAX_GATEWAY] = rt->rt_gateway;
 1404         info.rti_info[RTAX_NETMASK] = rt_mask(rt);
 1405         info.rti_info[RTAX_GENMASK] = 0;
 1406         if (rt->rt_ifp) {
 1407                 info.rti_info[RTAX_IFP] = rt->rt_ifp->if_addr->ifa_addr;
 1408                 info.rti_info[RTAX_IFA] = rt->rt_ifa->ifa_addr;
 1409                 if (rt->rt_ifp->if_flags & IFF_POINTOPOINT)
 1410                         info.rti_info[RTAX_BRD] = rt->rt_ifa->ifa_dstaddr;
 1411         }
 1412         size = rt_msg2(RTM_GET, &info, NULL, w);
 1413         if (w->w_req && w->w_tmem) {
 1414                 struct rt_msghdr *rtm = (struct rt_msghdr *)w->w_tmem;
 1415 
 1416                 rtm->rtm_flags = rt->rt_flags;
 1417                 /*
 1418                  * let's be honest about this being a retarded hack
 1419                  */
 1420                 rtm->rtm_fmask = rt->rt_rmx.rmx_pksent;
 1421                 rt_getmetrics(&rt->rt_rmx, &rtm->rtm_rmx);
 1422                 rtm->rtm_index = rt->rt_ifp->if_index;
 1423                 rtm->rtm_errno = rtm->rtm_pid = rtm->rtm_seq = 0;
 1424                 rtm->rtm_addrs = info.rti_addrs;
 1425                 error = SYSCTL_OUT(w->w_req, (caddr_t)rtm, size);
 1426                 return (error);
 1427         }
 1428         return (error);
 1429 }
 1430 
 1431 #ifdef COMPAT_FREEBSD32
 1432 static void
 1433 copy_ifdata32(struct if_data *src, struct if_data32 *dst)
 1434 {
 1435 
 1436         bzero(dst, sizeof(*dst));
 1437         CP(*src, *dst, ifi_type);
 1438         CP(*src, *dst, ifi_physical);
 1439         CP(*src, *dst, ifi_addrlen);
 1440         CP(*src, *dst, ifi_hdrlen);
 1441         CP(*src, *dst, ifi_link_state);
 1442         dst->ifi_datalen = sizeof(struct if_data32);
 1443         CP(*src, *dst, ifi_mtu);
 1444         CP(*src, *dst, ifi_metric);
 1445         CP(*src, *dst, ifi_baudrate);
 1446         CP(*src, *dst, ifi_ipackets);
 1447         CP(*src, *dst, ifi_ierrors);
 1448         CP(*src, *dst, ifi_opackets);
 1449         CP(*src, *dst, ifi_oerrors);
 1450         CP(*src, *dst, ifi_collisions);
 1451         CP(*src, *dst, ifi_ibytes);
 1452         CP(*src, *dst, ifi_obytes);
 1453         CP(*src, *dst, ifi_imcasts);
 1454         CP(*src, *dst, ifi_omcasts);
 1455         CP(*src, *dst, ifi_iqdrops);
 1456         CP(*src, *dst, ifi_noproto);
 1457         CP(*src, *dst, ifi_hwassist);
 1458         CP(*src, *dst, ifi_epoch);
 1459         TV_CP(*src, *dst, ifi_lastchange);
 1460 }
 1461 #endif
 1462 
 1463 static int
 1464 sysctl_iflist(int af, struct walkarg *w)
 1465 {
 1466         struct ifnet *ifp;
 1467         struct ifaddr *ifa;
 1468         struct rt_addrinfo info;
 1469         int len, error = 0;
 1470 
 1471         bzero((caddr_t)&info, sizeof(info));
 1472         IFNET_RLOCK();
 1473         TAILQ_FOREACH(ifp, &V_ifnet, if_link) {
 1474                 if (w->w_arg && w->w_arg != ifp->if_index)
 1475                         continue;
 1476                 IF_ADDR_LOCK(ifp);
 1477                 ifa = ifp->if_addr;
 1478                 info.rti_info[RTAX_IFP] = ifa->ifa_addr;
 1479                 len = rt_msg2(RTM_IFINFO, &info, NULL, w);
 1480                 info.rti_info[RTAX_IFP] = NULL;
 1481                 if (w->w_req && w->w_tmem) {
 1482                         struct if_msghdr *ifm;
 1483 
 1484 #ifdef COMPAT_FREEBSD32
 1485                         if (w->w_req->flags & SCTL_MASK32) {
 1486                                 struct if_msghdr32 *ifm32;
 1487 
 1488                                 ifm32 = (struct if_msghdr32 *)w->w_tmem;
 1489                                 ifm32->ifm_index = ifp->if_index;
 1490                                 ifm32->ifm_flags = ifp->if_flags |
 1491                                     ifp->if_drv_flags;
 1492                                 copy_ifdata32(&ifp->if_data, &ifm32->ifm_data);
 1493                                 ifm32->ifm_addrs = info.rti_addrs;
 1494                                 error = SYSCTL_OUT(w->w_req, (caddr_t)ifm32,
 1495                                     len);
 1496                                 goto sysctl_out;
 1497                         }
 1498 #endif
 1499                         ifm = (struct if_msghdr *)w->w_tmem;
 1500                         ifm->ifm_index = ifp->if_index;
 1501                         ifm->ifm_flags = ifp->if_flags | ifp->if_drv_flags;
 1502                         ifm->ifm_data = ifp->if_data;
 1503                         ifm->ifm_addrs = info.rti_addrs;
 1504                         error = SYSCTL_OUT(w->w_req, (caddr_t)ifm, len);
 1505 #ifdef COMPAT_FREEBSD32
 1506                 sysctl_out:
 1507 #endif
 1508                         if (error)
 1509                                 goto done;
 1510                 }
 1511                 while ((ifa = TAILQ_NEXT(ifa, ifa_link)) != NULL) {
 1512                         if (af && af != ifa->ifa_addr->sa_family)
 1513                                 continue;
 1514                         if (prison_if(w->w_req->td->td_ucred,
 1515                             ifa->ifa_addr) != 0)
 1516                                 continue;
 1517                         info.rti_info[RTAX_IFA] = ifa->ifa_addr;
 1518                         info.rti_info[RTAX_NETMASK] = ifa->ifa_netmask;
 1519                         info.rti_info[RTAX_BRD] = ifa->ifa_dstaddr;
 1520                         len = rt_msg2(RTM_NEWADDR, &info, NULL, w);
 1521                         if (w->w_req && w->w_tmem) {
 1522                                 struct ifa_msghdr *ifam;
 1523 
 1524                                 ifam = (struct ifa_msghdr *)w->w_tmem;
 1525                                 ifam->ifam_index = ifa->ifa_ifp->if_index;
 1526                                 ifam->ifam_flags = ifa->ifa_flags;
 1527                                 ifam->ifam_metric = ifa->ifa_metric;
 1528                                 ifam->ifam_addrs = info.rti_addrs;
 1529                                 error = SYSCTL_OUT(w->w_req, w->w_tmem, len);
 1530                                 if (error)
 1531                                         goto done;
 1532                         }
 1533                 }
 1534                 IF_ADDR_UNLOCK(ifp);
 1535                 info.rti_info[RTAX_IFA] = info.rti_info[RTAX_NETMASK] =
 1536                         info.rti_info[RTAX_BRD] = NULL;
 1537         }
 1538 done:
 1539         if (ifp != NULL)
 1540                 IF_ADDR_UNLOCK(ifp);
 1541         IFNET_RUNLOCK();
 1542         return (error);
 1543 }
 1544 
 1545 static int
 1546 sysctl_ifmalist(int af, struct walkarg *w)
 1547 {
 1548         struct ifnet *ifp;
 1549         struct ifmultiaddr *ifma;
 1550         struct  rt_addrinfo info;
 1551         int     len, error = 0;
 1552         struct ifaddr *ifa;
 1553 
 1554         bzero((caddr_t)&info, sizeof(info));
 1555         IFNET_RLOCK();
 1556         TAILQ_FOREACH(ifp, &V_ifnet, if_link) {
 1557                 if (w->w_arg && w->w_arg != ifp->if_index)
 1558                         continue;
 1559                 ifa = ifp->if_addr;
 1560                 info.rti_info[RTAX_IFP] = ifa ? ifa->ifa_addr : NULL;
 1561                 IF_ADDR_LOCK(ifp);
 1562                 TAILQ_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) {
 1563                         if (af && af != ifma->ifma_addr->sa_family)
 1564                                 continue;
 1565                         if (prison_if(w->w_req->td->td_ucred,
 1566                             ifma->ifma_addr) != 0)
 1567                                 continue;
 1568                         info.rti_info[RTAX_IFA] = ifma->ifma_addr;
 1569                         info.rti_info[RTAX_GATEWAY] =
 1570                             (ifma->ifma_addr->sa_family != AF_LINK) ?
 1571                             ifma->ifma_lladdr : NULL;
 1572                         len = rt_msg2(RTM_NEWMADDR, &info, NULL, w);
 1573                         if (w->w_req && w->w_tmem) {
 1574                                 struct ifma_msghdr *ifmam;
 1575 
 1576                                 ifmam = (struct ifma_msghdr *)w->w_tmem;
 1577                                 ifmam->ifmam_index = ifma->ifma_ifp->if_index;
 1578                                 ifmam->ifmam_flags = 0;
 1579                                 ifmam->ifmam_addrs = info.rti_addrs;
 1580                                 error = SYSCTL_OUT(w->w_req, w->w_tmem, len);
 1581                                 if (error) {
 1582                                         IF_ADDR_UNLOCK(ifp);
 1583                                         goto done;
 1584                                 }
 1585                         }
 1586                 }
 1587                 IF_ADDR_UNLOCK(ifp);
 1588         }
 1589 done:
 1590         IFNET_RUNLOCK();
 1591         return (error);
 1592 }
 1593 
 1594 static int
 1595 sysctl_rtsock(SYSCTL_HANDLER_ARGS)
 1596 {
 1597         int     *name = (int *)arg1;
 1598         u_int   namelen = arg2;
 1599         struct radix_node_head *rnh = NULL; /* silence compiler. */
 1600         int     i, lim, error = EINVAL;
 1601         u_char  af;
 1602         struct  walkarg w;
 1603 
 1604         name ++;
 1605         namelen--;
 1606         if (req->newptr)
 1607                 return (EPERM);
 1608         if (namelen != 3)
 1609                 return ((namelen < 3) ? EISDIR : ENOTDIR);
 1610         af = name[0];
 1611         if (af > AF_MAX)
 1612                 return (EINVAL);
 1613         bzero(&w, sizeof(w));
 1614         w.w_op = name[1];
 1615         w.w_arg = name[2];
 1616         w.w_req = req;
 1617 
 1618         error = sysctl_wire_old_buffer(req, 0);
 1619         if (error)
 1620                 return (error);
 1621         switch (w.w_op) {
 1622 
 1623         case NET_RT_DUMP:
 1624         case NET_RT_FLAGS:
 1625                 if (af == 0) {                  /* dump all tables */
 1626                         i = 1;
 1627                         lim = AF_MAX;
 1628                 } else                          /* dump only one table */
 1629                         i = lim = af;
 1630 
 1631                 /*
 1632                  * take care of llinfo entries, the caller must
 1633                  * specify an AF
 1634                  */
 1635                 if (w.w_op == NET_RT_FLAGS &&
 1636                     (w.w_arg == 0 || w.w_arg & RTF_LLINFO)) {
 1637                         if (af != 0)
 1638                                 error = lltable_sysctl_dumparp(af, w.w_req);
 1639                         else
 1640                                 error = EINVAL;
 1641                         break;
 1642                 }
 1643                 /*
 1644                  * take care of routing entries
 1645                  */
 1646                 for (error = 0; error == 0 && i <= lim; i++) {
 1647                         rnh = rt_tables_get_rnh(req->td->td_proc->p_fibnum, i);
 1648                         if (rnh != NULL) {
 1649                                 RADIX_NODE_HEAD_LOCK(rnh); 
 1650                                 error = rnh->rnh_walktree(rnh,
 1651                                     sysctl_dumpentry, &w);
 1652                                 RADIX_NODE_HEAD_UNLOCK(rnh);
 1653                         } else if (af != 0)
 1654                                 error = EAFNOSUPPORT;
 1655                 }
 1656                 break;
 1657 
 1658         case NET_RT_IFLIST:
 1659                 error = sysctl_iflist(af, &w);
 1660                 break;
 1661 
 1662         case NET_RT_IFMALIST:
 1663                 error = sysctl_ifmalist(af, &w);
 1664                 break;
 1665         }
 1666         if (w.w_tmem)
 1667                 free(w.w_tmem, M_RTABLE);
 1668         return (error);
 1669 }
 1670 
 1671 SYSCTL_NODE(_net, PF_ROUTE, routetable, CTLFLAG_RD, sysctl_rtsock, "");
 1672 
 1673 /*
 1674  * Definitions of protocols supported in the ROUTE domain.
 1675  */
 1676 
 1677 static struct domain routedomain;               /* or at least forward */
 1678 
 1679 static struct protosw routesw[] = {
 1680 {
 1681         .pr_type =              SOCK_RAW,
 1682         .pr_domain =            &routedomain,
 1683         .pr_flags =             PR_ATOMIC|PR_ADDR,
 1684         .pr_output =            route_output,
 1685         .pr_ctlinput =          raw_ctlinput,
 1686         .pr_init =              raw_init,
 1687         .pr_usrreqs =           &route_usrreqs
 1688 }
 1689 };
 1690 
 1691 static struct domain routedomain = {
 1692         .dom_family =           PF_ROUTE,
 1693         .dom_name =              "route",
 1694         .dom_protosw =          routesw,
 1695         .dom_protoswNPROTOSW =  &routesw[sizeof(routesw)/sizeof(routesw[0])]
 1696 };
 1697 
 1698 VNET_DOMAIN_SET(route);

Cache object: 94017154108ca82a6f666fbe2c5c1b9d


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.