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

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

removed DebugInt3 call in MsgDestroy

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