source: trunk/src/user32/new/pmwindow.cpp@ 2421

Last change on this file since 2421 was 2421, checked in by cbratschi, 26 years ago

fixed WM_CALCVALIDRECTS, added region for WM_NCPAINT
File size: 15.7 KB
Line 
1/* $Id: pmwindow.cpp,v 1.37 2000-01-12 17:37:29 cbratschi 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#define INCL_DEV /* Device Function definitions */
15#define INCL_GPICONTROL /* GPI control Functions */
16#define INCL_DOSPROCESS
17
18#include <os2wrap.h>
19#include <stdlib.h>
20#include <string.h>
21#include "win32type.h"
22#include <winconst.h>
23#include <wprocess.h>
24#include <misc.h>
25#include <win32wbase.h>
26#include <win32dlg.h>
27#include "win32wdesktop.h"
28#include "pmwindow.h"
29#include "oslibwin.h"
30#include "oslibutil.h"
31#include "oslibgdi.h"
32#include "oslibmsg.h"
33#include "dc.h"
34#include <thread.h>
35#include <wprocess.h>
36#include "caret.h"
37#include "timer.h"
38#include <codepage.h>
39
40HMQ hmq = 0; /* Message queue handle */
41HAB hab = 0;
42
43RECTL desktopRectl = {0};
44ULONG ScreenWidth = 0;
45ULONG ScreenHeight = 0;
46ULONG ScreenBitsPerPel = 0;
47
48
49MRESULT EXPENTRY Win32WindowProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2);
50
51//******************************************************************************
52//Initialize PM; create hab, message queue and register special Win32 window classes
53//******************************************************************************
54BOOL InitPM()
55{
56 CLASSINFO FrameClassInfo;
57
58 hab = WinInitialize(0);
59 dprintf(("Winitialize returned %x", hab));
60 hmq = WinCreateMsgQueue(hab, 0);
61
62 if(!hab || !hmq)
63 {
64 UINT error;
65 //CB: only fail on real error
66 error = WinGetLastError(hab) & 0xFFFF; //error code
67 if (!hab || (error != PMERR_MSG_QUEUE_ALREADY_EXISTS))
68 {
69 dprintf(("WinInitialize or WinCreateMsgQueue failed %x %x", hab, hmq));
70 dprintf((" Error = %x",error));
71 return(FALSE);
72 }
73 else
74 {
75 if(!hab) {
76 hab = WinQueryAnchorBlock(HWND_DESKTOP);
77 dprintf(("WinQueryAnchorBlock returned %x", hab));
78 }
79 if(!hmq) {
80 hmq = HMQ_CURRENT;
81 }
82 }
83 }
84 SetThreadHAB(hab);
85 dprintf(("InitPM: hmq = %x", hmq));
86 SetThreadMessageQueue(hmq);
87
88 BOOL rc = WinSetCp(hmq, GetDisplayCodepage());
89 dprintf(("InitPM: WinSetCP was %sOK", rc ? "" : "not "));
90
91 if(!WinRegisterClass( /* Register window class */
92 hab, /* Anchor block handle */
93 (PSZ)WIN32_STDCLASS, /* Window class name */
94 (PFNWP)Win32WindowProc, /* Address of window procedure */
95 0,
96 NROF_WIN32WNDBYTES)) {
97 dprintf(("WinRegisterClass Win32BaseWindow failed"));
98 return(FALSE);
99 }
100 if(!WinRegisterClass( /* Register window class */
101 hab, /* Anchor block handle */
102 (PSZ)WIN32_STDCLASS2, /* Window class name */
103 (PFNWP)Win32WindowProc, /* Address of window procedure */
104 CS_SAVEBITS,
105 NROF_WIN32WNDBYTES)) {
106 dprintf(("WinRegisterClass Win32BaseWindow failed"));
107 return(FALSE);
108 }
109 if (!WinQueryClassInfo (hab, WC_FRAME, &FrameClassInfo)) {
110 dprintf (("WinQueryClassInfo WC_FRAME failed"));
111 return (FALSE);
112 }
113 FrameClassInfo.flClassStyle &= ~(CS_PUBLIC | CS_CLIPSIBLINGS);
114 if (!WinRegisterClass (hab,
115 WIN32_INNERFRAME,
116 FrameClassInfo.pfnWindowProc,
117 FrameClassInfo.flClassStyle,
118 FrameClassInfo.cbWindowData)) {
119 dprintf (("WinRegisterClass Win32InnerFrame failed"));
120 return (FALSE);
121 }
122
123 WinQueryWindowRect(HWND_DESKTOP, &desktopRectl);
124 ScreenWidth = desktopRectl.xRight;
125 ScreenHeight = desktopRectl.yTop;
126
127
128 HDC hdc; /* Device-context handle */
129 /* context data structure */
130 DEVOPENSTRUC dop = {NULL, "DISPLAY", NULL, NULL, NULL, NULL,
131 NULL, NULL, NULL};
132
133 /* create memory device context */
134 hdc = DevOpenDC(hab, OD_MEMORY, "*", 5L, (PDEVOPENDATA)&dop, NULLHANDLE);
135 DevQueryCaps(hdc, CAPS_COLOR_BITCOUNT, 1, (PLONG)&ScreenBitsPerPel);
136 DevCloseDC(hdc);
137
138 dprintf(("InitPM: Desktop (%d,%d)", ScreenWidth, ScreenHeight));
139 return OSLibInitMsgQueue();
140} /* End of main */
141//******************************************************************************
142//Win32 window message handler
143//******************************************************************************
144MRESULT EXPENTRY Win32WindowProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
145{
146 POSTMSG_PACKET *postmsg;
147 OSLIBPOINT point, ClientPoint;
148 Win32BaseWindow *win32wnd;
149 THDB *thdb;
150 APIRET rc = 0;
151 MSG winMsg, *pWinMsg;
152
153 //Restore our FS selector
154 SetWin32TIB();
155
156 thdb = GetThreadTHDB();
157 win32wnd = Win32BaseWindow::GetWindowFromOS2Handle(hwnd);
158
159 if(!thdb || (msg != WM_CREATE && win32wnd == NULL)) {
160 dprintf(("Invalid win32wnd pointer for window %x msg %x", hwnd, msg));
161 goto RunDefWndProc;
162 }
163
164 if((thdb->msgstate & 1) == 0)
165 {//message that was sent directly to our window proc handler; translate it here
166 QMSG qmsg;
167
168 qmsg.msg = msg;
169 qmsg.hwnd = hwnd;
170 qmsg.mp1 = mp1;
171 qmsg.mp2 = mp2;
172 qmsg.time = WinQueryMsgTime(thdb->hab);
173 WinQueryMsgPos(thdb->hab, &qmsg.ptl);
174 qmsg.reserved = 0;
175
176 if(OS2ToWinMsgTranslate((PVOID)thdb, &qmsg, &winMsg, FALSE, MSG_REMOVE) == FALSE)
177 {//message was not translated
178 memset(&winMsg, 0, sizeof(MSG));
179 }
180 pWinMsg = &winMsg;
181 }
182 else {
183 pWinMsg = &thdb->msg;
184 thdb->msgstate++;
185 }
186
187 if(msg == WIN32APP_POSTMSG) {
188 //probably win32 app user message
189 if((ULONG)mp1 == WIN32MSG_MAGICA) {
190 return (MRESULT)win32wnd->DispatchMsgA(pWinMsg);
191 }
192 else
193 if((ULONG)mp1 == WIN32MSG_MAGICW) {
194 return (MRESULT)win32wnd->DispatchMsgW(pWinMsg);
195 }
196 }
197 switch( msg )
198 {
199 //OS/2 msgs
200 case WM_CREATE:
201 {
202
203 if(thdb->newWindow == 0)
204 goto createfail;
205
206 //Processing is done in after WinCreateWindow returns
207 dprintf(("OS2: WM_CREATE %x", hwnd));
208 win32wnd = (Win32BaseWindow *)thdb->newWindow;
209 thdb->newWindow = 0;
210
211 if(win32wnd->MsgCreate(WinQueryWindow(hwnd, QW_PARENT), hwnd) == FALSE)
212 {
213 RestoreOS2TIB();
214 return (MRESULT)TRUE; //discontinue window creation
215 }
216 createfail:
217 RestoreOS2TIB();
218 return (MRESULT)FALSE;
219 }
220
221 case WM_QUIT:
222 dprintf(("OS2: WM_QUIT %x", hwnd));
223 win32wnd->MsgQuit();
224 break;
225
226 case WM_CLOSE:
227 dprintf(("OS2: WM_CLOSE %x", hwnd));
228 win32wnd->MsgClose();
229 break;
230
231 case WM_DESTROY:
232 dprintf(("OS2: WM_DESTROY %x", hwnd));
233 win32wnd->MsgDestroy();
234 break;
235
236 case WM_ENABLE:
237 dprintf(("OS2: WM_ENABLE %x", hwnd));
238 win32wnd->MsgEnable(SHORT1FROMMP(mp1));
239 break;
240
241 case WM_SHOW:
242 dprintf(("OS2: WM_SHOW %x %d", hwnd, mp1));
243 win32wnd->MsgShow((ULONG)mp1);
244 break;
245
246 case WM_ADJUSTWINDOWPOS:
247 {
248 PSWP pswp = (PSWP)mp1;
249 dprintf(("PMWINDOW: WM_WINDOWPOSCHANGED (%x) %x %x (%d,%d) (%d,%d)", mp2, win32wnd->getWindowHandle(), pswp->fl, pswp->x, pswp->y, pswp->cx, pswp->cy));
250 goto RunDefWndProc;
251 }
252
253 case WM_WINDOWPOSCHANGED:
254 {
255 win32wnd->MsgPosChanged((LPARAM)&thdb->wp);
256 goto RunDefWndProc;
257 }
258
259 case WM_ACTIVATE:
260 {
261 HWND hwndActivate = (HWND)mp2;
262 BOOL fMinimized = FALSE;
263
264 dprintf(("OS2: WM_ACTIVATE %x %x", hwnd, hwndActivate));
265 if(WinQueryWindowULong(hwndActivate, OFFSET_WIN32PM_MAGIC) != WIN32PM_MAGIC) {
266 //another (non-win32) application's window
267 //set to NULL (allowed according to win32 SDK) to avoid problems
268 hwndActivate = NULL;
269 }
270 if(WinQueryWindowULong(hwnd, QWL_STYLE) & WS_MINIMIZED)
271 {
272 fMinimized = TRUE;
273 }
274
275 win32wnd->MsgActivate(SHORT1FROMMP(mp1), fMinimized, Win32BaseWindow::OS2ToWin32Handle(hwndActivate));
276 break;
277 }
278
279 case WM_SIZE:
280 {
281 dprintf(("OS2: WM_SIZE (%d,%d) (%d,%d)", SHORT1FROMMP(mp2), SHORT2FROMMP(mp2), SHORT1FROMMP(mp1), SHORT2FROMMP(mp2)));
282 break;
283 }
284
285 case WM_MINMAXFRAME:
286 {
287 dprintf(("OS2: WM_MINMAXFRAME"));
288 break;
289 }
290
291 case WM_OWNERPOSCHANGE:
292 {
293 dprintf(("OS2: WM_OWNERPOSCHANGE"));
294 goto RunDefWndProc;
295 }
296
297 case WM_CALCVALIDRECTS:
298 {
299 PRECTL oldRect = (PRECTL)mp1,newRect = oldRect+1;
300 UINT res = CVR_ALIGNLEFT | CVR_ALIGNTOP;
301
302//CB: todo: use WM_NCCALCSIZE result
303 if (win32wnd->getWindowClass())
304 {
305 DWORD dwStyle = win32wnd->getWindowClass()->getClassLongA(GCL_STYLE_W);
306
307 if ((dwStyle & CS_HREDRAW_W) && (newRect->xRight-newRect->xLeft != oldRect->xRight-oldRect->xLeft))
308 res |= CVR_REDRAW;
309 else if ((dwStyle & CS_VREDRAW_W) && (newRect->yTop-newRect->yBottom != oldRect->yTop-oldRect->yBottom))
310 res |= CVR_REDRAW;
311 } else res |= CVR_REDRAW;
312
313 RestoreOS2TIB();
314 WinDefWindowProc(hwnd,msg,mp1,mp2);
315 RestoreOS2TIB();
316 return (MRESULT)res;
317 }
318
319 case WM_SETFOCUS:
320 {
321 HWND hwndFocus = (HWND)mp1;
322
323 dprintf(("OS2: WM_SETFOCUS %x %x %d", win32wnd->getWindowHandle(), mp1, mp2));
324 if(WinQueryWindowULong(hwndFocus, OFFSET_WIN32PM_MAGIC) != WIN32PM_MAGIC) {
325 //another (non-win32) application's window
326 //set to NULL (allowed according to win32 SDK) to avoid problems
327 hwndFocus = NULL;
328 }
329 if((ULONG)mp2 == TRUE) {
330 HWND hwndFocusWin32 = Win32BaseWindow::OS2ToWin32Handle(hwndFocus);
331 recreateCaret (hwndFocusWin32);
332 win32wnd->MsgSetFocus(hwndFocusWin32);
333 }
334 else win32wnd->MsgKillFocus(Win32BaseWindow::OS2ToWin32Handle(hwndFocus));
335 break;
336 }
337
338 //**************************************************************************
339 //Mouse messages (OS/2 Window coordinates -> Win32 coordinates relative to screen
340 //**************************************************************************
341 case WM_BUTTON1DOWN:
342 case WM_BUTTON1UP:
343 case WM_BUTTON1DBLCLK:
344 case WM_BUTTON2DOWN:
345 case WM_BUTTON2UP:
346 case WM_BUTTON2DBLCLK:
347 case WM_BUTTON3DOWN:
348 case WM_BUTTON3UP:
349 case WM_BUTTON3DBLCLK:
350 win32wnd->MsgButton(pWinMsg);
351 rc = TRUE;
352 break;
353
354 case WM_BUTTON2MOTIONSTART:
355 case WM_BUTTON2MOTIONEND:
356 case WM_BUTTON2CLICK:
357 case WM_BUTTON1MOTIONSTART:
358 case WM_BUTTON1MOTIONEND:
359 case WM_BUTTON1CLICK:
360 case WM_BUTTON3MOTIONSTART:
361 case WM_BUTTON3MOTIONEND:
362 case WM_BUTTON3CLICK:
363 goto RunDefWndProc;
364
365 case WM_MOUSEMOVE:
366 {
367 //OS/2 Window coordinates -> Win32 Window coordinates
368 win32wnd->MsgMouseMove(pWinMsg);
369 break;
370 }
371
372 case WM_CONTROL:
373 goto RunDefWndProc;
374
375 case WM_COMMAND:
376 dprintf(("OS2: WM_COMMAND %x %x %x", hwnd, mp1, mp2));
377 win32wnd->DispatchMsgA(pWinMsg);
378 break;
379
380 case WM_SYSCOMMAND:
381 win32wnd->DispatchMsgA(pWinMsg);
382 break;
383
384 case WM_CHAR:
385 win32wnd->DispatchMsgA(pWinMsg);
386 break;
387
388 case WM_TIMER:
389 win32wnd->DispatchMsgA(pWinMsg);
390 goto RunDefWndProc;
391
392 case WM_SETWINDOWPARAMS:
393 {
394 WNDPARAMS *wndParams = (WNDPARAMS *)mp1;
395
396 dprintf(("OS2: WM_SETWINDOWPARAMS %x", hwnd));
397 if(wndParams->fsStatus & WPM_TEXT) {
398 win32wnd->MsgSetText(wndParams->pszText, wndParams->cchText);
399 }
400 goto RunDefWndProc;
401 }
402
403 case WM_QUERYWINDOWPARAMS:
404 {
405 PWNDPARAMS wndpars = (PWNDPARAMS)mp1;
406 ULONG textlen;
407 PSZ wintext;
408
409 if(wndpars->fsStatus & (WPM_CCHTEXT | WPM_TEXT))
410 {
411 if(wndpars->fsStatus & WPM_CCHTEXT)
412 wndpars->cchText = win32wnd->MsgGetTextLength();
413 if(wndpars->fsStatus & WPM_TEXT)
414 wndpars->pszText = win32wnd->MsgGetText();
415
416 wndpars->fsStatus = 0;
417 wndpars->cbCtlData = 0;
418 wndpars->cbPresParams = 0;
419 RestoreOS2TIB();
420 return (MRESULT)TRUE;
421 }
422 goto RunDefWndProc;
423 }
424
425 case WM_PAINT:
426 win32wnd->DispatchMsgA(pWinMsg);
427 goto RunDefWndProc;
428
429 case WM_CONTEXTMENU:
430 {
431 win32wnd->DispatchMsgA(pWinMsg);
432
433 RestoreOS2TIB();
434 return (MRESULT)TRUE;
435 }
436
437 case WM_ERASEBACKGROUND:
438 {
439 dprintf(("OS2: WM_ERASEBACKGROUND %x", win32wnd->getWindowHandle()));
440 break;
441 }
442
443 case WM_FOCUSCHANGE:
444 dprintf(("OS2: WM_FOCUSCHANGE %x", win32wnd->getWindowHandle()));
445 goto RunDefWndProc;
446
447 case WM_INITMENU:
448 case WM_MENUSELECT:
449 case WM_MENUEND:
450 case WM_NEXTMENU:
451 case WM_SYSCOLORCHANGE:
452 case WM_SYSVALUECHANGED:
453 case WM_SETSELECTION:
454 case WM_PPAINT:
455 case WM_PSETFOCUS:
456 case WM_PSYSCOLORCHANGE:
457 case WM_PSIZE:
458 case WM_PACTIVATE:
459 case WM_PCONTROL:
460 case WM_HELP:
461 case WM_APPTERMINATENOTIFY:
462 case WM_PRESPARAMCHANGED:
463 case WM_DRAWITEM:
464 case WM_MEASUREITEM:
465 case WM_CONTROLPOINTER:
466 case WM_QUERYDLGCODE:
467 case WM_SUBSTITUTESTRING:
468 case WM_MATCHMNEMONIC:
469 case WM_SAVEAPPLICATION:
470 case WM_SEMANTICEVENT:
471 default:
472 //dprintf(("OS2: RunDefWndProc msg %x for %x", msg, hwnd));
473 RestoreOS2TIB();
474 return WinDefWindowProc( hwnd, msg, mp1, mp2 );
475 }
476 RestoreOS2TIB();
477 return (MRESULT)rc;
478
479RunDefWndProc:
480// dprintf(("OS2: RunDefWndProc msg %x for %x", msg, hwnd));
481 RestoreOS2TIB();
482
483 return WinDefWindowProc( hwnd, msg, mp1, mp2 );
484} /* End of Win32WindowProc */
485//******************************************************************************
486//******************************************************************************
487MRESULT EXPENTRY Win32SubclassWindowProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
488{
489 Win32BaseWindow* win32wnd;
490
491 //Restore our FS selector
492 SetWin32TIB();
493
494 win32wnd = Win32BaseWindow::GetWindowFromOS2Handle(hwnd);
495
496 if (!win32wnd)
497 {
498 dprintf(("Invalid win32wnd pointer for subclassed window %x!!", hwnd));
499 goto RunDefWndProc;
500 }
501
502 switch (msg)
503 {
504 case WM_WINDOWPOSCHANGED:
505 {
506 PSWP pswp = (PSWP)mp1;
507 SWP swpOld = *(pswp + 1);
508 WINDOWPOS wp;
509 HWND hParent = NULLHANDLE, hFrame = NULLHANDLE;
510
511 dprintf(("OS2Subclass: WM_WINDOWPOSCHANGED %x %x (%d,%d) (%d,%d)", hwnd, pswp->fl, pswp->x, pswp->y, pswp->cx, pswp->cy));
512 if ((pswp->fl & (SWP_SIZE | SWP_MOVE | SWP_ZORDER)) == 0) break;
513
514 hParent = hFrame = WinQueryWindow(hwnd, QW_PARENT);
515
516 OSLibMapSWPtoWINDOWPOS(pswp,&wp, &swpOld,hParent,hFrame);
517
518 win32wnd->setWindowRect(swpOld.x, swpOld.y, swpOld.x + swpOld.cx, swpOld.y + swpOld.cy);
519 //win32wnd->setClientRect(swpOld.x, swpOld.y, swpOld.x + swpOld.cx, swpOld.y + swpOld.cy);
520 wp.x = swpOld.x;
521 wp.y = swpOld.y;
522 wp.cx = swpOld.cx;
523 wp.cy = swpOld.cy;
524
525 wp.hwnd = win32wnd->getWindowHandle();
526
527 win32wnd->MsgPosChanged((LPARAM)&wp);
528
529 goto RunOldWndProc;
530 }
531
532 default:
533 goto RunDefHandler;
534 }
535
536RunDefWndProc:
537 RestoreOS2TIB();
538 return WinDefWindowProc(hwnd,msg,mp1,mp2);
539
540RunOldWndProc:
541 RestoreOS2TIB();
542 return ((PFNWP)win32wnd->getOldWndProc())(hwnd,msg,mp1,mp2);
543
544RunDefHandler:
545 RestoreOS2TIB();
546 return Win32WindowProc(hwnd,msg,mp1,mp2);
547}
548
549PVOID SubclassWithDefHandler(HWND hwnd)
550{
551 return WinSubclassWindow(hwnd,Win32SubclassWindowProc);
552}
Note: See TracBrowser for help on using the repository browser.