2 * Message queues related functions
4 * Copyright 1993, 1994 Alexandre Julliard
11 #include <sys/types.h>
16 #include "sysmetrics.h"
28 /* #define DEBUG_MSG */
31 #define WM_NCMOUSEFIRST WM_NCMOUSEMOVE
32 #define WM_NCMOUSELAST WM_NCMBUTTONDBLCLK
34 typedef enum { SYSQ_MSG_ABANDON
, SYSQ_MSG_SKIP
,
35 SYSQ_MSG_ACCEPT
, SYSQ_MSG_CONTINUE
} SYSQ_STATUS
;
37 extern MESSAGEQUEUE
*pCursorQueue
; /* queue.c */
38 extern MESSAGEQUEUE
*pActiveQueue
;
40 extern void JoySendMessages(void);
42 DWORD MSG_WineStartTicks
; /* Ticks at Wine startup */
44 static UINT32 doubleClickSpeed
= 452;
45 static INT32 debugSMRL
= 0; /* intertask SendMessage() recursion level */
47 /***********************************************************************
50 BOOL32
MSG_CheckFilter(WORD uMsg
, DWORD filter
)
53 return (uMsg
>= LOWORD(filter
) && uMsg
<= HIWORD(filter
));
57 /***********************************************************************
58 * MSG_TranslateMouseMsg
60 * Translate an mouse hardware event into a real mouse message.
61 * Return value indicates whether the translated message must be passed
62 * to the user, left in the queue, or skipped entirely (in this case
63 * HIWORD contains hit test code).
65 static DWORD
MSG_TranslateMouseMsg( HWND16 hTopWnd
, DWORD filter
,
66 MSG16
*msg
, BOOL32 remove
, WND
* pWndScope
)
68 static DWORD dblclk_time_limit
= 0;
69 static UINT16 clk_message
= 0;
70 static HWND16 clk_hwnd
= 0;
71 static POINT16 clk_pos
= { 0, 0 };
75 INT16 ht
, hittest
, sendSC
= 0;
76 UINT16 message
= msg
->message
;
77 POINT16 screen_pt
, pt
;
78 HANDLE16 hQ
= GetTaskQueue(0);
79 MESSAGEQUEUE
*queue
= (MESSAGEQUEUE
*)GlobalLock16(hQ
);
80 BOOL32 eatMsg
= FALSE
;
81 BOOL32 mouseClick
= ((message
== WM_LBUTTONDOWN
) ||
82 (message
== WM_RBUTTONDOWN
) ||
83 (message
== WM_MBUTTONDOWN
))?1:0;
88 ht
= hittest
= HTCLIENT
;
89 hWnd
= GetCapture16();
92 ht
= hittest
= WINPOS_WindowFromPoint( pWndScope
, msg
->pt
, &pWnd
);
93 if( !pWnd
) pWnd
= WIN_GetDesktop();
94 hWnd
= pWnd
->hwndSelf
;
99 pWnd
= WIN_FindWndPtr(hWnd
);
100 ht
= EVENT_GetCaptureInfo();
103 /* stop if not the right queue */
105 if (pWnd
->hmemTaskQ
!= hQ
)
107 /* Not for the current task */
108 if (queue
) QUEUE_ClearWakeBit( queue
, QS_MOUSE
);
109 /* Wake up the other task */
110 queue
= (MESSAGEQUEUE
*)GlobalLock16( pWnd
->hmemTaskQ
);
111 if (queue
) QUEUE_SetWakeBit( queue
, QS_MOUSE
);
112 return SYSQ_MSG_ABANDON
;
115 /* check if hWnd is within hWndScope */
117 if( hTopWnd
&& hWnd
!= hTopWnd
)
118 if( !IsChild16(hTopWnd
, hWnd
) ) return SYSQ_MSG_CONTINUE
;
122 /* translate double clicks -
123 * note that ...MOUSEMOVEs can slip in between
124 * ...BUTTONDOWN and ...BUTTONDBLCLK messages */
126 if( pWnd
->class->style
& CS_DBLCLKS
|| ht
!= HTCLIENT
)
128 if ((message
== clk_message
) && (hWnd
== clk_hwnd
) &&
129 (msg
->time
- dblclk_time_limit
< doubleClickSpeed
) &&
130 (abs(msg
->pt
.x
- clk_pos
.x
) < SYSMETRICS_CXDOUBLECLK
/2) &&
131 (abs(msg
->pt
.y
- clk_pos
.y
) < SYSMETRICS_CYDOUBLECLK
/2))
133 message
+= (WM_LBUTTONDBLCLK
- WM_LBUTTONDOWN
);
134 mouseClick
++; /* == 2 */
138 screen_pt
= pt
= msg
->pt
;
140 if (hittest
!= HTCLIENT
)
142 message
+= ((INT16
)WM_NCMOUSEMOVE
- WM_MOUSEMOVE
);
143 msg
->wParam
= hittest
;
145 else ScreenToClient16( hWnd
, &pt
);
147 /* check message filter */
149 if (!MSG_CheckFilter(message
, filter
)) return SYSQ_MSG_CONTINUE
;
151 pCursorQueue
= queue
;
155 if (HOOK_IsHooked( WH_MOUSE
))
157 MOUSEHOOKSTRUCT16
*hook
= SEGPTR_NEW(MOUSEHOOKSTRUCT16
);
160 hook
->pt
= screen_pt
;
162 hook
->wHitTestCode
= hittest
;
163 hook
->dwExtraInfo
= 0;
164 ret
= HOOK_CallHooks16( WH_MOUSE
, remove
? HC_ACTION
: HC_NOREMOVE
,
165 message
, (LPARAM
)SEGPTR_GET(hook
) );
168 if( ret
) return MAKELONG((INT16
)SYSQ_MSG_SKIP
, hittest
);
171 if ((hittest
== HTERROR
) || (hittest
== HTNOWHERE
))
173 else if( remove
&& mouseClick
)
175 HWND32 hwndTop
= WIN_GetTopParent( hWnd
);
177 if( mouseClick
== 1 )
180 dblclk_time_limit
= msg
->time
;
181 clk_message
= msg
->message
;
185 /* got double click - zero them out */
186 dblclk_time_limit
= clk_hwnd
= 0;
190 /* Send the WM_PARENTNOTIFY,
191 * note that even for double/nonclient clicks
192 * notification message is still WM_L/M/RBUTTONDOWN.
195 WIN_SendParentNotify( hWnd
, msg
->message
, 0,
196 MAKELPARAM( screen_pt
.x
, screen_pt
.y
) );
198 /* Activate the window if needed */
200 if (hWnd
!= GetActiveWindow16() && hWnd
!= GetDesktopWindow16())
202 LONG ret
= SendMessage16( hWnd
, WM_MOUSEACTIVATE
, hwndTop
,
203 MAKELONG( hittest
, message
) );
205 if ((ret
== MA_ACTIVATEANDEAT
) || (ret
== MA_NOACTIVATEANDEAT
))
208 if (((ret
== MA_ACTIVATE
) || (ret
== MA_ACTIVATEANDEAT
))
209 && hwndTop
!= GetActiveWindow16() )
210 if (!WINPOS_SetActiveWindow( hwndTop
, TRUE
, TRUE
))
214 } else sendSC
= (remove
&& sendSC
);
216 /* Send the WM_SETCURSOR message */
219 SendMessage16( hWnd
, WM_SETCURSOR
, (WPARAM16
)hWnd
,
220 MAKELONG( hittest
, message
));
221 if (eatMsg
) return MAKELONG( (UINT16
)SYSQ_MSG_SKIP
, hittest
);
224 msg
->message
= message
;
225 msg
->lParam
= MAKELONG( pt
.x
, pt
.y
);
226 return SYSQ_MSG_ACCEPT
;
230 /***********************************************************************
231 * MSG_TranslateKbdMsg
233 * Translate an keyboard hardware event into a real message.
235 static DWORD
MSG_TranslateKbdMsg( HWND16 hTopWnd
, DWORD filter
,
236 MSG16
*msg
, BOOL32 remove
)
238 WORD message
= msg
->message
;
239 HWND16 hWnd
= GetFocus16();
242 /* Should check Ctrl-Esc and PrintScreen here */
246 /* Send the message to the active window instead, */
247 /* translating messages to their WM_SYS equivalent */
249 hWnd
= GetActiveWindow16();
251 if( message
< WM_SYSKEYDOWN
)
252 message
+= WM_SYSKEYDOWN
- WM_KEYDOWN
;
254 pWnd
= WIN_FindWndPtr( hWnd
);
255 if (pWnd
&& (pWnd
->hmemTaskQ
!= GetTaskQueue(0)))
257 /* Not for the current task */
258 MESSAGEQUEUE
*queue
= (MESSAGEQUEUE
*)GlobalLock16( GetTaskQueue(0) );
259 if (queue
) QUEUE_ClearWakeBit( queue
, QS_KEY
);
260 /* Wake up the other task */
261 queue
= (MESSAGEQUEUE
*)GlobalLock16( pWnd
->hmemTaskQ
);
262 if (queue
) QUEUE_SetWakeBit( queue
, QS_KEY
);
263 return SYSQ_MSG_ABANDON
;
266 if (hTopWnd
&& hWnd
!= hTopWnd
)
267 if (!IsChild16(hTopWnd
, hWnd
)) return SYSQ_MSG_CONTINUE
;
268 if (!MSG_CheckFilter(message
, filter
)) return SYSQ_MSG_CONTINUE
;
271 msg
->message
= message
;
273 return (HOOK_CallHooks16( WH_KEYBOARD
, remove
? HC_ACTION
: HC_NOREMOVE
,
274 msg
->wParam
, msg
->lParam
)
275 ? SYSQ_MSG_SKIP
: SYSQ_MSG_ACCEPT
);
279 /***********************************************************************
280 * MSG_JournalRecordMsg
282 * Build an EVENTMSG structure and call JOURNALRECORD hook
284 static void MSG_JournalRecordMsg( MSG16
*msg
)
286 EVENTMSG16
*event
= SEGPTR_NEW(EVENTMSG16
);
288 event
->message
= msg
->message
;
289 event
->time
= msg
->time
;
290 if ((msg
->message
>= WM_KEYFIRST
) && (msg
->message
<= WM_KEYLAST
))
292 event
->paramL
= (msg
->wParam
& 0xFF) | (HIWORD(msg
->lParam
) << 8);
293 event
->paramH
= msg
->lParam
& 0x7FFF;
294 if (HIWORD(msg
->lParam
) & 0x0100)
295 event
->paramH
|= 0x8000; /* special_key - bit */
296 HOOK_CallHooks16( WH_JOURNALRECORD
, HC_ACTION
, 0,
297 (LPARAM
)SEGPTR_GET(event
) );
299 else if ((msg
->message
>= WM_MOUSEFIRST
) && (msg
->message
<= WM_MOUSELAST
))
301 event
->paramL
= LOWORD(msg
->lParam
); /* X pos */
302 event
->paramH
= HIWORD(msg
->lParam
); /* Y pos */
303 ClientToScreen16( msg
->hwnd
, (LPPOINT16
)&event
->paramL
);
304 HOOK_CallHooks16( WH_JOURNALRECORD
, HC_ACTION
, 0,
305 (LPARAM
)SEGPTR_GET(event
) );
307 else if ((msg
->message
>= WM_NCMOUSEFIRST
) &&
308 (msg
->message
<= WM_NCMOUSELAST
))
310 event
->paramL
= LOWORD(msg
->lParam
); /* X pos */
311 event
->paramH
= HIWORD(msg
->lParam
); /* Y pos */
312 event
->message
+= WM_MOUSEMOVE
-WM_NCMOUSEMOVE
;/* give no info about NC area */
313 HOOK_CallHooks16( WH_JOURNALRECORD
, HC_ACTION
, 0,
314 (LPARAM
)SEGPTR_GET(event
) );
319 /***********************************************************************
320 * MSG_JournalPlayBackMsg
322 * Get an EVENTMSG struct via call JOURNALPLAYBACK hook function
324 static int MSG_JournalPlayBackMsg(void)
328 WORD keyDown
,i
,wParam
,result
=0;
330 if ( HOOK_IsHooked( WH_JOURNALPLAYBACK
) )
332 tmpMsg
= SEGPTR_NEW(EVENTMSG16
);
333 wtime
=HOOK_CallHooks16( WH_JOURNALPLAYBACK
, HC_GETNEXT
, 0,
334 (LPARAM
)SEGPTR_GET(tmpMsg
));
335 /* dprintf_msg(stddeb,"Playback wait time =%ld\n",wtime); */
339 if ((tmpMsg
->message
>= WM_KEYFIRST
) && (tmpMsg
->message
<= WM_KEYLAST
))
341 wParam
=tmpMsg
->paramL
& 0xFF;
342 lParam
=MAKELONG(tmpMsg
->paramH
&0x7ffff,tmpMsg
->paramL
>>8);
343 if (tmpMsg
->message
== WM_KEYDOWN
|| tmpMsg
->message
== WM_SYSKEYDOWN
)
345 for (keyDown
=i
=0; i
<256 && !keyDown
; i
++)
346 if (InputKeyStateTable
[i
] & 0x80)
349 lParam
|= 0x40000000;
350 AsyncKeyStateTable
[wParam
]=InputKeyStateTable
[wParam
] |= 0x80;
352 else /* WM_KEYUP, WM_SYSKEYUP */
354 lParam
|= 0xC0000000;
355 AsyncKeyStateTable
[wParam
]=InputKeyStateTable
[wParam
] &= ~0x80;
357 if (InputKeyStateTable
[VK_MENU
] & 0x80)
358 lParam
|= 0x20000000;
359 if (tmpMsg
->paramH
& 0x8000) /*special_key bit*/
360 lParam
|= 0x01000000;
361 hardware_event( tmpMsg
->message
, wParam
, lParam
,0, 0, tmpMsg
->time
, 0 );
365 if ((tmpMsg
->message
>= WM_MOUSEFIRST
) && (tmpMsg
->message
<= WM_MOUSELAST
))
367 switch (tmpMsg
->message
)
369 case WM_LBUTTONDOWN
:MouseButtonsStates
[0]=AsyncMouseButtonsStates
[0]=1;break;
370 case WM_LBUTTONUP
: MouseButtonsStates
[0]=AsyncMouseButtonsStates
[0]=0;break;
371 case WM_MBUTTONDOWN
:MouseButtonsStates
[1]=AsyncMouseButtonsStates
[1]=1;break;
372 case WM_MBUTTONUP
: MouseButtonsStates
[1]=AsyncMouseButtonsStates
[1]=0;break;
373 case WM_RBUTTONDOWN
:MouseButtonsStates
[2]=AsyncMouseButtonsStates
[2]=1;break;
374 case WM_RBUTTONUP
: MouseButtonsStates
[2]=AsyncMouseButtonsStates
[2]=0;break;
376 AsyncKeyStateTable
[VK_LBUTTON
]= InputKeyStateTable
[VK_LBUTTON
] = MouseButtonsStates
[0] << 8;
377 AsyncKeyStateTable
[VK_MBUTTON
]= InputKeyStateTable
[VK_MBUTTON
] = MouseButtonsStates
[1] << 8;
378 AsyncKeyStateTable
[VK_RBUTTON
]= InputKeyStateTable
[VK_RBUTTON
] = MouseButtonsStates
[2] << 8;
379 SetCursorPos32(tmpMsg
->paramL
,tmpMsg
->paramH
);
380 lParam
=MAKELONG(tmpMsg
->paramL
,tmpMsg
->paramH
);
382 if (MouseButtonsStates
[0]) wParam
|= MK_LBUTTON
;
383 if (MouseButtonsStates
[1]) wParam
|= MK_MBUTTON
;
384 if (MouseButtonsStates
[2]) wParam
|= MK_RBUTTON
;
385 hardware_event( tmpMsg
->message
, wParam
, lParam
,
386 tmpMsg
->paramL
, tmpMsg
->paramH
, tmpMsg
->time
, 0 );
389 HOOK_CallHooks16( WH_JOURNALPLAYBACK
, HC_SKIP
, 0,
390 (LPARAM
)SEGPTR_GET(tmpMsg
));
394 if( tmpMsg
->message
== WM_QUEUESYNC
)
395 if (HOOK_IsHooked( WH_CBT
))
396 HOOK_CallHooks16( WH_CBT
, HCBT_QS
, 0, 0L);
398 result
= QS_MOUSE
| QS_KEY
; /* ? */
405 /***********************************************************************
406 * MSG_PeekHardwareMsg
408 * Peek for a hardware message matching the hwnd and message filters.
410 static BOOL32
MSG_PeekHardwareMsg( MSG16
*msg
, HWND16 hwnd
, DWORD filter
,
413 DWORD status
= SYSQ_MSG_ACCEPT
;
414 MESSAGEQUEUE
*sysMsgQueue
= QUEUE_GetSysQueue();
415 int i
, kbd_msg
, pos
= sysMsgQueue
->nextMessage
;
417 /* FIXME: there has to be a better way to do this */
420 /* If the queue is empty, attempt to fill it */
421 if (!sysMsgQueue
->msgCount
&& XPending(display
))
422 EVENT_WaitXEvent( FALSE
, FALSE
);
424 for (i
= kbd_msg
= 0; i
< sysMsgQueue
->msgCount
; i
++, pos
++)
426 if (pos
>= sysMsgQueue
->queueSize
) pos
= 0;
427 *msg
= sysMsgQueue
->messages
[pos
].msg
;
429 /* Translate message */
431 if ((msg
->message
>= WM_MOUSEFIRST
) && (msg
->message
<= WM_MOUSELAST
))
433 HWND32 hWndScope
= (HWND32
)sysMsgQueue
->messages
[pos
].extraInfo
;
435 status
= MSG_TranslateMouseMsg(hwnd
, filter
, msg
, remove
,
436 (Options
.managed
&& IsWindow32(hWndScope
) )
437 ? WIN_FindWndPtr(hWndScope
) : WIN_GetDesktop() );
440 else if ((msg
->message
>= WM_KEYFIRST
) && (msg
->message
<= WM_KEYLAST
))
442 status
= MSG_TranslateKbdMsg(hwnd
, filter
, msg
, remove
);
445 else /* Non-standard hardware event */
447 HARDWAREHOOKSTRUCT16
*hook
;
448 if ((hook
= SEGPTR_NEW(HARDWAREHOOKSTRUCT16
)))
451 hook
->hWnd
= msg
->hwnd
;
452 hook
->wMessage
= msg
->message
;
453 hook
->wParam
= msg
->wParam
;
454 hook
->lParam
= msg
->lParam
;
455 ret
= HOOK_CallHooks16( WH_HARDWARE
,
456 remove
? HC_ACTION
: HC_NOREMOVE
,
457 0, (LPARAM
)SEGPTR_GET(hook
) );
461 QUEUE_RemoveMsg( sysMsgQueue
, pos
);
464 status
= SYSQ_MSG_ACCEPT
;
468 switch (LOWORD(status
))
470 case SYSQ_MSG_ACCEPT
:
474 if (HOOK_IsHooked( WH_CBT
))
476 HOOK_CallHooks16( WH_CBT
, HCBT_KEYSKIPPED
,
477 msg
->wParam
, msg
->lParam
);
480 MOUSEHOOKSTRUCT16
*hook
= SEGPTR_NEW(MOUSEHOOKSTRUCT16
);
484 hook
->hwnd
= msg
->hwnd
;
485 hook
->wHitTestCode
= HIWORD(status
);
486 hook
->dwExtraInfo
= 0;
487 HOOK_CallHooks16( WH_CBT
, HCBT_CLICKSKIPPED
,msg
->message
,
488 (LPARAM
)SEGPTR_GET(hook
) );
494 QUEUE_RemoveMsg( sysMsgQueue
, pos
);
497 case SYSQ_MSG_CONTINUE
:
500 case SYSQ_MSG_ABANDON
:
506 if (HOOK_IsHooked( WH_JOURNALRECORD
)) MSG_JournalRecordMsg( msg
);
507 QUEUE_RemoveMsg( sysMsgQueue
, pos
);
515 /**********************************************************************
516 * SetDoubleClickTime16 (USER.20)
518 void SetDoubleClickTime16( UINT16 interval
)
520 SetDoubleClickTime32( interval
);
524 /**********************************************************************
525 * SetDoubleClickTime32 (USER32.479)
527 BOOL32
SetDoubleClickTime32( UINT32 interval
)
529 doubleClickSpeed
= interval
? interval
: 500;
534 /**********************************************************************
535 * GetDoubleClickTime16 (USER.21)
537 UINT16
GetDoubleClickTime16(void)
539 return doubleClickSpeed
;
543 /**********************************************************************
544 * GetDoubleClickTime32 (USER32.238)
546 UINT32
GetDoubleClickTime32(void)
548 return doubleClickSpeed
;
552 /***********************************************************************
555 * Implementation of an inter-task SendMessage.
557 static LRESULT
MSG_SendMessage( HQUEUE16 hDestQueue
, HWND16 hwnd
, UINT16 msg
,
558 WPARAM32 wParam
, LPARAM lParam
, WORD flags
)
560 INT32 prevSMRL
= debugSMRL
;
561 QSMCTRL qCtrl
= { 0, 1};
562 MESSAGEQUEUE
*queue
, *destQ
;
564 if (!(queue
= (MESSAGEQUEUE
*)GlobalLock16( GetTaskQueue(0) ))) return 0;
565 if (!(destQ
= (MESSAGEQUEUE
*)GlobalLock16( hDestQueue
))) return 0;
567 if (IsTaskLocked() || !IsWindow32(hwnd
)) return 0;
570 dprintf_sendmsg(stddeb
,"%*sSM: %s [%04x] (%04x -> %04x)\n",
571 prevSMRL
, "", SPY_GetMsgName(msg
), msg
, queue
->self
, hDestQueue
);
573 if( !(queue
->wakeBits
& QS_SMPARAMSFREE
) )
575 dprintf_sendmsg(stddeb
,"\tIntertask SendMessage: sleeping since unreplied SendMessage pending\n");
576 queue
->changeBits
&= ~QS_SMPARAMSFREE
;
577 QUEUE_WaitBits( QS_SMPARAMSFREE
);
584 queue
->wParam
= LOWORD(wParam
);
585 queue
->wParamHigh
= HIWORD(wParam
);
586 queue
->lParam
= lParam
;
587 queue
->hPrevSendingTask
= destQ
->hSendingTask
;
588 destQ
->hSendingTask
= GetTaskQueue(0);
590 queue
->wakeBits
&= ~QS_SMPARAMSFREE
;
591 queue
->flags
= (queue
->flags
& ~(QUEUE_SM_WIN32
|QUEUE_SM_UNICODE
)) | flags
;
593 dprintf_sendmsg(stddeb
,"%*ssm: smResultInit = %08x\n", prevSMRL
, "", (unsigned)&qCtrl
);
595 queue
->smResultInit
= &qCtrl
;
597 QUEUE_SetWakeBit( destQ
, QS_SENDMESSAGE
);
599 /* perform task switch and wait for the result */
601 while( qCtrl
.bPending
)
603 if (!(queue
->wakeBits
& QS_SMRESULT
))
605 queue
->changeBits
&= ~QS_SMRESULT
;
606 DirectedYield( destQ
->hTask
);
607 QUEUE_WaitBits( QS_SMRESULT
);
608 dprintf_sendmsg(stddeb
,"\tsm: have result!\n");
612 dprintf_sendmsg(stddeb
,"%*ssm: smResult = %08x\n", prevSMRL
, "", (unsigned)queue
->smResult
);
614 if (queue
->smResult
) { /* FIXME, smResult should always be set */
615 queue
->smResult
->lResult
= queue
->SendMessageReturn
;
616 queue
->smResult
->bPending
= FALSE
;
618 queue
->wakeBits
&= ~QS_SMRESULT
;
620 if( queue
->smResult
!= &qCtrl
)
621 dprintf_sendmsg(stddeb
,"%*ssm: weird scenes inside the goldmine!\n", prevSMRL
, "");
623 queue
->smResultInit
= NULL
;
625 dprintf_sendmsg(stddeb
,"%*sSM: [%04x] returning %08lx\n", prevSMRL
, "", msg
, qCtrl
.lResult
);
628 return qCtrl
.lResult
;
632 /***********************************************************************
633 * ReplyMessage16 (USER.115)
635 void ReplyMessage16( LRESULT result
)
637 MESSAGEQUEUE
*senderQ
;
640 if (!(queue
= (MESSAGEQUEUE
*)GlobalLock16( GetTaskQueue(0) ))) return;
642 dprintf_msg(stddeb
,"ReplyMessage, queue %04x\n", queue
->self
);
644 while( (senderQ
= (MESSAGEQUEUE
*)GlobalLock16( queue
->InSendMessageHandle
)))
646 dprintf_msg(stddeb
,"\trpm: replying to %04x (%04x -> %04x)\n",
647 queue
->msg
, queue
->self
, senderQ
->self
);
649 if( queue
->wakeBits
& QS_SENDMESSAGE
)
651 QUEUE_ReceiveMessage( queue
);
652 continue; /* ReceiveMessage() already called us */
655 if(!(senderQ
->wakeBits
& QS_SMRESULT
) ) break;
658 if( !senderQ
) { dprintf_msg(stddeb
,"\trpm: done\n"); return; }
660 senderQ
->SendMessageReturn
= result
;
661 dprintf_msg(stddeb
,"\trpm: smResult = %08x, result = %08lx\n",
662 (unsigned)queue
->smResultCurrent
, result
);
664 senderQ
->smResult
= queue
->smResultCurrent
;
665 queue
->InSendMessageHandle
= 0;
667 QUEUE_SetWakeBit( senderQ
, QS_SMRESULT
);
668 DirectedYield( queue
->hSendingTask
);
672 /***********************************************************************
675 static BOOL32
MSG_PeekMessage( LPMSG16 msg
, HWND16 hwnd
, WORD first
, WORD last
,
676 WORD flags
, BOOL32 peek
)
679 MESSAGEQUEUE
*msgQueue
;
683 DDE_TestDDE(hwnd
); /* do we have dde handling in the window ?*/
684 DDE_GetRemoteMessage();
685 #endif /* CONFIG_IPC */
687 mask
= QS_POSTMESSAGE
| QS_SENDMESSAGE
; /* Always selected */
690 if ((first
<= WM_KEYLAST
) && (last
>= WM_KEYFIRST
)) mask
|= QS_KEY
;
691 if ( ((first
<= WM_MOUSELAST
) && (last
>= WM_MOUSEFIRST
)) ||
692 ((first
<= WM_NCMOUSELAST
) && (last
>= WM_NCMOUSEFIRST
)) ) mask
|= QS_MOUSE
;
693 if ((first
<= WM_TIMER
) && (last
>= WM_TIMER
)) mask
|= QS_TIMER
;
694 if ((first
<= WM_SYSTIMER
) && (last
>= WM_SYSTIMER
)) mask
|= QS_TIMER
;
695 if ((first
<= WM_PAINT
) && (last
>= WM_PAINT
)) mask
|= QS_PAINT
;
697 else mask
|= QS_MOUSE
| QS_KEY
| QS_TIMER
| QS_PAINT
;
699 if (IsTaskLocked()) flags
|= PM_NOYIELD
;
703 hQueue
= GetTaskQueue(0);
704 msgQueue
= (MESSAGEQUEUE
*)GlobalLock16( hQueue
);
705 if (!msgQueue
) return FALSE
;
706 msgQueue
->changeBits
= 0;
708 /* First handle a message put by SendMessage() */
710 while (msgQueue
->wakeBits
& QS_SENDMESSAGE
)
711 QUEUE_ReceiveMessage( msgQueue
);
713 /* Now handle a WM_QUIT message */
715 if (msgQueue
->wPostQMsg
&&
716 (!first
|| WM_QUIT
>= first
) &&
717 (!last
|| WM_QUIT
<= last
) )
720 msg
->message
= WM_QUIT
;
721 msg
->wParam
= msgQueue
->wExitCode
;
723 if (flags
& PM_REMOVE
) msgQueue
->wPostQMsg
= 0;
727 /* Now find a normal message */
729 if (((msgQueue
->wakeBits
& mask
) & QS_POSTMESSAGE
) &&
730 ((pos
= QUEUE_FindMsg( msgQueue
, hwnd
, first
, last
)) != -1))
732 QMSG
*qmsg
= &msgQueue
->messages
[pos
];
734 msgQueue
->GetMessageTimeVal
= msg
->time
;
735 msgQueue
->GetMessagePosVal
= *(DWORD
*)&msg
->pt
;
736 msgQueue
->GetMessageExtraInfoVal
= qmsg
->extraInfo
;
738 if (flags
& PM_REMOVE
) QUEUE_RemoveMsg( msgQueue
, pos
);
742 msgQueue
->changeBits
|= MSG_JournalPlayBackMsg();
744 /* Now find a hardware event */
746 if (((msgQueue
->wakeBits
& mask
) & (QS_MOUSE
| QS_KEY
)) &&
747 MSG_PeekHardwareMsg( msg
, hwnd
, MAKELONG(first
,last
), flags
& PM_REMOVE
))
750 msgQueue
->GetMessageTimeVal
= msg
->time
;
751 msgQueue
->GetMessagePosVal
= *(DWORD
*)&msg
->pt
;
752 msgQueue
->GetMessageExtraInfoVal
= 0; /* Always 0 for now */
756 /* Check again for SendMessage */
758 while (msgQueue
->wakeBits
& QS_SENDMESSAGE
)
759 QUEUE_ReceiveMessage( msgQueue
);
761 /* Now find a WM_PAINT message */
763 if ((msgQueue
->wakeBits
& mask
) & QS_PAINT
)
766 msg
->hwnd
= WIN_FindWinToRepaint( hwnd
, hQueue
);
767 msg
->message
= WM_PAINT
;
771 if ((wndPtr
= WIN_FindWndPtr(msg
->hwnd
)))
773 if( wndPtr
->dwStyle
& WS_MINIMIZE
&&
774 wndPtr
->class->hIcon
)
776 msg
->message
= WM_PAINTICON
;
780 if( !hwnd
|| msg
->hwnd
== hwnd
|| IsChild16(hwnd
,msg
->hwnd
) )
782 if( wndPtr
->flags
& WIN_INTERNAL_PAINT
&& !wndPtr
->hrgnUpdate
)
784 wndPtr
->flags
&= ~WIN_INTERNAL_PAINT
;
785 QUEUE_DecPaintCount( hQueue
);
792 /* Check for timer messages, but yield first */
794 if (!(flags
& PM_NOYIELD
))
797 while (msgQueue
->wakeBits
& QS_SENDMESSAGE
)
798 QUEUE_ReceiveMessage( msgQueue
);
800 if ((msgQueue
->wakeBits
& mask
) & QS_TIMER
)
802 if (TIMER_GetTimerMsg(msg
, hwnd
, hQueue
, flags
& PM_REMOVE
)) break;
807 if (!(flags
& PM_NOYIELD
)) UserYield();
810 msgQueue
->wakeMask
= mask
;
811 QUEUE_WaitBits( mask
);
814 /* We got a message */
815 if (flags
& PM_REMOVE
)
817 WORD message
= msg
->message
;
819 if (message
== WM_KEYDOWN
|| message
== WM_SYSKEYDOWN
)
821 BYTE
*p
= &QueueKeyStateTable
[msg
->wParam
& 0xff];
827 else if (message
== WM_KEYUP
|| message
== WM_SYSKEYUP
)
828 QueueKeyStateTable
[msg
->wParam
& 0xff] &= ~0x80;
830 if (peek
) return TRUE
;
831 else return (msg
->message
!= WM_QUIT
);
835 /***********************************************************************
836 * MSG_InternalGetMessage
838 * GetMessage() function for internal use. Behave like GetMessage(),
839 * but also call message filters and optionally send WM_ENTERIDLE messages.
840 * 'hwnd' must be the handle of the dialog or menu window.
841 * 'code' is the message filter value (MSGF_??? codes).
843 BOOL32
MSG_InternalGetMessage( MSG16
*msg
, HWND32 hwnd
, HWND32 hwndOwner
,
844 WPARAM32 code
, WORD flags
, BOOL32 sendIdle
)
850 if (!MSG_PeekMessage( msg
, 0, 0, 0, flags
, TRUE
))
852 /* No message present -> send ENTERIDLE and wait */
853 if (IsWindow32(hwndOwner
))
854 SendMessage16( hwndOwner
, WM_ENTERIDLE
,
855 code
, (LPARAM
)hwnd
);
856 MSG_PeekMessage( msg
, 0, 0, 0, flags
, FALSE
);
859 else /* Always wait for a message */
860 MSG_PeekMessage( msg
, 0, 0, 0, flags
, FALSE
);
862 /* Call message filters */
864 if (HOOK_IsHooked( WH_SYSMSGFILTER
) || HOOK_IsHooked( WH_MSGFILTER
))
866 MSG16
*pmsg
= SEGPTR_NEW(MSG16
);
871 ret
= ((BOOL16
)HOOK_CallHooks16( WH_SYSMSGFILTER
, code
, 0,
872 (LPARAM
)SEGPTR_GET(pmsg
) ) ||
873 (BOOL16
)HOOK_CallHooks16( WH_MSGFILTER
, code
, 0,
874 (LPARAM
)SEGPTR_GET(pmsg
) ));
878 /* Message filtered -> remove it from the queue */
879 /* if it's still there. */
880 if (!(flags
& PM_REMOVE
))
881 MSG_PeekMessage( msg
, 0, 0, 0, PM_REMOVE
, TRUE
);
887 return (msg
->message
!= WM_QUIT
);
892 /***********************************************************************
893 * PeekMessage16 (USER.109)
895 BOOL16
PeekMessage16( LPMSG16 msg
, HWND16 hwnd
, UINT16 first
,
896 UINT16 last
, UINT16 flags
)
898 return MSG_PeekMessage( msg
, hwnd
, first
, last
, flags
, TRUE
);
902 /***********************************************************************
903 * GetMessage16 (USER.108)
905 BOOL16
GetMessage16( SEGPTR msg
, HWND16 hwnd
, UINT16 first
, UINT16 last
)
907 MSG16
*lpmsg
= (MSG16
*)PTR_SEG_TO_LIN(msg
);
908 MSG_PeekMessage( lpmsg
,
909 hwnd
, first
, last
, PM_REMOVE
, FALSE
);
911 dprintf_msg(stddeb
,"message %04x, hwnd %04x, filter(%04x - %04x)\n", lpmsg
->message
,
913 HOOK_CallHooks16( WH_GETMESSAGE
, HC_ACTION
, 0, (LPARAM
)msg
);
914 return (lpmsg
->message
!= WM_QUIT
);
918 /***********************************************************************
919 * PostMessage16 (USER.110)
921 BOOL16
PostMessage16( HWND16 hwnd
, UINT16 message
, WPARAM16 wParam
,
928 msg
.message
= message
;
931 msg
.time
= GetTickCount();
936 if (DDE_PostMessage(&msg
))
938 #endif /* CONFIG_IPC */
940 if (hwnd
== HWND_BROADCAST
)
942 dprintf_msg(stddeb
,"PostMessage // HWND_BROADCAST !\n");
943 for (wndPtr
= WIN_GetDesktop()->child
; wndPtr
; wndPtr
= wndPtr
->next
)
945 if (wndPtr
->dwStyle
& WS_POPUP
|| wndPtr
->dwStyle
& WS_CAPTION
)
947 dprintf_msg(stddeb
,"BROADCAST Message to hWnd=%04x m=%04X w=%04X l=%08lX !\n",
948 wndPtr
->hwndSelf
, message
, wParam
, lParam
);
949 PostMessage16( wndPtr
->hwndSelf
, message
, wParam
, lParam
);
952 dprintf_msg(stddeb
,"PostMessage // End of HWND_BROADCAST !\n");
956 wndPtr
= WIN_FindWndPtr( hwnd
);
957 if (!wndPtr
|| !wndPtr
->hmemTaskQ
) return FALSE
;
959 return QUEUE_AddMsg( wndPtr
->hmemTaskQ
, &msg
, 0 );
963 /***********************************************************************
964 * PostMessage32A (USER32.418)
966 BOOL32
PostMessage32A( HWND32 hwnd
, UINT32 message
, WPARAM32 wParam
,
970 return PostMessage16( hwnd
, message
, wParam
, lParam
);
974 /***********************************************************************
975 * PostMessage32W (USER32.419)
977 BOOL32
PostMessage32W( HWND32 hwnd
, UINT32 message
, WPARAM32 wParam
,
981 return PostMessage16( hwnd
, message
, wParam
, lParam
);
985 /***********************************************************************
986 * PostAppMessage16 (USER.116)
988 BOOL16
PostAppMessage16( HTASK16 hTask
, UINT16 message
, WPARAM16 wParam
,
993 if (GetTaskQueue(hTask
) == 0) return FALSE
;
995 msg
.message
= message
;
998 msg
.time
= GetTickCount();
1002 return QUEUE_AddMsg( GetTaskQueue(hTask
), &msg
, 0 );
1006 /***********************************************************************
1007 * SendMessage16 (USER.111)
1009 LRESULT
SendMessage16( HWND16 hwnd
, UINT16 msg
, WPARAM16 wParam
, LPARAM lParam
)
1012 WND
**list
, **ppWnd
;
1016 MSG16 DDE_msg
= { hwnd
, msg
, wParam
, lParam
};
1017 if (DDE_SendMessage(&DDE_msg
)) return TRUE
;
1018 #endif /* CONFIG_IPC */
1020 if (hwnd
== HWND_BROADCAST
)
1022 if (!(list
= WIN_BuildWinArray( WIN_GetDesktop(), 0, NULL
)))
1024 dprintf_msg(stddeb
,"SendMessage // HWND_BROADCAST !\n");
1025 for (ppWnd
= list
; *ppWnd
; ppWnd
++)
1028 if (!IsWindow32(wndPtr
->hwndSelf
)) continue;
1029 if (wndPtr
->dwStyle
& WS_POPUP
|| wndPtr
->dwStyle
& WS_CAPTION
)
1031 dprintf_msg(stddeb
,"BROADCAST Message to hWnd=%04x m=%04X w=%04lX l=%08lX !\n",
1032 wndPtr
->hwndSelf
, msg
, (DWORD
)wParam
, lParam
);
1033 SendMessage16( wndPtr
->hwndSelf
, msg
, wParam
, lParam
);
1036 HeapFree( SystemHeap
, 0, list
);
1037 dprintf_msg(stddeb
,"SendMessage // End of HWND_BROADCAST !\n");
1041 if (HOOK_IsHooked( WH_CALLWNDPROC
))
1045 if ((pmsg
= SEGPTR_NEW(CWPSTRUCT16
)))
1049 pmsg
->wParam
= wParam
;
1050 pmsg
->lParam
= lParam
;
1051 HOOK_CallHooks16( WH_CALLWNDPROC
, HC_ACTION
, 1,
1052 (LPARAM
)SEGPTR_GET(pmsg
) );
1054 msg
= pmsg
->message
;
1055 wParam
= pmsg
->wParam
;
1056 lParam
= pmsg
->lParam
;
1057 SEGPTR_FREE( pmsg
);
1061 if (!(wndPtr
= WIN_FindWndPtr( hwnd
)))
1063 fprintf( stderr
, "SendMessage16: invalid hwnd %04x\n", hwnd
);
1066 if (QUEUE_IsExitingQueue(wndPtr
->hmemTaskQ
))
1067 return 0; /* Don't send anything if the task is dying */
1069 SPY_EnterMessage( SPY_SENDMESSAGE16
, hwnd
, msg
, wParam
, lParam
);
1071 if (wndPtr
->hmemTaskQ
!= GetTaskQueue(0))
1072 ret
= MSG_SendMessage( wndPtr
->hmemTaskQ
, hwnd
, msg
,
1073 wParam
, lParam
, 0 );
1075 ret
= CallWindowProc16( (WNDPROC16
)wndPtr
->winproc
,
1076 hwnd
, msg
, wParam
, lParam
);
1078 SPY_ExitMessage( SPY_RESULT_OK16
, hwnd
, msg
, ret
);
1082 /************************************************************************
1083 * MSG_CallWndProcHook32
1085 static void MSG_CallWndProcHook32( LPMSG32 pmsg
, BOOL32 bUnicode
)
1089 cwp
.lParam
= pmsg
->lParam
;
1090 cwp
.wParam
= pmsg
->wParam
;
1091 cwp
.message
= pmsg
->message
;
1092 cwp
.hwnd
= pmsg
->hwnd
;
1094 if (bUnicode
) HOOK_CallHooks32W(WH_CALLWNDPROC
, HC_ACTION
, 1, (LPARAM
)&cwp
);
1095 else HOOK_CallHooks32A( WH_CALLWNDPROC
, HC_ACTION
, 1, (LPARAM
)&cwp
);
1097 pmsg
->lParam
= cwp
.lParam
;
1098 pmsg
->wParam
= cwp
.wParam
;
1099 pmsg
->message
= cwp
.message
;
1100 pmsg
->hwnd
= cwp
.hwnd
;
1103 /***********************************************************************
1104 * SendMessage32A (USER32.453)
1106 LRESULT
SendMessage32A(HWND32 hwnd
, UINT32 msg
, WPARAM32 wParam
, LPARAM lParam
)
1109 WND
**list
, **ppWnd
;
1112 if (hwnd
== HWND_BROADCAST
)
1114 if (!(list
= WIN_BuildWinArray( WIN_GetDesktop(), 0, NULL
)))
1116 for (ppWnd
= list
; *ppWnd
; ppWnd
++)
1119 if (!IsWindow32(wndPtr
->hwndSelf
)) continue;
1120 if (wndPtr
->dwStyle
& WS_POPUP
|| wndPtr
->dwStyle
& WS_CAPTION
)
1121 SendMessage32A( wndPtr
->hwndSelf
, msg
, wParam
, lParam
);
1123 HeapFree( SystemHeap
, 0, list
);
1127 if (HOOK_IsHooked( WH_CALLWNDPROC
))
1128 MSG_CallWndProcHook32( (LPMSG32
)&hwnd
, FALSE
);
1130 if (!(wndPtr
= WIN_FindWndPtr( hwnd
)))
1132 fprintf( stderr
, "SendMessage32A: invalid hwnd %08x\n", hwnd
);
1136 if (QUEUE_IsExitingQueue(wndPtr
->hmemTaskQ
))
1137 return 0; /* Don't send anything if the task is dying */
1139 SPY_EnterMessage( SPY_SENDMESSAGE32
, hwnd
, msg
, wParam
, lParam
);
1141 if (wndPtr
->hmemTaskQ
!= GetTaskQueue(0))
1142 ret
= MSG_SendMessage( wndPtr
->hmemTaskQ
, hwnd
, msg
, wParam
, lParam
,
1145 ret
= CallWindowProc32A( (WNDPROC32
)wndPtr
->winproc
,
1146 hwnd
, msg
, wParam
, lParam
);
1148 SPY_ExitMessage( SPY_RESULT_OK32
, hwnd
, msg
, ret
);
1153 /***********************************************************************
1154 * SendMessage32W (USER32.458)
1156 LRESULT
SendMessage32W(HWND32 hwnd
, UINT32 msg
, WPARAM32 wParam
, LPARAM lParam
)
1159 WND
**list
, **ppWnd
;
1162 if (hwnd
== HWND_BROADCAST
)
1164 if (!(list
= WIN_BuildWinArray( WIN_GetDesktop(), 0, NULL
)))
1166 for (ppWnd
= list
; *ppWnd
; ppWnd
++)
1169 if (!IsWindow32(wndPtr
->hwndSelf
)) continue;
1170 if (wndPtr
->dwStyle
& WS_POPUP
|| wndPtr
->dwStyle
& WS_CAPTION
)
1171 SendMessage32W( wndPtr
->hwndSelf
, msg
, wParam
, lParam
);
1173 HeapFree( SystemHeap
, 0, list
);
1177 if (HOOK_IsHooked( WH_CALLWNDPROC
))
1178 MSG_CallWndProcHook32( (LPMSG32
)&hwnd
, TRUE
);
1180 if (!(wndPtr
= WIN_FindWndPtr( hwnd
)))
1182 fprintf( stderr
, "SendMessage32W: invalid hwnd %08x\n", hwnd
);
1185 if (QUEUE_IsExitingQueue(wndPtr
->hmemTaskQ
))
1186 return 0; /* Don't send anything if the task is dying */
1188 SPY_EnterMessage( SPY_SENDMESSAGE32
, hwnd
, msg
, wParam
, lParam
);
1190 if (wndPtr
->hmemTaskQ
!= GetTaskQueue(0))
1191 ret
= MSG_SendMessage( wndPtr
->hmemTaskQ
, hwnd
, msg
, wParam
, lParam
,
1192 QUEUE_SM_WIN32
| QUEUE_SM_UNICODE
);
1194 ret
= CallWindowProc32W( (WNDPROC32
)wndPtr
->winproc
,
1195 hwnd
, msg
, wParam
, lParam
);
1197 SPY_ExitMessage( SPY_RESULT_OK32
, hwnd
, msg
, ret
);
1202 /***********************************************************************
1203 * WaitMessage (USER.112) (USER32.577)
1205 void WaitMessage( void )
1207 QUEUE_WaitBits( QS_ALLINPUT
);
1218 static const struct accent_char accent_chars
[] =
1220 /* A good idea should be to read /usr/X11/lib/X11/locale/iso8859-x/Compose */
1221 {'`', 'A', '\300'}, {'`', 'a', '\340'},
1222 {'\'', 'A', '\301'}, {'\'', 'a', '\341'},
1223 {'^', 'A', '\302'}, {'^', 'a', '\342'},
1224 {'~', 'A', '\303'}, {'~', 'a', '\343'},
1225 {'"', 'A', '\304'}, {'"', 'a', '\344'},
1226 {'O', 'A', '\305'}, {'o', 'a', '\345'},
1227 {'0', 'A', '\305'}, {'0', 'a', '\345'},
1228 {'A', 'A', '\305'}, {'a', 'a', '\345'},
1229 {'A', 'E', '\306'}, {'a', 'e', '\346'},
1230 {',', 'C', '\307'}, {',', 'c', '\347'},
1231 {'`', 'E', '\310'}, {'`', 'e', '\350'},
1232 {'\'', 'E', '\311'}, {'\'', 'e', '\351'},
1233 {'^', 'E', '\312'}, {'^', 'e', '\352'},
1234 {'"', 'E', '\313'}, {'"', 'e', '\353'},
1235 {'`', 'I', '\314'}, {'`', 'i', '\354'},
1236 {'\'', 'I', '\315'}, {'\'', 'i', '\355'},
1237 {'^', 'I', '\316'}, {'^', 'i', '\356'},
1238 {'"', 'I', '\317'}, {'"', 'i', '\357'},
1239 {'-', 'D', '\320'}, {'-', 'd', '\360'},
1240 {'~', 'N', '\321'}, {'~', 'n', '\361'},
1241 {'`', 'O', '\322'}, {'`', 'o', '\362'},
1242 {'\'', 'O', '\323'}, {'\'', 'o', '\363'},
1243 {'^', 'O', '\324'}, {'^', 'o', '\364'},
1244 {'~', 'O', '\325'}, {'~', 'o', '\365'},
1245 {'"', 'O', '\326'}, {'"', 'o', '\366'},
1246 {'/', 'O', '\330'}, {'/', 'o', '\370'},
1247 {'`', 'U', '\331'}, {'`', 'u', '\371'},
1248 {'\'', 'U', '\332'}, {'\'', 'u', '\372'},
1249 {'^', 'U', '\333'}, {'^', 'u', '\373'},
1250 {'"', 'U', '\334'}, {'"', 'u', '\374'},
1251 {'\'', 'Y', '\335'}, {'\'', 'y', '\375'},
1252 {'T', 'H', '\336'}, {'t', 'h', '\376'},
1253 {'s', 's', '\337'}, {'"', 'y', '\377'},
1254 {'s', 'z', '\337'}, {'i', 'j', '\377'},
1255 /* iso-8859-2 uses this */
1256 {'<', 'L', '\245'}, {'<', 'l', '\265'}, /* caron */
1257 {'<', 'S', '\251'}, {'<', 's', '\271'},
1258 {'<', 'T', '\253'}, {'<', 't', '\273'},
1259 {'<', 'Z', '\256'}, {'<', 'z', '\276'},
1260 {'<', 'C', '\310'}, {'<', 'c', '\350'},
1261 {'<', 'E', '\314'}, {'<', 'e', '\354'},
1262 {'<', 'D', '\317'}, {'<', 'd', '\357'},
1263 {'<', 'N', '\322'}, {'<', 'n', '\362'},
1264 {'<', 'R', '\330'}, {'<', 'r', '\370'},
1265 {';', 'A', '\241'}, {';', 'a', '\261'}, /* ogonek */
1266 {';', 'E', '\312'}, {';', 'e', '\332'},
1267 {'\'', 'Z', '\254'}, {'\'', 'z', '\274'}, /* acute */
1268 {'\'', 'R', '\300'}, {'\'', 'r', '\340'},
1269 {'\'', 'L', '\305'}, {'\'', 'l', '\345'},
1270 {'\'', 'C', '\306'}, {'\'', 'c', '\346'},
1271 {'\'', 'N', '\321'}, {'\'', 'n', '\361'},
1272 /* collision whith S, from iso-8859-9 !!! */
1273 {',', 'S', '\252'}, {',', 's', '\272'}, /* cedilla */
1274 {',', 'T', '\336'}, {',', 't', '\376'},
1275 {'.', 'Z', '\257'}, {'.', 'z', '\277'}, /* dot above */
1276 {'/', 'L', '\243'}, {'/', 'l', '\263'}, /* slash */
1277 {'/', 'D', '\320'}, {'/', 'd', '\360'},
1278 {'(', 'A', '\303'}, {'(', 'a', '\343'}, /* breve */
1279 {'\275', 'O', '\325'}, {'\275', 'o', '\365'}, /* double acute */
1280 {'\275', 'U', '\334'}, {'\275', 'u', '\374'},
1281 {'0', 'U', '\332'}, {'0', 'u', '\372'}, /* ring above */
1282 /* iso-8859-3 uses this */
1283 {'/', 'H', '\241'}, {'/', 'h', '\261'}, /* slash */
1284 {'>', 'H', '\246'}, {'>', 'h', '\266'}, /* circumflex */
1285 {'>', 'J', '\254'}, {'>', 'j', '\274'},
1286 {'>', 'C', '\306'}, {'>', 'c', '\346'},
1287 {'>', 'G', '\330'}, {'>', 'g', '\370'},
1288 {'>', 'S', '\336'}, {'>', 's', '\376'},
1289 /* collision whith G( from iso-8859-9 !!! */
1290 {'(', 'G', '\253'}, {'(', 'g', '\273'}, /* breve */
1291 {'(', 'U', '\335'}, {'(', 'u', '\375'},
1292 /* collision whith I. from iso-8859-3 !!! */
1293 {'.', 'I', '\251'}, {'.', 'i', '\271'}, /* dot above */
1294 {'.', 'C', '\305'}, {'.', 'c', '\345'},
1295 {'.', 'G', '\325'}, {'.', 'g', '\365'},
1296 /* iso-8859-4 uses this */
1297 {',', 'R', '\243'}, {',', 'r', '\263'}, /* cedilla */
1298 {',', 'L', '\246'}, {',', 'l', '\266'},
1299 {',', 'G', '\253'}, {',', 'g', '\273'},
1300 {',', 'N', '\321'}, {',', 'n', '\361'},
1301 {',', 'K', '\323'}, {',', 'k', '\363'},
1302 {'~', 'I', '\245'}, {'~', 'i', '\265'}, /* tilde */
1303 {'-', 'E', '\252'}, {'-', 'e', '\272'}, /* macron */
1304 {'-', 'A', '\300'}, {'-', 'a', '\340'},
1305 {'-', 'I', '\317'}, {'-', 'i', '\357'},
1306 {'-', 'O', '\322'}, {'-', 'o', '\362'},
1307 {'-', 'U', '\336'}, {'-', 'u', '\376'},
1308 {'/', 'T', '\254'}, {'/', 't', '\274'}, /* slash */
1309 {'.', 'E', '\314'}, {'.', 'e', '\344'}, /* dot above */
1310 {';', 'I', '\307'}, {';', 'i', '\347'}, /* ogonek */
1311 {';', 'U', '\331'}, {';', 'u', '\371'},
1312 /* iso-8859-9 uses this */
1313 /* iso-8859-9 has really bad choosen G( S, and I. as they collide
1314 * whith the same letters on other iso-8859-x (that is they are on
1315 * different places :-( ), if you use turkish uncomment these and
1316 * comment out the lines in iso-8859-2 and iso-8859-3 sections
1317 * FIXME: should be dynamic according to chosen language
1318 * if/when Wine has turkish support.
1320 /* collision whith G( from iso-8859-3 !!! */
1321 /* {'(', 'G', '\320'}, {'(', 'g', '\360'}, */ /* breve */
1322 /* collision whith S, from iso-8859-2 !!! */
1323 /* {',', 'S', '\336'}, {',', 's', '\376'}, */ /* cedilla */
1324 /* collision whith I. from iso-8859-3 !!! */
1325 /* {'.', 'I', '\335'}, {'.', 'i', '\375'}, */ /* dot above */
1329 /***********************************************************************
1330 * MSG_DoTranslateMessage
1332 * Implementation of TranslateMessage.
1334 * TranslateMessage translates virtual-key messages into character-messages,
1336 * WM_KEYDOWN/WM_KEYUP combinations produce a WM_CHAR or WM_DEADCHAR message.
1337 * ditto replacing WM_* with WM_SYS*
1338 * This produces WM_CHAR messages only for keys mapped to ASCII characters
1339 * by the keyboard driver.
1341 static BOOL32
MSG_DoTranslateMessage( UINT32 message
, HWND32 hwnd
,
1342 WPARAM32 wParam
, LPARAM lParam
)
1344 static int dead_char
;
1347 if ((debugging_msg
&& message
!= WM_MOUSEMOVE
&& message
!= WM_TIMER
)
1349 && message
>= WM_KEYFIRST
&& message
<= WM_KEYLAST
))
1350 fprintf(stddeb
, "TranslateMessage(%s, %04X, %08lX)\n",
1351 SPY_GetMsgName(message
), wParam
, lParam
);
1353 if ((message
!= WM_KEYDOWN
) && (message
!= WM_SYSKEYDOWN
)) return FALSE
;
1355 dprintf_key( stddeb
, "Translating key %04X, scancode %04X\n",
1356 wParam
, HIWORD(lParam
) );
1358 /* FIXME : should handle ToAscii yielding 2 */
1359 switch (ToAscii32(wParam
, HIWORD(lParam
),
1360 QueueKeyStateTable
,(LPWORD
)wp
, 0))
1363 message
= (message
== WM_KEYDOWN
) ? WM_CHAR
: WM_SYSCHAR
;
1364 /* Should dead chars handling go in ToAscii ? */
1369 if (wp
[0] == ' ') wp
[0] = dead_char
;
1370 if (dead_char
== 0xa2) dead_char
= '(';
1371 else if (dead_char
== 0xa8) dead_char
= '"';
1372 else if (dead_char
== 0xb2) dead_char
= ';';
1373 else if (dead_char
== 0xb4) dead_char
= '\'';
1374 else if (dead_char
== 0xb7) dead_char
= '<';
1375 else if (dead_char
== 0xb8) dead_char
= ',';
1376 else if (dead_char
== 0xff) dead_char
= '.';
1377 for (i
= 0; i
< sizeof(accent_chars
)/sizeof(accent_chars
[0]); i
++)
1378 if ((accent_chars
[i
].ac_accent
== dead_char
) &&
1379 (accent_chars
[i
].ac_char
== wp
[0]))
1381 wp
[0] = accent_chars
[i
].ac_result
;
1386 dprintf_key(stddeb
, "1 -> PostMessage(%s)\n", SPY_GetMsgName(message
));
1387 PostMessage16( hwnd
, message
, wp
[0], lParam
);
1391 message
= (message
== WM_KEYDOWN
) ? WM_DEADCHAR
: WM_SYSDEADCHAR
;
1393 dprintf_key( stddeb
, "-1 -> PostMessage(%s)\n",
1394 SPY_GetMsgName(message
));
1395 PostMessage16( hwnd
, message
, wp
[0], lParam
);
1402 /***********************************************************************
1403 * TranslateMessage16 (USER.113)
1405 BOOL16
TranslateMessage16( const MSG16
*msg
)
1407 return MSG_DoTranslateMessage( msg
->message
, msg
->hwnd
,
1408 msg
->wParam
, msg
->lParam
);
1412 /***********************************************************************
1413 * TranslateMessage32 (USER32.555)
1415 BOOL32
TranslateMessage32( const MSG32
*msg
)
1417 return MSG_DoTranslateMessage( msg
->message
, msg
->hwnd
,
1418 msg
->wParam
, msg
->lParam
);
1422 /***********************************************************************
1423 * DispatchMessage16 (USER.114)
1425 LONG
DispatchMessage16( const MSG16
* msg
)
1431 /* Process timer messages */
1432 if ((msg
->message
== WM_TIMER
) || (msg
->message
== WM_SYSTIMER
))
1436 return CallWindowProc16( (WNDPROC16
)msg
->lParam
, msg
->hwnd
,
1437 msg
->message
, msg
->wParam
, GetTickCount() );
1441 if (!msg
->hwnd
) return 0;
1442 if (!(wndPtr
= WIN_FindWndPtr( msg
->hwnd
))) return 0;
1443 if (!wndPtr
->winproc
) return 0;
1444 painting
= (msg
->message
== WM_PAINT
);
1445 if (painting
) wndPtr
->flags
|= WIN_NEEDS_BEGINPAINT
;
1447 SPY_EnterMessage( SPY_DISPATCHMESSAGE16
, msg
->hwnd
, msg
->message
,
1448 msg
->wParam
, msg
->lParam
);
1449 retval
= CallWindowProc16( (WNDPROC16
)wndPtr
->winproc
,
1450 msg
->hwnd
, msg
->message
,
1451 msg
->wParam
, msg
->lParam
);
1452 SPY_ExitMessage( SPY_RESULT_OK16
, msg
->hwnd
, msg
->message
, retval
);
1454 if (painting
&& (wndPtr
= WIN_FindWndPtr( msg
->hwnd
)) &&
1455 (wndPtr
->flags
& WIN_NEEDS_BEGINPAINT
) && wndPtr
->hrgnUpdate
)
1457 fprintf(stderr
, "BeginPaint not called on WM_PAINT for hwnd %04x!\n",
1459 wndPtr
->flags
&= ~WIN_NEEDS_BEGINPAINT
;
1460 /* Validate the update region to avoid infinite WM_PAINT loop */
1461 ValidateRect32( msg
->hwnd
, NULL
);
1467 /***********************************************************************
1468 * DispatchMessage32A (USER32.140)
1470 LONG
DispatchMessage32A( const MSG32
* msg
)
1476 /* Process timer messages */
1477 if ((msg
->message
== WM_TIMER
) || (msg
->message
== WM_SYSTIMER
))
1481 /* HOOK_CallHooks32A( WH_CALLWNDPROC, HC_ACTION, 0, FIXME ); */
1482 return CallWindowProc32A( (WNDPROC32
)msg
->lParam
, msg
->hwnd
,
1483 msg
->message
, msg
->wParam
, GetTickCount() );
1487 if (!msg
->hwnd
) return 0;
1488 if (!(wndPtr
= WIN_FindWndPtr( msg
->hwnd
))) return 0;
1489 if (!wndPtr
->winproc
) return 0;
1490 painting
= (msg
->message
== WM_PAINT
);
1491 if (painting
) wndPtr
->flags
|= WIN_NEEDS_BEGINPAINT
;
1492 /* HOOK_CallHooks32A( WH_CALLWNDPROC, HC_ACTION, 0, FIXME ); */
1494 SPY_EnterMessage( SPY_DISPATCHMESSAGE32
, msg
->hwnd
, msg
->message
,
1495 msg
->wParam
, msg
->lParam
);
1496 retval
= CallWindowProc32A( (WNDPROC32
)wndPtr
->winproc
,
1497 msg
->hwnd
, msg
->message
,
1498 msg
->wParam
, msg
->lParam
);
1499 SPY_ExitMessage( SPY_RESULT_OK32
, msg
->hwnd
, msg
->message
, retval
);
1501 if (painting
&& (wndPtr
= WIN_FindWndPtr( msg
->hwnd
)) &&
1502 (wndPtr
->flags
& WIN_NEEDS_BEGINPAINT
) && wndPtr
->hrgnUpdate
)
1504 fprintf(stderr
, "BeginPaint not called on WM_PAINT for hwnd %04x!\n",
1506 wndPtr
->flags
&= ~WIN_NEEDS_BEGINPAINT
;
1507 /* Validate the update region to avoid infinite WM_PAINT loop */
1508 ValidateRect32( msg
->hwnd
, NULL
);
1514 /***********************************************************************
1515 * DispatchMessage32W (USER32.141)
1517 LONG
DispatchMessage32W( const MSG32
* msg
)
1523 /* Process timer messages */
1524 if ((msg
->message
== WM_TIMER
) || (msg
->message
== WM_SYSTIMER
))
1528 /* HOOK_CallHooks32W( WH_CALLWNDPROC, HC_ACTION, 0, FIXME ); */
1529 return CallWindowProc32W( (WNDPROC32
)msg
->lParam
, msg
->hwnd
,
1530 msg
->message
, msg
->wParam
, GetTickCount() );
1534 if (!msg
->hwnd
) return 0;
1535 if (!(wndPtr
= WIN_FindWndPtr( msg
->hwnd
))) return 0;
1536 if (!wndPtr
->winproc
) return 0;
1537 painting
= (msg
->message
== WM_PAINT
);
1538 if (painting
) wndPtr
->flags
|= WIN_NEEDS_BEGINPAINT
;
1539 /* HOOK_CallHooks32W( WH_CALLWNDPROC, HC_ACTION, 0, FIXME ); */
1541 SPY_EnterMessage( SPY_DISPATCHMESSAGE32
, msg
->hwnd
, msg
->message
,
1542 msg
->wParam
, msg
->lParam
);
1543 retval
= CallWindowProc32W( (WNDPROC32
)wndPtr
->winproc
,
1544 msg
->hwnd
, msg
->message
,
1545 msg
->wParam
, msg
->lParam
);
1546 SPY_ExitMessage( SPY_RESULT_OK32
, msg
->hwnd
, msg
->message
, retval
);
1548 if (painting
&& (wndPtr
= WIN_FindWndPtr( msg
->hwnd
)) &&
1549 (wndPtr
->flags
& WIN_NEEDS_BEGINPAINT
) && wndPtr
->hrgnUpdate
)
1551 fprintf(stderr
, "BeginPaint not called on WM_PAINT for hwnd %04x!\n",
1553 wndPtr
->flags
&= ~WIN_NEEDS_BEGINPAINT
;
1554 /* Validate the update region to avoid infinite WM_PAINT loop */
1555 ValidateRect32( msg
->hwnd
, NULL
);
1561 /***********************************************************************
1562 * RegisterWindowMessage16 (USER.118)
1564 WORD
RegisterWindowMessage16( SEGPTR str
)
1566 dprintf_msg(stddeb
, "RegisterWindowMessage16: %08lx\n", (DWORD
)str
);
1567 return GlobalAddAtom16( str
);
1571 /***********************************************************************
1572 * RegisterWindowMessage32A (USER32.436)
1574 WORD
RegisterWindowMessage32A( LPCSTR str
)
1576 dprintf_msg(stddeb
, "RegisterWindowMessage32A: %s\n", str
);
1577 return GlobalAddAtom32A( str
);
1581 /***********************************************************************
1582 * RegisterWindowMessage32W (USER32.437)
1584 WORD
RegisterWindowMessage32W( LPCWSTR str
)
1586 dprintf_msg(stddeb
, "RegisterWindowMessage32W: %p\n", str
);
1587 return GlobalAddAtom32W( str
);
1591 /***********************************************************************
1592 * GetTickCount (USER.13) (KERNEL32.299)
1594 DWORD
GetTickCount(void)
1597 gettimeofday( &t
, NULL
);
1598 return ((t
.tv_sec
* 1000) + (t
.tv_usec
/ 1000)) - MSG_WineStartTicks
;
1602 /***********************************************************************
1603 * GetCurrentTime16 (USER.15)
1605 * (effectively identical to GetTickCount)
1607 DWORD
GetCurrentTime16(void)
1609 return GetTickCount();
1613 /***********************************************************************
1614 * InSendMessage16 (USER.192)
1616 BOOL16
InSendMessage16(void)
1618 return InSendMessage32();
1622 /***********************************************************************
1623 * InSendMessage32 (USER32.319)
1625 BOOL32
InSendMessage32(void)
1627 MESSAGEQUEUE
*queue
;
1629 if (!(queue
= (MESSAGEQUEUE
*)GlobalLock16( GetTaskQueue(0) )))
1631 return (BOOL32
)queue
->InSendMessageHandle
;