Mercurial > ecos-v2_0-branch

comparison packages/language/c/libc/string/current/tests/memcpy2.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 // memcpy2.c
4 //
5 // Testcase for C library memcpy()
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 memcpy() 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 void *ret, *ptr1, *ptr2;
95 char *c_ret;
96 int ctr;
97 int fail;
98
99 CYG_TEST_INIT();
100
101 CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C library "
102 "memcpy() function");
103 CYG_TEST_INFO("This testcase tests robustness, and may take some time");
104
105
106 fail = 0;
107 for (ctr = 0; ctr < NUM_ROBUSTNESS_RUNS; ctr++) {
108 my_strcpy(x, "in the land of Mordor");
109 my_strcpy(y, " ");
110 ptr1 = x;
111 ptr2 = y;
112 ret = memcpy(ptr2, ptr1, my_strlen(x) + 1);
113 c_ret = ret;
114 if ((my_strcmp(y, x) != 0) || (my_strcmp(c_ret, x)!=0)) {
115 fail = 1;
116 break;
117 }
118 }
119
120 CYG_TEST_PASS_FAIL( (fail == 0), "Robustness test");
121
122 // CYG_TEST_NA("Testing is not applicable to this configuration");
123
124 CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for C library "
125 "memcpy() function");
126 } // main()
127
128
129 // EOF memcpy2.c