cdo/study-system
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Compare commits

base: cdo:6b53dd1526cef48ff4ecb22d988bcdc8287f2875
Branches Tags
cdo:main
..
compare: cdo:b5c8bf757d61466d8488cf0e11518963e76c9eb5
Branches Tags
cdo:main

3 Commits
6b53dd1526 ... b5c8bf757d

Author SHA1 Message Date
Camden Dixie O'Brien
b5c8bf757d Remove unused acceptor field from tcp_server state 2025-02-25 22:24:07 +00:00
Camden Dixie O'Brien
b394f7eb7f Make proto_sup strategy less strict 2025-02-25 22:23:40 +00:00
Camden Dixie O'Brien
15828b697d Add timeouts to transport_accept and handshake in tcp_server 2025-02-25 22:17:50 +00:00
2 changed files with 3 additions and 3 deletions
Expand all files Collapse all files

4
server/src/session_server.erl
View File

@@ -12,7 +12,7 @@ start_link(Socket) ->
gen_server:start_link(?MODULE, Socket, []). gen_server:start_link(?MODULE, Socket, []).
init(Socket) -> init(Socket) ->
ok = ssl:setopts(Socket, [{active, true}]), ssl:setopts(Socket, [{active, true}]),
{ok, #{socket => Socket}}. {ok, #{socket => Socket}}.
handle_call(_Request, _From, State) -> handle_call(_Request, _From, State) ->
@@ -26,7 +26,7 @@ handle_info({ssl, Socket, Data}, State) ->
{ok, {foo, _}} -> {ok, {foo, _}} ->
{ok, Encoded} {ok, Encoded}
= 'StudySystemProtocol':encode('Response', {msg, "Foo"}), = 'StudySystemProtocol':encode('Response', {msg, "Foo"}),
ok = ssl:send(Socket, Encoded); ssl:send(Socket, Encoded);
Result -> Result ->
io:format("Invalid message: ~p~n", [Result]), io:format("Invalid message: ~p~n", [Result]),
ok ok

2
server/src/tcp_server.erl
View File

@@ -30,7 +30,7 @@ handle_cast(_Msg, State) ->
{noreply, State}. {noreply, State}.
handle_info(accept, State = #state{socket = Socket}) -> handle_info(accept, State = #state{socket = Socket}) ->
case ssl:transport_accept(Socket) of case ssl:transport_accept(Socket, 5000) of
{ok, TlsSocket} -> {ok, TlsSocket} ->
self() ! {handshake, TlsSocket}, self() ! {handshake, TlsSocket},
self() ! accept; self() ! accept;