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