Sweden-Number/dlls/user32/input.c

636 lines
18 KiB
C

/*
* USER Input processing
*
* Copyright 1993 Bob Amstadt
* Copyright 1996 Albrecht Kleine
* Copyright 1997 David Faure
* Copyright 1998 Morten Welinder
* Copyright 1998 Ulrich Weigand
*
* 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 <stdlib.h>
#include <string.h>
#include <stdarg.h>
#include <stdio.h>
#include <ctype.h>
#include <assert.h>
#define NONAMELESSUNION
#include "ntstatus.h"
#define WIN32_NO_STATUS
#include "windef.h"
#include "winbase.h"
#include "wingdi.h"
#include "winuser.h"
#include "winnls.h"
#include "winternl.h"
#include "winerror.h"
#include "win.h"
#include "user_private.h"
#include "dbt.h"
#include "wine/server.h"
#include "wine/debug.h"
WINE_DEFAULT_DEBUG_CHANNEL(win);
WINE_DECLARE_DEBUG_CHANNEL(keyboard);
/***********************************************************************
* get_locale_kbd_layout
*/
static HKL get_locale_kbd_layout(void)
{
ULONG_PTR layout;
LANGID langid;
/* FIXME:
*
* layout = main_key_tab[kbd_layout].lcid;
*
* Winword uses return value of GetKeyboardLayout as a codepage
* to translate ANSI keyboard messages to unicode. But we have
* a problem with it: for instance Polish keyboard layout is
* identical to the US one, and therefore instead of the Polish
* locale id we return the US one.
*/
layout = GetUserDefaultLCID();
/*
* Microsoft Office expects this value to be something specific
* for Japanese and Korean Windows with an IME the value is 0xe001
* We should probably check to see if an IME exists and if so then
* set this word properly.
*/
langid = PRIMARYLANGID( LANGIDFROMLCID( layout ) );
if (langid == LANG_CHINESE || langid == LANG_JAPANESE || langid == LANG_KOREAN)
layout = MAKELONG( layout, 0xe001 ); /* IME */
else
layout = MAKELONG( layout, layout );
return (HKL)layout;
}
/**********************************************************************
* set_capture_window
*/
BOOL set_capture_window( HWND hwnd, UINT gui_flags, HWND *prev_ret )
{
/* FIXME: move callers to win32u or use NtUserSetCapture */
return NtUserCallHwndParam( hwnd, gui_flags, NtUserSetCaptureWindow );
}
/***********************************************************************
* keybd_event (USER32.@)
*/
void WINAPI keybd_event( BYTE bVk, BYTE bScan,
DWORD dwFlags, ULONG_PTR dwExtraInfo )
{
INPUT input;
input.type = INPUT_KEYBOARD;
input.u.ki.wVk = bVk;
input.u.ki.wScan = bScan;
input.u.ki.dwFlags = dwFlags;
input.u.ki.time = 0;
input.u.ki.dwExtraInfo = dwExtraInfo;
NtUserSendInput( 1, &input, sizeof(input) );
}
/***********************************************************************
* mouse_event (USER32.@)
*/
void WINAPI mouse_event( DWORD dwFlags, DWORD dx, DWORD dy,
DWORD dwData, ULONG_PTR dwExtraInfo )
{
INPUT input;
input.type = INPUT_MOUSE;
input.u.mi.dx = dx;
input.u.mi.dy = dy;
input.u.mi.mouseData = dwData;
input.u.mi.dwFlags = dwFlags;
input.u.mi.time = 0;
input.u.mi.dwExtraInfo = dwExtraInfo;
NtUserSendInput( 1, &input, sizeof(input) );
}
/***********************************************************************
* GetCursorPos (USER32.@)
*/
BOOL WINAPI DECLSPEC_HOTPATCH GetCursorPos( POINT *pt )
{
return NtUserGetCursorPos( pt );
}
/**********************************************************************
* ReleaseCapture (USER32.@)
*/
BOOL WINAPI DECLSPEC_HOTPATCH ReleaseCapture(void)
{
return NtUserReleaseCapture();
}
/**********************************************************************
* GetCapture (USER32.@)
*/
HWND WINAPI GetCapture(void)
{
GUITHREADINFO info;
info.cbSize = sizeof(info);
return NtUserGetGUIThreadInfo( GetCurrentThreadId(), &info ) ? info.hwndCapture : 0;
}
/*****************************************************************
* DestroyCaret (USER32.@)
*/
BOOL WINAPI DestroyCaret(void)
{
return NtUserDestroyCaret();
}
/*****************************************************************
* SetCaretPos (USER32.@)
*/
BOOL WINAPI SetCaretPos( int x, int y )
{
return NtUserSetCaretPos( x, y );
}
/*****************************************************************
* SetCaretBlinkTime (USER32.@)
*/
BOOL WINAPI SetCaretBlinkTime( unsigned int time )
{
return NtUserSetCaretBlinkTime( time );
}
/***********************************************************************
* GetInputState (USER32.@)
*/
BOOL WINAPI GetInputState(void)
{
return NtUserGetInputState();
}
/******************************************************************
* GetLastInputInfo (USER32.@)
*/
BOOL WINAPI GetLastInputInfo(PLASTINPUTINFO plii)
{
BOOL ret;
TRACE("%p\n", plii);
if (plii->cbSize != sizeof (*plii) )
{
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
SERVER_START_REQ( get_last_input_time )
{
ret = !wine_server_call_err( req );
if (ret)
plii->dwTime = reply->time;
}
SERVER_END_REQ;
return ret;
}
/**********************************************************************
* VkKeyScanA (USER32.@)
*
* VkKeyScan translates an ANSI character to a virtual-key and shift code
* for the current keyboard.
* high-order byte yields :
* 0 Unshifted
* 1 Shift
* 2 Ctrl
* 3-5 Shift-key combinations that are not used for characters
* 6 Ctrl-Alt
* 7 Ctrl-Alt-Shift
* I.e. : Shift = 1, Ctrl = 2, Alt = 4.
* FIXME : works ok except for dead chars :
* VkKeyScan '^'(0x5e, 94) ... got keycode 00 ... returning 00
* VkKeyScan '`'(0x60, 96) ... got keycode 00 ... returning 00
*/
SHORT WINAPI VkKeyScanA(CHAR cChar)
{
WCHAR wChar;
if (IsDBCSLeadByte(cChar)) return -1;
MultiByteToWideChar(CP_ACP, 0, &cChar, 1, &wChar, 1);
return VkKeyScanW(wChar);
}
/******************************************************************************
* VkKeyScanW (USER32.@)
*/
SHORT WINAPI VkKeyScanW(WCHAR cChar)
{
return NtUserVkKeyScanEx( cChar, NtUserGetKeyboardLayout(0) );
}
/**********************************************************************
* VkKeyScanExA (USER32.@)
*/
WORD WINAPI VkKeyScanExA(CHAR cChar, HKL dwhkl)
{
WCHAR wChar;
if (IsDBCSLeadByte(cChar)) return -1;
MultiByteToWideChar(CP_ACP, 0, &cChar, 1, &wChar, 1);
return NtUserVkKeyScanEx( wChar, dwhkl );
}
/**********************************************************************
* OemKeyScan (USER32.@)
*/
DWORD WINAPI OemKeyScan( WORD oem )
{
WCHAR wchr;
DWORD vkey, scan;
char oem_char = LOBYTE( oem );
if (!OemToCharBuffW( &oem_char, &wchr, 1 ))
return -1;
vkey = VkKeyScanW( wchr );
scan = MapVirtualKeyW( LOBYTE( vkey ), MAPVK_VK_TO_VSC );
if (!scan) return -1;
vkey &= 0xff00;
vkey <<= 8;
return vkey | scan;
}
/******************************************************************************
* GetKeyboardType (USER32.@)
*/
INT WINAPI GetKeyboardType(INT nTypeFlag)
{
TRACE_(keyboard)("(%d)\n", nTypeFlag);
if (LOWORD(NtUserGetKeyboardLayout(0)) == MAKELANGID(LANG_JAPANESE, SUBLANG_JAPANESE_JAPAN))
{
/* scan code for `_', the key left of r-shift, in Japanese 106 keyboard */
const UINT JP106_VSC_USCORE = 0x73;
switch(nTypeFlag)
{
case 0: /* Keyboard type */
return 7; /* Japanese keyboard */
case 1: /* Keyboard Subtype */
/* Test keyboard mappings to detect Japanese keyboard */
if (MapVirtualKeyW(VK_OEM_102, MAPVK_VK_TO_VSC) == JP106_VSC_USCORE
&& MapVirtualKeyW(JP106_VSC_USCORE, MAPVK_VSC_TO_VK) == VK_OEM_102)
return 2; /* Japanese 106 */
else
return 0; /* AT-101 */
case 2: /* Number of F-keys */
return 12; /* It has 12 F-keys */
}
}
else
{
switch(nTypeFlag)
{
case 0: /* Keyboard type */
return 4; /* AT-101 */
case 1: /* Keyboard Subtype */
return 0; /* There are no defined subtypes */
case 2: /* Number of F-keys */
return 12; /* We're doing an 101 for now, so return 12 F-keys */
}
}
WARN_(keyboard)("Unknown type\n");
return 0; /* The book says 0 here, so 0 */
}
/******************************************************************************
* MapVirtualKeyA (USER32.@)
*/
UINT WINAPI MapVirtualKeyA(UINT code, UINT maptype)
{
return MapVirtualKeyExA( code, maptype, NtUserGetKeyboardLayout(0) );
}
/******************************************************************************
* MapVirtualKeyW (USER32.@)
*/
UINT WINAPI MapVirtualKeyW(UINT code, UINT maptype)
{
return NtUserMapVirtualKeyEx( code, maptype, NtUserGetKeyboardLayout(0) );
}
/******************************************************************************
* MapVirtualKeyExA (USER32.@)
*/
UINT WINAPI MapVirtualKeyExA(UINT code, UINT maptype, HKL hkl)
{
UINT ret;
ret = NtUserMapVirtualKeyEx( code, maptype, hkl );
if (maptype == MAPVK_VK_TO_CHAR)
{
BYTE ch = 0;
WCHAR wch = ret;
WideCharToMultiByte( CP_ACP, 0, &wch, 1, (LPSTR)&ch, 1, NULL, NULL );
ret = ch;
}
return ret;
}
/****************************************************************************
* GetKBCodePage (USER32.@)
*/
UINT WINAPI GetKBCodePage(void)
{
return GetOEMCP();
}
/****************************************************************************
* GetKeyboardLayoutNameA (USER32.@)
*/
BOOL WINAPI GetKeyboardLayoutNameA(LPSTR pszKLID)
{
WCHAR buf[KL_NAMELENGTH];
if (NtUserGetKeyboardLayoutName( buf ))
return WideCharToMultiByte( CP_ACP, 0, buf, -1, pszKLID, KL_NAMELENGTH, NULL, NULL ) != 0;
return FALSE;
}
/****************************************************************************
* GetKeyNameTextA (USER32.@)
*/
INT WINAPI GetKeyNameTextA(LONG lParam, LPSTR lpBuffer, INT nSize)
{
WCHAR buf[256];
INT ret;
if (!nSize || !NtUserGetKeyNameText( lParam, buf, ARRAYSIZE(buf) ))
{
lpBuffer[0] = 0;
return 0;
}
ret = WideCharToMultiByte(CP_ACP, 0, buf, -1, lpBuffer, nSize, NULL, NULL);
if (!ret && nSize)
{
ret = nSize - 1;
lpBuffer[ret] = 0;
}
else ret--;
return ret;
}
/****************************************************************************
* ToUnicode (USER32.@)
*/
INT WINAPI ToUnicode( UINT virt, UINT scan, const BYTE *state, LPWSTR str, int size, UINT flags )
{
return NtUserToUnicodeEx( virt, scan, state, str, size, flags, NtUserGetKeyboardLayout(0) );
}
/****************************************************************************
* ToAscii (USER32.@)
*/
INT WINAPI ToAscii( UINT virtKey, UINT scanCode, const BYTE *lpKeyState,
LPWORD lpChar, UINT flags )
{
return ToAsciiEx( virtKey, scanCode, lpKeyState, lpChar, flags,
NtUserGetKeyboardLayout(0) );
}
/****************************************************************************
* ToAsciiEx (USER32.@)
*/
INT WINAPI ToAsciiEx( UINT virtKey, UINT scanCode, const BYTE *lpKeyState,
LPWORD lpChar, UINT flags, HKL dwhkl )
{
WCHAR uni_chars[2];
INT ret, n_ret;
ret = NtUserToUnicodeEx( virtKey, scanCode, lpKeyState, uni_chars, 2, flags, dwhkl );
if (ret < 0) n_ret = 1; /* FIXME: make ToUnicode return 2 for dead chars */
else n_ret = ret;
WideCharToMultiByte(CP_ACP, 0, uni_chars, n_ret, (LPSTR)lpChar, 2, NULL, NULL);
return ret;
}
/**********************************************************************
* BlockInput (USER32.@)
*/
BOOL WINAPI BlockInput(BOOL fBlockIt)
{
FIXME_(keyboard)("(%d): stub\n", fBlockIt);
SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
return FALSE;
}
/***********************************************************************
* LoadKeyboardLayoutW (USER32.@)
*/
HKL WINAPI LoadKeyboardLayoutW( const WCHAR *name, UINT flags )
{
WCHAR layout_path[MAX_PATH], value[5];
DWORD value_size, tmp;
HKEY hkey;
HKL layout;
FIXME_(keyboard)( "name %s, flags %x, semi-stub!\n", debugstr_w( name ), flags );
tmp = wcstoul( name, NULL, 16 );
if (HIWORD( tmp )) layout = UlongToHandle( tmp );
else layout = UlongToHandle( MAKELONG( LOWORD( tmp ), LOWORD( tmp ) ) );
wcscpy( layout_path, L"System\\CurrentControlSet\\Control\\Keyboard Layouts\\" );
wcscat( layout_path, name );
if (!RegOpenKeyW( HKEY_LOCAL_MACHINE, layout_path, &hkey ))
{
value_size = sizeof(value);
if (!RegGetValueW( hkey, NULL, L"Layout Id", RRF_RT_REG_SZ, NULL, (void *)&value, &value_size ))
layout = UlongToHandle( MAKELONG( LOWORD( tmp ), 0xf000 | (wcstoul( value, NULL, 16 ) & 0xfff) ) );
RegCloseKey( hkey );
}
if ((flags & KLF_ACTIVATE) && NtUserActivateKeyboardLayout( layout, 0 )) return layout;
/* FIXME: semi-stub: returning default layout */
return get_locale_kbd_layout();
}
/***********************************************************************
* LoadKeyboardLayoutA (USER32.@)
*/
HKL WINAPI LoadKeyboardLayoutA(LPCSTR pwszKLID, UINT Flags)
{
HKL ret;
UNICODE_STRING pwszKLIDW;
if (pwszKLID) RtlCreateUnicodeStringFromAsciiz(&pwszKLIDW, pwszKLID);
else pwszKLIDW.Buffer = NULL;
ret = LoadKeyboardLayoutW(pwszKLIDW.Buffer, Flags);
RtlFreeUnicodeString(&pwszKLIDW);
return ret;
}
/***********************************************************************
* UnloadKeyboardLayout (USER32.@)
*/
BOOL WINAPI UnloadKeyboardLayout( HKL layout )
{
FIXME_(keyboard)( "layout %p, stub!\n", layout );
SetLastError( ERROR_CALL_NOT_IMPLEMENTED );
return FALSE;
}
/***********************************************************************
* EnableMouseInPointer (USER32.@)
*/
BOOL WINAPI EnableMouseInPointer(BOOL enable)
{
FIXME("(%#x) stub\n", enable);
SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
return FALSE;
}
static DWORD CALLBACK devnotify_window_callback(HANDLE handle, DWORD flags, DEV_BROADCAST_HDR *header)
{
SendMessageTimeoutW(handle, WM_DEVICECHANGE, flags, (LPARAM)header, SMTO_ABORTIFHUNG, 2000, NULL);
return 0;
}
static DWORD CALLBACK devnotify_service_callback(HANDLE handle, DWORD flags, DEV_BROADCAST_HDR *header)
{
FIXME("Support for service handles is not yet implemented!\n");
return 0;
}
struct device_notification_details
{
DWORD (CALLBACK *cb)(HANDLE handle, DWORD flags, DEV_BROADCAST_HDR *header);
HANDLE handle;
union
{
DEV_BROADCAST_HDR header;
DEV_BROADCAST_DEVICEINTERFACE_W iface;
} filter;
};
extern HDEVNOTIFY WINAPI I_ScRegisterDeviceNotification( struct device_notification_details *details,
void *filter, DWORD flags );
extern BOOL WINAPI I_ScUnregisterDeviceNotification( HDEVNOTIFY handle );
/***********************************************************************
* RegisterDeviceNotificationA (USER32.@)
*
* See RegisterDeviceNotificationW.
*/
HDEVNOTIFY WINAPI RegisterDeviceNotificationA( HANDLE handle, void *filter, DWORD flags )
{
return RegisterDeviceNotificationW( handle, filter, flags );
}
/***********************************************************************
* RegisterDeviceNotificationW (USER32.@)
*/
HDEVNOTIFY WINAPI RegisterDeviceNotificationW( HANDLE handle, void *filter, DWORD flags )
{
struct device_notification_details details;
DEV_BROADCAST_HDR *header = filter;
TRACE("handle %p, filter %p, flags %#x\n", handle, filter, flags);
if (flags & ~(DEVICE_NOTIFY_SERVICE_HANDLE | DEVICE_NOTIFY_ALL_INTERFACE_CLASSES))
{
SetLastError( ERROR_INVALID_PARAMETER );
return NULL;
}
if (!(flags & DEVICE_NOTIFY_SERVICE_HANDLE) && !IsWindow( handle ))
{
SetLastError( ERROR_INVALID_PARAMETER );
return NULL;
}
if (!header) details.filter.header.dbch_devicetype = 0;
else if (header->dbch_devicetype == DBT_DEVTYP_DEVICEINTERFACE)
{
DEV_BROADCAST_DEVICEINTERFACE_W *iface = (DEV_BROADCAST_DEVICEINTERFACE_W *)header;
details.filter.iface = *iface;
if (flags & DEVICE_NOTIFY_ALL_INTERFACE_CLASSES)
details.filter.iface.dbcc_size = offsetof( DEV_BROADCAST_DEVICEINTERFACE_W, dbcc_classguid );
else
details.filter.iface.dbcc_size = offsetof( DEV_BROADCAST_DEVICEINTERFACE_W, dbcc_name );
}
else if (header->dbch_devicetype == DBT_DEVTYP_HANDLE)
{
FIXME( "DBT_DEVTYP_HANDLE filter type not implemented\n" );
details.filter.header.dbch_devicetype = 0;
}
else
{
SetLastError( ERROR_INVALID_DATA );
return NULL;
}
details.handle = handle;
if (flags & DEVICE_NOTIFY_SERVICE_HANDLE)
details.cb = devnotify_service_callback;
else
details.cb = devnotify_window_callback;
return I_ScRegisterDeviceNotification( &details, filter, 0 );
}
/***********************************************************************
* UnregisterDeviceNotification (USER32.@)
*/
BOOL WINAPI UnregisterDeviceNotification( HDEVNOTIFY handle )
{
TRACE("%p\n", handle);
return I_ScUnregisterDeviceNotification( handle );
}