use base "installedtest"; use strict; use testapi; sub run { my $self = shift; # switch to TTY3 for both, graphical and console tests $self->root_console(tty=>3); # dump the systemctl output assert_script_run "systemctl --failed | tee /tmp/failed.txt"; # if we have 0 failed services, we're good eval "assert_script_run 'grep \"0 loaded units\" /tmp/failed.txt';"; return unless $@; # if only mcelog failed, that's a soft fail eval "assert_script_run 'grep \"1 loaded units\" /tmp/failed.txt';"; if ($@) { die "More than one services failed to start"; } else { assert_script_run "systemctl is-failed mcelog.service"; record_soft_failure; } } sub test_flags { # without anything - rollback to 'lastgood' snapshot if failed # 'fatal' - whole test suite is in danger if this fails # 'milestone' - after this test succeeds, update 'lastgood' # 'important' - if this fails, set the overall state to 'fail' return { fatal => 1 }; } 1; # vim: set sw=4 et: