ip6_forward.c revision 1.12 1 /* $NetBSD: ip6_forward.c,v 1.12 2000/06/03 14:36:36 itojun Exp $ */
2 /* $KAME: ip6_forward.c,v 1.37 2000/05/28 12:17:19 itojun Exp $ */
3
4 /*
5 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the project nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33 #include <sys/param.h>
34 #include <sys/systm.h>
35 #include <sys/malloc.h>
36 #include <sys/mbuf.h>
37 #include <sys/domain.h>
38 #include <sys/protosw.h>
39 #include <sys/socket.h>
40 #include <sys/errno.h>
41 #include <sys/time.h>
42 #include <sys/kernel.h>
43 #include <sys/syslog.h>
44
45 #include <net/if.h>
46 #include <net/route.h>
47
48 #include <netinet/in.h>
49 #include <netinet/in_var.h>
50 #include <netinet/ip_var.h>
51 #include <netinet/ip6.h>
52 #include <netinet6/ip6_var.h>
53 #include <netinet/icmp6.h>
54 #include <netinet6/nd6.h>
55
56 #ifdef IPSEC_IPV6FWD
57 #include <netinet6/ipsec.h>
58 #include <netkey/key.h>
59 #include <netkey/key_debug.h>
60 #endif /* IPSEC_IPV6FWD */
61
62 #ifdef IPV6FIREWALL
63 #include <netinet6/ip6_fw.h>
64 #endif
65
66 #include <net/net_osdep.h>
67
68 struct route_in6 ip6_forward_rt;
69
70 /*
71 * Forward a packet. If some error occurs return the sender
72 * an icmp packet. Note we can't always generate a meaningful
73 * icmp message because icmp doesn't have a large enough repertoire
74 * of codes and types.
75 *
76 * If not forwarding, just drop the packet. This could be confusing
77 * if ipforwarding was zero but some routing protocol was advancing
78 * us as a gateway to somewhere. However, we must let the routing
79 * protocol deal with that.
80 *
81 */
82
83 void
84 ip6_forward(m, srcrt)
85 struct mbuf *m;
86 int srcrt;
87 {
88 struct ip6_hdr *ip6 = mtod(m, struct ip6_hdr *);
89 register struct sockaddr_in6 *dst;
90 register struct rtentry *rt;
91 int error, type = 0, code = 0;
92 struct mbuf *mcopy = NULL;
93 struct ifnet *origifp; /* maybe unnecessary */
94 #ifdef IPSEC_IPV6FWD
95 struct secpolicy *sp = NULL;
96 #endif
97 long time_second = time.tv_sec;
98
99 #ifdef IPSEC_IPV6FWD
100 /*
101 * Check AH/ESP integrity.
102 */
103 /*
104 * Don't increment ip6s_cantforward because this is the check
105 * before forwarding packet actually.
106 */
107 if (ipsec6_in_reject(m, NULL)) {
108 ipsec6stat.in_polvio++;
109 m_freem(m);
110 return;
111 }
112 #endif /*IPSEC_IPV6FWD*/
113
114 if ((m->m_flags & (M_BCAST|M_MCAST)) != 0 ||
115 IN6_IS_ADDR_MULTICAST(&ip6->ip6_dst)) {
116 ip6stat.ip6s_cantforward++;
117 /* XXX in6_ifstat_inc(rt->rt_ifp, ifs6_in_discard) */
118 if (ip6_log_time + ip6_log_interval < time_second) {
119 ip6_log_time = time_second;
120 log(LOG_DEBUG,
121 "cannot forward "
122 "from %s to %s nxt %d received on %s\n",
123 ip6_sprintf(&ip6->ip6_src),
124 ip6_sprintf(&ip6->ip6_dst),
125 ip6->ip6_nxt,
126 if_name(m->m_pkthdr.rcvif));
127 }
128 m_freem(m);
129 return;
130 }
131
132 if (ip6->ip6_hlim <= IPV6_HLIMDEC) {
133 /* XXX in6_ifstat_inc(rt->rt_ifp, ifs6_in_discard) */
134 icmp6_error(m, ICMP6_TIME_EXCEEDED,
135 ICMP6_TIME_EXCEED_TRANSIT, 0);
136 return;
137 }
138 ip6->ip6_hlim -= IPV6_HLIMDEC;
139
140 /*
141 * Save at most ICMPV6_PLD_MAXLEN (= the min IPv6 MTU -
142 * size of IPv6 + ICMPv6 headers) bytes of the packet in case
143 * we need to generate an ICMP6 message to the src.
144 * Thanks to M_EXT, in most cases copy will not occur.
145 *
146 * It is important to save it before IPsec processing as IPsec
147 * processing may modify the mbuf.
148 */
149 mcopy = m_copy(m, 0, imin(m->m_pkthdr.len, ICMPV6_PLD_MAXLEN));
150
151 #ifdef IPSEC_IPV6FWD
152 /* get a security policy for this packet */
153 sp = ipsec6_getpolicybyaddr(m, IPSEC_DIR_OUTBOUND, 0, &error);
154 if (sp == NULL) {
155 ipsec6stat.out_inval++;
156 ip6stat.ip6s_cantforward++;
157 if (mcopy) {
158 #if 0
159 /* XXX: what icmp ? */
160 #else
161 m_freem(mcopy);
162 #endif
163 }
164 m_freem(m);
165 return;
166 }
167
168 error = 0;
169
170 /* check policy */
171 switch (sp->policy) {
172 case IPSEC_POLICY_DISCARD:
173 /*
174 * This packet is just discarded.
175 */
176 ipsec6stat.out_polvio++;
177 ip6stat.ip6s_cantforward++;
178 key_freesp(sp);
179 if (mcopy) {
180 #if 0
181 /* XXX: what icmp ? */
182 #else
183 m_freem(mcopy);
184 #endif
185 }
186 m_freem(m);
187 return;
188
189 case IPSEC_POLICY_BYPASS:
190 case IPSEC_POLICY_NONE:
191 /* no need to do IPsec. */
192 key_freesp(sp);
193 goto skip_ipsec;
194
195 case IPSEC_POLICY_IPSEC:
196 if (sp->req == NULL) {
197 /* XXX should be panic ? */
198 printf("ip6_forward: No IPsec request specified.\n");
199 ip6stat.ip6s_cantforward++;
200 key_freesp(sp);
201 if (mcopy) {
202 #if 0
203 /* XXX: what icmp ? */
204 #else
205 m_freem(mcopy);
206 #endif
207 }
208 m_freem(m);
209 return;
210 }
211 /* do IPsec */
212 break;
213
214 case IPSEC_POLICY_ENTRUST:
215 default:
216 /* should be panic ?? */
217 printf("ip6_forward: Invalid policy found. %d\n", sp->policy);
218 key_freesp(sp);
219 goto skip_ipsec;
220 }
221
222 {
223 struct ipsec_output_state state;
224
225 /*
226 * All the extension headers will become inaccessible
227 * (since they can be encrypted).
228 * Don't panic, we need no more updates to extension headers
229 * on inner IPv6 packet (since they are now encapsulated).
230 *
231 * IPv6 [ESP|AH] IPv6 [extension headers] payload
232 */
233 bzero(&state, sizeof(state));
234 state.m = m;
235 state.ro = NULL; /* update at ipsec6_output_tunnel() */
236 state.dst = NULL; /* update at ipsec6_output_tunnel() */
237
238 error = ipsec6_output_tunnel(&state, sp, 0);
239
240 m = state.m;
241 #if 0 /* XXX allocate a route (ro, dst) again later */
242 ro = (struct route_in6 *)state.ro;
243 dst = (struct sockaddr_in6 *)state.dst;
244 #endif
245 key_freesp(sp);
246
247 if (error) {
248 /* mbuf is already reclaimed in ipsec6_output_tunnel. */
249 switch (error) {
250 case EHOSTUNREACH:
251 case ENETUNREACH:
252 case EMSGSIZE:
253 case ENOBUFS:
254 case ENOMEM:
255 break;
256 default:
257 printf("ip6_output (ipsec): error code %d\n", error);
258 /*fall through*/
259 case ENOENT:
260 /* don't show these error codes to the user */
261 break;
262 }
263 ip6stat.ip6s_cantforward++;
264 if (mcopy) {
265 #if 0
266 /* XXX: what icmp ? */
267 #else
268 m_freem(mcopy);
269 #endif
270 }
271 m_freem(m);
272 return;
273 }
274 }
275 skip_ipsec:
276 #endif /* IPSEC_IPV6FWD */
277
278 dst = &ip6_forward_rt.ro_dst;
279 if (!srcrt) {
280 /*
281 * ip6_forward_rt.ro_dst.sin6_addr is equal to ip6->ip6_dst
282 */
283 if (ip6_forward_rt.ro_rt == 0 ||
284 (ip6_forward_rt.ro_rt->rt_flags & RTF_UP) == 0) {
285 if (ip6_forward_rt.ro_rt) {
286 RTFREE(ip6_forward_rt.ro_rt);
287 ip6_forward_rt.ro_rt = 0;
288 }
289 /* this probably fails but give it a try again */
290 rtalloc((struct route *)&ip6_forward_rt);
291 }
292
293 if (ip6_forward_rt.ro_rt == 0) {
294 ip6stat.ip6s_noroute++;
295 /* XXX in6_ifstat_inc(rt->rt_ifp, ifs6_in_noroute) */
296 if (mcopy) {
297 icmp6_error(mcopy, ICMP6_DST_UNREACH,
298 ICMP6_DST_UNREACH_NOROUTE, 0);
299 }
300 m_freem(m);
301 return;
302 }
303 } else if ((rt = ip6_forward_rt.ro_rt) == 0 ||
304 !IN6_ARE_ADDR_EQUAL(&ip6->ip6_dst, &dst->sin6_addr)) {
305 if (ip6_forward_rt.ro_rt) {
306 RTFREE(ip6_forward_rt.ro_rt);
307 ip6_forward_rt.ro_rt = 0;
308 }
309 bzero(dst, sizeof(*dst));
310 dst->sin6_len = sizeof(struct sockaddr_in6);
311 dst->sin6_family = AF_INET6;
312 dst->sin6_addr = ip6->ip6_dst;
313
314 rtalloc((struct route *)&ip6_forward_rt);
315 if (ip6_forward_rt.ro_rt == 0) {
316 ip6stat.ip6s_noroute++;
317 /* XXX in6_ifstat_inc(rt->rt_ifp, ifs6_in_noroute) */
318 if (mcopy) {
319 icmp6_error(mcopy, ICMP6_DST_UNREACH,
320 ICMP6_DST_UNREACH_NOROUTE, 0);
321 }
322 m_freem(m);
323 return;
324 }
325 }
326 rt = ip6_forward_rt.ro_rt;
327
328 /*
329 * Scope check: if a packet can't be delivered to its destination
330 * for the reason that the destination is beyond the scope of the
331 * source address, discard the packet and return an icmp6 destination
332 * unreachable error with Code 2 (beyond scope of source address).
333 * [draft-ietf-ipngwg-icmp-v3-00.txt, Section 3.1]
334 */
335 if (in6_addr2scopeid(m->m_pkthdr.rcvif, &ip6->ip6_src) !=
336 in6_addr2scopeid(rt->rt_ifp, &ip6->ip6_src)) {
337 ip6stat.ip6s_cantforward++;
338 ip6stat.ip6s_badscope++;
339 in6_ifstat_inc(rt->rt_ifp, ifs6_in_discard);
340
341 if (ip6_log_time + ip6_log_interval < time_second) {
342 ip6_log_time = time_second;
343 log(LOG_DEBUG,
344 "cannot forward "
345 "src %s, dst %s, nxt %d, rcvif %s, outif %s\n",
346 ip6_sprintf(&ip6->ip6_src),
347 ip6_sprintf(&ip6->ip6_dst),
348 ip6->ip6_nxt,
349 if_name(m->m_pkthdr.rcvif), if_name(rt->rt_ifp));
350 }
351 if (mcopy)
352 icmp6_error(mcopy, ICMP6_DST_UNREACH,
353 ICMP6_DST_UNREACH_BEYONDSCOPE, 0);
354 m_freem(m);
355 return;
356 }
357
358 if (m->m_pkthdr.len > rt->rt_ifp->if_mtu) {
359 in6_ifstat_inc(rt->rt_ifp, ifs6_in_toobig);
360 if (mcopy) {
361 u_long mtu;
362 #ifdef IPSEC_IPV6FWD
363 struct secpolicy *sp;
364 int ipsecerror;
365 size_t ipsechdrsiz;
366 #endif
367
368 mtu = rt->rt_ifp->if_mtu;
369 #ifdef IPSEC_IPV6FWD
370 /*
371 * When we do IPsec tunnel ingress, we need to play
372 * with if_mtu value (decrement IPsec header size
373 * from mtu value). The code is much simpler than v4
374 * case, as we have the outgoing interface for
375 * encapsulated packet as "rt->rt_ifp".
376 */
377 sp = ipsec6_getpolicybyaddr(mcopy, IPSEC_DIR_OUTBOUND,
378 IP_FORWARDING, &ipsecerror);
379 if (sp) {
380 ipsechdrsiz = ipsec6_hdrsiz(mcopy,
381 IPSEC_DIR_OUTBOUND, NULL);
382 if (ipsechdrsiz < mtu)
383 mtu -= ipsechdrsiz;
384 }
385
386 /*
387 * if mtu becomes less than minimum MTU,
388 * tell minimum MTU (and I'll need to fragment it).
389 */
390 if (mtu < IPV6_MMTU)
391 mtu = IPV6_MMTU;
392 #endif
393 icmp6_error(mcopy, ICMP6_PACKET_TOO_BIG, 0, mtu);
394 }
395 m_freem(m);
396 return;
397 }
398
399 if (rt->rt_flags & RTF_GATEWAY)
400 dst = (struct sockaddr_in6 *)rt->rt_gateway;
401
402 /*
403 * If we are to forward the packet using the same interface
404 * as one we got the packet from, perhaps we should send a redirect
405 * to sender to shortcut a hop.
406 * Only send redirect if source is sending directly to us,
407 * and if packet was not source routed (or has any options).
408 * Also, don't send redirect if forwarding using a route
409 * modified by a redirect.
410 */
411 if (rt->rt_ifp == m->m_pkthdr.rcvif && !srcrt &&
412 (rt->rt_flags & (RTF_DYNAMIC|RTF_MODIFIED)) == 0)
413 type = ND_REDIRECT;
414
415 #ifdef IPV6FIREWALL
416 /*
417 * Check with the firewall...
418 */
419 if (ip6_fw_chk_ptr) {
420 u_short port = 0;
421 /* If ipfw says divert, we have to just drop packet */
422 if ((*ip6_fw_chk_ptr)(&ip6, rt->rt_ifp, &port, &m)) {
423 m_freem(m);
424 goto freecopy;
425 }
426 if (!m)
427 goto freecopy;
428 }
429 #endif
430
431 /*
432 * Fake scoped addresses. Note that even link-local source or
433 * destinaion can appear, if the originating node just sends the
434 * packet to us (without address resolution for the destination).
435 * Since both icmp6_error and icmp6_redirect_output fill the embedded
436 * link identifiers, we can do this stuff after make a copy for
437 * returning error.
438 */
439 if ((rt->rt_ifp->if_flags & IFF_LOOPBACK) != 0) {
440 /*
441 * See corresponding comments in ip6_output.
442 * XXX: but is it possible that ip6_forward() sends a packet
443 * to a loopback interface? I don't think so, and thus
444 * I bark here. (jinmei (at) kame.net)
445 * XXX: it is common to route invalid packets to loopback.
446 * (itojun)
447 */
448
449 if ((rt->rt_flags & (RTF_BLACKHOLE|RTF_REJECT)) == 0) {
450 printf("ip6_forward: outgoing interface is loopback. "
451 "src %s, dst %s, nxt %d, rcvif %s, outif %s\n",
452 ip6_sprintf(&ip6->ip6_src),
453 ip6_sprintf(&ip6->ip6_dst),
454 ip6->ip6_nxt, if_name(m->m_pkthdr.rcvif),
455 if_name(rt->rt_ifp));
456 }
457
458 if (IN6_IS_SCOPE_LINKLOCAL(&ip6->ip6_src))
459 origifp = ifindex2ifnet[ntohs(ip6->ip6_src.s6_addr16[1])];
460 else if (IN6_IS_SCOPE_LINKLOCAL(&ip6->ip6_dst))
461 origifp = ifindex2ifnet[ntohs(ip6->ip6_dst.s6_addr16[1])];
462 else
463 origifp = rt->rt_ifp;
464 }
465 else
466 origifp = rt->rt_ifp;
467 #ifndef FAKE_LOOPBACK_IF
468 if ((rt->rt_ifp->if_flags & IFF_LOOPBACK) == 0)
469 #else
470 if (1)
471 #endif
472 {
473 if (IN6_IS_SCOPE_LINKLOCAL(&ip6->ip6_src))
474 ip6->ip6_src.s6_addr16[1] = 0;
475 if (IN6_IS_SCOPE_LINKLOCAL(&ip6->ip6_dst))
476 ip6->ip6_dst.s6_addr16[1] = 0;
477 }
478
479 #ifdef OLDIP6OUTPUT
480 error = (*rt->rt_ifp->if_output)(rt->rt_ifp, m,
481 (struct sockaddr *)dst,
482 ip6_forward_rt.ro_rt);
483 #else
484 error = nd6_output(rt->rt_ifp, origifp, m, dst, rt);
485 #endif
486 if (error) {
487 in6_ifstat_inc(rt->rt_ifp, ifs6_out_discard);
488 ip6stat.ip6s_cantforward++;
489 } else {
490 ip6stat.ip6s_forward++;
491 in6_ifstat_inc(rt->rt_ifp, ifs6_out_forward);
492 if (type)
493 ip6stat.ip6s_redirectsent++;
494 else {
495 if (mcopy)
496 goto freecopy;
497 }
498 }
499 if (mcopy == NULL)
500 return;
501
502 switch (error) {
503 case 0:
504 #if 1
505 if (type == ND_REDIRECT) {
506 icmp6_redirect_output(mcopy, rt);
507 return;
508 }
509 #endif
510 goto freecopy;
511
512 case EMSGSIZE:
513 /* xxx MTU is constant in PPP? */
514 goto freecopy;
515
516 case ENOBUFS:
517 /* Tell source to slow down like source quench in IP? */
518 goto freecopy;
519
520 case ENETUNREACH: /* shouldn't happen, checked above */
521 case EHOSTUNREACH:
522 case ENETDOWN:
523 case EHOSTDOWN:
524 default:
525 type = ICMP6_DST_UNREACH;
526 code = ICMP6_DST_UNREACH_ADDR;
527 break;
528 }
529 icmp6_error(mcopy, type, code, 0);
530 return;
531
532 freecopy:
533 m_freem(mcopy);
534 return;
535 }
536