home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / elm / elm2.4 / lib / addrmchusr.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-10-03  |  1.3 KB  |  45 lines
  1.  
  2. static char rcsid[] = "@(#)$Id: addrmchusr.c,v 5.1 1992/10/03 22:41:36 syd Exp $";
  3.  
  4. /*******************************************************************************
  5.  *  The Elm Mail System  -  $Revision: 5.1 $   $State: Exp $
  6.  *
  7.  *            Copyright (c) 1988-1992 USENET Community Trust
  8.  *            Copyright (c) 1986,1987 Dave Taylor
  9.  *******************************************************************************
  10.  * Bug reports, patches, comments, suggestions should be sent to:
  11.  *
  12.  *    Syd Weinstein, Elm Coordinator
  13.  *    elm@DSI.COM            dsinc!elm
  14.  *
  15.  *******************************************************************************
  16.  * $Log: addrmchusr.c,v $
  17.  * Revision 5.1  1992/10/03  22:41:36  syd
  18.  * Initial checkin as of 2.4 Release at PL0
  19.  *
  20.  *
  21.  ******************************************************************************/
  22.  
  23. /** 
  24.  
  25. **/
  26.  
  27. #include "headers.h"
  28.  
  29. int
  30. addr_matches_user(addr,user)
  31. register char *addr, *user;
  32. {
  33.     int len = strlen(user);
  34.     static char c_before[] = "!:%";    /* these can appear before a username */
  35.     static char c_after[] = ":%@";    /* these can appear after a username  */
  36.  
  37.     do {
  38.       if ( strncmp(addr,user,len) == 0 ) {
  39.         if ( addr[len] == '\0' || index(c_after,addr[len]) != NULL )
  40.           return TRUE;
  41.       }
  42.     } while ( (addr=qstrpbrk(addr,c_before)) != NULL && *++addr != '\0' ) ;
  43.     return FALSE;
  44. }
  45.