From 7796d07fd918175dd2ab795c8928d88a47a392c2 Mon Sep 17 00:00:00 2001 From: Volker Uhrig Date: Sat, 7 Jun 2008 19:52:48 +0000 Subject: * finished implementation of vmpl2.0 installation * tested successfull on suse 10.2 (vmpl2.0 and local installation) * some minor (optical) changes * some more errorhandling for invalid configuration needed * theres a need for tests on debian-based systems * Configuration: http://openslx.org/trac/de/openslx/wiki/vmware git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1859 95ad53e4-c205-0410-b2fa-d234c58c8868 --- os-plugins/plugins/vmware/OpenSLX/Distro/Base.pm | 26 ++++++++---- os-plugins/plugins/vmware/OpenSLX/Distro/Debian.pm | 23 +++++++---- os-plugins/plugins/vmware/OpenSLX/Distro/Gentoo.pm | 22 +++++++--- os-plugins/plugins/vmware/OpenSLX/Distro/Suse.pm | 22 +++++++--- .../plugins/vmware/OpenSLX/OSPlugin/vmware.pm | 47 +++++++++++++--------- 5 files changed, 93 insertions(+), 47 deletions(-) (limited to 'os-plugins/plugins/vmware/OpenSLX') diff --git a/os-plugins/plugins/vmware/OpenSLX/Distro/Base.pm b/os-plugins/plugins/vmware/OpenSLX/Distro/Base.pm index 2dfc2700..20769ca4 100644 --- a/os-plugins/plugins/vmware/OpenSLX/Distro/Base.pm +++ b/os-plugins/plugins/vmware/OpenSLX/Distro/Base.pm @@ -36,7 +36,7 @@ sub initialize { my $self = shift; my $engine = shift; - + return 1; } @@ -53,7 +53,7 @@ sub fillRunlevelScript # Copyright 1998-2007 VMware, Inc. All rights reserved. # # This script manages the services needed to run VMware software - + # Basic support for the Linux Standard Base Specification 1.3 ### BEGIN INIT INFO # Provides: VMware @@ -65,10 +65,19 @@ sub fillRunlevelScript # Description: Manages the services needed to run VMware software ### END INIT INFO load_modules() { - # to be filled in via the stage1 configuration script - modprobe -qa vmmon vmnet vmblock 2>/dev/null || echo "Problem here!" - # most probably nobody wants to run the parallel port driver ... - #modprobe vm... + if [ \${vmware_kind} = "local" ]; then + # to be filled in via the stage1 configuration script + modprobe -qa vmmon vmnet vmblock 2>/dev/null || return 1 + # most probably nobody wants to run the parallel port driver ... + #modprobe vm... + else + # load module manuall + vmware_kind_path=/opt/openslx/plugin-repo/vmware/\${vmware_kind}/ + module_src_path=\${vmware_kind_path}/root/lib/vmware/modules/source + insmod \${module_src_path}/vmblock.o + insmod \${module_src_path}/vmmon.o + insmod \${module_src_path}/vmnet.o + fi } unload_modules() { # to be filled with the proper list within via the stage1 configuration @@ -135,8 +144,9 @@ sub fillRunlevelScript echo "Stopping vmware background services ..." killall vmnet-netifup vmnet-natd vmnet-bridge vmware vmplayer \\ vmware-tray vmnet-dhcpd 2>/dev/null - # wait for shutting down of interfaces - usleep 50000 + # wait for shutting down of interfaces... vmnet needs kinda + # long + usleep 500000 unload_modules ;; #status) diff --git a/os-plugins/plugins/vmware/OpenSLX/Distro/Debian.pm b/os-plugins/plugins/vmware/OpenSLX/Distro/Debian.pm index 5991d6ad..e1c7e2e4 100644 --- a/os-plugins/plugins/vmware/OpenSLX/Distro/Debian.pm +++ b/os-plugins/plugins/vmware/OpenSLX/Distro/Debian.pm @@ -52,11 +52,19 @@ sub fillRunlevelScript ### END INIT INFO load_modules() { - # to be filled in via the stage1 configuration script - #TODO: everything behind || is not equal to Suse.pm - modprobe -qa vmmon vmnet vmblock 2>/dev/null || echo "Problem here!" - # most probably nobody wants to run the parallel port driver ... - #modprobe vm... + if [ \${vmware_kind} = "local" ]; then + # to be filled in via the stage1 configuration script + modprobe -qa vmmon vmnet vmblock 2>/dev/null || return 1 + # most probably nobody wants to run the parallel port driver ... + #modprobe vm... + else + # load module manuall + vmware_kind_path=/opt/openslx/plugin-repo/vmware/\${vmware_kind}/ + module_src_path=\${vmware_kind_path}/root/lib/vmware/modules/source + insmod \${module_src_path}/vmblock.o + insmod \${module_src_path}/vmmon.o + insmod \${module_src_path}/vmnet.o + fi } unload_modules() { # to be filled with the proper list within via the stage1 configuration @@ -131,8 +139,9 @@ sub fillRunlevelScript log_daemon_msg "Stopping vmware background services ..." "vmware" killall vmnet-netifup vmnet-natd vmnet-bridge vmware vmplayer \\ vmware-tray vmnet-dhcpd 2>/dev/null - # wait for shutting down of interfaces - usleep 50000 + # wait for shutting down of interfaces. vmnet needs kinda + # long + usleep 500000 unload_modules log_end_msg $? ;; diff --git a/os-plugins/plugins/vmware/OpenSLX/Distro/Gentoo.pm b/os-plugins/plugins/vmware/OpenSLX/Distro/Gentoo.pm index c11994f1..cac593df 100644 --- a/os-plugins/plugins/vmware/OpenSLX/Distro/Gentoo.pm +++ b/os-plugins/plugins/vmware/OpenSLX/Distro/Gentoo.pm @@ -48,10 +48,19 @@ sub fillRunlevelScript # helper functions load_modules() { - # to be filled in via the stage1 configuration script - modprobe -qa vmmon vmnet vmblock 2>/dev/null || return 1 - # most probably nobody wants to run the parallel port driver ... - #modprobe vm... + if [ \${vmware_kind} = "local" ]; then + # to be filled in via the stage1 configuration script + modprobe -qa vmmon vmnet vmblock 2>/dev/null || return 1 + # most probably nobody wants to run the parallel port driver ... + #modprobe vm... + else + # load module manuall + vmware_kind_path=/opt/openslx/plugin-repo/vmware/\${vmware_kind}/ + module_src_path=\${vmware_kind_path}/root/lib/vmware/modules/source + insmod \${module_src_path}/vmblock.o + insmod \${module_src_path}/vmmon.o + insmod \${module_src_path}/vmnet.o + fi } unload_modules() { # to be filled with the proper list within via the stage1 configuration @@ -121,8 +130,9 @@ sub fillRunlevelScript ebegin "Stopping vmware background services ..." killall vmnet-netifup vmnet-natd vmnet-bridge vmware vmplayer \\ vmware-tray vmnet-dhcpd 2>/dev/null - # wait for shutting down of interfaces - usleep 50000 + # wait for shutting down of interfaces. vmnet needs kinda + # long + usleep 500000 unload_modules eend $? } diff --git a/os-plugins/plugins/vmware/OpenSLX/Distro/Suse.pm b/os-plugins/plugins/vmware/OpenSLX/Distro/Suse.pm index 7e09e3c9..08a64055 100644 --- a/os-plugins/plugins/vmware/OpenSLX/Distro/Suse.pm +++ b/os-plugins/plugins/vmware/OpenSLX/Distro/Suse.pm @@ -53,10 +53,19 @@ sub fillRunlevelScript # helper functions load_modules() { - # to be filled in via the stage1 configuration script - modprobe -qa vmmon vmnet vmblock 2>/dev/null || return 1 - # most probably nobody wants to run the parallel port driver ... - #modprobe vm... + if [ \${vmware_kind} = "local" ]; then + # to be filled in via the stage1 configuration script + modprobe -qa vmmon vmnet vmblock 2>/dev/null || return 1 + # most probably nobody wants to run the parallel port driver ... + #modprobe vm... + else + # load module manuall + vmware_kind_path=/opt/openslx/plugin-repo/vmware/\${vmware_kind}/ + module_src_path=\${vmware_kind_path}/root/lib/vmware/modules/source + insmod \${module_src_path}/vmblock.o + insmod \${module_src_path}/vmmon.o + insmod \${module_src_path}/vmnet.o + fi } unload_modules() { # to be filled with the proper list within via the stage1 configuration @@ -133,8 +142,9 @@ sub fillRunlevelScript echo -n "Stopping vmware background services ..." killall vmnet-netifup vmnet-natd vmnet-bridge vmware vmplayer \\ vmware-tray vmnet-dhcpd 2>/dev/null - # wait for shutting down of interfaces - usleep 50000 + # wait for shutting down of interfaces. vmnet needs kinda + # long + usleep 500000 unload_modules rc_status -v ;; diff --git a/os-plugins/plugins/vmware/OpenSLX/OSPlugin/vmware.pm b/os-plugins/plugins/vmware/OpenSLX/OSPlugin/vmware.pm index 4207a12d..2786594b 100644 --- a/os-plugins/plugins/vmware/OpenSLX/OSPlugin/vmware.pm +++ b/os-plugins/plugins/vmware/OpenSLX/OSPlugin/vmware.pm @@ -196,7 +196,28 @@ sub installationPhase if ($self->{attrs}->{'vmware::vmpl2.0'} == 1) { $self->_vmpl2Installation(); } - + + ## prepration for our faster wrapper script + # rename the default vmplayer script and create a link. + # uninstall routine takes care about plugin remove. + # stage3 copys our own wrapper script + if (-e "/usr/bin/vmplayer") { + rename("/usr/bin/vmplayer", "/usr/bin/vmplayer.slx-bak"); + linkFile("/var/X11R6/bin/vmplayer", "/usr/bin/vmplayer"); + } + # the same with vmware, if ws is installed + if (-e "/usr/bin/vmware") { + rename("/usr/bin/vmware", "/usr/bin/vmware.slx-bak"); + } + # this kinda sucks. what if we have local installed vmplayer but + # plugin installed vmware workstation? what if we have a local + # installed vmware workstation but run plugin installed vmplayer + # without workstation. Link will go to nowhere... kinda ugly that + # /usr/ is ro. + # TODO: need to find a solution (if there is one possible with ro + # mounted /usr ...) + linkFile("/var/X11R6/bin/vmware", "/usr/bin/vmware"); + } sub removalPhase @@ -207,7 +228,7 @@ sub removalPhase # restore old start scripts - to be discussed my @files = qw( vmware vmplayer ); foreach my $file (@files) { - if (-e $file) { + if (-e "/usr/bin/$file.slx-bak") { unlink("/usr/bin/$file"); rename("/usr/bin/$file.slx-bak", "/usr/bin/$file"); } @@ -272,7 +293,7 @@ sub _writeWrapperScript if ($kind ne "local") { $script .= unshiftHereDoc(<<" End-of-Here"); export LD_LIBRARY_PATH=$vmpath/lib - export GTK_PIXBUF_MODULE_FILE=$vmpath/libconf/etc/gtk-2.0/gdk-pixbuf.loaders + export GDK_PIXBUF_MODULE_FILE=$vmpath/libconf/etc/gtk-2.0/gdk-pixbuf.loaders export GTK_IM_MODULE_FILE=$vmpath/libconf/etc/gtk-2.0/gtk.immodules export FONTCONFIG_PATH=$vmpath/libconf/etc/fonts export PANGO_RC_FILE=$vmpath/libconf/etc/pango/pangorc @@ -299,12 +320,12 @@ sub _writeWrapperScript } } -sub _wirteVmwareConfig { +sub _writeVmwareConfig { my $self = shift; my $kind = shift; my $vmpath = shift; - my $config = "libdir = \"$vmpath\""; + my $config = "libdir = \"$vmpath\"\n"; spitFile("$self->{'pluginRepositoryPath'}/$kind/config", $config); chmod 0755, "$self->{'pluginRepositoryPath'}/$kind/config"; @@ -396,20 +417,6 @@ sub _localInstallation $self->_writeWrapperScript("$vmpath", "$kind", "player") } - ## - ## replacement with our faster wrapper script - - # rename the default vmplayer script and copy it. remove function takes - # care about plugin remove. We only need this part if vmplayer - # or ws is installed on the local system - rename("/usr/bin/vmplayer", "/usr/bin/vmplayer.slx-bak"); - copyFile("$self->{'pluginRepositoryPath'}/$kind/vmplayer", "/usr/bin"); - # the same with vmware, if ws is installed - if (-e "/usr/bin/vmware") { - rename("/usr/bin/vmware", "/usr/bin/vmware.slx-bak"); - copyFile("$self->{'pluginRepositoryPath'}/$kind/vmware", "/usr/bin"); - } - } # else { TODO: errorhandling } } @@ -456,7 +463,7 @@ sub _vmpl2Installation { ## ## Creating needed config /etc/vmware/config - $self->_wirteVmwareConfig("$kind", "$vmpath"); + $self->_writeVmwareConfig("$kind", "$vmpath"); } -- cgit v1.2.3-55-g7522