[ViewVC] Diff of: cvs/gvpe/src/vpn.C

Comparing gvpe/src/vpn.C (file contents):
Revision 1.2 by pcg, Wed Apr 2 05:15:00 2003 UTC vs.
Revision 1.64 by root, Tue Dec 4 10:29:43 2012 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-2008,2010,2011 Marc Lehmann <gvpe@schmorp.de>
3		4
		5	This file is part of GVPE.
		6
4	This program is free software; you can redistribute it and/or modify	7	GVPE is free software; you can redistribute it and/or modify it
5	it under the terms of the GNU General Public License as published by	8	under the terms of the GNU General Public License as published by the
6	the Free Software Foundation; either version 2 of the License, or	9	Free Software Foundation; either version 3 of the License, or (at your
7	(at your option) any later version.	10	option) any later version.
8		11
9	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, but
10	but WITHOUT ANY WARRANTY; without even the implied warranty of	13	WITHOUT ANY WARRANTY; without even the implied warranty of
11	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
12	GNU General Public License for more details.	15	Public License for more details.
13		16
14	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 along
15	along with this program; if not, write to the Free Software	18	with this program; if not, see <http://www.gnu.org/licenses/>.
16	Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA	19
		20	Additional permission under GNU GPL version 3 section 7
		21
		22	If you modify this Program, or any covered work, by linking or
		23	combining it with the OpenSSL project's OpenSSL library (or a modified
		24	version of that library), containing parts covered by the terms of the
		25	OpenSSL or SSLeay licenses, the licensors of this Program grant you
		26	additional permission to convey the resulting work. Corresponding
		27	Source for a non-source form of such a combination shall include the
		28	source code for the parts of OpenSSL used as well as that of the
		29	covered work.
17	*/	30	*/
18		31
19	#include "config.h"	32	#include "config.h"
20		33
21	#include <list>	34	#include <list>
22		35
		36	#include <cstdio>
		37	#include <cstring>
23	#include <cstdlib>	38	#include <cstdlib>
24	#include <cstring>
25	#include <cstdio>
26		39
27	#include <sys/types.h>	40	#include <sys/types.h>
28	#include <sys/socket.h>	41	#include <sys/socket.h>
29	#include <sys/poll.h>
30	#include <sys/wait.h>	42	#include <sys/wait.h>
31	#include <netinet/in.h>	43	#include <sys/stat.h>
32	#include <arpa/inet.h>
33	#include <errno.h>	44	#include <errno.h>
34	#include <time.h>	45	#include <time.h>
35	#include <unistd.h>	46	#include <unistd.h>
		47	#include <fcntl.h>
		48	#include <sys/socket.h>
		49
		50	#include "netcompat.h"
36		51
37	#include "pidfile.h"	52	#include "pidfile.h"
38		53
39	#include "connection.h"	54	#include "connection.h"
40	#include "util.h"	55	#include "util.h"
41	#include "vpn.h"	56	#include "vpn.h"
42		57
43	#if ENABLE_TCP	58	using namespace std;
44	# include <map>	59
45	# include <unistd.h>	60	vpn network; // THE vpn (bad design...)
46	# include <fcntl.h>
47	# include <sys/poll.h>
48	#endif
49		61
50	/////////////////////////////////////////////////////////////////////////////	62	/////////////////////////////////////////////////////////////////////////////
51		63
52	const char *vpn::script_if_up ()	64	static void inline
		65	set_tos (int fd, int &tos_prev, int tos)
		66	{
		67	#if defined(SOL_IP) && defined(IP_TOS)
		68	if (tos_prev == tos)
		69	return;
		70
		71	tos_prev = tos;
		72	setsockopt (fd, SOL_IP, IP_TOS, &tos, sizeof tos);
		73	#endif
		74	}
		75
		76	void
		77	vpn::script_init_env ()
53	{	78	{
54	// the tunnel device mtu should be the physical mtu - overhead	79	// the tunnel device mtu should be the physical mtu - overhead
55	// the tricky part is rounding to the cipher key blocksize	80	// the tricky part is rounding to the cipher key blocksize
56	int mtu = conf.mtu - ETH_OVERHEAD - VPE_OVERHEAD - MAX_OVERHEAD;	81	int mtu = conf.mtu - ETH_OVERHEAD - VPE_OVERHEAD - MAX_OVERHEAD;
57	mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion	82	mtu += ETH_OVERHEAD - 6 - 6; // now we have the data portion
58	mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round	83	mtu -= mtu % EVP_CIPHER_block_size (CIPHER); // round
59	mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again	84	mtu -= ETH_OVERHEAD - 6 - 6; // and get interface mtu again
60		85
61	char *env;	86	char *env;
62	asprintf (&env, "CONFBASE=%s", confbase);	87	asprintf (&env, "CONFBASE=%s", confbase); putenv (env);
63	putenv (env);
64	asprintf (&env, "NODENAME=%s", THISNODE->nodename);
65	putenv (env);
66	asprintf (&env, "NODEID=%d", THISNODE->id);
67	putenv (env);
68	asprintf (&env, "IFNAME=%s", tap->interface ());	88	asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env);
69	putenv (env);	89	asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);
		90	asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);
70	asprintf (&env, "MTU=%d", mtu);	91	asprintf (&env, "MTU=%d", mtu); putenv (env);
71	putenv (env);	92	asprintf (&env, "NODES=%d", conns.size ()); putenv (env);
72	asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x",	93	asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
73	0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8,
74	THISNODE->id & 0xff);
75	putenv (env);
76		94
		95	conns [THISNODE->id - 1]->script_init_env ("");
		96
		97	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
		98	{
		99	char ext[16];
		100	snprintf (ext, 16, "_%d", (*c)->conf->id);
		101	(*c)->script_init_env (ext);
		102	}
		103	}
		104
		105	inline const char *
		106	vpn::script_if_init ()
		107	{
		108	script_init_env ();
		109
		110	return tap->if_up ();
		111	}
		112
		113	inline const char *
		114	vpn::script_if_up ()
		115	{
		116	script_init_env ();
		117
		118	char *filename;
		119	asprintf (&filename,
		120	"%s/%s",
		121	confbase,
77	return ::conf.script_if_up ? ::conf.script_if_up : "if-up";	122	::conf.script_if_up ? ::conf.script_if_up : "if-up");
		123
		124	return filename;
		125	}
		126
		127	int
		128	vpn::setup_socket (u8 prot, int family, int type, int proto)
		129	{
		130	int fd = socket (family, type, proto);
		131
		132	if (fd < 0)
		133	{
		134	slog (L_ERR, _("unable to create %s socket: %s."), strprotocol (prot), strerror (errno));
		135	return fd;
		136	}
		137
		138	fcntl (fd, F_SETFL, O_NONBLOCK);
		139	fcntl (fd, F_SETFD, FD_CLOEXEC);
		140
		141	#ifdef SO_MARK
		142	if (::conf.nfmark)
		143	if (setsockopt (fd, SOL_SOCKET, SO_MARK, &::conf.nfmark, sizeof ::conf.nfmark))
		144	slog (L_WARN, _("unable to set nfmark on %s socket: %s"), strprotocol (prot), strerror (errno));
		145	#endif
		146
		147	return fd;
78	}	148	}
79		149
80	int	150	int
81	vpn::setup ()	151	vpn::setup ()
82	{	152	{
		153	int success = 0;
		154
		155	ipv4_tos = -1;
83	udpv4_fd = -1;	156	ipv4_fd = -1;
84		157
85	if (THISNODE->protocols & PROT_UDPv4)	158	if (THISNODE->protocols & PROT_IPv4 && ::conf.ip_proto)
86	{	159	{
87	udpv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);	160	ipv4_fd = setup_socket (PROT_IPv4, PF_INET, SOCK_RAW, ::conf.ip_proto);
88		161
89	if (udpv4_fd < 0)	162	if (ipv4_fd < 0)
90	return -1;	163	return -1;
91		164
92	sockinfo si (THISNODE, PROT_UDPv4);	165	#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
93
94	if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
95	{
96	slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno));
97	exit (1);
98	}
99
100	#ifdef IP_MTU_DISCOVER
101	// this I really consider a linux bug. I am neither connected	166	// this I really consider a linux bug. I am neither connected
102	// nor do I fragment myself. Linux still sets DF and doesn't	167	// nor do I fragment myself. Linux still sets DF and doesn't
103	// fragment for me sometimes.	168	// fragment for me sometimes.
104	{	169	{
105	int oval = IP_PMTUDISC_DONT;	170	int oval = IP_PMTUDISC_DONT;
106	setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);	171	setsockopt (ipv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
		172	}
		173	#endif
		174
		175	sockinfo si (THISNODE, PROT_IPv4);
		176
		177	if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
		178	{
		179	slog (L_ERR, _("can't bind ipv4 socket on %s: %s, exiting."), (const char *)si, strerror (errno));
		180	return -1;
107	}	181	}
108	#endif	182
		183	ipv4_ev_watcher.start (ipv4_fd, EV_READ);
		184	++success;
		185	}
		186	else
		187	THISNODE->protocols &= ~PROT_IPv4;
		188
		189	udpv4_tos = -1;
		190	udpv4_fd = -1;
		191
		192	if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port)
		193	{
		194	udpv4_fd = setup_socket (PROT_UDPv4, PF_INET, SOCK_DGRAM, IPPROTO_UDP);
		195
		196	if (udpv4_fd < 0)
		197	return -1;
109		198
110	// standard daemon practise...	199	// standard daemon practise...
111	{	200	{
112	int oval = 1;	201	int oval = 1;
113	setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);	202	setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
114	}	203	}
115		204
116	udpv4_ev_watcher.start (udpv4_fd, POLLIN);	205	#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
117	}
118
119	ipv4_fd = -1;
120	if (THISNODE->protocols & PROT_IPv4)
121	{
122	ipv4_fd = socket (PF_INET, SOCK_RAW, ::conf.ip_proto);
123
124	if (ipv4_fd < 0)
125	return -1;
126
127	sockinfo si (THISNODE, PROT_IPv4);
128
129	if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
130	{
131	slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno));
132	exit (1);
133	}
134
135	#ifdef IP_MTU_DISCOVER
136	// this I really consider a linux bug. I am neither connected	206	// this I really consider a linux bug. I am neither connected
137	// nor do I fragment myself. Linux still sets DF and doesn't	207	// nor do I fragment myself. Linux still sets DF and doesn't
138	// fragment for me sometimes.	208	// fragment for me sometimes.
139	{	209	{
140	int oval = IP_PMTUDISC_DONT;	210	int oval = IP_PMTUDISC_DONT;
		211	setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
		212	}
		213	#endif
		214
		215	sockinfo si (THISNODE, PROT_UDPv4);
		216
		217	if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
		218	{
		219	slog (L_ERR, _("can't bind udpv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
		220	return -1;
		221	}
		222
		223	udpv4_ev_watcher.start (udpv4_fd, EV_READ);
		224	++success;
		225	}
		226	else
		227	THISNODE->protocols &= ~PROT_UDPv4;
		228
		229	icmpv4_tos = -1;
		230	icmpv4_fd = -1;
		231
		232	#if ENABLE_ICMP
		233	if (THISNODE->protocols & PROT_ICMPv4)
		234	{
		235	icmpv4_fd = setup_socket (PROT_ICMPv4, PF_INET, SOCK_RAW, IPPROTO_ICMP);
		236
		237	if (icmpv4_fd < 0)
		238	return -1;
		239
		240	#ifdef ICMP_FILTER
		241	{
		242	icmp_filter oval;
		243	oval.data = 0xffffffff;
		244	if (::conf.icmp_type < 32)
		245	oval.data &= ~(1 << ::conf.icmp_type);
		246
		247	setsockopt (icmpv4_fd, SOL_RAW, ICMP_FILTER, &oval, sizeof oval);
		248	}
		249	#endif
		250
		251	#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
		252	// this I really consider a linux bug. I am neither connected
		253	// nor do I fragment myself. Linux still sets DF and doesn't
		254	// fragment for me sometimes.
		255	{
		256	int oval = IP_PMTUDISC_DONT;
141	setsockopt (ipv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);	257	setsockopt (icmpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
		258	}
		259	#endif
		260
		261	sockinfo si (THISNODE, PROT_ICMPv4);
		262
		263	if (bind (icmpv4_fd, si.sav4 (), si.salenv4 ()))
		264	{
		265	slog (L_ERR, _("can't bind icmpv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
		266	return -1;
142	}	267	}
143	#endif
144		268
145	ipv4_ev_watcher.start (ipv4_fd, POLLIN);	269	icmpv4_ev_watcher.start (icmpv4_fd, EV_READ);
		270	++success;
146	}	271	}
		272	#endif
		273
		274	tcpv4_fd = -1;
147		275
148	#if ENABLE_TCP	276	#if ENABLE_TCP
149	if (THISNODE->protocols & PROT_TCPv4)	277	if (THISNODE->protocols & PROT_TCPv4 && THISNODE->tcp_port)
150	{	278	{
151	tcpv4_fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP);	279	tcpv4_fd = setup_socket (PROT_TCPv4, PF_INET, SOCK_STREAM, IPPROTO_TCP);
152		280
153	if (tcpv4_fd < 0)	281	if (tcpv4_fd < 0)
154	return -1;	282	return -1;
155		283
156	sockinfo si (THISNODE, PROT_TCPv4);
157
158	if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ()))
159	{
160	slog (L_ERR, _("can't bind tcpv4 on %s: %s"), (const char *)si, strerror (errno));
161	exit (1);
162	}
163
164	if (listen (tcpv4_fd, 5))
165	{
166	slog (L_ERR, _("can't listen tcpv4 on %s: %s"), (const char *)si, strerror (errno));
167	exit (1);
168	}
169
170	// standard daemon practise...	284	// standard daemon practise...
171	{	285	{
172	int oval = 1;	286	int oval = 1;
173	setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);	287	setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
174	}	288	}
175		289
		290	sockinfo si (THISNODE, PROT_TCPv4);
		291
		292	if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ()))
		293	{
		294	slog (L_ERR, _("can't bind tcpv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
		295	return -1;
		296	}
		297
		298	if (listen (tcpv4_fd, 5))
		299	{
		300	slog (L_ERR, _("can't listen tcpv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
		301	return -1;
		302	}
		303
176	tcpv4_accept_watcher.start (tcpv4_fd, POLLIN);	304	tcpv4_ev_watcher.start (tcpv4_fd, EV_READ);
		305	++success;
		306	}
		307	else
		308	THISNODE->protocols &= ~PROT_TCPv4;
		309	#endif
		310
		311	dnsv4_tos = -1;
		312	dnsv4_fd = -1;
		313
		314	#if ENABLE_DNS
		315	if (THISNODE->protocols & PROT_DNSv4)
		316	{
		317	dns_forwarder.set (::conf.dns_forw_host, ::conf.dns_forw_port, PROT_DNSv4);
		318
		319	dnsv4_fd = setup_socket (PROT_DNSv4, PF_INET, SOCK_DGRAM, IPPROTO_UDP);
		320
		321	if (dnsv4_fd < 0)
		322	return -1;
		323
		324	# if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
		325	// this I really consider a linux bug. I am neither connected
		326	// nor do I fragment myself. Linux still sets DF and doesn't
		327	// fragment for me sometimes.
		328	{
		329	int oval = IP_PMTUDISC_DONT;
		330	setsockopt (dnsv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
177	}	331	}
178	#endif	332	# endif
		333
		334	// standard daemon practise...
		335	{
		336	int oval = 1;
		337	setsockopt (dnsv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
		338	}
		339
		340	sockinfo si (THISNODE->dns_hostname,
		341	THISNODE->dns_hostname ? THISNODE->dns_port : 0,
		342	PROT_DNSv4);
		343
		344	if (bind (dnsv4_fd, si.sav4 (), si.salenv4 ()))
		345	{
		346	slog (L_ERR, _("can't bind dnsv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
		347	return -1;
		348	}
		349
		350	dnsv4_ev_watcher.start (dnsv4_fd, EV_READ);
		351	++success;
		352	}
		353	#endif
		354
		355	/////////////////////////////////////////////////////////////////////////////
		356
		357	if (!success)
		358	{
		359	slog (L_ERR, _("no protocols enabled."));
		360	return -1;
		361	}
		362
		363	reconnect_all ();
		364
		365	/////////////////////////////////////////////////////////////////////////////
179		366
180	tap = new tap_device ();	367	tap = new tap_device ();
181	if (!tap) //D this, of course, never catches	368	if (!tap) //D this, of course, never catches
182	{	369	{
183	slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname);	370	slog (L_ERR, _("cannot create network interface '%s'."), conf.ifname);
184	exit (1);	371	return -1;
185	}	372	}
186		373
187	run_script (run_script_cb (this, &vpn::script_if_up), true);	374	fcntl (tap->fd, F_SETFD, FD_CLOEXEC);
188		375
		376	run_script_cb cb;
		377	cb.set<vpn, &vpn::script_if_init> (this);
		378
		379	if (tap->if_up () &&
		380	!run_script (cb, true))
		381	{
		382	slog (L_ERR, _("interface initialization command '%s' failed."),
		383	tap->if_up ());
		384	return -1;
		385	}
		386
		387	cb.set<vpn, &vpn::script_if_up> (this);
		388	if (!run_script (cb, true))
		389	{
		390	slog (L_ERR, _("if-up command execution failed."));
		391	return -1;
		392	}
		393
189	tap_ev_watcher.start (tap->fd, POLLIN);	394	tap_ev_watcher.start (tap->fd, EV_READ);
190
191	reconnect_all ();
192		395
193	return 0;	396	return 0;
194	}	397	}
195		398
		399	bool
		400	vpn::drop_privileges ()
		401	{
		402	if (::conf.change_root)
		403	{
		404	if (!strcmp (::conf.change_root, "/"))
		405	{
		406	char dir [L_tmpnam];
		407	if (!tmpnam (dir))
		408	{
		409	slog (L_CRIT, _("unable to create anonymous root path."));
		410	return false;
		411	}
		412
		413	if (mkdir (dir, 0700))
		414	{
		415	slog (L_CRIT, _("unable to crate anonymous root directory."));
		416	return false;
		417	}
		418
		419	if (chdir (dir))
		420	{
		421	slog (L_CRIT, _("unable to change to anonymous root directory."));
		422	return false;
		423	}
		424
		425	if (rmdir (dir))
		426	slog (L_ERR, _("unable to remove anonymous root directory, continuing."));
		427	}
		428	else
		429	{
		430	if (chdir (::conf.change_root))
		431	{
		432	slog (L_CRIT, _("%s: unable to change to specified root directory."), ::conf.change_root);
		433	return false;
		434	}
		435	}
		436
		437	if (chroot ("."))
		438	{
		439	slog (L_CRIT, _("unable to set new root directory."));
		440	return false;
		441	}
		442
		443	if (chdir ("/"))
		444	{
		445	slog (L_CRIT, _("unable to set cwd to new root directory."));
		446	return false;
		447	}
		448	}
		449
		450	if (::conf.change_gid)
		451	if (setgid (::conf.change_gid))
		452	{
		453	slog (L_CRIT, _("unable to change group id to %d."), ::conf.change_gid);
		454	return false;
		455	}
		456
		457	if (::conf.change_uid)
		458	if (setuid (::conf.change_uid))
		459	{
		460	slog (L_CRIT, _("unable to change user id to %d."), ::conf.change_uid);
		461	return false;
		462	}
		463
		464	return true;
		465	}
		466
		467	bool
		468	vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
		469	{
		470	set_tos (ipv4_fd, ipv4_tos, tos);
		471	sendto (ipv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
		472
		473	return true;
		474	}
		475
		476	static u16
		477	ipv4_checksum (u16 *data, unsigned int len)
		478	{
		479	// use 32 bit accumulator and fold back carry bits at the end
		480	u32 sum = 0;
		481
		482	while (len > 1)
		483	{
		484	sum += *data++;
		485	len -= 2;
		486	}
		487
		488	// odd byte left?
		489	if (len)
		490	sum += (u8 )data;
		491
		492	// add back carry bits
		493	sum = (sum >> 16) + (sum & 0xffff); // lo += hi
		494	sum += (sum >> 16); // carry
		495
		496	return ~sum;
		497	}
		498
		499	#if ENABLE_ICMP
		500	bool
		501	vpn::send_icmpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
		502	{
		503	pkt->unshift_hdr (4);
		504
		505	icmp_header hdr = (icmp_header )&((*pkt)[0]);
		506	hdr->type = ::conf.icmp_type;
		507	hdr->code = 255;
		508	hdr->checksum = 0;
		509	hdr->checksum = ipv4_checksum ((u16 *)hdr, pkt->len);
		510
		511	set_tos (icmpv4_fd, icmpv4_tos, tos);
		512	sendto (icmpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
		513
		514	return true;
		515	}
		516	#endif
		517
		518	bool
		519	vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
		520	{
		521	set_tos (udpv4_fd, udpv4_tos, tos);
		522	sendto (udpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
		523
		524	return true;
		525	}
		526
196	void	527	void
197	vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)	528	vpn::inject_data_packet (tap_packet *pkt, int dst)
198	{	529	{
199	setsockopt (ipv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);	530	if (dst)
200	sendto (ipv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());	531	{
201	}	532	// unicast
202		533	if (dst != THISNODE->id)
203	void	534	conns[dst - 1]->inject_data_packet (pkt);
204	vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)	535	}
205	{	536	else
206	setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);	537	{
207	sendto (udpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());	538	// broadcast, this is ugly, but due to the security policy
		539	// we have to connect to all hosts...
		540	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
		541	if ((*c)->conf != THISNODE)
		542	(*c)->inject_data_packet (pkt);
		543	}
208	}	544	}
209		545
210	void	546	void
211	vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi)	547	vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi)
212	{	548	{
213	unsigned int src = pkt->src ();	549	unsigned int src = pkt->src ();
214	unsigned int dst = pkt->dst ();	550	unsigned int dst = pkt->dst ();
215		551
216	slog (L_NOISE, _("<<?/%s received possible vpn packet type %d from %d to %d, length %d"),	552	slog (L_NOISE, _("<<?/%s received possible vpn packet type %d from %d to %d, length %d."),
217	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst (), pkt->len);	553	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst (), pkt->len);
218		554
219	if (src == 0 \|\| src > conns.size ()	555	if (src == 0 \|\| src > conns.size ()
220	\|\| dst > conns.size ()	556	\|\| dst > conns.size ()
221	\|\| pkt->typ () >= vpn_packet::PT_MAX)	557	\|\| pkt->typ () >= vpn_packet::PT_MAX)
222	slog (L_WARN, _("(%s): received corrupted packet type %d (src %d, dst %d)"),	558	slog (L_WARN, _("(%s): received corrupted packet type %d (src %d, dst %d)."),
223	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());	559	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());
224	else	560	else
225	{	561	{
226	connection *c = conns[src - 1];	562	connection *c = conns[src - 1];
227		563
228	if (dst == 0 && !THISNODE->routerprio)	564	if (dst == 0)
229	slog (L_WARN, _("%s(%s): received broadcast, but we are no router"),	565	slog (L_WARN, _("%s(%s): received broadcast (protocol violation)."),
230	c->conf->nodename, (const char *)rsi);	566	c->conf->nodename, (const char *)rsi);
231	else if (dst != 0 && dst != THISNODE->id)	567	else if (dst != THISNODE->id)
232	// FORWARDING NEEDED ;)	568	{
		569	if (THISNODE->routerprio)
		570	// the tos setting gets lost here. who cares.
		571	conns[dst - 1]->inject_vpn_packet (pkt);
		572	else
233	slog (L_WARN,	573	slog (L_WARN,
234	_("received frame for node %d ('%s') from %s, but this is node %d ('%s')"),	574	_("%s(%s): request to forward packet to %s, but we are no router (config mismatch?)."),
		575	c->conf->nodename, (const char *)rsi,
235	dst, conns[dst - 1]->conf->nodename,	576	conns[dst - 1]->conf->nodename);
236	(const char *)rsi,	577	}
237	THISNODE->id, THISNODE->nodename);
238	else	578	else
239	c->recv_vpn_packet (pkt, rsi);	579	c->recv_vpn_packet (pkt, rsi);
240	}	580	}
241	}	581	}
242		582
243	void	583	bool
244	vpn::udpv4_ev (int fd, short revents)	584	vpn::send_vpn_packet (vpn_packet *pkt, const sockinfo &si, int tos)
245	{	585	{
246	if (revents & (POLLIN \| POLLERR))	586	switch (si.prot)
		587	{
		588	case PROT_IPv4:
		589	return send_ipv4_packet (pkt, si, tos);
		590
		591	case PROT_UDPv4:
		592	return send_udpv4_packet (pkt, si, tos);
		593
		594	#if ENABLE_TCP
		595	case PROT_TCPv4:
		596	return send_tcpv4_packet (pkt, si, tos);
		597	#endif
		598	#if ENABLE_ICMP
		599	case PROT_ICMPv4:
		600	return send_icmpv4_packet (pkt, si, tos);
		601	#endif
		602	#if ENABLE_DNS
		603	case PROT_DNSv4:
		604	return send_dnsv4_packet (pkt, si, tos);
		605	#endif
		606	default:
		607	slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol."), (const char *)si);
		608	}
		609
		610	return false;
		611	}
		612
		613	inline void
		614	vpn::ipv4_ev (ev::io &w, int revents)
		615	{
		616	if (revents & EV_READ)
247	{	617	{
248	vpn_packet *pkt = new vpn_packet;	618	vpn_packet *pkt = new vpn_packet;
249	struct sockaddr_in sa;	619	struct sockaddr_in sa;
250	socklen_t sa_len = sizeof (sa);	620	socklen_t sa_len = sizeof (sa);
251	int len;	621	int len;
252		622
253	len = recvfrom (fd, &((pkt)[0]), MAXSIZE, 0, (sockaddr )&sa, &sa_len);	623	len = recvfrom (w.fd, &((pkt)[0]), MAXSIZE, 0, (sockaddr )&sa, &sa_len);
254		624
255	sockinfo si(sa);	625	sockinfo si(sa, PROT_IPv4);
256		626
257	if (len > 0)	627	if (len > 0)
258	{	628	{
259	pkt->len = len;	629	pkt->len = len;
260		630
		631	// raw sockets deliver the ipv4 header, but don't expect it on sends
		632	pkt->skip_hdr (pkt->ipv4_hdr_len ());
		633
261	recv_vpn_packet (pkt, si);	634	recv_vpn_packet (pkt, si);
262	}	635	}
263	else	636	else
264	{	637	{
265	// probably ECONNRESET or somesuch	638	// probably ECONNRESET or somesuch
266	slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));	639	slog (L_DEBUG, _("%s: %s."), (const char *)si, strerror (errno));
267	}	640	}
268		641
269	delete pkt;	642	delete pkt;
270	}	643	}
271	else if (revents & POLLHUP)
272	{
273	// this cannot ;) happen on udp sockets
274	slog (L_ERR, _("FATAL: POLLHUP on udp v4 fd, terminating."));
275	exit (1);
276	}
277	else	644	else
278	{	645	{
279	slog (L_ERR,	646	slog (L_ERR,
280	_("FATAL: unknown revents %08x in socket, terminating\n"),	647	_("FATAL: unknown revents %08x in socket, exiting.\n"),
281	revents);	648	revents);
282	exit (1);	649	exit (EXIT_FAILURE);
283	}	650	}
284	}	651	}
285		652
286	void	653	#if ENABLE_ICMP
287	vpn::ipv4_ev (int fd, short revents)	654	inline void
		655	vpn::icmpv4_ev (ev::io &w, int revents)
288	{	656	{
289	if (revents & (POLLIN \| POLLERR))	657	if (revents & EV_READ)
290	{	658	{
291	vpn_packet *pkt = new vpn_packet;	659	vpn_packet *pkt = new vpn_packet;
292	struct sockaddr_in sa;	660	struct sockaddr_in sa;
293	socklen_t sa_len = sizeof (sa);	661	socklen_t sa_len = sizeof (sa);
294	int len;	662	int len;
295		663
296	len = recvfrom (fd, &((pkt)[0]), MAXSIZE, 0, (sockaddr )&sa, &sa_len);	664	len = recvfrom (w.fd, &((pkt)[0]), MAXSIZE, 0, (sockaddr )&sa, &sa_len);
297		665
298	sockinfo si(sa, PROT_IPv4);	666	sockinfo si(sa, PROT_ICMPv4);
299		667
300	if (len > 0)	668	if (len > 0)
301	{	669	{
302	pkt->len = len;	670	pkt->len = len;
303		671
		672	icmp_header hdr = (icmp_header )&((*pkt)[IP_OVERHEAD]);
		673
		674	if (hdr->type == ::conf.icmp_type
		675	&& hdr->code == 255)
		676	{
304	// raw sockets deliver the ipv4, but don't expect it on sends	677	// raw sockets deliver the ipv4, but don't expect it on sends
305	// this is slow, but...	678	// this is slow, but...
306	pkt->skip_hdr (IP_OVERHEAD);	679	pkt->skip_hdr (pkt->ipv4_hdr_len () + (ICMP_OVERHEAD - IP_OVERHEAD));
307		680
308	recv_vpn_packet (pkt, si);	681	recv_vpn_packet (pkt, si);
		682	}
309	}	683	}
310	else	684	else
311	{	685	{
312	// probably ECONNRESET or somesuch	686	// probably ECONNRESET or somesuch
313	slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));	687	slog (L_DEBUG, _("%s: %s."), (const char *)si, strerror (errno));
314	}	688	}
315		689
316	delete pkt;	690	delete pkt;
317	}	691	}
318	else if (revents & POLLHUP)
319	{
320	// this cannot ;) happen on udp sockets
321	slog (L_ERR, _("FATAL: POLLHUP on ipv4 fd, terminating."));
322	exit (1);
323	}
324	else	692	else
325	{	693	{
326	slog (L_ERR,	694	slog (L_ERR,
327	_("FATAL: unknown revents %08x in socket, terminating\n"),	695	_("FATAL: unknown revents %08x in socket, exiting.\n"),
328	revents);	696	revents);
329	exit (1);	697	exit (EXIT_FAILURE);
330	}
331	}
332
333	#if ENABLE_TCP
334
335	struct tcp_info {
336	int fd;
337	bool ok;
338	io_watcher r;
339
340	tcp_info (vpn *v)
341	: r(v, &vpn::tcpv4_ev)
342	{	698	}
343	fd = -1;	699	}
		700	#endif
		701
		702	inline void
		703	vpn::udpv4_ev (ev::io &w, int revents)
		704	{
		705	if (revents & EV_READ)
344	}	706	{
345		707	vpn_packet *pkt = new vpn_packet;
346	~tcp_info () { close (fd); }
347	};
348
349	typedef map<sockinfo, tcp_info *> tcp_si_map;
350	typedef map<int, tcp_info *> tcp_fd_map; // unneecssary if iom would be cooler
351	static tcp_si_map tcp_si;
352	static tcp_fd_map tcp_fd;
353
354	void
355	vpn::send_tcpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
356	{
357	tcp_si_map::iterator info = tcp_si.find (si);
358
359	if (info == tcp_si.end ())
360	{
361	// woaw, the first lost packet ;)
362	tcp_info *i = new tcp_info (this);
363
364	i->ok = false;
365	i->fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP);
366
367	if (i->fd >= 0)
368	{
369	fcntl (i->fd, F_SETFL, O_NONBLOCK);
370
371	if (connect (i->fd, si.sav4 (), si.salenv4 ()) >= 0
372	\|\| errno == EINPROGRESS)
373	{
374	tcp_si.insert (tcp_si_map::value_type (si, i));
375	tcp_fd.insert (tcp_fd_map::value_type (i->fd, i));
376	return;
377	}
378
379	delete i;
380	}
381	}
382	else
383	{
384	tcp_info *i = info->second;
385
386	if (i->ok)
387	{
388	setsockopt (i->fd, SOL_IP, IP_TOS, &tos, sizeof tos);
389
390	if (write (i->fd, (void *)pkt, pkt->len + sizeof (u32)) != pkt->len + sizeof (u32))
391	{
392	// error, close socket, forget it and retry immediately
393	tcp_si.erase (info);
394	tcp_fd.erase (i->fd);
395	delete i;
396
397	// tail recursion is... better than goto(?)
398	send_tcpv4_packet (pkt, si, tos);
399	}
400	}
401	}
402
403	#if 0
404	setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
405	sendto (udpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
406	#endif
407	}
408
409	void
410	vpn::tcpv4_accept (int fd, short revents)
411	{
412	if (revents & (POLLIN \| POLLERR))
413	{
414	struct sockaddr_in sa;	708	struct sockaddr_in sa;
415	socklen_t sa_len = sizeof (sa);	709	socklen_t sa_len = sizeof (sa);
416	int len;	710	int len;
417		711
418	fd = accept (fd, (sockaddr *)&sa, &sa_len);	712	len = recvfrom (w.fd, &((pkt)[0]), MAXSIZE, 0, (sockaddr )&sa, &sa_len);
419		713
420	if (fd >= 0)
421	{
422	fcntl (fd, F_SETFL, O_NONBLOCK);
423
424	sockinfo si(sa, PROT_TCPv4);	714	sockinfo si(sa, PROT_UDPv4);
425	tcp_info *i = new tcp_info (this);
426		715
427	i->fd = fd;	716	if (len > 0)
428	i->ok = true;
429	i->r.start (fd, POLLIN);
430
431	tcp_si.insert (tcp_si_map::value_type (si, i));
432	tcp_fd.insert (tcp_fd_map::value_type (fd, i));
433	}	717	{
434	}	718	pkt->len = len;
435	}
436		719
437	void	720	recv_vpn_packet (pkt, si);
438	vpn::tcpv4_ev (int fd, short revents)
439	{
440	if (revents & (POLLIN \| POLLERR))
441	{
442	tcp_fd_map::iterator info = tcp_fd.find (fd);
443
444	if (info != tcp_fd.end ())
445	{	721	}
446	tcp_info *i = info->second;	722	else
447
448	if (!i->ok) // not yet established
449	{
450	i->ok = true;
451	fcntl (i->fd, F_SETFL, 0);
452	}
453
454	u32 len;
455
456	if (sizeof (len) == read (fd, &len, sizeof (len)))
457	{
458	slog (L_ERR, "%d bytes received\n", len);
459	}
460
461	//tcp_si.erase (i);
462	tcp_fd.erase (fd);
463	delete i;
464	}	723	{
		724	// probably ECONNRESET or somesuch
		725	slog (L_DEBUG, _("%s: fd %d, %s."), (const char *)si, w.fd, strerror (errno));
		726	}
		727
		728	delete pkt;
		729	}
		730	else
465	}	731	{
		732	slog (L_ERR,
		733	_("FATAL: unknown revents %08x in socket, exiting.\n"),
		734	revents);
		735	exit (EXIT_FAILURE);
		736	}
466	}	737	}
467		738
468	#endif	739	inline void
469		740	vpn::tap_ev (ev::io &w, int revents)
470	void
471	vpn::tap_ev (int fd, short revents)
472	{	741	{
473	if (revents & POLLIN)	742	if (revents & EV_READ)
474	{	743	{
475	/* process data */	744	/* process data */
476	tap_packet *pkt;	745	tap_packet *pkt;
477		746
478	pkt = tap->recv ();	747	pkt = tap->recv ();
479		748
		749	if (!pkt)
		750	return;
		751
		752	if (pkt->len > 14)
		753	{
480	int dst = mac2id (pkt->dst);	754	int dst = mac2id (pkt->dst);
481	int src = mac2id (pkt->src);	755	int src = mac2id (pkt->src);
482		756
483	if (src != THISNODE->id)	757	if (src != THISNODE->id)
484	{
485	slog (L_ERR, _("FATAL: tap packet not originating on current node received, terminating."));
486	exit (1);
487	}
488
489	if (dst == THISNODE->id)
490	{
491	slog (L_ERR, _("FATAL: tap packet destined for current node received, terminating."));
492	exit (1);
493	}
494
495	if (dst > conns.size ())
496	slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
497	else
498	{
499	if (dst)
500	{	758	{
501	// unicast	759	slog (L_ERR, _("FATAL: tap packet not originating on current node received (if-up script not working properly?), exiting."));
502	if (dst != THISNODE->id)	760	exit (EXIT_FAILURE);
503	conns[dst - 1]->inject_data_packet (pkt);
504	}	761	}
		762
		763	if (dst == THISNODE->id)
		764	{
		765	slog (L_ERR, _("FATAL: tap packet destined for current node received, exiting."));
		766	exit (EXIT_FAILURE);
		767	}
		768
		769	if (dst > conns.size ())
		770	slog (L_ERR, _("tap packet for unknown node %d received, ignoring."), dst);
505	else	771	else
506	{
507	// broadcast, first check router, then self, then english
508	connection *router = find_router ();
509
510	if (router)
511	router->inject_data_packet (pkt, true);	772	inject_data_packet (pkt, dst);
512	else
513	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
514	if ((*c)->conf != THISNODE)
515	(*c)->inject_data_packet (pkt);
516	}
517	}	773	}
518		774
519	delete pkt;	775	delete pkt;
520	}
521	else if (revents & (POLLHUP \| POLLERR))
522	{
523	slog (L_ERR, _("FATAL: POLLHUP or POLLERR on network device fd, terminating."));
524	exit (1);
525	}	776	}
526	else	777	else
527	abort ();	778	abort ();
528	}	779	}
529		780
530	void	781	inline void
531	vpn::event_cb (tstamp &ts)	782	vpn::event_cb (ev::timer &w, int)
532	{	783	{
533	if (events)	784	if (events)
534	{	785	{
535	if (events & EVENT_SHUTDOWN)	786	if (events & EVENT_SHUTDOWN)
536	{	787	{
537	slog (L_INFO, _("preparing shutdown..."));	788	slog (L_INFO, _("preparing shutdown..."));
538		789
539	shutdown_all ();	790	shutdown_all ();
540
541	remove_pid (pidfilename);	791	remove_pid (conf.pidfilename);
542
543	slog (L_INFO, _("terminating"));	792	slog (L_INFO, _("exiting."));
544		793	exit (EXIT_SUCCESS);
545	exit (0);
546	}	794	}
547		795
548	if (events & EVENT_RECONNECT)	796	if (events & EVENT_RECONNECT)
549	{	797	{
550	slog (L_INFO, _("forced reconnect"));	798	slog (L_INFO, _("forced reconnect."));
551		799
552	reconnect_all ();	800	reconnect_all ();
553	}	801	}
554		802
555	events = 0;	803	events = 0;
556	}	804	}
557
558	ts = TSTAMP_CANCEL;
559	}	805	}
560		806
561	void	807	void
562	vpn::shutdown_all ()	808	vpn::shutdown_all ()
563	{	809	{
573		819
574	conns.clear ();	820	conns.clear ();
575		821
576	connection_init ();	822	connection_init ();
577		823
578	for (configuration::node_vector::iterator i = conf.nodes.begin ();	824	for (configuration::node_vector::iterator i = conf.nodes.begin (); i != conf.nodes.end (); ++i)
579	i != conf.nodes.end (); ++i)	825	conns.push_back (new connection (this, *i));
580	{
581	connection *conn = new connection (this);
582		826
583	conn->conf = *i;	827	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
584	conns.push_back (conn);
585
586	conn->establish_connection ();	828	(*c)->establish_connection ();
587	}
588	}	829	}
589		830
590	connection *vpn::find_router ()	831	bool
		832	vpn::can_direct (conf_node src, conf_node dst) const
591	{	833	{
592	u32 prio = 0;	834	return src != dst
		835	&& src->may_direct (dst)
		836	&& dst->may_direct (src)
		837	&& (((src->protocols & dst->protocols) && src->connectmode == conf_node::C_ALWAYS)
		838	\|\| (src->protocols & dst->connectable_protocols ()));
		839	}
		840
		841	// only works for indirect and routed connections: find a router
		842	// from THISNODE to dst
		843	connection *
		844	vpn::find_router_for (const connection *dst)
		845	{
593	connection *router = 0;	846	connection *router = 0;
594		847
		848	// first try to find a router with a direct connection, route there
		849	// regardless of any other considerations.
		850	{
		851	u32 prio = 1;
		852
		853	for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
		854	{
		855	connection c = i;
		856
		857	if (c->conf->routerprio > prio
		858	&& c->conf != THISNODE
		859	&& can_direct (c->conf, dst->conf)
		860	&& c->ictx && c->octx)
		861	{
		862	prio = c->conf->routerprio;
		863	router = c;
		864	}
		865	}
		866	}
		867
		868	if (router)
		869	return router;
		870
		871	// second try find the router with the highest priority, higher than ours
		872	{
		873	u32 prio = THISNODE->routerprio ? THISNODE->routerprio : 1;
		874
		875	for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
		876	{
		877	connection c = i;
		878
		879	if (c->conf->routerprio > prio
		880	&& c != dst
		881	&& c->conf != THISNODE
		882	&& c->ictx && c->octx)
		883	{
		884	prio = c->conf->routerprio;
		885	router = c;
		886	}
		887	}
		888	}
		889
		890	return router;
		891	}
		892
		893	void
		894	vpn::connection_established (connection *c)
		895	{
595	for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)	896	for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
596	{	897	{
597	connection c = i;	898	connection o = i;
598		899
599	if (c->conf->routerprio > prio	900	if (!o->is_direct
600	&& c->connectmode == conf_node::C_ALWAYS	901	&& o->si.valid ()
601	&& c->conf != THISNODE	902	&& c->si != o->si
602	&& c->ictx && c->octx)	903	&& c == find_router_for (o))
603	{
604	prio = c->conf->routerprio;
605	router = c;
606	}	904	{
		905	slog (L_DEBUG, _("%s: can now route packets via %s, re-keying connection."),
		906	o->conf->nodename, c->conf->nodename);
		907	o->rekey ();
		908	}
607	}	909	}
608
609	return router;
610	}	910	}
611		911
612	void vpn::connect_request (int id)	912	void
		913	vpn::send_connect_request (connection *c)
613	{	914	{
614	connection *c = find_router ();	915	connection *r = find_router_for (c);
615		916
616	if (c)	917	if (r)
		918	{
		919	slog (L_TRACE, _("%s: no address known, sending mediated connection request via %s."),
		920	c->conf->nodename, r->conf->nodename);
617	c->connect_request (id);	921	r->send_connect_request (c->conf->id);
618	//else // does not work, because all others must connect to the same router	922	}
619	// // no router found, aggressively connect to all routers	923	else
620	// for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)	924	slog (L_DEBUG, _("%s: no way to connect and no router found: unable to connect at this time."),
621	// if ((*i)->conf->routerprio)	925	c->conf->nodename);
622	// (*i)->establish_connection ();
623	}	926	}
624		927
625	void	928	void
626	connection::dump_status ()	929	connection::dump_status ()
627	{	930	{
628	slog (L_NOTICE, _("node %s (id %d)"), conf->nodename, conf->id);	931	slog (L_NOTICE, _("node %s (id %d)"), conf->nodename, conf->id);
629	slog (L_NOTICE, _(" connectmode %d (%d) / sockaddr %s / minor %d"),	932	slog (L_NOTICE, _(" connectmode %d (%d) / sockaddr %s / minor %d"),
630	connectmode, conf->connectmode, (const char *)si, (int)prot_minor);	933	connectmode, conf->connectmode, (const char *)si, (int)prot_minor);
631	slog (L_NOTICE, _(" ictx/octx %08lx/%08lx / oseqno %d / retry_cnt %d"),	934	slog (L_NOTICE, _(" ictx/octx %08lx/%08lx / oseqno %d / retry_cnt %d"),
632	(long)ictx, (long)octx, (int)oseqno, (int)retry_cnt);	935	(long)ictx, (long)octx, (int)oseqno, (int)retry_cnt);
633	slog (L_NOTICE, _(" establish_conn %ld / rekey %ld / keepalive %ld"),
634	(long)(establish_connection.at), (long)(rekey.at), (long)(keepalive.at));
635	}	936	}
636		937
637	void	938	void
638	vpn::dump_status ()	939	vpn::dump_status ()
639	{	940	{
640	slog (L_NOTICE, _("BEGIN status dump (%ld)"), (long)NOW);	941	slog (L_NOTICE, _("BEGIN status dump (%ld)"), (long)ev_now ());
641		942
642	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)	943	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
643	(*c)->dump_status ();	944	(*c)->dump_status ();
644		945
645	slog (L_NOTICE, _("END status dump"));	946	slog (L_NOTICE, _("END status dump"));
646	}	947	}
647		948
648	vpn::vpn (void)	949	vpn::vpn (void)
649	: event(this, &vpn::event_cb)	950	{
		951	event .set<vpn, &vpn::event_cb > (this);
650	, udpv4_ev_watcher(this, &vpn::udpv4_ev)	952	udpv4_ev_watcher .set<vpn, &vpn::udpv4_ev > (this);
651	, ipv4_ev_watcher (this, &vpn::ipv4_ev)	953	ipv4_ev_watcher .set<vpn, &vpn::ipv4_ev > (this);
652	, tap_ev_watcher (this, &vpn::tap_ev)
653	#if ENABLE_TCP	954	#if ENABLE_TCP
654	, tcpv4_accept_watcher(this, &vpn::tcpv4_accept)	955	tcpv4_ev_watcher .set<vpn, &vpn::tcpv4_ev > (this);
655	#endif	956	#endif
656	{	957	#if ENABLE_ICMP
		958	icmpv4_ev_watcher.set<vpn, &vpn::icmpv4_ev> (this);
		959	#endif
		960	#if ENABLE_DNS
		961	dnsv4_ev_watcher .set<vpn, &vpn::dnsv4_ev > (this);
		962	#endif
		963	tap_ev_watcher .set<vpn, &vpn::tap_ev > (this);
657	}	964	}
658		965
659	vpn::~vpn ()	966	vpn::~vpn ()
660	{	967	{
661	}	968	}

Diff Legend

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

Comparing gvpe/src/vpn.C (file contents): Revision 1.2 by pcg, Wed Apr 2 05:15:00 2003 UTC vs. Revision 1.64 by root, Tue Dec 4 10:29:43 2012 UTC

Diff Legend

Comparing gvpe/src/vpn.C (file contents):
Revision 1.2 by pcg, Wed Apr 2 05:15:00 2003 UTC vs.
Revision 1.64 by root, Tue Dec 4 10:29:43 2012 UTC