-/********************************************************************
- * COPYRIGHT:
- * Copyright (C) 2001 IBM, Inc. All Rights Reserved.
- *
- ********************************************************************/
-/********************************************************************************
-*
-* File CALLCOLL.C
-*
-* Modification History:
-* Name Description
-* Andy Heninger First Version
-*
-*********************************************************************************
-*/
-
-//
-// This program tests string collation and sort key generation performance.
-// Three APIs can be teste: ICU C , Unix strcoll, strxfrm and Windows LCMapString
-// A file of names is required as input, one per line. It must be in utf-8 or utf-16 format,
-// and include a byte order mark. Either LE or BE format is OK.
-//
-
-const char gUsageString[] =
- "usage: collperf options...\n"
- "-help Display this message.\n"
- "-file file_name utf-16 format file of names.\n"
- "-locale name ICU locale to use. Default is en_US\n"
- "-rules file_name Collation rules file (overrides locale)\n"
- "-langid 0x1234 Windows Language ID number. Default to value for -locale option\n"
- " see http://msdn.microsoft.com/library/psdk/winbase/nls_8xo3.htm\n"
- "-win Run test using Windows native services. (ICU is default)\n"
- "-unix Run test using Unix strxfrm, strcoll services.\n"
- "-uselen Use API with string lengths. Default is null-terminated strings\n"
- "-usekeys Run tests using sortkeys rather than strcoll\n"
- "-strcmp Run tests using u_strcmp rather than strcoll\n"
- "-strcmpCPO Run tests using u_strcmpCodePointOrder rather than strcoll\n"
- "-loop nnnn Loopcount for test. Adjust for reasonable total running time.\n"
- "-iloop n Inner Loop Count. Default = 1. Number of calls to function\n"
- " under test at each call point. For measuring test overhead.\n"
- "-terse Terse numbers-only output. Intended for use by scripts.\n"
- "-french French accent ordering\n"
- "-frenchoff No French accent ordering (for use with French locales.)\n"
- "-norm Normalizing mode on\n"
- "-shifted Shifted mode\n"
- "-lower Lower case first\n"
- "-upper Upper case first\n"
- "-case Enable separate case level\n"
- "-level n Sort level, 1 to 5, for Primary, Secndary, Tertiary, Quaternary, Identical\n"
- "-keyhist Produce a table sort key size vs. string length\n"
- "-binsearch Binary Search timing test\n"
- "-keygen Sort Key Generation timing test\n"
- "-qsort Quicksort timing test\n"
- "-iter Iteration Performance Test\n"
- "-dump Display strings, sort keys and CEs.\n"
- ;
-
-
-
-#include <stdio.h>
-#include <string.h>
-#include <stdlib.h>
-#include <math.h>
-#include <locale.h>
-#include <errno.h>
-
-#include <unicode/utypes.h>
-#include <unicode/ucol.h>
-#include <unicode/ucoleitr.h>
-#include <unicode/uloc.h>
-#include <unicode/ustring.h>
-#include <unicode/ures.h>
-#include <unicode/uchar.h>
-#include <unicode/ucnv.h>
-#include <unicode/utf8.h>
-
-#ifdef WIN32
-#include <windows.h>
-#else
-//
-// Stubs for Windows API functions when building on UNIXes.
-//
-typedef int DWORD;
-inline int CompareStringW(DWORD, DWORD, UChar *, int, UChar *, int) {return 0;};
-#include <sys/time.h>
-unsigned long timeGetTime() {
- struct timeval t;
- gettimeofday(&t, 0);
- unsigned long val = t.tv_sec * 1000; // Let it overflow. Who cares.
- val += t.tv_usec / 1000;
- return val;
-};
-inline int LCMapStringW(DWORD, DWORD, UChar *, int, UChar *, int) {return 0;};
-const int LCMAP_SORTKEY = 0;
-#define MAKELCID(a,b) 0
-const int SORT_DEFAULT = 0;
-#endif
-
-
-
-//
-// Command line option variables
-// These global variables are set according to the options specified
-// on the command line by the user.
-char * opt_fName = 0;
-char * opt_locale = "en_US";
-int opt_langid = 0; // Defaults to value corresponding to opt_locale.
-char * opt_rules = 0;
-UBool opt_help = FALSE;
-int opt_loopCount = 1;
-int opt_iLoopCount = 1;
-UBool opt_terse = FALSE;
-UBool opt_qsort = FALSE;
-UBool opt_binsearch = FALSE;
-UBool opt_icu = TRUE;
-UBool opt_win = FALSE; // Run with Windows native functions.
-UBool opt_unix = FALSE; // Run with UNIX strcoll, strxfrm functions.
-UBool opt_uselen = FALSE;
-UBool opt_usekeys = FALSE;
-UBool opt_strcmp = FALSE;
-UBool opt_strcmpCPO = FALSE;
-UBool opt_norm = FALSE;
-UBool opt_keygen = FALSE;
-UBool opt_french = FALSE;
-UBool opt_frenchoff = FALSE;
-UBool opt_shifted = FALSE;
-UBool opt_lower = FALSE;
-UBool opt_upper = FALSE;
-UBool opt_case = FALSE;
-int opt_level = 0;
-UBool opt_keyhist = FALSE;
-UBool opt_itertest = FALSE;
-UBool opt_dump = FALSE;
-
-
-
-//
-// Definitions for the command line options
-//
-struct OptSpec {
- const char *name;
- enum {FLAG, NUM, STRING} type;
- void *pVar;
-};
-
-OptSpec opts[] = {
- {"-file", OptSpec::STRING, &opt_fName},
- {"-locale", OptSpec::STRING, &opt_locale},
- {"-langid", OptSpec::NUM, &opt_langid},
- {"-rules", OptSpec::STRING, &opt_rules},
- {"-qsort", OptSpec::FLAG, &opt_qsort},
- {"-binsearch", OptSpec::FLAG, &opt_binsearch},
- {"-iter", OptSpec::FLAG, &opt_itertest},
- {"-win", OptSpec::FLAG, &opt_win},
- {"-unix", OptSpec::FLAG, &opt_unix},
- {"-uselen", OptSpec::FLAG, &opt_uselen},
- {"-usekeys", OptSpec::FLAG, &opt_usekeys},
- {"-strcmp", OptSpec::FLAG, &opt_strcmp},
- {"-strcmpCPO", OptSpec::FLAG, &opt_strcmpCPO},
- {"-norm", OptSpec::FLAG, &opt_norm},
- {"-french", OptSpec::FLAG, &opt_french},
- {"-frenchoff", OptSpec::FLAG, &opt_frenchoff},
- {"-shifted", OptSpec::FLAG, &opt_shifted},
- {"-lower", OptSpec::FLAG, &opt_lower},
- {"-upper", OptSpec::FLAG, &opt_upper},
- {"-case", OptSpec::FLAG, &opt_case},
- {"-level", OptSpec::NUM, &opt_level},
- {"-keyhist", OptSpec::FLAG, &opt_keyhist},
- {"-keygen", OptSpec::FLAG, &opt_keygen},
- {"-loop", OptSpec::NUM, &opt_loopCount},
- {"-iloop", OptSpec::NUM, &opt_iLoopCount},
- {"-terse", OptSpec::FLAG, &opt_terse},
- {"-dump", OptSpec::FLAG, &opt_dump},
- {"-help", OptSpec::FLAG, &opt_help},
- {"-?", OptSpec::FLAG, &opt_help},
- {0, OptSpec::FLAG, 0}
-};
-
-
-//---------------------------------------------------------------------------
-//
-// Global variables pointing to and describing the test file
-//
-//---------------------------------------------------------------------------
-
-//
-// struct Line
-//
-// Each line from the source file (containing a name, presumably) gets
-// one of these structs.
-//
-struct Line {
- UChar *name;
- int len;
- char *winSortKey;
- char *icuSortKey;
- char *unixSortKey;
- char *unixName;
-};
-
-
-
-Line *gFileLines; // Ptr to array of Line structs, one per line in the file.
-int gNumFileLines;
-UCollator *gCol;
-DWORD gWinLCID;
-
-Line **gSortedLines;
-Line **gRandomLines;
-int gCount;
-
-
-
-//---------------------------------------------------------------------------
-//
-// ProcessOptions() Function to read the command line options.
-//
-//---------------------------------------------------------------------------
-UBool ProcessOptions(int argc, const char **argv, OptSpec opts[])
-{
- int i;
- int argNum;
- const char *pArgName;
- OptSpec *pOpt;
-
- for (argNum=1; argNum<argc; argNum++) {
- pArgName = argv[argNum];
- for (pOpt = opts; pOpt->name != 0; pOpt++) {
- if (strcmp(pOpt->name, pArgName) == 0) {
- switch (pOpt->type) {
- case OptSpec::FLAG:
- *(UBool *)(pOpt->pVar) = TRUE;
- break;
- case OptSpec::STRING:
- argNum ++;
- if (argNum >= argc) {
- fprintf(stderr, "value expected for \"%s\" option.\n", pOpt->name);
- return FALSE;
- }
- *(const char **)(pOpt->pVar) = argv[argNum];
- break;
- case OptSpec::NUM:
- argNum ++;
- if (argNum >= argc) {
- fprintf(stderr, "value expected for \"%s\" option.\n", pOpt->name);
- return FALSE;
- }
- char *endp;
- i = strtol(argv[argNum], &endp, 0);
- if (endp == argv[argNum]) {
- fprintf(stderr, "integer value expected for \"%s\" option.\n", pOpt->name);
- return FALSE;
- }
- *(int *)(pOpt->pVar) = i;
- }
- break;
- }
- }
- if (pOpt->name == 0)
- {
- fprintf(stderr, "Unrecognized option \"%s\"\n", pArgName);
- return FALSE;
- }
- }
-return TRUE;
-}
-
-//---------------------------------------------------------------------------------------
-//
-// Comparison functions for use by qsort.
-//
-// Six flavors, ICU or Windows, SortKey or String Compare, Strings with length
-// or null terminated.
-//
-//---------------------------------------------------------------------------------------
-int ICUstrcmpK(const void *a, const void *b) {
- gCount++;
- int t = strcmp((*(Line **)a)->icuSortKey, (*(Line **)b)->icuSortKey);
- return t;
-}
-
-
-int ICUstrcmpL(const void *a, const void *b) {
- gCount++;
- UCollationResult t;
- t = ucol_strcoll(gCol, (*(Line **)a)->name, (*(Line **)a)->len, (*(Line **)b)->name, (*(Line **)b)->len);
- if (t == UCOL_LESS) return -1;
- if (t == UCOL_GREATER) return +1;
- return 0;
-}
-
-
-int ICUstrcmp(const void *a, const void *b) {
- gCount++;
- UCollationResult t;
- t = ucol_strcoll(gCol, (*(Line **)a)->name, -1, (*(Line **)b)->name, -1);
- if (t == UCOL_LESS) return -1;
- if (t == UCOL_GREATER) return +1;
- return 0;
-}
-
-
-int Winstrcmp(const void *a, const void *b) {
- gCount++;
- int t;
- t = CompareStringW(gWinLCID, 0, (*(Line **)a)->name, -1, (*(Line **)b)->name, -1);
- return t-2;
-}
-
-
-int UNIXstrcmp(const void *a, const void *b) {
- gCount++;
- int t;
- t = strcoll((*(Line **)a)->unixName, (*(Line **)b)->unixName);
- return t;
-}
-
-
-int WinstrcmpL(const void *a, const void *b) {
- gCount++;
- int t;
- t = CompareStringW(gWinLCID, 0, (*(Line **)a)->name, (*(Line **)a)->len, (*(Line **)b)->name, (*(Line **)b)->len);
- return t-2;
-}
-
-
-int WinstrcmpK(const void *a, const void *b) {
- gCount++;
- int t = strcmp((*(Line **)a)->winSortKey, (*(Line **)b)->winSortKey);
- return t;
-}
-
-
-//---------------------------------------------------------------------------------------
-//
-// Function for sorting the names (lines) into a random order.
-// Order is based on a hash of the ICU Sort key for the lines
-// The randomized order is used as input for the sorting timing tests.
-//
-//---------------------------------------------------------------------------------------
-int ICURandomCmp(const void *a, const void *b) {
- char *ask = (*(Line **)a)->icuSortKey;
- char *bsk = (*(Line **)b)->icuSortKey;
- int aVal = 0;
- int bVal = 0;
- int retVal;
- while (*ask != 0) {
- aVal += aVal*37 + *ask++;
- }
- while (*bsk != 0) {
- bVal += bVal*37 + *bsk++;
- }
- retVal = -1;
- if (aVal == bVal) {
- retVal = 0;
- }
- else if (aVal > bVal) {
- retVal = 1;
- }
- return retVal;
-}
-
-//---------------------------------------------------------------------------------------
-//
-// doKeyGen() Key Generation Timing Test
-//
-//---------------------------------------------------------------------------------------
-void doKeyGen()
-{
- int line;
- int loops;
- int iLoop;
- int t;
- int len=-1;
-
- // Adjust loop count to compensate for file size. Should be order n
- double dLoopCount = double(opt_loopCount) * (1000. / double(gNumFileLines));
- int adj_loopCount = int(dLoopCount);
- if (adj_loopCount < 1) adj_loopCount = 1;
-
-
- unsigned long startTime = timeGetTime();
-
- if (opt_win) {
- for (loops=0; loops<adj_loopCount; loops++) {
- for (line=0; line < gNumFileLines; line++) {
- if (opt_uselen) {
- len = gFileLines[line].len;
- }
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- t=LCMapStringW(gWinLCID, LCMAP_SORTKEY,
- gFileLines[line].name, len,
- (unsigned short *)gFileLines[line].winSortKey, 5000); // TODO something with length.
- }
- }
- }
- }
- else if (opt_icu)
- {
- for (loops=0; loops<adj_loopCount; loops++) {
- for (line=0; line < gNumFileLines; line++) {
- if (opt_uselen) {
- len = gFileLines[line].len;
- }
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- t = ucol_getSortKey(gCol, gFileLines[line].name, len, (unsigned char *)gFileLines[line].icuSortKey, 5000);
- }
- }
- }
- }
- else if (opt_unix)
- {
- for (loops=0; loops<adj_loopCount; loops++) {
- for (line=0; line < gNumFileLines; line++) {
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- t = strxfrm(gFileLines[line].unixSortKey, gFileLines[line].unixName, 5000);
- }
- }
- }
- }
-
- unsigned long elapsedTime = timeGetTime() - startTime;
- int ns = (int)(float(1000000) * (float)elapsedTime / (float)(adj_loopCount*gNumFileLines));
-
- if (opt_terse == FALSE) {
- printf("Sort Key Generation: total # of keys = %d\n", loops*gNumFileLines);
- printf("Sort Key Generation: time per key = %d ns\n", ns);
- }
- else {
- printf("%d, ", ns);
- }
-
- int totalKeyLen = 0;
- int totalChars = 0;
- for (line=0; line<gNumFileLines; line++) {
- totalChars += u_strlen(gFileLines[line].name);
- if (opt_win) {
- totalKeyLen += strlen(gFileLines[line].winSortKey);
- }
- else if (opt_icu) {
- totalKeyLen += strlen(gFileLines[line].icuSortKey);
- }
- else if (opt_unix) {
- totalKeyLen += strlen(gFileLines[line].unixSortKey);
- }
-
- }
- if (opt_terse == FALSE) {
- printf("Key Length / character = %f\n", (float)totalKeyLen / (float)totalChars);
- } else {
- printf("%f, ", (float)totalKeyLen / (float)totalChars);
- }
-}
-
-
-
-//---------------------------------------------------------------------------------------
-//
-// doBinarySearch() Binary Search timing test. Each name from the list
-// is looked up in the full sorted list of names.
-//
-//---------------------------------------------------------------------------------------
-void doBinarySearch()
-{
-
- gCount = 0;
- int line;
- int loops;
- int iLoop;
- unsigned long elapsedTime;
-
- // Adjust loop count to compensate for file size. Should be order n (lookups) * log n (compares/lookup)
- // Accurate timings do not depend on this being perfect. The correction is just to try to
- // get total running times of about the right order, so the that user doesn't need to
- // manually adjust the loop count for every different file size.
- double dLoopCount = double(opt_loopCount) * 3000. / (log10(gNumFileLines) * double(gNumFileLines));
- if (opt_usekeys) dLoopCount *= 5;
- int adj_loopCount = int(dLoopCount);
- if (adj_loopCount < 1) adj_loopCount = 1;
-
-
- for (;;) { // not really a loop, just allows "break" to work, to simplify
- // inadvertantly running more than one test through here.
- if (opt_strcmp || opt_strcmpCPO)
- {
- unsigned long startTime = timeGetTime();
- typedef int32_t (U_EXPORT2 *PF)(const UChar *, const UChar *);
- PF pf = u_strcmp;
- if (opt_strcmpCPO) {pf = u_strcmpCodePointOrder;}
- if (opt_strcmp && opt_win) {pf = (PF)wcscmp;} // Damn the difference between int32_t and int
- // which forces the use of a cast here.
-
- int r;
- for (loops=0; loops<adj_loopCount; loops++) {
-
- for (line=0; line < gNumFileLines; line++) {
- int hi = gNumFileLines-1;
- int lo = 0;
- int guess = -1;
- for (;;) {
- int newGuess = (hi + lo) / 2;
- if (newGuess == guess)
- break;
- guess = newGuess;
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- r = (*pf)((gSortedLines[line])->name, (gSortedLines[guess])->name);
- }
- gCount++;
- if (r== 0)
- break;
- if (r < 0)
- hi = guess;
- else
- lo = guess;
- }
- }
- }
- elapsedTime = timeGetTime() - startTime;
- break;
- }
-
-
- if (opt_icu)
- {
- unsigned long startTime = timeGetTime();
- UCollationResult r;
- for (loops=0; loops<adj_loopCount; loops++) {
-
- for (line=0; line < gNumFileLines; line++) {
- int lineLen = -1;
- int guessLen = -1;
- if (opt_uselen) {
- lineLen = (gSortedLines[line])->len;
- }
- int hi = gNumFileLines-1;
- int lo = 0;
- int guess = -1;
- for (;;) {
- int newGuess = (hi + lo) / 2;
- if (newGuess == guess)
- break;
- guess = newGuess;
- int ri;
- if (opt_usekeys) {
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- ri = strcmp((gSortedLines[line])->icuSortKey, (gSortedLines[guess])->icuSortKey);
- }
- gCount++;
- r=UCOL_GREATER; if(ri<0) {r=UCOL_LESS;} else if (ri==0) {r=UCOL_EQUAL;}
- }
- else
- {
- if (opt_uselen) {
- guessLen = (gSortedLines[guess])->len;
- }
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- r = ucol_strcoll(gCol, (gSortedLines[line])->name, lineLen, (gSortedLines[guess])->name, guessLen);
- }
- gCount++;
- }
- if (r== UCOL_EQUAL)
- break;
- if (r == UCOL_LESS)
- hi = guess;
- else
- lo = guess;
- }
- }
- }
- elapsedTime = timeGetTime() - startTime;
- break;
- }
-
- if (opt_win)
- {
- unsigned long startTime = timeGetTime();
- int r;
- for (loops=0; loops<adj_loopCount; loops++) {
-
- for (line=0; line < gNumFileLines; line++) {
- int lineLen = -1;
- int guessLen = -1;
- if (opt_uselen) {
- lineLen = (gSortedLines[line])->len;
- }
- int hi = gNumFileLines-1;
- int lo = 0;
- int guess = -1;
- for (;;) {
- int newGuess = (hi + lo) / 2;
- if (newGuess == guess)
- break;
- guess = newGuess;
- if (opt_usekeys) {
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- r = strcmp((gSortedLines[line])->winSortKey, (gSortedLines[guess])->winSortKey);
- }
- gCount++;
- r+=2;
- }
- else
- {
- if (opt_uselen) {
- guessLen = (gSortedLines[guess])->len;
- }
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- r = CompareStringW(gWinLCID, 0, (gSortedLines[line])->name, lineLen, (gSortedLines[guess])->name, guessLen);
- }
- if (r == 0) {
- if (opt_terse == FALSE) {
- fprintf(stderr, "Error returned from Windows CompareStringW.\n");
- }
- exit(-1);
- }
- gCount++;
- }
- if (r== 2) // strings ==
- break;
- if (r == 1) // line < guess
- hi = guess;
- else // line > guess
- lo = guess;
- }
- }
- }
- elapsedTime = timeGetTime() - startTime;
- break;
- }
-
- if (opt_unix)
- {
- unsigned long startTime = timeGetTime();
- int r;
- for (loops=0; loops<adj_loopCount; loops++) {
-
- for (line=0; line < gNumFileLines; line++) {
- int hi = gNumFileLines-1;
- int lo = 0;
- int guess = -1;
- for (;;) {
- int newGuess = (hi + lo) / 2;
- if (newGuess == guess)
- break;
- guess = newGuess;
- if (opt_usekeys) {
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- r = strcmp((gSortedLines[line])->unixSortKey, (gSortedLines[guess])->unixSortKey);
- }
- gCount++;
- }
- else
- {
- for (iLoop=0; iLoop < opt_iLoopCount; iLoop++) {
- r = strcoll((gSortedLines[line])->unixName, (gSortedLines[guess])->unixName);
- }
- errno = 0;
- if (errno != 0) {
- fprintf(stderr, "Error %d returned from strcoll.\n", errno);
- exit(-1);
- }
- gCount++;
- }
- if (r == 0) // strings ==
- break;
- if (r < 0) // line < guess
- hi = guess;
- else // line > guess
- lo = guess;
- }
- }
- }
- elapsedTime = timeGetTime() - startTime;
- break;
- }
- break;
- }
-
- int ns = (int)(float(1000000) * (float)elapsedTime / (float)gCount);
- if (opt_terse == FALSE) {
- printf("binary search: total # of string compares = %d\n", gCount);
- printf("binary search: compares per loop = %d\n", gCount / loops);
- printf("binary search: time per compare = %d ns\n", ns);
- } else {
- printf("%d, ", ns);
- }
-
-}
-
-
-
-
-//---------------------------------------------------------------------------------------
-//
-// doQSort() The quick sort timing test. Uses the C library qsort function.
-//
-//---------------------------------------------------------------------------------------
-void doQSort() {
- int i;
- Line **sortBuf = new Line *[gNumFileLines];
-
- // Adjust loop count to compensate for file size. QSort should be n log(n)
- double dLoopCount = double(opt_loopCount) * 3000. / (log10(gNumFileLines) * double(gNumFileLines));
- if (opt_usekeys) dLoopCount *= 5;
- int adj_loopCount = int(dLoopCount);
- if (adj_loopCount < 1) adj_loopCount = 1;
-
-
- gCount = 0;
- unsigned long startTime = timeGetTime();
- if (opt_win && opt_usekeys) {
- for (i=0; i<opt_loopCount; i++) {
- memcpy(sortBuf, gRandomLines, gNumFileLines * sizeof(Line *));
- qsort(sortBuf, gNumFileLines, sizeof(Line *), WinstrcmpK);
- }
- }
-
- else if (opt_win && opt_uselen) {
- for (i=0; i<adj_loopCount; i++) {
- memcpy(sortBuf, gRandomLines, gNumFileLines * sizeof(Line *));
- qsort(sortBuf, gNumFileLines, sizeof(Line *), WinstrcmpL);
- }
- }
-
-
- else if (opt_win && !opt_uselen) {
- for (i=0; i<adj_loopCount; i++) {
- memcpy(sortBuf, gRandomLines, gNumFileLines * sizeof(Line *));
- qsort(sortBuf, gNumFileLines, sizeof(Line *), Winstrcmp);
- }
- }
-
- else if (opt_icu && opt_usekeys) {
- for (i=0; i<adj_loopCount; i++) {
- memcpy(sortBuf, gRandomLines, gNumFileLines * sizeof(Line *));
- qsort(sortBuf, gNumFileLines, sizeof(Line *), ICUstrcmpK);
- }
- }
-
- else if (opt_icu && opt_uselen) {
- for (i=0; i<adj_loopCount; i++) {
- memcpy(sortBuf, gRandomLines, gNumFileLines * sizeof(Line *));
- qsort(sortBuf, gNumFileLines, sizeof(Line *), ICUstrcmpL);
- }
- }
-
-
- else if (opt_icu && !opt_uselen) {
- for (i=0; i<adj_loopCount; i++) {
- memcpy(sortBuf, gRandomLines, gNumFileLines * sizeof(Line *));
- qsort(sortBuf, gNumFileLines, sizeof(Line *), ICUstrcmp);
- }
- }
-
- else if (opt_unix && !opt_usekeys) {
- for (i=0; i<adj_loopCount; i++) {
- memcpy(sortBuf, gRandomLines, gNumFileLines * sizeof(Line *));
- qsort(sortBuf, gNumFileLines, sizeof(Line *), UNIXstrcmp);
- }
- }
-
- unsigned long elapsedTime = timeGetTime() - startTime;
- int ns = (int)(float(1000000) * (float)elapsedTime / (float)gCount);
- if (opt_terse == FALSE) {
- printf("qsort: total # of string compares = %d\n", gCount);
- printf("qsort: time per compare = %d ns\n", ns);
- } else {
- printf("%d, ", ns);
- }
-};
-
-
-
-//---------------------------------------------------------------------------------------
-//
-// doKeyHist() Output a table of data for
-// average sort key size vs. string length.
-//
-//---------------------------------------------------------------------------------------
-void doKeyHist() {
- int i;
- int maxLen = 0;
-
- // Find the maximum string length
- for (i=0; i<gNumFileLines; i++) {
- if (gFileLines[i].len > maxLen) maxLen = gFileLines[i].len;
- }
-
- // Allocate arrays to hold the histogram data
- int *accumulatedLen = new int[maxLen+1];
- int *numKeysOfSize = new int[maxLen+1];
- for (i=0; i<=maxLen; i++) {
- accumulatedLen[i] = 0;
- numKeysOfSize[i] = 0;
- }
-
- // Fill the arrays...
- for (i=0; i<gNumFileLines; i++) {
- int len = gFileLines[i].len;
- accumulatedLen[len] += strlen(gFileLines[i].icuSortKey);
- numKeysOfSize[len] += 1;
- }
-
- // And write out averages
- printf("String Length, Avg Key Length, Avg Key Len per char\n");
- for (i=1; i<=maxLen; i++) {
- if (numKeysOfSize[i] > 0) {
- printf("%d, %f, %f\n", i, (float)accumulatedLen[i] / (float)numKeysOfSize[i],
- (float)accumulatedLen[i] / (float)(numKeysOfSize[i] * i));
- }
- }
-}
-
-//---------------------------------------------------------------------------------------
-//
-// doForwardIterTest(UBool) Forward iteration test
-// argument null-terminated string used
-//
-//---------------------------------------------------------------------------------------
-void doForwardIterTest(UBool haslen) {
- int count = 0;
-
- UErrorCode error = U_ZERO_ERROR;
- printf("\n\nPerforming forward iteration performance test with ");
-
- if (haslen) {
- printf("non-null terminated data -----------\n");
- }
- else {
- printf("null terminated data -----------\n");
- }
- printf("performance test on strings from file -----------\n");
-
- UChar dummytext[] = {0, 0};
- UCollationElements *iter = ucol_openElements(gCol, NULL, 0, &error);
- ucol_setText(iter, dummytext, 1, &error);
-
- gCount = 0;
- unsigned long startTime = timeGetTime();
- while (count < opt_loopCount) {
- int linecount = 0;
- while (linecount < gNumFileLines) {
- UChar *str = gFileLines[linecount].name;
- int strlen = haslen?gFileLines[linecount].len:-1;
- ucol_setText(iter, str, strlen, &error);
- while (ucol_next(iter, &error) != UCOL_NULLORDER) {
- gCount++;
- }
-
- linecount ++;
- }
- count ++;
- }
- unsigned long elapsedTime = timeGetTime() - startTime;
- printf("elapsedTime %d\n", elapsedTime);
-
- // empty loop recalculation
- count = 0;
- startTime = timeGetTime();
- while (count < opt_loopCount) {
- int linecount = 0;
- while (linecount < gNumFileLines) {
- UChar *str = gFileLines[linecount].name;
- int strlen = haslen?gFileLines[linecount].len:-1;
- ucol_setText(iter, str, strlen, &error);
- linecount ++;
- }
- count ++;
- }
- elapsedTime -= (timeGetTime() - startTime);
- printf("elapsedTime %d\n", elapsedTime);
-
- ucol_closeElements(iter);
-
- int ns = (int)(float(1000000) * (float)elapsedTime / (float)gCount);
- printf("Total number of strings compared %d in %d loops\n", gNumFileLines,
- opt_loopCount);
- printf("Average time per ucol_next() nano seconds %d\n", ns);
-
- printf("performance test on skipped-5 concatenated strings from file -----------\n");
-
- UChar *str;
- int strlen = 0;
- // appending all the strings
- int linecount = 0;
- while (linecount < gNumFileLines) {
- strlen += haslen?gFileLines[linecount].len:
- u_strlen(gFileLines[linecount].name);
- linecount ++;
- }
- str = (UChar *)malloc(sizeof(UChar) * strlen);
- int strindex = 0;
- linecount = 0;
- while (strindex < strlen) {
- int len = 0;
- len += haslen?gFileLines[linecount].len:
- u_strlen(gFileLines[linecount].name);
- memcpy(str + strindex, gFileLines[linecount].name,
- sizeof(UChar) * len);
- strindex += len;
- linecount ++;
- }
-
- printf("Total size of strings %d\n", strlen);
-
- gCount = 0;
- count = 0;
-
- if (!haslen) {
- strlen = -1;
- }
- iter = ucol_openElements(gCol, str, strlen, &error);
- if (!haslen) {
- strlen = u_strlen(str);
- }
- strlen -= 5; // any left over characters are not iterated,
- // this is to ensure the backwards and forwards iterators
- // gets the same position
- startTime = timeGetTime();
- while (count < opt_loopCount) {
- int count5 = 5;
- strindex = 0;
- ucol_setOffset(iter, strindex, &error);
- while (TRUE) {
- if (ucol_next(iter, &error) == UCOL_NULLORDER) {
- break;
- }
- gCount++;
- count5 --;
- if (count5 == 0) {
- strindex += 10;
- if (strindex > strlen) {
- break;
- }
- ucol_setOffset(iter, strindex, &error);
- count5 = 5;
- }
- }
- count ++;
- }
-
- elapsedTime = timeGetTime() - startTime;
- printf("elapsedTime %d\n", elapsedTime);
-
- // empty loop recalculation
- int tempgCount = 0;
- count = 0;
- startTime = timeGetTime();
- while (count < opt_loopCount) {
- int count5 = 5;
- strindex = 0;
- ucol_setOffset(iter, strindex, &error);
- while (TRUE) {
- tempgCount ++;
- count5 --;
- if (count5 == 0) {
- strindex += 10;
- if (strindex > strlen) {
- break;
- }
- ucol_setOffset(iter, strindex, &error);
- count5 = 5;
- }
- }
- count ++;
- }
- elapsedTime -= (timeGetTime() - startTime);
- printf("elapsedTime %d\n", elapsedTime);
-
- ucol_closeElements(iter);
-
- printf("gCount %d\n", gCount);
- ns = (int)(float(1000000) * (float)elapsedTime / (float)gCount);
- printf("Average time per ucol_next() nano seconds %d\n", ns);
-}
-
-//---------------------------------------------------------------------------------------
-//
-// doBackwardIterTest(UBool) Backwards iteration test
-// argument null-terminated string used
-//
-//---------------------------------------------------------------------------------------
-void doBackwardIterTest(UBool haslen) {
- int count = 0;
- UErrorCode error = U_ZERO_ERROR;
- printf("\n\nPerforming backward iteration performance test with ");
-
- if (haslen) {
- printf("non-null terminated data -----------\n");
- }
- else {
- printf("null terminated data -----------\n");
- }
-
- printf("performance test on strings from file -----------\n");
-
- UCollationElements *iter = ucol_openElements(gCol, NULL, 0, &error);
- UChar dummytext[] = {0, 0};
- ucol_setText(iter, dummytext, 1, &error);
-
- gCount = 0;
- unsigned long startTime = timeGetTime();
- while (count < opt_loopCount) {
- int linecount = 0;
- while (linecount < gNumFileLines) {
- UChar *str = gFileLines[linecount].name;
- int strlen = haslen?gFileLines[linecount].len:-1;
- ucol_setText(iter, str, strlen, &error);
- while (ucol_previous(iter, &error) != UCOL_NULLORDER) {
- gCount ++;
- }
-
- linecount ++;
- }
- count ++;
- }
- unsigned long elapsedTime = timeGetTime() - startTime;
-
- printf("elapsedTime %d\n", elapsedTime);
-
- // empty loop recalculation
- count = 0;
- startTime = timeGetTime();
- while (count < opt_loopCount) {
- int linecount = 0;
- while (linecount < gNumFileLines) {
- UChar *str = gFileLines[linecount].name;
- int strlen = haslen?gFileLines[linecount].len:-1;
- ucol_setText(iter, str, strlen, &error);
- linecount ++;
- }
- count ++;
- }
- elapsedTime -= (timeGetTime() - startTime);
-
- printf("elapsedTime %d\n", elapsedTime);
- ucol_closeElements(iter);
-
- int ns = (int)(float(1000000) * (float)elapsedTime / (float)gCount);
- printf("Total number of strings compared %d in %d loops\n", gNumFileLines,
- opt_loopCount);
- printf("Average time per ucol_previous() nano seconds %d\n", ns);
-
- printf("performance test on skipped-5 concatenated strings from file -----------\n");
-
- UChar *str;
- int strlen = 0;
- // appending all the strings
- int linecount = 0;
- while (linecount < gNumFileLines) {
- strlen += haslen?gFileLines[linecount].len:
- u_strlen(gFileLines[linecount].name);
- linecount ++;
- }
- str = (UChar *)malloc(sizeof(UChar) * strlen);
- int strindex = 0;
- linecount = 0;
- while (strindex < strlen) {
- int len = 0;
- len += haslen?gFileLines[linecount].len:
- u_strlen(gFileLines[linecount].name);
- memcpy(str + strindex, gFileLines[linecount].name,
- sizeof(UChar) * len);
- strindex += len;
- linecount ++;
- }
-
- printf("Total size of strings %d\n", strlen);
-
- gCount = 0;
- count = 0;
-
- if (!haslen) {
- strlen = -1;
- }
-
- iter = ucol_openElements(gCol, str, strlen, &error);
- if (!haslen) {
- strlen = u_strlen(str);
- }
-
- startTime = timeGetTime();
- while (count < opt_loopCount) {
- int count5 = 5;
- strindex = 5;
- ucol_setOffset(iter, strindex, &error);
- while (TRUE) {
- if (ucol_previous(iter, &error) == UCOL_NULLORDER) {
- break;
- }
- gCount ++;
- count5 --;
- if (count5 == 0) {
- strindex += 10;
- if (strindex > strlen) {
- break;
- }
- ucol_setOffset(iter, strindex, &error);
- count5 = 5;
- }
- }
- count ++;
- }
-
- elapsedTime = timeGetTime() - startTime;
- printf("elapsedTime %d\n", elapsedTime);
-
- // empty loop recalculation
- count = 0;
- int tempgCount = 0;
- startTime = timeGetTime();
- while (count < opt_loopCount) {
- int count5 = 5;
- strindex = 5;
- ucol_setOffset(iter, strindex, &error);
- while (TRUE) {
- tempgCount ++;
- count5 --;
- if (count5 == 0) {
- strindex += 10;
- if (strindex > strlen) {
- break;
- }
- ucol_setOffset(iter, strindex, &error);
- count5 = 5;
- }
- }
- count ++;
- }
- elapsedTime -= (timeGetTime() - startTime);
- printf("elapsedTime %d\n", elapsedTime);
- ucol_closeElements(iter);
-
- printf("gCount %d\n", gCount);
- ns = (int)(float(1000000) * (float)elapsedTime / (float)gCount);
- printf("Average time per ucol_previous() nano seconds %d\n", ns);
-}
-
-//---------------------------------------------------------------------------------------
-//
-// doIterTest() Iteration test
-//
-//---------------------------------------------------------------------------------------
-void doIterTest() {
- doForwardIterTest(opt_uselen);
- doBackwardIterTest(opt_uselen);
-}
-
-
-//----------------------------------------------------------------------------------------
-//
-// UnixConvert -- Convert the lines of the file to the encoding for UNIX
-// Since it appears that Unicode support is going in the general
-// direction of the use of UTF-8 locales, that is the approach
-// that is used here.
-//
-//----------------------------------------------------------------------------------------
-void UnixConvert() {
- int line;
-
- UConverter *cvrtr; // An ICU code page converter.
- UErrorCode status = U_ZERO_ERROR;
-
-
- cvrtr = ucnv_open("utf-8", &status); // we are just doing UTF-8 locales for now.
- if (U_FAILURE(status)) {
- fprintf(stderr, "ICU Converter open failed.: %d\n", &status);
- exit(-1);
- }
-
- for (line=0; line < gNumFileLines; line++) {
- int sizeNeeded = ucnv_fromUChars(cvrtr,
- 0, // ptr to target buffer.
- 0, // length of target buffer.
- gFileLines[line].name,
- -1, // source is null terminated
- &status);
- if (status != U_BUFFER_OVERFLOW_ERROR && status != U_ZERO_ERROR) {
- fprintf(stderr, "Conversion from Unicode, something is wrong.\n");
- exit(-1);
- }
- status = U_ZERO_ERROR;
- gFileLines[line].unixName = new char[sizeNeeded+1];
- sizeNeeded = ucnv_fromUChars(cvrtr,
- gFileLines[line].unixName, // ptr to target buffer.
- sizeNeeded+1, // length of target buffer.
- gFileLines[line].name,
- -1, // source is null terminated
- &status);
- if (U_FAILURE(status)) {
- fprintf(stderr, "ICU Conversion Failed.: %d\n", status);
- exit(-1);
- }
- gFileLines[line].unixName[sizeNeeded] = 0;
- };
- ucnv_close(cvrtr);
-}
-
-
-//----------------------------------------------------------------------------------------
-//
-// class UCharFile Class to hide all the gorp to read a file in
-// and produce a stream of UChars.
-//
-//----------------------------------------------------------------------------------------
-class UCharFile {
-public:
- UCharFile(const char *fileName);
- ~UCharFile();
- UChar get();
- UBool eof() {return fEof;};
- UBool error() {return fError;};
-
-private:
- UCharFile (const UCharFile &other) {}; // No copy constructor.
- UCharFile & operator = (const UCharFile &other) {return *this;}; // No assignment op
-
- FILE *fFile;
- const char *fName;
- UBool fEof;
- UBool fError;
- UChar fPending2ndSurrogate;
-
- enum {UTF16LE, UTF16BE, UTF8} fEncoding;
-};
-
-UCharFile::UCharFile(const char * fileName) {
- fEof = FALSE;
- fError = FALSE;
- fName = fileName;
- fFile = fopen(fName, "rb");
- fPending2ndSurrogate = 0;
- if (fFile == NULL) {
- fprintf(stderr, "Can not open file \"%s\"\n", opt_fName);
- fError = TRUE;
- return;
- }
- //
- // Look for the byte order mark at the start of the file.
- //
- int BOMC1, BOMC2, BOMC3;
- BOMC1 = fgetc(fFile);
- BOMC2 = fgetc(fFile);
-
- if (BOMC1 == 0xff && BOMC2 == 0xfe) {
- fEncoding = UTF16LE; }
- else if (BOMC1 == 0xfe && BOMC2 == 0xff) {
- fEncoding = UTF16BE; }
- else if (BOMC1 == 0xEF && BOMC2 == 0xBB && (BOMC3 = fgetc(fFile)) == 0xBF ) {
- fEncoding = UTF8; }
- else
- {
- fprintf(stderr, "collperf: file \"%s\" encoding must be UTF-8 or UTF-16, and "
- "must include a BOM.\n", fileName);
- fError = true;
- return;
- }
-}
-
-
-UCharFile::~UCharFile() {
- fclose(fFile);
-}
-
-
-
-UChar UCharFile::get() {
- UChar c;
- switch (fEncoding) {
- case UTF16LE:
- {
- int cL, cH;
- cL = fgetc(fFile);
- cH = fgetc(fFile);
- c = cL | (cH << 8);
- if (cH == EOF) {
- c = 0;
- fEof = TRUE;
- }
- break;
- }
- case UTF16BE:
- {
- int cL, cH;
- cH = fgetc(fFile);
- cL = fgetc(fFile);
- c = cL | (cH << 8);
- if (cL == EOF) {
- c = 0;
- fEof = TRUE;
- }
- break;
- }
- case UTF8:
- {
- if (fPending2ndSurrogate != 0) {
- c = fPending2ndSurrogate;
- fPending2ndSurrogate = 0;
- break;
- }
-
- int ch = fgetc(fFile); // Note: c and ch are separate cause eof test doesn't work on UChar type.
- if (ch == EOF) {
- c = 0;
- fEof = TRUE;
- break;
- }
-
- if (ch <= 0x7f) {
- // It's ascii. No further utf-8 conversion.
- c = ch;
- break;
- }
-
- // Figure out the lenght of the char and read the rest of the bytes
- // into a temp array.
- int nBytes;
- if (ch >= 0xF0) {nBytes=4;}
- else if (ch >= 0xE0) {nBytes=3;}
- else if (ch >= 0xC0) {nBytes=2;}
- else {
- fprintf(stderr, "utf-8 encoded file contains corrupt data.\n");
- fError = TRUE;
- return 0;
- }
-
- unsigned char bytes[10];
- bytes[0] = (unsigned char)ch;
- int i;
- for (i=1; i<nBytes; i++) {
- bytes[i] = fgetc(fFile);
- if (bytes[i] < 0x80 || bytes[i] >= 0xc0) {
- fprintf(stderr, "utf-8 encoded file contains corrupt data.\n");
- fError = TRUE;
- return 0;
- }
- }
-
- // Convert the bytes from the temp array to a Unicode char.
- i = 0;
- uint32_t cp;
- UTF8_NEXT_CHAR_UNSAFE(bytes, i, cp);
- c = (UChar)cp;
-
- if (cp >= 0x10000) {
- // The code point needs to be broken up into a utf-16 surrogate pair.
- // Process first half this time through the main loop, and
- // remember the other half for the next time through.
- UChar utf16Buf[3];
- i = 0;
- UTF16_APPEND_CHAR_UNSAFE(utf16Buf, i, cp);
- fPending2ndSurrogate = utf16Buf[1];
- c = utf16Buf[0];
- }
- break;
- };
- }
- return c;
-}
-
-//----------------------------------------------------------------------------------------
-//
-// openRulesCollator - Command line specified a rules file. Read it in
-// and open a collator with it.
-//
-//----------------------------------------------------------------------------------------
-UCollator *openRulesCollator() {
- UCharFile f(opt_rules);
- if (f.error()) {
- return 0;
- }
-
- int bufLen = 10000;
- UChar *buf = (UChar *)malloc(bufLen * sizeof(UChar));
- int i = 0;
-
- for(;;) {
- buf[i] = f.get();
- if (f.eof()) {
- break;
- }
- if (f.error()) {
- return 0;
- }
- i++;
- if (i >= bufLen) {
- bufLen += 10000;
- buf = (UChar *)realloc(buf, bufLen);
- }
- }
- buf[i] = 0;
-
- UErrorCode status = U_ZERO_ERROR;
- UCollator *coll = ucol_openRules(buf, u_strlen(buf), UCOL_OFF,
- UCOL_DEFAULT_STRENGTH, NULL, &status);
- if (U_FAILURE(status)) {
- fprintf(stderr, "ICU ucol_openRules() open failed.: %d\n", status);
- return 0;
- }
- free(buf);
- return coll;
-}
-
-
-
-
-
-//----------------------------------------------------------------------------------------
-//
-// Main -- process command line, read in and pre-process the test file,
-// call other functions to do the actual tests.
-//
-//----------------------------------------------------------------------------------------
-int main(int argc, const char** argv) {
- if (ProcessOptions(argc, argv, opts) != TRUE || opt_help || opt_fName == 0) {
- printf(gUsageString);
- exit (1);
- }
-
- // Make sure that we've only got one API selected.
- if (opt_unix || opt_win) opt_icu = FALSE;
- if (opt_unix) opt_win = FALSE;
-
- //
- // Set up an ICU collator
- //
- UErrorCode status = U_ZERO_ERROR;
-
- if (opt_rules != 0) {
- gCol = openRulesCollator();
- if (gCol == 0) {return -1;}
- }
- else {
- gCol = ucol_open(opt_locale, &status);
- if (U_FAILURE(status)) {
- fprintf(stderr, "Collator creation failed.: %d\n", status);
- return -1;
- }
- }
- if (status==U_USING_DEFAULT_WARNING && opt_terse==FALSE) {
- fprintf(stderr, "Warning, U_USING_DEFAULT_WARNING for %s\n", opt_locale);
- }
- if (status==U_USING_FALLBACK_WARNING && opt_terse==FALSE) {
- fprintf(stderr, "Warning, U_USING_FALLBACK_ERROR for %s\n", opt_locale);
- }
-
- if (opt_norm) {
- ucol_setAttribute(gCol, UCOL_NORMALIZATION_MODE, UCOL_ON, &status);
- }
- if (opt_french && opt_frenchoff) {
- fprintf(stderr, "collperf: Error, specified both -french and -frenchoff options.");
- exit(-1);
- }
- if (opt_french) {
- ucol_setAttribute(gCol, UCOL_FRENCH_COLLATION, UCOL_ON, &status);
- }
- if (opt_frenchoff) {
- ucol_setAttribute(gCol, UCOL_FRENCH_COLLATION, UCOL_OFF, &status);
- }
- if (opt_lower) {
- ucol_setAttribute(gCol, UCOL_CASE_FIRST, UCOL_LOWER_FIRST, &status);
- }
- if (opt_upper) {
- ucol_setAttribute(gCol, UCOL_CASE_FIRST, UCOL_UPPER_FIRST, &status);
- }
- if (opt_case) {
- ucol_setAttribute(gCol, UCOL_CASE_LEVEL, UCOL_ON, &status);
- }
- if (opt_shifted) {
- ucol_setAttribute(gCol, UCOL_ALTERNATE_HANDLING, UCOL_SHIFTED, &status);
- }
- if (opt_level != 0) {
- switch (opt_level) {
- case 1:
- ucol_setAttribute(gCol, UCOL_STRENGTH, UCOL_PRIMARY, &status);
- break;
- case 2:
- ucol_setAttribute(gCol, UCOL_STRENGTH, UCOL_SECONDARY, &status);
- break;
- case 3:
- ucol_setAttribute(gCol, UCOL_STRENGTH, UCOL_TERTIARY, &status);
- break;
- case 4:
- ucol_setAttribute(gCol, UCOL_STRENGTH, UCOL_QUATERNARY, &status);
- break;
- case 5:
- ucol_setAttribute(gCol, UCOL_STRENGTH, UCOL_IDENTICAL, &status);
- break;
- default:
- fprintf(stderr, "-level param must be between 1 and 5\n");
- exit(-1);
- }
- }
-
- if (U_FAILURE(status)) {
- fprintf(stderr, "Collator attribute setting failed.: %d\n", status);
- return -1;
- }
-
-
- //
- // Set up a Windows LCID
- //
- if (opt_langid != 0) {
- gWinLCID = MAKELCID(opt_langid, SORT_DEFAULT);
- }
- else {
- gWinLCID = uloc_getLCID(opt_locale);
- }
-
-
- //
- // Set the UNIX locale
- //
- if (opt_unix) {
- if (setlocale(LC_ALL, opt_locale) == 0) {
- fprintf(stderr, "setlocale(LC_ALL, %s) failed.\n", opt_locale);
- exit(-1);
- }
- }
-
- // Read in the input file.
- // File assumed to be utf-16.
- // Lines go onto heap buffers. Global index array to line starts is created.
- // Lines themselves are null terminated.
- //
-
- UCharFile f(opt_fName);
- if (f.error()) {
- exit(-1);
- }
-
- const int MAXLINES = 40000;
- gFileLines = new Line[MAXLINES];
- UChar buf[1024];
- int column = 0;
-
- // Read the file, split into lines, and save in memory.
- // Loop runs once per utf-16 value from the input file,
- // (The number of bytes read from file per loop iteration depends on external encoding.)
- for (;;) {
-
- UChar c = f.get();
- if (f.error()){
- exit(-1);
- }
-
-
- // We now have a good UTF-16 value in c.
-
- // Watch for CR, LF, EOF; these finish off a line.
- if (c == 0xd) {
- continue;
- }
-
- if (f.eof() || c == 0x0a || c==0x2028) { // Unipad inserts 2028 line separators!
- buf[column++] = 0;
- if (column > 1) {
- gFileLines[gNumFileLines].name = new UChar[column];
- gFileLines[gNumFileLines].len = column-1;
- memcpy(gFileLines[gNumFileLines].name, buf, column * sizeof(UChar));
- gNumFileLines++;
- column = 0;
- if (gNumFileLines >= MAXLINES) {
- fprintf(stderr, "File too big. Max number of lines is %d\n", MAXLINES);
- exit(-1);
- }
-
- }
- if (c == 0xa || c == 0x2028)
- continue;
- else
- break; // EOF
- }
- buf[column++] = c;
- if (column >= 1023)
- {
- static UBool warnFlag = TRUE;
- if (warnFlag) {
- fprintf(stderr, "Warning - file line longer than 1023 chars truncated.\n");
- warnFlag = FALSE;
- }
- column--;
- }
- }
-
- if (opt_terse == FALSE) {
- printf("file \"%s\", %d lines.\n", opt_fName, gNumFileLines);
- }
-
-
- // Convert the lines to the UNIX encoding.
- if (opt_unix) {
- UnixConvert();
- }
-
- //
- // Pre-compute ICU sort keys for the lines of the file.
- //
- int line;
- int t;
-
- for (line=0; line<gNumFileLines; line++) {
- t = ucol_getSortKey(gCol, gFileLines[line].name, -1, (unsigned char *)buf, sizeof(buf));
- gFileLines[line].icuSortKey = new char[t];
-
- if (t > sizeof(buf)) {
- t = ucol_getSortKey(gCol, gFileLines[line].name, -1, (unsigned char *)gFileLines[line].icuSortKey , t);
- }
- else
- {
- memcpy(gFileLines[line].icuSortKey, buf, t);
- }
- }
-
-
-
- //
- // Pre-compute Windows sort keys for the lines of the file.
- //
- for (line=0; line<gNumFileLines; line++) {
- t=LCMapStringW(gWinLCID, LCMAP_SORTKEY, gFileLines[line].name, -1, buf, sizeof(buf));
- gFileLines[line].winSortKey = new char[t];
- if (t > sizeof(buf)) {
- t = LCMapStringW(gWinLCID, LCMAP_SORTKEY, gFileLines[line].name, -1, (unsigned short *)(gFileLines[line].winSortKey), t);
- }
- else
- {
- memcpy(gFileLines[line].winSortKey, buf, t);
- }
- }
-
- //
- // Pre-compute UNIX sort keys for the lines of the file.
- //
- if (opt_unix) {
- for (line=0; line<gNumFileLines; line++) {
- t=strxfrm((char *)buf, gFileLines[line].unixName, sizeof(buf));
- gFileLines[line].unixSortKey = new char[t];
- if (t > sizeof(buf)) {
- t = strxfrm(gFileLines[line].unixSortKey, gFileLines[line].unixName, sizeof(buf));
- }
- else
- {
- memcpy(gFileLines[line].unixSortKey, buf, t);
- }
- }
- }
-
-
- //
- // Dump file lines, CEs, Sort Keys if requested.
- //
- if (opt_dump) {
- int i;
- for (line=0; line<gNumFileLines; line++) {
- for (i=0;;i++) {
- UChar c = gFileLines[line].name[i];
- if (c == 0)
- break;
- if (c < 0x20 || c > 0x7e) {
- printf("\\u%.4x", c);
- }
- else {
- printf("%c", c);
- }
- }
- printf("\n");
-
- printf(" CEs: ");
- UCollationElements *CEiter = ucol_openElements(gCol, gFileLines[line].name, -1, &status);
- int32_t ce;
- i = 0;
- for (;;) {
- ce = ucol_next(CEiter, &status);
- if (ce == UCOL_NULLORDER) {
- break;
- }
- printf(" %.8x", ce);
- if (++i > 8) {
- printf("\n ");
- i = 0;
- }
- }
- printf("\n");
- ucol_closeElements(CEiter);
-
-
- printf(" ICU Sort Key: ");
- for (i=0; ; i++) {
- unsigned char c = gFileLines[line].icuSortKey[i];
- printf("%02x ", c);
- if (c == 0) {
- break;
- }
- if (i > 0 && i % 20 == 0) {
- printf("\n ");
- }
- }
- printf("\n");
- }
- }
-
-
- //
- // Pre-sort the lines.
- //
- int i;
- gSortedLines = new Line *[gNumFileLines];
- for (i=0; i<gNumFileLines; i++) {
- gSortedLines[i] = &gFileLines[i];
- }
-
- if (opt_win) {
- qsort(gSortedLines, gNumFileLines, sizeof(Line *), Winstrcmp);
- }
- else if (opt_unix) {
- qsort(gSortedLines, gNumFileLines, sizeof(Line *), UNIXstrcmp);
- }
- else /* ICU */
- {
- qsort(gSortedLines, gNumFileLines, sizeof(Line *), ICUstrcmp);
- }
-
-
- //
- // Make up a randomized order, will be used for sorting tests.
- //
- gRandomLines = new Line *[gNumFileLines];
- for (i=0; i<gNumFileLines; i++) {
- gRandomLines[i] = &gFileLines[i];
- }
- qsort(gRandomLines, gNumFileLines, sizeof(Line *), ICURandomCmp);
-
-
-
-
- //
- // We've got the file read into memory. Go do something with it.
- //
-
- if (opt_qsort) doQSort();
- if (opt_binsearch) doBinarySearch();
- if (opt_keygen) doKeyGen();
- if (opt_keyhist) doKeyHist();
- if (opt_itertest) doIterTest();
-
- return 0;
-
-}
projects / apple / icu.git / commitdiff
