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 /**************************************************************************
319 * ISF_ControlPanel_fnEnumObjects
321 static BOOL
SHELL_RegisterCPanelApp(IEnumIDList
* list
, LPCSTR path
)
330 char displayName
[MAX_PATH
];
331 char comment
[MAX_PATH
];
333 WCHAR wpath
[MAX_PATH
];
335 MultiByteToWideChar(CP_ACP
, 0, path
, -1, wpath
, MAX_PATH
);
338 applet
= Control_LoadApplet(0, wpath
, &panel
);
342 for(i
=0; i
<applet
->count
; ++i
)
344 WideCharToMultiByte(CP_ACP
, 0, applet
->info
[i
].szName
, -1, displayName
, MAX_PATH
, 0, 0);
345 WideCharToMultiByte(CP_ACP
, 0, applet
->info
[i
].szInfo
, -1, comment
, MAX_PATH
, 0, 0);
347 applet
->proc(0, CPL_INQUIRE
, i
, (LPARAM
)&info
);
350 iconIdx
= -info
.idIcon
; /* negative icon index instead of icon number */
354 pidl
= _ILCreateCPanelApplet(path
, displayName
, comment
, iconIdx
);
357 AddToEnumList(list
, pidl
);
359 Control_UnloadApplet(applet
);
364 static int SHELL_RegisterRegistryCPanelApps(IEnumIDList
* list
, HKEY hkey_root
, LPCSTR szRepPath
)
367 char value
[MAX_PATH
];
372 if (RegOpenKeyA(hkey_root
, szRepPath
, &hkey
) == ERROR_SUCCESS
)
378 DWORD nameLen
= MAX_PATH
;
379 DWORD valueLen
= MAX_PATH
;
381 if (RegEnumValueA(hkey
, idx
, name
, &nameLen
, NULL
, NULL
, (LPBYTE
)&value
, &valueLen
) != ERROR_SUCCESS
)
384 if (SHELL_RegisterCPanelApp(list
, value
))
393 static int SHELL_RegisterCPanelFolders(IEnumIDList
* list
, HKEY hkey_root
, LPCSTR szRepPath
)
400 if (RegOpenKeyA(hkey_root
, szRepPath
, &hkey
) == ERROR_SUCCESS
)
405 if (RegEnumKeyA(hkey
, idx
, name
, MAX_PATH
) != ERROR_SUCCESS
)
410 LPITEMIDLIST pidl
= _ILCreateGuidFromStrA(name
);
412 if (pidl
&& AddToEnumList(list
, pidl
))
423 /**************************************************************************
424 * CreateCPanelEnumList()
426 static BOOL
CreateCPanelEnumList(
430 CHAR szPath
[MAX_PATH
];
431 WIN32_FIND_DATAA wfd
;
434 TRACE("(%p)->(flags=0x%08x)\n", iface
, dwFlags
);
436 /* enumerate control panel folders */
437 if (dwFlags
& SHCONTF_FOLDERS
)
438 SHELL_RegisterCPanelFolders(iface
, HKEY_LOCAL_MACHINE
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ControlPanel\\NameSpace");
440 /* enumerate the control panel applets */
441 if (dwFlags
& SHCONTF_NONFOLDERS
)
445 GetSystemDirectoryA(szPath
, MAX_PATH
);
446 p
= PathAddBackslashA(szPath
);
449 TRACE("-- (%p)-> enumerate SHCONTF_NONFOLDERS of %s\n",iface
,debugstr_a(szPath
));
450 hFile
= FindFirstFileA(szPath
, &wfd
);
452 if (hFile
!= INVALID_HANDLE_VALUE
)
456 if (!(dwFlags
& SHCONTF_INCLUDEHIDDEN
) && (wfd
.dwFileAttributes
& FILE_ATTRIBUTE_HIDDEN
))
459 if (!(wfd
.dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)) {
460 strcpy(p
, wfd
.cFileName
);
461 if (strcmp(wfd
.cFileName
, "ncpa.cpl"))
462 SHELL_RegisterCPanelApp((IEnumIDList
*)iface
, szPath
);
464 } while(FindNextFileA(hFile
, &wfd
));
468 SHELL_RegisterRegistryCPanelApps((IEnumIDList
*)iface
, HKEY_LOCAL_MACHINE
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls");
469 SHELL_RegisterRegistryCPanelApps((IEnumIDList
*)iface
, HKEY_CURRENT_USER
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls");
474 /**************************************************************************
475 * ISF_ControlPanel_fnEnumObjects
477 static HRESULT WINAPI
478 ISF_ControlPanel_fnEnumObjects(IShellFolder2
* iface
, HWND hwndOwner
, DWORD dwFlags
, LPENUMIDLIST
* ppEnumIDList
)
480 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
482 TRACE("(%p)->(HWND=%p flags=0x%08x pplist=%p)\n", This
, hwndOwner
, dwFlags
, ppEnumIDList
);
484 *ppEnumIDList
= IEnumIDList_Constructor();
486 CreateCPanelEnumList(*ppEnumIDList
, dwFlags
);
488 TRACE("--(%p)->(new ID List: %p)\n", This
, *ppEnumIDList
);
490 return(*ppEnumIDList
) ? S_OK
: E_OUTOFMEMORY
;
493 /**************************************************************************
494 * ISF_ControlPanel_fnBindToObject
496 static HRESULT WINAPI
497 ISF_ControlPanel_fnBindToObject(IShellFolder2
* iface
, LPCITEMIDLIST pidl
,
498 LPBC pbcReserved
, REFIID riid
, LPVOID
* ppvOut
)
500 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
502 TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This
, pidl
, pbcReserved
, shdebugstr_guid(riid
), ppvOut
);
504 return SHELL32_BindToChild(This
->pidlRoot
, NULL
, pidl
, riid
, ppvOut
);
507 /**************************************************************************
508 * ISF_ControlPanel_fnBindToStorage
510 static HRESULT WINAPI
511 ISF_ControlPanel_fnBindToStorage(IShellFolder2
* iface
,
512 LPCITEMIDLIST pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
* ppvOut
)
514 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
516 FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This
, pidl
, pbcReserved
, shdebugstr_guid(riid
), ppvOut
);
522 /**************************************************************************
523 * ISF_ControlPanel_fnCompareIDs
526 static HRESULT WINAPI
527 ISF_ControlPanel_fnCompareIDs(IShellFolder2
* iface
, LPARAM lParam
, LPCITEMIDLIST pidl1
, LPCITEMIDLIST pidl2
)
529 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
533 TRACE("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This
, lParam
, pidl1
, pidl2
);
534 nReturn
= SHELL32_CompareIDs(_IShellFolder_(This
), lParam
, pidl1
, pidl2
);
535 TRACE("-- %i\n", nReturn
);
539 /**************************************************************************
540 * ISF_ControlPanel_fnCreateViewObject
542 static HRESULT WINAPI
543 ISF_ControlPanel_fnCreateViewObject(IShellFolder2
* iface
, HWND hwndOwner
, REFIID riid
, LPVOID
* ppvOut
)
545 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
547 LPSHELLVIEW pShellView
;
548 HRESULT hr
= E_INVALIDARG
;
550 TRACE("(%p)->(hwnd=%p,%s,%p)\n", This
, hwndOwner
, shdebugstr_guid(riid
), ppvOut
);
555 if (IsEqualIID(riid
, &IID_IDropTarget
)) {
556 WARN("IDropTarget not implemented\n");
558 } else if (IsEqualIID(riid
, &IID_IContextMenu
)) {
559 WARN("IContextMenu not implemented\n");
561 } else if (IsEqualIID(riid
, &IID_IShellView
)) {
562 pShellView
= IShellView_Constructor((IShellFolder
*) iface
);
564 hr
= IShellView_QueryInterface(pShellView
, riid
, ppvOut
);
565 IShellView_Release(pShellView
);
569 TRACE("--(%p)->(interface=%p)\n", This
, ppvOut
);
573 /**************************************************************************
574 * ISF_ControlPanel_fnGetAttributesOf
576 static HRESULT WINAPI
577 ISF_ControlPanel_fnGetAttributesOf(IShellFolder2
* iface
, UINT cidl
, LPCITEMIDLIST
* apidl
, DWORD
* rgfInOut
)
579 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
583 TRACE("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n",
584 This
, cidl
, apidl
, rgfInOut
, rgfInOut
? *rgfInOut
: 0);
594 while(cidl
> 0 && *apidl
) {
596 SHELL32_GetItemAttributes(_IShellFolder_(This
), *apidl
, rgfInOut
);
600 /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
601 *rgfInOut
&= ~SFGAO_VALIDATE
;
603 TRACE("-- result=0x%08x\n", *rgfInOut
);
607 /**************************************************************************
608 * ISF_ControlPanel_fnGetUIObjectOf
611 * HWND hwndOwner, //[in ] Parent window for any output
612 * UINT cidl, //[in ] array size
613 * LPCITEMIDLIST* apidl, //[in ] simple pidl array
614 * REFIID riid, //[in ] Requested Interface
615 * UINT* prgfInOut, //[ ] reserved
616 * LPVOID* ppvObject) //[out] Resulting Interface
619 static HRESULT WINAPI
620 ISF_ControlPanel_fnGetUIObjectOf(IShellFolder2
* iface
,
622 UINT cidl
, LPCITEMIDLIST
* apidl
, REFIID riid
, UINT
* prgfInOut
, LPVOID
* ppvOut
)
624 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
627 IUnknown
*pObj
= NULL
;
628 HRESULT hr
= E_INVALIDARG
;
630 TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n",
631 This
, hwndOwner
, cidl
, apidl
, shdebugstr_guid(riid
), prgfInOut
, ppvOut
);
636 if (IsEqualIID(riid
, &IID_IContextMenu
) &&(cidl
>= 1)) {
638 // create a seperate item struct
640 pObj
= (IUnknown
*)(&This
->lpVtblContextMenu
);
643 IUnknown_AddRef(pObj
);
645 } else if (IsEqualIID(riid
, &IID_IDataObject
) &&(cidl
>= 1)) {
646 pObj
= (LPUNKNOWN
) IDataObject_Constructor(hwndOwner
, This
->pidlRoot
, apidl
, cidl
);
648 } else if (IsEqualIID(riid
, &IID_IExtractIconA
) &&(cidl
== 1)) {
649 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
650 pObj
= (LPUNKNOWN
) IExtractIconA_Constructor(pidl
);
653 } else if (IsEqualIID(riid
, &IID_IExtractIconW
) &&(cidl
== 1)) {
654 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
655 pObj
= (LPUNKNOWN
) IExtractIconW_Constructor(pidl
);
658 } else if ((IsEqualIID(riid
,&IID_IShellLinkW
) || IsEqualIID(riid
,&IID_IShellLinkA
))
660 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
661 hr
= IShellLink_ConstructFromFile(NULL
, riid
, pidl
,(LPVOID
*)&pObj
);
667 if (SUCCEEDED(hr
) && !pObj
)
672 TRACE("(%p)->hr=0x%08x\n", This
, hr
);
676 /**************************************************************************
677 * ISF_ControlPanel_fnGetDisplayNameOf
679 static HRESULT WINAPI
ISF_ControlPanel_fnGetDisplayNameOf(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, DWORD dwFlags
, LPSTRRET strRet
)
681 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
683 CHAR szPath
[MAX_PATH
];
684 WCHAR wszPath
[MAX_PATH
+1]; /* +1 for potential backslash */
685 PIDLCPanelStruct
* pcpanel
;
689 TRACE("(%p)->(pidl=%p,0x%08x,%p)\n", This
, pidl
, dwFlags
, strRet
);
692 if (!pidl
|| !strRet
)
695 pcpanel
= _ILGetCPanelPointer(pidl
);
698 lstrcpyA(szPath
, pcpanel
->szName
+pcpanel
->offsDispName
);
700 if (!(dwFlags
& SHGDN_FORPARSING
))
701 FIXME("retrieve display name from control panel app\n");
703 /* take names of special folders only if it's only this folder */
704 else if (_ILIsSpecialFolder(pidl
)) {
705 BOOL bSimplePidl
= _ILIsPidlSimple(pidl
);
708 _ILSimpleGetTextW(pidl
, wszPath
, MAX_PATH
); /* append my own path */
710 FIXME("special pidl\n");
713 if ((dwFlags
& SHGDN_FORPARSING
) && !bSimplePidl
) { /* go deeper if needed */
716 PathAddBackslashW(wszPath
);
717 len
= wcslen(wszPath
);
720 (SHELL32_GetDisplayNameOfChild(iface
, pidl
, dwFlags
, wszPath
+ len
, MAX_PATH
+ 1 - len
)))
721 return E_OUTOFMEMORY
;
722 if (!WideCharToMultiByte(CP_ACP
, 0, wszPath
, -1, szPath
, MAX_PATH
, NULL
, NULL
))
726 if (!WideCharToMultiByte(CP_ACP
, 0, wszPath
, -1, szPath
, MAX_PATH
, NULL
, NULL
))
732 strRet
->uType
= STRRET_CSTR
;
733 lstrcpynA(strRet
->u
.cStr
, szPath
, MAX_PATH
);
735 TRACE("--(%p)->(%s)\n", This
, szPath
);
739 /**************************************************************************
740 * ISF_ControlPanel_fnSetNameOf
741 * Changes the name of a file object or subfolder, possibly changing its item
742 * identifier in the process.
745 * HWND hwndOwner, //[in ] Owner window for output
746 * LPCITEMIDLIST pidl, //[in ] simple pidl of item to change
747 * LPCOLESTR lpszName, //[in ] the items new display name
748 * DWORD dwFlags, //[in ] SHGNO formatting flags
749 * LPITEMIDLIST* ppidlOut) //[out] simple pidl returned
751 static HRESULT WINAPI
ISF_ControlPanel_fnSetNameOf(IShellFolder2
* iface
, HWND hwndOwner
, LPCITEMIDLIST pidl
, /*simple pidl */
752 LPCOLESTR lpName
, DWORD dwFlags
, LPITEMIDLIST
* pPidlOut
)
754 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
755 FIXME("(%p)->(%p,pidl=%p,%s,%u,%p)\n", This
, hwndOwner
, pidl
, debugstr_w(lpName
), dwFlags
, pPidlOut
);
759 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultSearchGUID(IShellFolder2
* iface
, GUID
* pguid
)
761 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
762 FIXME("(%p)\n", This
);
765 static HRESULT WINAPI
ISF_ControlPanel_fnEnumSearches(IShellFolder2
* iface
, IEnumExtraSearch
** ppenum
)
767 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
768 FIXME("(%p)\n", This
);
771 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultColumn(IShellFolder2
* iface
, DWORD dwRes
, ULONG
* pSort
, ULONG
* pDisplay
)
773 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
775 TRACE("(%p)\n", This
);
777 if (pSort
) *pSort
= 0;
778 if (pDisplay
) *pDisplay
= 0;
781 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultColumnState(IShellFolder2
* iface
, UINT iColumn
, DWORD
* pcsFlags
)
783 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
785 TRACE("(%p)\n", This
);
787 if (!pcsFlags
|| iColumn
>= CONROLPANELSHELLVIEWCOLUMNS
) return E_INVALIDARG
;
788 *pcsFlags
= ControlPanelSFHeader
[iColumn
].pcsFlags
;
791 static HRESULT WINAPI
ISF_ControlPanel_fnGetDetailsEx(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, const SHCOLUMNID
* pscid
, VARIANT
* pv
)
793 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
794 FIXME("(%p)\n", This
);
798 static HRESULT WINAPI
ISF_ControlPanel_fnGetDetailsOf(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, UINT iColumn
, SHELLDETAILS
* psd
)
800 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
803 TRACE("(%p)->(%p %i %p)\n", This
, pidl
, iColumn
, psd
);
805 if (!psd
|| iColumn
>= CONROLPANELSHELLVIEWCOLUMNS
)
809 psd
->fmt
= ControlPanelSFHeader
[iColumn
].fmt
;
810 psd
->cxChar
= ControlPanelSFHeader
[iColumn
].cxChar
;
811 psd
->str
.uType
= STRRET_CSTR
;
812 LoadStringA(shell32_hInstance
, ControlPanelSFHeader
[iColumn
].colnameid
, psd
->str
.u
.cStr
, MAX_PATH
);
815 psd
->str
.u
.cStr
[0] = 0x00;
816 psd
->str
.uType
= STRRET_CSTR
;
819 hr
= IShellFolder_GetDisplayNameOf(iface
, pidl
, SHGDN_NORMAL
| SHGDN_INFOLDER
, &psd
->str
);
821 case 1: /* comment */
822 _ILGetFileType(pidl
, psd
->str
.u
.cStr
, MAX_PATH
);
830 static HRESULT WINAPI
ISF_ControlPanel_fnMapColumnToSCID(IShellFolder2
* iface
, UINT column
, SHCOLUMNID
* pscid
)
832 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
833 FIXME("(%p)\n", This
);
837 static const IShellFolder2Vtbl vt_ShellFolder2
=
840 ISF_ControlPanel_fnQueryInterface
,
841 ISF_ControlPanel_fnAddRef
,
842 ISF_ControlPanel_fnRelease
,
843 ISF_ControlPanel_fnParseDisplayName
,
844 ISF_ControlPanel_fnEnumObjects
,
845 ISF_ControlPanel_fnBindToObject
,
846 ISF_ControlPanel_fnBindToStorage
,
847 ISF_ControlPanel_fnCompareIDs
,
848 ISF_ControlPanel_fnCreateViewObject
,
849 ISF_ControlPanel_fnGetAttributesOf
,
850 ISF_ControlPanel_fnGetUIObjectOf
,
851 ISF_ControlPanel_fnGetDisplayNameOf
,
852 ISF_ControlPanel_fnSetNameOf
,
855 ISF_ControlPanel_fnGetDefaultSearchGUID
,
856 ISF_ControlPanel_fnEnumSearches
,
857 ISF_ControlPanel_fnGetDefaultColumn
,
858 ISF_ControlPanel_fnGetDefaultColumnState
,
859 ISF_ControlPanel_fnGetDetailsEx
,
860 ISF_ControlPanel_fnGetDetailsOf
,
861 ISF_ControlPanel_fnMapColumnToSCID
864 /************************************************************************
865 * ICPanel_PersistFolder2_QueryInterface
867 static HRESULT WINAPI
ICPanel_PersistFolder2_QueryInterface(IPersistFolder2
* iface
, REFIID iid
, LPVOID
* ppvObject
)
869 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
871 TRACE("(%p)\n", This
);
873 return IUnknown_QueryInterface(_IUnknown_(This
), iid
, ppvObject
);
876 /************************************************************************
877 * ICPanel_PersistFolder2_AddRef
879 static ULONG WINAPI
ICPanel_PersistFolder2_AddRef(IPersistFolder2
* iface
)
881 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
883 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
885 return IUnknown_AddRef(_IUnknown_(This
));
888 /************************************************************************
889 * ISFPersistFolder_Release
891 static ULONG WINAPI
ICPanel_PersistFolder2_Release(IPersistFolder2
* iface
)
893 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
895 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
897 return IUnknown_Release(_IUnknown_(This
));
900 /************************************************************************
901 * ICPanel_PersistFolder2_GetClassID
903 static HRESULT WINAPI
ICPanel_PersistFolder2_GetClassID(IPersistFolder2
* iface
, CLSID
* lpClassId
)
905 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
907 TRACE("(%p)\n", This
);
911 *lpClassId
= CLSID_ControlPanel
;
916 /************************************************************************
917 * ICPanel_PersistFolder2_Initialize
919 * NOTES: it makes no sense to change the pidl
921 static HRESULT WINAPI
ICPanel_PersistFolder2_Initialize(IPersistFolder2
* iface
, LPCITEMIDLIST pidl
)
923 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
925 SHFree((LPVOID
)This
->pidlRoot
);
927 This
->pidlRoot
= ILClone(pidl
);
931 /**************************************************************************
932 * IPersistFolder2_fnGetCurFolder
934 static HRESULT WINAPI
ICPanel_PersistFolder2_GetCurFolder(IPersistFolder2
* iface
, LPITEMIDLIST
* pidl
)
936 ICPanelImpl
*This
= impl_from_IPersistFolder2(iface
);
938 TRACE("(%p)->(%p)\n", This
, pidl
);
942 *pidl
= ILClone(This
->pidlRoot
);
946 static const IPersistFolder2Vtbl vt_PersistFolder2
=
949 ICPanel_PersistFolder2_QueryInterface
,
950 ICPanel_PersistFolder2_AddRef
,
951 ICPanel_PersistFolder2_Release
,
952 ICPanel_PersistFolder2_GetClassID
,
953 ICPanel_PersistFolder2_Initialize
,
954 ICPanel_PersistFolder2_GetCurFolder
957 HRESULT
CPanel_GetIconLocationW(LPCITEMIDLIST pidl
,
958 LPWSTR szIconFile
, UINT cchMax
, int* piIndex
)
960 PIDLCPanelStruct
* pcpanel
= _ILGetCPanelPointer(pidl
);
965 MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
, -1, szIconFile
, cchMax
);
966 *piIndex
= pcpanel
->iconIdx
!=-1? pcpanel
->iconIdx
: 0;
972 /**************************************************************************
973 * IShellExecuteHookW Implementation
976 static HRESULT WINAPI
IShellExecuteHookW_fnQueryInterface(
977 IShellExecuteHookW
* iface
, REFIID riid
, void** ppvObject
)
979 ICPanelImpl
*This
= impl_from_IShellExecuteHookW(iface
);
981 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
983 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
986 static ULONG STDMETHODCALLTYPE
IShellExecuteHookW_fnAddRef(IShellExecuteHookW
* iface
)
988 ICPanelImpl
*This
= impl_from_IShellExecuteHookW(iface
);
990 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
992 return IUnknown_AddRef(This
->pUnkOuter
);
995 static ULONG STDMETHODCALLTYPE
IShellExecuteHookW_fnRelease(IShellExecuteHookW
* iface
)
997 ICPanelImpl
*This
= impl_from_IShellExecuteHookW(iface
);
999 TRACE("(%p)\n", This
);
1001 return IUnknown_Release(This
->pUnkOuter
);
1005 ExecuteAppletFromCLSID(LPOLESTR pOleStr
)
1007 WCHAR szCmd
[MAX_PATH
];
1008 WCHAR szExpCmd
[MAX_PATH
];
1009 PROCESS_INFORMATION pi
;
1011 WCHAR szBuffer
[90] = { 'C', 'L', 'S', 'I', 'D', '\\', 0 };
1012 DWORD dwType
, dwSize
;
1014 wcscpy(&szBuffer
[6], pOleStr
);
1015 wcscat(szBuffer
, L
"\\shell\\open\\command");
1017 dwSize
= sizeof(szCmd
);
1018 if (RegGetValueW(HKEY_CLASSES_ROOT
, szBuffer
, NULL
, RRF_RT_REG_SZ
, &dwType
, (PVOID
)szCmd
, &dwSize
) != ERROR_SUCCESS
)
1020 ERR("RegGetValueW failed with %u\n", GetLastError());
1025 if (dwType
!= RRF_RT_REG_SZ
&& dwType
!= RRF_RT_REG_EXPAND_SZ
)
1029 if (!ExpandEnvironmentStringsW(szCmd
, szExpCmd
, sizeof(szExpCmd
)/sizeof(WCHAR
)))
1032 ZeroMemory(&si
, sizeof(si
));
1034 if (!CreateProcessW(NULL
, szExpCmd
, NULL
, NULL
, FALSE
, 0, NULL
, NULL
, &si
, &pi
))
1037 CloseHandle(pi
.hProcess
);
1038 CloseHandle(pi
.hThread
);
1043 static HRESULT WINAPI
IShellExecuteHookW_fnExecute(IShellExecuteHookW
* iface
, LPSHELLEXECUTEINFOW psei
)
1045 static const WCHAR wCplopen
[] = {'c','p','l','o','p','e','n','\0'};
1046 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
1048 SHELLEXECUTEINFOW sei_tmp
;
1049 PIDLCPanelStruct
* pcpanel
;
1050 WCHAR path
[MAX_PATH
];
1051 WCHAR params
[MAX_PATH
];
1056 TRACE("(%p)->execute(%p)\n", This
, psei
);
1059 return E_INVALIDARG
;
1061 pcpanel
= _ILGetCPanelPointer(ILFindLastID(psei
->lpIDList
));
1067 IID
* iid
= _ILGetGUIDPointer(ILFindLastID(psei
->lpIDList
));
1069 return E_INVALIDARG
;
1070 if (StringFromCLSID(iid
, &pOleStr
) == S_OK
)
1073 hr
= ExecuteAppletFromCLSID(pOleStr
);
1074 CoTaskMemFree(pOleStr
);
1078 return E_INVALIDARG
;
1081 /* Return value from MultiByteToWideChar includes terminating NUL, which
1082 * compensates for the starting double quote we just put in */
1083 l
= MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
, -1, path
+1, MAX_PATH
);
1085 /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */
1089 MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
+pcpanel
->offsDispName
, -1, params
, MAX_PATH
);
1091 memcpy(&sei_tmp
, psei
, sizeof(sei_tmp
));
1092 sei_tmp
.lpFile
= path
;
1093 sei_tmp
.lpParameters
= params
;
1094 sei_tmp
.fMask
&= ~SEE_MASK_INVOKEIDLIST
;
1095 sei_tmp
.lpVerb
= wCplopen
;
1097 ret
= ShellExecuteExW(&sei_tmp
);
1104 static const IShellExecuteHookWVtbl vt_ShellExecuteHookW
=
1107 IShellExecuteHookW_fnQueryInterface
,
1108 IShellExecuteHookW_fnAddRef
,
1109 IShellExecuteHookW_fnRelease
,
1111 IShellExecuteHookW_fnExecute
1115 /**************************************************************************
1116 * IShellExecuteHookA Implementation
1119 static HRESULT WINAPI
IShellExecuteHookA_fnQueryInterface(IShellExecuteHookA
* iface
, REFIID riid
, void** ppvObject
)
1121 ICPanelImpl
*This
= impl_from_IShellExecuteHookA(iface
);
1123 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
1125 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
1128 static ULONG STDMETHODCALLTYPE
IShellExecuteHookA_fnAddRef(IShellExecuteHookA
* iface
)
1130 ICPanelImpl
*This
= impl_from_IShellExecuteHookA(iface
);
1132 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
1134 return IUnknown_AddRef(This
->pUnkOuter
);
1137 static ULONG STDMETHODCALLTYPE
IShellExecuteHookA_fnRelease(IShellExecuteHookA
* iface
)
1139 ICPanelImpl
*This
= impl_from_IShellExecuteHookA(iface
);
1141 TRACE("(%p)\n", This
);
1143 return IUnknown_Release(This
->pUnkOuter
);
1146 static HRESULT WINAPI
IShellExecuteHookA_fnExecute(IShellExecuteHookA
* iface
, LPSHELLEXECUTEINFOA psei
)
1148 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
1150 SHELLEXECUTEINFOA sei_tmp
;
1151 PIDLCPanelStruct
* pcpanel
;
1152 char path
[MAX_PATH
];
1155 TRACE("(%p)->execute(%p)\n", This
, psei
);
1158 return E_INVALIDARG
;
1160 pcpanel
= _ILGetCPanelPointer(ILFindLastID(psei
->lpIDList
));
1163 return E_INVALIDARG
;
1166 lstrcpyA(path
+1, pcpanel
->szName
);
1168 /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */
1169 lstrcatA(path
, "\" ");
1170 lstrcatA(path
, pcpanel
->szName
+pcpanel
->offsDispName
);
1172 memcpy(&sei_tmp
, psei
, sizeof(sei_tmp
));
1173 sei_tmp
.lpFile
= path
;
1174 sei_tmp
.fMask
&= ~SEE_MASK_INVOKEIDLIST
;
1176 ret
= ShellExecuteExA(&sei_tmp
);
1183 static const IShellExecuteHookAVtbl vt_ShellExecuteHookA
=
1185 IShellExecuteHookA_fnQueryInterface
,
1186 IShellExecuteHookA_fnAddRef
,
1187 IShellExecuteHookA_fnRelease
,
1188 IShellExecuteHookA_fnExecute
1191 /**************************************************************************
1192 * IContextMenu2 Implementation
1195 /************************************************************************
1196 * ICPanel_IContextMenu_QueryInterface
1198 static HRESULT WINAPI
ICPanel_IContextMenu2_QueryInterface(IContextMenu2
* iface
, REFIID iid
, LPVOID
* ppvObject
)
1200 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1202 TRACE("(%p)\n", This
);
1204 return IUnknown_QueryInterface(_IUnknown_(This
), iid
, ppvObject
);
1207 /************************************************************************
1208 * ICPanel_IContextMenu_AddRef
1210 static ULONG WINAPI
ICPanel_IContextMenu2_AddRef(IContextMenu2
* iface
)
1212 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1214 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
1216 return IUnknown_AddRef(_IUnknown_(This
));
1219 /************************************************************************
1220 * ICPanel_IContextMenu_Release
1222 static ULONG WINAPI
ICPanel_IContextMenu2_Release(IContextMenu2
* iface
)
1224 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1226 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
1228 return IUnknown_Release(_IUnknown_(This
));
1231 /**************************************************************************
1232 * ICPanel_IContextMenu_QueryContextMenu()
1234 static HRESULT WINAPI
ICPanel_IContextMenu2_QueryContextMenu(
1235 IContextMenu2
*iface
,
1242 WCHAR szBuffer
[30] = {0};
1245 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1247 TRACE("(%p)->(hmenu=%p indexmenu=%x cmdfirst=%x cmdlast=%x flags=%x )\n",
1248 This
, hMenu
, indexMenu
, idCmdFirst
, idCmdLast
, uFlags
);
1250 if (LoadStringW(shell32_hInstance
, IDS_OPEN
, szBuffer
, sizeof(szBuffer
)/sizeof(WCHAR
)))
1252 szBuffer
[(sizeof(szBuffer
)/sizeof(WCHAR
))-1] = L
'\0';
1253 _InsertMenuItemW(hMenu
, indexMenu
++, TRUE
, IDS_OPEN
, MFT_STRING
, szBuffer
, MFS_DEFAULT
); //FIXME identifier
1257 if (LoadStringW(shell32_hInstance
, IDS_CREATELINK
, szBuffer
, sizeof(szBuffer
)/sizeof(WCHAR
)))
1261 _InsertMenuItemW(hMenu
, indexMenu
++, TRUE
, idCmdFirst
+ Count
, MFT_SEPARATOR
, NULL
, MFS_ENABLED
);
1263 szBuffer
[(sizeof(szBuffer
)/sizeof(WCHAR
))-1] = L
'\0';
1265 _InsertMenuItemW(hMenu
, indexMenu
++, TRUE
, IDS_CREATELINK
, MFT_STRING
, szBuffer
, MFS_ENABLED
); //FIXME identifier
1268 return MAKE_HRESULT(SEVERITY_SUCCESS
, 0, Count
);
1272 /**************************************************************************
1273 * ICPanel_IContextMenu_InvokeCommand()
1275 static HRESULT WINAPI
ICPanel_IContextMenu2_InvokeCommand(
1276 IContextMenu2
*iface
,
1277 LPCMINVOKECOMMANDINFO lpcmi
)
1279 SHELLEXECUTEINFOW sei
;
1280 WCHAR szPath
[MAX_PATH
];
1281 char szTarget
[MAX_PATH
];
1284 INT Length
, cLength
;
1285 PIDLCPanelStruct
*pcpanel
;
1288 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1290 TRACE("(%p)->(invcom=%p verb=%p wnd=%p)\n",This
,lpcmi
,lpcmi
->lpVerb
, lpcmi
->hwnd
);
1292 if (lpcmi
->lpVerb
== MAKEINTRESOURCEA(IDS_OPEN
)) //FIXME
1294 ZeroMemory(&sei
, sizeof(sei
));
1295 sei
.cbSize
= sizeof(sei
);
1296 sei
.fMask
= SEE_MASK_INVOKEIDLIST
;
1297 sei
.lpIDList
= ILCombine(This
->pidlRoot
, This
->apidl
[0]);
1298 sei
.hwnd
= lpcmi
->hwnd
;
1299 sei
.nShow
= SW_SHOWNORMAL
;
1300 sei
.lpVerb
= L
"open";
1301 ShellExecuteExW(&sei
);
1302 if (sei
.hInstApp
<= (HINSTANCE
)32)
1305 else if (lpcmi
->lpVerb
== MAKEINTRESOURCEA(IDS_CREATELINK
)) //FIXME
1307 if (!SHGetSpecialFolderPathW(NULL
, szPath
, CSIDL_DESKTOPDIRECTORY
, FALSE
))
1310 pszPath
= PathAddBackslashW(szPath
);
1314 if (IShellFolder_GetDisplayNameOf((IShellFolder
*)This
, This
->apidl
[0], SHGDN_FORPARSING
, &strret
) != S_OK
)
1317 Length
= MAX_PATH
- (pszPath
- szPath
);
1318 cLength
= strlen(strret
.u
.cStr
);
1319 if (Length
< cLength
+ 5)
1325 if (MultiByteToWideChar(CP_ACP
, 0, strret
.u
.cStr
, cLength
+1, pszPath
, Length
))
1333 wcscpy(pszPath
, L
" - ");
1334 cLength
= LoadStringW(shell32_hInstance
, IDS_LNK_FILE
, &pszPath
[3], Length
-4) + 3;
1335 if (cLength
+ 5 > Length
)
1336 cLength
= Length
- 5;
1340 wcscpy(pszPath
, L
".lnk");
1342 pcpanel
= _ILGetCPanelPointer(ILFindLastID(This
->apidl
[0]));
1345 strncpy(szTarget
, pcpanel
->szName
, MAX_PATH
);
1352 if (SUCCEEDED(IShellLink_Constructor(NULL
, &IID_IShellLinkA
, (LPVOID
*)&isl
)))
1354 IShellLinkA_SetPath(isl
, szTarget
);
1355 if (SUCCEEDED(IShellLinkA_QueryInterface(isl
, &IID_IPersistFile
, (LPVOID
*)&ppf
)))
1357 IPersistFile_Save(ppf
, szPath
, TRUE
);
1358 IPersistFile_Release(ppf
);
1360 IShellLinkA_Release(isl
);
1367 /**************************************************************************
1368 * ICPanel_IContextMenu_GetCommandString()
1371 static HRESULT WINAPI
ICPanel_IContextMenu2_GetCommandString(
1372 IContextMenu2
*iface
,
1379 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1381 TRACE("(%p)->(idcom=%lx flags=%x %p name=%p len=%x)\n",This
, idCommand
, uFlags
, lpReserved
, lpszName
, uMaxNameLen
);
1384 FIXME("unknown command string\n");
1390 /**************************************************************************
1391 * ICPanel_IContextMenu_HandleMenuMsg()
1393 static HRESULT WINAPI
ICPanel_IContextMenu2_HandleMenuMsg(
1394 IContextMenu2
*iface
,
1399 ICPanelImpl
*This
= impl_from_IContextMenu(iface
);
1401 TRACE("ICPanel_IContextMenu_HandleMenuMsg (%p)->(msg=%x wp=%lx lp=%lx)\n",This
, uMsg
, wParam
, lParam
);
1406 static const IContextMenu2Vtbl vt_ContextMenu
=
1408 ICPanel_IContextMenu2_QueryInterface
,
1409 ICPanel_IContextMenu2_AddRef
,
1410 ICPanel_IContextMenu2_Release
,
1411 ICPanel_IContextMenu2_QueryContextMenu
,
1412 ICPanel_IContextMenu2_InvokeCommand
,
1413 ICPanel_IContextMenu2_GetCommandString
,
1414 ICPanel_IContextMenu2_HandleMenuMsg