* added hook mechanism to initramfs-init which can be used by plugins

  to trigger execution of their own script at a certain point in the
  initramfs-init execution path. This is not active yet
* added basic implementation outline for Theme (a.k.a splash) plugin -
  unable to test anything, though, as VMware does not seem to provide
  a VESA framebuffer, so splashy won't run


git-svn-id: http://svn.openslx.org/svn/openslx/trunk@1466 95ad53e4-c205-0410-b2fa-d234c58c8868

1 files changed, 84 insertions, 0 deletions

diff --git a/os-plugins/plugins/Theme/OpenSLX/OSPlugin/Theme.pm b/os-plugins/plugins/Theme/OpenSLX/OSPlugin/Theme.pm
new file mode 100644
index 00000000..5975fa3f
--- /dev/null
+++ b/os-plugins/plugins/Theme/OpenSLX/OSPlugin/Theme.pm
@@ -0,0 +1,84 @@
+# Copyright (c) 2007 - 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/
+# -----------------------------------------------------------------------------
+# Theme.pm
+#	- implementation of the 'Theme' plugin, which applies theming to the 
+#     following places:
+#		+ bootsplash (via splashy)
+#		+ displaymanager (gdm, kdm, ...)
+#		+ desktop (to be done)
+# -----------------------------------------------------------------------------
+package OpenSLX::OSPlugin::Theme;
+
+use strict;
+use warnings;
+
+use base qw(OpenSLX::OSPlugin::Base);
+
+use OpenSLX::Basics;
+use OpenSLX::Utils;
+
+sub new
+{
+	my $class = shift;
+
+	my $self = {};
+
+	return bless $self, $class;
+}
+
+sub getInfo
+{
+	my $self = shift;
+
+	return {
+		description => unshiftHereDoc(<<'		End-of-Here'),
+			applies a graphical theme to the bootsplash and the displaymanager
+		End-of-Here
+		mustRunAfter => [],
+	};
+}
+
+sub getAttrInfo
+{	# returns a hash-ref with information about all attributes supported
+	# by this specific plugin
+	my $self = shift;
+
+	# This default configuration will be added as attributes to the default
+	# system, such that it can be overruled for any specific system by means
+	# of slxconfig.
+	return {
+		# attribute 'active' is mandatory for all plugins
+		'theme::active' => {
+			applies_to_systems => 1,
+			applies_to_clients => 0,
+			description => unshiftHereDoc(<<'			End-of-Here'),
+				should the 'Theme'-plugin be executed during boot?
+			End-of-Here
+			content_regex => qr{^(0|1)$},
+			content_descr => '1 means active - 0 means inactive',
+			default => '1',
+		},
+		# attribute 'precedence' is mandatory for all plugins
+		'theme::precedence' => {
+			applies_to_systems => 1,
+			applies_to_clients => 0,
+			description => unshiftHereDoc(<<'			End-of-Here'),
+				the execution precedence of the 'Theme' plugin
+			End-of-Here
+			content_regex => qr{^\d\d$},
+			content_descr => 'allowed range is from 01-99',
+			default => 30,
+		},
+
+	};
+}
+
+1;