Accepting request 1288666 from devel:languages:perl

Get fully determistic builds, even with --nocheck (boo#1227364) (forwarded request 1288338 from bmwiedemann)

OBS-URL: https://build.opensuse.org/request/show/1288666
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-XML-LibXML?expand=0&rev=62

cpanspec.yml

@@ -4,8 +4,8 @@ description_paragraphs: 1
 #sources:
 #  - source1
 #  - source2
-#patches:
-#  foo.patch: -p1
+patches:
+  perl-XML-LibXML-fix-testsuite-with-libxml2-2.13.patch: -p1
 #  bar.patch:
 preamble: |-
  BuildRequires:  pkgconfig(libxml-2.0) >= 2.9.0

perl-XML-LibXML-fix-testsuite-with-libxml2-2.13.patch

@@ -0,0 +1,145 @@
+From bee8338fd1cbd7aad4bf60c2965833343b6ead6f Mon Sep 17 00:00:00 2001
+From: Nick Wellnhofer <wellnhofer@aevum.de>
+Date: Tue, 21 May 2024 15:17:30 +0200
+Subject: [PATCH] Fix test suite with libxml2 2.13.0
+
+---
+ t/02parse.t                        | 7 ++++++-
+ t/08findnodes.t                    | 8 +++++++-
+ t/19die_on_invalid_utf8_rt_58848.t | 2 +-
+ t/25relaxng.t                      | 4 ++--
+ t/26schema.t                       | 4 ++--
+ t/60error_prev_chain.t             | 8 ++++----
+ 6 files changed, 22 insertions(+), 11 deletions(-)
+
+Index: XML-LibXML-2.0210/t/02parse.t
+===================================================================
+--- XML-LibXML-2.0210.orig/t/02parse.t
++++ XML-LibXML-2.0210/t/02parse.t
+@@ -884,7 +884,12 @@ EOXML
+         eval {
+            $doc2    = $parser->parse_string( $xmldoc );
+         };
+-        isnt($@, '', "error parsing $xmldoc");
++        # https://gitlab.gnome.org/GNOME/libxml2/-/commit/b717abdd
++        if (XML::LibXML::LIBXML_RUNTIME_VERSION() < 21300) {
++            isnt($@, '', "error parsing $xmldoc");
++        } else {
++            is( $doc2->documentElement()->firstChild()->nodeName(), "foo" );
++        }
+ 
+         $parser->validation(1);
+ 
+Index: XML-LibXML-2.0210/t/08findnodes.t
+===================================================================
+--- XML-LibXML-2.0210.orig/t/08findnodes.t
++++ XML-LibXML-2.0210/t/08findnodes.t
+@@ -123,7 +123,13 @@ my $docstring = q{
+ my @ns = $root->findnodes('namespace::*');
+ # TEST
+ 
+-is(scalar(@ns), 2, ' TODO : Add test name' );
++# https://gitlab.gnome.org/GNOME/libxml2/-/commit/aca16fb3
++# fixed xmlCopyNamespace with XML namespace.
++if (XML::LibXML::LIBXML_RUNTIME_VERSION() < 21300) {
++    is(scalar(@ns), 2, ' TODO : Add test name' );
++} else {
++    is(scalar(@ns), 3, ' TODO : Add test name' );
++}
+ 
+ # bad xpaths
+ # TEST:$badxpath=4;
+Index: XML-LibXML-2.0210/t/19die_on_invalid_utf8_rt_58848.t
+===================================================================
+--- XML-LibXML-2.0210.orig/t/19die_on_invalid_utf8_rt_58848.t
++++ XML-LibXML-2.0210/t/19die_on_invalid_utf8_rt_58848.t
+@@ -16,7 +16,7 @@ use XML::LibXML;
+     my $err = $@;
+ 
+     # TEST
+-    like ("$err", qr{parser error : Input is not proper UTF-8},
++    like ("$err", qr{not proper UTF-8|Invalid bytes in character encoding},
+         'Parser error.',
+     );
+ }
+Index: XML-LibXML-2.0210/t/25relaxng.t
+===================================================================
+--- XML-LibXML-2.0210.orig/t/25relaxng.t
++++ XML-LibXML-2.0210/t/25relaxng.t
+@@ -132,7 +132,7 @@ print "# 6 check that no_network => 1 wo
+ {
+     my $rng = eval { XML::LibXML::RelaxNG->new( location => $netfile, no_network => 1 ) };
+     # TEST
+-    like( $@, qr{I/O error : Attempt to load network entity}, 'RNG from file location with external import and no_network => 1 throws an exception.' );
++    like( $@, qr{Attempt to load network entity}, 'RNG from file location with external import and no_network => 1 throws an exception.' );
+     # TEST
+     ok( !defined $rng, 'RNG from file location with external import and no_network => 1 is not loaded.' );
+ }
+@@ -152,7 +152,7 @@ print "# 6 check that no_network => 1 wo
+ </grammar>
+ EOF
+     # TEST
+-    like( $@, qr{I/O error : Attempt to load network entity}, 'RNG from buffer with external import and no_network => 1 throws an exception.' );
++    like( $@, qr{Attempt to load network entity}, 'RNG from buffer with external import and no_network => 1 throws an exception.' );
+     # TEST
+     ok( !defined $rng, 'RNG from buffer with external import and no_network => 1 is not loaded.' );
+ }
+Index: XML-LibXML-2.0210/t/26schema.t
+===================================================================
+--- XML-LibXML-2.0210.orig/t/26schema.t
++++ XML-LibXML-2.0210/t/26schema.t
+@@ -117,7 +117,7 @@ EOF
+ {
+     my $schema = eval { XML::LibXML::Schema->new( location => $netfile, no_network => 1 ) };
+     # TEST
+-    like( $@, qr{I/O error : Attempt to load network entity}, 'Schema from file location with external import and no_network => 1 throws an exception.' );
++    like( $@, qr{Attempt to load network entity}, 'Schema from file location with external import and no_network => 1 throws an exception.' );
+     # TEST
+     ok( !defined $schema, 'Schema from file location with external import and no_network => 1 is not loaded.' );
+ }
+@@ -129,7 +129,7 @@ EOF
+ </xsd:schema>
+ EOF
+     # TEST
+-    like( $@, qr{I/O error : Attempt to load network entity}, 'Schema from buffer with external import and no_network => 1 throws an exception.' );
++    like( $@, qr{Attempt to load network entity}, 'Schema from buffer with external import and no_network => 1 throws an exception.' );
+     # TEST
+     ok( !defined $schema, 'Schema from buffer with external import and no_network => 1 is not loaded.' );
+ }
+Index: XML-LibXML-2.0210/t/60error_prev_chain.t
+===================================================================
+--- XML-LibXML-2.0210.orig/t/60error_prev_chain.t
++++ XML-LibXML-2.0210/t/60error_prev_chain.t
+@@ -16,13 +16,11 @@ use XML::LibXML;
+ 
+ {
+     my $parser = XML::LibXML->new();
+-    $parser->validation(0);
+-    $parser->load_ext_dtd(0);
+ 
+     eval
+     {
+         local $^W = 0;
+-        $parser->parse_file('example/JBR-ALLENtrees.htm');
++        $parser->parse_string('<doc>&ldquo;&nbsp;&rdquo;</doc>');
+     };
+ 
+     my $err = $@;
+@@ -31,7 +29,7 @@ use XML::LibXML;
+     if( $err && !ref($err) ) {
+       plan skip_all => 'The local libxml library does not support errors as objects to $@';
+     }
+-    plan tests => 1;
++    plan tests => 2;
+ 
+     while (defined($err) && $count < 200)
+     {
+@@ -44,6 +42,8 @@ use XML::LibXML;
+ 
+     # TEST
+     ok ((!$err), "Reached the end of the chain.");
++    # TEST
++    is ($count, 3, "Correct number of errors reported")
+ }
+ 
+ =head1 COPYRIGHT & LICENSE

perl-XML-LibXML.changes

@@ -1,3 +1,59 @@
+-------------------------------------------------------------------
+Tue Jun 24 14:33:45 UTC 2025 - Bernhard Wiedemann <bwiedemann@suse.com>
+
+- Get fully determistic builds, even with --nocheck (boo#1227364)
+
+-------------------------------------------------------------------
+Tue Jan 21 10:52:50 UTC 2025 - Pedro Monreal <pmonreal@suse.com>
+
+- Fix the testsuite with libxml2 version 2.13.0 and up:
+  * github.com/shlomif/perl-XML-LibXML/pull/87
+  * Add perl-XML-LibXML-fix-testsuite-with-libxml2-2.13.patch
+
+-------------------------------------------------------------------
+Wed Mar  6 11:33:51 UTC 2024 - Pedro Monreal <pmonreal@suse.com>
+
+- updated to 2.0210 [bsc#1221013]
+   see /usr/share/doc/packages/perl-XML-LibXML/Changes
+
+  2.0210  2024-01-24
+      - Fix copying external entity from an ext_ent_handler handler
+          - https://github.com/shlomif/perl-XML-LibXML/issues/81
+          - thanks to Petr
+      - libxml-mm: Fix function prototypes in function pointers
+          - thanks to Khem Raj
+
+-------------------------------------------------------------------
+Tue Jul 25 18:17:14 UTC 2023 - Tina Müller <tina.mueller@suse.com>
+
+- Added versions to 'Provides' lines after fixing a bug in cpanspec
+
+-------------------------------------------------------------------
+Sun Jul 16 03:07:48 UTC 2023 - Tina Müller <timueller+perl@suse.de>
+
+- updated to 2.0209
+   see /usr/share/doc/packages/perl-XML-LibXML/Changes
+
+  2.0209  2023-07-15
+      - t/35huge_mode.t: fix test with libxml2 2.11
+          - thanks to Dominique Martinet
+      - Add clearer reference to using cloneNode to extract node with namespaces
+          - thanks to Timothy Legge
+      - initialize xmlValidCtxt
+          - thanks to Alexander Bluhm
+
+-------------------------------------------------------------------
+Sat Oct  1 03:07:58 UTC 2022 - Tina Müller <timueller+perl@suse.de>
+
+- updated to 2.0208
+   see /usr/share/doc/packages/perl-XML-LibXML/Changes
+
+  2.0208  2022-09-30
+      - Fix https://rt.cpan.org/Ticket/Display.html?id=144415
+          - Bug #144415 for XML-LibXML: createElementNS & setNamespace get
+            confused by Readonly scalars
+          - thanks to DAKKAR and haarg.
+
 -------------------------------------------------------------------
 Sun Apr 18 03:08:08 UTC 2021 - Tina Müller <timueller+perl@suse.de>
 

perl-XML-LibXML.spec

@@ -1,7 +1,7 @@
 #
 # spec file for package perl-XML-LibXML
 #
-# Copyright (c) 2021 SUSE LLC
+# Copyright (c) 2025 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -18,13 +18,14 @@
 
 %define cpan_name XML-LibXML
 Name:           perl-XML-LibXML
-Version:        2.0207
+Version:        2.0210
 Release:        0
-Summary:        Perl Binding for libxml2
 License:        Artistic-1.0 OR GPL-1.0-or-later
+Summary:        Interface to Gnome libxml2 xml parsing and DOM library
 URL:            https://metacpan.org/release/%{cpan_name}
 Source0:        https://cpan.metacpan.org/authors/id/S/SH/SHLOMIF/%{cpan_name}-%{version}.tar.gz
 Source1:        cpanspec.yml
+Patch1:         perl-XML-LibXML-fix-testsuite-with-libxml2-2.13.patch
 BuildRequires:  perl
 BuildRequires:  perl-macros
 BuildRequires:  perl(Alien::Base::Wrapper)
@@ -41,6 +42,43 @@ Requires:       perl(XML::SAX::Base)
 Requires:       perl(XML::SAX::DocumentLocator)
 Requires:       perl(XML::SAX::Exception)
 Requires:       perl(parent)
+Provides:       perl(XML::LibXML) = 2.0209
+Provides:       perl(XML::LibXML::Attr)
+Provides:       perl(XML::LibXML::AttributeHash) = 2.0209
+Provides:       perl(XML::LibXML::Boolean) = 2.0209
+Provides:       perl(XML::LibXML::CDATASection)
+Provides:       perl(XML::LibXML::Comment)
+Provides:       perl(XML::LibXML::Common) = 2.0209
+Provides:       perl(XML::LibXML::Devel) = 2.0209
+Provides:       perl(XML::LibXML::Document)
+Provides:       perl(XML::LibXML::DocumentFragment)
+Provides:       perl(XML::LibXML::Dtd)
+Provides:       perl(XML::LibXML::Element)
+Provides:       perl(XML::LibXML::ErrNo) = 2.0209
+Provides:       perl(XML::LibXML::Error) = 2.0209
+Provides:       perl(XML::LibXML::InputCallback)
+Provides:       perl(XML::LibXML::Literal) = 2.0209
+Provides:       perl(XML::LibXML::NamedNodeMap)
+Provides:       perl(XML::LibXML::Namespace)
+Provides:       perl(XML::LibXML::Node)
+Provides:       perl(XML::LibXML::NodeList) = 2.0209
+Provides:       perl(XML::LibXML::Number) = 2.0209
+Provides:       perl(XML::LibXML::PI)
+Provides:       perl(XML::LibXML::Pattern)
+Provides:       perl(XML::LibXML::Reader) = 2.0209
+Provides:       perl(XML::LibXML::RegExp)
+Provides:       perl(XML::LibXML::RelaxNG)
+Provides:       perl(XML::LibXML::SAX) = 2.0209
+Provides:       perl(XML::LibXML::SAX::AttributeNode)
+Provides:       perl(XML::LibXML::SAX::Builder) = 2.0209
+Provides:       perl(XML::LibXML::SAX::Generator) = 2.0209
+Provides:       perl(XML::LibXML::SAX::Parser) = 2.0209
+Provides:       perl(XML::LibXML::Schema)
+Provides:       perl(XML::LibXML::Text)
+Provides:       perl(XML::LibXML::XPathContext) = 2.0209
+Provides:       perl(XML::LibXML::XPathExpression)
+Provides:       perl(XML::LibXML::_SAXParser)
+%define         __perllib_provides /bin/true
 %{perl_requires}
 # MANUAL BEGIN
 BuildRequires:  pkgconfig(libxml-2.0) >= 2.9.0
@@ -56,19 +94,22 @@ split into several packages which are not described in this section; unless
 stated otherwise, you only need to 'use XML::LibXML;' in your programs.
 
 %prep
-%autosetup  -n %{cpan_name}-%{version}
+%autosetup  -n %{cpan_name}-%{version} -p1
+
+find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path "*/script/*" ! -path "*/scripts/*" ! -name "configure" -print0 | xargs -0 chmod 644
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}"
 %make_build
 
 %check
-make test
+%make_build test
 
 %install
 %perl_make_install
 %perl_process_packlist
 %perl_gen_filelist
+touch example # to have same mtime with+without tests
 
 %files -f %{name}.files
 %doc Changes docs example HACKING.txt README TODO