Home
  •  

データベース ミラー監視サーバーの状態

Microsoft.SQLServer.2014.Mirroring.WitnessStateMonitor (UnitMonitor)

このモニターは、データベース ミラー監視サーバーがアクセス可能かどうかを調べます。

Knowledge Base article:

概要

このモニターは、Microsoft® SQL Server™ から報告されたデータベース ミラーリング監視サーバーの状態を確認します。確認は、SQL Server インスタンスの master データベースにクエリを実行し、データベース ミラーリング監視サーバーの状態を返すことで行われます。このモニターからアラートを受け取った場合は、データベース ミラーリング監視サーバーを動作状態に戻す処理を行う必要があります。

原因

異常な状態は、SQL Server™ データベース ミラーリング監視サーバーが現在使用できないことを示します。CONNECTED と NO-WITNESS 以外の状態はいずれも、異常な状態の原因となります。考えられる状態について、以下で詳しく説明します。

ミラーリング監視サーバーの状態

説明

MOM 正常性状態

CONNECTED

これは通常の動作状態です。ミラーリング パートナーは監視サーバーにアクセスできます。

緑

NO-WITNESS

この状態は、ミラーリング セッションに対して監視サーバーが指定されていないことを示します。これは、"高パフォーマンス" モードや "自動フェールオーバーを伴わない高い安全性" モードの通常の動作状態です。

緑

UNKNOWN

ミラーリング パートナーと監視サーバーの間の接続に問題があります。

黄

DISCONNECTED

ミラーリング パートナーと監視サーバーは接続されていません。

赤

解決方法

問題を解決するには、次のことを試してください。

Element properties:

TargetMicrosoft.SQLServer.2014.Mirroring.Database
Parent MonitorSystem.Health.AvailabilityState
CategoryAvailabilityHealth
EnabledTrue
Alert GenerateTrue
Alert SeverityMatchMonitorHealth
Alert PriorityNormal
Alert Auto ResolveTrue
Monitor TypeMicrosoft.SQLServer.2014.Mirroring.ScriptedThreeStateType
RemotableTrue
AccessibilityPublic
Alert Message
データベース ミラー監視サーバーはアクセス不可能です
データベース ミラー '{0}' (SQL Server インスタンス '{1}'、コンピューター '{2}') とその監視サーバー '{3}' との接続は失われています。
RunAsDefault

Source Code:

<UnitMonitor ID="Microsoft.SQLServer.2014.Mirroring.WitnessStateMonitor" Accessibility="Public" Enabled="true" Target="SQL2014Mirroring!Microsoft.SQLServer.2014.Mirroring.Database" ParentMonitorID="Health!System.Health.AvailabilityState" TypeID="Microsoft.SQLServer.2014.Mirroring.ScriptedThreeStateType" Remotable="true" Priority="Normal" ConfirmDelivery="false">

  <Category>AvailabilityHealth</Category>

  <AlertSettings AlertMessage="Microsoft.SQLServer.2014.Mirroring.WitnessStateMonitor.AlertMessage">

    <AlertOnState>Warning</AlertOnState>

    <AutoResolve>true</AutoResolve>

    <AlertPriority>Normal</AlertPriority>

    <AlertSeverity>MatchMonitorHealth</AlertSeverity>

    <AlertParameters>

      <AlertParameter1>$Target/Property[Type="SQL2014Core!Microsoft.SQLServer.2014.Database"]/DatabaseName$</AlertParameter1>

      <AlertParameter2>$Target/Host/Property[Type="SQL2014Core!Microsoft.SQLServer.2014.ServerRole"]/InstanceName$</AlertParameter2>

      <AlertParameter3>$Target/Host/Host/Property[Type="Windows!Microsoft.Windows.Computer"]/PrincipalName$</AlertParameter3>

      <AlertParameter4>$Target/Property[Type="SQL2014Mirroring!Microsoft.SQLServer.2014.Mirroring.Database"]/Witness$</AlertParameter4>

    </AlertParameters>

  </AlertSettings>

  <OperationalStates>

    <OperationalState ID="Good" MonitorTypeStateID="Good" HealthState="Success"/>

    <OperationalState ID="NeitherGoodNorBad" MonitorTypeStateID="NeitherGoodNorBad" HealthState="Warning"/>

    <OperationalState ID="Bad" MonitorTypeStateID="Bad" HealthState="Error"/>

  </OperationalStates>

  <Configuration>

    <ScriptName>GetSQL2014MirroringWitnessState.vbs</ScriptName>

    <ScriptBody><Script>'#Include File:GetSQL2008MirroringWitnessState.vbs

'Copyright (c) Microsoft Corporation. All rights reserved.

' This script takes a single parameter

' Param 0: The SQL connection string to connect to



Const SQL_MONITORING_CONNECT_FAILURE = -1

Const SQL_MONITORING_QUERY_FAILURE = -2

Const SQL_MONITORING_SUCCESS = 0



Dim GetWitnessStatusQuery

GetWitnessStatusQuery = "SELECT " &amp;_

                            " d.name, " &amp;_

                            " CASE WHEN dm.mirroring_witness_name = '' THEN 'NO-WITNESS' ELSE ISNULL(dm.mirroring_witness_state_desc, 'UNKNOWN') END " &amp;_

                        " FROM sys.databases d " &amp;_

                            " INNER JOIN sys.database_mirroring dm ON dm.database_id = d.database_id " &amp;_

                        " WHERE dm.mirroring_guid IS NOT NULL"



Call GetWitnessAccessibility()



Sub GetWitnessAccessibility()

    If WScript.Arguments.Count = 4 Then

        Dim oBag

	    Set oBag = oAPI.CreatePropertyBag()

	    Dim nResult

	    nResult = WitnessAccessibility(WScript.Arguments(0), oBag, WScript.Arguments(1), WScript.Arguments(2), WScript.Arguments(3))

		Call oAPI.Return(oBag)

    Else

        Wscript.Quit()

    End If

End Sub



Function WitnessAccessibility(ByVal sSQLConnectionString, ByRef oBag, ByVal sComputerName, ByVal sInstanceName, ByVal sTcpPort)

	Dim e

	Set e = New Error



    Dim cnADOConnection

    Set cnADOConnection = SmartConnectWithoutSQLADODB(sSQLConnectionString, sTcpPort, sComputerName, sInstanceName, "master")

    if cnADOConnection Is Nothing Then

		WitnessAccessibility = SQL_MONITORING_CONNECT_FAILURE

        ThrowScriptErrorNoAbort "Cannot connect to '" &amp; sSQLConnectionString &amp; "' SQL Server", e

        Exit Function

    End If

	    

    Dim oResults

	e.Clear

	On Error Resume Next

		Set oResults = cnADOConnection.Execute(GetWitnessStatusQuery)

		e.Save

	On Error Goto 0

	If e.Number &lt;&gt; 0 Then

		WitnessAccessibility = SQL_MONITORING_QUERY_FAILURE

        ThrowScriptErrorNoAbort "Query execution failed for '" &amp; sSQLConnectionString &amp; "' SQL Server", e

		If (oResults &lt;&gt; null) Then oResults.Close

        cnADOConnection.Close

		Exit Function

	End If



	Do While Not oResults.EOF

		Call oBag.AddValue(oResults(0) &amp; "-State", CStr(oResults(1)))

		oResults.MoveNext

	Loop

	

	cnADOConnection.Close

    WitnessAccessibility = SQL_MONITORING_SUCCESS

End Function

</Script></ScriptBody>

    <IntervalSeconds>900</IntervalSeconds>

    <SyncTime/>

    <TimeoutSeconds>300</TimeoutSeconds>

    <ConnectionString>$Target/Host/Property[Type="SQL2014Core!Microsoft.SQLServer.2014.DBEngine"]/ConnectionString$</ConnectionString>

    <GoodExpression>

      <Or>

        <Expression>

          <SimpleExpression>

            <ValueExpression>

              <XPathQuery Type="String">Property[@Name='$Target/Property[Type="SQL2014Core!Microsoft.SQLServer.2014.Database"]/DatabaseName$-State']</XPathQuery>

            </ValueExpression>

            <Operator>Equal</Operator>

            <ValueExpression>

              <Value Type="String">CONNECTED</Value>

            </ValueExpression>

          </SimpleExpression>

        </Expression>

        <Expression>

          <SimpleExpression>

            <ValueExpression>

              <XPathQuery Type="String">Property[@Name='$Target/Property[Type="SQL2014Core!Microsoft.SQLServer.2014.Database"]/DatabaseName$-State']</XPathQuery>

            </ValueExpression>

            <Operator>Equal</Operator>

            <ValueExpression>

              <Value Type="String">NO-WITNESS</Value>

            </ValueExpression>

          </SimpleExpression>

        </Expression>

      </Or>

    </GoodExpression>

    <NeitherGoodNorBadExpression>

      <SimpleExpression>

        <ValueExpression>

          <XPathQuery Type="String">Property[@Name='$Target/Property[Type="SQL2014Core!Microsoft.SQLServer.2014.Database"]/DatabaseName$-State']</XPathQuery>

        </ValueExpression>

        <Operator>Equal</Operator>

        <ValueExpression>

          <Value Type="String">UNKNOWN</Value>

        </ValueExpression>

      </SimpleExpression>

    </NeitherGoodNorBadExpression>

    <BadExpression>

      <SimpleExpression>

        <ValueExpression>

          <XPathQuery Type="String">Property[@Name='$Target/Property[Type="SQL2014Core!Microsoft.SQLServer.2014.Database"]/DatabaseName$-State']</XPathQuery>

        </ValueExpression>

        <Operator>Equal</Operator>

        <ValueExpression>

          <Value Type="String">DISCONNECTED</Value>

        </ValueExpression>

      </SimpleExpression>

    </BadExpression>

  </Configuration>

</UnitMonitor>