bughz
/
sigar
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(SIGAR-199) add Arp binding

This commit is contained in:
Doug MacEachern 2010-01-18 15:00:29 -08:00
parent ecd0ad6ab8
commit e804a1b405
1 changed files with 29 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
bindings/SigarWrapper.pm
View File

@ -28,7 +28,7 @@ my %has_name_arg = map { $_, 1 } qw(FileSystemUsage DiskUsage
my %proc_no_arg = map { $_, 1 } qw(stat); my %proc_no_arg = map { $_, 1 } qw(stat);
my %get_not_impl = map { $_, 1 } qw(net_address net_route net_connection net_stat cpu_perc my %get_not_impl = map { $_, 1 } qw(net_address net_route net_connection net_stat cpu_perc
who cpu_info file_system); #list funcs only arp who cpu_info file_system); #list funcs only
sub supported_platforms { sub supported_platforms {
my $p = shift; my $p = shift;
@ -1401,6 +1401,33 @@ use vars qw(%classes %cmds);
plat => '*' plat => '*'
}, },
], ],
Arp => [
{
name => 'ifname', type => 'String',
desc => '',
plat => '*'
},
{
name => 'hwaddr', type => 'NetAddress',
desc => '',
plat => '*'
},
{
name => 'type', type => 'String',
desc => '',
plat => '*'
},
{
name => 'address', type => 'NetAddress',
desc => '',
plat => '*'
},
{
name => 'flags', type => 'Long',
desc => '',
plat => '*'
},
],
Who => [ Who => [
{ {
name => 'user', type => 'String', name => 'user', type => 'String',
@ -2864,7 +2891,7 @@ EOF
my(@nongens) = my(@nongens) =
qw{net_interface_list net_route_list net_connection_list qw{net_interface_list net_route_list net_connection_list
file_system_list cpu_info_list who_list file_system_list cpu_info_list arp_list who_list
loadavg}; loadavg};
sub finish { sub finish {