Lowest scan code seems to be 1, not zero.
[wine] / windows / defdlg.c
1 /*
2  * Default dialog procedure
3  *
4  * Copyright 1993, 1996 Alexandre Julliard
5  *
6  */
7
8 #include "windows.h"
9 #include "dialog.h"
10 #include "win.h"
11 #include "winproc.h"
12
13
14 /***********************************************************************
15  *           DEFDLG_SetFocus
16  *
17  * Set the focus to a control of the dialog, selecting the text if
18  * the control is an edit dialog.
19  */
20 static void DEFDLG_SetFocus( HWND32 hwndDlg, HWND32 hwndCtrl )
21 {
22     HWND32 hwndPrev = GetFocus32();
23
24     if (IsChild32( hwndDlg, hwndPrev ))
25     {
26         if (SendMessage16( hwndPrev, WM_GETDLGCODE, 0, 0 ) & DLGC_HASSETSEL)
27             SendMessage16( hwndPrev, EM_SETSEL16, TRUE, MAKELONG( -1, 0 ) );
28     }
29     if (SendMessage16( hwndCtrl, WM_GETDLGCODE, 0, 0 ) & DLGC_HASSETSEL)
30         SendMessage16( hwndCtrl, EM_SETSEL16, FALSE, MAKELONG( 0, -1 ) );
31     SetFocus32( hwndCtrl );
32 }
33
34
35 /***********************************************************************
36  *           DEFDLG_SaveFocus
37  */
38 static BOOL32 DEFDLG_SaveFocus( HWND32 hwnd, DIALOGINFO *infoPtr )
39 {
40     HWND32 hwndFocus = GetFocus32();
41
42     if (!hwndFocus || !IsChild32( hwnd, hwndFocus )) return FALSE;
43     infoPtr->hwndFocus = hwndFocus;
44       /* Remove default button */
45     return TRUE;
46 }
47
48
49 /***********************************************************************
50  *           DEFDLG_RestoreFocus
51  */
52 static BOOL32 DEFDLG_RestoreFocus( HWND32 hwnd, DIALOGINFO *infoPtr )
53 {
54     if (!infoPtr->hwndFocus || IsIconic32(hwnd)) return FALSE;
55     if (!IsWindow32( infoPtr->hwndFocus )) return FALSE;
56     DEFDLG_SetFocus( hwnd, infoPtr->hwndFocus );
57     /* This used to set infoPtr->hwndFocus to NULL for no apparent reason,
58        sometimes losing focus when receiving WM_SETFOCUS messages. */
59     return TRUE;
60 }
61
62
63 /***********************************************************************
64  *           DEFDLG_FindDefButton
65  *
66  * Find the current default push-button.
67  */
68 static HWND32 DEFDLG_FindDefButton( HWND32 hwndDlg )
69 {
70     HWND32 hwndChild = GetWindow32( hwndDlg, GW_CHILD );
71     while (hwndChild)
72     {
73         if (SendMessage16( hwndChild, WM_GETDLGCODE, 0, 0 ) & DLGC_DEFPUSHBUTTON)
74             break;
75         hwndChild = GetWindow32( hwndChild, GW_HWNDNEXT );
76     }
77     return hwndChild;
78 }
79
80
81 /***********************************************************************
82  *           DEFDLG_SetDefButton
83  *
84  * Set the new default button to be hwndNew.
85  */
86 static BOOL32 DEFDLG_SetDefButton( HWND32 hwndDlg, DIALOGINFO *dlgInfo,
87                                    HWND32 hwndNew )
88 {
89     if (hwndNew &&
90         !(SendMessage16(hwndNew, WM_GETDLGCODE, 0, 0 ) & DLGC_UNDEFPUSHBUTTON))
91         return FALSE;  /* Destination is not a push button */
92     
93     if (dlgInfo->idResult)  /* There's already a default pushbutton */
94     {
95         HWND32 hwndOld = GetDlgItem32( hwndDlg, dlgInfo->idResult );
96         if (SendMessage32A( hwndOld, WM_GETDLGCODE, 0, 0) & DLGC_DEFPUSHBUTTON)
97             SendMessage32A( hwndOld, BM_SETSTYLE32, BS_PUSHBUTTON, TRUE );
98     }
99     if (hwndNew)
100     {
101         SendMessage32A( hwndNew, BM_SETSTYLE32, BS_DEFPUSHBUTTON, TRUE );
102         dlgInfo->idResult = GetDlgCtrlID32( hwndNew );
103     }
104     else dlgInfo->idResult = 0;
105     return TRUE;
106 }
107
108
109 /***********************************************************************
110  *           DEFDLG_Proc
111  *
112  * Implementation of DefDlgProc(). Only handle messages that need special
113  * handling for dialogs.
114  */
115 static LRESULT DEFDLG_Proc( HWND32 hwnd, UINT32 msg, WPARAM32 wParam,
116                             LPARAM lParam, DIALOGINFO *dlgInfo )
117 {
118     switch(msg)
119     {
120         case WM_ERASEBKGND:
121             FillWindow( hwnd, hwnd, (HDC16)wParam, (HBRUSH16)CTLCOLOR_DLG );
122             return 1;
123
124         case WM_NCDESTROY:
125
126               /* Free dialog heap (if created) */
127             if (dlgInfo->hDialogHeap)
128             {
129                 GlobalUnlock16(dlgInfo->hDialogHeap);
130                 GlobalFree16(dlgInfo->hDialogHeap);
131                 dlgInfo->hDialogHeap = 0;
132             }
133
134               /* Delete font */
135             if (dlgInfo->hUserFont)
136             {
137                 DeleteObject32( dlgInfo->hUserFont );
138                 dlgInfo->hUserFont = 0;
139             }
140
141               /* Delete menu */
142             if (dlgInfo->hMenu)
143             {           
144                 DestroyMenu32( dlgInfo->hMenu );
145                 dlgInfo->hMenu = 0;
146             }
147
148             /* Delete window procedure */
149             WINPROC_FreeProc( dlgInfo->dlgProc, WIN_PROC_WINDOW );
150             dlgInfo->dlgProc = (HWINDOWPROC)0;
151             dlgInfo->flags |= DF_END;  /* just in case */
152
153               /* Window clean-up */
154             return DefWindowProc32A( hwnd, msg, wParam, lParam );
155
156         case WM_SHOWWINDOW:
157             if (!wParam) DEFDLG_SaveFocus( hwnd, dlgInfo );
158             return DefWindowProc32A( hwnd, msg, wParam, lParam );
159
160         case WM_ACTIVATE:
161             if (wParam) DEFDLG_RestoreFocus( hwnd, dlgInfo );
162             else DEFDLG_SaveFocus( hwnd, dlgInfo );
163             return 0;
164
165         case WM_SETFOCUS:
166             DEFDLG_RestoreFocus( hwnd, dlgInfo );
167             return 0;
168
169         case DM_SETDEFID:
170             if (dlgInfo->flags & DF_END) return 1;
171             DEFDLG_SetDefButton( hwnd, dlgInfo,
172                                  wParam ? GetDlgItem32( hwnd, wParam ) : 0 );
173             return 1;
174
175         case DM_GETDEFID:
176             {
177                 HWND32 hwndDefId;
178                 if (dlgInfo->flags & DF_END) return 0;
179                 if (dlgInfo->idResult)
180                     return MAKELONG( dlgInfo->idResult, DC_HASDEFID );
181                 if ((hwndDefId = DEFDLG_FindDefButton( hwnd )))
182                     return MAKELONG( GetDlgCtrlID32( hwndDefId ), DC_HASDEFID);
183             }
184             return 0;
185
186         case WM_NEXTDLGCTL:
187             {
188                 HWND32 hwndDest = (HWND32)wParam;
189                 if (!lParam)
190                     hwndDest = GetNextDlgTabItem32(hwnd, GetFocus32(), wParam);
191                 if (hwndDest) DEFDLG_SetFocus( hwnd, hwndDest );
192                 DEFDLG_SetDefButton( hwnd, dlgInfo, hwndDest );
193             }
194             return 0;
195
196         case WM_ENTERMENULOOP:
197         case WM_LBUTTONDOWN:
198         case WM_NCLBUTTONDOWN:
199             {
200                 HWND32 hwndFocus = GetFocus32();
201                 if (hwndFocus)
202                 {
203                     WND *wnd = WIN_FindWndPtr( hwndFocus );
204
205                     if( wnd )
206                     {
207                         /* always make combo box hide its listbox control */
208
209                         if( WIDGETS_IsControl32( wnd, BIC32_COMBO ) )
210                             SendMessage32A( hwndFocus, CB_SHOWDROPDOWN32,
211                                             FALSE, 0 );
212                         else if( WIDGETS_IsControl32( wnd, BIC32_EDIT ) &&
213                                  WIDGETS_IsControl32( wnd->parent,
214                                                       BIC32_COMBO ))
215                             SendMessage32A( wnd->parent->hwndSelf, 
216                                             CB_SHOWDROPDOWN32, FALSE, 0 );
217                     }
218                 }
219             }
220             return DefWindowProc32A( hwnd, msg, wParam, lParam );
221
222         case WM_GETFONT: 
223             return dlgInfo->hUserFont;
224
225         case WM_CLOSE:
226             PostMessage32A( hwnd, WM_COMMAND, IDCANCEL,
227                             (LPARAM)GetDlgItem32( hwnd, IDCANCEL ) );
228             return 0;
229     }
230     return 0;
231 }
232
233 /***********************************************************************
234  *           DEFDLG_Epilog
235  */
236 static LRESULT DEFDLG_Epilog(DIALOGINFO* dlgInfo, UINT32 msg, BOOL32 fResult)
237 {
238     /* see SDK 3.1 */
239
240     if ((msg >= WM_CTLCOLORMSGBOX && msg <= WM_CTLCOLORSTATIC) ||
241          msg == WM_CTLCOLOR || msg == WM_COMPAREITEM ||
242          msg == WM_VKEYTOITEM || msg == WM_CHARTOITEM ||
243          msg == WM_QUERYDRAGICON || msg == WM_INITDIALOG)
244         return fResult; 
245
246     return dlgInfo->msgResult;
247 }
248
249 /***********************************************************************
250  *           DefDlgProc16   (USER.308)
251  */
252 LRESULT WINAPI DefDlgProc16( HWND16 hwnd, UINT16 msg, WPARAM16 wParam,
253                              LPARAM lParam )
254 {
255     DIALOGINFO * dlgInfo;
256     BOOL32 result = FALSE;
257     WND * wndPtr = WIN_FindWndPtr( hwnd );
258     
259     if (!wndPtr) return 0;
260     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
261     dlgInfo->msgResult = 0;
262
263     if (dlgInfo->dlgProc) {     /* Call dialog procedure */
264         result = CallWindowProc16( (WNDPROC16)dlgInfo->dlgProc,
265                                            hwnd, msg, wParam, lParam );
266
267     /* Check if window was destroyed by dialog procedure */
268       if (dlgInfo->flags & DF_END && !(dlgInfo->flags & DF_ENDING)) {
269         dlgInfo->flags |= DF_ENDING;
270         DestroyWindow32( hwnd );
271       }
272     }
273
274     if (!result && IsWindow32(hwnd))
275     {
276         /* callback didn't process this message */
277
278         switch(msg)
279         {
280             case WM_ERASEBKGND:
281             case WM_SHOWWINDOW:
282             case WM_ACTIVATE:
283             case WM_SETFOCUS:
284             case DM_SETDEFID:
285             case DM_GETDEFID:
286             case WM_NEXTDLGCTL:
287             case WM_GETFONT:
288             case WM_CLOSE:
289             case WM_NCDESTROY:
290             case WM_ENTERMENULOOP:
291             case WM_LBUTTONDOWN:
292             case WM_NCLBUTTONDOWN:
293                 return DEFDLG_Proc( (HWND32)hwnd, msg, 
294                                     (WPARAM32)wParam, lParam, dlgInfo );
295             case WM_INITDIALOG:
296             case WM_VKEYTOITEM:
297             case WM_COMPAREITEM:
298             case WM_CHARTOITEM:
299                 break;
300
301             default:
302                 return DefWindowProc16( hwnd, msg, wParam, lParam );
303         }
304     }   
305     return DEFDLG_Epilog(dlgInfo, msg, result);
306 }
307
308
309 /***********************************************************************
310  *           DefDlgProc32A   (USER32.120)
311  */
312 LRESULT WINAPI DefDlgProc32A( HWND32 hwnd, UINT32 msg,
313                               WPARAM32 wParam, LPARAM lParam )
314 {
315     DIALOGINFO * dlgInfo;
316     BOOL32 result = FALSE;
317     WND * wndPtr = WIN_FindWndPtr( hwnd );
318     
319     if (!wndPtr) return 0;
320     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
321     dlgInfo->msgResult = 0;
322
323     if (dlgInfo->dlgProc) {      /* Call dialog procedure */
324         result = CallWindowProc32A( (WNDPROC32)dlgInfo->dlgProc,
325                                             hwnd, msg, wParam, lParam );
326
327     /* Check if window was destroyed by dialog procedure */
328       if (dlgInfo->flags & DF_END && !(dlgInfo->flags & DF_ENDING)) {
329         dlgInfo->flags |= DF_ENDING;
330         DestroyWindow32( hwnd );
331       }
332     }
333
334     if (!result && IsWindow32(hwnd))
335     {
336         /* callback didn't process this message */
337
338         switch(msg)
339         {
340             case WM_ERASEBKGND:
341             case WM_SHOWWINDOW:
342             case WM_ACTIVATE:
343             case WM_SETFOCUS:
344             case DM_SETDEFID:
345             case DM_GETDEFID:
346             case WM_NEXTDLGCTL:
347             case WM_GETFONT:
348             case WM_CLOSE:
349             case WM_NCDESTROY:
350             case WM_ENTERMENULOOP:
351             case WM_LBUTTONDOWN:
352             case WM_NCLBUTTONDOWN:
353                  return DEFDLG_Proc( (HWND32)hwnd, msg,
354                                      (WPARAM32)wParam, lParam, dlgInfo );
355             case WM_INITDIALOG:
356             case WM_VKEYTOITEM:
357             case WM_COMPAREITEM:
358             case WM_CHARTOITEM:
359                  break;
360
361             default:
362                  return DefWindowProc32A( hwnd, msg, wParam, lParam );
363         }
364     }
365     return DEFDLG_Epilog(dlgInfo, msg, result);
366 }
367
368
369 /***********************************************************************
370  *           DefDlgProc32W   (USER32.121)
371  */
372 LRESULT WINAPI DefDlgProc32W( HWND32 hwnd, UINT32 msg, WPARAM32 wParam,
373                               LPARAM lParam )
374 {
375     DIALOGINFO * dlgInfo;
376     BOOL32 result = FALSE;
377     WND * wndPtr = WIN_FindWndPtr( hwnd );
378     
379     if (!wndPtr) return 0;
380     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
381     dlgInfo->msgResult = 0;
382
383     if (dlgInfo->dlgProc) {      /* Call dialog procedure */
384         result = CallWindowProc32W( (WNDPROC32)dlgInfo->dlgProc,
385                                             hwnd, msg, wParam, lParam );
386
387     /* Check if window was destroyed by dialog procedure */
388       if (dlgInfo->flags & DF_END && !(dlgInfo->flags & DF_ENDING)) {
389         dlgInfo->flags |= DF_ENDING;
390         DestroyWindow32( hwnd );
391       }
392     }
393
394     if (!result && IsWindow32(hwnd))
395     {
396         /* callback didn't process this message */
397
398         switch(msg)
399         {
400             case WM_ERASEBKGND:
401             case WM_SHOWWINDOW:
402             case WM_ACTIVATE:
403             case WM_SETFOCUS:
404             case DM_SETDEFID:
405             case DM_GETDEFID:
406             case WM_NEXTDLGCTL:
407             case WM_GETFONT:
408             case WM_CLOSE:
409             case WM_NCDESTROY:
410             case WM_ENTERMENULOOP:
411             case WM_LBUTTONDOWN:
412             case WM_NCLBUTTONDOWN:
413                  return DEFDLG_Proc( (HWND32)hwnd, msg,
414                                      (WPARAM32)wParam, lParam, dlgInfo );
415             case WM_INITDIALOG:
416             case WM_VKEYTOITEM:
417             case WM_COMPAREITEM:
418             case WM_CHARTOITEM:
419                  break;
420
421             default:
422                  return DefWindowProc32W( hwnd, msg, wParam, lParam );
423         }
424     }
425     return DEFDLG_Epilog(dlgInfo, msg, result);
426 }