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.4 by pcg, Sun Mar 23 14:49:16 2003 UTC vs.
Revision 1.27 by pcg, Fri Jun 11 15:56:31 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
32#include "netcompat.h"
33
36#include <openssl/err.h> 34#include <openssl/err.h>
37#include <openssl/pem.h> 35#include <openssl/pem.h>
38#include <openssl/rsa.h> 36#include <openssl/rsa.h>
39#include <openssl/rand.h> 37#include <openssl/rand.h>
38#include <openssl/bn.h>
40 39
41#include "gettext.h" 40#include "gettext.h"
42 41
43#include "conf.h" 42#include "conf.h"
44#include "slog.h" 43#include "slog.h"
45#include "util.h" 44#include "util.h"
46 45
47char *confbase; 46char *confbase;
48char *thisnode; 47char *thisnode;
49char *identname; 48char *identname;
50char *pidfilename;
51 49
52struct configuration conf; 50struct configuration conf;
53 51
54configuration::configuration () 52u8 best_protocol (u8 protset)
55{ 53{
56 init (); 54 if (protset & PROT_IPv4 ) return PROT_IPv4;
57} 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;
58 59
59configuration::~configuration () 60 return 0;
61}
62
63const char *strprotocol (u8 protocol)
60{ 64{
61 cleanup (); 65 if (protocol & PROT_IPv4 ) return "rawip";
66 if (protocol & PROT_ICMPv4) return "icmp";
67 if (protocol & PROT_UDPv4 ) return "udp";
68 if (protocol & PROT_TCPv4 ) return "tcp";
69 if (protocol & PROT_DNSv4 ) return "dns";
70
71 return "<unknown>";
72}
73
74void
75conf_node::print ()
76{
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 );
89}
90
91conf_node::~conf_node ()
92{
93 if (rsa_key)
94 RSA_free (rsa_key);
95
96 free (nodename);
97 free (hostname);
62} 98}
63 99
64void configuration::init () 100void configuration::init ()
65{ 101{
66 memset (this, 0, sizeof (*this)); 102 memset (this, 0, sizeof (*this));
67 103
104 mtu = DEFAULT_MTU;
68 rekey = DEFAULT_REKEY; 105 rekey = DEFAULT_REKEY;
69 keepalive = DEFAULT_KEEPALIVE; 106 keepalive = DEFAULT_KEEPALIVE;
70 llevel = L_INFO; 107 llevel = L_INFO;
108 ip_proto = IPPROTO_GRE;
109#if ENABLE_ICMP
110 icmp_type = ICMP_ECHOREPLY;
111#endif
71 112
72 default_node.port = DEFAULT_PORT; 113 default_node.udp_port = DEFAULT_UDPPORT;
114 default_node.tcp_port = DEFAULT_UDPPORT; // ehrm
73 default_node.connectmode = conf_node::C_ALWAYS; 115 default_node.connectmode = conf_node::C_ALWAYS;
74 default_node.compress = true; 116 default_node.compress = true;
117 default_node.protocols = PROT_UDPv4;
118 default_node.max_retry = DEFAULT_MAX_RETRY;
119
120 conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid");
75} 121}
76 122
77void configuration::cleanup() 123void configuration::cleanup()
78{ 124{
79 if (rsa_key) 125 if (rsa_key)
80 RSA_free (rsa_key); 126 RSA_free (rsa_key);
81 127
82 free (ifname);
83
84 rsa_key = 0; 128 rsa_key = 0;
85 ifname = 0; 129
130 free (pidfilename); pidfilename = 0;
131 free (ifname); ifname = 0;
132#if ENABLE_HTTP_PROXY
133 free (proxy_host); proxy_host = 0;
134 free (proxy_auth); proxy_auth = 0;
135#endif
86} 136}
87 137
88void 138void
89configuration::clear_config () 139configuration::clear_config ()
90{ 140{
95 145
96 cleanup (); 146 cleanup ();
97 init (); 147 init ();
98} 148}
99 149
150#define parse_bool(target,name,trueval,falseval) \
151 if (!strcmp (val, "yes")) target = trueval; \
152 else if (!strcmp (val, "no")) target = falseval; \
153 else if (!strcmp (val, "true")) target = trueval; \
154 else if (!strcmp (val, "false")) target = falseval; \
155 else if (!strcmp (val, "on")) target = trueval; \
156 else if (!strcmp (val, "off")) target = falseval; \
157 else \
158 slog (L_WARN, \
159 _("illegal value for '%s', only 'yes|true|on' or 'no|false|off' allowed, at '%s' line %d"), \
160 name, var, fname, lineno);
161
100void configuration::read_config (bool need_keys) 162void configuration::read_config (bool need_keys)
101{ 163{
102 char *fname; 164 char *fname;
103 FILE *f; 165 FILE *f;
104 166
105 clear_config (); 167 clear_config ();
106 168
107 asprintf (&fname, "%s/vped.conf", confbase); 169 asprintf (&fname, "%s/gvpe.conf", confbase);
108 f = fopen (fname, "r"); 170 f = fopen (fname, "r");
109 171
110 if (f) 172 if (f)
111 { 173 {
112 char line[16384]; 174 char line[16384];
167 if (l != L_NONE) 229 if (l != L_NONE)
168 llevel = l; 230 llevel = l;
169 else 231 else
170 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line); 232 slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
171 } 233 }
234 else if (!strcmp (var, "ip-proto"))
235 ip_proto = atoi (val);
236 else if (!strcmp (var, "icmp-type"))
237 {
238#if ENABLE_ICMP
239 icmp_type = atoi (val);
240#endif
241 }
172 242
173 // per config 243 // per config
174 else if (!strcmp (var, "node")) 244 else if (!strcmp (var, "node"))
175 { 245 {
176 default_node.id++; 246 default_node.id++;
194 264
195 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) 265 if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
196 { 266 {
197 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 267 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
198 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 268 slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
199 exit (1); 269 exit (EXIT_FAILURE);
200 } 270 }
201 271
202 RSA_blinding_on (node->rsa_key, 0); 272 require (RSA_blinding_on (node->rsa_key, 0));
203 273
204 fclose (f); 274 fclose (f);
205 } 275 }
206 else 276 else
207 { 277 {
208 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); 278 slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
209 279
210 if (need_keys) 280 if (need_keys)
211 exit (1); 281 exit (EXIT_FAILURE);
212 } 282 }
213 283
214 free (fname); 284 free (fname);
215 } 285 }
216 286
217 if (!::thisnode || !strcmp (node->nodename, ::thisnode)) 287 if (::thisnode && !strcmp (node->nodename, ::thisnode))
218 thisnode = node; 288 thisnode = node;
219 } 289 }
220 else if (!strcmp (var, "private-key")) 290 else if (!strcmp (var, "private-key"))
221 prikeyfile = strdup (val); 291 free (prikeyfile), prikeyfile = strdup (val);
222 else if (!strcmp (var, "ifpersist")) 292 else if (!strcmp (var, "ifpersist"))
223 { 293 {
224 if (!strcmp (val, "yes")) 294 parse_bool (ifpersist, "ifpersist", true, false);
225 ifpersist = true;
226 else if (!strcmp (val, "no"))
227 ifpersist = false;
228 else
229 slog (L_WARN,
230 _("illegal value for 'ifpersist', only 'yes' or 'no' allowed, at '%s' line %d"),
231 var, fname, lineno);
232 } 295 }
233 else if (!strcmp (var, "ifname")) 296 else if (!strcmp (var, "ifname"))
234 ifname = strdup (val); 297 free (ifname), ifname = strdup (val);
235 else if (!strcmp (var, "rekey")) 298 else if (!strcmp (var, "rekey"))
236 rekey = atoi (val); 299 rekey = atoi (val);
237 else if (!strcmp (var, "keepalive")) 300 else if (!strcmp (var, "keepalive"))
238 keepalive = atoi (val); 301 keepalive = atoi (val);
239 else if (!strcmp (var, "mtu")) 302 else if (!strcmp (var, "mtu"))
240 mtu = atoi (val); 303 mtu = atoi (val);
241 else if (!strcmp (var, "if-up")) 304 else if (!strcmp (var, "if-up"))
242 script_if_up = strdup (val); 305 free (script_if_up), script_if_up = strdup (val);
243 else if (!strcmp (var, "node-up")) 306 else if (!strcmp (var, "node-up"))
244 script_node_up = strdup (val); 307 free (script_node_up), script_node_up = strdup (val);
245 else if (!strcmp (var, "node-down")) 308 else if (!strcmp (var, "node-down"))
246 script_node_down = strdup (val); 309 free (script_node_down), script_node_down = strdup (val);
310 else if (!strcmp (var, "pid-file"))
311 free (pidfilename), pidfilename = strdup (val);
312 else if (!strcmp (var, "http-proxy-host"))
313 {
314#if ENABLE_HTTP_PROXY
315 free (proxy_host), proxy_host = strdup (val);
316#endif
317 }
318 else if (!strcmp (var, "http-proxy-port"))
319 {
320#if ENABLE_HTTP_PROXY
321 proxy_port = atoi (val);
322#endif
323 }
324 else if (!strcmp (var, "http-proxy-auth"))
325 {
326#if ENABLE_HTTP_PROXY
327 proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val));
328#endif
329 }
247 330
248 /* node-specific, non-defaultable */ 331 /* node-specific, non-defaultable */
249 else if (node != &default_node && !strcmp (var, "hostname")) 332 else if (node != &default_node && !strcmp (var, "hostname"))
250 {
251 free (node->hostname);
252 node->hostname = strdup (val); 333 free (node->hostname), node->hostname = strdup (val);
253 }
254 334
255 /* node-specific, defaultable */ 335 /* node-specific, defaultable */
256 else if (!strcmp (var, "udp-port")) 336 else if (!strcmp (var, "udp-port"))
257 node->port = atoi (val); 337 node->udp_port = atoi (val);
258 else if (!strcmp (var, "port")) //deprecated 338 else if (!strcmp (var, "tcp-port"))
259 node->port = atoi (val); 339 node->tcp_port = atoi (val);
340 else if (!strcmp (var, "dns-port"))
341 node->dns_port = atoi (val);
260 else if (!strcmp (var, "router-priority")) 342 else if (!strcmp (var, "router-priority"))
261 node->routerprio = atoi (val); 343 node->routerprio = atoi (val);
344 else if (!strcmp (var, "max-retry"))
345 node->max_retry = atoi (val);
262 else if (!strcmp (var, "connect")) 346 else if (!strcmp (var, "connect"))
263 { 347 {
264 if (!strcmp (val, "ondemand")) 348 if (!strcmp (val, "ondemand"))
265 node->connectmode = conf_node::C_ONDEMAND; 349 node->connectmode = conf_node::C_ONDEMAND;
266 else if (!strcmp (val, "never")) 350 else if (!strcmp (val, "never"))
269 node->connectmode = conf_node::C_ALWAYS; 353 node->connectmode = conf_node::C_ALWAYS;
270 else if (!strcmp (val, "disabled")) 354 else if (!strcmp (val, "disabled"))
271 node->connectmode = conf_node::C_DISABLED; 355 node->connectmode = conf_node::C_DISABLED;
272 else 356 else
273 slog (L_WARN, 357 slog (L_WARN,
274 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"), 358 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
275 var, fname, lineno); 359 var, fname, lineno);
276 } 360 }
277 else if (!strcmp (var, "inherit-tos")) 361 else if (!strcmp (var, "inherit-tos"))
278 { 362 {
279 if (!strcmp (val, "yes")) 363 parse_bool (node->inherit_tos, "inherit-tos", true, false);
280 node->inherit_tos = true;
281 else if (!strcmp (val, "no"))
282 node->inherit_tos = false;
283 else 364 }
284 slog (L_WARN,
285 _("illegal value for 'compress', only 'yes' or 'no' allowed, at '%s' line %d"),
286 var, fname, lineno);
287 }
288
289 else if (!strcmp (var, "compress")) 365 else if (!strcmp (var, "compress"))
290 { 366 {
291 if (!strcmp (val, "yes")) 367 parse_bool (node->compress, "compress", true, false);
292 node->compress = true; 368 }
369 // all these bool options really really cost a lot of executable size!
370 else if (!strcmp (var, "enable-tcp"))
371 {
372#if ENABLE_TCP
373 u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v;
374#endif
375 }
376 else if (!strcmp (var, "enable-icmp"))
377 {
378#if ENABLE_ICMP
379 u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v;
380#endif
381 }
293 else if (!strcmp (val, "no")) 382 else if (!strcmp (var, "enable-dns"))
294 node->compress = false;
295 else 383 {
296 slog (L_WARN, 384#if ENABLE_DNS
297 _("illegal value for 'compress', only 'yes' or 'no' allowed, at '%s' line %d"), 385 u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v;
298 var, fname, lineno); 386#endif
387 }
388 else if (!strcmp (var, "enable-udp"))
389 {
390 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
391 }
392 else if (!strcmp (var, "enable-rawip"))
393 {;
394 u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v;
299 } 395 }
300 396
301 // unknown or misplaced 397 // unknown or misplaced
302 else 398 else
303 {
304 slog (L_WARN, 399 slog (L_WARN,
305 _("unknown or misplaced variable `%s', at '%s' line %d"), 400 _("unknown or misplaced variable `%s', at '%s' line %d"),
306 var, fname, lineno); 401 var, fname, lineno);
307 }
308 } 402 }
309 403
310 fclose (f); 404 fclose (f);
311 } 405 }
312 else 406 else
313 { 407 {
314 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); 408 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
315 exit (1); 409 exit (EXIT_FAILURE);
316 } 410 }
317 411
318 free (fname); 412 free (fname);
319 413
320 fname = config_filename (prikeyfile, "hostkey"); 414 fname = config_filename (prikeyfile, "hostkey");
326 420
327 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) 421 if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
328 { 422 {
329 ERR_load_RSA_strings (); ERR_load_PEM_strings (); 423 ERR_load_RSA_strings (); ERR_load_PEM_strings ();
330 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); 424 slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
331 exit (1); 425 exit (EXIT_FAILURE);
332 } 426 }
333 427
334 RSA_blinding_on (rsa_key, 0); 428 require (RSA_blinding_on (rsa_key, 0));
335 429
336 fclose (f); 430 fclose (f);
337 } 431 }
338 else 432 else
339 { 433 {
340 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); 434 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
341 435
342 if (need_keys) 436 if (need_keys)
343 exit (1); 437 exit (EXIT_FAILURE);
344 } 438 }
439
440 if (need_keys && ::thisnode
441 && rsa_key && thisnode && thisnode->rsa_key)
442 if (BN_cmp (rsa_key->n, thisnode->rsa_key->n) != 0
443 || BN_cmp (rsa_key->e, thisnode->rsa_key->e) != 0)
444 {
445 slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode);
446 exit (EXIT_FAILURE);
447 }
345 448
346 free (fname); 449 free (fname);
347} 450}
348 451
349char *configuration::config_filename (const char *name, const char *dflt) 452char *configuration::config_filename (const char *name, const char *dflt)
371 printf (_("MTU: %d\n"), mtu); 474 printf (_("MTU: %d\n"), mtu);
372 printf (_("rekeying interval: %d\n"), rekey); 475 printf (_("rekeying interval: %d\n"), rekey);
373 printf (_("keepalive interval: %d\n"), keepalive); 476 printf (_("keepalive interval: %d\n"), keepalive);
374 printf (_("interface: %s\n"), ifname); 477 printf (_("interface: %s\n"), ifname);
375 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>"); 478 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
376 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) : -1); 479 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1);
377 printf ("\n"); 480 printf ("\n");
378 481
379 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n", 482 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",
380 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port")); 483 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));
381 484
383 (*i)->print (); 486 (*i)->print ();
384 487
385 printf ("\n"); 488 printf ("\n");
386} 489}
387 490
388void 491configuration::configuration ()
389conf_node::print ()
390{ 492{
391 printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %s%s%d\n", 493 asprintf (&confbase, "%s/gvpe", CONFDIR);
392 id,
393 id >> 8, id & 0xff,
394 compress ? 'Y' : 'N',
395 connectmode == C_ONDEMAND ? "ondemand" :
396 connectmode == C_NEVER ? "never" :
397 connectmode == C_ALWAYS ? "always" : "",
398 nodename,
399 hostname ? hostname : "",
400 hostname ? ":" : "",
401 hostname ? port : 0
402 );
403}
404 494
495 init ();
496}
497
498configuration::~configuration ()
499{
500 cleanup ();
501}
502
503

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines