diff options
author | Yevhenii Shapovalov <yshapova@redhat.com> | 2017-12-04 12:22:37 +0200 |
---|---|---|
committer | Yevhenii Shapovalov <yshapova@redhat.com> | 2017-12-04 12:22:37 +0200 |
commit | d6756de9ebf5840b9886c86635319dc1be1e36cc (patch) | |
tree | c270d9f54a2db3e24fd7aa4672645e78efab6910 /tests/upstream/runtest.sh | |
parent | 2e1753128fef7e6f97f1a37ad9ff93864840f045 (diff) | |
download | guile-add_tests.tar.gz guile-add_tests.tar.xz guile-add_tests.zip |
Diffstat (limited to 'tests/upstream/runtest.sh')
-rw-r--r-- | tests/upstream/runtest.sh | 65 |
1 files changed, 65 insertions, 0 deletions
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 <psplicha@redhat.com> +# +# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +# +# 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 |