Mercurial > ecos

comparison packages/language/c/libc/current/tests/string/strxfrm1.c @ 0:3111d98ba7b3 ecos-v1_1-release

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial commit of eCos version 1.1
author jlarmour
date Tue, 11 May 1999 11:16:07 +0000
parents
children 443894e2e912
comparison
equal deleted inserted replaced
-1:000000000000 0:3111d98ba7b3
1 //=================================================================
2 //
3 // strxfrm1.c
4 //
5 // Testcase for C library strxfrm()
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
25 // by Cygnus are Copyright (C) 1998 Cygnus Solutions. All Rights Reserved.
26 // -------------------------------------------
27 //
28 //####COPYRIGHTEND####
29 //=================================================================
30 //#####DESCRIPTIONBEGIN####
31 //
32 // Author(s): ctarpy@cygnus.co.uk, jlarmour@cygnus.co.uk
33 // Contributors: jlarmour@cygnus.co.uk
34 // Date: 1998/6/3
35 // Description: Contains testcode for C library strxfrm() 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 #ifdef CYGPKG_LIBC
72
73 // Functions to avoid having to use libc strings
74
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
87 static int my_strcmp(const char *s1, const char *s2)
88 {
89 for ( ; *s1 == *s2 ; s1++,s2++ )
90 {
91 if ( *s1 == '\0' )
92 break;
93 } // for
94
95 return (*s1 - *s2);
96 } // my_strcmp()
97
98
99 static char *my_strcpy(char *s1, const char *s2)
100 {
101 while (*s2 != '\0') {
102 *(s1++) = *(s2++);
103 }
104 *s1 = '\0';
105
106 return s1;
107 } // my_strcpy()
108
109 #endif // ifdef CYGPKG_LIBC
110
111
112 int main( int argc, char *argv[] )
113 {
114 #ifdef CYGPKG_LIBC
115 char x[300];
116 char y[300];
117 int ret;
118 #endif
119
120 CYG_TEST_INIT();
121
122 CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C library "
123 "strxfrm() function");
124 CYG_TEST_INFO("This testcase provides simple basic tests");
125
126 #ifdef CYGPKG_LIBC
127
128 // Check 1
129 my_strcpy(x, "Nine rings for men doomed to die");
130 ret = strxfrm(y, x, my_strlen(x)+1);
131 if (my_strcmp(x, y) == 0)
132 CYG_TEST_PASS("Simple strxfrm()");
133 else
134 CYG_TEST_FAIL("Simple strxfrm()");
135 // Check return value
136 CYG_TEST_PASS_FAIL( (my_strlen(x) == ret),
137 "Simple strxfrm() return value");
138
139 // Check 2
140 x[0] = '\0';
141 my_strcpy(y, "Seven rings for the dwarves in their halls of stone");
142 ret = strxfrm(y, x, my_strlen(x)+1);
143 if (my_strcmp(y, "") == 0)
144 CYG_TEST_PASS("strxfrm() of empty string");
145 else
146 CYG_TEST_FAIL("strxfrm() of empty string");
147 // Check return value
148 CYG_TEST_PASS_FAIL( (my_strlen(x) == ret),
149 "strxfrm() of empty string return value");
150
151 // Check 3
152 my_strcpy(y, "Seven rings for the dwarves in their halls of stone");
153 ret = strxfrm(NULL, y, 0);
154
155 // Check return value
156 CYG_TEST_PASS_FAIL( (my_strlen(y) == ret),
157 "strxfrm() of NULL string for 0 bytes return value");
158
159 #else // ifndef CYGPKG_LIBC
160 CYG_TEST_PASS("Testing is not applicable to this configuration");
161 #endif // ifndef CYGPKG_LIBC
162
163 CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for C library "
164 "strxfrm() function");
165 } // main()
166
167
168 // EOF strxfrm1.c