FLT/TELU-OTF.flt

   1 ;; TELU-OTF.flt -- Font Layout Table for Telugu OpenType fonts
   2 ;; Copyright (C) 2004, 2007
   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., 51 Franklin Street, Fifth Floor,
  22 ;; Boston, MA 02110-1301, USA.
  23
  24 ;;; <li> TELU-OTF.flt
  25 ;;;
  26 ;;; For Telugu OpenType fonts to draw the Telugu script.
  27
  28 (font layouter telu-otf nil
  29       (font (nil nil unicode-bmp :otf=telu=blwf)))
  30
  31 (category
  32  ;; C: consonant
  33  ;; H: HALANT
  34  ;; u: vowel sign (above)
  35  ;; p: vowel sign (post)
  36  ;; b: ai length mark (below)
  37  ;; a: vowel modifier (post)
  38  ;; V: independent vowel
  39  ;; N: ZWNJ (ZERO WIDTH NON-JOINER)
  40  ;; J: ZWJ (ZERO WIDTH JOINER)
  41  ;; X: generic
  42  (0x0C00 0x0C7F ?E)                     ; generic
  43  (0x0C01 0x0C03 ?a)                     ; SIGN CANDRABINDU .. VISARGA
  44  (0x0C05 0x0C14 ?V)                     ; LETTER A .. AU
  45  (0x0C15 0x0C39 ?C)                     ; LETTER KA .. HA
  46  (0x0C3E 0x0C40 ?u)                     ; VOWEL SIGN AA .. II
  47  (0x0C41 0x0C44 ?p)                     ; VOWEL SIGN U .. VOCALIC RR
  48  (0x0C46 0x0C47 ?u)                     ; VOWEL SIGN E .. EE
  49  (0x0C4A 0x0C4C ?u)                     ; VOWEL SIGN O .. AU
  50  (0x0C4D        ?H)                     ; SIGN VIRAMA
  51  (0x0C55        ?u)                     ; LENGTH MARK
  52  (0x0C56        ?b)                     ; AI LENGTH MARK
  53  (0x0C60 0x0C61 ?V)                     ; LETTER VOCALIC RR .. VOCALIC LL
  54  (0x0964 0x0965 ?X)                     ; DANDA .. DOUBLE DANDA
  55  (0x200C        ?N)                     ; ZWNJ
  56  (0x200D        ?J)                     ; ZWJ
  57  )
  58
  59 ;; Decompose two-part vowels.
  60 (generator
  61  (0
  62   (cond
  63    ((0x0C48)
  64     0x0C46 0x0C56)
  65    ("." =))
  66   *))
  67
  68 ;; Syllable identification and reordering.  The base consonant is
  69 ;; always the first one, because all Telugu consonants have a below
  70 ;; form.
  71 (generator
  72  (0
  73   (cond
  74    ;; A syllable with a vowel sign.
  75    ;;1  23     4      5
  76    ("(C)((HC)*)(ub?|p)(a)?"
  77     < | (1 =) (2 move-h) (4 = *) (5 =) | >)
  78
  79    ;; A syllable with a vowel modifier.
  80    ;;1  23     4
  81    ("(C)((HC)*)(a)"
  82     < | (1 =) (2 move-h) (4 =) | >)
  83
  84    ;; No vowel signs, no vowel modifiers.  If the syllable ends with a
  85    ;; Halant, cancel the Halant movement.
  86    ;;1  23     4
  87    ("(C)((HC)*)(HN?)?"
  88     < | (1 =) (4 0x0C4D) (2 move-h) | >)
  89
  90    ;; A syllable starting with an independent vowel.
  91    ("Va?"
  92     < | = * | >)
  93
  94    ("." =))
  95   *)
  96
  97  (move-h
  98   (cond
  99    ("(H)(.+)"
 100     (2 = *) (1 =)))))
 101
 102 ;; Apply OTF features.  In case of Telugu, 'akhn' is applied after
 103 ;; reordering.
 104 (generator
 105  (0
 106   (cond
 107    ;; A syllable that ends with a Halant.
 108    (" (CH)([^ ]*) "
 109     (1 otf:telu=haln+) (2 otf:telu=akhn,blwf,abvs,blws,psts+abvm,blwm,dist))
 110
 111    ;; Ordinary syllables.
 112    (" ([^ ]+) "
 113     (1 otf:telu=akhn,blwf,abvs,blws,psts+absm,blwm,dist))
 114
 115    ("."
 116     [ = ]))
 117   *))
 118
 119 ;; Local Variables:
 120 ;; mode: emacs-lisp
 121 ;; End: