Context Navigation

source: trunk/src/user32/oslibmsgtranslate.cpp@ 9935

Visit:

Last change on this file since 9935 was 9935, checked in by sandervl, 22 years ago
PF: Generate console even when receiving special keyboard hook message for Ctrl-Break
File size: 39.4 KB

Line
1	/* $Id: oslibmsgtranslate.cpp,v 1.105 2003-03-25 12:17:09 sandervl Exp $ */
2	/*
3	* Window message translation functions for OS/2
4	*
5	*
6	* Copyright 1998-1999 Sander van Leeuwen (sandervl@xs4all.nl)
7	* Copyright 1999 Daniela Engert (dani@ngrt.de)
8	* Copyright 1999 Rene Pronk (R.Pronk@twi.tudelft.nl)
9	*
10	* Project Odin Software License can be found in LICENSE.TXT
11	*
12	* TODO: Extra msgs: which messages must be put into the queue and which can be sent directly?
13	* (According to the docs TranslateMessage really inserts a msg in the queue)
14	* TODO: Filter translation isn't correct for posted messages
15	*
16	*/
17	#define INCL_WIN
18	#define INCL_PM
19	#define INCL_DOSPROCESS
20	#include <os2wrap.h>
21	#include <string.h>
22	#include <misc.h>
23	#include <winconst.h>
24	#include <win32api.h>
25	#include "oslibmsg.h"
26	#include <winuser32.h>
27	#include "win32wdesktop.h"
28	#include "oslibutil.h"
29	#include "timer.h"
30	#include <thread.h>
31	#include <wprocess.h>
32	#include "pmwindow.h"
33	#include "oslibwin.h"
34	#include "winmouse.h"
35	#include <pmkbdhk.h>
36	#include <pmscan.h>
37	#include <winscan.h>
38	#include <winkeyboard.h>
39	#include "hook.h"
40	#include "user32api.h"
41
42
43	#define DBG_LOCALLOG DBG_oslibmsgtranslate
44	#include "dbglocal.h"
45
46	static BOOL fGenerateDoubleClick = FALSE;
47	static MSG doubleClickMsg = {0};
48
49	//For wheel mouse translation
50	#define WHEEL_DELTA 120
51	#define OS2_WHEEL_CORRECTION 1
52	//PF Correction is different for different mouse drivers. For now no correction
53	//is ok because lots of Odin controls rely on minimum delta. However in future
54	//we will possibly detect mouse driver and use correction if speed will be
55	//too high or too low.
56
57	//******************************************************************************
58	//******************************************************************************
59	BOOL setThreadQueueExtraCharMessage(TEB* teb, MSG* pExtraMsg)
60	{
61	// check if the single slot is occupied already
62	if (teb->o.odin.fTranslated == TRUE)
63	// there's still an already translated message to be processed
64	return FALSE;
65	teb->o.odin.fTranslated = TRUE;
66	memcpy(&teb->o.odin.msgWCHAR, pExtraMsg, sizeof(MSG));
67	return TRUE;
68	}
69
70	//******************************************************************************
71	//******************************************************************************
72	ULONG ConvertNumPadKey(ULONG pmScan)
73	{
74	ULONG ret;
75	BYTE winKey;
76
77	switch (pmScan)
78	{
79	case PMSCAN_PAD7: ret = PMSCAN_HOME; break;
80	case PMSCAN_PAD8: ret = PMSCAN_UP; break;
81	case PMSCAN_PAD9: ret = PMSCAN_PAGEUP; break;
82	case PMSCAN_PAD4: ret = PMSCAN_LEFT; break;
83	case PMSCAN_PAD6: ret = PMSCAN_RIGHT; break;
84	case PMSCAN_PAD1: ret = PMSCAN_END; break;
85	case PMSCAN_PAD2: ret = PMSCAN_DOWN; break;
86	case PMSCAN_PAD3: ret = PMSCAN_PAGEDOWN; break;
87	case PMSCAN_PAD0: ret = PMSCAN_INSERT; break;
88	case PMSCAN_PADPERIOD: ret = PMSCAN_DELETE; break;
89	default:
90	ret = pmScan;
91	}
92
93	KeyTranslatePMScanToWinVKey(ret, FALSE, (PBYTE)&winKey, NULL, NULL);
94	return winKey;
95
96	}
97	//******************************************************************************
98	//******************************************************************************
99	ULONG GetMouseKeyState()
100	{
101	ULONG keystate = 0;
102
103	if(WinGetKeyState(HWND_DESKTOP, VK_BUTTON1) & 0x8000)
104	keystate \|= MK_LBUTTON_W;
105	if(WinGetKeyState(HWND_DESKTOP, VK_BUTTON2) & 0x8000)
106	keystate \|= MK_RBUTTON_W;
107	if(WinGetKeyState(HWND_DESKTOP, VK_BUTTON3) & 0x8000)
108	keystate \|= MK_MBUTTON_W;
109	if(WinGetKeyState(HWND_DESKTOP, VK_SHIFT) & 0x8000)
110	keystate \|= MK_SHIFT_W;
111	if(WinGetKeyState(HWND_DESKTOP, VK_CTRL) & 0x8000)
112	keystate \|= MK_CONTROL_W;
113
114	return keystate;
115	}
116	//******************************************************************************
117	//******************************************************************************
118	LONG IsNCMouseMsg(Win32BaseWindow *win32wnd)
119	{
120	return ((win32wnd->getLastHitTestVal() != HTCLIENT_W) && (WinQueryCapture(HWND_DESKTOP) != win32wnd->getOS2WindowHandle()));
121	}
122	//******************************************************************************
123	//******************************************************************************
124	void OSLibSetMenuDoubleClick(BOOL fSet)
125	{
126	fGenerateDoubleClick = fSet;
127	}
128	//******************************************************************************
129	//******************************************************************************
130	BOOL OS2ToWinMsgTranslate(void pTeb, QMSG os2Msg, MSG *winMsg, BOOL isUnicode, BOOL fMsgRemoved)
131	{
132	Win32BaseWindow *win32wnd = 0;
133	OSLIBPOINT point, ClientPoint;
134	POSTMSG_PACKET *packet;
135	TEB teb = (TEB )pTeb;
136	BOOL fWasDisabled = FALSE;
137	BOOL fIsFrame = FALSE;
138	int i;
139
140	memset(winMsg, 0, sizeof(MSG));
141	win32wnd = Win32BaseWindow::GetWindowFromOS2Handle(os2Msg->hwnd);
142	if(!win32wnd) {
143	win32wnd = Win32BaseWindow::GetWindowFromOS2FrameHandle(os2Msg->hwnd);
144	if(win32wnd) {
145	fIsFrame = TRUE;
146	}
147	}
148
149	//PostThreadMessage posts WIN32APP_POSTMSG msg without window handle
150	//Realplayer starts a timer with hwnd 0 & proc 0; check this here
151	if(win32wnd == 0 && (os2Msg->msg != WM_CREATE && os2Msg->msg != WM_QUIT && os2Msg->msg != WM_TIMER && os2Msg->msg < WIN32APP_POSTMSG))
152	{
153	goto dummymessage; //not a win32 client window
154	}
155	winMsg->time = os2Msg->time;
156	//CB: PM bug or undocumented feature? ptl.x highword is set!
157	winMsg->pt.x = os2Msg->ptl.x & 0xFFFF;
158	winMsg->pt.y = mapScreenY(os2Msg->ptl.y);
159
160	if(win32wnd) //==0 for WM_CREATE/WM_QUIT
161	winMsg->hwnd = win32wnd->getWindowHandle();
162
163	if(os2Msg->msg >= WIN32APP_POSTMSG) {
164	packet = (POSTMSG_PACKET *)os2Msg->mp2;
165	if(packet && ((ULONG)os2Msg->mp1 == WIN32MSG_MAGICA \|\| (ULONG)os2Msg->mp1 == WIN32MSG_MAGICW)) {
166	winMsg->message = os2Msg->msg - WIN32APP_POSTMSG;
167	winMsg->wParam = packet->wParam;
168	winMsg->lParam = packet->lParam;
169	if(fMsgRemoved == MSG_REMOVE) free(packet); //free the shared memory here
170	if(win32wnd) RELEASE_WNDOBJ(win32wnd);
171	return TRUE;
172	}
173	else {//broadcasted message (no packet present)
174	winMsg->message = os2Msg->msg - WIN32APP_POSTMSG;
175	winMsg->wParam = (UINT)os2Msg->mp1;
176	winMsg->lParam = (DWORD)os2Msg->mp2;
177	if(win32wnd) RELEASE_WNDOBJ(win32wnd);
178	return TRUE;
179	}
180	goto dummymessage;
181	}
182
183	switch(os2Msg->msg)
184	{
185	//OS/2 msgs
186	case WM_CREATE:
187	{
188	if(teb->o.odin.newWindow == 0) {
189	DebugInt3();
190	goto dummymessage;
191	}
192
193	win32wnd = (Win32BaseWindow *)teb->o.odin.newWindow;
194	win32wnd->addRef();
195
196	winMsg->message = WINWM_CREATE;
197	winMsg->hwnd = win32wnd->getWindowHandle();
198	winMsg->wParam = 0;
199	winMsg->lParam = (LPARAM)win32wnd->tmpcs;
200	break;
201	}
202
203	case WM_QUIT:
204	winMsg->message = WINWM_QUIT;
205	if (fMsgRemoved && win32wnd && (ULONG)os2Msg->mp2 != 0) {
206	// mp2 != 0 -> sent by window list; be nice and close
207	// the window first
208	win32wnd->MsgClose();
209	}
210	break;
211
212	case WM_CLOSE:
213	winMsg->message = WINWM_CLOSE;
214	break;
215
216	case WM_DESTROY:
217	winMsg->message = WINWM_DESTROY;
218	break;
219
220	case WM_ENABLE:
221	winMsg->message = WINWM_ENABLE;
222	winMsg->wParam = SHORT1FROMMP(os2Msg->mp1);
223	break;
224
225	case WM_SHOW:
226	winMsg->message = WINWM_SHOWWINDOW;
227	winMsg->wParam = SHORT1FROMMP(os2Msg->mp1);
228	break;
229
230	case WM_REALIZEPALETTE:
231	winMsg->message = WINWM_PALETTECHANGED;
232	break;
233
234	case WM_WINDOWPOSCHANGED:
235	{
236	PSWP pswp = (PSWP)os2Msg->mp1;
237	SWP swpOld = *(pswp + 1);
238	HWND hParent = NULLHANDLE;
239	LONG yDelta = pswp->cy - swpOld.cy;
240	LONG xDelta = pswp->cx - swpOld.cx;
241
242	if(!fIsFrame) goto dummymessage;
243
244	if ((pswp->fl & (SWP_SIZE \| SWP_MOVE \| SWP_ZORDER)) == 0) goto dummymessage;
245
246	if(pswp->fl & (SWP_MOVE \| SWP_SIZE)) {
247	if (win32wnd->isChild()) {
248	if(win32wnd->getParent()) {
249	hParent = win32wnd->getParent()->getOS2WindowHandle();
250	}
251	else goto dummymessage; //parent has just been destroyed
252	}
253	}
254	if(win32wnd->getParent()) {
255	OSLibMapSWPtoWINDOWPOS(pswp, &teb->o.odin.wp, &swpOld, win32wnd->getParent()->getClientHeight(),
256	win32wnd->getOS2WindowHandle());
257	}
258	else OSLibMapSWPtoWINDOWPOS(pswp, &teb->o.odin.wp, &swpOld, OSLibQueryScreenHeight(), win32wnd->getOS2WindowHandle());
259
260	if (!win32wnd->CanReceiveSizeMsgs()) goto dummymessage;
261
262	if(pswp->fl & (SWP_MOVE \| SWP_SIZE))
263	{
264	teb->o.odin.wp.hwnd = win32wnd->getWindowHandle();
265	if ((pswp->fl & SWP_ZORDER) && (pswp->hwndInsertBehind > HWND_BOTTOM))
266	{
267	Win32BaseWindow *wndAfter = Win32BaseWindow::GetWindowFromOS2Handle(pswp->hwndInsertBehind);
268	if(wndAfter) {
269	teb->o.odin.wp.hwndInsertAfter = wndAfter->getWindowHandle();
270	RELEASE_WNDOBJ(wndAfter);
271	}
272	else teb->o.odin.wp.hwndInsertAfter = HWND_TOP_W;
273	}
274	}
275	winMsg->message = WINWM_WINDOWPOSCHANGED;
276	winMsg->lParam = (LPARAM)&teb->o.odin.wp;
277	break;
278	}
279
280	case WM_ACTIVATE:
281	{
282	HWND hwndActivate = (HWND)os2Msg->mp2;
283	BOOL fMinimized = FALSE;
284
285	hwndActivate = OS2ToWin32Handle(hwndActivate);
286	if(hwndActivate == 0) {
287	//another (non-win32) application's window
288	//set to desktop window handle
289	hwndActivate = windowDesktop->getWindowHandle();
290	}
291
292	if(win32wnd->getStyle() & WS_MINIMIZE_W)
293	{
294	fMinimized = TRUE;
295	}
296
297	winMsg->message = WINWM_ACTIVATE;
298	winMsg->wParam = MAKELONG((SHORT1FROMMP(os2Msg->mp1)) ? WA_ACTIVE_W : WA_INACTIVE_W, fMinimized);
299	winMsg->lParam = (LPARAM)hwndActivate;
300	break;
301	}
302
303	case WM_SETFOCUS:
304	{
305	HWND hwndFocus = (HWND)os2Msg->mp1;
306
307	if(WinQueryWindowULong(hwndFocus, OFFSET_WIN32PM_MAGIC) != WIN32PM_MAGIC) {
308	//another (non-win32) application's window
309	//set to NULL (allowed according to win32 SDK) to avoid problems
310	hwndFocus = NULL;
311	}
312	else hwndFocus = OS2ToWin32Handle(hwndFocus);
313
314	if((ULONG)os2Msg->mp2 == TRUE) {
315	winMsg->message = WINWM_SETFOCUS;
316	winMsg->wParam = (WPARAM)hwndFocus;
317	}
318	else {
319	//If SetFocus(0) was called, then the window has already received
320	//a WM_KILLFOCUS; don't send another one
321	if(!fIgnoreKeystrokes) {
322	winMsg->message = WINWM_KILLFOCUS;
323	winMsg->wParam = (WPARAM)hwndFocus;
324	}
325	else {
326	dprintf(("Window has already received a WM_KILLFOCUS (SetFocus(0)); ignore"));
327	goto dummymessage;
328	}
329	}
330	break;
331	}
332
333	//**************************************************************************
334	//Mouse messages (OS/2 Window coordinates -> Win32 coordinates relative to screen
335	//**************************************************************************
336	case WM_BUTTON1DOWN:
337	case WM_BUTTON1UP:
338	case WM_BUTTON1DBLCLK:
339	case WM_BUTTON2DOWN:
340	case WM_BUTTON2UP:
341	case WM_BUTTON2DBLCLK:
342	case WM_BUTTON3DOWN:
343	case WM_BUTTON3UP:
344	case WM_BUTTON3DBLCLK:
345	{
346	//WM_NCBUTTON is posted when the cursor is in a non-client area of the window
347
348	dprintf(("MsgButton %x (%x) %d at (%d,%d) time %x", winMsg->hwnd, os2Msg->hwnd, WINWM_NCLBUTTONDOWN + (os2Msg->msg - WM_BUTTON1DOWN), winMsg->pt.x, winMsg->pt.y, winMsg->time));
349
350	HWND hwnd;
351
352	DisableLogging();
353	if(GetCapture() != winMsg->hwnd)
354	{
355	hwnd = WindowFromPoint(winMsg->pt);
356	if(win32wnd->getWindowHandle() != hwnd) {
357	RELEASE_WNDOBJ(win32wnd);
358	win32wnd = Win32BaseWindow::GetWindowFromHandle(hwnd);
359	if(win32wnd == NULL) {
360	DebugInt3();
361	EnableLogging();
362	goto dummymessage;
363	}
364	winMsg->hwnd = hwnd;
365	}
366	}
367
368	//if a window is disabled, its parent receives the mouse messages
369	if(!IsWindowEnabled(win32wnd->getWindowHandle())) {
370	if(win32wnd->getParent()) {
371	Win32BaseWindow *parent = win32wnd->getParent();;
372	if(parent) parent->addRef();
373	RELEASE_WNDOBJ(win32wnd);
374	win32wnd = parent;
375	}
376	fWasDisabled = TRUE;
377	}
378
379	if(IsNCMouseMsg(win32wnd)) {
380	winMsg->message = WINWM_NCLBUTTONDOWN + (os2Msg->msg - WM_BUTTON1DOWN);
381	winMsg->wParam = win32wnd->getLastHitTestVal();
382	winMsg->lParam = MAKELONG(winMsg->pt.x, winMsg->pt.y); //screen coordinates
383	}
384	else {
385	ClientPoint.x = winMsg->pt.x;
386	ClientPoint.y = winMsg->pt.y;
387	MapWindowPoints(0, win32wnd->getWindowHandle(), (LPPOINT)&ClientPoint, 1);
388	winMsg->message = WINWM_LBUTTONDOWN + (os2Msg->msg - WM_BUTTON1DOWN);
389	winMsg->wParam = GetMouseKeyState();
390	winMsg->lParam = MAKELONG(ClientPoint.x, ClientPoint.y); //client coordinates
391	}
392	EnableLogging();
393
394	if(fWasDisabled) {
395	if(win32wnd) {
396	winMsg->hwnd = win32wnd->getWindowHandle();
397	}
398	else goto dummymessage; //don't send mouse messages to disabled windows
399	}
400
401	DisableLogging();
402	if ((winMsg->message == WINWM_LBUTTONDOWN) \|\|
403	(winMsg->message == WINWM_RBUTTONDOWN) \|\|
404	(winMsg->message == WINWM_MBUTTONDOWN) \|\|
405	(winMsg->message == WINWM_NCLBUTTONDOWN) \|\|
406	(winMsg->message == WINWM_NCRBUTTONDOWN) \|\|
407	(winMsg->message == WINWM_NCMBUTTONDOWN))
408	{
409	if(fGenerateDoubleClick && doubleClickMsg.message == winMsg->message &&
410	winMsg->time - doubleClickMsg.time < GetDoubleClickTime() &&
411	(abs(winMsg->pt.x - doubleClickMsg.pt.x) < GetSystemMetrics(SM_CXDOUBLECLK_W)/2) &&
412	(abs(winMsg->pt.y - doubleClickMsg.pt.y) < GetSystemMetrics(SM_CYDOUBLECLK_W)/2))
413	{
414	dprintf(("single -> double click"));
415	if(winMsg->message >= WINWM_LBUTTONDOWN) {
416	winMsg->message += (WINWM_LBUTTONDBLCLK - WINWM_LBUTTONDOWN);
417	}
418	else winMsg->message += (WINWM_LBUTTONDBLCLK - WINWM_NCLBUTTONDOWN);
419	if(fMsgRemoved) doubleClickMsg.message = 0;
420	}
421	else {
422	dprintf(("save for double click"));
423	if(fMsgRemoved) {
424	doubleClickMsg = *winMsg;
425	if(doubleClickMsg.message >= WINWM_NCLBUTTONDOWN && doubleClickMsg.message <= WINWM_NCMBUTTONDOWN) {
426	doubleClickMsg.message += (WINWM_LBUTTONDOWN - WINWM_NCLBUTTONDOWN);
427	}
428	}
429	}
430	}
431	EnableLogging();
432
433	if(fMsgRemoved == MSG_REMOVE)
434	{
435	MSLLHOOKSTRUCT hook;
436	ULONG msg;
437
438	if(winMsg->message >= WINWM_NCLBUTTONDOWN && winMsg->message <= WINWM_NCMBUTTONDBLCLK) {
439	msg = winMsg->message - WINWM_NCLBUTTONDOWN + WINWM_LBUTTONDOWN;
440	}
441	else msg = winMsg->message;
442
443	if(msg == WINWM_LBUTTONDBLCLK) {
444	msg = WINWM_LBUTTONDOWN;
445	}
446	else
447	if(msg == WINWM_RBUTTONDBLCLK) {
448	msg = WINWM_RBUTTONDOWN;
449	}
450	else
451	if(msg == WINWM_MBUTTONDBLCLK) {
452	msg = WINWM_MBUTTONDOWN;
453	}
454
455	hook.pt.x = os2Msg->ptl.x & 0xFFFF;
456	hook.pt.y = mapScreenY(os2Msg->ptl.y);
457	hook.mouseData = 0; //todo: XBUTTON1/2 (XP feature) or wheel data
458	hook.flags = 0; //todo: injected (LLMHF_INJECTED)
459	hook.time = winMsg->time;
460	hook.dwExtraInfo = 0;
461
462	if(HOOK_CallHooksW( WH_MOUSE_LL, HC_ACTION, msg, (LPARAM)&hook)) {
463	goto dummymessage; //hook swallowed message
464	}
465	}
466	break;
467	}
468
469	case WM_BUTTON2CLICK:
470	case WM_BUTTON1CLICK:
471	case WM_BUTTON3CLICK:
472	goto dummymessage;
473
474	case WM_BUTTON2MOTIONSTART:
475	case WM_BUTTON2MOTIONEND:
476	case WM_BUTTON1MOTIONSTART:
477	case WM_BUTTON1MOTIONEND:
478	case WM_BUTTON3MOTIONSTART:
479	case WM_BUTTON3MOTIONEND:
480	//no break; translate to WM_MOUSEMOVE
481	//Some applications (e.g. Unreal) retrieve all mouse messages
482	//when a mouse button is pressed and don't expect WM_NULL
483
484	case WM_MOUSEMOVE:
485	{
486	//WM_NCMOUSEMOVE is posted when the cursor moves into a non-client area of the window
487
488	HWND hwnd;
489
490	dprintf2(("WM_MOUSEMOVE (%d,%d)", winMsg->pt.x, winMsg->pt.y));
491	DisableLogging();
492	if(GetCapture() != winMsg->hwnd)
493	{
494	hwnd = WindowFromPoint(winMsg->pt);
495	if(win32wnd->getWindowHandle() != hwnd) {
496	RELEASE_WNDOBJ(win32wnd);
497	win32wnd = Win32BaseWindow::GetWindowFromHandle(hwnd);
498	if(win32wnd == NULL) {
499	DebugInt3();
500	EnableLogging();
501	goto dummymessage;
502	}
503	winMsg->hwnd = hwnd;
504	}
505	}
506
507	//if a window is disabled, its parent receives the mouse messages
508	if(!IsWindowEnabled(win32wnd->getWindowHandle())) {
509	if(win32wnd->getParent()) {
510	Win32BaseWindow *parent = win32wnd->getParent();;
511	if(parent) parent->addRef();
512	RELEASE_WNDOBJ(win32wnd);
513	win32wnd = parent;
514	}
515	fWasDisabled = TRUE;
516	}
517	if(IsNCMouseMsg(win32wnd))
518	{
519	winMsg->message = WINWM_NCMOUSEMOVE;
520	winMsg->wParam = (WPARAM)win32wnd->getLastHitTestVal();
521	winMsg->lParam = MAKELONG(winMsg->pt.x,winMsg->pt.y);
522	}
523	else
524	{
525	ClientPoint.x = winMsg->pt.x;
526	ClientPoint.y = winMsg->pt.y;
527	MapWindowPoints(0, win32wnd->getWindowHandle(), (LPPOINT)&ClientPoint, 1);
528
529	winMsg->message = WINWM_MOUSEMOVE;
530	winMsg->wParam = GetMouseKeyState();
531	winMsg->lParam = MAKELONG(ClientPoint.x, ClientPoint.y); //client coordinates
532	}
533	EnableLogging();
534	if(fWasDisabled) {
535	if(win32wnd) {
536	winMsg->hwnd = win32wnd->getWindowHandle();
537	}
538	else {
539	goto dummymessage; //don't send mouse messages to disabled windows
540	}
541	}
542	if(fMsgRemoved == MSG_REMOVE)
543	{
544	MSLLHOOKSTRUCT hook;
545
546	hook.pt.x = os2Msg->ptl.x & 0xFFFF;
547	hook.pt.y = mapScreenY(os2Msg->ptl.y);
548	hook.mouseData = 0;
549	hook.flags = 0; //todo: injected (LLMHF_INJECTED)
550	hook.time = winMsg->time;
551	hook.dwExtraInfo = 0;
552
553	if(HOOK_CallHooksW( WH_MOUSE_LL, HC_ACTION, winMsg->message, (LPARAM)&hook)) {
554	goto dummymessage; //hook swallowed message
555	}
556	}
557	break;
558	}
559
560	case WM_CONTROL:
561	goto dummymessage;
562
563	case WM_COMMAND:
564	if(SHORT1FROMMP(os2Msg->mp2) == CMDSRC_MENU) {
565	winMsg->message = WINWM_COMMAND;
566	winMsg->wParam = (WPARAM)SHORT1FROMMP(os2Msg->mp1); //id
567	break;
568	}
569	//todo controls
570	goto dummymessage;
571
572	case WM_SYSCOMMAND:
573	{
574	ULONG x = 0, y = 0;
575	ULONG win32sc;
576
577	if(SHORT2FROMMP(os2Msg->mp2) == TRUE) {//syscommand caused by mouse action
578	POINTL pointl;
579	WinQueryPointerPos(HWND_DESKTOP, &pointl);
580	x = pointl.x;
581	y = mapScreenY(y);
582	}
583	switch(SHORT1FROMMP(os2Msg->mp1)) {
584	case SC_MOVE:
585	win32sc = SC_MOVE_W;
586	break;
587	case SC_CLOSE:
588	{
589	//FALSE -> keyboard operation = user pressed Alt-F4 -> close app
590	//TRUE -> user clicked on close button -> close window
591	if(SHORT2FROMMP(os2Msg->mp2) == FALSE)
592	{
593	HWND hwnd = win32wnd->GetTopParent();
594	if(win32wnd->getWindowHandle() != hwnd) {
595	RELEASE_WNDOBJ(win32wnd);
596	win32wnd = Win32BaseWindow::GetWindowFromHandle(hwnd);
597	if(win32wnd == NULL) {
598	DebugInt3();
599	goto dummymessage;
600	}
601	winMsg->hwnd = hwnd;
602	}
603	}
604	win32sc = SC_CLOSE_W;
605	break;
606	}
607	case SC_MAXIMIZE:
608	win32sc = SC_MAXIMIZE_W;
609	break;
610	case SC_MINIMIZE:
611	win32sc = SC_MINIMIZE_W;
612	break;
613	case SC_NEXTFRAME:
614	case SC_NEXTWINDOW:
615	win32sc = SC_NEXTWINDOW_W;
616	break;
617	case SC_RESTORE:
618	win32sc = SC_RESTORE_W;
619	break;
620	case SC_TASKMANAGER:
621	win32sc = SC_TASKLIST_W;
622	break;
623	default:
624	dprintf(("Unknown/unsupported SC command %d", SHORT1FROMMP(os2Msg->mp1)));
625	goto dummymessage;
626	}
627	winMsg->message= WINWM_SYSCOMMAND;
628	winMsg->wParam = (WPARAM)win32sc;
629	winMsg->lParam = MAKELONG((USHORT)x, (USHORT)y);
630	break;
631	}
632
633	case WM_CHAR_SPECIAL_CONSOLE_BREAK:
634	{
635	GenerateConsoleCtrlEvent(CTRL_BREAK_EVENT_W,0);
636	break;
637	}
638
639	case WM_CHAR_SPECIAL_ALTGRCONTROL:
640	{
641	// special char message from the keyboard hook
642	dprintf(("PM: WM_CHAR_SPECIAL_ALTGRCONTROL"));
643	// NO BREAK! FALLTHRU CASE!
644	}
645
646	case WM_CHAR_SPECIAL:
647	{
648	// @@@PH
649	// special char message from the keyboard hook
650	if(os2Msg->msg == WM_CHAR_SPECIAL) {
651	dprintf(("PM: WM_CHAR_SPECIAL"));
652	}
653	// NO BREAK! FALLTHRU CASE!
654	}
655
656	case WM_CHAR:
657	{
658	ULONG repeatCount=0;
659	ULONG virtualKey=0;
660	ULONG keyFlags=0;
661	USHORT scanCode=0;
662	ULONG flags = SHORT1FROMMP(os2Msg->mp1);
663	BOOL keyWasPressed;
664	BOOL numPressed = (BOOL)(WinGetKeyState(HWND_DESKTOP,VK_NUMLOCK) & 1);
665	char c;
666	USHORT usPMScanCode = CHAR4FROMMP(os2Msg->mp1);
667
668	teb->o.odin.fTranslated = FALSE;
669	repeatCount = CHAR3FROMMP(os2Msg->mp1);
670	scanCode = CHAR4FROMMP(os2Msg->mp1);
671	keyWasPressed = ((SHORT1FROMMP (os2Msg->mp1) & KC_PREVDOWN) == KC_PREVDOWN);
672
673	dprintf(("PM: WM_CHAR: %x %x rep=%d scancode=%x num=%d", SHORT1FROMMP(os2Msg->mp2), SHORT2FROMMP(os2Msg->mp2), repeatCount, scanCode, numPressed));
674	dprintf(("PM: WM_CHAR: hwnd %x flags %x mp1 %x, mp2 %x, time=%08xh", win32wnd->getWindowHandle(), flags, os2Msg->mp1, os2Msg->mp2, os2Msg->time));
675
676	BOOL fWinExtended;
677	BYTE bWinVKey;
678	WORD wWinScan;
679
680	if (scanCode==0) goto dummymessage;
681
682	KeyTranslatePMScanToWinVKey(usPMScanCode,
683	FALSE,
684	&bWinVKey,
685	&wWinScan,
686	&fWinExtended);
687	winMsg->wParam = bWinVKey;
688	winMsg->lParam = repeatCount & 0x0FFFF; // bit 0-15, repeatcount
689	winMsg->lParam \|= (wWinScan & 0x1FF) << 16; // bit 16-23, scancode + bit 15 extended
690
691	// Set the extended bit when appropriate
692	if (fWinExtended)
693	winMsg->lParam = winMsg->lParam \| WIN_KEY_EXTENDED;
694
695	//PF When we press shift we enable non-numeric functions of Numpad
696	if ((!numPressed \|\| (flags & KC_SHIFT)) && (scanCode >= PMSCAN_PAD7) && (scanCode <= PMSCAN_PADPERIOD))
697	winMsg->wParam = ConvertNumPadKey(scanCode);
698
699	//@PF This looks ugly but this is just what we have in win32 both in win98/win2k
700	//what happens is that lParam is tweaked in win32 to contain some illegal codes
701	//I simply reproduce here all situation. Absolute values can be kept because
702	//Break scancode can be acheived only by pressing Ctrl-Break combination
703	if ((usPMScanCode == PMSCAN_BREAK) && !(flags & KC_KEYUP) && (flags & KC_CTRL)
704	&& (fMsgRemoved && !(teb->o.odin.fTranslated)))
705	{
706	MSG extramsg;
707	memcpy(&extramsg, winMsg, sizeof(MSG));
708	// adjust our WM_CHAR code
709	extramsg.lParam = 0x01460001;
710
711	//After SetFocus(0), all keystrokes are converted in WM_SYS*
712	extramsg.message = (fIgnoreKeystrokes) ? WINWM_SYSCHAR : WINWM_CHAR;
713
714	setThreadQueueExtraCharMessage(teb, &extramsg);
715	// and finally adjust our WM_KEYDOWN code
716	winMsg->lParam = 0x01460001;
717	}
718
719	if (!(flags & KC_ALT))
720	{
721	//
722	// the Alt key is not pressed
723	// or no more pressed
724	//
725	if (flags & KC_KEYUP)
726	{
727	// check for a lonesome ALT key ...
728	// SvL: Only Left Alt; AltGr generates a WM_KEYUP when released
729	if ( (flags & KC_LONEKEY) &&
730	(winMsg->wParam == VK_LMENU_W) )
731	{
732	winMsg->message = WINWM_SYSKEYUP;
733	// held ALT-key when current key is released
734	// generates additional flag 0x2000000
735	// Note: PM seems to do this differently,
736	// KC_ALT is already reset
737	}
738	else
739	{
740	// send WM_KEYUP message
741	winMsg->message = WINWM_KEYUP;
742	}
743	winMsg->lParam \|= WIN_KEY_PREVSTATE; // bit 30, previous state, always 1 for a WM_KEYUP message
744	winMsg->lParam \|= 1 << 31; // bit 31, transition state, always 1 for WM_KEYUP
745	}
746	else
747	{ // send WM_KEYDOWN message
748	winMsg->message = WINWM_KEYDOWN;
749
750	if (keyWasPressed)
751	winMsg->lParam \|= WIN_KEY_PREVSTATE; // bit 30, previous state, 1 means key was pressed
752
753	//Shift-Enter and possibly others need to have special handling
754	if (flags & KC_SHIFT)
755	{
756	if(fMsgRemoved && !(teb->o.odin.fTranslated))
757	{
758	dprintf(("PM: KC_SHIFT: %x",winMsg->wParam));
759	if (winMsg->wParam == VK_RETURN_W)
760	{
761	MSG extramsg;
762	memcpy(&extramsg, winMsg, sizeof(MSG));
763
764	//After SetFocus(0), all keystrokes are converted in WM_SYS*
765	extramsg.message = (fIgnoreKeystrokes) ? WINWM_SYSCHAR : WINWM_CHAR;
766
767	// insert message into the queue
768	setThreadQueueExtraCharMessage(teb, &extramsg);
769	winMsg->lParam &= 0x3FFFFFFF;
770	}
771	} // else ???
772	} // KC_SHIFT
773	else
774	{
775	// in case we handle Enter directly through PMKBDHOOK
776	if ((os2Msg->msg == WM_CHAR_SPECIAL) && (winMsg->wParam == VK_RETURN_W)
777	&& (fMsgRemoved && !(teb->o.odin.fTranslated)))
778	{
779	MSG extramsg;
780	memcpy(&extramsg, winMsg, sizeof(MSG));
781
782	//After SetFocus(0), all keystrokes are converted in WM_SYS*
783	extramsg.message = (fIgnoreKeystrokes) ? WINWM_SYSCHAR : WINWM_CHAR;
784
785	// insert message into the queue
786	setThreadQueueExtraCharMessage(teb, &extramsg);
787	}
788	}
789	}
790	// if right alt is down, then we need to set the alt down bit too
791	// except for the fake Ctrl WM_CHAR sent for AltGr emulation
792	if (os2Msg->msg != WM_CHAR_SPECIAL_ALTGRCONTROL &&
793	(WinGetKeyState(HWND_DESKTOP, VK_ALTGRAF) & 0x8000))
794	{
795	winMsg->lParam \|= WIN_KEY_ALTHELD;
796	}
797	}
798	else
799	{
800	//
801	// the Alt key is pressed
802	//
803	if (flags & KC_KEYUP)
804	{
805	//@@PF Note that without pmkbdhook there will not be correct message for Alt-Enter
806	winMsg->message = WINWM_SYSKEYUP;
807	winMsg->lParam \|= WIN_KEY_PREVSTATE;
808	// No ALTHELD for Alt itself ;)
809	winMsg->lParam \|= WIN_KEY_ALTHELD;
810	winMsg->lParam \|= 1 << 31; // bit 31, transition state, always 1 for WM_KEYUP
811	}
812	else
813	{
814	// send WM_SYSKEYDOWN message
815	winMsg->message = WINWM_SYSKEYDOWN;
816	if (keyWasPressed)
817	winMsg->lParam \|= WIN_KEY_PREVSTATE; // bit 30, previous state, 1 means key was pressed
818
819	// pressed ALT-key generates additional flag 0x2000000
820	// if the current window has keyboard focus
821	winMsg->lParam \|= WIN_KEY_ALTHELD;
822	}
823	}
824	#if 0
825	//
826	// AltGr needs special handling
827	//
828	// AltGr -> WM_KEYDOWN (VK_CONTROL), WM_KEYDOWN (VK_MENU)
829	// WM_SYSKEYUP (VK_CONTROL)
830	// WM_KEYUP (VK_MENU)
831	//
832	// Ctrl+AltGr -> WM_KEYDOWN (VK_CONTROL), WM_KEYUP (VK_CONTROL)
833	// WM_KEYDOWN (VK_MENU)
834	// WM_KEYUP (VK_MENU)
835	// WM_KEYUP (VK_CONTROL)
836	//
837	// AltGr+Ctrl -> WM_KEYDOWN (VK_CONTROL), WM_KEYDOWN (VK_MENU)
838	// WM_KEYDOWN (VK_CONTROL)
839	// WM_SYSKEYUP (VK_CONTROL)
840	// WM_SYSKEYUP (VK_CONTROL)
841	// WM_KEYUP (VK_MENU)
842	//
843	// AltGr down -> if Ctrl down, send WM_KEYUP (VK_CONTROL)
844	// endif
845	// Send WM_KEYDOWN (VK_CONTROL)
846	// Send WM_KEYDOWN (VK_MENU)
847	// AltGr up -> if !(Ctrl down before AltGr was pressed \|\| Ctrl up)
848	// Send WM_SYSKEYUP (VK_CONTROL)
849	// endif
850	// Send WM_KEYDOWN (VK_MENU)
851	//
852	if(winMsg->wParam == VK_MENU_W && (winMsg->lParam & WIN_KEY_EXTENDED))
853	{//AltGr
854	if(GetKeyState(VK_CONTROL_W) & 0x8000)
855	{//Ctrl key pressed, send WM_KEYUP
856
857	}
858	}
859	#endif
860
861	//After SetFocus(0), all keystrokes are converted in WM_SYS*
862	if(fIgnoreKeystrokes) {
863	if(winMsg->message == WINWM_KEYDOWN) {
864	winMsg->message = WINWM_SYSKEYDOWN;
865	}
866	else
867	if(winMsg->message == WINWM_KEYUP) {
868	winMsg->message = WINWM_SYSKEYUP;
869	}
870	}
871	break;
872	}
873
874	case WM_TIMER:
875	//Why was this check here????
876	// if (os2Msg->mp2)
877	// {
878	BOOL sys;
879	ULONG id;
880
881	if (TIMER_GetTimerInfo(os2Msg->hwnd,(ULONG)os2Msg->mp1,&sys,&id))
882	{
883	winMsg->wParam = (WPARAM)id;
884	winMsg->message= (sys) ? WINWM_SYSTIMER : WINWM_TIMER;
885	break;
886	}
887	// }
888	goto dummymessage; //for caret blinking
889
890	case WM_SETWINDOWPARAMS:
891	{
892	WNDPARAMS wndParams = (WNDPARAMS )os2Msg->mp1;
893
894	if(wndParams->fsStatus & WPM_TEXT) {
895	winMsg->message = WINWM_SETTEXT;
896	winMsg->lParam = (LPARAM)wndParams->pszText;
897	break;
898	}
899	goto dummymessage;
900	}
901
902	#if 0
903	case WM_QUERYWINDOWPARAMS:
904	{
905	PWNDPARAMS wndpars = (PWNDPARAMS)mp1;
906	ULONG textlen;
907	PSZ wintext;
908
909	if(wndpars->fsStatus & (WPM_CCHTEXT \| WPM_TEXT))
910	{
911	if(wndpars->fsStatus & WPM_CCHTEXT)
912	wndpars->cchText = win32wnd->MsgGetTextLength();
913	if(wndpars->fsStatus & WPM_TEXT)
914	wndpars->pszText = win32wnd->MsgGetText();
915
916	wndpars->fsStatus = 0;
917	wndpars->cbCtlData = 0;
918	wndpars->cbPresParams = 0;
919	goto dummymessage;
920	}
921	}
922	#endif
923
924	case WM_PAINT:
925	{
926	if(win32wnd->IsWindowIconic()) {
927	winMsg->message = WINWM_PAINTICON;
928	}
929	else winMsg->message = WINWM_PAINT;
930	break;
931	}
932
933	case WM_CONTEXTMENU:
934	winMsg->message = WINWM_CONTEXTMENU;
935	winMsg->wParam = win32wnd->getWindowHandle();
936	winMsg->lParam = MAKELONG(winMsg->pt.x,winMsg->pt.y);
937	break;
938
939	case WM_RENDERFMT:
940	winMsg->message = WINWM_RENDERFORMAT;
941	winMsg->wParam = (UINT) os2Msg->mp1;
942	break;
943
944	case WM_RENDERALLFMTS:
945	winMsg->message = WINWM_RENDERALLFORMATS;
946	break;
947
948	case WM_DESTROYCLIPBOARD:
949	winMsg->message = WINWM_DESTROYCLIPBOARD;
950	break;
951
952	case WM_DRAWCLIPBOARD:
953	winMsg->message = WINWM_DRAWCLIPBOARD;
954	break;
955
956	case WM_HSCROLL:
957	case WM_VSCROLL:
958	//PF For win32 we support only vertical scrolling for WM_MOUSEWHEEL
959	if (os2Msg->msg == WM_VSCROLL)
960	{
961	POINT CursorPoint;
962	winMsg->message = WINWM_MOUSEWHEEL;
963	if (OSLibWinQueryPointerPos(&CursorPoint))
964	mapScreenPoint((OSLIBPOINT*)&CursorPoint);
965
966	if (SHORT2FROMMP(os2Msg->mp2) == SB_LINEDOWN)
967	winMsg->wParam = MAKELONG(GetMouseKeyState(), -WHEEL_DELTA/OS2_WHEEL_CORRECTION);
968	else
969	if (SHORT2FROMMP(os2Msg->mp2) == SB_LINEUP)
970	winMsg->wParam = MAKELONG(GetMouseKeyState(), WHEEL_DELTA/OS2_WHEEL_CORRECTION);
971	else
972	winMsg->wParam = MAKELONG(GetMouseKeyState(), 0);
973
974	winMsg->lParam = MAKELONG(CursorPoint.x, CursorPoint.y);
975
976	dprintf(("WM_MOUSEWHEEL message delta %d at (%d,%d)",HIWORD(winMsg->wParam),CursorPoint.x, CursorPoint.y));
977	if (fMsgRemoved == MSG_REMOVE)
978	{
979	MSLLHOOKSTRUCT hook;
980
981	hook.pt.x = os2Msg->ptl.x & 0xFFFF;
982	hook.pt.y = mapScreenY(os2Msg->ptl.y);
983	if (SHORT2FROMMP(os2Msg->mp2) == SB_LINEDOWN)
984	hook.mouseData = MAKELONG(GetMouseKeyState(), -WHEEL_DELTA/OS2_WHEEL_CORRECTION);
985	else
986	if (SHORT2FROMMP(os2Msg->mp2) == SB_LINEUP)
987	hook.mouseData = MAKELONG(GetMouseKeyState(), WHEEL_DELTA/OS2_WHEEL_CORRECTION);
988	else goto dummymessage; // IBM driver produces other messages as well sometimes
989
990	hook.flags = LLMHF_INJECTED;
991	hook.time = winMsg->time;
992	hook.dwExtraInfo = 0;
993	if(HOOK_CallHooksW( WH_MOUSE_LL, HC_ACTION, WINWM_MOUSEWHEEL, (LPARAM)&hook))
994	goto dummymessage; //hook swallowed message
995	}
996	break;
997	}
998	goto dummymessage; //eat this message
999	break;
1000
1001	case WM_INITMENU:
1002	case WM_MENUSELECT:
1003	case WM_MENUEND:
1004	case WM_NEXTMENU:
1005	case WM_SYSCOLORCHANGE:
1006	case WM_SYSVALUECHANGED:
1007	case WM_SETSELECTION:
1008	case WM_PPAINT:
1009	case WM_PSETFOCUS:
1010	case WM_PSYSCOLORCHANGE:
1011	case WM_PSIZE:
1012	case WM_PACTIVATE:
1013	case WM_PCONTROL:
1014	case WM_HELP:
1015	case WM_APPTERMINATENOTIFY:
1016	case WM_PRESPARAMCHANGED:
1017	case WM_DRAWITEM:
1018	case WM_MEASUREITEM:
1019	case WM_CONTROLPOINTER:
1020	case WM_QUERYDLGCODE:
1021	case WM_SUBSTITUTESTRING:
1022	case WM_MATCHMNEMONIC:
1023	case WM_SAVEAPPLICATION:
1024	case WM_SEMANTICEVENT:
1025	default:
1026	dummymessage:
1027	dprintf2(("dummy message %x %x %x %x", os2Msg->hwnd, os2Msg->msg, os2Msg->mp1, os2Msg->mp2));
1028	winMsg->message = 0;
1029	winMsg->wParam = 0;
1030	winMsg->lParam = 0;
1031	if(win32wnd) RELEASE_WNDOBJ(win32wnd);
1032	return FALSE;
1033	}
1034	if(win32wnd) RELEASE_WNDOBJ(win32wnd);
1035	return TRUE;
1036	}
1037	//******************************************************************************
1038	//******************************************************************************
1039	BOOL OSLibWinTranslateMessage(MSG *msg)
1040	{
1041	TEB *teb;
1042	MSG extramsg;
1043	BOOL numPressed = (BOOL)(WinGetKeyState(HWND_DESKTOP,VK_NUMLOCK) & 1);
1044	teb = GetThreadTEB();
1045	if(!teb)
1046	return FALSE;
1047
1048	UCHAR ucPMScanCode = CHAR4FROMMP(teb->o.odin.os2msg.mp1);
1049	ULONG fl = SHORT1FROMMP(teb->o.odin.os2msg.mp1);
1050
1051
1052	//NOTE: These actually need to be posted so that the next message retrieved by GetMessage contains
1053	// the newly generated WM_CHAR message.
1054	if(!teb->o.odin.fTranslated &&
1055	teb->o.odin.os2msg.msg == WM_CHAR &&
1056	!((SHORT1FROMMP(teb->o.odin.os2msg.mp1) & KC_KEYUP) == KC_KEYUP))
1057	{
1058	//TranslatedMessage was called before DispatchMessage, so queue WM_CHAR message
1059	memcpy(&extramsg, msg, sizeof(MSG));
1060	extramsg.wParam = SHORT1FROMMP(teb->o.odin.os2msg.mp2);
1061	extramsg.lParam = 0;
1062
1063	// ESCAPE generates a WM_CHAR under windows, so take
1064	// special care for this here.
1065	switch (ucPMScanCode)
1066	{
1067	case PMSCAN_ESC:
1068	extramsg.wParam = VK_ESCAPE_W;
1069	fl \|= KC_CHAR;
1070	break;
1071	}
1072
1073	// PF With NumLock off do not generate any WM_CHAR messages at all
1074	// PADMINUS,PADPLUS fall in range of PAD7..PADPERIOD but they should generate WM_CHAR
1075	// other PAD(X) buttons miss that range at all and thus generate WM_CHAR
1076	if (!numPressed && (ucPMScanCode != PMSCAN_PADMINUS) && (ucPMScanCode != PMSCAN_PADPLUS) &&
1077	(ucPMScanCode >= PMSCAN_PAD7) && (ucPMScanCode <= PMSCAN_PADPERIOD))
1078	return FALSE;
1079
1080	if(!(fl & KC_CHAR) && msg->message < WINWM_SYSKEYDOWN)
1081	{
1082	return FALSE;
1083	}
1084
1085	//the KC_COMPOSITE flag might be set; in that case this key will
1086	//be combined with the previous dead key, so we must use the scancode
1087	//(e.g. ^ on german keyboards)
1088	if((fl & (KC_VIRTUALKEY\|KC_COMPOSITE)) == KC_VIRTUALKEY)
1089	{
1090	if(msg->wParam)
1091	{
1092	if ((msg->wParam >= VK_NUMPAD0_W) &&
1093	(msg->wParam <= VK_NUMPAD9_W))
1094	extramsg.wParam = msg->wParam - 0x30;
1095	else
1096	if (msg->wParam == VK_DECIMAL_W)
1097	extramsg.wParam = VK_DELETE_W;
1098	else
1099	/* PM Sends Bogus Things when pressing Shift+NUMAsterisk */
1100	if (msg->wParam != VK_MULTIPLY_W)
1101	extramsg.wParam = msg->wParam;
1102	}
1103	else
1104	extramsg.wParam = SHORT2FROMMP(teb->o.odin.os2msg.mp2);
1105	}
1106
1107
1108	//After SetFocus(0), all keystrokes are converted in WM_SYS*
1109	if(msg->message >= WINWM_SYSKEYDOWN \|\| fIgnoreKeystrokes)
1110	extramsg.message = WINWM_SYSCHAR;
1111	else
1112	extramsg.message = WINWM_CHAR;
1113
1114	if(fl & KC_DEADKEY)
1115	extramsg.message++; //WM_DEADCHAR/WM_SYSDEADCHAR
1116
1117
1118	extramsg.lParam = msg->lParam & 0x00FFFFFF;
1119	if ((fl & KC_ALT) \|\| (msg->lParam & WIN_KEY_ALTHELD))
1120	extramsg.lParam \|= WIN_KEY_ALTHELD;
1121	if(fl & KC_PREVDOWN)
1122	extramsg.lParam \|= WIN_KEY_PREVSTATE;
1123	if(fl & KC_KEYUP)
1124	extramsg.lParam \|= (1<<31);
1125
1126	// insert message into the queue
1127	setThreadQueueExtraCharMessage(teb, &extramsg);
1128	return TRUE;
1129	}
1130	return FALSE;
1131	}
1132	//******************************************************************************
1133	//******************************************************************************
1134

Note: See TracBrowser for help on using the repository browser.

Download in other formats: