reactos/dll/win32/shell32/folders/CControlPanelFolder.cpp

   1 /*
   2  * Control panel folder
   3  *
   4  * Copyright 2003 Martin Fuchs
   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 St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include <precomp.h>
  23
  24 WINE_DEFAULT_DEBUG_CHANNEL(shell);
  25
  26 /***********************************************************************
  27 *   control panel implementation in shell namespace
  28 */
  29
  30 class CControlPanelEnum :
  31     public CEnumIDListBase
  32 {
  33     public:
  34         CControlPanelEnum();
  35         ~CControlPanelEnum();
  36         HRESULT WINAPI Initialize(DWORD dwFlags);
  37         BOOL RegisterCPanelApp(LPCWSTR path);
  38         int RegisterRegistryCPanelApps(HKEY hkey_root, LPCWSTR szRepPath);
  39         int RegisterCPanelFolders(HKEY hkey_root, LPCWSTR szRepPath);
  40         BOOL CreateCPanelEnumList(DWORD dwFlags);
  41
  42         BEGIN_COM_MAP(CControlPanelEnum)
  43         COM_INTERFACE_ENTRY_IID(IID_IEnumIDList, IEnumIDList)
  44         END_COM_MAP()
  45 };
  46
  47 /***********************************************************************
  48 *   IShellFolder [ControlPanel] implementation
  49 */
  50
  51 static const shvheader ControlPanelSFHeader[] = {
  52     {IDS_SHV_COLUMN8, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_LEFT, 15},/*FIXME*/
  53     {IDS_SHV_COLUMN9, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_LEFT, 80},/*FIXME*/
  54 };
  55
  56 #define CONROLPANELSHELLVIEWCOLUMNS 2
  57
  58 CControlPanelEnum::CControlPanelEnum()
  59 {
  60 }
  61
  62 CControlPanelEnum::~CControlPanelEnum()
  63 {
  64 }
  65
  66 HRESULT WINAPI CControlPanelEnum::Initialize(DWORD dwFlags)
  67 {
  68     if (CreateCPanelEnumList(dwFlags) == FALSE)
  69         return E_FAIL;
  70     return S_OK;
  71 }
  72
  73 static LPITEMIDLIST _ILCreateCPanelApplet(LPCWSTR pszName, LPCWSTR pszDisplayName, LPCWSTR pszComment, int iIconIdx)
  74 {
  75     PIDLCPanelStruct *pCP;
  76     LPITEMIDLIST pidl;
  77     LPPIDLDATA pData;
  78     int cchName, cchDisplayName, cchComment, cbData;
  79
  80     /* Calculate lengths of given strings */
  81     cchName = wcslen(pszName);
  82     cchDisplayName = wcslen(pszDisplayName);
  83     cchComment = wcslen(pszComment);
  84
  85     /* Allocate PIDL */
  86     cbData = sizeof(pidl->mkid.cb) + sizeof(pData->type) + sizeof(pData->u.cpanel) - sizeof(pData->u.cpanel.szName)
  87              + (cchName + cchDisplayName + cchComment + 3) * sizeof(WCHAR);
  88     pidl = (LPITEMIDLIST)SHAlloc(cbData + sizeof(WORD));
  89     if (!pidl)
  90         return NULL;
  91
  92     /* Copy data to allocated memory */
  93     pidl->mkid.cb = cbData;
  94     pData = (PIDLDATA *)pidl->mkid.abID;
  95     pData->type = PT_CPLAPPLET;
  96
  97     pCP = &pData->u.cpanel;
  98     pCP->dummy = 0;
  99     pCP->iconIdx = iIconIdx;
 100     wcscpy(pCP->szName, pszName);
 101     pCP->offsDispName = cchName + 1;
 102     wcscpy(pCP->szName + pCP->offsDispName, pszDisplayName);
 103     pCP->offsComment = pCP->offsDispName + cchDisplayName + 1;
 104     wcscpy(pCP->szName + pCP->offsComment, pszComment);
 105
 106     /* Add PIDL NULL terminator */
 107     *(WORD*)(pCP->szName + pCP->offsComment + cchComment + 1) = 0;
 108
 109     pcheck(pidl);
 110
 111     return pidl;
 112 }
 113
 114 /**************************************************************************
 115  *  _ILGetCPanelPointer()
 116  * gets a pointer to the control panel struct stored in the pidl
 117  */
 118 static PIDLCPanelStruct *_ILGetCPanelPointer(LPCITEMIDLIST pidl)
 119 {
 120     LPPIDLDATA pdata = _ILGetDataPointer(pidl);
 121
 122     if (pdata && pdata->type == PT_CPLAPPLET)
 123         return (PIDLCPanelStruct *) & (pdata->u.cpanel);
 124
 125     return NULL;
 126 }
 127
 128 BOOL CControlPanelEnum::RegisterCPanelApp(LPCWSTR wpath)
 129 {
 130     CPlApplet* applet = Control_LoadApplet(0, wpath, NULL);
 131     int iconIdx;
 132
 133     if (applet)
 134     {
 135         for (UINT i = 0; i < applet->count; ++i)
 136         {
 137             if (applet->info[i].idIcon > 0)
 138                 iconIdx = -applet->info[i].idIcon; /* negative icon index instead of icon number */
 139             else
 140                 iconIdx = 0;
 141
 142             LPITEMIDLIST pidl = _ILCreateCPanelApplet(wpath,
 143                                                       applet->info[i].name,
 144                                                       applet->info[i].info,
 145                                                       iconIdx);
 146
 147             if (pidl)
 148                 AddToEnumList(pidl);
 149         }
 150         Control_UnloadApplet(applet);
 151     }
 152     return TRUE;
 153 }
 154
 155 int CControlPanelEnum::RegisterRegistryCPanelApps(HKEY hkey_root, LPCWSTR szRepPath)
 156 {
 157     WCHAR name[MAX_PATH];
 158     WCHAR value[MAX_PATH];
 159     HKEY hkey;
 160
 161     int cnt = 0;
 162
 163     if (RegOpenKeyW(hkey_root, szRepPath, &hkey) == ERROR_SUCCESS)
 164     {
 165         int idx = 0;
 166
 167         for(; ; idx++)
 168         {
 169             DWORD nameLen = MAX_PATH;
 170             DWORD valueLen = MAX_PATH;
 171             WCHAR buffer[MAX_PATH];
 172
 173             if (RegEnumValueW(hkey, idx, name, &nameLen, NULL, NULL, (LPBYTE)&value, &valueLen) != ERROR_SUCCESS)
 174                 break;
 175
 176             if (ExpandEnvironmentStringsW(value, buffer, MAX_PATH))
 177             {
 178                 wcscpy(value, buffer);
 179             }
 180
 181             if (RegisterCPanelApp(value))
 182                 ++cnt;
 183         }
 184         RegCloseKey(hkey);
 185     }
 186
 187     return cnt;
 188 }
 189
 190 int CControlPanelEnum::RegisterCPanelFolders(HKEY hkey_root, LPCWSTR szRepPath)
 191 {
 192     WCHAR name[MAX_PATH];
 193     HKEY hkey;
 194
 195     int cnt = 0;
 196
 197     if (RegOpenKeyW(hkey_root, szRepPath, &hkey) == ERROR_SUCCESS)
 198     {
 199         for (int idx = 0; ; idx++)
 200         {
 201             if (RegEnumKeyW(hkey, idx, name, MAX_PATH) != ERROR_SUCCESS)
 202                 break;
 203
 204             if (*name == '{')
 205             {
 206                 LPITEMIDLIST pidl = _ILCreateGuidFromStrW(name);
 207
 208                 if (pidl && AddToEnumList(pidl))
 209                     ++cnt;
 210             }
 211         }
 212
 213         RegCloseKey(hkey);
 214     }
 215
 216     return cnt;
 217 }
 218
 219 /**************************************************************************
 220  *  CControlPanelEnum::CreateCPanelEnumList()
 221  */
 222 BOOL CControlPanelEnum::CreateCPanelEnumList(DWORD dwFlags)
 223 {
 224     WCHAR szPath[MAX_PATH];
 225     WIN32_FIND_DATAW wfd;
 226     HANDLE hFile;
 227
 228     TRACE("(%p)->(flags=0x%08x)\n", this, dwFlags);
 229
 230     /* enumerate control panel folders */
 231     if (dwFlags & SHCONTF_FOLDERS)
 232         RegisterCPanelFolders(HKEY_LOCAL_MACHINE, L"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ControlPanel\\NameSpace");
 233
 234     /* enumerate the control panel applets */
 235     if (dwFlags & SHCONTF_NONFOLDERS)
 236     {
 237         LPWSTR p;
 238
 239         GetSystemDirectoryW(szPath, MAX_PATH);
 240         p = PathAddBackslashW(szPath);
 241         wcscpy(p, L"*.cpl");
 242
 243         hFile = FindFirstFileW(szPath, &wfd);
 244
 245         if (hFile != INVALID_HANDLE_VALUE)
 246         {
 247             do
 248             {
 249                 if (!(dwFlags & SHCONTF_INCLUDEHIDDEN) && (wfd.dwFileAttributes & FILE_ATTRIBUTE_HIDDEN))
 250                     continue;
 251
 252                 if (!(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)) {
 253                     wcscpy(p, wfd.cFileName);
 254                     if (wcscmp(wfd.cFileName, L"ncpa.cpl"))
 255                         RegisterCPanelApp(szPath);
 256                 }
 257             } while(FindNextFileW(hFile, &wfd));
 258             FindClose(hFile);
 259         }
 260
 261         RegisterRegistryCPanelApps(HKEY_LOCAL_MACHINE, L"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls");
 262         RegisterRegistryCPanelApps(HKEY_CURRENT_USER, L"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Control Panel\\Cpls");
 263     }
 264     return TRUE;
 265 }
 266
 267 CControlPanelFolder::CControlPanelFolder()
 268 {
 269     pidlRoot = NULL;    /* absolute pidl */
 270 }
 271
 272 CControlPanelFolder::~CControlPanelFolder()
 273 {
 274     TRACE("-- destroying IShellFolder(%p)\n", this);
 275     SHFree(pidlRoot);
 276 }
 277
 278 HRESULT WINAPI CControlPanelFolder::FinalConstruct()
 279 {
 280     pidlRoot = _ILCreateControlPanel();    /* my qualified pidl */
 281     if (pidlRoot == NULL)
 282         return E_OUTOFMEMORY;
 283     return S_OK;
 284 }
 285
 286 /**************************************************************************
 287 *    CControlPanelFolder::ParseDisplayName
 288 */
 289 HRESULT WINAPI CControlPanelFolder::ParseDisplayName(
 290     HWND hwndOwner,
 291     LPBC pbc,
 292     LPOLESTR lpszDisplayName,
 293     DWORD *pchEaten,
 294     PIDLIST_RELATIVE *ppidl,
 295     DWORD *pdwAttributes)
 296 {
 297     /* We only support parsing guid names */
 298     return SH_ParseGuidDisplayName(this, hwndOwner, pbc, lpszDisplayName, pchEaten, ppidl, pdwAttributes);
 299 }
 300
 301 /**************************************************************************
 302 *        CControlPanelFolder::EnumObjects
 303 */
 304 HRESULT WINAPI CControlPanelFolder::EnumObjects(HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST *ppEnumIDList)
 305 {
 306     return ShellObjectCreatorInit<CControlPanelEnum>(dwFlags, IID_IEnumIDList, ppEnumIDList);
 307 }
 308
 309 /**************************************************************************
 310 *        CControlPanelFolder::BindToObject
 311 */
 312 HRESULT WINAPI CControlPanelFolder::BindToObject(
 313     PCUIDLIST_RELATIVE pidl,
 314     LPBC pbcReserved,
 315     REFIID riid,
 316     LPVOID *ppvOut)
 317 {
 318     return SHELL32_BindToGuidItem(pidlRoot, pidl, pbcReserved, riid, ppvOut);
 319 }
 320
 321 /**************************************************************************
 322 *    CControlPanelFolder::BindToStorage
 323 */
 324 HRESULT WINAPI CControlPanelFolder::BindToStorage(
 325     PCUIDLIST_RELATIVE pidl,
 326     LPBC pbcReserved,
 327     REFIID riid,
 328     LPVOID *ppvOut)
 329 {
 330     FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", this, pidl, pbcReserved, shdebugstr_guid(&riid), ppvOut);
 331
 332     *ppvOut = NULL;
 333     return E_NOTIMPL;
 334 }
 335
 336 /**************************************************************************
 337 *     CControlPanelFolder::CompareIDs
 338 */
 339
 340 HRESULT WINAPI CControlPanelFolder::CompareIDs(LPARAM lParam, PCUIDLIST_RELATIVE pidl1, PCUIDLIST_RELATIVE pidl2)
 341 {
 342     int nReturn;
 343
 344     TRACE("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", this, lParam, pidl1, pidl2);
 345     nReturn = SHELL32_CompareIDs(this, lParam, pidl1, pidl2);
 346     TRACE("-- %i\n", nReturn);
 347     return nReturn;
 348 }
 349
 350 /**************************************************************************
 351 *    CControlPanelFolder::CreateViewObject
 352 */
 353 HRESULT WINAPI CControlPanelFolder::CreateViewObject(HWND hwndOwner, REFIID riid, LPVOID * ppvOut)
 354 {
 355     CComPtr<IShellView>                    pShellView;
 356     HRESULT hr = E_INVALIDARG;
 357
 358     TRACE("(%p)->(hwnd=%p,%s,%p)\n", this, hwndOwner, shdebugstr_guid(&riid), ppvOut);
 359
 360     if (ppvOut) {
 361         *ppvOut = NULL;
 362
 363         if (IsEqualIID(riid, IID_IDropTarget)) {
 364             WARN("IDropTarget not implemented\n");
 365             hr = E_NOTIMPL;
 366         } else if (IsEqualIID(riid, IID_IContextMenu)) {
 367             WARN("IContextMenu not implemented\n");
 368             hr = E_NOTIMPL;
 369         } else if (IsEqualIID(riid, IID_IShellView)) {
 370             hr = CDefView_Constructor(this, riid, ppvOut);
 371         }
 372     }
 373     TRACE("--(%p)->(interface=%p)\n", this, ppvOut);
 374     return hr;
 375 }
 376
 377 /**************************************************************************
 378 *  CControlPanelFolder::GetAttributesOf
 379 */
 380 HRESULT WINAPI CControlPanelFolder::GetAttributesOf(UINT cidl, PCUITEMID_CHILD_ARRAY apidl, DWORD * rgfInOut)
 381 {
 382     HRESULT hr = S_OK;
 383     static const DWORD dwControlPanelAttributes =
 384         SFGAO_HASSUBFOLDER | SFGAO_FOLDER | SFGAO_CANLINK;
 385
 386     TRACE("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n",
 387           this, cidl, apidl, rgfInOut, rgfInOut ? *rgfInOut : 0);
 388
 389     if (!rgfInOut)
 390         return E_INVALIDARG;
 391     if (cidl && !apidl)
 392         return E_INVALIDARG;
 393
 394     if (*rgfInOut == 0)
 395         *rgfInOut = ~0;
 396
 397     if (!cidl)
 398     {
 399         *rgfInOut &= dwControlPanelAttributes;
 400     }
 401     else
 402     {
 403         while(cidl > 0 && *apidl)
 404         {
 405             pdump(*apidl);
 406             if (_ILIsCPanelStruct(*apidl))
 407                 *rgfInOut &= SFGAO_CANLINK;
 408             else if (_ILIsSpecialFolder(*apidl))
 409                 SHELL32_GetGuidItemAttributes(this, *apidl, rgfInOut);
 410             else
 411                 ERR("Got an unkown pidl here!\n");
 412             apidl++;
 413             cidl--;
 414         }
 415     }
 416     /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
 417     *rgfInOut &= ~SFGAO_VALIDATE;
 418
 419     TRACE("-- result=0x%08x\n", *rgfInOut);
 420     return hr;
 421 }
 422
 423 /**************************************************************************
 424 *    CControlPanelFolder::GetUIObjectOf
 425 *
 426 * PARAMETERS
 427 *  HWND           hwndOwner, //[in ] Parent window for any output
 428 *  UINT           cidl,      //[in ] array size
 429 *  LPCITEMIDLIST* apidl,     //[in ] simple pidl array
 430 *  REFIID         riid,      //[in ] Requested Interface
 431 *  UINT*          prgfInOut, //[   ] reserved
 432 *  LPVOID*        ppvObject) //[out] Resulting Interface
 433 *
 434 */
 435 HRESULT WINAPI CControlPanelFolder::GetUIObjectOf(HWND hwndOwner,
 436         UINT cidl, PCUITEMID_CHILD_ARRAY apidl, REFIID riid, UINT * prgfInOut, LPVOID * ppvOut)
 437 {
 438     LPITEMIDLIST pidl;
 439     IUnknown *pObj = NULL;
 440     HRESULT hr = E_INVALIDARG;
 441
 442     TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n",
 443           this, hwndOwner, cidl, apidl, shdebugstr_guid(&riid), prgfInOut, ppvOut);
 444
 445     if (ppvOut) {
 446         *ppvOut = NULL;
 447
 448         if (IsEqualIID(riid, IID_IContextMenu) && (cidl >= 1)) {
 449
 450             /* HACK: We should use callbacks from CDefaultContextMenu instead of creating one on our own */
 451             BOOL bHasCpl = FALSE;
 452             for (UINT i = 0; i < cidl; i++)
 453             {
 454                 if(_ILIsCPanelStruct(apidl[i]))
 455                 {
 456                     bHasCpl = TRUE;
 457                 }
 458             }
 459
 460             if (bHasCpl)
 461                 hr = ShellObjectCreatorInit<CCPLItemMenu>(cidl, apidl, riid, &pObj);
 462             else
 463                 hr = CDefFolderMenu_Create2(pidlRoot, hwndOwner, cidl, apidl, (IShellFolder*)this, NULL, 0, NULL, (IContextMenu**)&pObj);
 464         } else if (IsEqualIID(riid, IID_IDataObject) && (cidl >= 1)) {
 465             hr = IDataObject_Constructor(hwndOwner, pidlRoot, apidl, cidl, (IDataObject **)&pObj);
 466         } else if (IsEqualIID(riid, IID_IExtractIconA) && (cidl == 1)) {
 467             pidl = ILCombine(pidlRoot, apidl[0]);
 468             pObj = IExtractIconA_Constructor(pidl);
 469             SHFree(pidl);
 470             hr = S_OK;
 471         } else if (IsEqualIID(riid, IID_IExtractIconW) && (cidl == 1)) {
 472             pidl = ILCombine(pidlRoot, apidl[0]);
 473             pObj = IExtractIconW_Constructor(pidl);
 474             SHFree(pidl);
 475             hr = S_OK;
 476         } else if ((IsEqualIID(riid, IID_IShellLinkW) || IsEqualIID(riid, IID_IShellLinkA))
 477                    && (cidl == 1)) {
 478             pidl = ILCombine(pidlRoot, apidl[0]);
 479             hr = IShellLink_ConstructFromFile(NULL, riid, pidl, (LPVOID*)&pObj);
 480             SHFree(pidl);
 481         } else {
 482             hr = E_NOINTERFACE;
 483         }
 484
 485         if (SUCCEEDED(hr) && !pObj)
 486             hr = E_OUTOFMEMORY;
 487
 488         *ppvOut = pObj;
 489     }
 490     TRACE("(%p)->hr=0x%08x\n", this, hr);
 491     return hr;
 492 }
 493
 494 /**************************************************************************
 495 *    CControlPanelFolder::GetDisplayNameOf
 496 */
 497 HRESULT WINAPI CControlPanelFolder::GetDisplayNameOf(PCUITEMID_CHILD pidl, DWORD dwFlags, LPSTRRET strRet)
 498 {
 499     if (!pidl)
 500         return S_FALSE;
 501
 502     PIDLCPanelStruct *pCPanel = _ILGetCPanelPointer(pidl);
 503
 504     if (pCPanel)
 505     {
 506         return SHSetStrRet(strRet, pCPanel->szName + pCPanel->offsDispName);
 507     }
 508     else if (_ILIsSpecialFolder(pidl))
 509     {
 510         static const WCHAR* pszCPanelPath = L"::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\\::{21EC2020-3AEA-1069-A2DD-08002B30309D}";
 511         return SHELL32_GetDisplayNameOfGUIDItem(this, pszCPanelPath, pidl, dwFlags, strRet);
 512     }
 513
 514     return S_OK;
 515 }
 516
 517 /**************************************************************************
 518 *  CControlPanelFolder::SetNameOf
 519 *  Changes the name of a file object or subfolder, possibly changing its item
 520 *  identifier in the process.
 521 *
 522 * PARAMETERS
 523 *  HWND          hwndOwner,  //[in ] Owner window for output
 524 *  LPCITEMIDLIST pidl,       //[in ] simple pidl of item to change
 525 *  LPCOLESTR     lpszName,   //[in ] the items new display name
 526 *  DWORD         dwFlags,    //[in ] SHGNO formatting flags
 527 *  LPITEMIDLIST* ppidlOut)   //[out] simple pidl returned
 528 */
 529 HRESULT WINAPI CControlPanelFolder::SetNameOf(HWND hwndOwner, PCUITEMID_CHILD pidl,    /*simple pidl */
 530         LPCOLESTR lpName, DWORD dwFlags, PITEMID_CHILD *pPidlOut)
 531 {
 532     FIXME("(%p)->(%p,pidl=%p,%s,%u,%p)\n", this, hwndOwner, pidl, debugstr_w(lpName), dwFlags, pPidlOut);
 533     return E_FAIL;
 534 }
 535
 536 HRESULT WINAPI CControlPanelFolder::GetDefaultSearchGUID(GUID *pguid)
 537 {
 538     FIXME("(%p)\n", this);
 539     return E_NOTIMPL;
 540 }
 541
 542 HRESULT WINAPI CControlPanelFolder::EnumSearches(IEnumExtraSearch **ppenum)
 543 {
 544     FIXME("(%p)\n", this);
 545     return E_NOTIMPL;
 546 }
 547
 548 HRESULT WINAPI CControlPanelFolder::GetDefaultColumn(DWORD dwRes, ULONG *pSort, ULONG *pDisplay)
 549 {
 550     TRACE("(%p)\n", this);
 551
 552     if (pSort) *pSort = 0;
 553     if (pDisplay) *pDisplay = 0;
 554     return S_OK;
 555 }
 556
 557 HRESULT WINAPI CControlPanelFolder::GetDefaultColumnState(UINT iColumn, DWORD *pcsFlags)
 558 {
 559     TRACE("(%p)\n", this);
 560
 561     if (!pcsFlags || iColumn >= CONROLPANELSHELLVIEWCOLUMNS) return E_INVALIDARG;
 562     *pcsFlags = ControlPanelSFHeader[iColumn].pcsFlags;
 563     return S_OK;
 564 }
 565
 566 HRESULT WINAPI CControlPanelFolder::GetDetailsEx(PCUITEMID_CHILD pidl, const SHCOLUMNID *pscid, VARIANT *pv)
 567 {
 568     FIXME("(%p)\n", this);
 569     return E_NOTIMPL;
 570 }
 571
 572 HRESULT WINAPI CControlPanelFolder::GetDetailsOf(PCUITEMID_CHILD pidl, UINT iColumn, SHELLDETAILS *psd)
 573 {
 574     if (!psd || iColumn >= CONROLPANELSHELLVIEWCOLUMNS)
 575         return E_INVALIDARG;
 576
 577     if (!pidl)
 578     {
 579         psd->fmt = ControlPanelSFHeader[iColumn].fmt;
 580         psd->cxChar = ControlPanelSFHeader[iColumn].cxChar;
 581         return SHSetStrRet(&psd->str, shell32_hInstance, ControlPanelSFHeader[iColumn].colnameid);
 582     }
 583     else if (_ILIsSpecialFolder(pidl))
 584     {
 585         return SHELL32_GetDetailsOfGuidItem(this, pidl, iColumn, psd);
 586     }
 587     else
 588     {
 589         PIDLCPanelStruct *pCPanel = _ILGetCPanelPointer(pidl);
 590
 591         if (!pCPanel)
 592             return E_FAIL;
 593
 594         switch(iColumn)
 595         {
 596             case 0:        /* name */
 597                 return SHSetStrRet(&psd->str, pCPanel->szName + pCPanel->offsDispName);
 598             case 1:        /* comment */
 599                 return SHSetStrRet(&psd->str, pCPanel->szName + pCPanel->offsComment);
 600         }
 601     }
 602
 603     return S_OK;
 604 }
 605
 606 HRESULT WINAPI CControlPanelFolder::MapColumnToSCID(UINT column, SHCOLUMNID *pscid)
 607 {
 608     FIXME("(%p)\n", this);
 609     return E_NOTIMPL;
 610 }
 611
 612 /************************************************************************
 613  *    CControlPanelFolder::GetClassID
 614  */
 615 HRESULT WINAPI CControlPanelFolder::GetClassID(CLSID *lpClassId)
 616 {
 617     TRACE("(%p)\n", this);
 618
 619     if (!lpClassId)
 620         return E_POINTER;
 621     *lpClassId = CLSID_ControlPanel;
 622
 623     return S_OK;
 624 }
 625
 626 /************************************************************************
 627  *    CControlPanelFolder::Initialize
 628  *
 629  * NOTES: it makes no sense to change the pidl
 630  */
 631 HRESULT WINAPI CControlPanelFolder::Initialize(LPCITEMIDLIST pidl)
 632 {
 633     if (pidlRoot)
 634         SHFree((LPVOID)pidlRoot);
 635
 636     pidlRoot = ILClone(pidl);
 637     return S_OK;
 638 }
 639
 640 /**************************************************************************
 641  *    CControlPanelFolder::GetCurFolder
 642  */
 643 HRESULT WINAPI CControlPanelFolder::GetCurFolder(LPITEMIDLIST * pidl)
 644 {
 645     TRACE("(%p)->(%p)\n", this, pidl);
 646
 647     if (!pidl)
 648         return E_POINTER;
 649     *pidl = ILClone(pidlRoot);
 650     return S_OK;
 651 }
 652
 653 HRESULT CPanel_GetIconLocationW(LPCITEMIDLIST pidl, LPWSTR szIconFile, UINT cchMax, int* piIndex)
 654 {
 655     PIDLCPanelStruct* pcpanel = _ILGetCPanelPointer(pidl);
 656
 657     if (!pcpanel)
 658         return E_INVALIDARG;
 659
 660     wcsncpy(szIconFile, pcpanel->szName, cchMax);
 661     *piIndex = (int)pcpanel->iconIdx != -1 ? pcpanel->iconIdx : 0;
 662
 663     return S_OK;
 664 }
 665
 666
 667 CCPLItemMenu::CCPLItemMenu()
 668 {
 669     m_apidl = NULL;
 670     m_cidl = 0;
 671 }
 672
 673 HRESULT WINAPI CCPLItemMenu::Initialize(UINT cidl, PCUITEMID_CHILD_ARRAY apidl)
 674 {
 675     m_cidl = cidl;
 676     m_apidl = const_cast<PCUITEMID_CHILD_ARRAY>(_ILCopyaPidl(apidl, m_cidl));
 677     if (m_cidl && !m_apidl)
 678         return E_OUTOFMEMORY;
 679
 680     return S_OK;
 681 }
 682
 683 CCPLItemMenu::~CCPLItemMenu()
 684 {
 685     _ILFreeaPidl(const_cast<PITEMID_CHILD *>(m_apidl), m_cidl);
 686 }
 687
 688 HRESULT WINAPI CCPLItemMenu::QueryContextMenu(
 689     HMENU hMenu,
 690     UINT indexMenu,
 691     UINT idCmdFirst,
 692     UINT idCmdLast,
 693     UINT uFlags)
 694 {
 695     _InsertMenuItemW(hMenu, indexMenu++, TRUE, IDS_OPEN, MFT_STRING, MAKEINTRESOURCEW(IDS_OPEN), MFS_DEFAULT);
 696     _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + 1, MFT_SEPARATOR, NULL, MFS_ENABLED);
 697     _InsertMenuItemW(hMenu, indexMenu++, TRUE, IDS_CREATELINK, MFT_STRING, MAKEINTRESOURCEW(IDS_CREATELINK), MFS_ENABLED);
 698
 699     return MAKE_HRESULT(SEVERITY_SUCCESS, 0, 2);
 700 }
 701
 702 EXTERN_C
 703 void WINAPI Control_RunDLLW(HWND hWnd, HINSTANCE hInst, LPCWSTR cmd, DWORD nCmdShow);
 704
 705 /**************************************************************************
 706 * ICPanel_IContextMenu_InvokeCommand()
 707 */
 708 HRESULT WINAPI CCPLItemMenu::InvokeCommand(LPCMINVOKECOMMANDINFO lpcmi)
 709 {
 710     HRESULT hResult;
 711
 712     PIDLCPanelStruct *pCPanel = _ILGetCPanelPointer(m_apidl[0]);
 713     if(!pCPanel)
 714         return E_FAIL;
 715
 716     TRACE("(%p)->(invcom=%p verb=%p wnd=%p)\n", this, lpcmi, lpcmi->lpVerb, lpcmi->hwnd);
 717
 718     if (lpcmi->lpVerb == MAKEINTRESOURCEA(IDS_OPEN)) //FIXME
 719     {
 720         WCHAR wszParams[MAX_PATH];
 721
 722         wcscpy(wszParams, pCPanel->szName);
 723         wcscat(wszParams, L",");
 724         wcscat(wszParams, pCPanel->szName + pCPanel->offsDispName);
 725
 726         Control_RunDLLW (NULL, NULL, wszParams, SW_NORMAL);
 727     }
 728     else if (lpcmi->lpVerb == MAKEINTRESOURCEA(IDS_CREATELINK)) //FIXME
 729     {
 730         CComPtr<IDataObject> pDataObj;
 731         LPITEMIDLIST pidl = _ILCreateControlPanel();
 732
 733         hResult = SHCreateDataObject(pidl, m_cidl, m_apidl, NULL, IID_PPV_ARG(IDataObject, &pDataObj));
 734         if (FAILED(hResult))
 735             return hResult;
 736
 737         SHFree(pidl);
 738
 739         //FIXME: Use SHCreateLinks
 740         CComPtr<IShellFolder> psf;
 741         CComPtr<IDropTarget> pDT;
 742
 743         hResult = SHGetDesktopFolder(&psf);
 744         if (FAILED(hResult))
 745             return hResult;
 746
 747         hResult = psf->CreateViewObject(NULL, IID_PPV_ARG(IDropTarget, &pDT));
 748         if (FAILED(hResult))
 749             return hResult;
 750
 751         SHSimulateDrop(pDT, pDataObj, MK_CONTROL|MK_SHIFT, NULL, NULL);
 752     }
 753     return S_OK;
 754 }
 755
 756 /**************************************************************************
 757  *  ICPanel_IContextMenu_GetCommandString()
 758  *
 759  */
 760 HRESULT WINAPI CCPLItemMenu::GetCommandString(
 761     UINT_PTR idCommand,
 762     UINT uFlags,
 763     UINT* lpReserved,
 764     LPSTR lpszName,
 765     UINT uMaxNameLen)
 766 {
 767     TRACE("(%p)->(idcom=%lx flags=%x %p name=%p len=%x)\n", this, idCommand, uFlags, lpReserved, lpszName, uMaxNameLen);
 768
 769     FIXME("unknown command string\n");
 770     return E_FAIL;
 771 }
 772
 773 /**************************************************************************
 774 * ICPanel_IContextMenu_HandleMenuMsg()
 775 */
 776 HRESULT WINAPI CCPLItemMenu::HandleMenuMsg(
 777     UINT uMsg,
 778     WPARAM wParam,
 779     LPARAM lParam)
 780 {
 781     TRACE("ICPanel_IContextMenu_HandleMenuMsg (%p)->(msg=%x wp=%lx lp=%lx)\n", this, uMsg, wParam, lParam);
 782
 783     return E_NOTIMPL;
 784 }