From 16f49079d7c3adf2cac8bdca3ae726036ef9c735 Mon Sep 17 00:00:00 2001
From: Oliver Tappe
Date: Fri, 6 Mar 2009 16:51:09 +0000
Subject: closing #393: * added check to config demuxer that will print a
 warning if the slxversions   of the uclibc-rootfs of a vendor-OS does not
 match the current one

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@2695 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 config-db/slxconfig-demuxer | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

(limited to 'config-db/slxconfig-demuxer')

diff --git a/config-db/slxconfig-demuxer b/config-db/slxconfig-demuxer
index 21c95ae9..00b269fd 100755
--- a/config-db/slxconfig-demuxer
+++ b/config-db/slxconfig-demuxer
@@ -623,6 +623,20 @@ sub writeSystemConfiguration
         )
     );
 
+    # check if uclibc-rootfs in corresponding vendor-OS matches the current
+    # version and add a warning if it does not:
+    my $uclibcVersionPath 
+        = "$openslxConfig{'private-path'}/stage1/$info->{'vendor-os'}->{name}/opt/openslx/uclib-rootfs.version";
+    chomp(my $uclibcVersion = slurpFile($uclibcVersionPath));
+    chomp(my $currVersion = qx{slxversion});
+    if ($uclibcVersion ne $currVersion) {
+        warn _tr(
+            "uclibc-rootfs for system '%s' is not up-to-date - consider updating the vendor-OS!",
+            $info->{name}, $uclibcVersion, $currVersion
+        );
+    }
+    
+
     my $attrProblems = OpenSLX::AttributeRoster->findProblematicValues(
         $info->{attrs}, $info->{'vendor-os'}->{name}, 
         $info->{'installed-plugins'}
-- 
cgit v1.2.3-55-g7522