mirror of
git://source.winehq.org/git/wine.git
synced 2024-10-31 11:43:31 +00:00
1909 lines
61 KiB
C
1909 lines
61 KiB
C
|
|
/*
|
|
* file system folder
|
|
*
|
|
* Copyright 1997 Marcus Meissner
|
|
* Copyright 1998, 1999, 2002 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
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
|
|
#define COBJMACROS
|
|
#include "winerror.h"
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "winreg.h"
|
|
#include "wingdi.h"
|
|
#include "winuser.h"
|
|
|
|
#include "ole2.h"
|
|
#include "shlguid.h"
|
|
|
|
#include "pidl.h"
|
|
#include "shell32_main.h"
|
|
#include "shresdef.h"
|
|
#include "shlwapi.h"
|
|
#include "shellfolder.h"
|
|
#include "wine/debug.h"
|
|
#include "debughlp.h"
|
|
#include "shfldr.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL (shell);
|
|
|
|
/***********************************************************************
|
|
* IShellFolder implementation
|
|
*/
|
|
|
|
typedef struct {
|
|
IUnknown IUnknown_inner;
|
|
LONG ref;
|
|
IShellFolder2 IShellFolder2_iface;
|
|
IPersistFolder3 IPersistFolder3_iface;
|
|
IPersistPropertyBag IPersistPropertyBag_iface;
|
|
IDropTarget IDropTarget_iface;
|
|
ISFHelper ISFHelper_iface;
|
|
IUnknown *outer_unk;
|
|
|
|
const CLSID *pclsid;
|
|
|
|
/* both paths are parsible from the desktop */
|
|
LPWSTR sPathTarget; /* complete path to target used for enumeration and ChangeNotify */
|
|
|
|
LPITEMIDLIST pidlRoot; /* absolute pidl */
|
|
DWORD drop_effects_mask;
|
|
} IGenericSFImpl;
|
|
|
|
static UINT cfShellIDList;
|
|
|
|
static inline IGenericSFImpl *impl_from_IUnknown(IUnknown *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, IGenericSFImpl, IUnknown_inner);
|
|
}
|
|
|
|
static inline IGenericSFImpl *impl_from_IShellFolder2(IShellFolder2 *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, IGenericSFImpl, IShellFolder2_iface);
|
|
}
|
|
|
|
static inline IGenericSFImpl *impl_from_IPersistFolder3(IPersistFolder3 *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, IGenericSFImpl, IPersistFolder3_iface);
|
|
}
|
|
|
|
static inline IGenericSFImpl *impl_from_IPersistPropertyBag(IPersistPropertyBag *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, IGenericSFImpl, IPersistPropertyBag_iface);
|
|
}
|
|
|
|
static inline IGenericSFImpl *impl_from_IDropTarget(IDropTarget *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, IGenericSFImpl, IDropTarget_iface);
|
|
}
|
|
|
|
static inline IGenericSFImpl *impl_from_ISFHelper(ISFHelper *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, IGenericSFImpl, ISFHelper_iface);
|
|
}
|
|
|
|
/**************************************************************************
|
|
* inner IUnknown
|
|
*/
|
|
static HRESULT WINAPI IUnknown_fnQueryInterface(IUnknown *iface, REFIID riid, void **ppvObj)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IUnknown(iface);
|
|
|
|
TRACE("(%p)->(%s,%p)\n", This, shdebugstr_guid(riid), ppvObj);
|
|
|
|
*ppvObj = NULL;
|
|
|
|
if (IsEqualIID (riid, &IID_IUnknown))
|
|
*ppvObj = &This->IUnknown_inner;
|
|
else if (IsEqualIID(riid, &IID_IShellFolder) || IsEqualIID(riid, &IID_IShellFolder2))
|
|
*ppvObj = &This->IShellFolder2_iface;
|
|
else if (IsEqualIID(riid, &IID_IPersist) || IsEqualIID(riid, &IID_IPersistFolder) ||
|
|
IsEqualIID(riid, &IID_IPersistFolder2) || IsEqualIID(riid, &IID_IPersistFolder3))
|
|
*ppvObj = &This->IPersistFolder3_iface;
|
|
else if (IsEqualIID(&IID_IPersistPropertyBag, riid))
|
|
*ppvObj = &This->IPersistPropertyBag_iface;
|
|
else if (IsEqualIID (riid, &IID_ISFHelper))
|
|
*ppvObj = &This->ISFHelper_iface;
|
|
else if (IsEqualIID (riid, &IID_IDropTarget)) {
|
|
*ppvObj = &This->IDropTarget_iface;
|
|
if (!cfShellIDList) cfShellIDList = RegisterClipboardFormatW(CFSTR_SHELLIDLISTW);
|
|
}
|
|
|
|
if (*ppvObj) {
|
|
IUnknown_AddRef((IUnknown *)*ppvObj);
|
|
TRACE ("-- Interface = %p\n", *ppvObj);
|
|
return S_OK;
|
|
}
|
|
TRACE ("-- Interface: E_NOINTERFACE\n");
|
|
return E_NOINTERFACE;
|
|
}
|
|
|
|
static ULONG WINAPI IUnknown_fnAddRef(IUnknown *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IUnknown(iface);
|
|
ULONG ref = InterlockedIncrement(&This->ref);
|
|
|
|
TRACE("(%p) ref=%ld\n", This, ref);
|
|
|
|
return ref;
|
|
}
|
|
|
|
static ULONG WINAPI IUnknown_fnRelease(IUnknown *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IUnknown(iface);
|
|
ULONG ref = InterlockedDecrement(&This->ref);
|
|
|
|
TRACE("(%p) ref=%ld\n", This, ref);
|
|
|
|
if (!ref) {
|
|
TRACE("-- destroying IShellFolder(%p)\n", This);
|
|
|
|
SHFree(This->pidlRoot);
|
|
SHFree(This->sPathTarget);
|
|
LocalFree(This);
|
|
}
|
|
return ref;
|
|
}
|
|
|
|
static const IUnknownVtbl unkvt =
|
|
{
|
|
IUnknown_fnQueryInterface,
|
|
IUnknown_fnAddRef,
|
|
IUnknown_fnRelease,
|
|
};
|
|
|
|
static const shvheader GenericSFHeader[] =
|
|
{
|
|
{ &FMTID_Storage, PID_STG_NAME, IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15 },
|
|
{ &FMTID_Storage, PID_STG_SIZE, IDS_SHV_COLUMN2, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 },
|
|
{ &FMTID_Storage, PID_STG_STORAGETYPE, IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10 },
|
|
{ &FMTID_Storage, PID_STG_WRITETIME, IDS_SHV_COLUMN4, SHCOLSTATE_TYPE_DATE | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 12 },
|
|
{ &FMTID_Storage, PID_STG_ATTRIBUTES, IDS_SHV_COLUMN5, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 5 },
|
|
};
|
|
|
|
#define GENERICSHELLVIEWCOLUMNS 5
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnQueryInterface
|
|
*/
|
|
static HRESULT WINAPI IShellFolder_fnQueryInterface(IShellFolder2 *iface, REFIID riid,
|
|
void **ppvObj)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
return IUnknown_QueryInterface(This->outer_unk, riid, ppvObj);
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_AddRef
|
|
*/
|
|
static ULONG WINAPI IShellFolder_fnAddRef(IShellFolder2 *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
return IUnknown_AddRef(This->outer_unk);
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnRelease
|
|
*/
|
|
static ULONG WINAPI IShellFolder_fnRelease(IShellFolder2 *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
return IUnknown_Release(This->outer_unk);
|
|
}
|
|
|
|
/**************************************************************************
|
|
* SHELL32_CreatePidlFromBindCtx [internal]
|
|
*
|
|
* If the caller bound File System Bind Data, assume it is the
|
|
* find data for the path.
|
|
* This allows binding of paths that don't exist.
|
|
*/
|
|
LPITEMIDLIST SHELL32_CreatePidlFromBindCtx(IBindCtx *pbc, LPCWSTR path)
|
|
{
|
|
IFileSystemBindData *fsbd = NULL;
|
|
LPITEMIDLIST pidl = NULL;
|
|
IUnknown *unk = NULL;
|
|
HRESULT r;
|
|
|
|
TRACE("%p %s\n", pbc, debugstr_w(path));
|
|
|
|
if (!pbc)
|
|
return NULL;
|
|
|
|
/* see if the caller bound File System Bind Data */
|
|
r = IBindCtx_GetObjectParam( pbc, (WCHAR *)L"File System Bind Data", &unk );
|
|
if (FAILED(r))
|
|
return NULL;
|
|
|
|
r = IUnknown_QueryInterface( unk, &IID_IFileSystemBindData, (void**)&fsbd );
|
|
if (SUCCEEDED(r))
|
|
{
|
|
WIN32_FIND_DATAW wfd;
|
|
|
|
r = IFileSystemBindData_GetFindData( fsbd, &wfd );
|
|
if (SUCCEEDED(r))
|
|
{
|
|
lstrcpynW( &wfd.cFileName[0], path, MAX_PATH );
|
|
pidl = _ILCreateFromFindDataW( &wfd );
|
|
}
|
|
IFileSystemBindData_Release( fsbd );
|
|
}
|
|
IUnknown_Release( unk );
|
|
|
|
return pidl;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_ParseDisplayName {SHELL32}
|
|
*
|
|
* Parse a display name.
|
|
*
|
|
* PARAMS
|
|
* hwndOwner [in] Parent window for any message's
|
|
* pbc [in] optional FileSystemBindData context
|
|
* lpszDisplayName [in] Unicode displayname.
|
|
* pchEaten [out] (unicode) characters processed
|
|
* ppidl [out] complex pidl to item
|
|
* pdwAttributes [out] items attributes
|
|
*
|
|
* NOTES
|
|
* Every folder tries to parse only its own (the leftmost) pidl and creates a
|
|
* subfolder to evaluate the remaining parts.
|
|
* Now we can parse into namespaces implemented by shell extensions
|
|
*
|
|
* Behaviour on win98: lpszDisplayName=NULL -> crash
|
|
* lpszDisplayName="" -> returns mycomputer-pidl
|
|
*
|
|
* FIXME
|
|
* pdwAttributes is not set
|
|
* pchEaten is not set like in windows
|
|
*/
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnParseDisplayName (IShellFolder2 * iface,
|
|
HWND hwndOwner,
|
|
LPBC pbc,
|
|
LPOLESTR lpszDisplayName,
|
|
DWORD * pchEaten, LPITEMIDLIST * ppidl,
|
|
DWORD * pdwAttributes)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
HRESULT hr = S_OK;
|
|
LPCWSTR szNext = NULL;
|
|
WCHAR *p, szPath[MAX_PATH];
|
|
WIN32_FIND_DATAW find_data = { 0 };
|
|
IFileSystemBindData *fsbd = NULL;
|
|
LPITEMIDLIST pidlTemp = NULL;
|
|
DWORD len;
|
|
|
|
TRACE ("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n",
|
|
This, hwndOwner, pbc, lpszDisplayName, debugstr_w (lpszDisplayName),
|
|
pchEaten, ppidl, pdwAttributes);
|
|
|
|
if (!lpszDisplayName || !lpszDisplayName[0] || !ppidl) return E_INVALIDARG;
|
|
|
|
if (pchEaten)
|
|
*pchEaten = 0; /* strange but like the original */
|
|
|
|
if (pbc)
|
|
{
|
|
IUnknown *unk;
|
|
|
|
/* see if the caller bound File System Bind Data */
|
|
if (SUCCEEDED( IBindCtx_GetObjectParam( pbc, (WCHAR *)L"File System Bind Data", &unk )))
|
|
{
|
|
IUnknown_QueryInterface( unk, &IID_IFileSystemBindData, (void**)&fsbd );
|
|
IUnknown_Release( unk );
|
|
}
|
|
}
|
|
|
|
if (*lpszDisplayName)
|
|
{
|
|
/* build the full pathname to the element */
|
|
lstrcpynW(szPath, This->sPathTarget, MAX_PATH - 1);
|
|
PathAddBackslashW(szPath);
|
|
len = lstrlenW(szPath);
|
|
/* get the next element */
|
|
szNext = GetNextElementW( lpszDisplayName, szPath + len, MAX_PATH - len );
|
|
|
|
if (IsEqualCLSID( This->pclsid, &CLSID_UnixFolder ) && lpszDisplayName[0] == '/')
|
|
{
|
|
lstrcpynW( szPath + len, lpszDisplayName + 1, MAX_PATH - len );
|
|
for (p = szPath + len; *p; p++) if (*p == '/') *p = '\\';
|
|
}
|
|
else if (!wcsnicmp( lpszDisplayName, L"\\\\?\\unix\\", 9 ))
|
|
{
|
|
lstrcpynW( szPath + len, lpszDisplayName + 9, MAX_PATH - len );
|
|
if ((p = wcschr( szPath + len, '\\' )))
|
|
while (*p == '\\') *p++ = 0;
|
|
szNext = p;
|
|
}
|
|
|
|
/* Special case for the root folder. */
|
|
if (!wcsicmp( szPath, L"\\\\?\\unix\\" ))
|
|
{
|
|
*ppidl = SHAlloc(sizeof(**ppidl));
|
|
if (!*ppidl) return E_FAIL;
|
|
(*ppidl)->mkid.cb = 0; /* Terminate the ITEMIDLIST */
|
|
return S_OK;
|
|
}
|
|
|
|
PathRemoveBackslashW( szPath );
|
|
|
|
if (szNext && *szNext)
|
|
{
|
|
hr = _ILCreateFromPathW( szPath, &pidlTemp );
|
|
if (hr == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) && fsbd)
|
|
{
|
|
find_data.dwFileAttributes = FILE_ATTRIBUTE_DIRECTORY;
|
|
lstrcpyW( find_data.cFileName, szPath + len );
|
|
pidlTemp = _ILCreateFromFindDataW( &find_data );
|
|
}
|
|
if (pidlTemp) /* try to analyse the next element */
|
|
hr = SHELL32_ParseNextElement( iface, hwndOwner, pbc, &pidlTemp,
|
|
(WCHAR *)szNext, pchEaten, pdwAttributes );
|
|
}
|
|
else /* it's the last element */
|
|
{
|
|
if (fsbd)
|
|
{
|
|
if (FAILED( IFileSystemBindData_GetFindData( fsbd, &find_data )))
|
|
find_data.dwFileAttributes = FILE_ATTRIBUTE_NORMAL;
|
|
lstrcpyW( find_data.cFileName, szPath + len );
|
|
pidlTemp = _ILCreateFromFindDataW( &find_data );
|
|
}
|
|
else hr = _ILCreateFromPathW(szPath, &pidlTemp);
|
|
|
|
if (pidlTemp && pdwAttributes && *pdwAttributes)
|
|
hr = SHELL32_GetItemAttributes(&This->IShellFolder2_iface, pidlTemp, pdwAttributes);
|
|
}
|
|
}
|
|
|
|
if (SUCCEEDED(hr))
|
|
*ppidl = pidlTemp;
|
|
else
|
|
*ppidl = NULL;
|
|
|
|
TRACE ("(%p)->(-- pidl=%p ret=0x%08lx)\n", This, *ppidl, hr);
|
|
|
|
if (fsbd) IFileSystemBindData_Release( fsbd );
|
|
return hr;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnEnumObjects
|
|
* PARAMETERS
|
|
* HWND hwndOwner, //[in ] Parent Window
|
|
* DWORD grfFlags, //[in ] SHCONTF enumeration mask
|
|
* LPENUMIDLIST* ppenumIDList //[out] IEnumIDList interface
|
|
*/
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnEnumObjects (IShellFolder2 * iface, HWND hwndOwner,
|
|
DWORD dwFlags, LPENUMIDLIST * ppEnumIDList)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
IEnumIDListImpl *list;
|
|
|
|
TRACE ("(%p)->(HWND=%p flags=0x%08lx pplist=%p)\n", This, hwndOwner,
|
|
dwFlags, ppEnumIDList);
|
|
|
|
if (!(list = IEnumIDList_Constructor()))
|
|
return E_OUTOFMEMORY;
|
|
CreateFolderEnumList(list, This->sPathTarget, dwFlags);
|
|
*ppEnumIDList = &list->IEnumIDList_iface;
|
|
|
|
TRACE ("-- (%p)->(new ID List: %p)\n", This, *ppEnumIDList);
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnBindToObject
|
|
* PARAMETERS
|
|
* LPCITEMIDLIST pidl, //[in ] relative pidl to open
|
|
* LPBC pbc, //[in ] optional FileSystemBindData context
|
|
* REFIID riid, //[in ] Initial Interface
|
|
* LPVOID* ppvObject //[out] Interface*
|
|
*/
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnBindToObject (IShellFolder2 * iface, LPCITEMIDLIST pidl,
|
|
LPBC pbc, REFIID riid, LPVOID * ppvOut)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
const CLSID *clsid = This->pclsid;
|
|
|
|
TRACE ("(%p)->(pidl=%p,%p,%s,%p)\n", This, pidl, pbc,
|
|
shdebugstr_guid (riid), ppvOut);
|
|
|
|
if (!IsEqualCLSID( clsid, &CLSID_UnixFolder ) && !IsEqualCLSID( clsid, &CLSID_UnixDosFolder ))
|
|
clsid = &CLSID_ShellFSFolder;
|
|
|
|
return SHELL32_BindToChild (This->pidlRoot, clsid, This->sPathTarget, pidl, riid, ppvOut);
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnBindToStorage
|
|
* PARAMETERS
|
|
* LPCITEMIDLIST pidl, //[in ] complex pidl to store
|
|
* LPBC pbc, //[in ] reserved
|
|
* REFIID riid, //[in ] Initial storage interface
|
|
* LPVOID* ppvObject //[out] Interface* returned
|
|
*/
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnBindToStorage (IShellFolder2 * iface, LPCITEMIDLIST pidl,
|
|
LPBC pbcReserved, REFIID riid, LPVOID * ppvOut)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
FIXME ("(%p)->(pidl=%p,%p,%s,%p) stub\n", This, pidl, pbcReserved,
|
|
shdebugstr_guid (riid), ppvOut);
|
|
|
|
*ppvOut = NULL;
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnCompareIDs
|
|
*/
|
|
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnCompareIDs (IShellFolder2 * iface, LPARAM lParam,
|
|
LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
int nReturn;
|
|
|
|
TRACE ("(%p)->(0x%08Ix,pidl1=%p,pidl2=%p)\n", This, lParam, pidl1, pidl2);
|
|
nReturn = SHELL32_CompareIDs(&This->IShellFolder2_iface, lParam, pidl1, pidl2);
|
|
TRACE ("-- %i\n", nReturn);
|
|
return nReturn;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnCreateViewObject
|
|
*/
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnCreateViewObject (IShellFolder2 * iface, HWND hwndOwner,
|
|
REFIID riid, LPVOID * ppvOut)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
LPSHELLVIEW pShellView;
|
|
HRESULT hr = E_INVALIDARG;
|
|
|
|
TRACE ("(%p)->(hwnd=%p,%s,%p)\n", This, hwndOwner, shdebugstr_guid (riid),
|
|
ppvOut);
|
|
|
|
if (ppvOut) {
|
|
*ppvOut = NULL;
|
|
|
|
if (IsEqualIID (riid, &IID_IDropTarget)) {
|
|
hr = IShellFolder2_QueryInterface (iface, &IID_IDropTarget, ppvOut);
|
|
} else if (IsEqualIID (riid, &IID_IContextMenu)) {
|
|
hr = BackgroundMenu_Constructor((IShellFolder*)iface, FALSE, riid, ppvOut);
|
|
} else if (IsEqualIID (riid, &IID_IShellView)) {
|
|
pShellView = IShellView_Constructor ((IShellFolder *) iface);
|
|
if (pShellView) {
|
|
hr = IShellView_QueryInterface (pShellView, riid, ppvOut);
|
|
IShellView_Release (pShellView);
|
|
}
|
|
}
|
|
}
|
|
TRACE ("-- (%p)->(interface=%p)\n", This, ppvOut);
|
|
return hr;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnGetAttributesOf
|
|
*
|
|
* PARAMETERS
|
|
* UINT cidl, //[in ] num elements in pidl array
|
|
* LPCITEMIDLIST* apidl, //[in ] simple pidl array
|
|
* ULONG* rgfInOut) //[out] result array
|
|
*
|
|
*/
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnGetAttributesOf (IShellFolder2 * iface, UINT cidl,
|
|
LPCITEMIDLIST * apidl, DWORD * rgfInOut)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
HRESULT hr = S_OK;
|
|
|
|
TRACE ("(%p)->(cidl=%d apidl=%p mask=%p (0x%08lx))\n", This, cidl, apidl,
|
|
rgfInOut, rgfInOut ? *rgfInOut : 0);
|
|
|
|
if (!rgfInOut)
|
|
return E_INVALIDARG;
|
|
if (cidl && !apidl)
|
|
return E_INVALIDARG;
|
|
|
|
if (*rgfInOut == 0)
|
|
*rgfInOut = ~0;
|
|
|
|
if(cidl == 0){
|
|
IShellFolder2 *parent = NULL;
|
|
LPCITEMIDLIST rpidl = NULL;
|
|
|
|
if (_ILIsSpecialFolder(This->pidlRoot))
|
|
{
|
|
*rgfInOut &= (SFGAO_HASSUBFOLDER | SFGAO_FILESYSTEM | SFGAO_FOLDER | SFGAO_FILESYSANCESTOR |
|
|
SFGAO_DROPTARGET | SFGAO_HASPROPSHEET | SFGAO_CANRENAME);
|
|
}
|
|
else
|
|
{
|
|
hr = SHBindToParent(This->pidlRoot, &IID_IShellFolder2, (void **)&parent, &rpidl);
|
|
if(SUCCEEDED(hr)) {
|
|
SHELL32_GetItemAttributes(parent, rpidl, rgfInOut);
|
|
IShellFolder2_Release(parent);
|
|
}
|
|
}
|
|
}
|
|
else {
|
|
while (cidl > 0 && *apidl) {
|
|
pdump (*apidl);
|
|
SHELL32_GetItemAttributes(&This->IShellFolder2_iface, *apidl, rgfInOut);
|
|
apidl++;
|
|
cidl--;
|
|
}
|
|
}
|
|
/* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
|
|
*rgfInOut &= ~SFGAO_VALIDATE;
|
|
|
|
TRACE ("-- result=0x%08lx\n", *rgfInOut);
|
|
|
|
return hr;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* SHELL32_CreateExtensionUIObject (internal)
|
|
*/
|
|
static HRESULT SHELL32_CreateExtensionUIObject(IShellFolder2 *iface,
|
|
LPCITEMIDLIST pidl, REFIID riid, LPVOID *ppvOut)
|
|
{
|
|
IPersistFile *persist_file;
|
|
char extensionA[20];
|
|
WCHAR extensionW[20], buf[MAX_PATH];
|
|
DWORD size = MAX_PATH;
|
|
STRRET path;
|
|
WCHAR *file;
|
|
GUID guid;
|
|
HKEY key;
|
|
HRESULT hr;
|
|
|
|
|
|
if(!_ILGetExtension(pidl, extensionA, 20))
|
|
return S_FALSE;
|
|
|
|
MultiByteToWideChar(CP_ACP, 0, extensionA, -1, extensionW, 20);
|
|
|
|
swprintf(buf, ARRAY_SIZE(buf), L".%s\\ShellEx\\{%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x}",
|
|
extensionW, riid->Data1, riid->Data2, riid->Data3,
|
|
riid->Data4[0], riid->Data4[1], riid->Data4[2], riid->Data4[3],
|
|
riid->Data4[4], riid->Data4[5], riid->Data4[6], riid->Data4[7]);
|
|
|
|
if(RegGetValueW(HKEY_CLASSES_ROOT, buf, NULL, RRF_RT_REG_SZ,
|
|
NULL, buf, &size) != ERROR_SUCCESS)
|
|
return S_FALSE;
|
|
|
|
if(RegCreateKeyExW(HKEY_LOCAL_MACHINE, L"Software\\Microsoft\\Windows\\CurrentVersion\\Shell Extensions\\Blocked", 0, 0, 0,
|
|
KEY_READ, NULL, &key, NULL) != ERROR_SUCCESS)
|
|
return E_FAIL;
|
|
if(RegQueryValueExW(key, buf, 0, NULL, NULL, NULL)
|
|
!= ERROR_FILE_NOT_FOUND)
|
|
return E_ACCESSDENIED;
|
|
RegCloseKey(key);
|
|
|
|
if(RegCreateKeyExW(HKEY_CURRENT_USER, L"Software\\Microsoft\\Windows\\CurrentVersion\\Shell Extensions\\Blocked", 0, 0, 0,
|
|
KEY_READ, NULL, &key, NULL) != ERROR_SUCCESS)
|
|
return E_FAIL;
|
|
if(RegQueryValueExW(key, buf, 0, NULL, NULL, NULL)
|
|
!= ERROR_FILE_NOT_FOUND)
|
|
return E_ACCESSDENIED;
|
|
RegCloseKey(key);
|
|
|
|
if(!GUIDFromStringW(buf, &guid))
|
|
return E_FAIL;
|
|
|
|
hr = CoCreateInstance(&guid, NULL, CLSCTX_INPROC_SERVER,
|
|
&IID_IPersistFile, (void**)&persist_file);
|
|
if(FAILED(hr))
|
|
return hr;
|
|
|
|
hr = IShellFolder2_GetDisplayNameOf(iface, pidl, SHGDN_FORPARSING, &path);
|
|
if(SUCCEEDED(hr))
|
|
hr = StrRetToStrW(&path, NULL, &file);
|
|
if(FAILED(hr)) {
|
|
IPersistFile_Release(persist_file);
|
|
return hr;
|
|
}
|
|
|
|
hr = IPersistFile_Load(persist_file, file, STGM_READ);
|
|
CoTaskMemFree(file);
|
|
if(FAILED(hr)) {
|
|
IPersistFile_Release(persist_file);
|
|
return hr;
|
|
}
|
|
|
|
hr = IPersistFile_QueryInterface(persist_file, riid, ppvOut);
|
|
IPersistFile_Release(persist_file);
|
|
return hr;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnGetUIObjectOf
|
|
*
|
|
* PARAMETERS
|
|
* HWND hwndOwner, //[in ] Parent window for any output
|
|
* UINT cidl, //[in ] array size
|
|
* LPCITEMIDLIST* apidl, //[in ] simple pidl array
|
|
* REFIID riid, //[in ] Requested Interface
|
|
* UINT* prgfInOut, //[ ] reserved
|
|
* LPVOID* ppvObject) //[out] Resulting Interface
|
|
*
|
|
* NOTES
|
|
* This function gets asked to return "view objects" for one or more (multiple
|
|
* select) items:
|
|
* The viewobject typically is an COM object with one of the following
|
|
* interfaces:
|
|
* IExtractIcon,IDataObject,IContextMenu
|
|
* In order to support icon positions in the default Listview your DataObject
|
|
* must implement the SetData method (in addition to GetData :) - the shell
|
|
* passes a barely documented "Icon positions" structure to SetData when the
|
|
* drag starts, and GetData's it if the drop is in another explorer window that
|
|
* needs the positions.
|
|
*/
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnGetUIObjectOf (IShellFolder2 * iface,
|
|
HWND hwndOwner,
|
|
UINT cidl, LPCITEMIDLIST * apidl, REFIID riid,
|
|
UINT * prgfInOut, LPVOID * ppvOut)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
LPITEMIDLIST pidl;
|
|
IUnknown *pObj = NULL;
|
|
HRESULT hr = E_INVALIDARG;
|
|
|
|
TRACE ("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n",
|
|
This, hwndOwner, cidl, apidl, shdebugstr_guid (riid), prgfInOut, ppvOut);
|
|
|
|
if (ppvOut) {
|
|
*ppvOut = NULL;
|
|
|
|
if(cidl == 1) {
|
|
hr = SHELL32_CreateExtensionUIObject(iface, *apidl, riid, ppvOut);
|
|
if(hr != S_FALSE)
|
|
return hr;
|
|
}
|
|
|
|
if (IsEqualIID (riid, &IID_IContextMenu) && (cidl >= 1)) {
|
|
return ItemMenu_Constructor((IShellFolder*)iface, This->pidlRoot, apidl, cidl, riid, ppvOut);
|
|
} else if (IsEqualIID (riid, &IID_IDataObject) && (cidl >= 1)) {
|
|
pObj = (LPUNKNOWN) IDataObject_Constructor (hwndOwner,
|
|
This->pidlRoot, apidl, cidl);
|
|
hr = S_OK;
|
|
} else if (IsEqualIID (riid, &IID_IExtractIconA) && (cidl == 1)) {
|
|
pidl = ILCombine (This->pidlRoot, apidl[0]);
|
|
pObj = (LPUNKNOWN) IExtractIconA_Constructor (pidl);
|
|
ILFree(pidl);
|
|
hr = S_OK;
|
|
} else if (IsEqualIID (riid, &IID_IExtractIconW) && (cidl == 1)) {
|
|
pidl = ILCombine (This->pidlRoot, apidl[0]);
|
|
pObj = (LPUNKNOWN) IExtractIconW_Constructor (pidl);
|
|
ILFree(pidl);
|
|
hr = S_OK;
|
|
} else if (IsEqualIID (riid, &IID_IDropTarget) && (cidl >= 1)) {
|
|
hr = IShellFolder2_QueryInterface (iface, &IID_IDropTarget,
|
|
(LPVOID *) & pObj);
|
|
} else if ((IsEqualIID(riid,&IID_IShellLinkW) ||
|
|
IsEqualIID(riid,&IID_IShellLinkA)) && (cidl == 1)) {
|
|
pidl = ILCombine (This->pidlRoot, apidl[0]);
|
|
hr = IShellLink_ConstructFromFile(NULL, riid, pidl, &pObj);
|
|
ILFree(pidl);
|
|
} else {
|
|
hr = E_NOINTERFACE;
|
|
}
|
|
|
|
if (SUCCEEDED(hr) && !pObj)
|
|
hr = E_OUTOFMEMORY;
|
|
|
|
*ppvOut = pObj;
|
|
}
|
|
TRACE ("(%p)->hr=0x%08lx\n", This, hr);
|
|
return hr;
|
|
}
|
|
|
|
/******************************************************************************
|
|
* SHELL_FS_HideExtension [Internal]
|
|
*
|
|
* Query the registry if the filename extension of a given path should be
|
|
* hidden.
|
|
*
|
|
* PARAMS
|
|
* szPath [I] Relative or absolute path of a file
|
|
*
|
|
* RETURNS
|
|
* TRUE, if the filename's extension should be hidden
|
|
* FALSE, otherwise.
|
|
*/
|
|
static BOOL SHELL_FS_HideExtension(LPCWSTR szPath)
|
|
{
|
|
HKEY hKey;
|
|
DWORD dwData;
|
|
DWORD dwDataSize = sizeof (DWORD);
|
|
BOOL doHide = FALSE; /* The default value is FALSE (win98 at least) */
|
|
|
|
if (!RegCreateKeyExW(HKEY_CURRENT_USER, L"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Advanced",
|
|
0, 0, 0, KEY_ALL_ACCESS, 0, &hKey, 0)) {
|
|
if (!RegQueryValueExW(hKey, L"HideFileExt", 0, 0, (LPBYTE) &dwData, &dwDataSize))
|
|
doHide = dwData;
|
|
RegCloseKey (hKey);
|
|
}
|
|
|
|
if (!doHide) {
|
|
LPWSTR ext = PathFindExtensionW(szPath);
|
|
|
|
if (*ext != '\0') {
|
|
WCHAR classname[MAX_PATH];
|
|
LONG classlen = sizeof(classname);
|
|
|
|
if (!RegQueryValueW(HKEY_CLASSES_ROOT, ext, classname, &classlen))
|
|
if (!RegOpenKeyW(HKEY_CLASSES_ROOT, classname, &hKey)) {
|
|
if (!RegQueryValueExW(hKey, L"NeverShowExt", 0, NULL, NULL, NULL))
|
|
doHide = TRUE;
|
|
RegCloseKey(hKey);
|
|
}
|
|
}
|
|
}
|
|
return doHide;
|
|
}
|
|
|
|
void SHELL_FS_ProcessDisplayFilename(LPWSTR szPath, DWORD dwFlags)
|
|
{
|
|
/*FIXME: MSDN also mentions SHGDN_FOREDITING which is not yet handled. */
|
|
if (!(dwFlags & SHGDN_FORPARSING) &&
|
|
((dwFlags & SHGDN_INFOLDER) || (dwFlags == SHGDN_NORMAL))) {
|
|
if (SHELL_FS_HideExtension(szPath) && szPath[0] != '.')
|
|
PathRemoveExtensionW(szPath);
|
|
}
|
|
}
|
|
|
|
static void get_display_name( WCHAR dest[MAX_PATH], const WCHAR *path, LPCITEMIDLIST pidl, BOOL is_unix )
|
|
{
|
|
char *buffer;
|
|
WCHAR *res;
|
|
DWORD i, len;
|
|
|
|
lstrcpynW( dest, path, MAX_PATH );
|
|
|
|
/* try to get a better path than the \\?\unix one */
|
|
if (!wcsnicmp( path, L"\\\\?\\unix\\", 9 ))
|
|
{
|
|
if (!is_unix)
|
|
{
|
|
len = WideCharToMultiByte( CP_UNIXCP, 0, path + 8, -1, NULL, 0, NULL, NULL );
|
|
buffer = malloc( len );
|
|
len = WideCharToMultiByte( CP_UNIXCP, 0, path + 8, -1, buffer, len, NULL, NULL );
|
|
for (i = 0; i < len; i++) if (buffer[i] == '\\') buffer[i] = '/';
|
|
if ((res = wine_get_dos_file_name( buffer )))
|
|
{
|
|
lstrcpynW( dest, res, MAX_PATH );
|
|
heap_free( res );
|
|
}
|
|
}
|
|
else lstrcpynW( dest, path + 8, MAX_PATH );
|
|
}
|
|
|
|
if (!_ILIsDesktop(pidl))
|
|
{
|
|
PathAddBackslashW( dest );
|
|
len = lstrlenW( dest );
|
|
_ILSimpleGetTextW( pidl, dest + len, MAX_PATH - len );
|
|
}
|
|
if (is_unix) for (i = 0; dest[i]; i++) if (dest[i] == '\\') dest[i] = '/';
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnGetDisplayNameOf
|
|
* Retrieves the display name for the specified file object or subfolder
|
|
*
|
|
* PARAMETERS
|
|
* LPCITEMIDLIST pidl, //[in ] complex pidl to item
|
|
* DWORD dwFlags, //[in ] SHGNO formatting flags
|
|
* LPSTRRET lpName) //[out] Returned display name
|
|
*
|
|
* FIXME
|
|
* if the name is in the pidl the ret value should be a STRRET_OFFSET
|
|
*/
|
|
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnGetDisplayNameOf (IShellFolder2 * iface, LPCITEMIDLIST pidl,
|
|
DWORD dwFlags, LPSTRRET strRet)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
LPWSTR pszPath;
|
|
|
|
HRESULT hr = S_OK;
|
|
|
|
TRACE ("(%p)->(pidl=%p,0x%08lx,%p)\n", This, pidl, dwFlags, strRet);
|
|
pdump (pidl);
|
|
|
|
if (!strRet)
|
|
return E_INVALIDARG;
|
|
|
|
pszPath = CoTaskMemAlloc((MAX_PATH +1) * sizeof(WCHAR));
|
|
if (!pszPath)
|
|
return E_OUTOFMEMORY;
|
|
|
|
if (_ILIsDesktop(pidl)) { /* empty pidl */
|
|
if ((GET_SHGDN_FOR(dwFlags) & SHGDN_FORPARSING) &&
|
|
(GET_SHGDN_RELATION(dwFlags) != SHGDN_INFOLDER))
|
|
{
|
|
if (This->sPathTarget)
|
|
get_display_name( pszPath, This->sPathTarget, pidl,
|
|
IsEqualCLSID( This->pclsid, &CLSID_UnixFolder ));
|
|
} else {
|
|
/* pidl has to contain exactly one non null SHITEMID */
|
|
hr = E_INVALIDARG;
|
|
}
|
|
} else if (_ILIsPidlSimple(pidl)) {
|
|
if ((GET_SHGDN_FOR(dwFlags) & SHGDN_FORPARSING) &&
|
|
(GET_SHGDN_RELATION(dwFlags) != SHGDN_INFOLDER) &&
|
|
This->sPathTarget)
|
|
{
|
|
get_display_name( pszPath, This->sPathTarget, pidl,
|
|
IsEqualCLSID( This->pclsid, &CLSID_UnixFolder ));
|
|
}
|
|
else _ILSimpleGetTextW(pidl, pszPath, MAX_PATH);
|
|
if (!_ILIsFolder(pidl)) SHELL_FS_ProcessDisplayFilename(pszPath, dwFlags);
|
|
} else {
|
|
hr = SHELL32_GetDisplayNameOfChild(iface, pidl, dwFlags, pszPath, MAX_PATH);
|
|
}
|
|
|
|
if (SUCCEEDED(hr)) {
|
|
/* Win9x always returns ANSI strings, NT always returns Unicode strings */
|
|
if (GetVersion() & 0x80000000) {
|
|
strRet->uType = STRRET_CSTR;
|
|
if (!WideCharToMultiByte(CP_ACP, 0, pszPath, -1, strRet->cStr, MAX_PATH,
|
|
NULL, NULL))
|
|
strRet->cStr[0] = '\0';
|
|
CoTaskMemFree(pszPath);
|
|
} else {
|
|
strRet->uType = STRRET_WSTR;
|
|
strRet->pOleStr = pszPath;
|
|
}
|
|
} else
|
|
CoTaskMemFree(pszPath);
|
|
|
|
TRACE ("-- (%p)->(%s)\n", This, strRet->uType == STRRET_CSTR ? strRet->cStr : debugstr_w(strRet->pOleStr));
|
|
return hr;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IShellFolder_fnSetNameOf
|
|
* Changes the name of a file object or subfolder, possibly changing its item
|
|
* identifier in the process.
|
|
*
|
|
* PARAMETERS
|
|
* HWND hwndOwner, //[in ] Owner window for output
|
|
* LPCITEMIDLIST pidl, //[in ] simple pidl of item to change
|
|
* LPCOLESTR lpszName, //[in ] the items new display name
|
|
* DWORD dwFlags, //[in ] SHGNO formatting flags
|
|
* LPITEMIDLIST* ppidlOut) //[out] simple pidl returned
|
|
*/
|
|
static HRESULT WINAPI IShellFolder_fnSetNameOf (IShellFolder2 * iface,
|
|
HWND hwndOwner,
|
|
LPCITEMIDLIST pidl,
|
|
LPCOLESTR lpName,
|
|
DWORD dwFlags,
|
|
LPITEMIDLIST * pPidlOut)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
WCHAR szSrc[MAX_PATH + 1], szDest[MAX_PATH + 1];
|
|
LPWSTR ptr;
|
|
BOOL bIsFolder = _ILIsFolder (ILFindLastID (pidl));
|
|
|
|
TRACE ("(%p)->(%p,pidl=%p,%s,%lu,%p)\n", This, hwndOwner, pidl,
|
|
debugstr_w (lpName), dwFlags, pPidlOut);
|
|
|
|
/* pidl has to contain a single non-empty SHITEMID */
|
|
if (_ILIsDesktop(pidl) || !_ILIsPidlSimple(pidl) || !_ILGetTextPointer(pidl)) return E_INVALIDARG;
|
|
|
|
if (wcspbrk( lpName, L"\\/:*?\"<>|" )) return HRESULT_FROM_WIN32(ERROR_CANCELLED);
|
|
|
|
/* build source path */
|
|
lstrcpynW(szSrc, This->sPathTarget, MAX_PATH);
|
|
ptr = PathAddBackslashW (szSrc);
|
|
_ILSimpleGetTextW (pidl, ptr, MAX_PATH + 1 - (ptr - szSrc));
|
|
|
|
/* build destination path */
|
|
lstrcpynW(szDest, This->sPathTarget, MAX_PATH);
|
|
ptr = PathAddBackslashW (szDest);
|
|
lstrcpynW(ptr, lpName, MAX_PATH + 1 - (ptr - szDest));
|
|
|
|
if(!(dwFlags & SHGDN_FORPARSING) && SHELL_FS_HideExtension(szSrc)) {
|
|
WCHAR *ext = PathFindExtensionW(szSrc);
|
|
if(*ext != '\0') {
|
|
INT len = lstrlenW(szDest);
|
|
lstrcpynW(szDest + len, ext, MAX_PATH - len);
|
|
}
|
|
}
|
|
|
|
TRACE ("src=%s dest=%s\n", debugstr_w(szSrc), debugstr_w(szDest));
|
|
|
|
if (MoveFileW (szSrc, szDest)) {
|
|
HRESULT hr = S_OK;
|
|
|
|
if (pPidlOut)
|
|
hr = _ILCreateFromPathW(szDest, pPidlOut);
|
|
|
|
SHChangeNotify (bIsFolder ? SHCNE_RENAMEFOLDER : SHCNE_RENAMEITEM,
|
|
SHCNF_PATHW, szSrc, szDest);
|
|
|
|
return hr;
|
|
}
|
|
|
|
return E_FAIL;
|
|
}
|
|
|
|
static HRESULT WINAPI IShellFolder_fnGetDefaultSearchGUID(IShellFolder2 *iface, GUID *guid)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
TRACE("(%p)->(%p)\n", This, guid);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI IShellFolder_fnEnumSearches (IShellFolder2 * iface,
|
|
IEnumExtraSearch ** ppenum)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
FIXME ("(%p)\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnGetDefaultColumn(IShellFolder2 *iface, DWORD reserved, ULONG *sort, ULONG *display)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
TRACE("(%p)->(%#lx, %p, %p)\n", This, reserved, sort, display);
|
|
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnGetDefaultColumnState (IShellFolder2 * iface, UINT iColumn,
|
|
DWORD * pcsFlags)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
TRACE ("(%p)\n", This);
|
|
|
|
if (!pcsFlags || iColumn >= GENERICSHELLVIEWCOLUMNS)
|
|
return E_INVALIDARG;
|
|
|
|
*pcsFlags = GenericSFHeader[iColumn].pcsFlags;
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnGetDetailsEx (IShellFolder2 * iface, LPCITEMIDLIST pidl,
|
|
const SHCOLUMNID * pscid, VARIANT * pv)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
FIXME ("(%p)\n", This);
|
|
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnGetDetailsOf (IShellFolder2 * iface, LPCITEMIDLIST pidl,
|
|
UINT iColumn, SHELLDETAILS * psd)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
TRACE ("(%p)->(%p %i %p)\n", This, pidl, iColumn, psd);
|
|
|
|
if (!psd || iColumn >= GENERICSHELLVIEWCOLUMNS)
|
|
return E_INVALIDARG;
|
|
|
|
if (!pidl) return SHELL32_GetColumnDetails(GenericSFHeader, iColumn, psd);
|
|
|
|
return shellfolder_get_file_details( iface, pidl, GenericSFHeader, iColumn, psd );
|
|
}
|
|
|
|
static HRESULT WINAPI
|
|
IShellFolder_fnMapColumnToSCID (IShellFolder2 *iface, UINT column, SHCOLUMNID *scid)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IShellFolder2(iface);
|
|
|
|
TRACE("(%p)->(%u %p)\n", This, column, scid);
|
|
|
|
if (column >= GENERICSHELLVIEWCOLUMNS)
|
|
return E_INVALIDARG;
|
|
|
|
return shellfolder_map_column_to_scid(GenericSFHeader, column, scid);
|
|
}
|
|
|
|
static const IShellFolder2Vtbl sfvt =
|
|
{
|
|
IShellFolder_fnQueryInterface,
|
|
IShellFolder_fnAddRef,
|
|
IShellFolder_fnRelease,
|
|
IShellFolder_fnParseDisplayName,
|
|
IShellFolder_fnEnumObjects,
|
|
IShellFolder_fnBindToObject,
|
|
IShellFolder_fnBindToStorage,
|
|
IShellFolder_fnCompareIDs,
|
|
IShellFolder_fnCreateViewObject,
|
|
IShellFolder_fnGetAttributesOf,
|
|
IShellFolder_fnGetUIObjectOf,
|
|
IShellFolder_fnGetDisplayNameOf,
|
|
IShellFolder_fnSetNameOf,
|
|
/* ShellFolder2 */
|
|
IShellFolder_fnGetDefaultSearchGUID,
|
|
IShellFolder_fnEnumSearches,
|
|
IShellFolder_fnGetDefaultColumn,
|
|
IShellFolder_fnGetDefaultColumnState,
|
|
IShellFolder_fnGetDetailsEx,
|
|
IShellFolder_fnGetDetailsOf,
|
|
IShellFolder_fnMapColumnToSCID
|
|
};
|
|
|
|
/****************************************************************************
|
|
* ISFHelper for IShellFolder implementation
|
|
*/
|
|
|
|
static HRESULT WINAPI ISFHelper_fnQueryInterface(ISFHelper *iface, REFIID riid, void **ppvObj)
|
|
{
|
|
IGenericSFImpl *This = impl_from_ISFHelper(iface);
|
|
|
|
return IUnknown_QueryInterface(This->outer_unk, riid, ppvObj);
|
|
}
|
|
|
|
static ULONG WINAPI ISFHelper_fnAddRef(ISFHelper *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_ISFHelper(iface);
|
|
|
|
return IUnknown_AddRef(This->outer_unk);
|
|
}
|
|
|
|
static ULONG WINAPI ISFHelper_fnRelease(ISFHelper *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_ISFHelper(iface);
|
|
|
|
return IUnknown_Release(This->outer_unk);
|
|
}
|
|
|
|
/****************************************************************************
|
|
* ISFHelper_fnGetUniqueName
|
|
*
|
|
* creates a unique folder name
|
|
*/
|
|
|
|
static HRESULT WINAPI
|
|
ISFHelper_fnGetUniqueName (ISFHelper * iface, LPWSTR pwszName, UINT uLen)
|
|
{
|
|
IGenericSFImpl *This = impl_from_ISFHelper(iface);
|
|
IEnumIDList *penum;
|
|
HRESULT hr;
|
|
WCHAR wszText[MAX_PATH];
|
|
WCHAR wszNewFolder[25];
|
|
|
|
TRACE ("(%p)(%p %u)\n", This, pwszName, uLen);
|
|
|
|
LoadStringW(shell32_hInstance, IDS_NEWFOLDER, wszNewFolder, ARRAY_SIZE(wszNewFolder));
|
|
if (uLen < ARRAY_SIZE(wszNewFolder) + 3)
|
|
return E_POINTER;
|
|
|
|
lstrcpynW (pwszName, wszNewFolder, uLen);
|
|
|
|
hr = IShellFolder2_EnumObjects(&This->IShellFolder2_iface, 0,
|
|
SHCONTF_FOLDERS | SHCONTF_NONFOLDERS | SHCONTF_INCLUDEHIDDEN, &penum);
|
|
if (penum) {
|
|
LPITEMIDLIST pidl;
|
|
DWORD dwFetched;
|
|
int i = 1;
|
|
|
|
next:
|
|
IEnumIDList_Reset (penum);
|
|
while (S_OK == IEnumIDList_Next (penum, 1, &pidl, &dwFetched) &&
|
|
dwFetched) {
|
|
_ILSimpleGetTextW (pidl, wszText, MAX_PATH);
|
|
if (0 == lstrcmpiW (wszText, pwszName)) {
|
|
swprintf (pwszName, uLen, L"%s %d", wszNewFolder, i++);
|
|
if (i > 99) {
|
|
hr = E_FAIL;
|
|
break;
|
|
}
|
|
goto next;
|
|
}
|
|
}
|
|
|
|
IEnumIDList_Release (penum);
|
|
}
|
|
return hr;
|
|
}
|
|
|
|
/****************************************************************************
|
|
* ISFHelper_fnAddFolder
|
|
*
|
|
* adds a new folder.
|
|
*/
|
|
|
|
static HRESULT WINAPI
|
|
ISFHelper_fnAddFolder (ISFHelper * iface, HWND hwnd, LPCWSTR pwszName,
|
|
LPITEMIDLIST * ppidlOut)
|
|
{
|
|
IGenericSFImpl *This = impl_from_ISFHelper(iface);
|
|
WCHAR wszNewDir[MAX_PATH];
|
|
BOOL bRes;
|
|
HRESULT hres = E_FAIL;
|
|
|
|
TRACE ("(%p)(%s %p)\n", This, debugstr_w(pwszName), ppidlOut);
|
|
|
|
wszNewDir[0] = 0;
|
|
if (This->sPathTarget)
|
|
lstrcpynW(wszNewDir, This->sPathTarget, MAX_PATH);
|
|
PathAppendW(wszNewDir, pwszName);
|
|
|
|
bRes = CreateDirectoryW (wszNewDir, NULL);
|
|
if (bRes) {
|
|
LPITEMIDLIST relPidl;
|
|
|
|
lstrcpyW(wszNewDir, pwszName);
|
|
|
|
hres = IShellFolder2_ParseDisplayName(&This->IShellFolder2_iface, hwnd, NULL, wszNewDir,
|
|
NULL, &relPidl, NULL);
|
|
|
|
if (SUCCEEDED(hres)) {
|
|
LPITEMIDLIST fullPidl;
|
|
|
|
fullPidl = ILCombine(This->pidlRoot, relPidl);
|
|
|
|
if (fullPidl) {
|
|
SHChangeNotify(SHCNE_MKDIR, SHCNF_IDLIST, fullPidl, NULL);
|
|
ILFree(fullPidl);
|
|
|
|
if (ppidlOut)
|
|
*ppidlOut = relPidl;
|
|
else
|
|
ILFree(relPidl);
|
|
} else {
|
|
WARN("failed to combine %s into a full PIDL\n", wine_dbgstr_w(pwszName));
|
|
ILFree(relPidl);
|
|
}
|
|
|
|
} else
|
|
WARN("failed to parse %s into a PIDL\n", wine_dbgstr_w(pwszName));
|
|
|
|
} else {
|
|
WCHAR wszText[128 + MAX_PATH];
|
|
WCHAR wszTempText[128];
|
|
WCHAR wszCaption[256];
|
|
|
|
/* Cannot Create folder because of permissions */
|
|
LoadStringW (shell32_hInstance, IDS_CREATEFOLDER_DENIED, wszTempText, ARRAY_SIZE(wszTempText));
|
|
LoadStringW (shell32_hInstance, IDS_CREATEFOLDER_CAPTION, wszCaption, ARRAY_SIZE(wszCaption));
|
|
swprintf (wszText, ARRAY_SIZE(wszText), wszTempText, wszNewDir);
|
|
MessageBoxW (hwnd, wszText, wszCaption, MB_OK | MB_ICONEXCLAMATION);
|
|
}
|
|
|
|
return hres;
|
|
}
|
|
|
|
/****************************************************************************
|
|
* build_paths_list
|
|
*
|
|
* Builds a list of paths like the one used in SHFileOperation from a table of
|
|
* PIDLs relative to the given base folder
|
|
*/
|
|
static WCHAR *build_paths_list(LPCWSTR wszBasePath, int cidl, const LPCITEMIDLIST *pidls)
|
|
{
|
|
WCHAR *wszPathsList;
|
|
WCHAR *wszListPos;
|
|
int iPathLen;
|
|
int i;
|
|
|
|
iPathLen = lstrlenW(wszBasePath);
|
|
wszPathsList = malloc(MAX_PATH * sizeof(WCHAR) * cidl + 1);
|
|
wszListPos = wszPathsList;
|
|
|
|
for (i = 0; i < cidl; i++) {
|
|
if (!_ILIsFolder(pidls[i]) && !_ILIsValue(pidls[i]))
|
|
continue;
|
|
|
|
lstrcpynW(wszListPos, wszBasePath, MAX_PATH);
|
|
/* FIXME: abort if path too long */
|
|
_ILSimpleGetTextW(pidls[i], wszListPos+iPathLen, MAX_PATH-iPathLen);
|
|
wszListPos += lstrlenW(wszListPos)+1;
|
|
}
|
|
*wszListPos=0;
|
|
return wszPathsList;
|
|
}
|
|
|
|
/****************************************************************************
|
|
* ISFHelper_fnDeleteItems
|
|
*
|
|
* deletes items in folder
|
|
*/
|
|
static HRESULT WINAPI
|
|
ISFHelper_fnDeleteItems (ISFHelper * iface, UINT cidl, LPCITEMIDLIST * apidl)
|
|
{
|
|
IGenericSFImpl *This = impl_from_ISFHelper(iface);
|
|
UINT i;
|
|
SHFILEOPSTRUCTW op;
|
|
WCHAR wszPath[MAX_PATH];
|
|
WCHAR *wszPathsList;
|
|
HRESULT ret;
|
|
WCHAR *wszCurrentPath;
|
|
|
|
TRACE ("(%p)(%u %p)\n", This, cidl, apidl);
|
|
if (cidl==0) return S_OK;
|
|
|
|
if (This->sPathTarget)
|
|
lstrcpynW(wszPath, This->sPathTarget, MAX_PATH);
|
|
else
|
|
wszPath[0] = '\0';
|
|
PathAddBackslashW(wszPath);
|
|
wszPathsList = build_paths_list(wszPath, cidl, apidl);
|
|
|
|
ZeroMemory(&op, sizeof(op));
|
|
op.hwnd = GetActiveWindow();
|
|
op.wFunc = FO_DELETE;
|
|
op.pFrom = wszPathsList;
|
|
op.fFlags = FOF_ALLOWUNDO;
|
|
if (SHFileOperationW(&op))
|
|
{
|
|
WARN("SHFileOperation failed\n");
|
|
ret = E_FAIL;
|
|
}
|
|
else
|
|
ret = S_OK;
|
|
|
|
/* we currently need to manually send the notifies */
|
|
wszCurrentPath = wszPathsList;
|
|
for (i = 0; i < cidl; i++)
|
|
{
|
|
LONG wEventId;
|
|
|
|
if (_ILIsFolder(apidl[i]))
|
|
wEventId = SHCNE_RMDIR;
|
|
else if (_ILIsValue(apidl[i]))
|
|
wEventId = SHCNE_DELETE;
|
|
else
|
|
continue;
|
|
|
|
/* check if file exists */
|
|
if (GetFileAttributesW(wszCurrentPath) == INVALID_FILE_ATTRIBUTES)
|
|
{
|
|
LPITEMIDLIST pidl = ILCombine(This->pidlRoot, apidl[i]);
|
|
SHChangeNotify(wEventId, SHCNF_IDLIST, pidl, NULL);
|
|
ILFree(pidl);
|
|
}
|
|
|
|
wszCurrentPath += lstrlenW(wszCurrentPath)+1;
|
|
}
|
|
free(wszPathsList);
|
|
return ret;
|
|
}
|
|
|
|
/****************************************************************************
|
|
* ISFHelper_fnCopyItems
|
|
*
|
|
* copies items to this folder
|
|
*/
|
|
static HRESULT WINAPI
|
|
ISFHelper_fnCopyItems (ISFHelper * iface, IShellFolder * pSFFrom, UINT cidl,
|
|
LPCITEMIDLIST * apidl)
|
|
{
|
|
HRESULT ret=E_FAIL;
|
|
IPersistFolder2 *ppf2 = NULL;
|
|
WCHAR wszSrcPathRoot[MAX_PATH],
|
|
wszDstPath[MAX_PATH+1];
|
|
WCHAR *wszSrcPathsList;
|
|
IGenericSFImpl *This = impl_from_ISFHelper(iface);
|
|
|
|
SHFILEOPSTRUCTW fop;
|
|
|
|
TRACE ("(%p)->(%p,%u,%p)\n", This, pSFFrom, cidl, apidl);
|
|
|
|
IShellFolder_QueryInterface (pSFFrom, &IID_IPersistFolder2,
|
|
(LPVOID *) & ppf2);
|
|
if (ppf2) {
|
|
LPITEMIDLIST pidl;
|
|
|
|
if (SUCCEEDED (IPersistFolder2_GetCurFolder (ppf2, &pidl))) {
|
|
SHGetPathFromIDListW (pidl, wszSrcPathRoot);
|
|
if (This->sPathTarget)
|
|
lstrcpynW(wszDstPath, This->sPathTarget, MAX_PATH);
|
|
else
|
|
wszDstPath[0] = 0;
|
|
PathAddBackslashW(wszSrcPathRoot);
|
|
PathAddBackslashW(wszDstPath);
|
|
wszSrcPathsList = build_paths_list(wszSrcPathRoot, cidl, apidl);
|
|
ZeroMemory(&fop, sizeof(fop));
|
|
fop.hwnd = GetActiveWindow();
|
|
fop.wFunc = FO_COPY;
|
|
fop.pFrom = wszSrcPathsList;
|
|
fop.pTo = wszDstPath;
|
|
fop.fFlags = FOF_ALLOWUNDO;
|
|
ret = S_OK;
|
|
if(SHFileOperationW(&fop))
|
|
{
|
|
WARN("Copy failed\n");
|
|
ret = E_FAIL;
|
|
}
|
|
free(wszSrcPathsList);
|
|
}
|
|
SHFree(pidl);
|
|
IPersistFolder2_Release(ppf2);
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static const ISFHelperVtbl shvt =
|
|
{
|
|
ISFHelper_fnQueryInterface,
|
|
ISFHelper_fnAddRef,
|
|
ISFHelper_fnRelease,
|
|
ISFHelper_fnGetUniqueName,
|
|
ISFHelper_fnAddFolder,
|
|
ISFHelper_fnDeleteItems,
|
|
ISFHelper_fnCopyItems
|
|
};
|
|
|
|
/************************************************************************
|
|
* IFSFldr_PersistFolder3_QueryInterface
|
|
*
|
|
*/
|
|
static HRESULT WINAPI IFSFldr_PersistFolder3_QueryInterface(IPersistFolder3 *iface, REFIID iid,
|
|
void **ppv)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistFolder3(iface);
|
|
|
|
return IUnknown_QueryInterface(This->outer_unk, iid, ppv);
|
|
}
|
|
|
|
/************************************************************************
|
|
* IFSFldr_PersistFolder3_AddRef
|
|
*
|
|
*/
|
|
static ULONG WINAPI IFSFldr_PersistFolder3_AddRef(IPersistFolder3 *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistFolder3(iface);
|
|
|
|
return IUnknown_AddRef(This->outer_unk);
|
|
}
|
|
|
|
/************************************************************************
|
|
* IFSFldr_PersistFolder3_Release
|
|
*
|
|
*/
|
|
static ULONG WINAPI IFSFldr_PersistFolder3_Release(IPersistFolder3 *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistFolder3(iface);
|
|
|
|
return IUnknown_Release(This->outer_unk);
|
|
}
|
|
|
|
/************************************************************************
|
|
* IFSFldr_PersistFolder3_GetClassID
|
|
*/
|
|
static HRESULT WINAPI
|
|
IFSFldr_PersistFolder3_GetClassID (IPersistFolder3 * iface, CLSID * lpClassId)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistFolder3(iface);
|
|
|
|
TRACE ("(%p)\n", This);
|
|
|
|
if (!lpClassId)
|
|
return E_POINTER;
|
|
*lpClassId = *This->pclsid;
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
/************************************************************************
|
|
* IFSFldr_PersistFolder3_Initialize
|
|
*
|
|
* NOTES
|
|
* sPathTarget is not set. Don't know how to handle in a non rooted environment.
|
|
*/
|
|
static HRESULT WINAPI
|
|
IFSFldr_PersistFolder3_Initialize (IPersistFolder3 * iface, LPCITEMIDLIST pidl)
|
|
{
|
|
WCHAR wszTemp[MAX_PATH];
|
|
int len;
|
|
IGenericSFImpl *This = impl_from_IPersistFolder3(iface);
|
|
|
|
TRACE ("(%p)->(%p)\n", This, pidl);
|
|
|
|
wszTemp[0] = 0;
|
|
|
|
SHFree (This->pidlRoot); /* free the old pidl */
|
|
This->pidlRoot = ILClone (pidl); /* set my pidl */
|
|
|
|
/* FolderShortcuts' Initialize method only sets the ITEMIDLIST, which
|
|
* specifies the location in the shell namespace, but leaves the
|
|
* target folder alone */
|
|
if (IsEqualCLSID( This->pclsid, &CLSID_FolderShortcut )) return S_OK;
|
|
|
|
SHFree (This->sPathTarget);
|
|
This->sPathTarget = NULL;
|
|
|
|
/* set my path */
|
|
if (_ILIsSpecialFolder(pidl) && IsEqualCLSID( This->pclsid, _ILGetGUIDPointer(pidl) ))
|
|
{
|
|
if (IsEqualCLSID( This->pclsid, &CLSID_MyDocuments ))
|
|
{
|
|
if (!SHGetSpecialFolderPathW( 0, wszTemp, CSIDL_PERSONAL, FALSE )) return E_FAIL;
|
|
PathAddBackslashW( wszTemp );
|
|
}
|
|
else lstrcpyW( wszTemp, L"\\\\?\\unix\\" );
|
|
}
|
|
else SHGetPathFromIDListW( pidl, wszTemp );
|
|
|
|
if ((len = lstrlenW(wszTemp)))
|
|
{
|
|
This->sPathTarget = SHAlloc((len + 1) * sizeof(WCHAR));
|
|
if (!This->sPathTarget) return E_OUTOFMEMORY;
|
|
memcpy(This->sPathTarget, wszTemp, (len + 1) * sizeof(WCHAR));
|
|
}
|
|
|
|
TRACE ("--(%p)->(%s)\n", This, debugstr_w(This->sPathTarget));
|
|
return S_OK;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IFSFldr_PersistFolder3_GetCurFolder
|
|
*/
|
|
static HRESULT WINAPI
|
|
IFSFldr_PersistFolder3_fnGetCurFolder (IPersistFolder3 * iface,
|
|
LPITEMIDLIST * pidl)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistFolder3(iface);
|
|
|
|
TRACE ("(%p)->(%p)\n", This, pidl);
|
|
|
|
if (!pidl) return E_POINTER;
|
|
*pidl = ILClone (This->pidlRoot);
|
|
return S_OK;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* IFSFldr_PersistFolder3_InitializeEx
|
|
*
|
|
* FIXME: error handling
|
|
*/
|
|
static HRESULT WINAPI
|
|
IFSFldr_PersistFolder3_InitializeEx (IPersistFolder3 * iface,
|
|
IBindCtx * pbc, LPCITEMIDLIST pidlRoot,
|
|
const PERSIST_FOLDER_TARGET_INFO * ppfti)
|
|
{
|
|
WCHAR wszTemp[MAX_PATH];
|
|
|
|
IGenericSFImpl *This = impl_from_IPersistFolder3(iface);
|
|
|
|
TRACE ("(%p)->(%p,%p,%p)\n", This, pbc, pidlRoot, ppfti);
|
|
if (ppfti)
|
|
TRACE ("--%p %s %s 0x%08lx 0x%08x\n",
|
|
ppfti->pidlTargetFolder, debugstr_w (ppfti->szTargetParsingName),
|
|
debugstr_w (ppfti->szNetworkProvider), ppfti->dwAttributes,
|
|
ppfti->csidl);
|
|
|
|
pdump (pidlRoot);
|
|
if (ppfti && ppfti->pidlTargetFolder)
|
|
pdump (ppfti->pidlTargetFolder);
|
|
|
|
if (This->pidlRoot)
|
|
{
|
|
SHFree(This->pidlRoot);
|
|
This->pidlRoot = NULL;
|
|
}
|
|
if (This->sPathTarget)
|
|
{
|
|
SHFree(This->sPathTarget);
|
|
This->sPathTarget = NULL;
|
|
}
|
|
|
|
/*
|
|
* Root path and pidl
|
|
*/
|
|
This->pidlRoot = ILClone (pidlRoot);
|
|
|
|
/*
|
|
* the target folder is specified in csidl OR pidlTargetFolder OR
|
|
* szTargetParsingName
|
|
*/
|
|
if (ppfti) {
|
|
if (ppfti->csidl != -1) {
|
|
if (SHGetSpecialFolderPathW (0, wszTemp, ppfti->csidl,
|
|
ppfti->csidl & CSIDL_FLAG_CREATE)) {
|
|
int len = lstrlenW(wszTemp);
|
|
This->sPathTarget = SHAlloc((len + 1) * sizeof(WCHAR));
|
|
if (!This->sPathTarget)
|
|
return E_OUTOFMEMORY;
|
|
memcpy(This->sPathTarget, wszTemp, (len + 1) * sizeof(WCHAR));
|
|
}
|
|
} else if (ppfti->szTargetParsingName[0]) {
|
|
int len = lstrlenW(ppfti->szTargetParsingName);
|
|
This->sPathTarget = SHAlloc((len + 1) * sizeof(WCHAR));
|
|
if (!This->sPathTarget)
|
|
return E_OUTOFMEMORY;
|
|
memcpy(This->sPathTarget, ppfti->szTargetParsingName,
|
|
(len + 1) * sizeof(WCHAR));
|
|
} else if (ppfti->pidlTargetFolder) {
|
|
if (SHGetPathFromIDListW(ppfti->pidlTargetFolder, wszTemp)) {
|
|
int len = lstrlenW(wszTemp);
|
|
This->sPathTarget = SHAlloc((len + 1) * sizeof(WCHAR));
|
|
if (!This->sPathTarget)
|
|
return E_OUTOFMEMORY;
|
|
memcpy(This->sPathTarget, wszTemp, (len + 1) * sizeof(WCHAR));
|
|
}
|
|
}
|
|
}
|
|
|
|
TRACE ("--(%p)->(target=%s)\n", This, debugstr_w(This->sPathTarget));
|
|
pdump (This->pidlRoot);
|
|
return (This->sPathTarget) ? S_OK : E_FAIL;
|
|
}
|
|
|
|
static HRESULT WINAPI
|
|
IFSFldr_PersistFolder3_GetFolderTargetInfo (IPersistFolder3 * iface,
|
|
PERSIST_FOLDER_TARGET_INFO * ppfti)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistFolder3(iface);
|
|
FIXME ("(%p)->(%p)\n", This, ppfti);
|
|
ZeroMemory (ppfti, sizeof (*ppfti));
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static const IPersistFolder3Vtbl pfvt =
|
|
{
|
|
IFSFldr_PersistFolder3_QueryInterface,
|
|
IFSFldr_PersistFolder3_AddRef,
|
|
IFSFldr_PersistFolder3_Release,
|
|
IFSFldr_PersistFolder3_GetClassID,
|
|
IFSFldr_PersistFolder3_Initialize,
|
|
IFSFldr_PersistFolder3_fnGetCurFolder,
|
|
IFSFldr_PersistFolder3_InitializeEx,
|
|
IFSFldr_PersistFolder3_GetFolderTargetInfo
|
|
};
|
|
|
|
/****************************************************************************
|
|
* IPersistPropertyBag implementation
|
|
*/
|
|
static HRESULT WINAPI PersistPropertyBag_QueryInterface(IPersistPropertyBag* iface,
|
|
REFIID riid, void** ppv)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistPropertyBag(iface);
|
|
return IUnknown_QueryInterface(This->outer_unk, riid, ppv);
|
|
}
|
|
|
|
static ULONG WINAPI PersistPropertyBag_AddRef(IPersistPropertyBag* iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistPropertyBag(iface);
|
|
return IUnknown_AddRef(This->outer_unk);
|
|
}
|
|
|
|
static ULONG WINAPI PersistPropertyBag_Release(IPersistPropertyBag* iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistPropertyBag(iface);
|
|
return IUnknown_Release(This->outer_unk);
|
|
}
|
|
|
|
static HRESULT WINAPI PersistPropertyBag_GetClassID(IPersistPropertyBag* iface, CLSID* pClassID)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistPropertyBag(iface);
|
|
return IPersistFolder3_GetClassID(&This->IPersistFolder3_iface, pClassID);
|
|
}
|
|
|
|
static HRESULT WINAPI PersistPropertyBag_InitNew(IPersistPropertyBag* iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistPropertyBag(iface);
|
|
FIXME("(%p): stub\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static HRESULT WINAPI PersistPropertyBag_Load(IPersistPropertyBag *iface,
|
|
IPropertyBag *pPropertyBag, IErrorLog *pErrorLog)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistPropertyBag(iface);
|
|
PERSIST_FOLDER_TARGET_INFO pftiTarget;
|
|
VARIANT var;
|
|
HRESULT hr;
|
|
|
|
TRACE("(%p)->(%p %p)\n", This, pPropertyBag, pErrorLog);
|
|
|
|
if (!pPropertyBag)
|
|
return E_POINTER;
|
|
|
|
/* Get 'Target' property from the property bag. */
|
|
V_VT(&var) = VT_BSTR;
|
|
hr = IPropertyBag_Read(pPropertyBag, L"Target", &var, NULL);
|
|
if (FAILED(hr))
|
|
return E_FAIL;
|
|
lstrcpyW(pftiTarget.szTargetParsingName, V_BSTR(&var));
|
|
SysFreeString(V_BSTR(&var));
|
|
|
|
pftiTarget.pidlTargetFolder = NULL;
|
|
pftiTarget.szNetworkProvider[0] = 0;
|
|
pftiTarget.dwAttributes = -1;
|
|
pftiTarget.csidl = -1;
|
|
|
|
return IPersistFolder3_InitializeEx(&This->IPersistFolder3_iface, NULL, NULL, &pftiTarget);
|
|
}
|
|
|
|
static HRESULT WINAPI PersistPropertyBag_Save(IPersistPropertyBag *iface,
|
|
IPropertyBag *pPropertyBag, BOOL fClearDirty, BOOL fSaveAllProperties)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IPersistPropertyBag(iface);
|
|
FIXME("(%p): stub\n", This);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static const IPersistPropertyBagVtbl ppbvt = {
|
|
PersistPropertyBag_QueryInterface,
|
|
PersistPropertyBag_AddRef,
|
|
PersistPropertyBag_Release,
|
|
PersistPropertyBag_GetClassID,
|
|
PersistPropertyBag_InitNew,
|
|
PersistPropertyBag_Load,
|
|
PersistPropertyBag_Save
|
|
};
|
|
|
|
/****************************************************************************
|
|
* ISFDropTarget implementation
|
|
*/
|
|
static HRESULT WINAPI ISFDropTarget_QueryInterface(IDropTarget *iface, REFIID riid, void **ppv)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IDropTarget(iface);
|
|
|
|
return IUnknown_QueryInterface(This->outer_unk, riid, ppv);
|
|
}
|
|
|
|
static ULONG WINAPI ISFDropTarget_AddRef(IDropTarget *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IDropTarget(iface);
|
|
|
|
return IUnknown_AddRef(This->outer_unk);
|
|
}
|
|
|
|
static ULONG WINAPI ISFDropTarget_Release(IDropTarget *iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IDropTarget(iface);
|
|
|
|
return IUnknown_Release(This->outer_unk);
|
|
}
|
|
|
|
#define HIDA_GetPIDLFolder(pida) (LPCITEMIDLIST)(((LPBYTE)pida)+(pida)->aoffset[0])
|
|
#define HIDA_GetPIDLItem(pida, i) (LPCITEMIDLIST)(((LPBYTE)pida)+(pida)->aoffset[i+1])
|
|
|
|
static HRESULT WINAPI
|
|
ISFDropTarget_DragEnter (IDropTarget * iface, IDataObject * pDataObject,
|
|
DWORD dwKeyState, POINTL pt, DWORD * pdwEffect)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IDropTarget(iface);
|
|
FORMATETC format;
|
|
STGMEDIUM medium;
|
|
|
|
TRACE("(%p)->(%p 0x%08lx {.x=%ld, .y=%ld} %p)\n", This, pDataObject, dwKeyState, pt.x, pt.y, pdwEffect);
|
|
|
|
if (!pdwEffect || !pDataObject)
|
|
return E_INVALIDARG;
|
|
|
|
/* Compute a mask of supported drop-effects for this shellfolder object and the given data
|
|
* object. Dropping is only supported on folders, which represent filesystem locations. One
|
|
* can't drop on file objects. And the 'move' drop effect is only supported, if the source
|
|
* folder is not identical to the target folder. */
|
|
This->drop_effects_mask = DROPEFFECT_NONE;
|
|
InitFormatEtc(format, cfShellIDList, TYMED_HGLOBAL);
|
|
if (_ILIsFolder(ILFindLastID(This->pidlRoot)) && /* Only drop to folders, not to files */
|
|
SUCCEEDED(IDataObject_GetData(pDataObject, &format, &medium))) /* Only ShellIDList format */
|
|
{
|
|
LPIDA pidaShellIDList = GlobalLock(medium.hGlobal);
|
|
This->drop_effects_mask |= DROPEFFECT_COPY|DROPEFFECT_LINK;
|
|
|
|
if (pidaShellIDList) { /* Files can only be moved between two different folders */
|
|
if (!ILIsEqual(HIDA_GetPIDLFolder(pidaShellIDList), This->pidlRoot))
|
|
This->drop_effects_mask |= DROPEFFECT_MOVE;
|
|
GlobalUnlock(medium.hGlobal);
|
|
}
|
|
}
|
|
|
|
*pdwEffect = KeyStateToDropEffect(dwKeyState) & This->drop_effects_mask;
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI
|
|
ISFDropTarget_DragOver (IDropTarget * iface, DWORD dwKeyState, POINTL pt,
|
|
DWORD * pdwEffect)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IDropTarget(iface);
|
|
|
|
TRACE("(%p)->(0x%08lx {.x=%ld, .y=%ld} %p)\n", This, dwKeyState, pt.x, pt.y, pdwEffect);
|
|
|
|
if (!pdwEffect)
|
|
return E_INVALIDARG;
|
|
|
|
*pdwEffect = KeyStateToDropEffect(dwKeyState) & This->drop_effects_mask;
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI ISFDropTarget_DragLeave (IDropTarget * iface)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IDropTarget(iface);
|
|
|
|
TRACE("(%p)\n", This);
|
|
|
|
This->drop_effects_mask = DROPEFFECT_NONE;
|
|
return S_OK;
|
|
}
|
|
|
|
static HRESULT WINAPI
|
|
ISFDropTarget_Drop (IDropTarget * iface, IDataObject * pDataObject,
|
|
DWORD dwKeyState, POINTL pt, DWORD * pdwEffect)
|
|
{
|
|
IGenericSFImpl *This = impl_from_IDropTarget(iface);
|
|
FORMATETC format;
|
|
STGMEDIUM medium;
|
|
HRESULT hr;
|
|
|
|
TRACE("(%p)->(%p %ld {.x=%ld, .y=%ld} %p) semi-stub\n",
|
|
This, pDataObject, dwKeyState, pt.x, pt.y, pdwEffect);
|
|
|
|
InitFormatEtc(format, cfShellIDList, TYMED_HGLOBAL);
|
|
hr = IDataObject_GetData(pDataObject, &format, &medium);
|
|
if (FAILED(hr))
|
|
return hr;
|
|
|
|
if (medium.tymed == TYMED_HGLOBAL) {
|
|
IShellFolder *psfSourceFolder, *psfDesktopFolder;
|
|
LPIDA pidaShellIDList = GlobalLock(medium.hGlobal);
|
|
STRRET strret;
|
|
UINT i;
|
|
|
|
if (!pidaShellIDList)
|
|
return HRESULT_FROM_WIN32(GetLastError());
|
|
|
|
hr = SHGetDesktopFolder(&psfDesktopFolder);
|
|
if (FAILED(hr)) {
|
|
GlobalUnlock(medium.hGlobal);
|
|
return hr;
|
|
}
|
|
|
|
hr = IShellFolder_BindToObject(psfDesktopFolder, HIDA_GetPIDLFolder(pidaShellIDList), NULL,
|
|
&IID_IShellFolder, (LPVOID*)&psfSourceFolder);
|
|
IShellFolder_Release(psfDesktopFolder);
|
|
if (FAILED(hr)) {
|
|
GlobalUnlock(medium.hGlobal);
|
|
return hr;
|
|
}
|
|
|
|
for (i = 0; i < pidaShellIDList->cidl; i++) {
|
|
WCHAR wszSourcePath[MAX_PATH];
|
|
|
|
hr = IShellFolder_GetDisplayNameOf(psfSourceFolder, HIDA_GetPIDLItem(pidaShellIDList, i),
|
|
SHGDN_FORPARSING, &strret);
|
|
if (FAILED(hr))
|
|
break;
|
|
|
|
hr = StrRetToBufW(&strret, NULL, wszSourcePath, MAX_PATH);
|
|
if (FAILED(hr))
|
|
break;
|
|
|
|
switch (*pdwEffect) {
|
|
case DROPEFFECT_MOVE:
|
|
FIXME("Move %s to %s!\n", debugstr_w(wszSourcePath), debugstr_w(This->sPathTarget));
|
|
break;
|
|
case DROPEFFECT_COPY:
|
|
FIXME("Copy %s to %s!\n", debugstr_w(wszSourcePath), debugstr_w(This->sPathTarget));
|
|
break;
|
|
case DROPEFFECT_LINK:
|
|
FIXME("Link %s from %s!\n", debugstr_w(wszSourcePath), debugstr_w(This->sPathTarget));
|
|
break;
|
|
}
|
|
}
|
|
|
|
IShellFolder_Release(psfSourceFolder);
|
|
GlobalUnlock(medium.hGlobal);
|
|
return hr;
|
|
}
|
|
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
static const IDropTargetVtbl dtvt = {
|
|
ISFDropTarget_QueryInterface,
|
|
ISFDropTarget_AddRef,
|
|
ISFDropTarget_Release,
|
|
ISFDropTarget_DragEnter,
|
|
ISFDropTarget_DragOver,
|
|
ISFDropTarget_DragLeave,
|
|
ISFDropTarget_Drop
|
|
};
|
|
|
|
static HRESULT create_fs( IUnknown *outer_unk, REFIID riid, void **ppv, const CLSID *clsid)
|
|
{
|
|
IGenericSFImpl *sf;
|
|
HRESULT hr;
|
|
|
|
TRACE("outer_unk=%p %s\n", outer_unk, shdebugstr_guid(riid));
|
|
|
|
if (outer_unk && !IsEqualIID(riid, &IID_IUnknown))
|
|
return CLASS_E_NOAGGREGATION;
|
|
|
|
sf = LocalAlloc(LMEM_ZEROINIT, sizeof(*sf));
|
|
if (!sf)
|
|
return E_OUTOFMEMORY;
|
|
|
|
sf->ref = 1;
|
|
sf->IUnknown_inner.lpVtbl = &unkvt;
|
|
sf->IShellFolder2_iface.lpVtbl = &sfvt;
|
|
sf->IPersistFolder3_iface.lpVtbl = &pfvt;
|
|
sf->IPersistPropertyBag_iface.lpVtbl = &ppbvt;
|
|
sf->IDropTarget_iface.lpVtbl = &dtvt;
|
|
sf->ISFHelper_iface.lpVtbl = &shvt;
|
|
sf->pclsid = clsid;
|
|
sf->outer_unk = outer_unk ? outer_unk : &sf->IUnknown_inner;
|
|
|
|
hr = IUnknown_QueryInterface(&sf->IUnknown_inner, riid, ppv);
|
|
IUnknown_Release(&sf->IUnknown_inner);
|
|
|
|
TRACE ("--%p\n", *ppv);
|
|
return hr;
|
|
}
|
|
|
|
HRESULT WINAPI IFSFolder_Constructor(IUnknown *outer_unk, REFIID riid, void **ppv)
|
|
{
|
|
return create_fs( outer_unk, riid, ppv, &CLSID_ShellFSFolder );
|
|
}
|
|
|
|
HRESULT WINAPI UnixFolder_Constructor(IUnknown *outer_unk, REFIID riid, void **ppv)
|
|
{
|
|
return create_fs( outer_unk, riid, ppv, &CLSID_UnixFolder );
|
|
}
|
|
|
|
HRESULT WINAPI UnixDosFolder_Constructor(IUnknown *outer_unk, REFIID riid, void **ppv)
|
|
{
|
|
return create_fs( outer_unk, riid, ppv, &CLSID_UnixDosFolder );
|
|
}
|
|
|
|
HRESULT WINAPI FolderShortcut_Constructor(IUnknown *outer_unk, REFIID riid, void **ppv)
|
|
{
|
|
return create_fs( outer_unk, riid, ppv, &CLSID_FolderShortcut );
|
|
}
|
|
|
|
HRESULT WINAPI MyDocuments_Constructor(IUnknown *outer_unk, REFIID riid, void **ppv)
|
|
{
|
|
return create_fs( outer_unk, riid, ppv, &CLSID_MyDocuments );
|
|
}
|