mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
798 lines
31 KiB
798 lines
31 KiB
/***
|
|
*getqloc.c - get qualified locale
|
|
*
|
|
* Copyright (c) 1993, Microsoft Corporation. All rights reserved.
|
|
*
|
|
*Purpose:
|
|
* defines __get_qualified_locale - get complete locale information
|
|
*
|
|
* NOTE: this should be a one-line call to an NT routine, but since NT does
|
|
* not currently support the needed functionality, this will suffice,
|
|
* it MUST be changed when NT supports changes.
|
|
*
|
|
* STAGE 1: convert input to internal LC_ID
|
|
*
|
|
* STAGE 2: qualify internal LC_ID
|
|
* Locales in NT version 1 are really just a language and a sublanguage;
|
|
* the language info is not useful. We therefore do not return a true
|
|
* country code, but rather return the language for that country.
|
|
*
|
|
* STAGE 3: convert to proper output format
|
|
* If output is an Id, no conversion necessary. If output is a string, call
|
|
* NT routines to get English strings for qualified locale.
|
|
*
|
|
*Revision History:
|
|
* 12-11-92 CFW initial version
|
|
* 01-08-93 CFW cleaned up file
|
|
* 02-02-93 CFW Added test for NULL input string fields
|
|
* 02-08-93 CFW Casts to remove warnings.
|
|
* 02-18-93 CFW Removed debugging support routines, changed copyright.
|
|
* 02-18-93 CFW Removed debugging support routines, changed copyright.
|
|
* 03-01-93 CFW Test code page validity, use ANSI comments.
|
|
* 03-02-93 CFW Add ISO 3166 3-letter country codes, verify country table.
|
|
* 03-04-93 CFW Call IsValidCodePage to test code page vailidity.
|
|
* 03-10-93 CFW Protect table testing code.
|
|
* 03-17-93 CFW Add __ to lang & ctry info tables, move defs to setlocal.h.
|
|
* 03-23-93 CFW Make internal functions static, add _ to GetQualifiedLocale.
|
|
* 03-24-93 CFW Change to _get_qualified_locale, support ".codepage".
|
|
* 04-06-93 SKS Replace _CRTAPI* with __cdecl
|
|
* 04-08-93 SKS Replace stricmp() with ANSI-conforming _stricmp()
|
|
* 04-20-93 CFW Enable all strange countries.
|
|
* 05-20-93 GJF Include windows.h, not individual win*.h files
|
|
* 05-24-93 CFW Clean up file (brief is evil).
|
|
* 09-15-93 CFW Use ANSI conformant "__" names.
|
|
* 09-22-93 CFW Use __crtxxx internal NLS API wrapper.
|
|
* 11-09-93 CFW Add code page for __crtxxx().
|
|
* 11-11-93 CFW Verify ALL code pages.
|
|
* 02-04-94 CFW Remove unused param, clean up, new languages,
|
|
* default is ANSI, allow .ACP/.OCP for code page.
|
|
* 02-07-94 CFW Back to OEM, NT 3.1 doesn't handle ANSI properly.
|
|
* 02-24-94 CFW Back to ANSI, we'll use our own table.
|
|
* 04-04-94 CFW Update NT-supported countries/languages.
|
|
* 04-25-94 CFW Update countries to new ISO 3166 (1993) standard.
|
|
* 02-02-95 BWT Update _POSIX_ support
|
|
* 04-07-95 CFW Remove NT 3.1 hacks, reduce string space.
|
|
*
|
|
*******************************************************************************/
|
|
|
|
#include <cruntime.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <windows.h>
|
|
#include <setlocal.h>
|
|
#include <awint.h>
|
|
|
|
#if defined(_POSIX_)
|
|
BOOL __cdecl __get_qualified_locale(
|
|
const LPLC_STRINGS lpInStr,
|
|
LPLC_ID lpOutId,
|
|
LPLC_STRINGS lpOutStr
|
|
)
|
|
{
|
|
return FALSE;
|
|
}
|
|
|
|
#else
|
|
|
|
#define MAX_TEMP_STR_LEN (max(MAX_LANG_LEN, max(MAX_CTRY_LEN, MAX_CP_LEN)))
|
|
|
|
static WORD trans_lang_lang(const PSZ pszLang);
|
|
static WORD trans_ctry_ctry(const PSZ pszCtry);
|
|
static WORD testSpecialCtry(WORD wCtry);
|
|
static WORD trans_ctry_lang(WORD wCtry);
|
|
static BOOL match_ctry_lang(WORD *pwCtry, WORD *pwLang);
|
|
static WORD OCPtoACP(WORD codepage);
|
|
|
|
/*
|
|
* Languages/Countries supported are in "Win32 NLSAPI Functional
|
|
* Specification" of 22 February, 1994.
|
|
*/
|
|
|
|
LANGREC __rg_lang_rec[] =
|
|
{
|
|
{"", MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT)},
|
|
{"american", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)},
|
|
{"american english", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)},
|
|
{"american-english", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)},
|
|
{"australian", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_AUS)},
|
|
{"belgian", MAKELANGID(LANG_DUTCH, SUBLANG_DUTCH_BELGIAN)},
|
|
{"canadian", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_CAN)},
|
|
{"chh", MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_HONGKONG)},
|
|
{"chi", MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_SINGAPORE)},
|
|
{"chinese", MAKELANGID(LANG_CHINESE, SUBLANG_DEFAULT)},
|
|
{"chinese-hongkong", MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_HONGKONG)},
|
|
{"chinese-simplified", MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_SIMPLIFIED)},
|
|
{"chinese-singapore", MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_SINGAPORE)},
|
|
{"chinese-traditional", MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_TRADITIONAL)},
|
|
{"chs", MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_SIMPLIFIED)},
|
|
{"cht", MAKELANGID(LANG_CHINESE, SUBLANG_CHINESE_TRADITIONAL)},
|
|
{"csy", MAKELANGID(LANG_CZECH, SUBLANG_DEFAULT)},
|
|
{"czech", MAKELANGID(LANG_CZECH, SUBLANG_DEFAULT)},
|
|
{"dan", MAKELANGID(LANG_DANISH, SUBLANG_DEFAULT)},
|
|
{"danish", MAKELANGID(LANG_DANISH, SUBLANG_DEFAULT)},
|
|
{"dea", MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_AUSTRIAN)},
|
|
{"des", MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_SWISS)},
|
|
{"deu", MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN)},
|
|
{"dutch", MAKELANGID(LANG_DUTCH, SUBLANG_DUTCH)},
|
|
{"dutch-belgian", MAKELANGID(LANG_DUTCH, SUBLANG_DUTCH_BELGIAN)},
|
|
{"ell", MAKELANGID(LANG_GREEK, SUBLANG_DEFAULT)},
|
|
{"ena", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_AUS)},
|
|
{"enc", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_CAN)},
|
|
{"eng", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_UK)},
|
|
{"english", MAKELANGID(LANG_ENGLISH, SUBLANG_DEFAULT)},
|
|
{"english-american", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)},
|
|
{"english-aus", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_AUS)},
|
|
{"english-can", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_CAN)},
|
|
{"english-ire", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_EIRE)},
|
|
{"english-nz", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_NZ)},
|
|
{"english-uk", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_UK)},
|
|
{"english-us", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)},
|
|
{"english-usa", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)},
|
|
{"eni", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_EIRE)},
|
|
{"enu", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)},
|
|
{"enz", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_NZ)},
|
|
{"esm", MAKELANGID(LANG_SPANISH, SUBLANG_SPANISH_MEXICAN)},
|
|
{"esn", MAKELANGID(LANG_SPANISH, SUBLANG_SPANISH_MODERN)},
|
|
{"esp", MAKELANGID(LANG_SPANISH, SUBLANG_SPANISH)},
|
|
{"fin", MAKELANGID(LANG_FINNISH, SUBLANG_DEFAULT)},
|
|
{"finnish", MAKELANGID(LANG_FINNISH, SUBLANG_DEFAULT)},
|
|
{"fra", MAKELANGID(LANG_FRENCH, SUBLANG_FRENCH)},
|
|
{"frb", MAKELANGID(LANG_FRENCH, SUBLANG_FRENCH_BELGIAN)},
|
|
{"frc", MAKELANGID(LANG_FRENCH, SUBLANG_FRENCH_CANADIAN)},
|
|
{"french", MAKELANGID(LANG_FRENCH, SUBLANG_FRENCH)},
|
|
{"french-belgian", MAKELANGID(LANG_FRENCH, SUBLANG_FRENCH_BELGIAN)},
|
|
{"french-canadian", MAKELANGID(LANG_FRENCH, SUBLANG_FRENCH_CANADIAN)},
|
|
{"french-swiss", MAKELANGID(LANG_FRENCH, SUBLANG_FRENCH_SWISS)},
|
|
{"frs", MAKELANGID(LANG_FRENCH, SUBLANG_FRENCH_SWISS)},
|
|
{"german", MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN)},
|
|
{"german-austrian", MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_AUSTRIAN)},
|
|
{"german-swiss", MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_SWISS)},
|
|
{"greek", MAKELANGID(LANG_GREEK, SUBLANG_DEFAULT)},
|
|
{"hun", MAKELANGID(LANG_HUNGARIAN, SUBLANG_DEFAULT)},
|
|
{"hungarian", MAKELANGID(LANG_HUNGARIAN, SUBLANG_DEFAULT)},
|
|
{"icelandic", MAKELANGID(LANG_ICELANDIC, SUBLANG_DEFAULT)},
|
|
{"irish-english", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_EIRE)},
|
|
{"isl", MAKELANGID(LANG_ICELANDIC, SUBLANG_DEFAULT)},
|
|
{"ita", MAKELANGID(LANG_ITALIAN, SUBLANG_ITALIAN)},
|
|
{"italian", MAKELANGID(LANG_ITALIAN, SUBLANG_ITALIAN)},
|
|
{"italian-swiss", MAKELANGID(LANG_ITALIAN, SUBLANG_ITALIAN_SWISS)},
|
|
{"its", MAKELANGID(LANG_ITALIAN, SUBLANG_ITALIAN_SWISS)},
|
|
{"japanese", MAKELANGID(LANG_JAPANESE, SUBLANG_DEFAULT)},
|
|
{"jpn", MAKELANGID(LANG_JAPANESE, SUBLANG_DEFAULT)},
|
|
{"kor", MAKELANGID(LANG_KOREAN, SUBLANG_DEFAULT)},
|
|
{"korean", MAKELANGID(LANG_KOREAN, SUBLANG_DEFAULT)},
|
|
{"nlb", MAKELANGID(LANG_DUTCH, SUBLANG_DUTCH_BELGIAN)},
|
|
{"nld", MAKELANGID(LANG_DUTCH, SUBLANG_DUTCH)},
|
|
{"non", MAKELANGID(LANG_NORWEGIAN, SUBLANG_NORWEGIAN_NYNORSK)},
|
|
{"nor", MAKELANGID(LANG_NORWEGIAN, SUBLANG_NORWEGIAN_BOKMAL)},
|
|
{"norwegian", MAKELANGID(LANG_NORWEGIAN, SUBLANG_DEFAULT)},
|
|
{"norwegian-bokmal", MAKELANGID(LANG_NORWEGIAN, SUBLANG_NORWEGIAN_BOKMAL)},
|
|
{"norwegian-nynorsk", MAKELANGID(LANG_NORWEGIAN, SUBLANG_NORWEGIAN_NYNORSK)},
|
|
{"plk", MAKELANGID(LANG_POLISH, SUBLANG_DEFAULT)},
|
|
{"polish", MAKELANGID(LANG_POLISH, SUBLANG_DEFAULT)},
|
|
{"portuguese", MAKELANGID(LANG_PORTUGUESE, SUBLANG_PORTUGUESE)},
|
|
{"portuguese-brazilian", MAKELANGID(LANG_PORTUGUESE, SUBLANG_PORTUGUESE_BRAZILIAN)},
|
|
{"ptb", MAKELANGID(LANG_PORTUGUESE, SUBLANG_PORTUGUESE_BRAZILIAN)},
|
|
{"ptg", MAKELANGID(LANG_PORTUGUESE, SUBLANG_PORTUGUESE)},
|
|
{"rus", MAKELANGID(LANG_RUSSIAN, SUBLANG_DEFAULT)},
|
|
{"russian", MAKELANGID(LANG_RUSSIAN, SUBLANG_DEFAULT)},
|
|
{"sky", MAKELANGID(LANG_SLOVAK, SUBLANG_DEFAULT)},
|
|
{"slovak", MAKELANGID(LANG_SLOVAK, SUBLANG_DEFAULT)},
|
|
{"spanish", MAKELANGID(LANG_SPANISH, SUBLANG_SPANISH)},
|
|
{"spanish-mexican", MAKELANGID(LANG_SPANISH, SUBLANG_SPANISH_MEXICAN)},
|
|
{"spanish-modern", MAKELANGID(LANG_SPANISH, SUBLANG_SPANISH_MODERN)},
|
|
{"sve", MAKELANGID(LANG_SWEDISH, SUBLANG_DEFAULT)},
|
|
{"swedish", MAKELANGID(LANG_SWEDISH, SUBLANG_DEFAULT)},
|
|
{"swiss", MAKELANGID(LANG_GERMAN, SUBLANG_GERMAN_SWISS)},
|
|
{"trk", MAKELANGID(LANG_TURKISH, SUBLANG_DEFAULT)},
|
|
{"turkish", MAKELANGID(LANG_TURKISH, SUBLANG_DEFAULT)},
|
|
{"uk", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_UK)},
|
|
{"us", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)},
|
|
{"usa", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US)}
|
|
};
|
|
|
|
|
|
CTRYREC __rg_ctry_rec[] =
|
|
{
|
|
{"", 0},
|
|
{"america", CTRY_UNITED_STATES},
|
|
{"aus", CTRY_AUSTRALIA},
|
|
{"australia", CTRY_AUSTRALIA},
|
|
{"austria", CTRY_AUSTRIA},
|
|
{"aut", CTRY_AUSTRIA},
|
|
{"bel", CTRY_BELGIUM},
|
|
{"belgium", CTRY_BELGIUM},
|
|
{"bra", CTRY_BRAZIL},
|
|
{"brazil", CTRY_BRAZIL},
|
|
{"britain", CTRY_UNITED_KINGDOM},
|
|
{"can", CTRY_CANADA},
|
|
{"canada", CTRY_CANADA},
|
|
{"che", CTRY_SWITZERLAND},
|
|
{"china", CTRY_PRCHINA},
|
|
{"chn", CTRY_PRCHINA},
|
|
{"cze", CTRY_CZECH},
|
|
{"czech", CTRY_CZECH},
|
|
{"denmark", CTRY_DENMARK},
|
|
{"deu", CTRY_GERMANY},
|
|
{"dnk", CTRY_DENMARK},
|
|
{"england", CTRY_UNITED_KINGDOM},
|
|
{"esp", CTRY_SPAIN},
|
|
{"fin", CTRY_FINLAND},
|
|
{"finland", CTRY_FINLAND},
|
|
{"fra", CTRY_FRANCE},
|
|
{"france", CTRY_FRANCE},
|
|
{"gbr", CTRY_UNITED_KINGDOM},
|
|
{"germany", CTRY_GERMANY},
|
|
{"grc", CTRY_GREECE},
|
|
{"great britain", CTRY_UNITED_KINGDOM},
|
|
{"greece", CTRY_GREECE},
|
|
{"hkg", CTRY_HONG_KONG},
|
|
{"holland", CTRY_NETHERLANDS},
|
|
{"hong kong", CTRY_HONG_KONG},
|
|
{"hong-kong", CTRY_HONG_KONG},
|
|
{"hun", CTRY_HUNGARY},
|
|
{"hungary", CTRY_HUNGARY},
|
|
{"iceland", CTRY_ICELAND},
|
|
{"ireland", CTRY_IRELAND},
|
|
{"irl", CTRY_IRELAND},
|
|
{"isl", CTRY_ICELAND},
|
|
{"ita", CTRY_ITALY},
|
|
{"italy", CTRY_ITALY},
|
|
{"japan", CTRY_JAPAN},
|
|
{"jpn", CTRY_JAPAN},
|
|
{"kor", CTRY_SOUTH_KOREA},
|
|
{"korea", CTRY_SOUTH_KOREA},
|
|
{"mex", CTRY_MEXICO},
|
|
{"mexico", CTRY_MEXICO},
|
|
{"netherlands", CTRY_NETHERLANDS},
|
|
{"new zealand", CTRY_NEW_ZEALAND},
|
|
{"new-zealand", CTRY_NEW_ZEALAND},
|
|
{"nld", CTRY_NETHERLANDS},
|
|
{"nor", CTRY_NORWAY},
|
|
{"norway", CTRY_NORWAY},
|
|
{"nz", CTRY_NEW_ZEALAND},
|
|
{"nzl", CTRY_NEW_ZEALAND},
|
|
{"pol", CTRY_POLAND},
|
|
{"poland", CTRY_POLAND},
|
|
{"portugal", CTRY_PORTUGAL},
|
|
{"pr china", CTRY_PRCHINA},
|
|
{"pr-china", CTRY_PRCHINA},
|
|
{"prt", CTRY_PORTUGAL},
|
|
{"rus", CTRY_RUSSIA},
|
|
{"russia", CTRY_RUSSIA},
|
|
{"singapore", CTRY_SINGAPORE},
|
|
{"sgp", CTRY_SINGAPORE},
|
|
{"slovak", CTRY_SLOVAK},
|
|
{"south korea", CTRY_SOUTH_KOREA},
|
|
{"south-korea", CTRY_SOUTH_KOREA},
|
|
{"spain", CTRY_SPAIN},
|
|
{"svk", CTRY_SLOVAK},
|
|
{"swe", CTRY_SWEDEN},
|
|
{"sweden", CTRY_SWEDEN},
|
|
{"switzerland", CTRY_SWITZERLAND},
|
|
{"taiwan", CTRY_TAIWAN},
|
|
{"tur", CTRY_TURKEY},
|
|
{"turkey", CTRY_TURKEY},
|
|
{"twn", CTRY_TAIWAN},
|
|
{"uk", CTRY_UNITED_KINGDOM},
|
|
{"united kingdom", CTRY_UNITED_KINGDOM},
|
|
{"united states", CTRY_UNITED_STATES},
|
|
{"united-kingdom", CTRY_UNITED_KINGDOM},
|
|
{"united-states", CTRY_UNITED_STATES},
|
|
{"us", CTRY_UNITED_STATES},
|
|
{"usa", CTRY_UNITED_STATES},
|
|
};
|
|
|
|
|
|
#define MAX_LANG_PER_CTRY 3 /* Switzerland has three languages*/
|
|
#define MAX_CTRY_NUM 90 /* Ignore high digit (Max=China[86]=Taiwan[886])*/
|
|
|
|
|
|
WORD __rgrgwlang[MAX_CTRY_NUM + 1][MAX_LANG_PER_CTRY] =
|
|
{
|
|
/* 0*/
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_US),0,0},
|
|
{MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_CAN),
|
|
MAKELANGID(LANG_FRENCH,SUBLANG_FRENCH_CANADIAN),0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_RUSSIAN,SUBLANG_DEFAULT),0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
/* 10*/
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
/* 20*/
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
/* 30*/
|
|
{MAKELANGID(LANG_GREEK,SUBLANG_DEFAULT),0,0},
|
|
{MAKELANGID(LANG_DUTCH,SUBLANG_DUTCH),0,0},
|
|
{MAKELANGID(LANG_DUTCH,SUBLANG_DUTCH_BELGIAN),
|
|
MAKELANGID(LANG_FRENCH,SUBLANG_FRENCH_BELGIAN),0},
|
|
{MAKELANGID(LANG_FRENCH,SUBLANG_FRENCH),0,0},
|
|
{MAKELANGID(LANG_SPANISH,SUBLANG_SPANISH),0,0},
|
|
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_HUNGARIAN,SUBLANG_DEFAULT),0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_ITALIAN,SUBLANG_ITALIAN),0,0},
|
|
/* 40*/
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_GERMAN,SUBLANG_GERMAN_SWISS),
|
|
MAKELANGID(LANG_FRENCH,SUBLANG_FRENCH_SWISS),
|
|
MAKELANGID(LANG_ITALIAN,SUBLANG_ITALIAN_SWISS)},
|
|
{MAKELANGID(LANG_CZECH,SUBLANG_DEFAULT),
|
|
MAKELANGID(LANG_SLOVAK,SUBLANG_DEFAULT),0},
|
|
{MAKELANGID(LANG_GERMAN,SUBLANG_GERMAN_AUSTRIAN),0,0},
|
|
{MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_UK),0,0},
|
|
|
|
{MAKELANGID(LANG_DANISH,SUBLANG_DEFAULT),0,0},
|
|
{MAKELANGID(LANG_SWEDISH,SUBLANG_DEFAULT),0,0},
|
|
{MAKELANGID(LANG_NORWEGIAN,SUBLANG_DEFAULT),0,0},
|
|
{MAKELANGID(LANG_POLISH,SUBLANG_DEFAULT),0,0},
|
|
{MAKELANGID(LANG_GERMAN,SUBLANG_GERMAN),0,0},
|
|
/* 50*/
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_PORTUGUESE,SUBLANG_PORTUGUESE),0,0},
|
|
{MAKELANGID(LANG_SPANISH,SUBLANG_SPANISH_MEXICAN),0,0},
|
|
{MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_EIRE),0,0},
|
|
{MAKELANGID(LANG_ICELANDIC,SUBLANG_DEFAULT),0,0},
|
|
|
|
{MAKELANGID(LANG_PORTUGUESE,SUBLANG_PORTUGUESE_BRAZILIAN),0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_FINNISH,SUBLANG_DEFAULT),0,0},
|
|
{0,0,0},
|
|
/* 60*/
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_AUS),0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_NZ),0,0},
|
|
|
|
{MAKELANGID(LANG_CHINESE,SUBLANG_CHINESE_SINGAPORE),0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
/* 70*/
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
/* 80*/
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_JAPANESE,SUBLANG_DEFAULT),0,0},
|
|
{MAKELANGID(LANG_KOREAN,SUBLANG_DEFAULT),0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
|
|
{0,0,0},
|
|
{MAKELANGID(LANG_CHINESE,SUBLANG_DEFAULT),0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
{0,0,0},
|
|
/* 90*/
|
|
{MAKELANGID(LANG_TURKISH,SUBLANG_DEFAULT),0,0}
|
|
};
|
|
|
|
|
|
/***
|
|
*WORD trans_lang_lang - translate language string to language id
|
|
*
|
|
*Purpose:
|
|
* convert string to id
|
|
*
|
|
*Entry:
|
|
* pszLang - pointer to language string
|
|
*
|
|
*Exit:
|
|
* translated language id
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
static WORD trans_lang_lang(const PSZ pszLang)
|
|
{
|
|
INT i,
|
|
cmp,
|
|
low = 0,
|
|
high = sizeof(__rg_lang_rec) / sizeof(LANGREC);
|
|
|
|
while (1)
|
|
{
|
|
i = (low + high) / 2;
|
|
|
|
if (!(cmp = _stricmp(pszLang, (const char *)__rg_lang_rec[i].szLanguage)))
|
|
return __rg_lang_rec[i].wLanguage; /* found the string*/
|
|
else if (cmp < 0)
|
|
high = i; /* less than pivot*/
|
|
else
|
|
low = i; /* more than pivot*/
|
|
if (low + 1 == high)
|
|
return 0; /* not found*/
|
|
}
|
|
}
|
|
|
|
/***
|
|
*WORD trans_ctry_ctry - translate country string to country id
|
|
*
|
|
*Purpose:
|
|
* convert string to id
|
|
*
|
|
*Entry:
|
|
* pszCtry - pointer to country string
|
|
*
|
|
*Exit:
|
|
* translated country id
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
static WORD trans_ctry_ctry(const PSZ pszCtry)
|
|
{
|
|
INT i,
|
|
cmp,
|
|
low = 0,
|
|
high = sizeof(__rg_ctry_rec) / sizeof(CTRYREC);
|
|
|
|
while (1)
|
|
{
|
|
i = (low + high) / 2;
|
|
|
|
if (!(cmp = _stricmp(pszCtry, (const char *)__rg_ctry_rec[i].szCountry)))
|
|
return __rg_ctry_rec[i].wCountry; /* found the string*/
|
|
else if (cmp < 0)
|
|
high = i; /* less than pivot*/
|
|
else
|
|
low = i; /* more than pivot*/
|
|
if (low + 1 == high)
|
|
return 0; /* not found*/
|
|
}
|
|
}
|
|
|
|
/***
|
|
*WORD testSpecialCtry - test countries with id > 100
|
|
*
|
|
*Purpose:
|
|
* convert country id to language id for id > 100
|
|
*
|
|
*Entry:
|
|
* wCtry - country id
|
|
*
|
|
*Exit:
|
|
* translated language id
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
static WORD testSpecialCtry(WORD wCtry)
|
|
{
|
|
switch (wCtry) {
|
|
case CTRY_HONG_KONG:
|
|
return MAKELANGID(LANG_CHINESE,SUBLANG_CHINESE_HONGKONG);
|
|
default:
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
|
|
/***
|
|
*WORD trans_ctry_lang - get default language for a country
|
|
*
|
|
*Purpose:
|
|
* convert country id to language id
|
|
*
|
|
*Entry:
|
|
* wCtry - country id
|
|
*
|
|
*Exit:
|
|
* translated language id
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
static WORD trans_ctry_lang(WORD wCtry)
|
|
{
|
|
WORD retval;
|
|
|
|
if (wCtry > 100 && (retval = testSpecialCtry(wCtry)))
|
|
return retval;
|
|
|
|
wCtry %= 100;
|
|
if (wCtry > MAX_CTRY_NUM)
|
|
return 0;
|
|
|
|
return __rgrgwlang[wCtry][0];
|
|
}
|
|
|
|
/***
|
|
*BOOL match_ctry_lang - match country with language
|
|
*
|
|
*Purpose:
|
|
* ensure language and country match, choose proper values for language
|
|
* and country when matching, country ids converted to proper language id
|
|
*
|
|
*Entry:
|
|
* pwCtry - pointer to country id to match and set
|
|
* pwLang - pointer to language id to match and set
|
|
*
|
|
*Exit:
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
static BOOL match_ctry_lang(WORD *pwCtry, WORD *pwLang)
|
|
{
|
|
UINT i;
|
|
WORD wCtry = *pwCtry;
|
|
WORD wLang = *pwLang;
|
|
WORD wLangT;
|
|
|
|
/* only use base 10 two least significant digits */
|
|
wCtry = wCtry % 100;
|
|
|
|
if (wCtry > MAX_CTRY_NUM)
|
|
return FALSE;
|
|
|
|
/* see if any of the sublanguages for this country match*/
|
|
for (i = 0; i < MAX_LANG_PER_CTRY; i++)
|
|
{
|
|
if (!(wLangT = __rgrgwlang[wCtry][i]))
|
|
break;
|
|
if (PRIMARYLANGID(wLangT) == PRIMARYLANGID(wLang))
|
|
{
|
|
/* they match*/
|
|
if (!SUBLANGID(wLang))
|
|
/* don't override sublanguage*/
|
|
*pwLang = wLangT;
|
|
*pwCtry = wLangT;
|
|
return TRUE;
|
|
}
|
|
}
|
|
/* get the default language for this country*/
|
|
if (!(*pwCtry = __rgrgwlang[wCtry][0]))
|
|
/* bad country number*/
|
|
return FALSE;
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***
|
|
*BOOL __get_qualified_locale - return fully qualified locale
|
|
*
|
|
*Purpose:
|
|
* get default locale, qualify partially complete locales
|
|
*
|
|
*Entry:
|
|
* dwType - indicates type of lpInput, either QF_STRINGS or QF_LCID
|
|
* lpInput - input string/id to be qualified
|
|
* lpOutId - pointer to output id, may be NULL if lpOutStr is !NULL
|
|
* lpOutStr - pointer to output string, may be NULL if lpOutId is !NULL
|
|
*
|
|
*Exit:
|
|
* TRUE if success, qualified locale is valid
|
|
* FALSE if failure
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
BOOL __cdecl __get_qualified_locale(
|
|
const LPLC_STRINGS lpInStr,
|
|
LPLC_ID lpOutId,
|
|
LPLC_STRINGS lpOutStr
|
|
)
|
|
{
|
|
LC_ID Id;
|
|
LCID cpLCID;
|
|
BOOL fOCP = FALSE;
|
|
WCHAR wcsTemp[MAX_TEMP_STR_LEN];
|
|
|
|
if (!lpOutId && !lpOutStr)
|
|
return FALSE;
|
|
|
|
Id.wLanguage = (WORD)0;
|
|
Id.wCountry = (WORD)0;
|
|
Id.wCodePage = (WORD)0;
|
|
|
|
/* -----------------------------------------------------------------------
|
|
stage 1: convert input to internal LC_ID.
|
|
-----------------------------------------------------------------------*/
|
|
|
|
if (lpInStr->szLanguage
|
|
&& *(lpInStr->szLanguage)
|
|
&& (!(Id.wLanguage =
|
|
trans_lang_lang((const PSZ)lpInStr->szLanguage))))
|
|
return FALSE;
|
|
|
|
if (lpInStr->szCountry
|
|
&& *(lpInStr->szCountry)
|
|
&& (!(Id.wCountry =
|
|
trans_ctry_ctry((const PSZ)lpInStr->szCountry))))
|
|
return FALSE;
|
|
|
|
if (lpInStr->szCodePage
|
|
&& *(lpInStr->szCodePage))
|
|
{
|
|
/* ACP is the default anyway */
|
|
if (!strcmp(lpInStr->szCodePage, "ACP"))
|
|
/* do nothing */ ;
|
|
|
|
/* if OCP, set flag */
|
|
else if (!strcmp(lpInStr->szCodePage, "OCP"))
|
|
fOCP = TRUE;
|
|
|
|
/* user supplied a code page */
|
|
else if (!(Id.wCodePage =
|
|
atoi((const char *)lpInStr->szCodePage)))
|
|
return FALSE;
|
|
}
|
|
|
|
/* -----------------------------------------------------------------------
|
|
stage 2: qualify internal LC_ID
|
|
-----------------------------------------------------------------------*/
|
|
|
|
if (!Id.wLanguage)
|
|
{
|
|
/* language undefined*/
|
|
if (!Id.wCountry)
|
|
{
|
|
/* language undefined, country undefined*/
|
|
Id.wLanguage = Id.wCountry = LANGIDFROMLCID(GetUserDefaultLCID());
|
|
|
|
if (!Id.wCodePage)
|
|
cpLCID = GetUserDefaultLCID();
|
|
}
|
|
else {
|
|
/* language undefined, country defined*/
|
|
Id.wCountry = Id.wLanguage = trans_ctry_lang(Id.wCountry);
|
|
|
|
if (!Id.wCodePage)
|
|
cpLCID = MAKELCID(Id.wCountry, SORT_DEFAULT);
|
|
}
|
|
}
|
|
else {
|
|
/* language defined*/
|
|
if (!Id.wCountry)
|
|
{
|
|
/* language defined, country undefined*/
|
|
Id.wCountry = Id.wLanguage;
|
|
|
|
if (!Id.wCodePage)
|
|
cpLCID = MAKELCID(Id.wCountry, SORT_DEFAULT);
|
|
}
|
|
else {
|
|
/* language defined, country defined*/
|
|
|
|
/* match and set country and language*/
|
|
if (!match_ctry_lang((WORD *)&Id.wCountry, (WORD *)&Id.wLanguage))
|
|
return FALSE;
|
|
|
|
if (!Id.wCodePage)
|
|
cpLCID = MAKELCID(Id.wCountry, SORT_DEFAULT);
|
|
}
|
|
}
|
|
|
|
if (!Id.wCodePage)
|
|
{
|
|
if (__crtGetLocaleInfoW(cpLCID,
|
|
(fOCP) ? LOCALE_IDEFAULTCODEPAGE :
|
|
LOCALE_IDEFAULTANSICODEPAGE,
|
|
wcsTemp,
|
|
MAX_TEMP_STR_LEN,
|
|
0)
|
|
== 0)
|
|
return FALSE;
|
|
|
|
Id.wCodePage = (WORD)wcstol(wcsTemp, NULL, 10);
|
|
}
|
|
|
|
/*
|
|
* Must verify ALL code pages - even those coming from OS.
|
|
*/
|
|
|
|
if (!IsValidCodePage(Id.wCodePage))
|
|
return FALSE;
|
|
|
|
/*
|
|
* Must verify locale is installed.
|
|
*/
|
|
|
|
if (!IsValidLocale(MAKELCID(Id.wLanguage, SORT_DEFAULT), LCID_INSTALLED))
|
|
return FALSE;
|
|
|
|
/* -----------------------------------------------------------------------
|
|
stage 3: convert to proper output format
|
|
-----------------------------------------------------------------------*/
|
|
|
|
if (lpOutId)
|
|
{
|
|
*lpOutId = Id;
|
|
}
|
|
|
|
if (lpOutStr)
|
|
{
|
|
if (__crtGetLocaleInfoA(MAKELCID(Id.wLanguage, SORT_DEFAULT), LOCALE_SENGLANGUAGE, lpOutStr->szLanguage, MAX_LANG_LEN, 0)
|
|
== 0)
|
|
return FALSE;
|
|
|
|
if (__crtGetLocaleInfoA(MAKELCID(Id.wCountry, SORT_DEFAULT), LOCALE_SENGCOUNTRY, lpOutStr->szCountry, MAX_CTRY_LEN, 0)
|
|
== 0)
|
|
return FALSE;
|
|
|
|
_itoa((int)Id.wCodePage, (char *)lpOutStr->szCodePage, 10);
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
#endif /* _POSIX_ */
|
|
|
|
#if 0
|
|
|
|
/* for testing when new items added to tables */
|
|
|
|
|
|
VOID __cdecl test_lang_table(VOID)
|
|
{
|
|
UINT i;
|
|
|
|
printf("Testing Language Table\n");
|
|
for (i = 0; i < LANG_STR_NUM-1; i++)
|
|
{
|
|
printf("language name[%d] = '%s' number=%d\n", i, __rg_lang_rec[i].szLanguage, __rg_lang_rec[i].wLanguage);
|
|
if ((_stricmp(__rg_lang_rec[i].szLanguage,__rg_lang_rec[i+1].szLanguage) >= 0))
|
|
printf("\n*********\nBad Lang Table Lang[%d]=%s Lang[%d]=%s\n\n",
|
|
i, __rg_lang_rec[i].szLanguage, i+1, __rg_lang_rec[i+1].szLanguage);
|
|
}
|
|
printf("language name[%d] = '%s' number=%d\n", i, __rg_lang_rec[i].szLanguage, __rg_lang_rec[i].wLanguage);
|
|
}
|
|
|
|
VOID __cdecl test_ctry_table(VOID)
|
|
{
|
|
UINT i;
|
|
|
|
printf("Testing Country Table\n");
|
|
printf("Real Table Size = %d entries, defined size = %d entries\n",
|
|
sizeof(__rg_ctry_rec) / sizeof(CTRYREC), CTRY_STR_NUM);
|
|
for (i = 0; i < CTRY_STR_NUM-1; i++)
|
|
{
|
|
printf("country name[%d] = '%s' number=%d\n", i, __rg_ctry_rec[i].szCountry, __rg_ctry_rec[i].wCountry);
|
|
if ((_stricmp(__rg_ctry_rec[i].szCountry,__rg_ctry_rec[i+1].szCountry) >= 0))
|
|
printf("\n**********\nBad Ctry Table Ctry[%d]=%s Ctry[%d]=%s\n\n",
|
|
i, __rg_ctry_rec[i].szCountry, i+1, __rg_ctry_rec[i+1].szCountry);
|
|
}
|
|
printf("country name[%d] = '%s' number=%d\n", i, __rg_ctry_rec[i].szCountry, __rg_ctry_rec[i].wCountry);
|
|
}
|
|
|
|
#endif
|