… | |
… | |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
15 | GNU General Public License for more details. |
15 | GNU General Public License for more details. |
16 | |
16 | |
17 | 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 |
18 | along with gvpe; if not, write to the Free Software |
18 | along with gvpe; if not, write to the Free Software |
19 | Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
19 | Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
20 | */ |
20 | */ |
21 | |
21 | |
22 | #include "config.h" |
22 | #include "config.h" |
23 | |
23 | |
24 | #include <cstdio> |
24 | #include <cstdio> |
… | |
… | |
67 | if (protocol & PROT_UDPv4 ) return "udp"; |
67 | if (protocol & PROT_UDPv4 ) return "udp"; |
68 | if (protocol & PROT_TCPv4 ) return "tcp"; |
68 | if (protocol & PROT_TCPv4 ) return "tcp"; |
69 | if (protocol & PROT_DNSv4 ) return "dns"; |
69 | if (protocol & PROT_DNSv4 ) return "dns"; |
70 | |
70 | |
71 | return "<unknown>"; |
71 | return "<unknown>"; |
|
|
72 | } |
|
|
73 | |
|
|
74 | static bool |
|
|
75 | match_list (const vector<const char *> &list, const char *str) |
|
|
76 | { |
|
|
77 | for (vector<const char *>::const_iterator i = list.end (); i-- > list.begin (); ) |
|
|
78 | if ((*i)[0] == '*' && !(*i)[1]) |
|
|
79 | return true; |
|
|
80 | else if (!strcmp (*i, str)) |
|
|
81 | return true; |
|
|
82 | |
|
|
83 | return false; |
|
|
84 | } |
|
|
85 | |
|
|
86 | bool |
|
|
87 | conf_node::can_direct (struct conf_node *other) |
|
|
88 | { |
|
|
89 | if (match_list (allow_direct, other->nodename)) |
|
|
90 | return true; |
|
|
91 | |
|
|
92 | if (match_list (deny_direct, other->nodename)) |
|
|
93 | return false; |
|
|
94 | |
|
|
95 | return true; |
72 | } |
96 | } |
73 | |
97 | |
74 | void |
98 | void |
75 | conf_node::print () |
99 | conf_node::print () |
76 | { |
100 | { |
… | |
… | |
88 | ); |
112 | ); |
89 | } |
113 | } |
90 | |
114 | |
91 | conf_node::~conf_node () |
115 | conf_node::~conf_node () |
92 | { |
116 | { |
|
|
117 | #if 0 |
|
|
118 | // does not work, because string pointers etc. are shared |
|
|
119 | // is not called, however |
93 | if (rsa_key) |
120 | if (rsa_key) |
94 | RSA_free (rsa_key); |
121 | RSA_free (rsa_key); |
95 | |
122 | |
96 | free (nodename); |
123 | free (nodename); |
97 | free (hostname); |
124 | free (hostname); |
|
|
125 | free (if_up_data); |
98 | #if ENABLE_DNS |
126 | #if ENABLE_DNS |
99 | free (domain); |
127 | free (domain); |
100 | free (dns_hostname); |
128 | free (dns_hostname); |
|
|
129 | #endif |
101 | #endif |
130 | #endif |
102 | } |
131 | } |
103 | |
132 | |
104 | void configuration::init () |
133 | void configuration::init () |
105 | { |
134 | { |
… | |
… | |
118 | default_node.tcp_port = DEFAULT_UDPPORT; // ehrm |
147 | default_node.tcp_port = DEFAULT_UDPPORT; // ehrm |
119 | default_node.connectmode = conf_node::C_ALWAYS; |
148 | default_node.connectmode = conf_node::C_ALWAYS; |
120 | default_node.compress = true; |
149 | default_node.compress = true; |
121 | default_node.protocols = 0; |
150 | default_node.protocols = 0; |
122 | default_node.max_retry = DEFAULT_MAX_RETRY; |
151 | default_node.max_retry = DEFAULT_MAX_RETRY; |
|
|
152 | default_node.max_ttl = DEFAULT_MAX_TTL; |
|
|
153 | default_node.max_queue = DEFAULT_MAX_QUEUE; |
|
|
154 | default_node.if_up_data = strdup (""); |
123 | |
155 | |
124 | #if ENABLE_DNS |
156 | #if ENABLE_DNS |
125 | default_node.dns_port = 0; // default is 0 == client |
157 | default_node.dns_port = 0; // default is 0 == client |
|
|
158 | |
126 | dns_forw_host = strdup ("127.0.0.1"); |
159 | dns_forw_host = strdup ("127.0.0.1"); |
127 | dns_forw_port = 53; |
160 | dns_forw_port = 53; |
|
|
161 | dns_timeout_factor = DEFAULT_DNS_TIMEOUT_FACTOR; |
|
|
162 | dns_send_interval = DEFAULT_DNS_SEND_INTERVAL; |
|
|
163 | dns_overlap_factor = DEFAULT_DNS_OVERLAP_FACTOR; |
|
|
164 | dns_max_outstanding = DEFAULT_DNS_MAX_OUTSTANDING; |
128 | #endif |
165 | #endif |
129 | |
166 | |
130 | conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid"); |
167 | conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid"); |
131 | } |
168 | } |
132 | |
169 | |
… | |
… | |
147 | free (dns_forw_host); dns_forw_host = 0; |
184 | free (dns_forw_host); dns_forw_host = 0; |
148 | #endif |
185 | #endif |
149 | } |
186 | } |
150 | |
187 | |
151 | void |
188 | void |
152 | configuration::clear_config () |
189 | configuration::clear () |
153 | { |
190 | { |
154 | for (configuration::node_vector::iterator i = nodes.begin(); i != nodes.end(); ++i) |
191 | for (configuration::node_vector::iterator i = nodes.begin(); i != nodes.end(); ++i) |
155 | delete *i; |
192 | delete *i; |
156 | |
193 | |
157 | nodes.clear (); |
194 | nodes.clear (); |
… | |
… | |
166 | else if (!strcmp (val, "true")) target = trueval; \ |
203 | else if (!strcmp (val, "true")) target = trueval; \ |
167 | else if (!strcmp (val, "false")) target = falseval; \ |
204 | else if (!strcmp (val, "false")) target = falseval; \ |
168 | else if (!strcmp (val, "on")) target = trueval; \ |
205 | else if (!strcmp (val, "on")) target = trueval; \ |
169 | else if (!strcmp (val, "off")) target = falseval; \ |
206 | else if (!strcmp (val, "off")) target = falseval; \ |
170 | else \ |
207 | else \ |
171 | slog (L_WARN, \ |
208 | return _("illegal boolean value, only 'yes|true|on' or 'no|false|off' allowed. (ignored)"); \ |
172 | _("illegal value for '%s', only 'yes|true|on' or 'no|false|off' allowed, at '%s' line %d"), \ |
|
|
173 | name, var, fname, lineno); \ |
|
|
174 | } while (0) |
209 | } while (0) |
175 | |
210 | |
176 | void configuration::read_config (bool need_keys) |
211 | const char * |
|
|
212 | configuration_parser::parse_line (char *line) |
|
|
213 | { |
|
|
214 | { |
|
|
215 | char *end = line + strlen (line); |
|
|
216 | |
|
|
217 | while (*end < ' ' && end >= line) |
|
|
218 | end--; |
|
|
219 | |
|
|
220 | *++end = 0; |
|
|
221 | } |
|
|
222 | |
|
|
223 | char *tok = line; |
|
|
224 | const char *var = strtok (tok, "\t ="); |
|
|
225 | tok = 0; |
|
|
226 | |
|
|
227 | if (!var || !var[0]) |
|
|
228 | return 0; /* no tokens on this line */ |
|
|
229 | |
|
|
230 | if (var[0] == '#') |
|
|
231 | return 0; /* comment: ignore */ |
|
|
232 | |
|
|
233 | char *val = strtok (NULL, "\t\n\r ="); |
|
|
234 | |
|
|
235 | if (!val || val[0] == '#') |
|
|
236 | return _("no value given for variable. (ignored)"); |
|
|
237 | |
|
|
238 | if (!strcmp (var, "on")) |
|
|
239 | { |
|
|
240 | if (!::thisnode |
|
|
241 | || (val[0] == '!' && strcmp (val + 1, ::thisnode)) |
|
|
242 | || !strcmp (val, ::thisnode)) |
|
|
243 | return parse_line (strtok (NULL, "\n\r")); |
|
|
244 | else |
|
|
245 | return 0; |
|
|
246 | } |
|
|
247 | |
|
|
248 | // truly global |
|
|
249 | if (!strcmp (var, "loglevel")) |
|
|
250 | { |
|
|
251 | loglevel l = string_to_loglevel (val); |
|
|
252 | |
|
|
253 | if (l == L_NONE) |
|
|
254 | return _("unknown loglevel. (skipping)"); |
|
|
255 | } |
|
|
256 | else if (!strcmp (var, "ip-proto")) |
|
|
257 | conf.ip_proto = atoi (val); |
|
|
258 | else if (!strcmp (var, "icmp-type")) |
|
|
259 | { |
|
|
260 | #if ENABLE_ICMP |
|
|
261 | conf.icmp_type = atoi (val); |
|
|
262 | #endif |
|
|
263 | } |
|
|
264 | |
|
|
265 | // per config |
|
|
266 | else if (!strcmp (var, "node")) |
|
|
267 | { |
|
|
268 | parse_argv (); |
|
|
269 | |
|
|
270 | conf.default_node.id++; |
|
|
271 | node = new conf_node (conf.default_node); |
|
|
272 | conf.nodes.push_back (node); |
|
|
273 | node->nodename = strdup (val); |
|
|
274 | |
|
|
275 | { |
|
|
276 | char *fname; |
|
|
277 | FILE *f; |
|
|
278 | |
|
|
279 | asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename); |
|
|
280 | |
|
|
281 | f = fopen (fname, "r"); |
|
|
282 | if (f) |
|
|
283 | { |
|
|
284 | node->rsa_key = RSA_new (); |
|
|
285 | |
|
|
286 | if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) |
|
|
287 | { |
|
|
288 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
|
|
289 | slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
|
|
290 | exit (EXIT_FAILURE); |
|
|
291 | } |
|
|
292 | |
|
|
293 | require (RSA_blinding_on (node->rsa_key, 0)); |
|
|
294 | |
|
|
295 | fclose (f); |
|
|
296 | } |
|
|
297 | else |
|
|
298 | { |
|
|
299 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); |
|
|
300 | |
|
|
301 | if (need_keys) |
|
|
302 | exit (EXIT_FAILURE); |
|
|
303 | } |
|
|
304 | |
|
|
305 | free (fname); |
|
|
306 | } |
|
|
307 | |
|
|
308 | if (::thisnode && !strcmp (node->nodename, ::thisnode)) |
|
|
309 | conf.thisnode = node; |
|
|
310 | } |
|
|
311 | else if (!strcmp (var, "private-key")) |
|
|
312 | free (conf.prikeyfile), conf.prikeyfile = strdup (val); |
|
|
313 | else if (!strcmp (var, "ifpersist")) |
|
|
314 | parse_bool (conf.ifpersist, "ifpersist", true, false); |
|
|
315 | else if (!strcmp (var, "ifname")) |
|
|
316 | free (conf.ifname), conf.ifname = strdup (val); |
|
|
317 | else if (!strcmp (var, "rekey")) |
|
|
318 | conf.rekey = atoi (val); |
|
|
319 | else if (!strcmp (var, "keepalive")) |
|
|
320 | conf.keepalive = atoi (val); |
|
|
321 | else if (!strcmp (var, "mtu")) |
|
|
322 | conf.mtu = atoi (val); |
|
|
323 | else if (!strcmp (var, "if-up")) |
|
|
324 | free (conf.script_if_up), conf.script_if_up = strdup (val); |
|
|
325 | else if (!strcmp (var, "node-up")) |
|
|
326 | free (conf.script_node_up), conf.script_node_up = strdup (val); |
|
|
327 | else if (!strcmp (var, "node-down")) |
|
|
328 | free (conf.script_node_down), conf.script_node_down = strdup (val); |
|
|
329 | else if (!strcmp (var, "pid-file")) |
|
|
330 | free (conf.pidfilename), conf.pidfilename = strdup (val); |
|
|
331 | else if (!strcmp (var, "dns-forw-host")) |
|
|
332 | { |
|
|
333 | #if ENABLE_DNS |
|
|
334 | free (conf.dns_forw_host), conf.dns_forw_host = strdup (val); |
|
|
335 | #endif |
|
|
336 | } |
|
|
337 | else if (!strcmp (var, "dns-forw-port")) |
|
|
338 | { |
|
|
339 | #if ENABLE_DNS |
|
|
340 | conf.dns_forw_port = atoi (val); |
|
|
341 | #endif |
|
|
342 | } |
|
|
343 | else if (!strcmp (var, "dns-timeout-factor")) |
|
|
344 | { |
|
|
345 | #if ENABLE_DNS |
|
|
346 | conf.dns_timeout_factor = atof (val); |
|
|
347 | #endif |
|
|
348 | } |
|
|
349 | else if (!strcmp (var, "dns-send-interval")) |
|
|
350 | { |
|
|
351 | #if ENABLE_DNS |
|
|
352 | conf.dns_send_interval = atoi (val); |
|
|
353 | #endif |
|
|
354 | } |
|
|
355 | else if (!strcmp (var, "dns-overlap-factor")) |
|
|
356 | { |
|
|
357 | #if ENABLE_DNS |
|
|
358 | conf.dns_overlap_factor = atof (val); |
|
|
359 | #endif |
|
|
360 | } |
|
|
361 | else if (!strcmp (var, "dns-max-outstanding")) |
|
|
362 | { |
|
|
363 | #if ENABLE_DNS |
|
|
364 | conf.dns_max_outstanding = atoi (val); |
|
|
365 | #endif |
|
|
366 | } |
|
|
367 | else if (!strcmp (var, "http-proxy-host")) |
|
|
368 | { |
|
|
369 | #if ENABLE_HTTP_PROXY |
|
|
370 | free (conf.proxy_host), conf.proxy_host = strdup (val); |
|
|
371 | #endif |
|
|
372 | } |
|
|
373 | else if (!strcmp (var, "http-proxy-port")) |
|
|
374 | { |
|
|
375 | #if ENABLE_HTTP_PROXY |
|
|
376 | conf.proxy_port = atoi (val); |
|
|
377 | #endif |
|
|
378 | } |
|
|
379 | else if (!strcmp (var, "http-proxy-auth")) |
|
|
380 | { |
|
|
381 | #if ENABLE_HTTP_PROXY |
|
|
382 | conf.proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val)); |
|
|
383 | #endif |
|
|
384 | } |
|
|
385 | |
|
|
386 | /* node-specific, non-defaultable */ |
|
|
387 | else if (node != &conf.default_node && !strcmp (var, "hostname")) |
|
|
388 | free (node->hostname), node->hostname = strdup (val); |
|
|
389 | |
|
|
390 | /* node-specific, defaultable */ |
|
|
391 | else if (!strcmp (var, "udp-port")) |
|
|
392 | node->udp_port = atoi (val); |
|
|
393 | else if (!strcmp (var, "tcp-port")) |
|
|
394 | node->tcp_port = atoi (val); |
|
|
395 | else if (!strcmp (var, "dns-hostname")) |
|
|
396 | { |
|
|
397 | #if ENABLE_DNS |
|
|
398 | free (node->dns_hostname), node->dns_hostname = strdup (val); |
|
|
399 | #endif |
|
|
400 | } |
|
|
401 | else if (!strcmp (var, "dns-port")) |
|
|
402 | { |
|
|
403 | #if ENABLE_DNS |
|
|
404 | node->dns_port = atoi (val); |
|
|
405 | #endif |
|
|
406 | } |
|
|
407 | else if (!strcmp (var, "dns-domain")) |
|
|
408 | { |
|
|
409 | #if ENABLE_DNS |
|
|
410 | free (node->domain), node->domain = strdup (val); |
|
|
411 | #endif |
|
|
412 | } |
|
|
413 | else if (!strcmp (var, "if-up-data")) |
|
|
414 | free (node->if_up_data), node->if_up_data = strdup (val); |
|
|
415 | else if (!strcmp (var, "router-priority")) |
|
|
416 | node->routerprio = atoi (val); |
|
|
417 | else if (!strcmp (var, "max-retry")) |
|
|
418 | node->max_retry = atoi (val); |
|
|
419 | else if (!strcmp (var, "connect")) |
|
|
420 | { |
|
|
421 | if (!strcmp (val, "ondemand")) |
|
|
422 | node->connectmode = conf_node::C_ONDEMAND; |
|
|
423 | else if (!strcmp (val, "never")) |
|
|
424 | node->connectmode = conf_node::C_NEVER; |
|
|
425 | else if (!strcmp (val, "always")) |
|
|
426 | node->connectmode = conf_node::C_ALWAYS; |
|
|
427 | else if (!strcmp (val, "disabled")) |
|
|
428 | node->connectmode = conf_node::C_DISABLED; |
|
|
429 | else |
|
|
430 | return _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled'. (ignored)"); |
|
|
431 | } |
|
|
432 | else if (!strcmp (var, "inherit-tos")) |
|
|
433 | parse_bool (node->inherit_tos, "inherit-tos", true, false); |
|
|
434 | else if (!strcmp (var, "compress")) |
|
|
435 | parse_bool (node->compress, "compress", true, false); |
|
|
436 | // all these bool options really really cost a lot of executable size! |
|
|
437 | else if (!strcmp (var, "enable-tcp")) |
|
|
438 | { |
|
|
439 | #if ENABLE_TCP |
|
|
440 | u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v; |
|
|
441 | #endif |
|
|
442 | } |
|
|
443 | else if (!strcmp (var, "enable-icmp")) |
|
|
444 | { |
|
|
445 | #if ENABLE_ICMP |
|
|
446 | u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v; |
|
|
447 | #endif |
|
|
448 | } |
|
|
449 | else if (!strcmp (var, "enable-dns")) |
|
|
450 | { |
|
|
451 | #if ENABLE_DNS |
|
|
452 | u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v; |
|
|
453 | #endif |
|
|
454 | } |
|
|
455 | else if (!strcmp (var, "enable-udp")) |
|
|
456 | { |
|
|
457 | u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; |
|
|
458 | } |
|
|
459 | else if (!strcmp (var, "enable-rawip")) |
|
|
460 | { |
|
|
461 | u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v; |
|
|
462 | } |
|
|
463 | else if (!strcmp (var, "allow-direct")) |
|
|
464 | node->allow_direct.push_back (strdup (val)); |
|
|
465 | else if (!strcmp (var, "deny-direct")) |
|
|
466 | node->deny_direct.push_back (strdup (val)); |
|
|
467 | else if (!strcmp (var, "max-ttl")) |
|
|
468 | node->max_ttl = atof (val); |
|
|
469 | else if (!strcmp (var, "max-queue")) |
|
|
470 | node->max_queue = atoi (val); |
|
|
471 | |
|
|
472 | // unknown or misplaced |
|
|
473 | else |
|
|
474 | return _("unknown configuration directive. (ignored)"); |
|
|
475 | |
|
|
476 | return 0; |
|
|
477 | } |
|
|
478 | |
|
|
479 | void configuration_parser::parse_argv () |
|
|
480 | { |
|
|
481 | for (int i = 0; i < argc; ++i) |
|
|
482 | { |
|
|
483 | char *v = argv [i]; |
|
|
484 | |
|
|
485 | if (!*v) |
|
|
486 | continue; |
|
|
487 | |
|
|
488 | char *enode = v; |
|
|
489 | |
|
|
490 | while (*enode != '.' && *enode > ' ' && *enode != '=' && *enode) |
|
|
491 | enode++; |
|
|
492 | |
|
|
493 | if (*enode != '.') |
|
|
494 | enode = 0; |
|
|
495 | |
|
|
496 | char *wnode = node == &conf.default_node |
|
|
497 | ? 0 |
|
|
498 | : node->nodename; |
|
|
499 | |
|
|
500 | if ((!wnode && !enode) |
|
|
501 | || (wnode && enode && !strncmp (wnode, v, enode - v))) |
|
|
502 | { |
|
|
503 | const char *warn = parse_line (enode ? enode + 1 : v); |
|
|
504 | |
|
|
505 | if (warn) |
|
|
506 | slog (L_WARN, _("%s, while parsing command line option '%s'."), warn, v); |
|
|
507 | |
|
|
508 | *v = 0; |
|
|
509 | } |
|
|
510 | } |
|
|
511 | } |
|
|
512 | |
|
|
513 | configuration_parser::configuration_parser (configuration &conf, |
|
|
514 | bool need_keys, |
|
|
515 | int argc, |
|
|
516 | char **argv) |
|
|
517 | : conf (conf),need_keys (need_keys), argc (argc), argv (argv) |
177 | { |
518 | { |
178 | char *fname; |
519 | char *fname; |
179 | FILE *f; |
520 | FILE *f; |
180 | |
521 | |
181 | clear_config (); |
522 | conf.clear (); |
182 | |
523 | |
183 | asprintf (&fname, "%s/gvpe.conf", confbase); |
524 | asprintf (&fname, "%s/gvpe.conf", confbase); |
184 | f = fopen (fname, "r"); |
525 | f = fopen (fname, "r"); |
185 | |
526 | |
186 | if (f) |
527 | if (f) |
187 | { |
528 | { |
188 | char line[16384]; |
529 | char line[16384]; |
189 | int lineno = 0; |
530 | int lineno = 0; |
190 | char *var, *val; |
531 | node = &conf.default_node; |
191 | conf_node *node = &default_node; |
|
|
192 | |
532 | |
193 | while (fgets (line, sizeof (line), f)) |
533 | while (fgets (line, sizeof (line), f)) |
194 | { |
534 | { |
195 | lineno++; |
535 | lineno++; |
196 | |
536 | |
197 | { |
537 | const char *warn = parse_line (line); |
198 | char *end = line + strlen (line); |
|
|
199 | |
538 | |
200 | while (*end < ' ' && end >= line) |
539 | if (warn) |
201 | end--; |
540 | slog (L_WARN, _("%s, at '%s', line %d."), warn, fname, lineno); |
202 | |
|
|
203 | *++end = 0; |
|
|
204 | } |
|
|
205 | |
|
|
206 | char *tok = line; |
|
|
207 | |
|
|
208 | retry: |
|
|
209 | var = strtok (tok, "\t ="); |
|
|
210 | tok = 0; |
|
|
211 | |
|
|
212 | if (!var || !var[0]) |
|
|
213 | continue; /* no tokens on this line */ |
|
|
214 | |
|
|
215 | if (var[0] == '#') |
|
|
216 | continue; /* comment: ignore */ |
|
|
217 | |
|
|
218 | val = strtok (NULL, "\t\n\r ="); |
|
|
219 | |
|
|
220 | if (!val || val[0] == '#') |
|
|
221 | { |
|
|
222 | slog (L_WARN, |
|
|
223 | _("no value for variable `%s', at '%s' line %d, skipping."), |
|
|
224 | var, fname, lineno); |
|
|
225 | continue; |
|
|
226 | } |
|
|
227 | |
|
|
228 | if (!strcmp (var, "on")) |
|
|
229 | { |
|
|
230 | if (!::thisnode |
|
|
231 | || (val[0] == '!' && strcmp (val + 1, ::thisnode)) |
|
|
232 | || !strcmp (val, ::thisnode)) |
|
|
233 | goto retry; |
|
|
234 | |
|
|
235 | continue; |
|
|
236 | } |
|
|
237 | |
|
|
238 | // truly global |
|
|
239 | if (!strcmp (var, "loglevel")) |
|
|
240 | { |
|
|
241 | loglevel l = string_to_loglevel (val); |
|
|
242 | |
|
|
243 | if (l != L_NONE) |
|
|
244 | llevel = l; |
|
|
245 | else |
|
|
246 | slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line); |
|
|
247 | } |
|
|
248 | else if (!strcmp (var, "ip-proto")) |
|
|
249 | ip_proto = atoi (val); |
|
|
250 | else if (!strcmp (var, "icmp-type")) |
|
|
251 | { |
|
|
252 | #if ENABLE_ICMP |
|
|
253 | icmp_type = atoi (val); |
|
|
254 | #endif |
|
|
255 | } |
|
|
256 | |
|
|
257 | // per config |
|
|
258 | else if (!strcmp (var, "node")) |
|
|
259 | { |
|
|
260 | default_node.id++; |
|
|
261 | |
|
|
262 | node = new conf_node (default_node); |
|
|
263 | |
|
|
264 | nodes.push_back (node); |
|
|
265 | |
|
|
266 | node->nodename = strdup (val); |
|
|
267 | |
|
|
268 | { |
|
|
269 | char *fname; |
|
|
270 | FILE *f; |
|
|
271 | |
|
|
272 | asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename); |
|
|
273 | |
|
|
274 | f = fopen (fname, "r"); |
|
|
275 | if (f) |
|
|
276 | { |
|
|
277 | node->rsa_key = RSA_new (); |
|
|
278 | |
|
|
279 | if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) |
|
|
280 | { |
|
|
281 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
|
|
282 | slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
|
|
283 | exit (EXIT_FAILURE); |
|
|
284 | } |
|
|
285 | |
|
|
286 | require (RSA_blinding_on (node->rsa_key, 0)); |
|
|
287 | |
|
|
288 | fclose (f); |
|
|
289 | } |
|
|
290 | else |
|
|
291 | { |
|
|
292 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); |
|
|
293 | |
|
|
294 | if (need_keys) |
|
|
295 | exit (EXIT_FAILURE); |
|
|
296 | } |
|
|
297 | |
|
|
298 | free (fname); |
|
|
299 | } |
|
|
300 | |
|
|
301 | if (::thisnode && !strcmp (node->nodename, ::thisnode)) |
|
|
302 | thisnode = node; |
|
|
303 | } |
|
|
304 | else if (!strcmp (var, "private-key")) |
|
|
305 | free (prikeyfile), prikeyfile = strdup (val); |
|
|
306 | else if (!strcmp (var, "ifpersist")) |
|
|
307 | parse_bool (ifpersist, "ifpersist", true, false); |
|
|
308 | else if (!strcmp (var, "ifname")) |
|
|
309 | free (ifname), ifname = strdup (val); |
|
|
310 | else if (!strcmp (var, "rekey")) |
|
|
311 | rekey = atoi (val); |
|
|
312 | else if (!strcmp (var, "keepalive")) |
|
|
313 | keepalive = atoi (val); |
|
|
314 | else if (!strcmp (var, "mtu")) |
|
|
315 | mtu = atoi (val); |
|
|
316 | else if (!strcmp (var, "if-up")) |
|
|
317 | free (script_if_up), script_if_up = strdup (val); |
|
|
318 | else if (!strcmp (var, "node-up")) |
|
|
319 | free (script_node_up), script_node_up = strdup (val); |
|
|
320 | else if (!strcmp (var, "node-down")) |
|
|
321 | free (script_node_down), script_node_down = strdup (val); |
|
|
322 | else if (!strcmp (var, "pid-file")) |
|
|
323 | free (pidfilename), pidfilename = strdup (val); |
|
|
324 | else if (!strcmp (var, "dns-forw-host")) |
|
|
325 | { |
|
|
326 | #if ENABLE_DNS |
|
|
327 | free (dns_forw_host), dns_forw_host = strdup (val); |
|
|
328 | #endif |
|
|
329 | } |
|
|
330 | else if (!strcmp (var, "dns-forw-port")) |
|
|
331 | { |
|
|
332 | #if ENABLE_DNS |
|
|
333 | dns_forw_port = atoi (val); |
|
|
334 | #endif |
|
|
335 | } |
|
|
336 | else if (!strcmp (var, "http-proxy-host")) |
|
|
337 | { |
|
|
338 | #if ENABLE_HTTP_PROXY |
|
|
339 | free (proxy_host), proxy_host = strdup (val); |
|
|
340 | #endif |
|
|
341 | } |
|
|
342 | else if (!strcmp (var, "http-proxy-port")) |
|
|
343 | { |
|
|
344 | #if ENABLE_HTTP_PROXY |
|
|
345 | proxy_port = atoi (val); |
|
|
346 | #endif |
|
|
347 | } |
|
|
348 | else if (!strcmp (var, "http-proxy-auth")) |
|
|
349 | { |
|
|
350 | #if ENABLE_HTTP_PROXY |
|
|
351 | proxy_auth = (char *)base64_encode ((const u8 *)val, strlen (val)); |
|
|
352 | #endif |
|
|
353 | } |
|
|
354 | |
|
|
355 | /* node-specific, non-defaultable */ |
|
|
356 | else if (node != &default_node && !strcmp (var, "hostname")) |
|
|
357 | free (node->hostname), node->hostname = strdup (val); |
|
|
358 | |
|
|
359 | /* node-specific, defaultable */ |
|
|
360 | else if (!strcmp (var, "udp-port")) |
|
|
361 | node->udp_port = atoi (val); |
|
|
362 | else if (!strcmp (var, "tcp-port")) |
|
|
363 | node->tcp_port = atoi (val); |
|
|
364 | else if (!strcmp (var, "dns-hostname")) |
|
|
365 | { |
|
|
366 | #if ENABLE_DNS |
|
|
367 | free (node->dns_hostname), node->dns_hostname = strdup (val); |
|
|
368 | #endif |
|
|
369 | } |
|
|
370 | else if (!strcmp (var, "dns-port")) |
|
|
371 | { |
|
|
372 | #if ENABLE_DNS |
|
|
373 | node->dns_port = atoi (val); |
|
|
374 | #endif |
|
|
375 | } |
|
|
376 | else if (!strcmp (var, "dns-domain")) |
|
|
377 | { |
|
|
378 | #if ENABLE_DNS |
|
|
379 | free (node->domain), node->domain = strdup (val); |
|
|
380 | #endif |
|
|
381 | } |
|
|
382 | else if (!strcmp (var, "router-priority")) |
|
|
383 | node->routerprio = atoi (val); |
|
|
384 | else if (!strcmp (var, "max-retry")) |
|
|
385 | node->max_retry = atoi (val); |
|
|
386 | else if (!strcmp (var, "connect")) |
|
|
387 | { |
|
|
388 | if (!strcmp (val, "ondemand")) |
|
|
389 | node->connectmode = conf_node::C_ONDEMAND; |
|
|
390 | else if (!strcmp (val, "never")) |
|
|
391 | node->connectmode = conf_node::C_NEVER; |
|
|
392 | else if (!strcmp (val, "always")) |
|
|
393 | node->connectmode = conf_node::C_ALWAYS; |
|
|
394 | else if (!strcmp (val, "disabled")) |
|
|
395 | node->connectmode = conf_node::C_DISABLED; |
|
|
396 | else |
|
|
397 | slog (L_WARN, |
|
|
398 | _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d, ignoring."), |
|
|
399 | var, fname, lineno); |
|
|
400 | } |
|
|
401 | else if (!strcmp (var, "inherit-tos")) |
|
|
402 | parse_bool (node->inherit_tos, "inherit-tos", true, false); |
|
|
403 | else if (!strcmp (var, "compress")) |
|
|
404 | parse_bool (node->compress, "compress", true, false); |
|
|
405 | // all these bool options really really cost a lot of executable size! |
|
|
406 | else if (!strcmp (var, "enable-tcp")) |
|
|
407 | { |
|
|
408 | #if ENABLE_TCP |
|
|
409 | u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v; |
|
|
410 | #endif |
|
|
411 | } |
|
|
412 | else if (!strcmp (var, "enable-icmp")) |
|
|
413 | { |
|
|
414 | #if ENABLE_ICMP |
|
|
415 | u8 v; parse_bool (v, "enable-icmp" , PROT_ICMPv4, 0); node->protocols = (node->protocols & ~PROT_ICMPv4) | v; |
|
|
416 | #endif |
|
|
417 | } |
|
|
418 | else if (!strcmp (var, "enable-dns")) |
|
|
419 | { |
|
|
420 | #if ENABLE_DNS |
|
|
421 | u8 v; parse_bool (v, "enable-dns" , PROT_DNSv4, 0); node->protocols = (node->protocols & ~PROT_DNSv4) | v; |
|
|
422 | #endif |
|
|
423 | } |
|
|
424 | else if (!strcmp (var, "enable-udp")) |
|
|
425 | { |
|
|
426 | u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v; |
|
|
427 | } |
|
|
428 | else if (!strcmp (var, "enable-rawip")) |
|
|
429 | { |
|
|
430 | u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v; |
|
|
431 | } |
|
|
432 | |
|
|
433 | // unknown or misplaced |
|
|
434 | else |
|
|
435 | slog (L_WARN, |
|
|
436 | _("unknown or misplaced variable `%s', at '%s' line %d, skipping."), |
|
|
437 | var, fname, lineno); |
|
|
438 | } |
541 | } |
439 | |
542 | |
440 | fclose (f); |
543 | fclose (f); |
|
|
544 | |
|
|
545 | parse_argv (); |
441 | } |
546 | } |
442 | else |
547 | else |
443 | { |
548 | { |
444 | slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); |
549 | slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); |
445 | exit (EXIT_FAILURE); |
550 | exit (EXIT_FAILURE); |
446 | } |
551 | } |
447 | |
552 | |
448 | free (fname); |
553 | free (fname); |
449 | |
554 | |
450 | fname = config_filename (prikeyfile, "hostkey"); |
555 | fname = conf.config_filename (conf.prikeyfile, "hostkey"); |
451 | |
556 | |
452 | f = fopen (fname, "r"); |
557 | f = fopen (fname, "r"); |
453 | if (f) |
558 | if (f) |
454 | { |
559 | { |
455 | rsa_key = RSA_new (); |
560 | conf.rsa_key = RSA_new (); |
456 | |
561 | |
457 | if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL)) |
562 | if (!PEM_read_RSAPrivateKey (f, &conf.rsa_key, NULL, NULL)) |
458 | { |
563 | { |
459 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
564 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
460 | slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
565 | slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
461 | exit (EXIT_FAILURE); |
566 | exit (EXIT_FAILURE); |
462 | } |
567 | } |
463 | |
568 | |
464 | require (RSA_blinding_on (rsa_key, 0)); |
569 | require (RSA_blinding_on (conf.rsa_key, 0)); |
465 | |
570 | |
466 | fclose (f); |
571 | fclose (f); |
467 | } |
572 | } |
468 | else |
573 | else |
469 | { |
574 | { |
… | |
… | |
472 | if (need_keys) |
577 | if (need_keys) |
473 | exit (EXIT_FAILURE); |
578 | exit (EXIT_FAILURE); |
474 | } |
579 | } |
475 | |
580 | |
476 | if (need_keys && ::thisnode |
581 | if (need_keys && ::thisnode |
477 | && rsa_key && thisnode && thisnode->rsa_key) |
582 | && conf.rsa_key && conf.thisnode && conf.thisnode->rsa_key) |
478 | if (BN_cmp (rsa_key->n, thisnode->rsa_key->n) != 0 |
583 | if (BN_cmp (conf.rsa_key->n, conf.thisnode->rsa_key->n) != 0 |
479 | || BN_cmp (rsa_key->e, thisnode->rsa_key->e) != 0) |
584 | || BN_cmp (conf.rsa_key->e, conf.thisnode->rsa_key->e) != 0) |
480 | { |
585 | { |
481 | slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode); |
586 | slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode); |
482 | exit (EXIT_FAILURE); |
587 | exit (EXIT_FAILURE); |
483 | } |
588 | } |
484 | |
589 | |