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.20 by pcg, Thu Oct 16 14:12:00 2003 UTC vs.
Revision 1.25 by pcg, Sun Jul 25 18:11:40 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 Marc Lehmann <pcg@goof.com> 3 Copyright (C) 2003-2004 Marc Lehmann <pcg@goof.com>
4 4
5 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
6 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
7 the Free Software Foundation; either version 2 of the License, or 7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version. 8 (at your option) any later version.
… …
19 19
20#include "config.h" 20#include "config.h"
21 21
22#include <list> 22#include <list>
23 23
24#include <cstdio>
25#include <cstring>
24#include <cstdlib> 26#include <cstdlib>
25#include <cstring>
26#include <cstdio>
27 27
28#include <sys/types.h> 28#include <sys/types.h>
29#include <sys/socket.h> 29#include <sys/socket.h>
30#include <sys/wait.h> 30#include <sys/wait.h>
31#include <errno.h> 31#include <errno.h>
… …
54 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion 54 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion
55 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round 55 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round
56 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again 56 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again
57 57
58 char *env; 58 char *env;
59 asprintf (&env, "CONFBASE=%s", confbase); 59 asprintf (&env, "CONFBASE=%s", confbase); putenv (env);
60 putenv (env);
61 asprintf (&env, "NODENAME=%s", THISNODE->nodename); 60 asprintf (&env, "NODENAME=%s", THISNODE->nodename); putenv (env);
62 putenv (env);
63 asprintf (&env, "NODEID=%d", THISNODE->id); 61 asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
64 putenv (env);
65 asprintf (&env, "IFNAME=%s", tap->interface ()); 62 asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env);
66 putenv (env); 63 asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);
64 asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);
67 asprintf (&env, "MTU=%d", mtu); 65 asprintf (&env, "MTU=%d", mtu); putenv (env);
68 putenv (env);
69 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x", 66 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x",
70 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8, 67 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8,
71 THISNODE->id & 0xff); 68 THISNODE->id & 0xff);
72 putenv (env); 69 putenv (env);
73 70
… …
101 sockinfo si (THISNODE, PROT_IPv4); 98 sockinfo si (THISNODE, PROT_IPv4);
102 99
103 if (bind (ipv4_fd, si.sav4 (), si.salenv4 ())) 100 if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
104 { 101 {
105 slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno)); 102 slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno));
106 exit (1); 103 exit (EXIT_FAILURE);
107 } 104 }
108 105
109 ipv4_ev_watcher.start (ipv4_fd, POLLIN); 106 ipv4_ev_watcher.start (ipv4_fd, EVENT_READ);
110 } 107 }
111 108
112 udpv4_fd = -1; 109 udpv4_fd = -1;
113 110
114 if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port) 111 if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port)
… …
139 sockinfo si (THISNODE, PROT_UDPv4); 136 sockinfo si (THISNODE, PROT_UDPv4);
140 137
141 if (bind (udpv4_fd, si.sav4 (), si.salenv4 ())) 138 if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
142 { 139 {
143 slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno)); 140 slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno));
144 exit (1); 141 exit (EXIT_FAILURE);
145 } 142 }
146 143
147 udpv4_ev_watcher.start (udpv4_fd, POLLIN); 144 udpv4_ev_watcher.start (udpv4_fd, EVENT_READ);
148 } 145 }
149 146
150 icmpv4_fd = -1; 147 icmpv4_fd = -1;
151 148
152#if ENABLE_ICMP 149#if ENABLE_ICMP
… …
183 sockinfo si (THISNODE, PROT_ICMPv4); 180 sockinfo si (THISNODE, PROT_ICMPv4);
184 181
185 if (bind (icmpv4_fd, si.sav4 (), si.salenv4 ())) 182 if (bind (icmpv4_fd, si.sav4 (), si.salenv4 ()))
186 { 183 {
187 slog (L_ERR, _("can't bind icmpv4 on %s: %s"), (const char *)si, strerror (errno)); 184 slog (L_ERR, _("can't bind icmpv4 on %s: %s"), (const char *)si, strerror (errno));
188 exit (1); 185 exit (EXIT_FAILURE);
189 } 186 }
190 187
191 icmpv4_ev_watcher.start (icmpv4_fd, POLLIN); 188 icmpv4_ev_watcher.start (icmpv4_fd, EVENT_READ);
192 } 189 }
193#endif 190#endif
194 191
195 tcpv4_fd = -1; 192 tcpv4_fd = -1;
196 193
… …
213 sockinfo si (THISNODE, PROT_TCPv4); 210 sockinfo si (THISNODE, PROT_TCPv4);
214 211
215 if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ())) 212 if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ()))
216 { 213 {
217 slog (L_ERR, _("can't bind tcpv4 on %s: %s"), (const char *)si, strerror (errno)); 214 slog (L_ERR, _("can't bind tcpv4 on %s: %s"), (const char *)si, strerror (errno));
218 exit (1); 215 exit (EXIT_FAILURE);
219 } 216 }
220 217
221 if (listen (tcpv4_fd, 5)) 218 if (listen (tcpv4_fd, 5))
222 { 219 {
223 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));
224 exit (1); 221 exit (EXIT_FAILURE);
222 }
223
224 tcpv4_ev_watcher.start (tcpv4_fd, EVENT_READ);
225 }
226#endif
227
228#if ENABLE_DNS
229 if (THISNODE->protocols & PROT_DNSv4)
230 {
231 dnsv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);
232
233 if (dnsv4_fd < 0)
234 return -1;
235
236 // standard daemon practise...
237 {
238 int oval = 1;
239 setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
240 }
241
242 sockinfo si (THISNODE, PROT_DNSv4);
243
244 if (bind (dnsv4_fd, si.sav4 (), si.salenv4 ()))
225 } 245 {
246 slog (L_ERR, _("can't bind dnsv4 on %s: %s"), (const char *)si, strerror (errno));
247 exit (EXIT_FAILURE);
248 }
226 249
227 tcpv4_ev_watcher.start (tcpv4_fd, POLLIN); 250 dnsv4_ev_watcher.start (dnsv4_fd, EVENT_READ);
228 } 251 }
229#endif 252#endif
230 253
231 tap = new tap_device (); 254 tap = new tap_device ();
232 if (!tap) //D this, of course, never catches 255 if (!tap) //D this, of course, never catches
233 { 256 {
234 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname); 257 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname);
235 exit (1); 258 exit (EXIT_FAILURE);
236 } 259 }
237 260
238 run_script (run_script_cb (this, &vpn::script_if_up), true); 261 run_script (run_script_cb (this, &vpn::script_if_up), true);
239 262
240 tap_ev_watcher.start (tap->fd, POLLIN); 263 tap_ev_watcher.start (tap->fd, EVENT_READ);
241 264
242 reconnect_all (); 265 reconnect_all ();
243 266
244 return 0; 267 return 0;
245} 268}
… …
262#endif 285#endif
263 286
264#if ENABLE_ICMP 287#if ENABLE_ICMP
265 case PROT_ICMPv4: 288 case PROT_ICMPv4:
266 return send_icmpv4_packet (pkt, si, tos); 289 return send_icmpv4_packet (pkt, si, tos);
290#endif
291
292#if ENABLE_DNS
293 case PROT_DNSv4:
294 return send_dnsv4_packet (pkt, si, tos);
267#endif 295#endif
268 296
269 default: 297 default:
270 slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si); 298 slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si);
271 return false; 299 return false;
… …
399} 427}
400 428
401void 429void
402vpn::ipv4_ev (io_watcher &w, short revents) 430vpn::ipv4_ev (io_watcher &w, short revents)
403{ 431{
404 if (revents & (POLLIN | POLLERR)) 432 if (revents & EVENT_READ)
405 { 433 {
406 vpn_packet *pkt = new vpn_packet; 434 vpn_packet *pkt = new vpn_packet;
407 struct sockaddr_in sa; 435 struct sockaddr_in sa;
408 socklen_t sa_len = sizeof (sa); 436 socklen_t sa_len = sizeof (sa);
409 int len; 437 int len;
… …
428 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno)); 456 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));
429 } 457 }
430 458
431 delete pkt; 459 delete pkt;
432 } 460 }
433 else if (revents & POLLHUP)
434 {
435 // this cannot ;) happen on udp sockets
436 slog (L_ERR, _("FATAL: POLLHUP on ipv4 fd, terminating."));
437 exit (1);
438 }
439 else 461 else
440 { 462 {
441 slog (L_ERR, 463 slog (L_ERR,
442 _("FATAL: unknown revents %08x in socket, terminating\n"), 464 _("FATAL: unknown revents %08x in socket, terminating\n"),
443 revents); 465 revents);
444 exit (1); 466 exit (EXIT_FAILURE);
445 } 467 }
446} 468}
447 469
448#if ENABLE_ICMP 470#if ENABLE_ICMP
449void 471void
450vpn::icmpv4_ev (io_watcher &w, short revents) 472vpn::icmpv4_ev (io_watcher &w, short revents)
451{ 473{
452 if (revents & (POLLIN | POLLERR)) 474 if (revents & EVENT_READ)
453 { 475 {
454 vpn_packet *pkt = new vpn_packet; 476 vpn_packet *pkt = new vpn_packet;
455 struct sockaddr_in sa; 477 struct sockaddr_in sa;
456 socklen_t sa_len = sizeof (sa); 478 socklen_t sa_len = sizeof (sa);
457 int len; 479 int len;
… …
482 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno)); 504 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));
483 } 505 }
484 506
485 delete pkt; 507 delete pkt;
486 } 508 }
487 else if (revents & POLLHUP)
488 {
489 // this cannot ;) happen on udp sockets
490 slog (L_ERR, _("FATAL: POLLHUP on icmpv4 fd, terminating."));
491 exit (1);
492 }
493 else 509 else
494 { 510 {
495 slog (L_ERR, 511 slog (L_ERR,
496 _("FATAL: unknown revents %08x in socket, terminating\n"), 512 _("FATAL: unknown revents %08x in socket, terminating\n"),
497 revents); 513 revents);
498 exit (1); 514 exit (EXIT_FAILURE);
499 } 515 }
500} 516}
501#endif 517#endif
502 518
503void 519void
504vpn::udpv4_ev (io_watcher &w, short revents) 520vpn::udpv4_ev (io_watcher &w, short revents)
505{ 521{
506 if (revents & (POLLIN | POLLERR)) 522 if (revents & EVENT_READ)
507 { 523 {
508 vpn_packet *pkt = new vpn_packet; 524 vpn_packet *pkt = new vpn_packet;
509 struct sockaddr_in sa; 525 struct sockaddr_in sa;
510 socklen_t sa_len = sizeof (sa); 526 socklen_t sa_len = sizeof (sa);
511 int len; 527 int len;
… …
526 slog (L_DEBUG, _("%s: fd %d, %s"), (const char *)si, w.fd, strerror (errno)); 542 slog (L_DEBUG, _("%s: fd %d, %s"), (const char *)si, w.fd, strerror (errno));
527 } 543 }
528 544
529 delete pkt; 545 delete pkt;
530 } 546 }
531 else if (revents & POLLHUP)
532 {
533 // this cannot ;) happen on udp sockets
534 slog (L_ERR, _("FATAL: POLLHUP on udp v4 fd, terminating."));
535 exit (1);
536 }
537 else 547 else
538 { 548 {
539 slog (L_ERR, 549 slog (L_ERR,
540 _("FATAL: unknown revents %08x in socket, terminating\n"), 550 _("FATAL: unknown revents %08x in socket, terminating\n"),
541 revents); 551 revents);
542 exit (1); 552 exit (EXIT_FAILURE);
543 } 553 }
544} 554}
545 555
546void 556void
547vpn::tap_ev (io_watcher &w, short revents) 557vpn::tap_ev (io_watcher &w, short revents)
548{ 558{
549 if (revents & POLLIN) 559 if (revents & EVENT_READ)
550 { 560 {
551 /* process data */ 561 /* process data */
552 tap_packet *pkt; 562 tap_packet *pkt;
553 563
554 pkt = tap->recv (); 564 pkt = tap->recv ();
… …
562 int src = mac2id (pkt->src); 572 int src = mac2id (pkt->src);
563 573
564 if (src != THISNODE->id) 574 if (src != THISNODE->id)
565 { 575 {
566 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting.")); 576 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting."));
567 exit (1); 577 exit (EXIT_FAILURE);
568 } 578 }
569 579
570 if (dst == THISNODE->id) 580 if (dst == THISNODE->id)
571 { 581 {
572 slog (L_ERR, _("FATAL: tap packet destined for current node received, exiting.")); 582 slog (L_ERR, _("FATAL: tap packet destined for current node received, exiting."));
573 exit (1); 583 exit (EXIT_FAILURE);
574 } 584 }
575 585
576 if (dst > conns.size ()) 586 if (dst > conns.size ())
577 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst); 587 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
578 else 588 else
579 inject_data_packet (pkt, dst); 589 inject_data_packet (pkt, dst);
580 } 590 }
581 591
582 delete pkt; 592 delete pkt;
583 } 593 }
584 else if (revents & (POLLHUP | POLLERR))
585 {
586 slog (L_ERR, _("FATAL: POLLHUP or POLLERR on network device fd, terminating."));
587 exit (1);
588 }
589 else 594 else
590 abort (); 595 abort ();
591} 596}
592 597
593void 598void
… …
598 if (events & EVENT_SHUTDOWN) 603 if (events & EVENT_SHUTDOWN)
599 { 604 {
600 slog (L_INFO, _("preparing shutdown...")); 605 slog (L_INFO, _("preparing shutdown..."));
601 606
602 shutdown_all (); 607 shutdown_all ();
603
604 remove_pid (pidfilename); 608 remove_pid (conf.pidfilename);
605
606 slog (L_INFO, _("terminating")); 609 slog (L_INFO, _("terminating"));
607 610 exit (EXIT_SUCCESS);
608 exit (0);
609 } 611 }
610 612
611 if (events & EVENT_RECONNECT) 613 if (events & EVENT_RECONNECT)
612 { 614 {
613 slog (L_INFO, _("forced reconnect")); 615 slog (L_INFO, _("forced reconnect"));
… …
615 reconnect_all (); 617 reconnect_all ();
616 } 618 }
617 619
618 events = 0; 620 events = 0;
619 } 621 }
620
621 w.at = TSTAMP_CANCEL;
622} 622}
623 623
624void 624void
625vpn::shutdown_all () 625vpn::shutdown_all ()
626{ 626{
… …
650 } 650 }
651} 651}
652 652
653connection *vpn::find_router () 653connection *vpn::find_router ()
654{ 654{
655 u32 prio = 1; 655 u32 prio = 0;
656 connection *router = 0; 656 connection *router = 0;
657 657
658 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i) 658 for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
659 { 659 {
660 connection *c = *i; 660 connection *c = *i;
… …
716, tcpv4_ev_watcher (this, &vpn::tcpv4_ev) 716, tcpv4_ev_watcher (this, &vpn::tcpv4_ev)
717#endif 717#endif
718#if ENABLE_ICMP 718#if ENABLE_ICMP
719, icmpv4_ev_watcher(this, &vpn::icmpv4_ev) 719, icmpv4_ev_watcher(this, &vpn::icmpv4_ev)
720#endif 720#endif
721#if ENABLE_DNS
722, dnsv4_ev_watcher (this, &vpn::dnsv4_ev)
723#endif
721, tap_ev_watcher (this, &vpn::tap_ev) 724, tap_ev_watcher (this, &vpn::tap_ev)
722{ 725{
723} 726}
724 727
725vpn::~vpn () 728vpn::~vpn ()

Diff Legend

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