* moved code from MakeInitRamFS::Engine that determines the list of available

  busybox applets into a separate function
* use this function in OSSetup::Engine instead of relying on busybox.links,
  which may not be kept in sync.

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

1 files changed, 26 insertions, 0 deletions

diff --git a/lib/OpenSLX/Utils.pm b/lib/OpenSLX/Utils.pm
index 346e9d4d..6ebd4d7c 100644
--- a/lib/OpenSLX/Utils.pm
+++ b/lib/OpenSLX/Utils.pm
@@ -34,6 +34,7 @@ $VERSION = 1.01;
   getFQDN
   readPassword
   hostIs64Bit
+  getAvailableBusyboxApplets
 );
 
 =head1 NAME
@@ -558,4 +559,29 @@ sub hostIs64Bit
     return $arch =~ m[64];
 }
 
+=item B<getAvailableBusyboxApplets()>
+
+Returns the list of the applets that is provided by the given busybox binary.
+
+=cut
+
+sub getAvailableBusyboxApplets
+{
+    my $busyboxBinary = shift;
+
+    my $busyboxHelp = qx{$busyboxBinary --help};
+    if ($busyboxHelp !~ m{defined functions:(.+)\z}ims) {
+        die "unable to parse busybox --help output:\n$busyboxHelp";
+    }
+    my $rawAppletList = $1;
+    my @busyboxApplets 
+        =    map {
+                $_ =~ s{\s+}{}igms;
+                $_;
+            }
+            split m{,}, $rawAppletList;
+            
+    return @busyboxApplets;
+}
+
 1;