moodle.waes.ac.uk/moodle.waes.ac.uk.zip/moodle.waes.ac.uk/TMG/SP1-TMG-KB981324-AMD64-ENU.msp/PCW_CAB_SHFx2/ChangeStorageServer.vbs

Text File | 2010-06-15 | 25KB | 561 lines

'******************************************************************************
'*
'* Copyright (c) Microsoft Corporation. All rights reserved.
'*
'* Module Name:    ChangeStorageServer.vbs
'*
'* Abstract:       Enables an ISA Server 2004 Enterprise Edition administrator
'*                 to change the Configuration Storage server when the current
'*                 one is no longer accessible from the ISA Server computers.
'*
'******************************************************************************

'******************************************************************************
' Begin localization
'******************************************************************************
const L_Prefix_ErrorMessage                      = "ERROR: "
const L_ConnectLocalStorage_ErrorMessage         = "Unable to connect to local storage"
const L_CreateObject_ErrorMessage                = "Unable to create object "
const L_GetArrayObject_ErrorMessage              = "Unable to get Array object"
const L_GetServerObject_ErrorMessage             = "Unable to get Server object "
const L_GetStorageServerObject_ErrorMessage      = "Unable to get Configuration Storage server object "
const L_CannotSaveNewServer_ErrorMessage         = "Cannot save new server"
const L_StopRemoteAccess_ErrorMessage            = "Cannot stop Remote Access Service"
const L_StopFirewall_ErrorMessage                = "Cannot stop Firewall service"
const L_StopJobScheduler_ErrorMessage            = "Cannot stop Job Scheduler service"
const L_StopControl_ErrorMessage                 = "Cannot stop Control service"
const L_StopManagedControl_ErrorMessage          = "Cannot stop Managed Control service"
const L_StartFirewall_ErrorMessage               = "Cannot start Firewall service"
const L_StartJobScheduler_ErrorMessage           = "Cannot start Job Scheduler service"
const L_StartControl_ErrorMessage                = "Cannot start Control service"
const L_StartManagedControl_ErrorMessage         = "Cannot start Managed Control service"
const L_WriteRegistry_ErrorMessage               = "Cannot write to registry"
const L_ReadRegistry_ErrorMessage                = "Cannot read from registry"

const L_WarningPrefix_Text                       = "WARNING: "
const L_StorageConnectivityWarning_Text          = "The new Configuration Storage server could not be accessed. Make sure that the server is running and that the server name was typed correctly."

const L_MustUseCscript_Text               = "This script should be executed from the command prompt using CSCRIPT.EXE."
const L_AuthWindows_Text                  = "Windows authentication"
const L_AuthCertificate_Text              = "Certificate authentication"
const L_WrongAuthType_Text                = "Wrong authentication type"
const L_ChangingServer_Text               = "Changing Configuration Storage server to: "
const L_ConnectLocal_Text                 = "Connecting to local storage"
const L_CreatingObjects_Text              = "Creating ISA Admin objects"
const L_StopRemoteAccess_Text             = "Stopping Remote Access service..."
const L_StopFirewall_Text                 = "Stopping Firewall service..."
const L_StopJobScheduler_Text             = "Stopping Job Scheduler service..."
const L_StopControl_Text                  = "Stopping Control service..."
const L_StopManagedControl_Text           = "Stopping Managed Control service..."
const L_StartFirewall_Text                = "Starting Firewall service..."
const L_StartJobScheduler_Text            = "Starting Job Scheduler service..."
const L_StartControl_Text                 = "Starting Control service..."
const L_StartManagedControl_Text          = "Starting Managed Control service..."
const L_ServiceStopSuccess_Text           = "Service stopped successfully"
const L_ServiceAlreadyStopped_Text        = "Service is already stopped"
const L_ServiceStartSuccess_Text          = "Service started successfully"
const L_ServiceAlreadyStarted_Text        = "Service is already started"
const L_CurrentRegistryStorageServer_Text = "Current effective Configuration Storage server: "
const L_CurrentStorageServer_Text         = "Current Configuration Storage server: "
const L_CurrentAuthType_Text              = "Current Configuration Storage server authentication: "
const L_ChangedServer_Text                = "Changed Configuration Storage server to: "
const L_ScriptDone_Text                   = "Script done"

const L_Usage_Text                        = "Usage:"
const L_UsageServer_Text                 = "New Configuration Storage server name"
const L_UsageType_Text                   = "Authentication type, can be 'windows' or 'certificate'"
const L_UsageServerParamName_Text            = "server"
const L_UsageTypeParamName_Text              = "type"




'******************************************************************************
' End localization
'******************************************************************************


'******************************************************************************
' Constants
'******************************************************************************

' Script type
CONST CONST_CSCRIPT              = 2

' enum: FpcConfigurationStorageServerConnectionType
const AUTH_WINDOWS               = 0
const AUTH_CERTIFICATE           = 1

' Service status constants
Const SERVICE_STOPPED            = 1
Const SERVICE_START_PENDING      = 2
Const SERVICE_STOP_PENDING       = 3
Const SERVICE_RUNNING            = 4
Const SERVICE_CONTINUE_PENDING   = 5
Const SERVICE_PAUSE_PENDING      = 6
Const SERVICE_PAUSED             = 7
Const SERVICE_ERROR              = 8

const WAIT_FOR_SERVICE           = 1000

const REG_STORAGE_SERVER         = "HKLM\SOFTWARE\Microsoft\Fpc\ADAMStorageServer"
const CONTROL_SERVICE            = "isactrl"
const MANAGED_CONTROL_SERVICE    = "IsaManagedCtrl"

'******************************************************************************
' Begin main script
'******************************************************************************

on error resume next
Err.Clear

' Verify the script is running using CScript
If Instr(1, LCase(WScript.FullName), "cscript", vbTextCompare) = 0 Then
    WScript.echo L_MustUseCscript_Text
    WScript.Quit(EXIT_UNEXPECTED)
End If

'Validate script arguments
If Wscript.Arguments.Count = 0 Then
   usage=true
ElseIf Wscript.Arguments.Count <> 2 Or Wscript.Arguments(0) = "/?" Then
   usage=true
Else
   usage=false
End IF

' Display usage
If usage Then
   Wscript.Echo L_Usage_Text
   Wscript.Echo
   Wscript.Echo "    " & Wscript.ScriptName & " <" & L_UsageServerParamName_Text & "> <" & L_UsageTypeParamName_Text & ">"
   Wscript.Echo
   Wscript.Echo "    " & L_UsageServerParamName_Text & "   " & L_UsageServer_Text
   Wscript.Echo "    " & L_UsageTypeParamName_Text & "     " & L_UsageType_Text
   Wscript.Quit(EXIT_UNEXPECTED)
End If

' First argument: server name
NewServer=Wscript.Arguments(0)

' Second argument: authentication type
if Wscript.Arguments(1) = "windows" Then
   NewServerAuthType=AUTH_WINDOWS
ElseIf Wscript.Arguments(1) = "certificate" Then
   NewServerAuthType=AUTH_CERTIFICATE
Else
   Wscript.Echo L_Prefix_ErrorMessage & L_WrongAuthType_Text
   Wscript.Quit(EXIT_UNEXPECTED)
End If

' Strat doing what we're here for
Trace L_ChangingServer_Text & NewServer

' Create root object
Trace L_CreatingObjects_Text
Set objFpcRoot=CreateObject("FPC.Root")
CheckError L_CreateObject_ErrorMessage & "FPC.Root"

' Set VendorMode to be true in order to be able to save configuration in Local Storage Mode.
objFpcRoot.VendorMode = true

'Connect root to local storage
Trace L_ConnectLocal_Text
objFpcRoot.ConnectToLocalStorage
CheckError L_ConnectLocalStorage_ErrorMessage

'Create rest of the objects
Set objFpcArray=objFpcRoot.GetContainingArray
CheckError L_GetArrayObject_ErrorMessage
Set objFpcServer=objFpcRoot.GetContainingServer
CheckError L_GetServerObject_ErrorMessage
Set objFpcStorageServer=objFpcArray.ConfigurationStorageServerConnection
CheckError L_GetStorageServerObject_ErrorMessage

' Stop services
If objFpcServer.RemoteAccessServiceStatus Then
    Trace L_StopRemoteAccess_Text
    objFpcServer.StopRemoteAccessService
    CheckError L_StopRemoteAccess_ErrorMessage
    Trace L_ServiceStopSuccess_Text
End If

If objFpcServer.FirewallServiceStatus Then
      Trace L_StopFirewall_Text
      objFpcServer.StopFirewallService
      CheckError L_StopFirewall_ErrorMessage
      Trace L_ServiceStopSuccess_Text
End If

If objFpcServer.JobSchedulerServiceStatus Then
      Trace L_StopJobScheduler_Text
      objFpcServer.StopJobSchedulerService
      CheckError L_StopJobScheduler_ErrorMessage
      Trace L_ServiceStopSuccess_Text
End If

' Stop IsaManagedCtrl service
Trace L_StopManagedControl_Text
StopService(MANAGED_CONTROL_SERVICE)
CheckError L_StopManagedControl_ErrorMessage


' Stop IsaCtrl service
Trace L_StopControl_Text
StopService(CONTROL_SERVICE)
CheckError L_StopControl_ErrorMessage

' Print the current configuration
Trace L_CurrentStorageServer_Text & objFpcStorageServer.PrimaryConfigurationStorageServer

If objFpcStorageServer.ConfigurationStorageServerConnectionType = AUTH_WINDOWS Then
   strAuthType=L_AuthWindows_Text
Else
   strAuthType=L_AuthCertificate_Text
End If
Trace L_CurrentAuthType_Text & strAuthType

' Change the storage server in the local storage
objFpcStorageServer.PrimaryConfigurationStorageServer=NewServer
objFpcStorageServer.ConfigurationStorageServerConnectionType=NewServerAuthType
objFpcStorageServer.Save
CheckError L_CannotSaveNewServer_ErrorMessage

' Change storage server in registry
Set WshShell = WScript.CreateObject("WScript.Shell")
Trace L_CurrentRegistryStorageServer_Text & WshShell.RegRead(REG_STORAGE_SERVER)
CheckError L_ReadRegistry_ErrorMessage
WshShell.RegWrite REG_STORAGE_SERVER, NewServer
CheckError L_WriteRegistry_ErrorMessage

' Finished
Trace L_ChangedServer_Text & NewServer & "(" & strAuthType & ")"

' Restart services
Trace L_StartControl_Text
StartService(CONTROL_SERVICE)
CheckError L_StartControl_ErrorMessage

Trace L_StartFirewall_Text
objFpcServer.StartFirewallService
CheckError L_StartFirewall_ErrorMessage
Trace L_ServiceStartSuccess_Text

Trace L_StartJobScheduler_Text
objFpcServer.StartJobSchedulerService
CheckError L_StartJobScheduler_ErrorMessage
Trace L_ServiceStartSuccess_Text

' Check if the new storage server is accisible and warn if it isn't
CheckStorageConnectivity NewServer

Trace L_ScriptDone_Text

' ****************************************
' StartService() subroutine
' Start a service
' ****************************************
Sub StartService(strService)
   on error goto 0

   Set objComputer = GetObject("WinNT://.,computer")
   Set objService = objComputer.GetObject("Service", strService)

   If (objService.Status <> SERVICE_RUNNING) Then
      objService.Start
      Wscript.Sleep WAIT_FOR_SERVICE
      While objService.Status <> SERVICE_RUNNING:
         Wscript.Sleep WAIT_FOR_SERVICE
      Wend
      Trace L_ServiceStartSuccess_Text
   Else
      Trace L_ServiceAlreadyStarted_Text
   End If

End Sub


' ****************************************
' StopService() subroutine
' Stop a service
' ****************************************
Sub StopService(strService)
   on error goto 0
   Set objComputer = GetObject("WinNT://.,computer")
   Set objService = objComputer.GetObject("Service", strService)

   If (objService.Status <> SERVICE_STOPPED) Then
      objService.Stop
      Do
         Wscript.Sleep WAIT_FOR_SERVICE
         on error resume next
         Status = objService.Status
         ErrorNum = Err.Number
         on error goto 0
      Loop Until ErrorNum = 0 AND Status = SERVICE_STOPPED
      Trace L_ServiceStopSuccess_Text
   Else
      Trace L_ServiceAlreadyStopped_Text
   End If

End Sub


sub CheckStorageConnectivity(ServerName)
   ISA_STORAGE_PORT_NUMBER = "2171"

   ConnectionString = "LDAP://" & ServerName & ":" & ISA_STORAGE_PORT_NUMBER & "/CN=Array-root,CN=FPC2"

   on error resume next
   Err.Clear

   Set FpcArrayRoot = GetObject(ConnectionString)

   if Err.Number then
      WScript.Echo L_WarningPrefix_Text & L_StorageConnectivityWarning_Text
      Err.Clear
   end if

end sub


' ****************************************
' Trace() subroutine
' outputs time and trace information
' ****************************************
Sub Trace(strText)
  WScript.Echo Now & " : " & strText
End Sub


' ****************************************
' CheckError() subroutine
' Checks error code
' ****************************************
Sub CheckError(strErrorText)

  if Err.Number then
     WScript.Echo L_Prefix_ErrorMessage & strErrorText
     WScript.Echo "       0x" & Hex(Err.Number) & " - " & Err.Description
     WScript.Quit(EXIT_METHOD_FAIL)
  end if

End Sub


'' SIG '' Begin signature block
'' SIG '' MIIbYAYJKoZIhvcNAQcCoIIbUTCCG00CAQExCzAJBgUr
'' SIG '' DgMCGgUAMGcGCisGAQQBgjcCAQSgWTBXMDIGCisGAQQB
'' SIG '' gjcCAR4wJAIBAQQQTvApFpkntU2P5azhDxfrqwIBAAIB
'' SIG '' AAIBAAIBAAIBADAhMAkGBSsOAwIaBQAEFPczaFWtBcIG
'' SIG '' dLaPE06sWwPbgquYoIIV5zCCBIUwggNtoAMCAQICCmEF
'' SIG '' 9x4AAAAAADIwDQYJKoZIhvcNAQEFBQAweTELMAkGA1UE
'' SIG '' BhMCVVMxEzARBgNVBAgTCldhc2hpbmd0b24xEDAOBgNV
'' SIG '' BAcTB1JlZG1vbmQxHjAcBgNVBAoTFU1pY3Jvc29mdCBD
'' SIG '' b3Jwb3JhdGlvbjEjMCEGA1UEAxMaTWljcm9zb2Z0IENv
'' SIG '' ZGUgU2lnbmluZyBQQ0EwHhcNMDkwNzEzMjMwMDE4WhcN
'' SIG '' MTAxMDEzMjMxMDE4WjCBgzELMAkGA1UEBhMCVVMxEzAR
'' SIG '' BgNVBAgTCldhc2hpbmd0b24xEDAOBgNVBAcTB1JlZG1v
'' SIG '' bmQxHjAcBgNVBAoTFU1pY3Jvc29mdCBDb3Jwb3JhdGlv
'' SIG '' bjENMAsGA1UECxMETU9QUjEeMBwGA1UEAxMVTWljcm9z
'' SIG '' b2Z0IENvcnBvcmF0aW9uMIIBIjANBgkqhkiG9w0BAQEF
'' SIG '' AAOCAQ8AMIIBCgKCAQEAtYypnJSEYRrMLiLEoJNkCd6F
'' SIG '' obCQXfzJbGi18e/8jmv0+KBu11HeYKMnY9T237ZM0kUL
'' SIG '' pz3Yb/7tpxhj0x/GgdS/BzeXQCt/519aNdmTT6vzKpLw
'' SIG '' po2B7AUk3Nu4YWNTYQI1ONa49e57VKbJWDXp9BXv2gds
'' SIG '' BS1NpLa6mzu4MTB+RbypoSU5DEOkRzuXnCBEcjfPUKBN
'' SIG '' TfTDZdxE0Qg7ON0+xRdsRsetcyTAj4nB6uq6zWipEtZY
'' SIG '' DFMWDP45A9aB8j5cV/N622bhBxjZGQMU9uZFmSpRTJDX
'' SIG '' Wu+vtzsMKU1tIK4Ht5Iu6GnKnzBC58MyigsiSjLonAzG
'' SIG '' UQMmAW2ScwIDAQABo4IBAjCB/zATBgNVHSUEDDAKBggr
'' SIG '' BgEFBQcDAzAdBgNVHQ4EFgQUh4G33+76d/pZBWM3BArX
'' SIG '' 6dqg4OAwDgYDVR0PAQH/BAQDAgeAMB8GA1UdIwQYMBaA
'' SIG '' FFdFdBxdsPbIQwXgjFQtjzKn/kiWMEkGA1UdHwRCMEAw
'' SIG '' PqA8oDqGOGh0dHA6Ly9jcmwubWljcm9zb2Z0LmNvbS9w
'' SIG '' a2kvY3JsL3Byb2R1Y3RzL0NvZGVTaWdQQ0EuY3JsME0G
'' SIG '' CCsGAQUFBwEBBEEwPzA9BggrBgEFBQcwAoYxaHR0cDov
'' SIG '' L3d3dy5taWNyb3NvZnQuY29tL3BraS9jZXJ0cy9Db2Rl
'' SIG '' U2lnUENBLmNydDANBgkqhkiG9w0BAQUFAAOCAQEANiGE
'' SIG '' 9Y+DIU2HqD+L58WkD0wwbll0mwuXdBapsfNwpK/CDDMk
'' SIG '' 86BK+sHkIca22epcW5Fh9yJt/zH8F07XzUDjndLltNL6
'' SIG '' jWwH2neayivuDVlHzwTCEGf66ulDO7fm0ZzZjiNgbhKb
'' SIG '' w9l+XFcy3ZQN333FSJJNSHa3osBTlT78OqOTfPKFBMfG
'' SIG '' hTiXNvgSkyIAmU55r5brWiCDrNBcWjCwAOJrOY8kido9
'' SIG '' DKRGeWI2U2rXyc2SCPuH5VT1fFnFxHd9sMEsmMeXbEOn
'' SIG '' +CD4g1RknmD44kqlZ9RJv1SIfVJE81HAJtHFfPCJ1hEJ
'' SIG '' KMJFRYAdkCK9jqIFPjyzT73XOeCIkzCCBMowggOyoAMC
'' SIG '' AQICCmED3PYAAAAAAAwwDQYJKoZIhvcNAQEFBQAwdzEL
'' SIG '' MAkGA1UEBhMCVVMxEzARBgNVBAgTCldhc2hpbmd0b24x
'' SIG '' EDAOBgNVBAcTB1JlZG1vbmQxHjAcBgNVBAoTFU1pY3Jv
'' SIG '' c29mdCBDb3Jwb3JhdGlvbjEhMB8GA1UEAxMYTWljcm9z
'' SIG '' b2Z0IFRpbWUtU3RhbXAgUENBMB4XDTA4MDcyNTE5MTI1
'' SIG '' MFoXDTExMDcyNTE5MjI1MFowgbMxCzAJBgNVBAYTAlVT
'' SIG '' MRMwEQYDVQQIEwpXYXNoaW5ndG9uMRAwDgYDVQQHEwdS
'' SIG '' ZWRtb25kMR4wHAYDVQQKExVNaWNyb3NvZnQgQ29ycG9y
'' SIG '' YXRpb24xDTALBgNVBAsTBE1PUFIxJzAlBgNVBAsTHm5D
'' SIG '' aXBoZXIgRFNFIEVTTjoxNTlDLUEzRjctMjU3MDElMCMG
'' SIG '' A1UEAxMcTWljcm9zb2Z0IFRpbWUtU3RhbXAgU2Vydmlj
'' SIG '' ZTCCASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEB
'' SIG '' AMDtgRShXnfAW/R2iWL6rXxoFLT3vTXYE3laF8rZbFFF
'' SIG '' YiZ6Lx/Y6sFuARf5w6YfZ9tRsCzeihft/yCtNOqY+6XW
'' SIG '' KtLxRCcHWi06k/9WU7DI9fMD8knMFtD1AExY+Jv1ByWx
'' SIG '' ZhfAvcjSUoWNwis4ssM2vvmH2vSOXUPXBr+ZBZ+kzv6r
'' SIG '' jWFj5znF8xj22PwxNmlyWqIaTD7qhyVCndE+8ZfSGDKT
'' SIG '' cFVTgR7jOw3ovoJ4beb6zZikb9vuZvSVyM01yZ67Ng2D
'' SIG '' lpQmp5DgqTQ71cCePvDUR42GDIKkWDA6HHbjrZVmtLf9
'' SIG '' CYoFYA+jD+KTllginJ0r26KUGJCVAr0GQJUCAwEAAaOC
'' SIG '' ARkwggEVMB0GA1UdDgQWBBTS7Q0eJLs3qdggak0d0hbV
'' SIG '' Lr6e6zAfBgNVHSMEGDAWgBQjNPjZUkZwCu1A+3b7syuw
'' SIG '' wzWzDzBUBgNVHR8ETTBLMEmgR6BFhkNodHRwOi8vY3Js
'' SIG '' Lm1pY3Jvc29mdC5jb20vcGtpL2NybC9wcm9kdWN0cy9N
'' SIG '' aWNyb3NvZnRUaW1lU3RhbXBQQ0EuY3JsMFgGCCsGAQUF
'' SIG '' BwEBBEwwSjBIBggrBgEFBQcwAoY8aHR0cDovL3d3dy5t
'' SIG '' aWNyb3NvZnQuY29tL3BraS9jZXJ0cy9NaWNyb3NvZnRU
'' SIG '' aW1lU3RhbXBQQ0EuY3J0MBMGA1UdJQQMMAoGCCsGAQUF
'' SIG '' BwMIMA4GA1UdDwEB/wQEAwIGwDANBgkqhkiG9w0BAQUF
'' SIG '' AAOCAQEAnApVyMxEEzQM2GMndn0++jgyg1Od8gj5MvXF
'' SIG '' bnChybFjaxmdCWfZneuKattgZunpUibzO8Zq08JSvqi5
'' SIG '' 62qqeIzJFn2QlaDMIbOegb3NwYspvWIl7wlX54ZOKuyA
'' SIG '' yrv8IRbEP05SGeYOsdjBwnmQZLRQcxA1Xl0Rwbi6qs9S
'' SIG '' 9oCRAObvUUNG6dDolPYsJA2KxrIxiqN+NmykBUxnByq7
'' SIG '' uxClpTAactAGIDskk1sV2TmT03MtGsTUbB6hCOz2Mbhr
'' SIG '' S+zuXDMCFDKMfBEgLyADf/kMnbjTnl/WCPyBoJm4u1Vu
'' SIG '' zUJLOk2MFCvKyBLTYm7qDQqdCaNm2XlPjhqi/8yYBDCC
'' SIG '' BgcwggPvoAMCAQICCmEWaDQAAAAAABwwDQYJKoZIhvcN
'' SIG '' AQEFBQAwXzETMBEGCgmSJomT8ixkARkWA2NvbTEZMBcG
'' SIG '' CgmSJomT8ixkARkWCW1pY3Jvc29mdDEtMCsGA1UEAxMk
'' SIG '' TWljcm9zb2Z0IFJvb3QgQ2VydGlmaWNhdGUgQXV0aG9y
'' SIG '' aXR5MB4XDTA3MDQwMzEyNTMwOVoXDTIxMDQwMzEzMDMw
'' SIG '' OVowdzELMAkGA1UEBhMCVVMxEzARBgNVBAgTCldhc2hp
'' SIG '' bmd0b24xEDAOBgNVBAcTB1JlZG1vbmQxHjAcBgNVBAoT
'' SIG '' FU1pY3Jvc29mdCBDb3Jwb3JhdGlvbjEhMB8GA1UEAxMY
'' SIG '' TWljcm9zb2Z0IFRpbWUtU3RhbXAgUENBMIIBIjANBgkq
'' SIG '' hkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAn6Fssd/bSJIq
'' SIG '' fGsuGeG94uPFmVEjUK3O3RhOJA/u0afRTK10MCAR6wfV
'' SIG '' VJUVSZQbQpKumFwwJtoAa+h7veyJBw/3DgSY8InMH8sz
'' SIG '' JIed8vRnHCz8e+eIHernTqOhwSNTyo36Rc8J0F6v0LBC
'' SIG '' BKL5pmyTZ9co3EZTsIbQ5ShGLieshk9VUgzkAyz7apCQ
'' SIG '' MG6H81kwnfp+1pez6CGXfvjSE/MIt1NtUrRFkJ9IAEpH
'' SIG '' ZhEnKWaol+TTBoFKovmEpxFHFAmCn4TtVXj+AZodUAiF
'' SIG '' ABAwRu233iNGu8QtVJ+vHnhBMXfMm987g5OhYQK1HQ2x
'' SIG '' /PebsgHOIktU//kFw8IgCwIDAQABo4IBqzCCAacwDwYD
'' SIG '' VR0TAQH/BAUwAwEB/zAdBgNVHQ4EFgQUIzT42VJGcArt
'' SIG '' QPt2+7MrsMM1sw8wCwYDVR0PBAQDAgGGMBAGCSsGAQQB
'' SIG '' gjcVAQQDAgEAMIGYBgNVHSMEgZAwgY2AFA6sgmBAVieX
'' SIG '' 5SUT/CrhClOVWeSkoWOkYTBfMRMwEQYKCZImiZPyLGQB
'' SIG '' GRYDY29tMRkwFwYKCZImiZPyLGQBGRYJbWljcm9zb2Z0
'' SIG '' MS0wKwYDVQQDEyRNaWNyb3NvZnQgUm9vdCBDZXJ0aWZp
'' SIG '' Y2F0ZSBBdXRob3JpdHmCEHmtFqFKoKWtTHNY9AcTLmUw
'' SIG '' UAYDVR0fBEkwRzBFoEOgQYY/aHR0cDovL2NybC5taWNy
'' SIG '' b3NvZnQuY29tL3BraS9jcmwvcHJvZHVjdHMvbWljcm9z
'' SIG '' b2Z0cm9vdGNlcnQuY3JsMFQGCCsGAQUFBwEBBEgwRjBE
'' SIG '' BggrBgEFBQcwAoY4aHR0cDovL3d3dy5taWNyb3NvZnQu
'' SIG '' Y29tL3BraS9jZXJ0cy9NaWNyb3NvZnRSb290Q2VydC5j
'' SIG '' cnQwEwYDVR0lBAwwCgYIKwYBBQUHAwgwDQYJKoZIhvcN
'' SIG '' AQEFBQADggIBABCXisNcA0Q23em0rXfbznlRTQGxLnRx
'' SIG '' W20ME6vOvnuPuC7UEqKMbWK4VwLLTiATUJndekDiV7uv
'' SIG '' WJoc4R0Bhqy7ePKL0Ow7Ae7ivo8KBciNSOLwUxXdT6uS
'' SIG '' 5OeNatWAweaU8gYvhQPpkSokInD79vzkeJkuDfcH4nC8
'' SIG '' GE6djmsKcpW4oTmcZy3FUQ7qYlw/FpiLID/iBxoy+cwx
'' SIG '' SnYxPStyC8jqcD3/hQoT38IKYY7w17gX606Lf8U1K16j
'' SIG '' v+u8fQtCe9RTciHuMMq7eGVcWwEXChQO0toUmPU8uWZY
'' SIG '' sy0v5/mFhsxRVuidcJRsrDlM1PZ5v6oYemIp76KbKTQG
'' SIG '' dxpiyT0ebR+C8AvHLLvPQ7Pl+ex9teOkqHQ1uE7FcSMS
'' SIG '' JnYLPFKMcVpGQxS8s7OwTWfIn0L/gHkhgJ4VMGboQhJe
'' SIG '' GsieIiHQQ+kr6bv0SMws1NgygEwmKkgkX1rqVu+m3pmd
'' SIG '' yjpvvYEndAYR7nYhv5uCwSdUtrFqPYmhdmG0bqETpr+q
'' SIG '' R/ASb/2KMmyy/t9RyIwjyWa9nR2HEmQCPS2vWY+45CHl
'' SIG '' tbDKY7R4VAXUQS5QrJSwpXirs6CWdRrZkocTdSIvMqgI
'' SIG '' bqBbjCW/oO+EyiHW6x5PyZruSeD3AWVviQt9yGnI5m7q
'' SIG '' p5fOMSn/DsVbXNhNG6HY+i+ePy5VFmvJE6P9MIIGgTCC
'' SIG '' BGmgAwIBAgIKYRUIJwAAAAAADDANBgkqhkiG9w0BAQUF
'' SIG '' ADBfMRMwEQYKCZImiZPyLGQBGRYDY29tMRkwFwYKCZIm
'' SIG '' iZPyLGQBGRYJbWljcm9zb2Z0MS0wKwYDVQQDEyRNaWNy
'' SIG '' b3NvZnQgUm9vdCBDZXJ0aWZpY2F0ZSBBdXRob3JpdHkw
'' SIG '' HhcNMDYwMTI1MjMyMjMyWhcNMTcwMTI1MjMzMjMyWjB5
'' SIG '' MQswCQYDVQQGEwJVUzETMBEGA1UECBMKV2FzaGluZ3Rv
'' SIG '' bjEQMA4GA1UEBxMHUmVkbW9uZDEeMBwGA1UEChMVTWlj
'' SIG '' cm9zb2Z0IENvcnBvcmF0aW9uMSMwIQYDVQQDExpNaWNy
'' SIG '' b3NvZnQgQ29kZSBTaWduaW5nIFBDQTCCASIwDQYJKoZI
'' SIG '' hvcNAQEBBQADggEPADCCAQoCggEBAJ+N34U3jLEGVmY2
'' SIG '' TtQK6zYjkR6vq41Y6cTPwZ86CiTExMResO4VFMX6Ppkz
'' SIG '' axlpcvR8BV/lmSVE1zUZipDcKI6QDO/VkGGt3twYcC2D
'' SIG '' yW+vhSz43bm5MP1xeByD/cipuYJnDXq4wQnCvBaXVz8c
'' SIG '' mNNp1zCQkJCNMB/YJtSee4jZ4gntl0lF6wRSgXV7uLUi
'' SIG '' uC5Wu9fPqU48CoOiqDrFrbYBDmrPIrQjH2zVJ+e3fsG0
'' SIG '' 1TKteSUcQobinYX0V9obWS8tJpIpxbPXhaOeYFqU5nuc
'' SIG '' e16CNEtt/9TuJ9Ci3NGQDM59DhV8iKw0x8BsmIRKyUR5
'' SIG '' aCjfIoMNuIosSGHi/hECAwEAAaOCAiMwggIfMBAGCSsG
'' SIG '' AQQBgjcVAQQDAgEAMB0GA1UdDgQWBBRXRXQcXbD2yEMF
'' SIG '' 4IxULY8yp/5IljALBgNVHQ8EBAMCAcYwDwYDVR0TAQH/
'' SIG '' BAUwAwEB/zCBmAYDVR0jBIGQMIGNgBQOrIJgQFYnl+Ul
'' SIG '' E/wq4QpTlVnkpKFjpGEwXzETMBEGCgmSJomT8ixkARkW
'' SIG '' A2NvbTEZMBcGCgmSJomT8ixkARkWCW1pY3Jvc29mdDEt
'' SIG '' MCsGA1UEAxMkTWljcm9zb2Z0IFJvb3QgQ2VydGlmaWNh
'' SIG '' dGUgQXV0aG9yaXR5ghB5rRahSqClrUxzWPQHEy5lMFAG
'' SIG '' A1UdHwRJMEcwRaBDoEGGP2h0dHA6Ly9jcmwubWljcm9z
'' SIG '' b2Z0LmNvbS9wa2kvY3JsL3Byb2R1Y3RzL21pY3Jvc29m
'' SIG '' dHJvb3RjZXJ0LmNybDBUBggrBgEFBQcBAQRIMEYwRAYI
'' SIG '' KwYBBQUHMAKGOGh0dHA6Ly93d3cubWljcm9zb2Z0LmNv
'' SIG '' bS9wa2kvY2VydHMvTWljcm9zb2Z0Um9vdENlcnQuY3J0
'' SIG '' MHYGA1UdIARvMG0wawYJKwYBBAGCNxUvMF4wXAYIKwYB
'' SIG '' BQUHAgIwUB5OAEMAbwBwAHkAcgBpAGcAaAB0ACAAqQAg
'' SIG '' ADIAMAAwADYAIABNAGkAYwByAG8AcwBvAGYAdAAgAEMA
'' SIG '' bwByAHAAbwByAGEAdABpAG8AbgAuMBMGA1UdJQQMMAoG
'' SIG '' CCsGAQUFBwMDMA0GCSqGSIb3DQEBBQUAA4ICAQAwvLAg
'' SIG '' pGKgp+85JmE93KzGmdCGxC71gzJlXiI+m9aG+Oi2n8qL
'' SIG '' 1jt1C6GRPkzdZHSMSfKIjBhnbP4VZka4OkZCl8iRN9Qk
'' SIG '' sees0+pBFIN308lPBV+jFFK/lqQvPlZbEHXOU8POBVRp
'' SIG '' tGXJJKUP4SW4GrlN5QK5UB5Ps5gMHZUC7iJZrSLLBXQL
'' SIG '' BEV7BFng2A+z60z4YN3CeJ7Rup9r9/PufkQRQNK9uptL
'' SIG '' FghupL5V5KY4EqNI9BxVeoog0X3+kduUjy/Ce2umZIVP
'' SIG '' o+UsNCldC7/1xzgvxCDEVjH2ac6F+AqR7NDWrro4BQzr
'' SIG '' bk9MnAMpqqL8GKApDA1cXFYjV9oclg3IJjbBRMvl4eZv
'' SIG '' ieeP6Zi1c9N44+2jATx05V68bPYhiWcF7JedtbH9r6bp
'' SIG '' cqXDNOEvn/n0ajniLQSCW/zQnK58nRH55rVTGXS6OUo5
'' SIG '' 631Cs0o7Nz3CSnsnmOfiTpsbSlQ4aiM3vmq3SO7qQg1J
'' SIG '' JJGOtwQul2/k50W7j039YNnXWcLYgNZgNHu3oZMg/oG4
'' SIG '' qqVcCemKDb4oTX7X6A/tZXjRMV+5ZtvfQucLzAIHjd//
'' SIG '' IAajRWW0szKNLpHiTbSpyfq8awQOsp/qn96kyQqW9I33
'' SIG '' 2Jio8IUCCFmkIKYsCxryUgbtaeVkGBvgo6veynwUYUO4
'' SIG '' ZfU2o1UTK2csTRswTDGCBOUwggThAgEBMIGHMHkxCzAJ
'' SIG '' BgNVBAYTAlVTMRMwEQYDVQQIEwpXYXNoaW5ndG9uMRAw
'' SIG '' DgYDVQQHEwdSZWRtb25kMR4wHAYDVQQKExVNaWNyb3Nv
'' SIG '' ZnQgQ29ycG9yYXRpb24xIzAhBgNVBAMTGk1pY3Jvc29m
'' SIG '' dCBDb2RlIFNpZ25pbmcgUENBAgphBfceAAAAAAAyMAkG
'' SIG '' BSsOAwIaBQCgggERMBkGCSqGSIb3DQEJAzEMBgorBgEE
'' SIG '' AYI3AgEEMBwGCisGAQQBgjcCAQsxDjAMBgorBgEEAYI3
'' SIG '' AgEVMCMGCSqGSIb3DQEJBDEWBBQfzmbrfb3naDa3vb9o
'' SIG '' aZhTU8ws/DCBsAYKKwYBBAGCNwIBDDGBoTCBnqBwgG4A
'' SIG '' RgBvAHIAZQBmAHIAbwBuAHQAIABUAGgAcgBlAGEAdAAg
'' SIG '' AE0AYQBuAGEAZwBlAG0AZQBuAHQAIABHAGEAdABlAHcA
'' SIG '' YQB5ACAALQAgAEsAQgAxADkAOAAxADQAMAA5ACAARQBu
'' SIG '' AGcAbABpAHMAaKEqgChodHRwOi8vc3VwcG9ydC5taWNy
'' SIG '' b3NvZnQuY29tP2tiaWQ9OTgxMzI0MA0GCSqGSIb3DQEB
'' SIG '' AQUABIIBAE6fRAbJ39vDl99JctLIn2OeP5sP16MLU7MS
'' SIG '' H3z/dn+oeeVLmaSGkxYS7k5qecYOVlyoyy9svmFD02pJ
'' SIG '' oUwmSB16bysRaJP8dJHWYVOvh5LtR/4H84JdCEKHjXns
'' SIG '' oISEz9SKuoNOYaPGFVxiydTPW6zeNvMFhGgN1WFbxKZI
'' SIG '' U1oZD2X2K2ycDT1VNQ0/cvGz9IiJeg623nmslq+HRXd6
'' SIG '' j2HMyokZLUG0HYr3XpvmIsUYwBPTeiEvxyctCbBwhTox
'' SIG '' UiXu/505MrM4HX7dKumIf4IMidb6M7ZpJrARFeUFcHUA
'' SIG '' tX4dGQUdfwq3dPaKVMiFKPoJ1RvJSzDewvoqUCseRouh
'' SIG '' ggIdMIICGQYJKoZIhvcNAQkGMYICCjCCAgYCAQEwgYUw
'' SIG '' dzELMAkGA1UEBhMCVVMxEzARBgNVBAgTCldhc2hpbmd0
'' SIG '' b24xEDAOBgNVBAcTB1JlZG1vbmQxHjAcBgNVBAoTFU1p
'' SIG '' Y3Jvc29mdCBDb3Jwb3JhdGlvbjEhMB8GA1UEAxMYTWlj
'' SIG '' cm9zb2Z0IFRpbWUtU3RhbXAgUENBAgphA9z2AAAAAAAM
'' SIG '' MAcGBSsOAwIaoF0wGAYJKoZIhvcNAQkDMQsGCSqGSIb3
'' SIG '' DQEHATAcBgkqhkiG9w0BCQUxDxcNMTAwNjE1MTgzNzQ5
'' SIG '' WjAjBgkqhkiG9w0BCQQxFgQUne6qC6Kc2KxtoRxOFwxm
'' SIG '' 1AveQ/MwDQYJKoZIhvcNAQEFBQAEggEADvzYgGVOR/fX
'' SIG '' tOKxtcpA+mzzbd1VVdoAkB1NKmSu8BAL3HKeLJ4/tNqk
'' SIG '' 7k+NKmaEzAsBKs7lNz0j4xKjbwo7IaEOGAvbHZLRSCJa
'' SIG '' URu9tn7c7WNS1HJ3frnPMd4vr8M9EpvKdrhIwAOtnGoQ
'' SIG '' qPvIEsSWy/C5T+JF5rSkRT3iNvC3Bvra07ecMXOHOrXb
'' SIG '' XVF9nzoE9EHr6zEQFAQAlffe2ONJpmtnRL+SUb5uiLQJ
'' SIG '' YzBxi447CxBgRoY4Afr8Pe4xG2++9bh+vplZKRuBI2z/
'' SIG '' wGRc8U59njTh/29cXxSHOvvm10Q+vjTq1+ic8o6S2Uom
'' SIG '' kPm6z6d9GPHW8IW4hzF/EQ==
'' SIG '' End signature block