How to specify AddressFilterMode.Any declaratively
There are lots of answers stating that AddressFilterMode.Any
needs to be added as a code attribute when you can create an extension behavior for WCF that does the same thing.开发者_如何学Go
How can you specify AddressFilterMode.Any
programmatically
Create a custom behavior
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
Create a custom configuration element
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
Use the extension element in your WCF Configuration
We're going to assume that the assembly is named Org.ServiceModel
<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>
If you want to specify it in code while creating a service host:
host.Description.Behaviors.Find<ServiceBehaviorAttribute>().AddressFilterMode = AddressFilterMode.Any;
or
host.Description.Behaviors.Add(new ServiceBehaviorAttribute { AddressFilterMode = AddressFilterMode.Any });
Depending on whether your service already has a ServiceBehaviorAttribute
or not.
精彩评论