3

我有一个客户端,它创建 N 个进程并全部连接到这样的服务器:

 send(State = #state{low = Low, high = Low}) ->
 NewState = receive_sockets(0, Low, State),
 NewState;
 send(State = #state{low = Low}) ->
   N = Low rem 10,
   Dest = lists:nth(N + 1, State#state.dest),
   spawn(?MODULE, loop, [self(), Dest, Low]),
   NewState = State#state{low = Low + 1},
   send(NewState).

 loop(From, {IP, Port}, Low) ->
   case gen_tcp:connect(IP, Port, [binary]) of
    {ok, Socket} ->
    gen_tcp:send(Socket, integer_to_binary(Low)),
    From ! {Low, Socket},
    loop1(Socket);
    %%timer:sleep(infinity);
   _Else ->
    io:format("The connection failed ~n"),
    loop(From, {IP, Port}, Low)
   end.

 loop1(Socket) ->
  case gen_tcp:recv(Socket, 0) of
   {ok, Data} ->
    io:format("Received ~n ~p", [Data]),
    loop1(Socket);
   {error, einval} ->
    io:format("error ~n")
 end.

我正在创建许多客户端连接。稍后,服务器可能会向我发送一些数据,所以我正在使用 gen_tcp:recv/2 等待,但我收到 {error, einval}。

另外,我如何使用套接字有什么问题,因为我观察到套接字一旦被接受就会被关闭。

关于为什么的任何输入?

谢谢

4

1 回答 1

6

默认 gen_tcp:connect 使用主动模式,除非在套接字的选项列表中指定 {active, false},在这种情况下通过调用 recv/2 检索数据包。如果您真的想使用 gen_tcp:recv 来处理数据,请使用 {active, false}。请仔细检查“gen_tcp”的手册页,尤其是相对于活动模式的手册页。

于 2016-04-11T07:36:17.073 回答