WindowsXP-SP1/admin/hmonitor/snapin/dpservicepage.cpp
2020-09-30 16:53:49 +02:00

568 lines
17 KiB
C++

// DPServicePage.cpp : implementation file
//
// 03/05/00 v-marfin bug 59643 : Make this the default starting page.
// 03/22/00 v-marfin 60766 : Set proper dlg title for object being browsed.
// 03/29/00 v-marfin bug 62585 : Set new Data collector's ENABLED to TRUE if user presses OK.
// 03/30/00 v-marfin bug 59237 : If user does not change the default name of the data
// collector when they first create it, change it for
// them to a more meaningful name based on the data
// they select in the property pages.
#include "stdafx.h"
#include "snapin.h"
#include "DPServicePage.h"
#include "HMObject.h"
#include "WmiBrowseDlg.h"
#include "WmiPropertyBrowseDlg.h"
#include "DataElement.h"
#include "DataGroupScopeItem.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
/////////////////////////////////////////////////////////////////////////////
// CDPServicePage property page
IMPLEMENT_DYNCREATE(CDPServicePage, CHMPropertyPage)
CDPServicePage::CDPServicePage() : CHMPropertyPage(CDPServicePage::IDD)
{
//{{AFX_DATA_INIT(CDPServicePage)
m_iType = 0;
m_bRequireReset = FALSE;
m_sService = _T("");
m_sProcess = _T("");
//}}AFX_DATA_INIT
m_sHelpTopic = _T("HMon21.chm::/dDEserv.htm");
}
CDPServicePage::~CDPServicePage()
{
}
void CDPServicePage::UpdateProperties(CListCtrl& Properties, const CString& sNamespace, const CString& sClass)
{
Properties.DeleteAllItems();
if( sClass.IsEmpty() )
{
return;
}
CWbemClassObject classobject;
classobject.SetNamespace(_T("\\\\") + GetObjectPtr()->GetSystemName() + _T("\\") + sNamespace);
HRESULT hr = classobject.GetObject(sClass);
if( hr != S_OK )
{
return;
}
CStringArray saNames;
classobject.GetPropertyNames(saNames);
classobject.Destroy();
for( int i = 0; i < saNames.GetSize(); i++ )
{
Properties.InsertItem(0,saNames[i]);
}
Properties.SetColumnWidth(0,LVSCW_AUTOSIZE);
}
void CDPServicePage::DoDataExchange(CDataExchange* pDX)
{
CHMPropertyPage::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CDPServicePage)
DDX_Control(pDX, IDC_LIST_PROCESS_PROPERTIES, m_ProcessProperties);
DDX_Control(pDX, IDC_LIST_SERVICE_PROPERTIES, m_ServiceProperties);
DDX_Radio(pDX, IDC_RADIO1, m_iType);
DDX_Check(pDX, IDC_CHECK_REQUIRE_RESET, m_bRequireReset);
DDX_Text(pDX, IDC_EDIT_SERVICE, m_sService);
DDX_Text(pDX, IDC_EDIT_PROCESS, m_sProcess);
//}}AFX_DATA_MAP
if( m_iType == 0 )
{
GetDlgItem(IDC_EDIT_SERVICE)->EnableWindow();
GetDlgItem(IDC_BUTTON_BROWSE_SERVICE)->EnableWindow();
GetDlgItem(IDC_LIST_SERVICE_PROPERTIES)->EnableWindow();
GetDlgItem(IDC_BUTTON_BROWSE_PROCESS)->EnableWindow(FALSE);
GetDlgItem(IDC_EDIT_PROCESS)->EnableWindow(FALSE);
GetDlgItem(IDC_LIST_PROCESS_PROPERTIES)->EnableWindow(FALSE);
}
else if( m_iType == 1 )
{
GetDlgItem(IDC_EDIT_SERVICE)->EnableWindow(FALSE);
GetDlgItem(IDC_BUTTON_BROWSE_SERVICE)->EnableWindow(FALSE);
GetDlgItem(IDC_LIST_SERVICE_PROPERTIES)->EnableWindow(FALSE);
GetDlgItem(IDC_BUTTON_BROWSE_PROCESS)->EnableWindow();
GetDlgItem(IDC_EDIT_PROCESS)->EnableWindow();
GetDlgItem(IDC_LIST_PROCESS_PROPERTIES)->EnableWindow();
}
}
BEGIN_MESSAGE_MAP(CDPServicePage, CHMPropertyPage)
//{{AFX_MSG_MAP(CDPServicePage)
ON_WM_DESTROY()
ON_BN_CLICKED(IDC_BUTTON_BROWSE_PROCESS, OnButtonBrowseProcess)
ON_BN_CLICKED(IDC_BUTTON_BROWSE_SERVICE, OnButtonBrowseService)
ON_EN_CHANGE(IDC_EDIT_PROCESS, OnChangeEditProcess)
ON_BN_CLICKED(IDC_RADIO1, OnRadio1)
ON_BN_CLICKED(IDC_RADIO2, OnRadio2)
ON_EN_CHANGE(IDC_EDIT_SERVICE, OnChangeEditService)
ON_BN_CLICKED(IDC_CHECK_REQUIRE_RESET, OnCheckRequireReset)
ON_NOTIFY(NM_CLICK, IDC_LIST_PROCESS_PROPERTIES, OnClickListProcessProperties2)
ON_NOTIFY(NM_CLICK, IDC_LIST_SERVICE_PROPERTIES, OnClickListServiceProperties)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()
/////////////////////////////////////////////////////////////////////////////
// CDPServicePage message handlers
BOOL CDPServicePage::OnInitDialog()
{
// v-marfin : bug 59643 : This will be the default starting page for the property
// sheet so call CnxPropertyPageCreate() to unmarshal the
// connection for this thread. This function must be called
// by the first page of the property sheet. It used to
// be called by the "General" page and its call still remains
// there as well in case the general page is loaded by a
// different code path that does not also load this page.
// The CnxPropertyPageCreate function has been safeguarded
// to simply return if the required call has already been made.
// CnxPropertyPageDestory() must be called from this page's
// OnDestroy function.
// unmarshal connmgr
CnxPropertyPageCreate();
CHMPropertyPage::OnInitDialog();
// initialize the list view
m_ServiceProperties.SetExtendedStyle(LVS_EX_CHECKBOXES);
m_ProcessProperties.SetExtendedStyle(LVS_EX_CHECKBOXES);
CString sColumnTitle;
sColumnTitle.LoadString(IDS_STRING_NAME);
m_ServiceProperties.InsertColumn(0,sColumnTitle);
m_ProcessProperties.InsertColumn(0,sColumnTitle);
CWbemClassObject* pClassObject = GetObjectPtr()->GetClassObject();
if( ! GfxCheckObjPtr(pClassObject,CWbemClassObject) )
{
return TRUE;
}
UpdateProperties(m_ServiceProperties,_T("root\\cimv2"),_T("Win32_Service"));
UpdateProperties(m_ProcessProperties,_T("root\\cimv2"),_T("Win32_Process"));
//-------------------------------------------------------------------------
// v-marfin 59237 : Store original name in case this data collector is
// just being created. When they save, we will modify the
// name if they haven't.
pClassObject->GetProperty(IDS_STRING_MOF_NAME,m_sOriginalName);
//-------------------------------------------------------------------------
CString sQuery;
pClassObject->GetProperty(IDS_STRING_MOF_QUERY,sQuery);
int iIndex = -1;
if( (iIndex = sQuery.Find(_T("Win32_Service"))) != -1 )
{
CWbemClassObject::GetPropertyValueFromString(sQuery,_T("Name"),m_sService);
m_iType = 0;
}
else if( (iIndex = sQuery.Find(_T("Win32_Process"))) != -1 )
{
CWbemClassObject::GetPropertyValueFromString(sQuery,_T("Name"),m_sProcess);
m_iType = 1;
}
CStringArray saProperties;
CString sProperties;
pClassObject->GetProperty(IDS_STRING_MOF_STATISTICSPROPERTYNAMES,saProperties);
if( m_iType == 0 )
{
for( int i=0; i < saProperties.GetSize(); i++ )
{
LVFINDINFO lvfi;
ZeroMemory(&lvfi,sizeof(LVFINDINFO));
lvfi.flags = LVFI_WRAP|LVFI_STRING;
lvfi.psz = saProperties[i];
int iListIndex = m_ServiceProperties.FindItem(&lvfi);
if( iListIndex >= 0 )
{
m_ServiceProperties.SetCheck(iListIndex);
}
}
}
else if( m_iType == 1 )
{
for( int i=0; i < saProperties.GetSize(); i++ )
{
LVFINDINFO lvfi;
ZeroMemory(&lvfi,sizeof(LVFINDINFO));
lvfi.flags = LVFI_WRAP|LVFI_STRING;
lvfi.psz = saProperties[i];
int iListIndex = m_ProcessProperties.FindItem(&lvfi);
if( iListIndex >= 0 )
{
m_ProcessProperties.SetCheck(iListIndex);
}
}
}
bool bReset;
pClassObject->GetProperty(IDS_STRING_MOF_REQUIRERESET,bReset);
m_bRequireReset = bReset;
delete pClassObject;
UpdateData(FALSE);
return TRUE; // return TRUE unless you set the focus to a control
// EXCEPTION: OCX Property Pages should return FALSE
}
void CDPServicePage::OnDestroy()
{
// v-marfin 62585 : For this new data collector, set its Enabled property to TRUE, but
// only if the user is not cancelling these property pages.
if (m_bOnApplyUsed)
{
ClearStatistics(); // 62548
CDataElement* pElement = (CDataElement*)GetObjectPtr();
if (pElement && pElement->IsStateSetToEnabledOnOK())
{
TRACE(_T("CDPServicePage::OnDestroy - New Perfmon Collector: Setting to Enabled\n"));
pElement->SetStateToEnabledOnOK(FALSE); // don't do this again
CWbemClassObject* pClassObject = GetObjectPtr()->GetClassObject();
if( ! GfxCheckObjPtr(pClassObject,CWbemClassObject) )
{
TRACE(_T("ERROR: CDPServicePage::OnDestroy - Failed to GetClassObject()\n"));
return;
}
// Set the new collector to enabled.
BOOL bEnabled=TRUE;
HRESULT hr = pClassObject->GetProperty(IDS_STRING_MOF_ENABLE,bEnabled);
hr = pClassObject->SetProperty(IDS_STRING_MOF_ENABLE,TRUE);
if (!CHECKHRESULT(hr))
{
TRACE(_T("ERROR: CDPServicePage::OnDestroy - Failed to set ENABLED property on new collector\n"));
}
//-------------------------------------------------------------------
// v-marfin 59237 : If the user has not changed the original default
// name, do so for them. Compare against original
// name we fetched during OnInitDialog.
CString sName;
pClassObject->GetProperty(IDS_STRING_MOF_NAME,sName);
// Did the user change the default name?
if (m_sOriginalName.CompareNoCase(sName)==0)
{
CString sObject = m_sService.IsEmpty() ? m_sProcess : m_sService;
// No, so set the new name
if (!sObject.IsEmpty())
{
// Use parent to ensure name is unique
//CDataGroup* pParent = (CDataGroup*) pElement->GetCollectorsParentClassObject();
if(pElement->GetScopeItemCount())
{
CDataElementScopeItem* pItem = (CDataElementScopeItem*)pElement->GetScopeItem(0);
if( pItem )
{
CDataGroupScopeItem* pDGItem = (CDataGroupScopeItem*)pItem->GetParent();
sName = pDGItem->GetUniqueDisplayName(sObject);
}
}
// Set the local element's object data
pElement->SetName(sName);
// Set its WMI property
pClassObject->SetProperty(IDS_STRING_MOF_NAME,sName);
// Refresh to show the new name in the IU
//pElement->Refresh(); // 63005
pElement->UpdateStatus(); // 63005
}
}
//-------------------------------------------------------------------
pClassObject->SaveAllProperties();
delete pClassObject;
} // if (pElement && pElement->IsStateSetToEnabledOnOK())
} // if (m_bOnApplyUsed)
CHMPropertyPage::OnDestroy();
// v-marfin : bug 59643 : CnxPropertyPageDestory() must be called from this page's
// OnDestroy function.
CnxPropertyPageDestroy();
}
void CDPServicePage::OnOK()
{
CHMPropertyPage::OnOK();
}
void CDPServicePage::OnButtonBrowseProcess()
{
CWmiInstanceBrowseDlg dlg;
// v-marfin 60766 : Set proper dlg title for object being browsed
// set the dialog window title
CString sItem;
sItem.LoadString(IDS_STRING_PROCESSES);
dlg.m_sDlgTitle.Format(IDS_STRING_WMI_BROWSE_TITLE,sItem,GetObjectPtr()->GetSystemName());
// create the instance enumerator
if( ! CHECKHRESULT(dlg.m_ClassObject.Create(GetObjectPtr()->GetSystemName())) )
{
return;
}
CString sTemp;
sTemp.Format(_T("\\\\%s\\%s"),GetObjectPtr()->GetSystemName(),_T("root\\cimv2"));
dlg.m_ClassObject.SetNamespace(sTemp);
// set the listbox title
dlg.m_sTitle = sTemp;
sTemp = _T("Win32_Process");
BSTR bsTemp = sTemp.AllocSysString();
if( ! CHECKHRESULT(dlg.m_ClassObject.CreateEnumerator(bsTemp)) )
{
::SysFreeString(bsTemp);
return;
}
::SysFreeString(bsTemp);
// display the dialog
if( dlg.DoModal() == IDOK )
{
CString sProcess = dlg.m_sSelectedItem;
CWbemClassObject ClassObject;
sTemp.Format(_T("\\\\%s\\%s"),GetObjectPtr()->GetSystemName(),_T("root\\cimv2"));
ClassObject.SetNamespace(sTemp);
if( ! CHECKHRESULT(ClassObject.GetObject(sProcess)) )
{
return;
}
ClassObject.GetProperty(IDS_STRING_MOF_NAME,m_sProcess);
m_sProcess.TrimLeft(_T("\""));
m_sProcess.TrimRight(_T("\""));
UpdateData(FALSE);
}
}
void CDPServicePage::OnButtonBrowseService()
{
CWmiInstanceBrowseDlg dlg;
// v-marfin 60766 : Set proper dlg title for object being browsed
// set the dialog window title
CString sItem;
sItem.LoadString(IDS_STRING_SERVICES);
dlg.m_sDlgTitle.Format(IDS_STRING_WMI_BROWSE_TITLE,sItem,GetObjectPtr()->GetSystemName());
// create the instance enumerator
if( ! CHECKHRESULT(dlg.m_ClassObject.Create(GetObjectPtr()->GetSystemName())) )
{
return;
}
CString sTemp;
sTemp.Format(_T("\\\\%s\\%s"),GetObjectPtr()->GetSystemName(),_T("root\\cimv2"));
dlg.m_ClassObject.SetNamespace(sTemp);
// set the listbox title
dlg.m_sTitle = sTemp;
sTemp = _T("Win32_Service");
BSTR bsTemp = sTemp.AllocSysString();
if( ! CHECKHRESULT(dlg.m_ClassObject.CreateEnumerator(bsTemp)) )
{
::SysFreeString(bsTemp);
return;
}
::SysFreeString(bsTemp);
// display the dialog
if( dlg.DoModal() == IDOK )
{
m_sService = dlg.m_sSelectedItem;
int iIndex = m_sService.Find(_T("Name="));
m_sService = m_sService.Right(m_sService.GetLength()-iIndex-5);
m_sService.TrimLeft(_T("\""));
m_sService.TrimRight(_T("\""));
m_iType = 0;
UpdateData(FALSE);
}
}
void CDPServicePage::OnChangeEditProcess()
{
// TODO: If this is a RICHEDIT control, the control will not
// send this notification unless you override the CHMPropertyPage::OnInitDialog()
// function and call CRichEditCtrl().SetEventMask()
// with the ENM_CHANGE flag ORed into the mask.
UpdateData();
SetModified();
}
void CDPServicePage::OnRadio1()
{
UpdateData();
SetModified();
}
void CDPServicePage::OnRadio2()
{
UpdateData();
SetModified();
}
void CDPServicePage::OnChangeEditService()
{
// TODO: If this is a RICHEDIT control, the control will not
// send this notification unless you override the CHMPropertyPage::OnInitDialog()
// function and call CRichEditCtrl().SetEventMask()
// with the ENM_CHANGE flag ORed into the mask.
UpdateData();
SetModified();
}
BOOL CDPServicePage::OnApply()
{
if( ! CHMPropertyPage::OnApply() )
{
return FALSE;
}
// v-marfin 62585 : So we can set the collector's state to enabled when OK pressed.
m_bOnApplyUsed=TRUE;
UpdateData();
CStringArray saCounters;
if( m_iType == 0 )
{
if( m_ServiceProperties.GetItemCount() <= 0 )
{
return FALSE;
}
for( int i = 0; i < m_ServiceProperties.GetItemCount(); i++ )
{
if( m_ServiceProperties.GetCheck(i) )
{
saCounters.Add(m_ServiceProperties.GetItemText(i,0));
}
}
}
else if( m_iType == 1 )
{
if( m_ProcessProperties.GetItemCount() <= 0 )
{
return FALSE;
}
for( int i = 0; i < m_ProcessProperties.GetItemCount(); i++ )
{
if( m_ProcessProperties.GetCheck(i) )
{
saCounters.Add(m_ProcessProperties.GetItemText(i,0));
}
}
}
// if( ! saCounters.GetSize() )
// {
// return FALSE;
// }
CWbemClassObject* pClassObject = GetObjectPtr()->GetClassObject();
if( ! GfxCheckObjPtr(pClassObject,CWbemClassObject) )
{
return FALSE;
}
CString sNamespace = _T("root\\cimv2");
pClassObject->SetProperty(IDS_STRING_MOF_TARGETNAMESPACE,sNamespace);
CString sQuery;
if( m_iType == 0 )
{
sQuery.Format(_T("select * from Win32_Service where Name=\"%s\""),m_sService);
pClassObject->SetProperty(IDS_STRING_MOF_QUERY,sQuery);
}
else if( m_iType == 1 )
{
sQuery.Format(_T("select * from Win32_Process where Name=\"%s\""),m_sProcess);
pClassObject->SetProperty(IDS_STRING_MOF_QUERY,sQuery);
}
pClassObject->SetProperty(IDS_STRING_MOF_STATISTICSPROPERTYNAMES,saCounters);
bool bReset = m_bRequireReset ? true : false;
pClassObject->SetProperty(IDS_STRING_MOF_REQUIRERESET,bReset);
pClassObject->SaveAllProperties();
delete pClassObject;
SetModified(FALSE);
return TRUE;
}
void CDPServicePage::OnCheckRequireReset()
{
UpdateData();
SetModified();
}
void CDPServicePage::OnClickListProcessProperties2(NMHDR* pNMHDR, LRESULT* pResult)
{
SetModified();
*pResult = 0;
}
void CDPServicePage::OnClickListServiceProperties(NMHDR* pNMHDR, LRESULT* pResult)
{
SetModified();
*pResult = 0;
}