WCF : AddressFilterMode.Any를 선언적으로 지정하는 방법

Question

내 질문에 대한 답변을 미리 사과하지만 WCF의 확장 동작을 만들 수있을 때 AddressFilterMode.Any를 코드 속성으로 추가해야한다는 답변이 많이 있습니다. 똑같은 일을합니다. 많은 곳에서 같은 질문을 던져서 한 곳에서 질문에 대답하는 것이 더 도움이 될 것이라고 생각했습니다.

Answer 1

Imports System.ServiceModel 
Imports System.ServiceModel.Web 
Imports System.ServiceModel.Description 
Imports System.ServiceModel.Dispatcher 
Imports System.ServiceModel.Channels 

'We're assuming your project declares some default namespace like Org.ServiceModel 
Namespace Description 
Public Class AddressFilterModeAnyBehavior 
    Implements IEndpointBehavior 

    Private Const jsPostfix As String = "js" 
    Private Const jsdebugPostFix As String = "jsdebug" 

    Private Const MaxMetadataEndpointBufferSize As Integer = 2048 

    Public Sub AddBindingParameters(ByVal endpoint As System.ServiceModel.Description.ServiceEndpoint, ByVal bindingParameters As System.ServiceModel.Channels.BindingParameterCollection) Implements System.ServiceModel.Description.IEndpointBehavior.AddBindingParameters 

    End Sub 

    Public Sub ApplyClientBehavior(ByVal endpoint As System.ServiceModel.Description.ServiceEndpoint, ByVal clientRuntime As System.ServiceModel.Dispatcher.ClientRuntime) Implements System.ServiceModel.Description.IEndpointBehavior.ApplyClientBehavior 

    End Sub 

    Public Sub ApplyDispatchBehavior(ByVal endpoint As System.ServiceModel.Description.ServiceEndpoint, ByVal endpointDispatcher As System.ServiceModel.Dispatcher.EndpointDispatcher) Implements System.ServiceModel.Description.IEndpointBehavior.ApplyDispatchBehavior 
     If endpointDispatcher Is Nothing Then Return 
     endpointDispatcher.AddressFilter = New MatchAllMessageFilter 
     If (HasWebScriptBehavior(endpoint)) Then 
      HandleWebScriptBehavior(endpoint, endpointDispatcher) 
     End If 
    End Sub 

    Public Sub Validate(ByVal endpoint As System.ServiceModel.Description.ServiceEndpoint) Implements System.ServiceModel.Description.IEndpointBehavior.Validate 

    End Sub 

    Protected Sub HandleWebScriptBehavior(ByVal endpoint As ServiceEndpoint, ByVal endpointDispatcher As EndpointDispatcher) 
     If endpoint Is Nothing OrElse endpointDispatcher Is Nothing Then Exit Sub 
     If Not HasListenUri(endpoint) Then Exit Sub 
     Dim baseAddress As Uri = endpoint.Address.Uri 
     Dim jsUri As Uri = CreateWebScriptUri(baseAddress, False) 
     Dim jsdebugUri As Uri = CreateWebScriptUri(baseAddress, True) 
     Dim host As ServiceHostBase = endpointDispatcher.ChannelDispatcher.Host 
     Dim channelDispatchers As ChannelDispatcherCollection = host.ChannelDispatchers 
     For Each channelDispatcher As ChannelDispatcher In channelDispatchers 
      For Each dispatcher As EndpointDispatcher In channelDispatcher.Endpoints 
       With dispatcher 
        Dim endpointUri As Uri = .EndpointAddress.Uri 
        If (endpointUri.Equals(jsdebugUri) OrElse endpointUri.Equals(jsUri)) Then 
         .AddressFilter = New MatchAllMessageFilter 
        End If 
       End With 
      Next 
     Next 
    End Sub 

    <System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Performance", "CA1822:MarkMembersAsStatic")> 
    Protected Function HasWebScriptBehavior(ByVal endpoint As ServiceEndpoint) As Boolean 
     If endpoint Is Nothing Then Return False 
     Return (From behavior In endpoint.Behaviors Where TypeOf behavior Is WebScriptEnablingBehavior).Any 
    End Function 

    <System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Performance", "CA1822:MarkMembersAsStatic")> 
    Protected Function HasListenUri(ByVal endpoint As ServiceEndpoint) As Boolean 
     If endpoint Is Nothing Then Return False 
     Return Not endpoint.Address.Uri.Equals(endpoint.ListenUri) 
    End Function 

    <System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Performance", "CA1822:MarkMembersAsStatic")> 
    Protected Function CreateWebScriptUri(ByVal baseUri As Uri, ByVal debug As Boolean) As Uri 
     Dim builder As New UriBuilder(baseUri) 
     If (debug) Then 
      builder.Path += If(builder.Path.EndsWith("/", StringComparison.OrdinalIgnoreCase), (jsdebugPostFix), ("/" + jsdebugPostFix)) 
     Else 
      builder.Path += If(builder.Path.EndsWith("/", StringComparison.OrdinalIgnoreCase), (jsPostfix), ("/" + jsPostfix)) 
     End If 
     Return builder.Uri 
    End Function 


End Class 
End Namespace 

사용자 정의 구성 요소

Imports System.ServiceModel 
Imports System.ServiceModel.Configuration 
Imports Hsb.ServiceModel.Description 

'We're assuming your project declares some default namespace like Org.ServiceModel 
Namespace Configuration 

Public Class AddressFilterModeAnyElement 
    Inherits BehaviorExtensionElement 


#Region "BehaviorExtensionElement Implementation" 
    'The BehaviorExtensionElement base class allows the behavior to be added through configuration 
    'using the system.servicemodel/extensions .config element. 
    <System.Diagnostics.CodeAnalysis.SuppressMessage("Configuration", "Configuration102:ConfigurationPropertyAttributeRule", MessageId:="System.ServiceModel.Configuration.WebScriptEnablingElement.BehaviorType", Justification:="Not a configurable property; a property that had to be overridden from abstract parent class")> _ 
    Public Overrides ReadOnly Property BehaviorType() As System.Type 
     Get 
      Return GetType(AddressFilterModeAnyBehavior) 
     End Get 
    End Property 

    Protected Overrides Function CreateBehavior() As Object 
     Return New AddressFilterModeAnyBehavior() 
    End Function 
#End Region 

End Class 
End Namespace 

사용 우리는 가정거야 당신의 WCF 구성에서 확장 요소를 만들고 사용자 정의 동작 만들기 어셈블리의 이름은 Org.ServiceModel

입니다.210

<system.serviceModel> 
<behaviors> 
    <endpointBehaviors> 
    <behavior name="JSON">   
     <enableWebScript /> 
     <addressFilterModeAny /> 
    </behavior>   
    </endpointBehaviors> 
</behaviors> 
<extensions> 
    <behaviorExtensions> 
    <!-- Microsoft Connect Issue ID 216431: The full assembly qualified typename including version, culture and key must be specified.--> 
    <!-- The following endpoint behavior extension element sets the endpoint's address filter mode to any. This allows the service 
    to operate behind an SSL load balancer where externally https is used and internally http is used.--> 
    <add name="addressFilterModeAny" type="Org.ServiceModel.Configuration.AddressFilterModeAnyElement, Org.ServiceModel, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null"/> 
    </behaviorExtensions> 
</extensions> 
</system.serviceModel>