source/test/cintltst/cintltst.c

   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