glibc/string/bits/string3.h

/* Copyright (C) 2004, 2005 Free Software Foundation, Inc.
   This file is part of the GNU C Library.

   The GNU C Library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Lesser General Public
   License as published by the Free Software Foundation; either
   version 2.1 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
   Lesser General Public License for more details.

   You should have received a copy of the GNU Lesser General Public
   License along with the GNU C Library; 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/string3.h> directly; include <string.h> instead."
#endif

/* XXX This is temporarily.  We should not redefine any of the symbols
   and instead integrate the error checking into the original
   definitions.  */
#undef memcpy
#undef memmove
#undef memset
#undef strcat
#undef strcpy
#undef strncat
#undef strncpy
#ifdef __USE_GNU
# undef mempcpy
# undef stpcpy
#endif
#ifdef __USE_BSD
# undef bcopy
# undef bzero
#endif


#define memcpy(dest, src, len) \
  ((__bos0 (dest) != (size_t) -1)					\
   ? __builtin___memcpy_chk (dest, src, len, __bos0 (dest))		\
   : __memcpy_ichk (dest, src, len))
static __always_inline void *
__memcpy_ichk (void *__restrict __dest, const void *__restrict __src,
	       size_t __len)
{
  return __builtin___memcpy_chk (__dest, __src, __len, __bos0 (__dest));
}


#define memmove(dest, src, len) \
  ((__bos0 (dest) != (size_t) -1)					\
   ? __builtin___memmove_chk (dest, src, len, __bos0 (dest))		\
   : __memmove_ichk (dest, src, len))
static __always_inline void *
__memmove_ichk (void *__dest, const void *__src, size_t __len)
{
  return __builtin___memmove_chk (__dest, __src, __len, __bos0 (__dest));
}


#ifdef __USE_GNU
# define mempcpy(dest, src, len) \
  ((__bos0 (dest) != (size_t) -1)					\
   ? __builtin___mempcpy_chk (dest, src, len, __bos0 (dest))		\
   : __mempcpy_ichk (dest, src, len))
static __always_inline void *
__mempcpy_ichk (void *__restrict __dest, const void *__restrict __src,
		size_t __len)
{
  return __builtin___mempcpy_chk (__dest, __src, __len, __bos0 (__dest));
}
#endif


/* The first two tests here help to catch a somewhat common problem
   where the second and third parameter are transposed.  This is
   especially problematic if the intended fill value is zero.  In this
   case no work is done at all.  We detect these problems by referring
   non-existing functions.  */
__warndecl (__warn_memset_zero_len,
	    "memset used with constant zero length parameter; this could be due to transposed parameters");
#define memset(dest, ch, len) \
  (__builtin_constant_p (len) && (len) == 0				      \
   ? (__warn_memset_zero_len (), (void) (ch), (void) (len), (void *) (dest))  \
   : ((__bos0 (dest) != (size_t) -1)					      \
      ? __builtin___memset_chk (dest, ch, len, __bos0 (dest))		      \
      : __memset_ichk (dest, ch, len)))
static __always_inline void *
__memset_ichk (void *__dest, int __ch, size_t __len)
{
  return __builtin___memset_chk (__dest, __ch, __len, __bos0 (__dest));
}

#ifdef __USE_BSD
# define bcopy(src, dest, len) ((void) \
  ((__bos0 (dest) != (size_t) -1)					\
   ? __builtin___memmove_chk (dest, src, len, __bos0 (dest))		\
   : __memmove_ichk (dest, src, len)))
# define bzero(dest, len) ((void) \
  ((__bos0 (dest) != (size_t) -1)					\
   ? __builtin___memset_chk (dest, '\0', len, __bos0 (dest))		\
   : __memset_ichk (dest, '\0', len)))
#endif


#define strcpy(dest, src) \
  ((__bos (dest) != (size_t) -1)					\
   ? __builtin___strcpy_chk (dest, src, __bos (dest))			\
   : __strcpy_ichk (dest, src))
static __always_inline char *
__strcpy_ichk (char *__restrict __dest, const char *__restrict __src)
{
  return __builtin___strcpy_chk (__dest, __src, __bos (__dest));
}


#ifdef __USE_GNU
# define stpcpy(dest, src) \
  ((__bos (dest) != (size_t) -1)					\
   ? __builtin___stpcpy_chk (dest, src, __bos (dest))			\
   : __stpcpy_ichk (dest, src))
static __always_inline char *
__stpcpy_ichk (char *__restrict __dest, const char *__restrict __src)
{
  return __builtin___stpcpy_chk (__dest, __src, __bos (__dest));
}
#endif


#define strncpy(dest, src, len) \
  ((__bos (dest) != (size_t) -1)					\
   ? __builtin___strncpy_chk (dest, src, len, __bos (dest))		\
   : __strncpy_ichk (dest, src, len))
static __always_inline char *
__strncpy_ichk (char *__restrict __dest, const char *__restrict __src,
		size_t __len)
{
  return __builtin___strncpy_chk (__dest, __src, __len, __bos (__dest));
}


// XXX We have no corresponding builtin yet.
extern char *__stpncpy_chk (char *__dest, const char *__src, size_t __n,
			    size_t __destlen) __THROW;
extern char *__REDIRECT (__stpncpy_alias, (char *__dest, const char *__src,
					   size_t __n), stpncpy)__THROW;

extern __always_inline char *
stpncpy (char *__dest, const char *__src, size_t __n)
{
  if (__bos (__dest) != (size_t) -1
      && (!__builtin_constant_p (__n) || __n <= __bos (__dest)))
    return __stpncpy_chk (__dest, __src, __n, __bos (__dest));
  return __stpncpy_alias (__dest, __src, __n);
}


#define strcat(dest, src) \
  ((__bos (dest) != (size_t) -1)					\
   ? __builtin___strcat_chk (dest, src, __bos (dest))			\
   : __strcat_ichk (dest, src))
static __always_inline char *
__strcat_ichk (char *__restrict __dest, const char *__restrict __src)
{
  return __builtin___strcat_chk (__dest, __src, __bos (__dest));
}


#define strncat(dest, src, len) \
  ((__bos (dest) != (size_t) -1)					\
   ? __builtin___strncat_chk (dest, src, len, __bos (dest))		\
   : __strncat_ichk (dest, src, len))
static __always_inline char *
__strncat_ichk (char *__restrict __dest, const char *__restrict __src,
		size_t __len)
{
  return __builtin___strncat_chk (__dest, __src, __len, __bos (__dest));
}