xref: /netbsd/sys/netinet6/route6.c (revision c4a72b64)
1 /*	$NetBSD: route6.c,v 1.11 2002/09/11 02:46:47 itojun Exp $	*/
2 /*	$KAME: route6.c,v 1.22 2000/12/03 00:54:00 itojun Exp $	*/
3 
4 /*
5  * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the name of the project nor the names of its contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32 
33 #include <sys/cdefs.h>
34 __KERNEL_RCSID(0, "$NetBSD: route6.c,v 1.11 2002/09/11 02:46:47 itojun Exp $");
35 
36 #include <sys/param.h>
37 #include <sys/mbuf.h>
38 #include <sys/socket.h>
39 #include <sys/systm.h>
40 #include <sys/queue.h>
41 
42 #include <net/if.h>
43 
44 #include <netinet/in.h>
45 #include <netinet6/in6_var.h>
46 #include <netinet/ip6.h>
47 #include <netinet6/ip6_var.h>
48 
49 #include <netinet/icmp6.h>
50 
51 static int ip6_rthdr0 __P((struct mbuf *, struct ip6_hdr *,
52     struct ip6_rthdr0 *));
53 
54 int
55 route6_input(mp, offp, proto)
56 	struct mbuf **mp;
57 	int *offp, proto;	/* proto is unused */
58 {
59 	struct ip6_hdr *ip6;
60 	struct mbuf *m = *mp;
61 	struct ip6_rthdr *rh;
62 	int off = *offp, rhlen;
63 
64 #ifndef PULLDOWN_TEST
65 	IP6_EXTHDR_CHECK(m, off, sizeof(*rh), IPPROTO_DONE);
66 	ip6 = mtod(m, struct ip6_hdr *);
67 	rh = (struct ip6_rthdr *)((caddr_t)ip6 + off);
68 #else
69 	ip6 = mtod(m, struct ip6_hdr *);
70 	IP6_EXTHDR_GET(rh, struct ip6_rthdr *, m, off, sizeof(*rh));
71 	if (rh == NULL) {
72 		ip6stat.ip6s_tooshort++;
73 		return IPPROTO_DONE;
74 	}
75 #endif
76 
77 	switch (rh->ip6r_type) {
78 	case IPV6_RTHDR_TYPE_0:
79 		rhlen = (rh->ip6r_len + 1) << 3;
80 #ifndef PULLDOWN_TEST
81 		/*
82 		 * note on option length:
83 		 * due to IP6_EXTHDR_CHECK assumption, we cannot handle
84 		 * very big routing header (max rhlen == 2048).
85 		 */
86 		IP6_EXTHDR_CHECK(m, off, rhlen, IPPROTO_DONE);
87 #else
88 		/*
89 		 * note on option length:
90 		 * maximum rhlen: 2048
91 		 * max mbuf m_pulldown can handle: MCLBYTES == usually 2048
92 		 * so, here we are assuming that m_pulldown can handle
93 		 * rhlen == 2048 case.  this may not be a good thing to
94 		 * assume - we may want to avoid pulling it up altogether.
95 		 */
96 		IP6_EXTHDR_GET(rh, struct ip6_rthdr *, m, off, rhlen);
97 		if (rh == NULL) {
98 			ip6stat.ip6s_tooshort++;
99 			return IPPROTO_DONE;
100 		}
101 #endif
102 		if (ip6_rthdr0(m, ip6, (struct ip6_rthdr0 *)rh))
103 			return (IPPROTO_DONE);
104 		break;
105 	default:
106 		/* unknown routing type */
107 		if (rh->ip6r_segleft == 0) {
108 			rhlen = (rh->ip6r_len + 1) << 3;
109 			break;	/* Final dst. Just ignore the header. */
110 		}
111 		ip6stat.ip6s_badoptions++;
112 		icmp6_error(m, ICMP6_PARAM_PROB, ICMP6_PARAMPROB_HEADER,
113 			    (caddr_t)&rh->ip6r_type - (caddr_t)ip6);
114 		return (IPPROTO_DONE);
115 	}
116 
117 	*offp += rhlen;
118 	return (rh->ip6r_nxt);
119 }
120 
121 /*
122  * Type0 routing header processing
123  */
124 static int
125 ip6_rthdr0(m, ip6, rh0)
126 	struct mbuf *m;
127 	struct ip6_hdr *ip6;
128 	struct ip6_rthdr0 *rh0;
129 {
130 	int addrs, index;
131 	struct in6_addr *nextaddr, tmpaddr;
132 
133 	if (rh0->ip6r0_segleft == 0)
134 		return (0);
135 
136 	if (rh0->ip6r0_len % 2
137 #ifdef COMPAT_RFC1883
138 	    || rh0->ip6r0_len > 46
139 #endif
140 		) {
141 		/*
142 		 * Type 0 routing header can't contain more than 23 addresses.
143 		 * RFC 2462: this limitation was removed since strict/loose
144 		 * bitmap field was deleted.
145 		 */
146 		ip6stat.ip6s_badoptions++;
147 		icmp6_error(m, ICMP6_PARAM_PROB, ICMP6_PARAMPROB_HEADER,
148 			    (caddr_t)&rh0->ip6r0_len - (caddr_t)ip6);
149 		return (-1);
150 	}
151 
152 	if ((addrs = rh0->ip6r0_len / 2) < rh0->ip6r0_segleft) {
153 		ip6stat.ip6s_badoptions++;
154 		icmp6_error(m, ICMP6_PARAM_PROB, ICMP6_PARAMPROB_HEADER,
155 			    (caddr_t)&rh0->ip6r0_segleft - (caddr_t)ip6);
156 		return (-1);
157 	}
158 
159 	index = addrs - rh0->ip6r0_segleft;
160 	rh0->ip6r0_segleft--;
161 	nextaddr = rh0->ip6r0_addr + index;
162 
163 	/*
164 	 * reject invalid addresses.  be proactive about malicious use of
165 	 * IPv4 mapped/compat address.
166 	 * XXX need more checks?
167 	 */
168 	if (IN6_IS_ADDR_MULTICAST(nextaddr) ||
169 	    IN6_IS_ADDR_UNSPECIFIED(nextaddr) ||
170 	    IN6_IS_ADDR_V4MAPPED(nextaddr) ||
171 	    IN6_IS_ADDR_V4COMPAT(nextaddr)) {
172 		ip6stat.ip6s_badoptions++;
173 		m_freem(m);
174 		return (-1);
175 	}
176 	if (IN6_IS_ADDR_MULTICAST(&ip6->ip6_dst) ||
177 	    IN6_IS_ADDR_UNSPECIFIED(&ip6->ip6_dst) ||
178 	    IN6_IS_ADDR_V4MAPPED(&ip6->ip6_dst) ||
179 	    IN6_IS_ADDR_V4COMPAT(&ip6->ip6_dst)) {
180 		ip6stat.ip6s_badoptions++;
181 		m_freem(m);
182 		return (-1);
183 	}
184 
185 	/*
186 	 * Swap the IPv6 destination address and nextaddr. Forward the packet.
187 	 */
188 	tmpaddr = *nextaddr;
189 	*nextaddr = ip6->ip6_dst;
190 	if (IN6_IS_ADDR_LINKLOCAL(nextaddr))
191 		nextaddr->s6_addr16[1] = 0;
192 	ip6->ip6_dst = tmpaddr;
193 	if (IN6_IS_ADDR_LINKLOCAL(&ip6->ip6_dst))
194 		ip6->ip6_dst.s6_addr16[1] = htons(m->m_pkthdr.rcvif->if_index);
195 
196 #ifdef COMPAT_RFC1883
197 	if (rh0->ip6r0_slmap[index / 8] & (1 << (7 - (index % 8))))
198 		ip6_forward(m, IPV6_SRCRT_NEIGHBOR);
199 	else
200 		ip6_forward(m, IPV6_SRCRT_NOTNEIGHBOR);
201 #else
202 	ip6_forward(m, 1);
203 #endif
204 
205 	return (-1);			/* m would be freed in ip6_forward() */
206 }
207