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