Merge pull request #156 from AlanMarshall/modularity

Modularity tests fix for  9.1  8.8  &  8.7
This commit is contained in:
Trevor Cooper 2023-03-17 09:24:18 -07:00 committed by GitHub
commit 5677222931
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
13 changed files with 116 additions and 30 deletions

View File

@ -0,0 +1,16 @@
{
"area": [
{
"width": 664,
"ypos": 29,
"type": "match",
"height": 32,
"xpos": 78
}
],
"properties": [],
"tags": [
"ENV-DISTRI-rocky",
"topbar_generic"
]
}

Binary file not shown.

After

Width:  |  Height:  |  Size: 49 KiB

View File

@ -0,0 +1,16 @@
{
"area": [
{
"type": "match",
"xpos": 768,
"ypos": 9,
"width": 129,
"height": 27
}
],
"properties": [],
"tags": [
"ENV-DISTRI-rocky",
"prerelease_note"
]
}

Binary file not shown.

After

Width:  |  Height:  |  Size: 17 KiB

View File

@ -0,0 +1,16 @@
{
"area": [
{
"width": 113,
"height": 18,
"xpos": 769,
"type": "match",
"ypos": 14
}
],
"properties": [],
"tags": [
"ENV-DISTRI-rocky",
"version_8_ident"
]
}

Binary file not shown.

After

Width:  |  Height:  |  Size: 17 KiB

View File

@ -0,0 +1,16 @@
{
"area": [
{
"width": 59,
"ypos": 52,
"type": "match",
"height": 25,
"xpos": 548
}
],
"properties": [],
"tags": [
"ENV-DISTRI-rocky",
"cockpit_services_entry"
]
}

Binary file not shown.

After

Width:  |  Height:  |  Size: 69 KiB

View File

@ -0,0 +1,16 @@
{
"area": [
{
"xpos": 7,
"height": 27,
"width": 97,
"ypos": 10,
"type": "match"
}
],
"properties": [],
"tags": [
"ENV-DISTRI-rocky",
"cockpit_main"
]
}

Binary file not shown.

After

Width:  |  Height:  |  Size: 76 KiB

View File

@ -11,8 +11,8 @@ sub run {
$self->root_console(tty => 3);
# Enable the module.
my $name = "swig";
my $stream = "4.0";
my $name = "ruby";
my $stream = "3.1";
assert_script_run("dnf module enable -y $name:$stream");
# Check that it is listed in the enabled list.
@ -30,8 +30,8 @@ sub run {
}
# Disable some other module.
my $name_alt = "postgresql";
my $stream_alt = "13";
my $name_alt = "ruby";
my $stream_alt = "3.1";
assert_script_run("dnf module disable -y $name_alt:$stream_alt");
# Check that it is listed in the disabled list.

View File

@ -10,8 +10,8 @@ sub run {
$self->root_console(tty => 3);
# Install a Ruby module.
my $name = "nodejs";
my $stream = "14";
my $name = "ruby";
my $stream = "3.1";
my $profile = "common";
assert_script_run("dnf module install -y $name:$stream/$profile");

View File

@ -16,14 +16,20 @@ sub run {
# NOTE: In Rocky the baseos and appstream default repos include and add modules in the
# default installation where in Fedora all modules are in separate modular repos.
# Until we figure out how to keep track of the count of expected enabled modular
# packages this will need to assume what appears to be the default in minimal.
# packages this will need to assume what appears to be the default in dvd-iso.
my $modules = script_output('dnf module list --enabled', timeout => 270);
my @modules = parse_module_list($modules);
my $module_count = scalar @modules;
my $flavor = get_var('FLAVOR', 'minimal-iso');
my $packageset = get_var('PACKAGE_SET', 'minimal');
my $packageset = get_var('PACKAGE_SET', 'graphical-server');
my $version = get_var('VERSION', 'none');
if ($version eq 'none') {
die "VERSION=9.1 or VERSION=8.8 or VERSION=8.7 need to be specified on the command line.";
} elsif ($version eq '9.1') {
die "Enabled modules ($module_count) is not equal to the default (0)." unless (scalar @modules == 0);
} elsif ($version eq '8.8' || $version eq '8.7') {
if ($flavor eq 'boot-iso') {
die "There seem to be enabled modules when the list should be empty." unless ($module_count == 0);
} elsif ($flavor eq 'minimal-iso') {
@ -40,12 +46,13 @@ sub run {
} elsif ($packageset eq 'graphical-server') {
die "Enabled modules ($module_count) is not equal to the default (9)." unless (scalar @modules == 9);
} elsif ($packageset eq 'workstation') {
die "Enabled modules ($module_count) is not equal to the default (6)." unless (scalar @modules == 6);
die "Enabled modules ($module_count) is not equal to the default (13)." unless (scalar @modules == 13);
} elsif ($packageset eq 'virtualization-host') {
die "Enabled modules ($module_count) is not equal to the default (2)." unless (scalar @modules == 2);
}
} else {
die "Enabled modules ($module_count) is not equal to the default (2)." unless (scalar @modules == 2);
die "Enabled modules ($module_count) is not equal to the default (0)." unless (scalar @modules == 0);
}
}
# Check that dnf lists the disabled modules.
@ -59,7 +66,6 @@ sub run {
die "There seem to be installed modules when the list should be empty." unless (scalar @modules == 0);
}
1;
# vim: set sw=4 et: