From 97888a1dd531a1926c5299fb50ff19bdfd1ee468 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Michal=20Josef=20=C5=A0pa=C4=8Dek?= <mspacek@redhat.com>
Date: Fri, 12 Jul 2024 09:24:14 +0200
Subject: [PATCH] Package tests

---
 .fmf/version              |  1 +
 gating.yaml               |  7 +++++++
 perl-Module-Metadata.spec | 38 +++++++++++++++++++++++++++++++++++++-
 plans/internal.fmf        | 12 ++++++++++++
 plans/sanity.fmf          |  5 +++++
 tests/upstream-tests.fmf  | 12 ++++++++++++
 6 files changed, 74 insertions(+), 1 deletion(-)
 create mode 100644 .fmf/version
 create mode 100644 gating.yaml
 create mode 100644 plans/internal.fmf
 create mode 100644 plans/sanity.fmf
 create mode 100644 tests/upstream-tests.fmf

diff --git a/.fmf/version b/.fmf/version
new file mode 100644
index 0000000..d00491f
--- /dev/null
+++ b/.fmf/version
@@ -0,0 +1 @@
+1
diff --git a/gating.yaml b/gating.yaml
new file mode 100644
index 0000000..1608530
--- /dev/null
+++ b/gating.yaml
@@ -0,0 +1,7 @@
+# RHEL
+--- !Policy
+product_versions:
+  - rhel-*
+decision_context: osci_compose_gate
+rules:
+  - !PassingTestCaseRule {test_case_name: osci.brew-build.tier0.functional}
diff --git a/perl-Module-Metadata.spec b/perl-Module-Metadata.spec
index 47545f0..67eb0b6 100644
--- a/perl-Module-Metadata.spec
+++ b/perl-Module-Metadata.spec
@@ -1,6 +1,6 @@
 Name:		perl-Module-Metadata
 Version:	1.000038
-Release:	6%{?dist}
+Release:	7%{?dist}
 Summary:	Gather package and POD information from perl module files
 License:	GPL-1.0-or-later OR Artistic-1.0-Perl
 URL:		https://metacpan.org/release/Module-Metadata
@@ -12,6 +12,7 @@ BuildRequires:	findutils
 BuildRequires:	make
 BuildRequires:	perl-generators
 BuildRequires:	perl-interpreter
+BuildRequires:	perl(Config)
 BuildRequires:	perl(ExtUtils::MakeMaker)
 # Module
 BuildRequires:	perl(Carp)
@@ -41,12 +42,30 @@ BuildRequires:	perl(CPAN::Meta) >= 2.120900
 Requires:	perl(Encode)
 Requires:	perl(Fcntl)
 
+# Remove private test modules
+%global __requires_exclude %{?__requires_exclude:%__requires_exclude|}^perl\\(Foo|GeneratePackage\\)$
+%global __provides_exclude %{?__provides_exclude:%__provides_exclude|}^perl\\(BOMTest::UTF8|ENDPOD|Foo|Foo|GeneratePackage\\)$
+
 %description
 This module provides a standard way to gather metadata about a .pm file
 without executing unsafe code.
 
+%package tests
+Summary:        Tests for %{name}
+Requires:       %{name} = %{?epoch:%{epoch}:}%{version}-%{release}
+Requires:       perl-Test-Harness
+
+%description tests
+Tests from %{name}. Execute them
+with "%{_libexecdir}/%{name}/test".
+
 %prep
 %setup -q -n Module-Metadata-%{version}
+# Help generators to recognize Perl scripts
+for F in t/*.t; do
+    perl -i -MConfig -ple 'print $Config{startperl} if $. == 1 && !s{\A#!.*perl\b}{$Config{startperl}}' "$F"
+    chmod +x "$F"
+done
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor
@@ -56,6 +75,17 @@ make %{?_smp_mflags}
 make pure_install DESTDIR=%{buildroot}
 find %{buildroot} -type f -name .packlist -delete
 %{_fixperms} -c %{buildroot}
+# Install tests
+mkdir -p %{buildroot}%{_libexecdir}/%{name}
+cp -a t %{buildroot}%{_libexecdir}/%{name}
+# Remove author tests.
+rm -f %{buildroot}%{_libexecdir}/%{name}/t/00*
+cp -a corpus %{buildroot}%{_libexecdir}/%{name}
+cat > %{buildroot}%{_libexecdir}/%{name}/test << 'EOF'
+#!/bin/sh
+cd %{_libexecdir}/%{name} && exec prove -I . -j "$(getconf _NPROCESSORS_ONLN)"
+EOF
+chmod +x %{buildroot}%{_libexecdir}/%{name}/test
 
 %check
 make test
@@ -66,7 +96,13 @@ make test
 %{perl_vendorlib}/Module/
 %{_mandir}/man3/Module::Metadata.3*
 
+%files tests
+%{_libexecdir}/%{name}
+
 %changelog
+* Fri Jul 12 2024 Michal Josef Špaček <mspacek@redhat.com> - 1.000038-7
+- Package tests
+
 * Mon Jun 24 2024 Troy Dawson <tdawson@redhat.com> - 1.000038-6
 - Bump release for June 2024 mass rebuild
 
diff --git a/plans/internal.fmf b/plans/internal.fmf
new file mode 100644
index 0000000..951cc34
--- /dev/null
+++ b/plans/internal.fmf
@@ -0,0 +1,12 @@
+summary: Private (RHEL) beakerlib tests
+enabled: false
+adjust:
+  - when: distro == rhel
+    enabled: true
+    because: private tests are accesible only within rhel pipline
+discover:
+  - name: rhel
+    how: fmf
+    url: https://pkgs.devel.redhat.com/git/tests/perl-Module-Metadata
+execute:
+    how: tmt
diff --git a/plans/sanity.fmf b/plans/sanity.fmf
new file mode 100644
index 0000000..a72ded4
--- /dev/null
+++ b/plans/sanity.fmf
@@ -0,0 +1,5 @@
+summary: Sanity tests
+discover:
+    how: fmf
+execute:
+    how: tmt
diff --git a/tests/upstream-tests.fmf b/tests/upstream-tests.fmf
new file mode 100644
index 0000000..f029c53
--- /dev/null
+++ b/tests/upstream-tests.fmf
@@ -0,0 +1,12 @@
+summary: Upstream tests
+contact: Michal Josef Spacek <mspacek@redhat.com>
+component: perl-Module-Metadata
+require: perl-Module-Metadata-tests
+test: /usr/libexec/perl-Module-Metadata/test
+enabled: true
+tag:
+  - rhel-buildroot
+adjust:
+  - enabled: false
+    when: distro < rhel-10 or distro < centos-stream-10
+    continue: false