| Current Path : /usr/share/m17n/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/m17n/KND2-OTF.flt |
;; KND2-OTF.flt -- Font Layout Table for knd2 OpenType fonts
;; Copyright (C) 2010 AIST (H15PRO112)
;; See the end for copying conditions.
(font layouter knd2-otf nil
(version "1.6.0")
(font (nil nil unicode-bmp :otf=knd2)))
;;; <li> KND2-OTF.flt
;;;
;;; For knd2 OpenType fonts to draw the Kannada script.
;; It seems that tunga.ttf has problems w.r.t. reph and ZWJ. For
;; example, Uniscribe does not render RA + HAL + ZWJ + KA (0CB0 + 0CCD
;; + 200D + 0C95) as described in the page
;; <http://www.microsoft.com/typography/otfntdev/kanadot/shaping.aspx>.
;; Perhaps the font still uses the old specification that was defined
;; in Unicode 4.0.
;; Glyphs are reordered in the following way to layout the Kannada script.
;; 1. base consonant
;; 2. matra set #1 (0CBE, 0CBF, 0CC1, 0CC6, 0CCC)
;; 3. vowel sign UU (0CC2)
;; 4. blwf consonants
;; 5. matra set #2 (0CC3, 0CC4, 0CD5, 0CD6)
;; 6. reph
;; 7. anusvara (0C82) and visarga (0C83)
;; 0CE2 and 0CE3, which should be included in "matra set #1" above,
;; are not yet implemented.
(category
;; b: before subscript matras
;; a: after subscript matras
(0x0C80 0x0CFF ?X) ; generic
(0x0C82 0x0C83 ?A) ; SIGN ANUSVARA .. VISARGA
(0x0C85 0x0C94 ?V) ; LETTER A .. LETTER AU
(0x0C95 0x0CB9 ?C) ; LETTER KA .. LETTER HA
(0x0CB0 ?R) ; LETTER RA
(0x0CBC ?n) ; SIGN NUKTA
(0x0CBE 0x0CBF ?b) ; VOWEL SIGN AA .. I
(0x0CC1 0x0CC2 ?b) ; VOWEL SIGN U .. UU
(0x0CC3 0x0CC4 ?a) ; VOWEL SIGN VOCALIC R .. VOCALIC RR
(0x0CC6 ?b) ; VOWEL SIGN E
(0x0CCC ?b) ; VOWEL SIGN AU
(0x0CCD ?H) ; SIGN VIRAMA
(0x0CD5 0x0CD6 ?a) ; LENGTH MARK .. AI LENGTH MARK
(0x0CDE ?C) ; LETTER FA (LLLA)
(0x0CE0 0x0CE1 ?V) ; LETTER VOCALIC RR .. VOCALIC LL
(0x0CE2 0x0CE3 ?b) ; VOWEL SIGN VOCALIC L .. VOCALIC LL
(0x200C ?N) ; ZWNJ
(0x200D ?J) ; ZWJ
(0x25CC ?X) ; DOTTED CIRCLE
(blwf ?B)
(rphf ?r)
)
;; Stage 0
;; Preprocessing
(generator
(0
(cond
;; Decompose multi-part vowel signs.
((0x0CC0)
0x0CBF 0x0CD5)
((0x0CC7)
0x0CC6 0x0CD5)
((0x0CC8)
0x0CC6 0x0CD6)
((0x0CCA)
0x0CC6 0x0CC2)
((0x0CCB)
0x0CC6 0x0CC2 0x0CD5)
("." =))
*))
;; Stage 1
;; Syllable identification
(generator
(0
(cond
;; Syllables with an independent vowel
("(RH)?Vn?(J?H[CR])?b?b?a?A?"
< | = * | >)
;; Consonant-based syllables
("([CR]n?J?HJ?)*[CR]n?(H[NJ]?|b?b?a?n?)A?"
< | = * | >)
;; Multi-part vowel signs
((0x0CBF 0x0CD5)
(cond
((font-facility 0x25CC) < 0x25CC 0x0CBF 0x0CD5 >)
(".+" < 0x0CC0 >)))
((0x0CC6 0x0CD5)
(cond
((font-facility 0x25CC) < 0x25CC 0x0CC6 0x0CD5 >)
(".+" < 0x0CC7 >)))
((0x0CC6 0x0CD6)
(cond
((font-facility 0x25CC) < 0x25CC 0x0CC6 0x0CD6 >)
(".+" < 0x0CC8 >)))
((0x0CC6 0x0CC2 0x0CD5)
(cond
((font-facility 0x25CC) < 0x25CC 0x0CC6 0x0CC2 0x0CD5 >)
(".+" < 0x0CCB >)))
((0x0CC6 0x0CC2)
(cond
((font-facility 0x25CC) < 0x25CC 0x0CC6 0x0CC2 >)
(".+" < 0x0CCA >)))
;; Combining marks are displayed with a DOTTED CIRCLE.
("[nHbaA]"
(cond
((font-facility 0x25CC) < 0x25CC = >)
("." [ = ])))
("JH[CR]"
(cond
((font-facility 0x25CC) < 0x25CC :otf=knd2=blwf+ >)
(".+" [ :otf=knd2=blwf+ ])))
("." =))
*))
;; Stage 2
;; Basic shaping forms
(generator
(0
(cond
;; Syllables starting with RA + H + ZWJ
(" (RHJ[CRnHJ]*)((H[NJ]?|b?b?a?n?)A?) "
;; |
;; This is an asterisk. (See DEV2-OTF.flt)
| (1 :otf=knd2=locl,nukt,akhn,blwf,cjct+) (2 = *) |)
;; Syllables starting with a reph
(" (RH)([CRnHJV]+)((H[NJ]?|b?b?n?a?n?)A?) "
| (1 :otf=knd2=rphf+) (2 :otf=knd2=locl,nukt,akhn,blwf,cjct+) (3 = *) |)
;; Other syllables
(" ([CRnHJV]+)((H[NJ]?|b?b?n?a?n?)A?) "
| (1 :otf=knd2=locl,nukt,akhn,blwf,cjct+) (2 = *) |)
("." =))
*))
;; Stage 3
;; Final reordering #1 (Move before-subscript matras)
(generator
(0
(cond
(" ([^B ]*[^BJ])J?(B*)(bb?n?)([^ ]*) "
| (1 = *) (3 = *) (2 = *) (4 = *) |)
("." =))
*))
;; Stage 4
;; Final reordering #2 (Move reph after the first halant)
(generator
(0
(cond
;; Syllables with a reph and an explicit halant
;; 1 2 3
(" (r)([^H ]+HJ?)([^ ]*) "
| (2 = *) (1 =) (3 = *) |)
;; A reph without explicit halant
;; 1 2 3
(" (r)([^A ]+)(A)? "
| (2 = *) (1 =) (3 =) |)
("." =))
*))
;; Stage 5
;; Nukta for matra and presentation forms
(generator
(0
(cond
(" ([^ ]+) "
| (1 :otf=knd2=nukt,pres,abvs,blws,psts,haln,calt+) |)
("." =))
*))
;; Stage 6
;; Remove ZWNJ/ZWJ
(generator
(0
(cond
("[NJ]")
("." =))
*))
;; Stage 7
;; GPOS processing
(generator
(0
(cond
(" ([^ ]+) "
(1 :otf=knd2=+kern,dist,abvm,blwm))
("." =))
*))
;; Copyright (C) 2010
;; National Institute of Advanced Industrial Science and Technology (AIST)
;; Registration Number H15PRO112
;; This file is part of the m17n database; a sub-part of the m17n
;; library.
;; The m17n library is free software; you can redistribute it and/or
;; modify it under the terms of the GNU Lesser General Public License
;; as published by the Free Software Foundation; either version 2.1 of
;; the License, or (at your option) any later version.
;; The m17n library is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
;; Lesser General Public License for more details.
;; You should have received a copy of the GNU Lesser General Public
;; License along with the m17n library; if not, write to the Free
;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.
;; Local Variables:
;; mode: emacs-lisp
;; End: