Mercurial > ecos-v2_0-branch

comparison packages/language/c/libc/string/current/src/strncpy.cxx @ 115:6ed91473a1cd ecos-sw-2000-08-21

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from eCos master repository on 2000-08-21-22:40:54-BST
author jlarmour
date Fri, 25 Aug 2000 17:32:38 +0000
parents
children 4c750ce71ae3
comparison
equal deleted inserted replaced
114:5ad2b71d525e 115:6ed91473a1cd
1 //===========================================================================
2 //
3 // strncpy.cxx
4 //
5 // ISO C standard strncpy() routine
6 //
7 //===========================================================================
8 //####COPYRIGHTBEGIN####
9 //
10 // -------------------------------------------
11 // The contents of this file are subject to the Red Hat eCos Public License
12 // Version 1.1 (the "License"); you may not use this file except in
13 // compliance with the License. You may obtain a copy of the License at
14 // http://www.redhat.com/
15 //
16 // Software distributed under the License is distributed on an "AS IS"
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
18 // License for the specific language governing rights and limitations under
19 // the License.
20 //
21 // The Original Code is eCos - Embedded Configurable Operating System,
22 // released September 30, 1998.
23 //
24 // The Initial Developer of the Original Code is Red Hat.
25 // Portions created by Red Hat are
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc.
27 // All Rights Reserved.
28 // -------------------------------------------
29 //
30 //####COPYRIGHTEND####
31 //===========================================================================
32 //#####DESCRIPTIONBEGIN####
33 //
34 // Author(s): jlarmour
35 // Contributors:
36 // Date: 2000-04-14
37 // Purpose:
38 // Description:
39 // Usage:
40 //
41 //####DESCRIPTIONEND####
42 //
43 //===========================================================================
44
45 // CONFIGURATION
46
47 #include <pkgconf/libc_string.h> // Configuration header
48
49 // INCLUDES
50
51 #include <cyg/infra/cyg_type.h> // Common type definitions
52 #include <cyg/infra/cyg_trac.h> // Tracing support
53 #include <cyg/infra/cyg_ass.h> // Assertion support
54 #include <string.h> // Header for this file
55 #include <stddef.h> // Compiler definitions such as size_t, NULL etc.
56 #include <cyg/libc/string/stringsupp.hxx> // Useful string function support and
57 // prototypes
58
59 // EXPORTED SYMBOLS
60
61 externC char *
62 strncpy( char *s1, const char *s2, size_t n ) \
63 CYGBLD_ATTRIB_WEAK_ALIAS(__strncpy);
64
65 // FUNCTIONS
66
67 char *
68 __strncpy( char *s1, const char *s2, size_t n)
69 {
70 CYG_REPORT_FUNCNAMETYPE( "__strncpy", "returning %08x" );
71 CYG_REPORT_FUNCARG3( "s1=%08x, s2=%08x, n=%d", s1, s2, n );
72
73 CYG_CHECK_DATA_PTR( s1, "s1 is not a valid pointer!" );
74 CYG_CHECK_DATA_PTR( s2, "s2 is not a valid pointer!" );
75
76 #if defined(CYGIMP_LIBC_STRING_PREFER_SMALL_TO_FAST) || defined(__OPTIMIZE_SIZE__)
77 char *dscan;
78 const char *sscan;
79
80 dscan = s1;
81 sscan = s2;
82 while (n > 0)
83 {
84 --n;
85 if ((*dscan++ = *sscan++) == '\0')
86 break;
87 }
88 while (n-- > 0)
89 *dscan++ = '\0';
90
91 CYG_REPORT_RETVAL( s1 );
92
93 return s1;
94 #else
95 char *dst = s1;
96 const char *src = s2;
97 CYG_WORD *aligned_dst;
98 const CYG_WORD *aligned_src;
99
100 // If SRC and DEST is aligned and count large enough, then copy words.
101 if (!CYG_LIBC_STR_UNALIGNED2 (src, dst) &&
102 !CYG_LIBC_STR_OPT_TOO_SMALL (n)) {
103
104 aligned_dst = (CYG_WORD *)dst;
105 aligned_src = (CYG_WORD *)src;
106
107 // SRC and DEST are both "CYG_WORD" aligned, try to do "CYG_WORD"
108 // sized copies.
109 while (n >= sizeof (CYG_WORD) &&
110 !CYG_LIBC_STR_DETECTNULL(*aligned_src)) {
111
112 n -= sizeof (CYG_WORD);
113 *aligned_dst++ = *aligned_src++;
114 }
115
116 dst = (char *)aligned_dst;
117 src = (const char *)aligned_src;
118 } // if
119
120 while (n > 0)
121 {
122 --n;
123 if ((*dst++ = *src++) == '\0')
124 break;
125 }
126
127 while (n-- > 0)
128 *dst++ = '\0';
129
130 CYG_REPORT_RETVAL( s1 );
131
132 return s1;
133 #endif // not defined(CYGIMP_LIBC_STRING_PREFER_SMALL_TO_FAST) ||
134 // defined(__OPTIMIZE_SIZE__)
135 } // __strncpy()
136
137 // EOF strncpy.cxx