Mercurial > ecos
diff packages/language/c/libc/current/tests/string/strncpy1.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/strncpy1.c @@ -0,0 +1,164 @@ +//================================================================= +// +// strncpy1.c +// +// Testcase for C library strncpy() +// +//================================================================= +//####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 strncpy() 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]; + char *ret; +#endif + + CYG_TEST_INIT(); + + CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C library " + "strncpy() function"); + CYG_TEST_INFO("This testcase provides simple basic tests"); + +#ifdef CYGPKG_LIBC + + // Check 1 + my_strcpy(x, "Nine rings for men doomed to die"); + ret = strncpy(y, "Nine rings for men doomed to die", my_strlen(x)); + CYG_TEST_PASS_FAIL( (my_strcmp(x, y) == 0), "Simple copy" ); + // Check return value + CYG_TEST_PASS_FAIL( (y == ret), "Simple copy return value" ); + + + // Check 2 + my_strcpy(x, ""); + my_strcpy(y, "Seven rings for the dwarves in their halls of stone"); + ret = strncpy(y, x, 1); + CYG_TEST_PASS_FAIL( (my_strcmp(y, "") == 0), "Copy empty string" ); + // Check return value + CYG_TEST_PASS_FAIL( (y == ret), "Copy empty string return value" ); + + // Check 3 + my_strcpy(x, ""); + my_strcpy(y, "Seven rings for the dwarves in their halls of stone"); + ret = strncpy(y, x, 0); + if (my_strcmp(y, "Seven rings for the dwarves in their halls of stone") == 0) + CYG_TEST_PASS("Copy 0 characters"); + else + CYG_TEST_FAIL("Copy 0 characters"); + // Check return value + CYG_TEST_PASS_FAIL( (y == ret), "Copy empty string return value" ); + + +#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 " + "strncpy() function"); + +} // main() + +// EOF strncpy1.c
