This allows runvars to override hostflags from the resource database
or configuration.

Signed-off-by: Ian Jackson <ian.jack...@eu.citrix.com>
---
 Osstest/TestSupport.pm |    8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/Osstest/TestSupport.pm b/Osstest/TestSupport.pm
index a498ddd..88b0a65 100644
--- a/Osstest/TestSupport.pm
+++ b/Osstest/TestSupport.pm
@@ -966,6 +966,14 @@ sub selecthost ($) {
 
     $ho->{Flags} = $mhostdb->get_flags($ho);
 
+    foreach my $adj (split /,/, ($r{"${ident}_hostflagadjust"} // '')) {
+       if ($adj =~ s/^!//) {
+           delete $ho->{Flags}{$adj};
+       } else {
+           $ho->{Flags}{$adj} = 1;
+       }
+    }
+
     #----- fqdn -----
 
     my $defaultfqdn = $name;
-- 
1.7.10.4


_______________________________________________
Xen-devel mailing list
Xen-devel@lists.xen.org
https://lists.xen.org/xen-devel

Reply via email to