Mercurial > flash_v2
diff packages/language/c/libc/current/tests/stdlib/getenv.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/stdlib/getenv.c @@ -0,0 +1,156 @@ +//================================================================= +// +// getenv.c +// +// Testcase for C library getenv() +// +//================================================================= +//####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): jlarmour@cygnus.co.uk +// Contributors: jlarmour@cygnus.co.uk +// Date: 1998/8/31 +// Description: Contains testcode for C library getenv() function +// +// +//####DESCRIPTIONEND#### + +// Declarations for test system: +// +// TESTCASE_TYPE=CYG_TEST_MODULE + + +// CONFIGURATION + +#include <pkgconf/libc.h> // Configuration header + +// INCLUDES + +#include <stdlib.h> // Main header for stdlib functions +#include <cyg/infra/testcase.h> // Testcase API +#include <sys/cstartup.h> // C library initialisation + +// GLOBALS + +#if defined(CYGPKG_LIBC) && defined(CYGPKG_LIBC_ENVIRONMENT) +extern char **environ; // Standard environment definition +#endif + +// FUNCTIONS + +externC void +cyg_package_start( void ) +{ +#ifdef CYGPKG_LIBC + cyg_iso_c_start(); +#else + (void)main(0, NULL); +#endif +} // cyg_package_start() + +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() + + +int +main( int argc, char *argv[] ) +{ +#ifdef CYGPKG_LIBC + char *str; + + char *env1[] = { NULL }; + char *env2[] = { "WIBBLE=fred", NULL }; + char *env3[] = { "PATH=/usr/local/bin:/usr/bin", + "HOME=/home/fred", + "TEST=1234=5678", + "home=hatstand", + NULL }; +#endif + + CYG_TEST_INIT(); + + CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C " + "library getenv() function"); + +#if defined(CYGPKG_LIBC) && defined(CYGPKG_LIBC_ENVIRONMENT) + // Check 1 + environ = (char **)&env1; + str = getenv("wibble"); + CYG_TEST_PASS_FAIL( str==NULL, "Simple getenv() with empty environ" ); + + // Check 2 + environ = (char **)&env2; + str = getenv("WIBBLE"); + CYG_TEST_PASS_FAIL( (str != NULL) && !my_strcmp(str, "fred"), + "Simple getenv()" ); + + // Check 3 + str = getenv("wibble"); + CYG_TEST_PASS_FAIL( str==NULL, + "Simple getenv() for something not in the " + "environment" ); + + // Check 4 + environ = (char **)&env3; + str = getenv("PATH"); + CYG_TEST_PASS_FAIL( (str!= NULL) && + !my_strcmp(str,"/usr/local/bin:/usr/bin"), + "Multiple string environment" ); + + // Check 5 + str = getenv("PATh"); + CYG_TEST_PASS_FAIL( str==NULL, "getenv() for something not in the " + "environment for multiple string environment" ); + + // Check 6 + str = getenv("home"); + CYG_TEST_PASS_FAIL( (str != NULL) && !my_strcmp(str, "hatstand"), + "Case-sensitive environment names" ); + + // Check 7 + str = getenv("TEST"); + CYG_TEST_PASS_FAIL( (str != NULL) && !my_strcmp(str, "1234=5678"), + "environment value containing '='" ); + + +#else + CYG_TEST_PASS("Testing is not applicable to this configuration"); +#endif // if defined(CYGPKG_LIBC) && defined(CYGPKG_LIBC_ENVIRONMENT) + + CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for C " + "library getenv() function"); + +} // main() + +// EOF getenv.c
