Sync up to trunk head.
[reactos.git] / dll / win32 / comdlg32 / filedlg.c
1 /*
2 * COMMDLG - File Open Dialogs Win95 look and feel
3 *
4 * Copyright 1999 Francois Boisvert
5 * Copyright 1999, 2000 Juergen Schmied
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 * FIXME: The whole concept of handling unicode is badly broken.
22 * many hook-messages expect a pointer to a
23 * OPENFILENAMEA or W structure. With the current architecture
24 * we would have to convert the beast at every call to a hook.
25 * we have to find a better solution but it would likely cause
26 * a complete rewrite after which we should handle the
27 * OPENFILENAME structure without any converting (jsch).
28 *
29 * FIXME: any hook gets a OPENFILENAMEA structure
30 *
31 * FIXME: CDN_FILEOK is wrong implemented, other CDN_ messages likely too
32 *
33 * FIXME: old style hook messages are not implemented (except FILEOKSTRING)
34 *
35 * FIXME: algorithm for selecting the initial directory is too simple
36 *
37 * FIXME: add to recent docs
38 *
39 * FIXME: flags not implemented: OFN_DONTADDTORECENT,
40 * OFN_NODEREFERENCELINKS, OFN_NOREADONLYRETURN,
41 * OFN_NOTESTFILECREATE, OFN_USEMONIKERS
42 *
43 * FIXME: lCustData for lpfnHook (WM_INITDIALOG)
44 *
45 *
46 */
47
48 #include "config.h"
49 #include "wine/port.h"
50
51 #include <ctype.h>
52 #include <stdlib.h>
53 #include <stdarg.h>
54 #include <stdio.h>
55 #include <string.h>
56
57 #define COBJMACROS
58 #define NONAMELESSUNION
59 #define NONAMELESSSTRUCT
60
61 #include "windef.h"
62 #include "winbase.h"
63 #include "winternl.h"
64 #include "winnls.h"
65 #include "wingdi.h"
66 #include "winreg.h"
67 #include "winuser.h"
68 #include "commdlg.h"
69 #include "dlgs.h"
70 #include "cdlg.h"
71 #include "filedlg31.h"
72 #include "cderr.h"
73 #include "shellapi.h"
74 #include "shlobj.h"
75 #include "filedlgbrowser.h"
76 #include "shlwapi.h"
77
78 #include "wine/unicode.h"
79 #include "wine/debug.h"
80
81 WINE_DEFAULT_DEBUG_CHANNEL(commdlg);
82
83 #define UNIMPLEMENTED_FLAGS \
84 (OFN_DONTADDTORECENT |\
85 OFN_NODEREFERENCELINKS | OFN_NOREADONLYRETURN |\
86 OFN_NOTESTFILECREATE /*| OFN_USEMONIKERS*/)
87
88 #define IsHooked(fodInfos) \
89 ((fodInfos->ofnInfos->Flags & OFN_ENABLEHOOK) && fodInfos->ofnInfos->lpfnHook)
90 /***********************************************************************
91 * Data structure and global variables
92 */
93 typedef struct SFolder
94 {
95 int m_iImageIndex; /* Index of picture in image list */
96 HIMAGELIST hImgList;
97 int m_iIndent; /* Indentation index */
98 LPITEMIDLIST pidlItem; /* absolute pidl of the item */
99
100 } SFOLDER,*LPSFOLDER;
101
102 typedef struct tagLookInInfo
103 {
104 int iMaxIndentation;
105 UINT uSelectedItem;
106 } LookInInfos;
107
108
109 /***********************************************************************
110 * Defines and global variables
111 */
112
113 /* Draw item constant */
114 #define ICONWIDTH 18
115 #define XTEXTOFFSET 3
116
117 /* AddItem flags*/
118 #define LISTEND -1
119
120 /* SearchItem methods */
121 #define SEARCH_PIDL 1
122 #define SEARCH_EXP 2
123 #define ITEM_NOTFOUND -1
124
125 /* Undefined windows message sent by CreateViewObject*/
126 #define WM_GETISHELLBROWSER WM_USER+7
127
128 /* NOTE
129 * Those macros exist in windowsx.h. However, you can't really use them since
130 * they rely on the UNICODE defines and can't be used inside Wine itself.
131 */
132
133 /* Combo box macros */
134 #define CBAddString(hwnd,str) \
135 SendMessageW(hwnd, CB_ADDSTRING, 0, (LPARAM)(str));
136
137 #define CBInsertString(hwnd,str,pos) \
138 SendMessageW(hwnd, CB_INSERTSTRING, (WPARAM)(pos), (LPARAM)(str));
139
140 #define CBDeleteString(hwnd,pos) \
141 SendMessageW(hwnd, CB_DELETESTRING, (WPARAM)(pos), 0);
142
143 #define CBSetItemDataPtr(hwnd,iItemId,dataPtr) \
144 SendMessageW(hwnd, CB_SETITEMDATA, (WPARAM)(iItemId), (LPARAM)(dataPtr));
145
146 #define CBGetItemDataPtr(hwnd,iItemId) \
147 SendMessageW(hwnd, CB_GETITEMDATA, (WPARAM)(iItemId), 0)
148
149 #define CBGetLBText(hwnd,iItemId,str) \
150 SendMessageW(hwnd, CB_GETLBTEXT, (WPARAM)(iItemId), (LPARAM)(str));
151
152 #define CBGetCurSel(hwnd) \
153 SendMessageW(hwnd, CB_GETCURSEL, 0, 0);
154
155 #define CBSetCurSel(hwnd,pos) \
156 SendMessageW(hwnd, CB_SETCURSEL, (WPARAM)(pos), 0);
157
158 #define CBGetCount(hwnd) \
159 SendMessageW(hwnd, CB_GETCOUNT, 0, 0);
160 #define CBShowDropDown(hwnd,show) \
161 SendMessageW(hwnd, CB_SHOWDROPDOWN, (WPARAM)(show), 0);
162 #define CBSetItemHeight(hwnd,index,height) \
163 SendMessageW(hwnd, CB_SETITEMHEIGHT, (WPARAM)(index), (LPARAM)(height));
164
165 #define CBSetExtendedUI(hwnd,flag) \
166 SendMessageW(hwnd, CB_SETEXTENDEDUI, (WPARAM)(flag), 0)
167
168 const char FileOpenDlgInfosStr[] = "FileOpenDlgInfos"; /* windows property description string */
169 static const char LookInInfosStr[] = "LookInInfos"; /* LOOKIN combo box property */
170 static SIZE MemDialogSize = { 0, 0}; /* keep size of the (resizable) dialog */
171
172 /***********************************************************************
173 * Prototypes
174 */
175
176 /* Internal functions used by the dialog */
177 static LRESULT FILEDLG95_ResizeControls(HWND hwnd, WPARAM wParam, LPARAM lParam);
178 static LRESULT FILEDLG95_FillControls(HWND hwnd, WPARAM wParam, LPARAM lParam);
179 static LRESULT FILEDLG95_OnWMCommand(HWND hwnd, WPARAM wParam);
180 static LRESULT FILEDLG95_OnWMGetIShellBrowser(HWND hwnd);
181 static BOOL FILEDLG95_OnOpen(HWND hwnd);
182 static LRESULT FILEDLG95_InitControls(HWND hwnd);
183 static void FILEDLG95_Clean(HWND hwnd);
184
185 /* Functions used by the shell navigation */
186 static LRESULT FILEDLG95_SHELL_Init(HWND hwnd);
187 static BOOL FILEDLG95_SHELL_UpFolder(HWND hwnd);
188 static BOOL FILEDLG95_SHELL_ExecuteCommand(HWND hwnd, LPCSTR lpVerb);
189 static void FILEDLG95_SHELL_Clean(HWND hwnd);
190 static BOOL FILEDLG95_SHELL_BrowseToDesktop(HWND hwnd);
191
192 /* Functions used by the EDIT box */
193 static int FILEDLG95_FILENAME_GetFileNames (HWND hwnd, LPWSTR * lpstrFileList, UINT * sizeUsed);
194
195 /* Functions used by the filetype combo box */
196 static HRESULT FILEDLG95_FILETYPE_Init(HWND hwnd);
197 static BOOL FILEDLG95_FILETYPE_OnCommand(HWND hwnd, WORD wNotifyCode);
198 static int FILEDLG95_FILETYPE_SearchExt(HWND hwnd,LPCWSTR lpstrExt);
199 static void FILEDLG95_FILETYPE_Clean(HWND hwnd);
200
201 /* Functions used by the Look In combo box */
202 static void FILEDLG95_LOOKIN_Init(HWND hwndCombo);
203 static LRESULT FILEDLG95_LOOKIN_DrawItem(LPDRAWITEMSTRUCT pDIStruct);
204 static BOOL FILEDLG95_LOOKIN_OnCommand(HWND hwnd, WORD wNotifyCode);
205 static int FILEDLG95_LOOKIN_AddItem(HWND hwnd,LPITEMIDLIST pidl, int iInsertId);
206 static int FILEDLG95_LOOKIN_SearchItem(HWND hwnd,WPARAM searchArg,int iSearchMethod);
207 static int FILEDLG95_LOOKIN_InsertItemAfterParent(HWND hwnd,LPITEMIDLIST pidl);
208 static int FILEDLG95_LOOKIN_RemoveMostExpandedItem(HWND hwnd);
209 int FILEDLG95_LOOKIN_SelectItem(HWND hwnd,LPITEMIDLIST pidl);
210 static void FILEDLG95_LOOKIN_Clean(HWND hwnd);
211
212 /* Miscellaneous tool functions */
213 static HRESULT GetName(LPSHELLFOLDER lpsf, LPITEMIDLIST pidl,DWORD dwFlags,LPWSTR lpstrFileName);
214 IShellFolder* GetShellFolderFromPidl(LPITEMIDLIST pidlAbs);
215 LPITEMIDLIST GetParentPidl(LPITEMIDLIST pidl);
216 static LPITEMIDLIST GetPidlFromName(IShellFolder *psf,LPWSTR lpcstrFileName);
217 static BOOL IsPidlFolder (LPSHELLFOLDER psf, LPCITEMIDLIST pidl);
218 static UINT GetNumSelected( IDataObject *doSelected );
219
220 /* Shell memory allocation */
221 static void *MemAlloc(UINT size);
222 static void MemFree(void *mem);
223
224 static INT_PTR CALLBACK FileOpenDlgProc95(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
225 static INT_PTR FILEDLG95_HandleCustomDialogMessages(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
226 static BOOL FILEDLG95_OnOpenMultipleFiles(HWND hwnd, LPWSTR lpstrFileList, UINT nFileCount, UINT sizeUsed);
227 static BOOL BrowseSelectedFolder(HWND hwnd);
228
229 /***********************************************************************
230 * GetFileName95
231 *
232 * Creates an Open common dialog box that lets the user select
233 * the drive, directory, and the name of a file or set of files to open.
234 *
235 * IN : The FileOpenDlgInfos structure associated with the dialog
236 * OUT : TRUE on success
237 * FALSE on cancel, error, close or filename-does-not-fit-in-buffer.
238 */
239 static BOOL GetFileName95(FileOpenDlgInfos *fodInfos)
240 {
241
242 LRESULT lRes;
243 LPVOID template;
244 HRSRC hRes;
245 HANDLE hDlgTmpl = 0;
246 HRESULT hr;
247
248 /* test for missing functionality */
249 if (fodInfos->ofnInfos->Flags & UNIMPLEMENTED_FLAGS)
250 {
251 FIXME("Flags 0x%08x not yet implemented\n",
252 fodInfos->ofnInfos->Flags & UNIMPLEMENTED_FLAGS);
253 }
254
255 /* Create the dialog from a template */
256
257 if(!(hRes = FindResourceW(COMDLG32_hInstance,MAKEINTRESOURCEW(NEWFILEOPENORD),(LPCWSTR)RT_DIALOG)))
258 {
259 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE);
260 return FALSE;
261 }
262 if (!(hDlgTmpl = LoadResource(COMDLG32_hInstance, hRes )) ||
263 !(template = LockResource( hDlgTmpl )))
264 {
265 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
266 return FALSE;
267 }
268
269 /* msdn: explorer style dialogs permit sizing by default.
270 * The OFN_ENABLESIZING flag is only needed when a hook or
271 * custom tmeplate is provided */
272 if( (fodInfos->ofnInfos->Flags & OFN_EXPLORER) &&
273 !(fodInfos->ofnInfos->Flags & ( OFN_ENABLEHOOK | OFN_ENABLETEMPLATE | OFN_ENABLETEMPLATEHANDLE)))
274 fodInfos->ofnInfos->Flags |= OFN_ENABLESIZING;
275
276 if (fodInfos->ofnInfos->Flags & OFN_ENABLESIZING)
277 {
278 ((LPDLGTEMPLATEW)template)->style |= WS_SIZEBOX;
279 fodInfos->sizedlg.cx = fodInfos->sizedlg.cy = 0;
280 fodInfos->initial_size.x = fodInfos->initial_size.y = 0;
281 }
282 else
283 ((LPDLGTEMPLATEW)template)->style &= ~WS_SIZEBOX;
284
285
286 /* old style hook messages */
287 if (IsHooked(fodInfos))
288 {
289 fodInfos->HookMsg.fileokstring = RegisterWindowMessageW(FILEOKSTRINGW);
290 fodInfos->HookMsg.lbselchstring = RegisterWindowMessageW(LBSELCHSTRINGW);
291 fodInfos->HookMsg.helpmsgstring = RegisterWindowMessageW(HELPMSGSTRINGW);
292 fodInfos->HookMsg.sharevistring = RegisterWindowMessageW(SHAREVISTRINGW);
293 }
294
295 /* Some shell namespace extensions depend on COM being initialized. */
296 hr = OleInitialize(NULL);
297
298 if (fodInfos->unicode)
299 lRes = DialogBoxIndirectParamW(COMDLG32_hInstance,
300 template,
301 fodInfos->ofnInfos->hwndOwner,
302 FileOpenDlgProc95,
303 (LPARAM) fodInfos);
304 else
305 lRes = DialogBoxIndirectParamA(COMDLG32_hInstance,
306 template,
307 fodInfos->ofnInfos->hwndOwner,
308 FileOpenDlgProc95,
309 (LPARAM) fodInfos);
310 if (SUCCEEDED(hr))
311 OleUninitialize();
312
313 /* Unable to create the dialog */
314 if( lRes == -1)
315 return FALSE;
316
317 return lRes;
318 }
319
320 /***********************************************************************
321 * GetFileDialog95A
322 *
323 * Call GetFileName95 with this structure and clean the memory.
324 *
325 * IN : The OPENFILENAMEA initialisation structure passed to
326 * GetOpenFileNameA win api function (see filedlg.c)
327 */
328 static BOOL GetFileDialog95A(LPOPENFILENAMEA ofn,UINT iDlgType)
329 {
330 BOOL ret;
331 FileOpenDlgInfos fodInfos;
332 LPSTR lpstrSavDir = NULL;
333 LPWSTR title = NULL;
334 LPWSTR defext = NULL;
335 LPWSTR filter = NULL;
336 LPWSTR customfilter = NULL;
337
338 /* Initialize CommDlgExtendedError() */
339 COMDLG32_SetCommDlgExtendedError(0);
340
341 /* Initialize FileOpenDlgInfos structure */
342 ZeroMemory(&fodInfos, sizeof(FileOpenDlgInfos));
343
344 /* Pass in the original ofn */
345 fodInfos.ofnInfos = (LPOPENFILENAMEW)ofn;
346
347 /* save current directory */
348 if (ofn->Flags & OFN_NOCHANGEDIR)
349 {
350 lpstrSavDir = MemAlloc(MAX_PATH);
351 GetCurrentDirectoryA(MAX_PATH, lpstrSavDir);
352 }
353
354 fodInfos.unicode = FALSE;
355
356 /* convert all the input strings to unicode */
357 if(ofn->lpstrInitialDir)
358 {
359 DWORD len = MultiByteToWideChar( CP_ACP, 0, ofn->lpstrInitialDir, -1, NULL, 0 );
360 fodInfos.initdir = MemAlloc((len+1)*sizeof(WCHAR));
361 MultiByteToWideChar( CP_ACP, 0, ofn->lpstrInitialDir, -1, fodInfos.initdir, len);
362 }
363 else
364 fodInfos.initdir = NULL;
365
366 if(ofn->lpstrFile)
367 {
368 fodInfos.filename = MemAlloc(ofn->nMaxFile*sizeof(WCHAR));
369 MultiByteToWideChar( CP_ACP, 0, ofn->lpstrFile, -1, fodInfos.filename, ofn->nMaxFile);
370 }
371 else
372 fodInfos.filename = NULL;
373
374 if(ofn->lpstrDefExt)
375 {
376 DWORD len = MultiByteToWideChar( CP_ACP, 0, ofn->lpstrDefExt, -1, NULL, 0 );
377 defext = MemAlloc((len+1)*sizeof(WCHAR));
378 MultiByteToWideChar( CP_ACP, 0, ofn->lpstrDefExt, -1, defext, len);
379 }
380 fodInfos.defext = defext;
381
382 if(ofn->lpstrTitle)
383 {
384 DWORD len = MultiByteToWideChar( CP_ACP, 0, ofn->lpstrTitle, -1, NULL, 0 );
385 title = MemAlloc((len+1)*sizeof(WCHAR));
386 MultiByteToWideChar( CP_ACP, 0, ofn->lpstrTitle, -1, title, len);
387 }
388 fodInfos.title = title;
389
390 if (ofn->lpstrFilter)
391 {
392 LPCSTR s;
393 int n, len;
394
395 /* filter is a list... title\0ext\0......\0\0 */
396 s = ofn->lpstrFilter;
397 while (*s) s = s+strlen(s)+1;
398 s++;
399 n = s - ofn->lpstrFilter;
400 len = MultiByteToWideChar( CP_ACP, 0, ofn->lpstrFilter, n, NULL, 0 );
401 filter = MemAlloc(len*sizeof(WCHAR));
402 MultiByteToWideChar( CP_ACP, 0, ofn->lpstrFilter, n, filter, len );
403 }
404 fodInfos.filter = filter;
405
406 /* convert lpstrCustomFilter */
407 if (ofn->lpstrCustomFilter)
408 {
409 LPCSTR s;
410 int n, len;
411
412 /* customfilter contains a pair of strings... title\0ext\0 */
413 s = ofn->lpstrCustomFilter;
414 if (*s) s = s+strlen(s)+1;
415 if (*s) s = s+strlen(s)+1;
416 n = s - ofn->lpstrCustomFilter;
417 len = MultiByteToWideChar( CP_ACP, 0, ofn->lpstrCustomFilter, n, NULL, 0 );
418 customfilter = MemAlloc(len*sizeof(WCHAR));
419 MultiByteToWideChar( CP_ACP, 0, ofn->lpstrCustomFilter, n, customfilter, len );
420 }
421 fodInfos.customfilter = customfilter;
422
423 /* Initialize the dialog property */
424 fodInfos.DlgInfos.dwDlgProp = 0;
425 fodInfos.DlgInfos.hwndCustomDlg = NULL;
426
427 switch(iDlgType)
428 {
429 case OPEN_DIALOG :
430 ret = GetFileName95(&fodInfos);
431 break;
432 case SAVE_DIALOG :
433 fodInfos.DlgInfos.dwDlgProp |= FODPROP_SAVEDLG;
434 ret = GetFileName95(&fodInfos);
435 break;
436 default :
437 ret = 0;
438 }
439
440 if (lpstrSavDir)
441 {
442 SetCurrentDirectoryA(lpstrSavDir);
443 MemFree(lpstrSavDir);
444 }
445
446 MemFree(title);
447 MemFree(defext);
448 MemFree(filter);
449 MemFree(customfilter);
450 MemFree(fodInfos.initdir);
451 MemFree(fodInfos.filename);
452
453 TRACE("selected file: %s\n",ofn->lpstrFile);
454
455 return ret;
456 }
457
458 /***********************************************************************
459 * GetFileDialog95W
460 *
461 * Copy the OPENFILENAMEW structure in a FileOpenDlgInfos structure.
462 * Call GetFileName95 with this structure and clean the memory.
463 *
464 */
465 static BOOL GetFileDialog95W(LPOPENFILENAMEW ofn,UINT iDlgType)
466 {
467 BOOL ret;
468 FileOpenDlgInfos fodInfos;
469 LPWSTR lpstrSavDir = NULL;
470
471 /* Initialize CommDlgExtendedError() */
472 COMDLG32_SetCommDlgExtendedError(0);
473
474 /* Initialize FileOpenDlgInfos structure */
475 ZeroMemory(&fodInfos, sizeof(FileOpenDlgInfos));
476
477 /* Pass in the original ofn */
478 fodInfos.ofnInfos = ofn;
479
480 fodInfos.title = ofn->lpstrTitle;
481 fodInfos.defext = ofn->lpstrDefExt;
482 fodInfos.filter = ofn->lpstrFilter;
483 fodInfos.customfilter = ofn->lpstrCustomFilter;
484
485 /* convert string arguments, save others */
486 if(ofn->lpstrFile)
487 {
488 fodInfos.filename = MemAlloc(ofn->nMaxFile*sizeof(WCHAR));
489 lstrcpynW(fodInfos.filename,ofn->lpstrFile,ofn->nMaxFile);
490 }
491 else
492 fodInfos.filename = NULL;
493
494 if(ofn->lpstrInitialDir)
495 {
496 /* fodInfos.initdir = strdupW(ofn->lpstrInitialDir); */
497 DWORD len = lstrlenW(ofn->lpstrInitialDir)+1;
498 fodInfos.initdir = MemAlloc(len*sizeof(WCHAR));
499 memcpy(fodInfos.initdir,ofn->lpstrInitialDir,len*sizeof(WCHAR));
500 }
501 else
502 fodInfos.initdir = NULL;
503
504 /* save current directory */
505 if (ofn->Flags & OFN_NOCHANGEDIR)
506 {
507 lpstrSavDir = MemAlloc(MAX_PATH*sizeof(WCHAR));
508 GetCurrentDirectoryW(MAX_PATH, lpstrSavDir);
509 }
510
511 fodInfos.unicode = TRUE;
512
513 switch(iDlgType)
514 {
515 case OPEN_DIALOG :
516 ret = GetFileName95(&fodInfos);
517 break;
518 case SAVE_DIALOG :
519 fodInfos.DlgInfos.dwDlgProp |= FODPROP_SAVEDLG;
520 ret = GetFileName95(&fodInfos);
521 break;
522 default :
523 ret = 0;
524 }
525
526 if (lpstrSavDir)
527 {
528 SetCurrentDirectoryW(lpstrSavDir);
529 MemFree(lpstrSavDir);
530 }
531
532 /* restore saved IN arguments and convert OUT arguments back */
533 MemFree(fodInfos.filename);
534 MemFree(fodInfos.initdir);
535 return ret;
536 }
537
538 /******************************************************************************
539 * COMDLG32_GetDisplayNameOf [internal]
540 *
541 * Helper function to get the display name for a pidl.
542 */
543 static BOOL COMDLG32_GetDisplayNameOf(LPCITEMIDLIST pidl, LPWSTR pwszPath) {
544 LPSHELLFOLDER psfDesktop;
545 STRRET strret;
546
547 if (FAILED(SHGetDesktopFolder(&psfDesktop)))
548 return FALSE;
549
550 if (FAILED(IShellFolder_GetDisplayNameOf(psfDesktop, pidl, SHGDN_FORPARSING, &strret))) {
551 IShellFolder_Release(psfDesktop);
552 return FALSE;
553 }
554
555 IShellFolder_Release(psfDesktop);
556 return SUCCEEDED(StrRetToBufW(&strret, pidl, pwszPath, MAX_PATH));
557 }
558
559 /***********************************************************************
560 * ArrangeCtrlPositions [internal]
561 *
562 * NOTE: Make sure to add testcases for any changes made here.
563 */
564 static void ArrangeCtrlPositions(HWND hwndChildDlg, HWND hwndParentDlg, BOOL hide_help)
565 {
566 HWND hwndChild, hwndStc32;
567 RECT rectParent, rectChild, rectStc32;
568 INT help_fixup = 0;
569 int chgx, chgy;
570
571 /* Take into account if open as read only checkbox and help button
572 * are hidden
573 */
574 if (hide_help)
575 {
576 RECT rectHelp, rectCancel;
577 GetWindowRect(GetDlgItem(hwndParentDlg, pshHelp), &rectHelp);
578 GetWindowRect(GetDlgItem(hwndParentDlg, IDCANCEL), &rectCancel);
579 /* subtract the height of the help button plus the space between
580 * the help button and the cancel button to the height of the dialog
581 */
582 help_fixup = rectHelp.bottom - rectCancel.bottom;
583 }
584
585 /*
586 There are two possibilities to add components to the default file dialog box.
587
588 By default, all the new components are added below the standard dialog box (the else case).
589
590 However, if there is a static text component with the stc32 id, a special case happens.
591 The x and y coordinates of stc32 indicate the top left corner where to place the standard file dialog box
592 in the window and the cx and cy indicate how to size the window.
593 Moreover, if the new component's coordinates are on the left of the stc32 , it is placed on the left
594 of the standard file dialog box. If they are above the stc32 component, it is placed above and so on....
595
596 */
597
598 GetClientRect(hwndParentDlg, &rectParent);
599
600 /* when arranging controls we have to use fixed parent size */
601 rectParent.bottom -= help_fixup;
602
603 hwndStc32 = GetDlgItem(hwndChildDlg, stc32);
604 if (hwndStc32)
605 {
606 GetWindowRect(hwndStc32, &rectStc32);
607 MapWindowPoints(0, hwndChildDlg, (LPPOINT)&rectStc32, 2);
608
609 /* set the size of the stc32 control according to the size of
610 * client area of the parent dialog
611 */
612 SetWindowPos(hwndStc32, 0,
613 0, 0,
614 rectParent.right, rectParent.bottom,
615 SWP_NOMOVE | SWP_NOZORDER);
616 }
617 else
618 SetRectEmpty(&rectStc32);
619
620 /* this part moves controls of the child dialog */
621 hwndChild = GetWindow(hwndChildDlg, GW_CHILD);
622 while (hwndChild)
623 {
624 if (hwndChild != hwndStc32)
625 {
626 GetWindowRect(hwndChild, &rectChild);
627 MapWindowPoints(0, hwndChildDlg, (LPPOINT)&rectChild, 2);
628
629 /* move only if stc32 exist */
630 if (hwndStc32 && rectChild.left > rectStc32.right)
631 {
632 /* move to the right of visible controls of the parent dialog */
633 rectChild.left += rectParent.right;
634 rectChild.left -= rectStc32.right;
635 }
636 /* move even if stc32 doesn't exist */
637 if (rectChild.top >= rectStc32.bottom)
638 {
639 /* move below visible controls of the parent dialog */
640 rectChild.top += rectParent.bottom;
641 rectChild.top -= rectStc32.bottom - rectStc32.top;
642 }
643
644 SetWindowPos(hwndChild, 0, rectChild.left, rectChild.top,
645 0, 0, SWP_NOSIZE | SWP_NOZORDER);
646 }
647 hwndChild = GetWindow(hwndChild, GW_HWNDNEXT);
648 }
649
650 /* this part moves controls of the parent dialog */
651 hwndChild = GetWindow(hwndParentDlg, GW_CHILD);
652 while (hwndChild)
653 {
654 if (hwndChild != hwndChildDlg)
655 {
656 GetWindowRect(hwndChild, &rectChild);
657 MapWindowPoints(0, hwndParentDlg, (LPPOINT)&rectChild, 2);
658
659 /* left,top of stc32 marks the position of controls
660 * from the parent dialog
661 */
662 rectChild.left += rectStc32.left;
663 rectChild.top += rectStc32.top;
664
665 SetWindowPos(hwndChild, 0, rectChild.left, rectChild.top,
666 0, 0, SWP_NOSIZE | SWP_NOZORDER);
667 }
668 hwndChild = GetWindow(hwndChild, GW_HWNDNEXT);
669 }
670
671 /* calculate the size of the resulting dialog */
672
673 /* here we have to use original parent size */
674 GetClientRect(hwndParentDlg, &rectParent);
675 GetClientRect(hwndChildDlg, &rectChild);
676 TRACE( "parent %s child %s stc32 %s\n", wine_dbgstr_rect( &rectParent),
677 wine_dbgstr_rect( &rectChild), wine_dbgstr_rect( &rectStc32));
678
679 if (hwndStc32)
680 {
681 /* width */
682 if (rectParent.right > rectStc32.right - rectStc32.left)
683 chgx = rectChild.right - ( rectStc32.right - rectStc32.left);
684 else
685 chgx = rectChild.right - rectParent.right;
686 /* height */
687 if (rectParent.bottom > rectStc32.bottom - rectStc32.top)
688 chgy = rectChild.bottom - ( rectStc32.bottom - rectStc32.top) - help_fixup;
689 else
690 /* Unconditionally set new dialog
691 * height to that of the child
692 */
693 chgy = rectChild.bottom - rectParent.bottom;
694 }
695 else
696 {
697 chgx = 0;
698 chgy = rectChild.bottom - help_fixup;
699 }
700 /* set the size of the parent dialog */
701 GetWindowRect(hwndParentDlg, &rectParent);
702 SetWindowPos(hwndParentDlg, 0,
703 0, 0,
704 rectParent.right - rectParent.left + chgx,
705 rectParent.bottom - rectParent.top + chgy,
706 SWP_NOMOVE | SWP_NOZORDER);
707 }
708
709 static INT_PTR CALLBACK FileOpenDlgProcUserTemplate(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
710 {
711 switch(uMsg) {
712 case WM_INITDIALOG:
713 return TRUE;
714 }
715 return FALSE;
716 }
717
718 static HWND CreateTemplateDialog(FileOpenDlgInfos *fodInfos, HWND hwnd)
719 {
720 LPCVOID template;
721 HRSRC hRes;
722 HANDLE hDlgTmpl = 0;
723 HWND hChildDlg = 0;
724
725 TRACE("\n");
726
727 /*
728 * If OFN_ENABLETEMPLATEHANDLE is specified, the OPENFILENAME
729 * structure's hInstance parameter is not a HINSTANCE, but
730 * instead a pointer to a template resource to use.
731 */
732 if (fodInfos->ofnInfos->Flags & (OFN_ENABLETEMPLATE | OFN_ENABLETEMPLATEHANDLE))
733 {
734 HINSTANCE hinst;
735 if (fodInfos->ofnInfos->Flags & OFN_ENABLETEMPLATEHANDLE)
736 {
737 hinst = COMDLG32_hInstance;
738 if( !(template = LockResource( fodInfos->ofnInfos->hInstance)))
739 {
740 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
741 return NULL;
742 }
743 }
744 else
745 {
746 hinst = fodInfos->ofnInfos->hInstance;
747 if(fodInfos->unicode)
748 {
749 LPOPENFILENAMEW ofn = fodInfos->ofnInfos;
750 hRes = FindResourceW( hinst, ofn->lpTemplateName, (LPWSTR)RT_DIALOG);
751 }
752 else
753 {
754 LPOPENFILENAMEA ofn = (LPOPENFILENAMEA)fodInfos->ofnInfos;
755 hRes = FindResourceA( hinst, ofn->lpTemplateName, (LPSTR)RT_DIALOG);
756 }
757 if (!hRes)
758 {
759 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE);
760 return NULL;
761 }
762 if (!(hDlgTmpl = LoadResource( hinst, hRes )) ||
763 !(template = LockResource( hDlgTmpl )))
764 {
765 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
766 return NULL;
767 }
768 }
769 if (fodInfos->unicode)
770 hChildDlg = CreateDialogIndirectParamW(hinst, template, hwnd,
771 IsHooked(fodInfos) ? (DLGPROC)fodInfos->ofnInfos->lpfnHook : FileOpenDlgProcUserTemplate,
772 (LPARAM)fodInfos->ofnInfos);
773 else
774 hChildDlg = CreateDialogIndirectParamA(hinst, template, hwnd,
775 IsHooked(fodInfos) ? (DLGPROC)fodInfos->ofnInfos->lpfnHook : FileOpenDlgProcUserTemplate,
776 (LPARAM)fodInfos->ofnInfos);
777 return hChildDlg;
778 }
779 else if( IsHooked(fodInfos))
780 {
781 RECT rectHwnd;
782 struct {
783 DLGTEMPLATE tmplate;
784 WORD menu,class,title;
785 } temp;
786 GetClientRect(hwnd,&rectHwnd);
787 temp.tmplate.style = WS_CHILD | WS_CLIPSIBLINGS | WS_VISIBLE | DS_CONTROL | DS_3DLOOK;
788 temp.tmplate.dwExtendedStyle = 0;
789 temp.tmplate.cdit = 0;
790 temp.tmplate.x = 0;
791 temp.tmplate.y = 0;
792 temp.tmplate.cx = 0;
793 temp.tmplate.cy = 0;
794 temp.menu = temp.class = temp.title = 0;
795
796 hChildDlg = CreateDialogIndirectParamA(COMDLG32_hInstance, &temp.tmplate,
797 hwnd, (DLGPROC)fodInfos->ofnInfos->lpfnHook, (LPARAM)fodInfos->ofnInfos);
798
799 return hChildDlg;
800 }
801 return NULL;
802 }
803
804 /***********************************************************************
805 * SendCustomDlgNotificationMessage
806 *
807 * Send CustomDialogNotification (CDN_FIRST -- CDN_LAST) message to the custom template dialog
808 */
809
810 LRESULT SendCustomDlgNotificationMessage(HWND hwndParentDlg, UINT uCode)
811 {
812 LRESULT hook_result = 0;
813 FileOpenDlgInfos *fodInfos = GetPropA(hwndParentDlg,FileOpenDlgInfosStr);
814
815 TRACE("%p 0x%04x\n",hwndParentDlg, uCode);
816
817 if(!fodInfos) return 0;
818
819 if(fodInfos->DlgInfos.hwndCustomDlg)
820 {
821 TRACE("CALL NOTIFY for %x\n", uCode);
822 if(fodInfos->unicode)
823 {
824 OFNOTIFYW ofnNotify;
825 ofnNotify.hdr.hwndFrom=hwndParentDlg;
826 ofnNotify.hdr.idFrom=0;
827 ofnNotify.hdr.code = uCode;
828 ofnNotify.lpOFN = fodInfos->ofnInfos;
829 ofnNotify.pszFile = NULL;
830 hook_result = SendMessageW(fodInfos->DlgInfos.hwndCustomDlg,WM_NOTIFY,0,(LPARAM)&ofnNotify);
831 }
832 else
833 {
834 OFNOTIFYA ofnNotify;
835 ofnNotify.hdr.hwndFrom=hwndParentDlg;
836 ofnNotify.hdr.idFrom=0;
837 ofnNotify.hdr.code = uCode;
838 ofnNotify.lpOFN = (LPOPENFILENAMEA)fodInfos->ofnInfos;
839 ofnNotify.pszFile = NULL;
840 hook_result = SendMessageA(fodInfos->DlgInfos.hwndCustomDlg,WM_NOTIFY,0,(LPARAM)&ofnNotify);
841 }
842 TRACE("RET NOTIFY\n");
843 }
844 TRACE("Retval: 0x%08lx\n", hook_result);
845 return hook_result;
846 }
847
848 static INT_PTR FILEDLG95_Handle_GetFilePath(HWND hwnd, DWORD size, LPVOID result)
849 {
850 UINT len, total;
851 WCHAR *p, *buffer;
852 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
853
854 TRACE("CDM_GETFILEPATH:\n");
855
856 if ( ! (fodInfos->ofnInfos->Flags & OFN_EXPLORER ) )
857 return -1;
858
859 /* get path and filenames */
860 len = SendMessageW( fodInfos->DlgInfos.hwndFileName, WM_GETTEXTLENGTH, 0, 0 );
861 buffer = HeapAlloc( GetProcessHeap(), 0, (len + 2 + MAX_PATH) * sizeof(WCHAR) );
862 COMDLG32_GetDisplayNameOf( fodInfos->ShellInfos.pidlAbsCurrent, buffer );
863 if (len)
864 {
865 p = buffer + strlenW(buffer);
866 *p++ = '\\';
867 SendMessageW( fodInfos->DlgInfos.hwndFileName, WM_GETTEXT, len + 1, (LPARAM)p );
868 }
869 if (fodInfos->unicode)
870 {
871 total = strlenW( buffer) + 1;
872 if (result) lstrcpynW( result, buffer, size );
873 TRACE( "CDM_GETFILEPATH: returning %u %s\n", total, debugstr_w(result));
874 }
875 else
876 {
877 total = WideCharToMultiByte( CP_ACP, 0, buffer, -1, NULL, 0, NULL, NULL );
878 if (total <= size) WideCharToMultiByte( CP_ACP, 0, buffer, -1, result, size, NULL, NULL );
879 TRACE( "CDM_GETFILEPATH: returning %u %s\n", total, debugstr_a(result));
880 }
881 HeapFree( GetProcessHeap(), 0, buffer );
882 return total;
883 }
884
885 /***********************************************************************
886 * FILEDLG95_HandleCustomDialogMessages
887 *
888 * Handle Custom Dialog Messages (CDM_FIRST -- CDM_LAST) messages
889 */
890 static INT_PTR FILEDLG95_HandleCustomDialogMessages(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
891 {
892 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
893 WCHAR lpstrPath[MAX_PATH];
894 INT_PTR retval;
895
896 if(!fodInfos) return FALSE;
897
898 switch(uMsg)
899 {
900 case CDM_GETFILEPATH:
901 retval = FILEDLG95_Handle_GetFilePath(hwnd, (UINT)wParam, (LPVOID)lParam);
902 break;
903
904 case CDM_GETFOLDERPATH:
905 TRACE("CDM_GETFOLDERPATH:\n");
906 COMDLG32_GetDisplayNameOf(fodInfos->ShellInfos.pidlAbsCurrent, lpstrPath);
907 if (lParam)
908 {
909 if (fodInfos->unicode)
910 lstrcpynW((LPWSTR)lParam, lpstrPath, (int)wParam);
911 else
912 WideCharToMultiByte(CP_ACP, 0, lpstrPath, -1,
913 (LPSTR)lParam, (int)wParam, NULL, NULL);
914 }
915 retval = lstrlenW(lpstrPath) + 1;
916 break;
917
918 case CDM_GETFOLDERIDLIST:
919 retval = COMDLG32_PIDL_ILGetSize(fodInfos->ShellInfos.pidlAbsCurrent);
920 if (retval <= wParam)
921 memcpy((void*)lParam, fodInfos->ShellInfos.pidlAbsCurrent, retval);
922 break;
923
924 case CDM_GETSPEC:
925 TRACE("CDM_GETSPEC:\n");
926 retval = SendMessageW(fodInfos->DlgInfos.hwndFileName, WM_GETTEXTLENGTH, 0, 0) + 1;
927 if (lParam)
928 {
929 if (fodInfos->unicode)
930 SendMessageW(fodInfos->DlgInfos.hwndFileName, WM_GETTEXT, wParam, lParam);
931 else
932 SendMessageA(fodInfos->DlgInfos.hwndFileName, WM_GETTEXT, wParam, lParam);
933 }
934 break;
935
936 case CDM_SETCONTROLTEXT:
937 TRACE("CDM_SETCONTROLTEXT:\n");
938 if ( lParam )
939 {
940 if( fodInfos->unicode )
941 SetDlgItemTextW( hwnd, (UINT) wParam, (LPWSTR) lParam );
942 else
943 SetDlgItemTextA( hwnd, (UINT) wParam, (LPSTR) lParam );
944 }
945 retval = TRUE;
946 break;
947
948 case CDM_HIDECONTROL:
949 /* MSDN states that it should fail for not OFN_EXPLORER case */
950 if (fodInfos->ofnInfos->Flags & OFN_EXPLORER)
951 {
952 HWND control = GetDlgItem( hwnd, wParam );
953 if (control) ShowWindow( control, SW_HIDE );
954 retval = TRUE;
955 }
956 else retval = FALSE;
957 break;
958
959 default:
960 if (uMsg >= CDM_FIRST && uMsg <= CDM_LAST)
961 FIXME("message CDM_FIRST+%04x not implemented\n", uMsg - CDM_FIRST);
962 return FALSE;
963 }
964 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, retval);
965 return TRUE;
966 }
967
968 /***********************************************************************
969 * FILEDLG95_OnWMGetMMI
970 *
971 * WM_GETMINMAXINFO message handler for resizable dialogs
972 */
973 static LRESULT FILEDLG95_OnWMGetMMI( HWND hwnd, LPMINMAXINFO mmiptr)
974 {
975 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
976 if( !(fodInfos->ofnInfos->Flags & OFN_ENABLESIZING)) return FALSE;
977 if( fodInfos->initial_size.x || fodInfos->initial_size.y)
978 {
979 mmiptr->ptMinTrackSize = fodInfos->initial_size;
980 }
981 return TRUE;
982 }
983
984 /***********************************************************************
985 * FILEDLG95_OnWMSize
986 *
987 * WM_SIZE message handler, resize the dialog. Re-arrange controls.
988 *
989 * FIXME: this could be made more elaborate. Now use a simple scheme
990 * where the file view is enlarged and the controls are either moved
991 * vertically or horizontally to get out of the way. Only the "grip"
992 * is moved in both directions to stay in the corner.
993 */
994 static LRESULT FILEDLG95_OnWMSize(HWND hwnd, WPARAM wParam)
995 {
996 RECT rc, rcview;
997 int chgx, chgy;
998 HWND ctrl;
999 HDWP hdwp;
1000 FileOpenDlgInfos *fodInfos;
1001
1002 if( wParam != SIZE_RESTORED) return FALSE;
1003 fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
1004 if( !(fodInfos->ofnInfos->Flags & OFN_ENABLESIZING)) return FALSE;
1005 /* get the new dialog rectangle */
1006 GetWindowRect( hwnd, &rc);
1007 TRACE("Size from %d,%d to %d,%d\n", fodInfos->sizedlg.cx, fodInfos->sizedlg.cy,
1008 rc.right -rc.left, rc.bottom -rc.top);
1009 /* not initialized yet */
1010 if( (fodInfos->sizedlg.cx == 0 && fodInfos->sizedlg.cy == 0) ||
1011 ((fodInfos->sizedlg.cx == rc.right -rc.left) && /* no change */
1012 (fodInfos->sizedlg.cy == rc.bottom -rc.top)))
1013 return FALSE;
1014 chgx = rc.right - rc.left - fodInfos->sizedlg.cx;
1015 chgy = rc.bottom - rc.top - fodInfos->sizedlg.cy;
1016 fodInfos->sizedlg.cx = rc.right - rc.left;
1017 fodInfos->sizedlg.cy = rc.bottom - rc.top;
1018 /* change the size of the view window */
1019 GetWindowRect( fodInfos->ShellInfos.hwndView, &rcview);
1020 MapWindowPoints( NULL, hwnd, (LPPOINT) &rcview, 2);
1021 hdwp = BeginDeferWindowPos( 10);
1022 DeferWindowPos( hdwp, fodInfos->ShellInfos.hwndView, NULL, 0, 0,
1023 rcview.right - rcview.left + chgx,
1024 rcview.bottom - rcview.top + chgy,
1025 SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER);
1026 /* change position and sizes of the controls */
1027 for( ctrl = GetWindow( hwnd, GW_CHILD); ctrl ; ctrl = GetWindow( ctrl, GW_HWNDNEXT))
1028 {
1029 int ctrlid = GetDlgCtrlID( ctrl);
1030 GetWindowRect( ctrl, &rc);
1031 MapWindowPoints( NULL, hwnd, (LPPOINT) &rc, 2);
1032 if( ctrl == fodInfos->DlgInfos.hwndGrip)
1033 {
1034 DeferWindowPos( hdwp, ctrl, NULL, rc.left + chgx, rc.top + chgy,
1035 0, 0,
1036 SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOZORDER);
1037 }
1038 else if( rc.top > rcview.bottom)
1039 {
1040 /* if it was below the shell view
1041 * move to bottom */
1042 switch( ctrlid)
1043 {
1044 /* file name box and file types combo change also width */
1045 case edt1:
1046 case cmb1:
1047 DeferWindowPos( hdwp, ctrl, NULL, rc.left, rc.top + chgy,
1048 rc.right - rc.left + chgx, rc.bottom - rc.top,
1049 SWP_NOACTIVATE | SWP_NOZORDER);
1050 break;
1051 /* then these buttons must move out of the way */
1052 case IDOK:
1053 case IDCANCEL:
1054 case pshHelp:
1055 DeferWindowPos( hdwp, ctrl, NULL, rc.left + chgx, rc.top + chgy,
1056 0, 0,
1057 SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOZORDER);
1058 break;
1059 default:
1060 DeferWindowPos( hdwp, ctrl, NULL, rc.left, rc.top + chgy,
1061 0, 0,
1062 SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOZORDER);
1063 }
1064 }
1065 else if( rc.left > rcview.right)
1066 {
1067 /* if it was to the right of the shell view
1068 * move to right */
1069 DeferWindowPos( hdwp, ctrl, NULL, rc.left + chgx, rc.top,
1070 0, 0,
1071 SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOZORDER);
1072 }
1073 else
1074 /* special cases */
1075 {
1076 switch( ctrlid)
1077 {
1078 #if 0 /* this is Win2k, Win XP. Vista and Higher don't move/size these controls */
1079 case IDC_LOOKIN:
1080 DeferWindowPos( hdwp, ctrl, NULL, 0, 0,
1081 rc.right - rc.left + chgx, rc.bottom - rc.top,
1082 SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER);
1083 break;
1084 case IDC_TOOLBARSTATIC:
1085 case IDC_TOOLBAR:
1086 DeferWindowPos( hdwp, ctrl, NULL, rc.left + chgx, rc.top,
1087 0, 0,
1088 SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOZORDER);
1089 break;
1090 #endif
1091 /* not resized in windows. Since wine uses this invisible control
1092 * to size the browser view it needs to be resized */
1093 case IDC_SHELLSTATIC:
1094 DeferWindowPos( hdwp, ctrl, NULL, 0, 0,
1095 rc.right - rc.left + chgx,
1096 rc.bottom - rc.top + chgy,
1097 SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER);
1098 break;
1099 }
1100 }
1101 }
1102 if(fodInfos->DlgInfos.hwndCustomDlg &&
1103 (fodInfos->ofnInfos->Flags & (OFN_ENABLETEMPLATE | OFN_ENABLETEMPLATEHANDLE)))
1104 {
1105 for( ctrl = GetWindow( fodInfos->DlgInfos.hwndCustomDlg, GW_CHILD);
1106 ctrl ; ctrl = GetWindow( ctrl, GW_HWNDNEXT))
1107 {
1108 GetWindowRect( ctrl, &rc);
1109 MapWindowPoints( NULL, hwnd, (LPPOINT) &rc, 2);
1110 if( rc.top > rcview.bottom)
1111 {
1112 /* if it was below the shell view
1113 * move to bottom */
1114 DeferWindowPos( hdwp, ctrl, NULL, rc.left, rc.top + chgy,
1115 rc.right - rc.left, rc.bottom - rc.top,
1116 SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOZORDER);
1117 }
1118 else if( rc.left > rcview.right)
1119 {
1120 /* if it was to the right of the shell view
1121 * move to right */
1122 DeferWindowPos( hdwp, ctrl, NULL, rc.left + chgx, rc.top,
1123 rc.right - rc.left, rc.bottom - rc.top,
1124 SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOZORDER);
1125 }
1126 }
1127 /* size the custom dialog at the end: some applications do some
1128 * control re-arranging at this point */
1129 GetClientRect(hwnd, &rc);
1130 DeferWindowPos( hdwp,fodInfos->DlgInfos.hwndCustomDlg, NULL,
1131 0, 0, rc.right, rc.bottom, SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER);
1132 }
1133 EndDeferWindowPos( hdwp);
1134 /* should not be needed */
1135 RedrawWindow( hwnd, NULL, 0, RDW_ALLCHILDREN | RDW_INVALIDATE );
1136 return TRUE;
1137 }
1138
1139 /***********************************************************************
1140 * FileOpenDlgProc95
1141 *
1142 * File open dialog procedure
1143 */
1144 INT_PTR CALLBACK FileOpenDlgProc95(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
1145 {
1146 #if 0
1147 TRACE("%p 0x%04x\n", hwnd, uMsg);
1148 #endif
1149
1150 switch(uMsg)
1151 {
1152 case WM_INITDIALOG:
1153 {
1154 FileOpenDlgInfos * fodInfos = (FileOpenDlgInfos *)lParam;
1155 RECT rc, rcstc;
1156 int gripx = GetSystemMetrics( SM_CYHSCROLL);
1157 int gripy = GetSystemMetrics( SM_CYVSCROLL);
1158
1159 /* Adds the FileOpenDlgInfos in the property list of the dialog
1160 so it will be easily accessible through a GetPropA(...) */
1161 SetPropA(hwnd, FileOpenDlgInfosStr, fodInfos);
1162
1163 FILEDLG95_InitControls(hwnd);
1164
1165 if (fodInfos->ofnInfos->Flags & OFN_ENABLESIZING)
1166 {
1167 GetWindowRect( hwnd, &rc);
1168 fodInfos->DlgInfos.hwndGrip =
1169 CreateWindowExA( 0, "SCROLLBAR", NULL,
1170 WS_CHILD | WS_GROUP | WS_VISIBLE | WS_CLIPSIBLINGS |
1171 SBS_SIZEGRIP | SBS_SIZEBOXBOTTOMRIGHTALIGN,
1172 rc.right - gripx, rc.bottom - gripy,
1173 gripx, gripy, hwnd, (HMENU) -1, COMDLG32_hInstance, NULL);
1174 }
1175
1176 fodInfos->DlgInfos.hwndCustomDlg =
1177 CreateTemplateDialog((FileOpenDlgInfos *)lParam, hwnd);
1178
1179 FILEDLG95_ResizeControls(hwnd, wParam, lParam);
1180 FILEDLG95_FillControls(hwnd, wParam, lParam);
1181
1182 if( fodInfos->DlgInfos.hwndCustomDlg)
1183 ShowWindow( fodInfos->DlgInfos.hwndCustomDlg, SW_SHOW);
1184
1185 if(fodInfos->ofnInfos->Flags & OFN_EXPLORER) {
1186 SendCustomDlgNotificationMessage(hwnd,CDN_INITDONE);
1187 SendCustomDlgNotificationMessage(hwnd,CDN_FOLDERCHANGE);
1188 }
1189
1190 /* if the app has changed the position of the invisible listbox,
1191 * change that of the listview (browser) as well */
1192 GetWindowRect( fodInfos->ShellInfos.hwndView, &rc);
1193 GetWindowRect( GetDlgItem( hwnd, IDC_SHELLSTATIC ), &rcstc);
1194 if( !EqualRect( &rc, &rcstc))
1195 {
1196 MapWindowPoints( NULL, hwnd, (LPPOINT) &rcstc, 2);
1197 SetWindowPos( fodInfos->ShellInfos.hwndView, NULL,
1198 rcstc.left, rcstc.top, rcstc.right - rcstc.left, rcstc.bottom - rcstc.top,
1199 SWP_NOACTIVATE | SWP_NOZORDER);
1200 }
1201
1202 if (fodInfos->ofnInfos->Flags & OFN_ENABLESIZING)
1203 {
1204 GetWindowRect( hwnd, &rc);
1205 fodInfos->sizedlg.cx = rc.right - rc.left;
1206 fodInfos->sizedlg.cy = rc.bottom - rc.top;
1207 fodInfos->initial_size.x = fodInfos->sizedlg.cx;
1208 fodInfos->initial_size.y = fodInfos->sizedlg.cy;
1209 GetClientRect( hwnd, &rc);
1210 SetWindowPos( fodInfos->DlgInfos.hwndGrip, NULL,
1211 rc.right - gripx, rc.bottom - gripy,
1212 0, 0, SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOZORDER);
1213 /* resize the dialog to the previous invocation */
1214 if( MemDialogSize.cx && MemDialogSize.cy)
1215 SetWindowPos( hwnd, NULL,
1216 0, 0, MemDialogSize.cx, MemDialogSize.cy,
1217 SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER);
1218 }
1219
1220 if(fodInfos->ofnInfos->Flags & OFN_EXPLORER)
1221 SendCustomDlgNotificationMessage(hwnd,CDN_SELCHANGE);
1222
1223 return 0;
1224 }
1225 case WM_SIZE:
1226 return FILEDLG95_OnWMSize(hwnd, wParam);
1227 case WM_GETMINMAXINFO:
1228 return FILEDLG95_OnWMGetMMI( hwnd, (LPMINMAXINFO)lParam);
1229 case WM_COMMAND:
1230 return FILEDLG95_OnWMCommand(hwnd, wParam);
1231 case WM_DRAWITEM:
1232 {
1233 switch(((LPDRAWITEMSTRUCT)lParam)->CtlID)
1234 {
1235 case IDC_LOOKIN:
1236 FILEDLG95_LOOKIN_DrawItem((LPDRAWITEMSTRUCT) lParam);
1237 return TRUE;
1238 }
1239 }
1240 return FALSE;
1241
1242 case WM_GETISHELLBROWSER:
1243 return FILEDLG95_OnWMGetIShellBrowser(hwnd);
1244
1245 case WM_DESTROY:
1246 {
1247 FileOpenDlgInfos * fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
1248 if (fodInfos && fodInfos->ofnInfos->Flags & OFN_ENABLESIZING)
1249 MemDialogSize = fodInfos->sizedlg;
1250 RemovePropA(hwnd, FileOpenDlgInfosStr);
1251 return FALSE;
1252 }
1253 case WM_NOTIFY:
1254 {
1255 LPNMHDR lpnmh = (LPNMHDR)lParam;
1256 UINT stringId = -1;
1257
1258 /* set up the button tooltips strings */
1259 if(TTN_GETDISPINFOA == lpnmh->code )
1260 {
1261 LPNMTTDISPINFOA lpdi = (LPNMTTDISPINFOA)lParam;
1262 switch(lpnmh->idFrom )
1263 {
1264 /* Up folder button */
1265 case FCIDM_TB_UPFOLDER:
1266 stringId = IDS_UPFOLDER;
1267 break;
1268 /* New folder button */
1269 case FCIDM_TB_NEWFOLDER:
1270 stringId = IDS_NEWFOLDER;
1271 break;
1272 /* List option button */
1273 case FCIDM_TB_SMALLICON:
1274 stringId = IDS_LISTVIEW;
1275 break;
1276 /* Details option button */
1277 case FCIDM_TB_REPORTVIEW:
1278 stringId = IDS_REPORTVIEW;
1279 break;
1280 /* Desktop button */
1281 case FCIDM_TB_DESKTOP:
1282 stringId = IDS_TODESKTOP;
1283 break;
1284 default:
1285 stringId = 0;
1286 }
1287 lpdi->hinst = COMDLG32_hInstance;
1288 lpdi->lpszText = MAKEINTRESOURCEA(stringId);
1289 }
1290 return FALSE;
1291 }
1292 default :
1293 if(uMsg >= CDM_FIRST && uMsg <= CDM_LAST)
1294 return FILEDLG95_HandleCustomDialogMessages(hwnd, uMsg, wParam, lParam);
1295 return FALSE;
1296 }
1297 }
1298
1299 /***********************************************************************
1300 * FILEDLG95_InitControls
1301 *
1302 * WM_INITDIALOG message handler (before hook notification)
1303 */
1304 static LRESULT FILEDLG95_InitControls(HWND hwnd)
1305 {
1306 int win2000plus = 0;
1307 int win98plus = 0;
1308 int handledPath = FALSE;
1309 OSVERSIONINFOW osVi;
1310 static const WCHAR szwSlash[] = { '\\', 0 };
1311 static const WCHAR szwStar[] = { '*',0 };
1312
1313 static const TBBUTTON tbb[] =
1314 {
1315 {0, 0, TBSTATE_ENABLED, BTNS_SEP, {0, 0}, 0, 0 },
1316 {VIEW_PARENTFOLDER, FCIDM_TB_UPFOLDER, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0 },
1317 {0, 0, TBSTATE_ENABLED, BTNS_SEP, {0, 0}, 0, 0 },
1318 {VIEW_NEWFOLDER+1, FCIDM_TB_DESKTOP, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0 },
1319 {0, 0, TBSTATE_ENABLED, BTNS_SEP, {0, 0}, 0, 0 },
1320 {VIEW_NEWFOLDER, FCIDM_TB_NEWFOLDER, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0 },
1321 {0, 0, TBSTATE_ENABLED, BTNS_SEP, {0, 0}, 0, 0 },
1322 {VIEW_LIST, FCIDM_TB_SMALLICON, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0 },
1323 {VIEW_DETAILS, FCIDM_TB_REPORTVIEW, TBSTATE_ENABLED, BTNS_BUTTON, {0, 0}, 0, 0 },
1324 };
1325 static const TBADDBITMAP tba = {HINST_COMMCTRL, IDB_VIEW_SMALL_COLOR};
1326
1327 RECT rectTB;
1328 RECT rectlook;
1329
1330 HIMAGELIST toolbarImageList;
1331 SHFILEINFOA shFileInfo;
1332 ITEMIDLIST *desktopPidl;
1333
1334 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
1335
1336 TRACE("%p\n", fodInfos);
1337
1338 /* Get windows version emulating */
1339 osVi.dwOSVersionInfoSize = sizeof(osVi);
1340 GetVersionExW(&osVi);
1341 if (osVi.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS) {
1342 win98plus = ((osVi.dwMajorVersion > 4) || ((osVi.dwMajorVersion == 4) && (osVi.dwMinorVersion > 0)));
1343 } else if (osVi.dwPlatformId == VER_PLATFORM_WIN32_NT) {
1344 win2000plus = (osVi.dwMajorVersion > 4);
1345 if (win2000plus) win98plus = TRUE;
1346 }
1347 TRACE("Running on 2000+ %d, 98+ %d\n", win2000plus, win98plus);
1348
1349 /* Get the hwnd of the controls */
1350 fodInfos->DlgInfos.hwndFileName = GetDlgItem(hwnd,IDC_FILENAME);
1351 fodInfos->DlgInfos.hwndFileTypeCB = GetDlgItem(hwnd,IDC_FILETYPE);
1352 fodInfos->DlgInfos.hwndLookInCB = GetDlgItem(hwnd,IDC_LOOKIN);
1353
1354 GetWindowRect( fodInfos->DlgInfos.hwndLookInCB,&rectlook);
1355 MapWindowPoints( 0, hwnd,(LPPOINT)&rectlook,2);
1356
1357 /* construct the toolbar */
1358 GetWindowRect(GetDlgItem(hwnd,IDC_TOOLBARSTATIC),&rectTB);
1359 MapWindowPoints( 0, hwnd,(LPPOINT)&rectTB,2);
1360
1361 rectTB.right = rectlook.right + rectTB.right - rectTB.left;
1362 rectTB.bottom = rectlook.top - 1 + rectTB.bottom - rectTB.top;
1363 rectTB.left = rectlook.right;
1364 rectTB.top = rectlook.top-1;
1365
1366 if (fodInfos->unicode)
1367 fodInfos->DlgInfos.hwndTB = CreateWindowExW(0, TOOLBARCLASSNAMEW, NULL,
1368 WS_CHILD | WS_GROUP | WS_VISIBLE | WS_CLIPSIBLINGS | TBSTYLE_TOOLTIPS | CCS_NODIVIDER | CCS_NORESIZE,
1369 rectTB.left, rectTB.top,
1370 rectTB.right - rectTB.left, rectTB.bottom - rectTB.top,
1371 hwnd, (HMENU)IDC_TOOLBAR, COMDLG32_hInstance, NULL);
1372 else
1373 fodInfos->DlgInfos.hwndTB = CreateWindowExA(0, TOOLBARCLASSNAMEA, NULL,
1374 WS_CHILD | WS_GROUP | WS_VISIBLE | WS_CLIPSIBLINGS | TBSTYLE_TOOLTIPS | CCS_NODIVIDER | CCS_NORESIZE,
1375 rectTB.left, rectTB.top,
1376 rectTB.right - rectTB.left, rectTB.bottom - rectTB.top,
1377 hwnd, (HMENU)IDC_TOOLBAR, COMDLG32_hInstance, NULL);
1378
1379 SendMessageW(fodInfos->DlgInfos.hwndTB, TB_BUTTONSTRUCTSIZE, sizeof(TBBUTTON), 0);
1380
1381 /* FIXME: use TB_LOADIMAGES when implemented */
1382 /* SendMessageW(fodInfos->DlgInfos.hwndTB, TB_LOADIMAGES, IDB_VIEW_SMALL_COLOR, HINST_COMMCTRL);*/
1383 SendMessageW(fodInfos->DlgInfos.hwndTB, TB_SETMAXTEXTROWS, 0, 0);
1384 SendMessageW(fodInfos->DlgInfos.hwndTB, TB_ADDBITMAP, 12, (LPARAM) &tba);
1385
1386 /* Retrieve and add desktop icon to the toolbar */
1387 toolbarImageList = (HIMAGELIST)SendMessageW(fodInfos->DlgInfos.hwndTB, TB_GETIMAGELIST, 0, 0L);
1388 SHGetSpecialFolderLocation(hwnd, CSIDL_DESKTOP, &desktopPidl);
1389 SHGetFileInfoA((LPCSTR)desktopPidl, 0, &shFileInfo, sizeof(shFileInfo),
1390 SHGFI_PIDL | SHGFI_ICON | SHGFI_SMALLICON);
1391 ImageList_AddIcon(toolbarImageList, shFileInfo.hIcon);
1392
1393 DestroyIcon(shFileInfo.hIcon);
1394 CoTaskMemFree(desktopPidl);
1395
1396 /* Finish Toolbar Construction */
1397 SendMessageW(fodInfos->DlgInfos.hwndTB, TB_ADDBUTTONSW, 9, (LPARAM) tbb);
1398 SendMessageW(fodInfos->DlgInfos.hwndTB, TB_AUTOSIZE, 0, 0);
1399
1400 /* Set the window text with the text specified in the OPENFILENAME structure */
1401 if(fodInfos->title)
1402 {
1403 SetWindowTextW(hwnd,fodInfos->title);
1404 }
1405 else if (fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG)
1406 {
1407 WCHAR buf[16];
1408 LoadStringW(COMDLG32_hInstance, IDS_SAVE, buf, sizeof(buf)/sizeof(WCHAR));
1409 SetWindowTextW(hwnd, buf);
1410 }
1411
1412 /* Initialise the file name edit control */
1413 handledPath = FALSE;
1414 TRACE("Before manipilation, file = %s, dir = %s\n", debugstr_w(fodInfos->filename), debugstr_w(fodInfos->initdir));
1415
1416 if(fodInfos->filename)
1417 {
1418 /* 1. If win2000 or higher and filename contains a path, use it
1419 in preference over the lpstrInitialDir */
1420 if (win2000plus && *fodInfos->filename && strpbrkW(fodInfos->filename, szwSlash)) {
1421 WCHAR tmpBuf[MAX_PATH];
1422 WCHAR *nameBit;
1423 DWORD result;
1424
1425 result = GetFullPathNameW(fodInfos->filename, MAX_PATH, tmpBuf, &nameBit);
1426 if (result) {
1427
1428 /* nameBit is always shorter than the original filename */
1429 lstrcpyW(fodInfos->filename,nameBit);
1430
1431 *nameBit = 0x00;
1432 if (fodInfos->initdir == NULL)
1433 MemFree(fodInfos->initdir);
1434 fodInfos->initdir = MemAlloc((lstrlenW(tmpBuf) + 1)*sizeof(WCHAR));
1435 lstrcpyW(fodInfos->initdir, tmpBuf);
1436 handledPath = TRUE;
1437 TRACE("Value in Filename includes path, overriding InitialDir: %s, %s\n",
1438 debugstr_w(fodInfos->filename), debugstr_w(fodInfos->initdir));
1439 }
1440 SetDlgItemTextW(hwnd, IDC_FILENAME, fodInfos->filename);
1441
1442 } else {
1443 SetDlgItemTextW(hwnd, IDC_FILENAME, fodInfos->filename);
1444 }
1445 }
1446
1447 /* 2. (All platforms) If initdir is not null, then use it */
1448 if ((handledPath == FALSE) && (fodInfos->initdir!=NULL) &&
1449 (*fodInfos->initdir!=0x00))
1450 {
1451 /* Work out the proper path as supplied one might be relative */
1452 /* (Here because supplying '.' as dir browses to My Computer) */
1453 if (handledPath==FALSE) {
1454 WCHAR tmpBuf[MAX_PATH];
1455 WCHAR tmpBuf2[MAX_PATH];
1456 WCHAR *nameBit;
1457 DWORD result;
1458
1459 lstrcpyW(tmpBuf, fodInfos->initdir);
1460 if( PathFileExistsW(tmpBuf) ) {
1461 /* initdir does not have to be a directory. If a file is
1462 * specified, the dir part is taken */
1463 if( PathIsDirectoryW(tmpBuf)) {
1464 if (tmpBuf[lstrlenW(tmpBuf)-1] != '\\') {
1465 lstrcatW(tmpBuf, szwSlash);
1466 }
1467 lstrcatW(tmpBuf, szwStar);
1468 }
1469 result = GetFullPathNameW(tmpBuf, MAX_PATH, tmpBuf2, &nameBit);
1470 if (result) {
1471 *nameBit = 0x00;
1472 MemFree(fodInfos->initdir);
1473 fodInfos->initdir = MemAlloc((lstrlenW(tmpBuf2) + 1)*sizeof(WCHAR));
1474 lstrcpyW(fodInfos->initdir, tmpBuf2);
1475 handledPath = TRUE;
1476 TRACE("Value in InitDir changed to %s\n", debugstr_w(fodInfos->initdir));
1477 }
1478 }
1479 else if (fodInfos->initdir)
1480 {
1481 MemFree(fodInfos->initdir);
1482 fodInfos->initdir = NULL;
1483 TRACE("Value in InitDir is not an existing path, changed to (nil)\n");
1484 }
1485 }
1486 }
1487
1488 if ((handledPath == FALSE) && ((fodInfos->initdir==NULL) ||
1489 (*fodInfos->initdir==0x00)))
1490 {
1491 /* 3. All except w2k+: if filename contains a path use it */
1492 if (!win2000plus && fodInfos->filename &&
1493 *fodInfos->filename &&
1494 strpbrkW(fodInfos->filename, szwSlash)) {
1495 WCHAR tmpBuf[MAX_PATH];
1496 WCHAR *nameBit;
1497 DWORD result;
1498
1499 result = GetFullPathNameW(fodInfos->filename, MAX_PATH,
1500 tmpBuf, &nameBit);
1501 if (result) {
1502 int len;
1503
1504 /* nameBit is always shorter than the original filename */
1505 lstrcpyW(fodInfos->filename, nameBit);
1506 *nameBit = 0x00;
1507
1508 len = lstrlenW(tmpBuf);
1509 MemFree(fodInfos->initdir);
1510 fodInfos->initdir = MemAlloc((len+1)*sizeof(WCHAR));
1511 lstrcpyW(fodInfos->initdir, tmpBuf);
1512
1513 handledPath = TRUE;
1514 TRACE("Value in Filename includes path, overriding initdir: %s, %s\n",
1515 debugstr_w(fodInfos->filename), debugstr_w(fodInfos->initdir));
1516 }
1517 SetDlgItemTextW(hwnd, IDC_FILENAME, fodInfos->filename);
1518 }
1519
1520 /* 4. win98+ and win2000+ if any files of specified filter types in
1521 current directory, use it */
1522 if ( win98plus && handledPath == FALSE &&
1523 fodInfos->filter && *fodInfos->filter) {
1524
1525 LPCWSTR lpstrPos = fodInfos->filter;
1526 WIN32_FIND_DATAW FindFileData;
1527 HANDLE hFind;
1528
1529 while (1)
1530 {
1531 /* filter is a list... title\0ext\0......\0\0 */
1532
1533 /* Skip the title */
1534 if(! *lpstrPos) break; /* end */
1535 lpstrPos += lstrlenW(lpstrPos) + 1;
1536
1537 /* See if any files exist in the current dir with this extension */
1538 if(! *lpstrPos) break; /* end */
1539
1540 hFind = FindFirstFileW(lpstrPos, &FindFileData);
1541
1542 if (hFind == INVALID_HANDLE_VALUE) {
1543 /* None found - continue search */
1544 lpstrPos += lstrlenW(lpstrPos) + 1;
1545
1546 } else {
1547
1548 MemFree(fodInfos->initdir);
1549 fodInfos->initdir = MemAlloc(MAX_PATH*sizeof(WCHAR));
1550 GetCurrentDirectoryW(MAX_PATH, fodInfos->initdir);
1551
1552 handledPath = TRUE;
1553 TRACE("No initial dir specified, but files of type %s found in current, so using it\n",
1554 debugstr_w(lpstrPos));
1555 FindClose(hFind);
1556 break;
1557 }
1558 }
1559 }
1560
1561 /* 5. Win2000+: FIXME: Next, Recently used? Not sure how windows does this */
1562
1563 /* 6. Win98+ and 2000+: Use personal files dir, others use current dir */
1564 if (handledPath == FALSE && (win2000plus || win98plus)) {
1565 fodInfos->initdir = MemAlloc(MAX_PATH*sizeof(WCHAR));
1566
1567 if(!COMDLG32_SHGetFolderPathW(hwnd, CSIDL_PERSONAL, 0, 0, fodInfos->initdir))
1568 {
1569 if(!COMDLG32_SHGetFolderPathW(hwnd, CSIDL_DESKTOPDIRECTORY|CSIDL_FLAG_CREATE, 0, 0, fodInfos->initdir))
1570 {
1571 /* last fallback */
1572 GetCurrentDirectoryW(MAX_PATH, fodInfos->initdir);
1573 TRACE("No personal or desktop dir, using cwd as failsafe: %s\n", debugstr_w(fodInfos->initdir));
1574 } else {
1575 TRACE("No personal dir, using desktop instead: %s\n", debugstr_w(fodInfos->initdir));
1576 }
1577 } else {
1578 TRACE("No initial dir specified, using personal files dir of %s\n", debugstr_w(fodInfos->initdir));
1579 }
1580 handledPath = TRUE;
1581 } else if (handledPath==FALSE) {
1582 fodInfos->initdir = MemAlloc(MAX_PATH*sizeof(WCHAR));
1583 GetCurrentDirectoryW(MAX_PATH, fodInfos->initdir);
1584 handledPath = TRUE;
1585 TRACE("No initial dir specified, using current dir of %s\n", debugstr_w(fodInfos->initdir));
1586 }
1587 }
1588 SetFocus(GetDlgItem(hwnd, IDC_FILENAME));
1589 TRACE("After manipulation, file = %s, dir = %s\n", debugstr_w(fodInfos->filename), debugstr_w(fodInfos->initdir));
1590
1591 /* Must the open as read only check box be checked ?*/
1592 if(fodInfos->ofnInfos->Flags & OFN_READONLY)
1593 {
1594 SendDlgItemMessageW(hwnd,IDC_OPENREADONLY,BM_SETCHECK,TRUE,0);
1595 }
1596
1597 /* Must the open as read only check box be hidden? */
1598 if(fodInfos->ofnInfos->Flags & OFN_HIDEREADONLY)
1599 {
1600 ShowWindow(GetDlgItem(hwnd,IDC_OPENREADONLY),SW_HIDE);
1601 EnableWindow(GetDlgItem(hwnd, IDC_OPENREADONLY), FALSE);
1602 }
1603
1604 /* Must the help button be hidden? */
1605 if (!(fodInfos->ofnInfos->Flags & OFN_SHOWHELP))
1606 {
1607 ShowWindow(GetDlgItem(hwnd, pshHelp), SW_HIDE);
1608 EnableWindow(GetDlgItem(hwnd, pshHelp), FALSE);
1609 }
1610
1611 /* change Open to Save */
1612 if (fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG)
1613 {
1614 WCHAR buf[16];
1615 LoadStringW(COMDLG32_hInstance, IDS_SAVE_BUTTON, buf, sizeof(buf)/sizeof(WCHAR));
1616 SetDlgItemTextW(hwnd, IDOK, buf);
1617 LoadStringW(COMDLG32_hInstance, IDS_SAVE_IN, buf, sizeof(buf)/sizeof(WCHAR));
1618 SetDlgItemTextW(hwnd, IDC_LOOKINSTATIC, buf);
1619 }
1620
1621 /* Initialize the filter combo box */
1622 FILEDLG95_FILETYPE_Init(hwnd);
1623
1624 return 0;
1625 }
1626
1627 /***********************************************************************
1628 * FILEDLG95_ResizeControls
1629 *
1630 * WM_INITDIALOG message handler (after hook notification)
1631 */
1632 static LRESULT FILEDLG95_ResizeControls(HWND hwnd, WPARAM wParam, LPARAM lParam)
1633 {
1634 FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) lParam;
1635
1636 if (fodInfos->DlgInfos.hwndCustomDlg)
1637 {
1638 RECT rc;
1639 UINT flags = SWP_NOACTIVATE;
1640
1641 ArrangeCtrlPositions(fodInfos->DlgInfos.hwndCustomDlg, hwnd,
1642 (fodInfos->ofnInfos->Flags & (OFN_HIDEREADONLY | OFN_SHOWHELP)) == OFN_HIDEREADONLY);
1643
1644 /* resize the custom dialog to the parent size */
1645 if (fodInfos->ofnInfos->Flags & (OFN_ENABLETEMPLATE | OFN_ENABLETEMPLATEHANDLE))
1646 GetClientRect(hwnd, &rc);
1647 else
1648 {
1649 /* our own fake template is zero sized and doesn't have children, so
1650 * there is no need to resize it. Picasa depends on it.
1651 */
1652 flags |= SWP_NOSIZE;
1653 SetRectEmpty(&rc);
1654 }
1655 SetWindowPos(fodInfos->DlgInfos.hwndCustomDlg, HWND_BOTTOM,
1656 0, 0, rc.right, rc.bottom, flags);
1657 }
1658 else
1659 {
1660 /* Resize the height, if open as read only checkbox ad help button are
1661 * hidden and we are not using a custom template nor a customDialog
1662 */
1663 if ( (fodInfos->ofnInfos->Flags & OFN_HIDEREADONLY) &&
1664 (!(fodInfos->ofnInfos->Flags &
1665 (OFN_SHOWHELP|OFN_ENABLETEMPLATE|OFN_ENABLETEMPLATEHANDLE))))
1666 {
1667 RECT rectDlg, rectHelp, rectCancel;
1668 GetWindowRect(hwnd, &rectDlg);
1669 GetWindowRect(GetDlgItem(hwnd, pshHelp), &rectHelp);
1670 GetWindowRect(GetDlgItem(hwnd, IDCANCEL), &rectCancel);
1671 /* subtract the height of the help button plus the space between the help
1672 * button and the cancel button to the height of the dialog
1673 */
1674 SetWindowPos(hwnd, 0, 0, 0, rectDlg.right-rectDlg.left,
1675 (rectDlg.bottom-rectDlg.top) - (rectHelp.bottom - rectCancel.bottom),
1676 SWP_NOACTIVATE|SWP_NOMOVE|SWP_NOZORDER);
1677 }
1678 }
1679 return TRUE;
1680 }
1681
1682 /***********************************************************************
1683 * FILEDLG95_FillControls
1684 *
1685 * WM_INITDIALOG message handler (after hook notification)
1686 */
1687 static LRESULT FILEDLG95_FillControls(HWND hwnd, WPARAM wParam, LPARAM lParam)
1688 {
1689 LPITEMIDLIST pidlItemId = NULL;
1690
1691 FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) lParam;
1692
1693 TRACE("dir=%s file=%s\n",
1694 debugstr_w(fodInfos->initdir), debugstr_w(fodInfos->filename));
1695
1696 /* Get the initial directory pidl */
1697
1698 if(!(pidlItemId = GetPidlFromName(fodInfos->Shell.FOIShellFolder,fodInfos->initdir)))
1699 {
1700 WCHAR path[MAX_PATH];
1701
1702 GetCurrentDirectoryW(MAX_PATH,path);
1703 pidlItemId = GetPidlFromName(fodInfos->Shell.FOIShellFolder, path);
1704 }
1705
1706 /* Initialise shell objects */
1707 FILEDLG95_SHELL_Init(hwnd);
1708
1709 /* Initialize the Look In combo box */
1710 FILEDLG95_LOOKIN_Init(fodInfos->DlgInfos.hwndLookInCB);
1711
1712 /* Browse to the initial directory */
1713 IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser,pidlItemId, SBSP_ABSOLUTE);
1714
1715 /* Free pidlItem memory */
1716 COMDLG32_SHFree(pidlItemId);
1717
1718 return TRUE;
1719 }
1720 /***********************************************************************
1721 * FILEDLG95_Clean
1722 *
1723 * Regroups all the cleaning functions of the filedlg
1724 */
1725 void FILEDLG95_Clean(HWND hwnd)
1726 {
1727 FILEDLG95_FILETYPE_Clean(hwnd);
1728 FILEDLG95_LOOKIN_Clean(hwnd);
1729 FILEDLG95_SHELL_Clean(hwnd);
1730 }
1731 /***********************************************************************
1732 * FILEDLG95_OnWMCommand
1733 *
1734 * WM_COMMAND message handler
1735 */
1736 static LRESULT FILEDLG95_OnWMCommand(HWND hwnd, WPARAM wParam)
1737 {
1738 WORD wNotifyCode = HIWORD(wParam); /* notification code */
1739 WORD wID = LOWORD(wParam); /* item, control, or accelerator identifier */
1740 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
1741
1742 switch(wID)
1743 {
1744 /* OK button */
1745 case IDOK:
1746 FILEDLG95_OnOpen(hwnd);
1747 break;
1748 /* Cancel button */
1749 case IDCANCEL:
1750 FILEDLG95_Clean(hwnd);
1751 EndDialog(hwnd, FALSE);
1752 break;
1753 /* Filetype combo box */
1754 case IDC_FILETYPE:
1755 FILEDLG95_FILETYPE_OnCommand(hwnd,wNotifyCode);
1756 break;
1757 /* LookIn combo box */
1758 case IDC_LOOKIN:
1759 FILEDLG95_LOOKIN_OnCommand(hwnd,wNotifyCode);
1760 break;
1761
1762 /* --- toolbar --- */
1763 /* Up folder button */
1764 case FCIDM_TB_UPFOLDER:
1765 FILEDLG95_SHELL_UpFolder(hwnd);
1766 break;
1767 /* New folder button */
1768 case FCIDM_TB_NEWFOLDER:
1769 FILEDLG95_SHELL_ExecuteCommand(hwnd,CMDSTR_NEWFOLDERA);
1770 break;
1771 /* List option button */
1772 case FCIDM_TB_SMALLICON:
1773 FILEDLG95_SHELL_ExecuteCommand(hwnd,CMDSTR_VIEWLISTA);
1774 break;
1775 /* Details option button */
1776 case FCIDM_TB_REPORTVIEW:
1777 FILEDLG95_SHELL_ExecuteCommand(hwnd,CMDSTR_VIEWDETAILSA);
1778 break;
1779 /* Details option button */
1780 case FCIDM_TB_DESKTOP:
1781 FILEDLG95_SHELL_BrowseToDesktop(hwnd);
1782 break;
1783
1784 case IDC_FILENAME:
1785 break;
1786
1787 }
1788 /* Do not use the listview selection anymore */
1789 fodInfos->DlgInfos.dwDlgProp &= ~FODPROP_USEVIEW;
1790 return 0;
1791 }
1792
1793 /***********************************************************************
1794 * FILEDLG95_OnWMGetIShellBrowser
1795 *
1796 * WM_GETISHELLBROWSER message handler
1797 */
1798 static LRESULT FILEDLG95_OnWMGetIShellBrowser(HWND hwnd)
1799 {
1800 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
1801
1802 TRACE("\n");
1803
1804 SetWindowLongPtrW(hwnd,DWLP_MSGRESULT,(LONG_PTR)fodInfos->Shell.FOIShellBrowser);
1805
1806 return TRUE;
1807 }
1808
1809
1810 /***********************************************************************
1811 * FILEDLG95_SendFileOK
1812 *
1813 * Sends the CDN_FILEOK notification if required
1814 *
1815 * RETURNS
1816 * TRUE if the dialog should close
1817 * FALSE if the dialog should not be closed
1818 */
1819 static BOOL FILEDLG95_SendFileOK( HWND hwnd, FileOpenDlgInfos *fodInfos )
1820 {
1821 /* ask the hook if we can close */
1822 if(IsHooked(fodInfos))
1823 {
1824 LRESULT retval = 0;
1825
1826 TRACE("---\n");
1827 /* First send CDN_FILEOK as MSDN doc says */
1828 if(fodInfos->ofnInfos->Flags & OFN_EXPLORER)
1829 retval = SendCustomDlgNotificationMessage(hwnd,CDN_FILEOK);
1830 if( retval)
1831 {
1832 TRACE("canceled\n");
1833 return FALSE;
1834 }
1835
1836 /* fodInfos->ofnInfos points to an ASCII or UNICODE structure as appropriate */
1837 retval = SendMessageW(fodInfos->DlgInfos.hwndCustomDlg,
1838 fodInfos->HookMsg.fileokstring, 0, (LPARAM)fodInfos->ofnInfos);
1839 if( retval)
1840 {
1841 TRACE("canceled\n");
1842 return FALSE;
1843 }
1844 }
1845 return TRUE;
1846 }
1847
1848 /***********************************************************************
1849 * FILEDLG95_OnOpenMultipleFiles
1850 *
1851 * Handles the opening of multiple files.
1852 *
1853 * FIXME
1854 * check destination buffer size
1855 */
1856 BOOL FILEDLG95_OnOpenMultipleFiles(HWND hwnd, LPWSTR lpstrFileList, UINT nFileCount, UINT sizeUsed)
1857 {
1858 WCHAR lpstrPathSpec[MAX_PATH] = {0};
1859 UINT nCount, nSizePath;
1860 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
1861
1862 TRACE("\n");
1863
1864 if(fodInfos->unicode)
1865 {
1866 LPOPENFILENAMEW ofn = fodInfos->ofnInfos;
1867 ofn->lpstrFile[0] = '\0';
1868 }
1869 else
1870 {
1871 LPOPENFILENAMEA ofn = (LPOPENFILENAMEA) fodInfos->ofnInfos;
1872 ofn->lpstrFile[0] = '\0';
1873 }
1874
1875 COMDLG32_GetDisplayNameOf( fodInfos->ShellInfos.pidlAbsCurrent, lpstrPathSpec );
1876
1877 if ( !(fodInfos->ofnInfos->Flags & OFN_NOVALIDATE) &&
1878 ( fodInfos->ofnInfos->Flags & OFN_FILEMUSTEXIST) &&
1879 ! ( fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG ) )
1880 {
1881 LPWSTR lpstrTemp = lpstrFileList;
1882
1883 for ( nCount = 0; nCount < nFileCount; nCount++ )
1884 {
1885 LPITEMIDLIST pidl;
1886
1887 pidl = GetPidlFromName(fodInfos->Shell.FOIShellFolder, lpstrTemp);
1888 if (!pidl)
1889 {
1890 WCHAR lpstrNotFound[100];
1891 WCHAR lpstrMsg[100];
1892 WCHAR tmp[400];
1893 static const WCHAR nl[] = {'\n',0};
1894
1895 LoadStringW(COMDLG32_hInstance, IDS_FILENOTFOUND, lpstrNotFound, 100);
1896 LoadStringW(COMDLG32_hInstance, IDS_VERIFYFILE, lpstrMsg, 100);
1897
1898 lstrcpyW(tmp, lpstrTemp);
1899 lstrcatW(tmp, nl);
1900 lstrcatW(tmp, lpstrNotFound);
1901 lstrcatW(tmp, nl);
1902 lstrcatW(tmp, lpstrMsg);
1903
1904 MessageBoxW(hwnd, tmp, fodInfos->title, MB_OK | MB_ICONEXCLAMATION);
1905 return FALSE;
1906 }
1907
1908 /* move to the next file in the list of files */
1909 lpstrTemp += lstrlenW(lpstrTemp) + 1;
1910 COMDLG32_SHFree(pidl);
1911 }
1912 }
1913
1914 nSizePath = lstrlenW(lpstrPathSpec) + 1;
1915 if ( !(fodInfos->ofnInfos->Flags & OFN_EXPLORER) )
1916 {
1917 /* For "oldstyle" dialog the components have to
1918 be separated by blanks (not '\0'!) and short
1919 filenames have to be used! */
1920 FIXME("Components have to be separated by blanks\n");
1921 }
1922 if(fodInfos->unicode)
1923 {
1924 LPOPENFILENAMEW ofn = fodInfos->ofnInfos;
1925 lstrcpyW( ofn->lpstrFile, lpstrPathSpec);
1926 memcpy( ofn->lpstrFile + nSizePath, lpstrFileList, sizeUsed*sizeof(WCHAR) );
1927 }
1928 else
1929 {
1930 LPOPENFILENAMEA ofn = (LPOPENFILENAMEA)fodInfos->ofnInfos;
1931
1932 if (ofn->lpstrFile != NULL)
1933 {
1934 nSizePath = WideCharToMultiByte(CP_ACP, 0, lpstrPathSpec, -1,
1935 ofn->lpstrFile, ofn->nMaxFile, NULL, NULL);
1936 if (ofn->nMaxFile > nSizePath)
1937 {
1938 WideCharToMultiByte(CP_ACP, 0, lpstrFileList, sizeUsed,
1939 ofn->lpstrFile + nSizePath,
1940 ofn->nMaxFile - nSizePath, NULL, NULL);
1941 }
1942 }
1943 }
1944
1945 fodInfos->ofnInfos->nFileOffset = nSizePath;
1946 fodInfos->ofnInfos->nFileExtension = 0;
1947
1948 if ( !FILEDLG95_SendFileOK(hwnd, fodInfos) )
1949 return FALSE;
1950
1951 /* clean and exit */
1952 FILEDLG95_Clean(hwnd);
1953 return EndDialog(hwnd,TRUE);
1954 }
1955
1956 /***********************************************************************
1957 * FILEDLG95_OnOpen
1958 *
1959 * Ok button WM_COMMAND message handler
1960 *
1961 * If the function succeeds, the return value is nonzero.
1962 */
1963 #define ONOPEN_BROWSE 1
1964 #define ONOPEN_OPEN 2
1965 #define ONOPEN_SEARCH 3
1966 static void FILEDLG95_OnOpenMessage(HWND hwnd, int idCaption, int idText)
1967 {
1968 WCHAR strMsgTitle[MAX_PATH];
1969 WCHAR strMsgText [MAX_PATH];
1970 if (idCaption)
1971 LoadStringW(COMDLG32_hInstance, idCaption, strMsgTitle, sizeof(strMsgTitle)/sizeof(WCHAR));
1972 else
1973 strMsgTitle[0] = '\0';
1974 LoadStringW(COMDLG32_hInstance, idText, strMsgText, sizeof(strMsgText)/sizeof(WCHAR));
1975 MessageBoxW(hwnd,strMsgText, strMsgTitle, MB_OK | MB_ICONHAND);
1976 }
1977
1978 BOOL FILEDLG95_OnOpen(HWND hwnd)
1979 {
1980 LPWSTR lpstrFileList;
1981 UINT nFileCount = 0;
1982 UINT sizeUsed = 0;
1983 BOOL ret = TRUE;
1984 WCHAR lpstrPathAndFile[MAX_PATH];
1985 WCHAR lpstrTemp[MAX_PATH];
1986 LPSHELLFOLDER lpsf = NULL;
1987 int nOpenAction;
1988 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
1989
1990 TRACE("hwnd=%p\n", hwnd);
1991
1992 /* try to browse the selected item */
1993 if(BrowseSelectedFolder(hwnd))
1994 return FALSE;
1995
1996 /* get the files from the edit control */
1997 nFileCount = FILEDLG95_FILENAME_GetFileNames(hwnd, &lpstrFileList, &sizeUsed);
1998
1999 if(nFileCount == 0)
2000 return FALSE;
2001
2002 if(nFileCount > 1)
2003 {
2004 ret = FILEDLG95_OnOpenMultipleFiles(hwnd, lpstrFileList, nFileCount, sizeUsed);
2005 goto ret;
2006 }
2007
2008 TRACE("count=%u len=%u file=%s\n", nFileCount, sizeUsed, debugstr_w(lpstrFileList));
2009
2010 /*
2011 Step 1: Build a complete path name from the current folder and
2012 the filename or path in the edit box.
2013 Special cases:
2014 - the path in the edit box is a root path
2015 (with or without drive letter)
2016 - the edit box contains ".." (or a path with ".." in it)
2017 */
2018
2019 /* Get the current directory name */
2020 if (!COMDLG32_GetDisplayNameOf(fodInfos->ShellInfos.pidlAbsCurrent, lpstrPathAndFile))
2021 {
2022 /* last fallback */
2023 GetCurrentDirectoryW(MAX_PATH, lpstrPathAndFile);
2024 }
2025 PathAddBackslashW(lpstrPathAndFile);
2026
2027 TRACE("current directory=%s\n", debugstr_w(lpstrPathAndFile));
2028
2029 /* if the user specified a fully qualified path use it */
2030 if(PathIsRelativeW(lpstrFileList))
2031 {
2032 lstrcatW(lpstrPathAndFile, lpstrFileList);
2033 }
2034 else
2035 {
2036 /* does the path have a drive letter? */
2037 if (PathGetDriveNumberW(lpstrFileList) == -1)
2038 lstrcpyW(lpstrPathAndFile+2, lpstrFileList);
2039 else
2040 lstrcpyW(lpstrPathAndFile, lpstrFileList);
2041 }
2042
2043 /* resolve "." and ".." */
2044 PathCanonicalizeW(lpstrTemp, lpstrPathAndFile );
2045 lstrcpyW(lpstrPathAndFile, lpstrTemp);
2046 TRACE("canon=%s\n", debugstr_w(lpstrPathAndFile));
2047
2048 MemFree(lpstrFileList);
2049
2050 /*
2051 Step 2: here we have a cleaned up path
2052
2053 We have to parse the path step by step to see if we have to browse
2054 to a folder if the path points to a directory or the last
2055 valid element is a directory.
2056
2057 valid variables:
2058 lpstrPathAndFile: cleaned up path
2059 */
2060
2061 if (nFileCount &&
2062 (fodInfos->ofnInfos->Flags & OFN_NOVALIDATE) &&
2063 !(fodInfos->ofnInfos->Flags & OFN_FILEMUSTEXIST))
2064 nOpenAction = ONOPEN_OPEN;
2065 else
2066 nOpenAction = ONOPEN_BROWSE;
2067
2068 /* don't apply any checks with OFN_NOVALIDATE */
2069 {
2070 LPWSTR lpszTemp, lpszTemp1;
2071 LPITEMIDLIST pidl = NULL;
2072 static const WCHAR szwInvalid[] = { '/',':','<','>','|', 0};
2073
2074 /* check for invalid chars */
2075 if((strpbrkW(lpstrPathAndFile+3, szwInvalid) != NULL) && !(fodInfos->ofnInfos->Flags & OFN_NOVALIDATE))
2076 {
2077 FILEDLG95_OnOpenMessage(hwnd, IDS_INVALID_FILENAME_TITLE, IDS_INVALID_FILENAME);
2078 ret = FALSE;
2079 goto ret;
2080 }
2081
2082 if (FAILED (SHGetDesktopFolder(&lpsf))) return FALSE;
2083
2084 lpszTemp1 = lpszTemp = lpstrPathAndFile;
2085 while (lpszTemp1)
2086 {
2087 LPSHELLFOLDER lpsfChild;
2088 WCHAR lpwstrTemp[MAX_PATH];
2089 DWORD dwEaten, dwAttributes;
2090 LPWSTR p;
2091
2092 lstrcpyW(lpwstrTemp, lpszTemp);
2093 p = PathFindNextComponentW(lpwstrTemp);
2094
2095 if (!p) break; /* end of path */
2096
2097 *p = 0;
2098 lpszTemp = lpszTemp + lstrlenW(lpwstrTemp);
2099
2100 /* There are no wildcards when OFN_NOVALIDATE is set */
2101 if(*lpszTemp==0 && !(fodInfos->ofnInfos->Flags & OFN_NOVALIDATE))
2102 {
2103 static const WCHAR wszWild[] = { '*', '?', 0 };
2104 /* if the last element is a wildcard do a search */
2105 if(strpbrkW(lpszTemp1, wszWild) != NULL)
2106 {
2107 nOpenAction = ONOPEN_SEARCH;
2108 break;
2109 }
2110 }
2111 lpszTemp1 = lpszTemp;
2112
2113 TRACE("parse now=%s next=%s sf=%p\n",debugstr_w(lpwstrTemp), debugstr_w(lpszTemp), lpsf);
2114
2115 /* append a backslash to drive letters */
2116 if(lstrlenW(lpwstrTemp)==2 && lpwstrTemp[1] == ':' &&
2117 ((lpwstrTemp[0] >= 'a' && lpwstrTemp[0] <= 'z') ||
2118 (lpwstrTemp[0] >= 'A' && lpwstrTemp[0] <= 'Z')))
2119 {
2120 PathAddBackslashW(lpwstrTemp);
2121 }
2122
2123 dwAttributes = SFGAO_FOLDER;
2124 if(SUCCEEDED(IShellFolder_ParseDisplayName(lpsf, hwnd, NULL, lpwstrTemp, &dwEaten, &pidl, &dwAttributes)))
2125 {
2126 /* the path component is valid, we have a pidl of the next path component */
2127 TRACE("parse OK attr=0x%08x pidl=%p\n", dwAttributes, pidl);
2128 if(dwAttributes & SFGAO_FOLDER)
2129 {
2130 if(FAILED(IShellFolder_BindToObject(lpsf, pidl, 0, &IID_IShellFolder, (LPVOID*)&lpsfChild)))
2131 {
2132 ERR("bind to failed\n"); /* should not fail */
2133 break;
2134 }
2135 IShellFolder_Release(lpsf);
2136 lpsf = lpsfChild;
2137 lpsfChild = NULL;
2138 }
2139 else
2140 {
2141 TRACE("value\n");
2142
2143 /* end dialog, return value */
2144 nOpenAction = ONOPEN_OPEN;
2145 break;
2146 }
2147 COMDLG32_SHFree(pidl);
2148 pidl = NULL;
2149 }
2150 else if (!(fodInfos->ofnInfos->Flags & OFN_NOVALIDATE))
2151 {
2152 if(*lpszTemp || /* points to trailing null for last path element */
2153 (lpwstrTemp[strlenW(lpwstrTemp)-1] == '\\')) /* or if last element ends in '\' */
2154 {
2155 if(fodInfos->ofnInfos->Flags & OFN_PATHMUSTEXIST)
2156 {
2157 FILEDLG95_OnOpenMessage(hwnd, 0, IDS_PATHNOTEXISTING);
2158 break;
2159 }
2160 }
2161 else
2162 {
2163 if( (fodInfos->ofnInfos->Flags & OFN_FILEMUSTEXIST) &&
2164 !( fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG ) )
2165 {
2166 FILEDLG95_OnOpenMessage(hwnd, 0, IDS_FILENOTEXISTING);
2167 break;
2168 }
2169 }
2170 /* change to the current folder */
2171 nOpenAction = ONOPEN_OPEN;
2172 break;
2173 }
2174 else
2175 {
2176 nOpenAction = ONOPEN_OPEN;
2177 break;
2178 }
2179 }
2180 if(pidl) COMDLG32_SHFree(pidl);
2181 }
2182
2183 /*
2184 Step 3: here we have a cleaned up and validated path
2185
2186 valid variables:
2187 lpsf: ShellFolder bound to the rightmost valid path component
2188 lpstrPathAndFile: cleaned up path
2189 nOpenAction: action to do
2190 */
2191 TRACE("end validate sf=%p\n", lpsf);
2192
2193 switch(nOpenAction)
2194 {
2195 case ONOPEN_SEARCH: /* set the current filter to the file mask and refresh */
2196 TRACE("ONOPEN_SEARCH %s\n", debugstr_w(lpstrPathAndFile));
2197 {
2198 int iPos;
2199 LPWSTR lpszTemp = PathFindFileNameW(lpstrPathAndFile);
2200 DWORD len;
2201
2202 /* replace the current filter */
2203 MemFree(fodInfos->ShellInfos.lpstrCurrentFilter);
2204 len = lstrlenW(lpszTemp)+1;
2205 fodInfos->ShellInfos.lpstrCurrentFilter = MemAlloc(len * sizeof(WCHAR));
2206 lstrcpyW( fodInfos->ShellInfos.lpstrCurrentFilter, lpszTemp);
2207
2208 /* set the filter cb to the extension when possible */
2209 if(-1 < (iPos = FILEDLG95_FILETYPE_SearchExt(fodInfos->DlgInfos.hwndFileTypeCB, lpszTemp)))
2210 CBSetCurSel(fodInfos->DlgInfos.hwndFileTypeCB, iPos);
2211 }
2212 /* fall through */
2213 case ONOPEN_BROWSE: /* browse to the highest folder we could bind to */
2214 TRACE("ONOPEN_BROWSE\n");
2215 {
2216 IPersistFolder2 * ppf2;
2217 if(SUCCEEDED(IShellFolder_QueryInterface( lpsf, &IID_IPersistFolder2, (LPVOID*)&ppf2)))
2218 {
2219 LPITEMIDLIST pidlCurrent;
2220 IPersistFolder2_GetCurFolder(ppf2, &pidlCurrent);
2221 IPersistFolder2_Release(ppf2);
2222 if( ! COMDLG32_PIDL_ILIsEqual(pidlCurrent, fodInfos->ShellInfos.pidlAbsCurrent))
2223 {
2224 if (SUCCEEDED(IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser, pidlCurrent, SBSP_ABSOLUTE))
2225 && fodInfos->ofnInfos->Flags & OFN_EXPLORER)
2226 {
2227 SendCustomDlgNotificationMessage(hwnd, CDN_FOLDERCHANGE);
2228 }
2229 }
2230 else if( nOpenAction == ONOPEN_SEARCH )
2231 {
2232 if (fodInfos->Shell.FOIShellView)
2233 IShellView_Refresh(fodInfos->Shell.FOIShellView);
2234 }
2235 COMDLG32_SHFree(pidlCurrent);
2236 SendMessageW(fodInfos->DlgInfos.hwndFileName, EM_SETSEL, 0, -1);
2237 }
2238 }
2239 ret = FALSE;
2240 break;
2241 case ONOPEN_OPEN: /* fill in the return struct and close the dialog */
2242 TRACE("ONOPEN_OPEN %s\n", debugstr_w(lpstrPathAndFile));
2243 {
2244 WCHAR *ext = NULL;
2245
2246 /* update READONLY check box flag */
2247 if ((SendMessageW(GetDlgItem(hwnd,IDC_OPENREADONLY),BM_GETCHECK,0,0) & 0x03) == BST_CHECKED)
2248 fodInfos->ofnInfos->Flags |= OFN_READONLY;
2249 else
2250 fodInfos->ofnInfos->Flags &= ~OFN_READONLY;
2251
2252 /* Attach the file extension with file name*/
2253 ext = PathFindExtensionW(lpstrPathAndFile);
2254 if (! *ext)
2255 {
2256 /* if no extension is specified with file name, then */
2257 /* attach the extension from file filter or default one */
2258
2259 WCHAR *filterExt = NULL;
2260 LPWSTR lpstrFilter = NULL;
2261 static const WCHAR szwDot[] = {'.',0};
2262 int PathLength = lstrlenW(lpstrPathAndFile);
2263
2264 /* Attach the dot*/
2265 lstrcatW(lpstrPathAndFile, szwDot);
2266
2267 /*Get the file extension from file type filter*/
2268 lpstrFilter = (LPWSTR) CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB,
2269 fodInfos->ofnInfos->nFilterIndex-1);
2270
2271 if (lpstrFilter != (LPWSTR)CB_ERR) /* control is not empty */
2272 filterExt = PathFindExtensionW(lpstrFilter);
2273
2274 if ( filterExt && *filterExt ) /* attach the file extension from file type filter*/
2275 lstrcatW(lpstrPathAndFile, filterExt + 1);
2276 else if ( fodInfos->defext ) /* attach the default file extension*/
2277 lstrcatW(lpstrPathAndFile, fodInfos->defext);
2278
2279 /* In Open dialog: if file does not exist try without extension */
2280 if (!(fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG) && !PathFileExistsW(lpstrPathAndFile))
2281 lpstrPathAndFile[PathLength] = '\0';
2282 }
2283
2284 if (fodInfos->defext) /* add default extension */
2285 {
2286 /* Set/clear the output OFN_EXTENSIONDIFFERENT flag */
2287 if (*ext)
2288 ext++;
2289 if (!lstrcmpiW(fodInfos->defext, ext))
2290 fodInfos->ofnInfos->Flags &= ~OFN_EXTENSIONDIFFERENT;
2291 else
2292 fodInfos->ofnInfos->Flags |= OFN_EXTENSIONDIFFERENT;
2293 }
2294
2295 /* In Save dialog: check if the file already exists */
2296 if (fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG
2297 && fodInfos->ofnInfos->Flags & OFN_OVERWRITEPROMPT
2298 && PathFileExistsW(lpstrPathAndFile))
2299 {
2300 WCHAR lpstrOverwrite[100];
2301 int answer;
2302
2303 LoadStringW(COMDLG32_hInstance, IDS_OVERWRITEFILE, lpstrOverwrite, 100);
2304 answer = MessageBoxW(hwnd, lpstrOverwrite, fodInfos->title,
2305 MB_YESNO | MB_ICONEXCLAMATION);
2306 if (answer == IDNO)
2307 {
2308 ret = FALSE;
2309 goto ret;
2310 }
2311 }
2312
2313 /* In Open dialog: check if it should be created if it doesn't exist */
2314 if (!(fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG)
2315 && fodInfos->ofnInfos->Flags & OFN_CREATEPROMPT
2316 && !PathFileExistsW(lpstrPathAndFile))
2317 {
2318 WCHAR lpstrCreate[100];
2319 int answer;
2320
2321 LoadStringW(COMDLG32_hInstance, IDS_CREATEFILE, lpstrCreate, 100);
2322 answer = MessageBoxW(hwnd, lpstrCreate, fodInfos->title,
2323 MB_YESNO | MB_ICONEXCLAMATION);
2324 if (answer == IDNO)
2325 {
2326 ret = FALSE;
2327 goto ret;
2328 }
2329 }
2330
2331 /* Check that the size of the file does not exceed buffer size.
2332 (Allow for extra \0 if OFN_MULTISELECT is set.) */
2333 if(lstrlenW(lpstrPathAndFile) < fodInfos->ofnInfos->nMaxFile -
2334 ((fodInfos->ofnInfos->Flags & OFN_ALLOWMULTISELECT) ? 1 : 0))
2335 {
2336
2337 /* fill destination buffer */
2338 if (fodInfos->ofnInfos->lpstrFile)
2339 {
2340 if(fodInfos->unicode)
2341 {
2342 LPOPENFILENAMEW ofn = fodInfos->ofnInfos;
2343
2344 lstrcpynW(ofn->lpstrFile, lpstrPathAndFile, ofn->nMaxFile);
2345 if (ofn->Flags & OFN_ALLOWMULTISELECT)
2346 ofn->lpstrFile[lstrlenW(ofn->lpstrFile) + 1] = '\0';
2347 }
2348 else
2349 {
2350 LPOPENFILENAMEA ofn = (LPOPENFILENAMEA)fodInfos->ofnInfos;
2351
2352 WideCharToMultiByte(CP_ACP, 0, lpstrPathAndFile, -1,
2353 ofn->lpstrFile, ofn->nMaxFile, NULL, NULL);
2354 if (ofn->Flags & OFN_ALLOWMULTISELECT)
2355 ofn->lpstrFile[lstrlenA(ofn->lpstrFile) + 1] = '\0';
2356 }
2357 }
2358
2359 if(fodInfos->unicode)
2360 {
2361 LPWSTR lpszTemp;
2362
2363 /* set filename offset */
2364 lpszTemp = PathFindFileNameW(lpstrPathAndFile);
2365 fodInfos->ofnInfos->nFileOffset = (lpszTemp - lpstrPathAndFile);
2366
2367 /* set extension offset */
2368 lpszTemp = PathFindExtensionW(lpstrPathAndFile);
2369 fodInfos->ofnInfos->nFileExtension = (*lpszTemp) ? (lpszTemp - lpstrPathAndFile) + 1 : 0;
2370 }
2371 else
2372 {
2373 LPSTR lpszTemp;
2374 LPOPENFILENAMEA ofn = (LPOPENFILENAMEA)fodInfos->ofnInfos;
2375
2376 /* set filename offset */
2377 lpszTemp = PathFindFileNameA(ofn->lpstrFile);
2378 fodInfos->ofnInfos->nFileOffset = (lpszTemp - ofn->lpstrFile);
2379
2380 /* set extension offset */
2381 lpszTemp = PathFindExtensionA(ofn->lpstrFile);
2382 fodInfos->ofnInfos->nFileExtension = (*lpszTemp) ? (lpszTemp - ofn->lpstrFile) + 1 : 0;
2383 }
2384
2385 /* set the lpstrFileTitle */
2386 if(fodInfos->ofnInfos->lpstrFileTitle)
2387 {
2388 LPWSTR lpstrFileTitle = PathFindFileNameW(lpstrPathAndFile);
2389 if(fodInfos->unicode)
2390 {
2391 LPOPENFILENAMEW ofn = fodInfos->ofnInfos;
2392 lstrcpynW(ofn->lpstrFileTitle, lpstrFileTitle, ofn->nMaxFileTitle);
2393 }
2394 else
2395 {
2396 LPOPENFILENAMEA ofn = (LPOPENFILENAMEA)fodInfos->ofnInfos;
2397 WideCharToMultiByte(CP_ACP, 0, lpstrFileTitle, -1,
2398 ofn->lpstrFileTitle, ofn->nMaxFileTitle, NULL, NULL);
2399 }
2400 }
2401
2402 /* copy currently selected filter to lpstrCustomFilter */
2403 if (fodInfos->ofnInfos->lpstrCustomFilter)
2404 {
2405 LPOPENFILENAMEA ofn = (LPOPENFILENAMEA)fodInfos->ofnInfos;
2406 int len = WideCharToMultiByte(CP_ACP, 0, fodInfos->ShellInfos.lpstrCurrentFilter, -1,
2407 NULL, 0, NULL, NULL);
2408 if (len + strlen(ofn->lpstrCustomFilter) + 1 <= ofn->nMaxCustFilter)
2409 {
2410 LPSTR s = ofn->lpstrCustomFilter;
2411 s += strlen(ofn->lpstrCustomFilter)+1;
2412 WideCharToMultiByte(CP_ACP, 0, fodInfos->ShellInfos.lpstrCurrentFilter, -1,
2413 s, len, NULL, NULL);
2414 }
2415 }
2416
2417
2418 if ( !FILEDLG95_SendFileOK(hwnd, fodInfos) )
2419 goto ret;
2420
2421 TRACE("close\n");
2422 FILEDLG95_Clean(hwnd);
2423 ret = EndDialog(hwnd, TRUE);
2424 }
2425 else
2426 {
2427 WORD size;
2428
2429 size = lstrlenW(lpstrPathAndFile) + 1;
2430 if (fodInfos->ofnInfos->Flags & OFN_ALLOWMULTISELECT)
2431 size += 1;
2432 /* return needed size in first two bytes of lpstrFile */
2433 *(WORD *)fodInfos->ofnInfos->lpstrFile = size;
2434 FILEDLG95_Clean(hwnd);
2435 ret = EndDialog(hwnd, FALSE);
2436 COMDLG32_SetCommDlgExtendedError(FNERR_BUFFERTOOSMALL);
2437 }
2438 }
2439 break;
2440 }
2441
2442 ret:
2443 if(lpsf) IShellFolder_Release(lpsf);
2444 return ret;
2445 }
2446
2447 /***********************************************************************
2448 * FILEDLG95_SHELL_Init
2449 *
2450 * Initialisation of the shell objects
2451 */
2452 static LRESULT FILEDLG95_SHELL_Init(HWND hwnd)
2453 {
2454 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
2455
2456 TRACE("\n");
2457
2458 /*
2459 * Initialisation of the FileOpenDialogInfos structure
2460 */
2461
2462 /* Shell */
2463
2464 /*ShellInfos */
2465 fodInfos->ShellInfos.hwndOwner = hwnd;
2466
2467 /* Disable multi-select if flag not set */
2468 if (!(fodInfos->ofnInfos->Flags & OFN_ALLOWMULTISELECT))
2469 {
2470 fodInfos->ShellInfos.folderSettings.fFlags |= FWF_SINGLESEL;
2471 }
2472 fodInfos->ShellInfos.folderSettings.fFlags |= FWF_AUTOARRANGE | FWF_ALIGNLEFT;
2473 fodInfos->ShellInfos.folderSettings.ViewMode = FVM_LIST;
2474
2475 /* Construct the IShellBrowser interface */
2476 fodInfos->Shell.FOIShellBrowser = IShellBrowserImpl_Construct(hwnd);
2477
2478 return NOERROR;
2479 }
2480
2481 /***********************************************************************
2482 * FILEDLG95_SHELL_ExecuteCommand
2483 *
2484 * Change the folder option and refresh the view
2485 * If the function succeeds, the return value is nonzero.
2486 */
2487 static BOOL FILEDLG95_SHELL_ExecuteCommand(HWND hwnd, LPCSTR lpVerb)
2488 {
2489 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
2490 IContextMenu * pcm;
2491
2492 TRACE("(%p,%p)\n", hwnd, lpVerb);
2493
2494 if(SUCCEEDED(IShellView_GetItemObject(fodInfos->Shell.FOIShellView,
2495 SVGIO_BACKGROUND,
2496 &IID_IContextMenu,
2497 (LPVOID*)&pcm)))
2498 {
2499 CMINVOKECOMMANDINFO ci;
2500 ZeroMemory(&ci, sizeof(CMINVOKECOMMANDINFO));
2501 ci.cbSize = sizeof(CMINVOKECOMMANDINFO);
2502 ci.lpVerb = lpVerb;
2503 ci.hwnd = hwnd;
2504
2505 IContextMenu_InvokeCommand(pcm, &ci);
2506 IContextMenu_Release(pcm);
2507 }
2508
2509 return FALSE;
2510 }
2511
2512 /***********************************************************************
2513 * FILEDLG95_SHELL_UpFolder
2514 *
2515 * Browse to the specified object
2516 * If the function succeeds, the return value is nonzero.
2517 */
2518 static BOOL FILEDLG95_SHELL_UpFolder(HWND hwnd)
2519 {
2520 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
2521
2522 TRACE("\n");
2523
2524 if(SUCCEEDED(IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser,
2525 NULL,
2526 SBSP_PARENT)))
2527 {
2528 if(fodInfos->ofnInfos->Flags & OFN_EXPLORER)
2529 SendCustomDlgNotificationMessage(hwnd, CDN_FOLDERCHANGE);
2530 return TRUE;
2531 }
2532 return FALSE;
2533 }
2534
2535 /***********************************************************************
2536 * FILEDLG95_SHELL_BrowseToDesktop
2537 *
2538 * Browse to the Desktop
2539 * If the function succeeds, the return value is nonzero.
2540 */
2541 static BOOL FILEDLG95_SHELL_BrowseToDesktop(HWND hwnd)
2542 {
2543 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
2544 LPITEMIDLIST pidl;
2545 HRESULT hres;
2546
2547 TRACE("\n");
2548
2549 SHGetSpecialFolderLocation(0,CSIDL_DESKTOP,&pidl);
2550 hres = IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser, pidl, SBSP_ABSOLUTE);
2551 if(fodInfos->ofnInfos->Flags & OFN_EXPLORER)
2552 SendCustomDlgNotificationMessage(hwnd, CDN_FOLDERCHANGE);
2553 COMDLG32_SHFree(pidl);
2554 return SUCCEEDED(hres);
2555 }
2556 /***********************************************************************
2557 * FILEDLG95_SHELL_Clean
2558 *
2559 * Cleans the memory used by shell objects
2560 */
2561 static void FILEDLG95_SHELL_Clean(HWND hwnd)
2562 {
2563 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
2564
2565 TRACE("\n");
2566
2567 COMDLG32_SHFree(fodInfos->ShellInfos.pidlAbsCurrent);
2568
2569 /* clean Shell interfaces */
2570 if (fodInfos->Shell.FOIShellView)
2571 {
2572 IShellView_DestroyViewWindow(fodInfos->Shell.FOIShellView);
2573 IShellView_Release(fodInfos->Shell.FOIShellView);
2574 }
2575 IShellFolder_Release(fodInfos->Shell.FOIShellFolder);
2576 IShellBrowser_Release(fodInfos->Shell.FOIShellBrowser);
2577 if (fodInfos->Shell.FOIDataObject)
2578 IDataObject_Release(fodInfos->Shell.FOIDataObject);
2579 }
2580
2581 /***********************************************************************
2582 * FILEDLG95_FILETYPE_Init
2583 *
2584 * Initialisation of the file type combo box
2585 */
2586 static HRESULT FILEDLG95_FILETYPE_Init(HWND hwnd)
2587 {
2588 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
2589 int nFilters = 0; /* number of filters */
2590 int nFilterIndexCB;
2591
2592 TRACE("\n");
2593
2594 if(fodInfos->customfilter)
2595 {
2596 /* customfilter has one entry... title\0ext\0
2597 * Set first entry of combo box item with customfilter
2598 */
2599 LPWSTR lpstrExt;
2600 LPCWSTR lpstrPos = fodInfos->customfilter;
2601
2602 /* Get the title */
2603 lpstrPos += lstrlenW(fodInfos->customfilter) + 1;
2604
2605 /* Copy the extensions */
2606 if (! *lpstrPos) return E_FAIL; /* malformed filter */
2607 if (!(lpstrExt = MemAlloc((lstrlenW(lpstrPos)+1)*sizeof(WCHAR)))) return E_FAIL;
2608 lstrcpyW(lpstrExt,lpstrPos);
2609
2610 /* Add the item at the end of the combo */
2611 CBAddString(fodInfos->DlgInfos.hwndFileTypeCB, fodInfos->customfilter);
2612 CBSetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB, nFilters, lpstrExt);
2613 nFilters++;
2614 }
2615 if(fodInfos->filter)
2616 {
2617 LPCWSTR lpstrPos = fodInfos->filter;
2618
2619 for(;;)
2620 {
2621 /* filter is a list... title\0ext\0......\0\0
2622 * Set the combo item text to the title and the item data
2623 * to the ext
2624 */
2625 LPCWSTR lpstrDisplay;
2626 LPWSTR lpstrExt;
2627
2628 /* Get the title */
2629 if(! *lpstrPos) break; /* end */
2630 lpstrDisplay = lpstrPos;
2631 lpstrPos += lstrlenW(lpstrPos) + 1;
2632
2633 CBAddString(fodInfos->DlgInfos.hwndFileTypeCB, lpstrDisplay);
2634
2635 nFilters++;
2636
2637 /* Copy the extensions */
2638 if (!(lpstrExt = MemAlloc((lstrlenW(lpstrPos)+1)*sizeof(WCHAR)))) return E_FAIL;
2639 lstrcpyW(lpstrExt,lpstrPos);
2640 lpstrPos += lstrlenW(lpstrPos) + 1;
2641
2642 /* Add the item at the end of the combo */
2643 CBSetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB, nFilters-1, lpstrExt);
2644
2645 /* malformed filters are added anyway... */
2646 if (!*lpstrExt) break;
2647 }
2648 }
2649
2650 /*
2651 * Set the current filter to the one specified
2652 * in the initialisation structure
2653 */
2654 if (fodInfos->filter || fodInfos->customfilter)
2655 {
2656 LPWSTR lpstrFilter;
2657
2658 /* Check to make sure our index isn't out of bounds. */
2659 if ( fodInfos->ofnInfos->nFilterIndex >
2660 nFilters - (fodInfos->customfilter == NULL ? 0 : 1) )
2661 fodInfos->ofnInfos->nFilterIndex = (fodInfos->customfilter == NULL ? 1 : 0);
2662
2663 /* set default filter index */
2664 if(fodInfos->ofnInfos->nFilterIndex == 0 && fodInfos->customfilter == NULL)
2665 fodInfos->ofnInfos->nFilterIndex = 1;
2666
2667 /* calculate index of Combo Box item */
2668 nFilterIndexCB = fodInfos->ofnInfos->nFilterIndex;
2669 if (fodInfos->customfilter == NULL)
2670 nFilterIndexCB--;
2671
2672 /* Set the current index selection. */
2673 CBSetCurSel(fodInfos->DlgInfos.hwndFileTypeCB, nFilterIndexCB);
2674
2675 /* Get the corresponding text string from the combo box. */
2676 lpstrFilter = (LPWSTR) CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB,
2677 nFilterIndexCB);
2678
2679 if ((INT_PTR)lpstrFilter == CB_ERR) /* control is empty */
2680 lpstrFilter = NULL;
2681
2682 if(lpstrFilter)
2683 {
2684 DWORD len;
2685 CharLowerW(lpstrFilter); /* lowercase */
2686 len = lstrlenW(lpstrFilter)+1;
2687 fodInfos->ShellInfos.lpstrCurrentFilter = MemAlloc( len * sizeof(WCHAR) );
2688 lstrcpyW(fodInfos->ShellInfos.lpstrCurrentFilter,lpstrFilter);
2689 }
2690 } else
2691 fodInfos->ofnInfos->nFilterIndex = 0;
2692 return S_OK;
2693 }
2694
2695 /***********************************************************************
2696 * FILEDLG95_FILETYPE_OnCommand
2697 *
2698 * WM_COMMAND of the file type combo box
2699 * If the function succeeds, the return value is nonzero.
2700 */
2701 static BOOL FILEDLG95_FILETYPE_OnCommand(HWND hwnd, WORD wNotifyCode)
2702 {
2703 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
2704
2705 switch(wNotifyCode)
2706 {
2707 case CBN_SELENDOK:
2708 {
2709 LPWSTR lpstrFilter;
2710
2711 /* Get the current item of the filetype combo box */
2712 int iItem = CBGetCurSel(fodInfos->DlgInfos.hwndFileTypeCB);
2713
2714 /* set the current filter index */
2715 fodInfos->ofnInfos->nFilterIndex = iItem +
2716 (fodInfos->customfilter == NULL ? 1 : 0);
2717
2718 /* Set the current filter with the current selection */
2719 MemFree(fodInfos->ShellInfos.lpstrCurrentFilter);
2720
2721 lpstrFilter = (LPWSTR) CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB,
2722 iItem);
2723 if((INT_PTR)lpstrFilter != CB_ERR)
2724 {
2725 DWORD len;
2726 CharLowerW(lpstrFilter); /* lowercase */
2727 len = lstrlenW(lpstrFilter)+1;
2728 fodInfos->ShellInfos.lpstrCurrentFilter = MemAlloc( len * sizeof(WCHAR) );
2729 lstrcpyW(fodInfos->ShellInfos.lpstrCurrentFilter,lpstrFilter);
2730 if(fodInfos->ofnInfos->Flags & OFN_EXPLORER)
2731 SendCustomDlgNotificationMessage(hwnd,CDN_TYPECHANGE);
2732 }
2733
2734 /* Refresh the actual view to display the included items*/
2735 if (fodInfos->Shell.FOIShellView)
2736 IShellView_Refresh(fodInfos->Shell.FOIShellView);
2737 }
2738 }
2739 return FALSE;
2740 }
2741 /***********************************************************************
2742 * FILEDLG95_FILETYPE_SearchExt
2743 *
2744 * searches for an extension in the filetype box
2745 */
2746 static int FILEDLG95_FILETYPE_SearchExt(HWND hwnd,LPCWSTR lpstrExt)
2747 {
2748 int i, iCount = CBGetCount(hwnd);
2749
2750 TRACE("%s\n", debugstr_w(lpstrExt));
2751
2752 if(iCount != CB_ERR)
2753 {
2754 for(i=0;i<iCount;i++)
2755 {
2756 if(!lstrcmpiW(lpstrExt,(LPWSTR)CBGetItemDataPtr(hwnd,i)))
2757 return i;
2758 }
2759 }
2760 return -1;
2761 }
2762
2763 /***********************************************************************
2764 * FILEDLG95_FILETYPE_Clean
2765 *
2766 * Clean the memory used by the filetype combo box
2767 */
2768 static void FILEDLG95_FILETYPE_Clean(HWND hwnd)
2769 {
2770 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
2771 int iPos;
2772 int iCount = CBGetCount(fodInfos->DlgInfos.hwndFileTypeCB);
2773
2774 TRACE("\n");
2775
2776 /* Delete each string of the combo and their associated data */
2777 if(iCount != CB_ERR)
2778 {
2779 for(iPos = iCount-1;iPos>=0;iPos--)
2780 {
2781 MemFree((LPSTR) CBGetItemDataPtr(fodInfos->DlgInfos.hwndFileTypeCB,iPos));
2782 CBDeleteString(fodInfos->DlgInfos.hwndFileTypeCB,iPos);
2783 }
2784 }
2785 /* Current filter */
2786 MemFree(fodInfos->ShellInfos.lpstrCurrentFilter);
2787
2788 }
2789
2790 /***********************************************************************
2791 * FILEDLG95_LOOKIN_Init
2792 *
2793 * Initialisation of the look in combo box
2794 */
2795
2796 /* Small helper function, to determine if the unixfs shell extension is rooted
2797 * at the desktop. Copied from dlls/shell32/shfldr_unixfs.c.
2798 */
2799 static inline BOOL FILEDLG95_unixfs_is_rooted_at_desktop(void) {
2800 HKEY hKey;
2801 static const WCHAR wszRootedAtDesktop[] = { 'S','o','f','t','w','a','r','e','\\',
2802 'M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
2803 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
2804 'E','x','p','l','o','r','e','r','\\','D','e','s','k','t','o','p','\\',
2805 'N','a','m','e','S','p','a','c','e','\\','{','9','D','2','0','A','A','E','8',
2806 '-','0','6','2','5','-','4','4','B','0','-','9','C','A','7','-',
2807 '7','1','8','8','9','C','2','2','5','4','D','9','}',0 };
2808
2809 if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, wszRootedAtDesktop, 0, KEY_READ, &hKey) != ERROR_SUCCESS)
2810 return FALSE;
2811
2812 RegCloseKey(hKey);
2813 return TRUE;
2814 }
2815
2816 static void FILEDLG95_LOOKIN_Init(HWND hwndCombo)
2817 {
2818 IShellFolder *psfRoot, *psfDrives;
2819 IEnumIDList *lpeRoot, *lpeDrives;
2820 LPITEMIDLIST pidlDrives, pidlTmp, pidlTmp1, pidlAbsTmp;
2821
2822 LookInInfos *liInfos = MemAlloc(sizeof(LookInInfos));
2823
2824 TRACE("\n");
2825
2826 liInfos->iMaxIndentation = 0;
2827
2828 SetPropA(hwndCombo, LookInInfosStr, liInfos);
2829
2830 /* set item height for both text field and listbox */
2831 CBSetItemHeight(hwndCombo,-1,GetSystemMetrics(SM_CYSMICON));
2832 CBSetItemHeight(hwndCombo,0,GetSystemMetrics(SM_CYSMICON));
2833
2834 /* Turn on the extended UI for the combo box like Windows does */
2835 CBSetExtendedUI(hwndCombo, TRUE);
2836
2837 /* Initialise data of Desktop folder */
2838 SHGetSpecialFolderLocation(0,CSIDL_DESKTOP,&pidlTmp);
2839 FILEDLG95_LOOKIN_AddItem(hwndCombo, pidlTmp,LISTEND);
2840 COMDLG32_SHFree(pidlTmp);
2841
2842 SHGetSpecialFolderLocation(0,CSIDL_DRIVES,&pidlDrives);
2843
2844 SHGetDesktopFolder(&psfRoot);
2845
2846 if (psfRoot)
2847 {
2848 /* enumerate the contents of the desktop */
2849 if(SUCCEEDED(IShellFolder_EnumObjects(psfRoot, hwndCombo, SHCONTF_FOLDERS, &lpeRoot)))
2850 {
2851 while (S_OK == IEnumIDList_Next(lpeRoot, 1, &pidlTmp, NULL))
2852 {
2853 FILEDLG95_LOOKIN_AddItem(hwndCombo, pidlTmp,LISTEND);
2854
2855 /* If the unixfs extension is rooted, we don't expand the drives by default */
2856 if (!FILEDLG95_unixfs_is_rooted_at_desktop())
2857 {
2858 /* special handling for CSIDL_DRIVES */
2859 if (COMDLG32_PIDL_ILIsEqual(pidlTmp, pidlDrives))
2860 {
2861 if(SUCCEEDED(IShellFolder_BindToObject(psfRoot, pidlTmp, NULL, &IID_IShellFolder, (LPVOID*)&psfDrives)))
2862 {
2863 /* enumerate the drives */
2864 if(SUCCEEDED(IShellFolder_EnumObjects(psfDrives, hwndCombo,SHCONTF_FOLDERS, &lpeDrives)))
2865 {
2866 while (S_OK == IEnumIDList_Next(lpeDrives, 1, &pidlTmp1, NULL))
2867 {
2868 pidlAbsTmp = COMDLG32_PIDL_ILCombine(pidlTmp, pidlTmp1);
2869 FILEDLG95_LOOKIN_AddItem(hwndCombo, pidlAbsTmp,LISTEND);
2870 COMDLG32_SHFree(pidlAbsTmp);
2871 COMDLG32_SHFree(pidlTmp1);
2872 }
2873 IEnumIDList_Release(lpeDrives);
2874 }
2875 IShellFolder_Release(psfDrives);
2876 }
2877 }
2878 }
2879
2880 COMDLG32_SHFree(pidlTmp);
2881 }
2882 IEnumIDList_Release(lpeRoot);
2883 }
2884 IShellFolder_Release(psfRoot);
2885 }
2886
2887 COMDLG32_SHFree(pidlDrives);
2888 }
2889
2890 /***********************************************************************
2891 * FILEDLG95_LOOKIN_DrawItem
2892 *
2893 * WM_DRAWITEM message handler
2894 */
2895 static LRESULT FILEDLG95_LOOKIN_DrawItem(LPDRAWITEMSTRUCT pDIStruct)
2896 {
2897 COLORREF crWin = GetSysColor(COLOR_WINDOW);
2898 COLORREF crHighLight = GetSysColor(COLOR_HIGHLIGHT);
2899 COLORREF crText = GetSysColor(COLOR_WINDOWTEXT);
2900 RECT rectText;
2901 RECT rectIcon;
2902 SHFILEINFOW sfi;
2903 HIMAGELIST ilItemImage;
2904 int iIndentation;
2905 TEXTMETRICW tm;
2906 LPSFOLDER tmpFolder;
2907 LookInInfos *liInfos = GetPropA(pDIStruct->hwndItem,LookInInfosStr);
2908
2909 TRACE("\n");
2910
2911 if(pDIStruct->itemID == -1)
2912 return 0;
2913
2914 if(!(tmpFolder = (LPSFOLDER) CBGetItemDataPtr(pDIStruct->hwndItem,
2915 pDIStruct->itemID)))
2916 return 0;
2917
2918
2919 if(pDIStruct->itemID == liInfos->uSelectedItem)
2920 {
2921 ilItemImage = (HIMAGELIST) SHGetFileInfoW ((LPCWSTR) tmpFolder->pidlItem,
2922 0,
2923 &sfi,
2924 sizeof (sfi),
2925 SHGFI_PIDL | SHGFI_SMALLICON |
2926 SHGFI_OPENICON | SHGFI_SYSICONINDEX |
2927 SHGFI_DISPLAYNAME );
2928 }
2929 else
2930 {
2931 ilItemImage = (HIMAGELIST) SHGetFileInfoW ((LPCWSTR) tmpFolder->pidlItem,
2932 0,
2933 &sfi,
2934 sizeof (sfi),
2935 SHGFI_PIDL | SHGFI_SMALLICON |
2936 SHGFI_SYSICONINDEX |
2937 SHGFI_DISPLAYNAME);
2938 }
2939
2940 /* Is this item selected ? */
2941 if(pDIStruct->itemState & ODS_SELECTED)
2942 {
2943 SetTextColor(pDIStruct->hDC,(0x00FFFFFF & ~(crText)));
2944 SetBkColor(pDIStruct->hDC,crHighLight);
2945 FillRect(pDIStruct->hDC,&pDIStruct->rcItem,GetSysColorBrush(COLOR_HIGHLIGHT));
2946 }
2947 else
2948 {
2949 SetTextColor(pDIStruct->hDC,crText);
2950 SetBkColor(pDIStruct->hDC,crWin);
2951 FillRect(pDIStruct->hDC,&pDIStruct->rcItem,GetSysColorBrush(COLOR_WINDOW));
2952 }
2953
2954 /* Do not indent item if drawing in the edit of the combo */
2955 if(pDIStruct->itemState & ODS_COMBOBOXEDIT)
2956 {
2957 iIndentation = 0;
2958 ilItemImage = (HIMAGELIST) SHGetFileInfoW ((LPCWSTR) tmpFolder->pidlItem,
2959 0,
2960 &sfi,
2961 sizeof (sfi),
2962 SHGFI_PIDL | SHGFI_SMALLICON | SHGFI_OPENICON
2963 | SHGFI_SYSICONINDEX | SHGFI_DISPLAYNAME );
2964
2965 }
2966 else
2967 {
2968 iIndentation = tmpFolder->m_iIndent;
2969 }
2970 /* Draw text and icon */
2971
2972 /* Initialise the icon display area */
2973 rectIcon.left = pDIStruct->rcItem.left + ICONWIDTH/2 * iIndentation;
2974 rectIcon.top = pDIStruct->rcItem.top;
2975 rectIcon.right = rectIcon.left + ICONWIDTH;
2976 rectIcon.bottom = pDIStruct->rcItem.bottom;
2977
2978 /* Initialise the text display area */
2979 GetTextMetricsW(pDIStruct->hDC, &tm);
2980 rectText.left = rectIcon.right;
2981 rectText.top =
2982 (pDIStruct->rcItem.top + pDIStruct->rcItem.bottom - tm.tmHeight) / 2;
2983 rectText.right = pDIStruct->rcItem.right + XTEXTOFFSET;
2984 rectText.bottom =
2985 (pDIStruct->rcItem.top + pDIStruct->rcItem.bottom + tm.tmHeight) / 2;
2986
2987 /* Draw the icon from the image list */
2988 ImageList_Draw(ilItemImage,
2989 sfi.iIcon,
2990 pDIStruct->hDC,
2991 rectIcon.left,
2992 rectIcon.top,
2993 ILD_TRANSPARENT );
2994
2995 /* Draw the associated text */
2996 if(sfi.szDisplayName)
2997 TextOutW(pDIStruct->hDC,rectText.left,rectText.top,sfi.szDisplayName,lstrlenW(sfi.szDisplayName));
2998
2999
3000 return NOERROR;
3001 }
3002
3003 /***********************************************************************
3004 * FILEDLG95_LOOKIN_OnCommand
3005 *
3006 * LookIn combo box WM_COMMAND message handler
3007 * If the function succeeds, the return value is nonzero.
3008 */
3009 static BOOL FILEDLG95_LOOKIN_OnCommand(HWND hwnd, WORD wNotifyCode)
3010 {
3011 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
3012
3013 TRACE("%p\n", fodInfos);
3014
3015 switch(wNotifyCode)
3016 {
3017 case CBN_SELENDOK:
3018 {
3019 LPSFOLDER tmpFolder;
3020 int iItem;
3021
3022 iItem = CBGetCurSel(fodInfos->DlgInfos.hwndLookInCB);
3023
3024 if( iItem == CB_ERR) return FALSE;
3025
3026 if(!(tmpFolder = (LPSFOLDER) CBGetItemDataPtr(fodInfos->DlgInfos.hwndLookInCB,
3027 iItem)))
3028 return FALSE;
3029
3030
3031 if(SUCCEEDED(IShellBrowser_BrowseObject(fodInfos->Shell.FOIShellBrowser,
3032 tmpFolder->pidlItem,
3033 SBSP_ABSOLUTE)))
3034 {
3035 if(fodInfos->ofnInfos->Flags & OFN_EXPLORER)
3036 SendCustomDlgNotificationMessage(hwnd, CDN_FOLDERCHANGE);
3037 return TRUE;
3038 }
3039 break;
3040 }
3041
3042 }
3043 return FALSE;
3044 }
3045
3046 /***********************************************************************
3047 * FILEDLG95_LOOKIN_AddItem
3048 *
3049 * Adds an absolute pidl item to the lookin combo box
3050 * returns the index of the inserted item
3051 */
3052 static int FILEDLG95_LOOKIN_AddItem(HWND hwnd,LPITEMIDLIST pidl, int iInsertId)
3053 {
3054 LPITEMIDLIST pidlNext;
3055 SHFILEINFOW sfi;
3056 SFOLDER *tmpFolder;
3057 LookInInfos *liInfos;
3058
3059 TRACE("%08x\n", iInsertId);
3060
3061 if(!pidl)
3062 return -1;
3063
3064 if(!(liInfos = GetPropA(hwnd,LookInInfosStr)))
3065 return -1;
3066
3067 tmpFolder = MemAlloc(sizeof(SFOLDER));
3068 tmpFolder->m_iIndent = 0;
3069
3070 /* Calculate the indentation of the item in the lookin*/
3071 pidlNext = pidl;
3072 while( (pidlNext=COMDLG32_PIDL_ILGetNext(pidlNext)) )
3073 {
3074 tmpFolder->m_iIndent++;
3075 }
3076
3077 tmpFolder->pidlItem = COMDLG32_PIDL_ILClone(pidl);
3078
3079 if(tmpFolder->m_iIndent > liInfos->iMaxIndentation)
3080 liInfos->iMaxIndentation = tmpFolder->m_iIndent;
3081
3082 sfi.dwAttributes = SFGAO_FILESYSANCESTOR | SFGAO_FILESYSTEM;
3083 SHGetFileInfoW((LPCWSTR)pidl,
3084 0,
3085 &sfi,
3086 sizeof(sfi),
3087 SHGFI_DISPLAYNAME | SHGFI_SYSICONINDEX
3088 | SHGFI_PIDL | SHGFI_SMALLICON | SHGFI_ATTRIBUTES | SHGFI_ATTR_SPECIFIED);
3089
3090 TRACE("-- Add %s attr=%08x\n", debugstr_w(sfi.szDisplayName), sfi.dwAttributes);
3091
3092 if((sfi.dwAttributes & SFGAO_FILESYSANCESTOR) || (sfi.dwAttributes & SFGAO_FILESYSTEM))
3093 {
3094 int iItemID;
3095
3096 TRACE("-- Add %s at %u\n", debugstr_w(sfi.szDisplayName), tmpFolder->m_iIndent);
3097
3098 /* Add the item at the end of the list */
3099 if(iInsertId < 0)
3100 {
3101 iItemID = CBAddString(hwnd,sfi.szDisplayName);
3102 }
3103 /* Insert the item at the iInsertId position*/
3104 else
3105 {
3106 iItemID = CBInsertString(hwnd,sfi.szDisplayName,iInsertId);
3107 }
3108
3109 CBSetItemDataPtr(hwnd,iItemID,tmpFolder);
3110 return iItemID;
3111 }
3112
3113 COMDLG32_SHFree( tmpFolder->pidlItem );
3114 MemFree( tmpFolder );
3115 return -1;
3116
3117 }
3118
3119 /***********************************************************************
3120 * FILEDLG95_LOOKIN_InsertItemAfterParent
3121 *
3122 * Insert an item below its parent
3123 */
3124 static int FILEDLG95_LOOKIN_InsertItemAfterParent(HWND hwnd,LPITEMIDLIST pidl)
3125 {
3126
3127 LPITEMIDLIST pidlParent = GetParentPidl(pidl);
3128 int iParentPos;
3129
3130 TRACE("\n");
3131
3132 iParentPos = FILEDLG95_LOOKIN_SearchItem(hwnd,(WPARAM)pidlParent,SEARCH_PIDL);
3133
3134 if(iParentPos < 0)
3135 {
3136 iParentPos = FILEDLG95_LOOKIN_InsertItemAfterParent(hwnd,pidlParent);
3137 }
3138
3139 /* Free pidlParent memory */
3140 COMDLG32_SHFree(pidlParent);
3141
3142 return FILEDLG95_LOOKIN_AddItem(hwnd,pidl,iParentPos + 1);
3143 }
3144
3145 /***********************************************************************
3146 * FILEDLG95_LOOKIN_SelectItem
3147 *
3148 * Adds an absolute pidl item to the lookin combo box
3149 * returns the index of the inserted item
3150 */
3151 int FILEDLG95_LOOKIN_SelectItem(HWND hwnd,LPITEMIDLIST pidl)
3152 {
3153 int iItemPos;
3154 LookInInfos *liInfos;
3155
3156 TRACE("\n");
3157
3158 iItemPos = FILEDLG95_LOOKIN_SearchItem(hwnd,(WPARAM)pidl,SEARCH_PIDL);
3159
3160 liInfos = GetPropA(hwnd,LookInInfosStr);
3161
3162 if(iItemPos < 0)
3163 {
3164 while(FILEDLG95_LOOKIN_RemoveMostExpandedItem(hwnd) > -1);
3165 iItemPos = FILEDLG95_LOOKIN_InsertItemAfterParent(hwnd,pidl);
3166 }
3167
3168 else
3169 {
3170 SFOLDER *tmpFolder = (LPSFOLDER) CBGetItemDataPtr(hwnd,iItemPos);
3171 while(liInfos->iMaxIndentation > tmpFolder->m_iIndent)
3172 {
3173 int iRemovedItem;
3174
3175 if(-1 == (iRemovedItem = FILEDLG95_LOOKIN_RemoveMostExpandedItem(hwnd)))
3176 break;
3177 if(iRemovedItem < iItemPos)
3178 iItemPos--;
3179 }
3180 }
3181
3182 CBSetCurSel(hwnd,iItemPos);
3183 liInfos->uSelectedItem = iItemPos;
3184
3185 return 0;
3186
3187 }
3188
3189 /***********************************************************************
3190 * FILEDLG95_LOOKIN_RemoveMostExpandedItem
3191 *
3192 * Remove the item with an expansion level over iExpansionLevel
3193 */
3194 static int FILEDLG95_LOOKIN_RemoveMostExpandedItem(HWND hwnd)
3195 {
3196 int iItemPos;
3197 LookInInfos *liInfos = GetPropA(hwnd,LookInInfosStr);
3198
3199 TRACE("\n");
3200
3201 if(liInfos->iMaxIndentation <= 2)
3202 return -1;
3203
3204 if((iItemPos = FILEDLG95_LOOKIN_SearchItem(hwnd,liInfos->iMaxIndentation,SEARCH_EXP)) >=0)
3205 {
3206 SFOLDER *tmpFolder = (LPSFOLDER) CBGetItemDataPtr(hwnd,iItemPos);
3207 COMDLG32_SHFree(tmpFolder->pidlItem);
3208 MemFree(tmpFolder);
3209 CBDeleteString(hwnd,iItemPos);
3210 liInfos->iMaxIndentation--;
3211
3212 return iItemPos;
3213 }
3214
3215 return -1;
3216 }
3217
3218 /***********************************************************************
3219 * FILEDLG95_LOOKIN_SearchItem
3220 *
3221 * Search for pidl in the lookin combo box
3222 * returns the index of the found item
3223 */
3224 static int FILEDLG95_LOOKIN_SearchItem(HWND hwnd,WPARAM searchArg,int iSearchMethod)
3225 {
3226 int i = 0;
3227 int iCount = CBGetCount(hwnd);
3228
3229 TRACE("0x%08lx 0x%x\n",searchArg, iSearchMethod);
3230
3231 if (iCount != CB_ERR)
3232 {
3233 for(;i<iCount;i++)
3234 {
3235 LPSFOLDER tmpFolder = (LPSFOLDER) CBGetItemDataPtr(hwnd,i);
3236
3237 if(iSearchMethod == SEARCH_PIDL && COMDLG32_PIDL_ILIsEqual((LPITEMIDLIST)searchArg,tmpFolder->pidlItem))
3238 return i;
3239 if(iSearchMethod == SEARCH_EXP && tmpFolder->m_iIndent == (int)searchArg)
3240 return i;
3241 }
3242 }
3243
3244 return -1;
3245 }
3246
3247 /***********************************************************************
3248 * FILEDLG95_LOOKIN_Clean
3249 *
3250 * Clean the memory used by the lookin combo box
3251 */
3252 static void FILEDLG95_LOOKIN_Clean(HWND hwnd)
3253 {
3254 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
3255 LookInInfos *liInfos = GetPropA(fodInfos->DlgInfos.hwndLookInCB,LookInInfosStr);
3256 int iPos;
3257 int iCount = CBGetCount(fodInfos->DlgInfos.hwndLookInCB);
3258
3259 TRACE("\n");
3260
3261 /* Delete each string of the combo and their associated data */
3262 if (iCount != CB_ERR)
3263 {
3264 for(iPos = iCount-1;iPos>=0;iPos--)
3265 {
3266 SFOLDER *tmpFolder = (LPSFOLDER) CBGetItemDataPtr(fodInfos->DlgInfos.hwndLookInCB,iPos);
3267 COMDLG32_SHFree(tmpFolder->pidlItem);
3268 MemFree(tmpFolder);
3269 CBDeleteString(fodInfos->DlgInfos.hwndLookInCB,iPos);
3270 }
3271 }
3272
3273 /* LookInInfos structure */
3274 MemFree(liInfos);
3275 RemovePropA(fodInfos->DlgInfos.hwndLookInCB,LookInInfosStr);
3276 }
3277
3278 /***********************************************************************
3279 * FILEDLG95_FILENAME_FillFromSelection
3280 *
3281 * fills the edit box from the cached DataObject
3282 */
3283 void FILEDLG95_FILENAME_FillFromSelection (HWND hwnd)
3284 {
3285 FileOpenDlgInfos *fodInfos;
3286 LPITEMIDLIST pidl;
3287 UINT nFiles = 0, nFileToOpen, nFileSelected, nLength = 0;
3288 WCHAR lpstrTemp[MAX_PATH];
3289 LPWSTR lpstrAllFile, lpstrCurrFile;
3290
3291 TRACE("\n");
3292 fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
3293
3294 /* Count how many files we have */
3295 nFileSelected = GetNumSelected( fodInfos->Shell.FOIDataObject );
3296
3297 /* calculate the string length, count files */
3298 if (nFileSelected >= 1)
3299 {
3300 nLength += 3; /* first and last quotes, trailing \0 */
3301 for ( nFileToOpen = 0; nFileToOpen < nFileSelected; nFileToOpen++ )
3302 {
3303 pidl = GetPidlFromDataObject( fodInfos->Shell.FOIDataObject, nFileToOpen+1 );
3304
3305 if (pidl)
3306 {
3307 /* get the total length of the selected file names */
3308 lpstrTemp[0] = '\0';
3309 GetName( fodInfos->Shell.FOIShellFolder, pidl, SHGDN_INFOLDER|SHGDN_FORPARSING, lpstrTemp );
3310
3311 if ( ! IsPidlFolder(fodInfos->Shell.FOIShellFolder, pidl) ) /* Ignore folders */
3312 {
3313 nLength += lstrlenW( lpstrTemp ) + 3;
3314 nFiles++;
3315 }
3316 COMDLG32_SHFree( pidl );
3317 }
3318 }
3319 }
3320
3321 /* allocate the buffer */
3322 if (nFiles <= 1) nLength = MAX_PATH;
3323 lpstrAllFile = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, nLength * sizeof(WCHAR));
3324
3325 /* Generate the string for the edit control */
3326 if(nFiles >= 1)
3327 {
3328 lpstrCurrFile = lpstrAllFile;
3329 for ( nFileToOpen = 0; nFileToOpen < nFileSelected; nFileToOpen++ )
3330 {
3331 pidl = GetPidlFromDataObject( fodInfos->Shell.FOIDataObject, nFileToOpen+1 );
3332
3333 if (pidl)
3334 {
3335 /* get the file name */
3336 lpstrTemp[0] = '\0';
3337 GetName( fodInfos->Shell.FOIShellFolder, pidl, SHGDN_INFOLDER|SHGDN_FORPARSING, lpstrTemp );
3338
3339 if (! IsPidlFolder(fodInfos->Shell.FOIShellFolder, pidl)) /* Ignore folders */
3340 {
3341 if ( nFiles > 1)
3342 {
3343 *lpstrCurrFile++ = '\"';
3344 lstrcpyW( lpstrCurrFile, lpstrTemp );
3345 lpstrCurrFile += lstrlenW( lpstrTemp );
3346 *lpstrCurrFile++ = '\"';
3347 *lpstrCurrFile++ = ' ';
3348 *lpstrCurrFile = 0;
3349 }
3350 else
3351 {
3352 lstrcpyW( lpstrAllFile, lpstrTemp );
3353 }
3354 }
3355 COMDLG32_SHFree( pidl );
3356 }
3357 }
3358 SetWindowTextW( fodInfos->DlgInfos.hwndFileName, lpstrAllFile );
3359
3360 /* Select the file name like Windows does */
3361 SendMessageW(fodInfos->DlgInfos.hwndFileName, EM_SETSEL, 0, -1);
3362 }
3363 HeapFree(GetProcessHeap(),0, lpstrAllFile );
3364 }
3365
3366
3367 /* copied from shell32 to avoid linking to it
3368 * Although shell32 is already linked the behaviour of exported StrRetToStrN
3369 * is dependent on whether emulated OS is unicode or not.
3370 */
3371 static HRESULT COMDLG32_StrRetToStrNW (LPWSTR dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
3372 {
3373 switch (src->uType)
3374 {
3375 case STRRET_WSTR:
3376 lstrcpynW(dest, src->u.pOleStr, len);
3377 COMDLG32_SHFree(src->u.pOleStr);
3378 break;
3379
3380 case STRRET_CSTR:
3381 if (!MultiByteToWideChar( CP_ACP, 0, src->u.cStr, -1, dest, len ) && len)
3382 dest[len-1] = 0;
3383 break;
3384
3385 case STRRET_OFFSET:
3386 if (!MultiByteToWideChar( CP_ACP, 0, ((LPCSTR)&pidl->mkid)+src->u.uOffset, -1, dest, len ) && len)
3387 dest[len-1] = 0;
3388 break;
3389
3390 default:
3391 FIXME("unknown type %x!\n", src->uType);
3392 if (len) *dest = '\0';
3393 return E_FAIL;
3394 }
3395 return S_OK;
3396 }
3397
3398 /***********************************************************************
3399 * FILEDLG95_FILENAME_GetFileNames
3400 *
3401 * Copies the filenames to a delimited string list.
3402 * The delimiter is specified by the parameter 'separator',
3403 * usually either a space or a nul
3404 */
3405 static int FILEDLG95_FILENAME_GetFileNames (HWND hwnd, LPWSTR * lpstrFileList, UINT * sizeUsed)
3406 {
3407 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
3408 UINT nStrCharCount = 0; /* index in src buffer */
3409 UINT nFileIndex = 0; /* index in dest buffer */
3410 UINT nFileCount = 0; /* number of files */
3411 UINT nStrLen = 0; /* length of string in edit control */
3412 LPWSTR lpstrEdit; /* buffer for string from edit control */
3413
3414 TRACE("\n");
3415
3416 /* get the filenames from the edit control */
3417 nStrLen = SendMessageW(fodInfos->DlgInfos.hwndFileName, WM_GETTEXTLENGTH, 0, 0);
3418 lpstrEdit = MemAlloc( (nStrLen+1)*sizeof(WCHAR) );
3419 GetDlgItemTextW(hwnd, IDC_FILENAME, lpstrEdit, nStrLen+1);
3420
3421 TRACE("nStrLen=%u str=%s\n", nStrLen, debugstr_w(lpstrEdit));
3422
3423 /* we might get single filename without any '"',
3424 * so we need nStrLen + terminating \0 + end-of-list \0 */
3425 *lpstrFileList = MemAlloc( (nStrLen+2)*sizeof(WCHAR) );
3426 *sizeUsed = 0;
3427
3428 /* build delimited file list from filenames */
3429 while ( nStrCharCount <= nStrLen )
3430 {
3431 if ( lpstrEdit[nStrCharCount]=='"' )
3432 {
3433 nStrCharCount++;
3434 while ((lpstrEdit[nStrCharCount]!='"') && (nStrCharCount <= nStrLen))
3435 {
3436 (*lpstrFileList)[nFileIndex++] = lpstrEdit[nStrCharCount];
3437 nStrCharCount++;
3438 }
3439 (*lpstrFileList)[nFileIndex++] = 0;
3440 nFileCount++;
3441 }
3442 nStrCharCount++;
3443 }
3444
3445 /* single, unquoted string */
3446 if ((nStrLen > 0) && (nFileIndex == 0) )
3447 {
3448 lstrcpyW(*lpstrFileList, lpstrEdit);
3449 nFileIndex = lstrlenW(lpstrEdit) + 1;
3450 nFileCount = 1;
3451 }
3452
3453 /* trailing \0 */
3454 (*lpstrFileList)[nFileIndex++] = '\0';
3455
3456 *sizeUsed = nFileIndex;
3457 MemFree(lpstrEdit);
3458 return nFileCount;
3459 }
3460
3461 #define SETDefFormatEtc(fe,cf,med) \
3462 { \
3463 (fe).cfFormat = cf;\
3464 (fe).dwAspect = DVASPECT_CONTENT; \
3465 (fe).ptd =NULL;\
3466 (fe).tymed = med;\
3467 (fe).lindex = -1;\
3468 };
3469
3470 /*
3471 * DATAOBJECT Helper functions
3472 */
3473
3474 /***********************************************************************
3475 * COMCTL32_ReleaseStgMedium
3476 *
3477 * like ReleaseStgMedium from ole32
3478 */
3479 static void COMCTL32_ReleaseStgMedium (STGMEDIUM medium)
3480 {
3481 if(medium.pUnkForRelease)
3482 {
3483 IUnknown_Release(medium.pUnkForRelease);
3484 }
3485 else
3486 {
3487 GlobalUnlock(medium.u.hGlobal);
3488 GlobalFree(medium.u.hGlobal);
3489 }
3490 }
3491
3492 /***********************************************************************
3493 * GetPidlFromDataObject
3494 *
3495 * Return pidl(s) by number from the cached DataObject
3496 *
3497 * nPidlIndex=0 gets the fully qualified root path
3498 */
3499 LPITEMIDLIST GetPidlFromDataObject ( IDataObject *doSelected, UINT nPidlIndex)
3500 {
3501
3502 STGMEDIUM medium;
3503 FORMATETC formatetc;
3504 LPITEMIDLIST pidl = NULL;
3505
3506 TRACE("sv=%p index=%u\n", doSelected, nPidlIndex);
3507
3508 if (!doSelected)
3509 return NULL;
3510
3511 /* Set the FORMATETC structure*/
3512 SETDefFormatEtc(formatetc, RegisterClipboardFormatA(CFSTR_SHELLIDLISTA), TYMED_HGLOBAL);
3513
3514 /* Get the pidls from IDataObject */
3515 if(SUCCEEDED(IDataObject_GetData(doSelected,&formatetc,&medium)))
3516 {
3517 LPIDA cida = GlobalLock(medium.u.hGlobal);
3518 if(nPidlIndex <= cida->cidl)
3519 {
3520 pidl = COMDLG32_PIDL_ILClone((LPITEMIDLIST)(&((LPBYTE)cida)[cida->aoffset[nPidlIndex]]));
3521 }
3522 COMCTL32_ReleaseStgMedium(medium);
3523 }
3524 return pidl;
3525 }
3526
3527 /***********************************************************************
3528 * GetNumSelected
3529 *
3530 * Return the number of selected items in the DataObject.
3531 *
3532 */
3533 static UINT GetNumSelected( IDataObject *doSelected )
3534 {
3535 UINT retVal = 0;
3536 STGMEDIUM medium;
3537 FORMATETC formatetc;
3538
3539 TRACE("sv=%p\n", doSelected);
3540
3541 if (!doSelected) return 0;
3542
3543 /* Set the FORMATETC structure*/
3544 SETDefFormatEtc(formatetc, RegisterClipboardFormatA(CFSTR_SHELLIDLISTA), TYMED_HGLOBAL);
3545
3546 /* Get the pidls from IDataObject */
3547 if(SUCCEEDED(IDataObject_GetData(doSelected,&formatetc,&medium)))
3548 {
3549 LPIDA cida = GlobalLock(medium.u.hGlobal);
3550 retVal = cida->cidl;
3551 COMCTL32_ReleaseStgMedium(medium);
3552 return retVal;
3553 }
3554 return 0;
3555 }
3556
3557 /*
3558 * TOOLS
3559 */
3560
3561 /***********************************************************************
3562 * GetName
3563 *
3564 * Get the pidl's display name (relative to folder) and
3565 * put it in lpstrFileName.
3566 *
3567 * Return NOERROR on success,
3568 * E_FAIL otherwise
3569 */
3570
3571 static HRESULT GetName(LPSHELLFOLDER lpsf, LPITEMIDLIST pidl,DWORD dwFlags,LPWSTR lpstrFileName)
3572 {
3573 STRRET str;
3574 HRESULT hRes;
3575
3576 TRACE("sf=%p pidl=%p\n", lpsf, pidl);
3577
3578 if(!lpsf)
3579 {
3580 SHGetDesktopFolder(&lpsf);
3581 hRes = GetName(lpsf,pidl,dwFlags,lpstrFileName);
3582 IShellFolder_Release(lpsf);
3583 return hRes;
3584 }
3585
3586 /* Get the display name of the pidl relative to the folder */
3587 if (SUCCEEDED(hRes = IShellFolder_GetDisplayNameOf(lpsf, pidl, dwFlags, &str)))
3588 {
3589 return COMDLG32_StrRetToStrNW(lpstrFileName, MAX_PATH, &str, pidl);
3590 }
3591 return E_FAIL;
3592 }
3593
3594 /***********************************************************************
3595 * GetShellFolderFromPidl
3596 *
3597 * pidlRel is the item pidl relative
3598 * Return the IShellFolder of the absolute pidl
3599 */
3600 IShellFolder *GetShellFolderFromPidl(LPITEMIDLIST pidlAbs)
3601 {
3602 IShellFolder *psf = NULL,*psfParent;
3603
3604 TRACE("%p\n", pidlAbs);
3605
3606 if(SUCCEEDED(SHGetDesktopFolder(&psfParent)))
3607 {
3608 psf = psfParent;
3609 if(pidlAbs && pidlAbs->mkid.cb)
3610 {
3611 if(SUCCEEDED(IShellFolder_BindToObject(psfParent, pidlAbs, NULL, &IID_IShellFolder, (LPVOID*)&psf)))
3612 {
3613 IShellFolder_Release(psfParent);
3614 return psf;
3615 }
3616 }
3617 /* return the desktop */
3618 return psfParent;
3619 }
3620 return NULL;
3621 }
3622
3623 /***********************************************************************
3624 * GetParentPidl
3625 *
3626 * Return the LPITEMIDLIST to the parent of the pidl in the list
3627 */
3628 LPITEMIDLIST GetParentPidl(LPITEMIDLIST pidl)
3629 {
3630 LPITEMIDLIST pidlParent;
3631
3632 TRACE("%p\n", pidl);
3633
3634 pidlParent = COMDLG32_PIDL_ILClone(pidl);
3635 COMDLG32_PIDL_ILRemoveLastID(pidlParent);
3636
3637 return pidlParent;
3638 }
3639
3640 /***********************************************************************
3641 * GetPidlFromName
3642 *
3643 * returns the pidl of the file name relative to folder
3644 * NULL if an error occurred
3645 */
3646 static LPITEMIDLIST GetPidlFromName(IShellFolder *lpsf,LPWSTR lpcstrFileName)
3647 {
3648 LPITEMIDLIST pidl = NULL;
3649 ULONG ulEaten;
3650
3651 TRACE("sf=%p file=%s\n", lpsf, debugstr_w(lpcstrFileName));
3652
3653 if(!lpcstrFileName) return NULL;
3654 if(!*lpcstrFileName) return NULL;
3655
3656 if(!lpsf)
3657 {
3658 if (SUCCEEDED(SHGetDesktopFolder(&lpsf))) {
3659 IShellFolder_ParseDisplayName(lpsf, 0, NULL, lpcstrFileName, &ulEaten, &pidl, NULL);
3660 IShellFolder_Release(lpsf);
3661 }
3662 }
3663 else
3664 {
3665 IShellFolder_ParseDisplayName(lpsf, 0, NULL, lpcstrFileName, &ulEaten, &pidl, NULL);
3666 }
3667 return pidl;
3668 }
3669
3670 /*
3671 */
3672 static BOOL IsPidlFolder (LPSHELLFOLDER psf, LPCITEMIDLIST pidl)
3673 {
3674 ULONG uAttr = SFGAO_FOLDER | SFGAO_HASSUBFOLDER;
3675 HRESULT ret;
3676
3677 TRACE("%p, %p\n", psf, pidl);
3678
3679 ret = IShellFolder_GetAttributesOf( psf, 1, &pidl, &uAttr );
3680
3681 TRACE("-- 0x%08x 0x%08x\n", uAttr, ret);
3682 /* see documentation shell 4.1*/
3683 return uAttr & (SFGAO_FOLDER | SFGAO_HASSUBFOLDER);
3684 }
3685
3686 /***********************************************************************
3687 * BrowseSelectedFolder
3688 */
3689 static BOOL BrowseSelectedFolder(HWND hwnd)
3690 {
3691 BOOL bBrowseSelFolder = FALSE;
3692 FileOpenDlgInfos *fodInfos = GetPropA(hwnd,FileOpenDlgInfosStr);
3693
3694 TRACE("\n");
3695
3696 if (GetNumSelected(fodInfos->Shell.FOIDataObject) == 1)
3697 {
3698 LPITEMIDLIST pidlSelection;
3699
3700 /* get the file selected */
3701 pidlSelection = GetPidlFromDataObject( fodInfos->Shell.FOIDataObject, 1);
3702 if (IsPidlFolder (fodInfos->Shell.FOIShellFolder, pidlSelection))
3703 {
3704 if ( FAILED( IShellBrowser_BrowseObject( fodInfos->Shell.FOIShellBrowser,
3705 pidlSelection, SBSP_RELATIVE ) ) )
3706 {
3707 static const WCHAR notexist[] = {'P','a','t','h',' ','d','o','e','s',
3708 ' ','n','o','t',' ','e','x','i','s','t',0};
3709 MessageBoxW( hwnd, notexist, fodInfos->title, MB_OK | MB_ICONEXCLAMATION );
3710 }
3711 bBrowseSelFolder = TRUE;
3712 if(fodInfos->ofnInfos->Flags & OFN_EXPLORER)
3713 SendCustomDlgNotificationMessage(hwnd,CDN_FOLDERCHANGE);
3714 }
3715 COMDLG32_SHFree( pidlSelection );
3716 }
3717
3718 return bBrowseSelFolder;
3719 }
3720
3721 /*
3722 * Memory allocation methods */
3723 static void *MemAlloc(UINT size)
3724 {
3725 return HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,size);
3726 }
3727
3728 static void MemFree(void *mem)
3729 {
3730 HeapFree(GetProcessHeap(),0,mem);
3731 }
3732
3733 /*
3734 * Old-style (win3.1) dialogs */
3735
3736 /***********************************************************************
3737 * FD32_GetTemplate [internal]
3738 *
3739 * Get a template (or FALSE if failure) when 16 bits dialogs are used
3740 * by a 32 bits application
3741 *
3742 */
3743 BOOL FD32_GetTemplate(PFD31_DATA lfs)
3744 {
3745 LPOPENFILENAMEW ofnW = lfs->ofnW;
3746 LPOPENFILENAMEA ofnA = lfs->ofnA;
3747 HANDLE hDlgTmpl;
3748
3749 if (ofnW->Flags & OFN_ENABLETEMPLATEHANDLE)
3750 {
3751 if (!(lfs->template = LockResource( ofnW->hInstance )))
3752 {
3753 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
3754 return FALSE;
3755 }
3756 }
3757 else if (ofnW->Flags & OFN_ENABLETEMPLATE)
3758 {
3759 HRSRC hResInfo;
3760 if (ofnA)
3761 hResInfo = FindResourceA(ofnA->hInstance,
3762 ofnA->lpTemplateName,
3763 (LPSTR)RT_DIALOG);
3764 else
3765 hResInfo = FindResourceW(ofnW->hInstance,
3766 ofnW->lpTemplateName,
3767 (LPWSTR)RT_DIALOG);
3768 if (!hResInfo)
3769 {
3770 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE);
3771 return FALSE;
3772 }
3773 if (!(hDlgTmpl = LoadResource(ofnW->hInstance,
3774 hResInfo)) ||
3775 !(lfs->template = LockResource(hDlgTmpl)))
3776 {
3777 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
3778 return FALSE;
3779 }
3780 } else { /* get it from internal Wine resource */
3781 HRSRC hResInfo;
3782 if (!(hResInfo = FindResourceA(COMDLG32_hInstance,
3783 lfs->open? "OPEN_FILE":"SAVE_FILE", (LPSTR)RT_DIALOG)))
3784 {
3785 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE);
3786 return FALSE;
3787 }
3788 if (!(hDlgTmpl = LoadResource(COMDLG32_hInstance, hResInfo )) ||
3789 !(lfs->template = LockResource( hDlgTmpl )))
3790 {
3791 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
3792 return FALSE;
3793 }
3794 }
3795 return TRUE;
3796 }
3797
3798
3799 /***********************************************************************
3800 * FD32_WMMeasureItem [internal]
3801 */
3802 static LONG FD32_WMMeasureItem(LPARAM lParam)
3803 {
3804 LPMEASUREITEMSTRUCT lpmeasure;
3805
3806 lpmeasure = (LPMEASUREITEMSTRUCT)lParam;
3807 lpmeasure->itemHeight = FD31_GetFldrHeight();
3808 return TRUE;
3809 }
3810
3811
3812 /***********************************************************************
3813 * FileOpenDlgProc [internal]
3814 * Used for open and save, in fact.
3815 */
3816 static INT_PTR CALLBACK FD32_FileOpenDlgProc(HWND hWnd, UINT wMsg,
3817 WPARAM wParam, LPARAM lParam)
3818 {
3819 PFD31_DATA lfs = (PFD31_DATA)GetPropA(hWnd,FD31_OFN_PROP);
3820
3821 TRACE("msg=%x wparam=%lx lParam=%lx\n", wMsg, wParam, lParam);
3822 if ((wMsg != WM_INITDIALOG) && lfs && lfs->hook)
3823 {
3824 INT_PTR lRet;
3825 lRet = (INT_PTR)FD31_CallWindowProc(lfs, wMsg, wParam, lParam);
3826 if (lRet)
3827 return lRet; /* else continue message processing */
3828 }
3829 switch (wMsg)
3830 {
3831 case WM_INITDIALOG:
3832 return FD31_WMInitDialog(hWnd, wParam, lParam);
3833
3834 case WM_MEASUREITEM:
3835 return FD32_WMMeasureItem(lParam);
3836
3837 case WM_DRAWITEM:
3838 return FD31_WMDrawItem(hWnd, wParam, lParam, !lfs->open, (DRAWITEMSTRUCT *)lParam);
3839
3840 case WM_COMMAND:
3841 return FD31_WMCommand(hWnd, lParam, HIWORD(wParam), LOWORD(wParam), lfs);
3842 #if 0
3843 case WM_CTLCOLOR:
3844 SetBkColor((HDC16)wParam, 0x00C0C0C0);
3845 switch (HIWORD(lParam))
3846 {
3847 case CTLCOLOR_BTN:
3848 SetTextColor((HDC16)wParam, 0x00000000);
3849 return hGRAYBrush;
3850 case CTLCOLOR_STATIC:
3851 SetTextColor((HDC16)wParam, 0x00000000);
3852 return hGRAYBrush;
3853 }
3854 break;
3855 #endif
3856 }
3857 return FALSE;
3858 }
3859
3860
3861 /***********************************************************************
3862 * GetFileName31A [internal]
3863 *
3864 * Creates a win31 style dialog box for the user to select a file to open/save.
3865 */
3866 static BOOL GetFileName31A(LPOPENFILENAMEA lpofn, /* address of structure with data*/
3867 UINT dlgType /* type dialogue : open/save */
3868 )
3869 {
3870 BOOL bRet = FALSE;
3871 PFD31_DATA lfs;
3872
3873 if (!lpofn || !FD31_Init()) return FALSE;
3874
3875 TRACE("ofn flags %08x\n", lpofn->Flags);
3876 lfs = FD31_AllocPrivate((LPARAM) lpofn, dlgType, FALSE);
3877 if (lfs)
3878 {
3879 bRet = DialogBoxIndirectParamA( COMDLG32_hInstance, lfs->template, lpofn->hwndOwner,
3880 FD32_FileOpenDlgProc, (LPARAM)lfs);
3881 FD31_DestroyPrivate(lfs);
3882 }
3883
3884 TRACE("return lpstrFile='%s' !\n", lpofn->lpstrFile);
3885 return bRet;
3886 }
3887
3888 /***********************************************************************
3889 * GetFileName31W [internal]
3890 *
3891 * Creates a win31 style dialog box for the user to select a file to open/save
3892 */
3893 static BOOL GetFileName31W(LPOPENFILENAMEW lpofn, /* address of structure with data*/
3894 UINT dlgType /* type dialogue : open/save */
3895 )
3896 {
3897 BOOL bRet = FALSE;
3898 PFD31_DATA lfs;
3899
3900 if (!lpofn || !FD31_Init()) return FALSE;
3901
3902 lfs = FD31_AllocPrivate((LPARAM) lpofn, dlgType, TRUE);
3903 if (lfs)
3904 {
3905 bRet = DialogBoxIndirectParamW( COMDLG32_hInstance, lfs->template, lpofn->hwndOwner,
3906 FD32_FileOpenDlgProc, (LPARAM)lfs);
3907 FD31_DestroyPrivate(lfs);
3908 }
3909
3910 TRACE("file %s, file offset %d, ext offset %d\n",
3911 debugstr_w(lpofn->lpstrFile), lpofn->nFileOffset, lpofn->nFileExtension);
3912 return bRet;
3913 }
3914
3915 /* ------------------ APIs ---------------------- */
3916
3917 /***********************************************************************
3918 * GetOpenFileNameA (COMDLG32.@)
3919 *
3920 * Creates a dialog box for the user to select a file to open.
3921 *
3922 * RETURNS
3923 * TRUE on success: user enters a valid file
3924 * FALSE on cancel, error, close or filename-does-not-fit-in-buffer.
3925 *
3926 */
3927 BOOL WINAPI GetOpenFileNameA(
3928 LPOPENFILENAMEA ofn) /* [in/out] address of init structure */
3929 {
3930 BOOL win16look = FALSE;
3931
3932 TRACE("flags %08x\n", ofn->Flags);
3933
3934 /* OFN_FILEMUSTEXIST implies OFN_PATHMUSTEXIST */
3935 if (ofn->Flags & OFN_FILEMUSTEXIST)
3936 ofn->Flags |= OFN_PATHMUSTEXIST;
3937
3938 if (ofn->Flags & (OFN_ALLOWMULTISELECT|OFN_ENABLEHOOK|OFN_ENABLETEMPLATE))
3939 win16look = (ofn->Flags & OFN_EXPLORER) ? FALSE : TRUE;
3940
3941 if (win16look)
3942 return GetFileName31A(ofn, OPEN_DIALOG);
3943 else
3944 return GetFileDialog95A(ofn, OPEN_DIALOG);
3945 }
3946
3947 /***********************************************************************
3948 * GetOpenFileNameW (COMDLG32.@)
3949 *
3950 * Creates a dialog box for the user to select a file to open.
3951 *
3952 * RETURNS
3953 * TRUE on success: user enters a valid file
3954 * FALSE on cancel, error, close or filename-does-not-fit-in-buffer.
3955 *
3956 */
3957 BOOL WINAPI GetOpenFileNameW(
3958 LPOPENFILENAMEW ofn) /* [in/out] address of init structure */
3959 {
3960 BOOL win16look = FALSE;
3961
3962 TRACE("flags %08x\n", ofn->Flags);
3963
3964 /* OFN_FILEMUSTEXIST implies OFN_PATHMUSTEXIST */
3965 if (ofn->Flags & OFN_FILEMUSTEXIST)
3966 ofn->Flags |= OFN_PATHMUSTEXIST;
3967
3968 if (ofn->Flags & (OFN_ALLOWMULTISELECT|OFN_ENABLEHOOK|OFN_ENABLETEMPLATE))
3969 win16look = (ofn->Flags & OFN_EXPLORER) ? FALSE : TRUE;
3970
3971 if (win16look)
3972 return GetFileName31W(ofn, OPEN_DIALOG);
3973 else
3974 return GetFileDialog95W(ofn, OPEN_DIALOG);
3975 }
3976
3977
3978 /***********************************************************************
3979 * GetSaveFileNameA (COMDLG32.@)
3980 *
3981 * Creates a dialog box for the user to select a file to save.
3982 *
3983 * RETURNS
3984 * TRUE on success: user enters a valid file
3985 * FALSE on cancel, error, close or filename-does-not-fit-in-buffer.
3986 *
3987 */
3988 BOOL WINAPI GetSaveFileNameA(
3989 LPOPENFILENAMEA ofn) /* [in/out] address of init structure */
3990 {
3991 BOOL win16look = FALSE;
3992
3993 if (ofn->Flags & (OFN_ALLOWMULTISELECT|OFN_ENABLEHOOK|OFN_ENABLETEMPLATE))
3994 win16look = (ofn->Flags & OFN_EXPLORER) ? FALSE : TRUE;
3995
3996 if (win16look)
3997 return GetFileName31A(ofn, SAVE_DIALOG);
3998 else
3999 return GetFileDialog95A(ofn, SAVE_DIALOG);
4000 }
4001
4002 /***********************************************************************
4003 * GetSaveFileNameW (COMDLG32.@)
4004 *
4005 * Creates a dialog box for the user to select a file to save.
4006 *
4007 * RETURNS
4008 * TRUE on success: user enters a valid file
4009 * FALSE on cancel, error, close or filename-does-not-fit-in-buffer.
4010 *
4011 */
4012 BOOL WINAPI GetSaveFileNameW(
4013 LPOPENFILENAMEW ofn) /* [in/out] address of init structure */
4014 {
4015 BOOL win16look = FALSE;
4016
4017 if (ofn->Flags & (OFN_ALLOWMULTISELECT|OFN_ENABLEHOOK|OFN_ENABLETEMPLATE))
4018 win16look = (ofn->Flags & OFN_EXPLORER) ? FALSE : TRUE;
4019
4020 if (win16look)
4021 return GetFileName31W(ofn, SAVE_DIALOG);
4022 else
4023 return GetFileDialog95W(ofn, SAVE_DIALOG);
4024 }
4025
4026 /***********************************************************************
4027 * GetFileTitleA (COMDLG32.@)
4028 *
4029 * See GetFileTitleW.
4030 */
4031 short WINAPI GetFileTitleA(LPCSTR lpFile, LPSTR lpTitle, WORD cbBuf)
4032 {
4033 int ret;
4034 UNICODE_STRING strWFile;
4035 LPWSTR lpWTitle;
4036
4037 RtlCreateUnicodeStringFromAsciiz(&strWFile, lpFile);
4038 lpWTitle = RtlAllocateHeap( GetProcessHeap(), 0, cbBuf*sizeof(WCHAR));
4039 ret = GetFileTitleW(strWFile.Buffer, lpWTitle, cbBuf);
4040 if (!ret) WideCharToMultiByte( CP_ACP, 0, lpWTitle, -1, lpTitle, cbBuf, NULL, NULL );
4041 RtlFreeUnicodeString( &strWFile );
4042 RtlFreeHeap( GetProcessHeap(), 0, lpWTitle );
4043 return ret;
4044 }
4045
4046
4047 /***********************************************************************
4048 * GetFileTitleW (COMDLG32.@)
4049 *
4050 * Get the name of a file.
4051 *
4052 * PARAMS
4053 * lpFile [I] name and location of file
4054 * lpTitle [O] returned file name
4055 * cbBuf [I] buffer size of lpTitle
4056 *
4057 * RETURNS
4058 * Success: zero
4059 * Failure: negative number.
4060 */
4061 short WINAPI GetFileTitleW(LPCWSTR lpFile, LPWSTR lpTitle, WORD cbBuf)
4062 {
4063 int i, len;
4064 static const WCHAR brkpoint[] = {'*','[',']',0};
4065 TRACE("(%p %p %d);\n", lpFile, lpTitle, cbBuf);
4066
4067 if(lpFile == NULL || lpTitle == NULL)
4068 return -1;
4069
4070 len = lstrlenW(lpFile);
4071
4072 if (len == 0)
4073 return -1;
4074
4075 if(strpbrkW(lpFile, brkpoint))
4076 return -1;
4077
4078 len--;
4079
4080 if(lpFile[len] == '/' || lpFile[len] == '\\' || lpFile[len] == ':')
4081 return -1;
4082
4083 for(i = len; i >= 0; i--)
4084 {
4085 if (lpFile[i] == '/' || lpFile[i] == '\\' || lpFile[i] == ':')
4086 {
4087 i++;
4088 break;
4089 }
4090 }
4091
4092 if(i == -1)
4093 i++;
4094
4095 TRACE("---> %s\n", debugstr_w(&lpFile[i]));
4096
4097 len = lstrlenW(lpFile+i)+1;
4098 if(cbBuf < len)
4099 return len;
4100
4101 lstrcpyW(lpTitle, &lpFile[i]);
4102 return 0;
4103 }