diff options
author | Michael Mair-Keimberger <mmk@levelnine.at> | 2021-11-25 17:55:01 +0100 |
---|---|---|
committer | Conrad Kostecki <conikost@gentoo.org> | 2021-12-05 22:45:14 +0100 |
commit | 16687df684f38a9d0e3b49e375951c7f4de3b5ec (patch) | |
tree | 7dc74a849dde55cca29f8ba542dba6849eee20f8 /dev-perl/Net-ARP | |
parent | dev-perl/Mozilla-PublicSuffix: remove unused patch (diff) | |
download | gentoo-16687df684f38a9d0e3b49e375951c7f4de3b5ec.tar.gz gentoo-16687df684f38a9d0e3b49e375951c7f4de3b5ec.tar.bz2 gentoo-16687df684f38a9d0e3b49e375951c7f4de3b5ec.zip |
dev-perl/Net-ARP: remove unused patch
Package-Manager: Portage-3.0.28, Repoman-3.0.3
Signed-off-by: Michael Mair-Keimberger <mmk@levelnine.at>
Signed-off-by: Conrad Kostecki <conikost@gentoo.org>
Diffstat (limited to 'dev-perl/Net-ARP')
-rw-r--r-- | dev-perl/Net-ARP/files/Net-ARP-1.0.9-tests.patch | 117 |
1 files changed, 0 insertions, 117 deletions
diff --git a/dev-perl/Net-ARP/files/Net-ARP-1.0.9-tests.patch b/dev-perl/Net-ARP/files/Net-ARP-1.0.9-tests.patch deleted file mode 100644 index 3cd799a629b7..000000000000 --- a/dev-perl/Net-ARP/files/Net-ARP-1.0.9-tests.patch +++ /dev/null @@ -1,117 +0,0 @@ -From 38c823ef25d78205e24314233ae7a503967b53e9 Mon Sep 17 00:00:00 2001 -From: Kent Fredric <kentnl@gentoo.org> -Date: Wed, 13 Dec 2017 22:22:20 +1300 -Subject: Guard tests that require network device names and root via ENV - ---- - Makefile.PL | 9 --------- - t/arp_lookup.t | 10 ++++++++-- - t/send_packet.t | 13 +++++++++++-- - test.pl | 23 ++++++++--------------- - 4 files changed, 27 insertions(+), 28 deletions(-) - -diff --git a/Makefile.PL b/Makefile.PL -index e1a4ee7..fbfe0b0 100755 ---- a/Makefile.PL -+++ b/Makefile.PL -@@ -18,15 +18,6 @@ - use ExtUtils::MakeMaker; - use Config; - --BEGIN { -- eval { require Net::Pcap }; -- -- if($@) -- { -- print "Module Net::Pcap is required for make test!\n"; -- } --} -- - if($Config{'osname'} =~ /linux/i) - { - $flags = "-DLINUX"; -diff --git a/t/arp_lookup.t b/t/arp_lookup.t -index 4cf9626..df68c90 100644 ---- a/t/arp_lookup.t -+++ b/t/arp_lookup.t -@@ -13,8 +13,14 @@ ok( $mac eq "unknown", "unkown mac on strange dev value -> $mac" ); - $mac = Net::ARP::arp_lookup("$fu","127.0.0.1"); - ok( $mac eq "unknown", "unkown mac on strange dev value 2 -> $mac" ); - --$mac = Net::ARP::arp_lookup("eth0","this_is_not_an_ip_address"); --ok( $mac eq "unknown", "unkown mac on strange ip value -> $mac" ); -+SKIP: { -+ -+ skip "TEST_ARP_IF unset", 1 unless exists $ENV{TEST_ARP_IF}; -+ -+ $mac = Net::ARP::arp_lookup($ENV{TEST_ARP_IF},"this_is_not_an_ip_address"); -+ ok( $mac eq "unknown", "unkown mac on strange ip value -> $mac" ); -+ -+} - - #Net::ARP::arp_lookup("eth0","192.168.1.1","fu"); - #ok( $mac eq "unknown", "unkown mac on strange mac value" ); -diff --git a/t/send_packet.t b/t/send_packet.t -index 1f95f4f..3b4b998 100644 ---- a/t/send_packet.t -+++ b/t/send_packet.t -@@ -5,9 +5,18 @@ - # Last update: 22.06.2013 - - use Net::ARP; --use Test::More qw( no_plan ); -+use Test::More; -+BEGIN { -+ if ( $> != 0 ) { -+ plan skip_all => "This test must be run as root"; -+ } -+ if ( not exists $ENV{TEST_ARP_IF} ) { -+ plan skip_all => "TEST_ARP_IF not specified"; -+ } -+ $dev = $ENV{TEST_ARP_IF}; -+ plan qw/no_plan/; -+} - --$dev="lo"; - print "Using device $dev to test send_packet()\n"; - - $ret = Net::ARP::send_packet("strange_dev", # network interface -diff --git a/test.pl b/test.pl -index 27af515..c2e4cc2 100755 ---- a/test.pl -+++ b/test.pl -@@ -19,23 +19,16 @@ - use ExtUtils::testlib; - use Net::ARP; - --BEGIN --{ -- eval{ require Net::Pcap; }; -- -- if($@ =~ /^Can\'t\slocate/) -- { -- $dev = "eth0"; -- } -- else -- { -- import Net::Pcap; -- $dev = Net::Pcap::lookupdev(\$errbuf); -- } -+if ( $> != 0 ) { -+ print "SKIPPED: test must be run as root\n"; -+ exit 0; - } -- -+if ( not exists $ENV{TEST_ARP_IF} ) { -+ print "SKIPPED: TEST_ARP_IF unset\n"; -+ exit 0; -+} -+$dev = $ENV{TEST_ARP_IF}; - print "Sending ARP reply packet via dev $dev... "; -- - $ret = Net::ARP::send_packet($dev, # network interface - '127.0.0.1', # source ip - '127.0.0.1', # destination ip --- -2.14.3 - |