1

我在使用 Nagiosgraph 时遇到问题。我创建了一个 nagios 检查，它通过 SNMP 监视服务器/工作站上的流量，检查的输出是一个长字符串，如下所示：

  OK - traffmon eth0:incoming:170KB:outgoing:1606KB eth1:incoming:1576KB:outgoing:170KB eth2:incoming:156:outgoing:0|lo;incoming;25;outgoing;25 tunl0;incoming;0;outgoing;0 gre0;incoming;0;outgoing;0 sit0;incoming;0;outgoing;0 eth0;incoming;170KB;outgoing;1606KB eth1;incoming;1576KB;outgoing;170KB eth2;incoming;156;outgoing;0

我对前三个接口感兴趣，这就是为什么我用接口（我认为是性能数据）将 eth0、eth1、eth2 从整个字符串中分离出来，并且我按照http://www.novell.com/上的说明进行操作coolsolutions/feature/19843.html我的 service.cfg 中有

  define serviceextinfo{
    host_name                workstation
    service_description      Throughput Monitor
    action_url               /nagiosgraph/cgi-bin/show.cgi?host=$HOSTNAME$&service=$SERVICEDESC$&db=eth0,incoming,outgoing,&geom=500x100&rrdopts%3D-l%200%20-u%2010000%20-t%20Traffic
  }

在我的地图文件中，我写了这个来匹配我感兴趣的东西：

  /output:.*traffmon ([0-9]+), ([0-9]+), ([0-9]+), ([0-9]+), ([0-9]+), ([0-9]+),   ([0-9]+), ([0-9]+), ([0-9]+)/
  and push @s, [ 'eth0',
            ['incoming', 'GAUGE', $2],
            ['outgoing', 'GAUGE', $3] ],
         [ 'eth1',
            ['incoming', 'GAUGE', $5],
            ['outgoing', 'GAUGE', $6] ],
         [ 'eth2',
            ['incoming', 'GAUGE', $8],
            ['outgoing', 'GAUGE', $9] ];

我想创建三个表（eth0、eth1、eth2），其中包含两列（传入、传出），然后尝试很好地表示它们。问题是通常我的 rrd 文件是自动创建的，但是为此检查 rrd 文件夹中带有工作站名称的文件夹没有创建，.rrd 文件也没有创建，我觉得它有事情要做使用地图文件，可能匹配不起作用或什么（我这么说是因为我现在不使用 perl）。任何建议表示赞赏。谢谢

4

1 回答 1

1

你可以试试这个正则表达式：

/traffmon eth0:incoming:(\d+)(?:KB):outgoing:(\d+)(?:KB) eth1:incoming:(\d+)(?:KB):outgoing:(\d+)(?:KB) eth2:incoming:(\d+):outgoing:(\d+)/

您可以在 rubular 上对其进行测试：http: //rubular.com/r/vj7VXwDPPU

我不熟悉您的 nagios 系统是如何工作的，但如果有更多 perl 代码的空间，您还可以执行以下操作：

my $res = 'OK - traffmon eth0:incoming:170KB:outgoing:1606KB eth1:incoming:1576KB:outgoing:170KB eth2:incoming:156:outgoing:0|lo;incoming;25;outgoing;25 tunl0;incoming;0;outgoing;0 gre0;incoming;0;outgoing;0 sit0;incoming;0;outgoing;0 eth0;incoming;170KB;outgoing;1606KB eth1;incoming;1576KB;outgoing;170KB eth2;incoming;156;outgoing;0';
my @s;
push @s, map { 
    my @f = split /:/;
    [ $f[0], [$f[1], 'GAUGE', $f[2] ], [$f[3], 'GAUGE', $f[4]] ]
  } (split(/ |\|/, $res))[3..5];
print Dumper @s;

这会将字符串拆分为空格或管道|，获取第 3 到第 5 个元素（即前三个接口），然后对它们进行循环。它在冒号上拆分:，构建您的数据结构并为每个接口返回它。返回的数据结构被推入@s.

输出：

$VAR1 = [
          'eth0',
          [
            'incoming',
            'GAUGE',
            '170KB'
          ],
          [
            'outgoing',
            'GAUGE',
            '1606KB'
          ]
        ];
$VAR2 = [
          'eth1',
          [
            'incoming',
            'GAUGE',
            '1576KB'
          ],
          [
            'outgoing',
            'GAUGE',
            '170KB'
          ]
        ];
$VAR3 = [
          'eth2',
          [
            'incoming',
            'GAUGE',
            '156'
          ],
          [
            'outgoing',
            'GAUGE',
            '0'
          ]
        ];
于 2012-06-29T09:15:06.513 回答