home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.uv.es
/
2014.11.ftp.uv.es.tar
/
ftp.uv.es
/
pub
/
unix
/
elm-2.4-pl20.tar.Z
/
elm-2.4-pl20.tar
/
lib
/
strincmp.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-10-03
|
1KB
|
51 lines
static char rcsid[] = "@(#)$Id: strincmp.c,v 5.1 1992/10/03 22:41:36 syd Exp $";
/*******************************************************************************
* The Elm Mail System - $Revision: 5.1 $ $State: Exp $
*
* Copyright (c) 1988-1992 USENET Community Trust
* Copyright (c) 1986,1987 Dave Taylor
*******************************************************************************
* Bug reports, patches, comments, suggestions should be sent to:
*
* Syd Weinstein, Elm Coordinator
* elm@DSI.COM dsinc!elm
*
*******************************************************************************
* $Log: strincmp.c,v $
* Revision 5.1 1992/10/03 22:41:36 syd
* Initial checkin as of 2.4 Release at PL0
*
*
******************************************************************************/
/** compare strings ignoring case - length limited
**/
#include "headers.h"
#include <ctype.h>
#ifdef BSD
#undef tolower
#undef toupper
#endif
int
strincmp(s1,s2,n)
register char *s1, *s2;
register int n;
{
/* case insensitive comparison */
register int d;
while (--n >= 0) {
d = ( isupper(*s1) ? tolower(*s1) : *s1 )
- ( isupper(*s2) ? tolower(*s2) : *s2 ) ;
if ( d != 0 || *s1 == '\0' || *s2 == '\0' )
return d;
++s1;
++s2;
}
return(0);
}