perl/perl-IO-Async
SHA256
8
0
Fork 0
forked from pool/perl-IO-Async
Code Pull Requests Activity

Accepting request 865940 from devel:languages:perl:autoupdate

Browse Source 
- Remove patch IO-Async-0.77-Adjust-t-50resolver.t-test-for-an-unavailable-DNS-se.patch
  (was applied upstream. https://rt.cpan.org/Public/Bug/Display.html?id=131109)
- updated to 0.78
   see /usr/share/doc/packages/perl-IO-Async/Changes
  0.78    2021-01-21
          [CHANGES]
           * Warn on attempts to ->connect to INADDR(6)_LOOPBACK as some OSes
             (e.g. OpenBSD) do not allow it
           * Various fixes for IO::Async::LoopTests to better support
             IO::Async::Loop::UV:
              + Insert some ->loop_once(0) calls between timing tests to allow
                libuv to clear its pending queues
              + Allow loops to declare that they cannot perform all-child PID
                watch and skip the relevant tests for it if so
           * Have $loop->later return a future instance if not passed any code
             (RT133240)
          [BUGFIXES]
           * Accept more error codes for failure to resolve missing hostname
             (RT131109)
           * Defend against some undef values at global destruction time
             (RT132677)

OBS-URL: https://build.opensuse.org/request/show/865940
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-IO-Async?expand=0&rev=9
This commit is contained in:
Dirk Stoecker
2021-01-22 12:53:48 +00:00
committed by Git OBS Bridge
parent d1365e009b
commit dd9c1c4a1f
6 changed files with 38 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

51
IO-Async-0.77-Adjust-t-50resolver.t-test-for-an-unavailable-DNS-se.patch
View File

@@ -1,51 +0,0 @@
From 27bc9f6cf7f751d294d110160b66460a7c26fbba Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
Date: Thu, 24 Sep 2020 13:40:36 +0200
Subject: [PATCH] Adjust t/50resolver.t test for an unavailable DNS server
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
If no DNS server is available (e.g. empty /etc/resolv.conf and no DNS
server listening on localhost), getaddrinfo() function reports
EAI_AGAIN (or EAI_FAIL) to distinguish the DNS procol error from
a negative respons by the DNS server.
t/50resolver.t did not expected it and failed likes this in SuSE and
Fedora build systems:
t/42function.t ............... ok
# Failed test '->failure [3] gives EAI_NONAME or EAI_NODATA'
# at t/50resolver.t line 344.
# $errno is -3
# Looks like you failed 1 test of 35.
t/50resolver.t ...............
Dubious, test returned 1 (wstat 256, 0x100)
This patch fixes it.
CPAN RT#131109
Signed-off-by: Petr Písař <ppisar@redhat.com>
---
t/50resolver.t | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/t/50resolver.t b/t/50resolver.t
index 68f4446..b7cfb56 100644
--- a/t/50resolver.t
+++ b/t/50resolver.t
@@ -341,7 +341,9 @@ SKIP: {
is( ( $future->failure )[2], "getaddrinfo", '->failure [2] gives getaddrinfo' );
my $errno = ( $future->failure )[3];
- ok( $errno == Socket::EAI_NONAME || $errno == Socket::EAI_NODATA, '->failure [3] gives EAI_NONAME or EAI_NODATA' ) or
+ ok( $errno == Socket::EAI_FAIL || $errno == Socket::EAI_AGAIN || # no server available
+ $errno == Socket::EAI_NONAME || $errno == Socket::EAI_NODATA, # server confirmed no DNS entry
+ '->failure [3] gives EAI_FAIL or EAI_AGAIN or EAI_NONAME or EAI_NODATA' ) or
diag( '$errno is ' . $errno );
}
--
2.25.4

3
IO-Async-0.77.tar.gz
View File

@@ -1,3 +0,0 @@
version https://git-lfs.github.com/spec/v1
oid sha256:31dfe86a5b49c7544c536c3425b702e3ddf440763402984ae99b77a197757994
size 246133

3
IO-Async-0.78.tar.gz Normal file
View File

@@ -0,0 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:3fb51885977b86218a89ea42f38cafbce5823bf48faaa2d185a186c2a358366c
size 248560

4
cpanspec.yml
View File

@@ -5,8 +5,8 @@ description_paragraphs: 1
# - source1
# - source2
patches:
# PATCH-FIX-UPSTREAM https://rt.cpan.org/Public/Bug/Display.html?id=131109
https://rt.cpan.org/Ticket/Attachment/1912750/1024503/IO-Async-0.77-Adjust-t-50resolver.t-test-for-an-unavailable-DNS-se.patch: -p1
# # PATCH-FIX-UPSTREAM https://rt.cpan.org/Public/Bug/Display.html?id=131109
# https://rt.cpan.org/Ticket/Attachment/1912750/1024503/IO-Async-0.77-Adjust-t-50resolver.t-test-for-an-unavailable-DNS-se.patch: -p1
# bar.patch:
preamble: |-
BuildRequires: netcfg

31
perl-IO-Async.changes
View File

@@ -1,3 +1,34 @@
-------------------------------------------------------------------
Fri Jan 22 11:01:01 UTC 2021 - Tina Müller <tina.mueller@suse.com>
- Remove patch IO-Async-0.77-Adjust-t-50resolver.t-test-for-an-unavailable-DNS-se.patch
(was applied upstream. https://rt.cpan.org/Public/Bug/Display.html?id=131109)
-------------------------------------------------------------------
Fri Jan 22 03:07:12 UTC 2021 - Tina Müller <timueller+perl@suse.de>
- updated to 0.78
see /usr/share/doc/packages/perl-IO-Async/Changes
0.78 2021-01-21
[CHANGES]
* Warn on attempts to ->connect to INADDR(6)_LOOPBACK as some OSes
(e.g. OpenBSD) do not allow it
* Various fixes for IO::Async::LoopTests to better support
IO::Async::Loop::UV:
+ Insert some ->loop_once(0) calls between timing tests to allow
libuv to clear its pending queues
+ Allow loops to declare that they cannot perform all-child PID
watch and skip the relevant tests for it if so
* Have $loop->later return a future instance if not passed any code
(RT133240)
[BUGFIXES]
* Accept more error codes for failure to resolve missing hostname
(RT131109)
* Defend against some undef values at global destruction time
(RT132677)
-------------------------------------------------------------------
Fri Oct 16 19:34:27 UTC 2020 - Dirk Stoecker <opensuse@dstoecker.de>

6
perl-IO-Async.spec
View File

@@ -1,7 +1,7 @@
#
# spec file for package perl-IO-Async
#
# Copyright (c) 2020 SUSE LLC
# Copyright (c) 2021 SUSE LLC
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -17,7 +17,7 @@
Name: perl-IO-Async
Version: 0.77
Version: 0.78
Release: 0
%define cpan_name IO-Async
Summary: Asynchronous event-driven programming
@@ -26,7 +26,6 @@ Group: Development/Libraries/Perl
URL: https://metacpan.org/release/%{cpan_name}
Source0: https://cpan.metacpan.org/authors/id/P/PE/PEVANS/%{cpan_name}-%{version}.tar.gz
Source1: cpanspec.yml
Patch0: https://rt.cpan.org/Ticket/Attachment/1912750/1024503/IO-Async-0.77-Adjust-t-50resolver.t-test-for-an-unavailable-DNS-se.patch
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
@@ -61,7 +60,6 @@ includes more higher-level functionality built on top of these basic parts.
%prep
%setup -q -n %{cpan_name}-%{version}
%patch0 -p1
%build
perl Build.PL installdirs=vendor