Something went wrong. Try again.
Reactos
Something went wrong. Try again.
1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179/* * PROJECT: shell32 * LICENSE: LGPL-2.1-or-later (https://spdx.org/licenses/LGPL-2.1-or-later) * PURPOSE: file system folder * COPYRIGHT: Copyright 1997 Marcus Meissner * Copyright 1998, 1999, 2002 Juergen Schmied * Copyright 2019-2024 Katayama Hirofumi MZ * Copyright 2020 Mark Jansen (mark.jansen@reactos.org) */
#include <precomp.h>
WINE_DEFAULT_DEBUG_CHANNEL (shell);
static HRESULT SHELL32_GetCLSIDForDirectory(LPCWSTR pwszDir, LPCWSTR KeyName, CLSID* pclsidFolder);
static BOOL ItemIsFolder(PCUITEMID_CHILD pidl){ const BYTE mask = PT_FS | PT_FS_FOLDER_FLAG | PT_FS_FILE_FLAG; const BYTE type = _ILGetType(pidl); return (type & mask) == (PT_FS | PT_FS_FOLDER_FLAG) || (type == PT_FS && ILGetNext(pidl));}
static LPCWSTR GetItemFileName(PCUITEMID_CHILD pidl, LPWSTR Buf, UINT cchMax){ FileStructW* pDataW = _ILGetFileStructW(pidl); if (pDataW) return pDataW->wszName; LPPIDLDATA pdata = _ILGetDataPointer(pidl); if (_ILGetFSType(pidl) & PT_FS_UNICODE_FLAG) return (LPWSTR)pdata->u.file.szNames; if (_ILSimpleGetTextW(pidl, Buf, cchMax)) return Buf; return NULL;}
static BOOL IsRealItem(const ITEMIDLIST &idl){ // PIDLs created with SHSimpleIDListFromPath contain no data, otherwise, the item is "real" FileStruct &fsitem = ((PIDLDATA*)idl.mkid.abID)->u.file; return fsitem.dwFileSize | fsitem.uFileDate;}
static void GetItemDescription(PCUITEMID_CHILD pidl, LPWSTR Buf, UINT cchMax){ HRESULT hr = E_FAIL; if (ItemIsFolder(pidl)) { hr = SHELL32_AssocGetFSDirectoryDescription(Buf, cchMax); } else { WCHAR temp[MAX_PATH]; LPCWSTR name = GetItemFileName(pidl, temp, _countof(temp)); hr = SHELL32_AssocGetFileDescription(name ? name : L"", Buf, cchMax); } if (FAILED(hr) && cchMax) Buf[0] = UNICODE_NULL;}
static HKEY OpenKeyFromFileType(LPCWSTR pExtension, LPCWSTR KeyName){ HKEY hkey;
WCHAR FullName[MAX_PATH]; DWORD dwSize = sizeof(FullName); wsprintf(FullName, L"%s\\%s", pExtension, KeyName);
LONG res = RegOpenKeyExW(HKEY_CLASSES_ROOT, FullName, 0, KEY_READ, &hkey); if (!res) return hkey;
res = RegGetValueW(HKEY_CLASSES_ROOT, pExtension, NULL, RRF_RT_REG_SZ, NULL, FullName, &dwSize); if (res) { WARN("Failed to get progid for extension %S (%x), error %d\n", pExtension, pExtension, res); return NULL; }
wcscat(FullName, L"\\"); wcscat(FullName, KeyName);
hkey = NULL; res = RegOpenKeyExW(HKEY_CLASSES_ROOT, FullName, 0, KEY_READ, &hkey); if (res) WARN("Could not open key %S for extension %S\n", KeyName, pExtension);
return hkey;}
static LPCWSTR ExtensionFromPidl(PCUIDLIST_RELATIVE pidl, LPWSTR Buf, UINT cchMax, BOOL AllowFolder = FALSE){ if (!AllowFolder && !_ILIsValue(pidl)) { ERR("Invalid pidl!\n"); return NULL; }
LPCWSTR name = GetItemFileName(pidl, Buf, cchMax); LPCWSTR pExtension = name ? PathFindExtensionW(name) : NULL; if (!pExtension || *pExtension == UNICODE_NULL) { WARN("No extension for %S!\n", name); return NULL; } return pExtension;}
static HRESULT GetCLSIDForFileTypeFromExtension(LPCWSTR pExtension, LPCWSTR KeyName, CLSID* pclsid){ HKEY hkeyProgId = OpenKeyFromFileType(pExtension, KeyName); if (!hkeyProgId) { WARN("OpenKeyFromFileType failed for key %S\n", KeyName); return S_FALSE; }
WCHAR wszCLSIDValue[CHARS_IN_GUID]; DWORD dwSize = sizeof(wszCLSIDValue); LONG res = RegGetValueW(hkeyProgId, NULL, NULL, RRF_RT_REG_SZ, NULL, wszCLSIDValue, &dwSize); RegCloseKey(hkeyProgId); if (res) { ERR("OpenKeyFromFileType succeeded but RegGetValueW failed\n"); return S_FALSE; }
#if 0 { res = RegGetValueW(HKEY_LOCAL_MACHINE, L"Software\\Microsoft\\Windows\\CurrentVersion\\Shell Extensions\\Approved", wszCLSIDValue, RRF_RT_REG_SZ, NULL, NULL, NULL); if (res != ERROR_SUCCESS) { ERR("DropHandler extension %S not approved\n", wszName); return E_ACCESSDENIED; } }#endif
if (RegGetValueW(HKEY_LOCAL_MACHINE, L"Software\\Microsoft\\Windows\\CurrentVersion\\Shell Extensions\\Blocked", wszCLSIDValue, RRF_RT_REG_SZ, NULL, NULL, NULL) == ERROR_SUCCESS) { ERR("Extension %S not approved\n", wszCLSIDValue); return E_ACCESSDENIED; }
HRESULT hres = CLSIDFromString (wszCLSIDValue, pclsid); if (FAILED_UNEXPECTEDLY(hres)) return hres;
return S_OK;}
HRESULT GetCLSIDForFileType(PCUIDLIST_RELATIVE pidl, LPCWSTR KeyName, CLSID* pclsid){ WCHAR buf[256]; LPCWSTR pExtension = ExtensionFromPidl(pidl, buf, _countof(buf)); if (!pExtension) return S_FALSE;
return GetCLSIDForFileTypeFromExtension(pExtension, KeyName, pclsid);}
HRESULT GetItemCLSID(PCUIDLIST_RELATIVE pidl, CLSID *pclsid){ WCHAR buf[256]; LPCWSTR pExt = ExtensionFromPidl(pidl, buf, _countof(buf), TRUE); if (!pExt) return E_FAIL; HRESULT hr = E_FAIL; if (!ItemIsFolder(pidl)) hr = GetCLSIDForFileTypeFromExtension(pExt, L"CLSID", pclsid); // TODO: Should we handle folders with desktop.ini here? if (hr != S_OK && pExt[0] == '.' && pExt[1] == '{') hr = CLSIDFromString(pExt + 1, pclsid); return hr;}
static HRESULTgetDefaultIconLocation(LPWSTR szIconFile, UINT cchMax, int *piIndex, UINT uFlags){ if (!HLM_GetIconW(IDI_SHELL_FOLDER - 1, szIconFile, cchMax, piIndex)) { if (!HCR_GetIconW(L"Folder", szIconFile, NULL, cchMax, piIndex)) { StringCchCopyW(szIconFile, cchMax, swShell32Name); *piIndex = -IDI_SHELL_FOLDER; } }
if (uFlags & GIL_OPENICON) { // next icon if (*piIndex < 0) (*piIndex)--; else (*piIndex)++; }
return S_OK;}
static BOOLgetShellClassInfo(LPCWSTR Entry, LPWSTR pszValue, DWORD cchValueLen, LPCWSTR IniFile){ return GetPrivateProfileStringW(L".ShellClassInfo", Entry, NULL, pszValue, cchValueLen, IniFile);}
static HRESULTgetIconLocationForFolder(IShellFolder * psf, PCITEMID_CHILD pidl, UINT uFlags, LPWSTR szIconFile, UINT cchMax, int *piIndex, UINT *pwFlags){ DWORD dwFileAttrs; WCHAR wszPath[MAX_PATH]; WCHAR wszIniFullPath[MAX_PATH];
if (uFlags & GIL_DEFAULTICON) goto Quit;
// get path if (!ILGetDisplayNameExW(psf, pidl, wszPath, 0)) goto Quit; if (!PathIsDirectoryW(wszPath)) goto Quit;
// read-only or system folder? dwFileAttrs = _ILGetFileAttributes(ILFindLastID(pidl), NULL, 0); if ((dwFileAttrs & (FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_READONLY)) == 0) goto Quit;
// build the full path of ini file StringCchCopyW(wszIniFullPath, _countof(wszIniFullPath), wszPath); PathAppendW(wszIniFullPath, L"desktop.ini");
WCHAR wszValue[MAX_PATH], wszTemp[MAX_PATH]; if (getShellClassInfo(L"IconFile", wszValue, _countof(wszValue), wszIniFullPath)) { // wszValue --> wszTemp ExpandEnvironmentStringsW(wszValue, wszTemp, _countof(wszTemp));
// wszPath + wszTemp --> wszPath if (PathIsRelativeW(wszTemp)) PathAppendW(wszPath, wszTemp); else StringCchCopyW(wszPath, _countof(wszPath), wszTemp);
// wszPath --> szIconFile GetFullPathNameW(wszPath, cchMax, szIconFile, NULL);
*piIndex = GetPrivateProfileIntW(L".ShellClassInfo", L"IconIndex", 0, wszIniFullPath); return S_OK; } else if (getShellClassInfo(L"CLSID", wszValue, _countof(wszValue), wszIniFullPath) && HCR_GetIconW(wszValue, szIconFile, NULL, cchMax, piIndex)) { return S_OK; } else if (getShellClassInfo(L"CLSID2", wszValue, _countof(wszValue), wszIniFullPath) && HCR_GetIconW(wszValue, szIconFile, NULL, cchMax, piIndex)) { return S_OK; } else if (getShellClassInfo(L"IconResource", wszValue, _countof(wszValue), wszIniFullPath)) { // wszValue --> wszTemp ExpandEnvironmentStringsW(wszValue, wszTemp, _countof(wszTemp));
// parse the icon location *piIndex = PathParseIconLocationW(wszTemp);
// wszPath + wszTemp --> wszPath if (PathIsRelativeW(wszTemp)) PathAppendW(wszPath, wszTemp); else StringCchCopyW(wszPath, _countof(wszPath), wszTemp);
// wszPath --> szIconFile GetFullPathNameW(wszPath, cchMax, szIconFile, NULL); return S_OK; }
Quit: return getDefaultIconLocation(szIconFile, cchMax, piIndex, uFlags);}
HRESULT CFSExtractIcon_CreateInstance(IShellFolder * psf, LPCITEMIDLIST pidl, REFIID iid, LPVOID * ppvOut){ CComPtr<IDefaultExtractIconInit> initIcon; HRESULT hr; int icon_idx = 0; UINT flags = 0; // FIXME: Use it! WCHAR wTemp[MAX_PATH] = L"";
hr = SHCreateDefaultExtractIcon(IID_PPV_ARG(IDefaultExtractIconInit,&initIcon)); if (FAILED(hr)) return hr;
if (_ILIsFolder (pidl)) { if (SUCCEEDED(getIconLocationForFolder(psf, pidl, 0, wTemp, _countof(wTemp), &icon_idx, &flags))) { initIcon->SetNormalIcon(wTemp, icon_idx); // FIXME: if/when getIconLocationForFolder does something for // GIL_FORSHORTCUT, code below should be uncommented. and // the following line removed. initIcon->SetShortcutIcon(wTemp, icon_idx); } if (SUCCEEDED(getIconLocationForFolder(psf, pidl, GIL_DEFAULTICON, wTemp, _countof(wTemp), &icon_idx, &flags))) { initIcon->SetDefaultIcon(wTemp, icon_idx); } // if (SUCCEEDED(getIconLocationForFolder(psf, // pidl, GIL_FORSHORTCUT, wTemp, _countof(wTemp), // &icon_idx, // &flags))) // { // initIcon->SetShortcutIcon(wTemp, icon_idx); // } if (SUCCEEDED(getIconLocationForFolder(psf, pidl, GIL_OPENICON, wTemp, _countof(wTemp), &icon_idx, &flags))) { initIcon->SetOpenIcon(wTemp, icon_idx); } } else { WCHAR extbuf[256]; LPCWSTR pExtension = ExtensionFromPidl(pidl, extbuf, _countof(extbuf)); HKEY hkey = pExtension ? OpenKeyFromFileType(pExtension, L"DefaultIcon") : NULL; if (!hkey) { DWORD dwSize = sizeof(wTemp); if (RegGetValueW(HKEY_CLASSES_ROOT, pExtension, L"PerceivedType", RRF_RT_REG_SZ, NULL, wTemp, &dwSize) == ERROR_SUCCESS) { WCHAR szSubKey[MAX_PATH]; StringCchPrintfW(szSubKey, _countof(szSubKey), L"SystemFileAssociations\\%s\\DefaultIcon", wTemp); RegOpenKeyExW(HKEY_CLASSES_ROOT, szSubKey, 0, KEY_READ, &hkey); } }
DWORD dwSize = sizeof(wTemp); if (hkey && !SHQueryValueExW(hkey, NULL, NULL, NULL, wTemp, &dwSize)) { WCHAR sNum[5]; if (ParseFieldW (wTemp, 2, sNum, 5)) icon_idx = _wtoi(sNum); else icon_idx = 0; /* sometimes the icon number is missing */ ParseFieldW (wTemp, 1, wTemp, MAX_PATH); PathUnquoteSpacesW(wTemp);
if (!wcscmp(L"%1", wTemp)) /* icon is in the file */ { ILGetDisplayNameExW(psf, pidl, wTemp, ILGDN_FORPARSING); icon_idx = 0;
INT ret = PrivateExtractIconsW(wTemp, 0, 0, 0, NULL, NULL, 0, 0); if (ret <= 0) { StringCbCopyW(wTemp, sizeof(wTemp), swShell32Name); if (lstrcmpiW(pExtension, L".exe") == 0 || lstrcmpiW(pExtension, L".scr") == 0) icon_idx = -IDI_SHELL_EXE; else icon_idx = -IDI_SHELL_DOCUMENT; } }
initIcon->SetNormalIcon(wTemp, icon_idx); } else { initIcon->SetNormalIcon(swShell32Name, 0); }
if (hkey) RegCloseKey(hkey); }
return initIcon->QueryInterface(iid, ppvOut);}
/*CFileSysEnum should do an initial FindFirstFile and do a FindNextFile as each file isreturned by Next. When the enumerator is created, it can do numerous additional operationsincluding formatting a drive, reconnecting a network share drive, and requesting a diskbe inserted in a removable drive.*/
class CFileSysEnum : public CEnumIDListBase{private: HRESULT _AddFindResult(LPWSTR sParentDir, const WIN32_FIND_DATAW& FindData, DWORD dwFlags) {#define SUPER_HIDDEN (FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_SYSTEM)
// Does it need special handling because it is hidden? if (FindData.dwFileAttributes & FILE_ATTRIBUTE_HIDDEN) { DWORD dwHidden = FindData.dwFileAttributes & SUPER_HIDDEN;
// Is it hidden, but are we not asked to include hidden? if (dwHidden == FILE_ATTRIBUTE_HIDDEN && !(dwFlags & SHCONTF_INCLUDEHIDDEN)) return S_OK;
// Is it a system file, but are we not asked to include those? if (dwHidden == SUPER_HIDDEN && !(dwFlags & SHCONTF_INCLUDESUPERHIDDEN)) return S_OK; }
BOOL bDirectory = (FindData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) != 0;
HRESULT hr; if (bDirectory) { // Skip the current and parent directory nodes if (!strcmpW(FindData.cFileName, L".") || !strcmpW(FindData.cFileName, L"..")) return S_OK;
// Does this directory need special handling? if ((FindData.dwFileAttributes & (FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_READONLY)) != 0) { WCHAR Tmp[MAX_PATH]; CLSID clsidFolder;
PathCombineW(Tmp, sParentDir, FindData.cFileName);
hr = SHELL32_GetCLSIDForDirectory(Tmp, L"CLSID", &clsidFolder); if (SUCCEEDED(hr)) { ERR("Got CLSID override for '%S'\n", Tmp); } } } else { CLSID clsidFile; LPWSTR pExtension = PathFindExtensionW(FindData.cFileName); if (pExtension) { // FIXME: Cache this? hr = GetCLSIDForFileTypeFromExtension(pExtension, L"CLSID", &clsidFile); if (hr == S_OK) { HKEY hkey; hr = SHRegGetCLSIDKeyW(clsidFile, L"ShellFolder", FALSE, FALSE, &hkey); if (SUCCEEDED(hr)) { ::RegCloseKey(hkey);
// This should be presented as directory! bDirectory = TRUE; TRACE("Treating '%S' as directory!\n", FindData.cFileName); } } } }
LPITEMIDLIST pidl = NULL; if (bDirectory) { if (dwFlags & SHCONTF_FOLDERS) { TRACE("(%p)-> (folder=%s)\n", this, debugstr_w(FindData.cFileName)); pidl = _ILCreateFromFindDataW(&FindData); } } else { if (dwFlags & SHCONTF_NONFOLDERS) { TRACE("(%p)-> (file =%s)\n", this, debugstr_w(FindData.cFileName)); pidl = _ILCreateFromFindDataW(&FindData); } }
if (pidl && !AddToEnumList(pidl)) { FAILED_UNEXPECTEDLY(E_FAIL); return E_FAIL; }
return S_OK; }
public: CFileSysEnum() {
}
~CFileSysEnum() { }
HRESULT WINAPI Initialize(LPWSTR sPathTarget, DWORD dwFlags) { TRACE("(%p)->(path=%s flags=0x%08x)\n", this, debugstr_w(sPathTarget), dwFlags);
if (!sPathTarget || !sPathTarget[0]) { WARN("No path for CFileSysEnum, empty result!\n"); return S_FALSE; }
WCHAR szFindPattern[MAX_PATH]; HRESULT hr = StringCchCopyW(szFindPattern, _countof(szFindPattern), sPathTarget); if (FAILED_UNEXPECTEDLY(hr)) return hr;
/* FIXME: UNSAFE CRAP */ PathAddBackslashW(szFindPattern);
hr = StringCchCatW(szFindPattern, _countof(szFindPattern), L"*.*"); if (FAILED_UNEXPECTEDLY(hr)) return hr;
WIN32_FIND_DATAW FindData; HANDLE hFind = FindFirstFileW(szFindPattern, &FindData); if (hFind == INVALID_HANDLE_VALUE) return HRESULT_FROM_WIN32(GetLastError());
do { hr = _AddFindResult(sPathTarget, FindData, dwFlags);
if (FAILED_UNEXPECTEDLY(hr)) break;
} while(FindNextFileW(hFind, &FindData));
if (SUCCEEDED(hr)) { DWORD dwError = GetLastError(); if (dwError != ERROR_NO_MORE_FILES) { hr = HRESULT_FROM_WIN32(dwError); FAILED_UNEXPECTEDLY(hr); } } TRACE("(%p)->(hr=0x%08x)\n", this, hr); FindClose(hFind); return hr; }
BEGIN_COM_MAP(CFileSysEnum) COM_INTERFACE_ENTRY_IID(IID_IEnumIDList, IEnumIDList) END_COM_MAP()};
/*********************************************************************** * IShellFolder implementation */
CFSFolder::CFSFolder(){ m_pclsid = &CLSID_ShellFSFolder; m_sPathTarget = NULL; m_pidlRoot = NULL; m_bGroupPolicyActive = 0;}
CFSFolder::~CFSFolder(){ TRACE("-- destroying IShellFolder(%p)\n", this);
SHFree(m_pidlRoot); SHFree(m_sPathTarget);}
static const shvheader GenericSFHeader[] = { {IDS_SHV_COLUMN_NAME, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_LEFT, 18}, {IDS_SHV_COLUMN_SIZE, SHCOLSTATE_TYPE_INT | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10}, {IDS_SHV_COLUMN_TYPE, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_LEFT, 10}, {IDS_SHV_COLUMN_MODIFIED, SHCOLSTATE_TYPE_DATE | SHCOLSTATE_ONBYDEFAULT, LVCFMT_LEFT, 15}, {IDS_SHV_COLUMN_ATTRIBUTES, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_LEFT, 8}, {IDS_SHV_COLUMN_COMMENTS, SHCOLSTATE_TYPE_STR | SHCOLSTATE_SLOW, LVCFMT_LEFT, 10}, // We don't currently support comments but CRegFolder does};
#define GENERICSHELLVIEWCOLUMNS _countof(GenericSFHeader)
HRESULT CFSFolder::GetFSColumnDetails(UINT iColumn, SHELLDETAILS &sd){ if (iColumn >= _countof(GenericSFHeader)) return E_INVALIDARG;
sd.fmt = GenericSFHeader[iColumn].fmt; sd.cxChar = GenericSFHeader[iColumn].cxChar; return SHSetStrRet(&sd.str, GenericSFHeader[iColumn].colnameid);}
HRESULT CFSFolder::GetDefaultFSColumnState(UINT iColumn, SHCOLSTATEF &csFlags){ if (iColumn >= _countof(GenericSFHeader)) return E_INVALIDARG;
csFlags = GenericSFHeader[iColumn].colstate; return S_OK;}
static HRESULT SHELL32_GetCLSIDForDirectory(LPCWSTR pwszDir, LPCWSTR KeyName, CLSID* pclsidFolder){ WCHAR wszCLSIDValue[CHARS_IN_GUID]; WCHAR wszDesktopIni[MAX_PATH];
StringCchCopyW(wszDesktopIni, MAX_PATH, pwszDir); StringCchCatW(wszDesktopIni, MAX_PATH, L"\\desktop.ini");
if (GetPrivateProfileStringW(L".ShellClassInfo", KeyName, L"", wszCLSIDValue, CHARS_IN_GUID, wszDesktopIni)) { return CLSIDFromString(wszCLSIDValue, pclsidFolder); } return E_FAIL;}
HRESULT SHELL32_GetFSItemAttributes(IShellFolder * psf, LPCITEMIDLIST pidl, LPDWORD pdwAttributes){ DWORD dwFileAttributes, dwShellAttributes;
if (!_ILIsFolderOrFile(pidl)) { ERR("Got wrong type of pidl!\n"); *pdwAttributes &= SFGAO_CANLINK; return S_OK; }
dwFileAttributes = _ILGetFileAttributes(pidl, NULL, 0);
/* Set common attributes */ dwShellAttributes = SFGAO_CANCOPY | SFGAO_CANMOVE | SFGAO_CANLINK | SFGAO_CANRENAME | SFGAO_CANDELETE | SFGAO_HASPROPSHEET | SFGAO_DROPTARGET | SFGAO_FILESYSTEM;
BOOL bDirectory = (dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) != 0;
if (SFGAO_VALIDATE & *pdwAttributes) { STRRET strret; LPWSTR path; if (SUCCEEDED(psf->GetDisplayNameOf(pidl, SHGDN_FORPARSING, &strret)) && SUCCEEDED(StrRetToStrW(&strret, pidl, &path))) { BOOL exists = PathFileExistsW(path); SHFree(path); if (!exists) return E_FAIL; } }
if (!bDirectory) { // https://git.reactos.org/?p=reactos.git;a=blob;f=dll/shellext/zipfldr/res/zipfldr.rgs;hb=032b5aacd233cd7b83ab6282aad638c161fdc400#l9 WCHAR szFileName[MAX_PATH]; LPWSTR pExtension; BOOL hasName = _ILSimpleGetTextW(pidl, szFileName, _countof(szFileName)); dwShellAttributes |= SFGAO_STREAM;
// Vista+ feature: Hidden files with a leading tilde treated as super-hidden // See https://devblogs.microsoft.com/oldnewthing/20170526-00/?p=96235 if (hasName && szFileName[0] == '~' && (dwFileAttributes & FILE_ATTRIBUTE_HIDDEN)) dwShellAttributes |= SFGAO_HIDDEN | SFGAO_SYSTEM;
if (hasName && (pExtension = PathFindExtensionW(szFileName))) { CLSID clsidFile; // FIXME: Cache this? HRESULT hr = GetCLSIDForFileTypeFromExtension(pExtension, L"CLSID", &clsidFile); if (hr == S_OK) { HKEY hkey; hr = SHRegGetCLSIDKeyW(clsidFile, L"ShellFolder", FALSE, FALSE, &hkey); if (SUCCEEDED(hr)) { DWORD dwAttributes = 0; DWORD dwSize = sizeof(dwAttributes); LSTATUS Status;
Status = SHRegGetValueW(hkey, NULL, L"Attributes", RRF_RT_REG_DWORD, NULL, &dwAttributes, &dwSize); if (Status == STATUS_SUCCESS) { TRACE("Augmenting '%S' with dwAttributes=0x%x\n", szFileName, dwAttributes); dwShellAttributes |= dwAttributes; } ::RegCloseKey(hkey);
// This should be presented as directory! bDirectory = (dwAttributes & SFGAO_FOLDER) != 0 || dwAttributes == 0; TRACE("Treating '%S' as directory!\n", szFileName); } } } }
// This is a directory if (bDirectory) { dwShellAttributes |= (SFGAO_FOLDER | /*SFGAO_HASSUBFOLDER |*/ SFGAO_STORAGE);
// Is this a real directory? if (dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { dwShellAttributes |= (SFGAO_FILESYSANCESTOR | SFGAO_STORAGEANCESTOR); } }
if (dwFileAttributes & FILE_ATTRIBUTE_HIDDEN) dwShellAttributes |= SFGAO_HIDDEN | SFGAO_GHOSTED;
if (dwFileAttributes & FILE_ATTRIBUTE_READONLY) dwShellAttributes |= SFGAO_READONLY;
if (dwFileAttributes & FILE_ATTRIBUTE_SYSTEM) dwShellAttributes |= SFGAO_SYSTEM;
if (dwFileAttributes & FILE_ATTRIBUTE_COMPRESSED) dwShellAttributes |= SFGAO_COMPRESSED;
if (dwFileAttributes & FILE_ATTRIBUTE_ENCRYPTED) dwShellAttributes |= SFGAO_ENCRYPTED;
if ((SFGAO_NONENUMERATED & *pdwAttributes) && (dwFileAttributes & FILE_ATTRIBUTE_HIDDEN)) { SHCONTF shcf = SHELL_GetDefaultFolderEnumSHCONTF(); if ((!(shcf & SHCONTF_INCLUDEHIDDEN)) || ((dwFileAttributes & FILE_ATTRIBUTE_SYSTEM) && !(shcf & SHCONTF_INCLUDESUPERHIDDEN))) dwShellAttributes |= SFGAO_NONENUMERATED; }
if (SFGAO_LINK & *pdwAttributes) { WCHAR ext[MAX_PATH];
if (_ILGetExtension(pidl, ext, _countof(ext)) && !lstrcmpiW(ext, L"lnk")) dwShellAttributes |= SFGAO_LINK; }
if (SFGAO_HASSUBFOLDER & *pdwAttributes) { CComPtr<IShellFolder> psf2; if (SUCCEEDED(psf->BindToObject(pidl, 0, IID_PPV_ARG(IShellFolder, &psf2)))) { CComPtr<IEnumIDList> pEnumIL; if (SUCCEEDED(psf2->EnumObjects(0, SHCONTF_FOLDERS, &pEnumIL))) { if (pEnumIL->Skip(1) == S_OK) dwShellAttributes |= SFGAO_HASSUBFOLDER; } } }
*pdwAttributes = dwShellAttributes;
TRACE ("-- 0x%08x\n", *pdwAttributes); return S_OK;}
// This method is typically invoked from SHSimpleIDListFromPathA/W.HRESULT CFSFolder::_ParseSimple( _In_ LPOLESTR lpszDisplayName, _Inout_ WIN32_FIND_DATAW *pFind, _Out_ LPITEMIDLIST *ppidl){ HRESULT hr; LPWSTR pchNext = lpszDisplayName;
*ppidl = NULL;
const DWORD finalattr = pFind->dwFileAttributes; const DWORD finalsizelo = pFind->nFileSizeLow; LPITEMIDLIST pidl; for (hr = S_OK; SUCCEEDED(hr); hr = SHILAppend(pidl, ppidl)) { hr = Shell_NextElement(&pchNext, pFind->cFileName, _countof(pFind->cFileName), FALSE); if (hr != S_OK) break;
pFind->dwFileAttributes = pchNext ? FILE_ATTRIBUTE_DIRECTORY : finalattr; pFind->nFileSizeLow = pchNext ? 0 : finalsizelo; pidl = _ILCreateFromFindDataW(pFind); if (!pidl) { hr = E_OUTOFMEMORY; break; } }
if (SUCCEEDED(hr)) return S_OK;
if (*ppidl) { ILFree(*ppidl); *ppidl = NULL; }
return hr;}
BOOL CFSFolder::_GetFindDataFromName(_In_ LPCWSTR pszName, _Out_ WIN32_FIND_DATAW *pFind){ WCHAR szPath[MAX_PATH]; lstrcpynW(szPath, m_sPathTarget, _countof(szPath)); PathAppendW(szPath, pszName);
HANDLE hFind = ::FindFirstFileW(szPath, pFind); if (hFind == INVALID_HANDLE_VALUE) return FALSE;
::FindClose(hFind); return TRUE;}
HRESULT CFSFolder::_CreateIDListFromName(LPCWSTR pszName, DWORD attrs, IBindCtx *pbc, LPITEMIDLIST *ppidl){ *ppidl = NULL;
if (PathIsDosDevice(pszName)) return HRESULT_FROM_WIN32(ERROR_BAD_DEVICE);
WIN32_FIND_DATAW FindData = { 0 };
HRESULT hr = S_OK; if (attrs == ULONG_MAX) // Invalid attributes { if (!_GetFindDataFromName(pszName, &FindData)) hr = HRESULT_FROM_WIN32(::GetLastError()); } else // Pretend as an item of attrs { StringCchCopyW(FindData.cFileName, _countof(FindData.cFileName), pszName); FindData.dwFileAttributes = attrs; }
if (FAILED(hr)) return hr;
*ppidl = _ILCreateFromFindDataW(&FindData); if (!*ppidl) return E_OUTOFMEMORY;
return S_OK;}
/*************************************************************************** CFSFolder::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 mycoputer-pidl** FIXME* pdwAttributes is not set* pchEaten is not set like in windows*/HRESULT WINAPI CFSFolder::ParseDisplayName(HWND hwndOwner, LPBC pbc, LPOLESTR lpszDisplayName, DWORD *pchEaten, PIDLIST_RELATIVE *ppidl, DWORD *pdwAttributes){ TRACE ("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n", this, hwndOwner, pbc, lpszDisplayName, debugstr_w (lpszDisplayName), pchEaten, ppidl, pdwAttributes);
if (!ppidl) return E_INVALIDARG;
*ppidl = NULL;
if (!lpszDisplayName) return E_INVALIDARG;
HRESULT hr; WIN32_FIND_DATAW FindData; if (SHIsFileSysBindCtx(pbc, &FindData) == S_OK) { CComHeapPtr<ITEMIDLIST> pidlTemp; hr = _ParseSimple(lpszDisplayName, &FindData, &pidlTemp); if (SUCCEEDED(hr) && pdwAttributes && *pdwAttributes) { LPCITEMIDLIST pidlLast = ILFindLastID(pidlTemp); GetAttributesOf(1, &pidlLast, pdwAttributes); }
if (SUCCEEDED(hr)) *ppidl = pidlTemp.Detach(); } else { INT cchElement = lstrlenW(lpszDisplayName) + 1; LPWSTR pszElement = (LPWSTR)_alloca(cchElement * sizeof(WCHAR)); LPWSTR pchNext = lpszDisplayName; hr = Shell_NextElement(&pchNext, pszElement, cchElement, TRUE); if (FAILED(hr)) return hr;
hr = _CreateIDListFromName(pszElement, ULONG_MAX, pbc, ppidl); if (FAILED(hr)) { if (pchNext) // Is there the next element? { // pszElement seems like a directory if (_GetFindDataFromName(pszElement, &FindData) && (FindData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)) { hr = _CreateIDListFromName(pszElement, FILE_ATTRIBUTE_DIRECTORY, pbc, ppidl); } } else { // pszElement seems like a non-directory if ((hr == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) || hr == HRESULT_FROM_WIN32(ERROR_PATH_NOT_FOUND)) && (BindCtx_GetMode(pbc, 0) & STGM_CREATE)) { // Pretend like a normal file hr = _CreateIDListFromName(pszElement, FILE_ATTRIBUTE_NORMAL, pbc, ppidl); } } }
if (SUCCEEDED(hr)) { if (pchNext) // Is there next? { CComPtr<IShellFolder> psfChild; hr = BindToObject(*ppidl, pbc, IID_PPV_ARG(IShellFolder, &psfChild)); if (FAILED(hr)) return hr;
DWORD chEaten; CComHeapPtr<ITEMIDLIST> pidlChild; hr = psfChild->ParseDisplayName(hwndOwner, pbc, pchNext, &chEaten, &pidlChild, pdwAttributes);
// Append pidlChild to ppidl if (SUCCEEDED(hr)) hr = SHILAppend(pidlChild.Detach(), ppidl); } else if (pdwAttributes && *pdwAttributes) { GetAttributesOf(1, (LPCITEMIDLIST*)ppidl, pdwAttributes); } } }
TRACE("(%p)->(-- pidl=%p ret=0x%08x)\n", this, ppidl ? *ppidl : 0, hr);
return hr;}
/*************************************************************************** CFSFolder::EnumObjects* PARAMETERS* HWND hwndOwner, //[in ] Parent Window* DWORD grfFlags, //[in ] SHCONTF enumeration mask* LPENUMIDLIST* ppenumIDList //[out] IEnumIDList interface*/HRESULT WINAPI CFSFolder::EnumObjects( HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST *ppEnumIDList){ return ShellObjectCreatorInit<CFileSysEnum>(m_sPathTarget, dwFlags, IID_PPV_ARG(IEnumIDList, ppEnumIDList));}
/*************************************************************************** CFSFolder::BindToObject* PARAMETERS* LPCITEMIDLIST pidl, //[in ] relative pidl to open* LPBC pbc, //[in ] optional FileSystemBindData context* REFIID riid, //[in ] Initial Interface* LPVOID* ppvObject //[out] Interface**/HRESULT WINAPI CFSFolder::BindToObject( PCUIDLIST_RELATIVE pidl, LPBC pbc, REFIID riid, LPVOID * ppvOut){ TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", this, pidl, pbc, shdebugstr_guid(&riid), ppvOut);
CComPtr<IShellFolder> pSF; HRESULT hr;
if (!m_pidlRoot || !ppvOut || !pidl || !pidl->mkid.cb) { ERR("CFSFolder::BindToObject: Invalid parameters\n"); return E_INVALIDARG; }
/* Get the pidl data */ FileStruct* pData = &_ILGetDataPointer(pidl)->u.file; WCHAR szNameBuf[MAX_PATH]; LPCWSTR pszName = GetItemFileName(pidl, szNameBuf, _countof(szNameBuf)); if (!pszName) { ERR("CFSFolder::BindToObject: Invalid pidl!\n"); return E_INVALIDARG; }
*ppvOut = NULL;
/* Create the target folder info */ PERSIST_FOLDER_TARGET_INFO pfti = {0}; pfti.dwAttributes = -1; pfti.csidl = -1; PathCombineW(pfti.szTargetParsingName, m_sPathTarget, pszName);
/* Get the CLSID to bind to */ CLSID clsidFolder; if (_ILIsFolder(pidl)) { if ((pData->uFileAttribs & (FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_READONLY)) != 0) { hr = SHELL32_GetCLSIDForDirectory(pfti.szTargetParsingName, L"CLSID", &clsidFolder);
if (SUCCEEDED(hr)) { /* We got a GUID from a desktop.ini, let's try it */ hr = SHELL32_BindToSF(m_pidlRoot, &pfti, pidl, &clsidFolder, riid, ppvOut); if (SUCCEEDED(hr)) { TRACE("-- returning (%p) %08x, (%s)\n", *ppvOut, hr, wine_dbgstr_guid(&clsidFolder)); return hr; }
/* Something went wrong, re-try it with a normal ShellFSFolder */ ERR("CFSFolder::BindToObject: %s failed to bind, using fallback (0x%08x)\n", wine_dbgstr_guid(&clsidFolder), hr); } } /* No system folder or the custom class failed */ clsidFolder = CLSID_ShellFSFolder; } else { hr = GetCLSIDForFileType(pidl, L"CLSID", &clsidFolder); if (hr == S_FALSE) return HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND); if (hr != S_OK) return hr; }
hr = SHELL32_BindToSF(m_pidlRoot, &pfti, pidl, &clsidFolder, riid, ppvOut); if (FAILED_UNEXPECTEDLY(hr)) return hr;
TRACE ("-- returning (%p) %08x\n", *ppvOut, hr);
return S_OK;
}
/*************************************************************************** CFSFolder::BindToStorage* PARAMETERS* LPCITEMIDLIST pidl, //[in ] complex pidl to store* LPBC pbc, //[in ] reserved* REFIID riid, //[in ] Initial storage interface* LPVOID* ppvObject //[out] Interface* returned*/HRESULT WINAPI CFSFolder::BindToStorage( PCUIDLIST_RELATIVE pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut){ FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", this, pidl, pbcReserved, shdebugstr_guid (&riid), ppvOut);
*ppvOut = NULL; return E_NOTIMPL;}
HRESULT CFSFolder::CompareSortFoldersFirst(LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2){ BOOL bIsFolder1 = _ILIsFolder(pidl1), bIsFolder2 = _ILIsFolder(pidl2); // When sorting between a File and a Folder, the Folder gets sorted first if (bIsFolder1 != bIsFolder2) { // ...but only if neither of them were generated by SHSimpleIDListFromPath // because in that case we cannot tell if it's a file or a folder. if (pidl1 && IsRealItem(*pidl1) && pidl2 && IsRealItem(*pidl2)) return MAKE_COMPARE_HRESULT(bIsFolder1 ? -1 : 1); } return MAKE_SCODE(SEVERITY_ERROR, FACILITY_SHELL, S_EQUAL);}
/*************************************************************************** CFSFolder::CompareIDs*/
HRESULT WINAPI CFSFolder::CompareIDs(LPARAM lParam, PCUIDLIST_RELATIVE pidl1, PCUIDLIST_RELATIVE pidl2){ WCHAR szNameBuf1[MAX_PATH], szNameBuf2[_countof(szNameBuf1)]; LPCWSTR pszName1 = GetItemFileName(pidl1, szNameBuf1, _countof(szNameBuf1)); LPCWSTR pszName2 = GetItemFileName(pidl2, szNameBuf2, _countof(szNameBuf2)); if (!pszName1 || !pszName2 || LOWORD(lParam) >= GENERICSHELLVIEWCOLUMNS) return E_INVALIDARG;
LPPIDLDATA pData1 = _ILGetDataPointer(pidl1); LPPIDLDATA pData2 = _ILGetDataPointer(pidl2); HRESULT hr = CompareSortFoldersFirst(pidl1, pidl2); if (SUCCEEDED(hr)) return hr; int result = 0; switch (LOWORD(lParam)) { case SHFSF_COL_NAME: result = CompareUiStrings(pszName1, pszName2, lParam); break; case SHFSF_COL_SIZE: if (pData1->u.file.dwFileSize > pData2->u.file.dwFileSize) result = 1; else if (pData1->u.file.dwFileSize < pData2->u.file.dwFileSize) result = -1; else result = 0; break; case SHFSF_COL_TYPE: { SHFILEINFOW info1, info2; enum { flags = SHGFI_PIDL | SHGFI_TYPENAME }; if (SHGetFileInfoW((LPCWSTR)pidl1, 0, &info1, sizeof(info1), flags) && SHGetFileInfoW((LPCWSTR)pidl2, 0, &info2, sizeof(info2), flags)) { result = CompareUiStrings(info1.szTypeName, info2.szTypeName, lParam); } break; } case SHFSF_COL_MDATE: result = pData1->u.file.uFileDate - pData2->u.file.uFileDate; if (result == 0) result = pData1->u.file.uFileTime - pData2->u.file.uFileTime; break; case SHFSF_COL_FATTS: return SHELL32_CompareDetails(this, lParam, pidl1, pidl2); case SHFSF_COL_COMMENT: result = 0; break; default: if (_ILIsPidlSimple(pidl1) || _ILIsPidlSimple(pidl2)) ERR("Unknown column %u, can't compare\n", LOWORD(lParam)); else TRACE("Unknown column %u, deferring to the subfolder\n", LOWORD(lParam)); }
if (result == 0) return SHELL32_CompareChildren(this, lParam, pidl1, pidl2);
return MAKE_COMPARE_HRESULT(result);}
/*************************************************************************** CFSFolder::CreateViewObject*/HRESULT WINAPI CFSFolder::CreateViewObject(HWND hwndOwner, REFIID riid, LPVOID * ppvOut){ CComPtr<IShellView> pShellView; HRESULT hr = E_INVALIDARG;
TRACE ("(%p)->(hwnd=%p,%s,%p)\n", this, hwndOwner, shdebugstr_guid (&riid), ppvOut);
if (ppvOut) { *ppvOut = NULL;
BOOL bIsDropTarget = IsEqualIID (riid, IID_IDropTarget); BOOL bIsShellView = !bIsDropTarget && IsEqualIID (riid, IID_IShellView);
if (bIsDropTarget || bIsShellView) { DWORD dwDirAttributes = _ILGetFileAttributes(ILFindLastID(m_pidlRoot), NULL, 0);
if ((dwDirAttributes & (FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_READONLY)) != 0) { CLSID clsidFolder; hr = SHELL32_GetCLSIDForDirectory(m_sPathTarget, L"UICLSID", &clsidFolder); if (SUCCEEDED(hr)) { CComPtr<IPersistFolder> spFolder; hr = SHCoCreateInstance(NULL, &clsidFolder, NULL, IID_PPV_ARG(IPersistFolder, &spFolder)); if (!FAILED_UNEXPECTEDLY(hr)) { hr = spFolder->Initialize(m_pidlRoot);
if (!FAILED_UNEXPECTEDLY(hr)) { hr = spFolder->QueryInterface(riid, ppvOut); } } } else { // No desktop.ini, or no UICLSID present, continue as if nothing happened hr = E_INVALIDARG; } } }
if (!SUCCEEDED(hr)) { // No UICLSID handler found, continue to the default handlers if (bIsDropTarget) { hr = CFSDropTarget_CreateInstance(m_sPathTarget, riid, ppvOut); } else if (bIsShellView) { SFV_CREATE sfvparams = { sizeof(SFV_CREATE), this, NULL, this }; hr = SHCreateShellFolderView(&sfvparams, (IShellView**)ppvOut); } else if (IsEqualIID(riid, IID_IContextMenu)) { CRegKeyHandleArray keys; AddClassKeyToArray(L"Directory\\Background", keys, keys); DEFCONTEXTMENU dcm = { hwndOwner, this, m_pidlRoot, this, 0, NULL, NULL, keys, keys }; hr = SHCreateDefaultContextMenu(&dcm, riid, ppvOut); } else { hr = E_INVALIDARG; } } } TRACE("-- (%p)->(interface=%p)\n", this, ppvOut); return hr;}
/*************************************************************************** CFSFolder::GetAttributesOf** PARAMETERS* UINT cidl, //[in ] num elements in pidl array* LPCITEMIDLIST* apidl, //[in ] simple pidl array* ULONG* rgfInOut) //[out] result array**/HRESULT WINAPI CFSFolder::GetAttributesOf(UINT cidl, PCUITEMID_CHILD_ARRAY apidl, DWORD * rgfInOut){ HRESULT hr = S_OK;
if (!rgfInOut) return E_INVALIDARG; if (cidl && !apidl) return E_INVALIDARG;
if (*rgfInOut == 0) *rgfInOut = ~0;
if(cidl == 0) { LPCITEMIDLIST rpidl = ILFindLastID(m_pidlRoot);
if (_ILIsFolderOrFile(rpidl)) { SHELL32_GetFSItemAttributes(this, rpidl, rgfInOut); } else if (_ILIsDrive(rpidl)) { IShellFolder *psfParent = NULL; hr = SHBindToParent(m_pidlRoot, IID_PPV_ARG(IShellFolder, &psfParent), NULL); if(SUCCEEDED(hr)) { hr = psfParent->GetAttributesOf(1, &rpidl, (SFGAOF*)rgfInOut); psfParent->Release(); } } else { ERR("Got and unknown pidl!\n"); } } else { while (cidl > 0 && *apidl) { pdump(*apidl); if (_ILIsFolderOrFile(*apidl)) SHELL32_GetFSItemAttributes(this, *apidl, rgfInOut); else ERR("Got an unknown type of pidl!!!\n"); apidl++; cidl--; } } /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */ *rgfInOut &= ~SFGAO_VALIDATE;
TRACE("-- result=0x%08x\n", *rgfInOut);
return hr;}
/*************************************************************************** CFSFolder::GetUIObjectOf** 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.*/HRESULT WINAPI CFSFolder::GetUIObjectOf(HWND hwndOwner, UINT cidl, PCUITEMID_CHILD_ARRAY apidl, REFIID riid, UINT * prgfInOut, LPVOID * ppvOut){ LPVOID 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 && _ILIsValue(apidl[0])) { hr = _CreateExtensionUIObject(apidl[0], riid, ppvOut); if(hr != S_FALSE) return hr; }
if (IsEqualIID(riid, IID_IContextMenu) && (cidl >= 1)) { CRegKeyHandleArray keys; AddFSClassKeysToArray(cidl, apidl, keys, keys); DEFCONTEXTMENU dcm = { hwndOwner, this, m_pidlRoot, this, cidl, apidl, NULL, keys, keys }; hr = SHCreateDefaultContextMenu(&dcm, riid, &pObj); } else if (IsEqualIID (riid, IID_IDataObject)) { if (cidl >= 1) { hr = IDataObject_Constructor (hwndOwner, m_pidlRoot, apidl, cidl, TRUE, (IDataObject **)&pObj); } else { hr = E_INVALIDARG; } } else if ((IsEqualIID (riid, IID_IExtractIconA) || IsEqualIID (riid, IID_IExtractIconW)) && (cidl == 1)) { if (_ILIsValue(apidl[0])) hr = _GetIconHandler(apidl[0], riid, (LPVOID*)&pObj); if (hr != S_OK) hr = CFSExtractIcon_CreateInstance(this, apidl[0], riid, &pObj); } else if (IsEqualIID (riid, IID_IDropTarget)) { /* only interested in attempting to bind to shell folders, not files (except exe), so if we fail, rebind to root */ if (cidl != 1 || FAILED(hr = this->_GetDropTarget(apidl[0], (LPVOID*) &pObj))) { hr = CFSDropTarget_CreateInstance(m_sPathTarget, riid, (LPVOID*) &pObj); } } else hr = E_NOINTERFACE;
if (SUCCEEDED(hr) && !pObj) hr = E_OUTOFMEMORY;
*ppvOut = pObj; } TRACE("(%p)->hr=0x%08x\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. */BOOL SHELL_FS_HideExtension(LPCWSTR szPath){ HKEY hKey; BOOL doHide = FALSE; /* The default value is FALSE (win98 at least) */ LONG lError;
doHide = !SHELL_GetSetting(SSF_SHOWEXTENSIONS, fShowExtensions);
if (!doHide) { LPCWSTR DotExt = PathFindExtensionW(szPath); if (*DotExt != 0) { WCHAR classname[MAX_PATH]; LONG classlen = sizeof(classname); lError = RegQueryValueW(HKEY_CLASSES_ROOT, DotExt, classname, &classlen); if (lError == ERROR_SUCCESS) { lError = RegOpenKeyW(HKEY_CLASSES_ROOT, classname, &hKey); if (lError == ERROR_SUCCESS) { lError = RegQueryValueExW(hKey, L"NeverShowExt", NULL, NULL, NULL, NULL); if (lError == ERROR_SUCCESS) doHide = TRUE;
RegCloseKey(hKey); } } } } // TODO: else if "AlwaysShowExt"
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); }}
/*************************************************************************** CFSFolder::GetDisplayNameOf* 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*/
HRESULT WINAPI CFSFolder::GetDisplayNameOf(PCUITEMID_CHILD pidl, DWORD dwFlags, LPSTRRET strRet){ if (!strRet) return E_INVALIDARG;
/* If it is a complex pidl, let the child handle it */ if (!_ILIsPidlSimple (pidl)) /* complex pidl */ { return SHELL32_GetDisplayNameOfChild(this, pidl, dwFlags, strRet); } else if (pidl && !pidl->mkid.cb) /* empty pidl */ { /* If it is an empty pidl return only the path of the folder */ if ((GET_SHGDN_FOR(dwFlags) & SHGDN_FORPARSING) && (GET_SHGDN_RELATION(dwFlags) != SHGDN_INFOLDER) && m_sPathTarget) { return SHSetStrRet(strRet, m_sPathTarget); } return E_INVALIDARG; }
int len = 0; LPWSTR pszPath = (LPWSTR)CoTaskMemAlloc((MAX_PATH + 1) * sizeof(WCHAR)); if (!pszPath) return E_OUTOFMEMORY;
if ((GET_SHGDN_FOR(dwFlags) & SHGDN_FORPARSING) && (GET_SHGDN_RELATION(dwFlags) != SHGDN_INFOLDER) && m_sPathTarget) { lstrcpynW(pszPath, m_sPathTarget, MAX_PATH); PathAddBackslashW(pszPath); len = wcslen(pszPath); } _ILSimpleGetTextW(pidl, pszPath + len, MAX_PATH + 1 - len); if (!_ILIsFolder(pidl)) SHELL_FS_ProcessDisplayFilename(pszPath, dwFlags);
strRet->uType = STRRET_WSTR; strRet->pOleStr = pszPath;
TRACE ("-- (%p)->(%s)\n", this, strRet->uType == STRRET_CSTR ? strRet->cStr : debugstr_w(strRet->pOleStr)); return S_OK;}
/*************************************************************************** CFSFolder::SetNameOf* 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*/HRESULT WINAPI CFSFolder::SetNameOf( HWND hwndOwner, PCUITEMID_CHILD pidl, LPCOLESTR lpName, DWORD dwFlags, PITEMID_CHILD *pPidlOut){ WCHAR szSrc[MAX_PATH + 1], szDest[MAX_PATH + 1], szNameBuf[MAX_PATH]; BOOL bIsFolder = ItemIsFolder(ILFindLastID(pidl));
TRACE ("(%p)->(%p,pidl=%p,%s,%u,%p)\n", this, hwndOwner, pidl, debugstr_w (lpName), dwFlags, pPidlOut);
if (pPidlOut) *pPidlOut = NULL;
LPCWSTR pszName = GetItemFileName(pidl, szNameBuf, _countof(szNameBuf)); if (!pszName) { ERR("Got garbage pidl:\n"); pdump_always(pidl); return E_INVALIDARG; }
/* build source path */ PathCombineW(szSrc, m_sPathTarget, pszName);
/* build destination path */ if (dwFlags == SHGDN_NORMAL || dwFlags & SHGDN_INFOLDER) PathCombineW(szDest, m_sPathTarget, lpName); else lstrcpynW(szDest, lpName, MAX_PATH);
if (!(dwFlags & SHGDN_FORPARSING) && !bIsFolder && SHELL_FS_HideExtension(szSrc)) { LPCWSTR ext = PathFindExtensionW(szSrc); if (*ext) PathAddExtensionW(szDest, ext); }
HRESULT hr = S_OK; TRACE ("src=%s dest=%s\n", debugstr_w(szSrc), debugstr_w(szDest)); if (!wcscmp(szSrc, szDest)) { /* src and destination is the same */ if (pPidlOut) hr = SHILClone(pidl, pPidlOut); } else { hr = SHELL_SingleFileOperation(hwndOwner, FO_RENAME, szSrc, szDest, FOF_SILENT | FOF_ALLOWUNDO, NULL); if (SUCCEEDED(hr) && pPidlOut) hr = ParseDisplayName(hwndOwner, NULL, PathFindFileNameW(szDest), NULL, pPidlOut, NULL); } return hr;}
HRESULT WINAPI CFSFolder::GetDefaultSearchGUID(GUID * pguid){ FIXME ("(%p)\n", this); return E_NOTIMPL;}
HRESULT WINAPI CFSFolder::EnumSearches(IEnumExtraSearch ** ppenum){ FIXME ("(%p)\n", this); return E_NOTIMPL;}
HRESULT WINAPI CFSFolder::GetDefaultColumn(DWORD dwRes, ULONG * pSort, ULONG * pDisplay){ TRACE ("(%p)\n", this);
if (pSort) *pSort = 0; if (pDisplay) *pDisplay = 0;
return S_OK;}
HRESULT WINAPI CFSFolder::GetDefaultColumnState(UINT iColumn, SHCOLSTATEF *pcsFlags){ TRACE ("(%p)\n", this);
if (!pcsFlags) return E_INVALIDARG; else return GetDefaultFSColumnState(iColumn, *pcsFlags);}
HRESULT WINAPI CFSFolder::GetDetailsEx(PCUITEMID_CHILD pidl, const SHCOLUMNID *pscid, VARIANT *pv){ if (!_ILGetFSType(pidl)) return E_INVALIDARG; HRESULT hr; if (pscid->fmtid == FMTID_ShellDetails) { switch (pscid->pid) { case PID_DESCRIPTIONID: { if (FAILED(hr = SHELL_CreateVariantBuffer(pv, sizeof(SHDESCRIPTIONID)))) return hr; SHDESCRIPTIONID *pDID = (SHDESCRIPTIONID*)V_ARRAY(pv)->pvData; if (ItemIsFolder(pidl)) pDID->dwDescriptionId = SHDID_FS_DIRECTORY; else if (_ILGetFSType(pidl) & PT_FS_FILE_FLAG) pDID->dwDescriptionId = SHDID_FS_FILE; else pDID->dwDescriptionId = SHDID_FS_OTHER; if (FAILED(GetItemCLSID(pidl, &pDID->clsid))) pDID->clsid = CLSID_NULL; return S_OK; } } } // Handle non-string fields here when possible instead of deferring to GetDetailsOf const FileStruct &fsitem = ((PIDLDATA*)pidl->mkid.abID)->u.file; if (pscid->fmtid == FMTID_Storage) { switch (pscid->pid) { case PID_STG_NAME: // Handled directly here for faster performance return SHELL_GetDetailsOfAsStringVariant(this, pidl, SHFSF_COL_NAME, pv); case PID_STG_SIZE: V_VT(pv) = VT_UI4; V_UI4(pv) = _ILGetFileSize(pidl, NULL, 0); return S_OK; case PID_STG_ATTRIBUTES: V_VT(pv) = VT_UI4; V_UI4(pv) = fsitem.uFileAttribs; return S_OK; case PID_STG_WRITETIME: V_VT(pv) = VT_DATE; if (DosDateTimeToVariantTime(fsitem.uFileDate, fsitem.uFileTime, &V_DATE(pv))) return S_OK; break; } } return SH32_GetDetailsOfPKeyAsVariant(this, pidl, pscid, pv, TRUE);}
HRESULT WINAPI CFSFolder::GetDetailsOf(PCUITEMID_CHILD pidl, UINT iColumn, SHELLDETAILS * psd){ HRESULT hr = E_FAIL;
TRACE ("(%p)->(%p %i %p)\n", this, pidl, iColumn, psd);
if (!psd || iColumn >= GENERICSHELLVIEWCOLUMNS) return E_INVALIDARG;
if (!pidl) { /* the header titles */ return GetFSColumnDetails(iColumn, *psd); } else { FILETIME ft; hr = S_OK; psd->str.uType = STRRET_WSTR; if (iColumn != SHFSF_COL_NAME) { psd->str.pOleStr = (LPWSTR)CoTaskMemAlloc(MAX_PATH * sizeof(WCHAR)); if (!psd->str.pOleStr) return E_OUTOFMEMORY; } /* the data from the pidl */ switch (iColumn) { case SHFSF_COL_NAME: hr = GetDisplayNameOf(pidl, SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str); break; case SHFSF_COL_SIZE: _ILGetFileSize(pidl, psd->str.pOleStr, MAX_PATH); break; case SHFSF_COL_TYPE: GetItemDescription(pidl, psd->str.pOleStr, MAX_PATH); break; case SHFSF_COL_MDATE: if (!_ILGetFileDateTime(pidl, &ft) || FAILED(FormatDateTime(ft, psd->str.pOleStr, MAX_PATH))) { *psd->str.pOleStr = UNICODE_NULL; hr = S_FALSE; } break; case SHFSF_COL_FATTS: _ILGetFileAttributes(pidl, psd->str.pOleStr, MAX_PATH); break; case SHFSF_COL_COMMENT: psd->str.pOleStr[0] = UNICODE_NULL; // TODO: Extract comment from .lnk files? desktop.ini? break;#if DBG default: ERR("Missing case for column %d\n", iColumn);#else DEFAULT_UNREACHABLE;#endif } }
return hr;}
HRESULT WINAPI CFSFolder::MapColumnToSCID(UINT column, SHCOLUMNID *pscid){ switch (column) { case SHFSF_COL_NAME: return MakeSCID(*pscid, FMTID_Storage, PID_STG_NAME); case SHFSF_COL_SIZE: return MakeSCID(*pscid, FMTID_Storage, PID_STG_SIZE); case SHFSF_COL_TYPE: return MakeSCID(*pscid, FMTID_Storage, PID_STG_STORAGETYPE); case SHFSF_COL_MDATE: return MakeSCID(*pscid, FMTID_Storage, PID_STG_WRITETIME); case SHFSF_COL_FATTS: return MakeSCID(*pscid, FMTID_Storage, PID_STG_ATTRIBUTES); case SHFSF_COL_COMMENT: return MakeSCID(*pscid, FMTID_SummaryInformation, PIDSI_COMMENTS); } return E_INVALIDARG;}
/************************************************************************ * CFSFolder::GetClassID */HRESULT WINAPI CFSFolder::GetClassID(CLSID * lpClassId){ TRACE ("(%p)\n", this);
if (!lpClassId) return E_POINTER;
*lpClassId = *m_pclsid;
return S_OK;}
/************************************************************************ * CFSFolder::Initialize * * NOTES * m_sPathTarget is not set. Don't know how to handle in a non rooted environment. */HRESULT WINAPI CFSFolder::Initialize(PCIDLIST_ABSOLUTE pidl){ WCHAR wszTemp[MAX_PATH];
TRACE ("(%p)->(%p)\n", this, pidl);
SHFree(m_pidlRoot); /* free the old pidl */ m_pidlRoot = ILClone (pidl); /* set my pidl */
SHFree (m_sPathTarget); m_sPathTarget = NULL;
/* set my path */ HRESULT hr = E_FAIL; if (SHGetPathFromIDListW (pidl, wszTemp)) hr = SHStrDupW(wszTemp, &m_sPathTarget);
TRACE ("--(%p)->(%s)\n", this, debugstr_w(m_sPathTarget)); return hr;}
/************************************************************************** * CFSFolder::GetCurFolder */HRESULT WINAPI CFSFolder::GetCurFolder(PIDLIST_ABSOLUTE * pidl){ TRACE ("(%p)->(%p)\n", this, pidl);
if (!pidl) return E_POINTER;
*pidl = ILClone(m_pidlRoot); return S_OK;}
/************************************************************************** * CFSFolder::InitializeEx * * FIXME: error handling */HRESULT WINAPI CFSFolder::InitializeEx(IBindCtx * pbc, LPCITEMIDLIST pidlRootx, const PERSIST_FOLDER_TARGET_INFO * ppfti){ WCHAR wszTemp[MAX_PATH];
TRACE("(%p)->(%p,%p,%p)\n", this, pbc, pidlRootx, ppfti); if (ppfti) TRACE("--%p %s %s 0x%08x 0x%08x\n", ppfti->pidlTargetFolder, debugstr_w (ppfti->szTargetParsingName), debugstr_w (ppfti->szNetworkProvider), ppfti->dwAttributes, ppfti->csidl);
pdump (pidlRootx); if (ppfti && ppfti->pidlTargetFolder) pdump(ppfti->pidlTargetFolder);
if (m_pidlRoot) __SHFreeAndNil(&m_pidlRoot); /* free the old */ if (m_sPathTarget) __SHFreeAndNil(&m_sPathTarget);
/* * Root path and pidl */ m_pidlRoot = ILClone(pidlRootx);
/* * the target folder is spezified in csidl OR pidlTargetFolder OR * szTargetParsingName */ HRESULT hr = E_FAIL; if (ppfti) { if (ppfti->csidl != -1) { BOOL create = ppfti->csidl & CSIDL_FLAG_CREATE; if (SHGetSpecialFolderPathW(0, wszTemp, ppfti->csidl, create)) hr = SHStrDupW(wszTemp, &m_sPathTarget); } else if (ppfti->szTargetParsingName[0]) { hr = SHStrDupW(ppfti->szTargetParsingName, &m_sPathTarget); } else if (ppfti->pidlTargetFolder) { if (SHGetPathFromIDListW(ppfti->pidlTargetFolder, wszTemp)) hr = SHStrDupW(wszTemp, &m_sPathTarget); } } TRACE("--(%p)->(target=%s)\n", this, debugstr_w(m_sPathTarget)); pdump(m_pidlRoot); return hr;}
HRESULT WINAPI CFSFolder::GetFolderTargetInfo(PERSIST_FOLDER_TARGET_INFO * ppfti){ FIXME("(%p)->(%p)\n", this, ppfti); ZeroMemory(ppfti, sizeof (*ppfti)); return E_NOTIMPL;}
HRESULT CFSFolder::_CreateExtensionUIObject(PCUIDLIST_RELATIVE pidl, REFIID riid, LPVOID *ppvOut){ WCHAR buf[MAX_PATH];
sprintfW(buf, L"ShellEx\\{%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x}", 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]);
CLSID clsid; HRESULT hr;
hr = GetCLSIDForFileType(pidl, buf, &clsid); if (hr != S_OK) return hr;
hr = _CreateShellExtInstance(&clsid, pidl, riid, ppvOut); if (FAILED_UNEXPECTEDLY(hr)) return hr;
return S_OK;}
HRESULT CFSFolder::_GetDropTarget(LPCITEMIDLIST pidl, LPVOID *ppvOut){ HRESULT hr;
TRACE("CFSFolder::_GetDropTarget entered\n");
if (_ILIsFolder (pidl)) { CComPtr<IShellFolder> psfChild; hr = this->BindToObject(pidl, NULL, IID_PPV_ARG(IShellFolder, &psfChild)); if (FAILED_UNEXPECTEDLY(hr)) return hr;
return psfChild->CreateViewObject(NULL, IID_IDropTarget, ppvOut); }
CLSID clsid; hr = GetCLSIDForFileType(pidl, L"shellex\\DropHandler", &clsid); if (hr != S_OK) return hr;
hr = _CreateShellExtInstance(&clsid, pidl, IID_IDropTarget, ppvOut); if (FAILED_UNEXPECTEDLY(hr)) return S_FALSE;
return S_OK;}
HRESULT CFSFolder::_GetIconHandler(LPCITEMIDLIST pidl, REFIID riid, LPVOID *ppvOut){ CLSID clsid; HRESULT hr;
hr = GetCLSIDForFileType(pidl, L"shellex\\IconHandler", &clsid); if (hr != S_OK) return hr;
hr = _CreateShellExtInstance(&clsid, pidl, riid, ppvOut); if (FAILED_UNEXPECTEDLY(hr)) return S_FALSE;
return S_OK;}
HRESULT CFSFolder::_CreateShellExtInstance(const CLSID *pclsid, LPCITEMIDLIST pidl, REFIID riid, LPVOID *ppvOut){ HRESULT hr; WCHAR wszPath[MAX_PATH], szNameBuf[MAX_PATH];
LPCWSTR pszName = GetItemFileName(pidl, szNameBuf, _countof(szNameBuf)); if (!pszName) { ERR("Got garbage pidl\n"); pdump_always(pidl); return E_INVALIDARG; } PathCombineW(wszPath, m_sPathTarget, pszName);
CComPtr<IPersistFile> pp; hr = SHCoCreateInstance(NULL, pclsid, NULL, IID_PPV_ARG(IPersistFile, &pp)); if (FAILED_UNEXPECTEDLY(hr)) return hr;
pp->Load(wszPath, 0);
hr = pp->QueryInterface(riid, ppvOut); if (hr != S_OK) { ERR("Failed to query for interface IID_IShellExtInit hr %x pclsid %s\n", hr, wine_dbgstr_guid(pclsid)); return hr; } return hr;}
HRESULT WINAPI CFSFolder::CallBack(IShellFolder *psf, HWND hwndOwner, IDataObject *pdtobj, UINT uMsg, WPARAM wParam, LPARAM lParam){ enum { IDC_PROPERTIES }; /* no data object means no selection */ if (!pdtobj) { if (uMsg == DFM_INVOKECOMMAND && wParam == IDC_PROPERTIES) { return SHELL_ShowItemIDListProperties(m_pidlRoot); } else if (uMsg == DFM_MERGECONTEXTMENU) { QCMINFO *pqcminfo = (QCMINFO *)lParam; HMENU hpopup = CreatePopupMenu(); _InsertMenuItemW(hpopup, 0, TRUE, IDC_PROPERTIES, MFT_STRING, MAKEINTRESOURCEW(IDS_PROPERTIES), MFS_ENABLED); pqcminfo->idCmdFirst = Shell_MergeMenus(pqcminfo->hmenu, hpopup, pqcminfo->indexMenu, pqcminfo->idCmdFirst, pqcminfo->idCmdLast, MM_ADDSEPARATOR); DestroyMenu(hpopup); return S_OK; } } return SHELL32_DefaultContextMenuCallBack(psf, pdtobj, uMsg);}
static HBITMAP DoLoadPicture(LPCWSTR pszFileName){ // create stream from file HRESULT hr; CComPtr<IStream> pStream; hr = SHCreateStreamOnFileEx(pszFileName, STGM_READ, FILE_ATTRIBUTE_NORMAL, FALSE, NULL, &pStream); if (FAILED(hr)) return NULL;
// load the picture HBITMAP hbm = NULL; CComPtr<IPicture> pPicture; OleLoadPicture(pStream, 0, FALSE, IID_IPicture, (LPVOID *)&pPicture);
// get the bitmap handle if (pPicture) { pPicture->get_Handle((OLE_HANDLE *)&hbm);
// copy the bitmap handle hbm = (HBITMAP)CopyImage(hbm, IMAGE_BITMAP, 0, 0, LR_CREATEDIBSECTION); }
return hbm;}
HRESULT WINAPI CFSFolder::GetCustomViewInfo(ULONG unknown, SFVM_CUSTOMVIEWINFO_DATA *data){ if (data == NULL) { return E_POINTER; } if (data->cbSize != sizeof(*data)) { // NOTE: You have to set the cbData member before SFVM_GET_CUSTOMVIEWINFO call. return E_INVALIDARG; }
data->hbmBack = NULL; data->clrText = CLR_INVALID; data->clrTextBack = CLR_INVALID;
WCHAR szPath[MAX_PATH], szIniFile[MAX_PATH];
// does the folder exists? if (!SHGetPathFromIDListW(m_pidlRoot, szPath) || !PathIsDirectoryW(szPath)) { return E_INVALIDARG; }
// don't use custom view in network path for security if (PathIsNetworkPath(szPath)) { return E_ACCESSDENIED; }
// build the ini file path StringCchCopyW(szIniFile, _countof(szIniFile), szPath); PathAppend(szIniFile, L"desktop.ini");
static LPCWSTR TheGUID = L"{BE098140-A513-11D0-A3A4-00C04FD706EC}"; static LPCWSTR Space = L" \t\n\r\f\v";
// get info from ini file WCHAR szImage[MAX_PATH], szText[64];
// load the image szImage[0] = UNICODE_NULL; GetPrivateProfileStringW(TheGUID, L"IconArea_Image", L"", szImage, _countof(szImage), szIniFile); if (szImage[0]) { StrTrimW(szImage, Space); if (PathIsRelativeW(szImage)) { PathAppendW(szPath, szImage); StringCchCopyW(szImage, _countof(szImage), szPath); } data->hbmBack = DoLoadPicture(szImage); }
// load the text color szText[0] = UNICODE_NULL; GetPrivateProfileStringW(TheGUID, L"IconArea_Text", L"", szText, _countof(szText), szIniFile); if (szText[0]) { StrTrimW(szText, Space);
LPWSTR pchEnd = NULL; COLORREF cr = (wcstol(szText, &pchEnd, 0) & 0xFFFFFF);
if (pchEnd && !*pchEnd) data->clrText = cr; }
// load the text background color szText[0] = UNICODE_NULL; GetPrivateProfileStringW(TheGUID, L"IconArea_TextBackground", L"", szText, _countof(szText), szIniFile); if (szText[0]) { StrTrimW(szText, Space);
LPWSTR pchEnd = NULL; COLORREF cr = (wcstol(szText, &pchEnd, 0) & 0xFFFFFF);
if (pchEnd && !*pchEnd) data->clrTextBack = cr; }
if (data->hbmBack != NULL || data->clrText != CLR_INVALID || data->clrTextBack != CLR_INVALID) return S_OK;
return E_FAIL;}
HRESULT WINAPI CFSFolder::MessageSFVCB(UINT uMsg, WPARAM wParam, LPARAM lParam){ HRESULT hr = E_NOTIMPL; switch (uMsg) { case SFVM_GET_CUSTOMVIEWINFO: hr = GetCustomViewInfo((ULONG)wParam, (SFVM_CUSTOMVIEWINFO_DATA *)lParam); break; case SFVM_GETCOMMANDDIR: if (m_sPathTarget) hr = StringCchCopyW((PWSTR)lParam, wParam, m_sPathTarget); break; } return hr;}
HRESULT CFSFolder::FormatDateTime(const FILETIME &ft, LPWSTR Buf, UINT cchBuf){ FILETIME lft; SYSTEMTIME time; FileTimeToLocalFileTime(&ft, &lft); FileTimeToSystemTime(&lft, &time); UINT ret = GetDateFormatW(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &time, NULL, Buf, cchBuf); if (ret > 0 && ret < cchBuf) { /* Append space + time without seconds */ Buf[ret-1] = ' '; GetTimeFormatW(LOCALE_USER_DEFAULT, TIME_NOSECONDS, &time, NULL, &Buf[ret], cchBuf - ret); } return ret ? S_OK : E_FAIL;}
HRESULT CFSFolder::FormatSize(UINT64 size, LPWSTR Buf, UINT cchBuf){ if (StrFormatKBSizeW(size, Buf, cchBuf)) return S_OK; if (cchBuf) *Buf = UNICODE_NULL; return E_FAIL;}