4 * Copyright 2009 Andrew Hill <ash77 at domain reactos.org>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
27 BOOL WINAPI
Shell_GetImageLists(
28 _Out_ HIMAGELIST
*phiml
,
29 _Out_ HIMAGELIST
*phimlSmall
);
31 extern HRESULT
IUnknown_ShowDW(IUnknown
* punk
, BOOL fShow
);
33 #include "newatlinterfaces.h"
37 **Provide implementation of new and delete that use LocalAlloc
38 **Persist history for shell view isn't working correctly, possibly because of the mismatch between traveling and updating the travel log. The
39 view doesn't restore the selection correctly.
40 **Build explorer.exe, browseui.dll, comctl32.dll, shdocvw.dll, shell32.dll, shlwapi.dll into a directory and run them for testing...
41 **Add brand band bitmaps to shell32.dll
42 **If Go button on address bar is clicked, each time a new duplicate entry is added to travel log
43 ****The current entry is updated in travel log before doing the travel, which means when traveling back the update of the
44 current state overwrites the wrong entry's contents. This needs to be changed.
45 ****Fix close of browser window to release all objects
46 ****Given only a GUID in ShowBrowserBar, what is the correct way to determine if the bar is vertical or horizontal?
47 **When a new bar is added to base bar site, how is base bar told so it can resize?
48 **Does the base bar site have a classid?
49 **What should refresh command send to views to make them refresh?
50 **When new bar is created, what status notifications need to be fired?
51 **How does keyboard filtering dispatch?
52 **For deferred persist history load, how does the view connect up and get the state?
53 How does context menu send open, cut, rename commands to its site (the shell view)?
54 **Fix browser to implement IProfferService and hold onto brand band correctly - this will allow animations.
56 **Route View->Toolbars commands to internet toolbar
57 **Handle travel log items in View->Go
58 **Fix ShowBrowserBar to pass correct size on when bar is shown
59 ****Fix SetBorderSpaceDW to cascade resize to subsequent bars
60 ****Make ShowToolbar check if bar is already created before creating it again
61 ****Shell should fill in the list of explorer bars in the View submenus
62 **Add folder menu in the file menu
63 **Fix CShellBrowser::GetBorderDW to compute available size correctly
64 **When a new bar is shown, re-fire the navigate event. This makes the explorer band select the correct folder
65 **Implement support for refresh. Forward refresh to explorer bar (refresh on toolbar and in menu is dispatched different)
66 Make folders toolbar item update state appropriately
67 Read list of bands from registry on launch
68 Read list of bars from registry on launch
69 If the folders or search bars don't exist, disable the toolbar buttons
70 If the favorites or history bars don't exist, disable the toolbar butons
71 Fix Apply to all Folders in Folder Options
72 Implement close command
73 Add explorer band context menu to file menu
74 Add code to allow restore of internet toolbar from registry
75 Fix code that calls FireNavigateComplete to pass the correct new path
77 What are the other command ids for QueryStatus/FireCommandStateChange?
79 Add handler for cabinet settings change
80 Add handler for system metrics change (renegotiate border space?)
81 Add handler for theme change and forward to contained windows
83 When folders are shown, the status bar text should change
84 Add code to save/restore shell view settings
85 Implement tabbing between frames
86 Fix handling of focus everywhere
87 Most keyboard shortcuts don't work, such as F2 for rename, F5 for refresh (see list in "explorer keyboard shortcuts")
89 The status bar doesn't show help text for items owned by frame during menu tracking
90 Stub out frame command handlers
91 "Arrange icons by" group is not checked properly
93 When folders are hidden, icon is the same as the current shell object being displayed. When folders are shown,
94 the icon is always an open folder with magnifying glass
95 Fix bars to calculate height correctly
96 Hookup policies for everything...
97 Investigate toolbar message WM_USER+93
98 Investigate toolbar message WM_USER+100 (Adds extra padding between parts of buttons with BTNS_DROPDOWN | BTNS_SHOWTEXT style
100 Vertical Explorer Bar CATID_InfoBand
101 Horizontal Explorer Bar CATID_CommBand
102 Desk Band CATID_DeskBand
105 HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Discardable\PostSetup\Component Categories\{00021493-0000-0000-C000-000000000046}\Enum
106 HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Discardable\PostSetup\Component Categories\{00021494-0000-0000-C000-000000000046}\Enum
108 create key here with CLSID of bar to register tool band
109 HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Toolbar
114 #pragma comment(linker, \
115 "\"/manifestdependency:type='Win32' "\
116 "name='Microsoft.Windows.Common-Controls' "\
117 "version='6.0.0.0' "\
118 "processorArchitecture='*' "\
119 "publicKeyToken='6595b64144ccf1df' "\
123 struct categoryCacheHeader
125 long dwSize
; // size of header only
126 long version
; // currently 1
127 SYSTEMTIME writeTime
; // time we were written to registry
128 long classCount
; // number of classes following
131 static const unsigned int folderOptionsPageCountMax
= 20;
132 static const long BTP_UPDATE_CUR_HISTORY
= 1;
133 static const long BTP_UPDATE_NEXT_HISTORY
= 2;
135 BOOL createNewStuff
= false;
138 // this class is private to browseui.dll and is not registered externally?
139 //DEFINE_GUID(CLSID_ShellFldSetExt, 0x6D5313C0, 0x8C62, 0x11D1, 0xB2, 0xCD, 0x00, 0x60, 0x97, 0xDF, 0x8C, 0x11);
142 extern HRESULT
CreateTravelLog(REFIID riid
, void **ppv
);
143 extern HRESULT
CreateBaseBar(REFIID riid
, void **ppv
);
144 extern HRESULT
CreateBaseBarSite(REFIID riid
, void **ppv
);
147 extern HRESULT
CreateInternetToolbar(REFIID riid
, void **ppv
);
150 HMENU
SHGetMenuFromID(HMENU topMenu
, int theID
)
152 MENUITEMINFO menuItemInfo
;
154 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
155 menuItemInfo
.fMask
= MIIM_SUBMENU
;
156 if (!GetMenuItemInfo(topMenu
, theID
, FALSE
, &menuItemInfo
))
158 return menuItemInfo
.hSubMenu
;
161 void SHCheckMenuItem(HMENU theMenu
, int theID
, BOOL checked
)
163 MENUITEMINFO menuItemInfo
;
165 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
166 menuItemInfo
.fMask
= MIIM_STATE
;
167 if (GetMenuItemInfo(theMenu
, theID
, FALSE
, &menuItemInfo
))
170 menuItemInfo
.fState
|= MF_CHECKED
;
172 menuItemInfo
.fState
&= ~MF_CHECKED
;
173 SetMenuItemInfo(theMenu
, theID
, FALSE
, &menuItemInfo
);
177 void DeleteMenuItems(HMENU theMenu
, unsigned int firstIDToDelete
, unsigned int lastIDToDelete
)
179 MENUITEMINFO menuItemInfo
;
183 menuItemCount
= GetMenuItemCount(theMenu
);
185 while (curIndex
< menuItemCount
)
187 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
188 menuItemInfo
.fMask
= MIIM_ID
;
189 if (GetMenuItemInfo(theMenu
, curIndex
, TRUE
, &menuItemInfo
) &&
190 menuItemInfo
.wID
>= firstIDToDelete
&& menuItemInfo
.wID
<= lastIDToDelete
)
192 DeleteMenu(theMenu
, curIndex
, MF_BYPOSITION
);
200 HRESULT WINAPI
SHBindToFolder(LPCITEMIDLIST path
, IShellFolder
**newFolder
)
202 CComPtr
<IShellFolder
> desktop
;
204 HRESULT hr
= ::SHGetDesktopFolder(&desktop
);
205 if (FAILED_UNEXPECTEDLY(hr
))
207 if (path
== NULL
|| path
->mkid
.cb
== 0)
209 *newFolder
= desktop
;
210 desktop
.p
->AddRef ();
213 return desktop
->BindToObject (path
, NULL
, IID_PPV_ARG(IShellFolder
, newFolder
));
216 static const TCHAR szCabinetWndClass
[] = TEXT("CabinetWClassX");
217 static const TCHAR szExploreWndClass
[] = TEXT("ExploreWClassX");
222 class CToolbarProxy
:
223 public CWindowImpl
<CToolbarProxy
, CWindow
, CControlWinTraits
>
226 CComPtr
<IExplorerToolbar
> fExplorerToolbar
;
228 void Initialize(HWND parent
, IUnknown
*explorerToolbar
);
233 LRESULT
OnAddBitmap(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
);
234 LRESULT
OnForwardMessage(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
);
236 BEGIN_MSG_MAP(CToolbarProxy
)
237 MESSAGE_HANDLER(TB_ADDBITMAP
, OnAddBitmap
)
238 MESSAGE_RANGE_HANDLER(WM_USER
, 0x7fff, OnForwardMessage
)
242 void CToolbarProxy::Initialize(HWND parent
, IUnknown
*explorerToolbar
)
247 myWindow
= SHCreateWorkerWindowW(0, parent
, 0, WS_CHILD
, NULL
, 0);
248 if (myWindow
!= NULL
)
250 SubclassWindow(myWindow
);
251 SetWindowPos(NULL
, -32000, -32000, 0, 0, SWP_NOOWNERZORDER
| SWP_NOZORDER
);
252 hResult
= explorerToolbar
->QueryInterface(
253 IID_PPV_ARG(IExplorerToolbar
, &fExplorerToolbar
));
257 LRESULT
CToolbarProxy::OnAddBitmap(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
263 if (fExplorerToolbar
.p
!= NULL
)
265 hResult
= fExplorerToolbar
->AddBitmap(&CGID_ShellBrowser
, 1, (long)wParam
,
266 reinterpret_cast<TBADDBITMAP
*>(lParam
), &result
, RGB(192, 192, 192));
267 hResult
= fExplorerToolbar
->AddBitmap(&CGID_ShellBrowser
, 2, (long)wParam
,
268 reinterpret_cast<TBADDBITMAP
*>(lParam
), &result
, RGB(192, 192, 192));
273 LRESULT
CToolbarProxy::OnForwardMessage(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
279 if (fExplorerToolbar
.p
!= NULL
)
280 hResult
= fExplorerToolbar
->SendToolbarMsg(&CGID_ShellBrowser
, uMsg
, wParam
, lParam
, &result
);
285 Switch to a new bar when it receives an Exec(CGID_IDeskBand, 1, 1, vaIn, NULL);
286 where vaIn will be a VT_UNKNOWN with the new bar. It also sends a RB_SHOWBAND to the
290 class CShellBrowser
:
291 public CWindowImpl
<CShellBrowser
, CWindow
, CFrameWinTraits
>,
292 public CComObjectRootEx
<CComMultiThreadModelNoCS
>,
293 public IShellBrowser
,
295 public IServiceProvider
,
296 public IProfferServiceImpl
<CShellBrowser
>,
297 public IShellBrowserService
,
299 public ITravelLogClient
,
300 public IPersistHistory
,
301 public IDockingWindowSite
,
302 public IOleCommandTarget
,
303 public IBrowserService2
,
304 public IConnectionPointContainerImpl
<CShellBrowser
>,
305 public MyIConnectionPointImpl
<CShellBrowser
, &DIID_DWebBrowserEvents2
>,
306 public MyIConnectionPointImpl
<CShellBrowser
, &DIID_DWebBrowserEvents
>
313 CComPtr
<IUnknown
> clientBar
;
316 static const int BIInternetToolbar
= 0;
317 static const int BIVerticalBaseBar
= 1;
318 static const int BIHorizontalBaseBar
= 2;
320 HWND fCurrentShellViewWindow
; // our currently hosted shell view window
321 CComPtr
<IShellFolder
> fCurrentShellFolder
; //
322 CComPtr
<IShellView
> fCurrentShellView
; //
323 LPITEMIDLIST fCurrentDirectoryPIDL
; //
325 bool fStatusBarVisible
;
326 CToolbarProxy fToolbarProxy
;
327 barInfo fClientBars
[3];
328 CComPtr
<ITravelLog
> fTravelLog
;
329 HMENU fCurrentMenuBar
;
330 CABINETSTATE fCabinetState
;
331 // The next three fields support persisted history for shell views.
332 // They do not need to be reference counted.
333 IOleObject
*fHistoryObject
;
334 IStream
*fHistoryStream
;
335 IBindCtx
*fHistoryBindContext
;
339 ULONG
InternalAddRef()
341 OutputDebugString(_T("AddRef\n"));
342 return CComObjectRootEx
<CComMultiThreadModelNoCS
>::InternalAddRef();
344 ULONG
InternalRelease()
346 OutputDebugString(_T("Release\n"));
347 return CComObjectRootEx
<CComMultiThreadModelNoCS
>::InternalRelease();
353 HRESULT
Initialize(LPITEMIDLIST pidl
, long b
, long c
, long d
);
355 HRESULT
BrowseToPIDL(LPCITEMIDLIST pidl
, long flags
);
356 HRESULT
BrowseToPath(IShellFolder
*newShellFolder
, LPCITEMIDLIST absolutePIDL
,
357 FOLDERSETTINGS
*folderSettings
, long flags
);
358 HRESULT
GetMenuBand(REFIID riid
, void **shellMenu
);
359 HRESULT
GetBaseBar(bool vertical
, IUnknown
**theBaseBar
);
360 HRESULT
ShowBand(const CLSID
&classID
, bool vertical
);
361 HRESULT
NavigateToParent();
362 HRESULT
DoFolderOptions();
363 static LRESULT CALLBACK
WindowProc(HWND hWnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
);
364 void RepositionBars();
365 virtual WNDPROC
GetWindowProc()
369 HRESULT
FireEvent(DISPID dispIdMember
, int argCount
, VARIANT
*arguments
);
370 HRESULT
FireNavigateComplete(const wchar_t *newDirectory
);
371 HRESULT
FireCommandStateChange(bool newState
, int commandID
);
372 HRESULT
FireCommandStateChangeAll();
373 HRESULT
UpdateForwardBackState();
374 void UpdateGotoMenu(HMENU theMenu
);
375 void UpdateViewMenu(HMENU theMenu
);
377 /* // *** IDockingWindowFrame methods ***
378 virtual HRESULT STDMETHODCALLTYPE AddToolbar(IUnknown *punkSrc, LPCWSTR pwszItem, DWORD dwAddFlags);
379 virtual HRESULT STDMETHODCALLTYPE RemoveToolbar(IUnknown *punkSrc, DWORD dwRemoveFlags);
380 virtual HRESULT STDMETHODCALLTYPE FindToolbar(LPCWSTR pwszItem, REFIID riid, void **ppv);
383 // *** IDockingWindowSite methods ***
384 virtual HRESULT STDMETHODCALLTYPE
GetBorderDW(IUnknown
* punkObj
, LPRECT prcBorder
);
385 virtual HRESULT STDMETHODCALLTYPE
RequestBorderSpaceDW(IUnknown
* punkObj
, LPCBORDERWIDTHS pbw
);
386 virtual HRESULT STDMETHODCALLTYPE
SetBorderSpaceDW(IUnknown
* punkObj
, LPCBORDERWIDTHS pbw
);
388 // *** IOleCommandTarget methods ***
389 virtual HRESULT STDMETHODCALLTYPE
QueryStatus(const GUID
*pguidCmdGroup
, ULONG cCmds
,
390 OLECMD prgCmds
[ ], OLECMDTEXT
*pCmdText
);
391 virtual HRESULT STDMETHODCALLTYPE
Exec(const GUID
*pguidCmdGroup
, DWORD nCmdID
,
392 DWORD nCmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
);
394 // *** IOleWindow methods ***
395 virtual HRESULT STDMETHODCALLTYPE
GetWindow(HWND
*lphwnd
);
396 virtual HRESULT STDMETHODCALLTYPE
ContextSensitiveHelp(BOOL fEnterMode
);
398 // *** IShellBrowser methods ***
399 virtual HRESULT STDMETHODCALLTYPE
InsertMenusSB(HMENU hmenuShared
, LPOLEMENUGROUPWIDTHS lpMenuWidths
);
400 virtual HRESULT STDMETHODCALLTYPE
SetMenuSB(HMENU hmenuShared
, HOLEMENU holemenuRes
, HWND hwndActiveObject
);
401 virtual HRESULT STDMETHODCALLTYPE
RemoveMenusSB(HMENU hmenuShared
);
402 virtual HRESULT STDMETHODCALLTYPE
SetStatusTextSB(LPCOLESTR pszStatusText
);
403 virtual HRESULT STDMETHODCALLTYPE
EnableModelessSB(BOOL fEnable
);
404 virtual HRESULT STDMETHODCALLTYPE
TranslateAcceleratorSB(MSG
*pmsg
, WORD wID
);
405 virtual HRESULT STDMETHODCALLTYPE
BrowseObject(LPCITEMIDLIST pidl
, UINT wFlags
);
406 virtual HRESULT STDMETHODCALLTYPE
GetViewStateStream(DWORD grfMode
, IStream
**ppStrm
);
407 virtual HRESULT STDMETHODCALLTYPE
GetControlWindow(UINT id
, HWND
*lphwnd
);
408 virtual HRESULT STDMETHODCALLTYPE
SendControlMsg(UINT id
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
, LRESULT
*pret
);
409 virtual HRESULT STDMETHODCALLTYPE
QueryActiveShellView(IShellView
**ppshv
);
410 virtual HRESULT STDMETHODCALLTYPE
OnViewWindowActive(IShellView
*ppshv
);
411 virtual HRESULT STDMETHODCALLTYPE
SetToolbarItems(LPTBBUTTON lpButtons
, UINT nButtons
, UINT uFlags
);
413 // *** IDropTarget methods ***
414 virtual HRESULT STDMETHODCALLTYPE
DragEnter(IDataObject
*pDataObj
, DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
);
415 virtual HRESULT STDMETHODCALLTYPE
DragOver(DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
);
416 virtual HRESULT STDMETHODCALLTYPE
DragLeave();
417 virtual HRESULT STDMETHODCALLTYPE
Drop(IDataObject
*pDataObj
, DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
);
419 // *** IServiceProvider methods ***
420 virtual HRESULT STDMETHODCALLTYPE
QueryService(REFGUID guidService
, REFIID riid
, void **ppvObject
);
422 // *** IShellBowserService methods ***
423 virtual HRESULT STDMETHODCALLTYPE
GetPropertyBag(long flags
, REFIID riid
, void **ppvObject
);
425 // *** IDispatch methods ***
426 virtual HRESULT STDMETHODCALLTYPE
GetTypeInfoCount(UINT
*pctinfo
);
427 virtual HRESULT STDMETHODCALLTYPE
GetTypeInfo(UINT iTInfo
, LCID lcid
, ITypeInfo
**ppTInfo
);
428 virtual HRESULT STDMETHODCALLTYPE
GetIDsOfNames(
429 REFIID riid
, LPOLESTR
*rgszNames
, UINT cNames
, LCID lcid
, DISPID
*rgDispId
);
430 virtual HRESULT STDMETHODCALLTYPE
Invoke(DISPID dispIdMember
, REFIID riid
, LCID lcid
, WORD wFlags
,
431 DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
);
433 // *** IBrowserService methods ***
434 virtual HRESULT STDMETHODCALLTYPE
GetParentSite(IOleInPlaceSite
**ppipsite
);
435 virtual HRESULT STDMETHODCALLTYPE
SetTitle(IShellView
*psv
, LPCWSTR pszName
);
436 virtual HRESULT STDMETHODCALLTYPE
GetTitle(IShellView
*psv
, LPWSTR pszName
, DWORD cchName
);
437 virtual HRESULT STDMETHODCALLTYPE
GetOleObject(IOleObject
**ppobjv
);
438 virtual HRESULT STDMETHODCALLTYPE
GetTravelLog(ITravelLog
**pptl
);
439 virtual HRESULT STDMETHODCALLTYPE
ShowControlWindow(UINT id
, BOOL fShow
);
440 virtual HRESULT STDMETHODCALLTYPE
IsControlWindowShown(UINT id
, BOOL
*pfShown
);
441 virtual HRESULT STDMETHODCALLTYPE
IEGetDisplayName(LPCITEMIDLIST pidl
, LPWSTR pwszName
, UINT uFlags
);
442 virtual HRESULT STDMETHODCALLTYPE
IEParseDisplayName(UINT uiCP
, LPCWSTR pwszPath
, LPITEMIDLIST
*ppidlOut
);
443 virtual HRESULT STDMETHODCALLTYPE
DisplayParseError(HRESULT hres
, LPCWSTR pwszPath
);
444 virtual HRESULT STDMETHODCALLTYPE
NavigateToPidl(LPCITEMIDLIST pidl
, DWORD grfHLNF
);
445 virtual HRESULT STDMETHODCALLTYPE
SetNavigateState(BNSTATE bnstate
);
446 virtual HRESULT STDMETHODCALLTYPE
GetNavigateState(BNSTATE
*pbnstate
);
447 virtual HRESULT STDMETHODCALLTYPE
NotifyRedirect(IShellView
*psv
, LPCITEMIDLIST pidl
, BOOL
*pfDidBrowse
);
448 virtual HRESULT STDMETHODCALLTYPE
UpdateWindowList();
449 virtual HRESULT STDMETHODCALLTYPE
UpdateBackForwardState();
450 virtual HRESULT STDMETHODCALLTYPE
SetFlags(DWORD dwFlags
, DWORD dwFlagMask
);
451 virtual HRESULT STDMETHODCALLTYPE
GetFlags(DWORD
*pdwFlags
);
452 virtual HRESULT STDMETHODCALLTYPE
CanNavigateNow( void);
453 virtual HRESULT STDMETHODCALLTYPE
GetPidl(LPITEMIDLIST
*ppidl
);
454 virtual HRESULT STDMETHODCALLTYPE
SetReferrer(LPCITEMIDLIST pidl
);
455 virtual DWORD STDMETHODCALLTYPE
GetBrowserIndex();
456 virtual HRESULT STDMETHODCALLTYPE
GetBrowserByIndex(DWORD dwID
, IUnknown
**ppunk
);
457 virtual HRESULT STDMETHODCALLTYPE
GetHistoryObject(IOleObject
**ppole
, IStream
**pstm
, IBindCtx
**ppbc
);
458 virtual HRESULT STDMETHODCALLTYPE
SetHistoryObject(IOleObject
*pole
, BOOL fIsLocalAnchor
);
459 virtual HRESULT STDMETHODCALLTYPE
CacheOLEServer(IOleObject
*pole
);
460 virtual HRESULT STDMETHODCALLTYPE
GetSetCodePage(VARIANT
*pvarIn
, VARIANT
*pvarOut
);
461 virtual HRESULT STDMETHODCALLTYPE
OnHttpEquiv(IShellView
*psv
, BOOL fDone
, VARIANT
*pvarargIn
, VARIANT
*pvarargOut
);
462 virtual HRESULT STDMETHODCALLTYPE
GetPalette(HPALETTE
*hpal
);
463 virtual HRESULT STDMETHODCALLTYPE
RegisterWindow(BOOL fForceRegister
, int swc
);
465 // *** IBrowserService2 methods ***
466 virtual LRESULT STDMETHODCALLTYPE
WndProcBS(HWND hwnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
);
467 virtual HRESULT STDMETHODCALLTYPE
SetAsDefFolderSettings();
468 virtual HRESULT STDMETHODCALLTYPE
GetViewRect(RECT
*prc
);
469 virtual HRESULT STDMETHODCALLTYPE
OnSize(WPARAM wParam
);
470 virtual HRESULT STDMETHODCALLTYPE
OnCreate(struct tagCREATESTRUCTW
*pcs
);
471 virtual LRESULT STDMETHODCALLTYPE
OnCommand(WPARAM wParam
, LPARAM lParam
);
472 virtual HRESULT STDMETHODCALLTYPE
OnDestroy();
473 virtual LRESULT STDMETHODCALLTYPE
OnNotify(struct tagNMHDR
*pnm
);
474 virtual HRESULT STDMETHODCALLTYPE
OnSetFocus();
475 virtual HRESULT STDMETHODCALLTYPE
OnFrameWindowActivateBS(BOOL fActive
);
476 virtual HRESULT STDMETHODCALLTYPE
ReleaseShellView();
477 virtual HRESULT STDMETHODCALLTYPE
ActivatePendingView();
478 virtual HRESULT STDMETHODCALLTYPE
CreateViewWindow(IShellView
*psvNew
, IShellView
*psvOld
, LPRECT prcView
, HWND
*phwnd
);
479 virtual HRESULT STDMETHODCALLTYPE
CreateBrowserPropSheetExt(REFIID riid
, void **ppv
);
480 virtual HRESULT STDMETHODCALLTYPE
GetViewWindow(HWND
*phwndView
);
481 virtual HRESULT STDMETHODCALLTYPE
GetBaseBrowserData(LPCBASEBROWSERDATA
*pbbd
);
482 virtual LPBASEBROWSERDATA STDMETHODCALLTYPE
PutBaseBrowserData( void);
483 virtual HRESULT STDMETHODCALLTYPE
InitializeTravelLog(ITravelLog
*ptl
, DWORD dw
);
484 virtual HRESULT STDMETHODCALLTYPE
SetTopBrowser();
485 virtual HRESULT STDMETHODCALLTYPE
Offline(int iCmd
);
486 virtual HRESULT STDMETHODCALLTYPE
AllowViewResize(BOOL f
);
487 virtual HRESULT STDMETHODCALLTYPE
SetActivateState(UINT u
);
488 virtual HRESULT STDMETHODCALLTYPE
UpdateSecureLockIcon(int eSecureLock
);
489 virtual HRESULT STDMETHODCALLTYPE
InitializeDownloadManager();
490 virtual HRESULT STDMETHODCALLTYPE
InitializeTransitionSite();
491 virtual HRESULT STDMETHODCALLTYPE
_Initialize(HWND hwnd
, IUnknown
*pauto
);
492 virtual HRESULT STDMETHODCALLTYPE
_CancelPendingNavigationAsync( void);
493 virtual HRESULT STDMETHODCALLTYPE
_CancelPendingView();
494 virtual HRESULT STDMETHODCALLTYPE
_MaySaveChanges();
495 virtual HRESULT STDMETHODCALLTYPE
_PauseOrResumeView(BOOL fPaused
);
496 virtual HRESULT STDMETHODCALLTYPE
_DisableModeless();
497 virtual HRESULT STDMETHODCALLTYPE
_NavigateToPidl(LPCITEMIDLIST pidl
, DWORD grfHLNF
, DWORD dwFlags
);
498 virtual HRESULT STDMETHODCALLTYPE
_TryShell2Rename(IShellView
*psv
, LPCITEMIDLIST pidlNew
);
499 virtual HRESULT STDMETHODCALLTYPE
_SwitchActivationNow();
500 virtual HRESULT STDMETHODCALLTYPE
_ExecChildren(IUnknown
*punkBar
, BOOL fBroadcast
, const GUID
*pguidCmdGroup
,
501 DWORD nCmdID
, DWORD nCmdexecopt
, VARIANTARG
*pvarargIn
, VARIANTARG
*pvarargOut
);
502 virtual HRESULT STDMETHODCALLTYPE
_SendChildren(
503 HWND hwndBar
, BOOL fBroadcast
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
);
504 virtual HRESULT STDMETHODCALLTYPE
GetFolderSetData(struct tagFolderSetData
*pfsd
);
505 virtual HRESULT STDMETHODCALLTYPE
_OnFocusChange(UINT itb
);
506 virtual HRESULT STDMETHODCALLTYPE
v_ShowHideChildWindows(BOOL fChildOnly
);
507 virtual UINT STDMETHODCALLTYPE
_get_itbLastFocus();
508 virtual HRESULT STDMETHODCALLTYPE
_put_itbLastFocus(UINT itbLastFocus
);
509 virtual HRESULT STDMETHODCALLTYPE
_UIActivateView(UINT uState
);
510 virtual HRESULT STDMETHODCALLTYPE
_GetViewBorderRect(RECT
*prc
);
511 virtual HRESULT STDMETHODCALLTYPE
_UpdateViewRectSize();
512 virtual HRESULT STDMETHODCALLTYPE
_ResizeNextBorder(UINT itb
);
513 virtual HRESULT STDMETHODCALLTYPE
_ResizeView();
514 virtual HRESULT STDMETHODCALLTYPE
_GetEffectiveClientArea(LPRECT lprectBorder
, HMONITOR hmon
);
515 virtual IStream
*STDMETHODCALLTYPE
v_GetViewStream(LPCITEMIDLIST pidl
, DWORD grfMode
, LPCWSTR pwszName
);
516 virtual LRESULT STDMETHODCALLTYPE
ForwardViewMsg(UINT uMsg
, WPARAM wParam
, LPARAM lParam
);
517 virtual HRESULT STDMETHODCALLTYPE
SetAcceleratorMenu(HACCEL hacc
);
518 virtual int STDMETHODCALLTYPE
_GetToolbarCount();
519 virtual LPTOOLBARITEM STDMETHODCALLTYPE
_GetToolbarItem(int itb
);
520 virtual HRESULT STDMETHODCALLTYPE
_SaveToolbars(IStream
*pstm
);
521 virtual HRESULT STDMETHODCALLTYPE
_LoadToolbars(IStream
*pstm
);
522 virtual HRESULT STDMETHODCALLTYPE
_CloseAndReleaseToolbars(BOOL fClose
);
523 virtual HRESULT STDMETHODCALLTYPE
v_MayGetNextToolbarFocus(LPMSG lpMsg
, UINT itbNext
,
524 int citb
, LPTOOLBARITEM
*pptbi
, HWND
*phwnd
);
525 virtual HRESULT STDMETHODCALLTYPE
_ResizeNextBorderHelper(UINT itb
, BOOL bUseHmonitor
);
526 virtual UINT STDMETHODCALLTYPE
_FindTBar(IUnknown
*punkSrc
);
527 virtual HRESULT STDMETHODCALLTYPE
_SetFocus(LPTOOLBARITEM ptbi
, HWND hwnd
, LPMSG lpMsg
);
528 virtual HRESULT STDMETHODCALLTYPE
v_MayTranslateAccelerator(MSG
*pmsg
);
529 virtual HRESULT STDMETHODCALLTYPE
_GetBorderDWHelper(IUnknown
*punkSrc
, LPRECT lprectBorder
, BOOL bUseHmonitor
);
530 virtual HRESULT STDMETHODCALLTYPE
v_CheckZoneCrossing(LPCITEMIDLIST pidl
);
532 // *** IWebBrowser methods ***
533 virtual HRESULT STDMETHODCALLTYPE
GoBack();
534 virtual HRESULT STDMETHODCALLTYPE
GoForward();
535 virtual HRESULT STDMETHODCALLTYPE
GoHome();
536 virtual HRESULT STDMETHODCALLTYPE
GoSearch();
537 virtual HRESULT STDMETHODCALLTYPE
Navigate(BSTR URL
, VARIANT
*Flags
, VARIANT
*TargetFrameName
,
538 VARIANT
*PostData
, VARIANT
*Headers
);
539 virtual HRESULT STDMETHODCALLTYPE
Refresh();
540 virtual HRESULT STDMETHODCALLTYPE
Refresh2(VARIANT
*Level
);
541 virtual HRESULT STDMETHODCALLTYPE
Stop();
542 virtual HRESULT STDMETHODCALLTYPE
get_Application(IDispatch
**ppDisp
);
543 virtual HRESULT STDMETHODCALLTYPE
get_Parent(IDispatch
**ppDisp
);
544 virtual HRESULT STDMETHODCALLTYPE
get_Container(IDispatch
**ppDisp
);
545 virtual HRESULT STDMETHODCALLTYPE
get_Document(IDispatch
**ppDisp
);
546 virtual HRESULT STDMETHODCALLTYPE
get_TopLevelContainer(VARIANT_BOOL
*pBool
);
547 virtual HRESULT STDMETHODCALLTYPE
get_Type(BSTR
*Type
);
548 virtual HRESULT STDMETHODCALLTYPE
get_Left(long *pl
);
549 virtual HRESULT STDMETHODCALLTYPE
put_Left(long Left
);
550 virtual HRESULT STDMETHODCALLTYPE
get_Top(long *pl
);
551 virtual HRESULT STDMETHODCALLTYPE
put_Top(long Top
);
552 virtual HRESULT STDMETHODCALLTYPE
get_Width(long *pl
);
553 virtual HRESULT STDMETHODCALLTYPE
put_Width(long Width
);
554 virtual HRESULT STDMETHODCALLTYPE
get_Height(long *pl
);
555 virtual HRESULT STDMETHODCALLTYPE
put_Height(long Height
);
556 virtual HRESULT STDMETHODCALLTYPE
get_LocationName(BSTR
*LocationName
);
557 virtual HRESULT STDMETHODCALLTYPE
get_LocationURL(BSTR
*LocationURL
);
558 virtual HRESULT STDMETHODCALLTYPE
get_Busy(VARIANT_BOOL
*pBool
);
560 // *** IWebBrowserApp methods ***
561 virtual HRESULT STDMETHODCALLTYPE
Quit();
562 virtual HRESULT STDMETHODCALLTYPE
ClientToWindow(int *pcx
, int *pcy
);
563 virtual HRESULT STDMETHODCALLTYPE
PutProperty(BSTR Property
, VARIANT vtValue
);
564 virtual HRESULT STDMETHODCALLTYPE
GetProperty(BSTR Property
, VARIANT
*pvtValue
);
565 virtual HRESULT STDMETHODCALLTYPE
get_Name(BSTR
*Name
);
566 virtual HRESULT STDMETHODCALLTYPE
get_HWND(SHANDLE_PTR
*pHWND
);
567 virtual HRESULT STDMETHODCALLTYPE
get_FullName(BSTR
*FullName
);
568 virtual HRESULT STDMETHODCALLTYPE
get_Path(BSTR
*Path
);
569 virtual HRESULT STDMETHODCALLTYPE
get_Visible(VARIANT_BOOL
*pBool
);
570 virtual HRESULT STDMETHODCALLTYPE
put_Visible(VARIANT_BOOL Value
);
571 virtual HRESULT STDMETHODCALLTYPE
get_StatusBar(VARIANT_BOOL
*pBool
);
572 virtual HRESULT STDMETHODCALLTYPE
put_StatusBar(VARIANT_BOOL Value
);
573 virtual HRESULT STDMETHODCALLTYPE
get_StatusText(BSTR
*StatusText
);
574 virtual HRESULT STDMETHODCALLTYPE
put_StatusText(BSTR StatusText
);
575 virtual HRESULT STDMETHODCALLTYPE
get_ToolBar(int *Value
);
576 virtual HRESULT STDMETHODCALLTYPE
put_ToolBar(int Value
);
577 virtual HRESULT STDMETHODCALLTYPE
get_MenuBar(VARIANT_BOOL
*Value
);
578 virtual HRESULT STDMETHODCALLTYPE
put_MenuBar(VARIANT_BOOL Value
);
579 virtual HRESULT STDMETHODCALLTYPE
get_FullScreen(VARIANT_BOOL
*pbFullScreen
);
580 virtual HRESULT STDMETHODCALLTYPE
put_FullScreen(VARIANT_BOOL bFullScreen
);
582 // *** IWebBrowser2 methods ***
583 virtual HRESULT STDMETHODCALLTYPE
Navigate2(VARIANT
*URL
, VARIANT
*Flags
, VARIANT
*TargetFrameName
,
584 VARIANT
*PostData
, VARIANT
*Headers
);
585 virtual HRESULT STDMETHODCALLTYPE
QueryStatusWB(OLECMDID cmdID
, OLECMDF
*pcmdf
);
586 virtual HRESULT STDMETHODCALLTYPE
ExecWB(OLECMDID cmdID
, OLECMDEXECOPT cmdexecopt
,
587 VARIANT
*pvaIn
, VARIANT
*pvaOut
);
588 virtual HRESULT STDMETHODCALLTYPE
ShowBrowserBar(VARIANT
*pvaClsid
, VARIANT
*pvarShow
, VARIANT
*pvarSize
);
589 virtual HRESULT STDMETHODCALLTYPE
get_ReadyState(READYSTATE
*plReadyState
);
590 virtual HRESULT STDMETHODCALLTYPE
get_Offline(VARIANT_BOOL
*pbOffline
);
591 virtual HRESULT STDMETHODCALLTYPE
put_Offline(VARIANT_BOOL bOffline
);
592 virtual HRESULT STDMETHODCALLTYPE
get_Silent(VARIANT_BOOL
*pbSilent
);
593 virtual HRESULT STDMETHODCALLTYPE
put_Silent(VARIANT_BOOL bSilent
);
594 virtual HRESULT STDMETHODCALLTYPE
get_RegisterAsBrowser(VARIANT_BOOL
*pbRegister
);
595 virtual HRESULT STDMETHODCALLTYPE
put_RegisterAsBrowser(VARIANT_BOOL bRegister
);
596 virtual HRESULT STDMETHODCALLTYPE
get_RegisterAsDropTarget(VARIANT_BOOL
*pbRegister
);
597 virtual HRESULT STDMETHODCALLTYPE
put_RegisterAsDropTarget(VARIANT_BOOL bRegister
);
598 virtual HRESULT STDMETHODCALLTYPE
get_TheaterMode(VARIANT_BOOL
*pbRegister
);
599 virtual HRESULT STDMETHODCALLTYPE
put_TheaterMode(VARIANT_BOOL bRegister
);
600 virtual HRESULT STDMETHODCALLTYPE
get_AddressBar(VARIANT_BOOL
*Value
);
601 virtual HRESULT STDMETHODCALLTYPE
put_AddressBar(VARIANT_BOOL Value
);
602 virtual HRESULT STDMETHODCALLTYPE
get_Resizable(VARIANT_BOOL
*Value
);
603 virtual HRESULT STDMETHODCALLTYPE
put_Resizable(VARIANT_BOOL Value
);
605 // *** ITravelLogClient methods ***
606 virtual HRESULT STDMETHODCALLTYPE
FindWindowByIndex(DWORD dwID
, IUnknown
**ppunk
);
607 virtual HRESULT STDMETHODCALLTYPE
GetWindowData(IStream
*pStream
, LPWINDOWDATA pWinData
);
608 virtual HRESULT STDMETHODCALLTYPE
LoadHistoryPosition(LPWSTR pszUrlLocation
, DWORD dwPosition
);
610 // *** IPersist methods ***
611 virtual HRESULT STDMETHODCALLTYPE
GetClassID(CLSID
*pClassID
);
613 // *** IPersistHistory methods ***
614 virtual HRESULT STDMETHODCALLTYPE
LoadHistory(IStream
*pStream
, IBindCtx
*pbc
);
615 virtual HRESULT STDMETHODCALLTYPE
SaveHistory(IStream
*pStream
);
616 virtual HRESULT STDMETHODCALLTYPE
SetPositionCookie(DWORD dwPositioncookie
);
617 virtual HRESULT STDMETHODCALLTYPE
GetPositionCookie(DWORD
*pdwPositioncookie
);
620 LRESULT
OnCreate(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
);
621 LRESULT
OnDestroy(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
);
622 LRESULT
OnSize(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
);
623 LRESULT
OnInitMenuPopup(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
);
624 LRESULT
RelayMsgToShellView(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
);
625 LRESULT
OnClose(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
626 LRESULT
OnFolderOptions(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
627 LRESULT
OnMapNetworkDrive(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
628 LRESULT
OnDisconnectNetworkDrive(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
629 LRESULT
OnAboutReactOS(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
630 LRESULT
OnGoBack(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
631 LRESULT
OnGoForward(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
632 LRESULT
OnGoUpLevel(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
633 LRESULT
OnBackspace(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
634 LRESULT
OnGoHome(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
635 LRESULT
OnIsThisLegal(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
636 LRESULT
OnToggleStatusBarVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
637 LRESULT
OnToggleToolbarLock(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
638 LRESULT
OnToggleToolbarBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
639 LRESULT
OnToggleAddressBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
640 LRESULT
OnToggleLinksBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
641 LRESULT
OnToggleTextLabels(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
642 LRESULT
OnToolbarCustomize(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
643 LRESULT
OnGoTravel(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
);
644 LRESULT
RelayCommands(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
);
646 static ATL::CWndClassInfo
& GetWndClassInfo()
648 static ATL::CWndClassInfo wc
=
650 { sizeof(WNDCLASSEX
), CS_DBLCLKS
, StartWindowProc
,
651 0, 0, NULL
, LoadIcon(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDI_CABINET
)),
652 LoadCursor(NULL
, IDC_ARROW
), (HBRUSH
)(COLOR_WINDOW
+ 1), NULL
, szCabinetWndClass
, NULL
},
653 NULL
, NULL
, IDC_ARROW
, TRUE
, 0, _T("")
658 BEGIN_MSG_MAP(CShellBrowser
)
659 MESSAGE_HANDLER(WM_CREATE
, OnCreate
)
660 MESSAGE_HANDLER(WM_DESTROY
, OnDestroy
)
661 MESSAGE_HANDLER(WM_SIZE
, OnSize
)
662 MESSAGE_HANDLER(WM_INITMENUPOPUP
, OnInitMenuPopup
)
663 MESSAGE_HANDLER(WM_MEASUREITEM
, RelayMsgToShellView
)
664 MESSAGE_HANDLER(WM_DRAWITEM
, RelayMsgToShellView
)
665 MESSAGE_HANDLER(WM_MENUSELECT
, RelayMsgToShellView
)
666 COMMAND_ID_HANDLER(IDM_FILE_CLOSE
, OnClose
)
667 COMMAND_ID_HANDLER(IDM_TOOLS_FOLDEROPTIONS
, OnFolderOptions
)
668 COMMAND_ID_HANDLER(IDM_TOOLS_MAPNETWORKDRIVE
, OnMapNetworkDrive
)
669 COMMAND_ID_HANDLER(IDM_TOOLS_DISCONNECTNETWORKDRIVE
, OnDisconnectNetworkDrive
)
670 COMMAND_ID_HANDLER(IDM_HELP_ABOUT
, OnAboutReactOS
)
671 COMMAND_ID_HANDLER(IDM_GOTO_BACK
, OnGoBack
)
672 COMMAND_ID_HANDLER(IDM_GOTO_FORWARD
, OnGoForward
)
673 COMMAND_ID_HANDLER(IDM_GOTO_UPONELEVEL
, OnGoUpLevel
)
674 COMMAND_ID_HANDLER(IDM_GOTO_HOMEPAGE
, OnGoHome
)
675 COMMAND_ID_HANDLER(IDM_HELP_ISTHISCOPYLEGAL
, OnIsThisLegal
)
676 COMMAND_ID_HANDLER(IDM_VIEW_STATUSBAR
, OnToggleStatusBarVisible
)
677 COMMAND_ID_HANDLER(IDM_TOOLBARS_LOCKTOOLBARS
, OnToggleToolbarLock
)
678 COMMAND_ID_HANDLER(IDM_TOOLBARS_STANDARDBUTTONS
, OnToggleToolbarBandVisible
)
679 COMMAND_ID_HANDLER(IDM_TOOLBARS_ADDRESSBAR
, OnToggleAddressBandVisible
)
680 COMMAND_ID_HANDLER(IDM_TOOLBARS_LINKSBAR
, OnToggleLinksBandVisible
)
681 COMMAND_ID_HANDLER(IDM_TOOLBARS_TEXTLABELS
, OnToggleTextLabels
)
682 COMMAND_ID_HANDLER(IDM_TOOLBARS_CUSTOMIZE
, OnToolbarCustomize
)
683 COMMAND_ID_HANDLER(IDM_BACKSPACE
, OnBackspace
)
684 COMMAND_RANGE_HANDLER(IDM_GOTO_TRAVEL_FIRSTTARGET
, IDM_GOTO_TRAVEL_LASTTARGET
, OnGoTravel
)
685 MESSAGE_HANDLER(WM_COMMAND
, RelayCommands
)
688 BEGIN_CONNECTION_POINT_MAP(CShellBrowser
)
689 CONNECTION_POINT_ENTRY(DIID_DWebBrowserEvents2
)
690 CONNECTION_POINT_ENTRY(DIID_DWebBrowserEvents
)
691 END_CONNECTION_POINT_MAP()
693 BEGIN_COM_MAP(CShellBrowser
)
694 COM_INTERFACE_ENTRY_IID(IID_IDockingWindowSite
, IDockingWindowSite
)
695 COM_INTERFACE_ENTRY_IID(IID_IOleCommandTarget
, IOleCommandTarget
)
696 COM_INTERFACE_ENTRY2_IID(IID_IOleWindow
, IOleWindow
, IDockingWindowSite
)
697 COM_INTERFACE_ENTRY_IID(IID_IShellBrowser
, IShellBrowser
)
698 COM_INTERFACE_ENTRY_IID(IID_IDropTarget
, IDropTarget
)
699 COM_INTERFACE_ENTRY_IID(IID_IServiceProvider
, IServiceProvider
)
700 COM_INTERFACE_ENTRY_IID(IID_IProfferService
, IProfferService
)
701 COM_INTERFACE_ENTRY_IID(IID_IShellBrowserService
, IShellBrowserService
)
702 COM_INTERFACE_ENTRY_IID(IID_IDispatch
, IDispatch
)
703 COM_INTERFACE_ENTRY_IID(IID_IConnectionPointContainer
, IConnectionPointContainer
)
704 COM_INTERFACE_ENTRY_IID(IID_IWebBrowser
, IWebBrowser
)
705 COM_INTERFACE_ENTRY_IID(IID_IWebBrowserApp
, IWebBrowserApp
)
706 COM_INTERFACE_ENTRY_IID(IID_IWebBrowser2
, IWebBrowser2
)
707 COM_INTERFACE_ENTRY_IID(IID_ITravelLogClient
, ITravelLogClient
)
708 COM_INTERFACE_ENTRY_IID(IID_IPersist
, IPersist
)
709 COM_INTERFACE_ENTRY_IID(IID_IPersistHistory
, IPersistHistory
)
710 COM_INTERFACE_ENTRY_IID(IID_IBrowserService
, IBrowserService
)
711 COM_INTERFACE_ENTRY_IID(IID_IBrowserService2
, IBrowserService2
)
715 extern HRESULT
CreateProgressDialog(REFIID riid
, void **ppv
);
717 CShellBrowser::CShellBrowser()
719 fCurrentShellViewWindow
= NULL
;
720 fCurrentDirectoryPIDL
= NULL
;
722 fStatusBarVisible
= true;
723 memset(fClientBars
, 0, sizeof(fClientBars
));
724 fCurrentMenuBar
= NULL
;
725 fHistoryObject
= NULL
;
726 fHistoryStream
= NULL
;
727 fHistoryBindContext
= NULL
;
730 CShellBrowser::~CShellBrowser()
734 HRESULT
CShellBrowser::Initialize(LPITEMIDLIST pidl
, long b
, long c
, long d
)
736 CComPtr
<IPersistStreamInit
> persistStreamInit
;
738 CComPtr
<IUnknown
> clientBar
;
740 _AtlInitialConstruct();
742 fCabinetState
.cLength
= sizeof(fCabinetState
);
743 if (ReadCabinetState(&fCabinetState
, sizeof(fCabinetState
)) == FALSE
)
748 Create(HWND_DESKTOP
);
753 hResult
= CoCreateInstance(CLSID_InternetToolbar
, NULL
, CLSCTX_INPROC_SERVER
, IID_PPV_ARG(IUnknown
, &fClientBars
[BIInternetToolbar
].clientBar
));
754 if (FAILED_UNEXPECTEDLY(hResult
))
757 hResult
= CreateInternetToolbar(IID_PPV_ARG(IUnknown
, &clientBar
));
758 if (FAILED_UNEXPECTEDLY(hResult
))
762 fClientBars
[BIInternetToolbar
].clientBar
= clientBar
;
765 hResult
= clientBar
->QueryInterface(IID_PPV_ARG(IPersistStreamInit
, &persistStreamInit
));
766 if (FAILED_UNEXPECTEDLY(hResult
))
769 hResult
= IUnknown_SetSite(clientBar
, static_cast<IShellBrowser
*>(this));
770 if (FAILED_UNEXPECTEDLY(hResult
))
773 hResult
= IUnknown_Exec(clientBar
, CGID_PrivCITCommands
, 1, 1 /* or 0 */, NULL
, NULL
);
774 if (FAILED_UNEXPECTEDLY(hResult
))
777 // TODO: create settingsStream from registry entry
778 //if (settingsStream.p)
780 // hResult = persistStreamInit->Load(settingsStream);
781 // if (FAILED_UNEXPECTEDLY(hResult))
786 hResult
= persistStreamInit
->InitNew();
787 if (FAILED_UNEXPECTEDLY(hResult
))
791 hResult
= IUnknown_ShowDW(clientBar
, TRUE
);
792 if (FAILED_UNEXPECTEDLY(hResult
))
795 fToolbarProxy
.Initialize(m_hWnd
, clientBar
);
799 fStatusBar
= CreateWindow(STATUSCLASSNAMEW
, NULL
, WS_CHILD
| WS_VISIBLE
| WS_CLIPSIBLINGS
|
800 SBT_NOBORDERS
| SBT_TOOLTIPS
, 0, 0, 500, 20, m_hWnd
, (HMENU
)0xa001,
801 _AtlBaseModule
.GetModuleInstance(), 0);
802 fStatusBarVisible
= true;
806 hResult
= BrowseToPIDL(pidl
, BTP_UPDATE_NEXT_HISTORY
);
807 if (FAILED_UNEXPECTEDLY(hResult
))
810 ShowWindow(SW_SHOWNORMAL
);
815 HRESULT
CShellBrowser::BrowseToPIDL(LPCITEMIDLIST pidl
, long flags
)
817 CComPtr
<IShellFolder
> newFolder
;
818 FOLDERSETTINGS newFolderSettings
;
821 // called by shell view to browse to new folder
822 // also called by explorer band to navigate to new folder
823 hResult
= SHBindToFolder(pidl
, &newFolder
);
824 if (FAILED_UNEXPECTEDLY(hResult
))
827 newFolderSettings
.ViewMode
= FVM_ICON
;
828 newFolderSettings
.fFlags
= 0;
829 hResult
= BrowseToPath(newFolder
, pidl
, &newFolderSettings
, flags
);
830 if (FAILED_UNEXPECTEDLY(hResult
))
835 BOOL WINAPI
_ILIsDesktop(LPCITEMIDLIST pidl
)
837 return (pidl
== NULL
|| pidl
->mkid
.cb
== 0);
840 BOOL WINAPI
_ILIsPidlSimple(LPCITEMIDLIST pidl
)
842 LPCITEMIDLIST pidlnext
;
847 if (! _ILIsDesktop(pidl
))
849 length
= pidl
->mkid
.cb
;
851 reinterpret_cast<LPCITEMIDLIST
>(
852 reinterpret_cast<const BYTE
*>(pidl
) + length
);
853 if (pidlnext
->mkid
.cb
!= 0)
859 HRESULT WINAPI
SHBindToFolderIDListParent(IShellFolder
*unused
, LPCITEMIDLIST pidl
,
860 const IID
*riid
, LPVOID
*ppv
, LPITEMIDLIST
*ppidlLast
)
862 CComPtr
<IShellFolder
> psf
;
863 LPITEMIDLIST pidlChild
;
864 LPITEMIDLIST pidlParent
;
871 if (ppidlLast
!= NULL
)
873 if (_ILIsPidlSimple(pidl
))
875 if (ppidlLast
!= NULL
)
876 *ppidlLast
= ILClone(pidl
);
877 hResult
= SHGetDesktopFolder((IShellFolder
**)ppv
);
881 pidlChild
= ILClone(ILFindLastID(pidl
));
882 pidlParent
= ILClone(pidl
);
883 ILRemoveLastID(pidlParent
);
884 hResult
= SHGetDesktopFolder(&psf
);
885 if (SUCCEEDED(hResult
))
886 hResult
= psf
->BindToObject(pidlParent
, NULL
, *riid
, ppv
);
887 if (SUCCEEDED(hResult
) && ppidlLast
!= NULL
)
888 *ppidlLast
= pidlChild
;
896 HRESULT
IEGetNameAndFlagsEx(LPITEMIDLIST pidl
, SHGDNF uFlags
, long param10
,
897 LPWSTR pszBuf
, UINT cchBuf
, SFGAOF
*rgfInOut
)
899 CComPtr
<IShellFolder
> parentFolder
;
900 LPITEMIDLIST childPIDL
= NULL
;
904 hResult
= SHBindToFolderIDListParent(NULL
, pidl
, &IID_PPV_ARG(IShellFolder
, &parentFolder
), &childPIDL
);
908 hResult
= parentFolder
->GetDisplayNameOf(childPIDL
, uFlags
, &L108
);
912 StrRetToBufW(&L108
, childPIDL
, pszBuf
, cchBuf
);
915 hResult
= parentFolder
->GetAttributesOf(1, const_cast<LPCITEMIDLIST
*>(&childPIDL
), rgfInOut
);
928 long IEGetNameAndFlags(LPITEMIDLIST pidl
, SHGDNF uFlags
, LPWSTR pszBuf
, UINT cchBuf
, SFGAOF
*rgfInOut
)
930 return IEGetNameAndFlagsEx(pidl
, uFlags
, 0, pszBuf
, cchBuf
, rgfInOut
);
933 HRESULT
CShellBrowser::BrowseToPath(IShellFolder
*newShellFolder
,
934 LPCITEMIDLIST absolutePIDL
, FOLDERSETTINGS
*folderSettings
, long flags
)
936 CComPtr
<IObjectWithSite
> objectWithSite
;
937 CComPtr
<IShellFolder
> saveCurrentShellFolder
;
938 CComPtr
<IShellView
> saveCurrentShellView
;
939 CComPtr
<IShellView
> newShellView
;
940 CComPtr
<ITravelLog
> travelLog
;
941 HWND newShellViewWindow
;
942 BOOL windowUpdateIsLocked
;
943 RECT shellViewWindowBounds
;
946 wchar_t newTitle
[MAX_PATH
];
950 if (newShellFolder
== NULL
)
953 hResult
= GetTravelLog(&travelLog
);
954 if (FAILED_UNEXPECTEDLY(hResult
))
958 if (flags
& BTP_UPDATE_CUR_HISTORY
)
960 if (travelLog
->CountEntries(static_cast<IDropTarget
*>(this)) > 0)
961 hResult
= travelLog
->UpdateEntry(static_cast<IDropTarget
*>(this), FALSE
);
962 // what to do with error? Do we want to halt browse because state save failed?
965 if (fCurrentShellView
)
967 fCurrentShellView
->UIActivate(SVUIA_DEACTIVATE
);
970 // create view object
971 hResult
= newShellFolder
->CreateViewObject(m_hWnd
, IID_PPV_ARG(IShellView
, &newShellView
));
972 if (FAILED_UNEXPECTEDLY(hResult
))
974 previousView
= fCurrentShellViewWindow
;
976 // enter updating section
977 saveCursor
= SetCursor(LoadCursor(NULL
, IDC_WAIT
));
978 windowUpdateIsLocked
= LockWindowUpdate(TRUE
);
979 if (fCurrentShellView
!= NULL
)
980 ::SendMessage(fCurrentShellViewWindow
, WM_SETREDRAW
, 0, 0);
983 hResult
= newShellView
->QueryInterface(IID_PPV_ARG(IObjectWithSite
, &objectWithSite
));
984 if (SUCCEEDED(hResult
) && objectWithSite
.p
!= NULL
)
985 hResult
= objectWithSite
->SetSite(static_cast<IDropTarget
*>(this));
987 // update folder and view
988 saveCurrentShellFolder
= fCurrentShellFolder
;
989 saveCurrentShellView
= fCurrentShellView
;
990 fCurrentShellFolder
= newShellFolder
;
991 fCurrentShellView
= newShellView
;
994 if (previousView
!= NULL
)
995 ::GetWindowRect(previousView
, &shellViewWindowBounds
);
997 ZeroMemory(&shellViewWindowBounds
, sizeof(shellViewWindowBounds
));
998 ::MapWindowPoints(0, m_hWnd
, reinterpret_cast<POINT
*>(&shellViewWindowBounds
), 2);
1000 // create view window
1001 hResult
= newShellView
->CreateViewWindow(saveCurrentShellView
, folderSettings
,
1002 this, &shellViewWindowBounds
, &newShellViewWindow
);
1003 if (FAILED_UNEXPECTEDLY(hResult
) || newShellViewWindow
== NULL
)
1005 fCurrentShellView
= saveCurrentShellView
;
1006 fCurrentShellFolder
= saveCurrentShellFolder
;
1007 ::SendMessage(fCurrentShellViewWindow
, WM_SETREDRAW
, 1, 0);
1008 if (windowUpdateIsLocked
)
1009 LockWindowUpdate(FALSE
);
1010 SetCursor(saveCursor
);
1014 if (objectWithSite
.p
!= NULL
)
1015 hResult
= objectWithSite
->SetSite(NULL
);
1017 // update current pidl
1018 ILFree(fCurrentDirectoryPIDL
);
1019 fCurrentDirectoryPIDL
= ILClone(absolutePIDL
);
1021 // update view window
1022 if (saveCurrentShellView
!= NULL
)
1023 saveCurrentShellView
->DestroyViewWindow();
1024 fCurrentShellViewWindow
= newShellViewWindow
;
1027 saveCurrentShellView
.Release();
1028 saveCurrentShellFolder
.Release();
1030 hResult
= newShellView
->UIActivate(SVUIA_ACTIVATE_FOCUS
);
1032 // leave updating section
1033 if (windowUpdateIsLocked
)
1034 LockWindowUpdate(FALSE
);
1035 SetCursor(saveCursor
);
1038 if (flags
& BTP_UPDATE_NEXT_HISTORY
)
1040 hResult
= travelLog
->AddEntry(static_cast<IDropTarget
*>(this), FALSE
);
1041 hResult
= travelLog
->UpdateEntry(static_cast<IDropTarget
*>(this), FALSE
);
1045 nameFlags
= SHGDN_FORADDRESSBAR
| SHGDN_FORPARSING
;
1046 hResult
= IEGetNameAndFlags(fCurrentDirectoryPIDL
, nameFlags
, newTitle
,
1047 sizeof(newTitle
) / sizeof(wchar_t), NULL
);
1048 if (SUCCEEDED(hResult
))
1050 FireNavigateComplete(newTitle
);
1054 FireNavigateComplete(L
"ERROR");
1057 if (fCabinetState
.fFullPathTitle
)
1058 nameFlags
= SHGDN_FORADDRESSBAR
| SHGDN_FORPARSING
;
1060 nameFlags
= SHGDN_FORADDRESSBAR
;
1061 hResult
= IEGetNameAndFlags(fCurrentDirectoryPIDL
, nameFlags
, newTitle
,
1062 sizeof(newTitle
) / sizeof(wchar_t), NULL
);
1063 if (SUCCEEDED(hResult
))
1065 SetWindowText(newTitle
);
1067 LPCITEMIDLIST pidlChild
;
1068 INT index
, indexOpen
;
1069 HIMAGELIST himlSmall
, himlLarge
;
1071 CComPtr
<IShellFolder
> sf
;
1072 SHBindToParent(absolutePIDL
, IID_PPV_ARG(IShellFolder
, &sf
), &pidlChild
);
1074 index
= SHMapPIDLToSystemImageListIndex(sf
, pidlChild
, &indexOpen
);
1076 Shell_GetImageLists(&himlLarge
, &himlSmall
);
1078 HICON icSmall
= ImageList_GetIcon(himlSmall
, indexOpen
, 0);
1079 HICON icLarge
= ImageList_GetIcon(himlLarge
, indexOpen
, 0);
1081 /* Hack to make it possible to release the old icons */
1082 /* Something seems to go wrong with WM_SETICON */
1083 HICON oldSmall
= (HICON
)SendMessage(WM_GETICON
, ICON_SMALL
, 0);
1084 HICON oldLarge
= (HICON
)SendMessage(WM_GETICON
, ICON_BIG
, 0);
1086 SendMessage(WM_SETICON
, ICON_SMALL
, reinterpret_cast<LPARAM
>(icSmall
));
1087 SendMessage(WM_SETICON
, ICON_BIG
, reinterpret_cast<LPARAM
>(icLarge
));
1089 DestroyIcon(oldSmall
);
1090 DestroyIcon(oldLarge
);
1093 FireCommandStateChangeAll();
1094 hResult
= UpdateForwardBackState();
1098 HRESULT
CShellBrowser::GetMenuBand(REFIID riid
, void **shellMenu
)
1100 CComPtr
<IBandSite
> bandSite
;
1101 CComPtr
<IDeskBand
> deskBand
;
1104 if (!fClientBars
[BIInternetToolbar
].clientBar
)
1107 hResult
= IUnknown_QueryService(fClientBars
[BIInternetToolbar
].clientBar
, SID_IBandSite
, IID_PPV_ARG(IBandSite
, &bandSite
));
1108 if (FAILED_UNEXPECTEDLY(hResult
))
1111 hResult
= bandSite
->QueryBand(1, &deskBand
, NULL
, NULL
, 0);
1112 if (FAILED_UNEXPECTEDLY(hResult
))
1115 return deskBand
->QueryInterface(riid
, shellMenu
);
1118 HRESULT
CShellBrowser::GetBaseBar(bool vertical
, IUnknown
**theBaseBar
)
1120 CComPtr
<IUnknown
> newBaseBar
;
1121 CComPtr
<IDeskBar
> deskBar
;
1122 CComPtr
<IUnknown
> newBaseBarSite
;
1123 CComPtr
<IDeskBarClient
> deskBarClient
;
1128 cache
= &fClientBars
[BIVerticalBaseBar
].clientBar
.p
;
1130 cache
= &fClientBars
[BIHorizontalBaseBar
].clientBar
.p
;
1133 hResult
= CreateBaseBar(IID_PPV_ARG(IUnknown
, &newBaseBar
));
1134 if (FAILED_UNEXPECTEDLY(hResult
))
1136 hResult
= CreateBaseBarSite(IID_PPV_ARG(IUnknown
, &newBaseBarSite
));
1137 if (FAILED_UNEXPECTEDLY(hResult
))
1140 // tell the new base bar about the shell browser
1141 hResult
= IUnknown_SetSite(newBaseBar
, static_cast<IDropTarget
*>(this));
1142 if (FAILED_UNEXPECTEDLY(hResult
))
1145 // tell the new base bar about the new base bar site
1146 hResult
= newBaseBar
->QueryInterface(IID_PPV_ARG(IDeskBar
, &deskBar
));
1147 if (FAILED_UNEXPECTEDLY(hResult
))
1149 hResult
= deskBar
->SetClient(newBaseBarSite
);
1150 if (FAILED_UNEXPECTEDLY(hResult
))
1153 // tell the new base bar site about the new base bar
1154 hResult
= newBaseBarSite
->QueryInterface(IID_PPV_ARG(IDeskBarClient
, &deskBarClient
));
1155 if (FAILED_UNEXPECTEDLY(hResult
))
1157 hResult
= deskBarClient
->SetDeskBarSite(newBaseBar
);
1158 if (FAILED_UNEXPECTEDLY(hResult
))
1161 *cache
= newBaseBar
.Detach();
1163 return (*cache
)->QueryInterface(IID_PPV_ARG(IUnknown
, theBaseBar
));
1166 HRESULT
CShellBrowser::ShowBand(const CLSID
&classID
, bool vertical
)
1168 CComPtr
<IDockingWindow
> dockingWindow
;
1169 CComPtr
<IUnknown
> baseBarSite
;
1170 CComPtr
<IUnknown
> newBand
;
1171 CComPtr
<IUnknown
> theBaseBar
;
1172 CComPtr
<IDeskBar
> deskBar
;
1176 hResult
= GetBaseBar(vertical
, (IUnknown
**)&theBaseBar
);
1177 if (FAILED_UNEXPECTEDLY(hResult
))
1179 hResult
= CoCreateInstance(classID
, NULL
, CLSCTX_INPROC_SERVER
, IID_PPV_ARG(IUnknown
, &newBand
));
1180 if (FAILED_UNEXPECTEDLY(hResult
))
1182 hResult
= theBaseBar
->QueryInterface(IID_PPV_ARG(IDeskBar
, &deskBar
));
1183 if (FAILED_UNEXPECTEDLY(hResult
))
1185 hResult
= deskBar
->GetClient(&baseBarSite
);
1186 if (FAILED_UNEXPECTEDLY(hResult
))
1188 hResult
= theBaseBar
->QueryInterface(IID_PPV_ARG(IDockingWindow
, &dockingWindow
));
1189 if (FAILED_UNEXPECTEDLY(hResult
))
1191 V_VT(&vaIn
) = VT_UNKNOWN
;
1192 V_UNKNOWN(&vaIn
) = newBand
.p
;
1193 hResult
= IUnknown_Exec(baseBarSite
, CGID_IDeskBand
, 1, 1, &vaIn
, NULL
);
1194 if (FAILED_UNEXPECTEDLY(hResult
))
1196 hResult
= dockingWindow
->ShowDW(TRUE
);
1197 if (FAILED_UNEXPECTEDLY(hResult
))
1202 HRESULT
CShellBrowser::NavigateToParent()
1204 LPITEMIDLIST newDirectory
= ILClone(fCurrentDirectoryPIDL
);
1205 if (newDirectory
== NULL
)
1206 return E_OUTOFMEMORY
;
1207 ILRemoveLastID(newDirectory
);
1208 HRESULT hResult
= BrowseToPIDL(newDirectory
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
1209 ILFree(newDirectory
);
1210 if (FAILED_UNEXPECTEDLY(hResult
))
1215 BOOL CALLBACK
AddFolderOptionsPage(HPROPSHEETPAGE thePage
, LPARAM lParam
)
1217 PROPSHEETHEADER
* sheetInfo
= reinterpret_cast<PROPSHEETHEADER
*>(lParam
);
1218 if (sheetInfo
->nPages
>= folderOptionsPageCountMax
)
1220 sheetInfo
->phpage
[sheetInfo
->nPages
] = thePage
;
1221 sheetInfo
->nPages
++;
1225 HRESULT
CShellBrowser::DoFolderOptions()
1227 CComPtr
<IShellPropSheetExt
> folderOptionsSheet
;
1228 PROPSHEETHEADER m_PropSheet
;
1229 HPROPSHEETPAGE m_psp
[folderOptionsPageCountMax
];
1230 // CComPtr<IGlobalFolderSettings> globalSettings;
1231 // SHELLSTATE2 shellState;
1234 memset(m_psp
, 0, sizeof(m_psp
));
1235 memset(&m_PropSheet
, 0, sizeof(m_PropSheet
));
1237 // create sheet object
1238 hResult
= CoCreateInstance(CLSID_ShellFldSetExt
, NULL
, CLSCTX_INPROC_SERVER
,
1239 IID_PPV_ARG(IShellPropSheetExt
, &folderOptionsSheet
));
1240 if (FAILED_UNEXPECTEDLY(hResult
))
1243 // must set site in order for Apply to all Folders on Advanced page to be enabled
1244 hResult
= IUnknown_SetSite(folderOptionsSheet
, static_cast<IDispatch
*>(this));
1245 m_PropSheet
.phpage
= m_psp
;
1248 hResult
= CoCreateInstance(CLSID_GlobalFolderSettings
, NULL
, CLSCTX_INPROC_SERVER
, IID_PPV_ARG(IGlobalFolderSettings
, &globalSettings
));
1249 if (FAILED_UNEXPECTEDLY(hResult
))
1251 hResult
= globalSettings
->Get(&shellState
, sizeof(shellState
));
1252 if (FAILED_UNEXPECTEDLY(hResult
))
1257 hResult
= folderOptionsSheet
->AddPages(AddFolderOptionsPage
, reinterpret_cast<LPARAM
>(&m_PropSheet
));
1258 if (FAILED_UNEXPECTEDLY(hResult
))
1261 if (fCurrentShellView
!= NULL
)
1263 hResult
= fCurrentShellView
->AddPropertySheetPages(
1264 0, AddFolderOptionsPage
, reinterpret_cast<LPARAM
>(&m_PropSheet
));
1265 if (FAILED_UNEXPECTEDLY(hResult
))
1270 m_PropSheet
.dwSize
= sizeof(PROPSHEETHEADER
);
1271 m_PropSheet
.dwFlags
= 0;
1272 m_PropSheet
.hwndParent
= m_hWnd
;
1273 m_PropSheet
.hInstance
= _AtlBaseModule
.GetResourceInstance();
1274 m_PropSheet
.pszCaption
= _T("Folder Options");
1275 m_PropSheet
.nStartPage
= 0;
1276 PropertySheet(&m_PropSheet
);
1280 LRESULT CALLBACK
CShellBrowser::WindowProc(HWND hWnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
1282 CShellBrowser
*pThis
= reinterpret_cast<CShellBrowser
*>(hWnd
);
1283 _ATL_MSG
msg(pThis
->m_hWnd
, uMsg
, wParam
, lParam
);
1285 const _ATL_MSG
*previousMessage
;
1287 WNDPROC saveWindowProc
;
1290 hWnd
= pThis
->m_hWnd
;
1291 previousMessage
= pThis
->m_pCurrentMsg
;
1292 pThis
->m_pCurrentMsg
= &msg
;
1294 CComPtr
<IMenuBand
> menuBand
;
1295 hResult
= pThis
->GetMenuBand(IID_PPV_ARG(IMenuBand
, &menuBand
));
1296 if (SUCCEEDED(hResult
) && menuBand
.p
!= NULL
)
1298 hResult
= menuBand
->TranslateMenuMessage(&msg
, &lResult
);
1299 if (hResult
== S_OK
)
1302 wParam
= msg
.wParam
;
1303 lParam
= msg
.lParam
;
1307 handled
= pThis
->ProcessWindowMessage(hWnd
, uMsg
, wParam
, lParam
, lResult
, 0);
1308 ATLASSERT(pThis
->m_pCurrentMsg
== &msg
);
1309 if (handled
== FALSE
)
1311 if (uMsg
== WM_NCDESTROY
)
1313 saveWindowProc
= reinterpret_cast<WNDPROC
>(GetWindowLongPtr(hWnd
, GWL_WNDPROC
));
1314 lResult
= pThis
->DefWindowProc(uMsg
, wParam
, lParam
);
1315 if (saveWindowProc
== reinterpret_cast<WNDPROC
>(GetWindowLongPtr(hWnd
, GWL_WNDPROC
)))
1316 SetWindowLongPtr(hWnd
, GWL_WNDPROC
, (LONG_PTR
)pThis
->m_pfnSuperWindowProc
);
1317 pThis
->m_dwState
|= WINSTATE_DESTROYED
;
1320 lResult
= pThis
->DefWindowProc(uMsg
, wParam
, lParam
);
1322 pThis
->m_pCurrentMsg
= previousMessage
;
1323 if (previousMessage
== NULL
&& (pThis
->m_dwState
& WINSTATE_DESTROYED
) != 0)
1325 pThis
->m_dwState
&= ~WINSTATE_DESTROYED
;
1326 pThis
->m_hWnd
= NULL
;
1327 pThis
->OnFinalMessage(hWnd
);
1332 void CShellBrowser::RepositionBars()
1338 GetClientRect(&clientRect
);
1340 if (fStatusBarVisible
&& fStatusBar
)
1342 ::GetWindowRect(fStatusBar
, &statusRect
);
1343 ::SetWindowPos(fStatusBar
, NULL
, clientRect
.left
, clientRect
.bottom
- (statusRect
.bottom
- statusRect
.top
),
1344 clientRect
.right
- clientRect
.left
,
1345 statusRect
.bottom
- statusRect
.top
, SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1346 clientRect
.bottom
-= statusRect
.bottom
- statusRect
.top
;
1349 for (x
= 0; x
< 3; x
++)
1351 HWND hwnd
= fClientBars
[x
].hwnd
;
1352 RECT borderSpace
= fClientBars
[x
].borderSpace
;
1353 if (hwnd
== NULL
&& fClientBars
[x
].clientBar
!= NULL
)
1355 IUnknown_GetWindow(fClientBars
[x
].clientBar
, &hwnd
);
1356 fClientBars
[x
].hwnd
= hwnd
;
1360 RECT toolbarRect
= clientRect
;
1361 if (borderSpace
.top
!= 0)
1363 toolbarRect
.bottom
= toolbarRect
.top
+ borderSpace
.top
;
1365 else if (borderSpace
.bottom
!= 0)
1367 toolbarRect
.top
= toolbarRect
.bottom
- borderSpace
.bottom
;
1369 else if (borderSpace
.left
!= 0)
1371 toolbarRect
.right
= toolbarRect
.left
+ borderSpace
.left
;
1373 else if (borderSpace
.right
!= 0)
1375 toolbarRect
.left
= toolbarRect
.right
- borderSpace
.right
;
1378 ::SetWindowPos(hwnd
, NULL
,
1381 toolbarRect
.right
- toolbarRect
.left
,
1382 toolbarRect
.bottom
- toolbarRect
.top
,
1383 SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1385 if (borderSpace
.top
!= 0)
1387 clientRect
.top
= toolbarRect
.bottom
;
1389 else if (borderSpace
.bottom
!= 0)
1391 clientRect
.bottom
= toolbarRect
.top
;
1393 else if (borderSpace
.left
!= 0)
1395 clientRect
.left
= toolbarRect
.right
;
1397 else if (borderSpace
.right
!= 0)
1399 clientRect
.right
= toolbarRect
.left
;
1403 ::SetWindowPos(fCurrentShellViewWindow
, NULL
, clientRect
.left
, clientRect
.top
,
1404 clientRect
.right
- clientRect
.left
,
1405 clientRect
.bottom
- clientRect
.top
, SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1408 HRESULT
CShellBrowser::FireEvent(DISPID dispIdMember
, int argCount
, VARIANT
*arguments
)
1411 CComDynamicUnkArray
&vec
= IConnectionPointImpl
<CShellBrowser
, &DIID_DWebBrowserEvents2
>::m_vec
;
1412 CComDynamicUnkArray
&vec2
= IConnectionPointImpl
<CShellBrowser
, &DIID_DWebBrowserEvents
>::m_vec
;
1415 params
.rgvarg
= arguments
;
1416 params
.rgdispidNamedArgs
= NULL
;
1417 params
.cArgs
= argCount
;
1418 params
.cNamedArgs
= 0;
1419 IUnknown
** pp
= vec
.begin();
1420 while (pp
< vec
.end())
1424 CComPtr
<IDispatch
> theDispatch
;
1426 hResult
= (*pp
)->QueryInterface(IID_PPV_ARG(IDispatch
, &theDispatch
));
1427 hResult
= theDispatch
->Invoke(dispIdMember
, GUID_NULL
, 0, DISPATCH_METHOD
, ¶ms
, NULL
, NULL
, NULL
);
1432 while (pp
< vec2
.end())
1436 CComPtr
<IDispatch
> theDispatch
;
1438 hResult
= (*pp
)->QueryInterface(IID_PPV_ARG(IDispatch
, &theDispatch
));
1439 hResult
= theDispatch
->Invoke(dispIdMember
, GUID_NULL
, 0, DISPATCH_METHOD
, ¶ms
, NULL
, NULL
, NULL
);
1446 HRESULT
CShellBrowser::FireNavigateComplete(const wchar_t *newDirectory
)
1448 // these two variants intentionally to do use CComVariant because it would double free/release
1449 // or does not need to dispose at all
1452 CComBSTR
tempString(newDirectory
);
1454 V_VT(&varArgs
) = VT_BSTR
;
1455 V_BSTR(&varArgs
) = tempString
.m_str
;
1457 V_VT(&varArg
[0]) = VT_VARIANT
| VT_BYREF
;
1458 V_VARIANTREF(&varArg
[0]) = &varArgs
;
1459 V_VT(&varArg
[1]) = VT_DISPATCH
;
1460 V_DISPATCH(&varArg
[1]) = (IDispatch
*)this;
1462 return FireEvent(DISPID_NAVIGATECOMPLETE2
, 2, varArg
);
1465 HRESULT
CShellBrowser::FireCommandStateChange(bool newState
, int commandID
)
1469 V_VT(&varArg
[0]) = VT_BOOL
;
1470 V_BOOL(&varArg
[0]) = newState
? VARIANT_TRUE
: VARIANT_FALSE
;
1471 V_VT(&varArg
[1]) = VT_I4
;
1472 V_I4(&varArg
[1]) = commandID
;
1474 return FireEvent(DISPID_COMMANDSTATECHANGE
, 2, varArg
);
1477 HRESULT
CShellBrowser::FireCommandStateChangeAll()
1479 return FireCommandStateChange(false, -1);
1482 HRESULT
CShellBrowser::UpdateForwardBackState()
1484 CComPtr
<ITravelLog
> travelLog
;
1485 CComPtr
<ITravelEntry
> unusedEntry
;
1491 canGoForward
= false;
1492 hResult
= GetTravelLog(&travelLog
);
1493 if (FAILED_UNEXPECTEDLY(hResult
))
1495 hResult
= travelLog
->GetTravelEntry(static_cast<IDropTarget
*>(this), TLOG_BACK
, &unusedEntry
);
1496 if (SUCCEEDED(hResult
))
1499 unusedEntry
.Release();
1501 hResult
= travelLog
->GetTravelEntry(static_cast<IDropTarget
*>(this), TLOG_FORE
, &unusedEntry
);
1502 if (SUCCEEDED(hResult
))
1504 canGoForward
= true;
1505 unusedEntry
.Release();
1507 hResult
= FireCommandStateChange(canGoBack
, 2);
1508 hResult
= FireCommandStateChange(canGoForward
, 1);
1512 void CShellBrowser::UpdateGotoMenu(HMENU theMenu
)
1514 CComPtr
<ITravelLog
> travelLog
;
1516 MENUITEMINFO menuItemInfo
;
1519 DeleteMenuItems(theMenu
, IDM_GOTO_TRAVEL_FIRST
, IDM_GOTO_TRAVEL_LAST
);
1521 position
= GetMenuItemCount(theMenu
);
1522 hResult
= GetTravelLog(&travelLog
);
1523 if (FAILED_UNEXPECTEDLY(hResult
))
1525 hResult
= travelLog
->InsertMenuEntries(static_cast<IDropTarget
*>(this), theMenu
, position
,
1526 IDM_GOTO_TRAVEL_FIRSTTARGET
, IDM_GOTO_TRAVEL_LASTTARGET
, TLMENUF_BACKANDFORTH
| TLMENUF_CHECKCURRENT
);
1527 if (SUCCEEDED(hResult
))
1529 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1530 menuItemInfo
.fMask
= MIIM_TYPE
| MIIM_ID
;
1531 menuItemInfo
.fType
= MF_SEPARATOR
;
1532 menuItemInfo
.wID
= IDM_GOTO_TRAVEL_SEP
;
1533 InsertMenuItem(theMenu
, position
, TRUE
, &menuItemInfo
);
1537 void CShellBrowser::UpdateViewMenu(HMENU theMenu
)
1539 CComPtr
<ITravelLog
> travelLog
;
1541 OLECMD commandList
[5];
1542 HMENU toolbarMenuBar
;
1544 MENUITEMINFO menuItemInfo
;
1547 gotoMenu
= SHGetMenuFromID(theMenu
, FCIDM_MENU_EXPLORE
);
1548 if (gotoMenu
!= NULL
)
1549 UpdateGotoMenu(gotoMenu
);
1551 commandList
[0].cmdID
= ITID_TOOLBARBANDSHOWN
;
1552 commandList
[1].cmdID
= ITID_ADDRESSBANDSHOWN
;
1553 commandList
[2].cmdID
= ITID_LINKSBANDSHOWN
;
1554 commandList
[3].cmdID
= ITID_TOOLBARLOCKED
;
1555 commandList
[4].cmdID
= ITID_CUSTOMIZEENABLED
;
1557 hResult
= IUnknown_QueryStatus(fClientBars
[BIInternetToolbar
].clientBar
,
1558 CGID_PrivCITCommands
, 5, commandList
, NULL
);
1559 if (FAILED_UNEXPECTEDLY(hResult
))
1560 DeleteMenu(theMenu
, IDM_VIEW_TOOLBARS
, MF_BYCOMMAND
);
1563 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1564 menuItemInfo
.fMask
= MIIM_SUBMENU
;
1565 GetMenuItemInfo(theMenu
, IDM_VIEW_TOOLBARS
, FALSE
, &menuItemInfo
);
1566 DestroyMenu(menuItemInfo
.hSubMenu
);
1568 toolbarMenuBar
= LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_CONTEXTMENU
));
1569 toolbarMenu
= GetSubMenu(toolbarMenuBar
, 0);
1570 RemoveMenu(toolbarMenuBar
, 0, MF_BYPOSITION
);
1571 DestroyMenu(toolbarMenuBar
);
1574 SHEnableMenuItem(toolbarMenu
, IDM_TOOLBARS_STANDARDBUTTONS
, commandList
[0].cmdf
& OLECMDF_ENABLED
);
1575 SHEnableMenuItem(toolbarMenu
, IDM_TOOLBARS_ADDRESSBAR
, commandList
[1].cmdf
& OLECMDF_ENABLED
);
1576 SHEnableMenuItem(toolbarMenu
, IDM_TOOLBARS_LINKSBAR
, commandList
[2].cmdf
& OLECMDF_ENABLED
);
1577 SHEnableMenuItem(toolbarMenu
, IDM_TOOLBARS_CUSTOMIZE
, commandList
[4].cmdf
& OLECMDF_ENABLED
);
1579 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_STANDARDBUTTONS
, commandList
[0].cmdf
& OLECMDF_LATCHED
);
1580 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_ADDRESSBAR
, commandList
[1].cmdf
& OLECMDF_LATCHED
);
1581 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_LINKSBAR
, commandList
[2].cmdf
& OLECMDF_LATCHED
);
1582 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_LOCKTOOLBARS
, commandList
[3].cmdf
& OLECMDF_LATCHED
);
1583 if ((commandList
[4].cmdf
& OLECMDF_ENABLED
) == 0)
1584 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_CUSTOMIZE
, MF_BYCOMMAND
);
1585 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_TEXTLABELS
, MF_BYCOMMAND
);
1586 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_GOBUTTON
, MF_BYCOMMAND
);
1588 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1589 menuItemInfo
.fMask
= MIIM_SUBMENU
;
1590 menuItemInfo
.hSubMenu
= toolbarMenu
;
1591 SetMenuItemInfo(theMenu
, IDM_VIEW_TOOLBARS
, FALSE
, &menuItemInfo
);
1593 SHCheckMenuItem(theMenu
, IDM_VIEW_STATUSBAR
, fStatusBarVisible
? TRUE
: FALSE
);
1596 SHEnableMenuItem(theMenu
, IDM_VIEW_EXPLORERBAR
, FALSE
);
1599 bool IUnknownIsEqual(IUnknown
*int1
, IUnknown
*int2
)
1601 CComPtr
<IUnknown
> int1Retry
;
1602 CComPtr
<IUnknown
> int2Retry
;
1607 if (int1
== NULL
|| int2
== NULL
)
1609 hResult
= int1
->QueryInterface(IID_PPV_ARG(IUnknown
, &int1Retry
));
1610 if (FAILED_UNEXPECTEDLY(hResult
))
1612 hResult
= int2
->QueryInterface(IID_PPV_ARG(IUnknown
, &int2Retry
));
1613 if (FAILED_UNEXPECTEDLY(hResult
))
1615 if (int1Retry
== int2Retry
)
1620 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBorderDW(IUnknown
*punkObj
, LPRECT prcBorder
)
1622 static const INT excludeItems
[] = { 1, 1, 1, 0xa001, 0, 0 };
1624 RECT availableBounds
;
1626 GetEffectiveClientRect(m_hWnd
, &availableBounds
, excludeItems
);
1627 for (INT x
= 0; x
< 3; x
++)
1629 if (fClientBars
[x
].clientBar
.p
!= NULL
&& !IUnknownIsEqual(fClientBars
[x
].clientBar
, punkObj
))
1631 availableBounds
.top
+= fClientBars
[x
].borderSpace
.top
;
1632 availableBounds
.left
+= fClientBars
[x
].borderSpace
.left
;
1633 availableBounds
.bottom
-= fClientBars
[x
].borderSpace
.bottom
;
1634 availableBounds
.right
-= fClientBars
[x
].borderSpace
.right
;
1637 *prcBorder
= availableBounds
;
1641 HRESULT STDMETHODCALLTYPE
CShellBrowser::RequestBorderSpaceDW(IUnknown
* punkObj
, LPCBORDERWIDTHS pbw
)
1646 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetBorderSpaceDW(IUnknown
* punkObj
, LPCBORDERWIDTHS pbw
)
1648 for (INT x
= 0; x
< 3; x
++)
1650 if (IUnknownIsEqual(fClientBars
[x
].clientBar
, punkObj
))
1652 fClientBars
[x
].borderSpace
= *pbw
;
1653 // if this bar changed size, it cascades and forces all subsequent bars to resize
1658 return E_INVALIDARG
;
1661 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryStatus(const GUID
*pguidCmdGroup
,
1662 ULONG cCmds
, OLECMD prgCmds
[ ], OLECMDTEXT
*pCmdText
)
1664 CComPtr
<IOleCommandTarget
> commandTarget
;
1667 if (prgCmds
== NULL
)
1668 return E_INVALIDARG
;
1669 if (pguidCmdGroup
== NULL
)
1671 if (fCurrentShellView
.p
!= NULL
)
1673 hResult
= fCurrentShellView
->QueryInterface(IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
1674 if (SUCCEEDED(hResult
) && commandTarget
.p
!= NULL
)
1675 return commandTarget
->QueryStatus(NULL
, 1, prgCmds
, pCmdText
);
1684 else if (IsEqualIID(*pguidCmdGroup
, CGID_Explorer
))
1688 switch (prgCmds
->cmdID
)
1690 case 0x1c: // search
1691 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1693 case 0x1d: // history
1694 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1696 case 0x1e: // favorites
1697 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1699 case 0x23: // folders
1700 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
| OLECMDF_LATCHED
;
1710 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellBrowser
))
1714 switch (prgCmds
->cmdID
)
1716 case 0xa022: // up level
1717 prgCmds
->cmdf
= OLECMDF_SUPPORTED
;
1718 if (fCurrentDirectoryPIDL
->mkid
.cb
!= 0)
1719 prgCmds
->cmdf
|= OLECMDF_ENABLED
;
1729 HRESULT STDMETHODCALLTYPE
CShellBrowser::Exec(const GUID
*pguidCmdGroup
, DWORD nCmdID
,
1730 DWORD nCmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
)
1734 if (IsEqualIID(*pguidCmdGroup
, CGID_Explorer
))
1739 hResult
= ShowBand(CLSID_ExplorerBand
, true);
1742 if (nCmdexecopt
== 1)
1744 // pvaIn is a VT_UNKNOWN with a band that is being hidden
1748 // update zones part of the status bar
1751 case 0x35: // don't do this, and the internet toolbar doesn't create a menu band
1752 V_VT(pvaOut
) = VT_INT_PTR
;
1753 V_INTREF(pvaOut
) = reinterpret_cast<INT
*>(
1754 LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_MAINMENU
)));
1757 // indicate if this cabinet was opened as a browser
1763 else if (IsEqualIID(*pguidCmdGroup
, CGID_InternetButtons
))
1772 else if (IsEqualIID(*pguidCmdGroup
, CGID_Theater
))
1777 // what is theater mode and why do we receive this?
1781 else if (IsEqualIID(*pguidCmdGroup
, CGID_MenuBand
))
1786 // initialize favorites menu
1790 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellDocView
))
1795 // refresh on toolbar clicked
1798 // tell the view if it should hide the task pane or not
1799 return (fClientBars
[BIVerticalBaseBar
].clientBar
.p
== NULL
) ? S_FALSE
: S_OK
;
1802 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellBrowser
))
1807 return NavigateToParent();
1810 else if (IsEqualIID(*pguidCmdGroup
, CGID_IExplorerToolbar
))
1815 return DoFolderOptions();
1818 else if (IsEqualIID(*pguidCmdGroup
, CGID_DefView
))
1823 // Reset All Folders option in Folder Options
1834 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetWindow(HWND
*lphwnd
)
1842 HRESULT STDMETHODCALLTYPE
CShellBrowser::ContextSensitiveHelp(BOOL fEnterMode
)
1847 HRESULT STDMETHODCALLTYPE
CShellBrowser::InsertMenusSB(HMENU hmenuShared
, LPOLEMENUGROUPWIDTHS lpMenuWidths
)
1849 HMENU mainMenu
= LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_MAINMENU
));
1851 Shell_MergeMenus(hmenuShared
, mainMenu
, 0, 0, FCIDM_BROWSERLAST
, MM_SUBMENUSHAVEIDS
);
1853 int GCCU(itemCount3
) = GetMenuItemCount(hmenuShared
);
1856 DestroyMenu(mainMenu
);
1858 lpMenuWidths
->width
[0] = 2;
1859 lpMenuWidths
->width
[2] = 3;
1860 lpMenuWidths
->width
[4] = 1;
1864 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetMenuSB(HMENU hmenuShared
, HOLEMENU holemenuRes
, HWND hwndActiveObject
)
1866 CComPtr
<IShellMenu
> shellMenu
;
1869 if (hmenuShared
&& IsMenu(hmenuShared
) == FALSE
)
1871 hResult
= GetMenuBand(IID_PPV_ARG(IShellMenu
, &shellMenu
));
1872 if (FAILED_UNEXPECTEDLY(hResult
))
1874 hResult
= shellMenu
->SetMenu(hmenuShared
, NULL
, SMSET_DONTOWN
);
1875 if (FAILED_UNEXPECTEDLY(hResult
))
1877 fCurrentMenuBar
= hmenuShared
;
1881 HRESULT STDMETHODCALLTYPE
CShellBrowser::RemoveMenusSB(HMENU hmenuShared
)
1883 if (hmenuShared
== fCurrentMenuBar
)
1885 //DestroyMenu(fCurrentMenuBar);
1886 SetMenuSB(NULL
, NULL
, NULL
);
1891 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetStatusTextSB(LPCOLESTR pszStatusText
)
1896 ::SetWindowText(fStatusBar
, pszStatusText
);
1905 HRESULT STDMETHODCALLTYPE
CShellBrowser::EnableModelessSB(BOOL fEnable
)
1910 HRESULT STDMETHODCALLTYPE
CShellBrowser::TranslateAcceleratorSB(MSG
*pmsg
, WORD wID
)
1912 if (!::TranslateAcceleratorW(m_hWnd
, m_hAccel
, pmsg
))
1917 HRESULT STDMETHODCALLTYPE
CShellBrowser::BrowseObject(LPCITEMIDLIST pidl
, UINT wFlags
)
1919 return BrowseToPIDL(pidl
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
1922 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewStateStream(DWORD grfMode
, IStream
**ppStrm
)
1927 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetControlWindow(UINT id
, HWND
*lphwnd
)
1935 *lphwnd
= fToolbarProxy
.m_hWnd
;
1938 *lphwnd
= fStatusBar
;
1941 // find the directory browser and return it
1942 // this should be used only to determine if a tree is present
1945 // is this a progress dialog?
1951 HRESULT STDMETHODCALLTYPE
CShellBrowser::SendControlMsg(
1952 UINT id
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
, LRESULT
*pret
)
1961 result
= fToolbarProxy
.SendMessage(uMsg
, wParam
, lParam
);
1966 result
= SendMessage(fStatusBar
, uMsg
, wParam
, lParam
);
1974 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryActiveShellView(IShellView
**ppshv
)
1978 *ppshv
= fCurrentShellView
;
1979 if (fCurrentShellView
.p
!= NULL
)
1980 fCurrentShellView
.p
->AddRef();
1984 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnViewWindowActive(IShellView
*ppshv
)
1989 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetToolbarItems(LPTBBUTTON lpButtons
, UINT nButtons
, UINT uFlags
)
1994 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragEnter(
1995 IDataObject
*pDataObj
, DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2000 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragOver(DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2005 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragLeave()
2010 HRESULT STDMETHODCALLTYPE
CShellBrowser::Drop(
2011 IDataObject
*pDataObj
, DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2016 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryService(REFGUID guidService
, REFIID riid
, void **ppvObject
)
2018 // view does a query for SID_STopLevelBrowser, IID_IShellBrowserService
2019 // the returned interface has a method GetPropertyBag on it
2020 if (IsEqualIID(guidService
, SID_STopLevelBrowser
))
2021 return this->QueryInterface(riid
, ppvObject
);
2022 if (IsEqualIID(guidService
, SID_SShellBrowser
))
2023 return this->QueryInterface(riid
, ppvObject
);
2024 if (IsEqualIID(guidService
, SID_ITargetFrame2
))
2025 return this->QueryInterface(riid
, ppvObject
);
2026 if (IsEqualIID(guidService
, SID_IWebBrowserApp
)) // without this, the internet toolbar won't reflect notifications
2027 return this->QueryInterface(riid
, ppvObject
);
2028 if (IsEqualIID(guidService
, SID_SProxyBrowser
))
2029 return this->QueryInterface(riid
, ppvObject
);
2030 if (IsEqualIID(guidService
, SID_IExplorerToolbar
))
2031 return fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(riid
, ppvObject
);
2032 if (IsEqualIID(riid
, IID_IShellBrowser
))
2033 return this->QueryInterface(riid
, ppvObject
);
2034 return E_NOINTERFACE
;
2037 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPropertyBag(long flags
, REFIID riid
, void **ppvObject
)
2039 if (ppvObject
== NULL
)
2045 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTypeInfoCount(UINT
*pctinfo
)
2050 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTypeInfo(UINT iTInfo
, LCID lcid
, ITypeInfo
**ppTInfo
)
2055 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetIDsOfNames(REFIID riid
, LPOLESTR
*rgszNames
,
2056 UINT cNames
, LCID lcid
, DISPID
*rgDispId
)
2061 HRESULT STDMETHODCALLTYPE
CShellBrowser::Invoke(DISPID dispIdMember
, REFIID riid
, LCID lcid
,
2062 WORD wFlags
, DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
2067 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetParentSite(IOleInPlaceSite
**ppipsite
)
2072 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetTitle(IShellView
*psv
, LPCWSTR pszName
)
2077 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTitle(IShellView
*psv
, LPWSTR pszName
, DWORD cchName
)
2082 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetOleObject(IOleObject
**ppobjv
)
2087 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTravelLog(ITravelLog
**pptl
)
2091 // called by toolbar when displaying tooltips
2096 if (fTravelLog
.p
== NULL
)
2098 hResult
= CreateTravelLog(IID_PPV_ARG(ITravelLog
, &fTravelLog
));
2099 if (FAILED_UNEXPECTEDLY(hResult
))
2102 *pptl
= fTravelLog
.p
;
2103 fTravelLog
.p
->AddRef();
2107 HRESULT STDMETHODCALLTYPE
CShellBrowser::ShowControlWindow(UINT id
, BOOL fShow
)
2112 HRESULT STDMETHODCALLTYPE
CShellBrowser::IsControlWindowShown(UINT id
, BOOL
*pfShown
)
2117 HRESULT STDMETHODCALLTYPE
CShellBrowser::IEGetDisplayName(LPCITEMIDLIST pidl
, LPWSTR pwszName
, UINT uFlags
)
2122 HRESULT STDMETHODCALLTYPE
CShellBrowser::IEParseDisplayName(UINT uiCP
, LPCWSTR pwszPath
, LPITEMIDLIST
*ppidlOut
)
2127 HRESULT STDMETHODCALLTYPE
CShellBrowser::DisplayParseError(HRESULT hres
, LPCWSTR pwszPath
)
2132 HRESULT STDMETHODCALLTYPE
CShellBrowser::NavigateToPidl(LPCITEMIDLIST pidl
, DWORD grfHLNF
)
2137 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetNavigateState(BNSTATE bnstate
)
2142 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetNavigateState(BNSTATE
*pbnstate
)
2147 HRESULT STDMETHODCALLTYPE
CShellBrowser::NotifyRedirect(IShellView
*psv
, LPCITEMIDLIST pidl
, BOOL
*pfDidBrowse
)
2152 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateWindowList()
2157 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateBackForwardState()
2162 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetFlags(DWORD dwFlags
, DWORD dwFlagMask
)
2167 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetFlags(DWORD
*pdwFlags
)
2172 HRESULT STDMETHODCALLTYPE
CShellBrowser::CanNavigateNow()
2177 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPidl(LPITEMIDLIST
*ppidl
)
2179 // called by explorer bar to get current pidl
2182 *ppidl
= ILClone(fCurrentDirectoryPIDL
);
2186 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetReferrer(LPCITEMIDLIST pidl
)
2191 DWORD STDMETHODCALLTYPE
CShellBrowser::GetBrowserIndex()
2196 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBrowserByIndex(DWORD dwID
, IUnknown
**ppunk
)
2201 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetHistoryObject(IOleObject
**ppole
, IStream
**pstm
, IBindCtx
**ppbc
)
2203 if (ppole
== NULL
|| pstm
== NULL
|| ppbc
== NULL
)
2204 return E_INVALIDARG
;
2205 *ppole
= fHistoryObject
;
2206 if (fHistoryObject
!= NULL
)
2207 fHistoryObject
->AddRef();
2208 *pstm
= fHistoryStream
;
2209 if (fHistoryStream
!= NULL
)
2210 fHistoryStream
->AddRef();
2211 *ppbc
= fHistoryBindContext
;
2212 if (fHistoryBindContext
!= NULL
)
2213 fHistoryBindContext
->AddRef();
2214 fHistoryObject
= NULL
;
2215 fHistoryStream
= NULL
;
2216 fHistoryBindContext
= NULL
;
2222 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetHistoryObject(IOleObject
*pole
, BOOL fIsLocalAnchor
)
2227 HRESULT STDMETHODCALLTYPE
CShellBrowser::CacheOLEServer(IOleObject
*pole
)
2232 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetSetCodePage(VARIANT
*pvarIn
, VARIANT
*pvarOut
)
2237 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnHttpEquiv(
2238 IShellView
*psv
, BOOL fDone
, VARIANT
*pvarargIn
, VARIANT
*pvarargOut
)
2243 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPalette(HPALETTE
*hpal
)
2248 HRESULT STDMETHODCALLTYPE
CShellBrowser::RegisterWindow(BOOL fForceRegister
, int swc
)
2253 LRESULT STDMETHODCALLTYPE
CShellBrowser::WndProcBS(HWND hwnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2258 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetAsDefFolderSettings()
2263 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewRect(RECT
*prc
)
2268 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnSize(WPARAM wParam
)
2273 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnCreate(struct tagCREATESTRUCTW
*pcs
)
2275 m_hAccel
= LoadAcceleratorsW(GetModuleHandle(L
"browseui.dll"), MAKEINTRESOURCEW(256));
2279 LRESULT STDMETHODCALLTYPE
CShellBrowser::OnCommand(WPARAM wParam
, LPARAM lParam
)
2284 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnDestroy()
2289 LRESULT STDMETHODCALLTYPE
CShellBrowser::OnNotify(struct tagNMHDR
*pnm
)
2294 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnSetFocus()
2299 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnFrameWindowActivateBS(BOOL fActive
)
2304 HRESULT STDMETHODCALLTYPE
CShellBrowser::ReleaseShellView()
2309 HRESULT STDMETHODCALLTYPE
CShellBrowser::ActivatePendingView()
2314 HRESULT STDMETHODCALLTYPE
CShellBrowser::CreateViewWindow(
2315 IShellView
*psvNew
, IShellView
*psvOld
, LPRECT prcView
, HWND
*phwnd
)
2320 HRESULT STDMETHODCALLTYPE
CShellBrowser::CreateBrowserPropSheetExt(REFIID riid
, void **ppv
)
2325 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewWindow(HWND
*phwndView
)
2330 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBaseBrowserData(LPCBASEBROWSERDATA
*pbbd
)
2335 LPBASEBROWSERDATA STDMETHODCALLTYPE
CShellBrowser::PutBaseBrowserData()
2340 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeTravelLog(ITravelLog
*ptl
, DWORD dw
)
2345 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetTopBrowser()
2350 HRESULT STDMETHODCALLTYPE
CShellBrowser::Offline(int iCmd
)
2355 HRESULT STDMETHODCALLTYPE
CShellBrowser::AllowViewResize(BOOL f
)
2360 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetActivateState(UINT u
)
2365 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateSecureLockIcon(int eSecureLock
)
2370 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeDownloadManager()
2375 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeTransitionSite()
2380 HRESULT STDMETHODCALLTYPE
CShellBrowser::_Initialize(HWND hwnd
, IUnknown
*pauto
)
2385 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CancelPendingNavigationAsync()
2390 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CancelPendingView()
2395 HRESULT STDMETHODCALLTYPE
CShellBrowser::_MaySaveChanges()
2400 HRESULT STDMETHODCALLTYPE
CShellBrowser::_PauseOrResumeView(BOOL fPaused
)
2405 HRESULT STDMETHODCALLTYPE
CShellBrowser::_DisableModeless()
2410 HRESULT STDMETHODCALLTYPE
CShellBrowser::_NavigateToPidl(LPCITEMIDLIST pidl
, DWORD grfHLNF
, DWORD dwFlags
)
2415 HRESULT STDMETHODCALLTYPE
CShellBrowser::_TryShell2Rename(IShellView
*psv
, LPCITEMIDLIST pidlNew
)
2420 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SwitchActivationNow()
2425 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ExecChildren(IUnknown
*punkBar
, BOOL fBroadcast
,
2426 const GUID
*pguidCmdGroup
, DWORD nCmdID
, DWORD nCmdexecopt
, VARIANTARG
*pvarargIn
, VARIANTARG
*pvarargOut
)
2431 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SendChildren(
2432 HWND hwndBar
, BOOL fBroadcast
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2437 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetFolderSetData(struct tagFolderSetData
*pfsd
)
2442 HRESULT STDMETHODCALLTYPE
CShellBrowser::_OnFocusChange(UINT itb
)
2447 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_ShowHideChildWindows(BOOL fChildOnly
)
2452 UINT STDMETHODCALLTYPE
CShellBrowser::_get_itbLastFocus()
2457 HRESULT STDMETHODCALLTYPE
CShellBrowser::_put_itbLastFocus(UINT itbLastFocus
)
2462 HRESULT STDMETHODCALLTYPE
CShellBrowser::_UIActivateView(UINT uState
)
2467 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetViewBorderRect(RECT
*prc
)
2472 HRESULT STDMETHODCALLTYPE
CShellBrowser::_UpdateViewRectSize()
2477 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeNextBorder(UINT itb
)
2482 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeView()
2487 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetEffectiveClientArea(LPRECT lprectBorder
, HMONITOR hmon
)
2492 IStream
*STDMETHODCALLTYPE
CShellBrowser::v_GetViewStream(LPCITEMIDLIST pidl
, DWORD grfMode
, LPCWSTR pwszName
)
2497 LRESULT STDMETHODCALLTYPE
CShellBrowser::ForwardViewMsg(UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2502 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetAcceleratorMenu(HACCEL hacc
)
2507 int STDMETHODCALLTYPE
CShellBrowser::_GetToolbarCount()
2512 LPTOOLBARITEM STDMETHODCALLTYPE
CShellBrowser::_GetToolbarItem(int itb
)
2517 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SaveToolbars(IStream
*pstm
)
2522 HRESULT STDMETHODCALLTYPE
CShellBrowser::_LoadToolbars(IStream
*pstm
)
2527 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CloseAndReleaseToolbars(BOOL fClose
)
2532 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_MayGetNextToolbarFocus(
2533 LPMSG lpMsg
, UINT itbNext
, int citb
, LPTOOLBARITEM
*pptbi
, HWND
*phwnd
)
2538 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeNextBorderHelper(UINT itb
, BOOL bUseHmonitor
)
2543 UINT STDMETHODCALLTYPE
CShellBrowser::_FindTBar(IUnknown
*punkSrc
)
2548 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SetFocus(LPTOOLBARITEM ptbi
, HWND hwnd
, LPMSG lpMsg
)
2553 extern HRESULT
IUnknown_HasFocusIO(IUnknown
* punk
);
2554 extern HRESULT
IUnknown_TranslateAcceleratorIO(IUnknown
* punk
, MSG
* pmsg
);
2555 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_MayTranslateAccelerator(MSG
*pmsg
)
2557 for (int i
= 0; i
< 3; i
++)
2559 if (IUnknown_TranslateAcceleratorIO(fClientBars
[i
].clientBar
, pmsg
) == S_OK
)
2563 if (!fCurrentShellView
)
2566 return fCurrentShellView
->TranslateAcceleratorW(pmsg
);
2569 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetBorderDWHelper(IUnknown
*punkSrc
, LPRECT lprectBorder
, BOOL bUseHmonitor
)
2574 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_CheckZoneCrossing(LPCITEMIDLIST pidl
)
2579 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoBack()
2581 CComPtr
<ITravelLog
> travelLog
;
2582 HRESULT hResult
= GetTravelLog(&travelLog
);
2583 if (FAILED_UNEXPECTEDLY(hResult
))
2585 return travelLog
->Travel(static_cast<IDropTarget
*>(this), TLOG_BACK
);
2588 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoForward()
2590 CComPtr
<ITravelLog
> travelLog
;
2591 HRESULT hResult
= GetTravelLog(&travelLog
);
2592 if (FAILED_UNEXPECTEDLY(hResult
))
2594 return travelLog
->Travel(static_cast<IDropTarget
*>(this), TLOG_FORE
);
2597 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoHome()
2602 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoSearch()
2607 HRESULT STDMETHODCALLTYPE
CShellBrowser::Navigate(BSTR URL
, VARIANT
*Flags
,
2608 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
2613 HRESULT STDMETHODCALLTYPE
CShellBrowser::Refresh()
2617 V_VT(&level
) = VT_I4
;
2619 return Refresh2(&level
);
2622 HRESULT STDMETHODCALLTYPE
CShellBrowser::Refresh2(VARIANT
*Level
)
2624 CComPtr
<IOleCommandTarget
> oleCommandTarget
;
2627 hResult
= fCurrentShellView
->QueryInterface(IID_PPV_ARG(IOleCommandTarget
, &oleCommandTarget
));
2628 if (FAILED_UNEXPECTEDLY(hResult
))
2630 return oleCommandTarget
->Exec(NULL
, 22, 1, Level
, NULL
);
2633 HRESULT STDMETHODCALLTYPE
CShellBrowser::Stop()
2638 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Application(IDispatch
**ppDisp
)
2643 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Parent(IDispatch
**ppDisp
)
2648 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Container(IDispatch
**ppDisp
)
2653 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Document(IDispatch
**ppDisp
)
2658 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_TopLevelContainer(VARIANT_BOOL
*pBool
)
2663 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Type(BSTR
*Type
)
2670 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Left(long *pl
)
2675 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Left(long Left
)
2680 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Top(long *pl
)
2685 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Top(long Top
)
2690 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Width(long *pl
)
2695 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Width(long Width
)
2700 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Height(long *pl
)
2705 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Height(long Height
)
2712 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_LocationName(BSTR
*LocationName
)
2717 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_LocationURL(BSTR
*LocationURL
)
2722 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Busy(VARIANT_BOOL
*pBool
)
2727 HRESULT STDMETHODCALLTYPE
CShellBrowser::Quit()
2732 HRESULT STDMETHODCALLTYPE
CShellBrowser::ClientToWindow(int *pcx
, int *pcy
)
2737 HRESULT STDMETHODCALLTYPE
CShellBrowser::PutProperty(BSTR Property
, VARIANT vtValue
)
2742 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetProperty(BSTR Property
, VARIANT
*pvtValue
)
2747 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Name(BSTR
*Name
)
2752 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_HWND(SHANDLE_PTR
*pHWND
)
2757 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_FullName(BSTR
*FullName
)
2762 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Path(BSTR
*Path
)
2767 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Visible(VARIANT_BOOL
*pBool
)
2772 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Visible(VARIANT_BOOL Value
)
2777 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_StatusBar(VARIANT_BOOL
*pBool
)
2782 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_StatusBar(VARIANT_BOOL Value
)
2787 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_StatusText(BSTR
*StatusText
)
2792 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_StatusText(BSTR StatusText
)
2797 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_ToolBar(int *Value
)
2802 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_ToolBar(int Value
)
2807 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_MenuBar(VARIANT_BOOL
*Value
)
2812 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_MenuBar(VARIANT_BOOL Value
)
2817 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_FullScreen(VARIANT_BOOL
*pbFullScreen
)
2822 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_FullScreen(VARIANT_BOOL bFullScreen
)
2827 HRESULT STDMETHODCALLTYPE
CShellBrowser::Navigate2(VARIANT
*URL
, VARIANT
*Flags
,
2828 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
2830 // called from drive combo box to navigate to a directory
2831 if (V_VT(URL
) != (VT_ARRAY
| VT_UI1
))
2832 return E_INVALIDARG
;
2833 if (V_ARRAY(URL
)->cDims
!= 1 || V_ARRAY(URL
)->cbElements
!= 1)
2834 return E_INVALIDARG
;
2836 LPITEMIDLIST pidl
= static_cast<LPITEMIDLIST
>(V_ARRAY(URL
)->pvData
);
2837 HRESULT hResult
= BrowseToPIDL(pidl
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
2838 if (FAILED_UNEXPECTEDLY(hResult
))
2843 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryStatusWB(OLECMDID cmdID
, OLECMDF
*pcmdf
)
2848 HRESULT STDMETHODCALLTYPE
CShellBrowser::ExecWB(OLECMDID cmdID
, OLECMDEXECOPT cmdexecopt
,
2849 VARIANT
*pvaIn
, VARIANT
*pvaOut
)
2854 HRESULT STDMETHODCALLTYPE
CShellBrowser::ShowBrowserBar(VARIANT
*pvaClsid
, VARIANT
*pvarShow
, VARIANT
*pvarSize
)
2859 // called to show search bar
2860 if (V_VT(pvaClsid
) != VT_BSTR
)
2861 return E_INVALIDARG
;
2862 CLSIDFromString(V_BSTR(pvaClsid
), &classID
);
2863 // TODO: properly compute the value of vertical
2865 return ShowBand(classID
, vertical
);
2868 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_ReadyState(READYSTATE
*plReadyState
)
2873 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Offline(VARIANT_BOOL
*pbOffline
)
2878 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Offline(VARIANT_BOOL bOffline
)
2883 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Silent(VARIANT_BOOL
*pbSilent
)
2888 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Silent(VARIANT_BOOL bSilent
)
2893 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_RegisterAsBrowser(VARIANT_BOOL
*pbRegister
)
2898 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_RegisterAsBrowser(VARIANT_BOOL bRegister
)
2903 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_RegisterAsDropTarget(VARIANT_BOOL
*pbRegister
)
2908 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_RegisterAsDropTarget(VARIANT_BOOL bRegister
)
2913 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_TheaterMode(VARIANT_BOOL
*pbRegister
)
2918 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_TheaterMode(VARIANT_BOOL bRegister
)
2923 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_AddressBar(VARIANT_BOOL
*Value
)
2928 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_AddressBar(VARIANT_BOOL Value
)
2933 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Resizable(VARIANT_BOOL
*Value
)
2938 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Resizable(VARIANT_BOOL Value
)
2943 HRESULT STDMETHODCALLTYPE
CShellBrowser::FindWindowByIndex(DWORD dwID
, IUnknown
**ppunk
)
2948 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetWindowData(IStream
*pStream
, LPWINDOWDATA pWinData
)
2950 if (pWinData
== NULL
)
2953 pWinData
->dwWindowID
= -1;
2955 pWinData
->pidl
= ILClone(fCurrentDirectoryPIDL
);
2956 pWinData
->lpszUrl
= NULL
;
2957 pWinData
->lpszUrlLocation
= NULL
;
2958 pWinData
->lpszTitle
= NULL
;
2962 HRESULT STDMETHODCALLTYPE
CShellBrowser::LoadHistoryPosition(LPWSTR pszUrlLocation
, DWORD dwPosition
)
2967 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetClassID(CLSID
*pClassID
)
2972 HRESULT STDMETHODCALLTYPE
CShellBrowser::LoadHistory(IStream
*pStream
, IBindCtx
*pbc
)
2974 CComPtr
<IPersistHistory
> viewPersistHistory
;
2975 CComPtr
<IOleObject
> viewHistoryObject
;
2976 persistState oldState
;
2981 hResult
= pStream
->Read(&oldState
, sizeof(oldState
), &numRead
);
2982 if (FAILED_UNEXPECTEDLY(hResult
))
2984 if (numRead
!= sizeof(oldState
) || oldState
.dwSize
!= sizeof(oldState
))
2986 if (oldState
.browseType
!= 2)
2988 pidl
= static_cast<LPITEMIDLIST
>(CoTaskMemAlloc(oldState
.pidlSize
));
2990 return E_OUTOFMEMORY
;
2991 hResult
= pStream
->Read(pidl
, oldState
.pidlSize
, &numRead
);
2992 if (FAILED_UNEXPECTEDLY(hResult
))
2997 if (numRead
!= oldState
.pidlSize
)
3002 hResult
= CoCreateInstance(oldState
.persistClass
, NULL
, CLSCTX_LOCAL_SERVER
| CLSCTX_INPROC_SERVER
,
3003 IID_PPV_ARG(IOleObject
, &viewHistoryObject
));
3004 fHistoryObject
= viewHistoryObject
;
3005 fHistoryStream
= pStream
;
3006 fHistoryBindContext
= pbc
;
3007 hResult
= BrowseToPIDL(pidl
, BTP_UPDATE_CUR_HISTORY
);
3008 fHistoryObject
= NULL
;
3009 fHistoryStream
= NULL
;
3010 fHistoryBindContext
= NULL
;
3012 if (FAILED_UNEXPECTEDLY(hResult
))
3017 HRESULT STDMETHODCALLTYPE
CShellBrowser::SaveHistory(IStream
*pStream
)
3019 CComPtr
<IPersistHistory
> viewPersistHistory
;
3020 persistState newState
;
3023 hResult
= fCurrentShellView
->GetItemObject(
3024 SVGIO_BACKGROUND
, IID_PPV_ARG(IPersistHistory
, &viewPersistHistory
));
3025 memset(&newState
, 0, sizeof(newState
));
3026 newState
.dwSize
= sizeof(newState
);
3027 newState
.browseType
= 2;
3028 newState
.browserIndex
= GetBrowserIndex();
3029 if (viewPersistHistory
.p
!= NULL
)
3031 hResult
= viewPersistHistory
->GetClassID(&newState
.persistClass
);
3032 if (FAILED_UNEXPECTEDLY(hResult
))
3035 newState
.pidlSize
= ILGetSize(fCurrentDirectoryPIDL
);
3036 hResult
= pStream
->Write(&newState
, sizeof(newState
), NULL
);
3037 if (FAILED_UNEXPECTEDLY(hResult
))
3039 hResult
= pStream
->Write(fCurrentDirectoryPIDL
, newState
.pidlSize
, NULL
);
3040 if (FAILED_UNEXPECTEDLY(hResult
))
3042 if (viewPersistHistory
.p
!= NULL
)
3044 hResult
= viewPersistHistory
->SaveHistory(pStream
);
3045 if (FAILED_UNEXPECTEDLY(hResult
))
3051 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetPositionCookie(DWORD dwPositioncookie
)
3056 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPositionCookie(DWORD
*pdwPositioncookie
)
3061 LRESULT
CShellBrowser::OnCreate(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3063 OnCreate(reinterpret_cast<LPCREATESTRUCT
> (lParam
));
3067 LRESULT
CShellBrowser::OnDestroy(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3070 // TODO: rip down everything
3072 fCurrentShellView
->DestroyViewWindow();
3073 fCurrentShellView
->UIActivate(SVUIA_DEACTIVATE
);
3074 ReleaseCComPtrExpectZero(fCurrentShellView
);
3076 for (int i
= 0; i
< 3; i
++)
3078 if (fClientBars
[i
].clientBar
== NULL
)
3080 IDockingWindow
* pdw
;
3081 hr
= fClientBars
[i
].clientBar
->QueryInterface(IID_PPV_ARG(IDockingWindow
, &pdw
));
3082 if (FAILED_UNEXPECTEDLY(hr
))
3087 ReleaseCComPtrExpectZero(fClientBars
[i
].clientBar
);
3089 ReleaseCComPtrExpectZero(fTravelLog
);
3091 fCurrentShellFolder
.Release();
3092 ILFree(fCurrentDirectoryPIDL
);
3093 ::DestroyWindow(fStatusBar
);
3094 DestroyMenu(fCurrentMenuBar
);
3100 LRESULT
CShellBrowser::OnSize(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3102 CComPtr
<IDockingWindow
> dockingWindow
;
3103 RECT availableBounds
;
3104 static const INT excludeItems
[] = {1, 1, 1, 0xa001, 0, 0};
3107 if (wParam
!= SIZE_MINIMIZED
)
3109 GetEffectiveClientRect(m_hWnd
, &availableBounds
, excludeItems
);
3110 for (INT x
= 0; x
< 3; x
++)
3112 if (fClientBars
[x
].clientBar
!= NULL
)
3114 hResult
= fClientBars
[x
].clientBar
->QueryInterface(
3115 IID_PPV_ARG(IDockingWindow
, &dockingWindow
));
3116 if (SUCCEEDED(hResult
) && dockingWindow
!= NULL
)
3118 hResult
= dockingWindow
->ResizeBorderDW(
3119 &availableBounds
, static_cast<IDropTarget
*>(this), TRUE
);
3129 LRESULT
CShellBrowser::OnInitMenuPopup(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3132 LPARAM menuIndex
= lParam
;
3134 theMenu
= reinterpret_cast<HMENU
>(wParam
);
3136 if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_FILE
))
3140 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_EDIT
))
3144 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_VIEW
))
3146 UpdateViewMenu(theMenu
);
3149 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_FAVORITES
))
3153 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_TOOLS
))
3155 // FIXME: Remove once implemented
3156 SHEnableMenuItem(theMenu
, IDM_TOOLS_MAPNETWORKDRIVE
, FALSE
);
3157 SHEnableMenuItem(theMenu
, IDM_TOOLS_DISCONNECTNETWORKDRIVE
, FALSE
);
3158 SHEnableMenuItem(theMenu
, IDM_TOOLS_SYNCHRONIZE
, FALSE
);
3159 SHEnableMenuItem(theMenu
, IDM_TOOLS_FOLDEROPTIONS
, FALSE
);
3162 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_HELP
))
3167 LRESULT ret
= RelayMsgToShellView(uMsg
, wParam
, menuIndex
, bHandled
);
3172 LRESULT
CShellBrowser::RelayMsgToShellView(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3174 if (fCurrentShellViewWindow
!= NULL
)
3175 return SendMessage(fCurrentShellViewWindow
, uMsg
, wParam
, lParam
);
3179 LRESULT
CShellBrowser::OnClose(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3181 return SendMessage(WM_CLOSE
);
3184 LRESULT
CShellBrowser::OnFolderOptions(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3186 HRESULT hResult
= DoFolderOptions();
3187 if (FAILED(hResult
))
3188 TRACE("DoFolderOptions failed with hResult=%08lx\n", hResult
);
3192 LRESULT
CShellBrowser::OnMapNetworkDrive(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3195 WNetConnectionDialog(m_hWnd
, RESOURCETYPE_DISK
);
3196 #endif /* __REACTOS__ */
3200 LRESULT
CShellBrowser::OnDisconnectNetworkDrive(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3203 WNetDisconnectDialog(m_hWnd
, RESOURCETYPE_DISK
);
3204 #endif /* __REACTOS__ */
3208 LRESULT
CShellBrowser::OnAboutReactOS(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3210 ShellAbout(m_hWnd
, _T("ReactOS"), _T(""), NULL
);
3214 LRESULT
CShellBrowser::OnGoBack(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3216 HRESULT hResult
= GoBack();
3217 if (FAILED(hResult
))
3218 TRACE("GoBack failed with hResult=%08lx\n", hResult
);
3222 LRESULT
CShellBrowser::OnGoForward(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3224 HRESULT hResult
= GoForward();
3225 if (FAILED(hResult
))
3226 TRACE("GoForward failed with hResult=%08lx\n", hResult
);
3230 LRESULT
CShellBrowser::OnGoUpLevel(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3232 HRESULT hResult
= NavigateToParent();
3233 if (FAILED(hResult
))
3234 TRACE("NavigateToParent failed with hResult=%08lx\n", hResult
);
3238 LRESULT
CShellBrowser::OnGoHome(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3240 HRESULT hResult
= GoHome();
3241 if (FAILED(hResult
))
3242 TRACE("GoHome failed with hResult=%08lx\n", hResult
);
3246 LRESULT
CShellBrowser::OnBackspace(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3248 // FIXME: This does not appear to be what windows does.
3249 HRESULT hResult
= NavigateToParent();
3250 if (FAILED(hResult
))
3251 TRACE("NavigateToParent failed with hResult=%08lx\n", hResult
);
3255 HRESULT WINAPI
SHOpenNewFrame(LPITEMIDLIST pidl
, IUnknown
*paramC
, long param10
, DWORD dwFlags
);
3257 LRESULT
CShellBrowser::OnIsThisLegal(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3259 LPITEMIDLIST desktopPIDL
;
3260 HRESULT hResult
= SHGetFolderLocation(NULL
, CSIDL_DESKTOP
, NULL
, 0, &desktopPIDL
);
3261 if (SUCCEEDED(hResult
))
3263 hResult
= SHOpenNewFrame(desktopPIDL
, NULL
, -1, 1);
3268 LRESULT
CShellBrowser::OnToggleStatusBarVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3270 fStatusBarVisible
= !fStatusBarVisible
;
3271 // TODO: trigger a relayout of contained items
3275 LRESULT
CShellBrowser::OnToggleToolbarLock(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3278 hResult
= IUnknown_Exec(fClientBars
[BIInternetToolbar
].clientBar
,
3279 CGID_PrivCITCommands
, ITID_TOOLBARLOCKED
, 0, NULL
, NULL
);
3283 LRESULT
CShellBrowser::OnToggleToolbarBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3286 hResult
= IUnknown_Exec(fClientBars
[BIInternetToolbar
].clientBar
,
3287 CGID_PrivCITCommands
, ITID_TOOLBARBANDSHOWN
, 0, NULL
, NULL
);
3291 LRESULT
CShellBrowser::OnToggleAddressBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3294 hResult
= IUnknown_Exec(fClientBars
[BIInternetToolbar
].clientBar
,
3295 CGID_PrivCITCommands
, ITID_ADDRESSBANDSHOWN
, 0, NULL
, NULL
);
3299 LRESULT
CShellBrowser::OnToggleLinksBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3302 hResult
= IUnknown_Exec(fClientBars
[BIInternetToolbar
].clientBar
,
3303 CGID_PrivCITCommands
, ITID_LINKSBANDSHOWN
, 0, NULL
, NULL
);
3307 LRESULT
CShellBrowser::OnToggleTextLabels(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3310 hResult
= IUnknown_Exec(fClientBars
[BIInternetToolbar
].clientBar
,
3311 CGID_PrivCITCommands
, ITID_TEXTLABELS
, 0, NULL
, NULL
);
3315 LRESULT
CShellBrowser::OnToolbarCustomize(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3318 hResult
= IUnknown_Exec(fClientBars
[BIInternetToolbar
].clientBar
,
3319 CGID_PrivCITCommands
, ITID_CUSTOMIZEENABLED
, 0, NULL
, NULL
);
3323 LRESULT
CShellBrowser::OnGoTravel(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3328 LRESULT
CShellBrowser::RelayCommands(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3330 if (HIWORD(wParam
) == 0 && LOWORD(wParam
) < FCIDM_SHVIEWLAST
&& fCurrentShellViewWindow
!= NULL
)
3331 return SendMessage(fCurrentShellViewWindow
, uMsg
, wParam
, lParam
);
3335 static HRESULT
ExplorerMessageLoop(IEThreadParamBlock
* parameters
)
3337 CComPtr
<CShellBrowser
> theCabinet
;
3342 // Tell the thread ref we are using it.
3343 if (parameters
&& parameters
->offsetF8
)
3344 parameters
->offsetF8
->AddRef();
3346 ATLTRY(theCabinet
= new CComObject
<CShellBrowser
>);
3347 if (theCabinet
== NULL
)
3349 return E_OUTOFMEMORY
;
3352 hResult
= theCabinet
->Initialize(parameters
->directoryPIDL
, 0, 0, 0);
3353 if (FAILED_UNEXPECTEDLY(hResult
))
3354 return E_OUTOFMEMORY
;
3356 while ((Ret
= GetMessage(&Msg
, NULL
, 0, 0)) != 0)
3360 // Error: continue or exit?
3364 if (Msg
.message
== WM_QUIT
)
3367 if (theCabinet
->v_MayTranslateAccelerator(&Msg
) != S_OK
)
3369 TranslateMessage(&Msg
);
3370 DispatchMessage(&Msg
);
3374 int nrc
= theCabinet
->Release();
3377 DbgPrint("WARNING: There are %d references to the CShellBrowser active or leaked.\n", nrc
);
3380 theCabinet
.Detach();
3382 // Tell the thread ref we are not using it anymore.
3383 if (parameters
&& parameters
->offsetF8
)
3384 parameters
->offsetF8
->Release();
3389 DWORD WINAPI
BrowserThreadProc(LPVOID lpThreadParameter
)
3392 IEThreadParamBlock
* parameters
= (IEThreadParamBlock
*) lpThreadParameter
;
3394 OleInitialize(NULL
);
3396 ATLTRY(hr
= ExplorerMessageLoop(parameters
));
3400 SHDestroyIETHREADPARAM(parameters
);