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 HICON oldSmall
= (HICON
)SendMessage(WM_SETICON
, ICON_SMALL
, reinterpret_cast<LPARAM
>(icSmall
));
1082 HICON oldLarge
= (HICON
)SendMessage(WM_SETICON
, ICON_BIG
, reinterpret_cast<LPARAM
>(icLarge
));
1084 DestroyIcon(oldSmall
);
1085 DestroyIcon(oldLarge
);
1088 // TODO: Update the window icon
1090 FireCommandStateChangeAll();
1091 hResult
= UpdateForwardBackState();
1095 HRESULT
CShellBrowser::GetMenuBand(REFIID riid
, void **shellMenu
)
1097 CComPtr
<IServiceProvider
> serviceProvider
;
1098 CComPtr
<IBandSite
> bandSite
;
1099 CComPtr
<IDeskBand
> deskBand
;
1102 if (!fClientBars
[BIInternetToolbar
].clientBar
)
1105 hResult
= IUnknown_QueryService(fClientBars
[BIInternetToolbar
].clientBar
, SID_IBandSite
, IID_PPV_ARG(IBandSite
, &bandSite
));
1106 if (FAILED_UNEXPECTEDLY(hResult
))
1109 hResult
= bandSite
->QueryBand(1, &deskBand
, NULL
, NULL
, 0);
1110 if (FAILED_UNEXPECTEDLY(hResult
))
1113 return deskBand
->QueryInterface(riid
, shellMenu
);
1116 HRESULT
CShellBrowser::GetBaseBar(bool vertical
, IUnknown
**theBaseBar
)
1118 CComPtr
<IUnknown
> newBaseBar
;
1119 CComPtr
<IDeskBar
> deskBar
;
1120 CComPtr
<IUnknown
> newBaseBarSite
;
1121 CComPtr
<IObjectWithSite
> objectWithSite
;
1122 CComPtr
<IDeskBarClient
> deskBarClient
;
1127 cache
= &fClientBars
[BIVerticalBaseBar
].clientBar
.p
;
1129 cache
= &fClientBars
[BIHorizontalBaseBar
].clientBar
.p
;
1132 hResult
= CreateBaseBar(IID_PPV_ARG(IUnknown
, &newBaseBar
));
1133 if (FAILED_UNEXPECTEDLY(hResult
))
1135 hResult
= CreateBaseBarSite(IID_PPV_ARG(IUnknown
, &newBaseBarSite
));
1136 if (FAILED_UNEXPECTEDLY(hResult
))
1139 // tell the new base bar about the shell browser
1140 hResult
= newBaseBar
->QueryInterface(IID_PPV_ARG(IObjectWithSite
, &objectWithSite
));
1141 if (FAILED_UNEXPECTEDLY(hResult
))
1143 hResult
= objectWithSite
->SetSite(static_cast<IDropTarget
*>(this));
1144 if (FAILED_UNEXPECTEDLY(hResult
))
1147 // tell the new base bar about the new base bar site
1148 hResult
= newBaseBar
->QueryInterface(IID_PPV_ARG(IDeskBar
, &deskBar
));
1149 if (FAILED_UNEXPECTEDLY(hResult
))
1151 hResult
= deskBar
->SetClient(newBaseBarSite
);
1152 if (FAILED_UNEXPECTEDLY(hResult
))
1155 // tell the new base bar site about the new base bar
1156 hResult
= newBaseBarSite
->QueryInterface(IID_PPV_ARG(IDeskBarClient
, &deskBarClient
));
1157 if (FAILED_UNEXPECTEDLY(hResult
))
1159 hResult
= deskBarClient
->SetDeskBarSite(newBaseBar
);
1160 if (FAILED_UNEXPECTEDLY(hResult
))
1163 *cache
= newBaseBar
.Detach();
1165 return (*cache
)->QueryInterface(IID_PPV_ARG(IUnknown
, theBaseBar
));
1168 HRESULT
CShellBrowser::ShowBand(const CLSID
&classID
, bool vertical
)
1170 CComPtr
<IDockingWindow
> dockingWindow
;
1171 CComPtr
<IOleCommandTarget
> oleCommandTarget
;
1172 CComPtr
<IUnknown
> baseBarSite
;
1173 CComPtr
<IUnknown
> newBand
;
1174 CComPtr
<IUnknown
> theBaseBar
;
1175 CComPtr
<IDeskBar
> deskBar
;
1181 hResult
= GetBaseBar(vertical
, (IUnknown
**)&theBaseBar
);
1182 if (FAILED_UNEXPECTEDLY(hResult
))
1184 hResult
= CoCreateInstance(classID
, NULL
, CLSCTX_INPROC_SERVER
, IID_PPV_ARG(IUnknown
, &newBand
));
1185 if (FAILED_UNEXPECTEDLY(hResult
))
1187 hResult
= theBaseBar
->QueryInterface(IID_PPV_ARG(IDeskBar
, &deskBar
));
1188 if (FAILED_UNEXPECTEDLY(hResult
))
1190 hResult
= deskBar
->GetClient(&baseBarSite
);
1191 if (FAILED_UNEXPECTEDLY(hResult
))
1193 hResult
= theBaseBar
->QueryInterface(IID_PPV_ARG(IDockingWindow
, &dockingWindow
));
1194 if (FAILED_UNEXPECTEDLY(hResult
))
1196 hResult
= baseBarSite
->QueryInterface(IID_PPV_ARG(IOleCommandTarget
, &oleCommandTarget
));
1197 if (FAILED_UNEXPECTEDLY(hResult
))
1199 V_VT(&vaIn
) = VT_UNKNOWN
;
1200 V_UNKNOWN(&vaIn
) = newBand
.p
;
1201 hResult
= oleCommandTarget
->Exec(&CGID_IDeskBand
, 1, 1, &vaIn
, NULL
);
1202 if (FAILED_UNEXPECTEDLY(hResult
))
1204 hResult
= dockingWindow
->ShowDW(TRUE
);
1205 if (FAILED_UNEXPECTEDLY(hResult
))
1210 HRESULT
CShellBrowser::NavigateToParent()
1212 LPITEMIDLIST newDirectory
;
1215 newDirectory
= ILClone(fCurrentDirectoryPIDL
);
1216 if (newDirectory
== NULL
)
1217 return E_OUTOFMEMORY
;
1218 ILRemoveLastID(newDirectory
);
1219 hResult
= BrowseToPIDL(newDirectory
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
1220 ILFree(newDirectory
);
1221 if (FAILED_UNEXPECTEDLY(hResult
))
1226 BOOL CALLBACK
AddFolderOptionsPage(HPROPSHEETPAGE thePage
, LPARAM lParam
)
1228 PROPSHEETHEADER
*sheetInfo
;
1230 sheetInfo
= (PROPSHEETHEADER
*)lParam
;
1231 if (sheetInfo
->nPages
>= folderOptionsPageCountMax
)
1233 sheetInfo
->phpage
[sheetInfo
->nPages
] = thePage
;
1234 sheetInfo
->nPages
++;
1238 HRESULT
CShellBrowser::DoFolderOptions()
1240 CComPtr
<IShellPropSheetExt
> folderOptionsSheet
;
1241 CComPtr
<IObjectWithSite
> objectWithSite
;
1242 PROPSHEETHEADER m_PropSheet
;
1243 HPROPSHEETPAGE m_psp
[folderOptionsPageCountMax
];
1244 // CComPtr<IGlobalFolderSettings> globalSettings;
1245 // SHELLSTATE2 shellState;
1248 memset(m_psp
, 0, sizeof(m_psp
));
1249 memset(&m_PropSheet
, 0, sizeof(m_PropSheet
));
1251 // create sheet object
1252 hResult
= CoCreateInstance(CLSID_ShellFldSetExt
, NULL
, CLSCTX_INPROC_SERVER
,
1253 IID_PPV_ARG(IShellPropSheetExt
, &folderOptionsSheet
));
1254 if (FAILED_UNEXPECTEDLY(hResult
))
1257 // must set site in order for Apply to all Folders on Advanced page to be enabled
1258 hResult
= folderOptionsSheet
->QueryInterface(IID_PPV_ARG(IObjectWithSite
, &objectWithSite
));
1259 if (SUCCEEDED(hResult
) && objectWithSite
.p
!= NULL
)
1260 hResult
= objectWithSite
->SetSite(static_cast<IDispatch
*>(this));
1261 m_PropSheet
.phpage
= m_psp
;
1264 hResult
= CoCreateInstance(CLSID_GlobalFolderSettings
, NULL
, CLSCTX_INPROC_SERVER
, IID_PPV_ARG(IGlobalFolderSettings
, &globalSettings
));
1265 if (FAILED_UNEXPECTEDLY(hResult
))
1267 hResult
= globalSettings
->Get(&shellState
, sizeof(shellState
));
1268 if (FAILED_UNEXPECTEDLY(hResult
))
1273 hResult
= folderOptionsSheet
->AddPages(AddFolderOptionsPage
, reinterpret_cast<LPARAM
>(&m_PropSheet
));
1274 if (FAILED_UNEXPECTEDLY(hResult
))
1277 if (fCurrentShellView
!= NULL
)
1279 hResult
= fCurrentShellView
->AddPropertySheetPages(
1280 0, AddFolderOptionsPage
, reinterpret_cast<LPARAM
>(&m_PropSheet
));
1281 if (FAILED_UNEXPECTEDLY(hResult
))
1286 m_PropSheet
.dwSize
= sizeof(PROPSHEETHEADER
);
1287 m_PropSheet
.dwFlags
= 0;
1288 m_PropSheet
.hwndParent
= m_hWnd
;
1289 m_PropSheet
.hInstance
= _AtlBaseModule
.GetResourceInstance();
1290 m_PropSheet
.pszCaption
= _T("Folder Options");
1291 m_PropSheet
.nStartPage
= 0;
1292 PropertySheet(&m_PropSheet
);
1296 LRESULT CALLBACK
CShellBrowser::WindowProc(HWND hWnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
1298 CShellBrowser
*pThis
= reinterpret_cast<CShellBrowser
*>(hWnd
);
1299 _ATL_MSG
msg(pThis
->m_hWnd
, uMsg
, wParam
, lParam
);
1301 const _ATL_MSG
*previousMessage
;
1303 WNDPROC saveWindowProc
;
1306 hWnd
= pThis
->m_hWnd
;
1307 previousMessage
= pThis
->m_pCurrentMsg
;
1308 pThis
->m_pCurrentMsg
= &msg
;
1310 CComPtr
<IMenuBand
> menuBand
;
1311 hResult
= pThis
->GetMenuBand(IID_PPV_ARG(IMenuBand
, &menuBand
));
1312 if (SUCCEEDED(hResult
) && menuBand
.p
!= NULL
)
1314 hResult
= menuBand
->TranslateMenuMessage(&msg
, &lResult
);
1315 if (hResult
== S_OK
)
1318 wParam
= msg
.wParam
;
1319 lParam
= msg
.lParam
;
1323 handled
= pThis
->ProcessWindowMessage(hWnd
, uMsg
, wParam
, lParam
, lResult
, 0);
1324 ATLASSERT(pThis
->m_pCurrentMsg
== &msg
);
1325 if (handled
== FALSE
)
1327 if (uMsg
== WM_NCDESTROY
)
1329 saveWindowProc
= reinterpret_cast<WNDPROC
>(GetWindowLongPtr(hWnd
, GWL_WNDPROC
));
1330 lResult
= pThis
->DefWindowProc(uMsg
, wParam
, lParam
);
1331 if (saveWindowProc
== reinterpret_cast<WNDPROC
>(GetWindowLongPtr(hWnd
, GWL_WNDPROC
)))
1332 SetWindowLongPtr(hWnd
, GWL_WNDPROC
, (LONG_PTR
)pThis
->m_pfnSuperWindowProc
);
1333 pThis
->m_dwState
|= WINSTATE_DESTROYED
;
1336 lResult
= pThis
->DefWindowProc(uMsg
, wParam
, lParam
);
1338 pThis
->m_pCurrentMsg
= previousMessage
;
1339 if (previousMessage
== NULL
&& (pThis
->m_dwState
& WINSTATE_DESTROYED
) != 0)
1341 pThis
->m_dwState
&= ~WINSTATE_DESTROYED
;
1342 pThis
->m_hWnd
= NULL
;
1343 pThis
->OnFinalMessage(hWnd
);
1348 void CShellBrowser::RepositionBars()
1354 GetClientRect(&clientRect
);
1356 if (fStatusBarVisible
&& fStatusBar
)
1358 ::GetWindowRect(fStatusBar
, &statusRect
);
1359 ::SetWindowPos(fStatusBar
, NULL
, clientRect
.left
, clientRect
.bottom
- (statusRect
.bottom
- statusRect
.top
),
1360 clientRect
.right
- clientRect
.left
,
1361 statusRect
.bottom
- statusRect
.top
, SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1362 clientRect
.bottom
-= statusRect
.bottom
- statusRect
.top
;
1365 for (x
= 0; x
< 3; x
++)
1367 HWND hwnd
= fClientBars
[x
].hwnd
;
1368 RECT borderSpace
= fClientBars
[x
].borderSpace
;
1369 if (hwnd
== NULL
&& fClientBars
[x
].clientBar
!= NULL
)
1371 IUnknown_GetWindow(fClientBars
[x
].clientBar
, &hwnd
);
1372 fClientBars
[x
].hwnd
= hwnd
;
1376 RECT toolbarRect
= clientRect
;
1377 if (borderSpace
.top
!= 0)
1379 toolbarRect
.bottom
= toolbarRect
.top
+ borderSpace
.top
;
1381 else if (borderSpace
.bottom
!= 0)
1383 toolbarRect
.top
= toolbarRect
.bottom
- borderSpace
.bottom
;
1385 else if (borderSpace
.left
!= 0)
1387 toolbarRect
.right
= toolbarRect
.left
+ borderSpace
.left
;
1389 else if (borderSpace
.right
!= 0)
1391 toolbarRect
.left
= toolbarRect
.right
- borderSpace
.right
;
1394 ::SetWindowPos(hwnd
, NULL
,
1397 toolbarRect
.right
- toolbarRect
.left
,
1398 toolbarRect
.bottom
- toolbarRect
.top
,
1399 SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1401 if (borderSpace
.top
!= 0)
1403 clientRect
.top
= toolbarRect
.bottom
;
1405 else if (borderSpace
.bottom
!= 0)
1407 clientRect
.bottom
= toolbarRect
.top
;
1409 else if (borderSpace
.left
!= 0)
1411 clientRect
.left
= toolbarRect
.right
;
1413 else if (borderSpace
.right
!= 0)
1415 clientRect
.right
= toolbarRect
.left
;
1419 ::SetWindowPos(fCurrentShellViewWindow
, NULL
, clientRect
.left
, clientRect
.top
,
1420 clientRect
.right
- clientRect
.left
,
1421 clientRect
.bottom
- clientRect
.top
, SWP_NOOWNERZORDER
| SWP_NOZORDER
);
1424 HRESULT
CShellBrowser::FireEvent(DISPID dispIdMember
, int argCount
, VARIANT
*arguments
)
1427 CComDynamicUnkArray
&vec
= IConnectionPointImpl
<CShellBrowser
, &DIID_DWebBrowserEvents2
>::m_vec
;
1428 CComDynamicUnkArray
&vec2
= IConnectionPointImpl
<CShellBrowser
, &DIID_DWebBrowserEvents
>::m_vec
;
1431 params
.rgvarg
= arguments
;
1432 params
.rgdispidNamedArgs
= NULL
;
1433 params
.cArgs
= argCount
;
1434 params
.cNamedArgs
= 0;
1435 IUnknown
** pp
= vec
.begin();
1436 while (pp
< vec
.end())
1440 CComPtr
<IDispatch
> theDispatch
;
1442 hResult
= (*pp
)->QueryInterface(IID_PPV_ARG(IDispatch
, &theDispatch
));
1443 hResult
= theDispatch
->Invoke(dispIdMember
, GUID_NULL
, 0, DISPATCH_METHOD
, ¶ms
, NULL
, NULL
, NULL
);
1448 while (pp
< vec2
.end())
1452 CComPtr
<IDispatch
> theDispatch
;
1454 hResult
= (*pp
)->QueryInterface(IID_PPV_ARG(IDispatch
, &theDispatch
));
1455 hResult
= theDispatch
->Invoke(dispIdMember
, GUID_NULL
, 0, DISPATCH_METHOD
, ¶ms
, NULL
, NULL
, NULL
);
1462 HRESULT
CShellBrowser::FireNavigateComplete(const wchar_t *newDirectory
)
1464 // these two variants intentionally to do use CComVariant because it would double free/release
1465 // or does not need to dispose at all
1468 CComBSTR
tempString(newDirectory
);
1470 V_VT(&varArgs
) = VT_BSTR
;
1471 V_BSTR(&varArgs
) = tempString
.m_str
;
1473 V_VT(&varArg
[0]) = VT_VARIANT
| VT_BYREF
;
1474 V_VARIANTREF(&varArg
[0]) = &varArgs
;
1475 V_VT(&varArg
[1]) = VT_DISPATCH
;
1476 V_DISPATCH(&varArg
[1]) = (IDispatch
*)this;
1478 return FireEvent(DISPID_NAVIGATECOMPLETE2
, 2, varArg
);
1481 HRESULT
CShellBrowser::FireCommandStateChange(bool newState
, int commandID
)
1485 V_VT(&varArg
[0]) = VT_BOOL
;
1486 V_BOOL(&varArg
[0]) = newState
? VARIANT_TRUE
: VARIANT_FALSE
;
1487 V_VT(&varArg
[1]) = VT_I4
;
1488 V_I4(&varArg
[1]) = commandID
;
1490 return FireEvent(DISPID_COMMANDSTATECHANGE
, 2, varArg
);
1493 HRESULT
CShellBrowser::FireCommandStateChangeAll()
1495 return FireCommandStateChange(false, -1);
1498 HRESULT
CShellBrowser::UpdateForwardBackState()
1500 CComPtr
<ITravelLog
> travelLog
;
1501 CComPtr
<ITravelEntry
> unusedEntry
;
1507 canGoForward
= false;
1508 hResult
= GetTravelLog(&travelLog
);
1509 if (FAILED_UNEXPECTEDLY(hResult
))
1511 hResult
= travelLog
->GetTravelEntry(static_cast<IDropTarget
*>(this), TLOG_BACK
, &unusedEntry
);
1512 if (SUCCEEDED(hResult
))
1515 unusedEntry
.Release();
1517 hResult
= travelLog
->GetTravelEntry(static_cast<IDropTarget
*>(this), TLOG_FORE
, &unusedEntry
);
1518 if (SUCCEEDED(hResult
))
1520 canGoForward
= true;
1521 unusedEntry
.Release();
1523 hResult
= FireCommandStateChange(canGoBack
, 2);
1524 hResult
= FireCommandStateChange(canGoForward
, 1);
1528 void CShellBrowser::UpdateGotoMenu(HMENU theMenu
)
1530 CComPtr
<ITravelLog
> travelLog
;
1532 MENUITEMINFO menuItemInfo
;
1535 DeleteMenuItems(theMenu
, IDM_GOTO_TRAVEL_FIRST
, IDM_GOTO_TRAVEL_LAST
);
1537 position
= GetMenuItemCount(theMenu
);
1538 hResult
= GetTravelLog(&travelLog
);
1539 if (FAILED_UNEXPECTEDLY(hResult
))
1541 hResult
= travelLog
->InsertMenuEntries(static_cast<IDropTarget
*>(this), theMenu
, position
,
1542 IDM_GOTO_TRAVEL_FIRSTTARGET
, IDM_GOTO_TRAVEL_LASTTARGET
, TLMENUF_BACKANDFORTH
| TLMENUF_CHECKCURRENT
);
1543 if (SUCCEEDED(hResult
))
1545 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1546 menuItemInfo
.fMask
= MIIM_TYPE
| MIIM_ID
;
1547 menuItemInfo
.fType
= MF_SEPARATOR
;
1548 menuItemInfo
.wID
= IDM_GOTO_TRAVEL_SEP
;
1549 InsertMenuItem(theMenu
, position
, TRUE
, &menuItemInfo
);
1553 void CShellBrowser::UpdateViewMenu(HMENU theMenu
)
1555 CComPtr
<IOleCommandTarget
> oleCommandTarget
;
1556 CComPtr
<ITravelLog
> travelLog
;
1558 OLECMD commandList
[5];
1559 HMENU toolbarMenuBar
;
1561 MENUITEMINFO menuItemInfo
;
1564 gotoMenu
= SHGetMenuFromID(theMenu
, FCIDM_MENU_EXPLORE
);
1565 if (gotoMenu
!= NULL
)
1566 UpdateGotoMenu(gotoMenu
);
1568 commandList
[0].cmdID
= ITID_TOOLBARBANDSHOWN
;
1569 commandList
[1].cmdID
= ITID_ADDRESSBANDSHOWN
;
1570 commandList
[2].cmdID
= ITID_LINKSBANDSHOWN
;
1571 commandList
[3].cmdID
= ITID_TOOLBARLOCKED
;
1572 commandList
[4].cmdID
= ITID_CUSTOMIZEENABLED
;
1574 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
1575 IID_PPV_ARG(IOleCommandTarget
, &oleCommandTarget
));
1576 if (SUCCEEDED(hResult
))
1577 hResult
= oleCommandTarget
->QueryStatus(&CGID_PrivCITCommands
, 5, commandList
, NULL
);
1578 if (FAILED_UNEXPECTEDLY(hResult
))
1579 DeleteMenu(theMenu
, IDM_VIEW_TOOLBARS
, MF_BYCOMMAND
);
1582 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1583 menuItemInfo
.fMask
= MIIM_SUBMENU
;
1584 GetMenuItemInfo(theMenu
, IDM_VIEW_TOOLBARS
, FALSE
, &menuItemInfo
);
1585 DestroyMenu(menuItemInfo
.hSubMenu
);
1587 toolbarMenuBar
= LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_CONTEXTMENU
));
1588 toolbarMenu
= GetSubMenu(toolbarMenuBar
, 0);
1589 RemoveMenu(toolbarMenuBar
, 0, MF_BYPOSITION
);
1590 DestroyMenu(toolbarMenuBar
);
1592 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_STANDARDBUTTONS
, commandList
[0].cmdf
);
1593 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_ADDRESSBAR
, commandList
[1].cmdf
& OLECMDF_ENABLED
);
1594 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_LINKSBAR
, commandList
[2].cmdf
& OLECMDF_ENABLED
);
1595 SHCheckMenuItem(toolbarMenu
, IDM_TOOLBARS_LOCKTOOLBARS
, commandList
[3].cmdf
& OLECMDF_ENABLED
);
1596 if ((commandList
[4].cmdf
& OLECMDF_ENABLED
) == 0)
1597 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_CUSTOMIZE
, MF_BYCOMMAND
);
1598 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_TEXTLABELS
, MF_BYCOMMAND
);
1599 DeleteMenu(toolbarMenu
, IDM_TOOLBARS_GOBUTTON
, MF_BYCOMMAND
);
1601 menuItemInfo
.cbSize
= sizeof(menuItemInfo
);
1602 menuItemInfo
.fMask
= MIIM_SUBMENU
;
1603 menuItemInfo
.hSubMenu
= toolbarMenu
;
1604 SetMenuItemInfo(theMenu
, IDM_VIEW_TOOLBARS
, FALSE
, &menuItemInfo
);
1606 SHCheckMenuItem(theMenu
, IDM_VIEW_STATUSBAR
, fStatusBarVisible
? TRUE
: FALSE
);
1609 bool IUnknownIsEqual(IUnknown
*int1
, IUnknown
*int2
)
1611 CComPtr
<IUnknown
> int1Retry
;
1612 CComPtr
<IUnknown
> int2Retry
;
1617 if (int1
== NULL
|| int2
== NULL
)
1619 hResult
= int1
->QueryInterface(IID_PPV_ARG(IUnknown
, &int1Retry
));
1620 if (FAILED_UNEXPECTEDLY(hResult
))
1622 hResult
= int2
->QueryInterface(IID_PPV_ARG(IUnknown
, &int2Retry
));
1623 if (FAILED_UNEXPECTEDLY(hResult
))
1625 if (int1Retry
== int2Retry
)
1630 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBorderDW(IUnknown
*punkObj
, LPRECT prcBorder
)
1632 static const INT excludeItems
[] = { 1, 1, 1, 0xa001, 0, 0 };
1634 RECT availableBounds
;
1636 GetEffectiveClientRect(m_hWnd
, &availableBounds
, excludeItems
);
1637 for (INT x
= 0; x
< 3; x
++)
1639 if (fClientBars
[x
].clientBar
.p
!= NULL
&& !IUnknownIsEqual(fClientBars
[x
].clientBar
, punkObj
))
1641 availableBounds
.top
+= fClientBars
[x
].borderSpace
.top
;
1642 availableBounds
.left
+= fClientBars
[x
].borderSpace
.left
;
1643 availableBounds
.bottom
-= fClientBars
[x
].borderSpace
.bottom
;
1644 availableBounds
.right
-= fClientBars
[x
].borderSpace
.right
;
1647 *prcBorder
= availableBounds
;
1651 HRESULT STDMETHODCALLTYPE
CShellBrowser::RequestBorderSpaceDW(IUnknown
* punkObj
, LPCBORDERWIDTHS pbw
)
1656 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetBorderSpaceDW(IUnknown
* punkObj
, LPCBORDERWIDTHS pbw
)
1658 for (INT x
= 0; x
< 3; x
++)
1660 if (IUnknownIsEqual(fClientBars
[x
].clientBar
, punkObj
))
1662 fClientBars
[x
].borderSpace
= *pbw
;
1663 // if this bar changed size, it cascades and forces all subsequent bars to resize
1668 return E_INVALIDARG
;
1671 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryStatus(const GUID
*pguidCmdGroup
,
1672 ULONG cCmds
, OLECMD prgCmds
[ ], OLECMDTEXT
*pCmdText
)
1674 CComPtr
<IOleCommandTarget
> commandTarget
;
1677 if (prgCmds
== NULL
)
1678 return E_INVALIDARG
;
1679 if (pguidCmdGroup
== NULL
)
1681 if (fCurrentShellView
.p
!= NULL
)
1683 hResult
= fCurrentShellView
->QueryInterface(IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
1684 if (SUCCEEDED(hResult
) && commandTarget
.p
!= NULL
)
1685 return commandTarget
->QueryStatus(NULL
, 1, prgCmds
, pCmdText
);
1694 else if (IsEqualIID(*pguidCmdGroup
, CGID_Explorer
))
1698 switch (prgCmds
->cmdID
)
1700 case 0x1c: // search
1701 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1703 case 0x1d: // history
1704 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1706 case 0x1e: // favorites
1707 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
;
1709 case 0x23: // folders
1710 prgCmds
->cmdf
= OLECMDF_SUPPORTED
| OLECMDF_ENABLED
| OLECMDF_LATCHED
;
1720 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellBrowser
))
1724 switch (prgCmds
->cmdID
)
1726 case 0xa022: // up level
1727 prgCmds
->cmdf
= OLECMDF_SUPPORTED
;
1728 if (fCurrentDirectoryPIDL
->mkid
.cb
!= 0)
1729 prgCmds
->cmdf
|= OLECMDF_ENABLED
;
1739 HRESULT STDMETHODCALLTYPE
CShellBrowser::Exec(const GUID
*pguidCmdGroup
, DWORD nCmdID
,
1740 DWORD nCmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
)
1744 if (IsEqualIID(*pguidCmdGroup
, CGID_Explorer
))
1749 hResult
= ShowBand(CLSID_ExplorerBand
, true);
1752 if (nCmdexecopt
== 1)
1754 // pvaIn is a VT_UNKNOWN with a band that is being hidden
1758 // update zones part of the status bar
1761 case 0x35: // don't do this, and the internet toolbar doesn't create a menu band
1762 V_VT(pvaOut
) = VT_INT_PTR
;
1763 V_INTREF(pvaOut
) = reinterpret_cast<INT
*>(
1764 LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_MAINMENU
)));
1767 // indicate if this cabinet was opened as a browser
1773 else if (IsEqualIID(*pguidCmdGroup
, CGID_InternetButtons
))
1782 else if (IsEqualIID(*pguidCmdGroup
, CGID_Theater
))
1787 // what is theater mode and why do we receive this?
1791 else if (IsEqualIID(*pguidCmdGroup
, CGID_MenuBand
))
1796 // initialize favorites menu
1800 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellDocView
))
1805 // refresh on toolbar clicked
1808 // tell the view if it should hide the task pane or not
1809 return (fClientBars
[BIVerticalBaseBar
].clientBar
.p
== NULL
) ? S_FALSE
: S_OK
;
1812 else if (IsEqualIID(*pguidCmdGroup
, CGID_ShellBrowser
))
1817 return NavigateToParent();
1820 else if (IsEqualIID(*pguidCmdGroup
, CGID_IExplorerToolbar
))
1825 return DoFolderOptions();
1828 else if (IsEqualIID(*pguidCmdGroup
, CGID_DefView
))
1833 // Reset All Folders option in Folder Options
1844 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetWindow(HWND
*lphwnd
)
1852 HRESULT STDMETHODCALLTYPE
CShellBrowser::ContextSensitiveHelp(BOOL fEnterMode
)
1857 HRESULT STDMETHODCALLTYPE
CShellBrowser::InsertMenusSB(HMENU hmenuShared
, LPOLEMENUGROUPWIDTHS lpMenuWidths
)
1859 HMENU mainMenu
= LoadMenu(_AtlBaseModule
.GetResourceInstance(), MAKEINTRESOURCE(IDM_CABINET_MAINMENU
));
1861 Shell_MergeMenus(hmenuShared
, mainMenu
, 0, 0, FCIDM_BROWSERLAST
, MM_SUBMENUSHAVEIDS
);
1863 int GCCU(itemCount3
) = GetMenuItemCount(hmenuShared
);
1866 DestroyMenu(mainMenu
);
1868 lpMenuWidths
->width
[0] = 2;
1869 lpMenuWidths
->width
[2] = 3;
1870 lpMenuWidths
->width
[4] = 1;
1874 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetMenuSB(HMENU hmenuShared
, HOLEMENU holemenuRes
, HWND hwndActiveObject
)
1876 CComPtr
<IShellMenu
> shellMenu
;
1879 if (hmenuShared
&& IsMenu(hmenuShared
) == FALSE
)
1881 hResult
= GetMenuBand(IID_PPV_ARG(IShellMenu
, &shellMenu
));
1882 if (FAILED_UNEXPECTEDLY(hResult
))
1884 hResult
= shellMenu
->SetMenu(hmenuShared
, NULL
, SMSET_DONTOWN
);
1885 if (FAILED_UNEXPECTEDLY(hResult
))
1887 fCurrentMenuBar
= hmenuShared
;
1891 HRESULT STDMETHODCALLTYPE
CShellBrowser::RemoveMenusSB(HMENU hmenuShared
)
1893 if (hmenuShared
== fCurrentMenuBar
)
1895 //DestroyMenu(fCurrentMenuBar);
1896 SetMenuSB(NULL
, NULL
, NULL
);
1901 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetStatusTextSB(LPCOLESTR pszStatusText
)
1906 ::SetWindowText(fStatusBar
, pszStatusText
);
1915 HRESULT STDMETHODCALLTYPE
CShellBrowser::EnableModelessSB(BOOL fEnable
)
1920 HRESULT STDMETHODCALLTYPE
CShellBrowser::TranslateAcceleratorSB(MSG
*pmsg
, WORD wID
)
1922 if (!::TranslateAcceleratorW(m_hWnd
, m_hAccel
, pmsg
))
1927 HRESULT STDMETHODCALLTYPE
CShellBrowser::BrowseObject(LPCITEMIDLIST pidl
, UINT wFlags
)
1929 return BrowseToPIDL(pidl
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
1932 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewStateStream(DWORD grfMode
, IStream
**ppStrm
)
1937 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetControlWindow(UINT id
, HWND
*lphwnd
)
1945 *lphwnd
= fToolbarProxy
.m_hWnd
;
1948 *lphwnd
= fStatusBar
;
1951 // find the directory browser and return it
1952 // this should be used only to determine if a tree is present
1955 // is this a progress dialog?
1961 HRESULT STDMETHODCALLTYPE
CShellBrowser::SendControlMsg(
1962 UINT id
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
, LRESULT
*pret
)
1971 result
= fToolbarProxy
.SendMessage(uMsg
, wParam
, lParam
);
1976 result
= SendMessage(fStatusBar
, uMsg
, wParam
, lParam
);
1984 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryActiveShellView(IShellView
**ppshv
)
1988 *ppshv
= fCurrentShellView
;
1989 if (fCurrentShellView
.p
!= NULL
)
1990 fCurrentShellView
.p
->AddRef();
1994 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnViewWindowActive(IShellView
*ppshv
)
1999 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetToolbarItems(LPTBBUTTON lpButtons
, UINT nButtons
, UINT uFlags
)
2004 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragEnter(
2005 IDataObject
*pDataObj
, DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2010 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragOver(DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2015 HRESULT STDMETHODCALLTYPE
CShellBrowser::DragLeave()
2020 HRESULT STDMETHODCALLTYPE
CShellBrowser::Drop(
2021 IDataObject
*pDataObj
, DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2026 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryService(REFGUID guidService
, REFIID riid
, void **ppvObject
)
2028 // view does a query for SID_STopLevelBrowser, IID_IShellBrowserService
2029 // the returned interface has a method GetPropertyBag on it
2030 if (IsEqualIID(guidService
, SID_STopLevelBrowser
))
2031 return this->QueryInterface(riid
, ppvObject
);
2032 if (IsEqualIID(guidService
, SID_SShellBrowser
))
2033 return this->QueryInterface(riid
, ppvObject
);
2034 if (IsEqualIID(guidService
, SID_ITargetFrame2
))
2035 return this->QueryInterface(riid
, ppvObject
);
2036 if (IsEqualIID(guidService
, SID_IWebBrowserApp
)) // without this, the internet toolbar won't reflect notifications
2037 return this->QueryInterface(riid
, ppvObject
);
2038 if (IsEqualIID(guidService
, SID_SProxyBrowser
))
2039 return this->QueryInterface(riid
, ppvObject
);
2040 if (IsEqualIID(guidService
, SID_IExplorerToolbar
))
2041 return fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(riid
, ppvObject
);
2042 if (IsEqualIID(riid
, IID_IShellBrowser
))
2043 return this->QueryInterface(riid
, ppvObject
);
2044 return E_NOINTERFACE
;
2047 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPropertyBag(long flags
, REFIID riid
, void **ppvObject
)
2049 if (ppvObject
== NULL
)
2055 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTypeInfoCount(UINT
*pctinfo
)
2060 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTypeInfo(UINT iTInfo
, LCID lcid
, ITypeInfo
**ppTInfo
)
2065 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetIDsOfNames(REFIID riid
, LPOLESTR
*rgszNames
,
2066 UINT cNames
, LCID lcid
, DISPID
*rgDispId
)
2071 HRESULT STDMETHODCALLTYPE
CShellBrowser::Invoke(DISPID dispIdMember
, REFIID riid
, LCID lcid
,
2072 WORD wFlags
, DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
2077 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetParentSite(IOleInPlaceSite
**ppipsite
)
2082 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetTitle(IShellView
*psv
, LPCWSTR pszName
)
2087 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTitle(IShellView
*psv
, LPWSTR pszName
, DWORD cchName
)
2092 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetOleObject(IOleObject
**ppobjv
)
2097 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetTravelLog(ITravelLog
**pptl
)
2101 // called by toolbar when displaying tooltips
2106 if (fTravelLog
.p
== NULL
)
2108 hResult
= CreateTravelLog(IID_PPV_ARG(ITravelLog
, &fTravelLog
));
2109 if (FAILED_UNEXPECTEDLY(hResult
))
2112 *pptl
= fTravelLog
.p
;
2113 fTravelLog
.p
->AddRef();
2117 HRESULT STDMETHODCALLTYPE
CShellBrowser::ShowControlWindow(UINT id
, BOOL fShow
)
2122 HRESULT STDMETHODCALLTYPE
CShellBrowser::IsControlWindowShown(UINT id
, BOOL
*pfShown
)
2127 HRESULT STDMETHODCALLTYPE
CShellBrowser::IEGetDisplayName(LPCITEMIDLIST pidl
, LPWSTR pwszName
, UINT uFlags
)
2132 HRESULT STDMETHODCALLTYPE
CShellBrowser::IEParseDisplayName(UINT uiCP
, LPCWSTR pwszPath
, LPITEMIDLIST
*ppidlOut
)
2137 HRESULT STDMETHODCALLTYPE
CShellBrowser::DisplayParseError(HRESULT hres
, LPCWSTR pwszPath
)
2142 HRESULT STDMETHODCALLTYPE
CShellBrowser::NavigateToPidl(LPCITEMIDLIST pidl
, DWORD grfHLNF
)
2147 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetNavigateState(BNSTATE bnstate
)
2152 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetNavigateState(BNSTATE
*pbnstate
)
2157 HRESULT STDMETHODCALLTYPE
CShellBrowser::NotifyRedirect(IShellView
*psv
, LPCITEMIDLIST pidl
, BOOL
*pfDidBrowse
)
2162 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateWindowList()
2167 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateBackForwardState()
2172 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetFlags(DWORD dwFlags
, DWORD dwFlagMask
)
2177 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetFlags(DWORD
*pdwFlags
)
2182 HRESULT STDMETHODCALLTYPE
CShellBrowser::CanNavigateNow()
2187 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPidl(LPITEMIDLIST
*ppidl
)
2189 // called by explorer bar to get current pidl
2192 *ppidl
= ILClone(fCurrentDirectoryPIDL
);
2196 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetReferrer(LPCITEMIDLIST pidl
)
2201 DWORD STDMETHODCALLTYPE
CShellBrowser::GetBrowserIndex()
2206 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBrowserByIndex(DWORD dwID
, IUnknown
**ppunk
)
2211 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetHistoryObject(IOleObject
**ppole
, IStream
**pstm
, IBindCtx
**ppbc
)
2213 if (ppole
== NULL
|| pstm
== NULL
|| ppbc
== NULL
)
2214 return E_INVALIDARG
;
2215 *ppole
= fHistoryObject
;
2216 if (fHistoryObject
!= NULL
)
2217 fHistoryObject
->AddRef();
2218 *pstm
= fHistoryStream
;
2219 if (fHistoryStream
!= NULL
)
2220 fHistoryStream
->AddRef();
2221 *ppbc
= fHistoryBindContext
;
2222 if (fHistoryBindContext
!= NULL
)
2223 fHistoryBindContext
->AddRef();
2224 fHistoryObject
= NULL
;
2225 fHistoryStream
= NULL
;
2226 fHistoryBindContext
= NULL
;
2232 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetHistoryObject(IOleObject
*pole
, BOOL fIsLocalAnchor
)
2237 HRESULT STDMETHODCALLTYPE
CShellBrowser::CacheOLEServer(IOleObject
*pole
)
2242 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetSetCodePage(VARIANT
*pvarIn
, VARIANT
*pvarOut
)
2247 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnHttpEquiv(
2248 IShellView
*psv
, BOOL fDone
, VARIANT
*pvarargIn
, VARIANT
*pvarargOut
)
2253 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPalette(HPALETTE
*hpal
)
2258 HRESULT STDMETHODCALLTYPE
CShellBrowser::RegisterWindow(BOOL fForceRegister
, int swc
)
2263 LRESULT STDMETHODCALLTYPE
CShellBrowser::WndProcBS(HWND hwnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2268 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetAsDefFolderSettings()
2273 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewRect(RECT
*prc
)
2278 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnSize(WPARAM wParam
)
2283 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnCreate(struct tagCREATESTRUCTW
*pcs
)
2285 m_hAccel
= LoadAcceleratorsW(GetModuleHandle(L
"browseui.dll"), MAKEINTRESOURCEW(256));
2289 LRESULT STDMETHODCALLTYPE
CShellBrowser::OnCommand(WPARAM wParam
, LPARAM lParam
)
2294 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnDestroy()
2299 LRESULT STDMETHODCALLTYPE
CShellBrowser::OnNotify(struct tagNMHDR
*pnm
)
2304 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnSetFocus()
2309 HRESULT STDMETHODCALLTYPE
CShellBrowser::OnFrameWindowActivateBS(BOOL fActive
)
2314 HRESULT STDMETHODCALLTYPE
CShellBrowser::ReleaseShellView()
2319 HRESULT STDMETHODCALLTYPE
CShellBrowser::ActivatePendingView()
2324 HRESULT STDMETHODCALLTYPE
CShellBrowser::CreateViewWindow(
2325 IShellView
*psvNew
, IShellView
*psvOld
, LPRECT prcView
, HWND
*phwnd
)
2330 HRESULT STDMETHODCALLTYPE
CShellBrowser::CreateBrowserPropSheetExt(REFIID riid
, void **ppv
)
2335 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetViewWindow(HWND
*phwndView
)
2340 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetBaseBrowserData(LPCBASEBROWSERDATA
*pbbd
)
2345 LPBASEBROWSERDATA STDMETHODCALLTYPE
CShellBrowser::PutBaseBrowserData()
2350 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeTravelLog(ITravelLog
*ptl
, DWORD dw
)
2355 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetTopBrowser()
2360 HRESULT STDMETHODCALLTYPE
CShellBrowser::Offline(int iCmd
)
2365 HRESULT STDMETHODCALLTYPE
CShellBrowser::AllowViewResize(BOOL f
)
2370 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetActivateState(UINT u
)
2375 HRESULT STDMETHODCALLTYPE
CShellBrowser::UpdateSecureLockIcon(int eSecureLock
)
2380 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeDownloadManager()
2385 HRESULT STDMETHODCALLTYPE
CShellBrowser::InitializeTransitionSite()
2390 HRESULT STDMETHODCALLTYPE
CShellBrowser::_Initialize(HWND hwnd
, IUnknown
*pauto
)
2395 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CancelPendingNavigationAsync()
2400 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CancelPendingView()
2405 HRESULT STDMETHODCALLTYPE
CShellBrowser::_MaySaveChanges()
2410 HRESULT STDMETHODCALLTYPE
CShellBrowser::_PauseOrResumeView(BOOL fPaused
)
2415 HRESULT STDMETHODCALLTYPE
CShellBrowser::_DisableModeless()
2420 HRESULT STDMETHODCALLTYPE
CShellBrowser::_NavigateToPidl(LPCITEMIDLIST pidl
, DWORD grfHLNF
, DWORD dwFlags
)
2425 HRESULT STDMETHODCALLTYPE
CShellBrowser::_TryShell2Rename(IShellView
*psv
, LPCITEMIDLIST pidlNew
)
2430 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SwitchActivationNow()
2435 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ExecChildren(IUnknown
*punkBar
, BOOL fBroadcast
,
2436 const GUID
*pguidCmdGroup
, DWORD nCmdID
, DWORD nCmdexecopt
, VARIANTARG
*pvarargIn
, VARIANTARG
*pvarargOut
)
2441 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SendChildren(
2442 HWND hwndBar
, BOOL fBroadcast
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2447 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetFolderSetData(struct tagFolderSetData
*pfsd
)
2452 HRESULT STDMETHODCALLTYPE
CShellBrowser::_OnFocusChange(UINT itb
)
2457 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_ShowHideChildWindows(BOOL fChildOnly
)
2462 UINT STDMETHODCALLTYPE
CShellBrowser::_get_itbLastFocus()
2467 HRESULT STDMETHODCALLTYPE
CShellBrowser::_put_itbLastFocus(UINT itbLastFocus
)
2472 HRESULT STDMETHODCALLTYPE
CShellBrowser::_UIActivateView(UINT uState
)
2477 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetViewBorderRect(RECT
*prc
)
2482 HRESULT STDMETHODCALLTYPE
CShellBrowser::_UpdateViewRectSize()
2487 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeNextBorder(UINT itb
)
2492 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeView()
2497 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetEffectiveClientArea(LPRECT lprectBorder
, HMONITOR hmon
)
2502 IStream
*STDMETHODCALLTYPE
CShellBrowser::v_GetViewStream(LPCITEMIDLIST pidl
, DWORD grfMode
, LPCWSTR pwszName
)
2507 LRESULT STDMETHODCALLTYPE
CShellBrowser::ForwardViewMsg(UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
2512 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetAcceleratorMenu(HACCEL hacc
)
2517 int STDMETHODCALLTYPE
CShellBrowser::_GetToolbarCount()
2522 LPTOOLBARITEM STDMETHODCALLTYPE
CShellBrowser::_GetToolbarItem(int itb
)
2527 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SaveToolbars(IStream
*pstm
)
2532 HRESULT STDMETHODCALLTYPE
CShellBrowser::_LoadToolbars(IStream
*pstm
)
2537 HRESULT STDMETHODCALLTYPE
CShellBrowser::_CloseAndReleaseToolbars(BOOL fClose
)
2542 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_MayGetNextToolbarFocus(
2543 LPMSG lpMsg
, UINT itbNext
, int citb
, LPTOOLBARITEM
*pptbi
, HWND
*phwnd
)
2548 HRESULT STDMETHODCALLTYPE
CShellBrowser::_ResizeNextBorderHelper(UINT itb
, BOOL bUseHmonitor
)
2553 UINT STDMETHODCALLTYPE
CShellBrowser::_FindTBar(IUnknown
*punkSrc
)
2558 HRESULT STDMETHODCALLTYPE
CShellBrowser::_SetFocus(LPTOOLBARITEM ptbi
, HWND hwnd
, LPMSG lpMsg
)
2563 extern HRESULT
IUnknown_HasFocusIO(IUnknown
* punk
);
2564 extern HRESULT
IUnknown_TranslateAcceleratorIO(IUnknown
* punk
, MSG
* pmsg
);
2565 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_MayTranslateAccelerator(MSG
*pmsg
)
2567 for (int i
= 0; i
< 3; i
++)
2569 if (IUnknown_TranslateAcceleratorIO(fClientBars
[i
].clientBar
, pmsg
) == S_OK
)
2573 if (!fCurrentShellView
)
2576 return fCurrentShellView
->TranslateAcceleratorW(pmsg
);
2579 HRESULT STDMETHODCALLTYPE
CShellBrowser::_GetBorderDWHelper(IUnknown
*punkSrc
, LPRECT lprectBorder
, BOOL bUseHmonitor
)
2584 HRESULT STDMETHODCALLTYPE
CShellBrowser::v_CheckZoneCrossing(LPCITEMIDLIST pidl
)
2589 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoBack()
2591 CComPtr
<ITravelLog
> travelLog
;
2594 hResult
= GetTravelLog(&travelLog
);
2595 if (FAILED_UNEXPECTEDLY(hResult
))
2597 return travelLog
->Travel(static_cast<IDropTarget
*>(this), TLOG_BACK
);
2600 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoForward()
2602 CComPtr
<ITravelLog
> travelLog
;
2605 hResult
= GetTravelLog(&travelLog
);
2606 if (FAILED_UNEXPECTEDLY(hResult
))
2608 return travelLog
->Travel(static_cast<IDropTarget
*>(this), TLOG_FORE
);
2611 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoHome()
2616 HRESULT STDMETHODCALLTYPE
CShellBrowser::GoSearch()
2621 HRESULT STDMETHODCALLTYPE
CShellBrowser::Navigate(BSTR URL
, VARIANT
*Flags
,
2622 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
2627 HRESULT STDMETHODCALLTYPE
CShellBrowser::Refresh()
2631 V_VT(&level
) = VT_I4
;
2633 return Refresh2(&level
);
2636 HRESULT STDMETHODCALLTYPE
CShellBrowser::Refresh2(VARIANT
*Level
)
2638 CComPtr
<IOleCommandTarget
> oleCommandTarget
;
2641 hResult
= fCurrentShellView
->QueryInterface(IID_PPV_ARG(IOleCommandTarget
, &oleCommandTarget
));
2642 if (FAILED_UNEXPECTEDLY(hResult
))
2644 return oleCommandTarget
->Exec(NULL
, 22, 1, Level
, NULL
);
2647 HRESULT STDMETHODCALLTYPE
CShellBrowser::Stop()
2652 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Application(IDispatch
**ppDisp
)
2657 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Parent(IDispatch
**ppDisp
)
2662 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Container(IDispatch
**ppDisp
)
2667 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Document(IDispatch
**ppDisp
)
2672 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_TopLevelContainer(VARIANT_BOOL
*pBool
)
2677 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Type(BSTR
*Type
)
2684 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Left(long *pl
)
2689 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Left(long Left
)
2694 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Top(long *pl
)
2699 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Top(long Top
)
2704 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Width(long *pl
)
2709 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Width(long Width
)
2714 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Height(long *pl
)
2719 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Height(long Height
)
2726 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_LocationName(BSTR
*LocationName
)
2731 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_LocationURL(BSTR
*LocationURL
)
2736 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Busy(VARIANT_BOOL
*pBool
)
2741 HRESULT STDMETHODCALLTYPE
CShellBrowser::Quit()
2746 HRESULT STDMETHODCALLTYPE
CShellBrowser::ClientToWindow(int *pcx
, int *pcy
)
2751 HRESULT STDMETHODCALLTYPE
CShellBrowser::PutProperty(BSTR Property
, VARIANT vtValue
)
2756 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetProperty(BSTR Property
, VARIANT
*pvtValue
)
2761 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Name(BSTR
*Name
)
2766 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_HWND(SHANDLE_PTR
*pHWND
)
2771 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_FullName(BSTR
*FullName
)
2776 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Path(BSTR
*Path
)
2781 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Visible(VARIANT_BOOL
*pBool
)
2786 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Visible(VARIANT_BOOL Value
)
2791 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_StatusBar(VARIANT_BOOL
*pBool
)
2796 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_StatusBar(VARIANT_BOOL Value
)
2801 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_StatusText(BSTR
*StatusText
)
2806 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_StatusText(BSTR StatusText
)
2811 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_ToolBar(int *Value
)
2816 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_ToolBar(int Value
)
2821 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_MenuBar(VARIANT_BOOL
*Value
)
2826 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_MenuBar(VARIANT_BOOL Value
)
2831 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_FullScreen(VARIANT_BOOL
*pbFullScreen
)
2836 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_FullScreen(VARIANT_BOOL bFullScreen
)
2841 HRESULT STDMETHODCALLTYPE
CShellBrowser::Navigate2(VARIANT
*URL
, VARIANT
*Flags
,
2842 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
2847 // called from drive combo box to navigate to a directory
2848 if (V_VT(URL
) != (VT_ARRAY
| VT_UI1
))
2849 return E_INVALIDARG
;
2850 if (V_ARRAY(URL
)->cDims
!= 1 || V_ARRAY(URL
)->cbElements
!= 1)
2851 return E_INVALIDARG
;
2852 pidl
= (LPITEMIDLIST
)V_ARRAY(URL
)->pvData
;
2853 hResult
= BrowseToPIDL((LPITEMIDLIST
)pidl
, BTP_UPDATE_CUR_HISTORY
| BTP_UPDATE_NEXT_HISTORY
);
2854 if (FAILED_UNEXPECTEDLY(hResult
))
2859 HRESULT STDMETHODCALLTYPE
CShellBrowser::QueryStatusWB(OLECMDID cmdID
, OLECMDF
*pcmdf
)
2864 HRESULT STDMETHODCALLTYPE
CShellBrowser::ExecWB(OLECMDID cmdID
, OLECMDEXECOPT cmdexecopt
,
2865 VARIANT
*pvaIn
, VARIANT
*pvaOut
)
2870 HRESULT STDMETHODCALLTYPE
CShellBrowser::ShowBrowserBar(VARIANT
*pvaClsid
, VARIANT
*pvarShow
, VARIANT
*pvarSize
)
2875 // called to show search bar
2876 if (V_VT(pvaClsid
) != VT_BSTR
)
2877 return E_INVALIDARG
;
2878 CLSIDFromString(V_BSTR(pvaClsid
), &classID
);
2879 // TODO: properly compute the value of vertical
2881 return ShowBand(classID
, vertical
);
2884 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_ReadyState(READYSTATE
*plReadyState
)
2889 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Offline(VARIANT_BOOL
*pbOffline
)
2894 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Offline(VARIANT_BOOL bOffline
)
2899 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Silent(VARIANT_BOOL
*pbSilent
)
2904 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Silent(VARIANT_BOOL bSilent
)
2909 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_RegisterAsBrowser(VARIANT_BOOL
*pbRegister
)
2914 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_RegisterAsBrowser(VARIANT_BOOL bRegister
)
2919 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_RegisterAsDropTarget(VARIANT_BOOL
*pbRegister
)
2924 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_RegisterAsDropTarget(VARIANT_BOOL bRegister
)
2929 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_TheaterMode(VARIANT_BOOL
*pbRegister
)
2934 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_TheaterMode(VARIANT_BOOL bRegister
)
2939 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_AddressBar(VARIANT_BOOL
*Value
)
2944 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_AddressBar(VARIANT_BOOL Value
)
2949 HRESULT STDMETHODCALLTYPE
CShellBrowser::get_Resizable(VARIANT_BOOL
*Value
)
2954 HRESULT STDMETHODCALLTYPE
CShellBrowser::put_Resizable(VARIANT_BOOL Value
)
2959 HRESULT STDMETHODCALLTYPE
CShellBrowser::FindWindowByIndex(DWORD dwID
, IUnknown
**ppunk
)
2964 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetWindowData(IStream
*pStream
, LPWINDOWDATA pWinData
)
2966 if (pWinData
== NULL
)
2969 pWinData
->dwWindowID
= -1;
2971 pWinData
->pidl
= ILClone(fCurrentDirectoryPIDL
);
2972 pWinData
->lpszUrl
= NULL
;
2973 pWinData
->lpszUrlLocation
= NULL
;
2974 pWinData
->lpszTitle
= NULL
;
2978 HRESULT STDMETHODCALLTYPE
CShellBrowser::LoadHistoryPosition(LPWSTR pszUrlLocation
, DWORD dwPosition
)
2983 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetClassID(CLSID
*pClassID
)
2988 HRESULT STDMETHODCALLTYPE
CShellBrowser::LoadHistory(IStream
*pStream
, IBindCtx
*pbc
)
2990 CComPtr
<IPersistHistory
> viewPersistHistory
;
2991 CComPtr
<IOleObject
> viewHistoryObject
;
2992 persistState oldState
;
2997 hResult
= pStream
->Read(&oldState
, sizeof(oldState
), &numRead
);
2998 if (FAILED_UNEXPECTEDLY(hResult
))
3000 if (numRead
!= sizeof(oldState
) || oldState
.dwSize
!= sizeof(oldState
))
3002 if (oldState
.browseType
!= 2)
3004 pidl
= static_cast<LPITEMIDLIST
>(CoTaskMemAlloc(oldState
.pidlSize
));
3006 return E_OUTOFMEMORY
;
3007 hResult
= pStream
->Read(pidl
, oldState
.pidlSize
, &numRead
);
3008 if (FAILED_UNEXPECTEDLY(hResult
))
3013 if (numRead
!= oldState
.pidlSize
)
3018 hResult
= CoCreateInstance(oldState
.persistClass
, NULL
, CLSCTX_LOCAL_SERVER
| CLSCTX_INPROC_SERVER
,
3019 IID_PPV_ARG(IOleObject
, &viewHistoryObject
));
3020 fHistoryObject
= viewHistoryObject
;
3021 fHistoryStream
= pStream
;
3022 fHistoryBindContext
= pbc
;
3023 hResult
= BrowseToPIDL(pidl
, BTP_UPDATE_CUR_HISTORY
);
3024 fHistoryObject
= NULL
;
3025 fHistoryStream
= NULL
;
3026 fHistoryBindContext
= NULL
;
3028 if (FAILED_UNEXPECTEDLY(hResult
))
3033 HRESULT STDMETHODCALLTYPE
CShellBrowser::SaveHistory(IStream
*pStream
)
3035 CComPtr
<IPersistHistory
> viewPersistHistory
;
3036 persistState newState
;
3039 hResult
= fCurrentShellView
->GetItemObject(
3040 SVGIO_BACKGROUND
, IID_PPV_ARG(IPersistHistory
, &viewPersistHistory
));
3041 memset(&newState
, 0, sizeof(newState
));
3042 newState
.dwSize
= sizeof(newState
);
3043 newState
.browseType
= 2;
3044 newState
.browserIndex
= GetBrowserIndex();
3045 if (viewPersistHistory
.p
!= NULL
)
3047 hResult
= viewPersistHistory
->GetClassID(&newState
.persistClass
);
3048 if (FAILED_UNEXPECTEDLY(hResult
))
3051 newState
.pidlSize
= ILGetSize(fCurrentDirectoryPIDL
);
3052 hResult
= pStream
->Write(&newState
, sizeof(newState
), NULL
);
3053 if (FAILED_UNEXPECTEDLY(hResult
))
3055 hResult
= pStream
->Write(fCurrentDirectoryPIDL
, newState
.pidlSize
, NULL
);
3056 if (FAILED_UNEXPECTEDLY(hResult
))
3058 if (viewPersistHistory
.p
!= NULL
)
3060 hResult
= viewPersistHistory
->SaveHistory(pStream
);
3061 if (FAILED_UNEXPECTEDLY(hResult
))
3067 HRESULT STDMETHODCALLTYPE
CShellBrowser::SetPositionCookie(DWORD dwPositioncookie
)
3072 HRESULT STDMETHODCALLTYPE
CShellBrowser::GetPositionCookie(DWORD
*pdwPositioncookie
)
3077 LRESULT
CShellBrowser::OnCreate(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3079 OnCreate(reinterpret_cast<LPCREATESTRUCT
> (lParam
));
3083 LRESULT
CShellBrowser::OnDestroy(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3086 // TODO: rip down everything
3088 fCurrentShellView
->DestroyViewWindow();
3089 fCurrentShellView
->UIActivate(SVUIA_DEACTIVATE
);
3090 ReleaseCComPtrExpectZero(fCurrentShellView
);
3092 for (int i
= 0; i
< 3; i
++)
3094 if (fClientBars
[i
].clientBar
== NULL
)
3096 IDockingWindow
* pdw
;
3097 hr
= fClientBars
[i
].clientBar
->QueryInterface(IID_PPV_ARG(IDockingWindow
, &pdw
));
3098 if (FAILED_UNEXPECTEDLY(hr
))
3103 ReleaseCComPtrExpectZero(fClientBars
[i
].clientBar
);
3105 ReleaseCComPtrExpectZero(fTravelLog
);
3107 fCurrentShellFolder
.Release();
3108 ILFree(fCurrentDirectoryPIDL
);
3109 ::DestroyWindow(fStatusBar
);
3110 DestroyMenu(fCurrentMenuBar
);
3116 LRESULT
CShellBrowser::OnSize(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3118 CComPtr
<IDockingWindow
> dockingWindow
;
3119 RECT availableBounds
;
3120 static const INT excludeItems
[] = {1, 1, 1, 0xa001, 0, 0};
3123 if (wParam
!= SIZE_MINIMIZED
)
3125 GetEffectiveClientRect(m_hWnd
, &availableBounds
, excludeItems
);
3126 for (INT x
= 0; x
< 3; x
++)
3128 if (fClientBars
[x
].clientBar
!= NULL
)
3130 hResult
= fClientBars
[x
].clientBar
->QueryInterface(
3131 IID_PPV_ARG(IDockingWindow
, &dockingWindow
));
3132 if (SUCCEEDED(hResult
) && dockingWindow
!= NULL
)
3134 hResult
= dockingWindow
->ResizeBorderDW(
3135 &availableBounds
, static_cast<IDropTarget
*>(this), TRUE
);
3145 LRESULT
CShellBrowser::OnInitMenuPopup(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3148 LPARAM menuIndex
= lParam
;
3150 theMenu
= reinterpret_cast<HMENU
>(wParam
);
3152 if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_FILE
))
3156 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_EDIT
))
3160 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_VIEW
))
3162 UpdateViewMenu(theMenu
);
3165 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_FAVORITES
))
3169 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_TOOLS
))
3173 else if (theMenu
== SHGetMenuFromID(fCurrentMenuBar
, FCIDM_MENU_HELP
))
3178 LRESULT ret
= RelayMsgToShellView(uMsg
, wParam
, menuIndex
, bHandled
);
3183 LRESULT
CShellBrowser::RelayMsgToShellView(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3185 if (fCurrentShellViewWindow
!= NULL
)
3186 return SendMessage(fCurrentShellViewWindow
, uMsg
, wParam
, lParam
);
3190 LRESULT
CShellBrowser::OnClose(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3195 LRESULT
CShellBrowser::OnFolderOptions(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3199 hResult
= DoFolderOptions();
3203 LRESULT
CShellBrowser::OnMapNetworkDrive(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3206 WNetConnectionDialog(m_hWnd
, RESOURCETYPE_DISK
);
3207 #endif /* __REACTOS__ */
3211 LRESULT
CShellBrowser::OnDisconnectNetworkDrive(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3214 WNetDisconnectDialog(m_hWnd
, RESOURCETYPE_DISK
);
3215 #endif /* __REACTOS__ */
3219 LRESULT
CShellBrowser::OnAboutReactOS(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3221 ShellAbout(m_hWnd
, _T("ReactOS"), _T(""), NULL
);
3225 LRESULT
CShellBrowser::OnGoBack(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3233 LRESULT
CShellBrowser::OnGoForward(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3237 hResult
= GoForward();
3241 LRESULT
CShellBrowser::OnGoUpLevel(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3245 hResult
= NavigateToParent();
3249 LRESULT
CShellBrowser::OnGoHome(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3257 LRESULT
CShellBrowser::OnBackspace(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3261 // FIXME: This does not appear to be what windows does.
3262 hResult
= NavigateToParent();
3266 LRESULT
CShellBrowser::OnIsThisLegal(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3270 typedef HRESULT (WINAPI
*PSHOpenNewFrame
)(LPITEMIDLIST pidl
, IUnknown
*b
, long c
, long d
);
3271 PSHOpenNewFrame Func
= NULL
;
3272 HMODULE Module
= GetModuleHandle(TEXT("browseui.dll"));
3274 Func
= reinterpret_cast<PSHOpenNewFrame
>(GetProcAddress(Module
, (LPCSTR
) 103));
3277 LPITEMIDLIST desktopPIDL
;
3279 hResult
= SHGetFolderLocation(NULL
, CSIDL_DESKTOP
, NULL
, 0, &desktopPIDL
);
3280 if (SUCCEEDED(hResult
))
3282 hResult
= Func(desktopPIDL
, NULL
, -1, 1);
3288 LRESULT
CShellBrowser::OnToggleStatusBarVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3290 fStatusBarVisible
= !fStatusBarVisible
;
3291 // TODO: trigger a relayout of contained items
3295 LRESULT
CShellBrowser::OnToggleToolbarLock(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3297 CComPtr
<IOleCommandTarget
> commandTarget
;
3300 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3301 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3302 if (FAILED_UNEXPECTEDLY(hResult
))
3304 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_TOOLBARLOCKED
, 0, NULL
, NULL
);
3308 LRESULT
CShellBrowser::OnToggleToolbarBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3310 CComPtr
<IOleCommandTarget
> commandTarget
;
3313 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3314 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3315 if (FAILED_UNEXPECTEDLY(hResult
))
3317 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_TOOLBARBANDSHOWN
, 0, NULL
, NULL
);
3321 LRESULT
CShellBrowser::OnToggleAddressBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3323 CComPtr
<IOleCommandTarget
> commandTarget
;
3326 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3327 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3328 if (FAILED_UNEXPECTEDLY(hResult
))
3330 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_ADDRESSBANDSHOWN
, 0, NULL
, NULL
);
3334 LRESULT
CShellBrowser::OnToggleLinksBandVisible(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3336 CComPtr
<IOleCommandTarget
> commandTarget
;
3339 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3340 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3341 if (FAILED_UNEXPECTEDLY(hResult
))
3343 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_LINKSBANDSHOWN
, 0, NULL
, NULL
);
3347 LRESULT
CShellBrowser::OnToggleTextLabels(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3349 CComPtr
<IOleCommandTarget
> commandTarget
;
3352 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3353 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3354 if (FAILED_UNEXPECTEDLY(hResult
))
3356 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_TEXTLABELS
, 0, NULL
, NULL
);
3360 LRESULT
CShellBrowser::OnToolbarCustomize(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3362 CComPtr
<IOleCommandTarget
> commandTarget
;
3365 hResult
= fClientBars
[BIInternetToolbar
].clientBar
->QueryInterface(
3366 IID_PPV_ARG(IOleCommandTarget
, &commandTarget
));
3367 if (FAILED_UNEXPECTEDLY(hResult
))
3369 hResult
= commandTarget
->Exec(&CGID_PrivCITCommands
, ITID_CUSTOMIZEENABLED
, 0, NULL
, NULL
);
3373 LRESULT
CShellBrowser::OnGoTravel(WORD wNotifyCode
, WORD wID
, HWND hWndCtl
, BOOL
&bHandled
)
3378 LRESULT
CShellBrowser::RelayCommands(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, BOOL
&bHandled
)
3380 if (HIWORD(wParam
) == 0 && LOWORD(wParam
) < FCIDM_SHVIEWLAST
&& fCurrentShellViewWindow
!= NULL
)
3381 return SendMessage(fCurrentShellViewWindow
, uMsg
, wParam
, lParam
);
3385 static HRESULT
ExplorerMessageLoop(IEThreadParamBlock
* parameters
)
3387 CComPtr
<CShellBrowser
> theCabinet
;
3392 // Tell the thread ref we are using it.
3393 if (parameters
&& parameters
->offsetF8
)
3394 parameters
->offsetF8
->AddRef();
3396 ATLTRY(theCabinet
= new CComObject
<CShellBrowser
>);
3397 if (theCabinet
== NULL
)
3399 return E_OUTOFMEMORY
;
3402 hResult
= theCabinet
->Initialize(parameters
->directoryPIDL
, 0, 0, 0);
3403 if (FAILED_UNEXPECTEDLY(hResult
))
3404 return E_OUTOFMEMORY
;
3406 while ((Ret
= GetMessage(&Msg
, NULL
, 0, 0)) != 0)
3410 // Error: continue or exit?
3414 if (Msg
.message
== WM_QUIT
)
3417 if (theCabinet
->v_MayTranslateAccelerator(&Msg
) != S_OK
)
3419 TranslateMessage(&Msg
);
3420 DispatchMessage(&Msg
);
3424 int nrc
= theCabinet
->Release();
3427 DbgPrint("WARNING: There are %d references to the CShellBrowser active or leaked.\n", nrc
);
3430 theCabinet
.Detach();
3432 // Tell the thread ref we are not using it anymore.
3433 if (parameters
&& parameters
->offsetF8
)
3434 parameters
->offsetF8
->Release();
3439 DWORD WINAPI
BrowserThreadProc(LPVOID lpThreadParameter
)
3442 IEThreadParamBlock
* parameters
= (IEThreadParamBlock
*) lpThreadParameter
;
3444 OleInitialize(NULL
);
3446 ATLTRY(hr
= ExplorerMessageLoop(parameters
));
3450 SHDestroyIETHREADPARAM(parameters
);