summaryrefslogtreecommitdiff
path: root/scripts/vyatta-show-interfaces.pl
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/vyatta-show-interfaces.pl')
-rwxr-xr-xscripts/vyatta-show-interfaces.pl17
1 files changed, 3 insertions, 14 deletions
diff --git a/scripts/vyatta-show-interfaces.pl b/scripts/vyatta-show-interfaces.pl
index a776d65..02ad8e0 100755
--- a/scripts/vyatta-show-interfaces.pl
+++ b/scripts/vyatta-show-interfaces.pl
@@ -24,7 +24,8 @@
#
use lib "/opt/vyatta/share/perl5/";
-use VyattaConfig;
+use Vyatta::Config;
+use Vyatta::Misc;
use Getopt::Long;
use POSIX;
use NetAddr::IP;
@@ -93,7 +94,7 @@ sub get_intf_description {
if (!defined $intf_type) {
return "";
}
- my $config = new VyattaConfig;
+ my $config = new Vyatta::Config;
my $path;
if ($intf =~ m/([a-zA-Z]+\d+)\.(\d+)/) {
$path = "interfaces $intf_type $1 vif $2";
@@ -109,18 +110,6 @@ sub get_intf_description {
}
}
-sub get_sysfs_value {
- my ($intf, $name) = @_;
-
- open (my $statf, '<', "/sys/class/net/$intf/$name")
- or die "Can't open statistics file /sys/class/net/$intf/$name";
-
- my $value = <$statf>;
- chomp $value if defined $value;
- close $statf;
- return $value;
-}
-
sub get_intf_stats {
my $intf = shift;