xref: /dragonfly/sys/netinet6/raw_ip6.c (revision a68e0df0)
1 /*
2  * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
3  * 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  * 3. Neither the name of the project 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 PROJECT 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 PROJECT 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  * $FreeBSD: src/sys/netinet6/raw_ip6.c,v 1.7.2.7 2003/01/24 05:11:35 sam Exp $
30  * $DragonFly: src/sys/netinet6/raw_ip6.c,v 1.27 2008/09/04 09:08:22 hasso Exp $
31  */
32 
33 /*
34  * Copyright (c) 1982, 1986, 1988, 1993
35  *	The Regents of the University of California.  All rights reserved.
36  *
37  * Redistribution and use in source and binary forms, with or without
38  * modification, are permitted provided that the following conditions
39  * are met:
40  * 1. Redistributions of source code must retain the above copyright
41  *    notice, this list of conditions and the following disclaimer.
42  * 2. Redistributions in binary form must reproduce the above copyright
43  *    notice, this list of conditions and the following disclaimer in the
44  *    documentation and/or other materials provided with the distribution.
45  * 3. All advertising materials mentioning features or use of this software
46  *    must display the following acknowledgement:
47  *	This product includes software developed by the University of
48  *	California, Berkeley and its contributors.
49  * 4. Neither the name of the University nor the names of its contributors
50  *    may be used to endorse or promote products derived from this software
51  *    without specific prior written permission.
52  *
53  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
54  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
55  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
56  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
57  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
58  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
59  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
60  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
61  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
62  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
63  * SUCH DAMAGE.
64  *
65  *	@(#)raw_ip.c	8.2 (Berkeley) 1/4/94
66  */
67 
68 #include "opt_ipsec.h"
69 #include "opt_inet6.h"
70 
71 #include <sys/param.h>
72 #include <sys/malloc.h>
73 #include <sys/proc.h>
74 #include <sys/priv.h>
75 #include <sys/mbuf.h>
76 #include <sys/socket.h>
77 #include <sys/jail.h>
78 #include <sys/protosw.h>
79 #include <sys/socketvar.h>
80 #include <sys/errno.h>
81 #include <sys/systm.h>
82 #include <sys/thread2.h>
83 
84 #include <net/if.h>
85 #include <net/route.h>
86 #include <net/if_types.h>
87 
88 #include <netinet/in.h>
89 #include <netinet/in_var.h>
90 #include <netinet/in_systm.h>
91 #include <netinet/ip6.h>
92 #include <netinet6/ip6_var.h>
93 #include <netinet6/ip6_mroute.h>
94 #include <netinet/icmp6.h>
95 #include <netinet/in_pcb.h>
96 #include <netinet6/in6_pcb.h>
97 #include <netinet6/nd6.h>
98 #include <netinet6/ip6protosw.h>
99 #ifdef ENABLE_DEFAULT_SCOPE
100 #include <netinet6/scope6_var.h>
101 #endif
102 #include <netinet6/raw_ip6.h>
103 
104 #ifdef IPSEC
105 #include <netinet6/ipsec.h>
106 #include <netinet6/ipsec6.h>
107 #endif /*IPSEC*/
108 
109 #ifdef FAST_IPSEC
110 #include <netproto/ipsec/ipsec.h>
111 #include <netproto/ipsec/ipsec6.h>
112 #endif /* FAST_IPSEC */
113 
114 #include <machine/stdarg.h>
115 
116 #define	satosin6(sa)	((struct sockaddr_in6 *)(sa))
117 #define	ifatoia6(ifa)	((struct in6_ifaddr *)(ifa))
118 
119 /*
120  * Raw interface to IP6 protocol.
121  */
122 
123 extern struct	inpcbinfo ripcbinfo;
124 extern u_long	rip_sendspace;
125 extern u_long	rip_recvspace;
126 
127 struct rip6stat rip6stat;
128 
129 /*
130  * Setup generic address and protocol structures
131  * for raw_input routine, then pass them along with
132  * mbuf chain.
133  */
134 int
135 rip6_input(struct mbuf **mp, int *offp, int proto)
136 {
137 	struct mbuf *m = *mp;
138 	struct ip6_hdr *ip6 = mtod(m, struct ip6_hdr *);
139 	struct inpcb *in6p;
140 	struct inpcb *last = 0;
141 	struct mbuf *opts = NULL;
142 	struct sockaddr_in6 rip6src;
143 
144 	rip6stat.rip6s_ipackets++;
145 
146 	if (faithprefix_p != NULL && (*faithprefix_p)(&ip6->ip6_dst)) {
147 		/* XXX send icmp6 host/port unreach? */
148 		m_freem(m);
149 		return IPPROTO_DONE;
150 	}
151 
152 	init_sin6(&rip6src, m); /* general init */
153 
154 	LIST_FOREACH(in6p, &ripcbinfo.pcblisthead, inp_list) {
155 		if (in6p->in6p_flags & INP_PLACEMARKER)
156 			continue;
157 		if (!(in6p->in6p_vflag & INP_IPV6))
158 			continue;
159 		if (in6p->in6p_ip6_nxt &&
160 		    in6p->in6p_ip6_nxt != proto)
161 			continue;
162 		if (!IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_laddr) &&
163 		    !IN6_ARE_ADDR_EQUAL(&in6p->in6p_laddr, &ip6->ip6_dst))
164 			continue;
165 		if (!IN6_IS_ADDR_UNSPECIFIED(&in6p->in6p_faddr) &&
166 		    !IN6_ARE_ADDR_EQUAL(&in6p->in6p_faddr, &ip6->ip6_src))
167 			continue;
168 		if (in6p->in6p_cksum != -1) {
169 			rip6stat.rip6s_isum++;
170 			if (in6_cksum(m, ip6->ip6_nxt, *offp,
171 			    m->m_pkthdr.len - *offp)) {
172 				rip6stat.rip6s_badsum++;
173 				continue;
174 			}
175 		}
176 		if (last) {
177 			struct mbuf *n = m_copy(m, 0, (int)M_COPYALL);
178 
179 #ifdef IPSEC
180 			/*
181 			 * Check AH/ESP integrity.
182 			 */
183 			if (n && ipsec6_in_reject_so(n, last->inp_socket)) {
184 				m_freem(n);
185 				ipsec6stat.in_polvio++;
186 				/* do not inject data into pcb */
187 			} else
188 #endif /*IPSEC*/
189 #ifdef FAST_IPSEC
190 			/*
191 			 * Check AH/ESP integrity.
192 			 */
193 			if (n && ipsec6_in_reject(n, last)) {
194 				m_freem(n);
195 				/* do not inject data into pcb */
196 			} else
197 #endif /*FAST_IPSEC*/
198 			if (n) {
199 				if (last->in6p_flags & IN6P_CONTROLOPTS ||
200 				    last->in6p_socket->so_options & SO_TIMESTAMP)
201 					ip6_savecontrol(last, &opts, ip6, n);
202 				/* strip intermediate headers */
203 				m_adj(n, *offp);
204 				if (ssb_appendaddr(&last->in6p_socket->so_rcv,
205 						(struct sockaddr *)&rip6src,
206 						 n, opts) == 0) {
207 					m_freem(n);
208 					if (opts)
209 						m_freem(opts);
210 					rip6stat.rip6s_fullsock++;
211 				} else
212 					sorwakeup(last->in6p_socket);
213 				opts = NULL;
214 			}
215 		}
216 		last = in6p;
217 	}
218 #ifdef IPSEC
219 	/*
220 	 * Check AH/ESP integrity.
221 	 */
222 	if (last && ipsec6_in_reject_so(m, last->inp_socket)) {
223 		m_freem(m);
224 		ipsec6stat.in_polvio++;
225 		ip6stat.ip6s_delivered--;
226 		/* do not inject data into pcb */
227 	} else
228 #endif /*IPSEC*/
229 #ifdef FAST_IPSEC
230 	/*
231 	 * Check AH/ESP integrity.
232 	 */
233 	if (last && ipsec6_in_reject(m, last)) {
234 		m_freem(m);
235 		ip6stat.ip6s_delivered--;
236 		/* do not inject data into pcb */
237 	} else
238 #endif /*FAST_IPSEC*/
239 	if (last) {
240 		if (last->in6p_flags & IN6P_CONTROLOPTS ||
241 		    last->in6p_socket->so_options & SO_TIMESTAMP)
242 			ip6_savecontrol(last, &opts, ip6, m);
243 		/* strip intermediate headers */
244 		m_adj(m, *offp);
245 		if (ssb_appendaddr(&last->in6p_socket->so_rcv,
246 				(struct sockaddr *)&rip6src, m, opts) == 0) {
247 			m_freem(m);
248 			if (opts)
249 				m_freem(opts);
250 			rip6stat.rip6s_fullsock++;
251 		} else
252 			sorwakeup(last->in6p_socket);
253 	} else {
254 		rip6stat.rip6s_nosock++;
255 		if (m->m_flags & M_MCAST)
256 			rip6stat.rip6s_nosockmcast++;
257 		if (proto == IPPROTO_NONE)
258 			m_freem(m);
259 		else {
260 			char *prvnxtp = ip6_get_prevhdr(m, *offp); /* XXX */
261 			icmp6_error(m, ICMP6_PARAM_PROB,
262 				    ICMP6_PARAMPROB_NEXTHEADER,
263 				    prvnxtp - mtod(m, char *));
264 		}
265 		ip6stat.ip6s_delivered--;
266 	}
267 	return IPPROTO_DONE;
268 }
269 
270 void
271 rip6_ctlinput(int cmd, struct sockaddr *sa, void *d)
272 {
273 	struct ip6_hdr *ip6;
274 	struct mbuf *m;
275 	int off = 0;
276 	struct ip6ctlparam *ip6cp = NULL;
277 	const struct sockaddr_in6 *sa6_src = NULL;
278 	void (*notify) (struct inpcb *, int) = in6_rtchange;
279 
280 	if (sa->sa_family != AF_INET6 ||
281 	    sa->sa_len != sizeof(struct sockaddr_in6))
282 		return;
283 
284 	if ((unsigned)cmd >= PRC_NCMDS)
285 		return;
286 	if (PRC_IS_REDIRECT(cmd))
287 		notify = in6_rtchange, d = NULL;
288 	else if (cmd == PRC_HOSTDEAD)
289 		d = NULL;
290 	else if (inet6ctlerrmap[cmd] == 0)
291 		return;
292 
293 	/* if the parameter is from icmp6, decode it. */
294 	if (d != NULL) {
295 		ip6cp = (struct ip6ctlparam *)d;
296 		m = ip6cp->ip6c_m;
297 		ip6 = ip6cp->ip6c_ip6;
298 		off = ip6cp->ip6c_off;
299 		sa6_src = ip6cp->ip6c_src;
300 	} else {
301 		m = NULL;
302 		ip6 = NULL;
303 		sa6_src = &sa6_any;
304 	}
305 
306 	in6_pcbnotify(&ripcbinfo.pcblisthead, sa, 0,
307 		      (const struct sockaddr *)sa6_src, 0, cmd, 0, notify);
308 }
309 
310 /*
311  * Generate IPv6 header and pass packet to ip6_output.
312  * Tack on options user may have setup with control call.
313  */
314 int
315 rip6_output(struct mbuf *m, struct socket *so, ...)
316 {
317 	struct sockaddr_in6 *dstsock;
318 	struct mbuf *control;
319 	struct in6_addr *dst;
320 	struct ip6_hdr *ip6;
321 	struct inpcb *in6p;
322 	u_int	plen = m->m_pkthdr.len;
323 	int error = 0;
324 	struct ip6_pktopts opt, *optp = 0;
325 	struct ifnet *oifp = NULL;
326 	int type = 0, code = 0;		/* for ICMPv6 output statistics only */
327 	int priv = 0;
328 	__va_list ap;
329 
330 	__va_start(ap, so);
331 	dstsock = __va_arg(ap, struct sockaddr_in6 *);
332 	control = __va_arg(ap, struct mbuf *);
333 	__va_end(ap);
334 
335 	in6p = so->so_pcb;
336 
337 	priv = 0;
338 	if (so->so_cred->cr_uid == 0)
339 		priv = 1;
340 	dst = &dstsock->sin6_addr;
341 	if (control) {
342 		if ((error = ip6_setpktoptions(control, &opt,
343 		    in6p->in6p_outputopts,
344 		    so->so_proto->pr_protocol, priv)) != 0)
345 			goto bad;
346 		optp = &opt;
347 	} else
348 		optp = in6p->in6p_outputopts;
349 
350 	/*
351 	 * For an ICMPv6 packet, we should know its type and code
352 	 * to update statistics.
353 	 */
354 	if (so->so_proto->pr_protocol == IPPROTO_ICMPV6) {
355 		struct icmp6_hdr *icmp6;
356 		if (m->m_len < sizeof(struct icmp6_hdr) &&
357 		    (m = m_pullup(m, sizeof(struct icmp6_hdr))) == NULL) {
358 			error = ENOBUFS;
359 			goto bad;
360 		}
361 		icmp6 = mtod(m, struct icmp6_hdr *);
362 		type = icmp6->icmp6_type;
363 		code = icmp6->icmp6_code;
364 	}
365 
366 	M_PREPEND(m, sizeof(*ip6), MB_WAIT);
367 	ip6 = mtod(m, struct ip6_hdr *);
368 
369 	/*
370 	 * Next header might not be ICMP6 but use its pseudo header anyway.
371 	 */
372 	ip6->ip6_dst = *dst;
373 
374 	/*
375 	 * If the scope of the destination is link-local, embed the interface
376 	 * index in the address.
377 	 *
378 	 * XXX advanced-api value overrides sin6_scope_id
379 	 */
380 	if (IN6_IS_SCOPE_LINKLOCAL(&ip6->ip6_dst)) {
381 		struct in6_pktinfo *pi;
382 
383 		/*
384 		 * XXX Boundary check is assumed to be already done in
385 		 * ip6_setpktoptions().
386 		 */
387 		if (optp && (pi = optp->ip6po_pktinfo) && pi->ipi6_ifindex) {
388 			ip6->ip6_dst.s6_addr16[1] = htons(pi->ipi6_ifindex);
389 			oifp = ifindex2ifnet[pi->ipi6_ifindex];
390 		} else if (IN6_IS_ADDR_MULTICAST(&ip6->ip6_dst) &&
391 			 in6p->in6p_moptions &&
392 			 in6p->in6p_moptions->im6o_multicast_ifp) {
393 			oifp = in6p->in6p_moptions->im6o_multicast_ifp;
394 			ip6->ip6_dst.s6_addr16[1] = htons(oifp->if_index);
395 		} else if (dstsock->sin6_scope_id) {
396 			/* boundary check */
397 			if (dstsock->sin6_scope_id < 0
398 			 || if_index < dstsock->sin6_scope_id) {
399 				error = ENXIO;  /* XXX EINVAL? */
400 				goto bad;
401 			}
402 			ip6->ip6_dst.s6_addr16[1]
403 				= htons(dstsock->sin6_scope_id & 0xffff);/*XXX*/
404 		}
405 	}
406 
407 	/*
408 	 * Source address selection.
409 	 */
410 	{
411 		struct in6_addr *in6a;
412 
413 		if ((in6a = in6_selectsrc(dstsock, optp,
414 					  in6p->in6p_moptions,
415 					  &in6p->in6p_route,
416 					  &in6p->in6p_laddr,
417 					  &error, NULL)) == NULL) {
418 			if (error == 0)
419 				error = EADDRNOTAVAIL;
420 			goto bad;
421 		}
422 		ip6->ip6_src = *in6a;
423 		if (in6p->in6p_route.ro_rt)
424 			oifp = ifindex2ifnet[in6p->in6p_route.ro_rt->rt_ifp->if_index];
425 	}
426 	ip6->ip6_flow = (ip6->ip6_flow & ~IPV6_FLOWINFO_MASK) |
427 		(in6p->in6p_flowinfo & IPV6_FLOWINFO_MASK);
428 	ip6->ip6_vfc = (ip6->ip6_vfc & ~IPV6_VERSION_MASK) |
429 		(IPV6_VERSION & IPV6_VERSION_MASK);
430 	/* ip6_plen will be filled in ip6_output, so not fill it here. */
431 	ip6->ip6_nxt = in6p->in6p_ip6_nxt;
432 	ip6->ip6_hlim = in6_selecthlim(in6p, oifp);
433 
434 	if (so->so_proto->pr_protocol == IPPROTO_ICMPV6 ||
435 	    in6p->in6p_cksum != -1) {
436 		struct mbuf *n;
437 		int off;
438 		u_int16_t *p;
439 
440 		/* compute checksum */
441 		if (so->so_proto->pr_protocol == IPPROTO_ICMPV6)
442 			off = offsetof(struct icmp6_hdr, icmp6_cksum);
443 		else
444 			off = in6p->in6p_cksum;
445 		if (plen < off + 1) {
446 			error = EINVAL;
447 			goto bad;
448 		}
449 		off += sizeof(struct ip6_hdr);
450 
451 		n = m;
452 		while (n && n->m_len <= off) {
453 			off -= n->m_len;
454 			n = n->m_next;
455 		}
456 		if (!n)
457 			goto bad;
458 		p = (u_int16_t *)(mtod(n, caddr_t) + off);
459 		*p = 0;
460 		*p = in6_cksum(m, ip6->ip6_nxt, sizeof(*ip6), plen);
461 	}
462 
463 	error = ip6_output(m, optp, &in6p->in6p_route, 0,
464 			   in6p->in6p_moptions, &oifp, in6p);
465 	if (so->so_proto->pr_protocol == IPPROTO_ICMPV6) {
466 		if (oifp)
467 			icmp6_ifoutstat_inc(oifp, type, code);
468 		icmp6stat.icp6s_outhist[type]++;
469 	} else
470 		rip6stat.rip6s_opackets++;
471 
472 	goto freectl;
473 
474 bad:
475 	if (m)
476 		m_freem(m);
477 
478 freectl:
479 	if (optp == &opt && optp->ip6po_rthdr && optp->ip6po_route.ro_rt)
480 		RTFREE(optp->ip6po_route.ro_rt);
481 	if (control) {
482 		if (optp == &opt)
483 			ip6_clearpktopts(optp, -1);
484 		m_freem(control);
485 	}
486 	return (error);
487 }
488 
489 /*
490  * Raw IPv6 socket option processing.
491  */
492 int
493 rip6_ctloutput(struct socket *so, struct sockopt *sopt)
494 {
495 	int error;
496 
497 	if (sopt->sopt_level == IPPROTO_ICMPV6)
498 		/*
499 		 * XXX: is it better to call icmp6_ctloutput() directly
500 		 * from protosw?
501 		 */
502 		return (icmp6_ctloutput(so, sopt));
503 	else if (sopt->sopt_level != IPPROTO_IPV6)
504 		return (EINVAL);
505 
506 	error = 0;
507 
508 	switch (sopt->sopt_dir) {
509 	case SOPT_GET:
510 		switch (sopt->sopt_name) {
511 		case MRT6_INIT:
512 		case MRT6_DONE:
513 		case MRT6_ADD_MIF:
514 		case MRT6_DEL_MIF:
515 		case MRT6_ADD_MFC:
516 		case MRT6_DEL_MFC:
517 		case MRT6_PIM:
518 			error = ip6_mrouter_get(so, sopt);
519 			break;
520 		case IPV6_CHECKSUM:
521 			error = ip6_raw_ctloutput(so, sopt);
522 			break;
523 		default:
524 			error = ip6_ctloutput(so, sopt);
525 			break;
526 		}
527 		break;
528 
529 	case SOPT_SET:
530 		switch (sopt->sopt_name) {
531 		case MRT6_INIT:
532 		case MRT6_DONE:
533 		case MRT6_ADD_MIF:
534 		case MRT6_DEL_MIF:
535 		case MRT6_ADD_MFC:
536 		case MRT6_DEL_MFC:
537 		case MRT6_PIM:
538 			error = ip6_mrouter_set(so, sopt);
539 			break;
540 		case IPV6_CHECKSUM:
541 			error = ip6_raw_ctloutput(so, sopt);
542 			break;
543 		default:
544 			error = ip6_ctloutput(so, sopt);
545 			break;
546 		}
547 		break;
548 	}
549 
550 	return (error);
551 }
552 
553 static int
554 rip6_attach(struct socket *so, int proto, struct pru_attach_info *ai)
555 {
556 	struct inpcb *inp;
557 	int error;
558 
559 	inp = so->so_pcb;
560 	if (inp)
561 		panic("rip6_attach");
562 	error = priv_check_cred(ai->p_ucred, PRIV_NETINET_RAW, NULL_CRED_OKAY);
563 	if (error)
564 		return error;
565 
566 	error = soreserve(so, rip_sendspace, rip_recvspace, ai->sb_rlimit);
567 	if (error)
568 		return error;
569 	crit_enter();
570 	error = in_pcballoc(so, &ripcbinfo);
571 	crit_exit();
572 	if (error)
573 		return error;
574 	inp = (struct inpcb *)so->so_pcb;
575 	inp->inp_vflag |= INP_IPV6;
576 	inp->in6p_ip6_nxt = (long)proto;
577 	inp->in6p_hops = -1;	/* use kernel default */
578 	inp->in6p_cksum = -1;
579 	MALLOC(inp->in6p_icmp6filt, struct icmp6_filter *,
580 	       sizeof(struct icmp6_filter), M_PCB, M_NOWAIT);
581 	if (inp->in6p_icmp6filt != NULL)
582 		ICMP6_FILTER_SETPASSALL(inp->in6p_icmp6filt);
583 	return 0;
584 }
585 
586 static int
587 rip6_detach(struct socket *so)
588 {
589 	struct inpcb *inp;
590 
591 	inp = so->so_pcb;
592 	if (inp == NULL)
593 		panic("rip6_detach");
594 	/* xxx: RSVP */
595 	if (so == ip6_mrouter)
596 		ip6_mrouter_done();
597 	if (inp->in6p_icmp6filt) {
598 		FREE(inp->in6p_icmp6filt, M_PCB);
599 		inp->in6p_icmp6filt = NULL;
600 	}
601 	in6_pcbdetach(inp);
602 	return 0;
603 }
604 
605 static int
606 rip6_abort(struct socket *so)
607 {
608 	soisdisconnected(so);
609 	return rip6_detach(so);
610 }
611 
612 static int
613 rip6_disconnect(struct socket *so)
614 {
615 	struct inpcb *inp = so->so_pcb;
616 
617 	if (!(so->so_state & SS_ISCONNECTED))
618 		return ENOTCONN;
619 	inp->in6p_faddr = kin6addr_any;
620 	return rip6_abort(so);
621 }
622 
623 static int
624 rip6_bind(struct socket *so, struct sockaddr *nam, struct thread *td)
625 {
626 	struct inpcb *inp = so->so_pcb;
627 	struct sockaddr_in6 *addr = (struct sockaddr_in6 *)nam;
628 	struct ifaddr *ia = NULL;
629 
630 	if (nam->sa_len != sizeof(*addr))
631 		return EINVAL;
632 
633 	if (TAILQ_EMPTY(&ifnet) || addr->sin6_family != AF_INET6)
634 		return EADDRNOTAVAIL;
635 #ifdef ENABLE_DEFAULT_SCOPE
636 	if (addr->sin6_scope_id == 0) {	/* not change if specified  */
637 		addr->sin6_scope_id = scope6_addr2default(&addr->sin6_addr);
638 	}
639 #endif
640 	if (!IN6_IS_ADDR_UNSPECIFIED(&addr->sin6_addr) &&
641 	    (ia = ifa_ifwithaddr((struct sockaddr *)addr)) == NULL)
642 		return EADDRNOTAVAIL;
643 	if (ia &&
644 	    ((struct in6_ifaddr *)ia)->ia6_flags &
645 	    (IN6_IFF_ANYCAST|IN6_IFF_NOTREADY|
646 	     IN6_IFF_DETACHED|IN6_IFF_DEPRECATED)) {
647 		return (EADDRNOTAVAIL);
648 	}
649 	inp->in6p_laddr = addr->sin6_addr;
650 	return 0;
651 }
652 
653 static int
654 rip6_connect(struct socket *so, struct sockaddr *nam, struct thread *td)
655 {
656 	struct inpcb *inp = so->so_pcb;
657 	struct sockaddr_in6 *addr = (struct sockaddr_in6 *)nam;
658 	struct in6_addr *in6a = NULL;
659 	int error = 0;
660 #ifdef ENABLE_DEFAULT_SCOPE
661 	struct sockaddr_in6 tmp;
662 #endif
663 
664 	if (nam->sa_len != sizeof(*addr))
665 		return EINVAL;
666 	if (TAILQ_EMPTY(&ifnet))
667 		return EADDRNOTAVAIL;
668 	if (addr->sin6_family != AF_INET6)
669 		return EAFNOSUPPORT;
670 #ifdef ENABLE_DEFAULT_SCOPE
671 	if (addr->sin6_scope_id == 0) {	/* not change if specified  */
672 		/* avoid overwrites */
673 		tmp = *addr;
674 		addr = &tmp;
675 		addr->sin6_scope_id = scope6_addr2default(&addr->sin6_addr);
676 	}
677 #endif
678 	/* Source address selection. XXX: need pcblookup? */
679 	in6a = in6_selectsrc(addr, inp->in6p_outputopts,
680 			     inp->in6p_moptions, &inp->in6p_route,
681 			     &inp->in6p_laddr, &error, NULL);
682 	if (in6a == NULL)
683 		return (error ? error : EADDRNOTAVAIL);
684 	inp->in6p_laddr = *in6a;
685 	inp->in6p_faddr = addr->sin6_addr;
686 	soisconnected(so);
687 	return 0;
688 }
689 
690 static int
691 rip6_shutdown(struct socket *so)
692 {
693 	socantsendmore(so);
694 	return 0;
695 }
696 
697 static int
698 rip6_send(struct socket *so, int flags, struct mbuf *m, struct sockaddr *nam,
699 	  struct mbuf *control, struct thread *td)
700 {
701 	struct inpcb *inp = so->so_pcb;
702 	struct sockaddr_in6 tmp;
703 	struct sockaddr_in6 *dst;
704 
705 	/* always copy sockaddr to avoid overwrites */
706 	if (so->so_state & SS_ISCONNECTED) {
707 		if (nam) {
708 			m_freem(m);
709 			return EISCONN;
710 		}
711 		/* XXX */
712 		bzero(&tmp, sizeof(tmp));
713 		tmp.sin6_family = AF_INET6;
714 		tmp.sin6_len = sizeof(struct sockaddr_in6);
715 		bcopy(&inp->in6p_faddr, &tmp.sin6_addr,
716 		      sizeof(struct in6_addr));
717 		dst = &tmp;
718 	} else {
719 		if (nam == NULL) {
720 			m_freem(m);
721 			return ENOTCONN;
722 		}
723 		tmp = *(struct sockaddr_in6 *)nam;
724 		dst = &tmp;
725 	}
726 #ifdef ENABLE_DEFAULT_SCOPE
727 	if (dst->sin6_scope_id == 0) {	/* not change if specified  */
728 		dst->sin6_scope_id = scope6_addr2default(&dst->sin6_addr);
729 	}
730 #endif
731 	return rip6_output(m, so, dst, control);
732 }
733 
734 struct pr_usrreqs rip6_usrreqs = {
735 	.pru_abort = rip6_abort,
736 	.pru_accept = pru_accept_notsupp,
737 	.pru_attach = rip6_attach,
738 	.pru_bind = rip6_bind,
739 	.pru_connect = rip6_connect,
740 	.pru_connect2 = pru_connect2_notsupp,
741 	.pru_control = in6_control,
742 	.pru_detach = rip6_detach,
743 	.pru_disconnect = rip6_disconnect,
744 	.pru_listen = pru_listen_notsupp,
745 	.pru_peeraddr = in6_setpeeraddr,
746 	.pru_rcvd = pru_rcvd_notsupp,
747 	.pru_rcvoob = pru_rcvoob_notsupp,
748 	.pru_send = rip6_send,
749 	.pru_sense = pru_sense_null,
750 	.pru_shutdown = rip6_shutdown,
751 	.pru_sockaddr = in6_setsockaddr,
752 	.pru_sosend = sosend,
753 	.pru_soreceive = soreceive,
754 	.pru_sopoll = sopoll
755 };
756