#!/bin/bash

# vim: dict=/usr/share/beakerlib/dictionary.vim cpt=.,w,b,u,t,i,k

# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

#

#   runtest.sh of /CoreOS/tar/Regression/tar-testsuite

#   Description: TAR testsuite

#   Author: Branislav Blaskovic <bblaskov@redhat.com>

#

# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

#

#   Copyright (c) 2012, 2019 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="tar"

TESTUSER="tar-testsuite"

install_build_deps()

{

    if rlIsFedora || rlIsRHEL '>7'; then

        rlIsRHEL 8 && additional_repo='--enablerepo rhel-buildroot'

        rlRun "dnf -y $additional_repo builddep $*"

    else

        # WARNING: yum-builddep doesn't work on RHEL5 as we would expect from

        # modern RHEL/Fedora distributions.  Only "package names" are accepted,

        # not SRPMs or SPEC files.  On RHEL6 this seems to work fine with SRPMs

        # only.

        rlRun "yum-builddep -y $*"

    fi

}

rlJournalStart

    rlPhaseStartSetup

        rlAssertRpm $PACKAGE

        rlRun "useradd $TESTUSER"

        rlRun "TmpDir=\$(mktemp -d)" 0 "Creating tmp directory"

        rlRun "chmod -R 777 $TmpDir"

        rlRun "pushd $TmpDir"

        if rlIsRHEL 5; then

            fix_rpm='echo %_topdir $HOME > $HOME/.rpmmacros'

            rlRun "su - $TESTUSER -c '$fix_rpm'"

            # on RHEL5, this isn't create automatically for some reason

            rlRun "su - $TESTUSER -c 'mkdir \$HOME/BUILD'"

        fi

    rlPhaseEnd

    rlPhaseStartTest

        # Getting archive

        rlFetchSrcForInstalled $PACKAGE

        VERSION=`ls -1 *.src.rpm | head -1 | sed 's/tar-\([0-9.]*\).*src.rpm/\1/'`

        RPM_NAME=`ls -1 *.src.rpm | head -1`

        RPM_FULL_NAME=`readlink -f $RPM_NAME`

        TOPDIR=$(su - "$TESTUSER" -c 'rpm --eval %_topdir')

        SPECFILE=$TOPDIR/SPECS/tar.spec

        BUILDDIR=$TOPDIR/BUILD/tar-$VERSION

        rlRun "chmod -R 777 $TmpDir"

        if [ -f "$RPM_NAME" ];then

            # Extract SRPM

            rlRun "su $TESTUSER -c \"rpm -i $RPM_FULL_NAME\""

            # Print some info

            rlLog "RPM name: $RPM_NAME"

            rlLog "Version: $VERSION"

            # Dependencies

            install_build_deps tar

            # Building

            rlRun -s "su $TESTUSER -c \"rpmbuild -bc $SPECFILE\""

            rlRun "mv $rlRun_LOG $TmpDir/rpmbuild.log"

            # Using system /bin/tar for testsuite

            wrapper='export PATH=/bin ; exec tar "$@"'

            wrapper=`printf "%q" "$wrapper"`

            rlRun "echo $wrapper > $BUILDDIR/src/tar"

            # Starting testsuite (as regular user)

            rlLog "Starting testsuite!"

            # we need 'make check' to build tools like 'genfile', etc.

            rlRun -s "su $TESTUSER -c \"cd $BUILDDIR && make check\""

            rlRun "mv $rlRun_LOG $TmpDir/testsuite.log"

            print_stats ()

            {

                # Grep fails from logs

                while read line

                do

                    echo "$line" | grep "[0-9]\{0,\}:.*FAILED (" && rlFail "$line"

                done < $1

                # Data from stderr

                SKIPPED=`grep "[0-9]\{0,3\} tests were skipped" $1`

                if [ `echo $SKIPPED | wc -l` -eq 1 ];then

                    rlLog "$SKIPPED"

                fi

            }

            print_stats "$TmpDir/testsuite.log"

            rlLog "Starting ROOT testsuite!"

            # make check is not needed anymore

            rlRun -s "cd $BUILDDIR/tests && ./testsuite"

            rlRun "mv $rlRun_LOG $TmpDir/testsuite_root.log"

            print_stats "$TmpDir/testsuite_root.log"

            lines=`wc -l $BUILDDIR/src/tar`

            rlAssertO "check that we did not remove the wrapper mistakenly" "$lines"

        else

            rlFail "No src RPM downloaded."

        fi

    rlPhaseEnd

    rlPhaseStartCleanup

        rlRun "cd $TmpDir"

        rlBundleLogs "tar-testsuite-logs" "testsuite.log" "rpm-install.log" "rpmbuild.log" "yum-install.log"

        rlRun "popd"

        rlRun "userdel -r $TESTUSER"

        rlRun "rm -rf $TmpDir" 0 "Removing tmp directory"

    rlPhaseEnd

rlJournalPrintText

rlJournalEnd