From 9abf15e9b838ad1164030fe953b407c97eb8cbce Mon Sep 17 00:00:00 2001
From: Andrew DeFaria <Andrew@DeFaria.com>
Date: Sun, 21 Feb 2021 11:52:09 -0800
Subject: [PATCH] Reset retryattempts when successfully reestablishing tunnel

---
 bin/tunnel.pl | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/bin/tunnel.pl b/bin/tunnel.pl
index 2ee85f0..56be859 100755
--- a/bin/tunnel.pl
+++ b/bin/tunnel.pl
@@ -124,6 +124,8 @@ sub interrupt {
    Report "Tunnel killed unexpectedly", 1;
 
    kill 'INT', $ssh->get_master_pid;
+
+   return;
 } # interrupt
 
 sub tunnel() {
@@ -142,6 +144,7 @@ RETRY:
 
   Report("Unable to establish ssh tunnel " . $ssh->error, 1) if $ssh->error;
 
+  # Check to see if address is already in use
   my @lines = <$fh>;
 
   close $fh;
@@ -158,6 +161,9 @@ RETRY:
 
     $log->msg($msg);
 
+    # Reset retry attempts since we reestablished the tunnel
+    $retryattempts = 0 if $retryattempts;
+
     # Wait for master to exit
     waitpid($ssh->get_master_pid, WUNTRACED);
 
@@ -168,6 +174,8 @@ RETRY:
 
     Report 'Ssh tunnel terminated unexpectedly - Attempting restart';
 
+    undef $ssh;
+
     goto RETRY;
   } # if
 
-- 
2.17.1