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 */
46 static void * ctst_allocated_stuff[CTST_MAX_ALLOC] = {0};
47 static int ctst_allocated = 0;
48 static UBool ctst_free = FALSE;
49 static int ctst_allocated_total = 0;
50
51 #define CTST_LEAK_CHECK 1
52
53 #ifdef CTST_LEAK_CHECK
54 static void ctst_freeAll(void);
55 #endif
56
57 static char* _testDataPath=NULL;
58
59 /*
60 * Forward Declarations
61 */
62 void 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
74 static int gOrigArgc;
75 static const char* const * gOrigArgv;
76
main(int argc,const char * const argv[])77 int 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 /*
253 static 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 */
ctest_dataSrcDir()292 const 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 */
ctest_dataOutDir()359 const 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 */
ctest_setICU_DATA()433 void 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 */
safeGetICUDataDirectory()448 static 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
ctest_resetICU()458 UBool 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
CharsToUChars(const char * str)477 UChar* 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
austrdup(const UChar * unichars)486 char *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
aescstrdup(const UChar * unichars,int32_t length)503 char *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
loadTestData(UErrorCode * err)531 const 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
575 static 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 */
ctest_setTimeZone(const char * optionalTimeZone,UErrorCode * status)582 U_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 */
ctest_resetTimeZone(void)613 U_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
ctst_malloc(size_t size)628 void *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
ctst_freeAll()641 static 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
assertSuccess(const char * msg,UErrorCode * ec)660 U_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 */
assertTrue(const char * msg,int condition)671 U_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
assertEquals(const char * message,const char * expected,const char * actual)683 U_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
isICUVersionBefore(int major,int minor,int milli)703 U_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
isICUVersionAtLeast(int major,int minor,int milli)714 U_CFUNC UBool isICUVersionAtLeast(int major, int minor, int milli) {
715 return !isICUVersionBefore(major, minor, milli);
716 }
717
718 #endif
719