diff options
| -rw-r--r-- | include/unicode/prop.h | 6 | ||||
| -rw-r--r-- | lib/unicode/prop/uprop_get_tc.c | 77 |
2 files changed, 83 insertions, 0 deletions
diff --git a/include/unicode/prop.h b/include/unicode/prop.h index f58118d..fb7680c 100644 --- a/include/unicode/prop.h +++ b/include/unicode/prop.h @@ -18,6 +18,11 @@ struct ucctx { bool lt_after_i : 1; /* After ‘i’ in Lithuanian */ }; +struct tcctx { + bool az_or_tr : 1; /* Azeri or Turkish */ + bool lt_after_i : 1; /* After ‘i’ in Lithuanian */ +}; + enum uprop_bpt { BPT_N, /* None */ BPT_C, /* Close */ @@ -168,6 +173,7 @@ enum uprop_nt { [[__mlib_uprop_attrs]] rune uprop_get_slc(rune); [[__mlib_uprop_attrs]] rune uprop_get_stc(rune); [[__mlib_uprop_attrs]] rune uprop_get_suc(rune); +[[__mlib_uprop_attrs]] struct rview uprop_get_tc(rune, struct tcctx); [[__mlib_uprop_attrs]] struct rview uprop_get_uc(rune, struct ucctx); [[__mlib_uprop_attrs]] struct u8view uprop_get_na1(rune); [[__mlib_uprop_attrs]] struct u8view uprop_get_na(rune); diff --git a/lib/unicode/prop/uprop_get_tc.c b/lib/unicode/prop/uprop_get_tc.c new file mode 100644 index 0000000..3c957cf --- /dev/null +++ b/lib/unicode/prop/uprop_get_tc.c @@ -0,0 +1,77 @@ +#include "__bsearch.h" +#include "unicode/prop.h" + +#define M(...) ((struct rview)_(__VA_ARGS__)) +#define _(...) \ + {(const rune []){__VA_ARGS__}, lengthof(((const rune []){__VA_ARGS__}))} + +static const struct { + rune k; + struct rview v; +} lookup[] = { + {0x00DF /* ß */, _('S', 's')}, + {0x0149 /* ʼn */, _(U'ʼ', 'N')}, + {0x01F0 /* ǰ */, _('J', 0x30C)}, + {0x0390 /* ΐ */, _(U'Ι', 0x308, 0x301)}, + {0x03B0 /* ΰ */, _(U'Υ', 0x308, 0x301)}, + {0x0587 /* և */, _(U'Ե', U'ւ')}, + {0x1E96 /* ẖ */, _('H', 0x331)}, + {0x1E97 /* ẗ */, _('T', 0x308)}, + {0x1E98 /* ẘ */, _('W', 0x30A)}, + {0x1E99 /* ẙ */, _('Y', 0x30A)}, + {0x1E9A /* ẚ */, _('A', U'ʾ')}, + {0x1F50 /* ὐ */, _(U'Υ', 0x313)}, + {0x1F52 /* ὒ */, _(U'Υ', 0x313, 0x300)}, + {0x1F54 /* ὔ */, _(U'Υ', 0x313, 0x301)}, + {0x1F56 /* ὖ */, _(U'Υ', 0x313, 0x342)}, + {0x1FB2 /* ᾲ */, _(U'Ὰ', 0x345)}, + {0x1FB4 /* ᾴ */, _(U'Ά', 0x345)}, + {0x1FB6 /* ᾶ */, _(U'Α', 0x342)}, + {0x1FB7 /* ᾷ */, _(U'Α', 0x342, 0x345)}, + {0x1FC2 /* ῂ */, _(U'Ὴ', 0x345)}, + {0x1FC4 /* ῄ */, _(U'Ή', 0x345)}, + {0x1FC6 /* ῆ */, _(U'Η', 0x342)}, + {0x1FC7 /* ῇ */, _(U'Η', 0x342, 0x345)}, + {0x1FD2 /* ῒ */, _(U'Ι', 0x308, 0x300)}, + {0x1FD3 /* ΐ */, _(U'Ι', 0x308, 0x301)}, + {0x1FD6 /* ῖ */, _(U'Ι', 0x342)}, + {0x1FD7 /* ῗ */, _(U'Ι', 0x308, 0x342)}, + {0x1FE2 /* ῢ */, _(U'Υ', 0x308, 0x300)}, + {0x1FE3 /* ΰ */, _(U'Υ', 0x308, 0x301)}, + {0x1FE4 /* ῤ */, _(U'Ρ', 0x313)}, + {0x1FE6 /* ῦ */, _(U'Υ', 0x342)}, + {0x1FE7 /* ῧ */, _(U'Υ', 0x308, 0x342)}, + {0x1FF2 /* ῲ */, _(U'Ὼ', 0x345)}, + {0x1FF4 /* ῴ */, _(U'Ώ', 0x345)}, + {0x1FF6 /* ῶ */, _(U'Ω', 0x342)}, + {0x1FF7 /* ῷ */, _(U'Ω', 0x342, 0x345)}, + {0xFB00 /* ff */, _('F', 'f')}, + {0xFB01 /* fi */, _('F', 'i')}, + {0xFB02 /* fl */, _('F', 'l')}, + {0xFB03 /* ffi */, _('F', 'f', 'i')}, + {0xFB04 /* ffl */, _('F', 'f', 'l')}, + {0xFB05 /* ſt */, _('S', 't')}, + {0xFB06 /* st */, _('S', 't')}, + {0xFB13 /* ﬓ */, _(U'Մ', U'ն')}, + {0xFB14 /* ﬔ */, _(U'Մ', U'ե')}, + {0xFB15 /* ﬕ */, _(U'Մ', U'ի')}, + {0xFB16 /* ﬖ */, _(U'Վ', U'ն')}, + {0xFB17 /* ﬗ */, _(U'Մ', U'խ')}, +}; + +__MLIB_DEFINE_BSEARCH_KV(struct rview, lookup, M(ch)) + +struct rview +uprop_get_tc(rune ch, struct tcctx ctx) +{ + if (ch == 'i' && ctx.az_or_tr) + return M(U'İ'); + if (ch == 0x307 && ctx.lt_after_i) + return M(); + + rune CH = uprop_get_stc(ch); + if (ch != CH) + return M(CH); + + return mlib_lookup_kv(ch); +} |