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