*
* For license terms, see the file COPYING in this directory.
*/
-
#include "config.h"
#include <stdio.h>
#if defined(HAVE_UNISTD_H)
#include <unistd.h>
#endif
-#if defined(HAVE_ALLOCA_H)
-#include <alloca.h>
-#else
-#ifdef _AIX
- #pragma alloca
-#endif
-#endif
#include <string.h>
#include <signal.h>
#if defined(HAVE_SYSLOG)
#include <syslog.h>
#endif
#include <pwd.h>
+#ifdef __FreeBSD__
+#include <grp.h>
+#endif
#include <errno.h>
#include <sys/time.h>
#include <sys/types.h>
#include <sys/stat.h>
+#ifdef HAVE_SETRLIMIT
+#include <sys/resource.h>
+#endif /* HAVE_SETRLIMIT */
#ifdef HAVE_SYS_WAIT_H
#include <sys/wait.h>
#endif
#include <netdb.h>
#endif /* HAVE_GETHOSTBYNAME */
+#ifdef HESIOD
+#include <hesiod.h>
+#endif
+
#include "fetchmail.h"
#include "tunable.h"
#include "smtp.h"
#include "getopt.h"
#include "netrc.h"
+#include "i18n.h"
#ifndef ENETUNREACH
#define ENETUNREACH 128 /* Interactive doesn't know this */
/* prototypes for internal functions */
static int load_params(int, char **, int);
-static void dump_params (struct query *);
+static void dump_params (struct runctl *runp, struct query *, flag implicit);
static int query_host(struct query *);
/* controls the detail level of status/progress messages written to stderr */
-int outlevel; /* see the O_.* constants above */
-
-/* daemon mode control */
-flag nodetach; /* if TRUE, don't detach daemon process */
-flag quitmode; /* if --quit was set */
-flag check_only; /* if --probe was set */
-char *cmd_logfile; /* if --logfile was set */
-char *cmd_idfile; /* if --idfile was set */
-int cmd_daemon; /* if --daemon was set */
+int outlevel; /* see the O_.* constants above */
/* miscellaneous global controls */
-char *idfile; /* UID list file */
-flag versioninfo; /* emit only version info */
-char *user; /* the name of the invoking user */
-char *home;
-char *fetchmailhost; /* the name of the host running fetchmail */
-char *program_name; /* the name to prefix error messages with */
+struct runctl run; /* global controls for this run */
+flag nodetach; /* if TRUE, don't detach daemon process */
+flag quitmode; /* if --quit was set */
+flag check_only; /* if --probe was set */
+flag versioninfo; /* emit only version info */
+char *user; /* the name of the invoking user */
+char *home; /* invoking user's home directory */
+char *program_name; /* the name to prefix error messages with */
+flag configdump; /* dump control blocks for configurator */
+const char *fetchmailhost; /* either `localhost' or the host's FQDN */
#if NET_SECURITY
void *request = NULL;
static int querystatus; /* status of query */
static int successes; /* count number of successful polls */
static int lastsig; /* last signal received */
+static struct runctl cmd_run; /* global options set from command line */
-static void termhook(); /* forward declaration of exit hook */
+static void termhook(int); /* forward declaration of exit hook */
+#if 0
+#define SLEEP_WITH_ALARM
+#endif
-RETSIGTYPE donothing(sig) int sig; {signal(sig, donothing); lastsig = sig;}
+#ifdef SLEEP_WITH_ALARM
+/*
+ * The function of this variable is to remove the window during which a
+ * SIGALRM can hose the code (ALARM is triggered *before* pause() is called).
+ * This is a bit of a kluge; the real right thing would use sigprocmask(),
+ * sigsuspend().
+ * This work around lets the interval timer trigger the first alarm after the
+ * required interval and will then generate alarms all 5 seconds, until it
+ * is certain, that the critical section (ie., the window) is left.
+ */
+#if defined(STDC_HEADERS)
+static sig_atomic_t alarm_latch = FALSE;
+#else
+/* assume int can be written in one atomic operation on non ANSI-C systems */
+static int alarm_latch = FALSE;
+#endif
+
+RETSIGTYPE gotsigalrm(sig)
+int sig;
+{
+ signal(sig, gotsigalrm);
+ lastsig = sig;
+ alarm_latch = TRUE;
+}
+#endif /* SLEEP_WITH_ALARM */
+
+RETSIGTYPE donothing(int sig) {signal(sig, donothing); lastsig = sig;}
#ifdef HAVE_ON_EXIT
static void unlockit(int n, void *p)
/* Various EMX-specific definitions */
int itimerflag;
void itimerthread(void* dummy) {
- if (outlevel == O_VERBOSE)
- fprintf(stderr, "fetchmail: thread sleeping for %d sec.\n", poll_interval);
+ if (outlevel >= O_VERBOSE)
+ fprintf(stderr, _("fetchmail: thread sleeping for %d sec.\n"), poll_interval);
while(1) {
_sleep2(poll_interval*1000);
kill((getpid()), SIGALRM);
}
#endif
+#ifdef __FreeBSD__
+/* drop SGID kmem privileage until we need it */
+static void dropprivs(void)
+{
+ struct group *gr;
+ gid_t egid;
+ gid_t rgid;
+
+ egid = getegid();
+ rgid = getgid();
+ gr = getgrgid(egid);
+
+ if (gr && !strcmp(gr->gr_name, "kmem"))
+ {
+ extern void interface_set_gids(gid_t egid, gid_t rgid);
+ interface_set_gids(egid, rgid);
+ setegid(rgid);
+ }
+}
+#endif
+
int main (int argc, char **argv)
{
int st, bkgd = FALSE;
int parsestatus, implicitmode = FALSE;
- struct query *ctl;
FILE *lockfp;
+ struct query *ctl;
netrc_entry *netrc_list;
- char *netrc_file, tmpbuf[BUFSIZ];
+ char *netrc_file, *tmpbuf;
pid_t pid;
+#ifdef __FreeBSD__
+ dropprivs();
+#endif
+
envquery(argc, argv);
+#ifdef ENABLE_NLS
+ bindtextdomain(PACKAGE, LOCALEDIR);
+ textdomain(PACKAGE);
+#endif
#define IDFILE_NAME ".fetchids"
- idfile = (char *) xmalloc(strlen(home)+strlen(IDFILE_NAME)+2);
- strcpy(idfile, home);
- strcat(idfile, "/");
- strcat(idfile, IDFILE_NAME);
+ run.idfile = (char *) xmalloc(strlen(home)+strlen(IDFILE_NAME)+2);
+ strcpy(run.idfile, home);
+ strcat(run.idfile, "/");
+ strcat(run.idfile, IDFILE_NAME);
outlevel = O_NORMAL;
- if ((parsestatus = parsecmdline(argc,argv,&cmd_opts)) < 0)
+ if ((parsestatus = parsecmdline(argc,argv, &cmd_run, &cmd_opts)) < 0)
exit(PS_SYNTAX);
- /* this hint to stdio should help messages come out in the right order */
- setvbuf(stdout, NULL, _IOLBF, MSGBUFSIZE);
-
if (versioninfo)
{
- printf("This is fetchmail release %s", RELEASE_ID);
+ printf(_("This is fetchmail release %s"), VERSION);
#ifdef POP2_ENABLE
printf("+POP2");
#endif /* POP2_ENABLE */
#ifndef IMAP_ENABLE
printf("-IMAP");
#endif /* IMAP_ENABLE */
+#ifdef GSSAPI
+ printf("+IMAP-GSS");
+#endif /* GSSAPI */
#ifdef RPA_ENABLE
printf("+RPA");
#endif /* RPA_ENABLE */
+#ifdef SDPS_ENABLE
+ printf("+SDPS");
+#endif /* SDPS_ENABLE */
#ifndef ETRN_ENABLE
printf("-ETRN");
#endif /* ETRN_ENABLE */
#if NET_SECURITY
printf("+NETSEC");
#endif /* NET_SECURITY */
+#ifdef HAVE_SOCKS
+ #if HAVE_SOCKS
+ printf("+SOCKS");
+ #endif
+#endif /* HAVE_SOCKS */
+#if ENABLE_NLS
+ printf("+NLS");
+#endif /* ENABLE_NLS */
putchar('\n');
/* this is an attempt to help remote debugging */
implicitmode = load_params(argc, argv, optind);
/* set up to do lock protocol */
- if (!getuid())
- sprintf(tmpbuf, "%s/fetchmail.pid", PID_DIR);
- else {
+#define FETCHMAIL_PIDFILE "fetchmail.pid"
+ if (!getuid()) {
+ xalloca(tmpbuf, char *,
+ strlen(PID_DIR) + strlen(FETCHMAIL_PIDFILE) + 2);
+ sprintf(tmpbuf, "%s/%s", PID_DIR, FETCHMAIL_PIDFILE);
+ } else {
+ xalloca(tmpbuf, char *, strlen(home) + strlen(FETCHMAIL_PIDFILE) + 3);
strcpy(tmpbuf, home);
- strcat(tmpbuf, "/.fetchmail.pid");
+ strcat(tmpbuf, "/.");
+ strcat(tmpbuf, FETCHMAIL_PIDFILE);
+ }
+#undef FETCHMAIL_PIDFILE
+
+#ifdef HAVE_SETRLIMIT
+ /*
+ * Before getting passwords, disable core dumps unless -v -d0 mode is on.
+ * Core dumps could otherwise contain passwords to be scavenged by a
+ * cracker.
+ */
+ if (outlevel < O_VERBOSE || run.poll_interval > 0)
+ {
+ struct rlimit corelimit;
+ corelimit.rlim_cur = 0;
+ corelimit.rlim_max = 0;
+ setrlimit(RLIMIT_CORE, &corelimit);
+ }
+#endif /* HAVE_SETRLIMIT */
+
+ /* parse the ~/.netrc file (if present) for future password lookups. */
+ xalloca(netrc_file, char *, strlen (home) + 8);
+ strcpy (netrc_file, home);
+ strcat (netrc_file, "/.netrc");
+ netrc_list = parse_netrc(netrc_file);
+
+ /* pick up passwords where we can */
+ for (ctl = querylist; ctl; ctl = ctl->next)
+ {
+ if (ctl->active && !(implicitmode && ctl->server.skip)&&!ctl->password)
+ {
+ if (ctl->server.preauthenticate == A_KERBEROS_V4 ||
+ ctl->server.preauthenticate == A_KERBEROS_V5 ||
+#ifdef GSSAPI
+ ctl->server.protocol == P_IMAP_GSS ||
+#endif /* GSSAPI */
+ ctl->server.protocol == P_IMAP_K4)
+ /* Server won't care what the password is, but there
+ must be some non-null string here. */
+ ctl->password = ctl->remotename;
+ else
+ {
+ netrc_entry *p;
+
+ /* look up the pollname and account in the .netrc file. */
+ p = search_netrc(netrc_list,
+ ctl->server.pollname, ctl->remotename);
+ /* if we find a matching entry with a password, use it */
+ if (p && p->password)
+ ctl->password = xstrdup(p->password);
+
+ /* otherwise try with "via" name if there is one */
+ else if (ctl->server.via)
+ {
+ p = search_netrc(netrc_list,
+ ctl->server.via, ctl->remotename);
+ if (p && p->password)
+ ctl->password = xstrdup(p->password);
+ }
+ }
+ }
}
/* perhaps we just want to check options? */
- if (versioninfo) {
- printf("Taking options from command line");
+ if (versioninfo)
+ {
+ printf(_("Taking options from command line"));
if (access(rcfile, 0))
printf("\n");
else
- printf(" and %s\n", rcfile);
- if (poll_interval)
- printf("Poll interval is %d seconds\n", poll_interval);
- if (outlevel == O_VERBOSE)
- printf("Lockfile at %s\n", tmpbuf);
- if (logfile)
- printf("Logfile is %s\n", logfile);
-#if defined(HAVE_SYSLOG)
- if (errors_to_syslog)
- printf("Progress messages will be logged via syslog\n");
-#endif
- if (use_invisible)
- printf("Fetchmail will masquerade and will not generate Received\n");
- for (ctl = querylist; ctl; ctl = ctl->next) {
- if (ctl->active && !(implicitmode && ctl->server.skip))
- dump_params(ctl);
- }
+ printf(_(" and %s\n"), rcfile);
+ if (outlevel >= O_VERBOSE)
+ printf(_("Lockfile at %s\n"), tmpbuf);
+
if (querylist == NULL)
(void) fprintf(stderr,
- "No mailservers set up -- perhaps %s is missing?\n", rcfile);
+ _("No mailservers set up -- perhaps %s is missing?\n"), rcfile);
+ else
+ dump_params(&run, querylist, implicitmode);
+ exit(0);
+ }
+
+ /* dump options as a Python dictionary, for configurator use */
+ if (configdump)
+ {
+ dump_config(&run, querylist);
exit(0);
}
pid = -1;
if ((lockfile = (char *) malloc(strlen(tmpbuf) + 1)) == NULL)
{
- fprintf(stderr,"fetchmail: cannot allocate memory for lock name.\n");
+ fprintf(stderr,_("fetchmail: cannot allocate memory for lock name.\n"));
exit(PS_EXCLUDE);
}
else
bkgd = (fscanf(lockfp,"%d %d", &pid, &st) == 2);
if (kill(pid, 0) == -1) {
- fprintf(stderr,"fetchmail: removing stale lockfile\n");
+ fprintf(stderr,_("fetchmail: removing stale lockfile\n"));
pid = -1;
bkgd = FALSE;
unlink(lockfile);
/* if no mail servers listed and nothing in background, we're done */
if (!(quitmode && argc == 2) && pid == -1 && querylist == NULL) {
- (void)fputs("fetchmail: no mailservers have been specified.\n",stderr);
+ (void)fputs(_("fetchmail: no mailservers have been specified.\n"),stderr);
exit(PS_SYNTAX);
}
{
if (pid == -1)
{
- fprintf(stderr,"fetchmail: no other fetchmail is running\n");
+ fprintf(stderr,_("fetchmail: no other fetchmail is running\n"));
if (argc == 2)
exit(PS_EXCLUDE);
}
else if (kill(pid, SIGTERM) < 0)
{
- fprintf(stderr,"fetchmail: error killing %s fetchmail at %d; bailing out.\n",
- bkgd ? "background" : "foreground", pid);
+ fprintf(stderr,_("fetchmail: error killing %s fetchmail at %d; bailing out.\n"),
+ bkgd ? _("background") : _("foreground"), pid);
exit(PS_EXCLUDE);
}
else
{
- fprintf(stderr,"fetchmail: %s fetchmail at %d killed.\n",
- bkgd ? "background" : "foreground", pid);
+ fprintf(stderr,_("fetchmail: %s fetchmail at %d killed.\n"),
+ bkgd ? _("background") : _("foreground"), pid);
unlink(lockfile);
if (argc == 2)
exit(0);
if (check_only)
{
fprintf(stderr,
- "fetchmail: can't check mail while another fetchmail to same host is running.\n");
+ _("fetchmail: can't check mail while another fetchmail to same host is running.\n"));
return(PS_EXCLUDE);
}
else if (!implicitmode)
{
fprintf(stderr,
- "fetchmail: can't poll specified hosts with another fetchmail running at %d.\n",
+ _("fetchmail: can't poll specified hosts with another fetchmail running at %d.\n"),
pid);
return(PS_EXCLUDE);
}
else if (!bkgd)
{
fprintf(stderr,
- "fetchmail: another foreground fetchmail is running at %d.\n",
+ _("fetchmail: another foreground fetchmail is running at %d.\n"),
pid);
return(PS_EXCLUDE);
}
else if (argc > 1)
{
fprintf(stderr,
- "fetchmail: can't accept options while a background fetchmail is running.\n");
+ _("fetchmail: can't accept options while a background fetchmail is running.\n"));
return(PS_EXCLUDE);
}
else if (kill(pid, SIGUSR1) == 0)
{
fprintf(stderr,
- "fetchmail: background fetchmail at %d awakened.\n",
+ _("fetchmail: background fetchmail at %d awakened.\n"),
pid);
return(0);
}
* SIGUSR1/SIGHUP transmission.
*/
fprintf(stderr,
- "fetchmail: elder sibling at %d died mysteriously.\n",
+ _("fetchmail: elder sibling at %d died mysteriously.\n"),
pid);
return(PS_UNDEFINED);
}
}
- /* parse the ~/.netrc file (if present) for future password lookups. */
- netrc_file = (char *) xmalloc (strlen (home) + 8);
- strcpy (netrc_file, home);
- strcat (netrc_file, "/.netrc");
- netrc_list = parse_netrc(netrc_file);
-
/* pick up interactively any passwords we need but don't have */
for (ctl = querylist; ctl; ctl = ctl->next)
- if (ctl->active && !(implicitmode && ctl->server.skip)&&!ctl->password)
+ {
+ if (ctl->active && !(implicitmode && ctl->server.skip)
+ && ctl->server.protocol != P_ETRN
+ && ctl->server.protocol != P_IMAP_K4
+#ifdef GSSAPI
+ && ctl->server.protocol != P_IMAP_GSS
+#endif /* GSSAPI */
+ && !ctl->password)
{
- if (ctl->server.preauthenticate == A_KERBEROS_V4 ||
- ctl->server.preauthenticate == A_KERBEROS_V5 ||
- ctl->server.protocol == P_IMAP_K4 ||
- ctl->server.protocol == P_IMAP_GSS)
- /* Server won't care what the password is, but there
- must be some non-null string here. */
- ctl->password = ctl->remotename;
- else
- {
- /* look up the host and account in the .netrc file. */
- netrc_entry *p = search_netrc(netrc_list,ctl->server.pollname);
- while (p && strcmp(p->account, ctl->remotename))
- p = search_netrc(p->next, ctl->remotename);
-
- /* if we find a matching entry with a password, use it */
- if (p && p->password)
- ctl->password = xstrdup(p->password);
- }
-
- if (ctl->server.protocol != P_ETRN && ctl->server.protocol != P_IMAP_K4 && ctl->server.protocol != P_IMAP_GSS && !ctl->password)
- {
- (void) sprintf(tmpbuf, "Enter password for %s@%s: ",
- ctl->remotename, ctl->server.pollname);
- ctl->password = xstrdup((char *)getpassword(tmpbuf));
- }
+ char* password_prompt = _("Enter password for %s@%s: ");
+
+ xalloca(tmpbuf, char *, strlen(password_prompt) +
+ strlen(ctl->remotename) +
+ strlen(ctl->server.pollname) + 1);
+ (void) sprintf(tmpbuf, password_prompt,
+ ctl->remotename, ctl->server.pollname);
+ ctl->password = xstrdup((char *)getpassword(tmpbuf));
}
+ }
+
+/* Time to initiate the SOCKS library (this is not mandatory: it just
+ registers the correct application name for logging purpose. If you
+ have some problem, comment these lines). */
+#ifdef HAVE_SOCKS
+ #if HAVE_SOCKS
+/* Mmmh... I don't like hardcoded application names,
+ but "fetchmail" is everywhere... */
+ SOCKSinit("fetchmail");
+ #endif
+#endif /* HAVE_SOCKS */
/*
* Maybe time to go to demon mode...
*/
#if defined(HAVE_SYSLOG)
- if (errors_to_syslog)
+ if (run.use_syslog)
{
openlog(program_name, LOG_PID, LOG_MAIL);
- error_init(-1);
+ report_init(-1);
}
else
#endif
- error_init(poll_interval == 0 && !logfile);
+ report_init((run.poll_interval == 0 || nodetach) && !run.logfile);
- if (poll_interval)
+ if (run.poll_interval)
{
if (!nodetach)
- daemonize(logfile, termhook);
- error( 0, 0, "starting fetchmail %s daemon ", RELEASE_ID);
+ daemonize(run.logfile, termhook);
+ report(stdout, _("starting fetchmail %s daemon \n"), VERSION);
/*
* We'll set up a handler for these when we're sleeping,
* but ignore them otherwise so as not to interrupt a poll.
*/
signal(SIGUSR1, SIG_IGN);
- if (poll_interval && !getuid())
+ if (run.poll_interval && !getuid())
signal(SIGHUP, SIG_IGN);
}
+#ifdef linux
+ interface_init();
+#endif /* linux */
+
/* beyond here we don't want more than one fetchmail running per user */
umask(0077);
signal(SIGABRT, termhook);
/* here's the exclusion lock */
if ((lockfp = fopen(lockfile,"w")) != NULL) {
fprintf(lockfp,"%d",getpid());
- if (poll_interval)
- fprintf(lockfp," %d", poll_interval);
+ if (run.poll_interval)
+ fprintf(lockfp," %d", run.poll_interval);
fclose(lockfp);
#ifdef HAVE_ATEXIT
{
if (ctl->active && !(implicitmode && ctl->server.skip))
{
+ if (ctl->wedged)
+ {
+ report(stderr,
+ _("poll of %s skipped (failed authentication or too many timeouts)\n"),
+ ctl->server.pollname);
+ continue;
+ }
+
/* check skip interval first so that it counts all polls */
- if (poll_interval && ctl->server.interval)
+ if (run.poll_interval && ctl->server.interval)
{
if (ctl->server.poll_count++ % ctl->server.interval)
{
- if (outlevel == O_VERBOSE)
- fprintf(stderr,
- "fetchmail: interval not reached, not querying %s\n",
+ if (outlevel >= O_VERBOSE)
+ report(stdout,
+ _("interval not reached, not querying %s\n"),
ctl->server.pollname);
continue;
}
}
-#if defined(linux) && !INET6
+#if (defined(linux) && !INET6) || defined(__FreeBSD__)
/* interface_approve() does its own error logging */
if (!interface_approve(&ctl->server))
continue;
-#endif /* defined(linux) && !INET6 */
-
-#ifdef HAVE_GETHOSTBYNAME
- /*
- * This functions partly as a probe to make sure our
- * nameserver is still up. The multidrop case
- * (especially) needs it.
- */
- if (ctl->server.preauthenticate==A_KERBEROS_V4 ||
- ctl->server.preauthenticate==A_KERBEROS_V5 ||
- MULTIDROP(ctl))
- {
- struct hostent *namerec;
-
- /* compute the canonical name of the host */
- errno = 0;
- namerec = gethostbyname(ctl->server.queryname);
- if (namerec == (struct hostent *)NULL)
- {
- error(0, errno,
- "skipping %s poll, ",
- ctl->server.pollname);
- if (errno)
- {
- if (errno == ENETUNREACH)
- break; /* go to sleep */
- }
-#ifdef HAVE_HERROR /* NEXTSTEP doesn't */
- else
- herror("DNS error");
-#endif /* HAVE_HERROR */
- continue;
- }
- else
- {
- free(ctl->server.truename);
- ctl->server.truename=xstrdup((char *)namerec->h_name);
- }
- }
-#endif /* HAVE_GETHOSTBYNAME */
+#endif /* (defined(linux) && !INET6) || defined(__FreeBSD__) */
querystatus = query_host(ctl);
- if (querystatus == PS_SUCCESS) {
+ if (querystatus == PS_SUCCESS)
+ {
successes++;
#ifdef POP3_ENABLE
if (!check_only)
- update_str_lists(ctl);
+ update_str_lists(ctl);
+
+ /* Save UID list to prevent re-fetch in case fetchmail
+ recover from crash */
+ if (!check_only)
+ {
+ write_saved_lists(querylist, run.idfile);
+ if (outlevel >= O_DEBUG)
+ report(stdout, _("saved UID List\n"));
+ }
#endif /* POP3_ENABLE */
}
-#if defined(linux) && !INET6
+ else if (!check_only &&
+ ((querystatus!=PS_NOMAIL) || (outlevel==O_DEBUG)))
+ report(stdout, _("Query status=%d\n"), querystatus);
+
+#if (defined(linux) && !INET6) || defined (__FreeBSD__)
if (ctl->server.monitor)
- {
- /* Allow some time for the link to quiesce. One
- * second is usually sufficient, three is safe.
- * Note: this delay is important - don't remove!
- */
- sleep(3);
- interface_note_activity(&ctl->server);
- }
-#endif /* defined(linux) && !INET6 */
+ {
+ /*
+ * Allow some time for the link to quiesce. One
+ * second is usually sufficient, three is safe.
+ * Note: this delay is important - don't remove!
+ */
+ sleep(3);
+ interface_note_activity(&ctl->server);
+ }
+#endif /* (defined(linux) && !INET6) || defined(__FreeBSD__) */
}
}
/*
* OK, we've polled. Now sleep.
*/
- if (poll_interval)
+ if (run.poll_interval)
{
- if (outlevel == O_VERBOSE)
- {
- time_t now;
+ /*
+ * Because passwords can expire, it may happen that *all*
+ * hosts are now out of the loop due to authfail
+ * conditions. If this happens daemon-mode fetchmail
+ * should softly and silently vanish away, rather than
+ * spinning uselessly.
+ */
+ int unwedged = 0;
- time(&now);
- fprintf(stderr, "fetchmail: sleeping at %s", ctime(&now));
+ for (ctl = querylist; ctl; ctl = ctl->next)
+ if (ctl->active && !(implicitmode && ctl->server.skip))
+ if (!ctl->wedged)
+ unwedged++;
+ if (!unwedged)
+ {
+ report(stderr, _("All connections are wedged. Exiting.\n"));
+ exit(PS_AUTHFAIL);
}
+ if (outlevel >= O_VERBOSE)
+ report(stdout,
+ _("fetchmail: sleeping at %s\n"), rfc822timestamp());
+
/*
* With this simple hack, we make it possible for a foreground
* fetchmail to wake up one in daemon mode. What we want is the
if (!getuid())
signal(SIGHUP, donothing);
- /*
- * We can't use sleep(3) here because we need an alarm(3)
- * equivalent in order to implement server nonresponse timeout.
- * We'll just assume setitimer(2) is available since fetchmail
- * has to have a BSDoid socket layer to work at all.
- */
+ /* time for a pause in the action... */
{
#ifndef __EMX__
#ifdef SLEEP_WITH_ALARM /* not normally on */
+ /*
+ * We can't use sleep(3) here because we need an alarm(3)
+ * equivalent in order to implement server nonresponse timeout.
+ * We'll just assume setitimer(2) is available since fetchmail
+ * has to have a BSDoid socket layer to work at all.
+ */
/*
* This code stopped working under glibc-2, apparently due
* to the change in signal(2) semantics. (The siginterrupt
*/
struct itimerval ntimeout;
- ntimeout.it_interval.tv_sec = ntimeout.it_interval.tv_usec = 0;
- ntimeout.it_value.tv_sec = poll_interval;
+ ntimeout.it_interval.tv_sec = 5; /* repeat alarm every 5 secs */
+ ntimeout.it_interval.tv_usec = 0;
+ ntimeout.it_value.tv_sec = run.poll_interval;
ntimeout.it_value.tv_usec = 0;
siginterrupt(SIGALRM, 1);
- setitimer(ITIMER_REAL,&ntimeout,NULL);
- /* there's a small window here */
- signal(SIGALRM, donothing);
- pause();
+ alarm_latch = FALSE;
+ signal(SIGALRM, gotsigalrm); /* first trap signals */
+ setitimer(ITIMER_REAL,&ntimeout,NULL); /* then start timer */
+ /* there is a very small window between the next two lines */
+ /* which could result in a deadlock. But this will now be */
+ /* caught by periodical alarms (see it_interval) */
+ if (!alarm_latch)
+ pause();
+ /* stop timer */
+ ntimeout.it_interval.tv_sec = ntimeout.it_interval.tv_usec = 0;
+ ntimeout.it_value.tv_sec = ntimeout.it_value.tv_usec = 0;
+ setitimer(ITIMER_REAL,&ntimeout,NULL); /* now stop timer */
signal(SIGALRM, SIG_IGN);
#else
/*
*/
struct timeval timeout;
- timeout.tv_sec = poll_interval;
+ timeout.tv_sec = run.poll_interval;
timeout.tv_usec = 0;
lastsig = 0;
select(0,0,0,0, &timeout);
#endif
#else /* EMX */
- signal(SIGALRM, donothing);
+ alarm_latch = FALSE;
+ signal(SIGALRM, gotsigalrm);
_beginthread(itimerthread, NULL, 32768, NULL);
- pause();
+ /* see similar code above */
+ if (!alarm_latch)
+ pause();
signal(SIGALRM, SIG_IGN);
#endif /* ! EMX */
if (lastsig == SIGUSR1
- || ((poll_interval && !getuid()) && lastsig == SIGHUP))
+ || ((run.poll_interval && !getuid()) && lastsig == SIGHUP))
{
#ifdef SYS_SIGLIST_DECLARED
- error(0, 0, "awakened by %s", sys_siglist[lastsig]);
+ report(stdout,
+ _("awakened by %s\n"), sys_siglist[lastsig]);
#else
- error(0, 0, "awakened by signal %d", lastsig);
+ report(stdout,
+ _("awakened by signal %d\n"), lastsig);
#endif
+ /* received a wakeup - unwedge all servers in case */
+ /* the problem has been manually repaired */
+ for (ctl = querylist; ctl; ctl = ctl->next)
+ ctl->wedged = FALSE;
}
}
if (!getuid())
signal(SIGHUP, SIG_IGN);
- if (outlevel == O_VERBOSE)
- {
- time_t now;
-
- time(&now);
- fprintf(stderr, "fetchmail: awakened at %s", ctime(&now));
- }
+ if (outlevel >= O_VERBOSE)
+ report(stdout, _("awakened at %s\n"), rfc822timestamp());
}
} while
- (poll_interval);
+ (run.poll_interval);
- if (outlevel == O_VERBOSE)
- fprintf(stderr,"fetchmail: normal termination, status %d\n",
+ if (outlevel >= O_VERBOSE)
+ report(stdout, _("normal termination, status %d\n"),
successes ? PS_SUCCESS : querystatus);
termhook(0);
exit(successes ? PS_SUCCESS : querystatus);
}
+static void optmerge(struct query *h2, struct query *h1, int force)
+/* merge two options records */
+{
+ /*
+ * If force is off, modify h2 fields only when they're empty (treat h1
+ * as defaults). If force is on, modify each h2 field whenever h1
+ * is nonempty (treat h1 as an override).
+ */
+#define LIST_MERGE(dstl, srcl) if (force ? !!srcl : !dstl) \
+ free_str_list(&dstl), \
+ append_str_list(&dstl, &srcl)
+ LIST_MERGE(h2->server.localdomains, h1->server.localdomains);
+ LIST_MERGE(h2->localnames, h1->localnames);
+ LIST_MERGE(h2->mailboxes, h1->mailboxes);
+ LIST_MERGE(h2->smtphunt, h1->smtphunt);
+ LIST_MERGE(h2->antispam, h1->antispam);
+#undef LIST_MERGE
+
+#define FLAG_MERGE(fld) if (force ? !!h1->fld : !h2->fld) h2->fld = h1->fld
+ FLAG_MERGE(server.via);
+ FLAG_MERGE(server.protocol);
+#if INET6
+ FLAG_MERGE(server.service);
+ FLAG_MERGE(server.netsec);
+#else /* INET6 */
+ FLAG_MERGE(server.port);
+#endif /* INET6 */
+ FLAG_MERGE(server.interval);
+ FLAG_MERGE(server.preauthenticate);
+ FLAG_MERGE(server.timeout);
+ FLAG_MERGE(server.envelope);
+ FLAG_MERGE(server.envskip);
+ FLAG_MERGE(server.qvirtual);
+ FLAG_MERGE(server.skip);
+ FLAG_MERGE(server.dns);
+ FLAG_MERGE(server.checkalias);
+ FLAG_MERGE(server.uidl);
+
+#if defined(linux) || defined(__FreeBSD__)
+ FLAG_MERGE(server.interface);
+ FLAG_MERGE(server.monitor);
+ FLAG_MERGE(server.interface_pair);
+#endif /* linux || defined(__FreeBSD__) */
+
+ FLAG_MERGE(server.plugin);
+ FLAG_MERGE(server.plugout);
+ FLAG_MERGE(wildcard);
+ FLAG_MERGE(remotename);
+ FLAG_MERGE(password);
+ FLAG_MERGE(mda);
+ FLAG_MERGE(bsmtp);
+ FLAG_MERGE(listener);
+ FLAG_MERGE(smtpaddress);
+ FLAG_MERGE(preconnect);
+ FLAG_MERGE(postconnect);
+
+ FLAG_MERGE(keep);
+ FLAG_MERGE(flush);
+ FLAG_MERGE(fetchall);
+ FLAG_MERGE(rewrite);
+ FLAG_MERGE(forcecr);
+ FLAG_MERGE(stripcr);
+ FLAG_MERGE(pass8bits);
+ FLAG_MERGE(dropstatus);
+ FLAG_MERGE(mimedecode);
+ FLAG_MERGE(limit);
+ FLAG_MERGE(warnings);
+ FLAG_MERGE(fetchlimit);
+ FLAG_MERGE(batchlimit);
+ FLAG_MERGE(expunge);
+
+ FLAG_MERGE(properties);
+#undef FLAG_MERGE
+}
+
static int load_params(int argc, char **argv, int optind)
{
int implicitmode, st;
struct passwd *pw;
struct query def_opts, *ctl;
+ run.bouncemail = TRUE;
+
memset(&def_opts, '\0', sizeof(struct query));
def_opts.smtp_socket = -1;
def_opts.smtpaddress = (char *)0;
- def_opts.antispam = 571;
+ save_str(&def_opts.antispam, STRING_DUMMY, 0)->val.status.num = 571;
+ save_str(&def_opts.antispam, STRING_DUMMY, 0)->val.status.num = 550;
+ save_str(&def_opts.antispam, STRING_DUMMY, 0)->val.status.num = 501;
def_opts.server.protocol = P_AUTO;
def_opts.server.timeout = CLIENT_TIMEOUT;
+ def_opts.warnings = WARNING_INTERVAL;
def_opts.remotename = user;
- def_opts.expunge = 1;
+ def_opts.listener = SMTP_MODE;
/* this builds the host list */
if (prc_parse_file(rcfile, !versioninfo) != 0)
else
for (; optind < argc; optind++)
{
+ flag predeclared = FALSE;
+
/*
* If hostname corresponds to a host known from the rc file,
* simply declare it active. Otherwise synthesize a host
for (ctl = querylist; ctl; ctl = ctl->next)
if (!strcmp(ctl->server.pollname, argv[optind])
|| str_in_list(&ctl->server.akalist, argv[optind], TRUE))
- goto foundit;
-
- /*
- * Allocate and link record without copying in command-line args;
- * we'll do that with the optmerge call later on.
- */
- ctl = hostalloc((struct query *)NULL);
- ctl->server.via =
- ctl->server.pollname = xstrdup(argv[optind]);
+ {
+ /* Is this correct? */
+ if(predeclared)
+ fprintf(stderr,_("Warning: multiple mentions of host %s in config file\n"),argv[optind]);
+ ctl->active = TRUE;
+ predeclared = TRUE;
+ }
- foundit:
- ctl->active = TRUE;
+ if (!predeclared)
+ {
+ /*
+ * Allocate and link record without copying in
+ * command-line args; we'll do that with the optmerge
+ * call later on.
+ */
+ ctl = hostalloc((struct query *)NULL);
+ ctl->server.via =
+ ctl->server.pollname = xstrdup(argv[optind]);
+ ctl->active = TRUE;
+ ctl->server.lead_server = (struct hostdata *)NULL;
+ }
}
- /* if there's a defaults record, merge it and lose it */
+ /*
+ * If there's a defaults record, merge it and lose it.
+ */
if (querylist && strcmp(querylist->server.pollname, "defaults") == 0)
{
for (ctl = querylist->next; ctl; ctl = ctl->next)
- optmerge(ctl, querylist);
+ optmerge(ctl, querylist, FALSE);
querylist = querylist->next;
}
if (ctl != querylist && strcmp(ctl->server.pollname, "defaults") == 0)
exit(PS_SYNTAX);
+ /* use localhost if we never fetch the FQDN of this host */
+ fetchmailhost = "localhost";
+
/* merge in wired defaults, do sanity checks and prepare internal fields */
for (ctl = querylist; ctl; ctl = ctl->next)
{
- if (ctl->active && !(implicitmode && ctl->server.skip))
+ ctl->wedged = FALSE;
+
+ if (configdump || (ctl->active && !(implicitmode && ctl->server.skip)))
{
/* merge in defaults */
- optmerge(ctl, &def_opts);
+ optmerge(ctl, &def_opts, FALSE);
- /* make sure we have a nonempty host list to forward to */
- if (!ctl->smtphunt)
- save_str(&ctl->smtphunt, fetchmailhost, FALSE);
-
- /* keep lusers from shooting themselves in the foot :-) */
- if (poll_interval && ctl->limit)
- {
- fprintf(stderr,"fetchmail: you'd never see large messages!\n");
- exit(PS_SYNTAX);
- }
-
- /* if `user' doesn't name a real local user, try to run as root */
- if ((pw = getpwnam(user)) == (struct passwd *)NULL)
- ctl->uid = 0;
- else
- ctl->uid = pw->pw_uid; /* for local delivery via MDA */
- if (!ctl->localnames) /* for local delivery via SMTP */
- save_str_pair(&ctl->localnames, user, NULL);
+ /* force command-line options */
+ optmerge(ctl, &cmd_opts, TRUE);
/* this code enables flags to be turned off */
#define DEFAULT(flag, dflt) if (flag == FLAG_TRUE)\
DEFAULT(ctl->forcecr, FALSE);
DEFAULT(ctl->pass8bits, FALSE);
DEFAULT(ctl->dropstatus, FALSE);
- DEFAULT(ctl->mimedecode, FALSE);
+ DEFAULT(ctl->mimedecode, TRUE);
DEFAULT(ctl->server.dns, TRUE);
DEFAULT(ctl->server.uidl, FALSE);
+ DEFAULT(ctl->server.checkalias, FALSE);
#undef DEFAULT
+ /*
+ * DNS support is required for some protocols.
+ *
+ * If we're using ETRN, the smtp hunt list is the list of
+ * systems we're polling on behalf of; these have to be
+ * fully-qualified domain names. The default for this list
+ * should be the FQDN of localhost.
+ *
+ * If we're using Kerberos for authentication, we need
+ * the FQDN in order to generate capability keys.
+ */
+ if (ctl->server.protocol == P_ETRN
+ || ctl->server.preauthenticate == A_KERBEROS_V4
+ || ctl->server.preauthenticate == A_KERBEROS_V5)
+ if (strcmp(fetchmailhost, "localhost") == 0)
+ fetchmailhost = host_fqdn();
+
+ /*
+ * Make sure we have a nonempty host list to forward to.
+ */
+ if (!ctl->smtphunt)
+ save_str(&ctl->smtphunt, fetchmailhost, FALSE);
+
+ /* if `user' doesn't name a real local user, try to run as root */
+ if ((pw = getpwnam(user)) == (struct passwd *)NULL)
+ ctl->uid = 0;
+ else
+ ctl->uid = pw->pw_uid; /* for local delivery via MDA */
+ if (!ctl->localnames) /* for local delivery via SMTP */
+ save_str_pair(&ctl->localnames, user, NULL);
+
#if !defined(HAVE_GETHOSTBYNAME) || !defined(HAVE_RES_SEARCH)
/* can't handle multidrop mailboxes unless we can do DNS lookups */
if (ctl->localnames && ctl->localnames->next && ctl->server.dns)
{
ctl->server.dns = FALSE;
- fprintf(stderr, "fetchmail: warning: no DNS available to check multidrop fetches from %s\n", ctl->server.pollname);
+ fprintf(stderr, _("fetchmail: warning: no DNS available to check multidrop fetches from %s\n"), ctl->server.pollname);
}
#endif /* !HAVE_GETHOSTBYNAME || !HAVE_RES_SEARCH */
*
* We're going to assume the via name is true unless it's
* localhost.
- *
- * Each poll cycle, if we've got DNS, we'll try to canonicalize
- * the name. This will function as a probe to ensure the
- * host's nameserver is up.
*/
if (ctl->server.via && strcmp(ctl->server.via, "localhost"))
ctl->server.queryname = xstrdup(ctl->server.via);
else
ctl->server.queryname = xstrdup(ctl->server.pollname);
- ctl->server.truename = xstrdup(ctl->server.queryname);
+
+#ifdef HESIOD
+ /* If either the pollname or vianame are "hesiod" we want to
+ lookup the user's hesiod pobox host */
+
+ if (!strcasecmp(ctl->server.queryname, "hesiod")) {
+ struct hes_postoffice *hes_p;
+ hes_p = hes_getmailhost(ctl->remotename);
+ if (hes_p != NULL && strcmp(hes_p->po_type, "POP") == 0) {
+ free(ctl->server.queryname);
+ ctl->server.queryname = xstrdup(hes_p->po_host);
+ if (ctl->server.via)
+ free(ctl->server.via);
+ ctl->server.via = xstrdup(hes_p->po_host);
+ } else {
+ report(stderr,
+ _("couldn't find HESIOD pobox for %s\n"),
+ ctl->remotename);
+ }
+ }
+#endif /* HESIOD */
+
+ /*
+ * We may have to canonicalize the server truename for later use.
+ * Do this just once for each lead server, if necessary, in order
+ * to minimize DNS round trips.
+ */
+ if (ctl->server.lead_server)
+ ctl->server.truename = xstrdup(ctl->server.lead_server->truename);
+#ifdef HAVE_GETHOSTBYNAME
+ else if (ctl->server.preauthenticate==A_KERBEROS_V4 ||
+ ctl->server.preauthenticate==A_KERBEROS_V5 ||
+ (ctl->server.dns && MULTIDROP(ctl)))
+ {
+ struct hostent *namerec;
+
+ /* compute the canonical name of the host */
+ errno = 0;
+ namerec = gethostbyname(ctl->server.queryname);
+ if (namerec == (struct hostent *)NULL)
+ {
+ report(stderr,
+ _("couldn't find canonical DNS name of %s\n"),
+ ctl->server.pollname);
+ exit(PS_DNS);
+ }
+ else
+ ctl->server.truename=xstrdup((char *)namerec->h_name);
+ }
+#endif /* HAVE_GETHOSTBYNAME */
+ else
+ ctl->server.truename = xstrdup(ctl->server.queryname);
/* if no folders were specified, set up the null one as default */
if (!ctl->mailboxes)
if (ctl->server.port < 0)
{
(void) fprintf(stderr,
- "%s configuration invalid, port number cannot be negative",
+ _("%s configuration invalid, port number cannot be negative\n"),
ctl->server.pollname);
exit(PS_SYNTAX);
}
if (ctl->server.protocol == P_RPOP && ctl->server.port >= 1024)
{
(void) fprintf(stderr,
- "%s configuration invalid, RPOP requires a privileged port",
+ _("%s configuration invalid, RPOP requires a privileged port\n"),
ctl->server.pollname);
exit(PS_SYNTAX);
}
+ if (ctl->listener == LMTP_MODE)
+ {
+ struct idlist *idp;
+
+ for (idp = ctl->smtphunt; idp; idp = idp->next)
+ {
+ char *cp;
+
+ if (!(cp = strrchr(idp->id, '/')) ||
+#ifdef INET6
+ (strcmp(++cp, SMTP_PORT) == 0))
+#else
+ (atoi(++cp) == SMTP_PORT))
+#endif /* INET6 */
+ {
+ (void) fprintf(stderr,
+ _("%s configuration invalid, LMTP can't use default SMTP port\n"),
+ ctl->server.pollname);
+ exit(PS_SYNTAX);
+ }
+ }
+ }
#endif /* !INET6 */
}
}
+ /* here's where we override globals */
+ if (cmd_run.logfile)
+ run.logfile = cmd_run.logfile;
+ if (cmd_run.idfile)
+ run.idfile = cmd_run.idfile;
+ if (cmd_run.poll_interval >= 0)
+ run.poll_interval = cmd_run.poll_interval;
+ if (cmd_run.invisible)
+ run.invisible = cmd_run.invisible;
+ if (cmd_run.use_syslog)
+ run.use_syslog = (cmd_run.use_syslog == FLAG_TRUE);
+ if (cmd_run.postmaster)
+ run.postmaster = cmd_run.postmaster;
+ if (cmd_run.bouncemail)
+ run.bouncemail = cmd_run.bouncemail;
+
+ /* check and daemon options are not compatible */
+ if (check_only && run.poll_interval)
+ run.poll_interval = 0;
+
+#ifdef POP3_ENABLE
/* initialize UID handling */
- if (!versioninfo && (st = prc_filecheck(idfile, !versioninfo)) != 0)
+ if (!versioninfo && (st = prc_filecheck(run.idfile, !versioninfo)) != 0)
exit(st);
-#ifdef POP3_ENABLE
else
- initialize_saved_lists(querylist, idfile);
+ initialize_saved_lists(querylist, run.idfile);
#endif /* POP3_ENABLE */
- /* if cmd_logfile was explicitly set, use it to override logfile */
- if (cmd_logfile)
- logfile = cmd_logfile;
-
- /* if cmd_idfile was explicitly set, use it to override idfile */
- if (cmd_idfile)
- logfile = cmd_idfile;
-
- /* likewise for poll_interval */
- if (cmd_daemon >= 0)
- poll_interval = cmd_daemon;
+ /*
+ * If the user didn't set a last-resort user to get misaddressed
+ * multidrop mail, set an appropriate default here.
+ */
+ if (!run.postmaster)
+ if (getuid()) /* ordinary user */
+ run.postmaster = user;
+ else /* root */
+ run.postmaster = "postmaster";
- /* check and daemon options are not compatible */
- if (check_only && poll_interval)
- poll_interval = 0;
return(implicitmode);
}
-void termhook(int sig)
+static void termhook(int sig)
/* to be executed on normal or signal-induced termination */
{
struct query *ctl;
*/
if (sig != 0)
- error(0, 0, "terminated with signal %d", sig);
+ report(stdout, _("terminated with signal %d\n"), sig);
else
/* terminate all SMTP connections cleanly */
for (ctl = querylist; ctl; ctl = ctl->next)
#ifdef POP3_ENABLE
if (!check_only)
- write_saved_lists(querylist, idfile);
+ write_saved_lists(querylist, run.idfile);
#endif /* POP3_ENABLE */
/*
{
int i, st;
- if (outlevel == O_VERBOSE)
+ /*
+ * If we're syslogging the progress messages are automatically timestamped.
+ * Force timestamping if we're going to a logfile.
+ */
+ if (outlevel >= O_VERBOSE || (run.logfile && outlevel > O_SILENT))
{
- time_t now;
-
- time(&now);
- fprintf(stderr, "fetchmail: %s querying %s (protocol %s) at %s",
- RELEASE_ID,
- ctl->server.pollname, showproto(ctl->server.protocol), ctime(&now));
+ report(stdout, _("%s querying %s (protocol %s) at %s\n"),
+ VERSION,
+ ctl->server.pollname,
+ showproto(ctl->server.protocol),
+ rfc822timestamp());
}
switch (ctl->server.protocol) {
case P_AUTO:
}
ctl->server.protocol = P_AUTO;
return(st);
- break;
case P_POP2:
#ifdef POP2_ENABLE
return(doPOP2(ctl));
#else
- fprintf(stderr, "POP2 support is not configured.\n");
+ report(stderr, _("POP2 support is not configured.\n"));
return(PS_PROTOCOL);
#endif /* POP2_ENABLE */
break;
#ifdef POP3_ENABLE
return(doPOP3(ctl));
#else
- fprintf(stderr, "POP3 support is not configured.\n");
+ report(stderr, _("POP3 support is not configured.\n"));
return(PS_PROTOCOL);
#endif /* POP3_ENABLE */
break;
case P_IMAP:
case P_IMAP_K4:
+#ifdef GSSAPI
case P_IMAP_GSS:
+#endif /* GSSAPI */
#ifdef IMAP_ENABLE
return(doIMAP(ctl));
#else
- fprintf(stderr, "IMAP support is not configured.\n");
+ report(stderr, _("IMAP support is not configured.\n"));
return(PS_PROTOCOL);
#endif /* IMAP_ENABLE */
- break;
case P_ETRN:
#ifndef ETRN_ENABLE
- fprintf(stderr, "ETRN support is not configured.\n");
+ report(stderr, _("ETRN support is not configured.\n"));
return(PS_PROTOCOL);
#else
#ifdef HAVE_GETHOSTBYNAME
return(doETRN(ctl));
#else
- fprintf(stderr, "Cannot support ETRN without gethostbyname(2).\n");
+ report(stderr, _("Cannot support ETRN without gethostbyname(2).\n"));
return(PS_PROTOCOL);
#endif /* HAVE_GETHOSTBYNAME */
#endif /* ETRN_ENABLE */
default:
- error(0, 0, "unsupported protocol selected.");
+ report(stderr, _("unsupported protocol selected.\n"));
return(PS_PROTOCOL);
}
}
-void dump_params (struct query *ctl)
+static void dump_params (struct runctl *runp,
+ struct query *querylist, flag implicit)
/* display query parameters in English */
{
- printf("Options for retrieving from %s@%s:\n",
- ctl->remotename, visbuf(ctl->server.pollname));
-
- if (ctl->server.via)
- printf(" Mail will be retrieved via %s\n", ctl->server.via);
-
- if (ctl->server.interval)
- printf(" Poll of this server will occur every %d intervals.\n",
- ctl->server.interval);
- if (ctl->server.truename)
- printf(" True name of server is %s.\n", ctl->server.truename);
- if (ctl->server.skip || outlevel == O_VERBOSE)
- printf(" This host will%s be queried when no host is specified.\n",
- ctl->server.skip ? " not" : "");
- if (!ctl->password)
- printf(" Password will be prompted for.\n");
- else if (outlevel == O_VERBOSE)
- if (ctl->server.protocol == P_APOP)
- printf(" APOP secret = '%s'.\n", visbuf(ctl->password));
- else if (ctl->server.protocol == P_RPOP)
- printf(" RPOP id = '%s'.\n", visbuf(ctl->password));
- else
- printf(" Password = '%s'.\n", visbuf(ctl->password));
- if (ctl->server.protocol == P_POP3
+ struct query *ctl;
+
+ if (runp->poll_interval)
+ printf(_("Poll interval is %d seconds\n"), runp->poll_interval);
+ if (runp->logfile)
+ printf(_("Logfile is %s\n"), runp->logfile);
+ if (strcmp(runp->idfile, IDFILE_NAME))
+ printf(_("Idfile is %s\n"), runp->idfile);
+#if defined(HAVE_SYSLOG)
+ if (runp->use_syslog)
+ printf(_("Progress messages will be logged via syslog\n"));
+#endif
+ if (runp->invisible)
+ printf(_("Fetchmail will masquerade and will not generate Received\n"));
+ if (runp->postmaster)
+ printf(_("Fetchmail will forward misaddressed multidrop messages to %s.\n"),
+ runp->postmaster);
+
+ if (!runp->bouncemail)
+ printf(_("Fetchmail will direct error mail to the postmaster.\n"));
+ else if (outlevel >= O_VERBOSE)
+ printf(_("Fetchmail will direct error mail to the sender.\n"));
+
+ for (ctl = querylist; ctl; ctl = ctl->next)
+ {
+ if (!ctl->active || (implicit && ctl->server.skip))
+ continue;
+
+ printf(_("Options for retrieving from %s@%s:\n"),
+ ctl->remotename, visbuf(ctl->server.pollname));
+
+ if (ctl->server.via && (ctl->server.protocol != P_ETRN))
+ printf(_(" Mail will be retrieved via %s\n"), ctl->server.via);
+
+ if (ctl->server.interval)
+ printf(_(" Poll of this server will occur every %d intervals.\n"),
+ ctl->server.interval);
+ if (ctl->server.truename)
+ printf(_(" True name of server is %s.\n"), ctl->server.truename);
+ if (ctl->server.skip || outlevel >= O_VERBOSE)
+ printf(_(" This host %s be queried when no host is specified.\n"),
+ ctl->server.skip ? _("will not") : _("will"));
+ /*
+ * Don't poll for password when there is one or when using the ETRN
+ * or IMAP-GSS protocol
+ */
+ if (!ctl->password && (ctl->server.protocol != P_ETRN)
+#ifdef GSSAPI
+ && (ctl->server.protocol != P_IMAP_GSS)
+#endif /* GSSAPI */
+ && ctl->server.protocol != P_IMAP_K4)
+ printf(_(" Password will be prompted for.\n"));
+ else if (outlevel >= O_VERBOSE)
+ if (ctl->server.protocol == P_APOP)
+ printf(_(" APOP secret = \"%s\".\n"), visbuf(ctl->password));
+ else if (ctl->server.protocol == P_RPOP)
+ printf(_(" RPOP id = \"%s\".\n"), visbuf(ctl->password));
+ else
+ printf(_(" Password = \"%s\".\n"), visbuf(ctl->password));
+ if (ctl->server.protocol == P_POP3
#if INET6
- && !strcmp(ctl->server.service, KPOP_PORT)
+ && !strcmp(ctl->server.service, KPOP_PORT)
#else /* INET6 */
- && ctl->server.port == KPOP_PORT
+ && ctl->server.port == KPOP_PORT
#endif /* INET6 */
- && (ctl->server.preauthenticate == A_KERBEROS_V4 ||
- ctl->server.preauthenticate == A_KERBEROS_V5))
- printf(" Protocol is KPOP");
- else
- printf(" Protocol is %s", showproto(ctl->server.protocol));
+ && (ctl->server.preauthenticate == A_KERBEROS_V4 ||
+ ctl->server.preauthenticate == A_KERBEROS_V5))
+ printf(_(" Protocol is KPOP with Kerberos %s authentication"),
+ ctl->server.preauthenticate == A_KERBEROS_V5 ? "V" : "IV");
+ else
+ printf(_(" Protocol is %s"), showproto(ctl->server.protocol));
#if INET6
- if (ctl->server.service)
- printf(" (using service %s)", ctl->server.service);
- if (ctl->server.netsec)
- printf(" (using network security options %s)", ctl->server.netsec);
+ if (ctl->server.service)
+ printf(_(" (using service %s)"), ctl->server.service);
+ if (ctl->server.netsec)
+ printf(_(" (using network security options %s)"), ctl->server.netsec);
#else /* INET6 */
- if (ctl->server.port)
- printf(" (using port %d)", ctl->server.port);
+ if (ctl->server.port)
+ printf(_(" (using port %d)"), ctl->server.port);
#endif /* INET6 */
- else if (outlevel == O_VERBOSE)
- printf(" (using default port)");
- if (ctl->server.uidl)
- printf(" (forcing UIDL use)");
- putchar('.');
- putchar('\n');
- if (ctl->server.preauthenticate == A_KERBEROS_V4)
- printf(" Kerberos V4 preauthentication enabled.\n");
- if (ctl->server.preauthenticate == A_KERBEROS_V5)
- printf(" Kerberos V5 preauthentication enabled.\n");
- if (ctl->server.timeout > 0)
- printf(" Server nonresponse timeout is %d seconds", ctl->server.timeout);
- if (ctl->server.timeout == CLIENT_TIMEOUT)
- printf(" (default).\n");
- else
- printf(".\n");
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" (using default port)"));
+ if (ctl->server.uidl && (ctl->server.protocol != P_ETRN))
+ printf(_(" (forcing UIDL use)"));
+ putchar('.');
+ putchar('\n');
+ if (ctl->server.preauthenticate == A_KERBEROS_V4)
+ printf(_(" Kerberos V4 preauthentication enabled.\n"));
+ if (ctl->server.preauthenticate == A_KERBEROS_V5)
+ printf(_(" Kerberos V5 preauthentication enabled.\n"));
+ if (ctl->server.timeout > 0)
+ printf(_(" Server nonresponse timeout is %d seconds"), ctl->server.timeout);
+ if (ctl->server.timeout == CLIENT_TIMEOUT)
+ printf(_(" (default).\n"));
+ else
+ printf(".\n");
- if (!ctl->mailboxes->id)
- printf(" Default mailbox selected.\n");
- else
- {
- struct idlist *idp;
+ if (ctl->server.protocol != P_ETRN) {
+ if (!ctl->mailboxes->id)
+ printf(_(" Default mailbox selected.\n"));
+ else
+ {
+ struct idlist *idp;
- printf(" Selected mailboxes are:");
- for (idp = ctl->mailboxes; idp; idp = idp->next)
- printf(" %s", idp->id);
- printf("\n");
- }
- printf(" %s messages will be retrieved (--all %s).\n",
- ctl->fetchall ? "All" : "Only new",
- ctl->fetchall ? "on" : "off");
- printf(" Fetched messages will%s be kept on the server (--keep %s).\n",
- ctl->keep ? "" : " not",
- ctl->keep ? "on" : "off");
- printf(" Old messages will%s be flushed before message retrieval (--flush %s).\n",
- ctl->flush ? "" : " not",
- ctl->flush ? "on" : "off");
- printf(" Rewrite of server-local addresses is %sabled (--norewrite %s).\n",
- ctl->rewrite ? "en" : "dis",
- ctl->rewrite ? "off" : "on");
- printf(" Carriage-return stripping is %sabled (stripcr %s).\n",
- ctl->stripcr ? "en" : "dis",
- ctl->stripcr ? "on" : "off");
- printf(" Carriage-return forcing is %sabled (forcecr %s).\n",
- ctl->forcecr ? "en" : "dis",
- ctl->forcecr ? "on" : "off");
- printf(" Interpretation of Content-Transfer-Encoding is %sabled (pass8bits %s).\n",
- ctl->pass8bits ? "dis" : "en",
- ctl->pass8bits ? "on" : "off");
- printf(" MIME decoding is %sabled (mimedecode %s).\n",
- ctl->mimedecode ? "dis" : "en",
- ctl->mimedecode ? "on" : "off");
- printf(" Nonempty Status lines will be %s (dropstatus %s)\n",
- ctl->dropstatus ? "discarded" : "kept",
- ctl->dropstatus ? "on" : "off");
- if (NUM_NONZERO(ctl->limit))
- printf(" Message size limit is %d bytes (--limit %d).\n",
- ctl->limit, ctl->limit);
- else if (outlevel == O_VERBOSE)
- printf(" No message size limit (--limit 0).\n");
- if (NUM_NONZERO(ctl->fetchlimit))
- printf(" Received-message limit is %d (--fetchlimit %d).\n",
- ctl->fetchlimit, ctl->fetchlimit);
- else if (outlevel == O_VERBOSE)
- printf(" No received-message limit (--fetchlimit 0).\n");
- if (NUM_NONZERO(ctl->batchlimit))
- printf(" SMTP message batch limit is %d.\n", ctl->batchlimit);
- else if (outlevel == O_VERBOSE)
- printf(" No SMTP message batch limit (--batchlimit 0).\n");
- if (ctl->server.protocol == P_IMAP)
- if (NUM_NONZERO(ctl->expunge))
- printf(" Deletion interval between expunges is %d (--expunge %d).\n", ctl->expunge, ctl->expunge);
- else if (outlevel == O_VERBOSE)
- printf(" No expunges (--expunge 0).\n");
- if (ctl->mda)
- printf(" Messages will be delivered with '%s.'\n", visbuf(ctl->mda));
- else
- {
- struct idlist *idp;
+ printf(_(" Selected mailboxes are:"));
+ for (idp = ctl->mailboxes; idp; idp = idp->next)
+ printf(" %s", idp->id);
+ printf("\n");
+ }
+ printf(_(" %s messages will be retrieved (--all %s).\n"),
+ ctl->fetchall ? _("All") : _("Only new"),
+ ctl->fetchall ? "on" : "off");
+ printf(_(" Fetched messages %s be kept on the server (--keep %s).\n"),
+ ctl->keep ? _("will") : _("will not"),
+ ctl->keep ? "on" : "off");
+ printf(_(" Old messages %s be flushed before message retrieval (--flush %s).\n"),
+ ctl->flush ? _("will") : _("will not"),
+ ctl->flush ? "on" : "off");
+ printf(_(" Rewrite of server-local addresses is %s (--norewrite %s).\n"),
+ ctl->rewrite ? _("enabled") : _("disabled"),
+ ctl->rewrite ? "off" : "on");
+ printf(_(" Carriage-return stripping is %s (stripcr %s).\n"),
+ ctl->stripcr ? _("enabled") : _("disabled"),
+ ctl->stripcr ? "on" : "off");
+ printf(_(" Carriage-return forcing is %s (forcecr %s).\n"),
+ ctl->forcecr ? _("enabled") : _("disabled"),
+ ctl->forcecr ? "on" : "off");
+ printf(_(" Interpretation of Content-Transfer-Encoding is %s (pass8bits %s).\n"),
+ ctl->pass8bits ? _("disabled") : _("enabled"),
+ ctl->pass8bits ? "on" : "off");
+ printf(_(" MIME decoding is %s (mimedecode %s).\n"),
+ ctl->mimedecode ? _("enabled") : _("disabled"),
+ ctl->mimedecode ? "on" : "off");
+ printf(_(" Nonempty Status lines will be %s (dropstatus %s)\n"),
+ ctl->dropstatus ? _("discarded") : _("kept"),
+ ctl->dropstatus ? "on" : "off");
+ if (NUM_NONZERO(ctl->limit))
+ {
+ if (NUM_NONZERO(ctl->limit))
+ printf(_(" Message size limit is %d octets (--limit %d).\n"),
+ ctl->limit, ctl->limit);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No message size limit (--limit 0).\n"));
+ if (run.poll_interval > 0)
+ printf(_(" Message size warning interval is %d seconds (--warnings %d).\n"),
+ ctl->warnings, ctl->warnings);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" Size warnings on every poll (--warnings 0).\n"));
+ }
+ if (NUM_NONZERO(ctl->fetchlimit))
+ printf(_(" Received-message limit is %d (--fetchlimit %d).\n"),
+ ctl->fetchlimit, ctl->fetchlimit);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No received-message limit (--fetchlimit 0).\n"));
+ if (NUM_NONZERO(ctl->batchlimit))
+ printf(_(" SMTP message batch limit is %d.\n"), ctl->batchlimit);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No SMTP message batch limit (--batchlimit 0).\n"));
+ if (ctl->server.protocol == P_IMAP)
+ if (NUM_NONZERO(ctl->expunge))
+ printf(_(" Deletion interval between expunges forced to %d (--expunge %d).\n"), ctl->expunge, ctl->expunge);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No forced expunges (--expunge 0).\n"));
+ }
+ if (ctl->bsmtp)
+ printf(_(" Messages will be appended to %s as BSMTP\n"), visbuf(ctl->bsmtp));
+ else if (ctl->mda && (ctl->server.protocol != P_ETRN))
+ printf(_(" Messages will be delivered with \"%s\".\n"), visbuf(ctl->mda));
+ else
+ {
+ struct idlist *idp;
- printf(" Messages will be SMTP-forwarded to:");
- for (idp = ctl->smtphunt; idp; idp = idp->next)
- if (ctl->server.protocol != P_ETRN || idp->val.status.mark)
+ printf(_(" Messages will be %cMTP-forwarded to:"), ctl->listener);
+ for (idp = ctl->smtphunt; idp; idp = idp->next)
{
- printf(" %s", idp->id);
+ printf(" %s", idp->id);
if (!idp->val.status.mark)
- printf(" (default)");
+ printf(_(" (default)"));
}
- printf("\n");
- if (ctl->smtpaddress)
- printf(" Host part of MAIL FROM line will be %s\n",
- ctl->smtpaddress);
- }
- if (ctl->antispam != -1)
- printf(" Listener SMTP reponse %d will be treated as a spam block\n",
- ctl->antispam);
- else if (outlevel == O_VERBOSE)
- printf(" Spam-blocking disabled\n");
- if (ctl->preconnect)
- printf(" Server connection will be brought up with '%s.'\n",
- visbuf(ctl->preconnect));
- else if (outlevel == O_VERBOSE)
- printf(" No pre-connection command.\n");
- if (ctl->postconnect)
- printf(" Server connection will be taken down with '%s.'\n",
- visbuf(ctl->postconnect));
- else if (outlevel == O_VERBOSE)
- printf(" No post-connection command.\n");
- if (!ctl->localnames)
- printf(" No localnames declared for this host.\n");
- else
- {
- struct idlist *idp;
- int count = 0;
+ printf("\n");
+ if (ctl->smtpaddress)
+ printf(_(" Host part of MAIL FROM line will be %s\n"),
+ ctl->smtpaddress);
+ }
+ if (ctl->server.protocol != P_ETRN)
+ {
+ if (ctl->antispam != (struct idlist *)NULL)
+ {
+ struct idlist *idp;
- for (idp = ctl->localnames; idp; idp = idp->next)
- ++count;
+ printf(_(" Recognized listener spam block responses are:"));
+ for (idp = ctl->antispam; idp; idp = idp->next)
+ printf(" %d", idp->val.status.num);
+ printf("\n");
+ }
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" Spam-blocking disabled\n"));
+ }
+ if (ctl->preconnect)
+ printf(_(" Server connection will be brought up with \"%s\".\n"),
+ visbuf(ctl->preconnect));
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No pre-connection command.\n"));
+ if (ctl->postconnect)
+ printf(_(" Server connection will be taken down with \"%s\".\n"),
+ visbuf(ctl->postconnect));
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No post-connection command.\n"));
+ if (ctl->server.protocol != P_ETRN) {
+ if (!ctl->localnames)
+ printf(_(" No localnames declared for this host.\n"));
+ else
+ {
+ struct idlist *idp;
+ int count = 0;
- if (count > 1 || ctl->wildcard)
- printf(" Multi-drop mode: ");
- else
- printf(" Single-drop mode: ");
+ for (idp = ctl->localnames; idp; idp = idp->next)
+ ++count;
- printf("%d local name(s) recognized.\n", count);
- if (outlevel == O_VERBOSE)
- {
- for (idp = ctl->localnames; idp; idp = idp->next)
- if (idp->val.id2)
- printf("\t%s -> %s\n", idp->id, idp->val.id2);
- else
- printf("\t%s\n", idp->id);
- if (ctl->wildcard)
- fputs("*\n", stdout);
- }
+ if (count > 1 || ctl->wildcard)
+ printf(_(" Multi-drop mode: "));
+ else
+ printf(_(" Single-drop mode: "));
- if (count > 1 || ctl->wildcard)
- {
- printf(" DNS lookup for multidrop addresses is %sabled.\n",
- ctl->server.dns ? "en" : "dis");
+ printf(_("%d local name(s) recognized.\n"), count);
+ if (outlevel >= O_VERBOSE)
+ {
+ for (idp = ctl->localnames; idp; idp = idp->next)
+ if (idp->val.id2)
+ printf("\t%s -> %s\n", idp->id, idp->val.id2);
+ else
+ printf("\t%s\n", idp->id);
+ if (ctl->wildcard)
+ fputs("\t*\n", stdout);
+ }
- if (ctl->server.envelope == STRING_DISABLED)
- printf(" Envelope-address routing is disabled\n");
- else
- {
- printf(" Envelope header is assumed to be: %s\n",
- ctl->server.envelope ? ctl->server.envelope:"Received");
- if (ctl->server.envskip > 1 || outlevel >= O_VERBOSE)
- printf(" Number of envelope header to be parsed: %d\n",
- ctl->server.envskip);
- if (ctl->server.qvirtual)
- printf(" Prefix %s will be removed from user id\n",
- ctl->server.qvirtual);
- else if (outlevel >= O_VERBOSE)
- printf(" No prefix stripping\n");
- }
+ if (count > 1 || ctl->wildcard)
+ {
+ printf(_(" DNS lookup for multidrop addresses is %s.\n"),
+ ctl->server.dns ? _("enabled") : _("disabled"));
+ if (ctl->server.dns)
+ {
+ printf(_(" Server aliases will be compared with multidrop addresses by "));
+ if (ctl->server.checkalias)
+ printf(_("IP address.\n"));
+ else
+ printf(_("name.\n"));
+ }
+ if (ctl->server.envelope == STRING_DISABLED)
+ printf(_(" Envelope-address routing is disabled\n"));
+ else
+ {
+ printf(_(" Envelope header is assumed to be: %s\n"),
+ ctl->server.envelope ? ctl->server.envelope:_("Received"));
+ if (ctl->server.envskip > 1 || outlevel >= O_VERBOSE)
+ printf(_(" Number of envelope header to be parsed: %d\n"),
+ ctl->server.envskip);
+ if (ctl->server.qvirtual)
+ printf(_(" Prefix %s will be removed from user id\n"),
+ ctl->server.qvirtual);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No prefix stripping\n"));
+ }
- if (ctl->server.akalist)
- {
- struct idlist *idp;
+ if (ctl->server.akalist)
+ {
+ struct idlist *idp;
- printf(" Predeclared mailserver aliases:");
- for (idp = ctl->server.akalist; idp; idp = idp->next)
- printf(" %s", idp->id);
- putchar('\n');
- }
- if (ctl->server.localdomains)
- {
- struct idlist *idp;
+ printf(_(" Predeclared mailserver aliases:"));
+ for (idp = ctl->server.akalist; idp; idp = idp->next)
+ printf(" %s", idp->id);
+ putchar('\n');
+ }
+ if (ctl->server.localdomains)
+ {
+ struct idlist *idp;
- printf(" Local domains:");
- for (idp = ctl->server.localdomains; idp; idp = idp->next)
- printf(" %s", idp->id);
- putchar('\n');
- }
+ printf(_(" Local domains:"));
+ for (idp = ctl->server.localdomains; idp; idp = idp->next)
+ printf(" %s", idp->id);
+ putchar('\n');
+ }
+ }
+ }
}
- }
-#ifdef linux
- if (ctl->server.interface)
- printf(" Connection must be through interface %s.\n", ctl->server.interface);
- else if (outlevel == O_VERBOSE)
- printf(" No interface requirement specified.\n");
- if (ctl->server.monitor)
- printf(" Polling loop will monitor %s.\n", ctl->server.monitor);
- else if (outlevel == O_VERBOSE)
- printf(" No monitor interface specified.\n");
+#if defined(linux) || defined(__FreeBSD__)
+ if (ctl->server.interface)
+ printf(_(" Connection must be through interface %s.\n"), ctl->server.interface);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No interface requirement specified.\n"));
+ if (ctl->server.monitor)
+ printf(_(" Polling loop will monitor %s.\n"), ctl->server.monitor);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No monitor interface specified.\n"));
#endif
- if (ctl->server.protocol > P_POP2)
- if (!ctl->oldsaved)
- printf(" No UIDs saved from this host.\n");
- else
- {
- struct idlist *idp;
- int count = 0;
-
- for (idp = ctl->oldsaved; idp; idp = idp->next)
- ++count;
+ if (ctl->server.plugin)
+ printf(_(" Server connections will be mode via plugin %s (--plugin %s).\n"), ctl->server.plugin, ctl->server.plugin);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No plugin command specified.\n"));
+ if (ctl->server.plugout)
+ printf(_(" Listener connections will be mode via plugout %s (--plugout %s).\n"), ctl->server.plugout, ctl->server.plugout);
+ else if (outlevel >= O_VERBOSE)
+ printf(_(" No plugout command specified.\n"));
+
+ if (ctl->server.protocol > P_POP2 && (ctl->server.protocol != P_ETRN))
+ if (!ctl->oldsaved)
+ printf(_(" No UIDs saved from this host.\n"));
+ else
+ {
+ struct idlist *idp;
+ int count = 0;
- printf(" %d UIDs saved.\n", count);
- if (outlevel == O_VERBOSE)
for (idp = ctl->oldsaved; idp; idp = idp->next)
- fprintf(stderr, "\t%s\n", idp->id);
- }
+ ++count;
+
+ printf(_(" %d UIDs saved.\n"), count);
+ if (outlevel >= O_VERBOSE)
+ for (idp = ctl->oldsaved; idp; idp = idp->next)
+ printf("\t%s\n", idp->id);
+ }
+
+ if (ctl->properties)
+ printf(_(" Pass-through properties \"%s\".\n"),
+ visbuf(ctl->properties));
+ }
}
/* fetchmail.c ends here */