xref: /freebsd/sys/net/route.c (revision cd8537910406e68d4719136a5b0cf6d23bb1b23b)
1 /*-
2  * SPDX-License-Identifier: BSD-3-Clause
3  *
4  * Copyright (c) 1980, 1986, 1991, 1993
5  *	The Regents of the University of California.  All rights reserved.
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 University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  *
31  *	@(#)route.c	8.3.1.1 (Berkeley) 2/23/95
32  * $FreeBSD$
33  */
34 /************************************************************************
35  * Note: In this file a 'fib' is a "forwarding information base"	*
36  * Which is the new name for an in kernel routing (next hop) table.	*
37  ***********************************************************************/
38 
39 #include "opt_inet.h"
40 #include "opt_inet6.h"
41 #include "opt_mrouting.h"
42 #include "opt_route.h"
43 
44 #include <sys/param.h>
45 #include <sys/systm.h>
46 #include <sys/malloc.h>
47 #include <sys/mbuf.h>
48 #include <sys/socket.h>
49 #include <sys/sysctl.h>
50 #include <sys/syslog.h>
51 #include <sys/sysproto.h>
52 #include <sys/proc.h>
53 #include <sys/domain.h>
54 #include <sys/eventhandler.h>
55 #include <sys/kernel.h>
56 #include <sys/lock.h>
57 #include <sys/rmlock.h>
58 
59 #include <net/if.h>
60 #include <net/if_var.h>
61 #include <net/if_dl.h>
62 #include <net/route.h>
63 #include <net/route/route_ctl.h>
64 #include <net/route/route_var.h>
65 #include <net/route/nhop.h>
66 #include <net/vnet.h>
67 
68 #ifdef RADIX_MPATH
69 #include <net/radix_mpath.h>
70 #endif
71 
72 #include <netinet/in.h>
73 #include <netinet/ip_mroute.h>
74 
75 VNET_PCPUSTAT_DEFINE(struct rtstat, rtstat);
76 
77 VNET_PCPUSTAT_SYSINIT(rtstat);
78 #ifdef VIMAGE
79 VNET_PCPUSTAT_SYSUNINIT(rtstat);
80 #endif
81 
82 EVENTHANDLER_LIST_DEFINE(rt_addrmsg);
83 
84 static int rt_ifdelroute(const struct rtentry *rt, const struct nhop_object *,
85     void *arg);
86 static int rt_exportinfo(struct rtentry *rt, struct rt_addrinfo *info,
87     int flags);
88 
89 /*
90  * route initialization must occur before ip6_init2(), which happenas at
91  * SI_ORDER_MIDDLE.
92  */
93 static void
94 route_init(void)
95 {
96 
97 	nhops_init();
98 }
99 SYSINIT(route_init, SI_SUB_PROTO_DOMAIN, SI_ORDER_THIRD, route_init, NULL);
100 
101 struct rib_head *
102 rt_table_init(int offset, int family, u_int fibnum)
103 {
104 	struct rib_head *rh;
105 
106 	rh = malloc(sizeof(struct rib_head), M_RTABLE, M_WAITOK | M_ZERO);
107 
108 	/* TODO: These details should be hidded inside radix.c */
109 	/* Init masks tree */
110 	rn_inithead_internal(&rh->head, rh->rnh_nodes, offset);
111 	rn_inithead_internal(&rh->rmhead.head, rh->rmhead.mask_nodes, 0);
112 	rh->head.rnh_masks = &rh->rmhead;
113 
114 	/* Save metadata associated with this routing table. */
115 	rh->rib_family = family;
116 	rh->rib_fibnum = fibnum;
117 #ifdef VIMAGE
118 	rh->rib_vnet = curvnet;
119 #endif
120 
121 	tmproutes_init(rh);
122 
123 	/* Init locks */
124 	RIB_LOCK_INIT(rh);
125 
126 	nhops_init_rib(rh);
127 
128 	/* Init subscription system */
129 	rib_init_subscriptions(rh);
130 
131 	/* Finally, set base callbacks */
132 	rh->rnh_addaddr = rn_addroute;
133 	rh->rnh_deladdr = rn_delete;
134 	rh->rnh_matchaddr = rn_match;
135 	rh->rnh_lookup = rn_lookup;
136 	rh->rnh_walktree = rn_walktree;
137 	rh->rnh_walktree_from = rn_walktree_from;
138 
139 	return (rh);
140 }
141 
142 static int
143 rt_freeentry(struct radix_node *rn, void *arg)
144 {
145 	struct radix_head * const rnh = arg;
146 	struct radix_node *x;
147 
148 	x = (struct radix_node *)rn_delete(rn + 2, NULL, rnh);
149 	if (x != NULL)
150 		R_Free(x);
151 	return (0);
152 }
153 
154 void
155 rt_table_destroy(struct rib_head *rh)
156 {
157 
158 	tmproutes_destroy(rh);
159 
160 	rn_walktree(&rh->rmhead.head, rt_freeentry, &rh->rmhead.head);
161 
162 	nhops_destroy_rib(rh);
163 
164 	rib_destroy_subscriptions(rh);
165 
166 	/* Assume table is already empty */
167 	RIB_LOCK_DESTROY(rh);
168 	free(rh, M_RTABLE);
169 }
170 
171 /*
172  * Adds a temporal redirect entry to the routing table.
173  * @fibnum: fib number
174  * @dst: destination to install redirect to
175  * @gateway: gateway to go via
176  * @author: sockaddr of originating router, can be NULL
177  * @ifp: interface to use for the redirected route
178  * @flags: set of flags to add. Allowed: RTF_GATEWAY
179  * @lifetime_sec: time in seconds to expire this redirect.
180  *
181  * Retuns 0 on success, errno otherwise.
182  */
183 int
184 rib_add_redirect(u_int fibnum, struct sockaddr *dst, struct sockaddr *gateway,
185     struct sockaddr *author, struct ifnet *ifp, int flags, int lifetime_sec)
186 {
187 	struct rib_cmd_info rc;
188 	int error;
189 	struct rt_addrinfo info;
190 	struct rt_metrics rti_rmx;
191 	struct ifaddr *ifa;
192 
193 	NET_EPOCH_ASSERT();
194 
195 	if (rt_tables_get_rnh(fibnum, dst->sa_family) == NULL)
196 		return (EAFNOSUPPORT);
197 
198 	/* Verify the allowed flag mask. */
199 	KASSERT(((flags & ~(RTF_GATEWAY)) == 0),
200 	    ("invalid redirect flags: %x", flags));
201 	flags |= RTF_HOST | RTF_DYNAMIC;
202 
203 	/* Get the best ifa for the given interface and gateway. */
204 	if ((ifa = ifaof_ifpforaddr(gateway, ifp)) == NULL)
205 		return (ENETUNREACH);
206 	ifa_ref(ifa);
207 
208 	bzero(&info, sizeof(info));
209 	info.rti_info[RTAX_DST] = dst;
210 	info.rti_info[RTAX_GATEWAY] = gateway;
211 	info.rti_ifa = ifa;
212 	info.rti_ifp = ifp;
213 	info.rti_flags = flags;
214 
215 	/* Setup route metrics to define expire time. */
216 	bzero(&rti_rmx, sizeof(rti_rmx));
217 	/* Set expire time as absolute. */
218 	rti_rmx.rmx_expire = lifetime_sec + time_second;
219 	info.rti_mflags |= RTV_EXPIRE;
220 	info.rti_rmx = &rti_rmx;
221 
222 	error = rib_action(fibnum, RTM_ADD, &info, &rc);
223 	ifa_free(ifa);
224 
225 	if (error != 0) {
226 		/* TODO: add per-fib redirect stats. */
227 		return (error);
228 	}
229 
230 	RTSTAT_INC(rts_dynamic);
231 
232 	/* Send notification of a route addition to userland. */
233 	bzero(&info, sizeof(info));
234 	info.rti_info[RTAX_DST] = dst;
235 	info.rti_info[RTAX_GATEWAY] = gateway;
236 	info.rti_info[RTAX_AUTHOR] = author;
237 	rt_missmsg_fib(RTM_REDIRECT, &info, flags | RTF_UP, error, fibnum);
238 
239 	return (0);
240 }
241 
242 /*
243  * Routing table ioctl interface.
244  */
245 int
246 rtioctl_fib(u_long req, caddr_t data, u_int fibnum)
247 {
248 
249 	/*
250 	 * If more ioctl commands are added here, make sure the proper
251 	 * super-user checks are being performed because it is possible for
252 	 * prison-root to make it this far if raw sockets have been enabled
253 	 * in jails.
254 	 */
255 #ifdef INET
256 	/* Multicast goop, grrr... */
257 	return mrt_ioctl ? mrt_ioctl(req, data, fibnum) : EOPNOTSUPP;
258 #else /* INET */
259 	return ENXIO;
260 #endif /* INET */
261 }
262 
263 struct ifaddr *
264 ifa_ifwithroute(int flags, const struct sockaddr *dst,
265     const struct sockaddr *gateway, u_int fibnum)
266 {
267 	struct ifaddr *ifa;
268 
269 	NET_EPOCH_ASSERT();
270 	if ((flags & RTF_GATEWAY) == 0) {
271 		/*
272 		 * If we are adding a route to an interface,
273 		 * and the interface is a pt to pt link
274 		 * we should search for the destination
275 		 * as our clue to the interface.  Otherwise
276 		 * we can use the local address.
277 		 */
278 		ifa = NULL;
279 		if (flags & RTF_HOST)
280 			ifa = ifa_ifwithdstaddr(dst, fibnum);
281 		if (ifa == NULL)
282 			ifa = ifa_ifwithaddr(gateway);
283 	} else {
284 		/*
285 		 * If we are adding a route to a remote net
286 		 * or host, the gateway may still be on the
287 		 * other end of a pt to pt link.
288 		 */
289 		ifa = ifa_ifwithdstaddr(gateway, fibnum);
290 	}
291 	if (ifa == NULL)
292 		ifa = ifa_ifwithnet(gateway, 0, fibnum);
293 	if (ifa == NULL) {
294 		struct nhop_object *nh;
295 
296 		nh = rib_lookup(fibnum, gateway, NHR_NONE, 0);
297 
298 		/*
299 		 * dismiss a gateway that is reachable only
300 		 * through the default router
301 		 */
302 		if ((nh == NULL) || (nh->nh_flags & NHF_DEFAULT))
303 			return (NULL);
304 		ifa = nh->nh_ifa;
305 	}
306 	if (ifa->ifa_addr->sa_family != dst->sa_family) {
307 		struct ifaddr *oifa = ifa;
308 		ifa = ifaof_ifpforaddr(dst, ifa->ifa_ifp);
309 		if (ifa == NULL)
310 			ifa = oifa;
311 	}
312 
313 	return (ifa);
314 }
315 
316 /*
317  * Copy most of @rt data into @info.
318  *
319  * If @flags contains NHR_COPY, copies dst,netmask and gw to the
320  * pointers specified by @info structure. Assume such pointers
321  * are zeroed sockaddr-like structures with sa_len field initialized
322  * to reflect size of the provided buffer. if no NHR_COPY is specified,
323  * point dst,netmask and gw @info fields to appropriate @rt values.
324  *
325  * if @flags contains NHR_REF, do refcouting on rt_ifp and rt_ifa.
326  *
327  * Returns 0 on success.
328  */
329 int
330 rt_exportinfo(struct rtentry *rt, struct rt_addrinfo *info, int flags)
331 {
332 	struct rt_metrics *rmx;
333 	struct sockaddr *src, *dst;
334 	struct nhop_object *nh;
335 	int sa_len;
336 
337 	nh = rt->rt_nhop;
338 	if (flags & NHR_COPY) {
339 		/* Copy destination if dst is non-zero */
340 		src = rt_key(rt);
341 		dst = info->rti_info[RTAX_DST];
342 		sa_len = src->sa_len;
343 		if (dst != NULL) {
344 			if (src->sa_len > dst->sa_len)
345 				return (ENOMEM);
346 			memcpy(dst, src, src->sa_len);
347 			info->rti_addrs |= RTA_DST;
348 		}
349 
350 		/* Copy mask if set && dst is non-zero */
351 		src = rt_mask(rt);
352 		dst = info->rti_info[RTAX_NETMASK];
353 		if (src != NULL && dst != NULL) {
354 			/*
355 			 * Radix stores different value in sa_len,
356 			 * assume rt_mask() to have the same length
357 			 * as rt_key()
358 			 */
359 			if (sa_len > dst->sa_len)
360 				return (ENOMEM);
361 			memcpy(dst, src, src->sa_len);
362 			info->rti_addrs |= RTA_NETMASK;
363 		}
364 
365 		/* Copy gateway is set && dst is non-zero */
366 		src = &nh->gw_sa;
367 		dst = info->rti_info[RTAX_GATEWAY];
368 		if ((nhop_get_rtflags(nh) & RTF_GATEWAY) &&
369 		    src != NULL && dst != NULL) {
370 			if (src->sa_len > dst->sa_len)
371 				return (ENOMEM);
372 			memcpy(dst, src, src->sa_len);
373 			info->rti_addrs |= RTA_GATEWAY;
374 		}
375 	} else {
376 		info->rti_info[RTAX_DST] = rt_key(rt);
377 		info->rti_addrs |= RTA_DST;
378 		if (rt_mask(rt) != NULL) {
379 			info->rti_info[RTAX_NETMASK] = rt_mask(rt);
380 			info->rti_addrs |= RTA_NETMASK;
381 		}
382 		if (nhop_get_rtflags(nh) & RTF_GATEWAY) {
383 			info->rti_info[RTAX_GATEWAY] = &nh->gw_sa;
384 			info->rti_addrs |= RTA_GATEWAY;
385 		}
386 	}
387 
388 	rmx = info->rti_rmx;
389 	if (rmx != NULL) {
390 		info->rti_mflags |= RTV_MTU;
391 		rmx->rmx_mtu = nh->nh_mtu;
392 	}
393 
394 	info->rti_flags = rt->rte_flags | nhop_get_rtflags(nh);
395 	info->rti_ifp = nh->nh_ifp;
396 	info->rti_ifa = nh->nh_ifa;
397 	if (flags & NHR_REF) {
398 		if_ref(info->rti_ifp);
399 		ifa_ref(info->rti_ifa);
400 	}
401 
402 	return (0);
403 }
404 
405 /*
406  * Lookups up route entry for @dst in RIB database for fib @fibnum.
407  * Exports entry data to @info using rt_exportinfo().
408  *
409  * If @flags contains NHR_REF, refcouting is performed on rt_ifp and rt_ifa.
410  * All references can be released later by calling rib_free_info().
411  *
412  * Returns 0 on success.
413  * Returns ENOENT for lookup failure, ENOMEM for export failure.
414  */
415 int
416 rib_lookup_info(uint32_t fibnum, const struct sockaddr *dst, uint32_t flags,
417     uint32_t flowid, struct rt_addrinfo *info)
418 {
419 	RIB_RLOCK_TRACKER;
420 	struct rib_head *rh;
421 	struct radix_node *rn;
422 	struct rtentry *rt;
423 	int error;
424 
425 	KASSERT((fibnum < rt_numfibs), ("rib_lookup_rte: bad fibnum"));
426 	rh = rt_tables_get_rnh(fibnum, dst->sa_family);
427 	if (rh == NULL)
428 		return (ENOENT);
429 
430 	RIB_RLOCK(rh);
431 	rn = rh->rnh_matchaddr(__DECONST(void *, dst), &rh->head);
432 	if (rn != NULL && ((rn->rn_flags & RNF_ROOT) == 0)) {
433 		rt = RNTORT(rn);
434 		/* Ensure route & ifp is UP */
435 		if (RT_LINK_IS_UP(rt->rt_nhop->nh_ifp)) {
436 			flags = (flags & NHR_REF) | NHR_COPY;
437 			error = rt_exportinfo(rt, info, flags);
438 			RIB_RUNLOCK(rh);
439 
440 			return (error);
441 		}
442 	}
443 	RIB_RUNLOCK(rh);
444 
445 	return (ENOENT);
446 }
447 
448 /*
449  * Releases all references acquired by rib_lookup_info() when
450  * called with NHR_REF flags.
451  */
452 void
453 rib_free_info(struct rt_addrinfo *info)
454 {
455 
456 	ifa_free(info->rti_ifa);
457 	if_rele(info->rti_ifp);
458 }
459 
460 /*
461  * Delete Routes for a Network Interface
462  *
463  * Called for each routing entry via the rnh->rnh_walktree() call above
464  * to delete all route entries referencing a detaching network interface.
465  *
466  * Arguments:
467  *	rt	pointer to rtentry
468  *	nh	pointer to nhop
469  *	arg	argument passed to rnh->rnh_walktree() - detaching interface
470  *
471  * Returns:
472  *	0	successful
473  *	errno	failed - reason indicated
474  */
475 static int
476 rt_ifdelroute(const struct rtentry *rt, const struct nhop_object *nh, void *arg)
477 {
478 	struct ifnet	*ifp = arg;
479 
480 	if (nh->nh_ifp != ifp)
481 		return (0);
482 
483 	/*
484 	 * Protect (sorta) against walktree recursion problems
485 	 * with cloned routes
486 	 */
487 	if ((rt->rte_flags & RTF_UP) == 0)
488 		return (0);
489 
490 	return (1);
491 }
492 
493 /*
494  * Delete all remaining routes using this interface
495  * Unfortuneatly the only way to do this is to slog through
496  * the entire routing table looking for routes which point
497  * to this interface...oh well...
498  */
499 void
500 rt_flushifroutes_af(struct ifnet *ifp, int af)
501 {
502 	KASSERT((af >= 1 && af <= AF_MAX), ("%s: af %d not >= 1 and <= %d",
503 	    __func__, af, AF_MAX));
504 
505 	rib_foreach_table_walk_del(af, rt_ifdelroute, ifp);
506 }
507 
508 void
509 rt_flushifroutes(struct ifnet *ifp)
510 {
511 
512 	rib_foreach_table_walk_del(AF_UNSPEC, rt_ifdelroute, ifp);
513 }
514 
515 /*
516  * Look up rt_addrinfo for a specific fib.  Note that if rti_ifa is defined,
517  * it will be referenced so the caller must free it.
518  *
519  * Assume basic consistency checks are executed by callers:
520  * RTAX_DST exists, if RTF_GATEWAY is set, RTAX_GATEWAY exists as well.
521  */
522 int
523 rt_getifa_fib(struct rt_addrinfo *info, u_int fibnum)
524 {
525 	const struct sockaddr *dst, *gateway, *ifpaddr, *ifaaddr;
526 	struct epoch_tracker et;
527 	int needref, error, flags;
528 
529 	dst = info->rti_info[RTAX_DST];
530 	gateway = info->rti_info[RTAX_GATEWAY];
531 	ifpaddr = info->rti_info[RTAX_IFP];
532 	ifaaddr = info->rti_info[RTAX_IFA];
533 	flags = info->rti_flags;
534 
535 	/*
536 	 * ifp may be specified by sockaddr_dl
537 	 * when protocol address is ambiguous.
538 	 */
539 	error = 0;
540 	needref = (info->rti_ifa == NULL);
541 	NET_EPOCH_ENTER(et);
542 
543 	/* If we have interface specified by the ifindex in the address, use it */
544 	if (info->rti_ifp == NULL && ifpaddr != NULL &&
545 	    ifpaddr->sa_family == AF_LINK) {
546 	    const struct sockaddr_dl *sdl = (const struct sockaddr_dl *)ifpaddr;
547 	    if (sdl->sdl_index != 0)
548 		    info->rti_ifp = ifnet_byindex(sdl->sdl_index);
549 	}
550 	/*
551 	 * If we have source address specified, try to find it
552 	 * TODO: avoid enumerating all ifas on all interfaces.
553 	 */
554 	if (info->rti_ifa == NULL && ifaaddr != NULL)
555 		info->rti_ifa = ifa_ifwithaddr(ifaaddr);
556 	if (info->rti_ifa == NULL) {
557 		const struct sockaddr *sa;
558 
559 		/*
560 		 * Most common use case for the userland-supplied routes.
561 		 *
562 		 * Choose sockaddr to select ifa.
563 		 * -- if ifp is set --
564 		 * Order of preference:
565 		 * 1) IFA address
566 		 * 2) gateway address
567 		 *   Note: for interface routes link-level gateway address
568 		 *     is specified to indicate the interface index without
569 		 *     specifying RTF_GATEWAY. In this case, ignore gateway
570 		 *   Note: gateway AF may be different from dst AF. In this case,
571 		 *   ignore gateway
572 		 * 3) final destination.
573 		 * 4) if all of these fails, try to get at least link-level ifa.
574 		 * -- else --
575 		 * try to lookup gateway or dst in the routing table to get ifa
576 		 */
577 		if (info->rti_info[RTAX_IFA] != NULL)
578 			sa = info->rti_info[RTAX_IFA];
579 		else if ((info->rti_flags & RTF_GATEWAY) != 0 &&
580 		    gateway->sa_family == dst->sa_family)
581 			sa = gateway;
582 		else
583 			sa = dst;
584 		if (info->rti_ifp != NULL) {
585 			info->rti_ifa = ifaof_ifpforaddr(sa, info->rti_ifp);
586 			/* Case 4 */
587 			if (info->rti_ifa == NULL && gateway != NULL)
588 				info->rti_ifa = ifaof_ifpforaddr(gateway, info->rti_ifp);
589 		} else if (dst != NULL && gateway != NULL)
590 			info->rti_ifa = ifa_ifwithroute(flags, dst, gateway,
591 							fibnum);
592 		else if (sa != NULL)
593 			info->rti_ifa = ifa_ifwithroute(flags, sa, sa,
594 							fibnum);
595 	}
596 	if (needref && info->rti_ifa != NULL) {
597 		if (info->rti_ifp == NULL)
598 			info->rti_ifp = info->rti_ifa->ifa_ifp;
599 		ifa_ref(info->rti_ifa);
600 	} else
601 		error = ENETUNREACH;
602 	NET_EPOCH_EXIT(et);
603 	return (error);
604 }
605 
606 void
607 rt_updatemtu(struct ifnet *ifp)
608 {
609 	struct rib_head *rnh;
610 	int mtu;
611 	int i, j;
612 
613 	/*
614 	 * Try to update rt_mtu for all routes using this interface
615 	 * Unfortunately the only way to do this is to traverse all
616 	 * routing tables in all fibs/domains.
617 	 */
618 	for (i = 1; i <= AF_MAX; i++) {
619 		mtu = if_getmtu_family(ifp, i);
620 		for (j = 0; j < rt_numfibs; j++) {
621 			rnh = rt_tables_get_rnh(j, i);
622 			if (rnh == NULL)
623 				continue;
624 			nhops_update_ifmtu(rnh, ifp, mtu);
625 		}
626 	}
627 }
628 
629 #if 0
630 int p_sockaddr(char *buf, int buflen, struct sockaddr *s);
631 int rt_print(char *buf, int buflen, struct rtentry *rt);
632 
633 int
634 p_sockaddr(char *buf, int buflen, struct sockaddr *s)
635 {
636 	void *paddr = NULL;
637 
638 	switch (s->sa_family) {
639 	case AF_INET:
640 		paddr = &((struct sockaddr_in *)s)->sin_addr;
641 		break;
642 	case AF_INET6:
643 		paddr = &((struct sockaddr_in6 *)s)->sin6_addr;
644 		break;
645 	}
646 
647 	if (paddr == NULL)
648 		return (0);
649 
650 	if (inet_ntop(s->sa_family, paddr, buf, buflen) == NULL)
651 		return (0);
652 
653 	return (strlen(buf));
654 }
655 
656 int
657 rt_print(char *buf, int buflen, struct rtentry *rt)
658 {
659 	struct sockaddr *addr, *mask;
660 	int i = 0;
661 
662 	addr = rt_key(rt);
663 	mask = rt_mask(rt);
664 
665 	i = p_sockaddr(buf, buflen, addr);
666 	if (!(rt->rt_flags & RTF_HOST)) {
667 		buf[i++] = '/';
668 		i += p_sockaddr(buf + i, buflen - i, mask);
669 	}
670 
671 	if (rt->rt_flags & RTF_GATEWAY) {
672 		buf[i++] = '>';
673 		i += p_sockaddr(buf + i, buflen - i, &rt->rt_nhop->gw_sa);
674 	}
675 
676 	return (i);
677 }
678 #endif
679 
680 #ifdef RADIX_MPATH
681 /*
682  * Deletes key for single-path routes, unlinks rtentry with
683  * gateway specified in @info from multi-path routes.
684  *
685  * Returnes unlinked entry. In case of failure, returns NULL
686  * and sets @perror to ESRCH.
687  */
688 struct radix_node *
689 rt_mpath_unlink(struct rib_head *rnh, struct rt_addrinfo *info,
690     struct rtentry *rto, int *perror)
691 {
692 	/*
693 	 * if we got multipath routes, we require users to specify
694 	 * a matching RTAX_GATEWAY.
695 	 */
696 	struct rtentry *rt; // *rto = NULL;
697 	struct radix_node *rn;
698 	struct sockaddr *gw;
699 
700 	gw = info->rti_info[RTAX_GATEWAY];
701 	rt = rt_mpath_matchgate(rto, gw);
702 	if (rt == NULL) {
703 		*perror = ESRCH;
704 		return (NULL);
705 	}
706 
707 	/*
708 	 * this is the first entry in the chain
709 	 */
710 	if (rto == rt) {
711 		rn = rn_mpath_next((struct radix_node *)rt);
712 		/*
713 		 * there is another entry, now it's active
714 		 */
715 		if (rn) {
716 			rto = RNTORT(rn);
717 			rto->rte_flags |= RTF_UP;
718 		} else if (rt->rte_flags & RTF_GATEWAY) {
719 			/*
720 			 * For gateway routes, we need to
721 			 * make sure that we we are deleting
722 			 * the correct gateway.
723 			 * rt_mpath_matchgate() does not
724 			 * check the case when there is only
725 			 * one route in the chain.
726 			 */
727 			if (gw &&
728 			    (rt->rt_nhop->gw_sa.sa_len != gw->sa_len ||
729 				memcmp(&rt->rt_nhop->gw_sa, gw, gw->sa_len))) {
730 				*perror = ESRCH;
731 				return (NULL);
732 			}
733 		}
734 
735 		/*
736 		 * use the normal delete code to remove
737 		 * the first entry
738 		 */
739 		rn = rnh->rnh_deladdr(info->rti_info[RTAX_DST],
740 					info->rti_info[RTAX_NETMASK],
741 					&rnh->head);
742 		if (rn != NULL) {
743 			*perror = 0;
744 		} else {
745 			*perror = ESRCH;
746 		}
747 		return (rn);
748 	}
749 
750 	/*
751 	 * if the entry is 2nd and on up
752 	 */
753 	if (rt_mpath_deldup(rto, rt) == 0)
754 		panic ("rtrequest1: rt_mpath_deldup");
755 	*perror = 0;
756 	rn = (struct radix_node *)rt;
757 	return (rn);
758 }
759 #endif
760 
761 void
762 rt_maskedcopy(struct sockaddr *src, struct sockaddr *dst, struct sockaddr *netmask)
763 {
764 	u_char *cp1 = (u_char *)src;
765 	u_char *cp2 = (u_char *)dst;
766 	u_char *cp3 = (u_char *)netmask;
767 	u_char *cplim = cp2 + *cp3;
768 	u_char *cplim2 = cp2 + *cp1;
769 
770 	*cp2++ = *cp1++; *cp2++ = *cp1++; /* copies sa_len & sa_family */
771 	cp3 += 2;
772 	if (cplim > cplim2)
773 		cplim = cplim2;
774 	while (cp2 < cplim)
775 		*cp2++ = *cp1++ & *cp3++;
776 	if (cp2 < cplim2)
777 		bzero((caddr_t)cp2, (unsigned)(cplim2 - cp2));
778 }
779 
780 /*
781  * Announce interface address arrival/withdraw
782  * Returns 0 on success.
783  */
784 int
785 rt_addrmsg(int cmd, struct ifaddr *ifa, int fibnum)
786 {
787 
788 	KASSERT(cmd == RTM_ADD || cmd == RTM_DELETE,
789 	    ("unexpected cmd %d", cmd));
790 	KASSERT(fibnum == RT_ALL_FIBS || (fibnum >= 0 && fibnum < rt_numfibs),
791 	    ("%s: fib out of range 0 <=%d<%d", __func__, fibnum, rt_numfibs));
792 
793 	EVENTHANDLER_DIRECT_INVOKE(rt_addrmsg, ifa, cmd);
794 	return (rtsock_addrmsg(cmd, ifa, fibnum));
795 }
796 
797 /*
798  * Announce kernel-originated route addition/removal to rtsock based on @rt data.
799  * cmd: RTM_ cmd
800  * @rt: valid rtentry
801  * @ifp: target route interface
802  * @fibnum: fib id or RT_ALL_FIBS
803  *
804  * Returns 0 on success.
805  */
806 int
807 rt_routemsg(int cmd, struct rtentry *rt, struct ifnet *ifp, int rti_addrs,
808     int fibnum)
809 {
810 
811 	KASSERT(cmd == RTM_ADD || cmd == RTM_DELETE,
812 	    ("unexpected cmd %d", cmd));
813 
814 	KASSERT(fibnum == RT_ALL_FIBS || (fibnum >= 0 && fibnum < rt_numfibs),
815 	    ("%s: fib out of range 0 <=%d<%d", __func__, fibnum, rt_numfibs));
816 
817 	KASSERT(rt_key(rt) != NULL, (":%s: rt_key must be supplied", __func__));
818 
819 	return (rtsock_routemsg(cmd, rt, ifp, 0, fibnum));
820 }
821 
822 /*
823  * Announce kernel-originated route addition/removal to rtsock based on @rt data.
824  * cmd: RTM_ cmd
825  * @info: addrinfo structure with valid data.
826  * @fibnum: fib id or RT_ALL_FIBS
827  *
828  * Returns 0 on success.
829  */
830 int
831 rt_routemsg_info(int cmd, struct rt_addrinfo *info, int fibnum)
832 {
833 
834 	KASSERT(cmd == RTM_ADD || cmd == RTM_DELETE || cmd == RTM_CHANGE,
835 	    ("unexpected cmd %d", cmd));
836 
837 	KASSERT(fibnum == RT_ALL_FIBS || (fibnum >= 0 && fibnum < rt_numfibs),
838 	    ("%s: fib out of range 0 <=%d<%d", __func__, fibnum, rt_numfibs));
839 
840 	KASSERT(info->rti_info[RTAX_DST] != NULL, (":%s: RTAX_DST must be supplied", __func__));
841 
842 	return (rtsock_routemsg_info(cmd, info, fibnum));
843 }
844 
845 /*
846  * This is called to generate messages from the routing socket
847  * indicating a network interface has had addresses associated with it.
848  */
849 void
850 rt_newaddrmsg_fib(int cmd, struct ifaddr *ifa, struct rtentry *rt, int fibnum)
851 {
852 
853 	KASSERT(cmd == RTM_ADD || cmd == RTM_DELETE,
854 		("unexpected cmd %u", cmd));
855 	KASSERT(fibnum == RT_ALL_FIBS || (fibnum >= 0 && fibnum < rt_numfibs),
856 	    ("%s: fib out of range 0 <=%d<%d", __func__, fibnum, rt_numfibs));
857 
858 	if (cmd == RTM_ADD) {
859 		rt_addrmsg(cmd, ifa, fibnum);
860 		if (rt != NULL)
861 			rt_routemsg(cmd, rt, ifa->ifa_ifp, 0, fibnum);
862 	} else {
863 		if (rt != NULL)
864 			rt_routemsg(cmd, rt, ifa->ifa_ifp, 0, fibnum);
865 		rt_addrmsg(cmd, ifa, fibnum);
866 	}
867 }
868