Broken dependencies: perl-Search-Xapian
by Fedora Koji Build System
perl-Search-Xapian has broken dependencies in the rawhide tree:
On x86_64:
perl-Search-Xapian-1.2.24.0-1.fc26.x86_64 requires libxapian.so.22()(64bit)
On armhfp:
perl-Search-Xapian-1.2.24.0-1.fc26.armv7hl requires libxapian.so.22
On ppc64le:
perl-Search-Xapian-1.2.24.0-1.fc26.ppc64le requires libxapian.so.22()(64bit)
On aarch64:
perl-Search-Xapian-1.2.24.0-1.fc26.aarch64 requires libxapian.so.22()(64bit)
On ppc64:
perl-Search-Xapian-1.2.24.0-1.fc26.ppc64 requires libxapian.so.22()(64bit)
On i386:
perl-Search-Xapian-1.2.24.0-1.fc26.i686 requires libxapian.so.22
Please resolve this as soon as possible.
7 years, 5 months
Broken dependencies: perl-Alien-ROOT
by Fedora Koji Build System
perl-Alien-ROOT has broken dependencies in the rawhide tree:
On aarch64:
perl-Alien-ROOT-5.34.36.1-2.fc26.noarch requires root-core
On ppc64:
perl-Alien-ROOT-5.34.36.1-2.fc26.noarch requires root-core
On ppc64le:
perl-Alien-ROOT-5.34.36.1-2.fc26.noarch requires root-core
Please resolve this as soon as possible.
7 years, 5 months
[Bug 1381649] New: perl-Net-FTPServer-1.125-7.fc26 FTBFS: tests fail
with
"Out of memory!"
by Red Hat Bugzilla
https://bugzilla.redhat.com/show_bug.cgi?id=1381649
Bug ID: 1381649
Summary: perl-Net-FTPServer-1.125-7.fc26 FTBFS: tests fail with
"Out of memory!"
Product: Fedora
Version: rawhide
Component: perl-Net-FTPServer
Assignee: jplesnik(a)redhat.com
Reporter: ppisar(a)redhat.com
QA Contact: extras-qa(a)fedoraproject.org
CC: jplesnik(a)redhat.com,
perl-devel(a)lists.fedoraproject.org, steve(a)silug.org
perl-Net-FTPServer-1.125-7.fc26 fails to build in F26 because tests fail:
t/150commands.t .............. ok
Out of memory!
t/160portpasv.t ..............
Failed 36/41 subtests
Out of memory!
[...]
Test Summary Report
-------------------
t/160portpasv.t (Wstat: 13 Tests: 5 Failed: 0)
Non-zero wait status: 13
Parse errors: Bad plan. You planned 41 tests but ran 5.
t/160portzeroes.t (Wstat: 13 Tests: 5 Failed: 0)
Non-zero wait status: 13
Parse errors: Bad plan. You planned 23 tests but ran 5.
t/170ascii.t (Wstat: 13 Tests: 9 Failed: 1)
Failed test: 9
Non-zero wait status: 13
Parse errors: Bad plan. You planned 18 tests but ran 9.
t/170files.t (Wstat: 13 Tests: 11 Failed: 1)
Failed test: 11
Non-zero wait status: 13
Parse errors: Bad plan. You planned 36 tests but ran 11.
t/190list.t (Wstat: 13 Tests: 41 Failed: 11)
Failed tests: 30-38, 40-41
Non-zero wait status: 13
Parse errors: Bad plan. You planned 82 tests but ran 41.
t/220restart.t (Wstat: 13 Tests: 7 Failed: 1)
Failed test: 7
Non-zero wait status: 13
Parse errors: Bad plan. You planned 18 tests but ran 7.
t/230rename.t (Wstat: 13 Tests: 6 Failed: 1)
Failed test: 6
Non-zero wait status: 13
Parse errors: Bad plan. You planned 11 tests but ran 6.
t/240abort.t (Wstat: 13 Tests: 5 Failed: 0)
Non-zero wait status: 13
Parse errors: Bad plan. You planned 16 tests but ran 5.
t/260welcometext.t (Wstat: 256 Tests: 3 Failed: 1)
Failed test: 3
Non-zero exit status: 1
Files=44, Tests=432, 19 wallclock secs ( 0.23 usr 0.05 sys + 8.79 cusr 1.34
csys = 10.41 CPU)
Result: FAIL
Koschei reports this difference between working and failing build root:
perl-Test-Simple 1.302056-1.fc26 > 1.302059-1.fc26
perl-podlators 4.07-366.fc26 > 4.08-1.fc26
perl-HTTP-Tiny 0.064-1.fc26 > 0.068-1.fc26
python3-setuptools 27.1.2-1.fc26 > 27.3.0-1.fc26
libnghttp2 1.14.1-1.fc26 > 1.15.0-1.fc26
libarchive 3.2.1-3.fc26 > 3.2.1-4.fc26
crypto-policies 20160921-1.git75b9b04.... >
20160926-1.git08b5501....
make 1:4.1-5.fc24 > 1:4.2.1-1.fc26
openssl-libs 1:1.0.2i-1.fc26 > 1:1.0.2j-1.fc26
kernel-headers 4.8.0-0.rc7.git4.1.... > 4.8.0-0.rc8.git0.1....
binutils 2.27-8.fc26 > 2.27-9.fc26
python2-setuptools 27.1.2-1.fc26 > 27.3.0-1.fc26
But Koschei had some difficulties around that time. Maybe it's caused by
perl-Encode update.
--
You are receiving this mail because:
You are on the CC list for the bug.
7 years, 5 months
ppisar pushed to perl-Net-FTPServer (master). "Increase default data
segment size limit"
by notifications＠fedoraproject.org
From cc40c3906bdf8e8a3e0730c45d92c7d34bd77469 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar(a)redhat.com>
Date: Fri, 23 Dec 2016 09:58:29 +0100
Subject: Increase default data segment size limit
---
...erver-1.125-Increase-default-memory-limit.patch | 69 ++++++++++++++++++++++
perl-Net-FTPServer.spec | 8 ++-
2 files changed, 76 insertions(+), 1 deletion(-)
create mode 100644 Net-FTPServer-1.125-Increase-default-memory-limit.patch
diff --git a/Net-FTPServer-1.125-Increase-default-memory-limit.patch b/Net-FTPServer-1.125-Increase-default-memory-limit.patch
new file mode 100644
index 0000000..87bf3c5
--- /dev/null
+++ b/Net-FTPServer-1.125-Increase-default-memory-limit.patch
@@ -0,0 +1,69 @@
+From 9d8cdadb7efef92adbe928374921b675773111eb Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar(a)redhat.com>
+Date: Fri, 23 Dec 2016 09:55:16 +0100
+Subject: [PATCH] Increase default memory limit
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+The previous 16384 KB data segment size limit is not enough with
+contemporary systems due too massive NSS plug-ins.
+
+This patch changes the value to 65536 KB. It also removes a limit for
+t/240abort.t test that requies more than 128 MB memory.
+
+<https://bugzilla.redhat.com/show_bug.cgi?id=1381649>
+
+Signed-off-by: Petr Písař <ppisar(a)redhat.com>
+---
+ lib/Net/FTPServer.pm | 6 +++---
+ t/240abort.t | 2 +-
+ 2 files changed, 4 insertions(+), 4 deletions(-)
+
+diff --git a/lib/Net/FTPServer.pm b/lib/Net/FTPServer.pm
+index fd66a10..42b5a09 100644
+--- a/lib/Net/FTPServer.pm
++++ b/lib/Net/FTPServer.pm
+@@ -358,7 +358,7 @@ process and are important in avoiding denial of service (DoS)
+ attacks against the FTP server.
+
+ Resource Default Unit
+- limit memory 16384 KBytes Amount of memory per child
++ limit memory 65536 KBytes Amount of memory per child
+ limit nr processes 10 (none) Number of processes
+ limit nr files 20 (none) Number of open files
+
+@@ -367,7 +367,7 @@ limit to C<-1>.
+
+ Example:
+
+- limit memory: 32768
++ limit memory: 131072
+ limit nr processes: 20
+ limit nr files: 40
+
+@@ -2680,7 +2680,7 @@ sub run
+ # Perform normal per-process limits.
+ if ($r == 0)
+ {
+- my $limit = 1024 * ($self->config ("limit memory") || 16384);
++ my $limit = 1024 * ($self->config ("limit memory") || 65536);
+ $self->_set_rlimit ("RLIMIT_DATA", $limit) if $limit >= 0;
+
+ $limit = $self->config ("limit nr processes") || 10;
+diff --git a/t/240abort.t b/t/240abort.t
+index 8e27185..0d3a350 100644
+--- a/t/240abort.t
++++ b/t/240abort.t
+@@ -29,7 +29,7 @@ unless ($pid) { # Child process (the server).
+ close INFD1;
+ close OUTFD1;
+ my $ftps = Net::FTPServer::InMem::Server->run
+- (['--test', '-d', '-C', '/dev/null']);
++ (['--test', '-d', '-C', '/dev/null', '-o', 'limit memory=-1']);
+ exit;
+ }
+
+--
+2.7.4
+
diff --git a/perl-Net-FTPServer.spec b/perl-Net-FTPServer.spec
index 82add7d..f5da8bd 100644
--- a/perl-Net-FTPServer.spec
+++ b/perl-Net-FTPServer.spec
@@ -1,11 +1,13 @@
Name: perl-Net-FTPServer
Version: 1.125
-Release: 7%{?dist}
+Release: 8%{?dist}
Summary: Secure, extensible and configurable Perl FTP server
License: GPLv2+
Group: Development/Libraries
URL: http://search.cpan.org/dist/Net-FTPServer/
Source0: http://www.cpan.org/authors/id/R/RY/RYOCHIN/Net-FTPServer-%{version}.tar.gz
+# Increase default data segment size limit, bug #1381649
+Patch0: Net-FTPServer-1.125-Increase-default-memory-limit.patch
BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(id -nu)
BuildArch: noarch
BuildRequires: perl
@@ -82,6 +84,7 @@ This package contains server executables.
%prep
%setup -q -n Net-FTPServer-%{version}
+%patch0 -p1
%build
perl Makefile.PL INSTALLDIRS=vendor
@@ -139,6 +142,9 @@ rm -rf $RPM_BUILD_ROOT
%{_sbindir}/ro-ftpd.pl
%changelog
+* Fri Dec 23 2016 Petr Pisar <ppisar(a)redhat.com> - 1.125-8
+- Increase default data segment size limit (bug #1381649)
+
* Sun May 15 2016 Jitka Plesnikova <jplesnik(a)redhat.com> - 1.125-7
- Perl 5.24 rebuild
--
cgit v0.12
http://pkgs.fedoraproject.org/cgit/perl-Net-FTPServer.git/commit/?h=maste...
7 years, 5 months
carlgeorge pushed to perl-Coro (epel7). "6.511 bump"
by notifications＠fedoraproject.org
From b6bee1ffc487949e81413b50d60d96f1f211fdd2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar(a)redhat.com>
Date: Mon, 27 Jun 2016 10:57:45 +0200
Subject: 6.511 bump
---
.gitignore | 1 +
Coro-6.511-Do-not-use-argarray.patch | 38 ++++++++++++++++++++++++++++++++++++
perl-Coro.spec | 25 +++++++++---------------
sources | 2 +-
4 files changed, 49 insertions(+), 17 deletions(-)
create mode 100644 Coro-6.511-Do-not-use-argarray.patch
diff --git a/.gitignore b/.gitignore
index ac77f53..200b969 100644
--- a/.gitignore
+++ b/.gitignore
@@ -26,3 +26,4 @@
/Coro-6.47.tar.gz
/Coro-6.48.tar.gz
/Coro-6.49.tar.gz
+/Coro-6.511.tar.gz
diff --git a/Coro-6.511-Do-not-use-argarray.patch b/Coro-6.511-Do-not-use-argarray.patch
new file mode 100644
index 0000000..a14a205
--- /dev/null
+++ b/Coro-6.511-Do-not-use-argarray.patch
@@ -0,0 +1,38 @@
+From e5bbd3e590aed6e7bad9a9a5b55e2c2631d10a37 Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar(a)redhat.com>
+Date: Mon, 27 Jun 2016 10:52:57 +0200
+Subject: [PATCH] Do not use argarray
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+The argarray was removed before perl 5.24,
+code equivalence displayed in e2657e180a66b618ece78ca6b9c1f9e9b361a948
+Perl5 commit,
+<http://www.nntp.perl.org/group/perl.perl5.porters/2016/05/msg236178.html>,
+bug #1338707
+
+Signed-off-by: Petr Písař <ppisar(a)redhat.com>
+---
+ Coro/State.xs | 4 ++++
+ 1 file changed, 4 insertions(+)
+
+diff --git a/Coro/State.xs b/Coro/State.xs
+index 687fc25..e60690d 100644
+--- a/Coro/State.xs
++++ b/Coro/State.xs
+@@ -1412,7 +1412,11 @@ runops_trace (pTHX)
+ PUSHMARK (SP);
+ PUSHs (&PL_sv_yes);
+ PUSHs (fullname);
++# if PERL_VERSION_ATLEAST(5,24,0)
++ PUSHs (CxHASARGS (cx) ? sv_2mortal (newRV_inc (PL_curpad[0])) : &PL_sv_undef);
++#else
+ PUSHs (CxHASARGS (cx) ? sv_2mortal (newRV_inc ((SV *)cx->blk_sub.argarray)) : &PL_sv_undef);
++#endif
+ PUTBACK;
+ cb = hv_fetch ((HV *)SvRV (coro_current), "_trace_sub_cb", sizeof ("_trace_sub_cb") - 1, 0);
+ if (cb) call_sv (*cb, G_KEEPERR | G_EVAL | G_VOID | G_DISCARD);
+--
+2.5.5
+
diff --git a/perl-Coro.spec b/perl-Coro.spec
index e37a209..edbf601 100644
--- a/perl-Coro.spec
+++ b/perl-Coro.spec
@@ -1,6 +1,6 @@
Name: perl-Coro
-Version: 6.49
-Release: 4%{?dist}
+Version: 6.511
+Release: 1%{?dist}
Summary: The only real threads in perl
# Coro/libcoro: GPLv2 or BSD
# Rest of package: GPL+ or Artistic
@@ -9,22 +9,12 @@ Group: Development/Libraries
URL: http://search.cpan.org/dist/Coro/
Source0: http://search.cpan.org/CPAN/authors/id/M/ML/MLEHMANN/Coro-%{version}.tar.gz
Patch0: %{name}-5.25-ucontext-default.patch
-# Make Coro compatible with Perl 5.24. This is a comprehensive Debian patch
-# resolving three issues:
-# (1) The signal vtbl was consted before 5.22, proposed fix
-# <http://permalink.gmane.org/gmane.comp.lang.perl.perl5.porters/158431>,
-# bug #1231165.
-# (2) the argarray was removed before 5.24,
+# Make Coro compatible with Perl 5.24, the argarray was removed before 5.24,
# code equivalence displayed in e2657e180a66b618ece78ca6b9c1f9e9b361a948
# Perl5 commit,
# <http://www.nntp.perl.org/group/perl.perl5.porters/2016/05/msg236178.html>,
# bug #1338707
-# (3) Some eval tests aborted in the destructor, corrected by changing the
-# PL_savestack_max, bug #1338707
-# See <http://blogs.perl.org/users/aristotle/2016/05/coro-vs-5022.html>, patch
-# copied from
-# <https://anonscm.debian.org/cgit/pkg-perl/packages/libcoro-perl.git/plain/...>.
-Patch1: Coro-6.49-perl_5_24.patch
+Patch1: Coro-6.511-Do-not-use-argarray.patch
BuildRequires: coreutils
BuildRequires: findutils
BuildRequires: libecb-static
@@ -162,8 +152,8 @@ make %{?_smp_mflags}
%install
make pure_install DESTDIR=$RPM_BUILD_ROOT
-find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \;
-find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -exec rm -f {} \;
+find $RPM_BUILD_ROOT -type f -name .packlist -delete
+find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -delete
%{_fixperms} $RPM_BUILD_ROOT/*
%check
@@ -178,6 +168,9 @@ make test
%{_mandir}/man3/*
%changelog
+* Mon Jun 27 2016 Petr Pisar <ppisar(a)redhat.com> - 6.511-1
+- 6.511 bump
+
* Fri May 20 2016 Petr Pisar <ppisar(a)redhat.com> - 6.49-4
- Make Coro compatible with Perl 5.24 (bug #1338707)
diff --git a/sources b/sources
index ac3100c..eb10e38 100644
--- a/sources
+++ b/sources
@@ -1 +1 @@
-0e62bcaf27e00c5ceaa4c0dbb1606fb5 Coro-6.49.tar.gz
+bcad7051f573fed680eaf72e64e2140e Coro-6.511.tar.gz
--
cgit v0.12
http://pkgs.fedoraproject.org/cgit/perl-Coro.git/commit/?h=epel7&id=b6bee...
7 years, 5 months
carlgeorge pushed to perl-Coro (epel7). "Revert perlish_exit() hunk
from Coro-6.49-perl_5_24.patch (..more)"
by notifications＠fedoraproject.org
From d885974cbeb2443dcbeb4badeeb96e7e07490d90 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar(a)redhat.com>
Date: Tue, 24 May 2016 16:25:13 +0200
Subject: Revert perlish_exit() hunk from Coro-6.49-perl_5_24.patch
Otherwise tests fail on i686.
---
Coro-6.49-perl_5_24.patch | 16 +++-------------
1 file changed, 3 insertions(+), 13 deletions(-)
diff --git a/Coro-6.49-perl_5_24.patch b/Coro-6.49-perl_5_24.patch
index f0234c1..2a5c7ff 100644
--- a/Coro-6.49-perl_5_24.patch
+++ b/Coro-6.49-perl_5_24.patch
@@ -5,6 +5,9 @@ Author: Anonymous
Origin: https://paste.debian.net/688072
Last-Update: 2016-05-20
+Petr Pisar: perlish_exit() changes reverted as they causes Perl panic in
+t/12_exit.t on i686.
+
--- a/Coro/State.xs
+++ b/Coro/State.xs
@@ -39,6 +39,10 @@
@@ -117,19 +120,6 @@ Last-Update: 2016-05-20
PUTBACK;
cb = hv_fetch ((HV *)SvRV (coro_current), "_trace_sub_cb", sizeof ("_trace_sub_cb") - 1, 0);
if (cb) call_sv (*cb, G_KEEPERR | G_EVAL | G_VOID | G_DISCARD);
-@@ -1488,7 +1531,11 @@ transfer_tail (pTHX)
- static void ecb_noinline ecb_cold
- perlish_exit (pTHX)
- {
-- int exitstatus = perl_destruct (PL_curinterp);
-+ int exitstatus;
-+ /* Because we've skipped the "not essential" things, we've not popped all */
-+ /* the scopes, and perl_destruct has an assert() that checks this. */
-+ PL_scopestack_ix = 1;
-+ exitstatus = perl_destruct (PL_curinterp);
- perl_free (PL_curinterp);
- exit (exitstatus);
- }
@@ -3596,15 +3643,16 @@ BOOT:
DEFSV;
ERRSV;
--
cgit v0.12
http://pkgs.fedoraproject.org/cgit/perl-Coro.git/commit/?h=epel7&id=d8859...
7 years, 5 months
carlgeorge pushed to perl-Coro (epel7). "Make Coro compatible with
Perl 5.24"
by notifications＠fedoraproject.org
From 25c1e563a38db88cefc73b339885bb4c748d4635 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar(a)redhat.com>
Date: Tue, 24 May 2016 15:57:08 +0200
Subject: Make Coro compatible with Perl 5.24
---
Coro-6.49-perl_5_24.patch | 153 ++++++++++++++++++++++++++++++++++++++++++++++
perl-Coro.spec | 23 ++++++-
2 files changed, 175 insertions(+), 1 deletion(-)
create mode 100644 Coro-6.49-perl_5_24.patch
diff --git a/Coro-6.49-perl_5_24.patch b/Coro-6.49-perl_5_24.patch
new file mode 100644
index 0000000..f0234c1
--- /dev/null
+++ b/Coro-6.49-perl_5_24.patch
@@ -0,0 +1,153 @@
+Description: fix for Coro with 5.22 and 5.24
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=101063
+Bug-Debian: https://bugs.debian.org/787500
+Author: Anonymous
+Origin: https://paste.debian.net/688072
+Last-Update: 2016-05-20
+
+--- a/Coro/State.xs
++++ b/Coro/State.xs
+@@ -39,6 +39,10 @@
+ #ifdef PadARRAY
+ # define NEWPADAPI 1
+ # define newPADLIST(var) (Newz (0, var, 1, PADLIST), Newx (PadlistARRAY (var), 2, PAD *))
++# if PERL_VERSION_ATLEAST(5,22,0) && !PERL_VERSION_ATLEAST(5,24,0)
++# undef PadlistNAMES
++# define PadlistNAMES(pl) *((PADNAMELIST **)PadlistARRAY(pl))
++# endif
+ #else
+ typedef AV PADNAMELIST;
+ # if !PERL_VERSION_ATLEAST(5,8,0)
+@@ -951,7 +955,13 @@ coro_init_stacks (pTHX)
+
+ New(54,PL_savestack,24,ANY);
+ PL_savestack_ix = 0;
++#ifdef SS_MAXPUSH
++ /* Of course, if you clone the code, you have to track the changes... */
++ /*PL_savestack_max lies: it always has SS_MAXPUSH more than it claims */
++ PL_savestack_max = 24 - SS_MAXPUSH;
++#else
+ PL_savestack_max = 24;
++#endif
+
+ #if !PERL_VERSION_ATLEAST (5,10,0)
+ New(54,PL_retstack,4,OP*);
+@@ -1029,10 +1039,6 @@ coro_rss (pTHX_ struct coro *coro)
+
+ /** coroutine stack handling ************************************************/
+
+-static int (*orig_sigelem_get) (pTHX_ SV *sv, MAGIC *mg);
+-static int (*orig_sigelem_set) (pTHX_ SV *sv, MAGIC *mg);
+-static int (*orig_sigelem_clr) (pTHX_ SV *sv, MAGIC *mg);
+-
+ /* apparently < 5.8.8 */
+ #ifndef MgPV_nolen_const
+ #define MgPV_nolen_const(mg) (((((int)(mg)->mg_len)) == HEf_SVKEY) ? \
+@@ -1074,7 +1080,7 @@ coro_sigelem_get (pTHX_ SV *sv, MAGIC *m
+ }
+ }
+
+- return orig_sigelem_get ? orig_sigelem_get (aTHX_ sv, mg) : 0;
++ return PL_vtbl_sigelem.svt_get ? PL_vtbl_sigelem.svt_get (aTHX_ sv, mg) : 0;
+ }
+
+ static int ecb_cold
+@@ -1098,7 +1104,7 @@ coro_sigelem_clr (pTHX_ SV *sv, MAGIC *m
+ }
+ }
+
+- return orig_sigelem_clr ? orig_sigelem_clr (aTHX_ sv, mg) : 0;
++ return PL_vtbl_sigelem.svt_clear ? PL_vtbl_sigelem.svt_clear (aTHX_ sv, mg) : 0;
+ }
+
+ static int ecb_cold
+@@ -1122,9 +1128,42 @@ coro_sigelem_set (pTHX_ SV *sv, MAGIC *m
+ }
+ }
+
+- return orig_sigelem_set ? orig_sigelem_set (aTHX_ sv, mg) : 0;
++ return PL_vtbl_sigelem.svt_set ? PL_vtbl_sigelem.svt_set (aTHX_ sv, mg) : 0;
++}
++
++static MGVTBL sigelem_vtbl = {
++ coro_sigelem_get, /* get */
++ coro_sigelem_set, /* set */
++ 0, /* len */
++ coro_sigelem_clr, /* clear */
++ 0, /* free */
++ 0, /* copy */
++ 0, /* dup */
++#ifdef MGf_LOCAL
++ 0, /* local */
++#endif
++};
++
++static int ecb_cold
++coro_sig_copy (pTHX_ SV *sv, MAGIC *mg, SV *nsv, const char *key, I32 klen)
++{
++ sv_magicext (nsv, mg->mg_obj, 'u', &sigelem_vtbl, key, klen);
++ return 1;
+ }
+
++static MGVTBL sig_vtbl = {
++ 0, /* get */
++ 0, /* set */
++ 0, /* len */
++ 0, /* clear */
++ 0, /* free */
++ coro_sig_copy, /* copy */
++ 0, /* dup */
++#ifdef MGf_LOCAL
++ 0, /* local */
++#endif
++};
++
+ static void
+ prepare_nop (pTHX_ struct coro_transfer_args *ta)
+ {
+@@ -1395,7 +1434,11 @@ runops_trace (pTHX)
+ PUSHMARK (SP);
+ PUSHs (&PL_sv_yes);
+ PUSHs (fullname);
++# if PERL_VERSION_ATLEAST(5,24,0)
++ PUSHs (CxHASARGS (cx) ? sv_2mortal (newRV_inc (PL_curpad[0])) : &PL_sv_undef);
++#else
+ PUSHs (CxHASARGS (cx) ? sv_2mortal (newRV_inc ((SV *)cx->blk_sub.argarray)) : &PL_sv_undef);
++#endif
+ PUTBACK;
+ cb = hv_fetch ((HV *)SvRV (coro_current), "_trace_sub_cb", sizeof ("_trace_sub_cb") - 1, 0);
+ if (cb) call_sv (*cb, G_KEEPERR | G_EVAL | G_VOID | G_DISCARD);
+@@ -1488,7 +1531,11 @@ transfer_tail (pTHX)
+ static void ecb_noinline ecb_cold
+ perlish_exit (pTHX)
+ {
+- int exitstatus = perl_destruct (PL_curinterp);
++ int exitstatus;
++ /* Because we've skipped the "not essential" things, we've not popped all */
++ /* the scopes, and perl_destruct has an assert() that checks this. */
++ PL_scopestack_ix = 1;
++ exitstatus = perl_destruct (PL_curinterp);
+ perl_free (PL_curinterp);
+ exit (exitstatus);
+ }
+@@ -3596,15 +3643,16 @@ BOOT:
+ DEFSV;
+ ERRSV;
+
++ HV *sig = GvHV (gv_fetchpv ("SIG", GV_ADD|GV_NOTQUAL, SVt_PVHV));
++
++ sv_unmagic ((SV *)sig, PERL_MAGIC_sig);
++ sv_magicext ((SV *)sig, NULL, PERL_MAGIC_uvar, &sig_vtbl, NULL, 0)->mg_flags |= MGf_COPY;
++
+ cctx_current = cctx_new_empty ();
+
+ irsgv = gv_fetchpv ("/" , GV_ADD|GV_NOTQUAL, SVt_PV);
+ stdoutgv = gv_fetchpv ("STDOUT", GV_ADD|GV_NOTQUAL, SVt_PVIO);
+
+- orig_sigelem_get = PL_vtbl_sigelem.svt_get; PL_vtbl_sigelem.svt_get = coro_sigelem_get;
+- orig_sigelem_set = PL_vtbl_sigelem.svt_set; PL_vtbl_sigelem.svt_set = coro_sigelem_set;
+- orig_sigelem_clr = PL_vtbl_sigelem.svt_clear; PL_vtbl_sigelem.svt_clear = coro_sigelem_clr;
+-
+ rv_diehook = newRV_inc ((SV *)gv_fetchpv ("Coro::State::diehook" , 0, SVt_PVCV));
+ rv_warnhook = newRV_inc ((SV *)gv_fetchpv ("Coro::State::warnhook", 0, SVt_PVCV));
+
diff --git a/perl-Coro.spec b/perl-Coro.spec
index 9fd8739..c789e2c 100644
--- a/perl-Coro.spec
+++ b/perl-Coro.spec
@@ -1,6 +1,6 @@
Name: perl-Coro
Version: 6.49
-Release: 3%{?dist}
+Release: 4%{?dist}
Summary: The only real threads in perl
# Coro/libcoro: GPLv2 or BSD
# Rest of package: GPL+ or Artistic
@@ -9,6 +9,22 @@ Group: Development/Libraries
URL: http://search.cpan.org/dist/Coro/
Source0: http://search.cpan.org/CPAN/authors/id/M/ML/MLEHMANN/Coro-%{version}.tar.gz
Patch0: %{name}-5.25-ucontext-default.patch
+# Make Coro compatible with Perl 5.24. This is a comprehensive Debian patch
+# resolving three issues:
+# (1) The signal vtbl was consted before 5.22, proposed fix
+# <http://permalink.gmane.org/gmane.comp.lang.perl.perl5.porters/158431>,
+# bug #1231165.
+# (2) the argarray was removed before 5.24,
+# code equivalence displayed in e2657e180a66b618ece78ca6b9c1f9e9b361a948
+# Perl5 commit,
+# <http://www.nntp.perl.org/group/perl.perl5.porters/2016/05/msg236178.html>,
+# bug #1338707
+# (3) Some eval tests aborted in the destructor, corrected by changing the
+# PL_savestack_max, bug #1338707
+# See <http://blogs.perl.org/users/aristotle/2016/05/coro-vs-5022.html>, patch
+# copied from
+# <https://anonscm.debian.org/cgit/pkg-perl/packages/libcoro-perl.git/plain/...>.
+Patch1: Coro-6.49-perl_5_24.patch
BuildRequires: coreutils
BuildRequires: findutils
BuildRequires: libecb-static
@@ -112,6 +128,8 @@ programming much safer and easier than using other thread models.
%patch0 -p1 -b .ucontext-default
%endif
+%patch1 -p1
+
# Unbundle libecb
rm Coro/ecb.h
sed -i '/^Coro\/ecb\.h$/d' MANIFEST
@@ -159,6 +177,9 @@ make test
%{_mandir}/man3/*
%changelog
+* Fri May 20 2016 Petr Pisar <ppisar(a)redhat.com> - 6.49-4
+- Make Coro compatible with Perl 5.24 (bug #1338707)
+
* Tue May 17 2016 Jitka Plesnikova <jplesnik(a)redhat.com> - 6.49-3
- Perl 5.24 rebuild
--
cgit v0.12
http://pkgs.fedoraproject.org/cgit/perl-Coro.git/commit/?h=epel7&id=25c1e...
7 years, 5 months
carlgeorge pushed to perl-Coro (epel7). "Perl 5.24 rebuild"
by notifications＠fedoraproject.org
From 73f6ee302549ce9d8c7d0782a8b504ba6ecbcb3e Mon Sep 17 00:00:00 2001
From: Jitka Plesnikova <jplesnik(a)redhat.com>
Date: Tue, 17 May 2016 04:17:44 +0200
Subject: Perl 5.24 rebuild
---
perl-Coro.spec | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/perl-Coro.spec b/perl-Coro.spec
index 4fb388e..9fd8739 100644
--- a/perl-Coro.spec
+++ b/perl-Coro.spec
@@ -1,6 +1,6 @@
Name: perl-Coro
Version: 6.49
-Release: 2%{?dist}
+Release: 3%{?dist}
Summary: The only real threads in perl
# Coro/libcoro: GPLv2 or BSD
# Rest of package: GPL+ or Artistic
@@ -159,6 +159,9 @@ make test
%{_mandir}/man3/*
%changelog
+* Tue May 17 2016 Jitka Plesnikova <jplesnik(a)redhat.com> - 6.49-3
+- Perl 5.24 rebuild
+
* Thu Feb 04 2016 Fedora Release Engineering <releng(a)fedoraproject.org> - 6.49-2
- Rebuilt for https://fedoraproject.org/wiki/Fedora_24_Mass_Rebuild
--
cgit v0.12
http://pkgs.fedoraproject.org/cgit/perl-Coro.git/commit/?h=epel7&id=73f6e...
7 years, 5 months
