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 SendMessage(WM_SETICON
, ICON_SMALL
, reinterpret_cast<LPARAM
>(icSmall
));
1082 SendMessage(WM_SETICON
, ICON_BIG
, reinterpret_cast<LPARAM
>(icLarge
));
1085 // TODO: Update the window icon
1087 FireCommandStateChangeAll();
1088 hResult
= UpdateForwardBackState();
1092 HRESULT
CShellBrowser::GetMenuBand(REFIID riid
, void **shellMenu
)
1094 CComPtr
<IServiceProvider
> serviceProvider
;
1095 CComPtr
<IBandSite
> bandSite
;
1096 CComPtr
<IDeskBand
> deskBand
;
1099 if (!fClientBars
[BIInternetToolbar
].clientBar
)
1102 hResult
= IUnknown_QueryService(fClientBars
[BIInternetToolbar
].clientBar
, SID_IBandSite
, IID_PPV_ARG(IBandSite
, &bandSite
));
1103 if (FAILED_UNEXPECTEDLY(hResult
))
1106 hResult
= bandSite
->QueryBand(1, &deskBand
, NULL
, NULL
, 0);
1107 if (FAILED_UNEXPECTEDLY(hResult
))
1110 return deskBand
->QueryInterface(riid
, shellMenu
);
1113 HRESULT
CShellBrowser::GetBaseBar(bool vertical
, IUnknown
**theBaseBar
)
1115 CComPtr
<IUnknown
> newBaseBar
;
1116 CComPtr
<IDeskBar
> deskBar
;
1117 CComPtr
<IUnknown
> newBaseBarSite
;
1118 CComPtr
<IObjectWithSite
> objectWithSite
;
1119 CComPtr
<IDeskBarClient
> deskBarClient
;
1124 cache
= &fClientBars
[BIVerticalBaseBar
].clientBar
.p
;
1126 cache
= &fClientBars
[BIHorizontalBaseBar
].clientBar
.p
;
1129 hResult
= CreateBaseBar(IID_PPV_ARG(IUnknown
, &newBaseBar
));
1130 if (FAILED_UNEXPECTEDLY(hResult
))
1132 hResult
= CreateBaseBarSite(IID_PPV_ARG(IUnknown
, &newBaseBarSite
));
1133 if (FAILED_UNEXPECTEDLY(hResult
))
1136 // tell the new base bar about the shell browser
1137 hResult
= newBaseBar
->QueryInterface(IID_PPV_ARG(IObjectWithSite
, &objectWithSite
));
1138 if (FAILED_UNEXPECTEDLY(hResult
))
1140 hResult
= objectWithSite
->SetSite(static_cast<IDropTarget
*>(this));
1141 if (FAILED_UNEXPECTEDLY(hResult
))
1144 // tell the new base bar about the new base bar site
1145 hResult
= newBaseBar
->QueryInterface(IID_PPV_ARG(IDeskBar
, &deskBar
));
1146 if (FAILED_UNEXPECTEDLY(hResult
))
1148 hResult
= deskBar
->SetClient(newBaseBarSite
);
1149 if (FAILED_UNEXPECTEDLY(hResult
))
1152 // tell the new base bar site about the new base bar
1153 hResult
= newBaseBarSite
->QueryInterface(IID_PPV_ARG(IDeskBarClient
, &deskBarClient
));
1154 if (FAILED_UNEXPECTEDLY(hResult
))
1156 hResult
= deskBarClient
->SetDeskBarSite(newBaseBar
);
1157 if (FAILED_UNEXPECTEDLY(hResult
))
1160 *cache
= newBaseBar
.Detach();
1162 return (*cache
)->QueryInterface(IID_PPV_ARG(IUnknown
, theBaseBar
));
1165 HRESULT
CShellBrowser::ShowBand(const CLSID
&classID
, bool vertical
)
1167 CComPtr
<IDockingWindow
> dockingWindow
;
1168 CComPtr
<IOleCommandTarget
> oleCommandTarget
;
1169 CComPtr
<IUnknown
> baseBarSite
;
1170 CComPtr
<IUnknown
> newBand
;
1171 CComPtr
<IUnknown
> theBaseBar
;
1172 CComPtr
<IDeskBar
> deskBar
;
1178 hResult
= GetBaseBar(vertical
, (IUnknown
**)&theBaseBar
);
1179 if (FAILED_UNEXPECTEDLY(hResult
))
1181 hResult
= CoCreateInstance(classID
, NULL
, CLSCTX_INPROC_SERVER
, IID_PPV_ARG(IUnknown
, &newBand
));
1182 if (FAILED_UNEXPECTEDLY(hResult
))
1184 hResult
= theBaseBar
->QueryInterface(IID_PPV_ARG(IDeskBar
, &deskBar
));
1185 if (FAILED_UNEXPECTEDLY(hResult
))
1187 hResult
= deskBar
->GetClient(&baseBarSite
);
1188 if (FAILED_UNEXPECTEDLY(hResult
))
1190 hResult
= theBaseBar
->QueryInterface(IID_PPV_ARG(IDockingWindow
, &dockingWindow
));
1191 if (FAILED_UNEXPECTEDLY(hResult
))
1193 hResult
= baseBarSite
->QueryInterface(IID_PPV_ARG(IOleCommandTarget
, &oleCommandTarget
));
1194 if (FAILED_UNEXPECTEDLY(hResult
))
1196 V_VT(&vaIn
) = VT_UNKNOWN
;
1197 V_UNKNOWN(&vaIn
) = newBand
.p
;
1198 hResult
= oleCommandTarget
->Exec(&CGID_IDeskBand
, 1, 1, &vaIn
, NULL
);
1199 if (FAILED_UNEXPECTEDLY(hResult
))
1201 hResult
= dockingWindow
->ShowDW(TRUE
);
1202 if (FAILED_UNEXPECTEDLY(hResult
))
1207 HRESULT
CShellBrowser::NavigateToParent()
1209 LPITEMIDLIST newDirectory
;
1212 newDirectory
= ILClone(fCurrentDirectoryPIDL
);
1213 if (newDirectory
== NULL
)
1214 return E_OUTOFMEMORY
;
1215 ILRemoveLastID(newDirectory
);
1216 hResult
= BrowseToPIDL(newDirectory
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
1217 ILFree(newDirectory
);
1218 if (FAILED_UNEXPECTEDLY(hResult
))
1223 BOOL CALLBACK
AddFolderOptionsPage(HPROPSHEETPAGE thePage
, LPARAM lParam
)
1225 PROPSHEETHEADER
*sheetInfo
;
1227 sheetInfo
= (PROPSHEETHEADER
*)lParam
;
1228 if (sheetInfo
->nPages
>= folderOptionsPageCountMax
)
1230 sheetInfo
->phpage
[sheetInfo
->nPages
] = thePage
;
1231 sheetInfo
->nPages
++;
1235 HRESULT
CShellBrowser::DoFolderOptions()
1237 CComPtr
<IShellPropSheetExt
> folderOptionsSheet
;
1238 CComPtr
<IObjectWithSite
> objectWithSite
;
1239 PROPSHEETHEADER m_PropSheet
;
1240 HPROPSHEETPAGE m_psp
[folderOptionsPageCountMax
];
1241 // CComPtr<IGlobalFolderSettings> globalSettings;
1242 // SHELLSTATE2 shellState;
1245 memset(m_psp
, 0, sizeof(m_psp
));
1246 memset(&m_PropSheet
, 0, sizeof(m_PropSheet
));
1248 // create sheet object
1249 hResult
= CoCreateInstance(CLSID_ShellFldSetExt
, NULL
, CLSCTX_INPROC_SERVER
,
1250 IID_PPV_ARG(IShellPropSheetExt
, &folderOptionsSheet
));
1251 if (FAILED_UNEXPECTEDLY(hResult
))
1254 // must set site in order for Apply to all Folders on Advanced page to be enabled
1255 hResult
= folderOptionsSheet
->QueryInterface(IID_PPV_ARG(IObjectWithSite
, &objectWithSite
));
1256 if (SUCCEEDED(hResult
) && objectWithSite
.p
!= NULL
)
1257 hResult
= objectWithSite
->SetSite(static_cast<IDispatch
*>(this));
1258 m_PropSheet
.phpage
= m_psp
;
1261 hResult
= CoCreateInstance(CLSID_GlobalFolderSettings
, NULL
, CLSCTX_INPROC_SERVER
, IID_PPV_ARG(IGlobalFolderSettings
, &globalSettings
));
1262 if (FAILED_UNEXPECTEDLY(hResult
))
1264 hResult
= globalSettings
->Get(&shellState
, sizeof(shellState
));
1265 if (FAILED_UNEXPECTEDLY(hResult
))
1270 hResult
= folderOptionsSheet
->AddPages(AddFolderOptionsPage
, reinterpret_cast<LPARAM
>(&m_PropSheet
));
1271 if (FAILED_UNEXPECTEDLY(hResult
))
1274 if (fCurrentShellView
!= NULL
)
1276 hResult
= fCurrentShellView
->AddPropertySheetPages(
1277 0, AddFolderOptionsPage
, reinterpret_cast<LPARAM
>(&m_PropSheet
));
1278 if (FAILED_UNEXPECTEDLY(hResult
))
1283 m_PropSheet
.dwSize
= sizeof(PROPSHEETHEADER
);
1284 m_PropSheet
.dwFlags
= 0;
1285 m_PropSheet
.hwndParent
= m_hWnd
;
1286 m_PropSheet
.hInstance
= _AtlBaseModule
.GetResourceInstance();
1287 m_PropSheet
.pszCaption
= _T("Folder Options");
1288 m_PropSheet
.nStartPage
= 0;
1289 PropertySheet(&m_PropSheet
);
1293 LRESULT CALLBACK
CShellBrowser::WindowProc(HWND hWnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
1295 CShellBrowser
*pThis
= reinterpret_cast<CShellBrowser
*>(hWnd
);
1296 _ATL_MSG
msg(pThis
->m_hWnd
, uMsg
, wParam
, lParam
);
1298 const _ATL_MSG
*previousMessage
;
1300 WNDPROC saveWindowProc
;
1303 hWnd
= pThis
->m_hWnd
;
1304 previousMessage
= pThis
->m_pCurrentMsg
;
1305 pThis
->m_pCurrentMsg
= &msg
;
1307 CComPtr
<IMenuBand
> menuBand
;
1308 hResult
= pThis
->GetMenuBand(IID_PPV_ARG(IMenuBand
, &menuBand
));
1309 if (SUCCEEDED(hResult
) && menuBand
.p
!= NULL
)
1311 hResult
= menuBand
->TranslateMenuMessage(&msg
, &lResult
);
1312 if (hResult
== S_OK
)
1315 wParam
= msg
.wParam
;
1316 lParam
= msg
.lParam
;
1320 handled
= pThis
->ProcessWindowMessage(hWnd
, uMsg
, wParam
, lParam
, lResult
, 0);
1321 ATLASSERT(pThis
->m_pCurrentMsg
== &msg
);
1322 if (handled
== FALSE
)
1324 if (uMsg
== WM_NCDESTROY
)
1326 saveWindowProc
= reinterpret_cast<WNDPROC
>(GetWindowLongPtr(hWnd
, GWL_WNDPROC
));
1327 lResult
= pThis
->DefWindowProc(uMsg
, wParam
, lParam
);
1328 if (saveWindowProc
== reinterpret_cast<WNDPROC
>(GetWindowLongPtr(hWnd
, GWL_WNDPROC
)))
1329 SetWindowLongPtr(hWnd
, GWL_WNDPROC
, (LONG_PTR
)pThis
->m_pfnSuperWindowProc
);
1330 pThis
->m_dwState
|= WINSTATE_DESTROYED
;
1333 lResult
= pThis
->DefWindowProc(uMsg
, wParam
, lParam
);
1335 pThis
->m_pCurrentMsg
= previousMessage
;
1336 if (previousMessage
== NULL
&& (pThis
->m_dwState
& WINSTATE_DESTROYED
) != 0)
1338 pThis
->m_dwState
&= ~WINSTATE_DESTROYED
;
1339 pThis
->m_hWnd
= NULL
;
1340 pThis
->OnFinalMessage(hWnd
);
1345 void CShellBrowser::RepositionBars()
1351 GetClientRect(&clientRect
);
1353 if (fStatusBarVisible
&& fStatusBar
)
1355 ::GetWindowRect(fStatusBar
, &statusRect
);
1356 ::SetWindowPos(fStatusBar
, NULL
, clientRect
.left
, clientRect
.bottom
- (statusRect
.bottom
- statusRect
.top
),
1357 clientRect
.right
- clientRect
.left
,
1358 statusRect
.bottom
- statusRect
.top
, SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1359 clientRect
.bottom
-= statusRect
.bottom
- statusRect
.top
;
1362 for (x
= 0; x
< 3; x
++)
1364 HWND hwnd
= fClientBars
[x
].hwnd
;
1365 RECT borderSpace
= fClientBars
[x
].borderSpace
;
1366 if (hwnd
== NULL
&& fClientBars
[x
].clientBar
!= NULL
)
1368 IUnknown_GetWindow(fClientBars
[x
].clientBar
, &hwnd
);
1369 fClientBars
[x
].hwnd
= hwnd
;
1373 RECT toolbarRect
= clientRect
;
1374 if (borderSpace
.top
!= 0)
1376 toolbarRect
.bottom
= toolbarRect
.top
+ borderSpace
.top
;
1378 else if (borderSpace
.bottom
!= 0)
1380 toolbarRect
.top
= toolbarRect
.bottom
- borderSpace
.bottom
;
1382 else if (borderSpace
.left
!= 0)
1384 toolbarRect
.right
= toolbarRect
.left
+ borderSpace
.left
;
1386 else if (borderSpace
.right
!= 0)
1388 toolbarRect
.left
= toolbarRect
.right
- borderSpace
.right
;
1391 ::SetWindowPos(hwnd
, NULL
,
1394 toolbarRect
.right
- toolbarRect
.left
,
1395 toolbarRect
.bottom
- toolbarRect
.top
,
1396 SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1398 if (borderSpace
.top
!= 0)
1400 clientRect
.top
= toolbarRect
.bottom
;
1402 else if (borderSpace
.bottom
!= 0)
1404 clientRect
.bottom
= toolbarRect
.top
;
1406 else if (borderSpace
.left
!= 0)
1408 clientRect
.left
= toolbarRect
.right
;
1410 else if (borderSpace
.right
!= 0)
1412 clientRect
.right
= toolbarRect
.left
;
1416 ::SetWindowPos(fCurrentShellViewWindow
, NULL
, clientRect
.left
, clientRect
.top
,
1417 clientRect
.right
- clientRect
.left
,
1418 clientRect
.bottom
- clientRect
.top
, SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1421 HRESULT
CShellBrowser::FireEvent(DISPID dispIdMember
, int argCount
, VARIANT
*arguments
)
1424 CComDynamicUnkArray
&vec
= IConnectionPointImpl
<CShellBrowser
, &DIID_DWebBrowserEvents2
>::m_vec
;
1425 CComDynamicUnkArray
&vec2
= IConnectionPointImpl
<CShellBrowser
, &DIID_DWebBrowserEvents
>::m_vec
;
1428 params
.rgvarg
= arguments
;
1429 params
.rgdispidNamedArgs
= NULL
;
1430 params
.cArgs
= argCount
;
1431 params
.cNamedArgs
= 0;
1432 IUnknown
** pp
= vec
.begin();
1433 while (pp
< vec
.end())
1437 CComPtr
<IDispatch
> theDispatch
;
1439 hResult
= (*pp
)->QueryInterface(IID_PPV_ARG(IDispatch
, &theDispatch
));
1440 hResult
= theDispatch
->Invoke(dispIdMember
, GUID_NULL
, 0, DISPATCH_METHOD
, ¶ms
, NULL
, NULL
, NULL
);
1445 while (pp
< vec2
.end())
1449 CComPtr
<IDispatch
> theDispatch
;
1451 hResult
= (*pp
)->QueryInterface(IID_PPV_ARG(IDispatch
, &theDispatch
));
1452 hResult
= theDispatch
->Invoke(dispIdMember
, GUID_NULL
, 0, DISPATCH_METHOD
, ¶ms
, NULL
, NULL
, NULL
);
1459 HRESULT
CShellBrowser::FireNavigateComplete(const wchar_t *newDirectory
)
1461 // these two variants intentionally to do use CComVariant because it would double free/release
1462 // or does not need to dispose at all
1465 CComBSTR
tempString(newDirectory
);
1467 V_VT(&varArgs
) = VT_BSTR
;
1468 V_BSTR(&varArgs
) = tempString
.m_str
;
1470 V_VT(&varArg
[0]) = VT_VARIANT
| VT_BYREF
;
1471 V_VARIANTREF(&varArg
[0]) = &varArgs
;
1472 V_VT(&varArg
[1]) = VT_DISPATCH
;
1473 V_DISPATCH(&varArg
[1]) = (IDispatch
*)this;
1475 return FireEvent(DISPID_NAVIGATECOMPLETE2
, 2, varArg
);
1478 HRESULT
CShellBrowser::FireCommandStateChange(bool newState
, int commandID
)
1482 V_VT(&varArg
[0]) = VT_BOOL
;
1483 V_BOOL(&varArg
[0]) = newState
? VARIANT_TRUE
: VARIANT_FALSE
;
1484 V_VT(&varArg
[1]) = VT_I4
;
1485 V_I4(&varArg
[1]) = commandID
;
1487 return FireEvent(DISPID_COMMANDSTATECHANGE
, 2, varArg
);
1490 HRESULT
CShellBrowser::FireCommandStateChangeAll()
1492 return FireCommandStateChange(false, -1);
1495 HRESULT
CShellBrowser::UpdateForwardBackState()
1497 CComPtr
<ITravelLog
> travelLog
;
1498 CComPtr
<ITravelEntry
> unusedEntry
;
1504 canGoForward
= false;
1505 hResult
= GetTravelLog(&travelLog
);
1506 if (FAILED_UNEXPECTEDLY(hResult
))
1508 hResult
= travelLog
->GetTravelEntry(static_cast<IDropTarget
*>(this), TLOG_BACK
, &unusedEntry
);
1509 if (SUCCEEDED(hResult
))
1512 unusedEntry
.Release();
1514 hResult
= travelLog
->GetTravelEntry(static_cast<IDropTarget
*>(this), TLOG_FORE
, &unusedEntry
);
1515 if (SUCCEEDED(hResult
))
1517 canGoForward
= true;
1518 unusedEntry
.Release();
1520 hResult
= FireCommandStateChange(canGoBack
, 2);
1521 hResult
= FireCommandStateChange(canGoForward
, 1);
1525 void CShellBrowser::UpdateGotoMenu(HMENU theMenu
)
1527 CComPtr
<ITravelLog
> travelLog
;
1529 MENUITEMINFO menuItemInfo
;
1532 DeleteMenuItems(theMenu
, IDM_GOTO_TRAVEL_FIRST
, IDM_GOTO_TRAVEL_LAST
);
1534 position
= GetMenuItemCount(theMenu
);
1535 hResult
= GetTravelLog(&travelLog
);
1536 if (FAILED_UNEXPECTEDLY(hResult
))
1538 hResult
= travelLog
->InsertMenuEntries(static_cast<IDropTarget
*>(this), theMenu
, position
,
1539 IDM_GOTO_TRAVEL_FIRSTTARGET
, IDM_GOTO_TRAVEL_LASTTARGET
, TLMENUF_BACKANDFORTH
| TLMENUF_CHECKCURRENT
);
1540 if (SUCCEEDED(hResult
))
1542 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1543 menuItemInfo
.fMask
= MIIM_TYPE
| MIIM_ID
;
1544 menuItemInfo
.fType
= MF_SEPARATOR
;
1545 menuItemInfo
.wID
= IDM_GOTO_TRAVEL_SEP
;
1546 InsertMenuItem(theMenu
, position
, TRUE
, &menuItemInfo
);
1550 void CShellBrowser::UpdateViewMenu(HMENU theMenu
)
1552 CComPtr
<IOleCommandTarget
> oleCommandTarget
;
1553 CComPtr
<ITravelLog
> travelLog
;
1555 OLECMD commandList
[5];
1556 HMENU toolbarMenuBar
;
1558 MENUITEMINFO menuItemInfo
;
1561 gotoMenu
= SHGetMenuFromID(theMenu
, FCIDM_MENU_EXPLORE
);
1562 if (gotoMenu
!= NULL
)
1563 UpdateGotoMenu(gotoMenu
);
1565 commandList
[0].cmdID
= ITID_TOOLBARBANDSHOWN
;
1566 commandList
[1].cmdID
= ITID_ADDRESSBANDSHOWN
;
1567 commandList
[2].cmdID
= ITID_LINKSBANDSHOWN
;
1568 commandList
[3].cmdID
= ITID_TOOLBARLOCKED
;
1569 commandList
[4].cmdID
= ITID_CUSTOMIZEENABLED
;
1571 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
1572 IID_PPV_ARG(IOleCommandTarget
, &oleCommandTarget
));
1573 if (SUCCEEDED(hResult
))
1574 hResult
= oleCommandTarget
->QueryStatus(&CGID_PrivCITCommands
, 5, commandList
, NULL
);
1575 if (FAILED_UNEXPECTEDLY(hResult
))
1576 DeleteMenu(theMenu
, IDM_VIEW_TOOLBARS
, MF_BYCOMMAND
);
1579 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1580 menuItemInfo
.fMask
= MIIM_SUBMENU
;
1581 GetMenuItemInfo(theMenu
, IDM_VIEW_TOOLBARS
, FALSE
, &menuItemInfo
);
1582 DestroyMenu(menuItemInfo
.hSubMenu
);
1584 toolbarMenuBar
= LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_CONTEXTMENU
));
1585 toolbarMenu
= GetSubMenu(toolbarMenuBar
, 0);
1586 RemoveMenu(toolbarMenuBar
, 0, MF_BYPOSITION
);
1587 DestroyMenu(toolbarMenuBar
);
1589 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_STANDARDBUTTONS
, commandList
[0].cmdf
);
1590 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_ADDRESSBAR
, commandList
[1].cmdf
& OLECMDF_ENABLED
);
1591 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_LINKSBAR
, commandList
[2].cmdf
& OLECMDF_ENABLED
);
1592 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_LOCKTOOLBARS
, commandList
[3].cmdf
& OLECMDF_ENABLED
);
1593 if ((commandList
[4].cmdf
& OLECMDF_ENABLED
) == 0)
1594 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_CUSTOMIZE
, MF_BYCOMMAND
);
1595 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_TEXTLABELS
, MF_BYCOMMAND
);
1596 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_GOBUTTON
, MF_BYCOMMAND
);
1598 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1599 menuItemInfo
.fMask
= MIIM_SUBMENU
;
1600 menuItemInfo
.hSubMenu
= toolbarMenu
;
1601 SetMenuItemInfo(theMenu
, IDM_VIEW_TOOLBARS
, FALSE
, &menuItemInfo
);
1603 SHCheckMenuItem(theMenu
, IDM_VIEW_STATUSBAR
, fStatusBarVisible
? TRUE
: FALSE
);
1606 bool IUnknownIsEqual(IUnknown
*int1
, IUnknown
*int2
)
1608 CComPtr
<IUnknown
> int1Retry
;
1609 CComPtr
<IUnknown
> int2Retry
;
1614 if (int1
== NULL
|| int2
== NULL
)
1616 hResult
= int1
->QueryInterface(IID_PPV_ARG(IUnknown
, &int1Retry
));
1617 if (FAILED_UNEXPECTEDLY(hResult
))
1619 hResult
= int2
->QueryInterface(IID_PPV_ARG(IUnknown
, &int2Retry
));
1620 if (FAILED_UNEXPECTEDLY(hResult
))
1622 if (int1Retry
== int2Retry
)
1627 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBorderDW(IUnknown
*punkObj
, LPRECT prcBorder
)
1629 static const INT excludeItems
[] = { 1, 1, 1, 0xa001, 0, 0 };
1631 RECT availableBounds
;
1633 GetEffectiveClientRect(m_hWnd
, &availableBounds
, excludeItems
);
1634 for (INT x
= 0; x
< 3; x
++)
1636 if (fClientBars
[x
].clientBar
.p
!= NULL
&& !IUnknownIsEqual(fClientBars
[x
].clientBar
, punkObj
))
1638 availableBounds
.top
+= fClientBars
[x
].borderSpace
.top
;
1639 availableBounds
.left
+= fClientBars
[x
].borderSpace
.left
;
1640 availableBounds
.bottom
-= fClientBars
[x
].borderSpace
.bottom
;
1641 availableBounds
.right
-= fClientBars
[x
].borderSpace
.right
;
1644 *prcBorder
= availableBounds
;
1648 HRESULT STDMETHODCALLTYPE
CShellBrowser::RequestBorderSpaceDW(IUnknown
* punkObj
, LPCBORDERWIDTHS pbw
)
1653 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetBorderSpaceDW(IUnknown
* punkObj
, LPCBORDERWIDTHS pbw
)
1655 for (INT x
= 0; x
< 3; x
++)
1657 if (IUnknownIsEqual(fClientBars
[x
].clientBar
, punkObj
))
1659 fClientBars
[x
].borderSpace
= *pbw
;
1660 // if this bar changed size, it cascades and forces all subsequent bars to resize
1665 return E_INVALIDARG
;
1668 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryStatus(const GUID
*pguidCmdGroup
,
1669 ULONG cCmds
, OLECMD prgCmds
[ ], OLECMDTEXT
*pCmdText
)
1671 CComPtr
<IOleCommandTarget
> commandTarget
;
1674 if (prgCmds
== NULL
)
1675 return E_INVALIDARG
;
1676 if (pguidCmdGroup
== NULL
)
1678 if (fCurrentShellView
.p
!= NULL
)
1680 hResult
= fCurrentShellView
->QueryInterface(IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
1681 if (SUCCEEDED(hResult
) && commandTarget
.p
!= NULL
)
1682 return commandTarget
->QueryStatus(NULL
, 1, prgCmds
, pCmdText
);
1691 else if (IsEqualIID(*pguidCmdGroup
, CGID_Explorer
))
1695 switch (prgCmds
->cmdID
)
1697 case 0x1c: // search
1698 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1700 case 0x1d: // history
1701 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1703 case 0x1e: // favorites
1704 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1706 case 0x23: // folders
1707 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
| OLECMDF_LATCHED
;
1717 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellBrowser
))
1721 switch (prgCmds
->cmdID
)
1723 case 0xa022: // up level
1724 prgCmds
->cmdf
= OLECMDF_SUPPORTED
;
1725 if (fCurrentDirectoryPIDL
->mkid
.cb
!= 0)
1726 prgCmds
->cmdf
|= OLECMDF_ENABLED
;
1736 HRESULT STDMETHODCALLTYPE
CShellBrowser::Exec(const GUID
*pguidCmdGroup
, DWORD nCmdID
,
1737 DWORD nCmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
)
1741 if (IsEqualIID(*pguidCmdGroup
, CGID_Explorer
))
1746 hResult
= ShowBand(CLSID_ExplorerBand
, true);
1749 if (nCmdexecopt
== 1)
1751 // pvaIn is a VT_UNKNOWN with a band that is being hidden
1755 // update zones part of the status bar
1758 case 0x35: // don't do this, and the internet toolbar doesn't create a menu band
1759 V_VT(pvaOut
) = VT_INT_PTR
;
1760 V_INTREF(pvaOut
) = reinterpret_cast<INT
*>(
1761 LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_MAINMENU
)));
1764 // indicate if this cabinet was opened as a browser
1770 else if (IsEqualIID(*pguidCmdGroup
, CGID_InternetButtons
))
1779 else if (IsEqualIID(*pguidCmdGroup
, CGID_Theater
))
1784 // what is theater mode and why do we receive this?
1788 else if (IsEqualIID(*pguidCmdGroup
, CGID_MenuBand
))
1793 // initialize favorites menu
1797 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellDocView
))
1802 // refresh on toolbar clicked
1805 // tell the view if it should hide the task pane or not
1806 return (fClientBars
[BIVerticalBaseBar
].clientBar
.p
== NULL
) ? S_FALSE
: S_OK
;
1809 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellBrowser
))
1814 return NavigateToParent();
1817 else if (IsEqualIID(*pguidCmdGroup
, CGID_IExplorerToolbar
))
1822 return DoFolderOptions();
1825 else if (IsEqualIID(*pguidCmdGroup
, CGID_DefView
))
1830 // Reset All Folders option in Folder Options
1841 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetWindow(HWND
*lphwnd
)
1849 HRESULT STDMETHODCALLTYPE
CShellBrowser::ContextSensitiveHelp(BOOL fEnterMode
)
1854 HRESULT STDMETHODCALLTYPE
CShellBrowser::InsertMenusSB(HMENU hmenuShared
, LPOLEMENUGROUPWIDTHS lpMenuWidths
)
1856 HMENU mainMenu
= LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_MAINMENU
));
1858 Shell_MergeMenus(hmenuShared
, mainMenu
, 0, 0, FCIDM_BROWSERLAST
, MM_SUBMENUSHAVEIDS
);
1860 int GCCU(itemCount3
) = GetMenuItemCount(hmenuShared
);
1863 DestroyMenu(mainMenu
);
1865 lpMenuWidths
->width
[0] = 2;
1866 lpMenuWidths
->width
[2] = 3;
1867 lpMenuWidths
->width
[4] = 1;
1871 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetMenuSB(HMENU hmenuShared
, HOLEMENU holemenuRes
, HWND hwndActiveObject
)
1873 CComPtr
<IShellMenu
> shellMenu
;
1876 if (hmenuShared
&& IsMenu(hmenuShared
) == FALSE
)
1878 hResult
= GetMenuBand(IID_PPV_ARG(IShellMenu
, &shellMenu
));
1879 if (FAILED_UNEXPECTEDLY(hResult
))
1881 hResult
= shellMenu
->SetMenu(hmenuShared
, NULL
, SMSET_DONTOWN
);
1882 if (FAILED_UNEXPECTEDLY(hResult
))
1884 fCurrentMenuBar
= hmenuShared
;
1888 HRESULT STDMETHODCALLTYPE
CShellBrowser::RemoveMenusSB(HMENU hmenuShared
)
1890 if (hmenuShared
== fCurrentMenuBar
)
1892 //DestroyMenu(fCurrentMenuBar);
1893 SetMenuSB(NULL
, NULL
, NULL
);
1898 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetStatusTextSB(LPCOLESTR pszStatusText
)
1903 ::SetWindowText(fStatusBar
, pszStatusText
);
1912 HRESULT STDMETHODCALLTYPE
CShellBrowser::EnableModelessSB(BOOL fEnable
)
1917 HRESULT STDMETHODCALLTYPE
CShellBrowser::TranslateAcceleratorSB(MSG
*pmsg
, WORD wID
)
1919 if (!::TranslateAcceleratorW(m_hWnd
, m_hAccel
, pmsg
))
1924 HRESULT STDMETHODCALLTYPE
CShellBrowser::BrowseObject(LPCITEMIDLIST pidl
, UINT wFlags
)
1926 return BrowseToPIDL(pidl
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
1929 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewStateStream(DWORD grfMode
, IStream
**ppStrm
)
1934 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetControlWindow(UINT id
, HWND
*lphwnd
)
1942 *lphwnd
= fToolbarProxy
.m_hWnd
;
1945 *lphwnd
= fStatusBar
;
1948 // find the directory browser and return it
1949 // this should be used only to determine if a tree is present
1952 // is this a progress dialog?
1958 HRESULT STDMETHODCALLTYPE
CShellBrowser::SendControlMsg(
1959 UINT id
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
, LRESULT
*pret
)
1968 result
= fToolbarProxy
.SendMessage(uMsg
, wParam
, lParam
);
1973 result
= SendMessage(fStatusBar
, uMsg
, wParam
, lParam
);
1981 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryActiveShellView(IShellView
**ppshv
)
1985 *ppshv
= fCurrentShellView
;
1986 if (fCurrentShellView
.p
!= NULL
)
1987 fCurrentShellView
.p
->AddRef();
1991 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnViewWindowActive(IShellView
*ppshv
)
1996 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetToolbarItems(LPTBBUTTON lpButtons
, UINT nButtons
, UINT uFlags
)
2001 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragEnter(
2002 IDataObject
*pDataObj
, DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2007 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragOver(DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2012 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragLeave()
2017 HRESULT STDMETHODCALLTYPE
CShellBrowser::Drop(
2018 IDataObject
*pDataObj
, DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2023 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryService(REFGUID guidService
, REFIID riid
, void **ppvObject
)
2025 // view does a query for SID_STopLevelBrowser, IID_IShellBrowserService
2026 // the returned interface has a method GetPropertyBag on it
2027 if (IsEqualIID(guidService
, SID_STopLevelBrowser
))
2028 return this->QueryInterface(riid
, ppvObject
);
2029 if (IsEqualIID(guidService
, SID_SShellBrowser
))
2030 return this->QueryInterface(riid
, ppvObject
);
2031 if (IsEqualIID(guidService
, SID_ITargetFrame2
))
2032 return this->QueryInterface(riid
, ppvObject
);
2033 if (IsEqualIID(guidService
, SID_IWebBrowserApp
)) // without this, the internet toolbar won't reflect notifications
2034 return this->QueryInterface(riid
, ppvObject
);
2035 if (IsEqualIID(guidService
, SID_SProxyBrowser
))
2036 return this->QueryInterface(riid
, ppvObject
);
2037 if (IsEqualIID(guidService
, SID_IExplorerToolbar
))
2038 return fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(riid
, ppvObject
);
2039 if (IsEqualIID(riid
, IID_IShellBrowser
))
2040 return this->QueryInterface(riid
, ppvObject
);
2041 return E_NOINTERFACE
;
2044 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPropertyBag(long flags
, REFIID riid
, void **ppvObject
)
2046 if (ppvObject
== NULL
)
2052 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTypeInfoCount(UINT
*pctinfo
)
2057 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTypeInfo(UINT iTInfo
, LCID lcid
, ITypeInfo
**ppTInfo
)
2062 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetIDsOfNames(REFIID riid
, LPOLESTR
*rgszNames
,
2063 UINT cNames
, LCID lcid
, DISPID
*rgDispId
)
2068 HRESULT STDMETHODCALLTYPE
CShellBrowser::Invoke(DISPID dispIdMember
, REFIID riid
, LCID lcid
,
2069 WORD wFlags
, DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
2074 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetParentSite(IOleInPlaceSite
**ppipsite
)
2079 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetTitle(IShellView
*psv
, LPCWSTR pszName
)
2084 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTitle(IShellView
*psv
, LPWSTR pszName
, DWORD cchName
)
2089 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetOleObject(IOleObject
**ppobjv
)
2094 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTravelLog(ITravelLog
**pptl
)
2098 // called by toolbar when displaying tooltips
2103 if (fTravelLog
.p
== NULL
)
2105 hResult
= CreateTravelLog(IID_PPV_ARG(ITravelLog
, &fTravelLog
));
2106 if (FAILED_UNEXPECTEDLY(hResult
))
2109 *pptl
= fTravelLog
.p
;
2110 fTravelLog
.p
->AddRef();
2114 HRESULT STDMETHODCALLTYPE
CShellBrowser::ShowControlWindow(UINT id
, BOOL fShow
)
2119 HRESULT STDMETHODCALLTYPE
CShellBrowser::IsControlWindowShown(UINT id
, BOOL
*pfShown
)
2124 HRESULT STDMETHODCALLTYPE
CShellBrowser::IEGetDisplayName(LPCITEMIDLIST pidl
, LPWSTR pwszName
, UINT uFlags
)
2129 HRESULT STDMETHODCALLTYPE
CShellBrowser::IEParseDisplayName(UINT uiCP
, LPCWSTR pwszPath
, LPITEMIDLIST
*ppidlOut
)
2134 HRESULT STDMETHODCALLTYPE
CShellBrowser::DisplayParseError(HRESULT hres
, LPCWSTR pwszPath
)
2139 HRESULT STDMETHODCALLTYPE
CShellBrowser::NavigateToPidl(LPCITEMIDLIST pidl
, DWORD grfHLNF
)
2144 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetNavigateState(BNSTATE bnstate
)
2149 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetNavigateState(BNSTATE
*pbnstate
)
2154 HRESULT STDMETHODCALLTYPE
CShellBrowser::NotifyRedirect(IShellView
*psv
, LPCITEMIDLIST pidl
, BOOL
*pfDidBrowse
)
2159 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateWindowList()
2164 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateBackForwardState()
2169 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetFlags(DWORD dwFlags
, DWORD dwFlagMask
)
2174 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetFlags(DWORD
*pdwFlags
)
2179 HRESULT STDMETHODCALLTYPE
CShellBrowser::CanNavigateNow()
2184 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPidl(LPITEMIDLIST
*ppidl
)
2186 // called by explorer bar to get current pidl
2189 *ppidl
= ILClone(fCurrentDirectoryPIDL
);
2193 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetReferrer(LPCITEMIDLIST pidl
)
2198 DWORD STDMETHODCALLTYPE
CShellBrowser::GetBrowserIndex()
2203 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBrowserByIndex(DWORD dwID
, IUnknown
**ppunk
)
2208 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetHistoryObject(IOleObject
**ppole
, IStream
**pstm
, IBindCtx
**ppbc
)
2210 if (ppole
== NULL
|| pstm
== NULL
|| ppbc
== NULL
)
2211 return E_INVALIDARG
;
2212 *ppole
= fHistoryObject
;
2213 if (fHistoryObject
!= NULL
)
2214 fHistoryObject
->AddRef();
2215 *pstm
= fHistoryStream
;
2216 if (fHistoryStream
!= NULL
)
2217 fHistoryStream
->AddRef();
2218 *ppbc
= fHistoryBindContext
;
2219 if (fHistoryBindContext
!= NULL
)
2220 fHistoryBindContext
->AddRef();
2221 fHistoryObject
= NULL
;
2222 fHistoryStream
= NULL
;
2223 fHistoryBindContext
= NULL
;
2229 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetHistoryObject(IOleObject
*pole
, BOOL fIsLocalAnchor
)
2234 HRESULT STDMETHODCALLTYPE
CShellBrowser::CacheOLEServer(IOleObject
*pole
)
2239 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetSetCodePage(VARIANT
*pvarIn
, VARIANT
*pvarOut
)
2244 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnHttpEquiv(
2245 IShellView
*psv
, BOOL fDone
, VARIANT
*pvarargIn
, VARIANT
*pvarargOut
)
2250 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPalette(HPALETTE
*hpal
)
2255 HRESULT STDMETHODCALLTYPE
CShellBrowser::RegisterWindow(BOOL fForceRegister
, int swc
)
2260 LRESULT STDMETHODCALLTYPE
CShellBrowser::WndProcBS(HWND hwnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2265 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetAsDefFolderSettings()
2270 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewRect(RECT
*prc
)
2275 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnSize(WPARAM wParam
)
2280 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnCreate(struct tagCREATESTRUCTW
*pcs
)
2282 m_hAccel
= LoadAcceleratorsW(GetModuleHandle(L
"browseui.dll"), MAKEINTRESOURCEW(256));
2286 LRESULT STDMETHODCALLTYPE
CShellBrowser::OnCommand(WPARAM wParam
, LPARAM lParam
)
2291 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnDestroy()
2296 LRESULT STDMETHODCALLTYPE
CShellBrowser::OnNotify(struct tagNMHDR
*pnm
)
2301 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnSetFocus()
2306 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnFrameWindowActivateBS(BOOL fActive
)
2311 HRESULT STDMETHODCALLTYPE
CShellBrowser::ReleaseShellView()
2316 HRESULT STDMETHODCALLTYPE
CShellBrowser::ActivatePendingView()
2321 HRESULT STDMETHODCALLTYPE
CShellBrowser::CreateViewWindow(
2322 IShellView
*psvNew
, IShellView
*psvOld
, LPRECT prcView
, HWND
*phwnd
)
2327 HRESULT STDMETHODCALLTYPE
CShellBrowser::CreateBrowserPropSheetExt(REFIID riid
, void **ppv
)
2332 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewWindow(HWND
*phwndView
)
2337 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBaseBrowserData(LPCBASEBROWSERDATA
*pbbd
)
2342 LPBASEBROWSERDATA STDMETHODCALLTYPE
CShellBrowser::PutBaseBrowserData()
2347 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeTravelLog(ITravelLog
*ptl
, DWORD dw
)
2352 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetTopBrowser()
2357 HRESULT STDMETHODCALLTYPE
CShellBrowser::Offline(int iCmd
)
2362 HRESULT STDMETHODCALLTYPE
CShellBrowser::AllowViewResize(BOOL f
)
2367 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetActivateState(UINT u
)
2372 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateSecureLockIcon(int eSecureLock
)
2377 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeDownloadManager()
2382 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeTransitionSite()
2387 HRESULT STDMETHODCALLTYPE
CShellBrowser::_Initialize(HWND hwnd
, IUnknown
*pauto
)
2392 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CancelPendingNavigationAsync()
2397 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CancelPendingView()
2402 HRESULT STDMETHODCALLTYPE
CShellBrowser::_MaySaveChanges()
2407 HRESULT STDMETHODCALLTYPE
CShellBrowser::_PauseOrResumeView(BOOL fPaused
)
2412 HRESULT STDMETHODCALLTYPE
CShellBrowser::_DisableModeless()
2417 HRESULT STDMETHODCALLTYPE
CShellBrowser::_NavigateToPidl(LPCITEMIDLIST pidl
, DWORD grfHLNF
, DWORD dwFlags
)
2422 HRESULT STDMETHODCALLTYPE
CShellBrowser::_TryShell2Rename(IShellView
*psv
, LPCITEMIDLIST pidlNew
)
2427 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SwitchActivationNow()
2432 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ExecChildren(IUnknown
*punkBar
, BOOL fBroadcast
,
2433 const GUID
*pguidCmdGroup
, DWORD nCmdID
, DWORD nCmdexecopt
, VARIANTARG
*pvarargIn
, VARIANTARG
*pvarargOut
)
2438 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SendChildren(
2439 HWND hwndBar
, BOOL fBroadcast
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2444 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetFolderSetData(struct tagFolderSetData
*pfsd
)
2449 HRESULT STDMETHODCALLTYPE
CShellBrowser::_OnFocusChange(UINT itb
)
2454 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_ShowHideChildWindows(BOOL fChildOnly
)
2459 UINT STDMETHODCALLTYPE
CShellBrowser::_get_itbLastFocus()
2464 HRESULT STDMETHODCALLTYPE
CShellBrowser::_put_itbLastFocus(UINT itbLastFocus
)
2469 HRESULT STDMETHODCALLTYPE
CShellBrowser::_UIActivateView(UINT uState
)
2474 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetViewBorderRect(RECT
*prc
)
2479 HRESULT STDMETHODCALLTYPE
CShellBrowser::_UpdateViewRectSize()
2484 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeNextBorder(UINT itb
)
2489 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeView()
2494 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetEffectiveClientArea(LPRECT lprectBorder
, HMONITOR hmon
)
2499 IStream
*STDMETHODCALLTYPE
CShellBrowser::v_GetViewStream(LPCITEMIDLIST pidl
, DWORD grfMode
, LPCWSTR pwszName
)
2504 LRESULT STDMETHODCALLTYPE
CShellBrowser::ForwardViewMsg(UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2509 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetAcceleratorMenu(HACCEL hacc
)
2514 int STDMETHODCALLTYPE
CShellBrowser::_GetToolbarCount()
2519 LPTOOLBARITEM STDMETHODCALLTYPE
CShellBrowser::_GetToolbarItem(int itb
)
2524 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SaveToolbars(IStream
*pstm
)
2529 HRESULT STDMETHODCALLTYPE
CShellBrowser::_LoadToolbars(IStream
*pstm
)
2534 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CloseAndReleaseToolbars(BOOL fClose
)
2539 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_MayGetNextToolbarFocus(
2540 LPMSG lpMsg
, UINT itbNext
, int citb
, LPTOOLBARITEM
*pptbi
, HWND
*phwnd
)
2545 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeNextBorderHelper(UINT itb
, BOOL bUseHmonitor
)
2550 UINT STDMETHODCALLTYPE
CShellBrowser::_FindTBar(IUnknown
*punkSrc
)
2555 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SetFocus(LPTOOLBARITEM ptbi
, HWND hwnd
, LPMSG lpMsg
)
2560 extern HRESULT
IUnknown_HasFocusIO(IUnknown
* punk
);
2561 extern HRESULT
IUnknown_TranslateAcceleratorIO(IUnknown
* punk
, MSG
* pmsg
);
2562 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_MayTranslateAccelerator(MSG
*pmsg
)
2564 for (int i
= 0; i
< 3; i
++)
2566 if (IUnknown_TranslateAcceleratorIO(fClientBars
[i
].clientBar
, pmsg
) == S_OK
)
2570 if (!fCurrentShellView
)
2573 return fCurrentShellView
->TranslateAcceleratorW(pmsg
);
2576 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetBorderDWHelper(IUnknown
*punkSrc
, LPRECT lprectBorder
, BOOL bUseHmonitor
)
2581 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_CheckZoneCrossing(LPCITEMIDLIST pidl
)
2586 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoBack()
2588 CComPtr
<ITravelLog
> travelLog
;
2591 hResult
= GetTravelLog(&travelLog
);
2592 if (FAILED_UNEXPECTEDLY(hResult
))
2594 return travelLog
->Travel(static_cast<IDropTarget
*>(this), TLOG_BACK
);
2597 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoForward()
2599 CComPtr
<ITravelLog
> travelLog
;
2602 hResult
= GetTravelLog(&travelLog
);
2603 if (FAILED_UNEXPECTEDLY(hResult
))
2605 return travelLog
->Travel(static_cast<IDropTarget
*>(this), TLOG_FORE
);
2608 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoHome()
2613 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoSearch()
2618 HRESULT STDMETHODCALLTYPE
CShellBrowser::Navigate(BSTR URL
, VARIANT
*Flags
,
2619 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
2624 HRESULT STDMETHODCALLTYPE
CShellBrowser::Refresh()
2628 V_VT(&level
) = VT_I4
;
2630 return Refresh2(&level
);
2633 HRESULT STDMETHODCALLTYPE
CShellBrowser::Refresh2(VARIANT
*Level
)
2635 CComPtr
<IOleCommandTarget
> oleCommandTarget
;
2638 hResult
= fCurrentShellView
->QueryInterface(IID_PPV_ARG(IOleCommandTarget
, &oleCommandTarget
));
2639 if (FAILED_UNEXPECTEDLY(hResult
))
2641 return oleCommandTarget
->Exec(NULL
, 22, 1, Level
, NULL
);
2644 HRESULT STDMETHODCALLTYPE
CShellBrowser::Stop()
2649 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Application(IDispatch
**ppDisp
)
2654 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Parent(IDispatch
**ppDisp
)
2659 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Container(IDispatch
**ppDisp
)
2664 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Document(IDispatch
**ppDisp
)
2669 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_TopLevelContainer(VARIANT_BOOL
*pBool
)
2674 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Type(BSTR
*Type
)
2681 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Left(long *pl
)
2686 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Left(long Left
)
2691 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Top(long *pl
)
2696 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Top(long Top
)
2701 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Width(long *pl
)
2706 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Width(long Width
)
2711 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Height(long *pl
)
2716 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Height(long Height
)
2723 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_LocationName(BSTR
*LocationName
)
2728 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_LocationURL(BSTR
*LocationURL
)
2733 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Busy(VARIANT_BOOL
*pBool
)
2738 HRESULT STDMETHODCALLTYPE
CShellBrowser::Quit()
2743 HRESULT STDMETHODCALLTYPE
CShellBrowser::ClientToWindow(int *pcx
, int *pcy
)
2748 HRESULT STDMETHODCALLTYPE
CShellBrowser::PutProperty(BSTR Property
, VARIANT vtValue
)
2753 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetProperty(BSTR Property
, VARIANT
*pvtValue
)
2758 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Name(BSTR
*Name
)
2763 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_HWND(SHANDLE_PTR
*pHWND
)
2768 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_FullName(BSTR
*FullName
)
2773 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Path(BSTR
*Path
)
2778 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Visible(VARIANT_BOOL
*pBool
)
2783 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Visible(VARIANT_BOOL Value
)
2788 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_StatusBar(VARIANT_BOOL
*pBool
)
2793 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_StatusBar(VARIANT_BOOL Value
)
2798 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_StatusText(BSTR
*StatusText
)
2803 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_StatusText(BSTR StatusText
)
2808 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_ToolBar(int *Value
)
2813 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_ToolBar(int Value
)
2818 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_MenuBar(VARIANT_BOOL
*Value
)
2823 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_MenuBar(VARIANT_BOOL Value
)
2828 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_FullScreen(VARIANT_BOOL
*pbFullScreen
)
2833 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_FullScreen(VARIANT_BOOL bFullScreen
)
2838 HRESULT STDMETHODCALLTYPE
CShellBrowser::Navigate2(VARIANT
*URL
, VARIANT
*Flags
,
2839 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
2844 // called from drive combo box to navigate to a directory
2845 if (V_VT(URL
) != (VT_ARRAY
| VT_UI1
))
2846 return E_INVALIDARG
;
2847 if (V_ARRAY(URL
)->cDims
!= 1 || V_ARRAY(URL
)->cbElements
!= 1)
2848 return E_INVALIDARG
;
2849 pidl
= (LPITEMIDLIST
)V_ARRAY(URL
)->pvData
;
2850 hResult
= BrowseToPIDL((LPITEMIDLIST
)pidl
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
2851 if (FAILED_UNEXPECTEDLY(hResult
))
2856 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryStatusWB(OLECMDID cmdID
, OLECMDF
*pcmdf
)
2861 HRESULT STDMETHODCALLTYPE
CShellBrowser::ExecWB(OLECMDID cmdID
, OLECMDEXECOPT cmdexecopt
,
2862 VARIANT
*pvaIn
, VARIANT
*pvaOut
)
2867 HRESULT STDMETHODCALLTYPE
CShellBrowser::ShowBrowserBar(VARIANT
*pvaClsid
, VARIANT
*pvarShow
, VARIANT
*pvarSize
)
2872 // called to show search bar
2873 if (V_VT(pvaClsid
) != VT_BSTR
)
2874 return E_INVALIDARG
;
2875 CLSIDFromString(V_BSTR(pvaClsid
), &classID
);
2876 // TODO: properly compute the value of vertical
2878 return ShowBand(classID
, vertical
);
2881 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_ReadyState(READYSTATE
*plReadyState
)
2886 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Offline(VARIANT_BOOL
*pbOffline
)
2891 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Offline(VARIANT_BOOL bOffline
)
2896 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Silent(VARIANT_BOOL
*pbSilent
)
2901 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Silent(VARIANT_BOOL bSilent
)
2906 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_RegisterAsBrowser(VARIANT_BOOL
*pbRegister
)
2911 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_RegisterAsBrowser(VARIANT_BOOL bRegister
)
2916 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_RegisterAsDropTarget(VARIANT_BOOL
*pbRegister
)
2921 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_RegisterAsDropTarget(VARIANT_BOOL bRegister
)
2926 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_TheaterMode(VARIANT_BOOL
*pbRegister
)
2931 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_TheaterMode(VARIANT_BOOL bRegister
)
2936 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_AddressBar(VARIANT_BOOL
*Value
)
2941 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_AddressBar(VARIANT_BOOL Value
)
2946 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Resizable(VARIANT_BOOL
*Value
)
2951 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Resizable(VARIANT_BOOL Value
)
2956 HRESULT STDMETHODCALLTYPE
CShellBrowser::FindWindowByIndex(DWORD dwID
, IUnknown
**ppunk
)
2961 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetWindowData(IStream
*pStream
, LPWINDOWDATA pWinData
)
2963 if (pWinData
== NULL
)
2966 pWinData
->dwWindowID
= -1;
2968 pWinData
->pidl
= ILClone(fCurrentDirectoryPIDL
);
2969 pWinData
->lpszUrl
= NULL
;
2970 pWinData
->lpszUrlLocation
= NULL
;
2971 pWinData
->lpszTitle
= NULL
;
2975 HRESULT STDMETHODCALLTYPE
CShellBrowser::LoadHistoryPosition(LPWSTR pszUrlLocation
, DWORD dwPosition
)
2980 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetClassID(CLSID
*pClassID
)
2985 HRESULT STDMETHODCALLTYPE
CShellBrowser::LoadHistory(IStream
*pStream
, IBindCtx
*pbc
)
2987 CComPtr
<IPersistHistory
> viewPersistHistory
;
2988 CComPtr
<IOleObject
> viewHistoryObject
;
2989 persistState oldState
;
2994 hResult
= pStream
->Read(&oldState
, sizeof(oldState
), &numRead
);
2995 if (FAILED_UNEXPECTEDLY(hResult
))
2997 if (numRead
!= sizeof(oldState
) || oldState
.dwSize
!= sizeof(oldState
))
2999 if (oldState
.browseType
!= 2)
3001 pidl
= static_cast<LPITEMIDLIST
>(CoTaskMemAlloc(oldState
.pidlSize
));
3003 return E_OUTOFMEMORY
;
3004 hResult
= pStream
->Read(pidl
, oldState
.pidlSize
, &numRead
);
3005 if (FAILED_UNEXPECTEDLY(hResult
))
3010 if (numRead
!= oldState
.pidlSize
)
3015 hResult
= CoCreateInstance(oldState
.persistClass
, NULL
, CLSCTX_LOCAL_SERVER
| CLSCTX_INPROC_SERVER
,
3016 IID_PPV_ARG(IOleObject
, &viewHistoryObject
));
3017 fHistoryObject
= viewHistoryObject
;
3018 fHistoryStream
= pStream
;
3019 fHistoryBindContext
= pbc
;
3020 hResult
= BrowseToPIDL(pidl
, BTP_UPDATE_CUR_HISTORY
);
3021 fHistoryObject
= NULL
;
3022 fHistoryStream
= NULL
;
3023 fHistoryBindContext
= NULL
;
3025 if (FAILED_UNEXPECTEDLY(hResult
))
3030 HRESULT STDMETHODCALLTYPE
CShellBrowser::SaveHistory(IStream
*pStream
)
3032 CComPtr
<IPersistHistory
> viewPersistHistory
;
3033 persistState newState
;
3036 hResult
= fCurrentShellView
->GetItemObject(
3037 SVGIO_BACKGROUND
, IID_PPV_ARG(IPersistHistory
, &viewPersistHistory
));
3038 memset(&newState
, 0, sizeof(newState
));
3039 newState
.dwSize
= sizeof(newState
);
3040 newState
.browseType
= 2;
3041 newState
.browserIndex
= GetBrowserIndex();
3042 if (viewPersistHistory
.p
!= NULL
)
3044 hResult
= viewPersistHistory
->GetClassID(&newState
.persistClass
);
3045 if (FAILED_UNEXPECTEDLY(hResult
))
3048 newState
.pidlSize
= ILGetSize(fCurrentDirectoryPIDL
);
3049 hResult
= pStream
->Write(&newState
, sizeof(newState
), NULL
);
3050 if (FAILED_UNEXPECTEDLY(hResult
))
3052 hResult
= pStream
->Write(fCurrentDirectoryPIDL
, newState
.pidlSize
, NULL
);
3053 if (FAILED_UNEXPECTEDLY(hResult
))
3055 if (viewPersistHistory
.p
!= NULL
)
3057 hResult
= viewPersistHistory
->SaveHistory(pStream
);
3058 if (FAILED_UNEXPECTEDLY(hResult
))
3064 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetPositionCookie(DWORD dwPositioncookie
)
3069 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPositionCookie(DWORD
*pdwPositioncookie
)
3074 LRESULT
CShellBrowser::OnCreate(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3076 OnCreate(reinterpret_cast<LPCREATESTRUCT
> (lParam
));
3080 LRESULT
CShellBrowser::OnDestroy(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3083 // TODO: rip down everything
3085 fCurrentShellView
->DestroyViewWindow();
3086 fCurrentShellView
->UIActivate(SVUIA_DEACTIVATE
);
3087 ReleaseCComPtrExpectZero(fCurrentShellView
);
3089 for (int i
= 0; i
< 3; i
++)
3091 if (fClientBars
[i
].clientBar
== NULL
)
3093 IDockingWindow
* pdw
;
3094 hr
= fClientBars
[i
].clientBar
->QueryInterface(IID_PPV_ARG(IDockingWindow
, &pdw
));
3095 if (FAILED_UNEXPECTEDLY(hr
))
3100 ReleaseCComPtrExpectZero(fClientBars
[i
].clientBar
);
3102 ReleaseCComPtrExpectZero(fTravelLog
);
3104 fCurrentShellFolder
.Release();
3105 ILFree(fCurrentDirectoryPIDL
);
3106 ::DestroyWindow(fStatusBar
);
3107 DestroyMenu(fCurrentMenuBar
);
3113 LRESULT
CShellBrowser::OnSize(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3115 CComPtr
<IDockingWindow
> dockingWindow
;
3116 RECT availableBounds
;
3117 static const INT excludeItems
[] = {1, 1, 1, 0xa001, 0, 0};
3120 if (wParam
!= SIZE_MINIMIZED
)
3122 GetEffectiveClientRect(m_hWnd
, &availableBounds
, excludeItems
);
3123 for (INT x
= 0; x
< 3; x
++)
3125 if (fClientBars
[x
].clientBar
!= NULL
)
3127 hResult
= fClientBars
[x
].clientBar
->QueryInterface(
3128 IID_PPV_ARG(IDockingWindow
, &dockingWindow
));
3129 if (SUCCEEDED(hResult
) && dockingWindow
!= NULL
)
3131 hResult
= dockingWindow
->ResizeBorderDW(
3132 &availableBounds
, static_cast<IDropTarget
*>(this), TRUE
);
3142 LRESULT
CShellBrowser::OnInitMenuPopup(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3145 LPARAM menuIndex
= lParam
;
3147 theMenu
= reinterpret_cast<HMENU
>(wParam
);
3149 if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_FILE
))
3153 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_EDIT
))
3157 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_VIEW
))
3159 UpdateViewMenu(theMenu
);
3162 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_FAVORITES
))
3166 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_TOOLS
))
3170 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_HELP
))
3175 LRESULT ret
= RelayMsgToShellView(uMsg
, wParam
, menuIndex
, bHandled
);
3180 LRESULT
CShellBrowser::RelayMsgToShellView(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3182 if (fCurrentShellViewWindow
!= NULL
)
3183 return SendMessage(fCurrentShellViewWindow
, uMsg
, wParam
, lParam
);
3187 LRESULT
CShellBrowser::OnClose(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3192 LRESULT
CShellBrowser::OnFolderOptions(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3196 hResult
= DoFolderOptions();
3200 LRESULT
CShellBrowser::OnMapNetworkDrive(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3203 WNetConnectionDialog(m_hWnd
, RESOURCETYPE_DISK
);
3204 #endif /* __REACTOS__ */
3208 LRESULT
CShellBrowser::OnDisconnectNetworkDrive(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3211 WNetDisconnectDialog(m_hWnd
, RESOURCETYPE_DISK
);
3212 #endif /* __REACTOS__ */
3216 LRESULT
CShellBrowser::OnAboutReactOS(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3218 ShellAbout(m_hWnd
, _T("ReactOS"), _T(""), NULL
);
3222 LRESULT
CShellBrowser::OnGoBack(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3230 LRESULT
CShellBrowser::OnGoForward(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3234 hResult
= GoForward();
3238 LRESULT
CShellBrowser::OnGoUpLevel(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3242 hResult
= NavigateToParent();
3246 LRESULT
CShellBrowser::OnGoHome(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3254 LRESULT
CShellBrowser::OnBackspace(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3258 // FIXME: This does not appear to be what windows does.
3259 hResult
= NavigateToParent();
3263 LRESULT
CShellBrowser::OnIsThisLegal(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3267 typedef HRESULT (WINAPI
*PSHOpenNewFrame
)(LPITEMIDLIST pidl
, IUnknown
*b
, long c
, long d
);
3268 PSHOpenNewFrame Func
= NULL
;
3269 HMODULE Module
= GetModuleHandle(TEXT("browseui.dll"));
3271 Func
= reinterpret_cast<PSHOpenNewFrame
>(GetProcAddress(Module
, (LPCSTR
) 103));
3274 LPITEMIDLIST desktopPIDL
;
3276 hResult
= SHGetFolderLocation(NULL
, CSIDL_DESKTOP
, NULL
, 0, &desktopPIDL
);
3277 if (SUCCEEDED(hResult
))
3279 hResult
= Func(desktopPIDL
, NULL
, -1, 1);
3285 LRESULT
CShellBrowser::OnToggleStatusBarVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3287 fStatusBarVisible
= !fStatusBarVisible
;
3288 // TODO: trigger a relayout of contained items
3292 LRESULT
CShellBrowser::OnToggleToolbarLock(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3294 CComPtr
<IOleCommandTarget
> commandTarget
;
3297 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3298 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3299 if (FAILED_UNEXPECTEDLY(hResult
))
3301 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_TOOLBARLOCKED
, 0, NULL
, NULL
);
3305 LRESULT
CShellBrowser::OnToggleToolbarBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3307 CComPtr
<IOleCommandTarget
> commandTarget
;
3310 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3311 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3312 if (FAILED_UNEXPECTEDLY(hResult
))
3314 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_TOOLBARBANDSHOWN
, 0, NULL
, NULL
);
3318 LRESULT
CShellBrowser::OnToggleAddressBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3320 CComPtr
<IOleCommandTarget
> commandTarget
;
3323 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3324 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3325 if (FAILED_UNEXPECTEDLY(hResult
))
3327 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_ADDRESSBANDSHOWN
, 0, NULL
, NULL
);
3331 LRESULT
CShellBrowser::OnToggleLinksBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3333 CComPtr
<IOleCommandTarget
> commandTarget
;
3336 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3337 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3338 if (FAILED_UNEXPECTEDLY(hResult
))
3340 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_LINKSBANDSHOWN
, 0, NULL
, NULL
);
3344 LRESULT
CShellBrowser::OnToggleTextLabels(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3346 CComPtr
<IOleCommandTarget
> commandTarget
;
3349 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3350 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3351 if (FAILED_UNEXPECTEDLY(hResult
))
3353 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_TEXTLABELS
, 0, NULL
, NULL
);
3357 LRESULT
CShellBrowser::OnToolbarCustomize(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3359 CComPtr
<IOleCommandTarget
> commandTarget
;
3362 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3363 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3364 if (FAILED_UNEXPECTEDLY(hResult
))
3366 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_CUSTOMIZEENABLED
, 0, NULL
, NULL
);
3370 LRESULT
CShellBrowser::OnGoTravel(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3375 LRESULT
CShellBrowser::RelayCommands(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3377 if (HIWORD(wParam
) == 0 && LOWORD(wParam
) < FCIDM_SHVIEWLAST
&& fCurrentShellViewWindow
!= NULL
)
3378 return SendMessage(fCurrentShellViewWindow
, uMsg
, wParam
, lParam
);
3382 static HRESULT
ExplorerMessageLoop(IEThreadParamBlock
* parameters
)
3384 CComPtr
<CShellBrowser
> theCabinet
;
3389 // Tell the thread ref we are using it.
3390 if (parameters
&& parameters
->offsetF8
)
3391 parameters
->offsetF8
->AddRef();
3393 ATLTRY(theCabinet
= new CComObject
<CShellBrowser
>);
3394 if (theCabinet
== NULL
)
3396 return E_OUTOFMEMORY
;
3399 hResult
= theCabinet
->Initialize(parameters
->directoryPIDL
, 0, 0, 0);
3400 if (FAILED_UNEXPECTEDLY(hResult
))
3401 return E_OUTOFMEMORY
;
3403 while ((Ret
= GetMessage(&Msg
, NULL
, 0, 0)) != 0)
3407 // Error: continue or exit?
3411 if (Msg
.message
== WM_QUIT
)
3414 if (theCabinet
->v_MayTranslateAccelerator(&Msg
) != S_OK
)
3416 TranslateMessage(&Msg
);
3417 DispatchMessage(&Msg
);
3421 int nrc
= theCabinet
->Release();
3424 DbgPrint("WARNING: There are %d references to the CShellBrowser active or leaked.\n", nrc
);
3427 theCabinet
.Detach();
3429 // Tell the thread ref we are not using it anymore.
3430 if (parameters
&& parameters
->offsetF8
)
3431 parameters
->offsetF8
->Release();
3436 DWORD WINAPI
BrowserThreadProc(LPVOID lpThreadParameter
)
3439 IEThreadParamBlock
* parameters
= (IEThreadParamBlock
*) lpThreadParameter
;
3441 OleInitialize(NULL
);
3443 ATLTRY(hr
= ExplorerMessageLoop(parameters
));
3447 SHDestroyIETHREADPARAM(parameters
);