133 lines
3.5 KiB
C
133 lines
3.5 KiB
C
|
/***
|
||
|
*mbsupr.c - Convert string upper case (MBCS)
|
||
|
*
|
||
|
* Copyright (c) 1985-2001, Microsoft Corporation. All rights reserved.
|
||
|
*
|
||
|
*Purpose:
|
||
|
* Convert string upper case (MBCS)
|
||
|
*
|
||
|
*Revision History:
|
||
|
* 11-19-92 KRS Ported from 16-bit sources.
|
||
|
* 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-15-93 CFW Add _MB_CP_LOCK.
|
||
|
* 05-16-94 CFW Use _mbbtolower/upper.
|
||
|
* 05-17-94 CFW Enable non-Win32.
|
||
|
* 03-13-95 JCF Add (unsigned char) in _MB* compare with *(cp+1).
|
||
|
* 05-31-95 CFW Fix horrible Mac bug.
|
||
|
* 03-17-97 RDK Added error flag to __crtLCMapStringA.
|
||
|
* 09-26-97 BWT Fix POSIX
|
||
|
* 04-21-98 GJF Revised multithread support based on threadmbcinfo
|
||
|
* structs
|
||
|
* 05-17-99 PML Remove all Macintosh support.
|
||
|
*
|
||
|
*******************************************************************************/
|
||
|
|
||
|
#ifdef _MBCS
|
||
|
|
||
|
#include <awint.h>
|
||
|
#include <mtdll.h>
|
||
|
#include <cruntime.h>
|
||
|
#include <ctype.h>
|
||
|
#include <mbdata.h>
|
||
|
#include <mbstring.h>
|
||
|
#include <mbctype.h>
|
||
|
|
||
|
|
||
|
/***
|
||
|
* _mbsupr - Convert string upper case (MBCS)
|
||
|
*
|
||
|
*Purpose:
|
||
|
* Converts all the lower case characters in a string
|
||
|
* to upper case in place. Handles MBCS chars correctly.
|
||
|
*
|
||
|
*Entry:
|
||
|
* unsigned char *string = pointer to string
|
||
|
*
|
||
|
*Exit:
|
||
|
* Returns a pointer to the input string; no error return.
|
||
|
*
|
||
|
*Exceptions:
|
||
|
*
|
||
|
*******************************************************************************/
|
||
|
|
||
|
unsigned char * __cdecl _mbsupr(
|
||
|
unsigned char *string
|
||
|
)
|
||
|
{
|
||
|
unsigned char *cp;
|
||
|
#ifdef _MT
|
||
|
pthreadmbcinfo ptmbci = _getptd()->ptmbcinfo;
|
||
|
|
||
|
if ( ptmbci != __ptmbcinfo )
|
||
|
ptmbci = __updatetmbcinfo();
|
||
|
#endif
|
||
|
|
||
|
for (cp=string; *cp; cp++)
|
||
|
{
|
||
|
#ifdef _MT
|
||
|
if ( __ismbblead_mt(ptmbci, *cp) )
|
||
|
#else
|
||
|
if ( _ismbblead(*cp) )
|
||
|
#endif
|
||
|
{
|
||
|
|
||
|
#if !defined(_POSIX_)
|
||
|
|
||
|
int retval;
|
||
|
unsigned char ret[4];
|
||
|
|
||
|
#ifdef _MT
|
||
|
if ( (retval = __crtLCMapStringA( ptmbci->mblcid,
|
||
|
#else
|
||
|
if ( (retval = __crtLCMapStringA( __mblcid,
|
||
|
#endif
|
||
|
LCMAP_UPPERCASE,
|
||
|
cp,
|
||
|
2,
|
||
|
ret,
|
||
|
2,
|
||
|
#ifdef _MT
|
||
|
ptmbci->mbcodepage,
|
||
|
#else
|
||
|
__mbcodepage,
|
||
|
#endif
|
||
|
TRUE )) == 0 )
|
||
|
return NULL;
|
||
|
|
||
|
*cp = ret[0];
|
||
|
|
||
|
if (retval > 1)
|
||
|
*(++cp) = ret[1];
|
||
|
|
||
|
#else /* !_POSIX_ */
|
||
|
|
||
|
int mbval = ((*cp) << 8) + *(cp+1);
|
||
|
|
||
|
cp++;
|
||
|
if ( mbval >= _MBLOWERLOW1
|
||
|
&& mbval <= _MBLOWERHIGH1 )
|
||
|
*cp -= _MBCASEDIFF1;
|
||
|
|
||
|
else if (mbval >= _MBLOWERLOW2
|
||
|
&& mbval <= _MBLOWERHIGH2 )
|
||
|
*cp -= _MBCASEDIFF2;
|
||
|
|
||
|
#endif /* !_POSIX_ */
|
||
|
|
||
|
}
|
||
|
else
|
||
|
/* single byte, macro version */
|
||
|
#ifdef _MT
|
||
|
*cp = (unsigned char) __mbbtoupper_mt(ptmbci, *cp);
|
||
|
#else
|
||
|
*cp = (unsigned char) _mbbtoupper(*cp);
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
return string ;
|
||
|
}
|
||
|
|
||
|
#endif /* _MBCS */
|