summaryrefslogtreecommitdiffstats
path: root/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm
diff options
context:
space:
mode:
Diffstat (limited to 'os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm')
-rw-r--r--os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm24
1 files changed, 19 insertions, 5 deletions
diff --git a/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm b/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm
index 1cd5afaa..2af56f72 100644
--- a/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm
+++ b/os-plugins/plugins/qemukvm/OpenSLX/OSPlugin/qemukvm.pm
@@ -9,7 +9,7 @@
# General information about OpenSLX can be found at http://openslx.org/
# -----------------------------------------------------------------------------
# qemukvm.pm
-# - declares necessary information for the qemukvm plugin
+# - Declares necessary information for the qemukvm plugin
# -----------------------------------------------------------------------------
package OpenSLX::OSPlugin::qemukvm;
@@ -50,7 +50,7 @@ sub getInfo
sub getAttrInfo
{
- # returns a hash-ref with information about all attributes supported
+ # Returns a hash-ref with information about all attributes supported
# by this specific plugin
my $self = shift;
@@ -111,13 +111,13 @@ sub installationPhase
my $engine = $self->{'os-plugin-engine'};
- # different names of the tool (should be unified somehow!?)
+ # Different names of the tool (should be unified somehow!?)
if (!isInPath('qemu-kvm') || !isInPath('kvm')) {
$engine->installPackages(
$engine->getInstallablePackagesForSelection('qemu-kvm')
);
}
- # copy run-virt.include to the appropriate place for inclusion in stage4
+ # Copy run-virt.include to the appropriate place for inclusion in stage4
copyFile("$self->{openslxBasePath}/lib/plugins/qemukvm/files/run-virt.include",
"$self->{pluginRepositoryPath}/");
@@ -144,7 +144,7 @@ sub checkStage3AttrValues
return;
}
-# write the runlevelscript
+# Write the runlevelscript
sub _writeRunlevelScript
{
my $self = shift;
@@ -157,4 +157,18 @@ sub _writeRunlevelScript
spitFile($file, $runlevelScript);
}
+# The bridge configuration needs the bridge module to be present in early
+# stage3
+sub suggestAdditionalKernelModules
+{
+ my $self = shift;
+ my $makeInitRamFSEngine = shift;
+
+ my @suggestedModules;
+
+ push @suggestedModules, qw( bridge );
+
+ return @suggestedModules;
+}
+
1;