--- checkrad.pl	Thu Oct 26 04:35:29 2000
+++ checkrad.pl	Sun Apr 15 01:58:09 2001
@@ -273,9 +273,11 @@
 #
 $csm	 = '.iso.org.dod.internet.private.enterprises.9';
 sub cisco_snmp {
-	$login = snmpget($ARGV[1], $ARGV[5], "$csm.2.9.2.1.18.$ARGV[2]");
+	my $session_id = hex($ARGV[4]);
+	
+	$login = snmpget($ARGV[1], $ARGV[5], "$csm.9.150.1.1.3.1.2.$session_id");
 
-	print LOG "  user at port S$ARGV[2]: $login\n" if ($debug);
+	print LOG "  user with session id $ARGV[4] ($session_id): $login\n" if ($debug);
 
 	($login eq $ARGV[3]) ? 1 : 0;
 }