Commit c29c79d0 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

XEN specific function to get emulab:xen_ptype extension.

This allows users to select the specific node type of their VMs,
We need to revisit this type stuff.
parent 0d836da9
......@@ -720,6 +720,22 @@ sub HasXenSettings($)
return 0;
}
sub XenPtype($)
{
my ($node) = @_;
my $type = FindFirst("n:sliver_type", $node);
if (defined($type)) {
my $ptype = FindNodesNS("n:xen_ptype", $type, $EMULAB_NS)->pop();
if (defined($ptype)) {
my $name = GetText("name", $ptype);
return $name
if (defined($name) && $name ne "");
}
}
return undef;
}
sub GetXenSettings($)
{
my ($node) = @_;
......
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