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.12 by pcg, Sun Apr 13 00:42:04 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 <errno.h> 31#include <errno.h>
32#include <time.h> 32#include <time.h>
33#include <unistd.h> 33#include <unistd.h>
34#include <fcntl.h> 34#include <fcntl.h>
35#include <arpa/inet.h> 35#include <sys/socket.h>
36#include <netinet/in.h> 36
37#include <netinet/ip_icmp.h> 37#include "netcompat.h"
38 38
39#include "pidfile.h" 39#include "pidfile.h"
40 40
41#include "connection.h" 41#include "connection.h"
42#include "util.h" 42#include "util.h"
43#include "vpn.h" 43#include "vpn.h"
44
45vpn network; // THE vpn (bad design...)
44 46
45///////////////////////////////////////////////////////////////////////////// 47/////////////////////////////////////////////////////////////////////////////
46 48
47const char *vpn::script_if_up () 49const char *vpn::script_if_up ()
48{ 50{
… …
52 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion 54 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion
53 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round 55 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round
54 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again 56 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again
55 57
56 char *env; 58 char *env;
57 asprintf (&env, "CONFBASE=%s", confbase); 59 asprintf (&env, "CONFBASE=%s", confbase); putenv (env);
58 putenv (env);
59 asprintf (&env, "NODENAME=%s", THISNODE->nodename); 60 asprintf (&env, "NODENAME=%s", THISNODE->nodename); putenv (env);
60 putenv (env);
61 asprintf (&env, "NODEID=%d", THISNODE->id); 61 asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
62 putenv (env);
63 asprintf (&env, "IFNAME=%s", tap->interface ()); 62 asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env);
64 putenv (env); 63 asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);
64 asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);
65 asprintf (&env, "MTU=%d", mtu); 65 asprintf (&env, "MTU=%d", mtu); putenv (env);
66 putenv (env);
67 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x", 66 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x",
68 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8, 67 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8,
69 THISNODE->id & 0xff); 68 THISNODE->id & 0xff);
70 putenv (env); 69 putenv (env);
71 70
… …
84 if (ipv4_fd < 0) 83 if (ipv4_fd < 0)
85 return -1; 84 return -1;
86 85
87 fcntl (ipv4_fd, F_SETFL, O_NONBLOCK); 86 fcntl (ipv4_fd, F_SETFL, O_NONBLOCK);
88 87
89#ifdef IP_MTU_DISCOVER 88#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
90 // this I really consider a linux bug. I am neither connected 89 // this I really consider a linux bug. I am neither connected
91 // 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
92 // fragment for me sometimes. 91 // fragment for me sometimes.
93 { 92 {
94 int oval = IP_PMTUDISC_DONT; 93 int oval = IP_PMTUDISC_DONT;
… …
122 { 121 {
123 int oval = 1; 122 int oval = 1;
124 setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval); 123 setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
125 } 124 }
126 125
127#ifdef IP_MTU_DISCOVER 126#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
128 // this I really consider a linux bug. I am neither connected 127 // this I really consider a linux bug. I am neither connected
129 // 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
130 // fragment for me sometimes. 129 // fragment for me sometimes.
131 { 130 {
132 int oval = IP_PMTUDISC_DONT; 131 int oval = IP_PMTUDISC_DONT;
… …
166 165
167 setsockopt (icmpv4_fd, SOL_RAW, ICMP_FILTER, &oval, sizeof oval); 166 setsockopt (icmpv4_fd, SOL_RAW, ICMP_FILTER, &oval, sizeof oval);
168 } 167 }
169#endif 168#endif
170 169
171#ifdef IP_MTU_DISCOVER 170#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
172 // this I really consider a linux bug. I am neither connected 171 // this I really consider a linux bug. I am neither connected
173 // 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
174 // fragment for me sometimes. 173 // fragment for me sometimes.
175 { 174 {
176 int oval = IP_PMTUDISC_DONT; 175 int oval = IP_PMTUDISC_DONT;
… …
271} 270}
272 271
273bool 272bool
274vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 273vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
275{ 274{
275#if defined(SOL_IP) && defined(IP_TOS)
276 setsockopt (ipv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos); 276 setsockopt (ipv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
277#endif
277 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 ());
278 279
279 return true; 280 return true;
280} 281}
281 282
… …
300 sum += (sum >> 16); // carry 301 sum += (sum >> 16); // carry
301 302
302 return ~sum; 303 return ~sum;
303} 304}
304 305
306#if ENABLE_ICMP
305bool 307bool
306vpn::send_icmpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 308vpn::send_icmpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
307{ 309{
310#if defined(SOL_IP) && defined(IP_TOS)
308 setsockopt (icmpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos); 311 setsockopt (icmpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
312#endif
309 313
310 pkt->unshift_hdr (4); 314 pkt->unshift_hdr (4);
311 315
312 icmphdr *hdr = (icmphdr *)&((*pkt)[0]); 316 icmp_header *hdr = (icmp_header *)&((*pkt)[0]);
313 hdr->type = ::conf.icmp_type; 317 hdr->type = ::conf.icmp_type;
314 hdr->code = 255; 318 hdr->code = 255;
315 hdr->checksum = 0; 319 hdr->checksum = 0;
316 hdr->checksum = ipv4_checksum ((u16 *)hdr, pkt->len); 320 hdr->checksum = ipv4_checksum ((u16 *)hdr, pkt->len);
317 321
318 sendto (icmpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ()); 322 sendto (icmpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
319 323
320 return true; 324 return true;
321} 325}
326#endif
322 327
323bool 328bool
324vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 329vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
325{ 330{
331#if defined(SOL_IP) && defined(IP_TOS)
326 setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos); 332 setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
333#endif
327 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 ());
328 335
329 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 }
330} 356}
331 357
332void 358void
333vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi) 359vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi)
334{ 360{
… …
348 (const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ()); 374 (const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());
349 else 375 else
350 { 376 {
351 connection *c = conns[src - 1]; 377 connection *c = conns[src - 1];
352 378
353 if (dst == 0 && !THISNODE->routerprio) 379 if (dst == 0)
354 slog (L_WARN, _("%s(%s): received broadcast, but we are no router"), 380 slog (L_WARN, _("%s(%s): received broadcast (protocol violation)"),
355 c->conf->nodename, (const char *)rsi); 381 c->conf->nodename, (const char *)rsi);
356 else if (dst != 0 && dst != THISNODE->id) 382 else if (dst != THISNODE->id)
357 { 383 {
358 if (THISNODE->routerprio) 384 if (THISNODE->routerprio)
359 // the tos setting gets lost here. who cares. 385 // the tos setting gets lost here. who cares.
360 conns[dst - 1]->inject_vpn_packet (pkt); 386 conns[dst - 1]->inject_vpn_packet (pkt);
361 else 387 else
… …
414 revents); 440 revents);
415 exit (1); 441 exit (1);
416 } 442 }
417} 443}
418 444
445#if ENABLE_ICMP
419void 446void
420vpn::icmpv4_ev (io_watcher &w, short revents) 447vpn::icmpv4_ev (io_watcher &w, short revents)
421{ 448{
422 if (revents & (POLLIN | POLLERR)) 449 if (revents & (POLLIN | POLLERR))
423 { 450 {
… …
432 459
433 if (len > 0) 460 if (len > 0)
434 { 461 {
435 pkt->len = len; 462 pkt->len = len;
436 463
437 icmphdr *hdr = (icmphdr *)&((*pkt)[IP_OVERHEAD]); 464 icmp_header *hdr = (icmp_header *)&((*pkt)[IP_OVERHEAD]);
438 465
439 if (hdr->type == ::conf.icmp_type 466 if (hdr->type == ::conf.icmp_type
440 && hdr->code == 255) 467 && hdr->code == 255)
441 { 468 {
442 // 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
… …
466 _("FATAL: unknown revents %08x in socket, terminating\n"), 493 _("FATAL: unknown revents %08x in socket, terminating\n"),
467 revents); 494 revents);
468 exit (1); 495 exit (1);
469 } 496 }
470} 497}
498#endif
471 499
472void 500void
473vpn::udpv4_ev (io_watcher &w, short revents) 501vpn::udpv4_ev (io_watcher &w, short revents)
474{ 502{
475 if (revents & (POLLIN | POLLERR)) 503 if (revents & (POLLIN | POLLERR))
… …
520 /* process data */ 548 /* process data */
521 tap_packet *pkt; 549 tap_packet *pkt;
522 550
523 pkt = tap->recv (); 551 pkt = tap->recv ();
524 552
553 if (!pkt)
554 return;
555
556 if (pkt->len > 14)
557 {
525 int dst = mac2id (pkt->dst); 558 int dst = mac2id (pkt->dst);
526 int src = mac2id (pkt->src); 559 int src = mac2id (pkt->src);
527 560
528 if (src != THISNODE->id) 561 if (src != THISNODE->id)
529 {
530 slog (L_ERR, _("FATAL: tap packet not originating on current node received, terminating."));
531 exit (1);
532 }
533
534 if (dst == THISNODE->id)
535 {
536 slog (L_ERR, _("FATAL: tap packet destined for current node received, terminating."));
537 exit (1);
538 }
539
540 if (dst > conns.size ())
541 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
542 else
543 {
544 if (dst)
545 { 562 {
546 // unicast 563 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting."));
547 if (dst != THISNODE->id) 564 exit (1);
548 conns[dst - 1]->inject_data_packet (pkt);
549 } 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);
550 else 575 else
551 {
552 // broadcast, first check router, then self, then english
553 connection *router = find_router ();
554
555 if (router)
556 router->inject_data_packet (pkt, true); 576 inject_data_packet (pkt, dst);
557 else
558 for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
559 if ((*c)->conf != THISNODE)
560 (*c)->inject_data_packet (pkt);
561 }
562 } 577 }
563 578
564 delete pkt; 579 delete pkt;
565 } 580 }
566 else if (revents & (POLLHUP | POLLERR)) 581 else if (revents & (POLLHUP | POLLERR))
… …
639 654
640 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i) 655 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
641 { 656 {
642 connection *c = *i; 657 connection *c = *i;
643 658
644 if (c->conf->routerprio >= prio 659 if (c->conf->routerprio > prio
645 && c->connectmode == conf_node::C_ALWAYS // so we don't drop the connection if in use 660 && c->connectmode == conf_node::C_ALWAYS // so we don't drop the connection if in use
646 && c->ictx && c->octx 661 && c->ictx && c->octx
647 && c->conf != THISNODE // redundant, since ictx==octx==0 always on thisnode 662 && c->conf != THISNODE) // redundant, since ictx==octx==0 always on thisnode
648 && (!THISNODE->routerprio
649 || c->conf->routerprio <= THISNODE->routerprio))
650 { 663 {
651 prio = c->conf->routerprio; 664 prio = c->conf->routerprio;
652 router = c; 665 router = c;
653 } 666 }
654 } 667 }
… …
663 if (c) 676 if (c)
664 c->send_connect_request (id); 677 c->send_connect_request (id);
665 else 678 else
666 // no router found, aggressively connect to all routers 679 // no router found, aggressively connect to all routers
667 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i) 680 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
668 if ((*i)->conf->routerprio) 681 if ((*i)->conf->routerprio && (*i)->conf != THISNODE)
669 (*i)->establish_connection (); 682 (*i)->establish_connection ();
670} 683}
671 684
672void 685void
673connection::dump_status () 686connection::dump_status ()

Diff Legend

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