if_stf.c revision 1.61 1 1.61 dyoung /* $NetBSD: if_stf.c,v 1.61 2007/09/01 04:32:51 dyoung Exp $ */
2 1.59 ad /* $KAME: if_stf.c,v 1.62 2001/06/07 22:32:16 itojun Exp $ */
3 1.1 itojun
4 1.1 itojun /*
5 1.1 itojun * Copyright (C) 2000 WIDE Project.
6 1.1 itojun * All rights reserved.
7 1.1 itojun *
8 1.1 itojun * Redistribution and use in source and binary forms, with or without
9 1.1 itojun * modification, are permitted provided that the following conditions
10 1.1 itojun * are met:
11 1.1 itojun * 1. Redistributions of source code must retain the above copyright
12 1.1 itojun * notice, this list of conditions and the following disclaimer.
13 1.1 itojun * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 itojun * notice, this list of conditions and the following disclaimer in the
15 1.1 itojun * documentation and/or other materials provided with the distribution.
16 1.1 itojun * 3. Neither the name of the project nor the names of its contributors
17 1.1 itojun * may be used to endorse or promote products derived from this software
18 1.1 itojun * without specific prior written permission.
19 1.1 itojun *
20 1.1 itojun * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
21 1.1 itojun * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 1.1 itojun * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 1.1 itojun * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
24 1.1 itojun * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 1.1 itojun * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 1.1 itojun * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 1.1 itojun * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 1.1 itojun * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 1.1 itojun * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 1.1 itojun * SUCH DAMAGE.
31 1.1 itojun */
32 1.1 itojun
33 1.1 itojun /*
34 1.11 itojun * 6to4 interface, based on RFC3056.
35 1.1 itojun *
36 1.1 itojun * 6to4 interface is NOT capable of link-layer (I mean, IPv4) multicasting.
37 1.1 itojun * There is no address mapping defined from IPv6 multicast address to IPv4
38 1.1 itojun * address. Therefore, we do not have IFF_MULTICAST on the interface.
39 1.1 itojun *
40 1.1 itojun * Due to the lack of address mapping for link-local addresses, we cannot
41 1.1 itojun * throw packets toward link-local addresses (fe80::x). Also, we cannot throw
42 1.1 itojun * packets to link-local multicast addresses (ff02::x).
43 1.1 itojun *
44 1.1 itojun * Here are interesting symptoms due to the lack of link-local address:
45 1.1 itojun *
46 1.1 itojun * Unicast routing exchange:
47 1.2 itojun * - RIPng: Impossible. Uses link-local multicast packet toward ff02::9,
48 1.1 itojun * and link-local addresses as nexthop.
49 1.1 itojun * - OSPFv6: Impossible. OSPFv6 assumes that there's link-local address
50 1.1 itojun * assigned to the link, and makes use of them. Also, HELLO packets use
51 1.1 itojun * link-local multicast addresses (ff02::5 and ff02::6).
52 1.1 itojun * - BGP4+: Maybe. You can only use global address as nexthop, and global
53 1.1 itojun * address as TCP endpoint address.
54 1.1 itojun *
55 1.1 itojun * Multicast routing protocols:
56 1.1 itojun * - PIM: Hello packet cannot be used to discover adjacent PIM routers.
57 1.1 itojun * Adjacent PIM routers must be configured manually (is it really spec-wise
58 1.1 itojun * correct thing to do?).
59 1.1 itojun *
60 1.1 itojun * ICMPv6:
61 1.1 itojun * - Redirects cannot be used due to the lack of link-local address.
62 1.1 itojun *
63 1.45 perry * stf interface does not have, and will not need, a link-local address.
64 1.11 itojun * It seems to have no real benefit and does not help the above symptoms much.
65 1.11 itojun * Even if we assign link-locals to interface, we cannot really
66 1.11 itojun * use link-local unicast/multicast on top of 6to4 cloud (since there's no
67 1.11 itojun * encapsulation defined for link-local address), and the above analysis does
68 1.11 itojun * not change. RFC3056 does not mandate the assignment of link-local address
69 1.11 itojun * either.
70 1.1 itojun *
71 1.1 itojun * 6to4 interface has security issues. Refer to
72 1.1 itojun * http://playground.iijlab.net/i-d/draft-itojun-ipv6-transition-abuse-00.txt
73 1.1 itojun * for details. The code tries to filter out some of malicious packets.
74 1.1 itojun * Note that there is no way to be 100% secure.
75 1.1 itojun */
76 1.21 lukem
77 1.21 lukem #include <sys/cdefs.h>
78 1.61 dyoung __KERNEL_RCSID(0, "$NetBSD: if_stf.c,v 1.61 2007/09/01 04:32:51 dyoung Exp $");
79 1.1 itojun
80 1.3 itojun #include "opt_inet.h"
81 1.1 itojun
82 1.1 itojun #include <sys/param.h>
83 1.1 itojun #include <sys/systm.h>
84 1.1 itojun #include <sys/socket.h>
85 1.1 itojun #include <sys/sockio.h>
86 1.1 itojun #include <sys/mbuf.h>
87 1.1 itojun #include <sys/errno.h>
88 1.1 itojun #include <sys/ioctl.h>
89 1.46 tron #include <sys/proc.h>
90 1.1 itojun #include <sys/protosw.h>
91 1.5 thorpej #include <sys/queue.h>
92 1.10 itojun #include <sys/syslog.h>
93 1.51 elad #include <sys/kauth.h>
94 1.51 elad
95 1.1 itojun #include <machine/cpu.h>
96 1.1 itojun
97 1.1 itojun #include <net/if.h>
98 1.1 itojun #include <net/route.h>
99 1.1 itojun #include <net/netisr.h>
100 1.1 itojun #include <net/if_types.h>
101 1.1 itojun #include <net/if_stf.h>
102 1.1 itojun
103 1.1 itojun #include <netinet/in.h>
104 1.1 itojun #include <netinet/in_systm.h>
105 1.1 itojun #include <netinet/ip.h>
106 1.1 itojun #include <netinet/ip_var.h>
107 1.1 itojun #include <netinet/in_var.h>
108 1.1 itojun
109 1.1 itojun #include <netinet/ip6.h>
110 1.1 itojun #include <netinet6/ip6_var.h>
111 1.1 itojun #include <netinet6/in6_gif.h>
112 1.1 itojun #include <netinet6/in6_var.h>
113 1.1 itojun #include <netinet/ip_ecn.h>
114 1.1 itojun
115 1.1 itojun #include <netinet/ip_encap.h>
116 1.1 itojun
117 1.1 itojun #include <machine/stdarg.h>
118 1.1 itojun
119 1.1 itojun #include <net/net_osdep.h>
120 1.1 itojun
121 1.1 itojun #include "bpfilter.h"
122 1.1 itojun #include "stf.h"
123 1.1 itojun #include "gif.h" /*XXX*/
124 1.1 itojun
125 1.1 itojun #if NBPFILTER > 0
126 1.1 itojun #include <net/bpf.h>
127 1.1 itojun #endif
128 1.1 itojun
129 1.1 itojun #if NGIF > 0
130 1.1 itojun #include <net/if_gif.h>
131 1.1 itojun #endif
132 1.1 itojun
133 1.1 itojun #define IN6_IS_ADDR_6TO4(x) (ntohs((x)->s6_addr16[0]) == 0x2002)
134 1.57 dyoung #define GET_V4(x) ((const struct in_addr *)(&(x)->s6_addr16[1]))
135 1.1 itojun
136 1.1 itojun struct stf_softc {
137 1.1 itojun struct ifnet sc_if; /* common area */
138 1.60 dyoung struct route sc_ro;
139 1.1 itojun const struct encaptab *encap_cookie;
140 1.5 thorpej LIST_ENTRY(stf_softc) sc_list;
141 1.1 itojun };
142 1.1 itojun
143 1.50 thorpej static LIST_HEAD(, stf_softc) stf_softc_list;
144 1.5 thorpej
145 1.50 thorpej static int stf_clone_create(struct if_clone *, int);
146 1.50 thorpej static int stf_clone_destroy(struct ifnet *);
147 1.5 thorpej
148 1.5 thorpej struct if_clone stf_cloner =
149 1.5 thorpej IF_CLONE_INITIALIZER("stf", stf_clone_create, stf_clone_destroy);
150 1.1 itojun
151 1.1 itojun #if NGIF > 0
152 1.1 itojun extern int ip_gif_ttl; /*XXX*/
153 1.1 itojun #else
154 1.1 itojun static int ip_gif_ttl = 40; /*XXX*/
155 1.1 itojun #endif
156 1.1 itojun
157 1.23 itojun extern struct domain inetdomain;
158 1.50 thorpej static const struct protosw in_stf_protosw =
159 1.23 itojun { SOCK_RAW, &inetdomain, IPPROTO_IPV6, PR_ATOMIC|PR_ADDR,
160 1.23 itojun in_stf_input, rip_output, 0, rip_ctloutput,
161 1.23 itojun rip_usrreq,
162 1.23 itojun 0, 0, 0, 0
163 1.23 itojun };
164 1.1 itojun
165 1.50 thorpej void stfattach(int);
166 1.50 thorpej
167 1.50 thorpej static int stf_encapcheck(struct mbuf *, int, int, void *);
168 1.50 thorpej static struct in6_ifaddr *stf_getsrcifa6(struct ifnet *);
169 1.57 dyoung static int stf_output(struct ifnet *, struct mbuf *, const struct sockaddr *,
170 1.50 thorpej struct rtentry *);
171 1.57 dyoung static int isrfc1918addr(const struct in_addr *);
172 1.57 dyoung static int stf_checkaddr4(struct stf_softc *, const struct in_addr *,
173 1.50 thorpej struct ifnet *);
174 1.57 dyoung static int stf_checkaddr6(struct stf_softc *, const struct in6_addr *,
175 1.50 thorpej struct ifnet *);
176 1.50 thorpej static void stf_rtrequest(int, struct rtentry *, struct rt_addrinfo *);
177 1.58 christos static int stf_ioctl(struct ifnet *, u_long, void *);
178 1.1 itojun
179 1.5 thorpej /* ARGSUSED */
180 1.1 itojun void
181 1.54 christos stfattach(int count)
182 1.5 thorpej {
183 1.5 thorpej
184 1.5 thorpej LIST_INIT(&stf_softc_list);
185 1.5 thorpej if_clone_attach(&stf_cloner);
186 1.5 thorpej }
187 1.5 thorpej
188 1.50 thorpej static int
189 1.50 thorpej stf_clone_create(struct if_clone *ifc, int unit)
190 1.1 itojun {
191 1.1 itojun struct stf_softc *sc;
192 1.1 itojun
193 1.5 thorpej if (LIST_FIRST(&stf_softc_list) != NULL) {
194 1.5 thorpej /* Only one stf interface is allowed. */
195 1.5 thorpej return (EEXIST);
196 1.5 thorpej }
197 1.5 thorpej
198 1.5 thorpej sc = malloc(sizeof(struct stf_softc), M_DEVBUF, M_WAIT);
199 1.17 thorpej memset(sc, 0, sizeof(struct stf_softc));
200 1.5 thorpej
201 1.37 itojun snprintf(sc->sc_if.if_xname, sizeof(sc->sc_if.if_xname), "%s%d",
202 1.37 itojun ifc->ifc_name, unit);
203 1.5 thorpej
204 1.5 thorpej sc->encap_cookie = encap_attach_func(AF_INET, IPPROTO_IPV6,
205 1.5 thorpej stf_encapcheck, &in_stf_protosw, sc);
206 1.5 thorpej if (sc->encap_cookie == NULL) {
207 1.5 thorpej printf("%s: unable to attach encap\n", if_name(&sc->sc_if));
208 1.5 thorpej free(sc, M_DEVBUF);
209 1.5 thorpej return (EIO); /* XXX */
210 1.5 thorpej }
211 1.5 thorpej
212 1.46 tron sc->sc_if.if_mtu = STF_MTU;
213 1.5 thorpej sc->sc_if.if_flags = 0;
214 1.5 thorpej sc->sc_if.if_ioctl = stf_ioctl;
215 1.5 thorpej sc->sc_if.if_output = stf_output;
216 1.5 thorpej sc->sc_if.if_type = IFT_STF;
217 1.7 thorpej sc->sc_if.if_dlt = DLT_NULL;
218 1.5 thorpej if_attach(&sc->sc_if);
219 1.8 thorpej if_alloc_sadl(&sc->sc_if);
220 1.1 itojun #if NBPFILTER > 0
221 1.5 thorpej bpfattach(&sc->sc_if, DLT_NULL, sizeof(u_int));
222 1.1 itojun #endif
223 1.5 thorpej LIST_INSERT_HEAD(&stf_softc_list, sc, sc_list);
224 1.5 thorpej return (0);
225 1.5 thorpej }
226 1.5 thorpej
227 1.50 thorpej static int
228 1.50 thorpej stf_clone_destroy(struct ifnet *ifp)
229 1.5 thorpej {
230 1.5 thorpej struct stf_softc *sc = (void *) ifp;
231 1.5 thorpej
232 1.5 thorpej LIST_REMOVE(sc, sc_list);
233 1.5 thorpej encap_detach(sc->encap_cookie);
234 1.5 thorpej #if NBPFILTER > 0
235 1.5 thorpej bpfdetach(ifp);
236 1.1 itojun #endif
237 1.5 thorpej if_detach(ifp);
238 1.60 dyoung rtcache_free(&sc->sc_ro);
239 1.5 thorpej free(sc, M_DEVBUF);
240 1.41 peter
241 1.41 peter return (0);
242 1.1 itojun }
243 1.1 itojun
244 1.1 itojun static int
245 1.54 christos stf_encapcheck(struct mbuf *m, int off, int proto, void *arg)
246 1.1 itojun {
247 1.1 itojun struct ip ip;
248 1.1 itojun struct in6_ifaddr *ia6;
249 1.1 itojun struct stf_softc *sc;
250 1.1 itojun struct in_addr a, b;
251 1.1 itojun
252 1.1 itojun sc = (struct stf_softc *)arg;
253 1.1 itojun if (sc == NULL)
254 1.1 itojun return 0;
255 1.1 itojun
256 1.1 itojun if ((sc->sc_if.if_flags & IFF_UP) == 0)
257 1.1 itojun return 0;
258 1.1 itojun
259 1.14 itojun /* IFF_LINK0 means "no decapsulation" */
260 1.14 itojun if ((sc->sc_if.if_flags & IFF_LINK0) != 0)
261 1.14 itojun return 0;
262 1.14 itojun
263 1.1 itojun if (proto != IPPROTO_IPV6)
264 1.1 itojun return 0;
265 1.1 itojun
266 1.58 christos m_copydata(m, 0, sizeof(ip), (void *)&ip);
267 1.1 itojun
268 1.1 itojun if (ip.ip_v != 4)
269 1.1 itojun return 0;
270 1.1 itojun
271 1.1 itojun ia6 = stf_getsrcifa6(&sc->sc_if);
272 1.1 itojun if (ia6 == NULL)
273 1.1 itojun return 0;
274 1.1 itojun
275 1.1 itojun /*
276 1.1 itojun * check if IPv4 dst matches the IPv4 address derived from the
277 1.1 itojun * local 6to4 address.
278 1.1 itojun * success on: dst = 10.1.1.1, ia6->ia_addr = 2002:0a01:0101:...
279 1.1 itojun */
280 1.1 itojun if (bcmp(GET_V4(&ia6->ia_addr.sin6_addr), &ip.ip_dst,
281 1.1 itojun sizeof(ip.ip_dst)) != 0)
282 1.1 itojun return 0;
283 1.1 itojun
284 1.1 itojun /*
285 1.1 itojun * check if IPv4 src matches the IPv4 address derived from the
286 1.1 itojun * local 6to4 address masked by prefixmask.
287 1.1 itojun * success on: src = 10.1.1.1, ia6->ia_addr = 2002:0a00:.../24
288 1.1 itojun * fail on: src = 10.1.1.1, ia6->ia_addr = 2002:0b00:.../24
289 1.1 itojun */
290 1.17 thorpej memset(&a, 0, sizeof(a));
291 1.1 itojun a.s_addr = GET_V4(&ia6->ia_addr.sin6_addr)->s_addr;
292 1.1 itojun a.s_addr &= GET_V4(&ia6->ia_prefixmask.sin6_addr)->s_addr;
293 1.1 itojun b = ip.ip_src;
294 1.1 itojun b.s_addr &= GET_V4(&ia6->ia_prefixmask.sin6_addr)->s_addr;
295 1.1 itojun if (a.s_addr != b.s_addr)
296 1.1 itojun return 0;
297 1.1 itojun
298 1.1 itojun /* stf interface makes single side match only */
299 1.1 itojun return 32;
300 1.1 itojun }
301 1.1 itojun
302 1.1 itojun static struct in6_ifaddr *
303 1.50 thorpej stf_getsrcifa6(struct ifnet *ifp)
304 1.1 itojun {
305 1.44 matt struct ifaddr *ifa;
306 1.1 itojun struct in_ifaddr *ia4;
307 1.1 itojun struct sockaddr_in6 *sin6;
308 1.1 itojun struct in_addr in;
309 1.1 itojun
310 1.44 matt IFADDR_FOREACH(ifa, ifp)
311 1.1 itojun {
312 1.44 matt if (ifa->ifa_addr == NULL)
313 1.1 itojun continue;
314 1.44 matt if (ifa->ifa_addr->sa_family != AF_INET6)
315 1.1 itojun continue;
316 1.44 matt sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
317 1.1 itojun if (!IN6_IS_ADDR_6TO4(&sin6->sin6_addr))
318 1.1 itojun continue;
319 1.1 itojun
320 1.1 itojun bcopy(GET_V4(&sin6->sin6_addr), &in, sizeof(in));
321 1.1 itojun INADDR_TO_IA(in, ia4);
322 1.1 itojun if (ia4 == NULL)
323 1.1 itojun continue;
324 1.1 itojun
325 1.44 matt return (struct in6_ifaddr *)ifa;
326 1.1 itojun }
327 1.1 itojun
328 1.1 itojun return NULL;
329 1.1 itojun }
330 1.1 itojun
331 1.1 itojun static int
332 1.57 dyoung stf_output(struct ifnet *ifp, struct mbuf *m, const struct sockaddr *dst,
333 1.54 christos struct rtentry *rt)
334 1.1 itojun {
335 1.1 itojun struct stf_softc *sc;
336 1.57 dyoung const struct sockaddr_in6 *dst6;
337 1.57 dyoung const struct in_addr *in4;
338 1.1 itojun u_int8_t tos;
339 1.1 itojun struct ip *ip;
340 1.1 itojun struct ip6_hdr *ip6;
341 1.1 itojun struct in6_ifaddr *ia6;
342 1.60 dyoung union {
343 1.60 dyoung struct sockaddr dst;
344 1.60 dyoung struct sockaddr_in dst4;
345 1.60 dyoung } u;
346 1.1 itojun
347 1.1 itojun sc = (struct stf_softc*)ifp;
348 1.57 dyoung dst6 = (const struct sockaddr_in6 *)dst;
349 1.1 itojun
350 1.1 itojun /* just in case */
351 1.1 itojun if ((ifp->if_flags & IFF_UP) == 0) {
352 1.1 itojun m_freem(m);
353 1.1 itojun return ENETDOWN;
354 1.1 itojun }
355 1.1 itojun
356 1.1 itojun /*
357 1.1 itojun * If we don't have an ip4 address that match my inner ip6 address,
358 1.1 itojun * we shouldn't generate output. Without this check, we'll end up
359 1.1 itojun * using wrong IPv4 source.
360 1.1 itojun */
361 1.1 itojun ia6 = stf_getsrcifa6(ifp);
362 1.1 itojun if (ia6 == NULL) {
363 1.1 itojun m_freem(m);
364 1.26 tron ifp->if_oerrors++;
365 1.1 itojun return ENETDOWN;
366 1.1 itojun }
367 1.1 itojun
368 1.1 itojun if (m->m_len < sizeof(*ip6)) {
369 1.1 itojun m = m_pullup(m, sizeof(*ip6));
370 1.26 tron if (m == NULL) {
371 1.26 tron ifp->if_oerrors++;
372 1.1 itojun return ENOBUFS;
373 1.26 tron }
374 1.1 itojun }
375 1.1 itojun ip6 = mtod(m, struct ip6_hdr *);
376 1.1 itojun tos = (ntohl(ip6->ip6_flow) >> 20) & 0xff;
377 1.1 itojun
378 1.14 itojun /*
379 1.14 itojun * Pickup the right outer dst addr from the list of candidates.
380 1.14 itojun * ip6_dst has priority as it may be able to give us shorter IPv4 hops.
381 1.14 itojun */
382 1.14 itojun if (IN6_IS_ADDR_6TO4(&ip6->ip6_dst))
383 1.14 itojun in4 = GET_V4(&ip6->ip6_dst);
384 1.14 itojun else if (IN6_IS_ADDR_6TO4(&dst6->sin6_addr))
385 1.14 itojun in4 = GET_V4(&dst6->sin6_addr);
386 1.14 itojun else {
387 1.14 itojun m_freem(m);
388 1.26 tron ifp->if_oerrors++;
389 1.14 itojun return ENETUNREACH;
390 1.14 itojun }
391 1.16 itojun
392 1.16 itojun #if NBPFILTER > 0
393 1.40 christos if (ifp->if_bpf)
394 1.40 christos bpf_mtap_af(ifp->if_bpf, AF_INET6, m);
395 1.16 itojun #endif /*NBPFILTER > 0*/
396 1.14 itojun
397 1.1 itojun M_PREPEND(m, sizeof(struct ip), M_DONTWAIT);
398 1.1 itojun if (m && m->m_len < sizeof(struct ip))
399 1.1 itojun m = m_pullup(m, sizeof(struct ip));
400 1.26 tron if (m == NULL) {
401 1.26 tron ifp->if_oerrors++;
402 1.1 itojun return ENOBUFS;
403 1.26 tron }
404 1.1 itojun ip = mtod(m, struct ip *);
405 1.1 itojun
406 1.17 thorpej memset(ip, 0, sizeof(*ip));
407 1.1 itojun
408 1.1 itojun bcopy(GET_V4(&((struct sockaddr_in6 *)&ia6->ia_addr)->sin6_addr),
409 1.1 itojun &ip->ip_src, sizeof(ip->ip_src));
410 1.14 itojun bcopy(in4, &ip->ip_dst, sizeof(ip->ip_dst));
411 1.1 itojun ip->ip_p = IPPROTO_IPV6;
412 1.1 itojun ip->ip_ttl = ip_gif_ttl; /*XXX*/
413 1.29 itojun ip->ip_len = htons(m->m_pkthdr.len);
414 1.1 itojun if (ifp->if_flags & IFF_LINK1)
415 1.1 itojun ip_ecn_ingress(ECN_ALLOWED, &ip->ip_tos, &tos);
416 1.15 itojun else
417 1.15 itojun ip_ecn_ingress(ECN_NOCARE, &ip->ip_tos, &tos);
418 1.1 itojun
419 1.60 dyoung sockaddr_in_init(&u.dst4, &ip->ip_dst, 0);
420 1.60 dyoung if (rtcache_lookup(&sc->sc_ro, &u.dst) == NULL) {
421 1.60 dyoung m_freem(m);
422 1.60 dyoung ifp->if_oerrors++;
423 1.60 dyoung return ENETUNREACH;
424 1.1 itojun }
425 1.1 itojun
426 1.56 joerg /* If the route constitutes infinite encapsulation, punt. */
427 1.56 joerg if (sc->sc_ro.ro_rt->rt_ifp == ifp) {
428 1.56 joerg rtcache_free(&sc->sc_ro);
429 1.56 joerg m_freem(m);
430 1.56 joerg ifp->if_oerrors++;
431 1.56 joerg return ENETUNREACH;
432 1.56 joerg }
433 1.56 joerg
434 1.25 tron ifp->if_opackets++;
435 1.60 dyoung return ip_output(m, NULL, &sc->sc_ro, 0, NULL, NULL);
436 1.1 itojun }
437 1.1 itojun
438 1.1 itojun static int
439 1.57 dyoung isrfc1918addr(const struct in_addr *in)
440 1.30 itojun {
441 1.30 itojun /*
442 1.30 itojun * returns 1 if private address range:
443 1.30 itojun * 10.0.0.0/8 172.16.0.0/12 192.168.0.0/16
444 1.30 itojun */
445 1.30 itojun if ((ntohl(in->s_addr) & 0xff000000) >> 24 == 10 ||
446 1.30 itojun (ntohl(in->s_addr) & 0xfff00000) >> 16 == 172 * 256 + 16 ||
447 1.30 itojun (ntohl(in->s_addr) & 0xffff0000) >> 16 == 192 * 256 + 168)
448 1.30 itojun return 1;
449 1.30 itojun
450 1.30 itojun return 0;
451 1.30 itojun }
452 1.30 itojun
453 1.30 itojun static int
454 1.57 dyoung stf_checkaddr4(struct stf_softc *sc, const struct in_addr *in,
455 1.50 thorpej struct ifnet *inifp /*incoming interface*/)
456 1.1 itojun {
457 1.1 itojun struct in_ifaddr *ia4;
458 1.1 itojun
459 1.1 itojun /*
460 1.1 itojun * reject packets with the following address:
461 1.3 itojun * 224.0.0.0/4 0.0.0.0/8 127.0.0.0/8 255.0.0.0/8
462 1.1 itojun */
463 1.3 itojun if (IN_MULTICAST(in->s_addr))
464 1.3 itojun return -1;
465 1.3 itojun switch ((ntohl(in->s_addr) & 0xff000000) >> 24) {
466 1.3 itojun case 0: case 127: case 255:
467 1.1 itojun return -1;
468 1.1 itojun }
469 1.24 itojun
470 1.24 itojun /*
471 1.30 itojun * reject packets with private address range.
472 1.30 itojun * (requirement from RFC3056 section 2 1st paragraph)
473 1.24 itojun */
474 1.30 itojun if (isrfc1918addr(in))
475 1.24 itojun return -1;
476 1.1 itojun
477 1.1 itojun /*
478 1.32 itojun * reject packet with IPv4 link-local (169.254.0.0/16),
479 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
480 1.32 itojun */
481 1.32 itojun if (((ntohl(in->s_addr) & 0xff000000) >> 24) == 169 &&
482 1.32 itojun ((ntohl(in->s_addr) & 0x00ff0000) >> 16) == 254)
483 1.32 itojun return -1;
484 1.32 itojun
485 1.32 itojun /*
486 1.1 itojun * reject packets with broadcast
487 1.1 itojun */
488 1.36 cl TAILQ_FOREACH(ia4, &in_ifaddrhead, ia_list)
489 1.1 itojun {
490 1.1 itojun if ((ia4->ia_ifa.ifa_ifp->if_flags & IFF_BROADCAST) == 0)
491 1.1 itojun continue;
492 1.1 itojun if (in->s_addr == ia4->ia_broadaddr.sin_addr.s_addr)
493 1.1 itojun return -1;
494 1.1 itojun }
495 1.1 itojun
496 1.1 itojun /*
497 1.1 itojun * perform ingress filter
498 1.1 itojun */
499 1.10 itojun if (sc && (sc->sc_if.if_flags & IFF_LINK2) == 0 && inifp) {
500 1.1 itojun struct sockaddr_in sin;
501 1.1 itojun struct rtentry *rt;
502 1.1 itojun
503 1.17 thorpej memset(&sin, 0, sizeof(sin));
504 1.1 itojun sin.sin_family = AF_INET;
505 1.1 itojun sin.sin_len = sizeof(struct sockaddr_in);
506 1.1 itojun sin.sin_addr = *in;
507 1.1 itojun rt = rtalloc1((struct sockaddr *)&sin, 0);
508 1.10 itojun if (!rt || rt->rt_ifp != inifp) {
509 1.10 itojun #if 0
510 1.10 itojun log(LOG_WARNING, "%s: packet from 0x%x dropped "
511 1.10 itojun "due to ingress filter\n", if_name(&sc->sc_if),
512 1.10 itojun (u_int32_t)ntohl(sin.sin_addr.s_addr));
513 1.10 itojun #endif
514 1.10 itojun if (rt)
515 1.10 itojun rtfree(rt);
516 1.1 itojun return -1;
517 1.1 itojun }
518 1.1 itojun rtfree(rt);
519 1.1 itojun }
520 1.1 itojun
521 1.1 itojun return 0;
522 1.1 itojun }
523 1.1 itojun
524 1.1 itojun static int
525 1.57 dyoung stf_checkaddr6(struct stf_softc *sc, const struct in6_addr *in6,
526 1.50 thorpej struct ifnet *inifp /*incoming interface*/)
527 1.1 itojun {
528 1.32 itojun
529 1.1 itojun /*
530 1.1 itojun * check 6to4 addresses
531 1.1 itojun */
532 1.1 itojun if (IN6_IS_ADDR_6TO4(in6))
533 1.10 itojun return stf_checkaddr4(sc, GET_V4(in6), inifp);
534 1.1 itojun
535 1.1 itojun /*
536 1.1 itojun * reject anything that look suspicious. the test is implemented
537 1.1 itojun * in ip6_input too, but we check here as well to
538 1.1 itojun * (1) reject bad packets earlier, and
539 1.1 itojun * (2) to be safe against future ip6_input change.
540 1.1 itojun */
541 1.1 itojun if (IN6_IS_ADDR_V4COMPAT(in6) || IN6_IS_ADDR_V4MAPPED(in6))
542 1.32 itojun return -1;
543 1.32 itojun
544 1.32 itojun /*
545 1.32 itojun * reject link-local and site-local unicast
546 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
547 1.32 itojun */
548 1.32 itojun if (IN6_IS_ADDR_LINKLOCAL(in6) || IN6_IS_ADDR_SITELOCAL(in6))
549 1.32 itojun return -1;
550 1.32 itojun
551 1.32 itojun /*
552 1.32 itojun * reject node-local and link-local multicast
553 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
554 1.32 itojun */
555 1.32 itojun if (IN6_IS_ADDR_MC_NODELOCAL(in6) || IN6_IS_ADDR_MC_LINKLOCAL(in6))
556 1.1 itojun return -1;
557 1.1 itojun
558 1.1 itojun return 0;
559 1.1 itojun }
560 1.1 itojun
561 1.1 itojun void
562 1.1 itojun in_stf_input(struct mbuf *m, ...)
563 1.1 itojun {
564 1.1 itojun int off, proto;
565 1.1 itojun struct stf_softc *sc;
566 1.1 itojun struct ip *ip;
567 1.1 itojun struct ip6_hdr *ip6;
568 1.1 itojun u_int8_t otos, itos;
569 1.1 itojun int s, isr;
570 1.1 itojun struct ifqueue *ifq = NULL;
571 1.1 itojun struct ifnet *ifp;
572 1.1 itojun va_list ap;
573 1.1 itojun
574 1.1 itojun va_start(ap, m);
575 1.1 itojun off = va_arg(ap, int);
576 1.1 itojun proto = va_arg(ap, int);
577 1.1 itojun va_end(ap);
578 1.1 itojun
579 1.1 itojun if (proto != IPPROTO_IPV6) {
580 1.1 itojun m_freem(m);
581 1.1 itojun return;
582 1.1 itojun }
583 1.1 itojun
584 1.1 itojun ip = mtod(m, struct ip *);
585 1.1 itojun
586 1.1 itojun sc = (struct stf_softc *)encap_getarg(m);
587 1.1 itojun
588 1.1 itojun if (sc == NULL || (sc->sc_if.if_flags & IFF_UP) == 0) {
589 1.1 itojun m_freem(m);
590 1.1 itojun return;
591 1.1 itojun }
592 1.1 itojun
593 1.1 itojun ifp = &sc->sc_if;
594 1.1 itojun
595 1.1 itojun /*
596 1.1 itojun * perform sanity check against outer src/dst.
597 1.1 itojun * for source, perform ingress filter as well.
598 1.1 itojun */
599 1.10 itojun if (stf_checkaddr4(sc, &ip->ip_dst, NULL) < 0 ||
600 1.10 itojun stf_checkaddr4(sc, &ip->ip_src, m->m_pkthdr.rcvif) < 0) {
601 1.1 itojun m_freem(m);
602 1.1 itojun return;
603 1.1 itojun }
604 1.1 itojun
605 1.1 itojun otos = ip->ip_tos;
606 1.1 itojun m_adj(m, off);
607 1.1 itojun
608 1.1 itojun if (m->m_len < sizeof(*ip6)) {
609 1.1 itojun m = m_pullup(m, sizeof(*ip6));
610 1.1 itojun if (!m)
611 1.1 itojun return;
612 1.1 itojun }
613 1.1 itojun ip6 = mtod(m, struct ip6_hdr *);
614 1.1 itojun
615 1.1 itojun /*
616 1.1 itojun * perform sanity check against inner src/dst.
617 1.1 itojun * for source, perform ingress filter as well.
618 1.1 itojun */
619 1.10 itojun if (stf_checkaddr6(sc, &ip6->ip6_dst, NULL) < 0 ||
620 1.10 itojun stf_checkaddr6(sc, &ip6->ip6_src, m->m_pkthdr.rcvif) < 0) {
621 1.1 itojun m_freem(m);
622 1.1 itojun return;
623 1.1 itojun }
624 1.1 itojun
625 1.1 itojun itos = (ntohl(ip6->ip6_flow) >> 20) & 0xff;
626 1.1 itojun if ((ifp->if_flags & IFF_LINK1) != 0)
627 1.1 itojun ip_ecn_egress(ECN_ALLOWED, &otos, &itos);
628 1.15 itojun else
629 1.15 itojun ip_ecn_egress(ECN_NOCARE, &otos, &itos);
630 1.1 itojun ip6->ip6_flow &= ~htonl(0xff << 20);
631 1.1 itojun ip6->ip6_flow |= htonl((u_int32_t)itos << 20);
632 1.1 itojun
633 1.1 itojun m->m_pkthdr.rcvif = ifp;
634 1.45 perry
635 1.1 itojun #if NBPFILTER > 0
636 1.40 christos if (ifp->if_bpf)
637 1.40 christos bpf_mtap_af(ifp->if_bpf, AF_INET6, m);
638 1.1 itojun #endif /*NBPFILTER > 0*/
639 1.1 itojun
640 1.1 itojun /*
641 1.1 itojun * Put the packet to the network layer input queue according to the
642 1.1 itojun * specified address family.
643 1.1 itojun * See net/if_gif.c for possible issues with packet processing
644 1.1 itojun * reorder due to extra queueing.
645 1.1 itojun */
646 1.1 itojun ifq = &ip6intrq;
647 1.1 itojun isr = NETISR_IPV6;
648 1.1 itojun
649 1.13 thorpej s = splnet();
650 1.1 itojun if (IF_QFULL(ifq)) {
651 1.1 itojun IF_DROP(ifq); /* update statistics */
652 1.1 itojun m_freem(m);
653 1.1 itojun splx(s);
654 1.1 itojun return;
655 1.1 itojun }
656 1.1 itojun IF_ENQUEUE(ifq, m);
657 1.1 itojun schednetisr(isr);
658 1.1 itojun ifp->if_ipackets++;
659 1.1 itojun ifp->if_ibytes += m->m_pkthdr.len;
660 1.1 itojun splx(s);
661 1.1 itojun }
662 1.1 itojun
663 1.1 itojun /* ARGSUSED */
664 1.1 itojun static void
665 1.54 christos stf_rtrequest(int cmd, struct rtentry *rt,
666 1.54 christos struct rt_addrinfo *info)
667 1.1 itojun {
668 1.46 tron if (rt != NULL) {
669 1.46 tron struct stf_softc *sc;
670 1.1 itojun
671 1.46 tron sc = LIST_FIRST(&stf_softc_list);
672 1.46 tron rt->rt_rmx.rmx_mtu = (sc != NULL) ? sc->sc_if.if_mtu : STF_MTU;
673 1.46 tron }
674 1.1 itojun }
675 1.1 itojun
676 1.1 itojun static int
677 1.58 christos stf_ioctl(struct ifnet *ifp, u_long cmd, void *data)
678 1.1 itojun {
679 1.52 ad struct lwp *l = curlwp; /* XXX */
680 1.46 tron struct ifaddr *ifa;
681 1.46 tron struct ifreq *ifr;
682 1.46 tron struct sockaddr_in6 *sin6;
683 1.46 tron int error;
684 1.46 tron u_long mtu;
685 1.1 itojun
686 1.1 itojun error = 0;
687 1.1 itojun switch (cmd) {
688 1.1 itojun case SIOCSIFADDR:
689 1.1 itojun ifa = (struct ifaddr *)data;
690 1.1 itojun if (ifa == NULL || ifa->ifa_addr->sa_family != AF_INET6) {
691 1.1 itojun error = EAFNOSUPPORT;
692 1.1 itojun break;
693 1.1 itojun }
694 1.1 itojun sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
695 1.30 itojun if (IN6_IS_ADDR_6TO4(&sin6->sin6_addr) &&
696 1.30 itojun !isrfc1918addr(GET_V4(&sin6->sin6_addr))) {
697 1.1 itojun ifa->ifa_rtrequest = stf_rtrequest;
698 1.1 itojun ifp->if_flags |= IFF_UP;
699 1.1 itojun } else
700 1.1 itojun error = EINVAL;
701 1.1 itojun break;
702 1.1 itojun
703 1.1 itojun case SIOCADDMULTI:
704 1.1 itojun case SIOCDELMULTI:
705 1.1 itojun ifr = (struct ifreq *)data;
706 1.61 dyoung if (ifr != NULL &&
707 1.61 dyoung ifreq_getaddr(cmd, ifr)->sa_family == AF_INET6)
708 1.1 itojun ;
709 1.1 itojun else
710 1.1 itojun error = EAFNOSUPPORT;
711 1.1 itojun break;
712 1.1 itojun
713 1.46 tron case SIOCSIFMTU:
714 1.52 ad if ((error = kauth_authorize_generic(l->l_cred,
715 1.59 ad KAUTH_GENERIC_ISSUSER, NULL)) != 0)
716 1.46 tron break;
717 1.46 tron ifr = (struct ifreq *)data;
718 1.46 tron mtu = ifr->ifr_mtu;
719 1.46 tron if (mtu < STF_MTU_MIN || mtu > STF_MTU_MAX)
720 1.46 tron return EINVAL;
721 1.46 tron ifp->if_mtu = mtu;
722 1.46 tron break;
723 1.46 tron
724 1.1 itojun default:
725 1.1 itojun error = EINVAL;
726 1.1 itojun break;
727 1.1 itojun }
728 1.1 itojun
729 1.1 itojun return error;
730 1.1 itojun }
731