1 /*- 2 * Copyright (c) 2015 3 * Alexander V. Chernikov <melifaro@FreeBSD.org> 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 30 #include <sys/cdefs.h> 31 __FBSDID("$FreeBSD$"); 32 33 #include "opt_inet.h" 34 #include "opt_inet6.h" 35 #include "opt_route.h" 36 #include "opt_mpath.h" 37 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 #include <sys/lock.h> 41 #include <sys/rwlock.h> 42 #include <sys/malloc.h> 43 #include <sys/mbuf.h> 44 #include <sys/socket.h> 45 #include <sys/sysctl.h> 46 #include <sys/kernel.h> 47 48 #include <net/if.h> 49 #include <net/if_var.h> 50 #include <net/if_dl.h> 51 #include <net/route.h> 52 #include <net/vnet.h> 53 54 #ifdef RADIX_MPATH 55 #include <net/radix_mpath.h> 56 #endif 57 58 #include <netinet/in.h> 59 #include <netinet/in_var.h> 60 #include <netinet/ip_mroute.h> 61 #include <netinet/ip6.h> 62 #include <netinet6/in6_fib.h> 63 #include <netinet6/in6_var.h> 64 #include <netinet6/nd6.h> 65 #include <netinet6/scope6_var.h> 66 67 #include <net/if_types.h> 68 69 #ifdef INET6 70 static void fib6_rte_to_nh_extended(struct rtentry *rte, 71 const struct in6_addr *dst, uint32_t flags, struct nhop6_extended *pnh6); 72 static void fib6_rte_to_nh_basic(struct rtentry *rte, const struct in6_addr *dst, 73 uint32_t flags, struct nhop6_basic *pnh6); 74 static struct ifnet *fib6_get_ifaifp(struct rtentry *rte); 75 #define RNTORT(p) ((struct rtentry *)(p)) 76 77 /* 78 * Gets real interface for the @rte. 79 * Returns rt_ifp for !IFF_LOOPBACK routers. 80 * Extracts "real" address interface from interface address 81 * loopback routes. 82 */ 83 static struct ifnet * 84 fib6_get_ifaifp(struct rtentry *rte) 85 { 86 struct ifnet *ifp; 87 struct sockaddr_dl *sdl; 88 89 ifp = rte->rt_ifp; 90 if ((ifp->if_flags & IFF_LOOPBACK) && 91 rte->rt_gateway->sa_family == AF_LINK) { 92 sdl = (struct sockaddr_dl *)rte->rt_gateway; 93 return (ifnet_byindex(sdl->sdl_index)); 94 } 95 96 return (ifp); 97 } 98 99 static void 100 fib6_rte_to_nh_basic(struct rtentry *rte, const struct in6_addr *dst, 101 uint32_t flags, struct nhop6_basic *pnh6) 102 { 103 struct sockaddr_in6 *gw; 104 105 /* Do explicit nexthop zero unless we're copying it */ 106 memset(pnh6, 0, sizeof(*pnh6)); 107 108 if ((flags & NHR_IFAIF) != 0) 109 pnh6->nh_ifp = fib6_get_ifaifp(rte); 110 else 111 pnh6->nh_ifp = rte->rt_ifp; 112 113 pnh6->nh_mtu = min(rte->rt_mtu, IN6_LINKMTU(rte->rt_ifp)); 114 if (rte->rt_flags & RTF_GATEWAY) { 115 gw = (struct sockaddr_in6 *)rte->rt_gateway; 116 pnh6->nh_addr = gw->sin6_addr; 117 in6_clearscope(&pnh6->nh_addr); 118 } else 119 pnh6->nh_addr = *dst; 120 /* Set flags */ 121 pnh6->nh_flags = fib_rte_to_nh_flags(rte->rt_flags); 122 gw = (struct sockaddr_in6 *)rt_key(rte); 123 if (IN6_IS_ADDR_UNSPECIFIED(&gw->sin6_addr)) 124 pnh6->nh_flags |= NHF_DEFAULT; 125 } 126 127 static void 128 fib6_rte_to_nh_extended(struct rtentry *rte, const struct in6_addr *dst, 129 uint32_t flags, struct nhop6_extended *pnh6) 130 { 131 struct sockaddr_in6 *gw; 132 133 /* Do explicit nexthop zero unless we're copying it */ 134 memset(pnh6, 0, sizeof(*pnh6)); 135 136 if ((flags & NHR_IFAIF) != 0) 137 pnh6->nh_ifp = fib6_get_ifaifp(rte); 138 else 139 pnh6->nh_ifp = rte->rt_ifp; 140 141 pnh6->nh_mtu = min(rte->rt_mtu, IN6_LINKMTU(rte->rt_ifp)); 142 if (rte->rt_flags & RTF_GATEWAY) { 143 gw = (struct sockaddr_in6 *)rte->rt_gateway; 144 pnh6->nh_addr = gw->sin6_addr; 145 in6_clearscope(&pnh6->nh_addr); 146 } else 147 pnh6->nh_addr = *dst; 148 /* Set flags */ 149 pnh6->nh_flags = fib_rte_to_nh_flags(rte->rt_flags); 150 gw = (struct sockaddr_in6 *)rt_key(rte); 151 if (IN6_IS_ADDR_UNSPECIFIED(&gw->sin6_addr)) 152 pnh6->nh_flags |= NHF_DEFAULT; 153 } 154 155 /* 156 * Performs IPv6 route table lookup on @dst. Returns 0 on success. 157 * Stores basic nexthop info into provided @pnh6 structure. 158 * Note that 159 * - nh_ifp represents logical transmit interface (rt_ifp) by default 160 * - nh_ifp represents "address" interface if NHR_IFAIF flag is passed 161 * - mtu from logical transmit interface will be returned. 162 * - nh_ifp cannot be safely dereferenced 163 * - nh_ifp represents rt_ifp (e.g. if looking up address on 164 * interface "ix0" pointer to "ix0" interface will be returned instead 165 * of "lo0") 166 * - howewer mtu from "transmit" interface will be returned. 167 */ 168 int 169 fib6_lookup_nh_basic(uint32_t fibnum, const struct in6_addr *dst, uint32_t scopeid, 170 uint32_t flags, uint32_t flowid, struct nhop6_basic *pnh6) 171 { 172 struct radix_node_head *rh; 173 struct radix_node *rn; 174 struct sockaddr_in6 sin6; 175 struct rtentry *rte; 176 177 KASSERT((fibnum < rt_numfibs), ("fib6_lookup_nh_basic: bad fibnum")); 178 rh = rt_tables_get_rnh(fibnum, AF_INET6); 179 if (rh == NULL) 180 return (ENOENT); 181 182 /* Prepare lookup key */ 183 memset(&sin6, 0, sizeof(sin6)); 184 sin6.sin6_addr = *dst; 185 /* Assume scopeid is valid and embed it directly */ 186 if (IN6_IS_SCOPE_LINKLOCAL(dst)) 187 sin6.sin6_addr.s6_addr16[1] = htons(scopeid & 0xffff); 188 189 RADIX_NODE_HEAD_RLOCK(rh); 190 rn = rh->rnh_matchaddr((void *)&sin6, rh); 191 if (rn != NULL && ((rn->rn_flags & RNF_ROOT) == 0)) { 192 rte = RNTORT(rn); 193 /* Ensure route & ifp is UP */ 194 if (RT_LINK_IS_UP(rte->rt_ifp)) { 195 fib6_rte_to_nh_basic(rte, dst, flags, pnh6); 196 RADIX_NODE_HEAD_RUNLOCK(rh); 197 return (0); 198 } 199 } 200 RADIX_NODE_HEAD_RUNLOCK(rh); 201 202 return (ENOENT); 203 } 204 205 /* 206 * Performs IPv6 route table lookup on @dst. Returns 0 on success. 207 * Stores extended nexthop info into provided @pnh6 structure. 208 * Note that 209 * - nh_ifp cannot be safely dereferenced unless NHR_REF is specified. 210 * - in that case you need to call fib6_free_nh_ext() 211 * - nh_ifp represents logical transmit interface (rt_ifp) by default 212 * - nh_ifp represents "address" interface if NHR_IFAIF flag is passed 213 * - mtu from logical transmit interface will be returned. 214 */ 215 int 216 fib6_lookup_nh_ext(uint32_t fibnum, const struct in6_addr *dst,uint32_t scopeid, 217 uint32_t flags, uint32_t flowid, struct nhop6_extended *pnh6) 218 { 219 struct radix_node_head *rh; 220 struct radix_node *rn; 221 struct sockaddr_in6 sin6; 222 struct rtentry *rte; 223 224 KASSERT((fibnum < rt_numfibs), ("fib6_lookup_nh_ext: bad fibnum")); 225 rh = rt_tables_get_rnh(fibnum, AF_INET6); 226 if (rh == NULL) 227 return (ENOENT); 228 229 /* Prepare lookup key */ 230 memset(&sin6, 0, sizeof(sin6)); 231 sin6.sin6_len = sizeof(struct sockaddr_in6); 232 sin6.sin6_addr = *dst; 233 /* Assume scopeid is valid and embed it directly */ 234 if (IN6_IS_SCOPE_LINKLOCAL(dst)) 235 sin6.sin6_addr.s6_addr16[1] = htons(scopeid & 0xffff); 236 237 RADIX_NODE_HEAD_RLOCK(rh); 238 rn = rh->rnh_matchaddr((void *)&sin6, rh); 239 if (rn != NULL && ((rn->rn_flags & RNF_ROOT) == 0)) { 240 rte = RNTORT(rn); 241 /* Ensure route & ifp is UP */ 242 if (RT_LINK_IS_UP(rte->rt_ifp)) { 243 fib6_rte_to_nh_extended(rte, dst, flags, pnh6); 244 if ((flags & NHR_REF) != 0) { 245 /* TODO: Do lwref on egress ifp's */ 246 } 247 RADIX_NODE_HEAD_RUNLOCK(rh); 248 249 return (0); 250 } 251 } 252 RADIX_NODE_HEAD_RUNLOCK(rh); 253 254 return (ENOENT); 255 } 256 257 void 258 fib6_free_nh_ext(uint32_t fibnum, struct nhop6_extended *pnh6) 259 { 260 261 } 262 263 #endif 264 265