Clojure TCP客户端的测试工具

Question

我正在编写一个TCP客户机，用于连接繁忙网络上的节点、向其发送消息以及从节点读取响应。我无法访问在这些节点上运行的代码，因此我必须非常小心地塑形我通过网络发送的TCP消息。

我已经决定从网络上收集一堆实时TCP数据，并将其用作测试客户端的基础-给定这些输入参数，确保传输的二进制呈现为我期望看到的十六进制。

此时，我将启动Wireshark并弄清楚如何过滤我要发送的数据包，或者实现一个真正简单的TCP服务器，它等待连接，将传输的二进制数据发送到磁盘(可能处理为十六进制)，然后测试我发送的是我期望发送的内容；这两种方法都不是健壮的或专业的解决方案。

那么:您建议如何为TCP客户端设置测试工具，以验证输出的十六进制消息是否正确？

Answer 1

您应该查看tcp的aleph和协议的gloss。这是一个tutorial和一个example。

简单的tcp回应服务器可以是：

(defn echo-handler [ch client-info]
  (siphon ch ch)) ;; a simple echo handler

(defn start-server [] (start-tcp-server
                       echo-handler
                       {:port 9997}))
(start-server) 

如果您在其中对协议进行编码并使用"decode“，那么在将接收到的消息作为十六进制转储或值的时候，gloss将非常有用。