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.23 by pcg, Thu Jan 29 18:55:10 2004 UTC vs.
Revision 1.36 by pcg, Fri Apr 8 16:48:16 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-2004 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
… …
44 46
45vpn network; // THE vpn (bad design...) 47vpn network; // THE vpn (bad design...)
46 48
47///////////////////////////////////////////////////////////////////////////// 49/////////////////////////////////////////////////////////////////////////////
48 50
49const char *vpn::script_if_up () 51void
52vpn::script_init_env ()
50{ 53{
51 // the tunnel device mtu should be the physical mtu - overhead 54 // the tunnel device mtu should be the physical mtu - overhead
52 // the tricky part is rounding to the cipher key blocksize 55 // the tricky part is rounding to the cipher key blocksize
53 int mtu = conf.mtu - ETH_OVERHEAD - VPE_OVERHEAD - MAX_OVERHEAD; 56 int mtu = conf.mtu - ETH_OVERHEAD - VPE_OVERHEAD - MAX_OVERHEAD;
54 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion 57 mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion
55 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round 58 mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round
56 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again 59 mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again
57 60
58 char *env; 61 char *env;
59 asprintf (&env, "CONFBASE=%s", confbase); putenv (env); 62 asprintf (&env, "CONFBASE=%s", confbase); putenv (env);
60 asprintf (&env, "NODENAME=%s", THISNODE->nodename); putenv (env);
61 asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
62 asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env); 63 asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env);
63 asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env); 64 asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);
64 asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env); 65 asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);
65 asprintf (&env, "MTU=%d", mtu); putenv (env); 66 asprintf (&env, "MTU=%d", mtu); putenv (env);
66 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x", 67 asprintf (&env, "NODES=%d", conns.size ()); putenv (env);
67 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8, 68 asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
68 THISNODE->id & 0xff);
69 putenv (env);
70 69
70 conns [THISNODE->id - 1]->script_init_env ("");
71
72 for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
73 {
74 char ext[16];
75 snprintf (ext, 16, "_%d", (*c)->conf->id);
76 (*c)->script_init_env (ext);
77 }
78}
79
80const char *vpn::script_if_init ()
81{
82 script_init_env ();
83
84 return tap->if_up ();
85}
86
87const char *vpn::script_if_up ()
88{
89 script_init_env ();
90
91 char *filename;
92 asprintf (&filename,
93 "%s/%s",
94 confbase,
71 return ::conf.script_if_up ? ::conf.script_if_up : "if-up"; 95 ::conf.script_if_up ? ::conf.script_if_up : "if-up");
96
97 return filename;
72} 98}
73 99
74int 100int
75vpn::setup () 101vpn::setup ()
76{ 102{
… …
171 // this I really consider a linux bug. I am neither connected 197 // this I really consider a linux bug. I am neither connected
172 // nor do I fragment myself. Linux still sets DF and doesn't 198 // nor do I fragment myself. Linux still sets DF and doesn't
173 // fragment for me sometimes. 199 // fragment for me sometimes.
174 { 200 {
175 int oval = IP_PMTUDISC_DONT; 201 int oval = IP_PMTUDISC_DONT;
176 setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval); 202 setsockopt (icmpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
177 } 203 }
178#endif 204#endif
179 205
180 sockinfo si (THISNODE, PROT_ICMPv4); 206 sockinfo si (THISNODE, PROT_ICMPv4);
181 207
… …
223 249
224 tcpv4_ev_watcher.start (tcpv4_fd, EVENT_READ); 250 tcpv4_ev_watcher.start (tcpv4_fd, EVENT_READ);
225 } 251 }
226#endif 252#endif
227 253
254#if ENABLE_DNS
255 if (THISNODE->protocols & PROT_DNSv4)
256 {
257 dns_forwarder.set (::conf.dns_forw_host, ::conf.dns_forw_port, PROT_DNSv4);
258
259 dnsv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);
260
261 if (dnsv4_fd < 0)
262 return -1;
263
264# if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
265 // this I really consider a linux bug. I am neither connected
266 // nor do I fragment myself. Linux still sets DF and doesn't
267 // fragment for me sometimes.
268 {
269 int oval = IP_PMTUDISC_DONT;
270 setsockopt (dnsv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
271 }
272# endif
273
274 // standard daemon practise...
275 {
276 int oval = 1;
277 setsockopt (dnsv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
278 }
279
280 sockinfo si (THISNODE->dns_hostname,
281 THISNODE->dns_hostname ? THISNODE->dns_port : 0,
282 PROT_DNSv4);
283
284 if (bind (dnsv4_fd, si.sav4 (), si.salenv4 ()))
285 {
286 slog (L_ERR, _("can't bind dnsv4 on %s: %s"), (const char *)si, strerror (errno));
287 exit (EXIT_FAILURE);
288 }
289
290 dnsv4_ev_watcher.start (dnsv4_fd, EVENT_READ);
291 }
292#endif
293
294 /////////////////////////////////////////////////////////////////////////////
295
296 reconnect_all ();
297
298 /////////////////////////////////////////////////////////////////////////////
299
228 tap = new tap_device (); 300 tap = new tap_device ();
229 if (!tap) //D this, of course, never catches 301 if (!tap) //D this, of course, never catches
230 { 302 {
231 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname); 303 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname);
232 exit (EXIT_FAILURE); 304 exit (EXIT_FAILURE);
233 } 305 }
234 306
307 if (tap->if_up () &&
308 !run_script (run_script_cb (this, &vpn::script_if_init), true))
309 {
310 slog (L_ERR, _("interface initialization command '%s' failed, exiting."),
311 tap->if_up ());
312 exit (EXIT_FAILURE);
313 }
314
235 run_script (run_script_cb (this, &vpn::script_if_up), true); 315 if (!run_script (run_script_cb (this, &vpn::script_if_up), true))
316 {
317 slog (L_ERR, _("if-up command execution failed, exiting."));
318 exit (EXIT_FAILURE);
319 }
236 320
237 tap_ev_watcher.start (tap->fd, EVENT_READ); 321 tap_ev_watcher.start (tap->fd, EVENT_READ);
238 322
239 reconnect_all ();
240
241 return 0; 323 return 0;
242}
243
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} 324}
271 325
272bool 326bool
273vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos) 327vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
274{ 328{
… …
393 else 447 else
394 c->recv_vpn_packet (pkt, rsi); 448 c->recv_vpn_packet (pkt, rsi);
395 } 449 }
396} 450}
397 451
452bool
453vpn::send_vpn_packet (vpn_packet *pkt, const sockinfo &si, int tos)
454{
455 switch (si.prot)
456 {
457 case PROT_IPv4:
458 return send_ipv4_packet (pkt, si, tos);
459 case PROT_UDPv4:
460 return send_udpv4_packet (pkt, si, tos);
461#if ENABLE_TCP
462 case PROT_TCPv4:
463 return send_tcpv4_packet (pkt, si, tos);
464#endif
465#if ENABLE_ICMP
466 case PROT_ICMPv4:
467 return send_icmpv4_packet (pkt, si, tos);
468#endif
469#if ENABLE_DNS
470 case PROT_DNSv4:
471 return send_dnsv4_packet (pkt, si, tos);
472#endif
473
474 default:
475 slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si);
476 }
477
478 return false;
479}
480
398void 481void
399vpn::ipv4_ev (io_watcher &w, short revents) 482vpn::ipv4_ev (io_watcher &w, short revents)
400{ 483{
401 if (revents & EVENT_READ) 484 if (revents & EVENT_READ)
402 { 485 {
… …
411 494
412 if (len > 0) 495 if (len > 0)
413 { 496 {
414 pkt->len = len; 497 pkt->len = len;
415 498
416 // raw sockets deliver the ipv4, but don't expect it on sends 499 // raw sockets deliver the ipv4 header, but don't expect it on sends
417 // this is slow, but...
418 pkt->skip_hdr (IP_OVERHEAD); 500 pkt->skip_hdr (IP_OVERHEAD);
419 501
420 recv_vpn_packet (pkt, si); 502 recv_vpn_packet (pkt, si);
421 } 503 }
422 else 504 else
… …
428 delete pkt; 510 delete pkt;
429 } 511 }
430 else 512 else
431 { 513 {
432 slog (L_ERR, 514 slog (L_ERR,
433 _("FATAL: unknown revents %08x in socket, terminating\n"), 515 _("FATAL: unknown revents %08x in socket, terminating\n"),
434 revents); 516 revents);
435 exit (EXIT_FAILURE); 517 exit (EXIT_FAILURE);
436 } 518 }
437} 519}
438 520
439#if ENABLE_ICMP 521#if ENABLE_ICMP
… …
540 int dst = mac2id (pkt->dst); 622 int dst = mac2id (pkt->dst);
541 int src = mac2id (pkt->src); 623 int src = mac2id (pkt->src);
542 624
543 if (src != THISNODE->id) 625 if (src != THISNODE->id)
544 { 626 {
545 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting.")); 627 slog (L_ERR, _("FATAL: tap packet not originating on current node received (if-up script not working properly?), exiting."));
546 exit (EXIT_FAILURE); 628 exit (EXIT_FAILURE);
547 } 629 }
548 630
549 if (dst == THISNODE->id) 631 if (dst == THISNODE->id)
550 { 632 {
… …
572 if (events & EVENT_SHUTDOWN) 654 if (events & EVENT_SHUTDOWN)
573 { 655 {
574 slog (L_INFO, _("preparing shutdown...")); 656 slog (L_INFO, _("preparing shutdown..."));
575 657
576 shutdown_all (); 658 shutdown_all ();
577 remove_pid (pidfilename); 659 remove_pid (conf.pidfilename);
578 slog (L_INFO, _("terminating")); 660 slog (L_INFO, _("terminating"));
579 exit (EXIT_SUCCESS); 661 exit (EXIT_SUCCESS);
580 } 662 }
581 663
582 if (events & EVENT_RECONNECT) 664 if (events & EVENT_RECONNECT)
… …
608 connection_init (); 690 connection_init ();
609 691
610 for (configuration::node_vector::iterator i = conf.nodes.begin (); 692 for (configuration::node_vector::iterator i = conf.nodes.begin ();
611 i != conf.nodes.end (); ++i) 693 i != conf.nodes.end (); ++i)
612 { 694 {
613 connection *conn = new connection (this); 695 connection *conn = new connection (this, *i);
614
615 conn->conf = *i;
616 conns.push_back (conn); 696 conns.push_back (conn);
617
618 conn->establish_connection (); 697 conn->establish_connection ();
619 } 698 }
620} 699}
621 700
622connection *vpn::find_router () 701connection *vpn::find_router ()
… …
685, tcpv4_ev_watcher (this, &vpn::tcpv4_ev) 764, tcpv4_ev_watcher (this, &vpn::tcpv4_ev)
686#endif 765#endif
687#if ENABLE_ICMP 766#if ENABLE_ICMP
688, icmpv4_ev_watcher(this, &vpn::icmpv4_ev) 767, icmpv4_ev_watcher(this, &vpn::icmpv4_ev)
689#endif 768#endif
769#if ENABLE_DNS
770, dnsv4_ev_watcher (this, &vpn::dnsv4_ev)
771#endif
690, tap_ev_watcher (this, &vpn::tap_ev) 772, tap_ev_watcher (this, &vpn::tap_ev)
691{ 773{
692} 774}
693 775
694vpn::~vpn () 776vpn::~vpn ()

Diff Legend

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