if_stf.c revision 1.101 1 1.101 ozaki /* $NetBSD: if_stf.c,v 1.101 2016/12/12 03:55:57 ozaki-r 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.101 ozaki __KERNEL_RCSID(0, "$NetBSD: if_stf.c,v 1.101 2016/12/12 03:55:57 ozaki-r Exp $");
79 1.1 itojun
80 1.82 pooka #ifdef _KERNEL_OPT
81 1.3 itojun #include "opt_inet.h"
82 1.98 christos #include "stf.h"
83 1.82 pooka #endif
84 1.82 pooka
85 1.80 christos #ifndef INET6
86 1.80 christos #error "pseudo-device stf requires options INET6"
87 1.80 christos #endif
88 1.1 itojun
89 1.1 itojun #include <sys/param.h>
90 1.1 itojun #include <sys/systm.h>
91 1.1 itojun #include <sys/socket.h>
92 1.1 itojun #include <sys/sockio.h>
93 1.1 itojun #include <sys/mbuf.h>
94 1.1 itojun #include <sys/errno.h>
95 1.1 itojun #include <sys/ioctl.h>
96 1.46 tron #include <sys/proc.h>
97 1.5 thorpej #include <sys/queue.h>
98 1.10 itojun #include <sys/syslog.h>
99 1.98 christos #include <sys/device.h>
100 1.98 christos #include <sys/module.h>
101 1.51 elad
102 1.62 ad #include <sys/cpu.h>
103 1.1 itojun
104 1.1 itojun #include <net/if.h>
105 1.1 itojun #include <net/route.h>
106 1.1 itojun #include <net/netisr.h>
107 1.1 itojun #include <net/if_types.h>
108 1.1 itojun #include <net/if_stf.h>
109 1.1 itojun
110 1.1 itojun #include <netinet/in.h>
111 1.1 itojun #include <netinet/in_systm.h>
112 1.1 itojun #include <netinet/ip.h>
113 1.1 itojun #include <netinet/ip_var.h>
114 1.1 itojun #include <netinet/in_var.h>
115 1.1 itojun
116 1.1 itojun #include <netinet/ip6.h>
117 1.1 itojun #include <netinet6/ip6_var.h>
118 1.1 itojun #include <netinet6/in6_var.h>
119 1.1 itojun #include <netinet/ip_ecn.h>
120 1.1 itojun
121 1.1 itojun #include <netinet/ip_encap.h>
122 1.1 itojun
123 1.1 itojun #include <net/net_osdep.h>
124 1.1 itojun
125 1.1 itojun #include <net/bpf.h>
126 1.1 itojun
127 1.81 christos #include "ioconf.h"
128 1.81 christos
129 1.1 itojun #define IN6_IS_ADDR_6TO4(x) (ntohs((x)->s6_addr16[0]) == 0x2002)
130 1.57 dyoung #define GET_V4(x) ((const struct in_addr *)(&(x)->s6_addr16[1]))
131 1.1 itojun
132 1.1 itojun struct stf_softc {
133 1.1 itojun struct ifnet sc_if; /* common area */
134 1.60 dyoung struct route sc_ro;
135 1.1 itojun const struct encaptab *encap_cookie;
136 1.5 thorpej LIST_ENTRY(stf_softc) sc_list;
137 1.1 itojun };
138 1.1 itojun
139 1.50 thorpej static LIST_HEAD(, stf_softc) stf_softc_list;
140 1.5 thorpej
141 1.50 thorpej static int stf_clone_create(struct if_clone *, int);
142 1.50 thorpej static int stf_clone_destroy(struct ifnet *);
143 1.5 thorpej
144 1.5 thorpej struct if_clone stf_cloner =
145 1.5 thorpej IF_CLONE_INITIALIZER("stf", stf_clone_create, stf_clone_destroy);
146 1.1 itojun
147 1.99 knakahar static int ip_stf_ttl = STF_TTL;
148 1.1 itojun
149 1.85 riastrad extern struct domain inetdomain;
150 1.85 riastrad
151 1.86 knakahar static const struct encapsw in_stf_encapsw =
152 1.85 riastrad {
153 1.87 knakahar .encapsw4 = {
154 1.86 knakahar .pr_input = in_stf_input,
155 1.86 knakahar .pr_ctlinput = NULL,
156 1.86 knakahar }
157 1.23 itojun };
158 1.1 itojun
159 1.50 thorpej static int stf_encapcheck(struct mbuf *, int, int, void *);
160 1.50 thorpej static struct in6_ifaddr *stf_getsrcifa6(struct ifnet *);
161 1.57 dyoung static int stf_output(struct ifnet *, struct mbuf *, const struct sockaddr *,
162 1.88 ozaki const struct rtentry *);
163 1.57 dyoung static int isrfc1918addr(const struct in_addr *);
164 1.57 dyoung static int stf_checkaddr4(struct stf_softc *, const struct in_addr *,
165 1.50 thorpej struct ifnet *);
166 1.57 dyoung static int stf_checkaddr6(struct stf_softc *, const struct in6_addr *,
167 1.50 thorpej struct ifnet *);
168 1.67 dyoung static void stf_rtrequest(int, struct rtentry *, const struct rt_addrinfo *);
169 1.58 christos static int stf_ioctl(struct ifnet *, u_long, void *);
170 1.1 itojun
171 1.5 thorpej /* ARGSUSED */
172 1.1 itojun void
173 1.54 christos stfattach(int count)
174 1.5 thorpej {
175 1.5 thorpej
176 1.98 christos /*
177 1.98 christos * Nothing to do here, initialization is handled by the
178 1.98 christos * module initialization code in stfinit() below).
179 1.98 christos */
180 1.98 christos }
181 1.98 christos
182 1.98 christos static void
183 1.98 christos stfinit(void)
184 1.98 christos {
185 1.98 christos
186 1.5 thorpej LIST_INIT(&stf_softc_list);
187 1.5 thorpej if_clone_attach(&stf_cloner);
188 1.5 thorpej }
189 1.5 thorpej
190 1.50 thorpej static int
191 1.98 christos stfdetach(void)
192 1.98 christos {
193 1.98 christos int error = 0;
194 1.98 christos
195 1.98 christos if (!LIST_EMPTY(&stf_softc_list))
196 1.98 christos error = EBUSY;
197 1.98 christos
198 1.98 christos if (error == 0)
199 1.98 christos if_clone_detach(&stf_cloner);
200 1.98 christos
201 1.98 christos return error;
202 1.98 christos }
203 1.98 christos
204 1.98 christos static int
205 1.50 thorpej stf_clone_create(struct if_clone *ifc, int unit)
206 1.1 itojun {
207 1.1 itojun struct stf_softc *sc;
208 1.93 knakahar int error;
209 1.1 itojun
210 1.92 knakahar sc = malloc(sizeof(struct stf_softc), M_DEVBUF, M_WAIT|M_ZERO);
211 1.92 knakahar if_initname(&sc->sc_if, ifc->ifc_name, unit);
212 1.92 knakahar
213 1.93 knakahar error = encap_lock_enter();
214 1.93 knakahar if (error) {
215 1.93 knakahar free(sc, M_DEVBUF);
216 1.93 knakahar return error;
217 1.93 knakahar }
218 1.93 knakahar
219 1.5 thorpej if (LIST_FIRST(&stf_softc_list) != NULL) {
220 1.5 thorpej /* Only one stf interface is allowed. */
221 1.92 knakahar encap_lock_exit();
222 1.92 knakahar free(sc, M_DEVBUF);
223 1.5 thorpej return (EEXIST);
224 1.5 thorpej }
225 1.5 thorpej
226 1.5 thorpej sc->encap_cookie = encap_attach_func(AF_INET, IPPROTO_IPV6,
227 1.86 knakahar stf_encapcheck, &in_stf_encapsw, sc);
228 1.92 knakahar encap_lock_exit();
229 1.5 thorpej if (sc->encap_cookie == NULL) {
230 1.5 thorpej printf("%s: unable to attach encap\n", if_name(&sc->sc_if));
231 1.5 thorpej free(sc, M_DEVBUF);
232 1.5 thorpej return (EIO); /* XXX */
233 1.5 thorpej }
234 1.5 thorpej
235 1.46 tron sc->sc_if.if_mtu = STF_MTU;
236 1.5 thorpej sc->sc_if.if_flags = 0;
237 1.5 thorpej sc->sc_if.if_ioctl = stf_ioctl;
238 1.5 thorpej sc->sc_if.if_output = stf_output;
239 1.5 thorpej sc->sc_if.if_type = IFT_STF;
240 1.7 thorpej sc->sc_if.if_dlt = DLT_NULL;
241 1.5 thorpej if_attach(&sc->sc_if);
242 1.8 thorpej if_alloc_sadl(&sc->sc_if);
243 1.75 joerg bpf_attach(&sc->sc_if, DLT_NULL, sizeof(u_int));
244 1.5 thorpej LIST_INSERT_HEAD(&stf_softc_list, sc, sc_list);
245 1.5 thorpej return (0);
246 1.5 thorpej }
247 1.5 thorpej
248 1.50 thorpej static int
249 1.50 thorpej stf_clone_destroy(struct ifnet *ifp)
250 1.5 thorpej {
251 1.5 thorpej struct stf_softc *sc = (void *) ifp;
252 1.5 thorpej
253 1.92 knakahar encap_lock_enter();
254 1.5 thorpej LIST_REMOVE(sc, sc_list);
255 1.5 thorpej encap_detach(sc->encap_cookie);
256 1.92 knakahar encap_lock_exit();
257 1.75 joerg bpf_detach(ifp);
258 1.5 thorpej if_detach(ifp);
259 1.60 dyoung rtcache_free(&sc->sc_ro);
260 1.5 thorpej free(sc, M_DEVBUF);
261 1.41 peter
262 1.41 peter return (0);
263 1.1 itojun }
264 1.1 itojun
265 1.1 itojun static int
266 1.54 christos stf_encapcheck(struct mbuf *m, int off, int proto, void *arg)
267 1.1 itojun {
268 1.1 itojun struct ip ip;
269 1.1 itojun struct in6_ifaddr *ia6;
270 1.1 itojun struct stf_softc *sc;
271 1.1 itojun struct in_addr a, b;
272 1.1 itojun
273 1.1 itojun sc = (struct stf_softc *)arg;
274 1.1 itojun if (sc == NULL)
275 1.1 itojun return 0;
276 1.1 itojun
277 1.1 itojun if ((sc->sc_if.if_flags & IFF_UP) == 0)
278 1.1 itojun return 0;
279 1.1 itojun
280 1.14 itojun /* IFF_LINK0 means "no decapsulation" */
281 1.14 itojun if ((sc->sc_if.if_flags & IFF_LINK0) != 0)
282 1.14 itojun return 0;
283 1.14 itojun
284 1.1 itojun if (proto != IPPROTO_IPV6)
285 1.1 itojun return 0;
286 1.1 itojun
287 1.58 christos m_copydata(m, 0, sizeof(ip), (void *)&ip);
288 1.1 itojun
289 1.1 itojun if (ip.ip_v != 4)
290 1.1 itojun return 0;
291 1.1 itojun
292 1.1 itojun ia6 = stf_getsrcifa6(&sc->sc_if);
293 1.1 itojun if (ia6 == NULL)
294 1.1 itojun return 0;
295 1.1 itojun
296 1.1 itojun /*
297 1.1 itojun * check if IPv4 dst matches the IPv4 address derived from the
298 1.1 itojun * local 6to4 address.
299 1.1 itojun * success on: dst = 10.1.1.1, ia6->ia_addr = 2002:0a01:0101:...
300 1.1 itojun */
301 1.69 cegger if (memcmp(GET_V4(&ia6->ia_addr.sin6_addr), &ip.ip_dst,
302 1.1 itojun sizeof(ip.ip_dst)) != 0)
303 1.1 itojun return 0;
304 1.1 itojun
305 1.1 itojun /*
306 1.1 itojun * check if IPv4 src matches the IPv4 address derived from the
307 1.1 itojun * local 6to4 address masked by prefixmask.
308 1.1 itojun * success on: src = 10.1.1.1, ia6->ia_addr = 2002:0a00:.../24
309 1.1 itojun * fail on: src = 10.1.1.1, ia6->ia_addr = 2002:0b00:.../24
310 1.1 itojun */
311 1.17 thorpej memset(&a, 0, sizeof(a));
312 1.1 itojun a.s_addr = GET_V4(&ia6->ia_addr.sin6_addr)->s_addr;
313 1.1 itojun a.s_addr &= GET_V4(&ia6->ia_prefixmask.sin6_addr)->s_addr;
314 1.1 itojun b = ip.ip_src;
315 1.1 itojun b.s_addr &= GET_V4(&ia6->ia_prefixmask.sin6_addr)->s_addr;
316 1.1 itojun if (a.s_addr != b.s_addr)
317 1.1 itojun return 0;
318 1.1 itojun
319 1.1 itojun /* stf interface makes single side match only */
320 1.1 itojun return 32;
321 1.1 itojun }
322 1.1 itojun
323 1.1 itojun static struct in6_ifaddr *
324 1.50 thorpej stf_getsrcifa6(struct ifnet *ifp)
325 1.1 itojun {
326 1.44 matt struct ifaddr *ifa;
327 1.1 itojun struct in_ifaddr *ia4;
328 1.1 itojun struct sockaddr_in6 *sin6;
329 1.1 itojun struct in_addr in;
330 1.97 ozaki int s;
331 1.1 itojun
332 1.97 ozaki s = pserialize_read_enter();
333 1.97 ozaki IFADDR_READER_FOREACH(ifa, ifp) {
334 1.44 matt if (ifa->ifa_addr->sa_family != AF_INET6)
335 1.1 itojun continue;
336 1.44 matt sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
337 1.1 itojun if (!IN6_IS_ADDR_6TO4(&sin6->sin6_addr))
338 1.1 itojun continue;
339 1.1 itojun
340 1.72 tsutsui memcpy(&in, GET_V4(&sin6->sin6_addr), sizeof(in));
341 1.96 ozaki ia4 = in_get_ia(in);
342 1.1 itojun if (ia4 == NULL)
343 1.1 itojun continue;
344 1.1 itojun
345 1.97 ozaki pserialize_read_exit(s);
346 1.97 ozaki /* TODO NOMPSAFE */
347 1.44 matt return (struct in6_ifaddr *)ifa;
348 1.1 itojun }
349 1.97 ozaki pserialize_read_exit(s);
350 1.1 itojun
351 1.1 itojun return NULL;
352 1.1 itojun }
353 1.1 itojun
354 1.1 itojun static int
355 1.57 dyoung stf_output(struct ifnet *ifp, struct mbuf *m, const struct sockaddr *dst,
356 1.88 ozaki const struct rtentry *rt0)
357 1.1 itojun {
358 1.63 dyoung struct rtentry *rt;
359 1.1 itojun struct stf_softc *sc;
360 1.57 dyoung const struct sockaddr_in6 *dst6;
361 1.57 dyoung const struct in_addr *in4;
362 1.65 matt uint8_t tos;
363 1.1 itojun struct ip *ip;
364 1.1 itojun struct ip6_hdr *ip6;
365 1.1 itojun struct in6_ifaddr *ia6;
366 1.60 dyoung union {
367 1.60 dyoung struct sockaddr dst;
368 1.60 dyoung struct sockaddr_in dst4;
369 1.60 dyoung } u;
370 1.1 itojun
371 1.1 itojun sc = (struct stf_softc*)ifp;
372 1.57 dyoung dst6 = (const struct sockaddr_in6 *)dst;
373 1.1 itojun
374 1.1 itojun /* just in case */
375 1.1 itojun if ((ifp->if_flags & IFF_UP) == 0) {
376 1.1 itojun m_freem(m);
377 1.1 itojun return ENETDOWN;
378 1.1 itojun }
379 1.1 itojun
380 1.1 itojun /*
381 1.1 itojun * If we don't have an ip4 address that match my inner ip6 address,
382 1.1 itojun * we shouldn't generate output. Without this check, we'll end up
383 1.1 itojun * using wrong IPv4 source.
384 1.1 itojun */
385 1.1 itojun ia6 = stf_getsrcifa6(ifp);
386 1.1 itojun if (ia6 == NULL) {
387 1.1 itojun m_freem(m);
388 1.26 tron ifp->if_oerrors++;
389 1.1 itojun return ENETDOWN;
390 1.1 itojun }
391 1.1 itojun
392 1.1 itojun if (m->m_len < sizeof(*ip6)) {
393 1.1 itojun m = m_pullup(m, sizeof(*ip6));
394 1.26 tron if (m == NULL) {
395 1.26 tron ifp->if_oerrors++;
396 1.1 itojun return ENOBUFS;
397 1.26 tron }
398 1.1 itojun }
399 1.1 itojun ip6 = mtod(m, struct ip6_hdr *);
400 1.1 itojun tos = (ntohl(ip6->ip6_flow) >> 20) & 0xff;
401 1.1 itojun
402 1.14 itojun /*
403 1.14 itojun * Pickup the right outer dst addr from the list of candidates.
404 1.14 itojun * ip6_dst has priority as it may be able to give us shorter IPv4 hops.
405 1.14 itojun */
406 1.14 itojun if (IN6_IS_ADDR_6TO4(&ip6->ip6_dst))
407 1.14 itojun in4 = GET_V4(&ip6->ip6_dst);
408 1.14 itojun else if (IN6_IS_ADDR_6TO4(&dst6->sin6_addr))
409 1.14 itojun in4 = GET_V4(&dst6->sin6_addr);
410 1.14 itojun else {
411 1.14 itojun m_freem(m);
412 1.26 tron ifp->if_oerrors++;
413 1.14 itojun return ENETUNREACH;
414 1.14 itojun }
415 1.16 itojun
416 1.75 joerg bpf_mtap_af(ifp, AF_INET6, m);
417 1.14 itojun
418 1.1 itojun M_PREPEND(m, sizeof(struct ip), M_DONTWAIT);
419 1.1 itojun if (m && m->m_len < sizeof(struct ip))
420 1.1 itojun m = m_pullup(m, sizeof(struct ip));
421 1.26 tron if (m == NULL) {
422 1.26 tron ifp->if_oerrors++;
423 1.1 itojun return ENOBUFS;
424 1.26 tron }
425 1.1 itojun ip = mtod(m, struct ip *);
426 1.1 itojun
427 1.17 thorpej memset(ip, 0, sizeof(*ip));
428 1.1 itojun
429 1.1 itojun bcopy(GET_V4(&((struct sockaddr_in6 *)&ia6->ia_addr)->sin6_addr),
430 1.1 itojun &ip->ip_src, sizeof(ip->ip_src));
431 1.72 tsutsui memcpy(&ip->ip_dst, in4, sizeof(ip->ip_dst));
432 1.1 itojun ip->ip_p = IPPROTO_IPV6;
433 1.99 knakahar ip->ip_ttl = ip_stf_ttl;
434 1.29 itojun ip->ip_len = htons(m->m_pkthdr.len);
435 1.1 itojun if (ifp->if_flags & IFF_LINK1)
436 1.1 itojun ip_ecn_ingress(ECN_ALLOWED, &ip->ip_tos, &tos);
437 1.15 itojun else
438 1.15 itojun ip_ecn_ingress(ECN_NOCARE, &ip->ip_tos, &tos);
439 1.1 itojun
440 1.60 dyoung sockaddr_in_init(&u.dst4, &ip->ip_dst, 0);
441 1.63 dyoung if ((rt = rtcache_lookup(&sc->sc_ro, &u.dst)) == NULL) {
442 1.60 dyoung m_freem(m);
443 1.60 dyoung ifp->if_oerrors++;
444 1.60 dyoung return ENETUNREACH;
445 1.1 itojun }
446 1.1 itojun
447 1.56 joerg /* If the route constitutes infinite encapsulation, punt. */
448 1.63 dyoung if (rt->rt_ifp == ifp) {
449 1.100 ozaki rtcache_unref(rt, &sc->sc_ro);
450 1.56 joerg rtcache_free(&sc->sc_ro);
451 1.56 joerg m_freem(m);
452 1.56 joerg ifp->if_oerrors++;
453 1.56 joerg return ENETUNREACH;
454 1.56 joerg }
455 1.100 ozaki rtcache_unref(rt, &sc->sc_ro);
456 1.56 joerg
457 1.25 tron ifp->if_opackets++;
458 1.73 christos ifp->if_obytes += m->m_pkthdr.len - sizeof(struct ip);
459 1.60 dyoung return ip_output(m, NULL, &sc->sc_ro, 0, NULL, NULL);
460 1.1 itojun }
461 1.1 itojun
462 1.1 itojun static int
463 1.57 dyoung isrfc1918addr(const struct in_addr *in)
464 1.30 itojun {
465 1.30 itojun /*
466 1.30 itojun * returns 1 if private address range:
467 1.30 itojun * 10.0.0.0/8 172.16.0.0/12 192.168.0.0/16
468 1.30 itojun */
469 1.30 itojun if ((ntohl(in->s_addr) & 0xff000000) >> 24 == 10 ||
470 1.30 itojun (ntohl(in->s_addr) & 0xfff00000) >> 16 == 172 * 256 + 16 ||
471 1.30 itojun (ntohl(in->s_addr) & 0xffff0000) >> 16 == 192 * 256 + 168)
472 1.30 itojun return 1;
473 1.30 itojun
474 1.30 itojun return 0;
475 1.30 itojun }
476 1.30 itojun
477 1.30 itojun static int
478 1.57 dyoung stf_checkaddr4(struct stf_softc *sc, const struct in_addr *in,
479 1.50 thorpej struct ifnet *inifp /*incoming interface*/)
480 1.1 itojun {
481 1.1 itojun struct in_ifaddr *ia4;
482 1.1 itojun
483 1.1 itojun /*
484 1.1 itojun * reject packets with the following address:
485 1.3 itojun * 224.0.0.0/4 0.0.0.0/8 127.0.0.0/8 255.0.0.0/8
486 1.1 itojun */
487 1.3 itojun if (IN_MULTICAST(in->s_addr))
488 1.3 itojun return -1;
489 1.3 itojun switch ((ntohl(in->s_addr) & 0xff000000) >> 24) {
490 1.3 itojun case 0: case 127: case 255:
491 1.1 itojun return -1;
492 1.1 itojun }
493 1.24 itojun
494 1.24 itojun /*
495 1.30 itojun * reject packets with private address range.
496 1.30 itojun * (requirement from RFC3056 section 2 1st paragraph)
497 1.24 itojun */
498 1.30 itojun if (isrfc1918addr(in))
499 1.24 itojun return -1;
500 1.1 itojun
501 1.1 itojun /*
502 1.32 itojun * reject packet with IPv4 link-local (169.254.0.0/16),
503 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
504 1.32 itojun */
505 1.32 itojun if (((ntohl(in->s_addr) & 0xff000000) >> 24) == 169 &&
506 1.32 itojun ((ntohl(in->s_addr) & 0x00ff0000) >> 16) == 254)
507 1.32 itojun return -1;
508 1.32 itojun
509 1.32 itojun /*
510 1.1 itojun * reject packets with broadcast
511 1.1 itojun */
512 1.94 ozaki IN_ADDRLIST_READER_FOREACH(ia4) {
513 1.1 itojun if ((ia4->ia_ifa.ifa_ifp->if_flags & IFF_BROADCAST) == 0)
514 1.1 itojun continue;
515 1.1 itojun if (in->s_addr == ia4->ia_broadaddr.sin_addr.s_addr)
516 1.1 itojun return -1;
517 1.1 itojun }
518 1.1 itojun
519 1.1 itojun /*
520 1.1 itojun * perform ingress filter
521 1.1 itojun */
522 1.10 itojun if (sc && (sc->sc_if.if_flags & IFF_LINK2) == 0 && inifp) {
523 1.1 itojun struct sockaddr_in sin;
524 1.1 itojun struct rtentry *rt;
525 1.1 itojun
526 1.17 thorpej memset(&sin, 0, sizeof(sin));
527 1.1 itojun sin.sin_family = AF_INET;
528 1.1 itojun sin.sin_len = sizeof(struct sockaddr_in);
529 1.1 itojun sin.sin_addr = *in;
530 1.1 itojun rt = rtalloc1((struct sockaddr *)&sin, 0);
531 1.10 itojun if (!rt || rt->rt_ifp != inifp) {
532 1.10 itojun #if 0
533 1.10 itojun log(LOG_WARNING, "%s: packet from 0x%x dropped "
534 1.10 itojun "due to ingress filter\n", if_name(&sc->sc_if),
535 1.65 matt (uint32_t)ntohl(sin.sin_addr.s_addr));
536 1.10 itojun #endif
537 1.10 itojun if (rt)
538 1.101 ozaki rt_unref(rt);
539 1.1 itojun return -1;
540 1.1 itojun }
541 1.101 ozaki rt_unref(rt);
542 1.1 itojun }
543 1.1 itojun
544 1.1 itojun return 0;
545 1.1 itojun }
546 1.1 itojun
547 1.1 itojun static int
548 1.57 dyoung stf_checkaddr6(struct stf_softc *sc, const struct in6_addr *in6,
549 1.50 thorpej struct ifnet *inifp /*incoming interface*/)
550 1.1 itojun {
551 1.32 itojun
552 1.1 itojun /*
553 1.1 itojun * check 6to4 addresses
554 1.1 itojun */
555 1.1 itojun if (IN6_IS_ADDR_6TO4(in6))
556 1.10 itojun return stf_checkaddr4(sc, GET_V4(in6), inifp);
557 1.1 itojun
558 1.1 itojun /*
559 1.1 itojun * reject anything that look suspicious. the test is implemented
560 1.1 itojun * in ip6_input too, but we check here as well to
561 1.1 itojun * (1) reject bad packets earlier, and
562 1.1 itojun * (2) to be safe against future ip6_input change.
563 1.1 itojun */
564 1.1 itojun if (IN6_IS_ADDR_V4COMPAT(in6) || IN6_IS_ADDR_V4MAPPED(in6))
565 1.32 itojun return -1;
566 1.32 itojun
567 1.32 itojun /*
568 1.32 itojun * reject link-local and site-local unicast
569 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
570 1.32 itojun */
571 1.32 itojun if (IN6_IS_ADDR_LINKLOCAL(in6) || IN6_IS_ADDR_SITELOCAL(in6))
572 1.32 itojun return -1;
573 1.32 itojun
574 1.32 itojun /*
575 1.32 itojun * reject node-local and link-local multicast
576 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
577 1.32 itojun */
578 1.32 itojun if (IN6_IS_ADDR_MC_NODELOCAL(in6) || IN6_IS_ADDR_MC_LINKLOCAL(in6))
579 1.1 itojun return -1;
580 1.1 itojun
581 1.1 itojun return 0;
582 1.1 itojun }
583 1.1 itojun
584 1.87 knakahar void
585 1.87 knakahar in_stf_input(struct mbuf *m, int off, int proto)
586 1.1 itojun {
587 1.86 knakahar int s;
588 1.1 itojun struct stf_softc *sc;
589 1.1 itojun struct ip *ip;
590 1.1 itojun struct ip6_hdr *ip6;
591 1.65 matt uint8_t otos, itos;
592 1.1 itojun struct ifnet *ifp;
593 1.79 rmind size_t pktlen;
594 1.1 itojun
595 1.1 itojun if (proto != IPPROTO_IPV6) {
596 1.1 itojun m_freem(m);
597 1.87 knakahar return;
598 1.1 itojun }
599 1.1 itojun
600 1.1 itojun ip = mtod(m, struct ip *);
601 1.1 itojun
602 1.1 itojun sc = (struct stf_softc *)encap_getarg(m);
603 1.1 itojun
604 1.1 itojun if (sc == NULL || (sc->sc_if.if_flags & IFF_UP) == 0) {
605 1.1 itojun m_freem(m);
606 1.87 knakahar return;
607 1.1 itojun }
608 1.1 itojun
609 1.1 itojun ifp = &sc->sc_if;
610 1.1 itojun
611 1.1 itojun /*
612 1.1 itojun * perform sanity check against outer src/dst.
613 1.1 itojun * for source, perform ingress filter as well.
614 1.1 itojun */
615 1.10 itojun if (stf_checkaddr4(sc, &ip->ip_dst, NULL) < 0 ||
616 1.90 ozaki stf_checkaddr4(sc, &ip->ip_src, m_get_rcvif_NOMPSAFE(m)) < 0) {
617 1.1 itojun m_freem(m);
618 1.87 knakahar return;
619 1.1 itojun }
620 1.1 itojun
621 1.1 itojun otos = ip->ip_tos;
622 1.1 itojun m_adj(m, off);
623 1.1 itojun
624 1.1 itojun if (m->m_len < sizeof(*ip6)) {
625 1.1 itojun m = m_pullup(m, sizeof(*ip6));
626 1.1 itojun if (!m)
627 1.87 knakahar return;
628 1.1 itojun }
629 1.1 itojun ip6 = mtod(m, struct ip6_hdr *);
630 1.1 itojun
631 1.1 itojun /*
632 1.1 itojun * perform sanity check against inner src/dst.
633 1.1 itojun * for source, perform ingress filter as well.
634 1.1 itojun */
635 1.10 itojun if (stf_checkaddr6(sc, &ip6->ip6_dst, NULL) < 0 ||
636 1.90 ozaki stf_checkaddr6(sc, &ip6->ip6_src, m_get_rcvif_NOMPSAFE(m)) < 0) {
637 1.1 itojun m_freem(m);
638 1.87 knakahar return;
639 1.1 itojun }
640 1.1 itojun
641 1.1 itojun itos = (ntohl(ip6->ip6_flow) >> 20) & 0xff;
642 1.1 itojun if ((ifp->if_flags & IFF_LINK1) != 0)
643 1.1 itojun ip_ecn_egress(ECN_ALLOWED, &otos, &itos);
644 1.15 itojun else
645 1.15 itojun ip_ecn_egress(ECN_NOCARE, &otos, &itos);
646 1.1 itojun ip6->ip6_flow &= ~htonl(0xff << 20);
647 1.65 matt ip6->ip6_flow |= htonl((uint32_t)itos << 20);
648 1.1 itojun
649 1.79 rmind pktlen = m->m_pkthdr.len;
650 1.89 ozaki m_set_rcvif(m, ifp);
651 1.45 perry
652 1.75 joerg bpf_mtap_af(ifp, AF_INET6, m);
653 1.1 itojun
654 1.1 itojun /*
655 1.1 itojun * Put the packet to the network layer input queue according to the
656 1.1 itojun * specified address family.
657 1.1 itojun * See net/if_gif.c for possible issues with packet processing
658 1.1 itojun * reorder due to extra queueing.
659 1.1 itojun */
660 1.1 itojun
661 1.13 thorpej s = splnet();
662 1.79 rmind if (__predict_true(pktq_enqueue(ip6_pktq, m, 0))) {
663 1.79 rmind ifp->if_ipackets++;
664 1.79 rmind ifp->if_ibytes += pktlen;
665 1.79 rmind } else {
666 1.1 itojun m_freem(m);
667 1.1 itojun }
668 1.1 itojun splx(s);
669 1.86 knakahar
670 1.87 knakahar return;
671 1.1 itojun }
672 1.1 itojun
673 1.1 itojun /* ARGSUSED */
674 1.1 itojun static void
675 1.54 christos stf_rtrequest(int cmd, struct rtentry *rt,
676 1.67 dyoung const struct rt_addrinfo *info)
677 1.1 itojun {
678 1.46 tron if (rt != NULL) {
679 1.46 tron struct stf_softc *sc;
680 1.1 itojun
681 1.46 tron sc = LIST_FIRST(&stf_softc_list);
682 1.46 tron rt->rt_rmx.rmx_mtu = (sc != NULL) ? sc->sc_if.if_mtu : STF_MTU;
683 1.46 tron }
684 1.1 itojun }
685 1.1 itojun
686 1.1 itojun static int
687 1.58 christos stf_ioctl(struct ifnet *ifp, u_long cmd, void *data)
688 1.1 itojun {
689 1.46 tron struct ifaddr *ifa;
690 1.64 dyoung struct ifreq *ifr = data;
691 1.46 tron struct sockaddr_in6 *sin6;
692 1.46 tron int error;
693 1.1 itojun
694 1.1 itojun error = 0;
695 1.1 itojun switch (cmd) {
696 1.68 dyoung case SIOCINITIFADDR:
697 1.1 itojun ifa = (struct ifaddr *)data;
698 1.1 itojun if (ifa == NULL || ifa->ifa_addr->sa_family != AF_INET6) {
699 1.1 itojun error = EAFNOSUPPORT;
700 1.1 itojun break;
701 1.1 itojun }
702 1.1 itojun sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
703 1.30 itojun if (IN6_IS_ADDR_6TO4(&sin6->sin6_addr) &&
704 1.30 itojun !isrfc1918addr(GET_V4(&sin6->sin6_addr))) {
705 1.1 itojun ifa->ifa_rtrequest = stf_rtrequest;
706 1.1 itojun ifp->if_flags |= IFF_UP;
707 1.1 itojun } else
708 1.1 itojun error = EINVAL;
709 1.1 itojun break;
710 1.1 itojun
711 1.1 itojun case SIOCADDMULTI:
712 1.1 itojun case SIOCDELMULTI:
713 1.61 dyoung if (ifr != NULL &&
714 1.61 dyoung ifreq_getaddr(cmd, ifr)->sa_family == AF_INET6)
715 1.1 itojun ;
716 1.1 itojun else
717 1.1 itojun error = EAFNOSUPPORT;
718 1.1 itojun break;
719 1.1 itojun
720 1.46 tron case SIOCSIFMTU:
721 1.64 dyoung if (ifr->ifr_mtu < STF_MTU_MIN || ifr->ifr_mtu > STF_MTU_MAX)
722 1.46 tron return EINVAL;
723 1.64 dyoung else if ((error = ifioctl_common(ifp, cmd, data)) == ENETRESET)
724 1.64 dyoung error = 0;
725 1.46 tron break;
726 1.46 tron
727 1.1 itojun default:
728 1.68 dyoung error = ifioctl_common(ifp, cmd, data);
729 1.1 itojun break;
730 1.1 itojun }
731 1.1 itojun
732 1.1 itojun return error;
733 1.1 itojun }
734 1.98 christos
735 1.98 christos /*
736 1.98 christos * Module infrastructure
737 1.98 christos */
738 1.98 christos #include "if_module.h"
739 1.98 christos
740 1.98 christos IF_MODULE(MODULE_CLASS_DRIVER, stf, "")
741