2 * IPv6 over IPv4 tunnel device - Simple Internet Transition (SIT)
3 * Linux INET6 implementation
6 * Pedro Roque <roque@di.fc.ul.pt>
7 * Alexey Kuznetsov <kuznet@ms2.inr.ac.ru>
9 * $Id: sit.c,v 1.53 2001/09/25 05:09:53 davem Exp $
11 * This program is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU General Public License
13 * as published by the Free Software Foundation; either version
14 * 2 of the License, or (at your option) any later version.
17 * Roger Venning <r.venning@telstra.com>: 6to4 support
18 * Nate Thompson <nate@thebog.net>: 6to4 support
21 #include <linux/config.h>
22 #include <linux/module.h>
23 #include <linux/capability.h>
24 #include <linux/errno.h>
25 #include <linux/types.h>
26 #include <linux/socket.h>
27 #include <linux/sockios.h>
28 #include <linux/sched.h>
29 #include <linux/net.h>
30 #include <linux/in6.h>
31 #include <linux/netdevice.h>
32 #include <linux/if_arp.h>
33 #include <linux/icmp.h>
34 #include <asm/uaccess.h>
35 #include <linux/init.h>
36 #include <linux/netfilter_ipv4.h>
37 #include <linux/if_ether.h>
43 #include <net/protocol.h>
44 #include <net/transp_v6.h>
45 #include <net/ip6_fib.h>
46 #include <net/ip6_route.h>
47 #include <net/ndisc.h>
48 #include <net/addrconf.h>
53 #include <net/inet_ecn.h>
55 #include <net/dsfield.h>
58 This version of net/ipv6/sit.c is cloned of net/ipv4/ip_gre.c
60 For comments look at net/ipv4/ip_gre.c --ANK
64 #define HASH(addr) ((addr^(addr>>4))&0xF)
66 static int ipip6_fb_tunnel_init(struct net_device
*dev
);
67 static int ipip6_tunnel_init(struct net_device
*dev
);
68 static void ipip6_tunnel_setup(struct net_device
*dev
);
70 static struct net_device
*ipip6_fb_tunnel_dev
;
72 static struct ip_tunnel
*tunnels_r_l
[HASH_SIZE
];
73 static struct ip_tunnel
*tunnels_r
[HASH_SIZE
];
74 static struct ip_tunnel
*tunnels_l
[HASH_SIZE
];
75 static struct ip_tunnel
*tunnels_wc
[1];
76 static struct ip_tunnel
**tunnels
[4] = { tunnels_wc
, tunnels_l
, tunnels_r
, tunnels_r_l
};
78 static DEFINE_RWLOCK(ipip6_lock
);
80 static struct ip_tunnel
* ipip6_tunnel_lookup(u32 remote
, u32 local
)
82 unsigned h0
= HASH(remote
);
83 unsigned h1
= HASH(local
);
86 for (t
= tunnels_r_l
[h0
^h1
]; t
; t
= t
->next
) {
87 if (local
== t
->parms
.iph
.saddr
&&
88 remote
== t
->parms
.iph
.daddr
&& (t
->dev
->flags
&IFF_UP
))
91 for (t
= tunnels_r
[h0
]; t
; t
= t
->next
) {
92 if (remote
== t
->parms
.iph
.daddr
&& (t
->dev
->flags
&IFF_UP
))
95 for (t
= tunnels_l
[h1
]; t
; t
= t
->next
) {
96 if (local
== t
->parms
.iph
.saddr
&& (t
->dev
->flags
&IFF_UP
))
99 if ((t
= tunnels_wc
[0]) != NULL
&& (t
->dev
->flags
&IFF_UP
))
104 static struct ip_tunnel
** ipip6_bucket(struct ip_tunnel
*t
)
106 u32 remote
= t
->parms
.iph
.daddr
;
107 u32 local
= t
->parms
.iph
.saddr
;
119 return &tunnels
[prio
][h
];
122 static void ipip6_tunnel_unlink(struct ip_tunnel
*t
)
124 struct ip_tunnel
**tp
;
126 for (tp
= ipip6_bucket(t
); *tp
; tp
= &(*tp
)->next
) {
128 write_lock_bh(&ipip6_lock
);
130 write_unlock_bh(&ipip6_lock
);
136 static void ipip6_tunnel_link(struct ip_tunnel
*t
)
138 struct ip_tunnel
**tp
= ipip6_bucket(t
);
141 write_lock_bh(&ipip6_lock
);
143 write_unlock_bh(&ipip6_lock
);
146 static struct ip_tunnel
* ipip6_tunnel_locate(struct ip_tunnel_parm
*parms
, int create
)
148 u32 remote
= parms
->iph
.daddr
;
149 u32 local
= parms
->iph
.saddr
;
150 struct ip_tunnel
*t
, **tp
, *nt
;
151 struct net_device
*dev
;
164 for (tp
= &tunnels
[prio
][h
]; (t
= *tp
) != NULL
; tp
= &t
->next
) {
165 if (local
== t
->parms
.iph
.saddr
&& remote
== t
->parms
.iph
.daddr
)
172 strlcpy(name
, parms
->name
, IFNAMSIZ
);
175 for (i
=1; i
<100; i
++) {
176 sprintf(name
, "sit%d", i
);
177 if (__dev_get_by_name(name
) == NULL
)
184 dev
= alloc_netdev(sizeof(*t
), name
, ipip6_tunnel_setup
);
188 nt
= netdev_priv(dev
);
189 dev
->init
= ipip6_tunnel_init
;
192 if (register_netdevice(dev
) < 0) {
199 ipip6_tunnel_link(nt
);
206 static void ipip6_tunnel_uninit(struct net_device
*dev
)
208 if (dev
== ipip6_fb_tunnel_dev
) {
209 write_lock_bh(&ipip6_lock
);
210 tunnels_wc
[0] = NULL
;
211 write_unlock_bh(&ipip6_lock
);
214 ipip6_tunnel_unlink(netdev_priv(dev
));
220 static void ipip6_err(struct sk_buff
*skb
, u32 info
)
222 #ifndef I_WISH_WORLD_WERE_PERFECT
224 /* It is not :-( All the routers (except for Linux) return only
225 8 bytes of packet payload. It means, that precise relaying of
226 ICMP in the real Internet is absolutely infeasible.
228 struct iphdr
*iph
= (struct iphdr
*)skb
->data
;
229 int type
= skb
->h
.icmph
->type
;
230 int code
= skb
->h
.icmph
->code
;
235 case ICMP_PARAMETERPROB
:
238 case ICMP_DEST_UNREACH
:
241 case ICMP_PORT_UNREACH
:
242 /* Impossible event. */
244 case ICMP_FRAG_NEEDED
:
245 /* Soft state for pmtu is maintained by IP core. */
248 /* All others are translated to HOST_UNREACH.
249 rfc2003 contains "deep thoughts" about NET_UNREACH,
250 I believe they are just ether pollution. --ANK
255 case ICMP_TIME_EXCEEDED
:
256 if (code
!= ICMP_EXC_TTL
)
261 read_lock(&ipip6_lock
);
262 t
= ipip6_tunnel_lookup(iph
->daddr
, iph
->saddr
);
263 if (t
== NULL
|| t
->parms
.iph
.daddr
== 0)
265 if (t
->parms
.iph
.ttl
== 0 && type
== ICMP_TIME_EXCEEDED
)
268 if (jiffies
- t
->err_time
< IPTUNNEL_ERR_TIMEO
)
272 t
->err_time
= jiffies
;
274 read_unlock(&ipip6_lock
);
277 struct iphdr
*iph
= (struct iphdr
*)dp
;
278 int hlen
= iph
->ihl
<<2;
279 struct ipv6hdr
*iph6
;
280 int type
= skb
->h
.icmph
->type
;
281 int code
= skb
->h
.icmph
->code
;
285 struct sk_buff
*skb2
;
286 struct rt6_info
*rt6i
;
288 if (len
< hlen
+ sizeof(struct ipv6hdr
))
290 iph6
= (struct ipv6hdr
*)(dp
+ hlen
);
295 case ICMP_PARAMETERPROB
:
296 if (skb
->h
.icmph
->un
.gateway
< hlen
)
299 /* So... This guy found something strange INSIDE encapsulated
300 packet. Well, he is fool, but what can we do ?
302 rel_type
= ICMPV6_PARAMPROB
;
303 rel_info
= skb
->h
.icmph
->un
.gateway
- hlen
;
306 case ICMP_DEST_UNREACH
:
309 case ICMP_PORT_UNREACH
:
310 /* Impossible event. */
312 case ICMP_FRAG_NEEDED
:
313 /* Too complicated case ... */
316 /* All others are translated to HOST_UNREACH.
317 rfc2003 contains "deep thoughts" about NET_UNREACH,
318 I believe, it is just ether pollution. --ANK
320 rel_type
= ICMPV6_DEST_UNREACH
;
321 rel_code
= ICMPV6_ADDR_UNREACH
;
325 case ICMP_TIME_EXCEEDED
:
326 if (code
!= ICMP_EXC_TTL
)
328 rel_type
= ICMPV6_TIME_EXCEED
;
329 rel_code
= ICMPV6_EXC_HOPLIMIT
;
333 /* Prepare fake skb to feed it to icmpv6_send */
334 skb2
= skb_clone(skb
, GFP_ATOMIC
);
337 dst_release(skb2
->dst
);
339 skb_pull(skb2
, skb
->data
- (u8
*)iph6
);
340 skb2
->nh
.raw
= skb2
->data
;
342 /* Try to guess incoming interface */
343 rt6i
= rt6_lookup(&iph6
->saddr
, NULL
, NULL
, 0);
344 if (rt6i
&& rt6i
->rt6i_dev
) {
345 skb2
->dev
= rt6i
->rt6i_dev
;
347 rt6i
= rt6_lookup(&iph6
->daddr
, &iph6
->saddr
, NULL
, 0);
349 if (rt6i
&& rt6i
->rt6i_dev
&& rt6i
->rt6i_dev
->type
== ARPHRD_SIT
) {
350 struct ip_tunnel
*t
= netdev_priv(rt6i
->rt6i_dev
);
351 if (rel_type
== ICMPV6_TIME_EXCEED
&& t
->parms
.iph
.ttl
) {
352 rel_type
= ICMPV6_DEST_UNREACH
;
353 rel_code
= ICMPV6_ADDR_UNREACH
;
355 icmpv6_send(skb2
, rel_type
, rel_code
, rel_info
, skb2
->dev
);
363 static inline void ipip6_ecn_decapsulate(struct iphdr
*iph
, struct sk_buff
*skb
)
365 if (INET_ECN_is_ce(iph
->tos
))
366 IP6_ECN_set_ce(skb
->nh
.ipv6h
);
369 static int ipip6_rcv(struct sk_buff
*skb
)
372 struct ip_tunnel
*tunnel
;
374 if (!pskb_may_pull(skb
, sizeof(struct ipv6hdr
)))
379 read_lock(&ipip6_lock
);
380 if ((tunnel
= ipip6_tunnel_lookup(iph
->saddr
, iph
->daddr
)) != NULL
) {
382 skb
->mac
.raw
= skb
->nh
.raw
;
383 skb
->nh
.raw
= skb
->data
;
384 memset(&(IPCB(skb
)->opt
), 0, sizeof(struct ip_options
));
385 IPCB(skb
)->flags
= 0;
386 skb
->protocol
= htons(ETH_P_IPV6
);
387 skb
->pkt_type
= PACKET_HOST
;
388 tunnel
->stat
.rx_packets
++;
389 tunnel
->stat
.rx_bytes
+= skb
->len
;
390 skb
->dev
= tunnel
->dev
;
391 dst_release(skb
->dst
);
394 ipip6_ecn_decapsulate(iph
, skb
);
396 read_unlock(&ipip6_lock
);
400 icmp_send(skb
, ICMP_DEST_UNREACH
, ICMP_PORT_UNREACH
, 0);
402 read_unlock(&ipip6_lock
);
407 /* Returns the embedded IPv4 address if the IPv6 address
408 comes from 6to4 (RFC 3056) addr space */
410 static inline u32
try_6to4(struct in6_addr
*v6dst
)
414 if (v6dst
->s6_addr16
[0] == htons(0x2002)) {
415 /* 6to4 v6 addr has 16 bits prefix, 32 v4addr, 16 SLA, ... */
416 memcpy(&dst
, &v6dst
->s6_addr16
[1], 4);
422 * This function assumes it is being called from dev_queue_xmit()
423 * and that skb is filled properly by that function.
426 static int ipip6_tunnel_xmit(struct sk_buff
*skb
, struct net_device
*dev
)
428 struct ip_tunnel
*tunnel
= netdev_priv(dev
);
429 struct net_device_stats
*stats
= &tunnel
->stat
;
430 struct iphdr
*tiph
= &tunnel
->parms
.iph
;
431 struct ipv6hdr
*iph6
= skb
->nh
.ipv6h
;
432 u8 tos
= tunnel
->parms
.iph
.tos
;
433 struct rtable
*rt
; /* Route to the other host */
434 struct net_device
*tdev
; /* Device to other host */
435 struct iphdr
*iph
; /* Our new IP header */
436 int max_headroom
; /* The extra header space needed */
437 u32 dst
= tiph
->daddr
;
439 struct in6_addr
*addr6
;
442 if (tunnel
->recursion
++) {
443 tunnel
->stat
.collisions
++;
447 if (skb
->protocol
!= htons(ETH_P_IPV6
))
451 dst
= try_6to4(&iph6
->daddr
);
454 struct neighbour
*neigh
= NULL
;
457 neigh
= skb
->dst
->neighbour
;
461 printk(KERN_DEBUG
"sit: nexthop == NULL\n");
465 addr6
= (struct in6_addr
*)&neigh
->primary_key
;
466 addr_type
= ipv6_addr_type(addr6
);
468 if (addr_type
== IPV6_ADDR_ANY
) {
469 addr6
= &skb
->nh
.ipv6h
->daddr
;
470 addr_type
= ipv6_addr_type(addr6
);
473 if ((addr_type
& IPV6_ADDR_COMPATv4
) == 0)
476 dst
= addr6
->s6_addr32
[3];
480 struct flowi fl
= { .nl_u
= { .ip4_u
=
482 .saddr
= tiph
->saddr
,
483 .tos
= RT_TOS(tos
) } },
484 .oif
= tunnel
->parms
.link
,
485 .proto
= IPPROTO_IPV6
};
486 if (ip_route_output_key(&rt
, &fl
)) {
487 tunnel
->stat
.tx_carrier_errors
++;
491 if (rt
->rt_type
!= RTN_UNICAST
) {
493 tunnel
->stat
.tx_carrier_errors
++;
496 tdev
= rt
->u
.dst
.dev
;
500 tunnel
->stat
.collisions
++;
505 mtu
= dst_mtu(&rt
->u
.dst
) - sizeof(struct iphdr
);
507 mtu
= skb
->dst
? dst_mtu(skb
->dst
) : dev
->mtu
;
510 tunnel
->stat
.collisions
++;
514 if (mtu
< IPV6_MIN_MTU
)
516 if (tunnel
->parms
.iph
.daddr
&& skb
->dst
)
517 skb
->dst
->ops
->update_pmtu(skb
->dst
, mtu
);
519 if (skb
->len
> mtu
) {
520 icmpv6_send(skb
, ICMPV6_PKT_TOOBIG
, 0, mtu
, dev
);
525 if (tunnel
->err_count
> 0) {
526 if (jiffies
- tunnel
->err_time
< IPTUNNEL_ERR_TIMEO
) {
528 dst_link_failure(skb
);
530 tunnel
->err_count
= 0;
534 * Okay, now see if we can stuff it in the buffer as-is.
536 max_headroom
= LL_RESERVED_SPACE(tdev
)+sizeof(struct iphdr
);
538 if (skb_headroom(skb
) < max_headroom
|| skb_cloned(skb
) || skb_shared(skb
)) {
539 struct sk_buff
*new_skb
= skb_realloc_headroom(skb
, max_headroom
);
548 skb_set_owner_w(new_skb
, skb
->sk
);
551 iph6
= skb
->nh
.ipv6h
;
554 skb
->h
.raw
= skb
->nh
.raw
;
555 skb
->nh
.raw
= skb_push(skb
, sizeof(struct iphdr
));
556 memset(&(IPCB(skb
)->opt
), 0, sizeof(IPCB(skb
)->opt
));
557 IPCB(skb
)->flags
= 0;
558 dst_release(skb
->dst
);
559 skb
->dst
= &rt
->u
.dst
;
562 * Push down and install the IPIP header.
567 iph
->ihl
= sizeof(struct iphdr
)>>2;
568 if (mtu
> IPV6_MIN_MTU
)
569 iph
->frag_off
= htons(IP_DF
);
573 iph
->protocol
= IPPROTO_IPV6
;
574 iph
->tos
= INET_ECN_encapsulate(tos
, ipv6_get_dsfield(iph6
));
575 iph
->daddr
= rt
->rt_dst
;
576 iph
->saddr
= rt
->rt_src
;
578 if ((iph
->ttl
= tiph
->ttl
) == 0)
579 iph
->ttl
= iph6
->hop_limit
;
588 dst_link_failure(skb
);
597 ipip6_tunnel_ioctl (struct net_device
*dev
, struct ifreq
*ifr
, int cmd
)
600 struct ip_tunnel_parm p
;
606 if (dev
== ipip6_fb_tunnel_dev
) {
607 if (copy_from_user(&p
, ifr
->ifr_ifru
.ifru_data
, sizeof(p
))) {
611 t
= ipip6_tunnel_locate(&p
, 0);
614 t
= netdev_priv(dev
);
615 memcpy(&p
, &t
->parms
, sizeof(p
));
616 if (copy_to_user(ifr
->ifr_ifru
.ifru_data
, &p
, sizeof(p
)))
623 if (!capable(CAP_NET_ADMIN
))
627 if (copy_from_user(&p
, ifr
->ifr_ifru
.ifru_data
, sizeof(p
)))
631 if (p
.iph
.version
!= 4 || p
.iph
.protocol
!= IPPROTO_IPV6
||
632 p
.iph
.ihl
!= 5 || (p
.iph
.frag_off
&htons(~IP_DF
)))
635 p
.iph
.frag_off
|= htons(IP_DF
);
637 t
= ipip6_tunnel_locate(&p
, cmd
== SIOCADDTUNNEL
);
639 if (dev
!= ipip6_fb_tunnel_dev
&& cmd
== SIOCCHGTUNNEL
) {
646 if (((dev
->flags
&IFF_POINTOPOINT
) && !p
.iph
.daddr
) ||
647 (!(dev
->flags
&IFF_POINTOPOINT
) && p
.iph
.daddr
)) {
651 t
= netdev_priv(dev
);
652 ipip6_tunnel_unlink(t
);
653 t
->parms
.iph
.saddr
= p
.iph
.saddr
;
654 t
->parms
.iph
.daddr
= p
.iph
.daddr
;
655 memcpy(dev
->dev_addr
, &p
.iph
.saddr
, 4);
656 memcpy(dev
->broadcast
, &p
.iph
.daddr
, 4);
657 ipip6_tunnel_link(t
);
658 netdev_state_change(dev
);
664 if (cmd
== SIOCCHGTUNNEL
) {
665 t
->parms
.iph
.ttl
= p
.iph
.ttl
;
666 t
->parms
.iph
.tos
= p
.iph
.tos
;
668 if (copy_to_user(ifr
->ifr_ifru
.ifru_data
, &t
->parms
, sizeof(p
)))
671 err
= (cmd
== SIOCADDTUNNEL
? -ENOBUFS
: -ENOENT
);
676 if (!capable(CAP_NET_ADMIN
))
679 if (dev
== ipip6_fb_tunnel_dev
) {
681 if (copy_from_user(&p
, ifr
->ifr_ifru
.ifru_data
, sizeof(p
)))
684 if ((t
= ipip6_tunnel_locate(&p
, 0)) == NULL
)
687 if (t
== netdev_priv(ipip6_fb_tunnel_dev
))
691 err
= unregister_netdevice(dev
);
702 static struct net_device_stats
*ipip6_tunnel_get_stats(struct net_device
*dev
)
704 return &(((struct ip_tunnel
*)netdev_priv(dev
))->stat
);
707 static int ipip6_tunnel_change_mtu(struct net_device
*dev
, int new_mtu
)
709 if (new_mtu
< IPV6_MIN_MTU
|| new_mtu
> 0xFFF8 - sizeof(struct iphdr
))
715 static void ipip6_tunnel_setup(struct net_device
*dev
)
717 SET_MODULE_OWNER(dev
);
718 dev
->uninit
= ipip6_tunnel_uninit
;
719 dev
->destructor
= free_netdev
;
720 dev
->hard_start_xmit
= ipip6_tunnel_xmit
;
721 dev
->get_stats
= ipip6_tunnel_get_stats
;
722 dev
->do_ioctl
= ipip6_tunnel_ioctl
;
723 dev
->change_mtu
= ipip6_tunnel_change_mtu
;
725 dev
->type
= ARPHRD_SIT
;
726 dev
->hard_header_len
= LL_MAX_HEADER
+ sizeof(struct iphdr
);
727 dev
->mtu
= ETH_DATA_LEN
- sizeof(struct iphdr
);
728 dev
->flags
= IFF_NOARP
;
733 static int ipip6_tunnel_init(struct net_device
*dev
)
735 struct net_device
*tdev
= NULL
;
736 struct ip_tunnel
*tunnel
;
739 tunnel
= netdev_priv(dev
);
740 iph
= &tunnel
->parms
.iph
;
743 strcpy(tunnel
->parms
.name
, dev
->name
);
745 memcpy(dev
->dev_addr
, &tunnel
->parms
.iph
.saddr
, 4);
746 memcpy(dev
->broadcast
, &tunnel
->parms
.iph
.daddr
, 4);
749 struct flowi fl
= { .nl_u
= { .ip4_u
=
750 { .daddr
= iph
->daddr
,
752 .tos
= RT_TOS(iph
->tos
) } },
753 .oif
= tunnel
->parms
.link
,
754 .proto
= IPPROTO_IPV6
};
756 if (!ip_route_output_key(&rt
, &fl
)) {
757 tdev
= rt
->u
.dst
.dev
;
760 dev
->flags
|= IFF_POINTOPOINT
;
763 if (!tdev
&& tunnel
->parms
.link
)
764 tdev
= __dev_get_by_index(tunnel
->parms
.link
);
767 dev
->hard_header_len
= tdev
->hard_header_len
+ sizeof(struct iphdr
);
768 dev
->mtu
= tdev
->mtu
- sizeof(struct iphdr
);
769 if (dev
->mtu
< IPV6_MIN_MTU
)
770 dev
->mtu
= IPV6_MIN_MTU
;
772 dev
->iflink
= tunnel
->parms
.link
;
777 static int __init
ipip6_fb_tunnel_init(struct net_device
*dev
)
779 struct ip_tunnel
*tunnel
= netdev_priv(dev
);
780 struct iphdr
*iph
= &tunnel
->parms
.iph
;
783 strcpy(tunnel
->parms
.name
, dev
->name
);
786 iph
->protocol
= IPPROTO_IPV6
;
791 tunnels_wc
[0] = tunnel
;
795 static struct net_protocol sit_protocol
= {
796 .handler
= ipip6_rcv
,
797 .err_handler
= ipip6_err
,
800 static void __exit
sit_destroy_tunnels(void)
804 for (prio
= 1; prio
< 4; prio
++) {
806 for (h
= 0; h
< HASH_SIZE
; h
++) {
808 while ((t
= tunnels
[prio
][h
]) != NULL
)
809 unregister_netdevice(t
->dev
);
814 void __exit
sit_cleanup(void)
816 inet_del_protocol(&sit_protocol
, IPPROTO_IPV6
);
819 sit_destroy_tunnels();
820 unregister_netdevice(ipip6_fb_tunnel_dev
);
824 int __init
sit_init(void)
828 printk(KERN_INFO
"IPv6 over IPv4 tunneling driver\n");
830 if (inet_add_protocol(&sit_protocol
, IPPROTO_IPV6
) < 0) {
831 printk(KERN_INFO
"sit init: Can't add protocol\n");
835 ipip6_fb_tunnel_dev
= alloc_netdev(sizeof(struct ip_tunnel
), "sit0",
837 if (!ipip6_fb_tunnel_dev
) {
842 ipip6_fb_tunnel_dev
->init
= ipip6_fb_tunnel_init
;
844 if ((err
= register_netdev(ipip6_fb_tunnel_dev
)))
850 free_netdev(ipip6_fb_tunnel_dev
);
852 inet_del_protocol(&sit_protocol
, IPPROTO_IPV6
);