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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 #include "wine/port.h"
29 #define NONAMELESSUNION
30 #define NONAMELESSSTRUCT
42 #include "enumidlist.h"
44 #include "undocshell.h"
45 #include "shell32_main.h"
48 #include "shellfolder.h"
49 #include "wine/debug.h"
53 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
55 /***********************************************************************
56 * control panel implementation in shell namespace
60 ICOM_VFIELD(IShellFolder2
);
63 ICOM_VTABLE(IPersistFolder2
)* lpVtblPersistFolder2
;
64 ICOM_VTABLE(IShellExecuteHookW
)* lpVtblShellExecuteHookW
;
65 ICOM_VTABLE(IShellExecuteHookA
)* lpVtblShellExecuteHookA
;
67 IUnknown
*pUnkOuter
; /* used for aggregation */
69 /* both paths are parsible from the desktop */
70 LPITEMIDLIST pidlRoot
; /* absolute pidl */
71 int dwAttributes
; /* attributes returned by GetAttributesOf FIXME: use it */
74 static ICOM_VTABLE(IShellFolder2
) vt_ShellFolder2
;
75 static ICOM_VTABLE(IPersistFolder2
) vt_PersistFolder2
;
76 static ICOM_VTABLE(IShellExecuteHookW
) vt_ShellExecuteHookW
;
77 static ICOM_VTABLE(IShellExecuteHookA
) vt_ShellExecuteHookA
;
79 #define _IPersistFolder2_Offset ((int)(&(((ICPanelImpl*)0)->lpVtblPersistFolder2)))
80 #define _ICOM_THIS_From_IPersistFolder2(class, name) class* This = (class*)(((char*)name)-_IPersistFolder2_Offset);
82 #define IShellExecuteHookW_Offset ((int)(&(((ICPanelImpl*)0)->lpVtblShellExecuteHookW)))
83 #define _ICOM_THIS_From_IShellExecuteHookW(class, name) class* This = (class*)(((char*)name)-IShellExecuteHookW_Offset);
85 #define IShellExecuteHookA_Offset ((int)(&(((ICPanelImpl*)0)->lpVtblShellExecuteHookA)))
86 #define _ICOM_THIS_From_IShellExecuteHookA(class, name) class* This = (class*)(((char*)name)-IShellExecuteHookA_Offset);
90 converts This to a interface pointer
92 #define _IUnknown_(This) (IUnknown*)&(This->lpVtbl)
93 #define _IShellFolder_(This) (IShellFolder*)&(This->lpVtbl)
94 #define _IShellFolder2_(This) (IShellFolder2*)&(This->lpVtbl)
96 #define _IPersist_(This) (IPersist*)&(This->lpVtblPersistFolder2)
97 #define _IPersistFolder_(This) (IPersistFolder*)&(This->lpVtblPersistFolder2)
98 #define _IPersistFolder2_(This) (IPersistFolder2*)&(This->lpVtblPersistFolder2)
99 #define _IShellExecuteHookW_(This) (IShellExecuteHookW*)&(This->lpVtblShellExecuteHookW)
100 #define _IShellExecuteHookA_(This) (IShellExecuteHookA*)&(This->lpVtblShellExecuteHookA)
102 /***********************************************************************
103 * IShellFolder [ControlPanel] implementation
106 static shvheader ControlPanelSFHeader
[] = {
107 {IDS_SHV_COLUMN8
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 15},/*FIXME*/
108 {IDS_SHV_COLUMN9
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 200},/*FIXME*/
111 #define CONROLPANELSHELLVIEWCOLUMNS 2
113 /**************************************************************************
114 * IControlPanel_Constructor
116 HRESULT WINAPI
IControlPanel_Constructor(IUnknown
* pUnkOuter
, REFIID riid
, LPVOID
* ppv
)
120 TRACE("unkOut=%p %s\n", pUnkOuter
, shdebugstr_guid(riid
));
124 if (pUnkOuter
&& !IsEqualIID (riid
, &IID_IUnknown
))
125 return CLASS_E_NOAGGREGATION
;
127 sf
= (ICPanelImpl
*) LocalAlloc(GMEM_ZEROINIT
, sizeof(ICPanelImpl
));
129 return E_OUTOFMEMORY
;
132 sf
->lpVtbl
= &vt_ShellFolder2
;
133 sf
->lpVtblPersistFolder2
= &vt_PersistFolder2
;
134 sf
->lpVtblShellExecuteHookW
= &vt_ShellExecuteHookW
;
135 sf
->lpVtblShellExecuteHookA
= &vt_ShellExecuteHookA
;
136 sf
->pidlRoot
= _ILCreateControlPanel(); /* my qualified pidl */
137 sf
->pUnkOuter
= pUnkOuter
? pUnkOuter
: _IUnknown_ (sf
);
139 if (!SUCCEEDED(IUnknown_QueryInterface(_IUnknown_(sf
), riid
, ppv
))) {
140 IUnknown_Release(_IUnknown_(sf
));
141 return E_NOINTERFACE
;
144 TRACE("--(%p)\n", sf
);
148 /**************************************************************************
149 * ISF_ControlPanel_fnQueryInterface
151 * NOTES supports not IPersist/IPersistFolder
153 static HRESULT WINAPI
ISF_ControlPanel_fnQueryInterface(IShellFolder2
* iface
, REFIID riid
, LPVOID
* ppvObject
)
155 ICOM_THIS(ICPanelImpl
, iface
);
157 TRACE("(%p)->(%s,%p)\n", This
, shdebugstr_guid(riid
), ppvObject
);
161 if (IsEqualIID(riid
, &IID_IUnknown
) ||
162 IsEqualIID(riid
, &IID_IShellFolder
) || IsEqualIID(riid
, &IID_IShellFolder2
))
164 else if (IsEqualIID(riid
, &IID_IPersist
) ||
165 IsEqualIID(riid
, &IID_IPersistFolder
) || IsEqualIID(riid
, &IID_IPersistFolder2
))
166 *ppvObject
= _IPersistFolder2_(This
);
167 else if (IsEqualIID(riid
, &IID_IShellExecuteHookW
))
168 *ppvObject
= _IShellExecuteHookW_(This
);
169 else if (IsEqualIID(riid
, &IID_IShellExecuteHookA
))
170 *ppvObject
= _IShellExecuteHookA_(This
);
173 IUnknown_AddRef((IUnknown
*)(*ppvObject
));
174 TRACE("-- Interface:(%p)->(%p)\n", ppvObject
, *ppvObject
);
177 TRACE("-- Interface: E_NOINTERFACE\n");
178 return E_NOINTERFACE
;
181 static ULONG WINAPI
ISF_ControlPanel_fnAddRef(IShellFolder2
* iface
)
183 ICOM_THIS(ICPanelImpl
, iface
);
185 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
187 return ++(This
->ref
);
190 static ULONG WINAPI
ISF_ControlPanel_fnRelease(IShellFolder2
* iface
)
192 ICOM_THIS(ICPanelImpl
, iface
);
194 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
196 if (!--(This
->ref
)) {
197 TRACE("-- destroying IShellFolder(%p)\n", This
);
199 SHFree(This
->pidlRoot
);
200 LocalFree((HLOCAL
) This
);
206 /**************************************************************************
207 * ISF_ControlPanel_fnParseDisplayName
209 static HRESULT WINAPI
210 ISF_ControlPanel_fnParseDisplayName(IShellFolder2
* iface
,
213 LPOLESTR lpszDisplayName
,
214 DWORD
* pchEaten
, LPITEMIDLIST
* ppidl
, DWORD
* pdwAttributes
)
216 ICOM_THIS(ICPanelImpl
, iface
);
218 HRESULT hr
= E_INVALIDARG
;
220 FIXME("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n",
221 This
, hwndOwner
, pbc
, lpszDisplayName
, debugstr_w(lpszDisplayName
), pchEaten
, ppidl
, pdwAttributes
);
227 TRACE("(%p)->(-- ret=0x%08lx)\n", This
, hr
);
232 static LPITEMIDLIST
_ILCreateCPanelApplet(LPCSTR name
, LPCSTR displayName
,
233 LPCSTR comment
, int iconIdx
)
238 int size0
= (char*)&tmp
.u
.cpanel
.szName
-(char*)&tmp
.u
.cpanel
;
242 tmp
.type
= PT_CPLAPPLET
;
243 tmp
.u
.cpanel
.dummy
= 0;
244 tmp
.u
.cpanel
.iconIdx
= iconIdx
;
249 tmp
.u
.cpanel
.offsDispName
= l
+1;
250 l
= strlen(displayName
);
253 tmp
.u
.cpanel
.offsComment
= tmp
.u
.cpanel
.offsDispName
+1+l
;
257 pidl
= SHAlloc(size
+4);
261 pidl
->mkid
.cb
= size
+2;
262 memcpy(pidl
->mkid
.abID
, &tmp
, 2+size0
);
264 p
= &((PIDLDATA
*)pidl
->mkid
.abID
)->u
.cpanel
;
265 strcpy(p
->szName
, name
);
266 strcpy(p
->szName
+tmp
.u
.cpanel
.offsDispName
, displayName
);
267 strcpy(p
->szName
+tmp
.u
.cpanel
.offsComment
, comment
);
269 *(WORD
*)((char*)pidl
+(size
+2)) = 0;
276 /**************************************************************************
277 * _ILGetCPanelPointer()
278 * gets a pointer to the control panel struct stored in the pidl
280 static PIDLCPanelStruct
* _ILGetCPanelPointer(LPCITEMIDLIST pidl
)
282 LPPIDLDATA pdata
= _ILGetDataPointer(pidl
);
284 if (pdata
&& pdata
->type
==PT_CPLAPPLET
)
285 return (PIDLCPanelStruct
*)&(pdata
->u
.cpanel
);
290 /**************************************************************************
291 * ISF_ControlPanel_fnEnumObjects
293 static BOOL
SHELL_RegisterCPanelApp(IEnumIDList
* list
, LPCSTR path
)
302 char displayName
[MAX_PATH
];
303 char comment
[MAX_PATH
];
305 WCHAR wpath
[MAX_PATH
];
307 MultiByteToWideChar(CP_ACP
, 0, path
, -1, wpath
, MAX_PATH
);
310 applet
= Control_LoadApplet(0, wpath
, &panel
);
314 for(i
=0; i
<applet
->count
; ++i
)
316 WideCharToMultiByte(CP_ACP
, 0, applet
->info
[i
].szName
, -1, displayName
, MAX_PATH
, 0, 0);
317 WideCharToMultiByte(CP_ACP
, 0, applet
->info
[i
].szInfo
, -1, comment
, MAX_PATH
, 0, 0);
319 applet
->proc(0, CPL_INQUIRE
, i
, (LPARAM
)&info
);
322 iconIdx
= -info
.idIcon
; /* negative icon index instead of icon number */
326 pidl
= _ILCreateCPanelApplet(path
, displayName
, comment
, iconIdx
);
329 AddToEnumList(list
, pidl
);
331 Control_UnloadApplet(applet
);
336 static int SHELL_RegisterRegistryCPanelApps(IEnumIDList
* list
, HKEY hkey_root
, LPCSTR szRepPath
)
339 char value
[MAX_PATH
];
344 if (RegOpenKeyA(hkey_root
, szRepPath
, &hkey
) == ERROR_SUCCESS
)
350 DWORD nameLen
= MAX_PATH
;
351 DWORD valueLen
= MAX_PATH
;
353 if (RegEnumValueA(hkey
, idx
, name
, &nameLen
, NULL
, NULL
, (LPBYTE
)&value
, &valueLen
) != ERROR_SUCCESS
)
356 if (SHELL_RegisterCPanelApp(list
, value
))
365 static int SHELL_RegisterCPanelFolders(IEnumIDList
* list
, HKEY hkey_root
, LPCSTR szRepPath
)
372 if (RegOpenKeyA(hkey_root
, szRepPath
, &hkey
) == ERROR_SUCCESS
)
377 if (RegEnumKeyA(hkey
, idx
, name
, MAX_PATH
) != ERROR_SUCCESS
)
382 LPITEMIDLIST pidl
= _ILCreateGuidFromStrA(name
);
384 if (pidl
&& AddToEnumList(list
, pidl
))
395 /**************************************************************************
396 * CreateCPanelEnumList()
398 static BOOL
CreateCPanelEnumList(
402 CHAR szPath
[MAX_PATH
];
403 WIN32_FIND_DATAA wfd
;
406 TRACE("(%p)->(flags=0x%08lx) \n",iface
,dwFlags
);
408 /* enumerate control panel folders folders */
409 if (dwFlags
& SHCONTF_FOLDERS
)
410 SHELL_RegisterCPanelFolders(iface
, HKEY_LOCAL_MACHINE
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ControlPanel\\NameSpace");
412 /* enumerate the control panel applets */
413 if (dwFlags
& SHCONTF_NONFOLDERS
)
417 GetSystemDirectoryA(szPath
, MAX_PATH
);
418 p
= PathAddBackslashA(szPath
);
421 TRACE("-- (%p)-> enumerate SHCONTF_NONFOLDERS of %s\n",iface
,debugstr_a(szPath
));
422 hFile
= FindFirstFileA(szPath
, &wfd
);
424 if (hFile
!= INVALID_HANDLE_VALUE
)
428 if (!(dwFlags
& SHCONTF_INCLUDEHIDDEN
) && (wfd
.dwFileAttributes
& FILE_ATTRIBUTE_HIDDEN
))
431 if (!(wfd
.dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)) {
432 strcpy(p
, wfd
.cFileName
);
433 SHELL_RegisterCPanelApp((IEnumIDList
*)iface
, szPath
);
435 } while(FindNextFileA(hFile
, &wfd
));
439 SHELL_RegisterRegistryCPanelApps((IEnumIDList
*)iface
, HKEY_LOCAL_MACHINE
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls");
440 SHELL_RegisterRegistryCPanelApps((IEnumIDList
*)iface
, HKEY_CURRENT_USER
, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls");
445 /**************************************************************************
446 * ISF_ControlPanel_fnEnumObjects
448 static HRESULT WINAPI
449 ISF_ControlPanel_fnEnumObjects(IShellFolder2
* iface
, HWND hwndOwner
, DWORD dwFlags
, LPENUMIDLIST
* ppEnumIDList
)
451 ICOM_THIS(ICPanelImpl
, iface
);
453 TRACE("(%p)->(HWND=%p flags=0x%08lx pplist=%p)\n", This
, hwndOwner
, dwFlags
, ppEnumIDList
);
455 *ppEnumIDList
= IEnumIDList_Constructor();
457 CreateCPanelEnumList(*ppEnumIDList
, dwFlags
);
459 TRACE("--(%p)->(new ID List: %p)\n", This
, *ppEnumIDList
);
461 return(*ppEnumIDList
) ? S_OK
: E_OUTOFMEMORY
;
464 /**************************************************************************
465 * ISF_ControlPanel_fnBindToObject
467 static HRESULT WINAPI
468 ISF_ControlPanel_fnBindToObject(IShellFolder2
* iface
, LPCITEMIDLIST pidl
,
469 LPBC pbcReserved
, REFIID riid
, LPVOID
* ppvOut
)
471 ICOM_THIS(ICPanelImpl
, iface
);
473 TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This
, pidl
, pbcReserved
, shdebugstr_guid(riid
), ppvOut
);
475 return SHELL32_BindToChild(This
->pidlRoot
, NULL
, pidl
, riid
, ppvOut
);
478 /**************************************************************************
479 * ISF_ControlPanel_fnBindToStorage
481 static HRESULT WINAPI
482 ISF_ControlPanel_fnBindToStorage(IShellFolder2
* iface
,
483 LPCITEMIDLIST pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
* ppvOut
)
485 ICOM_THIS(ICPanelImpl
, iface
);
487 FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This
, pidl
, pbcReserved
, shdebugstr_guid(riid
), ppvOut
);
493 /**************************************************************************
494 * ISF_ControlPanel_fnCompareIDs
497 static HRESULT WINAPI
498 ISF_ControlPanel_fnCompareIDs(IShellFolder2
* iface
, LPARAM lParam
, LPCITEMIDLIST pidl1
, LPCITEMIDLIST pidl2
)
500 ICOM_THIS(ICPanelImpl
, iface
);
504 TRACE("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This
, lParam
, pidl1
, pidl2
);
505 nReturn
= SHELL32_CompareIDs(_IShellFolder_(This
), lParam
, pidl1
, pidl2
);
506 TRACE("-- %i\n", nReturn
);
510 /**************************************************************************
511 * ISF_ControlPanel_fnCreateViewObject
513 static HRESULT WINAPI
514 ISF_ControlPanel_fnCreateViewObject(IShellFolder2
* iface
, HWND hwndOwner
, REFIID riid
, LPVOID
* ppvOut
)
516 ICOM_THIS(ICPanelImpl
, iface
);
518 LPSHELLVIEW pShellView
;
519 HRESULT hr
= E_INVALIDARG
;
521 TRACE("(%p)->(hwnd=%p,%s,%p)\n", This
, hwndOwner
, shdebugstr_guid(riid
), ppvOut
);
526 if (IsEqualIID(riid
, &IID_IDropTarget
)) {
527 WARN("IDropTarget not implemented\n");
529 } else if (IsEqualIID(riid
, &IID_IContextMenu
)) {
530 WARN("IContextMenu not implemented\n");
532 } else if (IsEqualIID(riid
, &IID_IShellView
)) {
533 pShellView
= IShellView_Constructor((IShellFolder
*) iface
);
535 hr
= IShellView_QueryInterface(pShellView
, riid
, ppvOut
);
536 IShellView_Release(pShellView
);
540 TRACE("--(%p)->(interface=%p)\n", This
, ppvOut
);
544 /**************************************************************************
545 * ISF_ControlPanel_fnGetAttributesOf
547 static HRESULT WINAPI
548 ISF_ControlPanel_fnGetAttributesOf(IShellFolder2
* iface
, UINT cidl
, LPCITEMIDLIST
* apidl
, DWORD
* rgfInOut
)
550 ICOM_THIS(ICPanelImpl
, iface
);
554 TRACE("(%p)->(cidl=%d apidl=%p mask=0x%08lx)\n", This
, cidl
, apidl
, *rgfInOut
);
556 if ((!cidl
) ||(!apidl
) ||(!rgfInOut
))
562 while(cidl
> 0 && *apidl
) {
564 SHELL32_GetItemAttributes(_IShellFolder_(This
), *apidl
, rgfInOut
);
569 TRACE("-- result=0x%08lx\n", *rgfInOut
);
573 /**************************************************************************
574 * ISF_ControlPanel_fnGetUIObjectOf
577 * HWND hwndOwner, //[in ] Parent window for any output
578 * UINT cidl, //[in ] array size
579 * LPCITEMIDLIST* apidl, //[in ] simple pidl array
580 * REFIID riid, //[in ] Requested Interface
581 * UINT* prgfInOut, //[ ] reserved
582 * LPVOID* ppvObject) //[out] Resulting Interface
585 static HRESULT WINAPI
586 ISF_ControlPanel_fnGetUIObjectOf(IShellFolder2
* iface
,
588 UINT cidl
, LPCITEMIDLIST
* apidl
, REFIID riid
, UINT
* prgfInOut
, LPVOID
* ppvOut
)
590 ICOM_THIS(ICPanelImpl
, iface
);
593 IUnknown
*pObj
= NULL
;
594 HRESULT hr
= E_INVALIDARG
;
596 TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n",
597 This
, hwndOwner
, cidl
, apidl
, shdebugstr_guid(riid
), prgfInOut
, ppvOut
);
602 if (IsEqualIID(riid
, &IID_IContextMenu
) &&(cidl
>= 1)) {
603 pObj
= (LPUNKNOWN
) ISvItemCm_Constructor((IShellFolder
*) iface
, This
->pidlRoot
, apidl
, cidl
);
605 } else if (IsEqualIID(riid
, &IID_IDataObject
) &&(cidl
>= 1)) {
606 pObj
= (LPUNKNOWN
) IDataObject_Constructor(hwndOwner
, This
->pidlRoot
, apidl
, cidl
);
608 } else if (IsEqualIID(riid
, &IID_IExtractIconA
) &&(cidl
== 1)) {
609 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
610 pObj
= (LPUNKNOWN
) IExtractIconA_Constructor(pidl
);
613 } else if (IsEqualIID(riid
, &IID_IExtractIconW
) &&(cidl
== 1)) {
614 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
615 pObj
= (LPUNKNOWN
) IExtractIconW_Constructor(pidl
);
618 } else if ((IsEqualIID(riid
,&IID_IShellLinkW
) || IsEqualIID(riid
,&IID_IShellLinkA
))
620 pidl
= ILCombine(This
->pidlRoot
, apidl
[0]);
621 hr
= IShellLink_ConstructFromFile(NULL
, riid
, pidl
,(LPVOID
*)&pObj
);
627 if (SUCCEEDED(hr
) && !pObj
)
632 TRACE("(%p)->hr=0x%08lx\n", This
, hr
);
636 /**************************************************************************
637 * ISF_ControlPanel_fnGetDisplayNameOf
639 static HRESULT WINAPI
ISF_ControlPanel_fnGetDisplayNameOf(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, DWORD dwFlags
, LPSTRRET strRet
)
641 ICOM_THIS(ICPanelImpl
, iface
);
643 CHAR szPath
[MAX_PATH
*2];
644 PIDLCPanelStruct
* pcpanel
;
648 TRACE("(%p)->(pidl=%p,0x%08lx,%p)\n", This
, pidl
, dwFlags
, strRet
);
651 if (!pidl
|| !strRet
)
654 pcpanel
= _ILGetCPanelPointer(pidl
);
657 lstrcpyA(szPath
, pcpanel
->szName
+pcpanel
->offsDispName
);
659 if (!(dwFlags
& SHGDN_FORPARSING
))
660 FIXME("retrieve display name from control panel app\n");
662 /* take names of special folders only if its only this folder */
663 else if (_ILIsSpecialFolder(pidl
)) {
664 BOOL bSimplePidl
= _ILIsPidlSimple(pidl
);
667 _ILSimpleGetText(pidl
, szPath
, MAX_PATH
); /* append my own path */
669 FIXME("special pidl\n");
672 if ((dwFlags
& SHGDN_FORPARSING
) && !bSimplePidl
) { /* go deeper if needed */
675 PathAddBackslashA(szPath
); /*FIXME*/
676 len
= lstrlenA(szPath
);
679 (SHELL32_GetDisplayNameOfChild(iface
, pidl
, dwFlags
| SHGDN_INFOLDER
, szPath
+ len
, MAX_PATH
- len
)))
680 return E_OUTOFMEMORY
;
684 strRet
->uType
= STRRET_CSTR
;
685 lstrcpynA(strRet
->u
.cStr
, szPath
, MAX_PATH
);
687 TRACE("--(%p)->(%s)\n", This
, szPath
);
691 /**************************************************************************
692 * ISF_ControlPanel_fnSetNameOf
693 * Changes the name of a file object or subfolder, possibly changing its item
694 * identifier in the process.
697 * HWND hwndOwner, //[in ] Owner window for output
698 * LPCITEMIDLIST pidl, //[in ] simple pidl of item to change
699 * LPCOLESTR lpszName, //[in ] the items new display name
700 * DWORD dwFlags, //[in ] SHGNO formatting flags
701 * LPITEMIDLIST* ppidlOut) //[out] simple pidl returned
703 static HRESULT WINAPI
ISF_ControlPanel_fnSetNameOf(IShellFolder2
* iface
, HWND hwndOwner
, LPCITEMIDLIST pidl
, /*simple pidl */
704 LPCOLESTR lpName
, DWORD dwFlags
, LPITEMIDLIST
* pPidlOut
)
706 ICOM_THIS(ICPanelImpl
, iface
);
707 FIXME("(%p)->(%p,pidl=%p,%s,%lu,%p)\n", This
, hwndOwner
, pidl
, debugstr_w(lpName
), dwFlags
, pPidlOut
);
711 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultSearchGUID(IShellFolder2
* iface
, GUID
* pguid
)
713 ICOM_THIS(ICPanelImpl
, iface
);
714 FIXME("(%p)\n", This
);
717 static HRESULT WINAPI
ISF_ControlPanel_fnEnumSearches(IShellFolder2
* iface
, IEnumExtraSearch
** ppenum
)
719 ICOM_THIS(ICPanelImpl
, iface
);
720 FIXME("(%p)\n", This
);
723 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultColumn(IShellFolder2
* iface
, DWORD dwRes
, ULONG
* pSort
, ULONG
* pDisplay
)
725 ICOM_THIS(ICPanelImpl
, iface
);
727 TRACE("(%p)\n", This
);
729 if (pSort
) *pSort
= 0;
730 if (pDisplay
) *pDisplay
= 0;
733 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultColumnState(IShellFolder2
* iface
, UINT iColumn
, DWORD
* pcsFlags
)
735 ICOM_THIS(ICPanelImpl
, iface
);
737 TRACE("(%p)\n", This
);
739 if (!pcsFlags
|| iColumn
>= CONROLPANELSHELLVIEWCOLUMNS
) return E_INVALIDARG
;
740 *pcsFlags
= ControlPanelSFHeader
[iColumn
].pcsFlags
;
743 static HRESULT WINAPI
ISF_ControlPanel_fnGetDetailsEx(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, const SHCOLUMNID
* pscid
, VARIANT
* pv
)
745 ICOM_THIS(ICPanelImpl
, iface
);
746 FIXME("(%p)\n", This
);
750 static HRESULT WINAPI
ISF_ControlPanel_fnGetDetailsOf(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, UINT iColumn
, SHELLDETAILS
* psd
)
752 ICOM_THIS(ICPanelImpl
, iface
);
755 TRACE("(%p)->(%p %i %p)\n", This
, pidl
, iColumn
, psd
);
757 if (!psd
|| iColumn
>= CONROLPANELSHELLVIEWCOLUMNS
)
761 psd
->fmt
= ControlPanelSFHeader
[iColumn
].fmt
;
762 psd
->cxChar
= ControlPanelSFHeader
[iColumn
].cxChar
;
763 psd
->str
.uType
= STRRET_CSTR
;
764 LoadStringA(shell32_hInstance
, ControlPanelSFHeader
[iColumn
].colnameid
, psd
->str
.u
.cStr
, MAX_PATH
);
767 psd
->str
.u
.cStr
[0] = 0x00;
768 psd
->str
.uType
= STRRET_CSTR
;
771 hr
= IShellFolder_GetDisplayNameOf(iface
, pidl
, SHGDN_NORMAL
| SHGDN_INFOLDER
, &psd
->str
);
773 case 1: /* comment */
774 _ILGetFileType(pidl
, psd
->str
.u
.cStr
, MAX_PATH
);
782 static HRESULT WINAPI
ISF_ControlPanel_fnMapColumnToSCID(IShellFolder2
* iface
, UINT column
, SHCOLUMNID
* pscid
)
784 ICOM_THIS(ICPanelImpl
, iface
);
785 FIXME("(%p)\n", This
);
789 static ICOM_VTABLE(IShellFolder2
) vt_ShellFolder2
=
791 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
793 ISF_ControlPanel_fnQueryInterface
,
794 ISF_ControlPanel_fnAddRef
,
795 ISF_ControlPanel_fnRelease
,
796 ISF_ControlPanel_fnParseDisplayName
,
797 ISF_ControlPanel_fnEnumObjects
,
798 ISF_ControlPanel_fnBindToObject
,
799 ISF_ControlPanel_fnBindToStorage
,
800 ISF_ControlPanel_fnCompareIDs
,
801 ISF_ControlPanel_fnCreateViewObject
,
802 ISF_ControlPanel_fnGetAttributesOf
,
803 ISF_ControlPanel_fnGetUIObjectOf
,
804 ISF_ControlPanel_fnGetDisplayNameOf
,
805 ISF_ControlPanel_fnSetNameOf
,
808 ISF_ControlPanel_fnGetDefaultSearchGUID
,
809 ISF_ControlPanel_fnEnumSearches
,
810 ISF_ControlPanel_fnGetDefaultColumn
,
811 ISF_ControlPanel_fnGetDefaultColumnState
,
812 ISF_ControlPanel_fnGetDetailsEx
,
813 ISF_ControlPanel_fnGetDetailsOf
,
814 ISF_ControlPanel_fnMapColumnToSCID
817 /************************************************************************
818 * ICPanel_PersistFolder2_QueryInterface
820 static HRESULT WINAPI
ICPanel_PersistFolder2_QueryInterface(IPersistFolder2
* iface
, REFIID iid
, LPVOID
* ppvObject
)
822 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
824 TRACE("(%p)\n", This
);
826 return IUnknown_QueryInterface(_IUnknown_(This
), iid
, ppvObject
);
829 /************************************************************************
830 * ICPanel_PersistFolder2_AddRef
832 static ULONG WINAPI
ICPanel_PersistFolder2_AddRef(IPersistFolder2
* iface
)
834 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
836 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
838 return IUnknown_AddRef(_IUnknown_(This
));
841 /************************************************************************
842 * ISFPersistFolder_Release
844 static ULONG WINAPI
ICPanel_PersistFolder2_Release(IPersistFolder2
* iface
)
846 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
848 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
850 return IUnknown_Release(_IUnknown_(This
));
853 /************************************************************************
854 * ICPanel_PersistFolder2_GetClassID
856 static HRESULT WINAPI
ICPanel_PersistFolder2_GetClassID(IPersistFolder2
* iface
, CLSID
* lpClassId
)
858 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
860 TRACE("(%p)\n", This
);
864 *lpClassId
= CLSID_ControlPanel
;
869 /************************************************************************
870 * ICPanel_PersistFolder2_Initialize
872 * NOTES: it makes no sense to change the pidl
874 static HRESULT WINAPI
ICPanel_PersistFolder2_Initialize(IPersistFolder2
* iface
, LPCITEMIDLIST pidl
)
876 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
877 TRACE("(%p)->(%p)\n", This
, pidl
);
881 /**************************************************************************
882 * IPersistFolder2_fnGetCurFolder
884 static HRESULT WINAPI
ICPanel_PersistFolder2_GetCurFolder(IPersistFolder2
* iface
, LPITEMIDLIST
* pidl
)
886 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
888 TRACE("(%p)->(%p)\n", This
, pidl
);
892 *pidl
= ILClone(This
->pidlRoot
);
896 static ICOM_VTABLE(IPersistFolder2
) vt_PersistFolder2
=
898 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
900 ICPanel_PersistFolder2_QueryInterface
,
901 ICPanel_PersistFolder2_AddRef
,
902 ICPanel_PersistFolder2_Release
,
903 ICPanel_PersistFolder2_GetClassID
,
904 ICPanel_PersistFolder2_Initialize
,
905 ICPanel_PersistFolder2_GetCurFolder
908 HRESULT WINAPI
CPanel_GetIconLocationA(LPITEMIDLIST pidl
, LPSTR szIconFile
, UINT cchMax
, int* piIndex
)
910 PIDLCPanelStruct
* pcpanel
= _ILGetCPanelPointer(pidl
);
915 lstrcpyA(szIconFile
, pcpanel
->szName
);
916 *piIndex
= pcpanel
->iconIdx
!=-1? pcpanel
->iconIdx
: 0;
921 HRESULT WINAPI
CPanel_GetIconLocationW(LPITEMIDLIST pidl
, LPWSTR szIconFile
, UINT cchMax
, int* piIndex
)
923 PIDLCPanelStruct
* pcpanel
= _ILGetCPanelPointer(pidl
);
928 MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
, -1, szIconFile
, cchMax
);
929 *piIndex
= pcpanel
->iconIdx
!=-1? pcpanel
->iconIdx
: 0;
935 /**************************************************************************
936 * IShellExecuteHookW Implementation
939 static HRESULT WINAPI
IShellExecuteHookW_fnQueryInterface(IShellExecuteHookW
* iface
, REFIID riid
, void** ppvObject
)
941 _ICOM_THIS_From_IShellExecuteHookW(ICPanelImpl
, iface
);
943 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
945 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
948 static ULONG STDMETHODCALLTYPE
IShellExecuteHookW_fnAddRef(IShellExecuteHookW
* iface
)
950 _ICOM_THIS_From_IShellExecuteHookW(ICPanelImpl
, iface
);
952 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
954 return IUnknown_AddRef(This
->pUnkOuter
);
957 static ULONG STDMETHODCALLTYPE
IShellExecuteHookW_fnRelease(IShellExecuteHookW
* iface
)
959 _ICOM_THIS_From_IShellExecuteHookW(ICPanelImpl
, iface
);
961 TRACE("(%p)\n", This
);
963 return IUnknown_Release(This
->pUnkOuter
);
966 static HRESULT WINAPI
IShellExecuteHookW_fnExecute(IShellExecuteHookW
* iface
, LPSHELLEXECUTEINFOW psei
)
968 ICOM_THIS(ICPanelImpl
, iface
);
970 SHELLEXECUTEINFOW sei_tmp
;
971 PIDLCPanelStruct
* pcpanel
;
972 WCHAR path
[MAX_PATH
];
976 TRACE("(%p)->execute(%p)\n", This
, psei
);
981 pcpanel
= _ILGetCPanelPointer(ILFindLastID(psei
->lpIDList
));
987 l
= 1 + MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
, -1, path
+1, MAX_PATH
);
989 /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */
993 MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
+pcpanel
->offsDispName
, -1, path
+l
, MAX_PATH
);
995 memcpy(&sei_tmp
, psei
, sizeof(sei_tmp
));
996 sei_tmp
.lpFile
= path
;
997 sei_tmp
.fMask
&= ~SEE_MASK_INVOKEIDLIST
;
999 ret
= ShellExecuteExW(&sei_tmp
);
1006 static ICOM_VTABLE(IShellExecuteHookW
) vt_ShellExecuteHookW
=
1008 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
1010 IShellExecuteHookW_fnQueryInterface
,
1011 IShellExecuteHookW_fnAddRef
,
1012 IShellExecuteHookW_fnRelease
,
1014 IShellExecuteHookW_fnExecute
1018 /**************************************************************************
1019 * IShellExecuteHookA Implementation
1022 static HRESULT WINAPI
IShellExecuteHookA_fnQueryInterface(IShellExecuteHookA
* iface
, REFIID riid
, void** ppvObject
)
1024 _ICOM_THIS_From_IShellExecuteHookA(ICPanelImpl
, iface
);
1026 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
1028 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
1031 static ULONG STDMETHODCALLTYPE
IShellExecuteHookA_fnAddRef(IShellExecuteHookA
* iface
)
1033 _ICOM_THIS_From_IShellExecuteHookA(ICPanelImpl
, iface
);
1035 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
1037 return IUnknown_AddRef(This
->pUnkOuter
);
1040 static ULONG STDMETHODCALLTYPE
IShellExecuteHookA_fnRelease(IShellExecuteHookA
* iface
)
1042 _ICOM_THIS_From_IShellExecuteHookA(ICPanelImpl
, iface
);
1044 TRACE("(%p)\n", This
);
1046 return IUnknown_Release(This
->pUnkOuter
);
1049 static HRESULT WINAPI
IShellExecuteHookA_fnExecute(IShellExecuteHookA
* iface
, LPSHELLEXECUTEINFOA psei
)
1051 ICOM_THIS(ICPanelImpl
, iface
);
1053 SHELLEXECUTEINFOA sei_tmp
;
1054 PIDLCPanelStruct
* pcpanel
;
1055 char path
[MAX_PATH
];
1058 TRACE("(%p)->execute(%p)\n", This
, psei
);
1061 return E_INVALIDARG
;
1063 pcpanel
= _ILGetCPanelPointer(ILFindLastID(psei
->lpIDList
));
1066 return E_INVALIDARG
;
1069 lstrcpyA(path
+1, pcpanel
->szName
);
1071 /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */
1072 lstrcatA(path
, "\" ");
1073 lstrcatA(path
, pcpanel
->szName
+pcpanel
->offsDispName
);
1075 memcpy(&sei_tmp
, psei
, sizeof(sei_tmp
));
1076 sei_tmp
.lpFile
= path
;
1077 sei_tmp
.fMask
&= ~SEE_MASK_INVOKEIDLIST
;
1079 ret
= ShellExecuteExA(&sei_tmp
);
1086 static ICOM_VTABLE(IShellExecuteHookA
) vt_ShellExecuteHookA
=
1088 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
1090 IShellExecuteHookA_fnQueryInterface
,
1091 IShellExecuteHookA_fnAddRef
,
1092 IShellExecuteHookA_fnRelease
,
1094 IShellExecuteHookA_fnExecute