source: trunk/src/user32/win32wbase.cpp@ 4188

Last change on this file since 4188 was 4188, checked in by sandervl, 25 years ago

SetWindowLong changes + fixes for GWL_WNDPROC

File size: 113.8 KB
Line 
1/* $Id: win32wbase.cpp,v 1.210 2000-09-04 18:23:56 sandervl Exp $ */
2/*
3 * Win32 Window Base Class for OS/2
4 *
5 * Copyright 1998-2000 Sander van Leeuwen (sandervl@xs4all.nl)
6 * Copyright 1999 Daniela Engert (dani@ngrt.de)
7 * Copyright 1999-2000 Christoph Bratschi (cbratschi@datacomm.ch)
8 *
9 * Parts based on Wine Windows code (windows\win.c)
10 * Corel version: corel20000212
11 *
12 * Copyright 1993, 1994, 1996 Alexandre Julliard
13 * 1995 Alex Korobka
14 *
15 * TODO: Not thread/process safe
16 *
17 * NOTE: Client rectangle always relative to frame window
18 * Window rectangle in parent coordinates (relative to parent's client window)
19 * (screen coord. if no parent)
20 *
21 * Project Odin Software License can be found in LICENSE.TXT
22 *
23 */
24#include <os2win.h>
25#include <win.h>
26#include <stdlib.h>
27#include <string.h>
28#include <stdarg.h>
29#include <assert.h>
30#include <misc.h>
31#include <heapstring.h>
32#include <win32wbase.h>
33#include "wndmsg.h"
34#include "oslibwin.h"
35#include "oslibmsg.h"
36#include "oslibutil.h"
37#include "oslibgdi.h"
38#include "oslibres.h"
39#include "oslibdos.h"
40#include "syscolor.h"
41#include "win32wndhandle.h"
42#include "dc.h"
43#include "win32wdesktop.h"
44#include "pmwindow.h"
45#include "controls.h"
46#include <wprocess.h>
47#include <win\hook.h>
48#include <menu.h>
49#define INCL_TIMERWIN32
50#include "timer.h"
51
52#define DBG_LOCALLOG DBG_win32wbase
53#include "dbglocal.h"
54
55/* bits in the dwKeyData */
56#define KEYDATA_ALT 0x2000
57#define KEYDATA_PREVSTATE 0x4000
58
59void PrintWindowStyle(DWORD dwStyle, DWORD dwExStyle);
60
61static fDestroyAll = FALSE;
62//For quick lookup of current process id
63static ULONG currentProcessId = -1;
64
65//******************************************************************************
66//******************************************************************************
67Win32BaseWindow::Win32BaseWindow(DWORD objType) : GenericObject(&windows, objType)
68{
69 Init();
70}
71//******************************************************************************
72//******************************************************************************
73Win32BaseWindow::Win32BaseWindow(CREATESTRUCTA *lpCreateStructA, ATOM classAtom, BOOL isUnicode)
74 : GenericObject(&windows, OBJTYPE_WINDOW), ChildWindow()
75{
76 Init();
77 this->isUnicode = isUnicode;
78 CreateWindowExA(lpCreateStructA, classAtom);
79}
80//******************************************************************************
81//******************************************************************************
82void Win32BaseWindow::Init()
83{
84 isUnicode = FALSE;
85 fFirstShow = TRUE;
86 fIsDialog = FALSE;
87 fIsModalDialogOwner = FALSE;
88 OS2HwndModalDialog = 0;
89 fInternalMsg = FALSE;
90 fNoSizeMsg = FALSE;
91 fIsDestroyed = FALSE;
92 fDestroyWindowCalled = FALSE;
93 fCreated = FALSE;
94 fTaskList = FALSE;
95 fParentDC = FALSE;
96 fComingToTop = FALSE;
97
98 windowNameA = NULL;
99 windowNameW = NULL;
100 wndNameLength = 0;
101
102 userWindowLong = NULL;;
103 nrUserWindowLong = 0;
104
105 magic = WIN32PM_MAGIC;
106 OS2Hwnd = 0;
107 hSysMenu = 0;
108 Win32Hwnd = 0;
109
110 if(HwAllocateWindowHandle(&Win32Hwnd, (ULONG)this) == FALSE)
111 {
112 dprintf(("Win32BaseWindow::Init HwAllocateWindowHandle failed!!"));
113 DebugInt3();
114 }
115
116 posx = posy = 0;
117 width = height = 0;
118
119 dwExStyle = 0;
120 dwStyle = 0;
121 win32wndproc = 0;
122 hInstance = 0;
123 dwIDMenu = 0; //0xFFFFFFFF; //default -1
124 userData = 0;
125 contextHelpId = 0;
126 hotkey = 0;
127
128
129 hwndLinkAfter = HWND_BOTTOM;
130 flags = 0;
131 lastHitTestVal = HTOS_NORMAL;
132 owner = NULL;
133 windowClass = 0;
134
135 hIcon = 0;
136 hIconSm = 0;
137
138 EraseBkgndFlag = TRUE;
139
140 horzScrollInfo = NULL;
141 vertScrollInfo = NULL;
142
143 propertyList = NULL;
144
145 ownDC = 0;
146 hWindowRegion = 0;
147 hClipRegion = 0;
148
149 hTaskList = 0;
150
151 if(currentProcessId == -1)
152 {
153 currentProcessId = GetCurrentProcessId();
154 }
155 dwThreadId = GetCurrentThreadId();
156 dwProcessId = currentProcessId;
157
158 memset(&windowpos, 0, sizeof(windowpos));
159}
160//******************************************************************************
161//todo get rid of resources (menu, icon etc)
162//******************************************************************************
163Win32BaseWindow::~Win32BaseWindow()
164{
165 if(hTaskList) {
166 OSLibWinRemoveFromTasklist(hTaskList);
167 }
168
169 OSLibWinSetVisibleRegionNotify(OS2Hwnd, FALSE);
170 OSLibWinSetWindowULong(OS2Hwnd, OFFSET_WIN32WNDPTR, 0);
171 OSLibWinSetWindowULong(OS2Hwnd, OFFSET_WIN32PM_MAGIC, 0);
172
173 if(!fDestroyAll && getParent() && getParent()->getFirstChild() == this && getNextChild() == NULL)
174 {
175 //if we're the last child that's being destroyed and our
176 //parent window was also destroyed, then we delete the parent object
177 if(getParent()->IsWindowDestroyed())
178 {
179 dprintf(("Last Child (%x) destroyed, get rid of our parent window (%x)", getWindowHandle(), getParent()->getWindowHandle()));
180 delete getParent();
181 setParent(NULL); //or else we'll crash in the dtor of the ChildWindow class
182 }
183 }
184 else
185 if(fDestroyAll) {
186 dprintf(("Destroying window %x %s", getWindowHandle(), windowNameA));
187 setParent(NULL); //or else we'll crash in the dtor of the ChildWindow class
188 }
189
190 if(isOwnDC())
191 releaseOwnDC(ownDC);
192
193 if(Win32Hwnd)
194 HwFreeWindowHandle(Win32Hwnd);
195
196 if(userWindowLong)
197 free(userWindowLong);
198
199 if(windowNameA) {
200 free(windowNameA);
201 windowNameA = NULL;
202 }
203 if(windowNameW) {
204 free(windowNameW);
205 windowNameW = NULL;
206 }
207 if(vertScrollInfo) {
208 free(vertScrollInfo);
209 vertScrollInfo = NULL;
210 }
211 if(horzScrollInfo) {
212 free(horzScrollInfo);
213 horzScrollInfo = NULL;
214 }
215 if(propertyList) {
216 removeWindowProps();
217 }
218}
219//******************************************************************************
220//******************************************************************************
221void Win32BaseWindow::DestroyAll()
222{
223 fDestroyAll = TRUE;
224 GenericObject::DestroyAll(windows);
225}
226//******************************************************************************
227//******************************************************************************
228BOOL Win32BaseWindow::isChild()
229{
230 return ((dwStyle & WS_CHILD) != 0);
231}
232//******************************************************************************
233//******************************************************************************
234BOOL Win32BaseWindow::IsWindowUnicode()
235{
236 dprintf2(("IsWindowUnicode %x %d", getWindowHandle(), WINPROC_GetProcType(getWindowProc()) == WIN_PROC_32W));
237 return (WINPROC_GetProcType(getWindowProc()) == WIN_PROC_32W);
238}
239//******************************************************************************
240//******************************************************************************
241BOOL Win32BaseWindow::CreateWindowExA(CREATESTRUCTA *cs, ATOM classAtom)
242{
243 char buffer[256];
244
245#ifdef DEBUG
246 PrintWindowStyle(cs->style, cs->dwExStyle);
247#endif
248
249 //If window has no owner/parent window, then it will be added to the tasklist
250 //(depending on visibility state)
251 if (!cs->hwndParent) fTaskList = TRUE;
252
253 sw = SW_SHOW;
254 SetLastError(0);
255
256 /* Find the parent window */
257 if (cs->hwndParent)
258 {
259 Win32BaseWindow *window = GetWindowFromHandle(cs->hwndParent);
260 if(!window) {
261 dprintf(("Bad parent %04x\n", cs->hwndParent ));
262 SetLastError(ERROR_INVALID_PARAMETER);
263 return FALSE;
264 }
265 /* Make sure parent is valid */
266 if (!window->IsWindow() )
267 {
268 dprintf(("Bad parent %04x\n", cs->hwndParent ));
269 SetLastError(ERROR_INVALID_PARAMETER);
270 return FALSE;
271 }
272 /* Windows does this for overlapped windows
273 * (I don't know about other styles.) */
274 if (cs->hwndParent == GetDesktopWindow() && (!(cs->style & WS_CHILD) || (cs->style & WS_POPUP)))
275 {
276 cs->hwndParent = 0;
277 }
278 }
279 else
280 if ((cs->style & WS_CHILD) && !(cs->style & WS_POPUP)) {
281 dprintf(("No parent for child window\n" ));
282 SetLastError(ERROR_INVALID_PARAMETER);
283 return FALSE; /* WS_CHILD needs a parent, but WS_POPUP doesn't */
284 }
285
286 /* Find the window class */
287 windowClass = Win32WndClass::FindClass(cs->hInstance, (LPSTR)classAtom);
288 if (!windowClass)
289 {
290 GlobalGetAtomNameA( classAtom, buffer, sizeof(buffer) );
291 dprintf(("Bad class '%s'\n", buffer ));
292 SetLastError(ERROR_INVALID_PARAMETER);
293 return 0;
294 }
295#ifdef DEBUG
296 if(HIWORD(cs->lpszClass))
297 {
298 char *astring;
299
300 if(isUnicode) astring = UnicodeToAsciiString((LPWSTR)cs->lpszClass);
301 else astring = (char *)cs->lpszClass;
302
303 dprintf(("Window class %s", astring));
304 if(isUnicode) FreeAsciiString(astring);
305 }
306 else dprintf(("Window class %x", cs->lpszClass));
307#endif
308
309 /* Fix the lpszClass field: from existing programs, it seems ok to call a CreateWindowXXX
310 * with an atom as the class name, put some programs expect to have a *REAL* string in
311 * lpszClass when the CREATESTRUCT is sent with WM_CREATE
312 */
313 if (!HIWORD(cs->lpszClass) ) {
314 if (isUnicode) {
315 GlobalGetAtomNameW( classAtom, (LPWSTR)buffer, sizeof(buffer) );
316 }
317 else {
318 GlobalGetAtomNameA( classAtom, buffer, sizeof(buffer) );
319 }
320 cs->lpszClass = buffer;
321 }
322
323 /* Fix the coordinates */
324 fXDefault = FALSE;
325 fCXDefault = FALSE;
326 if ((cs->x == CW_USEDEFAULT) || (cs->x == CW_USEDEFAULT16))
327 {
328 /* Never believe Microsoft's documentation... CreateWindowEx doc says
329 * that if an overlapped window is created with WS_VISIBLE style bit
330 * set and the x parameter is set to CW_USEDEFAULT, the system ignores
331 * the y parameter. However, disassembling NT implementation (WIN32K.SYS)
332 * reveals that
333 *
334 * 1) not only if checks for CW_USEDEFAULT but also for CW_USEDEFAULT16
335 * 2) it does not ignore the y parameter as the docs claim; instead, it
336 * uses it as second parameter to ShowWindow() unless y is either
337 * CW_USEDEFAULT or CW_USEDEFAULT16.
338 *
339 * The fact that we didn't do 2) caused bogus windows pop up when wine
340 * was running apps that were using this obscure feature. Example -
341 * calc.exe that comes with Win98 (only Win98, it's different from
342 * the one that comes with Win95 and NT)
343 */
344 if ((cs->y != CW_USEDEFAULT) && (cs->y != CW_USEDEFAULT16)) sw = cs->y;
345
346 /* We have saved cs->y, now we can trash it */
347 cs->x = 0;
348 cs->y = 0;
349 fXDefault = TRUE;
350 }
351 if ((cs->cx == CW_USEDEFAULT) || (cs->cx == CW_USEDEFAULT16))
352 {
353 cs->cx = 600; /* FIXME */
354 cs->cy = 400;
355 fCXDefault = TRUE;
356 }
357 if (cs->style & (WS_POPUP | WS_CHILD))
358 {
359 fXDefault = FALSE;
360 if (fCXDefault)
361 {
362 fCXDefault = FALSE;
363 cs->cx = cs->cy = 0;
364 }
365 }
366 if (fXDefault && !fCXDefault) fXDefault = FALSE; //CB: only x positioning doesn't work (calc.exe,cdrlabel.exe)
367
368 if (cs->x < 0) cs->x = 0;
369 if (cs->y < 0) cs->y = 0;
370
371 //Allocate window words
372 nrUserWindowLong = windowClass->getExtraWndWords();
373 if(nrUserWindowLong) {
374 userWindowLong = (ULONG *)_smalloc(nrUserWindowLong);
375 memset(userWindowLong, 0, nrUserWindowLong);
376 }
377
378 if ((cs->style & WS_CHILD) && cs->hwndParent)
379 {
380 SetParent(cs->hwndParent);
381// owner = GetWindowFromHandle(cs->hwndParent);
382 owner = 0;
383/* if(owner == NULL)
384 {
385 dprintf(("HwGetWindowHandleData couldn't find owner window %x!!!", cs->hwndParent));
386 SetLastError(ERROR_INVALID_WINDOW_HANDLE);
387 return FALSE;
388 }*/
389 //SvL: Shell positioning shouldn't be done for child windows! (breaks Notes)
390 fXDefault = fCXDefault = FALSE;
391 }
392 else
393 {
394 SetParent(0);
395 if (!cs->hwndParent || (cs->hwndParent == windowDesktop->getWindowHandle())) {
396 owner = NULL;
397 }
398 else
399 {
400 owner = GetWindowFromHandle(cs->hwndParent)->GetTopParent();
401 if(owner == NULL)
402 {
403 dprintf(("HwGetWindowHandleData couldn't find owner window %x!!!", cs->hwndParent));
404 SetLastError(ERROR_INVALID_WINDOW_HANDLE);
405 return FALSE;
406 }
407 }
408 }
409
410 WINPROC_SetProc((HWINDOWPROC *)&win32wndproc, windowClass->getWindowProc(), WINPROC_GetProcType(windowClass->getWindowProc()), WIN_PROC_WINDOW);
411 hInstance = cs->hInstance;
412 dwStyle = cs->style & ~WS_VISIBLE;
413 dwExStyle = cs->dwExStyle;
414
415 hwndLinkAfter = HWND_TOP;
416#if 1
417 if(CONTROLS_IsControl(this, BUTTON_CONTROL) && ((dwStyle & 0x0f) == BS_GROUPBOX))
418 {
419 hwndLinkAfter = HWND_BOTTOM;
420 dwStyle |= WS_CLIPSIBLINGS;
421 }
422 else
423#endif
424 if(CONTROLS_IsControl(this, STATIC_CONTROL) && !(dwStyle & WS_GROUP)) {
425 dwStyle |= WS_CLIPSIBLINGS;
426 }
427
428 /* Increment class window counter */
429 windowClass->IncreaseWindowCount();
430
431 if (HOOK_IsHooked( WH_CBT ))
432 {
433 CBT_CREATEWNDA cbtc;
434 LRESULT ret;
435
436 cbtc.lpcs = cs;
437 cbtc.hwndInsertAfter = hwndLinkAfter;
438 ret = HOOK_CallHooksA(WH_CBT, HCBT_CREATEWND, getWindowHandle(), (LPARAM)&cbtc);
439 if(ret)
440 {
441 dprintf(("CBT-hook returned 0!!"));
442 SetLastError(ERROR_CAN_NOT_COMPLETE); //todo: wrong error
443 return FALSE;
444 }
445 }
446
447 /* Correct the window style */
448 if (!(cs->style & WS_CHILD))
449 {
450 dwStyle |= WS_CLIPSIBLINGS;
451 if (!(cs->style & WS_POPUP))
452 {
453 dwStyle |= WS_CAPTION;
454 flags |= WIN_NEED_SIZE;
455 }
456 }
457 if (cs->dwExStyle & WS_EX_DLGMODALFRAME) dwStyle &= ~WS_THICKFRAME;
458
459 if (cs->style & WS_HSCROLL)
460 {
461 horzScrollInfo = (SCROLLBAR_INFO*)malloc(sizeof(SCROLLBAR_INFO));
462 horzScrollInfo->MinVal = horzScrollInfo->CurVal = horzScrollInfo->Page = 0;
463 horzScrollInfo->MaxVal = 100;
464 horzScrollInfo->flags = ESB_ENABLE_BOTH;
465 }
466
467 if (cs->style & WS_VSCROLL)
468 {
469 vertScrollInfo = (SCROLLBAR_INFO*)malloc(sizeof(SCROLLBAR_INFO));
470 vertScrollInfo->MinVal = vertScrollInfo->CurVal = vertScrollInfo->Page = 0;
471 vertScrollInfo->MaxVal = 100;
472 vertScrollInfo->flags = ESB_ENABLE_BOTH;
473 }
474
475 if(HIWORD(cs->lpszName))
476 {
477 if (!isUnicode)
478 {
479 wndNameLength = strlen(cs->lpszName);
480 windowNameA = (LPSTR)_smalloc(wndNameLength+1);
481 strcpy(windowNameA,cs->lpszName);
482 windowNameW = (LPWSTR)_smalloc((wndNameLength+1)*sizeof(WCHAR));
483 lstrcpyAtoW(windowNameW,windowNameA);
484 windowNameA[wndNameLength] = 0;
485 windowNameW[wndNameLength] = 0;
486 }
487 else
488 {
489 wndNameLength = lstrlenW((LPWSTR)cs->lpszName);
490 windowNameA = (LPSTR)_smalloc(wndNameLength+1);
491 lstrcpyWtoA(windowNameA,(LPWSTR)cs->lpszName);
492 windowNameW = (LPWSTR)_smalloc((wndNameLength+1)*sizeof(WCHAR));
493 lstrcpyW(windowNameW,(LPWSTR)cs->lpszName);
494 windowNameA[wndNameLength] = 0;
495 windowNameW[wndNameLength] = 0;
496 }
497 }
498
499 //copy pointer of CREATESTRUCT for usage in MsgCreate method
500 tmpcs = cs;
501
502 //Store our window object pointer in thread local memory, so PMWINDOW.CPP can retrieve it
503 THDB *thdb = GetThreadTHDB();
504
505 if(thdb == NULL) {
506 dprintf(("Window creation failed - thdb == NULL")); //this is VERY bad
507 ExitProcess(666);
508 return FALSE;
509 }
510
511 thdb->newWindow = (ULONG)this;
512
513 DWORD dwOSWinStyle;
514
515 OSLibWinConvertStyle(dwStyle,dwExStyle,&dwOSWinStyle);
516
517 OS2Hwnd = OSLibWinCreateWindow((getParent()) ? getParent()->getOS2WindowHandle() : OSLIB_HWND_DESKTOP,
518 dwOSWinStyle,(char *)windowNameA,
519 (owner) ? owner->getOS2WindowHandle() : ((getParent()) ? getParent()->getOS2WindowHandle() : OSLIB_HWND_DESKTOP),
520 (hwndLinkAfter == HWND_BOTTOM) ? TRUE : FALSE,
521 0, fTaskList,fXDefault | fCXDefault,windowClass->getStyle());
522 if(OS2Hwnd == 0) {
523 dprintf(("Window creation failed!! OS LastError %0x", OSLibWinGetLastError()));
524 SetLastError(ERROR_OUTOFMEMORY); //TODO: Better error
525 return FALSE;
526 }
527 OSLibWinSetVisibleRegionNotify(OS2Hwnd, TRUE);
528 SetLastError(0);
529 return TRUE;
530}
531//******************************************************************************
532//******************************************************************************
533BOOL Win32BaseWindow::MsgCreate(HWND hwndOS2)
534{
535 CREATESTRUCTA *cs = tmpcs; //pointer to CREATESTRUCT used in CreateWindowExA method
536 POINT maxSize, maxPos, minTrack, maxTrack;
537
538 OS2Hwnd = hwndOS2;
539
540 fNoSizeMsg = TRUE;
541
542 if(OSLibWinSetWindowULong(OS2Hwnd, OFFSET_WIN32WNDPTR, (ULONG)this) == FALSE) {
543 dprintf(("WM_CREATE: WinSetWindowULong %X failed!!", OS2Hwnd));
544 SetLastError(ERROR_OUTOFMEMORY); //TODO: Better error
545 return FALSE;
546 }
547 if(OSLibWinSetWindowULong(OS2Hwnd, OFFSET_WIN32PM_MAGIC, WIN32PM_MAGIC) == FALSE) {
548 dprintf(("WM_CREATE: WinSetWindowULong2 %X failed!!", OS2Hwnd));
549 SetLastError(ERROR_OUTOFMEMORY); //TODO: Better error
550 return FALSE;
551 }
552
553//SvL: This completely messes up MS Word 97 (no button bar, no menu)
554#if 0
555 //adjust CW_USEDEFAULT position
556 if (fXDefault | fCXDefault)
557 {
558 RECT rect;
559
560 //SvL: Returns invalid rectangle (not the expected shell default size)
561 OSLibWinQueryWindowRect(OS2Hwnd,&rect,RELATIVE_TO_SCREEN);
562 if (getParent()) mapWin32Rect(OSLIB_HWND_DESKTOP,getParent()->getOS2WindowHandle(),&rect);
563 if (fXDefault)
564 {
565 cs->x = rect.left;
566 cs->y = rect.top;
567 if (!fCXDefault)
568 {
569 //CB: todo: adjust pos to screen rect
570 }
571 }
572 if (fCXDefault)
573 {
574 cs->cx = rect.right-rect.left;
575 cs->cy = rect.bottom-rect.top;
576 }
577 }
578#endif
579
580 fakeWinBase.hwndThis = OS2Hwnd;
581 fakeWinBase.pWindowClass = windowClass;
582
583 //Set icon from window or class
584 if (hIcon)
585 OSLibWinSetIcon(OS2Hwnd,hIcon);
586 else if (windowClass->getIcon())
587 OSLibWinSetIcon(OS2Hwnd,windowClass->getIcon());
588
589 /* Get class or window DC if needed */
590 if(windowClass->getStyle() & CS_OWNDC) {
591 dprintf(("Class with CS_OWNDC style"));
592 ownDC = GetDCEx(getWindowHandle(), NULL, DCX_USESTYLE);
593 }
594 else
595 if (windowClass->getStyle() & CS_PARENTDC) {
596 fParentDC = TRUE;
597 ownDC = 0;
598 }
599 else
600 if (windowClass->getStyle() & CS_CLASSDC) {
601 dprintf(("WARNING: Class with CS_CLASSDC style!"));
602 ownDC = 0;
603 }
604 /* Set the window menu */
605 if ((dwStyle & (WS_CAPTION | WS_CHILD)) == WS_CAPTION )
606 {
607 if (cs->hMenu) {
608 ::SetMenu(getWindowHandle(), cs->hMenu);
609 }
610 else {
611 if (windowClass->getMenuNameA()) {
612 cs->hMenu = LoadMenuA(windowClass->getInstance(),windowClass->getMenuNameA());
613#if 0 //CB: hack for treeview test cases bug
614if (!cs->hMenu) cs->hMenu = LoadMenuA(windowClass->getInstance(),"MYAPP");
615#endif
616 if (cs->hMenu) ::SetMenu(getWindowHandle(), cs->hMenu );
617 }
618 }
619 }
620 else
621 {
622 setWindowId((DWORD)cs->hMenu);
623 }
624 hSysMenu = (dwStyle & WS_SYSMENU) ? MENU_GetSysMenu(Win32Hwnd,0):0;
625
626 /* Send the WM_GETMINMAXINFO message and fix the size if needed */
627 if ((cs->style & WS_THICKFRAME) || !(cs->style & (WS_POPUP | WS_CHILD)))
628 {
629 GetMinMaxInfo(&maxSize, &maxPos, &minTrack, &maxTrack);
630 if (maxSize.x < cs->cx) cs->cx = maxSize.x;
631 if (maxSize.y < cs->cy) cs->cy = maxSize.y;
632 if (cs->cx < minTrack.x) cs->cx = minTrack.x;
633 if (cs->cy < minTrack.y) cs->cy = minTrack.y;
634 }
635
636 if(cs->style & WS_CHILD)
637 {
638 if(cs->cx < 0) cs->cx = 0;
639 if(cs->cy < 0) cs->cy = 0;
640 }
641 else
642 {
643 if (cs->cx <= 0) cs->cx = 1;
644 if (cs->cy <= 0) cs->cy = 1;
645 }
646
647 //preset rects
648 rectWindow.left = cs->x;
649 rectWindow.right = cs->x+cs->cx;
650 rectWindow.top = cs->y;
651 rectWindow.bottom = cs->y+cs->cy;
652 rectClient = rectWindow; //dummy client rect
653 OffsetRect(&rectClient, -rectClient.left, -rectClient.top);
654
655 /* Send the WM_CREATE message
656 * Perhaps we shouldn't allow width/height changes as well.
657 * See p327 in "Internals".
658 */
659 maxPos.x = rectWindow.left; maxPos.y = rectWindow.top;
660
661 //Note: Solitaire crashes when receiving WM_SIZE messages before WM_CREATE
662 fCreated = TRUE;
663
664 if(fTaskList) {
665 hTaskList = OSLibWinAddToTaskList(OS2Hwnd, windowNameA, (cs->style & WS_VISIBLE) ? 1 : 0);
666 }
667
668 if (SendInternalMessageA(WM_NCCREATE,0,(LPARAM)cs))
669 {
670 RECT tmpRect;
671
672 //CB: recheck flags
673 if (cs->style & (WS_POPUP | WS_CHILD))
674 {
675 fXDefault = FALSE;
676 if (fCXDefault)
677 {
678 fCXDefault = FALSE;
679 cs->cx = cs->cy = 0;
680 }
681 }
682 //update rect
683 rectWindow.left = cs->x;
684 rectWindow.right = cs->x+cs->cx;
685 rectWindow.top = cs->y;
686 rectWindow.bottom = cs->y+cs->cy;
687 tmpRect = rectWindow;
688
689 rectClient = rectWindow;
690 OffsetRect(&rectClient, -rectClient.left, -rectClient.top);
691 OffsetRect(&rectWindow, maxPos.x - rectWindow.left, maxPos.y - rectWindow.top);
692
693 //set the window size and update the client
694 SetWindowPos(hwndLinkAfter, tmpRect.left, tmpRect.top, tmpRect.right-tmpRect.left, tmpRect.bottom-tmpRect.top,SWP_NOACTIVATE | SWP_NOREDRAW | SWP_FRAMECHANGED);
695 fNoSizeMsg = FALSE;
696 if (cs->style & WS_VISIBLE) dwStyle |= WS_VISIBLE; //program could change position in WM_CREATE
697 if( (SendInternalMessageA(WM_CREATE, 0, (LPARAM)cs )) != -1 )
698 {
699 if(!(flags & WIN_NEED_SIZE))
700 {
701 SendInternalMessageA(WM_SIZE, SIZE_RESTORED,
702 MAKELONG(rectClient.right-rectClient.left,
703 rectClient.bottom-rectClient.top));
704
705 SendInternalMessageA(WM_MOVE,0,MAKELONG(rectClient.left,rectClient.top));
706 }
707
708 if( (getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_NOPARENTNOTIFY) )
709 {
710 /* Notify the parent window only */
711 SendInternalMessageA(WM_PARENTNOTIFY, MAKEWPARAM(WM_CREATE, getWindowId()), (LPARAM)getWindowHandle());
712 if(!::IsWindow(getWindowHandle()))
713 {
714 dprintf(("Createwindow: WM_PARENTNOTIFY destroyed window"));
715 goto end;
716 }
717 }
718
719 if(cs->style & WS_VISIBLE) {
720 dwStyle &= ~WS_VISIBLE;
721 ShowWindow(sw);
722 }
723
724 /* Call WH_SHELL hook */
725 if (!(getStyle() & WS_CHILD) && !owner)
726 HOOK_CallHooksA(WH_SHELL, HSHELL_WINDOWCREATED, getWindowHandle(), 0);
727
728 SetLastError(0);
729 return TRUE;
730 }
731 }
732 dprintf(("Window creation FAILED (NCCREATE cancelled creation)"));
733 SetLastError(ERROR_OUTOFMEMORY); //TODO: Better error
734end:
735 return FALSE;
736}
737//******************************************************************************
738//******************************************************************************
739ULONG Win32BaseWindow::MsgQuit()
740{
741 return SendInternalMessageA(WM_QUIT, 0, 0);
742}
743//******************************************************************************
744//******************************************************************************
745ULONG Win32BaseWindow::MsgClose()
746{
747 return SendInternalMessageA(WM_CLOSE,0,0);
748}
749//******************************************************************************
750//******************************************************************************
751ULONG Win32BaseWindow::MsgDestroy()
752{
753 ULONG rc;
754 Win32BaseWindow *child;
755 HWND hwnd = getWindowHandle();
756
757 fIsDestroyed = TRUE;
758
759 if(fDestroyWindowCalled == FALSE)
760 {//this window was destroyed because DestroyWindow was called for it's parent
761 //so: send a WM_PARENTNOTIFY now as that hasn't happened yet
762 if((getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_NOPARENTNOTIFY))
763 {
764 if(getParent() && getParent()->IsWindowDestroyed() == FALSE)
765 {
766 /* Notify the parent window only */
767 getParent()->SendMessageA(WM_PARENTNOTIFY, MAKEWPARAM(WM_DESTROY, getWindowId()), (LPARAM)getWindowHandle());
768 }
769//// else DebugInt3();
770 }
771 }
772 SendInternalMessageA(WM_DESTROY, 0, 0);
773 if(::IsWindow(hwnd) == FALSE) {
774 //object already destroyed, so return immediately
775 return 1;
776 }
777 SendInternalMessageA(WM_NCDESTROY, 0, 0);
778
779 TIMER_KillTimerFromWindow(OS2Hwnd);
780
781 if(getFirstChild() == NULL) {
782 delete this;
783 }
784 return 1;
785}
786//******************************************************************************
787//******************************************************************************
788ULONG Win32BaseWindow::MsgEnable(BOOL fEnable)
789{
790 if(fEnable) {
791 dwStyle &= ~WS_DISABLED;
792 }
793 else dwStyle |= WS_DISABLED;
794
795 return SendInternalMessageA(WM_ENABLE, fEnable, 0);
796}
797//******************************************************************************
798//TODO: SW_PARENTCLOSING/OPENING flag (lParam)
799//******************************************************************************
800ULONG Win32BaseWindow::MsgShow(BOOL fShow)
801{
802 if(fNoSizeMsg || fDestroyWindowCalled) {
803 return 1;
804 }
805
806 if(fShow) {
807 setStyle(getStyle() | WS_VISIBLE);
808 }
809 else setStyle(getStyle() & ~WS_VISIBLE);
810
811 return SendInternalMessageA(WM_SHOWWINDOW, fShow, 0);
812}
813//******************************************************************************
814//******************************************************************************
815ULONG Win32BaseWindow::MsgPosChanging(LPARAM lp)
816{
817 //SvL: Notes crashes when switching views (calls DestroyWindow -> PM sends
818 // a WM_WINDOWPOSCHANGED msg -> crash)
819 if(fNoSizeMsg || fDestroyWindowCalled)
820 return 0;
821
822 return SendInternalMessageA(WM_WINDOWPOSCHANGING, 0, lp);
823}
824//******************************************************************************
825//******************************************************************************
826ULONG Win32BaseWindow::MsgPosChanged(LPARAM lp)
827{
828 //SvL: Notes crashes when switching views (calls DestroyWindow -> PM sends
829 // a WM_WINDOWPOSCHANGED msg -> crash)
830 if(fNoSizeMsg || fDestroyWindowCalled)
831 return 1;
832
833 return SendInternalMessageA(WM_WINDOWPOSCHANGED, 0, lp);
834}
835//******************************************************************************
836//******************************************************************************
837#if 0
838ULONG Win32BaseWindow::MsgMinMax()
839{
840
841}
842#endif
843//******************************************************************************
844//******************************************************************************
845ULONG Win32BaseWindow::MsgScroll(ULONG msg, ULONG scrollCode, ULONG scrollPos)
846{
847 //According to the SDK docs, the scrollbar handle (lParam) is 0 when the standard
848 //window scrollbars send these messages
849 return SendInternalMessageA(msg, MAKELONG(scrollCode, scrollPos), 0);
850}
851//******************************************************************************
852//******************************************************************************
853ULONG Win32BaseWindow::MsgHitTest(MSG *msg)
854{
855 lastHitTestVal = DispatchMsgA(msg);
856
857 dprintf2(("MsgHitTest %x (%d,%d) (%d,%d) (%d,%d) returned %x", getWindowHandle(), LOWORD(msg->lParam), HIWORD(msg->lParam), rectWindow.left, rectWindow.top, rectWindow.right, rectWindow.bottom, lastHitTestVal));
858
859 if (lastHitTestVal == HTTRANSPARENT)
860 return HTOS_TRANSPARENT;
861 else
862 return HTOS_NORMAL;
863}
864//******************************************************************************
865//******************************************************************************
866ULONG Win32BaseWindow::MsgActivate(BOOL fActivate, BOOL fMinimized, HWND hwnd, HWND hwndOS2Win)
867{
868 ULONG rc, procidhwnd = -1, threadidhwnd = 0;
869
870 //SvL: Don't send WM_(NC)ACTIVATE messages when the window is being destroyed
871 if(fDestroyWindowCalled) {
872 return 0;
873 }
874
875 //According to SDK docs, if app returns FALSE & window is being deactivated,
876 //default processing is cancelled
877 //TODO: According to Wine we should proceed anyway if window is sysmodal
878 if(SendInternalMessageA(WM_NCACTIVATE, fActivate, 0) == FALSE && !fActivate)
879 {
880 dprintf(("WARNING: WM_NCACTIVATE return code = FALSE -> cancel processing"));
881 return 0;
882 }
883 /* child windows get WM_CHILDACTIVATE message */
884 if((getStyle() & (WS_CHILD | WS_POPUP)) == WS_CHILD )
885 {
886 SendInternalMessageA(WM_CHILDACTIVATE, 0, 0L);
887 return 0;
888 }
889
890 rc = SendInternalMessageA(WM_ACTIVATE, MAKELONG((fActivate) ? WA_ACTIVE : WA_INACTIVE, fMinimized), hwnd);
891
892 if(hwndOS2Win) {
893 threadidhwnd = O32_GetWindowThreadProcessId(hwndOS2Win, &procidhwnd);
894 }
895
896 if(fActivate) {
897 SendInternalMessageA(WM_ACTIVATEAPP, 1, dwThreadId); //activate; specify window thread id
898 }
899 else SendInternalMessageA(WM_ACTIVATEAPP, 0, threadidhwnd); //deactivate; specify thread id of other process
900 return rc;
901}
902//******************************************************************************
903//******************************************************************************
904ULONG Win32BaseWindow::DispatchMsgA(MSG *msg)
905{
906 return SendInternalMessageA(msg->message, msg->wParam, msg->lParam);
907}
908//******************************************************************************
909//******************************************************************************
910ULONG Win32BaseWindow::DispatchMsgW(MSG *msg)
911{
912 return SendInternalMessageW(msg->message, msg->wParam, msg->lParam);
913}
914//******************************************************************************
915//******************************************************************************
916ULONG Win32BaseWindow::MsgSetFocus(HWND hwnd)
917{
918 //SvL: Don't send WM_(NC)ACTIVATE messages when the window is being destroyed
919 if(fDestroyWindowCalled) {
920 return 0;
921 }
922
923 return SendInternalMessageA(WM_SETFOCUS, hwnd, 0);
924}
925//******************************************************************************
926//******************************************************************************
927ULONG Win32BaseWindow::MsgKillFocus(HWND hwnd)
928{
929 //SvL: Don't send WM_(NC)ACTIVATE messages when the window is being destroyed
930 if(fDestroyWindowCalled) {
931 return 0;
932 }
933 return SendInternalMessageA(WM_KILLFOCUS, hwnd, 0);
934}
935//******************************************************************************
936//******************************************************************************
937ULONG Win32BaseWindow::MsgButton(MSG *msg)
938{
939 BOOL fClick = FALSE;
940
941// dprintf(("MsgButton at (%d,%d)", msg->pt.x, msg->pt.y));
942 switch(msg->message) {
943 case WM_LBUTTONDBLCLK:
944 case WM_RBUTTONDBLCLK:
945 case WM_MBUTTONDBLCLK:
946 if (!(windowClass && windowClass->getClassLongA(GCL_STYLE) & CS_DBLCLKS))
947 {
948 msg->message = msg->message - (WM_LBUTTONDBLCLK - WM_LBUTTONDOWN); //dblclick -> down
949 MsgButton(msg);
950 msg->message++; //button-up
951 return MsgButton(msg);
952 }
953 break;
954 case WM_NCLBUTTONDBLCLK:
955 case WM_NCRBUTTONDBLCLK:
956 case WM_NCMBUTTONDBLCLK:
957 //Docs say CS_DBLCLKS style doesn't matter for non-client double clicks
958 fClick = TRUE;
959 break;
960
961 case WM_LBUTTONDOWN:
962 case WM_RBUTTONDOWN:
963 case WM_MBUTTONDOWN:
964 case WM_NCLBUTTONDOWN:
965 case WM_NCRBUTTONDOWN:
966 case WM_NCMBUTTONDOWN:
967 fClick = TRUE;
968 break;
969 }
970
971 if(fClick)
972 {
973 HWND hwndTop;
974
975 /* Activate the window if needed */
976 hwndTop = (GetTopParent()) ? GetTopParent()->getWindowHandle() : 0;
977
978 HWND hwndActive = GetActiveWindow();
979 if (hwndTop && (getWindowHandle() != hwndActive))
980 {
981 LONG ret = SendInternalMessageA(WM_MOUSEACTIVATE, hwndTop,
982 MAKELONG( lastHitTestVal, msg->message) );
983
984#if 0
985 if ((ret == MA_ACTIVATEANDEAT) || (ret == MA_NOACTIVATEANDEAT))
986 eatMsg = TRUE;
987#endif
988 if(((ret == MA_ACTIVATE) || (ret == MA_ACTIVATEANDEAT))
989 && (hwndTop != GetForegroundWindow()) )
990 {
991 Win32BaseWindow *win32top = Win32BaseWindow::GetWindowFromHandle(hwndTop);
992
993 //SvL: Calling OSLibSetActiveWindow(hwndTop); causes focus problems
994 if (win32top) OSLibWinSetFocus(win32top->getOS2WindowHandle());
995 }
996 }
997 }
998
999 SendInternalMessageA(WM_SETCURSOR, getWindowHandle(), MAKELONG(lastHitTestVal, msg->message));
1000
1001 return SendInternalMessageA(msg->message, msg->wParam, msg->lParam);
1002}
1003//******************************************************************************
1004//******************************************************************************
1005ULONG Win32BaseWindow::MsgPaint(ULONG tmp1, BOOL select)
1006{
1007 if (select && IsWindowIconic())
1008 return SendInternalMessageA(WM_PAINTICON, 1, 0);
1009 else
1010 return SendInternalMessageA(WM_PAINT, 0, 0);
1011}
1012//******************************************************************************
1013//TODO: Is the clipper region of the window DC equal to the invalidated rectangle?
1014// (or are we simply erasing too much here)
1015//******************************************************************************
1016ULONG Win32BaseWindow::MsgEraseBackGround(HDC hdc)
1017{
1018 ULONG rc;
1019 HDC hdcErase = hdc;
1020
1021 if (hdcErase == 0)
1022 hdcErase = GetDC(getWindowHandle());
1023
1024 if(IsWindowIconic())
1025 rc = SendInternalMessageA(WM_ICONERASEBKGND, hdcErase, 0);
1026 else
1027 rc = SendInternalMessageA(WM_ERASEBKGND, hdcErase, 0);
1028 if (hdc == 0)
1029 ReleaseDC(getWindowHandle(), hdcErase);
1030 return (rc);
1031}
1032//******************************************************************************
1033//******************************************************************************
1034ULONG Win32BaseWindow::MsgMouseMove(MSG *msg)
1035{
1036 //TODO: hiword should be 0 if window enters menu mode (SDK docs)
1037 SendInternalMessageA(WM_SETCURSOR, Win32Hwnd, MAKELONG(lastHitTestVal, msg->message));
1038
1039 //translated message == WM_(NC)MOUSEMOVE
1040 return SendInternalMessageA(msg->message, msg->wParam, msg->lParam);
1041}
1042//******************************************************************************
1043//******************************************************************************
1044ULONG Win32BaseWindow::MsgChar(MSG *msg)
1045{
1046 return DispatchMsgA(msg);
1047}
1048//******************************************************************************
1049//******************************************************************************
1050ULONG Win32BaseWindow::MsgNCPaint()
1051{
1052 RECT rect;
1053
1054 if(GetOS2UpdateRect(this,&rect))
1055 {
1056 HRGN hrgn;
1057 ULONG rc;
1058 RECT client = rectClient;
1059
1060 if ((rect.left >= client.left) && (rect.left < client.right) &&
1061 (rect.right >= client.left) && (rect.right < client.right) &&
1062 (rect.top >= client.top) && (rect.top < client.bottom) &&
1063 (rect.bottom >= client.top) && (rect.bottom < client.bottom))
1064 {
1065 return 0;
1066 }
1067
1068 dprintf(("MsgNCPaint (%d,%d)(%d,%d)", rect.left, rect.top, rect.right, rect.bottom));
1069 hrgn = CreateRectRgnIndirect(&rect);
1070 if (!hrgn) return 0;
1071
1072 rc = SendInternalMessageA(WM_NCPAINT, hrgn, 0);
1073
1074 DeleteObject(hrgn);
1075
1076 return rc;
1077 }
1078 else return 0;
1079}
1080//******************************************************************************
1081//Called when either the frame's size or position has changed (lpWndPos != NULL)
1082//or when the frame layout has changed (i.e. scrollbars added/removed) (lpWndPos == NULL)
1083//******************************************************************************
1084ULONG Win32BaseWindow::MsgFormatFrame(WINDOWPOS *lpWndPos)
1085{
1086 RECT oldWindowRect = rectWindow, client = rectClient, newWindowRect;
1087 WINDOWPOS wndPos;
1088 ULONG rc;
1089
1090 if(lpWndPos)
1091 {
1092 //set new window rectangle
1093 setWindowRect(lpWndPos->x, lpWndPos->y, lpWndPos->x+lpWndPos->cx,
1094 lpWndPos->y+lpWndPos->cy);
1095 newWindowRect = rectWindow;
1096 }
1097 else {
1098 wndPos.hwnd = getWindowHandle();
1099 wndPos.hwndInsertAfter = 0;
1100 newWindowRect= rectWindow;
1101 wndPos.x = newWindowRect.left;
1102 wndPos.y = newWindowRect.top;
1103 wndPos.cx = newWindowRect.right - newWindowRect.left;
1104 wndPos.cy = newWindowRect.bottom - newWindowRect.top;
1105 wndPos.flags = SWP_FRAMECHANGED;
1106 lpWndPos = &wndPos;
1107 }
1108
1109 rc = SendNCCalcSize(TRUE, &newWindowRect, &oldWindowRect, &client, lpWndPos, &rectClient);
1110
1111 dprintf(("MsgFormatFrame: old client rect (%d,%d)(%d,%d), new client (%d,%d)(%d,%d)", client.left, client.top, client.right, client.bottom, rectClient.left, rectClient.top, rectClient.right, rectClient.bottom));
1112 dprintf(("MsgFormatFrame: old window rect (%d,%d)(%d,%d), new window (%d,%d)(%d,%d)", oldWindowRect.left, oldWindowRect.top, oldWindowRect.right, oldWindowRect.bottom, rectWindow.left, rectWindow.top, rectWindow.right, rectWindow.bottom));
1113
1114#if 1
1115//this doesn't always work
1116// if(!fNoSizeMsg && (client.left != rectClient.left || client.top != rectClient.top))
1117 if(!fNoSizeMsg && ((oldWindowRect.right - oldWindowRect.left < rectClient.left
1118 || oldWindowRect.bottom - oldWindowRect.top < rectClient.top) ||
1119 (EqualRect(&oldWindowRect, &rectWindow) && (client.left != rectClient.left || client.top != rectClient.top))))
1120 {
1121 Win32BaseWindow *child = (Win32BaseWindow *)getFirstChild();
1122
1123 //client rectangle has moved -> inform children
1124 dprintf(("MsgFormatFrame -> client rectangle has changed, move children"));
1125 while(child) {
1126 ::SetWindowPos(child->getWindowHandle(),
1127 HWND_TOP, child->getWindowRect()->left,
1128 child->getWindowRect()->top, 0, 0,
1129 SWP_NOACTIVATE|SWP_NOSIZE|SWP_NOZORDER);
1130 child = (Win32BaseWindow *)child->getNextChild();
1131 }
1132 }
1133#endif
1134 return rc;
1135}
1136//******************************************************************************
1137//******************************************************************************
1138ULONG Win32BaseWindow::MsgSetText(LPSTR lpsz, LONG cch)
1139{
1140 return SendInternalMessageA(WM_SETTEXT, 0, (LPARAM)lpsz);
1141}
1142//******************************************************************************
1143//******************************************************************************
1144ULONG Win32BaseWindow::MsgGetTextLength()
1145{
1146 return SendInternalMessageA(WM_GETTEXTLENGTH, 0, 0);
1147}
1148//******************************************************************************
1149//******************************************************************************
1150void Win32BaseWindow::MsgGetText(char *wndtext, ULONG textlength)
1151{
1152 SendInternalMessageA(WM_GETTEXT, textlength, (LPARAM)wndtext);
1153}
1154//******************************************************************************
1155//******************************************************************************
1156LONG Win32BaseWindow::sendHitTest(ULONG lParam)
1157{
1158 lastHitTestVal = SendInternalMessageA(WM_NCHITTEST, 0, lParam);
1159 return lastHitTestVal;
1160}
1161//******************************************************************************
1162//******************************************************************************
1163BOOL Win32BaseWindow::isMDIClient()
1164{
1165 return FALSE;
1166}
1167//******************************************************************************
1168//******************************************************************************
1169BOOL Win32BaseWindow::isMDIChild()
1170{
1171 return FALSE;
1172}
1173//******************************************************************************
1174//TODO: Not complete
1175//******************************************************************************
1176BOOL Win32BaseWindow::isFrameWindow()
1177{
1178 if(getParent() == NULL)
1179 return TRUE;
1180
1181 return FALSE;
1182}
1183//******************************************************************************
1184//******************************************************************************
1185BOOL Win32BaseWindow::isDesktopWindow()
1186{
1187 return FALSE;
1188}
1189//******************************************************************************
1190//******************************************************************************
1191BOOL Win32BaseWindow::IsWindowIconic()
1192{
1193 return ((getStyle() & WS_MINIMIZE) && windowClass->getIcon());
1194}
1195//******************************************************************************
1196//******************************************************************************
1197SCROLLBAR_INFO *Win32BaseWindow::getScrollInfo(int nBar)
1198{
1199 switch(nBar)
1200 {
1201 case SB_HORZ:
1202 if (!horzScrollInfo)
1203 {
1204 horzScrollInfo = (SCROLLBAR_INFO*)malloc(sizeof(SCROLLBAR_INFO));
1205 if (!horzScrollInfo) break;
1206 horzScrollInfo->MinVal = horzScrollInfo->CurVal = horzScrollInfo->Page = 0;
1207 horzScrollInfo->MaxVal = 100;
1208 horzScrollInfo->flags = ESB_ENABLE_BOTH;
1209 }
1210 return horzScrollInfo;
1211
1212 case SB_VERT:
1213 if (!vertScrollInfo)
1214 {
1215 vertScrollInfo = (SCROLLBAR_INFO*)malloc(sizeof(SCROLLBAR_INFO));
1216 if (!vertScrollInfo) break;
1217 vertScrollInfo->MinVal = vertScrollInfo->CurVal = vertScrollInfo->Page = 0;
1218 vertScrollInfo->MaxVal = 100;
1219 vertScrollInfo->flags = ESB_ENABLE_BOTH;
1220 }
1221 return vertScrollInfo;
1222 }
1223
1224 return NULL;
1225}
1226//******************************************************************************
1227//******************************************************************************
1228LRESULT Win32BaseWindow::DefWndControlColor(UINT ctlType, HDC hdc)
1229{
1230 //SvL: Set background color to default button color (not window (white))
1231 if(ctlType == CTLCOLOR_BTN)
1232 {
1233 SetBkColor(hdc, GetSysColor(COLOR_BTNFACE));
1234 SetTextColor(hdc, GetSysColor(COLOR_WINDOWTEXT));
1235 return GetSysColorBrush(COLOR_BTNFACE);
1236 }
1237 //SvL: Set background color to default dialog color if window is dialog
1238 if((ctlType == CTLCOLOR_DLG || ctlType == CTLCOLOR_STATIC) && IsDialog()) {
1239 SetBkColor(hdc, GetSysColor(COLOR_BTNFACE));
1240 SetTextColor(hdc, GetSysColor(COLOR_WINDOWTEXT));
1241 return GetSysColorBrush(COLOR_BTNFACE);
1242 }
1243
1244 if( ctlType == CTLCOLOR_SCROLLBAR)
1245 {
1246 HBRUSH hb = GetSysColorBrush(COLOR_SCROLLBAR);
1247 COLORREF bk = GetSysColor(COLOR_3DHILIGHT);
1248 SetTextColor( hdc, GetSysColor(COLOR_3DFACE));
1249 SetBkColor( hdc, bk);
1250
1251 /* if COLOR_WINDOW happens to be the same as COLOR_3DHILIGHT
1252 * we better use 0x55aa bitmap brush to make scrollbar's background
1253 * look different from the window background.
1254 */
1255 if (bk == GetSysColor(COLOR_WINDOW)) {
1256 return GetPattern55AABrush();
1257 }
1258
1259 UnrealizeObject( hb );
1260 return (LRESULT)hb;
1261 }
1262
1263 SetTextColor( hdc, GetSysColor(COLOR_WINDOWTEXT));
1264
1265 if ((ctlType == CTLCOLOR_EDIT) || (ctlType == CTLCOLOR_LISTBOX))
1266 {
1267 SetBkColor( hdc, GetSysColor(COLOR_WINDOW) );
1268 }
1269 else
1270 {
1271 SetBkColor( hdc, GetSysColor(COLOR_3DFACE) );
1272 return (LRESULT)GetSysColorBrush(COLOR_3DFACE);
1273 }
1274 return (LRESULT)GetSysColorBrush(COLOR_WINDOW);
1275}
1276//******************************************************************************
1277//******************************************************************************
1278LRESULT Win32BaseWindow::DefWndPrint(HDC hdc,ULONG uFlags)
1279{
1280 /*
1281 * Visibility flag.
1282 */
1283 if ( (uFlags & PRF_CHECKVISIBLE) &&
1284 !IsWindowVisible() )
1285 return 0;
1286
1287 /*
1288 * Unimplemented flags.
1289 */
1290 if ( (uFlags & PRF_CHILDREN) ||
1291 (uFlags & PRF_OWNED) ||
1292 (uFlags & PRF_NONCLIENT) )
1293 {
1294 dprintf(("WM_PRINT message with unsupported flags\n"));
1295 }
1296
1297 /*
1298 * Background
1299 */
1300 if ( uFlags & PRF_ERASEBKGND)
1301 SendInternalMessageA(WM_ERASEBKGND, (WPARAM)hdc, 0);
1302
1303 /*
1304 * Client area
1305 */
1306 if ( uFlags & PRF_CLIENT)
1307 SendInternalMessageA(WM_PRINTCLIENT, (WPARAM)hdc, PRF_CLIENT);
1308
1309
1310 return 0;
1311}
1312//******************************************************************************
1313//******************************************************************************
1314LRESULT Win32BaseWindow::DefWindowProcA(UINT Msg, WPARAM wParam, LPARAM lParam)
1315{
1316 switch(Msg)
1317 {
1318 case WM_CLOSE:
1319 dprintf(("DefWindowProcA: WM_CLOSE %x", getWindowHandle()));
1320 DestroyWindow();
1321 return 0;
1322
1323 case WM_GETTEXTLENGTH:
1324 return wndNameLength;
1325
1326 case WM_GETTEXT:
1327 if (!lParam || !wParam) return 0;
1328 if (!windowNameA) ((LPSTR)lParam)[0] = 0;
1329 else lstrcpynA((LPSTR)lParam, windowNameA, wParam);
1330 return min(wndNameLength, wParam);
1331
1332 case WM_SETTEXT:
1333 {
1334 LPCSTR lpsz = (LPCSTR)lParam;
1335
1336 if(windowNameA) free(windowNameA);
1337 if(windowNameW) free(windowNameW);
1338 if (lParam)
1339 {
1340 wndNameLength = strlen(lpsz);
1341 windowNameA = (LPSTR)_smalloc(wndNameLength+1);
1342 strcpy(windowNameA, lpsz);
1343 windowNameW = (LPWSTR)_smalloc((wndNameLength+1)*sizeof(WCHAR));
1344 lstrcpyAtoW(windowNameW, windowNameA);
1345 }
1346 else
1347 {
1348 windowNameA = NULL;
1349 windowNameW = NULL;
1350 wndNameLength = 0;
1351 }
1352 dprintf(("WM_SETTEXT of %x to %s\n", Win32Hwnd, lParam));
1353 if ((dwStyle & WS_CAPTION) == WS_CAPTION)
1354 {
1355 HandleNCPaint((HRGN)1);
1356 if(hTaskList) {
1357 OSLibWinChangeTaskList(hTaskList, OS2Hwnd, getWindowNameA(), (getStyle() & WS_VISIBLE) ? 1 : 0);
1358 }
1359 }
1360
1361 return TRUE;
1362 }
1363
1364 case WM_SETREDRAW:
1365 {
1366 if (wParam)
1367 {
1368 setStyle(getStyle() | WS_VISIBLE);
1369 OSLibWinEnableWindowUpdate(OS2Hwnd,TRUE);
1370 }
1371 else
1372 {
1373 if (getStyle() & WS_VISIBLE)
1374 {
1375 setStyle(getStyle() & ~WS_VISIBLE);
1376 OSLibWinEnableWindowUpdate(OS2Hwnd,FALSE);
1377 }
1378 }
1379 return 0;
1380 }
1381
1382 case WM_CTLCOLORMSGBOX:
1383 case WM_CTLCOLOREDIT:
1384 case WM_CTLCOLORLISTBOX:
1385 case WM_CTLCOLORBTN:
1386 case WM_CTLCOLORDLG:
1387 case WM_CTLCOLORSTATIC:
1388 case WM_CTLCOLORSCROLLBAR:
1389 return DefWndControlColor(Msg - WM_CTLCOLORMSGBOX, (HDC)wParam);
1390
1391 case WM_CTLCOLOR:
1392 return DefWndControlColor(HIWORD(lParam), (HDC)wParam);
1393
1394 case WM_VKEYTOITEM:
1395 case WM_CHARTOITEM:
1396 return -1;
1397
1398 case WM_PARENTNOTIFY:
1399 return 0;
1400
1401 case WM_MOUSEACTIVATE:
1402 {
1403 dprintf(("DefWndProc: WM_MOUSEACTIVATE for %x Msg %s", Win32Hwnd, GetMsgText(HIWORD(lParam))));
1404 if(getStyle() & WS_CHILD && !(getExStyle() & WS_EX_NOPARENTNOTIFY) )
1405 {
1406 if(getParent()) {
1407 LRESULT rc = getParent()->SendInternalMessageA(WM_MOUSEACTIVATE, wParam, lParam );
1408 if(rc) return rc;
1409 }
1410 }
1411 return (LOWORD(lParam) == HTCAPTION) ? MA_NOACTIVATE : MA_ACTIVATE;
1412 }
1413
1414 case WM_ACTIVATE:
1415 /* The default action in Windows is to set the keyboard focus to
1416 * the window, if it's being activated and not minimized */
1417 if (LOWORD(wParam) != WA_INACTIVE) {
1418 if(!(getStyle() & WS_MINIMIZE))
1419 SetFocus(getWindowHandle());
1420 }
1421 return 0;
1422
1423 case WM_SETCURSOR:
1424 {
1425 dprintf(("DefWndProc: WM_SETCURSOR for %x Msg %s", Win32Hwnd, GetMsgText(HIWORD(lParam))));
1426 if((getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_NOPARENTNOTIFY))
1427 {
1428 if(getParent()) {
1429 LRESULT rc = getParent()->SendInternalMessageA(WM_SETCURSOR, wParam, lParam);
1430 if(rc) return rc;
1431 }
1432 }
1433 if (wParam == Win32Hwnd)
1434 {
1435 HCURSOR hCursor;
1436
1437 switch(LOWORD(lParam))
1438 {
1439 case HTCLIENT:
1440 hCursor = windowClass ? windowClass->getCursor():LoadCursorA(0,IDC_ARROWA);
1441 break;
1442
1443 case HTLEFT:
1444 case HTRIGHT:
1445 hCursor = LoadCursorA(0,IDC_SIZEWEA);
1446 break;
1447
1448 case HTTOP:
1449 case HTBOTTOM:
1450 hCursor = LoadCursorA(0,IDC_SIZENSA);
1451 break;
1452
1453 case HTTOPLEFT:
1454 case HTBOTTOMRIGHT:
1455 hCursor = LoadCursorA(0,IDC_SIZENWSEA);
1456 break;
1457
1458 case HTTOPRIGHT:
1459 case HTBOTTOMLEFT:
1460 hCursor = LoadCursorA(0,IDC_SIZENESWA);
1461 break;
1462
1463 default:
1464 hCursor = LoadCursorA(0,IDC_ARROWA);
1465 break;
1466 }
1467
1468 if (hCursor)
1469 {
1470 SetCursor(hCursor);
1471 return 1;
1472 }
1473 else return 0;
1474 }
1475 else return 0;
1476 }
1477
1478 case WM_MOUSEMOVE:
1479 return 0;
1480
1481 case WM_WINDOWPOSCHANGED:
1482 {
1483 PWINDOWPOS wpos = (PWINDOWPOS)lParam;
1484 WPARAM wp = SIZE_RESTORED;
1485
1486 if (!(wpos->flags & SWP_NOMOVE) && !(wpos->flags & SWP_NOCLIENTMOVE))
1487 {
1488 SendInternalMessageA(WM_MOVE, 0, MAKELONG(rectClient.left,rectClient.top));
1489 }
1490 if (!(wpos->flags & SWP_NOSIZE) && !(wpos->flags & SWP_NOCLIENTSIZE))
1491 {
1492 if (dwStyle & WS_MAXIMIZE) wp = SIZE_MAXIMIZED;
1493 else
1494 if (dwStyle & WS_MINIMIZE) wp = SIZE_MINIMIZED;
1495
1496 SendInternalMessageA(WM_SIZE, wp, MAKELONG(rectClient.right - rectClient.left,
1497 rectClient.bottom - rectClient.top));
1498 }
1499 return 0;
1500 }
1501 case WM_WINDOWPOSCHANGING:
1502 return HandleWindowPosChanging((WINDOWPOS *)lParam);
1503
1504 case WM_ERASEBKGND:
1505 case WM_ICONERASEBKGND:
1506 {
1507 RECT rect;
1508 int rc;
1509
1510 if (!windowClass || !windowClass->getBackgroundBrush()) return 0;
1511
1512 rc = GetClipBox( (HDC)wParam, &rect );
1513 if ((rc == SIMPLEREGION) || (rc == COMPLEXREGION))
1514 {
1515 HBRUSH hBrush = windowClass->getBackgroundBrush();
1516
1517 if (hBrush <= (HBRUSH)(SYSCOLOR_GetLastColor()+1))
1518 hBrush = GetSysColorBrush(hBrush-1);
1519
1520 FillRect( (HDC)wParam, &rect, hBrush);
1521 }
1522 return 1;
1523 }
1524
1525 case WM_PRINT:
1526 return DefWndPrint(wParam,lParam);
1527
1528 case WM_PAINTICON:
1529 case WM_PAINT:
1530 {
1531 PAINTSTRUCT ps;
1532 HDC hdc = BeginPaint(getWindowHandle(), &ps );
1533 if( hdc )
1534 {
1535 if( (getStyle() & WS_MINIMIZE) && (getWindowClass()->getIcon() && hIcon))
1536 {
1537 int x = (rectWindow.right - rectWindow.left - GetSystemMetrics(SM_CXICON))/2;
1538 int y = (rectWindow.bottom - rectWindow.top - GetSystemMetrics(SM_CYICON))/2;
1539 dprintf(("Painting class icon: vis rect=(%i,%i - %i,%i)\n", ps.rcPaint.left, ps.rcPaint.top, ps.rcPaint.right, ps.rcPaint.bottom ));
1540 DrawIcon(hdc, x, y, hIcon ? hIcon:getWindowClass()->getIcon() );
1541 }
1542 EndPaint(getWindowHandle(), &ps );
1543 }
1544 return 0;
1545 }
1546
1547 case WM_GETDLGCODE:
1548 return 0;
1549
1550 case WM_NCPAINT:
1551 return HandleNCPaint((HRGN)wParam);
1552
1553 case WM_NCACTIVATE:
1554 return HandleNCActivate(wParam);
1555
1556 case WM_NCCREATE:
1557 return(TRUE);
1558
1559 case WM_NCDESTROY:
1560 return 0;
1561
1562 case WM_NCCALCSIZE:
1563 return HandleNCCalcSize((BOOL)wParam,(RECT*)lParam);
1564
1565 case WM_NCLBUTTONDOWN:
1566 return HandleNCLButtonDown(wParam,lParam);
1567
1568 case WM_LBUTTONDBLCLK:
1569 case WM_NCLBUTTONDBLCLK:
1570 return HandleNCLButtonDblClk(wParam,lParam);
1571
1572 case WM_NCRBUTTONDOWN:
1573 case WM_NCRBUTTONDBLCLK:
1574 case WM_NCMBUTTONDOWN:
1575 case WM_NCMBUTTONDBLCLK:
1576 if (lastHitTestVal == HTERROR) MessageBeep(MB_ICONEXCLAMATION);
1577 return 0;
1578
1579 case WM_NCRBUTTONUP:
1580 return HandleNCRButtonUp(wParam,lParam);
1581
1582 case WM_NCMBUTTONUP:
1583 return 0;
1584
1585 case WM_NCHITTEST:
1586 {
1587 POINT point;
1588 LRESULT retvalue;
1589
1590 point.x = (SHORT)LOWORD(lParam);
1591 point.y = (SHORT)HIWORD(lParam);
1592
1593 retvalue = HandleNCHitTest(point);
1594#if 0 //CB: let the Corel people fix the bugs first
1595 if(retvalue == HTMENU)
1596 MENU_TrackMouseMenuBar_MouseMove(Win32Hwnd,point,TRUE);
1597 else
1598 MENU_TrackMouseMenuBar_MouseMove(Win32Hwnd,point,FALSE);
1599#endif
1600 return retvalue;
1601 }
1602
1603 case WM_SYSCOMMAND:
1604 {
1605 POINT point;
1606
1607 point.x = LOWORD(lParam);
1608 point.y = HIWORD(lParam);
1609 return HandleSysCommand(wParam,&point);
1610 }
1611
1612 case WM_SYSKEYDOWN:
1613 if(wParam == VK_F4) /* try to close the window */
1614 {
1615 Win32BaseWindow *window = GetTopParent();
1616 if(window && !(window->getClass()->getStyle() & CS_NOCLOSE))
1617 PostMessageA(getWindowHandle(), WM_SYSCOMMAND, SC_CLOSE, 0);
1618 return 0;
1619 }
1620
1621 Win32BaseWindow *siblingWindow;
1622 HWND sibling;
1623 char nameBuffer [40], mnemonic;
1624 int nameLength;
1625
1626 GetWindowTextA (nameBuffer, 40);
1627
1628 // search all sibling to see it this key is their mnemonic
1629 sibling = GetWindow (GW_HWNDFIRST);
1630 while (sibling != 0) {
1631 siblingWindow = GetWindowFromHandle (sibling);
1632 nameLength = siblingWindow->GetWindowTextA (nameBuffer, 40);
1633
1634 // find the siblings mnemonic
1635 mnemonic = '\0';
1636 for (int i=0 ; i<nameLength ; i++) {
1637 if (nameBuffer [i] == '&') {
1638 mnemonic = nameBuffer [i+1];
1639 if ((mnemonic >= 'a') && (mnemonic <= 'z'))
1640 mnemonic -= 32; // make it uppercase
1641 break; // stop searching
1642 }
1643 }
1644
1645 // key matches siblings mnemonic, send mouseclick
1646 if (mnemonic == (char) wParam) {
1647 siblingWindow->SendInternalMessageA (BM_CLICK, 0, 0);
1648 }
1649
1650 sibling = siblingWindow->GetNextWindow (GW_HWNDNEXT);
1651 }
1652
1653 return 0;
1654
1655#if 0 //CB: todo: MSDN docu: Windown handles these messages and not WM_SYSCHAR (the code below doesn't work)
1656 case WM_KEYDOWN:
1657 case WM_KEYUP:
1658 case WM_SYSKEYDOWN:
1659 case WM_SYSKEYUP:
1660#endif
1661
1662 case WM_SYSCHAR:
1663 {
1664 int iMenuSysKey = 0;
1665 if (wParam == VK_RETURN && (getStyle() & WS_MINIMIZE))
1666 {
1667 PostMessageA(getWindowHandle(), WM_SYSCOMMAND,
1668 (WPARAM)SC_RESTORE, 0L );
1669 break;
1670 }
1671 if((HIWORD(lParam) & KEYDATA_ALT) && wParam)
1672 {
1673 if (wParam == VK_TAB || wParam == VK_ESCAPE)
1674 break;
1675 if (wParam == VK_SPACE && (getStyle() & WS_CHILD)) {
1676 getParent()->SendMessageA(Msg, wParam, lParam );
1677 }
1678 else SendMessageA(WM_SYSCOMMAND, (WPARAM)SC_KEYMENU, (LPARAM)(DWORD)wParam );
1679 }
1680#if 0
1681 else /* check for Ctrl-Esc */
1682 if (wParam != VK_ESCAPE) MessageBeep(0);
1683 break;
1684#endif
1685 }
1686
1687 case WM_SETHOTKEY:
1688 hotkey = wParam;
1689 return 1; //CB: always successful
1690
1691 case WM_GETHOTKEY:
1692 return hotkey;
1693
1694 case WM_CONTEXTMENU:
1695 if ((dwStyle & WS_CHILD) && getParent())
1696 getParent()->SendInternalMessageA(WM_CONTEXTMENU,wParam,lParam);
1697 return 0;
1698
1699 case WM_SHOWWINDOW:
1700 if (!lParam) return 0; /* sent from ShowWindow */
1701 if (!(dwStyle & WS_POPUP) || !owner) return 0;
1702 if ((dwStyle & WS_VISIBLE) && wParam) return 0;
1703 else if (!(dwStyle & WS_VISIBLE) && !wParam) return 0;
1704 ShowWindow(wParam ? SW_SHOW:SW_HIDE);
1705 return 0;
1706
1707 case WM_CANCELMODE:
1708 if (getParent() == windowDesktop) EndMenu();
1709 if (GetCapture() == Win32Hwnd) ReleaseCapture();
1710 return 0;
1711
1712 case WM_DROPOBJECT:
1713 return DRAG_FILE;
1714
1715 case WM_QUERYDROPOBJECT:
1716 return (dwExStyle & WS_EX_ACCEPTFILES) ? 1:0;
1717
1718 case WM_QUERYDRAGICON:
1719 {
1720 HICON hDragIcon = windowClass->getCursor();
1721 UINT len;
1722
1723 if(hDragIcon) return (LRESULT)hDragIcon;
1724 for(len = 1; len < 64; len++)
1725 {
1726 hDragIcon = LoadIconA(hInstance,MAKEINTRESOURCEA(len));
1727 if(hDragIcon)
1728 return (LRESULT)hDragIcon;
1729 }
1730 return (LRESULT)LoadIconA(0,IDI_APPLICATIONA);
1731 }
1732
1733 case WM_QUERYOPEN:
1734 case WM_QUERYENDSESSION:
1735 return 1;
1736
1737 case WM_NOTIFYFORMAT:
1738 return IsWindowUnicode() ? NFR_UNICODE:NFR_ANSI;
1739
1740 case WM_SETICON:
1741 case WM_GETICON:
1742 {
1743 LRESULT result = 0;
1744
1745 /* Set the appropriate icon members in the window structure. */
1746 if (wParam == ICON_SMALL)
1747 {
1748 result = hIconSm;
1749 if (Msg == WM_SETICON)
1750 hIconSm = (HICON)lParam;
1751 }
1752 else
1753 {
1754 result = hIcon;
1755 if (Msg == WM_SETICON)
1756 {
1757 hIcon = (HICON)lParam;
1758 if ((dwStyle & WS_CAPTION) == WS_CAPTION)
1759 OSLibWinSetIcon(OS2Hwnd,hIcon);
1760 }
1761 }
1762 if ((Msg == WM_SETICON) && ((dwStyle & WS_CAPTION) == WS_CAPTION))
1763 HandleNCPaint((HRGN)1);
1764
1765 return result;
1766 }
1767
1768 case WM_HELP:
1769 if (getParent()) getParent()->SendInternalMessageA(Msg,wParam,lParam);
1770 break;
1771
1772 case WM_NOTIFY:
1773 return 0; //comctl32 controls expect this
1774
1775 default:
1776 return 0;
1777 }
1778 return 0;
1779}
1780//******************************************************************************
1781//******************************************************************************
1782LRESULT Win32BaseWindow::DefWindowProcW(UINT Msg, WPARAM wParam, LPARAM lParam)
1783{
1784 switch(Msg)
1785 {
1786 case WM_GETTEXTLENGTH:
1787 return wndNameLength;
1788
1789 case WM_GETTEXT:
1790 if (!lParam || !wParam) return 0;
1791 if (!windowNameW) ((LPWSTR)lParam)[0] = 0;
1792 else lstrcpynW((LPWSTR)lParam,windowNameW,wParam);
1793 return min(wndNameLength,wParam);
1794
1795 case WM_SETTEXT:
1796 {
1797 LPWSTR lpsz = (LPWSTR)lParam;
1798
1799 if(windowNameA) free(windowNameA);
1800 if(windowNameW) free(windowNameW);
1801 if (lParam)
1802 {
1803 wndNameLength = lstrlenW(lpsz);
1804 windowNameA = (LPSTR)_smalloc(wndNameLength+1);
1805 lstrcpyWtoA(windowNameA,lpsz);
1806 windowNameW = (LPWSTR)_smalloc((wndNameLength+1)*sizeof(WCHAR));
1807 lstrcpyW(windowNameW,lpsz);
1808 }
1809 else
1810 {
1811 windowNameA = NULL;
1812 windowNameW = NULL;
1813 wndNameLength = 0;
1814 }
1815 dprintf(("WM_SETTEXT of %x\n",Win32Hwnd));
1816 if ((dwStyle & WS_CAPTION) == WS_CAPTION)
1817 {
1818 HandleNCPaint((HRGN)1);
1819 if(hTaskList) {
1820 OSLibWinChangeTaskList(hTaskList, OS2Hwnd, getWindowNameA(), (getStyle() & WS_VISIBLE) ? 1 : 0);
1821 }
1822 }
1823
1824 return TRUE;
1825 }
1826
1827 default:
1828 return DefWindowProcA(Msg, wParam, lParam);
1829 }
1830}
1831//******************************************************************************
1832//******************************************************************************
1833LRESULT Win32BaseWindow::SendMessageA(ULONG Msg, WPARAM wParam, LPARAM lParam)
1834{
1835 //if the destination window is created by this process & thread, call window proc directly
1836 if(dwProcessId == currentProcessId && dwThreadId == GetCurrentThreadId()) {
1837 return SendInternalMessageA(Msg, wParam, lParam);
1838 }
1839 //otherwise use WinSendMsg to send it to the right process/thread
1840 dprintf(("SendMessages (inter-process) %x %x %x %x", getWindowHandle(), Msg, wParam, lParam));
1841 return OSLibSendMessage(getOS2WindowHandle(), Msg, wParam, lParam, FALSE);
1842}
1843//******************************************************************************
1844//******************************************************************************
1845LRESULT Win32BaseWindow::SendMessageW(ULONG Msg, WPARAM wParam, LPARAM lParam)
1846{
1847 //if the destination window is created by this process & thread, call window proc directly
1848 if(dwProcessId == currentProcessId && dwThreadId == GetCurrentThreadId()) {
1849 return SendInternalMessageW(Msg, wParam, lParam);
1850 }
1851 //otherwise use WinSendMsg to send it to the right process/thread
1852 return OSLibSendMessage(getOS2WindowHandle(), Msg, wParam, lParam, TRUE);
1853}
1854//******************************************************************************
1855//Called as a result of an OS/2 message or called from a class method
1856//******************************************************************************
1857LRESULT Win32BaseWindow::SendInternalMessageA(ULONG Msg, WPARAM wParam, LPARAM lParam)
1858{
1859 LRESULT rc;
1860 BOOL fInternalMsgBackup = fInternalMsg;
1861
1862 DebugPrintMessage(getWindowHandle(), Msg, wParam, lParam, FALSE, TRUE);
1863
1864 CallWindowHookProc(WH_CALLWNDPROC, Msg, wParam, lParam, FALSE);
1865
1866 fInternalMsg = TRUE;
1867 switch(Msg)
1868 {
1869 case WM_CREATE:
1870 {
1871 if(CallWindowProcA(win32wndproc, getWindowHandle(), WM_CREATE, 0, lParam) == -1) {
1872 dprintf(("WM_CREATE returned -1\n"));
1873 rc = -1; //don't create window
1874 break;
1875 }
1876 rc = 0;
1877 break;
1878 }
1879 case WM_LBUTTONDOWN:
1880 case WM_MBUTTONDOWN:
1881 case WM_RBUTTONDOWN:
1882 {
1883 if (getParent())
1884 {
1885 POINTS pt = MAKEPOINTS(lParam);
1886 POINT point;
1887
1888 point.x = pt.x;
1889 point.y = pt.y;
1890 MapWindowPoints(getWindowHandle(), getParent()->getWindowHandle(), &point, 1);
1891 NotifyParent(Msg,wParam,MAKELPARAM(point.x,point.y));
1892 }
1893 rc = win32wndproc(getWindowHandle(), Msg, wParam, lParam);
1894 break;
1895 }
1896
1897 case WM_DESTROY:
1898 rc = win32wndproc(getWindowHandle(), WM_DESTROY, 0, 0);
1899 break;
1900
1901 default:
1902 rc = CallWindowProcA(win32wndproc, getWindowHandle(), Msg, wParam, lParam);
1903 break;
1904 }
1905 fInternalMsg = fInternalMsgBackup;
1906 return rc;
1907}
1908//******************************************************************************
1909//Called as a result of an OS/2 message or called from a class method
1910//******************************************************************************
1911LRESULT Win32BaseWindow::SendInternalMessageW(ULONG Msg, WPARAM wParam, LPARAM lParam)
1912{
1913 LRESULT rc;
1914 BOOL fInternalMsgBackup = fInternalMsg;
1915
1916 DebugPrintMessage(getWindowHandle(), Msg, wParam, lParam, TRUE, TRUE);
1917
1918 CallWindowHookProc(WH_CALLWNDPROC, Msg, wParam, lParam, TRUE);
1919
1920 fInternalMsg = TRUE;
1921 switch(Msg)
1922 {
1923 case WM_CREATE:
1924 {
1925 if(CallWindowProcW(win32wndproc, getWindowHandle(), WM_CREATE, 0, lParam) == -1) {
1926 dprintf(("WM_CREATE returned -1\n"));
1927 rc = -1; //don't create window
1928 break;
1929 }
1930 rc = 0;
1931 break;
1932 }
1933 case WM_LBUTTONDOWN:
1934 case WM_MBUTTONDOWN:
1935 case WM_RBUTTONDOWN:
1936 NotifyParent(Msg, wParam, lParam);
1937 rc = win32wndproc(getWindowHandle(), Msg, wParam, lParam);
1938 break;
1939
1940 case WM_DESTROY:
1941 rc = win32wndproc(getWindowHandle(), WM_DESTROY, 0, 0);
1942 break;
1943 default:
1944 rc = CallWindowProcW(win32wndproc, getWindowHandle(), Msg, wParam, lParam);
1945 break;
1946 }
1947 fInternalMsg = fInternalMsgBackup;
1948 return rc;
1949}
1950//******************************************************************************
1951//******************************************************************************
1952void Win32BaseWindow::CallWindowHookProc(ULONG hooktype, ULONG Msg, WPARAM wParam, LPARAM lParam, BOOL fUnicode)
1953{
1954 CWPSTRUCT cwp;
1955
1956 cwp.lParam = lParam;
1957 cwp.wParam = wParam;
1958 cwp.message = Msg;
1959 cwp.hwnd = getWindowHandle();
1960
1961 switch(hooktype) {
1962 case WH_CALLWNDPROC:
1963 if(fUnicode) {
1964 HOOK_CallHooksW(WH_CALLWNDPROC, HC_ACTION, 1, (LPARAM)&cwp);
1965 }
1966 else HOOK_CallHooksA(WH_CALLWNDPROC, HC_ACTION, 1, (LPARAM)&cwp);
1967 break;
1968 }
1969}
1970//******************************************************************************
1971//TODO: Do this more efficiently
1972//******************************************************************************
1973LRESULT Win32BaseWindow::BroadcastMessageA(int type, UINT msg, WPARAM wParam, LPARAM lParam)
1974{
1975 Win32BaseWindow *window;
1976 HWND hwnd = WNDHANDLE_MAGIC_HIGHWORD;
1977
1978 dprintf(("BroadCastMessageA %x %x %x", msg, wParam, lParam, GetFS()));
1979
1980 for(int i=0;i<MAX_WINDOW_HANDLES;i++) {
1981 window = GetWindowFromHandle(hwnd++);
1982 if(window) {
1983 if ((window->getStyle() & WS_POPUP) || ((window->getStyle() & WS_CAPTION) == WS_CAPTION))
1984 {
1985
1986 if(type == BROADCAST_SEND) {
1987 ::SendMessageA(window->getWindowHandle(), msg, wParam, lParam);
1988 }
1989 else PostMessageA(window->getWindowHandle(), msg, wParam, lParam);
1990 }
1991 }
1992 }
1993 return 0;
1994}
1995//******************************************************************************
1996//TODO: Do this more efficiently
1997//******************************************************************************
1998LRESULT Win32BaseWindow::BroadcastMessageW(int type, UINT msg, WPARAM wParam, LPARAM lParam)
1999{
2000 Win32BaseWindow *window;
2001 HWND hwnd = WNDHANDLE_MAGIC_HIGHWORD;
2002
2003 dprintf(("BroadCastMessageW %x %x %x", msg, wParam, lParam));
2004
2005 for(int i=0;i<MAX_WINDOW_HANDLES;i++) {
2006 window = GetWindowFromHandle(hwnd++);
2007 if(window) {
2008 if ((window->getStyle() & WS_POPUP) || ((window->getStyle() & WS_CAPTION) == WS_CAPTION))
2009 {
2010
2011 if(type == BROADCAST_SEND) {
2012 ::SendMessageW(window->getWindowHandle(), msg, wParam, lParam);
2013 }
2014 else PostMessageW(window->getWindowHandle(), msg, wParam, lParam);
2015 }
2016 }
2017 }
2018 return 0;
2019}
2020//******************************************************************************
2021//******************************************************************************
2022void Win32BaseWindow::NotifyParent(UINT Msg, WPARAM wParam, LPARAM lParam)
2023{
2024 Win32BaseWindow *window = this;
2025 Win32BaseWindow *parentwindow;
2026
2027 while(window)
2028 {
2029 if(window->getStyle() & WS_CHILD && !(window->getExStyle() & WS_EX_NOPARENTNOTIFY) )
2030 {
2031 /* Notify the parent window only */
2032 parentwindow = window->getParent();
2033 if(parentwindow) {
2034 parentwindow->SendInternalMessageA(WM_PARENTNOTIFY, MAKEWPARAM(Msg, getWindowId()), lParam );
2035 }
2036 }
2037 else break;
2038
2039 window = parentwindow;
2040 }
2041}
2042//******************************************************************************
2043// Returns the big or small icon for the window, falling back to the
2044// class as windows does.
2045//******************************************************************************
2046HICON Win32BaseWindow::IconForWindow(WPARAM fType)
2047{
2048 HICON hWndIcon;
2049
2050 if (fType == ICON_BIG)
2051 {
2052 if (hIcon) hWndIcon = hIcon;
2053 else if (windowClass && windowClass->getIcon()) hWndIcon = windowClass->getIcon();
2054 else if (!(dwStyle & DS_MODALFRAME))
2055 hWndIcon = LoadImageA(0,MAKEINTRESOURCEA(OIC_ODINICON),IMAGE_ICON,0,0,LR_DEFAULTCOLOR);
2056 else hWndIcon = 0;
2057 } else
2058 {
2059 if (hIconSm) hWndIcon = hIconSm;
2060 else if (hIcon) hWndIcon = hIcon;
2061 else if (windowClass && windowClass->getIconSm()) hWndIcon = windowClass->getIconSm();
2062 else if (windowClass && windowClass->getIcon()) hWndIcon = windowClass->getIcon();
2063 else if (!(dwStyle & DS_MODALFRAME))
2064 hWndIcon = LoadImageA(0,MAKEINTRESOURCEA(OIC_ODINICON),IMAGE_ICON,0,0,LR_DEFAULTCOLOR);
2065 else hWndIcon = 0;
2066 }
2067
2068 return hWndIcon;
2069}
2070//******************************************************************************
2071//******************************************************************************
2072BOOL Win32BaseWindow::ShowWindow(ULONG nCmdShow)
2073{
2074 ULONG swp = 0;
2075 HWND hWinAfter;
2076 BOOL rc,wasVisible,showFlag;
2077 RECT newPos = {0, 0, 0, 0};
2078
2079 dprintf(("ShowWindow %x %x", getWindowHandle(), nCmdShow));
2080 wasVisible = (getStyle() & WS_VISIBLE) != 0;
2081
2082 switch(nCmdShow)
2083 {
2084 case SW_HIDE:
2085 if (!wasVisible) goto END;
2086 swp |= SWP_HIDEWINDOW | SWP_NOSIZE | SWP_NOMOVE |
2087 SWP_NOACTIVATE | SWP_NOZORDER;
2088 break;
2089
2090 case SW_SHOWMINNOACTIVE:
2091 swp |= SWP_NOACTIVATE | SWP_NOZORDER;
2092 /* fall through */
2093 case SW_SHOWMINIMIZED:
2094 swp |= SWP_SHOWWINDOW;
2095 /* fall through */
2096 case SW_MINIMIZE:
2097 swp |= SWP_FRAMECHANGED;
2098 if( !(getStyle() & WS_MINIMIZE) )
2099 swp |= MinMaximize(SW_MINIMIZE, &newPos );
2100 else swp |= SWP_NOSIZE | SWP_NOMOVE;
2101 break;
2102
2103 case SW_SHOWMAXIMIZED: /* same as SW_MAXIMIZE */
2104 swp |= SWP_SHOWWINDOW | SWP_FRAMECHANGED;
2105 if( !(getStyle() & WS_MAXIMIZE) )
2106 swp |= MinMaximize(SW_MAXIMIZE, &newPos );
2107 else swp |= SWP_NOSIZE | SWP_NOMOVE;
2108 break;
2109
2110 case SW_SHOWNA:
2111 swp |= SWP_NOACTIVATE | SWP_NOZORDER;
2112 /* fall through */
2113 case SW_SHOW:
2114 swp |= SWP_SHOWWINDOW | SWP_NOSIZE | SWP_NOMOVE;
2115
2116 /*
2117 * ShowWindow has a little peculiar behavior that if the
2118 * window is already the topmost window, it will not
2119 * activate it.
2120 */
2121 if (::GetTopWindow((HWND)0)==getWindowHandle() && (wasVisible || GetActiveWindow() == getWindowHandle()))
2122 swp |= SWP_NOACTIVATE;
2123
2124 break;
2125
2126 case SW_SHOWNOACTIVATE:
2127 swp |= SWP_NOZORDER;
2128 if (GetActiveWindow()) swp |= SWP_NOACTIVATE;
2129 /* fall through */
2130 case SW_SHOWNORMAL: /* same as SW_NORMAL: */
2131 case SW_SHOWDEFAULT: /* FIXME: should have its own handler */
2132 case SW_RESTORE:
2133 //TODO: WIN_RESTORE_MAX flag!!!!!!!!!!!!!!
2134 swp |= SWP_SHOWWINDOW | SWP_FRAMECHANGED;
2135
2136 if( getStyle() & (WS_MINIMIZE | WS_MAXIMIZE) )
2137 swp |= MinMaximize(SW_RESTORE, &newPos );
2138 else swp |= SWP_NOSIZE | SWP_NOMOVE;
2139 break;
2140 }
2141
2142 showFlag = (nCmdShow != SW_HIDE);
2143 if (showFlag != wasVisible)
2144 {
2145 SendInternalMessageA(WM_SHOWWINDOW, showFlag, 0 );
2146 if (!::IsWindow( getWindowHandle() )) goto END;
2147 }
2148
2149 /* We can't activate a child window */
2150 if((getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_MDICHILD))
2151 swp |= SWP_NOACTIVATE | SWP_NOZORDER;
2152
2153 SetWindowPos(HWND_TOP, newPos.left, newPos.top, newPos.right, newPos.bottom, LOWORD(swp));
2154
2155 if(!(swp & SWP_NOACTIVATE)) {
2156 OSLibWinSetActiveWindow(OS2Hwnd);
2157 }
2158
2159 if (flags & WIN_NEED_SIZE)
2160 {
2161 /* should happen only in CreateWindowEx() */
2162 int wParam = SIZE_RESTORED;
2163
2164 flags &= ~WIN_NEED_SIZE;
2165 if (dwStyle & WS_MAXIMIZE)
2166 wParam = SIZE_MAXIMIZED;
2167 else
2168 if (dwStyle & WS_MINIMIZE)
2169 wParam = SIZE_MINIMIZED;
2170
2171 SendInternalMessageA(WM_SIZE, wParam,
2172 MAKELONG(rectClient.right-rectClient.left,
2173 rectClient.bottom-rectClient.top));
2174 SendInternalMessageA(WM_MOVE,0,MAKELONG(rectClient.left,rectClient.top));
2175 }
2176END:
2177 return wasVisible;
2178}
2179//******************************************************************************
2180//******************************************************************************
2181BOOL Win32BaseWindow::SetWindowPos(HWND hwndInsertAfter, int x, int y, int cx, int cy, UINT fuFlags)
2182{
2183 BOOL rc = FALSE;
2184 Win32BaseWindow *window;
2185 HWND hParent = 0;
2186 RECT oldClientRect = rectClient;
2187
2188 if (fuFlags &
2189 ~(SWP_NOSIZE | SWP_NOMOVE | SWP_NOZORDER |
2190 SWP_NOREDRAW | SWP_NOACTIVATE | SWP_FRAMECHANGED |
2191 SWP_SHOWWINDOW | SWP_HIDEWINDOW | SWP_NOCOPYBITS |
2192 SWP_NOOWNERZORDER))
2193 {
2194 return FALSE;
2195 }
2196
2197 if(IsWindowDestroyed()) {
2198 //changing the position of a window that's being destroyed can cause crashes in PMMERGE
2199 dprintf(("SetWindowPos; window already destroyed"));
2200 return TRUE;
2201 }
2202#if 0
2203 /* Fix redundant flags */
2204 if(getStyle() & WS_VISIBLE) {
2205 fuFlags &= ~SWP_SHOWWINDOW;
2206 }
2207 else
2208 {
2209 if (!(fuFlags & SWP_SHOWWINDOW))
2210 fuFlags |= SWP_NOREDRAW;
2211 fuFlags &= ~SWP_HIDEWINDOW;
2212 }
2213
2214 if(cx < 0) cx = 0;
2215 if(cy < 0) cy = 0;
2216
2217 if((rectWindow.right - rectWindow.left == cx) && (rectWindow.bottom - rectWindow.top == cy)) {
2218 fuFlags |= SWP_NOSIZE; /* Already the right size */
2219 }
2220
2221 if((rectWindow.left == x) && (rectWindow.top == y)) {
2222 fuFlags |= SWP_NOMOVE; /* Already the right position */
2223 }
2224
2225 if(getWindowHandle() == GetActiveWindow()) {
2226 fuFlags |= SWP_NOACTIVATE; /* Already active */
2227 }
2228 else
2229 if((getStyle() & (WS_POPUP | WS_CHILD)) != WS_CHILD )
2230 {
2231 if(!(fuFlags & SWP_NOACTIVATE)) /* Bring to the top when activating */
2232 {
2233 fuFlags &= ~SWP_NOZORDER;
2234 hwndInsertAfter = HWND_TOP;
2235 }
2236 }
2237#endif
2238
2239 WINDOWPOS wpos;
2240 SWP swp, swpOld;
2241 wpos.flags = fuFlags;
2242 wpos.cy = cy;
2243 wpos.cx = cx;
2244 wpos.x = x;
2245 wpos.y = y;
2246 wpos.hwndInsertAfter = hwndInsertAfter;
2247 wpos.hwnd = getWindowHandle();
2248
2249 if(~fuFlags & (SWP_NOMOVE | SWP_NOSIZE))
2250 {
2251 if (isChild())
2252 {
2253 if(!getParent()) {
2254 dprintf(("WARNING: Win32BaseWindow::SetWindowPos window %x is child but has no parent!!", getWindowHandle()));
2255 }
2256 }
2257 OSLibWinQueryWindowPos(OS2Hwnd, &swpOld);
2258 }
2259
2260 if(getParent()) {
2261 OSLibMapWINDOWPOStoSWP(&wpos, &swp, &swpOld, getParent()->getWindowHeight(),
2262 getParent()->getClientRectPtr()->left,
2263 getParent()->getClientRectPtr()->top,
2264 OS2Hwnd);
2265 }
2266 else OSLibMapWINDOWPOStoSWP(&wpos, &swp, &swpOld, OSLibQueryScreenHeight(), 0, 0, OS2Hwnd);
2267 if (swp.fl == 0) {
2268 if(fuFlags & SWP_FRAMECHANGED)
2269 {
2270 MsgFormatFrame(NULL);
2271 UnionRect(&oldClientRect, &oldClientRect, &rectClient);
2272 OffsetRect(&oldClientRect, -rectClient.left, -rectClient.top);
2273 InvalidateRect(getWindowHandle(), &oldClientRect, TRUE);
2274 }
2275 return TRUE;
2276 }
2277
2278// if ((swp.fl & SWPOS_ZORDER) && (swp.hwndInsertBehind > HWNDOS_BOTTOM))
2279 if ((swp.hwndInsertBehind > HWNDOS_BOTTOM))
2280 {
2281 Win32BaseWindow *wndBehind = Win32BaseWindow::GetWindowFromHandle(swp.hwndInsertBehind);
2282 if(wndBehind) {
2283 swp.hwndInsertBehind = wndBehind->getOS2WindowHandle();
2284 }
2285 else {
2286 dprintf(("ERROR: SetWindowPos: hwndInsertBehind %x invalid!",swp.hwndInsertBehind));
2287 swp.hwndInsertBehind = 0;
2288 }
2289 }
2290 swp.hwnd = OS2Hwnd;
2291
2292 if(fuFlags & SWP_SHOWWINDOW && !IsWindowVisible()) {
2293 setStyle(getStyle() | WS_VISIBLE);
2294 if(hTaskList) {
2295 dprintf(("Adding window %x to tasklist", getWindowHandle()));
2296 OSLibWinChangeTaskList(hTaskList, OS2Hwnd, getWindowNameA(), (getStyle() & WS_VISIBLE) ? 1 : 0);
2297 }
2298 }
2299 else
2300 if(fuFlags & SWP_HIDEWINDOW && IsWindowVisible()) {
2301 setStyle(getStyle() & ~WS_VISIBLE);
2302 if(hTaskList) {
2303 dprintf(("Removing window %x from tasklist", getWindowHandle()));
2304 OSLibWinChangeTaskList(hTaskList, OS2Hwnd, getWindowNameA(), (getStyle() & WS_VISIBLE) ? 1 : 0);
2305 }
2306 }
2307 dprintf (("WinSetWindowPos %x %x (%d,%d)(%d,%d) %x", swp.hwnd, swp.hwndInsertBehind, swp.x, swp.y, swp.cx, swp.cy, swp.fl));
2308 rc = OSLibWinSetMultWindowPos(&swp, 1);
2309
2310 if(rc == FALSE)
2311 {
2312 dprintf(("OSLibWinSetMultWindowPos failed! Error %x",OSLibWinGetLastError()));
2313 return 0;
2314 }
2315
2316 if((fuFlags & SWP_FRAMECHANGED) && (fuFlags & (SWP_NOMOVE | SWP_NOSIZE) == (SWP_NOMOVE | SWP_NOSIZE)))
2317 {
2318 UnionRect(&oldClientRect, &oldClientRect, &rectClient);
2319 OffsetRect(&oldClientRect, -rectClient.left, -rectClient.top);
2320 InvalidateRect(getWindowHandle(), &oldClientRect, TRUE);
2321 }
2322 return (rc);
2323}
2324//******************************************************************************
2325//TODO: Check how this api really works in NT
2326// This implemention doesn't make a lot of sense to me (compared to the
2327// description in the SDK docs)
2328//******************************************************************************
2329BOOL Win32BaseWindow::SetWindowPlacement(WINDOWPLACEMENT *wndpl)
2330{
2331 windowpos.ptMinPosition = wndpl->ptMinPosition;
2332 windowpos.ptMaxPosition = wndpl->ptMaxPosition;
2333 windowpos.rcNormalPosition = wndpl->rcNormalPosition;
2334
2335 if(getStyle() & WS_MINIMIZE )
2336 {
2337 //TODO: Why can't this be (0,0)?
2338 if(wndpl->flags & WPF_SETMINPOSITION && !(!windowpos.ptMinPosition.x && !windowpos.ptMinPosition.y)) {
2339 SetWindowPos(0, windowpos.ptMinPosition.x, windowpos.ptMinPosition.y,
2340 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
2341 }
2342 }
2343 else
2344 if(getStyle() & WS_MAXIMIZE )
2345 {
2346 //TODO: Why can't this be (0,0)?
2347 if(windowpos.ptMaxPosition.x != 0 || windowpos.ptMaxPosition.y != 0 )
2348 SetWindowPos(0, windowpos.ptMaxPosition.x, windowpos.ptMaxPosition.y,
2349 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
2350 }
2351 else {
2352 //Papyrus calls this api with rcNormalPosition set to 0
2353 //So the rcNormalPosition should probably not affect the current position
2354#if 0
2355 SetWindowPos(0, windowpos.rcNormalPosition.left, windowpos.rcNormalPosition.top,
2356 windowpos.rcNormalPosition.right - windowpos.rcNormalPosition.left,
2357 windowpos.rcNormalPosition.bottom - windowpos.rcNormalPosition.top,
2358 SWP_NOZORDER | SWP_NOACTIVATE );
2359#endif
2360 }
2361 ShowWindow(wndpl->showCmd);
2362 if( ::IsWindow(getWindowHandle()) && getStyle() & WS_MINIMIZE )
2363 {
2364 /* SDK: ...valid only the next time... */
2365 if(wndpl->flags & WPF_RESTORETOMAXIMIZED)
2366 setFlags(getFlags() | WIN_RESTORE_MAX);
2367 }
2368 return TRUE;
2369}
2370//******************************************************************************
2371//******************************************************************************
2372BOOL Win32BaseWindow::GetWindowPlacement(LPWINDOWPLACEMENT wndpl)
2373{
2374 wndpl->length = sizeof(*wndpl);
2375 if(getStyle() & WS_MINIMIZE )
2376 wndpl->showCmd = SW_SHOWMINIMIZED;
2377 else wndpl->showCmd = (getStyle() & WS_MAXIMIZE) ? SW_SHOWMAXIMIZED : SW_SHOWNORMAL;
2378
2379 if(getFlags() & WIN_RESTORE_MAX )
2380 wndpl->flags = WPF_RESTORETOMAXIMIZED;
2381 else wndpl->flags = 0;
2382
2383 wndpl->ptMinPosition = windowpos.ptMinPosition;
2384 wndpl->ptMaxPosition = windowpos.ptMaxPosition;
2385 wndpl->rcNormalPosition = windowpos.rcNormalPosition;
2386
2387 return TRUE;
2388}
2389//******************************************************************************
2390//Also destroys all the child windows (destroy children first, parent last)
2391//******************************************************************************
2392BOOL Win32BaseWindow::DestroyWindow()
2393{
2394 HWND hwnd = getWindowHandle();
2395
2396 dprintf(("DestroyWindow %x", hwnd));
2397
2398 /* Call hooks */
2399 if(HOOK_CallHooksA( WH_CBT, HCBT_DESTROYWND, getWindowHandle(), 0L))
2400 {
2401 return FALSE;
2402 }
2403
2404 if(!(getStyle() & WS_CHILD) && getOwner() == NULL)
2405 {
2406 HOOK_CallHooksA(WH_SHELL, HSHELL_WINDOWDESTROYED, getWindowHandle(), 0L);
2407 /* FIXME: clean up palette - see "Internals" p.352 */
2408 }
2409
2410 if((getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_NOPARENTNOTIFY))
2411 {
2412 if(getParent() && getParent()->IsWindowDestroyed() == FALSE)
2413 {
2414 /* Notify the parent window only */
2415 getParent()->SendMessageA(WM_PARENTNOTIFY, MAKEWPARAM(WM_DESTROY, getWindowId()), (LPARAM)getWindowHandle());
2416 if(!::IsWindow(hwnd) )
2417 {
2418 return TRUE;
2419 }
2420 }
2421//// else DebugInt3();
2422 }
2423 /* Hide the window */
2424 if(IsWindowVisible())
2425 {
2426 SetWindowPos(0, 0, 0, 0, 0, SWP_HIDEWINDOW |
2427 SWP_NOACTIVATE|SWP_NOZORDER|SWP_NOMOVE|SWP_NOSIZE);
2428 if(!::IsWindow(hwnd))
2429 {
2430 return TRUE;
2431 }
2432 }
2433 dprintf(("DestroyWindow %x -> HIDDEN", hwnd));
2434
2435 fDestroyWindowCalled = TRUE;
2436 return OSLibWinDestroyWindow(OS2Hwnd);
2437}
2438//******************************************************************************
2439//******************************************************************************
2440Win32BaseWindow *Win32BaseWindow::getParent()
2441{
2442 Win32BaseWindow *wndparent = (Win32BaseWindow *)ChildWindow::getParentOfChild();
2443 return ((ULONG)wndparent == (ULONG)windowDesktop) ? NULL : wndparent;
2444}
2445//******************************************************************************
2446//******************************************************************************
2447HWND Win32BaseWindow::GetParent()
2448{
2449 if((!(getStyle() & (WS_POPUP|WS_CHILD)))) {
2450 return 0;
2451 }
2452
2453 Win32BaseWindow *wndparent = (Win32BaseWindow *)ChildWindow::getParentOfChild();
2454
2455 if(getStyle() & WS_CHILD) {
2456 if(wndparent) {
2457 return wndparent->getWindowHandle();
2458 }
2459 dprintf(("WARNING: GetParent: WS_CHILD but no parent!!"));
2460 DebugInt3();
2461 return 0;
2462 }
2463 else return (getOwner()) ? getOwner()->getWindowHandle() : 0;
2464}
2465//******************************************************************************
2466//******************************************************************************
2467HWND Win32BaseWindow::SetParent(HWND hwndNewParent)
2468{
2469 HWND oldhwnd;
2470 Win32BaseWindow *newparent;
2471 Win32BaseWindow *oldparent = (Win32BaseWindow *)ChildWindow::getParentOfChild();
2472 BOOL fShow = FALSE;
2473
2474 if(oldparent) {
2475 oldhwnd = oldparent->getWindowHandle();
2476 oldparent->removeChild(this);
2477 }
2478 else oldhwnd = 0;
2479
2480 /* Windows hides the window first, then shows it again
2481 * including the WM_SHOWWINDOW messages and all */
2482 if(fCreated && (getStyle() & WS_VISIBLE)) {
2483 ShowWindow(SW_HIDE);
2484 fShow = TRUE;
2485 }
2486
2487 newparent = GetWindowFromHandle(hwndNewParent);
2488 if(newparent && !newparent->isDesktopWindow())
2489 {
2490 setParent(newparent);
2491 getParent()->addChild(this);
2492 OSLibWinSetParent(getOS2WindowHandle(), getParent()->getOS2WindowHandle());
2493 if(!(getStyle() & WS_CHILD))
2494 {
2495 //TODO: Send WM_STYLECHANGED msg?
2496 setStyle(getStyle() | WS_CHILD);
2497 if(getWindowId())
2498 {
2499 DestroyMenu( (HMENU) getWindowId() );
2500 setWindowId(0);
2501 }
2502 }
2503 }
2504 else {
2505 setParent(windowDesktop);
2506 windowDesktop->addChild(this);
2507 OSLibWinSetParent(getOS2WindowHandle(), OSLIB_HWND_DESKTOP);
2508
2509 //TODO: Send WM_STYLECHANGED msg?
2510 setStyle(getStyle() & ~WS_CHILD);
2511 setWindowId(0);
2512 }
2513 /* SetParent additionally needs to make hwndChild the topmost window
2514 in the x-order and send the expected WM_WINDOWPOSCHANGING and
2515 WM_WINDOWPOSCHANGED notification messages.
2516 */
2517 if(fCreated) {
2518 SetWindowPos(HWND_TOPMOST, 0, 0, 0, 0,
2519 SWP_NOMOVE|SWP_NOSIZE|(fShow? SWP_SHOWWINDOW : 0));
2520
2521 /* FIXME: a WM_MOVE is also generated (in the DefWindowProc handler
2522 * for WM_WINDOWPOSCHANGED) in Windows, should probably remove SWP_NOMOVE */
2523 }
2524 return oldhwnd;
2525}
2526//******************************************************************************
2527//******************************************************************************
2528BOOL Win32BaseWindow::IsChild(HWND hwndParent)
2529{
2530 if(getParent()) {
2531 return getParent()->getWindowHandle() == hwndParent;
2532 }
2533 else return 0;
2534}
2535//******************************************************************************
2536//******************************************************************************
2537HWND Win32BaseWindow::GetTopWindow()
2538{
2539 HWND hwndTop;
2540 Win32BaseWindow *topwindow;
2541
2542 hwndTop = OSLibWinQueryWindow(getOS2WindowHandle(), QWOS_TOP);
2543 if(!isDesktopWindow()) {
2544 topwindow = GetWindowFromOS2Handle(hwndTop);
2545 if(topwindow) {
2546 return topwindow->getWindowHandle();
2547 }
2548 return 0;
2549 }
2550 while(hwndTop) {
2551 topwindow = GetWindowFromOS2Handle(hwndTop);
2552 if(topwindow) {
2553 return topwindow->getWindowHandle();
2554 }
2555 hwndTop = OSLibWinQueryWindow(hwndTop, QWOS_NEXT);
2556 }
2557
2558 return 0;
2559}
2560//******************************************************************************
2561// Get the top-level parent for a child window.
2562//******************************************************************************
2563Win32BaseWindow *Win32BaseWindow::GetTopParent()
2564{
2565 Win32BaseWindow *window = this;
2566
2567 while(window && (window->getStyle() & WS_CHILD))
2568 {
2569 window = window->getParent();
2570 }
2571 return window;
2572}
2573//******************************************************************************
2574//TODO: Should not enumerate children that are created during the enumeration!
2575//******************************************************************************
2576BOOL Win32BaseWindow::EnumChildWindows(WNDENUMPROC lpfn, LPARAM lParam)
2577{
2578 BOOL rc = TRUE;
2579 HWND hwnd;
2580 Win32BaseWindow *prevchild = 0, *child = 0;
2581
2582 dprintf(("EnumChildWindows of %x parameter %x %x (%x)", getWindowHandle(), lpfn, lParam, getFirstChild()));
2583 for (child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
2584 {
2585 dprintf(("EnumChildWindows: enumerating child %x (owner %x; parent %x)", child->getWindowHandle(), (child->getOwner()) ? child->getOwner()->getWindowHandle() : 0, getWindowHandle()));
2586 hwnd = child->getWindowHandle();
2587 if(child->getOwner()) {
2588 continue; //shouldn't have an owner (Wine)
2589 }
2590 if(lpfn(hwnd, lParam) == FALSE)
2591 {
2592 rc = FALSE;
2593 break;
2594 }
2595 //check if the window still exists
2596 if(!::IsWindow(hwnd))
2597 {
2598 child = prevchild;
2599 continue;
2600 }
2601 if(child->getFirstChild() != NULL)
2602 {
2603 dprintf(("EnumChildWindows: Enumerate children of %x", child->getWindowHandle()));
2604 if(child->EnumChildWindows(lpfn, lParam) == FALSE)
2605 {
2606 rc = FALSE;
2607 break;
2608 }
2609 }
2610 prevchild = child;
2611 }
2612 return rc;
2613}
2614//******************************************************************************
2615//Enumerate first-level children only and check thread id
2616//******************************************************************************
2617BOOL Win32BaseWindow::EnumThreadWindows(DWORD dwThreadId, WNDENUMPROC lpfn, LPARAM lParam)
2618{
2619 Win32BaseWindow *child = 0;
2620 ULONG tid, pid;
2621 BOOL rc;
2622 HWND hwnd;
2623
2624 dprintf(("EnumThreadWindows %x %x %x", dwThreadId, lpfn, lParam));
2625
2626 for (child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
2627 {
2628 OSLibWinQueryWindowProcess(child->getOS2WindowHandle(), &pid, &tid);
2629
2630 if(dwThreadId == tid) {
2631 dprintf2(("EnumThreadWindows: Found Window %x", child->getWindowHandle()));
2632 if((rc = lpfn(child->getWindowHandle(), lParam)) == FALSE) {
2633 break;
2634 }
2635 }
2636 }
2637 return TRUE;
2638}
2639//******************************************************************************
2640//Enumerate first-level children only
2641//******************************************************************************
2642BOOL Win32BaseWindow::EnumWindows(WNDENUMPROC lpfn, LPARAM lParam)
2643{
2644 Win32BaseWindow *child = 0;
2645 BOOL rc;
2646 HWND hwnd;
2647
2648 dprintf(("EnumWindows %x %x", lpfn, lParam));
2649
2650 for (child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
2651 {
2652 hwnd = child->getWindowHandle();
2653
2654 dprintf2(("EnumWindows: Found Window %x", child->getWindowHandle()));
2655 if((rc = lpfn(child->getWindowHandle(), lParam)) == FALSE) {
2656 break;
2657 }
2658 }
2659 return TRUE;
2660}
2661//******************************************************************************
2662//******************************************************************************
2663Win32BaseWindow *Win32BaseWindow::FindWindowById(int id)
2664{
2665 for (Win32BaseWindow *child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
2666 {
2667 if (child->getWindowId() == id)
2668 {
2669 return child;
2670 }
2671 }
2672 return 0;
2673}
2674//******************************************************************************
2675//TODO:
2676//We assume (for now) that if hwndParent or hwndChildAfter are real window handles, that
2677//the current process owns them.
2678//******************************************************************************
2679HWND Win32BaseWindow::FindWindowEx(HWND hwndParent, HWND hwndChildAfter, ATOM atom, LPSTR lpszWindow)
2680{
2681 Win32BaseWindow *parent = GetWindowFromHandle(hwndParent);
2682 Win32BaseWindow *child = GetWindowFromHandle(hwndChildAfter);
2683
2684 dprintf(("FindWindowEx %x %x %x %s", hwndParent, hwndChildAfter, atom, lpszWindow));
2685 if((hwndParent != 0 && !parent) ||
2686 (hwndChildAfter != 0 && !child) ||
2687 (hwndParent == 0 && hwndChildAfter != 0))
2688 {
2689 dprintf(("Win32BaseWindow::FindWindowEx: parent or child not found %x %x", hwndParent, hwndChildAfter));
2690 SetLastError(ERROR_INVALID_WINDOW_HANDLE);
2691 return 0;
2692 }
2693 SetLastError(0);
2694 if(hwndParent != 0)
2695 {//if the current process owns the window, just do a quick search
2696 child = (Win32BaseWindow *)parent->getFirstChild();
2697 if(hwndChildAfter != 0)
2698 {
2699 while(child)
2700 {
2701 if(child->getWindowHandle() == hwndChildAfter)
2702 {
2703 child = (Win32BaseWindow *)child->getNextChild();
2704 break;
2705 }
2706 child = (Win32BaseWindow *)child->getNextChild();
2707 }
2708 }
2709 while(child)
2710 {
2711 //According to Wine, the class doesn't need to be specified
2712 if((!atom || child->getWindowClass()->getAtom() == atom) &&
2713 (!lpszWindow || child->hasWindowName(lpszWindow)))
2714 {
2715 dprintf(("FindWindowEx: Found window %x", child->getWindowHandle()));
2716 return child->getWindowHandle();
2717 }
2718 child = (Win32BaseWindow *)child->getNextChild();
2719 }
2720 }
2721 else {
2722 Win32BaseWindow *wnd;
2723 HWND henum, hwnd;
2724
2725 henum = OSLibWinBeginEnumWindows(OSLIB_HWND_DESKTOP);
2726 hwnd = OSLibWinGetNextWindow(henum);
2727
2728 while(hwnd)
2729 {
2730 wnd = GetWindowFromOS2Handle(hwnd);
2731 if(wnd == NULL) {
2732 hwnd = OSLibWinQueryClientWindow(hwnd);
2733 if(hwnd) wnd = GetWindowFromOS2Handle(hwnd);
2734 }
2735
2736 if(wnd) {
2737 //According to Wine, the class doesn't need to be specified
2738 if((!atom || wnd->getWindowClass()->getAtom() == atom) &&
2739 (!lpszWindow || wnd->hasWindowName(lpszWindow)))
2740 {
2741 OSLibWinEndEnumWindows(henum);
2742 dprintf(("FindWindowEx: Found window %x", wnd->getWindowHandle()));
2743 return wnd->getWindowHandle();
2744 }
2745 }
2746 hwnd = OSLibWinGetNextWindow(henum);
2747 }
2748 OSLibWinEndEnumWindows(henum);
2749 }
2750 SetLastError(ERROR_CANNOT_FIND_WND_CLASS); //TODO: not always correct
2751 return 0;
2752}
2753//******************************************************************************
2754//******************************************************************************
2755HWND Win32BaseWindow::GetWindow(UINT uCmd)
2756{
2757 HWND hwndRelated = 0;
2758 Win32BaseWindow *window;
2759
2760 switch(uCmd)
2761 {
2762 case GW_HWNDFIRST:
2763 if(getParent()) {
2764 window = (Win32BaseWindow *)getParent()->getFirstChild();
2765 hwndRelated = window->getWindowHandle();
2766 }
2767 break;
2768
2769 case GW_HWNDLAST:
2770 if(!getParent())
2771 {
2772 goto end;
2773 }
2774
2775 window = this;
2776 while(window->getNextChild())
2777 {
2778 window = (Win32BaseWindow *)window->getNextChild();
2779 }
2780 hwndRelated = window->getWindowHandle();
2781 break;
2782
2783 case GW_HWNDNEXT:
2784 window = (Win32BaseWindow *)getNextChild();
2785 if(window) {
2786 hwndRelated = window->getWindowHandle();
2787 }
2788 break;
2789
2790 case GW_HWNDPREV:
2791 if(!getParent())
2792 {
2793 goto end;
2794 }
2795 window = (Win32BaseWindow *)(getParent()->getFirstChild()); /* First sibling */
2796 if(window == this)
2797 {
2798 hwndRelated = 0; /* First in list */
2799 goto end;
2800 }
2801 while(window->getNextChild())
2802 {
2803 if (window->getNextChild() == this)
2804 {
2805 hwndRelated = window->getWindowHandle();
2806 goto end;
2807 }
2808 window = (Win32BaseWindow *)window->getNextChild();
2809 }
2810 break;
2811
2812 case GW_OWNER:
2813 if(getOwner()) {
2814 hwndRelated = getOwner()->getWindowHandle();
2815 }
2816 break;
2817
2818 case GW_CHILD:
2819 if(getFirstChild()) {
2820 hwndRelated = ((Win32BaseWindow *)getFirstChild())->getWindowHandle();
2821 }
2822 break;
2823 }
2824end:
2825 dprintf(("GetWindow %x %d returned %x", getWindowHandle(), uCmd, hwndRelated));
2826 return hwndRelated;
2827}
2828//******************************************************************************
2829//******************************************************************************
2830HWND Win32BaseWindow::SetActiveWindow()
2831{
2832 HWND hwndActive;
2833
2834 dprintf(("SetActiveWindow %x", getWindowHandle()));
2835 if (HOOK_IsHooked( WH_CBT ))
2836 {
2837 CBTACTIVATESTRUCT cbta;
2838 LRESULT ret;
2839
2840 cbta.fMouse = FALSE;
2841 cbta.hWndActive = GetActiveWindow();
2842 ret = HOOK_CallHooksA(WH_CBT, HCBT_ACTIVATE, getWindowHandle(), (LPARAM)&cbta);
2843 if(ret)
2844 {
2845 dprintf(("SetActiveWindow %x, CBT hook cancelled operation", getWindowHandle()));
2846 return cbta.hWndActive;
2847 }
2848 }
2849
2850 if(OSLibWinSetActiveWindow(OS2Hwnd) == FALSE) {
2851 dprintf(("OSLibWinSetActiveWindow %x returned FALSE!", OS2Hwnd));
2852 }
2853 hwndActive = GetActiveWindow();
2854 return (hwndActive) ? hwndActive : windowDesktop->getWindowHandle(); //pretend the desktop was active
2855}
2856//******************************************************************************
2857//WM_ENABLE is sent to hwnd, but not to it's children (as it should be)
2858//******************************************************************************
2859BOOL Win32BaseWindow::EnableWindow(BOOL fEnable)
2860{
2861 BOOL rc;
2862
2863 //return true if previous state was disabled, else false (sdk docs)
2864 rc = (getStyle() & WS_DISABLED) != 0;
2865 if(rc && !fEnable) {
2866 SendMessageA(WM_CANCELMODE, 0, 0);
2867 }
2868 OSLibWinEnableWindow(OS2Hwnd, fEnable);
2869 if(fEnable == FALSE) {
2870 //SvL: No need to clear focus as PM already does this
2871 if(getWindowHandle() == GetCapture()) {
2872 ReleaseCapture(); /* A disabled window can't capture the mouse */
2873 dprintf(("Released capture for window %x that is being disabled", getWindowHandle()));
2874 }
2875 }
2876 return rc;
2877}
2878//******************************************************************************
2879//******************************************************************************
2880BOOL Win32BaseWindow::CloseWindow()
2881{
2882 return OSLibWinMinimizeWindow(OS2Hwnd);
2883}
2884//******************************************************************************
2885//TODO: Not be 100% correct; should return active window of current thread
2886// or NULL when there is none -> WinQueryActiveWindow just returns
2887// the current active window
2888//******************************************************************************
2889HWND Win32BaseWindow::GetActiveWindow()
2890{
2891 HWND hwndActive;
2892 Win32BaseWindow *win32wnd;
2893 ULONG magic;
2894
2895 hwndActive = OSLibWinQueryActiveWindow();
2896
2897 return OS2ToWin32Handle(hwndActive);
2898}
2899//******************************************************************************
2900//******************************************************************************
2901BOOL Win32BaseWindow::IsWindowEnabled()
2902{
2903 return OSLibWinIsWindowEnabled(OS2Hwnd);
2904}
2905//******************************************************************************
2906//******************************************************************************
2907BOOL Win32BaseWindow::IsWindowVisible()
2908{
2909 //TODO: Do we have to check the state of the parent window? (as Wine does)
2910#if 1
2911 return (dwStyle & WS_VISIBLE) == WS_VISIBLE;
2912#else
2913 return OSLibWinIsWindowVisible(OS2Hwnd);
2914#endif
2915}
2916//******************************************************************************
2917//******************************************************************************
2918BOOL Win32BaseWindow::hasWindowName(LPSTR wndname, BOOL fUnicode)
2919{
2920 INT len = GetWindowTextLength();
2921 BOOL res;
2922
2923 if (wndname == NULL)
2924 return (len == 0);
2925
2926 len++;
2927 if (fUnicode)
2928 {
2929 WCHAR *text = (WCHAR*)malloc(len*sizeof(WCHAR));
2930
2931 GetWindowTextW(text,len);
2932 res = (lstrcmpW(text,(LPWSTR)wndname) == 0);
2933 free(text);
2934 } else
2935 {
2936 CHAR *text = (CHAR*)malloc(len*sizeof(CHAR));
2937
2938 GetWindowTextA(text,len);
2939 res = (strcmp(text,wndname) == 0);
2940 free(text);
2941 }
2942
2943 return res;
2944}
2945//******************************************************************************
2946//******************************************************************************
2947CHAR *Win32BaseWindow::getWindowNamePtrA()
2948{
2949 INT len = GetWindowTextLength();
2950 CHAR *text;
2951
2952 if (len == 0) return NULL;
2953 len++;
2954 text = (CHAR*)malloc(len*sizeof(CHAR));
2955 GetWindowTextA(text,len);
2956
2957 return text;
2958}
2959//******************************************************************************
2960//******************************************************************************
2961WCHAR *Win32BaseWindow::getWindowNamePtrW()
2962{
2963 INT len = GetWindowTextLength();
2964 WCHAR *text;
2965
2966 if (len == 0) return NULL;
2967 len++;
2968 text = (WCHAR*)malloc(len*sizeof(WCHAR));
2969 GetWindowTextW(text,len);
2970
2971 return text;
2972}
2973//******************************************************************************
2974//******************************************************************************
2975VOID Win32BaseWindow::freeWindowNamePtr(PVOID namePtr)
2976{
2977 if (namePtr) free(namePtr);
2978}
2979//******************************************************************************
2980//******************************************************************************
2981int Win32BaseWindow::GetWindowTextLength()
2982{
2983 return SendInternalMessageA(WM_GETTEXTLENGTH,0,0);
2984}
2985//******************************************************************************
2986//******************************************************************************
2987int Win32BaseWindow::GetWindowTextA(LPSTR lpsz, int cch)
2988{
2989 return SendInternalMessageA(WM_GETTEXT,(WPARAM)cch,(LPARAM)lpsz);
2990}
2991//******************************************************************************
2992//******************************************************************************
2993int Win32BaseWindow::GetWindowTextW(LPWSTR lpsz, int cch)
2994{
2995 return SendInternalMessageW(WM_GETTEXT,(WPARAM)cch,(LPARAM)lpsz);
2996}
2997//******************************************************************************
2998//******************************************************************************
2999BOOL Win32BaseWindow::SetWindowTextA(LPSTR lpsz)
3000{
3001 return SendInternalMessageA(WM_SETTEXT,0,(LPARAM)lpsz);
3002}
3003//******************************************************************************
3004//******************************************************************************
3005BOOL Win32BaseWindow::SetWindowTextW(LPWSTR lpsz)
3006{
3007 return SendInternalMessageW(WM_SETTEXT,0,(LPARAM)lpsz);
3008}
3009//******************************************************************************
3010//******************************************************************************
3011LONG Win32BaseWindow::SetWindowLongA(int index, ULONG value, BOOL fUnicode)
3012{
3013 LONG oldval;
3014
3015 dprintf2(("SetWindowLong%c %x %d %x", (fUnicode) ? 'W' : 'A', getWindowHandle(), index, value));
3016 switch(index) {
3017 case GWL_EXSTYLE:
3018 {
3019 STYLESTRUCT ss;
3020
3021 if(dwExStyle == value)
3022 return value;
3023
3024 ss.styleOld = dwExStyle;
3025 ss.styleNew = value;
3026 dprintf(("SetWindowLong GWL_EXSTYLE %x old %x new style %x", getWindowHandle(), dwExStyle, value));
3027 SendInternalMessageA(WM_STYLECHANGING,GWL_EXSTYLE,(LPARAM)&ss);
3028 setExStyle(ss.styleNew);
3029 SendInternalMessageA(WM_STYLECHANGED,GWL_EXSTYLE,(LPARAM)&ss);
3030 return ss.styleOld;
3031 }
3032 case GWL_STYLE:
3033 {
3034 STYLESTRUCT ss;
3035
3036 //SvL: TODO: Can you change minimize or maximize status here too?
3037
3038 if(dwStyle == value)
3039 return value;
3040
3041 value &= ~(WS_CHILD|WS_VISIBLE); /* Some bits can't be changed this way (WINE) */
3042 ss.styleOld = getStyle();
3043 ss.styleNew = value | (ss.styleOld & (WS_CHILD|WS_VISIBLE));
3044 dprintf(("SetWindowLong GWL_STYLE %x old %x new style %x", getWindowHandle(), ss.styleOld, ss.styleNew));
3045 SendInternalMessageA(WM_STYLECHANGING,GWL_STYLE,(LPARAM)&ss);
3046 setStyle(ss.styleNew);
3047 SendInternalMessageA(WM_STYLECHANGED,GWL_STYLE,(LPARAM)&ss);
3048//// OSLibSetWindowStyle(getOS2WindowHandle(), getStyle(), getExStyle(),
3049//// windowClass->getStyle() & CS_SAVEBITS);
3050#ifdef DEBUG
3051 PrintWindowStyle(ss.styleNew, 0);
3052#endif
3053 return ss.styleOld;
3054 }
3055 case GWL_WNDPROC:
3056 {
3057 //Note: Type of SetWindowLong determines new window proc type
3058 // UNLESS the new window proc has already been registered
3059 // (use the old type in that case)
3060 // (VERIFIED in NT 4, SP6)
3061 WINDOWPROCTYPE type = WINPROC_GetProcType((HWINDOWPROC)value);
3062 if(type == WIN_PROC_INVALID) {
3063 type = (fUnicode) ? WIN_PROC_32W : WIN_PROC_32A;
3064 }
3065 oldval = (LONG)WINPROC_GetProc(win32wndproc, (fUnicode) ? WIN_PROC_32W : WIN_PROC_32A);
3066 WINPROC_SetProc((HWINDOWPROC *)&win32wndproc, (WNDPROC)value, type, WIN_PROC_WINDOW);
3067 return oldval;
3068 }
3069 case GWL_HINSTANCE:
3070 oldval = hInstance;
3071 hInstance = value;
3072 return oldval;
3073
3074 case GWL_HWNDPARENT:
3075 return SetParent((HWND)value);
3076
3077 case GWL_ID:
3078 oldval = getWindowId();
3079 setWindowId(value);
3080 return oldval;
3081
3082 case GWL_USERDATA:
3083 oldval = userData;
3084 userData = value;
3085 return oldval;
3086
3087 default:
3088 if(index >= 0 && index/4 < nrUserWindowLong)
3089 {
3090 oldval = userWindowLong[index/4];
3091 userWindowLong[index/4] = value;
3092 return oldval;
3093 }
3094 SetLastError(ERROR_INVALID_PARAMETER);
3095 return 0;
3096 }
3097}
3098//******************************************************************************
3099//******************************************************************************
3100ULONG Win32BaseWindow::GetWindowLongA(int index, BOOL fUnicode)
3101{
3102 ULONG value;
3103
3104 switch(index) {
3105 case GWL_EXSTYLE:
3106 value = dwExStyle;
3107 break;
3108 case GWL_STYLE:
3109 value = dwStyle;
3110 break;
3111 case GWL_WNDPROC:
3112 value = (LONG)WINPROC_GetProc(win32wndproc, (fUnicode) ? WIN_PROC_32W : WIN_PROC_32A);
3113 break;
3114 case GWL_HINSTANCE:
3115 value = hInstance;
3116 break;
3117 case GWL_HWNDPARENT:
3118 value = GetParent();
3119 break;
3120 case GWL_ID:
3121 value = getWindowId();
3122 break;
3123 case GWL_USERDATA:
3124 value = userData;
3125 break;
3126 default:
3127 if(index >= 0 && index/4 < nrUserWindowLong)
3128 {
3129 value = userWindowLong[index/4];
3130 break;
3131 }
3132 SetLastError(ERROR_INVALID_PARAMETER);
3133 return 0;
3134 }
3135 dprintf2(("GetWindowLongA %x %d %x", getWindowHandle(), index, value));
3136 return value;
3137}
3138//******************************************************************************
3139//******************************************************************************
3140WORD Win32BaseWindow::SetWindowWord(int index, WORD value)
3141{
3142 WORD oldval;
3143
3144 if(index >= 0 && index/4 < nrUserWindowLong)
3145 {
3146 oldval = ((WORD *)userWindowLong)[index/2];
3147 ((WORD *)userWindowLong)[index/2] = value;
3148 return oldval;
3149 }
3150 SetLastError(ERROR_INVALID_PARAMETER);
3151 return 0;
3152}
3153//******************************************************************************
3154//******************************************************************************
3155WORD Win32BaseWindow::GetWindowWord(int index)
3156{
3157 if(index >= 0 && index/4 < nrUserWindowLong)
3158 {
3159 return ((WORD *)userWindowLong)[index/2];
3160 }
3161 SetLastError(ERROR_INVALID_PARAMETER);
3162 return 0;
3163}
3164//******************************************************************************
3165//******************************************************************************
3166void Win32BaseWindow::setWindowId(DWORD id)
3167{
3168 dwIDMenu = id;
3169}
3170//******************************************************************************
3171//******************************************************************************
3172Win32BaseWindow *Win32BaseWindow::GetWindowFromHandle(HWND hwnd)
3173{
3174 Win32BaseWindow *window;
3175
3176 if(HwGetWindowHandleData(hwnd, (DWORD *)&window) == TRUE) {
3177 return window;
3178 }
3179// dprintf2(("Win32BaseWindow::GetWindowFromHandle: not a win32 window %x", hwnd));
3180 return NULL;
3181}
3182//******************************************************************************
3183//******************************************************************************
3184Win32BaseWindow *Win32BaseWindow::GetWindowFromOS2Handle(HWND hwnd)
3185{
3186 Win32BaseWindow *win32wnd;
3187 DWORD magic;
3188
3189 if(hwnd == OSLIB_HWND_DESKTOP)
3190 {
3191 return windowDesktop;
3192 }
3193
3194 win32wnd = (Win32BaseWindow *)OSLibWinGetWindowULong(hwnd, OFFSET_WIN32WNDPTR);
3195 magic = OSLibWinGetWindowULong(hwnd, OFFSET_WIN32PM_MAGIC);
3196
3197 if(win32wnd && CheckMagicDword(magic)) {
3198 return win32wnd;
3199 }
3200// dprintf2(("Win32BaseWindow::GetWindowFromOS2Handle: not an Odin os2 window %x", hwnd));
3201 return 0;
3202}
3203//******************************************************************************
3204//******************************************************************************
3205HWND Win32BaseWindow::Win32ToOS2Handle(HWND hwnd)
3206{
3207 Win32BaseWindow *window = GetWindowFromHandle(hwnd);
3208
3209 if(window) {
3210 return window->getOS2WindowHandle();
3211 }
3212// dprintf2(("Win32BaseWindow::Win32ToOS2Handle: not a win32 window %x", hwnd));
3213 return hwnd;
3214}
3215//******************************************************************************
3216//******************************************************************************
3217HWND Win32BaseWindow::OS2ToWin32Handle(HWND hwnd)
3218{
3219 Win32BaseWindow *window = GetWindowFromOS2Handle(hwnd);
3220
3221 if(window) {
3222 return window->getWindowHandle();
3223 }
3224// dprintf2(("Win32BaseWindow::OS2ToWin32Handle: not a win32 window %x", hwnd));
3225 return 0;
3226// else return hwnd; //OS/2 window handle
3227}
3228//******************************************************************************
3229//******************************************************************************
3230HWND Win32BaseWindow::getNextDlgTabItem(HWND hwndCtrl, BOOL fPrevious)
3231{
3232 Win32BaseWindow *child, *nextchild, *lastchild;
3233 HWND retvalue;
3234
3235 if (hwndCtrl)
3236 {
3237 child = GetWindowFromHandle(hwndCtrl);
3238 if (!child)
3239 {
3240 retvalue = 0;
3241 goto END;
3242 }
3243 /* Make sure hwndCtrl is a top-level child */
3244 while ((child->getStyle() & WS_CHILD) && (child->getParent() != this))
3245 {
3246 child = child->getParent();
3247 if(child == NULL) break;
3248 }
3249
3250 if (!child || (child->getParent() != this))
3251 {
3252 retvalue = 0;
3253 goto END;
3254 }
3255 }
3256 else
3257 {
3258 /* No ctrl specified -> start from the beginning */
3259 child = (Win32BaseWindow *)getFirstChild();
3260 if (!child)
3261 {
3262 retvalue = 0;
3263 goto END;
3264 }
3265
3266 if (!fPrevious)
3267 {
3268 while (child->getNextChild())
3269 {
3270 child = (Win32BaseWindow *)child->getNextChild();
3271 }
3272 }
3273 }
3274
3275 lastchild = child;
3276 nextchild = (Win32BaseWindow *)child->getNextChild();
3277 while (TRUE)
3278 {
3279 if (!nextchild) nextchild = (Win32BaseWindow *)getFirstChild();
3280
3281 if (child == nextchild) break;
3282
3283 if ((nextchild->getStyle() & WS_TABSTOP) && (nextchild->getStyle() & WS_VISIBLE) &&
3284 !(nextchild->getStyle() & WS_DISABLED))
3285 {
3286 lastchild = nextchild;
3287 if (!fPrevious) break;
3288 }
3289 nextchild = (Win32BaseWindow *)nextchild->getNextChild();
3290 }
3291 retvalue = lastchild->getWindowHandle();
3292
3293END:
3294 return retvalue;
3295}
3296//******************************************************************************
3297//******************************************************************************
3298HWND Win32BaseWindow::getNextDlgGroupItem(HWND hwndCtrl, BOOL fPrevious)
3299{
3300 Win32BaseWindow *child, *nextchild, *lastchild;
3301 HWND retvalue;
3302
3303 if (hwndCtrl)
3304 {
3305 child = GetWindowFromHandle(hwndCtrl);
3306 if (!child)
3307 {
3308 retvalue = 0;
3309 goto END;
3310 }
3311 /* Make sure hwndCtrl is a top-level child */
3312 while ((child->getStyle() & WS_CHILD) && (child->getParent() != this))
3313 {
3314 child = child->getParent();
3315 if(child == NULL) break;
3316 }
3317
3318 if (!child || (child->getParent() != this))
3319 {
3320 retvalue = 0;
3321 goto END;
3322 }
3323 }
3324 else
3325 {
3326 /* No ctrl specified -> start from the beginning */
3327 child = (Win32BaseWindow *)getFirstChild();
3328 if (!child)
3329 {
3330 retvalue = 0;
3331 goto END;
3332 }
3333
3334 if (fPrevious)
3335 {
3336 while (child->getNextChild())
3337 {
3338 child = (Win32BaseWindow *)child->getNextChild();
3339 }
3340 }
3341 }
3342
3343 lastchild = child;
3344 nextchild = (Win32BaseWindow *)child->getNextChild();
3345 while (TRUE)
3346 {
3347 if (!nextchild || (nextchild->getStyle() & WS_GROUP))
3348 {
3349 /* Wrap-around to the beginning of the group */
3350 Win32BaseWindow *pWndTemp;
3351
3352 nextchild = (Win32BaseWindow *)getFirstChild();
3353
3354 for(pWndTemp = nextchild;pWndTemp;pWndTemp = (Win32BaseWindow *)pWndTemp->getNextChild())
3355 {
3356 if (pWndTemp->getStyle() & WS_GROUP)
3357 nextchild = pWndTemp;
3358
3359 if (pWndTemp == child)
3360 break;
3361 }
3362
3363 }
3364 if (nextchild == child)
3365 break;
3366
3367 if ((nextchild->getStyle() & WS_VISIBLE) && !(nextchild->getStyle() & WS_DISABLED))
3368 {
3369 lastchild = nextchild;
3370
3371 if (!fPrevious)
3372 break;
3373 }
3374
3375 nextchild = (Win32BaseWindow *)nextchild->getNextChild();
3376 }
3377 retvalue = lastchild->getWindowHandle();
3378END:
3379 return retvalue;
3380}
3381//******************************************************************************
3382//******************************************************************************
3383#ifdef DEBUG
3384void PrintWindowStyle(DWORD dwStyle, DWORD dwExStyle)
3385{
3386 char style[256] = "";
3387 char exstyle[256] = "";
3388
3389 /* Window styles */
3390 if(dwStyle & WS_CHILD)
3391 strcat(style, "WS_CHILD ");
3392 if(dwStyle & WS_POPUP)
3393 strcat(style, "WS_POPUP ");
3394 if(dwStyle & WS_VISIBLE)
3395 strcat(style, "WS_VISIBLE ");
3396 if(dwStyle & WS_DISABLED)
3397 strcat(style, "WS_DISABLED ");
3398 if(dwStyle & WS_CLIPSIBLINGS)
3399 strcat(style, "WS_CLIPSIBLINGS ");
3400 if(dwStyle & WS_CLIPCHILDREN)
3401 strcat(style, "WS_CLIPCHILDREN ");
3402 if(dwStyle & WS_MAXIMIZE)
3403 strcat(style, "WS_MAXIMIZE ");
3404 if(dwStyle & WS_MINIMIZE)
3405 strcat(style, "WS_MINIMIZE ");
3406 if(dwStyle & WS_GROUP)
3407 strcat(style, "WS_GROUP ");
3408 if(dwStyle & WS_TABSTOP)
3409 strcat(style, "WS_TABSTOP ");
3410
3411 if((dwStyle & WS_CAPTION) == WS_CAPTION)
3412 strcat(style, "WS_CAPTION ");
3413 if(dwStyle & WS_DLGFRAME)
3414 strcat(style, "WS_DLGFRAME ");
3415 if(dwStyle & WS_BORDER)
3416 strcat(style, "WS_BORDER ");
3417
3418 if(dwStyle & WS_VSCROLL)
3419 strcat(style, "WS_VSCROLL ");
3420 if(dwStyle & WS_HSCROLL)
3421 strcat(style, "WS_HSCROLL ");
3422 if(dwStyle & WS_SYSMENU)
3423 strcat(style, "WS_SYSMENU ");
3424 if(dwStyle & WS_THICKFRAME)
3425 strcat(style, "WS_THICKFRAME ");
3426 if(dwStyle & WS_MINIMIZEBOX)
3427 strcat(style, "WS_MINIMIZEBOX ");
3428 if(dwStyle & WS_MAXIMIZEBOX)
3429 strcat(style, "WS_MAXIMIZEBOX ");
3430
3431 if(dwExStyle & WS_EX_DLGMODALFRAME)
3432 strcat(exstyle, "WS_EX_DLGMODALFRAME ");
3433 if(dwExStyle & WS_EX_ACCEPTFILES)
3434 strcat(exstyle, "WS_EX_ACCEPTFILES ");
3435 if(dwExStyle & WS_EX_NOPARENTNOTIFY)
3436 strcat(exstyle, "WS_EX_NOPARENTNOTIFY ");
3437 if(dwExStyle & WS_EX_TOPMOST)
3438 strcat(exstyle, "WS_EX_TOPMOST ");
3439 if(dwExStyle & WS_EX_TRANSPARENT)
3440 strcat(exstyle, "WS_EX_TRANSPARENT ");
3441
3442 if(dwExStyle & WS_EX_MDICHILD)
3443 strcat(exstyle, "WS_EX_MDICHILD ");
3444 if(dwExStyle & WS_EX_TOOLWINDOW)
3445 strcat(exstyle, "WS_EX_TOOLWINDOW ");
3446 if(dwExStyle & WS_EX_WINDOWEDGE)
3447 strcat(exstyle, "WS_EX_WINDOWEDGE ");
3448 if(dwExStyle & WS_EX_CLIENTEDGE)
3449 strcat(exstyle, "WS_EX_CLIENTEDGE ");
3450 if(dwExStyle & WS_EX_CONTEXTHELP)
3451 strcat(exstyle, "WS_EX_CONTEXTHELP ");
3452 if(dwExStyle & WS_EX_RIGHT)
3453 strcat(exstyle, "WS_EX_RIGHT ");
3454 if(dwExStyle & WS_EX_LEFT)
3455 strcat(exstyle, "WS_EX_LEFT ");
3456 if(dwExStyle & WS_EX_RTLREADING)
3457 strcat(exstyle, "WS_EX_RTLREADING ");
3458 if(dwExStyle & WS_EX_LTRREADING)
3459 strcat(exstyle, "WS_EX_LTRREADING ");
3460 if(dwExStyle & WS_EX_LEFTSCROLLBAR)
3461 strcat(exstyle, "WS_EX_LEFTSCROLLBAR ");
3462 if(dwExStyle & WS_EX_RIGHTSCROLLBAR)
3463 strcat(exstyle, "WS_EX_RIGHTSCROLLBAR ");
3464 if(dwExStyle & WS_EX_CONTROLPARENT)
3465 strcat(exstyle, "WS_EX_CONTROLPARENT ");
3466 if(dwExStyle & WS_EX_STATICEDGE)
3467 strcat(exstyle, "WS_EX_STATICEDGE ");
3468 if(dwExStyle & WS_EX_APPWINDOW)
3469 strcat(exstyle, "WS_EX_APPWINDOW ");
3470
3471 dprintf(("Window style: %x %s", dwStyle, style));
3472 dprintf(("Window exStyle: %x %s (FS = %x)", dwExStyle, exstyle, GetFS()));
3473}
3474#endif
3475//******************************************************************************
3476//******************************************************************************
3477
3478GenericObject *Win32BaseWindow::windows = NULL;
Note: See TracBrowser for help on using the repository browser.