@@ -55,4 +55,9 @@ sub migrate_check ($) {
die "libvirt migration not supported yet."
}
+sub consolecmd ($$) {
+ my ($self,$gn) = @_;
+ return "virsh console $gn";
+}
+
1;
@@ -33,8 +33,10 @@ sub new {
}, $class;
}
+# Defer to xl driver for most things
sub destroy { return Osstest::Toolstack::xl::destroy(@_); }
sub create { return Osstest::Toolstack::xl::create(@_); }
+sub consolecmd { return Osstest::Toolstack::xl::consolecmd(@_); }
sub migrate_check ($) {
my ($self) = @_;
@@ -51,4 +51,9 @@ sub migrate_check ($) {
return $rc;
}
+sub consolecmd ($$) {
+ my ($self,$gn) = @_;
+ return $self->{_Command}." console $gho->{Name}";
+}
+
1;
@@ -192,7 +192,7 @@ sub fetch_logs_guest ($) {
logm("cannot find domid: $@");
return;
}
- my $consolecmd= toolstack($ho)->{Command}." console $gho->{Name}";
+ my $consolecmd= toolstack($ho)->consolecmd($gho->{Name});
try_cmd_output_save("sleep 1 | $consolecmd | cat",
"guest-$gho->{Name}-console");
Signed-off-by: Ian Campbell <ian.campbell@citrix.com> --- Osstest/Toolstack/libvirt.pm | 5 +++++ Osstest/Toolstack/xend.pm | 2 ++ Osstest/Toolstack/xl.pm | 5 +++++ ts-logs-capture | 2 +- 4 files changed, 13 insertions(+), 1 deletion(-)