meillo@367: /*
meillo@367: **  MasqMail
meillo@367: **  Copyright (C) 1999-2001 Oliver Kurth
meillo@367: **  Copyright (C) 2008 markus schnalke <meillo@marmaro.de>
meillo@367: **
meillo@367: **  This program is free software; you can redistribute it and/or modify
meillo@367: **  it under the terms of the GNU General Public License as published by
meillo@367: **  the Free Software Foundation; either version 2 of the License, or
meillo@367: **  (at your option) any later version.
meillo@367: **
meillo@367: **  This program is distributed in the hope that it will be useful,
meillo@367: **  but WITHOUT ANY WARRANTY; without even the implied warranty of
meillo@367: **  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
meillo@367: **  GNU General Public License for more details.
meillo@367: **
meillo@367: **  You should have received a copy of the GNU General Public License
meillo@367: **  along with this program; if not, write to the Free Software
meillo@367: **  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
meillo@0: */
meillo@0: 
meillo@15: #include <fnmatch.h>
meillo@385: #include "masqmail.h"
meillo@15: 
meillo@0: 
meillo@10: table_pair*
meillo@366: create_pair(gchar *key, gpointer value)
meillo@0: {
meillo@10: 	table_pair *pair;
meillo@0: 
meillo@10: 	pair = g_malloc(sizeof(table_pair));
meillo@10: 	pair->key = g_strdup(key);
meillo@10: 	pair->value = value;
meillo@10: 
meillo@10: 	return pair;
meillo@0: }
meillo@0: 
meillo@10: table_pair*
meillo@366: create_pair_string(gchar *key, gpointer value)
meillo@0: {
meillo@10: 	table_pair *pair;
meillo@0: 
meillo@10: 	pair = g_malloc(sizeof(table_pair));
meillo@10: 	pair->key = g_strdup(key);
meillo@10: 	pair->value = (gpointer) (g_strdup(value));
meillo@10: 
meillo@10: 	return pair;
meillo@0: }
meillo@0: 
meillo@10: table_pair*
meillo@366: parse_table_pair(gchar *line, char delim)
meillo@0: {
meillo@10: 	gchar buf[256];
meillo@10: 	gchar *p, *q;
meillo@10: 	table_pair *pair;
meillo@0: 
meillo@10: 	p = line;
meillo@10: 	q = buf;
meillo@385: 	while (*p && (*p != delim) && q < buf + 255) {
meillo@10: 		*(q++) = *(p++);
meillo@385: 	}
meillo@15: 	*q = '\0';
meillo@0: 
meillo@10: 	pair = g_malloc(sizeof(table_pair));
meillo@10: 	pair->key = g_strdup(g_strstrip(buf));
meillo@0: 
meillo@10: 	if (*p) {
meillo@10: 		p++;
meillo@385: 		/* while(isspace(*p)) p++; */
meillo@10: 		pair->value = (gpointer *) (g_strdup(g_strstrip(p)));
meillo@385: 	} else {
meillo@10: 		pair->value = (gpointer *) g_strdup("");
meillo@385: 	}
meillo@0: 
meillo@10: 	return pair;
meillo@0: }
meillo@0: 
meillo@10: gpointer*
meillo@385: table_find_func(GList *table_list, gchar *key,
meillo@385: 		int (*cmp_func) (const char *, const char *))
meillo@0: {
meillo@10: 	GList *node;
meillo@0: 
meillo@10: 	foreach(table_list, node) {
meillo@10: 		table_pair *pair = (table_pair *) (node->data);
meillo@385: 		if (cmp_func(pair->key, key) == 0) {
meillo@10: 			return pair->value;
meillo@385: 		}
meillo@10: 	}
meillo@10: 	return NULL;
meillo@0: }
meillo@0: 
meillo@10: gpointer*
meillo@366: table_find(GList *table_list, gchar *key)
meillo@0: {
meillo@10: 	return table_find_func(table_list, key, strcmp);
meillo@0: }
meillo@0: 
meillo@10: gpointer*
meillo@366: table_find_case(GList *table_list, gchar *key)
meillo@0: {
meillo@10: 	return table_find_func(table_list, key, strcasecmp);
meillo@0: }
meillo@0: 
meillo@10: static int
meillo@10: fnmatch0(const char *pattern, const char *string)
meillo@0: {
meillo@10: 	return fnmatch(pattern, string, 0);
meillo@0: }
meillo@0: 
meillo@10: gpointer*
meillo@366: table_find_fnmatch(GList *table_list, gchar *key)
meillo@0: {
meillo@10: 	return table_find_func(table_list, key, fnmatch0);
meillo@0: }
meillo@0: 
meillo@10: GList*
meillo@366: table_read(gchar *fname, gchar delim)
meillo@0: {
meillo@10: 	GList *list = NULL;
meillo@10: 	FILE *fptr;
meillo@385: 	gchar buf[256];
meillo@0: 
meillo@385: 	if (!(fptr = fopen(fname, "rt"))) {
meillo@385: 		logwrite(LOG_ALERT, "could not open table file %s: %s. Thus "
meillo@385: 				"no aliasing will be done\n",
meillo@385: 				fname, strerror(errno));
meillo@385: 		return NULL;
meillo@385: 	}
meillo@0: 
meillo@385: 	while (fgets(buf, sizeof buf, fptr)) {
meillo@385: 		if (!*buf || *buf == '#' || *buf == '\n') {
meillo@385: 			continue;
meillo@10: 		}
meillo@385: 		table_pair *pair;
meillo@385: 		g_strchomp(buf);
meillo@385: 		pair = parse_table_pair(buf, delim);
meillo@385: 		list = g_list_append(list, pair);
meillo@10: 	}
meillo@385: 	fclose(fptr);
meillo@385: 	if (!list) {
meillo@385: 		logwrite(LOG_NOTICE, "table file %s contained no entries\n",
meillo@385: 				fname);
meillo@385: 	}
meillo@385: 	return list;
meillo@0: }
meillo@0: 
meillo@10: void
meillo@366: destroy_table(GList *table)
meillo@0: {
meillo@10: 	GList *node;
meillo@0: 
meillo@10: 	foreach(table, node) {
meillo@10: 		table_pair *p = (table_pair *) (node->data);
meillo@10: 		g_free(p->key);
meillo@10: 		g_free(p->value);
meillo@10: 		g_free(p);
meillo@10: 	}
meillo@10: 	g_list_free(table);
meillo@0: }