|
0
|
1 //================================================================= |
|
|
2 // |
|
|
3 // strncpy1.c |
|
|
4 // |
|
|
5 // Testcase for C library strncpy() |
|
|
6 // |
|
|
7 //================================================================= |
|
|
8 //####COPYRIGHTBEGIN#### |
|
|
9 // |
|
|
10 // ------------------------------------------- |
|
|
11 // The contents of this file are subject to the Cygnus eCos Public License |
|
|
12 // Version 1.0 (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://sourceware.cygnus.com/ecos |
|
|
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 Cygnus Operating System, released |
|
|
22 // September 30, 1998. |
|
|
23 // |
|
|
24 // The Initial Developer of the Original Code is Cygnus. Portions created |
|
2
|
25 // by Cygnus are Copyright (C) 1998,1999 Cygnus Solutions. All Rights Reserved. |
|
0
|
26 // ------------------------------------------- |
|
|
27 // |
|
|
28 //####COPYRIGHTEND#### |
|
|
29 //================================================================= |
|
|
30 //#####DESCRIPTIONBEGIN#### |
|
|
31 // |
|
2
|
32 // Author(s): ctarpy, jlarmour |
|
|
33 // Contributors: jlarmour |
|
0
|
34 // Date: 1998/6/3 |
|
|
35 // Description: Contains testcode for C library strncpy() function |
|
|
36 // |
|
|
37 // |
|
|
38 //####DESCRIPTIONEND#### |
|
|
39 |
|
|
40 // Declarations for test system: |
|
|
41 // |
|
|
42 // TESTCASE_TYPE=CYG_TEST_MODULE |
|
|
43 // COMPOUND_TESTCASE |
|
|
44 |
|
|
45 |
|
|
46 // CONFIGURATION |
|
|
47 |
|
|
48 #include <pkgconf/libc.h> // Configuration header |
|
|
49 |
|
|
50 // INCLUDES |
|
|
51 |
|
|
52 #include <string.h> |
|
|
53 #include <cyg/infra/testcase.h> |
|
|
54 #include <sys/cstartup.h> // C library initialisation |
|
|
55 |
|
|
56 |
|
|
57 // FUNCTIONS |
|
|
58 |
|
|
59 |
|
|
60 externC void |
|
|
61 cyg_package_start( void ) |
|
|
62 { |
|
|
63 #ifdef CYGPKG_LIBC |
|
|
64 cyg_iso_c_start(); |
|
|
65 #else |
|
|
66 (void)main(0, NULL); |
|
|
67 #endif |
|
|
68 } // cyg_package_start() |
|
|
69 |
|
|
70 |
|
|
71 |
|
|
72 // Functions to avoid having to use libc strings |
|
|
73 |
|
|
74 #ifdef CYGPKG_LIBC |
|
|
75 static int my_strlen(const char *s) |
|
|
76 { |
|
|
77 const char *ptr; |
|
|
78 |
|
|
79 ptr = s; |
|
|
80 for ( ptr=s ; *ptr != '\0' ; ptr++ ) |
|
|
81 ; |
|
|
82 |
|
|
83 return (int)(ptr-s); |
|
|
84 } // my_strlen() |
|
|
85 |
|
|
86 |
|
2
|
87 static int my_strncmp(const char *s1, const char *s2, size_t n) |
|
|
88 { |
|
|
89 if (n==0) |
|
|
90 return 0; |
|
|
91 |
|
|
92 while (n-- != 0 && *s1 == *s2) |
|
|
93 { |
|
|
94 if (n == 0 || *s1 == '\0' || *s2 == '\0') |
|
|
95 break; |
|
|
96 s1++; |
|
|
97 s2++; |
|
|
98 } |
|
|
99 |
|
|
100 return (*s1 - *s2); |
|
|
101 } // my_strncmp() |
|
|
102 |
|
|
103 |
|
0
|
104 static int my_strcmp(const char *s1, const char *s2) |
|
|
105 { |
|
|
106 for ( ; *s1 == *s2 ; s1++,s2++ ) |
|
|
107 { |
|
|
108 if ( *s1 == '\0' ) |
|
|
109 break; |
|
|
110 } // for |
|
|
111 |
|
|
112 return (*s1 - *s2); |
|
|
113 } // my_strcmp() |
|
|
114 |
|
|
115 |
|
|
116 static char *my_strcpy(char *s1, const char *s2) |
|
|
117 { |
|
|
118 while (*s2 != '\0') { |
|
|
119 *(s1++) = *(s2++); |
|
|
120 } |
|
|
121 *s1 = '\0'; |
|
|
122 |
|
|
123 return s1; |
|
|
124 } // my_strcpy() |
|
|
125 #endif // ifdef CYGPKG_LIBC |
|
|
126 |
|
|
127 |
|
2
|
128 int |
|
|
129 main( int argc, char *argv[] ) |
|
0
|
130 { |
|
|
131 #ifdef CYGPKG_LIBC |
|
|
132 char x[300]; |
|
|
133 char y[300]; |
|
|
134 char *ret; |
|
|
135 #endif |
|
|
136 |
|
|
137 CYG_TEST_INIT(); |
|
|
138 |
|
|
139 CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C library " |
|
|
140 "strncpy() function"); |
|
|
141 CYG_TEST_INFO("This testcase provides simple basic tests"); |
|
|
142 |
|
|
143 #ifdef CYGPKG_LIBC |
|
|
144 |
|
|
145 // Check 1 |
|
|
146 my_strcpy(x, "Nine rings for men doomed to die"); |
|
|
147 ret = strncpy(y, "Nine rings for men doomed to die", my_strlen(x)); |
|
2
|
148 CYG_TEST_PASS_FAIL( (my_strncmp(x, y, my_strlen(x)) == 0), |
|
|
149 "Simple copy" ); |
|
0
|
150 // Check return value |
|
|
151 CYG_TEST_PASS_FAIL( (y == ret), "Simple copy return value" ); |
|
|
152 |
|
|
153 |
|
|
154 // Check 2 |
|
|
155 my_strcpy(x, ""); |
|
|
156 my_strcpy(y, "Seven rings for the dwarves in their halls of stone"); |
|
|
157 ret = strncpy(y, x, 1); |
|
|
158 CYG_TEST_PASS_FAIL( (my_strcmp(y, "") == 0), "Copy empty string" ); |
|
|
159 // Check return value |
|
|
160 CYG_TEST_PASS_FAIL( (y == ret), "Copy empty string return value" ); |
|
|
161 |
|
|
162 // Check 3 |
|
|
163 my_strcpy(x, ""); |
|
|
164 my_strcpy(y, "Seven rings for the dwarves in their halls of stone"); |
|
|
165 ret = strncpy(y, x, 0); |
|
2
|
166 if (my_strcmp(y, "Seven rings for the dwarves " |
|
|
167 "in their halls of stone") == 0) |
|
0
|
168 CYG_TEST_PASS("Copy 0 characters"); |
|
|
169 else |
|
|
170 CYG_TEST_FAIL("Copy 0 characters"); |
|
|
171 // Check return value |
|
|
172 CYG_TEST_PASS_FAIL( (y == ret), "Copy empty string return value" ); |
|
|
173 |
|
|
174 |
|
|
175 #else // ifndef CYGPKG_LIBC |
|
2
|
176 CYG_TEST_NA("Testing is not applicable to this configuration"); |
|
0
|
177 #endif // ifndef CYGPKG_LIBC |
|
|
178 |
|
|
179 CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for C library " |
|
|
180 "strncpy() function"); |
|
|
181 |
|
|
182 } // main() |
|
|
183 |
|
|
184 // EOF strncpy1.c |
