Reputation: 4600
I have service with working MEX at:
net.tcp://remotehost:4508
What is the shortest C#/F# code (hard time understanding XML configuration files ^_^") I could write to create a router to it at?:
net.tcp://localhost:4508
MEX should also be routed properly so that clients can use the router
svcutil net.tcp://localhost:4508
to discover service methods.
Upvotes: 3
Views: 1553
Reputation: 3984
This should be above code F# converted to C# i don't realy know the F# language so it could not be working as F# code. But i tested it and it succesfuly route metadata.
using System;
using System.ServiceModel;
using System.ServiceModel.Channels;
using System.ServiceModel.Routing;
using System.ServiceModel.Dispatcher;
using System.ServiceModel.Description;
namespace FSharpRouterInCSharp
{
class Program
{
static ServiceHost createSimpleRouter (Binding createBinding, string routerAddress, string serviceAddress)
{
var routerType = typeof (IRequestReplyRouter);
var routerContract = ContractDescription.GetContract(routerType);
//var endpoint = new ServiceEndpoint(routerContract, createBinding, new EndpointAddress(address));
var serviceEndpoints = new ServiceEndpoint[] { new ServiceEndpoint(routerContract, createBinding, new EndpointAddress(serviceAddress))};
var configuration = new RoutingConfiguration();
configuration.FilterTable.Add(new MatchAllMessageFilter(), serviceEndpoints);
var host = new ServiceHost(typeof (RoutingService));
host.AddServiceEndpoint(routerType, createBinding, routerAddress);
host.Description.Behaviors.Add(new RoutingBehavior(configuration));
return host;
}
static void Main(string[] args)
{
string routerAddress = "net.tcp://localhost:4508/";
string serviceAddress = "net.tcp://remotehost:4508/";
var netTcp = new NetTcpBinding(SecurityMode.None);
var mextTcp = MetadataExchangeBindings.CreateMexTcpBinding();
var tcpRouter = createSimpleRouter(netTcp, routerAddress, serviceAddress);
var mexRouter = createSimpleRouter(mextTcp,routerAddress+"mex",serviceAddress+"mex");
tcpRouter.Open();
mexRouter.Open();
Console.WriteLine("routing ...\n{0} <-> R:{1}", serviceAddress, routerAddress);
Console.ReadKey();
}
}
}
Upvotes: 3
Reputation: 4600
Here's my answer to my question that does exactly what I want - without any XML salad, in less then 50 lines of F#:
namespace CORSIS
module Application =
open System
open System.ServiceModel
open System.ServiceModel.Routing
open System.ServiceModel.Dispatcher
open System.ServiceModel.Description
let createSimpleRouter createBinding (routerAddress : string) serviceAddress =
let routerType = typeof<IRequestReplyRouter>
let routerContract = ContractDescription.GetContract(routerType)
let endpoint address = new ServiceEndpoint(routerContract, createBinding(), new EndpointAddress(address))
let serviceEndpoints = [| endpoint serviceAddress |]
let configuration = new RoutingConfiguration()
configuration.FilterTable.Add(new MatchAllMessageFilter(), serviceEndpoints)
let host = new ServiceHost(typeof<RoutingService>)
ignore <| host.AddServiceEndpoint(routerType, createBinding(), routerAddress)
host.Description.Behaviors.Add(new RoutingBehavior(configuration))
host
[<EntryPoint>]
let main(args) =
let (routerAddress, serviceAddress) =
match args with
| [| ra; sa |] -> (ra, sa)
| _ -> ("net.tcp://localhost:4508/", "net.tcp://remotehost:4508/")
let netTcp() = new NetTcpBinding(SecurityMode.None)
let mexTcp() = MetadataExchangeBindings.CreateMexTcpBinding()
let tcpRouter = createSimpleRouter netTcp routerAddress serviceAddress
let mexRouter = createSimpleRouter mexTcp (routerAddress + "mex") (serviceAddress + "mex")
tcpRouter.Open()
mexRouter.Open()
Console.WriteLine("routing ...\n{0} <-> R:{1}", serviceAddress, routerAddress)
ignore <| Console.ReadKey true
0
Upvotes: 3
Reputation: 2763
http://msdn.microsoft.com/en-us/magazine/cc500646.aspx
Look at Router Contract and Figure 6 A Simple Router Implementation. Although the examples usign basicHttpBinding, it will work for tcp as well. Provide your endpoint details in the attribute section where required...
Upvotes: -1