diff options
Diffstat (limited to 'src/lib/OpenSLX/ConfigFolder.pm')
-rw-r--r-- | src/lib/OpenSLX/ConfigFolder.pm | 33 |
1 files changed, 31 insertions, 2 deletions
diff --git a/src/lib/OpenSLX/ConfigFolder.pm b/src/lib/OpenSLX/ConfigFolder.pm index fd52821e..ac5d9325 100644 --- a/src/lib/OpenSLX/ConfigFolder.pm +++ b/src/lib/OpenSLX/ConfigFolder.pm @@ -21,7 +21,9 @@ $VERSION = 1.01; @EXPORT = qw( &createConfigFolderForDefaultSystem + &createConfigFolderForDefaultVendorOS &createConfigFolderForSystem + &createConfigFolderForVendorOS ); =head1 NAME @@ -66,7 +68,8 @@ required folders & files already existed. sub createConfigFolderForDefaultSystem { my $result = 0; - my $defaultConfigPath = "$openslxConfig{'private-path'}/config/default"; + my $defaultConfigPath = + "$openslxConfig{'private-path'}/config/stage3/default"; if (!-e "$defaultConfigPath/initramfs") { slxsystem("mkdir -p $defaultConfigPath/initramfs"); $result = 1; @@ -111,6 +114,18 @@ sub createConfigFolderForDefaultSystem return $result; } +sub createConfigFolderForDefaultVendorOS +{ + my $result = 0; + my $defaultConfigPath = + "$openslxConfig{'private-path'}/config/stage1/default"; + if (!-e "$defaultConfigPath/rootfs") { + slxsystem("mkdir -p $defaultConfigPath/rootfs"); + $result = 1; + } + return $result; +} + =item B<createConfigFolderForSystem($systemName)> Creates the configuration folder for the system whose name has been given in @@ -135,7 +150,7 @@ sub createConfigFolderForSystem my $result = 0; my $systemConfigPath - = "$openslxConfig{'private-path'}/config/$systemName/default"; + = "$openslxConfig{'private-path'}/config/stage3/$systemName/default"; if (!-e "$systemConfigPath/initramfs") { slxsystem("mkdir -p $systemConfigPath/initramfs"); $result = 1; @@ -147,6 +162,20 @@ sub createConfigFolderForSystem return $result; } +sub createConfigFolderForVendorOS +{ + my $vendorOSName = shift || confess "need to pass in system-name!"; + + my $result = 0; + my $vendorOSConfigPath + = "$openslxConfig{'private-path'}/config/stage1/$vendorOSName"; + if (!-e "$vendorOSConfigPath") { + slxsystem("mkdir -p $vendorOSConfigPath/rootfs"); + $result = 1; + } + return $result; +} + =back =cut |