summaryrefslogtreecommitdiff
path: root/Build/source/libs/icu/icu-4.6/test/cintltst/citertst.c
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/libs/icu/icu-4.6/test/cintltst/citertst.c')
-rw-r--r--Build/source/libs/icu/icu-4.6/test/cintltst/citertst.c2020
1 files changed, 2020 insertions, 0 deletions
diff --git a/Build/source/libs/icu/icu-4.6/test/cintltst/citertst.c b/Build/source/libs/icu/icu-4.6/test/cintltst/citertst.c
new file mode 100644
index 00000000000..943a2196dda
--- /dev/null
+++ b/Build/source/libs/icu/icu-4.6/test/cintltst/citertst.c
@@ -0,0 +1,2020 @@
+/********************************************************************
+ * COPYRIGHT:
+ * Copyright (c) 1997-2010, International Business Machines Corporation and
+ * others. All Rights Reserved.
+ ********************************************************************/
+/********************************************************************************
+*
+* File CITERTST.C
+*
+* Modification History:
+* Date Name Description
+* Madhu Katragadda Ported for C API
+* 02/19/01 synwee Modified test case for new collation iterator
+*********************************************************************************/
+/*
+ * Collation Iterator tests.
+ * (Let me reiterate my position...)
+ */
+
+#include "unicode/utypes.h"
+
+#if !UCONFIG_NO_COLLATION
+
+#include "unicode/ucol.h"
+#include "unicode/uloc.h"
+#include "unicode/uchar.h"
+#include "unicode/ustring.h"
+#include "unicode/putil.h"
+#include "callcoll.h"
+#include "cmemory.h"
+#include "cintltst.h"
+#include "citertst.h"
+#include "ccolltst.h"
+#include "filestrm.h"
+#include "cstring.h"
+#include "ucol_imp.h"
+#include "ucol_tok.h"
+#include "uparse.h"
+#include <stdio.h>
+
+extern uint8_t ucol_uprv_getCaseBits(const UChar *, uint32_t, UErrorCode *);
+
+void addCollIterTest(TestNode** root)
+{
+ addTest(root, &TestPrevious, "tscoll/citertst/TestPrevious");
+ addTest(root, &TestOffset, "tscoll/citertst/TestOffset");
+ addTest(root, &TestSetText, "tscoll/citertst/TestSetText");
+ addTest(root, &TestMaxExpansion, "tscoll/citertst/TestMaxExpansion");
+ addTest(root, &TestUnicodeChar, "tscoll/citertst/TestUnicodeChar");
+ addTest(root, &TestNormalizedUnicodeChar,
+ "tscoll/citertst/TestNormalizedUnicodeChar");
+ addTest(root, &TestNormalization, "tscoll/citertst/TestNormalization");
+ addTest(root, &TestBug672, "tscoll/citertst/TestBug672");
+ addTest(root, &TestBug672Normalize, "tscoll/citertst/TestBug672Normalize");
+ addTest(root, &TestSmallBuffer, "tscoll/citertst/TestSmallBuffer");
+ addTest(root, &TestCEs, "tscoll/citertst/TestCEs");
+ addTest(root, &TestDiscontiguos, "tscoll/citertst/TestDiscontiguos");
+ addTest(root, &TestCEBufferOverflow, "tscoll/citertst/TestCEBufferOverflow");
+ addTest(root, &TestCEValidity, "tscoll/citertst/TestCEValidity");
+ addTest(root, &TestSortKeyValidity, "tscoll/citertst/TestSortKeyValidity");
+}
+
+/* The locales we support */
+
+static const char * LOCALES[] = {"en_AU", "en_BE", "en_CA"};
+
+static void TestBug672() {
+ UErrorCode status = U_ZERO_ERROR;
+ UChar pattern[20];
+ UChar text[50];
+ int i;
+ int result[3][3];
+
+ u_uastrcpy(pattern, "resume");
+ u_uastrcpy(text, "Time to resume updating my resume.");
+
+ for (i = 0; i < 3; ++ i) {
+ UCollator *coll = ucol_open(LOCALES[i], &status);
+ UCollationElements *pitr = ucol_openElements(coll, pattern, -1,
+ &status);
+ UCollationElements *titer = ucol_openElements(coll, text, -1,
+ &status);
+ if (U_FAILURE(status)) {
+ log_err_status(status, "ERROR: in creation of either the collator or the collation iterator :%s\n",
+ myErrorName(status));
+ return;
+ }
+
+ log_verbose("locale tested %s\n", LOCALES[i]);
+
+ while (ucol_next(pitr, &status) != UCOL_NULLORDER &&
+ U_SUCCESS(status)) {
+ }
+ if (U_FAILURE(status)) {
+ log_err("ERROR: reversing collation iterator :%s\n",
+ myErrorName(status));
+ return;
+ }
+ ucol_reset(pitr);
+
+ ucol_setOffset(titer, u_strlen(pattern), &status);
+ if (U_FAILURE(status)) {
+ log_err("ERROR: setting offset in collator :%s\n",
+ myErrorName(status));
+ return;
+ }
+ result[i][0] = ucol_getOffset(titer);
+ log_verbose("Text iterator set to offset %d\n", result[i][0]);
+
+ /* Use previous() */
+ ucol_previous(titer, &status);
+ result[i][1] = ucol_getOffset(titer);
+ log_verbose("Current offset %d after previous\n", result[i][1]);
+
+ /* Add one to index */
+ log_verbose("Adding one to current offset...\n");
+ ucol_setOffset(titer, ucol_getOffset(titer) + 1, &status);
+ if (U_FAILURE(status)) {
+ log_err("ERROR: setting offset in collator :%s\n",
+ myErrorName(status));
+ return;
+ }
+ result[i][2] = ucol_getOffset(titer);
+ log_verbose("Current offset in text = %d\n", result[i][2]);
+ ucol_closeElements(pitr);
+ ucol_closeElements(titer);
+ ucol_close(coll);
+ }
+
+ if (uprv_memcmp(result[0], result[1], 3) != 0 ||
+ uprv_memcmp(result[1], result[2], 3) != 0) {
+ log_err("ERROR: Different locales have different offsets at the same character\n");
+ }
+}
+
+
+
+/* Running this test with normalization enabled showed up a bug in the incremental
+ normalization code. */
+static void TestBug672Normalize() {
+ UErrorCode status = U_ZERO_ERROR;
+ UChar pattern[20];
+ UChar text[50];
+ int i;
+ int result[3][3];
+
+ u_uastrcpy(pattern, "resume");
+ u_uastrcpy(text, "Time to resume updating my resume.");
+
+ for (i = 0; i < 3; ++ i) {
+ UCollator *coll = ucol_open(LOCALES[i], &status);
+ UCollationElements *pitr = NULL;
+ UCollationElements *titer = NULL;
+
+ ucol_setAttribute(coll, UCOL_NORMALIZATION_MODE, UCOL_ON, &status);
+
+ pitr = ucol_openElements(coll, pattern, -1, &status);
+ titer = ucol_openElements(coll, text, -1, &status);
+ if (U_FAILURE(status)) {
+ log_err_status(status, "ERROR: in creation of either the collator or the collation iterator :%s\n",
+ myErrorName(status));
+ return;
+ }
+
+ log_verbose("locale tested %s\n", LOCALES[i]);
+
+ while (ucol_next(pitr, &status) != UCOL_NULLORDER &&
+ U_SUCCESS(status)) {
+ }
+ if (U_FAILURE(status)) {
+ log_err("ERROR: reversing collation iterator :%s\n",
+ myErrorName(status));
+ return;
+ }
+ ucol_reset(pitr);
+
+ ucol_setOffset(titer, u_strlen(pattern), &status);
+ if (U_FAILURE(status)) {
+ log_err("ERROR: setting offset in collator :%s\n",
+ myErrorName(status));
+ return;
+ }
+ result[i][0] = ucol_getOffset(titer);
+ log_verbose("Text iterator set to offset %d\n", result[i][0]);
+
+ /* Use previous() */
+ ucol_previous(titer, &status);
+ result[i][1] = ucol_getOffset(titer);
+ log_verbose("Current offset %d after previous\n", result[i][1]);
+
+ /* Add one to index */
+ log_verbose("Adding one to current offset...\n");
+ ucol_setOffset(titer, ucol_getOffset(titer) + 1, &status);
+ if (U_FAILURE(status)) {
+ log_err("ERROR: setting offset in collator :%s\n",
+ myErrorName(status));
+ return;
+ }
+ result[i][2] = ucol_getOffset(titer);
+ log_verbose("Current offset in text = %d\n", result[i][2]);
+ ucol_closeElements(pitr);
+ ucol_closeElements(titer);
+ ucol_close(coll);
+ }
+
+ if (uprv_memcmp(result[0], result[1], 3) != 0 ||
+ uprv_memcmp(result[1], result[2], 3) != 0) {
+ log_err("ERROR: Different locales have different offsets at the same character\n");
+ }
+}
+
+
+
+
+/**
+ * Test for CollationElementIterator previous and next for the whole set of
+ * unicode characters.
+ */
+static void TestUnicodeChar()
+{
+ UChar source[0x100];
+ UCollator *en_us;
+ UCollationElements *iter;
+ UErrorCode status = U_ZERO_ERROR;
+ UChar codepoint;
+
+ UChar *test;
+ en_us = ucol_open("en_US", &status);
+ if (U_FAILURE(status)){
+ log_err_status(status, "ERROR: in creation of collation data using ucol_open()\n %s\n",
+ myErrorName(status));
+ return;
+ }
+
+ for (codepoint = 1; codepoint < 0xFFFE;)
+ {
+ test = source;
+
+ while (codepoint % 0xFF != 0)
+ {
+ if (u_isdefined(codepoint))
+ *(test ++) = codepoint;
+ codepoint ++;
+ }
+
+ if (u_isdefined(codepoint))
+ *(test ++) = codepoint;
+
+ if (codepoint != 0xFFFF)
+ codepoint ++;
+
+ *test = 0;
+ iter=ucol_openElements(en_us, source, u_strlen(source), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(en_us);
+ return;
+ }
+ /* A basic test to see if it's working at all */
+ log_verbose("codepoint testing %x\n", codepoint);
+ backAndForth(iter);
+ ucol_closeElements(iter);
+
+ /* null termination test */
+ iter=ucol_openElements(en_us, source, -1, &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(en_us);
+ return;
+ }
+ /* A basic test to see if it's working at all */
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ }
+
+ ucol_close(en_us);
+}
+
+/**
+ * Test for CollationElementIterator previous and next for the whole set of
+ * unicode characters with normalization on.
+ */
+static void TestNormalizedUnicodeChar()
+{
+ UChar source[0x100];
+ UCollator *th_th;
+ UCollationElements *iter;
+ UErrorCode status = U_ZERO_ERROR;
+ UChar codepoint;
+
+ UChar *test;
+ /* thai should have normalization on */
+ th_th = ucol_open("th_TH", &status);
+ if (U_FAILURE(status)){
+ log_err_status(status, "ERROR: in creation of thai collation using ucol_open()\n %s\n",
+ myErrorName(status));
+ return;
+ }
+
+ for (codepoint = 1; codepoint < 0xFFFE;)
+ {
+ test = source;
+
+ while (codepoint % 0xFF != 0)
+ {
+ if (u_isdefined(codepoint))
+ *(test ++) = codepoint;
+ codepoint ++;
+ }
+
+ if (u_isdefined(codepoint))
+ *(test ++) = codepoint;
+
+ if (codepoint != 0xFFFF)
+ codepoint ++;
+
+ *test = 0;
+ iter=ucol_openElements(th_th, source, u_strlen(source), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(th_th);
+ return;
+ }
+
+ backAndForth(iter);
+ ucol_closeElements(iter);
+
+ iter=ucol_openElements(th_th, source, -1, &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(th_th);
+ return;
+ }
+
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ }
+
+ ucol_close(th_th);
+}
+
+/**
+* Test the incremental normalization
+*/
+static void TestNormalization()
+{
+ UErrorCode status = U_ZERO_ERROR;
+ const char *str =
+ "&a < \\u0300\\u0315 < A\\u0300\\u0315 < \\u0316\\u0315B < \\u0316\\u0300\\u0315";
+ UCollator *coll;
+ UChar rule[50];
+ int rulelen = u_unescape(str, rule, 50);
+ int count = 0;
+ const char *testdata[] =
+ {"\\u1ED9", "o\\u0323\\u0302",
+ "\\u0300\\u0315", "\\u0315\\u0300",
+ "A\\u0300\\u0315B", "A\\u0315\\u0300B",
+ "A\\u0316\\u0315B", "A\\u0315\\u0316B",
+ "\\u0316\\u0300\\u0315", "\\u0315\\u0300\\u0316",
+ "A\\u0316\\u0300\\u0315B", "A\\u0315\\u0300\\u0316B",
+ "\\u0316\\u0315\\u0300", "A\\u0316\\u0315\\u0300B"};
+ int32_t srclen;
+ UChar source[10];
+ UCollationElements *iter;
+
+ coll = ucol_openRules(rule, rulelen, UCOL_ON, UCOL_TERTIARY, NULL, &status);
+ ucol_setAttribute(coll, UCOL_NORMALIZATION_MODE, UCOL_ON, &status);
+ if (U_FAILURE(status)){
+ log_err_status(status, "ERROR: in creation of collator using ucol_openRules()\n %s\n",
+ myErrorName(status));
+ return;
+ }
+
+ srclen = u_unescape(testdata[0], source, 10);
+ iter = ucol_openElements(coll, source, srclen, &status);
+ backAndForth(iter);
+ ucol_closeElements(iter);
+
+ srclen = u_unescape(testdata[1], source, 10);
+ iter = ucol_openElements(coll, source, srclen, &status);
+ backAndForth(iter);
+ ucol_closeElements(iter);
+
+ while (count < 12) {
+ srclen = u_unescape(testdata[count], source, 10);
+ iter = ucol_openElements(coll, source, srclen, &status);
+
+ if (U_FAILURE(status)){
+ log_err("ERROR: in creation of collator element iterator\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ backAndForth(iter);
+ ucol_closeElements(iter);
+
+ iter = ucol_openElements(coll, source, -1, &status);
+
+ if (U_FAILURE(status)){
+ log_err("ERROR: in creation of collator element iterator\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ count ++;
+ }
+ ucol_close(coll);
+}
+
+/**
+ * Test for CollationElementIterator.previous()
+ *
+ * @bug 4108758 - Make sure it works with contracting characters
+ *
+ */
+static void TestPrevious()
+{
+ UCollator *coll=NULL;
+ UChar rule[50];
+ UChar *source;
+ UCollator *c1, *c2, *c3;
+ UCollationElements *iter;
+ UErrorCode status = U_ZERO_ERROR;
+ UChar test1[50];
+ UChar test2[50];
+
+ u_uastrcpy(test1, "What subset of all possible test cases?");
+ u_uastrcpy(test2, "has the highest probability of detecting");
+ coll = ucol_open("en_US", &status);
+
+ iter=ucol_openElements(coll, test1, u_strlen(test1), &status);
+ log_verbose("English locale testing back and forth\n");
+ if(U_FAILURE(status)){
+ log_err_status(status, "ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(coll);
+ return;
+ }
+ /* A basic test to see if it's working at all */
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ ucol_close(coll);
+
+ /* Test with a contracting character sequence */
+ u_uastrcpy(rule, "&a,A < b,B < c,C, d,D < z,Z < ch,cH,Ch,CH");
+ c1 = ucol_openRules(rule, u_strlen(rule), UCOL_OFF, UCOL_DEFAULT_STRENGTH, NULL, &status);
+
+ log_verbose("Contraction rule testing back and forth with no normalization\n");
+
+ if (c1 == NULL || U_FAILURE(status))
+ {
+ log_err("Couldn't create a RuleBasedCollator with a contracting sequence\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ source=(UChar*)malloc(sizeof(UChar) * 20);
+ u_uastrcpy(source, "abchdcba");
+ iter=ucol_openElements(c1, source, u_strlen(source), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ ucol_close(c1);
+
+ /* Test with an expanding character sequence */
+ u_uastrcpy(rule, "&a < b < c/abd < d");
+ c2 = ucol_openRules(rule, u_strlen(rule), UCOL_OFF, UCOL_DEFAULT_STRENGTH, NULL, &status);
+ log_verbose("Expansion rule testing back and forth with no normalization\n");
+ if (c2 == NULL || U_FAILURE(status))
+ {
+ log_err("Couldn't create a RuleBasedCollator with a contracting sequence.\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ u_uastrcpy(source, "abcd");
+ iter=ucol_openElements(c2, source, u_strlen(source), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ ucol_close(c2);
+ /* Now try both */
+ u_uastrcpy(rule, "&a < b < c/aba < d < z < ch");
+ c3 = ucol_openRules(rule, u_strlen(rule), UCOL_DEFAULT, UCOL_DEFAULT_STRENGTH,NULL, &status);
+ log_verbose("Expansion/contraction rule testing back and forth with no normalization\n");
+
+ if (c3 == NULL || U_FAILURE(status))
+ {
+ log_err("Couldn't create a RuleBasedCollator with a contracting sequence.\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ u_uastrcpy(source, "abcdbchdc");
+ iter=ucol_openElements(c3, source, u_strlen(source), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ ucol_close(c3);
+ source[0] = 0x0e41;
+ source[1] = 0x0e02;
+ source[2] = 0x0e41;
+ source[3] = 0x0e02;
+ source[4] = 0x0e27;
+ source[5] = 0x61;
+ source[6] = 0x62;
+ source[7] = 0x63;
+ source[8] = 0;
+
+ coll = ucol_open("th_TH", &status);
+ log_verbose("Thai locale testing back and forth with normalization\n");
+ iter=ucol_openElements(coll, source, u_strlen(source), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ ucol_close(coll);
+
+ /* prev test */
+ source[0] = 0x0061;
+ source[1] = 0x30CF;
+ source[2] = 0x3099;
+ source[3] = 0x30FC;
+ source[4] = 0;
+
+ coll = ucol_open("ja_JP", &status);
+ log_verbose("Japanese locale testing back and forth with normalization\n");
+ iter=ucol_openElements(coll, source, u_strlen(source), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ return;
+ }
+ backAndForth(iter);
+ ucol_closeElements(iter);
+ ucol_close(coll);
+
+ free(source);
+}
+
+/**
+ * Test for getOffset() and setOffset()
+ */
+static void TestOffset()
+{
+ UErrorCode status= U_ZERO_ERROR;
+ UCollator *en_us=NULL;
+ UCollationElements *iter, *pristine;
+ int32_t offset;
+ OrderAndOffset *orders;
+ int32_t orderLength=0;
+ int count = 0;
+ UChar test1[50];
+ UChar test2[50];
+
+ u_uastrcpy(test1, "What subset of all possible test cases?");
+ u_uastrcpy(test2, "has the highest probability of detecting");
+ en_us = ucol_open("en_US", &status);
+ log_verbose("Testing getOffset and setOffset for collations\n");
+ iter = ucol_openElements(en_us, test1, u_strlen(test1), &status);
+ if(U_FAILURE(status)){
+ log_err_status(status, "ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(en_us);
+ return;
+ }
+
+ /* testing boundaries */
+ ucol_setOffset(iter, 0, &status);
+ if (U_FAILURE(status) || ucol_previous(iter, &status) != UCOL_NULLORDER) {
+ log_err("Error: After setting offset to 0, we should be at the end "
+ "of the backwards iteration");
+ }
+ ucol_setOffset(iter, u_strlen(test1), &status);
+ if (U_FAILURE(status) || ucol_next(iter, &status) != UCOL_NULLORDER) {
+ log_err("Error: After setting offset to end of the string, we should "
+ "be at the end of the backwards iteration");
+ }
+
+ /* Run all the way through the iterator, then get the offset */
+
+ orders = getOrders(iter, &orderLength);
+
+ offset = ucol_getOffset(iter);
+
+ if (offset != u_strlen(test1))
+ {
+ log_err("offset at end != length %d vs %d\n", offset,
+ u_strlen(test1) );
+ }
+
+ /* Now set the offset back to the beginning and see if it works */
+ pristine=ucol_openElements(en_us, test1, u_strlen(test1), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(en_us);
+ return;
+ }
+ status = U_ZERO_ERROR;
+
+ ucol_setOffset(iter, 0, &status);
+ if (U_FAILURE(status))
+ {
+ log_err("setOffset failed. %s\n", myErrorName(status));
+ }
+ else
+ {
+ assertEqual(iter, pristine);
+ }
+
+ ucol_closeElements(pristine);
+ ucol_closeElements(iter);
+ free(orders);
+
+ /* testing offsets in normalization buffer */
+ test1[0] = 0x61;
+ test1[1] = 0x300;
+ test1[2] = 0x316;
+ test1[3] = 0x62;
+ test1[4] = 0;
+ ucol_setAttribute(en_us, UCOL_NORMALIZATION_MODE, UCOL_ON, &status);
+ iter = ucol_openElements(en_us, test1, 4, &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(en_us);
+ return;
+ }
+
+ count = 0;
+ while (ucol_next(iter, &status) != UCOL_NULLORDER &&
+ U_SUCCESS(status)) {
+ switch (count) {
+ case 0:
+ if (ucol_getOffset(iter) != 1) {
+ log_err("ERROR: Offset of iteration should be 1\n");
+ }
+ break;
+ case 3:
+ if (ucol_getOffset(iter) != 4) {
+ log_err("ERROR: Offset of iteration should be 4\n");
+ }
+ break;
+ default:
+ if (ucol_getOffset(iter) != 3) {
+ log_err("ERROR: Offset of iteration should be 3\n");
+ }
+ }
+ count ++;
+ }
+
+ ucol_reset(iter);
+ count = 0;
+ while (ucol_previous(iter, &status) != UCOL_NULLORDER &&
+ U_SUCCESS(status)) {
+ switch (count) {
+ case 0:
+ case 1:
+ if (ucol_getOffset(iter) != 3) {
+ log_err("ERROR: Offset of iteration should be 3\n");
+ }
+ break;
+ case 2:
+ if (ucol_getOffset(iter) != 1) {
+ log_err("ERROR: Offset of iteration should be 1\n");
+ }
+ break;
+ default:
+ if (ucol_getOffset(iter) != 0) {
+ log_err("ERROR: Offset of iteration should be 0\n");
+ }
+ }
+ count ++;
+ }
+
+ if(U_FAILURE(status)){
+ log_err("ERROR: in iterating collation elements %s\n",
+ myErrorName(status));
+ }
+
+ ucol_closeElements(iter);
+ ucol_close(en_us);
+}
+
+/**
+ * Test for setText()
+ */
+static void TestSetText()
+{
+ int32_t c,i;
+ UErrorCode status = U_ZERO_ERROR;
+ UCollator *en_us=NULL;
+ UCollationElements *iter1, *iter2;
+ UChar test1[50];
+ UChar test2[50];
+
+ u_uastrcpy(test1, "What subset of all possible test cases?");
+ u_uastrcpy(test2, "has the highest probability of detecting");
+ en_us = ucol_open("en_US", &status);
+ log_verbose("testing setText for Collation elements\n");
+ iter1=ucol_openElements(en_us, test1, u_strlen(test1), &status);
+ if(U_FAILURE(status)){
+ log_err_status(status, "ERROR: in creation of collation element iterator1 using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(en_us);
+ return;
+ }
+ iter2=ucol_openElements(en_us, test2, u_strlen(test2), &status);
+ if(U_FAILURE(status)){
+ log_err("ERROR: in creation of collation element iterator2 using ucol_openElements()\n %s\n",
+ myErrorName(status));
+ ucol_close(en_us);
+ return;
+ }
+
+ /* Run through the second iterator just to exercise it */
+ c = ucol_next(iter2, &status);
+ i = 0;
+
+ while ( ++i < 10 && (c != UCOL_NULLORDER))
+ {
+ if (U_FAILURE(status))
+ {
+ log_err("iter2->next() returned an error. %s\n", myErrorName(status));
+ ucol_closeElements(iter2);
+ ucol_closeElements(iter1);
+ ucol_close(en_us);
+ return;
+ }
+
+ c = ucol_next(iter2, &status);
+ }
+
+ /* Now set it to point to the same string as the first iterator */
+ ucol_setText(iter2, test1, u_strlen(test1), &status);
+ if (U_FAILURE(status))
+ {
+ log_err("call to iter2->setText(test1) failed. %s\n", myErrorName(status));
+ }
+ else
+ {
+ assertEqual(iter1, iter2);
+ }
+
+ /* Now set it to point to a null string with fake length*/
+ ucol_setText(iter2, NULL, 2, &status);
+ if (U_FAILURE(status))
+ {
+ log_err("call to iter2->setText(null) failed. %s\n", myErrorName(status));
+ }
+ else
+ {
+ if (ucol_next(iter2, &status) != UCOL_NULLORDER) {
+ log_err("iter2 with null text expected to return UCOL_NULLORDER\n");
+ }
+ }
+
+ ucol_closeElements(iter2);
+ ucol_closeElements(iter1);
+ ucol_close(en_us);
+}
+
+/** @bug 4108762
+ * Test for getMaxExpansion()
+ */
+static void TestMaxExpansion()
+{
+ UErrorCode status = U_ZERO_ERROR;
+ UCollator *coll ;/*= ucol_open("en_US", &status);*/
+ UChar ch = 0;
+ UChar32 unassigned = 0xEFFFD;
+ UChar supplementary[2];
+ uint32_t stringOffset = 0;
+ UBool isError = FALSE;
+ uint32_t sorder = 0;
+ UCollationElements *iter ;/*= ucol_openElements(coll, &ch, 1, &status);*/
+ uint32_t temporder = 0;
+
+ UChar rule[256];
+ u_uastrcpy(rule, "&a < ab < c/aba < d < z < ch");
+ coll = ucol_openRules(rule, u_strlen(rule), UCOL_DEFAULT,
+ UCOL_DEFAULT_STRENGTH,NULL, &status);
+ if(U_SUCCESS(status) && coll) {
+ iter = ucol_openElements(coll, &ch, 1, &status);
+
+ while (ch < 0xFFFF && U_SUCCESS(status)) {
+ int count = 1;
+ uint32_t order;
+ int32_t size = 0;
+
+ ch ++;
+
+ ucol_setText(iter, &ch, 1, &status);
+ order = ucol_previous(iter, &status);
+
+ /* thai management */
+ if (order == 0)
+ order = ucol_previous(iter, &status);
+
+ while (U_SUCCESS(status) &&
+ ucol_previous(iter, &status) != UCOL_NULLORDER) {
+ count ++;
+ }
+
+ size = ucol_getMaxExpansion(iter, order);
+ if (U_FAILURE(status) || size < count) {
+ log_err("Failure at codepoint %d, maximum expansion count < %d\n",
+ ch, count);
+ }
+ }
+
+ /* testing for exact max expansion */
+ ch = 0;
+ while (ch < 0x61) {
+ uint32_t order;
+ int32_t size;
+ ucol_setText(iter, &ch, 1, &status);
+ order = ucol_previous(iter, &status);
+ size = ucol_getMaxExpansion(iter, order);
+ if (U_FAILURE(status) || size != 1) {
+ log_err("Failure at codepoint %d, maximum expansion count < %d\n",
+ ch, 1);
+ }
+ ch ++;
+ }
+
+ ch = 0x63;
+ ucol_setText(iter, &ch, 1, &status);
+ temporder = ucol_previous(iter, &status);
+
+ if (U_FAILURE(status) || ucol_getMaxExpansion(iter, temporder) != 3) {
+ log_err("Failure at codepoint %d, maximum expansion count != %d\n",
+ ch, 3);
+ }
+
+ ch = 0x64;
+ ucol_setText(iter, &ch, 1, &status);
+ temporder = ucol_previous(iter, &status);
+
+ if (U_FAILURE(status) || ucol_getMaxExpansion(iter, temporder) != 1) {
+ log_err("Failure at codepoint %d, maximum expansion count != %d\n",
+ ch, 3);
+ }
+
+ U16_APPEND(supplementary, stringOffset, 2, unassigned, isError);
+ ucol_setText(iter, supplementary, 2, &status);
+ sorder = ucol_previous(iter, &status);
+
+ if (U_FAILURE(status) || ucol_getMaxExpansion(iter, sorder) != 2) {
+ log_err("Failure at codepoint %d, maximum expansion count < %d\n",
+ ch, 2);
+ }
+
+ /* testing jamo */
+ ch = 0x1165;
+
+ ucol_setText(iter, &ch, 1, &status);
+ temporder = ucol_previous(iter, &status);
+ if (U_FAILURE(status) || ucol_getMaxExpansion(iter, temporder) > 3) {
+ log_err("Failure at codepoint %d, maximum expansion count > %d\n",
+ ch, 3);
+ }
+
+ ucol_closeElements(iter);
+ ucol_close(coll);
+
+ /* testing special jamo &a<\u1160 */
+ rule[0] = 0x26;
+ rule[1] = 0x71;
+ rule[2] = 0x3c;
+ rule[3] = 0x1165;
+ rule[4] = 0x2f;
+ rule[5] = 0x71;
+ rule[6] = 0x71;
+ rule[7] = 0x71;
+ rule[8] = 0x71;
+ rule[9] = 0;
+
+ coll = ucol_openRules(rule, u_strlen(rule), UCOL_DEFAULT,
+ UCOL_DEFAULT_STRENGTH,NULL, &status);
+ iter = ucol_openElements(coll, &ch, 1, &status);
+
+ temporder = ucol_previous(iter, &status);
+ if (U_FAILURE(status) || ucol_getMaxExpansion(iter, temporder) != 6) {
+ log_err("Failure at codepoint %d, maximum expansion count > %d\n",
+ ch, 5);
+ }
+
+ ucol_closeElements(iter);
+ ucol_close(coll);
+ } else {
+ log_err_status(status, "Couldn't open collator -> %s\n", u_errorName(status));
+ }
+
+}
+
+
+static void assertEqual(UCollationElements *i1, UCollationElements *i2)
+{
+ int32_t c1, c2;
+ int32_t count = 0;
+ UErrorCode status = U_ZERO_ERROR;
+
+ do
+ {
+ c1 = ucol_next(i1, &status);
+ c2 = ucol_next(i2, &status);
+
+ if (c1 != c2)
+ {
+ log_err("Error in iteration %d assetEqual between\n %d and %d, they are not equal\n", count, c1, c2);
+ break;
+ }
+
+ count += 1;
+ }
+ while (c1 != UCOL_NULLORDER);
+}
+
+/**
+ * Testing iterators with extremely small buffers
+ */
+static void TestSmallBuffer()
+{
+ UErrorCode status = U_ZERO_ERROR;
+ UCollator *coll;
+ UCollationElements *testiter,
+ *iter;
+ int32_t count = 0;
+ OrderAndOffset *testorders,
+ *orders;
+
+ UChar teststr[500];
+ UChar str[] = {0x300, 0x31A, 0};
+ /*
+ creating a long string of decomposable characters,
+ since by default the writable buffer is of size 256
+ */
+ while (count < 500) {
+ if ((count & 1) == 0) {
+ teststr[count ++] = 0x300;
+ }
+ else {
+ teststr[count ++] = 0x31A;
+ }
+ }
+
+ coll = ucol_open("th_TH", &status);
+ if(U_SUCCESS(status) && coll) {
+ testiter = ucol_openElements(coll, teststr, 500, &status);
+ iter = ucol_openElements(coll, str, 2, &status);
+
+ orders = getOrders(iter, &count);
+ if (count != 2) {
+ log_err("Error collation elements size is not 2 for \\u0300\\u031A\n");
+ }
+
+ /*
+ this will rearrange the string data to 250 characters of 0x300 first then
+ 250 characters of 0x031A
+ */
+ testorders = getOrders(testiter, &count);
+
+ if (count != 500) {
+ log_err("Error decomposition does not give the right sized collation elements\n");
+ }
+
+ while (count != 0) {
+ /* UCA collation element for 0x0F76 */
+ if ((count > 250 && testorders[-- count].order != orders[1].order) ||
+ (count <= 250 && testorders[-- count].order != orders[0].order)) {
+ log_err("Error decomposition does not give the right collation element at %d count\n", count);
+ break;
+ }
+ }
+
+ free(testorders);
+ free(orders);
+
+ ucol_reset(testiter);
+
+ /* ensures closing of elements done properly to clear writable buffer */
+ ucol_next(testiter, &status);
+ ucol_next(testiter, &status);
+ ucol_closeElements(testiter);
+ ucol_closeElements(iter);
+ ucol_close(coll);
+ } else {
+ log_err_status(status, "Couldn't open collator -> %s\n", u_errorName(status));
+ }
+}
+
+/**
+* Sniplets of code from genuca
+*/
+static int32_t hex2num(char hex) {
+ if(hex>='0' && hex <='9') {
+ return hex-'0';
+ } else if(hex>='a' && hex<='f') {
+ return hex-'a'+10;
+ } else if(hex>='A' && hex<='F') {
+ return hex-'A'+10;
+ } else {
+ return 0;
+ }
+}
+
+/**
+* Getting codepoints from a string
+* @param str character string contain codepoints seperated by space and ended
+* by a semicolon
+* @param codepoints array for storage, assuming size > 5
+* @return position at the end of the codepoint section
+*/
+static char *getCodePoints(char *str, UChar *codepoints, UChar *contextCPs) {
+ UErrorCode errorCode = U_ZERO_ERROR;
+ char *semi = uprv_strchr(str, ';');
+ char *pipe = uprv_strchr(str, '|');
+ char *s;
+ *codepoints = 0;
+ *contextCPs = 0;
+ if(semi == NULL) {
+ log_err("expected semicolon after code point string in FractionalUCA.txt %s\n", str);
+ return str;
+ }
+ if(pipe != NULL) {
+ int32_t contextLength;
+ *pipe = 0;
+ contextLength = u_parseString(str, contextCPs, 99, NULL, &errorCode);
+ *pipe = '|';
+ if(U_FAILURE(errorCode)) {
+ log_err("error parsing precontext string from FractionalUCA.txt %s\n", str);
+ return str;
+ }
+ /* prepend the precontext string to the codepoints */
+ u_memcpy(codepoints, contextCPs, contextLength);
+ codepoints += contextLength;
+ /* start of the code point string */
+ s = pipe + 1;
+ } else {
+ s = str;
+ }
+ u_parseString(s, codepoints, 99, NULL, &errorCode);
+ if(U_FAILURE(errorCode)) {
+ log_err("error parsing code point string from FractionalUCA.txt %s\n", str);
+ return str;
+ }
+ return semi + 1;
+}
+
+/**
+* Sniplets of code from genuca
+*/
+static int32_t
+readElement(char **from, char *to, char separator, UErrorCode *status)
+{
+ if (U_SUCCESS(*status)) {
+ char buffer[1024];
+ int32_t i = 0;
+ while (**from != separator) {
+ if (**from != ' ') {
+ *(buffer+i++) = **from;
+ }
+ (*from)++;
+ }
+ (*from)++;
+ *(buffer + i) = 0;
+ strcpy(to, buffer);
+ return i/2;
+ }
+
+ return 0;
+}
+
+/**
+* Sniplets of code from genuca
+*/
+static uint32_t
+getSingleCEValue(char *primary, char *secondary, char *tertiary,
+ UErrorCode *status)
+{
+ if (U_SUCCESS(*status)) {
+ uint32_t value = 0;
+ char primsave = '\0';
+ char secsave = '\0';
+ char tersave = '\0';
+ char *primend = primary+4;
+ char *secend = secondary+2;
+ char *terend = tertiary+2;
+ uint32_t primvalue;
+ uint32_t secvalue;
+ uint32_t tervalue;
+
+ if (uprv_strlen(primary) > 4) {
+ primsave = *primend;
+ *primend = '\0';
+ }
+
+ if (uprv_strlen(secondary) > 2) {
+ secsave = *secend;
+ *secend = '\0';
+ }
+
+ if (uprv_strlen(tertiary) > 2) {
+ tersave = *terend;
+ *terend = '\0';
+ }
+
+ primvalue = (*primary!='\0')?uprv_strtoul(primary, &primend, 16):0;
+ secvalue = (*secondary!='\0')?uprv_strtoul(secondary, &secend, 16):0;
+ tervalue = (*tertiary!='\0')?uprv_strtoul(tertiary, &terend, 16):0;
+ if(primvalue <= 0xFF) {
+ primvalue <<= 8;
+ }
+
+ value = ((primvalue << UCOL_PRIMARYORDERSHIFT) & UCOL_PRIMARYORDERMASK)
+ | ((secvalue << UCOL_SECONDARYORDERSHIFT) & UCOL_SECONDARYORDERMASK)
+ | (tervalue & UCOL_TERTIARYORDERMASK);
+
+ if(primsave!='\0') {
+ *primend = primsave;
+ }
+ if(secsave!='\0') {
+ *secend = secsave;
+ }
+ if(tersave!='\0') {
+ *terend = tersave;
+ }
+ return value;
+ }
+ return 0;
+}
+
+/**
+* Getting collation elements generated from a string
+* @param str character string contain collation elements contained in [] and
+* seperated by space
+* @param ce array for storage, assuming size > 20
+* @param status error status
+* @return position at the end of the codepoint section
+*/
+static char * getCEs(char *str, uint32_t *ces, UErrorCode *status) {
+ char *pStartCP = uprv_strchr(str, '[');
+ int count = 0;
+ char *pEndCP;
+ char primary[100];
+ char secondary[100];
+ char tertiary[100];
+
+ while (*pStartCP == '[') {
+ uint32_t primarycount = 0;
+ uint32_t secondarycount = 0;
+ uint32_t tertiarycount = 0;
+ uint32_t CEi = 1;
+ pEndCP = strchr(pStartCP, ']');
+ if(pEndCP == NULL) {
+ break;
+ }
+ pStartCP ++;
+
+ primarycount = readElement(&pStartCP, primary, ',', status);
+ secondarycount = readElement(&pStartCP, secondary, ',', status);
+ tertiarycount = readElement(&pStartCP, tertiary, ']', status);
+
+ /* I want to get the CEs entered right here, including continuation */
+ ces[count ++] = getSingleCEValue(primary, secondary, tertiary, status);
+ if (U_FAILURE(*status)) {
+ break;
+ }
+
+ while (2 * CEi < primarycount || CEi < secondarycount ||
+ CEi < tertiarycount) {
+ uint32_t value = UCOL_CONTINUATION_MARKER; /* Continuation marker */
+ if (2 * CEi < primarycount) {
+ value |= ((hex2num(*(primary + 4 * CEi)) & 0xF) << 28);
+ value |= ((hex2num(*(primary + 4 * CEi + 1)) & 0xF) << 24);
+ }
+
+ if (2 * CEi + 1 < primarycount) {
+ value |= ((hex2num(*(primary + 4 * CEi + 2)) & 0xF) << 20);
+ value |= ((hex2num(*(primary + 4 * CEi + 3)) &0xF) << 16);
+ }
+
+ if (CEi < secondarycount) {
+ value |= ((hex2num(*(secondary + 2 * CEi)) & 0xF) << 12);
+ value |= ((hex2num(*(secondary + 2 * CEi + 1)) & 0xF) << 8);
+ }
+
+ if (CEi < tertiarycount) {
+ value |= ((hex2num(*(tertiary + 2 * CEi)) & 0x3) << 4);
+ value |= (hex2num(*(tertiary + 2 * CEi + 1)) & 0xF);
+ }
+
+ CEi ++;
+ ces[count ++] = value;
+ }
+
+ pStartCP = pEndCP + 1;
+ }
+ ces[count] = 0;
+ return pStartCP;
+}
+
+/**
+* Getting the FractionalUCA.txt file stream
+*/
+static FileStream * getFractionalUCA(void)
+{
+ char newPath[256];
+ char backupPath[256];
+ FileStream *result = NULL;
+
+ /* Look inside ICU_DATA first */
+ uprv_strcpy(newPath, ctest_dataSrcDir());
+ uprv_strcat(newPath, "unidata" U_FILE_SEP_STRING );
+ uprv_strcat(newPath, "FractionalUCA.txt");
+
+ /* As a fallback, try to guess where the source data was located
+ * at the time ICU was built, and look there.
+ */
+#if defined (U_TOPSRCDIR)
+ strcpy(backupPath, U_TOPSRCDIR U_FILE_SEP_STRING "data");
+#else
+ {
+ UErrorCode errorCode = U_ZERO_ERROR;
+ strcpy(backupPath, loadTestData(&errorCode));
+ strcat(backupPath, U_FILE_SEP_STRING ".." U_FILE_SEP_STRING ".." U_FILE_SEP_STRING ".." U_FILE_SEP_STRING ".." U_FILE_SEP_STRING "data");
+ }
+#endif
+ strcat(backupPath, U_FILE_SEP_STRING "unidata" U_FILE_SEP_STRING "FractionalUCA.txt");
+
+ result = T_FileStream_open(newPath, "rb");
+
+ if (result == NULL) {
+ result = T_FileStream_open(backupPath, "rb");
+ if (result == NULL) {
+ log_err("Failed to open either %s or %s\n", newPath, backupPath);
+ }
+ }
+ return result;
+}
+
+/**
+* Testing the CEs returned by the iterator
+*/
+static void TestCEs() {
+ FileStream *file = NULL;
+ char line[2048];
+ char *str;
+ UChar codepoints[10];
+ uint32_t ces[20];
+ UErrorCode status = U_ZERO_ERROR;
+ UCollator *coll = ucol_open("", &status);
+ uint32_t lineNo = 0;
+ UChar contextCPs[5];
+
+ if (U_FAILURE(status)) {
+ log_err_status(status, "Error in opening root collator -> %s\n", u_errorName(status));
+ return;
+ }
+
+ file = getFractionalUCA();
+
+ if (file == NULL) {
+ log_err("*** unable to open input FractionalUCA.txt file ***\n");
+ return;
+ }
+
+
+ while (T_FileStream_readLine(file, line, sizeof(line)) != NULL) {
+ int count = 0;
+ UCollationElements *iter;
+ int32_t preContextCeLen=0;
+ lineNo++;
+ /* skip this line if it is empty or a comment or is a return value
+ or start of some variable section */
+ if(line[0] == 0 || line[0] == '#' || line[0] == '\n' ||
+ line[0] == 0x000D || line[0] == '[') {
+ continue;
+ }
+
+ str = getCodePoints(line, codepoints, contextCPs);
+
+ /* these are 'fake' codepoints in the fractional UCA, and are used just
+ * for positioning of indirect values. They should not go through this
+ * test.
+ */
+ if(*codepoints == 0xFDD0) {
+ continue;
+ }
+ if (*contextCPs != 0) {
+ iter = ucol_openElements(coll, contextCPs, -1, &status);
+ if (U_FAILURE(status)) {
+ log_err("Error in opening collation elements\n");
+ break;
+ }
+ while((ces[preContextCeLen] = ucol_next(iter, &status)) != (uint32_t)UCOL_NULLORDER) {
+ preContextCeLen++;
+ }
+ ucol_closeElements(iter);
+ }
+
+ getCEs(str, ces+preContextCeLen, &status);
+ if (U_FAILURE(status)) {
+ log_err("Error in parsing collation elements in FractionalUCA.txt\n");
+ break;
+ }
+ iter = ucol_openElements(coll, codepoints, -1, &status);
+ if (U_FAILURE(status)) {
+ log_err("Error in opening collation elements\n");
+ break;
+ }
+ for (;;) {
+ uint32_t ce = (uint32_t)ucol_next(iter, &status);
+ if (ce == 0xFFFFFFFF) {
+ ce = 0;
+ }
+ /* we now unconditionally reorder Thai/Lao prevowels, so this
+ * test would fail if we don't skip here.
+ */
+ if(UCOL_ISTHAIPREVOWEL(*codepoints) && ce == 0 && count == 0) {
+ continue;
+ }
+ if (ce != ces[count] || U_FAILURE(status)) {
+ log_err("Collation elements in FractionalUCA.txt and iterators do not match!\n");
+ break;
+ }
+ if (ces[count] == 0) {
+ break;
+ }
+ count ++;
+ }
+ ucol_closeElements(iter);
+ }
+
+ T_FileStream_close(file);
+ ucol_close(coll);
+}
+
+/**
+* Testing the discontigous contractions
+*/
+static void TestDiscontiguos() {
+ const char *rulestr =
+ "&z < AB < X\\u0300 < ABC < X\\u0300\\u0315";
+ UChar rule[50];
+ int rulelen = u_unescape(rulestr, rule, 50);
+ const char *src[] = {
+ "ADB", "ADBC", "A\\u0315B", "A\\u0315BC",
+ /* base character blocked */
+ "XD\\u0300", "XD\\u0300\\u0315",
+ /* non blocking combining character */
+ "X\\u0319\\u0300", "X\\u0319\\u0300\\u0315",
+ /* blocking combining character */
+ "X\\u0314\\u0300", "X\\u0314\\u0300\\u0315",
+ /* contraction prefix */
+ "ABDC", "AB\\u0315C","X\\u0300D\\u0315", "X\\u0300\\u0319\\u0315",
+ "X\\u0300\\u031A\\u0315",
+ /* ends not with a contraction character */
+ "X\\u0319\\u0300D", "X\\u0319\\u0300\\u0315D", "X\\u0300D\\u0315D",
+ "X\\u0300\\u0319\\u0315D", "X\\u0300\\u031A\\u0315D"
+ };
+ const char *tgt[] = {
+ /* non blocking combining character */
+ "A D B", "A D BC", "A \\u0315 B", "A \\u0315 BC",
+ /* base character blocked */
+ "X D \\u0300", "X D \\u0300\\u0315",
+ /* non blocking combining character */
+ "X\\u0300 \\u0319", "X\\u0300\\u0315 \\u0319",
+ /* blocking combining character */
+ "X \\u0314 \\u0300", "X \\u0314 \\u0300\\u0315",
+ /* contraction prefix */
+ "AB DC", "AB \\u0315 C","X\\u0300 D \\u0315", "X\\u0300\\u0315 \\u0319",
+ "X\\u0300 \\u031A \\u0315",
+ /* ends not with a contraction character */
+ "X\\u0300 \\u0319D", "X\\u0300\\u0315 \\u0319D", "X\\u0300 D\\u0315D",
+ "X\\u0300\\u0315 \\u0319D", "X\\u0300 \\u031A\\u0315D"
+ };
+ int size = 20;
+ UCollator *coll;
+ UErrorCode status = U_ZERO_ERROR;
+ int count = 0;
+ UCollationElements *iter;
+ UCollationElements *resultiter;
+
+ coll = ucol_openRules(rule, rulelen, UCOL_OFF, UCOL_DEFAULT_STRENGTH,NULL, &status);
+ iter = ucol_openElements(coll, rule, 1, &status);
+ resultiter = ucol_openElements(coll, rule, 1, &status);
+
+ if (U_FAILURE(status)) {
+ log_err_status(status, "Error opening collation rules -> %s\n", u_errorName(status));
+ return;
+ }
+
+ while (count < size) {
+ UChar str[20];
+ UChar tstr[20];
+ int strLen = u_unescape(src[count], str, 20);
+ UChar *s;
+
+ ucol_setText(iter, str, strLen, &status);
+ if (U_FAILURE(status)) {
+ log_err("Error opening collation iterator\n");
+ return;
+ }
+
+ u_unescape(tgt[count], tstr, 20);
+ s = tstr;
+
+ log_verbose("count %d\n", count);
+
+ for (;;) {
+ uint32_t ce;
+ UChar *e = u_strchr(s, 0x20);
+ if (e == 0) {
+ e = u_strchr(s, 0);
+ }
+ ucol_setText(resultiter, s, (int32_t)(e - s), &status);
+ ce = ucol_next(resultiter, &status);
+ if (U_FAILURE(status)) {
+ log_err("Error manipulating collation iterator\n");
+ return;
+ }
+ while (ce != UCOL_NULLORDER) {
+ if (ce != (uint32_t)ucol_next(iter, &status) ||
+ U_FAILURE(status)) {
+ log_err("Discontiguos contraction test mismatch\n");
+ return;
+ }
+ ce = ucol_next(resultiter, &status);
+ if (U_FAILURE(status)) {
+ log_err("Error getting next collation element\n");
+ return;
+ }
+ }
+ s = e + 1;
+ if (*e == 0) {
+ break;
+ }
+ }
+ ucol_reset(iter);
+ backAndForth(iter);
+ count ++;
+ }
+ ucol_closeElements(resultiter);
+ ucol_closeElements(iter);
+ ucol_close(coll);
+}
+
+static void TestCEBufferOverflow()
+{
+ UChar str[UCOL_EXPAND_CE_BUFFER_SIZE + 1];
+ UErrorCode status = U_ZERO_ERROR;
+ UChar rule[10];
+ UCollator *coll;
+ UCollationElements *iter;
+
+ u_uastrcpy(rule, "&z < AB");
+ coll = ucol_openRules(rule, u_strlen(rule), UCOL_OFF, UCOL_DEFAULT_STRENGTH, NULL,&status);
+ if (U_FAILURE(status)) {
+ log_err_status(status, "Rule based collator not created for testing ce buffer overflow -> %s\n", u_errorName(status));
+ return;
+ }
+
+ /* 0xDCDC is a trail surrogate hence deemed unsafe by the heuristic
+ test. this will cause an overflow in getPrev */
+ str[0] = 0x0041; /* 'A' */
+ /*uprv_memset(str + 1, 0xE0, sizeof(UChar) * UCOL_EXPAND_CE_BUFFER_SIZE);*/
+ uprv_memset(str + 1, 0xDC, sizeof(UChar) * UCOL_EXPAND_CE_BUFFER_SIZE);
+ str[UCOL_EXPAND_CE_BUFFER_SIZE] = 0x0042; /* 'B' */
+ iter = ucol_openElements(coll, str, UCOL_EXPAND_CE_BUFFER_SIZE + 1,
+ &status);
+ if (ucol_previous(iter, &status) == UCOL_NULLORDER ||
+ status == U_BUFFER_OVERFLOW_ERROR) {
+ log_err("CE buffer should not overflow with long string of trail surrogates\n");
+ }
+ ucol_closeElements(iter);
+ ucol_close(coll);
+}
+
+/**
+* Checking collation element validity.
+*/
+#define MAX_CODEPOINTS_TO_SHOW 10
+static void showCodepoints(const UChar *codepoints, int length, char * codepointText) {
+ int i, lengthToUse = length;
+ if (lengthToUse > MAX_CODEPOINTS_TO_SHOW) {
+ lengthToUse = MAX_CODEPOINTS_TO_SHOW;
+ }
+ for (i = 0; i < lengthToUse; ++i) {
+ int bytesWritten = sprintf(codepointText, " %04X", *codepoints++);
+ if (bytesWritten <= 0) {
+ break;
+ }
+ codepointText += bytesWritten;
+ }
+ if (i < length) {
+ sprintf(codepointText, " ...");
+ }
+}
+
+static UBool checkCEValidity(const UCollator *coll, const UChar *codepoints,
+ int length)
+{
+ UErrorCode status = U_ZERO_ERROR;
+ UCollationElements *iter = ucol_openElements(coll, codepoints, length,
+ &status);
+ UBool result = FALSE;
+ UBool primaryDone = FALSE, secondaryDone = FALSE, tertiaryDone = FALSE;
+ const char * collLocale;
+
+ if (U_FAILURE(status)) {
+ log_err("Error creating iterator for testing validity\n");
+ return FALSE;
+ }
+ collLocale = ucol_getLocale(coll, ULOC_VALID_LOCALE, &status);
+ if (U_FAILURE(status) || collLocale==NULL) {
+ status = U_ZERO_ERROR;
+ collLocale = "?";
+ }
+
+ for (;;) {
+ uint32_t ce = ucol_next(iter, &status);
+ uint32_t primary, p1, p2, secondary, tertiary;
+ if (ce == UCOL_NULLORDER) {
+ result = TRUE;
+ break;
+ }
+ if (ce == 0) {
+ continue;
+ }
+ if (ce == 0x02000202) {
+ /* special CE for merge-sort character */
+ if (*codepoints == 0xFFFE /* && length == 1 */) {
+ /*
+ * Note: We should check for length==1 but the token parser appears
+ * to give us trailing NUL characters.
+ * TODO: Ticket #8047: Change TestCEValidity to use ucol_getTailoredSet()
+ * rather than the internal collation rule parser
+ */
+ continue;
+ } else {
+ log_err("Special 02/02/02 weight for code point U+%04X [len %d] != U+FFFE\n",
+ (int)*codepoints, (int)length);
+ break;
+ }
+ }
+ primary = UCOL_PRIMARYORDER(ce);
+ p1 = primary >> 8;
+ p2 = primary & 0xFF;
+ secondary = UCOL_SECONDARYORDER(ce);
+ tertiary = UCOL_TERTIARYORDER(ce) & UCOL_REMOVE_CONTINUATION;
+
+ if (!isContinuation(ce)) {
+ if ((ce & UCOL_REMOVE_CONTINUATION) == 0) {
+ log_err("Empty CE %08lX except for case bits\n", (long)ce);
+ break;
+ }
+ if (p1 == 0) {
+ if (p2 != 0) {
+ log_err("Primary 00 xx in %08lX\n", (long)ce);
+ break;
+ }
+ primaryDone = TRUE;
+ } else {
+ if (p1 <= 2 || p1 >= 0xF0) {
+ /* Primary first bytes F0..FF are specials. */
+ log_err("Primary first byte of %08lX out of range\n", (long)ce);
+ break;
+ }
+ if (p2 == 0) {
+ primaryDone = TRUE;
+ } else {
+ if (p2 <= 3 || p2 >= 0xFF) {
+ /* Primary second bytes 03 and FF are sort key compression terminators. */
+ log_err("Primary second byte of %08lX out of range\n", (long)ce);
+ break;
+ }
+ primaryDone = FALSE;
+ }
+ }
+ if (secondary == 0) {
+ if (primary != 0) {
+ log_err("Primary!=0 secondary==0 in %08lX\n", (long)ce);
+ break;
+ }
+ secondaryDone = TRUE;
+ } else {
+ if (secondary <= 2 ||
+ (UCOL_BYTE_COMMON < secondary && secondary <= (UCOL_BYTE_COMMON + 0x80))
+ ) {
+ /* Secondary first bytes common+1..+0x80 are used for sort key compression. */
+ log_err("Secondary byte of %08lX out of range\n", (long)ce);
+ break;
+ }
+ secondaryDone = FALSE;
+ }
+ if (tertiary == 0) {
+ /* We know that ce != 0. */
+ log_err("Primary!=0 or secondary!=0 but tertiary==0 in %08lX\n", (long)ce);
+ break;
+ }
+ if (tertiary <= 2) {
+ log_err("Tertiary byte of %08lX out of range\n", (long)ce);
+ break;
+ }
+ tertiaryDone = FALSE;
+ } else {
+ if ((ce & UCOL_REMOVE_CONTINUATION) == 0) {
+ log_err("Empty continuation %08lX\n", (long)ce);
+ break;
+ }
+ if (primaryDone && primary != 0) {
+ log_err("Primary was done but continues in %08lX\n", (long)ce);
+ break;
+ }
+ if (p1 == 0) {
+ if (p2 != 0) {
+ log_err("Primary 00 xx in %08lX\n", (long)ce);
+ break;
+ }
+ primaryDone = TRUE;
+ } else {
+ if (p1 <= 2) {
+ log_err("Primary first byte of %08lX out of range\n", (long)ce);
+ break;
+ }
+ if (p2 == 0) {
+ primaryDone = TRUE;
+ } else {
+ if (p2 <= 3) {
+ log_err("Primary second byte of %08lX out of range\n", (long)ce);
+ break;
+ }
+ }
+ }
+ if (secondaryDone && secondary != 0) {
+ log_err("Secondary was done but continues in %08lX\n", (long)ce);
+ break;
+ }
+ if (secondary == 0) {
+ secondaryDone = TRUE;
+ } else {
+ if (secondary <= 2) {
+ log_err("Secondary byte of %08lX out of range\n", (long)ce);
+ break;
+ }
+ }
+ if (tertiaryDone && tertiary != 0) {
+ log_err("Tertiary was done but continues in %08lX\n", (long)ce);
+ break;
+ }
+ if (tertiary == 0) {
+ tertiaryDone = TRUE;
+ } else if (tertiary <= 2) {
+ log_err("Tertiary byte of %08lX out of range\n", (long)ce);
+ break;
+ }
+ }
+ }
+ if (!result) {
+ char codepointText[5*MAX_CODEPOINTS_TO_SHOW + 5];
+ showCodepoints(codepoints, length, codepointText);
+ log_err("Locale: %s Code point string: %s\n", collLocale, codepointText);
+ }
+ ucol_closeElements(iter);
+ return result;
+}
+
+static void TestCEValidity()
+{
+ /* testing UCA collation elements */
+ UErrorCode status = U_ZERO_ERROR;
+ /* en_US has no tailorings */
+ UCollator *coll = ucol_open("root", &status);
+ /* tailored locales */
+ char locale[][11] = {"fr_FR", "ko_KR", "sh_YU", "th_TH", "zh_CN", "zh__PINYIN"};
+ const char *loc;
+ FileStream *file = NULL;
+ char line[2048];
+ UChar codepoints[11];
+ int count = 0;
+ int maxCount = 0;
+ UChar contextCPs[3];
+ UChar32 c;
+ UParseError parseError;
+ if (U_FAILURE(status)) {
+ log_err_status(status, "en_US collator creation failed -> %s\n", u_errorName(status));
+ return;
+ }
+ log_verbose("Testing UCA elements\n");
+ file = getFractionalUCA();
+ if (file == NULL) {
+ log_err("Fractional UCA data can not be opened\n");
+ return;
+ }
+
+ while (T_FileStream_readLine(file, line, sizeof(line)) != NULL) {
+ if(line[0] == 0 || line[0] == '#' || line[0] == '\n' ||
+ line[0] == 0x000D || line[0] == '[') {
+ continue;
+ }
+
+ getCodePoints(line, codepoints, contextCPs);
+ checkCEValidity(coll, codepoints, u_strlen(codepoints));
+ }
+
+ log_verbose("Testing UCA elements for the whole range of unicode characters\n");
+ for (c = 0; c <= 0xffff; ++c) {
+ if (u_isdefined(c)) {
+ codepoints[0] = (UChar)c;
+ checkCEValidity(coll, codepoints, 1);
+ }
+ }
+ for (; c <= 0x10ffff; ++c) {
+ if (u_isdefined(c)) {
+ int32_t i = 0;
+ U16_APPEND_UNSAFE(codepoints, i, c);
+ checkCEValidity(coll, codepoints, i);
+ }
+ }
+
+ ucol_close(coll);
+
+ /* testing tailored collation elements */
+ log_verbose("Testing tailored elements\n");
+ if(getTestOption(QUICK_OPTION)) {
+ maxCount = sizeof(locale)/sizeof(locale[0]);
+ } else {
+ maxCount = uloc_countAvailable();
+ }
+ while (count < maxCount) {
+ const UChar *rules = NULL,
+ *current = NULL;
+ UChar *rulesCopy = NULL;
+ int32_t ruleLen = 0;
+
+ uint32_t chOffset = 0;
+ uint32_t chLen = 0;
+ uint32_t exOffset = 0;
+ uint32_t exLen = 0;
+ uint32_t prefixOffset = 0;
+ uint32_t prefixLen = 0;
+ UBool startOfRules = TRUE;
+ UColOptionSet opts;
+
+ UColTokenParser src;
+ uint32_t strength = 0;
+ uint16_t specs = 0;
+ if(getTestOption(QUICK_OPTION)) {
+ loc = locale[count];
+ } else {
+ loc = uloc_getAvailable(count);
+ if(!hasCollationElements(loc)) {
+ count++;
+ continue;
+ }
+ }
+
+ uprv_memset(&src, 0, sizeof(UColTokenParser));
+
+ log_verbose("Testing CEs for %s\n", loc);
+
+ coll = ucol_open(loc, &status);
+ if (U_FAILURE(status)) {
+ log_err("%s collator creation failed\n", loc);
+ return;
+ }
+
+ src.opts = &opts;
+ rules = ucol_getRules(coll, &ruleLen);
+
+ if (ruleLen > 0) {
+ rulesCopy = (UChar *)uprv_malloc((ruleLen +
+ UCOL_TOK_EXTRA_RULE_SPACE_SIZE) * sizeof(UChar));
+ uprv_memcpy(rulesCopy, rules, ruleLen * sizeof(UChar));
+ src.current = src.source = rulesCopy;
+ src.end = rulesCopy + ruleLen;
+ src.extraCurrent = src.end;
+ src.extraEnd = src.end + UCOL_TOK_EXTRA_RULE_SPACE_SIZE;
+
+ /* Note that as a result of tickets 7015 or 6912, ucol_tok_parseNextToken can cause the pointer to
+ the rules copy in src.source to get reallocated, freeing the original pointer in rulesCopy */
+ while ((current = ucol_tok_parseNextToken(&src, startOfRules, &parseError,&status)) != NULL) {
+ strength = src.parsedToken.strength;
+ chOffset = src.parsedToken.charsOffset;
+ chLen = src.parsedToken.charsLen;
+ exOffset = src.parsedToken.extensionOffset;
+ exLen = src.parsedToken.extensionLen;
+ prefixOffset = src.parsedToken.prefixOffset;
+ prefixLen = src.parsedToken.prefixLen;
+ specs = src.parsedToken.flags;
+
+ startOfRules = FALSE;
+ uprv_memcpy(codepoints, src.source + chOffset,
+ chLen * sizeof(UChar));
+ codepoints[chLen] = 0;
+ checkCEValidity(coll, codepoints, chLen);
+ }
+ uprv_free(src.source);
+ }
+
+ ucol_close(coll);
+ count ++;
+ }
+ T_FileStream_close(file);
+}
+
+static void printSortKeyError(const UChar *codepoints, int length,
+ uint8_t *sortkey, int sklen)
+{
+ int count = 0;
+ log_err("Sortkey not valid for ");
+ while (length > 0) {
+ log_err("0x%04x ", *codepoints);
+ length --;
+ codepoints ++;
+ }
+ log_err("\nSortkey : ");
+ while (count < sklen) {
+ log_err("0x%02x ", sortkey[count]);
+ count ++;
+ }
+ log_err("\n");
+}
+
+/**
+* Checking sort key validity for all levels
+*/
+static UBool checkSortKeyValidity(UCollator *coll,
+ const UChar *codepoints,
+ int length)
+{
+ UErrorCode status = U_ZERO_ERROR;
+ UCollationStrength strength[5] = {UCOL_PRIMARY, UCOL_SECONDARY,
+ UCOL_TERTIARY, UCOL_QUATERNARY,
+ UCOL_IDENTICAL};
+ int strengthlen = 5;
+ int strengthIndex = 0;
+ int caselevel = 0;
+
+ while (caselevel < 1) {
+ if (caselevel == 0) {
+ ucol_setAttribute(coll, UCOL_CASE_LEVEL, UCOL_OFF, &status);
+ }
+ else {
+ ucol_setAttribute(coll, UCOL_CASE_LEVEL, UCOL_ON, &status);
+ }
+
+ while (strengthIndex < strengthlen) {
+ int count01 = 0;
+ uint32_t count = 0;
+ uint8_t sortkey[128];
+ uint32_t sklen;
+
+ ucol_setStrength(coll, strength[strengthIndex]);
+ sklen = ucol_getSortKey(coll, codepoints, length, sortkey, 128);
+ while (sortkey[count] != 0) {
+ if (sortkey[count] == 2 || (sortkey[count] == 3 && count01 > 0 && strengthIndex != 4)) {
+ printSortKeyError(codepoints, length, sortkey, sklen);
+ return FALSE;
+ }
+ if (sortkey[count] == 1) {
+ count01 ++;
+ }
+ count ++;
+ }
+
+ if (count + 1 != sklen || (count01 != strengthIndex + caselevel)) {
+ printSortKeyError(codepoints, length, sortkey, sklen);
+ return FALSE;
+ }
+ strengthIndex ++;
+ }
+ caselevel ++;
+ }
+ return TRUE;
+}
+
+static void TestSortKeyValidity(void)
+{
+ /* testing UCA collation elements */
+ UErrorCode status = U_ZERO_ERROR;
+ /* en_US has no tailorings */
+ UCollator *coll = ucol_open("en_US", &status);
+ /* tailored locales */
+ char locale[][6] = {"fr_FR", "ko_KR", "sh_YU", "th_TH", "zh_CN"};
+ FileStream *file = NULL;
+ char line[2048];
+ UChar codepoints[10];
+ int count = 0;
+ UChar contextCPs[5];
+ UParseError parseError;
+ if (U_FAILURE(status)) {
+ log_err_status(status, "en_US collator creation failed -> %s\n", u_errorName(status));
+ return;
+ }
+ log_verbose("Testing UCA elements\n");
+ file = getFractionalUCA();
+ if (file == NULL) {
+ log_err("Fractional UCA data can not be opened\n");
+ return;
+ }
+
+ while (T_FileStream_readLine(file, line, sizeof(line)) != NULL) {
+ if(line[0] == 0 || line[0] == '#' || line[0] == '\n' ||
+ line[0] == 0x000D || line[0] == '[') {
+ continue;
+ }
+
+ getCodePoints(line, codepoints, contextCPs);
+ if(codepoints[0] == 0xFFFE) {
+ /* Skip special merge-sort character U+FFFE which has otherwise illegal 02 weight bytes. */
+ continue;
+ }
+ checkSortKeyValidity(coll, codepoints, u_strlen(codepoints));
+ }
+
+ log_verbose("Testing UCA elements for the whole range of unicode characters\n");
+ codepoints[0] = 0;
+
+ while (codepoints[0] < 0xFFFF) {
+ if (u_isdefined((UChar32)codepoints[0])) {
+ checkSortKeyValidity(coll, codepoints, 1);
+ }
+ codepoints[0] ++;
+ }
+
+ ucol_close(coll);
+
+ /* testing tailored collation elements */
+ log_verbose("Testing tailored elements\n");
+ while (count < 5) {
+ const UChar *rules = NULL,
+ *current = NULL;
+ UChar *rulesCopy = NULL;
+ int32_t ruleLen = 0;
+
+ uint32_t chOffset = 0;
+ uint32_t chLen = 0;
+ uint32_t exOffset = 0;
+ uint32_t exLen = 0;
+ uint32_t prefixOffset = 0;
+ uint32_t prefixLen = 0;
+ UBool startOfRules = TRUE;
+ UColOptionSet opts;
+
+ UColTokenParser src;
+ uint32_t strength = 0;
+ uint16_t specs = 0;
+
+ uprv_memset(&src, 0, sizeof(UColTokenParser));
+
+ coll = ucol_open(locale[count], &status);
+ if (U_FAILURE(status)) {
+ log_err("%s collator creation failed\n", locale[count]);
+ return;
+ }
+
+ src.opts = &opts;
+ rules = ucol_getRules(coll, &ruleLen);
+
+ if (ruleLen > 0) {
+ rulesCopy = (UChar *)uprv_malloc((ruleLen +
+ UCOL_TOK_EXTRA_RULE_SPACE_SIZE) * sizeof(UChar));
+ uprv_memcpy(rulesCopy, rules, ruleLen * sizeof(UChar));
+ src.current = src.source = rulesCopy;
+ src.end = rulesCopy + ruleLen;
+ src.extraCurrent = src.end;
+ src.extraEnd = src.end + UCOL_TOK_EXTRA_RULE_SPACE_SIZE;
+
+ /* Note that as a result of tickets 7015 or 6912, ucol_tok_parseNextToken can cause the pointer to
+ the rules copy in src.source to get reallocated, freeing the original pointer in rulesCopy */
+ while ((current = ucol_tok_parseNextToken(&src, startOfRules,&parseError, &status)) != NULL) {
+ strength = src.parsedToken.strength;
+ chOffset = src.parsedToken.charsOffset;
+ chLen = src.parsedToken.charsLen;
+ exOffset = src.parsedToken.extensionOffset;
+ exLen = src.parsedToken.extensionLen;
+ prefixOffset = src.parsedToken.prefixOffset;
+ prefixLen = src.parsedToken.prefixLen;
+ specs = src.parsedToken.flags;
+
+ startOfRules = FALSE;
+ uprv_memcpy(codepoints, src.source + chOffset,
+ chLen * sizeof(UChar));
+ codepoints[chLen] = 0;
+ if(codepoints[0] == 0xFFFE) {
+ /* Skip special merge-sort character U+FFFE which has otherwise illegal 02 weight bytes. */
+ continue;
+ }
+ checkSortKeyValidity(coll, codepoints, chLen);
+ }
+ uprv_free(src.source);
+ }
+
+ ucol_close(coll);
+ count ++;
+ }
+ T_FileStream_close(file);
+}
+
+#endif /* #if !UCONFIG_NO_COLLATION */