1
/* Optimized case-insensitive string comparison in C locale.
2
Copyright (C) 2001-2002, 2007, 2009-2012 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 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
General Public License for more details.
14
You should have received a copy of the GNU 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)