src/third_party/icu/source/i18n/cpdtrans.cpp

   1 /*
   2 **********************************************************************
   3 *   Copyright (C) 1999-2011, International Business Machines
   4 *   Corporation and others.  All Rights Reserved.
   5 **********************************************************************
   6 *   Date        Name        Description
   7 *   11/17/99    aliu        Creation.
   8 **********************************************************************
   9 */
  10
  11 #include "unicode/utypes.h"
  12
  13 #if !UCONFIG_NO_TRANSLITERATION
  14
  15 #include "unicode/unifilt.h"
  16 #include "unicode/uniset.h"
  17 #include "cpdtrans.h"
  18 #include "uvector.h"
  19 #include "tridpars.h"
  20 #include "cmemory.h"
  21
  22 // keep in sync with Transliterator
  23 //static const UChar ID_SEP   = 0x002D; /*-*/
  24 static const UChar ID_DELIM = 0x003B; /*;*/
  25 static const UChar NEWLINE  = 10;
  26
  27 static const UChar COLON_COLON[] = {0x3A, 0x3A, 0}; //"::"
  28
  29 U_NAMESPACE_BEGIN
  30
  31 const UChar CompoundTransliterator::PASS_STRING[] = { 0x0025, 0x0050, 0x0061, 0x0073, 0x0073, 0 }; // "%Pass"
  32
  33 UOBJECT_DEFINE_RTTI_IMPLEMENTATION(CompoundTransliterator)
  34
  35 /**
  36  * Constructs a new compound transliterator given an array of
  37  * transliterators.  The array of transliterators may be of any
  38  * length, including zero or one, however, useful compound
  39  * transliterators have at least two components.
  40  * @param transliterators array of <code>Transliterator</code>
  41  * objects
  42  * @param transliteratorCount The number of
  43  * <code>Transliterator</code> objects in transliterators.
  44  * @param filter the filter.  Any character for which
  45  * <tt>filter.contains()</tt> returns <tt>false</tt> will not be
  46  * altered by this transliterator.  If <tt>filter</tt> is
  47  * <tt>null</tt> then no filtering is applied.
  48  */
  49 CompoundTransliterator::CompoundTransliterator(
  50                            Transliterator* const transliterators[],
  51                            int32_t transliteratorCount,
  52                            UnicodeFilter* adoptedFilter) :
  53     Transliterator(joinIDs(transliterators, transliteratorCount), adoptedFilter),
  54     trans(0), count(0), numAnonymousRBTs(0)  {
  55     setTransliterators(transliterators, transliteratorCount);
  56 }
  57
  58 /**
  59  * Splits an ID of the form "ID;ID;..." into a compound using each
  60  * of the IDs.
  61  * @param id of above form
  62  * @param forward if false, does the list in reverse order, and
  63  * takes the inverse of each ID.
  64  */
  65 CompoundTransliterator::CompoundTransliterator(const UnicodeString& id,
  66                               UTransDirection direction,
  67                               UnicodeFilter* adoptedFilter,
  68                               UParseError& /*parseError*/,
  69                               UErrorCode& status) :
  70     Transliterator(id, adoptedFilter),
  71     trans(0), numAnonymousRBTs(0) {
  72     // TODO add code for parseError...currently unused, but
  73     // later may be used by parsing code...
  74     init(id, direction, TRUE, status);
  75 }
  76
  77 CompoundTransliterator::CompoundTransliterator(const UnicodeString& id,
  78                               UParseError& /*parseError*/,
  79                               UErrorCode& status) :
  80     Transliterator(id, 0), // set filter to 0 here!
  81     trans(0), numAnonymousRBTs(0) {
  82     // TODO add code for parseError...currently unused, but
  83     // later may be used by parsing code...
  84     init(id, UTRANS_FORWARD, TRUE, status);
  85 }
  86
  87
  88 /**
  89  * Private constructor for use of TransliteratorAlias
  90  */
  91 CompoundTransliterator::CompoundTransliterator(const UnicodeString& newID,
  92                                               UVector& list,
  93                                               UnicodeFilter* adoptedFilter,
  94                                               int32_t anonymousRBTs,
  95                                               UParseError& /*parseError*/,
  96                                               UErrorCode& status) :
  97     Transliterator(newID, adoptedFilter),
  98     trans(0), numAnonymousRBTs(anonymousRBTs)
  99 {
 100     init(list, UTRANS_FORWARD, FALSE, status);
 101 }
 102
 103 /**
 104  * Private constructor for Transliterator from a vector of
 105  * transliterators.  The caller is responsible for fixing up the
 106  * ID.
 107  */
 108 CompoundTransliterator::CompoundTransliterator(UVector& list,
 109                                                UParseError& /*parseError*/,
 110                                                UErrorCode& status) :
 111     Transliterator(UnicodeString(), NULL),
 112     trans(0), numAnonymousRBTs(0)
 113 {
 114     // TODO add code for parseError...currently unused, but
 115     // later may be used by parsing code...
 116     init(list, UTRANS_FORWARD, FALSE, status);
 117     // assume caller will fixup ID
 118 }
 119
 120 CompoundTransliterator::CompoundTransliterator(UVector& list,
 121                                                int32_t anonymousRBTs,
 122                                                UParseError& /*parseError*/,
 123                                                UErrorCode& status) :
 124     Transliterator(UnicodeString(), NULL),
 125     trans(0), numAnonymousRBTs(anonymousRBTs)
 126 {
 127     init(list, UTRANS_FORWARD, FALSE, status);
 128 }
 129
 130 /**
 131  * Finish constructing a transliterator: only to be called by
 132  * constructors.  Before calling init(), set trans and filter to NULL.
 133  * @param id the id containing ';'-separated entries
 134  * @param direction either FORWARD or REVERSE
 135  * @param idSplitPoint the index into id at which the
 136  * adoptedSplitTransliterator should be inserted, if there is one, or
 137  * -1 if there is none.
 138  * @param adoptedSplitTransliterator a transliterator to be inserted
 139  * before the entry at offset idSplitPoint in the id string.  May be
 140  * NULL to insert no entry.
 141  * @param fixReverseID if TRUE, then reconstruct the ID of reverse
 142  * entries by calling getID() of component entries.  Some constructors
 143  * do not require this because they apply a facade ID anyway.
 144  * @param status the error code indicating success or failure
 145  */
 146 void CompoundTransliterator::init(const UnicodeString& id,
 147                                   UTransDirection direction,
 148                                   UBool fixReverseID,
 149                                   UErrorCode& status) {
 150     // assert(trans == 0);
 151
 152     if (U_FAILURE(status)) {
 153         return;
 154     }
 155
 156     UVector list(status);
 157     UnicodeSet* compoundFilter = NULL;
 158     UnicodeString regenID;
 159     if (!TransliteratorIDParser::parseCompoundID(id, direction,
 160                                       regenID, list, compoundFilter)) {
 161         status = U_INVALID_ID;
 162         delete compoundFilter;
 163         return;
 164     }
 165
 166     TransliteratorIDParser::instantiateList(list, status);
 167
 168     init(list, direction, fixReverseID, status);
 169
 170     if (compoundFilter != NULL) {
 171         adoptFilter(compoundFilter);
 172     }
 173 }
 174
 175 /**
 176  * Finish constructing a transliterator: only to be called by
 177  * constructors.  Before calling init(), set trans and filter to NULL.
 178  * @param list a vector of transliterator objects to be adopted.  It
 179  * should NOT be empty.  The list should be in declared order.  That
 180  * is, it should be in the FORWARD order; if direction is REVERSE then
 181  * the list order will be reversed.
 182  * @param direction either FORWARD or REVERSE
 183  * @param fixReverseID if TRUE, then reconstruct the ID of reverse
 184  * entries by calling getID() of component entries.  Some constructors
 185  * do not require this because they apply a facade ID anyway.
 186  * @param status the error code indicating success or failure
 187  */
 188 void CompoundTransliterator::init(UVector& list,
 189                                   UTransDirection direction,
 190                                   UBool fixReverseID,
 191                                   UErrorCode& status) {
 192     // assert(trans == 0);
 193
 194     // Allocate array
 195     if (U_SUCCESS(status)) {
 196         count = list.size();
 197         trans = (Transliterator **)uprv_malloc(count * sizeof(Transliterator *));
 198         /* test for NULL */
 199         if (trans == 0) {
 200             status = U_MEMORY_ALLOCATION_ERROR;
 201             return;
 202         }
 203     }
 204
 205     if (U_FAILURE(status) || trans == 0) {
 206          // assert(trans == 0);
 207         return;
 208     }
 209
 210     // Move the transliterators from the vector into an array.
 211     // Reverse the order if necessary.
 212     int32_t i;
 213     for (i=0; i<count; ++i) {
 214         int32_t j = (direction == UTRANS_FORWARD) ? i : count - 1 - i;
 215         trans[i] = (Transliterator*) list.elementAt(j);
 216     }
 217
 218     // If the direction is UTRANS_REVERSE then we may need to fix the
 219     // ID.
 220     if (direction == UTRANS_REVERSE && fixReverseID) {
 221         UnicodeString newID;
 222         for (i=0; i<count; ++i) {
 223             if (i > 0) {
 224                 newID.append(ID_DELIM);
 225             }
 226             newID.append(trans[i]->getID());
 227         }
 228         setID(newID);
 229     }
 230
 231     computeMaximumContextLength();
 232 }
 233
 234 /**
 235  * Return the IDs of the given list of transliterators, concatenated
 236  * with ID_DELIM delimiting them.  Equivalent to the perlish expression
 237  * join(ID_DELIM, map($_.getID(), transliterators).
 238  */
 239 UnicodeString CompoundTransliterator::joinIDs(Transliterator* const transliterators[],
 240                                               int32_t transCount) {
 241     UnicodeString id;
 242     for (int32_t i=0; i<transCount; ++i) {
 243         if (i > 0) {
 244             id.append(ID_DELIM);
 245         }
 246         id.append(transliterators[i]->getID());
 247     }
 248     return id; // Return temporary
 249 }
 250
 251 /**
 252  * Copy constructor.
 253  */
 254 CompoundTransliterator::CompoundTransliterator(const CompoundTransliterator& t) :
 255     Transliterator(t), trans(0), count(0), numAnonymousRBTs(-1) {
 256     *this = t;
 257 }
 258
 259 /**
 260  * Destructor
 261  */
 262 CompoundTransliterator::~CompoundTransliterator() {
 263     freeTransliterators();
 264 }
 265
 266 void CompoundTransliterator::freeTransliterators(void) {
 267     if (trans != 0) {
 268         for (int32_t i=0; i<count; ++i) {
 269             delete trans[i];
 270         }
 271         uprv_free(trans);
 272     }
 273     trans = 0;
 274     count = 0;
 275 }
 276
 277 /**
 278  * Assignment operator.
 279  */
 280 CompoundTransliterator& CompoundTransliterator::operator=(
 281                                              const CompoundTransliterator& t)
 282 {
 283     Transliterator::operator=(t);
 284     int32_t i = 0;
 285     UBool failed = FALSE;
 286     if (trans != NULL) {
 287         for (i=0; i<count; ++i) {
 288             delete trans[i];
 289             trans[i] = 0;
 290         }
 291     }
 292     if (t.count > count) {
 293         if (trans != NULL) {
 294             uprv_free(trans);
 295         }
 296         trans = (Transliterator **)uprv_malloc(t.count * sizeof(Transliterator *));
 297     }
 298     count = t.count;
 299     if (trans != NULL) {
 300         for (i=0; i<count; ++i) {
 301             trans[i] = t.trans[i]->clone();
 302             if (trans[i] == NULL) {
 303                 failed = TRUE;
 304                 break;
 305             }
 306         }
 307     }
 308
 309     // if memory allocation failed delete backwards trans array
 310     if (failed && i > 0) {
 311         int32_t n;
 312         for (n = i-1; n >= 0; n--) {
 313             uprv_free(trans[n]);
 314             trans[n] = NULL;
 315         }
 316     }
 317     numAnonymousRBTs = t.numAnonymousRBTs;
 318     return *this;
 319 }
 320
 321 /**
 322  * Transliterator API.
 323  */
 324 Transliterator* CompoundTransliterator::clone(void) const {
 325     return new CompoundTransliterator(*this);
 326 }
 327
 328 /**
 329  * Returns the number of transliterators in this chain.
 330  * @return number of transliterators in this chain.
 331  */
 332 int32_t CompoundTransliterator::getCount(void) const {
 333     return count;
 334 }
 335
 336 /**
 337  * Returns the transliterator at the given index in this chain.
 338  * @param index index into chain, from 0 to <code>getCount() - 1</code>
 339  * @return transliterator at the given index
 340  */
 341 const Transliterator& CompoundTransliterator::getTransliterator(int32_t index) const {
 342     return *trans[index];
 343 }
 344
 345 void CompoundTransliterator::setTransliterators(Transliterator* const transliterators[],
 346                                                 int32_t transCount) {
 347     Transliterator** a = (Transliterator **)uprv_malloc(transCount * sizeof(Transliterator *));
 348     if (a == NULL) {
 349         return;
 350     }
 351     int32_t i = 0;
 352     UBool failed = FALSE;
 353     for (i=0; i<transCount; ++i) {
 354         a[i] = transliterators[i]->clone();
 355         if (a[i] == NULL) {
 356             failed = TRUE;
 357             break;
 358         }
 359     }
 360     if (failed && i > 0) {
 361         int32_t n;
 362         for (n = i-1; n >= 0; n--) {
 363             uprv_free(a[n]);
 364             a[n] = NULL;
 365         }
 366         return;
 367     }
 368     adoptTransliterators(a, transCount);
 369 }
 370
 371 void CompoundTransliterator::adoptTransliterators(Transliterator* adoptedTransliterators[],
 372                                                   int32_t transCount) {
 373     // First free trans[] and set count to zero.  Once this is done,
 374     // orphan the filter.  Set up the new trans[].
 375     freeTransliterators();
 376     trans = adoptedTransliterators;
 377     count = transCount;
 378     computeMaximumContextLength();
 379     setID(joinIDs(trans, count));
 380 }
 381
 382 /**
 383  * Append c to buf, unless buf is empty or buf already ends in c.
 384  */
 385 static void _smartAppend(UnicodeString& buf, UChar c) {
 386     if (buf.length() != 0 &&
 387         buf.charAt(buf.length() - 1) != c) {
 388         buf.append(c);
 389     }
 390 }
 391
 392 UnicodeString& CompoundTransliterator::toRules(UnicodeString& rulesSource,
 393                                                UBool escapeUnprintable) const {
 394     // We do NOT call toRules() on our component transliterators, in
 395     // general.  If we have several rule-based transliterators, this
 396     // yields a concatenation of the rules -- not what we want.  We do
 397     // handle compound RBT transliterators specially -- those for which
 398     // compoundRBTIndex >= 0.  For the transliterator at compoundRBTIndex,
 399     // we do call toRules() recursively.
 400     rulesSource.truncate(0);
 401     if (numAnonymousRBTs >= 1 && getFilter() != NULL) {
 402         // If we are a compound RBT and if we have a global
 403         // filter, then emit it at the top.
 404         UnicodeString pat;
 405         rulesSource.append(COLON_COLON, 2).append(getFilter()->toPattern(pat, escapeUnprintable)).append(ID_DELIM);
 406     }
 407     for (int32_t i=0; i<count; ++i) {
 408         UnicodeString rule;
 409
 410         // Anonymous RuleBasedTransliterators (inline rules and
 411         // ::BEGIN/::END blocks) are given IDs that begin with
 412         // "%Pass": use toRules() to write all the rules to the output
 413         // (and insert "::Null;" if we have two in a row)
 414         if (trans[i]->getID().startsWith(PASS_STRING, 5)) {
 415             trans[i]->toRules(rule, escapeUnprintable);
 416             if (numAnonymousRBTs > 1 && i > 0 && trans[i - 1]->getID().startsWith(PASS_STRING, 5))
 417                 rule = UNICODE_STRING_SIMPLE("::Null;") + rule;
 418
 419         // we also use toRules() on CompoundTransliterators (which we
 420         // check for by looking for a semicolon in the ID)-- this gets
 421         // the list of their child transliterators output in the right
 422         // format
 423         } else if (trans[i]->getID().indexOf(ID_DELIM) >= 0) {
 424             trans[i]->toRules(rule, escapeUnprintable);
 425
 426         // for everything else, use Transliterator::toRules()
 427         } else {
 428             trans[i]->Transliterator::toRules(rule, escapeUnprintable);
 429         }
 430         _smartAppend(rulesSource, NEWLINE);
 431         rulesSource.append(rule);
 432         _smartAppend(rulesSource, ID_DELIM);
 433     }
 434     return rulesSource;
 435 }
 436
 437 /**
 438  * Implement Transliterator framework
 439  */
 440 void CompoundTransliterator::handleGetSourceSet(UnicodeSet& result) const {
 441     UnicodeSet set;
 442     result.clear();
 443     for (int32_t i=0; i<count; ++i) {
 444     result.addAll(trans[i]->getSourceSet(set));
 445     // Take the example of Hiragana-Latin.  This is really
 446     // Hiragana-Katakana; Katakana-Latin.  The source set of
 447     // these two is roughly [:Hiragana:] and [:Katakana:].
 448     // But the source set for the entire transliterator is
 449     // actually [:Hiragana:] ONLY -- that is, the first
 450     // non-empty source set.
 451
 452     // This is a heuristic, and not 100% reliable.
 453     if (!result.isEmpty()) {
 454         break;
 455     }
 456     }
 457 }
 458
 459 /**
 460  * Override Transliterator framework
 461  */
 462 UnicodeSet& CompoundTransliterator::getTargetSet(UnicodeSet& result) const {
 463     UnicodeSet set;
 464     result.clear();
 465     for (int32_t i=0; i<count; ++i) {
 466     // This is a heuristic, and not 100% reliable.
 467     result.addAll(trans[i]->getTargetSet(set));
 468     }
 469     return result;
 470 }
 471
 472 /**
 473  * Implements {@link Transliterator#handleTransliterate}.
 474  */
 475 void CompoundTransliterator::handleTransliterate(Replaceable& text, UTransPosition& index,
 476                                                  UBool incremental) const {
 477     /* Call each transliterator with the same contextStart and
 478      * start, but with the limit as modified
 479      * by preceding transliterators.  The start index must be
 480      * reset for each transliterator to give each a chance to
 481      * transliterate the text.  The initial contextStart index is known
 482      * to still point to the same place after each transliterator
 483      * is called because each transliterator will not change the
 484      * text between contextStart and the initial start index.
 485      *
 486      * IMPORTANT: After the first transliterator, each subsequent
 487      * transliterator only gets to transliterate text committed by
 488      * preceding transliterators; that is, the start (output
 489      * value) of transliterator i becomes the limit (input value)
 490      * of transliterator i+1.  Finally, the overall limit is fixed
 491      * up before we return.
 492      *
 493      * Assumptions we make here:
 494      * (1) contextStart <= start <= limit <= contextLimit <= text.length()
 495      * (2) start <= start' <= limit'  ;cursor doesn't move back
 496      * (3) start <= limit'            ;text before cursor unchanged
 497      * - start' is the value of start after calling handleKT
 498      * - limit' is the value of limit after calling handleKT
 499      */
 500
 501     /**
 502      * Example: 3 transliterators.  This example illustrates the
 503      * mechanics we need to implement.  C, S, and L are the contextStart,
 504      * start, and limit.  gl is the globalLimit.  contextLimit is
 505      * equal to limit throughout.
 506      *
 507      * 1. h-u, changes hex to Unicode
 508      *
 509      *    4  7  a  d  0      4  7  a
 510      *    abc/u0061/u    =>  abca/u
 511      *    C  S       L       C   S L   gl=f->a
 512      *
 513      * 2. upup, changes "x" to "XX"
 514      *
 515      *    4  7  a       4  7  a
 516      *    abca/u    =>  abcAA/u
 517      *    C  SL         C    S
 518      *                       L    gl=a->b
 519      * 3. u-h, changes Unicode to hex
 520      *
 521      *    4  7  a        4  7  a  d  0  3
 522      *    abcAA/u    =>  abc/u0041/u0041/u
 523      *    C  S L         C              S
 524      *                                  L   gl=b->15
 525      * 4. return
 526      *
 527      *    4  7  a  d  0  3
 528      *    abc/u0041/u0041/u
 529      *    C S L
 530      */
 531
 532     if (count < 1) {
 533         index.start = index.limit;
 534         return; // Short circuit for empty compound transliterators
 535     }
 536
 537     // compoundLimit is the limit value for the entire compound
 538     // operation.  We overwrite index.limit with the previous
 539     // index.start.  After each transliteration, we update
 540     // compoundLimit for insertions or deletions that have happened.
 541     int32_t compoundLimit = index.limit;
 542
 543     // compoundStart is the start for the entire compound
 544     // operation.
 545     int32_t compoundStart = index.start;
 546
 547     int32_t delta = 0; // delta in length
 548
 549     // Give each transliterator a crack at the run of characters.
 550     // See comments at the top of the method for more detail.
 551     for (int32_t i=0; i<count; ++i) {
 552         index.start = compoundStart; // Reset start
 553         int32_t limit = index.limit;
 554
 555         if (index.start == index.limit) {
 556             // Short circuit for empty range
 557             break;
 558         }
 559
 560         trans[i]->filteredTransliterate(text, index, incremental);
 561
 562         // In a properly written transliterator, start == limit after
 563         // handleTransliterate() returns when incremental is false.
 564         // Catch cases where the subclass doesn't do this, and throw
 565         // an exception.  (Just pinning start to limit is a bad idea,
 566         // because what's probably happening is that the subclass
 567         // isn't transliterating all the way to the end, and it should
 568         // in non-incremental mode.)
 569         if (!incremental && index.start != index.limit) {
 570             // We can't throw an exception, so just fudge things
 571             index.start = index.limit;
 572         }
 573
 574         // Cumulative delta for insertions/deletions
 575         delta += index.limit - limit;
 576
 577         if (incremental) {
 578             // In the incremental case, only allow subsequent
 579             // transliterators to modify what has already been
 580             // completely processed by prior transliterators.  In the
 581             // non-incrmental case, allow each transliterator to
 582             // process the entire text.
 583             index.limit = index.start;
 584         }
 585     }
 586
 587     compoundLimit += delta;
 588
 589     // Start is good where it is -- where the last transliterator left
 590     // it.  Limit needs to be put back where it was, modulo
 591     // adjustments for deletions/insertions.
 592     index.limit = compoundLimit;
 593 }
 594
 595 /**
 596  * Sets the length of the longest context required by this transliterator.
 597  * This is <em>preceding</em> context.
 598  */
 599 void CompoundTransliterator::computeMaximumContextLength(void) {
 600     int32_t max = 0;
 601     for (int32_t i=0; i<count; ++i) {
 602         int32_t len = trans[i]->getMaximumContextLength();
 603         if (len > max) {
 604             max = len;
 605         }
 606     }
 607     setMaximumContextLength(max);
 608 }
 609
 610 U_NAMESPACE_END
 611
 612 #endif /* #if !UCONFIG_NO_TRANSLITERATION */
 613
 614 /* eof */