X-Git-Url: http://pileus.org/git/?a=blobdiff_plain;f=etrn.c;h=ac416c86c3bed7eeb7246c268f7f259c12d04f67;hb=2629c4511c68729d98acfd08637c1f00d3807f49;hp=c931d2ccf92599a0942926a713e22710cee275c7;hpb=3dd9a93bd23e0ad36e52ffd79efe2dcbdaf85272;p=~andy%2Ffetchmail diff --git a/etrn.c b/etrn.c index c931d2cc..ac416c86 100644 --- a/etrn.c +++ b/etrn.c @@ -1,12 +1,21 @@ /* - * etrn.c -- ETRN protocol methods + * etrn.c -- ETRN protocol methods (see RFC 1985) * * For license terms, see the file COPYING in this directory. */ -#include +#include "config.h" +#ifdef ETRN_ENABLE #include #include +#include +#ifdef HAVE_NET_SOCKET_H /* BeOS needs this */ +#include +#endif +#include +#include +#include +#include "i18n.h" #include "fetchmail.h" #include "smtp.h" #include "socket.h" @@ -16,117 +25,154 @@ static int etrn_ok (int sock, char *argbuf) { int ok; - ok = SMTP_ok(sock); + (void)argbuf; + ok = SMTP_ok(sock, SMTP_MODE, TIMEOUT_DEFAULT); if (ok == SM_UNRECOVERABLE) return(PS_PROTOCOL); else return(ok); } -static int etrn_getrange(int sock, struct query *ctl, int*countp, int*newp) +static int etrn_getrange(int sock, struct query *ctl, const char *id, + int *countp, int *newp, int *bytes) /* send ETRN and interpret the response */ { int ok, opts; - char buf [POPBUFSIZE+1]; + char buf [MSGBUFSIZE+1]; + struct idlist *qnp; /* pointer to Q names */ - if ((ok = SMTP_ehlo(sock, ctl->server.names->id, &opts))) + (void)id; + if ((ok = SMTP_ehlo(sock, SMTP_MODE, fetchmailhost, + ctl->server.esmtp_name, ctl->server.esmtp_password, + &opts))) { - error(0, 0, "%s's SMTP listener does not support ESMTP", - ctl->server.names->id); + report(stderr, GT_("%s's SMTP listener does not support ESMTP\n"), + ctl->server.pollname); return(ok); } else if (!(opts & ESMTP_ETRN)) { - error(0, 0, "%s's SMTP listener does not support ETRN", - ctl->server.names->id); + report(stderr, GT_("%s's SMTP listener does not support ETRN\n"), + ctl->server.pollname); return(PS_PROTOCOL); } - *countp = *newp = -1; /* make sure we don't enter the fetch loop */ + /* make sure we don't enter the fetch loop */ + *bytes = *countp = *newp = -1; - /* ship the actual poll and get the response */ - gen_send(sock, "ETRN %s", ctl->smtphost); - if ((ok = gen_recv(sock, buf, sizeof(buf)))) - return(ok); - - /* this switch includes all the response codes described in RFC1985 */ - switch(atoi(buf)) + /* + * By default, the hostlist has a single entry, the fetchmail host's + * canonical DNS name. + */ + for (qnp = ctl->domainlist; qnp; qnp = qnp->next) { - case 250: /* OK, queuing for node started */ - error(0, 0, "Queuing for %s started", ctl->smtphost); - break; - - case 251: /* OK, no messages waiting for node */ - error(0, 0, "No messages waiting for %s", ctl->smtphost); - return(PS_NOMAIL); - - case 252: /* OK, pending messages for node started */ - case 253: /* OK, pending messages for node started */ - error(0, 0, "Pending messages for %s started"); - break; - - case 458: /* Unable to queue messages for node */ - error(0, -1, "Unable to queue messages for node %s", ctl->smtphost); - return(PS_PROTOCOL); - - case 459: /* Node not allowed: */ - error(0, -1, "Node %s not allowed: %s", ctl->smtphost, buf); - return(PS_AUTHFAIL); - - case 500: /* Syntax Error */ - error(0, -1, "ETRN syntax error"); - return(PS_PROTOCOL); - - case 501: /* Syntax Error in Parameters */ - error(0, -1, "ETRN syntax error in parameters"); - return(PS_PROTOCOL); - - default: - error(0, -1, "Unknown ETRN error %d", atoi(buf)); - return(PS_PROTOCOL); + /* ship the actual poll and get the response */ + gen_send(sock, "ETRN %s", qnp->id); + if ((ok = gen_recv(sock, buf, sizeof(buf)))) + return(ok); + + /* this switch includes all response codes described in RFC1985 */ + switch(atoi(buf)) + { + case 250: /* OK, queuing for node started */ + if (outlevel > O_SILENT) + report(stdout, GT_("Queuing for %s started\n"), qnp->id); + break; + + case 251: /* OK, no messages waiting for node */ + if (outlevel > O_SILENT) + report(stdout, GT_("No messages waiting for %s\n"), qnp->id); + return(PS_NOMAIL); + + case 252: /* OK, pending messages for node started */ + case 253: /* OK, pending messages for node started */ + if (outlevel > O_SILENT) + report(stdout, GT_("Pending messages for %s started\n"), qnp->id); + break; + + case 458: /* Unable to queue messages for node */ + report(stderr, GT_("Unable to queue messages for node %s\n"),qnp->id); + return(PS_PROTOCOL); + + case 459: /* Node not allowed: */ + report(stderr, GT_("Node %s not allowed: %s\n"), qnp->id, buf); + return(PS_AUTHFAIL); + + case 500: /* Syntax Error */ + report(stderr, GT_("ETRN syntax error\n")); + return(PS_PROTOCOL); + + case 501: /* Syntax Error in Parameters */ + 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); } -const static struct method etrn = +static int etrn_logout(int sock, struct query *ctl) +/* send logout command */ +{ + (void)ctl; + return(gen_transact(sock, "QUIT")); +} + +static const struct method etrn = { "ETRN", /* ESMTP ETRN extension */ - 25, /* standard SMTP port */ + "smtp", /* standard SMTP port */ + "smtps", /* ssl SMTP port */ FALSE, /* this is not a tagged protocol */ FALSE, /* this does not use a message delimiter */ etrn_ok, /* parse command response */ NULL, /* no need to get authentication */ etrn_getrange, /* initialize message sending */ NULL, /* we cannot get a list of sizes */ + NULL, /* we cannot get a list of sizes of subsets */ NULL, /* how do we tell a message is old? */ - NULL, /* request given message */ + NULL, /* no way to fetch headers */ + NULL, /* no way to fetch body */ NULL, /* no message trailer */ NULL, /* how to delete a message */ - "QUIT", /* the ETRN exit command */ + NULL, /* how to mark a message as seen */ + NULL, /* no mailbox support */ + etrn_logout, /* log out, we're done */ + FALSE, /* no, we can't re-poll */ }; int doETRN (struct query *ctl) /* retrieve messages using ETRN */ { + int status; + if (ctl->keep) { - fprintf(stderr, "Option --keep is not supported with ETRN\n"); + fprintf(stderr, GT_("Option --keep is not supported with ETRN\n")); return(PS_SYNTAX); } if (ctl->flush) { - fprintf(stderr, "Option --flush is not supported with ETRN\n"); + fprintf(stderr, GT_("Option --flush is not supported with ETRN\n")); return(PS_SYNTAX); } - if (ctl->mailbox) { - fprintf(stderr, "Option --remote is not supported with ETRN\n"); + if (ctl->mailboxes->id) { + fprintf(stderr, GT_("Option --folder is not supported with ETRN\n")); return(PS_SYNTAX); } if (check_only) { - fprintf(stderr, "Option --check is not supported with ETRN\n"); + fprintf(stderr, GT_("Option --check is not supported with ETRN\n")); return(PS_SYNTAX); } peek_capable = FALSE; - return(do_protocol(ctl, &etrn)); + + status = do_protocol(ctl, &etrn); + if (status == PS_NOMAIL) + status = PS_SUCCESS; + return(status); } +#endif /* ETRN_ENABLE */ /* etrn.c ends here */