windows-nt/Source/XPSP1/NT/base/crts/crtw32/convert/wctomb.c
2020-09-26 16:20:57 +08:00

178 lines
5.5 KiB
C

/***
*wctomb.c - Convert wide character to multibyte character.
*
* Copyright (c) 1990-2001, Microsoft Corporation. All rights reserved.
*
*Purpose:
* Convert a wide character into the equivalent multibyte character.
*
*Revision History:
* 03-19-90 KRS Module created.
* 12-20-90 KRS Include ctype.h.
* 01-14-91 KRS Fix argument error: wchar is pass-by-value.
* 03-20-91 KRS Ported from 16-bit tree.
* 07-23-91 KRS Hard-coded for "C" locale to avoid bogus interim #'s.
* 10-15-91 ETC Locale support under _INTL (finally!).
* 12-09-91 ETC Updated nlsapi; added multithread.
* 08-20-92 KRS Activated NLSAPI support.
* 08-22-92 SRW Allow INTL definition to be conditional for building ntcrt.lib
* 09-02-92 SRW Get _INTL definition via ..\crt32.def
* 04-06-93 SKS Replace _CRTAPI* with _cdecl
* 05-04-93 CFW Kinder, gentler error handling.
* 06-01-93 CFW Minor optimization and beautify.
* 06-02-93 SRW ignore _INTL if _NTSUBSET_ defined.
* 09-15-93 CFW Use ANSI conformant "__" names.
* 09-28-93 GJF Merged NT SDK and Cuda versions.
* 01-14-94 SRW if _NTSUBSET_ defined call Rtl functions
* 02-07-94 CFW POSIXify.
* 09-06-94 CFW Remove _INTL switch.
* 01-07-95 CFW Mac merge cleanup.
* 04-19-95 CFW Rearrange & fix non-Win32 version.
* 09-26-95 GJF New locking macro, and scheme, for functions which
* reference the locale.
* 12-07-95 SKS Fix misspelling of _NTSUBSET_ (final _ was missing)
* 04-01-96 BWT POSIX work.
* 06-25-96 GJF Removed DLL_FOR_WIN32S. Replaced defined(_WIN32) with
* !defined(_MAC). Polished the format a bit.
* 07-22-98 GJF Revised multithread support based on threadlocinfo
* struct.
* 04-28-99 GJF Changed dwFlags arg value to 0 in WideCharToMultiByte
* calls to avoid problems with codepage 1258 on NT 5.0.
* 05-17-99 PML Remove all Macintosh support.
*
*******************************************************************************/
#if defined(_NTSUBSET_) || defined(_POSIX_)
#include <nt.h>
#include <ntrtl.h>
#include <nturtl.h>
#endif
#include <cruntime.h>
#include <stdlib.h>
#include <mtdll.h>
#include <errno.h>
#include <locale.h>
#include <setlocal.h>
/***
*int wctomb() - Convert wide character to multibyte character.
*
*Purpose:
* Convert a wide character into the equivalent multi-byte character,
* according to the LC_CTYPE category of the current locale.
* [ANSI].
*
* NOTE: Currently, the C libraries support the "C" locale only.
* Non-C locale support now available under _INTL switch.
*Entry:
* char *s = pointer to multibyte character
* wchar_t wchar = source wide character
*
*Exit:
* If s = NULL, returns 0, indicating we only use state-independent
* character encodings.
* If s != NULL, returns:
* -1 (if error) or number of bytes comprising
* converted mbc
*
*Exceptions:
*
*******************************************************************************/
int __cdecl wctomb (
char *s,
wchar_t wchar
)
{
#ifdef _MT
pthreadlocinfo ptloci = _getptd()->ptlocinfo;
if ( ptloci != __ptlocinfo )
ptloci = __updatetlocinfo();
return __wctomb_mt(ptloci, s, wchar);
}
int __cdecl __wctomb_mt (
pthreadlocinfo ptloci,
char *s,
wchar_t wchar
)
{
#endif
if ( !s )
/* indicate do not have state-dependent encodings */
return 0;
#if defined(_NTSUBSET_) || defined(_POSIX_)
{
NTSTATUS Status;
int size;
Status = RtlUnicodeToMultiByteN( s,
MB_CUR_MAX,
(PULONG)&size,
&wchar,
sizeof( wchar )
);
if (!NT_SUCCESS(Status))
{
errno = EILSEQ;
size = -1;
}
return size;
}
#else /* _NTSUBSET_/_POSIX_ */
#ifdef _MT
if ( ptloci->lc_handle[LC_CTYPE] == _CLOCALEHANDLE )
#else
if ( __lc_handle[LC_CTYPE] == _CLOCALEHANDLE )
#endif
{
if ( wchar > 255 ) /* validate high byte */
{
errno = EILSEQ;
return -1;
}
*s = (char) wchar;
return sizeof(char);
}
else
{
int size;
BOOL defused = 0;
#ifdef _MT
if ( ((size = WideCharToMultiByte( ptloci->lc_codepage,
#else
if ( ((size = WideCharToMultiByte( __lc_codepage,
#endif
0,
&wchar,
1,
s,
#ifdef _MT
ptloci->mb_cur_max,
#else
MB_CUR_MAX,
#endif
NULL,
&defused) ) == 0) ||
(defused) )
{
errno = EILSEQ;
return -1;
}
return size;
}
#endif /* ! _NTSUBSET_/_POSIX_ */
}