142 lines
4.6 KiB
C
142 lines
4.6 KiB
C
/***
|
|
*a_str.c - A version of GetStringType.
|
|
*
|
|
* Copyright (c) Microsoft Corporation. All rights reserved.
|
|
*
|
|
*Purpose:
|
|
* Use either GetStringTypeA or GetStringTypeW depending on which is
|
|
* unstubbed.
|
|
*
|
|
*******************************************************************************/
|
|
|
|
#include <cruntime.h>
|
|
#include <internal.h>
|
|
#include <stdlib.h>
|
|
#include <locale.h>
|
|
#include <awint.h>
|
|
#include <dbgint.h>
|
|
#include <malloc.h>
|
|
#include <awint.h>
|
|
#include <mtdll.h>
|
|
#include <setlocal.h>
|
|
|
|
/***
|
|
*int __cdecl __crtGetStringTypeA - Get type information about an ANSI string.
|
|
*
|
|
*Purpose:
|
|
* Internal support function. Assumes info in ANSI string format. Tries
|
|
* to use NLS API call GetStringTypeA if available and uses GetStringTypeW
|
|
* if it must. If neither are available it fails and returns FALSE.
|
|
*
|
|
*Entry:
|
|
* DWORD dwInfoType - see NT\Chicago docs
|
|
* LPCSTR lpSrcStr - char (byte) string for which character types
|
|
* are requested
|
|
* int cchSrc - char (byte) count of lpSrcStr (including NULL
|
|
* if any)
|
|
* LPWORD lpCharType - word array to receive character type information
|
|
* (must be twice the size of lpSrcStr)
|
|
* int code_page - for MB/WC conversion. If 0, use __lc_codepage
|
|
* BOOL bError - TRUE if MB_ERR_INVALID_CHARS set on call to
|
|
* MultiByteToWideChar when GetStringTypeW used.
|
|
*
|
|
*Exit:
|
|
* Success: TRUE
|
|
* Failure: FALSE
|
|
*
|
|
*Exceptions:
|
|
*
|
|
*******************************************************************************/
|
|
|
|
static BOOL __cdecl __crtGetStringTypeA_stat(
|
|
_locale_t plocinfo,
|
|
DWORD dwInfoType,
|
|
LPCSTR lpSrcStr,
|
|
int cchSrc,
|
|
LPWORD lpCharType,
|
|
int code_page,
|
|
BOOL bError
|
|
)
|
|
{
|
|
int retval1;
|
|
int buff_size;
|
|
wchar_t *wbuffer;
|
|
BOOL retval2 = FALSE;
|
|
|
|
/*
|
|
* Convert string and return the requested information. Note that
|
|
* we are converting to a wide character string so there is not a
|
|
* one-to-one correspondence between number of multibyte chars in the
|
|
* input string and the number of wide chars in the buffer. However,
|
|
* there had *better be* a one-to-one correspondence between the
|
|
* number of multibyte characters and the number of WORDs in the
|
|
* return buffer.
|
|
*/
|
|
|
|
/*
|
|
* Use __lc_codepage for conversion if code_page not specified
|
|
*/
|
|
|
|
if (0 == code_page)
|
|
code_page = plocinfo->locinfo->lc_codepage;
|
|
|
|
/* find out how big a buffer we need */
|
|
if ( 0 == (buff_size = MultiByteToWideChar( code_page,
|
|
bError ?
|
|
MB_PRECOMPOSED |
|
|
MB_ERR_INVALID_CHARS
|
|
: MB_PRECOMPOSED,
|
|
lpSrcStr,
|
|
cchSrc,
|
|
NULL,
|
|
0 )) )
|
|
return FALSE;
|
|
|
|
/* allocate enough space for wide chars */
|
|
wbuffer = (wchar_t *)_calloca( sizeof(wchar_t), buff_size );
|
|
if ( wbuffer == NULL ) {
|
|
return FALSE;
|
|
}
|
|
(void)memset( wbuffer, 0, sizeof(wchar_t) * buff_size );
|
|
|
|
/* do the conversion */
|
|
if ( 0 != (retval1 = MultiByteToWideChar( code_page,
|
|
MB_PRECOMPOSED,
|
|
lpSrcStr,
|
|
cchSrc,
|
|
wbuffer,
|
|
buff_size )) )
|
|
/* obtain result */
|
|
retval2 = GetStringTypeW( dwInfoType,
|
|
wbuffer,
|
|
retval1,
|
|
lpCharType );
|
|
|
|
_freea(wbuffer);
|
|
|
|
return retval2;
|
|
}
|
|
|
|
extern "C" BOOL __cdecl __crtGetStringTypeA(
|
|
_locale_t plocinfo,
|
|
DWORD dwInfoType,
|
|
LPCSTR lpSrcStr,
|
|
int cchSrc,
|
|
LPWORD lpCharType,
|
|
int code_page,
|
|
BOOL bError
|
|
)
|
|
{
|
|
_LocaleUpdate _loc_update(plocinfo);
|
|
|
|
return __crtGetStringTypeA_stat(
|
|
_loc_update.GetLocaleT(),
|
|
dwInfoType,
|
|
lpSrcStr,
|
|
cchSrc,
|
|
lpCharType,
|
|
code_page,
|
|
bError
|
|
);
|
|
}
|