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.25 by pcg, Mon May 10 20:13:09 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.
… …
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} 72}
71 73
72configuration::configuration () 74void
75conf_node::print ()
73{ 76{
74 init (); 77 printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %s%s%d\n",
78 id,
79 id >> 8, id & 0xff,
80 compress ? 'Y' : 'N',
81 connectmode == C_ONDEMAND ? "ondemand" :
82 connectmode == C_NEVER ? "never" :
83 connectmode == C_ALWAYS ? "always" : "",
84 nodename,
85 hostname ? hostname : "",
86 hostname ? ":" : "",
87 hostname ? udp_port : 0
88 );
75} 89}
76 90
77configuration::~configuration () 91conf_node::~conf_node ()
78{ 92{
79 cleanup (); 93 if (rsa_key)
94 RSA_free (rsa_key);
95
96 free (nodename);
97 free (hostname);
80} 98}
81 99
82void configuration::init () 100void configuration::init ()
83{ 101{
102 asprintf (&confbase, "%s/vpe", CONFDIR);
103
84 memset (this, 0, sizeof (*this)); 104 memset (this, 0, sizeof (*this));
85 105
106 mtu = DEFAULT_MTU;
86 rekey = DEFAULT_REKEY; 107 rekey = DEFAULT_REKEY;
87 keepalive = DEFAULT_KEEPALIVE; 108 keepalive = DEFAULT_KEEPALIVE;
88 llevel = L_INFO; 109 llevel = L_INFO;
89 ip_proto = IPPROTO_GRE; 110 ip_proto = IPPROTO_GRE;
111#if ENABLE_ICMP
112 icmp_type = ICMP_ECHOREPLY;
113#endif
90 114
91 default_node.udp_port = DEFAULT_UDPPORT; 115 default_node.udp_port = DEFAULT_UDPPORT;
92 default_node.tcp_port = DEFAULT_UDPPORT; 116 default_node.tcp_port = DEFAULT_UDPPORT; // ehrm
93 default_node.connectmode = conf_node::C_ALWAYS; 117 default_node.connectmode = conf_node::C_ALWAYS;
94 default_node.compress = true; 118 default_node.compress = true;
95 default_node.protocols = PROT_UDPv4; 119 default_node.protocols = PROT_UDPv4;
120
121 conf.pidfilename = strdup (LOCALSTATEDIR "/run/vped.pid");
96} 122}
97 123
98void configuration::cleanup() 124void configuration::cleanup()
99{ 125{
100 if (rsa_key) 126 if (rsa_key)
101 RSA_free (rsa_key); 127 RSA_free (rsa_key);
102 128
103 free (ifname);
104
105 rsa_key = 0; 129 rsa_key = 0;
106 ifname = 0; 130
131 free (pidfilename); pidfilename = 0;
132 free (ifname); ifname = 0;
133#if ENABLE_HTTP_PROXY
134 free (proxy_host); proxy_host = 0;
135 free (proxy_auth); proxy_auth = 0;
136#endif
107} 137}
108 138
109void 139void
110configuration::clear_config () 140configuration::clear_config ()
111{ 141{
… …
202 else 232 else
203 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line); 233 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
204 } 234 }
205 else if (!strcmp (var, "ip-proto")) 235 else if (!strcmp (var, "ip-proto"))
206 ip_proto = atoi (val); 236 ip_proto = atoi (val);
237 else if (!strcmp (var, "icmp-type"))
238 {
239#if ENABLE_ICMP
240 icmp_type = atoi (val);
241#endif
242 }
207 243
208 // per config 244 // per config
209 else if (!strcmp (var, "node")) 245 else if (!strcmp (var, "node"))
210 { 246 {
211 default_node.id++; 247 default_node.id++;
… …
229 265
230 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) 266 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
231 { 267 {
232 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 268 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)); 269 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
234 exit (1); 270 exit (EXIT_FAILURE);
235 } 271 }
236 272
237 RSA_blinding_on (node->rsa_key, 0); 273 require (RSA_blinding_on (node->rsa_key, 0));
238 274
239 fclose (f); 275 fclose (f);
240 } 276 }
241 else 277 else
242 { 278 {
243 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); 279 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
244 280
245 if (need_keys) 281 if (need_keys)
246 exit (1); 282 exit (EXIT_FAILURE);
247 } 283 }
248 284
249 free (fname); 285 free (fname);
250 } 286 }
251 287
252 if (!::thisnode || !strcmp (node->nodename, ::thisnode)) 288 if (::thisnode && !strcmp (node->nodename, ::thisnode))
253 thisnode = node; 289 thisnode = node;
254 } 290 }
255 else if (!strcmp (var, "private-key")) 291 else if (!strcmp (var, "private-key"))
256 prikeyfile = strdup (val); 292 free (prikeyfile), prikeyfile = strdup (val);
257 else if (!strcmp (var, "ifpersist")) 293 else if (!strcmp (var, "ifpersist"))
258 { 294 {
259 parse_bool (ifpersist, "ifpersist", true, false); 295 parse_bool (ifpersist, "ifpersist", true, false);
260 } 296 }
261 else if (!strcmp (var, "ifname")) 297 else if (!strcmp (var, "ifname"))
262 ifname = strdup (val); 298 free (ifname), ifname = strdup (val);
263 else if (!strcmp (var, "rekey")) 299 else if (!strcmp (var, "rekey"))
264 rekey = atoi (val); 300 rekey = atoi (val);
265 else if (!strcmp (var, "keepalive")) 301 else if (!strcmp (var, "keepalive"))
266 keepalive = atoi (val); 302 keepalive = atoi (val);
267 else if (!strcmp (var, "mtu")) 303 else if (!strcmp (var, "mtu"))
268 mtu = atoi (val); 304 mtu = atoi (val);
269 else if (!strcmp (var, "if-up")) 305 else if (!strcmp (var, "if-up"))
270 script_if_up = strdup (val); 306 free (script_if_up), script_if_up = strdup (val);
271 else if (!strcmp (var, "node-up")) 307 else if (!strcmp (var, "node-up"))
272 script_node_up = strdup (val); 308 free (script_node_up), script_node_up = strdup (val);
273 else if (!strcmp (var, "node-down")) 309 else if (!strcmp (var, "node-down"))
274 script_node_down = strdup (val); 310 free (script_node_down), script_node_down = strdup (val);
311 else if (!strcmp (var, "pid-file"))
312 free (pidfilename), pidfilename = strdup (val);
313 else if (!strcmp (var, "http-proxy-host"))
314 {
315#if ENABLE_HTTP_PROXY
316 free (proxy_host), proxy_host = strdup (val);
317#endif
318 }
319 else if (!strcmp (var, "http-proxy-port"))
320 {
321#if ENABLE_HTTP_PROXY
322 proxy_port = atoi (val);
323#endif
324 }
325 else if (!strcmp (var, "http-proxy-auth"))
326 {
327#if ENABLE_HTTP_PROXY
328 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val));
329#endif
330 }
275 331
276 /* node-specific, non-defaultable */ 332 /* node-specific, non-defaultable */
277 else if (node != &default_node && !strcmp (var, "hostname")) 333 else if (node != &default_node && !strcmp (var, "hostname"))
278 {
279 free (node->hostname);
280 node->hostname = strdup (val); 334 free (node->hostname), node->hostname = strdup (val);
281 }
282 335
283 /* node-specific, defaultable */ 336 /* node-specific, defaultable */
284 else if (!strcmp (var, "udp-port")) 337 else if (!strcmp (var, "udp-port"))
285 node->udp_port = atoi (val); 338 node->udp_port = atoi (val);
286 else if (!strcmp (var, "tcp-port")) 339 else if (!strcmp (var, "tcp-port"))
287 node->tcp_port = atoi (val); 340 node->tcp_port = atoi (val);
341 else if (!strcmp (var, "dns-port"))
342 node->dns_port = atoi (val);
288 else if (!strcmp (var, "router-priority")) 343 else if (!strcmp (var, "router-priority"))
289 node->routerprio = atoi (val); 344 node->routerprio = atoi (val);
290 else if (!strcmp (var, "connect")) 345 else if (!strcmp (var, "connect"))
291 { 346 {
292 if (!strcmp (val, "ondemand")) 347 if (!strcmp (val, "ondemand"))
… …
311 parse_bool (node->compress, "compress", true, false); 366 parse_bool (node->compress, "compress", true, false);
312 } 367 }
313 // all these bool options really really cost a lot of executable size! 368 // all these bool options really really cost a lot of executable size!
314 else if (!strcmp (var, "enable-tcp")) 369 else if (!strcmp (var, "enable-tcp"))
315 { 370 {
371#if ENABLE_TCP
316 u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v; 372 u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v;
373#endif
374 }
375 else if (!strcmp (var, "enable-icmp"))
376 {
377#if ENABLE_ICMP
378 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v;
379#endif
380 }
381 else if (!strcmp (var, "enable-dns"))
382 {
383#if ENABLE_DNS
384 u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v;
385#endif
317 } 386 }
318 else if (!strcmp (var, "enable-udp")) 387 else if (!strcmp (var, "enable-udp"))
319 { 388 {
320 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; 389 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
321 } 390 }
322 else if (!strcmp (var, "enable-rawip")) 391 else if (!strcmp (var, "enable-rawip"))
323 { 392 {;
324 u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v; 393 u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v;
325 } 394 }
326 395
327 // unknown or misplaced 396 // unknown or misplaced
328 else 397 else
329 {
330 slog (L_WARN, 398 slog (L_WARN,
331 _("unknown or misplaced variable `%s', at '%s' line %d"), 399 _("unknown or misplaced variable `%s', at '%s' line %d"),
332 var, fname, lineno); 400 var, fname, lineno);
333 }
334 } 401 }
335 402
336 fclose (f); 403 fclose (f);
337 } 404 }
338 else 405 else
339 { 406 {
340 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); 407 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
341 exit (1); 408 exit (EXIT_FAILURE);
342 } 409 }
343 410
344 free (fname); 411 free (fname);
345 412
346 fname = config_filename (prikeyfile, "hostkey"); 413 fname = config_filename (prikeyfile, "hostkey");
… …
352 419
353 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) 420 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
354 { 421 {
355 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 422 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)); 423 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
357 exit (1); 424 exit (EXIT_FAILURE);
358 } 425 }
359 426
360 RSA_blinding_on (rsa_key, 0); 427 require (RSA_blinding_on (rsa_key, 0));
361 428
362 fclose (f); 429 fclose (f);
363 } 430 }
364 else 431 else
365 { 432 {
366 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); 433 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
367 434
368 if (need_keys) 435 if (need_keys)
369 exit (1); 436 exit (EXIT_FAILURE);
370 } 437 }
438
439 if (need_keys && ::thisnode
440 && rsa_key && thisnode && thisnode->rsa_key)
441 if (BN_cmp (rsa_key->n, thisnode->rsa_key->n) != 0
442 || BN_cmp (rsa_key->e, thisnode->rsa_key->e) != 0)
443 {
444 slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode);
445 exit (EXIT_FAILURE);
446 }
371 447
372 free (fname); 448 free (fname);
373} 449}
374 450
375char *configuration::config_filename (const char *name, const char *dflt) 451char *configuration::config_filename (const char *name, const char *dflt)
… …
397 printf (_("MTU: %d\n"), mtu); 473 printf (_("MTU: %d\n"), mtu);
398 printf (_("rekeying interval: %d\n"), rekey); 474 printf (_("rekeying interval: %d\n"), rekey);
399 printf (_("keepalive interval: %d\n"), keepalive); 475 printf (_("keepalive interval: %d\n"), keepalive);
400 printf (_("interface: %s\n"), ifname); 476 printf (_("interface: %s\n"), ifname);
401 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>"); 477 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
402 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) : -1); 478 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1);
403 printf ("\n"); 479 printf ("\n");
404 480
405 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n", 481 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",
406 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port")); 482 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));
407 483
… …
409 (*i)->print (); 485 (*i)->print ();
410 486
411 printf ("\n"); 487 printf ("\n");
412} 488}
413 489
414void 490configuration::configuration ()
415conf_node::print ()
416{ 491{
417 printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %s%s%d\n", 492 init ();
418 id,
419 id >> 8, id & 0xff,
420 compress ? 'Y' : 'N',
421 connectmode == C_ONDEMAND ? "ondemand" :
422 connectmode == C_NEVER ? "never" :
423 connectmode == C_ALWAYS ? "always" : "",
424 nodename,
425 hostname ? hostname : "",
426 hostname ? ":" : "",
427 hostname ? udp_port : 0
428 );
429} 493}
430 494
495configuration::~configuration ()
496{
497 cleanup ();
498}
499
500

Diff Legend

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