ARAB.flt

   1 ;; ARAB.flt -- Font Layout Table for Arabic font (Unicode encoding)
   2 ;; Copyright (C) 2003, 2004
   3 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
   4 ;;   Registration Number H15PRO112
   5
   6 ;; This file is part of the m17n database; a sub-part of the m17n
   7 ;; library.
   8
   9 ;; The m17n library is free software; you can redistribute it and/or
  10 ;; modify it under the terms of the GNU Lesser General Public License
  11 ;; as published by the Free Software Foundation; either version 2.1 of
  12 ;; the License, or (at your option) any later version.
  13
  14 ;; The m17n library is distributed in the hope that it will be useful,
  15 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  16 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17 ;; Lesser General Public License for more details.
  18
  19 ;; You should have received a copy of the GNU Lesser General Public
  20 ;; License along with the m17n library; if not, write to the Free
  21 ;; Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  22 ;; 02111-1307, USA.
  23
  24 ;;; <li> ARAB.flt
  25 ;;;
  26 ;;; For Arabic fonts of Unicode encoding to draw Arabic script.
  27
  28 ;; phase 1: Kazakh high hamza
  29 (category
  30  (0x0600 0x06FF         ?x)
  31  (0x0675 0x0678         ?p)
  32  (0x0643                ?n)
  33  (0x06AF                ?n)
  34  (0x06D5                ?n)
  35  (0x200C                ?x)
  36  (0x200D                ?x)
  37  (0xFB50 0xFDFF         ?x)             ; Arabic Presentation Froms-A
  38  (0xFE70 0xFEFC         ?x)             ; Arabic Presentation Froms-B
  39  )
  40
  41 (generator
  42  (0
  43   (cond
  44    (".*p.*"
  45     (cond
  46      (".*n.*"
  47       rmhamza *)
  48      ("(.)(.*)"
  49       (1 < 0x0674 rmhamza >)
  50       (2 rmhamza *))))
  51    (0 = *)))
  52
  53  (rmhamza
  54   (cond
  55    ((0x0675)    0x0627)
  56    ((0x0676)    0x0648)
  57    ((0x0677)    0x06C7)
  58    ((0x0678)    0x0649)
  59    ("."         =))))
  60
  61 ;; phase 2: ligatures
  62 (category
  63  (0x0600 0x06FF         ?x)             ; general
  64  (0x0622                ?a)             ; alef madda
  65  (0x0623                ?b)             ; alef hamza above
  66  (0x0625                ?c)             ; alef hamza below
  67  (0x0627                ?d)             ; alef
  68  (0x0644                ?l)             ; lam
  69  (0x064B 0x0655         ?t)             ; combinings
  70  (0x0670                ?t)             ; combining
  71  (0x06D6 0x06ED         ?t)             ; combinings
  72  (0x06E5                ?x)
  73  (0x06E6                ?x)
  74  (0x06E9                ?x)
  75  (0x200C                ?x)
  76  (0x200D                ?x)
  77  (0xFB50 0xFDFF         ?x)
  78  (0xFE70 0xFEFC         ?x)
  79  )
  80
  81 (generator
  82  (0
  83   (cond
  84    ("l(t*)a(t*)"
  85     0xFEF5
  86     (1 = *)
  87     (2 = *))
  88    ("l(t*)b(t*)"
  89     0xFEF7
  90     (1 = *)
  91     (2 = *))
  92    ("l(t*)c(t*)"
  93     0xFEF9
  94     (1 = *)
  95     (2 = *))
  96    ("l(t*)d(t*)"
  97     0xFEFB
  98     (1 = *)
  99     (2 = *))
 100    ("."
 101     =))
 102   *))
 103
 104 ;; phase 3: joining
 105 (category
 106  ;; D: Dual-joining (beh, teh, etc. & zwj)
 107  ;; R: Right-joining (alef, dal, thal, reh, zain)
 108  ;; U: Non-joining (Hamza, etc. & zwnj)
 109  ;; T: Transparent (combining marks)
 110  ;; P: Already in Arabic Presentation Form A & B
 111  (0x060C 0x060F         ?U)
 112  (0x0610 0x0615         ?T)
 113  (0x061B                ?U)
 114  (0x061F                ?U)
 115  (0x0621                ?U)
 116  (0x0622 0x0623         ?R)
 117  (0x0624                ?R)
 118  (0x0625                ?R)
 119  (0x0626                ?D)
 120  (0x0627                ?R)
 121  (0x0628                ?D)
 122  (0x0629                ?R)
 123  (0x062A 0x062E         ?D)
 124  (0x062F 0x0632         ?R)
 125  (0x0633 0x0647         ?D)
 126  (0x0648                ?R)
 127  (0x0649 0x064A         ?D)
 128  (0x064B 0x0658         ?T)
 129  (0x0660 0x066D         ?U)
 130  (0x066E 0x066F         ?D)
 131  (0x0670                ?T)
 132  (0x0671 0x0673         ?R)
 133  (0x0674 0x0678         ?U)
 134  (0x0679 0x0687         ?D)
 135  (0x0688 0x0699         ?R)
 136  (0x069A 0x06C3         ?D)
 137  (0x06C4 0x06CB         ?R)
 138  (0x06CC 0x06CE         ?D)
 139  (0x06CF                ?R)
 140  (0x06D0 0x06D3         ?D)
 141  (0x06D4                ?U)
 142  (0x06D5                ?R)
 143  (0x06D6 0x06E4         ?T)
 144  (0x06E5 0x06E6         ?U)
 145  (0x06E7 0x06E8         ?T)
 146  (0x06E9                ?U)
 147  (0x06EA 0x06ED         ?T)
 148  (0x06EE 0x06EF         ?R)
 149  (0x06F0 0x06F9         ?U)
 150  (0x06FA 0x06FC         ?D)
 151  (0x06FD 0x06FE         ?U)
 152  (0x06FF                ?D)
 153  (0xFB50 0xFDFF         ?P)
 154  (0xFE70 0xFEFC         ?P)
 155  (0xFEF5                ?R)
 156  (0xFEF7                ?R)
 157  (0xFEF9                ?R)
 158  (0xFEFB                ?R)
 159  (0x200C                ?U)
 160  (0x200D                ?D)
 161  )
 162
 163 (generator
 164  (0
 165   (cond
 166    ("PT*"
 167     = combining *)
 168
 169    ("D[^P]*"
 170     (cond
 171      ("(.)(T*)([DR].*)"
 172       (1 initial)
 173       (2 combining *)
 174       (3 join))
 175      ("(.)(T*)(.*)"                     ; == (D)(T*)(U.*)
 176       (1 isolated)
 177       (2 combining *)
 178       (3 disjoin))))
 179
 180    ("([RU])(T*)([^P]*)"
 181     (1 isolated)
 182     (2 combining *)
 183     (3 disjoin))
 184
 185    ("(T+)([^P]*)"
 186     (1 = *)
 187     (2 disjoin)))
 188
 189   *)
 190
 191  (join
 192   (cond
 193    ("D.*"
 194     (cond
 195      ("(.)(T*)([DR].*)"
 196       (1 medial)
 197       (2 combining *)
 198       (3 join))
 199      ("(.)(T*)(.*)"                     ; == (D)(T*)(U.*)
 200       (1 final)
 201       (2 combining *)
 202       (3 disjoin))))
 203
 204    ("(.)(T*)(.*)"                       ; == (R)(T*)(.*)
 205     (1 final)
 206     (2 combining *)
 207     (3 disjoin))))
 208
 209  (disjoin
 210   (cond
 211    ("D.*"
 212     (cond
 213      ("(.)(T*)([DR].*)"
 214       (1 initial)
 215       (2 combining *)
 216       (3 join))
 217      ("(.)(T*)(.*)"                     ; == (D)(T*)(U.*)
 218       (1 isolated)
 219       (2 combining *)
 220       (3 disjoin))))
 221
 222    ("(.)(T*)(.*)"                       ; == ([RU])(T*)(.*)
 223     (1 isolated)
 224     (2 combining *)
 225     (3 disjoin))))
 226
 227  (isolated
 228   (cond
 229    ((range 0x060C 0x060F)       =)
 230    ((0x061B)    =)
 231    ((0x061F)    =)
 232    ((0x0621)    0xFE80)
 233    ((0x0622)    0xFE81)
 234    ((0x0623)    0xFE83)
 235    ((0x0624)    0xFE85)
 236    ((0x0625)    0xFE87)
 237    ((0x0626)    0xFE89)
 238    ((0x0627)    0xFE8D)
 239    ((0x0628)    0xFE8F)
 240    ((0x0629)    0xFE93)
 241    ((0x062A)    0xFE95)
 242    ((0x062B)    0xFE99)
 243    ((0x062C)    0xFE9D)
 244    ((0x062D)    0xFEA1)
 245    ((0x062E)    0xFEA5)
 246    ((0x062F)    0xFEA9)
 247    ((0x0630)    0xFEAB)
 248    ((0x0631)    0xFEAD)
 249    ((0x0632)    0xFEAF)
 250    ((0x0633)    0xFEB1)
 251    ((0x0634)    0xFEB5)
 252    ((0x0635)    0xFEB9)
 253    ((0x0636)    0xFEBD)
 254    ((0x0637)    0xFEC1)
 255    ((0x0638)    0xFEC5)
 256    ((0x0639)    0xFEC9)
 257    ((0x0640)    0x0640)
 258    ((0x063A)    0xFECD)
 259    ((0x0641)    0xFED1)
 260    ((0x0642)    0xFED5)
 261    ((0x0643)    0xFED9)
 262    ((0x0644)    0xFEDD)
 263    ((0x0645)    0xFEE1)
 264    ((0x0646)    0xFEE5)
 265    ((0x0647)    0xFEE9)
 266    ((0x0648)    0xFEED)
 267    ((0x0649)    0xFEEF)
 268    ((0x064A)    0xFEF1)
 269    ((range 0x0660 0x066D)       =)
 270    ((0x0671)    0xFB50)
 271    ((0x0674)    =)
 272    ((0x0677)    0xFBDD)
 273    ((0x0679)    0xFB66)
 274    ((0x067A)    0xFB5E)
 275    ((0x067B)    0xFB52)
 276    ((0x067E)    0xFB56)
 277    ((0x067F)    0xFB62)
 278    ((0x0680)    0xFB5A)
 279    ((0x0683)    0xFB76)
 280    ((0x0684)    0xFB72)
 281    ((0x0686)    0xFB7A)
 282    ((0x0687)    0xFB7E)
 283    ((0x0688)    0xFB88)
 284    ((0x068C)    0xFB84)
 285    ((0x068D)    0xFB82)
 286    ((0x068E)    0xFB86)
 287    ((0x0691)    0xFB8C)
 288    ((0x0698)    0xFB8A)
 289    ((0x06A4)    0xFB6A)
 290    ((0x06A6)    0xFB6E)
 291    ((0x06A9)    0xFB8E)
 292    ((0x06AD)    0xFBD3)
 293    ((0x06AF)    0xFB92)
 294    ((0x06B1)    0xFB9A)
 295    ((0x06B3)    0xFB96)
 296    ((0x06BA)    0xFB9E)
 297    ((0x06BB)    0xFBA0)
 298    ((0x06BE)    0xFBAA)
 299    ((0x06C0)    0xFBA4)
 300    ((0x06C1)    0xFBA6)
 301    ((0x06C5)    0xFBE0)
 302    ((0x06C6)    0xFBD9)
 303    ((0x06C7)    0xFBD7)
 304    ((0x06C8)    0xFBDB)
 305    ((0x06C9)    0xFBE2)
 306    ((0x06CB)    0xFBDE)
 307    ((0x06CC)    0xFBFC)
 308    ((0x06D0)    0xFBE4)
 309    ((0x06D2)    0xFBAE)
 310    ((0x06D3)    0xFBB0)
 311    ((0x06D4)    =)
 312    ((0x06D5)    0xFEE9)
 313    ((0x06E5)    =)
 314    ((0x06E6)    =)
 315    ((0x06E9)    =)
 316    ((range 0x06F0 0x06F9)       =)
 317    ((0x06FD)    =)
 318    ((0x06FE)    =)
 319    ((0xFEF5)    =)
 320    ((0xFEF7)    =)
 321    ((0xFEF9)    =)
 322    ((0xFEFB)    =)
 323    ((0x200C)    =)
 324    ((0x200D)    =)
 325    ))
 326
 327  (final
 328   (cond
 329    ((0x0622)    0xFE82)
 330    ((0x0623)    0xFE84)
 331    ((0x0624)    0xFE86)
 332    ((0x0625)    0xFE88)
 333    ((0x0626)    0xFE8A)
 334    ((0x0627)    0xFE8E)
 335    ((0x0628)    0xFE90)
 336    ((0x0629)    0xFE94)
 337    ((0x062A)    0xFE96)
 338    ((0x062B)    0xFE9A)
 339    ((0x062C)    0xFE9E)
 340    ((0x062D)    0xFEA2)
 341    ((0x062E)    0xFEA6)
 342    ((0x062F)    0xFEAA)
 343    ((0x0630)    0xFEAC)
 344    ((0x0631)    0xFEAE)
 345    ((0x0632)    0xFEB0)
 346    ((0x0633)    0xFEB2)
 347    ((0x0634)    0xFEB6)
 348    ((0x0635)    0xFEBA)
 349    ((0x0636)    0xFEBE)
 350    ((0x0637)    0xFEC2)
 351    ((0x0638)    0xFEC6)
 352    ((0x0639)    0xFECA)
 353    ((0x0640)    0x0640)
 354    ((0x063A)    0xFECE)
 355    ((0x0641)    0xFED2)
 356    ((0x0642)    0xFED6)
 357    ((0x0643)    0xFEDA)
 358    ((0x0644)    0xFEDE)
 359    ((0x0645)    0xFEE2)
 360    ((0x0646)    0xFEE6)
 361    ((0x0647)    0xFEEA)
 362    ((0x0648)    0xFEEE)
 363    ((0x0649)    0xFEF0)
 364    ((0x064A)    0xFEF2)
 365    ((0x0671)    0xFB51)
 366    ((0x0679)    0xFB67)
 367    ((0x067A)    0xFB5F)
 368    ((0x067B)    0xFB52)
 369    ((0x067E)    0xFB57)
 370    ((0x067F)    0xFB63)
 371    ((0x0680)    0xFB5B)
 372    ((0x0683)    0xFB77)
 373    ((0x0684)    0xFB73)
 374    ((0x0686)    0xFB7B)
 375    ((0x0687)    0xFB7F)
 376    ((0x0688)    0xFB89)
 377    ((0x068C)    0xFB85)
 378    ((0x068D)    0xFB83)
 379    ((0x068E)    0xFB87)
 380    ((0x0691)    0xFB8D)
 381    ((0x0698)    0xFB8B)
 382    ((0x06A4)    0xFB6B)
 383    ((0x06A6)    0xFB6F)
 384    ((0x06A9)    0xFB8F)
 385    ((0x06AD)    0xFBD4)
 386    ((0x06AF)    0xFB93)
 387    ((0x06B1)    0xFB9B)
 388    ((0x06B3)    0xFB97)
 389    ((0x06BA)    0xFB9F)
 390    ((0x06BB)    0xFBA1)
 391    ((0x06BE)    0xFBAB)
 392    ((0x06C0)    0xFBA5)
 393    ((0x06C1)    0xFBA7)
 394    ((0x06C5)    0xFBE1)
 395    ((0x06C6)    0xFBDA)
 396    ((0x06C7)    0xFBD8)
 397    ((0x06C8)    0xFBDC)
 398    ((0x06C9)    0xFBE3)
 399    ((0x06CB)    0xFBDF)
 400    ((0x06CC)    0xFBFD)
 401    ((0x06D0)    0xFBE5)
 402    ((0x06D2)    0xFBAF)
 403    ((0x06D3)    0xFBB1)
 404    ((0x06D5)    0xFEEA)
 405    ((0xFEF5)    0xFEF6)
 406    ((0xFEF7)    0xFEF8)
 407    ((0xFEF9)    0xFEFA)
 408    ((0xFEFB)    0xFEFC)
 409    ((0x200C)    =)
 410    ((0x200D)    =)
 411    ))
 412
 413  (initial
 414   (cond
 415    ((0x0626)    0xFE8B)
 416    ((0x0628)    0xFE91)
 417    ((0x062A)    0xFE97)
 418    ((0x062B)    0xFE9B)
 419    ((0x062C)    0xFE9F)
 420    ((0x062D)    0xFEA3)
 421    ((0x062E)    0xFEA7)
 422    ((0x0633)    0xFEB3)
 423    ((0x0634)    0xFEB7)
 424    ((0x0635)    0xFEBB)
 425    ((0x0636)    0xFEBF)
 426    ((0x0637)    0xFEC3)
 427    ((0x0638)    0xFEC7)
 428    ((0x0639)    0xFECB)
 429    ((0x0640)    0x0640)
 430    ((0x063A)    0xFECF)
 431    ((0x0641)    0xFED3)
 432    ((0x0642)    0xFED7)
 433    ((0x0643)    0xFEDB)
 434    ((0x0644)    0xFEDF)
 435    ((0x0645)    0xFEE3)
 436    ((0x0646)    0xFEE7)
 437    ((0x0647)    0xFEEB)
 438    ((0x0649)    0xFBE8)
 439    ((0x064A)    0xFEF3)
 440    ((0x0679)    0xFB68)
 441    ((0x067A)    0xFB60)
 442    ((0x067B)    0xFB54)
 443    ((0x067E)    0xFB58)
 444    ((0x067F)    0xFB64)
 445    ((0x0680)    0xFB5C)
 446    ((0x0683)    0xFB78)
 447    ((0x0684)    0xFB74)
 448    ((0x0686)    0xFB7C)
 449    ((0x0687)    0xFB80)
 450    ((0x06A4)    0xFB6C)
 451    ((0x06A6)    0xFB70)
 452    ((0x06A9)    0xFB90)
 453    ((0x06AD)    0xFBD5)
 454    ((0x06AF)    0xFB94)
 455    ((0x06B1)    0xFB9C)
 456    ((0x06B3)    0xFB98)
 457    ((0x06BA)    0xFEE7)
 458    ((0x06BB)    0xFBA2)
 459    ((0x06BE)    0xFBAC)
 460    ((0x06C1)    0xFBA8)
 461    ((0x06CC)    0xFBFE)
 462    ((0x06D0)    0xFBE6)
 463    ((0x200C)    =)
 464    ((0x200D)    =)
 465    ))
 466
 467  (medial
 468   (cond
 469    ((0x0626)    0xFE8C)
 470    ((0x0628)    0xFE92)
 471    ((0x062A)    0xFE98)
 472    ((0x062B)    0xFE9C)
 473    ((0x062C)    0xFEA0)
 474    ((0x062D)    0xFEA4)
 475    ((0x062E)    0xFEA8)
 476    ((0x0633)    0xFEB4)
 477    ((0x0634)    0xFEB8)
 478    ((0x0635)    0xFEBC)
 479    ((0x0636)    0xFEC0)
 480    ((0x0637)    0xFEC4)
 481    ((0x0638)    0xFEC8)
 482    ((0x0639)    0xFECC)
 483    ((0x0640)    0x0640)
 484    ((0x063A)    0xFED0)
 485    ((0x0641)    0xFED4)
 486    ((0x0642)    0xFED8)
 487    ((0x0643)    0xFEDC)
 488    ((0x0644)    0xFEE0)
 489    ((0x0645)    0xFEE4)
 490    ((0x0646)    0xFEE8)
 491    ((0x0647)    0xFEEC)
 492    ((0x0649)    0xFBE9)
 493    ((0x064A)    0xFEF4)
 494    ((0x0679)    0xFB69)
 495    ((0x067A)    0xFB61)
 496    ((0x067B)    0xFB55)
 497    ((0x067E)    0xFB59)
 498    ((0x067F)    0xFB65)
 499    ((0x0680)    0xFB5D)
 500    ((0x0683)    0xFB79)
 501    ((0x0684)    0xFB75)
 502    ((0x0686)    0xFB7D)
 503    ((0x0687)    0xFB81)
 504    ((0x06A4)    0xFB6D)
 505    ((0x06A6)    0xFB71)
 506    ((0x06A9)    0xFB91)
 507    ((0x06AD)    0xFBD6)
 508    ((0x06AF)    0xFB95)
 509    ((0x06B1)    0xFB9D)
 510    ((0x06B3)    0xFB99)
 511    ((0x06BA)    0xFEE8)
 512    ((0x06BB)    0xFBA3)
 513    ((0x06BE)    0xFBAD)
 514    ((0x06C1)    0xFBA9)
 515    ((0x06CC)    0xFBFF)
 516    ((0x06D0)    0xFBE7)
 517    ((0x200C)    =)
 518    ((0x200D)    =)
 519    ))
 520
 521  (combining
 522   (cond
 523    ((0x0651 0x0650) tc+bc 0x064E tc+bc 0x0651) ; shadda + kasra
 524    ((0x0651 0x064D) tc+bc 0x064B tc+bc 0x0651) ; shadda + kasratan
 525    ((range 0x0610 0x0615) tc+bc =)
 526    ((0x064B) tc+bc =)
 527    ((0x064C) tc+bc =)
 528    ((0x064D) bc-tc =)
 529    ((0x064E) tc+bc =)
 530    ((0x064F) tc+bc =)
 531    ((0x0650) bc-tc =)
 532    ((range 0x0651 0x0654) tc+bc =)
 533    ((0x0655) bc-tc =)
 534    ((0x0656) bc-tc =)
 535    ((0x0657) tc+bc =)
 536    ((0x0658) tc+bc =)
 537    ((0x0670) tc+bc =)
 538    ((range 0x06D6 0x06DC) tc+bc =)
 539    ((range 0x06DF 0x06E2) tc+bc =)
 540    ((0x06E3) bc-tc =)
 541    ((0x06E4) tc+bc =)
 542    ((0x06E7) tc+bc =)
 543    ((0x06E8) tc+bc =)
 544    ((0x06EA) bc-tc =)
 545    ((0x06EB) tc+bc =)
 546    ((0x06EC) tc+bc =)
 547    ((0x06ED) bc-tc =)
 548    ((0x200C)    =)
 549    ((0x200D)    =)
 550    ))
 551  )
 552
 553 ;; Local Variables:
 554 ;; mode: lisp
 555 ;; End: