4 * Copyright 2003 Martin Fuchs
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
25 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
27 /***********************************************************************
28 * control panel implementation in shell namespace
32 const IShellFolder2Vtbl
*lpVtbl
;
34 const IPersistFolder2Vtbl
*lpVtblPersistFolder2
;
35 const IShellExecuteHookWVtbl
*lpVtblShellExecuteHookW
;
36 const IShellExecuteHookAVtbl
*lpVtblShellExecuteHookA
;
37 const IContextMenu2Vtbl
*lpVtblContextMenu
;
38 IUnknown
*pUnkOuter
; /* used for aggregation */
40 /* both paths are parsible from the desktop */
41 LPITEMIDLIST pidlRoot
; /* absolute pidl */
42 int dwAttributes
; /* attributes returned by GetAttributesOf FIXME: use it */
45 } ICPanelImpl
, *LPICPanelImpl
;
47 static const IShellFolder2Vtbl vt_ShellFolder2
;
48 static const IPersistFolder2Vtbl vt_PersistFolder2
;
49 static const IShellExecuteHookWVtbl vt_ShellExecuteHookW
;
50 static const IShellExecuteHookAVtbl vt_ShellExecuteHookA
;
51 static const IContextMenu2Vtbl vt_ContextMenu
;
53 static LPICPanelImpl __inline
impl_from_IPersistFolder2( IPersistFolder2
*iface
)
55 return (LPICPanelImpl
)((char*)iface
- FIELD_OFFSET(ICPanelImpl
, lpVtblPersistFolder2
));
58 static LPICPanelImpl __inline
impl_from_IContextMenu( IContextMenu2
*iface
)
60 return (LPICPanelImpl
)((char*)iface
- FIELD_OFFSET(ICPanelImpl
, lpVtblContextMenu
));
64 static LPICPanelImpl __inline
impl_from_IShellExecuteHookW( IShellExecuteHookW
*iface
)
66 return (LPICPanelImpl
)((char*)iface
- FIELD_OFFSET(ICPanelImpl
, lpVtblShellExecuteHookW
));
69 static LPICPanelImpl __inline
impl_from_IShellExecuteHookA( IShellExecuteHookA
*iface
)
71 return (LPICPanelImpl
)((char*)iface
- FIELD_OFFSET(ICPanelImpl
, lpVtblShellExecuteHookA
));
76 converts This to an interface pointer
78 #define _IUnknown_(This) (IUnknown*)&(This->lpVtbl)
79 #define _IShellFolder_(This) (IShellFolder*)&(This->lpVtbl)
80 #define _IShellFolder2_(This) (IShellFolder2*)&(This->lpVtbl)
82 #define _IPersist_(This) (IPersist*)&(This->lpVtblPersistFolder2)
83 #define _IPersistFolder_(This) (IPersistFolder*)&(This->lpVtblPersistFolder2)
84 #define _IPersistFolder2_(This) (IPersistFolder2*)&(This->lpVtblPersistFolder2)
85 #define _IShellExecuteHookW_(This) (IShellExecuteHookW*)&(This->lpVtblShellExecuteHookW)
86 #define _IShellExecuteHookA_(This) (IShellExecuteHookA*)&(This->lpVtblShellExecuteHookA)
89 /***********************************************************************
90 * IShellFolder [ControlPanel] implementation
93 static const shvheader ControlPanelSFHeader
[] = {
94 {IDS_SHV_COLUMN8
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 15},/*FIXME*/
95 {IDS_SHV_COLUMN9
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 200},/*FIXME*/
98 #define CONROLPANELSHELLVIEWCOLUMNS 2
100 /**************************************************************************
101 * IControlPanel_Constructor
103 HRESULT WINAPI
IControlPanel_Constructor(IUnknown
* pUnkOuter
, REFIID riid
, LPVOID
* ppv
)
107 TRACE("unkOut=%p %s\n", pUnkOuter
, shdebugstr_guid(riid
));
111 if (pUnkOuter
&& !IsEqualIID (riid
, &IID_IUnknown
))
112 return CLASS_E_NOAGGREGATION
;
114 sf
= (ICPanelImpl
*) LocalAlloc(LMEM_ZEROINIT
, sizeof(ICPanelImpl
));
116 return E_OUTOFMEMORY
;
121 sf
->lpVtbl
= &vt_ShellFolder2
;
122 sf
->lpVtblPersistFolder2
= &vt_PersistFolder2
;
123 sf
->lpVtblShellExecuteHookW
= &vt_ShellExecuteHookW
;
124 sf
->lpVtblShellExecuteHookA
= &vt_ShellExecuteHookA
;
125 sf
->lpVtblContextMenu
= &vt_ContextMenu
;
126 sf
->pidlRoot
= _ILCreateControlPanel(); /* my qualified pidl */
127 sf
->pUnkOuter
= pUnkOuter
? pUnkOuter
: _IUnknown_ (sf
);
129 if (!SUCCEEDED(IUnknown_QueryInterface(_IUnknown_(sf
), riid
, ppv
))) {
130 IUnknown_Release(_IUnknown_(sf
));
131 return E_NOINTERFACE
;
134 TRACE("--(%p)\n", sf
);
138 /**************************************************************************
139 * ISF_ControlPanel_fnQueryInterface
141 * NOTES supports not IPersist/IPersistFolder
143 static HRESULT WINAPI
ISF_ControlPanel_fnQueryInterface(IShellFolder2
* iface
, REFIID riid
, LPVOID
* ppvObject
)
145 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
147 TRACE("(%p)->(%s,%p)\n", This
, shdebugstr_guid(riid
), ppvObject
);
151 if (IsEqualIID(riid
, &IID_IUnknown
) ||
152 IsEqualIID(riid
, &IID_IShellFolder
) || IsEqualIID(riid
, &IID_IShellFolder2
))
154 else if (IsEqualIID(riid
, &IID_IPersist
) ||
155 IsEqualIID(riid
, &IID_IPersistFolder
) || IsEqualIID(riid
, &IID_IPersistFolder2
))
156 *ppvObject
= _IPersistFolder2_(This
);
157 else if (IsEqualIID(riid
, &IID_IShellExecuteHookW
))
158 *ppvObject
= _IShellExecuteHookW_(This
);
159 else if (IsEqualIID(riid
, &IID_IShellExecuteHookA
))
160 *ppvObject
= _IShellExecuteHookA_(This
);
163 IUnknown_AddRef((IUnknown
*)(*ppvObject
));
164 TRACE("-- Interface:(%p)->(%p)\n", ppvObject
, *ppvObject
);
167 TRACE("-- Interface: E_NOINTERFACE\n");
168 return E_NOINTERFACE
;
171 static ULONG WINAPI
ISF_ControlPanel_fnAddRef(IShellFolder2
* iface
)
173 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
174 ULONG refCount
= InterlockedIncrement(&This
->ref
);
176 TRACE("(%p)->(count=%u)\n", This
, refCount
- 1);
181 static ULONG WINAPI
ISF_ControlPanel_fnRelease(IShellFolder2
* iface
)
183 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
184 ULONG refCount
= InterlockedDecrement(&This
->ref
);
186 TRACE("(%p)->(count=%u)\n", This
, refCount
+ 1);
189 TRACE("-- destroying IShellFolder(%p)\n", This
);
190 SHFree(This
->pidlRoot
);
191 LocalFree((HLOCAL
) This
);
196 /**************************************************************************
197 * ISF_ControlPanel_fnParseDisplayName
199 static HRESULT WINAPI
200 ISF_ControlPanel_fnParseDisplayName(IShellFolder2
* iface
,
203 LPOLESTR lpszDisplayName
,
204 DWORD
* pchEaten
, LPITEMIDLIST
* ppidl
, DWORD
* pdwAttributes
)
206 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
207 WCHAR szElement
[MAX_PATH
];
208 LPCWSTR szNext
= NULL
;
209 LPITEMIDLIST pidlTemp
= NULL
;
213 TRACE ("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n",
214 This
, hwndOwner
, pbc
, lpszDisplayName
, debugstr_w(lpszDisplayName
),
215 pchEaten
, ppidl
, pdwAttributes
);
217 if (!lpszDisplayName
|| !ppidl
)
223 *pchEaten
= 0; /* strange but like the original */
225 if (lpszDisplayName
[0] == ':' && lpszDisplayName
[1] == ':')
227 szNext
= GetNextElementW (lpszDisplayName
, szElement
, MAX_PATH
);
228 TRACE ("-- element: %s\n", debugstr_w (szElement
));
229 CLSIDFromString (szElement
+ 2, &clsid
);
230 pidlTemp
= _ILCreateGuid (PT_GUID
, &clsid
);
232 else if( (pidlTemp
= SHELL32_CreatePidlFromBindCtx(pbc
, lpszDisplayName
)) )
238 if (SUCCEEDED(hr
) && pidlTemp
)
240 if (szNext
&& *szNext
)
242 hr
= SHELL32_ParseNextElement(iface
, hwndOwner
, pbc
,
243 &pidlTemp
, (LPOLESTR
) szNext
, pchEaten
, pdwAttributes
);
247 if (pdwAttributes
&& *pdwAttributes
)
248 hr
= SHELL32_GetItemAttributes(_IShellFolder_ (This
),
249 pidlTemp
, pdwAttributes
);
255 TRACE ("(%p)->(-- ret=0x%08x)\n", This
, hr
);
260 static LPITEMIDLIST
_ILCreateCPanelApplet(LPCSTR name
, LPCSTR displayName
,
261 LPCSTR comment
, int iconIdx
)
266 int size0
= (char*)&tmp
.u
.cpanel
.szName
-(char*)&tmp
.u
.cpanel
;
270 tmp
.type
= PT_CPLAPPLET
;
271 tmp
.u
.cpanel
.dummy
= 0;
272 tmp
.u
.cpanel
.iconIdx
= iconIdx
;
277 tmp
.u
.cpanel
.offsDispName
= l
+1;
278 l
= strlen(displayName
);
281 tmp
.u
.cpanel
.offsComment
= tmp
.u
.cpanel
.offsDispName
+1+l
;
285 pidl
= SHAlloc(size
+4);
289 pidl
->mkid
.cb
= size
+2;
290 memcpy(pidl
->mkid
.abID
, &tmp
, 2+size0
);
292 p
= &((PIDLDATA
*)pidl
->mkid
.abID
)->u
.cpanel
;
293 strcpy(p
->szName
, name
);
294 strcpy(p
->szName
+tmp
.u
.cpanel
.offsDispName
, displayName
);
295 strcpy(p
->szName
+tmp
.u
.cpanel
.offsComment
, comment
);
297 *(WORD
*)((char*)pidl
+(size
+2)) = 0;
304 /**************************************************************************
305 * _ILGetCPanelPointer()
306 * gets a pointer to the control panel struct stored in the pidl
308 static PIDLCPanelStruct
* _ILGetCPanelPointer(LPCITEMIDLIST pidl
)
310 LPPIDLDATA pdata
= _ILGetDataPointer(pidl
);
312 if (pdata
&& pdata
->type
==PT_CPLAPPLET
)
313 return (PIDLCPanelStruct
*)&(pdata
->u
.cpanel
);
318 static BOOL
SHELL_RegisterCPanelApp(IEnumIDList
* list
, LPCSTR path
)
327 char displayName
[MAX_PATH
];
328 char comment
[MAX_PATH
];
330 WCHAR wpath
[MAX_PATH
];
332 MultiByteToWideChar(CP_ACP
, 0, path
, -1, wpath
, MAX_PATH
);
335 applet
= Control_LoadApplet(0, wpath
, &panel
);
339 for(i
=0; i
<applet
->count
; ++i
)
341 WideCharToMultiByte(CP_ACP
, 0, applet
->info
[i
].szName
, -1, displayName
, MAX_PATH
, 0, 0);
342 WideCharToMultiByte(CP_ACP
, 0, applet
->info
[i
].szInfo
, -1, comment
, MAX_PATH
, 0, 0);
344 applet
->proc(0, CPL_INQUIRE
, i
, (LPARAM
)&info
);
347 iconIdx
= -info
.idIcon
; /* negative icon index instead of icon number */
351 pidl
= _ILCreateCPanelApplet(path
, displayName
, comment
, iconIdx
);
354 AddToEnumList(list
, pidl
);
356 Control_UnloadApplet(applet
);
361 static int SHELL_RegisterRegistryCPanelApps(IEnumIDList
* list
, HKEY hkey_root
, LPCSTR szRepPath
)
364 char value
[MAX_PATH
];
369 if (RegOpenKeyA(hkey_root
, szRepPath
, &hkey
) == ERROR_SUCCESS
)
375 DWORD nameLen
= MAX_PATH
;
376 DWORD valueLen
= MAX_PATH
;
378 if (RegEnumValueA(hkey
, idx
, name
, &nameLen
, NULL
, NULL
, (LPBYTE
)&value
, &valueLen
) != ERROR_SUCCESS
)
381 if (SHELL_RegisterCPanelApp(list
, value
))
390 static int SHELL_RegisterCPanelFolders(IEnumIDList
* list
, HKEY hkey_root
, LPCSTR szRepPath
)
397 if (RegOpenKeyA(hkey_root
, szRepPath
, &hkey
) == ERROR_SUCCESS
)
402 if (RegEnumKeyA(hkey
, idx
, name
, MAX_PATH
) != ERROR_SUCCESS
)
407 LPITEMIDLIST pidl
= _ILCreateGuidFromStrA(name
);
409 if (pidl
&& AddToEnumList(list
, pidl
))
420 /**************************************************************************
421 * CreateCPanelEnumList()
423 static BOOL
CreateCPanelEnumList(
427 CHAR szPath
[MAX_PATH
];
428 WIN32_FIND_DATAA wfd
;
431 TRACE("(%p)->(flags=0x%08x)\n", iface
, dwFlags
);
433 /* enumerate control panel folders */
434 if (dwFlags
& SHCONTF_FOLDERS
)
435 SHELL_RegisterCPanelFolders(iface
, HKEY_LOCAL_MACHINE
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ControlPanel\\NameSpace");
437 /* enumerate the control panel applets */
438 if (dwFlags
& SHCONTF_NONFOLDERS
)
442 GetSystemDirectoryA(szPath
, MAX_PATH
);
443 p
= PathAddBackslashA(szPath
);
446 TRACE("-- (%p)-> enumerate SHCONTF_NONFOLDERS of %s\n",iface
,debugstr_a(szPath
));
447 hFile
= FindFirstFileA(szPath
, &wfd
);
449 if (hFile
!= INVALID_HANDLE_VALUE
)
453 if (!(dwFlags
& SHCONTF_INCLUDEHIDDEN
) && (wfd
.dwFileAttributes
& FILE_ATTRIBUTE_HIDDEN
))
456 if (!(wfd
.dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)) {
457 strcpy(p
, wfd
.cFileName
);
458 if (strcmp(wfd
.cFileName
, "ncpa.cpl"))
459 SHELL_RegisterCPanelApp((IEnumIDList
*)iface
, szPath
);
461 } while(FindNextFileA(hFile
, &wfd
));
465 SHELL_RegisterRegistryCPanelApps((IEnumIDList
*)iface
, HKEY_LOCAL_MACHINE
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls");
466 SHELL_RegisterRegistryCPanelApps((IEnumIDList
*)iface
, HKEY_CURRENT_USER
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls");
471 /**************************************************************************
472 * ISF_ControlPanel_fnEnumObjects
474 static HRESULT WINAPI
475 ISF_ControlPanel_fnEnumObjects(IShellFolder2
* iface
, HWND hwndOwner
, DWORD dwFlags
, LPENUMIDLIST
* ppEnumIDList
)
477 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
479 TRACE("(%p)->(HWND=%p flags=0x%08x pplist=%p)\n", This
, hwndOwner
, dwFlags
, ppEnumIDList
);
481 *ppEnumIDList
= IEnumIDList_Constructor();
483 CreateCPanelEnumList(*ppEnumIDList
, dwFlags
);
485 TRACE("--(%p)->(new ID List: %p)\n", This
, *ppEnumIDList
);
487 return(*ppEnumIDList
) ? S_OK
: E_OUTOFMEMORY
;
490 /**************************************************************************
491 * ISF_ControlPanel_fnBindToObject
493 static HRESULT WINAPI
494 ISF_ControlPanel_fnBindToObject(IShellFolder2
* iface
, LPCITEMIDLIST pidl
,
495 LPBC pbcReserved
, REFIID riid
, LPVOID
* ppvOut
)
497 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
499 TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This
, pidl
, pbcReserved
, shdebugstr_guid(riid
), ppvOut
);
501 return SHELL32_BindToChild(This
->pidlRoot
, NULL
, pidl
, riid
, ppvOut
);
504 /**************************************************************************
505 * ISF_ControlPanel_fnBindToStorage
507 static HRESULT WINAPI
508 ISF_ControlPanel_fnBindToStorage(IShellFolder2
* iface
,
509 LPCITEMIDLIST pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
* ppvOut
)
511 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
513 FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This
, pidl
, pbcReserved
, shdebugstr_guid(riid
), ppvOut
);
519 /**************************************************************************
520 * ISF_ControlPanel_fnCompareIDs
523 static HRESULT WINAPI
524 ISF_ControlPanel_fnCompareIDs(IShellFolder2
* iface
, LPARAM lParam
, LPCITEMIDLIST pidl1
, LPCITEMIDLIST pidl2
)
526 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
530 TRACE("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This
, lParam
, pidl1
, pidl2
);
531 nReturn
= SHELL32_CompareIDs(_IShellFolder_(This
), lParam
, pidl1
, pidl2
);
532 TRACE("-- %i\n", nReturn
);
536 /**************************************************************************
537 * ISF_ControlPanel_fnCreateViewObject
539 static HRESULT WINAPI
540 ISF_ControlPanel_fnCreateViewObject(IShellFolder2
* iface
, HWND hwndOwner
, REFIID riid
, LPVOID
* ppvOut
)
542 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
544 LPSHELLVIEW pShellView
;
545 HRESULT hr
= E_INVALIDARG
;
547 TRACE("(%p)->(hwnd=%p,%s,%p)\n", This
, hwndOwner
, shdebugstr_guid(riid
), ppvOut
);
552 if (IsEqualIID(riid
, &IID_IDropTarget
)) {
553 WARN("IDropTarget not implemented\n");
555 } else if (IsEqualIID(riid
, &IID_IContextMenu
)) {
556 WARN("IContextMenu not implemented\n");
558 } else if (IsEqualIID(riid
, &IID_IShellView
)) {
559 pShellView
= IShellView_Constructor((IShellFolder
*) iface
);
561 hr
= IShellView_QueryInterface(pShellView
, riid
, ppvOut
);
562 IShellView_Release(pShellView
);
566 TRACE("--(%p)->(interface=%p)\n", This
, ppvOut
);
570 /**************************************************************************
571 * ISF_ControlPanel_fnGetAttributesOf
573 static HRESULT WINAPI
574 ISF_ControlPanel_fnGetAttributesOf(IShellFolder2
* iface
, UINT cidl
, LPCITEMIDLIST
* apidl
, DWORD
* rgfInOut
)
576 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
580 TRACE("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n",
581 This
, cidl
, apidl
, rgfInOut
, rgfInOut
? *rgfInOut
: 0);
591 while(cidl
> 0 && *apidl
) {
593 SHELL32_GetItemAttributes(_IShellFolder_(This
), *apidl
, rgfInOut
);
597 /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
598 *rgfInOut
&= ~SFGAO_VALIDATE
;
600 TRACE("-- result=0x%08x\n", *rgfInOut
);
604 /**************************************************************************
605 * ISF_ControlPanel_fnGetUIObjectOf
608 * HWND hwndOwner, //[in ] Parent window for any output
609 * UINT cidl, //[in ] array size
610 * LPCITEMIDLIST* apidl, //[in ] simple pidl array
611 * REFIID riid, //[in ] Requested Interface
612 * UINT* prgfInOut, //[ ] reserved
613 * LPVOID* ppvObject) //[out] Resulting Interface
616 static HRESULT WINAPI
617 ISF_ControlPanel_fnGetUIObjectOf(IShellFolder2
* iface
,
619 UINT cidl
, LPCITEMIDLIST
* apidl
, REFIID riid
, UINT
* prgfInOut
, LPVOID
* ppvOut
)
621 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
624 IUnknown
*pObj
= NULL
;
625 HRESULT hr
= E_INVALIDARG
;
627 TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n",
628 This
, hwndOwner
, cidl
, apidl
, shdebugstr_guid(riid
), prgfInOut
, ppvOut
);
633 if (IsEqualIID(riid
, &IID_IContextMenu
) &&(cidl
>= 1)) {
635 // create a seperate item struct
637 pObj
= (IUnknown
*)(&This
->lpVtblContextMenu
);
640 IUnknown_AddRef(pObj
);
642 } else if (IsEqualIID(riid
, &IID_IDataObject
) &&(cidl
>= 1)) {
643 pObj
= (LPUNKNOWN
) IDataObject_Constructor(hwndOwner
, This
->pidlRoot
, apidl
, cidl
);
645 } else if (IsEqualIID(riid
, &IID_IExtractIconA
) &&(cidl
== 1)) {
646 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
647 pObj
= (LPUNKNOWN
) IExtractIconA_Constructor(pidl
);
650 } else if (IsEqualIID(riid
, &IID_IExtractIconW
) &&(cidl
== 1)) {
651 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
652 pObj
= (LPUNKNOWN
) IExtractIconW_Constructor(pidl
);
655 } else if ((IsEqualIID(riid
,&IID_IShellLinkW
) || IsEqualIID(riid
,&IID_IShellLinkA
))
657 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
658 hr
= IShellLink_ConstructFromFile(NULL
, riid
, pidl
,(LPVOID
*)&pObj
);
664 if (SUCCEEDED(hr
) && !pObj
)
669 TRACE("(%p)->hr=0x%08x\n", This
, hr
);
673 /**************************************************************************
674 * ISF_ControlPanel_fnGetDisplayNameOf
676 static HRESULT WINAPI
ISF_ControlPanel_fnGetDisplayNameOf(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, DWORD dwFlags
, LPSTRRET strRet
)
678 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
680 CHAR szPath
[MAX_PATH
];
681 WCHAR wszPath
[MAX_PATH
+1]; /* +1 for potential backslash */
682 PIDLCPanelStruct
* pcpanel
;
686 TRACE("(%p)->(pidl=%p,0x%08x,%p)\n", This
, pidl
, dwFlags
, strRet
);
689 if (!pidl
|| !strRet
)
692 pcpanel
= _ILGetCPanelPointer(pidl
);
695 lstrcpyA(szPath
, pcpanel
->szName
+pcpanel
->offsDispName
);
697 if (!(dwFlags
& SHGDN_FORPARSING
))
698 FIXME("retrieve display name from control panel app\n");
700 /* take names of special folders only if it's only this folder */
701 else if (_ILIsSpecialFolder(pidl
)) {
702 BOOL bSimplePidl
= _ILIsPidlSimple(pidl
);
705 _ILSimpleGetTextW(pidl
, wszPath
, MAX_PATH
); /* append my own path */
707 FIXME("special pidl\n");
710 if ((dwFlags
& SHGDN_FORPARSING
) && !bSimplePidl
) { /* go deeper if needed */
713 PathAddBackslashW(wszPath
);
714 len
= wcslen(wszPath
);
717 (SHELL32_GetDisplayNameOfChild(iface
, pidl
, dwFlags
, wszPath
+ len
, MAX_PATH
+ 1 - len
)))
718 return E_OUTOFMEMORY
;
719 if (!WideCharToMultiByte(CP_ACP
, 0, wszPath
, -1, szPath
, MAX_PATH
, NULL
, NULL
))
723 if (!WideCharToMultiByte(CP_ACP
, 0, wszPath
, -1, szPath
, MAX_PATH
, NULL
, NULL
))
729 strRet
->uType
= STRRET_CSTR
;
730 lstrcpynA(strRet
->u
.cStr
, szPath
, MAX_PATH
);
732 TRACE("--(%p)->(%s)\n", This
, szPath
);
736 /**************************************************************************
737 * ISF_ControlPanel_fnSetNameOf
738 * Changes the name of a file object or subfolder, possibly changing its item
739 * identifier in the process.
742 * HWND hwndOwner, //[in ] Owner window for output
743 * LPCITEMIDLIST pidl, //[in ] simple pidl of item to change
744 * LPCOLESTR lpszName, //[in ] the items new display name
745 * DWORD dwFlags, //[in ] SHGNO formatting flags
746 * LPITEMIDLIST* ppidlOut) //[out] simple pidl returned
748 static HRESULT WINAPI
ISF_ControlPanel_fnSetNameOf(IShellFolder2
* iface
, HWND hwndOwner
, LPCITEMIDLIST pidl
, /*simple pidl */
749 LPCOLESTR lpName
, DWORD dwFlags
, LPITEMIDLIST
* pPidlOut
)
751 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
752 FIXME("(%p)->(%p,pidl=%p,%s,%u,%p)\n", This
, hwndOwner
, pidl
, debugstr_w(lpName
), dwFlags
, pPidlOut
);
756 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultSearchGUID(IShellFolder2
* iface
, GUID
* pguid
)
758 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
759 FIXME("(%p)\n", This
);
762 static HRESULT WINAPI
ISF_ControlPanel_fnEnumSearches(IShellFolder2
* iface
, IEnumExtraSearch
** ppenum
)
764 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
765 FIXME("(%p)\n", This
);
768 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultColumn(IShellFolder2
* iface
, DWORD dwRes
, ULONG
* pSort
, ULONG
* pDisplay
)
770 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
772 TRACE("(%p)\n", This
);
774 if (pSort
) *pSort
= 0;
775 if (pDisplay
) *pDisplay
= 0;
778 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultColumnState(IShellFolder2
* iface
, UINT iColumn
, DWORD
* pcsFlags
)
780 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
782 TRACE("(%p)\n", This
);
784 if (!pcsFlags
|| iColumn
>= CONROLPANELSHELLVIEWCOLUMNS
) return E_INVALIDARG
;
785 *pcsFlags
= ControlPanelSFHeader
[iColumn
].pcsFlags
;
788 static HRESULT WINAPI
ISF_ControlPanel_fnGetDetailsEx(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, const SHCOLUMNID
* pscid
, VARIANT
* pv
)
790 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
791 FIXME("(%p)\n", This
);
795 static HRESULT WINAPI
ISF_ControlPanel_fnGetDetailsOf(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, UINT iColumn
, SHELLDETAILS
* psd
)
797 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
800 TRACE("(%p)->(%p %i %p)\n", This
, pidl
, iColumn
, psd
);
802 if (!psd
|| iColumn
>= CONROLPANELSHELLVIEWCOLUMNS
)
806 psd
->fmt
= ControlPanelSFHeader
[iColumn
].fmt
;
807 psd
->cxChar
= ControlPanelSFHeader
[iColumn
].cxChar
;
808 psd
->str
.uType
= STRRET_CSTR
;
809 LoadStringA(shell32_hInstance
, ControlPanelSFHeader
[iColumn
].colnameid
, psd
->str
.u
.cStr
, MAX_PATH
);
812 psd
->str
.u
.cStr
[0] = 0x00;
813 psd
->str
.uType
= STRRET_CSTR
;
816 hr
= IShellFolder_GetDisplayNameOf(iface
, pidl
, SHGDN_NORMAL
| SHGDN_INFOLDER
, &psd
->str
);
818 case 1: /* comment */
819 _ILGetFileType(pidl
, psd
->str
.u
.cStr
, MAX_PATH
);
827 static HRESULT WINAPI
ISF_ControlPanel_fnMapColumnToSCID(IShellFolder2
* iface
, UINT column
, SHCOLUMNID
* pscid
)
829 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
830 FIXME("(%p)\n", This
);
834 static const IShellFolder2Vtbl vt_ShellFolder2
=
837 ISF_ControlPanel_fnQueryInterface
,
838 ISF_ControlPanel_fnAddRef
,
839 ISF_ControlPanel_fnRelease
,
840 ISF_ControlPanel_fnParseDisplayName
,
841 ISF_ControlPanel_fnEnumObjects
,
842 ISF_ControlPanel_fnBindToObject
,
843 ISF_ControlPanel_fnBindToStorage
,
844 ISF_ControlPanel_fnCompareIDs
,
845 ISF_ControlPanel_fnCreateViewObject
,
846 ISF_ControlPanel_fnGetAttributesOf
,
847 ISF_ControlPanel_fnGetUIObjectOf
,
848 ISF_ControlPanel_fnGetDisplayNameOf
,
849 ISF_ControlPanel_fnSetNameOf
,
852 ISF_ControlPanel_fnGetDefaultSearchGUID
,
853 ISF_ControlPanel_fnEnumSearches
,
854 ISF_ControlPanel_fnGetDefaultColumn
,
855 ISF_ControlPanel_fnGetDefaultColumnState
,
856 ISF_ControlPanel_fnGetDetailsEx
,
857 ISF_ControlPanel_fnGetDetailsOf
,
858 ISF_ControlPanel_fnMapColumnToSCID
861 /************************************************************************
862 * ICPanel_PersistFolder2_QueryInterface
864 static HRESULT WINAPI
ICPanel_PersistFolder2_QueryInterface(IPersistFolder2
* iface
, REFIID iid
, LPVOID
* ppvObject
)
866 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
868 TRACE("(%p)\n", This
);
870 return IUnknown_QueryInterface(_IUnknown_(This
), iid
, ppvObject
);
873 /************************************************************************
874 * ICPanel_PersistFolder2_AddRef
876 static ULONG WINAPI
ICPanel_PersistFolder2_AddRef(IPersistFolder2
* iface
)
878 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
880 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
882 return IUnknown_AddRef(_IUnknown_(This
));
885 /************************************************************************
886 * ISFPersistFolder_Release
888 static ULONG WINAPI
ICPanel_PersistFolder2_Release(IPersistFolder2
* iface
)
890 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
892 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
894 return IUnknown_Release(_IUnknown_(This
));
897 /************************************************************************
898 * ICPanel_PersistFolder2_GetClassID
900 static HRESULT WINAPI
ICPanel_PersistFolder2_GetClassID(IPersistFolder2
* iface
, CLSID
* lpClassId
)
902 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
904 TRACE("(%p)\n", This
);
908 *lpClassId
= CLSID_ControlPanel
;
913 /************************************************************************
914 * ICPanel_PersistFolder2_Initialize
916 * NOTES: it makes no sense to change the pidl
918 static HRESULT WINAPI
ICPanel_PersistFolder2_Initialize(IPersistFolder2
* iface
, LPCITEMIDLIST pidl
)
920 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
922 SHFree((LPVOID
)This
->pidlRoot
);
924 This
->pidlRoot
= ILClone(pidl
);
928 /**************************************************************************
929 * IPersistFolder2_fnGetCurFolder
931 static HRESULT WINAPI
ICPanel_PersistFolder2_GetCurFolder(IPersistFolder2
* iface
, LPITEMIDLIST
* pidl
)
933 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
935 TRACE("(%p)->(%p)\n", This
, pidl
);
939 *pidl
= ILClone(This
->pidlRoot
);
943 static const IPersistFolder2Vtbl vt_PersistFolder2
=
946 ICPanel_PersistFolder2_QueryInterface
,
947 ICPanel_PersistFolder2_AddRef
,
948 ICPanel_PersistFolder2_Release
,
949 ICPanel_PersistFolder2_GetClassID
,
950 ICPanel_PersistFolder2_Initialize
,
951 ICPanel_PersistFolder2_GetCurFolder
954 HRESULT
CPanel_GetIconLocationW(LPCITEMIDLIST pidl
,
955 LPWSTR szIconFile
, UINT cchMax
, int* piIndex
)
957 PIDLCPanelStruct
* pcpanel
= _ILGetCPanelPointer(pidl
);
962 MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
, -1, szIconFile
, cchMax
);
963 *piIndex
= pcpanel
->iconIdx
!=-1? pcpanel
->iconIdx
: 0;
969 /**************************************************************************
970 * IShellExecuteHookW Implementation
973 static HRESULT WINAPI
IShellExecuteHookW_fnQueryInterface(
974 IShellExecuteHookW
* iface
, REFIID riid
, void** ppvObject
)
976 ICPanelImpl
*This
= impl_from_IShellExecuteHookW(iface
);
978 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
980 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
983 static ULONG STDMETHODCALLTYPE
IShellExecuteHookW_fnAddRef(IShellExecuteHookW
* iface
)
985 ICPanelImpl
*This
= impl_from_IShellExecuteHookW(iface
);
987 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
989 return IUnknown_AddRef(This
->pUnkOuter
);
992 static ULONG STDMETHODCALLTYPE
IShellExecuteHookW_fnRelease(IShellExecuteHookW
* iface
)
994 ICPanelImpl
*This
= impl_from_IShellExecuteHookW(iface
);
996 TRACE("(%p)\n", This
);
998 return IUnknown_Release(This
->pUnkOuter
);
1002 ExecuteAppletFromCLSID(LPOLESTR pOleStr
)
1004 WCHAR szCmd
[MAX_PATH
];
1005 WCHAR szExpCmd
[MAX_PATH
];
1006 PROCESS_INFORMATION pi
;
1008 WCHAR szBuffer
[90] = { 'C', 'L', 'S', 'I', 'D', '\\', 0 };
1009 DWORD dwType
, dwSize
;
1011 wcscpy(&szBuffer
[6], pOleStr
);
1012 wcscat(szBuffer
, L
"\\shell\\open\\command");
1014 dwSize
= sizeof(szCmd
);
1015 if (RegGetValueW(HKEY_CLASSES_ROOT
, szBuffer
, NULL
, RRF_RT_REG_SZ
, &dwType
, (PVOID
)szCmd
, &dwSize
) != ERROR_SUCCESS
)
1017 wcscpy(szCmd
, L
"%SystemRoot%\\Explorer.exe ::");
1018 wcscat(szCmd
, pOleStr
);
1022 if (dwType
!= RRF_RT_REG_SZ
&& dwType
!= RRF_RT_REG_EXPAND_SZ
)
1026 if (!ExpandEnvironmentStringsW(szCmd
, szExpCmd
, sizeof(szExpCmd
)/sizeof(WCHAR
)))
1029 ZeroMemory(&si
, sizeof(si
));
1031 if (!CreateProcessW(NULL
, szExpCmd
, NULL
, NULL
, FALSE
, 0, NULL
, NULL
, &si
, &pi
))
1034 CloseHandle(pi
.hProcess
);
1035 CloseHandle(pi
.hThread
);
1040 static HRESULT WINAPI
IShellExecuteHookW_fnExecute(IShellExecuteHookW
* iface
, LPSHELLEXECUTEINFOW psei
)
1042 static const WCHAR wCplopen
[] = {'c','p','l','o','p','e','n','\0'};
1043 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
1045 SHELLEXECUTEINFOW sei_tmp
;
1046 PIDLCPanelStruct
* pcpanel
;
1047 WCHAR path
[MAX_PATH
];
1048 WCHAR params
[MAX_PATH
];
1053 TRACE("(%p)->execute(%p)\n", This
, psei
);
1056 return E_INVALIDARG
;
1058 pcpanel
= _ILGetCPanelPointer(ILFindLastID(psei
->lpIDList
));
1064 IID
* iid
= _ILGetGUIDPointer(ILFindLastID(psei
->lpIDList
));
1066 return E_INVALIDARG
;
1067 if (StringFromCLSID(iid
, &pOleStr
) == S_OK
)
1070 hr
= ExecuteAppletFromCLSID(pOleStr
);
1071 CoTaskMemFree(pOleStr
);
1075 return E_INVALIDARG
;
1078 /* Return value from MultiByteToWideChar includes terminating NUL, which
1079 * compensates for the starting double quote we just put in */
1080 l
= MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
, -1, path
+1, MAX_PATH
);
1082 /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */
1086 MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
+pcpanel
->offsDispName
, -1, params
, MAX_PATH
);
1088 memcpy(&sei_tmp
, psei
, sizeof(sei_tmp
));
1089 sei_tmp
.lpFile
= path
;
1090 sei_tmp
.lpParameters
= params
;
1091 sei_tmp
.fMask
&= ~SEE_MASK_INVOKEIDLIST
;
1092 sei_tmp
.lpVerb
= wCplopen
;
1094 ret
= ShellExecuteExW(&sei_tmp
);
1101 static const IShellExecuteHookWVtbl vt_ShellExecuteHookW
=
1104 IShellExecuteHookW_fnQueryInterface
,
1105 IShellExecuteHookW_fnAddRef
,
1106 IShellExecuteHookW_fnRelease
,
1108 IShellExecuteHookW_fnExecute
1112 /**************************************************************************
1113 * IShellExecuteHookA Implementation
1116 static HRESULT WINAPI
IShellExecuteHookA_fnQueryInterface(IShellExecuteHookA
* iface
, REFIID riid
, void** ppvObject
)
1118 ICPanelImpl
*This
= impl_from_IShellExecuteHookA(iface
);
1120 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
1122 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
1125 static ULONG STDMETHODCALLTYPE
IShellExecuteHookA_fnAddRef(IShellExecuteHookA
* iface
)
1127 ICPanelImpl
*This
= impl_from_IShellExecuteHookA(iface
);
1129 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
1131 return IUnknown_AddRef(This
->pUnkOuter
);
1134 static ULONG STDMETHODCALLTYPE
IShellExecuteHookA_fnRelease(IShellExecuteHookA
* iface
)
1136 ICPanelImpl
*This
= impl_from_IShellExecuteHookA(iface
);
1138 TRACE("(%p)\n", This
);
1140 return IUnknown_Release(This
->pUnkOuter
);
1143 static HRESULT WINAPI
IShellExecuteHookA_fnExecute(IShellExecuteHookA
* iface
, LPSHELLEXECUTEINFOA psei
)
1145 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
1147 SHELLEXECUTEINFOA sei_tmp
;
1148 PIDLCPanelStruct
* pcpanel
;
1149 char path
[MAX_PATH
];
1152 TRACE("(%p)->execute(%p)\n", This
, psei
);
1155 return E_INVALIDARG
;
1157 pcpanel
= _ILGetCPanelPointer(ILFindLastID(psei
->lpIDList
));
1160 return E_INVALIDARG
;
1163 lstrcpyA(path
+1, pcpanel
->szName
);
1165 /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */
1166 lstrcatA(path
, "\" ");
1167 lstrcatA(path
, pcpanel
->szName
+pcpanel
->offsDispName
);
1169 memcpy(&sei_tmp
, psei
, sizeof(sei_tmp
));
1170 sei_tmp
.lpFile
= path
;
1171 sei_tmp
.fMask
&= ~SEE_MASK_INVOKEIDLIST
;
1173 ret
= ShellExecuteExA(&sei_tmp
);
1180 static const IShellExecuteHookAVtbl vt_ShellExecuteHookA
=
1182 IShellExecuteHookA_fnQueryInterface
,
1183 IShellExecuteHookA_fnAddRef
,
1184 IShellExecuteHookA_fnRelease
,
1185 IShellExecuteHookA_fnExecute
1188 /**************************************************************************
1189 * IContextMenu2 Implementation
1192 /************************************************************************
1193 * ICPanel_IContextMenu_QueryInterface
1195 static HRESULT WINAPI
ICPanel_IContextMenu2_QueryInterface(IContextMenu2
* iface
, REFIID iid
, LPVOID
* ppvObject
)
1197 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1199 TRACE("(%p)\n", This
);
1201 return IUnknown_QueryInterface(_IUnknown_(This
), iid
, ppvObject
);
1204 /************************************************************************
1205 * ICPanel_IContextMenu_AddRef
1207 static ULONG WINAPI
ICPanel_IContextMenu2_AddRef(IContextMenu2
* iface
)
1209 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1211 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
1213 return IUnknown_AddRef(_IUnknown_(This
));
1216 /************************************************************************
1217 * ICPanel_IContextMenu_Release
1219 static ULONG WINAPI
ICPanel_IContextMenu2_Release(IContextMenu2
* iface
)
1221 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1223 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
1225 return IUnknown_Release(_IUnknown_(This
));
1228 /**************************************************************************
1229 * ICPanel_IContextMenu_QueryContextMenu()
1231 static HRESULT WINAPI
ICPanel_IContextMenu2_QueryContextMenu(
1232 IContextMenu2
*iface
,
1239 WCHAR szBuffer
[30] = {0};
1242 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1244 TRACE("(%p)->(hmenu=%p indexmenu=%x cmdfirst=%x cmdlast=%x flags=%x )\n",
1245 This
, hMenu
, indexMenu
, idCmdFirst
, idCmdLast
, uFlags
);
1247 if (LoadStringW(shell32_hInstance
, IDS_OPEN
, szBuffer
, sizeof(szBuffer
)/sizeof(WCHAR
)))
1249 szBuffer
[(sizeof(szBuffer
)/sizeof(WCHAR
))-1] = L
'\0';
1250 _InsertMenuItemW(hMenu
, indexMenu
++, TRUE
, IDS_OPEN
, MFT_STRING
, szBuffer
, MFS_DEFAULT
); //FIXME identifier
1254 if (LoadStringW(shell32_hInstance
, IDS_CREATELINK
, szBuffer
, sizeof(szBuffer
)/sizeof(WCHAR
)))
1258 _InsertMenuItemW(hMenu
, indexMenu
++, TRUE
, idCmdFirst
+ Count
, MFT_SEPARATOR
, NULL
, MFS_ENABLED
);
1260 szBuffer
[(sizeof(szBuffer
)/sizeof(WCHAR
))-1] = L
'\0';
1262 _InsertMenuItemW(hMenu
, indexMenu
++, TRUE
, IDS_CREATELINK
, MFT_STRING
, szBuffer
, MFS_ENABLED
); //FIXME identifier
1265 return MAKE_HRESULT(SEVERITY_SUCCESS
, 0, Count
);
1269 /**************************************************************************
1270 * ICPanel_IContextMenu_InvokeCommand()
1272 static HRESULT WINAPI
ICPanel_IContextMenu2_InvokeCommand(
1273 IContextMenu2
*iface
,
1274 LPCMINVOKECOMMANDINFO lpcmi
)
1276 SHELLEXECUTEINFOW sei
;
1277 WCHAR szPath
[MAX_PATH
];
1278 char szTarget
[MAX_PATH
];
1281 INT Length
, cLength
;
1282 PIDLCPanelStruct
*pcpanel
;
1285 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1287 TRACE("(%p)->(invcom=%p verb=%p wnd=%p)\n",This
,lpcmi
,lpcmi
->lpVerb
, lpcmi
->hwnd
);
1289 if (lpcmi
->lpVerb
== MAKEINTRESOURCEA(IDS_OPEN
)) //FIXME
1291 ZeroMemory(&sei
, sizeof(sei
));
1292 sei
.cbSize
= sizeof(sei
);
1293 sei
.fMask
= SEE_MASK_INVOKEIDLIST
;
1294 sei
.lpIDList
= ILCombine(This
->pidlRoot
, This
->apidl
[0]);
1295 sei
.hwnd
= lpcmi
->hwnd
;
1296 sei
.nShow
= SW_SHOWNORMAL
;
1297 sei
.lpVerb
= L
"open";
1299 if (ShellExecuteExW(&sei
) == FALSE
)
1302 else if (lpcmi
->lpVerb
== MAKEINTRESOURCEA(IDS_CREATELINK
)) //FIXME
1304 if (!SHGetSpecialFolderPathW(NULL
, szPath
, CSIDL_DESKTOPDIRECTORY
, FALSE
))
1307 pszPath
= PathAddBackslashW(szPath
);
1311 if (IShellFolder_GetDisplayNameOf((IShellFolder
*)This
, This
->apidl
[0], SHGDN_FORPARSING
, &strret
) != S_OK
)
1314 Length
= MAX_PATH
- (pszPath
- szPath
);
1315 cLength
= strlen(strret
.u
.cStr
);
1316 if (Length
< cLength
+ 5)
1322 if (MultiByteToWideChar(CP_ACP
, 0, strret
.u
.cStr
, cLength
+1, pszPath
, Length
))
1330 wcscpy(pszPath
, L
" - ");
1331 cLength
= LoadStringW(shell32_hInstance
, IDS_LNK_FILE
, &pszPath
[3], Length
-4) + 3;
1332 if (cLength
+ 5 > Length
)
1333 cLength
= Length
- 5;
1337 wcscpy(pszPath
, L
".lnk");
1339 pcpanel
= _ILGetCPanelPointer(ILFindLastID(This
->apidl
[0]));
1342 strncpy(szTarget
, pcpanel
->szName
, MAX_PATH
);
1346 FIXME("Couldn't retrieve pointer to cpl structure\n");
1349 if (SUCCEEDED(IShellLink_Constructor(NULL
, &IID_IShellLinkA
, (LPVOID
*)&isl
)))
1351 IShellLinkA_SetPath(isl
, szTarget
);
1352 if (SUCCEEDED(IShellLinkA_QueryInterface(isl
, &IID_IPersistFile
, (LPVOID
*)&ppf
)))
1354 IPersistFile_Save(ppf
, szPath
, TRUE
);
1355 IPersistFile_Release(ppf
);
1357 IShellLinkA_Release(isl
);
1364 /**************************************************************************
1365 * ICPanel_IContextMenu_GetCommandString()
1368 static HRESULT WINAPI
ICPanel_IContextMenu2_GetCommandString(
1369 IContextMenu2
*iface
,
1376 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1378 TRACE("(%p)->(idcom=%lx flags=%x %p name=%p len=%x)\n",This
, idCommand
, uFlags
, lpReserved
, lpszName
, uMaxNameLen
);
1381 FIXME("unknown command string\n");
1387 /**************************************************************************
1388 * ICPanel_IContextMenu_HandleMenuMsg()
1390 static HRESULT WINAPI
ICPanel_IContextMenu2_HandleMenuMsg(
1391 IContextMenu2
*iface
,
1396 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1398 TRACE("ICPanel_IContextMenu_HandleMenuMsg (%p)->(msg=%x wp=%lx lp=%lx)\n",This
, uMsg
, wParam
, lParam
);
1403 static const IContextMenu2Vtbl vt_ContextMenu
=
1405 ICPanel_IContextMenu2_QueryInterface
,
1406 ICPanel_IContextMenu2_AddRef
,
1407 ICPanel_IContextMenu2_Release
,
1408 ICPanel_IContextMenu2_QueryContextMenu
,
1409 ICPanel_IContextMenu2_InvokeCommand
,
1410 ICPanel_IContextMenu2_GetCommandString
,
1411 ICPanel_IContextMenu2_HandleMenuMsg