isync/config.c
Michael Elkins d228fae394 Updated the copyright notice to allow an exception for linking with OpenSSL,
which has a non-GPL compatible license.
2002-10-30 02:31:20 +00:00

295 lines
6.5 KiB
C

/* $Id$
*
* isync - IMAP4 to maildir mailbox synchronizer
* Copyright (C) 2000-2 Michael R. Elkins <me@mutt.org>
*
* 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* As a special exception, isync may be linked with the OpenSSL library,
* despite that library's more restrictive license.
*/
#include <unistd.h>
#include <limits.h>
#include <errno.h>
#include <pwd.h>
#include <sys/types.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include "isync.h"
config_t *boxes = 0;
/* set defaults from the global configuration section */
static void
config_defaults (config_t * conf)
{
memcpy (conf, &global, sizeof (config_t));
}
static char *
my_strndup (const char *s, size_t nchars)
{
char *r = malloc (sizeof (char) * (nchars + 1));
strncpy (r, s, nchars);
r[nchars] = 0;
return r;
}
char *
expand_strdup (const char *s)
{
char path[_POSIX_PATH_MAX];
struct passwd *pw;
const char *p;
if (*s == '~')
{
s++;
if (*s == '/')
{
/* current user */
pw = getpwuid (getuid ());
p = s + 1;
}
else
{
char *user;
p = strchr (s, '/');
if (p)
{
user = my_strndup (s, (int)(p - s));
p++;
}
else
user = strdup (s);
pw = getpwnam (user);
free (user);
}
if (!pw)
return 0;
snprintf (path, sizeof (path), "%s/%s", pw->pw_dir, p ? p : "");
s = path;
}
else if (*s != '/')
{
snprintf (path, sizeof (path), "%s/%s",
global.maildir ? global.maildir : "", s);
s = path;
}
return strdup (s);
}
static int
is_true (const char *val)
{
return
!strcasecmp (val, "yes") ||
!strcasecmp (val, "true") ||
!strcasecmp (val, "on") ||
!strcmp (val, "1");
}
void
load_config (const char *where, int *o2o)
{
char path[_POSIX_PATH_MAX];
char buf[1024];
struct passwd *pw;
config_t **cur = &boxes, *cfg;
int line = 0;
FILE *fp;
char *p, *cmd, *val;
if (!where)
{
pw = getpwuid (getuid ());
snprintf (path, sizeof (path), "%s/.isyncrc", pw->pw_dir);
where = path;
}
info ("Reading configuration file %s\n", where);
fp = fopen (where, "r");
if (!fp)
{
if (errno != ENOENT)
perror ("fopen");
return;
}
buf[sizeof buf - 1] = 0;
cfg = &global;
while ((fgets (buf, sizeof (buf) - 1, fp)))
{
p = buf;
cmd = next_arg (&p);
val = next_arg (&p);
line++;
if (!cmd || *cmd == '#')
continue;
if (!strcasecmp ("mailbox", cmd))
{
if (*o2o)
break;
cur = &(*cur)->next;
cfg = *cur = malloc (sizeof (config_t));
config_defaults (cfg);
/* not expanded at this point */
cfg->path = strdup (val);
}
else if (!strcasecmp ("OneToOne", cmd))
{
if (*cur) {
forbid:
fprintf (stderr,
"%s:%d: keyword '%s' allowed only in global section\n",
path, line, cmd);
continue;
}
*o2o = is_true (val);
}
else if (!strcasecmp ("maildir", cmd))
{
if (*cur)
goto forbid;
/* this only affects the global setting */
free (global.maildir);
global.maildir = expand_strdup (val);
}
else if (!strcasecmp ("folder", cmd))
{
if (*cur)
goto forbid;
/* this only affects the global setting */
global.folder = strdup (val);
}
else if (!strcasecmp ("inbox", cmd))
{
if (*cur)
goto forbid;
/* this only affects the global setting */
global.inbox = strdup (val);
}
else if (!strcasecmp ("host", cmd))
{
#if HAVE_LIBSSL
if (!strncasecmp ("imaps:", val, 6))
{
val += 6;
cfg->use_imaps = 1;
cfg->port = 993;
cfg->use_sslv2 = 1;
cfg->use_sslv3 = 1;
}
#endif
cfg->host = strdup (val);
}
else if (!strcasecmp ("user", cmd))
{
if (*cur)
(*cur)->user = strdup (val);
else {
free (global.user);
global.user = strdup (val);
}
}
else if (!strcasecmp ("pass", cmd))
cfg->pass = strdup (val);
else if (!strcasecmp ("port", cmd))
cfg->port = atoi (val);
else if (!strcasecmp ("box", cmd))
cfg->box = strdup (val);
else if (!strcasecmp ("alias", cmd))
{
if (!*cur) {
fprintf (stderr,
"%s:%d: keyword 'alias' allowed only in mailbox specification\n",
path, line);
continue;
}
cfg->alias = strdup (val);
}
else if (!strcasecmp ("maxsize", cmd))
cfg->max_size = atol (val);
else if (!strcasecmp ("MaxMessages", cmd))
cfg->max_messages = atol (val);
else if (!strcasecmp ("UseNamespace", cmd))
cfg->use_namespace = is_true (val);
else if (!strcasecmp ("CopyDeletedTo", cmd))
cfg->copy_deleted_to = strdup (val);
else if (!strcasecmp ("Tunnel", cmd))
cfg->tunnel = strdup (val);
else if (!strcasecmp ("Expunge", cmd))
cfg->expunge = is_true (val);
else if (!strcasecmp ("Delete", cmd))
cfg->delete = is_true (val);
#if HAVE_LIBSSL
else if (!strcasecmp ("CertificateFile", cmd))
cfg->cert_file = expand_strdup (val);
else if (!strcasecmp ("RequireSSL", cmd))
cfg->require_ssl = is_true (val);
else if (!strcasecmp ("UseSSLv2", cmd))
cfg->use_sslv2 = is_true (val);
else if (!strcasecmp ("UseSSLv3", cmd))
cfg->use_sslv3 = is_true (val);
else if (!strcasecmp ("UseTLSv1", cmd))
cfg->use_tlsv1 = is_true (val);
else if (!strcasecmp ("RequireCRAM", cmd))
cfg->require_cram = is_true (val);
#endif
else if (buf[0])
fprintf (stderr, "%s:%d: unknown keyword '%s'\n", path, line, cmd);
}
fclose (fp);
}
config_t *
find_box (const char *s)
{
config_t *p = boxes;
for (; p; p = p->next)
{
if (!strcmp (s, p->path) || (p->alias && !strcmp (s, p->alias)))
return p;
else
{
/* check to see if the full pathname was specified on the
* command line.
*/
char *t = expand_strdup (p->path);
if (!strcmp (s, t))
{
free (t);
return p;
}
free (t);
}
}
return 0;
}
void
free_config (void)
{
free (global.user);
free (global.maildir);
free (global.host);
free (global.pass);
}