qi-hardware/wernermisc
1
0
Fork 0
mirror of git://projects.qi-hardware.com/wernermisc.git synced 2024-11-23 11:46:15 +02:00
Code

bin/snmp6: monitor IPv6 statistics in /proc/net/snmp6

Browse Source
This commit is contained in:
Werner Almesberger 2013-07-10 00:49:55 -03:00
parent 0153edd639
commit b99342358f
1 changed files with 29 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
bin/snmp6 Executable file
View File

@ -0,0 +1,29 @@
#!/usr/bin/perl
# Show /proc/net/snmp6 continuously. Loosely based on
# http://svn.openmoko.org//developers/werner/bin/snmp
#
# usage: snmp6 <interval>
#
$SNMP = "/proc/net/snmp6";
$LINE = 78;
$continuous = $ARGV[0];
do {
open(PROC, $SNMP) || die "open $SNMP: $!";
while (<PROC>) {
die unless /^(\S+)(\s+)(\d+)$/;
if (!defined $last{$1}) {
print;
} elsif ($last{$1} != $3) {
printf "$1$2%+d\n", $3-$last{$1};
}
$last{$1} = $3;
}
close(PROC);
if ($continuous) {
sleep($continuous);
print (("-"x$LINE)."\n");
}
$more = 1;
}
until (!$continuous);