2 conf.c -- configuration code
3 Copyright (C) 1998 Robert van der Meulen
4 1998-2005 Ivo Timmermans
5 2000-2006 Guus Sliepen <guus@tinc-vpn.org>
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27 #include "splay_tree.h"
30 #include "netutl.h" /* for str2address */
31 #include "utils.h" /* for cp */
34 splay_tree_t *config_tree;
36 int pinginterval = 0; /* seconds between pings */
37 int pingtimeout = 0; /* seconds to wait for response */
38 char *confbase = NULL; /* directory in which all config files are */
39 char *netname = NULL; /* name of the vpn network */
41 static int config_compare(const config_t *a, const config_t *b) {
44 result = strcasecmp(a->variable, b->variable);
49 result = a->line - b->line;
54 return strcmp(a->file, b->file);
57 void init_configuration(splay_tree_t ** config_tree) {
60 *config_tree = splay_alloc_tree((splay_compare_t) config_compare, (splay_action_t) free_config);
63 void exit_configuration(splay_tree_t ** config_tree) {
66 splay_delete_tree(*config_tree);
70 config_t *new_config(void) {
73 return xmalloc_and_zero(sizeof(config_t));
76 void free_config(config_t *cfg) {
91 void config_add(splay_tree_t *config_tree, config_t *cfg) {
94 splay_insert(config_tree, cfg);
97 config_t *lookup_config(splay_tree_t *config_tree, char *variable) {
102 cfg.variable = variable;
106 found = splay_search_closest_greater(config_tree, &cfg);
111 if(strcasecmp(found->variable, variable))
117 config_t *lookup_config_next(splay_tree_t *config_tree, const config_t *cfg) {
123 node = splay_search_node(config_tree, cfg);
127 found = node->next->data;
129 if(!strcasecmp(found->variable, cfg->variable))
137 bool get_config_bool(const config_t *cfg, bool *result) {
143 if(!strcasecmp(cfg->value, "yes")) {
146 } else if(!strcasecmp(cfg->value, "no")) {
151 logger(LOG_ERR, _("\"yes\" or \"no\" expected for configuration variable %s in %s line %d"),
152 cfg->variable, cfg->file, cfg->line);
157 bool get_config_int(const config_t *cfg, int *result) {
163 if(sscanf(cfg->value, "%d", result) == 1)
166 logger(LOG_ERR, _("Integer expected for configuration variable %s in %s line %d"),
167 cfg->variable, cfg->file, cfg->line);
172 bool get_config_string(const config_t *cfg, char **result) {
178 *result = xstrdup(cfg->value);
183 bool get_config_address(const config_t *cfg, struct addrinfo **result) {
191 ai = str2addrinfo(cfg->value, NULL, 0);
198 logger(LOG_ERR, _("Hostname or IP address expected for configuration variable %s in %s line %d"),
199 cfg->variable, cfg->file, cfg->line);
204 bool get_config_subnet(const config_t *cfg, subnet_t ** result) {
205 subnet_t subnet = {0};
212 if(!str2net(&subnet, cfg->value)) {
213 logger(LOG_ERR, _("Subnet expected for configuration variable %s in %s line %d"),
214 cfg->variable, cfg->file, cfg->line);
218 /* Teach newbies what subnets are... */
220 if(((subnet.type == SUBNET_IPV4)
221 && !maskcheck(&subnet.net.ipv4.address, subnet.net.ipv4.prefixlength, sizeof(ipv4_t)))
222 || ((subnet.type == SUBNET_IPV6)
223 && !maskcheck(&subnet.net.ipv6.address, subnet.net.ipv6.prefixlength, sizeof(ipv6_t)))) {
224 logger(LOG_ERR, _ ("Network address and prefix length do not match for configuration variable %s in %s line %d"),
225 cfg->variable, cfg->file, cfg->line);
229 *(*result = new_subnet()) = subnet;
235 Read exactly one line and strip the trailing newline if any. If the
236 file was on EOF, return NULL. Otherwise, return all the data in a
237 dynamically allocated buffer.
239 If line is non-NULL, it will be used as an initial buffer, to avoid
240 unnecessary mallocing each time this function is called. If buf is
241 given, and buf needs to be expanded, the var pointed to by buflen
244 static char *readline(FILE * fp, char **buf, size_t *buflen) {
245 char *newline = NULL;
247 char *line; /* The array that contains everything that has been read so far */
248 char *idx; /* Read into this pointer, which points to an offset within line */
249 size_t size, newsize; /* The size of the current array pointed to by line */
250 size_t maxlen; /* Maximum number of characters that may be read with fgets. This is newsize - oldsize. */
260 line = xmalloc(size);
269 p = fgets(idx, maxlen, fp);
271 if(!p) { /* EOF or error */
275 /* otherwise: error; let the calling function print an error message if applicable */
280 newline = strchr(p, '\n');
282 if(!newline) { /* We haven't yet read everything to the end of the line */
284 line = xrealloc(line, newsize);
285 idx = &line[size - 1];
286 maxlen = newsize - size + 1;
289 *newline = '\0'; /* kill newline */
303 Parse a configuration file and put the results in the configuration tree
306 int read_config_file(splay_tree_t *config_tree, const char *fname) {
307 int err = -2; /* Parse error */
310 char *variable, *value, *eol;
319 fp = fopen(fname, "r");
322 logger(LOG_ERR, _("Cannot open config file %s: %s"), fname,
328 buffer = xmalloc(bufsize);
331 line = readline(fp, &buffer, &bufsize);
345 if(!*line || *line == '#')
349 if(!strncmp(line, "-----END", 8))
354 if(!strncmp(line, "-----BEGIN", 10)) {
359 variable = value = line;
361 eol = line + strlen(line);
362 while(strchr("\t ", *--eol))
365 len = strcspn(value, "\t =");
367 value += strspn(value, "\t ");
370 value += strspn(value, "\t ");
372 variable[len] = '\0';
376 logger(LOG_ERR, _("No value for variable `%s' on line %d while reading config file %s"),
377 variable, lineno, fname);
382 cfg->variable = xstrdup(variable);
383 cfg->value = xstrdup(value);
384 cfg->file = xstrdup(fname);
387 config_add(config_tree, cfg);
396 bool read_server_config() {
402 asprintf(&fname, "%s/tinc.conf", confbase);
403 x = read_config_file(config_tree, fname);
405 if(x == -1) { /* System error: complain */
406 logger(LOG_ERR, _("Failed to read `%s': %s"), fname, strerror(errno));
414 FILE *ask_and_open(const char *filename, const char *what, const char *mode) {
419 /* Check stdin and stdout */
420 if(!isatty(0) || !isatty(1)) {
421 /* Argh, they are running us from a script or something. Write
422 the files to the current directory and let them burn in hell
424 fn = xstrdup(filename);
426 /* Ask for a file and/or directory name. */
427 fprintf(stdout, _("Please enter a file to save %s to [%s]: "),
431 fn = readline(stdin, NULL, NULL);
434 fprintf(stderr, _("Error while reading stdin: %s\n"),
440 /* User just pressed enter. */
441 fn = xstrdup(filename);
445 if(fn[0] != '\\' && fn[0] != '/' && !strchr(fn, ':')) {
449 /* The directory is a relative path or a filename. */
452 directory = get_current_dir_name();
453 asprintf(&p, "%s/%s", directory, fn);
459 umask(0077); /* Disallow everything for group and other */
461 /* Open it first to keep the inode busy */
466 fprintf(stderr, _("Error opening file `%s': %s\n"),
467 fn, strerror(errno));