330 lines
7.7 KiB
C
330 lines
7.7 KiB
C
/*
|
|
* Kernel string functions
|
|
*
|
|
* Copyright 1993 Yngvi Sigurjonsson
|
|
* Copyright 1996 Alexandre Julliard
|
|
* Copyright 2001 Dmitry Timoshkov for CodeWeavers
|
|
*
|
|
* 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 <string.h>
|
|
|
|
#define WINE_NO_INLINE_STRING
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "wine/winbase16.h"
|
|
#include "wine/unicode.h"
|
|
#include "wine/exception.h"
|
|
|
|
|
|
static INT (WINAPI *pLoadStringA)(HINSTANCE, UINT, LPSTR, INT);
|
|
static INT (WINAPI *pwvsprintfA)(LPSTR, LPCSTR, __ms_va_list);
|
|
|
|
|
|
/***********************************************************************
|
|
* Helper for k32 family functions
|
|
*/
|
|
static void *user32_proc_address(const char *proc_name)
|
|
{
|
|
static HMODULE hUser32;
|
|
|
|
if(!hUser32) hUser32 = LoadLibraryA("user32.dll");
|
|
return GetProcAddress(hUser32, proc_name);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* k32CharToOemBuffA (KERNEL32.11)
|
|
*/
|
|
BOOL WINAPI k32CharToOemBuffA(LPCSTR s, LPSTR d, DWORD len)
|
|
{
|
|
WCHAR *bufW;
|
|
|
|
if ((bufW = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) )))
|
|
{
|
|
MultiByteToWideChar( CP_ACP, 0, s, len, bufW, len );
|
|
WideCharToMultiByte( CP_OEMCP, 0, bufW, len, d, len, NULL, NULL );
|
|
HeapFree( GetProcessHeap(), 0, bufW );
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* k32CharToOemA (KERNEL32.10)
|
|
*/
|
|
BOOL WINAPI k32CharToOemA(LPCSTR s, LPSTR d)
|
|
{
|
|
if (!s || !d) return TRUE;
|
|
return k32CharToOemBuffA( s, d, strlen(s) + 1 );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* k32OemToCharBuffA (KERNEL32.13)
|
|
*/
|
|
BOOL WINAPI k32OemToCharBuffA(LPCSTR s, LPSTR d, DWORD len)
|
|
{
|
|
WCHAR *bufW;
|
|
|
|
if ((bufW = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) )))
|
|
{
|
|
MultiByteToWideChar( CP_OEMCP, 0, s, len, bufW, len );
|
|
WideCharToMultiByte( CP_ACP, 0, bufW, len, d, len, NULL, NULL );
|
|
HeapFree( GetProcessHeap(), 0, bufW );
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* k32OemToCharA (KERNEL32.12)
|
|
*/
|
|
BOOL WINAPI k32OemToCharA(LPCSTR s, LPSTR d)
|
|
{
|
|
return k32OemToCharBuffA( s, d, strlen(s) + 1 );
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
* k32LoadStringA (KERNEL32.14)
|
|
*/
|
|
INT WINAPI k32LoadStringA(HINSTANCE instance, UINT resource_id,
|
|
LPSTR buffer, INT buflen)
|
|
{
|
|
if(!pLoadStringA) pLoadStringA = user32_proc_address("LoadStringA");
|
|
return pLoadStringA(instance, resource_id, buffer, buflen);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* k32wvsprintfA (KERNEL32.16)
|
|
*/
|
|
INT WINAPI k32wvsprintfA(LPSTR buffer, LPCSTR spec, __ms_va_list args)
|
|
{
|
|
if(!pwvsprintfA) pwvsprintfA = user32_proc_address("wvsprintfA");
|
|
return (*pwvsprintfA)(buffer, spec, args);
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* k32wsprintfA (KERNEL32.15)
|
|
*/
|
|
INT WINAPIV k32wsprintfA(LPSTR buffer, LPCSTR spec, ...)
|
|
{
|
|
__ms_va_list args;
|
|
INT res;
|
|
|
|
__ms_va_start(args, spec);
|
|
res = k32wvsprintfA(buffer, spec, args);
|
|
__ms_va_end(args);
|
|
return res;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* lstrcatA (KERNEL32.@)
|
|
* lstrcat (KERNEL32.@)
|
|
*/
|
|
LPSTR WINAPI lstrcatA( LPSTR dst, LPCSTR src )
|
|
{
|
|
__TRY
|
|
{
|
|
strcat( dst, src );
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return NULL;
|
|
}
|
|
__ENDTRY
|
|
return dst;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* lstrcatW (KERNEL32.@)
|
|
*/
|
|
LPWSTR WINAPI lstrcatW( LPWSTR dst, LPCWSTR src )
|
|
{
|
|
__TRY
|
|
{
|
|
strcatW( dst, src );
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return NULL;
|
|
}
|
|
__ENDTRY
|
|
return dst;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* lstrcpyA (KERNEL32.@)
|
|
* lstrcpy (KERNEL32.@)
|
|
*/
|
|
LPSTR WINAPI lstrcpyA( LPSTR dst, LPCSTR src )
|
|
{
|
|
__TRY
|
|
{
|
|
/* this is how Windows does it */
|
|
memmove( dst, src, strlen(src)+1 );
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return NULL;
|
|
}
|
|
__ENDTRY
|
|
return dst;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* lstrcpyW (KERNEL32.@)
|
|
*/
|
|
LPWSTR WINAPI lstrcpyW( LPWSTR dst, LPCWSTR src )
|
|
{
|
|
__TRY
|
|
{
|
|
strcpyW( dst, src );
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return NULL;
|
|
}
|
|
__ENDTRY
|
|
return dst;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* lstrcpynA (KERNEL32.@)
|
|
* lstrcpyn (KERNEL32.@)
|
|
*
|
|
* Note: this function differs from the UNIX strncpy, it _always_ writes
|
|
* a terminating \0.
|
|
*
|
|
* Note: n is an INT but Windows treats it as unsigned, and will happily
|
|
* copy a gazillion chars if n is negative.
|
|
*/
|
|
LPSTR WINAPI lstrcpynA( LPSTR dst, LPCSTR src, INT n )
|
|
{
|
|
__TRY
|
|
{
|
|
LPSTR d = dst;
|
|
LPCSTR s = src;
|
|
UINT count = n;
|
|
|
|
while ((count > 1) && *s)
|
|
{
|
|
count--;
|
|
*d++ = *s++;
|
|
}
|
|
if (count) *d = 0;
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return 0;
|
|
}
|
|
__ENDTRY
|
|
return dst;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* lstrcpynW (KERNEL32.@)
|
|
*
|
|
* Note: this function differs from the UNIX strncpy, it _always_ writes
|
|
* a terminating \0
|
|
*
|
|
* Note: n is an INT but Windows treats it as unsigned, and will happily
|
|
* copy a gazillion chars if n is negative.
|
|
*/
|
|
LPWSTR WINAPI lstrcpynW( LPWSTR dst, LPCWSTR src, INT n )
|
|
{
|
|
__TRY
|
|
{
|
|
LPWSTR d = dst;
|
|
LPCWSTR s = src;
|
|
UINT count = n;
|
|
|
|
while ((count > 1) && *s)
|
|
{
|
|
count--;
|
|
*d++ = *s++;
|
|
}
|
|
if (count) *d = 0;
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return 0;
|
|
}
|
|
__ENDTRY
|
|
return dst;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* lstrlenA (KERNEL32.@)
|
|
* lstrlen (KERNEL32.@)
|
|
*/
|
|
INT WINAPI lstrlenA( LPCSTR str )
|
|
{
|
|
INT ret;
|
|
__TRY
|
|
{
|
|
ret = strlen(str);
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return 0;
|
|
}
|
|
__ENDTRY
|
|
return ret;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* lstrlenW (KERNEL32.@)
|
|
*/
|
|
INT WINAPI lstrlenW( LPCWSTR str )
|
|
{
|
|
INT ret;
|
|
__TRY
|
|
{
|
|
ret = strlenW(str);
|
|
}
|
|
__EXCEPT_PAGE_FAULT
|
|
{
|
|
SetLastError( ERROR_INVALID_PARAMETER );
|
|
return 0;
|
|
}
|
|
__ENDTRY
|
|
return ret;
|
|
}
|