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