Source code of Windows XP (NT5)
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.
 
 
 
 
 
 

130 lines
3.3 KiB

/***
*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 */