/**********************************************************************/ /** Microsoft Windows/NT **/ /** Copyright(c) Microsoft Corp., 1997 **/ /**********************************************************************/ /* sfmutil.cpp Misc utility routines for SFM dialogs/property pages FILE HISTORY: 8/20/97 ericdav Code moved into file managemnet snapin */ #include "stdafx.h" #include "sfmutil.h" #include "sfmcfg.h" #include "sfmsess.h" #include "sfmfasoc.h" #include "macros.h" // MFC_TRY/MFC_CATCH #ifdef _DEBUG #define new DEBUG_NEW #undef THIS_FILE static char THIS_FILE[] = __FILE__; #endif TCHAR c_szSoftware[] = _T("Software"); TCHAR c_szMicrosoft[] = _T("Microsoft"); TCHAR c_szWindowsNT[] = _T("Windows NT"); TCHAR c_szCurrentVersion[] = _T("CurrentVersion"); ULONG arrayHelpIDs_CONFIGURE_SFM[]= { IDC_BUTTON_ADD, HIDC_BUTTON_ADD, // File Association: "A&dd..." (Button) IDC_BUTTON_EDIT, HIDC_BUTTON_EDIT, // File Association: "&Edit..." (Button) IDC_COMBO_CREATOR, HIDC_COMBO_CREATOR, // Add Document Type: "" (ComboBox) IDC_BUTTON_DELETE, HIDC_BUTTON_DELETE, // File Association: "De&lete" (Button) IDC_BUTTON_ASSOCIATE, HIDC_BUTTON_ASSOCIATE, // File Association: "&Associate" (Button) IDC_COMBO_FILE_TYPE, HIDC_COMBO_FILE_TYPE, // Add Document Type: "" (ComboBox) IDC_LIST_TYPE_CREATORS, HIDC_LIST_TYPE_CREATORS, // File Association: "" (ListBox) IDC_EDIT_LOGON_MESSAGE, HIDC_EDIT_LOGON_MESSAGE, // Configuration: "" (Edit) IDC_COMBO_AUTHENTICATION, HIDC_COMBO_AUTHENTICATION, // Configuration: "Authentication type combo box" IDC_CHECK_SAVE_PASSWORD, HIDC_CHECK_SAVE_PASSWORD, // Configuration: "Allow &Workstations to Save Password" (Button) IDC_RADIO_SESSION_UNLIMITED,HIDC_RADIO_SESSION_UNLIMITED,// Configuration: "&Unlimited" (Button) IDC_RADIO_SESSSION_LIMIT, HIDC_RADIO_SESSSION_LIMIT, // Configuration: "Li&mit to" (Button) IDC_BUTTON_SEND, HIDC_BUTTON_SEND, // Sessions: "&Send" (Button) IDC_EDIT_MESSAGE, HIDC_EDIT_MESSAGE, // Sessions: "" (Edit) IDC_STATIC_SESSIONS, HIDC_STATIC_SESSIONS, // Sessions: "Static" (Static) IDC_EDIT_DESCRIPTION, HIDC_EDIT_DESCRIPTION, // Add Document Type: "" (Edit) IDC_STATIC_FORKS, HIDC_STATIC_FORKS, // Sessions: "Static" (Static) IDC_STATIC_FILE_LOCKS, HIDC_STATIC_FILE_LOCKS, // Sessions: "Static" (Static) IDC_STATIC_CREATOR, HIDC_STATIC_CREATOR, // Edit Document Type: "Static" (Static) IDC_EDIT_SERVER_NAME, HIDC_EDIT_SERVER_NAME, // Configuration: "" (Edit) IDC_COMBO_EXTENSION, HIDC_COMBO_EXTENSION, // File Association: "" (ComboBox) IDC_EDIT_SESSION_LIMIT, HIDC_EDIT_SESSION_LIMIT, // Configuration: "0" (Edit) IDC_SFM_EDIT_PASSWORD, HIDC_SFM_EDIT_PASSWORD, IDC_SFM_CHECK_READONLY, HIDC_SFM_CHECK_READONLY, IDC_SFM_CHECK_GUESTS, HIDC_SFM_CHECK_GUESTS, (ULONG)IDC_STATIC, (ULONG)-1, 0, 0 }; // these are the only controls we care about.... const ULONG_PTR g_aHelpIDs_CONFIGURE_SFM = (ULONG_PTR)&arrayHelpIDs_CONFIGURE_SFM[0]; USE_HANDLE_MACROS("FILEMGMT(sfmutil.cpp)") HRESULT GetErrorMessageFromModule( IN DWORD dwError, IN LPCTSTR lpszDll, OUT LPTSTR *ppBuffer ) { if (0 == dwError || !lpszDll || !*lpszDll || !ppBuffer) return E_INVALIDARG; HRESULT hr = S_OK; HINSTANCE hMsgLib = LoadLibrary(lpszDll); if (!hMsgLib) hr = HRESULT_FROM_WIN32(GetLastError()); else { DWORD dwRet = ::FormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_HMODULE, hMsgLib, dwError, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR)ppBuffer, 0, NULL); if (0 == dwRet) hr = HRESULT_FROM_WIN32(GetLastError()); FreeLibrary(hMsgLib); } return hr; } HRESULT GetErrorMessage( IN DWORD i_dwError, OUT CString& cstrErrorMsg ) { if (0 == i_dwError) return E_INVALIDARG; HRESULT hr = S_OK; LPTSTR lpBuffer = NULL; DWORD dwRet = ::FormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM, NULL, i_dwError, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR)&lpBuffer, 0, NULL); if (0 == dwRet) { // if no message is found, GetLastError will return ERROR_MR_MID_NOT_FOUND hr = HRESULT_FROM_WIN32(GetLastError()); if (HRESULT_FROM_WIN32(ERROR_MR_MID_NOT_FOUND) == hr || 0x80070000 == (i_dwError & 0xffff0000) || 0 == (i_dwError & 0xffff0000) ) { hr = GetErrorMessageFromModule((i_dwError & 0x0000ffff), _T("netmsg.dll"), &lpBuffer); if (HRESULT_FROM_WIN32(ERROR_MR_MID_NOT_FOUND) == hr) { int iError = i_dwError; // convert to a signed integer if (iError >= AFPERR_MIN && iError < AFPERR_BASE) { // use a positive number to search sfmmsg.dll hr = GetErrorMessageFromModule(-iError, _T("sfmmsg.dll"), &lpBuffer); } } } } if (SUCCEEDED(hr)) { cstrErrorMsg = lpBuffer; LocalFree(lpBuffer); } else { // we failed to retrieve the error message from system/netmsg.dll/sfmmsg.dll, // report the error code directly to user hr = S_OK; cstrErrorMsg.Format(_T("0x%x"), i_dwError); } return S_OK; } void SFMMessageBox(DWORD dwErrCode) { HRESULT hr = S_OK; CString strMessage; if (!dwErrCode) return; // not expected hr = GetErrorMessage(dwErrCode, strMessage); if (FAILED(hr)) { // Failed to retrieve the proper message, report the failure directly to user strMessage.Format(_T("0x%x"), hr); } AfxMessageBox(strMessage); } BOOL CALLBACK EnumThreadWndProc(HWND hwnd, /* enumerated HWND */ LPARAM lParam /* pass a HWND* for return value*/ ) { _ASSERTE(hwnd); HWND hParentWnd = GetParent(hwnd); // the main window of the MMC console should staitsfy this condition if ( ((hParentWnd == GetDesktopWindow()) || (hParentWnd == NULL)) && IsWindowVisible(hwnd) ) { HWND* pH = (HWND*)lParam; *pH = hwnd; return FALSE; // stop enumerating } return TRUE; } HWND FindMMCMainWindow() { DWORD dwThreadID = ::GetCurrentThreadId(); _ASSERTE(dwThreadID != 0); HWND hWnd = NULL; BOOL bEnum = EnumThreadWindows(dwThreadID, EnumThreadWndProc,(LPARAM)&hWnd); _ASSERTE(hWnd != NULL); return hWnd; } ///////////////////////////////////////////////////////////////////// // Constructor for CSFMPropertySheet object CSFMPropertySheet::CSFMPropertySheet() { m_pPageConfig = new CMacFilesConfiguration; m_pPageConfig->m_pSheet = this; m_pPageSessions = new CMacFilesSessions; m_pPageSessions->m_pSheet = this; m_pPageFileAssoc = new CMacFilesFileAssociation; m_pPageFileAssoc->m_pSheet = this; m_hSheetWindow = NULL; m_hThread = NULL; m_nRefCount =1; } // CServicePropertyData::CServicePropertyData() CSFMPropertySheet::~CSFMPropertySheet() { delete m_pPageConfig; delete m_pPageSessions; delete m_pPageFileAssoc; if (m_hDestroySync) { CloseHandle(m_hDestroySync); m_hDestroySync = NULL; } } // CServicePropertyData::~CServicePropertyData() BOOL CSFMPropertySheet::FInit ( LPDATAOBJECT lpDataObject, AFP_SERVER_HANDLE hAfpServer, LPCTSTR pSheetTitle, SfmFileServiceProvider * pSfmProvider, LPCTSTR pMachine ) { m_spDataObject = lpDataObject; m_strTitle = pSheetTitle; m_hAfpServer = hAfpServer; m_pSfmProvider = pSfmProvider; m_strHelpFilePath = _T("sfmmgr.hlp"); // does not need to be localized m_strMachine = pMachine; m_hDestroySync = ::CreateEvent(NULL, FALSE, FALSE, NULL); if (!m_hDestroySync) return FALSE; return TRUE; } BOOL CSFMPropertySheet::DoModelessSheet(LPDATAOBJECT pDataObject) { AFX_MANAGE_STATE(AfxGetStaticModuleState()); LPPROPERTYSHEETCALLBACK pCallback = NULL; LPPROPERTYSHEETPROVIDER pProvider = NULL; HPROPSHEETPAGE hPage; HRESULT hr = S_OK; HWND hWnd; BOOL bReturn = TRUE; // get the property sheet provider interface hr = ::CoCreateInstance(CLSID_NodeManager, NULL, CLSCTX_INPROC, IID_IPropertySheetProvider, reinterpret_cast(&pProvider)); if (FAILED(hr)) return FALSE; _ASSERTE(pProvider != NULL); // get an interface to a sheet callback hr = pProvider->QueryInterface(IID_IPropertySheetCallback, (void**) &pCallback); if (FAILED(hr)) { bReturn = FALSE; goto Error; } _ASSERTE(pCallback != NULL); // create sheet hr = pProvider->CreatePropertySheet(m_strTitle, TRUE /* prop page */, NULL, //m_spDataObject, pDataObject, 0); // add pages to sheet - config MMCPropPageCallback(INOUT &m_pPageConfig->m_psp); hPage = MyCreatePropertySheetPage(IN &m_pPageConfig->m_psp); Report(hPage != NULL); if (hPage != NULL) pCallback->AddPage(hPage); // now the Sessions page MMCPropPageCallback(INOUT &m_pPageFileAssoc->m_psp); hPage = MyCreatePropertySheetPage(IN &m_pPageFileAssoc->m_psp); Report(hPage != NULL); if (hPage != NULL) pCallback->AddPage(hPage); // finally the File Association page MMCPropPageCallback(INOUT &m_pPageSessions->m_psp); hPage = MyCreatePropertySheetPage(IN &m_pPageSessions->m_psp); Report(hPage != NULL); if (hPage != NULL) pCallback->AddPage(hPage); // add pages hr = pProvider->AddPrimaryPages(NULL, FALSE, NULL, FALSE); if (FAILED(hr)) { bReturn = FALSE; goto Error; } hWnd = ::FindMMCMainWindow(); _ASSERTE(hWnd != NULL); hr = pProvider->Show((LONG_PTR) hWnd, 0); if (FAILED(hr)) { bReturn = FALSE; goto Error; } Error: if (pCallback) pCallback->Release(); if (pProvider) pProvider->Release(); // release our data object... we don't need it anymore m_spDataObject = NULL; return bReturn; } int CSFMPropertySheet::AddRef() { return ++m_nRefCount; } int CSFMPropertySheet::Release() { int nRefCount = --m_nRefCount; if (nRefCount == 0) Destroy(); return nRefCount; } void CSFMPropertySheet::SetSheetWindow ( HWND hSheetWindow ) { if (m_hSheetWindow && !hSheetWindow) { // The Property Sheet is going away. Notify the provider so it can release // any references to the object. if (m_pSfmProvider) m_pSfmProvider->SetSfmPropSheet(NULL); } m_hSheetWindow = hSheetWindow; if (!m_hThread) { HANDLE hPseudohandle; hPseudohandle = GetCurrentThread(); BOOL bRet = DuplicateHandle(GetCurrentProcess(), hPseudohandle, GetCurrentProcess(), &m_hThread, 0, FALSE, DUPLICATE_SAME_ACCESS); if (!bRet) { DWORD dwLastErr = GetLastError(); } TRACE(_T("SfmProperty Sheet - Thread ID = %lx\n"), GetCurrentThreadId()); } } void CSFMPropertySheet::Destroy() { m_hSheetWindow = NULL; delete this; } void CSFMPropertySheet::CancelSheet() { HWND hSheetWindow = m_hSheetWindow; if (hSheetWindow != NULL) { // this message will cause the sheet to close all the pages, // and eventually the destruction of "this" VERIFY(::PostMessage(hSheetWindow, WM_COMMAND, IDCANCEL, 0L) != 0); } // now, if we've been initialized then wait for the property sheet thread // to terminate. The property sheet provider is holding onto our dataobject // that needs to be freed up before we can continue our cleanup. if (m_hThread) { DWORD dwRet; MSG msg; while(1) { dwRet = MsgWaitForMultipleObjects(1, &m_hThread, FALSE, INFINITE, QS_ALLINPUT); if (dwRet == WAIT_OBJECT_0) return; // The event was signaled if (dwRet != WAIT_OBJECT_0 + 1) break; // Something else happened // There is one or more window message available. Dispatch them while(PeekMessage(&msg,NULL,NULL,NULL,PM_REMOVE)) { TranslateMessage(&msg); DispatchMessage(&msg); if (WaitForSingleObject(m_hThread, 0) == WAIT_OBJECT_0) return; // Event is now signaled. } } } } /*!-------------------------------------------------------------------------- IsNT5Machine - Author: EricDav ---------------------------------------------------------------------------*/ DWORD CSFMPropertySheet::IsNT5Machine(LPCTSTR pszMachine, BOOL *pfNt4) { // Look at the HKLM\Software\Microsoft\Windows NT\CurrentVersion // CurrentVersion = REG_SZ "5.0" CString skey; DWORD dwErr = ERROR_SUCCESS; TCHAR szVersion[64]; HKEY hkeyMachine, hKey; DWORD dwType = REG_SZ; DWORD dwSize = sizeof(szVersion); if (!pszMachine || !lstrlen(pszMachine)) { hkeyMachine = HKEY_LOCAL_MACHINE; } else { // // Make the connection // dwErr = ::RegConnectRegistry( (LPTSTR)pszMachine, HKEY_LOCAL_MACHINE, &hkeyMachine ); } if (dwErr != ERROR_SUCCESS) return dwErr; ASSERT(pfNt4); skey = c_szSoftware; skey += TEXT('\\'); skey += c_szMicrosoft; skey += TEXT('\\'); skey += c_szWindowsNT; skey += TEXT('\\'); skey += c_szCurrentVersion; dwErr = ::RegOpenKeyEx( hkeyMachine, skey, 0, KEY_READ, & hKey ) ; if (dwErr != ERROR_SUCCESS) return dwErr; // Ok, now try to get the current version value dwErr = ::RegQueryValueEx( hKey, c_szCurrentVersion, 0, &dwType, (LPBYTE) szVersion, &dwSize ) ; if (dwErr == ERROR_SUCCESS) { *pfNt4 = ((szVersion[0] == _T('5')) && (szVersion[1] == _T('.'))); } ::RegCloseKey( hKey ); if (hkeyMachine != HKEY_LOCAL_MACHINE) ::RegCloseKey( hkeyMachine ); return dwErr; }