usp10: Add Kannada script.

dlls/usp10/shape.c

@@ -51,6 +51,7 @@ static void ContextualShape_Gujarati(HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS
 static void ContextualShape_Oriya(HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, WCHAR* pwcChars, INT cChars, WORD* pwOutGlyphs, INT* pcGlyphs, INT cMaxGlyphs, WORD *pwLogClust);
 static void ContextualShape_Tamil(HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, WCHAR* pwcChars, INT cChars, WORD* pwOutGlyphs, INT* pcGlyphs, INT cMaxGlyphs, WORD *pwLogClust);
 static void ContextualShape_Telugu(HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, WCHAR* pwcChars, INT cChars, WORD* pwOutGlyphs, INT* pcGlyphs, INT cMaxGlyphs, WORD *pwLogClust);
+static void ContextualShape_Kannada(HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, WCHAR* pwcChars, INT cChars, WORD* pwOutGlyphs, INT* pcGlyphs, INT cMaxGlyphs, WORD *pwLogClust);
 
 typedef VOID (*ShapeCharGlyphPropProc)( HDC , ScriptCache*, SCRIPT_ANALYSIS*, const WCHAR*, const INT, const WORD*, const INT, WORD*, SCRIPT_CHARPROP*, SCRIPT_GLYPHPROP*);
 
@@ -66,6 +67,7 @@ static void ShapeCharGlyphProp_Gujarati( HDC hdc, ScriptCache *psc, SCRIPT_ANALY
 static void ShapeCharGlyphProp_Oriya( HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, const WCHAR* pwcChars, const INT cChars, const WORD* pwGlyphs, const INT cGlyphs, WORD *pwLogClust, SCRIPT_CHARPROP *pCharProp, SCRIPT_GLYPHPROP *pGlyphProp );
 static void ShapeCharGlyphProp_Tamil( HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, const WCHAR* pwcChars, const INT cChars, const WORD* pwGlyphs, const INT cGlyphs, WORD *pwLogClust, SCRIPT_CHARPROP *pCharProp, SCRIPT_GLYPHPROP *pGlyphProp );
 static void ShapeCharGlyphProp_Telugu( HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, const WCHAR* pwcChars, const INT cChars, const WORD* pwGlyphs, const INT cGlyphs, WORD *pwLogClust, SCRIPT_CHARPROP *pCharProp, SCRIPT_GLYPHPROP *pGlyphProp );
+static void ShapeCharGlyphProp_Kannada( HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, const WCHAR* pwcChars, const INT cChars, const WORD* pwGlyphs, const INT cGlyphs, WORD *pwLogClust, SCRIPT_CHARPROP *pCharProp, SCRIPT_GLYPHPROP *pGlyphProp );
 
 extern const unsigned short wine_shaping_table[];
 extern const unsigned short wine_shaping_forms[LAST_ARABIC_CHAR - FIRST_ARABIC_CHAR + 1][4];
@@ -680,6 +682,8 @@ static const ScriptShapeData ShapingData[] =
     {{ tamil_features, 12}, required_tamil_features, "taml", "tam2", ContextualShape_Tamil, ShapeCharGlyphProp_Tamil},
     {{ telugu_features, 15}, required_telugu_features, "telu", "tel2", ContextualShape_Telugu, ShapeCharGlyphProp_Telugu},
     {{ telugu_features, 15}, required_telugu_features, "telu", "tel2", ContextualShape_Telugu, ShapeCharGlyphProp_Telugu},
+    {{ telugu_features, 15}, required_telugu_features, "knda", "knd2", ContextualShape_Kannada, ShapeCharGlyphProp_Kannada},
+    {{ telugu_features, 15}, required_telugu_features, "knda", "knd2", ContextualShape_Kannada, ShapeCharGlyphProp_Kannada},
 };
 
 static INT GSUB_is_glyph_covered(LPCVOID table , UINT glyph)
@@ -1868,6 +1872,22 @@ static void Reorder_Ra_follows_mantra_post(LPWSTR pwChar, INT start, INT main, I
     }
 }
 
+static void Reorder_Ra_follows_syllable(LPWSTR pwChar, INT start, INT main, INT end, lexical_function lexical)
+{
+    if (start != main && end > start+1 && lexical(pwChar[start]) == lex_Ra && lexical(pwChar[start+1]) == lex_Halant)
+    {
+        int j;
+        WORD Ra = pwChar[start];
+        WORD H = pwChar[start+1];
+
+        TRACE("Doing reorder of Ra to %i\n",end-1);
+        for (j = start; j < end-1; j++)
+            pwChar[j] = pwChar[j+2];
+        pwChar[end-1] = Ra;
+        pwChar[end] = H;
+    }
+}
+
 static void Reorder_Mantra_precede_base(LPWSTR pwChar, INT start, INT main, INT end, lexical_function lexical)
 {
     int i;
@@ -1948,6 +1968,18 @@ static void Reorder_Like_Bengali(LPWSTR pwChar, INT start, INT main, INT end, le
     Reorder_Mantra_precede_syllable(pwChar, start, main, end, lexical);
 }
 
+static void Reorder_Like_Kannada(LPWSTR pwChar, INT start, INT main, INT end, lexical_function lexical)
+{
+    TRACE("Syllable (%i..%i..%i)\n",start,main,end);
+    if (start == main && main == end)  return;
+
+    main = Indic_FindBaseConsonant(pwChar, start, main, end, lexical);
+    if (lexical(pwChar[main]) == lex_Vowel) return;
+
+    Reorder_Ra_follows_syllable(pwChar, start, main, end, lexical);
+    Reorder_Mantra_precede_syllable(pwChar, start, main, end, lexical);
+}
+
 static int sinhala_lex(WCHAR c)
 {
     switch (c)
@@ -2458,6 +2490,67 @@ static void ContextualShape_Telugu(HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *p
     HeapFree(GetProcessHeap(),0,input);
 }
 
+static int kannada_lex(WCHAR c)
+{
+    switch (c)
+    {
+        case 0x0CB0: return lex_Ra;
+        case 0x0CBC: return lex_Nukta;
+        case 0x0CBE: return lex_Mantra_post;
+        case 0x0CBF: return lex_Mantra_above;
+        case 0x0CC6: return lex_Mantra_above;
+        case 0x0CCC: return lex_Mantra_above;
+        case 0x0CCD: return lex_Halant;
+        case 0x0CCE: return lex_Consonant;
+        case 0x200C: return lex_ZWNJ;
+        case 0x200D: return lex_ZWJ;
+        default:
+            if (c>=0x0C82 && c<=0x0C83) return lex_Modifier;
+            else if (c>=0x0C85 && c<=0x0C94) return lex_Vowel;
+            else if (c>=0x0C95 && c<=0x0CB9) return lex_Consonant;
+            else if (c>=0x0CC1 && c<=0x0CC4) return lex_Mantra_post;
+            else if (c>=0x0CD5 && c<=0x0CD6) return lex_Modifier;
+            else if (c>=0x0CE0 && c<=0x0CE1) return lex_Vowel;
+            else if (c>=0x0CE2 && c<=0x0CE3) return lex_Mantra_below;
+            else return lex_Generic;
+    }
+}
+
+static const VowelComponents Kannada_vowels[] = {
+            {0x0CC0, {0x0CBF,0x0CD5,0x0000}},
+            {0x0CC7, {0x0CC6,0x0CD5,0x0000}},
+            {0x0CC8, {0x0CC6,0x0CD6,0x0000}},
+            {0x0CCA, {0x0CC6,0x0CC2,0x0000}},
+            {0x0CCB, {0x0CC6,0x0CC2,0x0CD5}},
+            {0x0000, {0x0000,0x0000,0x0000}}};
+
+static void ContextualShape_Kannada(HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, WCHAR* pwcChars, INT cChars, WORD* pwOutGlyphs, INT* pcGlyphs, INT cMaxGlyphs, WORD *pwLogClust)
+{
+    int cCount = cChars;
+    WCHAR *input;
+
+    if (*pcGlyphs != cChars)
+    {
+        ERR("Number of Glyphs and Chars need to match at the beginning\n");
+        return;
+    }
+
+    input = HeapAlloc(GetProcessHeap(), 0, (cChars*3) * sizeof(WCHAR));
+    memcpy(input, pwcChars, cChars * sizeof(WCHAR));
+
+    /* Step 1: Decompose Vowels */
+    DecomposeVowels(hdc, input,  &cCount, Kannada_vowels);
+    TRACE("New composed string %s (%i)\n",debugstr_wn(input,cCount),cCount);
+
+    /* Step 2: Reorder within Syllables */
+    Indic_ReorderCharacters( input, cCount, kannada_lex, Reorder_Like_Kannada);
+    TRACE("reordered string %s\n",debugstr_wn(input,cCount));
+    GetGlyphIndicesW(hdc, input, cCount, pwOutGlyphs, 0);
+    *pcGlyphs = cCount;
+
+    HeapFree(GetProcessHeap(),0,input);
+}
+
 static void ShapeCharGlyphProp_Default( HDC hdc, ScriptCache* psc, SCRIPT_ANALYSIS* psa, const WCHAR* pwcChars, const INT cChars, const WORD* pwGlyphs, const INT cGlyphs, WORD* pwLogClust, SCRIPT_CHARPROP* pCharProp, SCRIPT_GLYPHPROP* pGlyphProp)
 {
     int i,k;
@@ -2851,6 +2944,11 @@ static void ShapeCharGlyphProp_Telugu( HDC hdc, ScriptCache *psc, SCRIPT_ANALYSI
     ShapeCharGlyphProp_BaseIndic(hdc, psc, psa, pwcChars, cChars, pwGlyphs, cGlyphs, pwLogClust, pCharProp, pGlyphProp, telugu_lex);
 }
 
+static void ShapeCharGlyphProp_Kannada( HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, const WCHAR* pwcChars, const INT cChars, const WORD* pwGlyphs, const INT cGlyphs, WORD *pwLogClust, SCRIPT_CHARPROP *pCharProp, SCRIPT_GLYPHPROP *pGlyphProp )
+{
+    ShapeCharGlyphProp_BaseIndic(hdc, psc, psa, pwcChars, cChars, pwGlyphs, cGlyphs, pwLogClust, pCharProp, pGlyphProp, kannada_lex);
+}
+
 void SHAPE_CharGlyphProp(HDC hdc, ScriptCache *psc, SCRIPT_ANALYSIS *psa, const WCHAR* pwcChars, const INT cChars, const WORD* pwGlyphs, const INT cGlyphs, WORD *pwLogClust, SCRIPT_CHARPROP *pCharProp, SCRIPT_GLYPHPROP *pGlyphProp)
 {
     if (ShapingData[psa->eScript].charGlyphPropProc)

dlls/usp10/tests/usp10.c

@@ -250,6 +250,11 @@ static void test_ScriptItemize( void )
     static const itemTest t171[2] = {{{0,0,0,0,0},0,0,0,0,telu_tag},{{0,0,0,0,0},6,0,0,0,-1}};
     static const itemTest t172[2] = {{{0,0,0,0,0},0,0,0,2,telu_tag},{{0,0,0,0,0},6,0,0,0,-1}};
 
+    /* Kannada */
+    static const WCHAR test18[] = {0x0c95, 0x0ca8, 0x0ccd, 0x0ca8, 0x0ca1};
+    static const itemTest t181[2] = {{{0,0,0,0,0},0,0,0,0,knda_tag},{{0,0,0,0,0},5,0,0,0,-1}};
+    static const itemTest t182[2] = {{{0,0,0,0,0},0,0,0,2,knda_tag},{{0,0,0,0,0},5,0,0,0,-1}};
+
     SCRIPT_ITEM items[15];
     SCRIPT_CONTROL  Control;
     SCRIPT_STATE    State;
@@ -299,6 +304,7 @@ static void test_ScriptItemize( void )
     test_items_ok(test15,5,NULL,NULL,1,t151,FALSE,0);
     test_items_ok(test16,5,NULL,NULL,1,t161,FALSE,0);
     test_items_ok(test17,6,NULL,NULL,1,t171,FALSE,0);
+    test_items_ok(test18,5,NULL,NULL,1,t181,FALSE,0);
 
     State.uBidiLevel = 0;
     test_items_ok(test1,4,&Control,&State,1,t11,FALSE,0);
@@ -322,6 +328,7 @@ static void test_ScriptItemize( void )
     test_items_ok(test15,5,&Control,&State,1,t151,FALSE,0);
     test_items_ok(test16,5,&Control,&State,1,t161,FALSE,0);
     test_items_ok(test17,6,&Control,&State,1,t171,FALSE,0);
+    test_items_ok(test18,5,&Control,&State,1,t181,FALSE,0);
 
     State.uBidiLevel = 1;
     test_items_ok(test1,4,&Control,&State,1,t12,FALSE,0);
@@ -345,6 +352,7 @@ static void test_ScriptItemize( void )
     test_items_ok(test15,5,&Control,&State,1,t152,FALSE,0);
     test_items_ok(test16,5,&Control,&State,1,t162,FALSE,0);
     test_items_ok(test17,6,&Control,&State,1,t172,FALSE,0);
+    test_items_ok(test18,5,&Control,&State,1,t182,FALSE,0);
 
     State.uBidiLevel = 1;
     Control.fMergeNeutralItems = TRUE;
@@ -369,6 +377,7 @@ static void test_ScriptItemize( void )
     test_items_ok(test15,5,&Control,&State,1,t152,FALSE,0);
     test_items_ok(test16,5,&Control,&State,1,t162,FALSE,0);
     test_items_ok(test17,6,&Control,&State,1,t172,FALSE,0);
+    test_items_ok(test18,5,&Control,&State,1,t182,FALSE,0);
 }
 
 static inline void _test_shape_ok(int valid, HDC hdc, LPCWSTR string,

dlls/usp10/usp10.c

@@ -91,6 +91,8 @@ static const scriptRange scriptRanges[] = {
     { Script_Tamil,      0xb80,  0xbff,  Script_Tamil_Numeric, 0},
     /* Telugu: U+0C00–U+0C7F */
     { Script_Telugu,     0xc00,  0xc7f,  Script_Telugu_Numeric, 0},
+    /* Kannada: U+0C80–U+0CFF */
+    { Script_Kannada,    0xc80,  0xcff,  Script_Kannada_Numeric, 0},
     /* Sinhala: U+0D80–U+0DFF */
     { Script_Sinhala,   0xd80,  0xdff,  0, 0},
     /* Thai: U+0E00–U+0E7F */
@@ -267,6 +269,12 @@ static const scriptData scriptInformation[] = {
     {{Script_Telugu_Numeric, 0, 0, 0, 0, 0, 0, { 0,0,0,0,0,0,0,0,0,0,0}},
      {LANG_TELUGU, 1, 1, 0, 0, DEFAULT_CHARSET, 0, 0, 0, 0, 0, 0, 0, 0, 0},
      MS_MAKE_TAG('t','e','l','u')},
+    {{Script_Kannada, 0, 0, 0, 0, 0, 0, { 0,0,0,0,0,0,0,0,0,0,0}},
+     {LANG_KANNADA, 0, 1, 0, 1, DEFAULT_CHARSET, 0, 0, 0, 0, 1, 0, 0, 0, 0},
+     MS_MAKE_TAG('k','n','d','a')},
+    {{Script_Kannada_Numeric, 0, 0, 0, 0, 0, 0, { 0,0,0,0,0,0,0,0,0,0,0}},
+     {LANG_KANNADA, 1, 1, 0, 0, DEFAULT_CHARSET, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+     MS_MAKE_TAG('k','n','d','a')},
 };
 
 static const SCRIPT_PROPERTIES *script_props[] =
@@ -290,7 +298,8 @@ static const SCRIPT_PROPERTIES *script_props[] =
     &scriptInformation[32].props, &scriptInformation[33].props,
     &scriptInformation[34].props, &scriptInformation[35].props,
     &scriptInformation[36].props, &scriptInformation[37].props,
-    &scriptInformation[38].props, &scriptInformation[39].props
+    &scriptInformation[38].props, &scriptInformation[39].props,
+    &scriptInformation[40].props, &scriptInformation[41].props
 };
 
 typedef struct {

dlls/usp10/usp10_internal.h

@@ -67,6 +67,8 @@
 #define Script_Tamil_Numeric 37
 #define Script_Telugu 38
 #define Script_Telugu_Numeric 39
+#define Script_Kannada 40
+#define Script_Kannada_Numeric 41
 
 #define GLYPH_BLOCK_SHIFT 8
 #define GLYPH_BLOCK_SIZE  (1UL << GLYPH_BLOCK_SHIFT)