os-autoinst-distri-rocky-migrated/lib/packagetest.pm

package packagetest;

use strict;

use base 'Exporter';
use Exporter;

use testapi;
our @EXPORT = qw/prepare_test_packages verify_installed_packages verify_updated_packages/;

# enable the openqa test package repositories and install the main
# test packages, remove pandoc-common and install the fake one
sub prepare_test_packages {
    # remove pandoc-common if installed (we don't use assert
    # here in case it's not)
    script_run 'dnf -y remove pandoc-common', 180;
    # grab the test repo definitions
    assert_script_run 'curl -o /etc/yum.repos.d/openqa-testrepo-1.repo https://git.resf.org/testing/openqa-testrepos/raw/branch/main/openqa-testrepo-1.repo';
    # install the test packages from repo1
    assert_script_run 'dnf -y --disablerepo=* --enablerepo=openqa-testrepo-1 install pandoc-common';
    if (get_var("DESKTOP") eq 'kde' && get_var("TEST") eq 'desktop_update_graphical') {
        # kick pkcon so our special update will definitely get installed
        assert_script_run 'pkcon refresh force';
    }
}

# check our test packages installed correctly (this is a test that dnf
# actually does what it claims)
sub verify_installed_packages {
    validate_script_output 'rpm -q pandoc-common', sub { $_ =~ m/^pandoc-common-1.1.noarch$/ };
    assert_script_run 'rpm -V pandoc-common';
}

# check updating the test packages and the fake pandoc-common work
# as expected
sub verify_updated_packages {
    # we don't know what version of pandoc-common we'll actually
    # get, so just check it's *not* the fake one
    validate_script_output 'rpm -q pandoc-common', sub { $_ !~ m/^pandoc-common-1-1.noarch$/ };
    assert_script_run 'rpm -V pandoc-common';
}