michael@0: /* michael@0: * Copyright © 2009 Red Hat, Inc. michael@0: * Copyright © 2011 Google, Inc. michael@0: * michael@0: * This is part of HarfBuzz, a text shaping library. michael@0: * michael@0: * Permission is hereby granted, without written agreement and without michael@0: * license or royalty fees, to use, copy, modify, and distribute this michael@0: * software and its documentation for any purpose, provided that the michael@0: * above copyright notice and the following two paragraphs appear in michael@0: * all copies of this software. michael@0: * michael@0: * IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE TO ANY PARTY FOR michael@0: * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES michael@0: * ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN michael@0: * IF THE COPYRIGHT HOLDER HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH michael@0: * DAMAGE. michael@0: * michael@0: * THE COPYRIGHT HOLDER SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING, michael@0: * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND michael@0: * FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS michael@0: * ON AN "AS IS" BASIS, AND THE COPYRIGHT HOLDER HAS NO OBLIGATION TO michael@0: * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS. michael@0: * michael@0: * Red Hat Author(s): Behdad Esfahbod michael@0: * Google Author(s): Behdad Esfahbod, Roozbeh Pournader michael@0: */ michael@0: michael@0: #include "hb-private.hh" michael@0: michael@0: #include michael@0: michael@0: michael@0: michael@0: /* hb_script_t */ michael@0: michael@0: static hb_tag_t michael@0: hb_ot_old_tag_from_script (hb_script_t script) michael@0: { michael@0: /* This seems to be accurate as of end of 2012. */ michael@0: michael@0: switch ((hb_tag_t) script) { michael@0: case HB_SCRIPT_INVALID: return HB_OT_TAG_DEFAULT_SCRIPT; michael@0: michael@0: /* KATAKANA and HIRAGANA both map to 'kana' */ michael@0: case HB_SCRIPT_HIRAGANA: return HB_TAG('k','a','n','a'); michael@0: michael@0: /* Spaces at the end are preserved, unlike ISO 15924 */ michael@0: case HB_SCRIPT_LAO: return HB_TAG('l','a','o',' '); michael@0: case HB_SCRIPT_YI: return HB_TAG('y','i',' ',' '); michael@0: /* Unicode-5.0 additions */ michael@0: case HB_SCRIPT_NKO: return HB_TAG('n','k','o',' '); michael@0: /* Unicode-5.1 additions */ michael@0: case HB_SCRIPT_VAI: return HB_TAG('v','a','i',' '); michael@0: /* Unicode-5.2 additions */ michael@0: /* Unicode-6.0 additions */ michael@0: } michael@0: michael@0: /* Else, just change first char to lowercase and return */ michael@0: return ((hb_tag_t) script) | 0x20000000; michael@0: } michael@0: michael@0: static hb_script_t michael@0: hb_ot_old_tag_to_script (hb_tag_t tag) michael@0: { michael@0: if (unlikely (tag == HB_OT_TAG_DEFAULT_SCRIPT)) michael@0: return HB_SCRIPT_INVALID; michael@0: michael@0: /* This side of the conversion is fully algorithmic. */ michael@0: michael@0: /* Any spaces at the end of the tag are replaced by repeating the last michael@0: * letter. Eg 'nko ' -> 'Nkoo' */ michael@0: if (unlikely ((tag & 0x0000FF00) == 0x00002000)) michael@0: tag |= (tag >> 8) & 0x0000FF00; /* Copy second letter to third */ michael@0: if (unlikely ((tag & 0x000000FF) == 0x00000020)) michael@0: tag |= (tag >> 8) & 0x000000FF; /* Copy third letter to fourth */ michael@0: michael@0: /* Change first char to uppercase and return */ michael@0: return (hb_script_t) (tag & ~0x20000000); michael@0: } michael@0: michael@0: static hb_tag_t michael@0: hb_ot_new_tag_from_script (hb_script_t script) michael@0: { michael@0: switch ((hb_tag_t) script) { michael@0: case HB_SCRIPT_BENGALI: return HB_TAG('b','n','g','2'); michael@0: case HB_SCRIPT_DEVANAGARI: return HB_TAG('d','e','v','2'); michael@0: case HB_SCRIPT_GUJARATI: return HB_TAG('g','j','r','2'); michael@0: case HB_SCRIPT_GURMUKHI: return HB_TAG('g','u','r','2'); michael@0: case HB_SCRIPT_KANNADA: return HB_TAG('k','n','d','2'); michael@0: case HB_SCRIPT_MALAYALAM: return HB_TAG('m','l','m','2'); michael@0: case HB_SCRIPT_ORIYA: return HB_TAG('o','r','y','2'); michael@0: case HB_SCRIPT_TAMIL: return HB_TAG('t','m','l','2'); michael@0: case HB_SCRIPT_TELUGU: return HB_TAG('t','e','l','2'); michael@0: case HB_SCRIPT_MYANMAR: return HB_TAG('m','y','m','2'); michael@0: } michael@0: michael@0: return HB_OT_TAG_DEFAULT_SCRIPT; michael@0: } michael@0: michael@0: static hb_script_t michael@0: hb_ot_new_tag_to_script (hb_tag_t tag) michael@0: { michael@0: switch (tag) { michael@0: case HB_TAG('b','n','g','2'): return HB_SCRIPT_BENGALI; michael@0: case HB_TAG('d','e','v','2'): return HB_SCRIPT_DEVANAGARI; michael@0: case HB_TAG('g','j','r','2'): return HB_SCRIPT_GUJARATI; michael@0: case HB_TAG('g','u','r','2'): return HB_SCRIPT_GURMUKHI; michael@0: case HB_TAG('k','n','d','2'): return HB_SCRIPT_KANNADA; michael@0: case HB_TAG('m','l','m','2'): return HB_SCRIPT_MALAYALAM; michael@0: case HB_TAG('o','r','y','2'): return HB_SCRIPT_ORIYA; michael@0: case HB_TAG('t','m','l','2'): return HB_SCRIPT_TAMIL; michael@0: case HB_TAG('t','e','l','2'): return HB_SCRIPT_TELUGU; michael@0: case HB_TAG('m','y','m','2'): return HB_SCRIPT_MYANMAR; michael@0: } michael@0: michael@0: return HB_SCRIPT_UNKNOWN; michael@0: } michael@0: michael@0: /* michael@0: * Complete list at: michael@0: * https://www.microsoft.com/typography/otspec/scripttags.htm michael@0: * https://www.microsoft.com/typography/otspec160/scripttagsProposed.htm michael@0: * michael@0: * Most of the script tags are the same as the ISO 15924 tag but lowercased. michael@0: * So we just do that, and handle the exceptional cases in a switch. michael@0: */ michael@0: michael@0: void michael@0: hb_ot_tags_from_script (hb_script_t script, michael@0: hb_tag_t *script_tag_1, michael@0: hb_tag_t *script_tag_2) michael@0: { michael@0: hb_tag_t new_tag; michael@0: michael@0: *script_tag_2 = HB_OT_TAG_DEFAULT_SCRIPT; michael@0: *script_tag_1 = hb_ot_old_tag_from_script (script); michael@0: michael@0: new_tag = hb_ot_new_tag_from_script (script); michael@0: if (unlikely (new_tag != HB_OT_TAG_DEFAULT_SCRIPT)) { michael@0: *script_tag_2 = *script_tag_1; michael@0: *script_tag_1 = new_tag; michael@0: } michael@0: } michael@0: michael@0: hb_script_t michael@0: hb_ot_tag_to_script (hb_tag_t tag) michael@0: { michael@0: if (unlikely ((tag & 0x000000FF) == '2')) michael@0: return hb_ot_new_tag_to_script (tag); michael@0: michael@0: return hb_ot_old_tag_to_script (tag); michael@0: } michael@0: michael@0: michael@0: /* hb_language_t */ michael@0: michael@0: typedef struct { michael@0: char language[6]; michael@0: hb_tag_t tag; michael@0: } LangTag; michael@0: michael@0: /* michael@0: * Complete list at: michael@0: * http://www.microsoft.com/typography/otspec/languagetags.htm michael@0: * michael@0: * Generated by intersecting the OpenType language tag list from michael@0: * Draft OpenType 1.5 spec, with with the ISO 639-3 codes from michael@0: * 2008-08-04, matching on name, and finally adjusted manually. michael@0: * michael@0: * Updated on 2012-12-07 with more research into remaining codes. michael@0: * michael@0: * Updated on 2013-11-23 based on usage in SIL and Microsoft fonts, michael@0: * the new proposal from Microsoft, and latest ISO 639-3 names. michael@0: * michael@0: * Some items still missing. Those are commented out at the end. michael@0: * Keep sorted for bsearch. michael@0: */ michael@0: michael@0: static const LangTag ot_languages[] = { michael@0: {"aa", HB_TAG('A','F','R',' ')}, /* Afar */ michael@0: {"ab", HB_TAG('A','B','K',' ')}, /* Abkhazian */ michael@0: {"abq", HB_TAG('A','B','A',' ')}, /* Abaza */ michael@0: {"ach", HB_TAG('A','C','H',' ')}, /* Acoli */ michael@0: {"ada", HB_TAG('D','N','G',' ')}, /* Dangme */ michael@0: {"ady", HB_TAG('A','D','Y',' ')}, /* Adyghe */ michael@0: {"af", HB_TAG('A','F','K',' ')}, /* Afrikaans */ michael@0: {"aii", HB_TAG('S','W','A',' ')}, /* Swadaya Aramaic */ michael@0: {"aio", HB_TAG('A','I','O',' ')}, /* Aiton */ michael@0: {"aiw", HB_TAG('A','R','I',' ')}, /* Aari */ michael@0: {"ak", HB_TAG('T','W','I',' ')}, /* Akan [macrolanguage] */ michael@0: {"alt", HB_TAG('A','L','T',' ')}, /* [Southern] Altai */ michael@0: {"am", HB_TAG('A','M','H',' ')}, /* Amharic */ michael@0: {"amf", HB_TAG('H','B','N',' ')}, /* Hammer-Banna */ michael@0: {"an", HB_TAG('A','R','G',' ')}, /* Aragonese */ michael@0: {"ang", HB_TAG('A','N','G',' ')}, /* Old English (ca. 450-1100) */ michael@0: {"ar", HB_TAG('A','R','A',' ')}, /* Arabic [macrolanguage] */ michael@0: {"arb", HB_TAG('A','R','A',' ')}, /* Standard Arabic */ michael@0: {"arn", HB_TAG('M','A','P',' ')}, /* Mapudungun */ michael@0: {"ary", HB_TAG('M','O','R',' ')}, /* Moroccan Arabic */ michael@0: {"as", HB_TAG('A','S','M',' ')}, /* Assamese */ michael@0: {"ast", HB_TAG('A','S','T',' ')}, /* Asturian/Asturleonese/Bable/Leonese */ michael@0: {"ath", HB_TAG('A','T','H',' ')}, /* Athapaskan [family] */ michael@0: {"atv", HB_TAG('A','L','T',' ')}, /* [Northern] Altai */ michael@0: {"av", HB_TAG('A','V','R',' ')}, /* Avaric */ michael@0: {"awa", HB_TAG('A','W','A',' ')}, /* Awadhi */ michael@0: {"ay", HB_TAG('A','Y','M',' ')}, /* Aymara [macrolanguage] */ michael@0: {"az", HB_TAG('A','Z','E',' ')}, /* Azerbaijani [macrolanguage] */ michael@0: {"azb", HB_TAG('A','Z','B',' ')}, /* South Azerbaijani */ michael@0: {"azj", HB_TAG('A','Z','E',' ')}, /* North Azerbaijani */ michael@0: {"ba", HB_TAG('B','S','H',' ')}, /* Bashkir */ michael@0: {"bai", HB_TAG('B','M','L',' ')}, /* Bamileke [family] */ michael@0: {"bal", HB_TAG('B','L','I',' ')}, /* Baluchi [macrolangauge] */ michael@0: {"ban", HB_TAG('B','A','N',' ')}, /* Balinese */ michael@0: {"bar", HB_TAG('B','A','R',' ')}, /* Bavarian */ michael@0: {"bbc", HB_TAG('B','B','C',' ')}, /* Batak Toba */ michael@0: {"bci", HB_TAG('B','A','U',' ')}, /* Baoulé */ michael@0: {"bcl", HB_TAG('B','I','K',' ')}, /* Central Bikol */ michael@0: {"bcq", HB_TAG('B','C','H',' ')}, /* Bench */ michael@0: {"be", HB_TAG('B','E','L',' ')}, /* Belarusian */ michael@0: {"bem", HB_TAG('B','E','M',' ')}, /* Bemba (Zambia) */ michael@0: {"ber", HB_TAG('B','E','R',' ')}, /* Berber [family] */ michael@0: {"bfq", HB_TAG('B','A','D',' ')}, /* Badaga */ michael@0: {"bft", HB_TAG('B','L','T',' ')}, /* Balti */ michael@0: {"bfy", HB_TAG('B','A','G',' ')}, /* Baghelkhandi */ michael@0: {"bg", HB_TAG('B','G','R',' ')}, /* Bulgarian */ michael@0: {"bgc", HB_TAG('B','G','C',' ')}, /* Haryanvi */ michael@0: {"bgq", HB_TAG('B','G','Q',' ')}, /* Bagri */ michael@0: {"bhb", HB_TAG('B','H','I',' ')}, /* Bhili */ michael@0: {"bhk", HB_TAG('B','I','K',' ')}, /* Albay Bicolano (retired code) */ michael@0: {"bho", HB_TAG('B','H','O',' ')}, /* Bhojpuri */ michael@0: {"bi", HB_TAG('B','I','S',' ')}, /* Bislama */ michael@0: {"bik", HB_TAG('B','I','K',' ')}, /* Bikol [macrolanguage] */ michael@0: {"bin", HB_TAG('E','D','O',' ')}, /* Bini */ michael@0: {"bjj", HB_TAG('B','J','J',' ')}, /* Kanauji */ michael@0: {"bjt", HB_TAG('B','L','N',' ')}, /* Balanta-Ganja */ michael@0: {"bla", HB_TAG('B','K','F',' ')}, /* Blackfoot */ michael@0: {"ble", HB_TAG('B','L','N',' ')}, /* Balanta-Kentohe */ michael@0: {"blk", HB_TAG('B','L','K',' ')}, /* Pa'O/Pa'o Karen */ michael@0: {"bln", HB_TAG('B','I','K',' ')}, /* Southern Catanduanes Bikol */ michael@0: {"bm", HB_TAG('B','M','B',' ')}, /* Bambara */ michael@0: {"bn", HB_TAG('B','E','N',' ')}, /* Bengali */ michael@0: {"bo", HB_TAG('T','I','B',' ')}, /* Tibetan */ michael@0: {"bpy", HB_TAG('B','P','Y',' ')}, /* Bishnupriya */ michael@0: {"bqi", HB_TAG('L','R','C',' ')}, /* Bakhtiari */ michael@0: {"br", HB_TAG('B','R','E',' ')}, /* Breton */ michael@0: {"bra", HB_TAG('B','R','I',' ')}, /* Braj Bhasha */ michael@0: {"brh", HB_TAG('B','R','H',' ')}, /* Brahui */ michael@0: {"brx", HB_TAG('B','R','X',' ')}, /* Bodo (India) */ michael@0: {"bs", HB_TAG('B','O','S',' ')}, /* Bosnian */ michael@0: {"btb", HB_TAG('B','T','I',' ')}, /* Beti (Cameroon) */ michael@0: {"bto", HB_TAG('B','I','K',' ')}, /* Rinconada Bikol */ michael@0: {"bts", HB_TAG('B','T','S',' ')}, /* Batak Simalungun */ michael@0: {"bug", HB_TAG('B','U','G',' ')}, /* Buginese */ michael@0: {"bxr", HB_TAG('R','B','U',' ')}, /* Russian Buriat */ michael@0: {"byn", HB_TAG('B','I','L',' ')}, /* Bilen */ michael@0: {"ca", HB_TAG('C','A','T',' ')}, /* Catalan */ michael@0: {"cbk", HB_TAG('C','B','K',' ')}, /* Chavacano */ michael@0: {"ce", HB_TAG('C','H','E',' ')}, /* Chechen */ michael@0: {"ceb", HB_TAG('C','E','B',' ')}, /* Cebuano */ michael@0: {"cgg", HB_TAG('C','G','G',' ')}, /* Chiga */ michael@0: {"ch", HB_TAG('C','H','A',' ')}, /* Chamorro */ michael@0: {"cho", HB_TAG('C','H','O',' ')}, /* Choctaw */ michael@0: {"chp", HB_TAG('C','H','P',' ')}, /* Chipewyan */ michael@0: {"chr", HB_TAG('C','H','R',' ')}, /* Cherokee */ michael@0: {"chy", HB_TAG('C','H','Y',' ')}, /* Cheyenne */ michael@0: {"ckb", HB_TAG('K','U','R',' ')}, /* Central Kurdish (Sorani) */ michael@0: {"ckt", HB_TAG('C','H','K',' ')}, /* Chukchi */ michael@0: {"cop", HB_TAG('C','O','P',' ')}, /* Coptic */ michael@0: {"cr", HB_TAG('C','R','E',' ')}, /* Cree */ michael@0: {"crh", HB_TAG('C','R','T',' ')}, /* Crimean Tatar */ michael@0: {"crj", HB_TAG('E','C','R',' ')}, /* [Southern] East Cree */ michael@0: {"crl", HB_TAG('E','C','R',' ')}, /* [Northern] East Cree */ michael@0: {"crm", HB_TAG('M','C','R',' ')}, /* Moose Cree */ michael@0: {"crx", HB_TAG('C','R','R',' ')}, /* Carrier */ michael@0: {"cs", HB_TAG('C','S','Y',' ')}, /* Czech */ michael@0: {"csb", HB_TAG('C','S','B',' ')}, /* Kashubian */ michael@0: {"ctg", HB_TAG('C','T','G',' ')}, /* Chittagonian */ michael@0: {"cts", HB_TAG('B','I','K',' ')}, /* Northern Catanduanes Bikol */ michael@0: {"cu", HB_TAG('C','S','L',' ')}, /* Church Slavic */ michael@0: {"cv", HB_TAG('C','H','U',' ')}, /* Chuvash */ michael@0: {"cwd", HB_TAG('D','C','R',' ')}, /* Woods Cree */ michael@0: {"cy", HB_TAG('W','E','L',' ')}, /* Welsh */ michael@0: {"da", HB_TAG('D','A','N',' ')}, /* Danish */ michael@0: {"dap", HB_TAG('N','I','S',' ')}, /* Nisi (India) */ michael@0: {"dar", HB_TAG('D','A','R',' ')}, /* Dargwa */ michael@0: {"de", HB_TAG('D','E','U',' ')}, /* German */ michael@0: {"dgo", HB_TAG('D','G','O',' ')}, /* Dogri */ michael@0: {"dhd", HB_TAG('M','A','W',' ')}, /* Dhundari */ michael@0: {"din", HB_TAG('D','N','K',' ')}, /* Dinka [macrolanguage] */ michael@0: {"diq", HB_TAG('D','I','Q',' ')}, /* Dimli */ michael@0: {"dje", HB_TAG('D','J','R',' ')}, /* Zarma */ michael@0: {"dng", HB_TAG('D','U','N',' ')}, /* Dungan */ michael@0: {"doi", HB_TAG('D','G','R',' ')}, /* Dogri [macrolanguage] */ michael@0: {"dsb", HB_TAG('L','S','B',' ')}, /* Lower Sorbian */ michael@0: {"dv", HB_TAG('D','I','V',' ')}, /* Dhivehi/Divehi/Maldivian */ michael@0: {"dyu", HB_TAG('J','U','L',' ')}, /* Jula */ michael@0: {"dz", HB_TAG('D','Z','N',' ')}, /* Dzongkha */ michael@0: {"ee", HB_TAG('E','W','E',' ')}, /* Ewe */ michael@0: {"efi", HB_TAG('E','F','I',' ')}, /* Efik */ michael@0: {"ekk", HB_TAG('E','T','I',' ')}, /* Standard Estonian */ michael@0: {"el", HB_TAG('E','L','L',' ')}, /* Modern Greek (1453-) */ michael@0: {"emk", HB_TAG('M','N','K',' ')}, /* Eastern Maninkakan */ michael@0: {"en", HB_TAG('E','N','G',' ')}, /* English */ michael@0: {"eo", HB_TAG('N','T','O',' ')}, /* Esperanto */ michael@0: {"eot", HB_TAG('B','T','I',' ')}, /* Beti (Côte d'Ivoire) */ michael@0: {"es", HB_TAG('E','S','P',' ')}, /* Spanish */ michael@0: {"et", HB_TAG('E','T','I',' ')}, /* Estonian [macrolanguage] */ michael@0: {"eu", HB_TAG('E','U','Q',' ')}, /* Basque */ michael@0: {"eve", HB_TAG('E','V','N',' ')}, /* Even */ michael@0: {"evn", HB_TAG('E','V','K',' ')}, /* Evenki */ michael@0: {"fa", HB_TAG('F','A','R',' ')}, /* Persian [macrolanguage] */ michael@0: {"ff", HB_TAG('F','U','L',' ')}, /* Fulah [macrolanguage] */ michael@0: {"fi", HB_TAG('F','I','N',' ')}, /* Finnish */ michael@0: {"fil", HB_TAG('P','I','L',' ')}, /* Filipino */ michael@0: {"fj", HB_TAG('F','J','I',' ')}, /* Fijian */ michael@0: {"fo", HB_TAG('F','O','S',' ')}, /* Faroese */ michael@0: {"fon", HB_TAG('F','O','N',' ')}, /* Fon */ michael@0: {"fr", HB_TAG('F','R','A',' ')}, /* French */ michael@0: {"frc", HB_TAG('F','R','C',' ')}, /* Cajun French */ michael@0: {"frp", HB_TAG('F','R','P',' ')}, /* Arpitan/Francoprovençal */ michael@0: {"fur", HB_TAG('F','R','L',' ')}, /* Friulian */ michael@0: {"fuv", HB_TAG('F','U','V',' ')}, /* Nigerian Fulfulde */ michael@0: {"fy", HB_TAG('F','R','I',' ')}, /* Western Frisian */ michael@0: {"ga", HB_TAG('I','R','I',' ')}, /* Irish */ michael@0: {"gaa", HB_TAG('G','A','D',' ')}, /* Ga */ michael@0: {"gag", HB_TAG('G','A','G',' ')}, /* Gagauz */ michael@0: {"gbm", HB_TAG('G','A','W',' ')}, /* Garhwali */ michael@0: {"gd", HB_TAG('G','A','E',' ')}, /* Scottish Gaelic */ michael@0: {"gez", HB_TAG('G','E','Z',' ')}, /* Ge'ez */ michael@0: {"ggo", HB_TAG('G','O','N',' ')}, /* Southern Gondi */ michael@0: {"gl", HB_TAG('G','A','L',' ')}, /* Galician */ michael@0: {"gld", HB_TAG('N','A','N',' ')}, /* Nanai */ michael@0: {"glk", HB_TAG('G','L','K',' ')}, /* Gilaki */ michael@0: {"gn", HB_TAG('G','U','A',' ')}, /* Guarani [macrolanguage] */ michael@0: {"gno", HB_TAG('G','O','N',' ')}, /* Northern Gondi */ michael@0: {"gog", HB_TAG('G','O','G',' ')}, /* Gogo */ michael@0: {"gon", HB_TAG('G','O','N',' ')}, /* Gondi [macrolanguage] */ michael@0: {"grt", HB_TAG('G','R','O',' ')}, /* Garo */ michael@0: {"gru", HB_TAG('S','O','G',' ')}, /* Sodo Gurage */ michael@0: {"gu", HB_TAG('G','U','J',' ')}, /* Gujarati */ michael@0: {"guc", HB_TAG('G','U','C',' ')}, /* Wayuu */ michael@0: {"guk", HB_TAG('G','M','Z',' ')}, /* Gumuz */ michael@0: /*{"guk", HB_TAG('G','U','K',' ')},*/ /* Gumuz (in SIL fonts) */ michael@0: {"guz", HB_TAG('G','U','Z',' ')}, /* Ekegusii/Gusii */ michael@0: {"gv", HB_TAG('M','N','X',' ')}, /* Manx */ michael@0: {"ha", HB_TAG('H','A','U',' ')}, /* Hausa */ michael@0: {"har", HB_TAG('H','R','I',' ')}, /* Harari */ michael@0: {"haw", HB_TAG('H','A','W',' ')}, /* Hawaiian */ michael@0: {"hay", HB_TAG('H','A','Y',' ')}, /* Haya */ michael@0: {"haz", HB_TAG('H','A','Z',' ')}, /* Hazaragi */ michael@0: {"he", HB_TAG('I','W','R',' ')}, /* Hebrew */ michael@0: {"hz", HB_TAG('H','E','R',' ')}, /* Herero */ michael@0: {"hi", HB_TAG('H','I','N',' ')}, /* Hindi */ michael@0: {"hil", HB_TAG('H','I','L',' ')}, /* Hiligaynon */ michael@0: {"hnd", HB_TAG('H','N','D',' ')}, /* [Southern] Hindko */ michael@0: {"hne", HB_TAG('C','H','H',' ')}, /* Chattisgarhi */ michael@0: {"hno", HB_TAG('H','N','D',' ')}, /* [Northern] Hindko */ michael@0: {"ho", HB_TAG('H','M','O',' ')}, /* Hiri Motu */ michael@0: {"hoc", HB_TAG('H','O',' ',' ')}, /* Ho */ michael@0: {"hoj", HB_TAG('H','A','R',' ')}, /* Harauti */ michael@0: {"hr", HB_TAG('H','R','V',' ')}, /* Croatian */ michael@0: {"hsb", HB_TAG('U','S','B',' ')}, /* Upper Sorbian */ michael@0: {"ht", HB_TAG('H','A','I',' ')}, /* Haitian/Haitian Creole */ michael@0: {"hu", HB_TAG('H','U','N',' ')}, /* Hungarian */ michael@0: {"hy", HB_TAG('H','Y','E',' ')}, /* Armenian */ michael@0: {"hz", HB_TAG('H','E','R',' ')}, /* Herero */ michael@0: {"ia", HB_TAG('I','N','A',' ')}, /* Interlingua (International Auxiliary Language Association) */ michael@0: {"ibb", HB_TAG('I','B','B',' ')}, /* Ibibio */ michael@0: {"id", HB_TAG('I','N','D',' ')}, /* Indonesian */ michael@0: {"ie", HB_TAG('I','L','E',' ')}, /* Interlingue/Occidental */ michael@0: {"ig", HB_TAG('I','B','O',' ')}, /* Igbo */ michael@0: {"igb", HB_TAG('E','B','I',' ')}, /* Ebira */ michael@0: {"ijc", HB_TAG('I','J','O',' ')}, /* Izon */ michael@0: {"ijo", HB_TAG('I','J','O',' ')}, /* Ijo [family] */ michael@0: {"ik", HB_TAG('I','P','K',' ')}, /* Inupiaq [macrolanguage] */ michael@0: {"ilo", HB_TAG('I','L','O',' ')}, /* Ilokano */ michael@0: {"inh", HB_TAG('I','N','G',' ')}, /* Ingush */ michael@0: {"io", HB_TAG('I','D','O',' ')}, /* Ido */ michael@0: {"is", HB_TAG('I','S','L',' ')}, /* Icelandic */ michael@0: {"it", HB_TAG('I','T','A',' ')}, /* Italian */ michael@0: {"iu", HB_TAG('I','N','U',' ')}, /* Inuktitut [macrolanguage] */ michael@0: {"ja", HB_TAG('J','A','N',' ')}, /* Japanese */ michael@0: {"jam", HB_TAG('J','A','M',' ')}, /* Jamaican Creole English */ michael@0: {"jbo", HB_TAG('J','B','O',' ')}, /* Lojban */ michael@0: {"jv", HB_TAG('J','A','V',' ')}, /* Javanese */ michael@0: {"ka", HB_TAG('K','A','T',' ')}, /* Georgian */ michael@0: {"kaa", HB_TAG('K','R','K',' ')}, /* Karakalpak */ michael@0: {"kab", HB_TAG('K','A','B',' ')}, /* Kabyle */ michael@0: {"kam", HB_TAG('K','M','B',' ')}, /* Kamba (Kenya) */ michael@0: {"kar", HB_TAG('K','R','N',' ')}, /* Karen [family] */ michael@0: {"kbd", HB_TAG('K','A','B',' ')}, /* Kabardian */ michael@0: {"kde", HB_TAG('K','D','E',' ')}, /* Makonde */ michael@0: {"kdr", HB_TAG('K','R','M',' ')}, /* Karaim */ michael@0: {"kdt", HB_TAG('K','U','Y',' ')}, /* Kuy */ michael@0: {"kex", HB_TAG('K','K','N',' ')}, /* Kokni */ michael@0: {"kfr", HB_TAG('K','A','C',' ')}, /* Kachchi */ michael@0: {"kfy", HB_TAG('K','M','N',' ')}, /* Kumaoni */ michael@0: {"kg", HB_TAG('K','O','N',' ')}, /* Kongo [macrolanguage] */ michael@0: {"kha", HB_TAG('K','S','I',' ')}, /* Khasi */ michael@0: {"khb", HB_TAG('X','B','D',' ')}, /* Lü */ michael@0: {"kht", HB_TAG('K','H','N',' ')}, /* Khamti (Microsoft fonts) */ michael@0: /*{"kht", HB_TAG('K','H','T',' ')},*/ /* Khamti (OpenType spec and SIL fonts) */ michael@0: {"khw", HB_TAG('K','H','W',' ')}, /* Khowar */ michael@0: {"ki", HB_TAG('K','I','K',' ')}, /* Gikuyu/Kikuyu */ michael@0: {"kj", HB_TAG('K','U','A',' ')}, /* Kuanyama/Kwanyama */ michael@0: {"kjh", HB_TAG('K','H','A',' ')}, /* Khakass */ michael@0: {"kjp", HB_TAG('K','J','P',' ')}, /* Pwo Eastern Karen */ michael@0: {"kk", HB_TAG('K','A','Z',' ')}, /* Kazakh */ michael@0: {"kl", HB_TAG('G','R','N',' ')}, /* Kalaallisut */ michael@0: {"kln", HB_TAG('K','A','L',' ')}, /* Kalenjin */ michael@0: {"km", HB_TAG('K','H','M',' ')}, /* Central Khmer */ michael@0: {"kmb", HB_TAG('M','B','N',' ')}, /* Kimbundu */ michael@0: {"kmw", HB_TAG('K','M','O',' ')}, /* Komo (Democratic Republic of Congo) */ michael@0: {"kn", HB_TAG('K','A','N',' ')}, /* Kannada */ michael@0: {"knn", HB_TAG('K','O','K',' ')}, /* Konkani */ michael@0: {"ko", HB_TAG('K','O','R',' ')}, /* Korean */ michael@0: {"koi", HB_TAG('K','O','P',' ')}, /* Komi-Permyak */ michael@0: {"kok", HB_TAG('K','O','K',' ')}, /* Konkani [macrolanguage] */ michael@0: {"kpe", HB_TAG('K','P','L',' ')}, /* Kpelle [macrolanguage] */ michael@0: {"kpv", HB_TAG('K','O','Z',' ')}, /* Komi-Zyrian */ michael@0: {"kpy", HB_TAG('K','Y','K',' ')}, /* Koryak */ michael@0: {"kqy", HB_TAG('K','R','T',' ')}, /* Koorete */ michael@0: {"kr", HB_TAG('K','N','R',' ')}, /* Kanuri [macrolanguage] */ michael@0: {"kri", HB_TAG('K','R','I',' ')}, /* Krio */ michael@0: {"krl", HB_TAG('K','R','L',' ')}, /* Karelian */ michael@0: {"kru", HB_TAG('K','U','U',' ')}, /* Kurukh */ michael@0: {"ks", HB_TAG('K','S','H',' ')}, /* Kashmiri */ michael@0: {"ksh", HB_TAG('K','S','H',' ')}, /* Kölsch */ michael@0: /*{"ksw", HB_TAG('K','R','N',' ')},*/ /* S'gaw Karen (Microsoft fonts?) */ michael@0: {"ksw", HB_TAG('K','S','W',' ')}, /* S'gaw Karen (OpenType spec and SIL fonts) */ michael@0: {"ku", HB_TAG('K','U','R',' ')}, /* Kurdish [macrolanguage] */ michael@0: {"kum", HB_TAG('K','U','M',' ')}, /* Kumyk */ michael@0: {"kv", HB_TAG('K','O','M',' ')}, /* Komi [macrolanguage] */ michael@0: {"kvd", HB_TAG('K','U','I',' ')}, /* Kui (Indonesia) */ michael@0: {"kw", HB_TAG('C','O','R',' ')}, /* Cornish */ michael@0: {"kxc", HB_TAG('K','M','S',' ')}, /* Komso */ michael@0: {"kxu", HB_TAG('K','U','I',' ')}, /* Kui (India) */ michael@0: {"ky", HB_TAG('K','I','R',' ')}, /* Kirghiz/Kyrgyz */ michael@0: {"kyu", HB_TAG('K','Y','U',' ')}, /* Western Kayah */ michael@0: {"la", HB_TAG('L','A','T',' ')}, /* Latin */ michael@0: {"lad", HB_TAG('J','U','D',' ')}, /* Ladino */ michael@0: {"lb", HB_TAG('L','T','Z',' ')}, /* Luxembourgish */ michael@0: {"lbe", HB_TAG('L','A','K',' ')}, /* Lak */ michael@0: {"lbj", HB_TAG('L','D','K',' ')}, /* Ladakhi */ michael@0: {"lez", HB_TAG('L','E','Z',' ')}, /* Lezgi */ michael@0: {"lg", HB_TAG('L','U','G',' ')}, /* Ganda */ michael@0: {"li", HB_TAG('L','I','M',' ')}, /* Limburgan/Limburger/Limburgish */ michael@0: {"lif", HB_TAG('L','M','B',' ')}, /* Limbu */ michael@0: {"lij", HB_TAG('L','I','J',' ')}, /* Ligurian */ michael@0: {"lis", HB_TAG('L','I','S',' ')}, /* Lisu */ michael@0: {"ljp", HB_TAG('L','J','P',' ')}, /* Lampung Api */ michael@0: {"lki", HB_TAG('L','K','I',' ')}, /* Laki */ michael@0: {"lld", HB_TAG('L','A','D',' ')}, /* Ladin */ michael@0: {"lmn", HB_TAG('L','A','M',' ')}, /* Lambani */ michael@0: {"lmo", HB_TAG('L','M','O',' ')}, /* Lombard */ michael@0: {"ln", HB_TAG('L','I','N',' ')}, /* Lingala */ michael@0: {"lo", HB_TAG('L','A','O',' ')}, /* Lao */ michael@0: {"lrc", HB_TAG('L','R','C',' ')}, /* Northern Luri */ michael@0: {"lt", HB_TAG('L','T','H',' ')}, /* Lithuanian */ michael@0: {"lu", HB_TAG('L','U','B',' ')}, /* Luba-Katanga */ michael@0: {"lua", HB_TAG('L','U','B',' ')}, /* Luba-Kasai */ michael@0: {"luo", HB_TAG('L','U','O',' ')}, /* Luo (Kenya and Tanzania) */ michael@0: {"lus", HB_TAG('M','I','Z',' ')}, /* Mizo */ michael@0: {"luy", HB_TAG('L','U','H',' ')}, /* Luyia/Oluluyia [macrolanguage] */ michael@0: {"luz", HB_TAG('L','R','C',' ')}, /* Southern Luri */ michael@0: {"lv", HB_TAG('L','V','I',' ')}, /* Latvian */ michael@0: {"lzz", HB_TAG('L','A','Z',' ')}, /* Laz */ michael@0: {"mad", HB_TAG('M','A','D',' ')}, /* Madurese */ michael@0: {"mag", HB_TAG('M','A','G',' ')}, /* Magahi */ michael@0: {"mai", HB_TAG('M','T','H',' ')}, /* Maithili */ michael@0: {"mak", HB_TAG('M','K','R',' ')}, /* Makasar */ michael@0: {"man", HB_TAG('M','N','K',' ')}, /* Manding/Mandingo [macrolanguage] */ michael@0: {"mdc", HB_TAG('M','L','E',' ')}, /* Male (Papua New Guinea) */ michael@0: {"mdf", HB_TAG('M','O','K',' ')}, /* Moksha */ michael@0: {"mdr", HB_TAG('M','D','R',' ')}, /* Mandar */ michael@0: {"mdy", HB_TAG('M','L','E',' ')}, /* Male (Ethiopia) */ michael@0: {"men", HB_TAG('M','D','E',' ')}, /* Mende (Sierra Leone) */ michael@0: {"mer", HB_TAG('M','E','R',' ')}, /* Meru */ michael@0: {"mfe", HB_TAG('M','F','E',' ')}, /* Morisyen */ michael@0: {"mg", HB_TAG('M','L','G',' ')}, /* Malagasy [macrolanguage] */ michael@0: {"mh", HB_TAG('M','A','H',' ')}, /* Marshallese */ michael@0: {"mhr", HB_TAG('L','M','A',' ')}, /* Low Mari */ michael@0: {"mi", HB_TAG('M','R','I',' ')}, /* Maori */ michael@0: {"min", HB_TAG('M','I','N',' ')}, /* Minangkabau */ michael@0: {"mk", HB_TAG('M','K','D',' ')}, /* Macedonian */ michael@0: {"mku", HB_TAG('M','N','K',' ')}, /* Konyanka Maninka */ michael@0: {"mkw", HB_TAG('M','K','W',' ')}, /* Kituba (Congo) */ michael@0: {"ml", HB_TAG('M','L','R',' ')}, /* Malayalam */ michael@0: {"mlq", HB_TAG('M','N','K',' ')}, /* Western Maninkakan */ michael@0: {"mn", HB_TAG('M','N','G',' ')}, /* Mongolian [macrolanguage] */ michael@0: {"mnc", HB_TAG('M','C','H',' ')}, /* Manchu */ michael@0: {"mni", HB_TAG('M','N','I',' ')}, /* Manipuri */ michael@0: {"mnk", HB_TAG('M','N','D',' ')}, /* Mandinka */ michael@0: {"mns", HB_TAG('M','A','N',' ')}, /* Mansi */ michael@0: {"mnw", HB_TAG('M','O','N',' ')}, /* Mon */ michael@0: {"mo", HB_TAG('M','O','L',' ')}, /* Moldavian */ michael@0: {"moh", HB_TAG('M','O','H',' ')}, /* Mohawk */ michael@0: {"mos", HB_TAG('M','O','S',' ')}, /* Mossi */ michael@0: {"mpe", HB_TAG('M','A','J',' ')}, /* Majang */ michael@0: {"mr", HB_TAG('M','A','R',' ')}, /* Marathi */ michael@0: {"mrj", HB_TAG('H','M','A',' ')}, /* High Mari */ michael@0: {"ms", HB_TAG('M','L','Y',' ')}, /* Malay [macrolanguage] */ michael@0: {"msc", HB_TAG('M','N','K',' ')}, /* Sankaran Maninka */ michael@0: {"mt", HB_TAG('M','T','S',' ')}, /* Maltese */ michael@0: {"mtr", HB_TAG('M','A','W',' ')}, /* Mewari */ michael@0: {"mus", HB_TAG('M','U','S',' ')}, /* Creek */ michael@0: {"mve", HB_TAG('M','A','W',' ')}, /* Marwari (Pakistan) */ michael@0: {"mwk", HB_TAG('M','N','K',' ')}, /* Kita Maninkakan */ michael@0: {"mwl", HB_TAG('M','W','L',' ')}, /* Mirandese */ michael@0: {"mwr", HB_TAG('M','A','W',' ')}, /* Marwari [macrolanguage] */ michael@0: {"mww", HB_TAG('M','W','W',' ')}, /* Hmong Daw */ michael@0: {"my", HB_TAG('B','R','M',' ')}, /* Burmese */ michael@0: {"mym", HB_TAG('M','E','N',' ')}, /* Me'en */ michael@0: {"myq", HB_TAG('M','N','K',' ')}, /* Forest Maninka (retired code) */ michael@0: {"myv", HB_TAG('E','R','Z',' ')}, /* Erzya */ michael@0: {"mzn", HB_TAG('M','Z','N',' ')}, /* Mazanderani */ michael@0: {"na", HB_TAG('N','A','U',' ')}, /* Nauru */ michael@0: {"nag", HB_TAG('N','A','G',' ')}, /* Naga-Assamese */ michael@0: {"nah", HB_TAG('N','A','H',' ')}, /* Nahuatl [family] */ michael@0: {"nap", HB_TAG('N','A','P',' ')}, /* Neapolitan */ michael@0: {"nb", HB_TAG('N','O','R',' ')}, /* Norwegian Bokmål */ michael@0: {"nco", HB_TAG('S','I','B',' ')}, /* Sibe */ michael@0: {"nd", HB_TAG('N','D','B',' ')}, /* [North] Ndebele */ michael@0: {"ndc", HB_TAG('N','D','C',' ')}, /* Ndau */ michael@0: {"nds", HB_TAG('N','D','S',' ')}, /* Low German/Low Saxon */ michael@0: {"ne", HB_TAG('N','E','P',' ')}, /* Nepali */ michael@0: {"new", HB_TAG('N','E','W',' ')}, /* Newari */ michael@0: {"ng", HB_TAG('N','D','G',' ')}, /* Ndonga */ michael@0: {"nga", HB_TAG('N','G','A',' ')}, /* Ngabaka */ michael@0: {"ngl", HB_TAG('L','M','W',' ')}, /* Lomwe */ michael@0: {"niu", HB_TAG('N','I','U',' ')}, /* Niuean */ michael@0: {"niv", HB_TAG('G','I','L',' ')}, /* Gilyak */ michael@0: {"nl", HB_TAG('N','L','D',' ')}, /* Dutch */ michael@0: {"nn", HB_TAG('N','Y','N',' ')}, /* Norwegian Nynorsk */ michael@0: {"no", HB_TAG('N','O','R',' ')}, /* Norwegian [macrolanguage] */ michael@0: {"nod", HB_TAG('N','T','A',' ')}, /* Northern Thai */ michael@0: {"noe", HB_TAG('N','O','E',' ')}, /* Nimadi */ michael@0: {"nog", HB_TAG('N','O','G',' ')}, /* Nogai */ michael@0: {"nov", HB_TAG('N','O','V',' ')}, /* Novial */ michael@0: {"nqo", HB_TAG('N','K','O',' ')}, /* N'Ko */ michael@0: {"nr", HB_TAG('N','D','B',' ')}, /* [South] Ndebele */ michael@0: {"nsk", HB_TAG('N','A','S',' ')}, /* Naskapi */ michael@0: {"nso", HB_TAG('S','O','T',' ')}, /* [Northern] Sotho */ michael@0: {"ny", HB_TAG('C','H','I',' ')}, /* Chewa/Chichwa/Nyanja */ michael@0: {"nym", HB_TAG('N','Y','M',' ')}, /* Nyamwezi */ michael@0: {"nyn", HB_TAG('N','K','L',' ')}, /* Nyankole */ michael@0: {"oc", HB_TAG('O','C','I',' ')}, /* Occitan (post 1500) */ michael@0: {"oj", HB_TAG('O','J','B',' ')}, /* Ojibwa [macrolanguage] */ michael@0: {"ojs", HB_TAG('O','C','R',' ')}, /* Oji-Cree */ michael@0: {"om", HB_TAG('O','R','O',' ')}, /* Oromo [macrolanguage] */ michael@0: {"or", HB_TAG('O','R','I',' ')}, /* Oriya */ michael@0: {"os", HB_TAG('O','S','S',' ')}, /* Ossetian */ michael@0: {"pa", HB_TAG('P','A','N',' ')}, /* Panjabi */ michael@0: {"pag", HB_TAG('P','A','G',' ')}, /* Pangasinan */ michael@0: {"pam", HB_TAG('P','A','M',' ')}, /* Kapampangan/Pampanga */ michael@0: {"pap", HB_TAG('P','A','P',' ')}, /* Papiamento */ michael@0: {"pcc", HB_TAG('P','C','C',' ')}, /* Bouyei */ michael@0: {"pcd", HB_TAG('P','C','D',' ')}, /* Picard */ michael@0: {"pce", HB_TAG('P','L','G',' ')}, /* [Ruching] Palaung */ michael@0: {"pdc", HB_TAG('P','D','C',' ')}, /* Pennsylvania German */ michael@0: {"pes", HB_TAG('F','A','R',' ')}, /* Iranian Persian */ michael@0: {"phk", HB_TAG('P','H','K',' ')}, /* Phake */ michael@0: {"pi", HB_TAG('P','A','L',' ')}, /* Pali */ michael@0: {"pih", HB_TAG('P','I','H',' ')}, /* Pitcairn-Norfolk */ michael@0: {"pl", HB_TAG('P','L','K',' ')}, /* Polish */ michael@0: {"pll", HB_TAG('P','L','G',' ')}, /* [Shwe] Palaung */ michael@0: {"plp", HB_TAG('P','A','P',' ')}, /* Palpa */ michael@0: {"pms", HB_TAG('P','M','S',' ')}, /* Piemontese */ michael@0: {"pnb", HB_TAG('P','N','B',' ')}, /* Western Panjabi */ michael@0: {"prs", HB_TAG('D','R','I',' ')}, /* Afghan Persian/Dari */ michael@0: {"ps", HB_TAG('P','A','S',' ')}, /* Pashto/Pushto [macrolanguage] */ michael@0: {"pt", HB_TAG('P','T','G',' ')}, /* Portuguese */ michael@0: {"pwo", HB_TAG('P','W','O',' ')}, /* Pwo Western Karen */ michael@0: {"qu", HB_TAG('Q','U','Z',' ')}, /* Quechua [macrolanguage] */ michael@0: {"quc", HB_TAG('Q','U','C',' ')}, /* K'iche'/Quiché */ michael@0: {"quz", HB_TAG('Q','U','Z',' ')}, /* Cusco Quechua */ michael@0: {"raj", HB_TAG('R','A','J',' ')}, /* Rajasthani [macrolanguage] */ michael@0: {"rbb", HB_TAG('P','L','G',' ')}, /* Rumai Palaung */ michael@0: {"rej", HB_TAG('R','E','J',' ')}, /* Rejang */ michael@0: {"ria", HB_TAG('R','I','A',' ')}, /* Riang (India) */ michael@0: {"ril", HB_TAG('R','I','A',' ')}, /* Riang (Myanmar) */ michael@0: {"rki", HB_TAG('A','R','K',' ')}, /* Rakhine */ michael@0: {"rm", HB_TAG('R','M','S',' ')}, /* Romansh */ michael@0: {"rmy", HB_TAG('R','M','Y',' ')}, /* Vlax Romani */ michael@0: {"rn", HB_TAG('R','U','N',' ')}, /* Rundi */ michael@0: {"ro", HB_TAG('R','O','M',' ')}, /* Romanian */ michael@0: {"rom", HB_TAG('R','O','Y',' ')}, /* Romany [macrolanguage] */ michael@0: {"ru", HB_TAG('R','U','S',' ')}, /* Russian */ michael@0: {"rue", HB_TAG('R','S','Y',' ')}, /* Rusyn */ michael@0: {"rup", HB_TAG('R','U','P',' ')}, /* Aromanian/Arumanian/Macedo-Romanian */ michael@0: {"rw", HB_TAG('R','U','A',' ')}, /* Kinyarwanda */ michael@0: {"rwr", HB_TAG('M','A','W',' ')}, /* Marwari (India) */ michael@0: {"sa", HB_TAG('S','A','N',' ')}, /* Sanskrit */ michael@0: {"sah", HB_TAG('Y','A','K',' ')}, /* Yakut */ michael@0: {"sas", HB_TAG('S','A','S',' ')}, /* Sasak */ michael@0: {"sat", HB_TAG('S','A','T',' ')}, /* Santali */ michael@0: {"sck", HB_TAG('S','A','D',' ')}, /* Sadri */ michael@0: {"sc", HB_TAG('S','R','D',' ')}, /* Sardinian [macrolanguage] */ michael@0: {"scn", HB_TAG('S','C','N',' ')}, /* Sicilian */ michael@0: {"sco", HB_TAG('S','C','O',' ')}, /* Scots */ michael@0: {"scs", HB_TAG('S','L','A',' ')}, /* [North] Slavey */ michael@0: {"sd", HB_TAG('S','N','D',' ')}, /* Sindhi */ michael@0: {"se", HB_TAG('N','S','M',' ')}, /* Northern Sami */ michael@0: {"seh", HB_TAG('S','N','A',' ')}, /* Sena */ michael@0: {"sel", HB_TAG('S','E','L',' ')}, /* Selkup */ michael@0: {"sg", HB_TAG('S','G','O',' ')}, /* Sango */ michael@0: {"sga", HB_TAG('S','G','A',' ')}, /* Old Irish (to 900) */ michael@0: {"sgs", HB_TAG('S','G','S',' ')}, /* Samogitian */ michael@0: {"sgw", HB_TAG('C','H','G',' ')}, /* Sebat Bet Gurage */ michael@0: /*{"sgw", HB_TAG('S','G','W',' ')},*/ /* Sebat Bet Gurage (in SIL fonts) */ michael@0: {"shn", HB_TAG('S','H','N',' ')}, /* Shan */ michael@0: {"si", HB_TAG('S','N','H',' ')}, /* Sinhala */ michael@0: {"sid", HB_TAG('S','I','D',' ')}, /* Sidamo */ michael@0: {"sjd", HB_TAG('K','S','M',' ')}, /* Kildin Sami */ michael@0: {"sk", HB_TAG('S','K','Y',' ')}, /* Slovak */ michael@0: {"skr", HB_TAG('S','R','K',' ')}, /* Seraiki */ michael@0: {"sl", HB_TAG('S','L','V',' ')}, /* Slovenian */ michael@0: {"sm", HB_TAG('S','M','O',' ')}, /* Samoan */ michael@0: {"sma", HB_TAG('S','S','M',' ')}, /* Southern Sami */ michael@0: {"smj", HB_TAG('L','S','M',' ')}, /* Lule Sami */ michael@0: {"smn", HB_TAG('I','S','M',' ')}, /* Inari Sami */ michael@0: {"sms", HB_TAG('S','K','S',' ')}, /* Skolt Sami */ michael@0: {"sn", HB_TAG('S','N','A',' ')}, /* Shona */ michael@0: {"snk", HB_TAG('S','N','K',' ')}, /* Soninke */ michael@0: {"so", HB_TAG('S','M','L',' ')}, /* Somali */ michael@0: {"sop", HB_TAG('S','O','P',' ')}, /* Songe */ michael@0: {"sq", HB_TAG('S','Q','I',' ')}, /* Albanian [macrolanguage] */ michael@0: {"sr", HB_TAG('S','R','B',' ')}, /* Serbian */ michael@0: {"srr", HB_TAG('S','R','R',' ')}, /* Serer */ michael@0: {"ss", HB_TAG('S','W','Z',' ')}, /* Swati */ michael@0: {"st", HB_TAG('S','O','T',' ')}, /* [Southern] Sotho */ michael@0: {"stq", HB_TAG('S','T','Q',' ')}, /* Saterfriesisch */ michael@0: {"stv", HB_TAG('S','I','G',' ')}, /* Silt'e */ michael@0: {"su", HB_TAG('S','U','N',' ')}, /* Sundanese */ michael@0: {"suk", HB_TAG('S','U','K',' ')}, /* Sukama */ michael@0: {"suq", HB_TAG('S','U','R',' ')}, /* Suri */ michael@0: {"sv", HB_TAG('S','V','E',' ')}, /* Swedish */ michael@0: {"sva", HB_TAG('S','V','A',' ')}, /* Svan */ michael@0: {"sw", HB_TAG('S','W','K',' ')}, /* Swahili [macrolanguage] */ michael@0: {"swb", HB_TAG('C','M','R',' ')}, /* Comorian */ michael@0: {"swh", HB_TAG('S','W','K',' ')}, /* Kiswahili/Swahili */ michael@0: {"swv", HB_TAG('M','A','W',' ')}, /* Shekhawati */ michael@0: {"sxu", HB_TAG('S','X','U',' ')}, /* Upper Saxon */ michael@0: {"syl", HB_TAG('S','Y','L',' ')}, /* Sylheti */ michael@0: {"syr", HB_TAG('S','Y','R',' ')}, /* Syriac [macrolanguage] */ michael@0: {"szl", HB_TAG('S','Z','L',' ')}, /* Silesian */ michael@0: {"ta", HB_TAG('T','A','M',' ')}, /* Tamil */ michael@0: {"tab", HB_TAG('T','A','B',' ')}, /* Tabasaran */ michael@0: {"tcy", HB_TAG('T','U','L',' ')}, /* Tulu */ michael@0: {"tdd", HB_TAG('T','D','D',' ')}, /* Tai Nüa */ michael@0: {"te", HB_TAG('T','E','L',' ')}, /* Telugu */ michael@0: {"tem", HB_TAG('T','M','N',' ')}, /* Temne */ michael@0: {"tet", HB_TAG('T','E','T',' ')}, /* Tetum */ michael@0: {"tg", HB_TAG('T','A','J',' ')}, /* Tajik */ michael@0: {"th", HB_TAG('T','H','A',' ')}, /* Thai */ michael@0: {"ti", HB_TAG('T','G','Y',' ')}, /* Tigrinya */ michael@0: {"tig", HB_TAG('T','G','R',' ')}, /* Tigre */ michael@0: {"tiv", HB_TAG('T','I','V',' ')}, /* Tiv */ michael@0: {"tk", HB_TAG('T','K','M',' ')}, /* Turkmen */ michael@0: {"tl", HB_TAG('T','G','L',' ')}, /* Tagalog */ michael@0: {"tmh", HB_TAG('t','m','h',' ')}, /* Tamashek [macrolanguage] */ michael@0: {"tn", HB_TAG('T','N','A',' ')}, /* Tswana */ michael@0: {"to", HB_TAG('T','G','N',' ')}, /* Tonga (Tonga Islands) */ michael@0: {"tpi", HB_TAG('T','P','I',' ')}, /* Tok Pisin */ michael@0: {"tr", HB_TAG('T','R','K',' ')}, /* Turkish */ michael@0: {"tru", HB_TAG('T','U','A',' ')}, /* Turoyo Aramaic */ michael@0: {"ts", HB_TAG('T','S','G',' ')}, /* Tsonga */ michael@0: {"tt", HB_TAG('T','A','T',' ')}, /* Tatar */ michael@0: {"tum", HB_TAG('T','U','M',' ')}, /* Tumbuka */ michael@0: {"tw", HB_TAG('T','W','I',' ')}, /* Twi */ michael@0: {"ty", HB_TAG('T','H','T',' ')}, /* Tahitian */ michael@0: {"tyv", HB_TAG('T','U','V',' ')}, /* Tuvin */ michael@0: {"tyz", HB_TAG('T','Y','Z',' ')}, /* Tày */ michael@0: {"tzm", HB_TAG('T','Z','M',' ')}, /* Central Atlas Tamazight */ michael@0: {"udm", HB_TAG('U','D','M',' ')}, /* Udmurt */ michael@0: {"ug", HB_TAG('U','Y','G',' ')}, /* Uighur */ michael@0: {"uk", HB_TAG('U','K','R',' ')}, /* Ukrainian */ michael@0: {"umb", HB_TAG('U','M','B',' ')}, /* Umbundu */ michael@0: {"unr", HB_TAG('M','U','N',' ')}, /* Mundari */ michael@0: {"ur", HB_TAG('U','R','D',' ')}, /* Urdu */ michael@0: {"uz", HB_TAG('U','Z','B',' ')}, /* Uzbek [macrolanguage] */ michael@0: {"uzn", HB_TAG('U','Z','B',' ')}, /* Northern Uzbek */ michael@0: {"uzs", HB_TAG('U','Z','B',' ')}, /* Southern Uzbek */ michael@0: {"ve", HB_TAG('V','E','N',' ')}, /* Venda */ michael@0: {"vec", HB_TAG('V','E','C',' ')}, /* Venetian */ michael@0: {"vls", HB_TAG('F','L','E',' ')}, /* Vlaams */ michael@0: {"vi", HB_TAG('V','I','T',' ')}, /* Vietnamese */ michael@0: {"vmw", HB_TAG('M','A','K',' ')}, /* Makhuwa */ michael@0: {"vo", HB_TAG('V','O','L',' ')}, /* Volapük */ michael@0: {"vro", HB_TAG('V','R','O',' ')}, /* Võro */ michael@0: {"wa", HB_TAG('W','L','N',' ')}, /* Walloon */ michael@0: {"war", HB_TAG('W','A','R',' ')}, /* Waray (Philippines) */ michael@0: {"wbm", HB_TAG('W','A',' ',' ')}, /* Wa */ michael@0: {"wbr", HB_TAG('W','A','G',' ')}, /* Wagdi */ michael@0: {"wle", HB_TAG('S','I','G',' ')}, /* Wolane */ michael@0: {"wry", HB_TAG('M','A','W',' ')}, /* Merwari */ michael@0: {"wtm", HB_TAG('W','T','M',' ')}, /* Mewati */ michael@0: {"wo", HB_TAG('W','L','F',' ')}, /* Wolof */ michael@0: {"xal", HB_TAG('K','L','M',' ')}, /* Kalmyk */ michael@0: {"xh", HB_TAG('X','H','S',' ')}, /* Xhosa */ michael@0: {"xog", HB_TAG('X','O','G',' ')}, /* Soga */ michael@0: {"xom", HB_TAG('K','M','O',' ')}, /* Komo (Sudan) */ michael@0: {"xsl", HB_TAG('S','S','L',' ')}, /* South Slavey */ michael@0: {"xst", HB_TAG('S','I','G',' ')}, /* Silt'e (retired code) */ michael@0: {"xwo", HB_TAG('T','O','D',' ')}, /* Written Oirat (Todo) */ michael@0: {"yao", HB_TAG('Y','A','O',' ')}, /* Yao */ michael@0: {"yi", HB_TAG('J','I','I',' ')}, /* Yiddish [macrolanguage] */ michael@0: {"yo", HB_TAG('Y','B','A',' ')}, /* Yoruba */ michael@0: {"yso", HB_TAG('N','I','S',' ')}, /* Nisi (China) */ michael@0: {"za", HB_TAG('Z','H','A',' ')}, /* Chuang/Zhuang [macrolanguage] */ michael@0: {"zea", HB_TAG('Z','E','A',' ')}, /* Zeeuws */ michael@0: {"zne", HB_TAG('Z','N','D',' ')}, /* Zande */ michael@0: {"zu", HB_TAG('Z','U','L',' ')}, /* Zulu */ michael@0: {"zum", HB_TAG('L','R','C',' ')} /* Kumzari */ michael@0: michael@0: /* The corresponding languages IDs for the following IDs are unclear, michael@0: * overlap, or are architecturally weird. Needs more research. */ michael@0: michael@0: /*{"ahg/awn/xan?", HB_TAG('A','G','W',' ')},*/ /* Agaw */ michael@0: /*{"gsw?/gsw-FR?", HB_TAG('A','L','S',' ')},*/ /* Alsatian */ michael@0: /*{"krc", HB_TAG('B','A','L',' ')},*/ /* Balkar */ michael@0: /*{"??", HB_TAG('B','C','R',' ')},*/ /* Bible Cree */ michael@0: /*{"zh?", HB_TAG('C','H','N',' ')},*/ /* Chinese (seen in Microsoft fonts) */ michael@0: /*{"acf/gcf?", HB_TAG('F','A','N',' ')},*/ /* French Antillean */ michael@0: /*{"enf?/yrk?", HB_TAG('F','N','E',' ')},*/ /* Forest Nenets */ michael@0: /*{"fuf?", HB_TAG('F','T','A',' ')},*/ /* Futa */ michael@0: /*{"ar-Syrc?", HB_TAG('G','A','R',' ')},*/ /* Garshuni */ michael@0: /*{"cfm/rnl?", HB_TAG('H','A','L',' ')},*/ /* Halam */ michael@0: /*{"fonipa", HB_TAG('I','P','P','H')},*/ /* Phonetic transcription—IPA conventions */ michael@0: /*{"ga-Latg?/Latg?", HB_TAG('I','R','T',' ')},*/ /* Irish Traditional */ michael@0: /*{"krc", HB_TAG('K','A','R',' ')},*/ /* Karachay */ michael@0: /*{"alw?/ktb?", HB_TAG('K','E','B',' ')},*/ /* Kebena */ michael@0: /*{"Geok", HB_TAG('K','G','E',' ')},*/ /* Khutsuri Georgian */ michael@0: /*{"kca", HB_TAG('K','H','K',' ')},*/ /* Khanty-Kazim */ michael@0: /*{"kca", HB_TAG('K','H','S',' ')},*/ /* Khanty-Shurishkar */ michael@0: /*{"kca", HB_TAG('K','H','V',' ')},*/ /* Khanty-Vakhi */ michael@0: /*{"guz?/kqs?/kss?", HB_TAG('K','I','S',' ')},*/ /* Kisii */ michael@0: /*{"kfa/kfi?/kpb?/xua?/xuj?", HB_TAG('K','O','D',' ')},*/ /* Kodagu */ michael@0: /*{"okm?/oko?", HB_TAG('K','O','H',' ')},*/ /* Korean Old Hangul */ michael@0: /*{"kon?/ktu?/...", HB_TAG('K','O','N',' ')},*/ /* Kikongo */ michael@0: /*{"kfx?", HB_TAG('K','U','L',' ')},*/ /* Kulvi */ michael@0: /*{"??", HB_TAG('L','A','H',' ')},*/ /* Lahuli */ michael@0: /*{"??", HB_TAG('L','C','R',' ')},*/ /* L-Cree */ michael@0: /*{"??", HB_TAG('M','A','L',' ')},*/ /* Malayalam Traditional */ michael@0: /*{"mnk?/mlq?/...", HB_TAG('M','L','N',' ')},*/ /* Malinke */ michael@0: /*{"??", HB_TAG('N','C','R',' ')},*/ /* N-Cree */ michael@0: /*{"??", HB_TAG('N','H','C',' ')},*/ /* Norway House Cree */ michael@0: /*{"jpa?/sam?", HB_TAG('P','A','A',' ')},*/ /* Palestinian Aramaic */ michael@0: /*{"polyton", HB_TAG('P','G','R',' ')},*/ /* Polytonic Greek */ michael@0: /*{"??", HB_TAG('Q','I','N',' ')},*/ /* Asho Chin */ michael@0: /*{"??", HB_TAG('R','C','R',' ')},*/ /* R-Cree */ michael@0: /*{"chp?", HB_TAG('S','A','Y',' ')},*/ /* Sayisi */ michael@0: /*{"xan?", HB_TAG('S','E','K',' ')},*/ /* Sekota */ michael@0: /*{"ngo?", HB_TAG('S','X','T',' ')},*/ /* Sutu */ michael@0: /*{"??", HB_TAG('T','C','R',' ')},*/ /* TH-Cree */ michael@0: /*{"tnz?/tog?/toi?", HB_TAG('T','N','G',' ')},*/ /* Tonga */ michael@0: /*{"enh?/yrk?", HB_TAG('T','N','E',' ')},*/ /* Tundra Nenets */ michael@0: /*{"??", HB_TAG('W','C','R',' ')},*/ /* West-Cree */ michael@0: /*{"cre?", HB_TAG('Y','C','R',' ')},*/ /* Y-Cree */ michael@0: /*{"??", HB_TAG('Y','I','C',' ')},*/ /* Yi Classic */ michael@0: /*{"ii?/Yiii?", HB_TAG('Y','I','M',' ')},*/ /* Yi Modern */ michael@0: /*{"??", HB_TAG('Z','H','P',' ')},*/ /* Chinese Phonetic */ michael@0: }; michael@0: michael@0: static const LangTag ot_languages_zh[] = { michael@0: {"zh-cn", HB_TAG('Z','H','S',' ')}, /* Chinese (China) */ michael@0: {"zh-hk", HB_TAG('Z','H','H',' ')}, /* Chinese (Hong Kong) */ michael@0: {"zh-mo", HB_TAG('Z','H','T',' ')}, /* Chinese (Macao) */ michael@0: {"zh-sg", HB_TAG('Z','H','S',' ')}, /* Chinese (Singapore) */ michael@0: {"zh-tw", HB_TAG('Z','H','T',' ')} /* Chinese (Taiwan) */ michael@0: }; michael@0: michael@0: static int michael@0: lang_compare_first_component (const char *a, michael@0: const char *b) michael@0: { michael@0: unsigned int da, db; michael@0: const char *p; michael@0: michael@0: p = strchr (a, '-'); michael@0: da = p ? (unsigned int) (p - a) : strlen (a); michael@0: michael@0: p = strchr (b, '-'); michael@0: db = p ? (unsigned int) (p - b) : strlen (b); michael@0: michael@0: return strncmp (a, b, MAX (da, db)); michael@0: } michael@0: michael@0: static hb_bool_t michael@0: lang_matches (const char *lang_str, const char *spec) michael@0: { michael@0: unsigned int len = strlen (spec); michael@0: michael@0: return strncmp (lang_str, spec, len) == 0 && michael@0: (lang_str[len] == '\0' || lang_str[len] == '-'); michael@0: } michael@0: michael@0: hb_tag_t michael@0: hb_ot_tag_from_language (hb_language_t language) michael@0: { michael@0: const char *lang_str, *s; michael@0: const LangTag *lang_tag; michael@0: michael@0: if (language == HB_LANGUAGE_INVALID) michael@0: return HB_OT_TAG_DEFAULT_LANGUAGE; michael@0: michael@0: lang_str = hb_language_to_string (language); michael@0: michael@0: s = strstr (lang_str, "x-hbot"); michael@0: if (s) { michael@0: char tag[4]; michael@0: int i; michael@0: s += 6; michael@0: for (i = 0; i < 4 && ISALPHA (s[i]); i++) michael@0: tag[i] = TOUPPER (s[i]); michael@0: if (i) { michael@0: for (; i < 4; i++) michael@0: tag[i] = ' '; michael@0: return HB_TAG_CHAR4 (tag); michael@0: } michael@0: } michael@0: michael@0: /* Find a language matching in the first component */ michael@0: lang_tag = (LangTag *) bsearch (lang_str, ot_languages, michael@0: ARRAY_LENGTH (ot_languages), sizeof (LangTag), michael@0: (hb_compare_func_t) lang_compare_first_component); michael@0: if (lang_tag) michael@0: return lang_tag->tag; michael@0: michael@0: /* Otherwise, check the Chinese ones */ michael@0: if (0 == lang_compare_first_component (lang_str, "zh")) michael@0: { michael@0: unsigned int i; michael@0: michael@0: for (i = 0; i < ARRAY_LENGTH (ot_languages_zh); i++) michael@0: { michael@0: lang_tag = &ot_languages_zh[i]; michael@0: if (lang_matches (lang_tag->language, lang_str)) michael@0: return lang_tag->tag; michael@0: } michael@0: michael@0: /* Otherwise just return 'ZHS ' */ michael@0: return HB_TAG('Z','H','S',' '); michael@0: } michael@0: michael@0: s = strchr (lang_str, '-'); michael@0: if (!s) michael@0: s = lang_str + strlen (lang_str); michael@0: if (s - lang_str == 3) { michael@0: /* Assume it's ISO-639-3 and upper-case and use it. */ michael@0: return hb_tag_from_string (lang_str, s - lang_str) & ~0x20202000; michael@0: } michael@0: michael@0: return HB_OT_TAG_DEFAULT_LANGUAGE; michael@0: } michael@0: michael@0: hb_language_t michael@0: hb_ot_tag_to_language (hb_tag_t tag) michael@0: { michael@0: unsigned int i; michael@0: michael@0: if (tag == HB_OT_TAG_DEFAULT_LANGUAGE) michael@0: return NULL; michael@0: michael@0: for (i = 0; i < ARRAY_LENGTH (ot_languages); i++) michael@0: if (ot_languages[i].tag == tag) michael@0: return hb_language_from_string (ot_languages[i].language, -1); michael@0: michael@0: /* If tag starts with ZH, it's Chinese */ michael@0: if ((tag & 0xFFFF0000) == 0x5A480000) { michael@0: switch (tag) { michael@0: case HB_TAG('Z','H','H',' '): return hb_language_from_string ("zh-hk", -1); /* Hong Kong */ michael@0: default: { michael@0: /* Encode the tag... */ michael@0: unsigned char buf[14] = "zh-x-hbot"; michael@0: buf[9] = tag >> 24; michael@0: buf[10] = (tag >> 16) & 0xFF; michael@0: buf[11] = (tag >> 8) & 0xFF; michael@0: buf[12] = tag & 0xFF; michael@0: if (buf[12] == 0x20) michael@0: buf[12] = '\0'; michael@0: buf[13] = '\0'; michael@0: return hb_language_from_string ((char *) buf, -1); michael@0: } michael@0: } michael@0: } michael@0: michael@0: /* Else return a custom language in the form of "x-hbotABCD" */ michael@0: { michael@0: unsigned char buf[11] = "x-hbot"; michael@0: buf[6] = tag >> 24; michael@0: buf[7] = (tag >> 16) & 0xFF; michael@0: buf[8] = (tag >> 8) & 0xFF; michael@0: buf[9] = tag & 0xFF; michael@0: if (buf[9] == 0x20) michael@0: buf[9] = '\0'; michael@0: buf[10] = '\0'; michael@0: return hb_language_from_string ((char *) buf, -1); michael@0: } michael@0: } michael@0: michael@0: