1 | /* Optimized case-insensitive string comparison in C locale. |
2 | Copyright (C) 2001-2002, 2007, 2009-2019 Free Software Foundation, Inc. |
3 | |
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. |
8 | |
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. |
13 | |
14 | You should have received a copy of the GNU General Public License |
15 | along with this program. If not, see <https://www.gnu.org/licenses/>. */ |
16 | |
17 | /* Written by Bruno Haible <bruno@clisp.org>. */ |
18 | |
19 | #include "c-strcase.h" |
20 | #include "c-ctype.h" |
21 | |
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 |
26 | just faster. */ |
27 | |
28 | /* Help GCC to generate good code for string comparisons with |
29 | immediate strings. */ |
30 | #if defined (__GNUC__) && defined (__OPTIMIZE__) |
31 | |
32 | /* Case insensitive comparison of ASCII characters. */ |
33 | # if C_CTYPE_ASCII |
34 | # define CASEEQ(other,upper) \ |
35 | (c_isupper (upper) ? ((other) & ~0x20) == (upper) : (other) == (upper)) |
36 | # else |
37 | # define CASEEQ(other,upper) \ |
38 | (c_toupper (other) == (upper)) |
39 | # endif |
40 | |
41 | static inline int |
42 | strcaseeq9 (const char *s1, const char *s2) |
43 | { |
44 | return c_strcasecmp (s1 + 9, s2 + 9) == 0; |
45 | } |
46 | |
47 | static inline int |
48 | strcaseeq8 (const char *s1, const char *s2, char s28) |
49 | { |
50 | if (CASEEQ (s1[8], s28)) |
51 | { |
52 | if (s28 == 0) |
53 | return 1; |
54 | else |
55 | return strcaseeq9 (s1, s2); |
56 | } |
57 | else |
58 | return 0; |
59 | } |
60 | |
61 | static inline int |
62 | strcaseeq7 (const char *s1, const char *s2, char s27, char s28) |
63 | { |
64 | if (CASEEQ (s1[7], s27)) |
65 | { |
66 | if (s27 == 0) |
67 | return 1; |
68 | else |
69 | return strcaseeq8 (s1, s2, s28); |
70 | } |
71 | else |
72 | return 0; |
73 | } |
74 | |
75 | static inline int |
76 | strcaseeq6 (const char *s1, const char *s2, char s26, char s27, char s28) |
77 | { |
78 | if (CASEEQ (s1[6], s26)) |
79 | { |
80 | if (s26 == 0) |
81 | return 1; |
82 | else |
83 | return strcaseeq7 (s1, s2, s27, s28); |
84 | } |
85 | else |
86 | return 0; |
87 | } |
88 | |
89 | static inline int |
90 | strcaseeq5 (const char *s1, const char *s2, char s25, char s26, char s27, char s28) |
91 | { |
92 | if (CASEEQ (s1[5], s25)) |
93 | { |
94 | if (s25 == 0) |
95 | return 1; |
96 | else |
97 | return strcaseeq6 (s1, s2, s26, s27, s28); |
98 | } |
99 | else |
100 | return 0; |
101 | } |
102 | |
103 | static inline int |
104 | strcaseeq4 (const char *s1, const char *s2, char s24, char s25, char s26, char s27, char s28) |
105 | { |
106 | if (CASEEQ (s1[4], s24)) |
107 | { |
108 | if (s24 == 0) |
109 | return 1; |
110 | else |
111 | return strcaseeq5 (s1, s2, s25, s26, s27, s28); |
112 | } |
113 | else |
114 | return 0; |
115 | } |
116 | |
117 | static inline int |
118 | strcaseeq3 (const char *s1, const char *s2, char s23, char s24, char s25, char s26, char s27, char s28) |
119 | { |
120 | if (CASEEQ (s1[3], s23)) |
121 | { |
122 | if (s23 == 0) |
123 | return 1; |
124 | else |
125 | return strcaseeq4 (s1, s2, s24, s25, s26, s27, s28); |
126 | } |
127 | else |
128 | return 0; |
129 | } |
130 | |
131 | static inline int |
132 | strcaseeq2 (const char *s1, const char *s2, char s22, char s23, char s24, char s25, char s26, char s27, char s28) |
133 | { |
134 | if (CASEEQ (s1[2], s22)) |
135 | { |
136 | if (s22 == 0) |
137 | return 1; |
138 | else |
139 | return strcaseeq3 (s1, s2, s23, s24, s25, s26, s27, s28); |
140 | } |
141 | else |
142 | return 0; |
143 | } |
144 | |
145 | static inline int |
146 | strcaseeq1 (const char *s1, const char *s2, char s21, char s22, char s23, char s24, char s25, char s26, char s27, char s28) |
147 | { |
148 | if (CASEEQ (s1[1], s21)) |
149 | { |
150 | if (s21 == 0) |
151 | return 1; |
152 | else |
153 | return strcaseeq2 (s1, s2, s22, s23, s24, s25, s26, s27, s28); |
154 | } |
155 | else |
156 | return 0; |
157 | } |
158 | |
159 | static inline int |
160 | 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) |
161 | { |
162 | if (CASEEQ (s1[0], s20)) |
163 | { |
164 | if (s20 == 0) |
165 | return 1; |
166 | else |
167 | return strcaseeq1 (s1, s2, s21, s22, s23, s24, s25, s26, s27, s28); |
168 | } |
169 | else |
170 | return 0; |
171 | } |
172 | |
173 | #define STRCASEEQ(s1,s2,s20,s21,s22,s23,s24,s25,s26,s27,s28) \ |
174 | strcaseeq0 (s1, s2, s20, s21, s22, s23, s24, s25, s26, s27, s28) |
175 | |
176 | #else |
177 | |
178 | #define STRCASEEQ(s1,s2,s20,s21,s22,s23,s24,s25,s26,s27,s28) \ |
179 | (c_strcasecmp (s1, s2) == 0) |
180 | |
181 | #endif |
182 | |