blob: 7845a86d41fde55618f9fe6f1e696d7f9a537f7a [file] [log] [blame]
Behdad Esfahbod98628ca2013-02-11 13:36:23 -05001/*
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_SHAPE_COMPLEX_MYANMAR_MACHINE_HH
28#define HB_OT_SHAPE_COMPLEX_MYANMAR_MACHINE_HH
29
Behdad Esfahbodc77ae402018-08-25 22:36:36 -070030#include "hb.hh"
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050031
32%%{
33 machine myanmar_syllable_machine;
34 alphtype unsigned char;
35 write data;
36}%%
37
38%%{
39
40# Same order as enum myanmar_category_t. Not sure how to avoid duplication.
41A = 10;
42As = 18;
43C = 1;
Behdad Esfahbodf559c632017-10-03 15:20:07 +020044D = 32;
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050045D0 = 20;
46DB = 3;
Behdad Esfahbod186ece92014-05-27 17:49:45 -040047GB = 11;
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050048H = 4;
49IV = 2;
50MH = 21;
51MR = 22;
52MW = 23;
53MY = 24;
54PT = 25;
55V = 8;
56VAbv = 26;
57VBlw = 27;
58VPre = 28;
59VPst = 29;
60VS = 30;
61ZWJ = 6;
62ZWNJ = 5;
63Ra = 16;
Behdad Esfahbod9174a9d2013-11-25 18:10:38 -050064P = 31;
Behdad Esfahbodf559c632017-10-03 15:20:07 +020065CS = 19;
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050066
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050067j = ZWJ|ZWNJ; # Joiners
68k = (Ra As H); # Kinzi
69
70c = C|Ra; # is_consonant
71
Behdad Esfahbod439b0582014-05-14 16:44:39 -060072medial_group = MY? MR? MW? MH? As?;
David Corbettccb03672018-02-02 12:04:04 -050073main_vowel_group = (VPre.VS?)* VAbv* VBlw* A* (DB As?)?;
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050074post_vowel_group = VPst MH? As* VAbv* A* (DB As?)?;
Behdad Esfahbodd2da5e02013-11-25 17:50:07 -050075pwo_tone_group = PT A* DB? As?;
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050076
77complex_syllable_tail = As* medial_group main_vowel_group post_vowel_group* pwo_tone_group* V* j?;
78syllable_tail = (H | complex_syllable_tail);
79
Behdad Esfahbodf559c632017-10-03 15:20:07 +020080consonant_syllable = (k|CS)? (c|IV|D|GB).VS? (H (c|IV).VS?)* syllable_tail;
Behdad Esfahbod9174a9d2013-11-25 18:10:38 -050081punctuation_cluster = P V;
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050082broken_cluster = k? VS? syllable_tail;
83other = any;
84
85main := |*
86 consonant_syllable => { found_syllable (consonant_syllable); };
87 j => { found_syllable (non_myanmar_cluster); };
Behdad Esfahbod9174a9d2013-11-25 18:10:38 -050088 punctuation_cluster => { found_syllable (punctuation_cluster); };
Behdad Esfahbod98628ca2013-02-11 13:36:23 -050089 broken_cluster => { found_syllable (broken_cluster); };
90 other => { found_syllable (non_myanmar_cluster); };
91*|;
92
93
94}%%
95
96#define found_syllable(syllable_type) \
97 HB_STMT_START { \
Behdad Esfahbod40d5d192018-10-02 17:04:05 +020098 if (0) fprintf (stderr, "syllable %d..%d %s\n", ts, te, #syllable_type); \
99 for (unsigned int i = ts; i < te; i++) \
Behdad Esfahbod98628ca2013-02-11 13:36:23 -0500100 info[i].syllable() = (syllable_serial << 4) | syllable_type; \
Behdad Esfahbod98628ca2013-02-11 13:36:23 -0500101 syllable_serial++; \
102 if (unlikely (syllable_serial == 16)) syllable_serial = 1; \
103 } HB_STMT_END
104
105static void
106find_syllables (hb_buffer_t *buffer)
107{
Behdad Esfahbod40d5d192018-10-02 17:04:05 +0200108 unsigned int p, pe, eof, ts, te, act HB_UNUSED;
Behdad Esfahbod98628ca2013-02-11 13:36:23 -0500109 int cs;
110 hb_glyph_info_t *info = buffer->info;
111 %%{
112 write init;
113 getkey info[p].myanmar_category();
114 }%%
115
116 p = 0;
117 pe = eof = buffer->len;
118
Behdad Esfahbod98628ca2013-02-11 13:36:23 -0500119 unsigned int syllable_serial = 1;
120 %%{
121 write exec;
122 }%%
123}
124
125#undef found_syllable
126
127#endif /* HB_OT_SHAPE_COMPLEX_MYANMAR_MACHINE_HH */