2 * Copyright (C)2003-2006 Helsinki University of Technology
3 * Copyright (C)2003-2006 USAGI/WIDE Project
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 * Noriaki TAKAMIYA @USAGI
22 * Masahide NAKAMURA @USAGI
25 #include <linux/module.h>
26 #include <linux/skbuff.h>
27 #include <linux/time.h>
28 #include <linux/ipv6.h>
29 #include <linux/icmpv6.h>
32 #include <net/ip6_checksum.h>
33 #include <net/rawv6.h>
37 static inline unsigned int calc_padlen(unsigned int len
, unsigned int n
)
39 return (n
- len
+ 16) & 0x7;
42 static inline void *mip6_padn(__u8
*data
, __u8 padlen
)
47 data
[0] = IPV6_TLV_PAD0
;
48 } else if (padlen
> 1) {
49 data
[0] = IPV6_TLV_PADN
;
52 memset(data
+2, 0, data
[1]);
57 static inline void mip6_param_prob(struct sk_buff
*skb
, int code
, int pos
)
59 icmpv6_send(skb
, ICMPV6_PARAMPROB
, code
, pos
, skb
->dev
);
62 static int mip6_mh_len(int type
)
70 case IP6_MH_TYPE_HOTI
:
71 case IP6_MH_TYPE_COTI
:
73 case IP6_MH_TYPE_BACK
:
78 case IP6_MH_TYPE_BERROR
:
85 static int mip6_mh_filter(struct sock
*sk
, struct sk_buff
*skb
)
89 if (!pskb_may_pull(skb
, (skb_transport_offset(skb
)) + 8) ||
90 !pskb_may_pull(skb
, (skb_transport_offset(skb
) +
91 ((skb_transport_header(skb
)[1] + 1) << 3))))
94 mh
= (struct ip6_mh
*)skb_transport_header(skb
);
96 if (mh
->ip6mh_hdrlen
< mip6_mh_len(mh
->ip6mh_type
)) {
97 LIMIT_NETDEBUG(KERN_DEBUG
"mip6: MH message too short: %d vs >=%d\n",
98 mh
->ip6mh_hdrlen
, mip6_mh_len(mh
->ip6mh_type
));
99 mip6_param_prob(skb
, 0, ((&mh
->ip6mh_hdrlen
) -
100 skb_network_header(skb
)));
104 if (mh
->ip6mh_proto
!= IPPROTO_NONE
) {
105 LIMIT_NETDEBUG(KERN_DEBUG
"mip6: MH invalid payload proto = %d\n",
107 mip6_param_prob(skb
, 0, ((&mh
->ip6mh_proto
) -
108 skb_network_header(skb
)));
115 struct mip6_report_rate_limiter
{
117 struct timeval stamp
;
123 static struct mip6_report_rate_limiter mip6_report_rl
= {
124 .lock
= __SPIN_LOCK_UNLOCKED(mip6_report_rl
.lock
)
127 static int mip6_destopt_input(struct xfrm_state
*x
, struct sk_buff
*skb
)
129 struct ipv6hdr
*iph
= ipv6_hdr(skb
);
130 struct ipv6_destopt_hdr
*destopt
= (struct ipv6_destopt_hdr
*)skb
->data
;
131 int err
= destopt
->nexthdr
;
134 if (!ipv6_addr_equal(&iph
->saddr
, (struct in6_addr
*)x
->coaddr
) &&
135 !ipv6_addr_any((struct in6_addr
*)x
->coaddr
))
137 spin_unlock(&x
->lock
);
142 /* Destination Option Header is inserted.
143 * IP Header's src address is replaced with Home Address Option in
144 * Destination Option Header.
146 static int mip6_destopt_output(struct xfrm_state
*x
, struct sk_buff
*skb
)
149 struct ipv6_destopt_hdr
*dstopt
;
150 struct ipv6_destopt_hao
*hao
;
154 skb_push(skb
, -skb_network_offset(skb
));
157 nexthdr
= *skb_mac_header(skb
);
158 *skb_mac_header(skb
) = IPPROTO_DSTOPTS
;
160 dstopt
= (struct ipv6_destopt_hdr
*)skb_transport_header(skb
);
161 dstopt
->nexthdr
= nexthdr
;
163 hao
= mip6_padn((char *)(dstopt
+ 1),
164 calc_padlen(sizeof(*dstopt
), 6));
166 hao
->type
= IPV6_TLV_HAO
;
167 BUILD_BUG_ON(sizeof(*hao
) != 18);
168 hao
->length
= sizeof(*hao
) - 2;
170 len
= ((char *)hao
- (char *)dstopt
) + sizeof(*hao
);
172 memcpy(&hao
->addr
, &iph
->saddr
, sizeof(hao
->addr
));
173 spin_lock_bh(&x
->lock
);
174 memcpy(&iph
->saddr
, x
->coaddr
, sizeof(iph
->saddr
));
175 spin_unlock_bh(&x
->lock
);
177 WARN_ON(len
!= x
->props
.header_len
);
178 dstopt
->hdrlen
= (x
->props
.header_len
>> 3) - 1;
183 static inline int mip6_report_rl_allow(struct timeval
*stamp
,
184 struct in6_addr
*dst
,
185 struct in6_addr
*src
, int iif
)
189 spin_lock_bh(&mip6_report_rl
.lock
);
190 if (mip6_report_rl
.stamp
.tv_sec
!= stamp
->tv_sec
||
191 mip6_report_rl
.stamp
.tv_usec
!= stamp
->tv_usec
||
192 mip6_report_rl
.iif
!= iif
||
193 !ipv6_addr_equal(&mip6_report_rl
.src
, src
) ||
194 !ipv6_addr_equal(&mip6_report_rl
.dst
, dst
)) {
195 mip6_report_rl
.stamp
.tv_sec
= stamp
->tv_sec
;
196 mip6_report_rl
.stamp
.tv_usec
= stamp
->tv_usec
;
197 mip6_report_rl
.iif
= iif
;
198 ipv6_addr_copy(&mip6_report_rl
.src
, src
);
199 ipv6_addr_copy(&mip6_report_rl
.dst
, dst
);
202 spin_unlock_bh(&mip6_report_rl
.lock
);
206 static int mip6_destopt_reject(struct xfrm_state
*x
, struct sk_buff
*skb
, struct flowi
*fl
)
208 struct net
*net
= xs_net(x
);
209 struct inet6_skb_parm
*opt
= (struct inet6_skb_parm
*)skb
->cb
;
210 struct ipv6_destopt_hao
*hao
= NULL
;
211 struct xfrm_selector sel
;
213 struct timeval stamp
;
216 if (unlikely(fl
->proto
== IPPROTO_MH
&&
217 fl
->fl_mh_type
<= IP6_MH_TYPE_MAX
))
220 if (likely(opt
->dsthao
)) {
221 offset
= ipv6_find_tlv(skb
, opt
->dsthao
, IPV6_TLV_HAO
);
222 if (likely(offset
>= 0))
223 hao
= (struct ipv6_destopt_hao
*)
224 (skb_network_header(skb
) + offset
);
227 skb_get_timestamp(skb
, &stamp
);
229 if (!mip6_report_rl_allow(&stamp
, &ipv6_hdr(skb
)->daddr
,
230 hao
? &hao
->addr
: &ipv6_hdr(skb
)->saddr
,
234 memset(&sel
, 0, sizeof(sel
));
235 memcpy(&sel
.daddr
, (xfrm_address_t
*)&ipv6_hdr(skb
)->daddr
,
237 sel
.prefixlen_d
= 128;
238 memcpy(&sel
.saddr
, (xfrm_address_t
*)&ipv6_hdr(skb
)->saddr
,
240 sel
.prefixlen_s
= 128;
241 sel
.family
= AF_INET6
;
242 sel
.proto
= fl
->proto
;
243 sel
.dport
= xfrm_flowi_dport(fl
);
245 sel
.dport_mask
= htons(~0);
246 sel
.sport
= xfrm_flowi_sport(fl
);
248 sel
.sport_mask
= htons(~0);
249 sel
.ifindex
= fl
->oif
;
251 err
= km_report(net
, IPPROTO_DSTOPTS
, &sel
,
252 (hao
? (xfrm_address_t
*)&hao
->addr
: NULL
));
258 static int mip6_destopt_offset(struct xfrm_state
*x
, struct sk_buff
*skb
,
261 u16 offset
= sizeof(struct ipv6hdr
);
262 struct ipv6_opt_hdr
*exthdr
=
263 (struct ipv6_opt_hdr
*)(ipv6_hdr(skb
) + 1);
264 const unsigned char *nh
= skb_network_header(skb
);
265 unsigned int packet_len
= skb
->tail
- skb
->network_header
;
268 *nexthdr
= &ipv6_hdr(skb
)->nexthdr
;
270 while (offset
+ 1 <= packet_len
) {
275 case NEXTHDR_ROUTING
:
280 * HAO MUST NOT appear more than once.
281 * XXX: It is better to try to find by the end of
282 * XXX: packet if HAO exists.
284 if (ipv6_find_tlv(skb
, offset
, IPV6_TLV_HAO
) >= 0) {
285 LIMIT_NETDEBUG(KERN_WARNING
"mip6: hao exists already, override\n");
297 offset
+= ipv6_optlen(exthdr
);
298 *nexthdr
= &exthdr
->nexthdr
;
299 exthdr
= (struct ipv6_opt_hdr
*)(nh
+ offset
);
305 static int mip6_destopt_init_state(struct xfrm_state
*x
)
308 printk(KERN_INFO
"%s: spi is not 0: %u\n", __func__
,
312 if (x
->props
.mode
!= XFRM_MODE_ROUTEOPTIMIZATION
) {
313 printk(KERN_INFO
"%s: state's mode is not %u: %u\n",
314 __func__
, XFRM_MODE_ROUTEOPTIMIZATION
, x
->props
.mode
);
318 x
->props
.header_len
= sizeof(struct ipv6_destopt_hdr
) +
319 calc_padlen(sizeof(struct ipv6_destopt_hdr
), 6) +
320 sizeof(struct ipv6_destopt_hao
);
321 WARN_ON(x
->props
.header_len
!= 24);
327 * Do nothing about destroying since it has no specific operation for
328 * destination options header unlike IPsec protocols.
330 static void mip6_destopt_destroy(struct xfrm_state
*x
)
334 static const struct xfrm_type mip6_destopt_type
=
336 .description
= "MIP6DESTOPT",
337 .owner
= THIS_MODULE
,
338 .proto
= IPPROTO_DSTOPTS
,
339 .flags
= XFRM_TYPE_NON_FRAGMENT
| XFRM_TYPE_LOCAL_COADDR
,
340 .init_state
= mip6_destopt_init_state
,
341 .destructor
= mip6_destopt_destroy
,
342 .input
= mip6_destopt_input
,
343 .output
= mip6_destopt_output
,
344 .reject
= mip6_destopt_reject
,
345 .hdr_offset
= mip6_destopt_offset
,
348 static int mip6_rthdr_input(struct xfrm_state
*x
, struct sk_buff
*skb
)
350 struct rt2_hdr
*rt2
= (struct rt2_hdr
*)skb
->data
;
351 int err
= rt2
->rt_hdr
.nexthdr
;
354 if (!ipv6_addr_equal(&rt2
->addr
, (struct in6_addr
*)x
->coaddr
) &&
355 !ipv6_addr_any((struct in6_addr
*)x
->coaddr
))
357 spin_unlock(&x
->lock
);
362 /* Routing Header type 2 is inserted.
363 * IP Header's dst address is replaced with Routing Header's Home Address.
365 static int mip6_rthdr_output(struct xfrm_state
*x
, struct sk_buff
*skb
)
371 skb_push(skb
, -skb_network_offset(skb
));
374 nexthdr
= *skb_mac_header(skb
);
375 *skb_mac_header(skb
) = IPPROTO_ROUTING
;
377 rt2
= (struct rt2_hdr
*)skb_transport_header(skb
);
378 rt2
->rt_hdr
.nexthdr
= nexthdr
;
379 rt2
->rt_hdr
.hdrlen
= (x
->props
.header_len
>> 3) - 1;
380 rt2
->rt_hdr
.type
= IPV6_SRCRT_TYPE_2
;
381 rt2
->rt_hdr
.segments_left
= 1;
382 memset(&rt2
->reserved
, 0, sizeof(rt2
->reserved
));
384 WARN_ON(rt2
->rt_hdr
.hdrlen
!= 2);
386 memcpy(&rt2
->addr
, &iph
->daddr
, sizeof(rt2
->addr
));
387 spin_lock_bh(&x
->lock
);
388 memcpy(&iph
->daddr
, x
->coaddr
, sizeof(iph
->daddr
));
389 spin_unlock_bh(&x
->lock
);
394 static int mip6_rthdr_offset(struct xfrm_state
*x
, struct sk_buff
*skb
,
397 u16 offset
= sizeof(struct ipv6hdr
);
398 struct ipv6_opt_hdr
*exthdr
=
399 (struct ipv6_opt_hdr
*)(ipv6_hdr(skb
) + 1);
400 const unsigned char *nh
= skb_network_header(skb
);
401 unsigned int packet_len
= skb
->tail
- skb
->network_header
;
404 *nexthdr
= &ipv6_hdr(skb
)->nexthdr
;
406 while (offset
+ 1 <= packet_len
) {
411 case NEXTHDR_ROUTING
:
412 if (offset
+ 3 <= packet_len
) {
413 struct ipv6_rt_hdr
*rt
;
414 rt
= (struct ipv6_rt_hdr
*)(nh
+ offset
);
421 if (ipv6_find_tlv(skb
, offset
, IPV6_TLV_HAO
) >= 0)
432 offset
+= ipv6_optlen(exthdr
);
433 *nexthdr
= &exthdr
->nexthdr
;
434 exthdr
= (struct ipv6_opt_hdr
*)(nh
+ offset
);
440 static int mip6_rthdr_init_state(struct xfrm_state
*x
)
443 printk(KERN_INFO
"%s: spi is not 0: %u\n", __func__
,
447 if (x
->props
.mode
!= XFRM_MODE_ROUTEOPTIMIZATION
) {
448 printk(KERN_INFO
"%s: state's mode is not %u: %u\n",
449 __func__
, XFRM_MODE_ROUTEOPTIMIZATION
, x
->props
.mode
);
453 x
->props
.header_len
= sizeof(struct rt2_hdr
);
459 * Do nothing about destroying since it has no specific operation for routing
460 * header type 2 unlike IPsec protocols.
462 static void mip6_rthdr_destroy(struct xfrm_state
*x
)
466 static const struct xfrm_type mip6_rthdr_type
=
468 .description
= "MIP6RT",
469 .owner
= THIS_MODULE
,
470 .proto
= IPPROTO_ROUTING
,
471 .flags
= XFRM_TYPE_NON_FRAGMENT
| XFRM_TYPE_REMOTE_COADDR
,
472 .init_state
= mip6_rthdr_init_state
,
473 .destructor
= mip6_rthdr_destroy
,
474 .input
= mip6_rthdr_input
,
475 .output
= mip6_rthdr_output
,
476 .hdr_offset
= mip6_rthdr_offset
,
479 static int __init
mip6_init(void)
481 printk(KERN_INFO
"Mobile IPv6\n");
483 if (xfrm_register_type(&mip6_destopt_type
, AF_INET6
) < 0) {
484 printk(KERN_INFO
"%s: can't add xfrm type(destopt)\n", __func__
);
485 goto mip6_destopt_xfrm_fail
;
487 if (xfrm_register_type(&mip6_rthdr_type
, AF_INET6
) < 0) {
488 printk(KERN_INFO
"%s: can't add xfrm type(rthdr)\n", __func__
);
489 goto mip6_rthdr_xfrm_fail
;
491 if (rawv6_mh_filter_register(mip6_mh_filter
) < 0) {
492 printk(KERN_INFO
"%s: can't add rawv6 mh filter\n", __func__
);
493 goto mip6_rawv6_mh_fail
;
500 xfrm_unregister_type(&mip6_rthdr_type
, AF_INET6
);
501 mip6_rthdr_xfrm_fail
:
502 xfrm_unregister_type(&mip6_destopt_type
, AF_INET6
);
503 mip6_destopt_xfrm_fail
:
507 static void __exit
mip6_fini(void)
509 if (rawv6_mh_filter_unregister(mip6_mh_filter
) < 0)
510 printk(KERN_INFO
"%s: can't remove rawv6 mh filter\n", __func__
);
511 if (xfrm_unregister_type(&mip6_rthdr_type
, AF_INET6
) < 0)
512 printk(KERN_INFO
"%s: can't remove xfrm type(rthdr)\n", __func__
);
513 if (xfrm_unregister_type(&mip6_destopt_type
, AF_INET6
) < 0)
514 printk(KERN_INFO
"%s: can't remove xfrm type(destopt)\n", __func__
);
517 module_init(mip6_init
);
518 module_exit(mip6_fini
);
520 MODULE_LICENSE("GPL");
521 MODULE_ALIAS_XFRM_TYPE(AF_INET6
, XFRM_PROTO_DSTOPTS
);
522 MODULE_ALIAS_XFRM_TYPE(AF_INET6
, XFRM_PROTO_ROUTING
);