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.17 by pcg, Tue Oct 14 15:48:15 2003 UTC vs.
Revision 1.27 by pcg, Fri Jun 11 15:56:31 2004 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.
… …
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 ) return PROT_IPv4; 54 if (protset & PROT_IPv4 ) return PROT_IPv4;
59 if (protset & PROT_ICMPv4) return PROT_ICMPv4; 55 if (protset & PROT_ICMPv4) return PROT_ICMPv4;
60 if (protset & PROT_UDPv4 ) return PROT_UDPv4; 56 if (protset & PROT_UDPv4 ) return PROT_UDPv4;
61 if (protset & PROT_TCPv4 ) return PROT_TCPv4; 57 if (protset & PROT_TCPv4 ) return PROT_TCPv4;
58 if (protset & PROT_DNSv4 ) return PROT_DNSv4;
62 59
63 return 0; 60 return 0;
64} 61}
65 62
66const char *strprotocol (u8 protocol) 63const char *strprotocol (u8 protocol)
67{ 64{
68 if (protocol & PROT_IPv4 ) return "rawip"; 65 if (protocol & PROT_IPv4 ) return "rawip";
69 if (protocol & PROT_ICMPv4) return "icmp"; 66 if (protocol & PROT_ICMPv4) return "icmp";
70 if (protocol & PROT_UDPv4 ) return "udp"; 67 if (protocol & PROT_UDPv4 ) return "udp";
71 if (protocol & PROT_TCPv4 ) return "tcp"; 68 if (protocol & PROT_TCPv4 ) return "tcp";
69 if (protocol & PROT_DNSv4 ) return "dns";
72 70
73 return "<unknown>"; 71 return "<unknown>";
74} 72}
75 73
76void 74void
… …
101 99
102void configuration::init () 100void configuration::init ()
103{ 101{
104 memset (this, 0, sizeof (*this)); 102 memset (this, 0, sizeof (*this));
105 103
104 mtu = DEFAULT_MTU;
106 rekey = DEFAULT_REKEY; 105 rekey = DEFAULT_REKEY;
107 keepalive = DEFAULT_KEEPALIVE; 106 keepalive = DEFAULT_KEEPALIVE;
108 llevel = L_INFO; 107 llevel = L_INFO;
109 ip_proto = IPPROTO_GRE; 108 ip_proto = IPPROTO_GRE;
110#if ENABLE_ICMP 109#if ENABLE_ICMP
111 icmp_type = ICMP_ECHOREPLY; 110 icmp_type = ICMP_ECHOREPLY;
112#endif 111#endif
113 112
114 default_node.udp_port = DEFAULT_UDPPORT; 113 default_node.udp_port = DEFAULT_UDPPORT;
115 default_node.tcp_port = DEFAULT_UDPPORT; 114 default_node.tcp_port = DEFAULT_UDPPORT; // ehrm
116 default_node.connectmode = conf_node::C_ALWAYS; 115 default_node.connectmode = conf_node::C_ALWAYS;
117 default_node.compress = true; 116 default_node.compress = true;
118 default_node.protocols = PROT_UDPv4; 117 default_node.protocols = PROT_UDPv4;
118 default_node.max_retry = DEFAULT_MAX_RETRY;
119
120 conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid");
119} 121}
120 122
121void configuration::cleanup() 123void configuration::cleanup()
122{ 124{
123 if (rsa_key) 125 if (rsa_key)
124 RSA_free (rsa_key); 126 RSA_free (rsa_key);
125 127
126 rsa_key = 0; 128 rsa_key = 0;
127 129
130 free (pidfilename); pidfilename = 0;
128 free (ifname); ifname = 0; 131 free (ifname); ifname = 0;
129#if ENABLE_HTTP_PROXY 132#if ENABLE_HTTP_PROXY
130 free (proxy_host); proxy_host = 0; 133 free (proxy_host); proxy_host = 0;
131 free (proxy_auth); proxy_auth = 0; 134 free (proxy_auth); proxy_auth = 0;
132#endif 135#endif
133} 136}
134 137
135void 138void
136configuration::clear_config () 139configuration::clear_config ()
… …
161 char *fname; 164 char *fname;
162 FILE *f; 165 FILE *f;
163 166
164 clear_config (); 167 clear_config ();
165 168
166 asprintf (&fname, "%s/vped.conf", confbase); 169 asprintf (&fname, "%s/gvpe.conf", confbase);
167 f = fopen (fname, "r"); 170 f = fopen (fname, "r");
168 171
169 if (f) 172 if (f)
170 { 173 {
171 char line[16384]; 174 char line[16384];
… …
228 else 231 else
229 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line); 232 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
230 } 233 }
231 else if (!strcmp (var, "ip-proto")) 234 else if (!strcmp (var, "ip-proto"))
232 ip_proto = atoi (val); 235 ip_proto = atoi (val);
236 else if (!strcmp (var, "icmp-type"))
237 {
233#if ENABLE_ICMP 238#if ENABLE_ICMP
234 //TODO: error message
235 else if (!strcmp (var, "icmp-type"))
236 icmp_type = atoi (val); 239 icmp_type = atoi (val);
237#endif 240#endif
241 }
238 242
239 // per config 243 // per config
240 else if (!strcmp (var, "node")) 244 else if (!strcmp (var, "node"))
241 { 245 {
242 default_node.id++; 246 default_node.id++;
… …
260 264
261 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) 265 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
262 { 266 {
263 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 267 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
264 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 268 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
265 exit (1); 269 exit (EXIT_FAILURE);
266 } 270 }
267 271
268 RSA_blinding_on (node->rsa_key, 0); 272 require (RSA_blinding_on (node->rsa_key, 0));
269 273
270 fclose (f); 274 fclose (f);
271 } 275 }
272 else 276 else
273 { 277 {
274 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); 278 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
275 279
276 if (need_keys) 280 if (need_keys)
277 exit (1); 281 exit (EXIT_FAILURE);
278 } 282 }
279 283
280 free (fname); 284 free (fname);
281 } 285 }
282 286
283 if (!::thisnode || !strcmp (node->nodename, ::thisnode)) 287 if (::thisnode && !strcmp (node->nodename, ::thisnode))
284 thisnode = node; 288 thisnode = node;
285 } 289 }
286 else if (!strcmp (var, "private-key")) 290 else if (!strcmp (var, "private-key"))
287 prikeyfile = strdup (val); 291 free (prikeyfile), prikeyfile = strdup (val);
288 else if (!strcmp (var, "ifpersist")) 292 else if (!strcmp (var, "ifpersist"))
289 { 293 {
290 parse_bool (ifpersist, "ifpersist", true, false); 294 parse_bool (ifpersist, "ifpersist", true, false);
291 } 295 }
292 else if (!strcmp (var, "ifname")) 296 else if (!strcmp (var, "ifname"))
293 ifname = strdup (val); 297 free (ifname), ifname = strdup (val);
294 else if (!strcmp (var, "rekey")) 298 else if (!strcmp (var, "rekey"))
295 rekey = atoi (val); 299 rekey = atoi (val);
296 else if (!strcmp (var, "keepalive")) 300 else if (!strcmp (var, "keepalive"))
297 keepalive = atoi (val); 301 keepalive = atoi (val);
298 else if (!strcmp (var, "mtu")) 302 else if (!strcmp (var, "mtu"))
299 mtu = atoi (val); 303 mtu = atoi (val);
300 else if (!strcmp (var, "if-up")) 304 else if (!strcmp (var, "if-up"))
301 script_if_up = strdup (val); 305 free (script_if_up), script_if_up = strdup (val);
302 else if (!strcmp (var, "node-up")) 306 else if (!strcmp (var, "node-up"))
303 script_node_up = strdup (val); 307 free (script_node_up), script_node_up = strdup (val);
304 else if (!strcmp (var, "node-down")) 308 else if (!strcmp (var, "node-down"))
305 script_node_down = strdup (val); 309 free (script_node_down), script_node_down = strdup (val);
310 else if (!strcmp (var, "pid-file"))
311 free (pidfilename), pidfilename = strdup (val);
312 else if (!strcmp (var, "http-proxy-host"))
313 {
306#if ENABLE_HTTP_PROXY 314#if ENABLE_HTTP_PROXY
307 else if (!strcmp (var, "http-proxy-host"))
308 proxy_host = strdup (val); 315 free (proxy_host), proxy_host = strdup (val);
316#endif
317 }
309 else if (!strcmp (var, "http-proxy-port")) 318 else if (!strcmp (var, "http-proxy-port"))
319 {
320#if ENABLE_HTTP_PROXY
310 proxy_port = atoi (val); 321 proxy_port = atoi (val);
322#endif
323 }
311 else if (!strcmp (var, "http-proxy-auth")) 324 else if (!strcmp (var, "http-proxy-auth"))
325 {
326#if ENABLE_HTTP_PROXY
312 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val)); 327 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val));
313#endif 328#endif
329 }
314 330
315 /* node-specific, non-defaultable */ 331 /* node-specific, non-defaultable */
316 else if (node != &default_node && !strcmp (var, "hostname")) 332 else if (node != &default_node && !strcmp (var, "hostname"))
317 {
318 free (node->hostname);
319 node->hostname = strdup (val); 333 free (node->hostname), node->hostname = strdup (val);
320 }
321 334
322 /* node-specific, defaultable */ 335 /* node-specific, defaultable */
323 else if (!strcmp (var, "udp-port")) 336 else if (!strcmp (var, "udp-port"))
324 node->udp_port = atoi (val); 337 node->udp_port = atoi (val);
325 else if (!strcmp (var, "tcp-port")) 338 else if (!strcmp (var, "tcp-port"))
326 node->tcp_port = atoi (val); 339 node->tcp_port = atoi (val);
340 else if (!strcmp (var, "dns-port"))
341 node->dns_port = atoi (val);
327 else if (!strcmp (var, "router-priority")) 342 else if (!strcmp (var, "router-priority"))
328 node->routerprio = atoi (val); 343 node->routerprio = atoi (val);
344 else if (!strcmp (var, "max-retry"))
345 node->max_retry = atoi (val);
329 else if (!strcmp (var, "connect")) 346 else if (!strcmp (var, "connect"))
330 { 347 {
331 if (!strcmp (val, "ondemand")) 348 if (!strcmp (val, "ondemand"))
332 node->connectmode = conf_node::C_ONDEMAND; 349 node->connectmode = conf_node::C_ONDEMAND;
333 else if (!strcmp (val, "never")) 350 else if (!strcmp (val, "never"))
… …
336 node->connectmode = conf_node::C_ALWAYS; 353 node->connectmode = conf_node::C_ALWAYS;
337 else if (!strcmp (val, "disabled")) 354 else if (!strcmp (val, "disabled"))
338 node->connectmode = conf_node::C_DISABLED; 355 node->connectmode = conf_node::C_DISABLED;
339 else 356 else
340 slog (L_WARN, 357 slog (L_WARN,
341 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"), 358 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
342 var, fname, lineno); 359 var, fname, lineno);
343 } 360 }
344 else if (!strcmp (var, "inherit-tos")) 361 else if (!strcmp (var, "inherit-tos"))
345 { 362 {
346 parse_bool (node->inherit_tos, "inherit-tos", true, false); 363 parse_bool (node->inherit_tos, "inherit-tos", true, false);
347 } 364 }
… …
360 { 377 {
361#if ENABLE_ICMP 378#if ENABLE_ICMP
362 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v; 379 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v;
363#endif 380#endif
364 } 381 }
382 else if (!strcmp (var, "enable-dns"))
383 {
384#if ENABLE_DNS
385 u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v;
386#endif
387 }
365 else if (!strcmp (var, "enable-udp")) 388 else if (!strcmp (var, "enable-udp"))
366 { 389 {
367 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; 390 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
368 } 391 }
369 else if (!strcmp (var, "enable-rawip")) 392 else if (!strcmp (var, "enable-rawip"))
370 { 393 {;
371 u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v; 394 u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v;
372 } 395 }
373 396
374 // unknown or misplaced 397 // unknown or misplaced
375 else 398 else
… …
381 fclose (f); 404 fclose (f);
382 } 405 }
383 else 406 else
384 { 407 {
385 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); 408 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
386 exit (1); 409 exit (EXIT_FAILURE);
387 } 410 }
388 411
389 free (fname); 412 free (fname);
390 413
391 fname = config_filename (prikeyfile, "hostkey"); 414 fname = config_filename (prikeyfile, "hostkey");
… …
397 420
398 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) 421 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
399 { 422 {
400 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 423 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
401 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 424 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
402 exit (1); 425 exit (EXIT_FAILURE);
403 } 426 }
404 427
405 RSA_blinding_on (rsa_key, 0); 428 require (RSA_blinding_on (rsa_key, 0));
406 429
407 fclose (f); 430 fclose (f);
408 } 431 }
409 else 432 else
410 { 433 {
411 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); 434 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
412 435
413 if (need_keys) 436 if (need_keys)
414 exit (1); 437 exit (EXIT_FAILURE);
415 } 438 }
439
440 if (need_keys && ::thisnode
441 && rsa_key && thisnode && thisnode->rsa_key)
442 if (BN_cmp (rsa_key->n, thisnode->rsa_key->n) != 0
443 || BN_cmp (rsa_key->e, thisnode->rsa_key->e) != 0)
444 {
445 slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode);
446 exit (EXIT_FAILURE);
447 }
416 448
417 free (fname); 449 free (fname);
418} 450}
419 451
420char *configuration::config_filename (const char *name, const char *dflt) 452char *configuration::config_filename (const char *name, const char *dflt)
… …
456 printf ("\n"); 488 printf ("\n");
457} 489}
458 490
459configuration::configuration () 491configuration::configuration ()
460{ 492{
493 asprintf (&confbase, "%s/gvpe", CONFDIR);
494
461 init (); 495 init ();
462} 496}
463 497
464configuration::~configuration () 498configuration::~configuration ()
465{ 499{

Diff Legend

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