diff options
Diffstat (limited to 'string/bits')
-rw-r--r-- | string/bits/string2.h | 292 |
1 files changed, 292 insertions, 0 deletions
diff --git a/string/bits/string2.h b/string/bits/string2.h new file mode 100644 index 0000000..b943fe9 --- /dev/null +++ b/string/bits/string2.h @@ -0,0 +1,292 @@ +/* Machine-independant string function optimizations. + Copyright (C) 1997 Free Software Foundation, Inc. + This file is part of the GNU C Library. + Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Library General Public License as + published by the Free Software Foundation; either version 2 of the + License, or (at your option) any later version. + + The GNU C Library is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + Library General Public License for more details. + + You should have received a copy of the GNU Library General Public + License along with the GNU C Library; see the file COPYING.LIB. If not, + write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, + Boston, MA 02111-1307, USA. */ + +#ifndef _BITS_STRING2_H +#define _BITS_STRING2_H 1 + +/* Unlike the definitions in the header <bits/string.h> the + definitions contained here are not optimizing down to assembler + level. These optimizations are not always a good idea since this + means the code size increases a lot. Instead the definitions here + optimize some functions in a way which does not dramatically + increase the code size and which does not use assembler. The main + trick is to use GNU CC's `__builtin_constant_p' function. + + Every function XXX which has a defined version in + <bits/string.h> must be accompanied by a have _HAVE_STRING_ARCH_XXX + to make sure we don't get redefinitions. + + We must use here macros instead of inline functions since the + trick won't work with the later. */ + +#ifdef __cplusplus +# define __STRING_INLINE inline +#else +# define __STRING_INLINE extern __inline +#endif + +/* We need some more types. */ +#include <bits/types.h> + + +/* Copy SRC to DEST. */ +#ifndef _HAVE_STRING_ARCH_strcpy +# define strcpy(dest, src) \ + (__extension__ (__builtin_constant_p (src) \ + ? (strlen (src) + 1 <= 8 \ + ? __strcpy_small (dest, src, strlen (src) + 1) \ + : (char *) memcpy (dest, src, strlen (src) + 1)) \ + : strcpy (dest, src))) + +__STRING_INLINE char * +__strcpy_small (char *__dest, __const char *__src, size_t __srclen) +{ + register char *__tmp = __dest; + switch (__srclen) + { + case 7: + *((__uint16_t *) __tmp)++ = *((__uint16_t *) __src)++; + case 5: + *((__uint32_t *) __tmp)++ = *((__uint32_t *) __src)++; + *((unsigned char *) __tmp) = '\0'; + break; + + case 8: + *((__uint32_t *) __tmp)++ = *((__uint32_t *) __src)++; + case 4: + *((__uint32_t *) __tmp) = *((__uint32_t *) __src); + break; + + case 6: + *((__uint32_t *) __tmp)++ = *((__uint32_t *) __src)++; + case 2: + *((__uint16_t *) __tmp) = *((__uint16_t *) __src); + break; + + case 3: + *((__uint16_t *) __tmp)++ = *((__uint16_t *) __src)++; + case 1: + *((unsigned char *) __tmp) = '\0'; + break; + + default: + break; + } + return __dest; +} +#endif + + +/* Copy SRC to DEST, returning pointer to final NUL byte. */ +#ifdef __USE_GNU +# ifndef _HAVE_STRING_ARCH_stpcpy +# define __stpcpy(dest, src) \ + (__extension__ (__builtin_constant_p (src) \ + ? (strlen (src) + 1 <= 8 \ + ? __stpcpy_small (dest, src, strlen (src) + 1) \ + : ((char *) __mempcpy (dest, src, strlen (src) + 1) - 1))\ + : __stpcpy (dest, src))) +/* In glibc we use this function frequently but for namespace reasons + we have to use the name `__stpcpy'. */ +# define stpcpy(dest, src) __stpcpy (dest, src) + +__STRING_INLINE char * +__stpcpy_small (char *__dest, __const char *__src, size_t __srclen) +{ + register char *__tmp = __dest; + switch (__srclen) + { + case 7: + *((__uint16_t *) __tmp)++ = *((__uint16_t *) __src)++; + case 5: + *((__uint32_t *) __tmp)++ = *((__uint32_t *) __src)++; + *((unsigned char *) __tmp) = '\0'; + return __tmp; + + case 8: + *((__uint32_t *) __tmp)++ = *((__uint32_t *) __src)++; + case 4: + *((__uint32_t *) __tmp) = *((__uint32_t *) __src); + return __tmp + 3; + + case 6: + *((__uint32_t *) __tmp)++ = *((__uint32_t *) __src)++; + case 2: + *((__uint16_t *) __tmp) = *((__uint16_t *) __src); + return __tmp + 1; + + case 3: + *((__uint16_t *) __tmp)++ = *((__uint16_t *) __src)++; + case 1: + *((unsigned char *) __tmp) = '\0'; + return __tmp; + + default: + break; + } + /* This should never happen. */ + return NULL; +} +# endif +#endif + + +/* Copy no more than N characters of SRC to DEST. */ +#ifndef _HAVE_STRING_ARCH_strncpy +# if defined _HAVE_STRING_ARCH_memset && defined _HAVE_STRING_ARCH_mempcpy +# define strncpy(dest, src, n) \ + (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \ + ? (strlen (src) + 1 >= ((size_t) (n)) \ + ? (char *) memcpy (dest, src, n) \ + : (memset (__mempcpy (dest, src, strlen (src)), '\0', \ + n - strlen (src)), \ + dest)) \ + : strncpy (dest, src, n))) +# else +# define strncpy(dest, src, n) \ + (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \ + ? (strlen (src) + 1 >= ((size_t) (n)) \ + ? (char *) memcpy (dest, src, n) \ + : strncpy (dest, src, n)) \ + : strncpy (dest, src, n))) +# endif +#endif + + +/* Append no more than N characters from SRC onto DEST. */ +#ifndef _HAVE_STRING_ARCH_strncat +# ifdef _HAVE_STRING_ARCH_strchr +# define strncat(dest, src, n) \ + (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \ + ? (strlen (src) < ((size_t) (n)) \ + ? strcat (dest, src) \ + : (memcpy (strchr (dest, '\0'), src, n), dest)) \ + : strncat (dest, src, n))) +# else +# define strncat(dest, src, n) \ + (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \ + ? (strlen (src) < ((size_t) (n)) \ + ? strcat (dest, src) \ + : strncat (dest, src, n)) \ + : strncat (dest, src, n))) +# endif +#endif + + +/* Compare N characters of S1 and S2. */ +#ifndef _HAVE_STRING_ARCH_strncmp +# define strncmp(s1, s2, n) \ + (__extension__ (__builtin_constant_p (s1) && strlen (s1) < ((size_t) (n)) \ + ? strcmp (s1, s2) \ + : (__builtin_constant_p (s2) && strlen (s2) < ((size_t) (n))\ + ? strcmp (s1, s2) \ + : strncmp (s1, s2, n)))) +#endif + + +/* Return the length of the initial segment of S which + consists entirely of characters not in REJECT. */ +#ifndef _HAVE_STRING_ARCH_strcspn +# define strcspn(s, reject) \ + (__extension__ (__builtin_constant_p (reject) \ + ? (((const char *) (reject))[0] == '\0' \ + ? strlen (s) \ + : (((const char *) (reject))[1] == '\0' \ + ? __strcspn_c1 (s, ((((const char *) (reject))[0] \ + & 0xff) << 8)) \ + : strcspn (s, reject))) \ + : strcspn (s, reject))) + +__STRING_INLINE size_t +__strcspn_c1 (__const char *__s, char __reject) +{ + register size_t __result = 0; + while (__s[__result] != '\0' && __s[__result] != __reject) + ++__result; + return __result; +} +#endif + + +/* Return the length of the initial segment of S which + consists entirely of characters in ACCEPT. */ +#ifndef _HAVE_STRING_ARCH_strspn +# define strspn(s, accept) \ + (__extension__ (__builtin_constant_p (accept) \ + ? (((const char *) (accept))[0] == '\0' \ + ? 0 \ + : (((const char *) (accept))[1] == '\0' \ + ? __strspn_c1 (s, ((const char *) (accept))[0]) \ + : strspn (s, accept))) \ + : strspn (s, accept))) + +__STRING_INLINE size_t +__strspn_c1 (__const char *__s, char __accept) +{ + register size_t __result = 0; + /* Please note that __accept never can be '\0'. */ + while (__s[__result] == __accept) + ++__result; + return __result; +} +#endif + + +/* Find the first occurrence in S of any character in ACCEPT. */ +#ifndef _HAVE_STRING_ARCH_strpbrk +# define strpbrk(s, accept) \ + (__extension__ (__builtin_constant_p (accept) \ + ? (((const char *) (accept))[0] == '\0' \ + ? NULL \ + : (((const char *) (accept))[1] == '\0' \ + ? strchr (s, ((const char *) (accept))[0]) \ + : strpbrk (s, accept))) \ + : strpbrk (s, accept))) +#endif + + +/* Find the first occurrence of NEEDLE in HAYSTACK. */ +#ifndef _HAVE_STRING_ARCH_strstr +# define strstr(haystack, needle) \ + (__extension__ (__builtin_constant_p (needle) \ + ? (((const char *) (needle))[0] == '\0' \ + ? haystack \ + : (((const char *) (needle))[1] == '\0' \ + ? strchr (haystack, ((const char *) (needle))[0]) \ + : strstr (haystack, needle))) \ + : strstr (haystack, needle))) +#endif + + +#ifdef __USE_GNU +# ifndef _HAVE_STRING_ARCH_strnlen +extern __inline size_t +strnlen (__const char *__string, size_t __maxlen) +{ + __const char *__end = (__const char *) memchr (__string, '\0', __maxlen); + return __end ? __end - __string : __maxlen; +} +# endif +#endif + + +#undef __STRING_INLINE + +#endif /* bits/string2.h */ |