Fix network interface discovery script

tags/zabbix-agent-addons-0.2.20-1
Daniel Berteaud 12 years ago
parent 9983c2ea30
commit beadda2634
  1. 7
      zabbix_scripts/disco_net_interface

@ -7,13 +7,8 @@ my @nics = grep { $_ !~ m/^\./ } readdir($dh);
closedir($dh); closedir($dh);
my $json; my $json;
foreach my $nic (@nics){ foreach my $nic (@nics){
# Untaint $nic and makes sure the name looks OK next unless ($nic =~ m/^(\w+[\.:]?(\d+)?)$/);
next unless ($nic =~ m/^(\w+[\.:]?\d+)$/);
$nic = $1; $nic = $1;
next if (
# skip non links
!-l "/sys/class/net/$nic"
);
push @{$json->{data}}, { "{#IFNAME}" => $nic}; push @{$json->{data}}, { "{#IFNAME}" => $nic};
} }
print to_json($json) if (defined $json->{data}); print to_json($json) if (defined $json->{data});

Loading…
Cancel
Save