Merge remote branch 'origin/stable' into stable
[olsrd.git] / src / linux / kernel_tunnel.c
1 /*
2  * The olsr.org Optimized Link-State Routing daemon(olsrd)
3  * Copyright (c) 2004, Andreas Tonnesen(andreto@olsr.org)
4  * Copyright (c) 2007, Sven-Ola for the policy routing stuff
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  *
11  * * Redistributions of source code must retain the above copyright
12  *   notice, this list of conditions and the following disclaimer.
13  * * Redistributions in binary form must reproduce the above copyright
14  *   notice, this list of conditions and the following disclaimer in
15  *   the documentation and/or other materials provided with the
16  *   distribution.
17  * * Neither the name of olsr.org, olsrd nor the names of its
18  *   contributors may be used to endorse or promote products derived
19  *   from this software without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
25  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
29  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
31  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32  * POSSIBILITY OF SUCH DAMAGE.
33  *
34  * Visit http://www.olsr.org for more information.
35  *
36  * If you find this software useful feel free to make a donation
37  * to the project. For more information see the website or contact
38  * the copyright holders.
39  *
40  */
41
42 #include "kernel_tunnel.h"
43 #include "kernel_routes.h"
44 #include "log.h"
45 #include "olsr_types.h"
46 #include "net_os.h"
47 #include "olsr_cookie.h"
48 #include "ipcalc.h"
49
50 #include <assert.h>
51
52 //ipip includes
53 #include <arpa/inet.h>
54 #include <netinet/in.h>
55 #include <sys/ioctl.h>
56 #include <net/if.h>
57 #include <linux/ip.h>
58 #include <linux/if_tunnel.h>
59 #include <linux/version.h>
60 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0)
61 #include <linux/ip6_tunnel.h>
62 #endif
63
64 //ifup includes
65 #include <sys/socket.h>
66 #include <sys/ioctl.h>
67 #include <sys/types.h>
68 #include <net/if.h>
69
70 static const char DEV_IPV4_TUNNEL[IFNAMSIZ] = TUNNEL_ENDPOINT_IF;
71 static const char DEV_IPV6_TUNNEL[IFNAMSIZ] = TUNNEL_ENDPOINT_IF6;
72
73 static bool store_iptunnel_state;
74 static struct olsr_cookie_info *tunnel_cookie;
75 static struct avl_tree tunnel_tree;
76
77 int olsr_os_init_iptunnel(void) {
78   const char *dev = olsr_cnf->ip_version == AF_INET ? DEV_IPV4_TUNNEL : DEV_IPV6_TUNNEL;
79
80   tunnel_cookie = olsr_alloc_cookie("iptunnel", OLSR_COOKIE_TYPE_MEMORY);
81   olsr_cookie_set_memory_size(tunnel_cookie, sizeof(struct olsr_iptunnel_entry));
82   avl_init(&tunnel_tree, avl_comp_default);
83
84   store_iptunnel_state = olsr_if_isup(dev);
85   if (store_iptunnel_state) {
86     return 0;
87   }
88   if (olsr_if_set_state(dev, true)) {
89     return -1;
90   }
91
92   return olsr_os_ifip(if_nametoindex(dev), &olsr_cnf->main_addr, true);
93 }
94
95 void olsr_os_cleanup_iptunnel(void) {
96   while (tunnel_tree.count > 0) {
97     struct olsr_iptunnel_entry *t;
98
99     /* kill tunnel */
100     t = (struct olsr_iptunnel_entry *)avl_walk_first(&tunnel_tree);
101     t->usage = 1;
102
103     olsr_os_del_ipip_tunnel(t);
104   }
105   if (!store_iptunnel_state) {
106     olsr_if_set_state(olsr_cnf->ip_version == AF_INET ? DEV_IPV4_TUNNEL : DEV_IPV6_TUNNEL, false);
107   }
108
109   olsr_free_cookie(tunnel_cookie);
110 }
111
112 /**
113  * creates an ipip tunnel (for ipv4)
114  * @param name interface name
115  * @param target pointer to tunnel target IP, NULL if tunnel should be removed
116  * @return 0 if an error happened,
117  *   if_index for successful created tunnel, 1 for successful deleted tunnel
118  */
119 static int os_ip4_tunnel(const char *name, in_addr_t *target)
120 {
121   struct ifreq ifr;
122   int err;
123   struct ip_tunnel_parm p;
124
125   /* only IPIP tunnel if OLSR runs with IPv6 */
126   assert (olsr_cnf->ip_version == AF_INET);
127   memset(&p, 0, sizeof(p));
128   p.iph.version = 4;
129   p.iph.ihl = 5;
130   p.iph.ttl = 64;
131   p.iph.protocol = IPPROTO_IPIP;
132   if (target) {
133     p.iph.daddr = *target;
134   }
135   strncpy(p.name, name, IFNAMSIZ);
136
137   memset(&ifr, 0, sizeof(ifr));
138   strncpy(ifr.ifr_name, target != NULL ? DEV_IPV4_TUNNEL : name, IFNAMSIZ);
139   ifr.ifr_ifru.ifru_data = (void *) &p;
140
141   if ((err = ioctl(olsr_cnf->ioctl_s, target != NULL ? SIOCADDTUNNEL : SIOCDELTUNNEL, &ifr))) {
142     char buffer[INET6_ADDRSTRLEN];
143
144     olsr_syslog(OLSR_LOG_ERR, "Cannot %s a tunnel %s to %s: %s (%d)\n",
145         target != NULL ? "add" : "remove", name,
146         target != NULL ? inet_ntop(olsr_cnf->ip_version, target, buffer, sizeof(buffer)) : "-",
147         strerror(errno), errno);
148     return 0;
149   }
150   return target != NULL ? if_nametoindex(name) : 1;
151 }
152
153 /**
154  * creates an ipip tunnel (for ipv6)
155  * @param name interface name
156  * @param target pointer to tunnel target IP, NULL if tunnel should be removed
157  * @return 0 if an error happened,
158  *   if_index for successful created tunnel, 1 for successful deleted tunnel
159  */
160 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0)
161 static int os_ip6_tunnel(const char *name, struct in6_addr *target)
162 {
163   struct ifreq ifr;
164   int err;
165   struct ip6_tnl_parm p;
166
167   /* only IP6 tunnel if OLSR runs with IPv6 */
168   assert (olsr_cnf->ip_version == AF_INET6);
169   memset(&p, 0, sizeof(p));
170   p.proto = 0; /* any protocol */
171   if (target) {
172     p.raddr = *target;
173   }
174   strncpy(p.name, name, IFNAMSIZ);
175
176   memset(&ifr, 0, sizeof(ifr));
177   strncpy(ifr.ifr_name, target != NULL ? DEV_IPV6_TUNNEL : name, IFNAMSIZ);
178   ifr.ifr_ifru.ifru_data = (void *) &p;
179
180   if ((err = ioctl(olsr_cnf->ioctl_s, target != NULL ? SIOCADDTUNNEL : SIOCDELTUNNEL, &ifr))) {
181     char buffer[INET6_ADDRSTRLEN];
182
183     olsr_syslog(OLSR_LOG_ERR, "Cannot %s a tunnel %s to %s: %s (%d)\n",
184         target != NULL ? "add" : "remove", name,
185         target != NULL ? inet_ntop(olsr_cnf->ip_version, target, buffer, sizeof(buffer)) : "-",
186         strerror(errno), errno);
187     return 0;
188   }
189   return target != NULL ? if_nametoindex(name) : 1;
190 }
191 #endif
192
193 /**
194  * Dummy for generating an interface name for an olsr ipip tunnel
195  * @param target IP destination of the tunnel
196  * @param name pointer to output buffer (length IFNAMSIZ)
197  */
198 static void generate_iptunnel_name(union olsr_ip_addr *target, char *name) {
199   static char PREFIX[] = "tnl_";
200   static uint32_t counter = 0;
201
202   snprintf(name, IFNAMSIZ, "%s%08x", PREFIX,
203       olsr_cnf->ip_version == AF_INET ? target->v4.s_addr : ++counter);
204 }
205
206 /**
207  * demands an ipip tunnel to a certain target. If no tunnel exists it will be created
208  * @param target ip address of the target
209  * @param transportV4 true if IPv4 traffic is used, false for IPv6 traffic
210  * @return NULL if an error happened, pointer to olsr_iptunnel_entry otherwise
211  */
212 struct olsr_iptunnel_entry *olsr_os_add_ipip_tunnel(union olsr_ip_addr *target, bool transportV4 __attribute__ ((unused))) {
213   struct olsr_iptunnel_entry *t;
214
215   assert(olsr_cnf->ip_version == AF_INET6 || transportV4);
216
217   t = (struct olsr_iptunnel_entry *)avl_find(&tunnel_tree, target);
218   if (t == NULL) {
219     char name[IFNAMSIZ];
220     int if_idx;
221     struct ipaddr_str buf;
222
223     memset(name, 0, sizeof(name));
224     generate_iptunnel_name(target, name);
225
226     if (olsr_cnf->ip_version == AF_INET) {
227       if_idx = os_ip4_tunnel(name, &target->v4.s_addr);
228     }
229     else {
230 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0)
231       if_idx = os_ip6_tunnel(name, &target->v6);
232 #else
233       if_idx = 0;
234 #endif
235     }
236
237     if (if_idx == 0) {
238       // cannot create tunnel
239       olsr_syslog(OLSR_LOG_ERR, "Cannot create tunnel %s\n", name);
240       return NULL;
241     }
242
243     if (olsr_if_set_state(name, true)) {
244       if (olsr_cnf->ip_version == AF_INET) {
245         os_ip4_tunnel(name, NULL);
246       }
247       else {
248   #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0)
249         os_ip6_tunnel(name, NULL);
250   #endif
251       }
252       return NULL;
253     }
254
255     /* set originator IP for tunnel */
256     olsr_os_ifip(if_idx, &olsr_cnf->main_addr, true);
257
258     t = olsr_cookie_malloc(tunnel_cookie);
259     memcpy(&t->target, target, sizeof(*target));
260     t->node.key = &t->target;
261
262     strncpy(t->if_name, name, IFNAMSIZ);
263     t->if_index = if_idx;
264
265     avl_insert(&tunnel_tree, &t->node, AVL_DUP_NO);
266   }
267
268   t->usage++;
269   return t;
270 }
271
272 /**
273  * Release an olsr ipip tunnel. Tunnel will be deleted
274  * if this was the last user
275  * @param t pointer to olsr_iptunnel_entry
276  */
277 static void internal_olsr_os_del_ipip_tunnel(struct olsr_iptunnel_entry *t, bool cleanup) {
278   if (!cleanup) {
279     if (t->usage == 0) {
280       return;
281     }
282     t->usage--;
283
284     if (t->usage > 0) {
285       return;
286     }
287   }
288
289   olsr_if_set_state(t->if_name, false);
290   if (olsr_cnf->ip_version == AF_INET) {
291     os_ip4_tunnel(t->if_name, NULL);
292   }
293   else {
294 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0)
295     os_ip6_tunnel(t->if_name, NULL);
296 #endif
297   }
298
299   avl_delete(&tunnel_tree, &t->node);
300   if (!cleanup) {
301     olsr_cookie_free(tunnel_cookie, t);
302   }
303 }
304
305 void olsr_os_del_ipip_tunnel(struct olsr_iptunnel_entry *t) {
306   internal_olsr_os_del_ipip_tunnel(t, false);
307 }