summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/interface.pl52
-rw-r--r--tests/isip.pl23
2 files changed, 0 insertions, 75 deletions
diff --git a/tests/interface.pl b/tests/interface.pl
deleted file mode 100644
index 9ebeb60..0000000
--- a/tests/interface.pl
+++ /dev/null
@@ -1,52 +0,0 @@
-#! /usr/bin/perl
-
-# Standalone test for Vyatta::Interface, not intended to be used
-# directly
-
-
-use strict;
-use warnings;
-use Vyatta::Interface;
-use Vyatta::Misc;
-
-my @interfaces = getInterfaces();
-print "Interfaces: ", join(' ',@interfaces),"\n";
-
-print "IP\n";
-foreach my $type (qw/all broadcast multicast pointtopoint loopback/) {
- print "\t$type = ";
- foreach my $addr (Vyatta::Misc::getInterfacesIPadresses($type)) {
- print $addr, '(', is_ip_v4_or_v6($addr), ') ';
- }
- print "\n";
-}
-
-
-foreach my $arg (@interfaces) {
- print "$arg : ";
- my $intf = new Vyatta::Interface($arg);
-
- if (! $intf) {
- print "undefined\n";
- next;
- }
-
- my $vif = $intf->vif();
- print "vif=$vif " if $vif;
- printf "path = '%s'\ndevice=%s\n", $intf->path(), $intf->physicalDevice();
-
- my @addresses = $intf->address();
- if ($#addresses eq -1) {
- print "address is no set\n";
- } else {
- print "address ", join(' ',@addresses), "\n";
- }
-
- foreach my $attr (qw(exists configured disabled using_dhcp flags up running)) {
- my $val = $intf->$attr();
- print " $attr=$val" if ($val);
- }
- print "\n";
-}
-
-exit 0;
diff --git a/tests/isip.pl b/tests/isip.pl
deleted file mode 100644
index 35a04b7..0000000
--- a/tests/isip.pl
+++ /dev/null
@@ -1,23 +0,0 @@
-#! /usr/bin/perl
-
-# Standalone test for Vyatta::Misc::isIPInterfaces
-
-use strict;
-use warnings;
-use Vyatta::Misc;
-use Vyatta::Interface;
-
-my $vc;
-my @interfaces = getInterfaces();
-print "Interfaces: ", join(' ',@interfaces),"\n";
-
-foreach my $lip (@ARGV) {
- print $lip, " is";
- if (Vyatta::Misc::isIPinInterfaces($vc, $lip, @interfaces)) {
- print " in\n";
- } else {
- print " not in\n";
- }
-}
-
-exit 0;