Mojo::Zabbix is a simple perl wrapper of Zabbix API. We build only authentication and request methods and few helper methods to simplify calling methods such ascreate/get/update/delete/exists.
Mojo::Zabix - 是对zabbix api函数的简单打包，以便更易于用perl脚本进行
访问操作zabbix。目前仅支持认证和请求方法，可以用其进行create/get
/update/delete/exists方法调用，见例子。本模块基于Mojo::useragent，结果
用Mojo:DOM进行处理和内容提取。
本模块依赖Mojo，建议使用cpan包安装cpanm Mojo::Zabbix
- [Zabbix API Wiki](http://www.zabbix.org/)
- [Zabbix 1.8 API](http://www.zabbix.com/documentation/1.8/api)
- [Zabbix 2.0 API](http://www.zabbix.com/documentation/2.0/)
- [Zabbix 2.2 API](https://www.zabbix.com/documentation/2.2/)
- [Zabbix 3.0 API](https://www.zabbix.com/documentation/3.0/)
- [Zabbix 3.2 API](https://www.zabbix.com/documentation/3.2/)
- [Zabbix 3.4 API](https://www.zabbix.com/documentation/3.4/)
- [Zabbix 4.0 API](https://www.zabbix.com/documentation/4.0/)
- [Zabbix 5.0 API](https://www.zabbix.com/documentation/5.0/)
The module is compatible and tested with Zabbix less version 5.0
本模块目前仅在5.0以前的模块下测试，5.0下基本可以使用，但是未严格测试
use Mojo::Zabbix;
my $z = Net::Zabbix->new(
url => "https://server/zabbix/",
username => 'user',
password => 'pass',
verify_ssl => 0,
debug => 1,
trace => 0,
);
my $r = $z->get("host", {
filter => undef,
search => {
host => "test",
},
}
);
print $z->get("apiinfo.version",)->{result},"\n";
print getTriggers($z); # 该函数和其他函数已经打包到Mojo::Zabbix::APP
sub getTriggers {
my $z=shift;
my $ysterday=localtime(time()-24*3600);
my $r = $z->get("trigger", {
filter => {value => 1,
lastChangeSince => "$ysterday",
'withUnacknowledgedEvents'=>1,
},
output => ["","triggerid","description","priority"],
sortfield =>"priority",
sortorder => "DESC",
expandData=>"host",
},
);
my $result;
my $host=$r->{'result'};
for (@$host){
$result.="$_->{'host'}:".$_->{'description'}."\n" ;
}
return $result;
}
xxx.xxx.xx.55: {HOST.CONN}服务器的84端口down
xxx.xxx.xx.55: {HOST.CONN}服务器的81端口down
xxx.xxx.xx.55: {HOST.CONN}服务器的82端口down
xxx.xxx.xx.55.9: {HOST.CONN}服务器的80端口down
xxx.xxx.xx.12: {HOST.NAME} 服务器负载较高，请及时查看
xxx.xxx.xx.124: 磁盘sdb利用率超过95%，当前值为{ITEM.LASTVALUE}
xxx.xxx.xx.44: 磁盘sdb利用率超过95%，当前值为{ITEM.LASTVALUE}
xxx.xxx.xx.45: 磁盘sdb利用率超过95%，当前值为{ITEM.LASTVALUE}
xxx.xxx.xx.33: 磁盘sdb利用率超过95%，当前值为{ITEM.LASTVALUE}
xxx.xxx.xx.56: 磁盘sda利用率超过95%，当前值为{ITEM.LASTVALUE}
xxx.xxx.xx.57: 磁盘sda利用率超过95%，当前值为{ITEM.LASTVALUE}
XX_10.2.7.20_
实时数据:
ESTABLISHED链接 - { connections.status[ESTABLISHED] } : 9
SYN链接 - { connections.status[SYN] } : 0
网卡$1的出口流量 - { net.if.out[bond0] } : 5176
负载 - { system.cpu.load[,avg1] } : 0.000000
$1剩余inode百分比 - { vfs.fs.inode[/,pfree] } : 99.788211
$1的剩余百分比 - { vfs.fs.size[/,pfree] } : 99.269724
可用内存 - { vm.memory.size[available] } : 261874798592
内存利用率 - { vm.memory.size[pused] } : 4.720467
内存总空间 - { vm.memory.size[total] } : 270763327488
The application of Mojo-Zabbix module。 Get data from zabbix data include host，items, Triggers and warns and so on.
是Mojo::Zabix模块的应用模块，对zabbix api常见模块进行打包 可以方便的获取zabbix信息，目前包括zabbix版本，主机列表，监控列表，触发器，警告 等，可以根据需求提供更多的操作。
use Mojo::Zabbix::APP;
my @myzinfo = <DATA>; ##(get zabbix info from __DATA__ )
my $DEBUG=0;
my $TRACE=0;
my @myzinfo = ('test1 http://test1/zabbix testuser pass');
@可以定义为多行数据，格式按照这种，一个zabbix 服务地址一个
for (@myzinfo) {
next if /^#/;
next if /^\s*$/;
my ( $name, $url,$user, $pass ) = split;
print "\n$name\n";
my $z;
eval { $z = initZ( $url,$user,$pss ); };
if ($@) {
print "Error $@!\n";
} else {
## Print the version of zabbix api. 打印zabbix 版本
pVersion($z);
## Print all host lists。 获取所有的主机列表
print getAllhost($z);
## Print warning info of Triggers。打印取得的所有触发器告警信息
pTriggers($z);
## Print the history data of given items, default for past 24 hours.
## 打印给定时间段的item历史数据，如果默认不给时间默认为过去24小时内的
pHitems($z); # 打印实时监控数据
}
}
name
Warning info of Triggers
2016-10-19 23:29:57 : 192.168.1.* : {HOST.NAME}上的80端口关闭
2016-10-19 22:58:28 : 192.168.2.* : 系统目录/etc/sysconfig/发生变化
2016-10-19 22:24:32 : 192.168.3.* : 系统目录/etc/init.d/发生变化
2016-10-19 19:12:53 : 192.168.3.* : 磁盘sda IO利用率超过95%
2016-10-19 18:03:03 : 192.168.4.* : Too many processes on {HOST.NAME}
wo can add the program to crontab and gain the result for mail or some Im tool.
我们可以通过cron定时调用程序获得结果，也可以通过IM工具（qq，微信）， 目前有个Mojo-webqq的插件,交互 性获取监控数据。
This software is copyright (c) 2016 by oragnge.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself..