master
Heuzef 5 years ago
parent 547543d14c
commit d45e06fa7c
  1. 12
      Check.pm

@ -29,7 +29,7 @@ use Data::Dumper;
sub action sub action
{ {
# Init # Init
my($str, $strNone, $strGood, $hostCntGood, $hostCntNone, $frequence, $header); my($str, $strNone, $strGood, $hostCntGood, $hostCntNone, $frequency, $header);
$hostCntGood = $hostCntNone = 0; $hostCntGood = $hostCntNone = 0;
GetStatusInfo("hosts info"); GetStatusInfo("hosts info");
@ -50,11 +50,11 @@ sub action
next if ( $Conf{XferMethod} eq "archive" ); next if ( $Conf{XferMethod} eq "archive" );
next if ( !$Privileged && !CheckPermission($host) ); next if ( !$Privileged && !CheckPermission($host) );
# Get frequence for this host # Get frequency for this host
if ( $Conf{IncrPeriod} < $Conf{FullPeriod} ) { if ( $Conf{IncrPeriod} < $Conf{FullPeriod} ) {
$frequence = $Conf{IncrPeriod}; $frequency = $Conf{IncrPeriod};
} else { } else {
$frequence = $Conf{FullPeriod}; $frequency = $Conf{FullPeriod};
} }
# Age # Age
@ -83,7 +83,7 @@ sub action
} }
# Color for age # Color for age
if ( $lastAge < $frequence ) { if ( $lastAge < $frequency ) {
$lastAgeColor = "MediumSeaGreen"; $lastAgeColor = "MediumSeaGreen";
} else { } else {
$lastAgeColor = "Tomato"; $lastAgeColor = "Tomato";
@ -216,7 +216,7 @@ my $browseFile = "?action=browse&host=$host";
# Show summary # Show summary
$str = <<EOF; $str = <<EOF;
<tr$reasonHilite><td class="border">${HostLink($host)}</td> <tr$reasonHilite><td class="border">${HostLink($host)}</td>
<td align="center" class="border" style="color:$lastAgeColor;">$lastAge <em>(Freq: $frequence)</em></td> <td align="center" class="border" style="color:$lastAgeColor;">$lastAge <em>(Freq: $frequency)</em></td>
<td align="center" class="border" style="color:$lastXferErrorsColor;">$lastXferErrors</td> <td align="center" class="border" style="color:$lastXferErrorsColor;">$lastXferErrors</td>
<td align="center" class="border" style="color:$sizeConsistencyColor;">$sizeConsistency</td> <td align="center" class="border" style="color:$sizeConsistencyColor;">$sizeConsistency</td>
<td align="center" class="border"><a href="$browseFile" target="_blank">Explore files ...</a></td> <td align="center" class="border"><a href="$browseFile" target="_blank">Explore files ...</a></td>

Loading…
Cancel
Save