X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_requests.erl;h=79df04d53f910e99f1ac700a139433daffa2263a;hb=28cbabecbfc2e05861779a19e5a75bddbc0ad416;hp=5c2e538ff8a4cf3fc7bf09a8ceb877e1ec032c4e;hpb=81b3e94e62dd60087d71efc42004f8222d9e1e7a;p=euphorik.git diff --git a/modules/erl/euphorik_requests.erl b/modules/erl/euphorik_requests.erl index 5c2e538..79df04d 100755 --- a/modules/erl/euphorik_requests.erl +++ b/modules/erl/euphorik_requests.erl @@ -9,7 +9,6 @@ tester/0, out/1 ]). - -include_lib("xmerl/include/xmerl.hrl"). -include_lib("yaws/include/yaws_api.hrl"). @@ -20,12 +19,13 @@ tester() -> out(A) -> - %io:format("~p~n~n", [A]), + %io:format("~p~n", [A]), % utilisé parfois pendant le debug IP = case inet:peername(A#arg.clisock) of - {ok, {Adresse, _Port}} -> Adresse; + {ok, {Adresse, _Port}} -> Adresse; _ -> inconnue - end, - %inet:setopts(A#arg.clisock, inet:getopts(A#arg.clisock, [active])), + end, + % passive -> active, permet de recevoir {tcp_closed, _} lorsque le socket se ferme + inet:setopts(A#arg.clisock, [{active, true}]), {value, {_, Contenu}} = lists:keysearch("action", 1, yaws_api:parse_post(A)), Ret = traiter_donnees(Contenu, IP), {content, "application/json", Ret}. @@ -64,5 +64,9 @@ traiter_action("put_troll", JSON, _) -> traiter_action("mod_troll", JSON, _) -> euphorik_protocole:mod_troll(JSON); traiter_action("del_troll", JSON, _) -> - euphorik_protocole:del_troll(JSON). + euphorik_protocole:del_troll(JSON); +traiter_action("list_banned_ips", JSON, _) -> + euphorik_protocole:list_banned_ips(JSON); +traiter_action("unban", JSON, _) -> + euphorik_protocole:unban_ip(JSON). \ No newline at end of file