From e87e076b6ae38252bdfd3cd9445b9fd347485aeb Mon Sep 17 00:00:00 2001 From: Eric Miller <> Date: Wed, 10 Oct 2007 02:28:00 +0000 Subject: [PATCH] Use Q-BRIDGE-MIB for macsuck from bridge class rather than defining our own. --- Info/Layer3/Dell.pm | 24 ++---------------------- 1 file changed, 2 insertions(+), 22 deletions(-) diff --git a/Info/Layer3/Dell.pm b/Info/Layer3/Dell.pm index 9404d2ae..fd1b7586 100644 --- a/Info/Layer3/Dell.pm +++ b/Info/Layer3/Dell.pm @@ -95,7 +95,8 @@ $VERSION = '1.05'; 'dell_fan_state' => 'rlEnvMonFanState', 'dell_fan_desc' => 'rlEnvMonFanStatusDescr', # Normal BRIDGE-MIB not working? Use Q-BRIDGE-MIB for macsuck - 'fw_port' => 'dot1qTpFdbPort', + 'fw_mac' => 'qb_fw_mac', + 'fw_port' => 'qb_fw_port', ); @@ -184,27 +185,6 @@ sub i_duplex_admin { return \%i_duplex_admin; } -# dot1qTpFdbAddress doesn't return values but is used as the index for the table -# so extract mac from index of dot1qTpFdbPort -sub fw_mac { - my $dell = shift; - - my $dell_fw_port = $dell->fw_port(); - - my %fw_mac; - foreach my $iid (keys %$dell_fw_port){ - # iid is dot1qFdbId.dot1qTpFdbAddress so strip dot1qFdbId - my $mac = $iid; - $mac =~ s/^\d+\.//; - # Convert the remaining 0.254.123.456 index entry to a MAC address. - $mac = join(':',map {sprintf("%02x",$_)} split(/\./,$mac)); - next unless defined $mac; - - $fw_mac{$iid}=$mac; - } - return \%fw_mac; -} - 1; __END__