Check in the pristine copy of ICU 4.6...

icu46/source/test/intltest/jacoll.cpp

Index: icu46/source/test/intltest/jacoll.cpp
===================================================================
--- icu46/source/test/intltest/jacoll.cpp	(revision 0)
+++ icu46/source/test/intltest/jacoll.cpp	(revision 0)
@@ -0,0 +1,199 @@
+/********************************************************************
+ * COPYRIGHT: 
+ * Copyright (c) 1997-2009, International Business Machines Corporation and
+ * others. All Rights Reserved. 
+ ********************************************************************/
+
+#include "unicode/utypes.h"
+
+#if !UCONFIG_NO_COLLATION
+
+#include "unicode/coll.h"
+#include "unicode/tblcoll.h"
+#include "unicode/unistr.h"
+#include "unicode/sortkey.h"
+#include "jacoll.h"
+
+#include "sfwdchit.h"
+
+CollationKanaTest::CollationKanaTest()
+: myCollation(0)
+{
+    UErrorCode status = U_ZERO_ERROR;
+    myCollation = Collator::createInstance(Locale::getJapan(), status);
+    if(!myCollation || U_FAILURE(status)) {
+        errcheckln(status, __FILE__ "failed to create! err " + UnicodeString(u_errorName(status)));
+        /* if it wasn't already: */
+        delete myCollation;
+        myCollation = NULL;
+        return;
+    }
+}
+
+CollationKanaTest::~CollationKanaTest()
+{
+    delete myCollation;
+}
+
+const UChar CollationKanaTest::testSourceCases[][CollationKanaTest::MAX_TOKEN_LEN] = {
+    {0xff9E, 0x0000},
+    {0x3042, 0x0000},
+    {0x30A2, 0x0000},
+    {0x3042, 0x3042, 0x0000},
+    {0x30A2, 0x30FC, 0x0000},
+    {0x30A2, 0x30FC, 0x30C8, 0x0000}                               /*  6 */
+};
+
+const UChar CollationKanaTest::testTargetCases[][CollationKanaTest::MAX_TOKEN_LEN] = {
+    {0xFF9F, 0x0000},
+    {0x30A2, 0x0000},
+    {0x3042, 0x3042, 0x0000},
+    {0x30A2, 0x30FC, 0x0000},
+    {0x30A2, 0x30FC, 0x30C8, 0x0000},
+    {0x3042, 0x3042, 0x3068, 0x0000}                              /*  6 */
+};
+
+const Collator::EComparisonResult CollationKanaTest::results[] = {
+    Collator::LESS,
+    Collator::EQUAL,   //Collator::LESS, /* Katakanas and Hiraganas are equal on tertiary level(ICU 2.0)*/
+    Collator::LESS,
+    Collator::GREATER, // Collator::LESS, /* Prolonged sound mark sorts BEFORE equivalent vowel (ICU 2.0)*/
+    Collator::LESS,
+    Collator::LESS,    //Collator::GREATER /* Prolonged sound mark sorts BEFORE equivalent vowel (ICU 2.0)*//*  6 */
+};
+
+const UChar CollationKanaTest::testBaseCases[][CollationKanaTest::MAX_TOKEN_LEN] = {
+  {0x30AB, 0x0000},
+  {0x30AB, 0x30AD, 0x0000},
+  {0x30AD, 0x0000},
+  {0x30AD, 0x30AD, 0x0000}
+};
+
+const UChar CollationKanaTest::testPlainDakutenHandakutenCases[][CollationKanaTest::MAX_TOKEN_LEN] = {
+  {0x30CF, 0x30AB, 0x0000},
+  {0x30D0, 0x30AB, 0x0000},
+  {0x30CF, 0x30AD, 0x0000},
+  {0x30D0, 0x30AD, 0x0000}
+};
+
+const UChar CollationKanaTest::testSmallLargeCases[][CollationKanaTest::MAX_TOKEN_LEN] = {
+  {0x30C3, 0x30CF, 0x0000},
+  {0x30C4, 0x30CF, 0x0000},
+  {0x30C3, 0x30D0, 0x0000},
+  {0x30C4, 0x30D0, 0x0000}
+};
+
+const UChar CollationKanaTest::testKatakanaHiraganaCases[][CollationKanaTest::MAX_TOKEN_LEN] = {
+  {0x3042, 0x30C3, 0x0000},
+  {0x30A2, 0x30C3, 0x0000},
+  {0x3042, 0x30C4, 0x0000},
+  {0x30A2, 0x30C4, 0x0000}
+};
+
+const UChar CollationKanaTest::testChooonKigooCases[][CollationKanaTest::MAX_TOKEN_LEN] = {
+  /*0*/ {0x30AB, 0x30FC, 0x3042, 0x0000},
+  /*1*/ {0x30AB, 0x30FC, 0x30A2, 0x0000},
+  /*2*/ {0x30AB, 0x30A4, 0x3042, 0x0000},
+  /*3*/ {0x30AB, 0x30A4, 0x30A2, 0x0000},
+  /*6*/ {0x30AD, 0x30FC, 0x3042, 0x0000}, /* Prolonged sound mark sorts BEFORE equivalent vowel (ICU 2.0)*/
+  /*7*/ {0x30AD, 0x30FC, 0x30A2, 0x0000}, /* Prolonged sound mark sorts BEFORE equivalent vowel (ICU 2.0)*/
+  /*4*/ {0x30AD, 0x30A4, 0x3042, 0x0000},
+  /*5*/ {0x30AD, 0x30A4, 0x30A2, 0x0000},
+};
+
+void CollationKanaTest::TestTertiary(/* char* par */)
+{
+    int32_t i = 0;
+    UErrorCode status = U_ZERO_ERROR;
+    myCollation->setStrength(Collator::TERTIARY);
+    /* for one case, strcollinc fails, since it doesn't have good handling of contractions*/
+    /* normalization is turned off to stop strcollinc from executing */
+    myCollation->setAttribute(UCOL_NORMALIZATION_MODE, UCOL_ON, status);
+    myCollation->setAttribute(UCOL_CASE_LEVEL, UCOL_ON, status);
+    for (i = 0; i < 6; i++) {
+        doTest(myCollation, testSourceCases[i], testTargetCases[i], results[i]);
+    }
+}
+
+/* Testing base letters */
+void CollationKanaTest::TestBase()
+{
+    int32_t i;
+    myCollation->setStrength(Collator::PRIMARY);
+    for (i = 0; i < 3 ; i++)
+        doTest(myCollation, testBaseCases[i], testBaseCases[i + 1], Collator::LESS);
+}
+
+/* Testing plain, Daku-ten, Handaku-ten letters */
+void CollationKanaTest::TestPlainDakutenHandakuten(void)
+{
+    int32_t i;
+    myCollation->setStrength(Collator::SECONDARY);
+    for (i = 0; i < 3 ; i++)
+        doTest(myCollation, testPlainDakutenHandakutenCases[i], testPlainDakutenHandakutenCases[i + 1], 
+        Collator::LESS);
+}
+
+/* 
+* Test Small, Large letters
+*/
+void CollationKanaTest::TestSmallLarge(void)
+{
+  int32_t i;
+  UErrorCode status = U_ZERO_ERROR;
+  myCollation->setStrength(Collator::TERTIARY);
+  myCollation->setAttribute(UCOL_CASE_LEVEL, UCOL_ON, status);
+  for (i = 0; i < 3 ; i++)
+    doTest(myCollation, testSmallLargeCases[i], testSmallLargeCases[i + 1], Collator::LESS);
+}
+
+/*
+* Test Katakana, Hiragana letters
+*/
+void CollationKanaTest::TestKatakanaHiragana(void)
+{
+  int32_t i;
+  UErrorCode status = U_ZERO_ERROR;
+  myCollation->setStrength(Collator::QUATERNARY);
+  myCollation->setAttribute(UCOL_CASE_LEVEL, UCOL_ON, status);
+  for (i = 0; i < 3 ; i++) {
+    doTest(myCollation, testKatakanaHiraganaCases[i], testKatakanaHiraganaCases[i + 1], 
+      Collator::LESS);
+  }
+}
+
+/*
+* Test Choo-on kigoo
+*/
+void CollationKanaTest::TestChooonKigoo(void)
+{
+  int32_t i;
+  UErrorCode status = U_ZERO_ERROR;
+  myCollation->setStrength(Collator::QUATERNARY);
+  myCollation->setAttribute(UCOL_CASE_LEVEL, UCOL_ON, status);
+  for (i = 0; i < 7 ; i++) {
+    doTest(myCollation, testChooonKigooCases[i], testChooonKigooCases[i + 1], Collator::LESS);
+  }
+}
+
+
+void CollationKanaTest::runIndexedTest( int32_t index, UBool exec, const char* &name, char* /*par*/ )
+{
+    if (exec) logln("TestSuite CollationKanaTest: ");
+    if(myCollation) {
+      switch (index) {
+          case 0: name = "TestTertiary";  if (exec)   TestTertiary(/* par */); break;
+          case 1: name = "TestBase";  if (exec)   TestBase(/* par */); break;
+          case 2: name = "TestSmallLarge";  if (exec)   TestSmallLarge(/* par */); break;
+          case 3: name = "TestTestPlainDakutenHandakuten";  if (exec)   TestPlainDakutenHandakuten(/* par */); break;
+          case 4: name = "TestKatakanaHiragana";  if (exec)   TestKatakanaHiragana(/* par */); break;
+          case 5: name = "TestChooonKigoo";  if (exec)   TestChooonKigoo(/* par */); break;
+          default: name = ""; break;
+      }
+    } else {
+      dataerrln("Collator couldn't be instantiated!");
+      name = "";
+    }
+}
+
+#endif /* #if !UCONFIG_NO_COLLATION */
Property changes on: icu46/source/test/intltest/jacoll.cpp
___________________________________________________________________
Added: svn:eol-style
   + LF