?RCS: $Id: d_safemcpy.U,v 3.0.1.5 1997/02/28 15:41:12 ram Exp $
?RCS:
?RCS: Copyright (c) 1991-1993, Raphael Manfredi
?RCS:
?RCS: You may redistribute only under the terms of the Artistic Licence,
?RCS: as specified in the README file that comes with the distribution.
?RCS: You may reuse parts of this distribution only within the terms of
?RCS: that same Artistic Licence; a copy of which may be found at the root
?RCS: of the source tree for dist 3.0.
?RCS:
?RCS: $Log: d_safemcpy.U,v $
?RCS: Revision 3.0.1.5 1997/02/28 15:41:12 ram
?RCS: patch61: improved overlapping copy check
?RCS: patch61: comfort them if they have memmove
?RCS: patch61: added ?F: metalint hint
?RCS:
?RCS: Revision 3.0.1.4 1995/07/25 13:58:46 ram
?RCS: patch56: re-arranged compile line to include ldflags before objects
?RCS:
?RCS: Revision 3.0.1.3 1995/03/21 08:47:26 ram
?RCS: patch52: swapped two first arguments of memcpy() calls
?RCS:
?RCS: Revision 3.0.1.2 1994/10/29 16:15:10 ram
?RCS: patch36: added 'ldflags' to the test compile line (ADO)
?RCS:
?RCS: Revision 3.0.1.1 1994/05/06 14:53:12 ram
?RCS: patch23: ensure string is not optimized in read-only memory (ADO)
?RCS:
?RCS: Revision 3.0 1993/08/18 12:06:58 ram
?RCS: Baseline for dist 3.0 netwide release.
?RCS:
?MAKE:d_safemcpy: Compile cat d_memcpy rm \
d_memmove i_memory i_stdlib i_string i_unistd Oldconfig Setvar
?MAKE: -pick add $@ %<
?S:d_safemcpy:
?S: This variable conditionally defines the HAS_SAFE_MEMCPY symbol if
?S: the memcpy() routine can do overlapping copies.
?S: For overlapping copies, memmove() should be used, if available.
?S:.
?C:HAS_SAFE_MEMCPY (SAFE_MEMCPY):
?C: This symbol, if defined, indicates that the memcpy routine is available
?C: to copy potentially overlapping memory blocks. If you need to
?C: copy overlapping memory blocks, you should check HAS_MEMMOVE and
?C: use memmove() instead, if available.
?C:.
?H:#$d_safemcpy HAS_SAFE_MEMCPY /**/
?H:.
?F:!try
?LINT: set d_safemcpy
: can memcpy handle overlapping blocks?
echo " "
?X: assume the worst
val="$undef"
case "$d_memmove" in
"$define") echo "I'll use memmove() instead of memcpy() for overlapping copies." ;;
*) case "$d_memcpy" in
"$define")
echo "Checking to see if memcpy() can do overlapping copies..." >&4
$cat >try.c <<EOCP
#$i_memory I_MEMORY
#$i_stdlib I_STDLIB
#$i_string I_STRING
#$i_unistd I_UNISTD
EOCP
$cat >>try.c <<'EOCP'
#include <stdio.h>
#ifdef I_MEMORY
# include <memory.h>
#endif
#ifdef I_STDLIB
# include <stdlib.h>
#endif
#ifdef I_STRING
# include <string.h>
#else
# include <strings.h>
#endif
#ifdef I_UNISTD
# include <unistd.h> /* Needed for NetBSD */
#endif
int main()
{
char buf[128], abc[128];
char *b;
int len;
int off;
int align;
/* Copy "abcde..." string to char abc[] so that gcc doesn't
try to store the string in read-only memory. */
memcpy(abc, "abcdefghijklmnopqrstuvwxyz0123456789", 36);
for (align = 7; align >= 0; align--) {
for (len = 36; len; len--) {
b = buf+align;
memcpy(b, abc, len);
for (off = 1; off <= len; off++) {
memcpy(b+off, b, len);
memcpy(b, b+off, len);
if (memcmp(b, abc, len))
exit(1);
}
}
}
exit(0);
}
EOCP
set try
if eval $compile_ok; then
if ./try 2>/dev/null; then
echo "Yes, it can."
val="$define"
else
echo "It can't, sorry."
fi
else
echo "(I can't compile the test program, so we'll assume not...)"
fi
;;
esac
$rm -f try.* try core
;;
esac
set d_safemcpy
eval $setvar