windows-nt/Source/XPSP1/NT/base/crts/crtw32/mbstring/ismbalnm.c

131 lines
3.4 KiB
C
Raw Normal View History

2020-09-26 03:20:57 -05:00
/***
*ismbalnm - Test if character is alpha numeric (MBCS)
*
* Copyright (c) 1985-2001, Microsoft Corporation. All rights reserved.
*
*Purpose:
* Test if character is alpha numeric (MBCS)
*
*Revision History:
* 10-21-93 CFW Module created.
* 11-09-93 CFW Add code page for __crtxxx().
* 01-12-94 CFW Add lcid for __crtxxx().
* 04-18-94 CFW Use _ALPHA rather than _UPPER|_LOWER.
* 04-29-94 CFW Place c in char array.
* 05-19-94 CFW Enable non-Win32.
* 09-05-94 CFW Non-Win32 check for DIGITs.
* 03-16-97 RDK Added error flag to __crtGetStringTypeA.
* 09-11-97 GJF Replaced __mbcodepage == 0 with _ISNOTMBCP.
* 09-26-97 BWT Fix POSIX
* 03-30-98 GJF Implemented multithread support based on threadmbcinfo
* structs
* 05-17-99 PML Remove all Macintosh support.
*
*******************************************************************************/
#ifdef _MBCS
#if !defined(_POSIX_)
#include <windows.h>
#include <awint.h>
#endif /* !_POSIX_ */
#include <mtdll.h>
#include <cruntime.h>
#include <ctype.h>
#include <mbdata.h>
#include <mbctype.h>
#include <mbstring.h>
/***
* _ismbcalnum - Test if character is alpha numeric (MBCS)
*
*Purpose:
* Test if the supplied character is alpha numeric or not.
* Handles MBCS characters 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 test
*
*Exit:
* Returns TRUE if c is an alpha numeric character; else FALSE
*
*Exceptions:
*
*******************************************************************************/
int __cdecl _ismbcalnum(
unsigned int c
)
{
#ifdef _MT
pthreadmbcinfo ptmbci = _getptd()->ptmbcinfo;
if ( ptmbci != __ptmbcinfo )
ptmbci = __updatetmbcinfo();
#endif
if (c > 0x00FF)
{
#if !defined(_POSIX_)
char buf[2];
unsigned short ctype[2] = {0};
buf[0] = (c >> 8) & 0xFF;
buf[1] = c & 0xFF;
/* return FALSE if not in supported MB code page */
#ifdef _MT
if ( _ISNOTMBCP_MT(ptmbci) )
#else
if ( _ISNOTMBCP )
#endif
return 0;
/*
* Since 'c' could be two one-byte MB chars, we need room in the
* ctype return array to handle this. In this case, the
* second word in the return array will be non-zero.
*/
if ( __crtGetStringTypeA( CT_CTYPE1,
buf,
2,
ctype,
#ifdef _MT
ptmbci->mbcodepage,
ptmbci->mblcid,
#else
__mbcodepage,
__mblcid,
#endif
TRUE ) == 0 )
return 0;
/* ensure single MB character and test for type */
return (ctype[1] == 0 && ctype[0] & (_ALPHA|_DIGIT));
#else /* !_POSIX_ */
return ((c >= _MBDIGITLOW && c <= _MBDIGITHIGH) || _ismbcalpha(c));
#endif /* !_POSIX_ */
} else
#ifdef _MT
return __ismbbalnum_mt(ptmbci, c);
#else
return _ismbbalnum(c);
#endif
}
#endif /* _MBCS */