i18npool/source/textconversion/textconversion_zh.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20
  21 #include <textconversion.hxx>
  22 #include <com/sun/star/i18n/TextConversionType.hpp>
  23 #include <com/sun/star/i18n/TextConversionOption.hpp>
  24 #include <com/sun/star/lang/NoSupportException.hpp>
  25 #include <com/sun/star/linguistic2/ConversionDirection.hpp>
  26 #include <com/sun/star/linguistic2/ConversionDictionaryType.hpp>
  27 #include <com/sun/star/linguistic2/ConversionDictionaryList.hpp>
  28 #include <memory>
  29
  30 using namespace com::sun::star::lang;
  31 using namespace com::sun::star::i18n;
  32 using namespace com::sun::star::linguistic2;
  33 using namespace com::sun::star::uno;
  34
  35
  36 namespace i18npool {
  37
  38 TextConversion_zh::TextConversion_zh( const Reference < XComponentContext >& xContext )
  39     : TextConversionService("com.sun.star.i18n.TextConversion_zh")
  40 {
  41     xCDL = ConversionDictionaryList::create(xContext);
  42 }
  43
  44 static sal_Unicode getOneCharConversion(sal_Unicode ch, const sal_Unicode* Data, const sal_uInt16* Index)
  45 {
  46     if (Data && Index) {
  47         sal_Unicode address = Index[ch>>8];
  48         if (address != 0xFFFF)
  49             address = Data[address + (ch & 0xFF)];
  50         return (address != 0xFFFF) ? address : ch;
  51     } else {
  52         return ch;
  53     }
  54 }
  55
  56 #ifdef DISABLE_DYNLOADING
  57
  58 extern "C" {
  59
  60 const sal_Unicode* getSTC_CharData_T2S();
  61 const sal_uInt16* getSTC_CharIndex_T2S();
  62 const sal_Unicode* getSTC_CharData_S2V();
  63 const sal_uInt16* getSTC_CharIndex_S2V();
  64 const sal_Unicode* getSTC_CharData_S2T();
  65 const sal_uInt16* getSTC_CharIndex_S2T();
  66
  67 const sal_Unicode *getSTC_WordData(sal_Int32&);
  68
  69 const sal_uInt16 *getSTC_WordIndex_T2S(sal_Int32&);
  70 const sal_uInt16 *getSTC_WordEntry_T2S();
  71 const sal_uInt16 *getSTC_WordIndex_S2T(sal_Int32&);
  72 const sal_uInt16 *getSTC_WordEntry_S2T();
  73
  74 }
  75
  76 #endif
  77
  78 OUString
  79 TextConversion_zh::getCharConversion(const OUString& aText, sal_Int32 nStartPos, sal_Int32 nLength, bool toSChinese, sal_Int32 nConversionOptions)
  80 {
  81     const sal_Unicode *Data;
  82     const sal_uInt16 *Index;
  83
  84 #ifndef DISABLE_DYNLOADING
  85     if (toSChinese) {
  86         Data = reinterpret_cast<const sal_Unicode* (*)()>(getFunctionBySymbol("getSTC_CharData_T2S"))();
  87         Index = reinterpret_cast<const sal_uInt16* (*)()>(getFunctionBySymbol("getSTC_CharIndex_T2S"))();
  88     } else if (nConversionOptions & TextConversionOption::USE_CHARACTER_VARIANTS) {
  89         Data = reinterpret_cast<const sal_Unicode* (*)()>(getFunctionBySymbol("getSTC_CharData_S2V"))();
  90         Index = reinterpret_cast<const sal_uInt16* (*)()>(getFunctionBySymbol("getSTC_CharIndex_S2V"))();
  91     } else {
  92         Data = reinterpret_cast<const sal_Unicode* (*)()>(getFunctionBySymbol("getSTC_CharData_S2T"))();
  93         Index = reinterpret_cast<const sal_uInt16* (*)()>(getFunctionBySymbol("getSTC_CharIndex_S2T"))();
  94     }
  95 #else
  96     if (toSChinese) {
  97         Data = getSTC_CharData_T2S();
  98         Index = getSTC_CharIndex_T2S();
  99     } else if (nConversionOptions & TextConversionOption::USE_CHARACTER_VARIANTS) {
 100         Data = getSTC_CharData_S2V();
 101         Index = getSTC_CharIndex_S2V();
 102     } else {
 103         Data = getSTC_CharData_S2T();
 104         Index = getSTC_CharIndex_S2T();
 105     }
 106 #endif
 107
 108     rtl_uString * newStr = rtl_uString_alloc(nLength);
 109     for (sal_Int32 i = 0; i < nLength; i++)
 110         newStr->buffer[i] =
 111             getOneCharConversion(aText[nStartPos+i], Data, Index);
 112     return OUString(newStr, SAL_NO_ACQUIRE); //take ownership
 113 }
 114
 115 OUString
 116 TextConversion_zh::getWordConversion(const OUString& aText, sal_Int32 nStartPos, sal_Int32 nLength, bool toSChinese, sal_Int32 nConversionOptions, Sequence<sal_Int32>& offset)
 117 {
 118     sal_Int32 dictLen = 0;
 119     sal_Int32 maxLen = 0;
 120     const sal_uInt16 *index;
 121     const sal_uInt16 *entry;
 122     const sal_Unicode *charData;
 123     const sal_uInt16 *charIndex;
 124     bool one2one=true;
 125
 126 #ifndef DISABLE_DYNLOADING
 127     const sal_Unicode *wordData = reinterpret_cast<const sal_Unicode* (*)(sal_Int32&)>(getFunctionBySymbol("getSTC_WordData"))(dictLen);
 128     if (toSChinese) {
 129         index = reinterpret_cast<const sal_uInt16* (*)(sal_Int32&)>(getFunctionBySymbol("getSTC_WordIndex_T2S"))(maxLen);
 130         entry = reinterpret_cast<const sal_uInt16* (*)()>(getFunctionBySymbol("getSTC_WordEntry_T2S"))();
 131         charData = reinterpret_cast<const sal_Unicode* (*)()>(getFunctionBySymbol("getSTC_CharData_T2S"))();
 132         charIndex = reinterpret_cast<const sal_uInt16* (*)()>(getFunctionBySymbol("getSTC_CharIndex_T2S"))();
 133     } else {
 134         index = reinterpret_cast<const sal_uInt16* (*)(sal_Int32&)>(getFunctionBySymbol("getSTC_WordIndex_S2T"))(maxLen);
 135         entry = reinterpret_cast<const sal_uInt16* (*)()>(getFunctionBySymbol("getSTC_WordEntry_S2T"))();
 136         if (nConversionOptions & TextConversionOption::USE_CHARACTER_VARIANTS) {
 137             charData = reinterpret_cast<const sal_Unicode* (*)()>(getFunctionBySymbol("getSTC_CharData_S2V"))();
 138             charIndex = reinterpret_cast<const sal_uInt16* (*)()>(getFunctionBySymbol("getSTC_CharIndex_S2V"))();
 139         } else {
 140             charData = reinterpret_cast<const sal_Unicode* (*)()>(getFunctionBySymbol("getSTC_CharData_S2T"))();
 141             charIndex = reinterpret_cast<const sal_uInt16* (*)()>(getFunctionBySymbol("getSTC_CharIndex_S2T"))();
 142         }
 143     }
 144 #else
 145     const sal_Unicode *wordData = getSTC_WordData(dictLen);
 146     if (toSChinese) {
 147         index = getSTC_WordIndex_T2S(maxLen);
 148         entry = getSTC_WordEntry_T2S();
 149         charData = getSTC_CharData_T2S();
 150         charIndex = getSTC_CharIndex_T2S();
 151     } else {
 152         index = getSTC_WordIndex_S2T(maxLen);
 153         entry = getSTC_WordEntry_S2T();
 154         if (nConversionOptions & TextConversionOption::USE_CHARACTER_VARIANTS) {
 155             charData = getSTC_CharData_S2V();
 156             charIndex = getSTC_CharIndex_S2V();
 157         } else {
 158             charData = getSTC_CharData_S2T();
 159             charIndex = getSTC_CharIndex_S2T();
 160         }
 161     }
 162 #endif
 163
 164     if ((!wordData || !index || !entry) && !xCDL.is()) // no word mapping defined, do char2char conversion.
 165         return getCharConversion(aText, nStartPos, nLength, toSChinese, nConversionOptions);
 166
 167     std::unique_ptr<sal_Unicode[]> newStr(new sal_Unicode[nLength * 2 + 1]);
 168     sal_Int32 currPos = 0, count = 0;
 169     while (currPos < nLength) {
 170         sal_Int32 len = nLength - currPos;
 171         bool found = false;
 172         if (len > maxLen)
 173             len = maxLen;
 174         for (; len > 0 && ! found; len--) {
 175             OUString word = aText.copy(nStartPos + currPos, len);
 176             sal_Int32 current = 0;
 177             // user dictionary
 178             if (xCDL.is()) {
 179                 Sequence < OUString > conversions;
 180                 try {
 181                     conversions = xCDL->queryConversions(word, 0, len,
 182                             aLocale, ConversionDictionaryType::SCHINESE_TCHINESE,
 183                             /*toSChinese ?*/ ConversionDirection_FROM_LEFT /*: ConversionDirection_FROM_RIGHT*/,
 184                             nConversionOptions);
 185                 }
 186                 catch ( NoSupportException & ) {
 187                     // clear reference (when there is no user dictionary) in order
 188                     // to not always have to catch this exception again
 189                     // in further calls. (save time)
 190                     xCDL = nullptr;
 191                 }
 192                 catch (...) {
 193                     // catch all other exceptions to allow
 194                     // querying the system dictionary in the next line
 195                 }
 196                 if (conversions.hasElements()) {
 197                     if (offset.hasElements()) {
 198                         if (word.getLength() != conversions[0].getLength())
 199                             one2one=false;
 200                         while (current < conversions[0].getLength()) {
 201                             offset[count] = nStartPos + currPos + (current *
 202                                     word.getLength() / conversions[0].getLength());
 203                             newStr[count++] = conversions[0][current++];
 204                         }
 205                         // offset[count-1] = nStartPos + currPos + word.getLength() - 1;
 206                     } else {
 207                         while (current < conversions[0].getLength())
 208                             newStr[count++] = conversions[0][current++];
 209                     }
 210                     currPos += word.getLength();
 211                     found = true;
 212                 }
 213             }
 214
 215             if (!found && index[len+1] - index[len] > 0) {
 216                 sal_Int32 bottom = static_cast<sal_Int32>(index[len]);
 217                 sal_Int32 top = static_cast<sal_Int32>(index[len+1]) - 1;
 218
 219                 while (bottom <= top && !found) {
 220                     current = (top + bottom) / 2;
 221                     const sal_Int32 result = word.compareTo(wordData + entry[current]);
 222                     if (result < 0)
 223                         top = current - 1;
 224                     else if (result > 0)
 225                         bottom = current + 1;
 226                     else {
 227                         if (toSChinese)   // Traditionary/Simplified conversion,
 228                             for (current = entry[current]-1; current > 0 && wordData[current-1]; current--) ;
 229                         else  // Simplified/Traditionary conversion, forwards search for next word
 230                             current = entry[current] + word.getLength() + 1;
 231                         sal_Int32 start=current;
 232                         if (offset.hasElements()) {
 233                             if (word.getLength() != OUString(&wordData[current]).getLength())
 234                                 one2one=false;
 235                             sal_Int32 convertedLength=OUString(&wordData[current]).getLength();
 236                             while (wordData[current]) {
 237                                 offset[count]=nStartPos + currPos + ((current-start) *
 238                                     word.getLength() / convertedLength);
 239                                 newStr[count++] = wordData[current++];
 240                             }
 241                             // offset[count-1]=nStartPos + currPos + word.getLength() - 1;
 242                         } else {
 243                             while (wordData[current])
 244                                 newStr[count++] = wordData[current++];
 245                         }
 246                         currPos += word.getLength();
 247                         found = true;
 248                     }
 249                 }
 250             }
 251         }
 252         if (!found) {
 253             if (offset.hasElements())
 254                 offset[count]=nStartPos+currPos;
 255             newStr[count++] =
 256                 getOneCharConversion(aText[nStartPos+currPos], charData, charIndex);
 257             currPos++;
 258         }
 259     }
 260     if (offset.hasElements())
 261         offset.realloc(one2one ? 0 : count);
 262     OUString aRet(newStr.get(), count);
 263     return aRet;
 264 }
 265
 266 TextConversionResult SAL_CALL
 267 TextConversion_zh::getConversions( const OUString& aText, sal_Int32 nStartPos, sal_Int32 nLength,
 268     const Locale& rLocale, sal_Int16 nConversionType, sal_Int32 nConversionOptions)
 269 {
 270     TextConversionResult result;
 271
 272     result.Candidates.realloc(1);
 273     result.Candidates[0] = getConversion( aText, nStartPos, nLength, rLocale, nConversionType, nConversionOptions);
 274     result.Boundary.startPos = nStartPos;
 275     result.Boundary.endPos = nStartPos + nLength;
 276
 277     return result;
 278 }
 279
 280 OUString SAL_CALL
 281 TextConversion_zh::getConversion( const OUString& aText, sal_Int32 nStartPos, sal_Int32 nLength,
 282     const Locale& rLocale, sal_Int16 nConversionType, sal_Int32 nConversionOptions)
 283 {
 284     if (rLocale.Language != "zh" || ( nConversionType != TextConversionType::TO_SCHINESE && nConversionType != TextConversionType::TO_TCHINESE) )
 285         throw NoSupportException(); // Conversion type is not supported in this service.
 286
 287     aLocale=rLocale;
 288     bool toSChinese = nConversionType == TextConversionType::TO_SCHINESE;
 289
 290     if (nConversionOptions & TextConversionOption::CHARACTER_BY_CHARACTER)
 291         // char to char dictionary
 292         return getCharConversion(aText, nStartPos, nLength, toSChinese, nConversionOptions);
 293     else {
 294         Sequence <sal_Int32> offset;
 295         // word to word dictionary
 296         return  getWordConversion(aText, nStartPos, nLength, toSChinese, nConversionOptions, offset);
 297     }
 298 }
 299
 300 OUString SAL_CALL
 301 TextConversion_zh::getConversionWithOffset( const OUString& aText, sal_Int32 nStartPos, sal_Int32 nLength,
 302     const Locale& rLocale, sal_Int16 nConversionType, sal_Int32 nConversionOptions, Sequence<sal_Int32>& offset)
 303 {
 304     if (rLocale.Language != "zh" || ( nConversionType != TextConversionType::TO_SCHINESE && nConversionType != TextConversionType::TO_TCHINESE) )
 305         throw NoSupportException(); // Conversion type is not supported in this service.
 306
 307     aLocale=rLocale;
 308     bool toSChinese = nConversionType == TextConversionType::TO_SCHINESE;
 309
 310     if (nConversionOptions & TextConversionOption::CHARACTER_BY_CHARACTER) {
 311         offset.realloc(0);
 312         // char to char dictionary
 313         return getCharConversion(aText, nStartPos, nLength, toSChinese, nConversionOptions);
 314     } else {
 315         if (offset.getLength() < 2*nLength)
 316             offset.realloc(2*nLength);
 317         // word to word dictionary
 318         return  getWordConversion(aText, nStartPos, nLength, toSChinese, nConversionOptions, offset);
 319     }
 320 }
 321
 322 sal_Bool SAL_CALL
 323 TextConversion_zh::interactiveConversion( const Locale& /*rLocale*/, sal_Int16 /*nTextConversionType*/, sal_Int32 /*nTextConversionOptions*/ )
 324 {
 325     return false;
 326 }
 327
 328 }
 329
 330 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */