Mercurial > ecos-v2_0-branch

comparison packages/language/c/libc/string/current/tests/strncpy2.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 // strncpy2.c
4 //
5 // Testcase for C library strncpy()
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 strncpy() function
38 //
39 //
40 //####DESCRIPTIONEND####
41
42 // INCLUDES
43
44 #include <string.h>
45 #include <cyg/infra/testcase.h>
46
47 // CONSTANTS
48
49 #define NUM_ROBUSTNESS_RUNS 300
50
51 // FUNCTIONS
52
53 // Functions to avoid having to use libc strings
54
55 static int my_strlen(const char *s)
56 {
57 const char *ptr;
58
59 ptr = s;
60 for ( ptr=s ; *ptr != '\0' ; ptr++ )
61 ;
62
63 return (int)(ptr-s);
64 } // my_strlen()
65
66
67 static int my_strcmp(const char *s1, const char *s2)
68 {
69 for ( ; *s1 == *s2 ; s1++,s2++ )
70 {
71 if ( *s1 == '\0' )
72 break;
73 } // for
74
75 return (*s1 - *s2);
76 } // my_strcmp()
77
78
79 static char *my_strcpy(char *s1, const char *s2)
80 {
81 while (*s2 != '\0') {
82 *(s1++) = *(s2++);
83 }
84 *s1 = '\0';
85
86 return s1;
87 } // my_strcpy()
88
89
90 int main( int argc, char *argv[] )
91 {
92 char x[300];
93 char y[300];
94 char *ret;
95 int ctr;
96 int fail;
97
98 CYG_TEST_INIT();
99
100 CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C library "
101 "strncpy() function");
102 CYG_TEST_INFO("This testcase tests robustness, and may take some time");
103
104 fail = 0;
105 for (ctr = 0; ctr < NUM_ROBUSTNESS_RUNS; ctr++) {
106 my_strcpy(x, "Green plastic watering can, ");
107 my_strcpy(y, "for her fake Chineese rubber plant");
108 ret = strncpy(x, y, my_strlen(y)+1);
109 if ( (my_strcmp(x, "for her fake Chineese rubber plant") != 0) ||
110 ( ret != x ) )
111 {
112 fail = 1;
113 break;
114 } // if
115 } // for
116 CYG_TEST_PASS_FAIL( (fail == 0), "Robustness test" );
117
118 // CYG_TEST_NA("Testing is not applicable to this configuration");
119
120 CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for C library "
121 "strncpy() function");
122 } // main()
123
124 // EOF strncpy2.c