2 * Message queues related functions
4 * Copyright 1993, 1994 Alexandre Julliard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 #include "wine/port.h"
28 #ifdef HAVE_SYS_TIME_H
29 # include <sys/time.h>
31 #include <sys/types.h>
40 #include "wine/server.h"
44 #include "user_private.h"
48 #include "wine/debug.h"
50 WINE_DEFAULT_DEBUG_CHANNEL(msg);
51 WINE_DECLARE_DEBUG_CHANNEL(key);
53 #define WM_NCMOUSEFIRST WM_NCMOUSEMOVE
54 #define WM_NCMOUSELAST WM_NCMBUTTONDBLCLK
57 /***********************************************************************
60 inline static BOOL is_keyboard_message( UINT message )
62 return (message >= WM_KEYFIRST && message <= WM_KEYLAST);
66 /***********************************************************************
69 inline static BOOL is_mouse_message( UINT message )
71 return ((message >= WM_NCMOUSEFIRST && message <= WM_NCMOUSELAST) ||
72 (message >= WM_MOUSEFIRST && message <= WM_MOUSELAST));
76 /***********************************************************************
77 * check_message_filter
79 inline static BOOL check_message_filter( const MSG *msg, HWND hwnd, UINT first, UINT last )
83 if (msg->hwnd != hwnd && !IsChild( hwnd, msg->hwnd )) return FALSE;
87 return (msg->message >= first && msg->message <= last);
93 /***********************************************************************
94 * process_sent_messages
96 * Process all pending sent messages.
98 inline static void process_sent_messages(void)
101 MSG_peek_message( &msg, 0, 0, 0, GET_MSG_REMOVE | GET_MSG_SENT_ONLY );
105 /***********************************************************************
106 * queue_hardware_message
108 * store a hardware message in the thread queue
111 static void queue_hardware_message( MSG *msg, ULONG_PTR extra_info )
113 SERVER_START_REQ( send_message )
115 req->type = MSG_HARDWARE;
116 req->id = GetWindowThreadProcessId( msg->hwnd, NULL );
117 req->win = msg->hwnd;
118 req->msg = msg->message;
119 req->wparam = msg->wParam;
120 req->lparam = msg->lParam;
123 req->time = msg->time;
124 req->info = extra_info;
126 wine_server_call( req );
133 /***********************************************************************
134 * MSG_SendParentNotify
136 * Send a WM_PARENTNOTIFY to all ancestors of the given window, unless
137 * the window has the WS_EX_NOPARENTNOTIFY style.
139 static void MSG_SendParentNotify( HWND hwnd, WORD event, WORD idChild, POINT pt )
141 /* pt has to be in the client coordinates of the parent window */
142 MapWindowPoints( 0, hwnd, &pt, 1 );
147 if (!(GetWindowLongA( hwnd, GWL_STYLE ) & WS_CHILD)) break;
148 if (GetWindowLongA( hwnd, GWL_EXSTYLE ) & WS_EX_NOPARENTNOTIFY) break;
149 if (!(parent = GetParent(hwnd))) break;
150 MapWindowPoints( hwnd, parent, &pt, 1 );
152 SendMessageA( hwnd, WM_PARENTNOTIFY,
153 MAKEWPARAM( event, idChild ), MAKELPARAM( pt.x, pt.y ) );
158 #if 0 /* this is broken for now, will require proper support in the server */
160 /***********************************************************************
161 * MSG_JournalPlayBackMsg
163 * Get an EVENTMSG struct via call JOURNALPLAYBACK hook function
165 void MSG_JournalPlayBackMsg(void)
172 wtime=HOOK_CallHooks( WH_JOURNALPLAYBACK, HC_GETNEXT, 0, (LPARAM)&tmpMsg, TRUE );
173 /* TRACE(msg,"Playback wait time =%ld\n",wtime); */
177 msg.message = tmpMsg.message;
178 msg.hwnd = tmpMsg.hwnd;
179 msg.time = tmpMsg.time;
180 if ((tmpMsg.message >= WM_KEYFIRST) && (tmpMsg.message <= WM_KEYLAST))
182 msg.wParam = tmpMsg.paramL & 0xFF;
183 msg.lParam = MAKELONG(tmpMsg.paramH&0x7ffff,tmpMsg.paramL>>8);
184 if (tmpMsg.message == WM_KEYDOWN || tmpMsg.message == WM_SYSKEYDOWN)
186 for (keyDown=i=0; i<256 && !keyDown; i++)
187 if (InputKeyStateTable[i] & 0x80)
190 msg.lParam |= 0x40000000;
191 InputKeyStateTable[msg.wParam] |= 0x80;
192 AsyncKeyStateTable[msg.wParam] |= 0x80;
194 else /* WM_KEYUP, WM_SYSKEYUP */
196 msg.lParam |= 0xC0000000;
197 InputKeyStateTable[msg.wParam] &= ~0x80;
199 if (InputKeyStateTable[VK_MENU] & 0x80)
200 msg.lParam |= 0x20000000;
201 if (tmpMsg.paramH & 0x8000) /*special_key bit*/
202 msg.lParam |= 0x01000000;
204 msg.pt.x = msg.pt.y = 0;
205 queue_hardware_message( &msg, 0 );
207 else if ((tmpMsg.message>= WM_MOUSEFIRST) && (tmpMsg.message <= WM_MOUSELAST))
209 switch (tmpMsg.message)
212 InputKeyStateTable[VK_LBUTTON] |= 0x80;
213 AsyncKeyStateTable[VK_LBUTTON] |= 0x80;
216 InputKeyStateTable[VK_LBUTTON] &= ~0x80;
219 InputKeyStateTable[VK_MBUTTON] |= 0x80;
220 AsyncKeyStateTable[VK_MBUTTON] |= 0x80;
223 InputKeyStateTable[VK_MBUTTON] &= ~0x80;
226 InputKeyStateTable[VK_RBUTTON] |= 0x80;
227 AsyncKeyStateTable[VK_RBUTTON] |= 0x80;
230 InputKeyStateTable[VK_RBUTTON] &= ~0x80;
233 SetCursorPos(tmpMsg.paramL,tmpMsg.paramH);
234 msg.lParam=MAKELONG(tmpMsg.paramL,tmpMsg.paramH);
236 if (InputKeyStateTable[VK_LBUTTON] & 0x80) msg.wParam |= MK_LBUTTON;
237 if (InputKeyStateTable[VK_MBUTTON] & 0x80) msg.wParam |= MK_MBUTTON;
238 if (InputKeyStateTable[VK_RBUTTON] & 0x80) msg.wParam |= MK_RBUTTON;
240 msg.pt.x = tmpMsg.paramL;
241 msg.pt.y = tmpMsg.paramH;
242 queue_hardware_message( &msg, 0 );
244 HOOK_CallHooks( WH_JOURNALPLAYBACK, HC_SKIP, 0, (LPARAM)&tmpMsg, TRUE );
248 if( tmpMsg.message == WM_QUEUESYNC ) HOOK_CallHooks( WH_CBT, HCBT_QS, 0, 0, TRUE );
254 /***********************************************************************
255 * process_raw_keyboard_message
257 * returns TRUE if the contents of 'msg' should be passed to the application
259 static void process_raw_keyboard_message( MSG *msg )
263 event.message = msg->message;
264 event.hwnd = msg->hwnd;
265 event.time = msg->time;
266 event.paramL = (msg->wParam & 0xFF) | (HIWORD(msg->lParam) << 8);
267 event.paramH = msg->lParam & 0x7FFF;
268 if (HIWORD(msg->lParam) & 0x0100) event.paramH |= 0x8000; /* special_key - bit */
269 HOOK_CallHooks( WH_JOURNALRECORD, HC_ACTION, 0, (LPARAM)&event, TRUE );
273 /***********************************************************************
274 * process_cooked_keyboard_message
276 * returns TRUE if the contents of 'msg' should be passed to the application
278 static BOOL process_cooked_keyboard_message( MSG *msg, BOOL remove )
282 /* Handle F1 key by sending out WM_HELP message */
283 if ((msg->message == WM_KEYUP) &&
284 (msg->wParam == VK_F1) &&
285 (msg->hwnd != GetDesktopWindow()) &&
286 !MENU_IsMenuActive())
289 hi.cbSize = sizeof(HELPINFO);
290 hi.iContextType = HELPINFO_WINDOW;
291 hi.iCtrlId = GetWindowLongPtrA( msg->hwnd, GWLP_ID );
292 hi.hItemHandle = msg->hwnd;
293 hi.dwContextId = GetWindowContextHelpId( msg->hwnd );
294 hi.MousePos = msg->pt;
295 SendMessageA(msg->hwnd, WM_HELP, 0, (LPARAM)&hi);
299 if (HOOK_CallHooks( WH_KEYBOARD, remove ? HC_ACTION : HC_NOREMOVE,
300 LOWORD(msg->wParam), msg->lParam, TRUE ))
302 /* skip this message */
303 HOOK_CallHooks( WH_CBT, HCBT_KEYSKIPPED, LOWORD(msg->wParam), msg->lParam, TRUE );
310 /***********************************************************************
311 * process_raw_mouse_message
313 static void process_raw_mouse_message( MSG *msg, BOOL remove )
321 HWND hWndScope = msg->hwnd;
323 /* find the window to dispatch this mouse message to */
326 GetGUIThreadInfo( GetCurrentThreadId(), &info );
327 if (!(msg->hwnd = info.hwndCapture))
329 /* If no capture HWND, find window which contains the mouse position.
330 * Also find the position of the cursor hot spot (hittest) */
331 if (!IsWindow(hWndScope)) hWndScope = 0;
332 if (!(msg->hwnd = WINPOS_WindowFromPoint( hWndScope, msg->pt, &hittest )))
333 msg->hwnd = GetDesktopWindow();
336 event.message = msg->message;
337 event.time = msg->time;
338 event.hwnd = msg->hwnd;
339 event.paramL = msg->pt.x;
340 event.paramH = msg->pt.y;
341 HOOK_CallHooks( WH_JOURNALRECORD, HC_ACTION, 0, (LPARAM)&event, TRUE );
343 /* translate double clicks */
345 if ((msg->message == WM_LBUTTONDOWN) ||
346 (msg->message == WM_RBUTTONDOWN) ||
347 (msg->message == WM_MBUTTONDOWN))
349 BOOL update = remove;
350 /* translate double clicks -
351 * note that ...MOUSEMOVEs can slip in between
352 * ...BUTTONDOWN and ...BUTTONDBLCLK messages */
354 if ((info.flags & (GUI_INMENUMODE|GUI_INMOVESIZE)) ||
355 hittest != HTCLIENT ||
356 (GetClassLongA( msg->hwnd, GCL_STYLE ) & CS_DBLCLKS))
358 if ((msg->message == clk_msg.message) &&
359 (msg->hwnd == clk_msg.hwnd) &&
360 (msg->time - clk_msg.time < GetDoubleClickTime()) &&
361 (abs(msg->pt.x - clk_msg.pt.x) < GetSystemMetrics(SM_CXDOUBLECLK)/2) &&
362 (abs(msg->pt.y - clk_msg.pt.y) < GetSystemMetrics(SM_CYDOUBLECLK)/2))
364 msg->message += (WM_LBUTTONDBLCLK - WM_LBUTTONDOWN);
372 /* update static double click conditions */
373 if (update) clk_msg = *msg;
377 /* Note: windows has no concept of a non-client wheel message */
378 if (msg->message != WM_MOUSEWHEEL)
380 if (hittest != HTCLIENT)
382 msg->message += WM_NCMOUSEMOVE - WM_MOUSEMOVE;
383 msg->wParam = hittest;
387 /* coordinates don't get translated while tracking a menu */
388 /* FIXME: should differentiate popups and top-level menus */
389 if (!(info.flags & GUI_INMENUMODE))
390 ScreenToClient( msg->hwnd, &pt );
393 msg->lParam = MAKELONG( pt.x, pt.y );
397 /***********************************************************************
398 * process_cooked_mouse_message
400 * returns TRUE if the contents of 'msg' should be passed to the application
402 static BOOL process_cooked_mouse_message( MSG *msg, ULONG_PTR extra_info, BOOL remove )
404 MOUSEHOOKSTRUCT hook;
405 INT hittest = HTCLIENT;
406 UINT raw_message = msg->message;
409 if (msg->message >= WM_NCMOUSEFIRST && msg->message <= WM_NCMOUSELAST)
411 raw_message += WM_MOUSEFIRST - WM_NCMOUSEFIRST;
412 hittest = msg->wParam;
414 if (raw_message == WM_LBUTTONDBLCLK ||
415 raw_message == WM_RBUTTONDBLCLK ||
416 raw_message == WM_MBUTTONDBLCLK)
418 raw_message += WM_LBUTTONDOWN - WM_LBUTTONDBLCLK;
422 hook.hwnd = msg->hwnd;
423 hook.wHitTestCode = hittest;
424 hook.dwExtraInfo = extra_info;
425 if (HOOK_CallHooks( WH_MOUSE, remove ? HC_ACTION : HC_NOREMOVE,
426 msg->message, (LPARAM)&hook, TRUE ))
429 hook.hwnd = msg->hwnd;
430 hook.wHitTestCode = hittest;
431 hook.dwExtraInfo = extra_info;
432 HOOK_CallHooks( WH_CBT, HCBT_CLICKSKIPPED, msg->message, (LPARAM)&hook, TRUE );
436 if ((hittest == HTERROR) || (hittest == HTNOWHERE))
438 SendMessageA( msg->hwnd, WM_SETCURSOR, (WPARAM)msg->hwnd,
439 MAKELONG( hittest, raw_message ));
443 if (!remove || GetCapture()) return TRUE;
447 if ((raw_message == WM_LBUTTONDOWN) ||
448 (raw_message == WM_RBUTTONDOWN) ||
449 (raw_message == WM_MBUTTONDOWN))
451 /* Send the WM_PARENTNOTIFY,
452 * note that even for double/nonclient clicks
453 * notification message is still WM_L/M/RBUTTONDOWN.
455 MSG_SendParentNotify( msg->hwnd, raw_message, 0, msg->pt );
457 /* Activate the window if needed */
459 if (msg->hwnd != GetActiveWindow())
461 HWND hwndTop = msg->hwnd;
464 if ((GetWindowLongW( hwndTop, GWL_STYLE ) & (WS_POPUP|WS_CHILD)) != WS_CHILD) break;
465 hwndTop = GetParent( hwndTop );
468 if (hwndTop && hwndTop != GetDesktopWindow())
470 LONG ret = SendMessageA( msg->hwnd, WM_MOUSEACTIVATE, (WPARAM)hwndTop,
471 MAKELONG( hittest, raw_message ) );
474 case MA_NOACTIVATEANDEAT:
479 case MA_ACTIVATEANDEAT:
484 if (!FOCUS_MouseActivate( hwndTop )) eatMsg = TRUE;
487 WARN( "unknown WM_MOUSEACTIVATE code %ld\n", ret );
494 /* send the WM_SETCURSOR message */
496 /* Windows sends the normal mouse message as the message parameter
497 in the WM_SETCURSOR message even if it's non-client mouse message */
498 SendMessageA( msg->hwnd, WM_SETCURSOR, (WPARAM)msg->hwnd,
499 MAKELONG( hittest, raw_message ));
505 /***********************************************************************
506 * MSG_process_raw_hardware_message
508 * returns TRUE if the contents of 'msg' should be passed to the application
510 BOOL MSG_process_raw_hardware_message( MSG *msg, ULONG_PTR extra_info, HWND hwnd_filter,
511 UINT first, UINT last, BOOL remove )
513 if (is_keyboard_message( msg->message ))
515 process_raw_keyboard_message( msg );
517 else if (is_mouse_message( msg->message ))
519 process_raw_mouse_message( msg, remove );
523 ERR( "unknown message type %x\n", msg->message );
526 return check_message_filter( msg, hwnd_filter, first, last );
530 /***********************************************************************
531 * MSG_process_cooked_hardware_message
533 * returns TRUE if the contents of 'msg' should be passed to the application
535 BOOL MSG_process_cooked_hardware_message( MSG *msg, ULONG_PTR extra_info, BOOL remove )
537 if (is_keyboard_message( msg->message ))
538 return process_cooked_keyboard_message( msg, remove );
540 if (is_mouse_message( msg->message ))
541 return process_cooked_mouse_message( msg, extra_info, remove );
543 ERR( "unknown message type %x\n", msg->message );
548 /***********************************************************************
549 * WaitMessage (USER.112) Suspend thread pending messages
550 * WaitMessage (USER32.@) Suspend thread pending messages
552 * WaitMessage() suspends a thread until events appear in the thread's
555 BOOL WINAPI WaitMessage(void)
557 return (MsgWaitForMultipleObjectsEx( 0, NULL, INFINITE, QS_ALLINPUT, 0 ) != WAIT_FAILED);
561 /***********************************************************************
562 * MsgWaitForMultipleObjectsEx (USER32.@)
564 DWORD WINAPI MsgWaitForMultipleObjectsEx( DWORD count, CONST HANDLE *pHandles,
565 DWORD timeout, DWORD mask, DWORD flags )
567 HANDLE handles[MAXIMUM_WAIT_OBJECTS];
569 MESSAGEQUEUE *msgQueue;
571 if (count > MAXIMUM_WAIT_OBJECTS-1)
573 SetLastError( ERROR_INVALID_PARAMETER );
577 if (!(msgQueue = QUEUE_Current())) return WAIT_FAILED;
579 /* set the queue mask */
580 SERVER_START_REQ( set_queue_mask )
582 req->wake_mask = (flags & MWMO_INPUTAVAILABLE) ? mask : 0;
583 req->changed_mask = mask;
585 wine_server_call( req );
589 /* Add the thread event to the handle list */
590 for (i = 0; i < count; i++) handles[i] = pHandles[i];
591 handles[count] = msgQueue->server_queue;
593 ReleaseThunkLock( &lock );
594 if (USER_Driver.pMsgWaitForMultipleObjectsEx)
596 ret = USER_Driver.pMsgWaitForMultipleObjectsEx( count+1, handles, timeout, mask, flags );
597 if (ret == count+1) ret = count; /* pretend the msg queue is ready */
600 ret = WaitForMultipleObjectsEx( count+1, handles, flags & MWMO_WAITALL,
601 timeout, flags & MWMO_ALERTABLE );
602 if (lock) RestoreThunkLock( lock );
607 /***********************************************************************
608 * MsgWaitForMultipleObjects (USER32.@)
610 DWORD WINAPI MsgWaitForMultipleObjects( DWORD count, CONST HANDLE *handles,
611 BOOL wait_all, DWORD timeout, DWORD mask )
613 return MsgWaitForMultipleObjectsEx( count, handles, timeout, mask,
614 wait_all ? MWMO_WAITALL : 0 );
618 /***********************************************************************
619 * WaitForInputIdle (USER32.@)
621 DWORD WINAPI WaitForInputIdle( HANDLE hProcess, DWORD dwTimeOut )
623 DWORD start_time, elapsed, ret;
624 HANDLE idle_event = (HANDLE)-1;
626 SERVER_START_REQ( wait_input_idle )
628 req->handle = hProcess;
629 req->timeout = dwTimeOut;
630 if (!(ret = wine_server_call_err( req ))) idle_event = reply->event;
633 if (ret) return WAIT_FAILED; /* error */
634 if (!idle_event) return 0; /* no event to wait on */
636 start_time = GetTickCount();
639 TRACE("waiting for %p\n", idle_event );
642 ret = MsgWaitForMultipleObjects ( 1, &idle_event, FALSE, dwTimeOut - elapsed, QS_SENDMESSAGE );
645 case WAIT_OBJECT_0+1:
646 process_sent_messages();
650 TRACE("timeout or error\n");
656 if (dwTimeOut != INFINITE)
658 elapsed = GetTickCount() - start_time;
659 if (elapsed > dwTimeOut)
669 /***********************************************************************
670 * UserYield (USER.332)
672 void WINAPI UserYield16(void)
676 /* Handle sent messages */
677 process_sent_messages();
680 ReleaseThunkLock(&count);
683 RestoreThunkLock(count);
684 /* Handle sent messages again */
685 process_sent_messages();
690 /***********************************************************************
691 * RegisterWindowMessage (USER.118)
692 * RegisterWindowMessageA (USER32.@)
694 WORD WINAPI RegisterWindowMessageA( LPCSTR str )
697 return GlobalAddAtomA( str );
701 /***********************************************************************
702 * RegisterWindowMessageW (USER32.@)
704 WORD WINAPI RegisterWindowMessageW( LPCWSTR str )
707 return GlobalAddAtomW( str );
711 /***********************************************************************
712 * BroadcastSystemMessage (USER32.@)
713 * BroadcastSystemMessageA (USER32.@)
715 LONG WINAPI BroadcastSystemMessageA(
716 DWORD dwFlags,LPDWORD recipients,UINT uMessage,WPARAM wParam,
719 if ((*recipients & BSM_APPLICATIONS)||
720 (*recipients == BSM_ALLCOMPONENTS))
722 FIXME("(%08lx,%08lx,%08x,%08x,%08lx): semi-stub!\n",
723 dwFlags,*recipients,uMessage,wParam,lParam);
724 PostMessageA(HWND_BROADCAST,uMessage,wParam,lParam);
729 FIXME("(%08lx,%08lx,%08x,%08x,%08lx): stub!\n",
730 dwFlags,*recipients,uMessage,wParam,lParam);
735 /***********************************************************************
736 * BroadcastSystemMessageW (USER32.@)
738 LONG WINAPI BroadcastSystemMessageW(
739 DWORD dwFlags,LPDWORD recipients,UINT uMessage,WPARAM wParam,
742 if ((*recipients & BSM_APPLICATIONS)||
743 (*recipients == BSM_ALLCOMPONENTS))
745 FIXME("(%08lx,%08lx,%08x,%08x,%08lx): semi-stub!\n",
746 dwFlags,*recipients,uMessage,wParam,lParam);
747 PostMessageW(HWND_BROADCAST,uMessage,wParam,lParam);
752 FIXME("(%08lx,%08lx,%08x,%08x,%08lx): stub!\n",
753 dwFlags,*recipients,uMessage,wParam,lParam);