/* conf.c -- configuration code Copyright (C) 1998 Emphyrio, Copyright (C) 1998,1999,2000 Ivo Timmermans 2000 Guus Sliepen 2000 Cris van Pelt This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. $Id: conf.c,v 1.9.4.15 2000/10/16 16:33:29 guus Exp $ */ #include #include #include #include #include #include #include #include #include "conf.h" #include "netutl.h" /* for strtoip */ #include /* for cp */ #include "config.h" #include "connlist.h" #include "system.h" config_t *config = NULL; int debug_lvl = 0; int timeout = 0; /* seconds before timeout */ char *confbase = NULL; /* directory in which all config files are */ char *netname = NULL; /* name of the vpn network */ /* Will be set if HUP signal is received. It will be processed when it is safe. */ int sighup = 0; /* These are all the possible configurable values */ static internal_config_t hazahaza[] = { /* Main configuration file keywords */ { "Name", tincname, TYPE_NAME }, { "ConnectTo", connectto, TYPE_NAME }, { "PingTimeout", pingtimeout, TYPE_INT }, { "TapDevice", tapdevice, TYPE_NAME }, { "TapSubnet", tapsubnet, TYPE_IP }, { "PrivateKey", privatekey, TYPE_NAME }, { "KeyExpire", keyexpire, TYPE_INT }, { "Hostnames", resolve_dns, TYPE_BOOL }, { "Interface", interface, TYPE_NAME }, { "InterfaceIP", interfaceip, TYPE_IP }, /* Host configuration file keywords */ { "Address", address, TYPE_NAME }, { "Port", port, TYPE_INT }, { "PublicKey", publickey, TYPE_NAME }, { "Subnet", subnet, TYPE_NAME }, { "RestrictHosts", restricthosts, TYPE_BOOL }, { "RestrictSubnets", restrictsubnets, TYPE_BOOL }, { "RestrictAddress", restrictaddress, TYPE_BOOL }, { "RestrictPort", restrictport, TYPE_BOOL }, { "IndirectData", indirectdata, TYPE_BOOL }, { "TCPonly", tcponly, TYPE_BOOL }, { NULL, 0, 0 } }; /* Add given value to the list of configs cfg */ config_t * add_config_val(config_t **cfg, int argtype, char *val) { config_t *p, *r; char *q; cp p = (config_t*)xmalloc(sizeof(*p)); p->data.val = 0; switch(argtype) { case TYPE_INT: p->data.val = strtol(val, &q, 0); if(q && *q) p->data.val = 0; break; case TYPE_NAME: p->data.ptr = xmalloc(strlen(val) + 1); strcpy(p->data.ptr, val); break; case TYPE_IP: p->data.ip = strtoip(val); break; case TYPE_BOOL: if(!strcasecmp("yes", val)) p->data.val = stupid_true; else if(!strcasecmp("no", val)) p->data.val = stupid_false; else p->data.val = 0; } p->argtype = argtype; if(p->data.val) { p->next = *cfg; *cfg = p; cp return p; } else { free(p); cp return NULL; } } /* Parse a configuration file and put the results in the configuration tree starting at *base. */ int read_config_file(config_t **base, const char *fname) { int err = -1; FILE *fp; char line[MAXBUFSIZE]; /* There really should not be any line longer than this... */ char *p, *q; int i, lineno = 0; config_t *cfg; cp if((fp = fopen (fname, "r")) == NULL) { return -1; } for(;;) { if(fgets(line, MAXBUFSIZE, fp) == NULL) { err = 0; break; } lineno++; if(!index(line, '\n')) { syslog(LOG_ERR, _("Line %d too long while reading config file %s"), lineno, fname); break; } if((p = strtok(line, "\t\n\r =")) == NULL) continue; /* no tokens on this line */ if(p[0] == '#') continue; /* comment: ignore */ for(i = 0; hazahaza[i].name != NULL; i++) if(!strcasecmp(hazahaza[i].name, p)) break; if(!hazahaza[i].name) { syslog(LOG_ERR, _("Invalid variable name on line %d while reading config file %s"), lineno, fname); break; } if(((q = strtok(NULL, "\t\n\r =")) == NULL) || q[0] == '#') { fprintf(stderr, _("No value for variable on line %d while reading config file %s"), lineno, fname); break; } cfg = add_config_val(base, hazahaza[i].argtype, q); if(cfg == NULL) { fprintf(stderr, _("Invalid value for variable on line %d while reading config file %s"), lineno, fname); break; } cfg->which = hazahaza[i].which; if(!config) config = cfg; } fclose (fp); cp return err; } int read_server_config() { char *fname; int x; cp asprintf(&fname, "%s/tinc.conf", confbase); x = read_config_file(&config, fname); free(fname); cp return x; } /* Look up the value of the config option type */ const config_t *get_config_val(config_t *p, which_t type) { cp for(; p != NULL; p = p->next) if(p->which == type) break; cp return p; } /* Support for multiple config lines. Index is used to get a specific value, 0 being the first, 1 the second etc. */ const config_t *get_next_config_val(config_t *p, which_t type, int index) { cp for(; p != NULL; p = p->next) if(p->which == type) if(--index < 0) break; cp return p; } /* Remove the complete configuration tree. */ void clear_config(config_t **base) { config_t *p, *next; cp for(p = *base; p != NULL; p = next) { next = p->next; if(p->data.ptr && (p->argtype == TYPE_NAME)) { free(p->data.ptr); } free(p); } *base = NULL; cp }