dlls/shell32/folders.c

   1 /*
   2  *      Copyright 1997  Marcus Meissner
   3  *      Copyright 1998  Juergen Schmied
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18  */
  19
  20 #include <stdlib.h>
  21 #include <stdio.h>
  22 #include <string.h>
  23
  24 #include "windef.h"
  25 #include "objbase.h"
  26 #include "undocshell.h"
  27 #include "shlguid.h"
  28
  29 #include "wine/debug.h"
  30 #include "winerror.h"
  31
  32 #include "pidl.h"
  33 #include "shell32_main.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(shell);
  36
  37
  38 /***********************************************************************
  39 *   IExtractIconA implementation
  40 */
  41
  42 typedef struct
  43 {       ICOM_VFIELD(IExtractIconA);
  44         DWORD   ref;
  45         ICOM_VTABLE(IPersistFile)*      lpvtblPersistFile;
  46         LPITEMIDLIST    pidl;
  47 } IExtractIconAImpl;
  48
  49 static struct ICOM_VTABLE(IExtractIconA) eivt;
  50 static struct ICOM_VTABLE(IPersistFile) pfvt;
  51
  52 #define _IPersistFile_Offset ((int)(&(((IExtractIconAImpl*)0)->lpvtblPersistFile)))
  53 #define _ICOM_THIS_From_IPersistFile(class, name) class* This = (class*)(((char*)name)-_IPersistFile_Offset);
  54
  55 /**************************************************************************
  56 *  IExtractIconA_Constructor
  57 */
  58 IExtractIconA* IExtractIconA_Constructor(LPCITEMIDLIST pidl)
  59 {
  60         IExtractIconAImpl* ei;
  61
  62         ei=(IExtractIconAImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IExtractIconAImpl));
  63         ei->ref=1;
  64         ICOM_VTBL(ei) = &eivt;
  65         ei->lpvtblPersistFile = &pfvt;
  66         ei->pidl=ILClone(pidl);
  67
  68         pdump(pidl);
  69
  70         TRACE("(%p)\n",ei);
  71         return (IExtractIconA *)ei;
  72 }
  73 /**************************************************************************
  74  *  IExtractIconA_QueryInterface
  75  */
  76 static HRESULT WINAPI IExtractIconA_fnQueryInterface( IExtractIconA * iface, REFIID riid, LPVOID *ppvObj)
  77 {
  78         ICOM_THIS(IExtractIconAImpl,iface);
  79
  80          TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj);
  81
  82         *ppvObj = NULL;
  83
  84         if(IsEqualIID(riid, &IID_IUnknown))             /*IUnknown*/
  85         { *ppvObj = This;
  86         }
  87         else if(IsEqualIID(riid, &IID_IPersistFile))    /*IExtractIcon*/
  88         {    *ppvObj = (IPersistFile*)&(This->lpvtblPersistFile);
  89         }
  90         else if(IsEqualIID(riid, &IID_IExtractIconA))   /*IExtractIcon*/
  91         {    *ppvObj = (IExtractIconA*)This;
  92         }
  93
  94         if(*ppvObj)
  95         { IExtractIconA_AddRef((IExtractIconA*) *ppvObj);
  96           TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj);
  97           return S_OK;
  98         }
  99         TRACE("-- Interface: E_NOINTERFACE\n");
 100         return E_NOINTERFACE;
 101 }
 102
 103 /**************************************************************************
 104 *  IExtractIconA_AddRef
 105 */
 106 static ULONG WINAPI IExtractIconA_fnAddRef(IExtractIconA * iface)
 107 {
 108         ICOM_THIS(IExtractIconAImpl,iface);
 109
 110         TRACE("(%p)->(count=%lu)\n",This, This->ref );
 111
 112         return ++(This->ref);
 113 }
 114 /**************************************************************************
 115 *  IExtractIconA_Release
 116 */
 117 static ULONG WINAPI IExtractIconA_fnRelease(IExtractIconA * iface)
 118 {
 119         ICOM_THIS(IExtractIconAImpl,iface);
 120
 121         TRACE("(%p)->()\n",This);
 122
 123         if (!--(This->ref))
 124         { TRACE(" destroying IExtractIcon(%p)\n",This);
 125           SHFree(This->pidl);
 126           HeapFree(GetProcessHeap(),0,This);
 127           return 0;
 128         }
 129         return This->ref;
 130 }
 131 /**************************************************************************
 132 *  IExtractIconA_GetIconLocation
 133 *
 134 * mapping filetype to icon
 135 */
 136 static HRESULT WINAPI IExtractIconA_fnGetIconLocation(
 137         IExtractIconA * iface,
 138         UINT uFlags,
 139         LPSTR szIconFile,
 140         UINT cchMax,
 141         int * piIndex,
 142         UINT * pwFlags)
 143 {
 144         ICOM_THIS(IExtractIconAImpl,iface);
 145
 146         char    sTemp[MAX_PATH];
 147         DWORD   dwNr;
 148         GUID const * riid;
 149         LPITEMIDLIST    pSimplePidl = ILFindLastID(This->pidl);
 150
 151         TRACE("(%p) (flags=%u %p %u %p %p)\n", This, uFlags, szIconFile, cchMax, piIndex, pwFlags);
 152
 153         if (pwFlags)
 154           *pwFlags = 0;
 155
 156         if (_ILIsDesktop(pSimplePidl))
 157         {
 158           lstrcpynA(szIconFile, "shell32.dll", cchMax);
 159           *piIndex = 34;
 160         }
 161
 162         /* my computer and other shell extensions */
 163         else if ( (riid = _ILGetGUIDPointer(pSimplePidl)) )
 164         {
 165           char xriid[50];
 166           sprintf( xriid, "CLSID\\{%08lx-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x}",
 167                    riid->Data1, riid->Data2, riid->Data3,
 168                    riid->Data4[0], riid->Data4[1], riid->Data4[2], riid->Data4[3],
 169                    riid->Data4[4], riid->Data4[5], riid->Data4[6], riid->Data4[7] );
 170
 171           if (HCR_GetDefaultIcon(xriid, sTemp, MAX_PATH, &dwNr))
 172           {
 173             lstrcpynA(szIconFile, sTemp, cchMax);
 174             *piIndex = dwNr;
 175           }
 176           else
 177           {
 178             lstrcpynA(szIconFile, "shell32.dll", cchMax);
 179             *piIndex = 15;
 180           }
 181         }
 182
 183         else if (_ILIsDrive (pSimplePidl))
 184         {
 185           if (HCR_GetDefaultIcon("Drive", sTemp, MAX_PATH, &dwNr))
 186           {
 187             lstrcpynA(szIconFile, sTemp, cchMax);
 188             *piIndex = dwNr;
 189           }
 190           else
 191           {
 192             lstrcpynA(szIconFile, "shell32.dll", cchMax);
 193             *piIndex = 8;
 194           }
 195         }
 196         else if (_ILIsFolder (pSimplePidl))
 197         {
 198           if (HCR_GetDefaultIcon("Folder", sTemp, MAX_PATH, &dwNr))
 199           {
 200             lstrcpynA(szIconFile, sTemp, cchMax);
 201             *piIndex = dwNr;
 202           }
 203           else
 204           {
 205             lstrcpynA(szIconFile, "shell32.dll", cchMax);
 206             *piIndex = (uFlags & GIL_OPENICON)? 4 : 3;
 207           }
 208         }
 209         else    /* object is file */
 210         {
 211           if (_ILGetExtension (pSimplePidl, sTemp, MAX_PATH)
 212               && HCR_MapTypeToValue(sTemp, sTemp, MAX_PATH, TRUE)
 213               && HCR_GetDefaultIcon(sTemp, sTemp, MAX_PATH, &dwNr))
 214           {
 215             if (!strcmp("%1",sTemp))            /* icon is in the file */
 216             {
 217               SHGetPathFromIDListA(This->pidl, sTemp);
 218               dwNr = 0;
 219             }
 220             lstrcpynA(szIconFile, sTemp, cchMax);
 221             *piIndex = dwNr;
 222           }
 223           else                                  /* default icon */
 224           {
 225             lstrcpynA(szIconFile, "shell32.dll", cchMax);
 226             *piIndex = 0;
 227           }
 228         }
 229
 230         TRACE("-- %s %x\n", szIconFile, *piIndex);
 231         return NOERROR;
 232 }
 233 /**************************************************************************
 234 *  IExtractIconA_Extract
 235 */
 236 static HRESULT WINAPI IExtractIconA_fnExtract(IExtractIconA * iface, LPCSTR pszFile, UINT nIconIndex, HICON *phiconLarge, HICON *phiconSmall, UINT nIconSize)
 237 {
 238         ICOM_THIS(IExtractIconAImpl,iface);
 239
 240         FIXME("(%p) (file=%p index=%u %p %p size=%u) semi-stub\n", This, pszFile, nIconIndex, phiconLarge, phiconSmall, nIconSize);
 241
 242         if (phiconLarge)
 243           *phiconLarge = ImageList_GetIcon(ShellBigIconList, nIconIndex, ILD_TRANSPARENT);
 244
 245         if (phiconSmall)
 246           *phiconSmall = ImageList_GetIcon(ShellSmallIconList, nIconIndex, ILD_TRANSPARENT);
 247
 248         return S_OK;
 249 }
 250
 251 static struct ICOM_VTABLE(IExtractIconA) eivt =
 252 {
 253         ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
 254         IExtractIconA_fnQueryInterface,
 255         IExtractIconA_fnAddRef,
 256         IExtractIconA_fnRelease,
 257         IExtractIconA_fnGetIconLocation,
 258         IExtractIconA_fnExtract
 259 };
 260
 261 /************************************************************************
 262  * IEIPersistFile_QueryInterface (IUnknown)
 263  */
 264 static HRESULT WINAPI IEIPersistFile_fnQueryInterface(
 265         IPersistFile    *iface,
 266         REFIID          iid,
 267         LPVOID          *ppvObj)
 268 {
 269         _ICOM_THIS_From_IPersistFile(IExtractIconA, iface);
 270
 271         return IShellFolder_QueryInterface((IExtractIconA*)This, iid, ppvObj);
 272 }
 273
 274 /************************************************************************
 275  * IEIPersistFile_AddRef (IUnknown)
 276  */
 277 static ULONG WINAPI IEIPersistFile_fnAddRef(
 278         IPersistFile    *iface)
 279 {
 280         _ICOM_THIS_From_IPersistFile(IExtractIconA, iface);
 281
 282         return IExtractIconA_AddRef((IExtractIconA*)This);
 283 }
 284
 285 /************************************************************************
 286  * IEIPersistFile_Release (IUnknown)
 287  */
 288 static ULONG WINAPI IEIPersistFile_fnRelease(
 289         IPersistFile    *iface)
 290 {
 291         _ICOM_THIS_From_IPersistFile(IExtractIconA, iface);
 292
 293         return IExtractIconA_Release((IExtractIconA*)This);
 294 }
 295
 296 /************************************************************************
 297  * IEIPersistFile_GetClassID (IPersist)
 298  */
 299 static HRESULT WINAPI IEIPersistFile_fnGetClassID(
 300         IPersistFile    *iface,
 301         LPCLSID         lpClassId)
 302 {
 303         CLSID StdFolderID = { 0x00000000, 0x0000, 0x0000, {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00} };
 304
 305         if (lpClassId==NULL)
 306           return E_POINTER;
 307
 308         memcpy(lpClassId, &StdFolderID, sizeof(StdFolderID));
 309
 310         return S_OK;
 311 }
 312
 313 /************************************************************************
 314  * IEIPersistFile_Load (IPersistFile)
 315  */
 316 static HRESULT WINAPI IEIPersistFile_fnLoad(IPersistFile* iface, LPCOLESTR pszFileName, DWORD dwMode)
 317 {
 318         _ICOM_THIS_From_IPersistFile(IExtractIconA, iface);
 319         FIXME("%p\n", This);
 320         return E_NOTIMPL;
 321
 322 }
 323
 324 static struct ICOM_VTABLE(IPersistFile) pfvt =
 325 {
 326         ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
 327         IEIPersistFile_fnQueryInterface,
 328         IEIPersistFile_fnAddRef,
 329         IEIPersistFile_fnRelease,
 330         IEIPersistFile_fnGetClassID,
 331         (void *) 0xdeadbeef /* IEIPersistFile_fnIsDirty */,
 332         IEIPersistFile_fnLoad,
 333         (void *) 0xdeadbeef /* IEIPersistFile_fnSave */,
 334         (void *) 0xdeadbeef /* IEIPersistFile_fnSaveCompleted */,
 335         (void *) 0xdeadbeef /* IEIPersistFile_fnGetCurFile */
 336 };