(RADIATOR) New Cisco SNMP query
Hugh Irvine
hugh at open.com.au
Tue Nov 11 19:10:17 CST 2003
Hello again Vangelis -
BTW - here is an excellent overview of the Session MIB:
http://www.cisco.com/univercd/cc/td/doc/product/software/ios121/
121newft/121t/121t3/dt_asmib.htm
Note that the "aaa session-mib disconnect" is only needed if you are
going to enable disconnection of sessions via SNMP.
Thanks again.
regards
Hugh
On 11/11/2003, at 10:22 PM, Vangelis Kyriakakis wrote:
> You also need to add the following aaa command:
>
> aaa session-mib disconnect
>
> Regards
> Vangelis
>
> Vangelis Kyriakakis wrote:
>
>> Hello,
>>
>> With Cisco IOS 12.2.15T there is a new SNMP OID that gives the
>> users that are connected according to the Decimal Acct-Session-Id.
>> So with this OID you can always use snmpget to check if a user is
>> still online. This works for Async, ISDN and ADSL users. You need to
>> use the Decimal form of the Acct-Session-Id not the Hexadecimal. We
>> use an SQL Session database and we do the conversion there. I don't
>> know if there is a Hextoint function in Perl
>>
>> Regards
>> Vangelis
>>
>>
>> package Radius::Nas::Cisco;
>> use Radius::SNMP;
>> use strict;
>>
>> # The Cisco SNMP MIB
>> $Radius::Nas::CiscoMIB =
>> '.iso.org.dod.internet.private.enterprises.9';
>>
>> sub isOnline
>> {
>> my ($name, $nas_id, $nas_port, $session_id, $client) = @_;
>>
>> return 1 unless &Radius::SNMP::snmpgetprogExists();
>>
>> &main::log($main::LOG_DEBUG, "Cisco: Checking $session_id->
>> $nas_id:$nas_port:$name" );
>>
>> my $result = &Radius::SNMP::snmpget
>> ($nas_id,
>> $client->{SNMPCommunity},
>> "$Radius::Nas::CiscoMIB.9.150.1.1.3.1.2.$session_id");
>>
>> return 1 if (!$result || $result =~ /no response/i); # Could
>> not SNMP. Assume still there
>> return uc($1) eq uc($name)
>> if ($result =~ /^.*\"([^"]+)".*$/);
>>
>> return 0; # not there
>> }
>>
>> 1;
>>
>>
>> ===
>> Archive at http://www.open.com.au/archives/radiator/
>> Announcements on radiator-announce at open.com.au
>> To unsubscribe, email 'majordomo at open.com.au' with
>> 'unsubscribe radiator' in the body of the message.
>>
>
>
> ===
> Archive at http://www.open.com.au/archives/radiator/
> Announcements on radiator-announce at open.com.au
> To unsubscribe, email 'majordomo at open.com.au' with
> 'unsubscribe radiator' in the body of the message.
>
>
NB: have you included a copy of your configuration file (no secrets),
together with a trace 4 debug showing what is happening?
--
Radiator: the most portable, flexible and configurable RADIUS server
anywhere. Available on *NIX, *BSD, Windows, MacOS X.
-
Nets: internetwork inventory and management - graphical, extensible,
flexible with hardware, software, platform and database independence.
-
CATool: Private Certificate Authority for Unix and Unix-like systems.
===
Archive at http://www.open.com.au/archives/radiator/
Announcements on radiator-announce at open.com.au
To unsubscribe, email 'majordomo at open.com.au' with
'unsubscribe radiator' in the body of the message.
More information about the radiator
mailing list