/* ********************************************************************** * Copyright (C) 1997-2003, International Business Machines * Corporation and others. All Rights Reserved. ********************************************************************** * * File ULOC.CPP * * Modification History: * * Date Name Description * 04/01/97 aliu Creation. * 08/21/98 stephen JDK 1.2 sync * 12/08/98 rtg New Locale implementation and C API * 03/15/99 damiba overhaul. * 04/06/99 stephen changed setDefault() to realloc and copy * 06/14/99 stephen Changed calls to ures_open for new params * 07/21/99 stephen Modified setDefault() to propagate to C++ *****************************************************************************/ /* POSIX's locale format, from putil.c: [no spaces] ll [ _CC ] [ . MM ] [ @ VV] l = lang, C = ctry, M = charmap, V = variant */ #include "unicode/utypes.h" #include "unicode/ustring.h" #include "unicode/uloc.h" #include "ustr_imp.h" #include "uresimp.h" #include "umutex.h" #include "cstring.h" #include "cmemory.h" #include "ucln_cmn.h" #include "locmap.h" #include "uarrsort.h" #include "uenumimp.h" /**************************************************************************** Global variable and type definitions *****************************************************************************/ /* Locale stuff from locid.cpp */ U_CFUNC void locale_set_default(const char *id); U_CFUNC const char *locale_get_default(void); /* These strings describe the resources we attempt to load from the locale ResourceBundle data file.*/ static const char _kLanguages[] = "Languages"; static const char _kScripts[] = "Scripts"; static const char _kCountries[] = "Countries"; static const char _kVariants[] = "Variants"; static const char _kKeys[] = "Keys"; static const char _kIndexLocaleName[] = "res_index"; static const char _kIndexTag[] = "InstalledLocales"; static char** _installedLocales = NULL; static int32_t _installedLocalesCount = 0; /* tables updated per http://www.egt.ie/standards/iso639 and http://lcweb.loc.gov/standards/iso639-2/ to include the revisions up to 2001/7/27 *CWB*/ /* The 3 character codes are the terminology codes like RFC 3066. This is compatible with prior ICU codes */ /* "in" "iw" "ji" "jw" & "sh" have been withdrawn but are still in the table but now at the end of the table because 3 character codes are duplicates. This avoids bad searches going from 3 to 2 character codes.*/ /* The range qaa-qtz is reserved for local use. */ /* This list MUST be in sorted order, and MUST contain the two-letter codes if one exists otherwise use the three letter code */ static const char * const _languages[] = { "aa", "ab", "ace", "ach", "ada", "ae", "af", "afa", "afh", "ak", "akk", "ale", "alg", "am", "ang", "apa", "ar", "arc", "arn", "arp", "art", "arw", "as", "ast", "ath", "aus", "av", "awa", "ay", "az", "ba", "bad", "bai", "bal", "bam", "ban", "bas", "bat", "be", "bej", "bem", "ber", "bg", "bh", "bho", "bi", "bik", "bin", "bla", "bm", "bn", "bnt", "bo", "br", "bra", "bs", "btk", "bua", "bug", "ca", "cad", "cai", "car", "cau", "ce", "ceb", "cel", "ch", "chb", "chg", "chk", "chm", "chn", "cho", "chp", "chr", "chy", "cmc", "co", "cop", "cpe", "cpf", "cpp", "cre", "crp", "cs", "cu", "cus", "cv", "cy", "da", "dak", "day", "de", "del", "den", "dgr", "din", "doi", "dra", "dua", "dum", "dv", "dyu", "dz", "ee", "efi", "egy", "eka", "el", "elx", "en", "enm", "eo", "es", "et", "eu", "ewe", "ewo", "fa", "fan", "fat", "ff", "fi", "fiu", "fj", "fo", "fon", "fr", "frm", "fro", "fur", "fy", "ga", "gaa", "gay", "gba", "gd", "gem", "gez", "gil", "gl", "gmh", "gn", "goh", "gon", "gor", "got", "grb", "grc", "gu", "gv", "gwi", "ha", "hai", "haw", "he", "hi", "hil", "him", "hit", "hmn", "ho", "hr", "hu", "hup", "hy", "hz", "ia", "iba", "id", "ie", "ig", "ii", "ijo", "ik", "ilo", "inc", "ine", "inh", "ira", "iro", "is", "it", "iu", "ja", "jpr", "jrb", "jv", "ka", "kaa", "kab", "kac", "kam", "kar", "kaw", "kbd", "kg", "kha", "khi", "kho", "ki", "kj", "kk", "kl", "km", "kmb", "kn", "ko", "kok", "kos", "kpe", "kr", "kro", "kru", "ks", "ku", "kum", "kut", "kv", "kw", "ky", "la", "lad", "lah", "lam", "lb", "lez", "lg", "ln", "lo", "lol", "loz", "lt", "lu", "lua", "lui", "lun", "luo", "lus", "lv", "mad", "mag", "mai", "mak", "man", "map", "mas", "mdr", "men", "mg", "mga", "mh", "mi", "mic", "min", "mis", "mk", "mkh", "ml", "mn", "mnc", "mni", "mno", "mo", "moh", "mos", "mr", "ms", "mt", "mul", "mun", "mus", "mwr", "my", "myn", "na", "nah", "nai", "nap", "nb", "nd", "nds", "ne", "new", "ng", "nia", "nic", "niu", "nl", "nn", "no", "non", "nr", "nso", "nub", "nv", "ny", "nym", "nyn", "nyo", "nzi", "oc", "oj", "om", "or", "os", "osa", "ota", "oto", "pa", "paa", "pag", "pal", "pam", "pap", "pau", "peo", "phi", "phn", "pi", "pl", "pon", "pra", "pro", "ps", "pt", "qu", "raj", "rap", "rar", "rm", "rn", "ro", "roa", "rom", "ru", "rw", "sa", "sad", "sah", "sai", "sal", "sam", "sas", "sat", "sc", "sco", "sd", "se", "sel", "sem", "sg", "sga", "sgn", "shn", "si", "sid", "sio", "sit", "sk", "sl", "sla", "sm", "sma", "smi", "smj", "smn", "sms", "sn", "snk", "so", "sog", "son", "sq", "sr", "srr", "ss", "ssa", "st", "su", "suk", "sus", "sux", "sv", "sw", "syr", "ta", "tai", "te", "tem", "ter", "tet", "tg", "th", "ti", "tig", "tiv", "tk", "tkl", "tl", "tli", "tmh", "tn", "to", "tog", "tpi", "tr", "ts", "tsi", "tt", "tum", "tup", "tut", "tvl", "tw", "ty", "tyv", "ug", "uga", "uk", "umb", "und", "ur", "uz", "vai", "ve", "vi", "vo", "vot", "wa", "wak", "wal", "war", "was", "wen", "wo", "xh", "yao", "yap", "yi", "yo", "ypk", "za", "zap", "zen", "zh", "znd", "zu", "zun", NULL, "in", "iw", "ji", "jw", "sh", /* obsolete language codes */ NULL }; /* This list MUST contain a three-letter code for every two-letter code in the list above, and they MUST ne in the same order (i.e., the same language must be in the same place in both lists)! */ static const char * const _languages3[] = { /* "aa", "ab", "ace", "ach", "ada", "ae", "af", "afa", */ "aar", "abk", "ace", "ach", "ada", "ave", "afr", "afa", /* "afh", "ak", "akk", "ale", "alg", "am", "ang", "apa", */ "afh", "aka", "akk", "ale", "alg", "amh", "ang", "apa", /* "ar", "arc", "arn", "arp", "art", "arw", "as", "ast", */ "ara", "arc", "arn", "arp", "art", "arw", "asm", "ast", /* "ath", "aus", "av", "awa", "ay", "az", "ba", "bad", */ "ath", "aus", "ava", "awa", "aym", "aze", "bak", "bad", /* "bai", "bal", "bam", "ban", "bas", "bat", "be", "bej", */ "bai", "bal", "bam", "ban", "bas", "bat", "bel", "bej", /* "bem", "ber", "bg", "bh", "bho", "bi", "bik", "bin", */ "bem", "ber", "bul", "bih", "bho", "bis", "bik", "bin", /* "bla", "bm", "bn", "bnt", "bo", "br", "bra", "bs", */ "bla", "bm", "ben", "bnt", "bod", "bre", "bra", "bos", /* "btk", "bua", "bug", "ca", "cad", "cai", "car", "cau", */ "btk", "bua", "bug", "cat", "cad", "cai", "car", "cau", /* "ce", "ceb", "cel", "ch", "chb", "chg", "chk", "chm", */ "che", "ceb", "cel", "cha", "chb", "chg", "chk", "chm", /* "chn", "cho", "chp", "chr", "chy", "cmc", "co", "cop", */ "chn", "cho", "chp", "chr", "chy", "cmc", "cos", "cop", /* "cpe", "cpf", "cpp", "cre", "crp", "cs", "cu", "cus", */ "cpe", "cpf", "cpp", "cre", "crp", "ces", "chu", "cus", /* "cv", "cy", "da", "dak", "day", "de", "del", "den", */ "chv", "cym", "dan", "dak", "day", "deu", "del", "den", /* "dgr", "din", "doi", "dra", "dua", "dum", "dv", "dyu", */ "dgr", "din", "doi", "dra", "dua", "dum", "div", "dyu", /* "dz", "ee", "efi", "egy", "eka", "el", "elx", "en", */ "dzo", "ewe", "efi", "egy", "eka", "ell", "elx", "eng", /* "enm", "eo", "es", "et", "eu", "ewe", "ewo", "fa", */ "enm", "epo", "spa", "est", "eus", "ewe", "ewo", "fas", /* "fan", "fat", "ff", "fi", "fiu", "fj", "fo", "fon", */ "fan", "fat", "ful", "fin", "fiu", "fij", "fao", "fon", /* "fr", "frm", "fro", "fur", "fy", "ga", "gaa", "gay", */ "fra", "frm", "fro", "fur", "fry", "gle", "gaa", "gay", /* "gba", "gd", "gem", "gez", "gil", "gl", "gmh", "gn", */ "gba", "gla", "gem", "gez", "gil", "glg", "gmh", "grn", /* "goh", "gon", "gor", "got", "grb", "grc", "gu", "gv", */ "goh", "gon", "gor", "got", "grb", "grc", "guj", "glv", /* "gwi", "ha", "hai", "haw", "he", "hi", "hil", "him", */ "gwi", "hau", "hai", "haw", "heb", "hin", "hil", "him", /* "hit", "hmn", "ho", "hr", "hu", "hup", "hy", "hz", */ "hit", "hmn", "hmo", "hrv", "hun", "hup", "hye", "her", /* "ia", "iba", "id", "ie", "ig", "ii", "ijo", "ik", */ "ina", "iba", "ind", "ile", "ibo", "iii", "ijo", "ipk", /* "ilo", "inc", "ine", "inh", "ira", "iro", "is", "it", */ "ilo", "inc", "ine", "inh", "ira", "iro", "isl", "ita", /* "iu", "ja", "jpr", "jrb", "jv", "ka", "kaa", "kab", */ "iku", "jpn", "jpr", "jrb", "jaw", "kat", "kaa", "kab", /* "kac", "kam", "kar", "kaw", "kbd", "kg", "kha", "khi", */ "kac", "kam", "kar", "kaw", "kbd", "kon", "kha", "khi", /* "kho", "ki", "kj", "kk", "kl", "km", "kmb", "kn", */ "kho", "kik", "kua", "kaz", "kal", "khm", "kmb", "kan", /* "ko", "kok", "kos", "kpe", "kr", "kro", "kru", "ks", */ "kor", "kok", "kos", "kpe", "kau", "kro", "kru", "kas", /* "ku", "kum", "kut", "kv", "kw", "ky", "la", "lad", */ "kur", "kum", "kut", "kom", "cor", "kir", "lat", "lad", /* "lah", "lam", "lb", "lez", "lg", "ln", "lo", "lol", */ "lah", "lam", "ltz", "lez", "lug", "lin", "lao", "lol", /* "loz", "lt", "lu", "lua", "lui", "lun", "luo", "lus", */ "loz", "lit", "lub", "lua", "lui", "lun", "luo", "lus", /* "lv", "mad", "mag", "mai", "mak", "man", "map", "mas", */ "lav", "mad", "mag", "mai", "mak", "man", "map", "mas", /* "mdr", "men", "mg", "mga", "mh", "mi", "mic", "min", */ "mdr", "men", "mlg", "mga", "mah", "mri", "mic", "min", /* "mis", "mk", "mkh", "ml", "mn", "mnc", "mni", "mno", */ "mis", "mkd", "mkh", "mal", "mon", "mnc", "mni", "mno", /* "mo", "moh", "mos", "mr", "ms", "mt", "mul", "mun", */ "mol", "moh", "mos", "mar", "msa", "mlt", "mul", "mun", /* "mus", "mwr", "my", "myn", "na", "nah", "nai", "nap", */ "mus", "mwr", "mya", "myn", "nau", "nah", "nai", "nap", /* "nb", "nd", "nds", "ne", "new", "ng", "nia", "nic", */ "nob", "nde", "nds", "nep", "new", "ndo", "nia", "nic", /* "niu", "nl", "nn", "no", "non", "nr", "nso", "nub", */ "niu", "nld", "nno", "nor", "non", "nbl", "nso", "nub", /* "nv", "ny", "nym", "nyn", "nyo", "nzi", "oc", "oj", */ "nav", "nya", "nym", "nyn", "nyo", "nzi", "oci", "oji", /* "om", "or", "os", "osa", "ota", "oto", "pa", "paa", */ "orm", "ori", "oss", "osa", "ota", "oto", "pan", "paa", /* "pag", "pal", "pam", "pap", "pau", "peo", "phi", "phn", */ "pag", "pal", "pam", "pap", "pau", "peo", "phi", "phn", /* "pi", "pl", "pon", "pra", "pro", "ps", "pt", "qu", */ "pli", "pol", "pon", "pra", "pro", "pus", "por", "que", /* "raj", "rap", "rar", "rm", "rn", "ro", "roa", "rom", */ "raj", "rap", "rar", "roh", "run", "ron", "roa", "rom", /* "ru", "rw", "sa", "sad", "sah", "sai", "sal", "sam", */ "rus", "kin", "san", "sad", "sah", "sai", "sal", "sam", /* "sas", "sat", "sc", "sco", "sd", "se", "sel", "sem", */ "sas", "sat", "srd", "sco", "snd", "sme", "sel", "sem", /* "sg", "sga", "sgn", "shn", "si", "sid", "sio", "sit", */ "sag", "sga", "sgn", "shn", "sin", "sid", "sio", "sit", /* "sk", "sl", "sla", "sm", "sma", "smi", "smj", "smn", */ "slk", "slv", "sla", "smo", "sma", "smi", "smj", "smn", /* "sms", "sn", "snk", "so", "sog", "son", "sq", "sr", */ "sms", "sna", "snk", "som", "sog", "son", "sqi", "srp", /* "srr", "ss", "ssa", "st", "su", "suk", "sus", "sux", */ "srr", "ssw", "ssa", "sot", "sun", "suk", "sus", "sux", /* "sv", "sw", "syr", "ta", "tai", "te", "tem", "ter", */ "swe", "swa", "syr", "tam", "tai", "tel", "tem", "ter", /* "tet", "tg", "th", "ti", "tig", "tiv", "tk", "tkl", */ "tet", "tgk", "tha", "tir", "tig", "tiv", "tuk", "tkl", /* "tl", "tli", "tmh", "tn", "to", "tog", "tpi", "tr", */ "tgl", "tli", "tmh", "tsn", "ton", "tog", "tpi", "tur", /* "ts", "tsi", "tt", "tum", "tup", "tut", "tvl", "tw", */ "tso", "tsi", "tat", "tum", "tup", "tut", "tvl", "twi", /* "ty", "tyv", "ug", "uga", "uk", "umb", "und", "ur", */ "tah", "tyv", "uig", "uga", "ukr", "umb", "und", "urd", /* "uz", "vai", "ve", "vi", "vo", "vot", "wa", "wak", */ "uzb", "vai", "ven", "vie", "vol", "vot", "wln", "wak", /* "wal", "war", "was", "wen", "wo", "xh", "yao", "yap", */ "wal", "war", "was", "wen", "wol", "xho", "yao", "yap", /* "yi", "yo", "ypk", "za", "zap", "zen", "zh", "znd", */ "yid", "yor", "ypk", "zha", "zap", "zen", "zho", "znd", /* "zu", "zun", */ "zul", "zun", NULL, /* "in", "iw", "ji", "jw", "sh", */ "ind", "heb", "yid", "jaw", "srp", NULL }; /* ZR(ZAR) is now CD(COD) and FX(FXX) is PS(PSE) as per http://www.evertype.com/standards/iso3166/iso3166-1-en.html added new codes keeping the old ones for compatibility updated to include 1999/12/03 revisions *CWB*/ /* RO(ROM) is now RO(ROU) according to http://www.iso.org/iso/en/prods-services/iso3166ma/03updates-on-iso-3166/nlv3e-rou.html */ /* This list MUST be in sorted order, and MUST contain only two-letter codes! */ static const char * const _countries[] = { "AD", "AE", "AF", "AG", "AI", "AL", "AM", "AN", "AO", "AQ", "AR", "AS", "AT", "AU", "AW", "AZ", "BA", "BB", "BD", "BE", "BF", "BG", "BH", "BI", "BJ", "BM", "BN", "BO", "BR", "BS", "BT", "BV", "BW", "BY", "BZ", "CA", "CC", "CD", "CF", "CG", "CH", "CI", "CK", "CL", "CM", "CN", "CO", "CR", "CU", "CV", "CX", "CY", "CZ", "DE", "DJ", "DK", "DM", "DO", "DZ", "EC", "EE", "EG", "EH", "ER", "ES", "ET", "FI", "FJ", "FK", "FM", "FO", "FR", "GA", "GB", "GD", "GE", "GF", "GH", "GI", "GL", "GM", "GN", "GP", "GQ", "GR", "GS", "GT", "GU", "GW", "GY", "HK", "HM", "HN", "HR", "HT", "HU", "ID", "IE", "IL", "IN", "IO", "IQ", "IR", "IS", "IT", "JM", "JO", "JP", "KE", "KG", "KH", "KI", "KM", "KN", "KP", "KR", "KW", "KY", "KZ", "LA", "LB", "LC", "LI", "LK", "LR", "LS", "LT", "LU", "LV", "LY", "MA", "MC", "MD", "MG", "MH", "MK", "ML", "MM", "MN", "MO", "MP", "MQ", "MR", "MS", "MT", "MU", "MV", "MW", "MX", "MY", "MZ", "NA", "NC", "NE", "NF", "NG", "NI", "NL", "NO", "NP", "NR", "NU", "NZ", "OM", "PA", "PE", "PF", "PG", "PH", "PK", "PL", "PM", "PN", "PR", "PS", "PT", "PW", "PY", "QA", "RE", "RO", "RU", "RW", "SA", "SB", "SC", "SD", "SE", "SG", "SH", "SI", "SJ", "SK", "SL", "SM", "SN", "SO", "SR", "ST", "SV", "SY", "SZ", "TC", "TD", "TF", "TG", "TH", "TJ", "TK", "TL", "TM", "TN", "TO", "TR", "TT", "TV", "TW", "TZ", "UA", "UG", "UM", "US", "UY", "UZ", "VA", "VC", "VE", "VG", "VI", "VN", "VU", "WF", "WS", "YE", "YT", "YU", "ZA", "ZM", "ZW", NULL, "FX", "RO", "TP", "ZR", /* obsolete country codes */ NULL }; /* This list MUST contain a three-letter code for every two-letter code in the above list, and they MUST be listed in the same order! */ static const char * const _countries3[] = { /* "AD", "AE", "AF", "AG", "AI", "AL", "AM", "AN", */ "AND", "ARE", "AFG", "ATG", "AIA", "ALB", "ARM", "ANT", /* "AO", "AQ", "AR", "AS", "AT", "AU", "AW", "AZ", */ "AGO", "ATA", "ARG", "ASM", "AUT", "AUS", "ABW", "AZE", /* "BA", "BB", "BD", "BE", "BF", "BG", "BH", "BI", */ "BIH", "BRB", "BGD", "BEL", "BFA", "BGR", "BHR", "BDI", /* "BJ", "BM", "BN", "BO", "BR", "BS", "BT", "BV", */ "BEN", "BMU", "BRN", "BOL", "BRA", "BHS", "BTN", "BVT", /* "BW", "BY", "BZ", "CA", "CC", "CD", "CF", "CG", */ "BWA", "BLR", "BLZ", "CAN", "CCK", "COD", "CAF", "COG", /* "CH", "CI", "CK", "CL", "CM", "CN", "CO", "CR", */ "CHE", "CIV", "COK", "CHL", "CMR", "CHN", "COL", "CRI", /* "CU", "CV", "CX", "CY", "CZ", "DE", "DJ", "DK", */ "CUB", "CPV", "CXR", "CYP", "CZE", "DEU", "DJI", "DNK", /* "DM", "DO", "DZ", "EC", "EE", "EG", "EH", "ER", */ "DMA", "DOM", "DZA", "ECU", "EST", "EGY", "ESH", "ERI", /* "ES", "ET", "FI", "FJ", "FK", "FM", "FO", "FR", */ "ESP", "ETH", "FIN", "FJI", "FLK", "FSM", "FRO", "FRA", /* "GA", "GB", "GD", "GE", "GF", "GH", "GI", "GL", */ "GAB", "GBR", "GRD", "GEO", "GUF", "GHA", "GIB", "GRL", /* "GM", "GN", "GP", "GQ", "GR", "GS", "GT", "GU", */ "GMB", "GIN", "GLP", "GNQ", "GRC", "SGS", "GTM", "GUM", /* "GW", "GY", "HK", "HM", "HN", "HR", "HT", "HU", */ "GNB", "GUY", "HKG", "HMD", "HND", "HRV", "HTI", "HUN", /* "ID", "IE", "IL", "IN", "IO", "IQ", "IR", "IS", */ "IDN", "IRL", "ISR", "IND", "IOT", "IRQ", "IRN", "ISL", /* "IT", "JM", "JO", "JP", "KE", "KG", "KH", "KI", */ "ITA", "JAM", "JOR", "JPN", "KEN", "KGZ", "KHM", "KIR", /* "KM", "KN", "KP", "KR", "KW", "KY", "KZ", "LA", */ "COM", "KNA", "PRK", "KOR", "KWT", "CYM", "KAZ", "LAO", /* "LB", "LC", "LI", "LK", "LR", "LS", "LT", "LU", */ "LBN", "LCA", "LIE", "LKA", "LBR", "LSO", "LTU", "LUX", /* "LV", "LY", "MA", "MC", "MD", "MG", "MH", "MK", */ "LVA", "LBY", "MAR", "MCO", "MDA", "MDG", "MHL", "MKD", /* "ML", "MM", "MN", "MO", "MP", "MQ", "MR", "MS", */ "MLI", "MMR", "MNG", "MAC", "MNP", "MTQ", "MRT", "MSR", /* "MT", "MU", "MV", "MW", "MX", "MY", "MZ", "NA", */ "MLT", "MUS", "MDV", "MWI", "MEX", "MYS", "MOZ", "NAM", /* "NC", "NE", "NF", "NG", "NI", "NL", "NO", "NP", */ "NCL", "NER", "NFK", "NGA", "NIC", "NLD", "NOR", "NPL", /* "NR", "NU", "NZ", "OM", "PA", "PE", "PF", "PG", */ "NRU", "NIU", "NZL", "OMN", "PAN", "PER", "PYF", "PNG", /* "PH", "PK", "PL", "PM", "PN", "PR", "PS", "PT", */ "PHL", "PAK", "POL", "SPM", "PCN", "PRI", "PSE", "PRT", /* "PW", "PY", "QA", "RE", "RO", "RU", "RW", "SA", */ "PLW", "PRY", "QAT", "REU", "ROU", "RUS", "RWA", "SAU", /* "SB", "SC", "SD", "SE", "SG", "SH", "SI", "SJ", */ "SLB", "SYC", "SDN", "SWE", "SGP", "SHN", "SVN", "SJM", /* "SK", "SL", "SM", "SN", "SO", "SR", "ST", "SV", */ "SVK", "SLE", "SMR", "SEN", "SOM", "SUR", "STP", "SLV", /* "SY", "SZ", "TC", "TD", "TF", "TG", "TH", "TJ", */ "SYR", "SWZ", "TCA", "TCD", "ATF", "TGO", "THA", "TJK", /* "TK", "TL", "TM", "TN", "TO", "TR", "TT", "TV", */ "TKL", "TLS", "TKM", "TUN", "TON", "TUR", "TTO", "TUV", /* "TW", "TZ", "UA", "UG", "UM", "US", "UY", "UZ", */ "TWN", "TZA", "UKR", "UGA", "UMI", "USA", "URY", "UZB", /* "VA", "VC", "VE", "VG", "VI", "VN", "VU", "WF", */ "VAT", "VCT", "VEN", "VGB", "VIR", "VNM", "VUT", "WLF", /* "WS", "YE", "YT", "YU", "ZA", "ZM", "ZW", */ "WSM", "YEM", "MYT", "YUG", "ZAF", "ZMB", "ZWE", NULL, /* "FX", "RO", "TP", "ZR", */ "FXX", "ROM", "TMP", "ZAR", NULL }; /******************************************************************************* Implementation function definitions *******************************************************************************/ /*returns TRUE if a is an ID separator FALSE otherwise*/ #define _isIDSeparator(a) (a == '_' || a == '-') #define _isPrefixLetter(a) ((a=='x')||(a=='X')||(a=='i')||(a=='I')) /*returns TRUE if one of the special prefixes is here (s=string) 'x-' or 'i-' */ #define _isIDPrefix(s) (_isPrefixLetter(s[0])&&_isIDSeparator(s[1])) /* Dot terminates it because of POSIX form where dot precedes the codepage * except for variant */ #define _isTerminator(a) ((a==0)||(a=='.')||(a=='@')) static int16_t _findIndex(const char* const* list, const char* key) { const char* const* anchor = list; while (*list) { if (uprv_strcmp(key, *list) == 0) { return (int16_t)(list - anchor); } list++; } list++; /* skip first NULL *CWB*/ while (*list) /* scan obsolete table */ { if (uprv_strcmp(key, *list) == 0) { return (int16_t)(list - anchor); } list++; } return -1; } /* count the length of src while copying it to dest; return strlen(src) */ static U_INLINE int32_t _copyCount(char *dest, int32_t destCapacity, const char *src) { const char *anchor; char c; anchor=src; for(;;) { if((c=*src)==0) { return (int32_t)(src-anchor); } if(destCapacity<=0) { return (int32_t)((src-anchor)+uprv_strlen(src)); } ++src; *dest++=c; --destCapacity; } } /******************************************************************************* API function definitions *******************************************************************************/ U_CAPI const char* U_EXPORT2 uloc_getDefault() { return locale_get_default(); } U_CAPI void U_EXPORT2 uloc_setDefault(const char* newDefaultLocale, UErrorCode* err) { if (U_FAILURE(*err)) return; /* the error code isn't currently used for anything by this function*/ /* propagate change to C++ */ locale_set_default(newDefaultLocale); } U_CAPI int32_t U_EXPORT2 uloc_getParent(const char* localeID, char* parent, int32_t parentCapacity, UErrorCode* err) { const char *lastUnderscore; int32_t i; if (U_FAILURE(*err)) return 0; if (localeID == NULL) localeID = uloc_getDefault(); lastUnderscore=uprv_strrchr(localeID, '_'); if(lastUnderscore!=NULL) { i=(int32_t)(lastUnderscore-localeID); } else { i=0; } if(i>0) { uprv_memcpy(parent, localeID, uprv_min(i, parentCapacity)); } return u_terminateChars(parent, parentCapacity, i, err); } /* * the internal functions _getLanguage(), _getCountry(), _getVariant() * avoid duplicating code to handle the earlier locale ID pieces * in the functions for the later ones by * setting the *pEnd pointer to where they stopped parsing * * TODO try to use this in Locale */ static int32_t _getLanguage(const char *localeID, char *language, int32_t languageCapacity, const char **pEnd) { int32_t i=0; int32_t offset; char lang[4]={ 0, 0, 0, 0 }; /* temporary buffer to hold language code for searching */ /* if it starts with i- or x- then copy that prefix */ if(_isIDPrefix(localeID)) { if(i=0) { i=_copyCount(language, languageCapacity, _languages[offset]); } } if(pEnd!=NULL) { *pEnd=localeID; } return i; } U_CAPI int32_t U_EXPORT2 uloc_getLanguage(const char* localeID, char* language, int32_t languageCapacity, UErrorCode* err) { /* uloc_getLanguage will return a 2 character iso-639 code if one exists. *CWB*/ int32_t i=0; if (err==NULL || U_FAILURE(*err)) { return 0; } if(localeID==NULL) { localeID=uloc_getDefault(); } i=_getLanguage(localeID, language, languageCapacity, NULL); return u_terminateChars(language, languageCapacity, i, err); } static int32_t _getScript(const char *localeID, char *script, int32_t scriptCapacity, const char **pEnd) { int32_t idLen = 0; if (pEnd != NULL) { *pEnd = localeID; } /* copy the country as far as possible and count its length */ while(!_isTerminator(localeID[idLen]) && !_isIDSeparator(localeID[idLen])) { idLen++; } /* If it's exactly 4 characters long, then it's a script and not a country. */ if (idLen == 4) { int32_t i; if (pEnd != NULL) { *pEnd = localeID+idLen; } if(idLen > scriptCapacity) { idLen = scriptCapacity; } if (idLen >= 1) { script[0]=(char)uprv_toupper(*(localeID++)); } for (i = 1; i < idLen; i++) { script[i]=(char)uprv_tolower(*(localeID++)); } } else { idLen = 0; } return idLen; } U_CAPI int32_t U_EXPORT2 uloc_getScript(const char* localeID, char* script, int32_t scriptCapacity, UErrorCode* err) { int32_t i=0; if(err==NULL || U_FAILURE(*err)) { return 0; } if(localeID==NULL) { localeID=uloc_getDefault(); } /* skip the language */ _getLanguage(localeID, NULL, 0, &localeID); if(_isIDSeparator(*localeID)) { i=_getScript(localeID+1, script, scriptCapacity, NULL); } return u_terminateChars(script, scriptCapacity, i, err); } static int32_t _getCountry(const char *localeID, char *country, int32_t countryCapacity, const char **pEnd) { int32_t i=0; char cnty[ULOC_COUNTRY_CAPACITY]={ 0, 0, 0, 0 }; int32_t offset; /* copy the country as far as possible and count its length */ while(!_isTerminator(*localeID) && !_isIDSeparator(*localeID)) { if(i=0) { i=_copyCount(country, countryCapacity, _countries[offset]); } } if(pEnd!=NULL) { *pEnd=localeID; } return i; } U_CAPI int32_t U_EXPORT2 uloc_getCountry(const char* localeID, char* country, int32_t countryCapacity, UErrorCode* err) { int32_t i=0; if(err==NULL || U_FAILURE(*err)) { return 0; } if(localeID==NULL) { localeID=uloc_getDefault(); } /* Skip the language */ _getLanguage(localeID, NULL, 0, &localeID); if(_isIDSeparator(*localeID)) { const char *scriptID; /* Skip the script if available */ _getScript(localeID+1, NULL, 0, &scriptID); if(scriptID != localeID+1) { /* Found optional script */ localeID = scriptID; } if(_isIDSeparator(*localeID)) { i=_getCountry(localeID+1, country, countryCapacity, NULL); } } return u_terminateChars(country, countryCapacity, i, err); } static int32_t _getVariant(const char *localeID, char prev, char *variant, int32_t variantCapacity) { int32_t i=0; /* get one or more variant tags and separate them with '_' */ if(_isIDSeparator(prev)) { /* get a variant string after a '-' or '_' */ while(!_isTerminator(*localeID)) { if(ikeyword; const char* rightString = ((const keywordStruct *)right)->keyword; return uprv_strcmp(leftString, rightString); } U_CFUNC int32_t locale_getKeywords(const char *localeID, char prev, char *keywords, int32_t keywordCapacity, char *values, int32_t valuesCapacity, int32_t *valLen, UBool valuesToo, UErrorCode *status) { keywordStruct keywordList[ULOC_MAX_NO_KEYWORDS]; int32_t maxKeywords = ULOC_MAX_NO_KEYWORDS; int32_t numKeywords = 0; const char* startSearchHere = localeID; const char* nextSeparator = NULL; int32_t i = 0; int32_t keywordsLen = 0; int32_t valuesLen = 0; if(prev == '@') { /* start of keyword definition */ /* we will grab pairs, trim spaces, lowercase keywords, sort and return */ do { if(numKeywords == maxKeywords) { *status = U_INTERNAL_PROGRAM_ERROR; return 0; } /* skip leading spaces (allowed?) */ while(*startSearchHere == ' ') { startSearchHere++; } nextSeparator = uprv_strchr(startSearchHere, ULOC_KEYWORD_ASSIGN); /* need to normalize both keyword and keyword name */ if(!nextSeparator) { *status = U_INVALID_FORMAT_ERROR; return 0; } if(nextSeparator - startSearchHere >= ULOC_KEYWORD_BUFFER_LEN) { /* keyword name too long for internal buffer */ *status = U_INTERNAL_PROGRAM_ERROR; return 0; } for(i = 0; i < nextSeparator - startSearchHere; i++) { keywordList[numKeywords].keyword[i] = uprv_tolower(startSearchHere[i]); } /* trim trailing spaces */ while(keywordList[numKeywords].keyword[i-1] == ' ') { i--; } keywordList[numKeywords].keyword[i] = 0; keywordList[numKeywords].keywordLen = i; /* now grab the value part. First we skip the '=' */ nextSeparator++; /* then we leading spaces */ while(*nextSeparator == ' ') { nextSeparator++; } keywordList[numKeywords].valueStart = nextSeparator; startSearchHere = strchr(nextSeparator, ULOC_KEYWORD_ITEM_SEPARATOR); i = 0; if(startSearchHere) { while(*(startSearchHere - i - 1) == ' ') { i++; } keywordList[numKeywords].valueLen = startSearchHere - nextSeparator - i; startSearchHere++; } else { i = uprv_strlen(nextSeparator); while(nextSeparator[i-1] == ' ') { i--; } keywordList[numKeywords].valueLen = i; } numKeywords++; } while(startSearchHere); /* now we have a list of keywords */ /* we need to sort it */ uprv_sortArray(keywordList, numKeywords, sizeof(keywordStruct), compareKeywordStructs, NULL, FALSE, status); /* Now construct the keyword part */ for(i = 0; i < numKeywords; i++) { if(keywordsLen + keywordList[i].keywordLen + 1< keywordCapacity) { uprv_strcpy(keywords+keywordsLen, keywordList[i].keyword); if(valuesToo) { keywords[keywordsLen + keywordList[i].keywordLen] = '='; } else { keywords[keywordsLen + keywordList[i].keywordLen] = 0; } } keywordsLen += keywordList[i].keywordLen + 1; if(valuesToo) { if(keywordsLen + keywordList[i].valueLen < keywordCapacity) { uprv_strncpy(keywords+keywordsLen, keywordList[i].valueStart, keywordList[i].valueLen); } keywordsLen += keywordList[i].valueLen; if(i < numKeywords - 1) { if(keywordsLen < keywordCapacity) { keywords[keywordsLen] = ';'; } keywordsLen++; } } if(values) { if(valuesLen + keywordList[i].valueLen + 1< valuesCapacity) { uprv_strcpy(values+valuesLen, keywordList[i].valueStart); values[valuesLen + keywordList[i].valueLen] = 0; } valuesLen += keywordList[i].valueLen + 1; } } if(values) { values[valuesLen] = 0; if(valLen) { *valLen = valuesLen; } } return u_terminateChars(keywords, keywordCapacity, keywordsLen, status); } else { return 0; } } U_CAPI int32_t U_EXPORT2 uloc_getVariant(const char* localeID, char* variant, int32_t variantCapacity, UErrorCode* err) { int32_t i=0; UBool haveVariant=FALSE; if(err==NULL || U_FAILURE(*err)) { return 0; } if(localeID==NULL) { localeID=uloc_getDefault(); } /* Skip the language */ _getLanguage(localeID, NULL, 0, &localeID); if(_isIDSeparator(*localeID)) { const char *scriptID; /* Skip the script if available */ _getScript(localeID+1, NULL, 0, &scriptID); if(scriptID != localeID+1) { /* Found optional script */ localeID = scriptID; } /* Skip the Country */ if (_isIDSeparator(*localeID)) { _getCountry(localeID+1, NULL, 0, &localeID); if(_isIDSeparator(*localeID)) { haveVariant=TRUE; i=_getVariant(localeID+1, *localeID, variant, variantCapacity); } } } /* if we do not have a variant tag yet then try a POSIX variant after '@' */ if(!haveVariant && (localeID=uprv_strrchr(localeID, '@'))!=NULL) { i=_getVariant(localeID+1, '@', variant, variantCapacity); } return u_terminateChars(variant, variantCapacity, i, err); } typedef struct UKeywordsContext { char* keywords; char* current; } UKeywordsContext; static void U_CALLCONV uloc_kw_closeKeywords(UEnumeration *enumerator) { uprv_free(((UKeywordsContext *)enumerator->context)->keywords); uprv_free(enumerator->context); uprv_free(enumerator); } static int32_t U_CALLCONV uloc_kw_countKeywords(UEnumeration *en, UErrorCode *status) { char *kw = ((UKeywordsContext *)en->context)->keywords; int32_t result = 0; while(*kw) { result++; kw += uprv_strlen(kw)+1; } return result; } static const char* U_CALLCONV uloc_kw_nextKeyword(UEnumeration* en, int32_t* resultLength, UErrorCode* status) { const char* result = ((UKeywordsContext *)en->context)->current; if(*result) { *resultLength = uprv_strlen(((UKeywordsContext *)en->context)->current); ((UKeywordsContext *)en->context)->current += *resultLength+1; } else { *resultLength = 0; result = NULL; } return result; } static void U_CALLCONV uloc_kw_resetKeywords(UEnumeration* en, UErrorCode* status) { ((UKeywordsContext *)en->context)->current = ((UKeywordsContext *)en->context)->keywords; } static const UEnumeration gKeywordsEnum = { NULL, NULL, uloc_kw_closeKeywords, uloc_kw_countKeywords, uenum_unextDefault, uloc_kw_nextKeyword, uloc_kw_resetKeywords }; U_CAPI UEnumeration* U_EXPORT2 uloc_getKeywords(const char* localeID, UErrorCode* status) { int32_t i=0; char keywords[256]; int32_t keywordsCapacity = 256; UKeywordsContext *myContext = NULL; UEnumeration *result = NULL; if(status==NULL || U_FAILURE(*status)) { return 0; } if(localeID==NULL) { localeID=uloc_getDefault(); } /* Skip the language */ _getLanguage(localeID, NULL, 0, &localeID); if(_isIDSeparator(*localeID)) { const char *scriptID; /* Skip the script if available */ _getScript(localeID+1, NULL, 0, &scriptID); if(scriptID != localeID+1) { /* Found optional script */ localeID = scriptID; } /* Skip the Country */ if (_isIDSeparator(*localeID)) { _getCountry(localeID+1, NULL, 0, &localeID); if(_isIDSeparator(*localeID)) { _getVariant(localeID+1, *localeID, NULL, 0); } } } /* keywords are located after '@' */ if((localeID = uprv_strchr(localeID, '@')) != NULL) { i=locale_getKeywords(localeID+1, '@', keywords, keywordsCapacity, NULL, 0, NULL, FALSE, status); } if(i) { result = (UEnumeration *)uprv_malloc(sizeof(UEnumeration)); uprv_memcpy(result, &gKeywordsEnum, sizeof(UEnumeration)); myContext = uprv_malloc(sizeof(UKeywordsContext)); if (myContext == NULL) { *status = U_MEMORY_ALLOCATION_ERROR; uprv_free(result); return NULL; } myContext->keywords = (char *)uprv_malloc(i+1); uprv_memcpy(myContext->keywords, keywords, i); myContext->keywords[i] = 0; myContext->current = myContext->keywords; result->context = myContext; } return result; /*return u_terminateChars(keywords, keywordsCapacity, i, status);*/ } static int32_t uloc_getNameInternal(const char* localeID, char* name, int32_t nameCapacity, UBool stripKeywords, UErrorCode* err) { int32_t i, fieldCount; UBool alreadyAddedAKeyword = FALSE; if(err==NULL || U_FAILURE(*err)) { return 0; } if(localeID==NULL) { localeID=uloc_getDefault(); } /* get all pieces, one after another, and separate with '_' */ fieldCount=0; i=_getLanguage(localeID, name, nameCapacity, &localeID); if(_isIDSeparator(*localeID)) { int32_t scriptSize; const char *scriptID; ++fieldCount; if(i 0) { /* Found optional script */ localeID = scriptID; ++fieldCount; i+=scriptSize; if (_isIDSeparator(*localeID)) { /* If there is something else, then we add the _ */ if(i keywordIndicator)) { if(i (nameCapacity - len)) { euroDiff -= (nameCapacity - len); } uprv_strncpy(euroVariant, "@currency=EUR", euroKeyLen); u_terminateChars(localeBuffer, sizeof(localeBuffer), len, err); } minLen = len; if (minLen > nameCapacity) { /* Pin the length */ minLen = nameCapacity; } if (minLen < nameCapacity) { uprv_strncpy(name, localeBuffer, minLen); } u_terminateChars(name, nameCapacity, len, err); } else { /* It's too long. We can't convert anything meaningful out of this. */ *err = U_ZERO_ERROR; len = uloc_getName(localeID, name, nameCapacity, err); } return len; } U_CAPI const char* U_EXPORT2 uloc_getISO3Language(const char* localeID) { int16_t offset; char lang[ULOC_LANG_CAPACITY]; UErrorCode err = U_ZERO_ERROR; if (localeID == NULL) { localeID = uloc_getDefault(); } uloc_getLanguage(localeID, lang, ULOC_LANG_CAPACITY, &err); if (U_FAILURE(err)) return ""; offset = _findIndex(_languages, lang); if (offset < 0) return ""; return _languages3[offset]; } U_CAPI const char* U_EXPORT2 uloc_getISO3Country(const char* localeID) { int16_t offset; char cntry[ULOC_LANG_CAPACITY]; UErrorCode err = U_ZERO_ERROR; if (localeID == NULL) { localeID = uloc_getDefault(); } uloc_getCountry(localeID, cntry, ULOC_LANG_CAPACITY, &err); if (U_FAILURE(err)) return ""; offset = _findIndex(_countries, cntry); if (offset < 0) return ""; return _countries3[offset]; } U_CAPI uint32_t U_EXPORT2 uloc_getLCID(const char* localeID) { UErrorCode err = U_ZERO_ERROR; return uprv_convertToLCID(localeID, &err); } /* * Lookup a resource bundle table item with fallback on the table level. * Regular resource bundle lookups perform fallback to parent locale bundles * and eventually the root bundle, but only for top-level items. * This function takes the name of a top-level table and of an item in that table * and performs a lookup of both, falling back until a bundle contains a table * with this item. * * Note: Only the opening of entire bundles falls back through the default locale * before root. Once a bundle is open, item lookups do not go through the * default locale because that would result in a mix of languages that is * unpredictable to the programmer and most likely useless. */ static const UChar * _res_getTableStringWithFallback(const char *path, const char *locale, const char *tableKey, const char *itemKey, int32_t *pLength, UErrorCode *pErrorCode) { char localeBuffer[80]; UResourceBundle *rb, table; const UChar *item; UErrorCode errorCode; char explicitFallbackName[80] = {0}; int32_t efnLen =0; const char* rootName = "root"; const UChar* ef = NULL; UBool overrideExplicitFallback = FALSE; for(;;) { /* * open the bundle for the current locale * this falls back through the locale's chain to root */ errorCode=U_ZERO_ERROR; rb=ures_open(path, locale, &errorCode); if(U_FAILURE(errorCode)) { /* total failure, not even root could be opened */ *pErrorCode=errorCode; return NULL; } else if(errorCode==U_USING_DEFAULT_WARNING || (errorCode==U_USING_FALLBACK_WARNING && *pErrorCode!=U_USING_DEFAULT_WARNING) ) { /* set the "strongest" error code (success->fallback->default->failure) */ *pErrorCode=errorCode; } /* * try to open the requested table * this falls back through the locale's chain to root, but not through the default locale */ errorCode=U_ZERO_ERROR; ures_initStackObject(&table); ures_getByKey(rb, tableKey, &table, &errorCode); if(U_FAILURE(errorCode)) { /* no such table anywhere in this fallback chain */ ures_close(rb); *pErrorCode=errorCode; return NULL; } else if(errorCode==U_USING_DEFAULT_WARNING || (errorCode==U_USING_FALLBACK_WARNING && *pErrorCode!=U_USING_DEFAULT_WARNING) ) { /* set the "strongest" error code (success->fallback->default->failure) */ *pErrorCode=errorCode; } /* check if the fallback token is set */ ef = ures_getStringByKey(&table, "Fallback", &efnLen, &errorCode); if(U_SUCCESS(errorCode)){ /* set the fallback chain */ u_UCharsToChars(ef, explicitFallbackName, efnLen); /* null terminate the buffer */ explicitFallbackName[efnLen]=0; }else if(errorCode==U_USING_DEFAULT_WARNING || (errorCode==U_USING_FALLBACK_WARNING && *pErrorCode!=U_USING_DEFAULT_WARNING) ) { /* set the "strongest" error code (success->fallback->default->failure) */ *pErrorCode=errorCode; } /* try to open the requested item in the table */ errorCode=U_ZERO_ERROR; item=ures_getStringByKey(&table, itemKey, pLength, &errorCode); if(U_SUCCESS(errorCode)) { /* if the item for the key is empty ... override the explicit fall back set */ if(item[0]==0 && efnLen > 0){ overrideExplicitFallback = TRUE; }else{ /* we got the requested item! */ ures_close(&table); ures_close(rb); if(errorCode==U_USING_DEFAULT_WARNING || (errorCode==U_USING_FALLBACK_WARNING && *pErrorCode!=U_USING_DEFAULT_WARNING) ) { /* set the "strongest" error code (success->fallback->default->failure) */ *pErrorCode=errorCode; } /* * It is safe to close the bundle and still return the * string pointer because resource bundles are * cached until u_cleanup(). */ return item; } } /* * We get here if the item was not found. * We will follow the chain to the parent locale bundle and look in * the table there. */ /* get the real locale ID for this table */ errorCode=U_ZERO_ERROR; locale=ures_getLocale(&table, &errorCode); /* keep table and rb open until we are done using the locale string owned by the table bundle */ if(U_FAILURE(errorCode)) { /* error getting the locale ID for an open RB - should never happen */ ures_close(&table); ures_close(rb); *pErrorCode=U_INTERNAL_PROGRAM_ERROR; return NULL; } if(*locale==0 || 0==uprv_strcmp(locale, "root") || 0==uprv_strcmp(locale,explicitFallbackName)) { /* end of fallback; even root does not have the requested item either */ ures_close(&table); ures_close(rb); *pErrorCode=U_MISSING_RESOURCE_ERROR; return NULL; } /* could not find the table, or its item, try to fall back to a different RB and table */ errorCode=U_ZERO_ERROR; if(efnLen > 0 && overrideExplicitFallback == FALSE){ /* continue the fallback lookup with the explicit fallback that is requested */ locale = explicitFallbackName; }else{ uloc_getParent(locale, localeBuffer, sizeof(localeBuffer), &errorCode); if(U_FAILURE(errorCode) || errorCode==U_STRING_NOT_TERMINATED_WARNING) { /* error getting the parent locale ID - should never happen */ *pErrorCode=U_INTERNAL_PROGRAM_ERROR; return NULL; } /* continue the fallback lookup with the parent locale ID */ locale=localeBuffer; } /* done with the locale string - ready to close table and rb */ ures_close(&table); ures_close(rb); } } static int32_t _getStringOrCopyKey(const char *path, const char *locale, const char *tableKey, const char *itemKey, const char *substitute, UChar *dest, int32_t destCapacity, UErrorCode *pErrorCode) { const UChar *s; int32_t length; if(itemKey==NULL) { /* top-level item: normal resource bundle access */ UResourceBundle *rb; rb=ures_open(path, locale, pErrorCode); if(U_SUCCESS(*pErrorCode)) { s=ures_getStringByKey(rb, tableKey, &length, pErrorCode); /* see comment about closing rb near "return item;" in _res_getTableStringWithFallback() */ ures_close(rb); } } else { /* second-level item, use special fallback */ s=_res_getTableStringWithFallback(path, locale, tableKey, itemKey, &length, pErrorCode); } if(U_SUCCESS(*pErrorCode)) { int32_t copyLength=uprv_min(length, destCapacity); if(copyLength>0) { u_memcpy(dest, s, copyLength); } } else { /* no string from a resource bundle: convert the substitute */ length=(int32_t)uprv_strlen(substitute); u_charsToUChars(substitute, dest, uprv_min(length, destCapacity)); *pErrorCode=U_USING_DEFAULT_WARNING; } return u_terminateUChars(dest, destCapacity, length, pErrorCode); } U_CAPI int32_t U_EXPORT2 uloc_getDisplayLanguage(const char *locale, const char *displayLocale, UChar *dest, int32_t destCapacity, UErrorCode *pErrorCode) { char localeBuffer[ULOC_FULLNAME_CAPACITY*4]; int32_t length; /* argument checking */ if(pErrorCode==NULL || U_FAILURE(*pErrorCode)) { return 0; } if(destCapacity<0 || (destCapacity>0 && dest==NULL)) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } *pErrorCode=U_ZERO_ERROR; /* necessary because we will check for a warning code */ length=uloc_getLanguage(locale, localeBuffer, sizeof(localeBuffer), pErrorCode); if(U_FAILURE(*pErrorCode) || *pErrorCode==U_STRING_NOT_TERMINATED_WARNING) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } if(length==0) { return u_terminateUChars(dest, destCapacity, 0, pErrorCode); } return _getStringOrCopyKey(NULL, displayLocale, _kLanguages, localeBuffer, localeBuffer, dest, destCapacity, pErrorCode); } U_CAPI int32_t U_EXPORT2 uloc_getDisplayScript(const char* locale, const char* displayLocale, UChar *dest, int32_t destCapacity, UErrorCode *pErrorCode) { char localeBuffer[ULOC_FULLNAME_CAPACITY*4]; int32_t length; /* argument checking */ if(pErrorCode==NULL || U_FAILURE(*pErrorCode)) { return 0; } if(destCapacity<0 || (destCapacity>0 && dest==NULL)) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } *pErrorCode=U_ZERO_ERROR; /* necessary because we will check for a warning code */ length=uloc_getScript(locale, localeBuffer, sizeof(localeBuffer), pErrorCode); if(U_FAILURE(*pErrorCode) || *pErrorCode==U_STRING_NOT_TERMINATED_WARNING) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } if(length==0) { return u_terminateUChars(dest, destCapacity, 0, pErrorCode); } return _getStringOrCopyKey(NULL, displayLocale, _kScripts, localeBuffer, localeBuffer, dest, destCapacity, pErrorCode); } U_CAPI int32_t U_EXPORT2 uloc_getDisplayCountry(const char *locale, const char *displayLocale, UChar *dest, int32_t destCapacity, UErrorCode *pErrorCode) { char localeBuffer[ULOC_FULLNAME_CAPACITY*4]; int32_t length; /* argument checking */ if(pErrorCode==NULL || U_FAILURE(*pErrorCode)) { return 0; } if(destCapacity<0 || (destCapacity>0 && dest==NULL)) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } *pErrorCode=U_ZERO_ERROR; /* necessary because we will check for a warning code */ length=uloc_getCountry(locale, localeBuffer, sizeof(localeBuffer), pErrorCode); if(U_FAILURE(*pErrorCode) || *pErrorCode==U_STRING_NOT_TERMINATED_WARNING) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } if(length==0) { return u_terminateUChars(dest, destCapacity, 0, pErrorCode); } return _getStringOrCopyKey(NULL, displayLocale, _kCountries, localeBuffer, localeBuffer, dest, destCapacity, pErrorCode); } /* * TODO separate variant1_variant2_variant3... * by getting each tag's display string and concatenating them with ", " * in between - similar to uloc_getDisplayName() */ U_CAPI int32_t U_EXPORT2 uloc_getDisplayVariant(const char *locale, const char *displayLocale, UChar *dest, int32_t destCapacity, UErrorCode *pErrorCode) { char localeBuffer[ULOC_FULLNAME_CAPACITY*4]; int32_t length; /* argument checking */ if(pErrorCode==NULL || U_FAILURE(*pErrorCode)) { return 0; } if(destCapacity<0 || (destCapacity>0 && dest==NULL)) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } /* * display names for variants are top-level items of * locale resource bundles */ *pErrorCode=U_ZERO_ERROR; /* necessary because we will check for a warning code */ length=uloc_getVariant(locale, localeBuffer, sizeof(localeBuffer), pErrorCode); if(U_FAILURE(*pErrorCode) || *pErrorCode==U_STRING_NOT_TERMINATED_WARNING) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } if(length==0) { return u_terminateUChars(dest, destCapacity, 0, pErrorCode); } /* pass itemKey=NULL to look for a top-level item */ return _getStringOrCopyKey(NULL, displayLocale, _kVariants, localeBuffer, localeBuffer, dest, destCapacity, pErrorCode); } U_CAPI int32_t U_EXPORT2 uloc_getDisplayName(const char *locale, const char *displayLocale, UChar *dest, int32_t destCapacity, UErrorCode *pErrorCode) { int32_t length, length2; UBool hasLanguage, hasScript, hasCountry, hasVariant; /* argument checking */ if(pErrorCode==NULL || U_FAILURE(*pErrorCode)) { return 0; } if(destCapacity<0 || (destCapacity>0 && dest==NULL)) { *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; return 0; } /* * if there is a language, then write "language (country, variant)" * otherwise write "country, variant" */ /* write the language */ length=uloc_getDisplayLanguage(locale, displayLocale, dest, destCapacity, pErrorCode); hasLanguage= length>0; if(hasLanguage) { /* append " (" */ if(length0; length+=length2; if(hasScript) { /* append ", " */ if(length0; length+=length2; if(hasCountry) { /* append ", " */ if(length0; length+=length2; if ((hasScript && !hasCountry) || (hasScript || hasCountry) && !hasVariant) { /* remove ", " */ length-=2; } if (hasLanguage && (hasScript || hasCountry || hasVariant)) { /* append ")" */ if(length _installedLocalesCount) return NULL; return _installedLocales[offset]; } U_CAPI int32_t U_EXPORT2 uloc_countAvailable() { _load_installedLocales(); return _installedLocalesCount; } UBool uloc_cleanup(void) { char ** temp; if (_installedLocales) { temp = _installedLocales; _installedLocales = NULL; _installedLocalesCount = 0; uprv_free(temp); } return TRUE; } /** * Returns a list of all language codes defined in ISO 639. This is a pointer * to an array of pointers to arrays of char. All of these pointers are owned * by ICU-- do not delete them, and do not write through them. The array is * terminated with a null pointer. */ U_CAPI const char* const* U_EXPORT2 uloc_getISOLanguages() { return _languages; } /** * Returns a list of all 2-letter country codes defined in ISO 639. This is a * pointer to an array of pointers to arrays of char. All of these pointers are * owned by ICU-- do not delete them, and do not write through them. The array is * terminated with a null pointer. */ U_CAPI const char* const* U_EXPORT2 uloc_getISOCountries() { return _countries; } U_CAPI int32_t U_EXPORT2 uloc_getKeywordValue(const char* localeID, const char* keywordName, char* buffer, int32_t bufferCapacity, UErrorCode* status) { const char* nextSeparator = NULL; int32_t localeIDLen = 0; int32_t keywordNameLen = uprv_strlen(keywordName); char keywordNameBuffer[ULOC_KEYWORD_BUFFER_LEN]; char localeKeywordNameBuffer[ULOC_KEYWORD_BUFFER_LEN]; int32_t i = 0; int32_t result = 0; const char* startSearchHere = uprv_strchr(localeID, ULOC_KEYWORD_SEPARATOR); if(startSearchHere == NULL) { /* no keywords, return at once */ return 0; } if(keywordNameLen >= ULOC_KEYWORD_BUFFER_LEN) { /* keyword name too long for internal buffer */ *status = U_INTERNAL_PROGRAM_ERROR; return 0; } /* normalize the keyword name */ for(i = 0; i < keywordNameLen; i++) { keywordNameBuffer[i] = uprv_tolower(keywordName[i]); } keywordNameBuffer[i] = 0; /* find the first keyword */ while(startSearchHere) { startSearchHere++; /* skip leading spaces (allowed?) */ while(*startSearchHere == ' ') { startSearchHere++; } nextSeparator = uprv_strchr(startSearchHere, ULOC_KEYWORD_ASSIGN); /* need to normalize both keyword and keyword name */ if(!nextSeparator) { break; } if(nextSeparator - startSearchHere >= ULOC_KEYWORD_BUFFER_LEN) { /* keyword name too long for internal buffer */ *status = U_INTERNAL_PROGRAM_ERROR; return 0; } for(i = 0; i < nextSeparator - startSearchHere; i++) { localeKeywordNameBuffer[i] = uprv_tolower(startSearchHere[i]); } /* trim trailing spaces */ while(startSearchHere[i-1] == ' ') { i--; } localeKeywordNameBuffer[i] = 0; startSearchHere = strchr(nextSeparator, ULOC_KEYWORD_ITEM_SEPARATOR); if(uprv_strcmp(keywordNameBuffer, localeKeywordNameBuffer) == 0) { nextSeparator++; while(*nextSeparator == ' ') { nextSeparator++; } /* we actually found the keyword. Copy the value */ if(startSearchHere && startSearchHere - nextSeparator < bufferCapacity) { while(*(startSearchHere-1) == ' ') { startSearchHere--; } uprv_strncpy(buffer, nextSeparator, startSearchHere - nextSeparator); result = u_terminateChars(buffer, bufferCapacity, startSearchHere - nextSeparator, status); } else if(!startSearchHere && (int32_t)uprv_strlen(nextSeparator) < bufferCapacity) { /* last item in string */ i = uprv_strlen(nextSeparator); while(nextSeparator[i - 1] == ' ') { i--; } uprv_strncpy(buffer, nextSeparator, i); result = u_terminateChars(buffer, bufferCapacity, i, status); } else { /* give a bigger buffer, please */ *status = U_BUFFER_OVERFLOW_ERROR; if(startSearchHere) { result = startSearchHere - nextSeparator; } else { result = uprv_strlen(nextSeparator); } } return result; } } return 0; }