X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=inspector%2Fvirt-inspector;h=cb892c06f43847d833e1d14ebe586ecfc81f9f62;hb=c0baa7bdb2b404e8c808700984b3fc1a699d8dd7;hp=13673aff7f5150d929b5442cbb1471e4ecd6ff55;hpb=ee21bc1f8071bb35409e9f15fb8309348c9a5912;p=libguestfs.git diff --git a/inspector/virt-inspector b/inspector/virt-inspector index 13673af..cb892c0 100755 --- a/inspector/virt-inspector +++ b/inspector/virt-inspector @@ -54,10 +54,6 @@ para-virtualized (PV), what applications are installed and more. Virt-inspector can produce output in several formats, including a readable text report, and XML for feeding into other programs. -Virt-inspector should only be run on I virtual machines. -The program tries to determine that the machine is inactive and will -refuse to run if it thinks you are trying to inspect a running domain. - In the normal usage, use C where C is the libvirt domain (see: C). @@ -523,7 +519,10 @@ sub output_xml_os foreach (@apps) { $xml->startTag("application"); $xml->dataElement("name", $_->{name}); + $xml->dataElement("epoch", $_->{epoch}) if defined $_->{epoch}; $xml->dataElement("version", $_->{version}); + $xml->dataElement("release", $_->{release}); + $xml->dataElement("arch", $_->{arch}); $xml->endTag("application"); } $xml->endTag("applications"); @@ -550,23 +549,23 @@ sub output_xml_os } if ($os->{kernels}) { - $xml->startTag("kernels"); - my @kernels = @{$os->{kernels}}; - foreach (@kernels) { - $xml->startTag("kernel", - "version" => $_->{version}, - "arch" => $_->{arch}); - $xml->startTag("modules"); - my @modules = @{$_->{modules}}; - foreach (@modules) { - $xml->dataElement("module", $_); - } - $xml->endTag("modules"); - $xml->dataElement("path", $_->{path}) if(defined($_->{path})); - $xml->dataElement("package", $_->{package}) if(defined($_->{package})); - $xml->endTag("kernel"); - } - $xml->endTag("kernels"); + $xml->startTag("kernels"); + my @kernels = @{$os->{kernels}}; + foreach (@kernels) { + $xml->startTag("kernel", + "version" => $_->{version}, + "arch" => $_->{arch}); + $xml->startTag("modules"); + my @modules = @{$_->{modules}}; + foreach (@modules) { + $xml->dataElement("module", $_); + } + $xml->endTag("modules"); + $xml->dataElement("path", $_->{path}) if(defined($_->{path})); + $xml->dataElement("package", $_->{package}) if(defined($_->{package})); + $xml->endTag("kernel"); + } + $xml->endTag("kernels"); } if (exists $os->{root}->{registry}) {