aboutsummaryrefslogtreecommitdiff
path: root/string
diff options
context:
space:
mode:
authorUlrich Drepper <drepper@redhat.com>1997-09-16 00:42:43 +0000
committerUlrich Drepper <drepper@redhat.com>1997-09-16 00:42:43 +0000
commit61eb22d3a8e9bb9c339bdbe907a85656823f4c7e (patch)
treef0cc84f2036c52f081839b17a4608fb2277b2178 /string
parent4a9332b3765e77fecb06d7135e2fefa3d7d28806 (diff)
downloadglibc-61eb22d3a8e9bb9c339bdbe907a85656823f4c7e.tar
glibc-61eb22d3a8e9bb9c339bdbe907a85656823f4c7e.tar.gz
glibc-61eb22d3a8e9bb9c339bdbe907a85656823f4c7e.tar.bz2
glibc-61eb22d3a8e9bb9c339bdbe907a85656823f4c7e.zip
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/Makefile4
-rw-r--r--string/bits/string2.h416
-rw-r--r--string/noinl-tester.c4
-rw-r--r--string/string.h15
-rw-r--r--string/tester.c64
5 files changed, 385 insertions, 118 deletions
diff --git a/string/Makefile b/string/Makefile
index 8596bc1b24..dbc41be0be 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 b943fe9aa0..b0e9cdcb8a 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 0000000000..2e994f73f9
--- /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 560638be8e..e95d7cac96 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 dfb1258864..ee36e12a6d 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";