libexec/dma/conf.c

   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  *
  35  * $DragonFly: src/libexec/dma/conf.c,v 1.2 2008/02/04 10:11:41 matthias Exp $
  36  */
  37
  38 #include <err.h>
  39 #include <stdio.h>
  40 #include <stdlib.h>
  41 #include <string.h>
  42 #include <syslog.h>
  43 #include <stdarg.h>
  44
  45 #include "dma.h"
  46
  47 #define DP      ": \t\n"
  48 #define EQS     " \t\n"
  49
  50 extern struct virtusers virtusers;
  51 extern struct authusers authusers;
  52
  53 /*
  54  * Remove trailing \n's
  55  */
  56 void
  57 trim_line(char *line)
  58 {
  59         size_t linelen;
  60         char *p;
  61
  62         p = line;
  63
  64         if ((p = strchr(line, '\n')))
  65                 *p = (char)0;
  66
  67         /* Escape leading dot in every case */
  68         linelen = strlen(line);
  69         if (line[0] == '.') {
  70                 if ((linelen + 2) > 1000) {
  71                         syslog(LOG_CRIT, "Cannot escape leading dot.  Buffer overflow");
  72                         exit(1);
  73                 }
  74                 memmove((line + 1), line, (linelen + 1));
  75                 line[0] = '.';
  76         }
  77 }
  78
  79 /*
  80  * Add a virtual user entry to the list of virtual users
  81  */
  82 static void
  83 add_virtuser(char *login, char *address)
  84 {
  85         struct virtuser *v;
  86
  87         v = malloc(sizeof(struct virtuser));
  88         v->login = strdup(login);
  89         v->address = strdup(address);
  90         SLIST_INSERT_HEAD(&virtusers, v, next);
  91 }
  92
  93 /*
  94  * Read the virtual user table
  95  */
  96 int
  97 parse_virtuser(const char *path)
  98 {
  99         FILE *v;
 100         char *word;
 101         char *data;
 102         char line[2048];
 103
 104         v = fopen(path, "r");
 105         if (v == NULL)
 106                 return (-1);
 107
 108         while (!feof(v)) {
 109                 if (fgets(line, sizeof(line), v) == NULL)
 110                         break;
 111                 /* We hit a comment */
 112                 if (strchr(line, '#'))
 113                         *strchr(line, '#') = 0;
 114                 if ((word = strtok(line, DP)) != NULL) {
 115                         data = strtok(NULL, DP);
 116                         if (data != NULL) {
 117                                 add_virtuser(word, data);
 118                         }
 119                 }
 120         }
 121
 122         fclose(v);
 123         return (0);
 124 }
 125
 126 /*
 127  * Add entry to the SMTP auth user list
 128  */
 129 static void
 130 add_smtp_auth_user(char *userstring, char *password)
 131 {
 132         struct authuser *a;
 133         char *temp;
 134
 135         a = malloc(sizeof(struct virtuser));
 136         a->password= strdup(password);
 137
 138         temp = strrchr(userstring, '|');
 139         if (temp == NULL)
 140                 errx(1, "auth.conf file in wrong format");
 141
 142         a->host = strdup(temp+1);
 143         a->login = strdup(strtok(userstring, "|"));
 144         if (a->login == NULL)
 145                 errx(1, "auth.conf file in wrong format");
 146
 147         SLIST_INSERT_HEAD(&authusers, a, next);
 148 }
 149
 150 /*
 151  * Read the SMTP authentication config file
 152  */
 153 int
 154 parse_authfile(const char *path)
 155 {
 156         FILE *a;
 157         char *word;
 158         char *data;
 159         char line[2048];
 160
 161         a = fopen(path, "r");
 162         if (a == NULL)
 163                 return (1);
 164
 165         while (!feof(a)) {
 166                 if (fgets(line, sizeof(line), a) == NULL)
 167                         break;
 168                 /* We hit a comment */
 169                 if (strchr(line, '#'))
 170                         *strchr(line, '#') = 0;
 171                 if ((word = strtok(line, DP)) != NULL) {
 172                         data = strtok(NULL, DP);
 173                         if (data != NULL) {
 174                                 add_smtp_auth_user(word, data);
 175                         }
 176                 }
 177         }
 178
 179         fclose(a);
 180         return (0);
 181 }
 182
 183 /*
 184  * XXX TODO
 185  * Check if the user supplied a value.  If not, fill in default
 186  * Check for bad things[TM]
 187  */
 188 int
 189 parse_conf(const char *config_path, struct config *config)
 190 {
 191         char *word;
 192         char *data;
 193         FILE *conf;
 194         char line[2048];
 195
 196         conf = fopen(config_path, "r");
 197         if (conf == NULL)
 198                 return (-1);
 199
 200         /* Reset features */
 201         config->features = 0;
 202
 203         while (!feof(conf)) {
 204                 if (fgets(line, sizeof(line), conf) == NULL)
 205                         break;
 206                 /* We hit a comment */
 207                 if (strchr(line, '#'))
 208                         *strchr(line, '#') = 0;
 209                 if ((word = strtok(line, EQS)) != NULL) {
 210                         data = strtok(NULL, EQS);
 211                         if (strcmp(word, "SMARTHOST") == 0) {
 212                                 if (data != NULL)
 213                                         config->smarthost = strdup(data);
 214                         }
 215                         else if (strcmp(word, "PORT") == 0) {
 216                                 if (data != NULL)
 217                                         config->port = atoi(strdup(data));
 218                         }
 219                         else if (strcmp(word, "ALIASES") == 0) {
 220                                 if (data != NULL)
 221                                         config->aliases = strdup(data);
 222                         }
 223                         else if (strcmp(word, "SPOOLDIR") == 0) {
 224                                 if (data != NULL)
 225                                         config->spooldir = strdup(data);
 226                         }
 227                         else if (strcmp(word, "VIRTPATH") == 0) {
 228                                 if (data != NULL)
 229                                         config->virtualpath = strdup(data);
 230                         }
 231                         else if (strcmp(word, "AUTHPATH") == 0) {
 232                                 if (data != NULL)
 233                                         config->authpath= strdup(data);
 234                         }
 235                         else if (strcmp(word, "CERTFILE") == 0) {
 236                                 if (data != NULL)
 237                                         config->certfile = strdup(data);
 238                         }
 239                         else if (strcmp(word, "VIRTUAL") == 0)
 240                                 config->features |= VIRTUAL;
 241                         else if (strcmp(word, "STARTTLS") == 0)
 242                                 config->features |= STARTTLS;
 243                         else if (strcmp(word, "SECURETRANSFER") == 0)
 244                                 config->features |= SECURETRANS;
 245                         else if (strcmp(word, "DEFER") == 0)
 246                                 config->features |= DEFER;
 247                         else if (strcmp(word, "INSECURE") == 0)
 248                                 config->features |= INSECURE;
 249                 }
 250         }
 251
 252         fclose(conf);
 253         return (0);
 254 }
 255