diff --git a/html/cgi-bin/index.cgi b/html/cgi-bin/index.cgi
old mode 100755
new mode 100644
index 54c0d1968..2ae0ecf4c
--- a/html/cgi-bin/index.cgi
+++ b/html/cgi-bin/index.cgi
@@ -417,6 +417,17 @@ foreach my $line (@df) {
 	}
 }
 
+# S.M.A.R.T. health warning
+my @files = `/bin/ls /var/run/smartctl_out_hddtemp-*`;
+foreach my $file (@files) {
+	chomp ($file);
+	my $disk=`echo $file | cut -d"-" -f2`;
+	chomp ($disk);
+	if (`/bin/grep "SAVE ALL DATA" $file`) {
+		$warnmessage .= "$Lang::tr{'smartwarn1'} $disk $Lang::tr{'smartwarn2'}<br>\n";
+	}
+}
+
 if ($warnmessage) {
 	print "<tr><td align='center' bgcolor=$Header::colourred colspan='3'><font color='white'>$warnmessage</font></table>";
 }
diff --git a/langs/de/cgi-bin/de.pl b/langs/de/cgi-bin/de.pl
index 90c57b07e..f62def280 100644
--- a/langs/de/cgi-bin/de.pl
+++ b/langs/de/cgi-bin/de.pl
@@ -1509,6 +1509,8 @@
 'sitekeyfile' => 'Sitekeyfile',
 'size' => 'Größe',
 'smart information' => 'SMART-Informationen',
+'smartwarn1' => 'Warnung! Gerät:',
+'smartwarn2' => 'meldet S.M.A.R.T. Fehler!!!',
 'smbreload' => 'Samba Dienste durchstarten',
 'smbrestart' => 'Samba neustarten',
 'smbstart' => 'Samba Dienste starten',
diff --git a/langs/en/cgi-bin/en.pl b/langs/en/cgi-bin/en.pl
index acf83fa65..c0e560fbb 100644
--- a/langs/en/cgi-bin/en.pl
+++ b/langs/en/cgi-bin/en.pl
@@ -1541,6 +1541,8 @@
 'sitekeyfile' => 'Sitekeyfile',
 'size' => 'Size',
 'smart information' => 'SMART information',
+'smartwarn1' => 'WARNING: Device:',
+'smartwarn2' => 'report S.M.A.R.T. error',
 'smbreload' => 'Samba Dienste durchstarten',
 'smbrestart' => 'restart Samba',
 'smbstart' => 'Samba Dienste starten',