135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

changed speedmap

Browse Source
This commit is contained in:
Max Baker
2003-07-29 15:32:07 +00:00
parent ea8275677b
commit 81f0b821e3
1 changed files with 17 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
Info.pm
View File

@@ -1505,11 +1505,14 @@ Makes human friendly speed ratings using %SPEED_MAP
'45045000' => 'DS3',
'64000000' => '64 Mbps',
'100000000' => '100 Mbps',
'149760000' => 'OC-1',
'155000000' => 'OC-1',
'149760000' => 'ATM on OC-3',
'155000000' => 'OC-3',
'155519000' => 'OC-3',
'155520000' => 'OC-3',
'400000000' => '400 Mbps',
'599040000' => 'ATM on OC-12',
'622000000' => 'OC-12',
'599040000' => 'OC-12',
'622080000' => 'OC-12',
'1000000000' => '1.0 Gbps',
)
@@ -1530,19 +1533,26 @@ Makes human friendly speed ratings using %SPEED_MAP
'44736000' => 'T3',
'45000000' => '45 Mbps',
'45045000' => 'DS3',
'51850000' => 'OC-1',
'64000000' => '64 Mbps',
'100000000' => '100 Mbps',
'149760000' => 'OC-1',
'155000000' => 'OC-1',
'149760000' => 'ATM on OC-3',
'155000000' => 'OC-3',
'155519000' => 'OC-3',
'155520000' => 'OC-3',
'400000000' => '400 Mbps',
'599040000' => 'ATM on OC-12',
'622000000' => 'OC-12',
'599040000' => 'OC-12',
'622080000' => 'OC-12',
'1000000000' => '1.0 Gbps',
);
sub munge_speed {
my $speed = shift;
return defined $SPEED_MAP{$speed} ? $SPEED_MAP{$speed} : $speed;
my $map = $SPEED_MAP{$speed};
#print " $speed -> $map " if (defined $map);
return $map || $speed;
}
=item munge_ip()