diff packages/infra/current/src/memcpy.c @ 0:3111d98ba7b3 ecos-v1_1-release

Initial commit of eCos version 1.1
author jlarmour
date Tue, 11 May 1999 11:16:07 +0000
parents
children 443894e2e912
line wrap: on
line diff
new file mode 100644
--- /dev/null
+++ b/packages/infra/current/src/memcpy.c
@@ -0,0 +1,182 @@
+/*===========================================================================
+//
+//      memcpy.c
+//
+//      ANSI standard memcpy() routine
+//
+//==========================================================================
+//####COPYRIGHTBEGIN####
+//
+// -------------------------------------------
+// The contents of this file are subject to the Cygnus eCos Public License
+// Version 1.0 (the "License"); you may not use this file except in
+// compliance with the License.  You may obtain a copy of the License at
+// http://sourceware.cygnus.com/ecos
+// 
+// Software distributed under the License is distributed on an "AS IS"
+// basis, WITHOUT WARRANTY OF ANY KIND, either express or implied.  See the
+// License for the specific language governing rights and limitations under
+// the License.
+// 
+// The Original Code is eCos - Embedded Cygnus Operating System, released
+// September 30, 1998.
+// 
+// The Initial Developer of the Original Code is Cygnus.  Portions created
+// by Cygnus are Copyright (C) 1998 Cygnus Solutions.  All Rights Reserved.
+// -------------------------------------------
+//
+//####COPYRIGHTEND####
+//==========================================================================
+//#####DESCRIPTIONBEGIN####
+//
+// Author(s):   jlarmour@cygnus.co.uk
+// Contributors:  jlarmour@cygnus.co.uk
+// Date:        1998-06-04
+// Purpose:     This file implements the ANSI memcpy() function
+// Description:	This file implements the memcpy() function defined in ANSI para
+//              7.11.2.1. This is implemented in the kernel rather than the
+//              C library due to it being required by gcc whether or not the
+//              C library has been configured in.
+//
+//####DESCRIPTIONEND####
+//
+//==========================================================================*/
+
+
+/* INCLUDES */
+
+#include <pkgconf/infra.h>      /* Configuration of infra package */
+
+#include <cyg/infra/cyg_type.h> /* Common type definitions */
+#include <cyg/infra/cyg_trac.h> /* Tracing support */
+#include <cyg/infra/cyg_ass.h>  /* Assertion support */
+#include <stddef.h>             /* Compiler defns such as size_t, NULL etc. */
+
+/* MACROS */
+
+/* Nonzero if either X or Y is not aligned on a word boundary. */
+#define CYG_STR_UNALIGNED(X, Y) \
+     (((CYG_WORD)(X) & (sizeof (CYG_WORD) - 1)) | \
+      ((CYG_WORD)(Y) & (sizeof (CYG_WORD) - 1)))
+
+/* How many bytes are copied each iteration of the 4X unrolled loop in the
+ * optimised string implementation
+ */
+#define CYG_STR_OPT_BIGBLOCKSIZE     (sizeof(CYG_WORD) << 2)
+
+
+/* How many bytes are copied each iteration of the word copy loop in the
+ * optimised string implementation
+ */
+#define CYG_STR_OPT_LITTLEBLOCKSIZE (sizeof (CYG_WORD))
+
+/* EXPORTED SYMBOLS */
+
+externC void *
+memcpy( void *s1, const void *s2, size_t n ) __attribute__((weak,
+                                                            alias("_memcpy")));
+
+/* FUNCTIONS */
+
+void *
+_memcpy( void *s1, const void *s2, size_t n )
+{
+#if defined(CYGIMP_INFRA_PREFER_SMALL_TO_FAST_MEMCPY) || defined(__OPTIMIZE_SIZE__)
+    char *dst = (char *) s1;
+    const char *src = (const char *) s2;
+    
+#ifdef CYG_TRACING_FIXED
+    CYG_REPORT_FUNCNAMETYPE( "_memcpy", "returning %08x" );
+    CYG_REPORT_FUNCARG3( "dst=%08x, src=%08x, n=%d", dst, src, n );
+
+    if (n != 0)
+    {
+        CYG_CHECK_DATA_PTR( dst, "dst is not a valid pointer!" );
+        CYG_CHECK_DATA_PTR( src, "src is not a valid pointer!" );
+        CYG_CHECK_DATA_PTR( dst+n-1, "dst+n-1 is not a valid address!" );
+        CYG_CHECK_DATA_PTR( src+n-1, "src+n-1 is not a valid address!" );
+    }
+#endif
+
+    while (n--)
+    {
+        *dst++ = *src++;
+    } /* while */
+    
+#ifdef CYG_TRACING_FIXED
+    CYG_REPORT_RETVAL( s1 );
+#endif
+    return s1;
+#else
+    char *dst;
+    const char *src;
+    CYG_WORD *aligned_dst;
+    const CYG_WORD *aligned_src;
+    
+#ifdef CYG_TRACING_FIXED
+    CYG_REPORT_FUNCNAMETYPE( "_memcpy", "returning %08x" );
+#endif
+
+    dst = (char *)s1;
+    src = (const char *)s2;
+
+#ifdef CYG_TRACING_FIXED
+    CYG_REPORT_FUNCARG3( "dst=%08x, src=%08x, n=%d", dst, src, n );
+    
+    if (n != 0)
+    {
+        CYG_CHECK_DATA_PTR( dst, "dst is not a valid pointer!" );
+        CYG_CHECK_DATA_PTR( src, "src is not a valid pointer!" );
+        CYG_CHECK_DATA_PTR( dst+n-1, "dst+n-1 is not a valid address!" );
+        CYG_CHECK_DATA_PTR( src+n-1, "src+n-1 is not a valid address!" );
+    }
+#endif
+
+    /* If the size is small, or either SRC or DST is unaligned,
+     * then punt into the byte copy loop.  This should be rare.
+     */
+    if (n < sizeof(CYG_WORD) || CYG_STR_UNALIGNED (src, dst))
+    {
+        while (n--)
+            *dst++ = *src++;
+#ifdef CYG_TRACING_FIXED
+        CYG_REPORT_RETVAL( s1 );
+#endif
+        return s1;
+    } /* if */
+    
+    aligned_dst = (CYG_WORD *)dst;
+    aligned_src = (const CYG_WORD *)src;
+    
+    /* Copy 4X long words at a time if possible.  */
+    while (n >= CYG_STR_OPT_BIGBLOCKSIZE)
+    {
+        *aligned_dst++ = *aligned_src++;
+        *aligned_dst++ = *aligned_src++;
+        *aligned_dst++ = *aligned_src++;
+        *aligned_dst++ = *aligned_src++;
+        n -= CYG_STR_OPT_BIGBLOCKSIZE;
+    } /* while */
+    
+    /* Copy one long word at a time if possible.  */
+    while (n >= CYG_STR_OPT_LITTLEBLOCKSIZE)
+    {
+        *aligned_dst++ = *aligned_src++;
+        n -= CYG_STR_OPT_LITTLEBLOCKSIZE;
+    } /* while */
+    
+    /* Pick up any residual with a byte copier.  */
+    dst = (char*)aligned_dst;
+    src = (const char*)aligned_src;
+    while (n--)
+        *dst++ = *src++;
+    
+#ifdef CYG_TRACING_FIXED
+    CYG_REPORT_RETVAL( s1 );
+#endif
+    return s1;
+#endif /* not defined(CYGIMP_PREFER_SMALL_TO_FAST_MEMCPY) ||
+        * defined(__OPTIMIZE_SIZE__) */
+} /* _memcpy() */
+
+/* EOF memcpy.c */