* Copyright (C) 1995-2007, Index Data ApS
* See the file LICENSE for details.
*
- * $Id: icu_I18N.c,v 1.12 2007-11-07 10:19:12 adam Exp $
+ * $Id: icu_I18N.c,v 1.22 2007-12-17 11:23:16 adam Exp $
*/
#if HAVE_CONFIG_H
#include <yaz/timing.h>
#endif
+#if YAZ_HAVE_ICU
+#include <yaz/xmalloc.h>
-#if HAVE_ICU
#include <yaz/icu_I18N.h>
#include <yaz/log.h>
int icu_check_status (UErrorCode status)
{
- if(U_FAILURE(status)){
- yaz_log(YLOG_WARN,
- "ICU: %d %s\n", status, u_errorName(status));
+ if (U_FAILURE(status))
+ {
+ yaz_log(YLOG_WARN, "ICU: %d %s\n", status, u_errorName(status));
return 0;
}
return 1;
struct icu_buf_utf16 * icu_buf_utf16_create(size_t capacity)
{
struct icu_buf_utf16 * buf16
- = (struct icu_buf_utf16 *) malloc(sizeof(struct icu_buf_utf16));
+ = (struct icu_buf_utf16 *) xmalloc(sizeof(struct icu_buf_utf16));
buf16->utf16 = 0;
buf16->utf16_len = 0;
buf16->utf16_cap = 0;
if (capacity > 0){
- buf16->utf16 = (UChar *) malloc(sizeof(UChar) * capacity);
+ buf16->utf16 = (UChar *) xmalloc(sizeof(UChar) * capacity);
buf16->utf16[0] = (UChar) 0;
buf16->utf16_cap = capacity;
}
if (capacity > 0){
if (0 == buf16->utf16)
- buf16->utf16 = (UChar *) malloc(sizeof(UChar) * capacity);
+ buf16->utf16 = (UChar *) xmalloc(sizeof(UChar) * capacity);
else
buf16->utf16
- = (UChar *) realloc(buf16->utf16, sizeof(UChar) * capacity);
+ = (UChar *) xrealloc(buf16->utf16, sizeof(UChar) * capacity);
icu_buf_utf16_clear(buf16);
buf16->utf16_cap = capacity;
}
else {
- if (buf16->utf16)
- free(buf16->utf16);
+ xfree(buf16->utf16);
buf16->utf16 = 0;
buf16->utf16_len = 0;
buf16->utf16_cap = 0;
void icu_buf_utf16_destroy(struct icu_buf_utf16 * buf16)
{
- if (buf16){
- if (buf16->utf16)
- free(buf16->utf16);
- free(buf16);
- }
+ if (buf16)
+ xfree(buf16->utf16);
+ xfree(buf16);
}
-
-
-
struct icu_buf_utf8 * icu_buf_utf8_create(size_t capacity)
{
struct icu_buf_utf8 * buf8
- = (struct icu_buf_utf8 *) malloc(sizeof(struct icu_buf_utf8));
+ = (struct icu_buf_utf8 *) xmalloc(sizeof(struct icu_buf_utf8));
buf8->utf8 = 0;
buf8->utf8_len = 0;
buf8->utf8_cap = 0;
if (capacity > 0){
- buf8->utf8 = (uint8_t *) malloc(sizeof(uint8_t) * capacity);
+ buf8->utf8 = (uint8_t *) xmalloc(sizeof(uint8_t) * capacity);
buf8->utf8[0] = (uint8_t) 0;
buf8->utf8_cap = capacity;
}
if (capacity > 0){
if (0 == buf8->utf8)
- buf8->utf8 = (uint8_t *) malloc(sizeof(uint8_t) * capacity);
+ buf8->utf8 = (uint8_t *) xmalloc(sizeof(uint8_t) * capacity);
else
buf8->utf8
- = (uint8_t *) realloc(buf8->utf8, sizeof(uint8_t) * capacity);
-
- icu_buf_utf8_clear(buf8);
+ = (uint8_t *) xrealloc(buf8->utf8, sizeof(uint8_t) * capacity);
+
buf8->utf8_cap = capacity;
}
else {
- if (buf8->utf8)
- free(buf8->utf8);
+ xfree(buf8->utf8);
buf8->utf8 = 0;
buf8->utf8_len = 0;
buf8->utf8_cap = 0;
}
-struct icu_buf_utf8 * icu_buf_utf8_copy(struct icu_buf_utf8 * dest8,
- struct icu_buf_utf8 * src8)
-{
- if(!dest8 || !src8
- || dest8 == src8)
- return 0;
-
-
- if (dest8->utf8_cap < src8->utf8_len)
- icu_buf_utf8_resize(dest8, src8->utf8_len * 2);
-
- strncpy((char*) dest8->utf8, (char*) src8->utf8, src8->utf8_len);
-
- return dest8;
-}
-
-
const char *icu_buf_utf8_to_cstr(struct icu_buf_utf8 *src8)
{
if (!src8 || src8->utf8_len == 0)
void icu_buf_utf8_destroy(struct icu_buf_utf8 * buf8)
{
- if (buf8){
- if (buf8->utf8)
- free(buf8->utf8);
- free(buf8);
- }
+ if (buf8)
+ xfree(buf8->utf8);
+ xfree(buf8);
}
-struct icu_casemap * icu_casemap_create(const char *locale, char action,
- UErrorCode *status)
+struct icu_casemap * icu_casemap_create(char action, UErrorCode *status)
{
struct icu_casemap * casemap
- = (struct icu_casemap *) malloc(sizeof(struct icu_casemap));
- strcpy(casemap->locale, locale);
+ = (struct icu_casemap *) xmalloc(sizeof(struct icu_casemap));
casemap->action = action;
switch(casemap->action) {
void icu_casemap_destroy(struct icu_casemap * casemap)
{
- if (casemap)
- free(casemap);
+ xfree(casemap);
}
int icu_casemap_casemap(struct icu_casemap * casemap,
struct icu_buf_utf16 * dest16,
struct icu_buf_utf16 * src16,
- UErrorCode *status)
+ UErrorCode *status,
+ const char *locale)
{
if(!casemap)
return 0;
- return icu_utf16_casemap(dest16, src16,
- casemap->locale, casemap->action, status);
+ return icu_utf16_casemap(dest16, src16, locale,
+ casemap->action, status);
}
int32_t dest16_len = 0;
- if (!src16->utf16_len){ //guarding for empty source string
+ if (!src16->utf16_len){ /* guarding for empty source string */
if (dest16->utf16)
dest16->utf16[0] = (UChar) 0;
dest16->utf16_len = 0;
-UErrorCode icu_sortkey8_from_utf16(UCollator *coll,
- struct icu_buf_utf8 * dest8,
- struct icu_buf_utf16 * src16,
- UErrorCode * status)
+void icu_sortkey8_from_utf16(UCollator *coll,
+ struct icu_buf_utf8 * dest8,
+ struct icu_buf_utf16 * src16,
+ UErrorCode * status)
{
int32_t sortkey_len = 0;
dest8->utf8_len = sortkey_len;
else
icu_buf_utf8_clear(dest8);
-
- return sortkey_len;
}
UErrorCode *status)
{
struct icu_tokenizer * tokenizer
- = (struct icu_tokenizer *) malloc(sizeof(struct icu_tokenizer));
+ = (struct icu_tokenizer *) xmalloc(sizeof(struct icu_tokenizer));
- strcpy(tokenizer->locale, locale);
tokenizer->action = action;
tokenizer->bi = 0;
tokenizer->buf16 = 0;
switch(tokenizer->action) {
case 'l':
case 'L':
- tokenizer->bi
- = ubrk_open(UBRK_LINE, tokenizer->locale,
- 0, 0, status);
+ tokenizer->bi = ubrk_open(UBRK_LINE, locale, 0, 0, status);
break;
case 's':
case 'S':
- tokenizer->bi
- = ubrk_open(UBRK_SENTENCE, tokenizer->locale,
- 0, 0, status);
+ tokenizer->bi = ubrk_open(UBRK_SENTENCE, locale, 0, 0, status);
break;
case 'w':
case 'W':
- tokenizer->bi
- = ubrk_open(UBRK_WORD, tokenizer->locale,
- 0, 0, status);
+ tokenizer->bi = ubrk_open(UBRK_WORD, locale, 0, 0, status);
break;
case 'c':
case 'C':
- tokenizer->bi
- = ubrk_open(UBRK_CHARACTER, tokenizer->locale,
- 0, 0, status);
+ tokenizer->bi = ubrk_open(UBRK_CHARACTER, locale, 0, 0, status);
break;
case 't':
case 'T':
- tokenizer->bi
- = ubrk_open(UBRK_TITLE, tokenizer->locale,
- 0, 0, status);
+ tokenizer->bi = ubrk_open(UBRK_TITLE, locale, 0, 0, status);
break;
default:
*status = U_UNSUPPORTED_ERROR;
if (tokenizer) {
if (tokenizer->bi)
ubrk_close(tokenizer->bi);
- free(tokenizer);
+ xfree(tokenizer);
}
}
{
struct icu_normalizer * normalizer
- = (struct icu_normalizer *) malloc(sizeof(struct icu_normalizer));
+ = (struct icu_normalizer *) xmalloc(sizeof(struct icu_normalizer));
normalizer->action = action;
normalizer->trans = 0;
icu_buf_utf16_destroy(normalizer->rules16);
if (normalizer->trans)
utrans_close(normalizer->trans);
- free(normalizer);
+ xfree(normalizer);
}
}
|| !dest16)
return 0;
- if (!src16->utf16_len){ //guarding for empty source string
+ if (!src16->utf16_len){ /* guarding for empty source string */
icu_buf_utf16_clear(dest16);
return 0;
}
if(!chain || !type || !rule)
return 0;
- step = (struct icu_chain_step *) malloc(sizeof(struct icu_chain_step));
+ step = (struct icu_chain_step *) xmalloc(sizeof(struct icu_chain_step));
step->type = type;
case ICU_chain_step_type_display:
break;
case ICU_chain_step_type_casemap:
- step->u.casemap = icu_casemap_create((char *) chain->locale,
- (char) rule[0], status);
+ step->u.casemap = icu_casemap_create(rule[0], status);
break;
case ICU_chain_step_type_normalize:
step->u.normalizer = icu_normalizer_create((char *) rule, 'f', status);
default:
break;
}
- free(step);
+ xfree(step);
}
-struct icu_chain * icu_chain_create(const char *locale,
- int sort,
+struct icu_chain * icu_chain_create(const char *locale, int sort,
UErrorCode * status)
{
-
struct icu_chain * chain
- = (struct icu_chain *) malloc(sizeof(struct icu_chain));
+ = (struct icu_chain *) xmalloc(sizeof(struct icu_chain));
*status = U_ZERO_ERROR;
- strncpy((char *) chain->locale, (const char *) locale, 16);
- chain->locale[16 - 1] = '\0';
+ chain->locale = xstrdup(locale);
chain->sort = sort;
if (U_FAILURE(*status))
return 0;
-
chain->token_count = 0;
chain->src8cstr = 0;
void icu_chain_destroy(struct icu_chain * chain)
{
- if (chain){
-
+ if (chain)
+ {
if (chain->coll)
ucol_close(chain->coll);
icu_buf_utf16_destroy(chain->src16);
icu_chain_step_destroy(chain->steps);
- free(chain);
+ xfree(chain->locale);
+ xfree(chain);
}
}
struct icu_chain * icu_chain_xml_config(const xmlNode *xml_node,
- const char *locale,
int sort,
- UErrorCode * status){
-
+ UErrorCode * status)
+{
xmlNode *node = 0;
struct icu_chain * chain = 0;
*status = U_ZERO_ERROR;
- if (!xml_node
- ||xml_node->type != XML_ELEMENT_NODE
- // || strcmp((const char *) xml_node->name, "icu_chain")
- )
-
+ if (!xml_node ||xml_node->type != XML_ELEMENT_NODE)
return 0;
-
- chain = icu_chain_create(locale, sort, status);
-
+
+ {
+ xmlChar * xml_locale = xmlGetProp((xmlNode *) xml_node,
+ (xmlChar *) "locale");
+
+ if (xml_locale)
+ {
+ chain = icu_chain_create((const char *) xml_locale, sort, status);
+ xmlFree(xml_locale);
+ }
+
+ }
if (!chain)
return 0;
-
for (node = xml_node->children; node; node = node->next)
{
xmlChar *xml_rule;
xml_rule = xmlGetProp(node, (xmlChar *) "rule");
- if (!strcmp((const char *) node->name,
- (const char *) "casemap")){
+ if (!strcmp((const char *) node->name, "casemap"))
step = icu_chain_insert_step(chain, ICU_chain_step_type_casemap,
(const uint8_t *) xml_rule, status);
- }
- else if (!strcmp((const char *) node->name,
- (const char *) "normalize")){
+ else if (!strcmp((const char *) node->name, "transform"))
step = icu_chain_insert_step(chain, ICU_chain_step_type_normalize,
(const uint8_t *) xml_rule, status);
- }
- else if (!strcmp((const char *) node->name,
- (const char *) "tokenize")){
+ else if (!strcmp((const char *) node->name, "tokenize"))
step = icu_chain_insert_step(chain, ICU_chain_step_type_tokenize,
(const uint8_t *) xml_rule, status);
- }
- else if (!strcmp((const char *) node->name,
- (const char *) "display")){
+ else if (!strcmp((const char *) node->name, "display"))
step = icu_chain_insert_step(chain, ICU_chain_step_type_display,
(const uint8_t *) "", status);
- }
xmlFree(xml_rule);
- if (!step || U_FAILURE(*status)){
+ if (!step || U_FAILURE(*status))
+ {
icu_chain_destroy(chain);
return 0;
}
}
-
return chain;
}
/* create utf16 destination buffers as needed, or */
- switch(type) {
+ switch(type)
+ {
case ICU_chain_step_type_display:
buf16 = src16;
break;
/* assign utf16 src buffers as neeed, advance in previous steps
tokens until non-zero token met, and setting stop condition */
- if (step->previous){
+ if (step->previous)
+ {
src16 = step->previous->buf16;
/* tokens might be killed in previous steps, therefore looping */
got_new_token
= icu_chain_step_next_token(chain, step->previous, status);
}
- else { /* first step can only work once on chain->src16 input buffer */
+ else
+ { /* first step can only work once on chain->src16 input buffer */
src16 = chain->src16;
step->more_tokens = 0;
got_new_token = 1;
return 0;
/* stop if nothing to process */
- if (step->need_new_token && !got_new_token){
+ if (step->need_new_token && !got_new_token)
+ {
step->more_tokens = 0;
return 0;
}
perform the work, eventually put this steps output in
step->buf16 or the chains UTF8 output buffers */
- switch(step->type) {
+ switch(step->type)
+ {
case ICU_chain_step_type_display:
icu_utf16_to_utf8(chain->display8, src16, status);
break;
case ICU_chain_step_type_casemap:
icu_casemap_casemap(step->u.casemap,
- step->buf16, src16, status);
+ step->buf16, src16, status,
+ chain->locale);
break;
case ICU_chain_step_type_normalize:
icu_normalizer_normalize(step->u.normalizer,
break;
case ICU_chain_step_type_tokenize:
/* attach to new src16 token only first time during splitting */
- if (step->need_new_token){
+ if (step->need_new_token)
+ {
icu_tokenizer_attach(step->u.tokenizer, src16, status);
step->need_new_token = 0;
}
-
/* splitting one src16 token into multiple buf16 tokens */
step->more_tokens
= icu_tokenizer_next_token(step->u.tokenizer,
/* make sure to get new previous token if this one had been used up
by recursive call to _same_ step */
- if (!step->more_tokens){
+ if (!step->more_tokens)
+ {
step->more_tokens = icu_chain_step_next_token(chain, step, status);
- return step->more_tokens; // avoid one token count too much!
+ return step->more_tokens; /* avoid one token count too much! */
}
-
break;
default:
return 0;
chain->token_count = 0;
/* clear all steps stop states */
- while (stp){
+ while (stp)
+ {
stp->more_tokens = 1;
stp->need_new_token = 1;
stp = stp->previous;
return 0;
/* special case with no steps - same as index type binary */
- if (!chain->steps){
+ if (!chain->steps)
+ {
if (chain->token_count)
return 0;
- else {
+ else
+ {
chain->token_count++;
if (chain->sort)
}
}
/* usual case, one or more icu chain steps existing */
- else {
-
+ else
+ {
while(!got_token && chain->steps && chain->steps->more_tokens)
got_token = icu_chain_step_next_token(chain, chain->steps, status);
- if (got_token){
+ if (got_token)
+ {
chain->token_count++;
icu_utf16_to_utf8(chain->norm8, chain->steps->buf16, status);
icu_sortkey8_from_utf16(chain->coll,
chain->sort8, chain->steps->buf16,
status);
-
+
return chain->token_count;
}
}
return chain->coll;
}
-
-
-
-#endif /* HAVE_ICU */
-
-
-
+#endif /* YAZ_HAVE_ICU */
/*
* Local variables: