[Indic] Apply Indic features
Find the base consonant and apply basic Indic features accordingly. Nothing complete, but does something for now. Specifically: no Ra handling right now, and no ZWJ/ZWNJ. Number of failing shape-complex tests goes from 174 down to 125. Next: reorder matras.
This commit is contained in:
parent
1a1b501315
commit
743807a3ce
|
@ -59,15 +59,17 @@ z = ZWJ|ZWNJ;
|
||||||
matra_group = M N? H?;
|
matra_group = M N? H?;
|
||||||
syllable_tail = SM? (VD VD?)?;
|
syllable_tail = SM? (VD VD?)?;
|
||||||
|
|
||||||
action found_syllable {
|
action found_consonant_syllable { found_consonant_syllable (map, buffer, mask_array, last, p); }
|
||||||
found_syllable (map, buffer, last, p);
|
action found_vowel_syllable { found_vowel_syllable (map, buffer, mask_array, last, p); }
|
||||||
last = p;
|
action found_standalone_cluster { found_standalone_cluster (map, buffer, mask_array, last, p); }
|
||||||
}
|
action found_non_indic { found_non_indic (map, buffer, mask_array, last, p); }
|
||||||
|
|
||||||
consonant_syllable = (c.N? (z.H|H.z?))* c.N? A? (H.z? | matra_group*)? syllable_tail %(found_syllable);
|
action next_syllable { set_cluster (buffer, p, last); last = p; }
|
||||||
vowel_syllable = (Ra H)? V N? (z.H.c | ZWJ.c)? matra_group* syllable_tail;
|
|
||||||
standalone_cluster = (Ra H)? NBSP N? (z? H c)? matra_group* syllable_tail;
|
consonant_syllable = (c.N? (z.H|H.z?))* c.N? A? (H.z? | matra_group*)? syllable_tail %(found_consonant_syllable);
|
||||||
non_indic = X;
|
vowel_syllable = (Ra H)? V N? (z.H.c | ZWJ.c)? matra_group* syllable_tail %(found_vowel_syllable);
|
||||||
|
standalone_cluster = (Ra H)? NBSP N? (z? H c)? matra_group* syllable_tail %(found_standalone_cluster);
|
||||||
|
non_indic = X %(found_non_indic);
|
||||||
|
|
||||||
syllable =
|
syllable =
|
||||||
consonant_syllable
|
consonant_syllable
|
||||||
|
@ -76,16 +78,25 @@ syllable =
|
||||||
| non_indic
|
| non_indic
|
||||||
;
|
;
|
||||||
|
|
||||||
main := syllable**;
|
main := (syllable %(next_syllable))**;
|
||||||
|
|
||||||
}%%
|
}%%
|
||||||
|
|
||||||
|
|
||||||
#include <stdio.h>
|
static void
|
||||||
#include <string.h>
|
set_cluster (hb_buffer_t *buffer,
|
||||||
|
unsigned int start, unsigned int end)
|
||||||
|
{
|
||||||
|
unsigned int cluster = buffer->info[start].cluster;
|
||||||
|
|
||||||
|
for (unsigned int i = start + 1; i < end; i++)
|
||||||
|
cluster = MIN (cluster, buffer->info[i].cluster);
|
||||||
|
for (unsigned int i = start; i < end; i++)
|
||||||
|
buffer->info[i].cluster = cluster;
|
||||||
|
}
|
||||||
|
|
||||||
static void
|
static void
|
||||||
find_syllables (hb_ot_map_t *map, hb_buffer_t *buffer)
|
find_syllables (const hb_ot_map_t *map, hb_buffer_t *buffer, hb_mask_t *mask_array)
|
||||||
{
|
{
|
||||||
unsigned int p, pe, eof;
|
unsigned int p, pe, eof;
|
||||||
int cs;
|
int cs;
|
||||||
|
|
|
@ -136,7 +136,7 @@ enum indic_matra_category_t {
|
||||||
* and/or
|
* and/or
|
||||||
* 2. Probe font lookups to determine consonant positions.
|
* 2. Probe font lookups to determine consonant positions.
|
||||||
*/
|
*/
|
||||||
static const struct {
|
static const struct consonant_position_t {
|
||||||
hb_codepoint_t u;
|
hb_codepoint_t u;
|
||||||
indic_position_t position;
|
indic_position_t position;
|
||||||
} consonant_positions[] = {
|
} consonant_positions[] = {
|
||||||
|
@ -236,6 +236,28 @@ static const struct {
|
||||||
{0x0D35, POS_POST},
|
{0x0D35, POS_POST},
|
||||||
};
|
};
|
||||||
|
|
||||||
|
static int
|
||||||
|
compare_codepoint (const void *pa, const void *pb)
|
||||||
|
{
|
||||||
|
hb_codepoint_t a = * (hb_codepoint_t *) pa;
|
||||||
|
hb_codepoint_t b = * (hb_codepoint_t *) pb;
|
||||||
|
|
||||||
|
return a < b ? -1 : a == b ? 0 : +1;
|
||||||
|
}
|
||||||
|
|
||||||
|
static indic_position_t
|
||||||
|
consonant_position (hb_codepoint_t u)
|
||||||
|
{
|
||||||
|
consonant_position_t *record;
|
||||||
|
|
||||||
|
record = (consonant_position_t *) bsearch (&u, consonant_positions,
|
||||||
|
ARRAY_LENGTH (consonant_positions),
|
||||||
|
sizeof (consonant_positions[0]),
|
||||||
|
compare_codepoint);
|
||||||
|
|
||||||
|
return record ? record->position : POS_BASE;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
static const struct {
|
static const struct {
|
||||||
hb_tag_t tag;
|
hb_tag_t tag;
|
||||||
|
@ -281,16 +303,17 @@ static const hb_tag_t indic_other_features[] =
|
||||||
HB_TAG('b','l','w','m'),
|
HB_TAG('b','l','w','m'),
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
||||||
|
static void
|
||||||
|
initial_reordering (const hb_ot_map_t *map,
|
||||||
|
hb_face_t *face,
|
||||||
|
hb_buffer_t *buffer,
|
||||||
|
void *user_data HB_UNUSED);
|
||||||
static void
|
static void
|
||||||
final_reordering (const hb_ot_map_t *map,
|
final_reordering (const hb_ot_map_t *map,
|
||||||
hb_face_t *face,
|
hb_face_t *face,
|
||||||
hb_buffer_t *buffer,
|
hb_buffer_t *buffer,
|
||||||
void *user_data HB_UNUSED)
|
void *user_data HB_UNUSED);
|
||||||
{
|
|
||||||
|
|
||||||
HB_BUFFER_DEALLOCATE_VAR (buffer, indic_category);
|
|
||||||
HB_BUFFER_DEALLOCATE_VAR (buffer, indic_position);
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
void
|
||||||
_hb_ot_shape_complex_collect_features_indic (hb_ot_map_builder_t *map, const hb_segment_properties_t *props)
|
_hb_ot_shape_complex_collect_features_indic (hb_ot_map_builder_t *map, const hb_segment_properties_t *props)
|
||||||
|
@ -300,7 +323,7 @@ _hb_ot_shape_complex_collect_features_indic (hb_ot_map_builder_t *map, const hb_
|
||||||
* there is a use of it, it's typically at the beginning. */
|
* there is a use of it, it's typically at the beginning. */
|
||||||
map->add_bool_feature (HB_TAG('c','c','m','p'));
|
map->add_bool_feature (HB_TAG('c','c','m','p'));
|
||||||
|
|
||||||
map->add_gsub_pause (NULL, NULL);
|
map->add_gsub_pause (initial_reordering, NULL);
|
||||||
|
|
||||||
for (unsigned int i = 0; i < ARRAY_LENGTH (indic_basic_features); i++)
|
for (unsigned int i = 0; i < ARRAY_LENGTH (indic_basic_features); i++)
|
||||||
map->add_bool_feature (indic_basic_features[i].tag, indic_basic_features[i].is_global);
|
map->add_bool_feature (indic_basic_features[i].tag, indic_basic_features[i].is_global);
|
||||||
|
@ -319,39 +342,185 @@ _hb_ot_shape_complex_prefer_decomposed_indic (void)
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
static void
|
|
||||||
found_syllable (hb_ot_map_t *map, hb_buffer_t *buffer,
|
|
||||||
unsigned int start, unsigned int end)
|
|
||||||
{
|
|
||||||
//fprintf (stderr, "%d %d\n", start, end);
|
|
||||||
}
|
|
||||||
|
|
||||||
#include "hb-ot-shape-complex-indic-machine.hh"
|
|
||||||
|
|
||||||
|
|
||||||
void
|
void
|
||||||
_hb_ot_shape_complex_setup_masks_indic (hb_ot_map_t *map, hb_buffer_t *buffer)
|
_hb_ot_shape_complex_setup_masks_indic (hb_ot_map_t *map, hb_buffer_t *buffer)
|
||||||
{
|
{
|
||||||
unsigned int count = buffer->len;
|
|
||||||
|
|
||||||
HB_BUFFER_ALLOCATE_VAR (buffer, indic_category);
|
HB_BUFFER_ALLOCATE_VAR (buffer, indic_category);
|
||||||
HB_BUFFER_ALLOCATE_VAR (buffer, indic_position);
|
HB_BUFFER_ALLOCATE_VAR (buffer, indic_position);
|
||||||
|
|
||||||
|
/* We cannot setup masks here. We save information about characters
|
||||||
|
* and setup masks later on in a pause-callback. */
|
||||||
|
|
||||||
|
unsigned int count = buffer->len;
|
||||||
for (unsigned int i = 0; i < count; i++)
|
for (unsigned int i = 0; i < count; i++)
|
||||||
{
|
{
|
||||||
unsigned int type = get_indic_categories (buffer->info[i].codepoint);
|
unsigned int type = get_indic_categories (buffer->info[i].codepoint);
|
||||||
|
|
||||||
buffer->info[i].indic_category() = type & 0x0F;
|
buffer->info[i].indic_category() = type & 0x0F;
|
||||||
buffer->info[i].indic_position() = type >> 4;
|
buffer->info[i].indic_position() = type >> 4;
|
||||||
|
|
||||||
|
if (buffer->info[i].indic_category() == OT_C)
|
||||||
|
buffer->info[i].indic_position() = consonant_position (buffer->info[i].codepoint);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
find_syllables (map, buffer);
|
|
||||||
|
|
||||||
|
static void
|
||||||
|
found_consonant_syllable (const hb_ot_map_t *map, hb_buffer_t *buffer, hb_mask_t *mask_array,
|
||||||
|
unsigned int start, unsigned int end)
|
||||||
|
{
|
||||||
|
unsigned int i;
|
||||||
|
|
||||||
|
/* Comments from:
|
||||||
|
* https://www.microsoft.com/typography/otfntdev/devanot/shaping.aspx */
|
||||||
|
|
||||||
|
/* 1. Find base consonant:
|
||||||
|
*
|
||||||
|
* The shaping engine finds the base consonant of the syllable, using the
|
||||||
|
* following algorithm: starting from the end of the syllable, move backwards
|
||||||
|
* until a consonant is found that does not have a below-base or post-base
|
||||||
|
* form (post-base forms have to follow below-base forms), or that is not a
|
||||||
|
* pre-base reordering Ra, or arrive at the first consonant. The consonant
|
||||||
|
* stopped at will be the base.
|
||||||
|
*
|
||||||
|
* o If the syllable starts with Ra + Halant (in a script that has Reph)
|
||||||
|
* and has more than one consonant, Ra is excluded from candidates for
|
||||||
|
* base consonants.
|
||||||
|
*/
|
||||||
|
|
||||||
|
unsigned int base = 0;
|
||||||
|
|
||||||
|
/* -> starting from the end of the syllable, move backwards */
|
||||||
|
i = end;
|
||||||
|
do {
|
||||||
|
i--;
|
||||||
|
/* -> until a consonant is found */
|
||||||
|
if (buffer->info[i].indic_category() == OT_C)
|
||||||
|
{
|
||||||
|
/* -> that does not have a below-base or post-base form
|
||||||
|
* (post-base forms have to follow below-base forms), */
|
||||||
|
if (buffer->info[i].indic_position() != POS_BELOW &&
|
||||||
|
buffer->info[i].indic_position() != POS_POST)
|
||||||
|
{
|
||||||
|
base = i;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* TODO: or that is not a pre-base reordering Ra, */
|
||||||
|
|
||||||
|
/* -> or arrive at the first consonant. The consonant stopped at will be the base. */
|
||||||
|
base = i;
|
||||||
|
}
|
||||||
|
} while (i > start);
|
||||||
|
if (base < start)
|
||||||
|
base = start; /* Just in case... */
|
||||||
|
|
||||||
|
/* TODO
|
||||||
|
* If the syllable starts with Ra + Halant (in a script that has Reph)
|
||||||
|
* and has more than one consonant, Ra is excluded from candidates for
|
||||||
|
* base consonants. */
|
||||||
|
|
||||||
|
|
||||||
|
/* 2. Decompose and reorder Matras:
|
||||||
|
*
|
||||||
|
* Each matra and any syllable modifier sign in the cluster are moved to the
|
||||||
|
* appropriate position relative to the consonant(s) in the cluster. The
|
||||||
|
* shaping engine decomposes two- or three-part matras into their constituent
|
||||||
|
* parts before any repositioning. Matra characters are classified by which
|
||||||
|
* consonant in a conjunct they have affinity for and are reordered to the
|
||||||
|
* following positions:
|
||||||
|
*
|
||||||
|
* o Before first half form in the syllable
|
||||||
|
* o After subjoined consonants
|
||||||
|
* o After post-form consonant
|
||||||
|
* o After main consonant (for above marks)
|
||||||
|
*
|
||||||
|
* IMPLEMENTATION NOTES:
|
||||||
|
*
|
||||||
|
* The normalize() routine has already decomposed matras for us, so we don't
|
||||||
|
* need to worry about that.
|
||||||
|
*/
|
||||||
|
|
||||||
|
|
||||||
|
/* 3. Reorder marks to canonical order:
|
||||||
|
*
|
||||||
|
* Adjacent nukta and halant or nukta and vedic sign are always repositioned
|
||||||
|
* if necessary, so that the nukta is first.
|
||||||
|
*
|
||||||
|
* IMPLEMENTATION NOTES:
|
||||||
|
*
|
||||||
|
* We don't need to do this: the normalize() routine already did this for us.
|
||||||
|
*/
|
||||||
|
|
||||||
|
|
||||||
|
/* Setup masks now */
|
||||||
|
|
||||||
|
/* Pre-base */
|
||||||
|
for (i = start; i < base; i++)
|
||||||
|
buffer->info[i].mask |= mask_array[HALF] | mask_array[AKHN];
|
||||||
|
/* Base */
|
||||||
|
buffer->info[base].mask |= mask_array[AKHN];
|
||||||
|
/* Post-base */
|
||||||
|
for (i = base + 1; i < end; i++)
|
||||||
|
buffer->info[i].mask |= mask_array[BLWF] | mask_array[PSTF];
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static void
|
||||||
|
found_vowel_syllable (const hb_ot_map_t *map, hb_buffer_t *buffer, hb_mask_t *mask_array,
|
||||||
|
unsigned int start, unsigned int end)
|
||||||
|
{
|
||||||
|
/* TODO
|
||||||
|
* Not clear to me how this should work. Do the matras move to before the
|
||||||
|
* independent vowel? No idea.
|
||||||
|
*/
|
||||||
|
}
|
||||||
|
|
||||||
|
static void
|
||||||
|
found_standalone_cluster (const hb_ot_map_t *map, hb_buffer_t *buffer, hb_mask_t *mask_array,
|
||||||
|
unsigned int start, unsigned int end)
|
||||||
|
{
|
||||||
|
/* TODO
|
||||||
|
* Easiest thing to do here is to convert the NBSP to consonant and
|
||||||
|
* call found_consonant_syllable.
|
||||||
|
*/
|
||||||
|
}
|
||||||
|
|
||||||
|
static void
|
||||||
|
found_non_indic (const hb_ot_map_t *map, hb_buffer_t *buffer, hb_mask_t *mask_array,
|
||||||
|
unsigned int start, unsigned int end)
|
||||||
|
{
|
||||||
|
/* Nothing to do right now. If we ever switch to using the output
|
||||||
|
* buffer in the reordering process, we'd need to next_glyph() here. */
|
||||||
|
}
|
||||||
|
|
||||||
|
#include "hb-ot-shape-complex-indic-machine.hh"
|
||||||
|
|
||||||
|
static void
|
||||||
|
initial_reordering (const hb_ot_map_t *map,
|
||||||
|
hb_face_t *face,
|
||||||
|
hb_buffer_t *buffer,
|
||||||
|
void *user_data HB_UNUSED)
|
||||||
|
{
|
||||||
hb_mask_t mask_array[ARRAY_LENGTH (indic_basic_features)] = {0};
|
hb_mask_t mask_array[ARRAY_LENGTH (indic_basic_features)] = {0};
|
||||||
unsigned int num_masks = ARRAY_LENGTH (indic_basic_features);
|
unsigned int num_masks = ARRAY_LENGTH (indic_basic_features);
|
||||||
for (unsigned int i = 0; i < num_masks; i++)
|
for (unsigned int i = 0; i < num_masks; i++)
|
||||||
mask_array[i] = map->get_1_mask (indic_basic_features[i].tag);
|
mask_array[i] = map->get_1_mask (indic_basic_features[i].tag);
|
||||||
|
|
||||||
|
find_syllables (map, buffer, mask_array);
|
||||||
|
}
|
||||||
|
|
||||||
|
static void
|
||||||
|
final_reordering (const hb_ot_map_t *map,
|
||||||
|
hb_face_t *face,
|
||||||
|
hb_buffer_t *buffer,
|
||||||
|
void *user_data HB_UNUSED)
|
||||||
|
{
|
||||||
|
HB_BUFFER_DEALLOCATE_VAR (buffer, indic_category);
|
||||||
|
HB_BUFFER_DEALLOCATE_VAR (buffer, indic_position);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
HB_END_DECLS
|
HB_END_DECLS
|
||||||
|
|
Loading…
Reference in New Issue