diff options
author | Ulrich Drepper <drepper@redhat.com> | 1997-09-16 00:42:43 +0000 |
---|---|---|
committer | Ulrich Drepper <drepper@redhat.com> | 1997-09-16 00:42:43 +0000 |
commit | 61eb22d3a8e9bb9c339bdbe907a85656823f4c7e (patch) | |
tree | f0cc84f2036c52f081839b17a4608fb2277b2178 /string | |
parent | 4a9332b3765e77fecb06d7135e2fefa3d7d28806 (diff) | |
download | glibc-61eb22d3a8e9bb9c339bdbe907a85656823f4c7e.zip glibc-61eb22d3a8e9bb9c339bdbe907a85656823f4c7e.tar.gz glibc-61eb22d3a8e9bb9c339bdbe907a85656823f4c7e.tar.bz2 |
Update.cvs/libc-ud-970915
1997-09-16 02:14 Ulrich Drepper <drepper@cygnus.com>
Implementation of Hesiod NSS module by Mark Kettenis.
* hesiod/Makefile: New file.
* hesiod/hesiod.c: New file.
* hesiod/hesiod.h: New file.
* hesiod/hesiod_p.h: New file.
* hesiod/libnss_hesiod.map: New file.
* hesiod/nss_hesiod/hesiod-grp.c: New file.
* hesiod/nss_hesiod/hesiod-pwd.c: New file.
* hesiod/nss_hesiod/hesiod-service.c: New file.
* sysdeps/unix/inet/Subdirs: Add hesiod.
* shlib-versions: Add version number for libnss_hesiod.
* libio/iolibio.h: Remove definition of _IO_* macros.
* libio/fileops.c: Define close, fstat, lseek, read, and write as
macros to use __ protected versions. Use those functions instead
of _IO_* functions.
* libio/iopopen.c: Define _IO_close to close.
* manual/math.texi: Explain the use of the optimizing inline
functions.
Describe rand_r function and tell about SysV RNGs in introduction.
* resolv/res_send.c (res_send): Use socklen_t type for `fromlen'
variable.
* string/Makefile (tests): Add noinl-tester.
* string/noinl-tester.c: New file.
* string/tester.c: Add more stpcpy tests for constant arguments for
all short lengths.
* string/string.h: Always declare __bzero.
Describe __NO_STRING_INLINES.
Always include <bits/string.h>.
* string/bits/string2.h: Add warning about direct use.
Change __strcpy_small and __stpcpy_small implementation to use
macros and provide alternative for platforms which cannot do
unaligned stores.
* sysdeps/i386/bits/string.h: Don't define anything is
__NO_STRING_INLINES is defined.
* sysdeps/i386/i486/bits/string.h: Change __strcpy_small and
__stpcpy_small implementation to use macros and provide
alternative for platforms which cannot do unaligned stores.
* sysdeps/alpha/bzero.S: Define bzero as weak alias of __bzero.
* sysdeps/generic/bzero.c: Likewise.
* sysdeps/i386/bzero.c: Likewise.
* sysdeps/i386/i586/bzero.S: Likewise.
* sysdeps/vax/bzero.s: Likewise.
* sysdeps/generic/bits/select.h: Don't use ugly casts to access array.
* sysdeps/i386/bits/select.h: Likewise.
* sysdeps/i386/fpu/bits/mathinline.c (__finite): Relax register
constraints a bit.
Don't define and test for _BITS_MATHINLINE_H. Emit warning if used
directly and not through math.h.
* sysdeps/i386/i486/atomicity.h: Change return type of compare_and_swap
to char to get better code. Fix typo.
* sysdeps/stub/atomicity.h: Fix typo.
1997-09-14 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
* sysdeps/generic/stpcpy.c: #undef stpcpy and __stpcpy.
1997-09-14 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
* string/bits/string2.h: Add prototypes to avoid warning.
1997-09-14 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
* string/bits/string2.h (strsep): Fix handling of empty REJECT.
(__strsep_1c): Handle NULL and empty string.
(__strsep_g): Likewise.
1997-09-13 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
* catgets/Makefile (extra-objs): Set this instead of generated.
* md5-crypt/Makefile (extra-objs): Add all object file variants of
onlymd5-entry.
1997-09-12 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
* sysdeps/generic/sysd-stdio.c (__stdio_read): Fix typo in last
change.
1997-09-12 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
* sysdeps/m68k/m68020/atomicity.h: New file.
1997-09-15 05:11 Ulrich Drepper <drepper@cygnus.com>
* posix/Makefile (distribute): Add globtest.c and globtest.sh.
Compile and run globtest if not cross-compiling.
* posix/globtest.c: New file.
* posix/globtest.sh: New file.
* posix/glob.c: Pretty print preprocessor stuff.
(glob_in_dir): If PATTERN is not really a pattern still check
whether it is a real file in the current directory and return
error if not.
Reported by Eugene Mamchits <eugin@ips.ras.ru>.
* libio/fileops.c (_IO_file_sync): Acquire lock before doing the work.
* libio/ioseekoff.c (_IO_seekoff): Likewise.
* libio/ioseekpos.c (_IO_seekpos): Likewise.
1997-09-13 18:06 Ulrich Drepper <drepper@cygnus.com>
* configure.in: Prevent configuration for unsupported platforms.
1997-09-13 04:07 Ulrich Drepper <drepper@cygnus.com>
* elf/rtld.c (dl_main): Make sure we always have a file argument by
testing for < 2 arguments after recognizing the options.
1997-09-12 11:47 Fila Kolodny <fila@ibi.com>
* string/bits/string2.h (__strsep_1c): Cast out const from __retval.
(__strsep_g): Likewise.
Diffstat (limited to 'string')
-rw-r--r-- | string/Makefile | 4 | ||||
-rw-r--r-- | string/bits/string2.h | 416 | ||||
-rw-r--r-- | string/noinl-tester.c | 4 | ||||
-rw-r--r-- | string/string.h | 15 | ||||
-rw-r--r-- | string/tester.c | 64 |
5 files changed, 385 insertions, 118 deletions
diff --git a/string/Makefile b/string/Makefile index 8596bc1..dbc41be 100644 --- a/string/Makefile +++ b/string/Makefile @@ -40,8 +40,8 @@ routines := strcat strchr strcmp strcoll strcpy strcspn \ envz basename \ strcoll_l strxfrm_l -tests := tester inl-tester testcopy test-ffs tst-strlen \ - stratcliff tst-svc +tests := tester inl-tester noinl-tester testcopy test-ffs \ + tst-strlen stratcliff tst-svc distribute := memcopy.h pagecopy.h tst-svc.expect diff --git a/string/bits/string2.h b/string/bits/string2.h index b943fe9..b0e9cdc 100644 --- a/string/bits/string2.h +++ b/string/bits/string2.h @@ -18,8 +18,11 @@ 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 +#ifndef _STRING_H +# error "Never use <bits/string2.h> directly; include <string.h> instead." +#endif + +#ifdef __NO_STRING_INLINES /* Unlike the definitions in the header <bits/string.h> the definitions contained here are not optimizing down to assembler @@ -30,7 +33,7 @@ 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 + <bits/string.h> must be accompanied by a symbol _HAVE_STRING_ARCH_XXX to make sure we don't get redefinitions. We must use here macros instead of inline functions since the @@ -42,55 +45,158 @@ # define __STRING_INLINE extern __inline #endif -/* We need some more types. */ -#include <bits/types.h> +#if _STRING_ARCH_unaligned +/* If we can do unaligned memory accesses we must know the endianess. */ +# include <endian.h> +# include <bits/types.h> + +# if __BYTE_ORDER == __LITTLE_ENDIAN +# define __STRING2_SMALL_GET16(src, idx) \ + (((src)[idx + 1] << 8) | (src)[idx]) +# define __STRING2_SMALL_GET32(src, idx) \ + ((((src)[idx + 3] << 8 | (src)[idx + 2]) << 8 \ + | (src)[idx + 1]) << 8 | (src)[idx]) +# else +# define __STRING2_SMALL_GET16(src, idx) \ + (((src)[idx] << 8) | (src)[idx + 1]) +# define __STRING2_SMALL_GET32(src, idx) \ + ((((src)[idx] << 8 | (src)[idx + 1]) << 8 \ + | (src)[idx + 2]) << 8 | (src)[idx + 3]) +# endif +#else +/* These are a few types we need for the optimizations if we cannot + use unaligned memory accesses. */ +# define __STRING2_COPY_TYPE(N) \ + typedef struct { char __arr[N]; } \ + __STRING2_COPY_ARR##N __attribute__ ((packed)) +__STRING2_COPY_TYPE (2); +__STRING2_COPY_TYPE (3); +__STRING2_COPY_TYPE (4); +__STRING2_COPY_TYPE (5); +__STRING2_COPY_TYPE (6); +__STRING2_COPY_TYPE (7); +__STRING2_COPY_TYPE (8); +# undef __STRING2_COPY_TYPE +#endif + + +/* Set N bytes of S to C. */ +#ifndef _HAVE_STRING_ARCH_memset +# define memset(s, c, n) \ + (__extension__ (__builtin_constant_p (c) && (c) == '\0' \ + ? ({ void *__s = (s); __bzero (__s, n); __s; }) \ + : memset (s, c, n))) +#endif /* Copy SRC to DEST. */ #ifndef _HAVE_STRING_ARCH_strcpy # define strcpy(dest, src) \ (__extension__ (__builtin_constant_p (src) \ - ? (strlen (src) + 1 <= 8 \ + ? (sizeof ((src)[0]) == 1 && 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; -} +# if _STRING_ARCH_unaligned +# define __strcpy_small(dest, src, srclen) \ + (__extension__ ({ char *__retval = (dest); \ + char *__cp = __retval; \ + switch (srclen) \ + { \ + case 1: \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 2: \ + *((__uint16_t *) __cp) = \ + __STRING2_SMALL_GET16 (src, 0); \ + break; \ + case 3: \ + *((__uint16_t *) __cp)++ = \ + __STRING2_SMALL_GET16 (src, 0); \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 4: \ + *((__uint32_t *) __cp) = \ + __STRING2_SMALL_GET32 (src, 0); \ + break; \ + case 5: \ + *((__uint32_t *) __cp)++ = \ + __STRING2_SMALL_GET32 (src, 0); \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 6: \ + *((__uint32_t *) __cp)++ = \ + __STRING2_SMALL_GET32 (src, 0); \ + *((__uint16_t *) __cp) = \ + __STRING2_SMALL_GET16 (src, 4); \ + break; \ + case 7: \ + *((__uint32_t *) __cp)++ = \ + __STRING2_SMALL_GET32 (src, 0); \ + *((__uint16_t *) __cp)++ = \ + __STRING2_SMALL_GET16 (src, 4); \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 8: \ + *((__uint32_t *) __cp)++ = \ + __STRING2_SMALL_GET32 (src, 0); \ + *((__uint32_t *) __cp) = \ + __STRING2_SMALL_GET32 (src, 4); \ + break; \ + } \ + __retval; })) +# else +# define __strcpy_small(dest, src, srclen) \ + (__extension__ ({ char *__cp = (dest); \ + switch (srclen) \ + { \ + case 1: \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 2: \ + *((__STRING2_COPY_ARR2 *) __cp) = \ + ((__STRING2_COPY_ARR2) { { (src)[0], '\0' } }); \ + break; \ + case 3: \ + *((__STRING2_COPY_ARR3 *) __cp) = \ + ((__STRING2_COPY_ARR3) { { (src)[0], (src)[1], \ + '\0' } }); \ + break; \ + case 4: \ + *((__STRING2_COPY_ARR4 *) __cp) = \ + ((__STRING2_COPY_ARR4) { { (src)[0], (src)[1], \ + (src)[2], '\0' } }); \ + break; \ + case 5: \ + *((__STRING2_COPY_ARR5 *) __cp) = \ + ((__STRING2_COPY_ARR5) { { (src)[0], (src)[1], \ + (src)[2], (src)[3], \ + '\0' } }); \ + break; \ + case 6: \ + *((__STRING2_COPY_ARR6 *) __cp) = \ + ((__STRING2_COPY_ARR6) { { (src)[0], (src)[1], \ + (src)[2], (src)[3], \ + (src)[4], '\0' } }); \ + break; \ + case 7: \ + *((__STRING2_COPY_ARR7 *) __cp) = \ + ((__STRING2_COPY_ARR7) { { (src)[0], (src)[1], \ + (src)[2], (src)[3], \ + (src)[4], (src)[5], \ + '\0' } }); \ + break; \ + case 8: \ + *((__STRING2_COPY_ARR8 *) __cp) = \ + ((__STRING2_COPY_ARR8) { { (src)[0], (src)[1], \ + (src)[2], (src)[3], \ + (src)[4], (src)[5], \ + (src)[6], '\0' } }); \ + break; \ + } \ + __cp; })) +# endif #endif @@ -99,7 +205,7 @@ __strcpy_small (char *__dest, __const char *__src, size_t __srclen) # ifndef _HAVE_STRING_ARCH_stpcpy # define __stpcpy(dest, src) \ (__extension__ (__builtin_constant_p (src) \ - ? (strlen (src) + 1 <= 8 \ + ? (sizeof ((src)[0]) == 1 && strlen (src) + 1 <= 8 \ ? __stpcpy_small (dest, src, strlen (src) + 1) \ : ((char *) __mempcpy (dest, src, strlen (src) + 1) - 1))\ : __stpcpy (dest, src))) @@ -107,43 +213,108 @@ __strcpy_small (char *__dest, __const char *__src, size_t __srclen) 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; -} +# if _STRING_ARCH_unaligned +# define __stpcpy_small(dest, src, srclen) \ + (__extension__ ({ char *__cp = (dest); \ + switch (srclen) \ + { \ + case 1: \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 2: \ + *((__uint16_t *) __cp) = \ + __STRING2_SMALL_GET16 (src, 0); \ + ++__cp; \ + break; \ + case 3: \ + *((__uint16_t *) __cp)++ = \ + __STRING2_SMALL_GET16 (src, 0); \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 4: \ + *((__uint32_t *) __cp) = \ + __STRING2_SMALL_GET32 (src, 0); \ + __cp += 3; \ + break; \ + case 5: \ + *((__uint32_t *) __cp)++ = \ + __STRING2_SMALL_GET32 (src, 0); \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 6: \ + *((__uint32_t *) __cp)++ = \ + __STRING2_SMALL_GET32 (src, 0); \ + *((__uint16_t *) __cp) = \ + __STRING2_SMALL_GET16 (src, 4); \ + ++__cp; \ + break; \ + case 7: \ + *((__uint32_t *) __cp)++ = \ + __STRING2_SMALL_GET32 (src, 0); \ + *((__uint16_t *) __cp)++ = \ + __STRING2_SMALL_GET16 (src, 4); \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 8: \ + *((__uint32_t *) __cp)++ = \ + __STRING2_SMALL_GET32 (src, 0); \ + *((__uint32_t *) __cp) = \ + __STRING2_SMALL_GET32 (src, 4); \ + __cp += 3; \ + break; \ + } \ + __cp; })) +# else +# define __stpcpy_small(dest, src, srclen) \ + (__extension__ ({ char *__cp = (dest); \ + switch (srclen) \ + { \ + case 1: \ + *((unsigned char *) __cp) = '\0'; \ + break; \ + case 2: \ + *((__STRING2_COPY_ARR2 *) __cp) = \ + ((__STRING2_COPY_ARR2) { { (src)[0], '\0' } }); \ + break; \ + case 3: \ + *((__STRING2_COPY_ARR3 *) __cp) = \ + ((__STRING2_COPY_ARR3) { { (src)[0], (src)[1], \ + '\0' } }); \ + break; \ + case 4: \ + *((__STRING2_COPY_ARR4 *) __cp) = \ + ((__STRING2_COPY_ARR4) { { (src)[0], (src)[1], \ + (src)[2], '\0' } }); \ + break; \ + case 5: \ + *((__STRING2_COPY_ARR5 *) __cp) = \ + ((__STRING2_COPY_ARR5) { { (src)[0], (src)[1], \ + (src)[2], (src)[3], \ + '\0' } }); \ + break; \ + case 6: \ + *((__STRING2_COPY_ARR6 *) __cp) = \ + ((__STRING2_COPY_ARR6) { { (src)[0], (src)[1], \ + (src)[2], (src)[3], \ + (src)[4], '\0' } }); \ + break; \ + case 7: \ + *((__STRING2_COPY_ARR7 *) __cp) = \ + ((__STRING2_COPY_ARR7) { { (src)[0], (src)[1], \ + (src)[2], (src)[3], \ + (src)[4], (src)[5], \ + '\0' } }); \ + break; \ + case 8: \ + *((__STRING2_COPY_ARR8 *) __cp) = \ + ((__STRING2_COPY_ARR8) { { (src)[0], (src)[1], \ + (src)[2], (src)[3], \ + (src)[4], (src)[5], \ + (src)[6], '\0' } }); \ + break; \ + } \ + __cp + ((srclen) - 1); })) +# endif # endif #endif @@ -157,7 +328,7 @@ __stpcpy_small (char *__dest, __const char *__src, size_t __srclen) ? (char *) memcpy (dest, src, n) \ : (memset (__mempcpy (dest, src, strlen (src)), '\0', \ n - strlen (src)), \ - dest)) \ + (char *) dest)) \ : strncpy (dest, src, n))) # else # define strncpy(dest, src, n) \ @@ -177,7 +348,7 @@ __stpcpy_small (char *__dest, __const char *__src, size_t __srclen) (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \ ? (strlen (src) < ((size_t) (n)) \ ? strcat (dest, src) \ - : (memcpy (strchr (dest, '\0'), src, n), dest)) \ + : (memcpy (strchr (dest, '\0'), src, n), (char *) dest)) \ : strncat (dest, src, n))) # else # define strncat(dest, src, n) \ @@ -205,15 +376,15 @@ __stpcpy_small (char *__dest, __const char *__src, size_t __srclen) 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' \ + (__extension__ (__builtin_constant_p (reject) && sizeof ((reject)[0]) == 1 \ + ? ((reject)[0] == '\0' \ ? strlen (s) \ - : (((const char *) (reject))[1] == '\0' \ - ? __strcspn_c1 (s, ((((const char *) (reject))[0] \ - & 0xff) << 8)) \ - : strcspn (s, reject))) \ + : ((reject)[1] == '\0' \ + ? __strcspn_c1 (s, (reject)[0]) \ + : strcspn (s, reject))) \ : strcspn (s, reject))) +__STRING_INLINE size_t __strcspn_c1 (__const char *__s, char __reject); __STRING_INLINE size_t __strcspn_c1 (__const char *__s, char __reject) { @@ -229,14 +400,15 @@ __strcspn_c1 (__const char *__s, char __reject) 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' \ + (__extension__ (__builtin_constant_p (accept) && sizeof ((accept)[0]) == 1 \ + ? ((accept)[0] == '\0' \ ? 0 \ - : (((const char *) (accept))[1] == '\0' \ - ? __strspn_c1 (s, ((const char *) (accept))[0]) \ + : ((accept)[1] == '\0' \ + ? __strspn_c1 (s, (accept)[0]) \ : strspn (s, accept))) \ : strspn (s, accept))) +__STRING_INLINE size_t __strspn_c1 (__const char *__s, char __accept); __STRING_INLINE size_t __strspn_c1 (__const char *__s, char __accept) { @@ -252,11 +424,11 @@ __strspn_c1 (__const char *__s, char __accept) /* 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' \ + (__extension__ (__builtin_constant_p (accept) && sizeof ((accept)[0]) == 1 \ + ? ((accept)[0] == '\0' \ ? NULL \ - : (((const char *) (accept))[1] == '\0' \ - ? strchr (s, ((const char *) (accept))[0]) \ + : ((accept)[1] == '\0' \ + ? strchr (s, (accept)[0]) \ : strpbrk (s, accept))) \ : strpbrk (s, accept))) #endif @@ -265,11 +437,11 @@ __strspn_c1 (__const char *__s, char __accept) /* 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' \ + (__extension__ (__builtin_constant_p (needle) && sizeof ((needle)[0]) == 1 \ + ? ((needle)[0] == '\0' \ ? haystack \ - : (((const char *) (needle))[1] == '\0' \ - ? strchr (haystack, ((const char *) (needle))[0]) \ + : ((needle)[1] == '\0' \ + ? strchr (haystack, (needle)[0]) \ : strstr (haystack, needle))) \ : strstr (haystack, needle))) #endif @@ -277,7 +449,8 @@ __strspn_c1 (__const char *__s, char __accept) #ifdef __USE_GNU # ifndef _HAVE_STRING_ARCH_strnlen -extern __inline size_t +__STRING_INLINE size_t strnlen (__const char *__string, size_t __maxlen); +__STRING_INLINE size_t strnlen (__const char *__string, size_t __maxlen) { __const char *__end = (__const char *) memchr (__string, '\0', __maxlen); @@ -287,6 +460,45 @@ strnlen (__const char *__string, size_t __maxlen) #endif +#ifdef __USE_BSD +# ifndef _HAVE_STRING_ARCH_strsep + +# define strsep(s, reject) \ + (__extension__ (__builtin_constant_p (reject) && sizeof ((reject)[0]) == 1 \ + ? ((reject)[0] != '\0' && (reject)[1] == '\0' \ + ? __strsep_1c (s, (reject)[0]) \ + : __strsep_g (s, reject)) \ + : __strsep_g (s, reject))) + +__STRING_INLINE char *__strsep_1c (char **__s, char __reject); +__STRING_INLINE char * +__strsep_1c (char **__s, char __reject) +{ + register __const char *__retval = *__s; + if (__retval == NULL || *__retval == '\0') + return NULL; + while (*__retval == __reject) + ++__retval; + if ((*__s = strchr (__retval, __reject)) != NULL) + *(*__s)++ = '\0'; + return (char *) __retval; +} + +__STRING_INLINE char *__strsep_g (char **__s, __const char *__reject); +__STRING_INLINE char * +__strsep_g (char **__s, __const char *__reject) +{ + register __const char *__retval = *__s; + if (__retval == NULL || *__retval == '\0') + return NULL; + if ((*__s = strpbrk (__retval, __reject)) != NULL) + *(*__s)++ = '\0'; + return (char *) __retval; +} +# endif +#endif + + #undef __STRING_INLINE -#endif /* bits/string2.h */ +#endif /* No string inlines. */ diff --git a/string/noinl-tester.c b/string/noinl-tester.c new file mode 100644 index 0000000..2e994f7 --- /dev/null +++ b/string/noinl-tester.c @@ -0,0 +1,4 @@ +/* We don't want to test any of the inline functions here. */ + +#define __NO_STRING_INLINES 1 +#include "tester.c" diff --git a/string/string.h b/string/string.h index 560638b..e95d7ca 100644 --- a/string/string.h +++ b/string/string.h @@ -200,12 +200,15 @@ extern char *__strerror_r __P ((int __errnum, char *__buf, size_t __buflen)); extern char *strerror_r __P ((int __errnum, char *__buf, size_t __buflen)); #endif +/* We define this function always since `bzero' is sometimes needed when + the namespace rules does not allow this. */ +extern void __bzero __P ((__ptr_t __s, size_t __n)); + #if defined __USE_BSD || defined __USE_XOPEN_EXTENDED /* Copy N bytes of SRC to DEST (like memmove, but args reversed). */ extern void bcopy __P ((__const __ptr_t __src, __ptr_t __dest, size_t __n)); /* Set N bytes of S to 0. */ -extern void __bzero __P ((__ptr_t __s, size_t __n)); extern void bzero __P ((__ptr_t __s, size_t __n)); /* Compare N bytes of S1 and S2 (same as memcmp). */ @@ -296,12 +299,12 @@ extern char *basename __P ((__const char *__filename)); code size significantly and which optimize mainly situations where one or more arguments are compile-time constants. These optimizations are used always when the compiler is - taught to optimized. */ + taught to optimized. -/* Get the machine-dependent optimizations if wanted. */ -# ifdef __USE_STRING_INLINES -# include <bits/string.h> -# endif + One can inhibit all optimizations by defining __NO_STRING_INLINES. */ + +/* Get the machine-dependent optimizations (if any). */ +# include <bits/string.h> /* These are generic optimizations which do not add too much inline code. */ # include <bits/string2.h> diff --git a/string/tester.c b/string/tester.c index dfb1258..ee36e12 100644 --- a/string/tester.c +++ b/string/tester.c @@ -135,16 +135,64 @@ main (void) /* A closely related function is stpcpy. */ it = "stpcpy"; - check ((stpcpy (one, "abcde") - one) == 5, 1); - equal (one, "abcde", 2); + check ((stpcpy (one, "a") - one) == 1, 1); + equal (one, "a", 2); - check ((stpcpy (one, "x") - one) == 1, 3); - equal (one, "x", 4); /* Writeover. */ - equal (one+2, "cde", 5); /* Wrote too much? */ + check ((stpcpy (one, "ab") - one) == 2, 3); + equal (one, "ab", 4); - check ((stpcpy (stpcpy (stpcpy (one, "a"), "b"), "c") - one) == 3, 6); - equal (one, "abc", 7); - equal (one + 4, "e", 8); + check ((stpcpy (one, "abc") - one) == 3, 5); + equal (one, "abc", 6); + + check ((stpcpy (one, "abcd") - one) == 4, 7); + equal (one, "abcd", 8); + + check ((stpcpy (one, "abcde") - one) == 5, 9); + equal (one, "abcde", 10); + + check ((stpcpy (one, "abcdef") - one) == 6, 11); + equal (one, "abcdef", 12); + + check ((stpcpy (one, "abcdefg") - one) == 7, 13); + equal (one, "abcdefg", 14); + + check ((stpcpy (one, "abcdefgh") - one) == 8, 15); + equal (one, "abcdefgh", 16); + + check ((stpcpy (one, "abcdefghi") - one) == 9, 17); + equal (one, "abcdefghi", 18); + + check ((stpcpy (one, "x") - one) == 1, 19); + equal (one, "x", 20); /* Writeover. */ + equal (one+2, "cdefghi", 21); /* Wrote too much? */ + + check ((stpcpy (one, "xx") - one) == 2, 22); + equal (one, "xx", 23); /* Writeover. */ + equal (one+3, "defghi", 24); /* Wrote too much? */ + + check ((stpcpy (one, "xxx") - one) == 3, 25); + equal (one, "xxx", 26); /* Writeover. */ + equal (one+4, "efghi", 27); /* Wrote too much? */ + + check ((stpcpy (one, "xxxx") - one) == 4, 28); + equal (one, "xxxx", 29); /* Writeover. */ + equal (one+5, "fghi", 30); /* Wrote too much? */ + + check ((stpcpy (one, "xxxxx") - one) == 5, 31); + equal (one, "xxxxx", 32); /* Writeover. */ + equal (one+6, "ghi", 33); /* Wrote too much? */ + + check ((stpcpy (one, "xxxxxx") - one) == 6, 34); + equal (one, "xxxxxx", 35); /* Writeover. */ + equal (one+7, "hi", 36); /* Wrote too much? */ + + check ((stpcpy (one, "xxxxxxx") - one) == 7, 37); + equal (one, "xxxxxxx", 38); /* Writeover. */ + equal (one+8, "i", 39); /* Wrote too much? */ + + check ((stpcpy (stpcpy (stpcpy (one, "a"), "b"), "c") - one) == 3, 40); + equal (one, "abc", 41); + equal (one + 4, "xxx", 42); /* stpncpy. */ it = "stpncpy"; |