windows/defwnd.c

   1 /*
   2  * Default window procedure
   3  *
   4  * Copyright 1993, 1996 Alexandre Julliard
   5  *           1995 Alex Korobka
   6  */
   7
   8 #include <stdlib.h>
   9 #include <stdio.h>
  10 #include "win.h"
  11 #include "user.h"
  12 #include "heap.h"
  13 #include "nonclient.h"
  14 #include "winpos.h"
  15 #include "dce.h"
  16 #include "sysmetrics.h"
  17 #include "debug.h"
  18 #include "spy.h"
  19
  20   /* Last COLOR id */
  21 #define COLOR_MAX   COLOR_BTNHIGHLIGHT
  22
  23   /* bits in the dwKeyData */
  24 #define KEYDATA_ALT             0x2000
  25 #define KEYDATA_PREVSTATE       0x4000
  26
  27 static short iF10Key = 0;
  28 static short iMenuSysKey = 0;
  29
  30 /***********************************************************************
  31  *           DEFWND_HandleWindowPosChanged
  32  *
  33  * Handle the WM_WINDOWPOSCHANGED message.
  34  */
  35 static void DEFWND_HandleWindowPosChanged( WND *wndPtr, UINT32 flags )
  36 {
  37     WPARAM16 wp = SIZE_RESTORED;
  38
  39     if (!(flags & SWP_NOCLIENTMOVE))
  40         SendMessage16( wndPtr->hwndSelf, WM_MOVE, 0,
  41                     MAKELONG(wndPtr->rectClient.left, wndPtr->rectClient.top));
  42     if (!(flags & SWP_NOCLIENTSIZE))
  43     {
  44         if (wndPtr->dwStyle & WS_MAXIMIZE) wp = SIZE_MAXIMIZED;
  45         else if (wndPtr->dwStyle & WS_MINIMIZE) wp = SIZE_MINIMIZED;
  46
  47         SendMessage16( wndPtr->hwndSelf, WM_SIZE, wp,
  48                      MAKELONG(wndPtr->rectClient.right-wndPtr->rectClient.left,
  49                             wndPtr->rectClient.bottom-wndPtr->rectClient.top));
  50     }
  51 }
  52
  53
  54 /***********************************************************************
  55  *           DEFWND_SetText
  56  *
  57  * Set the window text.
  58  */
  59 void DEFWND_SetText( WND *wndPtr, LPCSTR text )
  60 {
  61     if (!text) text = "";
  62     if (wndPtr->text) HeapFree( SystemHeap, 0, wndPtr->text );
  63     wndPtr->text = HEAP_strdupA( SystemHeap, 0, text );
  64     if (wndPtr->window)
  65     {
  66         TSXStoreName( display, wndPtr->window, wndPtr->text );
  67         TSXSetIconName( display, wndPtr->window, wndPtr->text );
  68     }
  69 }
  70
  71 /***********************************************************************
  72  *           DEFWND_ControlColor
  73  *
  74  * Default colors for control painting.
  75  */
  76 HBRUSH32 DEFWND_ControlColor( HDC32 hDC, UINT16 ctlType )
  77 {
  78     if( ctlType == CTLCOLOR_SCROLLBAR)
  79     {
  80         HBRUSH32 hb = GetSysColorBrush32(COLOR_SCROLLBAR);
  81         SetBkColor32( hDC, RGB(255, 255, 255) );
  82         SetTextColor32( hDC, RGB(0, 0, 0) );
  83         UnrealizeObject32( hb );
  84         return hb;
  85     }
  86
  87     SetBkColor32( hDC, GetSysColor32(COLOR_WINDOW) );
  88     SetTextColor32( hDC, GetSysColor32(COLOR_WINDOWTEXT));
  89     return GetSysColorBrush32(COLOR_WINDOW);
  90 }
  91
  92
  93 /***********************************************************************
  94  *           DEFWND_SetRedraw
  95  */
  96 static void DEFWND_SetRedraw( WND* wndPtr, WPARAM32 wParam )
  97 {
  98     BOOL32 bVisible = wndPtr->dwStyle & WS_VISIBLE;
  99
 100 TRACE(win,"%04x %i\n", wndPtr->hwndSelf, (wParam!=0) );
 101
 102     if( wParam )
 103     {
 104         if( !bVisible )
 105         {
 106             wndPtr->dwStyle |= WS_VISIBLE;
 107             DCE_InvalidateDCE( wndPtr, &wndPtr->rectWindow );
 108         }
 109     }
 110     else if( bVisible )
 111     {
 112         if( wndPtr->dwStyle & WS_MINIMIZE ) wParam = RDW_VALIDATE;
 113         else wParam = RDW_ALLCHILDREN | RDW_VALIDATE;
 114
 115         PAINT_RedrawWindow( wndPtr->hwndSelf, NULL, 0, wParam, 0 );
 116         DCE_InvalidateDCE( wndPtr, &wndPtr->rectWindow );
 117         wndPtr->dwStyle &= ~WS_VISIBLE;
 118     }
 119 }
 120
 121 /***********************************************************************
 122  *           DEFWND_DefWinProc
 123  *
 124  * Default window procedure for messages that are the same in Win16 and Win32.
 125  */
 126 static LRESULT DEFWND_DefWinProc( WND *wndPtr, UINT32 msg, WPARAM32 wParam,
 127                                   LPARAM lParam )
 128 {
 129     switch(msg)
 130     {
 131     case WM_NCPAINT:
 132         return NC_HandleNCPaint( wndPtr->hwndSelf, (HRGN32)wParam );
 133
 134     case WM_NCHITTEST:
 135         return NC_HandleNCHitTest( wndPtr->hwndSelf, MAKEPOINT16(lParam) );
 136
 137     case WM_NCLBUTTONDOWN:
 138         return NC_HandleNCLButtonDown( wndPtr, wParam, lParam );
 139
 140     case WM_LBUTTONDBLCLK:
 141     case WM_NCLBUTTONDBLCLK:
 142         return NC_HandleNCLButtonDblClk( wndPtr, wParam, lParam );
 143
 144     case WM_RBUTTONDOWN:
 145     case WM_NCRBUTTONDOWN:
 146         if( wndPtr->flags & WIN_ISWIN32 )
 147         {
 148             ClientToScreen16(wndPtr->hwndSelf, (LPPOINT16)&lParam);
 149             SendMessage32A( wndPtr->hwndSelf, WM_CONTEXTMENU,
 150                             wndPtr->hwndSelf, lParam);
 151         }
 152         break;
 153
 154     case WM_CONTEXTMENU:
 155         if( wndPtr->dwStyle & WS_CHILD )
 156             SendMessage32A( wndPtr->parent->hwndSelf, msg, wParam, lParam );
 157
 158      /* else
 159       *     FIXME: Track system popup if click was in the caption area. */
 160
 161         break;
 162
 163     case WM_NCACTIVATE:
 164         return NC_HandleNCActivate( wndPtr, wParam );
 165
 166     case WM_NCDESTROY:
 167         if (wndPtr->text) HeapFree( SystemHeap, 0, wndPtr->text );
 168         wndPtr->text = NULL;
 169         if (wndPtr->pVScroll) HeapFree( SystemHeap, 0, wndPtr->pVScroll );
 170         if (wndPtr->pHScroll) HeapFree( SystemHeap, 0, wndPtr->pHScroll );
 171         wndPtr->pVScroll = wndPtr->pHScroll = NULL;
 172         return 0;
 173
 174     case WM_PAINTICON:
 175     case WM_PAINT:
 176         {
 177             PAINTSTRUCT16 ps;
 178             HDC16 hdc = BeginPaint16( wndPtr->hwndSelf, &ps );
 179             if( hdc )
 180             {
 181               if( (wndPtr->dwStyle & WS_MINIMIZE) && wndPtr->class->hIcon )
 182               {
 183                 int x = (wndPtr->rectWindow.right - wndPtr->rectWindow.left -
 184                         SYSMETRICS_CXICON)/2;
 185                 int y = (wndPtr->rectWindow.bottom - wndPtr->rectWindow.top -
 186                         SYSMETRICS_CYICON)/2;
 187                 TRACE(win,"Painting class icon: vis rect=(%i,%i - %i,%i)\n",
 188                 ps.rcPaint.left, ps.rcPaint.top, ps.rcPaint.right, ps.rcPaint.bottom );
 189                 DrawIcon32( hdc, x, y, wndPtr->class->hIcon );
 190               }
 191               EndPaint16( wndPtr->hwndSelf, &ps );
 192             }
 193             return 0;
 194         }
 195
 196     case WM_SETREDRAW:
 197         DEFWND_SetRedraw( wndPtr, wParam );
 198         return 0;
 199
 200     case WM_CLOSE:
 201         DestroyWindow32( wndPtr->hwndSelf );
 202         return 0;
 203
 204     case WM_MOUSEACTIVATE:
 205         if (wndPtr->dwStyle & WS_CHILD)
 206         {
 207             LONG ret = SendMessage16( wndPtr->parent->hwndSelf,
 208                                       WM_MOUSEACTIVATE, wParam, lParam );
 209             if (ret) return ret;
 210         }
 211
 212         /* Caption clicks are handled by the NC_HandleNCLButtonDown() */
 213         return (LOWORD(lParam) == HTCAPTION) ? MA_NOACTIVATE : MA_ACTIVATE;
 214
 215     case WM_ACTIVATE:
 216         if (LOWORD(wParam) != WA_INACTIVE) SetFocus32( wndPtr->hwndSelf );
 217         break;
 218
 219     case WM_ERASEBKGND:
 220     case WM_ICONERASEBKGND:
 221         {
 222             if (!wndPtr->class->hbrBackground) return 0;
 223
 224             if (wndPtr->class->hbrBackground <= (HBRUSH16)(COLOR_MAX+1))
 225             {
 226                 HBRUSH32 hbrush = CreateSolidBrush32(
 227                        GetSysColor32(((DWORD)wndPtr->class->hbrBackground)-1));
 228                  FillWindow( GetParent16(wndPtr->hwndSelf), wndPtr->hwndSelf,
 229                              (HDC16)wParam, hbrush);
 230                  DeleteObject32( hbrush );
 231             }
 232             else FillWindow( GetParent16(wndPtr->hwndSelf), wndPtr->hwndSelf,
 233                              (HDC16)wParam, wndPtr->class->hbrBackground );
 234             return 1;
 235         }
 236
 237     case WM_GETDLGCODE:
 238         return 0;
 239
 240     case WM_CTLCOLORMSGBOX:
 241     case WM_CTLCOLOREDIT:
 242     case WM_CTLCOLORLISTBOX:
 243     case WM_CTLCOLORBTN:
 244     case WM_CTLCOLORDLG:
 245     case WM_CTLCOLORSTATIC:
 246     case WM_CTLCOLORSCROLLBAR:
 247         return (LRESULT)DEFWND_ControlColor( (HDC32)wParam, msg - WM_CTLCOLORMSGBOX );
 248
 249     case WM_CTLCOLOR:
 250         return (LRESULT)DEFWND_ControlColor( (HDC32)wParam, HIWORD(lParam) );
 251
 252     case WM_GETTEXTLENGTH:
 253         if (wndPtr->text) return (LRESULT)strlen(wndPtr->text);
 254         return 0;
 255
 256     case WM_SETCURSOR:
 257         if (wndPtr->dwStyle & WS_CHILD)
 258             if (SendMessage16(wndPtr->parent->hwndSelf, WM_SETCURSOR,
 259                             wParam, lParam))
 260                 return TRUE;
 261         return NC_HandleSetCursor( wndPtr->hwndSelf, wParam, lParam );
 262
 263     case WM_SYSCOMMAND:
 264         return NC_HandleSysCommand( wndPtr->hwndSelf, wParam,
 265                                     MAKEPOINT16(lParam) );
 266
 267     case WM_KEYDOWN:
 268         if(wParam == VK_F10) iF10Key = VK_F10;
 269         break;
 270
 271     case WM_SYSKEYDOWN:
 272         if( HIWORD(lParam) & KEYDATA_ALT )
 273         {
 274             /* if( HIWORD(lParam) & ~KEYDATA_PREVSTATE ) */
 275               if( wParam == VK_MENU && !iMenuSysKey )
 276                 iMenuSysKey = 1;
 277               else
 278                 iMenuSysKey = 0;
 279
 280             iF10Key = 0;
 281
 282             if( wParam == VK_F4 )       /* try to close the window */
 283             {
 284                 HWND32 hWnd = WIN_GetTopParent( wndPtr->hwndSelf );
 285                 wndPtr = WIN_FindWndPtr( hWnd );
 286                 if( wndPtr && !(wndPtr->class->style & CS_NOCLOSE) )
 287                     PostMessage16( hWnd, WM_SYSCOMMAND, SC_CLOSE, 0 );
 288             }
 289         }
 290         else if( wParam == VK_F10 )
 291                 iF10Key = 1;
 292              else
 293                 if( wParam == VK_ESCAPE && (GetKeyState32(VK_SHIFT) & 0x8000))
 294                     SendMessage16( wndPtr->hwndSelf, WM_SYSCOMMAND,
 295                                   (WPARAM16)SC_KEYMENU, (LPARAM)VK_SPACE);
 296         break;
 297
 298     case WM_KEYUP:
 299     case WM_SYSKEYUP:
 300         /* Press and release F10 or ALT */
 301         if (((wParam == VK_MENU) && iMenuSysKey) ||
 302             ((wParam == VK_F10) && iF10Key))
 303               SendMessage16( WIN_GetTopParent(wndPtr->hwndSelf),
 304                              WM_SYSCOMMAND, SC_KEYMENU, 0L );
 305         iMenuSysKey = iF10Key = 0;
 306         break;
 307
 308     case WM_SYSCHAR:
 309         iMenuSysKey = 0;
 310         if (wParam == VK_RETURN && (wndPtr->dwStyle & WS_MINIMIZE))
 311         {
 312             PostMessage16( wndPtr->hwndSelf, WM_SYSCOMMAND,
 313                            (WPARAM16)SC_RESTORE, 0L );
 314             break;
 315         }
 316         if ((HIWORD(lParam) & KEYDATA_ALT) && wParam)
 317         {
 318             if (wParam == VK_TAB || wParam == VK_ESCAPE) break;
 319             if (wParam == VK_SPACE && (wndPtr->dwStyle & WS_CHILD))
 320                 SendMessage16( wndPtr->parent->hwndSelf, msg, wParam, lParam );
 321             else
 322                 SendMessage16( wndPtr->hwndSelf, WM_SYSCOMMAND,
 323                                (WPARAM16)SC_KEYMENU, (LPARAM)(DWORD)wParam );
 324         }
 325         else /* check for Ctrl-Esc */
 326             if (wParam != VK_ESCAPE) MessageBeep32(0);
 327         break;
 328
 329     case WM_SHOWWINDOW:
 330         if (!lParam) return 0; /* sent from ShowWindow */
 331         if (!(wndPtr->dwStyle & WS_POPUP) || !wndPtr->owner) return 0;
 332         if ((wndPtr->dwStyle & WS_VISIBLE) && wParam) return 0;
 333         else if (!(wndPtr->dwStyle & WS_VISIBLE) && !wParam) return 0;
 334         ShowWindow32( wndPtr->hwndSelf, wParam ? SW_SHOWNOACTIVATE : SW_HIDE );
 335         break;
 336
 337     case WM_CANCELMODE:
 338         if (wndPtr->parent == WIN_GetDesktop()) EndMenu();
 339         if (GetCapture32() == wndPtr->hwndSelf) ReleaseCapture();
 340         break;
 341
 342     case WM_VKEYTOITEM:
 343     case WM_CHARTOITEM:
 344         return -1;
 345
 346     case WM_DROPOBJECT:
 347         return DRAG_FILE;
 348
 349     case WM_QUERYDROPOBJECT:
 350         if (wndPtr->dwExStyle & WS_EX_ACCEPTFILES) return 1;
 351         break;
 352
 353     case WM_QUERYDRAGICON:
 354         {
 355             HICON16 hI = 0;
 356             UINT16 len = 1;
 357             while(len < 64)
 358                 if( (hI = LoadIcon16(wndPtr->hInstance,MAKEINTRESOURCE(len))) )
 359                     return (LRESULT)hI;
 360         }
 361         break;
 362
 363     case WM_ISACTIVEICON:
 364         return ((wndPtr->flags & WIN_NCACTIVATED) != 0);
 365
 366     case WM_QUERYOPEN:
 367     case WM_QUERYENDSESSION:
 368         return 1;
 369     }
 370     return 0;
 371 }
 372
 373
 374
 375 /***********************************************************************
 376  *           DefWindowProc16   (USER.107)
 377  */
 378 LRESULT WINAPI DefWindowProc16( HWND16 hwnd, UINT16 msg, WPARAM16 wParam,
 379                                 LPARAM lParam )
 380 {
 381     WND * wndPtr = WIN_FindWndPtr( hwnd );
 382     LRESULT result = 0;
 383
 384     if (!wndPtr) return 0;
 385     SPY_EnterMessage( SPY_DEFWNDPROC16, hwnd, msg, wParam, lParam );
 386
 387     switch(msg)
 388     {
 389     case WM_NCCREATE:
 390         {
 391             CREATESTRUCT16 *cs = (CREATESTRUCT16 *)PTR_SEG_TO_LIN(lParam);
 392             if (cs->lpszName)
 393                 DEFWND_SetText( wndPtr, (LPSTR)PTR_SEG_TO_LIN(cs->lpszName) );
 394             result = 1;
 395         }
 396         break;
 397
 398     case WM_NCCALCSIZE:
 399         {
 400             RECT32 rect32;
 401             CONV_RECT16TO32( (RECT16 *)PTR_SEG_TO_LIN(lParam), &rect32 );
 402             result = NC_HandleNCCalcSize( wndPtr, &rect32 );
 403             CONV_RECT32TO16( &rect32, (RECT16 *)PTR_SEG_TO_LIN(lParam) );
 404         }
 405         break;
 406
 407     case WM_WINDOWPOSCHANGING:
 408         result = WINPOS_HandleWindowPosChanging16( wndPtr,
 409                                        (WINDOWPOS16 *)PTR_SEG_TO_LIN(lParam) );
 410         break;
 411
 412     case WM_WINDOWPOSCHANGED:
 413         {
 414             WINDOWPOS16 * winPos = (WINDOWPOS16 *)PTR_SEG_TO_LIN(lParam);
 415             DEFWND_HandleWindowPosChanged( wndPtr, winPos->flags );
 416         }
 417         break;
 418
 419     case WM_GETTEXT:
 420         if (wParam && wndPtr->text)
 421         {
 422             lstrcpyn32A( (LPSTR)PTR_SEG_TO_LIN(lParam), wndPtr->text, wParam );
 423             result = (LRESULT)strlen( (LPSTR)PTR_SEG_TO_LIN(lParam) );
 424         }
 425         break;
 426
 427     case WM_SETTEXT:
 428         DEFWND_SetText( wndPtr, (LPSTR)PTR_SEG_TO_LIN(lParam) );
 429         if( wndPtr->dwStyle & WS_CAPTION ) NC_HandleNCPaint( hwnd , (HRGN32)1 );
 430         break;
 431
 432     default:
 433         result = DEFWND_DefWinProc( wndPtr, msg, wParam, lParam );
 434         break;
 435     }
 436
 437     SPY_ExitMessage( SPY_RESULT_DEFWND16, hwnd, msg, result );
 438     return result;
 439 }
 440
 441
 442 /***********************************************************************
 443  *           DefWindowProc32A   (USER32.125)
 444  */
 445 LRESULT WINAPI DefWindowProc32A( HWND32 hwnd, UINT32 msg, WPARAM32 wParam,
 446                                  LPARAM lParam )
 447 {
 448     WND * wndPtr = WIN_FindWndPtr( hwnd );
 449     LRESULT result = 0;
 450
 451     if (!wndPtr) return 0;
 452     SPY_EnterMessage( SPY_DEFWNDPROC32, hwnd, msg, wParam, lParam );
 453
 454     switch(msg)
 455     {
 456     case WM_NCCREATE:
 457         {
 458             CREATESTRUCT32A *cs = (CREATESTRUCT32A *)lParam;
 459             if (cs->lpszName) DEFWND_SetText( wndPtr, cs->lpszName );
 460             result = 1;
 461         }
 462         break;
 463
 464     case WM_NCCALCSIZE:
 465         result = NC_HandleNCCalcSize( wndPtr, (RECT32 *)lParam );
 466         break;
 467
 468     case WM_WINDOWPOSCHANGING:
 469         result = WINPOS_HandleWindowPosChanging32( wndPtr,
 470                                                    (WINDOWPOS32 *)lParam );
 471         break;
 472
 473     case WM_WINDOWPOSCHANGED:
 474         {
 475             WINDOWPOS32 * winPos = (WINDOWPOS32 *)lParam;
 476             DEFWND_HandleWindowPosChanged( wndPtr, winPos->flags );
 477         }
 478         break;
 479
 480     case WM_GETTEXT:
 481         if (wParam && wndPtr->text)
 482         {
 483             lstrcpyn32A( (LPSTR)lParam, wndPtr->text, wParam );
 484             result = (LRESULT)strlen( (LPSTR)lParam );
 485         }
 486         break;
 487
 488     case WM_SETTEXT:
 489         DEFWND_SetText( wndPtr, (LPSTR)lParam );
 490         NC_HandleNCPaint( hwnd , (HRGN32)1 );  /* Repaint caption */
 491         break;
 492
 493     default:
 494         result = DEFWND_DefWinProc( wndPtr, msg, wParam, lParam );
 495         break;
 496     }
 497
 498     SPY_ExitMessage( SPY_RESULT_DEFWND32, hwnd, msg, result );
 499     return result;
 500 }
 501
 502
 503 /***********************************************************************
 504  *           DefWindowProc32W   (USER32.126)
 505  */
 506 LRESULT WINAPI DefWindowProc32W( HWND32 hwnd, UINT32 msg, WPARAM32 wParam,
 507                                  LPARAM lParam )
 508 {
 509     LRESULT result;
 510
 511     switch(msg)
 512     {
 513     case WM_NCCREATE:
 514         {
 515             CREATESTRUCT32W *cs = (CREATESTRUCT32W *)lParam;
 516             if (cs->lpszName)
 517             {
 518                 WND *wndPtr = WIN_FindWndPtr( hwnd );
 519                 LPSTR str = HEAP_strdupWtoA(GetProcessHeap(), 0, cs->lpszName);
 520                 DEFWND_SetText( wndPtr, str );
 521                 HeapFree( GetProcessHeap(), 0, str );
 522             }
 523             result = 1;
 524         }
 525         break;
 526
 527     case WM_GETTEXT:
 528         {
 529             LPSTR str = HeapAlloc( GetProcessHeap(), 0, wParam );
 530             result = DefWindowProc32A( hwnd, msg, wParam, (LPARAM)str );
 531             lstrcpynAtoW( (LPWSTR)lParam, str, wParam );
 532             HeapFree( GetProcessHeap(), 0, str );
 533         }
 534         break;
 535
 536     case WM_SETTEXT:
 537         {
 538             LPSTR str = HEAP_strdupWtoA( GetProcessHeap(), 0, (LPWSTR)lParam );
 539             result = DefWindowProc32A( hwnd, msg, wParam, (LPARAM)str );
 540             HeapFree( GetProcessHeap(), 0, str );
 541         }
 542         break;
 543
 544     default:
 545         result = DefWindowProc32A( hwnd, msg, wParam, lParam );
 546         break;
 547     }
 548     return result;
 549 }