Discover ip attributes for lsslp -s IVM; change the default discovred ivm named with ivm-mtm-sn instead of Server-mtm-sn
This commit is contained in:
parent
d94108f7bb
commit
d17b873107
@ -1099,6 +1099,7 @@ sub parse_responses {
|
||||
$atthash{id} = ${$attributes->{'lparid'}}[0];
|
||||
$atthash{ip} = ${$attributes->{'ip-address'}}[0];
|
||||
$atthash{hostname} = get_host_from_url($request, $attributes);
|
||||
$atthash{hostname} =~ s/^Server/ivm/;
|
||||
my @ips = @{$attributes->{'ip-address'}};
|
||||
foreach my $tmpip (@ips) {
|
||||
if (exists($::OLD_DATA_CACHE{"ivm*".$atthash{mtm}."*".$atthash{serial}})){
|
||||
@ -1584,6 +1585,9 @@ sub format_stanza {
|
||||
if ($type =~ /^fsp|bpa|cmm$/){
|
||||
$result .= "\totherinterfaces=${$outhash->{$name}}{otherinterfaces}\n";
|
||||
}
|
||||
if ($type eq "ivm") {
|
||||
$result .= "\tip=${$outhash->{$name}}{ip}\n";
|
||||
}
|
||||
$result .= "\thwtype=$globalhwtype{$type}\n";
|
||||
}
|
||||
return( $result );
|
||||
|
Loading…
x
Reference in New Issue
Block a user