25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-11-28 16:34:13 +01:00

* src/extauth.erl: Log strange responses from extauth script. Use

timeout (EJAB-627)

SVN Revision: 1330
This commit is contained in:
Badlop 2008-05-17 11:44:25 +00:00
parent c892a60da5
commit 4e77bae206
2 changed files with 18 additions and 1 deletions

View File

@ -1,3 +1,12 @@
2008-05-17 Badlop <badlop@process-one.net>
* src/extauth.erl: Log strange responses from extauth script. Use
timeout (EJAB-627)
2008-05-16 Badlop <badlop@process-one.net>
* src/mod_muc/mod_muc_room.erl: Allow change_state of a room
2008-05-16 Christophe Romain <christophe.romain@process-one.net> 2008-05-16 Christophe Romain <christophe.romain@process-one.net>
* src/ejabberd_s2s_out.erl: Change FSMTIMEOUT to 30s * src/ejabberd_s2s_out.erl: Change FSMTIMEOUT to 30s

View File

@ -32,6 +32,8 @@
-include("ejabberd.hrl"). -include("ejabberd.hrl").
-define(CALL_TIMEOUT, 30000). % Timeout is in milliseconds: 30 seconds == 30000
start(Host, ExtPrg) -> start(Host, ExtPrg) ->
spawn(?MODULE, init, [Host, ExtPrg]). spawn(?MODULE, init, [Host, ExtPrg]).
@ -67,7 +69,13 @@ loop(Port) ->
Port ! {self(), {command, encode(Msg)}}, Port ! {self(), {command, encode(Msg)}},
receive receive
{Port, {data, Data}} -> {Port, {data, Data}} ->
Caller ! {eauth, decode(Data)} ?DEBUG("extauth call '~p' received data response:~n~p", [Msg, Data]),
Caller ! {eauth, decode(Data)};
{Port, Other} ->
?ERROR_MSG("extauth call '~p' received strange response:~n~p", [Msg, Other])
after
?CALL_TIMEOUT ->
?ERROR_MSG("extauth call '~p' didn't receive response~n", [Msg])
end, end,
loop(Port); loop(Port);
stop -> stop ->