Audiocodes.GW.Management.Pack.GW.SnmpToPropertyBagScript (ProbeActionModuleType)

Element properties:

TypeProbeActionModuleType
IsolationAny
AccessibilityInternal
RunAsDefault
InputTypeSystem.BaseData
OutputTypeSystem.PropertyBagData

Member Modules:

ID Module Type TypeId RunAs 
DSScript ProbeAction Microsoft.Windows.ScriptPropertyBagProbe Default

Source Code:

<ProbeActionModuleType ID="Audiocodes.GW.Management.Pack.GW.SnmpToPropertyBagScript" Accessibility="Internal" Batching="false" PassThrough="false">
<Configuration>
<IncludeSchemaTypes>
<SchemaType>System!System.Discovery.MapperSchema</SchemaType>
</IncludeSchemaTypes>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="ScriptName" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="DisplayName" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="DeviceVersion" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="DeviceType" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="ProductType" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="TrunksCount" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="ChannelsCount" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="LastReboot" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="IP" type="xsd:string"/>
</Configuration>
<ModuleImplementation Isolation="Any">
<Composite>
<MemberModules>
<ProbeAction ID="DSScript" TypeID="Windows!Microsoft.Windows.ScriptPropertyBagProbe">
<ScriptName>$Config/ScriptName$</ScriptName>
<Arguments>"$Config/DisplayName$" "$Config/DeviceVersion$" "$Config/DeviceType$" "$Config/ProductType$" "$Config/TrunksCount$" "$Config/ChannelsCount$" "$Config/LastReboot$" "$Config/IP$"</Arguments>
<ScriptBody><Script>
Option Explicit

Dim oAPI, oBag, oArgs, strArg, strArgs
Set oArgs = WScript.Arguments
Set oAPI = CreateObject("MOM.ScriptAPI")
Set oBag = oAPI.CreatePropertyBag()

strArgs = vbNullString

For Each strArg in oArgs
strArgs = strArgs &amp; strArg &amp; "; "
Next

oAPI.LogScriptEvent "$Config/ScriptName$", 8001, 0, "$Config/ScriptName$ started with " &amp; oArgs.Length &amp; " arguments: " &amp; strArgs

if oArgs.Length &lt; 8 then
WScript.Exit -1
end if

Dim iSemicolonPos, sDeviceType, sProductType, ticks, dLastReboot

iSemicolonPos = InStr(CStr(oArgs(2)), ";")

If iSemicolonPos &gt; 0 Then
sDeviceType = Mid(CStr(oArgs(2)), 1, iSemicolonPos - 1)
Else
sDeviceType = CStr(oArgs(2))
End If

Select Case CStr(oArgs(3))
Case "0"
sProductType = "acUnknown"
Case "1"
sProductType = "acTrunkPack-08"
Case "2"
sProductType = "acMediaPack-108"
Case "3"
sProductType = "acMediaPack-124"
Case "20"
sProductType = "acTrunkPack-1600"
Case "22"
sProductType = "acTPM1100"
Case "23"
sProductType = "acTrunkPack-260-IpMedia"
Case "24"
sProductType = "acTrunkPack-1610"
Case "25"
sProductType = "acMediaPack-104"
Case "26"
sProductType = "acMediaPack-102"
Case "29"
sProductType = "acTrunkPack-1610-SB"
Case "30"
sProductType = "acTrunkPack-1610-IpMedia"
Case "31"
sProductType = "acTrunkPack-MEDIANT2000"
Case "32"
sProductType = "acTrunkPack-STRETTO2000"
Case "33"
sProductType = "acTrunkPack-IPMServer2000"
Case "34"
sProductType = "acTrunkPack-2810"
Case "35"
sProductType = "acTrunkPack-260-UN-IpMedia"
Case "36"
sProductType = "acTrunkPack-260-IpMedia-30Ch"
Case "37"
sProductType = "acTrunkPack-260-IpMedia-60Ch"
Case "38"
sProductType = "acTrunkPack-260-IpMedia-120Ch"
Case "39"
sProductType = "acTrunkPack-260RT-IpMedia-30Ch"
Case "40"
sProductType = "acTrunkPack-260RT-IpMedia-60Ch"
Case "41"
sProductType = "acTrunkPack-260RT-IpMedia-120Ch"
Case "42"
sProductType = "acTrunkPack-260"
Case "43"
sProductType = "acTrunkPack-260-UN"
Case "44"
sProductType = "acTPM1100-PCM"
Case "45"
sProductType = "acTrunkPack-6310"
Case "46"
sProductType = "acTPM6300"
Case "47"
sProductType = "acMediant1000"
Case "48"
sProductType = "acIPMedia3000"
Case "49"
sProductType = "acMediant3000"
Case "50"
sProductType = "acStretto3000"
Case "51"
sProductType = "acTrunkPack-6310-IpMedia"
Case "52"
sProductType = "acTrunkPack-6310-SB"
Case "53"
sProductType = "acATP-1610"
Case "54"
sProductType = "acATP-260"
Case "55"
sProductType = "acATP-260-UN"
Case "56"
sProductType = "acMediaPack-118"
Case "57"
sProductType = "acMediaPack114"
Case "58"
sProductType = "acMediaPack112"
Case "59"
sProductType = "acTrunkPack-6310-T3"
Case "60"
sProductType = "acMediant3000-T3"
Case "61"
sProductType = "acIPmedia3000-T3"
Case "62"
sProductType = "acTrunkPack-6310-T3-IpMedia"
Case "63"
sProductType = "acTrunkPack-8410"
Case "64"
sProductType = "acTrunkPack-8410-IpMedia"
Case "65"
sProductType = "acMediant-600"
Case "66"
sProductType = "acTrunkPack-12610"
Case "67"
sProductType = "acMediant1000-MSBG"
Case "68"
sProductType = "acMediant-600-MSBG"
Case "69"
sProductType = "acMediant800-MSBG"
Case "70"
sProductType = "acMediant-4000"
Case "71"
sProductType = "acMediant1000-ESBG"
Case "72"
sProductType = "acMediant800-ESBG"
Case "77"
sProductType = "acMediant500-ESBC"
Case "78"
sProductType = "acMediant-2600"
Case "79"
sProductType = "acMediant-VE-SBC"
Case "86"
sProductType = "acMediaPack-1288"
Case Else
sProductType = "Undefined: " &amp; CStr(oArgs(3))
End Select

ticks = CDbl(oArgs(6)) \ 100
dLastReboot = DateAdd("s", 0 - ticks, Now)

IF CStr(oArgs(0)) = "" THEN
Call oBag.AddValue("DisplayName", CStr(oArgs(7)))
ELSE
Call oBag.AddValue("DisplayName", CStr(oArgs(0)))
END IF
Call oBag.AddValue("DeviceVersion", CStr(oArgs(1)))
Call oBag.AddValue("DeviceType", sDeviceType)
Call oBag.AddValue("ProductType", sProductType)
Call oBag.AddValue("TrunksCount", CInt(oArgs(4)))
Call oBag.AddValue("ChannelsCount", CInt(oArgs(5)))
Call oBag.AddValue("LastRebootTime", dLastReboot)

Call oAPI.Return(oBag)

</Script></ScriptBody>
<TimeoutSeconds>60</TimeoutSeconds>
</ProbeAction>
</MemberModules>
<Composition>
<Node ID="DSScript"/>
</Composition>
</Composite>
</ModuleImplementation>
<OutputType>System!System.PropertyBagData</OutputType>
<InputType>System!System.BaseData</InputType>
</ProbeActionModuleType>