ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/gvpe/src/vpn.C
(Generate patch)

Comparing gvpe/src/vpn.C (file contents):
Revision 1.1 by pcg, Wed Apr 2 03:25:17 2003 UTC vs.
Revision 1.21 by pcg, Thu Oct 16 21:57:54 2003 UTC

1/* 1/*
2 vpn.C -- handle the protocol, encryption, handshaking etc. 2 vpn.C -- handle the protocol, encryption, handshaking etc.
3 Copyright (C) 2003 Marc Lehmann <pcg@goof.com>
3 4
4 This program is free software; you can redistribute it and/or modify 5 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by 6 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or 7 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version. 8 (at your option) any later version.
… …
24#include <cstring> 25#include <cstring>
25#include <cstdio> 26#include <cstdio>
26 27
27#include <sys/types.h> 28#include <sys/types.h>
28#include <sys/socket.h> 29#include <sys/socket.h>
29#include <sys/poll.h>
30#include <sys/wait.h> 30#include <sys/wait.h>
31#include <netinet/in.h>
32#include <arpa/inet.h>
33#include <errno.h> 31#include <errno.h>
34#include <time.h> 32#include <time.h>
35#include <unistd.h> 33#include <unistd.h>
34#include <fcntl.h>
35#include <sys/socket.h>
36
37#include "netcompat.h"
36 38
37#include "pidfile.h" 39#include "pidfile.h"
38 40
39#include "connection.h" 41#include "connection.h"
40#include "util.h" 42#include "util.h"
41#include "vpn.h" 43#include "vpn.h"
42 44
45vpn network; // THE vpn (bad design...)
46
43///////////////////////////////////////////////////////////////////////////// 47/////////////////////////////////////////////////////////////////////////////
44 48
45const char *vpn::script_if_up (int) 49const char *vpn::script_if_up ()
46{ 50{
47 // the tunnel device mtu should be the physical mtu - overhead 51 // the tunnel device mtu should be the physical mtu - overhead
48 // the tricky part is rounding to the cipher key blocksize 52 // the tricky part is rounding to the cipher key blocksize
49 int mtu = conf.mtu - ETH_OVERHEAD - VPE_OVERHEAD - MAX_OVERHEAD; 53 int mtu = conf.mtu - ETH_OVERHEAD - VPE_OVERHEAD - MAX_OVERHEAD;
50 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion 54 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion
51 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round 55 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round
52 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again 56 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again
53 57
54 char *env; 58 char *env;
55 asprintf (&env, "CONFBASE=%s", confbase); 59 asprintf (&env, "CONFBASE=%s", confbase); putenv (env);
56 putenv (env);
57 asprintf (&env, "NODENAME=%s", THISNODE->nodename); 60 asprintf (&env, "NODENAME=%s", THISNODE->nodename); putenv (env);
58 putenv (env);
59 asprintf (&env, "NODEID=%d", THISNODE->id); 61 asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
60 putenv (env);
61 asprintf (&env, "IFNAME=%s", tap->interface ()); 62 asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env);
62 putenv (env); 63 asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);
64 asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);
63 asprintf (&env, "MTU=%d", mtu); 65 asprintf (&env, "MTU=%d", mtu); putenv (env);
64 putenv (env);
65 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x", 66 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x",
66 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8, 67 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8,
67 THISNODE->id & 0xff); 68 THISNODE->id & 0xff);
68 putenv (env); 69 putenv (env);
69 70
… …
71} 72}
72 73
73int 74int
74vpn::setup () 75vpn::setup ()
75{ 76{
76 sockinfo si; 77 ipv4_fd = -1;
77 78
78 si.set (THISNODE); 79 if (THISNODE->protocols & PROT_IPv4 && ::conf.ip_proto)
80 {
81 ipv4_fd = socket (PF_INET, SOCK_RAW, ::conf.ip_proto);
82
83 if (ipv4_fd < 0)
84 return -1;
85
86 fcntl (ipv4_fd, F_SETFL, O_NONBLOCK);
87
88#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
89 // this I really consider a linux bug. I am neither connected
90 // nor do I fragment myself. Linux still sets DF and doesn't
91 // fragment for me sometimes.
92 {
93 int oval = IP_PMTUDISC_DONT;
94 setsockopt (ipv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
95 }
96#endif
97
98 sockinfo si (THISNODE, PROT_IPv4);
99
100 if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
101 {
102 slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno));
103 exit (1);
104 }
105
106 ipv4_ev_watcher.start (ipv4_fd, POLLIN);
107 }
79 108
80 udpv4_fd = -1; 109 udpv4_fd = -1;
81 110
82 if (THISNODE->protocols & PROT_UDPv4) 111 if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port)
83 { 112 {
84 udpv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP); 113 udpv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);
85 114
86 if (udpv4_fd < 0) 115 if (udpv4_fd < 0)
87 return -1; 116 return -1;
88 117
89 if (bind (udpv4_fd, si.sav4 (), si.salenv4 ())) 118 fcntl (udpv4_fd, F_SETFL, O_NONBLOCK);
119
120 // standard daemon practise...
90 { 121 {
91 slog (L_ERR, _("can't bind udpv4 to %s: %s"), (const char *)si, strerror (errno)); 122 int oval = 1;
92 exit (1); 123 setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
93 } 124 }
94 125
95#ifdef IP_MTU_DISCOVER 126#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
96 // this I really consider a linux bug. I am neither connected 127 // this I really consider a linux bug. I am neither connected
97 // nor do I fragment myself. Linux still sets DF and doesn't 128 // nor do I fragment myself. Linux still sets DF and doesn't
98 // fragment for me sometimes. 129 // fragment for me sometimes.
99 { 130 {
100 int oval = IP_PMTUDISC_DONT; 131 int oval = IP_PMTUDISC_DONT;
101 setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval); 132 setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
102 } 133 }
103#endif 134#endif
104 135
105 // standard daemon practise... 136 sockinfo si (THISNODE, PROT_UDPv4);
137
138 if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
139 {
140 slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno));
141 exit (1);
142 }
143
144 udpv4_ev_watcher.start (udpv4_fd, POLLIN);
145 }
146
147 icmpv4_fd = -1;
148
149#if ENABLE_ICMP
150 if (THISNODE->protocols & PROT_ICMPv4)
151 {
152 icmpv4_fd = socket (PF_INET, SOCK_RAW, IPPROTO_ICMP);
153
154 if (icmpv4_fd < 0)
155 return -1;
156
157 fcntl (icmpv4_fd, F_SETFL, O_NONBLOCK);
158
159#ifdef ICMP_FILTER
106 { 160 {
107 int oval = 1; 161 icmp_filter oval;
162 oval.data = 0xffffffff;
163 if (::conf.icmp_type < 32)
164 oval.data &= ~(1 << ::conf.icmp_type);
165
108 setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval); 166 setsockopt (icmpv4_fd, SOL_RAW, ICMP_FILTER, &oval, sizeof oval);
109 } 167 }
168#endif
110 169
111 udpv4_ev_watcher.start (udpv4_fd, POLLIN); 170#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
112 }
113
114 ipv4_fd = -1;
115 if (THISNODE->protocols & PROT_IPv4)
116 {
117 ipv4_fd = socket (PF_INET, SOCK_RAW, ::conf.ip_proto);
118
119 if (ipv4_fd < 0)
120 return -1;
121
122 if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
123 {
124 slog (L_ERR, _("can't bind ipv4 socket to %s: %s"), (const char *)si, strerror (errno));
125 exit (1);
126 }
127
128#ifdef IP_MTU_DISCOVER
129 // this I really consider a linux bug. I am neither connected 171 // this I really consider a linux bug. I am neither connected
130 // nor do I fragment myself. Linux still sets DF and doesn't 172 // nor do I fragment myself. Linux still sets DF and doesn't
131 // fragment for me sometimes. 173 // fragment for me sometimes.
132 { 174 {
133 int oval = IP_PMTUDISC_DONT; 175 int oval = IP_PMTUDISC_DONT;
134 setsockopt (ipv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval); 176 setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
135 } 177 }
136#endif 178#endif
137 179
180 sockinfo si (THISNODE, PROT_ICMPv4);
181
182 if (bind (icmpv4_fd, si.sav4 (), si.salenv4 ()))
183 {
184 slog (L_ERR, _("can't bind icmpv4 on %s: %s"), (const char *)si, strerror (errno));
185 exit (1);
186 }
187
138 ipv4_ev_watcher.start (ipv4_fd, POLLIN); 188 icmpv4_ev_watcher.start (icmpv4_fd, POLLIN);
189 }
190#endif
191
192 tcpv4_fd = -1;
193
194#if ENABLE_TCP
195 if (THISNODE->protocols & PROT_TCPv4 && THISNODE->tcp_port)
196 {
197 tcpv4_fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP);
198
199 if (tcpv4_fd < 0)
200 return -1;
201
202 fcntl (tcpv4_fd, F_SETFL, O_NONBLOCK);
203
204 // standard daemon practise...
205 {
206 int oval = 1;
207 setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
139 } 208 }
209
210 sockinfo si (THISNODE, PROT_TCPv4);
211
212 if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ()))
213 {
214 slog (L_ERR, _("can't bind tcpv4 on %s: %s"), (const char *)si, strerror (errno));
215 exit (1);
216 }
217
218 if (listen (tcpv4_fd, 5))
219 {
220 slog (L_ERR, _("can't listen tcpv4 on %s: %s"), (const char *)si, strerror (errno));
221 exit (1);
222 }
223
224 tcpv4_ev_watcher.start (tcpv4_fd, POLLIN);
225 }
226#endif
140 227
141 tap = new tap_device (); 228 tap = new tap_device ();
142 if (!tap) //D this, of course, never catches 229 if (!tap) //D this, of course, never catches
143 { 230 {
144 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname); 231 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname);
… …
152 reconnect_all (); 239 reconnect_all ();
153 240
154 return 0; 241 return 0;
155} 242}
156 243
157void 244// send a vpn packet out to other hosts
245bool
246vpn::send_vpn_packet (vpn_packet *pkt, const sockinfo &si, int tos)
247{
248 switch (si.prot)
249 {
250 case PROT_IPv4:
251 return send_ipv4_packet (pkt, si, tos);
252
253 case PROT_UDPv4:
254 return send_udpv4_packet (pkt, si, tos);
255
256#if ENABLE_TCP
257 case PROT_TCPv4:
258 return send_tcpv4_packet (pkt, si, tos);
259#endif
260
261#if ENABLE_ICMP
262 case PROT_ICMPv4:
263 return send_icmpv4_packet (pkt, si, tos);
264#endif
265
266 default:
267 slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si);
268 return false;
269 }
270}
271
272bool
158vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 273vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
159{ 274{
275#if defined(SOL_IP) && defined(IP_TOS)
160 setsockopt (ipv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos); 276 setsockopt (ipv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
277#endif
161 sendto (ipv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ()); 278 sendto (ipv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
162}
163 279
164void 280 return true;
281}
282
283static u16
284ipv4_checksum (u16 *data, unsigned int len)
285{
286 // use 32 bit accumulator and fold back carry bits at the end
287 u32 sum = 0;
288
289 while (len > 1)
290 {
291 sum += *data++;
292 len -= 2;
293 }
294
295 // odd byte left?
296 if (len)
297 sum += *(u8 *)data;
298
299 // add back carry bits
300 sum = (sum >> 16) + (sum & 0xffff); // lo += hi
301 sum += (sum >> 16); // carry
302
303 return ~sum;
304}
305
306#if ENABLE_ICMP
307bool
308vpn::send_icmpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
309{
310#if defined(SOL_IP) && defined(IP_TOS)
311 setsockopt (icmpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
312#endif
313
314 pkt->unshift_hdr (4);
315
316 icmp_header *hdr = (icmp_header *)&((*pkt)[0]);
317 hdr->type = ::conf.icmp_type;
318 hdr->code = 255;
319 hdr->checksum = 0;
320 hdr->checksum = ipv4_checksum ((u16 *)hdr, pkt->len);
321
322 sendto (icmpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
323
324 return true;
325}
326#endif
327
328bool
165vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 329vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
166{ 330{
331#if defined(SOL_IP) && defined(IP_TOS)
167 setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos); 332 setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
333#endif
168 sendto (udpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ()); 334 sendto (udpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
335
336 return true;
337}
338
339void
340vpn::inject_data_packet (tap_packet *pkt, int dst)
341{
342 if (dst)
343 {
344 // unicast
345 if (dst != THISNODE->id)
346 conns[dst - 1]->inject_data_packet (pkt);
347 }
348 else
349 {
350 // broadcast, this is ugly, but due to the security policy
351 // we have to connect to all hosts...
352 for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
353 if ((*c)->conf != THISNODE)
354 (*c)->inject_data_packet (pkt, true);
355 }
169} 356}
170 357
171void 358void
172vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi) 359vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi)
173{ 360{
… …
180 if (src == 0 || src > conns.size () 367 if (src == 0 || src > conns.size ()
181 || dst > conns.size () 368 || dst > conns.size ()
182 || pkt->typ () >= vpn_packet::PT_MAX) 369 || pkt->typ () >= vpn_packet::PT_MAX)
183 slog (L_WARN, _("(%s): received corrupted packet type %d (src %d, dst %d)"), 370 slog (L_WARN, _("(%s): received corrupted packet type %d (src %d, dst %d)"),
184 (const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ()); 371 (const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());
372 else if (dst > conns.size ())
373 slog (L_WARN, _("(%s): received corrupted packet type %d (src %d, dst %d)"),
374 (const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());
185 else 375 else
186 { 376 {
187 connection *c = conns[src - 1]; 377 connection *c = conns[src - 1];
188 378
189 if (dst == 0 && !THISNODE->routerprio) 379 if (dst == 0)
190 slog (L_WARN, _("%s(%s): received broadcast, but we are no router"), 380 slog (L_WARN, _("%s(%s): received broadcast (protocol violation)"),
191 c->conf->nodename, (const char *)rsi); 381 c->conf->nodename, (const char *)rsi);
192 else if (dst != 0 && dst != THISNODE->id) 382 else if (dst != THISNODE->id)
193 // FORWARDING NEEDED ;) 383 {
384 if (THISNODE->routerprio)
385 // the tos setting gets lost here. who cares.
386 conns[dst - 1]->inject_vpn_packet (pkt);
387 else
194 slog (L_WARN, 388 slog (L_WARN,
195 _("received frame for node %d ('%s') from %s, but this is node %d ('%s')"), 389 _("%s(%s): forwarding request (=> %s), but we are no router"),
390 c->conf->nodename, (const char *)rsi,
196 dst, conns[dst - 1]->conf->nodename, 391 conns[dst - 1]->conf->nodename);
197 (const char *)rsi, 392 }
198 THISNODE->id, THISNODE->nodename);
199 else 393 else
200 c->recv_vpn_packet (pkt, rsi); 394 c->recv_vpn_packet (pkt, rsi);
201 } 395 }
202} 396}
203 397
204void 398void
205vpn::udpv4_ev (short revents) 399vpn::ipv4_ev (io_watcher &w, short revents)
206{ 400{
207 if (revents & (POLLIN | POLLERR)) 401 if (revents & (POLLIN | POLLERR))
208 { 402 {
209 vpn_packet *pkt = new vpn_packet; 403 vpn_packet *pkt = new vpn_packet;
210 struct sockaddr_in sa; 404 struct sockaddr_in sa;
211 socklen_t sa_len = sizeof (sa); 405 socklen_t sa_len = sizeof (sa);
212 int len; 406 int len;
213 407
214 len = recvfrom (udpv4_fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len); 408 len = recvfrom (w.fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len);
215 409
216 sockinfo si(sa); 410 sockinfo si(sa, PROT_IPv4);
217 411
218 if (len > 0) 412 if (len > 0)
219 { 413 {
220 pkt->len = len; 414 pkt->len = len;
415
416 // raw sockets deliver the ipv4, but don't expect it on sends
417 // this is slow, but...
418 pkt->skip_hdr (IP_OVERHEAD);
221 419
222 recv_vpn_packet (pkt, si); 420 recv_vpn_packet (pkt, si);
223 } 421 }
224 else 422 else
225 { 423 {
… …
230 delete pkt; 428 delete pkt;
231 } 429 }
232 else if (revents & POLLHUP) 430 else if (revents & POLLHUP)
233 { 431 {
234 // this cannot ;) happen on udp sockets 432 // this cannot ;) happen on udp sockets
235 slog (L_ERR, _("FATAL: POLLHUP on udp v4 fd, terminating.")); 433 slog (L_ERR, _("FATAL: POLLHUP on ipv4 fd, terminating."));
236 exit (1); 434 exit (1);
237 } 435 }
238 else 436 else
239 { 437 {
240 slog (L_ERR, 438 slog (L_ERR,
… …
242 revents); 440 revents);
243 exit (1); 441 exit (1);
244 } 442 }
245} 443}
246 444
445#if ENABLE_ICMP
247void 446void
248vpn::ipv4_ev (short revents) 447vpn::icmpv4_ev (io_watcher &w, short revents)
249{ 448{
250 if (revents & (POLLIN | POLLERR)) 449 if (revents & (POLLIN | POLLERR))
251 { 450 {
252 vpn_packet *pkt = new vpn_packet; 451 vpn_packet *pkt = new vpn_packet;
253 struct sockaddr_in sa; 452 struct sockaddr_in sa;
254 socklen_t sa_len = sizeof (sa); 453 socklen_t sa_len = sizeof (sa);
255 int len; 454 int len;
256 455
257 len = recvfrom (ipv4_fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len); 456 len = recvfrom (w.fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len);
258 457
259 sockinfo si(sa, PROT_IPv4); 458 sockinfo si(sa, PROT_ICMPv4);
260 459
261 if (len > 0) 460 if (len > 0)
262 { 461 {
263 pkt->len = len; 462 pkt->len = len;
264 463
464 icmp_header *hdr = (icmp_header *)&((*pkt)[IP_OVERHEAD]);
465
466 if (hdr->type == ::conf.icmp_type
467 && hdr->code == 255)
468 {
265 // raw sockets deliver the ipv4, but don't expect it on sends 469 // raw sockets deliver the ipv4, but don't expect it on sends
266 // this is slow, but... 470 // this is slow, but...
267 pkt->skip_hdr (IP_OVERHEAD); 471 pkt->skip_hdr (ICMP_OVERHEAD);
268 472
269 recv_vpn_packet (pkt, si); 473 recv_vpn_packet (pkt, si);
474 }
270 } 475 }
271 else 476 else
272 { 477 {
273 // probably ECONNRESET or somesuch 478 // probably ECONNRESET or somesuch
274 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno)); 479 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));
… …
277 delete pkt; 482 delete pkt;
278 } 483 }
279 else if (revents & POLLHUP) 484 else if (revents & POLLHUP)
280 { 485 {
281 // this cannot ;) happen on udp sockets 486 // this cannot ;) happen on udp sockets
282 slog (L_ERR, _("FATAL: POLLHUP on ipv4 fd, terminating.")); 487 slog (L_ERR, _("FATAL: POLLHUP on icmpv4 fd, terminating."));
283 exit (1); 488 exit (1);
284 } 489 }
285 else 490 else
286 { 491 {
287 slog (L_ERR, 492 slog (L_ERR,
288 _("FATAL: unknown revents %08x in socket, terminating\n"), 493 _("FATAL: unknown revents %08x in socket, terminating\n"),
289 revents); 494 revents);
290 exit (1); 495 exit (1);
291 } 496 }
292} 497}
498#endif
293 499
294void 500void
501vpn::udpv4_ev (io_watcher &w, short revents)
502{
503 if (revents & (POLLIN | POLLERR))
504 {
505 vpn_packet *pkt = new vpn_packet;
506 struct sockaddr_in sa;
507 socklen_t sa_len = sizeof (sa);
508 int len;
509
510 len = recvfrom (w.fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len);
511
512 sockinfo si(sa, PROT_UDPv4);
513
514 if (len > 0)
515 {
516 pkt->len = len;
517
518 recv_vpn_packet (pkt, si);
519 }
520 else
521 {
522 // probably ECONNRESET or somesuch
523 slog (L_DEBUG, _("%s: fd %d, %s"), (const char *)si, w.fd, strerror (errno));
524 }
525
526 delete pkt;
527 }
528 else if (revents & POLLHUP)
529 {
530 // this cannot ;) happen on udp sockets
531 slog (L_ERR, _("FATAL: POLLHUP on udp v4 fd, terminating."));
532 exit (1);
533 }
534 else
535 {
536 slog (L_ERR,
537 _("FATAL: unknown revents %08x in socket, terminating\n"),
538 revents);
539 exit (1);
540 }
541}
542
543void
295vpn::tap_ev (short revents) 544vpn::tap_ev (io_watcher &w, short revents)
296{ 545{
297 if (revents & POLLIN) 546 if (revents & POLLIN)
298 { 547 {
299 /* process data */ 548 /* process data */
300 tap_packet *pkt; 549 tap_packet *pkt;
301 550
302 pkt = tap->recv (); 551 pkt = tap->recv ();
303 552
553 if (!pkt)
554 return;
555
556 if (pkt->len > 14)
557 {
304 int dst = mac2id (pkt->dst); 558 int dst = mac2id (pkt->dst);
305 int src = mac2id (pkt->src); 559 int src = mac2id (pkt->src);
306 560
307 if (src != THISNODE->id) 561 if (src != THISNODE->id)
308 {
309 slog (L_ERR, _("FATAL: tap packet not originating on current node received, terminating."));
310 exit (1);
311 }
312
313 if (dst == THISNODE->id)
314 {
315 slog (L_ERR, _("FATAL: tap packet destined for current node received, terminating."));
316 exit (1);
317 }
318
319 if (dst > conns.size ())
320 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
321 else
322 {
323 if (dst)
324 { 562 {
325 // unicast 563 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting."));
326 if (dst != THISNODE->id) 564 exit (1);
327 conns[dst - 1]->inject_data_packet (pkt);
328 } 565 }
566
567 if (dst == THISNODE->id)
568 {
569 slog (L_ERR, _("FATAL: tap packet destined for current node received, exiting."));
570 exit (1);
571 }
572
573 if (dst > conns.size ())
574 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
329 else 575 else
330 {
331 // broadcast, first check router, then self, then english
332 connection *router = find_router ();
333
334 if (router)
335 router->inject_data_packet (pkt, true); 576 inject_data_packet (pkt, dst);
336 else
337 for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
338 if ((*c)->conf != THISNODE)
339 (*c)->inject_data_packet (pkt);
340 }
341 } 577 }
342 578
343 delete pkt; 579 delete pkt;
344 } 580 }
345 else if (revents & (POLLHUP | POLLERR)) 581 else if (revents & (POLLHUP | POLLERR))
… …
350 else 586 else
351 abort (); 587 abort ();
352} 588}
353 589
354void 590void
355vpn::event_cb (tstamp &ts) 591vpn::event_cb (time_watcher &w)
356{ 592{
357 if (events) 593 if (events)
358 { 594 {
359 if (events & EVENT_SHUTDOWN) 595 if (events & EVENT_SHUTDOWN)
360 { 596 {
… …
377 } 613 }
378 614
379 events = 0; 615 events = 0;
380 } 616 }
381 617
382 ts = TSTAMP_CANCEL; 618 w.at = TSTAMP_CANCEL;
383} 619}
384 620
385void 621void
386vpn::shutdown_all () 622vpn::shutdown_all ()
387{ 623{
… …
411 } 647 }
412} 648}
413 649
414connection *vpn::find_router () 650connection *vpn::find_router ()
415{ 651{
416 u32 prio = 0; 652 u32 prio = 1;
417 connection *router = 0; 653 connection *router = 0;
418 654
419 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i) 655 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
420 { 656 {
421 connection *c = *i; 657 connection *c = *i;
422 658
423 if (c->conf->routerprio > prio 659 if (c->conf->routerprio > prio
424 && c->connectmode == conf_node::C_ALWAYS 660 && c->connectmode == conf_node::C_ALWAYS // so we don't drop the connection if in use
425 && c->conf != THISNODE
426 && c->ictx && c->octx) 661 && c->ictx && c->octx
662 && c->conf != THISNODE) // redundant, since ictx==octx==0 always on thisnode
427 { 663 {
428 prio = c->conf->routerprio; 664 prio = c->conf->routerprio;
429 router = c; 665 router = c;
430 } 666 }
431 } 667 }
432 668
433 return router; 669 return router;
434} 670}
435 671
436void vpn::connect_request (int id) 672void vpn::send_connect_request (int id)
437{ 673{
438 connection *c = find_router (); 674 connection *c = find_router ();
439 675
440 if (c) 676 if (c)
441 c->connect_request (id); 677 c->send_connect_request (id);
442 //else // does not work, because all others must connect to the same router 678 else
443 // // no router found, aggressively connect to all routers 679 // no router found, aggressively connect to all routers
444 // for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i) 680 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
445 // if ((*i)->conf->routerprio) 681 if ((*i)->conf->routerprio && (*i)->conf != THISNODE)
446 // (*i)->establish_connection (); 682 (*i)->establish_connection ();
447} 683}
448 684
449void 685void
450connection::dump_status () 686connection::dump_status ()
451{ 687{
… …
468 704
469 slog (L_NOTICE, _("END status dump")); 705 slog (L_NOTICE, _("END status dump"));
470} 706}
471 707
472vpn::vpn (void) 708vpn::vpn (void)
709: event (this, &vpn::event_cb)
473: udpv4_ev_watcher(this, &vpn::udpv4_ev) 710, udpv4_ev_watcher (this, &vpn::udpv4_ev)
474, ipv4_ev_watcher(this, &vpn::ipv4_ev) 711, ipv4_ev_watcher (this, &vpn::ipv4_ev)
712#if ENABLE_TCP
713, tcpv4_ev_watcher (this, &vpn::tcpv4_ev)
714#endif
715#if ENABLE_ICMP
716, icmpv4_ev_watcher(this, &vpn::icmpv4_ev)
717#endif
475, tap_ev_watcher(this, &vpn::tap_ev) 718, tap_ev_watcher (this, &vpn::tap_ev)
476, event(this, &vpn::event_cb)
477{ 719{
478} 720}
479 721
480vpn::~vpn () 722vpn::~vpn ()
481{ 723{

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines