• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1/*
2 * Copyright © 2011,2012  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#ifndef HB_OT_SHAPER_MYANMAR_MACHINE_HH
28#define HB_OT_SHAPER_MYANMAR_MACHINE_HH
29
30#include "hb.hh"
31
32#include "hb-ot-layout.hh"
33#include "hb-ot-shaper-indic.hh"
34
35/* buffer var allocations */
36#define myanmar_category() ot_shaper_var_u8_category() /* myanmar_category_t */
37#define myanmar_position() ot_shaper_var_u8_auxiliary() /* myanmar_position_t */
38
39using myanmar_category_t = unsigned;
40using myanmar_position_t = ot_position_t;
41
42#define M_Cat(Cat) myanmar_syllable_machine_ex_##Cat
43
44enum myanmar_syllable_type_t {
45  myanmar_consonant_syllable,
46  myanmar_broken_cluster,
47  myanmar_non_myanmar_cluster,
48};
49
50%%{
51  machine myanmar_syllable_machine;
52  alphtype unsigned char;
53  write exports;
54  write data;
55}%%
56
57%%{
58
59
60# Spec category D is folded into GB; D0 is not implemented by Uniscribe and as such folded into D
61# Spec category P is folded into GB
62
63export C    = 1;
64export IV   = 2;
65export DB   = 3;	# Dot below	     = OT_N
66export H    = 4;
67export ZWNJ = 5;
68export ZWJ  = 6;
69export SM    = 8;	# Visarga and Shan tones
70export GB   = 10;	# 		     = OT_PLACEHOLDER
71export DOTTEDCIRCLE = 11;
72export A    = 9;
73export Ra   = 15;
74export CS   = 18;
75export SMPst= 57;
76
77export VAbv = 20;
78export VBlw = 21;
79export VPre = 22;
80export VPst = 23;
81
82# 32+ are for Myanmar-specific values
83export As   = 32;	# Asat
84export MH   = 35;	# Medial Ha
85export MR   = 36;	# Medial Ra
86export MW   = 37;	# Medial Wa, Shan Wa
87export MY   = 38;	# Medial Ya, Mon Na, Mon Ma
88export PT   = 39;	# Pwo and other tones
89export VS   = 40;	# Variation selectors
90export ML   = 41;	# Medial Mon La
91
92
93j = ZWJ|ZWNJ;			# Joiners
94k = (Ra As H);			# Kinzi
95sm = SM | SMPst;
96c = C|Ra;			# is_consonant
97
98medial_group = MY? As? MR? ((MW MH? ML? | MH ML? | ML) As?)?;
99main_vowel_group = (VPre.VS?)* VAbv* VBlw* A* (DB As?)?;
100post_vowel_group = VPst MH? ML? As* VAbv* A* (DB As?)?;
101tone_group = sm | PT A* DB? As?;
102
103complex_syllable_tail = As* medial_group main_vowel_group post_vowel_group* tone_group* j?;
104syllable_tail = (H (c|IV).VS?)* (H | complex_syllable_tail);
105
106consonant_syllable =	(k|CS)? (c|IV|GB|DOTTEDCIRCLE).VS? syllable_tail;
107broken_cluster =	k? VS? syllable_tail;
108other =			any;
109
110main := |*
111	consonant_syllable	=> { found_syllable (myanmar_consonant_syllable); };
112	j | SMPst		=> { found_syllable (myanmar_non_myanmar_cluster); };
113	broken_cluster		=> { found_syllable (myanmar_broken_cluster); buffer->scratch_flags |= HB_BUFFER_SCRATCH_FLAG_HAS_BROKEN_SYLLABLE; };
114	other			=> { found_syllable (myanmar_non_myanmar_cluster); };
115*|;
116
117
118}%%
119
120#define found_syllable(syllable_type) \
121  HB_STMT_START { \
122    if (0) fprintf (stderr, "syllable %u..%u %s\n", ts, te, #syllable_type); \
123    for (unsigned int i = ts; i < te; i++) \
124      info[i].syllable() = (syllable_serial << 4) | syllable_type; \
125    syllable_serial++; \
126    if (syllable_serial == 16) syllable_serial = 1; \
127  } HB_STMT_END
128
129inline void
130find_syllables_myanmar (hb_buffer_t *buffer)
131{
132  unsigned int p, pe, eof, ts, te, act HB_UNUSED;
133  int cs;
134  hb_glyph_info_t *info = buffer->info;
135  %%{
136    write init;
137    getkey info[p].myanmar_category();
138  }%%
139
140  p = 0;
141  pe = eof = buffer->len;
142
143  unsigned int syllable_serial = 1;
144  %%{
145    write exec;
146  }%%
147}
148
149#undef found_syllable
150
151#endif /* HB_OT_SHAPER_MYANMAR_MACHINE_HH */
152