dlls/user32/defwnd.c

   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 <string.h>
  23 #include <stdarg.h>
  24
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "wingdi.h"
  28 #include "winnls.h"
  29 #include "imm.h"
  30 #include "win.h"
  31 #include "user_private.h"
  32 #include "controls.h"
  33 #include "wine/server.h"
  34 #include "wine/exception.h"
  35 #include "wine/debug.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(win);
  38
  39   /* bits in the dwKeyData */
  40 #define KEYDATA_ALT             0x2000
  41 #define KEYDATA_PREVSTATE       0x4000
  42
  43 #define DRAG_FILE  0x454C4946
  44
  45 static short iF10Key = 0;
  46 static short iMenuSysKey = 0;
  47
  48 /***********************************************************************
  49  *           DEFWND_HandleWindowPosChanged
  50  *
  51  * Handle the WM_WINDOWPOSCHANGED message.
  52  */
  53 static void DEFWND_HandleWindowPosChanged( HWND hwnd, const WINDOWPOS *winpos )
  54 {
  55     RECT rect;
  56
  57     WIN_GetRectangles( hwnd, COORDS_PARENT, NULL, &rect );
  58     if (!(winpos->flags & SWP_NOCLIENTMOVE))
  59         SendMessageW( hwnd, WM_MOVE, 0, MAKELONG(rect.left, rect.top));
  60
  61     if (!(winpos->flags & SWP_NOCLIENTSIZE) || (winpos->flags & SWP_STATECHANGED))
  62     {
  63         if (IsIconic( hwnd ))
  64         {
  65             SendMessageW( hwnd, WM_SIZE, SIZE_MINIMIZED, 0 );
  66         }
  67         else
  68         {
  69             WPARAM wp = IsZoomed( hwnd ) ? SIZE_MAXIMIZED : SIZE_RESTORED;
  70
  71             SendMessageW( hwnd, WM_SIZE, wp, MAKELONG(rect.right-rect.left, rect.bottom-rect.top) );
  72         }
  73     }
  74 }
  75
  76
  77 /***********************************************************************
  78  *           DEFWND_SetTextA
  79  *
  80  * Set the window text.
  81  */
  82 static LRESULT DEFWND_SetTextA( HWND hwnd, LPCSTR text )
  83 {
  84     int count;
  85     WCHAR *textW;
  86     WND *wndPtr;
  87
  88     /* check for string, as static icons, bitmaps (SS_ICON, SS_BITMAP)
  89      * may have child window IDs instead of window name */
  90     if (text && IS_INTRESOURCE(text))
  91         return 0;
  92
  93     if (!text) text = "";
  94     count = MultiByteToWideChar( CP_ACP, 0, text, -1, NULL, 0 );
  95
  96     if (!(wndPtr = WIN_GetPtr( hwnd ))) return 0;
  97     if ((textW = HeapAlloc(GetProcessHeap(), 0, count * sizeof(WCHAR))))
  98     {
  99         HeapFree(GetProcessHeap(), 0, wndPtr->text);
 100         wndPtr->text = textW;
 101         MultiByteToWideChar( CP_ACP, 0, text, -1, textW, count );
 102         SERVER_START_REQ( set_window_text )
 103         {
 104             req->handle = wine_server_user_handle( hwnd );
 105             wine_server_add_data( req, textW, (count-1) * sizeof(WCHAR) );
 106             wine_server_call( req );
 107         }
 108         SERVER_END_REQ;
 109     }
 110     else
 111         ERR("Not enough memory for window text\n");
 112     WIN_ReleasePtr( wndPtr );
 113
 114     USER_Driver->pSetWindowText( hwnd, textW );
 115
 116     return 1;
 117 }
 118
 119 /***********************************************************************
 120  *           DEFWND_SetTextW
 121  *
 122  * Set the window text.
 123  */
 124 static LRESULT DEFWND_SetTextW( HWND hwnd, LPCWSTR text )
 125 {
 126     WND *wndPtr;
 127     int count;
 128
 129     /* check for string, as static icons, bitmaps (SS_ICON, SS_BITMAP)
 130      * may have child window IDs instead of window name */
 131     if (text && IS_INTRESOURCE(text))
 132         return 0;
 133
 134     if (!text) text = L"";
 135     count = lstrlenW(text) + 1;
 136
 137     if (!(wndPtr = WIN_GetPtr( hwnd ))) return 0;
 138     HeapFree(GetProcessHeap(), 0, wndPtr->text);
 139     if ((wndPtr->text = HeapAlloc(GetProcessHeap(), 0, count * sizeof(WCHAR))))
 140     {
 141         lstrcpyW( wndPtr->text, text );
 142         SERVER_START_REQ( set_window_text )
 143         {
 144             req->handle = wine_server_user_handle( hwnd );
 145             wine_server_add_data( req, wndPtr->text, (count-1) * sizeof(WCHAR) );
 146             wine_server_call( req );
 147         }
 148         SERVER_END_REQ;
 149     }
 150     else
 151         ERR("Not enough memory for window text\n");
 152     text = wndPtr->text;
 153     WIN_ReleasePtr( wndPtr );
 154
 155     USER_Driver->pSetWindowText( hwnd, text );
 156
 157     return 1;
 158 }
 159
 160 /***********************************************************************
 161  *           DEFWND_ControlColor
 162  *
 163  * Default colors for control painting.
 164  */
 165 HBRUSH DEFWND_ControlColor( HDC hDC, UINT ctlType )
 166 {
 167     if( ctlType == CTLCOLOR_SCROLLBAR)
 168     {
 169         HBRUSH hb = GetSysColorBrush(COLOR_SCROLLBAR);
 170         COLORREF bk = GetSysColor(COLOR_3DHILIGHT);
 171         SetTextColor( hDC, GetSysColor(COLOR_3DFACE));
 172         SetBkColor( hDC, bk);
 173
 174         /* if COLOR_WINDOW happens to be the same as COLOR_3DHILIGHT
 175          * we better use 0x55aa bitmap brush to make scrollbar's background
 176          * look different from the window background.
 177          */
 178         if (bk == GetSysColor(COLOR_WINDOW))
 179             return SYSCOLOR_Get55AABrush();
 180
 181         UnrealizeObject( hb );
 182         return hb;
 183     }
 184
 185     SetTextColor( hDC, GetSysColor(COLOR_WINDOWTEXT));
 186
 187     if ((ctlType == CTLCOLOR_EDIT) || (ctlType == CTLCOLOR_LISTBOX))
 188         SetBkColor( hDC, GetSysColor(COLOR_WINDOW) );
 189     else {
 190         SetBkColor( hDC, GetSysColor(COLOR_3DFACE) );
 191         return GetSysColorBrush(COLOR_3DFACE);
 192     }
 193     return GetSysColorBrush(COLOR_WINDOW);
 194 }
 195
 196
 197 /***********************************************************************
 198  *           DEFWND_Print
 199  *
 200  * This method handles the default behavior for the WM_PRINT message.
 201  */
 202 static void DEFWND_Print( HWND hwnd, HDC hdc, ULONG uFlags)
 203 {
 204   /*
 205    * Visibility flag.
 206    */
 207   if ( (uFlags & PRF_CHECKVISIBLE) &&
 208        !IsWindowVisible(hwnd) )
 209       return;
 210
 211   /*
 212    * Unimplemented flags.
 213    */
 214   if ( (uFlags & PRF_CHILDREN) ||
 215        (uFlags & PRF_OWNED)    ||
 216        (uFlags & PRF_NONCLIENT) )
 217   {
 218     WARN("WM_PRINT message with unsupported flags\n");
 219   }
 220
 221   /*
 222    * Background
 223    */
 224   if ( uFlags & PRF_ERASEBKGND)
 225     SendMessageW(hwnd, WM_ERASEBKGND, (WPARAM)hdc, 0);
 226
 227   /*
 228    * Client area
 229    */
 230   if ( uFlags & PRF_CLIENT)
 231     SendMessageW(hwnd, WM_PRINTCLIENT, (WPARAM)hdc, uFlags);
 232 }
 233
 234
 235
 236 /***********************************************************************
 237  *           DEFWND_DefWinProc
 238  *
 239  * Default window procedure for messages that are the same in Ansi and Unicode.
 240  */
 241 static LRESULT DEFWND_DefWinProc( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam )
 242 {
 243     switch(msg)
 244     {
 245     case WM_NCPAINT:
 246         return NC_HandleNCPaint( hwnd, (HRGN)wParam );
 247
 248     case WM_NCMOUSEMOVE:
 249         return NC_HandleNCMouseMove( hwnd, wParam, lParam );
 250
 251     case WM_NCMOUSELEAVE:
 252         return NC_HandleNCMouseLeave( hwnd );
 253
 254     case WM_NCHITTEST:
 255         {
 256             POINT pt;
 257             pt.x = (short)LOWORD(lParam);
 258             pt.y = (short)HIWORD(lParam);
 259             return NC_HandleNCHitTest( hwnd, pt );
 260         }
 261
 262     case WM_NCCALCSIZE:
 263         return NC_HandleNCCalcSize( hwnd, wParam, (RECT *)lParam );
 264
 265     case WM_WINDOWPOSCHANGING:
 266         return WINPOS_HandleWindowPosChanging( hwnd, (WINDOWPOS *)lParam );
 267
 268     case WM_WINDOWPOSCHANGED:
 269         DEFWND_HandleWindowPosChanged( hwnd, (const WINDOWPOS *)lParam );
 270         break;
 271
 272     case WM_LBUTTONDOWN:
 273     case WM_RBUTTONDOWN:
 274     case WM_MBUTTONDOWN:
 275         iF10Key = iMenuSysKey = 0;
 276         break;
 277
 278     case WM_NCLBUTTONDOWN:
 279         return NC_HandleNCLButtonDown( hwnd, wParam, lParam );
 280
 281     case WM_LBUTTONDBLCLK:
 282         return NC_HandleNCLButtonDblClk( hwnd, HTCLIENT, lParam );
 283
 284     case WM_NCLBUTTONDBLCLK:
 285         return NC_HandleNCLButtonDblClk( hwnd, wParam, lParam );
 286
 287     case WM_NCRBUTTONDOWN:
 288         return NC_HandleNCRButtonDown( hwnd, wParam, lParam );
 289
 290     case WM_RBUTTONUP:
 291         {
 292             POINT pt;
 293             pt.x = (short)LOWORD(lParam);
 294             pt.y = (short)HIWORD(lParam);
 295             ClientToScreen(hwnd, &pt);
 296             SendMessageW( hwnd, WM_CONTEXTMENU, (WPARAM)hwnd, MAKELPARAM(pt.x, pt.y) );
 297         }
 298         break;
 299
 300     case WM_NCRBUTTONUP:
 301         /*
 302          * FIXME : we must NOT send WM_CONTEXTMENU on a WM_NCRBUTTONUP (checked
 303          * in Windows), but what _should_ we do? According to MSDN :
 304          * "If it is appropriate to do so, the system sends the WM_SYSCOMMAND
 305          * message to the window". When is it appropriate?
 306          */
 307         break;
 308
 309     case WM_XBUTTONUP:
 310     case WM_NCXBUTTONUP:
 311         if (HIWORD(wParam) == XBUTTON1 || HIWORD(wParam) == XBUTTON2)
 312         {
 313             SendMessageW(hwnd, WM_APPCOMMAND, (WPARAM)hwnd,
 314                          MAKELPARAM(LOWORD(wParam), FAPPCOMMAND_MOUSE | HIWORD(wParam)));
 315         }
 316         break;
 317
 318     case WM_CONTEXTMENU:
 319         if (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)
 320             SendMessageW( GetParent(hwnd), msg, (WPARAM)hwnd, lParam );
 321         else
 322         {
 323             LONG hitcode;
 324             POINT pt;
 325             pt.x = (short)LOWORD(lParam);
 326             pt.y = (short)HIWORD(lParam);
 327             hitcode = NC_HandleNCHitTest(hwnd, pt);
 328
 329             /* Track system popup if click was in the caption area. */
 330             if (hitcode==HTCAPTION || hitcode==HTSYSMENU)
 331                TrackPopupMenu(GetSystemMenu(hwnd, FALSE),
 332                                TPM_LEFTBUTTON | TPM_RIGHTBUTTON,
 333                                pt.x, pt.y, 0, hwnd, NULL);
 334         }
 335         break;
 336
 337     case WM_POPUPSYSTEMMENU:
 338         /* This is an undocumented message used by the windows taskbar to
 339            display the system menu of windows that belong to other processes. */
 340         TrackPopupMenu( GetSystemMenu(hwnd, FALSE), TPM_LEFTBUTTON|TPM_RIGHTBUTTON,
 341                         (short)LOWORD(lParam), (short)HIWORD(lParam), 0, hwnd, NULL );
 342         return 0;
 343
 344     case WM_NCACTIVATE:
 345         return NC_HandleNCActivate( hwnd, wParam, lParam );
 346
 347     case WM_NCDESTROY:
 348         {
 349             WND *wndPtr = WIN_GetPtr( hwnd );
 350             if (!wndPtr) return 0;
 351             HeapFree( GetProcessHeap(), 0, wndPtr->text );
 352             wndPtr->text = NULL;
 353             HeapFree( GetProcessHeap(), 0, wndPtr->pScroll );
 354             wndPtr->pScroll = NULL;
 355             WIN_ReleasePtr( wndPtr );
 356             return 0;
 357         }
 358
 359     case WM_PRINT:
 360         DEFWND_Print(hwnd, (HDC)wParam, lParam);
 361         return 0;
 362
 363     case WM_PAINTICON:
 364     case WM_PAINT:
 365         {
 366             PAINTSTRUCT ps;
 367             HDC hdc = BeginPaint( hwnd, &ps );
 368             if( hdc )
 369             {
 370               HICON hIcon;
 371               if (IsIconic(hwnd) && ((hIcon = (HICON)GetClassLongPtrW( hwnd, GCLP_HICON))) )
 372               {
 373                   RECT rc;
 374                   int x, y;
 375
 376                   GetClientRect( hwnd, &rc );
 377                   x = (rc.right - rc.left - GetSystemMetrics(SM_CXICON))/2;
 378                   y = (rc.bottom - rc.top - GetSystemMetrics(SM_CYICON))/2;
 379                   TRACE("Painting class icon: vis rect=(%s)\n",
 380                         wine_dbgstr_rect(&ps.rcPaint));
 381                   DrawIcon( hdc, x, y, hIcon );
 382               }
 383               EndPaint( hwnd, &ps );
 384             }
 385             return 0;
 386         }
 387
 388     case WM_SYNCPAINT:
 389         RedrawWindow ( hwnd, NULL, 0, RDW_ERASENOW | RDW_ERASE | RDW_ALLCHILDREN );
 390         return 0;
 391
 392     case WM_SETREDRAW:
 393         if (wParam) WIN_SetStyle( hwnd, WS_VISIBLE, 0 );
 394         else
 395         {
 396             RedrawWindow( hwnd, NULL, 0, RDW_ALLCHILDREN | RDW_VALIDATE );
 397             WIN_SetStyle( hwnd, 0, WS_VISIBLE );
 398         }
 399         return 0;
 400
 401     case WM_CLOSE:
 402         DestroyWindow( hwnd );
 403         return 0;
 404
 405     case WM_MOUSEACTIVATE:
 406         if (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)
 407         {
 408             LONG ret = SendMessageW( GetParent(hwnd), WM_MOUSEACTIVATE, wParam, lParam );
 409             if (ret) return ret;
 410         }
 411
 412         /* Caption clicks are handled by NC_HandleNCLButtonDown() */
 413         return ( HIWORD(lParam) == WM_LBUTTONDOWN && LOWORD(lParam) == HTCAPTION ? MA_NOACTIVATE : MA_ACTIVATE );
 414
 415     case WM_ACTIVATE:
 416         /* The default action in Windows is to set the keyboard focus to
 417          * the window, if it's being activated and not minimized */
 418         if (LOWORD(wParam) != WA_INACTIVE) {
 419             if (!IsIconic(hwnd)) SetFocus(hwnd);
 420         }
 421         break;
 422
 423     case WM_MOUSEWHEEL:
 424         if (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)
 425             return SendMessageW( GetParent(hwnd), WM_MOUSEWHEEL, wParam, lParam );
 426         break;
 427
 428     case WM_ERASEBKGND:
 429     case WM_ICONERASEBKGND:
 430         {
 431             RECT rect;
 432             HDC hdc = (HDC)wParam;
 433             HBRUSH hbr = (HBRUSH)GetClassLongPtrW( hwnd, GCLP_HBRBACKGROUND );
 434             if (!hbr) return 0;
 435
 436             if (GetClassLongW( hwnd, GCL_STYLE ) & CS_PARENTDC)
 437             {
 438                 /* can't use GetClipBox with a parent DC or we fill the whole parent */
 439                 GetClientRect( hwnd, &rect );
 440                 DPtoLP( hdc, (LPPOINT)&rect, 2 );
 441             }
 442             else GetClipBox( hdc, &rect );
 443             FillRect( hdc, &rect, hbr );
 444             return 1;
 445         }
 446
 447     case WM_GETDLGCODE:
 448         return 0;
 449
 450     case WM_CTLCOLORMSGBOX:
 451     case WM_CTLCOLOREDIT:
 452     case WM_CTLCOLORLISTBOX:
 453     case WM_CTLCOLORBTN:
 454     case WM_CTLCOLORDLG:
 455     case WM_CTLCOLORSTATIC:
 456     case WM_CTLCOLORSCROLLBAR:
 457         return (LRESULT)DEFWND_ControlColor( (HDC)wParam, msg - WM_CTLCOLORMSGBOX );
 458
 459     case WM_CTLCOLOR:
 460         return (LRESULT)DEFWND_ControlColor( (HDC)wParam, HIWORD(lParam) );
 461
 462     case WM_SETCURSOR:
 463         if (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)
 464         {
 465             /* with the exception of the border around a resizable wnd,
 466              * give the parent first chance to set the cursor */
 467             if ((LOWORD(lParam) < HTSIZEFIRST) || (LOWORD(lParam) > HTSIZELAST))
 468             {
 469                 HWND parent = GetParent( hwnd );
 470                 if (parent != GetDesktopWindow() &&
 471                     SendMessageW( parent, WM_SETCURSOR, wParam, lParam )) return TRUE;
 472             }
 473         }
 474         NC_HandleSetCursor( hwnd, wParam, lParam );
 475         break;
 476
 477     case WM_SYSCOMMAND:
 478         return NC_HandleSysCommand( hwnd, wParam, lParam );
 479
 480     case WM_KEYDOWN:
 481         if(wParam == VK_F10) iF10Key = VK_F10;
 482         break;
 483
 484     case WM_SYSKEYDOWN:
 485         if( HIWORD(lParam) & KEYDATA_ALT )
 486         {
 487             /* if( HIWORD(lParam) & ~KEYDATA_PREVSTATE ) */
 488               if ( (wParam == VK_MENU || wParam == VK_LMENU
 489                     || wParam == VK_RMENU) && !iMenuSysKey )
 490                 iMenuSysKey = 1;
 491               else
 492                 iMenuSysKey = 0;
 493
 494             iF10Key = 0;
 495
 496             if( wParam == VK_F4 )       /* try to close the window */
 497             {
 498                 HWND top = GetAncestor( hwnd, GA_ROOT );
 499                 if (!(GetClassLongW( top, GCL_STYLE ) & CS_NOCLOSE))
 500                     PostMessageW( top, WM_SYSCOMMAND, SC_CLOSE, 0 );
 501             }
 502         }
 503         else if( wParam == VK_F10 )
 504         {
 505             if (NtUserGetKeyState(VK_SHIFT) & 0x8000)
 506                 SendMessageW( hwnd, WM_CONTEXTMENU, (WPARAM)hwnd, -1 );
 507             iF10Key = 1;
 508         }
 509         else if (wParam == VK_ESCAPE && (NtUserGetKeyState(VK_SHIFT) & 0x8000))
 510             SendMessageW( hwnd, WM_SYSCOMMAND, SC_KEYMENU, ' ' );
 511         break;
 512
 513     case WM_KEYUP:
 514     case WM_SYSKEYUP:
 515         /* Press and release F10 or ALT */
 516         if (((wParam == VK_MENU || wParam == VK_LMENU || wParam == VK_RMENU)
 517              && iMenuSysKey) || ((wParam == VK_F10) && iF10Key))
 518               SendMessageW( GetAncestor( hwnd, GA_ROOT ), WM_SYSCOMMAND, SC_KEYMENU, 0L );
 519         iMenuSysKey = iF10Key = 0;
 520         break;
 521
 522     case WM_SYSCHAR:
 523     {
 524         iMenuSysKey = 0;
 525         if (wParam == '\r' && IsIconic(hwnd))
 526         {
 527             PostMessageW( hwnd, WM_SYSCOMMAND, SC_RESTORE, 0L );
 528             break;
 529         }
 530         if ((HIWORD(lParam) & KEYDATA_ALT) && wParam)
 531         {
 532             if (wParam == '\t' || wParam == '\x1b') break;
 533             if (wParam == ' ' && (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD))
 534                 SendMessageW( GetParent(hwnd), msg, wParam, lParam );
 535             else
 536                 SendMessageW( hwnd, WM_SYSCOMMAND, SC_KEYMENU, wParam );
 537         }
 538         else /* check for Ctrl-Esc */
 539             if (wParam != '\x1b') MessageBeep(0);
 540         break;
 541     }
 542
 543     case WM_SHOWWINDOW:
 544         {
 545             LONG style = GetWindowLongW( hwnd, GWL_STYLE );
 546             WND *pWnd;
 547             if (!lParam) return 0; /* sent from ShowWindow */
 548             if ((style & WS_VISIBLE) && wParam) return 0;
 549             if (!(style & WS_VISIBLE) && !wParam) return 0;
 550             if (!GetWindow( hwnd, GW_OWNER )) return 0;
 551             if (!(pWnd = WIN_GetPtr( hwnd ))) return 0;
 552             if (pWnd == WND_OTHER_PROCESS) return 0;
 553             if (wParam)
 554             {
 555                 if (!(pWnd->flags & WIN_NEEDS_SHOW_OWNEDPOPUP))
 556                 {
 557                     WIN_ReleasePtr( pWnd );
 558                     return 0;
 559                 }
 560                 pWnd->flags &= ~WIN_NEEDS_SHOW_OWNEDPOPUP;
 561             }
 562             else pWnd->flags |= WIN_NEEDS_SHOW_OWNEDPOPUP;
 563             WIN_ReleasePtr( pWnd );
 564             ShowWindow( hwnd, wParam ? SW_SHOWNOACTIVATE : SW_HIDE );
 565             break;
 566         }
 567
 568     case WM_CANCELMODE:
 569         iMenuSysKey = 0;
 570         MENU_EndMenu( hwnd );
 571         if (GetCapture() == hwnd) ReleaseCapture();
 572         break;
 573
 574     case WM_VKEYTOITEM:
 575     case WM_CHARTOITEM:
 576         return -1;
 577
 578     case WM_DROPOBJECT:
 579         return DRAG_FILE;
 580
 581     case WM_QUERYDROPOBJECT:
 582         return (GetWindowLongA( hwnd, GWL_EXSTYLE ) & WS_EX_ACCEPTFILES) != 0;
 583
 584     case WM_QUERYDRAGICON:
 585         {
 586             UINT len;
 587
 588             HICON hIcon = (HICON)GetClassLongPtrW( hwnd, GCLP_HICON );
 589             HINSTANCE instance = (HINSTANCE)GetWindowLongPtrW( hwnd, GWLP_HINSTANCE );
 590             if (hIcon) return (LRESULT)hIcon;
 591             for(len=1; len<64; len++)
 592                 if((hIcon = LoadIconW(instance, MAKEINTRESOURCEW(len))))
 593                     return (LRESULT)hIcon;
 594             return (LRESULT)LoadIconW(0, (LPWSTR)IDI_APPLICATION);
 595         }
 596         break;
 597
 598     case WM_ISACTIVEICON:
 599         return (win_get_flags( hwnd ) & WIN_NCACTIVATED) != 0;
 600
 601     case WM_NOTIFYFORMAT:
 602       if (IsWindowUnicode(hwnd)) return NFR_UNICODE;
 603       else return NFR_ANSI;
 604
 605     case WM_QUERYOPEN:
 606     case WM_QUERYENDSESSION:
 607         return 1;
 608
 609     case WM_SETICON:
 610         {
 611             HICON ret;
 612             WND *wndPtr = WIN_GetPtr( hwnd );
 613
 614             switch(wParam)
 615             {
 616             case ICON_SMALL:
 617                 ret = wndPtr->hIconSmall;
 618                 if (ret && !lParam && wndPtr->hIcon)
 619                 {
 620                     wndPtr->hIconSmall2 = CopyImage( wndPtr->hIcon, IMAGE_ICON,
 621                                                      GetSystemMetrics( SM_CXSMICON ),
 622                                                      GetSystemMetrics( SM_CYSMICON ), 0 );
 623                 }
 624                 else if (lParam && wndPtr->hIconSmall2)
 625                 {
 626                     DestroyIcon( wndPtr->hIconSmall2 );
 627                     wndPtr->hIconSmall2 = NULL;
 628                 }
 629                 wndPtr->hIconSmall = (HICON)lParam;
 630                 break;
 631             case ICON_BIG:
 632                 ret = wndPtr->hIcon;
 633                 if (wndPtr->hIconSmall2)
 634                 {
 635                     DestroyIcon( wndPtr->hIconSmall2 );
 636                     wndPtr->hIconSmall2 = NULL;
 637                 }
 638                 if (lParam && !wndPtr->hIconSmall)
 639                 {
 640                     wndPtr->hIconSmall2 = CopyImage( (HICON)lParam, IMAGE_ICON,
 641                                                      GetSystemMetrics( SM_CXSMICON ),
 642                                                      GetSystemMetrics( SM_CYSMICON ), 0 );
 643                 }
 644                 wndPtr->hIcon = (HICON)lParam;
 645                 break;
 646             default:
 647                 ret = 0;
 648                 break;
 649             }
 650             WIN_ReleasePtr( wndPtr );
 651
 652             USER_Driver->pSetWindowIcon( hwnd, wParam, (HICON)lParam );
 653
 654             if( (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CAPTION) == WS_CAPTION )
 655                 NC_HandleNCPaint( hwnd , (HRGN)1 );  /* Repaint caption */
 656
 657             return (LRESULT)ret;
 658         }
 659
 660     case WM_GETICON:
 661         {
 662             HICON ret;
 663             WND *wndPtr = WIN_GetPtr( hwnd );
 664
 665             switch(wParam)
 666             {
 667             case ICON_SMALL:
 668                 ret = wndPtr->hIconSmall;
 669                 break;
 670             case ICON_BIG:
 671                 ret = wndPtr->hIcon;
 672                 break;
 673             case ICON_SMALL2:
 674                 ret = wndPtr->hIconSmall ? wndPtr->hIconSmall : wndPtr->hIconSmall2;
 675                 break;
 676             default:
 677                 ret = 0;
 678                 break;
 679             }
 680             WIN_ReleasePtr( wndPtr );
 681             return (LRESULT)ret;
 682         }
 683
 684     case WM_HELP:
 685         SendMessageW( GetParent(hwnd), msg, wParam, lParam );
 686         break;
 687
 688     case WM_STYLECHANGED:
 689         if (wParam == GWL_STYLE && (GetWindowLongW( hwnd, GWL_EXSTYLE ) & WS_EX_LAYERED))
 690         {
 691             STYLESTRUCT *style = (STYLESTRUCT *)lParam;
 692             if ((style->styleOld ^ style->styleNew) & (WS_CAPTION|WS_THICKFRAME|WS_VSCROLL|WS_HSCROLL))
 693                 SetWindowPos( hwnd, 0, 0, 0, 0, 0, SWP_FRAMECHANGED | SWP_NOACTIVATE | SWP_NOZORDER |
 694                               SWP_NOSIZE | SWP_NOMOVE | SWP_NOCLIENTSIZE | SWP_NOCLIENTMOVE );
 695         }
 696         break;
 697
 698     case WM_APPCOMMAND:
 699         {
 700             HWND parent = GetParent(hwnd);
 701             if(!parent)
 702                 HOOK_CallHooks(WH_SHELL, HSHELL_APPCOMMAND, wParam, lParam, TRUE);
 703             else
 704                 SendMessageW( parent, msg, wParam, lParam );
 705             break;
 706         }
 707     case WM_KEYF1:
 708         {
 709             HELPINFO hi;
 710
 711             hi.cbSize = sizeof(HELPINFO);
 712             GetCursorPos( &hi.MousePos );
 713             if (MENU_IsMenuActive())
 714             {
 715                 hi.iContextType = HELPINFO_MENUITEM;
 716                 hi.hItemHandle = MENU_IsMenuActive();
 717                 hi.iCtrlId = MenuItemFromPoint( hwnd, hi.hItemHandle, hi.MousePos );
 718                 hi.dwContextId = GetMenuContextHelpId( hi.hItemHandle );
 719             }
 720             else
 721             {
 722                 hi.iContextType = HELPINFO_WINDOW;
 723                 hi.hItemHandle = hwnd;
 724                 hi.iCtrlId = GetWindowLongPtrA( hwnd, GWLP_ID );
 725                 hi.dwContextId = GetWindowContextHelpId( hwnd );
 726             }
 727             SendMessageW( hwnd, WM_HELP, 0, (LPARAM)&hi );
 728             break;
 729         }
 730
 731     case WM_INPUTLANGCHANGEREQUEST:
 732         NtUserActivateKeyboardLayout( (HKL)lParam, 0 );
 733         break;
 734
 735     case WM_INPUTLANGCHANGE:
 736         {
 737             struct user_thread_info *info = get_user_thread_info();
 738             int count = 0;
 739             HWND *win_array = WIN_ListChildren( hwnd );
 740             info->kbd_layout = (HKL)lParam;
 741
 742             if (!win_array)
 743                 break;
 744             while (win_array[count])
 745                 SendMessageW( win_array[count++], WM_INPUTLANGCHANGE, wParam, lParam);
 746             HeapFree(GetProcessHeap(),0,win_array);
 747             break;
 748         }
 749
 750     }
 751
 752     return 0;
 753 }
 754
 755 static LPARAM DEFWND_GetTextA( WND *wndPtr, LPSTR dest, WPARAM wParam )
 756 {
 757     LPARAM result = 0;
 758
 759     __TRY
 760     {
 761         if (wndPtr->text)
 762         {
 763             if (!WideCharToMultiByte( CP_ACP, 0, wndPtr->text, -1,
 764                                       dest, wParam, NULL, NULL )) dest[wParam-1] = 0;
 765             result = strlen( dest );
 766         }
 767         else dest[0] = '\0';
 768     }
 769     __EXCEPT_PAGE_FAULT
 770     {
 771         return 0;
 772     }
 773     __ENDTRY
 774     return result;
 775 }
 776
 777 /***********************************************************************
 778  *              DefWindowProcA (USER32.@)
 779  *
 780  * See DefWindowProcW.
 781  */
 782 LRESULT WINAPI DefWindowProcA( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam )
 783 {
 784     LRESULT result = 0;
 785     HWND full_handle;
 786
 787     if (!(full_handle = WIN_IsCurrentProcess( hwnd )))
 788     {
 789         if (!IsWindow( hwnd )) return 0;
 790         ERR( "called for other process window %p\n", hwnd );
 791         return 0;
 792     }
 793     hwnd = full_handle;
 794
 795     SPY_EnterMessage( SPY_DEFWNDPROC, hwnd, msg, wParam, lParam );
 796
 797     switch(msg)
 798     {
 799     case WM_NCCREATE:
 800         if (lParam)
 801         {
 802             CREATESTRUCTA *cs = (CREATESTRUCTA *)lParam;
 803
 804             DEFWND_SetTextA( hwnd, cs->lpszName );
 805             result = 1;
 806
 807             if(cs->style & (WS_HSCROLL | WS_VSCROLL))
 808             {
 809                 SCROLLINFO si = {sizeof si, SIF_ALL, 0, 100, 0, 0, 0};
 810                 SetScrollInfo( hwnd, SB_HORZ, &si, FALSE );
 811                 SetScrollInfo( hwnd, SB_VERT, &si, FALSE );
 812             }
 813         }
 814         break;
 815
 816     case WM_GETTEXTLENGTH:
 817         {
 818             WND *wndPtr = WIN_GetPtr( hwnd );
 819             if (wndPtr && wndPtr->text)
 820                 result = WideCharToMultiByte( CP_ACP, 0, wndPtr->text, lstrlenW(wndPtr->text),
 821                                               NULL, 0, NULL, NULL );
 822             WIN_ReleasePtr( wndPtr );
 823         }
 824         break;
 825
 826     case WM_GETTEXT:
 827         if (wParam)
 828         {
 829             LPSTR dest = (LPSTR)lParam;
 830             WND *wndPtr = WIN_GetPtr( hwnd );
 831
 832             if (!wndPtr) break;
 833             result = DEFWND_GetTextA( wndPtr, dest, wParam );
 834
 835             WIN_ReleasePtr( wndPtr );
 836         }
 837         break;
 838
 839     case WM_SETTEXT:
 840         if (!DEFWND_SetTextA( hwnd, (LPCSTR)lParam ))
 841             break;
 842         if( (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CAPTION) == WS_CAPTION )
 843             NC_HandleNCPaint( hwnd , (HRGN)1 );  /* Repaint caption */
 844         result = 1; /* success. FIXME: check text length */
 845         break;
 846
 847     case WM_IME_CHAR:
 848         if (HIBYTE(wParam)) PostMessageA( hwnd, WM_CHAR, HIBYTE(wParam), lParam );
 849         PostMessageA( hwnd, WM_CHAR, LOBYTE(wParam), lParam );
 850         break;
 851
 852     case WM_IME_KEYDOWN:
 853         result = PostMessageA( hwnd, WM_KEYDOWN, wParam, lParam );
 854         break;
 855
 856     case WM_IME_KEYUP:
 857         result = PostMessageA( hwnd, WM_KEYUP, wParam, lParam );
 858         break;
 859
 860     case WM_IME_COMPOSITION:
 861         if (lParam & GCS_RESULTSTR)
 862         {
 863             LONG size, i;
 864             unsigned char lead = 0;
 865             char *buf = NULL;
 866             HIMC himc = ImmGetContext( hwnd );
 867
 868             if (himc)
 869             {
 870                 if ((size = ImmGetCompositionStringA( himc, GCS_RESULTSTR, NULL, 0 )))
 871                 {
 872                     if (!(buf = HeapAlloc( GetProcessHeap(), 0, size ))) size = 0;
 873                     else size = ImmGetCompositionStringA( himc, GCS_RESULTSTR, buf, size );
 874                 }
 875                 ImmReleaseContext( hwnd, himc );
 876
 877                 for (i = 0; i < size; i++)
 878                 {
 879                     unsigned char c = buf[i];
 880                     if (!lead)
 881                     {
 882                         if (IsDBCSLeadByte( c ))
 883                             lead = c;
 884                         else
 885                             SendMessageA( hwnd, WM_IME_CHAR, c, 1 );
 886                     }
 887                     else
 888                     {
 889                         SendMessageA( hwnd, WM_IME_CHAR, MAKEWORD(c, lead), 1 );
 890                         lead = 0;
 891                     }
 892                 }
 893                 HeapFree( GetProcessHeap(), 0, buf );
 894             }
 895         }
 896         /* fall through */
 897     case WM_IME_STARTCOMPOSITION:
 898     case WM_IME_ENDCOMPOSITION:
 899     case WM_IME_SELECT:
 900     case WM_IME_NOTIFY:
 901     case WM_IME_CONTROL:
 902         {
 903             HWND hwndIME = ImmGetDefaultIMEWnd( hwnd );
 904             if (hwndIME)
 905                 result = SendMessageA( hwndIME, msg, wParam, lParam );
 906         }
 907         break;
 908     case WM_IME_SETCONTEXT:
 909         {
 910             HWND hwndIME = ImmGetDefaultIMEWnd( hwnd );
 911             if (hwndIME) result = ImmIsUIMessageA( hwndIME, msg, wParam, lParam );
 912         }
 913         break;
 914
 915     case WM_SYSCHAR:
 916     {
 917         CHAR ch = LOWORD(wParam);
 918         WCHAR wch;
 919         MultiByteToWideChar(CP_ACP, 0, &ch, 1, &wch, 1);
 920         wParam = MAKEWPARAM( wch, HIWORD(wParam) );
 921     }
 922     /* fall through */
 923     default:
 924         result = DEFWND_DefWinProc( hwnd, msg, wParam, lParam );
 925         break;
 926     }
 927
 928     SPY_ExitMessage( SPY_RESULT_DEFWND, hwnd, msg, result, wParam, lParam );
 929     return result;
 930 }
 931
 932
 933 static LPARAM DEFWND_GetTextW( WND *wndPtr, LPWSTR dest, WPARAM wParam )
 934 {
 935     LPARAM result = 0;
 936
 937     __TRY
 938     {
 939         if (wndPtr->text)
 940         {
 941             lstrcpynW( dest, wndPtr->text, wParam );
 942             result = lstrlenW( dest );
 943         }
 944         else dest[0] = '\0';
 945     }
 946     __EXCEPT_PAGE_FAULT
 947     {
 948         return 0;
 949     }
 950     __ENDTRY
 951
 952     return result;
 953 }
 954
 955 /***********************************************************************
 956  *              DefWindowProcW (USER32.@) Calls default window message handler
 957  *
 958  * Calls default window procedure for messages not processed
 959  *  by application.
 960  *
 961  *  RETURNS
 962  *     Return value is dependent upon the message.
 963 */
 964 LRESULT WINAPI DefWindowProcW(
 965     HWND hwnd,      /* [in] window procedure receiving message */
 966     UINT msg,       /* [in] message identifier */
 967     WPARAM wParam,  /* [in] first message parameter */
 968     LPARAM lParam )   /* [in] second message parameter */
 969 {
 970     LRESULT result = 0;
 971     HWND full_handle;
 972
 973     if (!(full_handle = WIN_IsCurrentProcess( hwnd )))
 974     {
 975         if (!IsWindow( hwnd )) return 0;
 976         ERR( "called for other process window %p\n", hwnd );
 977         return 0;
 978     }
 979     hwnd = full_handle;
 980     SPY_EnterMessage( SPY_DEFWNDPROC, hwnd, msg, wParam, lParam );
 981
 982     switch(msg)
 983     {
 984     case WM_NCCREATE:
 985         if (lParam)
 986         {
 987             CREATESTRUCTW *cs = (CREATESTRUCTW *)lParam;
 988
 989             DEFWND_SetTextW( hwnd, cs->lpszName );
 990             result = 1;
 991
 992             if(cs->style & (WS_HSCROLL | WS_VSCROLL))
 993             {
 994                 SCROLLINFO si = {sizeof si, SIF_ALL, 0, 100, 0, 0, 0};
 995                 SetScrollInfo( hwnd, SB_HORZ, &si, FALSE );
 996                 SetScrollInfo( hwnd, SB_VERT, &si, FALSE );
 997             }
 998         }
 999         break;
1000
1001     case WM_GETTEXTLENGTH:
1002         {
1003             WND *wndPtr = WIN_GetPtr( hwnd );
1004             if (wndPtr && wndPtr->text) result = (LRESULT)lstrlenW(wndPtr->text);
1005             WIN_ReleasePtr( wndPtr );
1006         }
1007         break;
1008
1009     case WM_GETTEXT:
1010         if (wParam)
1011         {
1012             LPWSTR dest = (LPWSTR)lParam;
1013             WND *wndPtr = WIN_GetPtr( hwnd );
1014
1015             if (!wndPtr) break;
1016             result = DEFWND_GetTextW( wndPtr, dest, wParam );
1017             WIN_ReleasePtr( wndPtr );
1018         }
1019         break;
1020
1021     case WM_SETTEXT:
1022         if (!DEFWND_SetTextW( hwnd, (LPCWSTR)lParam ))
1023             break;
1024         if( (GetWindowLongW( hwnd, GWL_STYLE ) & WS_CAPTION) == WS_CAPTION )
1025             NC_HandleNCPaint( hwnd , (HRGN)1 );  /* Repaint caption */
1026         result = 1; /* success. FIXME: check text length */
1027         break;
1028
1029     case WM_IME_CHAR:
1030         PostMessageW( hwnd, WM_CHAR, wParam, lParam );
1031         break;
1032
1033     case WM_IME_KEYDOWN:
1034         result = PostMessageW( hwnd, WM_KEYDOWN, wParam, lParam );
1035         break;
1036
1037     case WM_IME_KEYUP:
1038         result = PostMessageW( hwnd, WM_KEYUP, wParam, lParam );
1039         break;
1040
1041     case WM_IME_SETCONTEXT:
1042         {
1043             HWND hwndIME = ImmGetDefaultIMEWnd( hwnd );
1044             if (hwndIME) result = ImmIsUIMessageW( hwndIME, msg, wParam, lParam );
1045         }
1046         break;
1047
1048     case WM_IME_COMPOSITION:
1049         if (lParam & GCS_RESULTSTR)
1050         {
1051             LONG size, i;
1052             WCHAR *buf = NULL;
1053             HIMC himc = ImmGetContext( hwnd );
1054
1055             if (himc)
1056             {
1057                 if ((size = ImmGetCompositionStringW( himc, GCS_RESULTSTR, NULL, 0 )))
1058                 {
1059                     if (!(buf = HeapAlloc( GetProcessHeap(), 0, size * sizeof(WCHAR) ))) size = 0;
1060                     else size = ImmGetCompositionStringW( himc, GCS_RESULTSTR, buf, size * sizeof(WCHAR) );
1061                 }
1062                 ImmReleaseContext( hwnd, himc );
1063
1064                 for (i = 0; i < size / sizeof(WCHAR); i++)
1065                     SendMessageW( hwnd, WM_IME_CHAR, buf[i], 1 );
1066                 HeapFree( GetProcessHeap(), 0, buf );
1067             }
1068         }
1069         /* fall through */
1070     case WM_IME_STARTCOMPOSITION:
1071     case WM_IME_ENDCOMPOSITION:
1072     case WM_IME_SELECT:
1073     case WM_IME_NOTIFY:
1074     case WM_IME_CONTROL:
1075         {
1076             HWND hwndIME = ImmGetDefaultIMEWnd( hwnd );
1077             if (hwndIME)
1078                 result = SendMessageW( hwndIME, msg, wParam, lParam );
1079         }
1080         break;
1081
1082     default:
1083         result = DEFWND_DefWinProc( hwnd, msg, wParam, lParam );
1084         break;
1085     }
1086     SPY_ExitMessage( SPY_RESULT_DEFWND, hwnd, msg, result, wParam, lParam );
1087     return result;
1088 }