reactos/base/shell/shell32/folders/CAdminToolsFolder.cpp

   1 /*
   2  *    Virtual Admin Tools Folder
   3  *
   4  *    Copyright 2008                Johannes Anderwald
   5  *    Copyright 2009                Andrew Hill
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  20  */
  21
  22 #include <precomp.h>
  23
  24 WINE_DEFAULT_DEBUG_CHANNEL (shell);
  25
  26 /*
  27 This folder should not exist. It is just a file system folder...
  28 */
  29
  30 /* List shortcuts of
  31  * CSIDL_COMMON_ADMINTOOLS
  32  * Note: CSIDL_ADMINTOOLS is ignored, tested with Window XP SP3+
  33  */
  34
  35 /***********************************************************************
  36  *     AdminTools folder implementation
  37  */
  38
  39 CAdminToolsFolder::CAdminToolsFolder()
  40 {
  41     m_pisfInner = NULL;
  42     m_pisf2Inner = NULL;
  43
  44     szTarget = NULL;
  45 }
  46
  47 CAdminToolsFolder::~CAdminToolsFolder()
  48 {
  49     HeapFree(GetProcessHeap(), 0, szTarget);
  50     m_pisfInner.Release();
  51     m_pisf2Inner.Release();
  52 }
  53
  54 HRESULT WINAPI CAdminToolsFolder::FinalConstruct()
  55 {
  56     HRESULT hr;
  57     CComPtr<IPersistFolder3> ppf3;
  58     hr = SHCoCreateInstance(NULL, &CLSID_ShellFSFolder, NULL, IID_PPV_ARG(IShellFolder, &m_pisfInner));
  59     if (FAILED(hr))
  60         return hr;
  61
  62     hr = m_pisfInner->QueryInterface(IID_PPV_ARG(IShellFolder2, &m_pisf2Inner));
  63     if (FAILED(hr))
  64         return hr;
  65
  66     hr = m_pisfInner->QueryInterface(IID_PPV_ARG(IPersistFolder3, &ppf3));
  67     if (FAILED(hr))
  68         return hr;
  69
  70     PERSIST_FOLDER_TARGET_INFO info;
  71     ZeroMemory(&info, sizeof(PERSIST_FOLDER_TARGET_INFO));
  72     info.csidl = CSIDL_COMMON_ADMINTOOLS;
  73     hr = ppf3->InitializeEx(NULL, _ILCreateAdminTools(), &info);
  74
  75     szTarget = (LPWSTR)HeapAlloc(GetProcessHeap(), 0, MAX_PATH * sizeof(WCHAR));
  76     if (szTarget == NULL)
  77         return E_OUTOFMEMORY;
  78     if (!SHGetSpecialFolderPathW(NULL, szTarget, CSIDL_COMMON_ADMINTOOLS, FALSE))
  79         return E_FAIL;
  80
  81     return S_OK;
  82 }
  83
  84 HRESULT WINAPI CAdminToolsFolder::ParseDisplayName(HWND hwndOwner, LPBC pbc, LPOLESTR lpszDisplayName,
  85         ULONG *pchEaten, PIDLIST_RELATIVE *ppidl, ULONG *pdwAttributes)
  86 {
  87     return m_pisfInner->ParseDisplayName(hwndOwner, pbc, lpszDisplayName, pchEaten, ppidl, pdwAttributes);
  88 }
  89
  90 HRESULT WINAPI CAdminToolsFolder::EnumObjects(HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST *ppEnumIDList)
  91 {
  92     return m_pisfInner->EnumObjects(hwndOwner, dwFlags, ppEnumIDList);
  93 }
  94
  95 HRESULT WINAPI CAdminToolsFolder::BindToObject(PCUIDLIST_RELATIVE pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut)
  96 {
  97     return m_pisfInner->BindToObject(pidl, pbcReserved, riid, ppvOut);
  98 }
  99
 100 HRESULT WINAPI CAdminToolsFolder::BindToStorage(PCUIDLIST_RELATIVE pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut)
 101 {
 102     return m_pisfInner->BindToStorage(pidl, pbcReserved, riid, ppvOut);
 103 }
 104
 105 HRESULT WINAPI CAdminToolsFolder::CompareIDs(LPARAM lParam, PCUIDLIST_RELATIVE pidl1, PCUIDLIST_RELATIVE pidl2)
 106 {
 107     return m_pisfInner->CompareIDs(lParam, pidl1, pidl2);
 108 }
 109
 110 HRESULT WINAPI CAdminToolsFolder::CreateViewObject(HWND hwndOwner, REFIID riid, LPVOID *ppvOut)
 111 {
 112     return m_pisfInner->CreateViewObject(hwndOwner, riid, ppvOut);
 113 }
 114
 115 HRESULT WINAPI CAdminToolsFolder::GetAttributesOf(UINT cidl, PCUITEMID_CHILD_ARRAY apidl, DWORD *rgfInOut)
 116 {
 117     return m_pisfInner->GetAttributesOf(cidl, apidl, rgfInOut);
 118 }
 119
 120 HRESULT WINAPI CAdminToolsFolder::GetUIObjectOf(HWND hwndOwner, UINT cidl, PCUITEMID_CHILD_ARRAY apidl,
 121         REFIID riid, UINT * prgfInOut, LPVOID * ppvOut)
 122 {
 123     return m_pisfInner->GetUIObjectOf(hwndOwner, cidl, apidl, riid, prgfInOut, ppvOut);
 124 }
 125
 126 HRESULT WINAPI CAdminToolsFolder::GetDisplayNameOf(PCUITEMID_CHILD pidl, DWORD dwFlags, LPSTRRET strRet)
 127 {
 128     if (!_ILIsSpecialFolder(pidl))
 129         return m_pisfInner->GetDisplayNameOf(pidl, dwFlags, strRet);
 130
 131     HRESULT hr = S_OK;
 132     LPWSTR pszPath;
 133
 134     TRACE ("(%p)->(pidl=%p,0x%08x,%p)\n", this, pidl, dwFlags, strRet);
 135     pdump (pidl);
 136
 137     if (!strRet)
 138         return E_INVALIDARG;
 139
 140     pszPath = (LPWSTR)CoTaskMemAlloc((MAX_PATH + 1) * sizeof(WCHAR));
 141     if (!pszPath)
 142         return E_OUTOFMEMORY;
 143
 144     ZeroMemory(pszPath, (MAX_PATH + 1) * sizeof(WCHAR));
 145
 146     if (!pidl->mkid.cb)
 147     {
 148         if ((GET_SHGDN_RELATION (dwFlags) == SHGDN_NORMAL) &&
 149                 (GET_SHGDN_FOR (dwFlags) & SHGDN_FORPARSING))
 150             wcscpy(pszPath, szTarget);
 151         else if (!HCR_GetClassNameW(CLSID_AdminFolderShortcut, pszPath, MAX_PATH))
 152             hr = E_FAIL;
 153     }
 154
 155     if (SUCCEEDED(hr))
 156     {
 157         strRet->uType = STRRET_WSTR;
 158         strRet->pOleStr = pszPath;
 159         TRACE ("-- (%p)->(%s,0x%08x)\n", this, debugstr_w(strRet->pOleStr), hr);
 160     }
 161     else
 162         CoTaskMemFree(pszPath);
 163
 164     return hr;
 165 }
 166
 167 HRESULT WINAPI CAdminToolsFolder::SetNameOf(HWND hwndOwner, PCUITEMID_CHILD pidl,    /* simple pidl */
 168         LPCOLESTR lpName, DWORD dwFlags, PITEMID_CHILD *pPidlOut)
 169 {
 170     return m_pisfInner->SetNameOf(hwndOwner, pidl, lpName, dwFlags, pPidlOut);
 171 }
 172
 173 HRESULT WINAPI CAdminToolsFolder::GetDefaultSearchGUID(GUID *pguid)
 174 {
 175     return m_pisf2Inner->GetDefaultSearchGUID(pguid);
 176 }
 177
 178 HRESULT WINAPI CAdminToolsFolder::EnumSearches(IEnumExtraSearch ** ppenum)
 179 {
 180     return m_pisf2Inner->EnumSearches(ppenum);
 181 }
 182
 183 HRESULT WINAPI CAdminToolsFolder::GetDefaultColumn(DWORD dwRes, ULONG *pSort, ULONG *pDisplay)
 184 {
 185     return m_pisf2Inner->GetDefaultColumn(dwRes, pSort, pDisplay);
 186 }
 187
 188 HRESULT WINAPI CAdminToolsFolder::GetDefaultColumnState(UINT iColumn, DWORD *pcsFlags)
 189 {
 190     return m_pisf2Inner->GetDefaultColumnState(iColumn, pcsFlags);
 191 }
 192
 193 HRESULT WINAPI CAdminToolsFolder::GetDetailsEx(PCUITEMID_CHILD pidl, const SHCOLUMNID *pscid, VARIANT *pv)
 194 {
 195     return m_pisf2Inner->GetDetailsEx(pidl, pscid, pv);
 196 }
 197
 198 HRESULT WINAPI CAdminToolsFolder::GetDetailsOf(PCUITEMID_CHILD pidl, UINT iColumn, SHELLDETAILS *psd)
 199 {
 200     return m_pisf2Inner->GetDetailsOf(pidl, iColumn, psd);
 201 }
 202
 203 HRESULT WINAPI CAdminToolsFolder::MapColumnToSCID(UINT column, SHCOLUMNID *pscid)
 204 {
 205     return m_pisf2Inner->MapColumnToSCID(column, pscid);
 206 }
 207
 208 /************************************************************************
 209  *    CAdminToolsFolder::GetClassID
 210  */
 211 HRESULT WINAPI CAdminToolsFolder::GetClassID(CLSID *lpClassId)
 212 {
 213     TRACE ("(%p)\n", this);
 214
 215     memcpy(lpClassId, &CLSID_AdminFolderShortcut, sizeof(CLSID));
 216
 217     return S_OK;
 218 }
 219
 220 /************************************************************************
 221  *    CAdminToolsFolder::Initialize
 222  *
 223  */
 224 HRESULT WINAPI CAdminToolsFolder::Initialize(LPCITEMIDLIST pidl)
 225 {
 226     return S_OK;
 227 }
 228
 229 /**************************************************************************
 230  *    CAdminToolsFolder::GetCurFolder
 231  */
 232 HRESULT WINAPI CAdminToolsFolder::GetCurFolder(LPITEMIDLIST *pidl)
 233 {
 234     CComPtr<IPersistFolder2> ppf2;
 235     m_pisfInner->QueryInterface(IID_PPV_ARG(IPersistFolder2, &ppf2));
 236     return ppf2->GetCurFolder(pidl);
 237 }