tcp - 使用Ninenine牧场实现Long live tcp连接

我正在尝试使用ninnenine rancherlang library 实现一个长期有效的TCP连接。
但看看文件，我看不出有什么办法可以做到这一点。
我也写了我自己的牧场协议，如下所示

   start_link(Ref, _Socket, Transport, Opts) ->
        Pid = spawn_link(?MODULE, init, [Ref, Transport, Opts]),
        {ok, Pid}.

    init(Ref, Transport, _Opts = []) ->
        {ok, Socket} = ranch:handshake(Ref),
        loop(Socket, Transport).

    loop(Socket, Transport) ->
        case Transport:recv(Socket, 0, 5000) of
          {ok, Data} when Data =/= <<4>> ->
          %% Transport:send(Socket, Data),
          io:format("~w Connction accpted~n", [Data]);
          _ -> ok
               %%, Transport:close(Socket)
        end.

如您所见，我已经对Transport:close(Socket)进行了评论，并且我没有向客户发送任何响应，因为Transsport:send(socket,Data)也被评论认为这将解决问题，但仍然是，我的连接在打开时立即关闭。我有一个golang客户，如下所示

package main
import (
    "fmt"
    "log"
    "net"

)

    func main(){
        conn, err := net.Dial("tcp", "localhost:5555")
                if err != nil {
                    fmt.Println(err)
                }
                fmt.Println(conn /*, i*/)
                conn.Write(XMLData)
                buffer := make([]byte, 10024)
                n, err := conn.Read(buffer)
                fmt.Println(buffer[:n])
                //conn.Close()

    }

我想是牧场的一段时间造成的。我搜索了一下，发现在ranch中，在src/ranch_tcp.erl文件中，我们实现了如下函数listen

listen(Opts) ->
Opts2 = ranch:set_option_default(Opts, backlog, 1024),
Opts3 = ranch:set_option_default(Opts2, nodelay, true),
Opts4 = ranch:set_option_default(Opts3, send_timeout, 30000),
Opts5 = ranch:set_option_default(Opts4, send_timeout_close, true),
%% We set the port to 0 because it is given in the Opts directly.
%% The port in the options takes precedence over the one in the
%% first argument.
gen_tcp:listen(0, ranch:filter_options(Opts5, disallowed_listen_options(),
    [binary, {active, false}, {packet, raw}, {reuseaddr, true}])).

如您所见，有一个超时选项，特别是opts5Opts5 = ranch:set_option_default(Opts4, send_timeout_close, true)和opts4Opts4 = ranch:set_option_default(Opts3, send_timeout, 30000),。我禁用了它们，但仍然不工作。所以我该怎么做才能使用ranch建立一个长期有效的TCP连接呢？

最佳答案

您的协议实现有一个缺陷
loop(Socket, Transport) -> case Transport:recv(Socket, 0, 5000) of {ok, Data} when Data =/= <<4>> -> %% Transport:send(Socket, Data), io:format("~w Connction accpted~n", [Data]); _ -> ok %%, Transport:close(Socket) end.
在case子句的任何分支中都不会递归调用loop/2，因此当loop/2返回关闭tcp连接时，协议进程将终止。