ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
Sweden-Number/dlls/user/message.c

1815 lines
54 KiB
C
Raw Normal View History

Rewrote most of SendMessage/PeekMessage. Implemented inter-process messaging. Moved most message routines to dlls/user, and split off 16-bit routines to a separate file.
2001-08-07 21:19:08 +02:00
/*
* Window messaging support
*
* Copyright 2001 Alexandre Julliard
*/
#include "winbase.h"
#include "wingdi.h"
#include "winuser.h"
#include "winerror.h"
#include "winnls.h"
#include "wine/unicode.h"
#include "wine/server.h"
#include "queue.h"
#include "input.h"
#include "message.h"
#include "hook.h"
#include "spy.h"
#include "user.h"
#include "win.h"
#include "debugtools.h"
DEFAULT_DEBUG_CHANNEL(msg);
#define WM_NCMOUSEFIRST WM_NCMOUSEMOVE
#define WM_NCMOUSELAST WM_NCMBUTTONDBLCLK
#define MAX_PACK_COUNT 4
/* description of the data fields that need to be packed along with a sent message */
struct packed_message
{
int count;
const void *data[MAX_PACK_COUNT];
size_t size[MAX_PACK_COUNT];
};
/* info about the message currently being received by the current thread */
struct received_message_info
{
enum message_type type;
MSG msg;
UINT flags; /* InSendMessageEx return flags */
};
/* structure to group all parameters for sent messages of the various kinds */
struct send_message_info
{
enum message_type type;
HWND hwnd;
UINT msg;
WPARAM wparam;
LPARAM lparam;
UINT flags; /* flags for SendMessageTimeout */
UINT timeout; /* timeout for SendMessageTimeout */
SENDASYNCPROC callback; /* callback function for SendMessageCallback */
ULONG_PTR data; /* callback data */
};
/* flag for messages that contain pointers */
/* 16 messages per entry, messages 0..15 map to bits 0..15 */
#define SET(msg) (1 << ((msg) & 15))
static const unsigned short message_pointer_flags[] =
{
/* 0x00 - 0x0f */
SET(WM_CREATE) | SET(WM_GETTEXT) | SET(WM_SETTEXT),
/* 0x10 - 0x1f */
SET(WM_WININICHANGE),
/* 0x20 - 0x2f */
SET(WM_GETMINMAXINFO) | SET(WM_DRAWITEM) | SET(WM_MEASUREITEM) | SET(WM_DELETEITEM),
/* 0x30 - 0x3f */
SET(WM_COMPAREITEM),
/* 0x40 - 0x4f */
SET(WM_WINDOWPOSCHANGING) | SET(WM_WINDOWPOSCHANGED) | SET(WM_COPYDATA) | SET(WM_NOTIFY),
/* 0x50 - 0x5f */
SET(WM_HELP),
/* 0x60 - 0x6f */
0,
/* 0x70 - 0x7f */
SET(WM_STYLECHANGING) | SET(WM_STYLECHANGED),
/* 0x80 - 0x8f */
SET(WM_NCCREATE) | SET(WM_NCCALCSIZE) | SET(WM_GETDLGCODE),
/* 0x90 - 0x9f */
0,
/* 0xa0 - 0xaf */
0,
/* 0xb0 - 0xbf */
SET(EM_GETSEL) | SET(EM_GETRECT) | SET(EM_SETRECT) | SET(EM_SETRECTNP),
/* 0xc0 - 0xcf */
SET(EM_REPLACESEL) | SET(EM_GETLINE) | SET(EM_SETTABSTOPS),
/* 0xd0 - 0xdf */
0,
/* 0xe0 - 0xef */
0,
/* 0xf0 - 0xff */
0,
/* 0x100 - 0x10f */
0,
/* 0x110 - 0x11f */
0,
/* 0x120 - 0x12f */
0,
/* 0x130 - 0x13f */
0,
/* 0x140 - 0x14f */
SET(CB_ADDSTRING) | SET(CB_DIR) | SET(CB_GETLBTEXT) | SET(CB_INSERTSTRING) |
SET(CB_FINDSTRING) | SET(CB_SELECTSTRING),
/* 0x150 - 0x15f */
SET(CB_GETDROPPEDCONTROLRECT) | SET(CB_FINDSTRINGEXACT),
/* 0x160 - 0x16f */
0,
/* 0x170 - 0x17f */
0,
/* 0x180 - 0x18f */
SET(LB_ADDSTRING) | SET(LB_INSERTSTRING) | SET(LB_GETTEXT) | SET(LB_SELECTSTRING) |
SET(LB_DIR) | SET(LB_FINDSTRING),
/* 0x190 - 0x19f */
SET(LB_GETSELITEMS) | SET(LB_SETTABSTOPS) | SET(LB_ADDFILE) | SET(LB_GETITEMRECT),
/* 0x1a0 - 0x1af */
SET(LB_FINDSTRINGEXACT),
/* 0x1b0 - 0x1bf */
0,
/* 0x1c0 - 0x1cf */
0,
/* 0x1d0 - 0x1df */
0,
/* 0x1e0 - 0x1ef */
0,
/* 0x1f0 - 0x1ff */
0,
/* 0x200 - 0x20f */
0,
/* 0x210 - 0x21f */
0,
/* 0x220 - 0x22f */
SET(WM_MDICREATE) | SET(WM_MDIGETACTIVE) | SET(WM_DROPOBJECT) |
SET(WM_QUERYDROPOBJECT) | SET(WM_DRAGSELECT) | SET(WM_DRAGMOVE)
};
#undef SET
/* check whether a given message type includes pointers */
inline static int is_pointer_message( UINT message )
{
if (message >= 8*sizeof(message_pointer_flags)) return FALSE;
return (message_pointer_flags[message / 16] & (1 << (message & 15))) != 0;
}
/* compute the total size of the packed data */
inline static size_t get_data_total_size( const struct packed_message *data )
{
int i;
size_t total = 0;
for (i = 0; i < data->count; i++) total += data->size[i];
return total;
}
/* copy all the data of a packed message into a single dest buffer */
inline static void copy_all_data( void *dest, const struct packed_message *data )
{
int i;
for (i = 0; i < data->count; i++)
{
memcpy( dest, data->data[i], data->size[i] );
dest = (char *)dest + data->size[i];
}
}
/* add a data field to a packed message */
inline static void push_data( struct packed_message *data, const void *ptr, size_t size )
{
data->data[data->count] = ptr;
data->size[data->count] = size;
data->count++;
}
/* add a string to a packed message */
inline static void push_string( struct packed_message *data, LPCWSTR str )
{
push_data( data, str, (strlenW(str) + 1) * sizeof(WCHAR) );
}
/* retrieve a pointer to data from a packed message and increment the buffer pointer */
inline static void *get_data( void **buffer, size_t size )
{
void *ret = *buffer;
*buffer = (char *)*buffer + size;
return ret;
}
/* make sure that the buffer contains a valid null-terminated Unicode string */
inline static BOOL check_string( LPCWSTR str, size_t size )
{
for (size /= sizeof(WCHAR); size; size--, str++)
if (!*str) return TRUE;
return FALSE;
}
/* make sure that there is space for 'size' bytes in buffer, growing it if needed */
inline static void *get_buffer_space( void **buffer, size_t size )
{
void *ret;
if (!(ret = HeapReAlloc( GetProcessHeap(), 0, *buffer, size )))
HeapFree( GetProcessHeap(), 0, *buffer );
*buffer = ret;
return ret;
}
/* retrieve a string pointer from packed data */
inline static LPWSTR get_string( void **buffer )
{
return get_data( buffer, (strlenW( (LPWSTR)*buffer ) + 1) * sizeof(WCHAR) );
}
/* check whether a combobox expects strings or ids in CB_ADDSTRING/CB_INSERTSTRING */
inline static BOOL combobox_has_strings( HWND hwnd )
{
DWORD style = GetWindowLongA( hwnd, GWL_STYLE );
return (!(style & (CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE)) || (style & CBS_HASSTRINGS));
}
/* check whether a listbox expects strings or ids in LB_ADDSTRING/LB_INSERTSTRING */
inline static BOOL listbox_has_strings( HWND hwnd )
{
DWORD style = GetWindowLongA( hwnd, GWL_STYLE );
return (!(style & (LBS_OWNERDRAWFIXED | LBS_OWNERDRAWVARIABLE)) || (style & LBS_HASSTRINGS));
}
/* check if hwnd is a broadcast magic handle */
inline static BOOL is_broadcast( HWND hwnd )
{
return (hwnd == HWND_BROADCAST || hwnd == HWND_TOPMOST);
}
/***********************************************************************
* broadcast_message_callback
*
* Helper callback for broadcasting messages.
*/
static BOOL CALLBACK broadcast_message_callback( HWND hwnd, LPARAM lparam )
{
struct send_message_info *info = (struct send_message_info *)lparam;
if (!(GetWindowLongW( hwnd, GWL_STYLE ) & (WS_POPUP|WS_CAPTION))) return TRUE;
switch(info->type)
{
case MSG_UNICODE:
SendMessageTimeoutW( hwnd, info->msg, info->wparam, info->lparam,
info->flags, info->timeout, NULL );
break;
case MSG_ASCII:
SendMessageTimeoutA( hwnd, info->msg, info->wparam, info->lparam,
info->flags, info->timeout, NULL );
break;
case MSG_NOTIFY:
SendNotifyMessageW( hwnd, info->msg, info->wparam, info->lparam );
break;
case MSG_CALLBACK:
SendMessageCallbackW( hwnd, info->msg, info->wparam, info->lparam,
info->callback, info->data );
break;
case MSG_POSTED:
PostMessageW( hwnd, info->msg, info->wparam, info->lparam );
break;
default:
ERR( "bad type %d\n", info->type );
break;
}
return TRUE;
}
/***********************************************************************
* map_wparam_AtoW
*
* Convert the wparam of an ASCII message to Unicode.
*/
static WPARAM map_wparam_AtoW( UINT message, WPARAM wparam )
{
if (message == WM_CHARTOITEM ||
message == EM_SETPASSWORDCHAR ||
message == WM_CHAR ||
message == WM_DEADCHAR ||
message == WM_SYSCHAR ||
message == WM_SYSDEADCHAR ||
message == WM_MENUCHAR)
{
char ch = LOWORD(wparam);
WCHAR wch;
MultiByteToWideChar(CP_ACP, 0, &ch, 1, &wch, 1);
wparam = MAKEWPARAM( wch, HIWORD(wparam) );
}
return wparam;
}
/***********************************************************************
* map_wparam_WtoA
*
* Convert the wparam of a Unicode message to ASCII.
*/
static WPARAM map_wparam_WtoA( UINT message, WPARAM wparam )
{
if (message == WM_CHARTOITEM ||
message == EM_SETPASSWORDCHAR ||
message == WM_CHAR ||
message == WM_DEADCHAR ||
message == WM_SYSCHAR ||
message == WM_SYSDEADCHAR ||
message == WM_MENUCHAR)
{
WCHAR wch = LOWORD(wparam);
char ch;
WideCharToMultiByte( CP_ACP, 0, &wch, 1, &ch, 1, NULL, NULL );
wparam = MAKEWPARAM( ch, HIWORD(wparam) );
}
return wparam;
}
/***********************************************************************
* pack_message
*
* Pack a message for sending to another process.
* Return the size of the data we expect in the message reply.
* Set data->count to -1 if there is an error.
*/
static size_t pack_message( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
struct packed_message *data )
{
data->count = 0;
switch(message)
{
case WM_NCCREATE:
case WM_CREATE:
{
CREATESTRUCTW *cs = (CREATESTRUCTW *)lparam;
push_data( data, cs, sizeof(*cs) );
if (HIWORD(cs->lpszName)) push_string( data, cs->lpszName );
if (HIWORD(cs->lpszClass)) push_string( data, cs->lpszClass );
return sizeof(*cs);
}
case WM_GETTEXT:
return wparam * sizeof(WCHAR);
case WM_SETTEXT:
case WM_WININICHANGE:
case CB_DIR:
case CB_FINDSTRING:
case CB_FINDSTRINGEXACT:
case CB_SELECTSTRING:
case LB_DIR:
case LB_ADDFILE:
case LB_FINDSTRING:
case LB_FINDSTRINGEXACT:
case LB_SELECTSTRING:
case EM_REPLACESEL:
push_string( data, (LPWSTR)lparam );
return 0;
case WM_GETMINMAXINFO:
push_data( data, (MINMAXINFO *)lparam, sizeof(MINMAXINFO) );
return sizeof(MINMAXINFO);
case WM_DRAWITEM:
push_data( data, (DRAWITEMSTRUCT *)lparam, sizeof(DRAWITEMSTRUCT) );
return 0;
case WM_MEASUREITEM:
push_data( data, (MEASUREITEMSTRUCT *)lparam, sizeof(MEASUREITEMSTRUCT) );
return sizeof(MEASUREITEMSTRUCT);
case WM_DELETEITEM:
push_data( data, (DELETEITEMSTRUCT *)lparam, sizeof(DELETEITEMSTRUCT) );
return 0;
case WM_COMPAREITEM:
push_data( data, (COMPAREITEMSTRUCT *)lparam, sizeof(COMPAREITEMSTRUCT) );
return 0;
case WM_WINDOWPOSCHANGING:
case WM_WINDOWPOSCHANGED:
push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) );
return sizeof(WINDOWPOS);
case WM_COPYDATA:
{
COPYDATASTRUCT *cp = (COPYDATASTRUCT *)lparam;
push_data( data, cp, sizeof(*cp) );
if (cp->lpData) push_data( data, cp->lpData, cp->cbData );
return 0;
}
case WM_NOTIFY:
/* WM_NOTIFY cannot be sent across processes (MSDN) */
data->count = -1;
return 0;
case WM_HELP:
push_data( data, (HELPINFO *)lparam, sizeof(HELPINFO) );
return 0;
case WM_STYLECHANGING:
case WM_STYLECHANGED:
push_data( data, (STYLESTRUCT *)lparam, sizeof(STYLESTRUCT) );
return 0;
case WM_NCCALCSIZE:
if (!wparam)
{
push_data( data, (RECT *)lparam, sizeof(RECT) );
return sizeof(RECT);
}
else
{
NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
push_data( data, nc, sizeof(*nc) );
push_data( data, nc->lppos, sizeof(*nc->lppos) );
return sizeof(*nc) + sizeof(*nc->lppos);
}
case WM_GETDLGCODE:
if (lparam) push_data( data, (MSG *)lparam, sizeof(MSG) );
return sizeof(MSG);
case EM_GETSEL:
{
size_t size = 0;
if (wparam) size += sizeof(DWORD);
if (lparam) size += sizeof(DWORD);
return size;
}
case EM_GETRECT:
case LB_GETITEMRECT:
case CB_GETDROPPEDCONTROLRECT:
return sizeof(RECT);
case EM_SETRECT:
case EM_SETRECTNP:
push_data( data, (RECT *)lparam, sizeof(RECT) );
return 0;
case EM_GETLINE:
{
WORD *pw = (WORD *)lparam;
push_data( data, pw, sizeof(*pw) );
return *pw * sizeof(WCHAR);
}
case EM_SETTABSTOPS:
case LB_SETTABSTOPS:
if (wparam) push_data( data, (UINT *)lparam, sizeof(UINT) * wparam );
return 0;
case CB_ADDSTRING:
case CB_INSERTSTRING:
if (combobox_has_strings( hwnd )) push_string( data, (LPWSTR)lparam );
return 0;
case CB_GETLBTEXT:
if (!combobox_has_strings( hwnd )) return sizeof(ULONG_PTR);
return (SendMessageW( hwnd, CB_GETLBTEXTLEN, wparam, 0 ) + 1) * sizeof(WCHAR);
case LB_ADDSTRING:
case LB_INSERTSTRING:
if (listbox_has_strings( hwnd )) push_string( data, (LPWSTR)lparam );
return 0;
case LB_GETTEXT:
if (!listbox_has_strings( hwnd )) return sizeof(ULONG_PTR);
return (SendMessageW( hwnd, LB_GETTEXTLEN, wparam, 0 ) + 1) * sizeof(WCHAR);
case LB_GETSELITEMS:
return wparam * sizeof(UINT);
case WM_MDICREATE:
{
MDICREATESTRUCTW *cs = (MDICREATESTRUCTW *)lparam;
push_data( data, cs, sizeof(*cs) );
if (HIWORD(cs->szTitle)) push_string( data, cs->szTitle );
if (HIWORD(cs->szClass)) push_string( data, cs->szClass );
return sizeof(*cs);
}
case WM_MDIGETACTIVE:
if (lparam) return sizeof(BOOL);
return 0;
case WM_DROPOBJECT:
case WM_QUERYDROPOBJECT:
case WM_DRAGSELECT:
case WM_DRAGMOVE:
FIXME("msg %x not supported yet\n",message);
return 0;
}
return 0;
}
/***********************************************************************
* unpack_message
*
* Unpack a message received from another process.
*/
static BOOL unpack_message( HWND hwnd, UINT message, WPARAM *wparam, LPARAM *lparam,
void **buffer, size_t size )
{
size_t minsize = 0;
switch(message)
{
case WM_NCCREATE:
case WM_CREATE:
{
CREATESTRUCTW *cs = *buffer;
WCHAR *str = (WCHAR *)(cs + 1);
if (size < sizeof(*cs)) return FALSE;
size -= sizeof(*cs);
if (HIWORD(cs->lpszName))
{
if (!check_string( str, size )) return FALSE;
cs->lpszName = str;
size -= (strlenW(str) + 1) * sizeof(WCHAR);
str += strlenW(str) + 1;
}
if (HIWORD(cs->lpszClass))
{
if (!check_string( str, size )) return FALSE;
cs->lpszClass = str;
}
break;
}
case WM_GETTEXT:
if (!get_buffer_space( buffer, (*wparam * sizeof(WCHAR)) )) return FALSE;
break;
case WM_SETTEXT:
case WM_WININICHANGE:
case CB_DIR:
case CB_FINDSTRING:
case CB_FINDSTRINGEXACT:
case CB_SELECTSTRING:
case LB_DIR:
case LB_ADDFILE:
case LB_FINDSTRING:
case LB_FINDSTRINGEXACT:
case LB_SELECTSTRING:
case EM_REPLACESEL:
if (!check_string( *buffer, size )) return FALSE;
break;
case WM_GETMINMAXINFO:
minsize = sizeof(MINMAXINFO);
break;
case WM_DRAWITEM:
minsize = sizeof(DRAWITEMSTRUCT);
break;
case WM_MEASUREITEM:
minsize = sizeof(MEASUREITEMSTRUCT);
break;
case WM_DELETEITEM:
minsize = sizeof(DELETEITEMSTRUCT);
break;
case WM_COMPAREITEM:
minsize = sizeof(COMPAREITEMSTRUCT);
break;
case WM_WINDOWPOSCHANGING:
case WM_WINDOWPOSCHANGED:
minsize = sizeof(WINDOWPOS);
break;
case WM_COPYDATA:
{
COPYDATASTRUCT *cp = *buffer;
if (size < sizeof(*cp)) return FALSE;
if (cp->lpData)
{
minsize = sizeof(*cp) + cp->cbData;
cp->lpData = cp + 1;
}
break;
}
case WM_NOTIFY:
/* WM_NOTIFY cannot be sent across processes (MSDN) */
return FALSE;
case WM_HELP:
minsize = sizeof(HELPINFO);
break;
case WM_STYLECHANGING:
case WM_STYLECHANGED:
minsize = sizeof(STYLESTRUCT);
break;
case WM_NCCALCSIZE:
if (!*wparam) minsize = sizeof(RECT);
else
{
NCCALCSIZE_PARAMS *nc = *buffer;
if (size < sizeof(*nc) + sizeof(*nc->lppos)) return FALSE;
nc->lppos = (WINDOWPOS *)(nc + 1);
}
break;
case WM_GETDLGCODE:
if (!*lparam) return TRUE;
minsize = sizeof(MSG);
break;
case EM_GETSEL:
if (*wparam || *lparam)
{
if (!get_buffer_space( buffer, 2*sizeof(DWORD) )) return FALSE;
if (*wparam) *wparam = (WPARAM)*buffer;
if (*lparam) *lparam = (LPARAM)((DWORD *)*buffer + 1);
}
return TRUE;
case EM_GETRECT:
case LB_GETITEMRECT:
case CB_GETDROPPEDCONTROLRECT:
if (!get_buffer_space( buffer, sizeof(RECT) )) return FALSE;
break;
case EM_SETRECT:
case EM_SETRECTNP:
minsize = sizeof(RECT);
break;
case EM_GETLINE:
{
WORD len;
if (size < sizeof(WORD)) return FALSE;
len = *(WORD *)*buffer;
if (!get_buffer_space( buffer, (len + 1) * sizeof(WCHAR) )) return FALSE;
*lparam = (LPARAM)*buffer + sizeof(WORD); /* don't erase WORD at start of buffer */
return TRUE;
}
case EM_SETTABSTOPS:
case LB_SETTABSTOPS:
if (!*wparam) return TRUE;
minsize = *wparam * sizeof(UINT);
break;
case CB_ADDSTRING:
case CB_INSERTSTRING:
case LB_ADDSTRING:
case LB_INSERTSTRING:
if (!*buffer) return TRUE;
if (!check_string( *buffer, size )) return FALSE;
break;
case CB_GETLBTEXT:
{
size = sizeof(ULONG_PTR);
if (combobox_has_strings( hwnd ))
size = (SendMessageW( hwnd, CB_GETLBTEXTLEN, *wparam, 0 ) + 1) * sizeof(WCHAR);
if (!get_buffer_space( buffer, size )) return FALSE;
break;
}
case LB_GETTEXT:
{
size = sizeof(ULONG_PTR);
if (listbox_has_strings( hwnd ))
size = (SendMessageW( hwnd, LB_GETTEXTLEN, *wparam, 0 ) + 1) * sizeof(WCHAR);
if (!get_buffer_space( buffer, size )) return FALSE;
break;
}
case LB_GETSELITEMS:
if (!get_buffer_space( buffer, *wparam * sizeof(UINT) )) return FALSE;
break;
case WM_MDICREATE:
{
MDICREATESTRUCTW *cs = *buffer;
WCHAR *str = (WCHAR *)(cs + 1);
if (size < sizeof(*cs)) return FALSE;
size -= sizeof(*cs);
if (HIWORD(cs->szTitle))
{
if (!check_string( str, size )) return FALSE;
cs->szTitle = str;
size -= (strlenW(str) + 1) * sizeof(WCHAR);
str += strlenW(str) + 1;
}
if (HIWORD(cs->szClass))
{
if (!check_string( str, size )) return FALSE;
cs->szClass = str;
}
break;
}
case WM_MDIGETACTIVE:
if (!*lparam) return TRUE;
if (!get_buffer_space( buffer, sizeof(BOOL) )) return FALSE;
break;
case WM_DROPOBJECT:
case WM_QUERYDROPOBJECT:
case WM_DRAGSELECT:
case WM_DRAGMOVE:
FIXME("msg %x not supported yet\n",message);
return FALSE;
default:
return TRUE; /* message doesn't need any unpacking */
}
/* default exit for most messages: check minsize and store buffer in lparam */
if (size < minsize) return FALSE;
*lparam = (LPARAM)*buffer;
return TRUE;
}
/***********************************************************************
* pack_reply
*
* Pack a reply to a message for sending to another process.
*/
static void pack_reply( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
LRESULT res, struct packed_message *data )
{
data->count = 0;
switch(message)
{
case WM_NCCREATE:
case WM_CREATE:
push_data( data, (CREATESTRUCTW *)lparam, sizeof(CREATESTRUCTW) );
break;
case WM_GETTEXT:
case CB_GETLBTEXT:
case LB_GETTEXT:
push_data( data, (WCHAR *)lparam, (res + 1) * sizeof(WCHAR) );
break;
case WM_GETMINMAXINFO:
push_data( data, (MINMAXINFO *)lparam, sizeof(MINMAXINFO) );
break;
case WM_MEASUREITEM:
push_data( data, (MEASUREITEMSTRUCT *)lparam, sizeof(MEASUREITEMSTRUCT) );
break;
case WM_WINDOWPOSCHANGING:
case WM_WINDOWPOSCHANGED:
push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) );
break;
case WM_GETDLGCODE:
if (lparam) push_data( data, (MSG *)lparam, sizeof(MSG) );
break;
case EM_GETRECT:
case LB_GETITEMRECT:
case CB_GETDROPPEDCONTROLRECT:
push_data( data, (RECT *)lparam, sizeof(RECT) );
break;
case EM_GETLINE:
{
WORD *ptr = (WORD *)lparam;
push_data( data, ptr, ptr[-1] * sizeof(WCHAR) );
break;
}
case LB_GETSELITEMS:
push_data( data, (UINT *)lparam, wparam * sizeof(UINT) );
break;
case WM_MDIGETACTIVE:
if (lparam) push_data( data, (BOOL *)lparam, sizeof(BOOL) );
break;
case WM_NCCALCSIZE:
if (!wparam)
push_data( data, (RECT *)lparam, sizeof(RECT) );
else
{
NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
push_data( data, nc, sizeof(*nc) );
push_data( data, nc->lppos, sizeof(*nc->lppos) );
}
break;
case EM_GETSEL:
if (wparam) push_data( data, (DWORD *)wparam, sizeof(DWORD) );
if (lparam) push_data( data, (DWORD *)lparam, sizeof(DWORD) );
break;
case WM_MDICREATE:
push_data( data, (MDICREATESTRUCTW *)lparam, sizeof(MDICREATESTRUCTW) );
break;
case WM_DROPOBJECT:
case WM_QUERYDROPOBJECT:
case WM_DRAGSELECT:
case WM_DRAGMOVE:
FIXME("not implemented yet\n");
break;
}
}
/***********************************************************************
* unpack_reply
*
* Unpack a message reply received from another process.
*/
static void unpack_reply( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
void *buffer, size_t size )
{
switch(message)
{
case WM_NCCREATE:
case WM_CREATE:
{
CREATESTRUCTW *cs = (CREATESTRUCTW *)lparam;
LPCWSTR name = cs->lpszName, class = cs->lpszClass;
memcpy( cs, buffer, min( sizeof(*cs), size ));
cs->lpszName = name; /* restore the original pointers */
cs->lpszClass = class;
break;
}
case WM_GETTEXT:
memcpy( (WCHAR *)lparam, buffer, min( wparam*sizeof(WCHAR), size ));
break;
case WM_GETMINMAXINFO:
memcpy( (MINMAXINFO *)lparam, buffer, min( sizeof(MINMAXINFO), size ));
break;
case WM_MEASUREITEM:
memcpy( (MEASUREITEMSTRUCT *)lparam, buffer, min( sizeof(MEASUREITEMSTRUCT), size ));
break;
case WM_WINDOWPOSCHANGING:
case WM_WINDOWPOSCHANGED:
memcpy( (WINDOWPOS *)lparam, buffer, min( sizeof(WINDOWPOS), size ));
break;
case WM_GETDLGCODE:
if (lparam) memcpy( (MSG *)lparam, buffer, min( sizeof(MSG), size ));
break;
case EM_GETRECT:
case CB_GETDROPPEDCONTROLRECT:
case LB_GETITEMRECT:
memcpy( (RECT *)lparam, buffer, min( sizeof(RECT), size ));
break;
case EM_GETLINE:
size = min( size, *(WORD *)lparam );
memcpy( (WCHAR *)lparam, buffer, size );
break;
case LB_GETSELITEMS:
memcpy( (UINT *)lparam, buffer, min( wparam*sizeof(UINT), size ));
break;
case LB_GETTEXT:
case CB_GETLBTEXT:
memcpy( (WCHAR *)lparam, buffer, size );
break;
case WM_MDIGETACTIVE:
if (lparam) memcpy( (BOOL *)lparam, buffer, min( sizeof(BOOL), size ));
break;
case WM_NCCALCSIZE:
if (!wparam)
memcpy( (RECT *)lparam, buffer, min( sizeof(RECT), size ));
else
{
NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
WINDOWPOS *wp = nc->lppos;
memcpy( nc, buffer, min( sizeof(*nc), size ));
if (size > sizeof(*nc))
{
size -= sizeof(*nc);
memcpy( wp, (NCCALCSIZE_PARAMS*)buffer + 1, min( sizeof(*wp), size ));
}
nc->lppos = wp; /* restore the original pointer */
}
break;
case EM_GETSEL:
if (wparam)
{
memcpy( (DWORD *)wparam, buffer, min( sizeof(DWORD), size ));
if (size <= sizeof(DWORD)) break;
size -= sizeof(DWORD);
buffer = (DWORD *)buffer + 1;
}
if (lparam) memcpy( (DWORD *)lparam, buffer, min( sizeof(DWORD), size ));
break;
case WM_MDICREATE:
{
MDICREATESTRUCTW *cs = (MDICREATESTRUCTW *)lparam;
LPCWSTR title = cs->szTitle, class = cs->szClass;
memcpy( cs, buffer, min( sizeof(*cs), size ));
cs->szTitle = title; /* restore the original pointers */
cs->szClass = class;
break;
}
case WM_DROPOBJECT:
case WM_QUERYDROPOBJECT:
case WM_DRAGSELECT:
case WM_DRAGMOVE:
FIXME("not implemented yet\n");
break;
default:
ERR( "should not happen: unexpected message %x\n", message );
break;
}
}
/***********************************************************************
* reply_message
*
* Send a reply to a sent message.
*/
static void reply_message( struct received_message_info *info, LRESULT result, BOOL remove )
{
struct packed_message data;
int replied = info->flags & ISMEX_REPLIED;
if (info->flags & ISMEX_NOTIFY) return; /* notify messages don't get replies */
if (!remove && replied) return; /* replied already */
data.count = 0;
info->flags |= ISMEX_REPLIED;
if (info->type == MSG_OTHER_PROCESS && !replied)
{
pack_reply( info->msg.hwnd, info->msg.message, info->msg.wParam,
info->msg.lParam, result, &data );
if (data.count)
{
size_t total = get_data_total_size( &data );
if (total > REQUEST_MAX_VAR_SIZE)
{
FIXME( "inter-process msg data size %d not supported yet, expect trouble\n",
total );
total = REQUEST_MAX_VAR_SIZE;
}
SERVER_START_VAR_REQ( reply_message, total )
{
req->result = result;
req->remove = remove;
copy_all_data( server_data_ptr(req), &data );
SERVER_CALL();
}
SERVER_END_VAR_REQ;
return;
}
}
SERVER_START_REQ( reply_message )
{
req->result = result;
req->remove = remove;
SERVER_CALL();
}
SERVER_END_REQ;
}
/***********************************************************************
* call_window_proc
*
* Call a window procedure and the corresponding hooks.
*/
static LRESULT call_window_proc( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam, BOOL unicode )
{
LRESULT result;
WND *wndPtr;
WNDPROC winproc;
/* FIXME: should check for exiting queue */
/* first the WH_CALLWNDPROC hook */
if (HOOK_IsHooked( WH_CALLWNDPROC ))
{
CWPSTRUCT cwp;
cwp.lParam = lparam;
cwp.wParam = wparam;
cwp.message = msg;
cwp.hwnd = hwnd;
if (unicode) HOOK_CallHooksW( WH_CALLWNDPROC, HC_ACTION, 1, (LPARAM)&cwp );
else HOOK_CallHooksA( WH_CALLWNDPROC, HC_ACTION, 1, (LPARAM)&cwp );
lparam = cwp.lParam;
wparam = cwp.wParam;
msg = cwp.message;
hwnd = cwp.hwnd;
}
/* now call the window procedure */
if (!(wndPtr = WIN_FindWndPtr( hwnd )))
{
WARN( "bad window %x\n", hwnd );
return 0;
}
winproc = wndPtr->winproc;
WIN_ReleaseWndPtr(wndPtr);
if (unicode)
result = CallWindowProcW( winproc, hwnd, msg, wparam, lparam );
else
result = CallWindowProcA( winproc, hwnd, msg, wparam, lparam );
/* and finally the WH_CALLWNDPROCRET hook */
if (HOOK_IsHooked( WH_CALLWNDPROCRET ))
{
CWPRETSTRUCT cwp;
cwp.lResult = result;
cwp.lParam = lparam;
cwp.wParam = wparam;
cwp.message = msg;
cwp.hwnd = hwnd;
if (unicode) HOOK_CallHooksW( WH_CALLWNDPROCRET, HC_ACTION, 1, (LPARAM)&cwp );
else HOOK_CallHooksA( WH_CALLWNDPROCRET, HC_ACTION, 1, (LPARAM)&cwp );
}
return result;
}
/***********************************************************************
* MSG_peek_message
*
* Peek for a message matching the given parameters. Return FALSE if none available.
* All pending sent messages are processed before returning.
*/
BOOL MSG_peek_message( MSG *msg, HWND hwnd, UINT first, UINT last, int flags )
{
BOOL ret;
LRESULT result;
ULONG_PTR extra_info = 0;
MESSAGEQUEUE *queue = QUEUE_Current();
struct received_message_info info, *old_info;
if (!first && !last) last = ~0;
for (;;)
{
void *buffer = NULL;
size_t size = 0;
SERVER_START_VAR_REQ( get_message, REQUEST_MAX_VAR_SIZE )
{
req->flags = flags;
req->get_win = hwnd;
req->get_first = first;
req->get_last = last;
if ((ret = !SERVER_CALL()))
{
info.type = req->type;
info.msg.hwnd = req->win;
info.msg.message = req->msg;
info.msg.wParam = req->wparam;
info.msg.lParam = req->lparam;
info.msg.time = req->time;
info.msg.pt.x = req->x;
info.msg.pt.y = req->y;
extra_info = req->info;
if ((size = server_data_size(req)))
{
if (!(buffer = HeapAlloc( GetProcessHeap(), 0, size )))
{
ERR("out of memory for message data\n");
ret = FALSE;
}
else memcpy( buffer, server_data_ptr(req), size );
}
}
}
SERVER_END_VAR_REQ;
if (!ret) return FALSE; /* no message available */
TRACE( "got type %d msg %x hwnd %x wp %x lp %lx\n",
info.type, info.msg.message, info.msg.hwnd, info.msg.wParam, info.msg.lParam );
switch(info.type)
{
case MSG_ASCII:
case MSG_UNICODE:
info.flags = ISMEX_SEND;
break;
case MSG_NOTIFY:
info.flags = ISMEX_NOTIFY;
break;
case MSG_CALLBACK:
info.flags = ISMEX_CALLBACK;
break;
case MSG_OTHER_PROCESS:
info.flags = ISMEX_SEND;
if (!unpack_message( info.msg.hwnd, info.msg.message, &info.msg.wParam,
&info.msg.lParam, &buffer, size ))
{
ERR( "invalid packed message %x (%s) hwnd %x wp %x lp %lx size %d\n",
info.msg.message, SPY_GetMsgName(info.msg.message), info.msg.hwnd,
info.msg.wParam, info.msg.lParam, size );
/* ignore it */
reply_message( &info, 0, TRUE );
continue;
}
break;
case MSG_POSTED:
goto got_one;
case MSG_HARDWARE_RAW:
if (!MSG_process_raw_hardware_message( &info.msg, extra_info,
hwnd, first, last, flags & GET_MSG_REMOVE ))
continue;
/* fall through */
case MSG_HARDWARE_COOKED:
if (!MSG_process_cooked_hardware_message( &info.msg, flags & GET_MSG_REMOVE ))
{
flags |= GET_MSG_REMOVE_LAST;
continue;
}
queue->GetMessageExtraInfoVal = extra_info;
goto got_one;
}
/* if we get here, we have a sent message; call the window procedure */
old_info = queue->receive_info;
queue->receive_info = &info;
result = call_window_proc( info.msg.hwnd, info.msg.message, info.msg.wParam,
info.msg.lParam, (info.type != MSG_ASCII) );
reply_message( &info, result, TRUE );
queue->receive_info = old_info;
if (buffer) HeapFree( GetProcessHeap(), 0, buffer );
}
got_one:
*msg = info.msg;
return TRUE;
}
/***********************************************************************
* wait_message_reply
*
* Wait until a sent message gets replied to.
*/
static void wait_message_reply( UINT flags )
{
MESSAGEQUEUE *queue;
if (!(queue = QUEUE_Current())) return;
for (;;)
{
unsigned int wake_bits = 0, changed_bits = 0;
DWORD dwlc, res;
SERVER_START_REQ( set_queue_mask )
{
req->wake_mask = (flags & SMTO_BLOCK) ? 0 : QS_SENDMESSAGE;
req->changed_mask = QS_SMRESULT | req->wake_mask;
req->skip_wait = 1;
if (!SERVER_CALL())
{
wake_bits = req->wake_bits;
changed_bits = req->changed_bits;
}
}
SERVER_END_REQ;
if (changed_bits & QS_SMRESULT) return; /* got a result */
if (wake_bits & QS_SENDMESSAGE)
{
/* Process the sent message immediately */
MSG msg;
MSG_peek_message( &msg, 0, 0, 0, GET_MSG_REMOVE | GET_MSG_SENT_ONLY );
continue;
}
/* now wait for it */
ReleaseThunkLock( &dwlc );
if (USER_Driver.pMsgWaitForMultipleObjectsEx)
res = USER_Driver.pMsgWaitForMultipleObjectsEx( 1, &queue->server_queue,
INFINITE, 0, 0 );
else
res = WaitForSingleObject( queue->server_queue, INFINITE );
if (dwlc) RestoreThunkLock( dwlc );
}
}
/***********************************************************************
* put_message_in_queue
*
* Put a sent message into the destination queue.
* For inter-process message, reply_size is set to expected size of reply data.
*/
static BOOL put_message_in_queue( DWORD dest_tid, const struct send_message_info *info,
size_t *reply_size )
{
unsigned int res;
int timeout = -1;
/* FIXME: should check for exiting queue */
if (info->type != MSG_NOTIFY &&
info->type != MSG_CALLBACK &&
info->type != MSG_POSTED &&
info->timeout != INFINITE)
timeout = info->timeout;
if (info->type == MSG_OTHER_PROCESS)
{
struct packed_message data;
*reply_size = pack_message( info->hwnd, info->msg, info->wparam, info->lparam, &data );
if (data.count == -1)
{
WARN( "cannot pack message %x\n", info->msg );
return FALSE;
}
if (data.size[0]) /* need to send extra data along with the message */
{
size_t total = get_data_total_size( &data );
if (total > REQUEST_MAX_VAR_SIZE)
{
FIXME( "inter-process msg data size %d not supported yet, expect trouble\n",
total );
total = REQUEST_MAX_VAR_SIZE;
}
SERVER_START_VAR_REQ( send_message, total )
{
req->id = (void *)dest_tid;
req->type = MSG_OTHER_PROCESS;
req->win = info->hwnd;
req->msg = info->msg;
req->wparam = info->wparam;
req->lparam = info->lparam;
req->time = GetCurrentTime();
req->timeout = timeout;
copy_all_data( server_data_ptr(req), &data );
res = SERVER_CALL();
}
SERVER_END_VAR_REQ;
goto done;
}
}
/* no extra data, or not inter-process message */
SERVER_START_REQ( send_message )
{
req->id = (void *)dest_tid;
req->type = info->type;
req->win = info->hwnd;
req->msg = info->msg;
req->wparam = info->wparam;
req->lparam = info->lparam;
req->time = GetCurrentTime();
req->timeout = timeout;
res = SERVER_CALL();
}
SERVER_END_REQ;
done:
if (res)
{
if (res == STATUS_INVALID_PARAMETER)
/* FIXME: find a STATUS_ value for this one */
SetLastError( ERROR_INVALID_THREAD_ID );
else
SetLastError( RtlNtStatusToDosError(res) );
}
return !res;
}
/***********************************************************************
* retrieve_reply
*
* Retrieve a message reply from the server.
*/
static LRESULT retrieve_reply( const struct send_message_info *info,
size_t reply_size, LRESULT *result )
{
NTSTATUS status;
if (reply_size)
{
if (reply_size > REQUEST_MAX_VAR_SIZE)
{
WARN( "reply_size %d too large, reply may be truncated\n", reply_size );
reply_size = REQUEST_MAX_VAR_SIZE;
}
SERVER_START_VAR_REQ( get_message_reply, reply_size )
{
req->cancel = 1;
if (!(status = SERVER_CALL()))
{
*result = req->result;
unpack_reply( info->hwnd, info->msg, info->wparam, info->lparam,
server_data_ptr(req), server_data_size(req) );
}
}
SERVER_END_VAR_REQ;
}
else
{
SERVER_START_REQ( get_message_reply )
{
req->cancel = 1;
if (!(status = SERVER_CALL())) *result = req->result;
}
SERVER_END_REQ;
}
TRACE( "hwnd %x msg %x (%s) wp %x lp %lx got reply %lx (err=%ld)\n",
info->hwnd, info->msg, SPY_GetMsgName(info->msg), info->wparam,
info->lparam, *result, status );
if (!status) return 1;
if (status == STATUS_TIMEOUT) SetLastError(0); /* timeout */
else SetLastError( RtlNtStatusToDosError(status) );
return 0;
}
/***********************************************************************
* send_inter_thread_message
*/
static LRESULT send_inter_thread_message( DWORD dest_tid, const struct send_message_info *info,
LRESULT *res_ptr )
{
LRESULT ret;
int locks;
size_t reply_size = 0;
TRACE( "hwnd %x msg %x (%s) wp %x lp %lx\n",
info->hwnd, info->msg, SPY_GetMsgName(info->msg), info->wparam, info->lparam );
if (!put_message_in_queue( dest_tid, info, &reply_size )) return 0;
/* there's no reply to wait for on notify/callback messages */
if (info->type == MSG_NOTIFY || info->type == MSG_CALLBACK) return 1;
locks = WIN_SuspendWndsLock();
wait_message_reply( info->flags );
ret = retrieve_reply( info, reply_size, res_ptr );
WIN_RestoreWndsLock( locks );
return ret;
}
/***********************************************************************
* SendMessageTimeoutW (USER32.@)
*/
LRESULT WINAPI SendMessageTimeoutW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
UINT flags, UINT timeout, LPDWORD res_ptr )
{
struct send_message_info info;
DWORD dest_tid, dest_pid;
LRESULT ret, result;
info.type = MSG_UNICODE;
info.hwnd = hwnd;
info.msg = msg;
info.wparam = wparam;
info.lparam = lparam;
info.flags = flags;
info.timeout = timeout;
if (is_broadcast(hwnd))
{
EnumWindows( broadcast_message_callback, (LPARAM)&info );
if (res_ptr) *res_ptr = 1;
return 1;
}
SPY_EnterMessage( SPY_SENDMESSAGE, hwnd, msg, wparam, lparam );
dest_tid = GetWindowThreadProcessId( hwnd, &dest_pid );
if (dest_tid == GetCurrentThreadId())
{
result = call_window_proc( hwnd, msg, wparam, lparam, TRUE );
ret = 1;
}
else
{
if (dest_pid != GetCurrentProcessId()) info.type = MSG_OTHER_PROCESS;
ret = send_inter_thread_message( dest_tid, &info, &result );
}
SPY_ExitMessage( SPY_RESULT_OK, hwnd, msg, result, wparam, lparam );
if (ret && res_ptr) *res_ptr = result;
return ret;
}
/***********************************************************************
* SendMessageTimeoutA (USER32.@)
*/
LRESULT WINAPI SendMessageTimeoutA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
UINT flags, UINT timeout, LPDWORD res_ptr )
{
struct send_message_info info;
DWORD dest_tid, dest_pid;
LRESULT ret, result;
info.type = MSG_ASCII;
info.hwnd = hwnd;
info.msg = msg;
info.wparam = wparam;
info.lparam = lparam;
info.flags = flags;
info.timeout = timeout;
if (is_broadcast(hwnd))
{
EnumWindows( broadcast_message_callback, (LPARAM)&info );
if (res_ptr) *res_ptr = 1;
return 1;
}
SPY_EnterMessage( SPY_SENDMESSAGE, hwnd, msg, wparam, lparam );
dest_tid = GetWindowThreadProcessId( hwnd, &dest_pid );
if (dest_tid == GetCurrentThreadId())
{
result = call_window_proc( hwnd, msg, wparam, lparam, FALSE );
ret = 1;
}
else if (dest_pid == GetCurrentProcessId())
{
ret = send_inter_thread_message( dest_tid, &info, &result );
}
else
{
/* inter-process message: need to map to Unicode */
info.type = MSG_OTHER_PROCESS;
if (WINPROC_MapMsg32ATo32W( info.hwnd, info.msg, &info.wparam, &info.lparam ) == -1)
return 0;
ret = send_inter_thread_message( dest_tid, &info, &result );
WINPROC_UnmapMsg32ATo32W( info.hwnd, info.msg, info.wparam, info.lparam );
}
SPY_ExitMessage( SPY_RESULT_OK, hwnd, msg, result, wparam, lparam );
if (ret && res_ptr) *res_ptr = result;
return ret;
}
/***********************************************************************
* SendMessageW (USER32.@)
*/
LRESULT WINAPI SendMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
LRESULT res = 0;
SendMessageTimeoutW( hwnd, msg, wparam, lparam, SMTO_NORMAL, INFINITE, &res );
return res;
}
/***********************************************************************
* SendMessageA (USER32.@)
*/
LRESULT WINAPI SendMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
LRESULT res = 0;
SendMessageTimeoutA( hwnd, msg, wparam, lparam, SMTO_NORMAL, INFINITE, &res );
return res;
}
/***********************************************************************
* SendNotifyMessageA (USER32.@)
*/
BOOL WINAPI SendNotifyMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
return SendNotifyMessageW( hwnd, msg, map_wparam_AtoW( msg, wparam ), lparam );
}
/***********************************************************************
* SendNotifyMessageW (USER32.@)
*/
BOOL WINAPI SendNotifyMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
struct send_message_info info;
DWORD dest_tid;
LRESULT result;
if (is_pointer_message(msg))
{
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
info.type = MSG_NOTIFY;
info.hwnd = hwnd;
info.msg = msg;
info.wparam = wparam;
info.lparam = lparam;
if (is_broadcast(hwnd))
{
EnumWindows( broadcast_message_callback, (LPARAM)&info );
return TRUE;
}
dest_tid = GetWindowThreadProcessId( hwnd, NULL );
if (dest_tid == GetCurrentThreadId())
{
call_window_proc( hwnd, msg, wparam, lparam, TRUE );
return TRUE;
}
return send_inter_thread_message( dest_tid, &info, &result );
}
/***********************************************************************
* SendMessageCallbackA (USER32.@)
*/
BOOL WINAPI SendMessageCallbackA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
SENDASYNCPROC callback, ULONG_PTR data )
{
return SendMessageCallbackW( hwnd, msg, map_wparam_AtoW( msg, wparam ),
lparam, callback, data );
}
/***********************************************************************
* SendMessageCallbackW (USER32.@)
*/
BOOL WINAPI SendMessageCallbackW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
SENDASYNCPROC callback, ULONG_PTR data )
{
struct send_message_info info;
LRESULT result;
DWORD dest_tid;
if (is_pointer_message(msg))
{
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
info.type = MSG_CALLBACK;
info.hwnd = hwnd;
info.msg = msg;
info.wparam = wparam;
info.lparam = lparam;
info.callback = callback;
info.data = data;
if (is_broadcast(hwnd))
{
EnumWindows( broadcast_message_callback, (LPARAM)&info );
return TRUE;
}
dest_tid = GetWindowThreadProcessId( hwnd, NULL );
if (dest_tid == GetCurrentThreadId())
{
result = call_window_proc( hwnd, msg, wparam, lparam, TRUE );
callback( hwnd, msg, data, result );
return TRUE;
}
FIXME( "callback will not be called\n" );
return send_inter_thread_message( dest_tid, &info, &result );
}
/***********************************************************************
* ReplyMessage (USER32.@)
*/
BOOL WINAPI ReplyMessage( LRESULT result )
{
MESSAGEQUEUE *queue = QUEUE_Current();
struct received_message_info *info = queue->receive_info;
if (!info) return FALSE;
reply_message( info, result, FALSE );
return TRUE;
}
/***********************************************************************
* InSendMessage (USER32.@)
*/
BOOL WINAPI InSendMessage(void)
{
return (InSendMessageEx(NULL) & (ISMEX_SEND|ISMEX_REPLIED)) == ISMEX_SEND;
}
/***********************************************************************
* InSendMessageEx (USER32.@)
*/
DWORD WINAPI InSendMessageEx( LPVOID reserved )
{
MESSAGEQUEUE *queue = QUEUE_Current();
struct received_message_info *info = queue->receive_info;
if (info) return info->flags;
return ISMEX_NOSEND;
}
/***********************************************************************
* PostMessageA (USER32.@)
*/
BOOL WINAPI PostMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
return PostMessageW( hwnd, msg, map_wparam_AtoW( msg, wparam ), lparam );
}
/***********************************************************************
* PostMessageW (USER32.@)
*/
BOOL WINAPI PostMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
struct send_message_info info;
if (is_pointer_message( msg ))
{
SetLastError( ERROR_INVALID_PARAMETER );
return FALSE;
}
info.type = MSG_POSTED;
info.hwnd = hwnd;
info.msg = msg;
info.wparam = wparam;
info.lparam = lparam;
if (is_broadcast(hwnd))
{
EnumWindows( broadcast_message_callback, (LPARAM)&info );
return TRUE;
}
return put_message_in_queue( GetWindowThreadProcessId( hwnd, NULL ), &info, NULL );
}
/**********************************************************************
* PostThreadMessageA (USER32.@)
*/
BOOL WINAPI PostThreadMessageA( DWORD thread, UINT msg, WPARAM wparam, LPARAM lparam )
{
return PostThreadMessageW( thread, msg, map_wparam_AtoW( msg, wparam ), lparam );
}
/**********************************************************************
* PostThreadMessageW (USER32.@)
*/
BOOL WINAPI PostThreadMessageW( DWORD thread, UINT msg, WPARAM wparam, LPARAM lparam )
{
struct send_message_info info;
if (is_pointer_message( msg ))
{
SetLastError( ERROR_INVALID_PARAMETER );
return FALSE;
}
info.type = MSG_POSTED;
info.hwnd = 0;
info.msg = msg;
info.wparam = wparam;
info.lparam = lparam;
return put_message_in_queue( thread, &info, NULL );
}
/***********************************************************************
* PostQuitMessage (USER32.@)
*/
void WINAPI PostQuitMessage( INT exitCode )
{
PostThreadMessageW( GetCurrentThreadId(), WM_QUIT, exitCode, 0 );
}
/***********************************************************************
* PeekMessageW (USER32.@)
*/
BOOL WINAPI PeekMessageW( MSG *msg_out, HWND hwnd, UINT first, UINT last, UINT flags )
{
MESSAGEQUEUE *queue;
MSG msg;
int locks;
/* check for graphics events */
if (USER_Driver.pMsgWaitForMultipleObjectsEx)
USER_Driver.pMsgWaitForMultipleObjectsEx( 0, NULL, 0, 0, 0 );
locks = WIN_SuspendWndsLock();
if (!MSG_peek_message( &msg, hwnd, first, last,
(flags & PM_REMOVE) ? GET_MSG_REMOVE : 0 ))
{
/* FIXME: should be done before checking for hw events */
MSG_JournalPlayBackMsg();
if (!(flags & PM_NOYIELD))
{
DWORD count;
ReleaseThunkLock(&count);
if (count) RestoreThunkLock(count);
}
WIN_RestoreWndsLock( locks );
return FALSE;
}
WIN_RestoreWndsLock( locks );
/* need to fill the window handle for WM_PAINT message */
if (msg.message == WM_PAINT)
{
if (!(msg.hwnd = WIN_FindWinToRepaint( hwnd ))) return FALSE;
if (IsIconic( msg.hwnd ) && GetClassLongA( msg.hwnd, GCL_HICON ))
{
msg.message = WM_PAINTICON;
msg.wParam = 1;
}
/* check hwnd filter */
if (hwnd && msg.hwnd != hwnd && !IsChild( hwnd, msg.hwnd )) return FALSE;
/* clear internal paint flag */
RedrawWindow( msg.hwnd, NULL, 0, RDW_NOINTERNALPAINT | RDW_NOCHILDREN );
}
if ((queue = QUEUE_Current()))
{
queue->GetMessageTimeVal = msg.time;
queue->GetMessagePosVal = MAKELONG( msg.pt.x, msg.pt.y );
}
/* We got a message */
if (flags & PM_REMOVE)
{
if (msg.message == WM_KEYDOWN || msg.message == WM_SYSKEYDOWN)
{
BYTE *p = &QueueKeyStateTable[msg.wParam & 0xff];
if (!(*p & 0x80)) *p ^= 0x01;
*p |= 0x80;
}
else if (msg.message == WM_KEYUP || msg.message == WM_SYSKEYUP)
QueueKeyStateTable[msg.wParam & 0xff] &= ~0x80;
}
HOOK_CallHooksW( WH_GETMESSAGE, HC_ACTION, flags & PM_REMOVE, (LPARAM)&msg );
/* copy back our internal safe copy of message data to msg_out.
* msg_out is a variable from the *program*, so it can't be used
* internally as it can get "corrupted" by our use of SendMessage()
* (back to the program) inside the message handling itself. */
*msg_out = msg;
return TRUE;
}
/***********************************************************************
* PeekMessageA (USER32.@)
*/
BOOL WINAPI PeekMessageA( MSG *msg, HWND hwnd, UINT first, UINT last, UINT flags )
{
BOOL ret = PeekMessageW( msg, hwnd, first, last, flags );
if (ret) msg->wParam = map_wparam_WtoA( msg->message, msg->wParam );
return ret;
}
/***********************************************************************
* GetMessageW (USER32.@)
*/
BOOL WINAPI GetMessageW( MSG *msg, HWND hwnd, UINT first, UINT last )
{
MESSAGEQUEUE *queue = QUEUE_Current();
int mask, locks;
mask = QS_POSTMESSAGE | QS_SENDMESSAGE; /* Always selected */
if (first || last)
{
if ((first <= WM_KEYLAST) && (last >= WM_KEYFIRST)) mask |= QS_KEY;
if ( ((first <= WM_MOUSELAST) && (last >= WM_MOUSEFIRST)) ||
((first <= WM_NCMOUSELAST) && (last >= WM_NCMOUSEFIRST)) ) mask |= QS_MOUSE;
if ((first <= WM_TIMER) && (last >= WM_TIMER)) mask |= QS_TIMER;
if ((first <= WM_SYSTIMER) && (last >= WM_SYSTIMER)) mask |= QS_TIMER;
if ((first <= WM_PAINT) && (last >= WM_PAINT)) mask |= QS_PAINT;
}
else mask |= QS_MOUSE | QS_KEY | QS_TIMER | QS_PAINT;
locks = WIN_SuspendWndsLock();
while (!PeekMessageW( msg, hwnd, first, last, PM_REMOVE ))
{
/* wait until one of the bits is set */
unsigned int wake_bits = 0, changed_bits = 0;
DWORD dwlc;
SERVER_START_REQ( set_queue_mask )
{
req->wake_mask = QS_SENDMESSAGE;
req->changed_mask = mask;
req->skip_wait = 1;
if (!SERVER_CALL())
{
wake_bits = req->wake_bits;
changed_bits = req->changed_bits;
}
}
SERVER_END_REQ;
if (changed_bits & mask) continue;
if (wake_bits & QS_SENDMESSAGE) continue;
TRACE( "(%04x) mask=%08x, bits=%08x, changed=%08x, waiting\n",
queue->self, mask, wake_bits, changed_bits );
ReleaseThunkLock( &dwlc );
if (USER_Driver.pMsgWaitForMultipleObjectsEx)
USER_Driver.pMsgWaitForMultipleObjectsEx( 1, &queue->server_queue, INFINITE, 0, 0 );
else
WaitForSingleObject( queue->server_queue, INFINITE );
if (dwlc) RestoreThunkLock( dwlc );
}
WIN_RestoreWndsLock( locks );
return (msg->message != WM_QUIT);
}
/***********************************************************************
* GetMessageA (USER32.@)
*/
BOOL WINAPI GetMessageA( MSG *msg, HWND hwnd, UINT first, UINT last )
{
GetMessageW( msg, hwnd, first, last );
msg->wParam = map_wparam_WtoA( msg->message, msg->wParam );
return (msg->message != WM_QUIT);
}
/***********************************************************************
* SetMessageQueue (USER32.@)
*/
BOOL WINAPI SetMessageQueue( INT size )
{
/* now obsolete the message queue will be expanded dynamically as necessary */
return TRUE;
}