OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.18.0/] [newlib/] [libc/] [string/] [strcpy.c] - Blame information for rev 207

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 207 jeremybenn
/*
2
FUNCTION
3
        <<strcpy>>---copy string
4
 
5
INDEX
6
        strcpy
7
 
8
ANSI_SYNOPSIS
9
        #include <string.h>
10
        char *strcpy(char *<[dst]>, const char *<[src]>);
11
 
12
TRAD_SYNOPSIS
13
        #include <string.h>
14
        char *strcpy(<[dst]>, <[src]>)
15
        char *<[dst]>;
16
        char *<[src]>;
17
 
18
DESCRIPTION
19
        <<strcpy>> copies the string pointed to by <[src]>
20
        (including the terminating null character) to the array
21
        pointed to by <[dst]>.
22
 
23
RETURNS
24
        This function returns the initial value of <[dst]>.
25
 
26
PORTABILITY
27
<<strcpy>> is ANSI C.
28
 
29
<<strcpy>> requires no supporting OS subroutines.
30
 
31
QUICKREF
32
        strcpy ansi pure
33
*/
34
 
35
#include <string.h>
36
#include <limits.h>
37
 
38
/*SUPPRESS 560*/
39
/*SUPPRESS 530*/
40
 
41
/* Nonzero if either X or Y is not aligned on a "long" boundary.  */
42
#define UNALIGNED(X, Y) \
43
  (((long)X & (sizeof (long) - 1)) | ((long)Y & (sizeof (long) - 1)))
44
 
45
#if LONG_MAX == 2147483647L
46
#define DETECTNULL(X) (((X) - 0x01010101) & ~(X) & 0x80808080)
47
#else
48
#if LONG_MAX == 9223372036854775807L
49
/* Nonzero if X (a long int) contains a NULL byte. */
50
#define DETECTNULL(X) (((X) - 0x0101010101010101) & ~(X) & 0x8080808080808080)
51
#else
52
#error long int is not a 32bit or 64bit type.
53
#endif
54
#endif
55
 
56
#ifndef DETECTNULL
57
#error long int is not a 32bit or 64bit byte
58
#endif
59
 
60
char*
61
_DEFUN (strcpy, (dst0, src0),
62
        char *dst0 _AND
63
        _CONST char *src0)
64
{
65
#if defined(PREFER_SIZE_OVER_SPEED) || defined(__OPTIMIZE_SIZE__)
66
  char *s = dst0;
67
 
68
  while (*dst0++ = *src0++)
69
    ;
70
 
71
  return s;
72
#else
73
  char *dst = dst0;
74
  _CONST char *src = src0;
75
  long *aligned_dst;
76
  _CONST long *aligned_src;
77
 
78
  /* If SRC or DEST is unaligned, then copy bytes.  */
79
  if (!UNALIGNED (src, dst))
80
    {
81
      aligned_dst = (long*)dst;
82
      aligned_src = (long*)src;
83
 
84
      /* SRC and DEST are both "long int" aligned, try to do "long int"
85
         sized copies.  */
86
      while (!DETECTNULL(*aligned_src))
87
        {
88
          *aligned_dst++ = *aligned_src++;
89
        }
90
 
91
      dst = (char*)aligned_dst;
92
      src = (char*)aligned_src;
93
    }
94
 
95
  while ((*dst++ = *src++))
96
    ;
97
  return dst0;
98
#endif /* not PREFER_SIZE_OVER_SPEED */
99
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.