Huawei.E9000.Snmp.Monitor.SnmpTrapsmm

Huawei.BladeServer.Huawei.E9000.Snmp.Monitor.SnmpTrapsmm (UnitMonitor)

Description for the new unit monitor.

Element properties:

TargetE9000.Hmm
Parent MonitorSystem.Health.AvailabilityState
CategoryAvailabilityHealth
EnabledTrue
Alert GenerateFalse
Alert Auto ResolveFalse
Monitor TypeHuawei.Server.EventTriggeredScriptMonitorType.3StateScriptMonitorType
RemotableTrue
AccessibilityPublic
RunAsDefault

Source Code:

<UnitMonitor ID="Huawei.BladeServer.Huawei.E9000.Snmp.Monitor.SnmpTrapsmm" Accessibility="Public" Enabled="true" Target="E9000.Hmm" ParentMonitorID="Health!System.Health.AvailabilityState" Remotable="true" Priority="Normal" TypeID="Huawei.Server.EventTriggeredScriptMonitorType.3StateScriptMonitorType" ConfirmDelivery="false">
<Category>AvailabilityHealth</Category>
<OperationalStates>
<OperationalState ID="Success" MonitorTypeStateID="Success" HealthState="Success"/>
<OperationalState ID="Warning" MonitorTypeStateID="Warning" HealthState="Warning"/>
<OperationalState ID="Critical" MonitorTypeStateID="Critical" HealthState="Error"/>
</OperationalStates>
<Configuration>
<IP>$Target/Host/Property[Type="NetworkLibrary!System.NetworkManagement.Node"]/SNMPAddress$</IP>
<CommunityString>$RunAs[Name="NetworkLibrary!System.NetworkManagement.Snmp.MonitoringAccount"]/CommunityString$</CommunityString>
<Version>$Target/Host/Property[Type="NetworkLibrary!System.NetworkManagement.Node"]/SNMPVersion$/</Version>
<!--<AllTraps>false</AllTraps>-->
<OIDProps>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.501.10.19</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.501.10.24</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.5</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.15</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.18</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.27</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.33</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.35</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.39</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.40</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.41</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.43</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.44</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.211</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.240.113</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.240.114</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.257</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.258</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.294</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.786</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.789</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1042</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1045</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1051</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1052</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1825</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1813</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1831</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1793</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.1830</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.791</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.793</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.806</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.775</OIDProp>
<OIDProp>1.3.6.1.4.1.2011.2.82.1.82.500.10.2824</OIDProp>
</OIDProps>
<ScriptName>SMMTrapEventMonitor.vbs</ScriptName>
<Arguments>$MPElement$ $Target/Id$ $Target/Property[Type="NetworkLibrary!System.NetworkManagement.LogicalDevice"]/Index$ $RunAs[Name="NetworkLibrary!System.NetworkManagement.Snmp.MonitoringAccount"]/CommunityString$ $Target/Host/Property[Type="NetworkLibrary!System.NetworkManagement.Node"]/SNMPAddress$ $Property[Type="NetworkLibrary!System.Health.StateData.OldHealthState"]/State$ $Property[Type="Health!System.Health.EntityState"]/State$ $Property[@Name='Status']/State$ $Property[@Name='HealthStatus']$ </Arguments>
<ScriptBody><Script>
'**********************************************************************************
' Script Name - HuaweiServerMemoryUnit
' Author:
' Description:
' Determine Unit Monitor health for Server disk
'
' (c) Copyright Huawei Inc. 2013 - All rights reserved
'**********************************************************************************
Option Explicit
On Error Resume Next


Dim oArgs
Dim exePath, snmpVer, arr, host, ws, debugFlag
Dim SmmStatus,SmmNum,community,ipAddr,smm_HealthOID,smm_Health,teststate,CurrentTime,prmDeviceID, teststate2, teststate3, teststate4

Set oArgs = WScript.Arguments
prmDeviceID = oArgs(1)
SmmNum = oArgs(2)
community = oArgs(3)
ipAddr = oArgs(4)
teststate = oArgs(5)
teststate2 = oArgs(6)
teststate3 = oArgs(7)
teststate4 = oArgs(8)
exePath = "C:\"&amp;"Program Files"&amp;"\Huawei\snmp\snmpget.exe"
snmpVer = "2c"
debugFlag = 0


Set ws = CreateObject("WScript.Shell")
host = WScript.FullName

If LCase( right(host, len(host)-InStrRev(host,"\")) ) = "wscript.exe" Then
ws.run "cscript """ &amp; WScript.ScriptFullName &amp; chr(34), 0
WScript.Quit
End If


MOMDebugLog("------------------pdMonitor start------------------")
CurrentTime = Hour(Now)&amp; ":" &amp; Minute(Now) &amp;":" &amp;Second(Now)
MOMDebugLog("122" &amp; prmDeviceID)
MOMDebugLog("SmmNum :" &amp; SmmNum )
MOMDebugLog("SNMPAddr :" &amp; ipAddr)
MOMDebugLog("teststate :" &amp; teststate)
MOMDebugLog("teststate2 :" &amp; teststate2)
MOMDebugLog("teststate3 :" &amp; teststate3)
MOMDebugLog("teststate4 :" &amp; teststate4)
MOMDebugLog("time now :" &amp; CurrentTime)
smm_HealthOID = "1.3.6.1.4.1.2011.2.82.1.82.3.9.0"

smm_Health = getOidResult( smm_HealthOID)
MOMDebugLog("smm_Health:" &amp; smm_Health)

SmmStatus = smm_Health


IF len(SmmStatus)=0 or len(SmmStatus)&gt;2 or SmmStatus =chr(10) Then
SmmStatus = -1
Elseif SmmStatus = chr(13) Then
SmmStatus = -1
End IF

SmmStatus = SmmStatus

If SmmStatus = 1 Then
SmmStatus = "Warning"
MOMDebugLog( "Raw Status: " &amp; SmmStatus)
ElseIf SmmStatus = 2 OR SmmStatus = 3 OR SmmStatus = 4 OR SmmStatus = 5 OR SmmStatus = 6 OR SmmStatus = 7 Then
SmmStatus = "Critical"
MOMDebugLog(" Raw Status: " &amp; SmmStatus)
else
SmmStatus = "OK"
MOMDebugLog(" Raw Status: " &amp; SmmStatus)
End If

MOMDebugLog("time now :" &amp; CurrentTime)
MOMDebugLog("------------------pdMonitor end------------------")
Dim oAPI, oBag
Set oAPI = CreateObject("MOM.ScriptAPI")
Set oBag = oAPI.CreatePropertyBag()
Call oBag.AddValue("Status",SmmStatus)
Call oAPI.Return(oBag)
oBag = Nothing
'*****************************************************************
' Function getOidResult
' query OID value through snmp interface.
'*****************************************************************
Public Function getOidResult (ByVal Oid)
Dim cmd, result, getResult, arr

cmd = exePath &amp; " -v " &amp; snmpVer &amp; " -c " &amp; community &amp; " -r 3 -t 20 -O vq " &amp; ipAddr &amp; " " &amp; Oid
Set getResult = ws.Exec(cmd)
result = getResult.StdOut.ReadAll
Set getResult = Nothing
IF len(result )&gt;1 Then
IF (Mid(result ,1,1)=chr(34) And Mid(result ,len(result )-1,1)=chr(34)) Then
result = Mid(result ,2,len(result)-3) &amp; chr(32)
End IF
End IF
getOidResult = result

End Function


'*****************************************************************
' Function MOMDebugLog
' Add LogMessage Header - ScriptName and Time and Logging it.
'*****************************************************************
Public Function MOMDebugLog (ByVal strMessage)
IF debugFlag = 1 then
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Set fso=CreateObject("Scripting.FileSystemObject")
if fso.folderExists("C:\scomLog") then
Dim fso, f
Set f = fso.OpenTextFile("c:\scomLog\HMMTrapMonitor.txt", ForAppending, True)
f.WriteLine strMessage
f.Close
End if
End if
End Function

</Script></ScriptBody>
<TimeoutSeconds>600</TimeoutSeconds>
<SuccessExpression>
<SimpleExpression>
<ValueExpression>
<XPathQuery Type="String">Property[@Name='Status']</XPathQuery>
</ValueExpression>
<Operator>Equal</Operator>
<ValueExpression>
<Value Type="String">OK</Value>
</ValueExpression>
</SimpleExpression>
</SuccessExpression>
<WarningExpression>
<SimpleExpression>
<ValueExpression>
<XPathQuery Type="String">Property[@Name='Status']</XPathQuery>
</ValueExpression>
<Operator>Equal</Operator>
<ValueExpression>
<Value Type="String">Warning</Value>
</ValueExpression>
</SimpleExpression>
</WarningExpression>
<CriticalExpression>
<SimpleExpression>
<ValueExpression>
<XPathQuery Type="String">Property[@Name='Status']</XPathQuery>
</ValueExpression>
<Operator>Equal</Operator>
<ValueExpression>
<Value Type="String">Critical</Value>
</ValueExpression>
</SimpleExpression>
</CriticalExpression>
</Configuration>
</UnitMonitor>