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"
30 #define NONAMELESSUNION
31 #define NONAMELESSSTRUCT
44 #include "enumidlist.h"
46 #include "undocshell.h"
47 #include "shell32_main.h"
50 #include "wine/debug.h"
54 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
56 /***********************************************************************
57 * control panel implementation in shell namespace
61 IShellFolder2Vtbl
*lpVtbl
;
63 IPersistFolder2Vtbl
*lpVtblPersistFolder2
;
64 IShellExecuteHookWVtbl
*lpVtblShellExecuteHookW
;
65 IShellExecuteHookAVtbl
*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 IShellFolder2Vtbl vt_ShellFolder2
;
75 static IPersistFolder2Vtbl vt_PersistFolder2
;
76 static IShellExecuteHookWVtbl vt_ShellExecuteHookW
;
77 static IShellExecuteHookAVtbl 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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
714 FIXME("(%p)\n", This
);
717 static HRESULT WINAPI
ISF_ControlPanel_fnEnumSearches(IShellFolder2
* iface
, IEnumExtraSearch
** ppenum
)
719 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
720 FIXME("(%p)\n", This
);
723 static HRESULT WINAPI
ISF_ControlPanel_fnGetDefaultColumn(IShellFolder2
* iface
, DWORD dwRes
, ULONG
* pSort
, ULONG
* pDisplay
)
725 ICPanelImpl
*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 ICPanelImpl
*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 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
746 FIXME("(%p)\n", This
);
750 static HRESULT WINAPI
ISF_ControlPanel_fnGetDetailsOf(IShellFolder2
* iface
, LPCITEMIDLIST pidl
, UINT iColumn
, SHELLDETAILS
* psd
)
752 ICPanelImpl
*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 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
785 FIXME("(%p)\n", This
);
789 static IShellFolder2Vtbl vt_ShellFolder2
=
792 ISF_ControlPanel_fnQueryInterface
,
793 ISF_ControlPanel_fnAddRef
,
794 ISF_ControlPanel_fnRelease
,
795 ISF_ControlPanel_fnParseDisplayName
,
796 ISF_ControlPanel_fnEnumObjects
,
797 ISF_ControlPanel_fnBindToObject
,
798 ISF_ControlPanel_fnBindToStorage
,
799 ISF_ControlPanel_fnCompareIDs
,
800 ISF_ControlPanel_fnCreateViewObject
,
801 ISF_ControlPanel_fnGetAttributesOf
,
802 ISF_ControlPanel_fnGetUIObjectOf
,
803 ISF_ControlPanel_fnGetDisplayNameOf
,
804 ISF_ControlPanel_fnSetNameOf
,
807 ISF_ControlPanel_fnGetDefaultSearchGUID
,
808 ISF_ControlPanel_fnEnumSearches
,
809 ISF_ControlPanel_fnGetDefaultColumn
,
810 ISF_ControlPanel_fnGetDefaultColumnState
,
811 ISF_ControlPanel_fnGetDetailsEx
,
812 ISF_ControlPanel_fnGetDetailsOf
,
813 ISF_ControlPanel_fnMapColumnToSCID
816 /************************************************************************
817 * ICPanel_PersistFolder2_QueryInterface
819 static HRESULT WINAPI
ICPanel_PersistFolder2_QueryInterface(IPersistFolder2
* iface
, REFIID iid
, LPVOID
* ppvObject
)
821 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
823 TRACE("(%p)\n", This
);
825 return IUnknown_QueryInterface(_IUnknown_(This
), iid
, ppvObject
);
828 /************************************************************************
829 * ICPanel_PersistFolder2_AddRef
831 static ULONG WINAPI
ICPanel_PersistFolder2_AddRef(IPersistFolder2
* iface
)
833 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
835 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
837 return IUnknown_AddRef(_IUnknown_(This
));
840 /************************************************************************
841 * ISFPersistFolder_Release
843 static ULONG WINAPI
ICPanel_PersistFolder2_Release(IPersistFolder2
* iface
)
845 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
847 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
849 return IUnknown_Release(_IUnknown_(This
));
852 /************************************************************************
853 * ICPanel_PersistFolder2_GetClassID
855 static HRESULT WINAPI
ICPanel_PersistFolder2_GetClassID(IPersistFolder2
* iface
, CLSID
* lpClassId
)
857 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
859 TRACE("(%p)\n", This
);
863 *lpClassId
= CLSID_ControlPanel
;
868 /************************************************************************
869 * ICPanel_PersistFolder2_Initialize
871 * NOTES: it makes no sense to change the pidl
873 static HRESULT WINAPI
ICPanel_PersistFolder2_Initialize(IPersistFolder2
* iface
, LPCITEMIDLIST pidl
)
875 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
876 TRACE("(%p)->(%p)\n", This
, pidl
);
880 /**************************************************************************
881 * IPersistFolder2_fnGetCurFolder
883 static HRESULT WINAPI
ICPanel_PersistFolder2_GetCurFolder(IPersistFolder2
* iface
, LPITEMIDLIST
* pidl
)
885 _ICOM_THIS_From_IPersistFolder2(ICPanelImpl
, iface
);
887 TRACE("(%p)->(%p)\n", This
, pidl
);
891 *pidl
= ILClone(This
->pidlRoot
);
895 static IPersistFolder2Vtbl vt_PersistFolder2
=
898 ICPanel_PersistFolder2_QueryInterface
,
899 ICPanel_PersistFolder2_AddRef
,
900 ICPanel_PersistFolder2_Release
,
901 ICPanel_PersistFolder2_GetClassID
,
902 ICPanel_PersistFolder2_Initialize
,
903 ICPanel_PersistFolder2_GetCurFolder
906 HRESULT WINAPI
CPanel_GetIconLocationA(LPITEMIDLIST pidl
, LPSTR szIconFile
, UINT cchMax
, int* piIndex
)
908 PIDLCPanelStruct
* pcpanel
= _ILGetCPanelPointer(pidl
);
913 lstrcpyA(szIconFile
, pcpanel
->szName
);
914 *piIndex
= pcpanel
->iconIdx
!=-1? pcpanel
->iconIdx
: 0;
919 HRESULT WINAPI
CPanel_GetIconLocationW(LPITEMIDLIST pidl
, LPWSTR szIconFile
, UINT cchMax
, int* piIndex
)
921 PIDLCPanelStruct
* pcpanel
= _ILGetCPanelPointer(pidl
);
926 MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
, -1, szIconFile
, cchMax
);
927 *piIndex
= pcpanel
->iconIdx
!=-1? pcpanel
->iconIdx
: 0;
933 /**************************************************************************
934 * IShellExecuteHookW Implementation
937 static HRESULT WINAPI
IShellExecuteHookW_fnQueryInterface(IShellExecuteHookW
* iface
, REFIID riid
, void** ppvObject
)
939 _ICOM_THIS_From_IShellExecuteHookW(ICPanelImpl
, iface
);
941 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
943 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
946 static ULONG STDMETHODCALLTYPE
IShellExecuteHookW_fnAddRef(IShellExecuteHookW
* iface
)
948 _ICOM_THIS_From_IShellExecuteHookW(ICPanelImpl
, iface
);
950 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
952 return IUnknown_AddRef(This
->pUnkOuter
);
955 static ULONG STDMETHODCALLTYPE
IShellExecuteHookW_fnRelease(IShellExecuteHookW
* iface
)
957 _ICOM_THIS_From_IShellExecuteHookW(ICPanelImpl
, iface
);
959 TRACE("(%p)\n", This
);
961 return IUnknown_Release(This
->pUnkOuter
);
964 static HRESULT WINAPI
IShellExecuteHookW_fnExecute(IShellExecuteHookW
* iface
, LPSHELLEXECUTEINFOW psei
)
966 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
968 SHELLEXECUTEINFOW sei_tmp
;
969 PIDLCPanelStruct
* pcpanel
;
970 WCHAR path
[MAX_PATH
];
974 TRACE("(%p)->execute(%p)\n", This
, psei
);
979 pcpanel
= _ILGetCPanelPointer(ILFindLastID(psei
->lpIDList
));
985 l
= 1 + MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
, -1, path
+1, MAX_PATH
);
987 /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */
991 MultiByteToWideChar(CP_ACP
, 0, pcpanel
->szName
+pcpanel
->offsDispName
, -1, path
+l
, MAX_PATH
);
993 memcpy(&sei_tmp
, psei
, sizeof(sei_tmp
));
994 sei_tmp
.lpFile
= path
;
995 sei_tmp
.fMask
&= ~SEE_MASK_INVOKEIDLIST
;
997 ret
= ShellExecuteExW(&sei_tmp
);
1004 static IShellExecuteHookWVtbl vt_ShellExecuteHookW
=
1007 IShellExecuteHookW_fnQueryInterface
,
1008 IShellExecuteHookW_fnAddRef
,
1009 IShellExecuteHookW_fnRelease
,
1011 IShellExecuteHookW_fnExecute
1015 /**************************************************************************
1016 * IShellExecuteHookA Implementation
1019 static HRESULT WINAPI
IShellExecuteHookA_fnQueryInterface(IShellExecuteHookA
* iface
, REFIID riid
, void** ppvObject
)
1021 _ICOM_THIS_From_IShellExecuteHookA(ICPanelImpl
, iface
);
1023 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
1025 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
1028 static ULONG STDMETHODCALLTYPE
IShellExecuteHookA_fnAddRef(IShellExecuteHookA
* iface
)
1030 _ICOM_THIS_From_IShellExecuteHookA(ICPanelImpl
, iface
);
1032 TRACE("(%p)->(count=%lu)\n", This
, This
->ref
);
1034 return IUnknown_AddRef(This
->pUnkOuter
);
1037 static ULONG STDMETHODCALLTYPE
IShellExecuteHookA_fnRelease(IShellExecuteHookA
* iface
)
1039 _ICOM_THIS_From_IShellExecuteHookA(ICPanelImpl
, iface
);
1041 TRACE("(%p)\n", This
);
1043 return IUnknown_Release(This
->pUnkOuter
);
1046 static HRESULT WINAPI
IShellExecuteHookA_fnExecute(IShellExecuteHookA
* iface
, LPSHELLEXECUTEINFOA psei
)
1048 ICPanelImpl
*This
= (ICPanelImpl
*)iface
;
1050 SHELLEXECUTEINFOA sei_tmp
;
1051 PIDLCPanelStruct
* pcpanel
;
1052 char path
[MAX_PATH
];
1055 TRACE("(%p)->execute(%p)\n", This
, psei
);
1058 return E_INVALIDARG
;
1060 pcpanel
= _ILGetCPanelPointer(ILFindLastID(psei
->lpIDList
));
1063 return E_INVALIDARG
;
1066 lstrcpyA(path
+1, pcpanel
->szName
);
1068 /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */
1069 lstrcatA(path
, "\" ");
1070 lstrcatA(path
, pcpanel
->szName
+pcpanel
->offsDispName
);
1072 memcpy(&sei_tmp
, psei
, sizeof(sei_tmp
));
1073 sei_tmp
.lpFile
= path
;
1074 sei_tmp
.fMask
&= ~SEE_MASK_INVOKEIDLIST
;
1076 ret
= ShellExecuteExA(&sei_tmp
);
1083 static IShellExecuteHookAVtbl vt_ShellExecuteHookA
=
1086 IShellExecuteHookA_fnQueryInterface
,
1087 IShellExecuteHookA_fnAddRef
,
1088 IShellExecuteHookA_fnRelease
,
1090 IShellExecuteHookA_fnExecute