123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112 |
- #include <string.h>
- #include <stdlib.h>
- #include <sys/types.h>
- typedef long word;
- #define wsize sizeof(word)
- #define wmask (wsize - 1)
- #ifdef _TLIBC_USE_INTEL_FAST_STRING_
- extern void *_intel_fast_memcpy(void *, void *, size_t);
- #endif
- void *
- __memcpy(void *dst0, const void *src0, size_t length)
- {
- char *dst = (char *)dst0;
- const char *src = (const char *)src0;
- size_t t;
- if (length == 0 || dst == src)
- goto done;
- if ((dst < src && dst + length > src) ||
- (src < dst && src + length > dst)) {
-
- abort();
- }
-
- #define TLOOP(s) if (t) TLOOP1(s)
- #define TLOOP1(s) do { s; } while (--t)
-
- t = (long)src;
- if ((t | (long)dst) & wmask) {
-
- if ((t ^ (long)dst) & wmask || length < wsize)
- t = length;
- else
- t = wsize - (t & wmask);
- length -= t;
- TLOOP1(*dst++ = *src++);
- }
-
- t = length / wsize;
- TLOOP(*(word *)dst = *(word *)src; src += wsize; dst += wsize);
- t = length & wmask;
- TLOOP(*dst++ = *src++);
- done:
- return (dst0);
- }
- void *
- memcpy(void *dst0, const void *src0, size_t length)
- {
- #ifdef _TLIBC_USE_INTEL_FAST_STRING_
- return _intel_fast_memcpy(dst0, (void*)src0, length);
- #else
- return __memcpy(dst0, src0, length);
- #endif
- }
|