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.27 by pcg, Tue Mar 1 06:27:20 2005 UTC vs.
Revision 1.33 by pcg, Wed Mar 23 21:55:39 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
… …
63 asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env); 66 asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);
64 asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env); 67 asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);
65 asprintf (&env, "MTU=%d", mtu); putenv (env); 68 asprintf (&env, "MTU=%d", mtu); putenv (env);
66 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x", 69 asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x",
67 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8, 70 0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8,
68 THISNODE->id & 0xff); 71 THISNODE->id & 0xff); putenv (env);
69 putenv (env);
70 72
73 // TODO: info for other nodes, maybe?
74}
75
76const char *vpn::script_if_init ()
77{
78 script_init_env ();
79
80 return tap->if_up ();
81}
82
83const char *vpn::script_if_up ()
84{
85 script_init_env ();
86
87 char *filename;
88 asprintf (&filename,
89 "%s/%s",
90 confbase,
71 return ::conf.script_if_up ? ::conf.script_if_up : "if-up"; 91 ::conf.script_if_up ? ::conf.script_if_up : "if-up");
92
93 return filename;
72} 94}
73 95
74int 96int
75vpn::setup () 97vpn::setup ()
76{ 98{
… …
226#endif 248#endif
227 249
228#if ENABLE_DNS 250#if ENABLE_DNS
229 if (THISNODE->protocols & PROT_DNSv4) 251 if (THISNODE->protocols & PROT_DNSv4)
230 { 252 {
253 dns_forwarder.set (::conf.dns_forw_host, ::conf.dns_forw_port, PROT_DNSv4);
254
231 dnsv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP); 255 dnsv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);
232 256
233 if (dnsv4_fd < 0) 257 if (dnsv4_fd < 0)
234 return -1; 258 return -1;
259
260#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
261 // this I really consider a linux bug. I am neither connected
262 // nor do I fragment myself. Linux still sets DF and doesn't
263 // fragment for me sometimes.
264 {
265 int oval = IP_PMTUDISC_DONT;
266 setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
267 }
268#endif
235 269
236 // standard daemon practise... 270 // standard daemon practise...
237 { 271 {
238 int oval = 1; 272 int oval = 1;
239 setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval); 273 setsockopt (dnsv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
240 } 274 }
241 275
242 sockinfo si (THISNODE, PROT_DNSv4); 276 sockinfo si (THISNODE->dns_hostname,
277 THISNODE->dns_hostname ? THISNODE->dns_port : 0,
278 PROT_DNSv4);
243 279
244 if (bind (dnsv4_fd, si.sav4 (), si.salenv4 ())) 280 if (bind (dnsv4_fd, si.sav4 (), si.salenv4 ()))
245 { 281 {
246 slog (L_ERR, _("can't bind dnsv4 on %s: %s"), (const char *)si, strerror (errno)); 282 slog (L_ERR, _("can't bind dnsv4 on %s: %s"), (const char *)si, strerror (errno));
247 exit (EXIT_FAILURE); 283 exit (EXIT_FAILURE);
… …
256 { 292 {
257 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname); 293 slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname);
258 exit (EXIT_FAILURE); 294 exit (EXIT_FAILURE);
259 } 295 }
260 296
297 if (tap->if_up () &&
298 !run_script (run_script_cb (this, &vpn::script_if_init), true))
299 {
300 slog (L_ERR, _("interface initialization command '%s' failed, exiting."),
301 tap->if_up ());
302 exit (EXIT_FAILURE);
303 }
304
261 run_script (run_script_cb (this, &vpn::script_if_up), true); 305 if (!run_script (run_script_cb (this, &vpn::script_if_up), true))
306 {
307 slog (L_ERR, _("if-up command execution failed, exiting."));
308 exit (EXIT_FAILURE);
309 }
262 310
263 tap_ev_watcher.start (tap->fd, EVENT_READ); 311 tap_ev_watcher.start (tap->fd, EVENT_READ);
264 312
265 reconnect_all (); 313 reconnect_all ();
266 314
… …
391 else 439 else
392 c->recv_vpn_packet (pkt, rsi); 440 c->recv_vpn_packet (pkt, rsi);
393 } 441 }
394} 442}
395 443
444bool
445vpn::send_vpn_packet (vpn_packet *pkt, const sockinfo &si, int tos)
446{
447 switch (si.prot)
448 {
449 case PROT_IPv4:
450 return send_ipv4_packet (pkt, si, tos);
451 case PROT_UDPv4:
452 return send_udpv4_packet (pkt, si, tos);
453#if ENABLE_TCP
454 case PROT_TCPv4:
455 return send_tcpv4_packet (pkt, si, tos);
456#endif
457#if ENABLE_ICMP
458 case PROT_ICMPv4:
459 return send_icmpv4_packet (pkt, si, tos);
460#endif
461#if ENABLE_DNS
462 case PROT_DNSv4:
463 return send_dnsv4_packet (pkt, si, tos);
464#endif
465
466 default:
467 slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si);
468 }
469
470 return false;
471}
472
396void 473void
397vpn::ipv4_ev (io_watcher &w, short revents) 474vpn::ipv4_ev (io_watcher &w, short revents)
398{ 475{
399 if (revents & EVENT_READ) 476 if (revents & EVENT_READ)
400 { 477 {
… …
409 486
410 if (len > 0) 487 if (len > 0)
411 { 488 {
412 pkt->len = len; 489 pkt->len = len;
413 490
414 // raw sockets deliver the ipv4, but don't expect it on sends 491 // raw sockets deliver the ipv4 header, but don't expect it on sends
415 // this is slow, but...
416 pkt->skip_hdr (IP_OVERHEAD); 492 pkt->skip_hdr (IP_OVERHEAD);
417 493
418 recv_vpn_packet (pkt, si); 494 recv_vpn_packet (pkt, si);
419 } 495 }
420 else 496 else
… …
426 delete pkt; 502 delete pkt;
427 } 503 }
428 else 504 else
429 { 505 {
430 slog (L_ERR, 506 slog (L_ERR,
431 _("FATAL: unknown revents %08x in socket, terminating\n"), 507 _("FATAL: unknown revents %08x in socket, terminating\n"),
432 revents); 508 revents);
433 exit (EXIT_FAILURE); 509 exit (EXIT_FAILURE);
434 } 510 }
435} 511}
436 512
437#if ENABLE_ICMP 513#if ENABLE_ICMP
… …
538 int dst = mac2id (pkt->dst); 614 int dst = mac2id (pkt->dst);
539 int src = mac2id (pkt->src); 615 int src = mac2id (pkt->src);
540 616
541 if (src != THISNODE->id) 617 if (src != THISNODE->id)
542 { 618 {
543 slog (L_ERR, _("FATAL: tap packet not originating on current node received, exiting.")); 619 slog (L_ERR, _("FATAL: tap packet not originating on current node received (if-up script not working properly?), exiting."));
544 exit (EXIT_FAILURE); 620 exit (EXIT_FAILURE);
545 } 621 }
546 622
547 if (dst == THISNODE->id) 623 if (dst == THISNODE->id)
548 { 624 {

Diff Legend

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