patch #8106
[mldonkey.git] / src / networks / donkey / donkeyClient.mli
blob4b081e730a0b4dbedc7fa3e406d0d1756227702f
1 (* Copyright 2001, 2002 b8_bavard, b8_fee_carabine, INRIA *)
2 (*
3 This file is part of mldonkey.
5 mldonkey is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
10 mldonkey is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with mldonkey; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 open Md4
22 val query_id : Ip.t -> int -> int64 -> unit
23 (*val query_id :
24 DonkeyTypes.server -> TcpBufferedSocket.t -> int64 ->
25 DonkeyTypes.file option -> unit *)
27 val query_locations_reply : DonkeyTypes.server ->
28 DonkeyProtoServer.QueryLocationReply.t -> unit
30 val reconnect_client : DonkeyTypes.client -> unit
31 val client_connection_handler : bool -> 'a -> TcpServerSocket.event -> unit
33 (* val query_files : DonkeyTypes.client -> TcpBufferedSocket.t -> unit *)
35 val client_wants_file : DonkeyTypes.client -> Md4.t -> unit
37 val clean_groups : unit -> unit
39 val client_send_if_possible : DonkeyTypes.client -> TcpBufferedSocket.t ->
40 DonkeyProtoClient.t -> unit
43 val clean_requests : unit -> unit
45 val disconnect_client : DonkeyTypes.client -> BasicSocket.close_reason -> unit
47 val add_source : DonkeyTypes.file -> Ip.t -> int -> Ip.t -> int -> unit