2

我正在尝试使用带有 NetMQ + 控制套接字的 XPUB/XSUB 模式实现集线器(以控制集线器的行为)。我使用代理、NetMqPoller,并想使用控制套接字。但无论我尝试什么 - 它都不起作用。这是我的代码,任何想法为什么它不起作用?

    Using xpubSocket As New XPublisherSocket("@tcp://127.0.0.1:1234")
        Using xsubSocket As New XSubscriberSocket("@tcp://127.0.0.1:5678")
            Using plr As New NetMQPoller()
                Using ctrlIn As New StreamSocket(">tcp://127.0.0.1:5678")
                    AddHandler ctrlIn.ReceiveReady, AddressOf ctrlIn_ReceiveReady

                    plr.Add(xpubSocket)
                    plr.Add(xsubSocket)
                    plr.Add(ctrlIn)

                    Dim proxy As New Proxy(xsubSocket, xpubSocket, ctrlIn, plr)
                    proxy.Start()

                    plr.Run()
                End Using
            End Using
        End Using
    End Using

还有一种方法可以在每次 ctrlIn 套接字接收数据时运行:

Sub ctrlIn_ReceiveReady(sender As Object, e As NetMQSocketEventArgs)
    Dim bytes() As Byte

    While (e.Socket.TryReceiveFrameBytes(bytes))
        Console.WriteLine("Received {0} bytes.", bytes.Length)
    End While
End Sub

现在简短说明:集线器(XPUB/XSUB)完美运行,即当我启动发布者和订阅者时 - 我可以看到消息在流动。但是控制套接字不起作用,我得到的只是其中的两条消息:

Received 5 bytes.
Received 10 bytes.

在那之后 - 控制套接字保持沉默,没有更多的字节流过它。有谁知道我错在哪里?或者也许任何人都可以指出一个可行的例子?我一直在寻找一个例子,但找不到任何控制插座工作的东西。

4

1 回答 1

2

为什么是Stream类型的控制socket?此外,您应该在控制套接字的另一端有另一个套接字,现在您正在将 Stream 类型的控制套接字连接到 Publisher,Stream 和 Publisher 无法相互通信。

尝试这样的事情(抱歉语法错误,不是 VB 开发人员)

Using xpubSocket As New XPublisherSocket("@tcp://127.0.0.1:1234")
    Using xsubSocket As New XSubscriberSocket("@tcp://127.0.0.1:5678")
        Using plr As New NetMQPoller()
            Using ctrlOut As New Dealer("@inproc://control")
                Using ctrlIn As New Dealer(">inproc://control")
                    AddHandler ctrlIn.ReceiveReady, AddressOf ctrlIn_ReceiveReady

                    plr.Add(xpubSocket)
                    plr.Add(xsubSocket)
                    plr.Add(ctrlIn)

                    Dim proxy As New Proxy(xsubSocket, xpubSocket, ctrlOut, plr)
                    proxy.Start()

                    plr.Run()
            End Using
        End Using
    End Using
End Using
于 2016-08-06T08:40:43.470 回答