3 * LICENSE: GPL - See COPYING in the top level directory
4 * FILE: dll/win32/shell32/shv_item_new.c
5 * PURPOSE: provides default context menu implementation
6 * PROGRAMMERS: Johannes Anderwald (johannes.anderwald@reactos.org)
13 //fixme: this isn't in wine's shlwapi header, and the definition doesnt match the
14 // windows headers. When wine's header and lib are fixed this can be removed.
15 DWORD WINAPI
SHAnsiToUnicode(LPCSTR lpSrcStr
, LPWSTR lpDstStr
, int iLen
);
18 WINE_DEFAULT_DEBUG_CHANNEL(dmenu
);
20 typedef struct _DynamicShellEntry_
26 struct _DynamicShellEntry_
*pNext
;
27 } DynamicShellEntry
, *PDynamicShellEntry
;
29 typedef struct _StaticShellEntry_
33 struct _StaticShellEntry_
*pNext
;
34 } StaticShellEntry
, *PStaticShellEntry
;
38 // verbs for InvokeCommandInfo
40 struct _StaticInvokeCommandMap_
44 } g_StaticInvokeCmdMap
[] =
46 { "RunAs", 0 }, // Unimplemented
47 { "Print", 0 }, // Unimplemented
48 { "Preview", 0 }, // Unimplemented
49 { "Open", FCIDM_SHVIEW_OPEN
},
50 { CMDSTR_NEWFOLDERA
, FCIDM_SHVIEW_NEWFOLDER
},
51 { CMDSTR_VIEWLISTA
, FCIDM_SHVIEW_LISTVIEW
},
52 { CMDSTR_VIEWDETAILSA
, FCIDM_SHVIEW_REPORTVIEW
}
56 class CDefaultContextMenu
:
57 public CComObjectRootEx
<CComMultiThreadModelNoCS
>,
59 public IObjectWithSite
62 CComPtr
<IUnknown
> m_site
;
63 CComPtr
<IShellFolder
> m_psf
;
64 CComPtr
<IContextMenuCB
> m_pmcb
;
65 LPFNDFMCALLBACK m_pfnmcb
;
67 PCUITEMID_CHILD_ARRAY m_apidl
;
68 CComPtr
<IDataObject
> m_pDataObj
;
71 PIDLIST_ABSOLUTE m_pidlFolder
;
72 DWORD m_bGroupPolicyActive
;
73 PDynamicShellEntry m_pDynamicEntries
; /* first dynamic shell extension entry */
74 UINT m_iIdSHEFirst
; /* first used id */
75 UINT m_iIdSHELast
; /* last used id */
76 PStaticShellEntry m_pStaticEntries
; /* first static shell extension entry */
77 UINT m_iIdSCMFirst
; /* first static used id */
78 UINT m_iIdSCMLast
; /* last static used id */
80 HRESULT
_DoCallback(UINT uMsg
, WPARAM wParam
, LPVOID lParam
);
81 void AddStaticEntry(const HKEY hkeyClass
, const WCHAR
*szVerb
);
82 void AddStaticEntriesForKey(HKEY hKey
);
83 BOOL
IsShellExtensionAlreadyLoaded(const CLSID
*pclsid
);
84 HRESULT
LoadDynamicContextMenuHandler(HKEY hKey
, const CLSID
*pclsid
);
85 BOOL
EnumerateDynamicContextHandlerForKey(HKEY hRootKey
);
86 UINT
InsertMenuItemsOfDynamicContextMenuExtension(HMENU hMenu
, UINT IndexMenu
, UINT idCmdFirst
, UINT idCmdLast
);
87 UINT
AddStaticContextMenusToMenu(HMENU hMenu
, UINT IndexMenu
);
88 UINT
BuildShellItemContextMenu(HMENU hMenu
, UINT iIdCmdFirst
, UINT iIdCmdLast
, UINT uFlags
);
89 HRESULT
DoPaste(LPCMINVOKECOMMANDINFO lpcmi
, BOOL bLink
);
90 HRESULT
DoOpenOrExplore(LPCMINVOKECOMMANDINFO lpcmi
);
91 HRESULT
DoCreateLink(LPCMINVOKECOMMANDINFO lpcmi
);
92 HRESULT
DoDelete(LPCMINVOKECOMMANDINFO lpcmi
);
93 HRESULT
DoCopyOrCut(LPCMINVOKECOMMANDINFO lpcmi
, BOOL bCopy
);
94 HRESULT
DoRename(LPCMINVOKECOMMANDINFO lpcmi
);
95 HRESULT
DoProperties(LPCMINVOKECOMMANDINFO lpcmi
);
96 HRESULT
DoCreateNewFolder(LPCMINVOKECOMMANDINFO lpici
);
97 HRESULT
DoDynamicShellExtensions(LPCMINVOKECOMMANDINFO lpcmi
);
98 HRESULT
DoStaticShellExtensions(LPCMINVOKECOMMANDINFO lpcmi
);
99 DWORD
BrowserFlagsFromVerb(LPCMINVOKECOMMANDINFO lpcmi
, PStaticShellEntry pEntry
);
100 HRESULT
TryToBrowse(LPCMINVOKECOMMANDINFO lpcmi
, LPCITEMIDLIST pidl
, DWORD wFlags
);
101 HRESULT
InvokePidl(LPCMINVOKECOMMANDINFO lpcmi
, LPCITEMIDLIST pidl
, PStaticShellEntry pEntry
);
102 PDynamicShellEntry
GetDynamicEntry(UINT idCmd
);
103 BOOL
MapVerbToCmdId(PVOID Verb
, PUINT idCmd
, BOOL IsUnicode
);
106 CDefaultContextMenu();
107 ~CDefaultContextMenu();
108 HRESULT WINAPI
Initialize(const DEFCONTEXTMENU
*pdcm
, LPFNDFMCALLBACK lpfn
);
111 virtual HRESULT WINAPI
QueryContextMenu(HMENU hMenu
, UINT indexMenu
, UINT idCmdFirst
, UINT idCmdLast
, UINT uFlags
);
112 virtual HRESULT WINAPI
InvokeCommand(LPCMINVOKECOMMANDINFO lpcmi
);
113 virtual HRESULT WINAPI
GetCommandString(UINT_PTR idCommand
, UINT uFlags
, UINT
*lpReserved
, LPSTR lpszName
, UINT uMaxNameLen
);
116 virtual HRESULT WINAPI
HandleMenuMsg(UINT uMsg
, WPARAM wParam
, LPARAM lParam
);
119 virtual HRESULT WINAPI
HandleMenuMsg2(UINT uMsg
, WPARAM wParam
, LPARAM lParam
, LRESULT
*plResult
);
122 virtual HRESULT STDMETHODCALLTYPE
SetSite(IUnknown
*pUnkSite
);
123 virtual HRESULT STDMETHODCALLTYPE
GetSite(REFIID riid
, void **ppvSite
);
125 BEGIN_COM_MAP(CDefaultContextMenu
)
126 COM_INTERFACE_ENTRY_IID(IID_IContextMenu
, IContextMenu
)
127 COM_INTERFACE_ENTRY_IID(IID_IContextMenu2
, IContextMenu2
)
128 COM_INTERFACE_ENTRY_IID(IID_IContextMenu3
, IContextMenu3
)
129 COM_INTERFACE_ENTRY_IID(IID_IObjectWithSite
, IObjectWithSite
)
133 CDefaultContextMenu::CDefaultContextMenu() :
143 m_bGroupPolicyActive(0),
144 m_pDynamicEntries(NULL
),
147 m_pStaticEntries(NULL
),
153 CDefaultContextMenu::~CDefaultContextMenu()
155 /* Free dynamic shell extension entries */
156 PDynamicShellEntry pDynamicEntry
= m_pDynamicEntries
, pNextDynamic
;
157 while (pDynamicEntry
)
159 pNextDynamic
= pDynamicEntry
->pNext
;
160 pDynamicEntry
->pCM
->Release();
161 HeapFree(GetProcessHeap(), 0, pDynamicEntry
);
162 pDynamicEntry
= pNextDynamic
;
165 /* Free static shell extension entries */
166 PStaticShellEntry pStaticEntry
= m_pStaticEntries
, pNextStatic
;
169 pNextStatic
= pStaticEntry
->pNext
;
170 HeapFree(GetProcessHeap(), 0, pStaticEntry
->szVerb
);
171 HeapFree(GetProcessHeap(), 0, pStaticEntry
);
172 pStaticEntry
= pNextStatic
;
175 for (UINT i
= 0; i
< m_cKeys
; i
++)
176 RegCloseKey(m_aKeys
[i
]);
177 HeapFree(GetProcessHeap(), 0, m_aKeys
);
180 CoTaskMemFree(m_pidlFolder
);
181 _ILFreeaPidl(const_cast<PITEMID_CHILD
*>(m_apidl
), m_cidl
);
184 HRESULT WINAPI
CDefaultContextMenu::Initialize(const DEFCONTEXTMENU
*pdcm
, LPFNDFMCALLBACK lpfn
)
186 TRACE("cidl %u\n", pdcm
->cidl
);
188 if (!pdcm
->pcmcb
&& !lpfn
)
190 ERR("CDefaultContextMenu needs a callback!\n");
195 m_apidl
= const_cast<PCUITEMID_CHILD_ARRAY
>(_ILCopyaPidl(pdcm
->apidl
, m_cidl
));
196 if (m_cidl
&& !m_apidl
)
197 return E_OUTOFMEMORY
;
199 m_pmcb
= pdcm
->pcmcb
;
202 m_cKeys
= pdcm
->cKeys
;
205 m_aKeys
= (HKEY
*)HeapAlloc(GetProcessHeap(), 0, sizeof(HKEY
) * pdcm
->cKeys
);
207 return E_OUTOFMEMORY
;
208 memcpy(m_aKeys
, pdcm
->aKeys
, sizeof(HKEY
) * pdcm
->cKeys
);
211 m_psf
->GetUIObjectOf(pdcm
->hwnd
, m_cidl
, m_apidl
, IID_NULL_PPV_ARG(IDataObject
, &m_pDataObj
));
213 if (pdcm
->pidlFolder
)
215 m_pidlFolder
= ILClone(pdcm
->pidlFolder
);
219 CComPtr
<IPersistFolder2
> pf
= NULL
;
220 if (SUCCEEDED(m_psf
->QueryInterface(IID_PPV_ARG(IPersistFolder2
, &pf
))))
222 if (FAILED(pf
->GetCurFolder(reinterpret_cast<LPITEMIDLIST
*>(&m_pidlFolder
))))
223 ERR("GetCurFolder failed\n");
225 TRACE("pidlFolder %p\n", m_pidlFolder
);
231 HRESULT
CDefaultContextMenu::_DoCallback(UINT uMsg
, WPARAM wParam
, LPVOID lParam
)
235 return m_pmcb
->CallBack(m_psf
, NULL
, m_pDataObj
, uMsg
, wParam
, (LPARAM
)lParam
);
239 return m_pfnmcb(m_psf
, NULL
, m_pDataObj
, uMsg
, wParam
, (LPARAM
)lParam
);
245 void CDefaultContextMenu::AddStaticEntry(const HKEY hkeyClass
, const WCHAR
*szVerb
)
247 PStaticShellEntry pEntry
= m_pStaticEntries
, pLastEntry
= NULL
;
250 if (!wcsicmp(pEntry
->szVerb
, szVerb
))
252 /* entry already exists */
256 pEntry
= pEntry
->pNext
;
259 TRACE("adding verb %s\n", debugstr_w(szVerb
));
261 pEntry
= (StaticShellEntry
*)HeapAlloc(GetProcessHeap(), 0, sizeof(StaticShellEntry
));
264 pEntry
->pNext
= NULL
;
265 pEntry
->szVerb
= (LPWSTR
)HeapAlloc(GetProcessHeap(), 0, (wcslen(szVerb
) + 1) * sizeof(WCHAR
));
267 wcscpy(pEntry
->szVerb
, szVerb
);
268 pEntry
->hkClass
= hkeyClass
;
271 if (!wcsicmp(szVerb
, L
"open"))
273 /* open verb is always inserted in front */
274 pEntry
->pNext
= m_pStaticEntries
;
275 m_pStaticEntries
= pEntry
;
278 pLastEntry
->pNext
= pEntry
;
280 m_pStaticEntries
= pEntry
;
283 void CDefaultContextMenu::AddStaticEntriesForKey(HKEY hKey
)
286 DWORD cchName
, dwIndex
= 0;
289 LRESULT lres
= RegOpenKeyExW(hKey
, L
"shell", 0, KEY_READ
, &hShellKey
);
290 if (lres
!= STATUS_SUCCESS
)
295 cchName
= _countof(wszName
);
296 if (RegEnumKeyExW(hShellKey
, dwIndex
++, wszName
, &cchName
, NULL
, NULL
, NULL
, NULL
) != ERROR_SUCCESS
)
299 AddStaticEntry(hKey
, wszName
);
302 RegCloseKey(hShellKey
);
310 CComPtr
<IDataObject
> pDataObj
;
312 if (SUCCEEDED(OleGetClipboard(&pDataObj
)))
317 TRACE("pDataObj=%p\n", pDataObj
.p
);
319 /* Set the FORMATETC structure*/
320 InitFormatEtc(formatetc
, RegisterClipboardFormatW(CFSTR_SHELLIDLIST
), TYMED_HGLOBAL
);
321 if (SUCCEEDED(pDataObj
->GetData(&formatetc
, &medium
)))
324 ReleaseStgMedium(&medium
);
332 CDefaultContextMenu::IsShellExtensionAlreadyLoaded(const CLSID
*pclsid
)
334 PDynamicShellEntry pEntry
= m_pDynamicEntries
;
338 if (!memcmp(&pEntry
->ClassID
, pclsid
, sizeof(CLSID
)))
340 pEntry
= pEntry
->pNext
;
347 CDefaultContextMenu::LoadDynamicContextMenuHandler(HKEY hKey
, const CLSID
*pclsid
)
351 TRACE("LoadDynamicContextMenuHandler entered with This %p hKey %p pclsid %s\n", this, hKey
, wine_dbgstr_guid(pclsid
));
353 if (IsShellExtensionAlreadyLoaded(pclsid
))
356 CComPtr
<IContextMenu
> pcm
;
357 hr
= SHCoCreateInstance(NULL
, pclsid
, NULL
, IID_PPV_ARG(IContextMenu
, &pcm
));
358 if (FAILED_UNEXPECTEDLY(hr
))
361 CComPtr
<IShellExtInit
> pExtInit
;
362 hr
= pcm
->QueryInterface(IID_PPV_ARG(IShellExtInit
, &pExtInit
));
363 if (FAILED_UNEXPECTEDLY(hr
))
366 hr
= pExtInit
->Initialize(m_pidlFolder
, m_pDataObj
, hKey
);
369 WARN("IShellExtInit::Initialize failed.clsid %s hr 0x%x\n", wine_dbgstr_guid(pclsid
), hr
);
373 PDynamicShellEntry pEntry
= (DynamicShellEntry
*)HeapAlloc(GetProcessHeap(), 0, sizeof(DynamicShellEntry
));
375 return E_OUTOFMEMORY
;
377 pEntry
->iIdCmdFirst
= 0;
378 pEntry
->pNext
= NULL
;
380 pEntry
->pCM
= pcm
.Detach();
381 memcpy(&pEntry
->ClassID
, pclsid
, sizeof(CLSID
));
383 if (m_pDynamicEntries
)
385 PDynamicShellEntry pLastEntry
= m_pDynamicEntries
;
387 while (pLastEntry
->pNext
)
388 pLastEntry
= pLastEntry
->pNext
;
390 pLastEntry
->pNext
= pEntry
;
393 m_pDynamicEntries
= pEntry
;
399 CDefaultContextMenu::EnumerateDynamicContextHandlerForKey(HKEY hRootKey
)
401 WCHAR wszName
[MAX_PATH
], wszBuf
[MAX_PATH
], *pwszClsid
;
406 if (RegOpenKeyExW(hRootKey
, L
"shellex\\ContextMenuHandlers", 0, KEY_READ
, &hKey
) != ERROR_SUCCESS
)
408 TRACE("RegOpenKeyExW failed\n");
415 cchName
= _countof(wszName
);
416 if (RegEnumKeyExW(hKey
, dwIndex
++, wszName
, &cchName
, NULL
, NULL
, NULL
, NULL
) != ERROR_SUCCESS
)
419 /* Key name or key value is CLSID */
421 hr
= CLSIDFromString(wszName
, &clsid
);
426 DWORD cchBuf
= _countof(wszBuf
);
427 if (RegGetValueW(hKey
, wszName
, NULL
, RRF_RT_REG_SZ
, NULL
, wszBuf
, &cchBuf
) == ERROR_SUCCESS
)
428 hr
= CLSIDFromString(wszBuf
, &clsid
);
434 ERR("CLSIDFromString failed for clsid %S hr 0x%x\n", pwszClsid
, hr
);
438 if (m_bGroupPolicyActive
)
440 if (RegGetValueW(HKEY_LOCAL_MACHINE
,
441 L
"Software\\Microsoft\\Windows\\CurrentVersion\\Shell Extensions\\Approved",
446 NULL
) != ERROR_SUCCESS
)
448 ERR("Shell extension %s not approved!\n", pwszClsid
);
453 hr
= LoadDynamicContextMenuHandler(hKey
, &clsid
);
455 WARN("Failed to get context menu entires from shell extension! clsid: %S\n", pwszClsid
);
463 CDefaultContextMenu::InsertMenuItemsOfDynamicContextMenuExtension(HMENU hMenu
, UINT IndexMenu
, UINT idCmdFirst
, UINT idCmdLast
)
465 if (!m_pDynamicEntries
)
472 PDynamicShellEntry pEntry
= m_pDynamicEntries
;
475 m_iIdSHEFirst
= idCmdFirst
;
478 HRESULT hr
= pEntry
->pCM
->QueryContextMenu(hMenu
, IndexMenu
++, idCmdFirst
, idCmdLast
, CMF_NORMAL
);
481 pEntry
->iIdCmdFirst
= idCmdFirst
;
482 pEntry
->NumIds
= LOWORD(hr
);
483 IndexMenu
+= pEntry
->NumIds
;
484 idCmdFirst
+= pEntry
->NumIds
+ 0x10;
486 TRACE("pEntry %p hr %x contextmenu %p cmdfirst %x num ids %x\n", pEntry
, hr
, pEntry
->pCM
, pEntry
->iIdCmdFirst
, pEntry
->NumIds
);
487 pEntry
= pEntry
->pNext
;
490 m_iIdSHELast
= idCmdFirst
;
491 TRACE("SH_LoadContextMenuHandlers first %x last %x\n", m_iIdSHEFirst
, m_iIdSHELast
);
496 CDefaultContextMenu::AddStaticContextMenusToMenu(
505 mii
.cbSize
= sizeof(mii
);
506 mii
.fMask
= MIIM_ID
| MIIM_TYPE
| MIIM_STATE
| MIIM_DATA
;
507 mii
.fType
= MFT_STRING
;
509 mii
.dwTypeData
= NULL
;
510 m_iIdSCMFirst
= mii
.wID
;
512 PStaticShellEntry pEntry
= m_pStaticEntries
;
516 fState
= MFS_ENABLED
;
517 mii
.dwTypeData
= NULL
;
519 /* set first entry as default */
520 if (pEntry
== m_pStaticEntries
)
521 fState
|= MFS_DEFAULT
;
523 if (!wcsicmp(pEntry
->szVerb
, L
"open"))
525 /* override default when open verb is found */
526 fState
|= MFS_DEFAULT
;
527 idResource
= IDS_OPEN_VERB
;
529 else if (!wcsicmp(pEntry
->szVerb
, L
"explore"))
530 idResource
= IDS_EXPLORE_VERB
;
531 else if (!wcsicmp(pEntry
->szVerb
, L
"runas"))
532 idResource
= IDS_RUNAS_VERB
;
533 else if (!wcsicmp(pEntry
->szVerb
, L
"edit"))
534 idResource
= IDS_EDIT_VERB
;
535 else if (!wcsicmp(pEntry
->szVerb
, L
"find"))
536 idResource
= IDS_FIND_VERB
;
537 else if (!wcsicmp(pEntry
->szVerb
, L
"print"))
538 idResource
= IDS_PRINT_VERB
;
539 else if (!wcsicmp(pEntry
->szVerb
, L
"printto"))
541 pEntry
= pEntry
->pNext
;
547 /* By default use verb for menu item name */
548 mii
.dwTypeData
= pEntry
->szVerb
;
552 if (LoadStringW(shell32_hInstance
, idResource
, wszVerb
, _countof(wszVerb
)))
553 mii
.dwTypeData
= wszVerb
; /* use translated verb */
555 ERR("Failed to load string\n");
560 HRESULT hr
= StringCbPrintfW(wszKey
, sizeof(wszKey
), L
"shell\\%s", pEntry
->szVerb
);
565 DWORD cbVerb
= sizeof(wszVerb
);
566 LONG res
= RegOpenKeyW(pEntry
->hkClass
, wszKey
, &hkVerb
);
567 if (res
== ERROR_SUCCESS
)
569 res
= RegLoadMUIStringW(hkVerb
,
576 if (res
== ERROR_SUCCESS
)
578 /* use description for the menu entry */
579 mii
.dwTypeData
= wszVerb
;
587 mii
.cch
= wcslen(mii
.dwTypeData
);
589 InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, &mii
);
592 pEntry
= pEntry
->pNext
;
595 m_iIdSCMLast
= mii
.wID
- 1;
599 void WINAPI
_InsertMenuItemW(
611 ZeroMemory(&mii
, sizeof(mii
));
612 mii
.cbSize
= sizeof(mii
);
613 if (fType
== MFT_SEPARATOR
)
614 mii
.fMask
= MIIM_ID
| MIIM_TYPE
;
615 else if (fType
== MFT_STRING
)
617 mii
.fMask
= MIIM_ID
| MIIM_TYPE
| MIIM_STATE
;
618 if ((ULONG_PTR
)HIWORD((ULONG_PTR
)dwTypeData
) == 0)
620 if (LoadStringW(shell32_hInstance
, LOWORD((ULONG_PTR
)dwTypeData
), wszText
, _countof(wszText
)))
621 mii
.dwTypeData
= wszText
;
624 ERR("failed to load string %p\n", dwTypeData
);
629 mii
.dwTypeData
= (LPWSTR
)dwTypeData
;
635 InsertMenuItemW(hMenu
, indexMenu
, fByPosition
, &mii
);
640 CDefaultContextMenu::QueryContextMenu(
649 TRACE("BuildShellItemContextMenu entered\n");
651 /* Load static verbs and shell extensions from registry */
652 for (UINT i
= 0; i
< m_cKeys
; i
++)
654 AddStaticEntriesForKey(m_aKeys
[i
]);
655 EnumerateDynamicContextHandlerForKey(m_aKeys
[i
]);
658 /* Add static context menu handlers */
659 IndexMenu
= AddStaticContextMenusToMenu(hMenu
, IndexMenu
);
661 /* Add dynamic context menu handlers */
662 BOOL bAddSep
= FALSE
;
663 IndexMenu
= InsertMenuItemsOfDynamicContextMenuExtension(hMenu
, IndexMenu
, idCmdFirst
, idCmdLast
);
664 TRACE("IndexMenu %d\n", IndexMenu
);
666 /* Now let the callback add its own items */
668 qcminfo
.hmenu
= hMenu
;
669 qcminfo
.indexMenu
= IndexMenu
;
670 qcminfo
.idCmdFirst
= idCmdFirst
;
671 qcminfo
.idCmdLast
= idCmdLast
;
672 qcminfo
.pIdMap
= NULL
;
673 _DoCallback(DFM_MERGECONTEXTMENU
, uFlags
, &qcminfo
);
674 IndexMenu
= GetMenuItemCount(hMenu
);
676 if (uFlags
& CMF_VERBSONLY
)
679 /* If this is a background context menu we are done */
683 /* Get the attributes of the items */
684 SFGAOF rfg
= SFGAO_BROWSABLE
| SFGAO_CANCOPY
| SFGAO_CANLINK
| SFGAO_CANMOVE
| SFGAO_CANDELETE
| SFGAO_CANRENAME
| SFGAO_HASPROPSHEET
| SFGAO_FILESYSTEM
| SFGAO_FOLDER
;
685 hr
= m_psf
->GetAttributesOf(m_cidl
, m_apidl
, &rfg
);
686 if (FAILED_UNEXPECTEDLY(hr
))
689 /* Add the standard menu entries based on the attributes of the items */
690 BOOL bClipboardData
= (HasClipboardData() && (rfg
& SFGAO_FILESYSTEM
));
691 if (rfg
& (SFGAO_CANCOPY
| SFGAO_CANMOVE
) || bClipboardData
)
693 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, 0, MFT_SEPARATOR
, NULL
, 0);
694 if (rfg
& SFGAO_CANMOVE
)
695 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, FCIDM_SHVIEW_CUT
, MFT_STRING
, MAKEINTRESOURCEW(IDS_CUT
), MFS_ENABLED
);
696 if (rfg
& SFGAO_CANCOPY
)
697 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, FCIDM_SHVIEW_COPY
, MFT_STRING
, MAKEINTRESOURCEW(IDS_COPY
), MFS_ENABLED
);
699 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, FCIDM_SHVIEW_INSERT
, MFT_STRING
, MAKEINTRESOURCEW(IDS_PASTE
), MFS_ENABLED
);
704 if (rfg
& SFGAO_CANLINK
)
707 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, 0, MFT_SEPARATOR
, NULL
, 0);
708 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, FCIDM_SHVIEW_CREATELINK
, MFT_STRING
, MAKEINTRESOURCEW(IDS_CREATELINK
), MFS_ENABLED
);
711 if (rfg
& SFGAO_CANDELETE
)
716 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, 0, MFT_SEPARATOR
, NULL
, 0);
718 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, FCIDM_SHVIEW_DELETE
, MFT_STRING
, MAKEINTRESOURCEW(IDS_DELETE
), MFS_ENABLED
);
721 if (rfg
& SFGAO_CANRENAME
)
725 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, 0, MFT_SEPARATOR
, NULL
, 0);
727 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, FCIDM_SHVIEW_RENAME
, MFT_STRING
, MAKEINTRESOURCEW(IDS_RENAME
), MFS_ENABLED
);
731 if (rfg
& SFGAO_HASPROPSHEET
)
733 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, 0, MFT_SEPARATOR
, NULL
, 0);
734 _InsertMenuItemW(hMenu
, IndexMenu
++, TRUE
, FCIDM_SHVIEW_PROPERTIES
, MFT_STRING
, MAKEINTRESOURCEW(IDS_PROPERTIES
), MFS_ENABLED
);
740 HRESULT
CDefaultContextMenu::DoPaste(LPCMINVOKECOMMANDINFO lpcmi
, BOOL bLink
)
744 CComPtr
<IDataObject
> pda
;
745 hr
= OleGetClipboard(&pda
);
746 if (FAILED_UNEXPECTEDLY(hr
))
749 FORMATETC formatetc2
;
751 InitFormatEtc(formatetc2
, RegisterClipboardFormatW(CFSTR_PREFERREDDROPEFFECT
), TYMED_HGLOBAL
);
755 if (SUCCEEDED(pda
->GetData(&formatetc2
, &medium2
)))
757 DWORD
* pdwFlag
= (DWORD
*)GlobalLock(medium2
.hGlobal
);
760 if (*pdwFlag
== DROPEFFECT_COPY
)
766 ERR("No drop effect obtained");
768 GlobalUnlock(medium2
.hGlobal
);
773 dwKey
= MK_CONTROL
|MK_SHIFT
;
776 CComPtr
<IDropTarget
> pdrop
;
778 hr
= m_psf
->GetUIObjectOf(NULL
, 1, &m_apidl
[0], IID_NULL_PPV_ARG(IDropTarget
, &pdrop
));
780 hr
= m_psf
->CreateViewObject(NULL
, IID_PPV_ARG(IDropTarget
, &pdrop
));
782 if (FAILED_UNEXPECTEDLY(hr
))
785 SHSimulateDrop(pdrop
, pda
, dwKey
, NULL
, NULL
);
787 TRACE("CP result %x\n", hr
);
792 CDefaultContextMenu::DoOpenOrExplore(LPCMINVOKECOMMANDINFO lpcmi
)
798 HRESULT
CDefaultContextMenu::DoCreateLink(LPCMINVOKECOMMANDINFO lpcmi
)
800 if (!m_cidl
|| !m_pDataObj
)
803 CComPtr
<IDropTarget
> pDT
;
804 HRESULT hr
= m_psf
->CreateViewObject(NULL
, IID_PPV_ARG(IDropTarget
, &pDT
));
805 if (FAILED_UNEXPECTEDLY(hr
))
808 SHSimulateDrop(pDT
, m_pDataObj
, MK_CONTROL
|MK_SHIFT
, NULL
, NULL
);
813 HRESULT
CDefaultContextMenu::DoDelete(LPCMINVOKECOMMANDINFO lpcmi
)
815 if (!m_cidl
|| !m_pDataObj
)
818 DoDeleteAsync(m_pDataObj
, lpcmi
->fMask
);
822 HRESULT
CDefaultContextMenu::DoCopyOrCut(LPCMINVOKECOMMANDINFO lpcmi
, BOOL bCopy
)
824 if (!m_cidl
|| !m_pDataObj
)
831 InitFormatEtc(formatetc
, RegisterClipboardFormatW(CFSTR_PREFERREDDROPEFFECT
), TYMED_HGLOBAL
);
832 m_pDataObj
->GetData(&formatetc
, &medium
);
833 DWORD
* pdwFlag
= (DWORD
*)GlobalLock(medium
.hGlobal
);
835 *pdwFlag
= DROPEFFECT_MOVE
;
836 GlobalUnlock(medium
.hGlobal
);
837 m_pDataObj
->SetData(&formatetc
, &medium
, TRUE
);
840 HRESULT hr
= OleSetClipboard(m_pDataObj
);
841 if (FAILED_UNEXPECTEDLY(hr
))
847 HRESULT
CDefaultContextMenu::DoRename(LPCMINVOKECOMMANDINFO lpcmi
)
849 CComPtr
<IShellBrowser
> psb
;
852 if (!m_site
|| !m_cidl
)
855 /* Get a pointer to the shell browser */
856 hr
= IUnknown_QueryService(m_site
, SID_IShellBrowser
, IID_PPV_ARG(IShellBrowser
, &psb
));
857 if (FAILED_UNEXPECTEDLY(hr
))
860 CComPtr
<IShellView
> lpSV
;
861 hr
= psb
->QueryActiveShellView(&lpSV
);
862 if (FAILED_UNEXPECTEDLY(hr
))
865 SVSIF selFlags
= SVSI_DESELECTOTHERS
| SVSI_EDIT
| SVSI_ENSUREVISIBLE
| SVSI_FOCUSED
| SVSI_SELECT
;
866 hr
= lpSV
->SelectItem(m_apidl
[0], selFlags
);
867 if (FAILED_UNEXPECTEDLY(hr
))
874 CDefaultContextMenu::DoProperties(
875 LPCMINVOKECOMMANDINFO lpcmi
)
877 _DoCallback(DFM_INVOKECOMMAND
, DFM_CMD_PROPERTIES
, NULL
);
882 // This code is taken from CNewMenu and should be shared between the 2 classes
884 CDefaultContextMenu::DoCreateNewFolder(
885 LPCMINVOKECOMMANDINFO lpici
)
887 WCHAR wszPath
[MAX_PATH
];
888 WCHAR wszName
[MAX_PATH
];
889 WCHAR wszNewFolder
[25];
892 /* Get folder path */
893 hr
= SHGetPathFromIDListW(m_pidlFolder
, wszPath
);
894 if (FAILED_UNEXPECTEDLY(hr
))
897 if (!LoadStringW(shell32_hInstance
, IDS_NEWFOLDER
, wszNewFolder
, _countof(wszNewFolder
)))
900 /* Create the name of the new directory */
901 if (!PathYetAnotherMakeUniqueName(wszName
, wszPath
, NULL
, wszNewFolder
))
904 /* Create the new directory and show the appropriate dialog in case of error */
905 if (SHCreateDirectory(lpici
->hwnd
, wszName
) != ERROR_SUCCESS
)
908 /* Show and select the new item in the def view */
910 PITEMID_CHILD pidlNewItem
;
911 CComPtr
<IShellView
> psv
;
913 /* Notify the view object about the new item */
914 SHChangeNotify(SHCNE_MKDIR
, SHCNF_PATHW
, (LPCVOID
)wszName
, NULL
);
919 /* Get a pointer to the shell view */
920 hr
= IUnknown_QueryService(m_site
, SID_IFolderView
, IID_PPV_ARG(IShellView
, &psv
));
921 if (FAILED_UNEXPECTEDLY(hr
))
924 /* Attempt to get the pidl of the new item */
925 hr
= SHILCreateFromPathW(wszName
, &pidl
, NULL
);
926 if (FAILED_UNEXPECTEDLY(hr
))
929 pidlNewItem
= ILFindLastID(pidl
);
931 hr
= psv
->SelectItem(pidlNewItem
, SVSI_DESELECTOTHERS
| SVSI_EDIT
| SVSI_ENSUREVISIBLE
|
932 SVSI_FOCUSED
| SVSI_SELECT
);
933 if (FAILED_UNEXPECTEDLY(hr
))
941 PDynamicShellEntry
CDefaultContextMenu::GetDynamicEntry(UINT idCmd
)
943 PDynamicShellEntry pEntry
= m_pDynamicEntries
;
945 while(pEntry
&& idCmd
> pEntry
->iIdCmdFirst
+ pEntry
->NumIds
)
946 pEntry
= pEntry
->pNext
;
951 if (idCmd
< pEntry
->iIdCmdFirst
|| idCmd
> pEntry
->iIdCmdFirst
+ pEntry
->NumIds
)
957 //FIXME: 260 is correct, but should this be part of the SDK or just MAX_PATH?
961 CDefaultContextMenu::MapVerbToCmdId(PVOID Verb
, PUINT idCmd
, BOOL IsUnicode
)
963 WCHAR UnicodeStr
[MAX_VERB
];
965 /* Loop through all the static verbs looking for a match */
966 for (UINT i
= 0; i
< _countof(g_StaticInvokeCmdMap
); i
++)
968 /* We can match both ANSI and unicode strings */
971 /* The static verbs are ANSI, get a unicode version before doing the compare */
972 SHAnsiToUnicode(g_StaticInvokeCmdMap
[i
].szStringVerb
, UnicodeStr
, MAX_VERB
);
973 if (!wcscmp(UnicodeStr
, (LPWSTR
)Verb
))
975 /* Return the Corresponding Id */
976 *idCmd
= g_StaticInvokeCmdMap
[i
].IntVerb
;
982 if (!strcmp(g_StaticInvokeCmdMap
[i
].szStringVerb
, (LPSTR
)Verb
))
984 *idCmd
= g_StaticInvokeCmdMap
[i
].IntVerb
;
994 CDefaultContextMenu::DoDynamicShellExtensions(
995 LPCMINVOKECOMMANDINFO lpcmi
)
997 TRACE("verb %p first %x last %x", lpcmi
->lpVerb
, m_iIdSHEFirst
, m_iIdSHELast
);
999 UINT idCmd
= LOWORD(lpcmi
->lpVerb
);
1000 PDynamicShellEntry pEntry
= GetDynamicEntry(idCmd
);
1004 /* invoke the dynamic context menu */
1005 lpcmi
->lpVerb
= MAKEINTRESOURCEA(idCmd
- pEntry
->iIdCmdFirst
);
1006 return pEntry
->pCM
->InvokeCommand(lpcmi
);
1010 CDefaultContextMenu::BrowserFlagsFromVerb(LPCMINVOKECOMMANDINFO lpcmi
, PStaticShellEntry pEntry
)
1012 CComPtr
<IShellBrowser
> psb
;
1023 /* Get a pointer to the shell browser */
1024 hr
= IUnknown_QueryService(m_site
, SID_IShellBrowser
, IID_PPV_ARG(IShellBrowser
, &psb
));
1025 if (FAILED_UNEXPECTEDLY(hr
))
1028 /* See if we are in Explore or Browse mode. If the browser's tree is present, we are in Explore mode.*/
1029 if (SUCCEEDED(psb
->GetControlWindow(FCW_TREE
, &hwndTree
)) && hwndTree
)
1030 FlagsName
= L
"ExplorerFlags";
1032 FlagsName
= L
"BrowserFlags";
1034 /* Try to get the flag from the verb */
1035 hr
= StringCbPrintfW(wszKey
, sizeof(wszKey
), L
"shell\\%s", pEntry
->szVerb
);
1036 if (FAILED_UNEXPECTEDLY(hr
))
1039 cbVerb
= sizeof(wFlags
);
1040 if (RegGetValueW(pEntry
->hkClass
, wszKey
, FlagsName
, RRF_RT_REG_DWORD
, NULL
, &wFlags
, &cbVerb
) == ERROR_SUCCESS
)
1049 CDefaultContextMenu::TryToBrowse(
1050 LPCMINVOKECOMMANDINFO lpcmi
, LPCITEMIDLIST pidl
, DWORD wFlags
)
1052 CComPtr
<IShellBrowser
> psb
;
1058 /* Get a pointer to the shell browser */
1059 hr
= IUnknown_QueryService(m_site
, SID_IShellBrowser
, IID_PPV_ARG(IShellBrowser
, &psb
));
1060 if (FAILED_UNEXPECTEDLY(hr
))
1063 return psb
->BrowseObject(ILCombine(m_pidlFolder
, pidl
), wFlags
);
1067 CDefaultContextMenu::InvokePidl(LPCMINVOKECOMMANDINFO lpcmi
, LPCITEMIDLIST pidl
, PStaticShellEntry pEntry
)
1069 LPITEMIDLIST pidlFull
= ILCombine(m_pidlFolder
, pidl
);
1070 if (pidlFull
== NULL
)
1075 WCHAR wszPath
[MAX_PATH
];
1076 BOOL bHasPath
= SHGetPathFromIDListW(pidlFull
, wszPath
);
1078 WCHAR wszDir
[MAX_PATH
];
1081 wcscpy(wszDir
, wszPath
);
1082 PathRemoveFileSpec(wszDir
);
1086 SHGetPathFromIDListW(m_pidlFolder
, wszDir
);
1089 SHELLEXECUTEINFOW sei
;
1090 ZeroMemory(&sei
, sizeof(sei
));
1091 sei
.cbSize
= sizeof(sei
);
1092 sei
.hwnd
= lpcmi
->hwnd
;
1093 sei
.nShow
= SW_SHOWNORMAL
;
1094 sei
.lpVerb
= pEntry
->szVerb
;
1095 sei
.lpDirectory
= wszDir
;
1096 sei
.lpIDList
= pidlFull
;
1097 sei
.hkeyClass
= pEntry
->hkClass
;
1098 sei
.fMask
= SEE_MASK_CLASSKEY
| SEE_MASK_IDLIST
;
1101 sei
.lpFile
= wszPath
;
1104 ShellExecuteExW(&sei
);
1112 CDefaultContextMenu::DoStaticShellExtensions(
1113 LPCMINVOKECOMMANDINFO lpcmi
)
1115 PStaticShellEntry pEntry
= m_pStaticEntries
;
1116 INT iCmd
= LOWORD(lpcmi
->lpVerb
) - m_iIdSCMFirst
;
1120 while (pEntry
&& (iCmd
--) > 0)
1121 pEntry
= pEntry
->pNext
;
1126 /* Get the browse flags to see if we need to browse */
1127 DWORD wFlags
= BrowserFlagsFromVerb(lpcmi
, pEntry
);
1128 BOOL bBrowsed
= FALSE
;
1130 for (i
=0; i
< m_cidl
; i
++)
1132 /* Check if we need to browse */
1135 /* In xp if we have browsed, we don't open any more folders .
1136 * In win7 we browse to the first folder we find and
1137 * open new windows fo for each of the rest of the folders */
1141 hr
= TryToBrowse(lpcmi
, m_apidl
[i
], wFlags
);
1149 InvokePidl(lpcmi
, m_apidl
[i
], pEntry
);
1157 CDefaultContextMenu::InvokeCommand(
1158 LPCMINVOKECOMMANDINFO lpcmi
)
1160 CMINVOKECOMMANDINFO LocalInvokeInfo
;
1164 /* Take a local copy of the fixed members of the
1165 struct as we might need to modify the verb */
1166 LocalInvokeInfo
= *lpcmi
;
1168 /* Check if this is a string verb */
1169 if (HIWORD(LocalInvokeInfo
.lpVerb
))
1171 /* Get the ID which corresponds to this verb, and update our local copy */
1172 if (MapVerbToCmdId((LPVOID
)LocalInvokeInfo
.lpVerb
, &CmdId
, FALSE
))
1173 LocalInvokeInfo
.lpVerb
= MAKEINTRESOURCEA(CmdId
);
1176 /* Check if this is a Id */
1177 switch (LOWORD(LocalInvokeInfo
.lpVerb
))
1179 case FCIDM_SHVIEW_INSERT
:
1180 Result
= DoPaste(&LocalInvokeInfo
, FALSE
);
1182 case FCIDM_SHVIEW_INSERTLINK
:
1183 Result
= DoPaste(&LocalInvokeInfo
, TRUE
);
1185 case FCIDM_SHVIEW_OPEN
:
1186 case FCIDM_SHVIEW_EXPLORE
:
1187 Result
= DoOpenOrExplore(&LocalInvokeInfo
);
1189 case FCIDM_SHVIEW_COPY
:
1190 case FCIDM_SHVIEW_CUT
:
1191 Result
= DoCopyOrCut(&LocalInvokeInfo
, LOWORD(LocalInvokeInfo
.lpVerb
) == FCIDM_SHVIEW_COPY
);
1193 case FCIDM_SHVIEW_CREATELINK
:
1194 Result
= DoCreateLink(&LocalInvokeInfo
);
1196 case FCIDM_SHVIEW_DELETE
:
1197 Result
= DoDelete(&LocalInvokeInfo
);
1199 case FCIDM_SHVIEW_RENAME
:
1200 Result
= DoRename(&LocalInvokeInfo
);
1202 case FCIDM_SHVIEW_PROPERTIES
:
1203 Result
= DoProperties(&LocalInvokeInfo
);
1205 case FCIDM_SHVIEW_NEWFOLDER
:
1206 Result
= DoCreateNewFolder(&LocalInvokeInfo
);
1210 _DoCallback(DFM_INVOKECOMMAND
, LOWORD(LocalInvokeInfo
.lpVerb
), NULL
);
1212 Result
= E_UNEXPECTED
;
1216 /* Check for ID's we didn't find a handler for */
1217 if (Result
== E_UNEXPECTED
)
1219 if (m_iIdSHEFirst
&& m_iIdSHELast
)
1221 if (LOWORD(LocalInvokeInfo
.lpVerb
) >= m_iIdSHEFirst
&& LOWORD(LocalInvokeInfo
.lpVerb
) <= m_iIdSHELast
)
1222 Result
= DoDynamicShellExtensions(&LocalInvokeInfo
);
1225 if (m_iIdSCMFirst
&& m_iIdSCMLast
)
1227 if (LOWORD(LocalInvokeInfo
.lpVerb
) >= m_iIdSCMFirst
&& LOWORD(LocalInvokeInfo
.lpVerb
) <= m_iIdSCMLast
)
1228 Result
= DoStaticShellExtensions(&LocalInvokeInfo
);
1232 if (Result
== E_UNEXPECTED
)
1233 FIXME("Unhandled Verb %xl\n", LOWORD(LocalInvokeInfo
.lpVerb
));
1240 CDefaultContextMenu::GetCommandString(
1247 /* We don't handle the help text yet */
1248 if (uFlags
== GCS_HELPTEXTA
||
1249 uFlags
== GCS_HELPTEXTW
)
1254 /* Loop looking for a matching Id */
1255 for (UINT i
= 0; i
< _countof(g_StaticInvokeCmdMap
); i
++)
1257 if (g_StaticInvokeCmdMap
[i
].IntVerb
== idCommand
)
1259 /* Validation just returns S_OK on a match */
1260 if (uFlags
== GCS_VALIDATEA
|| uFlags
== GCS_VALIDATEW
)
1263 /* Return a copy of the ANSI verb */
1264 if (uFlags
== GCS_VERBA
)
1265 return StringCchCopyA(lpszName
, uMaxNameLen
, g_StaticInvokeCmdMap
[i
].szStringVerb
);
1267 /* Convert the ANSI verb to unicode and return that */
1268 if (uFlags
== GCS_VERBW
)
1270 if (SHAnsiToUnicode(g_StaticInvokeCmdMap
[i
].szStringVerb
, (LPWSTR
)lpszName
, uMaxNameLen
))
1276 return E_INVALIDARG
;
1281 CDefaultContextMenu::HandleMenuMsg(
1286 /* FIXME: Should we implement this as well? */
1292 CDefaultContextMenu::HandleMenuMsg2(
1300 case WM_INITMENUPOPUP
:
1302 PDynamicShellEntry pEntry
= m_pDynamicEntries
;
1305 SHForwardContextMenuMsg(pEntry
->pCM
, uMsg
, wParam
, lParam
, plResult
, TRUE
);
1306 pEntry
= pEntry
->pNext
;
1312 DRAWITEMSTRUCT
* pDrawStruct
= reinterpret_cast<DRAWITEMSTRUCT
*>(lParam
);
1313 PDynamicShellEntry pEntry
= GetDynamicEntry(pDrawStruct
->itemID
);
1315 SHForwardContextMenuMsg(pEntry
->pCM
, uMsg
, wParam
, lParam
, plResult
, TRUE
);
1318 case WM_MEASUREITEM
:
1320 MEASUREITEMSTRUCT
* pMeasureStruct
= reinterpret_cast<MEASUREITEMSTRUCT
*>(lParam
);
1321 PDynamicShellEntry pEntry
= GetDynamicEntry(pMeasureStruct
->itemID
);
1323 SHForwardContextMenuMsg(pEntry
->pCM
, uMsg
, wParam
, lParam
, plResult
, TRUE
);
1330 ERR("Got unknown message:%d\n", uMsg
);
1337 CDefaultContextMenu::SetSite(IUnknown
*pUnkSite
)
1345 CDefaultContextMenu::GetSite(REFIID riid
, void **ppvSite
)
1350 return m_site
->QueryInterface(riid
, ppvSite
);
1355 CDefaultContextMenu_CreateInstance(const DEFCONTEXTMENU
*pdcm
, LPFNDFMCALLBACK lpfn
, REFIID riid
, void **ppv
)
1357 return ShellObjectCreatorInit
<CDefaultContextMenu
>(pdcm
, lpfn
, riid
, ppv
);
1360 /*************************************************************************
1361 * SHCreateDefaultContextMenu [SHELL32.325] Vista API
1367 SHCreateDefaultContextMenu(const DEFCONTEXTMENU
*pdcm
, REFIID riid
, void **ppv
)
1369 HRESULT hr
= CDefaultContextMenu_CreateInstance(pdcm
, NULL
, riid
, ppv
);
1370 if (FAILED_UNEXPECTEDLY(hr
))
1376 /*************************************************************************
1377 * CDefFolderMenu_Create2 [SHELL32.701]
1383 CDefFolderMenu_Create2(
1384 PCIDLIST_ABSOLUTE pidlFolder
,
1387 PCUITEMID_CHILD_ARRAY apidl
,
1389 LPFNDFMCALLBACK lpfn
,
1391 const HKEY
*ahkeyClsKeys
,
1392 IContextMenu
**ppcm
)
1397 dcm
.pidlFolder
= pidlFolder
;
1401 dcm
.punkAssociationInfo
= NULL
;
1403 dcm
.aKeys
= ahkeyClsKeys
;
1405 HRESULT hr
= CDefaultContextMenu_CreateInstance(&dcm
, lpfn
, IID_PPV_ARG(IContextMenu
, ppcm
));
1406 if (FAILED_UNEXPECTEDLY(hr
))