[mirrorbrain-commits] r8181 - /trunk/tools/scanner.pl

From: <poeml_at_mirrorbrain.org>
Date: Tue, 19 Oct 2010 00:35:09 -0000
Author: poeml
Date: Tue Oct 19 02:35:09 2010
New Revision: 8181

URL: http://svn.mirrorbrain.org/viewvc/mirrorbrain?rev=8181&view=rev
Log:
mb scan:
- When reporting a timeout during a scan via rsync, the name of the affected
  mirror was not reported. The error message was only "rsync timeout", and
  while there usually where other messages indicating which mirror was the
  problem, output is now improved to include the mirror identifier.

Modified:
    trunk/tools/scanner.pl

Modified: trunk/tools/scanner.pl
URL: http://svn.mirrorbrain.org/viewvc/mirrorbrain/trunk/tools/scanner.pl?rev=8181&r1=8180&r2=8181&view=diff
==============================================================================
--- trunk/tools/scanner.pl (original)
+++ trunk/tools/scanner.pl Tue Oct 19 02:35:09 2010
_at_@ -62,7 +62,6 @@
 
 $SIG{USR1} = sub { $verbose++; warn "sigusr1 seen. ++verbose = $verbose\n"; };
 $SIG{USR2} = sub { $verbose--; warn "sigusr2 seen. --verbose = $verbose\n"; };
-$SIG{ALRM} = sub { $verbose++; $verbose++; die "rsync timeout...\n" };
 
 $ENV{FTP_PASSIVE} = 1;	# used in LWP only, Net::FTP ignores this.
 
_at_@ -1110,6 +1109,8 @@
   my $syncaddr = $peer->{addr};
   my $syncport = $peer->{port};
 
+  $SIG{ALRM} = sub { $verbose++; $verbose++; die localtime(time) . " $identifier: rsync timeout...\n" };
+
   if(!defined($peer->{have_md4})) {
     ## why not rely on %INC here?
     $peer->{have_md4} = 0;




_______________________________________________
mirrorbrain-commits mailing list
Archive: http://mirrorbrain.org/archive/mirrorbrain-commits/

Note: To remove yourself from this list, send a mail with the content
 	unsubscribe
to the address mirrorbrain-commits-request_at_mirrorbrain.org
Received on Tue Oct 19 2010 - 00:35:11 GMT

This archive was generated by hypermail 2.3.0 : Tue Oct 19 2010 - 00:47:06 GMT