Changed CreateDirectory LastError returns to match Win32 (found out by
[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                 }
219             }
220             return DefWindowProcA( hwnd, msg, wParam, lParam );
221
222         case WM_GETFONT: 
223             return dlgInfo->hUserFont;
224
225         case WM_CLOSE:
226             PostMessageA( hwnd, WM_COMMAND, IDCANCEL,
227                             (LPARAM)GetDlgItem( hwnd, IDCANCEL ) );
228             return 0;
229     }
230     return 0;
231 }
232
233 /***********************************************************************
234  *           DEFDLG_Epilog
235  */
236 static LRESULT DEFDLG_Epilog(DIALOGINFO* dlgInfo, UINT msg, BOOL 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     BOOL 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         /* 16 bit dlg procs only return BOOL16 */
267         if( WINPROC_GetProcType( dlgInfo->dlgProc ) == WIN_PROC_16 )
268             result = LOWORD(result);
269     }
270
271     if (!result && IsWindow(hwnd))
272     {
273         /* callback didn't process this message */
274
275         switch(msg)
276         {
277             case WM_ERASEBKGND:
278             case WM_SHOWWINDOW:
279             case WM_ACTIVATE:
280             case WM_SETFOCUS:
281             case DM_SETDEFID:
282             case DM_GETDEFID:
283             case WM_NEXTDLGCTL:
284             case WM_GETFONT:
285             case WM_CLOSE:
286             case WM_NCDESTROY:
287             case WM_ENTERMENULOOP:
288             case WM_LBUTTONDOWN:
289             case WM_NCLBUTTONDOWN:
290                 return DEFDLG_Proc( (HWND)hwnd, msg, 
291                                     (WPARAM)wParam, lParam, dlgInfo );
292             case WM_INITDIALOG:
293             case WM_VKEYTOITEM:
294             case WM_COMPAREITEM:
295             case WM_CHARTOITEM:
296                 break;
297
298             default:
299                 return DefWindowProc16( hwnd, msg, wParam, lParam );
300         }
301     }   
302     return DEFDLG_Epilog(dlgInfo, msg, result);
303 }
304
305
306 /***********************************************************************
307  *           DefDlgProc32A   (USER32.120)
308  */
309 LRESULT WINAPI DefDlgProcA( HWND hwnd, UINT msg,
310                               WPARAM wParam, LPARAM lParam )
311 {
312     DIALOGINFO * dlgInfo;
313     BOOL result = FALSE;
314     WND * wndPtr = WIN_FindWndPtr( hwnd );
315     
316     if (!wndPtr) return 0;
317     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
318     dlgInfo->msgResult = 0;
319
320     if (dlgInfo->dlgProc) {      /* Call dialog procedure */
321         result = CallWindowProcA( (WNDPROC)dlgInfo->dlgProc,
322                                             hwnd, msg, wParam, lParam );
323         /* 16 bit dlg procs only return BOOL16 */
324         if( WINPROC_GetProcType( dlgInfo->dlgProc ) == WIN_PROC_16 )
325             result = LOWORD(result);
326     }
327
328     if (!result && IsWindow(hwnd))
329     {
330         /* callback didn't process this message */
331
332         switch(msg)
333         {
334             case WM_ERASEBKGND:
335             case WM_SHOWWINDOW:
336             case WM_ACTIVATE:
337             case WM_SETFOCUS:
338             case DM_SETDEFID:
339             case DM_GETDEFID:
340             case WM_NEXTDLGCTL:
341             case WM_GETFONT:
342             case WM_CLOSE:
343             case WM_NCDESTROY:
344             case WM_ENTERMENULOOP:
345             case WM_LBUTTONDOWN:
346             case WM_NCLBUTTONDOWN:
347                  return DEFDLG_Proc( (HWND)hwnd, msg,
348                                      (WPARAM)wParam, lParam, dlgInfo );
349             case WM_INITDIALOG:
350             case WM_VKEYTOITEM:
351             case WM_COMPAREITEM:
352             case WM_CHARTOITEM:
353                  break;
354
355             default:
356                  return DefWindowProcA( hwnd, msg, wParam, lParam );
357         }
358     }
359     return DEFDLG_Epilog(dlgInfo, msg, result);
360 }
361
362
363 /***********************************************************************
364  *           DefDlgProc32W   (USER32.121)
365  */
366 LRESULT WINAPI DefDlgProcW( HWND hwnd, UINT msg, WPARAM wParam,
367                               LPARAM lParam )
368 {
369     DIALOGINFO * dlgInfo;
370     BOOL result = FALSE;
371     WND * wndPtr = WIN_FindWndPtr( hwnd );
372     
373     if (!wndPtr) return 0;
374     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
375     dlgInfo->msgResult = 0;
376
377     if (dlgInfo->dlgProc) {      /* Call dialog procedure */
378         result = CallWindowProcW( (WNDPROC)dlgInfo->dlgProc,
379                                             hwnd, msg, wParam, lParam );
380         /* 16 bit dlg procs only return BOOL16 */
381         if( WINPROC_GetProcType( dlgInfo->dlgProc ) == WIN_PROC_16 )
382             result = LOWORD(result);
383     }
384
385     if (!result && IsWindow(hwnd))
386     {
387         /* callback didn't process this message */
388
389         switch(msg)
390         {
391             case WM_ERASEBKGND:
392             case WM_SHOWWINDOW:
393             case WM_ACTIVATE:
394             case WM_SETFOCUS:
395             case DM_SETDEFID:
396             case DM_GETDEFID:
397             case WM_NEXTDLGCTL:
398             case WM_GETFONT:
399             case WM_CLOSE:
400             case WM_NCDESTROY:
401             case WM_ENTERMENULOOP:
402             case WM_LBUTTONDOWN:
403             case WM_NCLBUTTONDOWN:
404                  return DEFDLG_Proc( (HWND)hwnd, msg,
405                                      (WPARAM)wParam, lParam, dlgInfo );
406             case WM_INITDIALOG:
407             case WM_VKEYTOITEM:
408             case WM_COMPAREITEM:
409             case WM_CHARTOITEM:
410                  break;
411
412             default:
413                  return DefWindowProcW( hwnd, msg, wParam, lParam );
414         }
415     }
416     return DEFDLG_Epilog(dlgInfo, msg, result);
417 }