/** * Install a shortcut for the virtual folder in the Windows Start Menu. * This method knows when we're installing under WOW64 so creating a shortcut will allow * the user to access the virtual folder, even when using a 32bit DLL under 64bit Windows. */ HRESULT UpdateStartMenuLink(LPCWSTR pstrDisplayName, LPCWSTR pstrDescription, KNOWNFOLDERID FolderId, BOOL bRegister) { HRESULT Hr = S_OK; // Get folder for installation... CPidl pidlFolderPath; CCoTaskString strFolderPath; HR( pidlFolderPath.CreateFromKnownFolder(FolderId) ); HR( pidlFolderPath.GetName(SIGDN_DESKTOPABSOLUTEPARSING, &strFolderPath) ); // Create shortcut link... CComPtr<IShellLink> spLink; HR( spLink.CoCreateInstance(CLSID_ShellLink) ); BOOL bIsWOW64 = FALSE; ::IsWow64Process(::GetCurrentProcess(), &bIsWOW64); CComBSTR bstrPath = bIsWOW64 ? L"%windir%\\syswow64\\explorer.exe" : L"%windir%\\explorer.exe"; CComBSTR bstrIcon = bIsWOW64 ? L"%windir%\\syswow64\\shell32.dll" : L"%SystemRoot%\\system32\\shell32.dll"; int iIconIndex = _ShellModule.GetConfigBool(VFS_HAVE_VIRTUAL_FILES) ? SIID_DRIVEFIXED : SIID_FOLDER; WCHAR wszArgs[MAX_PATH + 80] = { 0 }; ::wnsprintf(wszArgs, lengthof(wszArgs) - 1, L"/separate,%s%s%s::%s", bIsWOW64 ? L"/select," : L"", static_cast<LPCWSTR>(strFolderPath), strFolderPath.IsEmpty() ? L"" : L"\\", static_cast<LPCWSTR>(CComBSTR(CLSID_ShellFolder))); spLink->SetPath(bstrPath); spLink->SetArguments(wszArgs); spLink->SetIconLocation(bstrIcon, iIconIndex); spLink->SetDescription(pstrDescription); // Write the link file to the Windows Start Menu... CComQIPtr<IPersistFile> spPersist = spLink; if( spPersist == NULL ) return E_UNEXPECTED; CCoTaskString strLinkPath; HR( ::SHGetKnownFolderPath(FOLDERID_StartMenu, 0, NULL, &strLinkPath) ); WCHAR wszLinkFilename[MAX_PATH] = { 0 }; ::wnsprintf(wszLinkFilename, lengthof(wszLinkFilename) - 1, L"%s\\%s.lnk", static_cast<LPCWSTR>(strLinkPath), pstrDisplayName); if( bRegister ) Hr = spPersist->Save(wszLinkFilename, TRUE); else ::DeleteFileW(wszLinkFilename); return Hr; }
/** * Return property information. */ HRESULT CNseBaseItem::GetProperty(REFPROPERTYKEY pkey, CComPropVariant& v) { ATLASSERT(v.vt==VT_EMPTY); if( pkey == PKEY_ParsingName ) { const VFS_FIND_DATA wfd = GetFindData(); return ::InitPropVariantFromString(wfd.cFileName, &v); } if( pkey == PKEY_ItemName ) { const VFS_FIND_DATA wfd = GetFindData(); return ::InitPropVariantFromString(wfd.cFileName, &v); } if( pkey == PKEY_ItemNameDisplay ) { const VFS_FIND_DATA wfd = GetFindData(); return ::InitPropVariantFromString(wfd.cFileName, &v); } if( pkey == PKEY_FileName ) { const VFS_FIND_DATA wfd = GetFindData(); return ::InitPropVariantFromString(wfd.cFileName, &v); } if( pkey == PKEY_FileAttributes ) { const VFS_FIND_DATA wfd = GetFindData(); return ::InitPropVariantFromUInt32(wfd.dwFileAttributes, &v); } if( pkey == PKEY_ParsingPath ) { CCoTaskString strPath; CPidl pidlFull(m_pFolder->m_pidlRoot, m_pidlFolder, m_pidlItem); HR( ::SHGetNameFromIDList(pidlFull, SIGDN_DESKTOPABSOLUTEPARSING, &strPath) ); return ::InitPropVariantFromString(strPath, &v); } if( pkey == PKEY_ItemPathDisplay ) { CCoTaskString strPath; CPidl pidlFull(m_pFolder->m_pidlRoot, m_pidlFolder, m_pidlItem); HR( ::SHGetNameFromIDList(pidlFull, SIGDN_DESKTOPABSOLUTEEDITING, &strPath) ); return ::InitPropVariantFromString(strPath, &v); } if( pkey == PKEY_ItemPathDisplayNarrow ) { CComPropVariant vDispName; HR( GetProperty(PKEY_ItemNameDisplay, vDispName) ); HR( vDispName.ChangeType(VT_LPWSTR) ); CCoTaskString strParent; HR( ::SHGetNameFromIDList(m_pFolder->m_pidlMonitor, SIGDN_DESKTOPABSOLUTEEDITING, &strParent) ); WCHAR wszNarrow[MAX_PATH + 4] = { 0 }; ::wnsprintf(wszNarrow, lengthof(wszNarrow) - 1, L"%s (%s)", vDispName.pwszVal, static_cast<LPCWSTR>(strParent)); return ::InitPropVariantFromString(strParent.IsEmpty() ? vDispName.pwszVal : wszNarrow, &v); } if( pkey == PKEY_ItemFolderPathDisplay ) { CCoTaskString strFolder; HR( ::SHGetNameFromIDList(m_pFolder->m_pidlMonitor, SIGDN_DESKTOPABSOLUTEEDITING, &strFolder) ); return ::InitPropVariantFromString(strFolder, &v); } if( pkey == PKEY_ItemFolderPathDisplayNarrow ) { CCoTaskString strFolder; HR( ::SHGetNameFromIDList(m_pFolder->m_pidlMonitor, SIGDN_DESKTOPABSOLUTEEDITING, &strFolder) ); LPWSTR pstrSep = wcsrchr(strFolder, '\\'); if( pstrSep == NULL ) pstrSep = L"\0\0"; else *pstrSep = '\0'; WCHAR wszNarrow[MAX_PATH + 4] = { 0 }; ::wnsprintf(wszNarrow, lengthof(wszNarrow) - 1, L"%s (%s)", pstrSep + 1, static_cast<LPCWSTR>(strFolder)); return ::InitPropVariantFromString(pstrSep[1] == '\0' ? static_cast<LPCWSTR>(strFolder) : wszNarrow, &v); } if( pkey == PKEY_ItemType ) { // Assume no canonical type; return V_EMPTY return S_OK; } if( pkey == PKEY_ItemTypeText ) { // Assume no canonical type; return V_EMPTY return S_OK; } if( pkey == PKEY_PerceivedType ) { return ::InitPropVariantFromInt32(PERCEIVED_TYPE_UNKNOWN, &v); } if( pkey == PKEY_FindData ) { const VFS_FIND_DATA wfd = GetFindData(); return ::InitPropVariantFromBuffer(&wfd, sizeof(WIN32_FIND_DATAW), &v); } if( pkey == PKEY_SFGAOFlags ) { return ::InitPropVariantFromUInt32(GetSFGAOF((SFGAOF)(~SFGAO_VALIDATE)), &v); } if( pkey == PKEY_DescriptionID ) { SHDESCRIPTIONID did = { SHDID_FS_OTHER, CLSID_ShellFolder }; return ::InitPropVariantFromBuffer(&did, sizeof(did), &v); } if( pkey == PKEY_Volume_IsRoot ) { return ::InitPropVariantFromBoolean(IsRoot(), &v); } #if _WINVER > _WIN32_WINNT_LONGHORN if( pkey == PKEY_NamespaceCLSID ) { return ::InitPropVariantFromCLSID(CLSID_ShellFolder, &v); } if( pkey == PKEY_IsPinnedToNameSpaceTree ) { return ::InitPropVariantFromBoolean(IsRoot(), &v); } #endif // _WIN32_WINNT_LONGHORN return E_FAIL; }