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

Diff Legend

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