fix namespace snmp_connect_ip()

This commit is contained in:
Eric Miller
2006-04-07 02:46:04 +00:00
parent 07db467827
commit eeac8fd9a2
2 changed files with 6 additions and 6 deletions

View File

@@ -117,13 +117,13 @@ sub root_ip {
foreach my $key (keys %$ospf_ip){
my $ip = $ospf_ip->{$key};
next if $ip eq '0.0.0.0';
next unless $l3->_snmp_connect_ip($ip);
next unless $l3->snmp_connect_ip($ip);
print " SNMP::Layer3::root_ip() using $ip\n" if $l3->debug();
return $ip;
}
}
return $router_ip if ( (defined $router_ip) and ($router_ip ne '0.0.0.0') and ($l3->_snmp_connect_ip($router_ip)) );
return $router_ip if ( (defined $router_ip) and ($router_ip ne '0.0.0.0') and ($l3->snmp_connect_ip($router_ip)) );
return undef;
}

View File

@@ -410,12 +410,12 @@ sub root_ip {
my $ip = $rc_ip_addr->{$iid};
next unless defined $ip;
return $ip if $passport->_snmp_connect_ip($ip);
return $ip if $passport->snmp_connect_ip($ip);
}
# Return Management Virtual IP address
if ( (defined $virt_ip) and ($virt_ip ne '0.0.0.0') ) {
return $virt_ip if $passport->_snmp_connect_ip($virt_ip);
return $virt_ip if $passport->snmp_connect_ip($virt_ip);
}
}
@@ -424,7 +424,7 @@ sub root_ip {
foreach my $iid (keys %$rc_ip_addr){
my $ip = $rc_ip_addr->{$iid};
next unless $router_ip eq $ip;
return $router_ip if $passport->_snmp_connect_ip($router_ip);
return $router_ip if $passport->snmp_connect_ip($router_ip);
}
}
@@ -433,7 +433,7 @@ sub root_ip {
my $port = $sonmp_topo_port->{$entry};
next unless $port == 0;
my $ip = $sonmp_topo_ip->{$entry};
return $ip if ( (defined $ip) and ($ip ne '0.0.0.0') and ($passport->_snmp_connect_ip($ip)) );
return $ip if ( (defined $ip) and ($ip ne '0.0.0.0') and ($passport->snmp_connect_ip($ip)) );
}
return undef;
}