1
0
mirror of https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git synced 2024-11-22 14:03:09 +00:00
os-autoinst-distri-fedora/tests/remote_desktop_server.pm
Lukáš Růžička c4de21e719 Create test files.
2024-11-14 13:57:36 -08:00

37 lines
1.1 KiB
Perl

use base "installedtest";
use strict;
use testapi;
use utils;
sub run {
my $self = shift;
my $user = get_var("USER_LOGIN", "test");
my $password = get_var("USER_PASSWORD", "weakpassword");
#boot_to_login_screen(timeout => 300);
$self->root_console(tty => 3);
# Make necessary settings for the RDP server.
# Set SElinux to permissive to workaround a Fedora issue
assert_script_run("setenforce 0");
# Check that SElinux is in permissive mode
validate_script_output("getenforce", sub { m/Permissive/ });
# In Workstation, the RDP port should be opened per se,
# but let's open it explicitely, to make sure it is open.
assert_script_run("firewall-cmd --add-port=3389/tcp");
# Change to Desktop
desktop_vt();
# Open Settings and switch on RDP login
menu_launch_type("Settings");
assert_and_click("settings_submenu_system");
assert_and_click("settings_remote_desktop");
assert_and_click("settings_remote_login");
sub test_flags {
return {fatal => 1, milestone => 1};
}
1;
# vim: set sw=4 et: