#include "config.h"
#ifdef ETRN_ENABLE
#include <stdio.h>
#include <stdlib.h>
#include <assert.h>
#ifdef HAVE_NET_SOCKET_H
#include <net/socket.h>
#endif
#include <netdb.h>
#include <errno.h>
#include <unistd.h>
#include "i18n.h"
#include "fetchmail.h"
#include "smtp.h"
#include "socket.h"
static int etrn_ok (int sock, char *argbuf)
{
int ok;
ok = SMTP_ok(sock);
if (ok == SM_UNRECOVERABLE)
return(PS_PROTOCOL);
else
return(ok);
}
static int etrn_getrange(int sock, struct query *ctl, const char *id,
int *countp, int *newp, int *bytes)
{
int ok, opts;
char buf [MSGBUFSIZE+1];
struct idlist *qnp;
if ((ok = SMTP_ehlo(sock, fetchmailhost,
ctl->server.esmtp_name, ctl->server.esmtp_password,
&opts)))
{
report(stderr, GT_("%s's SMTP listener does not support ESMTP\n"),
ctl->server.pollname);
return(ok);
}
else if (!(opts & ESMTP_ETRN))
{
report(stderr, GT_("%s's SMTP listener does not support ETRN\n"),
ctl->server.pollname);
return(PS_PROTOCOL);
}
*bytes = *countp = *newp = -1;
for (qnp = ctl->domainlist; qnp; qnp = qnp->next)
{
gen_send(sock, "ETRN %s", qnp->id);
if ((ok = gen_recv(sock, buf, sizeof(buf))))
return(ok);
switch(atoi(buf))
{
case 250:
if (outlevel > O_SILENT)
report(stdout, GT_("Queuing for %s started\n"), qnp->id);
break;
case 251:
if (outlevel > O_SILENT)
report(stdout, GT_("No messages waiting for %s\n"), qnp->id);
return(PS_NOMAIL);
case 252:
case 253:
if (outlevel > O_SILENT)
report(stdout, GT_("Pending messages for %s started\n"), qnp->id);
break;
case 458:
report(stderr, GT_("Unable to queue messages for node %s\n"),qnp->id);
return(PS_PROTOCOL);
case 459:
report(stderr, GT_("Node %s not allowed: %s\n"), qnp->id, buf);
return(PS_AUTHFAIL);
case 500:
report(stderr, GT_("ETRN syntax error\n"));
return(PS_PROTOCOL);
case 501:
report(stderr, GT_("ETRN syntax error in parameters\n"));
return(PS_PROTOCOL);
default:
report(stderr, GT_("Unknown ETRN error %d\n"), atoi(buf));
return(PS_PROTOCOL);
}
}
return(0);
}
static int etrn_logout(int sock, struct query *ctl)
{
return(gen_transact(sock, "QUIT"));
}
const static struct method etrn =
{
"ETRN",
#if INET6_ENABLE
"smtp",
"smtps",
#else
25,
465,
#endif
FALSE,
FALSE,
etrn_ok,
NULL,
etrn_getrange,
NULL,
NULL,
NULL,
NULL,
NULL,
NULL,
NULL,
NULL,
etrn_logout,
FALSE,
};
int doETRN (struct query *ctl)
{
int status;
if (ctl->keep) {
fprintf(stderr, GT_("Option --keep is not supported with ETRN\n"));
return(PS_SYNTAX);
}
if (ctl->flush) {
fprintf(stderr, GT_("Option --flush is not supported with ETRN\n"));
return(PS_SYNTAX);
}
if (ctl->mailboxes->id) {
fprintf(stderr, GT_("Option --remote is not supported with ETRN\n"));
return(PS_SYNTAX);
}
if (check_only) {
fprintf(stderr, GT_("Option --check is not supported with ETRN\n"));
return(PS_SYNTAX);
}
peek_capable = FALSE;
status = do_protocol(ctl, &etrn);
if (status == PS_NOMAIL)
status = PS_SUCCESS;
return(status);
}
#endif