From 3921dfa4c1733cf537b438134af46c73e3e8ac59 Mon Sep 17 00:00:00 2001
From: Jitka Plesnikova <jplesnik@redhat.com>
Date: Fri, 26 Mar 2021 18:03:09 +0100
Subject: [PATCH] Package tests

---
 .fmf/version                 |  1 +
 gating.yaml                  |  7 +++++++
 perl-Syntax-Keyword-Try.spec | 33 +++++++++++++++++++++++++++++++++
 plans/sanity.fmf             |  5 +++++
 tests/upstream-tests.fmf     |  4 ++++
 5 files changed, 50 insertions(+)
 create mode 100644 .fmf/version
 create mode 100644 gating.yaml
 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..282e16b
--- /dev/null
+++ b/gating.yaml
@@ -0,0 +1,7 @@
+--- !Policy
+product_versions:
+  - fedora-*
+decision_context: bodhi_update_push_stable
+subject_type: koji_build
+rules:
+  - !PassingTestCaseRule {test_case_name: fedora-ci.koji-build.tier0.functional}
diff --git a/perl-Syntax-Keyword-Try.spec b/perl-Syntax-Keyword-Try.spec
index 62803b7..f77aa0e 100644
--- a/perl-Syntax-Keyword-Try.spec
+++ b/perl-Syntax-Keyword-Try.spec
@@ -39,6 +39,18 @@ semantics in a form familiar to users of other languages, being built on a
 block labeled with the try keyword, followed by at least one of a catch or
 finally block.
 
+%package tests
+Summary:        Tests for %{name}
+Requires:       %{name} = %{?epoch:%{epoch}:}%{version}-%{release}
+Requires:       perl-Test-Harness
+Requires:       perl(Future)
+Requires:       perl(Future::AsyncAwait)
+Requires:       perl(threads)
+
+%description tests
+Tests from %{name}. Execute them
+with "%{_libexecdir}/%{name}/test".
+
 %prep
 %setup -q -n Syntax-Keyword-Try-%{version}
 
@@ -46,12 +58,29 @@ finally block.
 perl Build.PL --installdirs=vendor --optimize="$RPM_OPT_FLAGS"
 ./Build
 
+# Help file to recognise the Perl scripts
+for F in t/*.t; do
+    perl -i -MConfig -ple 'print $Config{startperl} if $. == 1 && !s{\A#!\s*perl}{$Config{startperl}}' "$F"
+    chmod +x "$F"
+done
+
 %install
 ./Build install --destdir=$RPM_BUILD_ROOT --create_packlist=0
 find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -delete
 %{_fixperms} $RPM_BUILD_ROOT/*
 
+# Install tests
+mkdir -p %{buildroot}%{_libexecdir}/%{name}
+cp -a t %{buildroot}%{_libexecdir}/%{name}
+rm %{buildroot}%{_libexecdir}/%{name}/t/99pod.t
+cat > %{buildroot}%{_libexecdir}/%{name}/test << 'EOF'
+#!/bin/sh
+cd %{_libexecdir}/%{name} && exec prove -I . -r -j "$(getconf _NPROCESSORS_ONLN)"
+EOF
+chmod +x %{buildroot}%{_libexecdir}/%{name}/test
+
 %check
+export HARNESS_OPTIONS=j$(perl -e 'if ($ARGV[0] =~ /.*-j([0-9][0-9]*).*/) {print $1} else {print 1}' -- '%{?_smp_mflags}')
 ./Build test
 
 %files
@@ -61,9 +90,13 @@ find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -delete
 %{perl_vendorarch}/Syntax*
 %{_mandir}/man3/*
 
+%files tests
+%{_libexecdir}/%{name}
+
 %changelog
 * Fri Mar 26 2021 Jitka Plesnikova <jplesnik@redhat.com> - 0.22-1
 - 0.22 bump
+- Package tests
 
 * Wed Jan 27 2021 Fedora Release Engineering <releng@fedoraproject.org> - 0.21-2
 - Rebuilt for https://fedoraproject.org/wiki/Fedora_34_Mass_Rebuild
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..c7d9182
--- /dev/null
+++ b/tests/upstream-tests.fmf
@@ -0,0 +1,4 @@
+summary: Upstream tests
+component: perl-Syntax-Keyword-Try
+require: perl-Syntax-Keyword-Try-tests
+test: /usr/libexec/perl-Syntax-Keyword-Try/test