Mercurial > nand-ecoscentric
diff packages/language/c/libc/current/tests/string/memmove1.c @ 0:3111d98ba7b3 ecos-v1_1-release
Initial commit of eCos version 1.1
| author | jlarmour |
|---|---|
| date | Tue, 11 May 1999 11:16:07 +0000 |
| parents | |
| children | 443894e2e912 |
line wrap: on
line diff
new file mode 100644 --- /dev/null +++ b/packages/language/c/libc/current/tests/string/memmove1.c @@ -0,0 +1,195 @@ +//================================================================= +// +// memmove1.c +// +// Testcase for C library memmove() +// +//================================================================= +//####COPYRIGHTBEGIN#### +// +// ------------------------------------------- +// The contents of this file are subject to the Cygnus eCos Public License +// Version 1.0 (the "License"); you may not use this file except in +// compliance with the License. You may obtain a copy of the License at +// http://sourceware.cygnus.com/ecos +// +// Software distributed under the License is distributed on an "AS IS" +// basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the +// License for the specific language governing rights and limitations under +// the License. +// +// The Original Code is eCos - Embedded Cygnus Operating System, released +// September 30, 1998. +// +// The Initial Developer of the Original Code is Cygnus. Portions created +// by Cygnus are Copyright (C) 1998 Cygnus Solutions. All Rights Reserved. +// ------------------------------------------- +// +//####COPYRIGHTEND#### +//================================================================= +//#####DESCRIPTIONBEGIN#### +// +// Author(s): ctarpy@cygnus.co.uk, jlarmour@cygnus.co.uk +// Contributors: jlarmour@cygnus.co.uk +// Date: 1998/6/3 +// Description: Contains testcode for C library memmove() function +// +// +//####DESCRIPTIONEND#### + +// Declarations for test system: +// +// TESTCASE_TYPE=CYG_TEST_MODULE +// COMPOUND_TESTCASE + + +// CONFIGURATION + +#include <pkgconf/libc.h> // Configuration header + +// INCLUDES + +#include <string.h> +#include <cyg/infra/testcase.h> +#include <sys/cstartup.h> // C library initialisation + + +// FUNCTIONS + + +externC void +cyg_package_start( void ) +{ +#ifdef CYGPKG_LIBC + cyg_iso_c_start(); +#else + (void)main(0, NULL); +#endif +} // cyg_package_start() + + + +// Functions to avoid having to use libc strings + +#ifdef CYGPKG_LIBC +static int my_strlen(const char *s) +{ + const char *ptr; + + ptr = s; + for ( ptr=s ; *ptr != '\0' ; ptr++ ) + ; + + return (int)(ptr-s); +} // my_strlen() + + +static int my_strcmp(const char *s1, const char *s2) +{ + for ( ; *s1 == *s2 ; s1++,s2++ ) + { + if ( *s1 == '\0' ) + break; + } // for + + return (*s1 - *s2); +} // my_strcmp() + + +static char *my_strcpy(char *s1, const char *s2) +{ + while (*s2 != '\0') { + *(s1++) = *(s2++); + } + *s1 = '\0'; + + return s1; +} // my_strcpy() +#endif // ifdef CYGPKG_LIBC + + +int main( int argc, char *argv[] ) +{ +#ifdef CYGPKG_LIBC + char x[300]; + char y[300]; + void *ret, *ptr1, *ptr2; + char *c_ret; +#endif + + CYG_TEST_INIT(); + + CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C library " + "memmove() function"); + CYG_TEST_INFO("This testcase provides simple basic tests"); + +#ifdef CYGPKG_LIBC + + // Check 1 + ptr1 = x; + ptr2 = y; + my_strcpy(x, "Great shot kid! That was one in a million!"); + ret = memmove(ptr2, ptr1, my_strlen(x) + 1); + CYG_TEST_PASS_FAIL( (my_strcmp(x, ptr2)==0), "Simple copy" ); + + // Check return value + CYG_TEST_PASS_FAIL( (my_strcmp(ret, ptr2)==0), "Simple copy return value"); + + + // Check 2 + ptr1 = x; + ptr2 = y; + my_strcpy(x, ""); + my_strcpy(y, "xxxx"); // Bogus val to get overwritten + ret = memmove(ptr2, ptr1, 1); + c_ret = ret; + if ((*c_ret == '\0') && (y[0] == '\0') && (y[1] == 'x')) + CYG_TEST_PASS("Simple copy with boundary check worked"); + else + CYG_TEST_FAIL("Simple copy with boundary check failed"); + + // Check 3 + ptr1 = x; + ptr2 = y; + my_strcpy(x, "xxxx"); + my_strcpy(y, "yyyy"); + ret = memmove(ptr1, ptr2, 0); + c_ret = ret; + if ((*c_ret =='x') && (x[0] == 'x')) + CYG_TEST_PASS("Simple copy with size=0 worked"); + else + CYG_TEST_FAIL("Simple copy with size=0 failed"); + + // Check 4 + ptr1 = &x[0]; + ptr2 = &x[1]; + my_strcpy(x, "abcd"); + ret = memmove(ptr1, ptr2, 4); + c_ret = ret; + if ( (c_ret==x) && (my_strcmp(x, "bcd")==0) ) + CYG_TEST_PASS("Overlapping copy #1 worked"); + else + CYG_TEST_FAIL("Overlapping copy #1 worked"); + + // Check 5 + ptr1 = &x[0]; + ptr2 = &x[4]; + my_strcpy(x, "abcdefghijk"); + ret = memmove(ptr1, ptr2, 6); + c_ret = ret; + if ( (c_ret==x) && (my_strcmp(x, "efghijghijk")==0) ) + CYG_TEST_PASS("Overlapping copy #2 worked"); + else + CYG_TEST_FAIL("Overlapping copy #2 worked"); + + +#else // ifndef CYGPKG_LIBC + CYG_TEST_PASS("Testing is not applicable to this configuration"); +#endif // ifndef CYGPKG_LIBC + + CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for C library " + "memmove() function"); +} // main() + + +// EOF memmove1.c
