FPE Controller Service Discovery

Microsoft.ForefrontProtection.FPE.Services.FSEFSCController.Discovery (Discovery)

Discovery of the Microsoft Forefront Server Protection Controller Service

Knowledge Base article:

Element properties:

Object Discovery Details:

Member Modules:

Source Code:

<Discovery ID="Microsoft.ForefrontProtection.FPE.Services.FSEFSCController.Discovery" Enabled="true" Target="Microsoft.ForefrontProtection.FPE.Services" ConfirmDelivery="false" Remotable="true" Priority="Normal">

  <Category>Discovery</Category>

  <DiscoveryTypes>

    <DiscoveryClass TypeID="Microsoft.ForefrontProtection.FPE.Services.FSEFSCController">

      <Property TypeID="FSS!Microsoft.ForefrontProtection.Library.Server" PropertyID="ServerName"/>

      <Property TypeID="FSS!Microsoft.ForefrontProtection.Library.Services.FSCController" PropertyID="ServiceName"/>

    </DiscoveryClass>

  </DiscoveryTypes>

  <DataSource ID="DS" TypeID="Windows!Microsoft.Windows.TimedScript.DiscoveryProvider">

    <IntervalSeconds>14400</IntervalSeconds>

    <SyncTime/>

    <ScriptName>FSEFSCControllerDiscovery.vbs</ScriptName>

    <Arguments>$MPElement$ $Target/Id$ $Target/Host/Host/Property[Type="Windows!Microsoft.Windows.Computer"]/NetworkName$ "FSCController"</Arguments>

    <ScriptBody><Script>

		    SetLocale("en-us")

            Const EVENT_TYPE_ERROR=1

            Const EVENT_TYPE_WARNING=2

            Const EVENT_TYPE_SUCCESS=4

            

            Dim oAPI

            Set oAPI = CreateObject("MOM.ScriptAPI")

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10310, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Dim oArgs

            Set oArgs = WScript.Arguments

            SourceId = oArgs(0)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10311, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            ManagedEntityId = oArgs(1)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10312, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            TargetComputer = oArgs(2)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10313, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            ServiceName = oArgs(3)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10314, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Dim oDiscoveryData

            set oDiscoveryData = oAPI.CreateDiscoveryData(0, SourceId, ManagedEntityId)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10315, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Dim oInstance

            Set oInstance = oDiscoveryData.CreateClassInstance("$MPElement[Name='Microsoft.ForefrontProtection.FPE.Services.FSEFSCController']$")

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10316, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Call oInstance.AddProperty("$MPElement[Name='FSS!Microsoft.ForefrontProtection.Library.Server']/ServerName$",TargetComputer)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10317, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Call oInstance.AddProperty("$MPElement[Name='Windows!Microsoft.Windows.Computer']/PrincipalName$",TargetComputer)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10318, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Call oInstance.AddProperty("$MPElement[Name='System!System.Entity']/DisplayName$","Microsoft Forefront Server Protection Controller")

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10319, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Call oInstance.AddProperty("$MPElement[Name='FSS!Microsoft.ForefrontProtection.Library.Services.FSCController']/ServiceName$",ServiceName)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10320, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Call oDiscoveryData.AddInstance(oInstance)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10321, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



            Call oAPI.Return(oDiscoveryData)

            If Err&lt;&gt;0 Then

            Call oAPI.LogScriptEvent("FSEFSCControllerDiscovery.vbs", 10322, EVENT_TYPE_ERROR, "FSEFSCControllerDiscovery.vbs: Error of creating oAPI object")

            Quit

            End if



          </Script></ScriptBody>

    <TimeoutSeconds>300</TimeoutSeconds>

  </DataSource>

</Discovery>