icuSources/test/cintltst/cintltst.c

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