| /******************************************************************** |
| * COPYRIGHT: |
| * Copyright (c) 1997-2001, International Business Machines Corporation and |
| * others. All Rights Reserved. |
| ********************************************************************/ |
| /******************************************************************************** |
| * |
| * File CINTLTST.C |
| * |
| * Modification History: |
| * Name Description |
| * Madhu Katragadda Creation |
| ********************************************************************************* |
| */ |
| |
| /*The main root for C API tests*/ |
| |
| #include <stdlib.h> |
| #include <stdio.h> |
| #include <string.h> |
| #include "unicode/utypes.h" |
| #include "unicode/putil.h" |
| |
| #include "cintltst.h" |
| |
| #include "unicode/uchar.h" |
| #include "unicode/ustring.h" |
| #include "unicode/ucnv.h" |
| #include "unicode/ures.h" |
| |
| #ifdef XP_MAC_CONSOLE |
| # include <console.h> |
| #endif |
| |
| U_CAPI void U_EXPORT2 ucnv_orphanAllConverters(); |
| |
| static char* _testDirectory=NULL; |
| |
| int main(int argc, const char* const argv[]) |
| { |
| int nerrors; |
| TestNode *root; |
| |
| /* initial check for the default converter */ |
| UErrorCode errorCode = U_ZERO_ERROR; |
| UResourceBundle *rb; |
| UConverter *cnv; |
| |
| #ifdef XP_MAC_CONSOLE |
| argc = ccommand((char***)&argv); |
| #endif |
| |
| cnv = ucnv_open(NULL, &errorCode); |
| if(cnv != NULL) { |
| /* ok */ |
| ucnv_close(cnv); |
| } else { |
| fprintf(stderr, |
| "*** Failure! The default converter cannot be opened.\n" |
| "*** Check the ICU_DATA environment variable and \n" |
| "*** check that the data files are present.\n"); |
| return 1; |
| } |
| |
| /* try more data */ |
| cnv = ucnv_open("iso-8859-7", &errorCode); |
| if(cnv != 0) { |
| /* ok */ |
| ucnv_close(cnv); |
| } else { |
| fprintf(stderr, |
| "*** Failure! The converter for iso-8859-7 cannot be opened.\n" |
| "*** Check the ICU_DATA environment variable and \n" |
| "*** check that the data files are present.\n"); |
| return 1; |
| } |
| |
| rb = ures_open(NULL, "en", &errorCode); |
| if(U_SUCCESS(errorCode)) { |
| /* ok */ |
| ures_close(rb); |
| } else { |
| fprintf(stderr, |
| "*** Failure! The \"en\" locale resource bundle cannot be opened.\n" |
| "*** Check the ICU_DATA environment variable and \n" |
| "*** check that the data files are present.\n"); |
| return 1; |
| } |
| |
| fprintf(stdout, "Default locale for this run is %s\n", uloc_getDefault()); |
| |
| root = NULL; |
| addAllTests(&root); |
| nerrors = processArgs(root, argc, argv); |
| cleanUpTestTree(root); |
| #ifdef CTST_LEAK_CHECK |
| ctst_freeAll(); |
| |
| /* To check for leaks */ |
| |
| ucnv_flushCache(); |
| ucnv_orphanAllConverters(); /* nuke the hashtable.. so that any still-open cnvs are leaked */ |
| /* above function must be enabled in ucnv_bld.c */ |
| #endif |
| |
| return nerrors ? 1 : 0; |
| } |
| |
| void |
| ctest_pathnameInContext( char* fullname, int32_t maxsize, const char* relPath ) |
| { |
| char mainDirBuffer[1024]; |
| char* mainDir = NULL; |
| const char *dataDirectory = u_getDataDirectory(); |
| const char inpSepChar = '|'; |
| char* tmp; |
| int32_t lenMainDir; |
| int32_t lenRelPath; |
| |
| #ifdef XP_MAC |
| Str255 volName; |
| int16_t volNum; |
| OSErr err = GetVol( volName, &volNum ); |
| if (err != noErr) |
| volName[0] = 0; |
| mainDir = (char*) &(volName[1]); |
| mainDir[volName[0]] = 0; |
| #else |
| if (dataDirectory != NULL) { |
| strcpy(mainDirBuffer, dataDirectory); |
| strcat(mainDirBuffer, ".." U_FILE_SEP_STRING); |
| } else { |
| mainDirBuffer[0]='\0'; |
| } |
| mainDir = mainDirBuffer; |
| #endif |
| |
| lenMainDir = strlen( mainDir ); |
| if(lenMainDir > 0 && mainDir[lenMainDir - 1] != U_FILE_SEP_CHAR) { |
| mainDir[lenMainDir++] = U_FILE_SEP_CHAR; |
| mainDir[lenMainDir] = 0; |
| } |
| |
| if (relPath[0] == '|') |
| relPath++; |
| lenRelPath = strlen( relPath ); |
| if (maxsize < lenMainDir + lenRelPath + 2) { |
| fullname[0] = 0; |
| return; |
| } |
| strcpy( fullname, mainDir ); |
| /*strcat( fullname, U_FILE_SEP_STRING );*/ |
| strcat( fullname, relPath ); |
| strchr( fullname, inpSepChar ); |
| tmp = strchr(fullname, inpSepChar); |
| while (tmp) { |
| *tmp = U_FILE_SEP_CHAR; |
| tmp = strchr( tmp+1, inpSepChar ); |
| } |
| } |
| |
| const char* |
| ctest_getTestDirectory() |
| { |
| if (_testDirectory == NULL) |
| { |
| /* always relative to icu/source/data/.. */ |
| ctest_setTestDirectory("test|testdata|"); |
| } |
| return _testDirectory; |
| } |
| |
| void |
| ctest_setTestDirectory(const char* newDir) |
| { |
| char newTestDir[256]; |
| ctest_pathnameInContext(newTestDir, sizeof(newTestDir), newDir); |
| if(_testDirectory != NULL) |
| free(_testDirectory); |
| _testDirectory = (char*) malloc(sizeof(char*) * (strlen(newTestDir) + 1)); |
| strcpy(_testDirectory, newTestDir); |
| } |
| |
| char *austrdup(const UChar* unichars) |
| { |
| int length; |
| char *newString; |
| |
| length = u_strlen ( unichars ); |
| /*newString = (char*)malloc ( sizeof( char ) * 4 * ( length + 1 ) );*/ /* this leaks for now */ |
| newString = (char*)ctst_malloc ( sizeof( char ) * 4 * ( length + 1 ) ); /* this shouldn't */ |
| |
| if ( newString == NULL ) |
| return NULL; |
| |
| u_austrcpy ( newString, unichars ); |
| |
| return newString; |
| } |
| |
| char *aescstrdup(const UChar* unichars){ |
| int length; |
| char *newString,*targetLimit,*target; |
| UConverterFromUCallback cb; |
| void *p; |
| UErrorCode errorCode = U_ZERO_ERROR; |
| UConverter* conv = ucnv_open("US-ASCII",&errorCode); |
| |
| length = u_strlen( unichars); |
| newString = (char*)ctst_malloc ( sizeof(char) * 8 * (length +1)); |
| target = newString; |
| targetLimit = newString+sizeof(char) * 8 * (length +1); |
| ucnv_setFromUCallBack(conv, UCNV_FROM_U_CALLBACK_ESCAPE, UCNV_ESCAPE_JAVA, &cb, &p, &errorCode); |
| ucnv_fromUnicode(conv,&target,targetLimit, &unichars, (UChar*)(unichars+length),NULL,TRUE,&errorCode); |
| ucnv_close(conv); |
| *target = '\0'; |
| return newString; |
| } |
| |
| |
| |
| #define CTST_MAX_ALLOC 10000 |
| static void * ctst_allocated_stuff[CTST_MAX_ALLOC]; |
| static int ctst_allocated = 0; |
| static UBool ctst_free = 0; |
| |
| void *ctst_malloc(size_t size) { |
| ctst_allocated ++; |
| if(ctst_allocated == CTST_MAX_ALLOC) { |
| ctst_allocated = 0; |
| ctst_free = 1; |
| } |
| if(ctst_free == 1) { |
| free(ctst_allocated_stuff[ctst_allocated]); |
| } |
| ctst_allocated_stuff[ctst_allocated] = malloc(size); |
| return ctst_allocated_stuff[ctst_allocated]; |
| } |
| |
| #ifdef CTST_LEAK_CHECK |
| void ctst_freeAll() { |
| int i; |
| if(ctst_free == 0) { |
| for(i=0; i<ctst_allocated; i++) { |
| free(ctst_allocated_stuff[i]); |
| } |
| } else { |
| for(i=0; i<CTST_MAX_ALLOC; i++) { |
| free(ctst_allocated_stuff[i]); |
| } |
| } |
| } |
| #endif |