if_stf.c revision 1.68 1 1.68 dyoung /* $NetBSD: if_stf.c,v 1.68 2008/11/07 00:20:13 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.68 dyoung __KERNEL_RCSID(0, "$NetBSD: if_stf.c,v 1.68 2008/11/07 00:20:13 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.62 ad #include <sys/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.67 dyoung static void stf_rtrequest(int, struct rtentry *, const 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.66 christos sc = malloc(sizeof(struct stf_softc), M_DEVBUF, M_WAIT|M_ZERO);
199 1.5 thorpej
200 1.66 christos if_initname(&sc->sc_if, ifc->ifc_name, unit);
201 1.5 thorpej
202 1.5 thorpej sc->encap_cookie = encap_attach_func(AF_INET, IPPROTO_IPV6,
203 1.5 thorpej stf_encapcheck, &in_stf_protosw, sc);
204 1.5 thorpej if (sc->encap_cookie == NULL) {
205 1.5 thorpej printf("%s: unable to attach encap\n", if_name(&sc->sc_if));
206 1.5 thorpej free(sc, M_DEVBUF);
207 1.5 thorpej return (EIO); /* XXX */
208 1.5 thorpej }
209 1.5 thorpej
210 1.46 tron sc->sc_if.if_mtu = STF_MTU;
211 1.5 thorpej sc->sc_if.if_flags = 0;
212 1.5 thorpej sc->sc_if.if_ioctl = stf_ioctl;
213 1.5 thorpej sc->sc_if.if_output = stf_output;
214 1.5 thorpej sc->sc_if.if_type = IFT_STF;
215 1.7 thorpej sc->sc_if.if_dlt = DLT_NULL;
216 1.5 thorpej if_attach(&sc->sc_if);
217 1.8 thorpej if_alloc_sadl(&sc->sc_if);
218 1.1 itojun #if NBPFILTER > 0
219 1.5 thorpej bpfattach(&sc->sc_if, DLT_NULL, sizeof(u_int));
220 1.1 itojun #endif
221 1.5 thorpej LIST_INSERT_HEAD(&stf_softc_list, sc, sc_list);
222 1.5 thorpej return (0);
223 1.5 thorpej }
224 1.5 thorpej
225 1.50 thorpej static int
226 1.50 thorpej stf_clone_destroy(struct ifnet *ifp)
227 1.5 thorpej {
228 1.5 thorpej struct stf_softc *sc = (void *) ifp;
229 1.5 thorpej
230 1.5 thorpej LIST_REMOVE(sc, sc_list);
231 1.5 thorpej encap_detach(sc->encap_cookie);
232 1.5 thorpej #if NBPFILTER > 0
233 1.5 thorpej bpfdetach(ifp);
234 1.1 itojun #endif
235 1.5 thorpej if_detach(ifp);
236 1.60 dyoung rtcache_free(&sc->sc_ro);
237 1.5 thorpej free(sc, M_DEVBUF);
238 1.41 peter
239 1.41 peter return (0);
240 1.1 itojun }
241 1.1 itojun
242 1.1 itojun static int
243 1.54 christos stf_encapcheck(struct mbuf *m, int off, int proto, void *arg)
244 1.1 itojun {
245 1.1 itojun struct ip ip;
246 1.1 itojun struct in6_ifaddr *ia6;
247 1.1 itojun struct stf_softc *sc;
248 1.1 itojun struct in_addr a, b;
249 1.1 itojun
250 1.1 itojun sc = (struct stf_softc *)arg;
251 1.1 itojun if (sc == NULL)
252 1.1 itojun return 0;
253 1.1 itojun
254 1.1 itojun if ((sc->sc_if.if_flags & IFF_UP) == 0)
255 1.1 itojun return 0;
256 1.1 itojun
257 1.14 itojun /* IFF_LINK0 means "no decapsulation" */
258 1.14 itojun if ((sc->sc_if.if_flags & IFF_LINK0) != 0)
259 1.14 itojun return 0;
260 1.14 itojun
261 1.1 itojun if (proto != IPPROTO_IPV6)
262 1.1 itojun return 0;
263 1.1 itojun
264 1.58 christos m_copydata(m, 0, sizeof(ip), (void *)&ip);
265 1.1 itojun
266 1.1 itojun if (ip.ip_v != 4)
267 1.1 itojun return 0;
268 1.1 itojun
269 1.1 itojun ia6 = stf_getsrcifa6(&sc->sc_if);
270 1.1 itojun if (ia6 == NULL)
271 1.1 itojun return 0;
272 1.1 itojun
273 1.1 itojun /*
274 1.1 itojun * check if IPv4 dst matches the IPv4 address derived from the
275 1.1 itojun * local 6to4 address.
276 1.1 itojun * success on: dst = 10.1.1.1, ia6->ia_addr = 2002:0a01:0101:...
277 1.1 itojun */
278 1.1 itojun if (bcmp(GET_V4(&ia6->ia_addr.sin6_addr), &ip.ip_dst,
279 1.1 itojun sizeof(ip.ip_dst)) != 0)
280 1.1 itojun return 0;
281 1.1 itojun
282 1.1 itojun /*
283 1.1 itojun * check if IPv4 src matches the IPv4 address derived from the
284 1.1 itojun * local 6to4 address masked by prefixmask.
285 1.1 itojun * success on: src = 10.1.1.1, ia6->ia_addr = 2002:0a00:.../24
286 1.1 itojun * fail on: src = 10.1.1.1, ia6->ia_addr = 2002:0b00:.../24
287 1.1 itojun */
288 1.17 thorpej memset(&a, 0, sizeof(a));
289 1.1 itojun a.s_addr = GET_V4(&ia6->ia_addr.sin6_addr)->s_addr;
290 1.1 itojun a.s_addr &= GET_V4(&ia6->ia_prefixmask.sin6_addr)->s_addr;
291 1.1 itojun b = ip.ip_src;
292 1.1 itojun b.s_addr &= GET_V4(&ia6->ia_prefixmask.sin6_addr)->s_addr;
293 1.1 itojun if (a.s_addr != b.s_addr)
294 1.1 itojun return 0;
295 1.1 itojun
296 1.1 itojun /* stf interface makes single side match only */
297 1.1 itojun return 32;
298 1.1 itojun }
299 1.1 itojun
300 1.1 itojun static struct in6_ifaddr *
301 1.50 thorpej stf_getsrcifa6(struct ifnet *ifp)
302 1.1 itojun {
303 1.44 matt struct ifaddr *ifa;
304 1.1 itojun struct in_ifaddr *ia4;
305 1.1 itojun struct sockaddr_in6 *sin6;
306 1.1 itojun struct in_addr in;
307 1.1 itojun
308 1.44 matt IFADDR_FOREACH(ifa, ifp)
309 1.1 itojun {
310 1.44 matt if (ifa->ifa_addr == NULL)
311 1.1 itojun continue;
312 1.44 matt if (ifa->ifa_addr->sa_family != AF_INET6)
313 1.1 itojun continue;
314 1.44 matt sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
315 1.1 itojun if (!IN6_IS_ADDR_6TO4(&sin6->sin6_addr))
316 1.1 itojun continue;
317 1.1 itojun
318 1.1 itojun bcopy(GET_V4(&sin6->sin6_addr), &in, sizeof(in));
319 1.1 itojun INADDR_TO_IA(in, ia4);
320 1.1 itojun if (ia4 == NULL)
321 1.1 itojun continue;
322 1.1 itojun
323 1.44 matt return (struct in6_ifaddr *)ifa;
324 1.1 itojun }
325 1.1 itojun
326 1.1 itojun return NULL;
327 1.1 itojun }
328 1.1 itojun
329 1.1 itojun static int
330 1.57 dyoung stf_output(struct ifnet *ifp, struct mbuf *m, const struct sockaddr *dst,
331 1.63 dyoung struct rtentry *rt0)
332 1.1 itojun {
333 1.63 dyoung struct rtentry *rt;
334 1.1 itojun struct stf_softc *sc;
335 1.57 dyoung const struct sockaddr_in6 *dst6;
336 1.57 dyoung const struct in_addr *in4;
337 1.65 matt uint8_t tos;
338 1.1 itojun struct ip *ip;
339 1.1 itojun struct ip6_hdr *ip6;
340 1.1 itojun struct in6_ifaddr *ia6;
341 1.60 dyoung union {
342 1.60 dyoung struct sockaddr dst;
343 1.60 dyoung struct sockaddr_in dst4;
344 1.60 dyoung } u;
345 1.1 itojun
346 1.1 itojun sc = (struct stf_softc*)ifp;
347 1.57 dyoung dst6 = (const struct sockaddr_in6 *)dst;
348 1.1 itojun
349 1.1 itojun /* just in case */
350 1.1 itojun if ((ifp->if_flags & IFF_UP) == 0) {
351 1.1 itojun m_freem(m);
352 1.1 itojun return ENETDOWN;
353 1.1 itojun }
354 1.1 itojun
355 1.1 itojun /*
356 1.1 itojun * If we don't have an ip4 address that match my inner ip6 address,
357 1.1 itojun * we shouldn't generate output. Without this check, we'll end up
358 1.1 itojun * using wrong IPv4 source.
359 1.1 itojun */
360 1.1 itojun ia6 = stf_getsrcifa6(ifp);
361 1.1 itojun if (ia6 == NULL) {
362 1.1 itojun m_freem(m);
363 1.26 tron ifp->if_oerrors++;
364 1.1 itojun return ENETDOWN;
365 1.1 itojun }
366 1.1 itojun
367 1.1 itojun if (m->m_len < sizeof(*ip6)) {
368 1.1 itojun m = m_pullup(m, sizeof(*ip6));
369 1.26 tron if (m == NULL) {
370 1.26 tron ifp->if_oerrors++;
371 1.1 itojun return ENOBUFS;
372 1.26 tron }
373 1.1 itojun }
374 1.1 itojun ip6 = mtod(m, struct ip6_hdr *);
375 1.1 itojun tos = (ntohl(ip6->ip6_flow) >> 20) & 0xff;
376 1.1 itojun
377 1.14 itojun /*
378 1.14 itojun * Pickup the right outer dst addr from the list of candidates.
379 1.14 itojun * ip6_dst has priority as it may be able to give us shorter IPv4 hops.
380 1.14 itojun */
381 1.14 itojun if (IN6_IS_ADDR_6TO4(&ip6->ip6_dst))
382 1.14 itojun in4 = GET_V4(&ip6->ip6_dst);
383 1.14 itojun else if (IN6_IS_ADDR_6TO4(&dst6->sin6_addr))
384 1.14 itojun in4 = GET_V4(&dst6->sin6_addr);
385 1.14 itojun else {
386 1.14 itojun m_freem(m);
387 1.26 tron ifp->if_oerrors++;
388 1.14 itojun return ENETUNREACH;
389 1.14 itojun }
390 1.16 itojun
391 1.16 itojun #if NBPFILTER > 0
392 1.40 christos if (ifp->if_bpf)
393 1.40 christos bpf_mtap_af(ifp->if_bpf, AF_INET6, m);
394 1.16 itojun #endif /*NBPFILTER > 0*/
395 1.14 itojun
396 1.1 itojun M_PREPEND(m, sizeof(struct ip), M_DONTWAIT);
397 1.1 itojun if (m && m->m_len < sizeof(struct ip))
398 1.1 itojun m = m_pullup(m, sizeof(struct ip));
399 1.26 tron if (m == NULL) {
400 1.26 tron ifp->if_oerrors++;
401 1.1 itojun return ENOBUFS;
402 1.26 tron }
403 1.1 itojun ip = mtod(m, struct ip *);
404 1.1 itojun
405 1.17 thorpej memset(ip, 0, sizeof(*ip));
406 1.1 itojun
407 1.1 itojun bcopy(GET_V4(&((struct sockaddr_in6 *)&ia6->ia_addr)->sin6_addr),
408 1.1 itojun &ip->ip_src, sizeof(ip->ip_src));
409 1.14 itojun bcopy(in4, &ip->ip_dst, sizeof(ip->ip_dst));
410 1.1 itojun ip->ip_p = IPPROTO_IPV6;
411 1.1 itojun ip->ip_ttl = ip_gif_ttl; /*XXX*/
412 1.29 itojun ip->ip_len = htons(m->m_pkthdr.len);
413 1.1 itojun if (ifp->if_flags & IFF_LINK1)
414 1.1 itojun ip_ecn_ingress(ECN_ALLOWED, &ip->ip_tos, &tos);
415 1.15 itojun else
416 1.15 itojun ip_ecn_ingress(ECN_NOCARE, &ip->ip_tos, &tos);
417 1.1 itojun
418 1.60 dyoung sockaddr_in_init(&u.dst4, &ip->ip_dst, 0);
419 1.63 dyoung if ((rt = rtcache_lookup(&sc->sc_ro, &u.dst)) == NULL) {
420 1.60 dyoung m_freem(m);
421 1.60 dyoung ifp->if_oerrors++;
422 1.60 dyoung return ENETUNREACH;
423 1.1 itojun }
424 1.1 itojun
425 1.56 joerg /* If the route constitutes infinite encapsulation, punt. */
426 1.63 dyoung if (rt->rt_ifp == ifp) {
427 1.56 joerg rtcache_free(&sc->sc_ro);
428 1.56 joerg m_freem(m);
429 1.56 joerg ifp->if_oerrors++;
430 1.56 joerg return ENETUNREACH;
431 1.56 joerg }
432 1.56 joerg
433 1.25 tron ifp->if_opackets++;
434 1.60 dyoung return ip_output(m, NULL, &sc->sc_ro, 0, NULL, NULL);
435 1.1 itojun }
436 1.1 itojun
437 1.1 itojun static int
438 1.57 dyoung isrfc1918addr(const struct in_addr *in)
439 1.30 itojun {
440 1.30 itojun /*
441 1.30 itojun * returns 1 if private address range:
442 1.30 itojun * 10.0.0.0/8 172.16.0.0/12 192.168.0.0/16
443 1.30 itojun */
444 1.30 itojun if ((ntohl(in->s_addr) & 0xff000000) >> 24 == 10 ||
445 1.30 itojun (ntohl(in->s_addr) & 0xfff00000) >> 16 == 172 * 256 + 16 ||
446 1.30 itojun (ntohl(in->s_addr) & 0xffff0000) >> 16 == 192 * 256 + 168)
447 1.30 itojun return 1;
448 1.30 itojun
449 1.30 itojun return 0;
450 1.30 itojun }
451 1.30 itojun
452 1.30 itojun static int
453 1.57 dyoung stf_checkaddr4(struct stf_softc *sc, const struct in_addr *in,
454 1.50 thorpej struct ifnet *inifp /*incoming interface*/)
455 1.1 itojun {
456 1.1 itojun struct in_ifaddr *ia4;
457 1.1 itojun
458 1.1 itojun /*
459 1.1 itojun * reject packets with the following address:
460 1.3 itojun * 224.0.0.0/4 0.0.0.0/8 127.0.0.0/8 255.0.0.0/8
461 1.1 itojun */
462 1.3 itojun if (IN_MULTICAST(in->s_addr))
463 1.3 itojun return -1;
464 1.3 itojun switch ((ntohl(in->s_addr) & 0xff000000) >> 24) {
465 1.3 itojun case 0: case 127: case 255:
466 1.1 itojun return -1;
467 1.1 itojun }
468 1.24 itojun
469 1.24 itojun /*
470 1.30 itojun * reject packets with private address range.
471 1.30 itojun * (requirement from RFC3056 section 2 1st paragraph)
472 1.24 itojun */
473 1.30 itojun if (isrfc1918addr(in))
474 1.24 itojun return -1;
475 1.1 itojun
476 1.1 itojun /*
477 1.32 itojun * reject packet with IPv4 link-local (169.254.0.0/16),
478 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
479 1.32 itojun */
480 1.32 itojun if (((ntohl(in->s_addr) & 0xff000000) >> 24) == 169 &&
481 1.32 itojun ((ntohl(in->s_addr) & 0x00ff0000) >> 16) == 254)
482 1.32 itojun return -1;
483 1.32 itojun
484 1.32 itojun /*
485 1.1 itojun * reject packets with broadcast
486 1.1 itojun */
487 1.36 cl TAILQ_FOREACH(ia4, &in_ifaddrhead, ia_list)
488 1.1 itojun {
489 1.1 itojun if ((ia4->ia_ifa.ifa_ifp->if_flags & IFF_BROADCAST) == 0)
490 1.1 itojun continue;
491 1.1 itojun if (in->s_addr == ia4->ia_broadaddr.sin_addr.s_addr)
492 1.1 itojun return -1;
493 1.1 itojun }
494 1.1 itojun
495 1.1 itojun /*
496 1.1 itojun * perform ingress filter
497 1.1 itojun */
498 1.10 itojun if (sc && (sc->sc_if.if_flags & IFF_LINK2) == 0 && inifp) {
499 1.1 itojun struct sockaddr_in sin;
500 1.1 itojun struct rtentry *rt;
501 1.1 itojun
502 1.17 thorpej memset(&sin, 0, sizeof(sin));
503 1.1 itojun sin.sin_family = AF_INET;
504 1.1 itojun sin.sin_len = sizeof(struct sockaddr_in);
505 1.1 itojun sin.sin_addr = *in;
506 1.1 itojun rt = rtalloc1((struct sockaddr *)&sin, 0);
507 1.10 itojun if (!rt || rt->rt_ifp != inifp) {
508 1.10 itojun #if 0
509 1.10 itojun log(LOG_WARNING, "%s: packet from 0x%x dropped "
510 1.10 itojun "due to ingress filter\n", if_name(&sc->sc_if),
511 1.65 matt (uint32_t)ntohl(sin.sin_addr.s_addr));
512 1.10 itojun #endif
513 1.10 itojun if (rt)
514 1.10 itojun rtfree(rt);
515 1.1 itojun return -1;
516 1.1 itojun }
517 1.1 itojun rtfree(rt);
518 1.1 itojun }
519 1.1 itojun
520 1.1 itojun return 0;
521 1.1 itojun }
522 1.1 itojun
523 1.1 itojun static int
524 1.57 dyoung stf_checkaddr6(struct stf_softc *sc, const struct in6_addr *in6,
525 1.50 thorpej struct ifnet *inifp /*incoming interface*/)
526 1.1 itojun {
527 1.32 itojun
528 1.1 itojun /*
529 1.1 itojun * check 6to4 addresses
530 1.1 itojun */
531 1.1 itojun if (IN6_IS_ADDR_6TO4(in6))
532 1.10 itojun return stf_checkaddr4(sc, GET_V4(in6), inifp);
533 1.1 itojun
534 1.1 itojun /*
535 1.1 itojun * reject anything that look suspicious. the test is implemented
536 1.1 itojun * in ip6_input too, but we check here as well to
537 1.1 itojun * (1) reject bad packets earlier, and
538 1.1 itojun * (2) to be safe against future ip6_input change.
539 1.1 itojun */
540 1.1 itojun if (IN6_IS_ADDR_V4COMPAT(in6) || IN6_IS_ADDR_V4MAPPED(in6))
541 1.32 itojun return -1;
542 1.32 itojun
543 1.32 itojun /*
544 1.32 itojun * reject link-local and site-local unicast
545 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
546 1.32 itojun */
547 1.32 itojun if (IN6_IS_ADDR_LINKLOCAL(in6) || IN6_IS_ADDR_SITELOCAL(in6))
548 1.32 itojun return -1;
549 1.32 itojun
550 1.32 itojun /*
551 1.32 itojun * reject node-local and link-local multicast
552 1.32 itojun * as suggested in draft-savola-v6ops-6to4-security-00.txt
553 1.32 itojun */
554 1.32 itojun if (IN6_IS_ADDR_MC_NODELOCAL(in6) || IN6_IS_ADDR_MC_LINKLOCAL(in6))
555 1.1 itojun return -1;
556 1.1 itojun
557 1.1 itojun return 0;
558 1.1 itojun }
559 1.1 itojun
560 1.1 itojun void
561 1.1 itojun in_stf_input(struct mbuf *m, ...)
562 1.1 itojun {
563 1.1 itojun int off, proto;
564 1.1 itojun struct stf_softc *sc;
565 1.1 itojun struct ip *ip;
566 1.1 itojun struct ip6_hdr *ip6;
567 1.65 matt uint8_t otos, itos;
568 1.1 itojun int s, isr;
569 1.1 itojun struct ifqueue *ifq = NULL;
570 1.1 itojun struct ifnet *ifp;
571 1.1 itojun va_list ap;
572 1.1 itojun
573 1.1 itojun va_start(ap, m);
574 1.1 itojun off = va_arg(ap, int);
575 1.1 itojun proto = va_arg(ap, int);
576 1.1 itojun va_end(ap);
577 1.1 itojun
578 1.1 itojun if (proto != IPPROTO_IPV6) {
579 1.1 itojun m_freem(m);
580 1.1 itojun return;
581 1.1 itojun }
582 1.1 itojun
583 1.1 itojun ip = mtod(m, struct ip *);
584 1.1 itojun
585 1.1 itojun sc = (struct stf_softc *)encap_getarg(m);
586 1.1 itojun
587 1.1 itojun if (sc == NULL || (sc->sc_if.if_flags & IFF_UP) == 0) {
588 1.1 itojun m_freem(m);
589 1.1 itojun return;
590 1.1 itojun }
591 1.1 itojun
592 1.1 itojun ifp = &sc->sc_if;
593 1.1 itojun
594 1.1 itojun /*
595 1.1 itojun * perform sanity check against outer src/dst.
596 1.1 itojun * for source, perform ingress filter as well.
597 1.1 itojun */
598 1.10 itojun if (stf_checkaddr4(sc, &ip->ip_dst, NULL) < 0 ||
599 1.10 itojun stf_checkaddr4(sc, &ip->ip_src, m->m_pkthdr.rcvif) < 0) {
600 1.1 itojun m_freem(m);
601 1.1 itojun return;
602 1.1 itojun }
603 1.1 itojun
604 1.1 itojun otos = ip->ip_tos;
605 1.1 itojun m_adj(m, off);
606 1.1 itojun
607 1.1 itojun if (m->m_len < sizeof(*ip6)) {
608 1.1 itojun m = m_pullup(m, sizeof(*ip6));
609 1.1 itojun if (!m)
610 1.1 itojun return;
611 1.1 itojun }
612 1.1 itojun ip6 = mtod(m, struct ip6_hdr *);
613 1.1 itojun
614 1.1 itojun /*
615 1.1 itojun * perform sanity check against inner src/dst.
616 1.1 itojun * for source, perform ingress filter as well.
617 1.1 itojun */
618 1.10 itojun if (stf_checkaddr6(sc, &ip6->ip6_dst, NULL) < 0 ||
619 1.10 itojun stf_checkaddr6(sc, &ip6->ip6_src, m->m_pkthdr.rcvif) < 0) {
620 1.1 itojun m_freem(m);
621 1.1 itojun return;
622 1.1 itojun }
623 1.1 itojun
624 1.1 itojun itos = (ntohl(ip6->ip6_flow) >> 20) & 0xff;
625 1.1 itojun if ((ifp->if_flags & IFF_LINK1) != 0)
626 1.1 itojun ip_ecn_egress(ECN_ALLOWED, &otos, &itos);
627 1.15 itojun else
628 1.15 itojun ip_ecn_egress(ECN_NOCARE, &otos, &itos);
629 1.1 itojun ip6->ip6_flow &= ~htonl(0xff << 20);
630 1.65 matt ip6->ip6_flow |= htonl((uint32_t)itos << 20);
631 1.1 itojun
632 1.1 itojun m->m_pkthdr.rcvif = ifp;
633 1.45 perry
634 1.1 itojun #if NBPFILTER > 0
635 1.40 christos if (ifp->if_bpf)
636 1.40 christos bpf_mtap_af(ifp->if_bpf, AF_INET6, m);
637 1.1 itojun #endif /*NBPFILTER > 0*/
638 1.1 itojun
639 1.1 itojun /*
640 1.1 itojun * Put the packet to the network layer input queue according to the
641 1.1 itojun * specified address family.
642 1.1 itojun * See net/if_gif.c for possible issues with packet processing
643 1.1 itojun * reorder due to extra queueing.
644 1.1 itojun */
645 1.1 itojun ifq = &ip6intrq;
646 1.1 itojun isr = NETISR_IPV6;
647 1.1 itojun
648 1.13 thorpej s = splnet();
649 1.1 itojun if (IF_QFULL(ifq)) {
650 1.1 itojun IF_DROP(ifq); /* update statistics */
651 1.1 itojun m_freem(m);
652 1.1 itojun splx(s);
653 1.1 itojun return;
654 1.1 itojun }
655 1.1 itojun IF_ENQUEUE(ifq, m);
656 1.1 itojun schednetisr(isr);
657 1.1 itojun ifp->if_ipackets++;
658 1.1 itojun ifp->if_ibytes += m->m_pkthdr.len;
659 1.1 itojun splx(s);
660 1.1 itojun }
661 1.1 itojun
662 1.1 itojun /* ARGSUSED */
663 1.1 itojun static void
664 1.54 christos stf_rtrequest(int cmd, struct rtentry *rt,
665 1.67 dyoung const struct rt_addrinfo *info)
666 1.1 itojun {
667 1.46 tron if (rt != NULL) {
668 1.46 tron struct stf_softc *sc;
669 1.1 itojun
670 1.46 tron sc = LIST_FIRST(&stf_softc_list);
671 1.46 tron rt->rt_rmx.rmx_mtu = (sc != NULL) ? sc->sc_if.if_mtu : STF_MTU;
672 1.46 tron }
673 1.1 itojun }
674 1.1 itojun
675 1.1 itojun static int
676 1.58 christos stf_ioctl(struct ifnet *ifp, u_long cmd, void *data)
677 1.1 itojun {
678 1.52 ad struct lwp *l = curlwp; /* XXX */
679 1.46 tron struct ifaddr *ifa;
680 1.64 dyoung struct ifreq *ifr = data;
681 1.46 tron struct sockaddr_in6 *sin6;
682 1.46 tron int error;
683 1.1 itojun
684 1.1 itojun error = 0;
685 1.1 itojun switch (cmd) {
686 1.68 dyoung case SIOCINITIFADDR:
687 1.1 itojun ifa = (struct ifaddr *)data;
688 1.1 itojun if (ifa == NULL || ifa->ifa_addr->sa_family != AF_INET6) {
689 1.1 itojun error = EAFNOSUPPORT;
690 1.1 itojun break;
691 1.1 itojun }
692 1.1 itojun sin6 = (struct sockaddr_in6 *)ifa->ifa_addr;
693 1.30 itojun if (IN6_IS_ADDR_6TO4(&sin6->sin6_addr) &&
694 1.30 itojun !isrfc1918addr(GET_V4(&sin6->sin6_addr))) {
695 1.1 itojun ifa->ifa_rtrequest = stf_rtrequest;
696 1.1 itojun ifp->if_flags |= IFF_UP;
697 1.1 itojun } else
698 1.1 itojun error = EINVAL;
699 1.1 itojun break;
700 1.1 itojun
701 1.1 itojun case SIOCADDMULTI:
702 1.1 itojun case SIOCDELMULTI:
703 1.61 dyoung if (ifr != NULL &&
704 1.61 dyoung ifreq_getaddr(cmd, ifr)->sa_family == AF_INET6)
705 1.1 itojun ;
706 1.1 itojun else
707 1.1 itojun error = EAFNOSUPPORT;
708 1.1 itojun break;
709 1.1 itojun
710 1.46 tron case SIOCSIFMTU:
711 1.52 ad if ((error = kauth_authorize_generic(l->l_cred,
712 1.59 ad KAUTH_GENERIC_ISSUSER, NULL)) != 0)
713 1.46 tron break;
714 1.64 dyoung if (ifr->ifr_mtu < STF_MTU_MIN || ifr->ifr_mtu > STF_MTU_MAX)
715 1.46 tron return EINVAL;
716 1.64 dyoung else if ((error = ifioctl_common(ifp, cmd, data)) == ENETRESET)
717 1.64 dyoung error = 0;
718 1.46 tron break;
719 1.46 tron
720 1.1 itojun default:
721 1.68 dyoung error = ifioctl_common(ifp, cmd, data);
722 1.1 itojun break;
723 1.1 itojun }
724 1.1 itojun
725 1.1 itojun return error;
726 1.1 itojun }
727