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 | |
49 | char *confbase; |
46 | char *confbase; |
50 | char *thisnode; |
47 | char *thisnode; |
51 | char *identname; |
48 | char *identname; |
52 | char *pidfilename; |
|
|
53 | |
49 | |
54 | struct configuration conf; |
50 | struct configuration conf; |
55 | |
51 | |
56 | configuration::configuration () |
52 | u8 best_protocol (u8 protset) |
57 | { |
53 | { |
58 | init (); |
54 | if (protset & PROT_IPv4 ) return PROT_IPv4; |
59 | } |
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 | configuration::~configuration () |
60 | return 0; |
|
|
61 | } |
|
|
62 | |
|
|
63 | const char *strprotocol (u8 protocol) |
62 | { |
64 | { |
63 | 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 | |
|
|
74 | void |
|
|
75 | conf_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 | |
|
|
91 | conf_node::~conf_node () |
|
|
92 | { |
|
|
93 | if (rsa_key) |
|
|
94 | RSA_free (rsa_key); |
|
|
95 | |
|
|
96 | free (nodename); |
|
|
97 | free (hostname); |
64 | } |
98 | } |
65 | |
99 | |
66 | void configuration::init () |
100 | void configuration::init () |
67 | { |
101 | { |
|
|
102 | asprintf (&confbase, "%s/vpe", CONFDIR); |
|
|
103 | |
68 | memset (this, 0, sizeof (*this)); |
104 | memset (this, 0, sizeof (*this)); |
69 | |
105 | |
|
|
106 | mtu = DEFAULT_MTU; |
70 | rekey = DEFAULT_REKEY; |
107 | rekey = DEFAULT_REKEY; |
71 | keepalive = DEFAULT_KEEPALIVE; |
108 | keepalive = DEFAULT_KEEPALIVE; |
72 | llevel = L_INFO; |
109 | llevel = L_INFO; |
73 | ip_proto = IPPROTO_GRE; |
110 | ip_proto = IPPROTO_GRE; |
|
|
111 | #if ENABLE_ICMP |
|
|
112 | icmp_type = ICMP_ECHOREPLY; |
|
|
113 | #endif |
74 | |
114 | |
75 | default_node.udp_port = DEFAULT_UDPPORT; |
115 | default_node.udp_port = DEFAULT_UDPPORT; |
|
|
116 | default_node.tcp_port = DEFAULT_UDPPORT; // ehrm |
76 | default_node.connectmode = conf_node::C_ALWAYS; |
117 | default_node.connectmode = conf_node::C_ALWAYS; |
77 | default_node.compress = true; |
118 | default_node.compress = true; |
78 | default_node.can_send = PROT_UDPv4; |
119 | default_node.protocols = PROT_UDPv4; |
79 | default_node.can_recv = PROT_IPv4; |
120 | |
|
|
121 | conf.pidfilename = strdup (LOCALSTATEDIR "/run/vped.pid"); |
80 | } |
122 | } |
81 | |
123 | |
82 | void configuration::cleanup() |
124 | void configuration::cleanup() |
83 | { |
125 | { |
84 | if (rsa_key) |
126 | if (rsa_key) |
85 | RSA_free (rsa_key); |
127 | RSA_free (rsa_key); |
86 | |
128 | |
87 | free (ifname); |
|
|
88 | |
|
|
89 | rsa_key = 0; |
129 | rsa_key = 0; |
90 | 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 |
91 | } |
137 | } |
92 | |
138 | |
93 | void |
139 | void |
94 | configuration::clear_config () |
140 | configuration::clear_config () |
95 | { |
141 | { |
… | |
… | |
186 | else |
232 | else |
187 | 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); |
188 | } |
234 | } |
189 | else if (!strcmp (var, "ip-proto")) |
235 | else if (!strcmp (var, "ip-proto")) |
190 | 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 | } |
191 | |
243 | |
192 | // per config |
244 | // per config |
193 | else if (!strcmp (var, "node")) |
245 | else if (!strcmp (var, "node")) |
194 | { |
246 | { |
195 | default_node.id++; |
247 | default_node.id++; |
… | |
… | |
213 | |
265 | |
214 | if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) |
266 | if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) |
215 | { |
267 | { |
216 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
268 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
217 | 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)); |
218 | exit (1); |
270 | exit (EXIT_FAILURE); |
219 | } |
271 | } |
220 | |
272 | |
221 | RSA_blinding_on (node->rsa_key, 0); |
273 | require (RSA_blinding_on (node->rsa_key, 0)); |
222 | |
274 | |
223 | fclose (f); |
275 | fclose (f); |
224 | } |
276 | } |
225 | else |
277 | else |
226 | { |
278 | { |
227 | 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)); |
228 | |
280 | |
229 | if (need_keys) |
281 | if (need_keys) |
230 | exit (1); |
282 | exit (EXIT_FAILURE); |
231 | } |
283 | } |
232 | |
284 | |
233 | free (fname); |
285 | free (fname); |
234 | } |
286 | } |
235 | |
287 | |
236 | if (!::thisnode || !strcmp (node->nodename, ::thisnode)) |
288 | if (::thisnode && !strcmp (node->nodename, ::thisnode)) |
237 | thisnode = node; |
289 | thisnode = node; |
238 | } |
290 | } |
239 | else if (!strcmp (var, "private-key")) |
291 | else if (!strcmp (var, "private-key")) |
240 | prikeyfile = strdup (val); |
292 | free (prikeyfile), prikeyfile = strdup (val); |
241 | else if (!strcmp (var, "ifpersist")) |
293 | else if (!strcmp (var, "ifpersist")) |
242 | { |
294 | { |
243 | parse_bool (ifpersist, "ifpersist", true, false); |
295 | parse_bool (ifpersist, "ifpersist", true, false); |
244 | } |
296 | } |
245 | else if (!strcmp (var, "ifname")) |
297 | else if (!strcmp (var, "ifname")) |
246 | ifname = strdup (val); |
298 | free (ifname), ifname = strdup (val); |
247 | else if (!strcmp (var, "rekey")) |
299 | else if (!strcmp (var, "rekey")) |
248 | rekey = atoi (val); |
300 | rekey = atoi (val); |
249 | else if (!strcmp (var, "keepalive")) |
301 | else if (!strcmp (var, "keepalive")) |
250 | keepalive = atoi (val); |
302 | keepalive = atoi (val); |
251 | else if (!strcmp (var, "mtu")) |
303 | else if (!strcmp (var, "mtu")) |
252 | mtu = atoi (val); |
304 | mtu = atoi (val); |
253 | else if (!strcmp (var, "if-up")) |
305 | else if (!strcmp (var, "if-up")) |
254 | script_if_up = strdup (val); |
306 | free (script_if_up), script_if_up = strdup (val); |
255 | else if (!strcmp (var, "node-up")) |
307 | else if (!strcmp (var, "node-up")) |
256 | script_node_up = strdup (val); |
308 | free (script_node_up), script_node_up = strdup (val); |
257 | else if (!strcmp (var, "node-down")) |
309 | else if (!strcmp (var, "node-down")) |
258 | 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 | } |
259 | |
331 | |
260 | /* node-specific, non-defaultable */ |
332 | /* node-specific, non-defaultable */ |
261 | else if (node != &default_node && !strcmp (var, "hostname")) |
333 | else if (node != &default_node && !strcmp (var, "hostname")) |
262 | { |
|
|
263 | free (node->hostname); |
|
|
264 | node->hostname = strdup (val); |
334 | free (node->hostname), node->hostname = strdup (val); |
265 | } |
|
|
266 | |
335 | |
267 | /* node-specific, defaultable */ |
336 | /* node-specific, defaultable */ |
268 | else if (!strcmp (var, "udp-port")) |
337 | else if (!strcmp (var, "udp-port")) |
269 | node->udp_port = atoi (val); |
338 | node->udp_port = atoi (val); |
|
|
339 | else if (!strcmp (var, "tcp-port")) |
|
|
340 | node->tcp_port = atoi (val); |
|
|
341 | else if (!strcmp (var, "dns-port")) |
|
|
342 | node->dns_port = atoi (val); |
270 | else if (!strcmp (var, "router-priority")) |
343 | else if (!strcmp (var, "router-priority")) |
271 | node->routerprio = atoi (val); |
344 | node->routerprio = atoi (val); |
272 | else if (!strcmp (var, "connect")) |
345 | else if (!strcmp (var, "connect")) |
273 | { |
346 | { |
274 | if (!strcmp (val, "ondemand")) |
347 | if (!strcmp (val, "ondemand")) |
… | |
… | |
291 | else if (!strcmp (var, "compress")) |
364 | else if (!strcmp (var, "compress")) |
292 | { |
365 | { |
293 | parse_bool (node->compress, "compress", true, false); |
366 | parse_bool (node->compress, "compress", true, false); |
294 | } |
367 | } |
295 | // 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! |
|
|
369 | else if (!strcmp (var, "enable-tcp")) |
|
|
370 | { |
|
|
371 | #if ENABLE_TCP |
|
|
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 |
|
|
386 | } |
296 | else if (!strcmp (var, "can-send-udp")) |
387 | else if (!strcmp (var, "enable-udp")) |
|
|
388 | { |
|
|
389 | u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; |
|
|
390 | } |
|
|
391 | else if (!strcmp (var, "enable-rawip")) |
297 | { |
392 | {; |
298 | u8 v; parse_bool (v, "can-send-udp", PROT_UDPv4, 0); node->can_send = (node->can_send & ~PROT_UDPv4) | v; |
|
|
299 | } |
|
|
300 | else if (!strcmp (var, "can-recv-udp")) |
|
|
301 | { |
|
|
302 | u8 v; parse_bool (v, "can-recv-udp", PROT_UDPv4, 0); node->can_recv = (node->can_recv & ~PROT_UDPv4) | v; |
|
|
303 | } |
|
|
304 | else if (!strcmp (var, "can-send-rawip")) |
|
|
305 | { |
|
|
306 | u8 v; parse_bool (v, "can-send-rawip", PROT_IPv4, 0); node->can_send = (node->can_send & ~PROT_IPv4) | v; |
393 | u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v; |
307 | } |
|
|
308 | else if (!strcmp (var, "can-recv-rawip")) |
|
|
309 | { |
|
|
310 | u8 v; parse_bool (v, "can-recv-rawip", PROT_IPv4, 0); node->can_recv = (node->can_recv & ~PROT_IPv4) | v; |
|
|
311 | } |
394 | } |
312 | |
395 | |
313 | // unknown or misplaced |
396 | // unknown or misplaced |
314 | else |
397 | else |
315 | { |
|
|
316 | slog (L_WARN, |
398 | slog (L_WARN, |
317 | _("unknown or misplaced variable `%s', at '%s' line %d"), |
399 | _("unknown or misplaced variable `%s', at '%s' line %d"), |
318 | var, fname, lineno); |
400 | var, fname, lineno); |
319 | } |
|
|
320 | } |
401 | } |
321 | |
402 | |
322 | fclose (f); |
403 | fclose (f); |
323 | } |
404 | } |
324 | else |
405 | else |
325 | { |
406 | { |
326 | 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)); |
327 | exit (1); |
408 | exit (EXIT_FAILURE); |
328 | } |
409 | } |
329 | |
410 | |
330 | free (fname); |
411 | free (fname); |
331 | |
412 | |
332 | fname = config_filename (prikeyfile, "hostkey"); |
413 | fname = config_filename (prikeyfile, "hostkey"); |
… | |
… | |
338 | |
419 | |
339 | if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) |
420 | if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) |
340 | { |
421 | { |
341 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
422 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
342 | 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)); |
343 | exit (1); |
424 | exit (EXIT_FAILURE); |
344 | } |
425 | } |
345 | |
426 | |
346 | RSA_blinding_on (rsa_key, 0); |
427 | require (RSA_blinding_on (rsa_key, 0)); |
347 | |
428 | |
348 | fclose (f); |
429 | fclose (f); |
349 | } |
430 | } |
350 | else |
431 | else |
351 | { |
432 | { |
352 | 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)); |
353 | |
434 | |
354 | if (need_keys) |
435 | if (need_keys) |
355 | exit (1); |
436 | exit (EXIT_FAILURE); |
356 | } |
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 | } |
357 | |
447 | |
358 | free (fname); |
448 | free (fname); |
359 | } |
449 | } |
360 | |
450 | |
361 | char *configuration::config_filename (const char *name, const char *dflt) |
451 | char *configuration::config_filename (const char *name, const char *dflt) |
… | |
… | |
383 | printf (_("MTU: %d\n"), mtu); |
473 | printf (_("MTU: %d\n"), mtu); |
384 | printf (_("rekeying interval: %d\n"), rekey); |
474 | printf (_("rekeying interval: %d\n"), rekey); |
385 | printf (_("keepalive interval: %d\n"), keepalive); |
475 | printf (_("keepalive interval: %d\n"), keepalive); |
386 | printf (_("interface: %s\n"), ifname); |
476 | printf (_("interface: %s\n"), ifname); |
387 | printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>"); |
477 | printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>"); |
388 | 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); |
389 | printf ("\n"); |
479 | printf ("\n"); |
390 | |
480 | |
391 | printf ("%4s %-17s %s %-8.8s %-10.10s %s\n", |
481 | printf ("%4s %-17s %s %-8.8s %-10.10s %s\n", |
392 | _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port")); |
482 | _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port")); |
393 | |
483 | |
… | |
… | |
395 | (*i)->print (); |
485 | (*i)->print (); |
396 | |
486 | |
397 | printf ("\n"); |
487 | printf ("\n"); |
398 | } |
488 | } |
399 | |
489 | |
400 | void |
490 | configuration::configuration () |
401 | conf_node::print () |
|
|
402 | { |
491 | { |
403 | printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %s%s%d\n", |
492 | init (); |
404 | id, |
|
|
405 | id >> 8, id & 0xff, |
|
|
406 | compress ? 'Y' : 'N', |
|
|
407 | connectmode == C_ONDEMAND ? "ondemand" : |
|
|
408 | connectmode == C_NEVER ? "never" : |
|
|
409 | connectmode == C_ALWAYS ? "always" : "", |
|
|
410 | nodename, |
|
|
411 | hostname ? hostname : "", |
|
|
412 | hostname ? ":" : "", |
|
|
413 | hostname ? udp_port : 0 |
|
|
414 | ); |
|
|
415 | } |
493 | } |
416 | |
494 | |
|
|
495 | configuration::~configuration () |
|
|
496 | { |
|
|
497 | cleanup (); |
|
|
498 | } |
|
|
499 | |
|
|
500 | |