Can't point FUNC at a method, must override in a method.
This commit is contained in:
@@ -94,9 +94,6 @@ $VERSION = '1.05';
|
|||||||
# RADLAN-HWENVIROMENT:rlEnvMonFanStatusTable
|
# RADLAN-HWENVIROMENT:rlEnvMonFanStatusTable
|
||||||
'dell_fan_state' => 'rlEnvMonFanState',
|
'dell_fan_state' => 'rlEnvMonFanState',
|
||||||
'dell_fan_desc' => 'rlEnvMonFanStatusDescr',
|
'dell_fan_desc' => 'rlEnvMonFanStatusDescr',
|
||||||
# Normal BRIDGE-MIB not working? Use Q-BRIDGE-MIB for macsuck
|
|
||||||
'fw_mac' => 'qb_fw_mac',
|
|
||||||
'fw_port' => 'qb_fw_port',
|
|
||||||
);
|
);
|
||||||
|
|
||||||
|
|
||||||
@@ -185,6 +182,21 @@ sub i_duplex_admin {
|
|||||||
return \%i_duplex_admin;
|
return \%i_duplex_admin;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
# Normal BRIDGE-MIB not working? Use Q-BRIDGE-MIB for macsuck
|
||||||
|
sub fw_mac {
|
||||||
|
my $dell = shift;
|
||||||
|
my $partial = shift;
|
||||||
|
|
||||||
|
return $dell->qb_fw_mac($partial);
|
||||||
|
}
|
||||||
|
|
||||||
|
sub fw_port {
|
||||||
|
my $dell = shift;
|
||||||
|
my $partial = shift;
|
||||||
|
|
||||||
|
return $dell->qb_fw_port($partial);
|
||||||
|
}
|
||||||
|
|
||||||
1;
|
1;
|
||||||
__END__
|
__END__
|
||||||
|
|
||||||
|
|||||||
@@ -64,10 +64,6 @@ $VERSION = '1.05';
|
|||||||
%SNMP::Info::CDP::FUNCS,
|
%SNMP::Info::CDP::FUNCS,
|
||||||
%SNMP::Info::LLDP::FUNCS,
|
%SNMP::Info::LLDP::FUNCS,
|
||||||
%SNMP::Info::MAU::FUNCS,
|
%SNMP::Info::MAU::FUNCS,
|
||||||
# Normal BRIDGE-MIB has issues on some devices, duplicates and
|
|
||||||
# non-increasing oids, Use Q-BRIDGE-MIB for macsuck
|
|
||||||
'fw_mac' => 'qb_fw_mac',
|
|
||||||
'fw_port' => 'qb_fw_port',
|
|
||||||
);
|
);
|
||||||
|
|
||||||
%MUNGE = (
|
%MUNGE = (
|
||||||
@@ -155,6 +151,22 @@ sub i_duplex_admin {
|
|||||||
return $enterasys->mau_i_duplex_admin($partial);
|
return $enterasys->mau_i_duplex_admin($partial);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
# Normal BRIDGE-MIB has issues on some devices, duplicates and
|
||||||
|
# non-increasing oids, Use Q-BRIDGE-MIB for macsuck
|
||||||
|
sub fw_mac {
|
||||||
|
my $enterasys = shift;
|
||||||
|
my $partial = shift;
|
||||||
|
|
||||||
|
return $enterasys->qb_fw_mac($partial);
|
||||||
|
}
|
||||||
|
|
||||||
|
sub fw_port {
|
||||||
|
my $enterasys = shift;
|
||||||
|
my $partial = shift;
|
||||||
|
|
||||||
|
return $enterasys->qb_fw_port($partial);
|
||||||
|
}
|
||||||
|
|
||||||
# Use CDP and/or LLDP
|
# Use CDP and/or LLDP
|
||||||
|
|
||||||
sub hasCDP {
|
sub hasCDP {
|
||||||
|
|||||||
Reference in New Issue
Block a user