diff options
Diffstat (limited to 'installer/OpenSLX/OSExport/Distro')
| -rw-r--r-- | installer/OpenSLX/OSExport/Distro/Any.pm | 50 | ||||
| -rw-r--r-- | installer/OpenSLX/OSExport/Distro/Debian.pm | 49 | ||||
| -rw-r--r-- | installer/OpenSLX/OSExport/Distro/Fedora.pm | 53 | ||||
| -rw-r--r-- | installer/OpenSLX/OSExport/Distro/Gentoo.pm | 49 | ||||
| -rw-r--r-- | installer/OpenSLX/OSExport/Distro/SUSE.pm (renamed from installer/OpenSLX/OSExport/Distro/SUSE_10_2.pm) | 16 | ||||
| -rw-r--r-- | installer/OpenSLX/OSExport/Distro/Ubuntu.pm | 51 |
6 files changed, 256 insertions, 12 deletions
diff --git a/installer/OpenSLX/OSExport/Distro/Any.pm b/installer/OpenSLX/OSExport/Distro/Any.pm new file mode 100644 index 00000000..da579dd1 --- /dev/null +++ b/installer/OpenSLX/OSExport/Distro/Any.pm @@ -0,0 +1,50 @@ +# Any.pm +# - provides generic overrides of the OpenSLX OSExport API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# +package OpenSLX::OSExport::Distro::Any; + +use vars qw(@ISA $VERSION); +@ISA = ('OpenSLX::OSExport::Distro::Base'); +$VERSION = 1.01; # API-version . implementation-version + +use strict; +use Carp; +use OpenSLX::Basics; +use OpenSLX::OSExport::Distro::Base 1.01; + +################################################################################ +### implementation +################################################################################ +sub new +{ + my $class = shift; + my $self = { + 'base-name' => 'any', + }; + return bless $self, $class; +} + +sub initDistroInfo +{ + my $self = shift; + + $self->{'export-filter'} = " + - /var/tmp/* + - /var/spool/* + - /var/run/* + - /var/lock/* + - /var/log/* + - /var/lib/xdm + - /var/cache/man/* + - /usr/share/vmware/* + - /lib/klibc/events/* + - /boot/initrd* + - /boot/grub + "; +} + +1;
\ No newline at end of file diff --git a/installer/OpenSLX/OSExport/Distro/Debian.pm b/installer/OpenSLX/OSExport/Distro/Debian.pm new file mode 100644 index 00000000..5056c877 --- /dev/null +++ b/installer/OpenSLX/OSExport/Distro/Debian.pm @@ -0,0 +1,49 @@ +# Debian.pm +# - provides Debian-specific overrides of the OpenSLX OSExport API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# +package OpenSLX::OSExport::Distro::Debian; + +use vars qw(@ISA $VERSION); +@ISA = ('OpenSLX::OSExport::Distro::Base'); +$VERSION = 1.01; # API-version . implementation-version + +use strict; +use Carp; +use OpenSLX::Basics; +use OpenSLX::OSExport::Distro::Base 1.01; + +################################################################################ +### implementation +################################################################################ +sub new +{ + my $class = shift; + my $self = { + 'base-name' => 'debian', + }; + return bless $self, $class; +} + +sub initDistroInfo +{ + my $self = shift; + + $self->{'export-filter'} = " + - /var/tmp/* + - /var/spool/* + - /var/run/* + - /var/log/* + - /var/lib/xdm + - /var/cache/man/* + - /usr/share/vmware/* + - /lib/klibc/events/* + - /boot/initrd* + - /boot/grub + "; +} + +1;
\ No newline at end of file diff --git a/installer/OpenSLX/OSExport/Distro/Fedora.pm b/installer/OpenSLX/OSExport/Distro/Fedora.pm new file mode 100644 index 00000000..b518008a --- /dev/null +++ b/installer/OpenSLX/OSExport/Distro/Fedora.pm @@ -0,0 +1,53 @@ +# Fedora.pm +# - provides Fedora-specific overrides of the OpenSLX OSExport API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# +package OpenSLX::OSExport::Distro::Fedora; + +use vars qw(@ISA $VERSION); +@ISA = ('OpenSLX::OSExport::Distro::Base'); +$VERSION = 1.01; # API-version . implementation-version + +use strict; +use Carp; +use OpenSLX::Basics; +use OpenSLX::OSExport::Distro::Base 1.01; + +################################################################################ +### implementation +################################################################################ +sub new +{ + my $class = shift; + my $self = { + 'base-name' => 'fedora', + }; + return bless $self, $class; +} + +sub initDistroInfo +{ + my $self = shift; + + # TODO: check and refine this! + $self->{'export-filter'} = " + - /var/tmp/* + - /var/spool/* + - /var/run/* + - /var/lock/* + - /var/log/* + - /var/lib/xdm + - /var/cache/man/* + - /usr/share/vmware/* + - /lib/klibc/events/* + - /boot/initrd* + - /boot/grub + - *.rpmsave + - *.rpmnew + "; +} + +1;
\ No newline at end of file diff --git a/installer/OpenSLX/OSExport/Distro/Gentoo.pm b/installer/OpenSLX/OSExport/Distro/Gentoo.pm new file mode 100644 index 00000000..5dbcb652 --- /dev/null +++ b/installer/OpenSLX/OSExport/Distro/Gentoo.pm @@ -0,0 +1,49 @@ +# Gentoo.pm +# - provides Gentoo-specific overrides of the OpenSLX OSExport API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# +package OpenSLX::OSExport::Distro::Gentoo; + +use vars qw(@ISA $VERSION); +@ISA = ('OpenSLX::OSExport::Distro::Base'); +$VERSION = 1.01; # API-version . implementation-version + +use strict; +use Carp; +use OpenSLX::Basics; +use OpenSLX::OSExport::Distro::Base 1.01; + +################################################################################ +### implementation +################################################################################ +sub new +{ + my $class = shift; + my $self = { + 'base-name' => 'gentoo', + }; + return bless $self, $class; +} + +sub initDistroInfo +{ + my $self = shift; + + $self->{'export-filter'} = " + - /var/tmp/* + - /var/spool/* + - /var/run/* + - /var/log/* + - /var/lib/xdm + - /var/lib/init.d/* + - /var/cache/man/* + - /usr/share/vmware/* + - /boot/initrd* + - /boot/grub + "; +} + +1;
\ No newline at end of file diff --git a/installer/OpenSLX/OSExport/Distro/SUSE_10_2.pm b/installer/OpenSLX/OSExport/Distro/SUSE.pm index 6c3fb07a..c760eeb9 100644 --- a/installer/OpenSLX/OSExport/Distro/SUSE_10_2.pm +++ b/installer/OpenSLX/OSExport/Distro/SUSE.pm @@ -1,11 +1,11 @@ -# SUSE_10_2.pm -# - provides SUSE-10.2-specific overrides of the OpenSLX OSExport API. +# SUSE.pm +# - provides SUSE-specific overrides of the OpenSLX OSExport API. # # (c) 2006 - OpenSLX.com # # Oliver Tappe <ot@openslx.com> # -package OpenSLX::OSExport::Distro::SUSE_10_2; +package OpenSLX::OSExport::Distro::SUSE; use vars qw(@ISA $VERSION); @ISA = ('OpenSLX::OSExport::Distro::Base'); @@ -23,19 +23,11 @@ sub new { my $class = shift; my $self = { - 'base-name' => 'suse-10.2', + 'base-name' => 'suse', }; return bless $self, $class; } -sub initialize -{ - my $self = shift; - my $engine = shift; - - $self->SUPER::initialize($engine); -} - sub initDistroInfo { my $self = shift; diff --git a/installer/OpenSLX/OSExport/Distro/Ubuntu.pm b/installer/OpenSLX/OSExport/Distro/Ubuntu.pm new file mode 100644 index 00000000..52062a87 --- /dev/null +++ b/installer/OpenSLX/OSExport/Distro/Ubuntu.pm @@ -0,0 +1,51 @@ +# Ubuntu.pm +# - provides Ubuntu-specific overrides of the OpenSLX OSExport API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# +package OpenSLX::OSExport::Distro::Ubuntu; + +use vars qw(@ISA $VERSION); +@ISA = ('OpenSLX::OSExport::Distro::Base'); +$VERSION = 1.01; # API-version . implementation-version + +use strict; +use Carp; +use OpenSLX::Basics; +use OpenSLX::OSExport::Distro::Base 1.01; + +################################################################################ +### implementation +################################################################################ +sub new +{ + my $class = shift; + my $self = { + 'base-name' => 'ubuntu', + }; + return bless $self, $class; +} + +sub initDistroInfo +{ + my $self = shift; + + $self->{'export-filter'} = " + - /var/tmp/* + - /var/spool/* + - /var/run/* + - /var/log/* + - /var/lib/xdm + - /var/cache/man/* + - /usr/share/vmware/* + - /lib/klibc/events/* + - /initrd* + - /etc/cron.*/* + - /boot/initrd* + - /boot/grub + "; +} + +1;
\ No newline at end of file |