• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 // © 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 
main(int argc,const char * const argv[])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 */
ctest_dataSrcDir()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 */
ctest_dataOutDir()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  */
ctest_setICU_DATA()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  */
safeGetICUDataDirectory()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 
ctest_resetICU()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 
CharsToUChars(const char * str)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 
austrdup(const UChar * unichars)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 
aescstrdup(const UChar * unichars,int32_t length)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 
loadTestData(UErrorCode * err)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  */
ctest_setTimeZone(const char * optionalTimeZone,UErrorCode * status)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  */
ctest_resetTimeZone(void)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 
ctst_malloc(size_t size)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
ctst_freeAll()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 
assertSuccessCheck(const char * msg,UErrorCode * ec,UBool possibleDataError)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 
assertSuccess(const char * msg,UErrorCode * ec)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 */
assertTrue(const char * msg,int condition)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 
assertEquals(const char * message,const char * expected,const char * actual)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