1 | /* |
1 | /* |
2 | conf.c -- configuration code |
2 | conf.C -- configuration code |
3 | Copyright (C) 2003-2008 Marc Lehmann <gvpe@schmorp.de> |
3 | Copyright (C) 2003-2008,2011 Marc Lehmann <gvpe@schmorp.de> |
4 | |
4 | |
5 | This file is part of GVPE. |
5 | This file is part of GVPE. |
6 | |
6 | |
7 | GVPE is free software; you can redistribute it and/or modify it |
7 | GVPE is free software; you can redistribute it and/or modify it |
8 | under the terms of the GNU General Public License as published by the |
8 | under the terms of the GNU General Public License as published by the |
… | |
… | |
38 | #include <errno.h> |
38 | #include <errno.h> |
39 | #include <netdb.h> |
39 | #include <netdb.h> |
40 | #include <sys/stat.h> |
40 | #include <sys/stat.h> |
41 | #include <sys/types.h> |
41 | #include <sys/types.h> |
42 | #include <unistd.h> |
42 | #include <unistd.h> |
|
|
43 | #include <pwd.h> |
43 | |
44 | |
44 | #include "netcompat.h" |
45 | #include "netcompat.h" |
45 | |
46 | |
46 | #include <openssl/err.h> |
47 | #include <openssl/err.h> |
47 | #include <openssl/pem.h> |
48 | #include <openssl/pem.h> |
… | |
… | |
57 | char *thisnode; |
58 | char *thisnode; |
58 | char *identname; |
59 | char *identname; |
59 | |
60 | |
60 | struct configuration conf; |
61 | struct configuration conf; |
61 | |
62 | |
|
|
63 | u8 |
62 | u8 best_protocol (u8 protset) |
64 | best_protocol (u8 protset) |
63 | { |
65 | { |
64 | if (protset & PROT_IPv4 ) return PROT_IPv4; |
66 | if (protset & PROT_IPv4 ) return PROT_IPv4; |
65 | if (protset & PROT_ICMPv4) return PROT_ICMPv4; |
67 | if (protset & PROT_ICMPv4) return PROT_ICMPv4; |
66 | if (protset & PROT_UDPv4 ) return PROT_UDPv4; |
68 | if (protset & PROT_UDPv4 ) return PROT_UDPv4; |
67 | if (protset & PROT_TCPv4 ) return PROT_TCPv4; |
69 | if (protset & PROT_TCPv4 ) return PROT_TCPv4; |
68 | if (protset & PROT_DNSv4 ) return PROT_DNSv4; |
70 | if (protset & PROT_DNSv4 ) return PROT_DNSv4; |
69 | |
71 | |
70 | return 0; |
72 | return 0; |
71 | } |
73 | } |
72 | |
74 | |
|
|
75 | const char * |
73 | const char *strprotocol (u8 protocol) |
76 | strprotocol (u8 protocol) |
74 | { |
77 | { |
75 | if (protocol & PROT_IPv4 ) return "rawip"; |
78 | if (protocol & PROT_IPv4 ) return "rawip"; |
76 | if (protocol & PROT_ICMPv4) return "icmp"; |
79 | if (protocol & PROT_ICMPv4) return "icmp"; |
77 | if (protocol & PROT_UDPv4 ) return "udp"; |
80 | if (protocol & PROT_UDPv4 ) return "udp"; |
78 | if (protocol & PROT_TCPv4 ) return "tcp"; |
81 | if (protocol & PROT_TCPv4 ) return "tcp"; |
… | |
… | |
92 | |
95 | |
93 | return false; |
96 | return false; |
94 | } |
97 | } |
95 | |
98 | |
96 | bool |
99 | bool |
97 | conf_node::can_direct (struct conf_node *other) |
100 | conf_node::may_direct (struct conf_node *other) |
98 | { |
101 | { |
99 | if (match_list (allow_direct, other->nodename)) |
102 | if (match_list (allow_direct, other->nodename)) |
100 | return true; |
103 | return true; |
101 | |
104 | |
102 | if (match_list (deny_direct, other->nodename)) |
105 | if (match_list (deny_direct, other->nodename)) |
103 | return false; |
106 | return false; |
104 | |
107 | |
105 | return true; |
108 | return true; |
106 | } |
|
|
107 | |
|
|
108 | void |
|
|
109 | conf_node::print () |
|
|
110 | { |
|
|
111 | printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %s%s%d\n", |
|
|
112 | id, |
|
|
113 | id >> 8, id & 0xff, |
|
|
114 | compress ? 'Y' : 'N', |
|
|
115 | connectmode == C_ONDEMAND ? "ondemand" : |
|
|
116 | connectmode == C_NEVER ? "never" : |
|
|
117 | connectmode == C_ALWAYS ? "always" : "", |
|
|
118 | nodename, |
|
|
119 | hostname ? hostname : "", |
|
|
120 | hostname ? ":" : "", |
|
|
121 | hostname ? udp_port : 0 |
|
|
122 | ); |
|
|
123 | } |
109 | } |
124 | |
110 | |
125 | conf_node::~conf_node () |
111 | conf_node::~conf_node () |
126 | { |
112 | { |
127 | #if 0 |
113 | #if 0 |
… | |
… | |
138 | free (dns_hostname); |
124 | free (dns_hostname); |
139 | #endif |
125 | #endif |
140 | #endif |
126 | #endif |
141 | } |
127 | } |
142 | |
128 | |
|
|
129 | void |
143 | void configuration::init () |
130 | configuration::init () |
144 | { |
131 | { |
145 | memset (this, 0, sizeof (*this)); |
132 | memset (this, 0, sizeof (*this)); |
146 | |
133 | |
147 | mtu = DEFAULT_MTU; |
134 | mtu = DEFAULT_MTU; |
|
|
135 | nfmark = 0; |
148 | rekey = DEFAULT_REKEY; |
136 | rekey = DEFAULT_REKEY; |
149 | keepalive = DEFAULT_KEEPALIVE; |
137 | keepalive = DEFAULT_KEEPALIVE; |
150 | llevel = L_INFO; |
138 | llevel = L_INFO; |
151 | ip_proto = IPPROTO_GRE; |
139 | ip_proto = IPPROTO_GRE; |
152 | #if ENABLE_ICMP |
140 | #if ENABLE_ICMP |
… | |
… | |
164 | default_node.if_up_data = strdup (""); |
152 | default_node.if_up_data = strdup (""); |
165 | |
153 | |
166 | #if ENABLE_DNS |
154 | #if ENABLE_DNS |
167 | default_node.dns_port = 0; // default is 0 == client |
155 | default_node.dns_port = 0; // default is 0 == client |
168 | |
156 | |
|
|
157 | dns_case_preserving = true; |
169 | dns_forw_host = strdup ("127.0.0.1"); |
158 | dns_forw_host = strdup ("127.0.0.1"); |
170 | dns_forw_port = 53; |
159 | dns_forw_port = 53; |
171 | dns_timeout_factor = DEFAULT_DNS_TIMEOUT_FACTOR; |
160 | dns_timeout_factor = DEFAULT_DNS_TIMEOUT_FACTOR; |
172 | dns_send_interval = DEFAULT_DNS_SEND_INTERVAL; |
161 | dns_send_interval = DEFAULT_DNS_SEND_INTERVAL; |
173 | dns_overlap_factor = DEFAULT_DNS_OVERLAP_FACTOR; |
162 | dns_overlap_factor = DEFAULT_DNS_OVERLAP_FACTOR; |
174 | dns_max_outstanding = DEFAULT_DNS_MAX_OUTSTANDING; |
163 | dns_max_outstanding = DEFAULT_DNS_MAX_OUTSTANDING; |
175 | #endif |
164 | #endif |
176 | |
165 | |
177 | conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid"); |
166 | pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid"); |
|
|
167 | seed_dev = strdup ("/dev/urandom"); |
|
|
168 | reseed = DEFAULT_RESEED; |
178 | } |
169 | } |
179 | |
170 | |
|
|
171 | void |
180 | void configuration::cleanup() |
172 | configuration::cleanup () |
181 | { |
173 | { |
182 | if (rsa_key) |
174 | if (rsa_key) |
183 | RSA_free (rsa_key); |
175 | RSA_free (rsa_key); |
184 | |
176 | |
185 | rsa_key = 0; |
177 | rsa_key = 0; |
186 | |
178 | |
|
|
179 | free (seed_dev); seed_dev = 0; |
187 | free (pidfilename); pidfilename = 0; |
180 | free (pidfilename); pidfilename = 0; |
188 | free (ifname); ifname = 0; |
181 | free (ifname); ifname = 0; |
189 | #if ENABLE_HTTP_PROXY |
182 | #if ENABLE_HTTP_PROXY |
190 | free (proxy_host); proxy_host = 0; |
183 | free (proxy_host); proxy_host = 0; |
191 | free (proxy_auth); proxy_auth = 0; |
184 | free (proxy_auth); proxy_auth = 0; |
192 | #endif |
185 | #endif |
193 | #if ENABLE_DNS |
186 | #if ENABLE_DNS |
194 | free (dns_forw_host); dns_forw_host = 0; |
187 | free (dns_forw_host); dns_forw_host = 0; |
195 | #endif |
188 | #endif |
|
|
189 | free (change_root); change_root = 0; |
|
|
190 | free (script_if_up); script_if_up = 0; |
|
|
191 | free (script_node_up); script_node_up = 0; |
|
|
192 | free (script_node_change); script_node_change = 0; |
|
|
193 | free (script_node_down); script_node_down = 0; |
196 | } |
194 | } |
197 | |
195 | |
198 | void |
196 | void |
199 | configuration::clear () |
197 | configuration::clear () |
200 | { |
198 | { |
… | |
… | |
204 | nodes.clear (); |
202 | nodes.clear (); |
205 | |
203 | |
206 | cleanup (); |
204 | cleanup (); |
207 | init (); |
205 | init (); |
208 | } |
206 | } |
|
|
207 | |
|
|
208 | conf_node * |
|
|
209 | configuration::find_node (const char *name) |
|
|
210 | { |
|
|
211 | for (configuration::node_vector::iterator i = conf.nodes.begin(); i != conf.nodes.end(); ++i) |
|
|
212 | if (!strcmp ((*i)->nodename, name)) |
|
|
213 | return *i; |
|
|
214 | |
|
|
215 | return 0; |
|
|
216 | } |
|
|
217 | |
|
|
218 | //static bool |
|
|
219 | //is_true (const char *name) |
|
|
220 | //{ |
|
|
221 | //re |
|
|
222 | //} |
209 | |
223 | |
210 | #define parse_bool(target,name,trueval,falseval) do { \ |
224 | #define parse_bool(target,name,trueval,falseval) do { \ |
211 | if (!strcmp (val, "yes")) target = trueval; \ |
225 | if (!strcmp (val, "yes")) target = trueval; \ |
212 | else if (!strcmp (val, "no")) target = falseval; \ |
226 | else if (!strcmp (val, "no")) target = falseval; \ |
213 | else if (!strcmp (val, "true")) target = trueval; \ |
227 | else if (!strcmp (val, "true")) target = trueval; \ |
214 | else if (!strcmp (val, "false")) target = falseval; \ |
228 | else if (!strcmp (val, "false")) target = falseval; \ |
215 | else if (!strcmp (val, "on")) target = trueval; \ |
229 | else if (!strcmp (val, "on")) target = trueval; \ |
216 | else if (!strcmp (val, "off")) target = falseval; \ |
230 | else if (!strcmp (val, "off")) target = falseval; \ |
217 | else \ |
231 | else \ |
218 | return _("illegal boolean value, only 'yes|true|on' or 'no|false|off' allowed. (ignored)"); \ |
232 | return _("illegal boolean value, only 'yes|true|on' or 'no|false|off' allowed, ignored"); \ |
219 | } while (0) |
233 | } while (0) |
220 | |
234 | |
221 | const char * |
235 | const char * |
222 | configuration_parser::parse_line (char *line) |
236 | configuration_parser::parse_line (char *line) |
223 | { |
237 | { |
224 | { |
238 | { |
225 | char *end = line + strlen (line); |
239 | char *end = line + strlen (line); |
226 | |
240 | |
227 | while (*end < ' ' && end >= line) |
241 | while (end >= line && *end < ' ') |
228 | end--; |
242 | end--; |
229 | |
243 | |
230 | *++end = 0; |
244 | *++end = 0; |
231 | } |
245 | } |
232 | |
246 | |
… | |
… | |
238 | return 0; /* no tokens on this line */ |
252 | return 0; /* no tokens on this line */ |
239 | |
253 | |
240 | if (var[0] == '#') |
254 | if (var[0] == '#') |
241 | return 0; /* comment: ignore */ |
255 | return 0; /* comment: ignore */ |
242 | |
256 | |
|
|
257 | if (!strcmp (var, "global")) |
|
|
258 | { |
|
|
259 | node = &conf.default_node; |
|
|
260 | return 0; |
|
|
261 | } |
|
|
262 | |
243 | char *val = strtok (NULL, "\t\n\r ="); |
263 | char *val = strtok (NULL, "\t\n\r ="); |
244 | |
264 | |
245 | if (!val || val[0] == '#') |
265 | if (!val || val[0] == '#') |
246 | return _("no value given for variable. (ignored)"); |
266 | return _("no value given for variable, ignored"); |
247 | |
267 | |
248 | if (!strcmp (var, "on")) |
268 | else if (!strcmp (var, "on")) |
249 | { |
269 | { |
250 | if (!::thisnode |
270 | if (::thisnode |
251 | || (val[0] == '!' && strcmp (val + 1, ::thisnode)) |
271 | && ((val[0] == '!' && strcmp (val + 1, ::thisnode)) |
252 | || !strcmp (val, ::thisnode)) |
272 | || !strcmp (val, ::thisnode))) |
253 | return parse_line (strtok (NULL, "\n\r")); |
273 | return parse_line (strtok (NULL, "\n\r")); |
254 | else |
274 | } |
255 | return 0; |
275 | |
|
|
276 | else if (!strcmp (var, "include")) |
|
|
277 | { |
|
|
278 | char *fname = conf.config_filename (val); |
|
|
279 | parse_file (fname); |
|
|
280 | free (fname); |
256 | } |
281 | } |
257 | |
282 | |
258 | // truly global |
283 | // truly global |
259 | if (!strcmp (var, "loglevel")) |
284 | else if (!strcmp (var, "loglevel")) |
260 | { |
285 | { |
261 | loglevel l = string_to_loglevel (val); |
286 | loglevel l = string_to_loglevel (val); |
262 | |
287 | |
263 | if (l == L_NONE) |
288 | if (l == L_NONE) |
264 | return _("unknown loglevel. (skipping)"); |
289 | return _("unknown loglevel, ignored"); |
265 | } |
290 | } |
|
|
291 | else if (!strcmp (var, "serial")) |
|
|
292 | strncpy (conf.serial, val, sizeof (conf.serial)); |
266 | else if (!strcmp (var, "ip-proto")) |
293 | else if (!strcmp (var, "ip-proto")) |
267 | conf.ip_proto = atoi (val); |
294 | conf.ip_proto = atoi (val); |
268 | else if (!strcmp (var, "icmp-type")) |
295 | else if (!strcmp (var, "icmp-type")) |
269 | { |
296 | { |
270 | #if ENABLE_ICMP |
297 | #if ENABLE_ICMP |
271 | conf.icmp_type = atoi (val); |
298 | conf.icmp_type = atoi (val); |
272 | #endif |
299 | #endif |
273 | } |
300 | } |
|
|
301 | else if (!strcmp (var, "chuser")) |
|
|
302 | { |
|
|
303 | struct passwd *pw = getpwnam (val); |
|
|
304 | if (!pw) |
|
|
305 | return _("user specified for chuser not found"); |
274 | |
306 | |
275 | // per config |
307 | conf.change_uid = pw->pw_uid; |
|
|
308 | conf.change_gid = pw->pw_gid; |
|
|
309 | } |
|
|
310 | else if (!strcmp (var, "chuid")) |
|
|
311 | conf.change_uid = atoi (val); |
|
|
312 | else if (!strcmp (var, "chgid")) |
|
|
313 | conf.change_gid = atoi (val); |
|
|
314 | else if (!strcmp (var, "chroot")) |
|
|
315 | free (conf.change_root), conf.change_root = strdup (val); |
|
|
316 | |
|
|
317 | // per node |
276 | else if (!strcmp (var, "node")) |
318 | else if (!strcmp (var, "node")) |
277 | { |
319 | { |
278 | parse_argv (); |
320 | node = conf.find_node (val); |
279 | |
321 | |
|
|
322 | if (!node) |
|
|
323 | { |
280 | conf.default_node.id++; |
324 | conf.default_node.id++; |
281 | node = new conf_node (conf.default_node); |
325 | node = new conf_node (conf.default_node); |
282 | conf.nodes.push_back (node); |
326 | conf.nodes.push_back (node); |
283 | node->nodename = strdup (val); |
327 | node->nodename = strdup (val); |
284 | |
|
|
285 | { |
|
|
286 | char *fname; |
|
|
287 | FILE *f; |
|
|
288 | |
|
|
289 | asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename); |
|
|
290 | |
|
|
291 | f = fopen (fname, "r"); |
|
|
292 | if (f) |
|
|
293 | { |
|
|
294 | node->rsa_key = RSA_new (); |
|
|
295 | |
|
|
296 | if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL)) |
|
|
297 | { |
|
|
298 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
|
|
299 | slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
|
|
300 | exit (EXIT_FAILURE); |
|
|
301 | } |
|
|
302 | |
|
|
303 | require (RSA_blinding_on (node->rsa_key, 0)); |
|
|
304 | |
|
|
305 | fclose (f); |
|
|
306 | } |
328 | } |
307 | else |
|
|
308 | { |
|
|
309 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); |
|
|
310 | |
|
|
311 | if (need_keys) |
|
|
312 | exit (EXIT_FAILURE); |
|
|
313 | } |
|
|
314 | |
|
|
315 | free (fname); |
|
|
316 | } |
|
|
317 | |
|
|
318 | if (::thisnode && !strcmp (node->nodename, ::thisnode)) |
|
|
319 | conf.thisnode = node; |
|
|
320 | } |
329 | } |
321 | else if (!strcmp (var, "private-key")) |
330 | else if (!strcmp (var, "private-key")) |
322 | free (conf.prikeyfile), conf.prikeyfile = strdup (val); |
331 | free (conf.prikeyfile), conf.prikeyfile = strdup (val); |
323 | else if (!strcmp (var, "ifpersist")) |
332 | else if (!strcmp (var, "ifpersist")) |
324 | parse_bool (conf.ifpersist, "ifpersist", true, false); |
333 | parse_bool (conf.ifpersist, "ifpersist", true, false); |
… | |
… | |
328 | conf.rekey = atoi (val); |
337 | conf.rekey = atoi (val); |
329 | else if (!strcmp (var, "keepalive")) |
338 | else if (!strcmp (var, "keepalive")) |
330 | conf.keepalive = atoi (val); |
339 | conf.keepalive = atoi (val); |
331 | else if (!strcmp (var, "mtu")) |
340 | else if (!strcmp (var, "mtu")) |
332 | conf.mtu = atoi (val); |
341 | conf.mtu = atoi (val); |
|
|
342 | else if (!strcmp (var, "nfmark")) |
|
|
343 | conf.nfmark = atoi (val); |
|
|
344 | else if (!strcmp (var, "seed-device")) |
|
|
345 | free (conf.seed_dev), conf.seed_dev = strdup (val); |
|
|
346 | else if (!strcmp (var, "seed-interval")) |
|
|
347 | conf.reseed = atoi (val); |
333 | else if (!strcmp (var, "if-up")) |
348 | else if (!strcmp (var, "if-up")) |
334 | free (conf.script_if_up), conf.script_if_up = strdup (val); |
349 | free (conf.script_if_up), conf.script_if_up = strdup (val); |
335 | else if (!strcmp (var, "node-up")) |
350 | else if (!strcmp (var, "node-up")) |
336 | free (conf.script_node_up), conf.script_node_up = strdup (val); |
351 | free (conf.script_node_up), conf.script_node_up = strdup (val); |
|
|
352 | else if (!strcmp (var, "node-change")) |
|
|
353 | free (conf.script_node_change), conf.script_node_change = strdup (val); |
337 | else if (!strcmp (var, "node-down")) |
354 | else if (!strcmp (var, "node-down")) |
338 | free (conf.script_node_down), conf.script_node_down = strdup (val); |
355 | free (conf.script_node_down), conf.script_node_down = strdup (val); |
339 | else if (!strcmp (var, "pid-file")) |
356 | else if (!strcmp (var, "pid-file")) |
340 | free (conf.pidfilename), conf.pidfilename = strdup (val); |
357 | free (conf.pidfilename), conf.pidfilename = strdup (val); |
341 | else if (!strcmp (var, "dns-forw-host")) |
358 | else if (!strcmp (var, "dns-forw-host")) |
… | |
… | |
370 | } |
387 | } |
371 | else if (!strcmp (var, "dns-max-outstanding")) |
388 | else if (!strcmp (var, "dns-max-outstanding")) |
372 | { |
389 | { |
373 | #if ENABLE_DNS |
390 | #if ENABLE_DNS |
374 | conf.dns_max_outstanding = atoi (val); |
391 | conf.dns_max_outstanding = atoi (val); |
|
|
392 | #endif |
|
|
393 | } |
|
|
394 | else if (!strcmp (var, "dns-case-preserving")) |
|
|
395 | { |
|
|
396 | #if ENABLE_DNS |
|
|
397 | parse_bool (conf.dns_case_preserving, "dns-case-preserving", true, false); |
375 | #endif |
398 | #endif |
376 | } |
399 | } |
377 | else if (!strcmp (var, "http-proxy-host")) |
400 | else if (!strcmp (var, "http-proxy-host")) |
378 | { |
401 | { |
379 | #if ENABLE_HTTP_PROXY |
402 | #if ENABLE_HTTP_PROXY |
… | |
… | |
435 | else if (!strcmp (val, "always")) |
458 | else if (!strcmp (val, "always")) |
436 | node->connectmode = conf_node::C_ALWAYS; |
459 | node->connectmode = conf_node::C_ALWAYS; |
437 | else if (!strcmp (val, "disabled")) |
460 | else if (!strcmp (val, "disabled")) |
438 | node->connectmode = conf_node::C_DISABLED; |
461 | node->connectmode = conf_node::C_DISABLED; |
439 | else |
462 | else |
440 | return _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled'. (ignored)"); |
463 | return _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', ignored"); |
441 | } |
464 | } |
442 | else if (!strcmp (var, "inherit-tos")) |
465 | else if (!strcmp (var, "inherit-tos")) |
443 | parse_bool (node->inherit_tos, "inherit-tos", true, false); |
466 | parse_bool (node->inherit_tos, "inherit-tos", true, false); |
444 | else if (!strcmp (var, "compress")) |
467 | else if (!strcmp (var, "compress")) |
445 | parse_bool (node->compress, "compress", true, false); |
468 | parse_bool (node->compress, "compress", true, false); |
|
|
469 | else if (!strcmp (var, "low-power")) |
|
|
470 | parse_bool (node->low_power, "low-power", true, false); |
446 | // all these bool options really really cost a lot of executable size! |
471 | // all these bool options really really cost a lot of executable size! |
447 | else if (!strcmp (var, "enable-tcp")) |
472 | else if (!strcmp (var, "enable-tcp")) |
448 | { |
473 | { |
449 | #if ENABLE_TCP |
474 | #if ENABLE_TCP |
450 | u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v; |
475 | u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v; |
… | |
… | |
475 | else if (!strcmp (var, "deny-direct")) |
500 | else if (!strcmp (var, "deny-direct")) |
476 | node->deny_direct.push_back (strdup (val)); |
501 | node->deny_direct.push_back (strdup (val)); |
477 | else if (!strcmp (var, "max-ttl")) |
502 | else if (!strcmp (var, "max-ttl")) |
478 | node->max_ttl = atof (val); |
503 | node->max_ttl = atof (val); |
479 | else if (!strcmp (var, "max-queue")) |
504 | else if (!strcmp (var, "max-queue")) |
480 | { |
|
|
481 | node->max_queue = atoi (val); |
505 | node->max_queue = atoi (val); |
482 | |
|
|
483 | if (node->max_queue < 1) |
|
|
484 | node->max_queue = 1; |
|
|
485 | } |
|
|
486 | |
506 | |
487 | // unknown or misplaced |
507 | // unknown or misplaced |
488 | else |
508 | else |
489 | return _("unknown configuration directive. (ignored)"); |
509 | return _("unknown configuration directive - ignored"); |
490 | |
510 | |
491 | return 0; |
511 | return 0; |
492 | } |
512 | } |
493 | |
513 | |
494 | void configuration_parser::parse_argv () |
514 | void |
|
|
515 | conf_node::finalise () |
495 | { |
516 | { |
496 | for (int i = 0; i < argc; ++i) |
517 | if (max_queue < 1) |
|
|
518 | { |
|
|
519 | slog (L_WARN, _("%s: max-queue value invalid, setting it to 1."), nodename); |
|
|
520 | max_queue = 1; |
497 | { |
521 | } |
498 | char *v = argv [i]; |
|
|
499 | |
522 | |
500 | if (!*v) |
523 | if (routerprio > 1 && (connectmode != C_ALWAYS && connectmode != C_DISABLED)) |
501 | continue; |
524 | { |
|
|
525 | //slog (L_WARN, _("%s: has non-zero router-priority but either 'never' or 'ondemand' as connectmode, setting it to 'always'."), nodename); |
|
|
526 | connectmode = C_ALWAYS; |
|
|
527 | } |
|
|
528 | } |
502 | |
529 | |
503 | char *enode = v; |
530 | void |
|
|
531 | configuration_parser::parse_file (const char *fname) |
|
|
532 | { |
|
|
533 | if (FILE *f = fopen (fname, "r")) |
|
|
534 | { |
|
|
535 | char line [2048]; |
|
|
536 | int lineno = 0; |
504 | |
537 | |
505 | while (*enode != '.' && *enode > ' ' && *enode != '=' && *enode) |
538 | while (fgets (line, sizeof (line), f)) |
506 | enode++; |
|
|
507 | |
|
|
508 | if (*enode != '.') |
|
|
509 | enode = 0; |
|
|
510 | |
|
|
511 | char *wnode = node == &conf.default_node |
|
|
512 | ? 0 |
|
|
513 | : node->nodename; |
|
|
514 | |
|
|
515 | if ((!wnode && !enode) |
|
|
516 | || (wnode && enode && !strncmp (wnode, v, enode - v))) |
|
|
517 | { |
539 | { |
|
|
540 | lineno++; |
|
|
541 | |
518 | const char *warn = parse_line (enode ? enode + 1 : v); |
542 | const char *warn = parse_line (line); |
519 | |
543 | |
520 | if (warn) |
544 | if (warn) |
521 | slog (L_WARN, _("%s, while parsing command line option '%s'."), warn, v); |
545 | slog (L_WARN, _("%s, at '%s', line %d."), warn, fname, lineno); |
522 | |
|
|
523 | *v = 0; |
|
|
524 | } |
546 | } |
|
|
547 | |
|
|
548 | fclose (f); |
|
|
549 | } |
|
|
550 | else |
|
|
551 | { |
|
|
552 | slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); |
|
|
553 | exit (EXIT_FAILURE); |
525 | } |
554 | } |
526 | } |
555 | } |
527 | |
556 | |
528 | configuration_parser::configuration_parser (configuration &conf, |
557 | configuration_parser::configuration_parser (configuration &conf, |
529 | bool need_keys, |
558 | bool need_keys, |
530 | int argc, |
559 | int argc, |
531 | char **argv) |
560 | char **argv) |
532 | : conf (conf),need_keys (need_keys), argc (argc), argv (argv) |
561 | : conf (conf), need_keys (need_keys), argc (argc), argv (argv) |
533 | { |
562 | { |
534 | char *fname; |
563 | char *fname; |
535 | FILE *f; |
|
|
536 | |
564 | |
537 | conf.clear (); |
565 | conf.clear (); |
|
|
566 | node = &conf.default_node; |
538 | |
567 | |
539 | asprintf (&fname, "%s/gvpe.conf", confbase); |
568 | asprintf (&fname, "%s/gvpe.conf", confbase); |
540 | f = fopen (fname, "r"); |
569 | parse_file (fname); |
541 | |
|
|
542 | if (f) |
|
|
543 | { |
|
|
544 | char line[16384]; |
|
|
545 | int lineno = 0; |
|
|
546 | node = &conf.default_node; |
|
|
547 | |
|
|
548 | while (fgets (line, sizeof (line), f)) |
|
|
549 | { |
|
|
550 | lineno++; |
|
|
551 | |
|
|
552 | const char *warn = parse_line (line); |
|
|
553 | |
|
|
554 | if (warn) |
|
|
555 | slog (L_WARN, _("%s, at '%s', line %d."), warn, fname, lineno); |
|
|
556 | } |
|
|
557 | |
|
|
558 | fclose (f); |
|
|
559 | |
|
|
560 | parse_argv (); |
|
|
561 | } |
|
|
562 | else |
|
|
563 | { |
|
|
564 | slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno)); |
|
|
565 | exit (EXIT_FAILURE); |
|
|
566 | } |
|
|
567 | |
|
|
568 | free (fname); |
570 | free (fname); |
569 | |
571 | |
570 | fname = conf.config_filename (conf.prikeyfile, "hostkey"); |
572 | fname = conf.config_filename (conf.prikeyfile, "hostkey"); |
571 | |
573 | |
572 | f = fopen (fname, "r"); |
574 | if (FILE *f = fopen (fname, "r")) |
573 | if (f) |
|
|
574 | { |
575 | { |
575 | conf.rsa_key = RSA_new (); |
576 | conf.rsa_key = RSA_new (); |
576 | |
577 | |
577 | if (!PEM_read_RSAPrivateKey (f, &conf.rsa_key, NULL, NULL)) |
578 | if (!PEM_read_RSAPrivateKey (f, &conf.rsa_key, NULL, NULL)) |
578 | { |
579 | { |
… | |
… | |
585 | |
586 | |
586 | fclose (f); |
587 | fclose (f); |
587 | } |
588 | } |
588 | else |
589 | else |
589 | { |
590 | { |
590 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); |
|
|
591 | |
|
|
592 | if (need_keys) |
591 | if (need_keys) |
|
|
592 | { |
|
|
593 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); |
593 | exit (EXIT_FAILURE); |
594 | exit (EXIT_FAILURE); |
594 | } |
|
|
595 | |
|
|
596 | if (need_keys && ::thisnode |
|
|
597 | && conf.rsa_key && conf.thisnode && conf.thisnode->rsa_key) |
|
|
598 | if (BN_cmp (conf.rsa_key->n, conf.thisnode->rsa_key->n) != 0 |
|
|
599 | || BN_cmp (conf.rsa_key->e, conf.thisnode->rsa_key->e) != 0) |
|
|
600 | { |
|
|
601 | slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode); |
|
|
602 | exit (EXIT_FAILURE); |
|
|
603 | } |
595 | } |
|
|
596 | } |
604 | |
597 | |
605 | free (fname); |
598 | free (fname); |
606 | } |
|
|
607 | |
599 | |
|
|
600 | fname = conf.config_filename (conf.pidfilename); |
|
|
601 | free (conf.pidfilename); conf.pidfilename = fname; |
|
|
602 | |
|
|
603 | for (configuration::node_vector::iterator i = conf.nodes.begin(); i != conf.nodes.end(); ++i) |
|
|
604 | { |
|
|
605 | conf_node *node = *i; |
|
|
606 | char *fname; |
|
|
607 | FILE *f; |
|
|
608 | |
|
|
609 | asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename); |
|
|
610 | |
|
|
611 | f = fopen (fname, "r"); |
|
|
612 | if (f) |
|
|
613 | { |
|
|
614 | node->rsa_key = RSA_new (); |
|
|
615 | |
|
|
616 | if (!PEM_read_RSAPublicKey (f, &node->rsa_key, NULL, NULL)) |
|
|
617 | { |
|
|
618 | ERR_load_RSA_strings (); ERR_load_PEM_strings (); |
|
|
619 | slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0)); |
|
|
620 | exit (EXIT_FAILURE); |
|
|
621 | } |
|
|
622 | |
|
|
623 | require (RSA_blinding_on (node->rsa_key, 0)); |
|
|
624 | |
|
|
625 | fclose (f); |
|
|
626 | } |
|
|
627 | else |
|
|
628 | { |
|
|
629 | slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno)); |
|
|
630 | |
|
|
631 | if (need_keys) |
|
|
632 | exit (EXIT_FAILURE); |
|
|
633 | } |
|
|
634 | |
|
|
635 | free (fname); |
|
|
636 | |
|
|
637 | (*i)->finalise (); |
|
|
638 | } |
|
|
639 | |
|
|
640 | if (::thisnode) |
|
|
641 | { |
|
|
642 | conf.thisnode = conf.find_node (::thisnode); |
|
|
643 | |
|
|
644 | if (need_keys) |
|
|
645 | { |
|
|
646 | if (!conf.thisnode) |
|
|
647 | { |
|
|
648 | slog (L_NOTICE, _("local node ('%s') not found in config file, aborting."), ::thisnode); |
|
|
649 | exit (EXIT_FAILURE); |
|
|
650 | } |
|
|
651 | |
|
|
652 | if (conf.rsa_key && conf.thisnode->rsa_key) |
|
|
653 | if (BN_cmp (conf.rsa_key->n, conf.thisnode->rsa_key->n) != 0 |
|
|
654 | || BN_cmp (conf.rsa_key->e, conf.thisnode->rsa_key->e) != 0) |
|
|
655 | { |
|
|
656 | slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode); |
|
|
657 | exit (EXIT_FAILURE); |
|
|
658 | } |
|
|
659 | } |
|
|
660 | } |
|
|
661 | |
|
|
662 | parse_argv (); |
|
|
663 | } |
|
|
664 | |
|
|
665 | void |
|
|
666 | configuration_parser::parse_argv () |
|
|
667 | { |
|
|
668 | for (int i = 0; i < argc; ++i) |
|
|
669 | { |
|
|
670 | char *v = argv [i]; |
|
|
671 | |
|
|
672 | if (!*v) |
|
|
673 | continue; |
|
|
674 | |
|
|
675 | char *enode = v; |
|
|
676 | |
|
|
677 | while (*enode != '.' && *enode > ' ' && *enode != '=' && *enode) |
|
|
678 | enode++; |
|
|
679 | |
|
|
680 | if (*enode != '.') |
|
|
681 | enode = 0; |
|
|
682 | |
|
|
683 | if (enode) |
|
|
684 | { |
|
|
685 | char *val = strdup (v); |
|
|
686 | val [enode - v] = 0; |
|
|
687 | node = conf.find_node (val); |
|
|
688 | free (val); |
|
|
689 | |
|
|
690 | if (!node) |
|
|
691 | { |
|
|
692 | slog (L_WARN, _("command line option '%s' refers to unknown node, ignoring."), v); |
|
|
693 | continue; |
|
|
694 | } |
|
|
695 | } |
|
|
696 | else |
|
|
697 | node = &conf.default_node; |
|
|
698 | |
|
|
699 | const char *warn = parse_line (enode ? enode + 1 : v); |
|
|
700 | |
|
|
701 | if (warn) |
|
|
702 | slog (L_WARN, _("%s, while parsing command line option '%s'."), warn, v); |
|
|
703 | } |
|
|
704 | } |
|
|
705 | |
|
|
706 | char * |
608 | char *configuration::config_filename (const char *name, const char *dflt) |
707 | configuration::config_filename (const char *name, const char *dflt) |
609 | { |
708 | { |
610 | char *fname; |
709 | char *fname; |
611 | |
710 | |
612 | asprintf (&fname, name ? name : dflt, ::thisnode); |
711 | asprintf (&fname, name ? name : dflt, ::thisnode ? ::thisnode : "<unset>"); |
613 | |
712 | |
614 | if (!ABSOLUTE_PATH (fname)) |
713 | if (!ABSOLUTE_PATH (fname)) |
615 | { |
714 | { |
616 | char *rname = fname; |
715 | char *rname = fname; |
617 | asprintf (&fname, "%s/%s", confbase, rname); |
716 | asprintf (&fname, "%s/%s", confbase, rname); |
618 | free (rname); |
717 | free (rname); |
619 | } |
718 | } |
620 | |
719 | |
621 | return fname; |
720 | return fname; |
|
|
721 | } |
|
|
722 | |
|
|
723 | void |
|
|
724 | conf_node::print () |
|
|
725 | { |
|
|
726 | printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %02x %s%s%d\n", |
|
|
727 | id, |
|
|
728 | id >> 8, id & 0xff, |
|
|
729 | compress ? 'Y' : 'N', |
|
|
730 | connectmode == C_ONDEMAND ? "ondemand" |
|
|
731 | : connectmode == C_NEVER ? "never" |
|
|
732 | : connectmode == C_ALWAYS ? "always" |
|
|
733 | : connectmode == C_DISABLED ? "disabled" |
|
|
734 | : "", |
|
|
735 | nodename, |
|
|
736 | protocols, |
|
|
737 | hostname ? hostname : "", |
|
|
738 | hostname ? ":" : "", |
|
|
739 | hostname ? udp_port : 0 |
|
|
740 | ); |
622 | } |
741 | } |
623 | |
742 | |
624 | void |
743 | void |
625 | configuration::print () |
744 | configuration::print () |
626 | { |
745 | { |
… | |
… | |
633 | printf (_("interface: %s\n"), ifname); |
752 | printf (_("interface: %s\n"), ifname); |
634 | printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>"); |
753 | printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>"); |
635 | printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1); |
754 | printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1); |
636 | printf ("\n"); |
755 | printf ("\n"); |
637 | |
756 | |
638 | printf ("%4s %-17s %s %-8.8s %-10.10s %s\n", |
757 | printf ("%4s %-17s %s %-8.8s %-10.10s %04s %s\n", |
639 | _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port")); |
758 | _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Prot"), _("Host:Port")); |
640 | |
759 | |
641 | for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i) |
760 | for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i) |
642 | (*i)->print (); |
761 | (*i)->print (); |
643 | |
762 | |
644 | printf ("\n"); |
763 | printf ("\n"); |
… | |
… | |
654 | configuration::~configuration () |
773 | configuration::~configuration () |
655 | { |
774 | { |
656 | cleanup (); |
775 | cleanup (); |
657 | } |
776 | } |
658 | |
777 | |
659 | |
|
|