#!/usr/bin/ksh
Path=/tmp
BackupInput=$Path/mksysbChk.input
agedays=/tmp/agedays.pl
ContactNIM=/usr/local/admin/bin/remote.pl
$ContactNIM --host=NIM1 --command=/bin/'ls -al /nim/dr/mksysb/\*'|grep -e _dr -e .tgz|cut -c37-90|cut -d" " -f2-8|cut -d_ -f1 > $BackupInput     # place DC1 clients into the list
$ContactNIM --host=NIM2 --command=/bin/'ls -al /nim/dr/mksysb/\*'|grep -e _dr -e .tgz|cut -c37-90|cut -d" " -f2-8|cut -d_ -f1 >> $BackupInput   # append DC2 clients into the list
BackupMsg=$Path/mksysbChk.msg                  # setup mail strings
BackupTitle='mksysb Status Report'
BackupAdm='XXXX@XXXX.com'

if [[ ! -s $BackupInput ]]
then
   BackupMsg='ERROR - unable to communicate with the NIM servers and verify mksysb status - NO notifications sent'
   mail -s "$BackupTitle" $BackupAdm < $BackupMsg
   exit
fi   # connection to NIM servers lost, aborting!!!

BackupOutput=$Path/mksysbChk.output

if [[ -e $BackupOutput ]]
then
   rm $BackupOutput
fi


PrevHostname=''
PrevBackup=1000

while read input
do
  if [[ ${input:9:1} = ':' ]]
  then
     DateStr="${input:0:3} ${input:4:2} $(date +%Y)"
  else
     DateStr="${input:0:3} ${input:4:2} 20${input:10:2}"
  fi
  BackupAge=$(agedays.pl "$DateStr")

 if [[ $PrevHostname = '' ]]
 then
      PrevHostname=$Hostname
      PrevBackup=$BackupAge
 else if [[ $PrevHostname != $Hostname ]]
      then
          echo $PrevBackup $PrevHostname >> $BackupOutput
          PrevHostname=$Hostname
          PrevBackup=$BackupAge
      else if (( $BackupAge < $PrevBackup ))
           then
               PrevBackup=$BackupAge
           fi
      fi
  fi
done < $BackupInput
echo $PrevBackup $PrevHostname >> $BackupOutput   # write out final record

if [[ -e $BackupMsg ]]
then
    rm $BackupMsg
fi
SupportedHosts=/tmp/aix.lst                    # daily extract of the supported hostnames
while read Hostname                            # match supported hostnames with mksysbChk.files & determine status (current/stale/missing)
do BackupAge=`grep $Hostname $BackupOutput|tail -1 | cut -d' ' -f 1`   # actual match
   if [[ $BackupAge == '' ]]
   then
       echo "$Hostname\tMissing\tmksysb" >> $BackupMsg
   else if [[ $BackupAge > 0 ]]
        then
           echo "$Hostname\tStale\tmksysb" >> $BackupMsg
        fi
   fi
done < $SupportedHosts
mail -s "$BackupTitle" $BackupAdm < $BackupMsg   # for testing ONLY!

#!//usr/local/bin/perl
use POSIX;
use Time::Local;

my %mon;
@mon{qw/Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec/} = 0..11;

my ($mmm, $dd, $yy) = split(/[-\/ ]/, $ARGV[0]);

printf "%.0f", (time() - timelocal(0,0,0,$dd,$mon{$mmm}, $yy) - 0.4999) / (24*60*60);

./mksysbChk.ksh[38]: agedays.pl: not found [No such file or directory]