home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / mmdf / mmdf-IIb.43 / uip / ucbmail / next_address.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-02-01  |  737 b   |  51 lines
  1. /*
  2.  * This is take from "send/s_do.c".
  3.  */
  4.  
  5. #include "./mmdf.h"
  6.  
  7. char *adrptr;
  8.  
  9. next_address (addr)
  10. char    *addr;
  11. {
  12.     int     i = -1;               /* return -1 = end; 0 = empty         */
  13.  
  14.     for (;;)
  15.     switch (*adrptr)
  16.     {
  17.         default: 
  18.         addr[++i] = *adrptr++;
  19.         continue;
  20.  
  21.         case '"':
  22.         for (addr[++i] = *adrptr++; !isnull (*adrptr); )
  23.         {
  24.             addr[++i] = *adrptr;
  25.             if (*adrptr++ == '"')
  26.             break;
  27.         }
  28.         continue;
  29.  
  30.         case '(':
  31.         for (addr[++i] = *adrptr++; !isnull (*adrptr); )
  32.         {
  33.             addr[++i] = *adrptr;
  34.             if (*adrptr++ == ')')
  35.             break;
  36.         }
  37.         continue;
  38.  
  39.         case '\n':
  40.         case ',': 
  41.         addr[++i] = '\0';
  42.         adrptr++;
  43.         return (i);
  44.  
  45.         case '\0': 
  46.         if (i >= 0)
  47.             addr[++i] = '\0';
  48.         return (i);
  49.     }
  50. }
  51.