dlls/commdlg/filedlgbrowser.c

   1 /*
   2  *  Implementation of IShellBrowser for the File Open common dialog
   3  *
   4  *
   5  */
   6
   7 #include <stdio.h>
   8 #include "unknwn.h"
   9 #include "filedlgbrowser.h"
  10 #include "windef.h"
  11 #include "wingdi.h"
  12 #include "winuser.h"
  13 #include "heap.h"
  14 #include "wine/obj_dataobject.h"
  15 #include "debugtools.h"
  16 #include "cdlg.h"
  17 #include "wine/undocshell.h"
  18
  19 DEFAULT_DEBUG_CHANNEL(commdlg)
  20
  21 #define SETDefFormatEtc(fe,cf,med) \
  22 { \
  23     (fe).cfFormat = cf;\
  24     (fe).dwAspect = DVASPECT_CONTENT; \
  25     (fe).ptd =NULL;\
  26     (fe).tymed = med;\
  27     (fe).lindex = -1;\
  28 };
  29
  30
  31 /**************************************************************************
  32 *   Structure
  33 */
  34 static ICOM_VTABLE(IShellBrowser) IShellBrowserImpl_Vtbl =
  35 {
  36         ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
  37         /* IUnknown */
  38         IShellBrowserImpl_QueryInterface,
  39         IShellBrowserImpl_AddRef,
  40         IShellBrowserImpl_Release,
  41         /* IOleWindow */
  42         IShellBrowserImpl_GetWindow,
  43         IShellBrowserImpl_ContextSensitiveHelp,
  44         /*  IShellBrowser */
  45         IShellBrowserImpl_InsertMenusSB,
  46         IShellBrowserImpl_SetMenuSB,
  47         IShellBrowserImpl_RemoveMenusSB,
  48         IShellBrowserImpl_SetStatusTextSB,
  49         IShellBrowserImpl_EnableModelessSB,
  50         IShellBrowserImpl_TranslateAcceleratorSB,
  51         IShellBrowserImpl_BrowseObject,
  52         IShellBrowserImpl_GetViewStateStream,
  53         IShellBrowserImpl_GetControlWindow,
  54         IShellBrowserImpl_SendControlMsg,
  55         IShellBrowserImpl_QueryActiveShellView,
  56         IShellBrowserImpl_OnViewWindowActive,
  57         IShellBrowserImpl_SetToolbarItems
  58 };
  59
  60 static ICOM_VTABLE(ICommDlgBrowser) IShellBrowserImpl_ICommDlgBrowser_Vtbl =
  61 {
  62         ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
  63         /* IUnknown */
  64         IShellBrowserImpl_ICommDlgBrowser_QueryInterface,
  65         IShellBrowserImpl_ICommDlgBrowser_AddRef,
  66         IShellBrowserImpl_ICommDlgBrowser_Release,
  67         /* ICommDlgBrowser */
  68         IShellBrowserImpl_ICommDlgBrowser_OnDefaultCommand,
  69         IShellBrowserImpl_ICommDlgBrowser_OnStateChange,
  70         IShellBrowserImpl_ICommDlgBrowser_IncludeObject
  71 };
  72
  73
  74 /**************************************************************************
  75 *   Local Prototypes
  76 */
  77
  78 HRESULT IShellBrowserImpl_ICommDlgBrowser_OnSelChange(ICommDlgBrowser *iface, IShellView *ppshv);
  79 #if 0
  80 LPITEMIDLIST GetSelectedPidl(IShellView *ppshv);
  81 #endif
  82
  83 /**************************************************************************
  84 *   External Prototypes
  85 */
  86 extern const char *FileOpenDlgInfosStr;
  87
  88 extern HRESULT          GetName(LPSHELLFOLDER lpsf, LPITEMIDLIST pidl,DWORD dwFlags,LPSTR lpstrFileName);
  89 extern HRESULT          GetFileName(HWND hwnd, LPITEMIDLIST pidl, LPSTR lpstrFileName);
  90 extern IShellFolder*    GetShellFolderFromPidl(LPITEMIDLIST pidlAbs);
  91 extern LPITEMIDLIST     GetParentPidl(LPITEMIDLIST pidl);
  92 extern LPITEMIDLIST     GetPidlFromName(IShellFolder *psf,LPCSTR lpcstrFileName);
  93
  94 extern BOOL    FILEDLG95_SHELL_FillIncludedItemList(HWND hwnd,
  95                                                         LPITEMIDLIST pidlCurrentFolder,
  96                                                         LPSTR lpstrMask);
  97
  98 extern int     FILEDLG95_LOOKIN_SelectItem(HWND hwnd,LPITEMIDLIST pidl);
  99 extern BOOL    FILEDLG95_OnOpen(HWND hwnd);
 100 extern HRESULT SendCustomDlgNotificationMessage(HWND hwndParentDlg, UINT uCode);
 101
 102
 103 /**************************************************************************
 104 *  IShellBrowserImpl_Construct
 105 */
 106 IShellBrowser * IShellBrowserImpl_Construct(HWND hwndOwner)
 107 {
 108     IShellBrowserImpl *sb;
 109     FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(hwndOwner,FileOpenDlgInfosStr);
 110
 111     sb=(IShellBrowserImpl*)SHAlloc(sizeof(IShellBrowserImpl));
 112
 113     /* Initialisation of the member variables */
 114     sb->ref=1;
 115     sb->hwndOwner = hwndOwner;
 116
 117     /* Initialisation of the vTables */
 118     sb->lpVtbl = &IShellBrowserImpl_Vtbl;
 119     sb->lpVtbl2 = &IShellBrowserImpl_ICommDlgBrowser_Vtbl;
 120
 121     COMDLG32_SHGetSpecialFolderLocation(hwndOwner,
 122                                CSIDL_DESKTOP,
 123                                &fodInfos->ShellInfos.pidlAbsCurrent);
 124
 125     TRACE("%p\n", sb);
 126
 127     return (IShellBrowser *) sb;
 128 }
 129
 130 /**************************************************************************
 131 *
 132 *
 133 *  The INTERFACE of the IShellBrowser object
 134 *
 135 */
 136
 137 /*
 138  * IUnknown
 139  */
 140
 141 /***************************************************************************
 142 *  IShellBrowserImpl_QueryInterface
 143 */
 144 HRESULT WINAPI IShellBrowserImpl_QueryInterface(IShellBrowser *iface,
 145                                             REFIID riid,
 146                                             LPVOID *ppvObj)
 147 {
 148     ICOM_THIS(IShellBrowserImpl, iface);
 149
 150     TRACE("(%p)\n", This);
 151
 152     *ppvObj = NULL;
 153
 154     if(IsEqualIID(riid, &IID_IUnknown))          /*IUnknown*/
 155     { *ppvObj = This;
 156     }
 157     else if(IsEqualIID(riid, &IID_IOleWindow))  /*IOleWindow*/
 158     { *ppvObj = (IOleWindow*)This;
 159     }
 160
 161     else if(IsEqualIID(riid, &IID_IShellBrowser))  /*IShellBrowser*/
 162     { *ppvObj = (IShellBrowser*)This;
 163     }
 164
 165     else if(IsEqualIID(riid, &IID_ICommDlgBrowser))  /*ICommDlgBrowser*/
 166     { *ppvObj = (ICommDlgBrowser*) &(This->lpVtbl2);
 167     }
 168
 169     if(*ppvObj)
 170     { IUnknown_AddRef( (IShellBrowser*) *ppvObj);
 171       return S_OK;
 172     }
 173     return E_NOINTERFACE;
 174 }
 175
 176 /**************************************************************************
 177 *  IShellBrowser::AddRef
 178 */
 179 ULONG WINAPI IShellBrowserImpl_AddRef(IShellBrowser * iface)
 180 {
 181     ICOM_THIS(IShellBrowserImpl, iface);
 182
 183     TRACE("(%p)\n", This);
 184
 185     return ++(This->ref);
 186 }
 187
 188 /**************************************************************************
 189 *  IShellBrowserImpl_Release
 190 */
 191 ULONG WINAPI IShellBrowserImpl_Release(IShellBrowser * iface)
 192 {
 193     ICOM_THIS(IShellBrowserImpl, iface);
 194
 195     TRACE("(%p)\n", This);
 196
 197     if (!--(This->ref))
 198     {
 199       COMDLG32_SHFree(This);
 200       return 0;
 201     }
 202     return This->ref;
 203 }
 204
 205 /*
 206  * IOleWindow
 207  */
 208
 209 /**************************************************************************
 210 *  IShellBrowserImpl_GetWindow  (IOleWindow)
 211 *
 212 *  Inherited from IOleWindow::GetWindow
 213 *
 214 *  See Windows documentation for more details
 215 *
 216 *  Note : We will never be window less in the File Open dialog
 217 *
 218 */
 219 HRESULT WINAPI IShellBrowserImpl_GetWindow(IShellBrowser * iface,
 220                                            HWND * phwnd)
 221 {
 222     ICOM_THIS(IShellBrowserImpl, iface);
 223
 224     TRACE("(%p)\n", This);
 225
 226     if(!This->hwndOwner)
 227         return E_FAIL;
 228
 229     *phwnd = This->hwndOwner;
 230
 231     return (*phwnd) ? S_OK : E_UNEXPECTED;
 232
 233 }
 234
 235 /**************************************************************************
 236 *  IShellBrowserImpl_ContextSensitiveHelp
 237 */
 238 HRESULT WINAPI IShellBrowserImpl_ContextSensitiveHelp(IShellBrowser * iface,
 239                                                       BOOL fEnterMode)
 240 {
 241     ICOM_THIS(IShellBrowserImpl, iface);
 242
 243     TRACE("(%p)\n", This);
 244
 245     /* Feature not implemented */
 246     return E_NOTIMPL;
 247 }
 248
 249 /*
 250  * IShellBrowser
 251  */
 252
 253 /**************************************************************************
 254 *  IShellBrowserImpl_BrowseObject
 255 *
 256 *  See Windows documentation on IShellBrowser::BrowseObject for more details
 257 *
 258 *  This function will override user specified flags and will always
 259 *  use SBSP_DEFBROWSER and SBSP_DEFMODE.
 260 */
 261 HRESULT WINAPI IShellBrowserImpl_BrowseObject(IShellBrowser *iface,
 262                                               LPCITEMIDLIST pidl,
 263                                               UINT wFlags)
 264 {
 265     HRESULT hRes;
 266     IShellFolder *psfTmp;
 267     IShellView *psvTmp;
 268     FileOpenDlgInfos *fodInfos;
 269     LPITEMIDLIST pidlTmp;
 270
 271     ICOM_THIS(IShellBrowserImpl, iface);
 272
 273     TRACE("(%p)\n", This);
 274
 275     fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr);
 276
 277     /* Format the pidl according to its parameter's category */
 278     if(wFlags & SBSP_RELATIVE)
 279     {
 280
 281         /* SBSP_RELATIVE  A relative pidl (relative from the current folder) */
 282         hRes = IShellFolder_BindToObject(fodInfos->Shell.FOIShellFolder,
 283                                      pidl,
 284                                      NULL,
 285                                      &IID_IShellFolder,
 286                                      (LPVOID *)&psfTmp);
 287         if(FAILED(hRes))
 288         {
 289             return hRes;
 290         }
 291         /* create an absolute pidl */
 292         pidlTmp = COMDLG32_PIDL_ILCombine(fodInfos->ShellInfos.pidlAbsCurrent,
 293                                                         (LPITEMIDLIST)pidl);
 294
 295     }
 296     else if(wFlags & SBSP_PARENT)
 297     {
 298         /* Browse the parent folder (ignores the pidl) */
 299
 300         pidlTmp = GetParentPidl(fodInfos->ShellInfos.pidlAbsCurrent);
 301         psfTmp = GetShellFolderFromPidl(pidlTmp);
 302
 303     }
 304     else
 305     {
 306         /* An absolute pidl (relative from the desktop) */
 307         pidlTmp =  COMDLG32_PIDL_ILClone((LPITEMIDLIST)pidl);
 308         psfTmp = GetShellFolderFromPidl(pidlTmp);
 309     }
 310
 311
 312     /* Retrieve the IShellFolder interface of the pidl specified folder */
 313     if(!psfTmp)
 314         return E_FAIL;
 315
 316     /* If the pidl to browse to is equal to the actual pidl ...
 317        do nothing and pretend you did it*/
 318     if(COMDLG32_PIDL_ILIsEqual(pidlTmp,fodInfos->ShellInfos.pidlAbsCurrent))
 319     {
 320         IShellFolder_Release(psfTmp);
 321         COMDLG32_SHFree(pidlTmp);
 322         return NOERROR;
 323     }
 324
 325     /* Release the current fodInfos->Shell.FOIShellFolder and update its value */
 326     IShellFolder_Release(fodInfos->Shell.FOIShellFolder);
 327     fodInfos->Shell.FOIShellFolder = psfTmp;
 328
 329     /* Create the associated view */
 330     if(SUCCEEDED(hRes = IShellFolder_CreateViewObject(psfTmp,
 331                                                       fodInfos->ShellInfos.hwndOwner,
 332                                                       &IID_IShellView,
 333                                                       (LPVOID *)&psvTmp)))
 334     {
 335         HWND hwndView;
 336         HWND hDlgWnd;
 337         /* Get the foldersettings from the old view */
 338         if(fodInfos->Shell.FOIShellView)
 339         {
 340           IShellView_GetCurrentInfo(fodInfos->Shell.FOIShellView,
 341                                   &fodInfos->ShellInfos.folderSettings);
 342         }
 343
 344         /* Create the window */
 345         if(SUCCEEDED(hRes = IShellView_CreateViewWindow(psvTmp,
 346                                           NULL,
 347                                           &fodInfos->ShellInfos.folderSettings,
 348                                           fodInfos->Shell.FOIShellBrowser,
 349                                           &fodInfos->ShellInfos.rectView,
 350                                           &hwndView)))
 351         {
 352             /* Fit the created view in the appropriate RECT */
 353             MoveWindow(hwndView,
 354                        fodInfos->ShellInfos.rectView.left,
 355                        fodInfos->ShellInfos.rectView.top,
 356                        fodInfos->ShellInfos.rectView.right-fodInfos->ShellInfos.rectView.left,
 357                        fodInfos->ShellInfos.rectView.bottom-fodInfos->ShellInfos.rectView.top,
 358                        FALSE);
 359
 360             /* Select the new folder in the Look In combo box of the Open file dialog */
 361
 362             FILEDLG95_LOOKIN_SelectItem(fodInfos->DlgInfos.hwndLookInCB,pidlTmp);
 363
 364             /* Release old pidlAbsCurrent memory and update its value */
 365             COMDLG32_SHFree((LPVOID)fodInfos->ShellInfos.pidlAbsCurrent);
 366             fodInfos->ShellInfos.pidlAbsCurrent = pidlTmp;
 367
 368             /* Release the current fodInfos->Shell.FOIShellView and update its value */
 369             if(fodInfos->Shell.FOIShellView)
 370             {
 371                 IShellView_DestroyViewWindow(fodInfos->Shell.FOIShellView);
 372                 IShellView_Release(fodInfos->Shell.FOIShellView);
 373             }
 374 #if 0
 375             ShowWindow(fodInfos->ShellInfos.hwndView,SW_HIDE);
 376 #endif
 377             fodInfos->Shell.FOIShellView = psvTmp;
 378
 379             fodInfos->ShellInfos.hwndView = hwndView;
 380
 381             /* changes the tab order of the ListView to reflect the window's File Dialog */
 382             hDlgWnd = GetDlgItem(GetParent(hwndView), IDC_LOOKIN);
 383             SetWindowPos(hwndView, hDlgWnd, 0,0,0,0, SWP_NOMOVE | SWP_NOSIZE);
 384
 385
 386             return NOERROR;
 387         }
 388     }
 389
 390     FILEDLG95_LOOKIN_SelectItem(fodInfos->DlgInfos.hwndLookInCB,fodInfos->ShellInfos.pidlAbsCurrent);
 391     return hRes;
 392 }
 393
 394 /**************************************************************************
 395 *  IShellBrowserImpl_EnableModelessSB
 396 */
 397 HRESULT WINAPI IShellBrowserImpl_EnableModelessSB(IShellBrowser *iface,
 398                                               BOOL fEnable)
 399
 400 {
 401     ICOM_THIS(IShellBrowserImpl, iface);
 402
 403     TRACE("(%p)\n", This);
 404
 405     /* Feature not implemented */
 406     return E_NOTIMPL;
 407 }
 408
 409 /**************************************************************************
 410 *  IShellBrowserImpl_GetControlWindow
 411 */
 412 HRESULT WINAPI IShellBrowserImpl_GetControlWindow(IShellBrowser *iface,
 413                                               UINT id,
 414                                               HWND *lphwnd)
 415
 416 {
 417     ICOM_THIS(IShellBrowserImpl, iface);
 418
 419     TRACE("(%p)\n", This);
 420
 421     /* Feature not implemented */
 422     return E_NOTIMPL;
 423 }
 424 /**************************************************************************
 425 *  IShellBrowserImpl_GetViewStateStream
 426 */
 427 HRESULT WINAPI IShellBrowserImpl_GetViewStateStream(IShellBrowser *iface,
 428                                                 DWORD grfMode,
 429                                                 LPSTREAM *ppStrm)
 430
 431 {
 432     ICOM_THIS(IShellBrowserImpl, iface);
 433
 434     TRACE("(%p)\n", This);
 435
 436     /* Feature not implemented */
 437     return E_NOTIMPL;
 438 }
 439 /**************************************************************************
 440 *  IShellBrowserImpl_InsertMenusSB
 441 */
 442 HRESULT WINAPI IShellBrowserImpl_InsertMenusSB(IShellBrowser *iface,
 443                                            HMENU hmenuShared,
 444                                            LPOLEMENUGROUPWIDTHS lpMenuWidths)
 445
 446 {
 447     ICOM_THIS(IShellBrowserImpl, iface);
 448
 449     TRACE("(%p)\n", This);
 450
 451     /* Feature not implemented */
 452     return E_NOTIMPL;
 453 }
 454 /**************************************************************************
 455 *  IShellBrowserImpl_OnViewWindowActive
 456 */
 457 HRESULT WINAPI IShellBrowserImpl_OnViewWindowActive(IShellBrowser *iface,
 458                                                 IShellView *ppshv)
 459
 460 {
 461     ICOM_THIS(IShellBrowserImpl, iface);
 462
 463     TRACE("(%p)\n", This);
 464
 465     /* Feature not implemented */
 466     return E_NOTIMPL;
 467 }
 468 /**************************************************************************
 469 *  IShellBrowserImpl_QueryActiveShellView
 470 */
 471 HRESULT WINAPI IShellBrowserImpl_QueryActiveShellView(IShellBrowser *iface,
 472                                                   IShellView **ppshv)
 473
 474 {
 475     ICOM_THIS(IShellBrowserImpl, iface);
 476
 477     FileOpenDlgInfos *fodInfos;
 478
 479     TRACE("(%p)\n", This);
 480
 481     fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr);
 482
 483     if(!(*ppshv = fodInfos->Shell.FOIShellView))
 484     {
 485         return E_FAIL;
 486     }
 487     IShellView_AddRef(fodInfos->Shell.FOIShellView);
 488     return NOERROR;
 489 }
 490 /**************************************************************************
 491 *  IShellBrowserImpl_RemoveMenusSB
 492 */
 493 HRESULT WINAPI IShellBrowserImpl_RemoveMenusSB(IShellBrowser *iface,
 494                                            HMENU hmenuShared)
 495
 496 {
 497     ICOM_THIS(IShellBrowserImpl, iface);
 498
 499     TRACE("(%p)\n", This);
 500
 501     /* Feature not implemented */
 502     return E_NOTIMPL;
 503 }
 504 /**************************************************************************
 505 *  IShellBrowserImpl_SendControlMsg
 506 */
 507 HRESULT WINAPI IShellBrowserImpl_SendControlMsg(IShellBrowser *iface,
 508                                             UINT id,
 509                                             UINT uMsg,
 510                                             WPARAM wParam,
 511                                             LPARAM lParam,
 512                                             LRESULT *pret)
 513
 514 {
 515     ICOM_THIS(IShellBrowserImpl, iface);
 516     LRESULT lres;
 517
 518     TRACE("(%p)->(0x%08x 0x%08x 0x%08x 0x%08lx %p)\n", This, id, uMsg, wParam, lParam, pret);
 519
 520     switch (id)
 521     {
 522       case FCW_TOOLBAR:
 523         lres = SendDlgItemMessageA( This->hwndOwner, IDC_TOOLBAR, uMsg, wParam, lParam);
 524         break;
 525       default:
 526         FIXME("ctrl id: %x\n", id);
 527         return E_NOTIMPL;
 528     }
 529     if (pret) *pret = lres;
 530     return S_OK;
 531 }
 532 /**************************************************************************
 533 *  IShellBrowserImpl_SetMenuSB
 534 */
 535 HRESULT WINAPI IShellBrowserImpl_SetMenuSB(IShellBrowser *iface,
 536                                        HMENU hmenuShared,
 537                                        HOLEMENU holemenuReserved,
 538                                        HWND hwndActiveObject)
 539
 540 {
 541     ICOM_THIS(IShellBrowserImpl, iface);
 542
 543     TRACE("(%p)\n", This);
 544
 545     /* Feature not implemented */
 546     return E_NOTIMPL;
 547 }
 548 /**************************************************************************
 549 *  IShellBrowserImpl_SetStatusTextSB
 550 */
 551 HRESULT WINAPI IShellBrowserImpl_SetStatusTextSB(IShellBrowser *iface,
 552                                              LPCOLESTR lpszStatusText)
 553
 554 {
 555     ICOM_THIS(IShellBrowserImpl, iface);
 556
 557     TRACE("(%p)\n", This);
 558
 559     /* Feature not implemented */
 560     return E_NOTIMPL;
 561 }
 562 /**************************************************************************
 563 *  IShellBrowserImpl_SetToolbarItems
 564 */
 565 HRESULT WINAPI IShellBrowserImpl_SetToolbarItems(IShellBrowser *iface,
 566                                              LPTBBUTTON lpButtons,
 567                                              UINT nButtons,
 568                                              UINT uFlags)
 569
 570 {
 571     ICOM_THIS(IShellBrowserImpl, iface);
 572
 573     TRACE("(%p)\n", This);
 574
 575     /* Feature not implemented */
 576     return E_NOTIMPL;
 577 }
 578 /**************************************************************************
 579 *  IShellBrowserImpl_TranslateAcceleratorSB
 580 */
 581 HRESULT WINAPI IShellBrowserImpl_TranslateAcceleratorSB(IShellBrowser *iface,
 582                                                     LPMSG lpmsg,
 583                                                     WORD wID)
 584
 585 {
 586     ICOM_THIS(IShellBrowserImpl, iface);
 587
 588     TRACE("(%p)\n", This);
 589
 590     /* Feature not implemented */
 591     return E_NOTIMPL;
 592 }
 593
 594 /*
 595  * ICommDlgBrowser
 596  */
 597
 598 /***************************************************************************
 599 *  IShellBrowserImpl_ICommDlgBrowser_QueryInterface
 600 */
 601 HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_QueryInterface(ICommDlgBrowser *iface,
 602                                             REFIID riid,
 603                                             LPVOID *ppvObj)
 604 {
 605     _ICOM_THIS_FromICommDlgBrowser(IShellBrowser,iface);
 606
 607     TRACE("(%p)\n", This);
 608
 609     return IShellBrowserImpl_QueryInterface(This,riid,ppvObj);
 610 }
 611
 612 /**************************************************************************
 613 *  IShellBrowserImpl_ICommDlgBrowser_AddRef
 614 */
 615 ULONG WINAPI IShellBrowserImpl_ICommDlgBrowser_AddRef(ICommDlgBrowser * iface)
 616 {
 617     _ICOM_THIS_FromICommDlgBrowser(IShellBrowser,iface);
 618
 619     TRACE("(%p)\n", This);
 620
 621     return IShellBrowserImpl_AddRef(This);
 622 }
 623
 624 /**************************************************************************
 625 *  IShellBrowserImpl_ICommDlgBrowser_Release
 626 */
 627 ULONG WINAPI IShellBrowserImpl_ICommDlgBrowser_Release(ICommDlgBrowser * iface)
 628 {
 629     _ICOM_THIS_FromICommDlgBrowser(IShellBrowser,iface);
 630
 631     TRACE("(%p)\n", This);
 632
 633     return IShellBrowserImpl_Release(This);
 634 }
 635 /**************************************************************************
 636 *  IShellBrowserImpl_ICommDlgBrowser_OnDefaultCommand
 637 *
 638 *   Called when a user double-clicks in the view or presses the ENTER key
 639 */
 640 HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_OnDefaultCommand(ICommDlgBrowser *iface,
 641                                                                   IShellView *ppshv)
 642 {
 643     LPITEMIDLIST pidl;
 644     FileOpenDlgInfos *fodInfos;
 645
 646     _ICOM_THIS_FromICommDlgBrowser(IShellBrowserImpl,iface);
 647
 648     TRACE("(%p)\n", This);
 649
 650     fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr);
 651
 652     /* If the selected object is not a folder, send a IDOK command to parent window */
 653     if((pidl = GetSelectedPidl(ppshv)))
 654     {
 655         HRESULT hRes;
 656
 657         ULONG  ulAttr = SFGAO_FOLDER | SFGAO_HASSUBFOLDER;
 658         IShellFolder_GetAttributesOf(fodInfos->Shell.FOIShellFolder, 1, &pidl, &ulAttr);
 659         if (ulAttr)
 660             hRes = IShellBrowser_BrowseObject((IShellBrowser *)This,pidl,SBSP_RELATIVE);
 661         /* Tell the dialog that the user selected a file */
 662         else
 663         {
 664             hRes = PostMessageA(This->hwndOwner, WM_COMMAND, IDOK, 0L);
 665         }
 666
 667         /* Free memory used by pidl */
 668         COMDLG32_SHFree((LPVOID)pidl);
 669
 670         return hRes;
 671     }
 672
 673     return E_FAIL;
 674 }
 675
 676 /**************************************************************************
 677 *  IShellBrowserImpl_ICommDlgBrowser_OnStateChange
 678 */
 679 HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_OnStateChange(ICommDlgBrowser *iface,
 680                                                                IShellView *ppshv,
 681                                                                ULONG uChange)
 682 {
 683
 684     _ICOM_THIS_FromICommDlgBrowser(IShellBrowserImpl,iface);
 685
 686     TRACE("(%p)\n", This);
 687
 688     switch (uChange)
 689     {
 690         case CDBOSC_SETFOCUS:
 691             break;
 692         case CDBOSC_KILLFOCUS:
 693             {
 694                 FileOpenDlgInfos *fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr);
 695                 if(fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG)
 696                     SetDlgItemTextA(fodInfos->ShellInfos.hwndOwner,IDOK,"&Save");
 697             }
 698             break;
 699         case CDBOSC_SELCHANGE:
 700             return IShellBrowserImpl_ICommDlgBrowser_OnSelChange(iface,ppshv);
 701         case CDBOSC_RENAME:
 702             break;
 703     }
 704
 705     return NOERROR;
 706 }
 707 /**************************************************************************
 708 *  IShellBrowserImpl_ICommDlgBrowser_IncludeObject
 709 */
 710 HRESULT WINAPI IShellBrowserImpl_ICommDlgBrowser_IncludeObject(ICommDlgBrowser *iface,
 711                                                                IShellView * ppshv,
 712                                                                LPCITEMIDLIST pidl)
 713 {
 714     FileOpenDlgInfos *fodInfos;
 715     ULONG ulAttr;
 716     STRRET str;
 717     WCHAR szPathW[MAX_PATH];
 718
 719     _ICOM_THIS_FromICommDlgBrowser(IShellBrowserImpl,iface);
 720
 721     TRACE("(%p)\n", This);
 722
 723     fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr);
 724
 725     ulAttr = SFGAO_HIDDEN | SFGAO_FOLDER | SFGAO_FILESYSTEM | SFGAO_FILESYSANCESTOR | SFGAO_LINK;
 726     IShellFolder_GetAttributesOf(fodInfos->Shell.FOIShellFolder, 1, &pidl, &ulAttr);
 727
 728
 729     if( (ulAttr & SFGAO_HIDDEN)                                         /* hidden */
 730       | !(ulAttr & (SFGAO_FILESYSTEM | SFGAO_FILESYSANCESTOR))) /* special folder */
 731         return S_FALSE;
 732     /* always include directorys and links */
 733     if(ulAttr & (SFGAO_FOLDER | SFGAO_LINK))
 734         return S_OK;
 735     /* Check if there is a mask to apply if not */
 736     if(!fodInfos->ShellInfos.lpstrCurrentFilter ||
 737        !lstrlenW(fodInfos->ShellInfos.lpstrCurrentFilter))
 738         return S_OK;
 739
 740     if (SUCCEEDED(IShellFolder_GetDisplayNameOf(fodInfos->Shell.FOIShellFolder, pidl, SHGDN_FORPARSING, &str)))
 741     { if (SUCCEEDED(StrRetToBufW(&str, pidl,szPathW, MAX_PATH)))
 742       {
 743           if (COMDLG32_PathMatchSpecW(szPathW, fodInfos->ShellInfos.lpstrCurrentFilter))
 744           return S_OK;
 745       }
 746     }
 747     return S_FALSE;
 748
 749 }
 750
 751 /**************************************************************************
 752 *  IShellBrowserImpl_ICommDlgBrowser_OnSelChange
 753 */
 754 HRESULT IShellBrowserImpl_ICommDlgBrowser_OnSelChange(ICommDlgBrowser *iface, IShellView *ppshv)
 755 {
 756     FileOpenDlgInfos *fodInfos;
 757     UINT nFileSelected;
 758     UINT nFileToOpen;
 759     UINT nFiles = 0;
 760     char   lpstrFileList[MAX_PATH];
 761     char   lpstrTemp[MAX_PATH];
 762     LPSTR  lpstrCurrFile = lpstrFileList;
 763     _ICOM_THIS_FromICommDlgBrowser(IShellBrowserImpl,iface);
 764
 765     fodInfos = (FileOpenDlgInfos *) GetPropA(This->hwndOwner,FileOpenDlgInfosStr);
 766     TRACE("(%p)\n", This);
 767
 768     nFileSelected = GetNumSelected( fodInfos->Shell.FOIShellView );
 769     /* Count how many files we have */
 770     for ( nFileToOpen = 0; nFileToOpen < nFileSelected; nFileToOpen++ )
 771     {
 772         LPITEMIDLIST pidlSelection;
 773         ULONG        uAttr = SFGAO_FOLDER | SFGAO_HASSUBFOLDER;
 774
 775         /* get the file selected */
 776         EnumSelectedPidls( fodInfos->Shell.FOIShellView, nFileToOpen, &pidlSelection );
 777         IShellFolder_GetAttributesOf( fodInfos->Shell.FOIShellFolder, 1, &pidlSelection, &uAttr );
 778
 779         if (!uAttr)
 780            nFiles++;
 781
 782         COMDLG32_SHFree( (LPVOID) pidlSelection );
 783     }
 784
 785     /* Generate the string for the edit control */
 786     ZeroMemory(lpstrFileList, MAX_PATH);
 787     if (nFiles)
 788     {
 789       for ( nFileToOpen = 0; nFileToOpen < nFileSelected; nFileToOpen++ )
 790       {
 791         LPITEMIDLIST pidlSelection;
 792         ULONG        uAttr = SFGAO_FOLDER | SFGAO_HASSUBFOLDER;
 793
 794         memset( lpstrTemp, 0x0, MAX_PATH * sizeof(char) );
 795
 796         /* get the file selected */
 797         EnumSelectedPidls( fodInfos->Shell.FOIShellView, nFileToOpen, &pidlSelection );
 798         GetName( fodInfos->Shell.FOIShellFolder, pidlSelection, SHGDN_NORMAL, lpstrTemp );
 799
 800         IShellFolder_GetAttributesOf( fodInfos->Shell.FOIShellFolder, 1, &pidlSelection, &uAttr );
 801
 802         if ( uAttr & SFGAO_FOLDER ) /* Ignore folders */
 803           continue;
 804
 805         if (nFiles > 1) /* Quote files if we have more than one */
 806         {
 807             *lpstrCurrFile++ =  '\"';
 808             lstrcpyA( lpstrCurrFile, lpstrTemp );
 809             lpstrCurrFile += lstrlenA( lpstrTemp );
 810             lstrcpyA( lpstrCurrFile, "\" " );
 811             lpstrCurrFile += 2;
 812         }
 813         else
 814         {
 815             lstrcpyA( lpstrCurrFile, lpstrTemp );
 816         }
 817
 818         COMDLG32_SHFree( (LPVOID) pidlSelection );
 819       }
 820
 821       SetWindowTextA(fodInfos->DlgInfos.hwndFileName,lpstrFileList);
 822             if(fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG)
 823                     SetDlgItemTextA(fodInfos->ShellInfos.hwndOwner,IDOK,"&Save");
 824         else
 825             SetDlgItemTextA(fodInfos->ShellInfos.hwndOwner,IDOK,"&Open");
 826
 827         fodInfos->DlgInfos.dwDlgProp |= FODPROP_USEVIEW;
 828         SendCustomDlgNotificationMessage(This->hwndOwner, CDN_SELCHANGE);
 829       return S_OK;
 830     }
 831
 832     if(fodInfos->DlgInfos.dwDlgProp & FODPROP_SAVEDLG)
 833         SetDlgItemTextA(fodInfos->ShellInfos.hwndOwner,IDOK,"&Save");
 834
 835     fodInfos->DlgInfos.dwDlgProp &= ~FODPROP_USEVIEW;
 836
 837     return nFileSelected ? S_OK : E_FAIL;
 838 }
 839
 840 /***********************************************************************
 841  *          GetSelectedPidl
 842  *
 843  * Return the pidl of the first selected item in the view
 844  */
 845 LPITEMIDLIST GetSelectedPidl(IShellView *ppshv)
 846 {
 847
 848     IDataObject *doSelected;
 849     LPITEMIDLIST pidlSelected = NULL;
 850
 851     TRACE("sv=%p\n", ppshv);
 852
 853     /* Get an IDataObject from the view */
 854     if(SUCCEEDED(IShellView_GetItemObject(ppshv,
 855                                           SVGIO_SELECTION,
 856                                           &IID_IDataObject,
 857                                           (LPVOID *)&doSelected)))
 858     {
 859         STGMEDIUM medium;
 860         FORMATETC formatetc;
 861
 862         /* Set the FORMATETC structure*/
 863         SETDefFormatEtc(formatetc,
 864                         RegisterClipboardFormatA(CFSTR_SHELLIDLIST),
 865                         TYMED_HGLOBAL);
 866
 867         /* Get the pidl from IDataObject */
 868         if(SUCCEEDED(IDataObject_GetData(doSelected,&formatetc,&medium)))
 869         {
 870             LPIDA cida = GlobalLock(medium.u.hGlobal);
 871             TRACE("cida=%p\n", cida);
 872             pidlSelected =  COMDLG32_PIDL_ILClone((LPITEMIDLIST)(&((LPBYTE)cida)[cida->aoffset[1]]));
 873
 874             if(medium.pUnkForRelease)
 875                 IUnknown_Release(medium.pUnkForRelease);
 876             else
 877             {
 878               GlobalUnlock(medium.u.hGlobal);
 879               GlobalFree(medium.u.hGlobal);
 880             }
 881         }
 882         IDataObject_Release(doSelected);
 883         return pidlSelected;
 884     }
 885
 886     return NULL;
 887 }
 888
 889 /***********************************************************************
 890  *          EnumSelectedPidls
 891  *
 892  * Return the pidl(s) of the selected item(s) in the view.
 893  *
 894 */
 895 BOOL EnumSelectedPidls( IShellView *ppshv,  /*[in]*/
 896                         UINT nPidlIndex,  /*[in]*/
 897                         LPITEMIDLIST *pidlSelected /*[out]*/ )
 898 {
 899
 900     IDataObject *doSelected;
 901     BOOL retVal = TRUE;
 902
 903     /* Get an IDataObject from the view */
 904     if(SUCCEEDED(IShellView_GetItemObject(ppshv,
 905                                           SVGIO_SELECTION,
 906                                           &IID_IDataObject,
 907                                           (LPVOID *)&doSelected)))
 908     {
 909         STGMEDIUM medium;
 910         FORMATETC formatetc;
 911
 912         /* Set the FORMATETC structure*/
 913         SETDefFormatEtc(formatetc,
 914                         RegisterClipboardFormatA(CFSTR_SHELLIDLIST),
 915                         TYMED_HGLOBAL);
 916
 917         /* Get the pidls from IDataObject */
 918         if(SUCCEEDED(IDataObject_GetData(doSelected,&formatetc,&medium)))
 919         {
 920             LPIDA cida = GlobalLock(medium.u.hGlobal);
 921             if(nPidlIndex < cida->cidl)
 922             {
 923                 *pidlSelected = COMDLG32_PIDL_ILClone((LPITEMIDLIST)(&((LPBYTE)cida)[cida->aoffset[nPidlIndex + 1]]));
 924             }
 925             else
 926             {
 927                 retVal = FALSE;
 928             }
 929
 930             if(medium.pUnkForRelease)
 931             {
 932                 IUnknown_Release(medium.pUnkForRelease);
 933             }
 934             else
 935             {
 936                 GlobalUnlock(medium.u.hGlobal);
 937                 GlobalFree(medium.u.hGlobal);
 938             }
 939         }
 940         IDataObject_Release(doSelected);
 941         return retVal;
 942     }
 943     return FALSE;
 944 }
 945
 946 /***********************************************************************
 947  *          GetNumSelected
 948  *
 949  * Return the number of selected items in the view.
 950  *
 951 */
 952 UINT GetNumSelected( IShellView *ppshv )
 953 {
 954     IDataObject *doSelected;
 955     UINT retVal = 0;
 956
 957        /* Get an IDataObject from the view */
 958     if(SUCCEEDED(IShellView_GetItemObject(ppshv,
 959                                           SVGIO_SELECTION,
 960                                           &IID_IDataObject,
 961                                           (LPVOID *)&doSelected)))
 962     {
 963         STGMEDIUM medium;
 964         FORMATETC formatetc;
 965
 966         /* Set the FORMATETC structure*/
 967         SETDefFormatEtc(formatetc,
 968                         RegisterClipboardFormatA(CFSTR_SHELLIDLIST),
 969                         TYMED_HGLOBAL);
 970
 971         /* Get the pidls from IDataObject */
 972         if(SUCCEEDED(IDataObject_GetData(doSelected,&formatetc,&medium)))
 973         {
 974             LPIDA cida = GlobalLock(medium.u.hGlobal);
 975             retVal = cida->cidl;
 976
 977             if(medium.pUnkForRelease)
 978             {
 979                 IUnknown_Release(medium.pUnkForRelease);
 980             }
 981             else
 982             {
 983                 GlobalUnlock(medium.u.hGlobal);
 984                 GlobalFree(medium.u.hGlobal);
 985             }
 986         }
 987         IDataObject_Release(doSelected);
 988         return retVal;
 989     }
 990
 991     return 0;
 992 }
 993
 994
 995
 996
 997