131 lines
3.3 KiB
C
131 lines
3.3 KiB
C
|
/***
|
||
|
|
*mbtoupr.c - Convert character to upper case (MBCS)
|
||
|
|
*
|
||
|
|
* Copyright (c) 1985-2001, Microsoft Corporation. All rights reserved.
|
||
|
|
*
|
||
|
|
*Purpose:
|
||
|
|
* Convert character to upper case (MBCS)
|
||
|
|
*
|
||
|
|
*Revision History:
|
||
|
|
* 11-19-92 KRS Ported from 16-bit sources.
|
||
|
|
* 08-20-93 CFW Change short params to int for 32-bit tree.
|
||
|
|
* 09-29-93 CFW Merge _KANJI and _MBCS_OS
|
||
|
|
* 10-06-93 GJF Replaced _CRTAPI1 with __cdecl.
|
||
|
|
* 04-12-94 CFW Make function generic.
|
||
|
|
* 04-21-94 CFW Return bad chars unchanged.
|
||
|
|
* 05-16-94 CFW Use _mbbtolower/upper.
|
||
|
|
* 05-17-94 CFW Enable non-Win32.
|
||
|
|
* 03-17-97 RDK Added error flag to __crtLCMapStringA.
|
||
|
|
* 09-26-97 BWT Fix POSIX
|
||
|
|
* 04-21-98 GJF Implemented multithread support based on threadmbcinfo
|
||
|
|
* structs
|
||
|
|
* 05-17-99 PML Remove all Macintosh support.
|
||
|
|
*
|
||
|
|
*******************************************************************************/
|
||
|
|
|
||
|
|
#ifdef _MBCS
|
||
|
|
|
||
|
|
#if !defined(_POSIX_)
|
||
|
|
#include <awint.h>
|
||
|
|
#include <mtdll.h>
|
||
|
|
#endif /* !_POSIX_ */
|
||
|
|
|
||
|
|
#include <cruntime.h>
|
||
|
|
#include <ctype.h>
|
||
|
|
#include <mbdata.h>
|
||
|
|
#include <mbctype.h>
|
||
|
|
#include <mbstring.h>
|
||
|
|
|
||
|
|
/***
|
||
|
|
* _mbctoupper - Convert character to upper case (MBCS)
|
||
|
|
*
|
||
|
|
*Purpose:
|
||
|
|
* If the given character is lower case, convert to upper case.
|
||
|
|
* Handles MBCS chars correctly.
|
||
|
|
*
|
||
|
|
* Note: Use test against 0x00FF instead of _ISLEADBYTE
|
||
|
|
* to ensure that we don't call SBCS routine with a two-byte
|
||
|
|
* value.
|
||
|
|
*
|
||
|
|
*Entry:
|
||
|
|
* unsigned int c = character to convert
|
||
|
|
*
|
||
|
|
*Exit:
|
||
|
|
* Returns converted character
|
||
|
|
*
|
||
|
|
*Exceptions:
|
||
|
|
*
|
||
|
|
*******************************************************************************/
|
||
|
|
|
||
|
|
unsigned int __cdecl _mbctoupper(unsigned int c)
|
||
|
|
{
|
||
|
|
unsigned char val[2];
|
||
|
|
#if !defined(_POSIX_)
|
||
|
|
unsigned char ret[4];
|
||
|
|
#endif /* !_POSIX_ */
|
||
|
|
#ifdef _MT
|
||
|
|
pthreadmbcinfo ptmbci = _getptd()->ptmbcinfo;
|
||
|
|
|
||
|
|
if ( ptmbci != __ptmbcinfo )
|
||
|
|
ptmbci = __updatetmbcinfo();
|
||
|
|
#endif
|
||
|
|
|
||
|
|
if (c > 0x00FF)
|
||
|
|
{
|
||
|
|
val[0] = (c >> 8) & 0xFF;
|
||
|
|
val[1] = c & 0xFF;
|
||
|
|
|
||
|
|
#ifdef _MT
|
||
|
|
if ( !__ismbblead_mt(ptmbci, val[0]) )
|
||
|
|
#else
|
||
|
|
if ( !_ismbblead(val[0]) )
|
||
|
|
#endif
|
||
|
|
return c;
|
||
|
|
|
||
|
|
#if !defined(_POSIX_)
|
||
|
|
|
||
|
|
#ifdef _MT
|
||
|
|
if ( __crtLCMapStringA( ptmbci->mblcid,
|
||
|
|
#else
|
||
|
|
if ( __crtLCMapStringA( __mblcid,
|
||
|
|
#endif
|
||
|
|
LCMAP_UPPERCASE,
|
||
|
|
val,
|
||
|
|
2,
|
||
|
|
ret,
|
||
|
|
2,
|
||
|
|
#ifdef _MT
|
||
|
|
ptmbci->mbcodepage,
|
||
|
|
#else
|
||
|
|
__mbcodepage,
|
||
|
|
#endif
|
||
|
|
TRUE ) == 0 )
|
||
|
|
return c;
|
||
|
|
|
||
|
|
c = ret[1];
|
||
|
|
c += ret[0] << 8;
|
||
|
|
|
||
|
|
return c;
|
||
|
|
|
||
|
|
#else /* !_POSIX_ */
|
||
|
|
|
||
|
|
if (c >= _MBLOWERLOW1 && c <= _MBLOWERHIGH1)
|
||
|
|
c -= _MBCASEDIFF1;
|
||
|
|
else if (c >= _MBLOWERLOW2 && c <= _MBLOWERHIGH2)
|
||
|
|
c -= _MBCASEDIFF2;
|
||
|
|
|
||
|
|
return c;
|
||
|
|
|
||
|
|
#endif /* !_POSIX_ */
|
||
|
|
|
||
|
|
}
|
||
|
|
else
|
||
|
|
#ifdef _MT
|
||
|
|
return (unsigned int)__mbbtoupper_mt(ptmbci, (int)c);
|
||
|
|
#else
|
||
|
|
return (unsigned int)_mbbtoupper((int)c);
|
||
|
|
#endif
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif /* _MBCS */
|