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.18 by pcg, Thu Oct 16 02:41:21 2003 UTC vs.
Revision 1.33 by pcg, Sun Mar 6 18:34:46 2005 UTC

1/* 1/*
2 conf.c -- configuration code 2 conf.c -- configuration code
3 Copyright (C) 2003 Marc Lehmann <pcg@goof.com> 3 Copyright (C) 2003-2005 Marc Lehmann <gvpe@schmorp.de>
4 4
5 This file is part of GVPE.
6
5 This program is free software; you can redistribute it and/or modify 7 GVPE is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by 8 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or 9 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version. 10 (at your option) any later version.
9 11
10 This program is distributed in the hope that it will be useful, 12 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details. 15 GNU General Public License for more details.
14 16
15 You should have received a copy of the GNU General Public License 17 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software 18 along with gvpe; if not, write to the Free Software
17 Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 19 Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18*/ 20*/
19 21
20#include "config.h" 22#include "config.h"
21 23
… …
33 35
34#include <openssl/err.h> 36#include <openssl/err.h>
35#include <openssl/pem.h> 37#include <openssl/pem.h>
36#include <openssl/rsa.h> 38#include <openssl/rsa.h>
37#include <openssl/rand.h> 39#include <openssl/rand.h>
40#include <openssl/bn.h>
38 41
39#include "gettext.h" 42#include "gettext.h"
40 43
41#include "conf.h" 44#include "conf.h"
42#include "slog.h" 45#include "slog.h"
43#include "util.h" 46#include "util.h"
44 47
45char *confbase; 48char *confbase;
46char *thisnode; 49char *thisnode;
47char *identname; 50char *identname;
48char *pidfilename;
49 51
50struct configuration conf; 52struct configuration conf;
51 53
52u8 best_protocol (u8 protset) 54u8 best_protocol (u8 protset)
53{ 55{
54 if (protset & PROT_IPv4 ) return PROT_IPv4; 56 if (protset & PROT_IPv4 ) return PROT_IPv4;
55 if (protset & PROT_ICMPv4) return PROT_ICMPv4; 57 if (protset & PROT_ICMPv4) return PROT_ICMPv4;
56 if (protset & PROT_UDPv4 ) return PROT_UDPv4; 58 if (protset & PROT_UDPv4 ) return PROT_UDPv4;
57 if (protset & PROT_TCPv4 ) return PROT_TCPv4; 59 if (protset & PROT_TCPv4 ) return PROT_TCPv4;
60 if (protset & PROT_DNSv4 ) return PROT_DNSv4;
58 61
59 return 0; 62 return 0;
60} 63}
61 64
62const char *strprotocol (u8 protocol) 65const char *strprotocol (u8 protocol)
63{ 66{
64 if (protocol & PROT_IPv4 ) return "rawip"; 67 if (protocol & PROT_IPv4 ) return "rawip";
65 if (protocol & PROT_ICMPv4) return "icmp"; 68 if (protocol & PROT_ICMPv4) return "icmp";
66 if (protocol & PROT_UDPv4 ) return "udp"; 69 if (protocol & PROT_UDPv4 ) return "udp";
67 if (protocol & PROT_TCPv4 ) return "tcp"; 70 if (protocol & PROT_TCPv4 ) return "tcp";
71 if (protocol & PROT_DNSv4 ) return "dns";
68 72
69 return "<unknown>"; 73 return "<unknown>";
70} 74}
71 75
72void 76void
… …
91 if (rsa_key) 95 if (rsa_key)
92 RSA_free (rsa_key); 96 RSA_free (rsa_key);
93 97
94 free (nodename); 98 free (nodename);
95 free (hostname); 99 free (hostname);
100#if ENABLE_DNS
101 free (domain);
102 free (dns_hostname);
103#endif
96} 104}
97 105
98void configuration::init () 106void configuration::init ()
99{ 107{
100 memset (this, 0, sizeof (*this)); 108 memset (this, 0, sizeof (*this));
101 109
110 mtu = DEFAULT_MTU;
102 rekey = DEFAULT_REKEY; 111 rekey = DEFAULT_REKEY;
103 keepalive = DEFAULT_KEEPALIVE; 112 keepalive = DEFAULT_KEEPALIVE;
104 llevel = L_INFO; 113 llevel = L_INFO;
105 ip_proto = IPPROTO_GRE; 114 ip_proto = IPPROTO_GRE;
106#if ENABLE_ICMP 115#if ENABLE_ICMP
107 icmp_type = ICMP_ECHOREPLY; 116 icmp_type = ICMP_ECHOREPLY;
108#endif 117#endif
109 118
110 default_node.udp_port = DEFAULT_UDPPORT; 119 default_node.udp_port = DEFAULT_UDPPORT;
111 default_node.tcp_port = DEFAULT_UDPPORT; 120 default_node.tcp_port = DEFAULT_UDPPORT; // ehrm
112 default_node.connectmode = conf_node::C_ALWAYS; 121 default_node.connectmode = conf_node::C_ALWAYS;
113 default_node.compress = true; 122 default_node.compress = true;
114 default_node.protocols = PROT_UDPv4; 123 default_node.protocols = 0;
124 default_node.max_retry = DEFAULT_MAX_RETRY;
125
126#if ENABLE_DNS
127 default_node.dns_port = 0; // default is 0 == client
128 dns_forw_host = strdup ("127.0.0.1");
129 dns_forw_port = 53;
130#endif
131
132 conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid");
115} 133}
116 134
117void configuration::cleanup() 135void configuration::cleanup()
118{ 136{
119 if (rsa_key) 137 if (rsa_key)
120 RSA_free (rsa_key); 138 RSA_free (rsa_key);
121 139
122 rsa_key = 0; 140 rsa_key = 0;
123 141
142 free (pidfilename); pidfilename = 0;
124 free (ifname); ifname = 0; 143 free (ifname); ifname = 0;
125#if ENABLE_HTTP_PROXY 144#if ENABLE_HTTP_PROXY
126 free (proxy_host); proxy_host = 0; 145 free (proxy_host); proxy_host = 0;
127 free (proxy_auth); proxy_auth = 0; 146 free (proxy_auth); proxy_auth = 0;
147#endif
148#if ENABLE_DNS
149 free (dns_forw_host); dns_forw_host = 0;
128#endif 150#endif
129} 151}
130 152
131void 153void
132configuration::clear_config () 154configuration::clear_config ()
… …
157 char *fname; 179 char *fname;
158 FILE *f; 180 FILE *f;
159 181
160 clear_config (); 182 clear_config ();
161 183
162 asprintf (&fname, "%s/vped.conf", confbase); 184 asprintf (&fname, "%s/gvpe.conf", confbase);
163 f = fopen (fname, "r"); 185 f = fopen (fname, "r");
164 186
165 if (f) 187 if (f)
166 { 188 {
167 char line[16384]; 189 char line[16384];
… …
224 else 246 else
225 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line); 247 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
226 } 248 }
227 else if (!strcmp (var, "ip-proto")) 249 else if (!strcmp (var, "ip-proto"))
228 ip_proto = atoi (val); 250 ip_proto = atoi (val);
251 else if (!strcmp (var, "icmp-type"))
252 {
229#if ENABLE_ICMP 253#if ENABLE_ICMP
230 //TODO: error message
231 else if (!strcmp (var, "icmp-type"))
232 icmp_type = atoi (val); 254 icmp_type = atoi (val);
233#endif 255#endif
256 }
234 257
235 // per config 258 // per config
236 else if (!strcmp (var, "node")) 259 else if (!strcmp (var, "node"))
237 { 260 {
238 default_node.id++; 261 default_node.id++;
… …
256 279
257 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) 280 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
258 { 281 {
259 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 282 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
260 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 283 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
261 exit (1); 284 exit (EXIT_FAILURE);
262 } 285 }
263 286
264 RSA_blinding_on (node->rsa_key, 0); 287 require (RSA_blinding_on (node->rsa_key, 0));
265 288
266 fclose (f); 289 fclose (f);
267 } 290 }
268 else 291 else
269 { 292 {
270 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); 293 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
271 294
272 if (need_keys) 295 if (need_keys)
273 exit (1); 296 exit (EXIT_FAILURE);
274 } 297 }
275 298
276 free (fname); 299 free (fname);
277 } 300 }
278 301
279 if (!::thisnode || !strcmp (node->nodename, ::thisnode)) 302 if (::thisnode && !strcmp (node->nodename, ::thisnode))
280 thisnode = node; 303 thisnode = node;
281 } 304 }
282 else if (!strcmp (var, "private-key")) 305 else if (!strcmp (var, "private-key"))
283 prikeyfile = strdup (val); 306 free (prikeyfile), prikeyfile = strdup (val);
284 else if (!strcmp (var, "ifpersist")) 307 else if (!strcmp (var, "ifpersist"))
285 { 308 {
286 parse_bool (ifpersist, "ifpersist", true, false); 309 parse_bool (ifpersist, "ifpersist", true, false);
287 } 310 }
288 else if (!strcmp (var, "ifname")) 311 else if (!strcmp (var, "ifname"))
289 ifname = strdup (val); 312 free (ifname), ifname = strdup (val);
290 else if (!strcmp (var, "rekey")) 313 else if (!strcmp (var, "rekey"))
291 rekey = atoi (val); 314 rekey = atoi (val);
292 else if (!strcmp (var, "keepalive")) 315 else if (!strcmp (var, "keepalive"))
293 keepalive = atoi (val); 316 keepalive = atoi (val);
294 else if (!strcmp (var, "mtu")) 317 else if (!strcmp (var, "mtu"))
295 mtu = atoi (val); 318 mtu = atoi (val);
296 else if (!strcmp (var, "if-up")) 319 else if (!strcmp (var, "if-up"))
297 script_if_up = strdup (val); 320 free (script_if_up), script_if_up = strdup (val);
298 else if (!strcmp (var, "node-up")) 321 else if (!strcmp (var, "node-up"))
299 script_node_up = strdup (val); 322 free (script_node_up), script_node_up = strdup (val);
300 else if (!strcmp (var, "node-down")) 323 else if (!strcmp (var, "node-down"))
301 script_node_down = strdup (val); 324 free (script_node_down), script_node_down = strdup (val);
325 else if (!strcmp (var, "pid-file"))
326 free (pidfilename), pidfilename = strdup (val);
327#if ENABLE_DNS
328 else if (!strcmp (var, "dns-forw-host"))
329 free (dns_forw_host), dns_forw_host = strdup (val);
330 else if (!strcmp (var, "dns-forw-port"))
331 dns_forw_port = atoi (val);
332#endif
333 else if (!strcmp (var, "http-proxy-host"))
334 {
302#if ENABLE_HTTP_PROXY 335#if ENABLE_HTTP_PROXY
303 else if (!strcmp (var, "http-proxy-host"))
304 proxy_host = strdup (val); 336 free (proxy_host), proxy_host = strdup (val);
337#endif
338 }
305 else if (!strcmp (var, "http-proxy-port")) 339 else if (!strcmp (var, "http-proxy-port"))
340 {
341#if ENABLE_HTTP_PROXY
306 proxy_port = atoi (val); 342 proxy_port = atoi (val);
343#endif
344 }
307 else if (!strcmp (var, "http-proxy-auth")) 345 else if (!strcmp (var, "http-proxy-auth"))
346 {
347#if ENABLE_HTTP_PROXY
308 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val)); 348 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val));
309#endif 349#endif
350 }
310 351
311 /* node-specific, non-defaultable */ 352 /* node-specific, non-defaultable */
312 else if (node != &default_node && !strcmp (var, "hostname")) 353 else if (node != &default_node && !strcmp (var, "hostname"))
313 {
314 free (node->hostname);
315 node->hostname = strdup (val); 354 free (node->hostname), node->hostname = strdup (val);
316 }
317 355
318 /* node-specific, defaultable */ 356 /* node-specific, defaultable */
319 else if (!strcmp (var, "udp-port")) 357 else if (!strcmp (var, "udp-port"))
320 node->udp_port = atoi (val); 358 node->udp_port = atoi (val);
321 else if (!strcmp (var, "tcp-port")) 359 else if (!strcmp (var, "tcp-port"))
322 node->tcp_port = atoi (val); 360 node->tcp_port = atoi (val);
361#if ENABLE_DNS
362 else if (!strcmp (var, "dns-hostname"))
363 free (node->dns_hostname), node->dns_hostname = strdup (val);
364 else if (!strcmp (var, "dns-port"))
365 node->dns_port = atoi (val);
366 else if (!strcmp (var, "dns-domain"))
367 free (node->domain), node->domain = strdup (val);
368#endif
323 else if (!strcmp (var, "router-priority")) 369 else if (!strcmp (var, "router-priority"))
324 node->routerprio = atoi (val); 370 node->routerprio = atoi (val);
371 else if (!strcmp (var, "max-retry"))
372 node->max_retry = atoi (val);
325 else if (!strcmp (var, "connect")) 373 else if (!strcmp (var, "connect"))
326 { 374 {
327 if (!strcmp (val, "ondemand")) 375 if (!strcmp (val, "ondemand"))
328 node->connectmode = conf_node::C_ONDEMAND; 376 node->connectmode = conf_node::C_ONDEMAND;
329 else if (!strcmp (val, "never")) 377 else if (!strcmp (val, "never"))
… …
332 node->connectmode = conf_node::C_ALWAYS; 380 node->connectmode = conf_node::C_ALWAYS;
333 else if (!strcmp (val, "disabled")) 381 else if (!strcmp (val, "disabled"))
334 node->connectmode = conf_node::C_DISABLED; 382 node->connectmode = conf_node::C_DISABLED;
335 else 383 else
336 slog (L_WARN, 384 slog (L_WARN,
337 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"), 385 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
338 var, fname, lineno); 386 var, fname, lineno);
339 } 387 }
340 else if (!strcmp (var, "inherit-tos")) 388 else if (!strcmp (var, "inherit-tos"))
341 { 389 {
342 parse_bool (node->inherit_tos, "inherit-tos", true, false); 390 parse_bool (node->inherit_tos, "inherit-tos", true, false);
343 } 391 }
… …
354 } 402 }
355 else if (!strcmp (var, "enable-icmp")) 403 else if (!strcmp (var, "enable-icmp"))
356 { 404 {
357#if ENABLE_ICMP 405#if ENABLE_ICMP
358 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v; 406 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v;
407#endif
408 }
409 else if (!strcmp (var, "enable-dns"))
410 {
411#if ENABLE_DNS
412 u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v;
359#endif 413#endif
360 } 414 }
361 else if (!strcmp (var, "enable-udp")) 415 else if (!strcmp (var, "enable-udp"))
362 { 416 {
363 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; 417 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
… …
377 fclose (f); 431 fclose (f);
378 } 432 }
379 else 433 else
380 { 434 {
381 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); 435 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
382 exit (1); 436 exit (EXIT_FAILURE);
383 } 437 }
384 438
385 free (fname); 439 free (fname);
386 440
387 fname = config_filename (prikeyfile, "hostkey"); 441 fname = config_filename (prikeyfile, "hostkey");
… …
393 447
394 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) 448 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
395 { 449 {
396 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 450 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
397 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 451 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
398 exit (1); 452 exit (EXIT_FAILURE);
399 } 453 }
400 454
401 RSA_blinding_on (rsa_key, 0); 455 require (RSA_blinding_on (rsa_key, 0));
402 456
403 fclose (f); 457 fclose (f);
404 } 458 }
405 else 459 else
406 { 460 {
407 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); 461 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
408 462
409 if (need_keys) 463 if (need_keys)
410 exit (1); 464 exit (EXIT_FAILURE);
411 } 465 }
466
467 if (need_keys && ::thisnode
468 && rsa_key && thisnode && thisnode->rsa_key)
469 if (BN_cmp (rsa_key->n, thisnode->rsa_key->n) != 0
470 || BN_cmp (rsa_key->e, thisnode->rsa_key->e) != 0)
471 {
472 slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode);
473 exit (EXIT_FAILURE);
474 }
412 475
413 free (fname); 476 free (fname);
414} 477}
415 478
416char *configuration::config_filename (const char *name, const char *dflt) 479char *configuration::config_filename (const char *name, const char *dflt)
… …
452 printf ("\n"); 515 printf ("\n");
453} 516}
454 517
455configuration::configuration () 518configuration::configuration ()
456{ 519{
520 asprintf (&confbase, "%s/gvpe", CONFDIR);
521
457 init (); 522 init ();
458} 523}
459 524
460configuration::~configuration () 525configuration::~configuration ()
461{ 526{

Diff Legend

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