272 lines
9.7 KiB
C++
272 lines
9.7 KiB
C++
/*
|
|
* @(#)ArabicShaping.cpp 1.10 00/03/15
|
|
*
|
|
* (C) Copyright IBM Corp. 1998-2003 - All Rights Reserved
|
|
*
|
|
*/
|
|
|
|
#include "LETypes.h"
|
|
#include "OpenTypeTables.h"
|
|
#include "ArabicShaping.h"
|
|
|
|
U_NAMESPACE_BEGIN
|
|
|
|
enum {
|
|
_c_ = ArabicShaping::ST_NOSHAPE_DUAL,
|
|
_d_ = ArabicShaping::ST_DUAL,
|
|
_n_ = ArabicShaping::ST_NONE,
|
|
_r_ = ArabicShaping::ST_RIGHT,
|
|
_t_ = ArabicShaping::ST_TRANSPARENT,
|
|
_x_ = ArabicShaping::ST_NOSHAPE_NONE
|
|
};
|
|
|
|
const ArabicShaping::ShapeType ArabicShaping::shapeTypes[] =
|
|
{
|
|
_n_, _r_, _r_, _r_, _r_, _d_, _r_, _d_, _r_, _d_, _d_, _d_, _d_, _d_, _r_, _r_, // 0x621 - 0x630
|
|
_r_, _r_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _x_, _x_, _x_, _x_, _x_, _c_, // 0x631 - 0x640
|
|
_d_, _d_, _d_, _d_, _d_, _d_, _d_, _r_, _d_, _d_, _t_, _t_, _t_, _t_, _t_, _t_, // 0x641 - 0x650
|
|
_t_, _t_, _t_, _t_, _t_, _x_, _x_, _x_, _x_, _x_, _x_, _x_, _x_, _x_, _x_, _n_, // 0x651 - 0x660
|
|
_n_, _n_, _n_, _n_, _n_, _n_, _n_, _n_, _n_, _n_, _n_, _n_, _n_, _x_, _x_, _t_, // 0x661 - 0x670
|
|
_r_, _r_, _r_, _x_, _r_, _r_, _r_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, // 0x671 - 0x680
|
|
_d_, _d_, _d_, _d_, _d_, _d_, _d_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, // 0x681 - 0x690
|
|
_r_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, // 0x691 - 0x6a0
|
|
_d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, _d_, // 0x6a1 - 0x6b0
|
|
_d_, _d_, _d_, _d_, _d_, _d_, _d_, _x_, _x_, _d_, _d_, _d_, _d_, _d_, _x_, _r_, // 0x6b1 - 0x6c0
|
|
_d_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, _r_, _d_, _r_, _d_, _x_, _d_, // 0x6c1 - 0x6d0
|
|
_d_, _r_, _r_, _x_, _x_, _t_, _t_, _t_, _t_, _t_, _t_, _t_, _t_, _t_, _t_, _t_, // 0x6d1 - 0x6e0
|
|
_t_, _t_, _t_, _t_, _n_, _n_, _t_, _t_, _n_, _t_, _t_, _t_, _t_, _x_, _x_, _n_, // 0x6e1 - 0x6f0
|
|
_n_, _n_, _n_, _n_, _n_, _n_, _n_, _n_, _n_, _x_, _x_, _x_, _x_, _x_, _x_ // 0x6f1 - 0x6ff
|
|
};
|
|
|
|
/*
|
|
shaping array holds types for arabic chars between 0621 and 0700
|
|
other values are either unshaped, or transparent if a mark or format
|
|
code, except for format codes 200c (zero-width non-joiner) and 200d
|
|
(dual-width joiner) which are both unshaped and non_joining or
|
|
dual-joining, respectively.
|
|
*/
|
|
ArabicShaping::ShapeType ArabicShaping::getShapeType(LEUnicode c)
|
|
{
|
|
if (c >= 0x0621 && c <= 0x206f) {
|
|
if (c < 0x0700) {
|
|
return shapeTypes[c - 0x0621];
|
|
} else if (c == 0x200c) { // ZWNJ
|
|
return ST_NOSHAPE_NONE;
|
|
} else if (c == 0x200d) { // ZWJ
|
|
return ST_NOSHAPE_DUAL;
|
|
} else if (c >= 0x202a && c <= 0x202e) { // LRE - RLO
|
|
return ST_TRANSPARENT;
|
|
} else if (c >= 0x206a && c <= 0x206f) { // Inhibit Symmetric Swapping - Nominal Digit Shapes
|
|
return ST_TRANSPARENT;
|
|
}
|
|
}
|
|
|
|
return ST_NOSHAPE_NONE;
|
|
}
|
|
|
|
const LETag isolFeatureTag = LE_ISOL_FEATURE_TAG;
|
|
const LETag initFeatureTag = LE_INIT_FEATURE_TAG;
|
|
const LETag mediFeatureTag = LE_MEDI_FEATURE_TAG;
|
|
const LETag finaFeatureTag = LE_FINA_FEATURE_TAG;
|
|
const LETag ligaFeatureTag = LE_LIGA_FEATURE_TAG;
|
|
const LETag msetFeatureTag = LE_MSET_FEATURE_TAG;
|
|
const LETag markFeatureTag = LE_MARK_FEATURE_TAG;
|
|
const LETag ccmpFeatureTag = LE_CCMP_FEATURE_TAG;
|
|
const LETag rligFeatureTag = LE_RLIG_FEATURE_TAG;
|
|
const LETag caltFeatureTag = LE_CALT_FEATURE_TAG;
|
|
const LETag dligFeatureTag = LE_DLIG_FEATURE_TAG;
|
|
const LETag cswhFeatureTag = LE_CSWH_FEATURE_TAG;
|
|
const LETag cursFeatureTag = LE_CURS_FEATURE_TAG;
|
|
const LETag kernFeatureTag = LE_KERN_FEATURE_TAG;
|
|
const LETag mkmkFeatureTag = LE_MKMK_FEATURE_TAG;
|
|
|
|
const LETag emptyTag = 0x00000000; // ''
|
|
|
|
const LETag featureOrder[] =
|
|
{
|
|
ccmpFeatureTag, isolFeatureTag, finaFeatureTag, mediFeatureTag, initFeatureTag, rligFeatureTag,
|
|
caltFeatureTag, ligaFeatureTag, dligFeatureTag, cswhFeatureTag, msetFeatureTag, cursFeatureTag,
|
|
kernFeatureTag, markFeatureTag, mkmkFeatureTag, emptyTag
|
|
};
|
|
|
|
const LETag GlyphShaper::tagArray[] =
|
|
{
|
|
isolFeatureTag, ligaFeatureTag, msetFeatureTag, markFeatureTag, ccmpFeatureTag, rligFeatureTag,
|
|
caltFeatureTag, dligFeatureTag, cswhFeatureTag, cursFeatureTag, kernFeatureTag, mkmkFeatureTag, emptyTag,
|
|
|
|
finaFeatureTag, ligaFeatureTag, msetFeatureTag, markFeatureTag, ccmpFeatureTag, rligFeatureTag,
|
|
caltFeatureTag, dligFeatureTag, cswhFeatureTag, cursFeatureTag, kernFeatureTag, mkmkFeatureTag, emptyTag,
|
|
|
|
initFeatureTag, ligaFeatureTag, msetFeatureTag, markFeatureTag, ccmpFeatureTag, rligFeatureTag,
|
|
caltFeatureTag, dligFeatureTag, cswhFeatureTag, cursFeatureTag, kernFeatureTag, mkmkFeatureTag, emptyTag,
|
|
|
|
mediFeatureTag, ligaFeatureTag, msetFeatureTag, markFeatureTag, ccmpFeatureTag, rligFeatureTag,
|
|
caltFeatureTag, dligFeatureTag, cswhFeatureTag, cursFeatureTag, kernFeatureTag, mkmkFeatureTag, emptyTag
|
|
};
|
|
|
|
#define TAGS_PER_GLYPH (sizeof GlyphShaper::tagArray / sizeof(LETag) / 4)
|
|
|
|
const LETag *ArabicShaping::getFeatureOrder()
|
|
{
|
|
return featureOrder;
|
|
}
|
|
|
|
void ArabicShaping::shape(const LEUnicode *chars, le_int32 offset, le_int32 charCount, le_int32 charMax,
|
|
le_bool rightToLeft, Shaper &shaper)
|
|
{
|
|
// iterate in logical order, store tags in visible order
|
|
//
|
|
// the effective right char is the most recently encountered
|
|
// non-transparent char
|
|
//
|
|
// four boolean states:
|
|
// the effective right char shapes
|
|
// the effective right char causes left shaping
|
|
// the current char shapes
|
|
// the current char causes right shaping
|
|
//
|
|
// if both cause shaping, then
|
|
// shaper.shape(errout, 2) (isolate to initial, or final to medial)
|
|
// shaper.shape(out, 1) (isolate to final)
|
|
|
|
ShapeType rightType = ST_NOSHAPE_NONE, leftType = ST_NOSHAPE_NONE;
|
|
le_int32 i;
|
|
|
|
for (i = offset - 1; i >= 0; i -= 1) {
|
|
rightType = getShapeType(chars[i]);
|
|
|
|
if (rightType != ST_TRANSPARENT) {
|
|
break;
|
|
}
|
|
}
|
|
|
|
for (i = offset + charCount; i < charMax; i += 1) {
|
|
leftType = getShapeType(chars[i]);
|
|
|
|
if (leftType != ST_TRANSPARENT) {
|
|
break;
|
|
}
|
|
}
|
|
|
|
// erout is effective right logical index
|
|
le_int32 erout = -1;
|
|
le_bool rightShapes = FALSE;
|
|
le_bool rightCauses = (rightType & MASK_SHAPE_LEFT) != 0;
|
|
le_int32 in, e, out = 0, dir = 1;
|
|
|
|
if (rightToLeft) {
|
|
out = charCount - 1;
|
|
erout = charCount;
|
|
dir = -1;
|
|
}
|
|
|
|
for (in = offset, e = offset + charCount; in < e; in += 1, out += dir) {
|
|
LEUnicode c = chars[in];
|
|
ShapeType t = getShapeType(c);
|
|
|
|
shaper.init(c, out, (t & (MASK_TRANSPARENT | MASK_NOSHAPE)) == 0);
|
|
|
|
if ((t & MASK_TRANSPARENT) != 0) {
|
|
continue;
|
|
}
|
|
|
|
le_bool curShapes = (t & MASK_NOSHAPE) == 0;
|
|
le_bool curCauses = (t & MASK_SHAPE_RIGHT) != 0;
|
|
|
|
if (rightCauses && curCauses) {
|
|
if (rightShapes) {
|
|
shaper.shape(erout, 2);
|
|
}
|
|
|
|
if (curShapes) {
|
|
shaper.shape(out, 1);
|
|
}
|
|
}
|
|
|
|
rightShapes = curShapes;
|
|
rightCauses = (t & MASK_SHAPE_LEFT) != 0;
|
|
erout = out;
|
|
}
|
|
|
|
if (rightShapes && rightCauses && (leftType & MASK_SHAPE_RIGHT) != 0) {
|
|
shaper.shape(erout, 2);
|
|
}
|
|
}
|
|
|
|
GlyphShaper::GlyphShaper(const LETag **outputTags)
|
|
{
|
|
charTags = outputTags;
|
|
}
|
|
|
|
GlyphShaper::~GlyphShaper()
|
|
{
|
|
// nothing to do
|
|
}
|
|
|
|
void GlyphShaper::init(LEUnicode /*ch*/, le_int32 outIndex, le_bool /*isloate*/)
|
|
{
|
|
charTags[outIndex] = tagArray;
|
|
}
|
|
|
|
void GlyphShaper::shape(le_int32 outIndex, le_int32 shapeOffset)
|
|
{
|
|
charTags[outIndex] = &charTags[outIndex][TAGS_PER_GLYPH * shapeOffset];
|
|
}
|
|
|
|
CharShaper::CharShaper(LEUnicode *outputChars)
|
|
{
|
|
chars = outputChars;
|
|
}
|
|
|
|
CharShaper::~CharShaper()
|
|
{
|
|
// nothing to do
|
|
}
|
|
|
|
void CharShaper::init(LEUnicode ch, le_int32 outIndex, le_bool isloate)
|
|
{
|
|
if (isloate) {
|
|
chars[outIndex] = getToIsolateShape(ch);
|
|
} else {
|
|
chars[outIndex] = ch;
|
|
}
|
|
}
|
|
|
|
void CharShaper::shape(le_int32 outIndex, le_int32 shapeOffset)
|
|
{
|
|
chars[outIndex] += (LEUnicode) shapeOffset;
|
|
}
|
|
|
|
const LEUnicode CharShaper::isolateShapes[] =
|
|
{
|
|
0xfe80, 0xfe81, 0xfe83, 0xfe85, 0xfe87, 0xfe89, 0xfe8d, 0xfe8f, 0xfe93, 0xfe95,
|
|
0xfe99, 0xfe9d, 0xfea1, 0xfea5, 0xfea9, 0xfeab, 0xfead, 0xfeaf, 0xfeb1, 0xfeb5,
|
|
0xfeb9, 0xfebd, 0xfec1, 0xfec5, 0xfec9, 0xfecd, 0x063b, 0x063c, 0x063d, 0x063e,
|
|
0x063f, 0x0640, 0xfed1, 0xfed5, 0xfed9, 0xfedd, 0xfee1, 0xfee5, 0xfee9, 0xfeed,
|
|
0xfeef, 0xfef1, 0x064b, 0x064c, 0x064d, 0x064e, 0x064f, 0x0650, 0x0651, 0x0652,
|
|
0x0653, 0x0654, 0x0655, 0x0656, 0x0657, 0x0658, 0x0659, 0x065a, 0x065b, 0x065c,
|
|
0x065d, 0x065e, 0x065f, 0x0660, 0x0661, 0x0662, 0x0663, 0x0664, 0x0665, 0x0666,
|
|
0x0667, 0x0668, 0x0669, 0x066a, 0x066b, 0x066c, 0x066d, 0x066e, 0x066f, 0x0670,
|
|
0xfb50, 0x0672, 0x0673, 0x0674, 0x0675, 0x0676, 0xfbdd, 0x0678, 0xfb66, 0xfb5e,
|
|
0xfb52, 0x067c, 0x067d, 0xfb56, 0xfb62, 0xfb5a, 0x0681, 0x0682, 0xfb76, 0xfb72,
|
|
0x0685, 0xfb7a, 0xfb7e, 0xfb88, 0x0689, 0x068a, 0x068b, 0xfb84, 0xfb82, 0xfb86,
|
|
0x068f, 0x0690, 0xfb8c, 0x0692, 0x0693, 0x0694, 0x0695, 0x0696, 0x0697, 0xfb8a,
|
|
0x0699, 0x069a, 0x069b, 0x069c, 0x069d, 0x069e, 0x069f, 0x06a0, 0x06a1, 0x06a2,
|
|
0x06a3, 0xfb6a, 0x06a5, 0xfb6e, 0x06a7, 0x06a8, 0xfb8e, 0x06aa, 0x06ab, 0x06ac,
|
|
0xfbd3, 0x06ae, 0xfb92, 0x06b0, 0xfb9a, 0x06b2, 0xfb96, 0x06b4, 0x06b5, 0x06b6,
|
|
0x06b7, 0x06b8, 0x06b9, 0xfb9e, 0xfba0, 0x06bc, 0x06bd, 0xfbaa, 0x06bf, 0xfba4,
|
|
0xfba6, 0x06c2, 0x06c3, 0x06c4, 0xfbe0, 0xfbd9, 0xfbd7, 0xfbdb, 0xfbe2, 0x06ca,
|
|
0xfbde, 0xfbfc, 0x06cd, 0x06ce, 0x06cf, 0xfbe4, 0x06d1, 0xfbae, 0xfbb0
|
|
};
|
|
|
|
LEUnicode CharShaper::getToIsolateShape(LEUnicode ch)
|
|
{
|
|
if (ch < 0x0621 || ch > 0x06d3) {
|
|
return ch;
|
|
}
|
|
|
|
return isolateShapes[ch - 0x0621];
|
|
}
|
|
|
|
U_NAMESPACE_END
|