1 /* Optimized case-insensitive string comparison in C locale.
2 Copyright (C) 2001-2002, 2007 Free Software Foundation, Inc.
4 This program is free software: you can redistribute it and/or modify it
5 under the terms of the GNU Lesser General Public License as published
6 by the Free Software Foundation; either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
14 You should have received a copy of the GNU Lesser General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
17 /* Written by Bruno Haible <bruno@clisp.org>. */
19 #include "c-strcase.h"
22 /* STRCASEEQ allows to optimize string comparison with a small literal string.
23 STRCASEEQ (s, "UTF-8", 'U','T','F','-','8',0,0,0,0)
24 is semantically equivalent to
25 c_strcasecmp (s, "UTF-8") == 0
28 /* Help GCC to generate good code for string comparisons with
30 #if defined (__GNUC__) && defined (__OPTIMIZE__)
32 /* Case insensitive comparison of ASCII characters. */
34 # define CASEEQ(other,upper) \
35 (c_isupper (upper) ? ((other) & ~0x20) == (upper) : (other) == (upper))
36 # elif C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
37 # define CASEEQ(other,upper) \
38 (c_isupper (upper) ? (other) == (upper) || (other) == (upper) - 'A' + 'a' : (other) == (upper))
40 # define CASEEQ(other,upper) \
41 (c_toupper (other) == (upper))
45 strcaseeq9 (const char *s1
, const char *s2
)
47 return c_strcasecmp (s1
+ 9, s2
+ 9) == 0;
51 strcaseeq8 (const char *s1
, const char *s2
, char s28
)
53 if (CASEEQ (s1
[8], s28
))
58 return strcaseeq9 (s1
, s2
);
65 strcaseeq7 (const char *s1
, const char *s2
, char s27
, char s28
)
67 if (CASEEQ (s1
[7], s27
))
72 return strcaseeq8 (s1
, s2
, s28
);
79 strcaseeq6 (const char *s1
, const char *s2
, char s26
, char s27
, char s28
)
81 if (CASEEQ (s1
[6], s26
))
86 return strcaseeq7 (s1
, s2
, s27
, s28
);
93 strcaseeq5 (const char *s1
, const char *s2
, char s25
, char s26
, char s27
, char s28
)
95 if (CASEEQ (s1
[5], s25
))
100 return strcaseeq6 (s1
, s2
, s26
, s27
, s28
);
107 strcaseeq4 (const char *s1
, const char *s2
, char s24
, char s25
, char s26
, char s27
, char s28
)
109 if (CASEEQ (s1
[4], s24
))
114 return strcaseeq5 (s1
, s2
, s25
, s26
, s27
, s28
);
121 strcaseeq3 (const char *s1
, const char *s2
, char s23
, char s24
, char s25
, char s26
, char s27
, char s28
)
123 if (CASEEQ (s1
[3], s23
))
128 return strcaseeq4 (s1
, s2
, s24
, s25
, s26
, s27
, s28
);
135 strcaseeq2 (const char *s1
, const char *s2
, char s22
, char s23
, char s24
, char s25
, char s26
, char s27
, char s28
)
137 if (CASEEQ (s1
[2], s22
))
142 return strcaseeq3 (s1
, s2
, s23
, s24
, s25
, s26
, s27
, s28
);
149 strcaseeq1 (const char *s1
, const char *s2
, char s21
, char s22
, char s23
, char s24
, char s25
, char s26
, char s27
, char s28
)
151 if (CASEEQ (s1
[1], s21
))
156 return strcaseeq2 (s1
, s2
, s22
, s23
, s24
, s25
, s26
, s27
, s28
);
163 strcaseeq0 (const char *s1
, const char *s2
, char s20
, char s21
, char s22
, char s23
, char s24
, char s25
, char s26
, char s27
, char s28
)
165 if (CASEEQ (s1
[0], s20
))
170 return strcaseeq1 (s1
, s2
, s21
, s22
, s23
, s24
, s25
, s26
, s27
, s28
);
176 #define STRCASEEQ(s1,s2,s20,s21,s22,s23,s24,s25,s26,s27,s28) \
177 strcaseeq0 (s1, s2, s20, s21, s22, s23, s24, s25, s26, s27, s28)
181 #define STRCASEEQ(s1,s2,s20,s21,s22,s23,s24,s25,s26,s27,s28) \
182 (c_strcasecmp (s1, s2) == 0)