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

Comparing gvpe/src/conf.C (file contents):
Revision 1.10 by pcg, Wed Apr 2 21:02:25 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";
69	if (protocol & PROT_TCPv4) return "tcp";	68	if (protocol & PROT_TCPv4 ) return "tcp";
		69	if (protocol & PROT_DNSv4 ) return "dns";
70		70
71	return "<unknown>";	71	return "<unknown>";
72	}	72	}
73		73
74	configuration::configuration ()	74	static bool
		75	match_list (const vector<const char > &list, const char str)
75	{	76	{
76	init ();	77	for (vector<const char *>::const_iterator i = list.end (); i-- > list.begin (); )
77	}	78	if ((i)[0] == '' && !(*i)[1])
		79	return true;
		80	else if (!strcmp (*i, str))
		81	return true;
78		82
79	configuration::~configuration ()
80	{
81	cleanup ();
82	}
83
84	void configuration::init ()
85	{
86	memset (this, 0, sizeof (*this));
87
88	rekey = DEFAULT_REKEY;
89	keepalive = DEFAULT_KEEPALIVE;
90	llevel = L_INFO;
91	ip_proto = IPPROTO_GRE;
92
93	default_node.udp_port = DEFAULT_UDPPORT;
94	default_node.tcp_port = DEFAULT_UDPPORT;
95	default_node.connectmode = conf_node::C_ALWAYS;
96	default_node.compress = true;
97	default_node.protocols = PROT_UDPv4;
98	}
99
100	void configuration::cleanup()
101	{
102	if (rsa_key)
103	RSA_free (rsa_key);
104
105	free (ifname);
106
107	rsa_key = 0;
108	ifname = 0;
109	}
110
111	void
112	configuration::clear_config ()
113	{
114	for (configuration::node_vector::iterator i = nodes.begin(); i != nodes.end(); ++i)
115	delete *i;
116
117	nodes.clear ();
118
119	cleanup ();
120	init ();
121	}
122
123	#define parse_bool(target,name,trueval,falseval) \
124	if (!strcmp (val, "yes")) target = trueval; \
125	else if (!strcmp (val, "no")) target = falseval; \
126	else if (!strcmp (val, "true")) target = trueval; \
127	else if (!strcmp (val, "false")) target = falseval; \
128	else if (!strcmp (val, "on")) target = trueval; \
129	else if (!strcmp (val, "off")) target = falseval; \
130	else \
131	slog (L_WARN, \
132	_("illegal value for '%s', only 'yes\|true\|on' or 'no\|false\|off' allowed, at '%s' line %d"), \
133	name, var, fname, lineno);
134
135	void configuration::read_config (bool need_keys)
136	{
137	char *fname;
138	FILE *f;
139
140	clear_config ();
141
142	asprintf (&fname, "%s/vped.conf", confbase);
143	f = fopen (fname, "r");
144
145	if (f)
146	{
147	char line[16384];
148	int lineno = 0;
149	char var, val;
150	conf_node *node = &default_node;
151
152	while (fgets (line, sizeof (line), f))
153	{
154	lineno++;
155
156	{
157	char *end = line + strlen (line);
158
159	while (*end < ' ' && end >= line)
160	end--;
161
162	*++end = 0;
163	}
164
165	char *tok = line;
166
167	retry:
168	var = strtok (tok, "\t =");
169	tok = 0;
170
171	if (!var \|\| !var[0])
172	continue; /* no tokens on this line */
173
174	if (var[0] == '#')
175	continue; /* comment: ignore */
176
177	val = strtok (NULL, "\t\n\r =");
178
179	if (!val \|\| val[0] == '#')
180	{
181	slog (L_WARN,
182	_("no value for variable `%s', at '%s' line %d"),
183	var, fname, lineno);
184	break;
185	}
186
187	if (!strcmp (var, "on"))
188	{
189	if (!::thisnode
190	\|\| (val[0] == '!' && strcmp (val + 1, ::thisnode))
191	\|\| !strcmp (val, ::thisnode))
192	goto retry;
193
194	continue;
195	}
196
197	// truly global
198	if (!strcmp (var, "loglevel"))
199	{
200	loglevel l = string_to_loglevel (val);
201
202	if (l != L_NONE)
203	llevel = l;
204	else
205	slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
206	}
207	else if (!strcmp (var, "ip-proto"))
208	ip_proto = atoi (val);
209
210	// per config
211	else if (!strcmp (var, "node"))
212	{
213	default_node.id++;
214
215	node = new conf_node (default_node);
216
217	nodes.push_back (node);
218
219	node->nodename = strdup (val);
220
221	{
222	char *fname;
223	FILE *f;
224
225	asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename);
226
227	f = fopen (fname, "r");
228	if (f)
229	{
230	node->rsa_key = RSA_new ();
231
232	if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
233	{
234	ERR_load_RSA_strings (); ERR_load_PEM_strings ();
235	slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
236	exit (1);
237	}
238
239	RSA_blinding_on (node->rsa_key, 0);
240
241	fclose (f);
242	}
243	else
244	{
245	slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
246
247	if (need_keys)
248	exit (1);
249	}
250
251	free (fname);
252	}
253
254	if (!::thisnode \|\| !strcmp (node->nodename, ::thisnode))
255	thisnode = node;
256	}
257	else if (!strcmp (var, "private-key"))
258	prikeyfile = strdup (val);
259	else if (!strcmp (var, "ifpersist"))
260	{
261	parse_bool (ifpersist, "ifpersist", true, false);
262	}
263	else if (!strcmp (var, "ifname"))
264	ifname = strdup (val);
265	else if (!strcmp (var, "rekey"))
266	rekey = atoi (val);
267	else if (!strcmp (var, "keepalive"))
268	keepalive = atoi (val);
269	else if (!strcmp (var, "mtu"))
270	mtu = atoi (val);
271	else if (!strcmp (var, "if-up"))
272	script_if_up = strdup (val);
273	else if (!strcmp (var, "node-up"))
274	script_node_up = strdup (val);
275	else if (!strcmp (var, "node-down"))
276	script_node_down = strdup (val);
277
278	/* node-specific, non-defaultable */
279	else if (node != &default_node && !strcmp (var, "hostname"))
280	{
281	free (node->hostname);
282	node->hostname = strdup (val);
283	}
284
285	/* node-specific, defaultable */
286	else if (!strcmp (var, "udp-port"))
287	node->udp_port = atoi (val);
288	else if (!strcmp (var, "tcp-port"))
289	node->tcp_port = atoi (val);
290	else if (!strcmp (var, "router-priority"))
291	node->routerprio = atoi (val);
292	else if (!strcmp (var, "connect"))
293	{
294	if (!strcmp (val, "ondemand"))
295	node->connectmode = conf_node::C_ONDEMAND;
296	else if (!strcmp (val, "never"))
297	node->connectmode = conf_node::C_NEVER;
298	else if (!strcmp (val, "always"))
299	node->connectmode = conf_node::C_ALWAYS;
300	else if (!strcmp (val, "disabled"))
301	node->connectmode = conf_node::C_DISABLED;
302	else
303	slog (L_WARN,
304	_("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
305	var, fname, lineno);
306	}
307	else if (!strcmp (var, "inherit-tos"))
308	{
309	parse_bool (node->inherit_tos, "inherit-tos", true, false);
310	}
311	else if (!strcmp (var, "compress"))
312	{
313	parse_bool (node->compress, "compress", true, false);
314	}
315	// all these bool options really really cost a lot of executable size!
316	else if (!strcmp (var, "enable-tcp"))
317	{
318	u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) \| v;
319	}
320	else if (!strcmp (var, "enable-udp"))
321	{
322	u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) \| v;
323	}
324	else if (!strcmp (var, "enable-rawip"))
325	{
326	u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) \| v;
327	}
328
329	// unknown or misplaced
330	else
331	{
332	slog (L_WARN,
333	_("unknown or misplaced variable `%s', at '%s' line %d"),
334	var, fname, lineno);
335	}
336	}
337
338	fclose (f);
339	}
340	else
341	{
342	slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
343	exit (1);
344	}
345
346	free (fname);
347
348	fname = config_filename (prikeyfile, "hostkey");
349
350	f = fopen (fname, "r");
351	if (f)
352	{
353	rsa_key = RSA_new ();
354
355	if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
356	{
357	ERR_load_RSA_strings (); ERR_load_PEM_strings ();
358	slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
359	exit (1);
360	}
361
362	RSA_blinding_on (rsa_key, 0);
363
364	fclose (f);
365	}
366	else
367	{
368	slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
369
370	if (need_keys)
371	exit (1);
372	}
373
374	free (fname);
375	}
376
377	char configuration::config_filename (const char name, const char *dflt)
378	{
379	char *fname;
380
381	asprintf (&fname, name ? name : dflt, ::thisnode);
382
383	if (!ABSOLUTE_PATH (fname))
384	{
385	char *rname = fname;
386	asprintf (&fname, "%s/%s", confbase, rname);
387	free (rname);
388	}
389
390	return fname;	83	return false;
391	}	84	}
392		85
393	void	86	bool
394	configuration::print ()	87	conf_node::can_direct (struct conf_node *other)
395	{	88	{
396	printf (_("\nConfiguration\n\n"));	89	if (match_list (allow_direct, other->nodename))
397	printf (_("# of nodes: %d\n"), nodes.size ());	90	return true;
398	printf (_("this node: %s\n"), thisnode ? thisnode->nodename : "<unset>");
399	printf (_("MTU: %d\n"), mtu);
400	printf (_("rekeying interval: %d\n"), rekey);
401	printf (_("keepalive interval: %d\n"), keepalive);
402	printf (_("interface: %s\n"), ifname);
403	printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
404	printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) : -1);
405	printf ("\n");
406		91
407	printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",	92	if (match_list (deny_direct, other->nodename))
408	_("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));	93	return false;
409		94
410	for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i)	95	return true;
411	(*i)->print ();
412
413	printf ("\n");
414	}	96	}
415		97
416	void	98	void
417	conf_node::print ()	99	conf_node::print ()
418	{	100	{
…		…
428	hostname ? ":" : "",	110	hostname ? ":" : "",
429	hostname ? udp_port : 0	111	hostname ? udp_port : 0
430	);	112	);
431	}	113	}
432		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.10 by pcg, Wed Apr 2 21:02:25 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.10 by pcg, Wed Apr 2 21:02:25 2003 UTC vs.
Revision 1.43 by pcg, Thu Aug 7 16:34:21 2008 UTC