search for: _inspect_linux_kernel

...nspect_operating_systems mount_operating_system inspect_in_detail + inspect_linux_kernel); =head2 open_guest @@ -1551,10 +1552,19 @@ sub _check_for_kernels } $config{cmdline} = join(' ', @args) if(scalar(@args) > 0); - my $kernel = _inspect_linux_kernel($g, $os, "$path"); + my $kernel = + inspect_linux_kernel($g, $path, $os->{package_format}); # Check the kernel was recognised if(defined($kernel)) { + # Put this kernel on the top level kernel list...

The following series of patches adds support for converting SUSE guests through virt-v2v. These changes should not impact non-SUSE guest conversions. Mike Latimer (4): Add perl-Bootloader support to grub packages Add conversion support for SUSE guests Add SUSE to capabilities db and conf Add SUSE support documentation lib/Sys/VirtConvert/Converter/Linux.pm | 480

...ut I've worked around the problem. (SUSE > kernels include a build number that is not seen in the 'Linux kernel' string, > or in the name of the kernel. However, this complete version string is > required for kernel package installations. I now get this full version in > _inspect_linux_kernel, and use it later in a couple of places.) > > Speaking of _inspect_linux_kernel, in my testing (under SUSE), > $g->file('somefile') does not include the expected 'somefile:' at the beginning > of the return string. Because of this, the following code isn't corre...

...n RedHat and SUSE, but I've worked around the problem. (SUSE kernels include a build number that is not seen in the 'Linux kernel' string, or in the name of the kernel. However, this complete version string is required for kernel package installations. I now get this full version in _inspect_linux_kernel, and use it later in a couple of places.) Speaking of _inspect_linux_kernel, in my testing (under SUSE), $g->file('somefile') does not include the expected 'somefile:' at the beginning of the return string. Because of this, the following code isn't correct: if($filedesc...

...(defined($grub_kernel)) { + # Parse a kernel path and optional kernel command line + if($grub_kernel =~ /^\s*(\S+)(?:\s+(.*))?$/) { + my $kernel_path = $1; + $config{cmdline} = $2 if defined($2); + + my $kernel = _inspect_linux_kernel($g, $os, "/boot$1"); + + # Check the kernel was recognised + if(defined($kernel)) { + $config{kernel} = $kernel; + + # Look for an initrd entry + my $initrd; +...

...ed any new ones? ;) I have had to jump through a few hoops with regards to the SUSE -base kernel, the kernel flavor, and an irritating build number... But I've been careful to avoid changing variables for non-SUSE environments. There are a couple of small places that could still happen (in _inspect_linux_kernel), but I think there are enough safeguards in place that it shouldn't happen. Thanks, Mike --- .../VirtConvert/Converter/{RedHat.pm => Linux.pm} | 797 ++++++++++++++++----- 1 file changed, 632 insertions(+), 165 deletions(-) rename lib/Sys/VirtConvert/Converter/{RedHat.pm => Linux...

...b entry - return if $g->aug_match("/files$grub_conf/title/kernel[. = '$grub_path']") > 0; + return if $g->aug_match("/files$grub_conf/title/kernel[. = '$grub_path']") ne ''; my $kernel = Sys::VirtConvert::Converter::RedHat::_inspect_linux_kernel($g, $path); -- 1.8.1.4

This is a repost of the patch I sent on Friday. I know it was already ACK'd, but I've changed a fair bit in addition to adding the requested POD. Specifically: I discovered that augeas's grub lens wasn't returning cmdline the way I expected. This is fixed. The kernel package, if known, is output as a property of the kernel. The XML output of virt-inspector is updated with all

Thanks for the comments, Matt. On Thursday, October 03, 2013 05:34:27 PM Matthew Booth wrote: > > - # There should be an installed virtio capable kernel if virtio was > > installed - die("virtio configured, but no virtio kernel found") > > + # Warn if there is no installed virtio capable kernel. It is safe to > > + # continue and attempt to install a

...sub check { my $self = shift; - my ($path) = @_; + my ($path, $root) = @_; my $g = $self->{g}; my $grub_conf = $self->{grub_conf}; @@ -251,15 +321,17 @@ sub check return if scalar(@entries) > 0; my $kernel = - Sys::VirtConvert::Converter::RedHat::_inspect_linux_kernel($g, $path); + Sys::VirtConvert::Converter::Linux::_inspect_linux_kernel($g, $path); my $version = $kernel->{version}; my $grub_initrd = dirname($path)."/initrd-$version"; - # No point in dying if /etc/redhat-release can't be read - my ($title) = eval { $g-...

In preparation for an upcoming patch which adds support for SUSE guest conversions, it makes sense to have an intermediate steps that changes the RedHat.pm converter into a more generic Linux converter. The SUSE changes will then be limited in scope to only what is required for SUSE support. This series of patches accomplishes the following: - Renames RedHat.pm to Linux.pm - Modifies Linux.pm

This is a new conversion module to convert SUSE Linux and openSUSE guests. The converter is based on the RedHat module, and should offer the same functionality on both SUSE and RedHat hosts. There are a few additional messages in this module, such as reporting of packages when installing through zypper or the local virt-v2v repo. These messages don't necessarily flow unless verbose switches

...rub_path = $1; + + # Nothing to do if the kernel already has a grub entry + return if $g->aug_match("/files$grub_conf/title/kernel". + "[. = '$grub_path']") ne ''; + + my $kernel = + Sys::VirtConvert::Converter::SUSE::_inspect_linux_kernel($g, $path); + my $version = $kernel->{version}; + my $grub_initrd = dirname($path)."/initrd-$version"; + + # No point in dying if /etc/SuSE-release can't be read + my ($title) = eval { $g->read_lines('/etc/SuSE-release') }; + $title ||= 'Linux'; +...

...notice this is a change from RedHat.pm. Why did you add the "ne ''"? Augeas will only return kernel entries, and I would expect a blank kernel entry to be a parse error, hence this would be redundant. > + > + my $kernel = > + Sys::VirtConvert::Converter::SUSE::_inspect_linux_kernel($g, $path); > + my $version = $kernel->{version}; > + my $grub_initrd = dirname($path)."/initrd-$version"; > + > + # No point in dying if /etc/SuSE-release can't be read > + my ($title) = eval { $g->read_lines('/etc/SuSE-release') }; > +...

...to do if the kernel already has a grub entry + my @entries = $g->aug_match("/files$grub_conf/title/kernel". + "[. = '$grub_path']"); + return if scalar(@entries) > 0; + + my $kernel = + Sys::VirtConvert::Converter::Linux::_inspect_linux_kernel($g, $path); + my $version = $kernel->{version}; + my $grub_initrd = dirname($path)."/initrd-$version"; + + # No point in dying if /etc/(distro)-release can't be read + my ($title) = eval { $g->inspect_get_product_name($root) }; + $title ||= 'Linux'; + +...

This change is part of an ongoing effort to remove use of $desc and inspect the OS directly as required during conversion. --- lib/Sys/VirtConvert/Connection/LibVirtTarget.pm | 4 +- lib/Sys/VirtConvert/Connection/RHEVTarget.pm | 41 +++++++++--------- lib/Sys/VirtConvert/Converter.pm | 35 ++++++++++++---- lib/Sys/VirtConvert/Converter/RedHat.pm | 45