scuffed-code/icu4c/source/test/intltest/mnkytst.cpp
Vladimir Weinstein 6f6c6c0cad ICU-96 C++ has an interesting req :(
X-SVN-Rev: 3202
2000-12-12 20:33:54 +00:00

296 lines
9.0 KiB
C++

/********************************************************************
* COPYRIGHT:
* Copyright (c) 1997-1999, International Business Machines Corporation and
* others. All Rights Reserved.
********************************************************************/
#ifndef _COLL
#include "unicode/coll.h"
#endif
#ifndef _TBLCOLL
#include "unicode/tblcoll.h"
#endif
#ifndef _UNISTR
#include "unicode/unistr.h"
#endif
#ifndef _SORTKEY
#include "unicode/sortkey.h"
#endif
#ifndef _MNKYTST
#include "mnkytst.h"
#endif
#include "sfwdchit.h"
#include <stdlib.h>
#include <stdio.h>
#include <time.h>
#ifndef MIN
#define MIN(x,y) ((x) < (y) ? (x) : (y))
#endif
#ifndef MAX
#define MAX(x,y) ((x) > (y) ? (x) : (y))
#endif
const UnicodeString CollationMonkeyTest::source("-abcdefghijklmnopqrstuvwxyz#&^$@");
CollationMonkeyTest::CollationMonkeyTest()
: myCollator(0)
{
UErrorCode status = U_ZERO_ERROR;
myCollator = Collator::createInstance(status);
}
CollationMonkeyTest::~CollationMonkeyTest()
{
delete myCollator;
}
void
CollationMonkeyTest::report(UnicodeString& s, UnicodeString& t, int32_t result, int32_t revResult)
{
if (revResult != -result)
{
UnicodeString msg;
msg += s;
msg += " and ";
msg += t;
msg += " round trip comparison failed";
msg += (UnicodeString) " (result " + result + ", reverse Result " + revResult + ")";
errln(msg);
}
}
int32_t
CollationMonkeyTest::checkValue(int32_t value)
{
if (value < 0)
{
return -value;
}
return value;
}
void CollationMonkeyTest::TestCollationKey(/* char* par */)
{
if(source.length() == 0) {
errln(UNICODE_STRING("CollationMonkeyTest::TestCollationKey(): source is empty - ICU_DATA not set or data missing?", 92));
return;
}
srand( (unsigned)time( NULL ) );
int32_t s = checkValue(rand() % source.length());
int32_t t = checkValue(rand() % source.length());
int32_t slen = checkValue((rand() - source.length()) % source.length());
int32_t tlen = checkValue((rand() - source.length()) % source.length());
UnicodeString subs, subt;
source.extract(MIN(s, slen), MAX(s, slen), subs);
source.extract(MIN(t, tlen), MAX(t, tlen), subt);
CollationKey collationKey1, collationKey2;
UErrorCode status1 = U_ZERO_ERROR, status2= U_ZERO_ERROR;
myCollator->setStrength(Collator::TERTIARY);
myCollator->getCollationKey(subs, collationKey1, status1);
myCollator->getCollationKey(subt, collationKey2, status2);
int32_t result = collationKey1.compareTo(collationKey2); // Tertiary
int32_t revResult = collationKey2.compareTo(collationKey1); // Tertiary
report( subs, subt, result, revResult);
myCollator->setStrength(Collator::SECONDARY);
myCollator->getCollationKey(subs, collationKey1, status1);
myCollator->getCollationKey(subt, collationKey2, status2);
result = collationKey1.compareTo(collationKey2); // Secondary
revResult = collationKey2.compareTo(collationKey1); // Secondary
report( subs, subt, result, revResult);
myCollator->setStrength(Collator::PRIMARY);
myCollator->getCollationKey(subs, collationKey1, status1);
myCollator->getCollationKey(subt, collationKey2, status2);
result = collationKey1.compareTo(collationKey2); // Primary
revResult = collationKey2.compareTo(collationKey1); // Primary
report(subs, subt, result, revResult);
UnicodeString msg;
UnicodeString addOne(subs);
addOne += (UChar32)0xE000;
myCollator->getCollationKey(subs, collationKey1, status1);
myCollator->getCollationKey(addOne, collationKey2, status2);
result = collationKey1.compareTo(collationKey2);
if (result != -1)
{
msg += "CollationKey(";
msg += subs;
msg += ") .LT. CollationKey(";
msg += addOne;
msg += ") Failed.";
errln(msg);
}
msg.remove();
result = collationKey2.compareTo(collationKey1);
if (result != 1)
{
msg += "CollationKey(";
msg += addOne;
msg += ") .GT. CollationKey(";
msg += subs;
msg += ") Failed.";
errln(msg);
}
}
void
CollationMonkeyTest::TestCompare(/* char* par */)
{
if(source.length() == 0) {
errln(UNICODE_STRING("CollationMonkeyTest::TestCompare(): source is empty - ICU_DATA not set or data missing?", 87));
return;
}
/* Seed the random-number generator with current time so that
* the numbers will be different every time we run.
*/
srand( (unsigned)time( NULL ) );
int32_t s = checkValue(rand() % source.length());
int32_t t = checkValue(rand() % source.length());
int32_t slen = checkValue((rand() - source.length()) % source.length());
int32_t tlen = checkValue((rand() - source.length()) % source.length());
UnicodeString subs, subt;
source.extract(MIN(s, slen), MAX(s, slen), subs);
source.extract(MIN(t, tlen), MAX(t, tlen), subt);
myCollator->setStrength(Collator::TERTIARY);
int32_t result = myCollator->compare(subs, subt); // Tertiary
int32_t revResult = myCollator->compare(subt, subs); // Tertiary
report(subs, subt, result, revResult);
myCollator->setStrength(Collator::SECONDARY);
result = myCollator->compare(subs, subt); // Secondary
revResult = myCollator->compare(subt, subs); // Secondary
report(subs, subt, result, revResult);
myCollator->setStrength(Collator::PRIMARY);
result = myCollator->compare(subs, subt); // Primary
revResult = myCollator->compare(subt, subs); // Primary
report(subs, subt, result, revResult);
UnicodeString msg;
UnicodeString addOne(subs);
addOne += (UChar32)0xE000;
result = myCollator->compare(subs, addOne);
if (result != -1)
{
msg += "Test : ";
msg += subs;
msg += " .LT. ";
msg += addOne;
msg += " Failed.";
errln(msg);
}
msg.remove();
result = myCollator->compare(addOne, subs);
if (result != 1)
{
msg += "Test : ";
msg += addOne;
msg += " .GT. ";
msg += subs;
msg += " Failed.";
errln(msg);
}
}
void CollationMonkeyTest::TestRules(/* char* par */){
UChar testSourceCases[][10] = {
{0x0061, 0x0062, 0x007a, 0},
{0x0061, 0x0062, 0x007a, 0},
};
UChar testTargetCases[][10] = {
{0x0061, 0x0062, 0x00e4, 0},
{0x0061, 0x0062, 0x0061, 0x0308, 0},
};
int i=0;
logln("Demo Test 1 : Create a new table collation with rules \"& z < 0x00e4\"");
UErrorCode status = U_ZERO_ERROR;
Collator *col = Collator::createInstance(status);
const UnicodeString baseRules = ((RuleBasedCollator*)col)->getRules();
UnicodeString newRules(" & z < ");
newRules.append((UChar)0x00e4);
newRules.insert(0, baseRules);
RuleBasedCollator *myCollation = new RuleBasedCollator(newRules, status);
if (U_FAILURE(status)) {
errln( "Demo Test 1 Table Collation object creation failed.");
return;
}
for(i=0; i<2; i++){
doTest(myCollation, testSourceCases[i], testTargetCases[i], Collator::LESS);
}
delete myCollation;
logln("Demo Test 2 : Create a new table collation with rules \"& z < a 0x0308\"");
newRules.remove();
newRules.append(" & z < a");
newRules.append((UChar)0x0308);
newRules.insert(0, baseRules);
myCollation = new RuleBasedCollator(newRules, status);
if (U_FAILURE(status)) {
errln( "Demo Test 1 Table Collation object creation failed.");
return;
}
for(i=0; i<2; i++){
doTest(myCollation, testSourceCases[i], testTargetCases[i], Collator::LESS);
}
delete myCollation;
delete col;
}
void CollationMonkeyTest::doTest(RuleBasedCollator *myCollation, UnicodeString mysource, UnicodeString target, Collator::EComparisonResult result)
{
Collator::EComparisonResult compareResult = myCollation->compare(source, target);
SimpleFwdCharIterator src(source);
SimpleFwdCharIterator trg(target);
Collator::EComparisonResult incResult = myCollation->compare(src, trg);
CollationKey sortKey1, sortKey2;
UErrorCode key1status = U_ZERO_ERROR, key2status = U_ZERO_ERROR; //nos
myCollation->getCollationKey(source, /*nos*/ sortKey1, key1status );
myCollation->getCollationKey(target, /*nos*/ sortKey2, key2status );
if (U_FAILURE(key1status) || U_FAILURE(key2status))
{
errln("SortKey generation Failed.\n");
return;
}
Collator::EComparisonResult keyResult = sortKey1.compareTo(sortKey2);
reportCResult( mysource, target, sortKey1, sortKey2, compareResult, keyResult, incResult, result );
}
void CollationMonkeyTest::runIndexedTest( int32_t index, UBool exec, const char* &name, char* /*par*/ )
{
if (exec) logln("TestSuite CollationMonkeyTest: ");
switch (index) {
case 0: name = "TestCompare"; if (exec) TestCompare(/* par */); break;
case 1: name = "TestCollationKey"; if (exec) TestCollationKey(/* par */); break;
case 2: name = "TestRules"; if (exec) TestRules(/* par */); break;
default: name = ""; break;
}
}