]> Pileus Git - ~andy/fetchmail/blobdiff - env.c
Update.
[~andy/fetchmail] / env.c
diff --git a/env.c b/env.c
index ad915263e9f6551329328e2d28ad148e04148e83..aaddb54d00f5e8e19613e794c7dda8cbd9d43e3e 100644 (file)
--- a/env.c
+++ b/env.c
 #endif
 #include <pwd.h>
 #include <string.h>
-#include <ctype.h>
+#ifdef HAVE_NET_SOCKET_H
+#include <net/socket.h>
+#endif
 #ifdef HAVE_GETHOSTBYNAME
 #include <netdb.h>
 #endif /* HAVE_GETHOSTBYNAME */
 #include  <sys/types.h>
-#include  <time.h>
 #include "fetchmail.h"
 
 #include "i18n.h"
+#if defined(HAVE_SETLOCALE) && defined(ENABLE_NLS) && defined(HAVE_STRFTIME)
+#include <locale.h>
+#endif
 
-extern char *getenv(); /* needed on sysV68 R3V7.1. */
-
-extern char *program_name;
+extern char *getenv(const char *);     /* needed on sysV68 R3V7.1. */
 
 void envquery(int argc, char **argv)
 /* set up basic stuff from the environment (including the rc file name) */
 {
-    struct passwd *pw;
+    struct passwd by_name, by_uid, *pwp;
+
+    if (!(user = getenv("FETCHMAILUSER")))
+    {
+       if (!(user = getenv("LOGNAME")))
+       {
+           user = getenv("USER");
+       }
+    }
 
     if ((program_name = strrchr(argv[0], '/')) != NULL)
        ++program_name;
     else
        program_name = argv[0];
 
-    if ((user = getenv("USER")) == (char *)NULL)
-        user = getenv("LOGNAME");
+    if (getenv("QMAILINJECT") && strcmp(getenv("QMAILINJECT"), ""))
+    {
+       fprintf(stderr,
+               GT_("%s: The QMAILINJECT environment variable is set.\n"
+                   "This is dangerous as it can make qmail-inject or qmail's sendmail wrapper\n"  
+                   "tamper with your From: or Message-ID: headers.\n"
+                   "Try \"env QMAILINJECT= %s YOUR ARGUMENTS HERE\"\n"
+                   "%s: Abort.\n"), 
+               program_name, program_name, program_name);
+       exit(PS_UNDEFINED);
+    }
 
-    if ((user == (char *)NULL) || (home = getenv("HOME")) == (char *)NULL)
+    if (getenv("NULLMAILER_FLAGS") && strcmp(getenv("NULLMAILER_FLAGS"), ""))
     {
-       if ((pw = getpwuid(getuid())) != NULL)
-       {
-           user = pw->pw_name;
-           home = pw->pw_dir;
-       }
+       fprintf(stderr,
+               GT_("%s: The NULLMAILER_FLAGS environment variable is set.\n"
+                   "This is dangerous as it can make nullmailer-inject or nullmailer's\n" 
+                   "sendmail wrapper tamper with your From:, Message-ID: or Return-Path: headers.\n"
+                   "Try \"env NULLMAILER_FLAGS= %s YOUR ARGUMENTS HERE\"\n"
+                   "%s: Abort.\n"), 
+               program_name, program_name, program_name);
+       exit(PS_UNDEFINED);
+    }
+
+    if (!(pwp = getpwuid(getuid())))
+    {
+       fprintf(stderr,
+               GT_("%s: You don't exist.  Go away.\n"),
+               program_name);
+       exit(PS_UNDEFINED);
+    }
+    else
+    {
+       memcpy(&by_uid, pwp, sizeof(struct passwd));
+       if (!user || !(pwp = getpwnam(user)))
+           pwp = &by_uid;
        else
        {
-           fprintf(stderr,
-                   _("%s: can't find your name and home directory!\n"),
-                   program_name);
-           exit(PS_UNDEFINED);
+           /*
+            * This logic is needed to handle gracefully the possibility
+            * that multiple names might be mapped to one UID.
+            */
+           memcpy(&by_name, pwp, sizeof(struct passwd));
+
+           if (by_name.pw_uid == by_uid.pw_uid)
+               pwp = &by_name;
+           else
+               pwp = &by_uid;
        }
+       user = xstrdup(pwp->pw_name);
     }
 
-#define RCFILE_NAME    ".fetchmailrc"
-    rcfile = (char *) xmalloc(strlen(home)+strlen(RCFILE_NAME)+2);
+    /* compute user's home directory */
+    home = getenv("HOME_ETC");
+    if (!home && !(home = getenv("HOME")))
+       home = pwp->pw_dir;
+
+    /* compute fetchmail's home directory */
+    if (!(fmhome = getenv("FETCHMAILHOME")))
+       fmhome = home;
+
+#define RCFILE_NAME    "fetchmailrc"
+    /*
+     * The (fmhome==home) leaves an extra character for a . at the
+     * beginning of the rc file's name, iff fetchmail is using $HOME
+     * for its files. We don't want to do that if fetchmail has its
+     * own home ($FETCHMAILHOME), however.
+     */
+    rcfile = (char *)xmalloc(strlen(fmhome)+sizeof(RCFILE_NAME)+(fmhome==home)+2);
     /* avoid //.fetchmailrc */
-    if (strcmp(home, "/") != 0) {
-       strcpy(rcfile, home);
-    } else {
-       *rcfile = '\0';
-    }
-    strcat(rcfile, "/");
+    if (strcmp(fmhome, "/") != 0)
+       strcpy(rcfile, fmhome);
+    else
+       *rcfile = '\0';
+
+    if (rcfile[strlen(rcfile) - 1] != '/')
+       strcat(rcfile, "/");
+    if (fmhome==home)
+       strcat(rcfile, ".");
     strcat(rcfile, RCFILE_NAME);
 }
 
@@ -78,7 +139,7 @@ char *host_fqdn(void)
 
     if (gethostname(tmpbuf, sizeof(tmpbuf)))
     {
-       fprintf(stderr, _("%s: can't determine your host!"),
+       fprintf(stderr, GT_("%s: can't determine your host!"),
                program_name);
        exit(PS_DNS);
     }
@@ -94,7 +155,7 @@ char *host_fqdn(void)
        {
            /* exit with error message */
            fprintf(stderr,
-                   _("gethostbyname failed for %s\n"), tmpbuf);
+                   GT_("gethostbyname failed for %s\n"), tmpbuf);
            exit(PS_DNS);
        }
        return(xstrdup(hp->h_name));
@@ -129,7 +190,8 @@ static char *tzoffset(time_t *now)
     }
     if (off >= 24 * 60)                        /* should be impossible */
        off = 23 * 60 + 59;             /* if not, insert silly value */
-    sprintf(offset_string, "%c%02d%02d", sign, off / 60, off % 60);
+    snprintf(offset_string, sizeof(offset_string),
+           "%c%02d%02d", sign, off / 60, off % 60);
     return (offset_string);
 }
 
@@ -145,10 +207,18 @@ char *rfc822timestamp(void)
      * Conform to RFC822.  We generate a 4-digit year here, avoiding
      * Y2K hassles.  Max length of this timestamp in an English locale
      * should be 29 chars.  The only things that should vary by locale
-     * are the day and month abbreviations.
+     * are the day and month abbreviations.  The set_locale calls prevent
+     * weird multibyte i18n characters (such as kanji) from showing up
+     * in your Received headers.
      */
+#if defined(HAVE_SETLOCALE) && defined(ENABLE_NLS)
+    setlocale (LC_TIME, "C");
+#endif
     strftime(buf, sizeof(buf)-1, 
             "%a, %d %b %Y %H:%M:%S XXXXX (%Z)", localtime(&now));
+#if defined(HAVE_SETLOCALE) && defined(ENABLE_NLS)
+    setlocale (LC_TIME, "");
+#endif
     strncpy(strstr(buf, "XXXXX"), tzoffset(&now), 5);
 #else
     /*
@@ -172,15 +242,20 @@ const char *showproto(int proto)
 #ifdef POP2_ENABLE
     case P_POP2: return("POP2");
 #endif /* POP2_ENABLE */
+#ifdef POP3_ENABLE
     case P_POP3: return("POP3");
-    case P_IMAP: return("IMAP");
-    case P_IMAP_K4: return("IMAP-K4");
-#ifdef GSSAPI
-    case P_IMAP_GSS: return("IMAP-GSS");
-#endif /* GSSAPI */
     case P_APOP: return("APOP");
     case P_RPOP: return("RPOP");
+#endif /* POP3_ENABLE */
+#ifdef IMAP_ENABLE
+    case P_IMAP: return("IMAP");
+#endif /* IMAP_ENABLE */
+#ifdef ETRN_ENABLE
     case P_ETRN: return("ETRN");
+#endif /* ETRN_ENABLE */
+#ifdef ODMR_ENABLE
+    case P_ODMR: return("ODMR");
+#endif /* ODMR_ENABLE */
     default: return("unknown?!?");
     }
 }
@@ -198,7 +273,12 @@ char *visbuf(const char *buf)
            *tp++ = '\\'; *tp++ = '"';
            buf++;
        }
-       else if (isprint(*buf) || *buf == ' ')
+       else if (*buf == '\\')
+       {
+           *tp++ = '\\'; *tp++ = '\\';
+           buf++;
+       }
+       else if (isprint((unsigned char)*buf) || *buf == ' ')
            *tp++ = *buf++;
        else if (*buf == '\n')
        {
@@ -222,8 +302,11 @@ char *visbuf(const char *buf)
        }
        else
        {
-           (void) sprintf(tp, "\\0x%02x", *buf++);
-           tp += strlen(tp);
+           const char hex[] = "0123456789abcdef";
+           *tp++ = '\\'; *tp++ = '0'; *tp++ = 'x';
+           *tp++ = hex[*buf >> 4];
+           *tp++ = hex[*buf & 0xf];
+           buf++;
        }
     }
     *tp++ = '\0';