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.8 by pcg, Mon Apr 7 01:28:56 2003 UTC vs.
Revision 1.22 by pcg, Sat Jan 17 01:18:36 2004 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-2004 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"
44
45vpn network; // THE vpn (bad design...)
42 46
43///////////////////////////////////////////////////////////////////////////// 47/////////////////////////////////////////////////////////////////////////////
44 48
45const char *vpn::script_if_up () 49const char *vpn::script_if_up ()
46{ 50{
… …
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
… …
80 ipv4_fd = socket (PF_INET, SOCK_RAW, ::conf.ip_proto); 81 ipv4_fd = socket (PF_INET, SOCK_RAW, ::conf.ip_proto);
81 82
82 if (ipv4_fd < 0) 83 if (ipv4_fd < 0)
83 return -1; 84 return -1;
84 85
85 sockinfo si (THISNODE, PROT_IPv4); 86 fcntl (ipv4_fd, F_SETFL, O_NONBLOCK);
86 87
87 if (bind (ipv4_fd, si.sav4 (), si.salenv4 ())) 88#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
88 {
89 slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno));
90 exit (1);
91 }
92
93#ifdef IP_MTU_DISCOVER
94 // this I really consider a linux bug. I am neither connected 89 // this I really consider a linux bug. I am neither connected
95 // nor do I fragment myself. Linux still sets DF and doesn't 90 // nor do I fragment myself. Linux still sets DF and doesn't
96 // fragment for me sometimes. 91 // fragment for me sometimes.
97 { 92 {
98 int oval = IP_PMTUDISC_DONT; 93 int oval = IP_PMTUDISC_DONT;
99 setsockopt (ipv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval); 94 setsockopt (ipv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
100 } 95 }
101#endif 96#endif
102 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
103 ipv4_ev_watcher.start (ipv4_fd, POLLIN); 106 ipv4_ev_watcher.start (ipv4_fd, EVENT_READ);
104 } 107 }
105 108
106 udpv4_fd = -1; 109 udpv4_fd = -1;
107 110
108 if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port) 111 if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port)
109 { 112 {
110 udpv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP); 113 udpv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);
111 114
112 if (udpv4_fd < 0) 115 if (udpv4_fd < 0)
113 return -1; 116 return -1;
117
118 fcntl (udpv4_fd, F_SETFL, O_NONBLOCK);
114 119
115 // standard daemon practise... 120 // standard daemon practise...
116 { 121 {
117 int oval = 1; 122 int oval = 1;
118 setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval); 123 setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
119 } 124 }
120 125
121 sockinfo si (THISNODE, PROT_UDPv4); 126#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
122
123 if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
124 {
125 slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno));
126 exit (1);
127 }
128
129#ifdef IP_MTU_DISCOVER
130 // this I really consider a linux bug. I am neither connected 127 // this I really consider a linux bug. I am neither connected
131 // 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
132 // fragment for me sometimes. 129 // fragment for me sometimes.
133 { 130 {
134 int oval = IP_PMTUDISC_DONT; 131 int oval = IP_PMTUDISC_DONT;
135 setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval); 132 setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
136 } 133 }
137#endif 134#endif
138 135
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
139 udpv4_ev_watcher.start (udpv4_fd, POLLIN); 144 udpv4_ev_watcher.start (udpv4_fd, EVENT_READ);
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
160 {
161 icmp_filter oval;
162 oval.data = 0xffffffff;
163 if (::conf.icmp_type < 32)
164 oval.data &= ~(1 << ::conf.icmp_type);
165
166 setsockopt (icmpv4_fd, SOL_RAW, ICMP_FILTER, &oval, sizeof oval);
140 } 167 }
168#endif
169
170#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
171 // this I really consider a linux bug. I am neither connected
172 // nor do I fragment myself. Linux still sets DF and doesn't
173 // fragment for me sometimes.
174 {
175 int oval = IP_PMTUDISC_DONT;
176 setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
177 }
178#endif
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
188 icmpv4_ev_watcher.start (icmpv4_fd, EVENT_READ);
189 }
190#endif
141 191
142 tcpv4_fd = -1; 192 tcpv4_fd = -1;
143 193
144#if ENABLE_TCP 194#if ENABLE_TCP
145 if (THISNODE->protocols & PROT_TCPv4 && THISNODE->tcp_port) 195 if (THISNODE->protocols & PROT_TCPv4 && THISNODE->tcp_port)
146 { 196 {
147 tcpv4_fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP); 197 tcpv4_fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP);
148 198
149 if (tcpv4_fd < 0) 199 if (tcpv4_fd < 0)
150 return -1; 200 return -1;
201
202 fcntl (tcpv4_fd, F_SETFL, O_NONBLOCK);
151 203
152 // standard daemon practise... 204 // standard daemon practise...
153 { 205 {
154 int oval = 1; 206 int oval = 1;
155 setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval); 207 setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
… …
167 { 219 {
168 slog (L_ERR, _("can't listen tcpv4 on %s: %s"), (const char *)si, strerror (errno)); 220 slog (L_ERR, _("can't listen tcpv4 on %s: %s"), (const char *)si, strerror (errno));
169 exit (1); 221 exit (1);
170 } 222 }
171 223
172 tcpv4_ev_watcher.start (tcpv4_fd, POLLIN); 224 tcpv4_ev_watcher.start (tcpv4_fd, EVENT_READ);
173 } 225 }
174#endif 226#endif
175 227
176 tap = new tap_device (); 228 tap = new tap_device ();
177 if (!tap) //D this, of course, never catches 229 if (!tap) //D this, of course, never catches
… …
180 exit (1); 232 exit (1);
181 } 233 }
182 234
183 run_script (run_script_cb (this, &vpn::script_if_up), true); 235 run_script (run_script_cb (this, &vpn::script_if_up), true);
184 236
185 tap_ev_watcher.start (tap->fd, POLLIN); 237 tap_ev_watcher.start (tap->fd, EVENT_READ);
186 238
187 reconnect_all (); 239 reconnect_all ();
188 240
189 return 0; 241 return 0;
190} 242}
… …
204#if ENABLE_TCP 256#if ENABLE_TCP
205 case PROT_TCPv4: 257 case PROT_TCPv4:
206 return send_tcpv4_packet (pkt, si, tos); 258 return send_tcpv4_packet (pkt, si, tos);
207#endif 259#endif
208 260
261#if ENABLE_ICMP
262 case PROT_ICMPv4:
263 return send_icmpv4_packet (pkt, si, tos);
264#endif
265
209 default: 266 default:
210 slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si); 267 slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si);
211 return false; 268 return false;
212 } 269 }
213} 270}
214 271
215bool 272bool
216vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 273vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
217{ 274{
275#if defined(SOL_IP) && defined(IP_TOS)
218 setsockopt (ipv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos); 276 setsockopt (ipv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
277#endif
219 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 ());
220 279
221 return true; 280 return true;
222} 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
223 327
224bool 328bool
225vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 329vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
226{ 330{
331#if defined(SOL_IP) && defined(IP_TOS)
227 setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos); 332 setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
333#endif
228 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 ());
229 335
230 return true; 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 }
231} 356}
232 357
233void 358void
234vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi) 359vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi)
235{ 360{
… …
249 (const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ()); 374 (const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());
250 else 375 else
251 { 376 {
252 connection *c = conns[src - 1]; 377 connection *c = conns[src - 1];
253 378
254 if (dst == 0 && !THISNODE->routerprio) 379 if (dst == 0)
255 slog (L_WARN, _("%s(%s): received broadcast, but we are no router"), 380 slog (L_WARN, _("%s(%s): received broadcast (protocol violation)"),
256 c->conf->nodename, (const char *)rsi); 381 c->conf->nodename, (const char *)rsi);
257 else if (dst != 0 && dst != THISNODE->id) 382 else if (dst != THISNODE->id)
258 { 383 {
259 if (THISNODE->routerprio) 384 if (THISNODE->routerprio)
260 // the tos setting gets lost here. who cares. 385 // the tos setting gets lost here. who cares.
261 conns[dst - 1]->inject_vpn_packet (pkt); 386 conns[dst - 1]->inject_vpn_packet (pkt);
262 else 387 else
… …
269 c->recv_vpn_packet (pkt, rsi); 394 c->recv_vpn_packet (pkt, rsi);
270 } 395 }
271} 396}
272 397
273void 398void
274vpn::udpv4_ev (io_watcher &w, short revents) 399vpn::ipv4_ev (io_watcher &w, short revents)
275{ 400{
276 if (revents & (POLLIN | POLLERR)) 401 if (revents & EVENT_READ)
277 { 402 {
278 vpn_packet *pkt = new vpn_packet; 403 vpn_packet *pkt = new vpn_packet;
279 struct sockaddr_in sa; 404 struct sockaddr_in sa;
280 socklen_t sa_len = sizeof (sa); 405 socklen_t sa_len = sizeof (sa);
281 int len; 406 int len;
282 407
283 len = recvfrom (w.fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len); 408 len = recvfrom (w.fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len);
284 409
285 sockinfo si(sa, PROT_UDPv4); 410 sockinfo si(sa, PROT_IPv4);
286 411
287 if (len > 0) 412 if (len > 0)
288 { 413 {
289 pkt->len = len; 414 pkt->len = len;
290 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);
419
291 recv_vpn_packet (pkt, si); 420 recv_vpn_packet (pkt, si);
292 } 421 }
293 else 422 else
294 { 423 {
295 // probably ECONNRESET or somesuch 424 // probably ECONNRESET or somesuch
296 slog (L_DEBUG, _("%s: fd %d, %s"), (const char *)si, w.fd, strerror (errno)); 425 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));
297 } 426 }
298 427
299 delete pkt; 428 delete pkt;
300 }
301 else if (revents & POLLHUP)
302 {
303 // this cannot ;) happen on udp sockets
304 slog (L_ERR, _("FATAL: POLLHUP on udp v4 fd, terminating."));
305 exit (1);
306 } 429 }
307 else 430 else
308 { 431 {
309 slog (L_ERR, 432 slog (L_ERR,
310 _("FATAL: unknown revents %08x in socket, terminating\n"), 433 _("FATAL: unknown revents %08x in socket, terminating\n"),
311 revents); 434 revents);
312 exit (1); 435 exit (1);
313 } 436 }
314} 437}
315 438
439#if ENABLE_ICMP
316void 440void
317vpn::ipv4_ev (io_watcher &w, short revents) 441vpn::icmpv4_ev (io_watcher &w, short revents)
318{ 442{
319 if (revents & (POLLIN | POLLERR)) 443 if (revents & EVENT_READ)
320 { 444 {
321 vpn_packet *pkt = new vpn_packet; 445 vpn_packet *pkt = new vpn_packet;
322 struct sockaddr_in sa; 446 struct sockaddr_in sa;
323 socklen_t sa_len = sizeof (sa); 447 socklen_t sa_len = sizeof (sa);
324 int len; 448 int len;
325 449
326 len = recvfrom (w.fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len); 450 len = recvfrom (w.fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len);
327 451
328 sockinfo si(sa, PROT_IPv4); 452 sockinfo si(sa, PROT_ICMPv4);
329 453
330 if (len > 0) 454 if (len > 0)
331 { 455 {
332 pkt->len = len; 456 pkt->len = len;
333 457
458 icmp_header *hdr = (icmp_header *)&((*pkt)[IP_OVERHEAD]);
459
460 if (hdr->type == ::conf.icmp_type
461 && hdr->code == 255)
462 {
334 // raw sockets deliver the ipv4, but don't expect it on sends 463 // raw sockets deliver the ipv4, but don't expect it on sends
335 // this is slow, but... 464 // this is slow, but...
336 pkt->skip_hdr (IP_OVERHEAD); 465 pkt->skip_hdr (ICMP_OVERHEAD);
337 466
338 recv_vpn_packet (pkt, si); 467 recv_vpn_packet (pkt, si);
468 }
339 } 469 }
340 else 470 else
341 { 471 {
342 // probably ECONNRESET or somesuch 472 // probably ECONNRESET or somesuch
343 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno)); 473 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));
344 } 474 }
345 475
346 delete pkt; 476 delete pkt;
347 }
348 else if (revents & POLLHUP)
349 {
350 // this cannot ;) happen on udp sockets
351 slog (L_ERR, _("FATAL: POLLHUP on ipv4 fd, terminating."));
352 exit (1);
353 } 477 }
354 else 478 else
355 { 479 {
356 slog (L_ERR, 480 slog (L_ERR,
357 _("FATAL: unknown revents %08x in socket, terminating\n"), 481 _("FATAL: unknown revents %08x in socket, terminating\n"),
358 revents); 482 revents);
359 exit (1); 483 exit (1);
360 } 484 }
361} 485}
486#endif
487
488void
489vpn::udpv4_ev (io_watcher &w, short revents)
490{
491 if (revents & EVENT_READ)
492 {
493 vpn_packet *pkt = new vpn_packet;
494 struct sockaddr_in sa;
495 socklen_t sa_len = sizeof (sa);
496 int len;
497
498 len = recvfrom (w.fd, &((*pkt)[0]), MAXSIZE, 0, (sockaddr *)&sa, &sa_len);
499
500 sockinfo si(sa, PROT_UDPv4);
501
502 if (len > 0)
503 {
504 pkt->len = len;
505
506 recv_vpn_packet (pkt, si);
507 }
508 else
509 {
510 // probably ECONNRESET or somesuch
511 slog (L_DEBUG, _("%s: fd %d, %s"), (const char *)si, w.fd, strerror (errno));
512 }
513
514 delete pkt;
515 }
516 else
517 {
518 slog (L_ERR,
519 _("FATAL: unknown revents %08x in socket, terminating\n"),
520 revents);
521 exit (1);
522 }
523}
362 524
363void 525void
364vpn::tap_ev (io_watcher &w, short revents) 526vpn::tap_ev (io_watcher &w, short revents)
365{ 527{
366 if (revents & POLLIN) 528 if (revents & EVENT_READ)
367 { 529 {
368 /* process data */ 530 /* process data */
369 tap_packet *pkt; 531 tap_packet *pkt;
370 532
371 pkt = tap->recv (); 533 pkt = tap->recv ();
372 534
535 if (!pkt)
536 return;
537
538 if (pkt->len > 14)
539 {
373 int dst = mac2id (pkt->dst); 540 int dst = mac2id (pkt->dst);
374 int src = mac2id (pkt->src); 541 int src = mac2id (pkt->src);
375 542
376 if (src != THISNODE->id) 543 if (src != THISNODE->id)
377 {
378 slog (L_ERR, _("FATAL: tap packet not originating on current node received, terminating."));
379 exit (1);
380 }
381
382 if (dst == THISNODE->id)
383 {
384 slog (L_ERR, _("FATAL: tap packet destined for current node received, terminating."));
385 exit (1);
386 }
387
388 if (dst > conns.size ())
389 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
390 else
391 {
392 if (dst)
393 { 544 {
394 // unicast 545 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting."));
395 if (dst != THISNODE->id) 546 exit (1);
396 conns[dst - 1]->inject_data_packet (pkt);
397 } 547 }
548
549 if (dst == THISNODE->id)
550 {
551 slog (L_ERR, _("FATAL: tap packet destined for current node received, exiting."));
552 exit (1);
553 }
554
555 if (dst > conns.size ())
556 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
398 else 557 else
399 {
400 // broadcast, first check router, then self, then english
401 connection *router = find_router ();
402
403 if (router)
404 router->inject_data_packet (pkt, true); 558 inject_data_packet (pkt, dst);
405 else
406 for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
407 if ((*c)->conf != THISNODE)
408 (*c)->inject_data_packet (pkt);
409 }
410 } 559 }
411 560
412 delete pkt; 561 delete pkt;
413 }
414 else if (revents & (POLLHUP | POLLERR))
415 {
416 slog (L_ERR, _("FATAL: POLLHUP or POLLERR on network device fd, terminating."));
417 exit (1);
418 } 562 }
419 else 563 else
420 abort (); 564 abort ();
421} 565}
422 566
… …
428 if (events & EVENT_SHUTDOWN) 572 if (events & EVENT_SHUTDOWN)
429 { 573 {
430 slog (L_INFO, _("preparing shutdown...")); 574 slog (L_INFO, _("preparing shutdown..."));
431 575
432 shutdown_all (); 576 shutdown_all ();
433
434 remove_pid (pidfilename); 577 remove_pid (pidfilename);
435
436 slog (L_INFO, _("terminating")); 578 slog (L_INFO, _("terminating"));
437
438 exit (0); 579 exit (0);
439 } 580 }
440 581
441 if (events & EVENT_RECONNECT) 582 if (events & EVENT_RECONNECT)
442 { 583 {
… …
445 reconnect_all (); 586 reconnect_all ();
446 } 587 }
447 588
448 events = 0; 589 events = 0;
449 } 590 }
450
451 w.at = TSTAMP_CANCEL;
452} 591}
453 592
454void 593void
455vpn::shutdown_all () 594vpn::shutdown_all ()
456{ 595{
… …
480 } 619 }
481} 620}
482 621
483connection *vpn::find_router () 622connection *vpn::find_router ()
484{ 623{
485 u32 prio = 0; 624 u32 prio = 1;
486 connection *router = 0; 625 connection *router = 0;
487 626
488 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i) 627 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
489 { 628 {
490 connection *c = *i; 629 connection *c = *i;
491 630
492 if (c->conf->routerprio > prio 631 if (c->conf->routerprio > prio
493 && c->connectmode == conf_node::C_ALWAYS 632 && c->connectmode == conf_node::C_ALWAYS // so we don't drop the connection if in use
494 && c->conf != THISNODE
495 && c->ictx && c->octx) 633 && c->ictx && c->octx
634 && c->conf != THISNODE) // redundant, since ictx==octx==0 always on thisnode
496 { 635 {
497 prio = c->conf->routerprio; 636 prio = c->conf->routerprio;
498 router = c; 637 router = c;
499 } 638 }
500 } 639 }
… …
509 if (c) 648 if (c)
510 c->send_connect_request (id); 649 c->send_connect_request (id);
511 else 650 else
512 // no router found, aggressively connect to all routers 651 // no router found, aggressively connect to all routers
513 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i) 652 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
514 if ((*i)->conf->routerprio) 653 if ((*i)->conf->routerprio && (*i)->conf != THISNODE)
515 (*i)->establish_connection (); 654 (*i)->establish_connection ();
516} 655}
517 656
518void 657void
519connection::dump_status () 658connection::dump_status ()
… …
537 676
538 slog (L_NOTICE, _("END status dump")); 677 slog (L_NOTICE, _("END status dump"));
539} 678}
540 679
541vpn::vpn (void) 680vpn::vpn (void)
542: event(this, &vpn::event_cb) 681: event (this, &vpn::event_cb)
543, udpv4_ev_watcher(this, &vpn::udpv4_ev) 682, udpv4_ev_watcher (this, &vpn::udpv4_ev)
544, ipv4_ev_watcher (this, &vpn::ipv4_ev) 683, ipv4_ev_watcher (this, &vpn::ipv4_ev)
545, tap_ev_watcher (this, &vpn::tap_ev)
546#if ENABLE_TCP 684#if ENABLE_TCP
547, tcpv4_ev_watcher(this, &vpn::tcpv4_ev) 685, tcpv4_ev_watcher (this, &vpn::tcpv4_ev)
548#endif 686#endif
687#if ENABLE_ICMP
688, icmpv4_ev_watcher(this, &vpn::icmpv4_ev)
689#endif
690, tap_ev_watcher (this, &vpn::tap_ev)
549{ 691{
550} 692}
551 693
552vpn::~vpn () 694vpn::~vpn ()
553{ 695{

Diff Legend

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