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/tests/flatpak_fedora.pm
Lukas Ruzicka d50885e584 Create a test for basic Flatpak operations.
This PR tries to respond to issue #294.
On Silverblue, this will try:

* flatpak install
* flatpak remote-add
* flatpak list
* flatpak remotes
* flatpak remove
* flatpak update

and also it tests that a flatpak can be built.
2023-11-13 10:37:52 -08:00

56 lines
1.6 KiB
Perl

use base "installedtest";
use strict;
use testapi;
use utils;
# This script tests that the flatpak technology is correctly set up
# and that it can be used without tweaking any settings or installing
# any packages on the system.
sub run {
my $self = shift;
$self->root_console(tty => 3);
# Check that that Flatpak is installed on the System.
# If the following command succeeds, we can assume that Flatpak is installed.
assert_script_run("flatpak --version");
# Check that at least Fedora remote repository is properly configured
validate_script_output("flatpak remotes", sub { m/fedora/ });
# Check that an application exists in the repository
validate_script_output("flatpak search gvim", sub { m/org.vim.Vim/ });
# Check that the application can be installed.
assert_script_run("flatpak -y install org.vim.Vim", timeout => 720);
# Check that it is listed as installed
assert_script_run("flatpak list | grep GVim");
# Now, we will switch into the Desktop and we will try to run the application
desktop_vt();
wait_still_screen(3);
menu_launch_type("gvim");
assert_screen("apps_run_gvim");
# Switch off the application
type_very_safely(":qa\n");
# We will switch to the CLI again
$self->root_console(tty => 3);
## Now, we will remove the application again.
assert_script_run("flatpak -y remove org.vim.Vim", timeout => 240);
# Check that it the application is not listed among installed any more.
assert_script_run("! flatpak list | grep GVim");
}
sub test_flags {
return {fatal => 1};
}
1;
# vim: set sw=4 et: