3 Nov
2014
3 Nov
'14
7:50 p.m.
Author: akhaldi
Date: Mon Nov 3 19:50:36 2014
New Revision: 65233
URL: http://svn.reactos.org/svn/reactos?rev=65233&view=rev
Log:
[SHELL32]
* Move pidl.cpp and pidl.h to the wine folder.
* Convert pidl.cpp into pidl.c.
CORE-8540
Added:
branches/shell-experiments/dll/win32/shell32/wine/pidl.c
- copied, changed from r65228,
branches/shell-experiments/dll/win32/shell32/pidl.cpp
branches/shell-experiments/dll/win32/shell32/wine/pidl.h
- copied unchanged from r65228, branches/shell-experiments/dll/win32/shell32/pidl.h
Removed:
branches/shell-experiments/dll/win32/shell32/pidl.cpp
branches/shell-experiments/dll/win32/shell32/pidl.h
Modified:
branches/shell-experiments/dll/win32/shell32/CMakeLists.txt
branches/shell-experiments/dll/win32/shell32/precomp.h
Modified: branches/shell-experiments/dll/win32/shell32/CMakeLists.txt
URL:
http://svn.reactos.org/svn/reactos/branches/shell-experiments/dll/win32/she…
==============================================================================
--- branches/shell-experiments/dll/win32/shell32/CMakeLists.txt [iso-8859-1] (original)
+++ branches/shell-experiments/dll/win32/shell32/CMakeLists.txt [iso-8859-1] Mon Nov 3
19:50:36 2014
@@ -39,7 +39,6 @@
extracticon.cpp
folders.cpp
iconcache.cpp
- pidl.cpp
shell32.cpp
shellitem.cpp
shelllink.cpp
@@ -71,6 +70,7 @@
add_library(shell32 SHARED
${SOURCE}
wine/control.c
+ wine/pidl.c
wine/shell32_main.c
wine/shellole.c
wine/shellord.c
Removed: branches/shell-experiments/dll/win32/shell32/pidl.cpp
URL:
http://svn.reactos.org/svn/reactos/branches/shell-experiments/dll/win32/she…
==============================================================================
--- branches/shell-experiments/dll/win32/shell32/pidl.cpp [iso-8859-1] (original)
+++ branches/shell-experiments/dll/win32/shell32/pidl.cpp (removed)
@@ -1,2421 +0,0 @@
-/*
- * pidl Handling
- *
- * Copyright 1998 Juergen Schmied
- *
- * 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
- *
- * NOTES
- * a pidl == NULL means desktop and is legal
- *
- */
-
-#include "precomp.h"
-
-WINE_DEFAULT_DEBUG_CHANNEL(pidl);
-WINE_DECLARE_DEBUG_CHANNEL(shell);
-
-/* from comctl32.dll */
-EXTERN_C LPVOID WINAPI Alloc(INT);
-EXTERN_C BOOL WINAPI Free(LPVOID);
-
-static LPSTR _ILGetSTextPointer(LPCITEMIDLIST pidl);
-static LPWSTR _ILGetTextPointerW(LPCITEMIDLIST pidl);
-
-/*************************************************************************
- * ILGetDisplayNameExA [SHELL32.186]
- *
- * Retrieves the display name of an ItemIDList
- *
- * PARAMS
- * psf [I] Shell Folder to start with, if NULL the desktop is used
- * pidl [I] ItemIDList relative to the psf to get the display name for
- * path [O] Filled in with the display name, assumed to be at least MAX_PATH
long
- * type [I] Type of display name to retrieve
- * 0 = SHGDN_FORPARSING | SHGDN_FORADDRESSBAR uses always the desktop
as root
- * 1 = SHGDN_NORMAL relative to the root folder
- * 2 = SHGDN_INFOLDER relative to the root folder, only the last name
- *
- * RETURNS
- * True if the display name could be retrieved successfully, False otherwise
- */
-static BOOL ILGetDisplayNameExA(IShellFolder * psf, LPCITEMIDLIST pidl, LPSTR path, DWORD
type)
-{
- BOOL ret = FALSE;
- WCHAR wPath[MAX_PATH];
-
- TRACE("%p %p %p %d\n", psf, pidl, path, type);
-
- if (!pidl || !path)
- return FALSE;
-
- ret = ILGetDisplayNameExW(psf, pidl, wPath, type);
- WideCharToMultiByte(CP_ACP, 0, wPath, -1, path, MAX_PATH, NULL, NULL);
- TRACE("%p %p %s\n", psf, pidl, debugstr_a(path));
-
- return ret;
-}
-
-BOOL WINAPI ILGetDisplayNameExW(IShellFolder * psf, LPCITEMIDLIST pidl, LPWSTR path,
DWORD type)
-{
- CComPtr<IShellFolder> psfParent;
- CComPtr<IShellFolder> lsf = psf;
- HRESULT ret = NO_ERROR;
- LPCITEMIDLIST pidllast;
- STRRET strret;
- DWORD flag;
-
- TRACE("%p %p %p %d\n", psf, pidl, path, type);
-
- if (!pidl || !path)
- return FALSE;
-
- if (!lsf)
- {
- ret = SHGetDesktopFolder(&lsf);
- if (FAILED(ret))
- return FALSE;
- }
-
- if (type <= 2)
- {
- switch (type)
- {
- case ILGDN_FORPARSING:
- flag = SHGDN_FORPARSING | SHGDN_FORADDRESSBAR;
- break;
- case ILGDN_NORMAL:
- flag = SHGDN_NORMAL;
- break;
- case ILGDN_INFOLDER:
- flag = SHGDN_INFOLDER;
- break;
- default:
- FIXME("Unknown type parameter = %x\n", type);
- flag = SHGDN_FORPARSING | SHGDN_FORADDRESSBAR;
- break;
- }
- if (!*(const WORD*)pidl || type == ILGDN_FORPARSING)
- {
- ret = lsf->GetDisplayNameOf(pidl, flag, &strret);
- if (SUCCEEDED(ret))
- {
- if(!StrRetToStrNW(path, MAX_PATH, &strret, pidl))
- ret = E_FAIL;
- }
- }
- else
- {
- ret = SHBindToParent(pidl, IID_PPV_ARG(IShellFolder, &psfParent),
&pidllast);
- if (SUCCEEDED(ret))
- {
- ret = psfParent->GetDisplayNameOf(pidllast, flag, &strret);
- if (SUCCEEDED(ret))
- {
- if(!StrRetToStrNW(path, MAX_PATH, &strret, pidllast))
- ret = E_FAIL;
- }
- }
- }
- }
-
- TRACE("%p %p %s\n", psf, pidl, debugstr_w(path));
-
- return SUCCEEDED(ret);
-}
-
-/*************************************************************************
- * ILGetDisplayNameEx [SHELL32.186]
- */
-BOOL WINAPI ILGetDisplayNameEx(IShellFolder * psf, LPCITEMIDLIST pidl, LPVOID path, DWORD
type)
-{
- TRACE_(shell)("%p %p %p %d\n", psf, pidl, path, type);
-
- if (SHELL_OsIsUnicode())
- return ILGetDisplayNameExW(psf, pidl, (LPWSTR)path, type);
- return ILGetDisplayNameExA(psf, pidl, (LPSTR)path, type);
-}
-
-/*************************************************************************
- * ILGetDisplayName [SHELL32.15]
- */
-BOOL WINAPI ILGetDisplayName(LPCITEMIDLIST pidl, LPVOID path)
-{
- TRACE_(shell)("%p %p\n", pidl, path);
-
- if (SHELL_OsIsUnicode())
- return ILGetDisplayNameExW(NULL, pidl, (LPWSTR)path, ILGDN_FORPARSING);
- return ILGetDisplayNameExA(NULL, pidl, (LPSTR)path, ILGDN_FORPARSING);
-}
-
-/*************************************************************************
- * ILFindLastID [SHELL32.16]
- *
- * NOTES
- * observed: pidl=Desktop return=pidl
- */
-LPITEMIDLIST WINAPI ILFindLastID(LPCITEMIDLIST pidl)
-{
- LPCITEMIDLIST pidlLast = pidl;
-
- TRACE("(pidl=%p)\n", pidl);
-
- if (!pidl)
- return NULL;
-
- while (pidl->mkid.cb)
- {
- pidlLast = pidl;
- pidl = ILGetNext(pidl);
- }
- return (LPITEMIDLIST)pidlLast;
-}
-
-/*************************************************************************
- * ILRemoveLastID [SHELL32.17]
- *
- * NOTES
- * when pidl=Desktop return=FALSE
- */
-BOOL WINAPI ILRemoveLastID(LPITEMIDLIST pidl)
-{
- TRACE_(shell)("pidl=%p\n", pidl);
-
- if (!pidl || !pidl->mkid.cb)
- return 0;
- ILFindLastID(pidl)->mkid.cb = 0;
- return 1;
-}
-
-/*************************************************************************
- * ILClone [SHELL32.18]
- *
- * NOTES
- * duplicate an idlist
- */
-LPITEMIDLIST WINAPI ILClone (LPCITEMIDLIST pidl)
-{
- DWORD len;
- LPITEMIDLIST newpidl;
-
- if (!pidl)
- return NULL;
-
- len = ILGetSize(pidl);
- newpidl = (LPITEMIDLIST)SHAlloc(len);
- if (newpidl)
- memcpy(newpidl, pidl, len);
-
- TRACE("pidl=%p newpidl=%p\n", pidl, newpidl);
- pdump(pidl);
-
- return newpidl;
-}
-
-/*************************************************************************
- * ILCloneFirst [SHELL32.19]
- *
- * NOTES
- * duplicates the first idlist of a complex pidl
- */
-LPITEMIDLIST WINAPI ILCloneFirst(LPCITEMIDLIST pidl)
-{
- DWORD len;
- LPITEMIDLIST pidlNew = NULL;
-
- TRACE("pidl=%p\n", pidl);
- pdump(pidl);
-
- if (pidl)
- {
- len = pidl->mkid.cb;
- pidlNew = (LPITEMIDLIST)SHAlloc(len + 2);
- if (pidlNew)
- {
- memcpy(pidlNew, pidl, len + 2); /* 2 -> mind a desktop pidl */
-
- if (len)
- ILGetNext(pidlNew)->mkid.cb = 0x00;
- }
- }
- TRACE("-- newpidl=%p\n", pidlNew);
-
- return pidlNew;
-}
-
-/*************************************************************************
- * ILLoadFromStream (SHELL32.26)
- *
- * NOTES
- * the first two bytes are the len, the pidl is following then
- */
-HRESULT WINAPI ILLoadFromStream (IStream * pStream, LPITEMIDLIST * ppPidl)
-{
- WORD wLen = 0;
- DWORD dwBytesRead;
- HRESULT ret = E_FAIL;
-
-
- TRACE_(shell)("%p %p\n", pStream , ppPidl);
-
- SHFree(*ppPidl);
- *ppPidl = NULL;
-
- pStream->AddRef ();
-
- if (SUCCEEDED(pStream->Read(&wLen, 2, &dwBytesRead)))
- {
- TRACE("PIDL length is %d\n", wLen);
- if (wLen != 0)
- {
- *ppPidl = (LPITEMIDLIST)SHAlloc(wLen);
- if (SUCCEEDED(pStream->Read(*ppPidl , wLen, &dwBytesRead)))
- {
- TRACE("Stream read OK\n");
- ret = S_OK;
- }
- else
- {
- WARN("reading pidl failed\n");
- SHFree(*ppPidl);
- *ppPidl = NULL;
- }
- }
- else
- {
- *ppPidl = NULL;
- ret = S_OK;
- }
- }
-
- /* we are not yet fully compatible */
- if (*ppPidl && !pcheck(*ppPidl))
- {
- WARN("Check failed\n");
- SHFree(*ppPidl);
- *ppPidl = NULL;
- }
-
- pStream->Release ();
- TRACE("done\n");
- return ret;
-}
-
-/*************************************************************************
- * ILSaveToStream (SHELL32.27)
- *
- * NOTES
- * the first two bytes are the len, the pidl is following then
- */
-HRESULT WINAPI ILSaveToStream (IStream * pStream, LPCITEMIDLIST pPidl)
-{
- WORD wLen = 0;
- HRESULT ret = E_FAIL;
-
- TRACE_(shell)("%p %p\n", pStream, pPidl);
-
- pStream->AddRef ();
-
- wLen = ILGetSize(pPidl);
-
- if (SUCCEEDED(pStream->Write(&wLen, 2, NULL)))
- {
- if (SUCCEEDED(pStream->Write(pPidl, wLen, NULL)))
- ret = S_OK;
- }
- pStream->Release ();
-
- return ret;
-}
-
-/*************************************************************************
- * SHILCreateFromPath [SHELL32.28]
- *
- * Create an ItemIDList from a path
- *
- * PARAMS
- * path [I]
- * ppidl [O]
- * attributes [I/O] requested attributes on call and actual attributes when
- * the function returns
- *
- * RETURNS
- * NO_ERROR if successful, or an OLE errer code otherwise
- *
- * NOTES
- * Wrapper for IShellFolder_ParseDisplayName().
- */
-HRESULT WINAPI SHILCreateFromPathA(LPCSTR path, LPITEMIDLIST * ppidl, DWORD *
attributes)
-{
- WCHAR lpszDisplayName[MAX_PATH];
-
- TRACE_(shell)("%s %p 0x%08x\n", path, ppidl, attributes ? *attributes :
0);
-
- if (!MultiByteToWideChar(CP_ACP, 0, path, -1, lpszDisplayName, MAX_PATH))
- lpszDisplayName[MAX_PATH-1] = 0;
-
- return SHILCreateFromPathW(lpszDisplayName, ppidl, attributes);
-}
-
-HRESULT WINAPI SHILCreateFromPathW(LPCWSTR path, LPITEMIDLIST * ppidl, DWORD *
attributes)
-{
- CComPtr<IShellFolder> sf;
- DWORD pchEaten;
- HRESULT ret = E_FAIL;
-
- TRACE_(shell)("%s %p 0x%08x\n", debugstr_w(path), ppidl, attributes ?
*attributes : 0);
-
- if (SUCCEEDED (SHGetDesktopFolder(&sf)))
- ret = sf->ParseDisplayName(0, NULL, (LPWSTR)path, &pchEaten, ppidl,
attributes);
- return ret;
-}
-
-EXTERN_C HRESULT WINAPI SHILCreateFromPathAW (LPCVOID path, LPITEMIDLIST * ppidl, DWORD *
attributes)
-{
- if ( SHELL_OsIsUnicode())
- return SHILCreateFromPathW ((LPCWSTR)path, ppidl, attributes);
- return SHILCreateFromPathA ((LPCSTR)path, ppidl, attributes);
-}
-
-/*************************************************************************
- * SHCloneSpecialIDList [SHELL32.89]
- *
- * Create an ItemIDList to one of the special folders.
-
- * PARAMS
- * hwndOwner [in]
- * nFolder [in] CSIDL_xxxxx
- * fCreate [in] Create folder if it does not exist
- *
- * RETURNS
- * Success: The newly created pidl
- * Failure: NULL, if inputs are invalid.
- *
- * NOTES
- * exported by ordinal.
- * Caller is responsible for deallocating the returned ItemIDList with the
- * shells IMalloc interface, aka ILFree.
- */
-LPITEMIDLIST WINAPI SHCloneSpecialIDList(HWND hwndOwner, int nFolder, BOOL fCreate)
-{
- LPITEMIDLIST ppidl;
- TRACE_(shell)("(hwnd=%p,csidl=0x%x,%s).\n", hwndOwner, nFolder, fCreate ?
"T" : "F");
-
- if (fCreate)
- nFolder |= CSIDL_FLAG_CREATE;
-
- SHGetSpecialFolderLocation(hwndOwner, nFolder, &ppidl);
- return ppidl;
-}
-
-/*************************************************************************
- * ILGlobalClone [SHELL32.20]
- *
- * Clones an ItemIDList using Alloc.
- *
- * PARAMS
- * pidl [I] ItemIDList to clone
- *
- * RETURNS
- * Newly allocated ItemIDList.
- *
- * NOTES
- * exported by ordinal.
- */
-LPITEMIDLIST WINAPI ILGlobalClone(LPCITEMIDLIST pidl)
-{
- DWORD len;
- LPITEMIDLIST newpidl;
-
- if (!pidl)
- return NULL;
-
- len = ILGetSize(pidl);
- newpidl = (LPITEMIDLIST)Alloc(len);
- if (newpidl)
- memcpy(newpidl, pidl, len);
-
- TRACE("pidl=%p newpidl=%p\n", pidl, newpidl);
- pdump(pidl);
-
- return newpidl;
-}
-
-/*************************************************************************
- * ILIsEqual [SHELL32.21]
- *
- */
-BOOL WINAPI ILIsEqual(LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
-{
- char szData1[MAX_PATH];
- char szData2[MAX_PATH];
-
- LPCITEMIDLIST pidltemp1 = pidl1;
- LPCITEMIDLIST pidltemp2 = pidl2;
-
- TRACE("pidl1=%p pidl2=%p\n", pidl1, pidl2);
-
- /*
- * Explorer reads from registry directly (StreamMRU),
- * so we can only check here
- */
- if (!pcheck(pidl1) || !pcheck (pidl2))
- return FALSE;
-
- pdump (pidl1);
- pdump (pidl2);
-
- if (!pidl1 || !pidl2)
- return FALSE;
-
- while (pidltemp1->mkid.cb && pidltemp2->mkid.cb)
- {
- _ILSimpleGetText(pidltemp1, szData1, MAX_PATH);
- _ILSimpleGetText(pidltemp2, szData2, MAX_PATH);
-
- if (strcmp( szData1, szData2 ))
- return FALSE;
-
- pidltemp1 = ILGetNext(pidltemp1);
- pidltemp2 = ILGetNext(pidltemp2);
- }
-
- if (!pidltemp1->mkid.cb && !pidltemp2->mkid.cb)
- return TRUE;
-
- return FALSE;
-}
-
-/*************************************************************************
- * ILIsParent [SHELL32.23]
- *
- * Verifies that pidlParent is indeed the (immediate) parent of pidlChild.
- *
- * PARAMS
- * pidlParent [I]
- * pidlChild [I]
- * bImmediate [I] only return true if the parent is the direct parent
- * of the child
- *
- * RETURNS
- * True if the parent ItemIDlist is a complete part of the child ItemIdList,
- * False otherwise.
- *
- * NOTES
- * parent = a/b, child = a/b/c -> true, c is in folder a/b
- * child = a/b/c/d -> false if bImmediate is true, d is not in folder a/b
- * child = a/b/c/d -> true if bImmediate is false, d is in a subfolder of a/b
- */
-BOOL WINAPI ILIsParent(LPCITEMIDLIST pidlParent, LPCITEMIDLIST pidlChild, BOOL
bImmediate)
-{
- char szData1[MAX_PATH];
- char szData2[MAX_PATH];
- LPCITEMIDLIST pParent = pidlParent;
- LPCITEMIDLIST pChild = pidlChild;
-
- TRACE("%p %p %x\n", pidlParent, pidlChild, bImmediate);
-
- if (!pParent || !pChild)
- return FALSE;
-
- while (pParent->mkid.cb && pChild->mkid.cb)
- {
- _ILSimpleGetText(pParent, szData1, MAX_PATH);
- _ILSimpleGetText(pChild, szData2, MAX_PATH);
-
- if (strcmp( szData1, szData2 ))
- return FALSE;
-
- pParent = ILGetNext(pParent);
- pChild = ILGetNext(pChild);
- }
-
- /* child shorter or has equal length to parent */
- if (pParent->mkid.cb || !pChild->mkid.cb)
- return FALSE;
-
- /* not immediate descent */
- if ( ILGetNext(pChild)->mkid.cb && bImmediate)
- return FALSE;
-
- return TRUE;
-}
-
-/*************************************************************************
- * ILFindChild [SHELL32.24]
- *
- * Compares elements from pidl1 and pidl2.
- *
- * PARAMS
- * pidl1 [I]
- * pidl2 [I]
- *
- * RETURNS
- * pidl1 is desktop pidl2
- * pidl1 shorter pidl2 pointer to first different element of pidl2
- * if there was at least one equal element
- * pidl2 shorter pidl1 0
- * pidl2 equal pidl1 pointer to last 0x00-element of pidl2
- *
- * NOTES
- * exported by ordinal.
- */
-LPITEMIDLIST WINAPI ILFindChild(LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
-{
- char szData1[MAX_PATH];
- char szData2[MAX_PATH];
-
- LPCITEMIDLIST pidltemp1 = pidl1;
- LPCITEMIDLIST pidltemp2 = pidl2;
- LPCITEMIDLIST ret = NULL;
-
- TRACE("pidl1=%p pidl2=%p\n", pidl1, pidl2);
-
- /* explorer reads from registry directly (StreamMRU),
- so we can only check here */
- if ((!pcheck (pidl1)) || (!pcheck (pidl2)))
- return FALSE;
-
- pdump (pidl1);
- pdump (pidl2);
-
- if (_ILIsDesktop(pidl1))
- {
- ret = pidl2;
- }
- else
- {
- while (pidltemp1->mkid.cb && pidltemp2->mkid.cb)
- {
- _ILSimpleGetText(pidltemp1, szData1, MAX_PATH);
- _ILSimpleGetText(pidltemp2, szData2, MAX_PATH);
-
- if (strcmp(szData1, szData2))
- break;
-
- pidltemp1 = ILGetNext(pidltemp1);
- pidltemp2 = ILGetNext(pidltemp2);
- ret = pidltemp2;
- }
-
- if (pidltemp1->mkid.cb)
- ret = NULL; /* elements of pidl1 left*/
- }
- TRACE_(shell)("--- %p\n", ret);
- return (LPITEMIDLIST)ret; /* pidl 1 is shorter */
-}
-
-/*************************************************************************
- * ILCombine [SHELL32.25]
- *
- * Concatenates two complex ItemIDLists.
- *
- * PARAMS
- * pidl1 [I] first complex ItemIDLists
- * pidl2 [I] complex ItemIDLists to append
- *
- * RETURNS
- * if both pidl's == NULL NULL
- * if pidl1 == NULL cloned pidl2
- * if pidl2 == NULL cloned pidl1
- * otherwise new pidl with pidl2 appended to pidl1
- *
- * NOTES
- * exported by ordinal.
- * Does not destroy the passed in ItemIDLists!
- */
-LPITEMIDLIST WINAPI ILCombine(LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
-{
- DWORD len1, len2;
- LPITEMIDLIST pidlNew;
-
- TRACE("pidl=%p pidl=%p\n", pidl1, pidl2);
-
- if (!pidl1 && !pidl2) return NULL;
-
- pdump (pidl1);
- pdump (pidl2);
-
- if (!pidl1)
- {
- pidlNew = ILClone(pidl2);
- return pidlNew;
- }
-
- if (!pidl2)
- {
- pidlNew = ILClone(pidl1);
- return pidlNew;
- }
-
- len1 = ILGetSize(pidl1) - 2;
- len2 = ILGetSize(pidl2);
- pidlNew = (LPITEMIDLIST)SHAlloc(len1 + len2);
-
- if (pidlNew)
- {
- memcpy(pidlNew, pidl1, len1);
- memcpy(((BYTE *)pidlNew) + len1, pidl2, len2);
- }
-
- /* TRACE(pidl,"--new pidl=%p\n",pidlNew);*/
- return pidlNew;
-}
-
-/*************************************************************************
- * SHGetRealIDL [SHELL32.98]
- *
- * NOTES
- */
-HRESULT WINAPI SHGetRealIDL(IShellFolder * lpsf, LPCITEMIDLIST pidlSimple, LPITEMIDLIST
*pidlReal)
-{
- CComPtr<IDataObject> pDataObj;
- HRESULT hr;
-
- hr = lpsf->GetUIObjectOf(0, 1, &pidlSimple, IID_NULL_PPV_ARG(IDataObject,
&pDataObj));
- if (SUCCEEDED(hr))
- {
- STGMEDIUM medium;
- FORMATETC fmt;
-
- fmt.cfFormat = RegisterClipboardFormatW(CFSTR_SHELLIDLIST);
- fmt.ptd = NULL;
- fmt.dwAspect = DVASPECT_CONTENT;
- fmt.lindex = -1;
- fmt.tymed = TYMED_HGLOBAL;
-
- hr = pDataObj->GetData(&fmt, &medium);
-
- if (SUCCEEDED(hr))
- {
- /*assert(pida->cidl==1);*/
- LPIDA pida = (LPIDA)GlobalLock(medium.hGlobal);
-
- LPCITEMIDLIST pidl_folder = (LPCITEMIDLIST) ((LPBYTE)pida +
pida->aoffset[0]);
- LPCITEMIDLIST pidl_child = (LPCITEMIDLIST) ((LPBYTE)pida +
pida->aoffset[1]);
-
- *pidlReal = ILCombine(pidl_folder, pidl_child);
-
- if (!*pidlReal)
- hr = E_OUTOFMEMORY;
-
- GlobalUnlock(medium.hGlobal);
- GlobalFree(medium.hGlobal);
- }
- }
-
- return hr;
-}
-
-/*************************************************************************
- * SHLogILFromFSIL [SHELL32.95]
- *
- * NOTES
- * pild = CSIDL_DESKTOP ret = 0
- * pild = CSIDL_DRIVES ret = 0
- */
-EXTERN_C LPITEMIDLIST WINAPI SHLogILFromFSIL(LPITEMIDLIST pidl)
-{
- FIXME("(pidl=%p)\n", pidl);
-
- pdump(pidl);
-
- return 0;
-}
-
-/*************************************************************************
- * ILGetSize [SHELL32.152]
- *
- * Gets the byte size of an ItemIDList including zero terminator
- *
- * PARAMS
- * pidl [I] ItemIDList
- *
- * RETURNS
- * size of pidl in bytes
- *
- * NOTES
- * exported by ordinal
- */
-UINT WINAPI ILGetSize(LPCITEMIDLIST pidl)
-{
- LPCSHITEMID si;
- UINT len = 0;
-
- if (pidl)
- {
- si = &(pidl->mkid);
-
- while (si->cb)
- {
- len += si->cb;
- si = (LPCSHITEMID)(((const BYTE*)si) + si->cb);
- }
- len += 2;
- }
- TRACE("pidl=%p size=%u\n", pidl, len);
- return len;
-}
-
-/*************************************************************************
- * ILGetNext [SHELL32.153]
- *
- * Gets the next ItemID of an ItemIDList
- *
- * PARAMS
- * pidl [I] ItemIDList
- *
- * RETURNS
- * null -> null
- * desktop -> null
- * simple pidl -> pointer to 0x0000 element
- *
- * NOTES
- * exported by ordinal.
- */
-LPITEMIDLIST WINAPI ILGetNext(LPCITEMIDLIST pidl)
-{
- WORD len;
-
- TRACE("%p\n", pidl);
-
- if (pidl)
- {
- len = pidl->mkid.cb;
- if (len)
- {
- pidl = (LPCITEMIDLIST) (((const BYTE*)pidl) + len);
- TRACE("-- %p\n", pidl);
- return (LPITEMIDLIST)pidl;
- }
- }
- return NULL;
-}
-
-/*************************************************************************
- * ILAppend [SHELL32.154]
- *
- * Adds the single ItemID item to the ItemIDList indicated by pidl.
- * If bEnd is FALSE, inserts the item in the front of the list,
- * otherwise it adds the item to the end. (???)
- *
- * PARAMS
- * pidl [I] ItemIDList to extend
- * item [I] ItemID to prepend/append
- * bEnd [I] Indicates if the item should be appended
- *
- * NOTES
- * Destroys the passed in idlist! (???)
- */
-EXTERN_C LPITEMIDLIST WINAPI ILAppend(LPITEMIDLIST pidl, LPCITEMIDLIST item, BOOL bEnd)
-{
- LPITEMIDLIST idlRet;
-
- WARN("(pidl=%p,pidl=%p,%08u)semi-stub\n", pidl, item, bEnd);
-
- pdump (pidl);
- pdump (item);
-
- if (_ILIsDesktop(pidl))
- {
- idlRet = ILClone(item);
- SHFree (pidl);
- return idlRet;
- }
-
- if (bEnd)
- idlRet = ILCombine(pidl, item);
- else
- idlRet = ILCombine(item, pidl);
-
- SHFree(pidl);
- return idlRet;
-}
-
-/*************************************************************************
- * ILFree [SHELL32.155]
- *
- * Frees memory (if not NULL) allocated by SHMalloc allocator
- *
- * PARAMS
- * pidl [I]
- *
- * RETURNS
- * Nothing
- *
- * NOTES
- * exported by ordinal
- */
-void WINAPI ILFree(LPITEMIDLIST pidl)
-{
- TRACE("(pidl=%p)\n", pidl);
- SHFree(pidl);
-}
-
-/*************************************************************************
- * ILGlobalFree [SHELL32.156]
- *
- * Frees memory (if not NULL) allocated by Alloc allocator
- *
- * PARAMS
- * pidl [I]
- *
- * RETURNS
- * Nothing
- *
- * NOTES
- * exported by ordinal.
- */
-void WINAPI ILGlobalFree( LPITEMIDLIST pidl)
-{
- TRACE("%p\n", pidl);
-
- Free(pidl);
-}
-
-/*************************************************************************
- * ILCreateFromPathA [SHELL32.189]
- *
- * Creates a complex ItemIDList from a path and returns it.
- *
- * PARAMS
- * path [I]
- *
- * RETURNS
- * the newly created complex ItemIDList or NULL if failed
- *
- * NOTES
- * exported by ordinal.
- */
-LPITEMIDLIST WINAPI ILCreateFromPathA (LPCSTR path)
-{
- LPITEMIDLIST pidlnew = NULL;
-
- TRACE_(shell)("%s\n", debugstr_a(path));
-
- if (SUCCEEDED(SHILCreateFromPathA(path, &pidlnew, NULL)))
- return pidlnew;
- return NULL;
-}
-
-/*************************************************************************
- * ILCreateFromPathW [SHELL32.190]
- *
- * See ILCreateFromPathA.
- */
-LPITEMIDLIST WINAPI ILCreateFromPathW (LPCWSTR path)
-{
- LPITEMIDLIST pidlnew = NULL;
-
- TRACE_(shell)("%s\n", debugstr_w(path));
-
- if (SUCCEEDED(SHILCreateFromPathW(path, &pidlnew, NULL)))
- return pidlnew;
- return NULL;
-}
-
-/*************************************************************************
- * ILCreateFromPath [SHELL32.157]
- */
-EXTERN_C LPITEMIDLIST WINAPI ILCreateFromPathAW (LPCVOID path)
-{
- if ( SHELL_OsIsUnicode())
- return ILCreateFromPathW ((LPCWSTR)path);
- return ILCreateFromPathA ((LPCSTR)path);
-}
-
-/*************************************************************************
- * _ILParsePathW [internal]
- *
- * Creates an ItemIDList from a path and returns it.
- *
- * PARAMS
- * path [I] path to parse and convert into an ItemIDList
- * lpFindFile [I] pointer to buffer to initialize the FileSystem
- * Bind Data object with
- * bBindCtx [I] indicates to create a BindContext and assign a
- * FileSystem Bind Data object
- * ppidl [O] the newly create ItemIDList
- * prgfInOut [I/O] requested attributes on input and actual
- * attributes on return
- *
- * RETURNS
- * NO_ERROR on success or an OLE error code
- *
- * NOTES
- * If either lpFindFile is non-NULL or bBindCtx is TRUE, this function
- * creates a BindContext object and assigns a FileSystem Bind Data object
- * to it, passing the BindContext to IShellFolder_ParseDisplayName. Each
- * IShellFolder uses that FileSystem Bind Data object of the BindContext
- * to pass data about the current path element to the next object. This
- * is used to avoid having to verify the current path element on disk, so
- * that creating an ItemIDList from a nonexistent path still can work.
- */
-static HRESULT _ILParsePathW(LPCWSTR path, LPWIN32_FIND_DATAW lpFindFile,
- BOOL bBindCtx, LPITEMIDLIST *ppidl, LPDWORD prgfInOut)
-{
- CComPtr<IShellFolder> pSF;
- CComPtr<IBindCtx> pBC;
- HRESULT ret;
-
- TRACE("%s %p %d (%p)->%p (%p)->0x%x\n", debugstr_w(path), lpFindFile,
bBindCtx,
- ppidl, ppidl ? *ppidl : NULL,
- prgfInOut, prgfInOut ? *prgfInOut : 0);
-
- ret = SHGetDesktopFolder(&pSF);
- if (FAILED(ret))
- return ret;
-
- if (lpFindFile || bBindCtx)
- ret = IFileSystemBindData_Constructor(lpFindFile, &pBC);
-
- if (SUCCEEDED(ret))
- {
- ret = pSF->ParseDisplayName(0, pBC, (LPOLESTR)path, NULL, ppidl, prgfInOut);
- }
-
- if (FAILED(ret) && ppidl)
- *ppidl = NULL;
-
- TRACE("%s %p 0x%x\n", debugstr_w(path), ppidl ? *ppidl : NULL, prgfInOut ?
*prgfInOut : 0);
-
- return ret;
-}
-
-/*************************************************************************
- * SHSimpleIDListFromPath [SHELL32.162]
- *
- * Creates a simple ItemIDList from a path and returns it. This function
- * does not fail on nonexistent paths.
- *
- * PARAMS
- * path [I] path to parse and convert into an ItemIDList
- *
- * RETURNS
- * the newly created simple ItemIDList
- *
- * NOTES
- * Simple in the name does not mean a relative ItemIDList but rather a
- * fully qualified list, where only the file name is filled in and the
- * directory flag for those ItemID elements this is known about, eg.
- * it is not the last element in the ItemIDList or the actual directory
- * exists on disk.
- * exported by ordinal.
- */
-LPITEMIDLIST WINAPI SHSimpleIDListFromPathA(LPCSTR lpszPath)
-{
- LPITEMIDLIST pidl = NULL;
- LPWSTR wPath = NULL;
- int len;
-
- TRACE("%s\n", debugstr_a(lpszPath));
-
- if (lpszPath)
- {
- len = MultiByteToWideChar(CP_ACP, 0, lpszPath, -1, NULL, 0);
- wPath = (LPWSTR)HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
- MultiByteToWideChar(CP_ACP, 0, lpszPath, -1, wPath, len);
- }
-
- _ILParsePathW(wPath, NULL, TRUE, &pidl, NULL);
-
- HeapFree(GetProcessHeap(), 0, wPath);
- TRACE("%s %p\n", debugstr_a(lpszPath), pidl);
- return pidl;
-}
-
-LPITEMIDLIST WINAPI SHSimpleIDListFromPathW(LPCWSTR lpszPath)
-{
- LPITEMIDLIST pidl = NULL;
-
- TRACE("%s\n", debugstr_w(lpszPath));
-
- _ILParsePathW(lpszPath, NULL, TRUE, &pidl, NULL);
- TRACE("%s %p\n", debugstr_w(lpszPath), pidl);
- return pidl;
-}
-
-EXTERN_C LPITEMIDLIST WINAPI SHSimpleIDListFromPathAW(LPCVOID lpszPath)
-{
- if ( SHELL_OsIsUnicode())
- return SHSimpleIDListFromPathW ((LPCWSTR)lpszPath);
- return SHSimpleIDListFromPathA ((LPCSTR)lpszPath);
-}
-
-/*************************************************************************
- * SHGetDataFromIDListA [SHELL32.247]
- *
- * NOTES
- * the pidl can be a simple one. since we can't get the path out of the pidl
- * we have to take all data from the pidl
- */
-HRESULT WINAPI SHGetDataFromIDListA(IShellFolder * psf, LPCITEMIDLIST pidl,
- int nFormat, LPVOID dest, int len)
-{
- LPSTR filename, shortname;
- WIN32_FIND_DATAA * pfd;
-
- TRACE_(shell)("sf=%p pidl=%p 0x%04x %p 0x%04x stub\n", psf, pidl, nFormat,
dest, len);
-
- pdump(pidl);
- if (!psf || !dest)
- return E_INVALIDARG;
-
- switch (nFormat)
- {
- case SHGDFIL_FINDDATA:
- pfd = (WIN32_FIND_DATAA *)dest;
-
- if (_ILIsDrive(pidl) || _ILIsSpecialFolder(pidl))
- return E_INVALIDARG;
-
- if (len < (int)sizeof(WIN32_FIND_DATAA))
- return E_INVALIDARG;
-
- ZeroMemory(pfd, sizeof (WIN32_FIND_DATAA));
- _ILGetFileDateTime( pidl, &(pfd->ftLastWriteTime));
- pfd->dwFileAttributes = _ILGetFileAttributes(pidl, NULL, 0);
- pfd->nFileSizeLow = _ILGetFileSize ( pidl, NULL, 0);
-
- filename = _ILGetTextPointer(pidl);
- shortname = _ILGetSTextPointer(pidl);
-
- if (filename)
- lstrcpynA(pfd->cFileName, filename, sizeof(pfd->cFileName));
- else
- pfd->cFileName[0] = '\0';
-
- if (shortname)
- lstrcpynA(pfd->cAlternateFileName, shortname,
sizeof(pfd->cAlternateFileName));
- else
- pfd->cAlternateFileName[0] = '\0';
- return S_OK;
-
- case SHGDFIL_NETRESOURCE:
- case SHGDFIL_DESCRIPTIONID:
- FIXME_(shell)("SHGDFIL %i stub\n", nFormat);
- break;
-
- default:
- ERR_(shell)("Unknown SHGDFIL %i, please report\n", nFormat);
- }
-
- return E_INVALIDARG;
-}
-
-/*************************************************************************
- * SHGetDataFromIDListW [SHELL32.248]
- *
- */
-HRESULT WINAPI SHGetDataFromIDListW(IShellFolder * psf, LPCITEMIDLIST pidl,
- int nFormat, LPVOID dest, int len)
-{
- LPSTR filename, shortname;
- WIN32_FIND_DATAW * pfd = (WIN32_FIND_DATAW *)dest;
-
- TRACE_(shell)("sf=%p pidl=%p 0x%04x %p 0x%04x stub\n", psf, pidl, nFormat,
dest, len);
-
- pdump(pidl);
-
- if (!psf || !dest)
- return E_INVALIDARG;
-
- switch (nFormat)
- {
- case SHGDFIL_FINDDATA:
- pfd = (WIN32_FIND_DATAW *)dest;
-
- if (_ILIsDrive(pidl))
- return E_INVALIDARG;
-
- if (len < (int)sizeof(WIN32_FIND_DATAW))
- return E_INVALIDARG;
-
- ZeroMemory(pfd, sizeof (WIN32_FIND_DATAW));
- _ILGetFileDateTime( pidl, &(pfd->ftLastWriteTime));
- pfd->dwFileAttributes = _ILGetFileAttributes(pidl, NULL, 0);
- pfd->nFileSizeLow = _ILGetFileSize ( pidl, NULL, 0);
-
- filename = _ILGetTextPointer(pidl);
- shortname = _ILGetSTextPointer(pidl);
-
- if (!filename)
- pfd->cFileName[0] = '\0';
- else if (!MultiByteToWideChar(CP_ACP, 0, filename, -1, pfd->cFileName,
MAX_PATH))
- pfd->cFileName[MAX_PATH-1] = 0;
-
- if (!shortname)
- pfd->cAlternateFileName[0] = '\0';
- else if (!MultiByteToWideChar(CP_ACP, 0, shortname, -1,
pfd->cAlternateFileName, 14))
- pfd->cAlternateFileName[13] = 0;
- return S_OK;
-
- case SHGDFIL_NETRESOURCE:
- case SHGDFIL_DESCRIPTIONID:
- FIXME_(shell)("SHGDFIL %i stub\n", nFormat);
- break;
-
- default:
- ERR_(shell)("Unknown SHGDFIL %i, please report\n", nFormat);
- }
-
- return E_INVALIDARG;
-}
-
-/*************************************************************************
- * SHGetPathFromIDListA [SHELL32.@][NT 4.0: SHELL32.220]
- *
- * PARAMETERS
- * pidl, [IN] pidl
- * pszPath [OUT] path
- *
- * RETURNS
- * path from a passed PIDL.
- *
- * NOTES
- * NULL returns FALSE
- * desktop pidl gives path to desktop directory back
- * special pidls returning FALSE
- */
-BOOL WINAPI SHGetPathFromIDListA(LPCITEMIDLIST pidl, LPSTR pszPath)
-{
- WCHAR wszPath[MAX_PATH];
- BOOL bSuccess;
-
- bSuccess = SHGetPathFromIDListW(pidl, wszPath);
- WideCharToMultiByte(CP_ACP, 0, wszPath, -1, pszPath, MAX_PATH, NULL, NULL);
-
- return bSuccess;
-}
-
-/*************************************************************************
- * SHGetPathFromIDListW [SHELL32.@]
- *
- * See SHGetPathFromIDListA.
- */
-BOOL WINAPI SHGetPathFromIDListW(LPCITEMIDLIST pidl, LPWSTR pszPath)
-{
- HRESULT hr;
- LPCITEMIDLIST pidlLast;
- CComPtr<IShellFolder> psfFolder;
- DWORD dwAttributes;
- STRRET strret;
-
- TRACE_(shell)("(pidl=%p,%p)\n", pidl, pszPath);
- pdump(pidl);
-
- *pszPath = '\0';
- if (!pidl)
- return FALSE;
-
- hr = SHBindToParent(pidl, IID_PPV_ARG(IShellFolder, &psfFolder), &pidlLast);
- if (FAILED(hr))
- {
- ERR("SHBindToParent failed: %x\n", hr);
- return FALSE;
- }
-
- dwAttributes = SFGAO_FILESYSTEM;
- hr = psfFolder->GetAttributesOf(1, &pidlLast, &dwAttributes);
- if (FAILED(hr) || !(dwAttributes & SFGAO_FILESYSTEM))
- {
- WARN("Wrong dwAttributes or GetAttributesOf failed: %x\n", hr);
- return FALSE;
- }
-
- hr = psfFolder->GetDisplayNameOf(pidlLast, SHGDN_FORPARSING, &strret);
- if (FAILED(hr)) return FALSE;
-
- hr = StrRetToBufW(&strret, pidlLast, pszPath, MAX_PATH);
-
- TRACE_(shell)("-- %s, 0x%08x\n", debugstr_w(pszPath), hr);
- return SUCCEEDED(hr);
-}
-
-/*************************************************************************
- * SHBindToParent [shell version 5.0]
- */
-HRESULT WINAPI SHBindToParent(LPCITEMIDLIST pidl, REFIID riid, LPVOID *ppv, LPCITEMIDLIST
*ppidlLast)
-{
- CComPtr<IShellFolder> psfDesktop;
- HRESULT hr = E_FAIL;
-
- TRACE_(shell)("pidl=%p\n", pidl);
- pdump(pidl);
-
- if (!pidl || !ppv)
- return E_INVALIDARG;
-
- *ppv = NULL;
- if (ppidlLast)
- *ppidlLast = NULL;
-
- hr = SHGetDesktopFolder(&psfDesktop);
- if (FAILED(hr))
- return hr;
-
- if (_ILIsPidlSimple(pidl))
- {
- /* we are on desktop level */
- hr = psfDesktop->QueryInterface(riid, ppv);
- }
- else
- {
- LPITEMIDLIST pidlParent = ILClone(pidl);
- ILRemoveLastID(pidlParent);
- hr = psfDesktop->BindToObject(pidlParent, NULL, riid, ppv);
- SHFree (pidlParent);
- }
-
- if (SUCCEEDED(hr) && ppidlLast)
- *ppidlLast = ILFindLastID(pidl);
-
- TRACE_(shell)("-- psf=%p pidl=%p ret=0x%08x\n", *ppv, (ppidlLast) ?
*ppidlLast : NULL, hr);
- return hr;
-}
-
-/**************************************************************************
- *
- * internal functions
- *
- * ### 1. section creating pidls ###
- *
- *************************************************************************
- */
-
-/* Basic PIDL constructor. Allocates size + 5 bytes, where:
- * - two bytes are SHITEMID.cb
- * - one byte is PIDLDATA.type
- * - two bytes are the NULL PIDL terminator
- * Sets type of the returned PIDL to type.
- */
-static LPITEMIDLIST _ILAlloc(PIDLTYPE type, unsigned int size)
-{
- LPITEMIDLIST pidlOut = NULL;
-
- pidlOut = (LPITEMIDLIST)SHAlloc(size + 5);
- if(pidlOut)
- {
- LPPIDLDATA pData;
- LPITEMIDLIST pidlNext;
-
- ZeroMemory(pidlOut, size + 5);
- pidlOut->mkid.cb = size + 3;
-
- pData = _ILGetDataPointer(pidlOut);
- if (pData)
- pData->type = type;
-
- pidlNext = ILGetNext(pidlOut);
- if (pidlNext)
- pidlNext->mkid.cb = 0x00;
- TRACE("-- (pidl=%p, size=%u)\n", pidlOut, size);
- }
-
- return pidlOut;
-}
-
-LPITEMIDLIST _ILCreateDesktop(void)
-{
- LPITEMIDLIST ret;
-
- TRACE("()\n");
- ret = (LPITEMIDLIST)SHAlloc(2);
- if (ret)
- ret->mkid.cb = 0;
- return ret;
-}
-
-LPITEMIDLIST _ILCreateMyComputer(void)
-{
- TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_MyComputer);
-}
-
-LPITEMIDLIST _ILCreateMyDocuments(void)
-{
- TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_MyDocuments);
-}
-
-LPITEMIDLIST _ILCreateIExplore(void)
-{
- TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_Internet);
-}
-
-LPITEMIDLIST _ILCreateControlPanel(void)
-{
- LPITEMIDLIST parent = _ILCreateGuid(PT_GUID, CLSID_MyComputer), ret = NULL;
-
- TRACE("()\n");
- if (parent)
- {
- LPITEMIDLIST cpl = _ILCreateGuid(PT_SHELLEXT, CLSID_ControlPanel);
-
- if (cpl)
- {
- ret = ILCombine(parent, cpl);
- SHFree(cpl);
- }
- SHFree(parent);
- }
- return ret;
-}
-
-LPITEMIDLIST _ILCreatePrinters(void)
-{
- LPITEMIDLIST parent = _ILCreateGuid(PT_GUID, CLSID_MyComputer), ret = NULL;
-
- TRACE("()\n");
- if (parent)
- {
- LPITEMIDLIST printers = _ILCreateGuid(PT_YAGUID, CLSID_Printers);
-
- if (printers)
- {
- ret = ILCombine(parent, printers);
- SHFree(printers);
- }
- SHFree(parent);
- }
- return ret;
-}
-
-LPITEMIDLIST _ILCreateNetwork(void)
-{
- TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_NetworkPlaces);
-}
-
-LPITEMIDLIST _ILCreateBitBucket(void)
-{
- TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_RecycleBin);
-}
-
-LPITEMIDLIST _ILCreateAdminTools(void)
-{
- TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_AdminFolderShortcut); //FIXME
-}
-
-LPITEMIDLIST _ILCreateGuid(PIDLTYPE type, REFIID guid)
-{
- LPITEMIDLIST pidlOut;
-
- if (type == PT_SHELLEXT || type == PT_GUID || type == PT_YAGUID)
- {
- pidlOut = _ILAlloc(type, sizeof(GUIDStruct));
- if (pidlOut)
- {
- LPPIDLDATA pData = _ILGetDataPointer(pidlOut);
-
- pData->u.guid.guid = guid;
- TRACE("-- create GUID-pidl %s\n",
- debugstr_guid(&(pData->u.guid.guid)));
- }
- }
- else
- {
- WARN("%d: invalid type for GUID\n", type);
- pidlOut = NULL;
- }
- return pidlOut;
-}
-
-LPITEMIDLIST _ILCreateGuidFromStrA(LPCSTR szGUID)
-{
- IID iid;
-
- if (FAILED(SHCLSIDFromStringA(szGUID, &iid)))
- {
- ERR("%s is not a GUID\n", szGUID);
- return NULL;
- }
- return _ILCreateGuid(PT_GUID, iid);
-}
-
-LPITEMIDLIST _ILCreateGuidFromStrW(LPCWSTR szGUID)
-{
- IID iid;
-
- if (FAILED(CLSIDFromString((LPOLESTR)szGUID, &iid)))
- {
- ERR("%s is not a GUID\n", debugstr_w(szGUID));
- return NULL;
- }
- return _ILCreateGuid(PT_GUID, iid);
-}
-
-LPITEMIDLIST _ILCreateFromFindDataW( const WIN32_FIND_DATAW *wfd )
-{
- char buff[MAX_PATH + 14 +1]; /* see WIN32_FIND_DATA */
- DWORD len, len1, wlen, alen, cbData;
- LPITEMIDLIST pidl;
- PIDLTYPE type;
-
- if (!wfd)
- return NULL;
-
- TRACE("(%s, %s)\n", debugstr_w(wfd->cAlternateFileName),
debugstr_w(wfd->cFileName));
-
- /* prepare buffer with both names */
- len = WideCharToMultiByte(CP_ACP, 0, wfd->cFileName, -1, buff, MAX_PATH, NULL,
NULL);
- len1 = WideCharToMultiByte(CP_ACP, 0, wfd->cAlternateFileName, -1, buff + len,
sizeof(buff) - len, NULL, NULL);
- alen = len + len1;
-
- type = (wfd->dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ? PT_FOLDER :
PT_VALUE;
-
- wlen = wcslen(wfd->cFileName) + 1;
- cbData = sizeof(FileStruct) - 1 + (alen + (alen & 1)); // Note: szNames field is
initially 1 byte long
- cbData += sizeof(FileStructW) - 1 + wlen * sizeof(WCHAR); // Note: wszName field is
initially 1 byte long
- cbData += sizeof(WORD); // offset to FileStructW
- pidl = _ILAlloc(type, cbData);
- if (pidl)
- {
- LPPIDLDATA pData = _ILGetDataPointer(pidl);
- FileStruct *fs = &pData->u.file;
- FileStructW *fsw;
- WORD *pOffsetW;
-
- FileTimeToDosDateTime( &wfd->ftLastWriteTime, &fs->uFileDate,
&fs->uFileTime);
- fs->dwFileSize = wfd->nFileSizeLow;
- fs->uFileAttribs = wfd->dwFileAttributes;
- memcpy(fs->szNames, buff, alen);
-
- fsw = (FileStructW*)(pData->u.file.szNames + alen + (alen & 0x1));
- fsw->cbLen = sizeof(FileStructW) - 1 + wlen * sizeof(WCHAR) + sizeof(WORD);
- FileTimeToDosDateTime( &wfd->ftCreationTime, &fsw->uCreationDate,
&fsw->uCreationTime);
- FileTimeToDosDateTime( &wfd->ftLastAccessTime,
&fsw->uLastAccessDate, &fsw->uLastAccessTime);
- memcpy(fsw->wszName, wfd->cFileName, wlen * sizeof(WCHAR));
-
- pOffsetW = (WORD*)((LPBYTE)pidl + pidl->mkid.cb - sizeof(WORD));
- *pOffsetW = (LPBYTE)fsw - (LPBYTE)pidl;
- TRACE("-- Set Value: %s\n", debugstr_w(fsw->wszName));
- }
- return pidl;
-
-}
-
-HRESULT _ILCreateFromPathW(LPCWSTR szPath, LPITEMIDLIST* ppidl)
-{
- HANDLE hFile;
- WIN32_FIND_DATAW stffile;
-
- if (!ppidl)
- return E_INVALIDARG;
-
- hFile = FindFirstFileW(szPath, &stffile);
- if (hFile == INVALID_HANDLE_VALUE)
- return HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND);
-
- FindClose(hFile);
-
- *ppidl = _ILCreateFromFindDataW(&stffile);
-
- return *ppidl ? S_OK : E_OUTOFMEMORY;
-}
-
-LPITEMIDLIST _ILCreateDrive(LPCWSTR lpszNew)
-{
- LPITEMIDLIST pidlOut;
-
- TRACE("(%s)\n", debugstr_w(lpszNew));
-
- pidlOut = _ILAlloc(PT_DRIVE, sizeof(DriveStruct));
- if (pidlOut)
- {
- LPSTR pszDest;
-
- pszDest = _ILGetTextPointer(pidlOut);
- if (pszDest)
- {
- strcpy(pszDest, "x:\\");
- pszDest[0] = towupper(lpszNew[0]);
- TRACE("-- create Drive: %s\n", debugstr_a(pszDest));
- }
- }
- return pidlOut;
-}
-
-/**************************************************************************
- * _ILGetDrive()
- *
- * Gets the text for the drive eg. 'c:\'
- *
- * RETURNS
- * strlen (lpszText)
- */
-DWORD _ILGetDrive(LPCITEMIDLIST pidl, LPSTR pOut, UINT uSize)
-{
- TRACE("(%p,%p,%u)\n", pidl, pOut, uSize);
-
- if(_ILIsMyComputer(pidl))
- pidl = ILGetNext(pidl);
-
- if (pidl && _ILIsDrive(pidl))
- return _ILSimpleGetText(pidl, pOut, uSize);
-
- return 0;
-}
-
-/**************************************************************************
- *
- * ### 2. section testing pidls ###
- *
- **************************************************************************
- * _ILIsUnicode()
- * _ILIsDesktop()
- * _ILIsMyComputer()
- * _ILIsSpecialFolder()
- * _ILIsDrive()
- * _ILIsFolder()
- * _ILIsValue()
- * _ILIsPidlSimple()
- */
-BOOL _ILIsUnicode(LPCITEMIDLIST pidl)
-{
- LPPIDLDATA lpPData = _ILGetDataPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- return (pidl && lpPData && PT_VALUEW == lpPData->type);
-}
-
-BOOL _ILIsDesktop(LPCITEMIDLIST pidl)
-{
- TRACE("(%p)\n", pidl);
-
- return pidl && pidl->mkid.cb ? 0 : 1;
-}
-
-BOOL _ILIsMyDocuments(LPCITEMIDLIST pidl)
-{
- IID *iid = _ILGetGUIDPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- if (iid)
- return IsEqualIID(*iid, CLSID_MyDocuments);
- return FALSE;
-}
-
-BOOL _ILIsControlPanel(LPCITEMIDLIST pidl)
-{
- IID *iid = _ILGetGUIDPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- if (iid)
- return IsEqualIID(*iid, CLSID_ControlPanel);
- return FALSE;
-}
-
-BOOL _ILIsNetHood(LPCITEMIDLIST pidl)
-{
- IID *iid = _ILGetGUIDPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- if (iid)
- return IsEqualIID(*iid, CLSID_NetworkPlaces);
- return FALSE;
-}
-
-
-LPITEMIDLIST _ILCreateNetHood(void)
-{
- return _ILCreateGuid(PT_GUID, CLSID_NetworkPlaces);
-}
-
-LPITEMIDLIST _ILCreateFont(void)
-{
- return _ILCreateGuid(PT_GUID, CLSID_FontsFolderShortcut);
-}
-
-BOOL _ILIsMyComputer(LPCITEMIDLIST pidl)
-{
- IID *iid = _ILGetGUIDPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- if (iid)
- return IsEqualIID(*iid, CLSID_MyComputer);
- return FALSE;
-}
-
-BOOL _ILIsPrinter(LPCITEMIDLIST pidl)
-{
- IID *iid = _ILGetGUIDPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- if (iid)
- return IsEqualIID(*iid, CLSID_Printers);
- return FALSE;
-}
-
-BOOL _ILIsBitBucket(LPCITEMIDLIST pidl)
-{
- IID *iid = _ILGetGUIDPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- if (iid)
- return IsEqualIID(*iid, CLSID_RecycleBin);
- return FALSE;
-}
-
-BOOL _ILIsAdminTools(LPCITEMIDLIST pidl)
-{
- IID *iid = _ILGetGUIDPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- if (iid)
- return IsEqualIID(*iid, CLSID_AdminFolderShortcut);
- else
- return FALSE;
-}
-
-BOOL _ILIsSpecialFolder (LPCITEMIDLIST pidl)
-{
- LPPIDLDATA lpPData = _ILGetDataPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- return (pidl && ( (lpPData && (PT_GUID == lpPData->type ||
PT_SHELLEXT == lpPData->type || PT_YAGUID == lpPData->type)) ||
- (pidl && pidl->mkid.cb == 0x00)
- ));
-}
-
-BOOL _ILIsDrive(LPCITEMIDLIST pidl)
-{
- LPPIDLDATA lpPData = _ILGetDataPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- return (pidl && lpPData && (PT_DRIVE == lpPData->type ||
- PT_DRIVE1 == lpPData->type ||
- PT_DRIVE2 == lpPData->type ||
- PT_DRIVE3 == lpPData->type));
-}
-
-BOOL _ILIsFolder(LPCITEMIDLIST pidl)
-{
- LPPIDLDATA lpPData = _ILGetDataPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- return (pidl && lpPData && (PT_FOLDER == lpPData->type ||
PT_FOLDER1 == lpPData->type));
-}
-
-BOOL _ILIsValue(LPCITEMIDLIST pidl)
-{
- LPPIDLDATA lpPData = _ILGetDataPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- return (pidl && lpPData && PT_VALUE == lpPData->type);
-}
-
-BOOL _ILIsCPanelStruct(LPCITEMIDLIST pidl)
-{
- LPPIDLDATA lpPData = _ILGetDataPointer(pidl);
-
- TRACE("(%p)\n", pidl);
-
- return (pidl && lpPData && (lpPData->type == 0));
-}
-
-/**************************************************************************
- * _ILIsPidlSimple
- */
-BOOL _ILIsPidlSimple(LPCITEMIDLIST pidl)
-{
- BOOL ret = TRUE;
-
- if(! _ILIsDesktop(pidl)) /* pidl=NULL or mkid.cb=0 */
- {
- WORD len = pidl->mkid.cb;
- LPCITEMIDLIST pidlnext = (LPCITEMIDLIST) (((const BYTE*)pidl) + len );
-
- if (pidlnext->mkid.cb)
- ret = FALSE;
- }
-
- TRACE("%s\n", ret ? "Yes" : "No");
- return ret;
-}
-
-/**************************************************************************
- *
- * ### 3. section getting values from pidls ###
- */
-
-/**************************************************************************
-* _ILSimpleGetText
-*
-* gets the text for the first item in the pidl (eg. simple pidl)
-*
-* returns the length of the string
-*/
-DWORD _ILSimpleGetText (LPCITEMIDLIST pidl, LPSTR szOut, UINT uOutSize)
-{
- DWORD dwReturn = 0;
- LPSTR szSrc;
- LPWSTR szSrcW;
- GUID const * riid;
- char szTemp[MAX_PATH];
-
- TRACE("(%p %p %x)\n", pidl, szOut, uOutSize);
-
- if (!pidl)
- return 0;
-
- if (szOut)
- *szOut = 0;
-
- if (_ILIsDesktop(pidl))
- {
- /* desktop */
- if (HCR_GetClassNameA(CLSID_ShellDesktop, szTemp, MAX_PATH))
- {
- if (szOut)
- lstrcpynA(szOut, szTemp, uOutSize);
-
- dwReturn = strlen (szTemp);
- }
- }
- else if (( szSrc = _ILGetTextPointer(pidl) ))
- {
- /* filesystem */
- if (szOut)
- lstrcpynA(szOut, szSrc, uOutSize);
-
- dwReturn = strlen(szSrc);
- }
- else if (( szSrcW = _ILGetTextPointerW(pidl) ))
- {
- /* unicode filesystem */
- WideCharToMultiByte(CP_ACP, 0, szSrcW, -1, szTemp, MAX_PATH, NULL, NULL);
-
- if (szOut)
- lstrcpynA(szOut, szTemp, uOutSize);
-
- dwReturn = strlen (szTemp);
- }
- else if (( riid = _ILGetGUIDPointer(pidl) ))
- {
- /* special folder */
- if (HCR_GetClassNameA(*riid, szTemp, MAX_PATH) )
- {
- if (szOut)
- lstrcpynA(szOut, szTemp, uOutSize);
-
- dwReturn = strlen (szTemp);
- }
- }
- else
- {
- ERR("-- no text\n");
- }
-
- TRACE("-- (%p=%s 0x%08x)\n", szOut, debugstr_a(szOut), dwReturn);
- return dwReturn;
-}
-
-/**************************************************************************
-* _ILSimpleGetTextW
-*
-* gets the text for the first item in the pidl (eg. simple pidl)
-*
-* returns the length of the string
-*/
-DWORD _ILSimpleGetTextW (LPCITEMIDLIST pidl, LPWSTR szOut, UINT uOutSize)
-{
- DWORD dwReturn;
- FileStructW *pFileStructW = _ILGetFileStructW(pidl);
-
- TRACE("(%p %p %x)\n", pidl, szOut, uOutSize);
-
- if (pFileStructW) {
- lstrcpynW(szOut, pFileStructW->wszName, uOutSize);
- dwReturn = wcslen(pFileStructW->wszName);
- } else {
- GUID const * riid;
- WCHAR szTemp[MAX_PATH];
- LPSTR szSrc;
- LPWSTR szSrcW;
- dwReturn = 0;
-
- if (!pidl)
- return 0;
-
- if (szOut)
- *szOut = 0;
-
- if (_ILIsDesktop(pidl))
- {
- /* desktop */
- if (HCR_GetClassNameW(CLSID_ShellDesktop, szTemp, MAX_PATH))
- {
- if (szOut)
- lstrcpynW(szOut, szTemp, uOutSize);
-
- dwReturn = wcslen (szTemp);
- }
- }
- else if (( szSrcW = _ILGetTextPointerW(pidl) ))
- {
- /* unicode filesystem */
- if (szOut)
- lstrcpynW(szOut, szSrcW, uOutSize);
-
- dwReturn = wcslen(szSrcW);
- }
- else if (( szSrc = _ILGetTextPointer(pidl) ))
- {
- /* filesystem */
- MultiByteToWideChar(CP_ACP, 0, szSrc, -1, szTemp, MAX_PATH);
-
- if (szOut)
- lstrcpynW(szOut, szTemp, uOutSize);
-
- dwReturn = wcslen (szTemp);
- }
- else if (( riid = _ILGetGUIDPointer(pidl) ))
- {
- /* special folder */
- if ( HCR_GetClassNameW(*riid, szTemp, MAX_PATH) )
- {
- if (szOut)
- lstrcpynW(szOut, szTemp, uOutSize);
-
- dwReturn = wcslen (szTemp);
- }
- }
- else
- {
- ERR("-- no text\n");
- }
- }
-
- TRACE("-- (%p=%s 0x%08x)\n", szOut, debugstr_w(szOut), dwReturn);
- return dwReturn;
-}
-
-/**************************************************************************
- *
- * ### 4. getting pointers to parts of pidls ###
- *
- **************************************************************************
- * _ILGetDataPointer()
- */
-LPPIDLDATA _ILGetDataPointer(LPCITEMIDLIST pidl)
-{
- if(pidl && pidl->mkid.cb != 0x00)
- return (LPPIDLDATA)pidl->mkid.abID;
- return NULL;
-}
-
-/**************************************************************************
- * _ILGetTextPointerW()
- * gets a pointer to the unicode long filename string stored in the pidl
- */
-static LPWSTR _ILGetTextPointerW(LPCITEMIDLIST pidl)
-{
- /* TRACE(pidl,"(pidl%p)\n", pidl);*/
-
- LPPIDLDATA pdata = _ILGetDataPointer(pidl);
-
- if (!pdata)
- return NULL;
-
- switch (pdata->type)
- {
- case PT_GUID:
- case PT_SHELLEXT:
- case PT_YAGUID:
- return NULL;
-
- case PT_DRIVE:
- case PT_DRIVE1:
- case PT_DRIVE2:
- case PT_DRIVE3:
- /*return (LPSTR)&(pdata->u.drive.szDriveName);*/
- return NULL;
-
- case PT_FOLDER:
- case PT_FOLDER1:
- case PT_VALUE:
- case PT_IESPECIAL1:
- case PT_IESPECIAL2:
- /*return (LPSTR)&(pdata->u.file.szNames);*/
- return NULL;
-
- case PT_WORKGRP:
- case PT_COMP:
- case PT_NETWORK:
- case PT_NETPROVIDER:
- case PT_SHARE:
- /*return (LPSTR)&(pdata->u.network.szNames);*/
- return NULL;
-
- case PT_VALUEW:
- return (LPWSTR)pdata->u.file.szNames;
- }
- return NULL;
-}
-
-
-/**************************************************************************
- * _ILGetTextPointer()
- * gets a pointer to the long filename string stored in the pidl
- */
-LPSTR _ILGetTextPointer(LPCITEMIDLIST pidl)
-{
- /* TRACE(pidl,"(pidl%p)\n", pidl);*/
-
- LPPIDLDATA pdata = _ILGetDataPointer(pidl);
-
- if (!pdata)
- return NULL;
-
- switch (pdata->type)
- {
- case PT_GUID:
- case PT_SHELLEXT:
- case PT_YAGUID:
- return NULL;
-
- case PT_DRIVE:
- case PT_DRIVE1:
- case PT_DRIVE2:
- case PT_DRIVE3:
- return pdata->u.drive.szDriveName;
-
- case PT_FOLDER:
- case PT_FOLDER1:
- case PT_VALUE:
- case PT_IESPECIAL1:
- case PT_IESPECIAL2:
- return pdata->u.file.szNames;
-
- case PT_WORKGRP:
- case PT_COMP:
- case PT_NETWORK:
- case PT_NETPROVIDER:
- case PT_SHARE:
- return pdata->u.network.szNames;
-
- case PT_CPLAPPLET:
- return pdata->u.cpanel.szName;
- }
- return NULL;
-}
-
-/**************************************************************************
- * _ILGetSTextPointer()
- * gets a pointer to the short filename string stored in the pidl
- */
-static LPSTR _ILGetSTextPointer(LPCITEMIDLIST pidl)
-{
- /* TRACE(pidl,"(pidl%p)\n", pidl); */
-
- LPPIDLDATA pdata = _ILGetDataPointer(pidl);
-
- if (!pdata)
- return NULL;
-
- switch (pdata->type)
- {
- case PT_FOLDER:
- case PT_VALUE:
- case PT_IESPECIAL1:
- case PT_IESPECIAL2:
- return pdata->u.file.szNames + strlen (pdata->u.file.szNames) + 1;
-
- case PT_WORKGRP:
- return pdata->u.network.szNames + strlen (pdata->u.network.szNames) +
1;
- }
- return NULL;
-}
-
-/**************************************************************************
- * _ILGetGUIDPointer()
- *
- * returns reference to guid stored in some pidls
- */
-IID* _ILGetGUIDPointer(LPCITEMIDLIST pidl)
-{
- LPPIDLDATA pdata = _ILGetDataPointer(pidl);
-
- TRACE("%p\n", pidl);
-
- if (!pdata)
- return NULL;
-
- TRACE("pdata->type 0x%04x\n", pdata->type);
- switch (pdata->type)
- {
- case PT_SHELLEXT:
- case PT_GUID:
- case PT_YAGUID:
- return &(pdata->u.guid.guid);
-
- default:
- TRACE("Unknown pidl type 0x%04x\n", pdata->type);
- break;
- }
- return NULL;
-}
-
-/******************************************************************************
- * _ILGetFileStructW [Internal]
- *
- * Get pointer the a SHITEMID's FileStructW field if present
- *
- * PARAMS
- * pidl [I] The SHITEMID
- *
- * RETURNS
- * Success: Pointer to pidl's FileStructW field.
- * Failure: NULL
- */
-FileStructW* _ILGetFileStructW(LPCITEMIDLIST pidl) {
- FileStructW *pFileStructW;
- WORD cbOffset;
-
- if (!(_ILIsValue(pidl) || _ILIsFolder(pidl)))
- return NULL;
-
- cbOffset = *(const WORD *)((const BYTE *)pidl + pidl->mkid.cb - sizeof(WORD));
- pFileStructW = (FileStructW*)((LPBYTE)pidl + cbOffset);
-
- /* Currently I don't see a fool prove way to figure out if a pidl is for sure of
WinXP
- * style with a FileStructW member. If we switch all our shellfolder-implementations
to
- * the new format, this won't be a problem. For now, we do as many sanity checks
as possible. */
- if (cbOffset & 0x1 || /* FileStructW member is word aligned in the pidl */
- /* FileStructW is positioned after FileStruct */
- cbOffset < sizeof(pidl->mkid.cb) + sizeof(PIDLTYPE) +
sizeof(FileStruct) ||
- /* There has to be enough space at cbOffset in the pidl to hold FileStructW
and cbOffset */
- cbOffset > pidl->mkid.cb - sizeof(cbOffset) - sizeof(FileStructW) ||
- pidl->mkid.cb != cbOffset + pFileStructW->cbLen)
- {
- ERR("Invalid pidl format (cbOffset = %d)!\n", cbOffset);
- return NULL;
- }
-
- return pFileStructW;
-}
-
-/*************************************************************************
- * _ILGetFileDateTime
- *
- * Given the ItemIdList, get the FileTime
- *
- * PARAMS
- * pidl [I] The ItemIDList
- * pFt [I] the resulted FILETIME of the file
- *
- * RETURNS
- * True if Successful
- *
- * NOTES
- *
- */
-BOOL _ILGetFileDateTime(LPCITEMIDLIST pidl, FILETIME *pFt)
-{
- LPPIDLDATA pdata = _ILGetDataPointer(pidl);
-
- if (!pdata)
- return FALSE;
-
- switch (pdata->type)
- {
- case PT_FOLDER:
- case PT_VALUE:
- DosDateTimeToFileTime(pdata->u.file.uFileDate, pdata->u.file.uFileTime,
pFt);
- break;
- default:
- return FALSE;
- }
- return TRUE;
-}
-
-BOOL _ILGetFileDate (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize)
-{
- FILETIME ft, lft;
- SYSTEMTIME time;
- BOOL ret;
-
- if (_ILGetFileDateTime( pidl, &ft ))
- {
- FileTimeToLocalFileTime(&ft, &lft);
- FileTimeToSystemTime (&lft, &time);
-
- ret = GetDateFormatA(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &time, NULL, pOut,
uOutSize);
- if (ret)
- {
- /* Append space + time without seconds */
- pOut[ret-1] = ' ';
- GetTimeFormatA(LOCALE_USER_DEFAULT, TIME_NOSECONDS, &time, NULL,
&pOut[ret], uOutSize - ret);
- }
- }
- else
- {
- pOut[0] = '\0';
- ret = FALSE;
- }
- return ret;
-}
-
-/*************************************************************************
- * _ILGetFileSize
- *
- * Given the ItemIdList, get the FileSize
- *
- * PARAMS
- * pidl [I] The ItemIDList
- * pOut [I] The buffer to save the result
- * uOutsize [I] The size of the buffer
- *
- * RETURNS
- * The FileSize
- *
- * NOTES
- * pOut can be null when no string is needed
- *
- */
-DWORD _ILGetFileSize (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize)
-{
- LPPIDLDATA pdata = _ILGetDataPointer(pidl);
- DWORD dwSize;
-
- if (!pdata)
- return 0;
-
- switch (pdata->type)
- {
- case PT_VALUE:
- dwSize = pdata->u.file.dwFileSize;
- if (pOut)
- StrFormatKBSizeA(dwSize, pOut, uOutSize);
- return dwSize;
- }
- if (pOut)
- *pOut = 0x00;
- return 0;
-}
-
-BOOL _ILGetExtension (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize)
-{
- char szTemp[MAX_PATH];
- const char * pPoint;
- LPCITEMIDLIST pidlTemp = pidl;
-
- TRACE("pidl=%p\n", pidl);
-
- if (!pidl)
- return FALSE;
-
- pidlTemp = ILFindLastID(pidl);
-
- if (!_ILIsValue(pidlTemp))
- return FALSE;
- if (!_ILSimpleGetText(pidlTemp, szTemp, MAX_PATH))
- return FALSE;
-
- pPoint = PathFindExtensionA(szTemp);
-
- if (!*pPoint)
- return FALSE;
-
- pPoint++;
- lstrcpynA(pOut, pPoint, uOutSize);
- TRACE("%s\n", pOut);
-
- return TRUE;
-}
-
-/*************************************************************************
- * _ILGetFileType
- *
- * Given the ItemIdList, get the file type description
- *
- * PARAMS
- * pidl [I] The ItemIDList (simple)
- * pOut [I] The buffer to save the result
- * uOutsize [I] The size of the buffer
- *
- * RETURNS
- * nothing
- *
- * NOTES
- * This function copies as much as possible into the buffer.
- */
-void _ILGetFileType(LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize)
-{
- char sType[64];
-
- if(_ILIsValue(pidl))
- {
- char sTemp[64];
-
- if(uOutSize > 0)
- pOut[0] = 0;
- if (_ILGetExtension (pidl, sType, 64))
- {
- if (HCR_MapTypeToValueA(sType, sTemp, 64, TRUE))
- {
- /* retrieve description */
- if(HCR_MapTypeToValueA(sTemp, pOut, uOutSize, FALSE ))
- return;
- }
- /* display Ext-file as description */
- strcpy(pOut, sType);
- _strupr(pOut);
- /* load localized file string */
- sTemp[0] = '\0';
- if(LoadStringA(shell32_hInstance, IDS_SHV_COLUMN1, sTemp, 64))
- {
- sTemp[63] = '\0';
- strcat(pOut, "-");
- strcat(pOut, sTemp);
- }
- }
- }
- else
- {
- pOut[0] = '\0';
- LoadStringA(shell32_hInstance, IDS_DIRECTORY, pOut, uOutSize);
- /* make sure its null terminated */
- pOut[uOutSize-1] = '\0';
- }
-}
-
-/*************************************************************************
- * _ILGetFileAttributes
- *
- * Given the ItemIdList, get the Attrib string format
- *
- * PARAMS
- * pidl [I] The ItemIDList
- * pOut [I] The buffer to save the result
- * uOutsize [I] The size of the Buffer
- *
- * RETURNS
- * Attributes
- *
- * FIXME
- * return value 0 in case of error is a valid return value
- *
- */
-DWORD _ILGetFileAttributes(LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize)
-{
- LPPIDLDATA pData = _ILGetDataPointer(pidl);
- WORD wAttrib = 0;
- int i;
-
- if (!pData)
- return 0;
-
- switch(pData->type)
- {
- case PT_FOLDER:
- case PT_VALUE:
- wAttrib = pData->u.file.uFileAttribs;
- break;
- }
-
- if(uOutSize >= 6)
- {
- i = 0;
- if(wAttrib & FILE_ATTRIBUTE_READONLY)
- pOut[i++] = 'R';
- if(wAttrib & FILE_ATTRIBUTE_HIDDEN)
- pOut[i++] = 'H';
- if(wAttrib & FILE_ATTRIBUTE_SYSTEM)
- pOut[i++] = 'S';
- if(wAttrib & FILE_ATTRIBUTE_ARCHIVE)
- pOut[i++] = 'A';
- if(wAttrib & FILE_ATTRIBUTE_COMPRESSED)
- pOut[i++] = 'C';
- pOut[i] = 0x00;
- }
- return wAttrib;
-}
-
-/*************************************************************************
- * ILFreeaPidl
- *
- * free a aPidl struct
- */
-void _ILFreeaPidl(LPITEMIDLIST * apidl, UINT cidl)
-{
- UINT i;
-
- if (apidl)
- {
- for (i = 0; i < cidl; i++)
- SHFree(apidl[i]);
- SHFree(apidl);
- }
-}
-
-/*************************************************************************
- * ILCopyaPidl
- *
- * copies an aPidl struct
- */
-LPITEMIDLIST* _ILCopyaPidl(const LPCITEMIDLIST * apidlsrc, UINT cidl)
-{
- UINT i;
- LPITEMIDLIST *apidldest;
-
- apidldest = (LPITEMIDLIST *)SHAlloc(cidl * sizeof(LPITEMIDLIST));
- if (!apidlsrc)
- return NULL;
-
- for (i = 0; i < cidl; i++)
- apidldest[i] = ILClone(apidlsrc[i]);
-
- return apidldest;
-}
-
-/*************************************************************************
- * _ILCopyCidaToaPidl
- *
- * creates aPidl from CIDA
- */
-LPITEMIDLIST* _ILCopyCidaToaPidl(LPITEMIDLIST* pidl, const CIDA * cida)
-{
- UINT i;
- LPITEMIDLIST *dst;
-
- dst = (LPITEMIDLIST *)SHAlloc(cida->cidl * sizeof(LPITEMIDLIST));
- if (!dst)
- return NULL;
-
- if (pidl)
- *pidl = ILClone((LPCITEMIDLIST)(&((const BYTE*)cida)[cida->aoffset[0]]));
-
- for (i = 0; i < cida->cidl; i++)
- dst[i] = ILClone((LPCITEMIDLIST)(&((const BYTE*)cida)[cida->aoffset[i +
1]]));
-
- return dst;
-}
Removed: branches/shell-experiments/dll/win32/shell32/pidl.h
URL:
http://svn.reactos.org/svn/reactos/branches/shell-experiments/dll/win32/she…
==============================================================================
--- branches/shell-experiments/dll/win32/shell32/pidl.h [iso-8859-1] (original)
+++ branches/shell-experiments/dll/win32/shell32/pidl.h (removed)
@@ -1,312 +0,0 @@
-/*
- * internal pidl functions
- *
- * Copyright 1998 Juergen Schmied
- * Copyright 2004 Juan Lang
- *
- * 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
- *
- * NOTES:
- *
- * DO NOT use this definitions outside the shell32.dll !
- *
- * The contents of a pidl should never used from a application
- * directly.
- *
- * Undocumented:
- * MS says: the abID of SHITEMID should be treated as binary data and not
- * be interpreted by applications. Applies to everyone but MS itself.
- * Word95 interprets the contents of abID (Filesize/Date) so we have to go
- * for binary compatibility here.
- */
-
-#ifndef __WINE_PIDL_H
-#define __WINE_PIDL_H
-
-#ifdef __cplusplus
-extern "C" {
-#endif
-
-/*
-* the pidl does cache fileattributes to speed up SHGetAttributes when
-* displaying a big number of files.
-*
-* a pidl of NULL means the desktop
-*
-* The structure of the pidl seems to be a union. The first byte of the
-* PIDLDATA describes the type of pidl.
-*
-* object ! first byte / ! format ! living space
-* ! size
-* ----------------------------------------------------------------
-* my computer 0x1F/20 guid (2) (usual)
-* network 0x1F guid
-* bitbucket 0x1F guid
-* drive 0x23/25 drive (usual)
-* drive 0x25/25 drive (lnk/persistent)
-* drive 0x29/25 drive
-* shell extension 0x2E guid
-* drive 0x2F drive (lnk/persistent)
-* folder/file 0x30 folder/file (1) (lnk/persistent)
-* folder 0x31 folder (usual)
-* valueA 0x32 file (ANSI file name)
-* valueW 0x34 file (Unicode file name)
-* workgroup 0x41 network (3)
-* computer 0x42 network (4)
-* net provider 0x46 network
-* whole network 0x47 network (5)
-* MSITStore 0x61 htmlhlp (7)
-* printers/ras connections 0x70 guid
-* history/favorites 0xb1 file
-* share 0xc3 network (6)
-*
-* guess: the persistent elements are non tracking
-*
-* (1) dummy byte is used, attributes are empty
-* (2) IID_MyComputer = 20D04FE0L-3AEA-1069-A2D8-08002B30309D
-* (3) two strings "workgroup" "Microsoft Network"
-* (4) two strings "\\sirius" "Microsoft Network"
-* (5) one string "Entire Network"
-* (6) two strings "\\sirius\c" "Microsoft Network"
-* (7) contains string "mk:@MSITStore:C:\path\file.chm::/path/filename.htm"
-* GUID 871C5380-42A0-1069-A2EA-08002B30309D
-*/
-
-#define PT_CPLAPPLET 0x00
-#define PT_GUID 0x1F
-#define PT_DRIVE 0x23
-#define PT_DRIVE2 0x25
-#define PT_DRIVE3 0x29
-#define PT_SHELLEXT 0x2E
-#define PT_DRIVE1 0x2F
-#define PT_FOLDER1 0x30
-#define PT_FOLDER 0x31
-#define PT_VALUE 0x32
-#define PT_VALUEW 0x34
-#define PT_WORKGRP 0x41
-#define PT_COMP 0x42
-#define PT_NETPROVIDER 0x46
-#define PT_NETWORK 0x47
-#define PT_IESPECIAL1 0x61
-#define PT_YAGUID 0x70 /* yet another guid.. */
-#define PT_CPEXT 0x71
-#define PT_IESPECIAL2 0xb1
-#define PT_SHARE 0xc3
-
-#include "pshpack1.h"
-typedef BYTE PIDLTYPE;
-
-typedef struct tagPIDLCPanelStruct
-{
- BYTE dummy; /*01 is 0x00 */
- DWORD iconIdx; /*02 negative icon ID */
- WORD offsDispName; /*06*/
- WORD offsComment; /*08*/
- CHAR szName[1]; /*10*/ /* terminated by 0x00, followed by display name and
comment string */
-} PIDLCPanelStruct;
-
-typedef struct tagPIDLFontStruct
-{
- BYTE dummy;
- WORD offsFile;
- WCHAR szName[1];
-} PIDLFontStruct;
-
-typedef struct tagPIDLPrinterStruct
-{
- BYTE dummy;
- DWORD Attributes;
- WORD offsServer;
- WCHAR szName[1];
-} PIDLPrinterStruct;
-
-typedef struct tagPIDLRecycleStruct
-{
- FILETIME LastModification;
- FILETIME DeletionTime;
- ULARGE_INTEGER FileSize;
- ULARGE_INTEGER PhysicalFileSize;
- DWORD Attributes;
- WCHAR szName[1];
-} PIDLRecycleStruct;
-
-typedef struct tagGUIDStruct
-{
- BYTE dummy; /* offset 01 is unknown */
- GUID guid; /* offset 02 */
-} GUIDStruct;
-
-typedef struct tagDriveStruct
-{
- CHAR szDriveName[20]; /*01*/
- WORD unknown; /*21*/
-} DriveStruct;
-
-typedef struct tagFileStruct
-{
- BYTE dummy; /*01 is 0x00 for files or dirs */
- DWORD dwFileSize; /*02*/
- WORD uFileDate; /*06*/
- WORD uFileTime; /*08*/
- WORD uFileAttribs; /*10*/
- CHAR szNames[1]; /*12*/
- /* Here are coming two strings. The first is the long name.
- The second the dos name when needed or just 0x00 */
-} FileStruct;
-
-/* At least on WinXP, this struct is appended with 2-byte-alignment to FileStruct. There
follows
- * a WORD member after the wszName string, which gives the offset from the beginning of
the PIDL
- * to the FileStructW member. */
-typedef struct tagFileStructW {
- WORD cbLen;
- BYTE dummy1[6];
- WORD uCreationDate;
- WORD uCreationTime;
- WORD uLastAccessDate;
- WORD uLastAccessTime;
- BYTE dummy2[4];
- WCHAR wszName[1];
-} FileStructW;
-
-typedef struct tagValueW
-{
- WCHAR name[1];
-} ValueWStruct;
-
-typedef struct tagPIDLDATA
-{ PIDLTYPE type; /*00*/
- union
- {
- struct tagGUIDStruct guid;
- struct tagDriveStruct drive;
- struct tagFileStruct file;
- struct
- { WORD dummy; /*01*/
- CHAR szNames[1]; /*03*/
- } network;
- struct
- { WORD dummy; /*01*/
- DWORD dummy1; /*02*/
- CHAR szName[1]; /*06*/ /* terminated by 0x00 0x00 */
- } htmlhelp;
- struct tagPIDLCPanelStruct cpanel;
- struct tagValueW valueW;
- struct tagPIDLFontStruct cfont;
- struct tagPIDLPrinterStruct cprinter;
- struct tagPIDLRecycleStruct crecycle;
- } u;
-} PIDLDATA, *LPPIDLDATA;
-#include "poppack.h"
-
-/*
- * getting special values from simple pidls
- */
-DWORD _ILSimpleGetText (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize);
-DWORD _ILSimpleGetTextW (LPCITEMIDLIST pidl, LPWSTR pOut, UINT uOutSize);
-BOOL _ILGetFileDate (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize);
-DWORD _ILGetFileSize (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize);
-BOOL _ILGetExtension (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize);
-void _ILGetFileType (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize);
-DWORD _ILGetFileAttributes (LPCITEMIDLIST pidl, LPSTR pOut, UINT uOutSize);
-
-BOOL _ILGetFileDateTime (LPCITEMIDLIST pidl, FILETIME *ft);
-DWORD _ILGetDrive (LPCITEMIDLIST, LPSTR, UINT);
-
-/*
- * testing simple pidls
- */
-BOOL _ILIsUnicode (LPCITEMIDLIST pidl);
-BOOL _ILIsDesktop (LPCITEMIDLIST pidl);
-BOOL _ILIsMyComputer (LPCITEMIDLIST pidl);
-BOOL _ILIsPrinter (LPCITEMIDLIST pidl);
-BOOL _ILIsMyDocuments (LPCITEMIDLIST pidl);
-BOOL _ILIsControlPanel (LPCITEMIDLIST pidl);
-BOOL _ILIsBitBucket (LPCITEMIDLIST pidl);
-BOOL _ILIsAdminTools (LPCITEMIDLIST pidl);
-BOOL _ILIsNetHood (LPCITEMIDLIST pidl);
-BOOL _ILIsDrive (LPCITEMIDLIST pidl);
-BOOL _ILIsFolder (LPCITEMIDLIST pidl);
-BOOL _ILIsValue (LPCITEMIDLIST pidl);
-BOOL _ILIsSpecialFolder (LPCITEMIDLIST pidl);
-BOOL _ILIsPidlSimple (LPCITEMIDLIST pidl);
-BOOL _ILIsCPanelStruct (LPCITEMIDLIST pidl);
-static __inline
-BOOL _ILIsEqualSimple (LPCITEMIDLIST pidlA, LPCITEMIDLIST pidlB)
-{
- return (pidlA->mkid.cb > 0 && !memcmp(pidlA, pidlB, pidlA->mkid.cb))
||
- (!pidlA->mkid.cb && !pidlB->mkid.cb);
-}
-static __inline
-BOOL _ILIsEmpty (LPCITEMIDLIST pidl) { return _ILIsDesktop(pidl); }
-
-/*
- * simple pidls
- */
-
-/* Creates a PIDL with guid format and type type, which must be one of PT_GUID,
- * PT_SHELLEXT, or PT_YAGUID.
- */
-LPITEMIDLIST _ILCreateGuid(PIDLTYPE type, REFIID guid);
-
-/* Like _ILCreateGuid, but using the string szGUID. */
-LPITEMIDLIST _ILCreateGuidFromStrA(LPCSTR szGUID);
-LPITEMIDLIST _ILCreateGuidFromStrW(LPCWSTR szGUID);
-
-/* Commonly used PIDLs representing file system objects. */
-LPITEMIDLIST _ILCreateDesktop (void);
-LPITEMIDLIST _ILCreateFromFindDataW(const WIN32_FIND_DATAW *stffile);
-HRESULT _ILCreateFromPathW (LPCWSTR szPath, LPITEMIDLIST* ppidl);
-
-/* Other helpers */
-LPITEMIDLIST _ILCreateMyComputer (void);
-LPITEMIDLIST _ILCreateMyDocuments (void);
-LPITEMIDLIST _ILCreateIExplore (void);
-LPITEMIDLIST _ILCreateControlPanel (void);
-LPITEMIDLIST _ILCreatePrinters (void);
-LPITEMIDLIST _ILCreateNetwork (void);
-LPITEMIDLIST _ILCreateNetHood (void);
-LPITEMIDLIST _ILCreateAdminTools (void);
-LPITEMIDLIST _ILCreateFont (void);
-LPITEMIDLIST _ILCreateBitBucket (void);
-LPITEMIDLIST _ILCreateDrive (LPCWSTR);
-
-/*
- * helper functions (getting struct-pointer)
- */
-LPPIDLDATA _ILGetDataPointer (LPCITEMIDLIST);
-LPSTR _ILGetTextPointer (LPCITEMIDLIST);
-IID *_ILGetGUIDPointer (LPCITEMIDLIST pidl);
-FileStructW *_ILGetFileStructW (LPCITEMIDLIST pidl);
-
-/*
- * debug helper
- */
-void pdump (LPCITEMIDLIST pidl);
-BOOL pcheck (LPCITEMIDLIST pidl);
-
-/*
- * aPidl helper
- */
-void _ILFreeaPidl(LPITEMIDLIST * apidl, UINT cidl);
-LPITEMIDLIST * _ILCopyaPidl(const LPCITEMIDLIST * apidlsrc, UINT cidl);
-LPITEMIDLIST * _ILCopyCidaToaPidl(LPITEMIDLIST* pidl, const CIDA * cida);
-
-BOOL WINAPI ILGetDisplayNameExW(LPSHELLFOLDER psf, LPCITEMIDLIST pidl, LPWSTR path, DWORD
type);
-
-#ifdef __cplusplus
-} /* extern "C" */
-#endif
-
-#endif /* __WINE_PIDL_H */
Modified: branches/shell-experiments/dll/win32/shell32/precomp.h
URL:
http://svn.reactos.org/svn/reactos/branches/shell-experiments/dll/win32/she…
==============================================================================
--- branches/shell-experiments/dll/win32/shell32/precomp.h [iso-8859-1] (original)
+++ branches/shell-experiments/dll/win32/shell32/precomp.h [iso-8859-1] Mon Nov 3
19:50:36 2014
@@ -34,7 +34,7 @@
//#include "base/shell/explorer-new/todo.h"
//#include "dlgs.h"
-#include "pidl.h"
+#include "wine/pidl.h"
#include "debughlp.h"
#include "undocshell.h"
#include "wine/shell32_main.h"
Copied: branches/shell-experiments/dll/win32/shell32/wine/pidl.c (from r65228,
branches/shell-experiments/dll/win32/shell32/pidl.cpp)
URL:
http://svn.reactos.org/svn/reactos/branches/shell-experiments/dll/win32/she…
==============================================================================
--- branches/shell-experiments/dll/win32/shell32/pidl.cpp [iso-8859-1] (original)
+++ branches/shell-experiments/dll/win32/shell32/wine/pidl.c [iso-8859-1] Mon Nov 3
19:50:36 2014
@@ -22,7 +22,25 @@
*
*/
-#include "precomp.h"
+#include <wine/config.h>
+
+#define WIN32_NO_STATUS
+#define _INC_WINDOWS
+#define COBJMACROS
+#define NONAMELESSUNION
+#define NONAMELESSSTRUCT
+
+#include <windef.h>
+#include <winbase.h>
+#include <shlobj.h>
+#include <undocshell.h>
+#include <shlwapi.h>
+#include <shlguid_undoc.h>
+#include <wine/debug.h>
+
+#include "pidl.h"
+#include "shell32_main.h"
+#include "shresdef.h"
WINE_DEFAULT_DEBUG_CHANNEL(pidl);
WINE_DECLARE_DEBUG_CHANNEL(shell);
@@ -70,8 +88,7 @@
BOOL WINAPI ILGetDisplayNameExW(IShellFolder * psf, LPCITEMIDLIST pidl, LPWSTR path,
DWORD type)
{
- CComPtr<IShellFolder> psfParent;
- CComPtr<IShellFolder> lsf = psf;
+ LPSHELLFOLDER psfParent, lsf = psf;
HRESULT ret = NO_ERROR;
LPCITEMIDLIST pidllast;
STRRET strret;
@@ -109,7 +126,7 @@
}
if (!*(const WORD*)pidl || type == ILGDN_FORPARSING)
{
- ret = lsf->GetDisplayNameOf(pidl, flag, &strret);
+ ret = IShellFolder_GetDisplayNameOf(lsf, pidl, flag, &strret);
if (SUCCEEDED(ret))
{
if(!StrRetToStrNW(path, MAX_PATH, &strret, pidl))
@@ -118,10 +135,10 @@
}
else
{
- ret = SHBindToParent(pidl, IID_PPV_ARG(IShellFolder, &psfParent),
&pidllast);
+ ret = SHBindToParent(pidl, &IID_IShellFolder, (LPVOID*)&psfParent,
&pidllast);
if (SUCCEEDED(ret))
{
- ret = psfParent->GetDisplayNameOf(pidllast, flag, &strret);
+ ret = IShellFolder_GetDisplayNameOf(psfParent, pidllast, flag,
&strret);
if (SUCCEEDED(ret))
{
if(!StrRetToStrNW(path, MAX_PATH, &strret, pidllast))
@@ -273,15 +290,15 @@
SHFree(*ppPidl);
*ppPidl = NULL;
- pStream->AddRef ();
-
- if (SUCCEEDED(pStream->Read(&wLen, 2, &dwBytesRead)))
+ IStream_AddRef (pStream);
+
+ if (SUCCEEDED(IStream_Read(pStream, &wLen, 2, &dwBytesRead)))
{
TRACE("PIDL length is %d\n", wLen);
if (wLen != 0)
{
- *ppPidl = (LPITEMIDLIST)SHAlloc(wLen);
- if (SUCCEEDED(pStream->Read(*ppPidl , wLen, &dwBytesRead)))
+ *ppPidl = SHAlloc (wLen);
+ if (SUCCEEDED(IStream_Read(pStream, *ppPidl , wLen, &dwBytesRead)))
{
TRACE("Stream read OK\n");
ret = S_OK;
@@ -308,7 +325,7 @@
*ppPidl = NULL;
}
- pStream->Release ();
+ IStream_Release (pStream);
TRACE("done\n");
return ret;
}
@@ -326,16 +343,16 @@
TRACE_(shell)("%p %p\n", pStream, pPidl);
- pStream->AddRef ();
+ IStream_AddRef (pStream);
wLen = ILGetSize(pPidl);
- if (SUCCEEDED(pStream->Write(&wLen, 2, NULL)))
- {
- if (SUCCEEDED(pStream->Write(pPidl, wLen, NULL)))
+ if (SUCCEEDED(IStream_Write(pStream, &wLen, 2, NULL)))
+ {
+ if (SUCCEEDED(IStream_Write(pStream, pPidl, wLen, NULL)))
ret = S_OK;
}
- pStream->Release ();
+ IStream_Release (pStream);
return ret;
}
@@ -371,14 +388,14 @@
HRESULT WINAPI SHILCreateFromPathW(LPCWSTR path, LPITEMIDLIST * ppidl, DWORD *
attributes)
{
- CComPtr<IShellFolder> sf;
+ LPSHELLFOLDER sf;
DWORD pchEaten;
HRESULT ret = E_FAIL;
TRACE_(shell)("%s %p 0x%08x\n", debugstr_w(path), ppidl, attributes ?
*attributes : 0);
if (SUCCEEDED (SHGetDesktopFolder(&sf)))
- ret = sf->ParseDisplayName(0, NULL, (LPWSTR)path, &pchEaten, ppidl,
attributes);
+ ret = IShellFolder_ParseDisplayName(sf, 0, NULL, (LPWSTR)path, &pchEaten,
ppidl, attributes);
return ret;
}
@@ -681,10 +698,11 @@
*/
HRESULT WINAPI SHGetRealIDL(IShellFolder * lpsf, LPCITEMIDLIST pidlSimple, LPITEMIDLIST
*pidlReal)
{
- CComPtr<IDataObject> pDataObj;
+ IDataObject* pDataObj;
HRESULT hr;
- hr = lpsf->GetUIObjectOf(0, 1, &pidlSimple, IID_NULL_PPV_ARG(IDataObject,
&pDataObj));
+ hr = IShellFolder_GetUIObjectOf(lpsf, 0, 1, &pidlSimple,
+ &IID_IDataObject, 0, (LPVOID*)&pDataObj);
if (SUCCEEDED(hr))
{
STGMEDIUM medium;
@@ -696,12 +714,12 @@
fmt.lindex = -1;
fmt.tymed = TYMED_HGLOBAL;
- hr = pDataObj->GetData(&fmt, &medium);
+ hr = IDataObject_GetData(pDataObj, &fmt, &medium);
if (SUCCEEDED(hr))
{
/*assert(pida->cidl==1);*/
- LPIDA pida = (LPIDA)GlobalLock(medium.hGlobal);
+ LPIDA pida = (LPIDA)GlobalLock(medium.u.hGlobal);
LPCITEMIDLIST pidl_folder = (LPCITEMIDLIST) ((LPBYTE)pida +
pida->aoffset[0]);
LPCITEMIDLIST pidl_child = (LPCITEMIDLIST) ((LPBYTE)pida +
pida->aoffset[1]);
@@ -711,8 +729,8 @@
if (!*pidlReal)
hr = E_OUTOFMEMORY;
- GlobalUnlock(medium.hGlobal);
- GlobalFree(medium.hGlobal);
+ GlobalUnlock(medium.u.hGlobal);
+ GlobalFree(medium.u.hGlobal);
}
}
@@ -966,8 +984,8 @@
static HRESULT _ILParsePathW(LPCWSTR path, LPWIN32_FIND_DATAW lpFindFile,
BOOL bBindCtx, LPITEMIDLIST *ppidl, LPDWORD prgfInOut)
{
- CComPtr<IShellFolder> pSF;
- CComPtr<IBindCtx> pBC;
+ LPSHELLFOLDER pSF = NULL;
+ LPBC pBC = NULL;
HRESULT ret;
TRACE("%s %p %d (%p)->%p (%p)->0x%x\n", debugstr_w(path), lpFindFile,
bBindCtx,
@@ -983,7 +1001,7 @@
if (SUCCEEDED(ret))
{
- ret = pSF->ParseDisplayName(0, pBC, (LPOLESTR)path, NULL, ppidl, prgfInOut);
+ ret = IShellFolder_ParseDisplayName(pSF, 0, pBC, (LPOLESTR)path, NULL, ppidl,
prgfInOut);
}
if (FAILED(ret) && ppidl)
@@ -1209,7 +1227,7 @@
{
HRESULT hr;
LPCITEMIDLIST pidlLast;
- CComPtr<IShellFolder> psfFolder;
+ LPSHELLFOLDER psfFolder;
DWORD dwAttributes;
STRRET strret;
@@ -1220,7 +1238,7 @@
if (!pidl)
return FALSE;
- hr = SHBindToParent(pidl, IID_PPV_ARG(IShellFolder, &psfFolder), &pidlLast);
+ hr = SHBindToParent(pidl, &IID_IShellFolder, (VOID**)&psfFolder,
&pidlLast);
if (FAILED(hr))
{
ERR("SHBindToParent failed: %x\n", hr);
@@ -1228,14 +1246,14 @@
}
dwAttributes = SFGAO_FILESYSTEM;
- hr = psfFolder->GetAttributesOf(1, &pidlLast, &dwAttributes);
+ hr = IShellFolder_GetAttributesOf(psfFolder, 1, &pidlLast, &dwAttributes);
if (FAILED(hr) || !(dwAttributes & SFGAO_FILESYSTEM))
{
WARN("Wrong dwAttributes or GetAttributesOf failed: %x\n", hr);
return FALSE;
}
- hr = psfFolder->GetDisplayNameOf(pidlLast, SHGDN_FORPARSING, &strret);
+ hr = IShellFolder_GetDisplayNameOf(psfFolder, pidlLast, SHGDN_FORPARSING,
&strret);
if (FAILED(hr)) return FALSE;
hr = StrRetToBufW(&strret, pidlLast, pszPath, MAX_PATH);
@@ -1249,8 +1267,8 @@
*/
HRESULT WINAPI SHBindToParent(LPCITEMIDLIST pidl, REFIID riid, LPVOID *ppv, LPCITEMIDLIST
*ppidlLast)
{
- CComPtr<IShellFolder> psfDesktop;
- HRESULT hr = E_FAIL;
+ IShellFolder * psfDesktop;
+ HRESULT hr=E_FAIL;
TRACE_(shell)("pidl=%p\n", pidl);
pdump(pidl);
@@ -1269,13 +1287,13 @@
if (_ILIsPidlSimple(pidl))
{
/* we are on desktop level */
- hr = psfDesktop->QueryInterface(riid, ppv);
+ hr = IShellFolder_QueryInterface(psfDesktop, riid, ppv);
}
else
{
LPITEMIDLIST pidlParent = ILClone(pidl);
ILRemoveLastID(pidlParent);
- hr = psfDesktop->BindToObject(pidlParent, NULL, riid, ppv);
+ hr = IShellFolder_BindToObject(psfDesktop, pidlParent, NULL, riid, ppv);
SHFree (pidlParent);
}
@@ -1341,29 +1359,29 @@
LPITEMIDLIST _ILCreateMyComputer(void)
{
TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_MyComputer);
+ return _ILCreateGuid(PT_GUID, &CLSID_MyComputer);
}
LPITEMIDLIST _ILCreateMyDocuments(void)
{
TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_MyDocuments);
+ return _ILCreateGuid(PT_GUID, &CLSID_MyDocuments);
}
LPITEMIDLIST _ILCreateIExplore(void)
{
TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_Internet);
+ return _ILCreateGuid(PT_GUID, &CLSID_Internet);
}
LPITEMIDLIST _ILCreateControlPanel(void)
{
- LPITEMIDLIST parent = _ILCreateGuid(PT_GUID, CLSID_MyComputer), ret = NULL;
+ LPITEMIDLIST parent = _ILCreateGuid(PT_GUID, &CLSID_MyComputer), ret = NULL;
TRACE("()\n");
if (parent)
{
- LPITEMIDLIST cpl = _ILCreateGuid(PT_SHELLEXT, CLSID_ControlPanel);
+ LPITEMIDLIST cpl = _ILCreateGuid(PT_SHELLEXT, &CLSID_ControlPanel);
if (cpl)
{
@@ -1377,12 +1395,12 @@
LPITEMIDLIST _ILCreatePrinters(void)
{
- LPITEMIDLIST parent = _ILCreateGuid(PT_GUID, CLSID_MyComputer), ret = NULL;
+ LPITEMIDLIST parent = _ILCreateGuid(PT_GUID, &CLSID_MyComputer), ret = NULL;
TRACE("()\n");
if (parent)
{
- LPITEMIDLIST printers = _ILCreateGuid(PT_YAGUID, CLSID_Printers);
+ LPITEMIDLIST printers = _ILCreateGuid(PT_YAGUID, &CLSID_Printers);
if (printers)
{
@@ -1397,19 +1415,19 @@
LPITEMIDLIST _ILCreateNetwork(void)
{
TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_NetworkPlaces);
+ return _ILCreateGuid(PT_GUID, &CLSID_NetworkPlaces);
}
LPITEMIDLIST _ILCreateBitBucket(void)
{
TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_RecycleBin);
+ return _ILCreateGuid(PT_GUID, &CLSID_RecycleBin);
}
LPITEMIDLIST _ILCreateAdminTools(void)
{
TRACE("()\n");
- return _ILCreateGuid(PT_GUID, CLSID_AdminFolderShortcut); //FIXME
+ return _ILCreateGuid(PT_GUID, &CLSID_AdminFolderShortcut); //FIXME
}
LPITEMIDLIST _ILCreateGuid(PIDLTYPE type, REFIID guid)
@@ -1423,7 +1441,7 @@
{
LPPIDLDATA pData = _ILGetDataPointer(pidlOut);
- pData->u.guid.guid = guid;
+ pData->u.guid.guid = *guid;
TRACE("-- create GUID-pidl %s\n",
debugstr_guid(&(pData->u.guid.guid)));
}
@@ -1445,7 +1463,7 @@
ERR("%s is not a GUID\n", szGUID);
return NULL;
}
- return _ILCreateGuid(PT_GUID, iid);
+ return _ILCreateGuid(PT_GUID, &iid);
}
LPITEMIDLIST _ILCreateGuidFromStrW(LPCWSTR szGUID)
@@ -1457,7 +1475,7 @@
ERR("%s is not a GUID\n", debugstr_w(szGUID));
return NULL;
}
- return _ILCreateGuid(PT_GUID, iid);
+ return _ILCreateGuid(PT_GUID, &iid);
}
LPITEMIDLIST _ILCreateFromFindDataW( const WIN32_FIND_DATAW *wfd )
@@ -1609,7 +1627,7 @@
TRACE("(%p)\n", pidl);
if (iid)
- return IsEqualIID(*iid, CLSID_MyDocuments);
+ return IsEqualIID(iid, &CLSID_MyDocuments);
return FALSE;
}
@@ -1620,7 +1638,7 @@
TRACE("(%p)\n", pidl);
if (iid)
- return IsEqualIID(*iid, CLSID_ControlPanel);
+ return IsEqualIID(iid, &CLSID_ControlPanel);
return FALSE;
}
@@ -1631,19 +1649,19 @@
TRACE("(%p)\n", pidl);
if (iid)
- return IsEqualIID(*iid, CLSID_NetworkPlaces);
+ return IsEqualIID(iid, &CLSID_NetworkPlaces);
return FALSE;
}
LPITEMIDLIST _ILCreateNetHood(void)
{
- return _ILCreateGuid(PT_GUID, CLSID_NetworkPlaces);
+ return _ILCreateGuid(PT_GUID, &CLSID_NetworkPlaces);
}
LPITEMIDLIST _ILCreateFont(void)
{
- return _ILCreateGuid(PT_GUID, CLSID_FontsFolderShortcut);
+ return _ILCreateGuid(PT_GUID, &CLSID_FontsFolderShortcut);
}
BOOL _ILIsMyComputer(LPCITEMIDLIST pidl)
@@ -1653,7 +1671,7 @@
TRACE("(%p)\n", pidl);
if (iid)
- return IsEqualIID(*iid, CLSID_MyComputer);
+ return IsEqualIID(iid, &CLSID_MyComputer);
return FALSE;
}
@@ -1664,7 +1682,7 @@
TRACE("(%p)\n", pidl);
if (iid)
- return IsEqualIID(*iid, CLSID_Printers);
+ return IsEqualIID(iid, &CLSID_Printers);
return FALSE;
}
@@ -1675,7 +1693,7 @@
TRACE("(%p)\n", pidl);
if (iid)
- return IsEqualIID(*iid, CLSID_RecycleBin);
+ return IsEqualIID(iid, &CLSID_RecycleBin);
return FALSE;
}
@@ -1686,7 +1704,7 @@
TRACE("(%p)\n", pidl);
if (iid)
- return IsEqualIID(*iid, CLSID_AdminFolderShortcut);
+ return IsEqualIID(iid, &CLSID_AdminFolderShortcut);
else
return FALSE;
}
@@ -1792,7 +1810,7 @@
if (_ILIsDesktop(pidl))
{
/* desktop */
- if (HCR_GetClassNameA(CLSID_ShellDesktop, szTemp, MAX_PATH))
+ if (HCR_GetClassNameA(&CLSID_ShellDesktop, szTemp, MAX_PATH))
{
if (szOut)
lstrcpynA(szOut, szTemp, uOutSize);
@@ -1821,7 +1839,7 @@
else if (( riid = _ILGetGUIDPointer(pidl) ))
{
/* special folder */
- if (HCR_GetClassNameA(*riid, szTemp, MAX_PATH) )
+ if (HCR_GetClassNameA(riid, szTemp, MAX_PATH) )
{
if (szOut)
lstrcpynA(szOut, szTemp, uOutSize);
@@ -1871,7 +1889,7 @@
if (_ILIsDesktop(pidl))
{
/* desktop */
- if (HCR_GetClassNameW(CLSID_ShellDesktop, szTemp, MAX_PATH))
+ if (HCR_GetClassNameW(&CLSID_ShellDesktop, szTemp, MAX_PATH))
{
if (szOut)
lstrcpynW(szOut, szTemp, uOutSize);
@@ -1900,7 +1918,7 @@
else if (( riid = _ILGetGUIDPointer(pidl) ))
{
/* special folder */
- if ( HCR_GetClassNameW(*riid, szTemp, MAX_PATH) )
+ if ( HCR_GetClassNameW(riid, szTemp, MAX_PATH) )
{
if (szOut)
lstrcpynW(szOut, szTemp, uOutSize);