From 416ab8a37f1b07dc9f6c0fb3ff1a8ff2036510b5 Mon Sep 17 00:00:00 2001 From: Sebastian Schmelzer Date: Thu, 2 Sep 2010 17:50:49 +0200 Subject: change dir structure --- .../vmchooser/OpenSLX/OSPlugin/vmchooser.pm | 143 --------------------- 1 file changed, 143 deletions(-) delete mode 100644 os-plugins/plugins/vmchooser/OpenSLX/OSPlugin/vmchooser.pm (limited to 'os-plugins/plugins/vmchooser/OpenSLX/OSPlugin') diff --git a/os-plugins/plugins/vmchooser/OpenSLX/OSPlugin/vmchooser.pm b/os-plugins/plugins/vmchooser/OpenSLX/OSPlugin/vmchooser.pm deleted file mode 100644 index 71ce3637..00000000 --- a/os-plugins/plugins/vmchooser/OpenSLX/OSPlugin/vmchooser.pm +++ /dev/null @@ -1,143 +0,0 @@ -# Copyright (c) 2008, 2009 - OpenSLX GmbH -# -# This program is free software distributed under the GPL version 2. -# See http://openslx.org/COPYING -# -# If you have any feedback please consult http://openslx.org/feedback and -# send your suggestions, praise, or complaints to feedback@openslx.org -# -# General information about OpenSLX can be found at http://openslx.org/ -# ----------------------------------------------------------------------------- -# vmchooser.pm -# - allows user to pick from a list of virtual machine images -# -# - serves as base for virtualizer plugins / and requires one of these -# ----------------------------------------------------------------------------- -package OpenSLX::OSPlugin::vmchooser; - -use strict; -use warnings; - -use base qw(OpenSLX::OSPlugin::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -sub new -{ - my $class = shift; - - my $self = { - name => 'vmchooser', - }; - - return bless $self, $class; -} - -sub getInfo -{ - my $self = shift; - - return { - description => unshiftHereDoc(<<' End-of-Here'), - allows user to pick from a list of different virtual machine images - based on xml-files, which tell about available images. One of the - virtualization tools like vmware*, virtualbox or qemu/kvm is - required. - End-of-Here - precedence => 50, - required => [ qw( desktop ) ], - }; -} - -sub getAttrInfo -{ - my $self = shift; - - return { - 'vmchooser::active' => { - applies_to_systems => 1, - applies_to_clients => 1, - description => unshiftHereDoc(<<' End-of-Here'), - should the 'vmchooser'-plugin be executed during boot? - End-of-Here - content_regex => qr{^(0|1)$}, - content_descr => '1 means active - 0 means inactive', - default => '1', - }, - 'vmchooser::env' => { - applies_to_systems => 1, - applies_to_clients => 1, - description => unshiftHereDoc(<<' End-of-Here'), - environment, seperates pools based on XML configuration - End-of-Here - #TODO: - #content_regex => qr{^(0|1)$}, - content_descr => 'name of environment', - default => 'default', - }, - 'vmchooser::xmlpath' => { - applies_to_systems => 1, - applies_to_clients => 1, - description => unshiftHereDoc(<<' End-of-Here'), - location of XML configuration for virtual images - End-of-Here - #TODO: - #content_regex => qr{^(0|1)$}, - content_descr => 'path to xml files', - default => '/var/lib/virt', - }, - - }; -} - -sub installationPhase -{ - my $self = shift; - my $info = shift; - - my $pluginRepoPath = $info->{'plugin-repo-path'}; - my $openslxBasePath = $info->{'openslx-base-path'}; - - # copy all needed files now: - my $pluginName = $self->{'name'}; - my $pluginBasePath = "$openslxBasePath/lib/plugins/$pluginName/files"; - foreach my $file ( qw( vmchooser printer.sh scanner.sh xmlfilter.sh - default.desktop mesgdisp run-virt.sh ) ) { - copyFile("$pluginBasePath/$file", "$pluginRepoPath/"); - chmod 0755, "$pluginRepoPath/$file"; - } - - # set ditro-specific default session - $self->{distro}->copyDefaultSession($pluginRepoPath); - - return; -} - -sub removalPhase -{ - my $self = shift; - my $info = shift; - - return; -} - -sub copyRequiredFilesIntoInitramfs -{ - my $self = shift; - my $targetPath = shift; - my $attrs = shift; - my $makeInitRamFSEngine = shift; - my $pluginRepoPath = "$openslxConfig{'base-path'}/lib/plugins/vmchooser"; - - $makeInitRamFSEngine->addCMD( - "cp -a $pluginRepoPath/files/mkdosfs $targetPath/bin" - ); - - vlog(1, _tr("vmchooser-plugin: ...")); - - return; -} - -1; - -- cgit v1.2.3-55-g7522