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.20 by pcg, Thu Oct 16 21:57:54 2003 UTC vs.
Revision 1.37 by pcg, Wed Mar 23 14:33:34 2005 UTC

1/* 1/*
2 conf.c -- configuration code 2 conf.c -- configuration code
3 Copyright (C) 2003 Marc Lehmann <pcg@goof.com> 3 Copyright (C) 2003-2005 Marc Lehmann <gvpe@schmorp.de>
4 4
5 This file is part of GVPE.
6
5 This program is free software; you can redistribute it and/or modify 7 GVPE is free software; you can redistribute it and/or modify
6 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
7 the Free Software Foundation; either version 2 of the License, or 9 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version. 10 (at your option) any later version.
9 11
10 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,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details. 15 GNU General Public License for more details.
14 16
15 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
16 along with this program; if not, write to the Free Software 18 along with gvpe; if not, write to the Free Software
17 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
18*/ 20*/
19 21
20#include "config.h" 22#include "config.h"
21 23
… …
33 35
34#include <openssl/err.h> 36#include <openssl/err.h>
35#include <openssl/pem.h> 37#include <openssl/pem.h>
36#include <openssl/rsa.h> 38#include <openssl/rsa.h>
37#include <openssl/rand.h> 39#include <openssl/rand.h>
38 40#include <openssl/bn.h>
39#include "gettext.h"
40 41
41#include "conf.h" 42#include "conf.h"
42#include "slog.h" 43#include "slog.h"
43#include "util.h" 44#include "util.h"
44 45
45char *confbase; 46char *confbase;
46char *thisnode; 47char *thisnode;
47char *identname; 48char *identname;
48char *pidfilename;
49 49
50struct configuration conf; 50struct configuration conf;
51 51
52u8 best_protocol (u8 protset) 52u8 best_protocol (u8 protset)
53{ 53{
54 if (protset & PROT_IPv4 ) return PROT_IPv4; 54 if (protset & PROT_IPv4 ) return PROT_IPv4;
55 if (protset & PROT_ICMPv4) return PROT_ICMPv4; 55 if (protset & PROT_ICMPv4) return PROT_ICMPv4;
56 if (protset & PROT_UDPv4 ) return PROT_UDPv4; 56 if (protset & PROT_UDPv4 ) return PROT_UDPv4;
57 if (protset & PROT_TCPv4 ) return PROT_TCPv4; 57 if (protset & PROT_TCPv4 ) return PROT_TCPv4;
58 if (protset & PROT_DNSv4 ) return PROT_DNSv4;
58 59
59 return 0; 60 return 0;
60} 61}
61 62
62const char *strprotocol (u8 protocol) 63const char *strprotocol (u8 protocol)
63{ 64{
64 if (protocol & PROT_IPv4 ) return "rawip"; 65 if (protocol & PROT_IPv4 ) return "rawip";
65 if (protocol & PROT_ICMPv4) return "icmp"; 66 if (protocol & PROT_ICMPv4) return "icmp";
66 if (protocol & PROT_UDPv4 ) return "udp"; 67 if (protocol & PROT_UDPv4 ) return "udp";
67 if (protocol & PROT_TCPv4 ) return "tcp"; 68 if (protocol & PROT_TCPv4 ) return "tcp";
69 if (protocol & PROT_DNSv4 ) return "dns";
68 70
69 return "<unknown>"; 71 return "<unknown>";
70} 72}
71 73
72void 74void
… …
91 if (rsa_key) 93 if (rsa_key)
92 RSA_free (rsa_key); 94 RSA_free (rsa_key);
93 95
94 free (nodename); 96 free (nodename);
95 free (hostname); 97 free (hostname);
98#if ENABLE_DNS
99 free (domain);
100 free (dns_hostname);
101#endif
96} 102}
97 103
98void configuration::init () 104void configuration::init ()
99{ 105{
100 memset (this, 0, sizeof (*this)); 106 memset (this, 0, sizeof (*this));
… …
107#if ENABLE_ICMP 113#if ENABLE_ICMP
108 icmp_type = ICMP_ECHOREPLY; 114 icmp_type = ICMP_ECHOREPLY;
109#endif 115#endif
110 116
111 default_node.udp_port = DEFAULT_UDPPORT; 117 default_node.udp_port = DEFAULT_UDPPORT;
112 default_node.tcp_port = DEFAULT_UDPPORT; 118 default_node.tcp_port = DEFAULT_UDPPORT; // ehrm
113 default_node.connectmode = conf_node::C_ALWAYS; 119 default_node.connectmode = conf_node::C_ALWAYS;
114 default_node.compress = true; 120 default_node.compress = true;
115 default_node.protocols = PROT_UDPv4; 121 default_node.protocols = 0;
122 default_node.max_retry = DEFAULT_MAX_RETRY;
123
124#if ENABLE_DNS
125 default_node.dns_port = 0; // default is 0 == client
126 dns_forw_host = strdup ("127.0.0.1");
127 dns_forw_port = 53;
128#endif
129
130 conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid");
116} 131}
117 132
118void configuration::cleanup() 133void configuration::cleanup()
119{ 134{
120 if (rsa_key) 135 if (rsa_key)
121 RSA_free (rsa_key); 136 RSA_free (rsa_key);
122 137
123 rsa_key = 0; 138 rsa_key = 0;
124 139
140 free (pidfilename); pidfilename = 0;
125 free (ifname); ifname = 0; 141 free (ifname); ifname = 0;
126#if ENABLE_HTTP_PROXY 142#if ENABLE_HTTP_PROXY
127 free (proxy_host); proxy_host = 0; 143 free (proxy_host); proxy_host = 0;
128 free (proxy_auth); proxy_auth = 0; 144 free (proxy_auth); proxy_auth = 0;
145#endif
146#if ENABLE_DNS
147 free (dns_forw_host); dns_forw_host = 0;
129#endif 148#endif
130} 149}
131 150
132void 151void
133configuration::clear_config () 152configuration::clear_config ()
… …
139 158
140 cleanup (); 159 cleanup ();
141 init (); 160 init ();
142} 161}
143 162
144#define parse_bool(target,name,trueval,falseval) \ 163#define parse_bool(target,name,trueval,falseval) do { \
145 if (!strcmp (val, "yes")) target = trueval; \ 164 if (!strcmp (val, "yes")) target = trueval; \
146 else if (!strcmp (val, "no")) target = falseval; \ 165 else if (!strcmp (val, "no")) target = falseval; \
147 else if (!strcmp (val, "true")) target = trueval; \ 166 else if (!strcmp (val, "true")) target = trueval; \
148 else if (!strcmp (val, "false")) target = falseval; \ 167 else if (!strcmp (val, "false")) target = falseval; \
149 else if (!strcmp (val, "on")) target = trueval; \ 168 else if (!strcmp (val, "on")) target = trueval; \
150 else if (!strcmp (val, "off")) target = falseval; \ 169 else if (!strcmp (val, "off")) target = falseval; \
151 else \ 170 else \
152 slog (L_WARN, \ 171 slog (L_WARN, \
153 _("illegal value for '%s', only 'yes|true|on' or 'no|false|off' allowed, at '%s' line %d"), \ 172 _("illegal value for '%s', only 'yes|true|on' or 'no|false|off' allowed, at '%s' line %d"), \
154 name, var, fname, lineno); 173 name, var, fname, lineno); \
174} while (0)
155 175
156void configuration::read_config (bool need_keys) 176void configuration::read_config (bool need_keys)
157{ 177{
158 char *fname; 178 char *fname;
159 FILE *f; 179 FILE *f;
160 180
161 clear_config (); 181 clear_config ();
162 182
163 asprintf (&fname, "%s/vped.conf", confbase); 183 asprintf (&fname, "%s/gvpe.conf", confbase);
164 f = fopen (fname, "r"); 184 f = fopen (fname, "r");
165 185
166 if (f) 186 if (f)
167 { 187 {
168 char line[16384]; 188 char line[16384];
… …
198 val = strtok (NULL, "\t\n\r ="); 218 val = strtok (NULL, "\t\n\r =");
199 219
200 if (!val || val[0] == '#') 220 if (!val || val[0] == '#')
201 { 221 {
202 slog (L_WARN, 222 slog (L_WARN,
203 _("no value for variable `%s', at '%s' line %d"), 223 _("no value for variable `%s', at '%s' line %d, skipping."),
204 var, fname, lineno); 224 var, fname, lineno);
205 break; 225 continue;
206 } 226 }
207 227
208 if (!strcmp (var, "on")) 228 if (!strcmp (var, "on"))
209 { 229 {
210 if (!::thisnode 230 if (!::thisnode
… …
258 278
259 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) 279 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
260 { 280 {
261 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 281 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
262 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 282 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
263 exit (1); 283 exit (EXIT_FAILURE);
264 } 284 }
265 285
266 RSA_blinding_on (node->rsa_key, 0); 286 require (RSA_blinding_on (node->rsa_key, 0));
267 287
268 fclose (f); 288 fclose (f);
269 } 289 }
270 else 290 else
271 { 291 {
272 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); 292 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
273 293
274 if (need_keys) 294 if (need_keys)
275 exit (1); 295 exit (EXIT_FAILURE);
276 } 296 }
277 297
278 free (fname); 298 free (fname);
279 } 299 }
280 300
281 if (!::thisnode || !strcmp (node->nodename, ::thisnode)) 301 if (::thisnode && !strcmp (node->nodename, ::thisnode))
282 thisnode = node; 302 thisnode = node;
283 } 303 }
284 else if (!strcmp (var, "private-key")) 304 else if (!strcmp (var, "private-key"))
285 prikeyfile = strdup (val); 305 free (prikeyfile), prikeyfile = strdup (val);
286 else if (!strcmp (var, "ifpersist")) 306 else if (!strcmp (var, "ifpersist"))
287 {
288 parse_bool (ifpersist, "ifpersist", true, false); 307 parse_bool (ifpersist, "ifpersist", true, false);
289 }
290 else if (!strcmp (var, "ifname")) 308 else if (!strcmp (var, "ifname"))
291 ifname = strdup (val); 309 free (ifname), ifname = strdup (val);
292 else if (!strcmp (var, "rekey")) 310 else if (!strcmp (var, "rekey"))
293 rekey = atoi (val); 311 rekey = atoi (val);
294 else if (!strcmp (var, "keepalive")) 312 else if (!strcmp (var, "keepalive"))
295 keepalive = atoi (val); 313 keepalive = atoi (val);
296 else if (!strcmp (var, "mtu")) 314 else if (!strcmp (var, "mtu"))
297 mtu = atoi (val); 315 mtu = atoi (val);
298 else if (!strcmp (var, "if-up")) 316 else if (!strcmp (var, "if-up"))
299 script_if_up = strdup (val); 317 free (script_if_up), script_if_up = strdup (val);
300 else if (!strcmp (var, "node-up")) 318 else if (!strcmp (var, "node-up"))
301 script_node_up = strdup (val); 319 free (script_node_up), script_node_up = strdup (val);
302 else if (!strcmp (var, "node-down")) 320 else if (!strcmp (var, "node-down"))
303 script_node_down = strdup (val); 321 free (script_node_down), script_node_down = strdup (val);
322 else if (!strcmp (var, "pid-file"))
323 free (pidfilename), pidfilename = strdup (val);
324 else if (!strcmp (var, "dns-forw-host"))
325 {
326#if ENABLE_DNS
327 free (dns_forw_host), dns_forw_host = strdup (val);
328#endif
329 }
330 else if (!strcmp (var, "dns-forw-port"))
331 {
332#if ENABLE_DNS
333 dns_forw_port = atoi (val);
334#endif
335 }
304 else if (!strcmp (var, "http-proxy-host")) 336 else if (!strcmp (var, "http-proxy-host"))
305 { 337 {
306#if ENABLE_HTTP_PROXY 338#if ENABLE_HTTP_PROXY
307 proxy_host = strdup (val); 339 free (proxy_host), proxy_host = strdup (val);
308#endif 340#endif
309 } 341 }
310 else if (!strcmp (var, "http-proxy-port")) 342 else if (!strcmp (var, "http-proxy-port"))
311 { 343 {
312#if ENABLE_HTTP_PROXY 344#if ENABLE_HTTP_PROXY
… …
320#endif 352#endif
321 } 353 }
322 354
323 /* node-specific, non-defaultable */ 355 /* node-specific, non-defaultable */
324 else if (node != &default_node && !strcmp (var, "hostname")) 356 else if (node != &default_node && !strcmp (var, "hostname"))
325 {
326 free (node->hostname);
327 node->hostname = strdup (val); 357 free (node->hostname), node->hostname = strdup (val);
328 }
329 358
330 /* node-specific, defaultable */ 359 /* node-specific, defaultable */
331 else if (!strcmp (var, "udp-port")) 360 else if (!strcmp (var, "udp-port"))
332 node->udp_port = atoi (val); 361 node->udp_port = atoi (val);
333 else if (!strcmp (var, "tcp-port")) 362 else if (!strcmp (var, "tcp-port"))
334 node->tcp_port = atoi (val); 363 node->tcp_port = atoi (val);
364 else if (!strcmp (var, "dns-hostname"))
365 {
366#if ENABLE_DNS
367 free (node->dns_hostname), node->dns_hostname = strdup (val);
368#endif
369 }
370 else if (!strcmp (var, "dns-port"))
371 {
372#if ENABLE_DNS
373 node->dns_port = atoi (val);
374#endif
375 }
376 else if (!strcmp (var, "dns-domain"))
377 {
378#if ENABLE_DNS
379 free (node->domain), node->domain = strdup (val);
380#endif
381 }
335 else if (!strcmp (var, "router-priority")) 382 else if (!strcmp (var, "router-priority"))
336 node->routerprio = atoi (val); 383 node->routerprio = atoi (val);
384 else if (!strcmp (var, "max-retry"))
385 node->max_retry = atoi (val);
337 else if (!strcmp (var, "connect")) 386 else if (!strcmp (var, "connect"))
338 { 387 {
339 if (!strcmp (val, "ondemand")) 388 if (!strcmp (val, "ondemand"))
340 node->connectmode = conf_node::C_ONDEMAND; 389 node->connectmode = conf_node::C_ONDEMAND;
341 else if (!strcmp (val, "never")) 390 else if (!strcmp (val, "never"))
… …
344 node->connectmode = conf_node::C_ALWAYS; 393 node->connectmode = conf_node::C_ALWAYS;
345 else if (!strcmp (val, "disabled")) 394 else if (!strcmp (val, "disabled"))
346 node->connectmode = conf_node::C_DISABLED; 395 node->connectmode = conf_node::C_DISABLED;
347 else 396 else
348 slog (L_WARN, 397 slog (L_WARN,
349 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"), 398 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d, ignoring."),
350 var, fname, lineno); 399 var, fname, lineno);
351 } 400 }
352 else if (!strcmp (var, "inherit-tos")) 401 else if (!strcmp (var, "inherit-tos"))
353 {
354 parse_bool (node->inherit_tos, "inherit-tos", true, false); 402 parse_bool (node->inherit_tos, "inherit-tos", true, false);
355 }
356 else if (!strcmp (var, "compress")) 403 else if (!strcmp (var, "compress"))
357 {
358 parse_bool (node->compress, "compress", true, false); 404 parse_bool (node->compress, "compress", true, false);
359 }
360 // all these bool options really really cost a lot of executable size! 405 // all these bool options really really cost a lot of executable size!
361 else if (!strcmp (var, "enable-tcp")) 406 else if (!strcmp (var, "enable-tcp"))
362 { 407 {
363#if ENABLE_TCP 408#if ENABLE_TCP
364 u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v; 409 u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v;
… …
366 } 411 }
367 else if (!strcmp (var, "enable-icmp")) 412 else if (!strcmp (var, "enable-icmp"))
368 { 413 {
369#if ENABLE_ICMP 414#if ENABLE_ICMP
370 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v; 415 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v;
416#endif
417 }
418 else if (!strcmp (var, "enable-dns"))
419 {
420#if ENABLE_DNS
421 u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v;
371#endif 422#endif
372 } 423 }
373 else if (!strcmp (var, "enable-udp")) 424 else if (!strcmp (var, "enable-udp"))
374 { 425 {
375 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; 426 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
… …
380 } 431 }
381 432
382 // unknown or misplaced 433 // unknown or misplaced
383 else 434 else
384 slog (L_WARN, 435 slog (L_WARN,
385 _("unknown or misplaced variable `%s', at '%s' line %d"), 436 _("unknown or misplaced variable `%s', at '%s' line %d, skipping."),
386 var, fname, lineno); 437 var, fname, lineno);
387 } 438 }
388 439
389 fclose (f); 440 fclose (f);
390 } 441 }
391 else 442 else
392 { 443 {
393 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); 444 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
394 exit (1); 445 exit (EXIT_FAILURE);
395 } 446 }
396 447
397 free (fname); 448 free (fname);
398 449
399 fname = config_filename (prikeyfile, "hostkey"); 450 fname = config_filename (prikeyfile, "hostkey");
… …
405 456
406 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) 457 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
407 { 458 {
408 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 459 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
409 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 460 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
410 exit (1); 461 exit (EXIT_FAILURE);
411 } 462 }
412 463
413 RSA_blinding_on (rsa_key, 0); 464 require (RSA_blinding_on (rsa_key, 0));
414 465
415 fclose (f); 466 fclose (f);
416 } 467 }
417 else 468 else
418 { 469 {
419 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); 470 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
420 471
421 if (need_keys) 472 if (need_keys)
422 exit (1); 473 exit (EXIT_FAILURE);
423 } 474 }
475
476 if (need_keys && ::thisnode
477 && rsa_key && thisnode && thisnode->rsa_key)
478 if (BN_cmp (rsa_key->n, thisnode->rsa_key->n) != 0
479 || BN_cmp (rsa_key->e, thisnode->rsa_key->e) != 0)
480 {
481 slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode);
482 exit (EXIT_FAILURE);
483 }
424 484
425 free (fname); 485 free (fname);
426} 486}
427 487
428char *configuration::config_filename (const char *name, const char *dflt) 488char *configuration::config_filename (const char *name, const char *dflt)
… …
464 printf ("\n"); 524 printf ("\n");
465} 525}
466 526
467configuration::configuration () 527configuration::configuration ()
468{ 528{
529 asprintf (&confbase, "%s/gvpe", CONFDIR);
530
469 init (); 531 init ();
470} 532}
471 533
472configuration::~configuration () 534configuration::~configuration ()
473{ 535{

Diff Legend

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