From ff1dbeab165bdc5b5f3c8c146896551e78f4ff99 Mon Sep 17 00:00:00 2001
From: Dirk von Suchodoletz
Date: Sun, 16 Mar 2008 19:50:31 +0000
Subject: Working on the vmware plugin (see comments within the files ...)

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1637 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 os-plugins/plugins/vmware/OpenSLX/Distro/base.pm   | 42 ++++++++++++++++++++++
 .../plugins/vmware/OpenSLX/OSPlugin/vmware.pm      | 40 ++++++++++++++++++++-
 2 files changed, 81 insertions(+), 1 deletion(-)
 create mode 100644 os-plugins/plugins/vmware/OpenSLX/Distro/base.pm

(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
new file mode 100644
index 00000000..7bcdc1f0
--- /dev/null
+++ b/os-plugins/plugins/vmware/OpenSLX/Distro/base.pm
@@ -0,0 +1,42 @@
+# 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/
+# -----------------------------------------------------------------------------
+# base.pm
+#	- provides empty base of the OpenSLX OSPlugin Distro API for the vmware
+#     plugin.
+# -----------------------------------------------------------------------------
+package OpenSLX::Distro::base;
+
+use strict;
+use warnings;
+
+our $VERSION = 1.01;		# API-version . implementation-version
+
+use OpenSLX::Basics;
+use OpenSLX::Utils;
+
+################################################################################
+### interface methods
+################################################################################
+sub new
+{
+	confess "Creating OpenSLX::OSPlugin::Distro::Base-objects directly makes no sense!";
+}
+
+sub initialize
+{
+	my $self = shift;
+	my $engine = shift;
+	
+	return 1;
+}
+
+
+1;
diff --git a/os-plugins/plugins/vmware/OpenSLX/OSPlugin/vmware.pm b/os-plugins/plugins/vmware/OpenSLX/OSPlugin/vmware.pm
index 28193dff..ab975506 100644
--- a/os-plugins/plugins/vmware/OpenSLX/OSPlugin/vmware.pm
+++ b/os-plugins/plugins/vmware/OpenSLX/OSPlugin/vmware.pm
@@ -47,7 +47,8 @@ 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;
 
@@ -87,6 +88,43 @@ sub getAttrInfo
             content_descr => 'Allowed values: path or URI',
             default => '',
         },
+        # attribute 'bridge' defines if bridged network mode should be
+        # switched on
+        'vmware::bridge' => {
+            applies_to_systems => 1,
+            applies_to_clients => 1,
+            description => unshiftHereDoc(<<'            End-of-Here'),
+                Should the bridging (direct access of the vmware clients
+                to the ethernet the host is connected to) be enabled
+            End-of-Here
+            content_descr => 'Allowed values: 0 or 1',
+            default => '',
+        },
+        # attribute 'vmnet1' defines if the host connection network mode 
+        # should be switched on and NAT should be enabled
+        'vmware::vmnet1' => {
+            applies_to_systems => 1,
+            applies_to_clients => 1,
+            description => unshiftHereDoc(<<'            End-of-Here'),
+                Format ServerIP/Netprefix without NAT
+                Format ServerIP/Netprefix,NAT enables NAT/Masquerading
+            End-of-Here
+            content_descr => 'Allowed value: IP/Prefix[,NAT]',
+            default => '',
+        },
+        # attribute 'vmnet8' defines if vmware specific NATed network mode
+        # should be switched on
+        'vmware::vmnet8' => {
+            applies_to_systems => 1,
+            applies_to_clients => 1,
+            description => unshiftHereDoc(<<'            End-of-Here'),
+                Format ServerIP/Netprefix
+            End-of-Here
+            content_descr => 'Allowed value: IP/Prefix',
+            default => '',
+        },
+        # is to be discussed how to handle this - there is no single set of
+        # vmware files!!
         # attribute 'binaries' defines whether or not VMware binaries shall
         # be provided (by downloading them).
         'vmware::binaries' => {
-- 
cgit v1.2.3-55-g7522