--- src/networks/donkey/donkeyClient.ml 2 Jun 2003 17:39:20 -0000 1.8 +++ src/networks/donkey/donkeyClient.ml 4 Jun 2003 22:05:54 -0000 @@ -1649,6 +1649,14 @@ connection_ok c.client_connection_control; c.client_tags <- t.CR.tags; + if String2.subcontains c.client_name "Mison" then begin + direct_client_send c ( + M.SayReq "[AUTOMATED WARNING] Desole, vous n'avez rien compris au P2P"); + set_client_state c BlackListedHost; + lprintf "Client[0]: banned (Mison)\n" (client_num c); + raise Not_found + end; + if !!reliable_sources && ip_reliability (peer_ip sock) = Reliability_suspicious 0 then begin set_client_state c BlackListedHost;