diff options
author | Sebastian Schmelzer | 2010-09-02 17:50:49 +0200 |
---|---|---|
committer | Sebastian Schmelzer | 2010-09-02 17:50:49 +0200 |
commit | 416ab8a37f1b07dc9f6c0fb3ff1a8ff2036510b5 (patch) | |
tree | 4715f7d742fec50931017f38fe6ff0a89d4ceccc /os-plugins/plugins/profile | |
parent | Fix for the problem reported on the list (sed filter forgotten for the (diff) | |
download | core-416ab8a37f1b07dc9f6c0fb3ff1a8ff2036510b5.tar.gz core-416ab8a37f1b07dc9f6c0fb3ff1a8ff2036510b5.tar.xz core-416ab8a37f1b07dc9f6c0fb3ff1a8ff2036510b5.zip |
change dir structure
Diffstat (limited to 'os-plugins/plugins/profile')
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/Distro/Base.pm | 84 | ||||
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/Distro/Debian.pm | 32 | ||||
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/Distro/Fedora.pm | 32 | ||||
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/Distro/Gentoo.pm | 32 | ||||
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/Distro/Scilin.pm | 32 | ||||
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/Distro/Suse.pm | 68 | ||||
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/Distro/Ubuntu.pm | 66 | ||||
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/Distro/Ubuntu_10.pm | 66 | ||||
-rw-r--r-- | os-plugins/plugins/profile/OpenSLX/OSPlugin/profile.pm | 174 | ||||
-rw-r--r-- | os-plugins/plugins/profile/XX_profile.sh | 31 |
10 files changed, 0 insertions, 617 deletions
diff --git a/os-plugins/plugins/profile/OpenSLX/Distro/Base.pm b/os-plugins/plugins/profile/OpenSLX/Distro/Base.pm deleted file mode 100644 index 5588a177..00000000 --- a/os-plugins/plugins/profile/OpenSLX/Distro/Base.pm +++ /dev/null @@ -1,84 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile/OpenSLX/Distro/Base.pm -# - provides base implementation of the Distro API for the profile plugin. -# ----------------------------------------------------------------------------- -package profile::OpenSLX::Distro::Base; - -use strict; -use warnings; - -our $VERSION = 1.01; # API-version . implementation-version - -use Scalar::Util qw( weaken ); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -### interface methods -################################################################################ -sub new -{ - my $class = shift; - my $self = {}; - return bless $self, $class; -} - -sub initialize -{ - my $self = shift; - $self->{engine} = shift; - weaken($self->{engine}); - # avoid circular reference between plugin and its engine - - return 1; -} - -sub getXsessionDPath -{ - my $self = shift; - - return "/etc/X11/Xsession.d/10slx-home_env"; -} - - -sub getProfileDPAth -{ - my $self = shift; - - return "/etc/profile.d/slx-kdehome.sh"; -} - -sub getKdeHome -{ - my $self = shift; - - return ".openslx/unknown/kde"; -} - -sub getGconfPathConfig -{ - my $self = shift; - - return "/etc/gconf/2/path"; -} - - -sub getGconfHome -{ - my $self = shift; - - return ".openslx/unknown/gconf"; -} - - -1; diff --git a/os-plugins/plugins/profile/OpenSLX/Distro/Debian.pm b/os-plugins/plugins/profile/OpenSLX/Distro/Debian.pm deleted file mode 100644 index 31ca1e8e..00000000 --- a/os-plugins/plugins/profile/OpenSLX/Distro/Debian.pm +++ /dev/null @@ -1,32 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile/OpenSLX/Distro/Debian.pm -# - provides Debian-specific overrides of the Distro API for the profile -# plugin. -# ----------------------------------------------------------------------------- -package profile::OpenSLX::Distro::Debian; - -use strict; -use warnings; - -use base qw(profile::OpenSLX::Distro::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -### interface methods -################################################################################ - - - - -1; diff --git a/os-plugins/plugins/profile/OpenSLX/Distro/Fedora.pm b/os-plugins/plugins/profile/OpenSLX/Distro/Fedora.pm deleted file mode 100644 index 433f6f7f..00000000 --- a/os-plugins/plugins/profile/OpenSLX/Distro/Fedora.pm +++ /dev/null @@ -1,32 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile/OpenSLX/Distro/Fedora.pm -# - provides Fedora-specific overrides of the Distro API for the profile -# plugin. -# ----------------------------------------------------------------------------- -package profile::OpenSLX::Distro::Fedora; - -use strict; -use warnings; - -use base qw(profile::OpenSLX::Distro::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -### interface methods -################################################################################ - - - - -1; diff --git a/os-plugins/plugins/profile/OpenSLX/Distro/Gentoo.pm b/os-plugins/plugins/profile/OpenSLX/Distro/Gentoo.pm deleted file mode 100644 index 240811df..00000000 --- a/os-plugins/plugins/profile/OpenSLX/Distro/Gentoo.pm +++ /dev/null @@ -1,32 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile/OpenSLX/Distro/Gentoo.pm -# - provides Gentoo-specific overrides of the Distro API for the profile -# plugin. -# ----------------------------------------------------------------------------- -package profile::OpenSLX::Distro::Gentoo; - -use strict; -use warnings; - -use base qw(profile::OpenSLX::Distro::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -### interface methods -################################################################################ - - - - -1; diff --git a/os-plugins/plugins/profile/OpenSLX/Distro/Scilin.pm b/os-plugins/plugins/profile/OpenSLX/Distro/Scilin.pm deleted file mode 100644 index de66f02a..00000000 --- a/os-plugins/plugins/profile/OpenSLX/Distro/Scilin.pm +++ /dev/null @@ -1,32 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile/OpenSLX/Distro/Scilin.pm -# - provides Scilin-specific overrides of the Distro API for the profile -# plugin. -# ----------------------------------------------------------------------------- -package profile::OpenSLX::Distro::Scilin; - -use strict; -use warnings; - -use base qw(profile::OpenSLX::Distro::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -### interface methods -################################################################################ - - - - -1; diff --git a/os-plugins/plugins/profile/OpenSLX/Distro/Suse.pm b/os-plugins/plugins/profile/OpenSLX/Distro/Suse.pm deleted file mode 100644 index e90e8211..00000000 --- a/os-plugins/plugins/profile/OpenSLX/Distro/Suse.pm +++ /dev/null @@ -1,68 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile/OpenSLX/Distro/Suse.pm -# - provides Suse-specific overrides of the Distro API for the profile -# plugin. -# ----------------------------------------------------------------------------- -package profile::OpenSLX::Distro::Suse; - -use strict; -use warnings; - -use base qw(profile::OpenSLX::Distro::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -### interface methods -################################################################################ - -sub _getKdeHomeMap -{ - my $self = shift; - - return; -} - -sub getProfileDPAth -{ - my $self = shift; - - - return "/etc/profile.d/slx-kdehome.sh"; -} - -sub getKdeHome -{ - my $self = shift; - - return ".openslx/suse/kde"; -} - -sub getGconfPathConfig -{ - my $self = shift; - - return "/etc/gconf/2/path"; -} - - -sub getGconfHome -{ - my $self = shift; - - return ".openslx/suse/gconf"; -} - - - -1; diff --git a/os-plugins/plugins/profile/OpenSLX/Distro/Ubuntu.pm b/os-plugins/plugins/profile/OpenSLX/Distro/Ubuntu.pm deleted file mode 100644 index 26cd9426..00000000 --- a/os-plugins/plugins/profile/OpenSLX/Distro/Ubuntu.pm +++ /dev/null @@ -1,66 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile/OpenSLX/Distro/Ubuntu.pm -# - provides Debian-specific overrides of the Distro API for the profile -# plugin. -# ----------------------------------------------------------------------------- -package profile::OpenSLX::Distro::Ubuntu; - -use strict; -use warnings; - -use base qw(profile::OpenSLX::Distro::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -### interface methods -################################################################################ - -sub _getKdeHomeMap -{ - my $self = shift; - - return; -} - -sub getProfileDPAth -{ - my $self = shift; - - - return "/etc/profile.d/slx-kdehome.sh"; -} - -sub getKdeHome -{ - my $self = shift; - - return ".openslx/ubuntu/kde"; -} - -sub getGconfPathConfig -{ - my $self = shift; - - return "/etc/gconf/2/path"; -} - - -sub getGconfHome -{ - my $self = shift; - - return ".openslx/ubuntu/gconf"; -} - -1; diff --git a/os-plugins/plugins/profile/OpenSLX/Distro/Ubuntu_10.pm b/os-plugins/plugins/profile/OpenSLX/Distro/Ubuntu_10.pm deleted file mode 100644 index 3b288e97..00000000 --- a/os-plugins/plugins/profile/OpenSLX/Distro/Ubuntu_10.pm +++ /dev/null @@ -1,66 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile/OpenSLX/Distro/Ubuntu.pm -# - provides Debian-specific overrides of the Distro API for the profile -# plugin. -# ----------------------------------------------------------------------------- -package profile::OpenSLX::Distro::Ubuntu_10; - -use strict; -use warnings; - -use base qw(profile::OpenSLX::Distro::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -### interface methods -################################################################################ - -sub _getKdeHomeMap -{ - my $self = shift; - - return; -} - -sub getProfileDPAth -{ - my $self = shift; - - - return "/etc/profile.d/slx-kdehome.sh"; -} - -sub getKdeHome -{ - my $self = shift; - - return ".openslx/ubuntu-lucid.kde"; -} - -sub getGconfPathConfig -{ - my $self = shift; - - return "/etc/gconf/2/path"; -} - - -sub getGconfHome -{ - my $self = shift; - - return ".openslx.ubuntu-lucid.gconf"; -} - -1; diff --git a/os-plugins/plugins/profile/OpenSLX/OSPlugin/profile.pm b/os-plugins/plugins/profile/OpenSLX/OSPlugin/profile.pm deleted file mode 100644 index b9538374..00000000 --- a/os-plugins/plugins/profile/OpenSLX/OSPlugin/profile.pm +++ /dev/null @@ -1,174 +0,0 @@ -# Copyright (c) 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/ -# ----------------------------------------------------------------------------- -# profile.pm -# ----------------------------------------------------------------------------- -package OpenSLX::OSPlugin::profile; - -use strict; -use warnings; - -use base qw(OpenSLX::OSPlugin::Base); - -use OpenSLX::Basics; -use OpenSLX::Utils; - -################################################################################ -# if you have any questions regarding the concept of OS-plugins and their -# implementation, please drop a mail to: ot@openslx.com, or join the IRC-channel -# '#openslx' (on freenode). -################################################################################ -sub new -{ - my $class = shift; - - my $self = { - name => 'profile', - }; - - return bless $self, $class; -} - -sub getInfo -{ - my $self = shift; - - return { - description => unshiftHereDoc(<<' End-of-Here'), - profile plugin .. - End-of-Here - precedence => 82, - }; -} - -sub getAttrInfo -{ - my $self = shift; - - return { - # attribute 'active' is mandatory for all plugins - 'profile::active' => { - applies_to_systems => 1, - applies_to_clients => 1, - description => unshiftHereDoc(<<' End-of-Here'), - should the 'profile'-plugin be executed during boot? - End-of-Here - content_regex => qr{^(0|1)$}, - content_descr => '1 means active - 0 means inactive', - default => '1', - }, - }; -} - -sub _writeKdehomeEnv -{ - my $self = shift; - - my $profileFile = unshiftHereDoc(<<' End-of-Here'); - # Do not modify this file. - # File generated by profile plugin. - # For more information have a look at - # http://lab.openslx.org/wiki/openslx/profile - - export KDEHOME=${HOME}/%s - End-of-Here - - $profileFile = sprintf( - $profileFile, - $self->{distro}->getKdeHome() - ); - - spitFile($self->{distro}->getProfileDPAth(), $profileFile); - - return $self->{distro}->getKdeHome(); -} - -sub _modifyGconfPaths -{ - my $self = shift; - - my $cmd = "sed -i \"s,readwrite:\\\$(HOME)/.gconf,readwrite:\\\$(HOME)/%s,\" %s"; - $cmd = sprintf ( - $cmd, - $self->{distro}->getGconfHome(), - $self->{distro}->getGconfPathConfig() - ); - - slxsystem($cmd); - - return $self->{distro}->getGconfHome(); -} - -sub _writeXsessionScript -{ - my $self = shift; - my @paths = @_; - - my $xsessionFile= unshiftHereDoc(<<' End-of-Here'); - # Do not modify this file. - # File generated by profile plugin. - # For more information have a look at - # http://lab.openslx.org/wiki/openslx/profile - - %s - End-of-Here - - my $cmd = "mkdir -p "; - - while (@paths) { - my $path = shift(@paths); - $cmd .= "\${HOME}/$path \\\n"; - } - - $cmd .= "> /dev/null 2>&1 \n"; - - $xsessionFile = sprintf( - $xsessionFile, - $cmd - ); - - spitFile($self->{distro}->getXsessionDPath(), $xsessionFile); - - return; -} - -sub installationPhase -{ - my $self = shift; - my $info = shift; - - my $pluginRepoPath = $info->{'plugin-repo-path'}; - my $pluginTempPath = $info->{'plugin-temp-path'}; - my $openslxBasePath = $info->{'openslx-base-path'}; - my $openslxConfigPath = $info->{'openslx-config-path'}; - my $attrs = $info->{'plugin-attrs'}; - - my @slxHomeEnv; - - push (@slxHomeEnv, $self->_writeKdehomeEnv()); - push (@slxHomeEnv, $self->_modifyGconfPaths()); - - $self->_writeXsessionScript(@slxHomeEnv); - - return; -} - -sub removalPhase -{ - my $self = shift; - my $info = shift; - - my $pluginRepoPath = $info->{'plugin-repo-path'}; - my $pluginTempPath = $info->{'plugin-temp-path'}; - - return; -} - -1; diff --git a/os-plugins/plugins/profile/XX_profile.sh b/os-plugins/plugins/profile/XX_profile.sh deleted file mode 100644 index 1589bd61..00000000 --- a/os-plugins/plugins/profile/XX_profile.sh +++ /dev/null @@ -1,31 +0,0 @@ -# Copyright (c) 2009 - OpenSLX GmbH -# -# This program/file 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 feedback to feedback@openslx.org -# -# General information about OpenSLX can be found at http://openslx.org -# -# script is included from init via the "." load function - thus it has all -# variables and functions available - -# check if the plugin config directory is generally available or if the client -# configuration failed somehow -[ -d /initramfs/plugin-conf ] || error "${init_picfg}" nonfatal - -# main script -if [ -e /initramfs/plugin-conf/profile.conf ]; then - . /initramfs/plugin-conf/profile.conf - - if [ $profile_active -ne 0 ]; then - [ $DEBUGLEVEL -gt 0 ] && echo "executing the 'profile' os-plugin ..."; - - - - [ $DEBUGLEVEL -gt 0 ] && echo "done with 'profile' os-plugin ..."; - - fi - -fi |