home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / elm / elm2.4 / lib / remfirstwd.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-10-03  |  1.6 KB  |  64 lines
  1. static char rcsid[] = "@(#)$Id: remfirstwd.c,v 5.1 1992/10/03 22:41:36 syd Exp $";
  2.  
  3. /*******************************************************************************
  4.  *  The Elm Mail System  -  $Revision: 5.1 $   $State: Exp $
  5.  *
  6.  *            Copyright (c) 1988-1992 USENET Community Trust
  7.  *            Copyright (c) 1986,1987 Dave Taylor
  8.  *******************************************************************************
  9.  * Bug reports, patches, comments, suggestions should be sent to:
  10.  *
  11.  *    Syd Weinstein, Elm Coordinator
  12.  *    elm@DSI.COM            dsinc!elm
  13.  *
  14.  *******************************************************************************
  15.  * $Log: remfirstwd.c,v $
  16.  * Revision 5.1  1992/10/03  22:41:36  syd
  17.  * Initial checkin as of 2.4 Release at PL0
  18.  *
  19.  *
  20.  ******************************************************************************/
  21.  
  22. /** 
  23.  
  24. **/
  25.  
  26. #include "headers.h"
  27.  
  28.  
  29. remove_first_word(string)
  30. char *string;
  31. {    /** removes first word of string, ie up to first non-white space
  32.         following a white space! **/
  33.  
  34.     register int loc;
  35.  
  36.     for (loc = 0; string[loc] != ' ' && string[loc] != '\0'; loc++) 
  37.         ;
  38.  
  39.     while (string[loc] == ' ' || string[loc] == '\t')
  40.       loc++;
  41.     
  42.     move_left(string, loc);
  43. }
  44.  
  45. remove_header_keyword(string)
  46. char *string;
  47. {    /** removes a RFC822 header keyword from the string.
  48.         i.e. removes up to (and including) the first colon,
  49.         plus any white-space immediately following it.  **/
  50.  
  51.     register int loc;
  52.  
  53.     for (loc = 0; string[loc] != ':' && string[loc] != '\0'; loc++) 
  54.         ;
  55.  
  56.     if (string[loc] == ':') {
  57.         loc++; /* move beyond the colon */
  58.         while (string[loc] == ' ' || string[loc] == '\t')
  59.         loc++;
  60.     }
  61.     
  62.     move_left(string, loc);
  63. }
  64.