From 5780a84194f6e8eb89de2b4ae22c2b1623178413 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20=C5=A0abata?= Date: Thu, 15 Oct 2020 12:14:37 +0200 Subject: [PATCH] RHEL 9.0.0 Alpha bootstrap The content of this branch was automatically imported from Fedora ELN with the following as its source: https://src.fedoraproject.org/rpms/guile#0db5bc188ea9bb8566250893b43723222d636e0e --- .gitignore | 1 + guile-2.0.14-gc_pkgconfig_private.patch | 15 + guile-configure.patch | 21 + guile-i18ntest.patch | 62 ++ guile-ieeetest.patch | 19 + guile-multilib.patch | 47 ++ guile-threadstest.patch | 11 + guile.spec | 727 ++++++++++++++++++++++++ sources | 1 + tests/inventory | 4 + tests/smoke/Makefile | 63 ++ tests/smoke/PURPOSE | 5 + tests/smoke/fact | 6 + tests/smoke/runtest.sh | 68 +++ tests/tests.yml | 25 + tests/upstream/Makefile | 63 ++ tests/upstream/PURPOSE | 3 + tests/upstream/runtest.sh | 65 +++ 18 files changed, 1206 insertions(+) create mode 100644 guile-2.0.14-gc_pkgconfig_private.patch create mode 100644 guile-configure.patch create mode 100644 guile-i18ntest.patch create mode 100644 guile-ieeetest.patch create mode 100644 guile-multilib.patch create mode 100644 guile-threadstest.patch create mode 100644 guile.spec create mode 100644 sources create mode 100755 tests/inventory create mode 100644 tests/smoke/Makefile create mode 100644 tests/smoke/PURPOSE create mode 100644 tests/smoke/fact create mode 100644 tests/smoke/runtest.sh create mode 100644 tests/tests.yml create mode 100644 tests/upstream/Makefile create mode 100644 tests/upstream/PURPOSE create mode 100644 tests/upstream/runtest.sh diff --git a/.gitignore b/.gitignore index e69de29..5dfaeb9 100644 --- a/.gitignore +++ b/.gitignore @@ -0,0 +1 @@ +/guile-2.0.14.tar.xz diff --git a/guile-2.0.14-gc_pkgconfig_private.patch b/guile-2.0.14-gc_pkgconfig_private.patch new file mode 100644 index 0000000..701c3dc --- /dev/null +++ b/guile-2.0.14-gc_pkgconfig_private.patch @@ -0,0 +1,15 @@ +diff -up guile-2.0.14/meta/guile-2.0.pc.in.pkgconfig_private guile-2.0.14/meta/guile-2.0.pc.in +--- guile-2.0.14/meta/guile-2.0.pc.in.pkgconfig_private 2016-12-14 18:03:33.000000000 -0600 ++++ guile-2.0.14/meta/guile-2.0.pc.in 2018-02-20 11:53:56.344379283 -0600 +@@ -21,9 +21,9 @@ guile=${bindir}/@guile@ + Name: GNU Guile + Description: GNU's Ubiquitous Intelligent Language for Extension + Version: @GUILE_VERSION@ +-Libs: -L${libdir} -lguile-@GUILE_EFFECTIVE_VERSION@ @BDW_GC_LIBS@ ++Libs: -L${libdir} -lguile-@GUILE_EFFECTIVE_VERSION@ + Libs.private: @LIB_CLOCK_GETTIME@ @LIBGMP@ @LIBLTDL@ @LIBFFI_LIBS@ \ + @LIBUNISTRING@ @GUILE_LIBS@ @LIBICONV@ @LIBINTL@ @LIBSOCKET@ \ + @SERVENT_LIB@ @HOSTENT_LIB@ @GETADDRINFO_LIB@ @INET_NTOP_LIB@ \ +- @INET_PTON_LIB@ ++ @INET_PTON_LIB@ @BDW_GC_LIBS@ + Cflags: -I${pkgincludedir}/@GUILE_EFFECTIVE_VERSION@ @GUILE_CFLAGS@ @BDW_GC_CFLAGS@ diff --git a/guile-configure.patch b/guile-configure.patch new file mode 100644 index 0000000..e5b9436 --- /dev/null +++ b/guile-configure.patch @@ -0,0 +1,21 @@ +diff -Nrup a/m4/mathfunc.m4 b/m4/mathfunc.m4 +--- a/m4/mathfunc.m4 2016-12-14 17:03:33.000000000 -0700 ++++ b/m4/mathfunc.m4 2020-01-06 19:48:46.684158282 -0700 +@@ -60,7 +60,7 @@ AC_DEFUN([gl_MATHFUNC], + #endif + #include + $4 +- $2 (*funcptr) $3 = ]func[; ++ __attribute__ ((used)) $2 (*funcptr) $3 = ]func[; + int i_ret; + float f_ret; + double d_ret; +@@ -85,7 +85,7 @@ AC_DEFUN([gl_MATHFUNC], + #endif + #include + $4 +- $2 (*funcptr) $3 = ]func[; ++ __attribute__ ((used)) $2 (*funcptr) $3 = ]func[; + int i_ret; + float f_ret; + double d_ret; diff --git a/guile-i18ntest.patch b/guile-i18ntest.patch new file mode 100644 index 0000000..098f194 --- /dev/null +++ b/guile-i18ntest.patch @@ -0,0 +1,62 @@ +diff -up guile-2.0.14/test-suite/tests/i18n.test.i18ntest guile-2.0.14/test-suite/tests/i18n.test +--- guile-2.0.14/test-suite/tests/i18n.test.i18ntest 2017-02-13 21:32:39.000000000 +0100 ++++ guile-2.0.14/test-suite/tests/i18n.test 2017-10-10 13:25:47.492589702 +0200 +@@ -527,28 +527,28 @@ + (with-test-prefix "French" + + (pass-if-equal "integer" +- "123 456" ++ "123\xa0456" + (under-french-locale-or-unresolved + (lambda () + (let ((fr (make-locale LC_ALL %french-locale-name))) + (number->locale-string 123456 #t fr))))) + + (pass-if-equal "negative integer" +- "-1 234 567" ++ "-1\xa0234\xa0567" + (under-french-locale-or-unresolved + (lambda () + (let ((fr (make-locale LC_ALL %french-locale-name))) + (number->locale-string -1234567 #t fr))))) + + (pass-if-equal "fraction" +- "1 234,567" ++ "1\xa0234,567" + (under-french-locale-or-unresolved + (lambda () + (let ((fr (make-locale LC_ALL %french-locale-name))) + (number->locale-string 1234.567 #t fr))))) + + (pass-if-equal "fraction, 1 digit" +- "1 234,6" ++ "1\xa0234,6" + (under-french-locale-or-unresolved + (lambda () + (let ((fr (make-locale LC_ALL %french-locale-name))) +@@ -563,7 +563,7 @@ + (with-test-prefix "French" + + (pass-if-equal "12345.678" +- "12 345,678" ++ "12\xa0345,678" + (under-french-locale-or-unresolved + (lambda () + (if (null? (locale-digit-grouping %french-locale)) +@@ -586,14 +586,14 @@ + (with-test-prefix "French" + + (pass-if-equal "integer" +- "123 456,00 +EUR" ++ "123\xa0456,00 +EUR" + (under-french-locale-or-unresolved + (lambda () + (let ((fr (make-locale LC_ALL %french-locale-name))) + (monetary-amount->locale-string 123456 #f fr))))) + + (pass-if-equal "fraction" +- "1 234,57 EUR " ++ "1\xa0234,57 EUR " + (under-french-locale-or-unresolved + (lambda () + (let ((fr (make-locale LC_ALL %french-locale-name))) diff --git a/guile-ieeetest.patch b/guile-ieeetest.patch new file mode 100644 index 0000000..392458c --- /dev/null +++ b/guile-ieeetest.patch @@ -0,0 +1,19 @@ +diff -up guile-2.0.14/test-suite/tests/bytevectors.test.orig guile-2.0.14/test-suite/tests/bytevectors.test +--- guile-2.0.14/test-suite/tests/bytevectors.test.orig 2018-07-20 10:53:26.644659326 +0200 ++++ guile-2.0.14/test-suite/tests/bytevectors.test 2018-07-20 10:52:50.668567335 +0200 +@@ -381,6 +381,7 @@ + (equal? (bytevector-ieee-single-ref b 0 (endianness little)) + (bytevector-ieee-single-ref b 4 (endianness big))))) + ++ #! + (pass-if "bytevector-ieee-single-{ref,set!} [unaligned]" + (let ((b (make-bytevector 9)) + (number 3.14)) +@@ -388,6 +389,7 @@ + (bytevector-ieee-single-set! b 5 number (endianness big)) + (equal? (bytevector-ieee-single-ref b 1 (endianness little)) + (bytevector-ieee-single-ref b 5 (endianness big))))) ++ !# + + (pass-if "double, little endian" + ;; http://bugs.gnu.org/11310 diff --git a/guile-multilib.patch b/guile-multilib.patch new file mode 100644 index 0000000..4baf309 --- /dev/null +++ b/guile-multilib.patch @@ -0,0 +1,47 @@ +diff -up guile-2.0.9/libguile/Makefile.in.multilib guile-2.0.9/libguile/Makefile.in +--- guile-2.0.9/libguile/Makefile.in.multilib 2013-04-10 01:31:59.000000000 +0200 ++++ guile-2.0.9/libguile/Makefile.in 2013-07-16 16:59:59.490527131 +0200 +@@ -3283,6 +3283,11 @@ install-nodist_modincludeHEADERS: $(nodi + while read files; do \ + echo " $(INSTALL_HEADER) $$files '$(DESTDIR)$(modincludedir)'"; \ + $(INSTALL_HEADER) $$files "$(DESTDIR)$(modincludedir)" || exit $$?; \ ++ for f in $$files; do if [ "$$f" = "scmconfig.h" ]; then \ ++ grep -q "SCM_SIZEOF_LONG 4" "$(DESTDIR)$(modincludedir)/$$f" && g=32 || g=64; \ ++ mv "$(DESTDIR)$(modincludedir)/$$f" "$(DESTDIR)$(modincludedir)/scmconfig-$$g.h"; \ ++ $(INSTALL_HEADER) "$${d}scmconfig-multilib.h" "$(DESTDIR)$(modincludedir)/$$f"; \ ++ fi; done \ + done + + uninstall-nodist_modincludeHEADERS: +diff -up guile-2.0.9/libguile/scmconfig-multilib.h.multilib guile-2.0.9/libguile/scmconfig-multilib.h +--- guile-2.0.9/libguile/scmconfig-multilib.h.multilib 2013-07-16 17:02:26.045733704 +0200 ++++ guile-2.0.9/libguile/scmconfig-multilib.h 2013-07-16 17:01:51.623685971 +0200 +@@ -0,0 +1,7 @@ ++/* multilib clean wrapper */ ++#include ++#if __WORDSIZE == 32 ++#include "libguile/scmconfig-32.h" ++#else ++#include "libguile/scmconfig-64.h" ++#endif +diff -up guile-2.0.9/meta/guile-config.in.multilib guile-2.0.9/meta/guile-config.in +--- guile-2.0.9/meta/guile-config.in.multilib 2012-07-02 11:28:14.000000000 +0200 ++++ guile-2.0.9/meta/guile-config.in 2013-07-16 17:09:25.650324597 +0200 +@@ -1,7 +1,6 @@ + #!/bin/sh +-PKG_CONFIG_PATH="@pkgconfigdir@:$PKG_CONFIG_PATH" + GUILE_AUTO_COMPILE=0 +-export PKG_CONFIG_PATH GUILE_AUTO_COMPILE ++export GUILE_AUTO_COMPILE + + exec "@installed_guile@" -e main -s $0 "$@" + !# +@@ -31,7 +30,7 @@ exec "@installed_guile@" -e main -s $0 " + (ice-9 rdelim)) + + +-(define %pkg-config-program "@PKG_CONFIG@") ++(define %pkg-config-program "pkg-config") + + ;;;; main function, command-line processing + diff --git a/guile-threadstest.patch b/guile-threadstest.patch new file mode 100644 index 0000000..b62be51 --- /dev/null +++ b/guile-threadstest.patch @@ -0,0 +1,11 @@ +diff -up guile-2.0.13/test-suite/tests/threads.test.threadstest guile-2.0.13/test-suite/tests/threads.test +--- guile-2.0.13/test-suite/tests/threads.test.threadstest 2014-07-04 15:49:51.000000000 +0200 ++++ guile-2.0.13/test-suite/tests/threads.test 2017-02-14 08:40:44.920306211 +0100 +@@ -415,6 +415,7 @@ + (not (mutex-owner m)))) + + (pass-if "mutex with owner not retained (bug #27450)" ++ (throw 'unresolved) + (let ((g (make-guardian))) + (g (let ((m (make-mutex))) (lock-mutex m) m)) + diff --git a/guile.spec b/guile.spec new file mode 100644 index 0000000..8c4a898 --- /dev/null +++ b/guile.spec @@ -0,0 +1,727 @@ +Summary: A GNU implementation of Scheme for application extensibility +Name: guile +%define mver 2.0 +Version: 2.0.14 +Release: 22%{?dist} +Epoch: 5 +Source: ftp://ftp.gnu.org/pub/gnu/guile/guile-%{version}.tar.xz +URL: http://www.gnu.org/software/guile/ +License: LGPLv3+ +BuildRequires: gcc libtool libtool-ltdl-devel gmp-devel readline-devel +BuildRequires: gettext-devel libunistring-devel libffi-devel gc-devel +Requires: coreutils + +Patch1: guile-multilib.patch +Patch2: guile-i18ntest.patch +Patch3: guile-threadstest.patch +# Avoid linking all guile consumers to libgc +# TODO: consider using: Requires.private: bdw-gc +Patch4: guile-2.0.14-gc_pkgconfig_private.patch +Patch5: guile-ieeetest.patch +Patch6: guile-configure.patch + +%description +GUILE (GNU's Ubiquitous Intelligent Language for Extension) is a library +implementation of the Scheme programming language, written in C. GUILE +provides a machine-independent execution platform that can be linked in +as a library during the building of extensible programs. + +Install the guile package if you'd like to add extensibility to programs +that you are developing. + +%package devel +Summary: Libraries and header files for the GUILE extensibility library +Requires: guile%{?_isa} = %{epoch}:%{version}-%{release} gmp-devel gc-devel +Requires: pkgconfig + +%description devel +The guile-devel package includes the libraries, header files, etc., +that you'll need to develop applications that are linked with the +GUILE extensibility library. + +You need to install the guile-devel package if you want to develop +applications that will be linked to GUILE. You'll also need to +install the guile package. + +%prep +%setup -q -n guile-%version +%patch1 -p1 -b .multilib +%patch2 -p1 -b .i18ntest +%patch3 -p1 -b .threadstest +%patch4 -p1 -b .gc_pkgconfig_private +%ifarch ppc64le +%patch5 -p1 -b .ieeetest +%endif +%patch6 -p1 -b .configure + +%build +autoreconf -fiv + +# The -O2 option in CFLAGS seems to cause the build to fail on +# some archs (bug #1675089) +%ifarch armv7hl ppc64le +export CFLAGS="$(echo $RPM_OPT_FLAGS | sed 's/-O2/-Os/')" +%endif + +%configure --disable-static --disable-error-on-warning + +# Remove RPATH +sed -i 's|" $sys_lib_dlsearch_path "|" $sys_lib_dlsearch_path %{_libdir} "|' \ + libtool + +%{make_build} + +%install +%{make_install} + +mkdir -p ${RPM_BUILD_ROOT}%{_datadir}/guile/site/%{mver} + +rm -f ${RPM_BUILD_ROOT}%{_libdir}/libguile*.la +rm -f ${RPM_BUILD_ROOT}%{_infodir}/dir + +# Our gdb doesn't support guile yet +rm -f ${RPM_BUILD_ROOT}%{_libdir}/libguile*gdb.scm + +# Compress large documentation +bzip2 NEWS + +for i in $RPM_BUILD_ROOT%{_infodir}/goops.info; do + iconv -f iso8859-1 -t utf-8 < $i > $i.utf8 && mv -f ${i}{.utf8,} +done + +touch $RPM_BUILD_ROOT%{_datadir}/guile/site/%{mver}/slibcat + +# Create symlinks for compatibility +ln -s guile $RPM_BUILD_ROOT%{_bindir}/guile2 +ln -s %{_mandir}/man1/guile.1.gz $RPM_BUILD_ROOT%{_mandir}/man1/guile2.1.gz +ln -s guile-tools $RPM_BUILD_ROOT%{_bindir}/guile2-tools + +# Adjust mtimes so they are all identical on all architectures. +# When guile.x86_64 and guile.i686 are installed at the same time on an x86_64 system, +# the *.scm files' timestamps change, as they normally reside in /usr/share/guile/. +# Their corresponding compiled *.go file go to /usr/lib64/, or /usr/lib/, depending on the arch. +# The mismatch in timestamps between *.scm and *.go files makes guile to compile itself +# everytime it's run. The following code adjusts the files so that their timestamps are the same +# for every file, but unique between builds. +# See https://bugzilla.redhat.com/show_bug.cgi?id=1208760. +find $RPM_BUILD_ROOT%{_datadir} -name '*.scm' -exec touch -r "%{_specdir}/guile.spec" '{}' \; +find $RPM_BUILD_ROOT%{_libdir} -name '*.go' -exec touch -r "%{_specdir}/guile.spec" '{}' \; + +%check +%make_build check + +%ldconfig_scriptlets + +%triggerin -- slib >= 3b4-1 +rm -f %{_datadir}/guile/site/%{mver}/slibcat +export SCHEME_LIBRARY_PATH=%{_datadir}/slib/ + +# Build SLIB catalog +%{_bindir}/guile --fresh-auto-compile --no-auto-compile -c \ + "(use-modules (ice-9 slib)) (require 'new-catalog)" &> /dev/null || \ + rm -f %{_datadir}/guile/site/%{mver}/slibcat +: + +%triggerun -- slib >= 3b4-1 +if [ "$2" = 0 ]; then + rm -f %{_datadir}/guile/site/%{mver}/slibcat +fi + +%files +%license COPYING COPYING.LESSER LICENSE +%doc AUTHORS HACKING NEWS.bz2 README THANKS +%{_bindir}/guile2 +%{_bindir}/guile2-tools +%{_bindir}/guild +%{_bindir}/guile +%{_bindir}/guile-tools +%{_libdir}/libguile*.so.* +%{_libdir}/libguilereadline-*.so +%{_libdir}/guile +%dir %{_datadir}/guile +%dir %{_datadir}/guile/%{mver} +%{_datadir}/guile/%{mver}/ice-9 +%{_datadir}/guile/%{mver}/language +%{_datadir}/guile/%{mver}/oop +%{_datadir}/guile/%{mver}/rnrs +%{_datadir}/guile/%{mver}/scripts +%{_datadir}/guile/%{mver}/srfi +%{_datadir}/guile/%{mver}/sxml +%{_datadir}/guile/%{mver}/system +%{_datadir}/guile/%{mver}/texinfo +%{_datadir}/guile/%{mver}/web +%{_datadir}/guile/%{mver}/guile-procedures.txt +%{_datadir}/guile/%{mver}/*.scm +%dir %{_datadir}/guile/site +%dir %{_datadir}/guile/site/%{mver} +%ghost %{_datadir}/guile/site/%{mver}/slibcat +%{_infodir}/* +%{_mandir}/man1/guile.1* +%{_mandir}/man1/guile2.1* + +%files devel +%{_bindir}/guile-config +%{_bindir}/guile-snarf +%{_datadir}/aclocal/* +%{_libdir}/libguile-%{mver}.so +%{_libdir}/pkgconfig/*.pc +%{_includedir}/guile + +%changelog +* Thu Aug 13 2020 Tomas Korbar - 2.0.14-22 +- Use make macros +- https://fedoraproject.org/wiki/Changes/UseMakeBuildInstallMacro + +* Tue Jul 28 2020 Fedora Release Engineering - 5:2.0.14-21 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_33_Mass_Rebuild + +* Tue May 26 2020 Tomas Korbar - 5:2.0.14-20 +- Create symlink for guile2 manpage (#1612696) + +* Wed Jan 29 2020 Fedora Release Engineering - 5:2.0.14-19 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild + +* Fri Jan 17 2020 Jeff Law - 5:2.0.14-18 +- Fix configure tests compromised by LTO + +* Thu Jul 25 2019 Fedora Release Engineering - 5:2.0.14-17 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_31_Mass_Rebuild + +* Tue Feb 19 2019 Miroslav Lichvar - 5:2.0.14-16 +- adjust CFLAGS on armv7hl and ppc64le to fix building (#1675089) + +* Sun Feb 17 2019 Igor Gnatenko - 5:2.0.14-15 +- Rebuild for readline 8.0 + +* Fri Feb 01 2019 Fedora Release Engineering - 5:2.0.14-14 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_30_Mass_Rebuild + +* Mon Jan 14 2019 Björn Esser - 5:2.0.14-13 +- Rebuilt for libcrypt.so.2 (#1666033) + +* Fri Jul 20 2018 Miroslav Lichvar - 5:2.0.14-12 +- disable failing floating-point test on ppc64le (#1604296) + +* Fri Jul 13 2018 Fedora Release Engineering - 5:2.0.14-11 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_29_Mass_Rebuild + +* Thu Jun 21 2018 Miroslav Lichvar - 5:2.0.14-10 +- drop support for upgrading from very old packages +- drop obsolete install-info scriptlets + +* Tue May 22 2018 Miroslav Lichvar - 5:2.0.14-9 +- use macros for ldconfig scriptlets +- add gcc to build requirements + +* Tue Feb 20 2018 Rex Dieter - 5:2.0.14-8 +- %%check: restore + +* Tue Feb 20 2018 Rex Dieter - 5:2.0.14-7 +- avoid linking all guile-devel consumers to libgc +- BR: gcc +- use %%{make_build},%%{make_install} +- %%check: make non-fatal + +* Wed Feb 07 2018 Fedora Release Engineering - 5:2.0.14-6 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_28_Mass_Rebuild + +* Sat Jan 20 2018 Björn Esser - 5:2.0.14-5 +- Rebuilt for switch to libxcrypt + +* Tue Oct 10 2017 Miroslav Lichvar - 5:2.0.14-4 +- fix i18n test for new glibc using different thousands separator (#1493170) + +* Wed Aug 02 2017 Fedora Release Engineering - 5:2.0.14-3 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_27_Binutils_Mass_Rebuild + +* Wed Jul 26 2017 Fedora Release Engineering - 5:2.0.14-2 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_27_Mass_Rebuild + +* Tue Feb 14 2017 Miroslav Lichvar - 5:2.0.14-1 +- update to 2.0.14 +- disable unreliable test in threads.test + +* Mon Feb 13 2017 Miroslav Lichvar - 5:2.0.13-4 +- fix race condition in 00-repl-server.test (#1412931) + +* Wed Feb 01 2017 Stephen Gallagher - 2.0.13-3 +- Add missing %%license macro + +* Thu Jan 12 2017 Igor Gnatenko - 5:2.0.13-2 +- Rebuild for readline 7.x + +* Wed Oct 12 2016 Miroslav Lichvar - 5:2.0.13-1 +- update to 2.0.13 (CVE-2016-8605, CVE-2016-8606) + +* Fri Jul 15 2016 Miroslav Lichvar - 5:2.0.12-1 +- update to 2.0.12 + +* Sat Mar 5 2016 Peter Robinson 5:2.0.11-9 +- Don't ship ChangeLog, NEWS suffices + +* Wed Feb 03 2016 Fedora Release Engineering - 5:2.0.11-8 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_24_Mass_Rebuild + +* Thu Nov 12 2015 Jan Synáček - 5:2.0.11-7 +- unify mtime on *.scm and *.go files (#1208760) + +* Wed Jun 17 2015 Fedora Release Engineering - 5:2.0.11-6 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_23_Mass_Rebuild + +* Sat Feb 21 2015 Till Maas - 5:2.0.11-5 +- Rebuilt for Fedora 23 Change + https://fedoraproject.org/wiki/Changes/Harden_all_packages_with_position-independent_code + +* Tue Sep 02 2014 Miroslav Lichvar - 5:2.0.11-4 +- rebuild for new libunistring + +* Sat Aug 16 2014 Fedora Release Engineering - 5:2.0.11-3 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_21_22_Mass_Rebuild + +* Sat Jun 07 2014 Fedora Release Engineering - 5:2.0.11-2 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_21_Mass_Rebuild + +* Fri Mar 21 2014 Miroslav Lichvar - 5:2.0.11-1 +- update to 2.0.11 +- switch to xz source tarball + +* Wed Mar 19 2014 Miroslav Lichvar - 5:2.0.10-1 +- update to 2.0.10 +- update slibcat building for slib 3b4 +- disable auto-compilation when building slibcat + +* Sat Aug 03 2013 Fedora Release Engineering - 5:2.0.9-4 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_20_Mass_Rebuild + +* Tue Jul 16 2013 Miroslav Lichvar - 5:2.0.9-3 +- drop renaming to guile2 +- fix multilib conflicts +- fix post scriptlet to not remove files on upgrade +- remove obsolete code from slib trigger +- fix weekdays in changelog + +* Tue Jul 09 2013 Karsten Hopp 2.0.9-2 +- bump release and rebuild to fix dependencies on PPC + +* Wed Apr 10 2013 Jan Synáček - 2.0.9-1 +- Update to 2.0.9 (#950357, #925529) + +* Fri Jan 25 2013 Jan Synáček - 2.0.7-1 +- Add forgotten sources + +* Fri Jan 25 2013 Jan Synáček - 2.0.7-1 +- Update to 2.0.7 (#678238) + +* Mon Nov 12 2012 Miroslav Lichvar - 5:1.8.8-6 +- remove obsolete macros + +* Thu Jul 19 2012 Fedora Release Engineering - 5:1.8.8-5.2 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_18_Mass_Rebuild + +* Fri Jan 13 2012 Fedora Release Engineering - 5:1.8.8-4.2 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_17_Mass_Rebuild + +* Fri Oct 21 2011 Marcela Mašláňová - 5:1.8.8-3.2 +- rebuild with new gmp without compat lib + +* Tue Oct 11 2011 Peter Schiffer - 5:1.8.8-3.1 +- rebuild with new gmp + +* Thu Jun 16 2011 Miroslav Lichvar - 5:1.8.8-3 +- make some libs private in pkgconfig file (#712990) + +* Wed Feb 09 2011 Fedora Release Engineering - 5:1.8.8-2 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_15_Mass_Rebuild + +* Tue Dec 14 2010 Miroslav Lichvar - 5:1.8.8-1 +- update to 1.8.8 +- try enabling optimizations on sparc again + +* Thu Apr 08 2010 Miroslav Lichvar - 5:1.8.7-6 +- fix license tag (#225877) + +* Fri Jan 15 2010 Miroslav Lichvar - 5:1.8.7-5 +- fix test suite to work with new libtool (#555479) + +* Thu Nov 19 2009 Miroslav Lichvar - 5:1.8.7-4 +- fix building with new cpp (#538707) + +* Tue Sep 22 2009 Miroslav Lichvar - 5:1.8.7-3 +- suppress install-info errors (#515977) +- avoid clash with system setjmp/longjmp on IA64 + +* Fri Jul 24 2009 Fedora Release Engineering - 5:1.8.7-2 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_12_Mass_Rebuild + +* Thu Jul 16 2009 Miroslav Lichvar - 5:1.8.7-1 +- update to 1.8.7 + +* Tue Jun 09 2009 Dennis Gilmore - 5:1.8.6-4 +- build with -O0 on sparcv9 otherwise test suite hangs + +* Tue Feb 24 2009 Fedora Release Engineering - 5:1.8.6-3 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_11_Mass_Rebuild + +* Thu Jan 08 2009 Miroslav Lichvar - 5:1.8.6-2 +- include Emacs support (#478468) + +* Tue Dec 09 2008 Miroslav Lichvar - 5:1.8.6-1 +- update to 1.8.6 + +* Wed Nov 19 2008 Miroslav Lichvar - 5:1.8.5-2 +- fix building with new libtool + +* Tue May 13 2008 Miroslav Lichvar - 5:1.8.5-1 +- update to 1.8.5 +- fix continuations on ia64 +- remove umask setting from scriptlet, rpm sets it now + +* Thu Feb 21 2008 Miroslav Lichvar - 5:1.8.4-1 +- update to 1.8.4 +- add %%check + +* Tue Feb 19 2008 Fedora Release Engineering - 5:1.8.3-3 +- Autorebuild for GCC 4.3 + +* Wed Jan 09 2008 Miroslav Lichvar - 5:1.8.3-2 +- support slib-3a5 +- move slibcat and slib symlink out of site directory +- set umask in scriptlet (#242936) + +* Mon Oct 22 2007 Miroslav Lichvar - 5:1.8.3-1 +- update to 1.8.3 + +* Wed Aug 22 2007 Miroslav Lichvar - 5:1.8.2-2 +- update license tag +- redirect guile output in triggerin script + +* Tue Jul 17 2007 Miroslav Lichvar - 5:1.8.2-1 +- update to 1.8.2 +- remove dot from -devel summary, convert goops.info to UTF-8 + +* Mon Mar 19 2007 Miroslav Lichvar - 5:1.8.1-3 +- spec cleanup + +* Tue Jan 23 2007 Miroslav Lichvar - 5:1.8.1-2 +- support slib-3a4 +- make scriptlets safer (#223701) + +* Fri Oct 13 2006 Miroslav Lichvar - 5:1.8.1-1 +- update to 1.8.1 + +* Tue Sep 05 2006 Miroslav Lichvar - 5:1.8.0-8.20060831cvs +- make triggerin scriptlet a bit safer + +* Fri Sep 01 2006 Miroslav Lichvar - 5:1.8.0-7.20060831cvs +- update from CVS + +* Wed Jul 12 2006 Miroslav Lichvar - 5:1.8.0-6.20060712cvs +- update from CVS +- fix requires (#196016) +- link libguile with pthread (#198215) + +* Wed May 24 2006 Miroslav Lichvar - 5:1.8.0-5 +- remove dependency on slib, provide support through triggers +- fix multilib -devel conflicts in guile-snarf and scmconfig.h (#192684) + +* Thu May 18 2006 Miroslav Lichvar - 5:1.8.0-4 +- add gmp-devel to requires for devel package (#192107) +- fix guile-config link (#191595) + +* Tue May 16 2006 Miroslav Lichvar - 5:1.8.0-3 +- don't package .la files and static libraries (#191595) +- move module .so files from devel to main package + +* Tue May 09 2006 Bill Nottingham - 5:1.8.0-2 +- don't package %%{_infodir}/dir + +* Tue May 09 2006 Miroslav Lichvar - 5:1.8.0-1 +- update to guile-1.8.0 +- fix slib.scm for slib-3a3 +- install guile-tut info +- move guile.m4 to devel package +- spec cleanup + +* Tue Feb 28 2006 Miroslav Lichvar - 5:1.6.7-6 +- move .la files for modules from devel to main package (#182242) + +* Fri Feb 10 2006 Jesse Keating - 5:1.6.7-5.2 +- bump again for double-long bug on ppc(64) + +* Tue Feb 07 2006 Jesse Keating - 5:1.6.7-5.1 +- rebuilt for new gcc4.1 snapshot and glibc changes + +* Mon Feb 06 2006 Miroslav Lichvar 5:1.6.7-5 +- Avoid marking qthreads library as requiring executable stack (#179274) + +* Fri Dec 09 2005 Jesse Keating +- rebuilt + +* Fri Sep 02 2005 Phil Knirsch 5:1.6.7-4 +- Fix dynamic linking on 64bit archs (#159971) + +* Wed Mar 02 2005 Phil Knirsch 5:1.6.7-2 +- bump release and rebuild with gcc 4 +- Fixed problem with ltdl and gcc 4 rebuild +- Add BuildPreReq for libtool-ltdl-devel + +* Wed Feb 09 2005 Phil Knirsch 5:1.6.7-1 +- Update to guile-1.6.7 +- Dropped ia64 patch, stuff looks fixed in upstream code + +* Wed Jan 12 2005 Phil Knirsch 5:1.6.4-18 +- rebuilt because of new readline + +* Thu Dec 23 2004 Phil Knirsch 5:1.6.4-17 +- Fixed wrong post and postun use of /sbin/ldconfig (#143657) + +* Tue Dec 21 2004 Phil Knirsch 5:1.6.4-16 +- Moved info files to base package as they are not devel related (#139948) +- Moved static guilereadline and guile-srfi-srfi libs to devel package (#140893) +- Fixed guile-tools not finding guile lib dir (#142642) +- Added some nice tools (#142642) +- Removed smp build, seems to be broken atm + +* Wed Dec 8 2004 Jindrich Novy 5:1.6.4-15 +- remove dependency to umb-scheme and replace it by slib + +* Tue Oct 12 2004 Phil Knirsch 5:1.6.4-14 +- Fix multilib support for guile + +* Tue Aug 03 2004 Phil Knirsch 5:1.6.4-13 +- Enable optimization again for s390. + +* Tue Jun 15 2004 Elliot Lee +- rebuilt + +* Fri Apr 16 2004 Warren Togami 5:1.6.4-11 +- Fix post failure and duplicate rpm in database +- Compress NEWS +- other minor cleanups + +* Wed Apr 14 2004 Phil Knirsch 5:1.6.4-10 +- Fixed info file stuff (#112487) + +* Tue Mar 02 2004 Elliot Lee +- rebuilt + +* Fri Feb 13 2004 Elliot Lee +- rebuilt + +* Wed Aug 27 2003 Bill Nottingham 5:1.6.4-8.2 +- rebuild (#103148) + +* Tue Aug 19 2003 Phil Knirsch 5:1.6.4-8.1 +- rebuilt + +* Tue Aug 19 2003 Phil Knirsch 5:1.6.4-8 +- Moved dynamic loadable libraries out file devel into main (#98392). + +* Wed Jul 02 2003 Phil Knirsch 5:1.6.4-7.1 +- rebuilt + +* Wed Jul 02 2003 Phil Knirsch 5:1.6.4-7 +- Added srfi libs (#98392). + +* Sun Jun 8 2003 Tim Powers 5:1.6.4-6.1 +- add epoch for versioned requires +- built for RHEL + +* Wed Jun 04 2003 Elliot Lee +- rebuilt + +* Fri May 16 2003 Phil Knirsch 5:1.6.4-5 +- Bumped release and rebuilt. + +* Fri May 16 2003 Phil Knirsch 5:1.6.4-4 +- Install and package info files, too. + +* Fri May 16 2003 Phil Knirsch 5:1.6.4-3 +- Bumped release and rebuilt. + +* Fri May 16 2003 Phil Knirsch 5:1.6.4-2 +- Fixed .la file problem, moved from devel to normal package. + +* Tue May 06 2003 Phil Knirsch 5:1.6.4-1 +- Update to 1.6.4 + +* Thu Feb 13 2003 Elliot Lee 5:1.6.0-5 +- Patch7 - fix for ppc64 +- Fix qthreads dealie, including actually enabling them + +* Wed Jan 22 2003 Tim Powers +- rebuilt + +* Fri Dec 06 2002 Phil Knirsch 5:1.6.0-3 +- Included s390 as working arch as well, switch to general unknown arch patch + +* Tue Dec 3 2002 Tim Powers 5:1.6.0-2 +- rebuild to fix broken deps +- fix continuations.h on ia64 + +* Tue Dec 03 2002 Phil Knirsch 1.6.0-1 +- Make it build on x86_64. +- Integrated and fixed Than's update to 1.6.0. +- Fixed some things in the %%files section. + +* Mon Nov 11 2002 Than Ngo 1.4.1-2 +- fix to build on s390*/x86_64 -> include libguilereadline.so +- fix to link libltdl +- don't use rpath + +* Thu Nov 07 2002 Phil Knirsch 1.4.1-1 +- Updated to guile-1.4.1 +- libguilereadline.so doesn't work on x86_64 yet, so don't package it. + +* Wed Nov 06 2002 Phil Knirsch 1.4-10 +- Fixed unpackaged files. + +* Tue Nov 5 2002 Bill Nottingham 1.4-9 +- Remove qthread from x86_64 as well. + +* Wed Jul 17 2002 Phil Knirsch 1.4-8 +- Remove qthread from ppc as well. + +* Wed Jul 10 2002 Phil Knirsch 1.4-7 +- Fixed some more %%file lib related errors (). + +* Fri Jun 21 2002 Tim Powers 1.4-6 +- automated rebuild + +* Wed Jun 19 2002 Phil Knirsch 1.4-5 +- Don't forcibly strip binaries + +* Thu May 23 2002 Tim Powers +- automated rebuild + +* Mon May 06 2002 Florian La Roche +- adjust for mainframe and alpha + +* Fri Jan 25 2002 Bill Nottingham +- ship qthread devel links too + +* Fri Jan 25 2002 Phil Knirsch +- Update again to 1.4. +- Disable --with-threads for IA64 as it doesn't work. + +* Thu Jan 24 2002 Phil Knirsch 1.3.4-17/4 +- Enabled --with-threads and removed --enable-dynamic-linking for configure + (bug #58597) + +* Mon Sep 3 2001 Philipp Knirsch 1.3.4-16/3 +- Fixed problem with read-only /usr pollution of /usr/share/umb-scheme/slibcat + (#52742) + +* Wed Aug 22 2001 Philipp Knirsch 1.3.4-15/2 +- Fixed /tmp buildroot pollution (#50398) + +* Tue Jun 12 2001 Florian La Roche 1.3.4-14/1 +- size_t patch from + +* Fri May 11 2001 Bernhard Rosenkraenzer 1.3.4-13/1 +- Rebuild with new readline + +* Wed Feb 28 2001 Philipp Knirsch +- Fixed missing devel version dependancy. +- Fixed bug #20134 for good this time. + +* Mon Jan 22 2001 Than Ngo +- disable optimization on ia64 (compiler bug) (bug #23186) + +* Tue Dec 12 2000 Philipp Knirsch +- Fixed %%files bug #20134 where the /usr/lib/libguilereadline.so didn't get + installed for the non devel version. + +* Fri Jul 14 2000 Nalin Dahyabhai +- Add version number to prereq for umb-scheme to get the post-install to + work properly. + +* Thu Jul 13 2000 Nalin Dahyabhai +- Add an Epoch = 1 in case anyone happened to have 1.4 installed. + +* Thu Jul 13 2000 Prospector +- automatic rebuild + +* Tue Jul 11 2000 Nalin Dahyabhai +- Back down to 1.3.4. +- Fix to actually link against the version of libguile in the package. + +* Sun Jun 4 2000 Nalin Dahyabhai +- FHS fixups using the %%{makeinstall} macro. + +* Sun Mar 26 2000 Florian La Roche +- fix preun-devel +- call ldconfig directly in postun + +* Fri Mar 24 2000 Bernhard Rosenkraenzer +- rebuild with new readline +- update to 1.3.4 + +* Mon Feb 28 2000 Nalin Dahyabhai +- using the same catalog as umb-scheme makes umb-scheme a prereq + +* Thu Feb 17 2000 Florian La Roche +- readline is needed for %%post + +* Tue Feb 8 2000 Nalin Dahyabhai +- use the same catalog as umb-scheme + +* Thu Sep 2 1999 Jeff Johnson +- fix broken %%postun + +* Sun Mar 21 1999 Cristian Gafton +- auto rebuild in the new build environment (release 6) + +* Wed Mar 17 1999 Michael Johnson +- added .ansi patch to fix #endif + +* Wed Feb 10 1999 Cristian Gafton +- add patch for the scm stuff + +* Sun Jan 17 1999 Jeff Johnson +- integrate changes from rhcn version (#640) + +* Tue Jan 12 1999 Cristian Gafton +- call libtoolize first to get it to compile on the arm + +* Sat Jan 9 1999 Todd Larason +- Added "Requires: guile" at suggestion of Manu Rouat + +* Fri Jan 1 1999 Todd Larason +- guile-devel does depend on guile +- remove devel dependancy on m4 +- move guile-snarf from guile to guile-devel +- Converted to rhcn + +* Wed Oct 21 1998 Jeff Johnson +- update to 1.3. +- don't strip libguile.so.*.0.0. (but set the execute bits). + +* Thu Sep 10 1998 Cristian Gafton +- spec file fixups + +* Wed Sep 2 1998 Michael Fulbright +- Updated for RH 5.2 + +* Mon Jan 26 1998 Marc Ewing +- Started with spec from Tomasz Koczko +- added slib link + +* Thu Sep 18 1997 Tomasz Koczko (1.2-3) +- added %%attr(-, root, root) for %%doc, +- in %%post, %%postun ldconfig runed as parameter "-p", +- removed /bin/sh from requires, +- added %%description, +- changes in %%files. + +* Fri Jul 11 1997 Tomasz Koczko (1.2-2) +- all rewrited for using Buildroot, +- added %%postun, +- removed making buid logs, +- removed "--inclededir", added "--enable-dynamic-linking" to configure + parameters, +- added striping shared libs and /usr/bin/guile, +- added "Requires: /bin/sh" (for guile-snarf) in guile package and + "Requires: m4" for guile-devel, +- added macro %%{PACKAGE_VERSION} in "Source:" and %%files, +- added %%attr macros in %%files. diff --git a/sources b/sources new file mode 100644 index 0000000..8642c4e --- /dev/null +++ b/sources @@ -0,0 +1 @@ +SHA512 (guile-2.0.14.tar.xz) = 2cad60ab8aa77be44bc4988eaa3a2f0652637f315322abd6011c18f1800c3a461eefa15a14fd54d0d48031b093bc56dfc6cd15dc0a8260b97b40521bff793db6 diff --git a/tests/inventory b/tests/inventory new file mode 100755 index 0000000..7cb324f --- /dev/null +++ b/tests/inventory @@ -0,0 +1,4 @@ +#!/bin/bash +#upstream test needs tty +export TEST_DOCKER_EXTRA_ARGS="-v /dev:/dev --privileged" +exec merge-standard-inventory "$@" diff --git a/tests/smoke/Makefile b/tests/smoke/Makefile new file mode 100644 index 0000000..95ec90e --- /dev/null +++ b/tests/smoke/Makefile @@ -0,0 +1,63 @@ +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# Makefile of /CoreOS/guile/Sanity/smoke +# Description: Guile smoke test +# Author: Petr Splichal +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# Copyright (c) 2011 Red Hat, Inc. All rights reserved. +# +# This copyrighted material is made available to anyone wishing +# to use, modify, copy, or redistribute it subject to the terms +# and conditions of the GNU General Public License version 2. +# +# This program is distributed in the hope that it will be +# useful, but WITHOUT ANY WARRANTY; without even the implied +# warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR +# PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public +# License along with this program; if not, write to the Free +# Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +# Boston, MA 02110-1301, USA. +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ + +export TEST=/CoreOS/guile/Sanity/smoke +export TESTVERSION=1.0 + +BUILT_FILES= + +FILES=$(METADATA) runtest.sh Makefile PURPOSE fact + +.PHONY: all install download clean + +run: $(FILES) build + ./runtest.sh + +build: $(BUILT_FILES) + chmod a+x runtest.sh + +clean: + rm -f *~ $(BUILT_FILES) + + +include /usr/share/rhts/lib/rhts-make.include + +$(METADATA): Makefile + @echo "Owner: Petr Splichal " > $(METADATA) + @echo "Name: $(TEST)" >> $(METADATA) + @echo "TestVersion: $(TESTVERSION)" >> $(METADATA) + @echo "Path: $(TEST_DIR)" >> $(METADATA) + @echo "Description: Guile smoke test" >> $(METADATA) + @echo "Type: Sanity" >> $(METADATA) + @echo "TestTime: 5m" >> $(METADATA) + @echo "RunFor: guile" >> $(METADATA) + @echo "Requires: guile" >> $(METADATA) + @echo "Priority: Normal" >> $(METADATA) + @echo "License: GPLv2" >> $(METADATA) + @echo "Confidential: no" >> $(METADATA) + @echo "Destructive: no" >> $(METADATA) + + rhts-lint $(METADATA) diff --git a/tests/smoke/PURPOSE b/tests/smoke/PURPOSE new file mode 100644 index 0000000..eec2174 --- /dev/null +++ b/tests/smoke/PURPOSE @@ -0,0 +1,5 @@ +PURPOSE of /CoreOS/guile/Sanity/smoke +Description: Guile smoke test +Author: Petr Splichal + +Smoke test for the Guile interpreter. diff --git a/tests/smoke/fact b/tests/smoke/fact new file mode 100644 index 0000000..245737e --- /dev/null +++ b/tests/smoke/fact @@ -0,0 +1,6 @@ +(define (fact n) + (if (zero? n) 1 + (* n (fact (- n 1))))) + +(display (fact 12)) +(newline) diff --git a/tests/smoke/runtest.sh b/tests/smoke/runtest.sh new file mode 100644 index 0000000..98889d5 --- /dev/null +++ b/tests/smoke/runtest.sh @@ -0,0 +1,68 @@ +#!/bin/bash +# vim: dict=/usr/share/beakerlib/dictionary.vim cpt=.,w,b,u,t,i,k +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# runtest.sh of /CoreOS/guile/Sanity/smoke +# Description: Guile smoke test +# Author: Petr Splichal +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# Copyright (c) 2011 Red Hat, Inc. All rights reserved. +# +# This copyrighted material is made available to anyone wishing +# to use, modify, copy, or redistribute it subject to the terms +# and conditions of the GNU General Public License version 2. +# +# This program is distributed in the hope that it will be +# useful, but WITHOUT ANY WARRANTY; without even the implied +# warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR +# PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public +# License along with this program; if not, write to the Free +# Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +# Boston, MA 02110-1301, USA. +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ + +# Include Beaker environment +. /usr/bin/rhts-environment.sh +. /usr/lib/beakerlib/beakerlib.sh + +PACKAGE="guile" + +rlJournalStart + rlPhaseStartSetup + rlAssertRpm $PACKAGE + rlRun "TmpDir=\`mktemp -d\`" 0 "Creating tmp directory" + rlRun "cp fact $TmpDir" 0 "Copying simple guile script" + rlRun "pushd $TmpDir" + rlPhaseEnd + + rlPhaseStartTest + # Simple arithmetic + rlRun "echo '(+ 1 1 1)' | guile | tee output" 0 "Simple arithmetic" + rlAssertGrep "3" "output" + + # String operation + rlRun "echo '(string-append \"O\" \"K\")' | guile | tee output" \ + 0 "String operation" + rlAssertGrep "OK" "output" + + # Function definition + rlRun "guile fact | tee output" 0 "Function definition" + rlAssertGrep "479001600" "output" + + # Punifying external script + rlRun "guile-tools punify fact | tee output" \ + 0 "Punifying external script" + rlAssertGrep "define.*zero.*newline" "output" + rlPhaseEnd + + rlPhaseStartCleanup + rlRun "popd" + rlRun "rm -r $TmpDir" 0 "Removing tmp directory" + rlPhaseEnd +rlJournalPrintText +rlJournalEnd diff --git a/tests/tests.yml b/tests/tests.yml new file mode 100644 index 0000000..29a044f --- /dev/null +++ b/tests/tests.yml @@ -0,0 +1,25 @@ +--- +# Tests to run in a classic and container environments +- hosts: localhost + roles: + - role: standard-test-beakerlib + tags: + - classic + - container + tests: + - smoke + - upstream + required_packages: + - guile + - findutils # beakerlib needs find command + - gettext-devel # upstream needs it + - gmp-devel # upstream needs it + - libtool # upstream needs it + - libtool-ltdl-devel # upstream needs it + - readline-devel # upstream needs it + - rpm-build # upstream needs it + - libunistring-devel # upstream needs it + - libffi-devel # upstream needs it + - gc-devel # upstream needs it + - wget # rlFetchSrcForInstalled needs it + diff --git a/tests/upstream/Makefile b/tests/upstream/Makefile new file mode 100644 index 0000000..0ef6b36 --- /dev/null +++ b/tests/upstream/Makefile @@ -0,0 +1,63 @@ +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# Makefile of /CoreOS/guile/Sanity/upstream +# Description: Upstream test suite +# Author: Petr Splichal +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# Copyright (c) 2011 Red Hat, Inc. All rights reserved. +# +# This copyrighted material is made available to anyone wishing +# to use, modify, copy, or redistribute it subject to the terms +# and conditions of the GNU General Public License version 2. +# +# This program is distributed in the hope that it will be +# useful, but WITHOUT ANY WARRANTY; without even the implied +# warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR +# PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public +# License along with this program; if not, write to the Free +# Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +# Boston, MA 02110-1301, USA. +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ + +export TEST=/CoreOS/guile/Sanity/upstream +export TESTVERSION=1.0 + +BUILT_FILES= + +FILES=$(METADATA) runtest.sh Makefile PURPOSE + +.PHONY: all install download clean + +run: $(FILES) build + ./runtest.sh + +build: $(BUILT_FILES) + test -x runtest.sh || chmod a+x runtest.sh + +clean: + rm -f *~ $(BUILT_FILES) + + +include /usr/share/rhts/lib/rhts-make.include + +$(METADATA): Makefile + @echo "Owner: Petr Splichal " > $(METADATA) + @echo "Name: $(TEST)" >> $(METADATA) + @echo "TestVersion: $(TESTVERSION)" >> $(METADATA) + @echo "Path: $(TEST_DIR)" >> $(METADATA) + @echo "Description: Upstream test suite" >> $(METADATA) + @echo "Type: Sanity" >> $(METADATA) + @echo "TestTime: 60m" >> $(METADATA) + @echo "RunFor: guile" >> $(METADATA) + @echo "Requires: gettext-devel gmp-devel guile libtool libtool-ltdl-devel readline-devel rpm-build libunistring-devel libffi-devel gc-devel" >> $(METADATA) + @echo "Priority: Normal" >> $(METADATA) + @echo "License: GPLv2" >> $(METADATA) + @echo "Confidential: no" >> $(METADATA) + @echo "Destructive: no" >> $(METADATA) + + rhts-lint $(METADATA) diff --git a/tests/upstream/PURPOSE b/tests/upstream/PURPOSE new file mode 100644 index 0000000..64d8b05 --- /dev/null +++ b/tests/upstream/PURPOSE @@ -0,0 +1,3 @@ +PURPOSE of /CoreOS/guile/Sanity/upstream +Description: Upstream test suite +Author: Petr Splichal diff --git a/tests/upstream/runtest.sh b/tests/upstream/runtest.sh new file mode 100644 index 0000000..67fb4ed --- /dev/null +++ b/tests/upstream/runtest.sh @@ -0,0 +1,65 @@ +#!/bin/bash +# vim: dict=/usr/share/beakerlib/dictionary.vim cpt=.,w,b,u,t,i,k +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# runtest.sh of /CoreOS/guile/Sanity/upstream +# Description: Upstream test suite +# Author: Petr Splichal +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# Copyright (c) 2011 Red Hat, Inc. All rights reserved. +# +# This copyrighted material is made available to anyone wishing +# to use, modify, copy, or redistribute it subject to the terms +# and conditions of the GNU General Public License version 2. +# +# This program is distributed in the hope that it will be +# useful, but WITHOUT ANY WARRANTY; without even the implied +# warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR +# PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public +# License along with this program; if not, write to the Free +# Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +# Boston, MA 02110-1301, USA. +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ + +# Include Beaker environment +. /usr/bin/rhts-environment.sh +. /usr/lib/beakerlib/beakerlib.sh + +PACKAGE="guile" + +rlJournalStart + rlPhaseStartSetup + rlAssertRpm $PACKAGE + rlRun "TmpDir=\`mktemp -d\`" 0 "Creating tmp directory" + rlRun "pushd $TmpDir" + + # fetch tests + rlRun "rlFetchSrcForInstalled $PACKAGE" 0 "Fetching the source rpm" + rlRun "rpm --define '_topdir $TmpDir' -i *src.rpm" \ + 0 "Installing the source rpm" + rlRun "mkdir BUILD" 0 "Creating BUILD directory" + rlRun "rpmbuild --nodeps --define '_topdir $TmpDir' \ + -bc $TmpDir/SPECS/*spec" 0 "Preparing sources" + rlRun "pushd BUILD/guile*" + rlPhaseEnd + + rlPhaseStartTest + rlRun "make check" 0 "Dry run of the test suite" + rlRun "ln -snf /usr/bin/guile libguile/guile" \ + 0 "Replacing built guile interpreter with system binary" + rlRun "pushd test-suite" + rlRun "make check" 0 "Running the test suite" + rlRun "popd" + rlPhaseEnd + + rlPhaseStartCleanup + rlRun "popd" + rlRun "rm -r $TmpDir" 0 "Removing tmp directory" + rlPhaseEnd +rlJournalPrintText +rlJournalEnd