mirror of
https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git
synced 2024-11-25 15:23:08 +00:00
54 lines
1.3 KiB
Perl
54 lines
1.3 KiB
Perl
|
use base "installedtest";
|
||
|
|
use strict;
|
||
|
|
use testapi;
|
||
|
|
use utils;
|
||
|
|
|
||
|
|
# This part of the suite Tests that the panel
|
||
|
|
# can be used to switch network off and on.
|
||
|
|
|
||
|
|
sub switch_network {
|
||
|
|
my $type = shift;
|
||
|
|
# Click on the controls.
|
||
|
|
assert_and_click("panel_controls");
|
||
|
|
# Click on Network button to toggle network
|
||
|
|
assert_and_click("panel_ctrl_networks");
|
||
|
|
wait_still_screen(2);
|
||
|
|
# Get rid of the window to be able to make tests
|
||
|
|
send_key("esc");
|
||
|
|
}
|
||
|
|
|
||
|
|
sub run {
|
||
|
|
my $self = shift;
|
||
|
|
# Toggle network
|
||
|
|
switch_network();
|
||
|
|
|
||
|
|
# Switch to console
|
||
|
|
$self->root_console(tty => 3);
|
||
|
|
# If there is no network the script fails which is exactly
|
||
|
|
# what we need.
|
||
|
|
assert_script_run("! ping -c 10 8.8.8.8");
|
||
|
|
# Let's switch back to desktop. Normally, we would use the
|
||
|
|
# desktop_vt subroutine, but since we do not have networking
|
||
|
|
# it does not work reliably. Ergo, we will use the old known
|
||
|
|
# ctrl-alt-f2
|
||
|
|
send_key("ctrl-alt-f2");
|
||
|
|
sleep(3);
|
||
|
|
|
||
|
|
# Toggle network
|
||
|
|
switch_network();
|
||
|
|
# Switch to console
|
||
|
|
$self->root_console(tty => 3);
|
||
|
|
# If there is no network the script fails which is exactly
|
||
|
|
# what we need.
|
||
|
|
assert_script_run("ping -c 10 8.8.8.8");
|
||
|
|
}
|
||
|
|
|
||
|
|
sub test_flags {
|
||
|
|
return {always_rollback => 1};
|
||
|
|
}
|
||
|
|
|
||
|
|
1;
|
||
|
|
|
||
|
|
# vim: set sw=4 et:
|
||
|
|
|