社会专题
靓丽女人 黑白社会 硬件网络 天下军事 教育咨询 星新一代 汽车电子 幽默笑话 农村特色 有书有道 软件技术 玄幻奇幻 办公达人 便民服务 免费资源 代码效果 美文园地 寻医问药 健康保健 时尚酷玩 天文地理 科技科幻 美食天下 游山玩水 历史天空 制作教程
FLASH频道
女生游戏 益智游戏 有声艺术 有声故事 电脑运用 休闲游戏 MTV类 运动游戏
聚划算
商旅游玩 装潢装饰 家电家具 服装服饰 健康保健 二手特色 生活必备 数码产品
映讯频道
喜剧片 国内片 情感片 动作片 战争片 纪录之窗 欧美剧集 明星云集 动漫片 港澳台剧 大陆剧 科幻片 恐怖片 浓缩电影 教育教学 艺术无界 一技之长 邻国热剧
下载中心
音体美合 信息社政 英语外语 科学自然 常用软件 语文数学 手机软件 红绿软件
图片中心
制作美图 生活图片 美女欣赏 实物图片 艺术欣赏 风景欣赏
领券购
热销女装 热血男装 生活必须 电子电器 手机电脑 旅游出行 学习艺术 吃货优选
新闻中心
一语惊人 奇闻趣事 热点专栏 曝光台 消费警示 今日观察 IT业界 消费主张 动态备忘 专利之窗
关闭
当前位置:首页社会专题硬件网络
使用swatch实时监控cisco路由器

swatch可以实时监控系统日志文件,在匹配到特定的事件时执行指定的动作。swatch所监控的事件以及对应事件的动作都存放在swatch的配置文件中。预设的配置文件为用户根目录下的.swatchrc。

swatch的功能很多,我这里主要是通过swatch来监控Cisco路由器和H3C交换机端口状态。

我的系统环境为:Gentoo-2007.0_amd64

准备:

1、配置syslog-ng日志服务器以接收日志

2、配置cisco路由器和H3C交换机将日志发送到日志服务器

一、从这里下载最新版的swatch,目前的最新版本是

http://sourceforge.net/project/showfiles.php?group_id=68627

二、安装

#tar swatch-3.2.2.tar.gz

#cd swatch-3.2.2

#perl Makefile.PL

如果出现:

Warning: prerequisite Date::Calc 0 not found at (eva l 1) line 219.

Warning: prerequisite Date::Parse 0 not found at (eva l 1) line 219.

Warning: prerequisite File::Tail 0 not found at (eva l 1) line 219.

Warning: prerequisite Time::HiRes 1.12 not found at (eva l 1) line 219.

则需要安装这个模块,方法是:

#perl -MCPAN -e shell (配置CPAN模块安装环境)

cpan>install Date::Calc

cpan>install Date::Parse

cpan>install File::Tail

cpan>install Time::HiRes

cpan>exit

#perl Makefile.PL

#make

#make test

#make install

#make realclean

三、配置

我的配置文件/usr/local/etc/netdevicerc,主要用于监控监控路由器和交换机的端口状态,一旦发生变化会发邮件报警:

watchfor = /changed state|STATUS CHANGE\(l\)/

mail = user@yourdomain.com, from = "notify \<notify\@yourdomain.com\>"

watchfor指定需要在日志中通过tail配置的关键字,是正则表达式。

注意第二行,我加入了from的指令,即定义swatch发邮件时的发件人,这需要修改swatch的Actions.pm文件,这个这个文件位于:/usr/lib64/perl5/site_perl/5.8.8/Swatch/Actions.pm,在send_email子程序print MAIL_PIPE <<"EOF";前加入以下行:

(my $from_line = $args{'FROM'}) =~ s/:/,/g;

my @mail_body;

my $s_body;

my $temp_mess = $args{'MESSAGE'};

$temp_mess =~ s/administratively//;

if ($temp_mess =~ /Line protocol/) {

@mail_body = (split " ",$temp_mess);

$mail_body[13] =~ s/,//;

$s_body = "$mail_body[3]'s $mail_body[13] is $mail_body[17]!";

} elsif ($temp_mess =~ /h3c/) {

@mail_body = (split " ",$temp_mess);

$mail_body[11] =~ s/://;

$s_body = "$mail_body[3]'s $mail_body[11] is $mail_body[13]!";

} else {

@mail_body = (split " ",$temp_mess);

$mail_body[10] =~ s/,//;

$s_body = "$mail_body[3]'s $mail_body[10] is $mail_body[14]!";

}

对照原始文件修改以下行

print MAIL_PIPE <<"EOF";

From: $from_line

To: $to_line

Subject: $s_body

$args{'MESSAGE'}

EOF

close(MAIL_PIPE);

}

提示:输入修改代码都可运行!
5
酒精度
106
顶一下
相关阅读
内容加载中……