3 * ShellView Background Context Menu (shv_bg_cm)
5 * Copyright 1999 Juergen Schmied <juergen.schmied@metronet.de>
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
24 #define NONAMELESSUNION
25 #define NONAMELESSSTRUCT
27 #include "wine/debug.h"
35 #include "shell32_main.h"
36 #include "shellfolder.h"
37 #include "undocshell.h"
39 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
41 /**************************************************************************
42 * IContextMenu Implementation
46 IContextMenu2Vtbl
*lpVtbl
;
47 IShellFolder
* pSFParent
;
52 static struct IContextMenu2Vtbl cmvt
;
54 /**************************************************************************
55 * ISVBgCm_Constructor()
57 IContextMenu2
*ISvBgCm_Constructor(IShellFolder
* pSFParent
)
61 cm
= (BgCmImpl
*)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY
,sizeof(BgCmImpl
));
64 cm
->pSFParent
= pSFParent
;
65 if(pSFParent
) IShellFolder_AddRef(pSFParent
);
67 TRACE("(%p)->()\n",cm
);
68 return (IContextMenu2
*)cm
;
71 /**************************************************************************
72 * ISVBgCm_fnQueryInterface
74 static HRESULT WINAPI
ISVBgCm_fnQueryInterface(IContextMenu2
*iface
, REFIID riid
, LPVOID
*ppvObj
)
76 BgCmImpl
*This
= (BgCmImpl
*)iface
;
78 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This
,debugstr_guid(riid
),ppvObj
);
82 if(IsEqualIID(riid
, &IID_IUnknown
) ||
83 IsEqualIID(riid
, &IID_IContextMenu
) ||
84 IsEqualIID(riid
, &IID_IContextMenu2
))
88 else if(IsEqualIID(riid
, &IID_IShellExtInit
)) /*IShellExtInit*/
90 FIXME("-- LPSHELLEXTINIT pointer requested\n");
95 IUnknown_AddRef((IUnknown
*)*ppvObj
);
96 TRACE("-- Interface: (%p)->(%p)\n",ppvObj
,*ppvObj
);
99 TRACE("-- Interface: E_NOINTERFACE\n");
100 return E_NOINTERFACE
;
103 /**************************************************************************
106 static ULONG WINAPI
ISVBgCm_fnAddRef(IContextMenu2
*iface
)
108 BgCmImpl
*This
= (BgCmImpl
*)iface
;
109 ULONG refCount
= InterlockedIncrement(&This
->ref
);
111 TRACE("(%p)->(count=%lu)\n", This
, refCount
- 1);
116 /**************************************************************************
119 static ULONG WINAPI
ISVBgCm_fnRelease(IContextMenu2
*iface
)
121 BgCmImpl
*This
= (BgCmImpl
*)iface
;
122 ULONG refCount
= InterlockedDecrement(&This
->ref
);
124 TRACE("(%p)->(count=%li)\n", This
, refCount
+ 1);
128 TRACE(" destroying IContextMenu(%p)\n",This
);
131 IShellFolder_Release(This
->pSFParent
);
133 HeapFree(GetProcessHeap(),0,This
);
138 /**************************************************************************
139 * ISVBgCm_fnQueryContextMenu()
142 static HRESULT WINAPI
ISVBgCm_fnQueryContextMenu(
143 IContextMenu2
*iface
,
154 BgCmImpl
*This
= (BgCmImpl
*)iface
;
156 TRACE("(%p)->(hmenu=%p indexmenu=%x cmdfirst=%x cmdlast=%x flags=%x )\n",
157 This
, hMenu
, indexMenu
, idCmdFirst
, idCmdLast
, uFlags
);
160 hMyMenu
= LoadMenuA(shell32_hInstance
, "MENU_002");
161 if (uFlags
& CMF_DEFAULTONLY
)
163 HMENU ourMenu
= GetSubMenu(hMyMenu
,0);
164 UINT oldDef
= GetMenuDefaultItem(hMenu
,TRUE
,GMDI_USEDISABLED
);
165 UINT newDef
= GetMenuDefaultItem(ourMenu
,TRUE
,GMDI_USEDISABLED
);
166 if (newDef
!= oldDef
)
167 SetMenuDefaultItem(hMenu
,newDef
,TRUE
);
168 if (newDef
!=0xFFFFFFFF)
169 hr
= MAKE_HRESULT(SEVERITY_SUCCESS
, FACILITY_NULL
, newDef
+1);
171 hr
= MAKE_HRESULT(SEVERITY_SUCCESS
, FACILITY_NULL
, 0);
175 idMax
= Shell_MergeMenus (hMenu
, GetSubMenu(hMyMenu
,0), indexMenu
,
176 idCmdFirst
, idCmdLast
, MM_SUBMENUSHAVEIDS
);
177 hr
= MAKE_HRESULT(SEVERITY_SUCCESS
, FACILITY_NULL
, idMax
-idCmdFirst
+1);
179 DestroyMenu(hMyMenu
);
181 TRACE("(%p)->returning 0x%lx\n",This
,hr
);
185 /**************************************************************************
188 static void DoNewFolder(
189 IContextMenu2
*iface
,
192 BgCmImpl
*This
= (BgCmImpl
*)iface
;
194 char szName
[MAX_PATH
];
196 IShellFolder_QueryInterface(This
->pSFParent
, &IID_ISFHelper
, (LPVOID
*)&psfhlp
);
200 ISFHelper_GetUniqueName(psfhlp
, szName
, MAX_PATH
);
201 ISFHelper_AddFolder(psfhlp
, 0, szName
, &pidl
);
205 /* if we are in a shellview do labeledit */
206 IShellView_SelectItem(psv
,
207 pidl
,(SVSI_DESELECTOTHERS
| SVSI_EDIT
| SVSI_ENSUREVISIBLE
208 |SVSI_FOCUSED
|SVSI_SELECT
));
212 ISFHelper_Release(psfhlp
);
216 /**************************************************************************
220 IContextMenu2
*iface
)
222 BgCmImpl
*This
= (BgCmImpl
*)iface
;
223 BOOL bSuccess
= FALSE
;
228 if(SUCCEEDED(OleGetClipboard(&pda
)))
233 TRACE("pda=%p\n", pda
);
235 /* Set the FORMATETC structure*/
236 InitFormatEtc(formatetc
, RegisterClipboardFormatA(CFSTR_SHELLIDLIST
), TYMED_HGLOBAL
);
238 /* Get the pidls from IDataObject */
239 if(SUCCEEDED(IDataObject_GetData(pda
,&formatetc
,&medium
)))
241 LPITEMIDLIST
* apidl
;
243 IShellFolder
*psfFrom
= NULL
, *psfDesktop
;
245 LPIDA lpcida
= GlobalLock(medium
.u
.hGlobal
);
246 TRACE("cida=%p\n", lpcida
);
248 apidl
= _ILCopyCidaToaPidl(&pidl
, lpcida
);
250 /* bind to the source shellfolder */
251 SHGetDesktopFolder(&psfDesktop
);
254 IShellFolder_BindToObject(psfDesktop
, pidl
, NULL
, &IID_IShellFolder
, (LPVOID
*)&psfFrom
);
255 IShellFolder_Release(psfDesktop
);
260 /* get source and destination shellfolder */
261 ISFHelper
*psfhlpdst
, *psfhlpsrc
;
262 IShellFolder_QueryInterface(This
->pSFParent
, &IID_ISFHelper
, (LPVOID
*)&psfhlpdst
);
263 IShellFolder_QueryInterface(psfFrom
, &IID_ISFHelper
, (LPVOID
*)&psfhlpsrc
);
265 /* do the copy/move */
266 if (psfhlpdst
&& psfhlpsrc
)
268 ISFHelper_CopyItems(psfhlpdst
, psfFrom
, lpcida
->cidl
, (LPCITEMIDLIST
*)apidl
);
270 ISFHelper_DeleteItems(psfhlpsrc, lpcida->cidl, apidl);
273 if(psfhlpdst
) ISFHelper_Release(psfhlpdst
);
274 if(psfhlpsrc
) ISFHelper_Release(psfhlpsrc
);
275 IShellFolder_Release(psfFrom
);
278 _ILFreeaPidl(apidl
, lpcida
->cidl
);
281 /* release the medium*/
282 ReleaseStgMedium(&medium
);
284 IDataObject_Release(pda
);
290 hMem
= GetClipboardData(CF_HDROP
);
294 char * pDropFiles
= (char *)GlobalLock(hMem
);
297 int len
, offset
= sizeof(DROPFILESTRUCT
);
299 while( pDropFiles
[offset
] != 0)
301 len
= strlen(pDropFiles
+ offset
);
302 TRACE("%s\n", pDropFiles
+ offset
);
313 /**************************************************************************
314 * ISVBgCm_fnInvokeCommand()
316 static HRESULT WINAPI
ISVBgCm_fnInvokeCommand(
317 IContextMenu2
*iface
,
318 LPCMINVOKECOMMANDINFO lpcmi
)
320 BgCmImpl
*This
= (BgCmImpl
*)iface
;
323 LPSHELLVIEW lpSV
= NULL
;
326 TRACE("(%p)->(invcom=%p verb=%p wnd=%p)\n",This
,lpcmi
,lpcmi
->lpVerb
, lpcmi
->hwnd
);
328 /* get the active IShellView */
329 if((lpSB
= (LPSHELLBROWSER
)SendMessageA(lpcmi
->hwnd
, CWM_GETISHELLBROWSER
,0,0)))
331 if(SUCCEEDED(IShellBrowser_QueryActiveShellView(lpSB
, &lpSV
)))
333 IShellView_GetWindow(lpSV
, &hWndSV
);
337 if(HIWORD(lpcmi
->lpVerb
))
339 TRACE("%s\n",lpcmi
->lpVerb
);
341 if (! strcmp(lpcmi
->lpVerb
,CMDSTR_NEWFOLDERA
))
343 DoNewFolder(iface
, lpSV
);
345 else if (! strcmp(lpcmi
->lpVerb
,CMDSTR_VIEWLISTA
))
347 if(hWndSV
) SendMessageA(hWndSV
, WM_COMMAND
, MAKEWPARAM(FCIDM_SHVIEW_LISTVIEW
,0),0 );
349 else if (! strcmp(lpcmi
->lpVerb
,CMDSTR_VIEWDETAILSA
))
351 if(hWndSV
) SendMessageA(hWndSV
, WM_COMMAND
, MAKEWPARAM(FCIDM_SHVIEW_REPORTVIEW
,0),0 );
355 FIXME("please report: unknown verb %s\n",lpcmi
->lpVerb
);
360 switch(LOWORD(lpcmi
->lpVerb
))
362 case FCIDM_SHVIEW_NEWFOLDER
:
363 DoNewFolder(iface
, lpSV
);
365 case FCIDM_SHVIEW_INSERT
:
369 /* if it's a id just pass it to the parent shv */
370 SendMessageA(hWndSV
, WM_COMMAND
, MAKEWPARAM(LOWORD(lpcmi
->lpVerb
), 0),0 );
376 IShellView_Release(lpSV
); /* QueryActiveShellView does AddRef*/
381 /**************************************************************************
382 * ISVBgCm_fnGetCommandString()
385 static HRESULT WINAPI
ISVBgCm_fnGetCommandString(
386 IContextMenu2
*iface
,
393 BgCmImpl
*This
= (BgCmImpl
*)iface
;
395 TRACE("(%p)->(idcom=%x flags=%x %p name=%p len=%x)\n",This
, idCommand
, uFlags
, lpReserved
, lpszName
, uMaxNameLen
);
397 /* test the existence of the menu items, the file dialog enables
398 the buttons according to this */
399 if (uFlags
== GCS_VALIDATEA
)
401 if(HIWORD(idCommand
))
403 if (!strcmp((LPSTR
)idCommand
, CMDSTR_VIEWLISTA
) ||
404 !strcmp((LPSTR
)idCommand
, CMDSTR_VIEWDETAILSA
) ||
405 !strcmp((LPSTR
)idCommand
, CMDSTR_NEWFOLDERA
))
412 FIXME("unknown command string\n");
416 /**************************************************************************
417 * ISVBgCm_fnHandleMenuMsg()
419 static HRESULT WINAPI
ISVBgCm_fnHandleMenuMsg(
420 IContextMenu2
*iface
,
425 BgCmImpl
*This
= (BgCmImpl
*)iface
;
427 FIXME("(%p)->(msg=%x wp=%x lp=%lx)\n",This
, uMsg
, wParam
, lParam
);
432 /**************************************************************************
433 * IContextMenu2 VTable
436 static struct IContextMenu2Vtbl cmvt
=
438 ISVBgCm_fnQueryInterface
,
441 ISVBgCm_fnQueryContextMenu
,
442 ISVBgCm_fnInvokeCommand
,
443 ISVBgCm_fnGetCommandString
,
444 ISVBgCm_fnHandleMenuMsg