Commit cbcac934 authored by Leigh B. Stoller's avatar Leigh B. Stoller

Work around a problem in the Wisconsin DB that is causing many nodes

not to come back with the control interface in the interfaces list.
parent 0f5b8b3a
......@@ -910,11 +910,9 @@ sub Create($$$$$$)
goto bad;
}
$registry->Resolve($node1ref->{'node_uuid'}, "Node", \$blob);
$ctrlip1 = $blob->{'physctrl'}
if (defined($blob) && exists($blob->{'physctrl'}));
foreach my $ref (@{ $blob->{'interfaces'} }) {
$ctrlip1 = $ref->{'IP'}
if ($ref->{'role'} eq "ctrl");
}
if (!defined($ctrlip1)) {
print STDERR "Could get control IP for ".
"$node1ref->{'node_uuid'} at $component\n";
......@@ -971,11 +969,9 @@ sub Create($$$$$$)
goto bad;
}
$registry->Resolve($node2ref->{'node_uuid'}, "Node", \$blob);
$ctrlip2 = $blob->{'physctrl'}
if (defined($blob) && exists($blob->{'physctrl'}));
foreach my $ref (@{ $blob->{'interfaces'} }) {
$ctrlip2 = $ref->{'IP'}
if ($ref->{'role'} eq "ctrl");
}
if (!defined($ctrlip2)) {
print STDERR "Could get control IP for ".
"$node2ref->{'node_uuid'} at $component\n";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment