/* * Control panel folder * * Copyright 2003 Martin Fuchs * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA */ #include WINE_DEFAULT_DEBUG_CHANNEL(shell); /*********************************************************************** * control panel implementation in shell namespace */ typedef struct { const IShellFolder2Vtbl *lpVtbl; LONG ref; const IPersistFolder2Vtbl *lpVtblPersistFolder2; const IShellExecuteHookWVtbl *lpVtblShellExecuteHookW; const IShellExecuteHookAVtbl *lpVtblShellExecuteHookA; const IContextMenu2Vtbl *lpVtblContextMenu; IUnknown *pUnkOuter; /* used for aggregation */ /* both paths are parsible from the desktop */ LPITEMIDLIST pidlRoot; /* absolute pidl */ int dwAttributes; /* attributes returned by GetAttributesOf FIXME: use it */ LPCITEMIDLIST *apidl; UINT cidl; } ICPanelImpl, *LPICPanelImpl; static const IShellFolder2Vtbl vt_ShellFolder2; static const IPersistFolder2Vtbl vt_PersistFolder2; static const IShellExecuteHookWVtbl vt_ShellExecuteHookW; static const IShellExecuteHookAVtbl vt_ShellExecuteHookA; static const IContextMenu2Vtbl vt_ContextMenu; static LPICPanelImpl __inline impl_from_IPersistFolder2( IPersistFolder2 *iface ) { return (LPICPanelImpl)((char*)iface - FIELD_OFFSET(ICPanelImpl, lpVtblPersistFolder2)); } static LPICPanelImpl __inline impl_from_IContextMenu( IContextMenu2 *iface ) { return (LPICPanelImpl)((char*)iface - FIELD_OFFSET(ICPanelImpl, lpVtblContextMenu)); } static LPICPanelImpl __inline impl_from_IShellExecuteHookW( IShellExecuteHookW *iface ) { return (LPICPanelImpl)((char*)iface - FIELD_OFFSET(ICPanelImpl, lpVtblShellExecuteHookW)); } static LPICPanelImpl __inline impl_from_IShellExecuteHookA( IShellExecuteHookA *iface ) { return (LPICPanelImpl)((char*)iface - FIELD_OFFSET(ICPanelImpl, lpVtblShellExecuteHookA)); } /* converts This to an interface pointer */ #define _IUnknown_(This) (IUnknown*)&(This->lpVtbl) #define _IShellFolder_(This) (IShellFolder*)&(This->lpVtbl) #define _IShellFolder2_(This) (IShellFolder2*)&(This->lpVtbl) #define _IPersist_(This) (IPersist*)&(This->lpVtblPersistFolder2) #define _IPersistFolder_(This) (IPersistFolder*)&(This->lpVtblPersistFolder2) #define _IPersistFolder2_(This) (IPersistFolder2*)&(This->lpVtblPersistFolder2) #define _IShellExecuteHookW_(This) (IShellExecuteHookW*)&(This->lpVtblShellExecuteHookW) #define _IShellExecuteHookA_(This) (IShellExecuteHookA*)&(This->lpVtblShellExecuteHookA) /*********************************************************************** * IShellFolder [ControlPanel] implementation */ static const shvheader ControlPanelSFHeader[] = { {IDS_SHV_COLUMN8, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15},/*FIXME*/ {IDS_SHV_COLUMN9, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 200},/*FIXME*/ }; #define CONROLPANELSHELLVIEWCOLUMNS 2 /************************************************************************** * IControlPanel_Constructor */ HRESULT WINAPI IControlPanel_Constructor(IUnknown* pUnkOuter, REFIID riid, LPVOID * ppv) { ICPanelImpl *sf; TRACE("unkOut=%p %s\n", pUnkOuter, shdebugstr_guid(riid)); if (!ppv) return E_POINTER; if (pUnkOuter && !IsEqualIID (riid, &IID_IUnknown)) return CLASS_E_NOAGGREGATION; sf = (ICPanelImpl *) LocalAlloc(LMEM_ZEROINIT, sizeof(ICPanelImpl)); if (!sf) return E_OUTOFMEMORY; sf->ref = 0; sf->apidl = NULL; sf->cidl = 0; sf->lpVtbl = &vt_ShellFolder2; sf->lpVtblPersistFolder2 = &vt_PersistFolder2; sf->lpVtblShellExecuteHookW = &vt_ShellExecuteHookW; sf->lpVtblShellExecuteHookA = &vt_ShellExecuteHookA; sf->lpVtblContextMenu = &vt_ContextMenu; sf->pidlRoot = _ILCreateControlPanel(); /* my qualified pidl */ sf->pUnkOuter = pUnkOuter ? pUnkOuter : _IUnknown_ (sf); if (!SUCCEEDED(IUnknown_QueryInterface(_IUnknown_(sf), riid, ppv))) { IUnknown_Release(_IUnknown_(sf)); return E_NOINTERFACE; } TRACE("--(%p)\n", sf); return S_OK; } /************************************************************************** * ISF_ControlPanel_fnQueryInterface * * NOTES supports not IPersist/IPersistFolder */ static HRESULT WINAPI ISF_ControlPanel_fnQueryInterface(IShellFolder2 * iface, REFIID riid, LPVOID * ppvObject) { ICPanelImpl *This = (ICPanelImpl *)iface; TRACE("(%p)->(%s,%p)\n", This, shdebugstr_guid(riid), ppvObject); *ppvObject = NULL; if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IShellFolder) || IsEqualIID(riid, &IID_IShellFolder2)) *ppvObject = This; else if (IsEqualIID(riid, &IID_IPersist) || IsEqualIID(riid, &IID_IPersistFolder) || IsEqualIID(riid, &IID_IPersistFolder2)) *ppvObject = _IPersistFolder2_(This); else if (IsEqualIID(riid, &IID_IShellExecuteHookW)) *ppvObject = _IShellExecuteHookW_(This); else if (IsEqualIID(riid, &IID_IShellExecuteHookA)) *ppvObject = _IShellExecuteHookA_(This); if (*ppvObject) { IUnknown_AddRef((IUnknown *)(*ppvObject)); TRACE("-- Interface:(%p)->(%p)\n", ppvObject, *ppvObject); return S_OK; } TRACE("-- Interface: E_NOINTERFACE\n"); return E_NOINTERFACE; } static ULONG WINAPI ISF_ControlPanel_fnAddRef(IShellFolder2 * iface) { ICPanelImpl *This = (ICPanelImpl *)iface; ULONG refCount = InterlockedIncrement(&This->ref); TRACE("(%p)->(count=%u)\n", This, refCount - 1); return refCount; } static ULONG WINAPI ISF_ControlPanel_fnRelease(IShellFolder2 * iface) { ICPanelImpl *This = (ICPanelImpl *)iface; ULONG refCount = InterlockedDecrement(&This->ref); TRACE("(%p)->(count=%u)\n", This, refCount + 1); if (!refCount) { TRACE("-- destroying IShellFolder(%p)\n", This); SHFree(This->pidlRoot); LocalFree((HLOCAL) This); } return refCount; } /************************************************************************** * ISF_ControlPanel_fnParseDisplayName */ static HRESULT WINAPI ISF_ControlPanel_fnParseDisplayName(IShellFolder2 * iface, HWND hwndOwner, LPBC pbc, LPOLESTR lpszDisplayName, DWORD * pchEaten, LPITEMIDLIST * ppidl, DWORD * pdwAttributes) { ICPanelImpl *This = (ICPanelImpl *)iface; WCHAR szElement[MAX_PATH]; LPCWSTR szNext = NULL; LPITEMIDLIST pidlTemp = NULL; HRESULT hr = S_OK; CLSID clsid; TRACE ("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n", This, hwndOwner, pbc, lpszDisplayName, debugstr_w(lpszDisplayName), pchEaten, ppidl, pdwAttributes); if (!lpszDisplayName || !ppidl) return E_INVALIDARG; *ppidl = 0; if (pchEaten) *pchEaten = 0; /* strange but like the original */ if (lpszDisplayName[0] == ':' && lpszDisplayName[1] == ':') { szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH); TRACE ("-- element: %s\n", debugstr_w (szElement)); CLSIDFromString (szElement + 2, &clsid); pidlTemp = _ILCreateGuid (PT_GUID, &clsid); } else if( (pidlTemp = SHELL32_CreatePidlFromBindCtx(pbc, lpszDisplayName)) ) { *ppidl = pidlTemp; return S_OK; } if (SUCCEEDED(hr) && pidlTemp) { if (szNext && *szNext) { hr = SHELL32_ParseNextElement(iface, hwndOwner, pbc, &pidlTemp, (LPOLESTR) szNext, pchEaten, pdwAttributes); } else { if (pdwAttributes && *pdwAttributes) hr = SHELL32_GetItemAttributes(_IShellFolder_ (This), pidlTemp, pdwAttributes); } } *ppidl = pidlTemp; TRACE ("(%p)->(-- ret=0x%08x)\n", This, hr); return hr; } static LPITEMIDLIST _ILCreateCPanelApplet(LPCSTR name, LPCSTR displayName, LPCSTR comment, int iconIdx) { PIDLCPanelStruct *p; LPITEMIDLIST pidl; PIDLDATA tmp; int size0 = (char*)&tmp.u.cpanel.szName-(char*)&tmp.u.cpanel; int size = size0; int l; tmp.type = PT_CPLAPPLET; tmp.u.cpanel.dummy = 0; tmp.u.cpanel.iconIdx = iconIdx; l = strlen(name); size += l+1; tmp.u.cpanel.offsDispName = l+1; l = strlen(displayName); size += l+1; tmp.u.cpanel.offsComment = tmp.u.cpanel.offsDispName+1+l; l = strlen(comment); size += l+1; pidl = SHAlloc(size+4); if (!pidl) return NULL; pidl->mkid.cb = size+2; memcpy(pidl->mkid.abID, &tmp, 2+size0); p = &((PIDLDATA*)pidl->mkid.abID)->u.cpanel; strcpy(p->szName, name); strcpy(p->szName+tmp.u.cpanel.offsDispName, displayName); strcpy(p->szName+tmp.u.cpanel.offsComment, comment); *(WORD*)((char*)pidl+(size+2)) = 0; pcheck(pidl); return pidl; } /************************************************************************** * _ILGetCPanelPointer() * gets a pointer to the control panel struct stored in the pidl */ static PIDLCPanelStruct* _ILGetCPanelPointer(LPCITEMIDLIST pidl) { LPPIDLDATA pdata = _ILGetDataPointer(pidl); if (pdata && pdata->type==PT_CPLAPPLET) return (PIDLCPanelStruct*)&(pdata->u.cpanel); return NULL; } static BOOL SHELL_RegisterCPanelApp(IEnumIDList* list, LPCSTR path) { LPITEMIDLIST pidl; CPlApplet* applet; CPanel panel; CPLINFO info; unsigned i; int iconIdx; char displayName[MAX_PATH]; char comment[MAX_PATH]; WCHAR wpath[MAX_PATH]; MultiByteToWideChar(CP_ACP, 0, path, -1, wpath, MAX_PATH); panel.first = NULL; applet = Control_LoadApplet(0, wpath, &panel); if (applet) { for(i=0; icount; ++i) { WideCharToMultiByte(CP_ACP, 0, applet->info[i].szName, -1, displayName, MAX_PATH, 0, 0); WideCharToMultiByte(CP_ACP, 0, applet->info[i].szInfo, -1, comment, MAX_PATH, 0, 0); applet->proc(0, CPL_INQUIRE, i, (LPARAM)&info); if (info.idIcon > 0) iconIdx = -info.idIcon; /* negative icon index instead of icon number */ else iconIdx = 0; pidl = _ILCreateCPanelApplet(path, displayName, comment, iconIdx); if (pidl) AddToEnumList(list, pidl); } Control_UnloadApplet(applet); } return TRUE; } static int SHELL_RegisterRegistryCPanelApps(IEnumIDList* list, HKEY hkey_root, LPCSTR szRepPath) { char name[MAX_PATH]; char value[MAX_PATH]; HKEY hkey; int cnt = 0; if (RegOpenKeyA(hkey_root, szRepPath, &hkey) == ERROR_SUCCESS) { int idx = 0; for(;; ++idx) { DWORD nameLen = MAX_PATH; DWORD valueLen = MAX_PATH; if (RegEnumValueA(hkey, idx, name, &nameLen, NULL, NULL, (LPBYTE)&value, &valueLen) != ERROR_SUCCESS) break; if (SHELL_RegisterCPanelApp(list, value)) ++cnt; } RegCloseKey(hkey); } return cnt; } static int SHELL_RegisterCPanelFolders(IEnumIDList* list, HKEY hkey_root, LPCSTR szRepPath) { char name[MAX_PATH]; HKEY hkey; int cnt = 0; if (RegOpenKeyA(hkey_root, szRepPath, &hkey) == ERROR_SUCCESS) { int idx = 0; for(;; ++idx) { if (RegEnumKeyA(hkey, idx, name, MAX_PATH) != ERROR_SUCCESS) break; if (*name == '{') { LPITEMIDLIST pidl = _ILCreateGuidFromStrA(name); if (pidl && AddToEnumList(list, pidl)) ++cnt; } } RegCloseKey(hkey); } return cnt; } /************************************************************************** * CreateCPanelEnumList() */ static BOOL CreateCPanelEnumList( IEnumIDList * iface, DWORD dwFlags) { CHAR szPath[MAX_PATH]; WIN32_FIND_DATAA wfd; HANDLE hFile; TRACE("(%p)->(flags=0x%08x)\n", iface, dwFlags); /* enumerate control panel folders */ if (dwFlags & SHCONTF_FOLDERS) SHELL_RegisterCPanelFolders(iface, HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ControlPanel\\NameSpace"); /* enumerate the control panel applets */ if (dwFlags & SHCONTF_NONFOLDERS) { LPSTR p; GetSystemDirectoryA(szPath, MAX_PATH); p = PathAddBackslashA(szPath); strcpy(p, "*.cpl"); TRACE("-- (%p)-> enumerate SHCONTF_NONFOLDERS of %s\n",iface,debugstr_a(szPath)); hFile = FindFirstFileA(szPath, &wfd); if (hFile != INVALID_HANDLE_VALUE) { do { if (!(dwFlags & SHCONTF_INCLUDEHIDDEN) && (wfd.dwFileAttributes & FILE_ATTRIBUTE_HIDDEN)) continue; if (!(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)) { strcpy(p, wfd.cFileName); if (strcmp(wfd.cFileName, "ncpa.cpl")) SHELL_RegisterCPanelApp((IEnumIDList*)iface, szPath); } } while(FindNextFileA(hFile, &wfd)); FindClose(hFile); } SHELL_RegisterRegistryCPanelApps((IEnumIDList*)iface, HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls"); SHELL_RegisterRegistryCPanelApps((IEnumIDList*)iface, HKEY_CURRENT_USER, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls"); } return TRUE; } /************************************************************************** * ISF_ControlPanel_fnEnumObjects */ static HRESULT WINAPI ISF_ControlPanel_fnEnumObjects(IShellFolder2 * iface, HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST * ppEnumIDList) { ICPanelImpl *This = (ICPanelImpl *)iface; TRACE("(%p)->(HWND=%p flags=0x%08x pplist=%p)\n", This, hwndOwner, dwFlags, ppEnumIDList); *ppEnumIDList = IEnumIDList_Constructor(); if (*ppEnumIDList) CreateCPanelEnumList(*ppEnumIDList, dwFlags); TRACE("--(%p)->(new ID List: %p)\n", This, *ppEnumIDList); return(*ppEnumIDList) ? S_OK : E_OUTOFMEMORY; } /************************************************************************** * ISF_ControlPanel_fnBindToObject */ static HRESULT WINAPI ISF_ControlPanel_fnBindToObject(IShellFolder2 * iface, LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut) { ICPanelImpl *This = (ICPanelImpl *)iface; TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This, pidl, pbcReserved, shdebugstr_guid(riid), ppvOut); return SHELL32_BindToChild(This->pidlRoot, NULL, pidl, riid, ppvOut); } /************************************************************************** * ISF_ControlPanel_fnBindToStorage */ static HRESULT WINAPI ISF_ControlPanel_fnBindToStorage(IShellFolder2 * iface, LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut) { ICPanelImpl *This = (ICPanelImpl *)iface; FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This, pidl, pbcReserved, shdebugstr_guid(riid), ppvOut); *ppvOut = NULL; return E_NOTIMPL; } /************************************************************************** * ISF_ControlPanel_fnCompareIDs */ static HRESULT WINAPI ISF_ControlPanel_fnCompareIDs(IShellFolder2 * iface, LPARAM lParam, LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2) { ICPanelImpl *This = (ICPanelImpl *)iface; int nReturn; TRACE("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This, lParam, pidl1, pidl2); nReturn = SHELL32_CompareIDs(_IShellFolder_(This), lParam, pidl1, pidl2); TRACE("-- %i\n", nReturn); return nReturn; } /************************************************************************** * ISF_ControlPanel_fnCreateViewObject */ static HRESULT WINAPI ISF_ControlPanel_fnCreateViewObject(IShellFolder2 * iface, HWND hwndOwner, REFIID riid, LPVOID * ppvOut) { ICPanelImpl *This = (ICPanelImpl *)iface; LPSHELLVIEW pShellView; HRESULT hr = E_INVALIDARG; TRACE("(%p)->(hwnd=%p,%s,%p)\n", This, hwndOwner, shdebugstr_guid(riid), ppvOut); if (ppvOut) { *ppvOut = NULL; if (IsEqualIID(riid, &IID_IDropTarget)) { WARN("IDropTarget not implemented\n"); hr = E_NOTIMPL; } else if (IsEqualIID(riid, &IID_IContextMenu)) { WARN("IContextMenu not implemented\n"); hr = E_NOTIMPL; } else if (IsEqualIID(riid, &IID_IShellView)) { pShellView = IShellView_Constructor((IShellFolder *) iface); if (pShellView) { hr = IShellView_QueryInterface(pShellView, riid, ppvOut); IShellView_Release(pShellView); } } } TRACE("--(%p)->(interface=%p)\n", This, ppvOut); return hr; } /************************************************************************** * ISF_ControlPanel_fnGetAttributesOf */ static HRESULT WINAPI ISF_ControlPanel_fnGetAttributesOf(IShellFolder2 * iface, UINT cidl, LPCITEMIDLIST * apidl, DWORD * rgfInOut) { ICPanelImpl *This = (ICPanelImpl *)iface; HRESULT hr = S_OK; TRACE("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n", This, cidl, apidl, rgfInOut, rgfInOut ? *rgfInOut : 0); if (!rgfInOut) return E_INVALIDARG; if (cidl && !apidl) return E_INVALIDARG; if (*rgfInOut == 0) *rgfInOut = ~0; while(cidl > 0 && *apidl) { pdump(*apidl); SHELL32_GetItemAttributes(_IShellFolder_(This), *apidl, rgfInOut); apidl++; cidl--; } /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */ *rgfInOut &= ~SFGAO_VALIDATE; TRACE("-- result=0x%08x\n", *rgfInOut); return hr; } /************************************************************************** * ISF_ControlPanel_fnGetUIObjectOf * * PARAMETERS * HWND hwndOwner, //[in ] Parent window for any output * UINT cidl, //[in ] array size * LPCITEMIDLIST* apidl, //[in ] simple pidl array * REFIID riid, //[in ] Requested Interface * UINT* prgfInOut, //[ ] reserved * LPVOID* ppvObject) //[out] Resulting Interface * */ static HRESULT WINAPI ISF_ControlPanel_fnGetUIObjectOf(IShellFolder2 * iface, HWND hwndOwner, UINT cidl, LPCITEMIDLIST * apidl, REFIID riid, UINT * prgfInOut, LPVOID * ppvOut) { ICPanelImpl *This = (ICPanelImpl *)iface; LPITEMIDLIST pidl; IUnknown *pObj = NULL; HRESULT hr = E_INVALIDARG; TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n", This, hwndOwner, cidl, apidl, shdebugstr_guid(riid), prgfInOut, ppvOut); if (ppvOut) { *ppvOut = NULL; if (IsEqualIID(riid, &IID_IContextMenu) &&(cidl >= 1)) { // TODO // create a seperate item struct // pObj = (IUnknown*)(&This->lpVtblContextMenu); This->apidl = apidl; This->cidl = cidl; IUnknown_AddRef(pObj); hr = S_OK; } else if (IsEqualIID(riid, &IID_IDataObject) &&(cidl >= 1)) { pObj = (LPUNKNOWN) IDataObject_Constructor(hwndOwner, This->pidlRoot, apidl, cidl); hr = S_OK; } else if (IsEqualIID(riid, &IID_IExtractIconA) &&(cidl == 1)) { pidl = ILCombine(This->pidlRoot, apidl[0]); pObj = (LPUNKNOWN) IExtractIconA_Constructor(pidl); SHFree(pidl); hr = S_OK; } else if (IsEqualIID(riid, &IID_IExtractIconW) &&(cidl == 1)) { pidl = ILCombine(This->pidlRoot, apidl[0]); pObj = (LPUNKNOWN) IExtractIconW_Constructor(pidl); SHFree(pidl); hr = S_OK; } else if ((IsEqualIID(riid,&IID_IShellLinkW) || IsEqualIID(riid,&IID_IShellLinkA)) && (cidl == 1)) { pidl = ILCombine(This->pidlRoot, apidl[0]); hr = IShellLink_ConstructFromFile(NULL, riid, pidl,(LPVOID*)&pObj); SHFree(pidl); } else { hr = E_NOINTERFACE; } if (SUCCEEDED(hr) && !pObj) hr = E_OUTOFMEMORY; *ppvOut = pObj; } TRACE("(%p)->hr=0x%08x\n", This, hr); return hr; } /************************************************************************** * ISF_ControlPanel_fnGetDisplayNameOf */ static HRESULT WINAPI ISF_ControlPanel_fnGetDisplayNameOf(IShellFolder2 * iface, LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet) { ICPanelImpl *This = (ICPanelImpl *)iface; CHAR szPath[MAX_PATH]; WCHAR wszPath[MAX_PATH+1]; /* +1 for potential backslash */ PIDLCPanelStruct* pcpanel; *szPath = '\0'; TRACE("(%p)->(pidl=%p,0x%08x,%p)\n", This, pidl, dwFlags, strRet); pdump(pidl); if (!pidl || !strRet) return E_INVALIDARG; pcpanel = _ILGetCPanelPointer(pidl); if (pcpanel) { lstrcpyA(szPath, pcpanel->szName+pcpanel->offsDispName); if (!(dwFlags & SHGDN_FORPARSING)) FIXME("retrieve display name from control panel app\n"); } /* take names of special folders only if it's only this folder */ else if (_ILIsSpecialFolder(pidl)) { BOOL bSimplePidl = _ILIsPidlSimple(pidl); if (bSimplePidl) { _ILSimpleGetTextW(pidl, wszPath, MAX_PATH); /* append my own path */ } else { FIXME("special pidl\n"); } if ((dwFlags & SHGDN_FORPARSING) && !bSimplePidl) { /* go deeper if needed */ int len = 0; PathAddBackslashW(wszPath); len = wcslen(wszPath); if (!SUCCEEDED (SHELL32_GetDisplayNameOfChild(iface, pidl, dwFlags, wszPath + len, MAX_PATH + 1 - len))) return E_OUTOFMEMORY; if (!WideCharToMultiByte(CP_ACP, 0, wszPath, -1, szPath, MAX_PATH, NULL, NULL)) wszPath[0] = '\0'; } else { if (bSimplePidl) { if (!WideCharToMultiByte(CP_ACP, 0, wszPath, -1, szPath, MAX_PATH, NULL, NULL)) wszPath[0] = '\0'; } } } strRet->uType = STRRET_CSTR; lstrcpynA(strRet->u.cStr, szPath, MAX_PATH); TRACE("--(%p)->(%s)\n", This, szPath); return S_OK; } /************************************************************************** * ISF_ControlPanel_fnSetNameOf * Changes the name of a file object or subfolder, possibly changing its item * identifier in the process. * * PARAMETERS * HWND hwndOwner, //[in ] Owner window for output * LPCITEMIDLIST pidl, //[in ] simple pidl of item to change * LPCOLESTR lpszName, //[in ] the items new display name * DWORD dwFlags, //[in ] SHGNO formatting flags * LPITEMIDLIST* ppidlOut) //[out] simple pidl returned */ static HRESULT WINAPI ISF_ControlPanel_fnSetNameOf(IShellFolder2 * iface, HWND hwndOwner, LPCITEMIDLIST pidl, /*simple pidl */ LPCOLESTR lpName, DWORD dwFlags, LPITEMIDLIST * pPidlOut) { ICPanelImpl *This = (ICPanelImpl *)iface; FIXME("(%p)->(%p,pidl=%p,%s,%u,%p)\n", This, hwndOwner, pidl, debugstr_w(lpName), dwFlags, pPidlOut); return E_FAIL; } static HRESULT WINAPI ISF_ControlPanel_fnGetDefaultSearchGUID(IShellFolder2 * iface, GUID * pguid) { ICPanelImpl *This = (ICPanelImpl *)iface; FIXME("(%p)\n", This); return E_NOTIMPL; } static HRESULT WINAPI ISF_ControlPanel_fnEnumSearches(IShellFolder2 * iface, IEnumExtraSearch ** ppenum) { ICPanelImpl *This = (ICPanelImpl *)iface; FIXME("(%p)\n", This); return E_NOTIMPL; } static HRESULT WINAPI ISF_ControlPanel_fnGetDefaultColumn(IShellFolder2 * iface, DWORD dwRes, ULONG * pSort, ULONG * pDisplay) { ICPanelImpl *This = (ICPanelImpl *)iface; TRACE("(%p)\n", This); if (pSort) *pSort = 0; if (pDisplay) *pDisplay = 0; return S_OK; } static HRESULT WINAPI ISF_ControlPanel_fnGetDefaultColumnState(IShellFolder2 * iface, UINT iColumn, DWORD * pcsFlags) { ICPanelImpl *This = (ICPanelImpl *)iface; TRACE("(%p)\n", This); if (!pcsFlags || iColumn >= CONROLPANELSHELLVIEWCOLUMNS) return E_INVALIDARG; *pcsFlags = ControlPanelSFHeader[iColumn].pcsFlags; return S_OK; } static HRESULT WINAPI ISF_ControlPanel_fnGetDetailsEx(IShellFolder2 * iface, LPCITEMIDLIST pidl, const SHCOLUMNID * pscid, VARIANT * pv) { ICPanelImpl *This = (ICPanelImpl *)iface; FIXME("(%p)\n", This); return E_NOTIMPL; } static HRESULT WINAPI ISF_ControlPanel_fnGetDetailsOf(IShellFolder2 * iface, LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS * psd) { ICPanelImpl *This = (ICPanelImpl *)iface; HRESULT hr; TRACE("(%p)->(%p %i %p)\n", This, pidl, iColumn, psd); if (!psd || iColumn >= CONROLPANELSHELLVIEWCOLUMNS) return E_INVALIDARG; if (!pidl) { psd->fmt = ControlPanelSFHeader[iColumn].fmt; psd->cxChar = ControlPanelSFHeader[iColumn].cxChar; psd->str.uType = STRRET_CSTR; LoadStringA(shell32_hInstance, ControlPanelSFHeader[iColumn].colnameid, psd->str.u.cStr, MAX_PATH); return S_OK; } else { psd->str.u.cStr[0] = 0x00; psd->str.uType = STRRET_CSTR; switch(iColumn) { case 0: /* name */ hr = IShellFolder_GetDisplayNameOf(iface, pidl, SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str); break; case 1: /* comment */ _ILGetFileType(pidl, psd->str.u.cStr, MAX_PATH); break; } hr = S_OK; } return hr; } static HRESULT WINAPI ISF_ControlPanel_fnMapColumnToSCID(IShellFolder2 * iface, UINT column, SHCOLUMNID * pscid) { ICPanelImpl *This = (ICPanelImpl *)iface; FIXME("(%p)\n", This); return E_NOTIMPL; } static const IShellFolder2Vtbl vt_ShellFolder2 = { ISF_ControlPanel_fnQueryInterface, ISF_ControlPanel_fnAddRef, ISF_ControlPanel_fnRelease, ISF_ControlPanel_fnParseDisplayName, ISF_ControlPanel_fnEnumObjects, ISF_ControlPanel_fnBindToObject, ISF_ControlPanel_fnBindToStorage, ISF_ControlPanel_fnCompareIDs, ISF_ControlPanel_fnCreateViewObject, ISF_ControlPanel_fnGetAttributesOf, ISF_ControlPanel_fnGetUIObjectOf, ISF_ControlPanel_fnGetDisplayNameOf, ISF_ControlPanel_fnSetNameOf, /* ShellFolder2 */ ISF_ControlPanel_fnGetDefaultSearchGUID, ISF_ControlPanel_fnEnumSearches, ISF_ControlPanel_fnGetDefaultColumn, ISF_ControlPanel_fnGetDefaultColumnState, ISF_ControlPanel_fnGetDetailsEx, ISF_ControlPanel_fnGetDetailsOf, ISF_ControlPanel_fnMapColumnToSCID }; /************************************************************************ * ICPanel_PersistFolder2_QueryInterface */ static HRESULT WINAPI ICPanel_PersistFolder2_QueryInterface(IPersistFolder2 * iface, REFIID iid, LPVOID * ppvObject) { ICPanelImpl *This = impl_from_IPersistFolder2(iface); TRACE("(%p)\n", This); return IUnknown_QueryInterface(_IUnknown_(This), iid, ppvObject); } /************************************************************************ * ICPanel_PersistFolder2_AddRef */ static ULONG WINAPI ICPanel_PersistFolder2_AddRef(IPersistFolder2 * iface) { ICPanelImpl *This = impl_from_IPersistFolder2(iface); TRACE("(%p)->(count=%u)\n", This, This->ref); return IUnknown_AddRef(_IUnknown_(This)); } /************************************************************************ * ISFPersistFolder_Release */ static ULONG WINAPI ICPanel_PersistFolder2_Release(IPersistFolder2 * iface) { ICPanelImpl *This = impl_from_IPersistFolder2(iface); TRACE("(%p)->(count=%u)\n", This, This->ref); return IUnknown_Release(_IUnknown_(This)); } /************************************************************************ * ICPanel_PersistFolder2_GetClassID */ static HRESULT WINAPI ICPanel_PersistFolder2_GetClassID(IPersistFolder2 * iface, CLSID * lpClassId) { ICPanelImpl *This = impl_from_IPersistFolder2(iface); TRACE("(%p)\n", This); if (!lpClassId) return E_POINTER; *lpClassId = CLSID_ControlPanel; return S_OK; } /************************************************************************ * ICPanel_PersistFolder2_Initialize * * NOTES: it makes no sense to change the pidl */ static HRESULT WINAPI ICPanel_PersistFolder2_Initialize(IPersistFolder2 * iface, LPCITEMIDLIST pidl) { ICPanelImpl *This = impl_from_IPersistFolder2(iface); if (This->pidlRoot) SHFree((LPVOID)This->pidlRoot); This->pidlRoot = ILClone(pidl); return S_OK; } /************************************************************************** * IPersistFolder2_fnGetCurFolder */ static HRESULT WINAPI ICPanel_PersistFolder2_GetCurFolder(IPersistFolder2 * iface, LPITEMIDLIST * pidl) { ICPanelImpl *This = impl_from_IPersistFolder2(iface); TRACE("(%p)->(%p)\n", This, pidl); if (!pidl) return E_POINTER; *pidl = ILClone(This->pidlRoot); return S_OK; } static const IPersistFolder2Vtbl vt_PersistFolder2 = { ICPanel_PersistFolder2_QueryInterface, ICPanel_PersistFolder2_AddRef, ICPanel_PersistFolder2_Release, ICPanel_PersistFolder2_GetClassID, ICPanel_PersistFolder2_Initialize, ICPanel_PersistFolder2_GetCurFolder }; HRESULT CPanel_GetIconLocationW(LPCITEMIDLIST pidl, LPWSTR szIconFile, UINT cchMax, int* piIndex) { PIDLCPanelStruct* pcpanel = _ILGetCPanelPointer(pidl); if (!pcpanel) return E_INVALIDARG; MultiByteToWideChar(CP_ACP, 0, pcpanel->szName, -1, szIconFile, cchMax); *piIndex = pcpanel->iconIdx!=-1? pcpanel->iconIdx: 0; return S_OK; } /************************************************************************** * IShellExecuteHookW Implementation */ static HRESULT WINAPI IShellExecuteHookW_fnQueryInterface( IShellExecuteHookW* iface, REFIID riid, void** ppvObject) { ICPanelImpl *This = impl_from_IShellExecuteHookW(iface); TRACE("(%p)->(count=%u)\n", This, This->ref); return IUnknown_QueryInterface(This->pUnkOuter, riid, ppvObject); } static ULONG STDMETHODCALLTYPE IShellExecuteHookW_fnAddRef(IShellExecuteHookW* iface) { ICPanelImpl *This = impl_from_IShellExecuteHookW(iface); TRACE("(%p)->(count=%u)\n", This, This->ref); return IUnknown_AddRef(This->pUnkOuter); } static ULONG STDMETHODCALLTYPE IShellExecuteHookW_fnRelease(IShellExecuteHookW* iface) { ICPanelImpl *This = impl_from_IShellExecuteHookW(iface); TRACE("(%p)\n", This); return IUnknown_Release(This->pUnkOuter); } HRESULT ExecuteAppletFromCLSID(LPOLESTR pOleStr) { WCHAR szCmd[MAX_PATH]; WCHAR szExpCmd[MAX_PATH]; PROCESS_INFORMATION pi; STARTUPINFOW si; WCHAR szBuffer[90] = { 'C', 'L', 'S', 'I', 'D', '\\', 0 }; DWORD dwType, dwSize; wcscpy(&szBuffer[6], pOleStr); wcscat(szBuffer, L"\\shell\\open\\command"); dwSize = sizeof(szCmd); if (RegGetValueW(HKEY_CLASSES_ROOT, szBuffer, NULL, RRF_RT_REG_SZ, &dwType, (PVOID)szCmd, &dwSize) != ERROR_SUCCESS) { wcscpy(szCmd, L"%SystemRoot%\\Explorer.exe ::"); wcscat(szCmd, pOleStr); } #if 0 if (dwType != RRF_RT_REG_SZ && dwType != RRF_RT_REG_EXPAND_SZ) return E_FAIL; #endif if (!ExpandEnvironmentStringsW(szCmd, szExpCmd, sizeof(szExpCmd)/sizeof(WCHAR))) return E_FAIL; ZeroMemory(&si, sizeof(si)); si.cb = sizeof(si); if (!CreateProcessW(NULL, szExpCmd, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi)) return E_FAIL; CloseHandle(pi.hProcess); CloseHandle(pi.hThread); return S_OK; } static HRESULT WINAPI IShellExecuteHookW_fnExecute(IShellExecuteHookW* iface, LPSHELLEXECUTEINFOW psei) { static const WCHAR wCplopen[] = {'c','p','l','o','p','e','n','\0'}; ICPanelImpl *This = (ICPanelImpl *)iface; SHELLEXECUTEINFOW sei_tmp; PIDLCPanelStruct* pcpanel; WCHAR path[MAX_PATH]; WCHAR params[MAX_PATH]; BOOL ret; HRESULT hr; int l; TRACE("(%p)->execute(%p)\n", This, psei); if (!psei) return E_INVALIDARG; pcpanel = _ILGetCPanelPointer(ILFindLastID(psei->lpIDList)); if (!pcpanel) { LPOLESTR pOleStr; IID * iid = _ILGetGUIDPointer(ILFindLastID(psei->lpIDList)); if (!iid) return E_INVALIDARG; if (StringFromCLSID(iid, &pOleStr) == S_OK) { hr = ExecuteAppletFromCLSID(pOleStr); CoTaskMemFree(pOleStr); return hr; } return E_INVALIDARG; } path[0] = '\"'; /* Return value from MultiByteToWideChar includes terminating NUL, which * compensates for the starting double quote we just put in */ l = MultiByteToWideChar(CP_ACP, 0, pcpanel->szName, -1, path+1, MAX_PATH); /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */ path[l++] = '"'; path[l] = '\0'; MultiByteToWideChar(CP_ACP, 0, pcpanel->szName+pcpanel->offsDispName, -1, params, MAX_PATH); memcpy(&sei_tmp, psei, sizeof(sei_tmp)); sei_tmp.lpFile = path; sei_tmp.lpParameters = params; sei_tmp.fMask &= ~SEE_MASK_INVOKEIDLIST; sei_tmp.lpVerb = wCplopen; ret = ShellExecuteExW(&sei_tmp); if (ret) return S_OK; else return S_FALSE; } static const IShellExecuteHookWVtbl vt_ShellExecuteHookW = { IShellExecuteHookW_fnQueryInterface, IShellExecuteHookW_fnAddRef, IShellExecuteHookW_fnRelease, IShellExecuteHookW_fnExecute }; /************************************************************************** * IShellExecuteHookA Implementation */ static HRESULT WINAPI IShellExecuteHookA_fnQueryInterface(IShellExecuteHookA* iface, REFIID riid, void** ppvObject) { ICPanelImpl *This = impl_from_IShellExecuteHookA(iface); TRACE("(%p)->(count=%u)\n", This, This->ref); return IUnknown_QueryInterface(This->pUnkOuter, riid, ppvObject); } static ULONG STDMETHODCALLTYPE IShellExecuteHookA_fnAddRef(IShellExecuteHookA* iface) { ICPanelImpl *This = impl_from_IShellExecuteHookA(iface); TRACE("(%p)->(count=%u)\n", This, This->ref); return IUnknown_AddRef(This->pUnkOuter); } static ULONG STDMETHODCALLTYPE IShellExecuteHookA_fnRelease(IShellExecuteHookA* iface) { ICPanelImpl *This = impl_from_IShellExecuteHookA(iface); TRACE("(%p)\n", This); return IUnknown_Release(This->pUnkOuter); } static HRESULT WINAPI IShellExecuteHookA_fnExecute(IShellExecuteHookA* iface, LPSHELLEXECUTEINFOA psei) { ICPanelImpl *This = (ICPanelImpl *)iface; SHELLEXECUTEINFOA sei_tmp; PIDLCPanelStruct* pcpanel; char path[MAX_PATH]; BOOL ret; TRACE("(%p)->execute(%p)\n", This, psei); if (!psei) return E_INVALIDARG; pcpanel = _ILGetCPanelPointer(ILFindLastID(psei->lpIDList)); if (!pcpanel) return E_INVALIDARG; path[0] = '\"'; lstrcpyA(path+1, pcpanel->szName); /* pass applet name to Control_RunDLL to distinguish between applets in one .cpl file */ lstrcatA(path, "\" "); lstrcatA(path, pcpanel->szName+pcpanel->offsDispName); memcpy(&sei_tmp, psei, sizeof(sei_tmp)); sei_tmp.lpFile = path; sei_tmp.fMask &= ~SEE_MASK_INVOKEIDLIST; ret = ShellExecuteExA(&sei_tmp); if (ret) return S_OK; else return S_FALSE; } static const IShellExecuteHookAVtbl vt_ShellExecuteHookA = { IShellExecuteHookA_fnQueryInterface, IShellExecuteHookA_fnAddRef, IShellExecuteHookA_fnRelease, IShellExecuteHookA_fnExecute }; /************************************************************************** * IContextMenu2 Implementation */ /************************************************************************ * ICPanel_IContextMenu_QueryInterface */ static HRESULT WINAPI ICPanel_IContextMenu2_QueryInterface(IContextMenu2 * iface, REFIID iid, LPVOID * ppvObject) { ICPanelImpl *This = impl_from_IContextMenu(iface); TRACE("(%p)\n", This); return IUnknown_QueryInterface(_IUnknown_(This), iid, ppvObject); } /************************************************************************ * ICPanel_IContextMenu_AddRef */ static ULONG WINAPI ICPanel_IContextMenu2_AddRef(IContextMenu2 * iface) { ICPanelImpl *This = impl_from_IContextMenu(iface); TRACE("(%p)->(count=%u)\n", This, This->ref); return IUnknown_AddRef(_IUnknown_(This)); } /************************************************************************ * ICPanel_IContextMenu_Release */ static ULONG WINAPI ICPanel_IContextMenu2_Release(IContextMenu2 * iface) { ICPanelImpl *This = impl_from_IContextMenu(iface); TRACE("(%p)->(count=%u)\n", This, This->ref); return IUnknown_Release(_IUnknown_(This)); } /************************************************************************** * ICPanel_IContextMenu_QueryContextMenu() */ static HRESULT WINAPI ICPanel_IContextMenu2_QueryContextMenu( IContextMenu2 *iface, HMENU hMenu, UINT indexMenu, UINT idCmdFirst, UINT idCmdLast, UINT uFlags) { WCHAR szBuffer[30] = {0}; ULONG Count = 1; ICPanelImpl *This = impl_from_IContextMenu(iface); TRACE("(%p)->(hmenu=%p indexmenu=%x cmdfirst=%x cmdlast=%x flags=%x )\n", This, hMenu, indexMenu, idCmdFirst, idCmdLast, uFlags); if (LoadStringW(shell32_hInstance, IDS_OPEN, szBuffer, sizeof(szBuffer)/sizeof(WCHAR))) { szBuffer[(sizeof(szBuffer)/sizeof(WCHAR))-1] = L'\0'; _InsertMenuItemW(hMenu, indexMenu++, TRUE, IDS_OPEN, MFT_STRING, szBuffer, MFS_DEFAULT); //FIXME identifier Count++; } if (LoadStringW(shell32_hInstance, IDS_CREATELINK, szBuffer, sizeof(szBuffer)/sizeof(WCHAR))) { if (Count) { _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + Count, MFT_SEPARATOR, NULL, MFS_ENABLED); } szBuffer[(sizeof(szBuffer)/sizeof(WCHAR))-1] = L'\0'; _InsertMenuItemW(hMenu, indexMenu++, TRUE, IDS_CREATELINK, MFT_STRING, szBuffer, MFS_ENABLED); //FIXME identifier Count++; } return MAKE_HRESULT(SEVERITY_SUCCESS, 0, Count); } /************************************************************************** * ICPanel_IContextMenu_InvokeCommand() */ static HRESULT WINAPI ICPanel_IContextMenu2_InvokeCommand( IContextMenu2 *iface, LPCMINVOKECOMMANDINFO lpcmi) { SHELLEXECUTEINFOW sei; WCHAR szPath[MAX_PATH]; char szTarget[MAX_PATH]; STRRET strret; WCHAR* pszPath; INT Length, cLength; PIDLCPanelStruct *pcpanel; IPersistFile * ppf; IShellLinkA * isl; ICPanelImpl *This = impl_from_IContextMenu(iface); TRACE("(%p)->(invcom=%p verb=%p wnd=%p)\n",This,lpcmi,lpcmi->lpVerb, lpcmi->hwnd); if (lpcmi->lpVerb == MAKEINTRESOURCEA(IDS_OPEN)) //FIXME { ZeroMemory(&sei, sizeof(sei)); sei.cbSize = sizeof(sei); sei.fMask = SEE_MASK_INVOKEIDLIST; sei.lpIDList = ILCombine(This->pidlRoot, This->apidl[0]); sei.hwnd = lpcmi->hwnd; sei.nShow = SW_SHOWNORMAL; sei.lpVerb = L"open"; if (ShellExecuteExW(&sei) == FALSE) return E_FAIL; } else if (lpcmi->lpVerb == MAKEINTRESOURCEA(IDS_CREATELINK)) //FIXME { if (!SHGetSpecialFolderPathW(NULL, szPath, CSIDL_DESKTOPDIRECTORY, FALSE)) return E_FAIL; pszPath = PathAddBackslashW(szPath); if (!pszPath) return E_FAIL; if (IShellFolder_GetDisplayNameOf((IShellFolder*)This, This->apidl[0], SHGDN_FORPARSING, &strret) != S_OK) return E_FAIL; Length = MAX_PATH - (pszPath - szPath); cLength = strlen(strret.u.cStr); if (Length < cLength + 5) { FIXME("\n"); return E_FAIL; } if (MultiByteToWideChar(CP_ACP, 0, strret.u.cStr, cLength +1, pszPath, Length)) { pszPath += cLength; Length -= cLength; } if (Length > 10) { wcscpy(pszPath, L" - "); cLength = LoadStringW(shell32_hInstance, IDS_LNK_FILE, &pszPath[3], Length -4) + 3; if (cLength + 5 > Length) cLength = Length - 5; Length -= cLength; pszPath += cLength; } wcscpy(pszPath, L".lnk"); pcpanel = _ILGetCPanelPointer(ILFindLastID(This->apidl[0])); if (pcpanel) { strncpy(szTarget, pcpanel->szName, MAX_PATH); } else { FIXME("Couldn't retrieve pointer to cpl structure\n"); return E_FAIL; } if (SUCCEEDED(IShellLink_Constructor(NULL, &IID_IShellLinkA, (LPVOID*)&isl))) { IShellLinkA_SetPath(isl, szTarget); if (SUCCEEDED(IShellLinkA_QueryInterface(isl, &IID_IPersistFile, (LPVOID*)&ppf))) { IPersistFile_Save(ppf, szPath, TRUE); IPersistFile_Release(ppf); } IShellLinkA_Release(isl); } return NOERROR; } return S_OK; } /************************************************************************** * ICPanel_IContextMenu_GetCommandString() * */ static HRESULT WINAPI ICPanel_IContextMenu2_GetCommandString( IContextMenu2 *iface, UINT_PTR idCommand, UINT uFlags, UINT* lpReserved, LPSTR lpszName, UINT uMaxNameLen) { ICPanelImpl *This = impl_from_IContextMenu(iface); TRACE("(%p)->(idcom=%lx flags=%x %p name=%p len=%x)\n",This, idCommand, uFlags, lpReserved, lpszName, uMaxNameLen); FIXME("unknown command string\n"); return E_FAIL; } /************************************************************************** * ICPanel_IContextMenu_HandleMenuMsg() */ static HRESULT WINAPI ICPanel_IContextMenu2_HandleMenuMsg( IContextMenu2 *iface, UINT uMsg, WPARAM wParam, LPARAM lParam) { ICPanelImpl *This = impl_from_IContextMenu(iface); TRACE("ICPanel_IContextMenu_HandleMenuMsg (%p)->(msg=%x wp=%lx lp=%lx)\n",This, uMsg, wParam, lParam); return E_NOTIMPL; } static const IContextMenu2Vtbl vt_ContextMenu = { ICPanel_IContextMenu2_QueryInterface, ICPanel_IContextMenu2_AddRef, ICPanel_IContextMenu2_Release, ICPanel_IContextMenu2_QueryContextMenu, ICPanel_IContextMenu2_InvokeCommand, ICPanel_IContextMenu2_GetCommandString, ICPanel_IContextMenu2_HandleMenuMsg };