From e303cdc1b5f24a71d9e0fea0214f992bcff981d7 Mon Sep 17 00:00:00 2001 From: Dirk von Suchodoletz Date: Tue, 25 Mar 2008 20:21:34 +0000 Subject: Writing distro specific runlevel scripts the trivial way. Should be improved and generalized (to be usable for other plugins too, see #211) git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1691 95ad53e4-c205-0410-b2fa-d234c58c8868 --- os-plugins/plugins/vmware/OpenSLX/Distro/suse.pm | 147 +++++++++++++++++++++++ 1 file changed, 147 insertions(+) create mode 100644 os-plugins/plugins/vmware/OpenSLX/Distro/suse.pm (limited to 'os-plugins/plugins/vmware/OpenSLX/Distro/suse.pm') diff --git a/os-plugins/plugins/vmware/OpenSLX/Distro/suse.pm b/os-plugins/plugins/vmware/OpenSLX/Distro/suse.pm new file mode 100644 index 00000000..81e7aaf2 --- /dev/null +++ b/os-plugins/plugins/vmware/OpenSLX/Distro/suse.pm @@ -0,0 +1,147 @@ +# Copyright (c) 2008 - 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/ +# ----------------------------------------------------------------------------- +# SUSE.pm +# - provides SUSE-specific overrides of the OpenSLX Distro API for the desktop +# plugin. +# ----------------------------------------------------------------------------- +package OpenSLX::Distro::suse; + +use strict; +use warnings; + +use base qw(OpenSLX::Distro::Base); + +use OpenSLX::Basics; +use OpenSLX::Utils; + +################################################################################ +### interface methods +################################################################################ + +sub fillRunlevelScript +{ + my $self = shift; + my $location = shift; + + my $script = unshiftHereDoc(<<" End-of-Here"); + #! /bin/sh + # SuSE compatible start/stop script, generated via stage1 'vmware' plugin + # installation + # + # inspiration taken from vmware start script: + # 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 + # Required-Start: \$syslog + # Required-Stop: + # Default-Start: 2 3 5 + # Default-Stop: 0 6 + # Short-Description: Manages the services needed to run VMware software + # Description: Manages the services needed to run VMware software + ### END INIT INFO + + # 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... + } + unload_modules() { + # to be filled with the proper list within via the stage1 configuration + # script + rmmod vmmon vmblock vmnet 2>/dev/null + } + # the bridged interface + setup_vmnet0() { + if [ -n "\$vmnet0" ] ; then + # the path might be directly point to the plugin dir + $location/vmnet-bridge -d /var/run/vmnet-bridge-0.pid /dev/vmnet0 eth0 + fi + } + # we definately prefer the hostonly interface for NATed operation too + # distinction is made via enabled forwarding + setup_vmnet1() { + if [ -n "\$vmnet1" ] ; then + test -c /dev/vmnet1 || mknod c 119 1 /dev/vmnet1 + # the path might be directly point to the plugin dir + $location/vmnet-netifup -d /var/run/vmnet-netifup-vmnet1.pid \ + /dev/vmnet1 vmnet1 + dhcpif="\$dhcpif vmnet1" + ip addr add \$vmnet1 dev vmnet1 + if [ -n "\$vmnet1nat" ] ; then + # needs refinement interface name for eth0 is known in stage3 already + echo "1" > /proc/sys/net/ipv4/conf/vmnet1/forwarding 2>/dev/null + echo "1" > /proc/sys/net/ipv4/conf/eth0/forwarding 2>/dev/null + #iptables -A -s vmnet1 -d eth0 + fi + fi + } + # incomplete ... + setup_vmnet8() { + if [ -n "\$vmnet8" ] ; then + test -c /dev/vmnet1 || mknod c 119 8 /dev/vmnet8 + # /etc/vmware/vmnet-natd-8.mac simply contains a mac like 00:50:56:F1:30:50 + $location/vmnet-natd -d /var/run/vmnet-natd-8.pid \ + -m /etc/vmware/vmnet-natd-8.mac -c /etc/vmware/nat.conf + dhcpif="\$dhcpif vmnet8" + ip addr add \$vmnet8 dev vmnet8 + fi + } + runvmdhcpd() { + if [ -n "\$dhcpif" ] ; then + # the path might be directly point to the plugin dir + mkdir /var/run/vmware 2>/dev/null + $location/vmnet-dhcpd -cf /etc/vmware/dhcpd.conf -lf \ + /var/run/vmware/dhcpd.leases -pf /var/run/vmnet-dhcpd-vmnet8.pid \$dhcpif + fi + } + # load the helper stuff + . /etc/rc.status + # reset the script status + rc_reset + + case \$1 in + start) + echo -n "Starting vmware background services ..." + # load the configuration file + . /etc/vmware/slxvmconfig + load_modules + setup_vmnet0 + setup_vmnet1 + setup_vmnet8 + runvmdhcpd + rc_status -v + ;; + stop) + # message output should match the given vendor-os + echo -n "Stopping vmware background services ..." + killall vmnet-netifup vmnet-natd vmnet-bridge vmware vmplayer \ + vmware-tray 2>/dev/null + # wait for shutting down of interfaces + usleep 50000 + unload_modules + rc_status -v + ;; + status) + echo -n "Say something useful here ..." + ;; + esac + exit 0 + End-of-Here + return $script; +} + +1; -- cgit v1.2.3-55-g7522