/[mldonkey]/mldonkey/src/networks/donkey/donkeyProtoKademlia.ml
ViewVC logotype

Diff of /mldonkey/src/networks/donkey/donkeyProtoKademlia.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13 by spiralvoice, Tue Oct 25 10:30:58 2005 UTC revision 1.14 by spiralvoice, Thu Oct 27 21:32:53 2005 UTC
# Line 232  module P = struct Line 232  module P = struct
232          peer_ip = ip;          peer_ip = ip;
233          peer_port = udp_port;          peer_port = udp_port;
234          peer_tcpport = tcp_port;          peer_tcpport = tcp_port;
235          peer_kind = 3;          peer_kind = kind;
236            peer_last_recv = 0;
237          peer_last_send = 0;          peer_last_send = 0;
         peer_expire = 0;  
         peer_created = last_time ();  
238        }, pos + 25        }, pos + 25
239    
240      let get_peers_from_results ip port answers =      let get_peers_from_results ip port answers =
# Line 258  module P = struct Line 257  module P = struct
257                    )                    )
258                | Field_UNKNOWN "sourcetype" ->                | Field_UNKNOWN "sourcetype" ->
259                    for_int_tag tag (fun kind ->                    for_int_tag tag (fun kind ->
260                        peer_kind := 3)                        peer_kind := kind)
261                | _ ->                | _ ->
262                  if !verbose_unknown_messages then                  if !verbose_unknown_messages then
263                    lprintf_nl () "Unused source tag [%s]"                    lprintf_nl () "Unused source tag [%s]"
# Line 269  module P = struct Line 268  module P = struct
268              peer_port = !peer_udpport;              peer_port = !peer_udpport;
269              peer_tcpport = !peer_tcpport;              peer_tcpport = !peer_tcpport;
270              peer_md4 = r_md4;              peer_md4 = r_md4;
271                peer_last_recv = 0;
272              peer_last_send = 0;              peer_last_send = 0;
273              peer_expire = 0;              peer_kind = !peer_kind;
             peer_kind = 3;  
             peer_created = last_time ();  
274            }            }
275        ) answers        ) answers
276    

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26