mirror of
https://github.com/reactos/reactos.git
synced 2024-12-29 10:35:28 +00:00
51f78918da
Fixes 48 failing tests of user32:CharFuncs. Only 12 minor failing tests are left! Thanks to Simone Mario Lombardo for the problem analysis! CORE-18415 CORE-18452
467 lines
7.5 KiB
C
467 lines
7.5 KiB
C
/*
|
|
* PROJECT: ReactOS user32.dll
|
|
* LICENSE: GPL-2.0-or-later (https://spdx.org/licenses/GPL-2.0-or-later)
|
|
* PURPOSE: Text processing functions
|
|
* COPYRIGHT: Copyright 2001-2004 Casper S. Hornstrup <chorns@users.sourceforge.net>
|
|
*/
|
|
|
|
#include <user32.h>
|
|
|
|
static WORD
|
|
GetC1Type(WCHAR Ch)
|
|
{
|
|
WORD CharType;
|
|
|
|
if (! GetStringTypeW(CT_CTYPE1, &Ch, 1, &CharType))
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
return CharType;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPSTR
|
|
WINAPI
|
|
CharLowerA(LPSTR str)
|
|
{
|
|
if (!HIWORD(str))
|
|
{
|
|
char ch = LOWORD(str);
|
|
CharLowerBuffA( &ch, 1 );
|
|
return (LPSTR)(UINT_PTR)(BYTE)ch;
|
|
}
|
|
|
|
_SEH2_TRY
|
|
{
|
|
CharLowerBuffA( str, strlen(str) );
|
|
}
|
|
_SEH2_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
_SEH2_YIELD(return NULL);
|
|
}
|
|
_SEH2_END;
|
|
|
|
return str;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
DWORD
|
|
WINAPI
|
|
CharLowerBuffA(LPSTR str, DWORD len)
|
|
{
|
|
DWORD lenW;
|
|
WCHAR *strW;
|
|
if (!str) return 0; /* YES */
|
|
|
|
lenW = MultiByteToWideChar(CP_ACP, 0, str, len, NULL, 0);
|
|
strW = HeapAlloc(GetProcessHeap(), 0, lenW * sizeof(WCHAR));
|
|
if (strW) {
|
|
MultiByteToWideChar(CP_ACP, 0, str, len, strW, lenW);
|
|
CharLowerBuffW(strW, lenW);
|
|
len = WideCharToMultiByte(CP_ACP, 0, strW, lenW, str, len, NULL, NULL);
|
|
HeapFree(GetProcessHeap(), 0, strW);
|
|
return len;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
DWORD
|
|
WINAPI
|
|
CharLowerBuffW(LPWSTR str, DWORD len)
|
|
{
|
|
DWORD ret = len;
|
|
if (!str) return 0; /* YES */
|
|
for (; len; len--, str++) *str = towlower(*str);
|
|
return ret;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPWSTR
|
|
WINAPI
|
|
CharLowerW(LPWSTR x)
|
|
{
|
|
if (HIWORD(x)) return strlwrW(x);
|
|
else return (LPWSTR)((UINT_PTR)tolowerW(LOWORD(x)));
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPWSTR
|
|
WINAPI
|
|
CharPrevW(LPCWSTR start, LPCWSTR x)
|
|
{
|
|
if (x > start) return (LPWSTR)(x - 1);
|
|
else return (LPWSTR)x;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPSTR
|
|
WINAPI
|
|
CharNextA(LPCSTR ptr)
|
|
{
|
|
if (!*ptr) return (LPSTR)ptr;
|
|
if (IsDBCSLeadByte(ptr[0]) && ptr[1]) return (LPSTR)(ptr + 2);
|
|
return (LPSTR)(ptr + 1);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPSTR
|
|
WINAPI
|
|
CharNextExA(WORD codepage, LPCSTR ptr, DWORD flags)
|
|
{
|
|
if (!*ptr) return (LPSTR)ptr;
|
|
if (IsDBCSLeadByteEx(codepage, ptr[0]) && ptr[1]) return (LPSTR)(ptr + 2);
|
|
return (LPSTR)(ptr + 1);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPWSTR
|
|
WINAPI
|
|
CharNextW(LPCWSTR x)
|
|
{
|
|
if (*x) x++;
|
|
return (LPWSTR)x;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPSTR
|
|
WINAPI
|
|
CharPrevA(LPCSTR start, LPCSTR ptr)
|
|
{
|
|
if (ptr > start)
|
|
{
|
|
--ptr;
|
|
if (gpsi->dwSRVIFlags & SRVINFO_DBCSENABLED)
|
|
{
|
|
LPCSTR ch;
|
|
BOOL dbl = FALSE;
|
|
|
|
for (ch = ptr - 1; ch >= start; --ch)
|
|
{
|
|
if (!IsDBCSLeadByte(*ch))
|
|
break;
|
|
|
|
dbl = !dbl;
|
|
}
|
|
if (dbl) --ptr;
|
|
}
|
|
}
|
|
return (LPSTR)ptr;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPSTR
|
|
WINAPI
|
|
CharPrevExA(WORD codepage, LPCSTR start, LPCSTR ptr, DWORD flags)
|
|
{
|
|
if (ptr > start)
|
|
{
|
|
LPCSTR ch;
|
|
BOOL dbl = FALSE;
|
|
|
|
--ptr;
|
|
for (ch = ptr - 1; ch >= start; --ch)
|
|
{
|
|
if (!IsDBCSLeadByteEx(codepage, *ch))
|
|
break;
|
|
|
|
dbl = !dbl;
|
|
}
|
|
if (dbl) --ptr;
|
|
}
|
|
return (LPSTR)ptr;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
CharToOemA(LPCSTR s, LPSTR d)
|
|
{
|
|
if (!s || !d) return FALSE;
|
|
return CharToOemBuffA(s, d, strlen(s) + 1);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
CharToOemBuffA(LPCSTR s, LPSTR d, DWORD len)
|
|
{
|
|
WCHAR* bufW;
|
|
|
|
if ( !s || !d ) return FALSE;
|
|
|
|
bufW = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
|
|
if (bufW) {
|
|
MultiByteToWideChar(CP_ACP, 0, s, len, bufW, len);
|
|
WideCharToMultiByte(CP_OEMCP, 0, bufW, len, d, len, NULL, NULL);
|
|
HeapFree(GetProcessHeap(), 0, bufW);
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
CharToOemBuffW(LPCWSTR s, LPSTR d, DWORD len)
|
|
{
|
|
if (!s || !d)
|
|
return FALSE;
|
|
WideCharToMultiByte(CP_OEMCP, 0, s, len, d, len, NULL, NULL);
|
|
return TRUE;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
CharToOemW(LPCWSTR s, LPSTR d)
|
|
{
|
|
if ( !s || !d ) return FALSE;
|
|
return CharToOemBuffW(s, d, wcslen(s) + 1);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPSTR WINAPI CharUpperA(LPSTR str)
|
|
{
|
|
if (!HIWORD(str))
|
|
{
|
|
char ch = LOWORD(str);
|
|
CharUpperBuffA( &ch, 1 );
|
|
return (LPSTR)(UINT_PTR)(BYTE)ch;
|
|
}
|
|
|
|
_SEH2_TRY
|
|
{
|
|
CharUpperBuffA( str, strlen(str) );
|
|
}
|
|
_SEH2_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
_SEH2_YIELD(return NULL);
|
|
}
|
|
_SEH2_END;
|
|
|
|
return str;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
DWORD
|
|
WINAPI
|
|
CharUpperBuffA(LPSTR str, DWORD len)
|
|
{
|
|
DWORD lenW;
|
|
WCHAR* strW;
|
|
if (!str) return 0; /* YES */
|
|
|
|
lenW = MultiByteToWideChar(CP_ACP, 0, str, len, NULL, 0);
|
|
strW = HeapAlloc(GetProcessHeap(), 0, lenW * sizeof(WCHAR));
|
|
if (strW) {
|
|
MultiByteToWideChar(CP_ACP, 0, str, len, strW, lenW);
|
|
CharUpperBuffW(strW, lenW);
|
|
len = WideCharToMultiByte(CP_ACP, 0, strW, lenW, str, len, NULL, NULL);
|
|
HeapFree(GetProcessHeap(), 0, strW);
|
|
return len;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
DWORD
|
|
WINAPI
|
|
CharUpperBuffW(LPWSTR str, DWORD len)
|
|
{
|
|
DWORD ret = len;
|
|
if (!str) return 0; /* YES */
|
|
for (; len; len--, str++) *str = towupper(*str);
|
|
return ret;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
LPWSTR
|
|
WINAPI
|
|
CharUpperW(LPWSTR x)
|
|
{
|
|
if (HIWORD(x)) return struprW(x);
|
|
else return (LPWSTR)((UINT_PTR)toupperW(LOWORD(x)));
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
IsCharAlphaA(CHAR Ch)
|
|
{
|
|
WCHAR WCh;
|
|
|
|
MultiByteToWideChar(CP_ACP, 0, &Ch, 1, &WCh, 1);
|
|
return IsCharAlphaW(WCh);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
IsCharAlphaNumericA(CHAR Ch)
|
|
{
|
|
WCHAR WCh;
|
|
|
|
MultiByteToWideChar(CP_ACP, 0, &Ch, 1, &WCh, 1);
|
|
return IsCharAlphaNumericW(WCh);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
IsCharAlphaNumericW(WCHAR Ch)
|
|
{
|
|
return (GetC1Type(Ch) & (C1_ALPHA|C1_DIGIT)) != 0;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
IsCharAlphaW(WCHAR Ch)
|
|
{
|
|
return (GetC1Type(Ch) & C1_ALPHA) != 0;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
IsCharLowerA(CHAR Ch)
|
|
{
|
|
WCHAR WCh;
|
|
|
|
MultiByteToWideChar(CP_ACP, 0, &Ch, 1, &WCh, 1);
|
|
return IsCharLowerW(WCh);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
IsCharLowerW(WCHAR Ch)
|
|
{
|
|
return (GetC1Type(Ch) & C1_LOWER) != 0;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
IsCharUpperA(CHAR Ch)
|
|
{
|
|
WCHAR WCh;
|
|
|
|
MultiByteToWideChar(CP_ACP, 0, &Ch, 1, &WCh, 1);
|
|
return IsCharUpperW(WCh);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
IsCharUpperW(WCHAR Ch)
|
|
{
|
|
return (GetC1Type(Ch) & C1_UPPER) != 0;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
OemToCharA(LPCSTR s, LPSTR d)
|
|
{
|
|
if ( !s || !d ) return FALSE;
|
|
return OemToCharBuffA(s, d, strlen(s) + 1);
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL WINAPI OemToCharBuffA(LPCSTR s, LPSTR d, DWORD len)
|
|
{
|
|
WCHAR* bufW;
|
|
|
|
if ( !s || !d ) return FALSE;
|
|
|
|
bufW = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
|
|
if (bufW) {
|
|
MultiByteToWideChar(CP_OEMCP, 0, s, len, bufW, len);
|
|
WideCharToMultiByte(CP_ACP, 0, bufW, len, d, len, NULL, NULL);
|
|
HeapFree(GetProcessHeap(), 0, bufW);
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL
|
|
WINAPI
|
|
OemToCharBuffW(LPCSTR s, LPWSTR d, DWORD len)
|
|
{
|
|
if ( !s || !d ) return FALSE;
|
|
MultiByteToWideChar(CP_OEMCP, 0, s, len, d, len);
|
|
return TRUE;
|
|
}
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
BOOL WINAPI OemToCharW(LPCSTR s, LPWSTR d)
|
|
{
|
|
if ( !s || !d ) return FALSE;
|
|
return OemToCharBuffW(s, d, strlen(s) + 1);
|
|
}
|
|
|
|
/* EOF */
|