ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/gvpe/src/conf.C
Revision: 1.10
Committed: Wed Apr 2 21:02:25 2003 UTC (21 years, 1 month ago) by pcg
Content type: text/plain
Branch: MAIN
Changes since 1.9: +1 -0 lines
Log Message:
§§

File Contents

# User Rev Content
1 pcg 1.1 /*
2     conf.c -- configuration code
3     Copyright (C) 1998 Robert van der Meulen
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    
9     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
11     the Free Software Foundation; either version 2 of the License, or
12     (at your option) any later version.
13    
14     This program is distributed in the hope that it will be useful,
15     but WITHOUT ANY WARRANTY; without even the implied warranty of
16     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17     GNU General Public License for more details.
18    
19     You should have received a copy of the GNU General Public License
20     along with this program; if not, write to the Free Software
21     Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22     */
23    
24     #include "config.h"
25    
26     #include <cstdio>
27     #include <cstdlib>
28     #include <cstring>
29    
30     #include <errno.h>
31     #include <netdb.h>
32     #include <sys/stat.h>
33     #include <sys/types.h>
34     #include <unistd.h>
35    
36 pcg 1.5 #include <netinet/in.h>
37    
38 pcg 1.1 #include <openssl/err.h>
39     #include <openssl/pem.h>
40     #include <openssl/rsa.h>
41     #include <openssl/rand.h>
42    
43     #include "gettext.h"
44    
45     #include "conf.h"
46     #include "slog.h"
47     #include "util.h"
48    
49     char *confbase;
50     char *thisnode;
51     char *identname;
52     char *pidfilename;
53    
54     struct configuration conf;
55    
56 pcg 1.7 u8 best_protocol (u8 protset)
57     {
58 pcg 1.9 if (protset & PROT_IPv4 ) return PROT_IPv4;
59     if (protset & PROT_UDPv4) return PROT_UDPv4;
60     if (protset & PROT_TCPv4) return PROT_TCPv4;
61 pcg 1.7
62 pcg 1.9 return 0;
63 pcg 1.7 }
64    
65     const char *strprotocol (u8 protocol)
66     {
67     if (protocol & PROT_IPv4 ) return "rawip";
68     if (protocol & PROT_UDPv4) return "udp";
69 pcg 1.10 if (protocol & PROT_TCPv4) return "tcp";
70 pcg 1.7
71     return "<unknown>";
72     }
73    
74 pcg 1.1 configuration::configuration ()
75     {
76     init ();
77     }
78    
79     configuration::~configuration ()
80     {
81     cleanup ();
82     }
83    
84     void configuration::init ()
85     {
86     memset (this, 0, sizeof (*this));
87    
88     rekey = DEFAULT_REKEY;
89     keepalive = DEFAULT_KEEPALIVE;
90 pcg 1.2 llevel = L_INFO;
91 pcg 1.5 ip_proto = IPPROTO_GRE;
92 pcg 1.1
93 pcg 1.5 default_node.udp_port = DEFAULT_UDPPORT;
94 pcg 1.8 default_node.tcp_port = DEFAULT_UDPPORT;
95 pcg 1.1 default_node.connectmode = conf_node::C_ALWAYS;
96     default_node.compress = true;
97 pcg 1.6 default_node.protocols = PROT_UDPv4;
98 pcg 1.1 }
99    
100     void configuration::cleanup()
101     {
102     if (rsa_key)
103     RSA_free (rsa_key);
104    
105     free (ifname);
106    
107     rsa_key = 0;
108     ifname = 0;
109     }
110    
111     void
112     configuration::clear_config ()
113     {
114     for (configuration::node_vector::iterator i = nodes.begin(); i != nodes.end(); ++i)
115     delete *i;
116    
117     nodes.clear ();
118    
119     cleanup ();
120     init ();
121     }
122    
123 pcg 1.5 #define parse_bool(target,name,trueval,falseval) \
124     if (!strcmp (val, "yes")) target = trueval; \
125     else if (!strcmp (val, "no")) target = falseval; \
126     else if (!strcmp (val, "true")) target = trueval; \
127     else if (!strcmp (val, "false")) target = falseval; \
128     else if (!strcmp (val, "on")) target = trueval; \
129     else if (!strcmp (val, "off")) target = falseval; \
130     else \
131     slog (L_WARN, \
132     _("illegal value for '%s', only 'yes|true|on' or 'no|false|off' allowed, at '%s' line %d"), \
133     name, var, fname, lineno);
134    
135 pcg 1.1 void configuration::read_config (bool need_keys)
136     {
137     char *fname;
138     FILE *f;
139    
140     clear_config ();
141    
142     asprintf (&fname, "%s/vped.conf", confbase);
143     f = fopen (fname, "r");
144    
145     if (f)
146     {
147     char line[16384];
148     int lineno = 0;
149     char *var, *val;
150     conf_node *node = &default_node;
151    
152     while (fgets (line, sizeof (line), f))
153     {
154     lineno++;
155    
156     {
157     char *end = line + strlen (line);
158    
159     while (*end < ' ' && end >= line)
160     end--;
161    
162     *++end = 0;
163     }
164    
165     char *tok = line;
166    
167     retry:
168     var = strtok (tok, "\t =");
169     tok = 0;
170    
171     if (!var || !var[0])
172     continue; /* no tokens on this line */
173    
174     if (var[0] == '#')
175     continue; /* comment: ignore */
176    
177     val = strtok (NULL, "\t\n\r =");
178    
179     if (!val || val[0] == '#')
180     {
181     slog (L_WARN,
182     _("no value for variable `%s', at '%s' line %d"),
183     var, fname, lineno);
184     break;
185     }
186    
187     if (!strcmp (var, "on"))
188     {
189     if (!::thisnode
190     || (val[0] == '!' && strcmp (val + 1, ::thisnode))
191     || !strcmp (val, ::thisnode))
192     goto retry;
193    
194     continue;
195     }
196    
197     // truly global
198     if (!strcmp (var, "loglevel"))
199     {
200     loglevel l = string_to_loglevel (val);
201    
202     if (l != L_NONE)
203 pcg 1.2 llevel = l;
204 pcg 1.1 else
205     slog (L_WARN, "'%s': %s, at '%s' line %d", val, UNKNOWN_LOGLEVEL, fname, line);
206     }
207 pcg 1.5 else if (!strcmp (var, "ip-proto"))
208     ip_proto = atoi (val);
209 pcg 1.1
210     // per config
211     else if (!strcmp (var, "node"))
212     {
213     default_node.id++;
214    
215     node = new conf_node (default_node);
216    
217     nodes.push_back (node);
218    
219     node->nodename = strdup (val);
220    
221     {
222     char *fname;
223     FILE *f;
224    
225     asprintf (&fname, "%s/pubkey/%s", confbase, node->nodename);
226    
227     f = fopen (fname, "r");
228     if (f)
229     {
230     node->rsa_key = RSA_new ();
231    
232     if (!PEM_read_RSAPublicKey(f, &node->rsa_key, NULL, NULL))
233     {
234     ERR_load_RSA_strings (); ERR_load_PEM_strings ();
235     slog (L_ERR, _("unable to open public rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
236     exit (1);
237     }
238    
239     RSA_blinding_on (node->rsa_key, 0);
240    
241     fclose (f);
242     }
243     else
244     {
245     slog (need_keys ? L_ERR : L_NOTICE, _("unable to read public rsa key file '%s': %s"), fname, strerror (errno));
246    
247     if (need_keys)
248     exit (1);
249     }
250    
251     free (fname);
252     }
253    
254     if (!::thisnode || !strcmp (node->nodename, ::thisnode))
255     thisnode = node;
256     }
257     else if (!strcmp (var, "private-key"))
258     prikeyfile = strdup (val);
259     else if (!strcmp (var, "ifpersist"))
260     {
261 pcg 1.5 parse_bool (ifpersist, "ifpersist", true, false);
262 pcg 1.1 }
263     else if (!strcmp (var, "ifname"))
264     ifname = strdup (val);
265     else if (!strcmp (var, "rekey"))
266     rekey = atoi (val);
267     else if (!strcmp (var, "keepalive"))
268     keepalive = atoi (val);
269     else if (!strcmp (var, "mtu"))
270     mtu = atoi (val);
271     else if (!strcmp (var, "if-up"))
272     script_if_up = strdup (val);
273     else if (!strcmp (var, "node-up"))
274     script_node_up = strdup (val);
275     else if (!strcmp (var, "node-down"))
276     script_node_down = strdup (val);
277    
278     /* node-specific, non-defaultable */
279     else if (node != &default_node && !strcmp (var, "hostname"))
280     {
281     free (node->hostname);
282     node->hostname = strdup (val);
283     }
284    
285     /* node-specific, defaultable */
286 pcg 1.4 else if (!strcmp (var, "udp-port"))
287 pcg 1.5 node->udp_port = atoi (val);
288 pcg 1.8 else if (!strcmp (var, "tcp-port"))
289     node->tcp_port = atoi (val);
290 pcg 1.1 else if (!strcmp (var, "router-priority"))
291     node->routerprio = atoi (val);
292     else if (!strcmp (var, "connect"))
293     {
294     if (!strcmp (val, "ondemand"))
295     node->connectmode = conf_node::C_ONDEMAND;
296     else if (!strcmp (val, "never"))
297     node->connectmode = conf_node::C_NEVER;
298     else if (!strcmp (val, "always"))
299     node->connectmode = conf_node::C_ALWAYS;
300 pcg 1.4 else if (!strcmp (val, "disabled"))
301     node->connectmode = conf_node::C_DISABLED;
302 pcg 1.1 else
303     slog (L_WARN,
304 pcg 1.4 _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', at '%s' line %d"),
305 pcg 1.1 var, fname, lineno);
306     }
307 pcg 1.3 else if (!strcmp (var, "inherit-tos"))
308     {
309 pcg 1.5 parse_bool (node->inherit_tos, "inherit-tos", true, false);
310 pcg 1.3 }
311 pcg 1.1 else if (!strcmp (var, "compress"))
312     {
313 pcg 1.5 parse_bool (node->compress, "compress", true, false);
314     }
315     // all these bool options really really cost a lot of executable size!
316 pcg 1.8 else if (!strcmp (var, "enable-tcp"))
317     {
318     u8 v; parse_bool (v, "enable-tcp" , PROT_TCPv4, 0); node->protocols = (node->protocols & ~PROT_TCPv4) | v;
319     }
320 pcg 1.6 else if (!strcmp (var, "enable-udp"))
321 pcg 1.5 {
322 pcg 1.6 u8 v; parse_bool (v, "enable-udp" , PROT_UDPv4, 0); node->protocols = (node->protocols & ~PROT_UDPv4) | v;
323 pcg 1.5 }
324 pcg 1.6 else if (!strcmp (var, "enable-rawip"))
325 pcg 1.5 {
326 pcg 1.6 u8 v; parse_bool (v, "enable-rawip", PROT_IPv4, 0); node->protocols = (node->protocols & ~PROT_IPv4 ) | v;
327 pcg 1.1 }
328    
329     // unknown or misplaced
330     else
331     {
332     slog (L_WARN,
333     _("unknown or misplaced variable `%s', at '%s' line %d"),
334     var, fname, lineno);
335     }
336     }
337    
338     fclose (f);
339     }
340     else
341     {
342     slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
343     exit (1);
344     }
345    
346     free (fname);
347    
348     fname = config_filename (prikeyfile, "hostkey");
349    
350     f = fopen (fname, "r");
351     if (f)
352     {
353     rsa_key = RSA_new ();
354    
355     if (!PEM_read_RSAPrivateKey (f, &rsa_key, NULL, NULL))
356     {
357     ERR_load_RSA_strings (); ERR_load_PEM_strings ();
358     slog (L_ERR, _("unable to read private rsa key file '%s': %s"), fname, ERR_error_string (ERR_get_error (), 0));
359     exit (1);
360     }
361    
362     RSA_blinding_on (rsa_key, 0);
363    
364     fclose (f);
365     }
366     else
367     {
368     slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
369    
370     if (need_keys)
371     exit (1);
372     }
373    
374     free (fname);
375     }
376    
377     char *configuration::config_filename (const char *name, const char *dflt)
378     {
379     char *fname;
380    
381     asprintf (&fname, name ? name : dflt, ::thisnode);
382    
383     if (!ABSOLUTE_PATH (fname))
384     {
385     char *rname = fname;
386     asprintf (&fname, "%s/%s", confbase, rname);
387     free (rname);
388     }
389    
390     return fname;
391     }
392    
393     void
394     configuration::print ()
395     {
396     printf (_("\nConfiguration\n\n"));
397     printf (_("# of nodes: %d\n"), nodes.size ());
398     printf (_("this node: %s\n"), thisnode ? thisnode->nodename : "<unset>");
399     printf (_("MTU: %d\n"), mtu);
400     printf (_("rekeying interval: %d\n"), rekey);
401     printf (_("keepalive interval: %d\n"), keepalive);
402     printf (_("interface: %s\n"), ifname);
403     printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
404     printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) : -1);
405     printf ("\n");
406    
407     printf ("%4s %-17s %s %-8.8s %-10.10s %s\n",
408     _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port"));
409    
410     for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i)
411     (*i)->print ();
412    
413     printf ("\n");
414     }
415    
416     void
417     conf_node::print ()
418     {
419     printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %s%s%d\n",
420     id,
421     id >> 8, id & 0xff,
422     compress ? 'Y' : 'N',
423     connectmode == C_ONDEMAND ? "ondemand" :
424     connectmode == C_NEVER ? "never" :
425     connectmode == C_ALWAYS ? "always" : "",
426     nodename,
427     hostname ? hostname : "",
428     hostname ? ":" : "",
429 pcg 1.5 hostname ? udp_port : 0
430 pcg 1.1 );
431     }
432