Mercurial > ecos
annotate packages/language/c/libc/current/src/string/strncpy.cxx @ 64:c38311975d4f ecos-sw-2000-01-28
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
| author | jlarmour |
|---|---|
| date | Fri, 28 Jan 2000 04:59:39 +0000 |
| parents | 443894e2e912 |
| children | bf00f99aec69 |
| rev | line source |
|---|---|
| 0 | 1 //=========================================================================== |
| 2 // | |
| 3 // strncpy.cxx | |
| 4 // | |
| 2 | 5 // ISO C standard strncpy() routine |
| 0 | 6 // |
| 7 //=========================================================================== | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
11 // The contents of this file are subject to the Red Hat eCos Public License |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
12 // Version 1.0 (the "License"); you may not use this file except in |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
13 // compliance with the License. You may obtain a copy of the License at |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
14 // http://sourceware.cygnus.com/ecos |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
15 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
16 // Software distributed under the License is distributed on an |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
18 // License for the specific language governing rights and limitations under |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
21 // The Original Code is eCos - Embedded Configurable Operating System, |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
24 // The Initial Developer of the Original Code is Red Hat. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
25 // Portions created by Red Hat are |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
29 // |
| 0 | 30 //####COPYRIGHTEND#### |
| 31 //=========================================================================== | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 2 | 34 // Author(s): jlarmour |
| 35 // Contributors: jlarmour | |
| 36 // Date: 1999-02-18 | |
| 0 | 37 // Purpose: |
| 38 // Description: | |
| 39 // Usage: | |
| 40 // | |
| 41 //####DESCRIPTIONEND#### | |
| 42 // | |
| 43 //=========================================================================== | |
| 44 | |
| 45 // CONFIGURATION | |
| 46 | |
| 47 #include <pkgconf/libc.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 "clibincl/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 ) \ | |
| 2 | 63 CYGBLD_ATTRIB_WEAK_ALIAS(_strncpy); |
| 0 | 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 | |
| 2 | 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; | |
| 0 | 106 |
| 2 | 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 | |
| 0 | 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 |