diff options
| -rw-r--r-- | env.c | 128 |
1 files changed, 128 insertions, 0 deletions
@@ -0,0 +1,128 @@ +/* + * env.c -- small service routines + * + * For license terms, see the file COPYING in this directory. + */ + +#include "config.h" +#include "fetchmail.h" +#include <stdio.h> +#if defined(STDC_HEADERS) +#include <stdlib.h> +#endif +#if defined(HAVE_UNISTD_H) +#include <unistd.h> +#endif +#include <pwd.h> +#include <string.h> + +char *user, *home, *fetchmailhost; + +extern char *program_name; + +void envquery(int argc, char **argv) +/* set up basic stuff from the environment (including the rc file name) */ +{ + char *tmpdir, tmpbuf[BUFSIZ]; + struct passwd *pw; + struct query *ctl; + + if ((program_name = strrchr(argv[0], '/')) != NULL) + ++program_name; + else + program_name = argv[0]; + + if ((user = getenv("USER")) == (char *)NULL) + user = getenv("LOGNAME"); + + if ((user == (char *)NULL) || (home = getenv("HOME")) == (char *)NULL) + { + if ((pw = getpwuid(getuid())) != NULL) + { + user = pw->pw_name; + home = pw->pw_dir; + } + else + { + fprintf(stderr, + "%s: can't find your name and home directory!\n", + program_name); + exit(PS_UNDEFINED); + } + } + + /* we'll need this for the SMTP forwarding target and error messages */ + if (gethostname(tmpbuf, sizeof(tmpbuf))) + { + fprintf(stderr, "%s: can't determine your host!", program_name); + exit(PS_IOERR); + } + fetchmailhost = xstrdup(tmpbuf); + +#define RCFILE_NAME ".fetchmailrc" + rcfile = (char *) xmalloc(strlen(home)+strlen(RCFILE_NAME)+2); + strcpy(rcfile, home); + strcat(rcfile, "/"); + strcat(rcfile, RCFILE_NAME); +} + +char *showproto(int proto) +/* protocol index to protocol name mapping */ +{ + switch (proto) + { + case P_AUTO: return("auto"); break; +#ifdef POP2_ENABLE + case P_POP2: return("POP2"); break; +#endif /* POP2_ENABLE */ + case P_POP3: return("POP3"); break; + case P_IMAP: return("IMAP"); break; + case P_IMAP_K4: return("IMAP-K4"); break; + case P_APOP: return("APOP"); break; + case P_RPOP: return("RPOP"); break; + case P_ETRN: return("ETRN"); break; + default: return("unknown?!?"); break; + } +} + +char *visbuf(const char *buf) +/* visibilize a given string */ +{ + static char vbuf[BUFSIZ]; + char *tp = vbuf; + + while (*buf) + { + if (isprint(*buf) || *buf == ' ') + *tp++ = *buf++; + else if (*buf == '\n') + { + *tp++ = '\\'; *tp++ = 'n'; + buf++; + } + else if (*buf == '\r') + { + *tp++ = '\\'; *tp++ = 'r'; + buf++; + } + else if (*buf == '\b') + { + *tp++ = '\\'; *tp++ = 'b'; + buf++; + } + else if (*buf < ' ') + { + *tp++ = '\\'; *tp++ = '^'; *tp++ = '@' + *buf; + buf++; + } + else + { + (void) sprintf(tp, "\\0x%02x", *buf++); + tp += strlen(tp); + } + } + *tp++ = '\0'; + return(vbuf); +} + +/* env.c ends here */ |