tinc/src/conf.c

259 lines
6.1 KiB
C
Raw Normal View History

2000-03-26 00:33:07 +00:00
/*
conf.c -- configuration code
Copyright (C) 1998 Emphyrio,
Copyright (C) 1998,1999,2000 Ivo Timmermans <itimmermans@bigfoot.com>
2000 Guus Sliepen <guus@sliepen.warande.net>
2000 Cris van Pelt <tribbel@arise.dhs.org>
2000-03-26 00:33:07 +00:00
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.21 2000/11/04 22:57:30 guus Exp $
2000-03-26 00:33:07 +00:00
*/
#include "config.h"
2000-03-26 00:33:07 +00:00
#include <ctype.h>
#include <errno.h>
#include <netdb.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <syslog.h>
2000-03-26 00:33:07 +00:00
#include <xalloc.h>
#include "conf.h"
#include "netutl.h" /* for strtoip */
#include <utils.h> /* for cp */
2000-03-26 00:33:07 +00:00
#include "config.h"
#include "connlist.h"
2000-05-29 21:01:26 +00:00
#include "system.h"
config_t *config = NULL;
2000-03-26 00:33:07 +00:00
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;
2000-03-26 00:33:07 +00:00
/*
These are all the possible configurable values
*/
static internal_config_t hazahaza[] = {
/* Main configuration file keywords */
{ "Name", config_name, TYPE_NAME },
{ "ConnectTo", config_connectto, TYPE_NAME },
{ "PingTimeout", config_pingtimeout, TYPE_INT },
{ "TapDevice", config_tapdevice, TYPE_NAME },
{ "PrivateKey", config_privatekey, TYPE_NAME },
{ "KeyExpire", config_keyexpire, TYPE_INT },
{ "Hostnames", config_hostnames, TYPE_BOOL },
{ "Interface", config_interface, TYPE_NAME },
{ "InterfaceIP", config_interfaceip, TYPE_IP },
/* Host configuration file keywords */
{ "Address", config_address, TYPE_NAME },
{ "Port", config_port, TYPE_INT },
{ "PublicKey", config_publickey, TYPE_NAME },
{ "Subnet", config_subnet, TYPE_IP }, /* Use IPv4 subnets only for now */
{ "RestrictHosts", config_restricthosts, TYPE_BOOL },
{ "RestrictSubnets", config_restrictsubnets, TYPE_BOOL },
{ "RestrictAddress", config_restrictaddress, TYPE_BOOL },
{ "RestrictPort", config_restrictport, TYPE_BOOL },
{ "IndirectData", config_indirectdata, TYPE_BOOL },
{ "TCPonly", config_tcponly, TYPE_BOOL },
2000-03-26 00:33:07 +00:00
{ NULL, 0, 0 }
};
/*
Add given value to the list of configs cfg
*/
config_t *
add_config_val(config_t **cfg, int argtype, char *val)
{
2000-10-29 00:02:20 +00:00
config_t *p;
2000-03-26 00:33:07 +00:00
char *q;
cp
p = (config_t*)xmalloc(sizeof(*p));
2000-03-26 00:33:07 +00:00
p->data.val = 0;
2000-03-26 00:33:07 +00:00
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;
2000-03-26 00:33:07 +00:00
if(p->data.val)
{
p->next = *cfg;
*cfg = p;
cp
2000-03-26 00:33:07 +00:00
return p;
}
else
{
free(p);
cp
return NULL;
}
2000-03-26 00:33:07 +00:00
}
/*
Parse a configuration file and put the results in the configuration tree
starting at *base.
2000-03-26 00:33:07 +00:00
*/
int read_config_file(config_t **base, const char *fname)
2000-03-26 00:33:07 +00:00
{
int err = -1;
FILE *fp;
char line[MAXBUFSIZE]; /* There really should not be any line longer than this... */
2000-03-26 00:33:07 +00:00
char *p, *q;
int i, lineno = 0;
2000-03-26 00:33:07 +00:00
config_t *cfg;
cp
if((fp = fopen (fname, "r")) == NULL)
{
return -1;
}
2000-03-26 00:33:07 +00:00
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;
}
2000-03-26 00:33:07 +00:00
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;
2000-03-26 00:33:07 +00:00
}
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;
2000-03-26 00:33:07 +00:00
}
cfg = add_config_val(base, hazahaza[i].argtype, q);
2000-03-26 00:33:07 +00:00
if(cfg == NULL)
{
fprintf(stderr, _("Invalid value for variable on line %d while reading config file %s"),
lineno, fname);
break;
2000-03-26 00:33:07 +00:00
}
cfg->which = hazahaza[i].which;
if(!config)
config = cfg;
}
fclose (fp);
cp
return err;
2000-03-26 00:33:07 +00:00
}
int read_server_config()
{
char *fname;
int x;
cp
asprintf(&fname, "%s/tinc.conf", confbase);
x = read_config_file(&config, fname);
if(x != 0)
{
fprintf(stderr, _("Failed to read `%s': %m\n"),
fname);
}
free(fname);
cp
return x;
}
2000-03-26 00:33:07 +00:00
/*
Look up the value of the config option type
*/
const config_t *get_config_val(config_t *p, which_t type)
2000-03-26 00:33:07 +00:00
{
cp
for(; p != NULL; p = p->next)
2000-03-26 00:33:07 +00:00
if(p->which == type)
break;
cp
return p;
2000-03-26 00:33:07 +00:00
}
/*
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
}