482 lines
12 KiB
C
482 lines
12 KiB
C
/*
|
|
* USER string functions
|
|
*
|
|
* Copyright 1993 Yngvi Sigurjonsson (yngvi@hafro.is)
|
|
* Copyright 1996 Alexandre Julliard
|
|
* Copyright 1996 Marcus Meissner
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include "config.h"
|
|
#include "wine/port.h"
|
|
|
|
#include <ctype.h>
|
|
#include <stdarg.h>
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "winnls.h"
|
|
#include "winuser.h"
|
|
#include "winerror.h"
|
|
|
|
#include "wine/exception.h"
|
|
|
|
|
|
/***********************************************************************
|
|
* CharNextA (USER32.@)
|
|
*/
|
|
LPSTR WINAPI CharNextA( LPCSTR ptr )
|
|
{
|
|
if (!*ptr) return (LPSTR)ptr;
|
|
if (IsDBCSLeadByte( ptr[0] ) && ptr[1]) return (LPSTR)(ptr + 2);
|
|
return (LPSTR)(ptr + 1);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharNextExA (USER32.@)
|
|
*/
|
|
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);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharNextExW (USER32.@)
|
|
*/
|
|
LPWSTR WINAPI CharNextExW( WORD codepage, LPCWSTR ptr, DWORD flags )
|
|
{
|
|
/* doesn't make sense, there are no codepages for Unicode */
|
|
return NULL;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharNextW (USER32.@)
|
|
*/
|
|
LPWSTR WINAPI CharNextW(LPCWSTR x)
|
|
{
|
|
if (*x) x++;
|
|
|
|
return (LPWSTR)x;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharPrevA (USER32.@)
|
|
*/
|
|
LPSTR WINAPI CharPrevA( LPCSTR start, LPCSTR ptr )
|
|
{
|
|
while (*start && (start < ptr))
|
|
{
|
|
LPCSTR next = CharNextA( start );
|
|
if (next >= ptr) break;
|
|
start = next;
|
|
}
|
|
return (LPSTR)start;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharPrevExA (USER32.@)
|
|
*/
|
|
LPSTR WINAPI CharPrevExA( WORD codepage, LPCSTR start, LPCSTR ptr, DWORD flags )
|
|
{
|
|
while (*start && (start < ptr))
|
|
{
|
|
LPCSTR next = CharNextExA( codepage, start, flags );
|
|
if (next >= ptr) break;
|
|
start = next;
|
|
}
|
|
return (LPSTR)start;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharPrevExW (USER32.@)
|
|
*/
|
|
LPSTR WINAPI CharPrevExW( WORD codepage, LPCWSTR start, LPCWSTR ptr, DWORD flags )
|
|
{
|
|
/* doesn't make sense, there are no codepages for Unicode */
|
|
return NULL;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharPrevW (USER32.@)
|
|
*/
|
|
LPWSTR WINAPI CharPrevW(LPCWSTR start,LPCWSTR x)
|
|
{
|
|
if (x>start) return (LPWSTR)(x-1);
|
|
else return (LPWSTR)x;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharToOemA (USER32.@)
|
|
*/
|
|
BOOL WINAPI CharToOemA( LPCSTR s, LPSTR d )
|
|
{
|
|
if (!s || !d) return FALSE;
|
|
return CharToOemBuffA( s, d, strlen( s ) + 1 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharToOemBuffA (USER32.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharToOemBuffW (USER32.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharToOemW (USER32.@)
|
|
*/
|
|
BOOL WINAPI CharToOemW( LPCWSTR s, LPSTR d )
|
|
{
|
|
if (!s || !d) return FALSE;
|
|
return CharToOemBuffW( s, d, lstrlenW( s ) + 1 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* OemToCharA (USER32.@)
|
|
*/
|
|
BOOL WINAPI OemToCharA( LPCSTR s, LPSTR d )
|
|
{
|
|
if (!s || !d) return FALSE;
|
|
return OemToCharBuffA( s, d, strlen( s ) + 1 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* OemToCharBuffA (USER32.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* OemToCharBuffW (USER32.@)
|
|
*/
|
|
BOOL WINAPI OemToCharBuffW( LPCSTR s, LPWSTR d, DWORD len )
|
|
{
|
|
if (!s || !d) return FALSE;
|
|
MultiByteToWideChar( CP_OEMCP, 0, s, len, d, len );
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* OemToCharW (USER32.@)
|
|
*/
|
|
BOOL WINAPI OemToCharW( LPCSTR s, LPWSTR d )
|
|
{
|
|
if (!s || !d) return FALSE;
|
|
return OemToCharBuffW( s, d, strlen( s ) + 1 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharLowerA (USER32.@)
|
|
*/
|
|
LPSTR WINAPI CharLowerA(LPSTR str)
|
|
{
|
|
if (IS_INTRESOURCE(str))
|
|
{
|
|
char ch = LOWORD(str);
|
|
CharLowerBuffA( &ch, 1 );
|
|
return (LPSTR)(UINT_PTR)(BYTE)ch;
|
|
}
|
|
|
|
__TRY
|
|
{
|
|
CharLowerBuffA( str, strlen(str) );
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return NULL;
|
|
}
|
|
__ENDTRY
|
|
return str;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharUpperA (USER32.@)
|
|
*/
|
|
LPSTR WINAPI CharUpperA(LPSTR str)
|
|
{
|
|
if (IS_INTRESOURCE(str))
|
|
{
|
|
char ch = LOWORD(str);
|
|
CharUpperBuffA( &ch, 1 );
|
|
return (LPSTR)(UINT_PTR)(BYTE)ch;
|
|
}
|
|
|
|
__TRY
|
|
{
|
|
CharUpperBuffA( str, strlen(str) );
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return NULL;
|
|
}
|
|
__ENDTRY
|
|
return str;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharLowerW (USER32.@)
|
|
*/
|
|
LPWSTR WINAPI CharLowerW( LPWSTR str )
|
|
{
|
|
if (!IS_INTRESOURCE( str ))
|
|
{
|
|
CharLowerBuffW( str, lstrlenW( str ));
|
|
return str;
|
|
}
|
|
else
|
|
{
|
|
WCHAR ch = LOWORD( str );
|
|
CharLowerBuffW( &ch, 1 );
|
|
return (LPWSTR)(UINT_PTR)ch;
|
|
}
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharUpperW (USER32.@)
|
|
*/
|
|
LPWSTR WINAPI CharUpperW( LPWSTR str )
|
|
{
|
|
if (!IS_INTRESOURCE( str ))
|
|
{
|
|
CharUpperBuffW( str, lstrlenW( str ));
|
|
return str;
|
|
}
|
|
else
|
|
{
|
|
WCHAR ch = LOWORD( str );
|
|
CharUpperBuffW( &ch, 1 );
|
|
return (LPWSTR)(UINT_PTR)ch;
|
|
}
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharLowerBuffA (USER32.@)
|
|
*/
|
|
DWORD WINAPI CharLowerBuffA( LPSTR str, DWORD len )
|
|
{
|
|
DWORD lenW;
|
|
WCHAR buffer[32];
|
|
WCHAR *strW = buffer;
|
|
|
|
if (!str) return 0; /* YES */
|
|
|
|
lenW = MultiByteToWideChar(CP_ACP, 0, str, len, NULL, 0);
|
|
if (lenW > sizeof(buffer)/sizeof(WCHAR))
|
|
{
|
|
strW = HeapAlloc(GetProcessHeap(), 0, lenW * sizeof(WCHAR));
|
|
if (!strW) return 0;
|
|
}
|
|
MultiByteToWideChar(CP_ACP, 0, str, len, strW, lenW);
|
|
CharLowerBuffW(strW, lenW);
|
|
len = WideCharToMultiByte(CP_ACP, 0, strW, lenW, str, len, NULL, NULL);
|
|
if (strW != buffer) HeapFree(GetProcessHeap(), 0, strW);
|
|
return len;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharLowerBuffW (USER32.@)
|
|
*/
|
|
DWORD WINAPI CharLowerBuffW( LPWSTR str, DWORD len )
|
|
{
|
|
if (!str) return 0; /* YES */
|
|
return LCMapStringW( LOCALE_USER_DEFAULT, LCMAP_LOWERCASE, str, len, str, len );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharUpperBuffA (USER32.@)
|
|
*/
|
|
DWORD WINAPI CharUpperBuffA( LPSTR str, DWORD len )
|
|
{
|
|
DWORD lenW;
|
|
WCHAR buffer[32];
|
|
WCHAR *strW = buffer;
|
|
|
|
if (!str) return 0; /* YES */
|
|
|
|
lenW = MultiByteToWideChar(CP_ACP, 0, str, len, NULL, 0);
|
|
if (lenW > sizeof(buffer)/sizeof(WCHAR))
|
|
{
|
|
strW = HeapAlloc(GetProcessHeap(), 0, lenW * sizeof(WCHAR));
|
|
if (!strW) return 0;
|
|
}
|
|
MultiByteToWideChar(CP_ACP, 0, str, len, strW, lenW);
|
|
CharUpperBuffW(strW, lenW);
|
|
len = WideCharToMultiByte(CP_ACP, 0, strW, lenW, str, len, NULL, NULL);
|
|
if (strW != buffer) HeapFree(GetProcessHeap(), 0, strW);
|
|
return len;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CharUpperBuffW (USER32.@)
|
|
*/
|
|
DWORD WINAPI CharUpperBuffW( LPWSTR str, DWORD len )
|
|
{
|
|
if (!str) return 0; /* YES */
|
|
return LCMapStringW( LOCALE_USER_DEFAULT, LCMAP_UPPERCASE, str, len, str, len );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* IsCharLower (USER.436)
|
|
* IsCharLowerA (USER32.@)
|
|
*/
|
|
BOOL WINAPI IsCharLowerA(CHAR x)
|
|
{
|
|
WCHAR wch;
|
|
MultiByteToWideChar(CP_ACP, 0, &x, 1, &wch, 1);
|
|
return IsCharLowerW(wch);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* IsCharLowerW (USER32.@)
|
|
*/
|
|
BOOL WINAPI IsCharLowerW( WCHAR ch )
|
|
{
|
|
WORD type;
|
|
return GetStringTypeW( CT_CTYPE1, &ch, 1, &type ) && (type & C1_LOWER);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* IsCharUpper (USER.435)
|
|
* IsCharUpperA (USER32.@)
|
|
*/
|
|
BOOL WINAPI IsCharUpperA(CHAR x)
|
|
{
|
|
WCHAR wch;
|
|
MultiByteToWideChar(CP_ACP, 0, &x, 1, &wch, 1);
|
|
return IsCharUpperW(wch);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* IsCharUpperW (USER32.@)
|
|
*/
|
|
BOOL WINAPI IsCharUpperW( WCHAR ch )
|
|
{
|
|
WORD type;
|
|
return GetStringTypeW( CT_CTYPE1, &ch, 1, &type ) && (type & C1_UPPER);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* IsCharAlphaNumeric (USER.434)
|
|
* IsCharAlphaNumericA (USER32.@)
|
|
*/
|
|
BOOL WINAPI IsCharAlphaNumericA(CHAR x)
|
|
{
|
|
WCHAR wch;
|
|
MultiByteToWideChar(CP_ACP, 0, &x, 1, &wch, 1);
|
|
return IsCharAlphaNumericW(wch);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* IsCharAlphaNumericW (USER32.@)
|
|
*/
|
|
BOOL WINAPI IsCharAlphaNumericW( WCHAR ch )
|
|
{
|
|
WORD type;
|
|
return GetStringTypeW( CT_CTYPE1, &ch, 1, &type ) && (type & (C1_ALPHA|C1_DIGIT));
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* IsCharAlpha (USER.433)
|
|
* IsCharAlphaA (USER32.@)
|
|
*/
|
|
BOOL WINAPI IsCharAlphaA(CHAR x)
|
|
{
|
|
WCHAR wch;
|
|
MultiByteToWideChar(CP_ACP, 0, &x, 1, &wch, 1);
|
|
return IsCharAlphaW(wch);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* IsCharAlphaW (USER32.@)
|
|
*/
|
|
BOOL WINAPI IsCharAlphaW( WCHAR ch )
|
|
{
|
|
WORD type;
|
|
return GetStringTypeW( CT_CTYPE1, &ch, 1, &type ) && (type & C1_ALPHA);
|
|
}
|