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

Diff Legend

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