windows-nt/Source/XPSP1/NT/admin/hmonitor/hmagent/system.cpp
2020-09-26 16:20:57 +08:00

4827 lines
113 KiB
C++

//***************************************************************************
//
// SYSTEM.CPP
//
// Module: HEALTHMON SERVER AGENT
//
// Purpose: This HMMACHINE class only has one instance. Its main member
// function is called each time the polling interval goes off. It then goes
// through all of the CDataGroups, CDataCollectors, and CThresholds.
//
// Copyright (c)1999 Microsoft Corporation, All Rights Reserved
//
//***************************************************************************
#include <process.h>
#include <tchar.h>
//#include <objbase.h>
#include "global.h"
#include "system.h"
extern HANDLE g_hConfigLock;
extern CSystem* g_pSystem;
extern CSystem* g_pStartupSystem;
extern LPTSTR conditionLocStr[];
extern LPTSTR stateLocStr[];
extern HMODULE g_hModule;
extern HRESULT SetLocStrings(void);
extern void ClearLocStrings(void);
static BYTE LocalSystemSID[] = {1,1,0,0,0,0,0,5,18,0,0,0};
//////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////
CSystem::CSystem()
{
MY_OUTPUT(L"ENTER ***** CSystem::CSystem...", 4);
g_pIWbemServices = NULL;
g_pIWbemServicesCIMV2 = NULL;
m_lAgentInterval = 0;
m_lStartupDelayTime = 0;
m_lFiveMinTimerTime = 0;
m_lNumInstancesAccepted = 20;
m_lNumberChanges = 0;
m_bEnabled = FALSE;
m_lCurrState = HM_GOOD;
m_lPrevState = HM_GOOD;
m_startTick = GetTickCount();
m_szGUID = NULL;
m_hmStatusType = HMSTATUS_SYSTEM;
m_lNumberNormals = 0;
m_lNumberWarnings = 0;
m_lNumberCriticals = 0;
m_lNumberChanges = 0;
m_lPrevChildCount = 0;
m_szMessage = NULL;
m_szResetMessage = NULL;
CThreshold::GetLocal();
m_pTempSink = NULL;
m_pEFTempSink = NULL;
m_pECTempSink = NULL;
m_pFTCBTempSink = NULL;
m_pEFModTempSink = NULL;
m_pECModTempSink = NULL;
m_pFTCBModTempSink = NULL;
m_processInfo.hProcess = NULL;
m_bValidLoad = FALSE;
m_numActionChanges = 0;
MY_OUTPUT(L"EXIT ***** CSystem::CSystem...", 4);
}
CSystem::~CSystem()
{
int i, iSize;
CDataGroup* pDataGroup;
CAction* pAction;
MY_OUTPUT(L"ENTER ***** ~CSystem::~CSystem...", 4);
// g_pStartupSystem->RemovePointerFromMasterList(this);
if (m_pTempSink)
{
g_pIWbemServices->CancelAsyncCall((IWbemObjectSink*)m_pTempSink);
m_pTempSink->Release();
m_pTempSink = NULL;
}
if (m_pEFTempSink)
{
g_pIWbemServices->CancelAsyncCall((IWbemObjectSink*)m_pEFTempSink);
m_pEFTempSink->Release();
m_pEFTempSink = NULL;
}
if (m_pECTempSink)
{
g_pIWbemServices->CancelAsyncCall((IWbemObjectSink*)m_pECTempSink);
m_pECTempSink->Release();
m_pECTempSink = NULL;
}
if (m_pFTCBTempSink)
{
g_pIWbemServices->CancelAsyncCall((IWbemObjectSink*)m_pFTCBTempSink);
m_pFTCBTempSink->Release();
m_pFTCBTempSink = NULL;
}
if (m_pEFModTempSink)
{
g_pIWbemServices->CancelAsyncCall((IWbemObjectSink*)m_pEFTempSink);
m_pEFTempSink->Release();
m_pEFTempSink = NULL;
}
if (m_pECModTempSink)
{
g_pIWbemServices->CancelAsyncCall((IWbemObjectSink*)m_pECTempSink);
m_pECTempSink->Release();
m_pECTempSink = NULL;
}
if (m_pFTCBModTempSink)
{
g_pIWbemServices->CancelAsyncCall((IWbemObjectSink*)m_pFTCBTempSink);
m_pFTCBTempSink->Release();
m_pFTCBTempSink = NULL;
}
if (m_szGUID)
{
delete [] m_szGUID;
m_szGUID = NULL;
}
if (m_szMessage)
{
delete [] m_szMessage;
m_szMessage = NULL;
}
if (m_szResetMessage)
{
delete [] m_szResetMessage;
m_szResetMessage = NULL;
}
if (g_pSystemEventSink != NULL)
{
g_pSystemEventSink->Release();
g_pSystemEventSink = NULL;
}
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
delete pDataGroup;
}
iSize = m_actionList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
delete pAction;
}
CDataGroup::DGTerminationCleanup();
CDataCollector::DETerminationCleanup();
CThreshold::ThresholdTerminationCleanup();
CBase::CleanupHRLList();
CBase::CleanupEventLists();
ClearLocStrings();
m_bValidLoad = FALSE;
MY_OUTPUT(L"EXIT ***** ~CSystem::~CSystem...", 4);
}
BOOL CSystem::InitWbemPointer(void)
{
HRESULT hRetRes = S_OK;
BSTR bsNamespace = NULL;
IWbemLocator *pLocator = NULL;
MY_OUTPUT(L"ENTER ***** CSystem::InitWbemPointers...", 4);
hRetRes = CoCreateInstance(CLSID_WbemAdministrativeLocator, NULL,
CLSCTX_INPROC_SERVER,
IID_IWbemLocator,
(LPVOID*) &pLocator);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
bsNamespace = SysAllocString(L"\\\\.\\root\\cimv2\\MicrosoftHealthMonitor");
MY_ASSERT(bsNamespace); if (!bsNamespace) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = pLocator->ConnectServer(bsNamespace,
NULL,
NULL,
NULL,
0L,
NULL,
NULL,
&g_pIWbemServices);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
SysFreeString(bsNamespace);
bsNamespace = NULL;
MY_OUTPUT(L"CSystem::InitWbemPointer()-Connected to namespace", 4);
bsNamespace = SysAllocString(L"\\\\.\\root\\cimv2");
MY_ASSERT(bsNamespace); if (!bsNamespace) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = pLocator->ConnectServer( bsNamespace,
NULL,
NULL,
NULL,
0L,
NULL,
NULL,
&g_pIWbemServicesCIMV2);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
SysFreeString(bsNamespace);
bsNamespace = NULL;
pLocator->Release();
pLocator = NULL;
MY_OUTPUT(L"EXIT ***** CSystem::InitWbemPointers...", 4);
return TRUE;
error:
MY_ASSERT(FALSE);
if (pLocator)
pLocator->Release();
if (bsNamespace)
SysFreeString(bsNamespace);
return FALSE;
}
HRESULT CSystem::InternalizeHMNamespace(void)
{
HRESULT hRes;
HRESULT hRetRes;
IWbemClassObject* pObj = NULL;
IWbemClassObject* pNewObj = NULL;
IWbemCallResult *pResult = 0;
int i, iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::InternalizeHMNamespace...", 4);
hRetRes = SetLocStrings();
if (hRetRes != S_OK) return hRetRes;
g_pStartupSystem = this;
hRetRes = InternalizeSystem();
if (hRetRes==S_OK)
{
//
// This reads in all the components heirarchy from the HealthMon namespace.
// Each component reads in what is under it. DataPoints get read in, and they
// in turn read in their thresholds.
//
hRetRes = InternalizeDataGroups();
if (hRetRes==S_OK)
{
//
// Set our state to enabled, or disabled and transfer to the child thresholds
//
iSize = m_dataGroupList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SetParentEnabledFlag(m_bEnabled);
}
}
else
{
g_pStartupSystem = NULL;
return hRetRes;
}
}
else
{
g_pStartupSystem = NULL;
return hRetRes;
}
// Implements the dormancy feature. If the agent has never been active
// before, we will be the first time, because a console connected to the box.
// Create this instance, that will keep us loaded from now on, even if
// WMI stops and starts.
// create an instance of TimerEvent Filter.
// instance of __EventFilter
// {
// Name = "MicrosoftHM_Filter";
// Query = "select * from __TimerEvent where TimerId=\"MicrosoftHM_Timer\"";
// QueryLanguage = "WQL";
// };
hRetRes = GetWbemObjectInst(&g_pIWbemServices, L"__EventFilter.Name=\"MicrosoftHM_Filter\"", NULL, &pObj);
MY_HRESASSERT(hRetRes);
if (!pObj)
{
hRetRes = GetWbemObjectInst(&g_pIWbemServices, L"__EventFilter", NULL, &pObj);
MY_HRESASSERT(hRetRes);
if (pObj)
{
pObj->SpawnInstance(0, &pNewObj);
pObj->Release(); // Don't need the class any more
PutStrProperty(pNewObj, L"Name", L"MicrosoftHM_Filter");
PutStrProperty(pNewObj, L"Query", L"select * from __TimerEvent where TimerId=\"MicrosoftHM_Timer\"");
PutStrProperty(pNewObj, L"QueryLanguage", L"WQL");
hRes = g_pIWbemServices->PutInstance(pNewObj, 0, NULL, &pResult);
MY_HRESASSERT(hRes);
pNewObj->Release();
pNewObj = NULL;
}
}
else
{
pObj->Release();
pObj = NULL;
}
g_pStartupSystem = NULL;
MY_OUTPUT(L"EXIT ***** CSystem::InternalizeHMNamespace...", 4);
return S_OK;
}
//
// Get all the properties from the MicrosoftHM_SystemConfiguration instance
//
HRESULT CSystem::InternalizeSystem(void)
{
BSTR szString = NULL;
IWbemClassObject* pInst = NULL;
IWbemClassObject *pClassObject = NULL;
BOOL fRes = TRUE;
HRESULT hRetRes = S_OK;
MY_OUTPUT(L"ENTER ***** CSystem::InternalizeSystem...", 4);
CalcCurrTime();
wcscpy(m_szDTTime, m_szDTCurrTime);
wcscpy(m_szTime, m_szCurrTime);
//
// Get the properties from the SystemConfiguration instance
//
hRetRes = GetWbemObjectInst(&g_pIWbemServices, L"MicrosoftHM_SystemConfiguration.GUID=\"{@}\"", NULL, &pInst);
if (!pInst)
{
MY_HRESASSERT(hRetRes);
MY_OUTPUT(L"ERROR: Couldn't find MicrosoftHM_SYstemCOnfiguration", 4);
return hRetRes;
}
hRetRes = LoadInstanceFromMOF(pInst);
pInst->Release();
pInst = NULL;
MY_OUTPUT(L"EXIT ***** CSystem::InternalizeSystem...", 4);
return hRetRes;
}
HRESULT CSystem::LoadInstanceFromMOF(IWbemClassObject* pInst)
{
int i, iSize;
CDataGroup *pDataGroup;
HRESULT hRetRes = S_OK;
BOOL bRetValue = TRUE;
MY_OUTPUT(L"ENTER ***** CSystem::LoadInstanceFromMOF...", 4);
m_bValidLoad = TRUE;
if (m_szGUID == NULL)
{
// Get the GUID property
hRetRes = GetStrProperty(pInst, L"GUID", &m_szGUID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) return hRetRes;
}
// if (bModifyPass == FALSE)
// {
// g_pStartupSystem->AddPointerToMasterList(this);
// }
m_lAgentInterval = HM_POLLING_INTERVAL;
hRetRes = GetUint32Property(pInst, L"StartupDelayTime", &m_lStartupDelayTime);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetUint32Property(pInst, L"MaxInstancesPerDataCollector", &m_lNumInstancesAccepted);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetStrProperty(pInst, L"Message", &m_szMessage);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetStrProperty(pInst, L"ResetMessage", &m_szResetMessage);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetBoolProperty(pInst, L"Enabled", &m_bEnabled);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
//
// Set our state to enabled, or disabled and transfer to the child thresholds
//
if (m_bEnabled==FALSE)
{
iSize = m_dataGroupList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SetParentEnabledFlag(FALSE);
}
}
else
{
iSize = m_dataGroupList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SetParentEnabledFlag(TRUE);
}
}
m_bValidLoad = TRUE;
MY_OUTPUT(L"EXIT ***** CSystem::LoadInstanceFromMOF...", 4);
return S_OK;
error:
MY_ASSERT(FALSE);
if (m_szMessage)
{
delete [] m_szMessage;
m_szMessage = NULL;
}
if (m_szResetMessage)
{
delete [] m_szResetMessage;
m_szResetMessage = NULL;
}
m_bValidLoad = FALSE;
return FALSE;
}
HRESULT CSystem::InternalizeDataGroups(void)
{
HRESULT hRetRes = S_OK;
BSTR Language = NULL;
BSTR Query = NULL;
ULONG uReturned;
IWbemClassObject *pObj = NULL;
IEnumWbemClassObject *pEnum = NULL;
LPTSTR pszTempGUID = NULL;
MY_OUTPUT(L"ENTER ***** CSystem::InternalizeDataGroups...", 4);
// Just loop through all top level DataGroups associated with the System.
// Call a method of each, and have the datagroup load itself.
// Dril down and then have each DataCollector load itself.
Language = SysAllocString(L"WQL");
MY_ASSERT(Language); if (!Language) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
Query = SysAllocString(L"ASSOCIATORS OF {MicrosoftHM_SystemConfiguration.GUID=\"{@}\"} WHERE ResultClass=MicrosoftHM_DataGroupConfiguration");
MY_ASSERT(Query); if (!Query) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
// Issue query
hRetRes = g_pIWbemServices->ExecQuery(Language, Query, WBEM_FLAG_FORWARD_ONLY, 0, &pEnum);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) return hRetRes;
SysFreeString(Query);
Query = NULL;
SysFreeString(Language);
Language = NULL;
// Retrieve objects in result set
while (TRUE)
{
pObj = NULL;
uReturned = 0;
hRetRes = pEnum->Next(0, 1, &pObj, &uReturned);
MY_ASSERT(hRetRes==S_OK || hRetRes==WBEM_S_FALSE);
if (hRetRes!=S_OK && hRetRes!=WBEM_S_FALSE)
{
MY_HRESASSERT(hRetRes);
pEnum->Release();
pEnum = NULL;
return hRetRes;
}
if (uReturned == 0)
{
break;
}
// See if this is already read in. Need to prevent endless loop, circular references.
hRetRes = GetStrProperty(pObj, L"GUID", &pszTempGUID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) return hRetRes;
if (!g_pStartupSystem->FindPointerFromGUIDInMasterList(pszTempGUID))
{
// Create the internal class to represent the DataGroup
CDataGroup* pDG = new CDataGroup;
MY_ASSERT(pDG); if (!pDG) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = pDG->LoadInstanceFromMOF(pObj, NULL, m_szGUID);
if (hRetRes==S_OK)
{
m_dataGroupList.push_back(pDG);
}
else
{
MY_ASSERT(FALSE);
pDG->DeleteDGInternal();
delete pDG;
}
}
delete [] pszTempGUID;
pszTempGUID = NULL;
// Release it.
pObj->Release();
pObj = NULL;
}
// All done
pEnum->Release();
pEnum = NULL;
MY_OUTPUT(L"EXIT ***** CSystem::InternalizeDataGroups...", 4);
return S_OK;
error:
MY_ASSERT(FALSE);
if (Query)
SysFreeString(Query);
if (Language)
SysFreeString(Language);
if (pObj)
pObj->Release();
if (pEnum)
pEnum->Release();
if (pszTempGUID)
delete [] pszTempGUID;
m_bValidLoad = FALSE;
return hRetRes;
}
//
// Called every second. We loop through all the DataGroups.
// We call the member function of the DataGroup that will then loop through
// all of its DataGroups and DataCollectors.
//
BOOL CSystem::OnAgentInterval(void)
{
BOOL bRetValue = TRUE;
long state;
int i;
int iSize;
CDataGroup *pDataGroup;
CAction* pAction;
DWORD currTick;
DWORD dwReturnCode = 0L;
long lCurrChildCount = 0;
static int startup_init = 0;
if (m_bValidLoad == FALSE)
{
currTick = GetTickCount();
if ((150*1000) < (currTick-m_lFiveMinTimerTime))
{
m_lFiveMinTimerTime = currTick;
CheckAllForBadLoad();
}
return FALSE;
}
if (startup_init == 0)
{
startup_init = 1;
InternalizeActions();
BOOL bSuccess = ImpersonateSelf(SecurityImpersonation);
RemapActions();
RevertToSelf();
InitActionErrorListener();
InitActionSIDListener(m_pEFTempSink, L"select * from __InstanceCreationEvent where TargetInstance isa \"__EventFilter\"");
InitActionSIDListener(m_pECTempSink, L"select * from __InstanceCreationEvent where TargetInstance isa \"__EventConsumer\"");
InitActionSIDListener(m_pFTCBTempSink, L"select * from __InstanceCreationEvent where TargetInstance isa \"__FilterToConsumerBinding\"");
InitActionSIDListener(m_pEFModTempSink, L"select * from __InstanceModificationEvent where TargetInstance isa \"__EventFilter\"");
InitActionSIDListener(m_pECModTempSink, L"select * from __InstanceModificationEvent where TargetInstance isa \"__EventConsumer\"");
InitActionSIDListener(m_pFTCBModTempSink, L"select * from __InstanceModificationEvent where TargetInstance isa \"__FilterToConsumerBinding\"");
DredgePerfmon();
m_lFiveMinTimerTime = GetTickCount();
}
else
{
if (m_processInfo.hProcess)
{
GetExitCodeProcess(m_processInfo.hProcess, &dwReturnCode);
if (dwReturnCode != STILL_ACTIVE)
{
CloseHandle(m_processInfo.hProcess);
m_processInfo.hProcess = NULL;
}
}
}
currTick = GetTickCount();
if ((150*1000) < (currTick-m_lFiveMinTimerTime))
{
m_lFiveMinTimerTime = currTick;
CheckAllForBadLoad();
// Safety net to catch just in case
if (m_numActionChanges)
{
Sleep(5);
m_numActionChanges = 0;
BOOL bSuccess = ImpersonateSelf(SecurityImpersonation);
RemapActions();
RevertToSelf();
}
}
if (m_numActionChanges>2)
{
Sleep(5);
m_numActionChanges = 1;
BOOL bSuccess = ImpersonateSelf(SecurityImpersonation);
RemapActions();
RevertToSelf();
}
MY_OUTPUT(L"ENTER ***** CSystem::OnAgentInterval...", 1);
//
// Wait for the delay time to be up before we do anything
//
if (m_lStartupDelayTime != -1)
{
currTick = GetTickCount();
if ((m_lStartupDelayTime*1000) < (currTick-m_startTick))
{
m_lStartupDelayTime = -1;
}
else
{
return bRetValue;
}
}
m_lNumberChanges = 0;
//
// Don't do anything if we are disabled.
//
if (m_bEnabled==FALSE && m_lCurrState==HM_DISABLED)
{
return bRetValue;
}
// Call to set the current time, for anyone to use that needs it.
CalcCurrTime();
//
// Do Action scheduling and throttling
//
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
pAction->OnAgentInterval();
}
m_lPrevState = m_lCurrState;
iSize = m_dataGroupList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->OnAgentInterval();
}
if (m_bEnabled==FALSE)
{
m_lCurrState = HM_DISABLED;
if (m_lNumberChanges == 0)
m_lNumberChanges = 1;
}
else
{
//
// Set State of the system to the worst of everything under it
//
m_lNumberNormals = 0;
m_lNumberWarnings = 0;
m_lNumberCriticals = 0;
m_lNumberChanges = 0;
m_lCurrState = -1;
iSize = m_dataGroupList.size();
lCurrChildCount = iSize;
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
state = pDataGroup->GetCurrState();
if (state==HM_SCHEDULEDOUT || state==HM_DISABLED)
{
state = HM_GOOD;
}
if (state > m_lCurrState)
{
m_lCurrState = state;
}
if (state == HM_GOOD)
{
m_lNumberNormals++;
}
if (state == HM_WARNING)
{
m_lNumberWarnings++;
}
if (state == HM_CRITICAL)
{
m_lNumberCriticals++;
}
if (pDataGroup->GetChange())
{
m_lNumberChanges++;
}
}
// Maybe we don't have any Groups underneith
// Or the disabled state of things below us did not roll up
if (m_lCurrState == -1)
{
if (m_bEnabled==FALSE)
{
m_lCurrState = HM_DISABLED;
}
else
{
m_lCurrState = HM_GOOD;
}
if (m_lPrevState != m_lCurrState)
{
m_lNumberChanges++;
}
}
else if (m_lPrevState==HM_DISABLED && m_lPrevState != m_lCurrState)
{
m_lNumberChanges++;
}
}
if (m_lPrevChildCount!=lCurrChildCount)
{
if (m_lNumberChanges==0 && m_lPrevState!=m_lCurrState)
{
m_lNumberChanges++;
}
}
m_lPrevChildCount = lCurrChildCount;
FireEvents();
MY_OUTPUT(L"EXIT ***** CSystem::OnAgentInterval...", 1);
return bRetValue;
}
HRESULT CSystem::DredgePerfmon(void)
{
wchar_t szModule[_MAX_PATH];
wchar_t szPath[_MAX_PATH];
wchar_t szDir[_MAX_PATH];
STARTUPINFO StartupInfo;
DWORD dwReturnCode = 0L;
BOOL bRetCode;
MY_OUTPUT(L"ENTER ***** CSystem::DredgePerfmon...", 4);
// Set the startup structure
//==========================
memset(&StartupInfo, '\0', sizeof(StartupInfo));
StartupInfo.cb = sizeof(StartupInfo) ;
StartupInfo.lpReserved = NULL ;
StartupInfo.lpDesktop = NULL ;
StartupInfo.lpTitle = NULL ;
StartupInfo.dwFlags = 0; //STARTF_USESHOWWINDOW;//0;
StartupInfo.wShowWindow = SW_HIDE;
StartupInfo.cbReserved2 = 0 ;
StartupInfo.lpReserved2 = NULL ;
// Get the path to the dredger executable
GetModuleFileNameW(g_hModule, szModule, _MAX_PATH);
_tsplitpath(szModule, szPath, szDir, NULL, NULL);
lstrcat(szPath, szDir);
lstrcat(szPath, L"\\dredger.exe");
bRetCode = CreateProcess(NULL, // App name
szPath, // Full command line
NULL, // Process security attributes
NULL, // Thread security attributes
FALSE, // Process inherits handles
CREATE_NO_WINDOW, // Creation flags
NULL, // Environment
NULL, // Current directory
&StartupInfo, // STARTUP_INFO
&m_processInfo); // PROCESS_INFORMATION
MY_ASSERT(bRetCode);
MY_OUTPUT(L"EXIT ***** CSystem::DredgePerfmon...", 4);
return S_OK;
}
// get polling interval in milliseconds.
long CSystem::GetAgentInterval(void)
{
return (m_lAgentInterval*1000);
}
// get polling interval in milliseconds.
long CSystem::GetStartupDelayTime(void)
{
return (m_lStartupDelayTime*1000);
}
// Pass on info to the DataCollector that has the GUID
BOOL CSystem::HandleTempActionEvent(LPTSTR szGUID, IWbemClassObject* pObj)
{
BOOL bFound = FALSE;
int i, iSize;
CAction* pAction;
DWORD dwErr = 0;
if (m_bValidLoad == FALSE)
return FALSE;
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent BLOCK - g_hConfigLock BLOCK WAIT", 4);
dwErr = WaitForSingleObject(g_hConfigLock, 120000);
if(dwErr != WAIT_OBJECT_0)
{
if(dwErr = WAIT_TIMEOUT)
{
TRACE_MUTEX(L"TIMEOUT MUTEX");
return FALSE;
// return WBEM_S_TIMEDOUT;
}
else
{
MY_OUTPUT(L"WaitForSingleObject on Mutex failed",4);
return FALSE;
// return WBEM_E_FAILED;
}
}
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent BLOCK - g_hConfigLock BLOCK GOT IT", 4);
if (!g_pSystem)
{
ReleaseMutex(g_hConfigLock);
return FALSE;
}
try
{
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
if (pAction->HandleTempEvent(szGUID, pObj))
{
bFound = TRUE;
break;
}
}
if (bFound == FALSE)
{
MY_OUTPUT2(L"NOTFOUND: No body to handle event for GUID=%s", szGUID, 4);
}
}
catch (...)
{
MY_ASSERT(FALSE);
}
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent g_hConfigLock BLOCK - RELEASE IT", 4);
ReleaseMutex(g_hConfigLock);
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent g_hConfigLock BLOCK - RELEASED", 4);
return TRUE;
}
BOOL CSystem::HandleTempEvent(CEventQueryDataCollector *pEQDC, IWbemClassObject* pObj)
{
BOOL bFound = FALSE;
int i, iSize;
CBase* pBase;
DWORD dwErr = 0;
if (m_bValidLoad == FALSE)
return FALSE;
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent BLOCK - g_hConfigLock BLOCK WAIT", 4);
dwErr = WaitForSingleObject(g_hConfigLock, 120000);
if(dwErr != WAIT_OBJECT_0)
{
if(dwErr = WAIT_TIMEOUT)
{
TRACE_MUTEX(L"TIMEOUT MUTEX");
return FALSE;
// return WBEM_S_TIMEDOUT;
}
else
{
MY_OUTPUT(L"WaitForSingleObject on Mutex failed",4);
return FALSE;
// return WBEM_E_FAILED;
}
}
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent BLOCK - g_hConfigLock BLOCK GOT IT", 4);
if (!g_pSystem)
{
ReleaseMutex(g_hConfigLock);
return FALSE;
}
try
{
iSize = m_masterList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_masterList.size());
pBase = m_masterList[i];
if (pBase->m_hmStatusType == HMSTATUS_DATACOLLECTOR)
{
if (((CDataCollector *)pBase)->m_deType == HM_EQDE)
{
if (((CEventQueryDataCollector *)pBase) == pEQDC)
{
((CEventQueryDataCollector *)pBase)->HandleTempEvent(pObj);
bFound = TRUE;
break;
}
}
}
}
if (bFound == FALSE)
{
MY_OUTPUT2(L"NOTFOUND: No body to handle event for GUID=%s", pBase->m_szGUID, 4);
}
}
catch (...)
{
MY_ASSERT(FALSE);
}
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent g_hConfigLock BLOCK - RELEASE IT", 4);
ReleaseMutex(g_hConfigLock);
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent g_hConfigLock BLOCK - RELEASED", 4);
return TRUE;
}
HRESULT CSystem::SendHMSystemStatusInstance(IWbemObjectSink* pSink, LPTSTR pszGUID)
{
MY_OUTPUT2(L"System send for GUID=%s", pszGUID, 4);
MY_ASSERT(pSink!=NULL);
if (!wcscmp(L"{@}", pszGUID))
{
return SendHMSystemStatusInstances(pSink);
}
else
{
return WBEM_S_DIFFERENT;
}
}
HRESULT CSystem::SendHMSystemStatusInstances(IWbemObjectSink* pSink)
{
HRESULT hRes = S_OK;
IWbemClassObject* pInstance = NULL;
MY_OUTPUT(L"ENTER ***** SendHMSystemStatusInstances...", 4);
if (pSink == NULL)
{
MY_OUTPUT(L"CDP::SendInitialHMMachStatInstances-Invalid Sink", 1);
return WBEM_E_FAILED;
}
hRes = GetHMSystemStatusInstance(&pInstance, FALSE);
if (SUCCEEDED(hRes))
{
hRes = pSink->Indicate(1, &pInstance);
if (FAILED(hRes) && hRes != WBEM_E_SERVER_TOO_BUSY)
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"SendHMSystemStatusInstances-failed to send status!", 4);
}
else
{
MY_OUTPUT(L"SendHMSystemStatusInstances-success!", 4);
}
pInstance->Release();
pInstance = NULL;
}
else
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L":SendHMSystemStatusInstances-failed to get instance!", 1);
}
MY_OUTPUT(L"EXIT ***** SendHMSystemStatusInstances...", 4);
return hRes;
}
HRESULT CSystem::SendHMDataGroupStatusInstances(IWbemObjectSink* pSink)
{
BOOL bRetValue = TRUE;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendDataGroupStatusInstances...", 4);
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SendHMDataGroupStatusInstances(pSink);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendDataGroupStatusInstances...", 4);
return bRetValue;
}
HRESULT CSystem::SendHMDataGroupStatusInstance(IWbemObjectSink* pSink, LPTSTR pszGUID)
{
HRESULT hRetRes = S_OK;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendDataGroupStatusInstance...", 4);
MY_OUTPUT2(L"DG send for GUID=%s", pszGUID, 4);
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->SendHMDataGroupStatusInstance(pSink, pszGUID);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendDataGroupStatusInstance...", 4);
return hRetRes;
}
HRESULT CSystem::SendHMDataCollectorStatusInstances(IWbemObjectSink* pSink)
{
BOOL bRetValue = TRUE;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendDataCollectorStatusInstances...", 4);
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SendHMDataCollectorStatusInstances(pSink);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendDataCollectorStatusInstances...", 4);
return bRetValue;
}
HRESULT CSystem::SendHMDataCollectorStatusInstance(IWbemObjectSink* pSink, LPTSTR pszGUID)
{
HRESULT hRetRes = S_OK;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendDataCollectorStatusInstance...", 4);
MY_OUTPUT2(L"DC send for GUID=%s", pszGUID, 4);
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->SendHMDataCollectorStatusInstance(pSink, pszGUID);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendDataCollectorStatusInstance...", 4);
return hRetRes;
}
HRESULT CSystem::SendHMDataCollectorPerInstanceStatusInstances(IWbemObjectSink* pSink)
{
BOOL bRetValue = TRUE;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendDataCollectorPerInstanceStatusInstances...", 4);
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SendHMDataCollectorPerInstanceStatusInstances(pSink);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendDataCollectorPerInstanceStatusInstances...", 4);
return bRetValue;
}
HRESULT CSystem::SendHMDataCollectorPerInstanceStatusInstance(IWbemObjectSink* pSink, LPTSTR pszGUID)
{
HRESULT hRetRes = S_OK;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendDataCollectorPerInstanceStatusInstance...", 4);
MY_OUTPUT2(L"DC send for GUID=%s", pszGUID, 4);
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->SendHMDataCollectorPerInstanceStatusInstance(pSink, pszGUID);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendDataCollectorPerInstanceStatusInstance...", 4);
return hRetRes;
}
HRESULT CSystem::SendHMDataCollectorStatisticsInstances(IWbemObjectSink* pSink)
{
BOOL bRetValue = TRUE;
int i, iSize;
CDataGroup *pDataGroup;
IWbemClassObject** aObjects;
IWbemClassObject* pInstance = NULL;
MY_OUTPUT(L"ENTER ***** CSystem::SendDataCollectorStatisticsInstances...", 4);
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SendHMDataCollectorStatisticsInstances(pSink);
}
//
// Loop through the DataCollectorStatistics Events and send them as one indicate
//
iSize = mg_DCStatsInstList.size();
aObjects = new IWbemClassObject*[iSize];
if (aObjects)
{
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DCStatsInstList.size());
pInstance = mg_DCStatsInstList[i];
aObjects[i] = pInstance;
}
SendEvents(pSink, aObjects, iSize);
}
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DCStatsInstList.size());
pInstance = mg_DCStatsInstList[i];
pInstance->Release();
}
mg_DCStatsInstList.clear();
if (aObjects)
delete [] aObjects;
MY_OUTPUT(L"EXIT ***** CSystem::SendDataCollectorStatisticsInstances...", 4);
return bRetValue;
}
HRESULT CSystem::SendHMDataCollectorStatisticsInstance(IWbemObjectSink* pSink, LPTSTR pszGUID)
{
HRESULT hRetRes = S_OK;
int i;
int iSize;
CDataGroup *pDataGroup;
IWbemClassObject* pInstance = NULL;
IWbemClassObject** aObjects;
MY_OUTPUT(L"ENTER ***** CSystem::SendDataCollectorStatisticsInstance...", 4);
MY_OUTPUT2(L"DCStatistics send for GUID=%s", pszGUID, 4);
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->SendHMDataCollectorStatisticsInstance(pSink, pszGUID);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
//
// Loop through the DataCollectorStatistics Events and send them as one indicate
//
iSize = mg_DCStatsInstList.size();
aObjects = new IWbemClassObject*[iSize];
if (aObjects)
{
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DCStatsInstList.size());
pInstance = mg_DCStatsInstList[i];
aObjects[i] = pInstance;
}
SendEvents(pSink, aObjects, iSize);
}
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DCStatsInstList.size());
pInstance = mg_DCStatsInstList[i];
pInstance->Release();
}
mg_DCStatsInstList.clear();
if (aObjects)
delete [] aObjects;
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
return WBEM_E_NOT_FOUND;
}
MY_OUTPUT(L"EXIT ***** CSystem::SendDataCollectorStatisticsInstance...", 4);
return hRetRes;
}
HRESULT CSystem::SendHMThresholdStatusInstances(IWbemObjectSink* pSink)
{
HRESULT hRetRes = S_OK;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendThresholdStatusInstances...", 4);
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SendHMThresholdStatusInstances(pSink);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendThresholdStatusInstances...", 4);
return hRetRes;
}
HRESULT CSystem::SendHMThresholdStatusInstance(IWbemObjectSink* pSink, LPTSTR pszGUID)
{
HRESULT hRetRes = S_OK;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendHMThresholdStatusInstance...", 4);
MY_OUTPUT2(L"Threshold send for GUID=%s", pszGUID, 4);
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->SendHMThresholdStatusInstance(pSink, pszGUID);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendHMThresholdStatusInstance...", 4);
return hRetRes;
}
#ifdef SAVE
NOT USED!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
NOT USED!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
NOT USED!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
HRESULT CSystem::SendHMThresholdStatusInstanceInstances(IWbemObjectSink* pSink)
{
BOOL bRetValue = TRUE;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendThresholdStatusInstanceInstances...", 4);
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->SendHMThresholdStatusInstanceInstances(pSink);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendThresholdStatusInstanceInstances...", 4);
return bRetValue;
}
NOT USED!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
NOT USED!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
NOT USED!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
HRESULT CSystem::SendHMThresholdStatusInstanceInstance(IWbemObjectSink* pSink, LPTSTR pszGUID)
{
BOOL bRetValue = TRUE;
int i;
int iSize;
CDataGroup *pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::SendHMThresholdStatusInstanceInstance...", 4);
MY_OUTPUT2(L"ThresholdStatusInstances send for GUID=%s", pszGUID, 4);
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (pDataGroup->SendHMThresholdStatusInstanceInstance(pSink, pszGUID))
{
MY_OUTPUT(L"Found", 4);
break;
}
}
MY_OUTPUT(L"EXIT ***** CSystem::SendHMThresholdStatusInstanceInstance...", 4);
return bRetValue;
}
#endif
HRESULT CSystem::SendHMActionStatusInstances(IWbemObjectSink* pSink)
{
HRESULT hRetRes = S_OK;
int i;
int iSize;
CAction *pAction;
MY_OUTPUT(L"ENTER ***** CSystem::SendActionStatusInstances...", 4);
iSize = m_actionList.size();
for (i = 0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
pAction->SendHMActionStatusInstances(pSink);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendActionStatusInstances...", 4);
return hRetRes;
}
HRESULT CSystem::SendHMActionStatusInstance(IWbemObjectSink* pSink, LPTSTR pszGUID)
{
HRESULT hRetRes = S_OK;
int i;
int iSize;
CAction *pAction;
MY_OUTPUT(L"ENTER ***** CSystem::SendHMActionStatusInstance...", 4);
MY_OUTPUT2(L"ActionStatus send for GUID=%s", pszGUID, 4);
iSize = m_actionList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
hRetRes = pAction->SendHMActionStatusInstance(pSink, pszGUID);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::SendHMActionStatusInstance...", 4);
return hRetRes;
}
BOOL CSystem::FireEvents(void)
{
IWbemClassObject* pInstance = NULL;
int i, iSize;
// Send the System event
FireEvent();
//
// Loop through the DataGroup Events and send them as one indicate
//
iSize = mg_DGEventList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DGEventList.size());
pInstance = mg_DGEventList[i];
SendEvents(g_pDataGroupEventSink, &pInstance, 1);
pInstance->Release();
}
mg_DGEventList.clear();
//
// Loop through the DataCollector Events and send them as one indicate
//
iSize = mg_DCEventList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DCEventList.size());
pInstance = mg_DCEventList[i];
SendEvents(g_pDataCollectorEventSink, &pInstance, 1);
pInstance->Release();
}
mg_DCEventList.clear();
//
// Loop through the DataCollector PerInstance Events and send them as one indicate
//
iSize = mg_DCPerInstanceEventList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DCPerInstanceEventList.size());
pInstance = mg_DCPerInstanceEventList[i];
SendEvents(g_pDataCollectorPerInstanceEventSink, &pInstance, 1);
pInstance->Release();
}
mg_DCPerInstanceEventList.clear();
//
// Loop through the Threshold Events and send them as one indicate
//
iSize = mg_TEventList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_TEventList.size());
pInstance = mg_TEventList[i];
SendEvents(g_pThresholdEventSink, &pInstance, 1);
pInstance->Release();
}
mg_TEventList.clear();
//
// Loop through the ThresholdInstance Events and send them as one indicate
//
// iSize = mg_TIEventList.size();
// for (i=0; i < iSize; i++)
// {
// MY_ASSERT(i<mg_TIEventList.size());
// pInstance = mg_TIEventList[i];
// SendEvents(g_pThresholdInstanceEventSink, &pInstance, 1);
// pInstance->Release();
// }
// mg_TIEventList.clear();
//
// Loop through the DataCollectorStatistics Events and send them as one indicate
//
iSize = mg_DCStatsEventList.size();
MY_ASSERT(iSize==0);
#ifdef SAVE
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DCStatsEventList.size());
pInstance = mg_DCStatsEventList[i];
SendEvents(g_pDataCollectorStatisticsEventSink, &pInstance, 1);
pInstance->Release();
}
mg_DCStatsEventList.clear();
#endif
#ifdef SAVE
XXX
// IWbemClassObject** aObjects;
Need to wait for the Whistler fix for sending multiple objects with one Indicate
//
// Loop through the DataGroup Events and send them as one indicate
//
iSize = mg_DGEventList.size();
aObjects = new IWbemClassObject*[iSize];
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DGEventList.size());
pInstance = mg_DGEventList[i];
aObjects[i] = pInstance;
}
SendEvents(g_pDataGroupEventSink, aObjects, iSize);
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<mg_DGEventList.size());
pInstance = mg_DGEventList[i];
pInstance->Release();
}
mg_DGEventList.clear();
delete [] aObjects;
.
.
.
#endif
return TRUE;
}
//
// If there has been a change in the state then send an event
//
BOOL CSystem::FireEvent(void)
{
HRESULT hRes;
BOOL bRetValue = TRUE;
IWbemClassObject* pInstance = NULL;
MY_OUTPUT(L"ENTER ***** CSystem::FireEvent...", 2);
// Don't send if no-one is listening!
if (g_pSystemEventSink == NULL)
{
return bRetValue;
}
// A quick test to see if anything has really changed!
// Proceed if there have been changes
if (m_lNumberChanges!=0 && m_lPrevState!=m_lCurrState)
{
}
else
{
return FALSE;
}
// Update time if there has been a change
wcscpy(m_szDTTime, m_szDTCurrTime);
wcscpy(m_szTime, m_szCurrTime);
hRes = GetHMSystemStatusInstance(&pInstance, TRUE);
if (SUCCEEDED(hRes) && g_pSystemEventSink)
{
MY_OUTPUT2(L"EVENT: System State Change=%d", m_lCurrState, 4);
hRes = g_pSystemEventSink->Indicate(1, &pInstance);
// WBEM_E_SERVER_TOO_BUSY is Ok. Wbem will deliver.
if (FAILED(hRes) && hRes != WBEM_E_SERVER_TOO_BUSY)
{
MY_HRESASSERT(hRes);
bRetValue = FALSE;
MY_OUTPUT(L"Failed on Indicate!", 4);
}
pInstance->Release();
pInstance = NULL;
}
else
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"failed to get instance!", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::FireEvent...", 2);
return bRetValue;
}
HRESULT CSystem::GetHMSystemStatusInstance(IWbemClassObject** ppInstance, BOOL bEventBased)
{
TCHAR szTemp[1024];
IWbemClassObject* pClass = NULL;
BSTR bsString = NULL;
HRESULT hRetRes;
MY_OUTPUT(L"ENTER ***** GetHMSystemStatusInstance...", 1);
if (bEventBased)
bsString = SysAllocString(L"MicrosoftHM_SystemStatusEvent");
else
bsString = SysAllocString(L"MicrosoftHM_SystemStatus");
MY_ASSERT(bsString); if (!bsString) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = g_pIWbemServices->GetObject(bsString, 0L, NULL, &pClass, NULL);
SysFreeString(bsString);
bsString = NULL;
if (FAILED(hRetRes))
{
MY_HRESASSERT(hRetRes);
MY_OUTPUT2(L"CSystem::GetHMSystemStatusInstance()-Couldn't get HMSystemStatusInstance Error: 0x%08x",hRetRes,4);
return hRetRes;
}
hRetRes = pClass->SpawnInstance(0, ppInstance);
pClass->Release();
pClass = NULL;
if (FAILED(hRetRes))
{
MY_HRESASSERT(hRetRes);
MY_OUTPUT2(L"CSystem::GetHMSystemStatusInstance()-Couldn't get HMSystemStatusInstance Error: 0x%08x",hRetRes,4);
return hRetRes;
}
if (m_bValidLoad == FALSE)
{
hRetRes = PutStrProperty(*ppInstance, L"GUID", L"{@}");
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = PutUint32Property(*ppInstance, L"State", HM_CRITICAL);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
if (g_hResLib == NULL || !LoadString(g_hResLib, HMRES_SYSTEM_LOADFAIL, szTemp, 1024))
{
wcscpy(szTemp, L"System failed to load.");
}
hRetRes = PutStrProperty(*ppInstance, L"Message", szTemp);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = PutStrProperty(*ppInstance, L"Name", L"...");
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
}
else
{
hRetRes = PutStrProperty(*ppInstance, L"GUID", L"{@}");
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
// Get the computer name of the machine
DWORD dwNameLen = MAX_COMPUTERNAME_LENGTH + 1;
TCHAR szComputerName[MAX_COMPUTERNAME_LENGTH + 1];
if (GetComputerName(szComputerName, &dwNameLen))
{
hRetRes = PutStrProperty(*ppInstance, L"Name", szComputerName);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = PutStrProperty(*ppInstance, L"SystemName", szComputerName);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
}
else
{
hRetRes = PutStrProperty(*ppInstance, L"Name", L"LocalMachine");
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = PutStrProperty(*ppInstance, L"SystemName", L"LocalMachine");
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
}
hRetRes = PutStrProperty(*ppInstance, L"TimeGeneratedGMT", m_szDTTime);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = PutStrProperty(*ppInstance, L"LocalTimeFormatted", m_szTime);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = PutUint32Property(*ppInstance, L"State", m_lCurrState);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
if (m_lCurrState != HM_GOOD)
{
hRetRes = PutStrProperty(*ppInstance, L"Message", m_szMessage);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
}
else
{
hRetRes = PutStrProperty(*ppInstance, L"Message", m_szResetMessage);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
}
FormatMessage(*ppInstance);
}
MY_OUTPUT(L"EXIT ***** GetHMSystemStatusInstance...", 1);
return hRetRes;
error:
MY_ASSERT(FALSE);
if (bsString)
SysFreeString(bsString);
if (pClass)
pClass->Release();
return hRetRes;
}
HRESULT CSystem::ModSystem(IWbemClassObject* pObj)
{
HRESULT hRetRes = S_OK;
MY_OUTPUT(L"ENTER ***** CSystem::ModSystem...", 4);
// Re-load
hRetRes = LoadInstanceFromMOF(pObj);
MY_OUTPUT(L"EXIT ***** CSystem::ModSystem...", 4);
return hRetRes;
}
HRESULT CSystem::ModDataGroup(IWbemClassObject* pObj)
{
HRESULT hRes;
HRESULT hRetRes = WBEM_E_NOT_FOUND;
int i, iSize;
VARIANT v;
CDataGroup* pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::ModDataGroup...", 4);
VariantInit(&v);
hRes = pObj->Get(L"GUID", 0L, &v, 0L, 0L);
if (FAILED(hRes))
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"ENTER ***** CSystem::ModDataGroup-Unexpected Error!...", 4);
VariantClear(&v);
return hRes;
}
MY_OUTPUT2(L"DG mod for GUID=%s", V_BSTR(&v), 4);
//
// Search right under the System to find the DataGroup.
// If don't find, drill down until we do.
//
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->FindAndModDataGroup(V_BSTR(&v), pObj);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
VariantClear(&v);
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
else
{
MY_OUTPUT(L"Found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::ModDataGroup...", 4);
return hRetRes;
}
HRESULT CSystem::ModDataCollector(IWbemClassObject* pObj)
{
HRESULT hRes;
HRESULT hRetRes = WBEM_E_NOT_FOUND;
int i, iSize;
VARIANT v;
CDataGroup* pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::ModDataCollector...", 4);
VariantInit(&v);
hRes = pObj->Get(L"GUID", 0L, &v, 0L, 0L);
if (FAILED(hRes))
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"ENTER ***** CSystem::ModDataCollector-Unexpected Error!...", 4);
VariantClear(&v);
return hRes;
}
MY_OUTPUT2(L"DC mod for GUID=%s", V_BSTR(&v), 4);
//
// Search right under the System to find the DataGroup.
// If don't find, drill down until we do.
//
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->FindAndModDataCollector(V_BSTR(&v), pObj);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
VariantClear(&v);
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
else
{
MY_OUTPUT(L"Found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::ModDataCollector...", 4);
return hRetRes;
}
HRESULT CSystem::ModThreshold(IWbemClassObject* pObj)
{
HRESULT hRes;
HRESULT hRetRes = WBEM_E_NOT_FOUND;
int i, iSize;
VARIANT v;
CDataGroup* pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::ModThreshold...", 4);
VariantInit(&v);
hRes = pObj->Get(L"GUID", 0L, &v, 0L, 0L);
if (FAILED(hRes))
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"ENTER ***** CSystem::ModThreshold-Unexpected Error!...", 4);
VariantClear(&v);
return hRes;
}
MY_OUTPUT2(L"Threshold mod for GUID=%s", V_BSTR(&v), 4);
//
// Search right under the System to find the DataGroup.
// If don't find, drill down until we do.
//
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->FindAndModThreshold(V_BSTR(&v), pObj);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
VariantClear(&v);
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
else
{
MY_OUTPUT(L"Found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::ModThreshold...", 4);
return hRetRes;
}
HRESULT CSystem::ModAction(IWbemClassObject* pObj)
{
HRESULT hRes;
HRESULT hRetRes = WBEM_E_NOT_FOUND;
int i, iSize;
VARIANT v;
CAction* pAction;
MY_OUTPUT(L"ENTER ***** CSystem::ModAction...", 4);
VariantInit(&v);
hRes = pObj->Get(L"GUID", 0L, &v, 0L, 0L);
if (FAILED(hRes))
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"ENTER ***** CSystem::ModAction-Unexpected Error!...", 4);
VariantClear(&v);
return hRes;
}
MY_OUTPUT2(L"Action mod for GUID=%s", V_BSTR(&v), 4);
//
// Search right under the System to find the Action.
// If don't find, drill down until we do.
//
iSize = m_actionList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
hRetRes = pAction->FindAndModAction(V_BSTR(&v), pObj);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
VariantClear(&v);
if (hRetRes==WBEM_S_DIFFERENT)
{
hRetRes = WBEM_E_NOT_FOUND;
MY_OUTPUT(L"GUID not found", 4);
}
else
{
MY_OUTPUT(L"Found", 4);
}
MY_OUTPUT(L"EXIT ***** CSystem::ModAction...", 4);
return hRetRes;
}
BOOL CSystem::CreateActionAssociation(IWbemClassObject* pObj)
{
TCHAR szGUID[1024];
LPTSTR pStr;
LPTSTR pStr2;
HRESULT hRes;
BOOL bRetValue = TRUE;
int i, iSize;
VARIANT v;
CAction* pAction;
MY_OUTPUT(L"ENTER ***** CSystem::CreateActionAssociation...", 4);
VariantInit(&v);
hRes = pObj->Get(L"ChildPath", 0L, &v, 0L, 0L);
if (FAILED(hRes))
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"ENTER ***** CSystem::CreateActionAssociation-Unexpected Error!...", 4);
VariantClear(&v);
return FALSE;
}
// Get the Action GUID from the path
wcscpy(szGUID, V_BSTR(&v));
pStr = wcschr(szGUID, '\"');
if (pStr)
{
pStr++;
pStr2 = wcschr(pStr, '\"');
if (pStr2)
{
*pStr2 = '\0';
//
// Find the Action and add the new association
//
iSize = m_actionList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
bRetValue = pAction->FindAndCreateActionAssociation(pStr, pObj);
if (bRetValue)
{
break;
}
}
}
}
VariantClear(&v);
MY_OUTPUT(L"EXIT ***** CSystem::CreateActionAssociation...", 4);
return bRetValue;
}
BOOL CSystem::ModActionAssociation(IWbemClassObject* pObj)
{
TCHAR szGUID[1024];
LPTSTR pStr;
LPTSTR pStr2;
HRESULT hRes;
BOOL bRetValue = TRUE;
int i, iSize;
VARIANT v;
CAction* pAction;
MY_OUTPUT(L"ENTER ***** CSystem::ModActionAssociation...", 4);
VariantInit(&v);
hRes = pObj->Get(L"ChildPath", 0L, &v, 0L, 0L);
if (FAILED(hRes))
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"ENTER ***** CSystem::ModActionAssociation-Unexpected Error!...", 4);
VariantClear(&v);
return FALSE;
}
// Get the Action GUID from the path
wcscpy(szGUID, V_BSTR(&v));
pStr = wcschr(szGUID, '\"');
if (pStr)
{
pStr++;
pStr2 = wcschr(pStr, '\"');
if (pStr2)
{
*pStr2 = '\0';
//
// Find the Action and modify the association
//
iSize = m_actionList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
bRetValue = pAction->FindAndModActionAssociation(pStr, pObj);
if (bRetValue)
{
break;
}
}
}
}
VariantClear(&v);
MY_OUTPUT(L"EXIT ***** CSystem::ModActionAssociation...", 4);
return bRetValue;
}
HRESULT CSystem::CreateSystemDataGroupAssociation(IWbemClassObject* pObj)
{
int i, iSize;
TCHAR szTemp[1024];
VARIANT v;
BOOL bFound;
HRESULT hRetRes = S_OK;
CDataGroup* pDG = NULL;
CDataGroup* pDataGroup = NULL;
BOOL bRetValue = TRUE;
TCHAR szGUID[1024];
LPTSTR pStr = NULL;
LPTSTR pStr2 = NULL;
BSTR Path = NULL;
IWbemClassObject* pObj2 = NULL;
LPTSTR pszTempGUID = NULL;
MY_OUTPUT(L"ENTER ***** CSystem::CreateSystemDataGroupAssociation...", 4);
//
// Get the name of the child DataGroup
//
VariantInit(&v);
hRetRes = pObj->Get(L"ChildPath", 0L, &v, 0L, 0L);
MY_HRESASSERT(hRetRes); if (hRetRes != S_OK) goto error;
wcscpy(szGUID, V_BSTR(&v));
pStr = wcschr(szGUID, '\"');
if (pStr)
{
pStr++;
pStr2 = wcschr(pStr, '\"');
if (pStr2)
{
*pStr2 = '\0';
//
// First make sure it is not in there already!
//
bFound = FALSE;
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pStr, pDataGroup->GetGUID()))
{
bFound = TRUE;
break;
}
}
MY_OUTPUT2(L"Association DG to System DGGUID=%s", pStr, 4);
if (bFound == FALSE)
{
MY_OUTPUT(L"OK: Not found yet", 4);
//
// Add in the DataGroup. Everything below will follow.
//
wcscpy(szTemp, L"MicrosoftHM_DataGroupConfiguration.GUID=\"");
lstrcat(szTemp, pStr);
lstrcat(szTemp, L"\"");
Path = SysAllocString(szTemp);
MY_ASSERT(Path); if (!Path) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = GetWbemObjectInst(&g_pIWbemServices, Path, NULL, &pObj2);
//XXXGet back an HRESULT and then return that
MY_ASSERT(pObj2); if (!pObj2) {hRetRes = S_FALSE; goto error;}
// See if this is already read in. Need to prevent endless loop, circular references.
hRetRes = GetStrProperty(pObj2, L"GUID", &pszTempGUID);
MY_ASSERT(hRetRes==S_OK); if (hRetRes!= S_OK) goto error;
if (!g_pStartupSystem->FindPointerFromGUIDInMasterList(pszTempGUID))
{
//
// Create the internal class to represent the DataGroup
//
pDG = new CDataGroup;
MY_ASSERT(pDG); if (!pDG) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = pDG->LoadInstanceFromMOF(pObj2, NULL, m_szGUID);
if (hRetRes==S_OK)
{
m_dataGroupList.push_back(pDG);
pDG->SetParentEnabledFlag(m_bEnabled);
}
else
{
MY_HRESASSERT(hRetRes);
pDG->DeleteDGInternal();
delete pDG;
pDG = NULL;
}
}
delete [] pszTempGUID;
pszTempGUID = NULL;
pObj2->Release();
pObj2 = NULL;
SysFreeString(Path);
Path = NULL;
}
else
{
MY_OUTPUT(L"WHY?: Already there!", 4);
}
}
}
VariantClear(&v);
MY_OUTPUT(L"EXIT ***** CSystem::CreateSystemDataGroupAssociation...", 4);
return hRetRes;
error:
MY_HRESASSERT(hRetRes);
VariantClear(&v);
if (Path)
SysFreeString(Path);
if (pObj2)
pObj2->Release();
if (pDG)
delete pDG;
if (pszTempGUID)
delete [] pszTempGUID;
return hRetRes;
}
HRESULT CSystem::CreateDataGroupDataGroupAssociation(IWbemClassObject* pObj)
{
VARIANT vParent;
VARIANT vChild;
TCHAR szChildGUID[1024];
DGLIST::iterator iaDG;
int i, iSize;
HRESULT hRetRes = S_OK;
CDataGroup* pDataGroup = NULL;
TCHAR szParentGUID[1024];
LPTSTR pParentStr = NULL;
LPTSTR pParentStr2 = NULL;
LPTSTR pChildStr = NULL;
LPTSTR pChildStr2 = NULL;
VariantInit(&vParent);
VariantInit(&vChild);
MY_OUTPUT(L"ENTER ***** CSystem::CreateDataGroupDataGroupAssociation...", 4);
//
// Get the name of the parent DataGroup
//
hRetRes = pObj->Get(L"ParentPath", 0L, &vParent, 0L, 0L);
MY_HRESASSERT(hRetRes); if (hRetRes != S_OK) goto error;
//
// Get the name of the child DataGroup
//
hRetRes = pObj->Get(L"ChildPath", 0L, &vChild, 0L, 0L);
MY_HRESASSERT(hRetRes); if (hRetRes != S_OK) goto error;
wcscpy(szChildGUID, V_BSTR(&vChild));
pChildStr = wcschr(szChildGUID, '\"');
if (pChildStr)
{
pChildStr++;
pChildStr2 = wcschr(pChildStr, '\"');
if (pChildStr2)
{
*pChildStr2 = '\0';
wcscpy(szParentGUID, V_BSTR(&vParent));
pParentStr = wcschr(szParentGUID, '\"');
if (pParentStr)
{
pParentStr++;
pParentStr2 = wcschr(pParentStr, '\"');
if (pParentStr2)
{
*pParentStr2 = '\0';
//
// Add the DataGroup, it will add everything under itself
//
MY_OUTPUT2(L"Association DG to DG ParentGUID=%s", pParentStr, 4);
MY_OUTPUT2(L"ChildGUID=%s", pChildStr, 4);
iSize = m_dataGroupList.size();
iaDG=m_dataGroupList.begin();
for (i = 0; i < iSize ; i++, iaDG++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->AddDataGroup(pParentStr, pChildStr);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
// MY_HRESASSERT(hRetRes);
break;
}
}
}
}
}
}
VariantClear(&vParent);
VariantClear(&vChild);
MY_OUTPUT(L"EXIT ***** CSystem::CreateDataGroupDataGroupAssociation...", 4);
return hRetRes;
error:
MY_HRESASSERT(hRetRes);
VariantClear(&vParent);
VariantClear(&vChild);
return hRetRes;
}
HRESULT CSystem::CreateDataGroupDataCollectorAssociation(IWbemClassObject* pObj)
{
VARIANT vParent;
VARIANT vChild;
int i, iSize;
TCHAR szParentGUID[1024];
DGLIST::iterator iaDG;
HRESULT hRetRes = S_OK;
CDataGroup* pDataGroup = NULL;
LPTSTR pParentStr = NULL;
LPTSTR pParentStr2 = NULL;
TCHAR szChildGUID[1024];
LPTSTR pChildStr = NULL;
LPTSTR pChildStr2 = NULL;
VariantInit(&vParent);
VariantInit(&vChild);
MY_OUTPUT(L"ENTER ***** CSystem::CreateDataGroupDataCollectorAssociation...", 4);
//
// Get the name of the parent DataGroup
//
hRetRes = pObj->Get(L"ParentPath", 0L, &vParent, 0L, 0L);
MY_HRESASSERT(hRetRes); if (hRetRes != S_OK) goto error;
//
// Get the name of the child DataGroup
//
hRetRes = pObj->Get(L"ChildPath", 0L, &vChild, 0L, 0L);
MY_HRESASSERT(hRetRes); if (hRetRes != S_OK) goto error;
wcscpy(szChildGUID, V_BSTR(&vChild));
pChildStr = wcschr(szChildGUID, '\"');
if (pChildStr)
{
pChildStr++;
pChildStr2 = wcschr(pChildStr, '\"');
if (pChildStr2)
{
*pChildStr2 = '\0';
wcscpy(szParentGUID, V_BSTR(&vParent));
pParentStr = wcschr(szParentGUID, '\"');
if (pParentStr)
{
pParentStr++;
pParentStr2 = wcschr(pParentStr, '\"');
if (pParentStr2)
{
*pParentStr2 = '\0';
//
// Add the DataGroup, it will add everything under itself
//
MY_OUTPUT2(L"Association DC to DG ParentDGGUID=%s", pParentStr, 4);
MY_OUTPUT2(L"ChildDCGUID=%s", pChildStr, 4);
iSize = m_dataGroupList.size();
iaDG=m_dataGroupList.begin();
for (i = 0; i < iSize ; i++, iaDG++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->AddDataCollector(pParentStr, pChildStr);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
// MY_HRESASSERT(hRetRes);
break;
}
}
}
}
}
}
VariantClear(&vParent);
VariantClear(&vChild);
MY_OUTPUT(L"EXIT ***** CSystem::CreateDataGroupDataCollectorAssociation...", 4);
return hRetRes;
error:
MY_HRESASSERT(hRetRes);
VariantClear(&vParent);
VariantClear(&vChild);
return hRetRes;
}
HRESULT CSystem::CreateDataCollectorThresholdAssociation(IWbemClassObject* pObj)
{
VARIANT vParent;
VARIANT vChild;
int i, iSize;
TCHAR szChildGUID[1024];
DGLIST::iterator iaDG;
HRESULT hRetRes = S_OK;
CDataGroup* pDataGroup = NULL;
TCHAR szParentGUID[1024];
LPTSTR pParentStr = NULL;
LPTSTR pParentStr2 = NULL;
LPTSTR pChildStr = NULL;
LPTSTR pChildStr2 = NULL;
VariantInit(&vParent);
VariantInit(&vChild);
MY_OUTPUT(L"ENTER ***** CSystem::CreateDataCollectorThresholdAssociation...", 4);
//
// Get the name of the parent DataGroup
//
hRetRes = pObj->Get(L"ParentPath", 0L, &vParent, 0L, 0L);
MY_HRESASSERT(hRetRes); if (hRetRes != S_OK) goto error;
//
// Get the name of the child DataGroup
//
hRetRes = pObj->Get(L"ChildPath", 0L, &vChild, 0L, 0L);
MY_HRESASSERT(hRetRes); if (hRetRes != S_OK) goto error;
wcscpy(szChildGUID, V_BSTR(&vChild));
pChildStr = wcschr(szChildGUID, '\"');
if (pChildStr)
{
pChildStr++;
pChildStr2 = wcschr(pChildStr, '\"');
if (pChildStr2)
{
*pChildStr2 = '\0';
wcscpy(szParentGUID, V_BSTR(&vParent));
pParentStr = wcschr(szParentGUID, '\"');
if (pParentStr)
{
pParentStr++;
pParentStr2 = wcschr(pParentStr, '\"');
if (pParentStr2)
{
*pParentStr2 = '\0';
//
// Add the DataGroup, it will add everything under itself
//
MY_OUTPUT2(L"Association Threshold to DC ParentDCGUID=%s", pParentStr, 4);
MY_OUTPUT2(L"ChildThreshGUID=%s", pChildStr, 4);
iSize = m_dataGroupList.size();
iaDG=m_dataGroupList.begin();
for (i = 0; i < iSize ; i++, iaDG++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
hRetRes = pDataGroup->AddThreshold(pParentStr, pChildStr);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
// MY_HRESASSERT(hRetRes);
break;
}
}
}
}
}
}
VariantClear(&vParent);
VariantClear(&vChild);
MY_OUTPUT(L"EXIT ***** CSystem::CreateDataCollectorThresholdAssociation...", 4);
return hRetRes;
error:
MY_HRESASSERT(hRetRes);
VariantClear(&vParent);
VariantClear(&vChild);
return hRetRes;
}
BOOL CSystem::ResetResetThresholdStates(void)
{
BOOL bRetValue = TRUE;
int i;
int iSize;
CDataGroup *pDataGroup;
iSize = m_dataGroupList.size();
for (i = 0; i < iSize ; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->ResetResetThresholdStates();
}
return bRetValue;
}
BOOL CSystem::GetChange(void)
{
if (m_lNumberChanges!=0 && m_lPrevState!=m_lCurrState)
{
return TRUE;
}
else
{
return FALSE;
}
}
//
// Called By the Delete method that the HMSystemConfiguration class exposes.
// Code ends up in the methprov.pp file, then gets passed here.
// We could have done method providers on the instance basis, and then we would have
// delete called for a specifric instance, but instead we chose to have a global
// static class wide function, that appies to all objects in our hierarchy,
// so you must pass in the GUID of what you want deleted, and then we search for it.
//
//
//XXXOptomize this and other similar code by creating an access array that contains
// OR hash table that contains all the GUIDs and pointers to the classes, so can go directly
// to the object and delete it. Actually probably need to go to its parent to delete it,
// as it needs to get it out of its list.
HRESULT CSystem::FindAndDeleteByGUID(LPTSTR pszGUID)
{
BOOL bDeleted = FALSE;
int i, iSize;
CDataGroup* pDataGroup;
DGLIST::iterator iaDG;
CAction* pAction;
ALIST::iterator iaA;
MY_OUTPUT(L"ENTER ***** CSystem::FindAndDeleteByGUID...", 4);
MY_OUTPUT2(L"FIND DELETION: GUID=%s", pszGUID, 4);
//
// Traverse the complete hierarchy to find the object to delete.
//
iSize = m_dataGroupList.size();
iaDG=m_dataGroupList.begin();
for (i=0; i<iSize; i++, iaDG++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszGUID, pDataGroup->GetGUID()))
{
pDataGroup->DeleteDGConfig();
delete pDataGroup;
m_dataGroupList.erase(iaDG);
bDeleted = TRUE;
MY_OUTPUT2(L"DELETION: DGGUID=%s", pszGUID, 4);
break;
}
// Look at branch below to see if can find it
if (pDataGroup->FindAndDeleteByGUID(pszGUID)==S_OK)
{
bDeleted = TRUE;
break;
}
}
//
// Traverse through the actions also to see if that is what we were suppose to delete.
//
if (bDeleted == FALSE)
{
iSize = m_actionList.size();
iaA=m_actionList.begin();
for (i=0; i<iSize; i++, iaA++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
if (!_wcsicmp(pszGUID, pAction->GetGUID()))
{
pAction->DeleteAConfig();
delete pAction;
m_actionList.erase(iaA);
bDeleted = TRUE;
MY_OUTPUT2(L"DELETION: AGUID=%s", pszGUID, 4);
break;
}
}
}
if (bDeleted == FALSE)
{
MY_OUTPUT(L"GUID not found", 4);
MY_OUTPUT(L"EXIT ***** CSystem::FindAndDeleteByGUID...", 4);
return WBEM_E_NOT_FOUND;
}
else
{
MY_OUTPUT(L"EXIT ***** CSystem::FindAndDeleteByGUID...", 4);
return S_OK;
}
}
//
// HMSystemConfiguration class exposes this method.
// Code ends up in the methprov.pp file, then gets passed here.
//
HRESULT CSystem::FindAndResetDEStateByGUID(LPTSTR pszGUID)
{
BOOL bFound = FALSE;
int i, iSize;
CDataGroup* pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::FindAndResetDEStateByGUID...", 4);
MY_OUTPUT2(L"FIND RESET: GUID=%s", pszGUID, 4);
if (!wcscmp(L"{@}", pszGUID))
{
bFound = TRUE;
//
// Do reset of EVERYTHING
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->ResetState();
}
}
else
{
//
// Traverse the complete hierarchy to find the object to reset state.
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszGUID, pDataGroup->GetGUID()))
{
pDataGroup->ResetState();
bFound = TRUE;
MY_OUTPUT(L"DG Found and reset", 4);
break;
}
// Look at branch below to see if can find it
if (pDataGroup->FindAndResetDEStateByGUID(pszGUID)==S_OK)
{
bFound = TRUE;
break;
}
}
}
if (bFound == FALSE)
{
MY_OUTPUT(L"GUID not found", 4);
MY_OUTPUT(L"EXIT ***** CSystem::FindAndResetDEStateByGUID...", 4);
return WBEM_E_NOT_FOUND;
}
else
{
MY_OUTPUT(L"EXIT ***** CSystem::FindAndResetDEStateByGUID...", 4);
return S_OK;
}
}
//
// HMSystemConfiguration class exposes this method.
// Code ends up in the methprov.pp file, then gets passed here.
//
HRESULT CSystem::FindAndResetDEStatisticsByGUID(LPTSTR pszGUID)
{
BOOL bFound = FALSE;
int i, iSize;
CDataGroup* pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::FindAndResetDEStatisticsByGUID...", 4);
MY_OUTPUT2(L"FIND RESET STATISTICS: GUID=%s", pszGUID, 4);
if (!wcscmp(L"{@}", pszGUID))
{
bFound = TRUE;
//
// Do reset of EVERYTHING
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->ResetStatistics();
}
}
else
{
//
// Traverse the complete hierarchy to find the object to reset statistics.
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszGUID, pDataGroup->GetGUID()))
{
pDataGroup->ResetStatistics();
bFound = TRUE;
MY_OUTPUT(L"DG found and reset statistics", 4);
break;
}
// Look at branch below to see if can find it
if (pDataGroup->FindAndResetDEStatisticsByGUID(pszGUID)==S_OK)
{
bFound = TRUE;
break;
}
}
}
if (bFound == FALSE)
{
MY_OUTPUT(L"GUID not found", 4);
MY_OUTPUT(L"EXIT ***** CSystem::FindAndResetDEStatisticsByGUID...", 4);
return WBEM_E_NOT_FOUND;
}
else
{
MY_OUTPUT(L"EXIT ***** CSystem::FindAndResetDEStatisticsByGUID...", 4);
return S_OK;
}
}
//
// HMSystemConfiguration class exposes this method.
// Code ends up in the methprov.pp file, then gets passed here.
//
HRESULT CSystem::FindAndEvaluateNowDEByGUID(LPTSTR pszGUID)
{
BOOL bFound = FALSE;
int i, iSize;
CDataGroup* pDataGroup;
MY_OUTPUT(L"ENTER ***** CSystem::FindAndEvaluateNowByGUID...", 4);
MY_OUTPUT2(L"FIND RESET STATISTICS: GUID=%s", pszGUID, 4);
if (!wcscmp(L"{@}", pszGUID))
{
bFound = TRUE;
//
// Do reset of EVERYTHING
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
pDataGroup->EvaluateNow();
}
}
else
{
//
// Traverse the complete hierarchy to find the object to evaluate now.
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszGUID, pDataGroup->GetGUID()))
{
pDataGroup->EvaluateNow();
bFound = TRUE;
MY_OUTPUT(L"DG found and Evaluate Now", 4);
break;
}
// Look at branch below to see if can find it
if (pDataGroup->FindAndEvaluateNowDEByGUID(pszGUID)==S_OK)
{
bFound = TRUE;
break;
}
}
}
if (bFound == FALSE)
{
MY_OUTPUT(L"GUID not found", 4);
MY_OUTPUT(L"EXIT ***** CSystem::FindAndEvaluateNowByGUID...", 4);
return S_FALSE;
}
else
{
MY_OUTPUT(L"EXIT ***** CSystem::FindAndEvaluateNowByGUID...", 4);
return S_OK;
}
}
//
// HMSystemConfiguration class exposes this method.
// Code ends up in the methprov.pp file, then gets passed here.
//
BOOL CSystem::Enable(BOOL bEnable)
{
HRESULT hRes;
// BSTR PathToClass;
int i, iSize;
CDataGroup* pDataGroup;
IWbemClassObject* pInst = NULL;
IWbemCallResult *pResult = 0;
MY_OUTPUT(L"ENTER ***** CSystem::Enable...", 4);
if (m_bEnabled == bEnable)
return TRUE;
//
// Set the variable, and do the same for all children.
//
m_bEnabled = bEnable;
//
// Traverse the complete hierarchy to find the object to enable/disable.
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
//XXX pDataGroup->SetParentEnabledFlag(bEnable);
}
//
// Set the property on this Configuration instance.
//
hRes = GetWbemObjectInst(&g_pIWbemServices, L"MicrosoftHM_SystemConfiguration.GUID=\"{@}\"", NULL, &pInst);
if (!pInst)
{
MY_HRESASSERT(hRes);
return FALSE;
}
hRes = PutBoolProperty(pInst, L"Enabled", m_bEnabled);
hRes = g_pIWbemServices->PutInstance(pInst, 0, NULL, &pResult);
pInst->Release();
pInst = NULL;
MY_OUTPUT(L"EXIT ***** CSystem::Enable...", 4);
return TRUE;
}
//
// At startup, internalize all instances of Actions
//
HRESULT CSystem::InternalizeActions(void)
{
ULONG uReturned;
BOOL bFound = FALSE;
int i, iSize;
CAction* pAction;
HRESULT hRetRes = S_OK;
BSTR Language = NULL;
BSTR Query = NULL;
IWbemClassObject *pObj = NULL;
LPTSTR pszTempGUID = NULL;
IEnumWbemClassObject *pEnum = 0;
MY_OUTPUT(L"ENTER ***** CSystem::InternalizeActions...", 4);
Language = SysAllocString(L"WQL");
MY_ASSERT(Language); if (!Language) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
Query = SysAllocString(L"select * from MicrosoftHM_ActionConfiguration");
MY_ASSERT(Query); if (!Query) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
// Issue query
hRetRes = g_pIWbemServices->ExecQuery(Language, Query, WBEM_FLAG_FORWARD_ONLY, 0, &pEnum);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
SysFreeString(Query);
Query = NULL;
SysFreeString(Language);
Language = NULL;
// Retrieve objects in result set
while (TRUE)
{
pObj = NULL;
uReturned = 0;
hRetRes = pEnum->Next(0, 1, &pObj, &uReturned);
MY_ASSERT(hRetRes==S_OK || hRetRes==WBEM_S_FALSE);
if (hRetRes!=S_OK && hRetRes!=WBEM_S_FALSE)
{
MY_HRESASSERT(hRetRes);
pEnum->Release();
pEnum = NULL;
return hRetRes;
}
if (uReturned == 0)
{
break;
}
// See if this is already read in. Need to prevent duplicates.
hRetRes = GetStrProperty(pObj, L"GUID", &pszTempGUID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
bFound = FALSE;
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
if (!_wcsicmp(pszTempGUID, pAction->m_szGUID))
{
bFound = TRUE;
break;
}
}
if (bFound == FALSE)
{
// Create the internal class to represent the Action
CAction* pA = new CAction;
MY_ASSERT(pA); if (!pA) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = pA->LoadInstanceFromMOF(pObj);
if (hRetRes==S_OK)
{
m_actionList.push_back(pA);
}
else
{
MY_HRESASSERT(hRetRes);
delete pA;
}
}
delete [] pszTempGUID;
pszTempGUID = NULL;
// Release it.
pObj->Release();
pObj = NULL;
}
// All done
pEnum->Release();
pEnum = NULL;
MY_OUTPUT(L"EXIT ***** CSystem::InternalizeActions...", 4);
return S_OK;
error:
MY_ASSERT(FALSE);
if (Query)
SysFreeString(Query);
if (Language)
SysFreeString(Language);
if (pszTempGUID)
delete [] pszTempGUID;
if (pObj)
pObj->Release();
if (pEnum)
pEnum->Release();
m_bValidLoad = FALSE;
return hRetRes;
}
HRESULT CSystem::InitActionErrorListener(void)
{
BSTR Language = NULL;
BSTR Query = NULL;
HRESULT hRetRes;
Language = SysAllocString(L"WQL");
MY_ASSERT(Language); if (!Language) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
Query = SysAllocString(L"select * from __ConsumerFailureEvent where Event isa \"MicrosoftHM_ActionTriggerEvent\"");
MY_ASSERT(Query); if (!Query) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = S_FALSE;
if (g_pIWbemServices != NULL)
{
m_pTempSink = new CTempConsumer(HMTEMPEVENT_ACTIONERROR);
MY_ASSERT(m_pTempSink); if (!m_pTempSink) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = g_pIWbemServices->ExecNotificationQueryAsync(
Language,
Query,
0,
NULL,
m_pTempSink);
}
SysFreeString(Language);
Language = NULL;
SysFreeString(Query);
Query = NULL;
MY_HRESASSERT(hRetRes);
if (hRetRes != WBEM_S_NO_ERROR)
{
if (m_pTempSink)
{
m_pTempSink->Release();
m_pTempSink = NULL;
}
}
return S_OK;
error:
MY_ASSERT(FALSE);
if (Query)
SysFreeString(Query);
if (Language)
SysFreeString(Language);
m_bValidLoad = FALSE;
return hRetRes;
}
HRESULT CSystem::InitActionSIDListener(CTempConsumer* pTempSink, LPTSTR pszQuery)
{
BSTR Language = NULL;
BSTR Query = NULL;
HRESULT hRetRes;
Language = SysAllocString(L"WQL");
MY_ASSERT(Language); if (!Language) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
Query = SysAllocString(pszQuery);
MY_ASSERT(Query); if (!Query) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = S_FALSE;
if (g_pIWbemServices != NULL)
{
pTempSink = new CTempConsumer(HMTEMPEVENT_ACTIONSID);
MY_ASSERT(pTempSink); if (!pTempSink) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = g_pIWbemServices->ExecNotificationQueryAsync(
Language,
Query,
0,
NULL,
pTempSink);
}
SysFreeString(Language);
Language = NULL;
SysFreeString(Query);
Query = NULL;
MY_HRESASSERT(hRetRes);
if (hRetRes != WBEM_S_NO_ERROR)
{
if (pTempSink)
{
pTempSink->Release();
pTempSink = NULL;
}
}
return S_OK;
error:
MY_ASSERT(FALSE);
if (Query)
SysFreeString(Query);
if (Language)
SysFreeString(Language);
m_bValidLoad = FALSE;
return hRetRes;
}
HRESULT CSystem::HandleTempActionSIDEvent(IWbemClassObject* pObj)
{
VARIANT vDispatch;
VARIANT var;
HRESULT hRetRes = S_OK;
IWbemClassObject* pTargetInstance = NULL;
VariantInit(&vDispatch);
VariantInit(&var);
IWbemClassObject* pInst = NULL;
SAFEARRAY* psa = NULL;
CIMTYPE vtType;
long lBound, uBound;
BOOL bObjIsLocalSystem;
DWORD dwErr = 0;
VariantInit(&vDispatch);
VariantInit(&var);
TCHAR szName[200];
DWORD dwSize = 0;
DWORD dwResult = 0;
TCHAR szDomain[200];
SID_NAME_USE SidType;
LPVOID lpCreatorSID = NULL;
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempActionSIDEvent BLOCK - g_hConfigLock BLOCK WAIT", 4);
dwErr = WaitForSingleObject(g_hConfigLock, 120000);
if(dwErr != WAIT_OBJECT_0)
{
if(dwErr = WAIT_TIMEOUT)
{
TRACE_MUTEX(L"TIMEOUT MUTEX");
return WBEM_S_TIMEDOUT;
}
else
{
MY_OUTPUT(L"WaitForSingleObject on Mutex failed",4);
return WBEM_E_FAILED;
}
}
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempActionSIDEvent BLOCK - g_hConfigLock BLOCK GOT IT", 4);
if (!g_pSystem)
{
ReleaseMutex(g_hConfigLock);
return S_FALSE;
}
hRetRes = pObj->Get(L"TargetInstance", 0L, &vDispatch, 0, 0);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetWbemClassObject(&pTargetInstance, &vDispatch);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
// get the CreatorSID of this instance
hRetRes = pTargetInstance->Get(L"CreatorSID", 0, &var, &vtType, NULL);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
if (vtType != (CIM_UINT8 | CIM_FLAG_ARRAY))
{
hRetRes = WBEM_E_FAILED;
goto error;
}
// make sure it's the right size
psa = var.parray;
if (::SafeArrayGetElemsize(psa) != 1)
{
hRetRes = WBEM_E_FAILED;
goto error;
}
hRetRes = ::SafeArrayGetLBound(psa, 1, &lBound);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = ::SafeArrayGetUBound(psa, 1, &uBound);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
if (lBound !=0)
{
hRetRes = WBEM_E_FAILED;
goto error;
}
// now see if this is LocalSystem by comparing to
// the hardcoded LocalSystem SID
bObjIsLocalSystem = false;
if (uBound == (sizeof LocalSystemSID)-1 )
{
lpCreatorSID = NULL;
hRetRes = ::SafeArrayAccessData(psa, &lpCreatorSID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
if (memcmp (lpCreatorSID, LocalSystemSID, sizeof LocalSystemSID) == 0)
bObjIsLocalSystem = true;
hRetRes = ::SafeArrayUnaccessData(psa);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
}
if (bObjIsLocalSystem == FALSE)
{
// Also, skip it if it is a LocalAccount! (non-domain)
lpCreatorSID = NULL;
hRetRes = ::SafeArrayAccessData(psa, &lpCreatorSID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
dwSize = 200;
if( !LookupAccountSid(NULL, lpCreatorSID, szName, &dwSize, szDomain, &dwSize, &SidType))
{
// Didn't work for some reason, so assume we need to check.
m_numActionChanges++;
}
else
{
DWORD dwNameLen = MAX_COMPUTERNAME_LENGTH + 1;
TCHAR szComputerName[MAX_COMPUTERNAME_LENGTH + 1];
if (GetComputerName(szComputerName, &dwNameLen))
{
// If machine name matches, then it is a local account, so skip!!!
if (_wcsicmp(szComputerName, szDomain))
{
m_numActionChanges++;
}
}
else
{
// Didn't work for some reason, so assume we need to check.
m_numActionChanges++;
}
}
hRetRes = ::SafeArrayUnaccessData(psa);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
}
pTargetInstance->Release();
pTargetInstance = NULL;
VariantClear(&vDispatch);
VariantClear(&var);
ReleaseMutex(g_hConfigLock);
return S_OK;
error:
MY_ASSERT(FALSE);
if (pTargetInstance)
pTargetInstance->Release();
if (pInst)
pInst->Release();
VariantClear(&vDispatch);
VariantClear(&var);
ReleaseMutex(g_hConfigLock);
return hRetRes;
}
// Pass on info to the DataCollector that has the GUID
HRESULT CSystem::HandleTempActionErrorEvent(IWbemClassObject* pObj)
{
HRESULT hRetRes = S_OK;
BOOL bFound = FALSE;
VARIANT vDispatch;
int i, iSize;
CAction* pAction;
IWbemClassObject* pTargetInstance = NULL;
LPTSTR pszGUID = NULL;
LPTSTR pszErrorDescription = NULL;
long lNum;
DWORD dwErr = 0;
VariantInit(&vDispatch);
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempActionErrorEvent BLOCK - g_hConfigLock BLOCK WAIT", 4);
dwErr = WaitForSingleObject(g_hConfigLock, 120000);
if(dwErr != WAIT_OBJECT_0)
{
if(dwErr = WAIT_TIMEOUT)
{
TRACE_MUTEX(L"TIMEOUT MUTEX");
return WBEM_S_TIMEDOUT;
}
else
{
MY_OUTPUT(L"WaitForSingleObject on Mutex failed",4);
return WBEM_E_FAILED;
}
}
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempActionErrorEvent BLOCK - g_hConfigLock BLOCK GOT IT", 4);
if (!g_pSystem)
{
ReleaseMutex(g_hConfigLock);
return S_FALSE;
}
try
{
// Get the GUID from the Event property, which will be an ActionStatusEvent class, then
// from that GUID property.
VariantInit(&vDispatch);
hRetRes = pObj->Get(L"Event", 0L, &vDispatch, 0, 0);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetWbemClassObject(&pTargetInstance, &vDispatch);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetStrProperty(pTargetInstance, L"GUID", &pszGUID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetUint32Property(pObj, L"ErrorCode", &lNum);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetStrProperty(pObj, L"ErrorDescription", &pszErrorDescription);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
pTargetInstance->Release();
VariantClear(&vDispatch);
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
if (pAction->HandleTempErrorEvent(pszGUID, lNum, pszErrorDescription))
{
bFound = TRUE;
break;
}
}
if (bFound == FALSE)
{
MY_OUTPUT2(L"NOTFOUND: No body to handle Action Error event for GUID=%s", pszGUID, 4);
}
delete [] pszGUID;
pszGUID = NULL;
delete [] pszErrorDescription;
pszErrorDescription = NULL;
}
catch (...)
{
MY_ASSERT(FALSE);
}
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent g_hConfigLock BLOCK - RELEASE IT", 4);
ReleaseMutex(g_hConfigLock);
MY_OUTPUT(L"BLOCK - BLOCK CSystem::HandleTempEvent g_hConfigLock BLOCK - RELEASED", 4);
return S_OK;
error:
MY_ASSERT(FALSE);
if (pszGUID)
delete [] pszGUID;
if (pszErrorDescription)
delete [] pszErrorDescription;
ReleaseMutex(g_hConfigLock);
return hRetRes;
}
//
// For ones that are created on the fly, after we are running.
//
HRESULT CSystem::CreateAction(IWbemClassObject* pObj)
{
HRESULT hRetRes = S_OK;
BOOL bFound = FALSE;
int i, iSize;
CAction* pAction;
LPTSTR pszTempGUID = NULL;
MY_OUTPUT(L"ENTER ***** CSystem::CreateAction...", 4);
// See if this is already read in. Need to prevent duplicates.
hRetRes = GetStrProperty(pObj, L"GUID", &pszTempGUID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
bFound = FALSE;
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
if (!_wcsicmp(pszTempGUID, pAction->m_szGUID))
{
bFound = TRUE;
break;
}
}
if (bFound == FALSE)
{
// Create the internal class to represent the Action
CAction* pA = new CAction;
MY_ASSERT(pA); if (!pA) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = pA->LoadInstanceFromMOF(pObj);
if (hRetRes==S_OK)
{
m_actionList.push_back(pA);
}
else
{
MY_HRESASSERT(hRetRes);
delete pA;
}
}
delete [] pszTempGUID;
pszTempGUID= NULL;
MY_OUTPUT(L"EXIT ***** CSystem::CreateAction...", 4);
return hRetRes;
error:
MY_ASSERT(FALSE);
if (pszTempGUID)
delete [] pszTempGUID;
return hRetRes;
}
// Traverse the Configuration class hierarchy, like do from InternalizeDataGroups(),
// and create one single safearray to pass back.
// Contains the object that matches the GUID, and everything under it,
// including associations.
HRESULT CSystem::FindAndCopyByGUID(LPTSTR pszGUID, SAFEARRAY** ppsa, LPTSTR *pszOriginalParentGUID)
{
int j;
HRESULT hRetRes = S_OK;
int i, iSize;
CDataGroup* pDataGroup;
SAFEARRAYBOUND bound[1];
IWbemClassObject* pInstance = NULL;
long ix[1];
IUnknown* pIUnknown = NULL;
ILIST configList;
HRESULT hRes;
static LPTSTR systemGUID = L"{@}";
MY_OUTPUT(L"ENTER ***** CSystem::FindAndCopyByGUID...", 4);
MY_OUTPUT2(L"COPY GUID=%s", pszGUID, 4);
//
// Traverse the complete hierarchy to find the object to delete.
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszGUID, pDataGroup->GetGUID()))
{
hRetRes = pDataGroup->Copy(&configList, NULL, NULL);
*pszOriginalParentGUID = systemGUID;
break;
}
// Look at branch below to see if can find it
hRetRes = pDataGroup->FindAndCopyByGUID(pszGUID, &configList, pszOriginalParentGUID);
if (hRetRes==S_OK)
{
break;
}
else if (hRetRes!=WBEM_S_DIFFERENT)
{
break;
}
}
if (hRetRes == WBEM_S_DIFFERENT)
{
MY_OUTPUT(L"TargetGuid to copy not found!", 4);
return WBEM_E_NOT_FOUND;
}
else if (hRetRes != S_OK)
{
MY_OUTPUT(L"Copy error not found!", 4);
return hRetRes;
}
//
// Now, here at the end, place in the safe array!
//
iSize = configList.size();
bound[0].lLbound = 0;
bound[0].cElements = iSize;
*ppsa = SafeArrayCreate(VT_UNKNOWN, 1, bound);
if (*ppsa == NULL)
{
MY_OUTPUT(L"SafeArray creation failure!", 4);
MY_ASSERT(FALSE);
return WBEM_E_OUT_OF_MEMORY;
}
j = 0;
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<configList.size());
pInstance = configList[i];
// Add the DG instance to the safe array
hRes = pInstance->QueryInterface(IID_IUnknown, (void**) &pIUnknown);
if (hRes != NOERROR)
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"Copy failure!", 4);
SafeArrayDestroy(*ppsa);
return hRes;
}
ix[0] = j;
j++;
hRes = SafeArrayPutElement(*ppsa, ix, pIUnknown);
if (hRes != S_OK)
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"Copy failure!", 4);
MY_ASSERT(FALSE);
}
// SafeArrayPutElement adds a reference to the contents of the
// variant, so we must free the variable we have.
//
pIUnknown->Release();
pInstance->Release();
pIUnknown = NULL;
pInstance = NULL;
}
MY_OUTPUT(L"EXIT ***** CSystem::FindAndCopyByGUID...", 4);
return S_OK;
}
//
// What we need to do here is basically just do a PutInstance for everything
// in the array, and add the one association from my identified parent, to
// The first HMConfiguration object that was in the array.
// There are the thresholds to follow to make sure that we do not end up with two objects named
// the same at the same level. We follow the example of NTExplorer for this.
// Return 0 if success, 1 if error, and 2 if naming conflict when bForceReplace is set to FALSE.
//
HRESULT CSystem::FindAndPasteByGUID(LPTSTR pszTargetGUID, SAFEARRAY* psa, LPTSTR pszOriginalSystem, LPTSTR pszOriginalParentGUID, BOOL bForceReplace)
{
BSTR Path = NULL;
BSTR PathToClass = NULL;
TCHAR szTemp[1024];
LPTSTR pStr;
HRESULT hRes;
HRESULT hRetRes = S_OK;
IUnknown* vUnknown;
IWbemClassObject* pCO = NULL;
long iLBound, iUBound;
IWbemClassObject* pTargetObj = NULL;
LPTSTR pszChildGUID = NULL;
LPTSTR pszChildName = NULL;
LPTSTR pszParentClass = NULL;
LPTSTR pszChildClass = NULL;
IWbemCallResult *pResult = 0;
CBase *pParent = NULL;
CBase *pChild = NULL;
IWbemClassObject *pNewInstance = NULL;
IWbemClassObject *pExampleClass = NULL;
IWbemContext *pCtx = NULL;
MY_OUTPUT(L"EXIT ***** CSystem::FindAndPasteByGUID...", 4);
MY_OUTPUT2(L"PASTE Target GUID=%s", pszTargetGUID, 4);
MY_OUTPUT2(L"OrigionalSystem=%s", pszOriginalSystem, 4);
MY_OUTPUT2(L"OrigionalParent GUID=%s", pszOriginalParentGUID, 4);
MY_OUTPUT2(L"ForceReplace=%d", (int)bForceReplace, 4);
//
// Make sure that the object exists that we are to copy ourselves under!
//
wcscpy(szTemp, L"MicrosoftHM_Configuration.GUID=\"");
lstrcat(szTemp, pszTargetGUID);
lstrcat(szTemp, L"\"");
Path = SysAllocString(szTemp);
MY_ASSERT(Path); if (!Path) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRetRes = GetWbemObjectInst(&g_pIWbemServices, Path, NULL, &pTargetObj);
if (!pTargetObj)
{
MY_OUTPUT(L"Target Not found to paste under", 4);
SysFreeString(Path);
return 1;
}
SysFreeString(Path);
Path = NULL;
hRetRes = GetStrProperty(pTargetObj, L"__CLASS", &pszParentClass);
MY_HRESASSERT(hRetRes);
//XXXMake sure to prevent a paste under a Threshold
//Strcmp Parent class with MicrosoftHM_ThresholdConfiguration
//
// Do a PutInstance for everything in the array.
//
SafeArrayGetLBound(psa, 1, &iLBound);
SafeArrayGetUBound(psa, 1, &iUBound);
if ((iUBound - iLBound + 1) == 0)
{
MY_ASSERT(FALSE);
}
else
{
for (long i = iLBound; i <= iUBound; i++)
{
vUnknown = NULL;
hRetRes = SafeArrayGetElement(psa, &i, &vUnknown);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
pCO = (IWbemClassObject *)vUnknown;
//
// We have here the child to get pasted under the target.
// First off we need to decide if we can paste it, and if we need
// to do a replace of an existing configuration instance.
// We also need to save info that is to be used later to create an association.
//
if (pszChildGUID == NULL)
{
hRetRes = GetStrProperty(pCO, L"GUID", &pszChildGUID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetStrProperty(pCO, L"Name", &pszChildName);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = GetStrProperty(pCO, L"__CLASS", &pszChildClass);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
//
// Search for the parent, and then look to see if there is a
// child with the same name.
//
pParent = GetParentPointerFromPath(szTemp);
MY_ASSERT(pParent); if (!pParent) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
pChild = pParent->FindImediateChildByName(pszChildName);
if (pChild)
{
//
// We found a child with the same name already!
//
DWORD dwNameLen = MAX_COMPUTERNAME_LENGTH + 1;
TCHAR szComputerName[MAX_COMPUTERNAME_LENGTH + 1];
if (GetComputerName(szComputerName, &dwNameLen))
{
}
else
{
wcscpy(szComputerName, L"LocalMachine");
}
//
// Do what Explorer does, and act different if the original parent
// is the same as the target parent.
//
if (!_wcsicmp(pszOriginalSystem, szComputerName) &&
!_wcsicmp(pszOriginalParentGUID, pszTargetGUID))
{
//
// This is where we are copying from and to the same parent.
// So don't ask, just rename to next increment.
//
pStr = szTemp;
pParent->GetNextChildName(pszChildName, pStr);
PutStrProperty(pCO, L"Name", szTemp);
}
else
{
// Different parent, so ask if want to replace!
if (bForceReplace)
{
// Delete the old one first!
FindAndDeleteByGUID(pChild->m_szGUID);
delete [] pszChildName;
pszChildName = NULL;
}
else
{
delete [] pszParentClass;
pszParentClass = NULL;
delete [] pszChildClass;
pszChildClass = NULL;
delete [] pszChildGUID;
pszChildGUID = NULL;
delete [] pszChildName;
pszChildName = NULL;
vUnknown->Release();
pTargetObj->Release();
MY_OUTPUT(L"Paste conflict", 4);
return 2;
}
}
}
else
{
// Not found, so we are OK to proceed
}
}
hRes = g_pIWbemServices->PutInstance(pCO, 0, NULL, &pResult);
if (hRes != S_OK)
{
MY_HRESASSERT(hRes);
MY_OUTPUT2(L"Put failure Unexpected Error: 0x%08x",hRes,4);
}
vUnknown->Release();
}
}
MY_ASSERT(pszChildGUID);
//
// Add the one association from my identified parent, to the first
// HMConfiguration object that was in the array.
//
pResult = 0;
// Get the association class definition.
PathToClass = SysAllocString(L"MicrosoftHM_ConfigurationAssociation");
MY_ASSERT(PathToClass); if (!PathToClass) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
hRes = g_pIWbemServices->GetObject(PathToClass, 0, pCtx, &pExampleClass, &pResult);
SysFreeString(PathToClass);
PathToClass = NULL;
if (hRes != 0)
{
MY_HRESASSERT(hRes);
MY_OUTPUT2(L"GetObject failure Unexpected Error: 0x%08x",hRes,4);
return hRes;
}
// Create a new association instance.
hRetRes = pExampleClass->SpawnInstance(0, &pNewInstance);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
pExampleClass->Release();
pExampleClass = NULL;
// If it is the System, then looks like ->"MicrosoftHM_SystemConfiguration.GUID=\"{@}\""
// Child looks like ->"\\.\root\cimv2\MicrosoftHealthMonitor:
// MicrosoftHM_DataGroupConfiguration.GUID="{269EA389-07CA-11d3-8FEB-006097919914}""
// MicrosoftHM_Configuration.GUID="{269EA389-07CA-11d3-8FEB-006097919914}""
if (!wcscmp(pszTargetGUID, L"{@}"))
{
wcscpy(szTemp, L"MicrosoftHM_SystemConfiguration.GUID=\"{@}\"");
}
else
{
wcscpy(szTemp, L"\\\\.\\root\\cimv2\\MicrosoftHealthMonitor:");
lstrcat(szTemp, pszParentClass);
lstrcat(szTemp, L".GUID=\"");
lstrcat(szTemp, pszTargetGUID);
lstrcat(szTemp, L"\"");
}
PutStrProperty(pNewInstance, L"ParentPath", szTemp);
wcscpy(szTemp, L"\\\\.\\root\\cimv2\\MicrosoftHealthMonitor:");
lstrcat(szTemp, pszChildClass);
lstrcat(szTemp, L".GUID=\"");
lstrcat(szTemp, pszChildGUID);
lstrcat(szTemp, L"\"");
PutStrProperty(pNewInstance, L"ChildPath", szTemp);
// Write the association instance
hRetRes = g_pIWbemServices->PutInstance(pNewInstance, 0, pCtx, &pResult);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
pNewInstance->Release();
pNewInstance = NULL;
//
// Cleanup
//
if (pszChildGUID != NULL)
{
delete [] pszChildGUID;
pszChildGUID = NULL;
}
pTargetObj->Release();
pTargetObj = NULL;
delete [] pszParentClass;
pszParentClass = NULL;
delete [] pszChildClass;
pszChildClass = NULL;
MY_OUTPUT(L"EXIT ***** CSystem::FindAndPasteByGUID...", 4);
return 0;
error:
MY_ASSERT(FALSE);
if (pszParentClass)
delete [] pszParentClass;
if (pszChildClass)
delete [] pszChildClass;
if (pszChildGUID)
delete [] pszChildGUID;
if (pszChildName)
delete [] pszChildName;
if (pTargetObj)
pTargetObj->Release();
if (Path)
SysFreeString(Path);
if (PathToClass)
SysFreeString(PathToClass);
if (pNewInstance)
pNewInstance->Release();
if (pExampleClass)
pExampleClass->Release();
return hRetRes;
}
HRESULT CSystem::FindAndCopyWithActionsByGUID(LPTSTR pszGUID, SAFEARRAY** ppsa, LPTSTR *pszOriginalParentGUID)
{
return AgentCopy (pszGUID, ppsa, pszOriginalParentGUID);
}
HRESULT CSystem::FindAndPasteWithActionsByGUID(LPTSTR pszTargetGUID, SAFEARRAY* psa, LPTSTR pszOriginalSystem, LPTSTR pszOriginalParentGUID, BOOL bForceReplace)
{
return AgentPaste (pszTargetGUID, psa, pszOriginalSystem, pszOriginalParentGUID, bForceReplace);
}
//
// Delete the single use of an Action
//
#ifdef SAVE
HRESULT CSystem::Move(LPTSTR pszTargetGUID, LPTSTR pszNewParentGUID)
{
int i, iSize;
CDataGroup* pDataGroup;
BOOL bFound = FALSE;
CBase *pTargetBase = NULL;
CBase *pNewParentBase = NULL;
MY_OUTPUT(L"ENTER ***** CSystem::Move...", 4);
MY_OUTPUT2(L"TargetGUID=%s", pszTargetGUID, 4);
MY_OUTPUT2(L"NewParentGUID=%s", pszNewParentGUID, 4);
//
// First locate the thing to move
//
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszTargetGUID, pDataGroup->GetGUID()))
{
pTargetBase = pDataGroup;
break;
}
// Look at branch below to see if can find it
pTargetBase = pDataGroup->GetParentPointerFromGUID(pszTargetGUID);
if (pTargetBase)
{
break;
}
}
if (pTargetBase)
{
bFound = FALSE;
//
// Next locate the place to move under
//
if (!wcscmp(pszNewParentGUID, L"{@}"))
{
pNewParentBase = this;
bFound = TRUE;
}
else
{
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszNewParentGUID, pDataGroup->GetGUID()))
{
pNewParentBase = pDataGroup;
bFound = TRUE;
break;
}
// Look at branch below to see if can find it
pNewParentBase = pDataGroup->GetParentPointerFromGUID(pszNewParentGUID);
if (pNewParentBase)
{
bFound = TRUE;
break;
}
}
}
if (pNewParentBase)
{
//
// Make sure that it is a legal move.
// Can't do things like move a Threshold under a System, or DataGroup.
//
if (pNewParentBase->m_hmStatusType == HMSTATUS_SYSTEM)
{
if (pTargetBase->m_hmStatusType != HMSTATUS_DATAGROUP)
{
bFound = FALSE;
}
}
else if (pNewParentBase->m_hmStatusType == HMSTATUS_DATAGROUP)
{
if (pTargetBase->m_hmStatusType != HMSTATUS_DATAGROUP &&
pTargetBase->m_hmStatusType != HMSTATUS_DATACOLLECTOR)
{
bFound = FALSE;
}
}
else if (pNewParentBase->m_hmStatusType == HMSTATUS_DATACOLLECTOR)
{
if (pTargetBase->m_hmStatusType != HMSTATUS_THRESHOLD)
{
bFound = FALSE;
}
}
else if (pNewParentBase->m_hmStatusType == HMSTATUS_THRESHOLD)
{
bFound = FALSE;
}
else
{
MY_ASSERT(FALSE);
}
if (bFound)
{
//
// Delete the object out of the list of the old parent.
//
if (pTargetBase->m_hmStatusType == HMSTATUS_DATAGROUP)
{
if (((CDataGroup *)pTargetBase)->m_pParentDG == NULL)
{
g_pSystem->DeleteChildFromList(pszTargetGUID);
}
else
{
((CDataGroup *)pTargetBase)->m_pParentDG->DeleteChildFromList(pszTargetGUID);
}
}
else if (pTargetBase->m_hmStatusType == HMSTATUS_DATACOLLECTOR)
{
((CDataCollector *)pTargetBase)->m_pParentDG->DeleteChildFromList(pszTargetGUID);
}
else if (pTargetBase->m_hmStatusType == HMSTATUS_THRESHOLD)
{
((CThreshold *)pTargetBase)->m_pParentDC->DeleteChildFromList(pszTargetGUID);
}
else
{
MY_ASSERT(FALSE);
}
//
// Modify the association in the repository.
//
pTargetBase->ModifyAssocForMove(pNewParentBase);
//
// Move the object under its new parent
//
pNewParentBase->ReceiveNewChildForMove(pTargetBase);
}
}
}
if (bFound == FALSE)
{
MY_OUTPUT(L"GUID not found", 4);
MY_OUTPUT(L"EXIT ***** CSystem::Move...", 4);
return WBEM_E_NOT_FOUND;
}
else
{
MY_OUTPUT(L"EXIT ***** CSystem::Move...", 4);
return S_OK;
}
}
#endif
#ifdef SAVE
BOOL CSystem::ModifyAssocForMove(CBase *pNewParentBase)
{
MY_ASSERT(FALSE);
return TRUE;
}
#endif
BOOL CSystem::ReceiveNewChildForMove(CBase *pBase)
{
m_dataGroupList.push_back((CDataGroup *)pBase);
// (CDataGroup *)pBase->SetParentEnabledFlag(m_bEnabled);
return TRUE;
}
BOOL CSystem::DeleteChildFromList(LPTSTR pszGUID)
{
int i, iSize;
CDataGroup* pDataGroup;
DGLIST::iterator iaDG;
iSize = m_dataGroupList.size();
iaDG=m_dataGroupList.begin();
for (i=0; i<iSize; i++, iaDG++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszGUID, pDataGroup->GetGUID()))
{
m_dataGroupList.erase(iaDG);
break;
}
}
return TRUE;
}
//
// Delete the single use of an Action
//
HRESULT CSystem::DeleteConfigActionAssoc(LPTSTR pszConfigGUID, LPTSTR pszActionGUID)
{
BOOL bFound = FALSE;
int i, iSize;
CAction* pAction;
MY_OUTPUT(L"ENTER ***** CSystem::DeleteConfigActionAssociation...", 4);
MY_OUTPUT2(L"ConfigGUID=%s", pszConfigGUID, 4);
MY_OUTPUT2(L"ActionGUID=%s", pszActionGUID, 4);
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
if (pAction->DeleteConfigActionAssoc(pszConfigGUID, pszActionGUID))
{
bFound = TRUE;
break;
}
}
if (bFound == FALSE)
{
MY_OUTPUT(L"GUID not found", 4);
MY_OUTPUT(L"EXIT ***** CSystem::DeleteConfigActionAssociation...", 4);
return WBEM_E_NOT_FOUND;
}
else
{
MY_OUTPUT(L"EXIT ***** CSystem::DeleteConfigActionAssociation...", 4);
return S_OK;
}
}
//
// Delete the all associated actions to a given configuration GUID
//
HRESULT CSystem::DeleteAllConfigActionAssoc(LPTSTR pszConfigGUID)
{
BOOL bFound = FALSE;
int i, iSize;
CAction* pAction;
MY_OUTPUT(L"ENTER ***** CSystem::DeleteAllConfigActionAssociation...", 4);
MY_OUTPUT2(L"ConfigGUID=%s", pszConfigGUID, 4);
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
if (pAction->DeleteConfigActionAssoc(pszConfigGUID, pAction->m_szGUID))
{
bFound = TRUE;
}
}
if (bFound == FALSE)
{
MY_OUTPUT(L"No associations found. OK?", 4);
MY_OUTPUT(L"EXIT ***** CSystem::DeleteAllConfigActionAssociation...", 4);
return S_FALSE;
}
else
{
MY_OUTPUT(L"EXIT ***** CSystem::DeleteAllConfigActionAssociation...", 4);
return S_OK;
}
}
CBase *CSystem::GetParentPointerFromPath(LPTSTR pszParentPath)
{
TCHAR szGUID[1024];
int i, iSize;
CDataGroup* pDataGroup;
LPTSTR pStr;
LPTSTR pStr2;
BOOL bFound = FALSE;
CBase *pBase;
wcscpy(szGUID, pszParentPath);
pStr = wcschr(szGUID, '\"');
if (pStr)
{
pStr++;
pStr2 = wcschr(pStr, '\"');
if (pStr2)
{
*pStr2 = '\0';
if (!wcscmp(pStr, L"{@}"))
{
pBase = this;
bFound = TRUE;
}
else
{
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pStr, pDataGroup->GetGUID()))
{
pBase = pDataGroup;
bFound = TRUE;
break;
}
// Look at branch below to see if can find it
pBase = pDataGroup->GetParentPointerFromGUID(pStr);
if (pBase)
{
bFound = TRUE;
break;
}
}
}
}
}
else
{
pStr = wcschr(szGUID, '=');
if (pStr)
{
pStr++;
pStr++;
pStr++;
if (*pStr == '@')
{
pBase = this;
bFound = TRUE;
}
}
}
if (bFound == TRUE)
{
return pBase;
}
else
{
return NULL;
}
}
CBase *CSystem::FindImediateChildByName(LPTSTR pszName)
{
int i, iSize;
CDataGroup* pDataGroup;
BOOL bFound = FALSE;
CBase *pBase;
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszName, pDataGroup->m_szName))
{
pBase = pDataGroup;
bFound = TRUE;
break;
}
}
if (bFound == TRUE)
{
return pBase;
}
else
{
return NULL;
}
}
BOOL CSystem::GetNextChildName(LPTSTR pszChildName, LPTSTR pszOutName)
{
TCHAR szTemp[1024];
TCHAR szIndex[1024];
int i, iSize;
BOOL bFound;
CDataGroup* pDataGroup;
int index;
// We are here because we know that one exists already with the same name.
// So, lets start off trying to guess what the next name should be and get one.
index = 0;
bFound = TRUE;
while (bFound == TRUE)
{
wcscpy(szTemp, pszChildName);
_itot(index, szIndex, 10);
lstrcat(szTemp, L" ");
lstrcat(szTemp, szIndex);
bFound = FALSE;
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(szTemp, pDataGroup->m_szName))
{
bFound = TRUE;
break;
}
}
index++;
}
wcscpy(pszOutName, szTemp);
return TRUE;
}
CBase *CSystem::FindPointerFromName(LPTSTR pszName)
{
int i, iSize;
CDataGroup* pDataGroup;
BOOL bFound = FALSE;
CBase *pBase;
iSize = m_dataGroupList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_dataGroupList.size());
pDataGroup = m_dataGroupList[i];
if (!_wcsicmp(pszName, pDataGroup->m_szName))
{
pBase = pDataGroup;
bFound = TRUE;
break;
}
// Look at branch below to see if can find it
pBase = pDataGroup->FindPointerFromName(pszName);
if (pBase)
{
bFound = TRUE;
break;
}
}
if (bFound == TRUE)
{
return pBase;
}
else
{
return NULL;
}
}
//
// Do string replacement for the Message property
//
BOOL CSystem::FormatMessage(IWbemClassObject* pInstance)
{
BSTR PropName = NULL;
LPTSTR pszMsg = NULL;
SAFEARRAY *psaNames = NULL;
long lNum;
HRESULT hRetRes = S_OK;
LPTSTR pszDest = NULL;
LPTSTR pszUpperMsg = NULL;
LPTSTR pszNewMsg = NULL;
LPTSTR pStr = NULL;
LPTSTR pStr2 = NULL;
LPTSTR pStrStart = NULL;
TOKENSTRUCT tokenElmnt;
TOKENSTRUCT *pTokenElmnt;
REPSTRUCT repElmnt;
REPSTRUCT *pRepElmnt;
REPSTRUCT *pRepElmnt2;
REPLIST replacementList;
int i, iSize, iSizeNeeded, j;
long lLower, lUpper;
static TOKENLIST tokenList;
//
// We only need to build the set of tokens one time, then from then on
// we just need to fill in the values for what the replacement strings are.
//
if (tokenList.size() == 0)
{
//
// First we build the set of tokens that we are looking for. Each property that
// is in the ThresholdStatusInstance. We build that set of strings,
// and the values to replace with.
//
//
// Now go through ThresholdInstance, which is where the Message String
// actually lives. Get that set of properties for the Instances.
//
psaNames = NULL;
hRetRes = pInstance->GetNames(NULL, WBEM_FLAG_NONSYSTEM_ONLY, NULL, &psaNames);
if (SUCCEEDED(hRetRes))
{
// Get the number of properties.
SafeArrayGetLBound(psaNames, 1, &lLower);
SafeArrayGetUBound(psaNames, 1, &lUpper);
// For each property...
for (long l=lLower; l<=lUpper; l++)
{
// Get this property.
hRetRes = SafeArrayGetElement(psaNames, &l, &PropName);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
// Will want to skip some that don't make sense.
if (!wcscmp(PropName, L"Message"))
{
SysFreeString(PropName);
PropName = NULL;
continue;
}
else if (!wcscmp(PropName, L"ResetMessage"))
{
SysFreeString(PropName);
PropName = NULL;
continue;
}
else if (!wcscmp(PropName, L"EmbeddedCollectedInstance"))
{
SysFreeString(PropName);
PropName = NULL;
continue;
}
tokenElmnt.szOrigToken = new TCHAR[wcslen(PropName)+1];
MY_ASSERT(tokenElmnt.szOrigToken); if (!tokenElmnt.szOrigToken) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
wcscpy(tokenElmnt.szOrigToken, PropName);
tokenElmnt.szToken = new TCHAR[wcslen(PropName)+3];
MY_ASSERT(tokenElmnt.szToken); if (!tokenElmnt.szToken) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
wcscpy(tokenElmnt.szToken, L"%");
wcscat(tokenElmnt.szToken, PropName);
wcscat(tokenElmnt.szToken, L"%");
_wcsupr(tokenElmnt.szToken);
tokenElmnt.szReplacementText = NULL;
tokenList.push_back(tokenElmnt);
SysFreeString(PropName);
PropName = NULL;
}
SafeArrayDestroy(psaNames);
psaNames = NULL;
}
}
//
// Now we can fill in the values to use for the replacement strings.
//
//
// Now go through each ThresholdInstance, which is where the Message String
// actually lives. Get that set of properties of the Instance,
// And do the message formatting while there.
//
//
// Get the replacement strings for this instance
//
iSize = tokenList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<tokenList.size());
pTokenElmnt = &tokenList[i];
if (pTokenElmnt->szReplacementText != NULL)
{
delete [] pTokenElmnt->szReplacementText;
}
if (!wcscmp(pTokenElmnt->szToken, L"%TESTCONDITION%"))
{
hRetRes = GetUint32Property(pInstance, pTokenElmnt->szOrigToken, &lNum);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
MY_ASSERT(lNum<9);
pStr = new TCHAR[wcslen(conditionLocStr[lNum])+1];
MY_ASSERT(pStr); if (!pStr) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
wcscpy(pStr, conditionLocStr[lNum]);
}
else if (!wcscmp(pTokenElmnt->szToken, L"%STATE%"))
{
hRetRes = GetUint32Property(pInstance, pTokenElmnt->szOrigToken, &lNum);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
MY_ASSERT(lNum<10);
pStr = new TCHAR[wcslen(stateLocStr[lNum])+1];
MY_ASSERT(pStr); if (!pStr) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
wcscpy(pStr, stateLocStr[lNum]);
}
else
{
hRetRes = GetAsStrProperty(pInstance, pTokenElmnt->szOrigToken, &pStr);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
}
pTokenElmnt->szReplacementText = pStr;
}
//
// Now we have both lists of tokens that have replacement
// strings that go with them and the replacement strings
// that go with them
//
//
// Do formatting of Message. We replace all Variable Tags.
// Sample string -
// "Drive %InstanceName% is full. Currently at %CurrentValue%%."
//
//
// Get the origional un-formatted message first.
// To make case in-sensitive, do a _strdup and then a _wcsupr on the string
// to scan run the code on it, and then free the duplicated string.
//
// If it uses resource IDs, then get that string first, then format that!!!
hRetRes = GetStrProperty(pInstance, L"Message", &pszMsg);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
pszUpperMsg = _wcsdup(pszMsg);
MY_ASSERT(pszUpperMsg); if (!pszUpperMsg) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
_wcsupr(pszUpperMsg);
//
// First loop through and find every token that needs replacing.
// Put that info into the replacement list.
//
// We will do strstr() for each special token until there are no more to find
// for each. At each find we will store the offset into the string of what
// we found. Then we sort by what came first.
//
// Quick test to see if it is worth searching
if (wcschr(pszUpperMsg, '%'))
{
iSize = tokenList.size();
pStrStart = pszUpperMsg;
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<tokenList.size());
pTokenElmnt = &tokenList[i];
pStr = wcsstr(pStrStart, pTokenElmnt->szToken);
if (pStr != NULL)
{
repElmnt.pStartStr = pszMsg+(pStr-pszUpperMsg);
repElmnt.len = wcslen(pTokenElmnt->szToken);
repElmnt.pszReplacementText = pTokenElmnt->szReplacementText;
replacementList.push_back(repElmnt);
i--;
pStrStart = pStr+1;
}
else
{
pStrStart = pszUpperMsg;
}
}
//
// Need to look for replacement strings that have not been replaced.
// Simply search for %EmbeddedCollectedInstance. and find the end % for each
// Replace them with <null>
//
pStrStart = pszUpperMsg;
while (TRUE)
{
pStr = wcsstr(pStrStart, L"%EMBEDDEDCOLLECTEDINSTANCE.");
if (pStr != NULL)
{
repElmnt.pStartStr = pszMsg+(pStr-pszUpperMsg);
pStr2 = pStr;
while (pStr2++)
{
if (*pStr2=='%' || iswspace(*pStr2))
break;
}
if (*pStr2=='%')
{
repElmnt.len = (pStr2-pStr)+1;
repElmnt.pszReplacementText = L"<null>";
replacementList.push_back(repElmnt);
}
pStrStart = pStr+1;
}
else
{
break;
}
}
}
iSize = replacementList.size();
if (iSize != 0)
{
//
// Next, sort the replacement list from the first string to
// be replaced, to the last. Shell sort, Knuth, Vol13, pg. 84.
//
for (int gap=iSize/2; 0<gap; gap/=2)
{
for (i=gap; i<iSize; i++)
{
for (j=i-gap; 0<=j; j-=gap)
{
MY_ASSERT(j+gap<replacementList.size());
pRepElmnt = &replacementList[j+gap];
MY_ASSERT(j<replacementList.size());
pRepElmnt2 = &replacementList[j];
if (pRepElmnt->pStartStr < pRepElmnt2->pStartStr)
{
MY_ASSERT(j<replacementList.size());
repElmnt = replacementList[j];
MY_ASSERT(j+gap<replacementList.size());
replacementList[j] = replacementList[j+gap];
MY_ASSERT(j+gap<replacementList.size());
replacementList[j+gap] = repElmnt;
}
}
}
}
//
// Next, figure out the size needed for the Message with
// everything replaced.
//
iSizeNeeded = wcslen(pszMsg)+1;
iSize = replacementList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<replacementList.size());
pRepElmnt = &replacementList[i];
iSizeNeeded -= pRepElmnt->len;
iSizeNeeded += wcslen(pRepElmnt->pszReplacementText);
}
pszNewMsg = new TCHAR[iSizeNeeded];
MY_ASSERT(pszNewMsg); if (!pszNewMsg) {hRetRes = WBEM_E_OUT_OF_MEMORY; goto error;}
*pszNewMsg = '\0';
//
// Next, we loop through and do the actual replacements.
// "Drive %InstanceName% is full. Currently at %CurrentValue%%."
//
pszDest = pszMsg;
iSize = replacementList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<replacementList.size());
pRepElmnt = &replacementList[i];
*(pRepElmnt->pStartStr) = '\0';
wcscat(pszNewMsg, pszDest);
wcscat(pszNewMsg, pRepElmnt->pszReplacementText);
//XXXWould memcpy be faster??? memcpy(pszDest, source, charCnt*sizeof(TCHAR));
pszDest = pRepElmnt->pStartStr+pRepElmnt->len;
}
wcscat(pszNewMsg, pszDest);
PutStrProperty(pInstance, L"Message", pszNewMsg);
delete [] pszNewMsg;
pszNewMsg = NULL;
replacementList.clear();
}
else
{
PutStrProperty(pInstance, L"Message", pszMsg);
}
delete [] pszMsg;
pszMsg = NULL;
free(pszUpperMsg);
pszUpperMsg = NULL;
return TRUE;
error:
MY_ASSERT(FALSE);
if (PropName)
SysFreeString(PropName);
if (psaNames)
SafeArrayDestroy(psaNames);
if (pszNewMsg)
delete [] pszNewMsg;
if (pszMsg)
delete [] pszMsg;
if (pszUpperMsg)
free(pszUpperMsg);
m_bValidLoad = FALSE;
return hRetRes;
}
BOOL CSystem::SendReminderActionIfStateIsSame(IWbemObjectSink* pActionEventSink, IWbemObjectSink* pActionTriggerEventSink, IWbemClassObject* pActionInstance, IWbemClassObject* pActionTriggerInstance, unsigned long ulTriggerStates)
{
HRESULT hRetRes = S_OK;
IWbemClassObject* pInstance = NULL;
VARIANT v;
GUID guid;
TCHAR szStatusGUID[100];
VariantInit(&v);
if (m_bValidLoad == FALSE)
return FALSE;
//
// Check to see if still in the desired state
//
if (!(ulTriggerStates&(1<<m_lCurrState)))
{
return TRUE;
}
hRetRes = GetHMSystemStatusInstance(&pInstance, TRUE);
if (SUCCEEDED(hRetRes))
{
hRetRes = PutUint32Property(pActionTriggerInstance, L"State", m_lCurrState);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
VariantInit(&v);
V_VT(&v) = VT_UNKNOWN;
V_UNKNOWN(&v) = (IUnknown*)pInstance;
(V_UNKNOWN(&v))->AddRef();
hRetRes = (pActionTriggerInstance)->Put(L"EmbeddedStatusEvent", 0L, &v, 0L);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
VariantClear(&v);
if (pActionEventSink)
{
hRetRes = CoCreateGuid(&guid);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
StringFromGUID2(guid, szStatusGUID, 100);
hRetRes = PutStrProperty(pActionInstance, L"StatusGUID", szStatusGUID);
MY_HRESASSERT(hRetRes); if (hRetRes!=S_OK) goto error;
hRetRes = pActionEventSink->Indicate(1, &pActionInstance);
//WBEM_E_SERVER_TOO_BUSY is Ok. Wbem will deliver.
if (FAILED(hRetRes) && hRetRes != WBEM_E_SERVER_TOO_BUSY)
{
MY_HRESASSERT(hRetRes);
MY_OUTPUT(L"Failed on Indicate!", 4);
}
}
if (pActionTriggerEventSink)
{
hRetRes = pActionEventSink->Indicate(1, &pActionTriggerInstance);
//WBEM_E_SERVER_TOO_BUSY is Ok. Wbem will deliver.
if (FAILED(hRetRes) && hRetRes != WBEM_E_SERVER_TOO_BUSY)
{
MY_HRESASSERT(hRetRes);
MY_OUTPUT(L"Failed on Indicate!", 4);
}
}
pInstance->Release();
pInstance = NULL;
}
else
{
MY_HRESASSERT(hRetRes);
MY_OUTPUT(L"failed to get instance!", 4);
}
return TRUE;
error:
MY_ASSERT(FALSE);
if (pInstance)
pInstance->Release();
return FALSE;
}
HRESULT CSystem::AddPointerToMasterList(CBase *pBaseIn)
{
int i, iSize;
CBase* pBase;
MY_ASSERT(pBaseIn->m_szGUID);
if (pBaseIn->m_szGUID == NULL)
return S_FALSE;
iSize = m_masterList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_masterList.size());
pBase = m_masterList[i];
if (pBaseIn->m_szGUID == pBase->m_szGUID)
{
MY_ASSERT(FALSE);
return S_FALSE;
}
}
m_masterList.push_back(pBaseIn);
return S_OK;
}
BOOL CSystem::RemovePointerFromMasterList(CBase *pBaseIn)
{
int i, iSize;
CBase* pBase;
BLIST::iterator iaB;
MY_ASSERT(pBaseIn->m_szGUID);
if (pBaseIn->m_szGUID == NULL)
return FALSE;
iaB=m_masterList.begin();
iSize = m_masterList.size();
for (i=0; i<iSize; i++, iaB++)
{
MY_ASSERT(i<m_masterList.size());
pBase = m_masterList[i];
if (pBaseIn->m_szGUID == pBase->m_szGUID)
{
m_masterList.erase(iaB);
return TRUE;
}
}
MY_ASSERT(FALSE);
return FALSE;
}
CBase *CSystem::FindPointerFromGUIDInMasterList(LPTSTR pszGUID)
{
int i, iSize;
CBase* pBase;
MY_ASSERT(pszGUID);
if (pszGUID == NULL)
return NULL;
iSize = m_masterList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_masterList.size());
pBase = m_masterList[i];
if (!_wcsicmp(pszGUID, pBase->m_szGUID))
{
return pBase;
}
}
return NULL;
}
HRESULT CSystem::RemapActions(void)
{
int i, iSize;
CAction* pAction;
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
pAction->RemapAction();
}
return S_OK;
}
HRESULT CSystem::CheckAllForBadLoad(void)
{
int i, iSize;
CBase* pBase;
CAction* pAction;
//Verify the System???
CheckForBadLoad();
iSize = m_masterList.size();
for (i=0; i<iSize; i++)
{
MY_ASSERT(i<m_masterList.size());
pBase = m_masterList[i];
pBase->CheckForBadLoad();
}
iSize = m_actionList.size();
for (i=0; i < iSize; i++)
{
MY_ASSERT(i<m_actionList.size());
pAction = m_actionList[i];
pAction->CheckForBadLoad();
}
return S_OK;
}
HRESULT CSystem::CheckForBadLoad(void)
{
HRESULT hRetRes = S_OK;
IWbemClassObject* pObj = NULL;
TCHAR szTemp[1024];
IWbemClassObject* pInstance = NULL;
HRESULT hRes;
if (m_bValidLoad == FALSE)
{
wcscpy(szTemp, L"MicrosoftHM_SystemConfiguration.GUID=\"");
lstrcat(szTemp, m_szGUID);
lstrcat(szTemp, L"\"");
hRetRes = GetWbemObjectInst(&g_pIWbemServices, szTemp, NULL, &pObj);
if (!pObj)
{
MY_HRESASSERT(hRetRes);
return S_FALSE;
}
hRetRes = LoadInstanceFromMOF(pObj);
// Here is where we can try and send out a generic SOS if the load failed each time!!!
if (hRetRes != S_OK)
{
hRes = GetHMSystemStatusInstance(&pInstance, TRUE);
}
else
{
hRes = GetHMSystemStatusInstance(&pInstance, TRUE);
}
if (SUCCEEDED(hRes) && g_pSystemEventSink)
{
MY_OUTPUT2(L"EVENT: System State Change=%d", m_lCurrState, 4);
hRes = g_pSystemEventSink->Indicate(1, &pInstance);
// WBEM_E_SERVER_TOO_BUSY is Ok. Wbem will deliver.
if (FAILED(hRes) && hRes != WBEM_E_SERVER_TOO_BUSY)
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"Failed on Indicate!", 4);
}
pInstance->Release();
pInstance = NULL;
}
else
{
MY_HRESASSERT(hRes);
MY_OUTPUT(L"failed to get instance!", 4);
}
MY_HRESASSERT(hRetRes);
pObj->Release();
pObj = NULL;
return hRetRes;
}
return S_OK;
}