Commit 38542db7 authored by Leigh B Stoller's avatar Leigh B Stoller

Ad RoutingStyle() and DelayImage() methods to find these top level

elements in the rspec.
parent 2d1db497
......@@ -1186,6 +1186,28 @@ sub GetAddressPools($)
return $result;
}
sub RoutingStyle($)
{
my ($rspec) = @_;
my $result = undef;
my $element = FindNodesNS("n:routing_style", $rspec, $EMULAB_NS)->pop();
if (defined($element)) {
$result = GetText("style", $element);
}
return $result;
}
sub DelayImage($)
{
my ($rspec) = @_;
my $result = undef;
my $element = FindNodesNS("n:delay_image", $rspec, $EMULAB_NS)->pop();
if (defined($element)) {
$result = GetText("urn", $element);
}
return $result;
}
sub GetSharedLanName($)
{
my ($iface) = @_;
......
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