diff options
Diffstat (limited to 'driver.c')
| -rw-r--r-- | driver.c | 265 |
1 files changed, 0 insertions, 265 deletions
@@ -91,271 +91,6 @@ static void vtalarm_handler (int signal) longjmp(restart, 1); } -static void reply_hack(buf, host) -/* hack message headers so replies will work properly */ -char *buf; /* header to be hacked */ -const char *host; /* server hostname */ -{ - const char *from; - int parendepth, state = 0, tokencount = 0; - char mycopy[POPBUFSIZE+1]; - - if (strncmp("From: ", buf, 6) - && strncmp("To: ", buf, 4) - && strncmp("Reply-", buf, 6) - && strncmp("Cc: ", buf, 4) - && strncmp("Bcc: ", buf, 5)) { - return; - } - - strcpy(mycopy, buf); - for (from = mycopy; *from; from++) - { - switch (state) - { - case 0: /* before header colon */ - if (*from == ':') - state = 1; - break; - - case 1: /* we've seen the colon, we're looking for addresses */ - if (*from == '"') - state = 3; - else if (*from == '(') - { - parendepth = 1; - state = 4; - } - else if (*from == '<' || isalnum(*from)) - state = 5; - else if (isspace(*from)) - state = 2; - break; - - case 2: /* found a token boundary -- reset without copying */ - if (*from != ' ' && *from != '\t') - { - tokencount++; - state = 1; - --from; - continue; - } - - case 3: /* we're in a quoted human name, copy and ignore */ - if (*from == '"') - state = 1; - break; - - case 4: /* we're in a parenthesized human name, copy and ignore */ - if (*from == '(') - ++parendepth; - else if (*from == ')') - --parendepth; - if (parendepth == 0) - state = 1; - break; - - case 5: /* the real work gets done here */ - /* - * We're in something that might be an address part, - * either a bare unquoted/unparenthesized text or text - * enclosed in <> as per RFC822. - */ - /* if the address part contains an @, don't mess with it */ - if (*from == '@') - state = 6; - - /* If the address token is not properly terminated, ignore it. */ - else if (*from == ' ' || *from == '\t') - { - const char *cp; - - /* - * The only lookahead case. If we're looking at space or tab, - * we might be looking at a local name immediately followed - * by a human name. - */ - for (cp = from; isspace(*cp); cp++) - continue; - if (*cp == '(') - { - strcpy(buf, "@"); - strcat(buf, host); - buf += strlen(buf); - state = 1; - } - } - - /* - * On proper termination with no @, insert hostname. - * Case '>' catches <>-enclosed mail IDs. Case ',' catches - * comma-separated bare IDs. - */ - else if (strchr(">,", *from)) - { - strcpy(buf, "@"); - strcat(buf, host); - buf += strlen(buf); - tokencount = 0; - state = 1; - } - - /* a single local name alone on the line */ - else if (*from == '\n' && tokencount == 1) - { - strcpy(buf, "@"); - strcat(buf, host); - buf += strlen(buf); - state = 2; - } - - /* everything else, including alphanumerics, just passes through */ - break; - - case 6: /* we're in a remote mail ID, no need to append hostname */ - if (*from == '>' || *from == ',' || isspace(*from)) - state = 1; - break; - } - - /* all characters from the old buffer get copied to the new one */ - *buf++ = *from; - } - *buf++ = '\0'; -} - -static char *nxtaddr(hdr) -/* parse addresses in succession out of a specified RFC822 header */ -char *hdr; /* header line to be parsed, NUL to continue in previous hdr */ -{ - static char *hp, *tp, address[POPBUFSIZE+1]; - static int state; - int parendepth; - - /* - * Note 1: RFC822 escaping with \ is *not* handled. Note 2: it is - * important that this routine not stop on \r, since we use \r as - * a marker for RFC822 continuations below. - */ - - if (hdr) - { - hp = hdr; - state = 0; - } - - for (; *hp; hp++) - { - switch (state) - { - case 0: /* before header colon */ - if (*hp == '\n') - return(NULL); - else if (*hp == ':') - { - state = 1; - tp = address; - } - break; - - case 1: /* we've seen the colon, now grab the address */ - if (*hp == '\n') /* end of address list */ - { - *tp++ = '\0'; - state = 6; - return(address); - } - else if (*hp == ',') /* end of address */ - { - *tp++ = '\0'; - return(address); - } - else if (*hp == '"') /* quoted string */ - { - state = 2; - *tp++ = *hp; - } - else if (*hp == '(') /* address comment -- ignore */ - { - parendepth = 1; - state = 3; - } - else if (*hp == '<') /* begin <address> */ - { - state = 4; - tp = address; - } - else if (isspace(*hp)) /* ignore space */ - state = 1; - else /* just take it */ - { - state = 1; - *tp++ = *hp; - } - break; - - case 2: /* we're in a quoted string, copy verbatim */ - if (*hp == '\n') - return(NULL); - if (*hp != '"') - *tp++ = *hp; - else if (*hp == '"') - { - *tp++ = *hp; - state = 1; - } - break; - - case 3: /* we're in a parenthesized comment, ignore */ - if (*hp == '\n') - return(NULL); - else if (*hp == '(') - ++parendepth; - else if (*hp == ')') - --parendepth; - if (parendepth == 0) - state = 1; - break; - - case 4: /* possible <>-enclosed address */ - if (*hp == '>') /* end of address */ - { - *tp++ = '\0'; - state = 1; - return(address); - } - else if (*hp == '<') /* nested <> */ - tp = address; - else if (*hp == '"') /* quoted address */ - { - *tp++ = *hp; - state = 5; - } - else /* just copy address */ - *tp++ = *hp; - break; - - case 5: /* we're in a quoted address, copy verbatim */ - if (*hp == '\n') /* mismatched quotes */ - return(NULL); - if (*hp != '"') /* just copy it if it isn't a quote */ - *tp++ = *hp; - else if (*hp == '"') /* end of quoted string */ - { - *tp++ = *hp; - state = 4; - } - break; - - case 6: - return(NULL); - break; - } - } - - return(NULL); -} - #ifdef HAVE_GETHOSTBYNAME #define MX_RETRIES 3 |