2 conf.c -- configuration code
3 Copyright (C) 1998 Robert van der Meulen
4 Copyright (C) 1998,1999,2000 Ivo Timmermans <itimmermans@bigfoot.com>
5 2000 Guus Sliepen <guus@sliepen.warande.net>
6 2000 Cris van Pelt <tribbel@arise.dhs.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.
22 $Id: conf.c,v 1.9.4.37 2001/01/06 18:03:39 guus Exp $
35 #include <sys/types.h>
40 #include <utils.h> /* for cp */
43 #include "netutl.h" /* for strtoip */
47 config_t *config = NULL;
49 int timeout = 0; /* seconds before timeout */
50 char *confbase = NULL; /* directory in which all config files are */
51 char *netname = NULL; /* name of the vpn network */
53 /* Will be set if HUP signal is received. It will be processed when it is safe. */
57 These are all the possible configurable values
59 static internal_config_t hazahaza[] = {
60 /* Main configuration file keywords */
61 { "ConnectTo", config_connectto, TYPE_NAME },
62 { "Hostnames", config_hostnames, TYPE_BOOL },
63 { "Interface", config_interface, TYPE_NAME },
64 { "InterfaceIP", config_interfaceip, TYPE_IP },
65 { "KeyExpire", config_keyexpire, TYPE_INT },
66 { "MyVirtualIP", config_dummy, TYPE_IP },
67 { "MyOwnVPNIP", config_dummy, TYPE_IP },
68 { "Name", config_name, TYPE_NAME },
69 { "PingTimeout", config_pingtimeout, TYPE_INT },
70 { "PrivateKey", config_privatekey, TYPE_NAME },
71 { "PrivateKeyFile", config_privatekeyfile, TYPE_NAME },
72 { "TapDevice", config_tapdevice, TYPE_NAME },
73 { "VpnMask", config_dummy, TYPE_IP },
74 /* Host configuration file keywords */
75 { "Address", config_address, TYPE_NAME },
76 { "IndirectData", config_indirectdata, TYPE_BOOL },
77 { "Port", config_port, TYPE_INT },
78 { "PublicKey", config_publickey, TYPE_NAME },
79 { "PublicKeyFile", config_publickeyfile, TYPE_NAME },
80 { "RestrictAddress", config_restrictaddress, TYPE_BOOL },
81 { "RestrictHosts", config_restricthosts, TYPE_BOOL },
82 { "RestrictPort", config_restrictport, TYPE_BOOL },
83 { "RestrictSubnets", config_restrictsubnets, TYPE_BOOL },
84 { "Subnet", config_subnet, TYPE_IP }, /* Use IPv4 subnets only for now */
85 { "TCPonly", config_tcponly, TYPE_BOOL },
90 Add given value to the list of configs cfg
93 add_config_val(config_t **cfg, int argtype, char *val)
98 p = (config_t*)xmalloc(sizeof(*p));
104 p->data.val = strtol(val, &q, 0);
109 p->data.ptr = xmalloc(strlen(val) + 1);
110 strcpy(p->data.ptr, val);
113 p->data.ip = strtoip(val);
116 if(!strcasecmp("yes", val))
117 p->data.val = stupid_true;
118 else if(!strcasecmp("no", val))
119 p->data.val = stupid_false;
124 p->argtype = argtype;
142 Read exactly one line and strip the trailing newline if any. If the
143 file was on EOF, return NULL. Otherwise, return all the data in a
144 dynamically allocated buffer.
146 If line is non-NULL, it will be used as an initial buffer, to avoid
147 unnecessary mallocing each time this function is called. If buf is
148 given, and buf needs to be expanded, the var pointed to by buflen
151 char *readline(FILE *fp, char **buf, size_t *buflen)
153 char *newline = NULL;
155 char *line; /* The array that contains everything that has been read
157 char *idx; /* Read into this pointer, which points to an offset
159 size_t size, newsize; /* The size of the current array pointed to by
161 size_t maxlen; /* Maximum number of characters that may be read with
162 fgets. This is newsize - oldsize. */
167 if((buf != NULL) && (buflen != NULL))
175 line = xmalloc(size);
184 p = fgets(idx, maxlen, fp);
185 if(p == NULL) /* EOF or error */
190 /* otherwise: error; let the calling function print an error
191 message if applicable */
196 newline = strchr(p, '\n');
198 /* We haven't yet read everything to the end of the line */
201 line = xrealloc(line, newsize);
202 idx = &line[size - 1];
203 maxlen = newsize - size + 1;
208 *newline = '\0'; /* kill newline */
213 if((buf != NULL) && (buflen != NULL))
222 Parse a configuration file and put the results in the configuration tree
225 int read_config_file(config_t **base, const char *fname)
227 int err = -2; /* Parse error */
236 if((fp = fopen (fname, "r")) == NULL)
238 syslog(LOG_ERR, _("Cannot open config file %s: %m"), fname);
243 buffer = xmalloc(bufsize);
248 if((line = readline(fp, &buffer, &bufsize)) == NULL)
262 if((p = strtok(line, "\t =")) == NULL)
263 continue; /* no tokens on this line */
266 continue; /* comment: ignore */
268 for(i = 0; hazahaza[i].name != NULL; i++)
269 if(!strcasecmp(hazahaza[i].name, p))
272 if(!hazahaza[i].name)
274 syslog(LOG_ERR, _("Invalid variable name `%s' on line %d while reading config file %s"),
279 if(((q = strtok(NULL, "\t\n\r =")) == NULL) || q[0] == '#')
281 syslog(LOG_ERR, _("No value for variable `%s' on line %d while reading config file %s"),
282 hazahaza[i].name, lineno, fname);
286 cfg = add_config_val(base, hazahaza[i].argtype, q);
289 syslog(LOG_ERR, _("Invalid value for variable `%s' on line %d while reading config file %s"),
290 hazahaza[i].name, lineno, fname);
294 cfg->which = hazahaza[i].which;
305 int read_server_config()
310 asprintf(&fname, "%s/tinc.conf", confbase);
311 x = read_config_file(&config, fname);
312 if(x == -1) /* System error */
314 syslog(LOG_ERR, _("Failed to read `%s': %m"),
323 Look up the value of the config option type
325 const config_t *get_config_val(config_t *p, which_t type)
328 for(; p != NULL; p = p->next)
336 Remove the complete configuration tree.
338 void clear_config(config_t **base)
342 for(p = *base; p != NULL; p = next)
345 if(p->data.ptr && (p->argtype == TYPE_NAME))
355 int isadir(const char* f)
362 return S_ISDIR(s.st_mode);
365 int is_safe_path(const char *file)
375 syslog(LOG_ERR, _("`%s' is not an absolute path"), file);
379 p = strrchr(file, '/');
381 if(p == file) /* It's in the root */
391 syslog(LOG_ERR, _("Couldn't stat `%s': %m"),
396 if(s.st_uid != geteuid())
398 syslog(LOG_ERR, _("`%s' is owned by UID %d instead of %d"),
399 f, s.st_uid, geteuid());
403 if(S_ISLNK(s.st_mode))
405 syslog(LOG_WARNING, _("Warning: `%s' is a symlink"),
408 if(readlink(f, l, MAXBUFSIZE) < 0)
410 syslog(LOG_ERR, _("Unable to read symbolic link `%s': %m"), f);
422 if(lstat(f, &s) < 0 && errno != ENOENT)
424 syslog(LOG_ERR, _("Couldn't stat `%s': %m"),
432 if(s.st_uid != geteuid())
434 syslog(LOG_ERR, _("`%s' is owned by UID %d instead of %d"),
435 f, s.st_uid, geteuid());
439 if(S_ISLNK(s.st_mode))
441 syslog(LOG_WARNING, _("Warning: `%s' is a symlink"),
444 if(readlink(f, l, MAXBUFSIZE) < 0)
446 syslog(LOG_ERR, _("Unable to read symbolic link `%s': %m"), f);
456 /* Accessible by others */
457 syslog(LOG_ERR, _("`%s' has unsecure permissions"),
465 FILE *ask_and_safe_open(const char* filename, const char* what)
471 /* Check stdin and stdout */
472 if(!isatty(0) || !isatty(1))
474 /* Argh, they are running us from a script or something. Write
475 the files to the current directory and let them burn in hell
477 fn = xstrdup(filename);
481 /* Ask for a file and/or directory name. */
482 fprintf(stdout, _("Please enter a file to save %s to [%s]: "),
486 if((fn = readline(stdin, NULL, NULL)) == NULL)
488 fprintf(stderr, _("Error while reading stdin: %m\n"));
493 /* User just pressed enter. */
494 fn = xstrdup(filename);
497 if((strchr(fn, '/') == NULL) || (fn[0] != '/'))
499 /* The directory is a relative path or a filename. */
502 directory = get_current_dir_name();
503 asprintf(&p, "%s/%s", directory, fn);
509 umask(0077); /* Disallow everything for group and other */
511 /* Open it first to keep the inode busy */
512 if((r = fopen(fn, "w")) == NULL)
514 fprintf(stderr, _("Error opening file `%s': %m\n"),
520 /* Then check the file for nasty attacks */
521 if(!is_safe_path(fn)) /* Do not permit any directories that are
522 readable or writeable by other users. */
524 fprintf(stderr, _("The file `%s' (or any of the leading directories) has unsafe permissions.\n"
525 "I will not create or overwrite this file.\n"),