src/hb-ot-shape-complex-arabic.cc

   1 /*
   2  * Copyright (C) 2010  Google, Inc.
   3  *
   4  *  This is part of HarfBuzz, a text shaping library.
   5  *
   6  * Permission is hereby granted, without written agreement and without
   7  * license or royalty fees, to use, copy, modify, and distribute this
   8  * software and its documentation for any purpose, provided that the
   9  * above copyright notice and the following two paragraphs appear in
  10  * all copies of this software.
  11  *
  12  * IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE TO ANY PARTY FOR
  13  * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
  14  * ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN
  15  * IF THE COPYRIGHT HOLDER HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
  16  * DAMAGE.
  17  *
  18  * THE COPYRIGHT HOLDER SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING,
  19  * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
  20  * FITNESS FOR A PARTICULAR PURPOSE.  THE SOFTWARE PROVIDED HEREUNDER IS
  21  * ON AN "AS IS" BASIS, AND THE COPYRIGHT HOLDER HAS NO OBLIGATION TO
  22  * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
  23  *
  24  * Google Author(s): Behdad Esfahbod
  25  */
  26
  27 #include "hb-ot-shape-complex-private.hh"
  28
  29 HB_BEGIN_DECLS
  30
  31
  32 /* buffer var allocations */
  33 #define arabic_shaping_action() var2.u32 /* arabic shaping action */
  34
  35
  36 /*
  37  * Bits used in the joining tables
  38  */
  39 enum {
  40   JOINING_TYPE_U                = 0,
  41   JOINING_TYPE_R                = 1,
  42   JOINING_TYPE_D                = 2,
  43   JOINING_TYPE_C                = JOINING_TYPE_D,
  44   JOINING_GROUP_ALAPH           = 3,
  45   JOINING_GROUP_DALATH_RISH     = 4,
  46   NUM_STATE_MACHINE_COLS        = 5,
  47
  48   /* We deliberately don't have a JOINING_TYPE_L since that's unused in Unicode. */
  49
  50   JOINING_TYPE_T = 6,
  51   JOINING_TYPE_X = 7  /* means: use general-category to choose between U or T. */
  52 };
  53
  54 /*
  55  * Joining types:
  56  */
  57
  58
  59 /* == Start of generated table == */
  60 /*
  61  * The following table is generated by running:
  62  *
  63  *   ./gen-arabic-joining-table.py < ArabicShaping.txt
  64  *
  65  * on the ArabicShaping.txt file with the header:
  66  *
  67  * # ArabicShaping-6.1.0.txt
  68  * # Date: 2010-11-09, 12:10:00 PST [KW]
  69  */
  70 #define JOINING_TABLE_FIRST     0x0600
  71 #define JOINING_TABLE_LAST      0x0858
  72 static const uint8_t joining_table[JOINING_TABLE_LAST-JOINING_TABLE_FIRST+2] =
  73 {
  74   JOINING_TYPE_U, /* 0600; ARABIC NUMBER SIGN; U; No_Joining_Group */
  75   JOINING_TYPE_U, /* 0601; ARABIC SIGN SANAH; U; No_Joining_Group */
  76   JOINING_TYPE_U, /* 0602; ARABIC FOOTNOTE MARKER; U; No_Joining_Group */
  77   JOINING_TYPE_U, /* 0603; ARABIC SIGN SAFHA; U; No_Joining_Group */
  78   JOINING_TYPE_X, /* 0604 */
  79   JOINING_TYPE_X, /* 0605 */
  80   JOINING_TYPE_X, /* 0606 */
  81   JOINING_TYPE_X, /* 0607 */
  82   JOINING_TYPE_U, /* 0608; ARABIC RAY; U; No_Joining_Group */
  83   JOINING_TYPE_X, /* 0609 */
  84   JOINING_TYPE_X, /* 060A */
  85   JOINING_TYPE_U, /* 060B; AFGHANI SIGN; U; No_Joining_Group */
  86   JOINING_TYPE_X, /* 060C */
  87   JOINING_TYPE_X, /* 060D */
  88   JOINING_TYPE_X, /* 060E */
  89   JOINING_TYPE_X, /* 060F */
  90   JOINING_TYPE_X, /* 0610 */
  91   JOINING_TYPE_X, /* 0611 */
  92   JOINING_TYPE_X, /* 0612 */
  93   JOINING_TYPE_X, /* 0613 */
  94   JOINING_TYPE_X, /* 0614 */
  95   JOINING_TYPE_X, /* 0615 */
  96   JOINING_TYPE_X, /* 0616 */
  97   JOINING_TYPE_X, /* 0617 */
  98   JOINING_TYPE_X, /* 0618 */
  99   JOINING_TYPE_X, /* 0619 */
 100   JOINING_TYPE_X, /* 061A */
 101   JOINING_TYPE_X, /* 061B */
 102   JOINING_TYPE_X, /* 061C */
 103   JOINING_TYPE_X, /* 061D */
 104   JOINING_TYPE_X, /* 061E */
 105   JOINING_TYPE_X, /* 061F */
 106   JOINING_TYPE_D, /* 0620; YEH WITH RING; D; YEH */
 107   JOINING_TYPE_U, /* 0621; HAMZA; U; No_Joining_Group */
 108   JOINING_TYPE_R, /* 0622; MADDA ON ALEF; R; ALEF */
 109   JOINING_TYPE_R, /* 0623; HAMZA ON ALEF; R; ALEF */
 110   JOINING_TYPE_R, /* 0624; HAMZA ON WAW; R; WAW */
 111   JOINING_TYPE_R, /* 0625; HAMZA UNDER ALEF; R; ALEF */
 112   JOINING_TYPE_D, /* 0626; HAMZA ON YEH; D; YEH */
 113   JOINING_TYPE_R, /* 0627; ALEF; R; ALEF */
 114   JOINING_TYPE_D, /* 0628; BEH; D; BEH */
 115   JOINING_TYPE_R, /* 0629; TEH MARBUTA; R; TEH MARBUTA */
 116   JOINING_TYPE_D, /* 062A; TEH; D; BEH */
 117   JOINING_TYPE_D, /* 062B; THEH; D; BEH */
 118   JOINING_TYPE_D, /* 062C; JEEM; D; HAH */
 119   JOINING_TYPE_D, /* 062D; HAH; D; HAH */
 120   JOINING_TYPE_D, /* 062E; KHAH; D; HAH */
 121   JOINING_TYPE_R, /* 062F; DAL; R; DAL */
 122   JOINING_TYPE_R, /* 0630; THAL; R; DAL */
 123   JOINING_TYPE_R, /* 0631; REH; R; REH */
 124   JOINING_TYPE_R, /* 0632; ZAIN; R; REH */
 125   JOINING_TYPE_D, /* 0633; SEEN; D; SEEN */
 126   JOINING_TYPE_D, /* 0634; SHEEN; D; SEEN */
 127   JOINING_TYPE_D, /* 0635; SAD; D; SAD */
 128   JOINING_TYPE_D, /* 0636; DAD; D; SAD */
 129   JOINING_TYPE_D, /* 0637; TAH; D; TAH */
 130   JOINING_TYPE_D, /* 0638; ZAH; D; TAH */
 131   JOINING_TYPE_D, /* 0639; AIN; D; AIN */
 132   JOINING_TYPE_D, /* 063A; GHAIN; D; AIN */
 133   JOINING_TYPE_D, /* 063B; KEHEH WITH 2 DOTS ABOVE; D; GAF */
 134   JOINING_TYPE_D, /* 063C; KEHEH WITH 3 DOTS BELOW; D; GAF */
 135   JOINING_TYPE_D, /* 063D; FARSI YEH WITH INVERTED V; D; FARSI YEH */
 136   JOINING_TYPE_D, /* 063E; FARSI YEH WITH 2 DOTS ABOVE; D; FARSI YEH */
 137   JOINING_TYPE_D, /* 063F; FARSI YEH WITH 3 DOTS ABOVE; D; FARSI YEH */
 138   JOINING_TYPE_C, /* 0640; TATWEEL; C; No_Joining_Group */
 139   JOINING_TYPE_D, /* 0641; FEH; D; FEH */
 140   JOINING_TYPE_D, /* 0642; QAF; D; QAF */
 141   JOINING_TYPE_D, /* 0643; KAF; D; KAF */
 142   JOINING_TYPE_D, /* 0644; LAM; D; LAM */
 143   JOINING_TYPE_D, /* 0645; MEEM; D; MEEM */
 144   JOINING_TYPE_D, /* 0646; NOON; D; NOON */
 145   JOINING_TYPE_D, /* 0647; HEH; D; HEH */
 146   JOINING_TYPE_R, /* 0648; WAW; R; WAW */
 147   JOINING_TYPE_D, /* 0649; ALEF MAKSURA; D; YEH */
 148   JOINING_TYPE_D, /* 064A; YEH; D; YEH */
 149   JOINING_TYPE_X, /* 064B */
 150   JOINING_TYPE_X, /* 064C */
 151   JOINING_TYPE_X, /* 064D */
 152   JOINING_TYPE_X, /* 064E */
 153   JOINING_TYPE_X, /* 064F */
 154   JOINING_TYPE_X, /* 0650 */
 155   JOINING_TYPE_X, /* 0651 */
 156   JOINING_TYPE_X, /* 0652 */
 157   JOINING_TYPE_X, /* 0653 */
 158   JOINING_TYPE_X, /* 0654 */
 159   JOINING_TYPE_X, /* 0655 */
 160   JOINING_TYPE_X, /* 0656 */
 161   JOINING_TYPE_X, /* 0657 */
 162   JOINING_TYPE_X, /* 0658 */
 163   JOINING_TYPE_X, /* 0659 */
 164   JOINING_TYPE_X, /* 065A */
 165   JOINING_TYPE_X, /* 065B */
 166   JOINING_TYPE_X, /* 065C */
 167   JOINING_TYPE_X, /* 065D */
 168   JOINING_TYPE_X, /* 065E */
 169   JOINING_TYPE_X, /* 065F */
 170   JOINING_TYPE_X, /* 0660 */
 171   JOINING_TYPE_X, /* 0661 */
 172   JOINING_TYPE_X, /* 0662 */
 173   JOINING_TYPE_X, /* 0663 */
 174   JOINING_TYPE_X, /* 0664 */
 175   JOINING_TYPE_X, /* 0665 */
 176   JOINING_TYPE_X, /* 0666 */
 177   JOINING_TYPE_X, /* 0667 */
 178   JOINING_TYPE_X, /* 0668 */
 179   JOINING_TYPE_X, /* 0669 */
 180   JOINING_TYPE_X, /* 066A */
 181   JOINING_TYPE_X, /* 066B */
 182   JOINING_TYPE_X, /* 066C */
 183   JOINING_TYPE_X, /* 066D */
 184   JOINING_TYPE_D, /* 066E; DOTLESS BEH; D; BEH */
 185   JOINING_TYPE_D, /* 066F; DOTLESS QAF; D; QAF */
 186   JOINING_TYPE_X, /* 0670 */
 187   JOINING_TYPE_R, /* 0671; HAMZAT WASL ON ALEF; R; ALEF */
 188   JOINING_TYPE_R, /* 0672; WAVY HAMZA ON ALEF; R; ALEF */
 189   JOINING_TYPE_R, /* 0673; WAVY HAMZA UNDER ALEF; R; ALEF */
 190   JOINING_TYPE_U, /* 0674; HIGH HAMZA; U; No_Joining_Group */
 191   JOINING_TYPE_R, /* 0675; HIGH HAMZA ALEF; R; ALEF */
 192   JOINING_TYPE_R, /* 0676; HIGH HAMZA WAW; R; WAW */
 193   JOINING_TYPE_R, /* 0677; HIGH HAMZA WAW WITH DAMMA; R; WAW */
 194   JOINING_TYPE_D, /* 0678; HIGH HAMZA YEH; D; YEH */
 195   JOINING_TYPE_D, /* 0679; TEH WITH SMALL TAH; D; BEH */
 196   JOINING_TYPE_D, /* 067A; TEH WITH 2 DOTS VERTICAL ABOVE; D; BEH */
 197   JOINING_TYPE_D, /* 067B; BEH WITH 2 DOTS VERTICAL BELOW; D; BEH */
 198   JOINING_TYPE_D, /* 067C; TEH WITH RING; D; BEH */
 199   JOINING_TYPE_D, /* 067D; TEH WITH 3 DOTS ABOVE DOWNWARD; D; BEH */
 200   JOINING_TYPE_D, /* 067E; TEH WITH 3 DOTS BELOW; D; BEH */
 201   JOINING_TYPE_D, /* 067F; TEH WITH 4 DOTS ABOVE; D; BEH */
 202   JOINING_TYPE_D, /* 0680; BEH WITH 4 DOTS BELOW; D; BEH */
 203   JOINING_TYPE_D, /* 0681; HAMZA ON HAH; D; HAH */
 204   JOINING_TYPE_D, /* 0682; HAH WITH 2 DOTS VERTICAL ABOVE; D; HAH */
 205   JOINING_TYPE_D, /* 0683; HAH WITH MIDDLE 2 DOTS; D; HAH */
 206   JOINING_TYPE_D, /* 0684; HAH WITH MIDDLE 2 DOTS VERTICAL; D; HAH */
 207   JOINING_TYPE_D, /* 0685; HAH WITH 3 DOTS ABOVE; D; HAH */
 208   JOINING_TYPE_D, /* 0686; HAH WITH MIDDLE 3 DOTS DOWNWARD; D; HAH */
 209   JOINING_TYPE_D, /* 0687; HAH WITH MIDDLE 4 DOTS; D; HAH */
 210   JOINING_TYPE_R, /* 0688; DAL WITH SMALL TAH; R; DAL */
 211   JOINING_TYPE_R, /* 0689; DAL WITH RING; R; DAL */
 212   JOINING_TYPE_R, /* 068A; DAL WITH DOT BELOW; R; DAL */
 213   JOINING_TYPE_R, /* 068B; DAL WITH DOT BELOW AND SMALL TAH; R; DAL */
 214   JOINING_TYPE_R, /* 068C; DAL WITH 2 DOTS ABOVE; R; DAL */
 215   JOINING_TYPE_R, /* 068D; DAL WITH 2 DOTS BELOW; R; DAL */
 216   JOINING_TYPE_R, /* 068E; DAL WITH 3 DOTS ABOVE; R; DAL */
 217   JOINING_TYPE_R, /* 068F; DAL WITH 3 DOTS ABOVE DOWNWARD; R; DAL */
 218   JOINING_TYPE_R, /* 0690; DAL WITH 4 DOTS ABOVE; R; DAL */
 219   JOINING_TYPE_R, /* 0691; REH WITH SMALL TAH; R; REH */
 220   JOINING_TYPE_R, /* 0692; REH WITH SMALL V; R; REH */
 221   JOINING_TYPE_R, /* 0693; REH WITH RING; R; REH */
 222   JOINING_TYPE_R, /* 0694; REH WITH DOT BELOW; R; REH */
 223   JOINING_TYPE_R, /* 0695; REH WITH SMALL V BELOW; R; REH */
 224   JOINING_TYPE_R, /* 0696; REH WITH DOT BELOW AND DOT ABOVE; R; REH */
 225   JOINING_TYPE_R, /* 0697; REH WITH 2 DOTS ABOVE; R; REH */
 226   JOINING_TYPE_R, /* 0698; REH WITH 3 DOTS ABOVE; R; REH */
 227   JOINING_TYPE_R, /* 0699; REH WITH 4 DOTS ABOVE; R; REH */
 228   JOINING_TYPE_D, /* 069A; SEEN WITH DOT BELOW AND DOT ABOVE; D; SEEN */
 229   JOINING_TYPE_D, /* 069B; SEEN WITH 3 DOTS BELOW; D; SEEN */
 230   JOINING_TYPE_D, /* 069C; SEEN WITH 3 DOTS BELOW AND 3 DOTS ABOVE; D; SEEN */
 231   JOINING_TYPE_D, /* 069D; SAD WITH 2 DOTS BELOW; D; SAD */
 232   JOINING_TYPE_D, /* 069E; SAD WITH 3 DOTS ABOVE; D; SAD */
 233   JOINING_TYPE_D, /* 069F; TAH WITH 3 DOTS ABOVE; D; TAH */
 234   JOINING_TYPE_D, /* 06A0; AIN WITH 3 DOTS ABOVE; D; AIN */
 235   JOINING_TYPE_D, /* 06A1; DOTLESS FEH; D; FEH */
 236   JOINING_TYPE_D, /* 06A2; FEH WITH DOT MOVED BELOW; D; FEH */
 237   JOINING_TYPE_D, /* 06A3; FEH WITH DOT BELOW; D; FEH */
 238   JOINING_TYPE_D, /* 06A4; FEH WITH 3 DOTS ABOVE; D; FEH */
 239   JOINING_TYPE_D, /* 06A5; FEH WITH 3 DOTS BELOW; D; FEH */
 240   JOINING_TYPE_D, /* 06A6; FEH WITH 4 DOTS ABOVE; D; FEH */
 241   JOINING_TYPE_D, /* 06A7; QAF WITH DOT ABOVE; D; QAF */
 242   JOINING_TYPE_D, /* 06A8; QAF WITH 3 DOTS ABOVE; D; QAF */
 243   JOINING_TYPE_D, /* 06A9; KEHEH; D; GAF */
 244   JOINING_TYPE_D, /* 06AA; SWASH KAF; D; SWASH KAF */
 245   JOINING_TYPE_D, /* 06AB; KAF WITH RING; D; GAF */
 246   JOINING_TYPE_D, /* 06AC; KAF WITH DOT ABOVE; D; KAF */
 247   JOINING_TYPE_D, /* 06AD; KAF WITH 3 DOTS ABOVE; D; KAF */
 248   JOINING_TYPE_D, /* 06AE; KAF WITH 3 DOTS BELOW; D; KAF */
 249   JOINING_TYPE_D, /* 06AF; GAF; D; GAF */
 250   JOINING_TYPE_D, /* 06B0; GAF WITH RING; D; GAF */
 251   JOINING_TYPE_D, /* 06B1; GAF WITH 2 DOTS ABOVE; D; GAF */
 252   JOINING_TYPE_D, /* 06B2; GAF WITH 2 DOTS BELOW; D; GAF */
 253   JOINING_TYPE_D, /* 06B3; GAF WITH 2 DOTS VERTICAL BELOW; D; GAF */
 254   JOINING_TYPE_D, /* 06B4; GAF WITH 3 DOTS ABOVE; D; GAF */
 255   JOINING_TYPE_D, /* 06B5; LAM WITH SMALL V; D; LAM */
 256   JOINING_TYPE_D, /* 06B6; LAM WITH DOT ABOVE; D; LAM */
 257   JOINING_TYPE_D, /* 06B7; LAM WITH 3 DOTS ABOVE; D; LAM */
 258   JOINING_TYPE_D, /* 06B8; LAM WITH 3 DOTS BELOW; D; LAM */
 259   JOINING_TYPE_D, /* 06B9; NOON WITH DOT BELOW; D; NOON */
 260   JOINING_TYPE_D, /* 06BA; DOTLESS NOON; D; NOON */
 261   JOINING_TYPE_D, /* 06BB; DOTLESS NOON WITH SMALL TAH; D; NOON */
 262   JOINING_TYPE_D, /* 06BC; NOON WITH RING; D; NOON */
 263   JOINING_TYPE_D, /* 06BD; NYA; D; NYA */
 264   JOINING_TYPE_D, /* 06BE; KNOTTED HEH; D; KNOTTED HEH */
 265   JOINING_TYPE_D, /* 06BF; HAH WITH MIDDLE 3 DOTS DOWNWARD AND DOT ABOVE; D; HAH */
 266   JOINING_TYPE_R, /* 06C0; HAMZA ON HEH; R; TEH MARBUTA */
 267   JOINING_TYPE_D, /* 06C1; HEH GOAL; D; HEH GOAL */
 268   JOINING_TYPE_D, /* 06C2; HAMZA ON HEH GOAL; D; HEH GOAL */
 269   JOINING_TYPE_R, /* 06C3; TEH MARBUTA GOAL; R; TEH MARBUTA GOAL */
 270   JOINING_TYPE_R, /* 06C4; WAW WITH RING; R; WAW */
 271   JOINING_TYPE_R, /* 06C5; WAW WITH BAR; R; WAW */
 272   JOINING_TYPE_R, /* 06C6; WAW WITH SMALL V; R; WAW */
 273   JOINING_TYPE_R, /* 06C7; WAW WITH DAMMA; R; WAW */
 274   JOINING_TYPE_R, /* 06C8; WAW WITH ALEF ABOVE; R; WAW */
 275   JOINING_TYPE_R, /* 06C9; WAW WITH INVERTED SMALL V; R; WAW */
 276   JOINING_TYPE_R, /* 06CA; WAW WITH 2 DOTS ABOVE; R; WAW */
 277   JOINING_TYPE_R, /* 06CB; WAW WITH 3 DOTS ABOVE; R; WAW */
 278   JOINING_TYPE_D, /* 06CC; FARSI YEH; D; FARSI YEH */
 279   JOINING_TYPE_R, /* 06CD; YEH WITH TAIL; R; YEH WITH TAIL */
 280   JOINING_TYPE_D, /* 06CE; FARSI YEH WITH SMALL V; D; FARSI YEH */
 281   JOINING_TYPE_R, /* 06CF; WAW WITH DOT ABOVE; R; WAW */
 282   JOINING_TYPE_D, /* 06D0; YEH WITH 2 DOTS VERTICAL BELOW; D; YEH */
 283   JOINING_TYPE_D, /* 06D1; YEH WITH 3 DOTS BELOW; D; YEH */
 284   JOINING_TYPE_R, /* 06D2; YEH BARREE; R; YEH BARREE */
 285   JOINING_TYPE_R, /* 06D3; HAMZA ON YEH BARREE; R; YEH BARREE */
 286   JOINING_TYPE_X, /* 06D4 */
 287   JOINING_TYPE_R, /* 06D5; AE; R; TEH MARBUTA */
 288   JOINING_TYPE_X, /* 06D6 */
 289   JOINING_TYPE_X, /* 06D7 */
 290   JOINING_TYPE_X, /* 06D8 */
 291   JOINING_TYPE_X, /* 06D9 */
 292   JOINING_TYPE_X, /* 06DA */
 293   JOINING_TYPE_X, /* 06DB */
 294   JOINING_TYPE_X, /* 06DC */
 295   JOINING_TYPE_U, /* 06DD; ARABIC END OF AYAH; U; No_Joining_Group */
 296   JOINING_TYPE_X, /* 06DE */
 297   JOINING_TYPE_X, /* 06DF */
 298   JOINING_TYPE_X, /* 06E0 */
 299   JOINING_TYPE_X, /* 06E1 */
 300   JOINING_TYPE_X, /* 06E2 */
 301   JOINING_TYPE_X, /* 06E3 */
 302   JOINING_TYPE_X, /* 06E4 */
 303   JOINING_TYPE_X, /* 06E5 */
 304   JOINING_TYPE_X, /* 06E6 */
 305   JOINING_TYPE_X, /* 06E7 */
 306   JOINING_TYPE_X, /* 06E8 */
 307   JOINING_TYPE_X, /* 06E9 */
 308   JOINING_TYPE_X, /* 06EA */
 309   JOINING_TYPE_X, /* 06EB */
 310   JOINING_TYPE_X, /* 06EC */
 311   JOINING_TYPE_X, /* 06ED */
 312   JOINING_TYPE_R, /* 06EE; DAL WITH INVERTED V; R; DAL */
 313   JOINING_TYPE_R, /* 06EF; REH WITH INVERTED V; R; REH */
 314   JOINING_TYPE_X, /* 06F0 */
 315   JOINING_TYPE_X, /* 06F1 */
 316   JOINING_TYPE_X, /* 06F2 */
 317   JOINING_TYPE_X, /* 06F3 */
 318   JOINING_TYPE_X, /* 06F4 */
 319   JOINING_TYPE_X, /* 06F5 */
 320   JOINING_TYPE_X, /* 06F6 */
 321   JOINING_TYPE_X, /* 06F7 */
 322   JOINING_TYPE_X, /* 06F8 */
 323   JOINING_TYPE_X, /* 06F9 */
 324   JOINING_TYPE_D, /* 06FA; SEEN WITH DOT BELOW AND 3 DOTS ABOVE; D; SEEN */
 325   JOINING_TYPE_D, /* 06FB; DAD WITH DOT BELOW; D; SAD */
 326   JOINING_TYPE_D, /* 06FC; GHAIN WITH DOT BELOW; D; AIN */
 327   JOINING_TYPE_X, /* 06FD */
 328   JOINING_TYPE_X, /* 06FE */
 329   JOINING_TYPE_D, /* 06FF; HEH WITH INVERTED V; D; KNOTTED HEH */
 330   JOINING_TYPE_X, /* 0700 */
 331   JOINING_TYPE_X, /* 0701 */
 332   JOINING_TYPE_X, /* 0702 */
 333   JOINING_TYPE_X, /* 0703 */
 334   JOINING_TYPE_X, /* 0704 */
 335   JOINING_TYPE_X, /* 0705 */
 336   JOINING_TYPE_X, /* 0706 */
 337   JOINING_TYPE_X, /* 0707 */
 338   JOINING_TYPE_X, /* 0708 */
 339   JOINING_TYPE_X, /* 0709 */
 340   JOINING_TYPE_X, /* 070A */
 341   JOINING_TYPE_X, /* 070B */
 342   JOINING_TYPE_X, /* 070C */
 343   JOINING_TYPE_X, /* 070D */
 344   JOINING_TYPE_X, /* 070E */
 345   JOINING_TYPE_X, /* 070F */
 346   JOINING_GROUP_ALAPH, /* 0710; ALAPH; R; ALAPH */
 347   JOINING_TYPE_X, /* 0711 */
 348   JOINING_TYPE_D, /* 0712; BETH; D; BETH */
 349   JOINING_TYPE_D, /* 0713; GAMAL; D; GAMAL */
 350   JOINING_TYPE_D, /* 0714; GAMAL GARSHUNI; D; GAMAL */
 351   JOINING_GROUP_DALATH_RISH, /* 0715; DALATH; R; DALATH RISH */
 352   JOINING_GROUP_DALATH_RISH, /* 0716; DOTLESS DALATH RISH; R; DALATH RISH */
 353   JOINING_TYPE_R, /* 0717; HE; R; HE */
 354   JOINING_TYPE_R, /* 0718; WAW; R; SYRIAC WAW */
 355   JOINING_TYPE_R, /* 0719; ZAIN; R; ZAIN */
 356   JOINING_TYPE_D, /* 071A; HETH; D; HETH */
 357   JOINING_TYPE_D, /* 071B; TETH; D; TETH */
 358   JOINING_TYPE_D, /* 071C; TETH GARSHUNI; D; TETH */
 359   JOINING_TYPE_D, /* 071D; YUDH; D; YUDH */
 360   JOINING_TYPE_R, /* 071E; YUDH HE; R; YUDH HE */
 361   JOINING_TYPE_D, /* 071F; KAPH; D; KAPH */
 362   JOINING_TYPE_D, /* 0720; LAMADH; D; LAMADH */
 363   JOINING_TYPE_D, /* 0721; MIM; D; MIM */
 364   JOINING_TYPE_D, /* 0722; NUN; D; NUN */
 365   JOINING_TYPE_D, /* 0723; SEMKATH; D; SEMKATH */
 366   JOINING_TYPE_D, /* 0724; FINAL SEMKATH; D; FINAL SEMKATH */
 367   JOINING_TYPE_D, /* 0725; E; D; E */
 368   JOINING_TYPE_D, /* 0726; PE; D; PE */
 369   JOINING_TYPE_D, /* 0727; REVERSED PE; D; REVERSED PE */
 370   JOINING_TYPE_R, /* 0728; SADHE; R; SADHE */
 371   JOINING_TYPE_D, /* 0729; QAPH; D; QAPH */
 372   JOINING_GROUP_DALATH_RISH, /* 072A; RISH; R; DALATH RISH */
 373   JOINING_TYPE_D, /* 072B; SHIN; D; SHIN */
 374   JOINING_TYPE_R, /* 072C; TAW; R; TAW */
 375   JOINING_TYPE_D, /* 072D; PERSIAN BHETH; D; BETH */
 376   JOINING_TYPE_D, /* 072E; PERSIAN GHAMAL; D; GAMAL */
 377   JOINING_GROUP_DALATH_RISH, /* 072F; PERSIAN DHALATH; R; DALATH RISH */
 378   JOINING_TYPE_X, /* 0730 */
 379   JOINING_TYPE_X, /* 0731 */
 380   JOINING_TYPE_X, /* 0732 */
 381   JOINING_TYPE_X, /* 0733 */
 382   JOINING_TYPE_X, /* 0734 */
 383   JOINING_TYPE_X, /* 0735 */
 384   JOINING_TYPE_X, /* 0736 */
 385   JOINING_TYPE_X, /* 0737 */
 386   JOINING_TYPE_X, /* 0738 */
 387   JOINING_TYPE_X, /* 0739 */
 388   JOINING_TYPE_X, /* 073A */
 389   JOINING_TYPE_X, /* 073B */
 390   JOINING_TYPE_X, /* 073C */
 391   JOINING_TYPE_X, /* 073D */
 392   JOINING_TYPE_X, /* 073E */
 393   JOINING_TYPE_X, /* 073F */
 394   JOINING_TYPE_X, /* 0740 */
 395   JOINING_TYPE_X, /* 0741 */
 396   JOINING_TYPE_X, /* 0742 */
 397   JOINING_TYPE_X, /* 0743 */
 398   JOINING_TYPE_X, /* 0744 */
 399   JOINING_TYPE_X, /* 0745 */
 400   JOINING_TYPE_X, /* 0746 */
 401   JOINING_TYPE_X, /* 0747 */
 402   JOINING_TYPE_X, /* 0748 */
 403   JOINING_TYPE_X, /* 0749 */
 404   JOINING_TYPE_X, /* 074A */
 405   JOINING_TYPE_X, /* 074B */
 406   JOINING_TYPE_X, /* 074C */
 407   JOINING_TYPE_R, /* 074D; SOGDIAN ZHAIN; R; ZHAIN */
 408   JOINING_TYPE_D, /* 074E; SOGDIAN KHAPH; D; KHAPH */
 409   JOINING_TYPE_D, /* 074F; SOGDIAN FE; D; FE */
 410   JOINING_TYPE_D, /* 0750; BEH WITH 3 DOTS HORIZONTALLY BELOW; D; BEH */
 411   JOINING_TYPE_D, /* 0751; BEH WITH DOT BELOW AND 3 DOTS ABOVE; D; BEH */
 412   JOINING_TYPE_D, /* 0752; BEH WITH 3 DOTS POINTING UPWARDS BELOW; D; BEH */
 413   JOINING_TYPE_D, /* 0753; BEH WITH 3 DOTS POINTING UPWARDS BELOW AND 2 DOTS ABOVE; D; BEH */
 414   JOINING_TYPE_D, /* 0754; BEH WITH 2 DOTS BELOW AND DOT ABOVE; D; BEH */
 415   JOINING_TYPE_D, /* 0755; BEH WITH INVERTED SMALL V BELOW; D; BEH */
 416   JOINING_TYPE_D, /* 0756; BEH WITH SMALL V; D; BEH */
 417   JOINING_TYPE_D, /* 0757; HAH WITH 2 DOTS ABOVE; D; HAH */
 418   JOINING_TYPE_D, /* 0758; HAH WITH 3 DOTS POINTING UPWARDS BELOW; D; HAH */
 419   JOINING_TYPE_R, /* 0759; DAL WITH 2 DOTS VERTICALLY BELOW AND SMALL TAH; R; DAL */
 420   JOINING_TYPE_R, /* 075A; DAL WITH INVERTED SMALL V BELOW; R; DAL */
 421   JOINING_TYPE_R, /* 075B; REH WITH STROKE; R; REH */
 422   JOINING_TYPE_D, /* 075C; SEEN WITH 4 DOTS ABOVE; D; SEEN */
 423   JOINING_TYPE_D, /* 075D; AIN WITH 2 DOTS ABOVE; D; AIN */
 424   JOINING_TYPE_D, /* 075E; AIN WITH 3 DOTS POINTING DOWNWARDS ABOVE; D; AIN */
 425   JOINING_TYPE_D, /* 075F; AIN WITH 2 DOTS VERTICALLY ABOVE; D; AIN */
 426   JOINING_TYPE_D, /* 0760; FEH WITH 2 DOTS BELOW; D; FEH */
 427   JOINING_TYPE_D, /* 0761; FEH WITH 3 DOTS POINTING UPWARDS BELOW; D; FEH */
 428   JOINING_TYPE_D, /* 0762; KEHEH WITH DOT ABOVE; D; GAF */
 429   JOINING_TYPE_D, /* 0763; KEHEH WITH 3 DOTS ABOVE; D; GAF */
 430   JOINING_TYPE_D, /* 0764; KEHEH WITH 3 DOTS POINTING UPWARDS BELOW; D; GAF */
 431   JOINING_TYPE_D, /* 0765; MEEM WITH DOT ABOVE; D; MEEM */
 432   JOINING_TYPE_D, /* 0766; MEEM WITH DOT BELOW; D; MEEM */
 433   JOINING_TYPE_D, /* 0767; NOON WITH 2 DOTS BELOW; D; NOON */
 434   JOINING_TYPE_D, /* 0768; NOON WITH SMALL TAH; D; NOON */
 435   JOINING_TYPE_D, /* 0769; NOON WITH SMALL V; D; NOON */
 436   JOINING_TYPE_D, /* 076A; LAM WITH BAR; D; LAM */
 437   JOINING_TYPE_R, /* 076B; REH WITH 2 DOTS VERTICALLY ABOVE; R; REH */
 438   JOINING_TYPE_R, /* 076C; REH WITH HAMZA ABOVE; R; REH */
 439   JOINING_TYPE_D, /* 076D; SEEN WITH 2 DOTS VERTICALLY ABOVE; D; SEEN */
 440   JOINING_TYPE_D, /* 076E; HAH WITH SMALL TAH BELOW; D; HAH */
 441   JOINING_TYPE_D, /* 076F; HAH WITH SMALL TAH AND 2 DOTS; D; HAH */
 442   JOINING_TYPE_D, /* 0770; SEEN WITH SMALL TAH AND 2 DOTS; D; SEEN */
 443   JOINING_TYPE_R, /* 0771; REH WITH SMALL TAH AND 2 DOTS; R; REH */
 444   JOINING_TYPE_D, /* 0772; HAH WITH SMALL TAH ABOVE; D; HAH */
 445   JOINING_TYPE_R, /* 0773; ALEF WITH DIGIT TWO ABOVE; R; ALEF */
 446   JOINING_TYPE_R, /* 0774; ALEF WITH DIGIT THREE ABOVE; R; ALEF */
 447   JOINING_TYPE_D, /* 0775; FARSI YEH WITH DIGIT TWO ABOVE; D; FARSI YEH */
 448   JOINING_TYPE_D, /* 0776; FARSI YEH WITH DIGIT THREE ABOVE; D; FARSI YEH */
 449   JOINING_TYPE_D, /* 0777; YEH WITH DIGIT FOUR BELOW; D; YEH */
 450   JOINING_TYPE_R, /* 0778; WAW WITH DIGIT TWO ABOVE; R; WAW */
 451   JOINING_TYPE_R, /* 0779; WAW WITH DIGIT THREE ABOVE; R; WAW */
 452   JOINING_TYPE_D, /* 077A; YEH BARREE WITH DIGIT TWO ABOVE; D; BURUSHASKI YEH BARREE */
 453   JOINING_TYPE_D, /* 077B; YEH BARREE WITH DIGIT THREE ABOVE; D; BURUSHASKI YEH BARREE */
 454   JOINING_TYPE_D, /* 077C; HAH WITH DIGIT FOUR BELOW; D; HAH */
 455   JOINING_TYPE_D, /* 077D; SEEN WITH DIGIT FOUR ABOVE; D; SEEN */
 456   JOINING_TYPE_D, /* 077E; SEEN WITH INVERTED V; D; SEEN */
 457   JOINING_TYPE_D, /* 077F; KAF WITH 2 DOTS ABOVE; D; KAF */
 458   JOINING_TYPE_X, /* 0780 */
 459   JOINING_TYPE_X, /* 0781 */
 460   JOINING_TYPE_X, /* 0782 */
 461   JOINING_TYPE_X, /* 0783 */
 462   JOINING_TYPE_X, /* 0784 */
 463   JOINING_TYPE_X, /* 0785 */
 464   JOINING_TYPE_X, /* 0786 */
 465   JOINING_TYPE_X, /* 0787 */
 466   JOINING_TYPE_X, /* 0788 */
 467   JOINING_TYPE_X, /* 0789 */
 468   JOINING_TYPE_X, /* 078A */
 469   JOINING_TYPE_X, /* 078B */
 470   JOINING_TYPE_X, /* 078C */
 471   JOINING_TYPE_X, /* 078D */
 472   JOINING_TYPE_X, /* 078E */
 473   JOINING_TYPE_X, /* 078F */
 474   JOINING_TYPE_X, /* 0790 */
 475   JOINING_TYPE_X, /* 0791 */
 476   JOINING_TYPE_X, /* 0792 */
 477   JOINING_TYPE_X, /* 0793 */
 478   JOINING_TYPE_X, /* 0794 */
 479   JOINING_TYPE_X, /* 0795 */
 480   JOINING_TYPE_X, /* 0796 */
 481   JOINING_TYPE_X, /* 0797 */
 482   JOINING_TYPE_X, /* 0798 */
 483   JOINING_TYPE_X, /* 0799 */
 484   JOINING_TYPE_X, /* 079A */
 485   JOINING_TYPE_X, /* 079B */
 486   JOINING_TYPE_X, /* 079C */
 487   JOINING_TYPE_X, /* 079D */
 488   JOINING_TYPE_X, /* 079E */
 489   JOINING_TYPE_X, /* 079F */
 490   JOINING_TYPE_X, /* 07A0 */
 491   JOINING_TYPE_X, /* 07A1 */
 492   JOINING_TYPE_X, /* 07A2 */
 493   JOINING_TYPE_X, /* 07A3 */
 494   JOINING_TYPE_X, /* 07A4 */
 495   JOINING_TYPE_X, /* 07A5 */
 496   JOINING_TYPE_X, /* 07A6 */
 497   JOINING_TYPE_X, /* 07A7 */
 498   JOINING_TYPE_X, /* 07A8 */
 499   JOINING_TYPE_X, /* 07A9 */
 500   JOINING_TYPE_X, /* 07AA */
 501   JOINING_TYPE_X, /* 07AB */
 502   JOINING_TYPE_X, /* 07AC */
 503   JOINING_TYPE_X, /* 07AD */
 504   JOINING_TYPE_X, /* 07AE */
 505   JOINING_TYPE_X, /* 07AF */
 506   JOINING_TYPE_X, /* 07B0 */
 507   JOINING_TYPE_X, /* 07B1 */
 508   JOINING_TYPE_X, /* 07B2 */
 509   JOINING_TYPE_X, /* 07B3 */
 510   JOINING_TYPE_X, /* 07B4 */
 511   JOINING_TYPE_X, /* 07B5 */
 512   JOINING_TYPE_X, /* 07B6 */
 513   JOINING_TYPE_X, /* 07B7 */
 514   JOINING_TYPE_X, /* 07B8 */
 515   JOINING_TYPE_X, /* 07B9 */
 516   JOINING_TYPE_X, /* 07BA */
 517   JOINING_TYPE_X, /* 07BB */
 518   JOINING_TYPE_X, /* 07BC */
 519   JOINING_TYPE_X, /* 07BD */
 520   JOINING_TYPE_X, /* 07BE */
 521   JOINING_TYPE_X, /* 07BF */
 522   JOINING_TYPE_X, /* 07C0 */
 523   JOINING_TYPE_X, /* 07C1 */
 524   JOINING_TYPE_X, /* 07C2 */
 525   JOINING_TYPE_X, /* 07C3 */
 526   JOINING_TYPE_X, /* 07C4 */
 527   JOINING_TYPE_X, /* 07C5 */
 528   JOINING_TYPE_X, /* 07C6 */
 529   JOINING_TYPE_X, /* 07C7 */
 530   JOINING_TYPE_X, /* 07C8 */
 531   JOINING_TYPE_X, /* 07C9 */
 532   JOINING_TYPE_D, /* 07CA; NKO A; D; No_Joining_Group */
 533   JOINING_TYPE_D, /* 07CB; NKO EE; D; No_Joining_Group */
 534   JOINING_TYPE_D, /* 07CC; NKO I; D; No_Joining_Group */
 535   JOINING_TYPE_D, /* 07CD; NKO E; D; No_Joining_Group */
 536   JOINING_TYPE_D, /* 07CE; NKO U; D; No_Joining_Group */
 537   JOINING_TYPE_D, /* 07CF; NKO OO; D; No_Joining_Group */
 538   JOINING_TYPE_D, /* 07D0; NKO O; D; No_Joining_Group */
 539   JOINING_TYPE_D, /* 07D1; NKO DAGBASINNA; D; No_Joining_Group */
 540   JOINING_TYPE_D, /* 07D2; NKO N; D; No_Joining_Group */
 541   JOINING_TYPE_D, /* 07D3; NKO BA; D; No_Joining_Group */
 542   JOINING_TYPE_D, /* 07D4; NKO PA; D; No_Joining_Group */
 543   JOINING_TYPE_D, /* 07D5; NKO TA; D; No_Joining_Group */
 544   JOINING_TYPE_D, /* 07D6; NKO JA; D; No_Joining_Group */
 545   JOINING_TYPE_D, /* 07D7; NKO CHA; D; No_Joining_Group */
 546   JOINING_TYPE_D, /* 07D8; NKO DA; D; No_Joining_Group */
 547   JOINING_TYPE_D, /* 07D9; NKO RA; D; No_Joining_Group */
 548   JOINING_TYPE_D, /* 07DA; NKO RRA; D; No_Joining_Group */
 549   JOINING_TYPE_D, /* 07DB; NKO SA; D; No_Joining_Group */
 550   JOINING_TYPE_D, /* 07DC; NKO GBA; D; No_Joining_Group */
 551   JOINING_TYPE_D, /* 07DD; NKO FA; D; No_Joining_Group */
 552   JOINING_TYPE_D, /* 07DE; NKO KA; D; No_Joining_Group */
 553   JOINING_TYPE_D, /* 07DF; NKO LA; D; No_Joining_Group */
 554   JOINING_TYPE_D, /* 07E0; NKO NA WOLOSO; D; No_Joining_Group */
 555   JOINING_TYPE_D, /* 07E1; NKO MA; D; No_Joining_Group */
 556   JOINING_TYPE_D, /* 07E2; NKO NYA; D; No_Joining_Group */
 557   JOINING_TYPE_D, /* 07E3; NKO NA; D; No_Joining_Group */
 558   JOINING_TYPE_D, /* 07E4; NKO HA; D; No_Joining_Group */
 559   JOINING_TYPE_D, /* 07E5; NKO WA; D; No_Joining_Group */
 560   JOINING_TYPE_D, /* 07E6; NKO YA; D; No_Joining_Group */
 561   JOINING_TYPE_D, /* 07E7; NKO NYA WOLOSO; D; No_Joining_Group */
 562   JOINING_TYPE_D, /* 07E8; NKO JONA JA; D; No_Joining_Group */
 563   JOINING_TYPE_D, /* 07E9; NKO JONA CHA; D; No_Joining_Group */
 564   JOINING_TYPE_D, /* 07EA; NKO JONA RA; D; No_Joining_Group */
 565   JOINING_TYPE_X, /* 07EB */
 566   JOINING_TYPE_X, /* 07EC */
 567   JOINING_TYPE_X, /* 07ED */
 568   JOINING_TYPE_X, /* 07EE */
 569   JOINING_TYPE_X, /* 07EF */
 570   JOINING_TYPE_X, /* 07F0 */
 571   JOINING_TYPE_X, /* 07F1 */
 572   JOINING_TYPE_X, /* 07F2 */
 573   JOINING_TYPE_X, /* 07F3 */
 574   JOINING_TYPE_X, /* 07F4 */
 575   JOINING_TYPE_X, /* 07F5 */
 576   JOINING_TYPE_X, /* 07F6 */
 577   JOINING_TYPE_X, /* 07F7 */
 578   JOINING_TYPE_X, /* 07F8 */
 579   JOINING_TYPE_X, /* 07F9 */
 580   JOINING_TYPE_C, /* 07FA; NKO LAJANYALAN; C; No_Joining_Group */
 581   JOINING_TYPE_X, /* 07FB */
 582   JOINING_TYPE_X, /* 07FC */
 583   JOINING_TYPE_X, /* 07FD */
 584   JOINING_TYPE_X, /* 07FE */
 585   JOINING_TYPE_X, /* 07FF */
 586   JOINING_TYPE_X, /* 0800 */
 587   JOINING_TYPE_X, /* 0801 */
 588   JOINING_TYPE_X, /* 0802 */
 589   JOINING_TYPE_X, /* 0803 */
 590   JOINING_TYPE_X, /* 0804 */
 591   JOINING_TYPE_X, /* 0805 */
 592   JOINING_TYPE_X, /* 0806 */
 593   JOINING_TYPE_X, /* 0807 */
 594   JOINING_TYPE_X, /* 0808 */
 595   JOINING_TYPE_X, /* 0809 */
 596   JOINING_TYPE_X, /* 080A */
 597   JOINING_TYPE_X, /* 080B */
 598   JOINING_TYPE_X, /* 080C */
 599   JOINING_TYPE_X, /* 080D */
 600   JOINING_TYPE_X, /* 080E */
 601   JOINING_TYPE_X, /* 080F */
 602   JOINING_TYPE_X, /* 0810 */
 603   JOINING_TYPE_X, /* 0811 */
 604   JOINING_TYPE_X, /* 0812 */
 605   JOINING_TYPE_X, /* 0813 */
 606   JOINING_TYPE_X, /* 0814 */
 607   JOINING_TYPE_X, /* 0815 */
 608   JOINING_TYPE_X, /* 0816 */
 609   JOINING_TYPE_X, /* 0817 */
 610   JOINING_TYPE_X, /* 0818 */
 611   JOINING_TYPE_X, /* 0819 */
 612   JOINING_TYPE_X, /* 081A */
 613   JOINING_TYPE_X, /* 081B */
 614   JOINING_TYPE_X, /* 081C */
 615   JOINING_TYPE_X, /* 081D */
 616   JOINING_TYPE_X, /* 081E */
 617   JOINING_TYPE_X, /* 081F */
 618   JOINING_TYPE_X, /* 0820 */
 619   JOINING_TYPE_X, /* 0821 */
 620   JOINING_TYPE_X, /* 0822 */
 621   JOINING_TYPE_X, /* 0823 */
 622   JOINING_TYPE_X, /* 0824 */
 623   JOINING_TYPE_X, /* 0825 */
 624   JOINING_TYPE_X, /* 0826 */
 625   JOINING_TYPE_X, /* 0827 */
 626   JOINING_TYPE_X, /* 0828 */
 627   JOINING_TYPE_X, /* 0829 */
 628   JOINING_TYPE_X, /* 082A */
 629   JOINING_TYPE_X, /* 082B */
 630   JOINING_TYPE_X, /* 082C */
 631   JOINING_TYPE_X, /* 082D */
 632   JOINING_TYPE_X, /* 082E */
 633   JOINING_TYPE_X, /* 082F */
 634   JOINING_TYPE_X, /* 0830 */
 635   JOINING_TYPE_X, /* 0831 */
 636   JOINING_TYPE_X, /* 0832 */
 637   JOINING_TYPE_X, /* 0833 */
 638   JOINING_TYPE_X, /* 0834 */
 639   JOINING_TYPE_X, /* 0835 */
 640   JOINING_TYPE_X, /* 0836 */
 641   JOINING_TYPE_X, /* 0837 */
 642   JOINING_TYPE_X, /* 0838 */
 643   JOINING_TYPE_X, /* 0839 */
 644   JOINING_TYPE_X, /* 083A */
 645   JOINING_TYPE_X, /* 083B */
 646   JOINING_TYPE_X, /* 083C */
 647   JOINING_TYPE_X, /* 083D */
 648   JOINING_TYPE_X, /* 083E */
 649   JOINING_TYPE_X, /* 083F */
 650   JOINING_TYPE_R, /* 0840; MANDAIC HALQA; R; No_Joining_Group */
 651   JOINING_TYPE_D, /* 0841; MANDAIC AB; D; No_Joining_Group */
 652   JOINING_TYPE_D, /* 0842; MANDAIC AG; D; No_Joining_Group */
 653   JOINING_TYPE_D, /* 0843; MANDAIC AD; D; No_Joining_Group */
 654   JOINING_TYPE_D, /* 0844; MANDAIC AH; D; No_Joining_Group */
 655   JOINING_TYPE_D, /* 0845; MANDAIC USHENNA; D; No_Joining_Group */
 656   JOINING_TYPE_R, /* 0846; MANDAIC AZ; R; No_Joining_Group */
 657   JOINING_TYPE_D, /* 0847; MANDAIC IT; D; No_Joining_Group */
 658   JOINING_TYPE_D, /* 0848; MANDAIC ATT; D; No_Joining_Group */
 659   JOINING_TYPE_R, /* 0849; MANDAIC AKSA; R; No_Joining_Group */
 660   JOINING_TYPE_D, /* 084A; MANDAIC AK; D; No_Joining_Group */
 661   JOINING_TYPE_D, /* 084B; MANDAIC AL; D; No_Joining_Group */
 662   JOINING_TYPE_D, /* 084C; MANDAIC AM; D; No_Joining_Group */
 663   JOINING_TYPE_D, /* 084D; MANDAIC AN; D; No_Joining_Group */
 664   JOINING_TYPE_D, /* 084E; MANDAIC AS; D; No_Joining_Group */
 665   JOINING_TYPE_R, /* 084F; MANDAIC IN; R; No_Joining_Group */
 666   JOINING_TYPE_D, /* 0850; MANDAIC AP; D; No_Joining_Group */
 667   JOINING_TYPE_D, /* 0851; MANDAIC ASZ; D; No_Joining_Group */
 668   JOINING_TYPE_D, /* 0852; MANDAIC AQ; D; No_Joining_Group */
 669   JOINING_TYPE_D, /* 0853; MANDAIC AR; D; No_Joining_Group */
 670   JOINING_TYPE_R, /* 0854; MANDAIC ASH; R; No_Joining_Group */
 671   JOINING_TYPE_D, /* 0855; MANDAIC AT; D; No_Joining_Group */
 672   JOINING_TYPE_U, /* 0856; MANDAIC DUSHENNA; U; No_Joining_Group */
 673   JOINING_TYPE_U, /* 0857; MANDAIC KAD; U; No_Joining_Group */
 674   JOINING_TYPE_U, /* 0858; MANDAIC AIN; U; No_Joining_Group */
 675   JOINING_TYPE_X  /* dummy */
 676 };
 677 /* == End of generated table == */
 678
 679 static unsigned int get_joining_type (hb_codepoint_t u, hb_category_t gen_cat)
 680 {
 681   /* TODO Macroize the magic bit operations */
 682
 683   if (likely (JOINING_TABLE_FIRST <= u && u <= JOINING_TABLE_LAST)) {
 684     unsigned int j_type = joining_table[u - JOINING_TABLE_FIRST];
 685     if (likely (j_type != JOINING_TYPE_X))
 686       return j_type;
 687   }
 688
 689   if (unlikely ((u & ~(0x200C^0x200D)) == 0x200C)) {
 690     return u == 0x200C ? JOINING_TYPE_U : JOINING_TYPE_C;
 691   }
 692
 693   return ((1<<gen_cat) & ((1<<HB_CATEGORY_NON_SPACING_MARK)|(1<<HB_CATEGORY_ENCLOSING_MARK)|(1<<HB_CATEGORY_FORMAT))) ?
 694          JOINING_TYPE_T : JOINING_TYPE_U;
 695 }
 696
 697
 698
 699 static const hb_tag_t arabic_syriac_features[] =
 700 {
 701   HB_TAG('i','n','i','t'),
 702   HB_TAG('m','e','d','i'),
 703   HB_TAG('f','i','n','a'),
 704   HB_TAG('i','s','o','l'),
 705   /* Syriac */
 706   HB_TAG('m','e','d','2'),
 707   HB_TAG('f','i','n','2'),
 708   HB_TAG('f','i','n','3'),
 709   HB_TAG_NONE
 710 };
 711
 712
 713 /* Same order as the feature array */
 714 enum {
 715   INIT,
 716   MEDI,
 717   FINA,
 718   ISOL,
 719
 720   /* Syriac */
 721   MED2,
 722   FIN2,
 723   FIN3,
 724
 725   NONE,
 726
 727   COMMON_NUM_FEATURES = 4,
 728   SYRIAC_NUM_FEATURES = 7,
 729   TOTAL_NUM_FEATURES = NONE
 730 };
 731
 732 static const struct arabic_state_table_entry {
 733         uint8_t prev_action;
 734         uint8_t curr_action;
 735         uint8_t next_state;
 736         uint8_t padding;
 737 } arabic_state_table[][NUM_STATE_MACHINE_COLS] =
 738 {
 739   /*   jt_U,          jt_R,          jt_D,          jg_ALAPH,      jg_DALATH_RISH */
 740
 741   /* State 0: prev was U, not willing to join. */
 742   { {NONE,NONE,0}, {NONE,ISOL,1}, {NONE,ISOL,2}, {NONE,ISOL,1}, {NONE,ISOL,6}, },
 743
 744   /* State 1: prev was R or ISOL/ALAPH, not willing to join. */
 745   { {NONE,NONE,0}, {NONE,ISOL,1}, {NONE,ISOL,2}, {NONE,FIN2,5}, {NONE,ISOL,6}, },
 746
 747   /* State 2: prev was D/ISOL, willing to join. */
 748   { {NONE,NONE,0}, {INIT,FINA,1}, {INIT,FINA,3}, {INIT,FINA,4}, {INIT,FINA,6}, },
 749
 750   /* State 3: prev was D/FINA, willing to join. */
 751   { {NONE,NONE,0}, {MEDI,FINA,1}, {MEDI,FINA,3}, {MEDI,FINA,4}, {MEDI,FINA,6}, },
 752
 753   /* State 4: prev was FINA ALAPH, not willing to join. */
 754   { {NONE,NONE,0}, {MED2,ISOL,1}, {MED2,ISOL,2}, {MED2,FIN2,5}, {MED2,ISOL,6}, },
 755
 756   /* State 5: prev was FIN2/FIN3 ALAPH, not willing to join. */
 757   { {NONE,NONE,0}, {ISOL,ISOL,1}, {ISOL,ISOL,2}, {ISOL,FIN2,5}, {ISOL,ISOL,6}, },
 758
 759   /* State 6: prev was DALATH/RISH, not willing to join. */
 760   { {NONE,NONE,0}, {NONE,ISOL,1}, {NONE,ISOL,2}, {NONE,FIN3,5}, {NONE,ISOL,6}, }
 761 };
 762
 763
 764
 765 void
 766 _hb_ot_shape_complex_collect_features_arabic    (hb_ot_shape_plan_t *plan, const hb_segment_properties_t  *props)
 767 {
 768   unsigned int num_features = props->script == HB_SCRIPT_SYRIAC ? SYRIAC_NUM_FEATURES : COMMON_NUM_FEATURES;
 769   for (unsigned int i = 0; i < num_features; i++)
 770     plan->map.add_bool_feature (arabic_syriac_features[i], false);
 771 }
 772
 773 void
 774 _hb_ot_shape_complex_setup_masks_arabic (hb_ot_shape_context_t *c)
 775 {
 776   unsigned int count = c->buffer->len;
 777   unsigned int prev = 0, state = 0;
 778
 779   for (unsigned int i = 0; i < count; i++)
 780   {
 781     unsigned int this_type = get_joining_type (c->buffer->info[i].codepoint, (hb_category_t) c->buffer->info[i].general_category());
 782
 783     if (unlikely (this_type == JOINING_TYPE_T)) {
 784       c->buffer->info[i].arabic_shaping_action() = NONE;
 785       continue;
 786     }
 787
 788     const arabic_state_table_entry *entry = &arabic_state_table[state][this_type];
 789
 790     if (entry->prev_action != NONE)
 791       c->buffer->info[prev].arabic_shaping_action() = entry->prev_action;
 792
 793     c->buffer->info[i].arabic_shaping_action() = entry->curr_action;
 794
 795     prev = i;
 796     state = entry->next_state;
 797   }
 798
 799   hb_mask_t mask_array[TOTAL_NUM_FEATURES + 1] = {0};
 800   unsigned int num_masks = c->buffer->props.script == HB_SCRIPT_SYRIAC ? SYRIAC_NUM_FEATURES : COMMON_NUM_FEATURES;
 801   for (unsigned int i = 0; i < num_masks; i++)
 802     mask_array[i] = c->plan->map.get_1_mask (arabic_syriac_features[i]);
 803
 804   for (unsigned int i = 0; i < count; i++)
 805     c->buffer->info[i].mask |= mask_array[c->buffer->info[i].arabic_shaping_action()];
 806 }
 807
 808
 809 HB_END_DECLS