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

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.44 by pcg, Thu Aug 7 17:54:26 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.44 by pcg, Thu Aug 7 17:54:26 2008 UTC