/[mldonkey]/mldonkey/src/daemon/common/commonSwarming2.ml
ViewVC logotype

Diff of /mldonkey/src/daemon/common/commonSwarming2.ml

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

revision 1.13 by spiralvoice, Sun Aug 7 12:57:21 2005 UTC revision 1.14 by spiralvoice, Mon Aug 8 16:47:30 2005 UTC
# Line 1115  let verify_chunk t i = Line 1115  let verify_chunk t i =
1115                        s.s_verified_bitmap.[i] = '2'                        s.s_verified_bitmap.[i] = '2'
1116                    ) t.t_t2s_blocks.(i) then begin                    ) t.t_t2s_blocks.(i) then begin
1117    
1118                        if !verbose_hidden_errors then
1119                      lprintf_nl () "Complete block %d of %s is corrupted (wrong hash), block is being resetted."                      lprintf_nl () "Complete block %d of %s is corrupted (wrong hash), block is being resetted."
1120                              i (file_best_name t.t_file);                              i (file_best_name t.t_file);
1121    
# Line 2340  let received (up : uploader) (file_begin Line 2341  let received (up : uploader) (file_begin
2341                        string_len < string_length then begin                        string_len < string_length then begin
2342                          if !verbose_hidden_errors then                          if !verbose_hidden_errors then
2343                          begin                          begin
2344                          lprintf_nl () "BAD WRITE";                          lprintf_nl () "BAD WRITE for range %Ld-%Ld (string_pos %d)"
                         lprintf_nl () "   for range %Ld-%Ld (string_pos %d)"  
2345                            r.range_begin r.range_end string_pos;                            r.range_begin r.range_end string_pos;
   
2346                          lprintf_nl () "  received: file_pos:%Ld string:%d %d"                          lprintf_nl () "  received: file_pos:%Ld string:%d %d"
2347                            file_begin string_begin string_len;                            file_begin string_begin string_len;
2348                          lprintf_nl () "  ranges:";                          lprintf_nl () "  ranges:";
# Line 2863  it is verified as soon as possible. *) Line 2862  it is verified as soon as possible. *)
2862                if p = present then begin                if p = present then begin
2863                    lprintf_nl () "ERROR: both appear to be the same!";                    lprintf_nl () "ERROR: both appear to be the same!";
2864                  end;                  end;
2865                  if !exit_on_error then exit 2
   
   
 (*          exit 2 *)  
2866              end              end
2867    
2868          with e -> ());          with e -> ());

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