Home | History | Annotate | Download | only in cintltst
      1 /********************************************************************
      2  * COPYRIGHT:
      3  * Copyright (c) 1997-2012, International Business Machines Corporation and
      4  * others. All Rights Reserved.
      5  ********************************************************************/
      6 /********************************************************************************
      7 *
      8 * File CINTLTST.C
      9 *
     10 * Modification History:
     11 *        Name                     Description
     12 *     Madhu Katragadda               Creation
     13 *********************************************************************************
     14 */
     15 
     16 /*The main root for C API tests*/
     17 
     18 #include <stdlib.h>
     19 #include <stdio.h>
     20 #include <string.h>
     21 #include "unicode/utypes.h"
     22 #include "unicode/putil.h"
     23 #include "cstring.h"
     24 #include "cintltst.h"
     25 #include "umutex.h"
     26 #include "uassert.h"
     27 #include "cmemory.h"
     28 #include "unicode/uchar.h"
     29 #include "unicode/ustring.h"
     30 #include "unicode/ucnv.h"
     31 #include "unicode/ures.h"
     32 #include "unicode/uclean.h"
     33 #include "unicode/ucal.h"
     34 #include "uoptions.h"
     35 #include "putilimp.h" /* for uprv_getRawUTCtime() */
     36 #ifdef URES_DEBUG
     37 #include "uresimp.h" /* for ures_dumpCacheContents() */
     38 #endif
     39 
     40 #ifdef XP_MAC_CONSOLE
     41 #   include <console.h>
     42 #endif
     43 
     44 #define CTST_MAX_ALLOC 8192
     45 /* Array used as a queue */
     46 static void * ctst_allocated_stuff[CTST_MAX_ALLOC] = {0};
     47 static int ctst_allocated = 0;
     48 static UBool ctst_free = FALSE;
     49 static int ctst_allocated_total = 0;
     50 
     51 #define CTST_LEAK_CHECK 1
     52 
     53 #ifdef CTST_LEAK_CHECK
     54 static void ctst_freeAll(void);
     55 #endif
     56 
     57 static char* _testDataPath=NULL;
     58 
     59 /*
     60  *  Forward Declarations
     61  */
     62 void ctest_setICU_DATA(void);
     63 
     64 
     65 
     66 #if UCONFIG_NO_LEGACY_CONVERSION
     67 #   define TRY_CNV_1 "iso-8859-1"
     68 #   define TRY_CNV_2 "ibm-1208"
     69 #else
     70 #   define TRY_CNV_1 "iso-8859-7"
     71 #   define TRY_CNV_2 "sjis"
     72 #endif
     73 
     74 static int gOrigArgc;
     75 static const char* const * gOrigArgv;
     76 
     77 int main(int argc, const char* const argv[])
     78 {
     79     int nerrors = 0;
     80     UBool   defaultDataFound;
     81     TestNode *root;
     82     const char *warnOrErr = "Failure";
     83     UDate startTime, endTime;
     84     int32_t diffTime;
     85 
     86     /* initial check for the default converter */
     87     UErrorCode errorCode = U_ZERO_ERROR;
     88     UResourceBundle *rb;
     89     UConverter *cnv;
     90 
     91     U_MAIN_INIT_ARGS(argc, argv);
     92 
     93     startTime = uprv_getRawUTCtime();
     94 
     95     gOrigArgc = argc;
     96     gOrigArgv = argv;
     97     if (!initArgs(argc, argv, NULL, NULL)) {
     98         /* Error already displayed. */
     99         return -1;
    100     }
    101 
    102     /* Check whether ICU will initialize without forcing the build data directory into
    103      *  the ICU_DATA path.  Success here means either the data dll contains data, or that
    104      *  this test program was run with ICU_DATA set externally.  Failure of this check
    105      *  is normal when ICU data is not packaged into a shared library.
    106      *
    107      *  Whether or not this test succeeds, we want to cleanup and reinitialize
    108      *  with a data path so that data loading from individual files can be tested.
    109      */
    110     defaultDataFound = TRUE;
    111     u_init(&errorCode);
    112     if (U_FAILURE(errorCode)) {
    113         fprintf(stderr,
    114             "#### Note:  ICU Init without build-specific setDataDirectory() failed. %s\n", u_errorName(errorCode));
    115         defaultDataFound = FALSE;
    116     }
    117     u_cleanup();
    118 #ifdef URES_DEBUG
    119     fprintf(stderr, "After initial u_cleanup: RB cache %s empty.\n", ures_dumpCacheContents()?"WAS NOT":"was");
    120 #endif
    121 
    122     while (getTestOption(REPEAT_TESTS_OPTION) > 0) {   /* Loop runs once per complete execution of the tests
    123                                   *   used for -r  (repeat) test option.                */
    124         if (!initArgs(argc, argv, NULL, NULL)) {
    125             /* Error already displayed. */
    126             return -1;
    127         }
    128         errorCode = U_ZERO_ERROR;
    129 
    130         /* Initialize ICU */
    131         if (!defaultDataFound) {
    132             ctest_setICU_DATA();    /* u_setDataDirectory() must happen Before u_init() */
    133         }
    134         u_init(&errorCode);
    135         if (U_FAILURE(errorCode)) {
    136             fprintf(stderr,
    137                 "#### ERROR! %s: u_init() failed with status = \"%s\".\n"
    138                 "*** Check the ICU_DATA environment variable and \n"
    139                 "*** check that the data files are present.\n", argv[0], u_errorName(errorCode));
    140                 if(!getTestOption(WARN_ON_MISSING_DATA_OPTION)) {
    141                     fprintf(stderr, "*** Exiting.  Use the '-w' option if data files were\n*** purposely removed, to continue test anyway.\n");
    142                     u_cleanup();
    143                     return 1;
    144                 }
    145         }
    146 
    147 
    148 
    149         /* try more data */
    150         cnv = ucnv_open(TRY_CNV_2, &errorCode);
    151         if(cnv != 0) {
    152             /* ok */
    153             ucnv_close(cnv);
    154         } else {
    155             fprintf(stderr,
    156                     "*** %s! The converter for " TRY_CNV_2 " cannot be opened.\n"
    157                     "*** Check the ICU_DATA environment variable and \n"
    158                     "*** check that the data files are present.\n", warnOrErr);
    159             if(!getTestOption(WARN_ON_MISSING_DATA_OPTION)) {
    160                 fprintf(stderr, "*** Exitting.  Use the '-w' option if data files were\n*** purposely removed, to continue test anyway.\n");
    161                 u_cleanup();
    162                 return 1;
    163             }
    164         }
    165 
    166         rb = ures_open(NULL, "en", &errorCode);
    167         if(U_SUCCESS(errorCode)) {
    168             /* ok */
    169             ures_close(rb);
    170         } else {
    171             fprintf(stderr,
    172                     "*** %s! The \"en\" locale resource bundle cannot be opened.\n"
    173                     "*** Check the ICU_DATA environment variable and \n"
    174                     "*** check that the data files are present.\n", warnOrErr);
    175             if(!getTestOption(WARN_ON_MISSING_DATA_OPTION)) {
    176                 fprintf(stderr, "*** Exitting.  Use the '-w' option if data files were\n*** purposely removed, to continue test anyway.\n");
    177                 u_cleanup();
    178                 return 1;
    179             }
    180         }
    181 
    182         errorCode = U_ZERO_ERROR;
    183         rb = ures_open(NULL, NULL, &errorCode);
    184         if(U_SUCCESS(errorCode)) {
    185             /* ok */
    186             if (errorCode == U_USING_DEFAULT_WARNING || errorCode == U_USING_FALLBACK_WARNING) {
    187                 fprintf(stderr,
    188                         "#### Note: The default locale %s is not available\n", uloc_getDefault());
    189             }
    190             ures_close(rb);
    191         } else {
    192             fprintf(stderr,
    193                     "*** %s! Can not open a resource bundle for the default locale %s\n", warnOrErr, uloc_getDefault());
    194             if(!getTestOption(WARN_ON_MISSING_DATA_OPTION)) {
    195                 fprintf(stderr, "*** Exitting.  Use the '-w' option if data files were\n"
    196                     "*** purposely removed, to continue test anyway.\n");
    197                 u_cleanup();
    198                 return 1;
    199             }
    200         }
    201         fprintf(stdout, "Default locale for this run is %s\n", uloc_getDefault());
    202 
    203         /* Build a tree of all tests.
    204          *   Subsequently will be used to find / iterate the tests to run */
    205         root = NULL;
    206         addAllTests(&root);
    207 
    208         /*  Tests acutally run HERE.   TODO:  separate command line option parsing & setting from test execution!! */
    209         nerrors = runTestRequest(root, argc, argv);
    210 
    211         setTestOption(REPEAT_TESTS_OPTION, DECREMENT_OPTION_VALUE);
    212         if (getTestOption(REPEAT_TESTS_OPTION) > 0) {
    213             printf("Repeating tests %d more time(s)\n", getTestOption(REPEAT_TESTS_OPTION));
    214         }
    215         cleanUpTestTree(root);
    216 
    217 #ifdef CTST_LEAK_CHECK
    218         ctst_freeAll();
    219         /* To check for leaks */
    220         u_cleanup(); /* nuke the hashtable.. so that any still-open cnvs are leaked */
    221 
    222         if(getTestOption(VERBOSITY_OPTION) && ctst_allocated_total>0) {
    223           fprintf(stderr,"ctst_freeAll():  cleaned up after %d allocations (queue of %d)\n", ctst_allocated_total, CTST_MAX_ALLOC);
    224         }
    225 #ifdef URES_DEBUG
    226         if(ures_dumpCacheContents()) {
    227           fprintf(stderr, "Error: After final u_cleanup, RB cache was not empty.\n");
    228           nerrors++;
    229         } else {
    230           fprintf(stderr,"OK: After final u_cleanup, RB cache was empty.\n");
    231         }
    232 #endif
    233 #endif
    234 
    235     }  /* End of loop that repeats the entire test, if requested.  (Normally doesn't loop)  */
    236 
    237     if (ALLOCATION_COUNT > 0) {
    238         fprintf(stderr, "There were %d blocks leaked!\n", ALLOCATION_COUNT);
    239         nerrors++;
    240     }
    241     endTime = uprv_getRawUTCtime();
    242     diffTime = (int32_t)(endTime - startTime);
    243     printf("Elapsed Time: %02d:%02d:%02d.%03d\n",
    244         (int)((diffTime%U_MILLIS_PER_DAY)/U_MILLIS_PER_HOUR),
    245         (int)((diffTime%U_MILLIS_PER_HOUR)/U_MILLIS_PER_MINUTE),
    246         (int)((diffTime%U_MILLIS_PER_MINUTE)/U_MILLIS_PER_SECOND),
    247         (int)(diffTime%U_MILLIS_PER_SECOND));
    248 
    249     return nerrors ? 1 : 0;
    250 }
    251 
    252 /*
    253 static void ctest_appendToDataDirectory(const char *toAppend)
    254 {
    255     const char *oldPath ="";
    256     char newBuf [1024];
    257     char *newPath = newBuf;
    258     int32_t oldLen;
    259     int32_t newLen;
    260 
    261     if((toAppend == NULL) || (*toAppend == 0)) {
    262         return;
    263     }
    264 
    265     oldPath = u_getDataDirectory();
    266     if( (oldPath==NULL) || (*oldPath == 0)) {
    267         u_setDataDirectory(toAppend);
    268     } else {
    269         oldLen = strlen(oldPath);
    270         newLen = strlen(toAppend)+1+oldLen;
    271 
    272         if(newLen > 1022)
    273         {
    274             newPath = (char *)ctst_malloc(newLen);
    275         }
    276 
    277         strcpy(newPath, oldPath);
    278         strcpy(newPath+oldLen, U_PATH_SEP_STRING);
    279         strcpy(newPath+oldLen+1, toAppend);
    280 
    281         u_setDataDirectory(newPath);
    282 
    283         if(newPath != newBuf)
    284         {
    285             free(newPath);
    286         }
    287     }
    288 }
    289 */
    290 
    291 /* returns the path to icu/source/data */
    292 const char *  ctest_dataSrcDir()
    293 {
    294     static const char *dataSrcDir = NULL;
    295 
    296     if(dataSrcDir) {
    297         return dataSrcDir;
    298     }
    299 
    300     /* U_TOPSRCDIR is set by the makefiles on UNIXes when building cintltst and intltst
    301     //              to point to the top of the build hierarchy, which may or
    302     //              may not be the same as the source directory, depending on
    303     //              the configure options used.  At any rate,
    304     //              set the data path to the built data from this directory.
    305     //              The value is complete with quotes, so it can be used
    306     //              as-is as a string constant.
    307     */
    308 #if defined (U_TOPSRCDIR)
    309     {
    310         dataSrcDir = U_TOPSRCDIR  U_FILE_SEP_STRING "data" U_FILE_SEP_STRING;
    311     }
    312 #else
    313 
    314     /* On Windows, the file name obtained from __FILE__ includes a full path.
    315      *             This file is "wherever\icu\source\test\cintltst\cintltst.c"
    316      *             Change to    "wherever\icu\source\data"
    317      */
    318     {
    319         static char p[sizeof(__FILE__) + 20];
    320         char *pBackSlash;
    321         int i;
    322 
    323         strcpy(p, __FILE__);
    324         /* We want to back over three '\' chars.                            */
    325         /*   Only Windows should end up here, so looking for '\' is safe.   */
    326         for (i=1; i<=3; i++) {
    327             pBackSlash = strrchr(p, U_FILE_SEP_CHAR);
    328             if (pBackSlash != NULL) {
    329                 *pBackSlash = 0;        /* Truncate the string at the '\'   */
    330             }
    331         }
    332 
    333         if (pBackSlash != NULL) {
    334             /* We found and truncated three names from the path.
    335              *  Now append "source\data" and set the environment
    336              */
    337             strcpy(pBackSlash, U_FILE_SEP_STRING "data" U_FILE_SEP_STRING );
    338             dataSrcDir = p;
    339         }
    340         else {
    341             /* __FILE__ on MSVC7 does not contain the directory */
    342             FILE *file = fopen(".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING "data" U_FILE_SEP_STRING "Makefile.in", "r");
    343             if (file) {
    344                 fclose(file);
    345                 dataSrcDir = ".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING "data" U_FILE_SEP_STRING;
    346             }
    347             else {
    348                 dataSrcDir = ".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING "data" U_FILE_SEP_STRING;
    349             }
    350         }
    351     }
    352 #endif
    353 
    354     return dataSrcDir;
    355 
    356 }
    357 
    358 /* returns the path to icu/source/data/out */
    359 const char *ctest_dataOutDir()
    360 {
    361     static const char *dataOutDir = NULL;
    362 
    363     if(dataOutDir) {
    364         return dataOutDir;
    365     }
    366 
    367     /* U_TOPBUILDDIR is set by the makefiles on UNIXes when building cintltst and intltst
    368     //              to point to the top of the build hierarchy, which may or
    369     //              may not be the same as the source directory, depending on
    370     //              the configure options used.  At any rate,
    371     //              set the data path to the built data from this directory.
    372     //              The value is complete with quotes, so it can be used
    373     //              as-is as a string constant.
    374     */
    375 #if defined (U_TOPBUILDDIR)
    376     {
    377         dataOutDir = U_TOPBUILDDIR "data"U_FILE_SEP_STRING"out"U_FILE_SEP_STRING;
    378     }
    379 #else
    380 
    381     /* On Windows, the file name obtained from __FILE__ includes a full path.
    382      *             This file is "wherever\icu\source\test\cintltst\cintltst.c"
    383      *             Change to    "wherever\icu\source\data"
    384      */
    385     {
    386         static char p[sizeof(__FILE__) + 20];
    387         char *pBackSlash;
    388         int i;
    389 
    390         strcpy(p, __FILE__);
    391         /* We want to back over three '\' chars.                            */
    392         /*   Only Windows should end up here, so looking for '\' is safe.   */
    393         for (i=1; i<=3; i++) {
    394             pBackSlash = strrchr(p, U_FILE_SEP_CHAR);
    395             if (pBackSlash != NULL) {
    396                 *pBackSlash = 0;        /* Truncate the string at the '\'   */
    397             }
    398         }
    399 
    400         if (pBackSlash != NULL) {
    401             /* We found and truncated three names from the path.
    402              *  Now append "source\data" and set the environment
    403              */
    404             strcpy(pBackSlash, U_FILE_SEP_STRING "data" U_FILE_SEP_STRING "out" U_FILE_SEP_STRING);
    405             dataOutDir = p;
    406         }
    407         else {
    408             /* __FILE__ on MSVC7 does not contain the directory */
    409             FILE *file = fopen(".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING "data" U_FILE_SEP_STRING "Makefile.in", "r");
    410             if (file) {
    411                 fclose(file);
    412                 dataOutDir = ".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING "data" U_FILE_SEP_STRING "out" U_FILE_SEP_STRING;
    413             }
    414             else {
    415                 dataOutDir = ".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING "data" U_FILE_SEP_STRING "out" U_FILE_SEP_STRING;
    416             }
    417         }
    418     }
    419 #endif
    420 
    421     return dataOutDir;
    422 }
    423 
    424 /*  ctest_setICU_DATA  - if the ICU_DATA environment variable is not already
    425  *                       set, try to deduce the directory in which ICU was built,
    426  *                       and set ICU_DATA to "icu/source/data" in that location.
    427  *                       The intent is to allow the tests to have a good chance
    428  *                       of running without requiring that the user manually set
    429  *                       ICU_DATA.  Common data isn't a problem, since it is
    430  *                       picked up via a static (build time) reference, but the
    431  *                       tests dynamically load some data.
    432  */
    433 void ctest_setICU_DATA() {
    434 
    435     /* No location for the data dir was identifiable.
    436      *   Add other fallbacks for the test data location here if the need arises
    437      */
    438     if (getenv("ICU_DATA") == NULL) {
    439         /* If ICU_DATA isn't set, set it to the usual location */
    440         u_setDataDirectory(ctest_dataOutDir());
    441     }
    442 }
    443 
    444 /*  These tests do cleanup and reinitialize ICU in the course of their operation.
    445  *    The ICU data directory must be preserved across these operations.
    446  *    Here is a helper function to assist with that.
    447  */
    448 static char *safeGetICUDataDirectory() {
    449     const char *dataDir = u_getDataDirectory();  /* Returned string vanashes with u_cleanup */
    450     char *retStr = NULL;
    451     if (dataDir != NULL) {
    452         retStr = (char *)malloc(strlen(dataDir)+1);
    453         strcpy(retStr, dataDir);
    454     }
    455     return retStr;
    456 }
    457 
    458 UBool ctest_resetICU() {
    459     UErrorCode   status = U_ZERO_ERROR;
    460     char         *dataDir = safeGetICUDataDirectory();
    461 
    462     u_cleanup();
    463     if (!initArgs(gOrigArgc, gOrigArgv, NULL, NULL)) {
    464         /* Error already displayed. */
    465         return FALSE;
    466     }
    467     u_setDataDirectory(dataDir);
    468     free(dataDir);
    469     u_init(&status);
    470     if (U_FAILURE(status)) {
    471         log_err_status(status, "u_init failed with %s\n", u_errorName(status));
    472         return FALSE;
    473     }
    474     return TRUE;
    475 }
    476 
    477 UChar* CharsToUChars(const char* str) {
    478     /* Might be faster to just use uprv_strlen() as the preflight len - liu */
    479     int32_t len = u_unescape(str, 0, 0); /* preflight */
    480     /* Do NOT use malloc() - we are supposed to be acting like user code! */
    481     UChar *buf = (UChar*) malloc(sizeof(UChar) * (len + 1));
    482     u_unescape(str, buf, len + 1);
    483     return buf;
    484 }
    485 
    486 char *austrdup(const UChar* unichars)
    487 {
    488     int   length;
    489     char *newString;
    490 
    491     length    = u_strlen ( unichars );
    492     /*newString = (char*)malloc  ( sizeof( char ) * 4 * ( length + 1 ) );*/ /* this leaks for now */
    493     newString = (char*)ctst_malloc  ( sizeof( char ) * 4 * ( length + 1 ) ); /* this shouldn't */
    494 
    495     if ( newString == NULL )
    496         return NULL;
    497 
    498     u_austrcpy ( newString, unichars );
    499 
    500     return newString;
    501 }
    502 
    503 char *aescstrdup(const UChar* unichars,int32_t length){
    504     char *newString,*targetLimit,*target;
    505     UConverterFromUCallback cb;
    506     const void *p;
    507     UErrorCode errorCode = U_ZERO_ERROR;
    508 #if U_CHARSET_FAMILY==U_EBCDIC_FAMILY
    509 #   if U_PLATFORM == U_PF_OS390
    510         static const char convName[] = "ibm-1047";
    511 #   else
    512         static const char convName[] = "ibm-37";
    513 #   endif
    514 #else
    515     static const char convName[] = "US-ASCII";
    516 #endif
    517     UConverter* conv = ucnv_open(convName, &errorCode);
    518     if(length==-1){
    519         length = u_strlen( unichars);
    520     }
    521     newString = (char*)ctst_malloc ( sizeof(char) * 8 * (length +1));
    522     target = newString;
    523     targetLimit = newString+sizeof(char) * 8 * (length +1);
    524     ucnv_setFromUCallBack(conv, UCNV_FROM_U_CALLBACK_ESCAPE, UCNV_ESCAPE_C, &cb, &p, &errorCode);
    525     ucnv_fromUnicode(conv,&target,targetLimit, &unichars, (UChar*)(unichars+length),NULL,TRUE,&errorCode);
    526     ucnv_close(conv);
    527     *target = '\0';
    528     return newString;
    529 }
    530 
    531 const char* loadTestData(UErrorCode* err){
    532     if( _testDataPath == NULL){
    533         const char*      directory=NULL;
    534         UResourceBundle* test =NULL;
    535         char* tdpath=NULL;
    536         const char* tdrelativepath;
    537 #if defined (U_TOPBUILDDIR)
    538         tdrelativepath = "test"U_FILE_SEP_STRING"testdata"U_FILE_SEP_STRING"out"U_FILE_SEP_STRING;
    539         directory = U_TOPBUILDDIR;
    540 #else
    541         tdrelativepath = ".."U_FILE_SEP_STRING".."U_FILE_SEP_STRING"test"U_FILE_SEP_STRING"testdata"U_FILE_SEP_STRING"out"U_FILE_SEP_STRING;
    542         directory= ctest_dataOutDir();
    543 #endif
    544 
    545         tdpath = (char*) ctst_malloc(sizeof(char) *(( strlen(directory) * strlen(tdrelativepath)) + 10));
    546 
    547 
    548         /* u_getDataDirectory shoul return \source\data ... set the
    549          * directory to ..\source\data\..\test\testdata\out\testdata
    550          *
    551          * Fallback: When Memory mapped file is built
    552          * ..\source\data\out\..\..\test\testdata\out\testdata
    553          */
    554         strcpy(tdpath, directory);
    555         strcat(tdpath, tdrelativepath);
    556         strcat(tdpath,"testdata");
    557 
    558 
    559         test=ures_open(tdpath, "testtypes", err);
    560 
    561         /* Fall back did not succeed either so return */
    562         if(U_FAILURE(*err)){
    563             *err = U_FILE_ACCESS_ERROR;
    564             log_data_err("Could not load testtypes.res in testdata bundle with path %s - %s\n", tdpath, u_errorName(*err));
    565             return "";
    566         }
    567         ures_close(test);
    568         _testDataPath = tdpath;
    569         return _testDataPath;
    570     }
    571     return _testDataPath;
    572 }
    573 
    574 #define CTEST_MAX_TIMEZONE_SIZE 256
    575 static UChar gOriginalTimeZone[CTEST_MAX_TIMEZONE_SIZE] = {0};
    576 
    577 /**
    578  * Call this once to get a consistent timezone. Use ctest_resetTimeZone to set it back to the original value.
    579  * @param optionalTimeZone Set this to a requested timezone.
    580  *      Set to NULL to use the standard test timezone (Pacific Time)
    581  */
    582 U_CFUNC void ctest_setTimeZone(const char *optionalTimeZone, UErrorCode *status) {
    583 #if !UCONFIG_NO_FORMATTING
    584     UChar zoneID[CTEST_MAX_TIMEZONE_SIZE];
    585 
    586     if (optionalTimeZone == NULL) {
    587         optionalTimeZone = "America/Los_Angeles";
    588     }
    589     if (gOriginalTimeZone[0]) {
    590         log_data_err("*** Error: time zone saved twice. New value will be %s (Are you missing data?)\n",
    591                optionalTimeZone);
    592     }
    593     ucal_getDefaultTimeZone(gOriginalTimeZone, CTEST_MAX_TIMEZONE_SIZE, status);
    594     if (U_FAILURE(*status)) {
    595         log_err("*** Error: Failed to save default time zone: %s\n",
    596                u_errorName(*status));
    597         *status = U_ZERO_ERROR;
    598     }
    599 
    600     u_uastrncpy(zoneID, optionalTimeZone, CTEST_MAX_TIMEZONE_SIZE-1);
    601     zoneID[CTEST_MAX_TIMEZONE_SIZE-1] = 0;
    602     ucal_setDefaultTimeZone(zoneID, status);
    603     if (U_FAILURE(*status)) {
    604         log_err("*** Error: Failed to set default time zone to \"%s\": %s\n",
    605                optionalTimeZone, u_errorName(*status));
    606     }
    607 #endif
    608 }
    609 
    610 /**
    611  * Call this once get back the original timezone
    612  */
    613 U_CFUNC void ctest_resetTimeZone(void) {
    614 #if !UCONFIG_NO_FORMATTING
    615     UErrorCode status = U_ZERO_ERROR;
    616 
    617     ucal_setDefaultTimeZone(gOriginalTimeZone, &status);
    618     if (U_FAILURE(status)) {
    619         log_err("*** Error: Failed to reset default time zone: %s\n",
    620                u_errorName(status));
    621     }
    622     /* Set to an empty state */
    623     gOriginalTimeZone[0] = 0;
    624 #endif
    625 }
    626 
    627 
    628 void *ctst_malloc(size_t size) {
    629   ctst_allocated_total++;
    630     if(ctst_allocated >= CTST_MAX_ALLOC - 1) {
    631         ctst_allocated = 0;
    632         ctst_free = TRUE;
    633     }
    634     if(ctst_allocated_stuff[ctst_allocated]) {
    635         free(ctst_allocated_stuff[ctst_allocated]);
    636     }
    637     return ctst_allocated_stuff[ctst_allocated++] = malloc(size);
    638 }
    639 
    640 #ifdef CTST_LEAK_CHECK
    641 static void ctst_freeAll() {
    642     int i;
    643     if(ctst_free == FALSE) { /* only free up to the allocated mark */
    644         for(i=0; i<ctst_allocated; i++) {
    645             free(ctst_allocated_stuff[i]);
    646             ctst_allocated_stuff[i] = NULL;
    647         }
    648     } else { /* free all */
    649         for(i=0; i<CTST_MAX_ALLOC; i++) {
    650             free(ctst_allocated_stuff[i]);
    651             ctst_allocated_stuff[i] = NULL;
    652         }
    653     }
    654     ctst_allocated = 0;
    655     _testDataPath=NULL;
    656 }
    657 
    658 #define VERBOSE_ASSERTIONS
    659 
    660 U_CFUNC UBool assertSuccess(const char* msg, UErrorCode* ec) {
    661     U_ASSERT(ec!=NULL);
    662     if (U_FAILURE(*ec)) {
    663         log_err_status(*ec, "FAIL: %s (%s)\n", msg, u_errorName(*ec));
    664         return FALSE;
    665     }
    666     return TRUE;
    667 }
    668 
    669 /* if 'condition' is a UBool, the compiler complains bitterly about
    670    expressions like 'a > 0' which it evaluates as int */
    671 U_CFUNC UBool assertTrue(const char* msg, int /*not UBool*/ condition) {
    672     if (!condition) {
    673         log_err("FAIL: assertTrue() failed: %s\n", msg);
    674     }
    675 #ifdef VERBOSE_ASSERTIONS
    676     else {
    677         log_verbose("Ok: %s\n", msg);
    678     }
    679 #endif
    680     return (UBool)condition;
    681 }
    682 
    683 U_CFUNC UBool assertEquals(const char* message, const char* expected,
    684                            const char* actual) {
    685     if (uprv_strcmp(expected, actual) != 0) {
    686         log_err("FAIL: %s; got \"%s\"; expected \"%s\"\n",
    687                 message, actual, expected);
    688         return FALSE;
    689     }
    690 #ifdef VERBOSE_ASSERTIONS
    691     else {
    692         log_verbose("Ok: %s; got \"%s\"\n", message, actual);
    693     }
    694 #endif
    695     return TRUE;
    696 }
    697 /*--------------------------------------------------------------------
    698  * Time bomb - allows temporary behavior that expires at a given
    699  *             release
    700  *--------------------------------------------------------------------
    701  */
    702 
    703 U_CFUNC UBool isICUVersionBefore(int major, int minor, int milli) {
    704     UVersionInfo iv;
    705     UVersionInfo ov;
    706     ov[0] = (uint8_t)major;
    707     ov[1] = (uint8_t)minor;
    708     ov[2] = (uint8_t)milli;
    709     ov[3] = 0;
    710     u_getVersion(iv);
    711     return uprv_memcmp(iv, ov, U_MAX_VERSION_LENGTH) < 0;
    712 }
    713 
    714 U_CFUNC UBool isICUVersionAtLeast(int major, int minor, int milli) {
    715     return !isICUVersionBefore(major, minor, milli);
    716 }
    717 
    718 #endif
    719