static int create_db(struct dbobj *obj,
const char *dir,
char **dbname)
{
struct maildir_tmpcreate_info createInfo;
maildir_tmpcreate_init(&createInfo);
createInfo.maildir=dir;
createInfo.uniq="sync";
createInfo.doordie=1;
{
int fd;
fd=maildir_tmpcreate_fd(&createInfo);
if (fd < 0)
{
perror(dir);
return -1;
}
close(fd);
dbobj_init(obj);
if (dbobj_open(obj, createInfo.tmpname, "N") < 0)
{
perror(createInfo.tmpname);
unlink(createInfo.tmpname);
maildir_tmpcreate_free(&createInfo);
return (-1);
}
}
*dbname=createInfo.tmpname;
createInfo.tmpname=NULL;
maildir_tmpcreate_free(&createInfo);
return (0);
}
static void check_db()
{
char *dbname;
char *lockname;
int lockfd;
struct dbobj db;
time_t now;
char *sender_key, *p;
size_t val_len;
char *val;
if (!dbfile || !*dbfile)
return;
sender_key=strdup(sender);
dbname=malloc(strlen(dbfile)+ sizeof( "." DBNAME));
lockname=malloc(strlen(dbfile)+ sizeof(".lock"));
for (p=sender_key; *p; p++)
*p=tolower((int)(unsigned char)*p);
if (!dbname || !lockname || !sender)
{
perror("malloc");
exit(EX_TEMPFAIL);
}
strcat(strcpy(dbname, dbfile), "." DBNAME);
strcat(strcpy(lockname, dbfile), ".lock");
lockfd=open(lockname, O_RDWR|O_CREAT, 0666);
if (lockfd < 0 || ll_lock_ex(lockfd))
{
perror(lockname);
exit(EX_TEMPFAIL);
}
dbobj_init(&db);
if (dbobj_open(&db, dbname, "C") < 0)
{
perror(dbname);
exit(EX_TEMPFAIL);
}
time(&now);
val=dbobj_fetch(&db, sender_key, strlen(sender_key), &val_len, "");
if (val)
{
time_t t;
if (val_len >= sizeof(t))
{
memcpy(&t, val, sizeof(t));
if (t >= now - interval * 60 * 60 * 24)
{
free(val);
dbobj_close(&db);
close(lockfd);
exit(0);
}
}
free(val);
}
dbobj_store(&db, sender_key, strlen(sender_key),
(void *)&now, sizeof(now), "R");
dbobj_close(&db);
close(lockfd);
}
static char *fetch_smtproutes(const char *domain)
{
char *buf=get_control_smtproutes();
const char *p=buf;
if (!buf)
{
struct dbobj d;
char *p, *q;
size_t l;
p=config_search("esmtproutes.dat");
dbobj_init(&d);
if (dbobj_open(&d, p, "R"))
{
free(p);
return (0);
}
free(p);
p=strcpy(courier_malloc(strlen(domain)+1), domain);
for (q=p; *q; q++)
*q=tolower(*q);
q=dbobj_fetch(&d, p, strlen(p), &l, "D");
free(p);
dbobj_close(&d);
if (!q) return (0);
p=courier_malloc(l+1);
memcpy(p, q, l);
p[l]=0;
free(q);
return (p);
}
while (*p)
{
unsigned i;
for (i=0; p[i] && p[i] != '\n' && p[i] != '\r' && p[i] != ':';
++i)
;
if (p[i] == ':' && (i == 0 ||
config_domaincmp(domain, p, i) == 0))
{
char *q;
p += i;
++p;
for (i=0; p[i] && p[i] != '\n' && p[i] != '\r'; i++)
;
while (i && isspace((int)(unsigned char)p[i-1]))
--i;
while (i && isspace((int)(unsigned char)*p))
{
++p;
--i;
}
if (i == 0)
{
free(buf);
return (0);
}
q=courier_malloc(i+1);
memcpy(q, p, i);
q[i]=0;
free(buf);
return (q);
}
while (p[i])
{
if (p[i] == '\n' || p[i] == '\r')
{
++i;
break;
}
++i;
}
p += i;
}
free(buf);
return (0);
}
