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.29 by pcg, Fri Mar 4 04:52:38 2005 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-2005 Marc Lehmann <gvpe@schmorp.de>
4 4
5 This file is part of GVPE.
6
5 This program is free software; you can redistribute it and/or modify 7 GVPE is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by 8 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 9 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version. 10 (at your option) any later version.
9 11
10 This program is distributed in the hope that it will be useful, 12 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details. 15 GNU General Public License for more details.
14 16
15 You should have received a copy of the GNU General Public License 17 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software 18 along with gvpe; if not, write to the Free Software
17 Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 19 Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18*/ 20*/
19 21
20#include "config.h" 22#include "config.h"
21 23
22#include <list> 24#include <list>
23 25
26#include <cstdio>
27#include <cstring>
24#include <cstdlib> 28#include <cstdlib>
25#include <cstring>
26#include <cstdio>
27 29
28#include <sys/types.h> 30#include <sys/types.h>
29#include <sys/socket.h> 31#include <sys/socket.h>
30#include <sys/wait.h> 32#include <sys/wait.h>
31#include <errno.h> 33#include <errno.h>
… …
54 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion 56 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion
55 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round 57 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round
56 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again 58 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again
57 59
58 char *env; 60 char *env;
59 asprintf (&env, "CONFBASE=%s", confbase); 61 asprintf (&env, "CONFBASE=%s", confbase); putenv (env);
60 putenv (env);
61 asprintf (&env, "NODENAME=%s", THISNODE->nodename); 62 asprintf (&env, "NODENAME=%s", THISNODE->nodename); putenv (env);
62 putenv (env);
63 asprintf (&env, "NODEID=%d", THISNODE->id); 63 asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
64 putenv (env);
65 asprintf (&env, "IFNAME=%s", tap->interface ()); 64 asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env);
66 putenv (env); 65 asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);
66 asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);
67 asprintf (&env, "MTU=%d", mtu); 67 asprintf (&env, "MTU=%d", mtu); putenv (env);
68 putenv (env);
69 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x", 68 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x",
70 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8, 69 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8,
71 THISNODE->id & 0xff); 70 THISNODE->id & 0xff);
72 putenv (env); 71 putenv (env);
73 72
… …
101 sockinfo si (THISNODE, PROT_IPv4); 100 sockinfo si (THISNODE, PROT_IPv4);
102 101
103 if (bind (ipv4_fd, si.sav4 (), si.salenv4 ())) 102 if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
104 { 103 {
105 slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno)); 104 slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno));
106 exit (1); 105 exit (EXIT_FAILURE);
107 } 106 }
108 107
109 ipv4_ev_watcher.start (ipv4_fd, POLLIN); 108 ipv4_ev_watcher.start (ipv4_fd, EVENT_READ);
110 } 109 }
111 110
112 udpv4_fd = -1; 111 udpv4_fd = -1;
113 112
114 if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port) 113 if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port)
… …
139 sockinfo si (THISNODE, PROT_UDPv4); 138 sockinfo si (THISNODE, PROT_UDPv4);
140 139
141 if (bind (udpv4_fd, si.sav4 (), si.salenv4 ())) 140 if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
142 { 141 {
143 slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno)); 142 slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno));
144 exit (1); 143 exit (EXIT_FAILURE);
145 } 144 }
146 145
147 udpv4_ev_watcher.start (udpv4_fd, POLLIN); 146 udpv4_ev_watcher.start (udpv4_fd, EVENT_READ);
148 } 147 }
149 148
150 icmpv4_fd = -1; 149 icmpv4_fd = -1;
151 150
152#if ENABLE_ICMP 151#if ENABLE_ICMP
… …
183 sockinfo si (THISNODE, PROT_ICMPv4); 182 sockinfo si (THISNODE, PROT_ICMPv4);
184 183
185 if (bind (icmpv4_fd, si.sav4 (), si.salenv4 ())) 184 if (bind (icmpv4_fd, si.sav4 (), si.salenv4 ()))
186 { 185 {
187 slog (L_ERR, _("can't bind icmpv4 on %s: %s"), (const char *)si, strerror (errno)); 186 slog (L_ERR, _("can't bind icmpv4 on %s: %s"), (const char *)si, strerror (errno));
188 exit (1); 187 exit (EXIT_FAILURE);
189 } 188 }
190 189
191 icmpv4_ev_watcher.start (icmpv4_fd, POLLIN); 190 icmpv4_ev_watcher.start (icmpv4_fd, EVENT_READ);
192 } 191 }
193#endif 192#endif
194 193
195 tcpv4_fd = -1; 194 tcpv4_fd = -1;
196 195
… …
213 sockinfo si (THISNODE, PROT_TCPv4); 212 sockinfo si (THISNODE, PROT_TCPv4);
214 213
215 if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ())) 214 if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ()))
216 { 215 {
217 slog (L_ERR, _("can't bind tcpv4 on %s: %s"), (const char *)si, strerror (errno)); 216 slog (L_ERR, _("can't bind tcpv4 on %s: %s"), (const char *)si, strerror (errno));
218 exit (1); 217 exit (EXIT_FAILURE);
219 } 218 }
220 219
221 if (listen (tcpv4_fd, 5)) 220 if (listen (tcpv4_fd, 5))
222 { 221 {
223 slog (L_ERR, _("can't listen tcpv4 on %s: %s"), (const char *)si, strerror (errno)); 222 slog (L_ERR, _("can't listen tcpv4 on %s: %s"), (const char *)si, strerror (errno));
224 exit (1); 223 exit (EXIT_FAILURE);
224 }
225
226 tcpv4_ev_watcher.start (tcpv4_fd, EVENT_READ);
227 }
228#endif
229
230#if ENABLE_DNS
231 if (THISNODE->protocols & PROT_DNSv4)
232 {
233 dns_forwarder.set (::conf.dns_forw_host, ::conf.dns_forw_port, PROT_DNSv4);
234
235 dnsv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);
236
237 if (dnsv4_fd < 0)
238 return -1;
239
240 // standard daemon practise...
241 {
242 int oval = 1;
243 setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
244 }
245
246 sockinfo si (THISNODE, PROT_DNSv4);
247
248 if (bind (dnsv4_fd, si.sav4 (), si.salenv4 ()))
225 } 249 {
250 slog (L_ERR, _("can't bind dnsv4 on %s: %s"), (const char *)si, strerror (errno));
251 exit (EXIT_FAILURE);
252 }
226 253
227 tcpv4_ev_watcher.start (tcpv4_fd, POLLIN); 254 dnsv4_ev_watcher.start (dnsv4_fd, EVENT_READ);
228 } 255 }
229#endif 256#endif
230 257
231 tap = new tap_device (); 258 tap = new tap_device ();
232 if (!tap) //D this, of course, never catches 259 if (!tap) //D this, of course, never catches
233 { 260 {
234 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname); 261 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname);
235 exit (1); 262 exit (EXIT_FAILURE);
236 } 263 }
237 264
238 run_script (run_script_cb (this, &vpn::script_if_up), true); 265 run_script (run_script_cb (this, &vpn::script_if_up), true);
239 266
240 tap_ev_watcher.start (tap->fd, POLLIN); 267 tap_ev_watcher.start (tap->fd, EVENT_READ);
241 268
242 reconnect_all (); 269 reconnect_all ();
243 270
244 return 0; 271 return 0;
245}
246
247// send a vpn packet out to other hosts
248bool
249vpn::send_vpn_packet (vpn_packet *pkt, const sockinfo &si, int tos)
250{
251 switch (si.prot)
252 {
253 case PROT_IPv4:
254 return send_ipv4_packet (pkt, si, tos);
255
256 case PROT_UDPv4:
257 return send_udpv4_packet (pkt, si, tos);
258
259#if ENABLE_TCP
260 case PROT_TCPv4:
261 return send_tcpv4_packet (pkt, si, tos);
262#endif
263
264#if ENABLE_ICMP
265 case PROT_ICMPv4:
266 return send_icmpv4_packet (pkt, si, tos);
267#endif
268
269 default:
270 slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si);
271 return false;
272 }
273} 272}
274 273
275bool 274bool
276vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 275vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
277{ 276{
… …
399} 398}
400 399
401void 400void
402vpn::ipv4_ev (io_watcher &w, short revents) 401vpn::ipv4_ev (io_watcher &w, short revents)
403{ 402{
404 if (revents & (POLLIN | POLLERR)) 403 if (revents & EVENT_READ)
405 { 404 {
406 vpn_packet *pkt = new vpn_packet; 405 vpn_packet *pkt = new vpn_packet;
407 struct sockaddr_in sa; 406 struct sockaddr_in sa;
408 socklen_t sa_len = sizeof (sa); 407 socklen_t sa_len = sizeof (sa);
409 int len; 408 int len;
… …
428 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno)); 427 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));
429 } 428 }
430 429
431 delete pkt; 430 delete pkt;
432 } 431 }
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 432 else
440 { 433 {
441 slog (L_ERR, 434 slog (L_ERR,
442 _("FATAL: unknown revents %08x in socket, terminating\n"), 435 _("FATAL: unknown revents %08x in socket, terminating\n"),
443 revents); 436 revents);
444 exit (1); 437 exit (EXIT_FAILURE);
445 } 438 }
446} 439}
447 440
448#if ENABLE_ICMP 441#if ENABLE_ICMP
449void 442void
450vpn::icmpv4_ev (io_watcher &w, short revents) 443vpn::icmpv4_ev (io_watcher &w, short revents)
451{ 444{
452 if (revents & (POLLIN | POLLERR)) 445 if (revents & EVENT_READ)
453 { 446 {
454 vpn_packet *pkt = new vpn_packet; 447 vpn_packet *pkt = new vpn_packet;
455 struct sockaddr_in sa; 448 struct sockaddr_in sa;
456 socklen_t sa_len = sizeof (sa); 449 socklen_t sa_len = sizeof (sa);
457 int len; 450 int len;
… …
482 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno)); 475 slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));
483 } 476 }
484 477
485 delete pkt; 478 delete pkt;
486 } 479 }
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 480 else
494 { 481 {
495 slog (L_ERR, 482 slog (L_ERR,
496 _("FATAL: unknown revents %08x in socket, terminating\n"), 483 _("FATAL: unknown revents %08x in socket, terminating\n"),
497 revents); 484 revents);
498 exit (1); 485 exit (EXIT_FAILURE);
499 } 486 }
500} 487}
501#endif 488#endif
502 489
503void 490void
504vpn::udpv4_ev (io_watcher &w, short revents) 491vpn::udpv4_ev (io_watcher &w, short revents)
505{ 492{
506 if (revents & (POLLIN | POLLERR)) 493 if (revents & EVENT_READ)
507 { 494 {
508 vpn_packet *pkt = new vpn_packet; 495 vpn_packet *pkt = new vpn_packet;
509 struct sockaddr_in sa; 496 struct sockaddr_in sa;
510 socklen_t sa_len = sizeof (sa); 497 socklen_t sa_len = sizeof (sa);
511 int len; 498 int len;
… …
526 slog (L_DEBUG, _("%s: fd %d, %s"), (const char *)si, w.fd, strerror (errno)); 513 slog (L_DEBUG, _("%s: fd %d, %s"), (const char *)si, w.fd, strerror (errno));
527 } 514 }
528 515
529 delete pkt; 516 delete pkt;
530 } 517 }
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 518 else
538 { 519 {
539 slog (L_ERR, 520 slog (L_ERR,
540 _("FATAL: unknown revents %08x in socket, terminating\n"), 521 _("FATAL: unknown revents %08x in socket, terminating\n"),
541 revents); 522 revents);
542 exit (1); 523 exit (EXIT_FAILURE);
543 } 524 }
544} 525}
545 526
546void 527void
547vpn::tap_ev (io_watcher &w, short revents) 528vpn::tap_ev (io_watcher &w, short revents)
548{ 529{
549 if (revents & POLLIN) 530 if (revents & EVENT_READ)
550 { 531 {
551 /* process data */ 532 /* process data */
552 tap_packet *pkt; 533 tap_packet *pkt;
553 534
554 pkt = tap->recv (); 535 pkt = tap->recv ();
… …
562 int src = mac2id (pkt->src); 543 int src = mac2id (pkt->src);
563 544
564 if (src != THISNODE->id) 545 if (src != THISNODE->id)
565 { 546 {
566 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting.")); 547 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting."));
567 exit (1); 548 exit (EXIT_FAILURE);
568 } 549 }
569 550
570 if (dst == THISNODE->id) 551 if (dst == THISNODE->id)
571 { 552 {
572 slog (L_ERR, _("FATAL: tap packet destined for current node received, exiting.")); 553 slog (L_ERR, _("FATAL: tap packet destined for current node received, exiting."));
573 exit (1); 554 exit (EXIT_FAILURE);
574 } 555 }
575 556
576 if (dst > conns.size ()) 557 if (dst > conns.size ())
577 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst); 558 slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
578 else 559 else
579 inject_data_packet (pkt, dst); 560 inject_data_packet (pkt, dst);
580 } 561 }
581 562
582 delete pkt; 563 delete pkt;
583 } 564 }
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 565 else
590 abort (); 566 abort ();
591} 567}
592 568
593void 569void
… …
598 if (events & EVENT_SHUTDOWN) 574 if (events & EVENT_SHUTDOWN)
599 { 575 {
600 slog (L_INFO, _("preparing shutdown...")); 576 slog (L_INFO, _("preparing shutdown..."));
601 577
602 shutdown_all (); 578 shutdown_all ();
603
604 remove_pid (pidfilename); 579 remove_pid (conf.pidfilename);
605
606 slog (L_INFO, _("terminating")); 580 slog (L_INFO, _("terminating"));
607 581 exit (EXIT_SUCCESS);
608 exit (0);
609 } 582 }
610 583
611 if (events & EVENT_RECONNECT) 584 if (events & EVENT_RECONNECT)
612 { 585 {
613 slog (L_INFO, _("forced reconnect")); 586 slog (L_INFO, _("forced reconnect"));
… …
615 reconnect_all (); 588 reconnect_all ();
616 } 589 }
617 590
618 events = 0; 591 events = 0;
619 } 592 }
620
621 w.at = TSTAMP_CANCEL;
622} 593}
623 594
624void 595void
625vpn::shutdown_all () 596vpn::shutdown_all ()
626{ 597{
… …
639 connection_init (); 610 connection_init ();
640 611
641 for (configuration::node_vector::iterator i = conf.nodes.begin (); 612 for (configuration::node_vector::iterator i = conf.nodes.begin ();
642 i != conf.nodes.end (); ++i) 613 i != conf.nodes.end (); ++i)
643 { 614 {
644 connection *conn = new connection (this); 615 connection *conn = new connection (this, *i);
645
646 conn->conf = *i;
647 conns.push_back (conn); 616 conns.push_back (conn);
648
649 conn->establish_connection (); 617 conn->establish_connection ();
650 } 618 }
651} 619}
652 620
653connection *vpn::find_router () 621connection *vpn::find_router ()
… …
716, tcpv4_ev_watcher (this, &vpn::tcpv4_ev) 684, tcpv4_ev_watcher (this, &vpn::tcpv4_ev)
717#endif 685#endif
718#if ENABLE_ICMP 686#if ENABLE_ICMP
719, icmpv4_ev_watcher(this, &vpn::icmpv4_ev) 687, icmpv4_ev_watcher(this, &vpn::icmpv4_ev)
720#endif 688#endif
689#if ENABLE_DNS
690, dnsv4_ev_watcher (this, &vpn::dnsv4_ev)
691#endif
721, tap_ev_watcher (this, &vpn::tap_ev) 692, tap_ev_watcher (this, &vpn::tap_ev)
722{ 693{
723} 694}
724 695
725vpn::~vpn () 696vpn::~vpn ()

Diff Legend

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