2 * Network Places (Neighbourhood) folder
4 * Copyright 1997 Marcus Meissner
5 * Copyright 1998, 1999, 2002 Juergen Schmied
6 * Copyright 2003 Mike McCormack for Codeweavers
7 * Copyright 2009 Andrew Hill
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
26 WINE_DEFAULT_DEBUG_CHANNEL (shell
);
28 #define HACKY_UNC_PATHS
30 #ifdef HACKY_UNC_PATHS
31 LPITEMIDLIST
ILCreateFromNetworkPlaceW(LPCWSTR lpNetworkPlace
)
33 int cbData
= sizeof(WORD
) + sizeof(WCHAR
) * (wcslen(lpNetworkPlace
)+1);
34 LPITEMIDLIST pidl
= (LPITEMIDLIST
)SHAlloc(cbData
+ sizeof(WORD
));
38 pidl
->mkid
.cb
= cbData
;
39 wcscpy((WCHAR
*)&pidl
->mkid
.abID
[0], lpNetworkPlace
);
40 *(WORD
*)((char*)pidl
+ cbData
) = 0;
46 /***********************************************************************
47 * IShellFolder implementation
50 HRESULT
CNetFolderExtractIcon_CreateInstance(LPCITEMIDLIST pidl
, REFIID riid
, LPVOID
* ppvOut
)
52 CComPtr
<IDefaultExtractIconInit
> initIcon
;
53 HRESULT hr
= SHCreateDefaultExtractIcon(IID_PPV_ARG(IDefaultExtractIconInit
, &initIcon
));
54 if (FAILED_UNEXPECTEDLY(hr
))
57 initIcon
->SetNormalIcon(swShell32Name
, -IDI_SHELL_NETWORK_FOLDER
);
59 return initIcon
->QueryInterface(riid
, ppvOut
);
62 HRESULT CALLBACK
NetFolderMenuCallback(IShellFolder
*psf
,
71 case DFM_MERGECONTEXTMENU
:
73 case DFM_INVOKECOMMAND
:
74 case DFM_INVOKECOMMANDEX
:
75 case DFM_GETDEFSTATICID
: // Required for Windows 7 to pick a default
81 class CNetFolderEnum
:
82 public CEnumIDListBase
87 HRESULT WINAPI
Initialize(HWND hwndOwner
, DWORD dwFlags
);
88 BOOL
CreateMyCompEnumList(DWORD dwFlags
);
89 BOOL
EnumerateRec(LPNETRESOURCE lpNet
);
91 BEGIN_COM_MAP(CNetFolderEnum
)
92 COM_INTERFACE_ENTRY_IID(IID_IEnumIDList
, IEnumIDList
)
96 static shvheader NetworkPlacesSFHeader
[] = {
97 {IDS_SHV_COLUMN8
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 15},
98 {IDS_SHV_COLUMN13
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 10},
99 {IDS_SHV_COLUMN_WORKGROUP
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 15},
100 {IDS_SHV_NETWORKLOCATION
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 15}
103 #define COLUMN_NAME 0
104 #define COLUMN_CATEGORY 1
105 #define COLUMN_WORKGROUP 2
106 #define COLUMN_NETLOCATION 3
108 #define NETWORKPLACESSHELLVIEWCOLUMNS 4
110 CNetFolderEnum::CNetFolderEnum()
114 CNetFolderEnum::~CNetFolderEnum()
118 HRESULT WINAPI
CNetFolderEnum::Initialize(HWND hwndOwner
, DWORD dwFlags
)
120 if (CreateMyCompEnumList(dwFlags
) == FALSE
)
126 /**************************************************************************
127 * CDrivesFolderEnum::CreateMyCompEnumList()
130 BOOL
CNetFolderEnum::EnumerateRec(LPNETRESOURCE lpNet
)
136 DWORD dSize
= 0x1000;
140 dRet
= WNetOpenEnum(RESOURCE_GLOBALNET
, RESOURCETYPE_DISK
, 0, lpNet
, &hEnum
);
141 if (dRet
!= WN_SUCCESS
)
143 ERR("WNetOpenEnum() failed: %x\n", dRet
);
147 lpRes
= (LPNETRESOURCE
)CoTaskMemAlloc(dSize
);
150 ERR("CoTaskMemAlloc() failed\n");
151 WNetCloseEnum(hEnum
);
160 memset(lpRes
, 0, dSize
);
161 dRet
= WNetEnumResource(hEnum
, &dCount
, lpRes
, &dSize
);
162 if (dRet
== WN_SUCCESS
|| dRet
== WN_MORE_DATA
)
165 for (; dCount
; dCount
--)
167 TRACE("lpRemoteName: %S\n", lpCur
->lpRemoteName
);
169 if ((lpCur
->dwUsage
& RESOURCEUSAGE_CONTAINER
) == RESOURCEUSAGE_CONTAINER
)
171 TRACE("Found provider: %S\n", lpCur
->lpProvider
);
178 #ifdef HACKY_UNC_PATHS
179 pidl
= ILCreateFromNetworkPlaceW(lpCur
->lpRemoteName
);
182 bRet
= AddToEnumList(pidl
);
185 ERR("ILCreateFromPathW() failed\n");
194 } while (dRet
!= WN_NO_MORE_ENTRIES
);
196 CoTaskMemFree(lpRes
);
197 WNetCloseEnum(hEnum
);
199 TRACE("Done: %u\n", bRet
);
204 BOOL
CNetFolderEnum::CreateMyCompEnumList(DWORD dwFlags
)
208 TRACE("(%p)->(flags=0x%08x)\n", this, dwFlags
);
210 /* enumerate the folders */
211 if (dwFlags
& SHCONTF_FOLDERS
)
213 bRet
= EnumerateRec(NULL
);
219 CNetFolder::CNetFolder()
224 CNetFolder::~CNetFolder()
230 /**************************************************************************
231 * CNetFolder::ParseDisplayName
233 HRESULT WINAPI
CNetFolder::ParseDisplayName(HWND hwndOwner
, LPBC pbcReserved
, LPOLESTR lpszDisplayName
,
234 DWORD
*pchEaten
, PIDLIST_RELATIVE
*ppidl
, DWORD
*pdwAttributes
)
236 HRESULT hr
= E_UNEXPECTED
;
237 #ifdef HACKY_UNC_PATHS
238 /* FIXME: the code below is an ugly hack */
240 /* Can we use a CFSFolder on that path? */
241 DWORD attrs
= GetFileAttributes(lpszDisplayName
);
242 if ((attrs
& FILE_ATTRIBUTE_DIRECTORY
))
245 *pchEaten
= 0; /* strange but like the original */
249 /* Create our hacky pidl */
250 LPITEMIDLIST pidl
= ILCreateFromNetworkPlaceW(lpszDisplayName
);
254 *pdwAttributes
= SFGAO_FILESYSTEM
| SFGAO_CANLINK
| SFGAO_FOLDER
| SFGAO_HASSUBFOLDER
| SFGAO_FILESYSANCESTOR
;
259 TRACE("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n", this,
260 hwndOwner
, pbcReserved
, lpszDisplayName
, debugstr_w (lpszDisplayName
),
261 pchEaten
, ppidl
, pdwAttributes
);
265 *pchEaten
= 0; /* strange but like the original */
267 TRACE("(%p)->(-- ret=0x%08x)\n", this, hr
);
272 /**************************************************************************
273 * CNetFolder::EnumObjects
275 HRESULT WINAPI
CNetFolder::EnumObjects(HWND hwndOwner
, DWORD dwFlags
, LPENUMIDLIST
*ppEnumIDList
)
277 return ShellObjectCreatorInit
<CNetFolderEnum
>(hwndOwner
, dwFlags
, IID_PPV_ARG(IEnumIDList
, ppEnumIDList
));
280 /**************************************************************************
281 * CNetFolder::BindToObject
283 HRESULT WINAPI
CNetFolder::BindToObject(PCUIDLIST_RELATIVE pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
*ppvOut
)
285 #ifdef HACKY_UNC_PATHS
286 PITEMID_CHILD pidlChild
= ILCloneFirst (pidl
);
290 PIDLIST_ABSOLUTE pidlAbsolute
= ILCombine(pidlRoot
,pidlChild
);
294 CComPtr
<IShellFolder
> psf
;
295 HRESULT hr
= SHELL32_CoCreateInitSF(pidlAbsolute
,
296 (WCHAR
*)pidl
->mkid
.abID
,
298 &CLSID_ShellFSFolder
,
300 IID_PPV_ARG(IShellFolder
, &psf
));
302 ILFree(pidlAbsolute
);
304 if (FAILED_UNEXPECTEDLY(hr
))
307 if (_ILIsPidlSimple (pidl
))
308 return psf
->QueryInterface(riid
, ppvOut
);
310 return psf
->BindToObject(ILGetNext (pidl
), pbcReserved
, riid
, ppvOut
);
316 /**************************************************************************
317 * CNetFolder::BindToStorage
319 HRESULT WINAPI
CNetFolder::BindToStorage(PCUIDLIST_RELATIVE pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
*ppvOut
)
321 FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", this,
322 pidl
, pbcReserved
, shdebugstr_guid (&riid
), ppvOut
);
328 /**************************************************************************
329 * CNetFolder::CompareIDs
332 HRESULT WINAPI
CNetFolder::CompareIDs(LPARAM lParam
, PCUIDLIST_RELATIVE pidl1
, PCUIDLIST_RELATIVE pidl2
)
337 /**************************************************************************
338 * CNetFolder::CreateViewObject
340 HRESULT WINAPI
CNetFolder::CreateViewObject(HWND hwndOwner
, REFIID riid
, LPVOID
*ppvOut
)
342 CComPtr
<IShellView
> pShellView
;
343 HRESULT hr
= E_INVALIDARG
;
345 TRACE("(%p)->(hwnd=%p,%s,%p)\n", this,
346 hwndOwner
, shdebugstr_guid (&riid
), ppvOut
);
353 if (IsEqualIID(riid
, IID_IDropTarget
))
355 WARN("IDropTarget not implemented\n");
358 else if (IsEqualIID(riid
, IID_IContextMenu
))
360 WARN("IContextMenu not implemented\n");
363 else if (IsEqualIID(riid
, IID_IShellView
))
365 hr
= CDefView_Constructor(this, riid
, ppvOut
);
367 TRACE("-- (%p)->(interface=%p)\n", this, ppvOut
);
371 /**************************************************************************
372 * CNetFolder::GetAttributesOf
374 HRESULT WINAPI
CNetFolder::GetAttributesOf(UINT cidl
, PCUITEMID_CHILD_ARRAY apidl
, DWORD
*rgfInOut
)
376 static const DWORD dwNethoodAttributes
=
377 SFGAO_STORAGE
| SFGAO_HASPROPSHEET
| SFGAO_STORAGEANCESTOR
|
378 SFGAO_FILESYSANCESTOR
| SFGAO_FOLDER
| SFGAO_FILESYSTEM
| SFGAO_HASSUBFOLDER
| SFGAO_CANRENAME
| SFGAO_CANDELETE
;
381 TRACE("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n", this,
382 cidl
, apidl
, rgfInOut
, rgfInOut
? *rgfInOut
: 0);
393 *rgfInOut
= dwNethoodAttributes
;
396 /* FIXME: Implement when enumerating items is implemented */
397 #ifdef HACKY_UNC_PATHS
398 *rgfInOut
= SFGAO_FILESYSTEM
| SFGAO_CANLINK
| SFGAO_FOLDER
| SFGAO_HASSUBFOLDER
| SFGAO_FILESYSANCESTOR
;
402 /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
403 *rgfInOut
&= ~SFGAO_VALIDATE
;
405 TRACE("-- result=0x%08x\n", *rgfInOut
);
409 /**************************************************************************
410 * CNetFolder::GetUIObjectOf
413 * hwndOwner [in] Parent window for any output
414 * cidl [in] array size
415 * apidl [in] simple pidl array
416 * riid [in] Requested Interface
417 * prgfInOut [ ] reserved
418 * ppvObject [out] Resulting Interface
421 HRESULT WINAPI
CNetFolder::GetUIObjectOf(HWND hwndOwner
, UINT cidl
, PCUITEMID_CHILD_ARRAY apidl
, REFIID riid
,
422 UINT
* prgfInOut
, LPVOID
* ppvOut
)
425 HRESULT hr
= E_INVALIDARG
;
427 TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n", this,
428 hwndOwner
, cidl
, apidl
, shdebugstr_guid (&riid
), prgfInOut
, ppvOut
);
435 if (IsEqualIID(riid
, IID_IContextMenu
) && (cidl
>= 1))
437 IContextMenu
* pCm
= NULL
;
440 AddClassKeyToArray(L
"Folder", &hkey
, &cKeys
);
441 hr
= CDefFolderMenu_Create2(pidlRoot
, hwndOwner
, cidl
, apidl
, this, NetFolderMenuCallback
, cKeys
, &hkey
, &pCm
);
444 else if (IsEqualIID(riid
, IID_IDataObject
) && (cidl
>= 1))
446 IDataObject
* pDo
= NULL
;
447 hr
= IDataObject_Constructor (hwndOwner
, pidlRoot
, apidl
, cidl
, &pDo
);
450 else if ((IsEqualIID(riid
, IID_IExtractIconA
) || IsEqualIID(riid
, IID_IExtractIconW
)) && (cidl
== 1))
452 hr
= CNetFolderExtractIcon_CreateInstance(apidl
[0], riid
, &pObj
);
454 else if (IsEqualIID(riid
, IID_IDropTarget
) && (cidl
>= 1))
456 IDropTarget
* pDt
= NULL
;
457 hr
= this->QueryInterface(IID_PPV_ARG(IDropTarget
, &pDt
));
463 if (SUCCEEDED(hr
) && !pObj
)
467 TRACE("(%p)->hr=0x%08x\n", this, hr
);
471 /**************************************************************************
472 * CNetFolder::GetDisplayNameOf
475 HRESULT WINAPI
CNetFolder::GetDisplayNameOf(PCUITEMID_CHILD pidl
, DWORD dwFlags
, LPSTRRET strRet
)
477 if (!strRet
|| !pidl
|| !pidl
->mkid
.cb
)
480 #ifdef HACKY_UNC_PATHS
481 return SHSetStrRet(strRet
, (LPCWSTR
)pidl
->mkid
.abID
);
486 /**************************************************************************
487 * CNetFolder::SetNameOf
488 * Changes the name of a file object or subfolder, possibly changing its item
489 * identifier in the process.
492 * hwndOwner [in] Owner window for output
493 * pidl [in] simple pidl of item to change
494 * lpszName [in] the items new display name
495 * dwFlags [in] SHGNO formatting flags
496 * ppidlOut [out] simple pidl returned
498 HRESULT WINAPI
CNetFolder::SetNameOf(HWND hwndOwner
, PCUITEMID_CHILD pidl
, /*simple pidl */
499 LPCOLESTR lpName
, DWORD dwFlags
, PITEMID_CHILD
*pPidlOut
)
501 FIXME("(%p)->(%p,pidl=%p,%s,%u,%p)\n", this,
502 hwndOwner
, pidl
, debugstr_w (lpName
), dwFlags
, pPidlOut
);
506 HRESULT WINAPI
CNetFolder::GetDefaultSearchGUID(GUID
*pguid
)
508 FIXME("(%p)\n", this);
512 HRESULT WINAPI
CNetFolder::EnumSearches(IEnumExtraSearch
** ppenum
)
514 FIXME("(%p)\n", this);
518 HRESULT WINAPI
CNetFolder::GetDefaultColumn (DWORD dwRes
, ULONG
*pSort
, ULONG
*pDisplay
)
520 TRACE("(%p)\n", this);
530 HRESULT WINAPI
CNetFolder::GetDefaultColumnState(UINT iColumn
, DWORD
*pcsFlags
)
532 TRACE("(%p)\n", this);
534 if (!pcsFlags
|| iColumn
>= NETWORKPLACESSHELLVIEWCOLUMNS
)
536 *pcsFlags
= NetworkPlacesSFHeader
[iColumn
].pcsFlags
;
540 HRESULT WINAPI
CNetFolder::GetDetailsEx(PCUITEMID_CHILD pidl
, const SHCOLUMNID
*pscid
, VARIANT
*pv
)
542 FIXME("(%p)\n", this);
546 HRESULT WINAPI
CNetFolder::GetDetailsOf(PCUITEMID_CHILD pidl
, UINT iColumn
, SHELLDETAILS
*psd
)
548 if (iColumn
>= NETWORKPLACESSHELLVIEWCOLUMNS
)
551 psd
->fmt
= NetworkPlacesSFHeader
[iColumn
].fmt
;
552 psd
->cxChar
= NetworkPlacesSFHeader
[iColumn
].cxChar
;
554 return SHSetStrRet(&psd
->str
, NetworkPlacesSFHeader
[iColumn
].colnameid
);
556 if (iColumn
== COLUMN_NAME
)
557 return GetDisplayNameOf(pidl
, SHGDN_NORMAL
, &psd
->str
);
559 FIXME("(%p)->(%p %i %p)\n", this, pidl
, iColumn
, psd
);
564 HRESULT WINAPI
CNetFolder::MapColumnToSCID(UINT column
, SHCOLUMNID
*pscid
)
566 FIXME("(%p)\n", this);
571 /************************************************************************
572 * CNetFolder::GetClassID
574 HRESULT WINAPI
CNetFolder::GetClassID(CLSID
*lpClassId
)
576 TRACE("(%p)\n", this);
581 *lpClassId
= CLSID_NetworkPlaces
;
586 /************************************************************************
587 * CNetFolder::Initialize
589 * NOTES: it makes no sense to change the pidl
591 HRESULT WINAPI
CNetFolder::Initialize(LPCITEMIDLIST pidl
)
594 SHFree((LPVOID
)pidlRoot
);
596 pidlRoot
= ILClone(pidl
);
600 /**************************************************************************
601 * CNetFolder::GetCurFolder
603 HRESULT WINAPI
CNetFolder::GetCurFolder(LPITEMIDLIST
*pidl
)
605 TRACE("(%p)->(%p)\n", this, pidl
);
610 *pidl
= ILClone(pidlRoot
);