now featuring reduced security on ssh

2 files changed, 8 insertions, 2 deletions

diff --git a/clients/smanagrun.pl b/clients/smanagrun.pl
index a68edf8..30a702d 100755
--- a/clients/smanagrun.pl
+++ b/clients/smanagrun.pl
@@ -127,6 +127,11 @@ while (1) {
 		waitpid($ssh->{pid}, 0);
 		$sunlock->execute($switch->{sysname});
 	};
-	warn $@ if $@;
+	if ($@) {
+		warn $@;
+		$sdelay->execute($@ . ", delaying...", $switch->{sysname});
+		$sunlock->execute($switch->{sysname});
+		$dbh->commit();
+	}
 }
 
diff --git a/include/nms.pm b/include/nms.pm
index 589f7f0..e532a05 100755
--- a/include/nms.pm
+++ b/include/nms.pm
@@ -47,7 +47,8 @@ sub switch_connect_ssh($) {
 	my ($ip) = @_;
 	my $ssh = Net::OpenSSH->new($ip, 
 		user => $nms::config::tacacs_user,
-		password => $nms::config::tacacs_pass);
+		password => $nms::config::tacacs_pass,
+		master_opts => [ "-o", "StrictHostKeyChecking=no" ]);
 	my ($pty, $pid) = $ssh->open2pty({stderr_to_stdout => 1})
 		or die "unable to start remote shell: " . $ssh->error;