source: trunk/src/user32/pmwindow.cpp@ 1336

Last change on this file since 1336 was 1336, checked in by sandervl, 26 years ago

Dialog fixes + ported Wine apis
File size: 32.1 KB
Line 
1/* $Id: pmwindow.cpp,v 1.34 1999-10-17 15:46:08 sandervl Exp $ */
2/*
3 * Win32 Window Managment Code for OS/2
4 *
5 * Copyright 1998-1999 Sander van Leeuwen (sandervl@xs4all.nl)
6 * Copyright 1999 Daniela Engert (dani@ngrt.de)
7 *
8 *
9 * Project Odin Software License can be found in LICENSE.TXT
10 *
11 */
12#define INCL_WIN
13#define INCL_GPI
14
15#include <os2.h> /* PM header file */
16#include <os2wrap.h>
17#include <stdlib.h>
18#include "win32type.h"
19#include <winconst.h>
20#include <wprocess.h>
21#include <misc.h>
22#include <win32wbase.h>
23#include <win32dlg.h>
24#include "pmwindow.h"
25#include "oslibwin.h"
26#include "oslibutil.h"
27#include "oslibgdi.h"
28#include "oslibmsg.h"
29#include "dc.h"
30#include <thread.h>
31#include <wprocess.h>
32#include <caret.h>
33
34HMQ hmq = 0; /* Message queue handle */
35HAB hab = 0;
36
37RECTL desktopRectl = {0};
38ULONG ScreenWidth = 0;
39ULONG ScreenHeight = 0;
40
41//Used for key translation while processing WM_CHAR message
42USHORT virtualKeyTable [66] = {
43 0x00, // OS/2 VK Win32 VK, Entry 0 is not used
44 0x01, // VK_BUTTON1 VK_LBUTTON
45 0x02, // VK_BUTTON2 VK_RBUTTON
46 0x04, // VK_BUTTON3 VK_MBUTTON
47 0x03, // VK_BREAK VK_CANCEL
48 0x08, // VK_BACKSPACE VK_BACK
49 0x09, // VK_TAB VK_TAB
50 0x00, // VK_BACKTAB No equivalent!
51 0x0D, // VK_NEWLINE VK_RETURN
52 0x10, // VK_SHIFT VK_SHIFT
53 0x11, // VK_CTRL VK_CONTROL
54 0x12, // VK_ALT VK_MENU, best match I guess
55 0x12, // VK_ALTGRAF VK_MENU, best match I guess
56 0x13, // VK_PAUSE VK_PAUSE
57 0x14, // VK_CAPSLOCK VK_CAPITAL
58 0x1B, // VK_ESC VK_ESCAPE
59 0x20, // VK_SPACE VK_SPACE
60 0x21, // VK_PAGEUP VK_PRIOR
61 0x22, // VK_PAGEDOWN VK_NEXT
62 0x23, // VK_END VK_END
63 0x24, // VK_HOME VK_HOME
64 0x25, // VK_LEFT VK_LEFT
65 0x26, // VK_UP VK_UP
66 0x27, // VK_RIGHT VK_RIGHT
67 0x28, // VK_DOWN VK_DOWN
68 0x2C, // VK_PRINTSCRN VK_SNAPSHOT
69 0x2D, // VK_INSERT VK_INSERT
70 0x2E, // VK_DELETE VK_DELETE
71 0x91, // VK_SCRLLOCK VK_SCROLL
72 0x90, // VK_NUMLOCK VK_NUMLOCK
73 0x2B, // VK_ENTER VK_EXECUTE, best match I guess
74 0x00, // VK_SYSRQ No equivalent!
75 0x70, // VK_F1 VK_F1
76 0x71, // VK_F2 VK_F2
77 0x72, // VK_F3 VK_F3
78 0x73, // VK_F4 VK_F4
79 0x74, // VK_F5 VK_F5
80 0x75, // VK_F6 VK_F6
81 0x76, // VK_F7 VK_F7
82 0x77, // VK_F8 VK_F8
83 0x78, // VK_F9 VK_F9
84 0x79, // VK_F10 VK_F10
85 0x7A, // VK_F11 VK_F11
86 0x7B, // VK_F12 VK_F12
87 0x7C, // VK_F13 VK_F13
88 0x7D, // VK_F14 VK_F14
89 0x7E, // VK_F15 VK_F15
90 0x7F, // VK_F16 VK_F16
91 0x80, // VK_F17 VK_F17
92 0x81, // VK_F18 VK_F18
93 0x82, // VK_F19 VK_F19
94 0x83, // VK_F20 VK_F20
95 0x84, // VK_F21 VK_F21
96 0x85, // VK_F22 VK_F22
97 0x86, // VK_F23 VK_F23
98 0x87, // VK_F24 VK_F24
99 0x00, // VK_ENDDRAG No equivalent!
100 0x0C, // VK_CLEAR VK_CLEAR
101 0xF9, // VK_EREOF VK_EREOF
102 0xFD, // VK_PA1 VK_PA1
103 0xF6, // VK_ATTN VK_ATTN
104 0xF7, // VK_CRSEL VK_CRSEL
105 0xF8, // VK_EXSEL VK_EXSEL
106 0x00, // VK_COPY No equivalent!
107 0x00, // VK_BLK1 No equivalent!
108 0x00}; // VK_BLK2 No equivalent!
109
110MRESULT EXPENTRY Win32WindowProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2);
111
112//******************************************************************************
113//Initialize PM; create hab, message queue and register special Win32 window classes
114//******************************************************************************
115BOOL InitPM()
116{
117 hab = WinInitialize(0);
118 dprintf(("Winitialize returned %x", hab));
119 hmq = WinCreateMsgQueue(hab, 0);
120
121 if(!hab || !hmq)
122 {
123 UINT error;
124 //CB: only fail on real error
125 error = WinGetLastError(hab) & 0xFFFF; //error code
126 if (!hab || error != PMERR_MSG_QUEUE_ALREADY_EXISTS)
127 {
128 dprintf(("WinInitialize or WinCreateMsgQueue failed %x %x", hab, hmq));
129 dprintf((" Error = %x",error));
130 return(FALSE);
131 }
132 else
133 {
134 if(!hab) {
135 hab = WinQueryAnchorBlock(HWND_DESKTOP);
136 dprintf(("WinQueryAnchorBlock returned %x", hab));
137 }
138 if(!hmq) {
139 hmq = HMQ_CURRENT;
140 }
141 }
142 }
143 SetThreadHAB(hab);
144 dprintf(("InitPM: hmq = %x", hmq));
145 SetThreadMessageQueue(hmq);
146
147 if(!WinRegisterClass( /* Register window class */
148 hab, /* Anchor block handle */
149 (PSZ)WIN32_STDCLASS, /* Window class name */
150 (PFNWP)Win32WindowProc, /* Address of window procedure */
151// CS_SIZEREDRAW | CS_HITTEST | CS_MOVENOTIFY,
152 CS_SIZEREDRAW | CS_HITTEST,
153 NROF_WIN32WNDBYTES)) {
154 dprintf(("WinRegisterClass Win32BaseWindow failed"));
155 return(FALSE);
156 }
157
158 WinQueryWindowRect(HWND_DESKTOP, &desktopRectl);
159 ScreenWidth = desktopRectl.xRight;
160 ScreenHeight = desktopRectl.yTop;
161
162 dprintf(("InitPM: Desktop (%d,%d)", ScreenWidth, ScreenHeight));
163 return OSLibInitMsgQueue();
164} /* End of main */
165//******************************************************************************
166//Win32 window message handler
167//******************************************************************************
168MRESULT EXPENTRY Win32WindowProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
169{
170 POSTMSG_PACKET *postmsg;
171 OSLIBPOINT point, ClientPoint;
172 Win32BaseWindow *win32wnd;
173 APIRET rc;
174
175 //Restore our FS selector
176 SetWin32TIB();
177
178 win32wnd = Win32BaseWindow::GetWindowFromOS2Handle(hwnd);
179
180 if(msg != WM_CREATE && win32wnd == NULL) {
181 dprintf(("Invalid win32wnd pointer for window %x!!", hwnd));
182 goto RunDefWndProc;
183 }
184 if(msg > WIN32APP_USERMSGBASE) {
185 //win32 app user message
186 return (MRESULT)win32wnd->SendMessageA((ULONG)msg-WIN32APP_USERMSGBASE, (ULONG)mp1, (ULONG)mp2);
187 }
188 switch( msg )
189 {
190 //OS/2 msgs
191 case WM_CREATE:
192 {
193 THDB *thdb = GetThreadTHDB();
194
195 if(thdb == NULL || thdb->newWindow == 0)
196 goto createfail;
197
198 //Processing is done in after WinCreateWindow returns
199 dprintf(("OS2: WM_CREATE %x", hwnd));
200 win32wnd = (Win32BaseWindow *)thdb->newWindow;
201
202 if(win32wnd->MsgCreate(WinQueryWindow(hwnd, QW_PARENT), hwnd) == FALSE)
203 {
204 RestoreOS2TIB();
205 return (MRESULT)TRUE; //discontinue window creation
206 }
207 createfail:
208 RestoreOS2TIB();
209 return (MRESULT)FALSE;
210 }
211
212 case WM_QUIT:
213 dprintf(("OS2: WM_QUIT %x", hwnd));
214 if(win32wnd->MsgQuit()) {
215 goto RunDefWndProc;
216 }
217 break;
218
219 case WM_CLOSE:
220 dprintf(("OS2: WM_CLOSE %x", hwnd));
221// win32wnd->RemoveFakeOpen32();
222 if(win32wnd->MsgClose()) {
223 goto RunDefWndProc;
224 }
225 break;
226
227 case WM_DESTROY:
228 dprintf(("OS2: WM_DESTROY %x", hwnd));
229 if(win32wnd->MsgDestroy()) {
230 goto RunDefWndProc;
231 }
232 break;
233
234 case WM_ENABLE:
235 dprintf(("OS2: WM_ENABLE %x", hwnd));
236 if(win32wnd->MsgEnable(SHORT1FROMMP(mp1))) {
237 goto RunDefWndProc;
238 }
239 break;
240
241 case WM_SHOW:
242 dprintf(("OS2: WM_SHOW %x %d", hwnd, mp1));
243 if(win32wnd->MsgShow((ULONG)mp1)) {
244 goto RunDefWndProc;
245 }
246 break;
247
248 case WM_ADJUSTWINDOWPOS:
249 {
250 PSWP pswp = (PSWP)mp1;
251 SWP swpOld;
252 WINDOWPOS wp;
253 ULONG parentHeight = 0;
254 HWND hParent = NULLHANDLE, hFrame = NULLHANDLE;
255
256 dprintf(("OS2: WM_ADJUSTWINDOWPOS %x %x (%d,%d) (%d,%d)", hwnd, pswp->fl, pswp->x, pswp->y, pswp->cx, pswp->cy));
257
258 if ((pswp->fl & (SWP_SIZE | SWP_MOVE | SWP_ZORDER)) == 0) break;
259 if (!win32wnd->CanReceiveSizeMsgs()) break;
260
261 WinQueryWindowPos(hwnd, &swpOld);
262
263 if(pswp->fl & (SWP_MOVE | SWP_SIZE)) {
264 if (win32wnd->isChild()) {
265 if(win32wnd->getParent()) {
266 hParent = win32wnd->getParent()->getOS2WindowHandle();
267 }
268 else break;
269 }
270 else
271 hFrame = win32wnd->getOS2FrameWindowHandle();
272 }
273 OSLibMapSWPtoWINDOWPOS(pswp, &wp, &swpOld, hParent, hFrame);
274
275 wp.hwnd = win32wnd->getWindowHandle();
276 if ((pswp->fl & SWP_ZORDER) && (pswp->hwndInsertBehind > HWND_BOTTOM))
277 {
278 Win32BaseWindow *wndAfter = Win32BaseWindow::GetWindowFromOS2Handle(pswp->hwndInsertBehind);
279 if(wndAfter) wp.hwndInsertAfter = wndAfter->getWindowHandle();
280 }
281 win32wnd->MsgPosChanging((LPARAM)&wp);
282 break;
283 }
284
285 case WM_WINDOWPOSCHANGED:
286 {
287 PSWP pswp = (PSWP)mp1;
288 PSWP pswpo = pswp + 1;
289 WINDOWPOS wp;
290 ULONG parentHeight = 0;
291 HWND hParent = NULLHANDLE, hFrame = NULLHANDLE;
292 LONG yDelta = pswp->cy - pswpo->cy;
293 LONG xDelta = pswp->cx - pswpo->cx;
294 ULONG classStyle;
295
296 dprintf(("OS2: WM_WINDOWPOSCHANGED %x %x (%d,%d) (%d,%d)", hwnd, pswp->fl, pswp->x, pswp->y, pswp->cx, pswp->cy));
297
298 if ((pswp->fl & (SWP_SIZE | SWP_MOVE | SWP_ZORDER)) == 0) break;
299 if (!win32wnd->CanReceiveSizeMsgs()) break;
300
301 if(pswp->fl & (SWP_MOVE | SWP_SIZE)) {
302 if (win32wnd->isChild()) {
303 if(win32wnd->getParent()) {
304 hParent = win32wnd->getParent()->getOS2WindowHandle();
305 }
306 else goto RunDefWndProc; //parent has just been destroyed
307 }
308 else
309 hFrame = WinQueryWindow(hwnd, QW_PARENT);
310 }
311 OSLibMapSWPtoWINDOWPOS(pswp, &wp, pswpo, hParent, hFrame);
312
313 SWP swpFrame;
314 WinQueryWindowPos(WinQueryWindow(hwnd, QW_PARENT), &swpFrame);
315 dprintf(("WINDOWPOSCHANGE %x %x %x (%d,%d) (%d,%d)", win32wnd->getWindowHandle(), win32wnd->getOS2FrameWindowHandle(),
316 swpFrame.fl,swpFrame.x, swpFrame.y, swpFrame.cx, swpFrame.cy));
317 POINTL point;
318
319 point.x = swpFrame.x;
320 point.y = swpFrame.y;
321 if(win32wnd->getParent() != NULL)
322 {
323 WinMapWindowPoints(WinQueryWindow(hwnd, QW_PARENT), HWND_DESKTOP,
324 &point, 1);
325 }
326 point.y = OSLibQueryScreenHeight() - point.y - swpFrame.cy;
327
328 win32wnd->setWindowRect(point.x, point.y, point.x+swpFrame.cx, point.y+swpFrame.cy);
329 win32wnd->setClientRect(pswpo->x, pswpo->y, pswpo->x + pswpo->cx, pswpo->y + pswpo->cy);
330
331 wp.hwnd = win32wnd->getWindowHandle();
332 if ((pswp->fl & SWP_ZORDER) && (pswp->hwndInsertBehind > HWND_BOTTOM))
333 {
334 Win32BaseWindow *wndAfter = Win32BaseWindow::GetWindowFromOS2Handle(pswp->hwndInsertBehind);
335 wp.hwndInsertAfter = wndAfter->getWindowHandle();
336 }
337 classStyle = win32wnd->getClass()->getStyle();
338
339 if (yDelta != 0 || xDelta != 0)
340 {
341 HENUM henum = WinBeginEnumWindows(pswp->hwnd);
342 SWP swp[10];
343 int i = 0;
344 HWND hwnd;
345
346 while ((hwnd = WinGetNextWindow(henum)) != NULLHANDLE)
347 {
348#if 0
349 if (mdiClient )
350 {
351 continue;
352 }
353#endif
354 WinQueryWindowPos(hwnd, &(swp[i]));
355
356#ifdef DEBUG
357 Win32BaseWindow *window = Win32BaseWindow::GetWindowFromOS2Handle(hwnd);
358 dprintf(("ENUMERATE %x delta %d (%d,%d) (%d,%d) %x", (window) ? window->getWindowHandle() : hwnd,
359 yDelta, swp[i].x, swp[i].y, swp[i].cx, swp[i].cy, swp[i].fl));
360#endif
361
362 if(swp[i].y != 0) {
363 //child window at offset <> 0 from client area -> offset now changes
364 swp[i].y += yDelta;
365 swp[i].fl &= ~(SWP_NOREDRAW);
366 }
367 //else child window with the same start coorindates as the client area
368 //The app should resize it.
369
370 if (i == 9)
371 {
372 WinSetMultWindowPos(GetThreadHAB(), swp, 10);
373 i = 0;
374 }
375 else
376 {
377 i++;
378 }
379 }
380
381 WinEndEnumWindows(henum);
382
383 if (i)
384 WinSetMultWindowPos(GetThreadHAB(), swp, i);
385 }
386 if (yDelta != 0)
387 {
388 POINT pt;
389 if(GetCaretPos (&pt) == TRUE)
390 {
391 pt.y -= yDelta;
392 SetCaretPos (pt.x, pt.y);
393 }
394 }
395 win32wnd->MsgPosChanged((LPARAM)&wp);
396
397 goto RunDefWndProc;
398// break;
399 }
400
401 case WM_MOVE:
402 {
403 if (!win32wnd->isFrameWindow()) break;
404
405 HWND hFrame = win32wnd->getOS2FrameWindowHandle();
406 SWP swp, swpo;
407 WINDOWPOS wp;
408 ULONG parentHeight = 0;
409 RECTL rcl;
410
411 WinQueryWindowRect (hwnd, &rcl);
412 WinMapWindowPoints (hwnd, hFrame, (PPOINTL)&rcl, 2);
413 swp.x = swpo.x = rcl.xLeft;
414 swp.y = swpo.y = rcl.yBottom;
415 swp.cx = swpo.cx = rcl.xRight - rcl.xLeft;
416 swp.cy = swpo.cy = rcl.yTop - rcl.yBottom;
417 swp.fl = SWP_MOVE | SWP_NOREDRAW;
418 swp.hwnd = hwnd;
419 swp.hwndInsertBehind = NULLHANDLE;
420 dprintf(("OS2: WM_MOVE %x %x (%d,%d) (%d,%d)", hwnd, swp.fl, swp.x, swp.y, swp.cx, swp.cy));
421
422 OSLibMapSWPtoWINDOWPOS(&swp, &wp, &swpo, NULLHANDLE, hFrame);
423
424 wp.flags &= ~SWP_NOMOVE_W;
425 wp.hwnd = win32wnd->getWindowHandle();
426 win32wnd->setWindowRect(wp.x, wp.y, wp.x + wp.cx, wp.y + wp.cy);
427 win32wnd->setClientRect(swpo.x, swpo.y, swpo.x + swpo.cx, swpo.y + swpo.cy);
428 win32wnd->MsgPosChanged((LPARAM)&wp);
429 break;
430 }
431
432 case WM_SIZE:
433 {
434 break;
435 }
436
437 case WM_ACTIVATE:
438 {
439 HWND hwndActivate = (HWND)mp2;
440 BOOL fMinimized = FALSE;
441
442 dprintf(("OS2: WM_ACTIVATE %x %x", hwnd, hwndActivate));
443 if(WinQueryWindowULong(hwndActivate, OFFSET_WIN32PM_MAGIC) != WIN32PM_MAGIC) {
444 //another (non-win32) application's window
445 //set to NULL (allowed according to win32 SDK) to avoid problems
446 hwndActivate = NULL;
447 }
448 if(WinQueryWindowULong(hwnd, QWL_STYLE) & WS_MINIMIZED)
449 {
450 fMinimized = TRUE;
451 }
452
453 if(win32wnd->MsgActivate(SHORT1FROMMP(mp1), fMinimized, Win32BaseWindow::OS2ToWin32Handle(hwndActivate))) {
454 goto RunDefWndProc;
455 }
456 break;
457 }
458 case WM_FOCUSCHANGE:
459 dprintf(("OS2: WM_FOCUSCHANGE %x", hwnd));
460 goto RunDefWndProc;
461
462 case WM_SETFOCUS:
463 {
464 HWND hwndFocus = (HWND)mp1;
465
466 dprintf(("OS2: WM_SETFOCUS %x %d", hwnd, mp2));
467 if(WinQueryWindowULong(hwndFocus, OFFSET_WIN32PM_MAGIC) != WIN32PM_MAGIC) {
468 //another (non-win32) application's window
469 //set to NULL (allowed according to win32 SDK) to avoid problems
470 hwndFocus = NULL;
471 }
472 if((ULONG)mp2 == TRUE) {
473 HWND hwndFocusWin32 = Win32BaseWindow::OS2ToWin32Handle(hwndFocus);
474 recreateCaret (hwndFocusWin32);
475 rc = win32wnd->MsgSetFocus(hwndFocusWin32);
476 }
477 else rc = win32wnd->MsgKillFocus(Win32BaseWindow::OS2ToWin32Handle(hwndFocus));
478 if(rc) {
479 goto RunDefWndProc;
480 }
481 break;
482 }
483 //**************************************************************************
484 //Mouse messages (OS/2 Window coordinates -> Win32 coordinates relative to screen
485 //**************************************************************************
486 case WM_BUTTON1DOWN:
487 dprintf(("OS2: WM_BUTTON1DOWN %x", hwnd));
488 point.x = (*(POINTS *)&mp1).x;
489 point.y = (*(POINTS *)&mp1).y;
490 ClientPoint.x = point.x;
491 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
492 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
493 if(win32wnd->MsgButton(BUTTON_LEFTDOWN, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
494 goto RunDefWndProc;
495 }
496 break;
497
498 case WM_BUTTON1UP:
499 dprintf(("OS2: WM_BUTTON1UP %x", hwnd));
500 point.x = (*(POINTS *)&mp1).x;
501 point.y = (*(POINTS *)&mp1).y;
502 ClientPoint.x = point.x;
503 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
504 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
505 if(win32wnd->MsgButton(BUTTON_LEFTUP, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
506 goto RunDefWndProc;
507 }
508 break;
509 case WM_BUTTON1DBLCLK:
510 point.x = (*(POINTS *)&mp1).x;
511 point.y = (*(POINTS *)&mp1).y;
512 ClientPoint.x = point.x;
513 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
514 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
515 if(win32wnd->MsgButton(BUTTON_LEFTDBLCLICK, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
516 goto RunDefWndProc;
517 }
518 break;
519 case WM_BUTTON2DOWN:
520 point.x = (*(POINTS *)&mp1).x;
521 point.y = (*(POINTS *)&mp1).y;
522 ClientPoint.x = point.x;
523 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
524 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
525 if(win32wnd->MsgButton(BUTTON_RIGHTDOWN, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
526 goto RunDefWndProc;
527 }
528 break;
529 case WM_BUTTON2UP:
530 point.x = (*(POINTS *)&mp1).x;
531 point.y = (*(POINTS *)&mp1).y;
532 ClientPoint.x = point.x;
533 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
534 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
535 if(win32wnd->MsgButton(BUTTON_RIGHTUP, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
536 goto RunDefWndProc;
537 }
538 break;
539 case WM_BUTTON2DBLCLK:
540 point.x = (*(POINTS *)&mp1).x;
541 point.y = (*(POINTS *)&mp1).y;
542 ClientPoint.x = point.x;
543 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
544 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
545 if(win32wnd->MsgButton(BUTTON_RIGHTDBLCLICK, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
546 goto RunDefWndProc;
547 }
548 break;
549 case WM_BUTTON3DOWN:
550 point.x = (*(POINTS *)&mp1).x;
551 point.y = (*(POINTS *)&mp1).y;
552 ClientPoint.x = point.x;
553 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
554 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
555 if(win32wnd->MsgButton(BUTTON_MIDDLEDOWN, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
556 goto RunDefWndProc;
557 }
558 break;
559 case WM_BUTTON3UP:
560 point.x = (*(POINTS *)&mp1).x;
561 point.y = (*(POINTS *)&mp1).y;
562 ClientPoint.x = point.x;
563 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
564 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
565 if(win32wnd->MsgButton(BUTTON_MIDDLEUP, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
566 goto RunDefWndProc;
567 }
568 break;
569 case WM_BUTTON3DBLCLK:
570 point.x = (*(POINTS *)&mp1).x;
571 point.y = (*(POINTS *)&mp1).y;
572 ClientPoint.x = point.x;
573 ClientPoint.y = MapOS2ToWin32Y(hwnd, 1, point.y);
574 MapOS2ToWin32Point(OSLIB_HWND_DESKTOP, hwnd, &point);
575 if(win32wnd->MsgButton(BUTTON_MIDDLEDBLCLICK, point.x, point.y, ClientPoint.x, ClientPoint.y)) {
576 goto RunDefWndProc;
577 }
578 break;
579
580 case WM_BUTTON2MOTIONSTART:
581 case WM_BUTTON2MOTIONEND:
582 case WM_BUTTON2CLICK:
583 case WM_BUTTON1MOTIONSTART:
584 case WM_BUTTON1MOTIONEND:
585 case WM_BUTTON1CLICK:
586 case WM_BUTTON3MOTIONSTART:
587 case WM_BUTTON3MOTIONEND:
588 case WM_BUTTON3CLICK:
589 goto RunDefWndProc;
590
591 case WM_MOUSEMOVE:
592 {
593 ULONG keystate = 0;
594 if(WinGetKeyState(HWND_DESKTOP, VK_BUTTON1))
595 keystate |= WMMOVE_LBUTTON;
596 if(WinGetKeyState(HWND_DESKTOP, VK_BUTTON2))
597 keystate |= WMMOVE_MBUTTON;
598 if(WinGetKeyState(HWND_DESKTOP, VK_BUTTON3))
599 keystate |= WMMOVE_RBUTTON;
600 if(WinGetKeyState(HWND_DESKTOP, VK_SHIFT))
601 keystate |= WMMOVE_SHIFT;
602 if(WinGetKeyState(HWND_DESKTOP, VK_CTRL))
603 keystate |= WMMOVE_CTRL;
604
605 //OS/2 Window coordinates -> Win32 Window coordinates
606 if(win32wnd->MsgMouseMove(keystate, SHORT1FROMMP(mp1), MapOS2ToWin32Y(win32wnd, SHORT2FROMMP(mp1))))
607 {
608 //Changes mouse cursor to default
609 goto RunDefWndProc;
610 }
611 break;
612 }
613
614 //**************************************************************************
615 //Slider messages
616 //**************************************************************************
617/* CB: handled internally
618 case WM_VSCROLL:
619 case WM_HSCROLL:
620 {
621 ULONG scrollPos, scrollCode, scrollMsg;
622
623 scrollCode = SHORT2FROMMP(mp2);
624 scrollPos = SHORT1FROMMP(mp2);
625 scrollMsg = msg;
626
627 OSLibTranslateScrollCmdAndMsg(&scrollMsg, &scrollCode);
628
629 if(win32wnd->MsgScroll(scrollMsg, scrollCode, scrollPos)) {
630 goto RunDefWndProc;
631 }
632 break;
633 }
634*/
635
636 case WM_CONTROL:
637
638 case WM_COMMAND:
639 if(SHORT1FROMMP(mp2) == CMDSRC_MENU) {
640 win32wnd->MsgCommand(CMD_MENU, SHORT1FROMMP(mp1), 0);
641 }
642 if(SHORT1FROMMP(mp2) == CMDSRC_ACCELERATOR) {
643 win32wnd->MsgCommand(CMD_ACCELERATOR, SHORT1FROMMP(mp1), 0);
644 }
645 //todo controls + accelerators
646 break;
647
648 case WM_SYSCOMMAND:
649 {
650 ULONG x = 0, y = 0;
651 ULONG win32sc;
652
653 if(SHORT2FROMMP(mp2) == TRUE) {//syscommand caused by mouse action
654 POINTL pointl;
655 WinQueryPointerPos(HWND_DESKTOP, &pointl);
656 x = pointl.x;
657 y = ScreenHeight - y;
658 }
659 switch(SHORT1FROMMP(mp1)) {
660 case SC_MOVE:
661 win32sc = SC_MOVE_W;
662 break;
663 case SC_CLOSE:
664 win32sc = SC_CLOSE_W;
665 break;
666 case SC_MAXIMIZE:
667 win32sc = SC_MAXIMIZE_W;
668 break;
669 case SC_MINIMIZE:
670 win32sc = SC_MINIMIZE_W;
671 break;
672 case SC_NEXTFRAME:
673 case SC_NEXTWINDOW:
674 win32sc = SC_NEXTWINDOW_W;
675 break;
676 case SC_RESTORE:
677 win32sc = SC_RESTORE_W;
678 break;
679 case SC_TASKMANAGER:
680 win32sc = SC_TASKLIST_W;
681 break;
682 default:
683 goto RunDefWndProc;
684 }
685 dprintf(("WM_SYSCOMMAND %x %x (%d,%d)", hwnd, win32sc, x, y));
686 if(win32wnd->MsgSysCommand(win32sc, x, y)) {
687 goto RunDefWndProc;
688 }
689 break;
690 }
691 case WM_CHAR:
692 {
693 THDB *thdb;
694 ULONG repeatCount=0, virtualKey=0, keyFlags=0, scanCode=0;
695 ULONG flags = SHORT1FROMMP(mp1);
696 BOOL keyWasPressed, fTranslated = FALSE, fRunDefWndProc = FALSE;
697 char c;
698
699 repeatCount = CHAR3FROMMP(mp1);
700 scanCode = CHAR4FROMMP(mp1);
701 keyWasPressed = ((SHORT1FROMMP (mp1) & KC_PREVDOWN) == KC_PREVDOWN);
702
703 // both WM_KEYUP & WM_KEYDOWN want a virtual key, find the right Win32 virtual key
704 // given the OS/2 virtual key and OS/2 character
705
706 if (((SHORT1FROMMP (mp1) & KC_CHAR) == KC_CHAR) ||
707 ((SHORT1FROMMP (mp1) & KC_LONEKEY) == KC_LONEKEY))
708 {
709 c = SHORT1FROMMP (mp2);
710 if ((c >= 'A') && (c <= 'Z')) {
711 virtualKey = c;
712 goto VirtualKeyFound;
713 }
714 if ((c >='a') && (c <= 'z')) {
715 virtualKey = c - 32; // make it uppercase
716 goto VirtualKeyFound;
717 }
718 if ((c >= '0') && (c <= '9')) {
719 virtualKey = c;
720 goto VirtualKeyFound;
721 }
722 }
723
724 // convert OS/2 virtual keys to Win32 virtual key
725 if (SHORT2FROMMP (mp2) <= VK_BLK2)
726 virtualKey = virtualKeyTable [SHORT2FROMMP (mp2)];
727
728VirtualKeyFound:
729
730 if(!(SHORT1FROMMP(mp1) & KC_ALT))
731 {
732 //
733 // the Alt key is not pressed
734 //
735 if ((flags & KC_KEYUP) == KC_KEYUP) {
736 // send WM_KEYUP message
737
738 if(win32wnd->MsgKeyUp (repeatCount, scanCode, virtualKey)) {
739 fRunDefWndProc = TRUE;
740 }
741 }
742 else {
743 // send WM_KEYDOWN message
744 if (win32wnd->MsgKeyDown (repeatCount, scanCode, virtualKey, keyWasPressed))
745 fRunDefWndProc = TRUE;
746 }
747 }
748 else {
749 //
750 // the Alt key is pressed
751 //
752 if ((flags & KC_KEYUP) == KC_KEYUP) {
753 // send WM_SYSKEYUP message
754
755 if(win32wnd->MsgSysKeyUp (repeatCount, scanCode, virtualKey)) {
756 fRunDefWndProc = TRUE;
757 }
758 }
759 else {
760 // send WM_SYSKEYDOWN message
761 if (win32wnd->MsgSysKeyDown (repeatCount, scanCode, virtualKey, keyWasPressed))
762 fRunDefWndProc = TRUE;
763 }
764 }
765
766 thdb = GetThreadTHDB();
767 if(thdb) {
768 fTranslated = thdb->fMsgTranslated;
769 thdb->fMsgTranslated = FALSE; //reset flag
770 }
771 //NOTE: These actually need to be posted so that the next message retrieved by GetMessage contains
772 // the newly generated WM_CHAR message.
773 if(fTranslated && !((flags & KC_KEYUP) == KC_KEYUP)) {//TranslatedMessage was called before DispatchMessage, so send WM_CHAR messages
774 ULONG keyflags = 0, vkey = 0;
775 ULONG fl = SHORT1FROMMP(mp1);
776
777 if(!(fl & KC_CHAR)) {
778 goto RunDefWndProc;
779 }
780 if(fl & KC_VIRTUALKEY) {
781 vkey = SHORT2FROMMP(mp2);
782 }
783 if(fl & KC_KEYUP) {
784 keyflags |= KEY_UP;
785 }
786 if(fl & KC_ALT) {
787 keyflags |= KEY_ALTDOWN;
788 }
789 if(fl & KC_PREVDOWN) {
790 keyflags |= KEY_PREVDOWN;
791 }
792 if(fl & KC_DEADKEY) {
793 keyflags |= KEY_DEADKEY;
794 }
795 if(win32wnd->MsgChar(SHORT1FROMMP(mp2), CHAR3FROMMP(mp1), CHAR4FROMMP(mp1), virtualKey, keyflags)) {
796 goto RunDefWndProc;
797 }
798 }
799 if(fRunDefWndProc) goto RunDefWndProc;
800 break;
801 }
802
803 case WM_INITMENU:
804 case WM_MENUSELECT:
805 case WM_MENUEND:
806 case WM_NEXTMENU:
807 goto RunDefWndProc;
808
809 case WM_TIMER:
810 if (mp2) win32wnd->MsgTimer((ULONG)mp1);
811 goto RunDefWndProc;
812
813 case WM_SETWINDOWPARAMS:
814 {
815 WNDPARAMS *wndParams = (WNDPARAMS *)mp1;
816
817 dprintf(("OS2: WM_SETWINDOWPARAMS %x", hwnd));
818 if(wndParams->fsStatus & WPM_TEXT) {
819 if(win32wnd->MsgSetText(wndParams->pszText, wndParams->cchText)) {
820 goto RunDefWndProc;
821 }
822 }
823 goto RunDefWndProc;
824 }
825
826 case WM_QUERYWINDOWPARAMS:
827 {
828 PWNDPARAMS wndpars = (PWNDPARAMS)mp1;
829 ULONG textlen;
830 PSZ wintext;
831
832 if(wndpars->fsStatus & (WPM_CCHTEXT | WPM_TEXT))
833 {
834 if(wndpars->fsStatus & WPM_CCHTEXT)
835 wndpars->cchText = win32wnd->MsgGetTextLength();
836 if(wndpars->fsStatus & WPM_TEXT)
837 wndpars->pszText = win32wnd->MsgGetText();
838
839 wndpars->fsStatus = 0;
840 wndpars->cbCtlData = 0;
841 wndpars->cbPresParams = 0;
842 RestoreOS2TIB();
843 return (MRESULT)TRUE;
844 }
845 goto RunDefWndProc;
846 }
847
848 case WM_ERASEBACKGROUND:
849 {
850 dprintf(("OS2: WM_ERASEBACKGROUND %x", win32wnd->getWindowHandle()));
851 if (!win32wnd->isSupressErase()) {
852 BOOL erased = sendEraseBkgnd (win32wnd);
853 win32wnd->setEraseBkgnd (!erased, !erased);
854 }
855 break;
856 }
857
858 case WM_PAINT:
859 dprintf(("OS2: WM_PAINT %x", hwnd));
860
861 if (WinQueryUpdateRect (hwnd, NULL)) {
862 if (!win32wnd->isSupressErase()) {
863 BOOL erased = sendEraseBkgnd (win32wnd);
864 win32wnd->setEraseBkgnd (!erased, !erased);
865 }
866 }
867 win32wnd->setSupressErase (FALSE);
868
869 if(win32wnd->MsgPaint(0, 0)) {
870 goto RunDefWndProc;
871 }
872 break;
873
874 case WM_HITTEST:
875 // Only send this message if the window is enabled
876 if (WinIsWindowEnabled(hwnd))
877 {
878 if(win32wnd->MsgHitTest((*(POINTS *)&mp1).x, MapOS2ToWin32Y(OSLIB_HWND_DESKTOP, hwnd, (*(POINTS *)&mp1).y))) {
879 goto RunDefWndProc;
880 }
881 }
882 else goto RunDefWndProc;
883 break;
884
885 case WM_SYSCOLORCHANGE:
886 case WM_SYSVALUECHANGED:
887 case WM_CALCVALIDRECTS:
888 case WM_SETSELECTION:
889 case WM_PPAINT:
890 case WM_PSETFOCUS:
891 case WM_PSYSCOLORCHANGE:
892 case WM_PSIZE:
893 case WM_PACTIVATE:
894 case WM_PCONTROL:
895 case WM_HELP:
896 case WM_APPTERMINATENOTIFY:
897 case WM_PRESPARAMCHANGED:
898 case WM_DRAWITEM:
899 case WM_MEASUREITEM:
900 case WM_CONTROLPOINTER:
901 case WM_QUERYDLGCODE:
902 case WM_SUBSTITUTESTRING:
903 case WM_MATCHMNEMONIC:
904 case WM_SAVEAPPLICATION:
905 case WM_SEMANTICEVENT:
906 default:
907// dprintf(("OS2: RunDefWndProc msg %x for %x", msg, hwnd));
908 RestoreOS2TIB();
909 return WinDefWindowProc( hwnd, msg, mp1, mp2 );
910 }
911 RestoreOS2TIB();
912 return (MRESULT)FALSE;
913
914RunDefWndProc:
915// dprintf(("OS2: RunDefWndProc msg %x for %x", msg, hwnd));
916 RestoreOS2TIB();
917 return WinDefWindowProc( hwnd, msg, mp1, mp2 );
918} /* End of Win32WindowProc */
919//******************************************************************************
920//******************************************************************************
921MRESULT EXPENTRY Win32SubclassWindowProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
922{
923 Win32BaseWindow* win32wnd;
924
925 //Restore our FS selector
926 SetWin32TIB();
927
928 win32wnd = Win32BaseWindow::GetWindowFromOS2Handle(hwnd);
929
930 if (!win32wnd)
931 {
932 dprintf(("Invalid win32wnd pointer for subclassed window %x!!", hwnd));
933 goto RunDefWndProc;
934 }
935
936 switch (msg)
937 {
938 case WM_WINDOWPOSCHANGED:
939 {
940 PSWP pswp = (PSWP)mp1;
941 PSWP pswpo = pswp + 1;
942 WINDOWPOS wp;
943 HWND hParent = NULLHANDLE, hFrame = NULLHANDLE;
944
945 if ((pswp->fl & (SWP_SIZE | SWP_MOVE | SWP_ZORDER)) == 0) break;
946
947 if(pswp->fl & (SWP_MOVE | SWP_SIZE))
948 hFrame = WinQueryWindow(hwnd, QW_PARENT);
949
950 OSLibMapSWPtoWINDOWPOS(pswp,&wp,pswpo,hParent,hFrame);
951 win32wnd->MsgPosChanged((LPARAM)&wp);
952
953 goto RunOldWndProc;
954 }
955
956 default:
957 goto RunDefHandler;
958 }
959
960RunDefWndProc:
961 RestoreOS2TIB();
962 return WinDefWindowProc(hwnd,msg,mp1,mp2);
963
964RunOldWndProc:
965 RestoreOS2TIB();
966 return ((PFNWP)win32wnd->getOldWndProc())(hwnd,msg,mp1,mp2);
967
968RunDefHandler:
969 RestoreOS2TIB();
970 return Win32WindowProc(hwnd,msg,mp1,mp2);
971}
972
973PVOID SubclassWithDefHandler(HWND hwnd)
974{
975 return WinSubclassWindow(hwnd,Win32SubclassWindowProc);
976}
Note: See TracBrowser for help on using the repository browser.