/* * Window messaging support * * Copyright 2001 Alexandre Julliard * * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #include "config.h" #include "wine/port.h" #include #include #include "ntstatus.h" #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "winuser.h" #include "winerror.h" #include "winnls.h" #include "dde.h" #include "wine/unicode.h" #include "wine/server.h" #include "user_private.h" #include "win.h" #include "winpos.h" #include "controls.h" #include "winproc.h" #include "wine/debug.h" WINE_DEFAULT_DEBUG_CHANNEL(msg); WINE_DECLARE_DEBUG_CHANNEL(relay); WINE_DECLARE_DEBUG_CHANNEL(key); #define WM_NCMOUSEFIRST WM_NCMOUSEMOVE #define WM_NCMOUSELAST (WM_NCMOUSEFIRST+(WM_MOUSELAST-WM_MOUSEFIRST)) #define MAX_PACK_COUNT 4 #define MAX_SENDMSG_RECURSION 64 #define SYS_TIMER_RATE 55 /* min. timer rate in ms (actually 54.925)*/ /* 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 */ HWINEVENTHOOK hook; /* winevent hook handle */ WINEVENTPROC hook_proc; /* winevent hook proc address */ }; /* 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 */ /* 32 messages per entry, messages 0..31 map to bits 0..31 */ #define SET(msg) (1 << ((msg) & 31)) static const unsigned int message_pointer_flags[] = { /* 0x00 - 0x1f */ SET(WM_CREATE) | SET(WM_SETTEXT) | SET(WM_GETTEXT) | SET(WM_WININICHANGE) | SET(WM_DEVMODECHANGE), /* 0x20 - 0x3f */ SET(WM_GETMINMAXINFO) | SET(WM_DRAWITEM) | SET(WM_MEASUREITEM) | SET(WM_DELETEITEM) | SET(WM_COMPAREITEM), /* 0x40 - 0x5f */ SET(WM_WINDOWPOSCHANGING) | SET(WM_WINDOWPOSCHANGED) | SET(WM_COPYDATA) | SET(WM_NOTIFY) | SET(WM_HELP), /* 0x60 - 0x7f */ SET(WM_STYLECHANGING) | SET(WM_STYLECHANGED), /* 0x80 - 0x9f */ SET(WM_NCCREATE) | SET(WM_NCCALCSIZE) | SET(WM_GETDLGCODE), /* 0xa0 - 0xbf */ SET(EM_GETSEL) | SET(EM_GETRECT) | SET(EM_SETRECT) | SET(EM_SETRECTNP), /* 0xc0 - 0xdf */ SET(EM_REPLACESEL) | SET(EM_GETLINE) | SET(EM_SETTABSTOPS), /* 0xe0 - 0xff */ SET(SBM_GETRANGE) | SET(SBM_SETSCROLLINFO) | SET(SBM_GETSCROLLINFO) | SET(SBM_GETSCROLLBARINFO), /* 0x100 - 0x11f */ 0, /* 0x120 - 0x13f */ 0, /* 0x140 - 0x15f */ SET(CB_GETEDITSEL) | SET(CB_ADDSTRING) | SET(CB_DIR) | SET(CB_GETLBTEXT) | SET(CB_INSERTSTRING) | SET(CB_FINDSTRING) | SET(CB_SELECTSTRING) | SET(CB_GETDROPPEDCONTROLRECT) | SET(CB_FINDSTRINGEXACT), /* 0x160 - 0x17f */ 0, /* 0x180 - 0x19f */ SET(LB_ADDSTRING) | SET(LB_INSERTSTRING) | SET(LB_GETTEXT) | SET(LB_SELECTSTRING) | SET(LB_DIR) | SET(LB_FINDSTRING) | SET(LB_GETSELITEMS) | SET(LB_SETTABSTOPS) | SET(LB_ADDFILE) | SET(LB_GETITEMRECT), /* 0x1a0 - 0x1bf */ SET(LB_FINDSTRINGEXACT), /* 0x1c0 - 0x1df */ 0, /* 0x1e0 - 0x1ff */ 0, /* 0x200 - 0x21f */ SET(WM_NEXTMENU) | SET(WM_SIZING) | SET(WM_MOVING) | SET(WM_DEVICECHANGE), /* 0x220 - 0x23f */ SET(WM_MDICREATE) | SET(WM_MDIGETACTIVE) | SET(WM_DROPOBJECT) | SET(WM_QUERYDROPOBJECT) | SET(WM_DRAGLOOP) | SET(WM_DRAGSELECT) | SET(WM_DRAGMOVE), /* 0x240 - 0x25f */ 0, /* 0x260 - 0x27f */ 0, /* 0x280 - 0x29f */ 0, /* 0x2a0 - 0x2bf */ 0, /* 0x2c0 - 0x2df */ 0, /* 0x2e0 - 0x2ff */ 0, /* 0x300 - 0x31f */ SET(WM_ASKCBFORMATNAME) }; /* flags for messages that contain Unicode strings */ static const unsigned int message_unicode_flags[] = { /* 0x00 - 0x1f */ SET(WM_CREATE) | SET(WM_SETTEXT) | SET(WM_GETTEXT) | SET(WM_GETTEXTLENGTH) | SET(WM_WININICHANGE) | SET(WM_DEVMODECHANGE), /* 0x20 - 0x3f */ SET(WM_CHARTOITEM), /* 0x40 - 0x5f */ 0, /* 0x60 - 0x7f */ 0, /* 0x80 - 0x9f */ SET(WM_NCCREATE), /* 0xa0 - 0xbf */ 0, /* 0xc0 - 0xdf */ SET(EM_REPLACESEL) | SET(EM_GETLINE) | SET(EM_SETPASSWORDCHAR), /* 0xe0 - 0xff */ 0, /* 0x100 - 0x11f */ SET(WM_CHAR) | SET(WM_DEADCHAR) | SET(WM_SYSCHAR) | SET(WM_SYSDEADCHAR), /* 0x120 - 0x13f */ SET(WM_MENUCHAR), /* 0x140 - 0x15f */ SET(CB_ADDSTRING) | SET(CB_DIR) | SET(CB_GETLBTEXT) | SET(CB_GETLBTEXTLEN) | SET(CB_INSERTSTRING) | SET(CB_FINDSTRING) | SET(CB_SELECTSTRING) | SET(CB_FINDSTRINGEXACT), /* 0x160 - 0x17f */ 0, /* 0x180 - 0x19f */ SET(LB_ADDSTRING) | SET(LB_INSERTSTRING) | SET(LB_GETTEXT) | SET(LB_GETTEXTLEN) | SET(LB_SELECTSTRING) | SET(LB_DIR) | SET(LB_FINDSTRING) | SET(LB_ADDFILE), /* 0x1a0 - 0x1bf */ SET(LB_FINDSTRINGEXACT), /* 0x1c0 - 0x1df */ 0, /* 0x1e0 - 0x1ff */ 0, /* 0x200 - 0x21f */ 0, /* 0x220 - 0x23f */ SET(WM_MDICREATE), /* 0x240 - 0x25f */ 0, /* 0x260 - 0x27f */ 0, /* 0x280 - 0x29f */ SET(WM_IME_CHAR), /* 0x2a0 - 0x2bf */ 0, /* 0x2c0 - 0x2df */ 0, /* 0x2e0 - 0x2ff */ 0, /* 0x300 - 0x31f */ SET(WM_PAINTCLIPBOARD) | SET(WM_SIZECLIPBOARD) | SET(WM_ASKCBFORMATNAME) }; /* 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 / 32] & SET(message)) != 0; } /* check whether a given message type contains Unicode (or ASCII) chars */ inline static int is_unicode_message( UINT message ) { if (message >= 8*sizeof(message_unicode_flags)) return FALSE; return (message_unicode_flags[message / 32] & SET(message)) != 0; } #undef SET /* 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 (*buffer) { if (!(ret = HeapReAlloc( GetProcessHeap(), 0, *buffer, size ))) HeapFree( GetProcessHeap(), 0, *buffer ); } else ret = HeapAlloc( GetProcessHeap(), 0, size ); *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 whether message is in the range of keyboard messages */ inline static BOOL is_keyboard_message( UINT message ) { return (message >= WM_KEYFIRST && message <= WM_KEYLAST); } /* check whether message is in the range of mouse messages */ inline static BOOL is_mouse_message( UINT message ) { return ((message >= WM_NCMOUSEFIRST && message <= WM_NCMOUSELAST) || (message >= WM_MOUSEFIRST && message <= WM_MOUSELAST)); } /* check whether message matches the specified hwnd filter */ inline static BOOL check_hwnd_filter( const MSG *msg, HWND hwnd_filter ) { if (!hwnd_filter) return TRUE; return (msg->hwnd == hwnd_filter || IsChild( hwnd_filter, msg->hwnd )); } /*********************************************************************** * 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 ) { switch(message) { case WM_CHARTOITEM: case EM_SETPASSWORDCHAR: case WM_CHAR: case WM_DEADCHAR: case WM_SYSCHAR: case WM_SYSDEADCHAR: case WM_MENUCHAR: { char ch = LOWORD(wparam); WCHAR wch; MultiByteToWideChar(CP_ACP, 0, &ch, 1, &wch, 1); wparam = MAKEWPARAM( wch, HIWORD(wparam) ); } break; case WM_IME_CHAR: { char ch[2]; WCHAR wch; ch[0] = (wparam >> 8); ch[1] = (wparam & 0xff); if (ch[0]) MultiByteToWideChar(CP_ACP, 0, ch, 2, &wch, 1); else MultiByteToWideChar(CP_ACP, 0, &ch[1], 1, &wch, 1); wparam = MAKEWPARAM( wch, HIWORD(wparam) ); } break; } return wparam; } /*********************************************************************** * map_wparam_WtoA * * Convert the wparam of a Unicode message to ASCII. */ static WPARAM map_wparam_WtoA( UINT message, WPARAM wparam ) { switch(message) { case WM_CHARTOITEM: case EM_SETPASSWORDCHAR: case WM_CHAR: case WM_DEADCHAR: case WM_SYSCHAR: case WM_SYSDEADCHAR: case WM_MENUCHAR: { WCHAR wch = LOWORD(wparam); BYTE ch; WideCharToMultiByte( CP_ACP, 0, &wch, 1, &ch, 1, NULL, NULL ); wparam = MAKEWPARAM( ch, HIWORD(wparam) ); } break; case WM_IME_CHAR: { WCHAR wch = LOWORD(wparam); BYTE ch[2]; if (WideCharToMultiByte( CP_ACP, 0, &wch, 1, ch, 2, NULL, NULL ) == 2) wparam = MAKEWPARAM( (ch[0] << 8) | ch[1], HIWORD(wparam) ); else wparam = MAKEWPARAM( ch[0], HIWORD(wparam) ); } break; } 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: case WM_ASKCBFORMATNAME: return wparam * sizeof(WCHAR); case WM_WININICHANGE: if (lparam) push_string(data, (LPWSTR)lparam ); return 0; case WM_SETTEXT: case WM_DEVMODECHANGE: case CB_DIR: case LB_DIR: case LB_ADDFILE: 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 SBM_SETSCROLLINFO: push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) ); return 0; case SBM_GETSCROLLINFO: push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) ); return sizeof(SCROLLINFO); case SBM_GETSCROLLBARINFO: { const SCROLLBARINFO *info = (const SCROLLBARINFO *)lparam; size_t size = min( info->cbSize, sizeof(SCROLLBARINFO) ); push_data( data, info, size ); return size; } case EM_GETSEL: case SBM_GETRANGE: case CB_GETEDITSEL: { 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: case CB_FINDSTRING: case CB_FINDSTRINGEXACT: case CB_SELECTSTRING: 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: case LB_FINDSTRING: case LB_FINDSTRINGEXACT: case LB_SELECTSTRING: 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_NEXTMENU: push_data( data, (MDINEXTMENU *)lparam, sizeof(MDINEXTMENU) ); return sizeof(MDINEXTMENU); case WM_SIZING: case WM_MOVING: push_data( data, (RECT *)lparam, sizeof(RECT) ); return sizeof(RECT); 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_WINE_SETWINDOWPOS: push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) ); return 0; case WM_WINE_KEYBOARD_LL_HOOK: push_data( data, (KBDLLHOOKSTRUCT *)lparam, sizeof(KBDLLHOOKSTRUCT) ); return 0; case WM_WINE_MOUSE_LL_HOOK: push_data( data, (MSLLHOOKSTRUCT *)lparam, sizeof(MSLLHOOKSTRUCT) ); return 0; case WM_PAINT: if (!wparam) return 0; /* fall through */ /* these contain an HFONT */ case WM_SETFONT: case WM_GETFONT: /* these contain an HDC */ case WM_ERASEBKGND: case WM_ICONERASEBKGND: case WM_NCPAINT: case WM_CTLCOLORMSGBOX: case WM_CTLCOLOREDIT: case WM_CTLCOLORLISTBOX: case WM_CTLCOLORBTN: case WM_CTLCOLORDLG: case WM_CTLCOLORSCROLLBAR: case WM_CTLCOLORSTATIC: case WM_PRINT: case WM_PRINTCLIENT: /* these contain an HGLOBAL */ case WM_PAINTCLIPBOARD: case WM_SIZECLIPBOARD: /* these contain HICON */ case WM_GETICON: case WM_SETICON: case WM_QUERYDRAGICON: case WM_QUERYPARKICON: /* these contain pointers */ case WM_DROPOBJECT: case WM_QUERYDROPOBJECT: case WM_DRAGLOOP: case WM_DRAGSELECT: case WM_DRAGMOVE: case WM_DEVICECHANGE: FIXME( "msg %x (%s) not supported yet\n", message, SPY_GetMsgName(message, hwnd) ); data->count = -1; 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: case WM_ASKCBFORMATNAME: if (!get_buffer_space( buffer, (*wparam * sizeof(WCHAR)) )) return FALSE; break; case WM_WININICHANGE: if (!*lparam) return TRUE; /* fall through */ case WM_SETTEXT: case WM_DEVMODECHANGE: case CB_DIR: case LB_DIR: case LB_ADDFILE: 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: case WM_WINE_SETWINDOWPOS: 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 SBM_SETSCROLLINFO: minsize = sizeof(SCROLLINFO); break; case SBM_GETSCROLLINFO: if (!get_buffer_space( buffer, sizeof(SCROLLINFO ))) return FALSE; break; case SBM_GETSCROLLBARINFO: if (!get_buffer_space( buffer, sizeof(SCROLLBARINFO ))) return FALSE; break; case EM_GETSEL: case SBM_GETRANGE: case CB_GETEDITSEL: 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 CB_FINDSTRING: case CB_FINDSTRINGEXACT: case CB_SELECTSTRING: case LB_ADDSTRING: case LB_INSERTSTRING: case LB_FINDSTRING: case LB_FINDSTRINGEXACT: case LB_SELECTSTRING: 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_NEXTMENU: minsize = sizeof(MDINEXTMENU); if (!get_buffer_space( buffer, sizeof(MDINEXTMENU) )) return FALSE; break; case WM_SIZING: case WM_MOVING: minsize = sizeof(RECT); if (!get_buffer_space( buffer, sizeof(RECT) )) 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_WINE_KEYBOARD_LL_HOOK: minsize = sizeof(KBDLLHOOKSTRUCT); break; case WM_WINE_MOUSE_LL_HOOK: minsize = sizeof(MSLLHOOKSTRUCT); break; case WM_PAINT: if (!*wparam) return TRUE; /* fall through */ /* these contain an HFONT */ case WM_SETFONT: case WM_GETFONT: /* these contain an HDC */ case WM_ERASEBKGND: case WM_ICONERASEBKGND: case WM_NCPAINT: case WM_CTLCOLORMSGBOX: case WM_CTLCOLOREDIT: case WM_CTLCOLORLISTBOX: case WM_CTLCOLORBTN: case WM_CTLCOLORDLG: case WM_CTLCOLORSCROLLBAR: case WM_CTLCOLORSTATIC: case WM_PRINT: case WM_PRINTCLIENT: /* these contain an HGLOBAL */ case WM_PAINTCLIPBOARD: case WM_SIZECLIPBOARD: /* these contain HICON */ case WM_GETICON: case WM_SETICON: case WM_QUERYDRAGICON: case WM_QUERYPARKICON: /* these contain pointers */ case WM_DROPOBJECT: case WM_QUERYDROPOBJECT: case WM_DRAGLOOP: case WM_DRAGSELECT: case WM_DRAGMOVE: case WM_DEVICECHANGE: FIXME( "msg %x (%s) not supported yet\n", message, SPY_GetMsgName(message, hwnd) ); 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 SBM_GETSCROLLINFO: push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) ); break; case EM_GETRECT: case LB_GETITEMRECT: case CB_GETDROPPEDCONTROLRECT: case WM_SIZING: case WM_MOVING: 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: case SBM_GETRANGE: case CB_GETEDITSEL: if (wparam) push_data( data, (DWORD *)wparam, sizeof(DWORD) ); if (lparam) push_data( data, (DWORD *)lparam, sizeof(DWORD) ); break; case WM_NEXTMENU: push_data( data, (MDINEXTMENU *)lparam, sizeof(MDINEXTMENU) ); break; case WM_MDICREATE: push_data( data, (MDICREATESTRUCTW *)lparam, sizeof(MDICREATESTRUCTW) ); break; case WM_ASKCBFORMATNAME: push_data( data, (WCHAR *)lparam, (strlenW((WCHAR *)lparam) + 1) * sizeof(WCHAR) ); 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: case WM_ASKCBFORMATNAME: 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 SBM_GETSCROLLINFO: memcpy( (SCROLLINFO *)lparam, buffer, min( sizeof(SCROLLINFO), size )); break; case SBM_GETSCROLLBARINFO: memcpy( (SCROLLBARINFO *)lparam, buffer, min( sizeof(SCROLLBARINFO), size )); break; case EM_GETRECT: case CB_GETDROPPEDCONTROLRECT: case LB_GETITEMRECT: case WM_SIZING: case WM_MOVING: memcpy( (RECT *)lparam, buffer, min( sizeof(RECT), size )); break; case EM_GETLINE: size = min( size, (size_t)*(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_NEXTMENU: memcpy( (MDINEXTMENU *)lparam, buffer, min( sizeof(MDINEXTMENU), 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: case SBM_GETRANGE: case CB_GETEDITSEL: 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; } 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 i, 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 ); } SERVER_START_REQ( reply_message ) { req->result = result; req->remove = remove; for (i = 0; i < data.count; i++) wine_server_add_data( req, data.data[i], data.size[i] ); wine_server_call( req ); } SERVER_END_REQ; } /*********************************************************************** * handle_internal_message * * Handle an internal Wine message instead of calling the window proc. */ static LRESULT handle_internal_message( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam ) { if (hwnd == GetDesktopWindow()) return 0; switch(msg) { case WM_WINE_DESTROYWINDOW: return WIN_DestroyWindow( hwnd ); case WM_WINE_SETWINDOWPOS: if (USER_Driver.pSetWindowPos) return USER_Driver.pSetWindowPos( (WINDOWPOS *)lparam ); return 0; case WM_WINE_SHOWWINDOW: return ShowWindow( hwnd, wparam ); case WM_WINE_SETPARENT: return (LRESULT)SetParent( hwnd, (HWND)wparam ); case WM_WINE_SETWINDOWLONG: return (LRESULT)SetWindowLongW( hwnd, wparam, lparam ); case WM_WINE_ENABLEWINDOW: return EnableWindow( hwnd, wparam ); case WM_WINE_SETACTIVEWINDOW: return (LRESULT)SetActiveWindow( (HWND)wparam ); case WM_WINE_KEYBOARD_LL_HOOK: return HOOK_CallHooks( WH_KEYBOARD_LL, HC_ACTION, wparam, lparam, TRUE ); case WM_WINE_MOUSE_LL_HOOK: return HOOK_CallHooks( WH_MOUSE_LL, HC_ACTION, wparam, lparam, TRUE ); default: if (msg >= WM_WINE_FIRST_DRIVER_MSG && msg <= WM_WINE_LAST_DRIVER_MSG) { if (!USER_Driver.pWindowMessage) return 0; return USER_Driver.pWindowMessage( hwnd, msg, wparam, lparam ); } FIXME( "unknown internal message %x\n", msg ); return 0; } } /* since the WM_DDE_ACK response to a WM_DDE_EXECUTE message should contain the handle * to the memory handle, we keep track (in the server side) of all pairs of handle * used (the client passes its value and the content of the memory handle), and * the server stored both values (the client, and the local one, created after the * content). When a ACK message is generated, the list of pair is searched for a * matching pair, so that the client memory handle can be returned. */ struct DDE_pair { HGLOBAL client_hMem; HGLOBAL server_hMem; }; static struct DDE_pair* dde_pairs; static int dde_num_alloc; static int dde_num_used; static CRITICAL_SECTION dde_crst; static CRITICAL_SECTION_DEBUG critsect_debug = { 0, 0, &dde_crst, { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList }, 0, 0, { 0, (DWORD)(__FILE__ ": dde_crst") } }; static CRITICAL_SECTION dde_crst = { &critsect_debug, -1, 0, 0, 0, 0 }; static BOOL dde_add_pair(HGLOBAL chm, HGLOBAL shm) { int i; #define GROWBY 4 EnterCriticalSection(&dde_crst); /* now remember the pair of hMem on both sides */ if (dde_num_used == dde_num_alloc) { struct DDE_pair* tmp; if (dde_pairs) tmp = HeapReAlloc( GetProcessHeap(), 0, dde_pairs, (dde_num_alloc + GROWBY) * sizeof(struct DDE_pair)); else tmp = HeapAlloc( GetProcessHeap(), 0, (dde_num_alloc + GROWBY) * sizeof(struct DDE_pair)); if (!tmp) { LeaveCriticalSection(&dde_crst); return FALSE; } dde_pairs = tmp; /* zero out newly allocated part */ memset(&dde_pairs[dde_num_alloc], 0, GROWBY * sizeof(struct DDE_pair)); dde_num_alloc += GROWBY; } #undef GROWBY for (i = 0; i < dde_num_alloc; i++) { if (dde_pairs[i].server_hMem == 0) { dde_pairs[i].client_hMem = chm; dde_pairs[i].server_hMem = shm; dde_num_used++; break; } } LeaveCriticalSection(&dde_crst); return TRUE; } static HGLOBAL dde_get_pair(HGLOBAL shm) { int i; HGLOBAL ret = 0; EnterCriticalSection(&dde_crst); for (i = 0; i < dde_num_alloc; i++) { if (dde_pairs[i].server_hMem == shm) { /* free this pair */ dde_pairs[i].server_hMem = 0; dde_num_used--; ret = dde_pairs[i].client_hMem; break; } } LeaveCriticalSection(&dde_crst); return ret; } /*********************************************************************** * post_dde_message * * Post a DDE message */ static BOOL post_dde_message( DWORD dest_tid, struct packed_message *data, const struct send_message_info *info ) { void* ptr = NULL; int size = 0; UINT uiLo, uiHi; LPARAM lp = 0; HGLOBAL hunlock = 0; int i; DWORD res; if (!UnpackDDElParam( info->msg, info->lparam, &uiLo, &uiHi )) return FALSE; lp = info->lparam; switch (info->msg) { /* DDE messages which don't require packing are: * WM_DDE_INITIATE * WM_DDE_TERMINATE * WM_DDE_REQUEST * WM_DDE_UNADVISE */ case WM_DDE_ACK: if (HIWORD(uiHi)) { /* uiHi should contain a hMem from WM_DDE_EXECUTE */ HGLOBAL h = dde_get_pair( (HANDLE)uiHi ); if (h) { /* send back the value of h on the other side */ push_data( data, &h, sizeof(HGLOBAL) ); lp = uiLo; TRACE( "send dde-ack %x %08x => %08lx\n", uiLo, uiHi, (DWORD)h ); } } else { /* uiHi should contain either an atom or 0 */ TRACE( "send dde-ack %x atom=%x\n", uiLo, uiHi ); lp = MAKELONG( uiLo, uiHi ); } break; case WM_DDE_ADVISE: case WM_DDE_DATA: case WM_DDE_POKE: size = 0; if (uiLo) { size = GlobalSize( (HGLOBAL)uiLo ) ; if ((info->msg == WM_DDE_ADVISE && size < sizeof(DDEADVISE)) || (info->msg == WM_DDE_DATA && size < sizeof(DDEDATA)) || (info->msg == WM_DDE_POKE && size < sizeof(DDEPOKE)) ) return FALSE; } else if (info->msg != WM_DDE_DATA) return FALSE; lp = uiHi; if (uiLo) { if ((ptr = GlobalLock( (HGLOBAL)uiLo) )) { DDEDATA *dde_data = (DDEDATA *)ptr; TRACE("unused %d, fResponse %d, fRelease %d, fDeferUpd %d, fAckReq %d, cfFormat %d\n", dde_data->unused, dde_data->fResponse, dde_data->fRelease, dde_data->reserved, dde_data->fAckReq, dde_data->cfFormat); push_data( data, ptr, size ); hunlock = (HGLOBAL)uiLo; } } TRACE( "send ddepack %u %x\n", size, uiHi ); break; case WM_DDE_EXECUTE: if (info->lparam) { if ((ptr = GlobalLock( (HGLOBAL)info->lparam) )) { push_data(data, ptr, GlobalSize( (HGLOBAL)info->lparam )); /* so that the other side can send it back on ACK */ lp = info->lparam; hunlock = (HGLOBAL)info->lparam; } } break; } SERVER_START_REQ( send_message ) { req->id = dest_tid; req->type = info->type; req->flags = 0; req->win = info->hwnd; req->msg = info->msg; req->wparam = info->wparam; req->lparam = lp; req->time = GetCurrentTime(); req->timeout = -1; for (i = 0; i < data->count; i++) wine_server_add_data( req, data->data[i], data->size[i] ); if ((res = wine_server_call( req ))) { if (res == STATUS_INVALID_PARAMETER) /* FIXME: find a STATUS_ value for this one */ SetLastError( ERROR_INVALID_THREAD_ID ); else SetLastError( RtlNtStatusToDosError(res) ); } else FreeDDElParam(info->msg, info->lparam); } SERVER_END_REQ; if (hunlock) GlobalUnlock(hunlock); return !res; } /*********************************************************************** * unpack_dde_message * * Unpack a posted DDE message received from another process. */ static BOOL unpack_dde_message( HWND hwnd, UINT message, WPARAM *wparam, LPARAM *lparam, void **buffer, size_t size ) { UINT uiLo, uiHi; HGLOBAL hMem = 0; void* ptr; switch (message) { case WM_DDE_ACK: if (size) { /* hMem is being passed */ if (size != sizeof(HGLOBAL)) return FALSE; if (!buffer || !*buffer) return FALSE; uiLo = *lparam; memcpy( &hMem, *buffer, size ); uiHi = (UINT)hMem; TRACE("recv dde-ack %x mem=%x[%lx]\n", uiLo, uiHi, GlobalSize( hMem )); } else { uiLo = LOWORD( *lparam ); uiHi = HIWORD( *lparam ); TRACE("recv dde-ack %x atom=%x\n", uiLo, uiHi); } *lparam = PackDDElParam( WM_DDE_ACK, uiLo, uiHi ); break; case WM_DDE_ADVISE: case WM_DDE_DATA: case WM_DDE_POKE: if ((!buffer || !*buffer) && message != WM_DDE_DATA) return FALSE; uiHi = *lparam; TRACE( "recv ddepack %u %x\n", size, uiHi ); if (size) { if (!(hMem = GlobalAlloc( GMEM_MOVEABLE|GMEM_DDESHARE, size ))) return FALSE; if ((ptr = GlobalLock( hMem ))) { memcpy( ptr, *buffer, size ); GlobalUnlock( hMem ); } else { GlobalFree( hMem ); return FALSE; } } uiLo = (UINT)hMem; *lparam = PackDDElParam( message, uiLo, uiHi ); break; case WM_DDE_EXECUTE: if (size) { if (!buffer || !*buffer) return FALSE; if (!(hMem = GlobalAlloc( GMEM_MOVEABLE|GMEM_DDESHARE, size ))) return FALSE; if ((ptr = GlobalLock( hMem ))) { memcpy( ptr, *buffer, size ); GlobalUnlock( hMem ); TRACE( "exec: pairing c=%08lx s=%08lx\n", *lparam, (DWORD)hMem ); if (!dde_add_pair( (HGLOBAL)*lparam, hMem )) { GlobalFree( hMem ); return FALSE; } } else { GlobalFree( hMem ); return FALSE; } } else return FALSE; *lparam = (LPARAM)hMem; break; } return TRUE; } /*********************************************************************** * 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, BOOL same_thread ) { struct user_thread_info *thread_info = get_user_thread_info(); LRESULT result = 0; WNDPROC winproc; CWPSTRUCT cwp; CWPRETSTRUCT cwpret; if (thread_info->recursion_count > MAX_SENDMSG_RECURSION) return 0; thread_info->recursion_count++; if (msg & 0x80000000) { result = handle_internal_message( hwnd, msg, wparam, lparam ); goto done; } /* first the WH_CALLWNDPROC hook */ hwnd = WIN_GetFullHandle( hwnd ); cwp.lParam = lparam; cwp.wParam = wparam; cwp.message = msg; cwp.hwnd = hwnd; HOOK_CallHooks( WH_CALLWNDPROC, HC_ACTION, same_thread, (LPARAM)&cwp, unicode ); /* now call the window procedure */ if (unicode) { if (!(winproc = (WNDPROC)GetWindowLongPtrW( hwnd, GWLP_WNDPROC ))) goto done; result = CallWindowProcW( winproc, hwnd, msg, wparam, lparam ); } else { if (!(winproc = (WNDPROC)GetWindowLongPtrA( hwnd, GWLP_WNDPROC ))) goto done; result = CallWindowProcA( winproc, hwnd, msg, wparam, lparam ); } /* and finally the WH_CALLWNDPROCRET hook */ cwpret.lResult = result; cwpret.lParam = lparam; cwpret.wParam = wparam; cwpret.message = msg; cwpret.hwnd = hwnd; HOOK_CallHooks( WH_CALLWNDPROCRET, HC_ACTION, same_thread, (LPARAM)&cwpret, unicode ); done: thread_info->recursion_count--; return result; } /*********************************************************************** * send_parent_notify * * Send a WM_PARENTNOTIFY to all ancestors of the given window, unless * the window has the WS_EX_NOPARENTNOTIFY style. */ static void send_parent_notify( HWND hwnd, WORD event, WORD idChild, POINT pt ) { /* pt has to be in the client coordinates of the parent window */ MapWindowPoints( 0, hwnd, &pt, 1 ); for (;;) { HWND parent; if (!(GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)) break; if (GetWindowLongW( hwnd, GWL_EXSTYLE ) & WS_EX_NOPARENTNOTIFY) break; if (!(parent = GetParent(hwnd))) break; MapWindowPoints( hwnd, parent, &pt, 1 ); hwnd = parent; SendMessageW( hwnd, WM_PARENTNOTIFY, MAKEWPARAM( event, idChild ), MAKELPARAM( pt.x, pt.y ) ); } } /*********************************************************************** * accept_hardware_message * * Tell the server we have passed the message to the app * (even though we may end up dropping it later on) */ static void accept_hardware_message( UINT hw_id, BOOL remove, HWND new_hwnd ) { SERVER_START_REQ( accept_hardware_message ) { req->hw_id = hw_id; req->remove = remove; req->new_win = new_hwnd; if (wine_server_call( req )) FIXME("Failed to reply to MSG_HARDWARE message. Message may not be removed from queue.\n"); } SERVER_END_REQ; } /*********************************************************************** * process_keyboard_message * * returns TRUE if the contents of 'msg' should be passed to the application */ static BOOL process_keyboard_message( MSG *msg, UINT hw_id, HWND hwnd_filter, UINT first, UINT last, BOOL remove ) { EVENTMSG event; /* FIXME: is this really the right place for this hook? */ event.message = msg->message; event.hwnd = msg->hwnd; event.time = msg->time; event.paramL = (msg->wParam & 0xFF) | (HIWORD(msg->lParam) << 8); event.paramH = msg->lParam & 0x7FFF; if (HIWORD(msg->lParam) & 0x0100) event.paramH |= 0x8000; /* special_key - bit */ HOOK_CallHooks( WH_JOURNALRECORD, HC_ACTION, 0, (LPARAM)&event, TRUE ); /* check message filters */ if (msg->message < first || msg->message > last) return FALSE; if (!check_hwnd_filter( msg, hwnd_filter )) return FALSE; if (remove) { /* Handle F1 key by sending out WM_HELP message */ if ((msg->message == WM_KEYUP) && (msg->wParam == VK_F1) && (msg->hwnd != GetDesktopWindow()) && !MENU_IsMenuActive()) { HELPINFO hi; hi.cbSize = sizeof(HELPINFO); hi.iContextType = HELPINFO_WINDOW; hi.iCtrlId = GetWindowLongPtrA( msg->hwnd, GWLP_ID ); hi.hItemHandle = msg->hwnd; hi.dwContextId = GetWindowContextHelpId( msg->hwnd ); hi.MousePos = msg->pt; SendMessageW( msg->hwnd, WM_HELP, 0, (LPARAM)&hi ); } } if (HOOK_CallHooks( WH_KEYBOARD, remove ? HC_ACTION : HC_NOREMOVE, LOWORD(msg->wParam), msg->lParam, TRUE )) { /* skip this message */ HOOK_CallHooks( WH_CBT, HCBT_KEYSKIPPED, LOWORD(msg->wParam), msg->lParam, TRUE ); accept_hardware_message( hw_id, TRUE, 0 ); return FALSE; } accept_hardware_message( hw_id, remove, 0 ); return TRUE; } /*********************************************************************** * process_mouse_message * * returns TRUE if the contents of 'msg' should be passed to the application */ static BOOL process_mouse_message( MSG *msg, UINT hw_id, ULONG_PTR extra_info, HWND hwnd_filter, UINT first, UINT last, BOOL remove ) { static MSG clk_msg; POINT pt; UINT message; INT hittest; EVENTMSG event; GUITHREADINFO info; MOUSEHOOKSTRUCT hook; BOOL eatMsg; /* find the window to dispatch this mouse message to */ hittest = HTCLIENT; GetGUIThreadInfo( GetCurrentThreadId(), &info ); if (!(msg->hwnd = info.hwndCapture)) { HWND hWndScope = msg->hwnd; /* If no capture HWND, find window which contains the mouse position. * Also find the position of the cursor hot spot (hittest) */ if (!IsWindow(hWndScope)) hWndScope = 0; if (!(msg->hwnd = WINPOS_WindowFromPoint( hWndScope, msg->pt, &hittest ))) msg->hwnd = GetDesktopWindow(); } if (!WIN_IsCurrentThread( msg->hwnd )) { accept_hardware_message( hw_id, FALSE, msg->hwnd ); return FALSE; } /* FIXME: is this really the right place for this hook? */ event.message = msg->message; event.time = msg->time; event.hwnd = msg->hwnd; event.paramL = msg->pt.x; event.paramH = msg->pt.y; HOOK_CallHooks( WH_JOURNALRECORD, HC_ACTION, 0, (LPARAM)&event, TRUE ); if (!check_hwnd_filter( msg, hwnd_filter )) return FALSE; pt = msg->pt; message = msg->message; /* Note: windows has no concept of a non-client wheel message */ if (message != WM_MOUSEWHEEL) { if (hittest != HTCLIENT) { message += WM_NCMOUSEMOVE - WM_MOUSEMOVE; msg->wParam = hittest; } else { /* coordinates don't get translated while tracking a menu */ /* FIXME: should differentiate popups and top-level menus */ if (!(info.flags & GUI_INMENUMODE)) ScreenToClient( msg->hwnd, &pt ); } } msg->lParam = MAKELONG( pt.x, pt.y ); /* translate double clicks */ if ((msg->message == WM_LBUTTONDOWN) || (msg->message == WM_RBUTTONDOWN) || (msg->message == WM_MBUTTONDOWN) || (msg->message == WM_XBUTTONDOWN)) { BOOL update = remove; /* translate double clicks - * note that ...MOUSEMOVEs can slip in between * ...BUTTONDOWN and ...BUTTONDBLCLK messages */ if ((info.flags & (GUI_INMENUMODE|GUI_INMOVESIZE)) || hittest != HTCLIENT || (GetClassLongA( msg->hwnd, GCL_STYLE ) & CS_DBLCLKS)) { if ((msg->message == clk_msg.message) && (msg->hwnd == clk_msg.hwnd) && (msg->wParam == clk_msg.wParam) && (msg->time - clk_msg.time < GetDoubleClickTime()) && (abs(msg->pt.x - clk_msg.pt.x) < GetSystemMetrics(SM_CXDOUBLECLK)/2) && (abs(msg->pt.y - clk_msg.pt.y) < GetSystemMetrics(SM_CYDOUBLECLK)/2)) { message += (WM_LBUTTONDBLCLK - WM_LBUTTONDOWN); clk_msg.message = 0; /* clear the double click conditions */ update = FALSE; } } if (message < first || message > last) return FALSE; /* update static double click conditions */ if (update) clk_msg = *msg; } else { if (message < first || message > last) return FALSE; } /* message is accepted now (but may still get dropped) */ hook.pt = msg->pt; hook.hwnd = msg->hwnd; hook.wHitTestCode = hittest; hook.dwExtraInfo = extra_info; if (HOOK_CallHooks( WH_MOUSE, remove ? HC_ACTION : HC_NOREMOVE, message, (LPARAM)&hook, TRUE )) { hook.pt = msg->pt; hook.hwnd = msg->hwnd; hook.wHitTestCode = hittest; hook.dwExtraInfo = extra_info; HOOK_CallHooks( WH_CBT, HCBT_CLICKSKIPPED, message, (LPARAM)&hook, TRUE ); accept_hardware_message( hw_id, TRUE, 0 ); return FALSE; } if ((hittest == HTERROR) || (hittest == HTNOWHERE)) { SendMessageW( msg->hwnd, WM_SETCURSOR, (WPARAM)msg->hwnd, MAKELONG( hittest, msg->message )); accept_hardware_message( hw_id, TRUE, 0 ); return FALSE; } accept_hardware_message( hw_id, remove, 0 ); if (!remove || info.hwndCapture) { msg->message = message; return TRUE; } eatMsg = FALSE; if ((msg->message == WM_LBUTTONDOWN) || (msg->message == WM_RBUTTONDOWN) || (msg->message == WM_MBUTTONDOWN) || (msg->message == WM_XBUTTONDOWN)) { /* Send the WM_PARENTNOTIFY, * note that even for double/nonclient clicks * notification message is still WM_L/M/RBUTTONDOWN. */ send_parent_notify( msg->hwnd, msg->message, 0, msg->pt ); /* Activate the window if needed */ if (msg->hwnd != info.hwndActive) { HWND hwndTop = msg->hwnd; while (hwndTop) { if ((GetWindowLongW( hwndTop, GWL_STYLE ) & (WS_POPUP|WS_CHILD)) != WS_CHILD) break; hwndTop = GetParent( hwndTop ); } if (hwndTop && hwndTop != GetDesktopWindow()) { LONG ret = SendMessageW( msg->hwnd, WM_MOUSEACTIVATE, (WPARAM)hwndTop, MAKELONG( hittest, msg->message ) ); switch(ret) { case MA_NOACTIVATEANDEAT: eatMsg = TRUE; /* fall through */ case MA_NOACTIVATE: break; case MA_ACTIVATEANDEAT: eatMsg = TRUE; /* fall through */ case MA_ACTIVATE: case 0: if (!FOCUS_MouseActivate( hwndTop )) eatMsg = TRUE; break; default: WARN( "unknown WM_MOUSEACTIVATE code %ld\n", ret ); break; } } } } /* send the WM_SETCURSOR message */ /* Windows sends the normal mouse message as the message parameter in the WM_SETCURSOR message even if it's non-client mouse message */ SendMessageW( msg->hwnd, WM_SETCURSOR, (WPARAM)msg->hwnd, MAKELONG( hittest, msg->message )); msg->message = message; return !eatMsg; } /*********************************************************************** * process_hardware_message * * Process a hardware message; return TRUE if message should be passed on to the app */ static BOOL process_hardware_message( MSG *msg, UINT hw_id, ULONG_PTR extra_info, HWND hwnd_filter, UINT first, UINT last, BOOL remove ) { if (is_keyboard_message( msg->message )) return process_keyboard_message( msg, hw_id, hwnd_filter, first, last, remove ); if (is_mouse_message( msg->message )) return process_mouse_message( msg, hw_id, extra_info, hwnd_filter, first, last, remove ); ERR( "unknown message type %x\n", msg->message ); return FALSE; } /*********************************************************************** * call_sendmsg_callback * * Call the callback function of SendMessageCallback. */ static inline void call_sendmsg_callback( SENDASYNCPROC callback, HWND hwnd, UINT msg, ULONG_PTR data, LRESULT result ) { if (TRACE_ON(relay)) DPRINTF( "%04lx:Call message callback %p (hwnd=%p,msg=%s,data=%08lx,result=%08lx)\n", GetCurrentThreadId(), callback, hwnd, SPY_GetMsgName( msg, hwnd ), data, result ); callback( hwnd, msg, data, result ); if (TRACE_ON(relay)) DPRINTF( "%04lx:Ret message callback %p (hwnd=%p,msg=%s,data=%08lx,result=%08lx)\n", GetCurrentThreadId(), callback, hwnd, SPY_GetMsgName( msg, hwnd ), data, result ); } /*********************************************************************** * get_hook_proc * * Retrieve the hook procedure real value for a module-relative proc */ static void *get_hook_proc( void *proc, const WCHAR *module ) { HMODULE mod; if (!(mod = GetModuleHandleW(module))) { TRACE( "loading %s\n", debugstr_w(module) ); /* FIXME: the library will never be freed */ if (!(mod = LoadLibraryW(module))) return NULL; } return (char *)mod + (ULONG_PTR)proc; } /*********************************************************************** * peek_message * * Peek for a message matching the given parameters. Return FALSE if none available. * All pending sent messages are processed before returning. */ static BOOL peek_message( MSG *msg, HWND hwnd, UINT first, UINT last, int flags ) { LRESULT result; ULONG_PTR extra_info = 0; struct user_thread_info *thread_info = get_user_thread_info(); struct received_message_info info, *old_info; unsigned int hw_id = 0; /* id of previous hardware message */ if (!first && !last) last = ~0; for (;;) { NTSTATUS res; void *buffer = NULL; size_t size = 0, buffer_size = 0; do /* loop while buffer is too small */ { if (buffer_size && !(buffer = HeapAlloc( GetProcessHeap(), 0, buffer_size ))) return FALSE; SERVER_START_REQ( get_message ) { req->flags = flags; req->get_win = hwnd; req->get_first = first; req->get_last = last; req->hw_id = hw_id; if (buffer_size) wine_server_set_reply( req, buffer, buffer_size ); if (!(res = wine_server_call( req ))) { size = wine_server_reply_size( reply ); info.type = reply->type; info.msg.hwnd = reply->win; info.msg.message = reply->msg; info.msg.wParam = reply->wparam; info.msg.lParam = reply->lparam; info.msg.time = reply->time; info.msg.pt.x = reply->x; info.msg.pt.y = reply->y; info.hook = reply->hook; info.hook_proc = reply->hook_proc; hw_id = reply->hw_id; extra_info = reply->info; thread_info->active_hooks = reply->active_hooks; } else { HeapFree( GetProcessHeap(), 0, buffer ); buffer_size = reply->total; } } SERVER_END_REQ; } while (res == STATUS_BUFFER_OVERFLOW); if (res) return FALSE; TRACE( "got type %d msg %x (%s) hwnd %p wp %x lp %lx\n", info.type, info.msg.message, (info.type == MSG_WINEVENT) ? "MSG_WINEVENT" : SPY_GetMsgName(info.msg.message, info.msg.hwnd), 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_CALLBACK_RESULT: call_sendmsg_callback( (SENDASYNCPROC)info.msg.wParam, info.msg.hwnd, info.msg.message, extra_info, info.msg.lParam ); goto next; case MSG_WINEVENT: if (size) { WCHAR module[MAX_PATH]; size = min( size, (MAX_PATH - 1) * sizeof(WCHAR) ); memcpy( module, buffer, size ); module[size / sizeof(WCHAR)] = 0; if (!(info.hook_proc = get_hook_proc( info.hook_proc, module ))) { ERR( "invalid winevent hook module name %s\n", debugstr_w(module) ); goto next; } } if (TRACE_ON(relay)) DPRINTF( "%04lx:Call winevent proc %p (hook=%p,event=%x,hwnd=%p,object_id=%x,child_id=%lx,tid=%04lx,time=%lx)\n", GetCurrentThreadId(), info.hook_proc, info.hook, info.msg.message, info.msg.hwnd, info.msg.wParam, info.msg.lParam, extra_info, info.msg.time); info.hook_proc( info.hook, info.msg.message, info.msg.hwnd, info.msg.wParam, info.msg.lParam, extra_info, info.msg.time ); if (TRACE_ON(relay)) DPRINTF( "%04lx:Ret winevent proc %p (hook=%p,event=%x,hwnd=%p,object_id=%x,child_id=%lx,tid=%04lx,time=%lx)\n", GetCurrentThreadId(), info.hook_proc, info.hook, info.msg.message, info.msg.hwnd, info.msg.wParam, info.msg.lParam, extra_info, info.msg.time); goto next; 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 %p wp %x lp %lx size %d\n", info.msg.message, SPY_GetMsgName(info.msg.message, info.msg.hwnd), info.msg.hwnd, info.msg.wParam, info.msg.lParam, size ); /* ignore it */ reply_message( &info, 0, TRUE ); goto next; } break; case MSG_HARDWARE: if (!process_hardware_message( &info.msg, hw_id, extra_info, hwnd, first, last, flags & GET_MSG_REMOVE )) { TRACE("dropping msg %x\n", info.msg.message ); goto next; /* ignore it */ } thread_info->GetMessagePosVal = MAKELONG( info.msg.pt.x, info.msg.pt.y ); /* fall through */ case MSG_POSTED: thread_info->GetMessageExtraInfoVal = extra_info; if (info.msg.message >= WM_DDE_FIRST && info.msg.message <= WM_DDE_LAST) { if (!unpack_dde_message( info.msg.hwnd, info.msg.message, &info.msg.wParam, &info.msg.lParam, &buffer, size )) { ERR( "invalid packed dde-message %x (%s) hwnd %p wp %x lp %lx size %d\n", info.msg.message, SPY_GetMsgName(info.msg.message, info.msg.hwnd), info.msg.hwnd, info.msg.wParam, info.msg.lParam, size ); goto next; /* ignore it */ } } *msg = info.msg; HeapFree( GetProcessHeap(), 0, buffer ); return TRUE; } /* if we get here, we have a sent message; call the window procedure */ old_info = thread_info->receive_info; thread_info->receive_info = &info; result = call_window_proc( info.msg.hwnd, info.msg.message, info.msg.wParam, info.msg.lParam, (info.type != MSG_ASCII), FALSE ); reply_message( &info, result, TRUE ); thread_info->receive_info = old_info; next: HeapFree( GetProcessHeap(), 0, buffer ); } } /*********************************************************************** * process_sent_messages * * Process all pending sent messages. */ inline static void process_sent_messages(void) { MSG msg; peek_message( &msg, 0, 0, 0, GET_MSG_REMOVE | GET_MSG_SENT_ONLY ); } /*********************************************************************** * get_server_queue_handle * * Get a handle to the server message queue for the current thread. */ static HANDLE get_server_queue_handle(void) { struct user_thread_info *thread_info = get_user_thread_info(); HANDLE ret; if (!(ret = thread_info->server_queue)) { SERVER_START_REQ( get_msg_queue ) { wine_server_call( req ); ret = reply->handle; } SERVER_END_REQ; thread_info->server_queue = ret; if (!ret) ERR( "Cannot get server thread queue\n" ); } return ret; } /*********************************************************************** * wait_message_reply * * Wait until a sent message gets replied to. */ static void wait_message_reply( UINT flags ) { HANDLE server_queue = get_server_queue_handle(); for (;;) { unsigned int wake_bits = 0, changed_bits = 0; DWORD dwlc, res; SERVER_START_REQ( set_queue_mask ) { req->wake_mask = QS_SMRESULT | ((flags & SMTO_BLOCK) ? 0 : QS_SENDMESSAGE); req->changed_mask = req->wake_mask; req->skip_wait = 1; if (!wine_server_call( req )) { wake_bits = reply->wake_bits; changed_bits = reply->changed_bits; } } SERVER_END_REQ; if (wake_bits & QS_SMRESULT) return; /* got a result */ if (wake_bits & QS_SENDMESSAGE) { /* Process the sent message immediately */ process_sent_messages(); continue; } /* now wait for it */ ReleaseThunkLock( &dwlc ); if (USER_Driver.pMsgWaitForMultipleObjectsEx) res = USER_Driver.pMsgWaitForMultipleObjectsEx( 1, &server_queue, INFINITE, QS_ALLINPUT, 0 ); else res = WaitForSingleObject( 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 ) { struct packed_message data; unsigned int res; int i, timeout = -1; if (info->type != MSG_NOTIFY && info->type != MSG_CALLBACK && info->type != MSG_POSTED && info->timeout != INFINITE) timeout = info->timeout; data.count = 0; if (info->type == MSG_OTHER_PROCESS) { *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; } } else if (info->type == MSG_POSTED && info->msg >= WM_DDE_FIRST && info->msg <= WM_DDE_LAST) { return post_dde_message( dest_tid, &data, info ); } SERVER_START_REQ( send_message ) { req->id = dest_tid; req->type = info->type; req->flags = 0; req->win = info->hwnd; req->msg = info->msg; req->wparam = info->wparam; req->lparam = info->lparam; req->time = GetCurrentTime(); req->timeout = timeout; if (info->type == MSG_CALLBACK) { req->callback = info->callback; req->info = info->data; } if (info->flags & SMTO_ABORTIFHUNG) req->flags |= SEND_MSG_ABORT_IF_HUNG; for (i = 0; i < data.count; i++) wine_server_add_data( req, data.data[i], data.size[i] ); if ((res = wine_server_call( req ))) { if (res == STATUS_INVALID_PARAMETER) /* FIXME: find a STATUS_ value for this one */ SetLastError( ERROR_INVALID_THREAD_ID ); else SetLastError( RtlNtStatusToDosError(res) ); } } SERVER_END_REQ; 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; void *reply_data = NULL; if (reply_size) { if (!(reply_data = HeapAlloc( GetProcessHeap(), 0, reply_size ))) { WARN( "no memory for reply %d bytes, will be truncated\n", reply_size ); reply_size = 0; } } SERVER_START_REQ( get_message_reply ) { req->cancel = 1; if (reply_size) wine_server_set_reply( req, reply_data, reply_size ); if (!(status = wine_server_call( req ))) *result = reply->result; reply_size = wine_server_reply_size( reply ); } SERVER_END_REQ; if (!status && reply_size) unpack_reply( info->hwnd, info->msg, info->wparam, info->lparam, reply_data, reply_size ); HeapFree( GetProcessHeap(), 0, reply_data ); TRACE( "hwnd %p msg %x (%s) wp %x lp %lx got reply %lx (err=%ld)\n", info->hwnd, info->msg, SPY_GetMsgName(info->msg, info->hwnd), info->wparam, info->lparam, *result, status ); /* MSDN states that last error is 0 on timeout, but at least NT4 returns ERROR_TIMEOUT */ if (status) SetLastError( RtlNtStatusToDosError(status) ); return !status; } /*********************************************************************** * send_inter_thread_message */ static LRESULT send_inter_thread_message( DWORD dest_tid, const struct send_message_info *info, LRESULT *res_ptr ) { size_t reply_size = 0; TRACE( "hwnd %p msg %x (%s) wp %x lp %lx\n", info->hwnd, info->msg, SPY_GetMsgName(info->msg, info->hwnd), info->wparam, info->lparam ); USER_CheckNotLock(); 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; wait_message_reply( info->flags ); return retrieve_reply( info, reply_size, res_ptr ); } /*********************************************************************** * MSG_SendInternalMessageTimeout * * Same as SendMessageTimeoutW but sends the message to a specific thread * without requiring a window handle. Only works for internal Wine messages. */ LRESULT MSG_SendInternalMessageTimeout( DWORD dest_pid, DWORD dest_tid, UINT msg, WPARAM wparam, LPARAM lparam, UINT flags, UINT timeout, PDWORD_PTR res_ptr ) { struct send_message_info info; LRESULT ret, result; assert( msg & 0x80000000 ); /* must be an internal Wine message */ info.type = MSG_UNICODE; info.hwnd = 0; info.msg = msg; info.wparam = wparam; info.lparam = lparam; info.flags = flags; info.timeout = timeout; if (USER_IsExitingThread( dest_tid )) return 0; if (dest_tid == GetCurrentThreadId()) { result = handle_internal_message( 0, msg, wparam, lparam ); ret = 1; } else { if (dest_pid != GetCurrentProcessId()) info.type = MSG_OTHER_PROCESS; ret = send_inter_thread_message( dest_tid, &info, &result ); } if (ret && res_ptr) *res_ptr = result; return ret; } /*********************************************************************** * SendMessageTimeoutW (USER32.@) */ LRESULT WINAPI SendMessageTimeoutW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam, UINT flags, UINT timeout, PDWORD_PTR 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; } if (!(dest_tid = GetWindowThreadProcessId( hwnd, &dest_pid ))) return 0; if (USER_IsExitingThread( dest_tid )) return 0; SPY_EnterMessage( SPY_SENDMESSAGE, hwnd, msg, wparam, lparam ); if (dest_tid == GetCurrentThreadId()) { result = call_window_proc( hwnd, msg, wparam, lparam, TRUE, 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, PDWORD_PTR 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; } if (!(dest_tid = GetWindowThreadProcessId( hwnd, &dest_pid ))) return 0; if (USER_IsExitingThread( dest_tid )) return 0; SPY_EnterMessage( SPY_SENDMESSAGE, hwnd, msg, wparam, lparam ); if (dest_tid == GetCurrentThreadId()) { result = call_window_proc( hwnd, msg, wparam, lparam, FALSE, TRUE ); 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 (is_unicode_message( info.msg )) { if (WINPROC_MapMsg32ATo32W( info.hwnd, info.msg, &info.wparam, &info.lparam ) == -1) return 0; ret = send_inter_thread_message( dest_tid, &info, &result ); result = WINPROC_UnmapMsg32ATo32W( info.hwnd, info.msg, info.wparam, info.lparam, result ); } else 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; } /*********************************************************************** * 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_MESSAGE_SYNC_ONLY ); return FALSE; } info.type = MSG_NOTIFY; info.hwnd = hwnd; info.msg = msg; info.wparam = wparam; info.lparam = lparam; info.flags = 0; if (is_broadcast(hwnd)) { EnumWindows( broadcast_message_callback, (LPARAM)&info ); return TRUE; } if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE; if (USER_IsExitingThread( dest_tid )) return TRUE; if (dest_tid == GetCurrentThreadId()) { call_window_proc( hwnd, msg, wparam, lparam, TRUE, 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_MESSAGE_SYNC_ONLY ); return FALSE; } info.type = MSG_CALLBACK; info.hwnd = hwnd; info.msg = msg; info.wparam = wparam; info.lparam = lparam; info.callback = callback; info.data = data; info.flags = 0; if (is_broadcast(hwnd)) { EnumWindows( broadcast_message_callback, (LPARAM)&info ); return TRUE; } if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE; if (USER_IsExitingThread( dest_tid )) return TRUE; if (dest_tid == GetCurrentThreadId()) { result = call_window_proc( hwnd, msg, wparam, lparam, TRUE, TRUE ); call_sendmsg_callback( 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 ) { struct received_message_info *info = get_user_thread_info()->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 ) { struct received_message_info *info = get_user_thread_info()->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; DWORD dest_tid; if (is_pointer_message( msg )) { SetLastError( ERROR_MESSAGE_SYNC_ONLY ); return FALSE; } TRACE( "hwnd %p msg %x (%s) wp %x lp %lx\n", hwnd, msg, SPY_GetMsgName(msg, hwnd), wparam, lparam ); info.type = MSG_POSTED; info.hwnd = hwnd; info.msg = msg; info.wparam = wparam; info.lparam = lparam; info.flags = 0; if (is_broadcast(hwnd)) { EnumWindows( broadcast_message_callback, (LPARAM)&info ); return TRUE; } if (!hwnd) return PostThreadMessageW( GetCurrentThreadId(), msg, wparam, lparam ); if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE; if (USER_IsExitingThread( dest_tid )) return TRUE; return put_message_in_queue( dest_tid, &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_MESSAGE_SYNC_ONLY ); return FALSE; } if (USER_IsExitingThread( thread )) return TRUE; info.type = MSG_POSTED; info.hwnd = 0; info.msg = msg; info.wparam = wparam; info.lparam = lparam; info.flags = 0; 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 ) { struct user_thread_info *thread_info = get_user_thread_info(); MSG msg; USER_CheckNotLock(); /* check for graphics events */ if (USER_Driver.pMsgWaitForMultipleObjectsEx) USER_Driver.pMsgWaitForMultipleObjectsEx( 0, NULL, 0, QS_ALLINPUT, 0 ); hwnd = WIN_GetFullHandle( hwnd ); for (;;) { if (!peek_message( &msg, hwnd, first, last, (flags & PM_REMOVE) ? GET_MSG_REMOVE : 0 )) { if (!(flags & PM_NOYIELD)) { DWORD count; ReleaseThunkLock(&count); NtYieldExecution(); if (count) RestoreThunkLock(count); } return FALSE; } if (msg.message & 0x80000000) { handle_internal_message( msg.hwnd, msg.message, msg.wParam, msg.lParam ); if (!(flags & PM_REMOVE)) /* have to remove it explicitly */ peek_message( &msg, msg.hwnd, msg.message, msg.message, GET_MSG_REMOVE ); } else break; } thread_info->GetMessageTimeVal = msg.time; msg.pt.x = LOWORD( thread_info->GetMessagePosVal ); msg.pt.y = HIWORD( thread_info->GetMessagePosVal ); HOOK_CallHooks( WH_GETMESSAGE, HC_ACTION, flags & PM_REMOVE, (LPARAM)&msg, TRUE ); /* 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. */ if (!msg_out) { SetLastError( ERROR_NOACCESS ); return FALSE; } *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 ) { HANDLE server_queue = get_server_queue_handle(); int 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; 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 (!wine_server_call( req )) { wake_bits = reply->wake_bits; changed_bits = reply->changed_bits; } } SERVER_END_REQ; if (changed_bits & mask) continue; if (wake_bits & QS_SENDMESSAGE) continue; TRACE( "(%04lx) mask=%08x, bits=%08x, changed=%08x, waiting\n", GetCurrentThreadId(), mask, wake_bits, changed_bits ); ReleaseThunkLock( &dwlc ); if (USER_Driver.pMsgWaitForMultipleObjectsEx) USER_Driver.pMsgWaitForMultipleObjectsEx( 1, &server_queue, INFINITE, QS_ALLINPUT, 0 ); else WaitForSingleObject( server_queue, INFINITE ); if (dwlc) RestoreThunkLock( dwlc ); } 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); } /*********************************************************************** * IsDialogMessage (USER32.@) * IsDialogMessageA (USER32.@) */ BOOL WINAPI IsDialogMessageA( HWND hwndDlg, LPMSG pmsg ) { MSG msg = *pmsg; msg.wParam = map_wparam_AtoW( msg.message, msg.wParam ); return IsDialogMessageW( hwndDlg, &msg ); } /*********************************************************************** * TranslateMessage (USER32.@) * * Implementation of TranslateMessage. * * TranslateMessage translates virtual-key messages into character-messages, * as follows : * WM_KEYDOWN/WM_KEYUP combinations produce a WM_CHAR or WM_DEADCHAR message. * ditto replacing WM_* with WM_SYS* * This produces WM_CHAR messages only for keys mapped to ASCII characters * by the keyboard driver. * * If the message is WM_KEYDOWN, WM_KEYUP, WM_SYSKEYDOWN, or WM_SYSKEYUP, the * return value is nonzero, regardless of the translation. * */ BOOL WINAPI TranslateMessage( const MSG *msg ) { UINT message; WCHAR wp[2]; BYTE state[256]; if (msg->message < WM_KEYFIRST || msg->message > WM_KEYLAST) return FALSE; if (msg->message != WM_KEYDOWN && msg->message != WM_SYSKEYDOWN) return TRUE; TRACE_(key)("Translating key %s (%04x), scancode %02x\n", SPY_GetVKeyName(msg->wParam), msg->wParam, LOBYTE(HIWORD(msg->lParam))); GetKeyboardState( state ); /* FIXME : should handle ToUnicode yielding 2 */ switch (ToUnicode(msg->wParam, HIWORD(msg->lParam), state, wp, 2, 0)) { case 1: message = (msg->message == WM_KEYDOWN) ? WM_CHAR : WM_SYSCHAR; TRACE_(key)("1 -> PostMessageW(%p,%s,%04x,%08lx)\n", msg->hwnd, SPY_GetMsgName(message, msg->hwnd), wp[0], msg->lParam); PostMessageW( msg->hwnd, message, wp[0], msg->lParam ); break; case -1: message = (msg->message == WM_KEYDOWN) ? WM_DEADCHAR : WM_SYSDEADCHAR; TRACE_(key)("-1 -> PostMessageW(%p,%s,%04x,%08lx)\n", msg->hwnd, SPY_GetMsgName(message, msg->hwnd), wp[0], msg->lParam); PostMessageW( msg->hwnd, message, wp[0], msg->lParam ); break; } return TRUE; } /*********************************************************************** * DispatchMessageA (USER32.@) */ LONG WINAPI DispatchMessageA( const MSG* msg ) { WND * wndPtr; LONG retval; WNDPROC winproc; /* Process timer messages */ if ((msg->message == WM_TIMER) || (msg->message == WM_SYSTIMER)) { if (msg->lParam) return CallWindowProcA( (WNDPROC)msg->lParam, msg->hwnd, msg->message, msg->wParam, GetTickCount() ); } if (!(wndPtr = WIN_GetPtr( msg->hwnd ))) { if (msg->hwnd) SetLastError( ERROR_INVALID_WINDOW_HANDLE ); return 0; } if (wndPtr == WND_OTHER_PROCESS || wndPtr == WND_DESKTOP) { if (IsWindow( msg->hwnd )) SetLastError( ERROR_MESSAGE_SYNC_ONLY ); else SetLastError( ERROR_INVALID_WINDOW_HANDLE ); return 0; } if (wndPtr->tid != GetCurrentThreadId()) { SetLastError( ERROR_MESSAGE_SYNC_ONLY ); WIN_ReleasePtr( wndPtr ); return 0; } winproc = wndPtr->winproc; WIN_ReleasePtr( wndPtr ); SPY_EnterMessage( SPY_DISPATCHMESSAGE, msg->hwnd, msg->message, msg->wParam, msg->lParam ); retval = CallWindowProcA( winproc, msg->hwnd, msg->message, msg->wParam, msg->lParam ); SPY_ExitMessage( SPY_RESULT_OK, msg->hwnd, msg->message, retval, msg->wParam, msg->lParam ); if (msg->message == WM_PAINT) { /* send a WM_NCPAINT and WM_ERASEBKGND if the non-client area is still invalid */ HRGN hrgn = CreateRectRgn( 0, 0, 0, 0 ); GetUpdateRgn( msg->hwnd, hrgn, TRUE ); DeleteObject( hrgn ); } return retval; } /*********************************************************************** * DispatchMessageW (USER32.@) Process a message * * Process the message specified in the structure *_msg_. * * If the lpMsg parameter points to a WM_TIMER message and the * parameter of the WM_TIMER message is not NULL, the lParam parameter * points to the function that is called instead of the window * procedure. * * The message must be valid. * * RETURNS * * DispatchMessage() returns the result of the window procedure invoked. * * CONFORMANCE * * ECMA-234, Win32 * */ LONG WINAPI DispatchMessageW( const MSG* msg ) { WND * wndPtr; LONG retval; WNDPROC winproc; /* Process timer messages */ if ((msg->message == WM_TIMER) || (msg->message == WM_SYSTIMER)) { if (msg->lParam) return CallWindowProcW( (WNDPROC)msg->lParam, msg->hwnd, msg->message, msg->wParam, GetTickCount() ); } if (!(wndPtr = WIN_GetPtr( msg->hwnd ))) { if (msg->hwnd) SetLastError( ERROR_INVALID_WINDOW_HANDLE ); return 0; } if (wndPtr == WND_OTHER_PROCESS || wndPtr == WND_DESKTOP) { if (IsWindow( msg->hwnd )) SetLastError( ERROR_MESSAGE_SYNC_ONLY ); else SetLastError( ERROR_INVALID_WINDOW_HANDLE ); return 0; } if (wndPtr->tid != GetCurrentThreadId()) { SetLastError( ERROR_MESSAGE_SYNC_ONLY ); WIN_ReleasePtr( wndPtr ); return 0; } winproc = wndPtr->winproc; WIN_ReleasePtr( wndPtr ); SPY_EnterMessage( SPY_DISPATCHMESSAGE, msg->hwnd, msg->message, msg->wParam, msg->lParam ); retval = CallWindowProcW( winproc, msg->hwnd, msg->message, msg->wParam, msg->lParam ); SPY_ExitMessage( SPY_RESULT_OK, msg->hwnd, msg->message, retval, msg->wParam, msg->lParam ); if (msg->message == WM_PAINT) { /* send a WM_NCPAINT and WM_ERASEBKGND if the non-client area is still invalid */ HRGN hrgn = CreateRectRgn( 0, 0, 0, 0 ); GetUpdateRgn( msg->hwnd, hrgn, TRUE ); DeleteObject( hrgn ); } return retval; } /*********************************************************************** * GetMessagePos (USER.119) * GetMessagePos (USER32.@) * * The GetMessagePos() function returns a long value representing a * cursor position, in screen coordinates, when the last message * retrieved by the GetMessage() function occurs. The x-coordinate is * in the low-order word of the return value, the y-coordinate is in * the high-order word. The application can use the MAKEPOINT() * macro to obtain a POINT structure from the return value. * * For the current cursor position, use GetCursorPos(). * * RETURNS * * Cursor position of last message on success, zero on failure. * * CONFORMANCE * * ECMA-234, Win32 * */ DWORD WINAPI GetMessagePos(void) { return get_user_thread_info()->GetMessagePosVal; } /*********************************************************************** * GetMessageTime (USER.120) * GetMessageTime (USER32.@) * * GetMessageTime() returns the message time for the last message * retrieved by the function. The time is measured in milliseconds with * the same offset as GetTickCount(). * * Since the tick count wraps, this is only useful for moderately short * relative time comparisons. * * RETURNS * * Time of last message on success, zero on failure. */ LONG WINAPI GetMessageTime(void) { return get_user_thread_info()->GetMessageTimeVal; } /*********************************************************************** * GetMessageExtraInfo (USER.288) * GetMessageExtraInfo (USER32.@) */ LPARAM WINAPI GetMessageExtraInfo(void) { return get_user_thread_info()->GetMessageExtraInfoVal; } /*********************************************************************** * SetMessageExtraInfo (USER32.@) */ LPARAM WINAPI SetMessageExtraInfo(LPARAM lParam) { struct user_thread_info *thread_info = get_user_thread_info(); LONG old_value = thread_info->GetMessageExtraInfoVal; thread_info->GetMessageExtraInfoVal = lParam; return old_value; } /*********************************************************************** * WaitMessage (USER.112) Suspend thread pending messages * WaitMessage (USER32.@) Suspend thread pending messages * * WaitMessage() suspends a thread until events appear in the thread's * queue. */ BOOL WINAPI WaitMessage(void) { return (MsgWaitForMultipleObjectsEx( 0, NULL, INFINITE, QS_ALLINPUT, 0 ) != WAIT_FAILED); } /*********************************************************************** * MsgWaitForMultipleObjectsEx (USER32.@) */ DWORD WINAPI MsgWaitForMultipleObjectsEx( DWORD count, CONST HANDLE *pHandles, DWORD timeout, DWORD mask, DWORD flags ) { HANDLE handles[MAXIMUM_WAIT_OBJECTS]; DWORD i, ret, lock; if (count > MAXIMUM_WAIT_OBJECTS-1) { SetLastError( ERROR_INVALID_PARAMETER ); return WAIT_FAILED; } /* set the queue mask */ SERVER_START_REQ( set_queue_mask ) { req->wake_mask = (flags & MWMO_INPUTAVAILABLE) ? mask : 0; req->changed_mask = mask; req->skip_wait = 0; wine_server_call( req ); } SERVER_END_REQ; /* Add the thread event to the handle list */ for (i = 0; i < count; i++) handles[i] = pHandles[i]; handles[count] = get_server_queue_handle(); ReleaseThunkLock( &lock ); if (USER_Driver.pMsgWaitForMultipleObjectsEx) { ret = USER_Driver.pMsgWaitForMultipleObjectsEx( count+1, handles, timeout, mask, flags ); if (ret == count+1) ret = count; /* pretend the msg queue is ready */ } else ret = WaitForMultipleObjectsEx( count+1, handles, flags & MWMO_WAITALL, timeout, flags & MWMO_ALERTABLE ); if (lock) RestoreThunkLock( lock ); return ret; } /*********************************************************************** * MsgWaitForMultipleObjects (USER32.@) */ DWORD WINAPI MsgWaitForMultipleObjects( DWORD count, CONST HANDLE *handles, BOOL wait_all, DWORD timeout, DWORD mask ) { return MsgWaitForMultipleObjectsEx( count, handles, timeout, mask, wait_all ? MWMO_WAITALL : 0 ); } /*********************************************************************** * WaitForInputIdle (USER32.@) */ DWORD WINAPI WaitForInputIdle( HANDLE hProcess, DWORD dwTimeOut ) { DWORD start_time, elapsed, ret; HANDLE idle_event = (HANDLE)-1; SERVER_START_REQ( wait_input_idle ) { req->handle = hProcess; req->timeout = dwTimeOut; if (!(ret = wine_server_call_err( req ))) idle_event = reply->event; } SERVER_END_REQ; if (ret) return WAIT_FAILED; /* error */ if (!idle_event) return 0; /* no event to wait on */ start_time = GetTickCount(); elapsed = 0; TRACE("waiting for %p\n", idle_event ); do { ret = MsgWaitForMultipleObjects ( 1, &idle_event, FALSE, dwTimeOut - elapsed, QS_SENDMESSAGE ); switch (ret) { case WAIT_OBJECT_0+1: process_sent_messages(); break; case WAIT_TIMEOUT: case WAIT_FAILED: TRACE("timeout or error\n"); return ret; default: TRACE("finished\n"); return 0; } if (dwTimeOut != INFINITE) { elapsed = GetTickCount() - start_time; if (elapsed > dwTimeOut) break; } } while (1); return WAIT_TIMEOUT; } /*********************************************************************** * UserYield (USER.332) */ void WINAPI UserYield16(void) { DWORD count; /* Handle sent messages */ process_sent_messages(); /* Yield */ ReleaseThunkLock(&count); if (count) { RestoreThunkLock(count); /* Handle sent messages again */ process_sent_messages(); } } /*********************************************************************** * RegisterWindowMessage (USER.118) * RegisterWindowMessageA (USER32.@) */ WORD WINAPI RegisterWindowMessageA( LPCSTR str ) { TRACE("%s\n", str ); return GlobalAddAtomA( str ); } /*********************************************************************** * RegisterWindowMessageW (USER32.@) */ WORD WINAPI RegisterWindowMessageW( LPCWSTR str ) { TRACE("%p\n", str ); return GlobalAddAtomW( str ); } /*********************************************************************** * BroadcastSystemMessage (USER32.@) * BroadcastSystemMessageA (USER32.@) */ LONG WINAPI BroadcastSystemMessageA( DWORD flags, LPDWORD recipients, UINT msg, WPARAM wp, LPARAM lp ) { if ((*recipients & BSM_APPLICATIONS) || (*recipients == BSM_ALLCOMPONENTS)) { FIXME( "(%08lx,%08lx,%08x,%08x,%08lx): semi-stub!\n", flags, *recipients, msg, wp, lp ); PostMessageA( HWND_BROADCAST, msg, wp, lp ); return 1; } else { FIXME( "(%08lx,%08lx,%08x,%08x,%08lx): stub!\n", flags, *recipients, msg, wp, lp); return -1; } } /*********************************************************************** * BroadcastSystemMessageW (USER32.@) */ LONG WINAPI BroadcastSystemMessageW( DWORD flags, LPDWORD recipients, UINT msg, WPARAM wp, LPARAM lp ) { if ((*recipients & BSM_APPLICATIONS) || (*recipients == BSM_ALLCOMPONENTS)) { FIXME( "(%08lx,%08lx,%08x,%08x,%08lx): semi-stub!\n", flags, *recipients, msg, wp, lp ); PostMessageW( HWND_BROADCAST, msg, wp, lp ); return 1; } else { FIXME( "(%08lx,%08lx,%08x,%08x,%08lx): stub!\n", flags, *recipients, msg, wp, lp ); return -1; } } /*********************************************************************** * SetMessageQueue (USER32.@) */ BOOL WINAPI SetMessageQueue( INT size ) { /* now obsolete the message queue will be expanded dynamically as necessary */ return TRUE; } /*********************************************************************** * MessageBeep (USER32.@) */ BOOL WINAPI MessageBeep( UINT i ) { BOOL active = TRUE; SystemParametersInfoA( SPI_GETBEEP, 0, &active, FALSE ); if (active && USER_Driver.pBeep) USER_Driver.pBeep(); return TRUE; } /*********************************************************************** * SetTimer (USER32.@) */ UINT_PTR WINAPI SetTimer( HWND hwnd, UINT_PTR id, UINT timeout, TIMERPROC proc ) { UINT_PTR ret; WNDPROC winproc = 0; if (proc) winproc = WINPROC_AllocProc( (WNDPROC)proc, WIN_PROC_32A ); SERVER_START_REQ( set_win_timer ) { req->win = hwnd; req->msg = WM_TIMER; req->id = id; req->rate = max( timeout, SYS_TIMER_RATE ); req->lparam = (unsigned int)winproc; if (!wine_server_call_err( req )) { ret = reply->id; if (!ret) ret = TRUE; } else ret = 0; } SERVER_END_REQ; TRACE("Added %p %x %p timeout %d\n", hwnd, id, winproc, timeout ); return ret; } /*********************************************************************** * SetSystemTimer (USER32.@) */ UINT_PTR WINAPI SetSystemTimer( HWND hwnd, UINT_PTR id, UINT timeout, TIMERPROC proc ) { UINT_PTR ret; WNDPROC winproc = 0; if (proc) winproc = WINPROC_AllocProc( (WNDPROC)proc, WIN_PROC_32A ); SERVER_START_REQ( set_win_timer ) { req->win = hwnd; req->msg = WM_SYSTIMER; req->id = id; req->rate = max( timeout, SYS_TIMER_RATE ); req->lparam = (unsigned int)winproc; if (!wine_server_call_err( req )) { ret = reply->id; if (!ret) ret = TRUE; } else ret = 0; } SERVER_END_REQ; TRACE("Added %p %x %p timeout %d\n", hwnd, id, winproc, timeout ); return ret; } /*********************************************************************** * KillTimer (USER32.@) */ BOOL WINAPI KillTimer( HWND hwnd, UINT_PTR id ) { BOOL ret; TRACE("%p %d\n", hwnd, id ); SERVER_START_REQ( kill_win_timer ) { req->win = hwnd; req->msg = WM_TIMER; req->id = id; ret = !wine_server_call_err( req ); } SERVER_END_REQ; return ret; } /*********************************************************************** * KillSystemTimer (USER32.@) */ BOOL WINAPI KillSystemTimer( HWND hwnd, UINT_PTR id ) { BOOL ret; TRACE("%p %d\n", hwnd, id ); SERVER_START_REQ( kill_win_timer ) { req->win = hwnd; req->msg = WM_SYSTIMER; req->id = id; ret = !wine_server_call_err( req ); } SERVER_END_REQ; return ret; } /********************************************************************** * GetGUIThreadInfo (USER32.@) */ BOOL WINAPI GetGUIThreadInfo( DWORD id, GUITHREADINFO *info ) { BOOL ret; SERVER_START_REQ( get_thread_input ) { req->tid = id; if ((ret = !wine_server_call_err( req ))) { info->flags = 0; info->hwndActive = reply->active; info->hwndFocus = reply->focus; info->hwndCapture = reply->capture; info->hwndMenuOwner = reply->menu_owner; info->hwndMoveSize = reply->move_size; info->hwndCaret = reply->caret; info->rcCaret.left = reply->rect.left; info->rcCaret.top = reply->rect.top; info->rcCaret.right = reply->rect.right; info->rcCaret.bottom = reply->rect.bottom; if (reply->menu_owner) info->flags |= GUI_INMENUMODE; if (reply->move_size) info->flags |= GUI_INMOVESIZE; if (reply->caret) info->flags |= GUI_CARETBLINKING; } } SERVER_END_REQ; return ret; } /****************************************************************** * IsHungAppWindow (USER32.@) * */ BOOL WINAPI IsHungAppWindow( HWND hWnd ) { DWORD dwResult; return !SendMessageTimeoutA(hWnd, WM_NULL, 0, 0, SMTO_ABORTIFHUNG, 5000, &dwResult); }