check_log + E-mail alerts [FROM NAGIOS]

# vim check_log
#! /bin/sh
##从nagios 插件当中提取出来作为一个单独的脚本来跑
##另外加了smtp.pl作为发信程序

ECHO="/bin/echo"
GREP="/bin/egrep"
DIFF="/usr/bin/diff"
TAIL="/usr/bin/tail"
CAT="/bin/cat"
RM="/bin/rm"
CHMOD="/bin/chmod"
TOUCH="/bin/touch"


##定义邮件发送
PERL="/usr/bin/perl"
#邮件发送脚本
PWD="/bin/pwd"
SENTMAIL="$PWD/smtp.pl"
#标题 [自己来定义邮件 的主题.我是拿来作mysql 日志报警的]
NAME="MYSQL-ERROR-日志报警"
INPUT1=`ifconfig eth0 | grep 'inet addr'  | awk '{print $2}' | awk -F: '{print $2}'`
INPUT1="$INPUT1--$NAME"

PROGNAME=`/bin/basename $0`
PROGPATH=`echo $0 | sed -e 's,[\\/][^\\/][^\\/]*$,,'`
REVISION="1.4.15"

print_usage() {
    echo "Usage: $PROGNAME -F logfile -O oldlog -q query"
    echo "Usage: $PROGNAME --help"
    echo "Usage: $PROGNAME --version"
}

print_help() {
    echo ""
    print_usage
    echo ""
}

if [ $# -lt 1 ]; then
    print_usage
    exit $STATE_UNKNOWN
fi

# Make sure the correct number of command line
# arguments have been supplied

while test -n "$1"; do
    case "$1" in
        --help)
            print_help
            exit
            ;;
        -h)
            print_help
            exit
            ;;
        --version)
            echo $PROGNAME $REVISION
            exit
            ;;
        -V)
            echo $PROGNAME $REVISION
            exit
            ;;
        --filename)
            logfile=$2
            shift
            ;;
        -F)
            logfile=$2
            shift
            ;;
        --oldlog)
            oldlog=$2
            shift
            ;;
        -O)
            oldlog=$2
            shift
            ;;
        --query)
            query=$2
            shift
            ;;
        -q)
            query=$2
            shift
            ;;
        -x)
            exitstatus=$2
            shift
            ;;
        --exitstatus)
            exitstatus=$2
            shift
            ;;
        *)
            echo "Unknown argument: $1"
            print_usage
            exit
            ;;
    esac
    shift
done

# If the source log file doesn't exist, exit

if [ ! -e $logfile ]; then
    $ECHO "Log check error: Log file $logfile does not exist!\n"
    exit
elif [ ! -r $logfile ] ; then
    $ECHO "Log check error: Log file $logfile is not readable!\n"
    exit
fi

# If the old log file doesn't exist, this must be the first time
# we're running this test, so copy the original log file over to
# the old diff file and exit

#初使化日志文件
if [ ! -e $oldlog ]; then
    $CAT $logfile > $oldlog
    $ECHO "Log check data initialized..."
    exit
fi

# The old log file exists, so compare it to the original log now

# The temporary file that the script should use while
# processing the log file.
if [ -x /bin/mktemp ]; then
    tempdiff=`/bin/mktemp /tmp/check_log.XXXXXXXXXX`
else
    tempdiff=`/bin/date '+%H%M%S'`
    tempdiff="/tmp/check_log.${tempdiff}"
    $TOUCH $tempdiff
    $CHMOD 600 $tempdiff
fi
#用linux的diff工具，对比两个文件，并以grep提取"关键字”，如果有输出，则表明有异常

$DIFF $logfile $oldlog | $GREP -v "^>" |sed 1d | sed 's/< //'> $tempdiff

# matching log entries we have
#整个tempdiff文件的内容
content=`$CAT $tempdiff`
#tempdiff中包含有$query的字段
querycontent=`$GREP  "$query" $tempdiff`
if [ ! -z "$content" ]; then

    if [ "$querycontent" != "" ];then
       perl smtp.pl  $INPUT1 $tempdiff
    else
       $ECHO "status is OK  no error!!"
    fi
    $CAT $logfile > $oldlog
fi
$RM -f $tempdiff


# vim smtp.pl#!/usr/bin/perl
use Net::SMTP;
my ($input1,$input2) = @ARGV;
my $mailhost = "smtp.xxx.net"; # the smtp host
my $mailfrom = '[e-mail]'; # your email address
my @mailto = ('[e-mail]'); # the recipient list
my $subject = $input1;
my $text = `/bin/cat $input2`;


$smtp = Net::SMTP->new($mailhost, Hello => 'localhost', Timeout => 120);

# anth login, type your user name and password here
$smtp->auth('username','password');

foreach my $mailto (@mailto) {
    # Send the From and Recipient for the mail servers that require it
    $smtp->mail($mailfrom);
    $smtp->to($mailto);

    # Start the mail
    $smtp->data();

    # Send the header
    $smtp->datasend("To: $mailto\n");
    $smtp->datasend("From: $mailfrom\n");
    $smtp->datasend("Subject: $subject\n");
    $smtp->datasend("\n");

    # Send the message
    $smtp->datasend("$text\n\n");

    # Send the termination string
    $smtp->dataend();
}
$smtp->quit;