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.12 by pcg, Mon Apr 7 01:12:56 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 ) return PROT_IPv4; 54 if (protset & PROT_IPv4 ) return PROT_IPv4;
55 if (protset & PROT_ICMPv4) return PROT_ICMPv4;
59 if (protset & PROT_UDPv4) return PROT_UDPv4; 56 if (protset & PROT_UDPv4 ) return PROT_UDPv4;
60 if (protset & PROT_TCPv4) return PROT_TCPv4; 57 if (protset & PROT_TCPv4 ) return PROT_TCPv4;
58 if (protset & PROT_DNSv4 ) return PROT_DNSv4;
61 59
62 return 0; 60 return 0;
63} 61}
64 62
65const char *strprotocol (u8 protocol) 63const char *strprotocol (u8 protocol)
66{ 64{
67 if (protocol & PROT_IPv4 ) return "rawip"; 65 if (protocol & PROT_IPv4 ) return "rawip";
66 if (protocol & PROT_ICMPv4) return "icmp";
68 if (protocol & PROT_UDPv4) return "udp"; 67 if (protocol & PROT_UDPv4 ) return "udp";
69 if (protocol & PROT_TCPv4) return "tcp"; 68 if (protocol & PROT_TCPv4 ) return "tcp";
69 if (protocol & PROT_DNSv4 ) return "dns";
70 70
71 return "<unknown>"; 71 return "<unknown>";
72} 72}
73 73
74void 74void
93 if (rsa_key) 93 if (rsa_key)
94 RSA_free (rsa_key); 94 RSA_free (rsa_key);
95 95
96 free (nodename); 96 free (nodename);
97 free (hostname); 97 free (hostname);
98#if ENABLE_DNS
99 free (domain);
100 free (dns_hostname);
101#endif
98} 102}
99 103
100void configuration::init () 104void configuration::init ()
101{ 105{
102 memset (this, 0, sizeof (*this)); 106 memset (this, 0, sizeof (*this));
103 107
108 mtu = DEFAULT_MTU;
104 rekey = DEFAULT_REKEY; 109 rekey = DEFAULT_REKEY;
105 keepalive = DEFAULT_KEEPALIVE; 110 keepalive = DEFAULT_KEEPALIVE;
106 llevel = L_INFO; 111 llevel = L_INFO;
107 ip_proto = IPPROTO_GRE; 112 ip_proto = IPPROTO_GRE;
113#if ENABLE_ICMP
114 icmp_type = ICMP_ECHOREPLY;
115#endif
108 116
109 default_node.udp_port = DEFAULT_UDPPORT; 117 default_node.udp_port = DEFAULT_UDPPORT;
110 default_node.tcp_port = DEFAULT_UDPPORT; 118 default_node.tcp_port = DEFAULT_UDPPORT; // ehrm
111 default_node.connectmode = conf_node::C_ALWAYS; 119 default_node.connectmode = conf_node::C_ALWAYS;
112 default_node.compress = true; 120 default_node.compress = true;
113 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 = 53;
126 dns_forw_port = 53;
127#endif
128
129 conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid");
114} 130}
115 131
116void configuration::cleanup() 132void configuration::cleanup()
117{ 133{
118 if (rsa_key) 134 if (rsa_key)
119 RSA_free (rsa_key); 135 RSA_free (rsa_key);
120 136
121 rsa_key = 0; 137 rsa_key = 0;
122 138
139 free (pidfilename); pidfilename = 0;
123 free (ifname); ifname = 0; 140 free (ifname); ifname = 0;
124#if ENABLE_HTTP_PROXY 141#if ENABLE_HTTP_PROXY
125 free (proxy_host); proxy_host = 0; 142 free (proxy_host); proxy_host = 0;
126 free (proxy_auth); proxy_auth = 0; 143 free (proxy_auth); proxy_auth = 0;
144#endif
145#if ENABLE_DNS
146 free (dns_forw_host); dns_forw_host = 0;
127#endif 147#endif
128} 148}
129 149
130void 150void
131configuration::clear_config () 151configuration::clear_config ()
156 char *fname; 176 char *fname;
157 FILE *f; 177 FILE *f;
158 178
159 clear_config (); 179 clear_config ();
160 180
161 asprintf (&fname, "%s/vped.conf", confbase); 181 asprintf (&fname, "%s/gvpe.conf", confbase);
162 f = fopen (fname, "r"); 182 f = fopen (fname, "r");
163 183
164 if (f) 184 if (f)
165 { 185 {
166 char line[16384]; 186 char line[16384];
223 else 243 else
224 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line); 244 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
225 } 245 }
226 else if (!strcmp (var, "ip-proto")) 246 else if (!strcmp (var, "ip-proto"))
227 ip_proto = atoi (val); 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 }
228 254
229 // per config 255 // per config
230 else if (!strcmp (var, "node")) 256 else if (!strcmp (var, "node"))
231 { 257 {
232 default_node.id++; 258 default_node.id++;
250 276
251 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) 277 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
252 { 278 {
253 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 279 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
254 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 280 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
255 exit (1); 281 exit (EXIT_FAILURE);
256 } 282 }
257 283
258 RSA_blinding_on (node->rsa_key, 0); 284 require (RSA_blinding_on (node->rsa_key, 0));
259 285
260 fclose (f); 286 fclose (f);
261 } 287 }
262 else 288 else
263 { 289 {
264 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); 290 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
265 291
266 if (need_keys) 292 if (need_keys)
267 exit (1); 293 exit (EXIT_FAILURE);
268 } 294 }
269 295
270 free (fname); 296 free (fname);
271 } 297 }
272 298
273 if (!::thisnode || !strcmp (node->nodename, ::thisnode)) 299 if (::thisnode && !strcmp (node->nodename, ::thisnode))
274 thisnode = node; 300 thisnode = node;
275 } 301 }
276 else if (!strcmp (var, "private-key")) 302 else if (!strcmp (var, "private-key"))
277 prikeyfile = strdup (val); 303 free (prikeyfile), prikeyfile = strdup (val);
278 else if (!strcmp (var, "ifpersist")) 304 else if (!strcmp (var, "ifpersist"))
279 { 305 {
280 parse_bool (ifpersist, "ifpersist", true, false); 306 parse_bool (ifpersist, "ifpersist", true, false);
281 } 307 }
282 else if (!strcmp (var, "ifname")) 308 else if (!strcmp (var, "ifname"))
283 ifname = strdup (val); 309 free (ifname), ifname = strdup (val);
284 else if (!strcmp (var, "rekey")) 310 else if (!strcmp (var, "rekey"))
285 rekey = atoi (val); 311 rekey = atoi (val);
286 else if (!strcmp (var, "keepalive")) 312 else if (!strcmp (var, "keepalive"))
287 keepalive = atoi (val); 313 keepalive = atoi (val);
288 else if (!strcmp (var, "mtu")) 314 else if (!strcmp (var, "mtu"))
289 mtu = atoi (val); 315 mtu = atoi (val);
290 else if (!strcmp (var, "if-up")) 316 else if (!strcmp (var, "if-up"))
291 script_if_up = strdup (val); 317 free (script_if_up), script_if_up = strdup (val);
292 else if (!strcmp (var, "node-up")) 318 else if (!strcmp (var, "node-up"))
293 script_node_up = strdup (val); 319 free (script_node_up), script_node_up = strdup (val);
294 else if (!strcmp (var, "node-down")) 320 else if (!strcmp (var, "node-down"))
295 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#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 {
296#if ENABLE_HTTP_PROXY 332#if ENABLE_HTTP_PROXY
297 else if (!strcmp (var, "http-proxy-host"))
298 proxy_host = strdup (val); 333 free (proxy_host), proxy_host = strdup (val);
334#endif
335 }
299 else if (!strcmp (var, "http-proxy-port")) 336 else if (!strcmp (var, "http-proxy-port"))
337 {
338#if ENABLE_HTTP_PROXY
300 proxy_port = atoi (val); 339 proxy_port = atoi (val);
340#endif
341 }
301 else if (!strcmp (var, "http-proxy-auth")) 342 else if (!strcmp (var, "http-proxy-auth"))
343 {
344#if ENABLE_HTTP_PROXY
302 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val)); 345 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val));
303#endif 346#endif
347 }
304 348
305 /* node-specific, non-defaultable */ 349 /* node-specific, non-defaultable */
306 else if (node != &default_node && !strcmp (var, "hostname")) 350 else if (node != &default_node && !strcmp (var, "hostname"))
307 {
308 free (node->hostname);
309 node->hostname = strdup (val); 351 free (node->hostname), node->hostname = strdup (val);
310 }
311 352
312 /* node-specific, defaultable */ 353 /* node-specific, defaultable */
313 else if (!strcmp (var, "udp-port")) 354 else if (!strcmp (var, "udp-port"))
314 node->udp_port = atoi (val); 355 node->udp_port = atoi (val);
315 else if (!strcmp (var, "tcp-port")) 356 else if (!strcmp (var, "tcp-port"))
316 node->tcp_port = atoi (val); 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 }
317 else if (!strcmp (var, "router-priority")) 370 else if (!strcmp (var, "router-priority"))
318 node->routerprio = atoi (val); 371 node->routerprio = atoi (val);
372 else if (!strcmp (var, "max-retry"))
373 node->max_retry = atoi (val);
319 else if (!strcmp (var, "connect")) 374 else if (!strcmp (var, "connect"))
320 { 375 {
321 if (!strcmp (val, "ondemand")) 376 if (!strcmp (val, "ondemand"))
322 node->connectmode = conf_node::C_ONDEMAND; 377 node->connectmode = conf_node::C_ONDEMAND;
323 else if (!strcmp (val, "never")) 378 else if (!strcmp (val, "never"))
326 node->connectmode = conf_node::C_ALWAYS; 381 node->connectmode = conf_node::C_ALWAYS;
327 else if (!strcmp (val, "disabled")) 382 else if (!strcmp (val, "disabled"))
328 node->connectmode = conf_node::C_DISABLED; 383 node->connectmode = conf_node::C_DISABLED;
329 else 384 else
330 slog (L_WARN, 385 slog (L_WARN,
331 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"), 386 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
332 var, fname, lineno); 387 var, fname, lineno);
333 } 388 }
334 else if (!strcmp (var, "inherit-tos")) 389 else if (!strcmp (var, "inherit-tos"))
335 { 390 {
336 parse_bool (node->inherit_tos, "inherit-tos", true, false); 391 parse_bool (node->inherit_tos, "inherit-tos", true, false);
337 } 392 }
342 // all these bool options really really cost a lot of executable size! 397 // all these bool options really really cost a lot of executable size!
343 else if (!strcmp (var, "enable-tcp")) 398 else if (!strcmp (var, "enable-tcp"))
344 { 399 {
345#if ENABLE_TCP 400#if ENABLE_TCP
346 u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v; 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;
347#endif 414#endif
348 } 415 }
349 else if (!strcmp (var, "enable-udp")) 416 else if (!strcmp (var, "enable-udp"))
350 { 417 {
351 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; 418 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
365 fclose (f); 432 fclose (f);
366 } 433 }
367 else 434 else
368 { 435 {
369 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); 436 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
370 exit (1); 437 exit (EXIT_FAILURE);
371 } 438 }
372 439
373 free (fname); 440 free (fname);
374 441
375 fname = config_filename (prikeyfile, "hostkey"); 442 fname = config_filename (prikeyfile, "hostkey");
381 448
382 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) 449 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
383 { 450 {
384 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 451 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
385 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 452 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
386 exit (1); 453 exit (EXIT_FAILURE);
387 } 454 }
388 455
389 RSA_blinding_on (rsa_key, 0); 456 require (RSA_blinding_on (rsa_key, 0));
390 457
391 fclose (f); 458 fclose (f);
392 } 459 }
393 else 460 else
394 { 461 {
395 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); 462 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
396 463
397 if (need_keys) 464 if (need_keys)
398 exit (1); 465 exit (EXIT_FAILURE);
399 } 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 }
400 476
401 free (fname); 477 free (fname);
402} 478}
403 479
404char *configuration::config_filename (const char *name, const char *dflt) 480char *configuration::config_filename (const char *name, const char *dflt)
426 printf (_("MTU: %d\n"), mtu); 502 printf (_("MTU: %d\n"), mtu);
427 printf (_("rekeying interval: %d\n"), rekey); 503 printf (_("rekeying interval: %d\n"), rekey);
428 printf (_("keepalive interval: %d\n"), keepalive); 504 printf (_("keepalive interval: %d\n"), keepalive);
429 printf (_("interface: %s\n"), ifname); 505 printf (_("interface: %s\n"), ifname);
430 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>"); 506 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
431 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) : -1); 507 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1);
432 printf ("\n"); 508 printf ("\n");
433 509
434 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n", 510 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",
435 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port")); 511 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));
436 512
440 printf ("\n"); 516 printf ("\n");
441} 517}
442 518
443configuration::configuration () 519configuration::configuration ()
444{ 520{
521 asprintf (&confbase, "%s/gvpe", CONFDIR);
522
445 init (); 523 init ();
446} 524}
447 525
448configuration::~configuration () 526configuration::~configuration ()
449{ 527{

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines