// © 2016 and later: Unicode, Inc. and others. // License & terms of use: http://www.unicode.org/copyright.html /******************************************************************** * COPYRIGHT: * Copyright (c) 1997-2015, International Business Machines Corporation and * others. All Rights Reserved. ********************************************************************/ /******************************************************************************** * * File CINTLTST.C * * Modification History: * Name Description * Madhu Katragadda Creation ********************************************************************************* */ /*The main root for C API tests*/ #include #include #include #include #include "unicode/utypes.h" #include "unicode/putil.h" #include "cstring.h" #include "cintltst.h" #include "uassert.h" #include "cmemory.h" #include "unicode/uchar.h" #include "unicode/ustring.h" #include "unicode/ucnv.h" #include "unicode/ures.h" #include "unicode/uclean.h" #include "unicode/ucal.h" #include "uoptions.h" #include "putilimp.h" /* for uprv_getRawUTCtime() */ #ifdef URES_DEBUG #include "uresimp.h" /* for ures_dumpCacheContents() */ #endif #ifdef XP_MAC_CONSOLE # include #endif #define CTST_MAX_ALLOC 8192 /* Array used as a queue */ static void * ctst_allocated_stuff[CTST_MAX_ALLOC] = {0}; static int ctst_allocated = 0; static UBool ctst_free = false; static int ctst_allocated_total = 0; #define CTST_LEAK_CHECK 1 #ifdef CTST_LEAK_CHECK static void ctst_freeAll(void); #endif /* * Forward Declarations */ void ctest_setICU_DATA(void); #if UCONFIG_NO_LEGACY_CONVERSION # define TRY_CNV_1 "iso-8859-1" # define TRY_CNV_2 "ibm-1208" #else # define TRY_CNV_1 "iso-8859-7" # define TRY_CNV_2 "sjis" #endif static int gOrigArgc; static const char* const * gOrigArgv; #ifdef UNISTR_COUNT_FINAL_STRING_LENGTHS U_CAPI void unistr_printLengths(); #endif int main(int argc, const char* const argv[]) { int nerrors = 0; UBool defaultDataFound; TestNode *root; const char *warnOrErr = "Failure"; UDate startTime, endTime; int32_t diffTime; /* initial check for the default converter */ UErrorCode errorCode = U_ZERO_ERROR; UResourceBundle *rb; UConverter *cnv; U_MAIN_INIT_ARGS(argc, argv); startTime = uprv_getRawUTCtime(); gOrigArgc = argc; gOrigArgv = argv; if (!initArgs(argc, argv, NULL, NULL)) { /* Error already displayed. */ return -1; } /* Check whether ICU will initialize without forcing the build data directory into * the ICU_DATA path. Success here means either the data dll contains data, or that * this test program was run with ICU_DATA set externally. Failure of this check * is normal when ICU data is not packaged into a shared library. * * Whether or not this test succeeds, we want to cleanup and reinitialize * with a data path so that data loading from individual files can be tested. */ defaultDataFound = true; u_init(&errorCode); if (U_FAILURE(errorCode)) { fprintf(stderr, "#### Note: ICU Init without build-specific setDataDirectory() failed. %s\n", u_errorName(errorCode)); defaultDataFound = false; } u_cleanup(); #ifdef URES_DEBUG fprintf(stderr, "After initial u_cleanup: RB cache %s empty.\n", ures_dumpCacheContents()?"WAS NOT":"was"); #endif while (getTestOption(REPEAT_TESTS_OPTION) > 0) { /* Loop runs once per complete execution of the tests * used for -r (repeat) test option. */ if (!initArgs(argc, argv, NULL, NULL)) { /* Error already displayed. */ return -1; } errorCode = U_ZERO_ERROR; /* Initialize ICU */ if (!defaultDataFound) { ctest_setICU_DATA(); /* u_setDataDirectory() must happen Before u_init() */ } u_init(&errorCode); if (U_FAILURE(errorCode)) { fprintf(stderr, "#### ERROR! %s: u_init() failed with status = \"%s\".\n" "*** Check the ICU_DATA environment variable and \n" "*** check that the data files are present.\n", argv[0], u_errorName(errorCode)); if(!getTestOption(WARN_ON_MISSING_DATA_OPTION)) { fprintf(stderr, "*** Exiting. Use the '-w' option if data files were\n*** purposely removed, to continue test anyway.\n"); u_cleanup(); return 1; } } /* try more data */ cnv = ucnv_open(TRY_CNV_2, &errorCode); if(cnv != 0) { /* ok */ ucnv_close(cnv); } else { fprintf(stderr, "*** %s! The converter for " TRY_CNV_2 " cannot be opened.\n" "*** Check the ICU_DATA environment variable and \n" "*** check that the data files are present.\n", warnOrErr); if(!getTestOption(WARN_ON_MISSING_DATA_OPTION)) { fprintf(stderr, "*** Exiting. Use the '-w' option if data files were\n*** purposely removed, to continue test anyway.\n"); u_cleanup(); return 1; } } rb = ures_open(NULL, "en", &errorCode); if(U_SUCCESS(errorCode)) { /* ok */ ures_close(rb); } else { fprintf(stderr, "*** %s! The \"en\" locale resource bundle cannot be opened.\n" "*** Check the ICU_DATA environment variable and \n" "*** check that the data files are present.\n", warnOrErr); if(!getTestOption(WARN_ON_MISSING_DATA_OPTION)) { fprintf(stderr, "*** Exiting. Use the '-w' option if data files were\n*** purposely removed, to continue test anyway.\n"); u_cleanup(); return 1; } } errorCode = U_ZERO_ERROR; rb = ures_open(NULL, NULL, &errorCode); if(U_SUCCESS(errorCode)) { /* ok */ if (errorCode == U_USING_DEFAULT_WARNING || errorCode == U_USING_FALLBACK_WARNING) { fprintf(stderr, "#### Note: The default locale %s is not available\n", uloc_getDefault()); } ures_close(rb); } else { fprintf(stderr, "*** %s! Can not open a resource bundle for the default locale %s\n", warnOrErr, uloc_getDefault()); if(!getTestOption(WARN_ON_MISSING_DATA_OPTION)) { fprintf(stderr, "*** Exiting. Use the '-w' option if data files were\n" "*** purposely removed, to continue test anyway.\n"); u_cleanup(); return 1; } } fprintf(stdout, "Default locale for this run is %s\n", uloc_getDefault()); /* Build a tree of all tests. * Subsequently will be used to find / iterate the tests to run */ root = NULL; addAllTests(&root); /* Tests actually run HERE. TODO: separate command line option parsing & setting from test execution!! */ nerrors = runTestRequest(root, argc, argv); setTestOption(REPEAT_TESTS_OPTION, DECREMENT_OPTION_VALUE); if (getTestOption(REPEAT_TESTS_OPTION) > 0) { printf("Repeating tests %d more time(s)\n", getTestOption(REPEAT_TESTS_OPTION)); } cleanUpTestTree(root); #ifdef CTST_LEAK_CHECK ctst_freeAll(); /* To check for leaks */ u_cleanup(); /* nuke the hashtable.. so that any still-open cnvs are leaked */ if(getTestOption(VERBOSITY_OPTION) && ctst_allocated_total>0) { fprintf(stderr,"ctst_freeAll(): cleaned up after %d allocations (queue of %d)\n", ctst_allocated_total, CTST_MAX_ALLOC); } #ifdef URES_DEBUG if(ures_dumpCacheContents()) { fprintf(stderr, "Error: After final u_cleanup, RB cache was not empty.\n"); nerrors++; } else { fprintf(stderr,"OK: After final u_cleanup, RB cache was empty.\n"); } #endif #endif } /* End of loop that repeats the entire test, if requested. (Normally doesn't loop) */ #ifdef UNISTR_COUNT_FINAL_STRING_LENGTHS unistr_printLengths(); #endif endTime = uprv_getRawUTCtime(); diffTime = (int32_t)(endTime - startTime); printf("Elapsed Time: %02d:%02d:%02d.%03d\n", (int)((diffTime%U_MILLIS_PER_DAY)/U_MILLIS_PER_HOUR), (int)((diffTime%U_MILLIS_PER_HOUR)/U_MILLIS_PER_MINUTE), (int)((diffTime%U_MILLIS_PER_MINUTE)/U_MILLIS_PER_SECOND), (int)(diffTime%U_MILLIS_PER_SECOND)); #ifdef ZERO_EXIT_CODE_FOR_FAILURES return 0; #else return nerrors ? 1 : 0; #endif } /* static void ctest_appendToDataDirectory(const char *toAppend) { const char *oldPath =""; char newBuf [1024]; char *newPath = newBuf; int32_t oldLen; int32_t newLen; if((toAppend == NULL) || (*toAppend == 0)) { return; } oldPath = u_getDataDirectory(); if( (oldPath==NULL) || (*oldPath == 0)) { u_setDataDirectory(toAppend); } else { oldLen = strlen(oldPath); newLen = strlen(toAppend)+1+oldLen; if(newLen > 1022) { newPath = (char *)ctst_malloc(newLen); } strcpy(newPath, oldPath); strcpy(newPath+oldLen, U_PATH_SEP_STRING); strcpy(newPath+oldLen+1, toAppend); u_setDataDirectory(newPath); if(newPath != newBuf) { free(newPath); } } } */ /* ctest_setICU_DATA - if the ICU_DATA environment variable is not already * set, try to deduce the directory in which ICU was built, * and set ICU_DATA to "icu/source/data" in that location. * The intent is to allow the tests to have a good chance * of running without requiring that the user manually set * ICU_DATA. Common data isn't a problem, since it is * picked up via a static (build time) reference, but the * tests dynamically load some data. */ void ctest_setICU_DATA() { // Android-changed: Do not u_setDataDirectory because libicuuc.so initializes itself. #if !defined(ANDROID_USE_ICU_REG) u_setDataDirectory(ctest_dataOutDir()); #endif } /* These tests do cleanup and reinitialize ICU in the course of their operation. * The ICU data directory must be preserved across these operations. * Here is a helper function to assist with that. */ static char *safeGetICUDataDirectory(void) { const char *dataDir = u_getDataDirectory(); /* Returned string vanashes with u_cleanup */ char *retStr = NULL; if (dataDir != NULL) { retStr = (char *)malloc(strlen(dataDir)+1); strcpy(retStr, dataDir); } return retStr; } UBool ctest_resetICU(void) { UErrorCode status = U_ZERO_ERROR; char *dataDir = safeGetICUDataDirectory(); u_cleanup(); if (!initArgs(gOrigArgc, gOrigArgv, NULL, NULL)) { /* Error already displayed. */ return false; } ctest_setICU_DATA(); free(dataDir); u_init(&status); if (U_FAILURE(status)) { log_err_status(status, "u_init failed with %s\n", u_errorName(status)); return false; } return true; } UChar* CharsToUChars(const char* str) { /* Might be faster to just use uprv_strlen() as the preflight len - liu */ int32_t len = u_unescape(str, 0, 0); /* preflight */ /* Do NOT use malloc() - we are supposed to be acting like user code! */ UChar *buf = (UChar*) malloc(sizeof(UChar) * (len + 1)); u_unescape(str, buf, len + 1); return buf; } char *austrdup(const UChar* unichars) { int length; char *newString; length = u_strlen ( unichars ); /*newString = (char*)malloc ( sizeof( char ) * 4 * ( length + 1 ) );*/ /* this leaks for now */ newString = (char*)ctst_malloc ( sizeof( char ) * 4 * ( length + 1 ) ); /* this shouldn't */ if ( newString == NULL ) return NULL; u_austrcpy ( newString, unichars ); return newString; } char *aescstrdup(const UChar* unichars,int32_t length){ char *newString,*targetLimit,*target; UConverterFromUCallback cb; const void *p; UErrorCode errorCode = U_ZERO_ERROR; #if U_CHARSET_FAMILY==U_EBCDIC_FAMILY # if U_PLATFORM == U_PF_OS390 static const char convName[] = "ibm-1047"; # else static const char convName[] = "ibm-37"; # endif #else static const char convName[] = "US-ASCII"; #endif UConverter* conv = ucnv_open(convName, &errorCode); if(length==-1){ length = u_strlen( unichars); } newString = (char*)ctst_malloc ( sizeof(char) * 8 * (length +1)); target = newString; targetLimit = newString+sizeof(char) * 8 * (length +1); ucnv_setFromUCallBack(conv, UCNV_FROM_U_CALLBACK_ESCAPE, UCNV_ESCAPE_C, &cb, &p, &errorCode); ucnv_fromUnicode(conv,&target,targetLimit, &unichars, (UChar*)(unichars+length),NULL,true,&errorCode); ucnv_close(conv); *target = '\0'; return newString; } const char* loadTestData(UErrorCode* err){ return ctest_loadTestData(err); } /** * Returns the path to icu/source/test/testdata/ * Note: this function is parallel with C++ getSourceTestData in intltest.cpp */ const char *loadSourceTestData(UErrorCode* err) { (void)err; const char *srcDataDir = NULL; #ifdef U_TOPSRCDIR srcDataDir = U_TOPSRCDIR U_FILE_SEP_STRING"test" U_FILE_SEP_STRING "testdata" U_FILE_SEP_STRING; #else srcDataDir = ".." U_FILE_SEP_STRING ".." U_FILE_SEP_STRING "test" U_FILE_SEP_STRING "testdata" U_FILE_SEP_STRING; FILE *f = fopen(".." U_FILE_SEP_STRING ".." U_FILE_SEP_STRING "test" U_FILE_SEP_STRING "testdata" U_FILE_SEP_STRING "rbbitst.txt", "r"); if (f) { /* We're in icu/source/test/intltest/ */ fclose(f); } else { /* We're in icu/source/test/intltest/Platform/(Debug|Release) */ srcDataDir = ".." U_FILE_SEP_STRING ".." U_FILE_SEP_STRING ".." U_FILE_SEP_STRING ".." U_FILE_SEP_STRING "test" U_FILE_SEP_STRING "testdata" U_FILE_SEP_STRING; } #endif return srcDataDir; } #define CTEST_MAX_TIMEZONE_SIZE 256 static UChar gOriginalTimeZone[CTEST_MAX_TIMEZONE_SIZE] = {0}; /** * Call this once to get a consistent timezone. Use ctest_resetTimeZone to set it back to the original value. * @param optionalTimeZone Set this to a requested timezone. * Set to NULL to use the standard test timezone (Pacific Time) */ U_CFUNC void ctest_setTimeZone(const char *optionalTimeZone, UErrorCode *status) { #if !UCONFIG_NO_FORMATTING UChar zoneID[CTEST_MAX_TIMEZONE_SIZE]; if (optionalTimeZone == NULL) { optionalTimeZone = "America/Los_Angeles"; } if (gOriginalTimeZone[0]) { log_data_err("*** Error: time zone saved twice. New value will be %s (Are you missing data?)\n", optionalTimeZone); } ucal_getDefaultTimeZone(gOriginalTimeZone, CTEST_MAX_TIMEZONE_SIZE, status); if (U_FAILURE(*status)) { log_err("*** Error: Failed to save default time zone: %s\n", u_errorName(*status)); *status = U_ZERO_ERROR; } u_uastrncpy(zoneID, optionalTimeZone, CTEST_MAX_TIMEZONE_SIZE-1); zoneID[CTEST_MAX_TIMEZONE_SIZE-1] = 0; ucal_setDefaultTimeZone(zoneID, status); if (U_FAILURE(*status)) { log_err("*** Error: Failed to set default time zone to \"%s\": %s\n", optionalTimeZone, u_errorName(*status)); } #endif } /** * Call this once get back the original timezone */ U_CFUNC void ctest_resetTimeZone(void) { #if !UCONFIG_NO_FORMATTING UErrorCode status = U_ZERO_ERROR; ucal_setDefaultTimeZone(gOriginalTimeZone, &status); if (U_FAILURE(status)) { log_err("*** Error: Failed to reset default time zone: %s\n", u_errorName(status)); } /* Set to an empty state */ gOriginalTimeZone[0] = 0; #endif } void *ctst_malloc(size_t size) { ctst_allocated_total++; if(ctst_allocated >= CTST_MAX_ALLOC - 1) { ctst_allocated = 0; ctst_free = true; } if(ctst_allocated_stuff[ctst_allocated]) { free(ctst_allocated_stuff[ctst_allocated]); } return ctst_allocated_stuff[ctst_allocated++] = malloc(size); } #ifdef CTST_LEAK_CHECK static void ctst_freeAll(void) { int i; if(ctst_free == false) { /* only free up to the allocated mark */ for(i=0; i 0' which it evaluates as int */ U_CFUNC UBool assertTrue(const char* msg, int /*not UBool*/ condition) { if (!condition) { log_err("FAIL: assertTrue() failed: %s\n", msg); } #ifdef VERBOSE_ASSERTIONS else { log_verbose("Ok: %s\n", msg); } #endif return (UBool)condition; } U_CFUNC UBool assertEquals(const char* message, const char* expected, const char* actual) { if (expected == NULL) { expected = "(null)"; } if (actual == NULL) { actual = "(null)"; } if (uprv_strcmp(expected, actual) != 0) { log_err("FAIL: %s; got \"%s\"; expected \"%s\"\n", message, actual, expected); return false; } #ifdef VERBOSE_ASSERTIONS else { log_verbose("Ok: %s; got \"%s\"\n", message, actual); } #endif return true; } U_CFUNC UBool assertUEquals(const char* message, const UChar* expected, const UChar* actual) { if (expected == NULL) { expected = u"(null)"; } if (actual == NULL) { actual = u"(null)"; } for (int32_t i=0;; i++) { if (expected[i] != actual[i]) { log_err("FAIL: %s; got \"%s\"; expected \"%s\"\n", message, austrdup(actual), austrdup(expected)); return false; } UChar curr = expected[i]; U_ASSERT(curr == actual[i]); if (curr == 0) { break; } } #ifdef VERBOSE_ASSERTIONS log_verbose("Ok: %s; got \"%s\"\n", message, austrdup(actual)); #endif return true; } U_CFUNC UBool assertIntEquals(const char* message, int64_t expected, int64_t actual) { if (expected != actual) { log_err("FAIL: %s; got \"%d\"; expected \"%d\"\n", message, actual, expected); return false; } #ifdef VERBOSE_ASSERTIONS else { log_verbose("Ok: %s; got \"%d\"\n", message, actual); } #endif return true; } U_CFUNC UBool assertPtrEquals(const char* message, const void* expected, const void* actual) { if (expected != actual) { log_err("FAIL: %s; got 0x%llx; expected 0x%llx\n", message, actual, expected); return false; } #ifdef VERBOSE_ASSERTIONS else { log_verbose("Ok: %s; got 0x%llx\n", message, actual); } #endif return true; } U_CFUNC UBool assertDoubleEquals(const char *message, double expected, double actual) { if (expected != actual) { log_err("FAIL: %s; got \"%f\"; expected \"%f\"\n", message, actual, expected); return false; } #ifdef VERBOSE_ASSERTIONS else { log_verbose("Ok: %s; got \"%f\"\n", message, actual); } #endif return true; } #endif