[people/ms/dma.git] / conf.c

/*
 * Copyright (c) 2008 The DragonFly Project.  All rights reserved.
 *
 * This code is derived from software contributed to The DragonFly Project
 * by Matthias Schmidt <matthias@dragonflybsd.org>, University of Marburg,
 * Germany.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in
 *    the documentation and/or other materials provided with the
 *    distribution.
 * 3. Neither the name of The DragonFly Project nor the names of its
 *    contributors may be used to endorse or promote products derived
 *    from this software without specific, prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 * $DragonFly: src/libexec/dma/conf.c,v 1.2 2008/02/04 10:11:41 matthias Exp $
 */

#include <err.h>
#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <syslog.h>
#include <stdarg.h>

#include "dma.h"

#define DP	": \t\n"
#define EQS	" \t\n"

extern struct virtusers virtusers;
extern struct authusers authusers;

/*
 * Remove trailing \n's
 */
void
trim_line(char *line)
{
	size_t linelen;
	char *p;

	p = line;

	if ((p = strchr(line, '\n')))
		*p = (char)0;

	/* Escape leading dot in every case */
	linelen = strlen(line);
	if (line[0] == '.') {
		if ((linelen + 2) > 1000) {
			syslog(LOG_CRIT, "Cannot escape leading dot.  Buffer overflow");
			exit(1);
		}
		memmove((line + 1), line, (linelen + 1));
		line[0] = '.';
	}
}

/*
 * Add a virtual user entry to the list of virtual users
 */
static void
add_virtuser(char *login, char *address)
{
	struct virtuser *v;

	v = malloc(sizeof(struct virtuser));
	v->login = strdup(login);
	v->address = strdup(address);
	SLIST_INSERT_HEAD(&virtusers, v, next);
}

/*
 * Read the virtual user table
 */
int
parse_virtuser(const char *path)
{
	FILE *v;
	char *word;
	char *data;
	char line[2048];

	v = fopen(path, "r");
	if (v == NULL)
		return (-1);

	while (!feof(v)) {
		if (fgets(line, sizeof(line), v) == NULL)
			break;
		/* We hit a comment */
		if (strchr(line, '#'))
			*strchr(line, '#') = 0;
		if ((word = strtok(line, DP)) != NULL) {
			data = strtok(NULL, DP);
			if (data != NULL) {
				add_virtuser(word, data);
			}
		}
	}

	fclose(v);
	return (0);
}

/*
 * Add entry to the SMTP auth user list
 */
static void
add_smtp_auth_user(char *userstring, char *password)
{
	struct authuser *a;
	char *temp;

	a = malloc(sizeof(struct virtuser));
	a->password= strdup(password);

	temp = strrchr(userstring, '|');
	if (temp == NULL)
		errx(1, "auth.conf file in wrong format");
		/* XXX don't use errx */

	a->host = strdup(temp+1);
	a->login = strdup(strtok(userstring, "|"));
	if (a->login == NULL)
		errx(1, "auth.conf file in wrong format");

	SLIST_INSERT_HEAD(&authusers, a, next);
}

/*
 * Read the SMTP authentication config file
 */
int
parse_authfile(const char *path)
{
	FILE *a;
	char *word;
	char *data;
	char line[2048];

	a = fopen(path, "r");
	if (a == NULL)
		return (-1);

	while (!feof(a)) {
		if (fgets(line, sizeof(line), a) == NULL)
			break;
		/* We hit a comment */
		if (strchr(line, '#'))
			*strchr(line, '#') = 0;
		if ((word = strtok(line, DP)) != NULL) {
			data = strtok(NULL, DP);
			if (data != NULL) {
				add_smtp_auth_user(word, data);
			}
		}
	}

	fclose(a);
	return (0);
}

/*
 * XXX TODO
 * Check if the user supplied a value.  If not, fill in default
 * Check for bad things[TM]
 */
int
parse_conf(const char *config_path, struct config *config)
{
	char *word;
	char *data;
	FILE *conf;
	char line[2048];

	conf = fopen(config_path, "r");
	if (conf == NULL)
		return (-1);

	/* Reset features */
	config->features = 0;

	while (!feof(conf)) {
		if (fgets(line, sizeof(line), conf) == NULL)
			break;
		/* We hit a comment */
		if (strchr(line, '#'))
			*strchr(line, '#') = 0;
		if ((word = strtok(line, EQS)) != NULL) {
			data = strtok(NULL, EQS);
			if (strcmp(word, "SMARTHOST") == 0) {
				if (data != NULL)
					config->smarthost = strdup(data);
			}
			else if (strcmp(word, "PORT") == 0) {
				if (data != NULL)
					config->port = atoi(strdup(data));
			}
			else if (strcmp(word, "ALIASES") == 0) {
				if (data != NULL)
					config->aliases = strdup(data);
			}
			else if (strcmp(word, "SPOOLDIR") == 0) {
				if (data != NULL)
					config->spooldir = strdup(data);
			}
			else if (strcmp(word, "VIRTPATH") == 0) {
				if (data != NULL)
					config->virtualpath = strdup(data);
			}
			else if (strcmp(word, "AUTHPATH") == 0) {
				if (data != NULL)
					config->authpath= strdup(data);
			}
			else if (strcmp(word, "CERTFILE") == 0) {
				if (data != NULL)
					config->certfile = strdup(data);
			}
			else if (strcmp(word, "MAILNAME") == 0) {
				if (data != NULL)
					config->mailname = strdup(data);
			}
			else if (strcmp(word, "MAILNAMEFILE") == 0) {
				if (data != NULL)
					config->mailnamefile = strdup(data);
			}
			else if (strcmp(word, "VIRTUAL") == 0)
				config->features |= VIRTUAL;
			else if (strcmp(word, "STARTTLS") == 0)
				config->features |= STARTTLS;
			else if (strcmp(word, "SECURETRANSFER") == 0)
				config->features |= SECURETRANS;
			else if (strcmp(word, "DEFER") == 0)
				config->features |= DEFER;
			else if (strcmp(word, "INSECURE") == 0)
				config->features |= INSECURE;
			else if (strcmp(word, "FULLBOUNCE") == 0)
				config->features |= FULLBOUNCE;
			else {
				errno = EINVAL;
				return (-1);
			}
		}
	}

	fclose(conf);
	return (0);
}
Commit	Line	Data
86e4d161 MS	1	/*
	2	* Copyright (c) 2008 The DragonFly Project. All rights reserved.
	3	*
	4	* This code is derived from software contributed to The DragonFly Project
	5	* by Matthias Schmidt <matthias@dragonflybsd.org>, University of Marburg,
	6	* Germany.
	7	*
	8	* Redistribution and use in source and binary forms, with or without
	9	* modification, are permitted provided that the following conditions
	10	* are met:
	11	*
	12	* 1. Redistributions of source code must retain the above copyright
	13	* notice, this list of conditions and the following disclaimer.
	14	* 2. Redistributions in binary form must reproduce the above copyright
	15	* notice, this list of conditions and the following disclaimer in
	16	* the documentation and/or other materials provided with the
	17	* distribution.
	18	* 3. Neither the name of The DragonFly Project nor the names of its
	19	* contributors may be used to endorse or promote products derived
	20	* from this software without specific, prior written permission.
	21	*
	22	* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
	23	* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
	24	* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
	25	* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
	26	* COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
	27	* INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
	28	* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
	29	* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
	30	* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
	31	* OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
	32	* OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	33	* SUCH DAMAGE.
	34	*
dfce7456	35	* $DragonFly: src/libexec/dma/conf.c,v 1.2 2008/02/04 10:11:41 matthias Exp $
86e4d161 MS	36	*/
	37
	38	#include <err.h>
53885e5a	39	#include <errno.h>
86e4d161 MS	40	#include <stdio.h>
	41	#include <stdlib.h>
	42	#include <string.h>
	43	#include <syslog.h>
	44	#include <stdarg.h>
	45
	46	#include "dma.h"
	47
	48	#define DP ": \t\n"
	49	#define EQS " \t\n"
	50
	51	extern struct virtusers virtusers;
	52	extern struct authusers authusers;
	53
	54	/*
	55	* Remove trailing \n's
	56	*/
	57	void
	58	trim_line(char *line)
	59	{
	60	size_t linelen;
	61	char *p;
	62
	63	p = line;
	64
	65	if ((p = strchr(line, '\n')))
	66	*p = (char)0;
	67
	68	/* Escape leading dot in every case */
	69	linelen = strlen(line);
	70	if (line[0] == '.') {
	71	if ((linelen + 2) > 1000) {
	72	syslog(LOG_CRIT, "Cannot escape leading dot. Buffer overflow");
	73	exit(1);
	74	}
	75	memmove((line + 1), line, (linelen + 1));
	76	line[0] = '.';
	77	}
	78	}
	79
	80	/*
	81	* Add a virtual user entry to the list of virtual users
	82	*/
	83	static void
	84	add_virtuser(char login, char address)
	85	{
	86	struct virtuser *v;
	87
	88	v = malloc(sizeof(struct virtuser));
	89	v->login = strdup(login);
	90	v->address = strdup(address);
	91	SLIST_INSERT_HEAD(&virtusers, v, next);
	92	}
	93
	94	/*
	95	* Read the virtual user table
	96	*/
	97	int
	98	parse_virtuser(const char *path)
	99	{
	100	FILE *v;
	101	char *word;
	102	char *data;
	103	char line[2048];
104
105	v = fopen(path, "r");
106	if (v == NULL)
107	return (-1);
108
109	while (!feof(v)) {
5b84c25b SS	110	if (fgets(line, sizeof(line), v) == NULL)
5b84c25b SS	111	break;
86e4d161 MS	112	/* We hit a comment */
	113	if (strchr(line, '#'))
	114	*strchr(line, '#') = 0;
	115	if ((word = strtok(line, DP)) != NULL) {
	116	data = strtok(NULL, DP);
	117	if (data != NULL) {
	118	add_virtuser(word, data);
	119	}
	120	}
	121	}
	122
	123	fclose(v);
	124	return (0);
	125	}
	126
	127	/*
	128	* Add entry to the SMTP auth user list
	129	*/
	130	static void
	131	add_smtp_auth_user(char userstring, char password)
	132	{
	133	struct authuser *a;
	134	char *temp;
	135
	136	a = malloc(sizeof(struct virtuser));
	137	a->password= strdup(password);
	138
	139	temp = strrchr(userstring, '\|');
	140	if (temp == NULL)
	141	errx(1, "auth.conf file in wrong format");
53885e5a	142	/* XXX don't use errx */
86e4d161 MS	143
	144	a->host = strdup(temp+1);
	145	a->login = strdup(strtok(userstring, "\|"));
	146	if (a->login == NULL)
	147	errx(1, "auth.conf file in wrong format");
	148
	149	SLIST_INSERT_HEAD(&authusers, a, next);
	150	}
	151
	152	/*
	153	* Read the SMTP authentication config file
	154	*/
	155	int
	156	parse_authfile(const char *path)
	157	{
	158	FILE *a;
	159	char *word;
	160	char *data;
	161	char line[2048];
	162
	163	a = fopen(path, "r");
	164	if (a == NULL)
53885e5a	165	return (-1);
86e4d161 MS	166
86e4d161 MS	167	while (!feof(a)) {
5b84c25b SS	168	if (fgets(line, sizeof(line), a) == NULL)
5b84c25b SS	169	break;
86e4d161 MS	170	/* We hit a comment */
	171	if (strchr(line, '#'))
	172	*strchr(line, '#') = 0;
	173	if ((word = strtok(line, DP)) != NULL) {
	174	data = strtok(NULL, DP);
	175	if (data != NULL) {
	176	add_smtp_auth_user(word, data);
	177	}
	178	}
	179	}
	180
	181	fclose(a);
	182	return (0);
	183	}
	184
	185	/*
	186	* XXX TODO
	187	* Check if the user supplied a value. If not, fill in default
	188	* Check for bad things[TM]
	189	*/
	190	int
	191	parse_conf(const char config_path, struct config config)
	192	{
	193	char *word;
	194	char *data;
	195	FILE *conf;
	196	char line[2048];
	197
	198	conf = fopen(config_path, "r");
	199	if (conf == NULL)
	200	return (-1);
	201
	202	/* Reset features */
	203	config->features = 0;
	204
	205	while (!feof(conf)) {
5b84c25b SS	206	if (fgets(line, sizeof(line), conf) == NULL)
5b84c25b SS	207	break;
86e4d161 MS	208	/* We hit a comment */
	209	if (strchr(line, '#'))
	210	*strchr(line, '#') = 0;
	211	if ((word = strtok(line, EQS)) != NULL) {
	212	data = strtok(NULL, EQS);
	213	if (strcmp(word, "SMARTHOST") == 0) {
	214	if (data != NULL)
	215	config->smarthost = strdup(data);
	216	}
	217	else if (strcmp(word, "PORT") == 0) {
	218	if (data != NULL)
	219	config->port = atoi(strdup(data));
	220	}
	221	else if (strcmp(word, "ALIASES") == 0) {
	222	if (data != NULL)
	223	config->aliases = strdup(data);
	224	}
	225	else if (strcmp(word, "SPOOLDIR") == 0) {
	226	if (data != NULL)
	227	config->spooldir = strdup(data);
	228	}
	229	else if (strcmp(word, "VIRTPATH") == 0) {
	230	if (data != NULL)
	231	config->virtualpath = strdup(data);
	232	}
	233	else if (strcmp(word, "AUTHPATH") == 0) {
	234	if (data != NULL)
	235	config->authpath= strdup(data);
	236	}
	237	else if (strcmp(word, "CERTFILE") == 0) {
	238	if (data != NULL)
	239	config->certfile = strdup(data);
	240	}
ebe7ade7 SS	241	else if (strcmp(word, "MAILNAME") == 0) {
	242	if (data != NULL)
	243	config->mailname = strdup(data);
	244	}
	245	else if (strcmp(word, "MAILNAMEFILE") == 0) {
	246	if (data != NULL)
	247	config->mailnamefile = strdup(data);
	248	}
86e4d161 MS	249	else if (strcmp(word, "VIRTUAL") == 0)
	250	config->features \|= VIRTUAL;
	251	else if (strcmp(word, "STARTTLS") == 0)
	252	config->features \|= STARTTLS;
	253	else if (strcmp(word, "SECURETRANSFER") == 0)
	254	config->features \|= SECURETRANS;
	255	else if (strcmp(word, "DEFER") == 0)
	256	config->features \|= DEFER;
dfce7456 MS	257	else if (strcmp(word, "INSECURE") == 0)
dfce7456 MS	258	config->features \|= INSECURE;
8ee63931 SS	259	else if (strcmp(word, "FULLBOUNCE") == 0)
8ee63931 SS	260	config->features \|= FULLBOUNCE;
53885e5a SS	261	else {
	262	errno = EINVAL;
	263	return (-1);
	264	}
86e4d161 MS	265	}
	266	}
	267
	268	fclose(conf);
	269	return (0);
	270	}
	271