Increase ping timeout to 30 seconds

This commit is contained in:
obscuren 2014-06-15 00:04:18 +02:00
parent 6d52da58d9
commit b0e023e432
1 changed files with 2 additions and 3 deletions

View File

@ -19,7 +19,7 @@ const (
// Current protocol version
ProtocolVersion = 20
// Interval for ping/pong message
pingPongTimer = 1 * time.Second
pingPongTimer = 2 * time.Second
)
type DiscReason byte
@ -266,14 +266,13 @@ out:
select {
// Main message queue. All outbound messages are processed through here
case msg := <-p.outputQueue:
p.writeMessage(msg)
p.lastSend = time.Now()
// Ping timer
case <-pingTimer.C:
timeSince := time.Since(time.Unix(p.lastPong, 0))
if !p.pingStartTime.IsZero() && p.lastPong != 0 && timeSince > (pingPongTimer+10*time.Second) {
if !p.pingStartTime.IsZero() && p.lastPong != 0 && timeSince > (pingPongTimer+30*time.Second) {
ethutil.Config.Log.Infof("[PEER] Peer did not respond to latest pong fast enough, it took %s, disconnecting.\n", timeSince)
p.Stop()
return