1
0
mirror of https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git synced 2024-11-01 05:54:22 +00:00
os-autoinst-distri-fedora/lib/disks.pm
Adam Williamson 45c7e7a63a disks: drop a workaround we did not hit for a long time
The issue is not marked as fixed, but per the needle cleanup we
have not hit this workaround condition for a long time. I checked
past failures and it doesn't look like we're still hitting the
problem but the needle stopped matching, or anything.

Signed-off-by: Adam Williamson <awilliam@redhat.com>
2024-01-09 17:48:28 -08:00

242 lines
8.1 KiB
Perl

package disks;
use strict;
use base 'Exporter';
use Exporter;
use lockapi;
use testapi;
use utils;
our @EXPORT = qw(add_partitions delete_partition create_partition format_partition edit_partition edit_filesystem authenticate mount_partition resize_partition wipe_disk);
# This routine handles the authentication dialogue when it
# pops out. It provides the admin user (not root) password
# so that system change could be performed on regular
# Workstation.
sub authenticate {
if (check_screen("auth_required", 2)) {
my $password = get_var("USER_PASSWORD") // "weakpassword";
type_very_safely($password);
send_key("ret");
}
}
# This routine adds two partitions. This layout is used in
# several testing scripts.
sub add_partitions {
# The correct disk should be already selected,
# but click on it anyway to make sure it is.
assert_and_click("disks_loopdisk_listed");
# Create the first partition.
create_partition("primavolta", "256");
# Select the empty space
assert_and_click("disks_free_space");
# Create the second partition.
create_partition("secondavolta", "full");
# Create the second partition.
}
# This routine deletes a partition that is defined by its number.
# In GUI it is defined as "Partition $number" which is used
# to assert. If the partition is not found, it will fail.
# The number should be passed as "one", "two" to get use
# of the precreated needles.
sub delete_partition {
my $number = shift;
# Select the partition.
assert_and_click("disks_select_partition_$number");
# Confirm that it has been selected by checking the
# identifier.
assert_screen("disks_partition_identifier_$number");
# Click on the Minus symbol to delete the partition
assert_and_click("disks_partition_delete");
# Confirm the deletion using the Delete button.
assert_and_click("gnome_button_delete");
# Authenticate (if asked)
authenticate();
# Check that the partition has been deleted.
# That means that the identifier disappears and the program
# falls back to another partition and shows its identifier,
# or it shows no identifier, if there are no partitions
# whatsoever.
if (check_screen("disks_partition_identifier_$number", timeout => 10)) {
die("The partition seems not to have been deleted.");
}
}
# This routine creates a partition in the empty space.
# You can define a name and a size. If the size is "full",
# the partition will take up the rest of the free space.
sub create_partition {
my ($name, $size) = @_;
# Click on the Plus button to add partition.
assert_and_click("gnome_add_button_plus");
# Hit Tab to arrive in the size field
send_key("tab");
# Type in the size
if ($size ne "full") {
type_very_safely("$size");
}
# Click on Next
assert_and_click("next_button");
# Hit Tab to arrive in Name field
send_key("tab");
# Type in the name
type_very_safely("$name");
# Click on Create button
assert_and_click("gnome_button_create");
# Authenticate if needed.
authenticate();
# Check that the partition has been created.
assert_screen("disks_partition_created_$name");
}
# This routine formats the existing partition. You can
# define the number of the partition and the filesystem
# type.
sub format_partition {
my ($number, $type, $name) = @_;
# Select the partition
assert_and_click("disks_select_partition_$number");
# Open the partition menu
assert_and_click("disks_partition_menu");
# Select to format partition
assert_and_click("disks_menu_format");
# Name the filesystem
type_very_safely($name);
# Select the filesystem if it is visible.
if (check_screen("disks_select_$type")) {
diag("INFO: The required filesystem type was located on the first screen.");
click_lastmatch();
}
else {
diag("INFO: The required filesystem type was not seen on the first screen");
assert_and_click("disks_select_other");
assert_and_click("next_button");
assert_and_click("disks_select_$type");
}
# Click on the Next button
assert_and_click("next_button");
# Check that there is a warning
assert_screen("disks_warning_shown");
# Click on the Format button to continue
assert_and_click("gnome_button_format");
# Authenticate if needed
authenticate();
# Check that the partition has been formatted.
assert_screen("disks_partition_formatted_$number");
}
# This routine edits the type of partition and its name.
# You can select the type, the name, or both. When changed,
# the changes will be reflected on the partition overview.
sub edit_partition {
my ($number, $type, $name) = @_;
# Select the partition
assert_and_click("disks_select_partition_$number");
# Open the partition menu
assert_and_click("disks_partition_menu");
# Click on Edit partition
assert_and_click("disks_menu_edit_partition");
# Click on Selector
assert_and_click("disks_type_selector");
# Select the new partition type
# The partition type might be visible right ahead,
# if not, press the "Down" key until it has been found.
if (check_screen("disks_select_$type")) {
click_lastmatch();
}
else {
send_key_until_needlematch("disks_select_$type", "down", 50, 1);
click_lastmatch();
}
if ($name) {
# Hit Tab to arrive on the name line
send_key("tab");
# Type the name of the partition
type_very_safely($name);
}
# Click on the Change button
assert_and_click("gnome_button_change");
# Authenticate if needed
authenticate();
# Check that the partition has been changed
assert_screen("disks_parttype_changed_$type");
}
# This routine edits the name of the filesystem. You need
# to set the number of the partition and the name that you
# want to set to the filesystem.
sub edit_filesystem {
my ($number, $name) = @_;
# Select the partition.
assert_and_click("disks_select_partition_$number");
# Open the partition menu
assert_and_click("disks_partition_menu");
# Click on Edit filesystem
assert_and_click("disks_menu_edit_filesystem");
# Type the name
type_very_safely($name);
# Click on Change
assert_and_click("gnome_button_change");
# Authenticate
authenticate();
# Check that the type has changed.
assert_screen("disks_fstype_changed_$name");
}
# This mounts a partition with a filesystem. The partition
# can be chosen by using the $number.
sub mount_partition {
my $number = shift;
# Select the first partition if not selected.
assert_and_click("disks_select_partition_$number");
# Click on the Play symbout to mount the partition.
assert_and_click("disks_button_mount");
# Authenticate if necessary.
authenticate();
# Check that it has been mounted
assert_screen("disks_partition_mounted_$number");
}
# This routine resizes a partition. It takes the number of
# the partition to resize and the target size of the partition.
sub resize_partition {
my ($number, $size) = @_;
# Select the partition
assert_and_click("disks_select_partition_$number");
# Open the partition menu
assert_and_click("disks_partition_menu");
# Select Resize partition
assert_and_click("disks_menu_resize");
# Authenticate
authenticate();
# Click into the Size field and delete
# its content.
assert_and_click("disks_partition_size");
send_key("ctrl-a");
send_key("delete");
# Type in the new size
type_very_safely($size);
# Click on the Resize button
assert_and_click("gnome_button_resize");
# Check that it has been resized.
assert_screen("disks_partition_resized");
}
# This routine wipes the entire disk and formats it using
# the GPT partitions layout.
sub wipe_disk {
# Format the entire disk with a GPT.
assert_and_click("disks_dotted_menu");
assert_and_click("disks_menu_format_disk");
assert_and_click("gnome_button_format_disk");
assert_and_click("gnome_button_format_confirm");
# Do authentication
authenticate();
# Check that the disk has been correctly formatted.
assert_screen("disks_disk_formatted");
}