1 /*
2 * strcasecmp() implementation for systems that don't have it or stricmp()
3 * or strcmpi().
4 *
5 * Copyright (c) 1987, 1993
6 * The Regents of the University of California. All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32 #include "util.h"
33
34 #ifndef USE_OUR_OWN_STRCASECMP
35 #undef yasm__strcasecmp
36 #undef yasm__strncasecmp
37 #endif
38
39 #if defined(LIBC_SCCS) && !defined(lint)
40 static char sccsid[] = "@(#)strcasecmp.c 8.1 (Berkeley) 6/4/93";
41 #endif /* LIBC_SCCS and not lint */
42
43 #include <ctype.h>
44
45 int
yasm__strcasecmp(const char * s1,const char * s2)46 yasm__strcasecmp(const char *s1, const char *s2)
47 {
48 #ifdef HAVE_STRCASECMP
49 return strcasecmp(s1, s2);
50 #elif HAVE_STRICMP
51 return stricmp(s1, s2);
52 #elif HAVE__STRICMP
53 return _stricmp(s1, s2);
54 #elif HAVE_STRCMPI
55 return strcmpi(s1, s2);
56 #else
57 const unsigned char
58 *us1 = (const unsigned char *)s1,
59 *us2 = (const unsigned char *)s2;
60
61 while (tolower(*us1) == tolower(*us2++))
62 if (*us1++ == '\0')
63 return (0);
64 return (tolower(*us1) - tolower(*--us2));
65 #endif
66 }
67
68 int
yasm__strncasecmp(const char * s1,const char * s2,size_t n)69 yasm__strncasecmp(const char *s1, const char *s2, size_t n)
70 {
71 #ifdef HAVE_STRCASECMP
72 return strncasecmp(s1, s2, n);
73 #elif HAVE_STRICMP
74 return strnicmp(s1, s2, n);
75 #elif HAVE__STRNICMP
76 return _strnicmp(s1, s2, n);
77 #elif HAVE_STRCMPI
78 return strncmpi(s1, s2, n);
79 #else
80 const unsigned char
81 *us1 = (const unsigned char *)s1,
82 *us2 = (const unsigned char *)s2;
83
84 if (n != 0) {
85 do {
86 if (tolower(*us1) != tolower(*us2++))
87 return (tolower(*us1) - tolower(*--us2));
88 if (*us1++ == '\0')
89 break;
90 } while (--n != 0);
91 }
92 return (0);
93 #endif
94 }
95