#!/usr/bin/perl # Copyright 2000 - 2004 George Shaffer # Anyone may use or modify this code for any purpose PROVIDED # that as long as it is recognizably derived from this code, # that this copyright notice, remains intact and unchanged. # No warrantees of any kind are expressed or implied. # Calculate and save check sums of key directories cd /var/local/logs/cksums echo /boot files > ck`date +%y%m%d`.log md5 /bsd >> ck`date +%y%m%d`.log echo >> ck`date +%y%m%d`.log echo /etc files >> ck`date +%y%m%d`.log find /etc -type f -exec md5 {} \; >> ck`date +%y%m%d`.log echo >> ck`date +%y%m%d`.log echo SUID and GUID files >> ck`date +%y%m%d`.log find / -type f \( -perm -4000 -o -perm -2000 \) -exec md5 {} \; >> ck`date +%y%m%d`.log echo >> ck`date +%y%m%d`.log echo Executable files >> ck`date +%y%m%d`.log find / -type f \( -perm -100 -o -perm -010 -o -perm -001 \) -exec md5 {} \; >> ck`date +%y%m%d`.log echo >> ck`date +%y%m%d`.log echo /var/www/conf files >> ck`date +%y%m%d`.log find /var/www/conf -type f -exec md5 {} \; >> ck`date +%y%m%d`.log ftp -n 192.168.29.86 <