From: djk <djk>
Date: Fri, 19 Nov 1999 01:52:10 +0000 (+0000)
Subject: added offest to outgoing ping times
X-Git-Tag: R_1_35~17
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=d49641602b7abfa832d6baaf18dc15969040083e;p=spider.git

added offest to outgoing ping times
---

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 486cfa95..b8d56397 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -126,19 +126,23 @@ sub start
 	$self->send_now('B',"0");
 	$self->send_now('E',"0");
 	
+	# ping neighbour node stuff
+	$self->pingint($user->pingint || 3*60);
+	$self->nopings(3);
+	$self->pingtime([ ]);
+
 	# send initialisation string
-	if (!$self->{outbound}) {
+	unless ($self->{outbound}) {
 		$self->send(pc38()) if DXNode->get_all();
 		$self->send(pc18());
+		$self->lastping($main::systime);
+	} else {
 		# remove from outstanding connects queue
 		@main::outstanding_connects = grep {$_->{call} ne $call} @main::outstanding_connects;
+		$self->lastping($main::systime + $self->pingint / 2);
 	}
 	$self->state('init');
 	$self->pc50_t(time);
-	$self->pingint($user->pingint || 3*60);
-	$self->nopings(3);
-	$self->lastping($main::systime);
-	$self->pingtime([ ]);
 
 	Log('DXProt', "$call connected");
 }