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} が発生します。
また、ソケットが受け入れられるとすぐに閉じられることを観察しているため、ソケットの使用方法に問題はありますか。
理由についての入力はありますか?
ありがとう