mirror of
https://sourceware.org/git/glibc.git
synced 2024-10-02 20:17:45 +00:00
a5a0310d8e
1997-09-30 18:03 Ulrich Drepper <drepper@cygnus.com> * Makerules: Undo last change. * csu/Makefile: Define before-compile at the right place. * aclocal.m4: Remove a.out file created by assembler test. * set-init.c: Find set-hooks.h using <...>. Update to db 2.3.10. * db2/Makefile: Update. * db2/db.h: Likewise. * db2/db_185.h: Likewise. * db2/db_int.h: Likewise. * db2/btree/bt_close.c: Likewise. * db2/btree/bt_conv.c: Likewise. * db2/btree/bt_cursor.c: Likewise. * db2/btree/bt_put.c: Likewise. * db2/btree/bt_rec.c: Likewise. * db2/btree/bt_recno.c: Likewise. * db2/btree/btree.src: Likewise. * db2/btree/btree_auto.c: Likewise. * db2/clib/getlong.c: Likewise. * db2/db/db.c: Likewise. * db2/db/db_auto.c: Likewise. * db2/db/db_conv.c: Likewise. * db2/db/db_pr.c: Likewise. * db2/db/db_ret.c: Likewise. * db2/db/db_thread.c: Likewise. * db2/hash/hash.c: Likewise. * db2/hash/hash_auto.c: Likewise. * db2/hash/hash_conv.c: Likewise. * db2/hash/hash_dup.c: Likewise. * db2/hash/hash_func.c: Likewise. * db2/hash/hash_page.c: Likewise. * db2/hash/hash_rec.c: Likewise. * db2/include/btree.h: Likewise. * db2/include/btree_ext.h: Likewise. * db2/include/db.h.src: Likewise. * db2/include/db_185.h.src: Likewise. * db2/include/db_cxx.h: Likewise. * db2/include/db_ext.h: Likewise. * db2/include/db_int.h.src: Likewise. * db2/include/db_page.h: Likewise. * db2/include/db_shash.h: Likewise. * db2/include/lock.h: Likewise. * db2/include/log.h: Likewise. * db2/include/log_ext.h: Likewise. * db2/include/mp.h: Likewise. * db2/include/shqueue.h: Likewise. * db2/include/txn.h: Likewise. * db2/lock/lock.c: Likewise. * db2/lock/lock_deadlock.c: Likewise. * db2/log/log.c: Likewise. * db2/log/log_archive.c: Likewise. * db2/log/log_auto.c: Likewise. * db2/log/log_get.c: Likewise. * db2/log/log_put.c: Likewise. * db2/log/log_register.c: Likewise. * db2/mp/mp_bh.c: Likewise. * db2/mp/mp_fget.c: Likewise. * db2/mp/mp_fopen.c: Likewise. * db2/mp/mp_fput.c: Likewise. * db2/mp/mp_fset.c: Likewise. * db2/mp/mp_open.c: Likewise. * db2/mutex/mutex.c: Likewise. * db2/os/db_os_dir.c: Likewise. * db2/progs/db_checkpoint/db_checkpoint.c: Likewise. * db2/progs/db_deadlock/db_deadlock.c: Likewise. * db2/progs/db_dump185/db_dump185.c: Likewise. * db2/progs/db_load/db_load.c: Likewise. * db2/progs/db_recover/db_recover.c: Likewise. * db2/txn/txn.c: Likewise. * db2/txn/txn_auto.c: Likewise. * elf/link.h: Define struct libname_list outside struct link_map to not confuse C++ compilers. * include/features.h: Recognize _XOPEN_SOURCE == 500 and set __USE_UNIX98. * manual/creature.texi: Explain this. * libc.map: Add new functions. * libio/Makefile (routines): Add fseeko and ftello. * libio/ftello.c: New file. * libio/fseeko.c: New file. * libio/stdio.h: Add prototypes for new functions. * manual/stdio.texi: Document fseeko and ftello. * posix/Makefile (routines): Add pread and pwrite. * sysdeps/posix/pread.c: New file. * sysdeps/posix/pwrite.c: New file. * sysdeps/stub/pread.c: New file. * sysdeps/stub/pwrite.c: New file. * posix/unistd.h: Add prototypes for pread and pwrite. Pretty print header. Define gid_t, uid_t, off_t, pid_t if __USE_UNIX98. Declare ctermid and cuserid if __USE_UNIX98. (swab): Change to take void * arguments. * string/swab.c: Change parameter to void *. * posix/sys/types: Define gid_t, uid_t, off_t, pid_t only if not already happened. * manual/llio.texi: Document pread and pwrite. * string/strings.h: Don't simply include string.h. Define BSD functions according to Unix98. * stdlib/tst-strtol.c: Include <string.h> not <strings.h>. * sunrpc/clnt_simp.c: Likewise. * malloc/Makefile (aux): Add set-freeres. * malloc/mtrace.c: Define function release_libc_mem which calls the __libc_subfreeres handler. (mtrace): Register release_libc_mem. * malloc/set-freeres.c: New file. * intl/dcgettext.c: Define free_mem function and add to __libc_subfreeres list. * intl/finddomain.c: Likewise. * intl/gettextP.h (struct loaded_domain): Add new fields use_mmap and mmap_size. Add prototype for _nl_unloaded_domain. * intl/loadmsgcat.c: Define new function _nl_unload_domain. (_nl_load_domain): Store informaiton about mmap use and file size. * intl/localealias.c (read_alias_file): Optimize locale alias file reading by avoid frequen mallocs. Define free_mem function and add to __libc_subfreeres list. * locale/localeinfo.h: Make a difference between MAX_USAGE_COUNT and undeletable. Add prototype for _nl_unload_locale. * locale/C-collate: Mark data as undeletable by using UNDELETABLE. * locale/C-ctype: Likewise. * locale/C-messages: Likewise. * locale/C-monetary: Likewise. * locale/C-numeric: Likewise. * locale/C-time: Likewise. * locale/findlocale.c (_nl_find_locale, _nl_remove_locale): Handle MAX_USAGE_COUNT and UNDELETABLE. (free_mem): New function. Add it to __libc_subfreeres list. * locale/loadlocale.c: Define _nl_unload_locale function. * misc/hsearch.c: Register hdestroy in __libc_subfreeres list. * stdlib/fmtmsg.c (addseverity): Handle illegal severity arguments correctly Define free_mem function and add to __libc_subfreeres list. * locale/programs/localedef.c (options): short form os verbose is v. Reported by Andreas Jaeger. * misc/sys/select.h: Define pselect only is __USE_POSIX since this header is used in some others as well for historical reasons. * resolv/resolv.h: Include <netinet/in.h> to make self-contained. * string/bits/string2.h: Add missing braces and optimize strcmp a bit more. * sysdeps/i386/i486/bits/string.h: Likewise. * sunrpc/rpc/auth_des.h: Include rpc/auth.h to be self-contained. Pretty print. * sysdeps/mach/hurd/cthreads.c: Add copyright text. * sysdeps/unix/sysv/linux/syscalls.list: Correct prctl entry. * sysdeps/unix/sysv/linux/sys/mman.h: Get definition of size_t. * time/time.h: Pretty print. 1997-09-29 Paul Eggert <eggert@twinsun.com> * time/strftime.c: Synchronize with GNU Emacs strftime.c. (HAVE_MEMCPY): Define if emacs is defined and HAVE_BCOPY isn't. (gmtime_r, localtime_r): Undef before defining. (iso_week_days): Use __inline__, not inline. 1997-09-27 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * sysdeps/m68k/fpu/bits/mathinline.h: Rename exp2{,l,f} to __ieee754_exp2{,l,f}. * sysdeps/m68k/fpu/s_exp2.c: Likewise. * sysdeps/m68k/fpu/s_exp2l.c: Likewise. * sysdeps/m68k/fpu/s_exp2f.c: Likewise. 1997-09-27 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * elf/soinit.c (__EH_FRAME_BEGIN__): Don't make the .eh_frame section read-only, it contains relocations. * elf/sofini.c (__FRAME_END__): Likewise. 1997-09-29 03:08 Ulrich Drepper <drepper@cygnus.com> * sysdeps/i386/i486/bits/string.h [__PIC__] (__strspn_cg, __strcspn_cg, __strpbrk_cg, __strstr_cg): Optimize even more. No spill register needed. Patch by NIIBE Yutaka <gniibe@mri.co.jp>. 1997-09-28 08:27 Thorsten Kukuk <kukuk@vt.uni-paderborn.de> * nis/nis_call.c (__do_niscall2): Fix return code, add missing break in switch case. * nis/nis_mkdir.c: Fix return codes to match Solaris version. * nis/nis_rmdir.c: Likewise. * nis/rpcsvc/yp_prot.h: Rename struct keydat to struct keydat_t for C++. 1997-09-28 04:32 Ulrich Drepper <drepper@cygnus.com> * configure.in: Fix typo. Patch by Zack Weinberg <zack@rabi.phys.columbia.edu>. 1997-09-25 20:14 Philip Blundell <Philip.Blundell@pobox.com> * sysdeps/unix/sysv/linux/scsi/sg.h: New file. * sysdeps/unix/sysv/linux/Makefile: Install <scsi/sg.h>.
579 lines
20 KiB
C
579 lines
20 KiB
C
/* 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 _STRING_H
|
|
# error "Never use <bits/string2.h> directly; include <string.h> instead."
|
|
#endif
|
|
|
|
#ifndef __NO_STRING_INLINES
|
|
|
|
/* 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 symbol _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
|
|
|
|
#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) \
|
|
? (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)))
|
|
|
|
# if _STRING_ARCH_unaligned
|
|
# define __strcpy_small(dest, src, srclen) \
|
|
(__extension__ ({ unsigned char *__dest = (unsigned char *) (dest); \
|
|
switch (srclen) \
|
|
{ \
|
|
case 1: \
|
|
*__dest = '\0'; \
|
|
break; \
|
|
case 2: \
|
|
*((__uint16_t *) __dest) = \
|
|
__STRING2_SMALL_GET16 (src, 0); \
|
|
break; \
|
|
case 3: \
|
|
*((__uint16_t *) __dest) = \
|
|
__STRING2_SMALL_GET16 (src, 0); \
|
|
*(__dest + 2) = '\0'; \
|
|
break; \
|
|
case 4: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
break; \
|
|
case 5: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
*(__dest + 4) = '\0'; \
|
|
break; \
|
|
case 6: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
*((__uint16_t *) (__dest + 4)) = \
|
|
__STRING2_SMALL_GET16 (src, 4); \
|
|
break; \
|
|
case 7: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
*((__uint16_t *) (__dest + 4)) = \
|
|
__STRING2_SMALL_GET16 (src, 4); \
|
|
*(__dest + 6) = '\0'; \
|
|
break; \
|
|
case 8: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
*((__uint32_t *) (__dest + 4)) = \
|
|
__STRING2_SMALL_GET32 (src, 4); \
|
|
break; \
|
|
} \
|
|
(char *) __dest; }))
|
|
# else
|
|
# define __strcpy_small(dest, src, srclen) \
|
|
(__extension__ ({ unsigned char *__dest = (unsigned char *) (dest); \
|
|
switch (srclen) \
|
|
{ \
|
|
case 1: \
|
|
*__dest = '\0'; \
|
|
break; \
|
|
case 2: \
|
|
*((__STRING2_COPY_ARR2 *) __dest) = \
|
|
((__STRING2_COPY_ARR2) { { (src)[0], '\0' } }); \
|
|
break; \
|
|
case 3: \
|
|
*((__STRING2_COPY_ARR3 *) __dest) = \
|
|
((__STRING2_COPY_ARR3) { { (src)[0], (src)[1], \
|
|
'\0' } }); \
|
|
break; \
|
|
case 4: \
|
|
*((__STRING2_COPY_ARR4 *) __dest) = \
|
|
((__STRING2_COPY_ARR4) { { (src)[0], (src)[1], \
|
|
(src)[2], '\0' } }); \
|
|
break; \
|
|
case 5: \
|
|
*((__STRING2_COPY_ARR5 *) __dest) = \
|
|
((__STRING2_COPY_ARR5) { { (src)[0], (src)[1], \
|
|
(src)[2], (src)[3], \
|
|
'\0' } }); \
|
|
break; \
|
|
case 6: \
|
|
*((__STRING2_COPY_ARR6 *) __dest) = \
|
|
((__STRING2_COPY_ARR6) { { (src)[0], (src)[1], \
|
|
(src)[2], (src)[3], \
|
|
(src)[4], '\0' } }); \
|
|
break; \
|
|
case 7: \
|
|
*((__STRING2_COPY_ARR7 *) __dest) = \
|
|
((__STRING2_COPY_ARR7) { { (src)[0], (src)[1], \
|
|
(src)[2], (src)[3], \
|
|
(src)[4], (src)[5], \
|
|
'\0' } }); \
|
|
break; \
|
|
case 8: \
|
|
*((__STRING2_COPY_ARR8 *) __dest) = \
|
|
((__STRING2_COPY_ARR8) { { (src)[0], (src)[1], \
|
|
(src)[2], (src)[3], \
|
|
(src)[4], (src)[5], \
|
|
(src)[6], '\0' } }); \
|
|
break; \
|
|
} \
|
|
(char *) __dest; }))
|
|
# endif
|
|
#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) \
|
|
? (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)))
|
|
/* 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)
|
|
|
|
# if _STRING_ARCH_unaligned
|
|
# define __stpcpy_small(dest, src, srclen) \
|
|
(__extension__ ({ unsigned char *__dest = (unsigned char *) (dest); \
|
|
switch (srclen) \
|
|
{ \
|
|
case 1: \
|
|
*__dest = '\0'; \
|
|
break; \
|
|
case 2: \
|
|
*((__uint16_t *) __dest) = \
|
|
__STRING2_SMALL_GET16 (src, 0); \
|
|
++__dest; \
|
|
break; \
|
|
case 3: \
|
|
*((__uint16_t *) __dest) = \
|
|
__STRING2_SMALL_GET16 (src, 0); \
|
|
__dest += sizeof (__uint16_t); \
|
|
*__dest = '\0'; \
|
|
break; \
|
|
case 4: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
__dest += 3; \
|
|
break; \
|
|
case 5: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
__dest += sizeof (__uint32_t); \
|
|
*__dest = '\0'; \
|
|
break; \
|
|
case 6: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
*((__uint16_t *) (__dest + 4)) = \
|
|
__STRING2_SMALL_GET16 (src, 4); \
|
|
__dest += 5; \
|
|
break; \
|
|
case 7: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
*((__uint16_t *) (__dest + 4)) = \
|
|
__STRING2_SMALL_GET16 (src, 4); \
|
|
__dest += 6; \
|
|
*__dest = '\0'; \
|
|
break; \
|
|
case 8: \
|
|
*((__uint32_t *) __dest) = \
|
|
__STRING2_SMALL_GET32 (src, 0); \
|
|
*((__uint32_t *) (__dest + 4)) = \
|
|
__STRING2_SMALL_GET32 (src, 4); \
|
|
__dest += 7; \
|
|
break; \
|
|
} \
|
|
(char *) __dest; }))
|
|
# else
|
|
# define __stpcpy_small(dest, src, srclen) \
|
|
(__extension__ ({ unsigned char *__dest = (unsigned char *) (dest); \
|
|
switch (srclen) \
|
|
{ \
|
|
case 1: \
|
|
*__dest = '\0'; \
|
|
break; \
|
|
case 2: \
|
|
*((__STRING2_COPY_ARR2 *) __dest) = \
|
|
((__STRING2_COPY_ARR2) { { (src)[0], '\0' } }); \
|
|
break; \
|
|
case 3: \
|
|
*((__STRING2_COPY_ARR3 *) __dest) = \
|
|
((__STRING2_COPY_ARR3) { { (src)[0], (src)[1], \
|
|
'\0' } }); \
|
|
break; \
|
|
case 4: \
|
|
*((__STRING2_COPY_ARR4 *) __dest) = \
|
|
((__STRING2_COPY_ARR4) { { (src)[0], (src)[1], \
|
|
(src)[2], '\0' } }); \
|
|
break; \
|
|
case 5: \
|
|
*((__STRING2_COPY_ARR5 *) __dest) = \
|
|
((__STRING2_COPY_ARR5) { { (src)[0], (src)[1], \
|
|
(src)[2], (src)[3], \
|
|
'\0' } }); \
|
|
break; \
|
|
case 6: \
|
|
*((__STRING2_COPY_ARR6 *) __dest) = \
|
|
((__STRING2_COPY_ARR6) { { (src)[0], (src)[1], \
|
|
(src)[2], (src)[3], \
|
|
(src)[4], '\0' } }); \
|
|
break; \
|
|
case 7: \
|
|
*((__STRING2_COPY_ARR7 *) __dest) = \
|
|
((__STRING2_COPY_ARR7) { { (src)[0], (src)[1], \
|
|
(src)[2], (src)[3], \
|
|
(src)[4], (src)[5], \
|
|
'\0' } }); \
|
|
break; \
|
|
case 8: \
|
|
*((__STRING2_COPY_ARR8 *) __dest) = \
|
|
((__STRING2_COPY_ARR8) { { (src)[0], (src)[1], \
|
|
(src)[2], (src)[3], \
|
|
(src)[4], (src)[5], \
|
|
(src)[6], '\0' } }); \
|
|
break; \
|
|
} \
|
|
(char *) (__dest + ((srclen) - 1)); }))
|
|
# endif
|
|
# 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__ ({ char *__dest = (dest); \
|
|
__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__ ({ char *__dest = (dest); \
|
|
__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 characters of S1 and S2. */
|
|
#ifndef _HAVE_STRING_ARCH_strcmp
|
|
# define strcmp(s1, s2) \
|
|
(__extension__ (__builtin_constant_p (s1) && __builtin_constant_p (s2) \
|
|
&& (sizeof ((s1)[0]) != 1 || strlen (s1) >= 4) \
|
|
&& (sizeof ((s2)[0]) != 1 || strlen (s2) >= 4) \
|
|
? memcmp (s1, s2, (strlen (s1) < strlen (s2) \
|
|
? strlen (s1) : strlen (s2)) + 1) \
|
|
: (__builtin_constant_p (s1) && sizeof ((s1)[0]) == 1 \
|
|
&& sizeof ((s2)[0]) == 1 && strlen (s1) < 4 \
|
|
? (__builtin_constant_p (s2) \
|
|
? __strcmp_cc (s1, s2, strlen (s1)) \
|
|
: __strcmp_cg (s1, s2, strlen (s1))) \
|
|
: (__builtin_constant_p (s2) && sizeof ((s1)[0]) == 1 \
|
|
&& sizeof ((s2)[0]) == 1 && strlen (s2) < 4 \
|
|
? (__builtin_constant_p (s1) \
|
|
? __strcmp_cc (s1, s2, strlen (s2)) \
|
|
: __strcmp_gc (s1, s2, strlen (s2))) \
|
|
: strcmp (s1, s2)))))
|
|
|
|
# define __strcmp_cc(s1, s2, l) \
|
|
(__extension__ ({ register int __result = ((unsigned char) (s1)[0] \
|
|
- (unsigned char) (s2)[0]); \
|
|
if (l > 0 && __result == 0) \
|
|
{ \
|
|
__result = ((unsigned char) (s1)[1] \
|
|
- (unsigned char) (s2)[1]); \
|
|
if (l > 1 && __result == 0) \
|
|
{ \
|
|
__result = ((unsigned char) (s1)[2] \
|
|
- (unsigned char) (s2)[2]); \
|
|
if (l > 2 && __result == 0) \
|
|
__result = ((unsigned char) (s1)[3] \
|
|
- (unsigned char) (s2)[3]); \
|
|
} \
|
|
} \
|
|
__result; }))
|
|
|
|
# define __strcmp_cg(s1, s2, l1) \
|
|
(__extension__ ({ __const unsigned char *__s2 = (unsigned char *) (s2); \
|
|
register int __result = (unsigned char) (s1)[0] - __s2[0];\
|
|
if (l1 > 0 && __result == 0) \
|
|
{ \
|
|
__result = (unsigned char) (s1)[1] - __s2[1]; \
|
|
if (l1 > 1 && __result == 0) \
|
|
{ \
|
|
__result = (unsigned char) (s1)[2] - __s2[2]; \
|
|
if (l1 > 2 && __result == 0) \
|
|
__result = (unsigned char) (s1)[3] - __s2[3]; \
|
|
} \
|
|
} \
|
|
__result; }))
|
|
|
|
# define __strcmp_gc(s1, s2, l2) \
|
|
(__extension__ ({ __const unsigned char *__s1 = (unsigned char *) (s1); \
|
|
register int __result = __s1[0] - (unsigned char) (s2)[0];\
|
|
if (l2 > 0 && __result == 0) \
|
|
{ \
|
|
__result = __s1[1] - (unsigned char) (s2)[1]; \
|
|
if (l2 > 1 && __result == 0) \
|
|
{ \
|
|
__result = __s1[2] - (unsigned char) (s2)[2]; \
|
|
if (l2 > 2 && __result == 0) \
|
|
__result = __s1[3] - (unsigned char) (s2)[3]; \
|
|
} \
|
|
} \
|
|
__result; }))
|
|
#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) && sizeof ((reject)[0]) == 1 \
|
|
? ((reject)[0] == '\0' \
|
|
? strlen (s) \
|
|
: ((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)
|
|
{
|
|
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) && sizeof ((accept)[0]) == 1 \
|
|
? ((accept)[0] == '\0' \
|
|
? 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)
|
|
{
|
|
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) && sizeof ((accept)[0]) == 1 \
|
|
? ((accept)[0] == '\0' \
|
|
? NULL \
|
|
: ((accept)[1] == '\0' \
|
|
? strchr (s, (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) && sizeof ((needle)[0]) == 1 \
|
|
? ((needle)[0] == '\0' \
|
|
? haystack \
|
|
: ((needle)[1] == '\0' \
|
|
? strchr (haystack, (needle)[0]) \
|
|
: strstr (haystack, needle))) \
|
|
: strstr (haystack, needle)))
|
|
#endif
|
|
|
|
|
|
#ifdef __USE_GNU
|
|
# ifndef _HAVE_STRING_ARCH_strnlen
|
|
__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);
|
|
return __end ? __end - __string : __maxlen;
|
|
}
|
|
# endif
|
|
#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 char *__retval = *__s;
|
|
if (__retval == NULL || *__retval == '\0')
|
|
return NULL;
|
|
while (*__retval == __reject)
|
|
++__retval;
|
|
if ((*__s = strchr (__retval, __reject)) != NULL)
|
|
*(*__s)++ = '\0';
|
|
return __retval;
|
|
}
|
|
|
|
__STRING_INLINE char *__strsep_g (char **__s, __const char *__reject);
|
|
__STRING_INLINE char *
|
|
__strsep_g (char **__s, __const char *__reject)
|
|
{
|
|
register char *__retval = *__s;
|
|
if (__retval == NULL || *__retval == '\0')
|
|
return NULL;
|
|
if ((*__s = strpbrk (__retval, __reject)) != NULL)
|
|
*(*__s)++ = '\0';
|
|
return __retval;
|
|
}
|
|
# endif
|
|
#endif
|
|
|
|
|
|
#undef __STRING_INLINE
|
|
|
|
#endif /* No string inlines. */
|