os-autoinst-distri-rocky/tests/server_cockpit_basic.pm
Adam Williamson 1cd0529785 cockpit: set log priority to 'info' before looking for entry
We finally saw a test where there were *no* errors logged by the
time Cockpit reached the log screen, so there were no entries to
click. Let's just make the test set log level to info before
looking for entries - I prefer this to 'click entry if found,
otherwise change log level' as that's twice as many branches to
look after. Of course, it means the warning triangle entry needle
is useless now :(

Signed-off-by: Adam Williamson <awilliam@redhat.com>
2021-02-19 10:24:50 -08:00

45 lines
1.3 KiB
Perl

use base "installedtest";
use strict;
use testapi;
use utils;
use cockpit;
sub run {
my $self=shift;
bypass_1691487;
# run firefox and login to cockpit
start_cockpit(1);
# go to the logs screen
assert_and_click "cockpit_logs";
# the date dropdown changes and messes with the button locations, so wait
wait_still_screen 2;
# set priority to info and above in case there are no errors
assert_and_click "cockpit_logs_priority_text";
send_key "backspace";
send_key "backspace";
send_key "backspace";
send_key "backspace";
type_string "info\n";
# now click an entry
assert_and_click "cockpit_logs_entry";
# check we get to the appropriate detail screen
assert_screen "cockpit_logs_detail";
# go to the services screen
assert_and_click "cockpit_services";
wait_still_screen(timeout=>90, stilltime=>5);
# click on an entry
assert_and_click "cockpit_services_entry";
# check we get to the appropriate detail screen...but this click
# often gets lost for some reason, so retry it once
assert_and_click "cockpit_services_entry" unless (check_screen "cockpit_services_detail", 10);
assert_screen "cockpit_services_detail";
}
sub test_flags {
return { fatal => 1 };
}
1;
# vim: set sw=4 et: