Mercurial > ecos

comparison packages/language/c/libc/string/current/tests/strcpy1.c @ 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 e0c0827131d1
comparison
equal deleted inserted replaced
114:5ad2b71d525e 115:6ed91473a1cd
1 //=================================================================
2 //
3 // strcpy1.c
4 //
5 // Testcase for C library strcpy()
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): ctarpy, jlarmour
35 // Contributors:
36 // Date: 2000-04-30
37 // Description: Contains testcode for C library strcpy() function
38 //
39 //
40 //####DESCRIPTIONEND####
41
42 // INCLUDES
43
44 #include <string.h>
45 #include <cyg/infra/testcase.h>
46
47
48 // FUNCTIONS
49
50 // Functions to avoid having to use libc strings
51
52 static int my_strcmp(const char *s1, const char *s2)
53 {
54 for ( ; *s1 == *s2 ; s1++,s2++ )
55 {
56 if ( *s1 == '\0' )
57 break;
58 } // for
59
60 return (*s1 - *s2);
61 } // my_strcmp()
62
63
64 static char *my_strcpy(char *s1, const char *s2)
65 {
66 while (*s2 != '\0') {
67 *(s1++) = *(s2++);
68 }
69 *s1 = '\0';
70
71 return s1;
72 } // my_strcpy()
73
74
75 int main( int argc, char *argv[] )
76 {
77 char x[300];
78 char y[300];
79 char *ret;
80
81 CYG_TEST_INIT();
82
83 CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C library "
84 "strcpy() function");
85 CYG_TEST_INFO("This testcase provides simple basic tests");
86
87 // Check 1
88 my_strcpy(x, "Nine rings for men doomed to die");
89 ret = strcpy(y, "Nine rings for men doomed to die");
90 CYG_TEST_PASS_FAIL( (my_strcmp(x, y) == 0), "Simple copy" );
91 // Check return value
92 CYG_TEST_PASS_FAIL( (y == ret), "Simple copy return value" );
93
94
95 // Check 2
96 my_strcpy(x, "");
97 my_strcpy(y, "Seven rings for the dwarves in their halls of stone");
98 ret = strcpy(y, x);
99 CYG_TEST_PASS_FAIL( (my_strcmp(y, "") == 0), "Copy empty string" );
100 // Check return value
101 CYG_TEST_PASS_FAIL( (y == ret), "Copy empty string return value" );
102
103 // CYG_TEST_NA("Testing is not applicable to this configuration");
104
105 CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for C library "
106 "strcpy() function");
107
108 } // main()
109
110 // EOF strcpy1.c