Line data Source code
1 : /* Machine-independant string function optimizations.
2 : Copyright (C) 1997-2014 Free Software Foundation, Inc.
3 : This file is part of the GNU C Library.
4 : Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
5 :
6 : The GNU C Library is free software; you can redistribute it and/or
7 : modify it under the terms of the GNU Lesser General Public
8 : License as published by the Free Software Foundation; either
9 : version 2.1 of the License, or (at your option) any later version.
10 :
11 : The GNU C Library is distributed in the hope that it will be useful,
12 : but WITHOUT ANY WARRANTY; without even the implied warranty of
13 : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 : Lesser General Public License for more details.
15 :
16 : You should have received a copy of the GNU Lesser General Public
17 : License along with the GNU C Library; if not, see
18 : <http://www.gnu.org/licenses/>. */
19 :
20 : #ifndef _STRING_H
21 : # error "Never use <bits/string2.h> directly; include <string.h> instead."
22 : #endif
23 :
24 : #ifndef __NO_STRING_INLINES
25 :
26 : /* Unlike the definitions in the header <bits/string.h> the
27 : definitions contained here are not optimized down to assembler
28 : level. Those optimizations are not always a good idea since this
29 : means the code size increases a lot. Instead the definitions here
30 : optimize some functions in a way which do not dramatically
31 : increase the code size and which do not use assembler. The main
32 : trick is to use GCC's `__builtin_constant_p' function.
33 :
34 : Every function XXX which has a defined version in
35 : <bits/string.h> must be accompanied by a symbol _HAVE_STRING_ARCH_XXX
36 : to make sure we don't get redefinitions.
37 :
38 : We must use here macros instead of inline functions since the
39 : trick won't work with the latter. */
40 :
41 : #ifndef __STRING_INLINE
42 : # ifdef __cplusplus
43 : # define __STRING_INLINE inline
44 : # else
45 : # define __STRING_INLINE __extern_inline
46 : # endif
47 : #endif
48 :
49 : #if _STRING_ARCH_unaligned
50 : /* If we can do unaligned memory accesses we must know the endianess. */
51 : # include <endian.h>
52 : # include <bits/types.h>
53 :
54 : # if __BYTE_ORDER == __LITTLE_ENDIAN
55 : # define __STRING2_SMALL_GET16(src, idx) \
56 : (((const unsigned char *) (const char *) (src))[idx + 1] << 8 \
57 : | ((const unsigned char *) (const char *) (src))[idx])
58 : # define __STRING2_SMALL_GET32(src, idx) \
59 : (((((const unsigned char *) (const char *) (src))[idx + 3] << 8 \
60 : | ((const unsigned char *) (const char *) (src))[idx + 2]) << 8 \
61 : | ((const unsigned char *) (const char *) (src))[idx + 1]) << 8 \
62 : | ((const unsigned char *) (const char *) (src))[idx])
63 : # else
64 : # define __STRING2_SMALL_GET16(src, idx) \
65 : (((const unsigned char *) (const char *) (src))[idx] << 8 \
66 : | ((const unsigned char *) (const char *) (src))[idx + 1])
67 : # define __STRING2_SMALL_GET32(src, idx) \
68 : (((((const unsigned char *) (const char *) (src))[idx] << 8 \
69 : | ((const unsigned char *) (const char *) (src))[idx + 1]) << 8 \
70 : | ((const unsigned char *) (const char *) (src))[idx + 2]) << 8 \
71 : | ((const unsigned char *) (const char *) (src))[idx + 3])
72 : # endif
73 : #else
74 : /* These are a few types we need for the optimizations if we cannot
75 : use unaligned memory accesses. */
76 : # define __STRING2_COPY_TYPE(N) \
77 : typedef struct { unsigned char __arr[N]; } \
78 : __attribute__ ((__packed__)) __STRING2_COPY_ARR##N
79 : __STRING2_COPY_TYPE (2);
80 : __STRING2_COPY_TYPE (3);
81 : __STRING2_COPY_TYPE (4);
82 : __STRING2_COPY_TYPE (5);
83 : __STRING2_COPY_TYPE (6);
84 : __STRING2_COPY_TYPE (7);
85 : __STRING2_COPY_TYPE (8);
86 : # undef __STRING2_COPY_TYPE
87 : #endif
88 :
89 : /* Dereferencing a pointer arg to run sizeof on it fails for the void
90 : pointer case, so we use this instead.
91 : Note that __x is evaluated twice. */
92 : #define __string2_1bptr_p(__x) \
93 : ((size_t)(const void *)((__x) + 1) - (size_t)(const void *)(__x) == 1)
94 :
95 : /* Set N bytes of S to C. */
96 : #if !defined _HAVE_STRING_ARCH_memset
97 : # if !__GNUC_PREREQ (3, 0)
98 : # if _STRING_ARCH_unaligned
99 : # define memset(s, c, n) \
100 : (__extension__ (__builtin_constant_p (n) && (n) <= 16 \
101 : ? ((n) == 1 \
102 : ? __memset_1 (s, c) \
103 : : __memset_gc (s, c, n)) \
104 : : (__builtin_constant_p (c) && (c) == '\0' \
105 : ? ({ void *__s = (s); __bzero (__s, n); __s; }) \
106 : : memset (s, c, n))))
107 :
108 : # define __memset_1(s, c) ({ void *__s = (s); \
109 : *((__uint8_t *) __s) = (__uint8_t) c; __s; })
110 :
111 : # define __memset_gc(s, c, n) \
112 : ({ void *__s = (s); \
113 : union { \
114 : unsigned int __ui; \
115 : unsigned short int __usi; \
116 : unsigned char __uc; \
117 : } *__u = __s; \
118 : __uint8_t __c = (__uint8_t) (c); \
119 : \
120 : /* This `switch' statement will be removed at compile-time. */ \
121 : switch ((unsigned int) (n)) \
122 : { \
123 : case 15: \
124 : __u->__ui = __c * 0x01010101; \
125 : __u = __extension__ ((void *) __u + 4); \
126 : case 11: \
127 : __u->__ui = __c * 0x01010101; \
128 : __u = __extension__ ((void *) __u + 4); \
129 : case 7: \
130 : __u->__ui = __c * 0x01010101; \
131 : __u = __extension__ ((void *) __u + 4); \
132 : case 3: \
133 : __u->__usi = (unsigned short int) __c * 0x0101; \
134 : __u = __extension__ ((void *) __u + 2); \
135 : __u->__uc = (unsigned char) __c; \
136 : break; \
137 : \
138 : case 14: \
139 : __u->__ui = __c * 0x01010101; \
140 : __u = __extension__ ((void *) __u + 4); \
141 : case 10: \
142 : __u->__ui = __c * 0x01010101; \
143 : __u = __extension__ ((void *) __u + 4); \
144 : case 6: \
145 : __u->__ui = __c * 0x01010101; \
146 : __u = __extension__ ((void *) __u + 4); \
147 : case 2: \
148 : __u->__usi = (unsigned short int) __c * 0x0101; \
149 : break; \
150 : \
151 : case 13: \
152 : __u->__ui = __c * 0x01010101; \
153 : __u = __extension__ ((void *) __u + 4); \
154 : case 9: \
155 : __u->__ui = __c * 0x01010101; \
156 : __u = __extension__ ((void *) __u + 4); \
157 : case 5: \
158 : __u->__ui = __c * 0x01010101; \
159 : __u = __extension__ ((void *) __u + 4); \
160 : case 1: \
161 : __u->__uc = (unsigned char) __c; \
162 : break; \
163 : \
164 : case 16: \
165 : __u->__ui = __c * 0x01010101; \
166 : __u = __extension__ ((void *) __u + 4); \
167 : case 12: \
168 : __u->__ui = __c * 0x01010101; \
169 : __u = __extension__ ((void *) __u + 4); \
170 : case 8: \
171 : __u->__ui = __c * 0x01010101; \
172 : __u = __extension__ ((void *) __u + 4); \
173 : case 4: \
174 : __u->__ui = __c * 0x01010101; \
175 : case 0: \
176 : break; \
177 : } \
178 : \
179 : __s; })
180 : # else
181 : # define memset(s, c, n) \
182 : (__extension__ (__builtin_constant_p (c) && (c) == '\0' \
183 : ? ({ void *__s = (s); __bzero (__s, n); __s; }) \
184 : : memset (s, c, n)))
185 : # endif
186 : # endif
187 :
188 : /* GCC < 3.0 optimizes memset(s, 0, n) but not bzero(s, n).
189 : The optimization is broken before EGCS 1.1.
190 : GCC 3.0+ has __builtin_bzero as well, but at least till GCC 3.4
191 : if it decides to call the library function, it calls memset
192 : and not bzero. */
193 : # if __GNUC_PREREQ (2, 91)
194 : # define __bzero(s, n) __builtin_memset (s, '\0', n)
195 : # endif
196 :
197 : #endif
198 :
199 :
200 : /* Copy N bytes from SRC to DEST, returning pointer to byte following the
201 : last copied. */
202 : #ifdef __USE_GNU
203 : # if !defined _HAVE_STRING_ARCH_mempcpy || defined _FORCE_INLINES
204 : # ifndef _HAVE_STRING_ARCH_mempcpy
205 : # if __GNUC_PREREQ (3, 4)
206 : # define __mempcpy(dest, src, n) __builtin_mempcpy (dest, src, n)
207 : # elif __GNUC_PREREQ (3, 0)
208 : # define __mempcpy(dest, src, n) \
209 : (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \
210 : && __string2_1bptr_p (src) && n <= 8 \
211 : ? __builtin_memcpy (dest, src, n) + (n) \
212 : : __mempcpy (dest, src, n)))
213 : # else
214 : # define __mempcpy(dest, src, n) \
215 : (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \
216 : && __string2_1bptr_p (src) && n <= 8 \
217 : ? __mempcpy_small (dest, __mempcpy_args (src), n) \
218 : : __mempcpy (dest, src, n)))
219 : # endif
220 : /* In glibc we use this function frequently but for namespace reasons
221 : we have to use the name `__mempcpy'. */
222 : # define mempcpy(dest, src, n) __mempcpy (dest, src, n)
223 : # endif
224 :
225 : # if !__GNUC_PREREQ (3, 0) || defined _FORCE_INLINES
226 : # if _STRING_ARCH_unaligned
227 : # ifndef _FORCE_INLINES
228 : # define __mempcpy_args(src) \
229 : ((const char *) (src))[0], ((const char *) (src))[2], \
230 : ((const char *) (src))[4], ((const char *) (src))[6], \
231 : __extension__ __STRING2_SMALL_GET16 (src, 0), \
232 : __extension__ __STRING2_SMALL_GET16 (src, 4), \
233 : __extension__ __STRING2_SMALL_GET32 (src, 0), \
234 : __extension__ __STRING2_SMALL_GET32 (src, 4)
235 : # endif
236 : __STRING_INLINE void *__mempcpy_small (void *, char, char, char, char,
237 : __uint16_t, __uint16_t, __uint32_t,
238 : __uint32_t, size_t);
239 : __STRING_INLINE void *
240 : __mempcpy_small (void *__dest1,
241 : char __src0_1, char __src2_1, char __src4_1, char __src6_1,
242 : __uint16_t __src0_2, __uint16_t __src4_2,
243 : __uint32_t __src0_4, __uint32_t __src4_4,
244 : size_t __srclen)
245 : {
246 : union {
247 : __uint32_t __ui;
248 : __uint16_t __usi;
249 : unsigned char __uc;
250 : unsigned char __c;
251 : } *__u = __dest1;
252 : switch ((unsigned int) __srclen)
253 : {
254 : case 1:
255 : __u->__c = __src0_1;
256 : __u = __extension__ ((void *) __u + 1);
257 : break;
258 : case 2:
259 : __u->__usi = __src0_2;
260 : __u = __extension__ ((void *) __u + 2);
261 : break;
262 : case 3:
263 : __u->__usi = __src0_2;
264 : __u = __extension__ ((void *) __u + 2);
265 : __u->__c = __src2_1;
266 : __u = __extension__ ((void *) __u + 1);
267 : break;
268 : case 4:
269 : __u->__ui = __src0_4;
270 : __u = __extension__ ((void *) __u + 4);
271 : break;
272 : case 5:
273 : __u->__ui = __src0_4;
274 : __u = __extension__ ((void *) __u + 4);
275 : __u->__c = __src4_1;
276 : __u = __extension__ ((void *) __u + 1);
277 : break;
278 : case 6:
279 : __u->__ui = __src0_4;
280 : __u = __extension__ ((void *) __u + 4);
281 : __u->__usi = __src4_2;
282 : __u = __extension__ ((void *) __u + 2);
283 : break;
284 : case 7:
285 : __u->__ui = __src0_4;
286 : __u = __extension__ ((void *) __u + 4);
287 : __u->__usi = __src4_2;
288 : __u = __extension__ ((void *) __u + 2);
289 : __u->__c = __src6_1;
290 : __u = __extension__ ((void *) __u + 1);
291 : break;
292 : case 8:
293 : __u->__ui = __src0_4;
294 : __u = __extension__ ((void *) __u + 4);
295 : __u->__ui = __src4_4;
296 : __u = __extension__ ((void *) __u + 4);
297 : break;
298 : }
299 : return (void *) __u;
300 : }
301 : # else
302 : # ifndef _FORCE_INLINES
303 : # define __mempcpy_args(src) \
304 : ((const char *) (src))[0], \
305 : __extension__ ((__STRING2_COPY_ARR2) \
306 : { { ((const char *) (src))[0], ((const char *) (src))[1] } }), \
307 : __extension__ ((__STRING2_COPY_ARR3) \
308 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
309 : ((const char *) (src))[2] } }), \
310 : __extension__ ((__STRING2_COPY_ARR4) \
311 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
312 : ((const char *) (src))[2], ((const char *) (src))[3] } }), \
313 : __extension__ ((__STRING2_COPY_ARR5) \
314 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
315 : ((const char *) (src))[2], ((const char *) (src))[3], \
316 : ((const char *) (src))[4] } }), \
317 : __extension__ ((__STRING2_COPY_ARR6) \
318 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
319 : ((const char *) (src))[2], ((const char *) (src))[3], \
320 : ((const char *) (src))[4], ((const char *) (src))[5] } }), \
321 : __extension__ ((__STRING2_COPY_ARR7) \
322 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
323 : ((const char *) (src))[2], ((const char *) (src))[3], \
324 : ((const char *) (src))[4], ((const char *) (src))[5], \
325 : ((const char *) (src))[6] } }), \
326 : __extension__ ((__STRING2_COPY_ARR8) \
327 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
328 : ((const char *) (src))[2], ((const char *) (src))[3], \
329 : ((const char *) (src))[4], ((const char *) (src))[5], \
330 : ((const char *) (src))[6], ((const char *) (src))[7] } })
331 : # endif
332 : __STRING_INLINE void *__mempcpy_small (void *, char, __STRING2_COPY_ARR2,
333 : __STRING2_COPY_ARR3,
334 : __STRING2_COPY_ARR4,
335 : __STRING2_COPY_ARR5,
336 : __STRING2_COPY_ARR6,
337 : __STRING2_COPY_ARR7,
338 : __STRING2_COPY_ARR8, size_t);
339 : __STRING_INLINE void *
340 : __mempcpy_small (void *__dest, char __src1,
341 : __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
342 : __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
343 : __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
344 : __STRING2_COPY_ARR8 __src8, size_t __srclen)
345 : {
346 : union {
347 : char __c;
348 : __STRING2_COPY_ARR2 __sca2;
349 : __STRING2_COPY_ARR3 __sca3;
350 : __STRING2_COPY_ARR4 __sca4;
351 : __STRING2_COPY_ARR5 __sca5;
352 : __STRING2_COPY_ARR6 __sca6;
353 : __STRING2_COPY_ARR7 __sca7;
354 : __STRING2_COPY_ARR8 __sca8;
355 : } *__u = __dest;
356 : switch ((unsigned int) __srclen)
357 : {
358 : case 1:
359 : __u->__c = __src1;
360 : break;
361 : case 2:
362 : __extension__ __u->__sca2 = __src2;
363 : break;
364 : case 3:
365 : __extension__ __u->__sca3 = __src3;
366 : break;
367 : case 4:
368 : __extension__ __u->__sca4 = __src4;
369 : break;
370 : case 5:
371 : __extension__ __u->__sca5 = __src5;
372 : break;
373 : case 6:
374 : __extension__ __u->__sca6 = __src6;
375 : break;
376 : case 7:
377 : __extension__ __u->__sca7 = __src7;
378 : break;
379 : case 8:
380 : __extension__ __u->__sca8 = __src8;
381 : break;
382 : }
383 : return __extension__ ((void *) __u + __srclen);
384 : }
385 : # endif
386 : # endif
387 : # endif
388 : #endif
389 :
390 :
391 : /* Return pointer to C in S. */
392 : #ifndef _HAVE_STRING_ARCH_strchr
393 : extern void *__rawmemchr (const void *__s, int __c);
394 : # if __GNUC_PREREQ (3, 2)
395 : # define strchr(s, c) \
396 : (__extension__ (__builtin_constant_p (c) && !__builtin_constant_p (s) \
397 : && (c) == '\0' \
398 : ? (char *) __rawmemchr (s, c) \
399 : : __builtin_strchr (s, c)))
400 : # else
401 : # define strchr(s, c) \
402 : (__extension__ (__builtin_constant_p (c) && (c) == '\0' \
403 : ? (char *) __rawmemchr (s, c) \
404 : : strchr (s, c)))
405 : # endif
406 : #endif
407 :
408 :
409 : /* Copy SRC to DEST. */
410 : #if (!defined _HAVE_STRING_ARCH_strcpy && !__GNUC_PREREQ (3, 0)) \
411 : || defined _FORCE_INLINES
412 : # if !defined _HAVE_STRING_ARCH_strcpy && !__GNUC_PREREQ (3, 0)
413 : # define strcpy(dest, src) \
414 : (__extension__ (__builtin_constant_p (src) \
415 : ? (__string2_1bptr_p (src) && strlen (src) + 1 <= 8 \
416 : ? __strcpy_small (dest, __strcpy_args (src), \
417 : strlen (src) + 1) \
418 : : (char *) memcpy (dest, src, strlen (src) + 1)) \
419 : : strcpy (dest, src)))
420 : # endif
421 :
422 : # if _STRING_ARCH_unaligned
423 : # ifndef _FORCE_INLINES
424 : # define __strcpy_args(src) \
425 : __extension__ __STRING2_SMALL_GET16 (src, 0), \
426 : __extension__ __STRING2_SMALL_GET16 (src, 4), \
427 : __extension__ __STRING2_SMALL_GET32 (src, 0), \
428 : __extension__ __STRING2_SMALL_GET32 (src, 4)
429 : # endif
430 : __STRING_INLINE char *__strcpy_small (char *, __uint16_t, __uint16_t,
431 : __uint32_t, __uint32_t, size_t);
432 : __STRING_INLINE char *
433 : __strcpy_small (char *__dest,
434 : __uint16_t __src0_2, __uint16_t __src4_2,
435 : __uint32_t __src0_4, __uint32_t __src4_4,
436 : size_t __srclen)
437 : {
438 : union {
439 : __uint32_t __ui;
440 : __uint16_t __usi;
441 : unsigned char __uc;
442 : } *__u = (void *) __dest;
443 : switch ((unsigned int) __srclen)
444 : {
445 : case 1:
446 : __u->__uc = '\0';
447 : break;
448 : case 2:
449 : __u->__usi = __src0_2;
450 : break;
451 : case 3:
452 : __u->__usi = __src0_2;
453 : __u = __extension__ ((void *) __u + 2);
454 : __u->__uc = '\0';
455 : break;
456 : case 4:
457 : __u->__ui = __src0_4;
458 : break;
459 : case 5:
460 : __u->__ui = __src0_4;
461 : __u = __extension__ ((void *) __u + 4);
462 : __u->__uc = '\0';
463 : break;
464 : case 6:
465 : __u->__ui = __src0_4;
466 : __u = __extension__ ((void *) __u + 4);
467 : __u->__usi = __src4_2;
468 : break;
469 : case 7:
470 : __u->__ui = __src0_4;
471 : __u = __extension__ ((void *) __u + 4);
472 : __u->__usi = __src4_2;
473 : __u = __extension__ ((void *) __u + 2);
474 : __u->__uc = '\0';
475 : break;
476 : case 8:
477 : __u->__ui = __src0_4;
478 : __u = __extension__ ((void *) __u + 4);
479 : __u->__ui = __src4_4;
480 : break;
481 : }
482 : return __dest;
483 : }
484 : # else
485 : # ifndef _FORCE_INLINES
486 : # define __strcpy_args(src) \
487 : __extension__ ((__STRING2_COPY_ARR2) \
488 : { { ((const char *) (src))[0], '\0' } }), \
489 : __extension__ ((__STRING2_COPY_ARR3) \
490 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
491 : '\0' } }), \
492 : __extension__ ((__STRING2_COPY_ARR4) \
493 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
494 : ((const char *) (src))[2], '\0' } }), \
495 : __extension__ ((__STRING2_COPY_ARR5) \
496 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
497 : ((const char *) (src))[2], ((const char *) (src))[3], \
498 : '\0' } }), \
499 : __extension__ ((__STRING2_COPY_ARR6) \
500 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
501 : ((const char *) (src))[2], ((const char *) (src))[3], \
502 : ((const char *) (src))[4], '\0' } }), \
503 : __extension__ ((__STRING2_COPY_ARR7) \
504 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
505 : ((const char *) (src))[2], ((const char *) (src))[3], \
506 : ((const char *) (src))[4], ((const char *) (src))[5], \
507 : '\0' } }), \
508 : __extension__ ((__STRING2_COPY_ARR8) \
509 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
510 : ((const char *) (src))[2], ((const char *) (src))[3], \
511 : ((const char *) (src))[4], ((const char *) (src))[5], \
512 : ((const char *) (src))[6], '\0' } })
513 : # endif
514 : __STRING_INLINE char *__strcpy_small (char *, __STRING2_COPY_ARR2,
515 : __STRING2_COPY_ARR3,
516 : __STRING2_COPY_ARR4,
517 : __STRING2_COPY_ARR5,
518 : __STRING2_COPY_ARR6,
519 : __STRING2_COPY_ARR7,
520 : __STRING2_COPY_ARR8, size_t);
521 : __STRING_INLINE char *
522 : __strcpy_small (char *__dest,
523 : __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
524 : __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
525 : __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
526 : __STRING2_COPY_ARR8 __src8, size_t __srclen)
527 : {
528 : union {
529 : char __c;
530 : __STRING2_COPY_ARR2 __sca2;
531 : __STRING2_COPY_ARR3 __sca3;
532 : __STRING2_COPY_ARR4 __sca4;
533 : __STRING2_COPY_ARR5 __sca5;
534 : __STRING2_COPY_ARR6 __sca6;
535 : __STRING2_COPY_ARR7 __sca7;
536 : __STRING2_COPY_ARR8 __sca8;
537 : } *__u = (void *) __dest;
538 : switch ((unsigned int) __srclen)
539 : {
540 : case 1:
541 : __u->__c = '\0';
542 : break;
543 : case 2:
544 : __extension__ __u->__sca2 = __src2;
545 : break;
546 : case 3:
547 : __extension__ __u->__sca3 = __src3;
548 : break;
549 : case 4:
550 : __extension__ __u->__sca4 = __src4;
551 : break;
552 : case 5:
553 : __extension__ __u->__sca5 = __src5;
554 : break;
555 : case 6:
556 : __extension__ __u->__sca6 = __src6;
557 : break;
558 : case 7:
559 : __extension__ __u->__sca7 = __src7;
560 : break;
561 : case 8:
562 : __extension__ __u->__sca8 = __src8;
563 : break;
564 : }
565 : return __dest;
566 : }
567 : # endif
568 : #endif
569 :
570 :
571 : /* Copy SRC to DEST, returning pointer to final NUL byte. */
572 : #ifdef __USE_GNU
573 : # if !defined _HAVE_STRING_ARCH_stpcpy || defined _FORCE_INLINES
574 : # ifndef _HAVE_STRING_ARCH_stpcpy
575 : # if __GNUC_PREREQ (3, 4)
576 : # define __stpcpy(dest, src) __builtin_stpcpy (dest, src)
577 : # elif __GNUC_PREREQ (3, 0)
578 : # define __stpcpy(dest, src) \
579 : (__extension__ (__builtin_constant_p (src) \
580 : ? (__string2_1bptr_p (src) && strlen (src) + 1 <= 8 \
581 : ? __builtin_strcpy (dest, src) + strlen (src) \
582 : : ((char *) (__mempcpy) (dest, src, strlen (src) + 1) \
583 : - 1)) \
584 : : __stpcpy (dest, src)))
585 : # else
586 : # define __stpcpy(dest, src) \
587 : (__extension__ (__builtin_constant_p (src) \
588 : ? (__string2_1bptr_p (src) && strlen (src) + 1 <= 8 \
589 : ? __stpcpy_small (dest, __stpcpy_args (src), \
590 : strlen (src) + 1) \
591 : : ((char *) (__mempcpy) (dest, src, strlen (src) + 1) \
592 : - 1)) \
593 : : __stpcpy (dest, src)))
594 : # endif
595 : /* In glibc we use this function frequently but for namespace reasons
596 : we have to use the name `__stpcpy'. */
597 : # define stpcpy(dest, src) __stpcpy (dest, src)
598 : # endif
599 :
600 : # if !__GNUC_PREREQ (3, 0) || defined _FORCE_INLINES
601 : # if _STRING_ARCH_unaligned
602 : # ifndef _FORCE_INLINES
603 : # define __stpcpy_args(src) \
604 : __extension__ __STRING2_SMALL_GET16 (src, 0), \
605 : __extension__ __STRING2_SMALL_GET16 (src, 4), \
606 : __extension__ __STRING2_SMALL_GET32 (src, 0), \
607 : __extension__ __STRING2_SMALL_GET32 (src, 4)
608 : # endif
609 : __STRING_INLINE char *__stpcpy_small (char *, __uint16_t, __uint16_t,
610 : __uint32_t, __uint32_t, size_t);
611 : __STRING_INLINE char *
612 : __stpcpy_small (char *__dest,
613 : __uint16_t __src0_2, __uint16_t __src4_2,
614 : __uint32_t __src0_4, __uint32_t __src4_4,
615 : size_t __srclen)
616 : {
617 : union {
618 : unsigned int __ui;
619 : unsigned short int __usi;
620 : unsigned char __uc;
621 : char __c;
622 : } *__u = (void *) __dest;
623 : switch ((unsigned int) __srclen)
624 : {
625 : case 1:
626 : __u->__uc = '\0';
627 : break;
628 : case 2:
629 : __u->__usi = __src0_2;
630 : __u = __extension__ ((void *) __u + 1);
631 : break;
632 : case 3:
633 : __u->__usi = __src0_2;
634 : __u = __extension__ ((void *) __u + 2);
635 : __u->__uc = '\0';
636 : break;
637 : case 4:
638 : __u->__ui = __src0_4;
639 : __u = __extension__ ((void *) __u + 3);
640 : break;
641 : case 5:
642 : __u->__ui = __src0_4;
643 : __u = __extension__ ((void *) __u + 4);
644 : __u->__uc = '\0';
645 : break;
646 : case 6:
647 : __u->__ui = __src0_4;
648 : __u = __extension__ ((void *) __u + 4);
649 : __u->__usi = __src4_2;
650 : __u = __extension__ ((void *) __u + 1);
651 : break;
652 : case 7:
653 : __u->__ui = __src0_4;
654 : __u = __extension__ ((void *) __u + 4);
655 : __u->__usi = __src4_2;
656 : __u = __extension__ ((void *) __u + 2);
657 : __u->__uc = '\0';
658 : break;
659 : case 8:
660 : __u->__ui = __src0_4;
661 : __u = __extension__ ((void *) __u + 4);
662 : __u->__ui = __src4_4;
663 : __u = __extension__ ((void *) __u + 3);
664 : break;
665 : }
666 : return &__u->__c;
667 : }
668 : # else
669 : # ifndef _FORCE_INLINES
670 : # define __stpcpy_args(src) \
671 : __extension__ ((__STRING2_COPY_ARR2) \
672 : { { ((const char *) (src))[0], '\0' } }), \
673 : __extension__ ((__STRING2_COPY_ARR3) \
674 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
675 : '\0' } }), \
676 : __extension__ ((__STRING2_COPY_ARR4) \
677 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
678 : ((const char *) (src))[2], '\0' } }), \
679 : __extension__ ((__STRING2_COPY_ARR5) \
680 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
681 : ((const char *) (src))[2], ((const char *) (src))[3], \
682 : '\0' } }), \
683 : __extension__ ((__STRING2_COPY_ARR6) \
684 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
685 : ((const char *) (src))[2], ((const char *) (src))[3], \
686 : ((const char *) (src))[4], '\0' } }), \
687 : __extension__ ((__STRING2_COPY_ARR7) \
688 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
689 : ((const char *) (src))[2], ((const char *) (src))[3], \
690 : ((const char *) (src))[4], ((const char *) (src))[5], \
691 : '\0' } }), \
692 : __extension__ ((__STRING2_COPY_ARR8) \
693 : { { ((const char *) (src))[0], ((const char *) (src))[1], \
694 : ((const char *) (src))[2], ((const char *) (src))[3], \
695 : ((const char *) (src))[4], ((const char *) (src))[5], \
696 : ((const char *) (src))[6], '\0' } })
697 : # endif
698 : __STRING_INLINE char *__stpcpy_small (char *, __STRING2_COPY_ARR2,
699 : __STRING2_COPY_ARR3,
700 : __STRING2_COPY_ARR4,
701 : __STRING2_COPY_ARR5,
702 : __STRING2_COPY_ARR6,
703 : __STRING2_COPY_ARR7,
704 : __STRING2_COPY_ARR8, size_t);
705 : __STRING_INLINE char *
706 : __stpcpy_small (char *__dest,
707 : __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
708 : __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
709 : __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
710 : __STRING2_COPY_ARR8 __src8, size_t __srclen)
711 : {
712 : union {
713 : char __c;
714 : __STRING2_COPY_ARR2 __sca2;
715 : __STRING2_COPY_ARR3 __sca3;
716 : __STRING2_COPY_ARR4 __sca4;
717 : __STRING2_COPY_ARR5 __sca5;
718 : __STRING2_COPY_ARR6 __sca6;
719 : __STRING2_COPY_ARR7 __sca7;
720 : __STRING2_COPY_ARR8 __sca8;
721 : } *__u = (void *) __dest;
722 : switch ((unsigned int) __srclen)
723 : {
724 : case 1:
725 : __u->__c = '\0';
726 : break;
727 : case 2:
728 : __extension__ __u->__sca2 = __src2;
729 : break;
730 : case 3:
731 : __extension__ __u->__sca3 = __src3;
732 : break;
733 : case 4:
734 : __extension__ __u->__sca4 = __src4;
735 : break;
736 : case 5:
737 : __extension__ __u->__sca5 = __src5;
738 : break;
739 : case 6:
740 : __extension__ __u->__sca6 = __src6;
741 : break;
742 : case 7:
743 : __extension__ __u->__sca7 = __src7;
744 : break;
745 : case 8:
746 : __extension__ __u->__sca8 = __src8;
747 : break;
748 : }
749 : return __dest + __srclen - 1;
750 : }
751 : # endif
752 : # endif
753 : # endif
754 : #endif
755 :
756 :
757 : /* Copy no more than N characters of SRC to DEST. */
758 : #ifndef _HAVE_STRING_ARCH_strncpy
759 : # if __GNUC_PREREQ (3, 2)
760 : # define strncpy(dest, src, n) __builtin_strncpy (dest, src, n)
761 : # else
762 : # define strncpy(dest, src, n) \
763 : (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \
764 : ? (strlen (src) + 1 >= ((size_t) (n)) \
765 : ? (char *) memcpy (dest, src, n) \
766 : : strncpy (dest, src, n)) \
767 : : strncpy (dest, src, n)))
768 : # endif
769 : #endif
770 :
771 :
772 : /* Append no more than N characters from SRC onto DEST. */
773 : #ifndef _HAVE_STRING_ARCH_strncat
774 : # ifdef _USE_STRING_ARCH_strchr
775 : # define strncat(dest, src, n) \
776 : (__extension__ ({ char *__dest = (dest); \
777 : __builtin_constant_p (src) && __builtin_constant_p (n) \
778 : ? (strlen (src) < ((size_t) (n)) \
779 : ? strcat (__dest, src) \
780 : : (*((char *) __mempcpy (strchr (__dest, '\0'), \
781 : src, n)) = '\0', __dest)) \
782 : : strncat (dest, src, n); }))
783 : # elif __GNUC_PREREQ (3, 2)
784 : # define strncat(dest, src, n) __builtin_strncat (dest, src, n)
785 : # else
786 : # define strncat(dest, src, n) \
787 : (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \
788 : ? (strlen (src) < ((size_t) (n)) \
789 : ? strcat (dest, src) \
790 : : strncat (dest, src, n)) \
791 : : strncat (dest, src, n)))
792 : # endif
793 : #endif
794 :
795 :
796 : /* Compare characters of S1 and S2. */
797 : #ifndef _HAVE_STRING_ARCH_strcmp
798 : # if __GNUC_PREREQ (3, 2)
799 : # define strcmp(s1, s2) \
800 : __extension__ \
801 : ({ size_t __s1_len, __s2_len; \
802 : (__builtin_constant_p (s1) && __builtin_constant_p (s2) \
803 : && (__s1_len = __builtin_strlen (s1), __s2_len = __builtin_strlen (s2), \
804 : (!__string2_1bptr_p (s1) || __s1_len >= 4) \
805 : && (!__string2_1bptr_p (s2) || __s2_len >= 4)) \
806 : ? __builtin_strcmp (s1, s2) \
807 : : (__builtin_constant_p (s1) && __string2_1bptr_p (s1) \
808 : && (__s1_len = __builtin_strlen (s1), __s1_len < 4) \
809 : ? (__builtin_constant_p (s2) && __string2_1bptr_p (s2) \
810 : ? __builtin_strcmp (s1, s2) \
811 : : __strcmp_cg (s1, s2, __s1_len)) \
812 : : (__builtin_constant_p (s2) && __string2_1bptr_p (s2) \
813 : && (__s2_len = __builtin_strlen (s2), __s2_len < 4) \
814 : ? (__builtin_constant_p (s1) && __string2_1bptr_p (s1) \
815 : ? __builtin_strcmp (s1, s2) \
816 : : __strcmp_gc (s1, s2, __s2_len)) \
817 : : __builtin_strcmp (s1, s2)))); })
818 : # else
819 : # define strcmp(s1, s2) \
820 : __extension__ \
821 : ({ size_t __s1_len, __s2_len; \
822 : (__builtin_constant_p (s1) && __builtin_constant_p (s2) \
823 : && (__s1_len = strlen (s1), __s2_len = strlen (s2), \
824 : (!__string2_1bptr_p (s1) || __s1_len >= 4) \
825 : && (!__string2_1bptr_p (s2) || __s2_len >= 4)) \
826 : ? memcmp ((const char *) (s1), (const char *) (s2), \
827 : (__s1_len < __s2_len ? __s1_len : __s2_len) + 1) \
828 : : (__builtin_constant_p (s1) && __string2_1bptr_p (s1) \
829 : && (__s1_len = strlen (s1), __s1_len < 4) \
830 : ? (__builtin_constant_p (s2) && __string2_1bptr_p (s2) \
831 : ? __strcmp_cc (s1, s2, __s1_len) \
832 : : __strcmp_cg (s1, s2, __s1_len)) \
833 : : (__builtin_constant_p (s2) && __string2_1bptr_p (s2) \
834 : && (__s2_len = strlen (s2), __s2_len < 4) \
835 : ? (__builtin_constant_p (s1) && __string2_1bptr_p (s1) \
836 : ? __strcmp_cc (s1, s2, __s2_len) \
837 : : __strcmp_gc (s1, s2, __s2_len)) \
838 : : strcmp (s1, s2)))); })
839 : # endif
840 :
841 : # define __strcmp_cc(s1, s2, l) \
842 : (__extension__ ({ int __result = \
843 : (((const unsigned char *) (const char *) (s1))[0] \
844 : - ((const unsigned char *) (const char *)(s2))[0]); \
845 : if (l > 0 && __result == 0) \
846 : { \
847 : __result = (((const unsigned char *) \
848 : (const char *) (s1))[1] \
849 : - ((const unsigned char *) \
850 : (const char *) (s2))[1]); \
851 : if (l > 1 && __result == 0) \
852 : { \
853 : __result = \
854 : (((const unsigned char *) \
855 : (const char *) (s1))[2] \
856 : - ((const unsigned char *) \
857 : (const char *) (s2))[2]); \
858 : if (l > 2 && __result == 0) \
859 : __result = \
860 : (((const unsigned char *) \
861 : (const char *) (s1))[3] \
862 : - ((const unsigned char *) \
863 : (const char *) (s2))[3]); \
864 : } \
865 : } \
866 : __result; }))
867 :
868 : # define __strcmp_cg(s1, s2, l1) \
869 : (__extension__ ({ const unsigned char *__s2 = \
870 : (const unsigned char *) (const char *) (s2); \
871 : int __result = \
872 : (((const unsigned char *) (const char *) (s1))[0] \
873 : - __s2[0]); \
874 : if (l1 > 0 && __result == 0) \
875 : { \
876 : __result = (((const unsigned char *) \
877 : (const char *) (s1))[1] - __s2[1]); \
878 : if (l1 > 1 && __result == 0) \
879 : { \
880 : __result = (((const unsigned char *) \
881 : (const char *) (s1))[2] - __s2[2]); \
882 : if (l1 > 2 && __result == 0) \
883 : __result = (((const unsigned char *) \
884 : (const char *) (s1))[3] \
885 : - __s2[3]); \
886 : } \
887 : } \
888 : __result; }))
889 :
890 : # define __strcmp_gc(s1, s2, l2) (- __strcmp_cg (s2, s1, l2))
891 : #endif
892 :
893 :
894 : /* Compare N characters of S1 and S2. */
895 : #ifndef _HAVE_STRING_ARCH_strncmp
896 : # define strncmp(s1, s2, n) \
897 : (__extension__ (__builtin_constant_p (n) \
898 : && ((__builtin_constant_p (s1) \
899 : && strlen (s1) < ((size_t) (n))) \
900 : || (__builtin_constant_p (s2) \
901 : && strlen (s2) < ((size_t) (n)))) \
902 : ? strcmp (s1, s2) : strncmp (s1, s2, n)))
903 : #endif
904 :
905 :
906 : /* Return the length of the initial segment of S which
907 : consists entirely of characters not in REJECT. */
908 : #if !defined _HAVE_STRING_ARCH_strcspn || defined _FORCE_INLINES
909 : # ifndef _HAVE_STRING_ARCH_strcspn
910 : # if __GNUC_PREREQ (3, 2)
911 : # define strcspn(s, reject) \
912 : __extension__ \
913 : ({ char __r0, __r1, __r2; \
914 : (__builtin_constant_p (reject) && __string2_1bptr_p (reject) \
915 : ? ((__builtin_constant_p (s) && __string2_1bptr_p (s)) \
916 : ? __builtin_strcspn (s, reject) \
917 : : ((__r0 = ((const char *) (reject))[0], __r0 == '\0') \
918 : ? strlen (s) \
919 : : ((__r1 = ((const char *) (reject))[1], __r1 == '\0') \
920 : ? __strcspn_c1 (s, __r0) \
921 : : ((__r2 = ((const char *) (reject))[2], __r2 == '\0') \
922 : ? __strcspn_c2 (s, __r0, __r1) \
923 : : (((const char *) (reject))[3] == '\0' \
924 : ? __strcspn_c3 (s, __r0, __r1, __r2) \
925 : : __builtin_strcspn (s, reject)))))) \
926 : : __builtin_strcspn (s, reject)); })
927 : # else
928 : # define strcspn(s, reject) \
929 : __extension__ \
930 : ({ char __r0, __r1, __r2; \
931 : (__builtin_constant_p (reject) && __string2_1bptr_p (reject) \
932 : ? ((__r0 = ((const char *) (reject))[0], __r0 == '\0') \
933 : ? strlen (s) \
934 : : ((__r1 = ((const char *) (reject))[1], __r1 == '\0') \
935 : ? __strcspn_c1 (s, __r0) \
936 : : ((__r2 = ((const char *) (reject))[2], __r2 == '\0') \
937 : ? __strcspn_c2 (s, __r0, __r1) \
938 : : (((const char *) (reject))[3] == '\0' \
939 : ? __strcspn_c3 (s, __r0, __r1, __r2) \
940 : : strcspn (s, reject))))) \
941 : : strcspn (s, reject)); })
942 : # endif
943 : # endif
944 :
945 : __STRING_INLINE size_t __strcspn_c1 (const char *__s, int __reject);
946 : __STRING_INLINE size_t
947 : __strcspn_c1 (const char *__s, int __reject)
948 : {
949 : size_t __result = 0;
950 0 : while (__s[__result] != '\0' && __s[__result] != __reject)
951 0 : ++__result;
952 : return __result;
953 : }
954 :
955 : __STRING_INLINE size_t __strcspn_c2 (const char *__s, int __reject1,
956 : int __reject2);
957 : __STRING_INLINE size_t
958 : __strcspn_c2 (const char *__s, int __reject1, int __reject2)
959 : {
960 : size_t __result = 0;
961 : while (__s[__result] != '\0' && __s[__result] != __reject1
962 : && __s[__result] != __reject2)
963 : ++__result;
964 : return __result;
965 : }
966 :
967 : __STRING_INLINE size_t __strcspn_c3 (const char *__s, int __reject1,
968 : int __reject2, int __reject3);
969 : __STRING_INLINE size_t
970 : __strcspn_c3 (const char *__s, int __reject1, int __reject2,
971 : int __reject3)
972 : {
973 : size_t __result = 0;
974 : while (__s[__result] != '\0' && __s[__result] != __reject1
975 : && __s[__result] != __reject2 && __s[__result] != __reject3)
976 : ++__result;
977 : return __result;
978 : }
979 : #endif
980 :
981 :
982 : /* Return the length of the initial segment of S which
983 : consists entirely of characters in ACCEPT. */
984 : #if !defined _HAVE_STRING_ARCH_strspn || defined _FORCE_INLINES
985 : # ifndef _HAVE_STRING_ARCH_strspn
986 : # if __GNUC_PREREQ (3, 2)
987 : # define strspn(s, accept) \
988 : __extension__ \
989 : ({ char __a0, __a1, __a2; \
990 : (__builtin_constant_p (accept) && __string2_1bptr_p (accept) \
991 : ? ((__builtin_constant_p (s) && __string2_1bptr_p (s)) \
992 : ? __builtin_strspn (s, accept) \
993 : : ((__a0 = ((const char *) (accept))[0], __a0 == '\0') \
994 : ? ((void) (s), (size_t) 0) \
995 : : ((__a1 = ((const char *) (accept))[1], __a1 == '\0') \
996 : ? __strspn_c1 (s, __a0) \
997 : : ((__a2 = ((const char *) (accept))[2], __a2 == '\0') \
998 : ? __strspn_c2 (s, __a0, __a1) \
999 : : (((const char *) (accept))[3] == '\0' \
1000 : ? __strspn_c3 (s, __a0, __a1, __a2) \
1001 : : __builtin_strspn (s, accept)))))) \
1002 : : __builtin_strspn (s, accept)); })
1003 : # else
1004 : # define strspn(s, accept) \
1005 : __extension__ \
1006 : ({ char __a0, __a1, __a2; \
1007 : (__builtin_constant_p (accept) && __string2_1bptr_p (accept) \
1008 : ? ((__a0 = ((const char *) (accept))[0], __a0 == '\0') \
1009 : ? ((void) (s), (size_t) 0) \
1010 : : ((__a1 = ((const char *) (accept))[1], __a1 == '\0') \
1011 : ? __strspn_c1 (s, __a0) \
1012 : : ((__a2 = ((const char *) (accept))[2], __a2 == '\0') \
1013 : ? __strspn_c2 (s, __a0, __a1) \
1014 : : (((const char *) (accept))[3] == '\0' \
1015 : ? __strspn_c3 (s, __a0, __a1, __a2) \
1016 : : strspn (s, accept))))) \
1017 : : strspn (s, accept)); })
1018 : # endif
1019 : # endif
1020 :
1021 : __STRING_INLINE size_t __strspn_c1 (const char *__s, int __accept);
1022 : __STRING_INLINE size_t
1023 : __strspn_c1 (const char *__s, int __accept)
1024 : {
1025 : size_t __result = 0;
1026 : /* Please note that __accept never can be '\0'. */
1027 : while (__s[__result] == __accept)
1028 : ++__result;
1029 : return __result;
1030 : }
1031 :
1032 : __STRING_INLINE size_t __strspn_c2 (const char *__s, int __accept1,
1033 : int __accept2);
1034 : __STRING_INLINE size_t
1035 : __strspn_c2 (const char *__s, int __accept1, int __accept2)
1036 : {
1037 : size_t __result = 0;
1038 : /* Please note that __accept1 and __accept2 never can be '\0'. */
1039 0 : while (__s[__result] == __accept1 || __s[__result] == __accept2)
1040 0 : ++__result;
1041 : return __result;
1042 : }
1043 :
1044 : __STRING_INLINE size_t __strspn_c3 (const char *__s, int __accept1,
1045 : int __accept2, int __accept3);
1046 : __STRING_INLINE size_t
1047 : __strspn_c3 (const char *__s, int __accept1, int __accept2, int __accept3)
1048 : {
1049 : size_t __result = 0;
1050 : /* Please note that __accept1 to __accept3 never can be '\0'. */
1051 : while (__s[__result] == __accept1 || __s[__result] == __accept2
1052 : || __s[__result] == __accept3)
1053 : ++__result;
1054 : return __result;
1055 : }
1056 : #endif
1057 :
1058 :
1059 : /* Find the first occurrence in S of any character in ACCEPT. */
1060 : #if !defined _HAVE_STRING_ARCH_strpbrk || defined _FORCE_INLINES
1061 : # ifndef _HAVE_STRING_ARCH_strpbrk
1062 : # if __GNUC_PREREQ (3, 2)
1063 : # define strpbrk(s, accept) \
1064 : __extension__ \
1065 : ({ char __a0, __a1, __a2; \
1066 : (__builtin_constant_p (accept) && __string2_1bptr_p (accept) \
1067 : ? ((__builtin_constant_p (s) && __string2_1bptr_p (s)) \
1068 : ? __builtin_strpbrk (s, accept) \
1069 : : ((__a0 = ((const char *) (accept))[0], __a0 == '\0') \
1070 : ? ((void) (s), (char *) NULL) \
1071 : : ((__a1 = ((const char *) (accept))[1], __a1 == '\0') \
1072 : ? __builtin_strchr (s, __a0) \
1073 : : ((__a2 = ((const char *) (accept))[2], __a2 == '\0') \
1074 : ? __strpbrk_c2 (s, __a0, __a1) \
1075 : : (((const char *) (accept))[3] == '\0' \
1076 : ? __strpbrk_c3 (s, __a0, __a1, __a2) \
1077 : : __builtin_strpbrk (s, accept)))))) \
1078 : : __builtin_strpbrk (s, accept)); })
1079 : # else
1080 : # define strpbrk(s, accept) \
1081 : __extension__ \
1082 : ({ char __a0, __a1, __a2; \
1083 : (__builtin_constant_p (accept) && __string2_1bptr_p (accept) \
1084 : ? ((__a0 = ((const char *) (accept))[0], __a0 == '\0') \
1085 : ? ((void) (s), (char *) NULL) \
1086 : : ((__a1 = ((const char *) (accept))[1], __a1 == '\0') \
1087 : ? strchr (s, __a0) \
1088 : : ((__a2 = ((const char *) (accept))[2], __a2 == '\0') \
1089 : ? __strpbrk_c2 (s, __a0, __a1) \
1090 : : (((const char *) (accept))[3] == '\0' \
1091 : ? __strpbrk_c3 (s, __a0, __a1, __a2) \
1092 : : strpbrk (s, accept))))) \
1093 : : strpbrk (s, accept)); })
1094 : # endif
1095 : # endif
1096 :
1097 : __STRING_INLINE char *__strpbrk_c2 (const char *__s, int __accept1,
1098 : int __accept2);
1099 : __STRING_INLINE char *
1100 : __strpbrk_c2 (const char *__s, int __accept1, int __accept2)
1101 : {
1102 : /* Please note that __accept1 and __accept2 never can be '\0'. */
1103 : while (*__s != '\0' && *__s != __accept1 && *__s != __accept2)
1104 : ++__s;
1105 : return *__s == '\0' ? NULL : (char *) (size_t) __s;
1106 : }
1107 :
1108 : __STRING_INLINE char *__strpbrk_c3 (const char *__s, int __accept1,
1109 : int __accept2, int __accept3);
1110 : __STRING_INLINE char *
1111 : __strpbrk_c3 (const char *__s, int __accept1, int __accept2, int __accept3)
1112 : {
1113 : /* Please note that __accept1 to __accept3 never can be '\0'. */
1114 : while (*__s != '\0' && *__s != __accept1 && *__s != __accept2
1115 : && *__s != __accept3)
1116 : ++__s;
1117 : return *__s == '\0' ? NULL : (char *) (size_t) __s;
1118 : }
1119 : #endif
1120 :
1121 :
1122 : /* Find the first occurrence of NEEDLE in HAYSTACK. Newer gcc versions
1123 : do this itself. */
1124 : #if !defined _HAVE_STRING_ARCH_strstr && !__GNUC_PREREQ (2, 97)
1125 : # define strstr(haystack, needle) \
1126 : (__extension__ (__builtin_constant_p (needle) && __string2_1bptr_p (needle) \
1127 : ? (((const char *) (needle))[0] == '\0' \
1128 : ? (char *) (size_t) (haystack) \
1129 : : (((const char *) (needle))[1] == '\0' \
1130 : ? strchr (haystack, \
1131 : ((const char *) (needle))[0]) \
1132 : : strstr (haystack, needle))) \
1133 : : strstr (haystack, needle)))
1134 : #endif
1135 :
1136 :
1137 : #if !defined _HAVE_STRING_ARCH_strtok_r || defined _FORCE_INLINES
1138 : # ifndef _HAVE_STRING_ARCH_strtok_r
1139 : # define __strtok_r(s, sep, nextp) \
1140 : (__extension__ (__builtin_constant_p (sep) && __string2_1bptr_p (sep) \
1141 : && ((const char *) (sep))[0] != '\0' \
1142 : && ((const char *) (sep))[1] == '\0' \
1143 : ? __strtok_r_1c (s, ((const char *) (sep))[0], nextp) \
1144 : : __strtok_r (s, sep, nextp)))
1145 : # endif
1146 :
1147 : __STRING_INLINE char *__strtok_r_1c (char *__s, char __sep, char **__nextp);
1148 : __STRING_INLINE char *
1149 : __strtok_r_1c (char *__s, char __sep, char **__nextp)
1150 : {
1151 : char *__result;
1152 : if (__s == NULL)
1153 : __s = *__nextp;
1154 : while (*__s == __sep)
1155 : ++__s;
1156 : __result = NULL;
1157 : if (*__s != '\0')
1158 : {
1159 : __result = __s++;
1160 : while (*__s != '\0')
1161 : if (*__s++ == __sep)
1162 : {
1163 : __s[-1] = '\0';
1164 : break;
1165 : }
1166 : }
1167 : *__nextp = __s;
1168 : return __result;
1169 : }
1170 : # if defined __USE_POSIX || defined __USE_MISC
1171 : # define strtok_r(s, sep, nextp) __strtok_r (s, sep, nextp)
1172 : # endif
1173 : #endif
1174 :
1175 :
1176 : #if !defined _HAVE_STRING_ARCH_strsep || defined _FORCE_INLINES
1177 : # ifndef _HAVE_STRING_ARCH_strsep
1178 :
1179 : extern char *__strsep_g (char **__stringp, const char *__delim);
1180 : # define __strsep(s, reject) \
1181 : __extension__ \
1182 : ({ char __r0, __r1, __r2; \
1183 : (__builtin_constant_p (reject) && __string2_1bptr_p (reject) \
1184 : && (__r0 = ((const char *) (reject))[0], \
1185 : ((const char *) (reject))[0] != '\0') \
1186 : ? ((__r1 = ((const char *) (reject))[1], \
1187 : ((const char *) (reject))[1] == '\0') \
1188 : ? __strsep_1c (s, __r0) \
1189 : : ((__r2 = ((const char *) (reject))[2], __r2 == '\0') \
1190 : ? __strsep_2c (s, __r0, __r1) \
1191 : : (((const char *) (reject))[3] == '\0' \
1192 : ? __strsep_3c (s, __r0, __r1, __r2) \
1193 : : __strsep_g (s, reject)))) \
1194 : : __strsep_g (s, reject)); })
1195 : # endif
1196 :
1197 : __STRING_INLINE char *__strsep_1c (char **__s, char __reject);
1198 : __STRING_INLINE char *
1199 : __strsep_1c (char **__s, char __reject)
1200 : {
1201 : char *__retval = *__s;
1202 : if (__retval != NULL && (*__s = strchr (__retval, __reject)) != NULL)
1203 : *(*__s)++ = '\0';
1204 : return __retval;
1205 : }
1206 :
1207 : __STRING_INLINE char *__strsep_2c (char **__s, char __reject1, char __reject2);
1208 : __STRING_INLINE char *
1209 : __strsep_2c (char **__s, char __reject1, char __reject2)
1210 : {
1211 : char *__retval = *__s;
1212 : if (__retval != NULL)
1213 : {
1214 : char *__cp = __retval;
1215 : while (1)
1216 : {
1217 : if (*__cp == '\0')
1218 : {
1219 : __cp = NULL;
1220 : break;
1221 : }
1222 : if (*__cp == __reject1 || *__cp == __reject2)
1223 : {
1224 : *__cp++ = '\0';
1225 : break;
1226 : }
1227 : ++__cp;
1228 : }
1229 : *__s = __cp;
1230 : }
1231 : return __retval;
1232 : }
1233 :
1234 : __STRING_INLINE char *__strsep_3c (char **__s, char __reject1, char __reject2,
1235 : char __reject3);
1236 : __STRING_INLINE char *
1237 : __strsep_3c (char **__s, char __reject1, char __reject2, char __reject3)
1238 : {
1239 : char *__retval = *__s;
1240 : if (__retval != NULL)
1241 : {
1242 : char *__cp = __retval;
1243 : while (1)
1244 : {
1245 : if (*__cp == '\0')
1246 : {
1247 : __cp = NULL;
1248 : break;
1249 : }
1250 : if (*__cp == __reject1 || *__cp == __reject2 || *__cp == __reject3)
1251 : {
1252 : *__cp++ = '\0';
1253 : break;
1254 : }
1255 : ++__cp;
1256 : }
1257 : *__s = __cp;
1258 : }
1259 : return __retval;
1260 : }
1261 : # ifdef __USE_BSD
1262 : # define strsep(s, reject) __strsep (s, reject)
1263 : # endif
1264 : #endif
1265 :
1266 : /* We need the memory allocation functions for inline strdup().
1267 : Referring to stdlib.h (even minimally) is not allowed
1268 : in any of the tight standards compliant modes. */
1269 : #ifdef __USE_MISC
1270 :
1271 : # if !defined _HAVE_STRING_ARCH_strdup || !defined _HAVE_STRING_ARCH_strndup
1272 : # define __need_malloc_and_calloc
1273 : # include <stdlib.h>
1274 : # endif
1275 :
1276 : # ifndef _HAVE_STRING_ARCH_strdup
1277 :
1278 : extern char *__strdup (const char *__string) __THROW __attribute_malloc__;
1279 : # define __strdup(s) \
1280 : (__extension__ (__builtin_constant_p (s) && __string2_1bptr_p (s) \
1281 : ? (((const char *) (s))[0] == '\0' \
1282 : ? (char *) calloc ((size_t) 1, (size_t) 1) \
1283 : : ({ size_t __len = strlen (s) + 1; \
1284 : char *__retval = (char *) malloc (__len); \
1285 : if (__retval != NULL) \
1286 : __retval = (char *) memcpy (__retval, s, __len); \
1287 : __retval; })) \
1288 : : __strdup (s)))
1289 :
1290 : # if defined __USE_SVID || defined __USE_BSD || defined __USE_XOPEN_EXTENDED
1291 : # define strdup(s) __strdup (s)
1292 : # endif
1293 : # endif
1294 :
1295 : # ifndef _HAVE_STRING_ARCH_strndup
1296 :
1297 : extern char *__strndup (const char *__string, size_t __n)
1298 : __THROW __attribute_malloc__;
1299 : # define __strndup(s, n) \
1300 : (__extension__ (__builtin_constant_p (s) && __string2_1bptr_p (s) \
1301 : ? (((const char *) (s))[0] == '\0' \
1302 : ? (char *) calloc ((size_t) 1, (size_t) 1) \
1303 : : ({ size_t __len = strlen (s) + 1; \
1304 : size_t __n = (n); \
1305 : char *__retval; \
1306 : if (__n < __len) \
1307 : __len = __n + 1; \
1308 : __retval = (char *) malloc (__len); \
1309 : if (__retval != NULL) \
1310 : { \
1311 : __retval[__len - 1] = '\0'; \
1312 : __retval = (char *) memcpy (__retval, s, \
1313 : __len - 1); \
1314 : } \
1315 : __retval; })) \
1316 : : __strndup (s, n)))
1317 :
1318 : # ifdef __USE_GNU
1319 : # define strndup(s, n) __strndup (s, n)
1320 : # endif
1321 : # endif
1322 :
1323 : #endif /* Use misc. or use GNU. */
1324 :
1325 : #ifndef _FORCE_INLINES
1326 : # undef __STRING_INLINE
1327 : #endif
1328 :
1329 : #endif /* No string inlines. */
|
