Rename C-based tests
[yaz-moved-to-github.git] / test / tst_icu_I18N.c
diff --git a/test/tst_icu_I18N.c b/test/tst_icu_I18N.c
deleted file mode 100644 (file)
index 2ad005c..0000000
+++ /dev/null
@@ -1,824 +0,0 @@
-/* This file is part of the YAZ toolkit.
- * Copyright (C) 1995-2010 Index Data
- * See the file LICENSE for details.
- */
-
-/* DO NOT EDIT THIS FILE IF YOUR EDITOR DOES NOT SUPPORT UTF-8 */
-
-#if HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#define USE_TIMING 0
-#if USE_TIMING
-#include <yaz/timing.h>
-#endif
-
-#include <yaz/test.h>
-#include <yaz/log.h>
-#include <yaz/wrbuf.h>
-
-#if YAZ_HAVE_ICU
-#include <yaz/icu_I18N.h>
-
-#if YAZ_POSIX_THREADS
-#include <pthread.h>
-#endif
-
-#include <string.h>
-#include <stdlib.h>
-
-#define MAX_KEY_SIZE 256
-struct icu_termmap
-{
-    uint8_t sort_key[MAX_KEY_SIZE]; /* standard C string '\0' terminated */
-    char disp_term[MAX_KEY_SIZE];  /* standard C utf-8 string */
-};
-
-
-static int icu_termmap_cmp(const void *vp1, const void *vp2)
-{
-    struct icu_termmap *itmp1 = *(struct icu_termmap **) vp1;
-    struct icu_termmap *itmp2 = *(struct icu_termmap **) vp2;
-
-    int cmp = 0;
-    
-    cmp = strcmp((const char *)itmp1->sort_key, 
-                 (const char *)itmp2->sort_key);
-    return cmp;
-}
-
-
-static int test_icu_casemap(const char * locale, char action,
-                            const char * src8cstr, const char * chk8cstr)
-{
-    int success = 0;
-    UErrorCode status = U_ZERO_ERROR;
-
-    struct icu_buf_utf8 * src8 = icu_buf_utf8_create(0);
-    struct icu_buf_utf8 * dest8 = icu_buf_utf8_create(0);
-    struct icu_buf_utf16 * src16 = icu_buf_utf16_create(0);
-    struct icu_buf_utf16 * dest16 = icu_buf_utf16_create(0);
-
-
-    int src8cstr_len = strlen(src8cstr);
-    int chk8cstr_len = strlen(chk8cstr);
-
-    /* converting to UTF16 */
-    icu_utf16_from_utf8_cstr(src16, src8cstr, &status);
-
-    /* perform case mapping */
-    icu_utf16_casemap(dest16, src16, locale, action, &status);
-  
-    /* converting to UTF8 */
-    icu_utf16_to_utf8(dest8, dest16, &status);
-
-    /* determine success */
-    if (dest8->utf8 
-        && (dest8->utf8_len == strlen(chk8cstr))
-        && !strcmp(chk8cstr, (const char *) dest8->utf8))
-        success = 1;
-    else
-        success = 0;
-
-    /* report failures */
-    if (!success)
-    {
-        yaz_log(YLOG_WARN, "test_icu_casemap failed");
-        yaz_log(YLOG_LOG, "Original string:   '%s' (%d)",
-                src8cstr, src8cstr_len);
-        yaz_log(YLOG_LOG, "icu_casemap '%s:%c' '%s' (%d)", 
-                locale, action, dest8->utf8, dest8->utf8_len);
-        yaz_log(YLOG_LOG, "expected string:   '%s' (%d)",
-                chk8cstr, chk8cstr_len);
-    }
-  
-    /* clean the buffers */
-    icu_buf_utf8_destroy(src8);
-    icu_buf_utf8_destroy(dest8);
-    icu_buf_utf16_destroy(src16);
-    icu_buf_utf16_destroy(dest16);
-    
-    return success;
-}
-
-static void check_icu_casemap(void)
-{
-    /* Locale 'en' */
-
-    /* successful tests */
-    YAZ_CHECK(test_icu_casemap("en", 'l',
-                               "A ReD fOx hunTS sQUirriLs", 
-                               "a red fox hunts squirrils"));
-    
-    YAZ_CHECK(test_icu_casemap("en", 'u',
-                               "A ReD fOx hunTS sQUirriLs", 
-                               "A RED FOX HUNTS SQUIRRILS"));
-    
-    YAZ_CHECK(test_icu_casemap("en", 'f',
-                               "A ReD fOx hunTS sQUirriLs", 
-                               "a red fox hunts squirrils"));
-    
-    YAZ_CHECK(test_icu_casemap("en", 't',
-                               "A ReD fOx hunTS sQUirriLs", 
-                               "A Red Fox Hunts Squirrils"));
-    
-    /* Locale 'da' */
-
-    /* success expected */
-    YAZ_CHECK(test_icu_casemap("da", 'l',
-                               "åh ÆbLE, øs fLØde i Åen efter bLåBærGRødeN", 
-                               "åh æble, øs fløde i åen efter blåbærgrøden"));
-
-    YAZ_CHECK(test_icu_casemap("da", 'u',
-                               "åh ÆbLE, øs fLØde i Åen efter bLåBærGRødeN", 
-                               "ÅH ÆBLE, ØS FLØDE I ÅEN EFTER BLÅBÆRGRØDEN"));
-
-    YAZ_CHECK(test_icu_casemap("da", 'f',
-                               "åh ÆbLE, øs fLØde i Åen efter bLåBærGRødeN", 
-                               "åh æble, øs fløde i åen efter blåbærgrøden"));
-
-    YAZ_CHECK(test_icu_casemap("da", 't',
-                               "åh ÆbLE, øs fLØde i Åen efter bLåBærGRødeN", 
-                               "Åh Æble, Øs Fløde I Åen Efter Blåbærgrøden"));
-
-    /* Locale 'de' */
-
-    /* success expected */
-    YAZ_CHECK(test_icu_casemap("de", 'l',
-                               "zWÖlf ärgerliche Würste rollen ÜBer die StRAße",
-                               "zwölf ärgerliche würste rollen über die straße"));
-
-    YAZ_CHECK(test_icu_casemap("de", 'u',
-                               "zWÖlf ärgerliche Würste rollen ÜBer die StRAße",
-                               "ZWÖLF ÄRGERLICHE WÜRSTE ROLLEN ÜBER DIE STRASSE"));
-
-    YAZ_CHECK(test_icu_casemap("de", 'f',
-                               "zWÖlf ärgerliche Würste rollen ÜBer die StRAße",
-                               "zwölf ärgerliche würste rollen über die strasse"));
-
-    YAZ_CHECK(test_icu_casemap("de", 't',
-                               "zWÖlf ärgerliche Würste rollen ÜBer die StRAße",
-                               "Zwölf Ärgerliche Würste Rollen Über Die Straße"));
-
-}
-
-static int test_icu_sortmap(const char * locale, int src_list_len,
-                            const char ** src_list, const char ** chk_list)
-{
-    int success = 1;
-
-    UErrorCode status = U_ZERO_ERROR;
-
-    struct icu_buf_utf8 * buf8 = icu_buf_utf8_create(0);
-    struct icu_buf_utf16 * buf16 = icu_buf_utf16_create(0);
-
-    int i;
-
-    struct icu_termmap * list[src_list_len];
-
-    UCollator *coll = ucol_open(locale, &status); 
-    icu_check_status(status);
-
-    if (U_FAILURE(status))
-        return 0;
-
-    /* assigning display terms and sort keys using buf 8 and buf16 */
-    for (i = 0; i < src_list_len; i++) 
-    {
-
-        list[i] = (struct icu_termmap *) malloc(sizeof(struct icu_termmap));
-
-        /* copy display term */
-        strcpy(list[i]->disp_term, src_list[i]);    
-
-        /* transforming to UTF16 */
-        icu_utf16_from_utf8_cstr(buf16, list[i]->disp_term, &status);
-        icu_check_status(status);
-
-        /* computing sortkeys */
-        icu_sortkey8_from_utf16(coll, buf8, buf16, &status);
-        icu_check_status(status);
-    
-        /* assigning sortkeys */
-        memcpy(list[i]->sort_key, buf8->utf8, buf8->utf8_len);    
-    } 
-
-    /* do the sorting */
-    qsort(list, src_list_len, sizeof(struct icu_termmap *), icu_termmap_cmp);
-
-    /* checking correct sorting */
-    for (i = 0; i < src_list_len; i++)
-    {
-        if (0 != strcmp(list[i]->disp_term, chk_list[i])){
-            success = 0;
-        }
-    }
-
-    if (!success)
-    {
-        yaz_log(YLOG_LOG, "ERROR"); 
-        yaz_log(YLOG_LOG, "Input str:'%s':", locale); 
-        for (i = 0; i < src_list_len; i++) {
-            yaz_log(YLOG_LOG, "  '%s'", list[i]->disp_term); 
-        }
-        yaz_log(YLOG_LOG, "ICU sort: '%s':", locale); 
-        for (i = 0; i < src_list_len; i++) {
-            yaz_log(YLOG_LOG, " '%s'", list[i]->disp_term); 
-        }
-        yaz_log(YLOG_LOG, "Expected: '%s':", locale); 
-        for (i = 0; i < src_list_len; i++) {
-            yaz_log(YLOG_LOG, " '%s'", chk_list[i]); 
-        }
-    }
-  
-    for (i = 0; i < src_list_len; i++)
-        free(list[i]);
-   
-    ucol_close(coll);
-
-    icu_buf_utf8_destroy(buf8);
-    icu_buf_utf16_destroy(buf16);
-
-    return success;  
-}
-
-static void check_icu_sortmap(void)
-{
-    /* successful tests */
-    size_t en_1_len = 6;
-    const char * en_1_src[6] = {"z", "K", "a", "A", "Z", "k"};
-    const char * en_1_cck[6] = {"a", "A", "k", "K", "z", "Z"};
-    YAZ_CHECK(test_icu_sortmap("en", en_1_len, en_1_src, en_1_cck));
-    YAZ_CHECK(test_icu_sortmap("en_AU", en_1_len, en_1_src, en_1_cck));
-    YAZ_CHECK(test_icu_sortmap("en_CA", en_1_len, en_1_src, en_1_cck));
-    YAZ_CHECK(test_icu_sortmap("en_GB", en_1_len, en_1_src, en_1_cck));
-    YAZ_CHECK(test_icu_sortmap("en_US", en_1_len, en_1_src, en_1_cck));
-    
-    /* successful tests */
-    {
-        size_t da_1_len = 6;
-        const char * da_1_src[6] = {"z", "å", "o", "æ", "a", "ø"};
-        const char * da_1_cck[6] = {"a", "o", "z", "æ", "ø", "å"};
-        YAZ_CHECK(test_icu_sortmap("da", da_1_len, da_1_src, da_1_cck));
-        YAZ_CHECK(test_icu_sortmap("da_DK", da_1_len, da_1_src, da_1_cck));
-    }
-    /* successful tests */
-    {
-        size_t de_1_len = 9;
-        const char * de_1_src[9] = {"u", "ä", "o", "t", "s", "ß", "ü", "ö", "a"};
-        const char * de_1_cck[9] = {"a","ä", "o", "ö", "s", "ß", "t", "u", "ü"};
-        YAZ_CHECK(test_icu_sortmap("de", de_1_len, de_1_src, de_1_cck));
-        YAZ_CHECK(test_icu_sortmap("de_AT", de_1_len, de_1_src, de_1_cck));
-        YAZ_CHECK(test_icu_sortmap("de_DE", de_1_len, de_1_src, de_1_cck));
-    }
-}
-
-static int test_icu_normalizer(const char * rules8cstr,
-                               const char * src8cstr,
-                               const char * chk8cstr)
-{
-    int success = 0;
-    
-    UErrorCode status = U_ZERO_ERROR;
-
-    struct icu_buf_utf16 * src16 = icu_buf_utf16_create(0);
-    struct icu_buf_utf16 * dest16 = icu_buf_utf16_create(0);
-    struct icu_buf_utf8 * dest8 = icu_buf_utf8_create(0);
-    struct icu_transform * transform
-        = icu_transform_create(rules8cstr, 'f', 0, &status);
-    icu_check_status(status);
-    
-    icu_utf16_from_utf8_cstr(src16, src8cstr, &status);
-    icu_check_status(status);
-
-    icu_transform_trans(transform, dest16, src16, &status);
-    icu_check_status(status);
-
-    icu_utf16_to_utf8(dest8, dest16, &status);
-    icu_check_status(status);
-
-
-    if (!strcmp((const char *) dest8->utf8, 
-               (const char *) chk8cstr))
-        success = 1;
-    else
-    {
-        success = 0;
-        yaz_log(YLOG_LOG, "Normalization");
-        yaz_log(YLOG_LOG, " Rules:      '%s'", rules8cstr);
-        yaz_log(YLOG_LOG, " Input:      '%s'", src8cstr);
-        yaz_log(YLOG_LOG, " Normalized: '%s'", dest8->utf8);
-        yaz_log(YLOG_LOG, " Expected:   '%s'", chk8cstr);
-    }
-
-    icu_transform_destroy(transform);
-    icu_buf_utf16_destroy(src16);
-    icu_buf_utf16_destroy(dest16);
-    icu_buf_utf8_destroy(dest8);
-
-    return success;
-}
-
-static void check_icu_normalizer(void)
-{
-    YAZ_CHECK(test_icu_normalizer("[:Punctuation:] Any-Remove",
-                                  "Don't shoot!",
-                                  "Dont shoot"));
-    
-    YAZ_CHECK(test_icu_normalizer("[:Control:] Any-Remove",
-                                  "Don't\n shoot!",
-                                  "Don't shoot!"));
-
-    YAZ_CHECK(test_icu_normalizer("[:Decimal_Number:] Any-Remove",
-                                  "This is 4 you!",
-                                  "This is  you!"));
-
-    YAZ_CHECK(test_icu_normalizer("Lower; [:^Letter:] Remove",
-                                  "Don't shoot!",
-                                  "dontshoot"));
-    
-    YAZ_CHECK(test_icu_normalizer("[:^Number:] Remove",
-                                  "Monday 15th of April",
-                                  "15"));
-
-    YAZ_CHECK(test_icu_normalizer("Lower;"
-                                  "[[:WhiteSpace:][:Punctuation:]] Remove",
-                                  " word4you? ",
-                                  "word4you"));
-
-    YAZ_CHECK(test_icu_normalizer("NFD; [:Nonspacing Mark:] Remove; NFC",
-                                  "à côté de l'alcôve ovoïde",
-                                  "a cote de l'alcove ovoide"));
-}
-
-static int test_icu_tokenizer(const char * locale, char action,
-                              const char * src8cstr, int count)
-{
-    int success = 1;
-
-    UErrorCode status = U_ZERO_ERROR;
-    struct icu_buf_utf16 * src16 = icu_buf_utf16_create(0);
-    struct icu_buf_utf16 * tkn16 = icu_buf_utf16_create(0);
-    struct icu_buf_utf8 * tkn8 = icu_buf_utf8_create(0);
-    struct icu_tokenizer * tokenizer = 0;
-
-    /* transforming to UTF16 */
-    icu_utf16_from_utf8_cstr(src16, src8cstr, &status);
-    icu_check_status(status);
-
-    /* set up tokenizer */
-    tokenizer = icu_tokenizer_create(locale, action, &status);
-    icu_check_status(status);
-    YAZ_CHECK(tokenizer);
-
-    /* attach text buffer to tokenizer */
-    icu_tokenizer_attach(tokenizer, src16, &status);    
-    icu_check_status(status);
-
-    /* perform work on tokens */
-    while (icu_tokenizer_next_token(tokenizer, tkn16, &status))
-    {
-        icu_check_status(status);
-
-        /* converting to UTF8 */
-        icu_utf16_to_utf8(tkn8, tkn16, &status);
-    }
-
-    if (count != icu_tokenizer_token_count(tokenizer))
-    {
-        success = 0;
-        yaz_log(YLOG_LOG, "Tokenizer '%s:%c' Error:", locale, action);
-        yaz_log(YLOG_LOG, " Input:  '%s'", src8cstr);
-        yaz_log(YLOG_LOG, " Tokens: %d", icu_tokenizer_token_count(tokenizer));
-        yaz_log(YLOG_LOG, " Expected: %d", count);
-    }
-
-    icu_tokenizer_destroy(tokenizer);
-    icu_buf_utf16_destroy(src16);
-    icu_buf_utf16_destroy(tkn16);
-    icu_buf_utf8_destroy(tkn8);
-        
-    return success;
-}
-
-static void check_icu_tokenizer(void)
-{
-    const char * en_str 
-        = "O Romeo, Romeo! wherefore art thou Romeo?";
-    
-    YAZ_CHECK(test_icu_tokenizer("en", 's', en_str, 2));
-    YAZ_CHECK(test_icu_tokenizer("en", 'l', en_str, 7));
-    YAZ_CHECK(test_icu_tokenizer("en", 'w', en_str, 16));
-    YAZ_CHECK(test_icu_tokenizer("en", 'c', en_str, 41));
-
-    {
-        const char * da_str 
-            = "Blåbærtærte. Denne kage stammer fra Finland. "
-            "Den er med blåbær, men alle sommerens forskellige bær kan bruges.";
-        
-        YAZ_CHECK(test_icu_tokenizer("da", 's', da_str, 3));
-        YAZ_CHECK(test_icu_tokenizer("dar", 'l', da_str, 17));
-        YAZ_CHECK(test_icu_tokenizer("da", 'w', da_str, 37));
-        YAZ_CHECK(test_icu_tokenizer("da", 'c', da_str, 110));
-    }
-}
-
-static void check_icu_chain(void)
-{
-    const char * en_str 
-        = "O Romeo, Romeo! wherefore art thou\t Romeo?";
-
-    UErrorCode status = U_ZERO_ERROR;
-    struct icu_chain * chain = 0;
-    
-    const char * xml_str = "<icu locale=\"en\">"
-        "<transform rule=\"[:Control:] Any-Remove\"/>"
-        "<tokenize rule=\"l\"/>"
-        "<transform rule=\"[[:WhiteSpace:][:Punctuation:]] Remove\"/>"
-        "<display/>"
-        "<casemap rule=\"l\"/>"
-        "</icu>";
-
-    
-    xmlDoc *doc = xmlParseMemory(xml_str, strlen(xml_str));
-    xmlNode *xml_node = xmlDocGetRootElement(doc);
-    YAZ_CHECK(xml_node);
-
-    chain = icu_chain_xml_config(xml_node, 0, &status);
-
-    xmlFreeDoc(doc);
-    YAZ_CHECK(chain);
-
-    YAZ_CHECK(icu_chain_assign_cstr(chain, en_str, &status));
-
-    while (icu_chain_next_token(chain, &status))
-    {
-        yaz_log(YLOG_LOG, "%d '%s' '%s'",
-                icu_chain_token_number(chain),
-                icu_chain_token_norm(chain),
-                icu_chain_token_display(chain));
-    }
-
-    YAZ_CHECK_EQ(icu_chain_token_number(chain), 7);
-
-
-    YAZ_CHECK(icu_chain_assign_cstr(chain, "what is this?", &status));
-
-    while (icu_chain_next_token(chain, &status))
-    {
-        yaz_log(YLOG_LOG, "%d '%s' '%s'",
-                icu_chain_token_number(chain),
-                icu_chain_token_norm(chain),
-                icu_chain_token_display(chain));
-    }
-
-
-    YAZ_CHECK_EQ(icu_chain_token_number(chain), 3);
-
-    icu_chain_destroy(chain);
-}
-
-
-static void check_bug_1140(void)
-{
-    UErrorCode status = U_ZERO_ERROR;
-    struct icu_chain * chain = 0;
-    
-    const char * xml_str = "<icu locale=\"en\">"
-
-        /* if the first rule is normalize instead. Then it works */
-#if 0
-        "<transform rule=\"[:Control:] Any-Remove\"/>"
-#endif
-        "<tokenize rule=\"l\"/>"
-        "<transform rule=\"[[:WhiteSpace:][:Punctuation:]] Remove\"/>"
-        "<display/>"
-        "<casemap rule=\"l\"/>"
-        "</icu>";
-
-    
-    xmlDoc *doc = xmlParseMemory(xml_str, strlen(xml_str));
-    xmlNode *xml_node = xmlDocGetRootElement(doc);
-    YAZ_CHECK(xml_node);
-
-    chain = icu_chain_xml_config(xml_node, 0, &status);
-
-    xmlFreeDoc(doc);
-    YAZ_CHECK(chain);
-    
-    YAZ_CHECK(icu_chain_assign_cstr(
-                  chain,  "O Romeo, Romeo! wherefore art thou\t Romeo?",
-                  &status));
-
-    while (icu_chain_next_token(chain, &status))
-    {
-        ;
-        /* printf("%d '%s' '%s'\n",
-           icu_chain_token_number(chain),
-           icu_chain_token_norm(chain),
-           icu_chain_token_display(chain)); */
-    }
-    
-
-    YAZ_CHECK_EQ(icu_chain_token_number(chain), 7);
-
-    YAZ_CHECK(icu_chain_assign_cstr(chain, "what is this?", &status));
-
-    while (icu_chain_next_token(chain, &status))
-    {
-        ;
-        /* printf("%d '%s' '%s'\n",
-           icu_chain_token_number(chain),
-           icu_chain_token_norm(chain),
-           icu_chain_token_display(chain)); */
-    }
-
-    /* we expect 'what' 'is' 'this', i.e. 3 tokens */
-    YAZ_CHECK_EQ(icu_chain_token_number(chain), 3);
-
-    icu_chain_destroy(chain);
-}
-
-
-static void check_chain_empty_token(void)
-{
-    UErrorCode status = U_ZERO_ERROR;
-    struct icu_chain * chain = 0;
-
-    const char * xml_str = "<icu locale=\"en\">"
-        "<tokenize rule=\"w\"/>"
-        "<transform rule=\"[[:WhiteSpace:][:Punctuation:]] Remove\"/>"
-        "</icu>";
-    
-    xmlDoc *doc = xmlParseMemory(xml_str, strlen(xml_str));
-    xmlNode *xml_node = xmlDocGetRootElement(doc);
-    YAZ_CHECK(xml_node);
-
-    chain = icu_chain_xml_config(xml_node, 0, &status);
-
-    xmlFreeDoc(doc);
-    YAZ_CHECK(chain);
-    
-    YAZ_CHECK(icu_chain_assign_cstr(
-                  chain,  "a string with 15 tokenss and 8 displays",
-                  &status));
-
-    while (icu_chain_next_token(chain, &status))
-    {
-        ;
-        /* printf("%d '%s' '%s'\n",
-           icu_chain_token_number(chain),
-           icu_chain_token_norm(chain),
-           icu_chain_token_display(chain)); */
-    }
-
-    YAZ_CHECK_EQ(icu_chain_token_number(chain), 15);
-
-    icu_chain_destroy(chain);
-}
-
-static void check_chain_empty_chain(void)
-{
-    UErrorCode status = U_ZERO_ERROR;
-    struct icu_chain * chain = 0;
-
-    const char * xml_str = "<icu locale=\"en\">"
-        "</icu>";
-    
-    const char * src8 = "some 5487 weired !¤%&(/& sTuFf";
-    char * dest8 = 0;
-
-    xmlDoc *doc = xmlParseMemory(xml_str, strlen(xml_str));
-    xmlNode *xml_node = xmlDocGetRootElement(doc);
-    YAZ_CHECK(xml_node);
-
-    chain = icu_chain_xml_config(xml_node, 0, &status);
-
-    xmlFreeDoc(doc);
-    YAZ_CHECK(chain);
-    
-    YAZ_CHECK(icu_chain_assign_cstr(
-                  chain,  src8,
-                  &status));
-
-    while (icu_chain_next_token(chain, &status))
-    {
-        ;
-        /* printf("%d '%s' '%s'\n",
-           icu_chain_token_number(chain),
-           icu_chain_token_norm(chain),
-           icu_chain_token_display(chain)); */
-    }
-
-    YAZ_CHECK_EQ(icu_chain_token_number(chain), 1);
-
-    dest8 = (char *) icu_chain_token_norm(chain);
-    YAZ_CHECK_EQ(strcmp(src8, dest8), 0);
-    
-    icu_chain_destroy(chain);
-}
-
-static void check_icu_iter1(void)
-{
-    UErrorCode status = U_ZERO_ERROR;
-    struct icu_chain * chain = 0;
-    xmlNode *xml_node;
-    yaz_icu_iter_t iter;
-
-    const char * xml_str = "<icu locale=\"en\">"
-        "<tokenize rule=\"w\"/>"
-        "<transform rule=\"[[:WhiteSpace:][:Punctuation:]] Remove\"/>"
-        "</icu>";
-    
-    xmlDoc *doc = xmlParseMemory(xml_str, strlen(xml_str));
-    YAZ_CHECK(doc);
-    if (!doc)
-        return;
-    xml_node = xmlDocGetRootElement(doc);
-    YAZ_CHECK(xml_node);
-    if (!xml_node)
-        return ;
-
-    chain = icu_chain_xml_config(xml_node, 0, &status);
-
-    xmlFreeDoc(doc);
-    YAZ_CHECK(chain);
-    
-    iter = icu_iter_create(chain);
-    icu_iter_first(iter, "a string with 15 tokens and 8 displays");
-    YAZ_CHECK(iter);
-    if (!iter)
-        return;
-    while (icu_iter_next(iter))
-    {
-        yaz_log(YLOG_LOG, "[%s]", icu_iter_get_norm(iter));
-    }
-    icu_iter_destroy(iter);
-    icu_chain_destroy(chain);
-}
-
-static int test_iter(struct icu_chain *chain, const char *input,
-                     const char *expected)
-{
-    yaz_icu_iter_t iter = icu_iter_create(chain);
-    WRBUF result, second;
-    int success = 1;
-
-    if (!iter)
-    {
-        yaz_log(YLOG_WARN, "test_iter: input=%s !iter", input);
-        return 0;
-    }
-
-    if (icu_iter_next(iter))
-    {
-        yaz_log(YLOG_WARN, "test_iter: expecting 0 before icu_iter_first");
-        return 0;
-    }
-
-    result = wrbuf_alloc();
-    icu_iter_first(iter, input);
-    while (icu_iter_next(iter))
-    {
-        wrbuf_puts(result, "[");
-        wrbuf_puts(result, icu_iter_get_norm(iter));
-        wrbuf_puts(result, "]");
-    }
-
-    second = wrbuf_alloc();
-    icu_iter_first(iter, input);
-    while (icu_iter_next(iter))
-    {
-        wrbuf_puts(second, "[");
-        wrbuf_puts(second, icu_iter_get_norm(iter));
-        wrbuf_puts(second, "]");
-    }
-
-    icu_iter_destroy(iter);
-
-    if (strcmp(expected, wrbuf_cstr(result)))
-    {
-        yaz_log(YLOG_WARN, "test_iter: input=%s expected=%s got=%s",
-                input, expected, wrbuf_cstr(result));
-        success = 0;
-    }
-
-    if (strcmp(expected, wrbuf_cstr(second)))
-    {
-        yaz_log(YLOG_WARN, "test_iter: input=%s expected=%s got=%s (2nd)",
-                input, expected, wrbuf_cstr(second));
-        success = 0;
-    }
-
-    wrbuf_destroy(result);
-    wrbuf_destroy(second);
-    return success;
-}
-
-static void *iter_thread(void *p)
-{
-    struct icu_chain *chain = (struct icu_chain *) p;
-    int i;
-    
-    for (i = 0; i < 10000; i++)
-    {
-        YAZ_CHECK(test_iter(chain, "Adobe Acrobat Reader, 1991-1999.",
-                            "[adobe][acrobat][reader][1991][][1999][]"));
-    }
-    return 0;
-}
-
-static void check_iter_threads(struct icu_chain *chain)
-{
-#if YAZ_POSIX_THREADS
-#define NO_THREADS 1
-
-    pthread_t t[NO_THREADS];
-    int i;
-
-    for (i = 0; i < NO_THREADS; i++)
-        pthread_create(t + i, 0, iter_thread, chain);
-
-    for (i = 0; i < NO_THREADS; i++)
-        pthread_join(t[i], 0);
-#endif
-}
-static void check_icu_iter2(void)
-{
-    UErrorCode status = U_ZERO_ERROR;
-    struct icu_chain * chain = 0;
-    xmlNode *xml_node;
-
-    const char * xml_str = "<icu locale=\"en\">"
-        "<transform rule=\"[:Control:] Any-Remove\"/>"
-        "<tokenize rule=\"l\"/>"
-        "<tokenize rule=\"w\"/>"
-        "<transform rule=\"[[:WhiteSpace:][:Punctuation:]] Remove\"/>"
-        "<display/>"
-        "<casemap rule=\"l\"/>"
-        "</icu>";
-
-    xmlDoc *doc = xmlParseMemory(xml_str, strlen(xml_str));
-    YAZ_CHECK(doc);
-    if (!doc)
-        return;
-    xml_node = xmlDocGetRootElement(doc);
-    YAZ_CHECK(xml_node);
-    if (!xml_node)
-        return ;
-
-    chain = icu_chain_xml_config(xml_node, 0, &status);
-
-    xmlFreeDoc(doc);
-    YAZ_CHECK(chain);
-    
-    YAZ_CHECK(test_iter(chain, "Adobe Acrobat Reader, 1991-1999.",
-                        "[adobe][acrobat][reader][1991][][1999][]"));
-
-    check_iter_threads(chain);
-
-    icu_chain_destroy(chain);
-}
-
-#endif /* YAZ_HAVE_ICU */
-
-int main(int argc, char **argv)
-{
-    YAZ_CHECK_INIT(argc, argv); 
-    YAZ_CHECK_LOG();
-
-#if YAZ_HAVE_ICU
-
-    check_icu_casemap();
-    check_icu_sortmap();
-    check_icu_normalizer();
-    check_icu_tokenizer();
-    check_icu_chain();
-    check_chain_empty_token();
-    check_chain_empty_chain();
-    check_icu_iter1();
-    check_icu_iter2();
-    
-    check_bug_1140();
-
-#else /* YAZ_HAVE_ICU */
-
-    yaz_log(YLOG_LOG, "ICU unit tests omitted");
-    YAZ_CHECK(0 == 0);
-
-#endif /* YAZ_HAVE_ICU */
-   
-    YAZ_CHECK_TERM;
-}
-
-/*
- * Local variables:
- * c-basic-offset: 4
- * c-file-style: "Stroustrup"
- * indent-tabs-mode: nil
- * End:
- * vim: shiftwidth=4 tabstop=8 expandtab
- */
-