1 /*
2 * Default window procedure
3 *
4 * Copyright 1993, 1996 Alexandre Julliard
5 * 1995 Alex Korobka
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 */
21
22 #include "config.h"
23 #include "wine/port.h"
24
25 #include <string.h>
26 #include <stdarg.h>
27
28 #include "windef.h"
29 #include "winbase.h"
30 #include "wingdi.h"
31 #include "winnls.h"
32 #include "win.h"
33 #include "user_private.h"
34 #include "controls.h"
35 #include "wine/unicode.h"
36 #include "wine/winuser16.h"
37 #include "wine/server.h"
38 #include "wine/exception.h"
39 #include "wine/debug.h"
40
41 WINE_DEFAULT_DEBUG_CHANNEL(win);
42
43 /* bits in the dwKeyData */
44 #define KEYDATA_ALT 0x2000
45 #define KEYDATA_PREVSTATE 0x4000
46
47 static short iF10Key = 0;
48 static short iMenuSysKey = 0;
49 static const WCHAR imm32W[] = { 'i','m','m','3','2','\0' };
50
51 /***********************************************************************
52 * DEFWND_HandleWindowPosChanged
53 *
54 * Handle the WM_WINDOWPOSCHANGED message.
55 */
56 static void DEFWND_HandleWindowPosChanged( HWND hwnd, const WINDOWPOS *winpos )
57 {
58 RECT rect;
59 WND *wndPtr = WIN_GetPtr( hwnd );
60
61 rect = wndPtr->rectClient;
62 WIN_ReleasePtr( wndPtr );
63
64 if (!(winpos->flags & SWP_NOCLIENTMOVE))
65 SendMessageW( hwnd, WM_MOVE, 0, MAKELONG(rect.left, rect.top));
66
67 if (!(winpos->flags & SWP_NOCLIENTSIZE) || (winpos->flags & SWP_STATECHANGED))
68 {
69 WPARAM wp = SIZE_RESTORED;
70 if (IsZoomed(hwnd)) wp = SIZE_MAXIMIZED;
71 else if (IsIconic(hwnd)) wp = SIZE_MINIMIZED;
72
73 SendMessageW( hwnd, WM_SIZE, wp, MAKELONG(rect.right-rect.left, rect.bottom-rect.top) );
74 }
75 }
76
77
78 /***********************************************************************
79 * DEFWND_SetTextA
80 *
81 * Set the window text.
82 */
83 static void DEFWND_SetTextA( HWND hwnd, LPCSTR text )
84 {
85 int count;
86 WCHAR *textW;
87 WND *wndPtr;
88
89 if (!text) text = "";
90 count = MultiByteToWideChar( CP_ACP, 0, text, -1, NULL, 0 );
91
92 if (!(wndPtr = WIN_GetPtr( hwnd ))) return;
93 if ((textW = HeapAlloc(GetProcessHeap(), 0, count * sizeof(WCHAR))))
94 {
95 HeapFree(GetProcessHeap(), 0, wndPtr->text);
96 wndPtr->text = textW;
97 MultiByteToWideChar( CP_ACP, 0, text, -1, textW, count );
98 SERVER_START_REQ( set_window_text )
99 {
100 req->handle = hwnd;
101 wine_server_add_data( req, textW, (count-1) * sizeof(WCHAR) );
102 wine_server_call( req );
103 }
104 SERVER_END_REQ;
105 }
106 else
107 ERR("Not enough memory for window text\n");
108 WIN_ReleasePtr( wndPtr );
109
110 USER_Driver->pSetWindowText( hwnd, textW );
111 }
112
113 /***********************************************************************
114 * DEFWND_SetTextW
115 *
116 * Set the window text.
117 */
118 static void DEFWND_SetTextW( HWND hwnd, LPCWSTR text )
119 {
120 static const WCHAR empty_string[] = {0};
121 WND *wndPtr;
122 int count;
123
124 if (!text) text = empty_string;
125 count = strlenW(text) + 1;
126
127 if (!(wndPtr = WIN_GetPtr( hwnd ))) return;
128 HeapFree(GetProcessHeap(), 0, wndPtr->text);
129 if ((wndPtr->text = HeapAlloc(GetProcessHeap(), 0, count * sizeof(WCHAR))))
130 {
131 strcpyW( wndPtr->text, text );
132 SERVER_START_REQ( set_window_text )
133 {
134 req->handle = hwnd;
135 wine_server_add_data( req, wndPtr->text, (count-1) * sizeof(WCHAR) );
136 wine_server_call( req );
137 }
138 SERVER_END_REQ;
139 }
140 else
141 ERR("Not enough memory for window text\n");
142 text = wndPtr->text;
143 WIN_ReleasePtr( wndPtr );
144
145 USER_Driver->pSetWindowText( hwnd, text );
146 }
147
148 /***********************************************************************
149 * DEFWND_ControlColor
150 *
151 * Default colors for control painting.
152 */
153 HBRUSH DEFWND_ControlColor( HDC hDC, UINT ctlType )
154 {
155 if( ctlType == CTLCOLOR_SCROLLBAR)
156 {
157 HBRUSH hb = GetSysColorBrush(COLOR_SCROLLBAR);
158 COLORREF bk = GetSysColor(COLOR_3DHILIGHT);
159 SetTextColor( hDC, GetSysColor(COLOR_3DFACE));
160 SetBkColor( hDC, bk);
161
162 /* if COLOR_WINDOW happens to be the same as COLOR_3DHILIGHT
163 * we better use 0x55aa bitmap brush to make scrollbar's background
164 * look different from the window background.
165 */
166 if (bk == GetSysColor(COLOR_WINDOW))
167 return SYSCOLOR_55AABrush;
168
169 UnrealizeObject( hb );
170 return hb;
171 }
172
173 SetTextColor( hDC, GetSysColor(COLOR_WINDOWTEXT));
174
175 if ((ctlType == CTLCOLOR_EDIT) || (ctlType == CTLCOLOR_LISTBOX))
176 SetBkColor( hDC, GetSysColor(COLOR_WINDOW) );
177 else {
178 SetBkColor( hDC, GetSysColor(COLOR_3DFACE) );
179 return GetSysColorBrush(COLOR_3DFACE);
180 }
181 return GetSysColorBrush(COLOR_WINDOW);
182 }
183
184
185 /***********************************************************************
186 * DEFWND_Print
187 *
188 * This method handles the default behavior for the WM_PRINT message.
189 */
190 static void DEFWND_Print( HWND hwnd, HDC hdc, ULONG uFlags)
191 {
192 /*
193 * Visibility flag.
194 */
195 if ( (uFlags & PRF_CHECKVISIBLE) &&
196 !IsWindowVisible(hwnd) )
197 return;
198
199 /*
200 * Unimplemented flags.
201 */
202 if ( (uFlags & PRF_CHILDREN) ||
203 (uFlags & PRF_OWNED) ||
204 (uFlags & PRF_NONCLIENT) )
205 {
206 WARN("WM_PRINT message with unsupported flags\n");
207 }
208
209 /*
210 * Background
211 */
212 if ( uFlags & PRF_ERASEBKGND)
213 SendMessageW(hwnd, WM_ERASEBKGND, (WPARAM)hdc, 0);
214
215 /*
216 * Client area
217 */
218 if ( uFlags & PRF_CLIENT)
219 SendMessageW(hwnd, WM_PRINTCLIENT, (WPARAM)hdc, PRF_CLIENT);
220 }
221
222
223 /*
224 * helpers for calling IMM32
225 *
226 * WM_IME_* messages are generated only by IMM32,
227 * so I assume imm32 is already LoadLibrary-ed.
228 */
229 static HWND DEFWND_ImmGetDefaultIMEWnd( HWND hwnd )
230 {
231 HINSTANCE hInstIMM = GetModuleHandleW( imm32W );
232 HWND (WINAPI *pFunc)(HWND);
233 HWND hwndRet = 0;
234
235 if (!hInstIMM)
236 {
237 ERR( "cannot get IMM32 handle\n" );
238 return 0;
239 }
240
241 pFunc = (void*)GetProcAddress(hInstIMM,"ImmGetDefaultIMEWnd");
242 if ( pFunc != NULL )
243 hwndRet = (*pFunc)( hwnd );
244
245 return hwndRet;
246 }
247
248 static BOOL DEFWND_ImmIsUIMessageA( HWND hwndIME, UINT msg, WPARAM wParam, LPARAM lParam )
249 {
250 HINSTANCE hInstIMM = GetModuleHandleW( imm32W );
251 BOOL (WINAPI *pFunc)(HWND,UINT,WPARAM,LPARAM);
252 BOOL fRet = FALSE;
253
254 if (!hInstIMM)
255 {
256 ERR( "cannot get IMM32 handle\n" );
257 return FALSE;
258 }
259
260 pFunc = (void*)GetProcAddress(hInstIMM,"ImmIsUIMessageA");
261 if ( pFunc != NULL )
262 fRet = (*pFunc)( hwndIME, msg, wParam, lParam );
263
264 return fRet;
265 }
266
267 static BOOL DEFWND_ImmIsUIMessageW( HWND hwndIME, UINT msg, WPARAM wParam, LPARAM lParam )
268 {
269 HINSTANCE hInstIMM = GetModuleHandleW( imm32W );
270 BOOL (WINAPI *pFunc)(HWND,UINT,WPARAM,LPARAM);
271 BOOL fRet = FALSE;
272
273 if (!hInstIMM)
274 {
275 ERR( "cannot get IMM32 handle\n" );
276 return FALSE;
277 }
278
279 pFunc = (void*)GetProcAddress(hInstIMM,"ImmIsUIMessageW");
280 if ( pFunc != NULL )
281 fRet = (*pFunc)( hwndIME, msg, wParam, lParam );
282
283 return fRet;
284 }
285
286
287
288 /***********************************************************************
289 * DEFWND_DefWinProc
290 *
291 * Default window procedure for messages that are the same in Ansi and Unicode.
292 */
293 static LRESULT DEFWND_DefWinProc( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam )
294 {
295 switch(msg)
296 {
297 case WM_NCPAINT:
298 return NC_HandleNCPaint( hwnd, (HRGN)wParam );
299
300 case WM_NCHITTEST:
301 {
302 POINT pt;
303 pt.x = (short)LOWORD(lParam);
304 pt.y = (short)HIWORD(lParam);
305 return NC_HandleNCHitTest( hwnd, pt );
306 }
307
308 case WM_NCCALCSIZE:
309 return NC_HandleNCCalcSize( hwnd, (RECT *)lParam );
310
311 case WM_WINDOWPOSCHANGING:
312 return WINPOS_HandleWindowPosChanging( hwnd, (WINDOWPOS *)lParam );
313
314 case WM_WINDOWPOSCHANGED:
315 DEFWND_HandleWindowPosChanged( hwnd, (const WINDOWPOS *)lParam );
316 break;
317
318 case WM_LBUTTONDOWN:
319 case WM_RBUTTONDOWN:
320 case WM_MBUTTONDOWN:
321 iF10Key = iMenuSysKey = 0;
322 break;
323
324 case WM_NCLBUTTONDOWN:
325 return NC_HandleNCLButtonDown( hwnd, wParam, lParam );
326
327 case WM_LBUTTONDBLCLK:
328 return NC_HandleNCLButtonDblClk( hwnd, HTCLIENT, lParam );
329
330 case WM_NCLBUTTONDBLCLK:
331 return NC_HandleNCLButtonDblClk( hwnd, wParam, lParam );
332
333 case WM_NCRBUTTONDOWN:
334 /* in Windows, capture is taken when right-clicking on the caption bar */
335 if (wParam==HTCAPTION)
336 {
337 SetCapture(hwnd);
338 }
339 break;
340
341 case WM_RBUTTONUP:
342 {
343 POINT pt;
344
345 if (hwnd == GetCapture())
346 /* release capture if we took it on WM_NCRBUTTONDOWN */
347 ReleaseCapture();
348
349 pt.x = (short)LOWORD(lParam);
350 pt.y = (short)HIWORD(lParam);
351 ClientToScreen(hwnd, &pt);
352 SendMessageW( hwnd, WM_CONTEXTMENU, (WPARAM)hwnd, MAKELPARAM(pt.x, pt.y) );
353 }
354 break;
355
356 case WM_NCRBUTTONUP:
357 /*
358 * FIXME : we must NOT send WM_CONTEXTMENU on a WM_NCRBUTTONUP (checked
359 * in Windows), but what _should_ we do? According to MSDN :
360 * "If it is appropriate to do so, the system sends the WM_SYSCOMMAND
361 * message to the window". When is it appropriate?
362 */
363 break;
364
365 case WM_CONTEXTMENU:
366 if (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)
367 SendMessageW( GetParent(hwnd), msg, wParam, lParam );
368 else
369 {
370 LONG hitcode;
371 POINT pt;
372 WND *wndPtr = WIN_GetPtr( hwnd );
373 HMENU hMenu = wndPtr->hSysMenu;
374 WIN_ReleasePtr( wndPtr );
375 if (!hMenu) return 0;
376 pt.x = (short)LOWORD(lParam);
377 pt.y = (short)HIWORD(lParam);
378 hitcode = NC_HandleNCHitTest(hwnd, pt);
379
380 /* Track system popup if click was in the caption area. */
381 if (hitcode==HTCAPTION || hitcode==HTSYSMENU)
382 TrackPopupMenu(GetSystemMenu(hwnd, FALSE),
383 TPM_LEFTBUTTON | TPM_RIGHTBUTTON,
384 pt.x, pt.y, 0, hwnd, NULL);
385 }
386 break;
387
388 case WM_POPUPSYSTEMMENU:
389 {
390 /* This is an undocumented message used by the windows taskbar to
391 display the system menu of windows that belong to other processes. */
392 HMENU menu = GetSystemMenu(hwnd, FALSE);
393
394 if (menu)
395 TrackPopupMenu(menu, TPM_LEFTBUTTON|TPM_RIGHTBUTTON,
396 LOWORD(lParam), HIWORD(lParam), 0, hwnd, NULL);
397 return 0;
398 }
399
400 case WM_NCACTIVATE:
401 return NC_HandleNCActivate( hwnd, wParam, lParam );
402
403 case WM_NCDESTROY:
404 {
405 WND *wndPtr = WIN_GetPtr( hwnd );
406 if (!wndPtr) return 0;
407 HeapFree( GetProcessHeap(), 0, wndPtr->text );
408 wndPtr->text = NULL;
409 HeapFree( GetProcessHeap(), 0, wndPtr->pVScroll );
410 HeapFree( GetProcessHeap(), 0, wndPtr->pHScroll );
411 wndPtr->pVScroll = wndPtr->pHScroll = NULL;
412 WIN_ReleasePtr( wndPtr );
413 return 0;
414 }
415
416 case WM_PRINT:
417 DEFWND_Print(hwnd, (HDC)wParam, lParam);
418 return 0;
419
420 case WM_PAINTICON:
421 case WM_PAINT:
422 {
423 PAINTSTRUCT ps;
424 HDC hdc = BeginPaint( hwnd, &ps );
425 if( hdc )
426 {
427 HICON hIcon;
428 if (IsIconic(hwnd) && ((hIcon = (HICON)GetClassLongPtrW( hwnd, GCLP_HICON))) )
429 {
430 RECT rc;
431 int x, y;
432
433 GetClientRect( hwnd, &rc );
434 x = (rc.right - rc.left - GetSystemMetrics(SM_CXICON))/2;
435 y = (rc.bottom - rc.top - GetSystemMetrics(SM_CYICON))/2;
436 TRACE("Painting class icon: vis rect=(%s)\n",
437 wine_dbgstr_rect(&ps.rcPaint));
438 DrawIcon( hdc, x, y, hIcon );
439 }
440 EndPaint( hwnd, &ps );
441 }
442 return 0;
443 }
444
445 case WM_SYNCPAINT:
446 RedrawWindow ( hwnd, NULL, 0, RDW_ERASENOW | RDW_ERASE | RDW_ALLCHILDREN );
447 return 0;
448
449 case WM_SETREDRAW:
450 if (wParam) WIN_SetStyle( hwnd, WS_VISIBLE, 0 );
451 else
452 {
453 RedrawWindow( hwnd, NULL, 0, RDW_ALLCHILDREN | RDW_VALIDATE );
454 WIN_SetStyle( hwnd, 0, WS_VISIBLE );
455 }
456 return 0;
457
458 case WM_CLOSE:
459 DestroyWindow( hwnd );
460 return 0;
461
462 case WM_MOUSEACTIVATE:
463 if (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)
464 {
465 LONG ret = SendMessageW( GetParent(hwnd), WM_MOUSEACTIVATE, wParam, lParam );
466 if (ret) return ret;
467 }
468
469 /* Caption clicks are handled by NC_HandleNCLButtonDown() */
470 return MA_ACTIVATE;
471
472 case WM_ACTIVATE:
473 /* The default action in Windows is to set the keyboard focus to
474 * the window, if it's being activated and not minimized */
475 if (LOWORD(wParam) != WA_INACTIVE) {
476 if (!IsIconic(hwnd)) SetFocus(hwnd);
477 }
478 break;
479
480 case WM_MOUSEWHEEL:
481 if (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)
482 return SendMessageW( GetParent(hwnd), WM_MOUSEWHEEL, wParam, lParam );
483 break;
484
485 case WM_ERASEBKGND:
486 case WM_ICONERASEBKGND:
487 {
488 RECT rect;
489 HDC hdc = (HDC)wParam;
490 HBRUSH hbr = (HBRUSH)GetClassLongPtrW( hwnd, GCLP_HBRBACKGROUND );
491 if (!hbr) return 0;
492
493 if (GetClassLongW( hwnd, GCL_STYLE ) & CS_PARENTDC)
494 {
495 /* can't use GetClipBox with a parent DC or we fill the whole parent */
496 GetClientRect( hwnd, &rect );
497 DPtoLP( hdc, (LPPOINT)&rect, 2 );
498 }
499 else GetClipBox( hdc, &rect );
500 FillRect( hdc, &rect, hbr );
501 return 1;
502 }
503
504 case WM_GETDLGCODE:
505 return 0;
506
507 case WM_CTLCOLORMSGBOX:
508 case WM_CTLCOLOREDIT:
509 case WM_CTLCOLORLISTBOX:
510 case WM_CTLCOLORBTN:
511 case WM_CTLCOLORDLG:
512 case WM_CTLCOLORSTATIC:
513 case WM_CTLCOLORSCROLLBAR:
514 return (LRESULT)DEFWND_ControlColor( (HDC)wParam, msg - WM_CTLCOLORMSGBOX );
515
516 case WM_CTLCOLOR:
517 return (LRESULT)DEFWND_ControlColor( (HDC)wParam, HIWORD(lParam) );
518
519 case WM_SETCURSOR:
520 if (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)
521 {
522 /* with the exception of the border around a resizable wnd,
523 * give the parent first chance to set the cursor */
524 if ((LOWORD(lParam) < HTSIZEFIRST) || (LOWORD(lParam) > HTSIZELAST))
525 {
526 if (SendMessageW(GetParent(hwnd), WM_SETCURSOR, wParam, lParam)) return TRUE;
527 }
528 }
529 NC_HandleSetCursor( hwnd, wParam, lParam );
530 break;
531
532 case WM_SYSCOMMAND:
533 return NC_HandleSysCommand( hwnd, wParam, lParam );
534
535 case WM_KEYDOWN:
536 if(wParam == VK_F10) iF10Key = VK_F10;
537 break;
538
539 case WM_SYSKEYDOWN:
540 if( HIWORD(lParam) & KEYDATA_ALT )
541 {
542 /* if( HIWORD(lParam) & ~KEYDATA_PREVSTATE ) */
543 if ( (wParam == VK_MENU || wParam == VK_LMENU
544 || wParam == VK_RMENU) && !iMenuSysKey )
545 iMenuSysKey = 1;
546 else
547 iMenuSysKey = 0;
548
549 iF10Key = 0;
550
551 if( wParam == VK_F4 ) /* try to close the window */
552 {
553 HWND top = GetAncestor( hwnd, GA_ROOT );
554 if (!(GetClassLongW( top, GCL_STYLE ) & CS_NOCLOSE))
555 PostMessageW( top, WM_SYSCOMMAND, SC_CLOSE, 0 );
556 }
557 }
558 else if( wParam == VK_F10 )
559 iF10Key = 1;
560 else if( wParam == VK_ESCAPE && (GetKeyState(VK_SHIFT) & 0x8000))
561 SendMessageW( hwnd, WM_SYSCOMMAND, SC_KEYMENU, ' ' );
562 break;
563
564 case WM_KEYUP:
565 case WM_SYSKEYUP:
566 /* Press and release F10 or ALT */
567 if (((wParam == VK_MENU || wParam == VK_LMENU || wParam == VK_RMENU)
568 && iMenuSysKey) || ((wParam == VK_F10) && iF10Key))
569 SendMessageW( GetAncestor( hwnd, GA_ROOT ), WM_SYSCOMMAND, SC_KEYMENU, 0L );
570 iMenuSysKey = iF10Key = 0;
571 break;
572
573 case WM_SYSCHAR:
574 {
575 iMenuSysKey = 0;
576 if (wParam == '\r' && IsIconic(hwnd))
577 {
578 PostMessageW( hwnd, WM_SYSCOMMAND, SC_RESTORE, 0L );
579 break;
580 }
581 if ((HIWORD(lParam) & KEYDATA_ALT) && wParam)
582 {
583 if (wParam == '\t' || wParam == '\x1b') break;
584 if (wParam == ' ' && (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD))
585 SendMessageW( GetParent(hwnd), msg, wParam, lParam );
586 else
587 SendMessageW( hwnd, WM_SYSCOMMAND, SC_KEYMENU, wParam );
588 }
589 else /* check for Ctrl-Esc */
590 if (wParam != '\x1b') MessageBeep(0);
591 break;
592 }
593
594 case WM_SHOWWINDOW:
595 {
596 LONG style = GetWindowLongW( hwnd, GWL_STYLE );
597 WND *pWnd;
598 if (!lParam) return 0; /* sent from ShowWindow */
599 if ((style & WS_VISIBLE) && wParam) return 0;
600 if (!(style & WS_VISIBLE) && !wParam) return 0;
601 if (!GetWindow( hwnd, GW_OWNER )) return 0;
602 if (!(pWnd = WIN_GetPtr( hwnd ))) return 0;
603 if (pWnd == WND_OTHER_PROCESS) return 0;
604 if (wParam)
605 {
606 if (!(pWnd->flags & WIN_NEEDS_SHOW_OWNEDPOPUP))
607 {
608 WIN_ReleasePtr( pWnd );
609 return 0;
610 }
611 pWnd->flags &= ~WIN_NEEDS_SHOW_OWNEDPOPUP;
612 }
613 else pWnd->flags |= WIN_NEEDS_SHOW_OWNEDPOPUP;
614 WIN_ReleasePtr( pWnd );
615 ShowWindow( hwnd, wParam ? SW_SHOWNOACTIVATE : SW_HIDE );
616 break;
617 }
618
619 case WM_CANCELMODE:
620 iMenuSysKey = 0;
621 if (!(GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)) EndMenu();
622 if (GetCapture() == hwnd) ReleaseCapture();
623 break;
624
625 case WM_VKEYTOITEM:
626 case WM_CHARTOITEM:
627 return -1;
628
629 case WM_DROPOBJECT:
630 return DRAG_FILE;
631
632 case WM_QUERYDROPOBJECT:
633 return (GetWindowLongA( hwnd, GWL_EXSTYLE ) & WS_EX_ACCEPTFILES) != 0;
634
635 case WM_QUERYDRAGICON:
636 {
637 UINT len;
638
639 HICON hIcon = (HICON)GetClassLongPtrW( hwnd, GCLP_HICON );
640 HINSTANCE instance = (HINSTANCE)GetWindowLongPtrW( hwnd, GWLP_HINSTANCE );
641 if (hIcon) return (LRESULT)hIcon;
642 for(len=1; len<64; len++)
643 if((hIcon = LoadIconW(instance, MAKEINTRESOURCEW(len))))
644 return (LRESULT)hIcon;
645 return (LRESULT)LoadIconW(0, (LPWSTR)IDI_APPLICATION);
646 }
647 break;
648
649 case WM_ISACTIVEICON:
650 {
651 WND *wndPtr = WIN_GetPtr( hwnd );
652 BOOL ret = (wndPtr->flags & WIN_NCACTIVATED) != 0;
653 WIN_ReleasePtr( wndPtr );
654 return ret;
655 }
656
657 case WM_NOTIFYFORMAT:
658 if (IsWindowUnicode(hwnd)) return NFR_UNICODE;
659 else return NFR_ANSI;
660
661 case WM_QUERYOPEN:
662 case WM_QUERYENDSESSION:
663 return 1;
664
665 case WM_ENDSESSION:
666 if (wParam)
667 PostQuitMessage(0);
668 return 0;
669
670 case WM_SETICON:
671 {
672 HICON ret;
673 WND *wndPtr = WIN_GetPtr( hwnd );
674
675 switch(wParam)
676 {
677 case ICON_SMALL:
678 ret = wndPtr->hIconSmall;
679 wndPtr->hIconSmall = (HICON)lParam;
680 break;
681 case ICON_BIG:
682 ret = wndPtr->hIcon;
683 wndPtr->hIcon = (HICON)lParam;
684 break;
685 default:
686 ret = 0;
687 break;
688 }
689 WIN_ReleasePtr( wndPtr );
690
691 USER_Driver->pSetWindowIcon( hwnd, wParam, (HICON)lParam );
692
693 if( (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CAPTION) == WS_CAPTION )
694 NC_HandleNCPaint( hwnd , (HRGN)1 ); /* Repaint caption */
695
696 return (LRESULT)ret;
697 }
698
699 case WM_GETICON:
700 {
701 HICON ret;
702 WND *wndPtr = WIN_GetPtr( hwnd );
703
704 switch(wParam)
705 {
706 case ICON_SMALL:
707 ret = wndPtr->hIconSmall;
708 break;
709 case ICON_BIG:
710 ret = wndPtr->hIcon;
711 break;
712 case ICON_SMALL2:
713 ret = wndPtr->hIconSmall;
714 if (!ret) ret = (HICON)GetClassLongPtrW( hwnd, GCLP_HICONSM );
715 /* FIXME: should have a default here if class icon is null */
716 break;
717 default:
718 ret = 0;
719 break;
720 }
721 WIN_ReleasePtr( wndPtr );
722 return (LRESULT)ret;
723 }
724
725 case WM_HELP:
726 SendMessageW( GetParent(hwnd), msg, wParam, lParam );
727 break;
728
729 case WM_APPCOMMAND:
730 {
731 HWND parent = GetParent(hwnd);
732 if(!parent)
733 HOOK_CallHooks(WH_SHELL, HSHELL_APPCOMMAND, wParam, lParam, TRUE);
734 else
735 SendMessageW( parent, msg, wParam, lParam );
736 break;
737 }
738 case WM_KEYF1:
739 {
740 HELPINFO hi;
741
742 hi.cbSize = sizeof(HELPINFO);
743 GetCursorPos( &hi.MousePos );
744 if (MENU_IsMenuActive())
745 {
746 hi.iContextType = HELPINFO_MENUITEM;
747 hi.hItemHandle = MENU_IsMenuActive();
748 hi.iCtrlId = MenuItemFromPoint( hwnd, hi.hItemHandle, hi.MousePos );
749 hi.dwContextId = GetMenuContextHelpId( hi.hItemHandle );
750 }
751 else
752 {
753 hi.iContextType = HELPINFO_WINDOW;
754 hi.hItemHandle = hwnd;
755 hi.iCtrlId = GetWindowLongPtrA( hwnd, GWLP_ID );
756 hi.dwContextId = GetWindowContextHelpId( hwnd );
757 }
758 SendMessageW( hwnd, WM_HELP, 0, (LPARAM)&hi );
759 break;
760 }
761 }
762
763 return 0;
764 }
765
766 static LPARAM DEFWND_GetTextA( WND *wndPtr, LPSTR dest, WPARAM wParam )
767 {
768 LPARAM result = 0;
769
770 __TRY
771 {
772 if (wndPtr->text)
773 {
774 if (!WideCharToMultiByte( CP_ACP, 0, wndPtr->text, -1,
775 dest, wParam, NULL, NULL )) dest[wParam-1] = 0;
776 result = strlen( dest );
777 }
778 else dest[0] = '\0';
779 }
780 __EXCEPT_PAGE_FAULT
781 {
782 return 0;
783 }
784 __ENDTRY
785 return result;
786 }
787
788 /***********************************************************************
789 * DefWindowProcA (USER32.@)
790 *
791 * See DefWindowProcW.
792 */
793 LRESULT WINAPI DefWindowProcA( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam )
794 {
795 LRESULT result = 0;
796 HWND full_handle;
797
798 if (!(full_handle = WIN_IsCurrentProcess( hwnd )))
799 {
800 if (!IsWindow( hwnd )) return 0;
801 ERR( "called for other process window %p\n", hwnd );
802 return 0;
803 }
804 hwnd = full_handle;
805
806 SPY_EnterMessage( SPY_DEFWNDPROC, hwnd, msg, wParam, lParam );
807
808 switch(msg)
809 {
810 case WM_NCCREATE:
811 if (lParam)
812 {
813 CREATESTRUCTA *cs = (CREATESTRUCTA *)lParam;
814 /* check for string, as static icons, bitmaps (SS_ICON, SS_BITMAP)
815 * may have child window IDs instead of window name */
816 if (HIWORD(cs->lpszName))
817 DEFWND_SetTextA( hwnd, cs->lpszName );
818 result = 1;
819 }
820 break;
821
822 case WM_GETTEXTLENGTH:
823 {
824 WND *wndPtr = WIN_GetPtr( hwnd );
825 if (wndPtr && wndPtr->text)
826 result = WideCharToMultiByte( CP_ACP, 0, wndPtr->text, strlenW(wndPtr->text),
827 NULL, 0, NULL, NULL );
828 WIN_ReleasePtr( wndPtr );
829 }
830 break;
831
832 case WM_GETTEXT:
833 if (wParam)
834 {
835 LPSTR dest = (LPSTR)lParam;
836 WND *wndPtr = WIN_GetPtr( hwnd );
837
838 if (!wndPtr) break;
839 result = DEFWND_GetTextA( wndPtr, dest, wParam );
840
841 WIN_ReleasePtr( wndPtr );
842 }
843 break;
844
845 case WM_SETTEXT:
846 DEFWND_SetTextA( hwnd, (LPCSTR)lParam );
847 if( (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CAPTION) == WS_CAPTION )
848 NC_HandleNCPaint( hwnd , (HRGN)1 ); /* Repaint caption */
849 result = 1; /* success. FIXME: check text length */
850 break;
851
852 case WM_IME_CHAR:
853 if (HIBYTE(wParam)) PostMessageA( hwnd, WM_CHAR, HIBYTE(wParam), lParam );
854 PostMessageA( hwnd, WM_CHAR, LOBYTE(wParam), lParam );
855 break;
856
857 case WM_IME_KEYDOWN:
858 result = PostMessageA( hwnd, WM_KEYDOWN, wParam, lParam );
859 break;
860
861 case WM_IME_KEYUP:
862 result = PostMessageA( hwnd, WM_KEYUP, wParam, lParam );
863 break;
864
865 case WM_IME_STARTCOMPOSITION:
866 case WM_IME_COMPOSITION:
867 case WM_IME_ENDCOMPOSITION:
868 case WM_IME_SELECT:
869 case WM_IME_NOTIFY:
870 {
871 HWND hwndIME;
872
873 hwndIME = DEFWND_ImmGetDefaultIMEWnd( hwnd );
874 if (hwndIME)
875 result = SendMessageA( hwndIME, msg, wParam, lParam );
876 }
877 break;
878 case WM_IME_SETCONTEXT:
879 {
880 HWND hwndIME;
881
882 hwndIME = DEFWND_ImmGetDefaultIMEWnd( hwnd );
883 if (hwndIME)
884 result = DEFWND_ImmIsUIMessageA( hwndIME, msg, wParam, lParam );
885 }
886 break;
887
888 case WM_INPUTLANGCHANGEREQUEST:
889 /* notify about the switch only if it's really our current layout */
890 if ((HKL)lParam == GetKeyboardLayout(0))
891 result = SendMessageA( hwnd, WM_INPUTLANGCHANGE, wParam, lParam );
892 else
893 result = 0;
894 break;
895
896 case WM_SYSCHAR:
897 {
898 CHAR ch = LOWORD(wParam);
899 WCHAR wch;
900 MultiByteToWideChar(CP_ACP, 0, &ch, 1, &wch, 1);
901 wParam = MAKEWPARAM( wch, HIWORD(wParam) );
902 }
903 /* fall through */
904 default:
905 result = DEFWND_DefWinProc( hwnd, msg, wParam, lParam );
906 break;
907 }
908
909 SPY_ExitMessage( SPY_RESULT_DEFWND, hwnd, msg, result, wParam, lParam );
910 return result;
911 }
912
913
914 static LPARAM DEFWND_GetTextW( WND *wndPtr, LPWSTR dest, WPARAM wParam )
915 {
916 LPARAM r