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