Imported Upstream version 2.9.0
[debian/cc1111] / device / lib / _memcpy.c
1 /*-------------------------------------------------------------------------
2   _memcpy.c - part of string library functions
3
4              Written By -  Sandeep Dutta . sandeep.dutta@usa.net (1999)
5
6    This library is free software; you can redistribute it and/or modify it
7    under the terms of the GNU Library General Public License as published by the
8    Free Software Foundation; either version 2, or (at your option) any
9    later version.
10    
11    This library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU Library General Public License for more details.
15    
16    You should have received a copy of the GNU Library General Public License
17    along with this program; if not, write to the Free Software
18    Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19    
20    In other words, you are welcome to use, share and improve this program.
21    You are forbidden to forbid anyone else to use, share and improve
22    what you give them.   Help stamp out software-hoarding!  
23 -------------------------------------------------------------------------*/
24 #include "string.h" 
25 #include <sdcc-lib.h>
26
27 #if !_SDCC_PORT_PROVIDES_MEMCPY
28
29 #undef memcpy /* Avoid conflict with builtin memcpy() in Z80 port */
30
31 void * memcpy (
32         void * dst,
33         void * src,
34         size_t acount
35         ) 
36 {
37 #if _SDCC_Z80_STYLE_LIB_OPT
38
39 #pragma noinduction
40
41         char * d = dst;
42         char * s = src;
43         /* PENDING: Divide first to get around sign problems */
44         int count = -(acount >> 2);
45
46         while (count) {
47                 *d++ = *s++;
48                 *d++ = *s++;
49                 *d++ = *s++;
50                 *d++ = *s++;
51                 count++;
52         }
53
54         if (acount & 2) {
55                 *d++ = *s++; 
56                 *d++ = *s++;
57         }
58         if (acount & 1) {
59                 *d++ = *s++;
60         }
61         return dst;
62 #else
63         void * ret = dst;
64         char * d = dst;
65         char * s = src;
66         
67         /*
68          * copy from lower addresses to higher addresses
69          */
70         while (acount--) {
71                 *d++ = *s++;
72         }
73
74         return(ret);
75 #endif
76 }
77 #endif