Use CISCO-AAA-SESSION-MIB in snmpfinger

diff --git a/Changelog b/Changelog
index 012e1144b0fd2998e1c512a07cdadf9cd2db34e2..21f3c34b5698fb1d81f0066628e937d60dc8badf 100644 (file)
--- a/Changelog
+++ b/Changelog
@@ -13,6 +13,7 @@ Ver 1.60:
   used for initialization).
 * html fixes in accounting.php3
 * Fix a problem in user_accounting when NASIPAddress is not set.
+* Use CISCO-AAA-SESSION-MIB in snmpfinger
 Ver 1.59:
 * Small html fixes in user_edit.php3 and password.php3
 * Show number of failed logins in the last 7 days in the user admin page

diff --git a/bin/snmpfinger b/bin/snmpfinger
index 94353f9efb1ce1864018e94d6352dc5dc2505652..6d9ca805f2610511e1dd2feb8322b91d2c0f74fa 100755 (executable)
--- a/bin/snmpfinger
+++ b/bin/snmpfinger
@@ -1,11 +1,14 @@
 #!/usr/bin/perl
 
-$SNMPWALK="/usr/bin/snmpwalk";
+$SNMPWALK="/usr/local/snmpd/bin/snmpwalk";
 $host=shift;
 $comm=shift || 'public';
 
-$walk =`$SNMPWALK $host $comm .iso.org.dod.internet.private.enterprises.9.2.9.2.1.18`;
-$walk.=`$SNMPWALK $host $comm .iso.org.dod.internet.private.enterprises.9.9.27.1.1.3.1.7`;
+$walk =`$SNMPWALK $host $comm .iso.org.dod.internet.private.enterprises.9.9.150.1.1.3.1.2`;
+if ($walk =~ /^$/){
+       $walk =`$SNMPWALK $host $comm .iso.org.dod.internet.private.enterprises.9.2.9.2.1.18`;
+       $walk.=`$SNMPWALK $host $comm .iso.org.dod.internet.private.enterprises.9.9.27.1.1.3.1.7`;
+}
 
 while($walk=~/\"([\w\-]+?)\"/g){
  $user=lc($1);