KeepAlived发生故障切换VIP—邮件通知方案1
1、在keepalived配置文件中添加配置
在/etc/keepalived/keepalived.conf文件中配置当前节点成为备节点时触发/usr/local/sendmail.sh
脚本
2、编写邮件通知脚本/usr/local/sendmail.sh
#! /usr/bin/perl -w
use Net::SMTP_auth;
use strict;
#smtp服务器
my $mailhost = 'smtp.qq.com';
#发送邮件的邮箱
my $mailfrom = '913011***@qq.com';
#接收邮件的邮箱,可填多个
my @mailto = ('15773241***@163.com','913011***@qq.com');
#邮件主题
my $subject = 'keepalived up on backup';
#邮件正文
my $text = '通知内容';
#发送邮件的邮箱用户
my $user = '913011***@qq.com';
#发送邮件的邮箱的授权码
my $passwd = 'cozc********bceb';
&SendMail();
sub SendMail(){
my $smtp = Net::SMTP_auth->new($mailhost,Timeout => 120,Debug =>1) or die "Error .\n";
$smtp->auth('LOGIN',$user,$passwd);
foreach my $mailto(@mailto){
$smtp->mail($mailfrom);
$smtp->to($mailto);
$smtp->data();
$smtp->datasend("To:$mailto\n");
$smtp->datasend("From:$mailfrom\n");
$smtp->datasend("Subject:$subject\n");
$smtp->datasend("\n");
$smtp->datasend("$text\n\n");
$smtp->dataend();
}
$smtp->quit;
}
授予脚本可执行权限
chmod +755 sendmail.sh
3、需要安装Net::SMTP_auth
send_mail.sh脚本使用Perl编写,需要安装环境:
yum -y install perl-CPAN
cpan Net::SMTP_auth
依赖环境安装完成后手动执行一下脚本,看是否可以成功发送邮件
./usr/local/sendmail.sh
参考地址
https://www.jianshu.com/p/41b052cfd429
https://www.cnblogs.com/John-2011/p/7838794.html
作者:小念
本文版权归作者和博客园共有,欢迎转载,但必须给出原文链接,并保留此段声明,否则保留追究法律责任的权利。