ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/gvpe/src/conf.C
(Generate patch)

Comparing gvpe/src/conf.C (file contents):
Revision 1.8 by pcg, Wed Apr 2 03:25:17 2003 UTC vs.
Revision 1.34 by pcg, Thu Mar 17 23:59:37 2005 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. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22*/ 20*/
23 21
24#include "config.h" 22#include "config.h"
25 23
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>
40#include <openssl/bn.h>
42 41
43#include "gettext.h" 42#include "gettext.h"
44 43
45#include "conf.h" 44#include "conf.h"
46#include "slog.h" 45#include "slog.h"
47#include "util.h" 46#include "util.h"
48 47
49char *confbase; 48char *confbase;
50char *thisnode; 49char *thisnode;
51char *identname; 50char *identname;
52char *pidfilename;
53 51
54struct configuration conf; 52struct configuration conf;
55 53
56u8 best_protocol (u8 protset) 54u8 best_protocol (u8 protset)
57{ 55{
58 if (protset & PROT_IPv4) 56 if (protset & PROT_IPv4 ) return PROT_IPv4;
59 return PROT_IPv4; 57 if (protset & PROT_ICMPv4) return PROT_ICMPv4;
58 if (protset & PROT_UDPv4 ) return PROT_UDPv4;
59 if (protset & PROT_TCPv4 ) return PROT_TCPv4;
60 if (protset & PROT_DNSv4 ) return PROT_DNSv4;
60 61
61 return PROT_UDPv4; 62 return 0;
62} 63}
63 64
64const char *strprotocol (u8 protocol) 65const char *strprotocol (u8 protocol)
65{ 66{
66 if (protocol & PROT_IPv4 ) return "rawip"; 67 if (protocol & PROT_IPv4 ) return "rawip";
68 if (protocol & PROT_ICMPv4) return "icmp";
67 if (protocol & PROT_UDPv4) return "udp"; 69 if (protocol & PROT_UDPv4 ) return "udp";
70 if (protocol & PROT_TCPv4 ) return "tcp";
71 if (protocol & PROT_DNSv4 ) return "dns";
68 72
69 return "<unknown>"; 73 return "<unknown>";
70}
71
72configuration::configuration ()
73{
74 init ();
75}
76
77configuration::~configuration ()
78{
79 cleanup ();
80}
81
82void configuration::init ()
83{
84 memset (this, 0, sizeof (*this));
85
86 rekey = DEFAULT_REKEY;
87 keepalive = DEFAULT_KEEPALIVE;
88 llevel = L_INFO;
89 ip_proto = IPPROTO_GRE;
90
91 default_node.udp_port = DEFAULT_UDPPORT;
92 default_node.tcp_port = DEFAULT_UDPPORT;
93 default_node.connectmode = conf_node::C_ALWAYS;
94 default_node.compress = true;
95 default_node.protocols = PROT_UDPv4;
96}
97
98void configuration::cleanup()
99{
100 if (rsa_key)
101 RSA_free (rsa_key);
102
103 free (ifname);
104
105 rsa_key = 0;
106 ifname = 0;
107}
108
109void
110configuration::clear_config ()
111{
112 for (configuration::node_vector::iterator i = nodes.begin(); i != nodes.end(); ++i)
113 delete *i;
114
115 nodes.clear ();
116
117 cleanup ();
118 init ();
119}
120
121#define parse_bool(target,name,trueval,falseval) \
122 if (!strcmp (val, "yes")) target = trueval; \
123 else if (!strcmp (val, "no")) target = falseval; \
124 else if (!strcmp (val, "true")) target = trueval; \
125 else if (!strcmp (val, "false")) target = falseval; \
126 else if (!strcmp (val, "on")) target = trueval; \
127 else if (!strcmp (val, "off")) target = falseval; \
128 else \
129 slog (L_WARN, \
130 _("illegal value for '%s', only 'yes|true|on' or 'no|false|off' allowed, at '%s' line %d"), \
131 name, var, fname, lineno);
132
133void configuration::read_config (bool need_keys)
134{
135 char *fname;
136 FILE *f;
137
138 clear_config ();
139
140 asprintf (&fname, "%s/vped.conf", confbase);
141 f = fopen (fname, "r");
142
143 if (f)
144 {
145 char line[16384];
146 int lineno = 0;
147 char *var, *val;
148 conf_node *node = &default_node;
149
150 while (fgets (line, sizeof (line), f))
151 {
152 lineno++;
153
154 {
155 char *end = line + strlen (line);
156
157 while (*end < ' ' && end >= line)
158 end--;
159
160 *++end = 0;
161 }
162
163 char *tok = line;
164
165retry:
166 var = strtok (tok, "\t =");
167 tok = 0;
168
169 if (!var || !var[0])
170 continue; /* no tokens on this line */
171
172 if (var[0] == '#')
173 continue; /* comment: ignore */
174
175 val = strtok (NULL, "\t\n\r =");
176
177 if (!val || val[0] == '#')
178 {
179 slog (L_WARN,
180 _("no value for variable `%s', at '%s' line %d"),
181 var, fname, lineno);
182 break;
183 }
184
185 if (!strcmp (var, "on"))
186 {
187 if (!::thisnode
188 || (val[0] == '!' && strcmp (val + 1, ::thisnode))
189 || !strcmp (val, ::thisnode))
190 goto retry;
191
192 continue;
193 }
194
195 // truly global
196 if (!strcmp (var, "loglevel"))
197 {
198 loglevel l = string_to_loglevel (val);
199
200 if (l != L_NONE)
201 llevel = l;
202 else
203 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
204 }
205 else if (!strcmp (var, "ip-proto"))
206 ip_proto = atoi (val);
207
208 // per config
209 else if (!strcmp (var, "node"))
210 {
211 default_node.id++;
212
213 node = new conf_node (default_node);
214
215 nodes.push_back (node);
216
217 node->nodename = strdup (val);
218
219 {
220 char *fname;
221 FILE *f;
222
223 asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename);
224
225 f = fopen (fname, "r");
226 if (f)
227 {
228 node->rsa_key = RSA_new ();
229
230 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
231 {
232 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
233 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
234 exit (1);
235 }
236
237 RSA_blinding_on (node->rsa_key, 0);
238
239 fclose (f);
240 }
241 else
242 {
243 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
244
245 if (need_keys)
246 exit (1);
247 }
248
249 free (fname);
250 }
251
252 if (!::thisnode || !strcmp (node->nodename, ::thisnode))
253 thisnode = node;
254 }
255 else if (!strcmp (var, "private-key"))
256 prikeyfile = strdup (val);
257 else if (!strcmp (var, "ifpersist"))
258 {
259 parse_bool (ifpersist, "ifpersist", true, false);
260 }
261 else if (!strcmp (var, "ifname"))
262 ifname = strdup (val);
263 else if (!strcmp (var, "rekey"))
264 rekey = atoi (val);
265 else if (!strcmp (var, "keepalive"))
266 keepalive = atoi (val);
267 else if (!strcmp (var, "mtu"))
268 mtu = atoi (val);
269 else if (!strcmp (var, "if-up"))
270 script_if_up = strdup (val);
271 else if (!strcmp (var, "node-up"))
272 script_node_up = strdup (val);
273 else if (!strcmp (var, "node-down"))
274 script_node_down = strdup (val);
275
276 /* node-specific, non-defaultable */
277 else if (node != &default_node && !strcmp (var, "hostname"))
278 {
279 free (node->hostname);
280 node->hostname = strdup (val);
281 }
282
283 /* node-specific, defaultable */
284 else if (!strcmp (var, "udp-port"))
285 node->udp_port = atoi (val);
286 else if (!strcmp (var, "tcp-port"))
287 node->tcp_port = atoi (val);
288 else if (!strcmp (var, "router-priority"))
289 node->routerprio = atoi (val);
290 else if (!strcmp (var, "connect"))
291 {
292 if (!strcmp (val, "ondemand"))
293 node->connectmode = conf_node::C_ONDEMAND;
294 else if (!strcmp (val, "never"))
295 node->connectmode = conf_node::C_NEVER;
296 else if (!strcmp (val, "always"))
297 node->connectmode = conf_node::C_ALWAYS;
298 else if (!strcmp (val, "disabled"))
299 node->connectmode = conf_node::C_DISABLED;
300 else
301 slog (L_WARN,
302 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
303 var, fname, lineno);
304 }
305 else if (!strcmp (var, "inherit-tos"))
306 {
307 parse_bool (node->inherit_tos, "inherit-tos", true, false);
308 }
309 else if (!strcmp (var, "compress"))
310 {
311 parse_bool (node->compress, "compress", true, false);
312 }
313 // all these bool options really really cost a lot of executable size!
314 else if (!strcmp (var, "enable-tcp"))
315 {
316 u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v;
317 }
318 else if (!strcmp (var, "enable-udp"))
319 {
320 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
321 }
322 else if (!strcmp (var, "enable-rawip"))
323 {
324 u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v;
325 }
326
327 // unknown or misplaced
328 else
329 {
330 slog (L_WARN,
331 _("unknown or misplaced variable `%s', at '%s' line %d"),
332 var, fname, lineno);
333 }
334 }
335
336 fclose (f);
337 }
338 else
339 {
340 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
341 exit (1);
342 }
343
344 free (fname);
345
346 fname = config_filename (prikeyfile, "hostkey");
347
348 f = fopen (fname, "r");
349 if (f)
350 {
351 rsa_key = RSA_new ();
352
353 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
354 {
355 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
356 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
357 exit (1);
358 }
359
360 RSA_blinding_on (rsa_key, 0);
361
362 fclose (f);
363 }
364 else
365 {
366 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
367
368 if (need_keys)
369 exit (1);
370 }
371
372 free (fname);
373}
374
375char *configuration::config_filename (const char *name, const char *dflt)
376{
377 char *fname;
378
379 asprintf (&fname, name ? name : dflt, ::thisnode);
380
381 if (!ABSOLUTE_PATH (fname))
382 {
383 char *rname = fname;
384 asprintf (&fname, "%s/%s", confbase, rname);
385 free (rname);
386 }
387
388 return fname;
389}
390
391void
392configuration::print ()
393{
394 printf (_("\nConfiguration\n\n"));
395 printf (_("# of nodes: %d\n"), nodes.size ());
396 printf (_("this node: %s\n"), thisnode ? thisnode->nodename : "<unset>");
397 printf (_("MTU: %d\n"), mtu);
398 printf (_("rekeying interval: %d\n"), rekey);
399 printf (_("keepalive interval: %d\n"), keepalive);
400 printf (_("interface: %s\n"), ifname);
401 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
402 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) : -1);
403 printf ("\n");
404
405 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",
406 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));
407
408 for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i)
409 (*i)->print ();
410
411 printf ("\n");
412} 74}
413 75
414void 76void
415conf_node::print () 77conf_node::print ()
416{ 78{
426 hostname ? ":" : "", 88 hostname ? ":" : "",
427 hostname ? udp_port : 0 89 hostname ? udp_port : 0
428 ); 90 );
429} 91}
430 92
93conf_node::~conf_node ()
94{
95 if (rsa_key)
96 RSA_free (rsa_key);
97
98 free (nodename);
99 free (hostname);
100#if ENABLE_DNS
101 free (domain);
102 free (dns_hostname);
103#endif
104}
105
106void configuration::init ()
107{
108 memset (this, 0, sizeof (*this));
109
110 mtu = DEFAULT_MTU;
111 rekey = DEFAULT_REKEY;
112 keepalive = DEFAULT_KEEPALIVE;
113 llevel = L_INFO;
114 ip_proto = IPPROTO_GRE;
115#if ENABLE_ICMP
116 icmp_type = ICMP_ECHOREPLY;
117#endif
118
119 default_node.udp_port = DEFAULT_UDPPORT;
120 default_node.tcp_port = DEFAULT_UDPPORT; // ehrm
121 default_node.connectmode = conf_node::C_ALWAYS;
122 default_node.compress = true;
123 default_node.protocols = 0;
124 default_node.max_retry = DEFAULT_MAX_RETRY;
125
126#if ENABLE_DNS
127 default_node.dns_port = 0; // default is 0 == client
128 dns_forw_host = strdup ("127.0.0.1");
129 dns_forw_port = 53;
130#endif
131
132 conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid");
133}
134
135void configuration::cleanup()
136{
137 if (rsa_key)
138 RSA_free (rsa_key);
139
140 rsa_key = 0;
141
142 free (pidfilename); pidfilename = 0;
143 free (ifname); ifname = 0;
144#if ENABLE_HTTP_PROXY
145 free (proxy_host); proxy_host = 0;
146 free (proxy_auth); proxy_auth = 0;
147#endif
148#if ENABLE_DNS
149 free (dns_forw_host); dns_forw_host = 0;
150#endif
151}
152
153void
154configuration::clear_config ()
155{
156 for (configuration::node_vector::iterator i = nodes.begin(); i != nodes.end(); ++i)
157 delete *i;
158
159 nodes.clear ();
160
161 cleanup ();
162 init ();
163}
164
165#define parse_bool(target,name,trueval,falseval) \
166 if (!strcmp (val, "yes")) target = trueval; \
167 else if (!strcmp (val, "no")) target = falseval; \
168 else if (!strcmp (val, "true")) target = trueval; \
169 else if (!strcmp (val, "false")) target = falseval; \
170 else if (!strcmp (val, "on")) target = trueval; \
171 else if (!strcmp (val, "off")) target = falseval; \
172 else \
173 slog (L_WARN, \
174 _("illegal value for '%s', only 'yes|true|on' or 'no|false|off' allowed, at '%s' line %d"), \
175 name, var, fname, lineno);
176
177void configuration::read_config (bool need_keys)
178{
179 char *fname;
180 FILE *f;
181
182 clear_config ();
183
184 asprintf (&fname, "%s/gvpe.conf", confbase);
185 f = fopen (fname, "r");
186
187 if (f)
188 {
189 char line[16384];
190 int lineno = 0;
191 char *var, *val;
192 conf_node *node = &default_node;
193
194 while (fgets (line, sizeof (line), f))
195 {
196 lineno++;
197
198 {
199 char *end = line + strlen (line);
200
201 while (*end < ' ' && end >= line)
202 end--;
203
204 *++end = 0;
205 }
206
207 char *tok = line;
208
209retry:
210 var = strtok (tok, "\t =");
211 tok = 0;
212
213 if (!var || !var[0])
214 continue; /* no tokens on this line */
215
216 if (var[0] == '#')
217 continue; /* comment: ignore */
218
219 val = strtok (NULL, "\t\n\r =");
220
221 if (!val || val[0] == '#')
222 {
223 slog (L_WARN,
224 _("no value for variable `%s', at '%s' line %d"),
225 var, fname, lineno);
226 break;
227 }
228
229 if (!strcmp (var, "on"))
230 {
231 if (!::thisnode
232 || (val[0] == '!' && strcmp (val + 1, ::thisnode))
233 || !strcmp (val, ::thisnode))
234 goto retry;
235
236 continue;
237 }
238
239 // truly global
240 if (!strcmp (var, "loglevel"))
241 {
242 loglevel l = string_to_loglevel (val);
243
244 if (l != L_NONE)
245 llevel = l;
246 else
247 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
248 }
249 else if (!strcmp (var, "ip-proto"))
250 ip_proto = atoi (val);
251 else if (!strcmp (var, "icmp-type"))
252 {
253#if ENABLE_ICMP
254 icmp_type = atoi (val);
255#endif
256 }
257
258 // per config
259 else if (!strcmp (var, "node"))
260 {
261 default_node.id++;
262
263 node = new conf_node (default_node);
264
265 nodes.push_back (node);
266
267 node->nodename = strdup (val);
268
269 {
270 char *fname;
271 FILE *f;
272
273 asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename);
274
275 f = fopen (fname, "r");
276 if (f)
277 {
278 node->rsa_key = RSA_new ();
279
280 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
281 {
282 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
283 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
284 exit (EXIT_FAILURE);
285 }
286
287 require (RSA_blinding_on (node->rsa_key, 0));
288
289 fclose (f);
290 }
291 else
292 {
293 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
294
295 if (need_keys)
296 exit (EXIT_FAILURE);
297 }
298
299 free (fname);
300 }
301
302 if (::thisnode && !strcmp (node->nodename, ::thisnode))
303 thisnode = node;
304 }
305 else if (!strcmp (var, "private-key"))
306 free (prikeyfile), prikeyfile = strdup (val);
307 else if (!strcmp (var, "ifpersist"))
308 {
309 parse_bool (ifpersist, "ifpersist", true, false);
310 }
311 else if (!strcmp (var, "ifname"))
312 free (ifname), ifname = strdup (val);
313 else if (!strcmp (var, "rekey"))
314 rekey = atoi (val);
315 else if (!strcmp (var, "keepalive"))
316 keepalive = atoi (val);
317 else if (!strcmp (var, "mtu"))
318 mtu = atoi (val);
319 else if (!strcmp (var, "if-up"))
320 free (script_if_up), script_if_up = strdup (val);
321 else if (!strcmp (var, "node-up"))
322 free (script_node_up), script_node_up = strdup (val);
323 else if (!strcmp (var, "node-down"))
324 free (script_node_down), script_node_down = strdup (val);
325 else if (!strcmp (var, "pid-file"))
326 free (pidfilename), pidfilename = strdup (val);
327 else if (!strcmp (var, "dns-forw-host"))
328 {
329#if ENABLE_DNS
330 free (dns_forw_host), dns_forw_host = strdup (val);
331#endif
332 }
333 else if (!strcmp (var, "dns-forw-port"))
334 {
335#if ENABLE_DNS
336 dns_forw_port = atoi (val);
337#endif
338 }
339 else if (!strcmp (var, "http-proxy-host"))
340 {
341#if ENABLE_HTTP_PROXY
342 free (proxy_host), proxy_host = strdup (val);
343#endif
344 }
345 else if (!strcmp (var, "http-proxy-port"))
346 {
347#if ENABLE_HTTP_PROXY
348 proxy_port = atoi (val);
349#endif
350 }
351 else if (!strcmp (var, "http-proxy-auth"))
352 {
353#if ENABLE_HTTP_PROXY
354 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val));
355#endif
356 }
357
358 /* node-specific, non-defaultable */
359 else if (node != &default_node && !strcmp (var, "hostname"))
360 free (node->hostname), node->hostname = strdup (val);
361
362 /* node-specific, defaultable */
363 else if (!strcmp (var, "udp-port"))
364 node->udp_port = atoi (val);
365 else if (!strcmp (var, "tcp-port"))
366 node->tcp_port = atoi (val);
367 else if (!strcmp (var, "dns-hostname"))
368 {
369#if ENABLE_DNS
370 free (node->dns_hostname), node->dns_hostname = strdup (val);
371#endif
372 }
373 else if (!strcmp (var, "dns-port"))
374 {
375#if ENABLE_DNS
376 node->dns_port = atoi (val);
377#endif
378 }
379 else if (!strcmp (var, "dns-domain"))
380 {
381#if ENABLE_DNS
382 free (node->domain), node->domain = strdup (val);
383#endif
384 }
385 else if (!strcmp (var, "router-priority"))
386 node->routerprio = atoi (val);
387 else if (!strcmp (var, "max-retry"))
388 node->max_retry = atoi (val);
389 else if (!strcmp (var, "connect"))
390 {
391 if (!strcmp (val, "ondemand"))
392 node->connectmode = conf_node::C_ONDEMAND;
393 else if (!strcmp (val, "never"))
394 node->connectmode = conf_node::C_NEVER;
395 else if (!strcmp (val, "always"))
396 node->connectmode = conf_node::C_ALWAYS;
397 else if (!strcmp (val, "disabled"))
398 node->connectmode = conf_node::C_DISABLED;
399 else
400 slog (L_WARN,
401 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
402 var, fname, lineno);
403 }
404 else if (!strcmp (var, "inherit-tos"))
405 {
406 parse_bool (node->inherit_tos, "inherit-tos", true, false);
407 }
408 else if (!strcmp (var, "compress"))
409 {
410 parse_bool (node->compress, "compress", true, false);
411 }
412 // all these bool options really really cost a lot of executable size!
413 else if (!strcmp (var, "enable-tcp"))
414 {
415#if ENABLE_TCP
416 u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v;
417#endif
418 }
419 else if (!strcmp (var, "enable-icmp"))
420 {
421#if ENABLE_ICMP
422 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v;
423#endif
424 }
425 else if (!strcmp (var, "enable-dns"))
426 {
427#if ENABLE_DNS
428 u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v;
429#endif
430 }
431 else if (!strcmp (var, "enable-udp"))
432 {
433 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
434 }
435 else if (!strcmp (var, "enable-rawip"))
436 {
437 u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v;
438 }
439
440 // unknown or misplaced
441 else
442 slog (L_WARN,
443 _("unknown or misplaced variable `%s', at '%s' line %d"),
444 var, fname, lineno);
445 }
446
447 fclose (f);
448 }
449 else
450 {
451 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
452 exit (EXIT_FAILURE);
453 }
454
455 free (fname);
456
457 fname = config_filename (prikeyfile, "hostkey");
458
459 f = fopen (fname, "r");
460 if (f)
461 {
462 rsa_key = RSA_new ();
463
464 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
465 {
466 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
467 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
468 exit (EXIT_FAILURE);
469 }
470
471 require (RSA_blinding_on (rsa_key, 0));
472
473 fclose (f);
474 }
475 else
476 {
477 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
478
479 if (need_keys)
480 exit (EXIT_FAILURE);
481 }
482
483 if (need_keys && ::thisnode
484 && rsa_key && thisnode && thisnode->rsa_key)
485 if (BN_cmp (rsa_key->n, thisnode->rsa_key->n) != 0
486 || BN_cmp (rsa_key->e, thisnode->rsa_key->e) != 0)
487 {
488 slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode);
489 exit (EXIT_FAILURE);
490 }
491
492 free (fname);
493}
494
495char *configuration::config_filename (const char *name, const char *dflt)
496{
497 char *fname;
498
499 asprintf (&fname, name ? name : dflt, ::thisnode);
500
501 if (!ABSOLUTE_PATH (fname))
502 {
503 char *rname = fname;
504 asprintf (&fname, "%s/%s", confbase, rname);
505 free (rname);
506 }
507
508 return fname;
509}
510
511void
512configuration::print ()
513{
514 printf (_("\nConfiguration\n\n"));
515 printf (_("# of nodes: %d\n"), nodes.size ());
516 printf (_("this node: %s\n"), thisnode ? thisnode->nodename : "<unset>");
517 printf (_("MTU: %d\n"), mtu);
518 printf (_("rekeying interval: %d\n"), rekey);
519 printf (_("keepalive interval: %d\n"), keepalive);
520 printf (_("interface: %s\n"), ifname);
521 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
522 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1);
523 printf ("\n");
524
525 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",
526 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));
527
528 for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i)
529 (*i)->print ();
530
531 printf ("\n");
532}
533
534configuration::configuration ()
535{
536 asprintf (&confbase, "%s/gvpe", CONFDIR);
537
538 init ();
539}
540
541configuration::~configuration ()
542{
543 cleanup ();
544}
545
546

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines