From a505626101e262be2cd5a8c74c44d3616c299519 Mon Sep 17 00:00:00 2001
From: Tar Committer <tar@ocjtech.us>
Date: Wed, 23 Aug 2000 20:13:31 +0000
Subject: Imported from rancid-1.5.tar.gz.

---
 bin/francid | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

(limited to 'bin/francid')

diff --git a/bin/francid b/bin/francid
index 3050aee..54aae8d 100755
--- a/bin/francid
+++ b/bin/francid
@@ -30,7 +30,7 @@ $file = $opt_f;
 $host = $ARGV[0];
 $clean_run = 0;
 $found_end = 0;
-$timeo = 90;			# clogin timeout in seconds
+$timeo = 90;			# flogin timeout in seconds
 
 # This routine is used to print out the router configuration
 sub ProcessHistory {
@@ -172,6 +172,7 @@ sub ShowChassis {
 	tr/\015//d;
 	last if (/^$prompt/);
 	next if (/ from /);
+	next if (/current temperature/i);
 	ProcessHistory("CHASSIS","","","! $_");
     }
     ProcessHistory("CHASSIS","","","!\n");
@@ -327,7 +328,7 @@ if ($file) {
     }
 }
 
-while(<INPUT>) {
+TOP: while(<INPUT>) {
     tr/\015//d;
     if (/\#exit$/) {
 	$clean_run=1;
@@ -347,13 +348,13 @@ while(<INPUT>) {
 	if (! defined($commands{$cmd})) {
 	    print STDERR "found unexpected command - \"$cmd\"\n";
 	    $clean_run = 0;
-	    last;
+	    last TOP;
 	}
 	$rval = &{$commands{$cmd}};
 	delete($commands{$cmd});
 	if ($rval == -1) {
 	    $clean_run = 0;
-	    last;
+	    last TOP;
 	}
     }
 }
-- 
cgit