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

Diff Legend

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