From adc3c9169f74f9eea1284f023659467480af8393 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Sat, 3 Jun 2017 09:41:55 +0200 Subject: [PATCH 01/50] Increase release to favour standalone package --- perl-libnet.spec | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index fc1f3f4..9e85e66 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,6 +1,6 @@ Name: perl-libnet Version: 3.10 -Release: 3%{?dist} +Release: 392%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages From 816475d029ee5cf51fa6aa965615cd67ea63ca2b Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Sat, 3 Jun 2017 12:57:25 +0200 Subject: [PATCH 02/50] Perl 5.26 rebuild --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 9e85e66..fee9f4e 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,6 +1,6 @@ Name: perl-libnet Version: 3.10 -Release: 392%{?dist} +Release: 393%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -126,6 +126,9 @@ make test %{_mandir}/man3/* %changelog +* Sat Jun 03 2017 Jitka Plesnikova - 3.10-393 +- Perl 5.26 rebuild + * Sat Feb 11 2017 Fedora Release Engineering - 3.10-3 - Rebuilt for https://fedoraproject.org/wiki/Fedora_26_Mass_Rebuild From 1bebd8899c5f238df69f2860837574f64fa2c526 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Wed, 7 Jun 2017 17:09:49 +0200 Subject: [PATCH 03/50] Perl 5.26 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index fee9f4e..03479c0 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,6 +1,6 @@ Name: perl-libnet Version: 3.10 -Release: 393%{?dist} +Release: 394%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -126,6 +126,9 @@ make test %{_mandir}/man3/* %changelog +* Wed Jun 07 2017 Jitka Plesnikova - 3.10-394 +- Perl 5.26 re-rebuild of bootstrapped packages + * Sat Jun 03 2017 Jitka Plesnikova - 3.10-393 - Perl 5.26 rebuild From 81480215ab10fbff6e66f7de03441cbcfb0628f1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= Date: Wed, 12 Jul 2017 14:50:17 +0200 Subject: [PATCH 04/50] perl dependency renamed to perl-interpreter --- perl-libnet.spec | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 03479c0..2679c8b 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -24,7 +24,7 @@ BuildArch: noarch BuildRequires: coreutils BuildRequires: findutils BuildRequires: make -BuildRequires: perl +BuildRequires: perl-interpreter BuildRequires: perl-generators BuildRequires: perl(ExtUtils::MakeMaker) >= 6.64 # Getopt::Std not used because of Do-not-create-Net-libnet.cfg.patch From a2e484951452c582d9db9ef91c88776dbb06f68f Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Thu, 27 Jul 2017 07:13:38 +0000 Subject: [PATCH 05/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_27_Mass_Rebuild --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 2679c8b..5b45ccd 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,6 +1,6 @@ Name: perl-libnet Version: 3.10 -Release: 394%{?dist} +Release: 395%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -126,6 +126,9 @@ make test %{_mandir}/man3/* %changelog +* Thu Jul 27 2017 Fedora Release Engineering - 3.10-395 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_27_Mass_Rebuild + * Wed Jun 07 2017 Jitka Plesnikova - 3.10-394 - Perl 5.26 re-rebuild of bootstrapped packages From 761f0a537d1fe82b8c4566f0a4cf70bf45dafa18 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= Date: Wed, 15 Nov 2017 09:09:37 +0100 Subject: [PATCH 06/50] 3.11 bump --- .gitignore | 1 + perl-libnet.spec | 16 ++++++++-------- sources | 4 ++-- 3 files changed, 11 insertions(+), 10 deletions(-) diff --git a/.gitignore b/.gitignore index 91eb64e..9fe8032 100644 --- a/.gitignore +++ b/.gitignore @@ -5,3 +5,4 @@ /libnet-3.10.tar.gz /libnet-3.10_repackaged.tar.gz /libnetFAQ.pod +/libnet-3.11_repackaged.tar.gz diff --git a/perl-libnet.spec b/perl-libnet.spec index 5b45ccd..8a0f7e3 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,6 +1,6 @@ Name: perl-libnet -Version: 3.10 -Release: 395%{?dist} +Version: 3.11 +Release: 1%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -8,7 +8,6 @@ Summary: Perl clients for various network protocols ## Removed from upstream sources: # lib/Net/libnetFAQ.pod: Artistic (CPAN RT#117888) License: GPL+ or Artistic -Group: Development/Libraries URL: http://search.cpan.org/dist/libnet/ # Origin source archive contains Artistic only files, CPAN RT#117888. # Local archive produced by "./repackage.sh %%{version}" command. @@ -22,11 +21,10 @@ Patch0: libnet-3.09-Normalize-Changes-encoding.patch Patch1: libnet-3.08-Do-not-create-Net-libnet.cfg.patch BuildArch: noarch BuildRequires: coreutils -BuildRequires: findutils BuildRequires: make -BuildRequires: perl-interpreter BuildRequires: perl-generators -BuildRequires: perl(ExtUtils::MakeMaker) >= 6.64 +BuildRequires: perl-interpreter +BuildRequires: perl(ExtUtils::MakeMaker) >= 6.76 # Getopt::Std not used because of Do-not-create-Net-libnet.cfg.patch # IO::File not used because of Do-not-create-Net-libnet.cfg.patch BuildRequires: perl(strict) @@ -108,12 +106,11 @@ install -m 0644 %{SOURCE1} lib/Net %patch1 -p1 %build -perl Makefile.PL INSTALLDIRS=vendor - 3.11-1 +- 3.11 bump + * Thu Jul 27 2017 Fedora Release Engineering - 3.10-395 - Rebuilt for https://fedoraproject.org/wiki/Fedora_27_Mass_Rebuild diff --git a/sources b/sources index 55bf31f..14d3475 100644 --- a/sources +++ b/sources @@ -1,2 +1,2 @@ -7a9dada2b4dc886c0932ad4f3d6534ab libnetFAQ.pod -631c42b40d36bcc689b2d8093ba09545 libnet-3.10_repackaged.tar.gz +SHA512 (libnetFAQ.pod) = 234082350814967ac3bfc0e4c57e53f7473be69f6cc9618cef061aaaaaddfaaf0e1542d38e7775c2fc78fc16d92e45b30ccb48c07d118a0a4b5e1c90d030c42f +SHA512 (libnet-3.11_repackaged.tar.gz) = 77f88f84d8669179c5a70a147822ae09b9a1f94f13c7df0a78d713d65754862cb9fdae41aa632885449b93adaf674990da65b8558a9ef116e5d5c2870be09100 From 40b38cdf26e7f0d002ee2c1575d67886a42581d1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= Date: Tue, 12 Dec 2017 11:33:34 +0100 Subject: [PATCH 07/50] Use build conditions to support optional features --- perl-libnet.spec | 19 ++++++++++++++----- 1 file changed, 14 insertions(+), 5 deletions(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 8a0f7e3..1d6b46d 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,3 +1,10 @@ +# Run optional test +%bcond_without perl_libnet_enables_optional_test +# SASL support +%bcond_without perl_libnet_enables_sasl +# SSL support +%bcond_without perl_libnet_enables_ssl + Name: perl-libnet Version: 3.11 Release: 1%{?dist} @@ -50,7 +57,7 @@ BuildRequires: perl(Time::Local) # Optional run-time: # Authen::SASL not used at tests # Digest::MD5 not used at tests -%if !%{defined perl_bootstrap} +%if %{with perl_libnet_enables_ssl} && !%{defined perl_bootstrap} # Core modules must be built without non-core dependencies BuildRequires: perl(IO::Socket::SSL) >= 2.007 %endif @@ -62,8 +69,9 @@ BuildRequires: perl(Cwd) BuildRequires: perl(File::Temp) BuildRequires: perl(IO::File) BuildRequires: perl(Test::More) +%if %{with perl_libnet_enables_optional_test} # Optional tests: -%if !%{defined perl_bootstrap} +%if %{with perl_libnet_enables_ssl} && !%{defined perl_bootstrap} # Core modules must be built without non-core dependencies BuildRequires: perl(IO::Socket::SSL::Utils) %endif @@ -71,6 +79,7 @@ BuildRequires: perl(IO::Socket::SSL::Utils) # Test::Perl::Critic not used # Test::Pod 1.00 not used # Test::Pod::Coverage 0.08 not used +%endif Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version)) Requires: perl(File::Basename) Requires: perl(IO::Socket) >= 1.05 @@ -80,14 +89,14 @@ Requires: perl(POSIX) Requires: perl(Socket) >= 2.016 # Optional run-time: # Core modules must be built without non-core dependencies -%if !%{defined perl_bootstrap} +%if %{with perl_libnet_enables_sasl} && !%{defined perl_bootstrap} Suggests: perl(Authen::SASL) +Suggests: perl(MIME::Base64) %endif Suggests: perl(Digest::MD5) -%if !%{defined perl_bootstrap} +%if %{with perl_libnet_enables_ssl} && !%{defined perl_bootstrap} Suggests: perl(IO::Socket::SSL) >= 2.007 %endif -Suggests: perl(MIME::Base64) Conflicts: perl < 4:5.22.0-347 # Filter under-specified dependencies From 73a3157661454ec9fee2034e63edd517a49edfc0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= Date: Tue, 12 Dec 2017 11:39:31 +0100 Subject: [PATCH 08/50] Require Digest::MD5 for APOP login method --- perl-libnet.spec | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 1d6b46d..f6ac1c6 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -7,7 +7,7 @@ Name: perl-libnet Version: 3.11 -Release: 1%{?dist} +Release: 2%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -93,7 +93,8 @@ Requires: perl(Socket) >= 2.016 Suggests: perl(Authen::SASL) Suggests: perl(MIME::Base64) %endif -Suggests: perl(Digest::MD5) +# Digest::MD5 or MD5 +Requires: perl(Digest::MD5) %if %{with perl_libnet_enables_ssl} && !%{defined perl_bootstrap} Suggests: perl(IO::Socket::SSL) >= 2.007 %endif @@ -132,6 +133,9 @@ make test %{_mandir}/man3/* %changelog +* Tue Dec 12 2017 Petr Pisar - 3.11-2 +- Require Digest::MD5 for APOP login method + * Wed Nov 15 2017 Petr Pisar - 3.11-1 - 3.11 bump From da1b7a87b017b4af531fd16837747abfbd3a08e7 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 9 Feb 2018 02:42:21 +0000 Subject: [PATCH 09/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_28_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index f6ac1c6..6618fc3 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -7,7 +7,7 @@ Name: perl-libnet Version: 3.11 -Release: 2%{?dist} +Release: 3%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -133,6 +133,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Feb 09 2018 Fedora Release Engineering - 3.11-3 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_28_Mass_Rebuild + * Tue Dec 12 2017 Petr Pisar - 3.11-2 - Require Digest::MD5 for APOP login method From 8799d71bc96c9db7a72658edcd27f9f21b260f71 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Mon, 9 Apr 2018 10:19:48 +0200 Subject: [PATCH 10/50] Do not run optional test on RHEL --- perl-libnet.spec | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/perl-libnet.spec b/perl-libnet.spec index 6618fc3..2e9dd9a 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,5 +1,9 @@ # Run optional test +%if ! (0%{?rhel}) %bcond_without perl_libnet_enables_optional_test +%else +%bcond_with perl_libnet_enables_optional_test +%endif # SASL support %bcond_without perl_libnet_enables_sasl # SSL support From 6e7ebf3e9ea4e87f3debcca479d7b942fb8b7d8c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= Date: Mon, 4 Jun 2018 15:14:05 +0200 Subject: [PATCH 11/50] cpan.org addresses moved to MetaCPAN --- perl-libnet.spec | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 2e9dd9a..a49e1ae 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -19,7 +19,7 @@ Summary: Perl clients for various network protocols ## Removed from upstream sources: # lib/Net/libnetFAQ.pod: Artistic (CPAN RT#117888) License: GPL+ or Artistic -URL: http://search.cpan.org/dist/libnet/ +URL: https://metacpan.org/release/libnet # Origin source archive contains Artistic only files, CPAN RT#117888. # Local archive produced by "./repackage.sh %%{version}" command. # http://www.cpan.org/authors/id/S/SH/SHAY/libnet-%%{version}.tar.gz From 07488b3cb4f5301813bceafea2fee7fbbb972e24 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Wed, 27 Jun 2018 02:17:35 +0200 Subject: [PATCH 12/50] Increase release to favour standalone package --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index a49e1ae..434e77b 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 3%{?dist} +Release: 416%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Wed Jun 27 2018 Jitka Plesnikova - 3.11-416 +- Increase release to favour standalone package + * Fri Feb 09 2018 Fedora Release Engineering - 3.11-3 - Rebuilt for https://fedoraproject.org/wiki/Fedora_28_Mass_Rebuild From f5ec062085d08652b23e665d1f63a63023a7055e Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Sat, 30 Jun 2018 23:06:06 +0200 Subject: [PATCH 13/50] Perl 5.28 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 434e77b..8dfbab6 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 416%{?dist} +Release: 417%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Sat Jun 30 2018 Jitka Plesnikova - 3.11-417 +- Perl 5.28 re-rebuild of bootstrapped packages + * Wed Jun 27 2018 Jitka Plesnikova - 3.11-416 - Increase release to favour standalone package From 1ce8b695a0e26201926db0000c2a81d36967006d Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 13 Jul 2018 20:59:04 +0000 Subject: [PATCH 14/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_29_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 8dfbab6..ae374ce 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 417%{?dist} +Release: 418%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jul 13 2018 Fedora Release Engineering - 3.11-418 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_29_Mass_Rebuild + * Sat Jun 30 2018 Jitka Plesnikova - 3.11-417 - Perl 5.28 re-rebuild of bootstrapped packages From bf8ee1d26a7ed23801a66cff13a834891377d88f Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Sat, 2 Feb 2019 01:55:29 +0000 Subject: [PATCH 15/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_30_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index ae374ce..6f64acc 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 418%{?dist} +Release: 419%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Sat Feb 02 2019 Fedora Release Engineering - 3.11-419 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_30_Mass_Rebuild + * Fri Jul 13 2018 Fedora Release Engineering - 3.11-418 - Rebuilt for https://fedoraproject.org/wiki/Fedora_29_Mass_Rebuild From 3b20ecf02ae4b2b19087501c627a1bd004e60297 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Thu, 30 May 2019 10:59:44 +0200 Subject: [PATCH 16/50] Increase release to favour standalone package --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 6f64acc..d55e97d 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 419%{?dist} +Release: 438%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Thu May 30 2019 Jitka Plesnikova - 3.11-438 +- Increase release to favour standalone package + * Sat Feb 02 2019 Fedora Release Engineering - 3.11-419 - Rebuilt for https://fedoraproject.org/wiki/Fedora_30_Mass_Rebuild From c53c0704dd9abd36de25c098990243e3acc13360 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Sun, 2 Jun 2019 22:54:35 +0200 Subject: [PATCH 17/50] Perl 5.30 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index d55e97d..75d250f 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 438%{?dist} +Release: 439%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Sun Jun 02 2019 Jitka Plesnikova - 3.11-439 +- Perl 5.30 re-rebuild of bootstrapped packages + * Thu May 30 2019 Jitka Plesnikova - 3.11-438 - Increase release to favour standalone package From 21a47774837f0dcdcf254e54a744db789e104db2 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 26 Jul 2019 08:24:32 +0000 Subject: [PATCH 18/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_31_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 75d250f..446e1bc 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 439%{?dist} +Release: 440%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jul 26 2019 Fedora Release Engineering - 3.11-440 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_31_Mass_Rebuild + * Sun Jun 02 2019 Jitka Plesnikova - 3.11-439 - Perl 5.30 re-rebuild of bootstrapped packages From 852fe4dee366e0704427ed3a2de9909bd97b81fd Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Thu, 30 Jan 2020 06:30:58 +0000 Subject: [PATCH 19/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 446e1bc..ce7160d 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 440%{?dist} +Release: 441%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Thu Jan 30 2020 Fedora Release Engineering - 3.11-441 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild + * Fri Jul 26 2019 Fedora Release Engineering - 3.11-440 - Rebuilt for https://fedoraproject.org/wiki/Fedora_31_Mass_Rebuild From 5a19752d44bbcb6bb7948508e5a7c35c2e9b9a04 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Mon, 22 Jun 2020 13:40:54 +0200 Subject: [PATCH 20/50] Increase release to favour standalone package --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index ce7160d..aa9f03d 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 441%{?dist} +Release: 456%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Mon Jun 22 2020 Jitka Plesnikova - 3.11-456 +- Increase release to favour standalone package + * Thu Jan 30 2020 Fedora Release Engineering - 3.11-441 - Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild From 0049cf85adf3ff802b79cea656ea11ca5fcfa8e5 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Fri, 26 Jun 2020 18:31:26 +0200 Subject: [PATCH 21/50] Perl 5.32 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index aa9f03d..7a08f89 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 456%{?dist} +Release: 457%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jun 26 2020 Jitka Plesnikova - 3.11-457 +- Perl 5.32 re-rebuild of bootstrapped packages + * Mon Jun 22 2020 Jitka Plesnikova - 3.11-456 - Increase release to favour standalone package From 0a4e3a489d67c3db31f088a7ae1235bc83f35e78 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Tue, 28 Jul 2020 20:24:31 +0000 Subject: [PATCH 22/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_33_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 7a08f89..530ee22 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.11 -Release: 457%{?dist} +Release: 458%{?dist} Summary: Perl clients for various network protocols # other files: GPL+ or Artistic ## Not in binary packages @@ -137,6 +137,9 @@ make test %{_mandir}/man3/* %changelog +* Tue Jul 28 2020 Fedora Release Engineering - 3.11-458 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_33_Mass_Rebuild + * Fri Jun 26 2020 Jitka Plesnikova - 3.11-457 - Perl 5.32 re-rebuild of bootstrapped packages From b1ccc7043aa2693da41c7eb87ffd4a01b859f31f Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Wed, 9 Dec 2020 13:19:03 +0100 Subject: [PATCH 23/50] 3.12 bump; License in libnetFAQ was fixed --- .gitignore | 1 + perl-libnet.spec | 27 +++++++++------------------ sources | 3 +-- 3 files changed, 11 insertions(+), 20 deletions(-) diff --git a/.gitignore b/.gitignore index 9fe8032..9c3abd7 100644 --- a/.gitignore +++ b/.gitignore @@ -6,3 +6,4 @@ /libnet-3.10_repackaged.tar.gz /libnetFAQ.pod /libnet-3.11_repackaged.tar.gz +/libnet-3.12.tar.gz diff --git a/perl-libnet.spec b/perl-libnet.spec index 530ee22..7b2ab07 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -10,22 +10,12 @@ %bcond_without perl_libnet_enables_ssl Name: perl-libnet -Version: 3.11 -Release: 458%{?dist} +Version: 3.12 +Release: 1%{?dist} Summary: Perl clients for various network protocols -# other files: GPL+ or Artistic -## Not in binary packages -# repackage.sh: GPLv2+ -## Removed from upstream sources: -# lib/Net/libnetFAQ.pod: Artistic (CPAN RT#117888) License: GPL+ or Artistic URL: https://metacpan.org/release/libnet -# Origin source archive contains Artistic only files, CPAN RT#117888. -# Local archive produced by "./repackage.sh %%{version}" command. -# http://www.cpan.org/authors/id/S/SH/SHAY/libnet-%%{version}.tar.gz -Source0: libnet-%{version}_repackaged.tar.gz -# Replacement for the Artistic only file, CPAN RT#117888. -Source1: libnetFAQ.pod +Source0: https://cpan.metacpan.org/authors/id/S/SH/SHAY/libnet-%{version}.tar.gz # Convert Changes to UTF-8 Patch0: libnet-3.09-Normalize-Changes-encoding.patch # Do not create Net/libnet.cfg, bug #1238689 @@ -114,17 +104,15 @@ protocols used in the internet community. %prep %setup -q -n libnet-%{version} -# Provide dummy Net::libnetFAQ document, CPAN RT#117888 -install -m 0644 %{SOURCE1} lib/Net %patch0 -p1 %patch1 -p1 %build -perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1 - 3.12-1 +- 3.12 bump + * Tue Jul 28 2020 Fedora Release Engineering - 3.11-458 - Rebuilt for https://fedoraproject.org/wiki/Fedora_33_Mass_Rebuild diff --git a/sources b/sources index 14d3475..3745ab7 100644 --- a/sources +++ b/sources @@ -1,2 +1 @@ -SHA512 (libnetFAQ.pod) = 234082350814967ac3bfc0e4c57e53f7473be69f6cc9618cef061aaaaaddfaaf0e1542d38e7775c2fc78fc16d92e45b30ccb48c07d118a0a4b5e1c90d030c42f -SHA512 (libnet-3.11_repackaged.tar.gz) = 77f88f84d8669179c5a70a147822ae09b9a1f94f13c7df0a78d713d65754862cb9fdae41aa632885449b93adaf674990da65b8558a9ef116e5d5c2870be09100 +SHA512 (libnet-3.12.tar.gz) = a4727dd666273e024e4efc81d3189fbfd3a1fbe4c39d9f29eb2afb697cd679a33697fb123e7cc600ea7e47b12adc99082b1cf1d4fa717431598beafe985203b3 From 601cbc693808b3445e097196f9bf3273fa1ed7d4 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Mon, 4 Jan 2021 14:29:51 +0100 Subject: [PATCH 24/50] 3.13 bump --- .gitignore | 1 + perl-libnet.spec | 5 ++++- sources | 2 +- 3 files changed, 6 insertions(+), 2 deletions(-) diff --git a/.gitignore b/.gitignore index 9c3abd7..590576e 100644 --- a/.gitignore +++ b/.gitignore @@ -7,3 +7,4 @@ /libnetFAQ.pod /libnet-3.11_repackaged.tar.gz /libnet-3.12.tar.gz +/libnet-3.13.tar.gz diff --git a/perl-libnet.spec b/perl-libnet.spec index 7b2ab07..ad1261a 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -10,7 +10,7 @@ %bcond_without perl_libnet_enables_ssl Name: perl-libnet -Version: 3.12 +Version: 3.13 Release: 1%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic @@ -125,6 +125,9 @@ make test %{_mandir}/man3/* %changelog +* Mon Jan 04 2021 Jitka Plesnikova - 3.13-1 +- 3.13 bump + * Wed Dec 09 2020 Jitka Plesnikova - 3.12-1 - 3.12 bump diff --git a/sources b/sources index 3745ab7..dd3e088 100644 --- a/sources +++ b/sources @@ -1 +1 @@ -SHA512 (libnet-3.12.tar.gz) = a4727dd666273e024e4efc81d3189fbfd3a1fbe4c39d9f29eb2afb697cd679a33697fb123e7cc600ea7e47b12adc99082b1cf1d4fa717431598beafe985203b3 +SHA512 (libnet-3.13.tar.gz) = 80d670a71f8793a4ca4bf781d800ee52ca3985795033be64e6ed12520d46da4813325d7534969c12125333d4f85e47fa497ea8687558f969b8eb3e7bfd3c1540 From 97e8b393106bff8e8a9b1b8e09c597e5c0f9f4be Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Wed, 27 Jan 2021 06:08:52 +0000 Subject: [PATCH 25/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_34_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index ad1261a..47cd3d1 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.13 -Release: 1%{?dist} +Release: 2%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet @@ -125,6 +125,9 @@ make test %{_mandir}/man3/* %changelog +* Wed Jan 27 2021 Fedora Release Engineering - 3.13-2 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_34_Mass_Rebuild + * Mon Jan 04 2021 Jitka Plesnikova - 3.13-1 - 3.13 bump From d0297998103077f4745d3bb93e97a4368ba1377c Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Fri, 21 May 2021 09:58:41 +0200 Subject: [PATCH 26/50] Increase release to favour standalone package --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 47cd3d1..13fc26f 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.13 -Release: 2%{?dist} +Release: 477%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet @@ -125,6 +125,9 @@ make test %{_mandir}/man3/* %changelog +* Fri May 21 2021 Jitka Plesnikova - 3.13-477 +- Increase release to favour standalone package + * Wed Jan 27 2021 Fedora Release Engineering - 3.13-2 - Rebuilt for https://fedoraproject.org/wiki/Fedora_34_Mass_Rebuild From 7b07641ed66299243f78df91f0d18253f4122606 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Mon, 24 May 2021 10:13:13 +0200 Subject: [PATCH 27/50] Perl 5.34 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 13fc26f..14862ff 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.13 -Release: 477%{?dist} +Release: 478%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet @@ -125,6 +125,9 @@ make test %{_mandir}/man3/* %changelog +* Mon May 24 2021 Jitka Plesnikova - 3.13-478 +- Perl 5.34 re-rebuild of bootstrapped packages + * Fri May 21 2021 Jitka Plesnikova - 3.13-477 - Increase release to favour standalone package From 6303ab5854e311d02b10a702b71c6a244baa080e Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Tue, 27 Jul 2021 07:08:07 +0000 Subject: [PATCH 28/50] - Second attempt - Rebuilt for https://fedoraproject.org/wiki/Fedora_35_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 14862ff..08fc937 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.13 -Release: 478%{?dist} +Release: 479%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet @@ -125,6 +125,10 @@ make test %{_mandir}/man3/* %changelog +* Tue Jul 27 2021 Fedora Release Engineering - 3.13-479 +- Second attempt - Rebuilt for + https://fedoraproject.org/wiki/Fedora_35_Mass_Rebuild + * Mon May 24 2021 Jitka Plesnikova - 3.13-478 - Perl 5.34 re-rebuild of bootstrapped packages From a5d5429c4af71e085c2c8ac7ee67c4159cf40809 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 21 Jan 2022 07:00:52 +0000 Subject: [PATCH 29/50] - Rebuilt for https://fedoraproject.org/wiki/Fedora_36_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 08fc937..70819ef 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -11,7 +11,7 @@ Name: perl-libnet Version: 3.13 -Release: 479%{?dist} +Release: 480%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet @@ -125,6 +125,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jan 21 2022 Fedora Release Engineering - 3.13-480 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_36_Mass_Rebuild + * Tue Jul 27 2021 Fedora Release Engineering - 3.13-479 - Second attempt - Rebuilt for https://fedoraproject.org/wiki/Fedora_35_Mass_Rebuild From 18dce84b4dfd1df980a2967e62162bd058760e3f Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Thu, 12 May 2022 09:56:39 +0200 Subject: [PATCH 30/50] Upgrade to 3.14 as provided in perl-5.35.11 --- libnet-3.13-Upgrade-to-3.14.patch | 911 ++++++++++++++++++++++++++++++ perl-libnet.spec | 22 +- 2 files changed, 924 insertions(+), 9 deletions(-) create mode 100644 libnet-3.13-Upgrade-to-3.14.patch diff --git a/libnet-3.13-Upgrade-to-3.14.patch b/libnet-3.13-Upgrade-to-3.14.patch new file mode 100644 index 0000000..1e9bde1 --- /dev/null +++ b/libnet-3.13-Upgrade-to-3.14.patch @@ -0,0 +1,911 @@ +From b8cbf3b3789baeba499d2aa32f9dc56d50ab141b Mon Sep 17 00:00:00 2001 +From: Jitka Plesnikova +Date: Thu, 12 May 2022 09:41:15 +0200 +Subject: [PATCH] Upgrade to 3.14 + +--- + Makefile.PL | 2 +- + lib/Net/Cmd.pm | 8 +- + lib/Net/Config.pm | 4 +- + lib/Net/Domain.pm | 4 +- + lib/Net/FTP.pm | 6 +- + lib/Net/FTP/A.pm | 2 +- + lib/Net/FTP/E.pm | 2 +- + lib/Net/FTP/I.pm | 2 +- + lib/Net/FTP/L.pm | 2 +- + lib/Net/FTP/dataconn.pm | 4 +- + lib/Net/NNTP.pm | 4 +- + lib/Net/Netrc.pm | 4 +- + lib/Net/POP3.pm | 4 +- + lib/Net/SMTP.pm | 4 +- + lib/Net/Time.pm | 4 +- + t/changes.t | 48 ----------- + t/critic.t | 48 ----------- + t/external/ftp-ssl.t | 173 ---------------------------------------- + t/external/pop3-ssl.t | 58 -------------- + t/external/smtp-ssl.t | 57 ------------- + t/pod.t | 51 ------------ + t/pod_coverage.t | 85 -------------------- + 22 files changed, 28 insertions(+), 548 deletions(-) + delete mode 100644 t/changes.t + delete mode 100644 t/critic.t + delete mode 100644 t/external/ftp-ssl.t + delete mode 100644 t/external/pop3-ssl.t + delete mode 100644 t/external/smtp-ssl.t + delete mode 100644 t/pod.t + delete mode 100644 t/pod_coverage.t + +diff --git a/Makefile.PL b/Makefile.PL +index bca19b1..df52526 100644 +--- a/Makefile.PL ++++ b/Makefile.PL +@@ -235,7 +235,7 @@ MAIN: { + sub MY::post_initialize { + my $self = shift; + +- return ''; ++ return '' if $self->{PERL_CORE}; + + if (not -f $CfgFile) { + my @args = qw(Configure); +diff --git a/lib/Net/Cmd.pm b/lib/Net/Cmd.pm +index 41df8a2..b8dc728 100644 +--- a/lib/Net/Cmd.pm ++++ b/lib/Net/Cmd.pm +@@ -19,14 +19,14 @@ use Symbol 'gensym'; + use Errno 'EINTR'; + + BEGIN { +- if ($^O eq 'os390') { ++ if (ord "A" == 193) { + require Convert::EBCDIC; + + # Convert::EBCDIC->import; + } + } + +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + our @ISA = qw(Exporter); + our @EXPORT = qw(CMD_INFO CMD_OK CMD_MORE CMD_REJECT CMD_ERROR CMD_PENDING); + +@@ -41,7 +41,7 @@ use constant DEF_REPLY_CODE => 421; + + my %debug = (); + +-my $tr = $^O eq 'os390' ? Convert::EBCDIC->new() : undef; ++my $tr = ord "A" == 193 ? Convert::EBCDIC->new() : undef; + + sub toebcdic { + my $cmd = shift; +@@ -897,7 +897,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/Config.pm b/lib/Net/Config.pm +index 2f8417f..b9eb827 100644 +--- a/lib/Net/Config.pm ++++ b/lib/Net/Config.pm +@@ -18,7 +18,7 @@ use Socket qw(inet_aton inet_ntoa); + + our @EXPORT = qw(%NetConfig); + our @ISA = qw(Net::LocalCfg Exporter); +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + our($CONFIGURE, $LIBNET_CFG); + +@@ -368,7 +368,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/Domain.pm b/lib/Net/Domain.pm +index d69ac5b..7c017f2 100644 +--- a/lib/Net/Domain.pm ++++ b/lib/Net/Domain.pm +@@ -19,7 +19,7 @@ use Net::Config; + + our @ISA = qw(Exporter); + our @EXPORT_OK = qw(hostname hostdomain hostfqdn domainname); +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + my ($host, $domain, $fqdn) = (undef, undef, undef); + +@@ -395,7 +395,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/FTP.pm b/lib/Net/FTP.pm +index 37836bf..b6b220d 100644 +--- a/lib/Net/FTP.pm ++++ b/lib/Net/FTP.pm +@@ -23,7 +23,7 @@ use Net::Config; + use Socket; + use Time::Local; + +-our $VERSION = '3.13'; ++our $VERSION = '3.14'; + + our $IOCLASS; + my $family_key; +@@ -66,7 +66,7 @@ use constant TELNET_IAC => 255; + use constant TELNET_IP => 244; + use constant TELNET_DM => 242; + +-use constant EBCDIC => $^O eq 'os390'; ++use constant EBCDIC => ord 'A' == 193; + + sub new { + my $pkg = shift; +@@ -2044,7 +2044,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/FTP/A.pm b/lib/Net/FTP/A.pm +index 5344638..1ea4831 100644 +--- a/lib/Net/FTP/A.pm ++++ b/lib/Net/FTP/A.pm +@@ -13,7 +13,7 @@ use Carp; + use Net::FTP::dataconn; + + our @ISA = qw(Net::FTP::dataconn); +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + our $buf; + +diff --git a/lib/Net/FTP/E.pm b/lib/Net/FTP/E.pm +index 9b13707..7b8c2ea 100644 +--- a/lib/Net/FTP/E.pm ++++ b/lib/Net/FTP/E.pm +@@ -8,6 +8,6 @@ use warnings; + use Net::FTP::I; + + our @ISA = qw(Net::FTP::I); +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + 1; +diff --git a/lib/Net/FTP/I.pm b/lib/Net/FTP/I.pm +index 726cba1..afcc51f 100644 +--- a/lib/Net/FTP/I.pm ++++ b/lib/Net/FTP/I.pm +@@ -13,7 +13,7 @@ use Carp; + use Net::FTP::dataconn; + + our @ISA = qw(Net::FTP::dataconn); +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + our $buf; + +diff --git a/lib/Net/FTP/L.pm b/lib/Net/FTP/L.pm +index ac5e27e..9dfe491 100644 +--- a/lib/Net/FTP/L.pm ++++ b/lib/Net/FTP/L.pm +@@ -8,6 +8,6 @@ use warnings; + use Net::FTP::I; + + our @ISA = qw(Net::FTP::I); +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + 1; +diff --git a/lib/Net/FTP/dataconn.pm b/lib/Net/FTP/dataconn.pm +index 5a257e6..979be7c 100644 +--- a/lib/Net/FTP/dataconn.pm ++++ b/lib/Net/FTP/dataconn.pm +@@ -13,7 +13,7 @@ use Carp; + use Errno; + use Net::Cmd; + +-our $VERSION = '3.13'; ++our $VERSION = '3.14'; + + $Net::FTP::IOCLASS or die "please load Net::FTP before Net::FTP::dataconn"; + our @ISA = $Net::FTP::IOCLASS; +@@ -224,7 +224,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/NNTP.pm b/lib/Net/NNTP.pm +index 3187f51..bbdc884 100644 +--- a/lib/Net/NNTP.pm ++++ b/lib/Net/NNTP.pm +@@ -19,7 +19,7 @@ use Net::Cmd; + use Net::Config; + use Time::Local; + +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + # Code for detecting if we can use SSL + my $ssl_class = eval { +@@ -1308,7 +1308,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/Netrc.pm b/lib/Net/Netrc.pm +index 50688ee..3dec11e 100644 +--- a/lib/Net/Netrc.pm ++++ b/lib/Net/Netrc.pm +@@ -16,7 +16,7 @@ use warnings; + use Carp; + use FileHandle; + +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + our $TESTING; + +@@ -353,7 +353,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/POP3.pm b/lib/Net/POP3.pm +index 55f7be1..a4ed8eb 100644 +--- a/lib/Net/POP3.pm ++++ b/lib/Net/POP3.pm +@@ -18,7 +18,7 @@ use IO::Socket; + use Net::Cmd; + use Net::Config; + +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + # Code for detecting if we can use SSL + my $ssl_class = eval { +@@ -869,7 +869,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/SMTP.pm b/lib/Net/SMTP.pm +index 354ed8e..c04a362 100644 +--- a/lib/Net/SMTP.pm ++++ b/lib/Net/SMTP.pm +@@ -19,7 +19,7 @@ use Net::Cmd; + use Net::Config; + use Socket; + +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + # Code for detecting if we can use SSL + my $ssl_class = eval { +@@ -1052,7 +1052,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/lib/Net/Time.pm b/lib/Net/Time.pm +index 7f0a724..7906c1a 100644 +--- a/lib/Net/Time.pm ++++ b/lib/Net/Time.pm +@@ -22,7 +22,7 @@ use Net::Config; + our @ISA = qw(Exporter); + our @EXPORT_OK = qw(inet_time inet_daytime); + +-our $VERSION = "3.13"; ++our $VERSION = "3.14"; + + our $TIMEOUT = 120; + +@@ -190,7 +190,7 @@ License or the Artistic License, as specified in the F file. + + =head1 VERSION + +-Version 3.13 ++Version 3.14 + + =head1 DATE + +diff --git a/t/changes.t b/t/changes.t +deleted file mode 100644 +index 8235c1b..0000000 +--- a/t/changes.t ++++ /dev/null +@@ -1,48 +0,0 @@ +-#!perl +-#=============================================================================== +-# +-# t/changes.t +-# +-# DESCRIPTION +-# Test script to check CPAN::Changes conformance. +-# +-# COPYRIGHT +-# Copyright (C) 2014 Steve Hay. All rights reserved. +-# +-# LICENCE +-# This script is free software; you can redistribute it and/or modify it under +-# the same terms as Perl itself, i.e. under the terms of either the GNU +-# General Public License or the Artistic License, as specified in the LICENCE +-# file. +-# +-#=============================================================================== +- +-use 5.008001; +- +-use strict; +-use warnings; +- +-use Test::More; +- +-#=============================================================================== +-# MAIN PROGRAM +-#=============================================================================== +- +-MAIN: { +- plan skip_all => 'Author testing only' unless $ENV{AUTHOR_TESTING}; +- +- my $ok = eval { +- require Test::CPAN::Changes; +- Test::CPAN::Changes->import(); +- 1; +- }; +- +- if (not $ok) { +- plan skip_all => 'Test::CPAN::Changes required to test Changes'; +- } +- else { +- changes_ok(); +- } +-} +- +-#=============================================================================== +diff --git a/t/critic.t b/t/critic.t +deleted file mode 100644 +index 339dadb..0000000 +--- a/t/critic.t ++++ /dev/null +@@ -1,48 +0,0 @@ +-#!perl +-#=============================================================================== +-# +-# t/critic.t +-# +-# DESCRIPTION +-# Test script to check Perl::Critic conformance. +-# +-# COPYRIGHT +-# Copyright (C) 2014 Steve Hay. All rights reserved. +-# +-# LICENCE +-# This script is free software; you can redistribute it and/or modify it under +-# the same terms as Perl itself, i.e. under the terms of either the GNU +-# General Public License or the Artistic License, as specified in the LICENCE +-# file. +-# +-#=============================================================================== +- +-use 5.008001; +- +-use strict; +-use warnings; +- +-use Test::More; +- +-#=============================================================================== +-# MAIN PROGRAM +-#=============================================================================== +- +-MAIN: { +- plan skip_all => 'Author testing only' unless $ENV{AUTHOR_TESTING}; +- +- my $ok = eval { +- require Test::Perl::Critic; +- Test::Perl::Critic->import(-profile => ''); +- 1; +- }; +- +- if (not $ok) { +- plan skip_all => 'Test::Perl::Critic required to test with Perl::Critic'; +- } +- else { +- all_critic_ok('.'); +- } +-} +- +-#=============================================================================== +diff --git a/t/external/ftp-ssl.t b/t/external/ftp-ssl.t +deleted file mode 100644 +index 28c038a..0000000 +--- a/t/external/ftp-ssl.t ++++ /dev/null +@@ -1,173 +0,0 @@ +-#!perl +- +-use 5.008001; +- +-use strict; +-use warnings; +- +-use Net::FTP; +-use Test::More; +-use File::Temp; +-use IO::Socket::INET; +- +-my $server = 'test.rebex.net'; +-my $debug = 0; +- +-plan skip_all => "no SSL support" if ! Net::FTP->can_ssl; +-require IO::Socket::SSL; +- +- +-# first try to connect w/o ftp +-# plain +-diag( "connect inet to $server:21" ); +-IO::Socket::INET->new( "$server:21" ) or do { +- plan skip_all => "$server:21 not reachable"; +-}; +- +-# ssl to the right host +-diag( "connect inet to $server:990" ); +-my $sock = IO::Socket::INET->new( "$server:990") or do { +- plan skip_all => "$server:990 not reachable"; +-}; +- +-# now we need CAs +-my $cafh = File::Temp->new( UNLINK => 0, SUFFIX => '.crt' ); +-my %sslargs = ( SSL_ca_file => $cafh->filename ); +-print $cafh ; +-close($cafh); +- +-diag( "upgrade to ssl $server:990" ); +-IO::Socket::SSL->start_SSL($sock, +- SSL_verify_mode => 1, +- SSL_verifycn_name => $server, +- SSL_verifycn_scheme => 'ftp', +- %sslargs, +-) or do { +- plan skip_all => "$server:990 not upgradable to SSL: ". +- $IO::Socket::SSL::SSL_ERROR; +-}; +- +-plan tests => 9; +- +-# first direct SSL +-diag( "connect ftp over ssl to $server" ); +-my $ftp = Net::FTP->new($server, +- SSL => 1, +- %sslargs, +- Debug => $debug, +- Passive => 1, +-); +-ok($ftp,"ftp ssl connect $server"); +-$ftp->login("anonymous",'net-sslglue-ftp@test.perl') +- or die "login to $server failed"; +-diag("logged in"); +-# check that we can talk on connection +-ok(~~$ftp->ls,"directory listing protected"); +-$ftp->prot('C'); +-ok(~~$ftp->ls,"directory listing clear"); +- +-# then TLS upgrade inside plain connection +-$ftp = Net::FTP->new($server, +- Passive => 1, +- Debug => $debug, +- %sslargs +-); +-ok($ftp,"ftp plain connect $server"); +-my $ok = $ftp->starttls; +-ok($ok,"ssl upgrade"); +-$ftp->login("anonymous",'net-sslglue-ftp@test.perl') +- or die "login to $server failed"; +-diag("logged in"); +-# check that we can talk on connection +-ok(~~$ftp->ls,"directory listing protected"); +-$ftp->prot('C'); +-ok(~~$ftp->ls,"directory listing clear"); +-$ok = $ftp->stoptls; +-ok($ok,"ssl downgrade"); +-ok(~~$ftp->ls,"directory listing after downgrade"); +- +- +-__DATA__ +-# Subject: C=IL, O=StartCom Ltd., OU=Secure Digital Certificate Signing, CN=StartCom Class 2 Primary Intermediate Server CA +-# Issuer: C=IL, O=StartCom Ltd., OU=Secure Digital Certificate Signing, CN=StartCom Certification Authority +------BEGIN CERTIFICATE----- +-MIIGNDCCBBygAwIBAgIBGjANBgkqhkiG9w0BAQUFADB9MQswCQYDVQQGEwJJTDEW +-MBQGA1UEChMNU3RhcnRDb20gTHRkLjErMCkGA1UECxMiU2VjdXJlIERpZ2l0YWwg +-Q2VydGlmaWNhdGUgU2lnbmluZzEpMCcGA1UEAxMgU3RhcnRDb20gQ2VydGlmaWNh +-dGlvbiBBdXRob3JpdHkwHhcNMDcxMDI0MjA1NzA5WhcNMTcxMDI0MjA1NzA5WjCB +-jDELMAkGA1UEBhMCSUwxFjAUBgNVBAoTDVN0YXJ0Q29tIEx0ZC4xKzApBgNVBAsT +-IlNlY3VyZSBEaWdpdGFsIENlcnRpZmljYXRlIFNpZ25pbmcxODA2BgNVBAMTL1N0 +-YXJ0Q29tIENsYXNzIDIgUHJpbWFyeSBJbnRlcm1lZGlhdGUgU2VydmVyIENBMIIB +-IjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEA4k85L6GMmoWtCA4IPlfyiAEh +-G5SpbOK426oZGEY6UqH1D/RujOqWjJaHeRNAUS8i8gyLhw9l33F0NENVsTUJm9m8 +-H/rrQtCXQHK3Q5Y9upadXVACHJuRjZzArNe7LxfXyz6CnXPrB0KSss1ks3RVG7RL +-hiEs93iHMuAW5Nq9TJXqpAp+tgoNLorPVavD5d1Bik7mb2VsskDPF125w2oLJxGE +-d2H2wnztwI14FBiZgZl1Y7foU9O6YekO+qIw80aiuckfbIBaQKwn7UhHM7BUxkYa +-8zVhwQIpkFR+ZE3EMFICgtffziFuGJHXuKuMJxe18KMBL47SLoc6PbQpZ4rEAwID +-AQABo4IBrTCCAakwDwYDVR0TAQH/BAUwAwEB/zAOBgNVHQ8BAf8EBAMCAQYwHQYD +-VR0OBBYEFBHbI0X9VMxqcW+EigPXvvcBLyaGMB8GA1UdIwQYMBaAFE4L7xqkQFul +-F2mHMMo0aEPQQa7yMGYGCCsGAQUFBwEBBFowWDAnBggrBgEFBQcwAYYbaHR0cDov +-L29jc3Auc3RhcnRzc2wuY29tL2NhMC0GCCsGAQUFBzAChiFodHRwOi8vd3d3LnN0 +-YXJ0c3NsLmNvbS9zZnNjYS5jcnQwWwYDVR0fBFQwUjAnoCWgI4YhaHR0cDovL3d3 +-dy5zdGFydHNzbC5jb20vc2ZzY2EuY3JsMCegJaAjhiFodHRwOi8vY3JsLnN0YXJ0 +-c3NsLmNvbS9zZnNjYS5jcmwwgYAGA1UdIAR5MHcwdQYLKwYBBAGBtTcBAgEwZjAu +-BggrBgEFBQcCARYiaHR0cDovL3d3dy5zdGFydHNzbC5jb20vcG9saWN5LnBkZjA0 +-BggrBgEFBQcCARYoaHR0cDovL3d3dy5zdGFydHNzbC5jb20vaW50ZXJtZWRpYXRl +-LnBkZjANBgkqhkiG9w0BAQUFAAOCAgEAnQfh7pB2MWcWRXCMy4SLS1doRKWJwfJ+ +-yyiL9edwd9W29AshYKWhdHMkIoDW2LqNomJdCTVCKfs5Y0ULpLA4Gmj0lRPM4EOU +-7Os5GuxXKdmZbfWEzY5zrsncavqenRZkkwjHHMKJVJ53gJD2uSl26xNnSFn4Ljox +-uMnTiOVfTtIZPUOO15L/zzi24VuKUx3OrLR2L9j3QGPV7mnzRX2gYsFhw3XtsntN +-rCEnME5ZRmqTF8rIOS0Bc2Vb6UGbERecyMhK76F2YC2uk/8M1TMTn08Tzt2G8fz4 +-NVQVqFvnhX76Nwn/i7gxSZ4Nbt600hItuO3Iw/G2QqBMl3nf/sOjn6H0bSyEd6Si +-BeEX/zHdmvO4esNSwhERt1Axin/M51qJzPeGmmGSTy+UtpjHeOBiS0N9PN7WmrQQ +-oUCcSyrcuNDUnv3xhHgbDlePaVRCaHvqoO91DweijHOZq1X1BwnSrzgDapADDC+P +-4uhDwjHpb62H5Y29TiyJS1HmnExUdsASgVOb7KD8LJzaGJVuHjgmQid4YAjff20y +-6NjAbx/rJnWfk/x7G/41kNxTowemP4NVCitOYoIlzmYwXSzg+RkbdbmdmFamgyd6 +-0Y+NWZP8P3PXLrQsldiL98l+x/ydrHIEH9LMF/TtNGCbnkqXBP7dcg5XVFEGcE3v +-qhykguAzx/Q= +------END CERTIFICATE----- +-# Subject: C=IL, O=StartCom Ltd., OU=Secure Digital Certificate Signing, CN=StartCom Certification Authority +-# Issuer: C=IL, O=StartCom Ltd., OU=Secure Digital Certificate Signing, CN=StartCom Certification Authority +------BEGIN CERTIFICATE----- +-MIIHhzCCBW+gAwIBAgIBLTANBgkqhkiG9w0BAQsFADB9MQswCQYDVQQGEwJJTDEW +-MBQGA1UEChMNU3RhcnRDb20gTHRkLjErMCkGA1UECxMiU2VjdXJlIERpZ2l0YWwg +-Q2VydGlmaWNhdGUgU2lnbmluZzEpMCcGA1UEAxMgU3RhcnRDb20gQ2VydGlmaWNh +-dGlvbiBBdXRob3JpdHkwHhcNMDYwOTE3MTk0NjM3WhcNMzYwOTE3MTk0NjM2WjB9 +-MQswCQYDVQQGEwJJTDEWMBQGA1UEChMNU3RhcnRDb20gTHRkLjErMCkGA1UECxMi +-U2VjdXJlIERpZ2l0YWwgQ2VydGlmaWNhdGUgU2lnbmluZzEpMCcGA1UEAxMgU3Rh +-cnRDb20gQ2VydGlmaWNhdGlvbiBBdXRob3JpdHkwggIiMA0GCSqGSIb3DQEBAQUA +-A4ICDwAwggIKAoICAQDBiNsJvGxGfHiflXu1M5DycmLWwTYgIiRezul38kMKogZk +-pMyONvg45iPwbm2xPN1yo4UcodM9tDMr0y+v/uqwQVlntsQGfQqedIXWeUyAN3rf +-OQVSWff0G0ZDpNKFhdLDcfN1YjS6LIp/Ho/u7TTQEceWzVI9ujPW3U3eCztKS5/C +-Ji/6tRYccjV3yjxd5srhJosaNnZcAdt0FCX+7bWgiA/deMotHweXMAEtcnn6RtYT +-Kqi5pquDSR3l8u/d5AGOGAqPY1MWhWKpDhk6zLVmpsJrdAfkK+F2PrRt2PZE4XNi +-HzvEvqBTViVsUQn3qqvKv3b9bZvzndu/PWa8DFaqr5hIlTpL36dYUNk4dalb6kMM +-Av+Z6+hsTXBbKWWc3apdzK8BMewM69KN6Oqce+Zu9ydmDBpI125C4z/eIT574Q1w +-+2OqqGwaVLRcJXrJosmLFqa7LH4XXgVNWG4SHQHuEhANxjJ/GP/89PrNbpHoNkm+ +-Gkhpi8KWTRoSsmkXwQqQ1vp5Iki/untp+HDH+no32NgN0nZPV/+Qt+OR0t3vwmC3 +-Zzrd/qqc8NSLf3Iizsafl7b4r4qgEKjZ+xjGtrVcUjyJthkqcwEKDwOzEmDyei+B +-26Nu/yYwl/WL3YlXtq09s68rxbd2AvCl1iuahhQqcvbjM4xdCUsT37uMdBNSSwID +-AQABo4ICEDCCAgwwDwYDVR0TAQH/BAUwAwEB/zAOBgNVHQ8BAf8EBAMCAQYwHQYD +-VR0OBBYEFE4L7xqkQFulF2mHMMo0aEPQQa7yMB8GA1UdIwQYMBaAFE4L7xqkQFul +-F2mHMMo0aEPQQa7yMIIBWgYDVR0gBIIBUTCCAU0wggFJBgsrBgEEAYG1NwEBATCC +-ATgwLgYIKwYBBQUHAgEWImh0dHA6Ly93d3cuc3RhcnRzc2wuY29tL3BvbGljeS5w +-ZGYwNAYIKwYBBQUHAgEWKGh0dHA6Ly93d3cuc3RhcnRzc2wuY29tL2ludGVybWVk +-aWF0ZS5wZGYwgc8GCCsGAQUFBwICMIHCMCcWIFN0YXJ0IENvbW1lcmNpYWwgKFN0 +-YXJ0Q29tKSBMdGQuMAMCAQEagZZMaW1pdGVkIExpYWJpbGl0eSwgcmVhZCB0aGUg +-c2VjdGlvbiAqTGVnYWwgTGltaXRhdGlvbnMqIG9mIHRoZSBTdGFydENvbSBDZXJ0 +-aWZpY2F0aW9uIEF1dGhvcml0eSBQb2xpY3kgYXZhaWxhYmxlIGF0IGh0dHA6Ly93 +-d3cuc3RhcnRzc2wuY29tL3BvbGljeS5wZGYwEQYJYIZIAYb4QgEBBAQDAgAHMDgG +-CWCGSAGG+EIBDQQrFilTdGFydENvbSBGcmVlIFNTTCBDZXJ0aWZpY2F0aW9uIEF1 +-dGhvcml0eTANBgkqhkiG9w0BAQsFAAOCAgEAjo/n3JR5fPGFf59Jb2vKXfuM/gTF +-wWLRfUKKvFO3lANmMD+x5wqnUCBVJX92ehQN6wQOQOY+2IirByeDqXWmN3PH/UvS +-Ta0XQMhGvjt/UfzDtgUx3M2FIk5xt/JxXrAaxrqTi3iSSoX4eA+D/i+tLPfkpLst +-0OcNOrg+zvZ49q5HJMqjNTbOx8aHmNrs++myziebiMMEofYLWWivydsQD032ZGNc +-pRJvkrKTlMeIFw6Ttn5ii5B/q06f/ON1FE8qMt9bDeD1e5MNq6HPh+GlBEXoPBKl +-CcWw0bdT82AUuoVpaiF8H3VhFyAXe2w7QSlc4axa0c2Mm+tgHRns9+Ww2vl5GKVF +-P0lDV9LdJNUso/2RjSe15esUBppMeyG7Oq0wBhjA2MFrLH9ZXF2RsXAiV+uKa0hK +-1Q8p7MZAwC+ITGgBF3f0JBlPvfrhsiAhS90a2Cl9qrjeVOwhVYBsHvUwyKMQ5bLm +-KhQxw4UtjJixhlpPiVktucf3HMiKf8CdBUrmQk9io20ppB+Fq9vlgcitKj1MXVuE +-JnHEhV5xJMqlG2zYYdMa4FTbzrqpMrUi9nNBCV24F10OD5mQ1kfabwo6YigUZ4LZ +-8dCAWZvLMdibD4x3TrVoivJs9iQOLWxwxXPR3hTQcY+203sC9uO41Alua551hDnm +-fyWl8kgAwKQB2j8= +------END CERTIFICATE----- +diff --git a/t/external/pop3-ssl.t b/t/external/pop3-ssl.t +deleted file mode 100644 +index 554a8db..0000000 +--- a/t/external/pop3-ssl.t ++++ /dev/null +@@ -1,58 +0,0 @@ +-#!perl +- +-use 5.008001; +- +-use strict; +-use warnings; +- +-use Net::POP3; +-use Test::More; +- +-my $host = 'pop.gmx.net'; +-my $debug = 0; +- +-plan skip_all => "no SSL support" if ! Net::POP3->can_ssl; +-{ +-no warnings 'once'; +-plan skip_all => "no verified SSL connection to $host:995 - $@" if ! eval { +- IO::Socket::SSL->new(PeerAddr => "$host:995", Timeout => 10) +- || die($IO::Socket::SSL::SSL_ERROR||$!); +-}; +-} +- +-plan tests => 2; +- +-SKIP: { +- diag( "connect inet to $host:110" ); +- skip "no inet connect to $host:110",1 +- if ! IO::Socket::INET->new(PeerAddr => "$host:110", Timeout => 10); +- my $pop3 = Net::POP3->new($host, Debug => $debug, Timeout => 10) +- or skip "normal POP3 failed: $@",1; +- skip "no STARTTLS support",1 if $pop3->message !~/STARTTLS/; +- +- if (!$pop3->starttls) { +- fail("starttls failed: ".$pop3->code." $@") +- } else { +- # we now should have access to SSL stuff +- my $cipher = eval { $pop3->get_cipher }; +- if (!$cipher) { +- fail("after starttls: not an SSL object"); +- } elsif ( $pop3->quit ) { +- pass("starttls + quit ok, cipher=$cipher"); +- } else { +- fail("quit after starttls failed: ".$pop3->code); +- } +- } +-} +- +- +-my $pop3 = Net::POP3->new($host, SSL => 1, Timeout => 10, Debug => $debug); +-# we now should have access to SSL stuff +-my $cipher = eval { $pop3->get_cipher }; +-if (!$cipher) { +- fail("after ssl connect: not an SSL object"); +-} elsif ( $pop3->quit ) { +- pass("ssl connect ok, cipher=$cipher"); +-} else { +- fail("quit after direct ssl failed: ".$pop3->code); +-} +diff --git a/t/external/smtp-ssl.t b/t/external/smtp-ssl.t +deleted file mode 100644 +index ccacbae..0000000 +--- a/t/external/smtp-ssl.t ++++ /dev/null +@@ -1,57 +0,0 @@ +-#!perl +- +-use 5.008001; +- +-use strict; +-use warnings; +- +-use Net::SMTP; +-use Test::More; +- +-my $host = 'mail.gmx.net'; +-my $debug = 0; +- +-plan skip_all => "no SSL support" if ! Net::SMTP->can_ssl; +-{ +-no warnings 'once'; +-plan skip_all => "no verified SSL connection to $host:465 - $@" if ! eval { +- IO::Socket::SSL->new("$host:465") +- || die($IO::Socket::SSL::SSL_ERROR||$!); +-}; +-} +- +-plan tests => 2; +- +-SKIP: { +- diag( "connect inet to $host:25" ); +- skip "no inet connect to $host:25",1 if ! IO::Socket::INET->new("$host:25"); +- my $smtp = Net::SMTP->new($host, Debug => $debug) +- or skip "normal SMTP failed: $@",1; +- skip "no STARTTLS support",1 if $smtp->message !~/STARTTLS/; +- +- if (!$smtp->starttls) { +- fail("starttls failed: ".$smtp->code." $@") +- } else { +- # we now should have access to SSL stuff +- my $cipher = eval { $smtp->get_cipher }; +- if (!$cipher) { +- fail("after starttls: not an SSL object"); +- } elsif ( $smtp->quit ) { +- pass("starttls + quit ok, cipher=$cipher"); +- } else { +- fail("quit after starttls failed: ".$smtp->code); +- } +- } +-} +- +- +-my $smtp = Net::SMTP->new($host, SSL => 1, Debug => $debug); +-# we now should have access to SSL stuff +-my $cipher = eval { $smtp->get_cipher }; +-if (!$cipher) { +- fail("after ssl connect: not an SSL object"); +-} elsif ( $smtp->quit ) { +- pass("ssl connect ok, cipher=$cipher"); +-} else { +- fail("quit after direct ssl failed: ".$smtp->code); +-} +diff --git a/t/pod.t b/t/pod.t +deleted file mode 100644 +index e31ecf3..0000000 +--- a/t/pod.t ++++ /dev/null +@@ -1,51 +0,0 @@ +-#!perl +-#=============================================================================== +-# +-# t/pod.t +-# +-# DESCRIPTION +-# Test script to check POD. +-# +-# COPYRIGHT +-# Copyright (C) 2014 Steve Hay. All rights reserved. +-# +-# LICENCE +-# This script is free software; you can redistribute it and/or modify it under +-# the same terms as Perl itself, i.e. under the terms of either the GNU +-# General Public License or the Artistic License, as specified in the LICENCE +-# file. +-# +-#=============================================================================== +- +-use 5.008001; +- +-use strict; +-use warnings; +- +-use Test::More; +- +-#=============================================================================== +-# MAIN PROGRAM +-#=============================================================================== +- +-MAIN: { +- plan skip_all => 'Author testing only' unless $ENV{AUTHOR_TESTING}; +- +- my $ok = eval { +- require Test::Pod; +- Test::Pod->import(); +- 1; +- }; +- +- if (not $ok) { +- plan skip_all => 'Test::Pod required to test POD'; +- } +- elsif ($Test::Pod::VERSION < 1.00) { +- plan skip_all => 'Test::Pod 1.00 or higher required to test POD'; +- } +- else { +- all_pod_files_ok(); +- } +-} +- +-#=============================================================================== +diff --git a/t/pod_coverage.t b/t/pod_coverage.t +deleted file mode 100644 +index d09c04e..0000000 +--- a/t/pod_coverage.t ++++ /dev/null +@@ -1,85 +0,0 @@ +-#!perl +-#=============================================================================== +-# +-# t/pod_coverage.t +-# +-# DESCRIPTION +-# Test script to check POD coverage. +-# +-# COPYRIGHT +-# Copyright (C) 2014, 2015, 2020 Steve Hay. All rights reserved. +-# +-# LICENCE +-# This script is free software; you can redistribute it and/or modify it under +-# the same terms as Perl itself, i.e. under the terms of either the GNU +-# General Public License or the Artistic License, as specified in the LICENCE +-# file. +-# +-#=============================================================================== +- +-use 5.008001; +- +-use strict; +-use warnings; +- +-use Test::More; +- +-#=============================================================================== +-# MAIN PROGRAM +-#=============================================================================== +- +-MAIN: { +- plan skip_all => 'Author testing only' unless $ENV{AUTHOR_TESTING}; +- +- my $ok = eval { +- require Test::Pod::Coverage; +- Test::Pod::Coverage->import(); +- 1; +- }; +- +- if (not $ok) { +- plan skip_all => 'Test::Pod::Coverage required to test POD coverage'; +- } +- elsif ($Test::Pod::Coverage::VERSION < 0.08) { +- plan skip_all => 'Test::Pod::Coverage 0.08 or higher required to test POD coverage'; +- } +- elsif (!eval { require Socket }) { +- plan skip_all => 'no Socket'; +- } +- elsif (ord('A') == 193 && !eval { require Convert::EBCDIC }) { +- plan skip_all => 'EBCDIC but no Convert::EBCDIC'; +- } +- else { +- plan tests => 12; +- my $params = { coverage_class => qw(Pod::Coverage::CountParents) }; +- pod_coverage_ok('Net::Cmd', { +- %$params, +- also_private => [qw(toascii toebcdic set_status)] +- }); +- pod_coverage_ok('Net::Config', { +- %$params, +- also_private => [qw(is_external)] +- }); +- pod_coverage_ok('Net::Domain', $params); +- pod_coverage_ok('Net::FTP', { +- %$params, +- also_private => [qw(authorise lsl ebcdic byte cmd)] +- }); +- pod_coverage_ok('Net::Netrc', $params); +- pod_coverage_ok('Net::NNTP', $params); +- pod_coverage_ok('Net::POP3', $params); +- pod_coverage_ok('Net::SMTP', { +- %$params, +- also_private => [qw(datafh supports)] +- }); +- pod_coverage_ok('Net::Time', $params); +- pod_coverage_ok('Net::FTP::A', $params); +- pod_coverage_ok('Net::FTP::dataconn', { +- %$params, +- also_private => [qw(can_read can_write cmd reading)] +- }); +- pod_coverage_ok('Net::FTP::I', $params); +- } +-} +- +-#=============================================================================== +-- +2.34.3 + diff --git a/perl-libnet.spec b/perl-libnet.spec index 70819ef..211dbb8 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,3 +1,5 @@ +%global base_version 3.13 + # Run optional test %if ! (0%{?rhel}) %bcond_without perl_libnet_enables_optional_test @@ -10,16 +12,18 @@ %bcond_without perl_libnet_enables_ssl Name: perl-libnet -Version: 3.13 -Release: 480%{?dist} +Version: 3.14 +Release: 1%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet -Source0: https://cpan.metacpan.org/authors/id/S/SH/SHAY/libnet-%{version}.tar.gz +Source0: https://cpan.metacpan.org/authors/id/S/SH/SHAY/libnet-%{base_version}.tar.gz # Convert Changes to UTF-8 Patch0: libnet-3.09-Normalize-Changes-encoding.patch # Do not create Net/libnet.cfg, bug #1238689 Patch1: libnet-3.08-Do-not-create-Net-libnet.cfg.patch +# Unbundled from perl 5.35.11 +Patch2: libnet-3.13-Upgrade-to-3.14.patch BuildArch: noarch BuildRequires: coreutils BuildRequires: make @@ -69,10 +73,6 @@ BuildRequires: perl(Test::More) # Core modules must be built without non-core dependencies BuildRequires: perl(IO::Socket::SSL::Utils) %endif -# Test::CPAN::Changes not used -# Test::Perl::Critic not used -# Test::Pod 1.00 not used -# Test::Pod::Coverage 0.08 not used %endif Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version)) Requires: perl(File::Basename) @@ -103,9 +103,10 @@ consistent programming interface (API) to the client side of various protocols used in the internet community. %prep -%setup -q -n libnet-%{version} +%setup -q -n libnet-%{base_version} %patch0 -p1 %patch1 -p1 +%patch2 -p1 %build perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1 NO_PERLLOCAL=1 - 3.14-1 +- Upgrade to 3.14 as provided in perl-5.35.11 + * Fri Jan 21 2022 Fedora Release Engineering - 3.13-480 - Rebuilt for https://fedoraproject.org/wiki/Fedora_36_Mass_Rebuild @@ -224,7 +228,7 @@ make test - Rebuilt for https://fedoraproject.org/wiki/Fedora_24_Mass_Rebuild * Wed Jan 06 2016 Petr Pisar - 3.08-1 -- 8.08 bump +- 3.08 bump * Mon Jul 20 2015 Petr Pisar - 3.07-1 - 3.07 bump From 79a96dfd81874f42bebfe51fcbba1184ac1ea9c1 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Mon, 30 May 2022 15:41:56 +0200 Subject: [PATCH 31/50] Increase release to favour standalone package --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 211dbb8..1dde4a4 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.14 -Release: 1%{?dist} +Release: 488%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet @@ -126,6 +126,9 @@ make test %{_mandir}/man3/* %changelog +* Mon May 30 2022 Jitka Plesnikova - 3.14-488 +- Increase release to favour standalone package + * Thu May 12 2022 Jitka Plesnikova - 3.14-1 - Upgrade to 3.14 as provided in perl-5.35.11 From 4818060cf2fc615a80a2846150932432015d515f Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Fri, 3 Jun 2022 12:01:43 +0200 Subject: [PATCH 32/50] Perl 5.36 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 1dde4a4..6b4e2b2 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.14 -Release: 488%{?dist} +Release: 489%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet @@ -126,6 +126,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jun 03 2022 Jitka Plesnikova - 3.14-489 +- Perl 5.36 re-rebuild of bootstrapped packages + * Mon May 30 2022 Jitka Plesnikova - 3.14-488 - Increase release to favour standalone package From a997b7ce131862252eae02b3cccdda677b826ee1 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 22 Jul 2022 12:54:25 +0000 Subject: [PATCH 33/50] Rebuilt for https://fedoraproject.org/wiki/Fedora_37_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 6b4e2b2..f90a8c8 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.14 -Release: 489%{?dist} +Release: 490%{?dist} Summary: Perl clients for various network protocols License: GPL+ or Artistic URL: https://metacpan.org/release/libnet @@ -126,6 +126,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jul 22 2022 Fedora Release Engineering - 3.14-490 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_37_Mass_Rebuild + * Fri Jun 03 2022 Jitka Plesnikova - 3.14-489 - Perl 5.36 re-rebuild of bootstrapped packages From 3f0e538cf2f99d56d170c67f796d76d3806a6a0a Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Tue, 20 Dec 2022 17:09:41 +0100 Subject: [PATCH 34/50] Update license to SPDX format --- perl-libnet.spec | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index f90a8c8..7960479 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -15,7 +15,7 @@ Name: perl-libnet Version: 3.14 Release: 490%{?dist} Summary: Perl clients for various network protocols -License: GPL+ or Artistic +License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet Source0: https://cpan.metacpan.org/authors/id/S/SH/SHAY/libnet-%{base_version}.tar.gz # Convert Changes to UTF-8 From b804f81aee12589e34ac7e7af613442658866696 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Fri, 13 Jan 2023 14:55:21 +0100 Subject: [PATCH 35/50] Remove perl(MODULE_COMPAT), it will be replaced by generators --- perl-libnet.spec | 1 - 1 file changed, 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 7960479..340c8e4 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -74,7 +74,6 @@ BuildRequires: perl(Test::More) BuildRequires: perl(IO::Socket::SSL::Utils) %endif %endif -Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version)) Requires: perl(File::Basename) Requires: perl(IO::Socket) >= 1.05 # Prefer IO::Socket::IP over IO::Socket::INET6 and IO::Socket::INET From 7c4321d4ed3118c2569fc39806700261264df590 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 20 Jan 2023 08:02:03 +0000 Subject: [PATCH 36/50] Rebuilt for https://fedoraproject.org/wiki/Fedora_38_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 340c8e4..8f1a504 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.14 -Release: 490%{?dist} +Release: 491%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -125,6 +125,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jan 20 2023 Fedora Release Engineering - 3.14-491 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_38_Mass_Rebuild + * Fri Jul 22 2022 Fedora Release Engineering - 3.14-490 - Rebuilt for https://fedoraproject.org/wiki/Fedora_37_Mass_Rebuild From 3e627390924bcb0892b17587325aa4fc3ea26b6f Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Tue, 21 Mar 2023 14:44:42 +0100 Subject: [PATCH 37/50] 3.15 bump --- .gitignore | 1 + libnet-3.09-Normalize-Changes-encoding.patch | 2 +- libnet-3.13-Upgrade-to-3.14.patch | 911 ------------------- perl-libnet.spec | 12 +- sources | 2 +- 5 files changed, 9 insertions(+), 919 deletions(-) delete mode 100644 libnet-3.13-Upgrade-to-3.14.patch diff --git a/.gitignore b/.gitignore index 590576e..aa47dcd 100644 --- a/.gitignore +++ b/.gitignore @@ -8,3 +8,4 @@ /libnet-3.11_repackaged.tar.gz /libnet-3.12.tar.gz /libnet-3.13.tar.gz +/libnet-3.15.tar.gz diff --git a/libnet-3.09-Normalize-Changes-encoding.patch b/libnet-3.09-Normalize-Changes-encoding.patch index a7b2441..8e45ae6 100644 --- a/libnet-3.09-Normalize-Changes-encoding.patch +++ b/libnet-3.09-Normalize-Changes-encoding.patch @@ -15,7 +15,7 @@ diff --git a/Changes b/Changes index 831e061..27fda24 100644 --- a/Changes +++ b/Changes -@@ -236,7 +236,7 @@ Revision history for Perl distribution libnet +@@ -299,7 +299,7 @@ Revision history for Perl distribution libnet 1.24 2014-01-06 diff --git a/libnet-3.13-Upgrade-to-3.14.patch b/libnet-3.13-Upgrade-to-3.14.patch deleted file mode 100644 index 1e9bde1..0000000 --- a/libnet-3.13-Upgrade-to-3.14.patch +++ /dev/null @@ -1,911 +0,0 @@ -From b8cbf3b3789baeba499d2aa32f9dc56d50ab141b Mon Sep 17 00:00:00 2001 -From: Jitka Plesnikova -Date: Thu, 12 May 2022 09:41:15 +0200 -Subject: [PATCH] Upgrade to 3.14 - ---- - Makefile.PL | 2 +- - lib/Net/Cmd.pm | 8 +- - lib/Net/Config.pm | 4 +- - lib/Net/Domain.pm | 4 +- - lib/Net/FTP.pm | 6 +- - lib/Net/FTP/A.pm | 2 +- - lib/Net/FTP/E.pm | 2 +- - lib/Net/FTP/I.pm | 2 +- - lib/Net/FTP/L.pm | 2 +- - lib/Net/FTP/dataconn.pm | 4 +- - lib/Net/NNTP.pm | 4 +- - lib/Net/Netrc.pm | 4 +- - lib/Net/POP3.pm | 4 +- - lib/Net/SMTP.pm | 4 +- - lib/Net/Time.pm | 4 +- - t/changes.t | 48 ----------- - t/critic.t | 48 ----------- - t/external/ftp-ssl.t | 173 ---------------------------------------- - t/external/pop3-ssl.t | 58 -------------- - t/external/smtp-ssl.t | 57 ------------- - t/pod.t | 51 ------------ - t/pod_coverage.t | 85 -------------------- - 22 files changed, 28 insertions(+), 548 deletions(-) - delete mode 100644 t/changes.t - delete mode 100644 t/critic.t - delete mode 100644 t/external/ftp-ssl.t - delete mode 100644 t/external/pop3-ssl.t - delete mode 100644 t/external/smtp-ssl.t - delete mode 100644 t/pod.t - delete mode 100644 t/pod_coverage.t - -diff --git a/Makefile.PL b/Makefile.PL -index bca19b1..df52526 100644 ---- a/Makefile.PL -+++ b/Makefile.PL -@@ -235,7 +235,7 @@ MAIN: { - sub MY::post_initialize { - my $self = shift; - -- return ''; -+ return '' if $self->{PERL_CORE}; - - if (not -f $CfgFile) { - my @args = qw(Configure); -diff --git a/lib/Net/Cmd.pm b/lib/Net/Cmd.pm -index 41df8a2..b8dc728 100644 ---- a/lib/Net/Cmd.pm -+++ b/lib/Net/Cmd.pm -@@ -19,14 +19,14 @@ use Symbol 'gensym'; - use Errno 'EINTR'; - - BEGIN { -- if ($^O eq 'os390') { -+ if (ord "A" == 193) { - require Convert::EBCDIC; - - # Convert::EBCDIC->import; - } - } - --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - our @ISA = qw(Exporter); - our @EXPORT = qw(CMD_INFO CMD_OK CMD_MORE CMD_REJECT CMD_ERROR CMD_PENDING); - -@@ -41,7 +41,7 @@ use constant DEF_REPLY_CODE => 421; - - my %debug = (); - --my $tr = $^O eq 'os390' ? Convert::EBCDIC->new() : undef; -+my $tr = ord "A" == 193 ? Convert::EBCDIC->new() : undef; - - sub toebcdic { - my $cmd = shift; -@@ -897,7 +897,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/Config.pm b/lib/Net/Config.pm -index 2f8417f..b9eb827 100644 ---- a/lib/Net/Config.pm -+++ b/lib/Net/Config.pm -@@ -18,7 +18,7 @@ use Socket qw(inet_aton inet_ntoa); - - our @EXPORT = qw(%NetConfig); - our @ISA = qw(Net::LocalCfg Exporter); --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - our($CONFIGURE, $LIBNET_CFG); - -@@ -368,7 +368,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/Domain.pm b/lib/Net/Domain.pm -index d69ac5b..7c017f2 100644 ---- a/lib/Net/Domain.pm -+++ b/lib/Net/Domain.pm -@@ -19,7 +19,7 @@ use Net::Config; - - our @ISA = qw(Exporter); - our @EXPORT_OK = qw(hostname hostdomain hostfqdn domainname); --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - my ($host, $domain, $fqdn) = (undef, undef, undef); - -@@ -395,7 +395,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/FTP.pm b/lib/Net/FTP.pm -index 37836bf..b6b220d 100644 ---- a/lib/Net/FTP.pm -+++ b/lib/Net/FTP.pm -@@ -23,7 +23,7 @@ use Net::Config; - use Socket; - use Time::Local; - --our $VERSION = '3.13'; -+our $VERSION = '3.14'; - - our $IOCLASS; - my $family_key; -@@ -66,7 +66,7 @@ use constant TELNET_IAC => 255; - use constant TELNET_IP => 244; - use constant TELNET_DM => 242; - --use constant EBCDIC => $^O eq 'os390'; -+use constant EBCDIC => ord 'A' == 193; - - sub new { - my $pkg = shift; -@@ -2044,7 +2044,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/FTP/A.pm b/lib/Net/FTP/A.pm -index 5344638..1ea4831 100644 ---- a/lib/Net/FTP/A.pm -+++ b/lib/Net/FTP/A.pm -@@ -13,7 +13,7 @@ use Carp; - use Net::FTP::dataconn; - - our @ISA = qw(Net::FTP::dataconn); --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - our $buf; - -diff --git a/lib/Net/FTP/E.pm b/lib/Net/FTP/E.pm -index 9b13707..7b8c2ea 100644 ---- a/lib/Net/FTP/E.pm -+++ b/lib/Net/FTP/E.pm -@@ -8,6 +8,6 @@ use warnings; - use Net::FTP::I; - - our @ISA = qw(Net::FTP::I); --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - 1; -diff --git a/lib/Net/FTP/I.pm b/lib/Net/FTP/I.pm -index 726cba1..afcc51f 100644 ---- a/lib/Net/FTP/I.pm -+++ b/lib/Net/FTP/I.pm -@@ -13,7 +13,7 @@ use Carp; - use Net::FTP::dataconn; - - our @ISA = qw(Net::FTP::dataconn); --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - our $buf; - -diff --git a/lib/Net/FTP/L.pm b/lib/Net/FTP/L.pm -index ac5e27e..9dfe491 100644 ---- a/lib/Net/FTP/L.pm -+++ b/lib/Net/FTP/L.pm -@@ -8,6 +8,6 @@ use warnings; - use Net::FTP::I; - - our @ISA = qw(Net::FTP::I); --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - 1; -diff --git a/lib/Net/FTP/dataconn.pm b/lib/Net/FTP/dataconn.pm -index 5a257e6..979be7c 100644 ---- a/lib/Net/FTP/dataconn.pm -+++ b/lib/Net/FTP/dataconn.pm -@@ -13,7 +13,7 @@ use Carp; - use Errno; - use Net::Cmd; - --our $VERSION = '3.13'; -+our $VERSION = '3.14'; - - $Net::FTP::IOCLASS or die "please load Net::FTP before Net::FTP::dataconn"; - our @ISA = $Net::FTP::IOCLASS; -@@ -224,7 +224,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/NNTP.pm b/lib/Net/NNTP.pm -index 3187f51..bbdc884 100644 ---- a/lib/Net/NNTP.pm -+++ b/lib/Net/NNTP.pm -@@ -19,7 +19,7 @@ use Net::Cmd; - use Net::Config; - use Time::Local; - --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - # Code for detecting if we can use SSL - my $ssl_class = eval { -@@ -1308,7 +1308,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/Netrc.pm b/lib/Net/Netrc.pm -index 50688ee..3dec11e 100644 ---- a/lib/Net/Netrc.pm -+++ b/lib/Net/Netrc.pm -@@ -16,7 +16,7 @@ use warnings; - use Carp; - use FileHandle; - --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - our $TESTING; - -@@ -353,7 +353,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/POP3.pm b/lib/Net/POP3.pm -index 55f7be1..a4ed8eb 100644 ---- a/lib/Net/POP3.pm -+++ b/lib/Net/POP3.pm -@@ -18,7 +18,7 @@ use IO::Socket; - use Net::Cmd; - use Net::Config; - --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - # Code for detecting if we can use SSL - my $ssl_class = eval { -@@ -869,7 +869,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/SMTP.pm b/lib/Net/SMTP.pm -index 354ed8e..c04a362 100644 ---- a/lib/Net/SMTP.pm -+++ b/lib/Net/SMTP.pm -@@ -19,7 +19,7 @@ use Net::Cmd; - use Net::Config; - use Socket; - --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - # Code for detecting if we can use SSL - my $ssl_class = eval { -@@ -1052,7 +1052,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/lib/Net/Time.pm b/lib/Net/Time.pm -index 7f0a724..7906c1a 100644 ---- a/lib/Net/Time.pm -+++ b/lib/Net/Time.pm -@@ -22,7 +22,7 @@ use Net::Config; - our @ISA = qw(Exporter); - our @EXPORT_OK = qw(inet_time inet_daytime); - --our $VERSION = "3.13"; -+our $VERSION = "3.14"; - - our $TIMEOUT = 120; - -@@ -190,7 +190,7 @@ License or the Artistic License, as specified in the F file. - - =head1 VERSION - --Version 3.13 -+Version 3.14 - - =head1 DATE - -diff --git a/t/changes.t b/t/changes.t -deleted file mode 100644 -index 8235c1b..0000000 ---- a/t/changes.t -+++ /dev/null -@@ -1,48 +0,0 @@ --#!perl --#=============================================================================== --# --# t/changes.t --# --# DESCRIPTION --# Test script to check CPAN::Changes conformance. --# --# COPYRIGHT --# Copyright (C) 2014 Steve Hay. All rights reserved. --# --# LICENCE --# This script is free software; you can redistribute it and/or modify it under --# the same terms as Perl itself, i.e. under the terms of either the GNU --# General Public License or the Artistic License, as specified in the LICENCE --# file. --# --#=============================================================================== -- --use 5.008001; -- --use strict; --use warnings; -- --use Test::More; -- --#=============================================================================== --# MAIN PROGRAM --#=============================================================================== -- --MAIN: { -- plan skip_all => 'Author testing only' unless $ENV{AUTHOR_TESTING}; -- -- my $ok = eval { -- require Test::CPAN::Changes; -- Test::CPAN::Changes->import(); -- 1; -- }; -- -- if (not $ok) { -- plan skip_all => 'Test::CPAN::Changes required to test Changes'; -- } -- else { -- changes_ok(); -- } --} -- --#=============================================================================== -diff --git a/t/critic.t b/t/critic.t -deleted file mode 100644 -index 339dadb..0000000 ---- a/t/critic.t -+++ /dev/null -@@ -1,48 +0,0 @@ --#!perl --#=============================================================================== --# --# t/critic.t --# --# DESCRIPTION --# Test script to check Perl::Critic conformance. --# --# COPYRIGHT --# Copyright (C) 2014 Steve Hay. All rights reserved. --# --# LICENCE --# This script is free software; you can redistribute it and/or modify it under --# the same terms as Perl itself, i.e. under the terms of either the GNU --# General Public License or the Artistic License, as specified in the LICENCE --# file. --# --#=============================================================================== -- --use 5.008001; -- --use strict; --use warnings; -- --use Test::More; -- --#=============================================================================== --# MAIN PROGRAM --#=============================================================================== -- --MAIN: { -- plan skip_all => 'Author testing only' unless $ENV{AUTHOR_TESTING}; -- -- my $ok = eval { -- require Test::Perl::Critic; -- Test::Perl::Critic->import(-profile => ''); -- 1; -- }; -- -- if (not $ok) { -- plan skip_all => 'Test::Perl::Critic required to test with Perl::Critic'; -- } -- else { -- all_critic_ok('.'); -- } --} -- --#=============================================================================== -diff --git a/t/external/ftp-ssl.t b/t/external/ftp-ssl.t -deleted file mode 100644 -index 28c038a..0000000 ---- a/t/external/ftp-ssl.t -+++ /dev/null -@@ -1,173 +0,0 @@ --#!perl -- --use 5.008001; -- --use strict; --use warnings; -- --use Net::FTP; --use Test::More; --use File::Temp; --use IO::Socket::INET; -- --my $server = 'test.rebex.net'; --my $debug = 0; -- --plan skip_all => "no SSL support" if ! Net::FTP->can_ssl; --require IO::Socket::SSL; -- -- --# first try to connect w/o ftp --# plain --diag( "connect inet to $server:21" ); --IO::Socket::INET->new( "$server:21" ) or do { -- plan skip_all => "$server:21 not reachable"; --}; -- --# ssl to the right host --diag( "connect inet to $server:990" ); --my $sock = IO::Socket::INET->new( "$server:990") or do { -- plan skip_all => "$server:990 not reachable"; --}; -- --# now we need CAs --my $cafh = File::Temp->new( UNLINK => 0, SUFFIX => '.crt' ); --my %sslargs = ( SSL_ca_file => $cafh->filename ); --print $cafh ; --close($cafh); -- --diag( "upgrade to ssl $server:990" ); --IO::Socket::SSL->start_SSL($sock, -- SSL_verify_mode => 1, -- SSL_verifycn_name => $server, -- SSL_verifycn_scheme => 'ftp', -- %sslargs, --) or do { -- plan skip_all => "$server:990 not upgradable to SSL: ". -- $IO::Socket::SSL::SSL_ERROR; --}; -- --plan tests => 9; -- --# first direct SSL --diag( "connect ftp over ssl to $server" ); --my $ftp = Net::FTP->new($server, -- SSL => 1, -- %sslargs, -- Debug => $debug, -- Passive => 1, --); --ok($ftp,"ftp ssl connect $server"); --$ftp->login("anonymous",'net-sslglue-ftp@test.perl') -- or die "login to $server failed"; --diag("logged in"); --# check that we can talk on connection --ok(~~$ftp->ls,"directory listing protected"); --$ftp->prot('C'); --ok(~~$ftp->ls,"directory listing clear"); -- --# then TLS upgrade inside plain connection --$ftp = Net::FTP->new($server, -- Passive => 1, -- Debug => $debug, -- %sslargs --); --ok($ftp,"ftp plain connect $server"); --my $ok = $ftp->starttls; --ok($ok,"ssl upgrade"); --$ftp->login("anonymous",'net-sslglue-ftp@test.perl') -- or die "login to $server failed"; --diag("logged in"); --# check that we can talk on connection --ok(~~$ftp->ls,"directory listing protected"); --$ftp->prot('C'); --ok(~~$ftp->ls,"directory listing clear"); --$ok = $ftp->stoptls; --ok($ok,"ssl downgrade"); --ok(~~$ftp->ls,"directory listing after downgrade"); -- -- --__DATA__ --# Subject: C=IL, O=StartCom Ltd., OU=Secure Digital Certificate Signing, CN=StartCom Class 2 Primary Intermediate Server CA --# Issuer: C=IL, O=StartCom Ltd., OU=Secure Digital Certificate Signing, CN=StartCom Certification Authority -------BEGIN CERTIFICATE----- --MIIGNDCCBBygAwIBAgIBGjANBgkqhkiG9w0BAQUFADB9MQswCQYDVQQGEwJJTDEW --MBQGA1UEChMNU3RhcnRDb20gTHRkLjErMCkGA1UECxMiU2VjdXJlIERpZ2l0YWwg --Q2VydGlmaWNhdGUgU2lnbmluZzEpMCcGA1UEAxMgU3RhcnRDb20gQ2VydGlmaWNh --dGlvbiBBdXRob3JpdHkwHhcNMDcxMDI0MjA1NzA5WhcNMTcxMDI0MjA1NzA5WjCB --jDELMAkGA1UEBhMCSUwxFjAUBgNVBAoTDVN0YXJ0Q29tIEx0ZC4xKzApBgNVBAsT --IlNlY3VyZSBEaWdpdGFsIENlcnRpZmljYXRlIFNpZ25pbmcxODA2BgNVBAMTL1N0 --YXJ0Q29tIENsYXNzIDIgUHJpbWFyeSBJbnRlcm1lZGlhdGUgU2VydmVyIENBMIIB --IjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEA4k85L6GMmoWtCA4IPlfyiAEh --G5SpbOK426oZGEY6UqH1D/RujOqWjJaHeRNAUS8i8gyLhw9l33F0NENVsTUJm9m8 --H/rrQtCXQHK3Q5Y9upadXVACHJuRjZzArNe7LxfXyz6CnXPrB0KSss1ks3RVG7RL --hiEs93iHMuAW5Nq9TJXqpAp+tgoNLorPVavD5d1Bik7mb2VsskDPF125w2oLJxGE --d2H2wnztwI14FBiZgZl1Y7foU9O6YekO+qIw80aiuckfbIBaQKwn7UhHM7BUxkYa --8zVhwQIpkFR+ZE3EMFICgtffziFuGJHXuKuMJxe18KMBL47SLoc6PbQpZ4rEAwID --AQABo4IBrTCCAakwDwYDVR0TAQH/BAUwAwEB/zAOBgNVHQ8BAf8EBAMCAQYwHQYD --VR0OBBYEFBHbI0X9VMxqcW+EigPXvvcBLyaGMB8GA1UdIwQYMBaAFE4L7xqkQFul --F2mHMMo0aEPQQa7yMGYGCCsGAQUFBwEBBFowWDAnBggrBgEFBQcwAYYbaHR0cDov --L29jc3Auc3RhcnRzc2wuY29tL2NhMC0GCCsGAQUFBzAChiFodHRwOi8vd3d3LnN0 --YXJ0c3NsLmNvbS9zZnNjYS5jcnQwWwYDVR0fBFQwUjAnoCWgI4YhaHR0cDovL3d3 --dy5zdGFydHNzbC5jb20vc2ZzY2EuY3JsMCegJaAjhiFodHRwOi8vY3JsLnN0YXJ0 --c3NsLmNvbS9zZnNjYS5jcmwwgYAGA1UdIAR5MHcwdQYLKwYBBAGBtTcBAgEwZjAu --BggrBgEFBQcCARYiaHR0cDovL3d3dy5zdGFydHNzbC5jb20vcG9saWN5LnBkZjA0 --BggrBgEFBQcCARYoaHR0cDovL3d3dy5zdGFydHNzbC5jb20vaW50ZXJtZWRpYXRl --LnBkZjANBgkqhkiG9w0BAQUFAAOCAgEAnQfh7pB2MWcWRXCMy4SLS1doRKWJwfJ+ --yyiL9edwd9W29AshYKWhdHMkIoDW2LqNomJdCTVCKfs5Y0ULpLA4Gmj0lRPM4EOU --7Os5GuxXKdmZbfWEzY5zrsncavqenRZkkwjHHMKJVJ53gJD2uSl26xNnSFn4Ljox --uMnTiOVfTtIZPUOO15L/zzi24VuKUx3OrLR2L9j3QGPV7mnzRX2gYsFhw3XtsntN --rCEnME5ZRmqTF8rIOS0Bc2Vb6UGbERecyMhK76F2YC2uk/8M1TMTn08Tzt2G8fz4 --NVQVqFvnhX76Nwn/i7gxSZ4Nbt600hItuO3Iw/G2QqBMl3nf/sOjn6H0bSyEd6Si --BeEX/zHdmvO4esNSwhERt1Axin/M51qJzPeGmmGSTy+UtpjHeOBiS0N9PN7WmrQQ --oUCcSyrcuNDUnv3xhHgbDlePaVRCaHvqoO91DweijHOZq1X1BwnSrzgDapADDC+P --4uhDwjHpb62H5Y29TiyJS1HmnExUdsASgVOb7KD8LJzaGJVuHjgmQid4YAjff20y --6NjAbx/rJnWfk/x7G/41kNxTowemP4NVCitOYoIlzmYwXSzg+RkbdbmdmFamgyd6 --0Y+NWZP8P3PXLrQsldiL98l+x/ydrHIEH9LMF/TtNGCbnkqXBP7dcg5XVFEGcE3v --qhykguAzx/Q= -------END CERTIFICATE----- --# Subject: C=IL, O=StartCom Ltd., OU=Secure Digital Certificate Signing, CN=StartCom Certification Authority --# Issuer: C=IL, O=StartCom Ltd., OU=Secure Digital Certificate Signing, CN=StartCom Certification Authority -------BEGIN CERTIFICATE----- --MIIHhzCCBW+gAwIBAgIBLTANBgkqhkiG9w0BAQsFADB9MQswCQYDVQQGEwJJTDEW --MBQGA1UEChMNU3RhcnRDb20gTHRkLjErMCkGA1UECxMiU2VjdXJlIERpZ2l0YWwg --Q2VydGlmaWNhdGUgU2lnbmluZzEpMCcGA1UEAxMgU3RhcnRDb20gQ2VydGlmaWNh --dGlvbiBBdXRob3JpdHkwHhcNMDYwOTE3MTk0NjM3WhcNMzYwOTE3MTk0NjM2WjB9 --MQswCQYDVQQGEwJJTDEWMBQGA1UEChMNU3RhcnRDb20gTHRkLjErMCkGA1UECxMi --U2VjdXJlIERpZ2l0YWwgQ2VydGlmaWNhdGUgU2lnbmluZzEpMCcGA1UEAxMgU3Rh --cnRDb20gQ2VydGlmaWNhdGlvbiBBdXRob3JpdHkwggIiMA0GCSqGSIb3DQEBAQUA --A4ICDwAwggIKAoICAQDBiNsJvGxGfHiflXu1M5DycmLWwTYgIiRezul38kMKogZk --pMyONvg45iPwbm2xPN1yo4UcodM9tDMr0y+v/uqwQVlntsQGfQqedIXWeUyAN3rf --OQVSWff0G0ZDpNKFhdLDcfN1YjS6LIp/Ho/u7TTQEceWzVI9ujPW3U3eCztKS5/C --Ji/6tRYccjV3yjxd5srhJosaNnZcAdt0FCX+7bWgiA/deMotHweXMAEtcnn6RtYT --Kqi5pquDSR3l8u/d5AGOGAqPY1MWhWKpDhk6zLVmpsJrdAfkK+F2PrRt2PZE4XNi --HzvEvqBTViVsUQn3qqvKv3b9bZvzndu/PWa8DFaqr5hIlTpL36dYUNk4dalb6kMM --Av+Z6+hsTXBbKWWc3apdzK8BMewM69KN6Oqce+Zu9ydmDBpI125C4z/eIT574Q1w --+2OqqGwaVLRcJXrJosmLFqa7LH4XXgVNWG4SHQHuEhANxjJ/GP/89PrNbpHoNkm+ --Gkhpi8KWTRoSsmkXwQqQ1vp5Iki/untp+HDH+no32NgN0nZPV/+Qt+OR0t3vwmC3 --Zzrd/qqc8NSLf3Iizsafl7b4r4qgEKjZ+xjGtrVcUjyJthkqcwEKDwOzEmDyei+B --26Nu/yYwl/WL3YlXtq09s68rxbd2AvCl1iuahhQqcvbjM4xdCUsT37uMdBNSSwID --AQABo4ICEDCCAgwwDwYDVR0TAQH/BAUwAwEB/zAOBgNVHQ8BAf8EBAMCAQYwHQYD --VR0OBBYEFE4L7xqkQFulF2mHMMo0aEPQQa7yMB8GA1UdIwQYMBaAFE4L7xqkQFul --F2mHMMo0aEPQQa7yMIIBWgYDVR0gBIIBUTCCAU0wggFJBgsrBgEEAYG1NwEBATCC --ATgwLgYIKwYBBQUHAgEWImh0dHA6Ly93d3cuc3RhcnRzc2wuY29tL3BvbGljeS5w --ZGYwNAYIKwYBBQUHAgEWKGh0dHA6Ly93d3cuc3RhcnRzc2wuY29tL2ludGVybWVk --aWF0ZS5wZGYwgc8GCCsGAQUFBwICMIHCMCcWIFN0YXJ0IENvbW1lcmNpYWwgKFN0 --YXJ0Q29tKSBMdGQuMAMCAQEagZZMaW1pdGVkIExpYWJpbGl0eSwgcmVhZCB0aGUg --c2VjdGlvbiAqTGVnYWwgTGltaXRhdGlvbnMqIG9mIHRoZSBTdGFydENvbSBDZXJ0 --aWZpY2F0aW9uIEF1dGhvcml0eSBQb2xpY3kgYXZhaWxhYmxlIGF0IGh0dHA6Ly93 --d3cuc3RhcnRzc2wuY29tL3BvbGljeS5wZGYwEQYJYIZIAYb4QgEBBAQDAgAHMDgG --CWCGSAGG+EIBDQQrFilTdGFydENvbSBGcmVlIFNTTCBDZXJ0aWZpY2F0aW9uIEF1 --dGhvcml0eTANBgkqhkiG9w0BAQsFAAOCAgEAjo/n3JR5fPGFf59Jb2vKXfuM/gTF --wWLRfUKKvFO3lANmMD+x5wqnUCBVJX92ehQN6wQOQOY+2IirByeDqXWmN3PH/UvS --Ta0XQMhGvjt/UfzDtgUx3M2FIk5xt/JxXrAaxrqTi3iSSoX4eA+D/i+tLPfkpLst --0OcNOrg+zvZ49q5HJMqjNTbOx8aHmNrs++myziebiMMEofYLWWivydsQD032ZGNc --pRJvkrKTlMeIFw6Ttn5ii5B/q06f/ON1FE8qMt9bDeD1e5MNq6HPh+GlBEXoPBKl --CcWw0bdT82AUuoVpaiF8H3VhFyAXe2w7QSlc4axa0c2Mm+tgHRns9+Ww2vl5GKVF --P0lDV9LdJNUso/2RjSe15esUBppMeyG7Oq0wBhjA2MFrLH9ZXF2RsXAiV+uKa0hK --1Q8p7MZAwC+ITGgBF3f0JBlPvfrhsiAhS90a2Cl9qrjeVOwhVYBsHvUwyKMQ5bLm --KhQxw4UtjJixhlpPiVktucf3HMiKf8CdBUrmQk9io20ppB+Fq9vlgcitKj1MXVuE --JnHEhV5xJMqlG2zYYdMa4FTbzrqpMrUi9nNBCV24F10OD5mQ1kfabwo6YigUZ4LZ --8dCAWZvLMdibD4x3TrVoivJs9iQOLWxwxXPR3hTQcY+203sC9uO41Alua551hDnm --fyWl8kgAwKQB2j8= -------END CERTIFICATE----- -diff --git a/t/external/pop3-ssl.t b/t/external/pop3-ssl.t -deleted file mode 100644 -index 554a8db..0000000 ---- a/t/external/pop3-ssl.t -+++ /dev/null -@@ -1,58 +0,0 @@ --#!perl -- --use 5.008001; -- --use strict; --use warnings; -- --use Net::POP3; --use Test::More; -- --my $host = 'pop.gmx.net'; --my $debug = 0; -- --plan skip_all => "no SSL support" if ! Net::POP3->can_ssl; --{ --no warnings 'once'; --plan skip_all => "no verified SSL connection to $host:995 - $@" if ! eval { -- IO::Socket::SSL->new(PeerAddr => "$host:995", Timeout => 10) -- || die($IO::Socket::SSL::SSL_ERROR||$!); --}; --} -- --plan tests => 2; -- --SKIP: { -- diag( "connect inet to $host:110" ); -- skip "no inet connect to $host:110",1 -- if ! IO::Socket::INET->new(PeerAddr => "$host:110", Timeout => 10); -- my $pop3 = Net::POP3->new($host, Debug => $debug, Timeout => 10) -- or skip "normal POP3 failed: $@",1; -- skip "no STARTTLS support",1 if $pop3->message !~/STARTTLS/; -- -- if (!$pop3->starttls) { -- fail("starttls failed: ".$pop3->code." $@") -- } else { -- # we now should have access to SSL stuff -- my $cipher = eval { $pop3->get_cipher }; -- if (!$cipher) { -- fail("after starttls: not an SSL object"); -- } elsif ( $pop3->quit ) { -- pass("starttls + quit ok, cipher=$cipher"); -- } else { -- fail("quit after starttls failed: ".$pop3->code); -- } -- } --} -- -- --my $pop3 = Net::POP3->new($host, SSL => 1, Timeout => 10, Debug => $debug); --# we now should have access to SSL stuff --my $cipher = eval { $pop3->get_cipher }; --if (!$cipher) { -- fail("after ssl connect: not an SSL object"); --} elsif ( $pop3->quit ) { -- pass("ssl connect ok, cipher=$cipher"); --} else { -- fail("quit after direct ssl failed: ".$pop3->code); --} -diff --git a/t/external/smtp-ssl.t b/t/external/smtp-ssl.t -deleted file mode 100644 -index ccacbae..0000000 ---- a/t/external/smtp-ssl.t -+++ /dev/null -@@ -1,57 +0,0 @@ --#!perl -- --use 5.008001; -- --use strict; --use warnings; -- --use Net::SMTP; --use Test::More; -- --my $host = 'mail.gmx.net'; --my $debug = 0; -- --plan skip_all => "no SSL support" if ! Net::SMTP->can_ssl; --{ --no warnings 'once'; --plan skip_all => "no verified SSL connection to $host:465 - $@" if ! eval { -- IO::Socket::SSL->new("$host:465") -- || die($IO::Socket::SSL::SSL_ERROR||$!); --}; --} -- --plan tests => 2; -- --SKIP: { -- diag( "connect inet to $host:25" ); -- skip "no inet connect to $host:25",1 if ! IO::Socket::INET->new("$host:25"); -- my $smtp = Net::SMTP->new($host, Debug => $debug) -- or skip "normal SMTP failed: $@",1; -- skip "no STARTTLS support",1 if $smtp->message !~/STARTTLS/; -- -- if (!$smtp->starttls) { -- fail("starttls failed: ".$smtp->code." $@") -- } else { -- # we now should have access to SSL stuff -- my $cipher = eval { $smtp->get_cipher }; -- if (!$cipher) { -- fail("after starttls: not an SSL object"); -- } elsif ( $smtp->quit ) { -- pass("starttls + quit ok, cipher=$cipher"); -- } else { -- fail("quit after starttls failed: ".$smtp->code); -- } -- } --} -- -- --my $smtp = Net::SMTP->new($host, SSL => 1, Debug => $debug); --# we now should have access to SSL stuff --my $cipher = eval { $smtp->get_cipher }; --if (!$cipher) { -- fail("after ssl connect: not an SSL object"); --} elsif ( $smtp->quit ) { -- pass("ssl connect ok, cipher=$cipher"); --} else { -- fail("quit after direct ssl failed: ".$smtp->code); --} -diff --git a/t/pod.t b/t/pod.t -deleted file mode 100644 -index e31ecf3..0000000 ---- a/t/pod.t -+++ /dev/null -@@ -1,51 +0,0 @@ --#!perl --#=============================================================================== --# --# t/pod.t --# --# DESCRIPTION --# Test script to check POD. --# --# COPYRIGHT --# Copyright (C) 2014 Steve Hay. All rights reserved. --# --# LICENCE --# This script is free software; you can redistribute it and/or modify it under --# the same terms as Perl itself, i.e. under the terms of either the GNU --# General Public License or the Artistic License, as specified in the LICENCE --# file. --# --#=============================================================================== -- --use 5.008001; -- --use strict; --use warnings; -- --use Test::More; -- --#=============================================================================== --# MAIN PROGRAM --#=============================================================================== -- --MAIN: { -- plan skip_all => 'Author testing only' unless $ENV{AUTHOR_TESTING}; -- -- my $ok = eval { -- require Test::Pod; -- Test::Pod->import(); -- 1; -- }; -- -- if (not $ok) { -- plan skip_all => 'Test::Pod required to test POD'; -- } -- elsif ($Test::Pod::VERSION < 1.00) { -- plan skip_all => 'Test::Pod 1.00 or higher required to test POD'; -- } -- else { -- all_pod_files_ok(); -- } --} -- --#=============================================================================== -diff --git a/t/pod_coverage.t b/t/pod_coverage.t -deleted file mode 100644 -index d09c04e..0000000 ---- a/t/pod_coverage.t -+++ /dev/null -@@ -1,85 +0,0 @@ --#!perl --#=============================================================================== --# --# t/pod_coverage.t --# --# DESCRIPTION --# Test script to check POD coverage. --# --# COPYRIGHT --# Copyright (C) 2014, 2015, 2020 Steve Hay. All rights reserved. --# --# LICENCE --# This script is free software; you can redistribute it and/or modify it under --# the same terms as Perl itself, i.e. under the terms of either the GNU --# General Public License or the Artistic License, as specified in the LICENCE --# file. --# --#=============================================================================== -- --use 5.008001; -- --use strict; --use warnings; -- --use Test::More; -- --#=============================================================================== --# MAIN PROGRAM --#=============================================================================== -- --MAIN: { -- plan skip_all => 'Author testing only' unless $ENV{AUTHOR_TESTING}; -- -- my $ok = eval { -- require Test::Pod::Coverage; -- Test::Pod::Coverage->import(); -- 1; -- }; -- -- if (not $ok) { -- plan skip_all => 'Test::Pod::Coverage required to test POD coverage'; -- } -- elsif ($Test::Pod::Coverage::VERSION < 0.08) { -- plan skip_all => 'Test::Pod::Coverage 0.08 or higher required to test POD coverage'; -- } -- elsif (!eval { require Socket }) { -- plan skip_all => 'no Socket'; -- } -- elsif (ord('A') == 193 && !eval { require Convert::EBCDIC }) { -- plan skip_all => 'EBCDIC but no Convert::EBCDIC'; -- } -- else { -- plan tests => 12; -- my $params = { coverage_class => qw(Pod::Coverage::CountParents) }; -- pod_coverage_ok('Net::Cmd', { -- %$params, -- also_private => [qw(toascii toebcdic set_status)] -- }); -- pod_coverage_ok('Net::Config', { -- %$params, -- also_private => [qw(is_external)] -- }); -- pod_coverage_ok('Net::Domain', $params); -- pod_coverage_ok('Net::FTP', { -- %$params, -- also_private => [qw(authorise lsl ebcdic byte cmd)] -- }); -- pod_coverage_ok('Net::Netrc', $params); -- pod_coverage_ok('Net::NNTP', $params); -- pod_coverage_ok('Net::POP3', $params); -- pod_coverage_ok('Net::SMTP', { -- %$params, -- also_private => [qw(datafh supports)] -- }); -- pod_coverage_ok('Net::Time', $params); -- pod_coverage_ok('Net::FTP::A', $params); -- pod_coverage_ok('Net::FTP::dataconn', { -- %$params, -- also_private => [qw(can_read can_write cmd reading)] -- }); -- pod_coverage_ok('Net::FTP::I', $params); -- } --} -- --#=============================================================================== --- -2.34.3 - diff --git a/perl-libnet.spec b/perl-libnet.spec index 8f1a504..4c0d7cb 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -1,4 +1,4 @@ -%global base_version 3.13 +%global base_version 3.15 # Run optional test %if ! (0%{?rhel}) @@ -12,8 +12,8 @@ %bcond_without perl_libnet_enables_ssl Name: perl-libnet -Version: 3.14 -Release: 491%{?dist} +Version: 3.15 +Release: 1%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -22,8 +22,6 @@ Source0: https://cpan.metacpan.org/authors/id/S/SH/SHAY/libnet-%{base_ver Patch0: libnet-3.09-Normalize-Changes-encoding.patch # Do not create Net/libnet.cfg, bug #1238689 Patch1: libnet-3.08-Do-not-create-Net-libnet.cfg.patch -# Unbundled from perl 5.35.11 -Patch2: libnet-3.13-Upgrade-to-3.14.patch BuildArch: noarch BuildRequires: coreutils BuildRequires: make @@ -105,7 +103,6 @@ protocols used in the internet community. %setup -q -n libnet-%{base_version} %patch0 -p1 %patch1 -p1 -%patch2 -p1 %build perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1 NO_PERLLOCAL=1 - 3.15-1 +- 3.15 bump + * Fri Jan 20 2023 Fedora Release Engineering - 3.14-491 - Rebuilt for https://fedoraproject.org/wiki/Fedora_38_Mass_Rebuild diff --git a/sources b/sources index dd3e088..65a0256 100644 --- a/sources +++ b/sources @@ -1 +1 @@ -SHA512 (libnet-3.13.tar.gz) = 80d670a71f8793a4ca4bf781d800ee52ca3985795033be64e6ed12520d46da4813325d7534969c12125333d4f85e47fa497ea8687558f969b8eb3e7bfd3c1540 +SHA512 (libnet-3.15.tar.gz) = 8ae71a32e350b73d97eed87f51507e7c88fb37501b66a5c118cee894de664e6728444950dc32a3ca4b2c4e47974b8e90b5747cceff266fda46575fd995bedcf6 From bbdba7e83159e29eb6dbd51dfe3d3b150d983400 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Tue, 11 Jul 2023 09:37:11 +0200 Subject: [PATCH 38/50] Increase release to favour standalone package --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 4c0d7cb..272ab20 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 1%{?dist} +Release: 499%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Tue Jul 11 2023 Jitka Plesnikova - 3.15-499 +- Increase release to favour standalone package + * Tue Mar 21 2023 Jitka Plesnikova - 3.15-1 - 3.15 bump From 117a17ea1a4a351663b45c12afba71f4edce7847 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Wed, 12 Jul 2023 13:32:00 +0200 Subject: [PATCH 39/50] Perl 5.38 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 272ab20..b24f3bd 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 499%{?dist} +Release: 500%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Wed Jul 12 2023 Jitka Plesnikova - 3.15-500 +- Perl 5.38 re-rebuild of bootstrapped packages + * Tue Jul 11 2023 Jitka Plesnikova - 3.15-499 - Increase release to favour standalone package From db71ef6dc78d1b51514f703dd1a04f847af33fb4 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 21 Jul 2023 03:47:45 +0000 Subject: [PATCH 40/50] Rebuilt for https://fedoraproject.org/wiki/Fedora_39_Mass_Rebuild Signed-off-by: Fedora Release Engineering --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index b24f3bd..126d9a5 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 500%{?dist} +Release: 501%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jul 21 2023 Fedora Release Engineering - 3.15-501 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_39_Mass_Rebuild + * Wed Jul 12 2023 Jitka Plesnikova - 3.15-500 - Perl 5.38 re-rebuild of bootstrapped packages From ed57bd937d37bc70573afac2aac01fbc355be247 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Sun, 21 Jan 2024 20:27:51 +0000 Subject: [PATCH 41/50] Rebuilt for https://fedoraproject.org/wiki/Fedora_40_Mass_Rebuild --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 126d9a5..e89ba84 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 501%{?dist} +Release: 502%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Sun Jan 21 2024 Fedora Release Engineering - 3.15-502 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_40_Mass_Rebuild + * Fri Jul 21 2023 Fedora Release Engineering - 3.15-501 - Rebuilt for https://fedoraproject.org/wiki/Fedora_39_Mass_Rebuild From 273e94d4123f9ac1e2e597ce1a9169c634153823 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Thu, 25 Jan 2024 22:12:43 +0000 Subject: [PATCH 42/50] Rebuilt for https://fedoraproject.org/wiki/Fedora_40_Mass_Rebuild --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index e89ba84..0dd1656 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 502%{?dist} +Release: 503%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Thu Jan 25 2024 Fedora Release Engineering - 3.15-503 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_40_Mass_Rebuild + * Sun Jan 21 2024 Fedora Release Engineering - 3.15-502 - Rebuilt for https://fedoraproject.org/wiki/Fedora_40_Mass_Rebuild From b5fd4867b578a0437896447737f2f28f780d04fd Mon Sep 17 00:00:00 2001 From: Software Management Team Date: Thu, 30 May 2024 12:46:48 +0200 Subject: [PATCH 43/50] Eliminate use of obsolete %patchN syntax (#2283636) --- perl-libnet.spec | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 0dd1656..15417b9 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -101,8 +101,8 @@ protocols used in the internet community. %prep %setup -q -n libnet-%{base_version} -%patch0 -p1 -%patch1 -p1 +%patch -P0 -p1 +%patch -P1 -p1 %build perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1 NO_PERLLOCAL=1 Date: Mon, 10 Jun 2024 15:12:50 +0200 Subject: [PATCH 44/50] Increase release to favour standalone package --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 15417b9..c1cf98d 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 503%{?dist} +Release: 510%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Mon Jun 10 2024 Jitka Plesnikova - 3.15-510 +- Increase release to favour standalone package + * Thu Jan 25 2024 Fedora Release Engineering - 3.15-503 - Rebuilt for https://fedoraproject.org/wiki/Fedora_40_Mass_Rebuild From 0ab0dc9f92905106b272345634be6afeec283e24 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Wed, 12 Jun 2024 09:57:43 +0200 Subject: [PATCH 45/50] Perl 5.40 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index c1cf98d..a4f178b 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 510%{?dist} +Release: 511%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Wed Jun 12 2024 Jitka Plesnikova - 3.15-511 +- Perl 5.40 re-rebuild of bootstrapped packages + * Mon Jun 10 2024 Jitka Plesnikova - 3.15-510 - Increase release to favour standalone package From ded9ed1d6e6197394c3538827a8fd60596e44642 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 19 Jul 2024 06:29:13 +0000 Subject: [PATCH 46/50] Rebuilt for https://fedoraproject.org/wiki/Fedora_41_Mass_Rebuild --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index a4f178b..c0e8205 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 511%{?dist} +Release: 512%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jul 19 2024 Fedora Release Engineering - 3.15-512 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_41_Mass_Rebuild + * Wed Jun 12 2024 Jitka Plesnikova - 3.15-511 - Perl 5.40 re-rebuild of bootstrapped packages From ccf12e5755d1d20c91afe7cf5c0ee12e5a665d26 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Sat, 18 Jan 2025 08:37:50 +0000 Subject: [PATCH 47/50] Rebuilt for https://fedoraproject.org/wiki/Fedora_42_Mass_Rebuild --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index c0e8205..132f6a1 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 512%{?dist} +Release: 513%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Sat Jan 18 2025 Fedora Release Engineering - 3.15-513 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_42_Mass_Rebuild + * Fri Jul 19 2024 Fedora Release Engineering - 3.15-512 - Rebuilt for https://fedoraproject.org/wiki/Fedora_41_Mass_Rebuild From bd105aa406f7a6b7502b573d86d3ce9255d86901 Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Mon, 7 Jul 2025 14:05:40 +0200 Subject: [PATCH 48/50] Increase release to favour standalone package --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 132f6a1..32f9526 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 513%{?dist} +Release: 519%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Mon Jul 07 2025 Jitka Plesnikova - 3.15-519 +- Increase release to favour standalone package + * Sat Jan 18 2025 Fedora Release Engineering - 3.15-513 - Rebuilt for https://fedoraproject.org/wiki/Fedora_42_Mass_Rebuild From a273b97b3c1d54edab8fc0cc7118589cacac1f4d Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova Date: Tue, 8 Jul 2025 17:54:45 +0200 Subject: [PATCH 49/50] Perl 5.42 re-rebuild of bootstrapped packages --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index 32f9526..dac3e27 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 519%{?dist} +Release: 520%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Tue Jul 08 2025 Jitka Plesnikova - 3.15-520 +- Perl 5.42 re-rebuild of bootstrapped packages + * Mon Jul 07 2025 Jitka Plesnikova - 3.15-519 - Increase release to favour standalone package From 3fda6835b8956ff18c9a86d7b1d39b32b2bafdf3 Mon Sep 17 00:00:00 2001 From: Fedora Release Engineering Date: Fri, 25 Jul 2025 05:00:20 +0000 Subject: [PATCH 50/50] Rebuilt for https://fedoraproject.org/wiki/Fedora_43_Mass_Rebuild --- perl-libnet.spec | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/perl-libnet.spec b/perl-libnet.spec index dac3e27..dc47e23 100644 --- a/perl-libnet.spec +++ b/perl-libnet.spec @@ -13,7 +13,7 @@ Name: perl-libnet Version: 3.15 -Release: 520%{?dist} +Release: 521%{?dist} Summary: Perl clients for various network protocols License: GPL-1.0-or-later OR Artistic-1.0-Perl URL: https://metacpan.org/release/libnet @@ -122,6 +122,9 @@ make test %{_mandir}/man3/* %changelog +* Fri Jul 25 2025 Fedora Release Engineering - 3.15-521 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_43_Mass_Rebuild + * Tue Jul 08 2025 Jitka Plesnikova - 3.15-520 - Perl 5.42 re-rebuild of bootstrapped packages