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 | #include <arpa/inet.h> |
|
|
38 | #ifdef ENABLE_ICMP |
|
|
39 | # ifdef HAVE_NETINET_IN_SYSTM_H |
|
|
40 | # include <netinet/in_systm.h> |
|
|
41 | # endif |
|
|
42 | # ifdef HAVE_NETINET_IP_H |
|
|
43 | # include <netinet/ip.h> |
|
|
44 | # endif |
|
|
45 | # include <netinet/ip_icmp.h> |
|
|
46 | #endif |
|
|
47 | |
33 | |
48 | #include <openssl/err.h> |
34 | #include <openssl/err.h> |
49 | #include <openssl/pem.h> |
35 | #include <openssl/pem.h> |
50 | #include <openssl/rsa.h> |
36 | #include <openssl/rsa.h> |
51 | #include <openssl/rand.h> |
37 | #include <openssl/rand.h> |
|
|
38 | #include <openssl/bn.h> |
52 | |
39 | |
53 | #include "gettext.h" |
40 | #include "gettext.h" |
54 | |
41 | |
55 | #include "conf.h" |
42 | #include "conf.h" |
56 | #include "slog.h" |
43 | #include "slog.h" |
57 | #include "util.h" |
44 | #include "util.h" |
58 | |
45 | |
59 | char *confbase; |
46 | char *confbase; |
60 | char *thisnode; |
47 | char *thisnode; |
61 | char *identname; |
48 | char *identname; |
62 | char *pidfilename; |
|
|
63 | |
49 | |
64 | struct configuration conf; |
50 | struct configuration conf; |
65 | |
51 | |
66 | u8 best_protocol (u8 protset) |
52 | u8 best_protocol (u8 protset) |
67 | { |
53 | { |
68 | if (protset & PROT_IPv4 ) return PROT_IPv4; |
54 | if (protset & PROT_IPv4 ) return PROT_IPv4; |
69 | if (protset & PROT_ICMPv4) return PROT_ICMPv4; |
55 | if (protset & PROT_ICMPv4) return PROT_ICMPv4; |
70 | if (protset & PROT_UDPv4 ) return PROT_UDPv4; |
56 | if (protset & PROT_UDPv4 ) return PROT_UDPv4; |
71 | if (protset & PROT_TCPv4 ) return PROT_TCPv4; |
57 | if (protset & PROT_TCPv4 ) return PROT_TCPv4; |
|
|
58 | if (protset & PROT_DNSv4 ) return PROT_DNSv4; |
72 | |
59 | |
73 | return 0; |
60 | return 0; |
74 | } |
61 | } |
75 | |
62 | |
76 | const char *strprotocol (u8 protocol) |
63 | const char *strprotocol (u8 protocol) |
77 | { |
64 | { |
78 | if (protocol & PROT_IPv4 ) return "rawip"; |
65 | if (protocol & PROT_IPv4 ) return "rawip"; |
79 | if (protocol & PROT_ICMPv4) return "icmp"; |
66 | if (protocol & PROT_ICMPv4) return "icmp"; |
80 | if (protocol & PROT_UDPv4 ) return "udp"; |
67 | if (protocol & PROT_UDPv4 ) return "udp"; |
81 | if (protocol & PROT_TCPv4 ) return "tcp"; |
68 | if (protocol & PROT_TCPv4 ) return "tcp"; |
|
|
69 | if (protocol & PROT_DNSv4 ) return "dns"; |
82 | |
70 | |
83 | return "<unknown>"; |
71 | return "<unknown>"; |
84 | } |
72 | } |
85 | |
73 | |
86 | void |
74 | void |
… | |
… | |
105 | if (rsa_key) |
93 | if (rsa_key) |
106 | RSA_free (rsa_key); |
94 | RSA_free (rsa_key); |
107 | |
95 | |
108 | free (nodename); |
96 | free (nodename); |
109 | free (hostname); |
97 | free (hostname); |
|
|
98 | #if ENABLE_DNS |
|
|
99 | free (domain); |
|
|
100 | free (dns_hostname); |
|
|
101 | #endif |
110 | } |
102 | } |
111 | |
103 | |
112 | void configuration::init () |
104 | void configuration::init () |
113 | { |
105 | { |
114 | memset (this, 0, sizeof (*this)); |
106 | memset (this, 0, sizeof (*this)); |
115 | |
107 | |
|
|
108 | mtu = DEFAULT_MTU; |
116 | rekey = DEFAULT_REKEY; |
109 | rekey = DEFAULT_REKEY; |
117 | keepalive = DEFAULT_KEEPALIVE; |
110 | keepalive = DEFAULT_KEEPALIVE; |
118 | llevel = L_INFO; |
111 | llevel = L_INFO; |
119 | ip_proto = IPPROTO_GRE; |
112 | ip_proto = IPPROTO_GRE; |
120 | #if ENABLE_ICMP |
113 | #if ENABLE_ICMP |
121 | icmp_type = ICMP_ECHOREPLY; |
114 | icmp_type = ICMP_ECHOREPLY; |
122 | #endif |
115 | #endif |
123 | |
116 | |
124 | default_node.udp_port = DEFAULT_UDPPORT; |
117 | default_node.udp_port = DEFAULT_UDPPORT; |
125 | default_node.tcp_port = DEFAULT_UDPPORT; |
118 | default_node.tcp_port = DEFAULT_UDPPORT; // ehrm |
126 | default_node.connectmode = conf_node::C_ALWAYS; |
119 | default_node.connectmode = conf_node::C_ALWAYS; |
127 | default_node.compress = true; |
120 | default_node.compress = true; |
128 | default_node.protocols = PROT_UDPv4; |
121 | default_node.protocols = 0; |
|
|
122 | default_node.max_retry = DEFAULT_MAX_RETRY; |
|
|
123 | |
|
|
124 | #if ENABLE_DNS |
|
|
125 | default_node.dns_port = 53; |
|
|
126 | dns_forw_port = 53; |
|
|
127 | #endif |
|
|
128 | |
|
|
129 | conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid"); |
129 | } |
130 | } |
130 | |
131 | |
131 | void configuration::cleanup() |
132 | void configuration::cleanup() |
132 | { |
133 | { |
133 | if (rsa_key) |
134 | if (rsa_key) |
134 | RSA_free (rsa_key); |
135 | RSA_free (rsa_key); |
135 | |
136 | |
136 | rsa_key = 0; |
137 | rsa_key = 0; |
137 | |
138 | |
|
|
139 | free (pidfilename); pidfilename = 0; |
138 | free (ifname); ifname = 0; |
140 | free (ifname); ifname = 0; |
139 | #if ENABLE_HTTP_PROXY |
141 | #if ENABLE_HTTP_PROXY |
140 | free (proxy_host); proxy_host = 0; |
142 | free (proxy_host); proxy_host = 0; |
141 | free (proxy_auth); proxy_auth = 0; |
143 | free (proxy_auth); proxy_auth = 0; |
|
|
144 | #endif |
|
|
145 | #if ENABLE_DNS |
|
|
146 | free (dns_forw_host); dns_forw_host = 0; |
142 | #endif |
147 | #endif |
143 | } |
148 | } |
144 | |
149 | |
145 | void |
150 | void |
146 | configuration::clear_config () |
151 | configuration::clear_config () |
… | |
… | |
171 | char *fname; |
176 | char *fname; |
172 | FILE *f; |
177 | FILE *f; |
173 | |
178 | |
174 | clear_config (); |
179 | clear_config (); |
175 | |
180 | |
176 | asprintf (&fname, "%s/vped.conf", confbase); |
181 | asprintf (&fname, "%s/gvpe.conf", confbase); |
177 | f = fopen (fname, "r"); |
182 | f = fopen (fname, "r"); |
178 | |
183 | |
179 | if (f) |
184 | if (f) |
180 | { |
185 | { |
181 | char line[16384]; |
186 | char line[16384]; |
… | |
… | |
238 | else |
243 | else |
239 | slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line); |
244 | slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line); |
240 | } |
245 | } |
241 | else if (!strcmp (var, "ip-proto")) |
246 | else if (!strcmp (var, "ip-proto")) |
242 | ip_proto = atoi (val); |
247 | ip_proto = atoi (val); |
|
|
248 | else if (!strcmp (var, "icmp-type")) |
|
|
249 | { |
243 | #if ENABLE_ICMP |
250 | #if ENABLE_ICMP |
244 | //TODO: error message |
|
|
245 | else if (!strcmp (var, "icmp-type")) |
|
|
246 | icmp_type = atoi (val); |
251 | icmp_type = atoi (val); |
247 | #endif |
252 | #endif |
|
|
253 | } |
248 | |
254 | |
249 | // per config |
255 | // per config |
250 | else if (!strcmp (var, "node")) |
256 | else if (!strcmp (var, "node")) |
251 | { |
257 | { |
252 | default_node.id++; |
258 | default_node.id++; |
… | |
… | |
270 | |
276 | |
271 | if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) |
277 | if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) |
272 | { |
278 | { |
273 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
279 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
274 | slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
280 | slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
275 | exit (1); |
281 | exit (EXIT_FAILURE); |
276 | } |
282 | } |
277 | |
283 | |
278 | RSA_blinding_on (node->rsa_key, 0); |
284 | require (RSA_blinding_on (node->rsa_key, 0)); |
279 | |
285 | |
280 | fclose (f); |
286 | fclose (f); |
281 | } |
287 | } |
282 | else |
288 | else |
283 | { |
289 | { |
284 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); |
290 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); |
285 | |
291 | |
286 | if (need_keys) |
292 | if (need_keys) |
287 | exit (1); |
293 | exit (EXIT_FAILURE); |
288 | } |
294 | } |
289 | |
295 | |
290 | free (fname); |
296 | free (fname); |
291 | } |
297 | } |
292 | |
298 | |
293 | if (!::thisnode || !strcmp (node->nodename, ::thisnode)) |
299 | if (::thisnode && !strcmp (node->nodename, ::thisnode)) |
294 | thisnode = node; |
300 | thisnode = node; |
295 | } |
301 | } |
296 | else if (!strcmp (var, "private-key")) |
302 | else if (!strcmp (var, "private-key")) |
297 | prikeyfile = strdup (val); |
303 | free (prikeyfile), prikeyfile = strdup (val); |
298 | else if (!strcmp (var, "ifpersist")) |
304 | else if (!strcmp (var, "ifpersist")) |
299 | { |
305 | { |
300 | parse_bool (ifpersist, "ifpersist", true, false); |
306 | parse_bool (ifpersist, "ifpersist", true, false); |
301 | } |
307 | } |
302 | else if (!strcmp (var, "ifname")) |
308 | else if (!strcmp (var, "ifname")) |
303 | ifname = strdup (val); |
309 | free (ifname), ifname = strdup (val); |
304 | else if (!strcmp (var, "rekey")) |
310 | else if (!strcmp (var, "rekey")) |
305 | rekey = atoi (val); |
311 | rekey = atoi (val); |
306 | else if (!strcmp (var, "keepalive")) |
312 | else if (!strcmp (var, "keepalive")) |
307 | keepalive = atoi (val); |
313 | keepalive = atoi (val); |
308 | else if (!strcmp (var, "mtu")) |
314 | else if (!strcmp (var, "mtu")) |
309 | mtu = atoi (val); |
315 | mtu = atoi (val); |
310 | else if (!strcmp (var, "if-up")) |
316 | else if (!strcmp (var, "if-up")) |
311 | script_if_up = strdup (val); |
317 | free (script_if_up), script_if_up = strdup (val); |
312 | else if (!strcmp (var, "node-up")) |
318 | else if (!strcmp (var, "node-up")) |
313 | script_node_up = strdup (val); |
319 | free (script_node_up), script_node_up = strdup (val); |
314 | else if (!strcmp (var, "node-down")) |
320 | else if (!strcmp (var, "node-down")) |
315 | script_node_down = strdup (val); |
321 | free (script_node_down), script_node_down = strdup (val); |
|
|
322 | else if (!strcmp (var, "pid-file")) |
|
|
323 | free (pidfilename), pidfilename = strdup (val); |
|
|
324 | #if ENABLE_DNS |
|
|
325 | else if (!strcmp (var, "dns-forw-host")) |
|
|
326 | free (dns_forw_host), dns_forw_host = strdup (val); |
|
|
327 | else if (!strcmp (var, "dns-forw-port")) |
|
|
328 | dns_forw_port = atoi (val); |
|
|
329 | #endif |
|
|
330 | else if (!strcmp (var, "http-proxy-host")) |
|
|
331 | { |
316 | #if ENABLE_HTTP_PROXY |
332 | #if ENABLE_HTTP_PROXY |
317 | else if (!strcmp (var, "http-proxy-host")) |
|
|
318 | proxy_host = strdup (val); |
333 | free (proxy_host), proxy_host = strdup (val); |
|
|
334 | #endif |
|
|
335 | } |
319 | else if (!strcmp (var, "http-proxy-port")) |
336 | else if (!strcmp (var, "http-proxy-port")) |
|
|
337 | { |
|
|
338 | #if ENABLE_HTTP_PROXY |
320 | proxy_port = atoi (val); |
339 | proxy_port = atoi (val); |
|
|
340 | #endif |
|
|
341 | } |
321 | else if (!strcmp (var, "http-proxy-auth")) |
342 | else if (!strcmp (var, "http-proxy-auth")) |
|
|
343 | { |
|
|
344 | #if ENABLE_HTTP_PROXY |
322 | proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val)); |
345 | proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val)); |
323 | #endif |
346 | #endif |
|
|
347 | } |
324 | |
348 | |
325 | /* node-specific, non-defaultable */ |
349 | /* node-specific, non-defaultable */ |
326 | else if (node != &default_node && !strcmp (var, "hostname")) |
350 | else if (node != &default_node && !strcmp (var, "hostname")) |
327 | { |
|
|
328 | free (node->hostname); |
|
|
329 | node->hostname = strdup (val); |
351 | free (node->hostname), node->hostname = strdup (val); |
330 | } |
|
|
331 | |
352 | |
332 | /* node-specific, defaultable */ |
353 | /* node-specific, defaultable */ |
333 | else if (!strcmp (var, "udp-port")) |
354 | else if (!strcmp (var, "udp-port")) |
334 | node->udp_port = atoi (val); |
355 | node->udp_port = atoi (val); |
335 | else if (!strcmp (var, "tcp-port")) |
356 | else if (!strcmp (var, "tcp-port")) |
336 | node->tcp_port = atoi (val); |
357 | node->tcp_port = atoi (val); |
|
|
358 | #if ENABLE_DNS |
|
|
359 | else if (!strcmp (var, "dns-hostname")) |
|
|
360 | free (node->dns_hostname), node->dns_hostname = strdup (val); |
|
|
361 | else if (!strcmp (var, "dns-port")) |
|
|
362 | node->dns_port = atoi (val); |
|
|
363 | #endif |
|
|
364 | else if (!strcmp (var, "dns-domain")) |
|
|
365 | { |
|
|
366 | #if ENABLE_DNS |
|
|
367 | free (node->domain), node->domain = strdup (val); |
|
|
368 | #endif |
|
|
369 | } |
337 | else if (!strcmp (var, "router-priority")) |
370 | else if (!strcmp (var, "router-priority")) |
338 | node->routerprio = atoi (val); |
371 | node->routerprio = atoi (val); |
|
|
372 | else if (!strcmp (var, "max-retry")) |
|
|
373 | node->max_retry = atoi (val); |
339 | else if (!strcmp (var, "connect")) |
374 | else if (!strcmp (var, "connect")) |
340 | { |
375 | { |
341 | if (!strcmp (val, "ondemand")) |
376 | if (!strcmp (val, "ondemand")) |
342 | node->connectmode = conf_node::C_ONDEMAND; |
377 | node->connectmode = conf_node::C_ONDEMAND; |
343 | else if (!strcmp (val, "never")) |
378 | else if (!strcmp (val, "never")) |
… | |
… | |
346 | node->connectmode = conf_node::C_ALWAYS; |
381 | node->connectmode = conf_node::C_ALWAYS; |
347 | else if (!strcmp (val, "disabled")) |
382 | else if (!strcmp (val, "disabled")) |
348 | node->connectmode = conf_node::C_DISABLED; |
383 | node->connectmode = conf_node::C_DISABLED; |
349 | else |
384 | else |
350 | slog (L_WARN, |
385 | slog (L_WARN, |
351 | _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"), |
386 | _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"), |
352 | var, fname, lineno); |
387 | var, fname, lineno); |
353 | } |
388 | } |
354 | else if (!strcmp (var, "inherit-tos")) |
389 | else if (!strcmp (var, "inherit-tos")) |
355 | { |
390 | { |
356 | parse_bool (node->inherit_tos, "inherit-tos", true, false); |
391 | parse_bool (node->inherit_tos, "inherit-tos", true, false); |
357 | } |
392 | } |
… | |
… | |
368 | } |
403 | } |
369 | else if (!strcmp (var, "enable-icmp")) |
404 | else if (!strcmp (var, "enable-icmp")) |
370 | { |
405 | { |
371 | #if ENABLE_ICMP |
406 | #if ENABLE_ICMP |
372 | u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v; |
407 | u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v; |
|
|
408 | #endif |
|
|
409 | } |
|
|
410 | else if (!strcmp (var, "enable-dns")) |
|
|
411 | { |
|
|
412 | #if ENABLE_DNS |
|
|
413 | u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v; |
373 | #endif |
414 | #endif |
374 | } |
415 | } |
375 | else if (!strcmp (var, "enable-udp")) |
416 | else if (!strcmp (var, "enable-udp")) |
376 | { |
417 | { |
377 | u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; |
418 | u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; |
… | |
… | |
391 | fclose (f); |
432 | fclose (f); |
392 | } |
433 | } |
393 | else |
434 | else |
394 | { |
435 | { |
395 | slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); |
436 | slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); |
396 | exit (1); |
437 | exit (EXIT_FAILURE); |
397 | } |
438 | } |
398 | |
439 | |
399 | free (fname); |
440 | free (fname); |
400 | |
441 | |
401 | fname = config_filename (prikeyfile, "hostkey"); |
442 | fname = config_filename (prikeyfile, "hostkey"); |
… | |
… | |
407 | |
448 | |
408 | if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) |
449 | if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) |
409 | { |
450 | { |
410 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
451 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
411 | slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
452 | slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
412 | exit (1); |
453 | exit (EXIT_FAILURE); |
413 | } |
454 | } |
414 | |
455 | |
415 | RSA_blinding_on (rsa_key, 0); |
456 | require (RSA_blinding_on (rsa_key, 0)); |
416 | |
457 | |
417 | fclose (f); |
458 | fclose (f); |
418 | } |
459 | } |
419 | else |
460 | else |
420 | { |
461 | { |
421 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); |
462 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); |
422 | |
463 | |
423 | if (need_keys) |
464 | if (need_keys) |
424 | exit (1); |
465 | exit (EXIT_FAILURE); |
425 | } |
466 | } |
|
|
467 | |
|
|
468 | if (need_keys && ::thisnode |
|
|
469 | && rsa_key && thisnode && thisnode->rsa_key) |
|
|
470 | if (BN_cmp (rsa_key->n, thisnode->rsa_key->n) != 0 |
|
|
471 | || BN_cmp (rsa_key->e, thisnode->rsa_key->e) != 0) |
|
|
472 | { |
|
|
473 | slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode); |
|
|
474 | exit (EXIT_FAILURE); |
|
|
475 | } |
426 | |
476 | |
427 | free (fname); |
477 | free (fname); |
428 | } |
478 | } |
429 | |
479 | |
430 | char *configuration::config_filename (const char *name, const char *dflt) |
480 | char *configuration::config_filename (const char *name, const char *dflt) |
… | |
… | |
466 | printf ("\n"); |
516 | printf ("\n"); |
467 | } |
517 | } |
468 | |
518 | |
469 | configuration::configuration () |
519 | configuration::configuration () |
470 | { |
520 | { |
|
|
521 | asprintf (&confbase, "%s/gvpe", CONFDIR); |
|
|
522 | |
471 | init (); |
523 | init (); |
472 | } |
524 | } |
473 | |
525 | |
474 | configuration::~configuration () |
526 | configuration::~configuration () |
475 | { |
527 | { |