135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix snmpv3 autovivication bug setting priv strings

Browse Source
This commit is contained in:
Oliver Gorwits
2014-01-24 23:54:40 +00:00
parent a0789929b9
commit 16667532a6
2 changed files with 14 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
Netdisco/Changes
View File

@@ -15,6 +15,7 @@
* [#85] device property in _no/_only fails with error (R. Kerr) * [#85] device property in _no/_only fails with error (R. Kerr)
* Also prefer port filter when linking to connected devices * Also prefer port filter when linking to connected devices
* Fix SQL logic in PortMAC.pm (imperfectus) * Fix SQL logic in PortMAC.pm (imperfectus)
* Fix snmpv3 autovivication bug setting priv strings (LT)
2.021001 2.021001

21
Netdisco/lib/App/Netdisco/Util/SNMP.pm
View File

@@ -218,17 +218,22 @@ sub _mk_info_commargs {
return (Community => $comm->{community}) return (Community => $comm->{community})
if exists $comm->{community}; if exists $comm->{community};
my $seclevel = (exists $comm->{auth} ? my $seclevel =
(exists $comm->{priv} ? 'authPriv' : 'authNoPriv' ) (exists $comm->{auth} ?
: 'noAuthNoPriv'); (exists $comm->{priv} ? 'authPriv' : 'authNoPriv' )
: 'noAuthNoPriv');
return ( return (
SecName => $comm->{user}, SecName => $comm->{user},
SecLevel => $seclevel, SecLevel => $seclevel,
AuthProto => uc (eval { $comm->{auth}->{proto} } || 'MD5'), ( exists $comm->{auth} ? (
AuthPass => (eval { $comm->{auth}->{pass} } || ''), AuthProto => uc ($comm->{auth}->{proto} || 'MD5'),
PrivProto => uc (eval { $comm->{priv}->{proto} } || 'DES'), AuthPass => ($comm->{auth}->{pass} || ''),
PrivPass => (eval { $comm->{priv}->{pass} } || ''), ( exists $comm->{priv} ? (
PrivProto => uc ($comm->{priv}->{proto} || 'DES'),
PrivPass => ($comm->{priv}->{pass} || ''),
) : ()),
) : ()),
); );
} }