/*
 *  skip821address()
 *
 *  Routine to scan over a string representing a VALID RFC-821 address
 *  with embedded white-space in it
 *
 *  Copyright Matti Aarnio 1996, 2001
 *
 */

char *skip821address(s)
     char *s;
{
  char quote = 0;
  char c;
  for ( ; *s; ++s) {
    c = *s;
    if (c == '\\') {
      ++s;
      if (*s == 0)
	break;
      continue;
    }
    if (c == quote) /* 'c' is non-zero here */
      quote = 0;
    else if (c == '"')
      quote = '"';
    else if (!quote && (c == ' ' || c == '\t'))
      break;
  }
  return s;
}