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

Comparing gvpe/src/conf.C (file contents):
Revision 1.9 by pcg, Wed Apr 2 05:14:59 2003 UTC vs.
Revision 1.43 by pcg, Thu Aug 7 16:34:21 2008 UTC

…		…
1	/*	1	/*
2	conf.c -- configuration code	2	conf.c -- configuration code
3	Copyright (C) 1998 Robert van der Meulen	3	Copyright (C) 2003-2005 Marc Lehmann <gvpe@schmorp.de>
4	1998-2002 Ivo Timmermans <ivo@o2w.nl>
5	2000-2002 Guus Sliepen <guus@sliepen.eu.org>
6	2000 Cris van Pelt <tribbel@arise.dhs.org>
7	2003 Marc Lehmann <pcg@goof.com>
8		4
		5	This file is part of GVPE.
		6
9	This program is free software; you can redistribute it and/or modify	7	GVPE is free software; you can redistribute it and/or modify
10	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
11	the Free Software Foundation; either version 2 of the License, or	9	the Free Software Foundation; either version 2 of the License, or
12	(at your option) any later version.	10	(at your option) any later version.
13		11
14	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,
15	but WITHOUT ANY WARRANTY; without even the implied warranty of	13	but WITHOUT ANY WARRANTY; without even the implied warranty of
16	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17	GNU General Public License for more details.	15	GNU General Public License for more details.
18		16
19	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
20	along with this program; if not, write to the Free Software	18	along with gvpe; if not, write to the Free Software
21	Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA	19	Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22	*/	20	*/
23		21
24	#include "config.h"	22	#include "config.h"
25		23
26	#include <cstdio>	24	#include <cstdio>
31	#include <netdb.h>	29	#include <netdb.h>
32	#include <sys/stat.h>	30	#include <sys/stat.h>
33	#include <sys/types.h>	31	#include <sys/types.h>
34	#include <unistd.h>	32	#include <unistd.h>
35		33
36	#include <netinet/in.h>	34	#include "netcompat.h"
37		35
38	#include <openssl/err.h>	36	#include <openssl/err.h>
39	#include <openssl/pem.h>	37	#include <openssl/pem.h>
40	#include <openssl/rsa.h>	38	#include <openssl/rsa.h>
41	#include <openssl/rand.h>	39	#include <openssl/rand.h>
42		40	#include <openssl/bn.h>
43	#include "gettext.h"
44		41
45	#include "conf.h"	42	#include "conf.h"
46	#include "slog.h"	43	#include "slog.h"
47	#include "util.h"	44	#include "util.h"
48		45
49	char *confbase;	46	char *confbase;
50	char *thisnode;	47	char *thisnode;
51	char *identname;	48	char *identname;
52	char *pidfilename;
53		49
54	struct configuration conf;	50	struct configuration conf;
55		51
56	u8 best_protocol (u8 protset)	52	u8 best_protocol (u8 protset)
57	{	53	{
58	if (protset & PROT_IPv4 ) return PROT_IPv4;	54	if (protset & PROT_IPv4 ) return PROT_IPv4;
		55	if (protset & PROT_ICMPv4) return PROT_ICMPv4;
59	if (protset & PROT_UDPv4) return PROT_UDPv4;	56	if (protset & PROT_UDPv4 ) return PROT_UDPv4;
60	if (protset & PROT_TCPv4) return PROT_TCPv4;	57	if (protset & PROT_TCPv4 ) return PROT_TCPv4;
		58	if (protset & PROT_DNSv4 ) return PROT_DNSv4;
61		59
62	return 0;	60	return 0;
63	}	61	}
64		62
65	const char *strprotocol (u8 protocol)	63	const char *strprotocol (u8 protocol)
66	{	64	{
67	if (protocol & PROT_IPv4 ) return "rawip";	65	if (protocol & PROT_IPv4 ) return "rawip";
		66	if (protocol & PROT_ICMPv4) return "icmp";
68	if (protocol & PROT_UDPv4) return "udp";	67	if (protocol & PROT_UDPv4 ) return "udp";
		68	if (protocol & PROT_TCPv4 ) return "tcp";
		69	if (protocol & PROT_DNSv4 ) return "dns";
69		70
70	return "<unknown>";	71	return "<unknown>";
71	}	72	}
72		73
73	configuration::configuration ()	74	static bool
		75	match_list (const vector<const char > &list, const char str)
74	{	76	{
75	init ();	77	for (vector<const char *>::const_iterator i = list.end (); i-- > list.begin (); )
76	}	78	if ((i)[0] == '' && !(*i)[1])
		79	return true;
		80	else if (!strcmp (*i, str))
		81	return true;
77		82
78	configuration::~configuration ()
79	{
80	cleanup ();
81	}
82
83	void configuration::init ()
84	{
85	memset (this, 0, sizeof (*this));
86
87	rekey = DEFAULT_REKEY;
88	keepalive = DEFAULT_KEEPALIVE;
89	llevel = L_INFO;
90	ip_proto = IPPROTO_GRE;
91
92	default_node.udp_port = DEFAULT_UDPPORT;
93	default_node.tcp_port = DEFAULT_UDPPORT;
94	default_node.connectmode = conf_node::C_ALWAYS;
95	default_node.compress = true;
96	default_node.protocols = PROT_UDPv4;
97	}
98
99	void configuration::cleanup()
100	{
101	if (rsa_key)
102	RSA_free (rsa_key);
103
104	free (ifname);
105
106	rsa_key = 0;
107	ifname = 0;
108	}
109
110	void
111	configuration::clear_config ()
112	{
113	for (configuration::node_vector::iterator i = nodes.begin(); i != nodes.end(); ++i)
114	delete *i;
115
116	nodes.clear ();
117
118	cleanup ();
119	init ();
120	}
121
122	#define parse_bool(target,name,trueval,falseval) \
123	if (!strcmp (val, "yes")) target = trueval; \
124	else if (!strcmp (val, "no")) target = falseval; \
125	else if (!strcmp (val, "true")) target = trueval; \
126	else if (!strcmp (val, "false")) target = falseval; \
127	else if (!strcmp (val, "on")) target = trueval; \
128	else if (!strcmp (val, "off")) target = falseval; \
129	else \
130	slog (L_WARN, \
131	_("illegal value for '%s', only 'yes\|true\|on' or 'no\|false\|off' allowed, at '%s' line %d"), \
132	name, var, fname, lineno);
133
134	void configuration::read_config (bool need_keys)
135	{
136	char *fname;
137	FILE *f;
138
139	clear_config ();
140
141	asprintf (&fname, "%s/vped.conf", confbase);
142	f = fopen (fname, "r");
143
144	if (f)
145	{
146	char line[16384];
147	int lineno = 0;
148	char var, val;
149	conf_node *node = &default_node;
150
151	while (fgets (line, sizeof (line), f))
152	{
153	lineno++;
154
155	{
156	char *end = line + strlen (line);
157
158	while (*end < ' ' && end >= line)
159	end--;
160
161	*++end = 0;
162	}
163
164	char *tok = line;
165
166	retry:
167	var = strtok (tok, "\t =");
168	tok = 0;
169
170	if (!var \|\| !var[0])
171	continue; /* no tokens on this line */
172
173	if (var[0] == '#')
174	continue; /* comment: ignore */
175
176	val = strtok (NULL, "\t\n\r =");
177
178	if (!val \|\| val[0] == '#')
179	{
180	slog (L_WARN,
181	_("no value for variable `%s', at '%s' line %d"),
182	var, fname, lineno);
183	break;
184	}
185
186	if (!strcmp (var, "on"))
187	{
188	if (!::thisnode
189	\|\| (val[0] == '!' && strcmp (val + 1, ::thisnode))
190	\|\| !strcmp (val, ::thisnode))
191	goto retry;
192
193	continue;
194	}
195
196	// truly global
197	if (!strcmp (var, "loglevel"))
198	{
199	loglevel l = string_to_loglevel (val);
200
201	if (l != L_NONE)
202	llevel = l;
203	else
204	slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
205	}
206	else if (!strcmp (var, "ip-proto"))
207	ip_proto = atoi (val);
208
209	// per config
210	else if (!strcmp (var, "node"))
211	{
212	default_node.id++;
213
214	node = new conf_node (default_node);
215
216	nodes.push_back (node);
217
218	node->nodename = strdup (val);
219
220	{
221	char *fname;
222	FILE *f;
223
224	asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename);
225
226	f = fopen (fname, "r");
227	if (f)
228	{
229	node->rsa_key = RSA_new ();
230
231	if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
232	{
233	ERR_load_RSA_strings (); ERR_load_PEM_strings ();
234	slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
235	exit (1);
236	}
237
238	RSA_blinding_on (node->rsa_key, 0);
239
240	fclose (f);
241	}
242	else
243	{
244	slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
245
246	if (need_keys)
247	exit (1);
248	}
249
250	free (fname);
251	}
252
253	if (!::thisnode \|\| !strcmp (node->nodename, ::thisnode))
254	thisnode = node;
255	}
256	else if (!strcmp (var, "private-key"))
257	prikeyfile = strdup (val);
258	else if (!strcmp (var, "ifpersist"))
259	{
260	parse_bool (ifpersist, "ifpersist", true, false);
261	}
262	else if (!strcmp (var, "ifname"))
263	ifname = strdup (val);
264	else if (!strcmp (var, "rekey"))
265	rekey = atoi (val);
266	else if (!strcmp (var, "keepalive"))
267	keepalive = atoi (val);
268	else if (!strcmp (var, "mtu"))
269	mtu = atoi (val);
270	else if (!strcmp (var, "if-up"))
271	script_if_up = strdup (val);
272	else if (!strcmp (var, "node-up"))
273	script_node_up = strdup (val);
274	else if (!strcmp (var, "node-down"))
275	script_node_down = strdup (val);
276
277	/* node-specific, non-defaultable */
278	else if (node != &default_node && !strcmp (var, "hostname"))
279	{
280	free (node->hostname);
281	node->hostname = strdup (val);
282	}
283
284	/* node-specific, defaultable */
285	else if (!strcmp (var, "udp-port"))
286	node->udp_port = atoi (val);
287	else if (!strcmp (var, "tcp-port"))
288	node->tcp_port = atoi (val);
289	else if (!strcmp (var, "router-priority"))
290	node->routerprio = atoi (val);
291	else if (!strcmp (var, "connect"))
292	{
293	if (!strcmp (val, "ondemand"))
294	node->connectmode = conf_node::C_ONDEMAND;
295	else if (!strcmp (val, "never"))
296	node->connectmode = conf_node::C_NEVER;
297	else if (!strcmp (val, "always"))
298	node->connectmode = conf_node::C_ALWAYS;
299	else if (!strcmp (val, "disabled"))
300	node->connectmode = conf_node::C_DISABLED;
301	else
302	slog (L_WARN,
303	_("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
304	var, fname, lineno);
305	}
306	else if (!strcmp (var, "inherit-tos"))
307	{
308	parse_bool (node->inherit_tos, "inherit-tos", true, false);
309	}
310	else if (!strcmp (var, "compress"))
311	{
312	parse_bool (node->compress, "compress", true, false);
313	}
314	// all these bool options really really cost a lot of executable size!
315	else if (!strcmp (var, "enable-tcp"))
316	{
317	u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) \| v;
318	}
319	else if (!strcmp (var, "enable-udp"))
320	{
321	u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) \| v;
322	}
323	else if (!strcmp (var, "enable-rawip"))
324	{
325	u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) \| v;
326	}
327
328	// unknown or misplaced
329	else
330	{
331	slog (L_WARN,
332	_("unknown or misplaced variable `%s', at '%s' line %d"),
333	var, fname, lineno);
334	}
335	}
336
337	fclose (f);
338	}
339	else
340	{
341	slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
342	exit (1);
343	}
344
345	free (fname);
346
347	fname = config_filename (prikeyfile, "hostkey");
348
349	f = fopen (fname, "r");
350	if (f)
351	{
352	rsa_key = RSA_new ();
353
354	if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
355	{
356	ERR_load_RSA_strings (); ERR_load_PEM_strings ();
357	slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
358	exit (1);
359	}
360
361	RSA_blinding_on (rsa_key, 0);
362
363	fclose (f);
364	}
365	else
366	{
367	slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
368
369	if (need_keys)
370	exit (1);
371	}
372
373	free (fname);
374	}
375
376	char configuration::config_filename (const char name, const char *dflt)
377	{
378	char *fname;
379
380	asprintf (&fname, name ? name : dflt, ::thisnode);
381
382	if (!ABSOLUTE_PATH (fname))
383	{
384	char *rname = fname;
385	asprintf (&fname, "%s/%s", confbase, rname);
386	free (rname);
387	}
388
389	return fname;	83	return false;
390	}	84	}
391		85
392	void	86	bool
393	configuration::print ()	87	conf_node::can_direct (struct conf_node *other)
394	{	88	{
395	printf (_("\nConfiguration\n\n"));	89	if (match_list (allow_direct, other->nodename))
396	printf (_("# of nodes: %d\n"), nodes.size ());	90	return true;
397	printf (_("this node: %s\n"), thisnode ? thisnode->nodename : "<unset>");
398	printf (_("MTU: %d\n"), mtu);
399	printf (_("rekeying interval: %d\n"), rekey);
400	printf (_("keepalive interval: %d\n"), keepalive);
401	printf (_("interface: %s\n"), ifname);
402	printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
403	printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) : -1);
404	printf ("\n");
405		91
406	printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",	92	if (match_list (deny_direct, other->nodename))
407	_("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));	93	return false;
408		94
409	for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i)	95	return true;
410	(*i)->print ();
411
412	printf ("\n");
413	}	96	}
414		97
415	void	98	void
416	conf_node::print ()	99	conf_node::print ()
417	{	100	{
…		…
427	hostname ? ":" : "",	110	hostname ? ":" : "",
428	hostname ? udp_port : 0	111	hostname ? udp_port : 0
429	);	112	);
430	}	113	}
431		114
		115	conf_node::~conf_node ()
		116	{
		117	#if 0
		118	// does not work, because string pointers etc. are shared
		119	// is not called, however
		120	if (rsa_key)
		121	RSA_free (rsa_key);
		122
		123	free (nodename);
		124	free (hostname);
		125	free (if_up_data);
		126	#if ENABLE_DNS
		127	free (domain);
		128	free (dns_hostname);
		129	#endif
		130	#endif
		131	}
		132
		133	void configuration::init ()
		134	{
		135	memset (this, 0, sizeof (*this));
		136
		137	mtu = DEFAULT_MTU;
		138	rekey = DEFAULT_REKEY;
		139	keepalive = DEFAULT_KEEPALIVE;
		140	llevel = L_INFO;
		141	ip_proto = IPPROTO_GRE;
		142	#if ENABLE_ICMP
		143	icmp_type = ICMP_ECHOREPLY;
		144	#endif
		145
		146	default_node.udp_port = DEFAULT_UDPPORT;
		147	default_node.tcp_port = DEFAULT_UDPPORT; // ehrm
		148	default_node.connectmode = conf_node::C_ALWAYS;
		149	default_node.compress = true;
		150	default_node.protocols = 0;
		151	default_node.max_retry = DEFAULT_MAX_RETRY;
		152	default_node.max_ttl = DEFAULT_MAX_TTL;
		153	default_node.max_queue = DEFAULT_MAX_QUEUE;
		154	default_node.if_up_data = strdup ("");
		155
		156	#if ENABLE_DNS
		157	default_node.dns_port = 0; // default is 0 == client
		158
		159	dns_forw_host = strdup ("127.0.0.1");
		160	dns_forw_port = 53;
		161	dns_timeout_factor = DEFAULT_DNS_TIMEOUT_FACTOR;
		162	dns_send_interval = DEFAULT_DNS_SEND_INTERVAL;
		163	dns_overlap_factor = DEFAULT_DNS_OVERLAP_FACTOR;
		164	dns_max_outstanding = DEFAULT_DNS_MAX_OUTSTANDING;
		165	#endif
		166
		167	conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid");
		168	}
		169
		170	void configuration::cleanup()
		171	{
		172	if (rsa_key)
		173	RSA_free (rsa_key);
		174
		175	rsa_key = 0;
		176
		177	free (pidfilename); pidfilename = 0;
		178	free (ifname); ifname = 0;
		179	#if ENABLE_HTTP_PROXY
		180	free (proxy_host); proxy_host = 0;
		181	free (proxy_auth); proxy_auth = 0;
		182	#endif
		183	#if ENABLE_DNS
		184	free (dns_forw_host); dns_forw_host = 0;
		185	#endif
		186	}
		187
		188	void
		189	configuration::clear ()
		190	{
		191	for (configuration::node_vector::iterator i = nodes.begin(); i != nodes.end(); ++i)
		192	delete *i;
		193
		194	nodes.clear ();
		195
		196	cleanup ();
		197	init ();
		198	}
		199
		200	#define parse_bool(target,name,trueval,falseval) do { \
		201	if (!strcmp (val, "yes")) target = trueval; \
		202	else if (!strcmp (val, "no")) target = falseval; \
		203	else if (!strcmp (val, "true")) target = trueval; \
		204	else if (!strcmp (val, "false")) target = falseval; \
		205	else if (!strcmp (val, "on")) target = trueval; \
		206	else if (!strcmp (val, "off")) target = falseval; \
		207	else \
		208	return _("illegal boolean value, only 'yes\|true\|on' or 'no\|false\|off' allowed. (ignored)"); \
		209	} while (0)
		210
		211	const char *
		212	configuration_parser::parse_line (char *line)
		213	{
		214	{
		215	char *end = line + strlen (line);
		216
		217	while (*end < ' ' && end >= line)
		218	end--;
		219
		220	*++end = 0;
		221	}
		222
		223	char *tok = line;
		224	const char *var = strtok (tok, "\t =");
		225	tok = 0;
		226
		227	if (!var \|\| !var[0])
		228	return 0; /* no tokens on this line */
		229
		230	if (var[0] == '#')
		231	return 0; /* comment: ignore */
		232
		233	char *val = strtok (NULL, "\t\n\r =");
		234
		235	if (!val \|\| val[0] == '#')
		236	return _("no value given for variable. (ignored)");
		237
		238	if (!strcmp (var, "on"))
		239	{
		240	if (!::thisnode
		241	\|\| (val[0] == '!' && strcmp (val + 1, ::thisnode))
		242	\|\| !strcmp (val, ::thisnode))
		243	return parse_line (strtok (NULL, "\n\r"));
		244	else
		245	return 0;
		246	}
		247
		248	// truly global
		249	if (!strcmp (var, "loglevel"))
		250	{
		251	loglevel l = string_to_loglevel (val);
		252
		253	if (l == L_NONE)
		254	return _("unknown loglevel. (skipping)");
		255	}
		256	else if (!strcmp (var, "ip-proto"))
		257	conf.ip_proto = atoi (val);
		258	else if (!strcmp (var, "icmp-type"))
		259	{
		260	#if ENABLE_ICMP
		261	conf.icmp_type = atoi (val);
		262	#endif
		263	}
		264
		265	// per config
		266	else if (!strcmp (var, "node"))
		267	{
		268	parse_argv ();
		269
		270	conf.default_node.id++;
		271	node = new conf_node (conf.default_node);
		272	conf.nodes.push_back (node);
		273	node->nodename = strdup (val);
		274
		275	{
		276	char *fname;
		277	FILE *f;
		278
		279	asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename);
		280
		281	f = fopen (fname, "r");
		282	if (f)
		283	{
		284	node->rsa_key = RSA_new ();
		285
		286	if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
		287	{
		288	ERR_load_RSA_strings (); ERR_load_PEM_strings ();
		289	slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
		290	exit (EXIT_FAILURE);
		291	}
		292
		293	require (RSA_blinding_on (node->rsa_key, 0));
		294
		295	fclose (f);
		296	}
		297	else
		298	{
		299	slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
		300
		301	if (need_keys)
		302	exit (EXIT_FAILURE);
		303	}
		304
		305	free (fname);
		306	}
		307
		308	if (::thisnode && !strcmp (node->nodename, ::thisnode))
		309	conf.thisnode = node;
		310	}
		311	else if (!strcmp (var, "private-key"))
		312	free (conf.prikeyfile), conf.prikeyfile = strdup (val);
		313	else if (!strcmp (var, "ifpersist"))
		314	parse_bool (conf.ifpersist, "ifpersist", true, false);
		315	else if (!strcmp (var, "ifname"))
		316	free (conf.ifname), conf.ifname = strdup (val);
		317	else if (!strcmp (var, "rekey"))
		318	conf.rekey = atoi (val);
		319	else if (!strcmp (var, "keepalive"))
		320	conf.keepalive = atoi (val);
		321	else if (!strcmp (var, "mtu"))
		322	conf.mtu = atoi (val);
		323	else if (!strcmp (var, "if-up"))
		324	free (conf.script_if_up), conf.script_if_up = strdup (val);
		325	else if (!strcmp (var, "node-up"))
		326	free (conf.script_node_up), conf.script_node_up = strdup (val);
		327	else if (!strcmp (var, "node-down"))
		328	free (conf.script_node_down), conf.script_node_down = strdup (val);
		329	else if (!strcmp (var, "pid-file"))
		330	free (conf.pidfilename), conf.pidfilename = strdup (val);
		331	else if (!strcmp (var, "dns-forw-host"))
		332	{
		333	#if ENABLE_DNS
		334	free (conf.dns_forw_host), conf.dns_forw_host = strdup (val);
		335	#endif
		336	}
		337	else if (!strcmp (var, "dns-forw-port"))
		338	{
		339	#if ENABLE_DNS
		340	conf.dns_forw_port = atoi (val);
		341	#endif
		342	}
		343	else if (!strcmp (var, "dns-timeout-factor"))
		344	{
		345	#if ENABLE_DNS
		346	conf.dns_timeout_factor = atof (val);
		347	#endif
		348	}
		349	else if (!strcmp (var, "dns-send-interval"))
		350	{
		351	#if ENABLE_DNS
		352	conf.dns_send_interval = atoi (val);
		353	#endif
		354	}
		355	else if (!strcmp (var, "dns-overlap-factor"))
		356	{
		357	#if ENABLE_DNS
		358	conf.dns_overlap_factor = atof (val);
		359	#endif
		360	}
		361	else if (!strcmp (var, "dns-max-outstanding"))
		362	{
		363	#if ENABLE_DNS
		364	conf.dns_max_outstanding = atoi (val);
		365	#endif
		366	}
		367	else if (!strcmp (var, "http-proxy-host"))
		368	{
		369	#if ENABLE_HTTP_PROXY
		370	free (conf.proxy_host), conf.proxy_host = strdup (val);
		371	#endif
		372	}
		373	else if (!strcmp (var, "http-proxy-port"))
		374	{
		375	#if ENABLE_HTTP_PROXY
		376	conf.proxy_port = atoi (val);
		377	#endif
		378	}
		379	else if (!strcmp (var, "http-proxy-auth"))
		380	{
		381	#if ENABLE_HTTP_PROXY
		382	conf.proxy_auth = (char )base64_encode ((const u8 )val, strlen (val));
		383	#endif
		384	}
		385
		386	/* node-specific, non-defaultable */
		387	else if (node != &conf.default_node && !strcmp (var, "hostname"))
		388	free (node->hostname), node->hostname = strdup (val);
		389
		390	/* node-specific, defaultable */
		391	else if (!strcmp (var, "udp-port"))
		392	node->udp_port = atoi (val);
		393	else if (!strcmp (var, "tcp-port"))
		394	node->tcp_port = atoi (val);
		395	else if (!strcmp (var, "dns-hostname"))
		396	{
		397	#if ENABLE_DNS
		398	free (node->dns_hostname), node->dns_hostname = strdup (val);
		399	#endif
		400	}
		401	else if (!strcmp (var, "dns-port"))
		402	{
		403	#if ENABLE_DNS
		404	node->dns_port = atoi (val);
		405	#endif
		406	}
		407	else if (!strcmp (var, "dns-domain"))
		408	{
		409	#if ENABLE_DNS
		410	free (node->domain), node->domain = strdup (val);
		411	#endif
		412	}
		413	else if (!strcmp (var, "if-up-data"))
		414	free (node->if_up_data), node->if_up_data = strdup (val);
		415	else if (!strcmp (var, "router-priority"))
		416	node->routerprio = atoi (val);
		417	else if (!strcmp (var, "max-retry"))
		418	node->max_retry = atoi (val);
		419	else if (!strcmp (var, "connect"))
		420	{
		421	if (!strcmp (val, "ondemand"))
		422	node->connectmode = conf_node::C_ONDEMAND;
		423	else if (!strcmp (val, "never"))
		424	node->connectmode = conf_node::C_NEVER;
		425	else if (!strcmp (val, "always"))
		426	node->connectmode = conf_node::C_ALWAYS;
		427	else if (!strcmp (val, "disabled"))
		428	node->connectmode = conf_node::C_DISABLED;
		429	else
		430	return _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled'. (ignored)");
		431	}
		432	else if (!strcmp (var, "inherit-tos"))
		433	parse_bool (node->inherit_tos, "inherit-tos", true, false);
		434	else if (!strcmp (var, "compress"))
		435	parse_bool (node->compress, "compress", true, false);
		436	// all these bool options really really cost a lot of executable size!
		437	else if (!strcmp (var, "enable-tcp"))
		438	{
		439	#if ENABLE_TCP
		440	u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) \| v;
		441	#endif
		442	}
		443	else if (!strcmp (var, "enable-icmp"))
		444	{
		445	#if ENABLE_ICMP
		446	u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) \| v;
		447	#endif
		448	}
		449	else if (!strcmp (var, "enable-dns"))
		450	{
		451	#if ENABLE_DNS
		452	u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) \| v;
		453	#endif
		454	}
		455	else if (!strcmp (var, "enable-udp"))
		456	{
		457	u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) \| v;
		458	}
		459	else if (!strcmp (var, "enable-rawip"))
		460	{
		461	u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) \| v;
		462	}
		463	else if (!strcmp (var, "allow-direct"))
		464	node->allow_direct.push_back (strdup (val));
		465	else if (!strcmp (var, "deny-direct"))
		466	node->deny_direct.push_back (strdup (val));
		467	else if (!strcmp (var, "max-ttl"))
		468	node->max_ttl = atof (val);
		469	else if (!strcmp (var, "max-queue"))
		470	node->max_queue = atoi (val);
		471
		472	// unknown or misplaced
		473	else
		474	return _("unknown configuration directive. (ignored)");
		475
		476	return 0;
		477	}
		478
		479	void configuration_parser::parse_argv ()
		480	{
		481	for (int i = 0; i < argc; ++i)
		482	{
		483	char *v = argv [i];
		484
		485	if (!*v)
		486	continue;
		487
		488	char *enode = v;
		489
		490	while (enode != '.' && enode > ' ' && enode != '=' && enode)
		491	enode++;
		492
		493	if (*enode != '.')
		494	enode = 0;
		495
		496	char *wnode = node == &conf.default_node
		497	? 0
		498	: node->nodename;
		499
		500	if ((!wnode && !enode)
		501	\|\| (wnode && enode && !strncmp (wnode, v, enode - v)))
		502	{
		503	const char *warn = parse_line (enode ? enode + 1 : v);
		504
		505	if (warn)
		506	slog (L_WARN, _("%s, while parsing command line option '%s'."), warn, v);
		507
		508	*v = 0;
		509	}
		510	}
		511	}
		512
		513	configuration_parser::configuration_parser (configuration &conf,
		514	bool need_keys,
		515	int argc,
		516	char **argv)
		517	: conf (conf),need_keys (need_keys), argc (argc), argv (argv)
		518	{
		519	char *fname;
		520	FILE *f;
		521
		522	conf.clear ();
		523
		524	asprintf (&fname, "%s/gvpe.conf", confbase);
		525	f = fopen (fname, "r");
		526
		527	if (f)
		528	{
		529	char line[16384];
		530	int lineno = 0;
		531	node = &conf.default_node;
		532
		533	while (fgets (line, sizeof (line), f))
		534	{
		535	lineno++;
		536
		537	const char *warn = parse_line (line);
		538
		539	if (warn)
		540	slog (L_WARN, _("%s, at '%s', line %d."), warn, fname, lineno);
		541	}
		542
		543	fclose (f);
		544
		545	parse_argv ();
		546	}
		547	else
		548	{
		549	slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
		550	exit (EXIT_FAILURE);
		551	}
		552
		553	free (fname);
		554
		555	fname = conf.config_filename (conf.prikeyfile, "hostkey");
		556
		557	f = fopen (fname, "r");
		558	if (f)
		559	{
		560	conf.rsa_key = RSA_new ();
		561
		562	if (!PEM_read_RSAPrivateKey (f, &conf.rsa_key, NULL, NULL))
		563	{
		564	ERR_load_RSA_strings (); ERR_load_PEM_strings ();
		565	slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
		566	exit (EXIT_FAILURE);
		567	}
		568
		569	require (RSA_blinding_on (conf.rsa_key, 0));
		570
		571	fclose (f);
		572	}
		573	else
		574	{
		575	slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
		576
		577	if (need_keys)
		578	exit (EXIT_FAILURE);
		579	}
		580
		581	if (need_keys && ::thisnode
		582	&& conf.rsa_key && conf.thisnode && conf.thisnode->rsa_key)
		583	if (BN_cmp (conf.rsa_key->n, conf.thisnode->rsa_key->n) != 0
		584	\|\| BN_cmp (conf.rsa_key->e, conf.thisnode->rsa_key->e) != 0)
		585	{
		586	slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode);
		587	exit (EXIT_FAILURE);
		588	}
		589
		590	free (fname);
		591	}
		592
		593	char configuration::config_filename (const char name, const char *dflt)
		594	{
		595	char *fname;
		596
		597	asprintf (&fname, name ? name : dflt, ::thisnode);
		598
		599	if (!ABSOLUTE_PATH (fname))
		600	{
		601	char *rname = fname;
		602	asprintf (&fname, "%s/%s", confbase, rname);
		603	free (rname);
		604	}
		605
		606	return fname;
		607	}
		608
		609	void
		610	configuration::print ()
		611	{
		612	printf (_("\nConfiguration\n\n"));
		613	printf (_("# of nodes: %d\n"), nodes.size ());
		614	printf (_("this node: %s\n"), thisnode ? thisnode->nodename : "<unset>");
		615	printf (_("MTU: %d\n"), mtu);
		616	printf (_("rekeying interval: %d\n"), rekey);
		617	printf (_("keepalive interval: %d\n"), keepalive);
		618	printf (_("interface: %s\n"), ifname);
		619	printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
		620	printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1);
		621	printf ("\n");
		622
		623	printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",
		624	_("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));
		625
		626	for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i)
		627	(*i)->print ();
		628
		629	printf ("\n");
		630	}
		631
		632	configuration::configuration ()
		633	{
		634	asprintf (&confbase, "%s/gvpe", CONFDIR);
		635
		636	init ();
		637	}
		638
		639	configuration::~configuration ()
		640	{
		641	cleanup ();
		642	}
		643
		644

Diff Legend

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

Comparing gvpe/src/conf.C (file contents): Revision 1.9 by pcg, Wed Apr 2 05:14:59 2003 UTC vs. Revision 1.43 by pcg, Thu Aug 7 16:34:21 2008 UTC

Diff Legend

Comparing gvpe/src/conf.C (file contents):
Revision 1.9 by pcg, Wed Apr 2 05:14:59 2003 UTC vs.
Revision 1.43 by pcg, Thu Aug 7 16:34:21 2008 UTC