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

Comparing gvpe/src/vpn.C (file contents):
Revision 1.33 by pcg, Wed Mar 23 21:55:39 2005 UTC vs.
Revision 1.65 by root, Tue Jul 16 16:44:37 2013 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-2005 Marc Lehmann <gvpe@schmorp.de>	3	Copyright (C) 2003-2008,2010,2011,2013 Marc Lehmann <gvpe@schmorp.de>
4		4
5	This file is part of GVPE.	5	This file is part of GVPE.
6		6
7	GVPE is free software; you can redistribute it and/or modify	7	GVPE is free software; you can redistribute it and/or modify it
8	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
9	the Free Software Foundation; either version 2 of the License, or	9	Free Software Foundation; either version 3 of the License, or (at your
10	(at your option) any later version.	10	option) any later version.
11		11
12	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
13	but WITHOUT ANY WARRANTY; without even the implied warranty of	13	WITHOUT ANY WARRANTY; without even the implied warranty of
14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
15	GNU General Public License for more details.	15	Public License for more details.
16		16
17	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
18	along with gvpe; if not, write to the Free Software	18	with this program; if not, see <http://www.gnu.org/licenses/>.
19	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.
20	*/	30	*/
21		31
22	#include "config.h"	32	#include "config.h"
23		33
24	#include <list>	34	#include <list>
28	#include <cstdlib>	38	#include <cstdlib>
29		39
30	#include <sys/types.h>	40	#include <sys/types.h>
31	#include <sys/socket.h>	41	#include <sys/socket.h>
32	#include <sys/wait.h>	42	#include <sys/wait.h>
		43	#include <sys/stat.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>
36	#include <fcntl.h>	47	#include <fcntl.h>
37	#include <sys/socket.h>	48	#include <sys/socket.h>
…		…
42		53
43	#include "connection.h"	54	#include "connection.h"
44	#include "util.h"	55	#include "util.h"
45	#include "vpn.h"	56	#include "vpn.h"
46		57
		58	using namespace std;
		59
47	vpn network; // THE vpn (bad design...)	60	vpn network; // THE vpn (bad design...)
48		61
49	/////////////////////////////////////////////////////////////////////////////	62	/////////////////////////////////////////////////////////////////////////////
		63
		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	}
50		75
51	void	76	void
52	vpn::script_init_env ()	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 % 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); putenv (env);	87	asprintf (&env, "CONFBASE=%s", confbase); putenv (env);
63	asprintf (&env, "NODENAME=%s", THISNODE->nodename); putenv (env);
64	asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
65	asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env);	88	asprintf (&env, "IFNAME=%s", tap->interface ()); putenv (env);
66	asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);	89	asprintf (&env, "IFTYPE=%s", IFTYPE); putenv (env);
67	asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);	90	asprintf (&env, "IFSUBTYPE=%s", IFSUBTYPE); putenv (env);
68	asprintf (&env, "MTU=%d", mtu); putenv (env);	91	asprintf (&env, "MTU=%d", mtu); putenv (env);
69	asprintf (&env, "MAC=%02x:%02x:%02x:%02x:%02x:%02x",	92	asprintf (&env, "NODES=%d", conns.size ()); putenv (env);
70	0xfe, 0xfd, 0x80, 0x00, THISNODE->id >> 8,	93	asprintf (&env, "NODEID=%d", THISNODE->id); putenv (env);
71	THISNODE->id & 0xff); putenv (env);
72		94
73	// TODO: info for other nodes, maybe?	95	conns [THISNODE->id - 1]->script_init_env ("");
74	}
75		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 *
76	const char *vpn::script_if_init ()	106	vpn::script_if_init ()
77	{	107	{
78	script_init_env ();	108	script_init_env ();
79		109
80	return tap->if_up ();	110	return tap->if_up ();
81	}	111	}
82		112
		113	inline const char *
83	const char *vpn::script_if_up ()	114	vpn::script_if_up ()
84	{	115	{
85	script_init_env ();	116	script_init_env ();
86		117
87	char *filename;	118	char *filename;
88	asprintf (&filename,	119	asprintf (&filename,
…		…
92		123
93	return filename;	124	return filename;
94	}	125	}
95		126
96	int	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;
		148	}
		149
		150	int
97	vpn::setup ()	151	vpn::setup ()
98	{	152	{
		153	int success = 0;
		154
		155	ipv4_tos = -1;
99	ipv4_fd = -1;	156	ipv4_fd = -1;
100		157
101	if (THISNODE->protocols & PROT_IPv4 && ::conf.ip_proto)	158	if (THISNODE->protocols & PROT_IPv4 && ::conf.ip_proto)
102	{	159	{
103	ipv4_fd = socket (PF_INET, SOCK_RAW, ::conf.ip_proto);	160	ipv4_fd = setup_socket (PROT_IPv4, PF_INET, SOCK_RAW, ::conf.ip_proto);
104		161
105	if (ipv4_fd < 0)	162	if (ipv4_fd < 0)
106	return -1;	163	return -1;
107
108	fcntl (ipv4_fd, F_SETFL, O_NONBLOCK);
109		164
110	#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)	165	#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
111	// this I really consider a linux bug. I am neither connected	166	// this I really consider a linux bug. I am neither connected
112	// 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
113	// fragment for me sometimes.	168	// fragment for me sometimes.
…		…
119		174
120	sockinfo si (THISNODE, PROT_IPv4);	175	sockinfo si (THISNODE, PROT_IPv4);
121		176
122	if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))	177	if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
123	{	178	{
124	slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno));	179	slog (L_ERR, _("can't bind ipv4 socket on %s: %s, exiting."), (const char *)si, strerror (errno));
125	exit (EXIT_FAILURE);	180	return -1;
126	}	181	}
127		182
128	ipv4_ev_watcher.start (ipv4_fd, EVENT_READ);	183	ipv4_ev_watcher.start (ipv4_fd, EV_READ);
		184	++success;
129	}	185	}
		186	else
		187	THISNODE->protocols &= ~PROT_IPv4;
130		188
		189	udpv4_tos = -1;
131	udpv4_fd = -1;	190	udpv4_fd = -1;
132		191
133	if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port)	192	if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port)
134	{	193	{
135	udpv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);	194	udpv4_fd = setup_socket (PROT_UDPv4, PF_INET, SOCK_DGRAM, IPPROTO_UDP);
136		195
137	if (udpv4_fd < 0)	196	if (udpv4_fd < 0)
138	return -1;	197	return -1;
139
140	fcntl (udpv4_fd, F_SETFL, O_NONBLOCK);
141		198
142	// standard daemon practise...	199	// standard daemon practise...
143	{	200	{
144	int oval = 1;	201	int oval = 1;
145	setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);	202	setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
…		…
157		214
158	sockinfo si (THISNODE, PROT_UDPv4);	215	sockinfo si (THISNODE, PROT_UDPv4);
159		216
160	if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))	217	if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
161	{	218	{
162	slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno));	219	slog (L_ERR, _("can't bind udpv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
163	exit (EXIT_FAILURE);	220	return -1;
164	}	221	}
165		222
166	udpv4_ev_watcher.start (udpv4_fd, EVENT_READ);	223	udpv4_ev_watcher.start (udpv4_fd, EV_READ);
		224	++success;
167	}	225	}
		226	else
		227	THISNODE->protocols &= ~PROT_UDPv4;
168		228
		229	icmpv4_tos = -1;
169	icmpv4_fd = -1;	230	icmpv4_fd = -1;
170		231
171	#if ENABLE_ICMP	232	#if ENABLE_ICMP
172	if (THISNODE->protocols & PROT_ICMPv4)	233	if (THISNODE->protocols & PROT_ICMPv4)
173	{	234	{
174	icmpv4_fd = socket (PF_INET, SOCK_RAW, IPPROTO_ICMP);	235	icmpv4_fd = setup_socket (PROT_ICMPv4, PF_INET, SOCK_RAW, IPPROTO_ICMP);
175		236
176	if (icmpv4_fd < 0)	237	if (icmpv4_fd < 0)
177	return -1;	238	return -1;
178
179	fcntl (icmpv4_fd, F_SETFL, O_NONBLOCK);
180		239
181	#ifdef ICMP_FILTER	240	#ifdef ICMP_FILTER
182	{	241	{
183	icmp_filter oval;	242	icmp_filter oval;
184	oval.data = 0xffffffff;	243	oval.data = 0xffffffff;
…		…
193	// this I really consider a linux bug. I am neither connected	252	// this I really consider a linux bug. I am neither connected
194	// nor do I fragment myself. Linux still sets DF and doesn't	253	// nor do I fragment myself. Linux still sets DF and doesn't
195	// fragment for me sometimes.	254	// fragment for me sometimes.
196	{	255	{
197	int oval = IP_PMTUDISC_DONT;	256	int oval = IP_PMTUDISC_DONT;
198	setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);	257	setsockopt (icmpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
199	}	258	}
200	#endif	259	#endif
201		260
202	sockinfo si (THISNODE, PROT_ICMPv4);	261	sockinfo si (THISNODE, PROT_ICMPv4);
203		262
204	if (bind (icmpv4_fd, si.sav4 (), si.salenv4 ()))	263	if (bind (icmpv4_fd, si.sav4 (), si.salenv4 ()))
205	{	264	{
206	slog (L_ERR, _("can't bind icmpv4 on %s: %s"), (const char *)si, strerror (errno));	265	slog (L_ERR, _("can't bind icmpv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
207	exit (EXIT_FAILURE);	266	return -1;
208	}	267	}
209		268
210	icmpv4_ev_watcher.start (icmpv4_fd, EVENT_READ);	269	icmpv4_ev_watcher.start (icmpv4_fd, EV_READ);
		270	++success;
211	}	271	}
212	#endif	272	#endif
213		273
214	tcpv4_fd = -1;	274	tcpv4_fd = -1;
215		275
216	#if ENABLE_TCP	276	#if ENABLE_TCP
217	if (THISNODE->protocols & PROT_TCPv4 && THISNODE->tcp_port)	277	if (THISNODE->protocols & PROT_TCPv4 && THISNODE->tcp_port)
218	{	278	{
219	tcpv4_fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP);	279	tcpv4_fd = setup_socket (PROT_TCPv4, PF_INET, SOCK_STREAM, IPPROTO_TCP);
220		280
221	if (tcpv4_fd < 0)	281	if (tcpv4_fd < 0)
222	return -1;	282	return -1;
223		283
224	fcntl (tcpv4_fd, F_SETFL, O_NONBLOCK);
225
226	// standard daemon practise...	284	// standard daemon practise...
227	{	285	{
228	int oval = 1;	286	int oval = 1;
229	setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);	287	setsockopt (tcpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
230	}	288	}
231		289
232	sockinfo si (THISNODE, PROT_TCPv4);	290	sockinfo si (THISNODE, PROT_TCPv4);
233		291
234	if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ()))	292	if (bind (tcpv4_fd, si.sav4 (), si.salenv4 ()))
235	{	293	{
236	slog (L_ERR, _("can't bind tcpv4 on %s: %s"), (const char *)si, strerror (errno));	294	slog (L_ERR, _("can't bind tcpv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
237	exit (EXIT_FAILURE);	295	return -1;
238	}	296	}
239		297
240	if (listen (tcpv4_fd, 5))	298	if (listen (tcpv4_fd, 5))
241	{	299	{
242	slog (L_ERR, _("can't listen tcpv4 on %s: %s"), (const char *)si, strerror (errno));	300	slog (L_ERR, _("can't listen tcpv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
243	exit (EXIT_FAILURE);	301	return -1;
244	}	302	}
245		303
246	tcpv4_ev_watcher.start (tcpv4_fd, EVENT_READ);	304	tcpv4_ev_watcher.start (tcpv4_fd, EV_READ);
		305	++success;
247	}	306	}
		307	else
		308	THISNODE->protocols &= ~PROT_TCPv4;
248	#endif	309	#endif
		310
		311	dnsv4_tos = -1;
		312	dnsv4_fd = -1;
249		313
250	#if ENABLE_DNS	314	#if ENABLE_DNS
251	if (THISNODE->protocols & PROT_DNSv4)	315	if (THISNODE->protocols & PROT_DNSv4)
252	{	316	{
253	dns_forwarder.set (::conf.dns_forw_host, ::conf.dns_forw_port, PROT_DNSv4);	317	dns_forwarder.set (::conf.dns_forw_host, ::conf.dns_forw_port, PROT_DNSv4);
254		318
255	dnsv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);	319	dnsv4_fd = setup_socket (PROT_DNSv4, PF_INET, SOCK_DGRAM, IPPROTO_UDP);
256		320
257	if (dnsv4_fd < 0)	321	if (dnsv4_fd < 0)
258	return -1;	322	return -1;
259		323
260	#if defined(SOL_IP) && defined(IP_MTU_DISCOVER)	324	# if defined(SOL_IP) && defined(IP_MTU_DISCOVER)
261	// this I really consider a linux bug. I am neither connected	325	// this I really consider a linux bug. I am neither connected
262	// nor do I fragment myself. Linux still sets DF and doesn't	326	// nor do I fragment myself. Linux still sets DF and doesn't
263	// fragment for me sometimes.	327	// fragment for me sometimes.
264	{	328	{
265	int oval = IP_PMTUDISC_DONT;	329	int oval = IP_PMTUDISC_DONT;
266	setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);	330	setsockopt (dnsv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
267	}	331	}
268	#endif	332	# endif
269		333
270	// standard daemon practise...	334	// standard daemon practise...
271	{	335	{
272	int oval = 1;	336	int oval = 1;
273	setsockopt (dnsv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);	337	setsockopt (dnsv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
…		…
277	THISNODE->dns_hostname ? THISNODE->dns_port : 0,	341	THISNODE->dns_hostname ? THISNODE->dns_port : 0,
278	PROT_DNSv4);	342	PROT_DNSv4);
279		343
280	if (bind (dnsv4_fd, si.sav4 (), si.salenv4 ()))	344	if (bind (dnsv4_fd, si.sav4 (), si.salenv4 ()))
281	{	345	{
282	slog (L_ERR, _("can't bind dnsv4 on %s: %s"), (const char *)si, strerror (errno));	346	slog (L_ERR, _("can't bind dnsv4 on %s: %s, exiting."), (const char *)si, strerror (errno));
283	exit (EXIT_FAILURE);	347	return -1;
284	}	348	}
285		349
286	dnsv4_ev_watcher.start (dnsv4_fd, EVENT_READ);	350	dnsv4_ev_watcher.start (dnsv4_fd, EV_READ);
		351	++success;
		352	}
		353	#endif
		354
		355	/////////////////////////////////////////////////////////////////////////////
		356
		357	if (!success)
287	}	358	{
288	#endif	359	slog (L_ERR, _("no protocols enabled."));
		360	return -1;
		361	}
		362
		363	reconnect_all ();
		364
		365	/////////////////////////////////////////////////////////////////////////////
289		366
290	tap = new tap_device ();	367	tap = new tap_device ();
291	if (!tap) //D this, of course, never catches	368	if (!tap) //D this, of course, never catches
292	{	369	{
293	slog (L_ERR, _("cannot create network interface '%s'"), conf.ifname);	370	slog (L_ERR, _("cannot create network interface '%s'."), conf.ifname);
294	exit (EXIT_FAILURE);	371	return -1;
295	}	372	}
296		373
		374	fcntl (tap->fd, F_SETFD, FD_CLOEXEC);
		375
		376	run_script_cb cb;
		377	cb.set<vpn, &vpn::script_if_init> (this);
		378
297	if (tap->if_up () &&	379	if (tap->if_up () &&
298	!run_script (run_script_cb (this, &vpn::script_if_init), true))	380	!run_script (cb, true))
299	{	381	{
300	slog (L_ERR, _("interface initialization command '%s' failed, exiting."),	382	slog (L_ERR, _("interface initialization command '%s' failed."),
301	tap->if_up ());	383	tap->if_up ());
302	exit (EXIT_FAILURE);	384	return -1;
303	}
304
305	if (!run_script (run_script_cb (this, &vpn::script_if_up), true))
306	{	385	}
		386
		387	cb.set<vpn, &vpn::script_if_up> (this);
		388	if (!run_script (cb, true))
		389	{
307	slog (L_ERR, _("if-up command execution failed, exiting."));	390	slog (L_ERR, _("if-up command execution failed."));
308	exit (EXIT_FAILURE);	391	return -1;
309	}	392	}
310		393
311	tap_ev_watcher.start (tap->fd, EVENT_READ);	394	tap_ev_watcher.start (tap->fd, EV_READ);
312
313	reconnect_all ();
314		395
315	return 0;	396	return 0;
		397	}
		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;
316	}	465	}
317		466
318	bool	467	bool
319	vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)	468	vpn::send_ipv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
320	{	469	{
321	#if defined(SOL_IP) && defined(IP_TOS)	470	set_tos (ipv4_fd, ipv4_tos, tos);
322	setsockopt (ipv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
323	#endif
324	sendto (ipv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());	471	sendto (ipv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
325		472
326	return true;	473	return true;
327	}	474	}
328		475
…		…
351		498
352	#if ENABLE_ICMP	499	#if ENABLE_ICMP
353	bool	500	bool
354	vpn::send_icmpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)	501	vpn::send_icmpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
355	{	502	{
356	#if defined(SOL_IP) && defined(IP_TOS)
357	setsockopt (icmpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
358	#endif
359
360	pkt->unshift_hdr (4);	503	pkt->unshift_hdr (4);
361		504
362	icmp_header hdr = (icmp_header )&((*pkt)[0]);	505	icmp_header hdr = (icmp_header )&((*pkt)[0]);
363	hdr->type = ::conf.icmp_type;	506	hdr->type = ::conf.icmp_type;
364	hdr->code = 255;	507	hdr->code = 255;
365	hdr->checksum = 0;	508	hdr->checksum = 0;
366	hdr->checksum = ipv4_checksum ((u16 *)hdr, pkt->len);	509	hdr->checksum = ipv4_checksum ((u16 *)hdr, pkt->len);
367		510
		511	set_tos (icmpv4_fd, icmpv4_tos, tos);
368	sendto (icmpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());	512	sendto (icmpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
369		513
370	return true;	514	return true;
371	}	515	}
372	#endif	516	#endif
373		517
374	bool	518	bool
375	vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)	519	vpn::send_udpv4_packet (vpn_packet *pkt, const sockinfo &si, int tos)
376	{	520	{
377	#if defined(SOL_IP) && defined(IP_TOS)	521	set_tos (udpv4_fd, udpv4_tos, tos);
378	setsockopt (udpv4_fd, SOL_IP, IP_TOS, &tos, sizeof tos);
379	#endif
380	sendto (udpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());	522	sendto (udpv4_fd, &((*pkt)[0]), pkt->len, 0, si.sav4 (), si.salenv4 ());
381		523
382	return true;	524	return true;
383	}	525	}
384		526
…		…
395	{	537	{
396	// broadcast, this is ugly, but due to the security policy	538	// broadcast, this is ugly, but due to the security policy
397	// we have to connect to all hosts...	539	// we have to connect to all hosts...
398	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)	540	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
399	if ((*c)->conf != THISNODE)	541	if ((*c)->conf != THISNODE)
400	(*c)->inject_data_packet (pkt, true);	542	(*c)->inject_data_packet (pkt);
401	}	543	}
402	}	544	}
403		545
404	void	546	void
405	vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi)	547	vpn::recv_vpn_packet (vpn_packet *pkt, const sockinfo &rsi)
406	{	548	{
407	unsigned int src = pkt->src ();	549	unsigned int src = pkt->src ();
408	unsigned int dst = pkt->dst ();	550	unsigned int dst = pkt->dst ();
409		551
410	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."),
411	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst (), pkt->len);	553	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst (), pkt->len);
412		554
413	if (src == 0 \|\| src > conns.size ()	555	if (src == 0 \|\| src > conns.size ()
414	\|\| dst > conns.size ()	556	\|\| dst > conns.size ()
415	\|\| pkt->typ () >= vpn_packet::PT_MAX)	557	\|\| pkt->typ () >= vpn_packet::PT_MAX)
416	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)."),
417	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());
418	else if (dst > conns.size ())
419	slog (L_WARN, _("(%s): received corrupted packet type %d (src %d, dst %d)"),
420	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());	559	(const char *)rsi, pkt->typ (), pkt->src (), pkt->dst ());
421	else	560	else
422	{	561	{
423	connection *c = conns[src - 1];	562	connection *c = conns[src - 1];
424		563
425	if (dst == 0)	564	if (dst == 0)
426	slog (L_WARN, _("%s(%s): received broadcast (protocol violation)"),	565	slog (L_WARN, _("%s(%s): received broadcast (protocol violation)."),
427	c->conf->nodename, (const char *)rsi);	566	c->conf->nodename, (const char *)rsi);
428	else if (dst != THISNODE->id)	567	else if (dst != THISNODE->id)
429	{	568	{
430	if (THISNODE->routerprio)	569	if (THISNODE->routerprio)
431	// the tos setting gets lost here. who cares.	570	// the tos setting gets lost here. who cares.
432	conns[dst - 1]->inject_vpn_packet (pkt);	571	conns[dst - 1]->inject_vpn_packet (pkt);
433	else	572	else
434	slog (L_WARN,	573	slog (L_WARN,
435	_("%s(%s): forwarding request (=> %s), but we are no router"),	574	_("%s(%s): request to forward packet to %s, but we are no router (config mismatch?)."),
436	c->conf->nodename, (const char *)rsi,	575	c->conf->nodename, (const char *)rsi,
437	conns[dst - 1]->conf->nodename);	576	conns[dst - 1]->conf->nodename);
438	}	577	}
439	else	578	else
440	c->recv_vpn_packet (pkt, rsi);	579	c->recv_vpn_packet (pkt, rsi);
…		…
445	vpn::send_vpn_packet (vpn_packet *pkt, const sockinfo &si, int tos)	584	vpn::send_vpn_packet (vpn_packet *pkt, const sockinfo &si, int tos)
446	{	585	{
447	switch (si.prot)	586	switch (si.prot)
448	{	587	{
449	case PROT_IPv4:	588	case PROT_IPv4:
450	return send_ipv4_packet (pkt, si, tos);	589	return send_ipv4_packet (pkt, si, tos);
		590
451	case PROT_UDPv4:	591	case PROT_UDPv4:
452	return send_udpv4_packet (pkt, si, tos);	592	return send_udpv4_packet (pkt, si, tos);
		593
453	#if ENABLE_TCP	594	#if ENABLE_TCP
454	case PROT_TCPv4:	595	case PROT_TCPv4:
455	return send_tcpv4_packet (pkt, si, tos);	596	return send_tcpv4_packet (pkt, si, tos);
456	#endif	597	#endif
457	#if ENABLE_ICMP	598	#if ENABLE_ICMP
458	case PROT_ICMPv4:	599	case PROT_ICMPv4:
459	return send_icmpv4_packet (pkt, si, tos);	600	return send_icmpv4_packet (pkt, si, tos);
460	#endif	601	#endif
461	#if ENABLE_DNS	602	#if ENABLE_DNS
462	case PROT_DNSv4:	603	case PROT_DNSv4:
463	return send_dnsv4_packet (pkt, si, tos);	604	return send_dnsv4_packet (pkt, si, tos);
464	#endif	605	#endif
465
466	default:	606	default:
467	slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol"), (const char *)si);	607	slog (L_CRIT, _("%s: FATAL: trying to send packet with unsupported protocol."), (const char *)si);
468	}	608	}
469		609
470	return false;	610	return false;
471	}	611	}
472		612
473	void	613	inline void
474	vpn::ipv4_ev (io_watcher &w, short revents)	614	vpn::ipv4_ev (ev::io &w, int revents)
475	{	615	{
476	if (revents & EVENT_READ)	616	if (revents & EV_READ)
477	{	617	{
478	vpn_packet *pkt = new vpn_packet;	618	vpn_packet *pkt = new vpn_packet;
479	struct sockaddr_in sa;	619	struct sockaddr_in sa;
480	socklen_t sa_len = sizeof (sa);	620	socklen_t sa_len = sizeof (sa);
481	int len;	621	int len;
…		…
487	if (len > 0)	627	if (len > 0)
488	{	628	{
489	pkt->len = len;	629	pkt->len = len;
490		630
491	// raw sockets deliver the ipv4 header, but don't expect it on sends	631	// raw sockets deliver the ipv4 header, but don't expect it on sends
492	pkt->skip_hdr (IP_OVERHEAD);	632	pkt->skip_hdr (pkt->ipv4_hdr_len ());
493		633
494	recv_vpn_packet (pkt, si);	634	recv_vpn_packet (pkt, si);
495	}	635	}
496	else	636	else
497	{	637	{
498	// probably ECONNRESET or somesuch	638	// probably ECONNRESET or somesuch
499	slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));	639	slog (L_DEBUG, _("%s: %s."), (const char *)si, strerror (errno));
500	}	640	}
501		641
502	delete pkt;	642	delete pkt;
503	}	643	}
504	else	644	else
505	{	645	{
506	slog (L_ERR,	646	slog (L_ERR,
507	_("FATAL: unknown revents %08x in socket, terminating\n"),	647	_("FATAL: unknown revents %08x in socket, exiting.\n"),
508	revents);	648	revents);
509	exit (EXIT_FAILURE);	649	exit (EXIT_FAILURE);
510	}	650	}
511	}	651	}
512		652
513	#if ENABLE_ICMP	653	#if ENABLE_ICMP
514	void	654	inline void
515	vpn::icmpv4_ev (io_watcher &w, short revents)	655	vpn::icmpv4_ev (ev::io &w, int revents)
516	{	656	{
517	if (revents & EVENT_READ)	657	if (revents & EV_READ)
518	{	658	{
519	vpn_packet *pkt = new vpn_packet;	659	vpn_packet *pkt = new vpn_packet;
520	struct sockaddr_in sa;	660	struct sockaddr_in sa;
521	socklen_t sa_len = sizeof (sa);	661	socklen_t sa_len = sizeof (sa);
522	int len;	662	int len;
…		…
534	if (hdr->type == ::conf.icmp_type	674	if (hdr->type == ::conf.icmp_type
535	&& hdr->code == 255)	675	&& hdr->code == 255)
536	{	676	{
537	// 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
538	// this is slow, but...	678	// this is slow, but...
539	pkt->skip_hdr (ICMP_OVERHEAD);	679	pkt->skip_hdr (pkt->ipv4_hdr_len () + (ICMP_OVERHEAD - IP_OVERHEAD));
540		680
541	recv_vpn_packet (pkt, si);	681	recv_vpn_packet (pkt, si);
542	}	682	}
543	}	683	}
544	else	684	else
545	{	685	{
546	// probably ECONNRESET or somesuch	686	// probably ECONNRESET or somesuch
547	slog (L_DEBUG, _("%s: %s"), (const char *)si, strerror (errno));	687	slog (L_DEBUG, _("%s: %s."), (const char *)si, strerror (errno));
548	}	688	}
549		689
550	delete pkt;	690	delete pkt;
551	}	691	}
552	else	692	else
553	{	693	{
554	slog (L_ERR,	694	slog (L_ERR,
555	_("FATAL: unknown revents %08x in socket, terminating\n"),	695	_("FATAL: unknown revents %08x in socket, exiting.\n"),
556	revents);	696	revents);
557	exit (EXIT_FAILURE);	697	exit (EXIT_FAILURE);
558	}	698	}
559	}	699	}
560	#endif	700	#endif
561		701
562	void	702	inline void
563	vpn::udpv4_ev (io_watcher &w, short revents)	703	vpn::udpv4_ev (ev::io &w, int revents)
564	{	704	{
565	if (revents & EVENT_READ)	705	if (revents & EV_READ)
566	{	706	{
567	vpn_packet *pkt = new vpn_packet;	707	vpn_packet *pkt = new vpn_packet;
568	struct sockaddr_in sa;	708	struct sockaddr_in sa;
569	socklen_t sa_len = sizeof (sa);	709	socklen_t sa_len = sizeof (sa);
570	int len;	710	int len;
…		…
580	recv_vpn_packet (pkt, si);	720	recv_vpn_packet (pkt, si);
581	}	721	}
582	else	722	else
583	{	723	{
584	// probably ECONNRESET or somesuch	724	// probably ECONNRESET or somesuch
585	slog (L_DEBUG, _("%s: fd %d, %s"), (const char *)si, w.fd, strerror (errno));	725	slog (L_DEBUG, _("%s: fd %d, %s."), (const char *)si, w.fd, strerror (errno));
586	}	726	}
587		727
588	delete pkt;	728	delete pkt;
589	}	729	}
590	else	730	else
591	{	731	{
592	slog (L_ERR,	732	slog (L_ERR,
593	_("FATAL: unknown revents %08x in socket, terminating\n"),	733	_("FATAL: unknown revents %08x in socket, exiting.\n"),
594	revents);	734	revents);
595	exit (EXIT_FAILURE);	735	exit (EXIT_FAILURE);
596	}	736	}
597	}	737	}
598		738
599	void	739	inline void
600	vpn::tap_ev (io_watcher &w, short revents)	740	vpn::tap_ev (ev::io &w, int revents)
601	{	741	{
602	if (revents & EVENT_READ)	742	if (revents & EV_READ)
603	{	743	{
604	/* process data */	744	/* process data */
605	tap_packet *pkt;	745	tap_packet *pkt;
606		746
607	pkt = tap->recv ();	747	pkt = tap->recv ();
…		…
636	}	776	}
637	else	777	else
638	abort ();	778	abort ();
639	}	779	}
640		780
641	void	781	inline void
642	vpn::event_cb (time_watcher &w)	782	vpn::event_cb (ev::timer &w, int)
643	{	783	{
644	if (events)	784	if (events)
645	{	785	{
646	if (events & EVENT_SHUTDOWN)	786	if (events & EVENT_SHUTDOWN)
647	{	787	{
648	slog (L_INFO, _("preparing shutdown..."));	788	slog (L_INFO, _("preparing shutdown..."));
649		789
650	shutdown_all ();	790	shutdown_all ();
651	remove_pid (conf.pidfilename);	791	remove_pid (conf.pidfilename);
652	slog (L_INFO, _("terminating"));	792	slog (L_INFO, _("exiting."));
653	exit (EXIT_SUCCESS);	793	exit (EXIT_SUCCESS);
654	}	794	}
655		795
656	if (events & EVENT_RECONNECT)	796	if (events & EVENT_RECONNECT)
657	{	797	{
658	slog (L_INFO, _("forced reconnect"));	798	slog (L_INFO, _("forced reconnect."));
659		799
660	reconnect_all ();	800	reconnect_all ();
661	}	801	}
662		802
663	events = 0;	803	events = 0;
…		…
679		819
680	conns.clear ();	820	conns.clear ();
681		821
682	connection_init ();	822	connection_init ();
683		823
684	for (configuration::node_vector::iterator i = conf.nodes.begin ();	824	for (configuration::node_vector::iterator i = conf.nodes.begin (); i != conf.nodes.end (); ++i)
685	i != conf.nodes.end (); ++i)	825	conns.push_back (new connection (this, *i));
686	{	826
687	connection conn = new connection (this, i);	827	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
688	conns.push_back (conn);
689	conn->establish_connection ();	828	(*c)->establish_connection ();
690	}
691	}	829	}
692		830
693	connection *vpn::find_router ()	831	bool
		832	vpn::can_direct (conf_node src, conf_node dst) const
694	{	833	{
695	u32 prio = 1;	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	{
696	connection *router = 0;	846	connection *router = 0;
697		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	{
698	for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)	896	for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)
699	{	897	{
700	connection c = i;	898	connection o = i;
701		899
702	if (c->conf->routerprio > prio	900	if (!o->is_direct
703	&& c->connectmode == conf_node::C_ALWAYS // so we don't drop the connection if in use	901	&& o->si.valid ()
704	&& c->ictx && c->octx	902	&& c->si != o->si
705	&& c->conf != THISNODE) // redundant, since ictx==octx==0 always on thisnode	903	&& c == find_router_for (o))
706	{
707	prio = c->conf->routerprio;
708	router = c;
709	}	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	}
710	}	909	}
711
712	return router;
713	}	910	}
714		911
		912	void
715	void vpn::send_connect_request (int id)	913	vpn::send_connect_request (connection *c)
716	{	914	{
717	connection *c = find_router ();	915	connection *r = find_router_for (c);
718		916
719	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);
720	c->send_connect_request (id);	921	r->send_connect_request (c->conf->id);
		922	}
721	else	923	else
722	// no router found, aggressively connect to all routers	924	slog (L_DEBUG, _("%s: no way to connect and no router found: unable to connect at this time."),
723	for (conns_vector::iterator i = conns.begin (); i != conns.end (); ++i)	925	c->conf->nodename);
724	if ((i)->conf->routerprio && (i)->conf != THISNODE)
725	(*i)->establish_connection ();
726	}	926	}
727		927
728	void	928	void
729	connection::dump_status ()	929	connection::dump_status ()
730	{	930	{
731	slog (L_NOTICE, _("node %s (id %d)"), conf->nodename, conf->id);	931	slog (L_NOTICE, _("node %s (id %d)"), conf->nodename, conf->id);
732	slog (L_NOTICE, _(" connectmode %d (%d) / sockaddr %s / minor %d"),	932	slog (L_NOTICE, _(" connectmode %d (%d) / sockaddr %s / minor %d"),
733	connectmode, conf->connectmode, (const char *)si, (int)prot_minor);	933	connectmode, conf->connectmode, (const char *)si, (int)prot_minor);
734	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"),
735	(long)ictx, (long)octx, (int)oseqno, (int)retry_cnt);	935	(long)ictx, (long)octx, (int)oseqno, (int)retry_cnt);
736	slog (L_NOTICE, _(" establish_conn %ld / rekey %ld / keepalive %ld"),
737	(long)(establish_connection.at), (long)(rekey.at), (long)(keepalive.at));
738	}	936	}
739		937
740	void	938	void
741	vpn::dump_status ()	939	vpn::dump_status ()
742	{	940	{
743	slog (L_NOTICE, _("BEGIN status dump (%ld)"), (long)NOW);	941	slog (L_NOTICE, _("BEGIN status dump (%ld)"), (long)ev_now ());
744		942
745	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)	943	for (conns_vector::iterator c = conns.begin (); c != conns.end (); ++c)
746	(*c)->dump_status ();	944	(*c)->dump_status ();
747		945
748	slog (L_NOTICE, _("END status dump"));	946	slog (L_NOTICE, _("END status dump"));
749	}	947	}
750		948
751	vpn::vpn (void)	949	vpn::vpn (void)
		950	{
752	: event (this, &vpn::event_cb)	951	event .set<vpn, &vpn::event_cb > (this);
753	, udpv4_ev_watcher (this, &vpn::udpv4_ev)	952	udpv4_ev_watcher .set<vpn, &vpn::udpv4_ev > (this);
754	, ipv4_ev_watcher (this, &vpn::ipv4_ev)	953	ipv4_ev_watcher .set<vpn, &vpn::ipv4_ev > (this);
755	#if ENABLE_TCP	954	#if ENABLE_TCP
756	, tcpv4_ev_watcher (this, &vpn::tcpv4_ev)	955	tcpv4_ev_watcher .set<vpn, &vpn::tcpv4_ev > (this);
757	#endif	956	#endif
758	#if ENABLE_ICMP	957	#if ENABLE_ICMP
759	, icmpv4_ev_watcher(this, &vpn::icmpv4_ev)	958	icmpv4_ev_watcher.set<vpn, &vpn::icmpv4_ev> (this);
760	#endif	959	#endif
761	#if ENABLE_DNS	960	#if ENABLE_DNS
762	, dnsv4_ev_watcher (this, &vpn::dnsv4_ev)	961	dnsv4_ev_watcher .set<vpn, &vpn::dnsv4_ev > (this);
763	#endif	962	#endif
764	, tap_ev_watcher (this, &vpn::tap_ev)	963	tap_ev_watcher .set<vpn, &vpn::tap_ev > (this);
765	{
766	}	964	}
767		965
768	vpn::~vpn ()	966	vpn::~vpn ()
769	{	967	{
770	}	968	}

Diff Legend

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

Comparing gvpe/src/vpn.C (file contents): Revision 1.33 by pcg, Wed Mar 23 21:55:39 2005 UTC vs. Revision 1.65 by root, Tue Jul 16 16:44:37 2013 UTC

Diff Legend

Comparing gvpe/src/vpn.C (file contents):
Revision 1.33 by pcg, Wed Mar 23 21:55:39 2005 UTC vs.
Revision 1.65 by root, Tue Jul 16 16:44:37 2013 UTC