171 lines
5.5 KiB
C
171 lines
5.5 KiB
C
/***
|
|
*w_loc.c - W version of GetLocaleInfo.
|
|
*
|
|
* Copyright (c) 1993-2001, Microsoft Corporation. All rights reserved.
|
|
*
|
|
*Purpose:
|
|
* Use either GetLocaleInfoA or GetLocaleInfoW depending on which is
|
|
* available
|
|
*
|
|
*Revision History:
|
|
* 09-14-93 CFW Module created.
|
|
* 09-17-93 CFW Use unsigned chars.
|
|
* 09-23-93 CFW Correct NLS API params and comments about same.
|
|
* 10-07-93 CFW Optimize WideCharToMultiByte, use NULL default char.
|
|
* 11-09-93 CFW Allow user to pass in code page.
|
|
* 11-18-93 CFW Test for entry point function stubs.
|
|
* 03-31-94 CFW Include awint.h.
|
|
* 12-27-94 CFW Call direct, all OS's have stubs.
|
|
* 01-10-95 CFW Debug CRT allocs.
|
|
* 02-15-97 RDK For narrow locale info, try W version first so
|
|
* Windows NT can process nonANSI codepage correctly.
|
|
* 05-16-97 GJF Split off W version into this file (w_loc.c). Replaced
|
|
* use of _malloc_crt/_free_crt with _alloca. Also,
|
|
* detab-ed and cleaned up the code.
|
|
* 08-19-98 GJF Use _malloc_crt if _alloca fails.
|
|
* 12-10-99 GB Added support for recovery from stack overflow around
|
|
* _alloca().
|
|
* 05-17-00 GB Use ERROR_CALL_NOT_IMPLEMENTED for existance of W API
|
|
*
|
|
*******************************************************************************/
|
|
|
|
#include <cruntime.h>
|
|
#include <internal.h>
|
|
#include <stdlib.h>
|
|
#include <setlocal.h>
|
|
#include <awint.h>
|
|
#include <dbgint.h>
|
|
#include <malloc.h>
|
|
|
|
#define USE_W 1
|
|
#define USE_A 2
|
|
|
|
/***
|
|
*int __cdecl __crtGetLocaleInfoW - Get locale info and return it as a wide
|
|
* string
|
|
*
|
|
*Purpose:
|
|
* Internal support function. Assumes info in wide string format. Tries
|
|
* to use NLS API call GetLocaleInfoW if available (NT) and uses
|
|
* GetLocaleInfoA if it must (Chicago). If neither are available it fails
|
|
* and returns 0.
|
|
*
|
|
*Entry:
|
|
* LCID Locale - locale context for the comparison.
|
|
* LCTYPE LCType - see NT\Chicago docs
|
|
* LPWSTR lpLCData - pointer to memory to return data
|
|
* int cchData - wide char (word) count of buffer (including
|
|
* NULL) (if 0, lpLCData is not referenced, size
|
|
* needed is returned)
|
|
* int code_page - for MB/WC conversion. If 0, use __lc_codepage
|
|
*
|
|
*Exit:
|
|
* Success: the number of characters copied (including NULL).
|
|
* Failure: 0
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
|
|
int __cdecl __crtGetLocaleInfoW(
|
|
LCID Locale,
|
|
LCTYPE LCType,
|
|
LPWSTR lpLCData,
|
|
int cchData,
|
|
int code_page
|
|
)
|
|
{
|
|
static int f_use = 0;
|
|
|
|
/*
|
|
* Look for unstubbed 'preferred' flavor. Otherwise use available flavor.
|
|
* Must actually call the function to ensure it's not a stub.
|
|
*/
|
|
|
|
if (0 == f_use)
|
|
{
|
|
if (0 != GetLocaleInfoW(0, LOCALE_ILANGUAGE, NULL, 0))
|
|
f_use = USE_W;
|
|
|
|
else if (GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
|
|
f_use = USE_A;
|
|
}
|
|
|
|
/* Use "W" version */
|
|
|
|
if (USE_W == f_use)
|
|
{
|
|
return GetLocaleInfoW(Locale, LCType, lpLCData, cchData);
|
|
}
|
|
|
|
/* Use "A" version */
|
|
|
|
if (USE_A == f_use || f_use == 0)
|
|
{
|
|
int retval = 0;
|
|
int buff_size;
|
|
unsigned char *buffer;
|
|
int malloc_flag = 0;
|
|
|
|
/*
|
|
* Use __lc_codepage for conversion if code_page not specified
|
|
*/
|
|
|
|
if (0 == code_page)
|
|
code_page = __lc_codepage;
|
|
|
|
/* find out how big buffer needs to be */
|
|
if (0 == (buff_size = GetLocaleInfoA(Locale, LCType, NULL, 0)))
|
|
return 0;
|
|
|
|
/* allocate buffer */
|
|
__try {
|
|
buffer = (unsigned char *)_alloca( buff_size * sizeof(char) );
|
|
}
|
|
__except( EXCEPTION_EXECUTE_HANDLER ) {
|
|
_resetstkoflw();
|
|
buffer = NULL;
|
|
}
|
|
|
|
if ( buffer == NULL ) {
|
|
if ( (buffer = (unsigned char *)_malloc_crt(buff_size * sizeof(char)))
|
|
== NULL )
|
|
return 0;
|
|
malloc_flag++;
|
|
}
|
|
|
|
/* get the info in ANSI format */
|
|
if (0 == GetLocaleInfoA(Locale, LCType, buffer, buff_size))
|
|
goto error_cleanup;
|
|
|
|
if (0 == cchData)
|
|
{
|
|
/* find out how much space needed */
|
|
retval = MultiByteToWideChar( code_page,
|
|
MB_PRECOMPOSED,
|
|
buffer,
|
|
-1,
|
|
NULL,
|
|
0 );
|
|
}
|
|
else {
|
|
/* convert into user buffer */
|
|
retval = MultiByteToWideChar( code_page,
|
|
MB_PRECOMPOSED,
|
|
buffer,
|
|
-1,
|
|
lpLCData,
|
|
cchData );
|
|
}
|
|
|
|
error_cleanup:
|
|
if ( malloc_flag )
|
|
_free_crt(buffer);
|
|
|
|
return retval;
|
|
|
|
}
|
|
else /* f_use is neither USE_A nor USE_W */
|
|
return 0;
|
|
}
|