From 554dbd37259864feb93055de8bd37564a85cecf0 Mon Sep 17 00:00:00 2001 From: gregor herrmann Date: Fri, 10 Jul 2020 20:13:38 +0200 Subject: skip network tests Origin: vendor Forwarded: not-needed Last-Update: 2020-07-10 Gbp-Pq: Name disable-network-tests.patch --- t/getaddrinfo.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/t/getaddrinfo.t b/t/getaddrinfo.t index 971e516..dc4645a 100644 --- a/t/getaddrinfo.t +++ b/t/getaddrinfo.t @@ -71,6 +71,7 @@ ok( $res[0]->{protocol} == 0 || $res[0]->{protocol} == IPPROTO_TCP, my $goodhost = "cpan.perl.org"; SKIP: { + skip "No network access during Debian builds", 2 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 2 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( "cpan.perl.org", "ftp", { socktype => SOCK_STREAM } ); @@ -86,6 +87,7 @@ my $missinghost = "TbK4jM2M0OS.lm57DWIyu4i"; # any request. We'd better check for them SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has an answer for $missinghost", 1 if gethostbyname( $missinghost ); # Some OSes return $err == 0 but no results @@ -125,6 +127,7 @@ AI_NUMERICHOST: { # Now check that names with AI_NUMERICHOST fail SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 1 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( $goodhost, "ftp", { flags => AI_NUMERICHOST, socktype => SOCK_STREAM } ); -- cgit v1.2.3 From f6e689c8e0b9bb634c5f07195417e46c629485d7 Mon Sep 17 00:00:00 2001 From: gregor herrmann Date: Wed, 6 Jan 2021 02:44:10 +0100 Subject: skip network tests Origin: vendor Forwarded: not-needed Last-Update: 2020-07-10 Gbp-Pq: Name disable-network-tests.patch --- t/getaddrinfo.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/t/getaddrinfo.t b/t/getaddrinfo.t index 971e516..dc4645a 100644 --- a/t/getaddrinfo.t +++ b/t/getaddrinfo.t @@ -71,6 +71,7 @@ ok( $res[0]->{protocol} == 0 || $res[0]->{protocol} == IPPROTO_TCP, my $goodhost = "cpan.perl.org"; SKIP: { + skip "No network access during Debian builds", 2 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 2 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( "cpan.perl.org", "ftp", { socktype => SOCK_STREAM } ); @@ -86,6 +87,7 @@ my $missinghost = "TbK4jM2M0OS.lm57DWIyu4i"; # any request. We'd better check for them SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has an answer for $missinghost", 1 if gethostbyname( $missinghost ); # Some OSes return $err == 0 but no results @@ -125,6 +127,7 @@ AI_NUMERICHOST: { # Now check that names with AI_NUMERICHOST fail SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 1 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( $goodhost, "ftp", { flags => AI_NUMERICHOST, socktype => SOCK_STREAM } ); -- cgit v1.2.3 From 7a1456c0364f7aebd212674da5d0557d273b3854 Mon Sep 17 00:00:00 2001 From: gregor herrmann Date: Sat, 18 Sep 2021 16:48:35 +0200 Subject: skip network tests Origin: vendor Forwarded: not-needed Last-Update: 2020-07-10 Gbp-Pq: Name disable-network-tests.patch --- t/getaddrinfo.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/t/getaddrinfo.t b/t/getaddrinfo.t index 971e516..dc4645a 100644 --- a/t/getaddrinfo.t +++ b/t/getaddrinfo.t @@ -71,6 +71,7 @@ ok( $res[0]->{protocol} == 0 || $res[0]->{protocol} == IPPROTO_TCP, my $goodhost = "cpan.perl.org"; SKIP: { + skip "No network access during Debian builds", 2 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 2 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( "cpan.perl.org", "ftp", { socktype => SOCK_STREAM } ); @@ -86,6 +87,7 @@ my $missinghost = "TbK4jM2M0OS.lm57DWIyu4i"; # any request. We'd better check for them SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has an answer for $missinghost", 1 if gethostbyname( $missinghost ); # Some OSes return $err == 0 but no results @@ -125,6 +127,7 @@ AI_NUMERICHOST: { # Now check that names with AI_NUMERICHOST fail SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 1 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( $goodhost, "ftp", { flags => AI_NUMERICHOST, socktype => SOCK_STREAM } ); -- cgit v1.2.3 From 63dc9f238aa9dcad2f38ac5f39ee5162ec3e061a Mon Sep 17 00:00:00 2001 From: gregor herrmann Date: Sat, 7 May 2022 17:55:39 +0200 Subject: skip network tests Origin: vendor Forwarded: not-needed Last-Update: 2020-07-10 Gbp-Pq: Name disable-network-tests.patch --- t/getaddrinfo.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/t/getaddrinfo.t b/t/getaddrinfo.t index 971e516..dc4645a 100644 --- a/t/getaddrinfo.t +++ b/t/getaddrinfo.t @@ -71,6 +71,7 @@ ok( $res[0]->{protocol} == 0 || $res[0]->{protocol} == IPPROTO_TCP, my $goodhost = "cpan.perl.org"; SKIP: { + skip "No network access during Debian builds", 2 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 2 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( "cpan.perl.org", "ftp", { socktype => SOCK_STREAM } ); @@ -86,6 +87,7 @@ my $missinghost = "TbK4jM2M0OS.lm57DWIyu4i"; # any request. We'd better check for them SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has an answer for $missinghost", 1 if gethostbyname( $missinghost ); # Some OSes return $err == 0 but no results @@ -125,6 +127,7 @@ AI_NUMERICHOST: { # Now check that names with AI_NUMERICHOST fail SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 1 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( $goodhost, "ftp", { flags => AI_NUMERICHOST, socktype => SOCK_STREAM } ); -- cgit v1.2.3 From f56adffeb4226a0b53b63ee1e47e013e5a8960d1 Mon Sep 17 00:00:00 2001 From: gregor herrmann Date: Fri, 1 Jul 2022 19:39:19 +0200 Subject: skip network tests Origin: vendor Forwarded: not-needed Last-Update: 2020-07-10 Gbp-Pq: Name disable-network-tests.patch --- t/getaddrinfo.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/t/getaddrinfo.t b/t/getaddrinfo.t index 971e516..dc4645a 100644 --- a/t/getaddrinfo.t +++ b/t/getaddrinfo.t @@ -71,6 +71,7 @@ ok( $res[0]->{protocol} == 0 || $res[0]->{protocol} == IPPROTO_TCP, my $goodhost = "cpan.perl.org"; SKIP: { + skip "No network access during Debian builds", 2 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 2 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( "cpan.perl.org", "ftp", { socktype => SOCK_STREAM } ); @@ -86,6 +87,7 @@ my $missinghost = "TbK4jM2M0OS.lm57DWIyu4i"; # any request. We'd better check for them SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has an answer for $missinghost", 1 if gethostbyname( $missinghost ); # Some OSes return $err == 0 but no results @@ -125,6 +127,7 @@ AI_NUMERICHOST: { # Now check that names with AI_NUMERICHOST fail SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 1 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( $goodhost, "ftp", { flags => AI_NUMERICHOST, socktype => SOCK_STREAM } ); -- cgit v1.2.3 From 88b8099131b191bb6bb0b76697d118e9f328c8e2 Mon Sep 17 00:00:00 2001 From: gregor herrmann Date: Mon, 22 Aug 2022 08:45:07 +0200 Subject: skip network tests Origin: vendor Forwarded: not-needed Last-Update: 2020-07-10 Gbp-Pq: Name disable-network-tests.patch --- t/getaddrinfo.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/t/getaddrinfo.t b/t/getaddrinfo.t index 971e516..dc4645a 100644 --- a/t/getaddrinfo.t +++ b/t/getaddrinfo.t @@ -71,6 +71,7 @@ ok( $res[0]->{protocol} == 0 || $res[0]->{protocol} == IPPROTO_TCP, my $goodhost = "cpan.perl.org"; SKIP: { + skip "No network access during Debian builds", 2 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 2 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( "cpan.perl.org", "ftp", { socktype => SOCK_STREAM } ); @@ -86,6 +87,7 @@ my $missinghost = "TbK4jM2M0OS.lm57DWIyu4i"; # any request. We'd better check for them SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has an answer for $missinghost", 1 if gethostbyname( $missinghost ); # Some OSes return $err == 0 but no results @@ -125,6 +127,7 @@ AI_NUMERICHOST: { # Now check that names with AI_NUMERICHOST fail SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 1 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( $goodhost, "ftp", { flags => AI_NUMERICHOST, socktype => SOCK_STREAM } ); -- cgit v1.2.3 From 25d0b8698908d173d4599b100bb7aa2869616800 Mon Sep 17 00:00:00 2001 From: gregor herrmann Date: Sat, 24 Jun 2023 17:02:21 +0200 Subject: skip network tests Origin: vendor Forwarded: not-needed Last-Update: 2020-07-10 Gbp-Pq: Name disable-network-tests.patch --- t/getaddrinfo.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/t/getaddrinfo.t b/t/getaddrinfo.t index 971e516..dc4645a 100644 --- a/t/getaddrinfo.t +++ b/t/getaddrinfo.t @@ -71,6 +71,7 @@ ok( $res[0]->{protocol} == 0 || $res[0]->{protocol} == IPPROTO_TCP, my $goodhost = "cpan.perl.org"; SKIP: { + skip "No network access during Debian builds", 2 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 2 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( "cpan.perl.org", "ftp", { socktype => SOCK_STREAM } ); @@ -86,6 +87,7 @@ my $missinghost = "TbK4jM2M0OS.lm57DWIyu4i"; # any request. We'd better check for them SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has an answer for $missinghost", 1 if gethostbyname( $missinghost ); # Some OSes return $err == 0 but no results @@ -125,6 +127,7 @@ AI_NUMERICHOST: { # Now check that names with AI_NUMERICHOST fail SKIP: { + skip "No network access during Debian builds", 1 if $ENV{NO_NETWORK}; skip "Resolver has no answer for $goodhost", 1 unless gethostbyname( $goodhost ); ( $err, @res ) = getaddrinfo( $goodhost, "ftp", { flags => AI_NUMERICHOST, socktype => SOCK_STREAM } ); -- cgit v1.2.3