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