Fixed silly EINTR bug with starting dosmod.
[wine] / windows / defdlg.c
1 /*
2  * Default dialog procedure
3  *
4  * Copyright 1993, 1996 Alexandre Julliard
5  *
6  */
7
8 #include "wine/winuser16.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( HWND hwndDlg, HWND hwndCtrl )
21 {
22     HWND hwndPrev = GetFocus();
23
24     if (IsChild( 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     SetFocus( hwndCtrl );
32 }
33
34
35 /***********************************************************************
36  *           DEFDLG_SaveFocus
37  */
38 static BOOL DEFDLG_SaveFocus( HWND hwnd, DIALOGINFO *infoPtr )
39 {
40     HWND hwndFocus = GetFocus();
41
42     if (!hwndFocus || !IsChild( 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 BOOL DEFDLG_RestoreFocus( HWND hwnd, DIALOGINFO *infoPtr )
53 {
54     if (!infoPtr->hwndFocus || IsIconic(hwnd)) return FALSE;
55     if (!IsWindow( 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 HWND DEFDLG_FindDefButton( HWND hwndDlg )
69 {
70     HWND hwndChild = GetWindow( hwndDlg, GW_CHILD );
71     while (hwndChild)
72     {
73         if (SendMessage16( hwndChild, WM_GETDLGCODE, 0, 0 ) & DLGC_DEFPUSHBUTTON)
74             break;
75         hwndChild = GetWindow( 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 BOOL DEFDLG_SetDefButton( HWND hwndDlg, DIALOGINFO *dlgInfo,
87                                    HWND 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         HWND hwndOld = GetDlgItem( hwndDlg, dlgInfo->idResult );
96         if (SendMessageA( hwndOld, WM_GETDLGCODE, 0, 0) & DLGC_DEFPUSHBUTTON)
97             SendMessageA( hwndOld, BM_SETSTYLE, BS_PUSHBUTTON, TRUE );
98     }
99     if (hwndNew)
100     {
101         SendMessageA( hwndNew, BM_SETSTYLE, BS_DEFPUSHBUTTON, TRUE );
102         dlgInfo->idResult = GetDlgCtrlID( 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( HWND hwnd, UINT msg, WPARAM wParam,
116                             LPARAM lParam, DIALOGINFO *dlgInfo )
117 {
118     switch(msg)
119     {
120         case WM_ERASEBKGND:
121             FillWindow16( 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                 DeleteObject( dlgInfo->hUserFont );
138                 dlgInfo->hUserFont = 0;
139             }
140
141               /* Delete menu */
142             if (dlgInfo->hMenu)
143             {           
144                 DestroyMenu( 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 DefWindowProcA( hwnd, msg, wParam, lParam );
155
156         case WM_SHOWWINDOW:
157             if (!wParam) DEFDLG_SaveFocus( hwnd, dlgInfo );
158             return DefWindowProcA( 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 ? GetDlgItem( hwnd, wParam ) : 0 );
173             return 1;
174
175         case DM_GETDEFID:
176             {
177                 HWND 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( GetDlgCtrlID( hwndDefId ), DC_HASDEFID);
183             }
184             return 0;
185
186         case WM_NEXTDLGCTL:
187             {
188                 HWND hwndDest = (HWND)wParam;
189                 if (!lParam)
190                     hwndDest = GetNextDlgTabItem(hwnd, GetFocus(), 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                 HWND hwndFocus = GetFocus();
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_IsControl( wnd, BIC32_COMBO ) )
210                             SendMessageA( hwndFocus, CB_SHOWDROPDOWN,
211                                             FALSE, 0 );
212                         else if( WIDGETS_IsControl( wnd, BIC32_EDIT ) &&
213                                  WIDGETS_IsControl( wnd->parent,
214                                                       BIC32_COMBO ))
215                             SendMessageA( wnd->parent->hwndSelf, 
216                                             CB_SHOWDROPDOWN, FALSE, 0 );
217                     }
218                     WIN_ReleaseWndPtr(wnd);
219                 }
220             }
221             return DefWindowProcA( hwnd, msg, wParam, lParam );
222
223         case WM_GETFONT: 
224             return dlgInfo->hUserFont;
225
226         case WM_CLOSE:
227             PostMessageA( hwnd, WM_COMMAND, IDCANCEL,
228                             (LPARAM)GetDlgItem( hwnd, IDCANCEL ) );
229             return 0;
230     
231         case WM_NOTIFYFORMAT:
232             return DefWindowProcA( hwnd, msg, wParam, lParam );
233     }
234     return 0;
235 }
236
237 /***********************************************************************
238  *           DEFDLG_Epilog
239  */
240 static LRESULT DEFDLG_Epilog(DIALOGINFO* dlgInfo, UINT msg, BOOL fResult)
241 {
242     /* see SDK 3.1 */
243
244     if ((msg >= WM_CTLCOLORMSGBOX && msg <= WM_CTLCOLORSTATIC) ||
245          msg == WM_CTLCOLOR || msg == WM_COMPAREITEM ||
246          msg == WM_VKEYTOITEM || msg == WM_CHARTOITEM ||
247          msg == WM_QUERYDRAGICON || msg == WM_INITDIALOG)
248         return fResult; 
249
250     return dlgInfo->msgResult;
251 }
252
253 /***********************************************************************
254  *           DefDlgProc16   (USER.308)
255  */
256 LRESULT WINAPI DefDlgProc16( HWND16 hwnd, UINT16 msg, WPARAM16 wParam,
257                              LPARAM lParam )
258 {
259     DIALOGINFO * dlgInfo;
260     BOOL result = FALSE;
261     WND * wndPtr = WIN_FindWndPtr( hwnd );
262     
263     if (!wndPtr) return 0;
264     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
265     dlgInfo->msgResult = 0;
266
267     if (dlgInfo->dlgProc) {     /* Call dialog procedure */
268         result = CallWindowProc16( (WNDPROC16)dlgInfo->dlgProc,
269                                            hwnd, msg, wParam, lParam );
270         /* 16 bit dlg procs only return BOOL16 */
271         if( WINPROC_GetProcType( dlgInfo->dlgProc ) == WIN_PROC_16 )
272             result = LOWORD(result);
273     }
274
275     if (!result && IsWindow(hwnd))
276     {
277         /* callback didn't process this message */
278
279         switch(msg)
280         {
281             case WM_ERASEBKGND:
282             case WM_SHOWWINDOW:
283             case WM_ACTIVATE:
284             case WM_SETFOCUS:
285             case DM_SETDEFID:
286             case DM_GETDEFID:
287             case WM_NEXTDLGCTL:
288             case WM_GETFONT:
289             case WM_CLOSE:
290             case WM_NCDESTROY:
291             case WM_ENTERMENULOOP:
292             case WM_LBUTTONDOWN:
293             case WM_NCLBUTTONDOWN:
294                 WIN_ReleaseWndPtr(wndPtr);
295                 return DEFDLG_Proc( (HWND)hwnd, msg, 
296                                     (WPARAM)wParam, lParam, dlgInfo );
297             case WM_INITDIALOG:
298             case WM_VKEYTOITEM:
299             case WM_COMPAREITEM:
300             case WM_CHARTOITEM:
301                 break;
302
303             default:
304                 WIN_ReleaseWndPtr(wndPtr);
305                 return DefWindowProc16( hwnd, msg, wParam, lParam );
306         }
307     }   
308     WIN_ReleaseWndPtr(wndPtr);
309     return DEFDLG_Epilog(dlgInfo, msg, result);
310 }
311
312
313 /***********************************************************************
314  *           DefDlgProc32A   (USER32.120)
315  */
316 LRESULT WINAPI DefDlgProcA( HWND hwnd, UINT msg,
317                               WPARAM wParam, LPARAM lParam )
318 {
319     DIALOGINFO * dlgInfo;
320     BOOL result = FALSE;
321     WND * wndPtr = WIN_FindWndPtr( hwnd );
322     
323     if (!wndPtr) return 0;
324     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
325     dlgInfo->msgResult = 0;
326
327     if (dlgInfo->dlgProc) {      /* Call dialog procedure */
328         result = CallWindowProcA( (WNDPROC)dlgInfo->dlgProc,
329                                             hwnd, msg, wParam, lParam );
330         /* 16 bit dlg procs only return BOOL16 */
331         if( WINPROC_GetProcType( dlgInfo->dlgProc ) == WIN_PROC_16 )
332             result = LOWORD(result);
333     }
334
335     if (!result && IsWindow(hwnd))
336     {
337         /* callback didn't process this message */
338
339         switch(msg)
340         {
341             case WM_ERASEBKGND:
342             case WM_SHOWWINDOW:
343             case WM_ACTIVATE:
344             case WM_SETFOCUS:
345             case DM_SETDEFID:
346             case DM_GETDEFID:
347             case WM_NEXTDLGCTL:
348             case WM_GETFONT:
349             case WM_CLOSE:
350             case WM_NCDESTROY:
351             case WM_ENTERMENULOOP:
352             case WM_LBUTTONDOWN:
353             case WM_NCLBUTTONDOWN:
354                  WIN_ReleaseWndPtr(wndPtr);
355                  return DEFDLG_Proc( (HWND)hwnd, msg,
356                                      (WPARAM)wParam, lParam, dlgInfo );
357             case WM_INITDIALOG:
358             case WM_VKEYTOITEM:
359             case WM_COMPAREITEM:
360             case WM_CHARTOITEM:
361                  break;
362
363             default:
364                  WIN_ReleaseWndPtr(wndPtr);
365                  return DefWindowProcA( hwnd, msg, wParam, lParam );
366         }
367     }
368     WIN_ReleaseWndPtr(wndPtr);
369     return DEFDLG_Epilog(dlgInfo, msg, result);
370 }
371
372
373 /***********************************************************************
374  *           DefDlgProc32W   (USER32.121)
375  */
376 LRESULT WINAPI DefDlgProcW( HWND hwnd, UINT msg, WPARAM wParam,
377                               LPARAM lParam )
378 {
379     DIALOGINFO * dlgInfo;
380     BOOL result = FALSE;
381     WND * wndPtr = WIN_FindWndPtr( hwnd );
382     
383     if (!wndPtr) return 0;
384     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
385     dlgInfo->msgResult = 0;
386
387     if (dlgInfo->dlgProc) {      /* Call dialog procedure */
388         result = CallWindowProcW( (WNDPROC)dlgInfo->dlgProc,
389                                             hwnd, msg, wParam, lParam );
390         /* 16 bit dlg procs only return BOOL16 */
391         if( WINPROC_GetProcType( dlgInfo->dlgProc ) == WIN_PROC_16 )
392             result = LOWORD(result);
393     }
394
395     if (!result && IsWindow(hwnd))
396     {
397         /* callback didn't process this message */
398
399         switch(msg)
400         {
401             case WM_ERASEBKGND:
402             case WM_SHOWWINDOW:
403             case WM_ACTIVATE:
404             case WM_SETFOCUS:
405             case DM_SETDEFID:
406             case DM_GETDEFID:
407             case WM_NEXTDLGCTL:
408             case WM_GETFONT:
409             case WM_CLOSE:
410             case WM_NCDESTROY:
411             case WM_ENTERMENULOOP:
412             case WM_LBUTTONDOWN:
413             case WM_NCLBUTTONDOWN:
414                  WIN_ReleaseWndPtr(wndPtr);
415                  return DEFDLG_Proc( (HWND)hwnd, msg,
416                                      (WPARAM)wParam, lParam, dlgInfo );
417             case WM_INITDIALOG:
418             case WM_VKEYTOITEM:
419             case WM_COMPAREITEM:
420             case WM_CHARTOITEM:
421                  break;
422
423             default:
424                  WIN_ReleaseWndPtr(wndPtr);
425                  return DefWindowProcW( hwnd, msg, wParam, lParam );
426         }
427     }
428     WIN_ReleaseWndPtr(wndPtr);
429     return DEFDLG_Epilog(dlgInfo, msg, result);
430 }